Wordpress 2.3.2-scripts
[autoinstalls/wordpress.git] / wp-includes / atomlib.php
1 <?php
2 /*
3  * atomlib.php - Atom Syndication Format PHP Library
4  *
5  * Project: http://code.google.com/p/phpatomlib/
6  *
7  * Author: Elias Torres <elias@torrez.us>
8  * Version: 0.4
9  *
10  */
11
12 class AtomFeed {
13     var $links = array();
14     var $categories = array();
15
16     var $entries = array();
17 }
18
19 class AtomEntry {
20     var $links = array();
21     var $categories = array();
22 }
23
24 class AtomParser {
25
26     var $NS = 'http://www.w3.org/2005/Atom';
27     var $ATOM_CONTENT_ELEMENTS = array('content','summary','title','subtitle','rights');
28     var $ATOM_SIMPLE_ELEMENTS = array('id','updated','published','draft');
29
30     var $debug = false;
31
32     var $depth = 0;
33     var $indent = 2;
34     var $in_content;
35     var $ns_contexts = array();
36     var $ns_decls = array();
37     var $content_ns_decls = array();
38     var $content_ns_contexts = array();
39     var $is_xhtml = false;
40     var $is_html = false;
41     var $is_text = true;
42     var $skipped_div = false;
43
44     var $FILE = "php://input";
45
46     var $feed;
47     var $current;
48
49     function AtomParser() {
50
51         $this->feed = new AtomFeed();
52         $this->current = null;
53         $this->map_attrs_func = create_function('$k,$v', 'return "$k=\"$v\"";');
54         $this->map_xmlns_func = create_function('$p,$n', '$xd = "xmlns"; if(strlen($n[0])>0) $xd .= ":{$n[0]}"; return "{$xd}=\"{$n[1]}\"";');
55     }
56
57     function _p($msg) {
58         if($this->debug) {
59             print str_repeat(" ", $this->depth * $this->indent) . $msg ."\n";
60         }
61     }
62
63     function error_handler($log_level, $log_text, $error_file, $error_line) {
64         $this->error = $log_text;
65     }
66
67     function parse() {
68
69         set_error_handler(array(&$this, 'error_handler'));
70
71         array_unshift($this->ns_contexts, array());
72
73         $parser = xml_parser_create_ns();
74         xml_set_object($parser, $this);
75         xml_set_element_handler($parser, "start_element", "end_element");
76         xml_parser_set_option($parser,XML_OPTION_CASE_FOLDING,0);
77         xml_parser_set_option($parser,XML_OPTION_SKIP_WHITE,0);
78         xml_set_character_data_handler($parser, "cdata");
79         xml_set_default_handler($parser, "_default");
80         xml_set_start_namespace_decl_handler($parser, "start_ns");
81         xml_set_end_namespace_decl_handler($parser, "end_ns");
82
83         $this->content = '';
84
85         $ret = true;
86
87         $fp = fopen($this->FILE, "r");
88         while ($data = fread($fp, 4096)) {
89             if($this->debug) $this->content .= $data;
90
91             if(!xml_parse($parser, $data, feof($fp))) {
92                 trigger_error(sprintf(__('XML error: %s at line %d')."\n",
93                     xml_error_string(xml_get_error_code($xml_parser)),
94                     xml_get_current_line_number($xml_parser)));
95                 $ret = false;
96                 break;
97             }
98         }
99         fclose($fp);
100
101         xml_parser_free($parser);
102
103         restore_error_handler();
104
105         return $ret;
106     }
107
108     function start_element($parser, $name, $attrs) {
109
110         $tag = array_pop(split(":", $name));
111
112         switch($name) {
113             case $this->NS . ':feed':
114                 $this->current = $this->feed;
115                 break;
116             case $this->NS . ':entry':
117                 $this->current = new AtomEntry();
118                 break;
119         };
120
121         $this->_p("start_element('$name')");
122         #$this->_p(print_r($this->ns_contexts,true));
123         #$this->_p('current(' . $this->current . ')');
124
125         array_unshift($this->ns_contexts, $this->ns_decls);
126
127         $this->depth++;
128
129         if(!empty($this->in_content)) {
130
131             $this->content_ns_decls = array();
132
133             if($this->is_html || $this->is_text)
134                 trigger_error("Invalid content in element found. Content must not be of type text or html if it contains markup.");
135
136             $attrs_prefix = array();
137
138             // resolve prefixes for attributes
139             foreach($attrs as $key => $value) {
140                 $with_prefix = $this->ns_to_prefix($key, true);
141                 $attrs_prefix[$with_prefix[1]] = $this->xml_escape($value);
142             }
143
144             $attrs_str = join(' ', array_map($this->map_attrs_func, array_keys($attrs_prefix), array_values($attrs_prefix)));
145             if(strlen($attrs_str) > 0) {
146                 $attrs_str = " " . $attrs_str;
147             }
148
149             $with_prefix = $this->ns_to_prefix($name);
150
151             if(!$this->is_declared_content_ns($with_prefix[0])) {
152                 array_push($this->content_ns_decls, $with_prefix[0]);
153             }
154
155             $xmlns_str = '';
156             if(count($this->content_ns_decls) > 0) {
157                 array_unshift($this->content_ns_contexts, $this->content_ns_decls);
158                 $xmlns_str .= join(' ', array_map($this->map_xmlns_func, array_keys($this->content_ns_contexts[0]), array_values($this->content_ns_contexts[0])));
159                 if(strlen($xmlns_str) > 0) {
160                     $xmlns_str = " " . $xmlns_str;
161                 }
162             }
163
164             array_push($this->in_content, array($tag, $this->depth, "<". $with_prefix[1] ."{$xmlns_str}{$attrs_str}" . ">"));
165
166         } else if(in_array($tag, $this->ATOM_CONTENT_ELEMENTS) || in_array($tag, $this->ATOM_SIMPLE_ELEMENTS)) {
167             $this->in_content = array();
168             $this->is_xhtml = $attrs['type'] == 'xhtml';
169             $this->is_html = $attrs['type'] == 'html' || $attrs['type'] == 'text/html';
170             $this->is_text = !in_array('type',array_keys($attrs)) || $attrs['type'] == 'text';
171             $type = $this->is_xhtml ? 'XHTML' : ($this->is_html ? 'HTML' : ($this->is_text ? 'TEXT' : $attrs['type']));
172
173             if(in_array('src',array_keys($attrs))) {
174                 $this->current->$tag = $attrs;
175             } else {
176                 array_push($this->in_content, array($tag,$this->depth, $type));
177             }
178         } else if($tag == 'link') {
179             array_push($this->current->links, $attrs);
180         } else if($tag == 'category') {
181             array_push($this->current->categories, $attrs);
182         }
183
184         $this->ns_decls = array();
185     }
186
187     function end_element($parser, $name) {
188
189         $tag = array_pop(split(":", $name));
190
191         $ccount = count($this->in_content);
192
193         # if we are *in* content, then let's proceed to serialize it
194         if(!empty($this->in_content)) {
195             # if we are ending the original content element
196             # then let's finalize the content
197             if($this->in_content[0][0] == $tag &&
198                 $this->in_content[0][1] == $this->depth) {
199                 $origtype = $this->in_content[0][2];
200                 array_shift($this->in_content);
201                 $newcontent = array();
202                 foreach($this->in_content as $c) {
203                     if(count($c) == 3) {
204                         array_push($newcontent, $c[2]);
205                     } else {
206                         if($this->is_xhtml || $this->is_text) {
207                             array_push($newcontent, $this->xml_escape($c));
208                         } else {
209                             array_push($newcontent, $c);
210                         }
211                     }
212                 }
213                 if(in_array($tag, $this->ATOM_CONTENT_ELEMENTS)) {
214                     $this->current->$tag = array($origtype, join('',$newcontent));
215                 } else {
216                     $this->current->$tag = join('',$newcontent);
217                 }
218                 $this->in_content = array();
219             } else if($this->in_content[$ccount-1][0] == $tag &&
220                 $this->in_content[$ccount-1][1] == $this->depth) {
221                 $this->in_content[$ccount-1][2] = substr($this->in_content[$ccount-1][2],0,-1) . "/>";
222             } else {
223                 # else, just finalize the current element's content
224                 $endtag = $this->ns_to_prefix($name);
225                 array_push($this->in_content, array($tag, $this->depth, "</$endtag[1]>"));
226             }
227         }
228
229         array_shift($this->ns_contexts);
230
231         $this->depth--;
232
233         if($name == ($this->NS . ':entry')) {
234             array_push($this->feed->entries, $this->current);
235             $this->current = null;
236         }
237
238         $this->_p("end_element('$name')");
239     }
240
241     function start_ns($parser, $prefix, $uri) {
242         $this->_p("starting: " . $prefix . ":" . $uri);
243         array_push($this->ns_decls, array($prefix,$uri));
244     }
245
246     function end_ns($parser, $prefix) {
247         $this->_p("ending: #" . $prefix . "#");
248     }
249
250     function cdata($parser, $data) {
251         $this->_p("data: #" . str_replace(array("\n"), array("\\n"), trim($data)) . "#");
252         if(!empty($this->in_content)) {
253             array_push($this->in_content, $data);
254         }
255     }
256
257     function _default($parser, $data) {
258         # when does this gets called?
259     }
260
261
262     function ns_to_prefix($qname, $attr=false) {
263         # split 'http://www.w3.org/1999/xhtml:div' into ('http','//www.w3.org/1999/xhtml','div')
264         $components = split(":", $qname);
265
266         # grab the last one (e.g 'div')
267         $name = array_pop($components);
268
269         if(!empty($components)) {
270             # re-join back the namespace component
271             $ns = join(":",$components);
272             foreach($this->ns_contexts as $context) {
273                 foreach($context as $mapping) {
274                     if($mapping[1] == $ns && strlen($mapping[0]) > 0) {
275                         return array($mapping, "$mapping[0]:$name");
276                     }
277                 }
278             }
279         }
280
281         if($attr) {
282             return array(null, $name);
283         } else {
284             foreach($this->ns_contexts as $context) {
285                 foreach($context as $mapping) {
286                     if(strlen($mapping[0]) == 0) {
287                         return array($mapping, $name);
288                     }
289                 }
290             }
291         }
292     }
293
294     function is_declared_content_ns($new_mapping) {
295         foreach($this->content_ns_contexts as $context) {
296             foreach($context as $mapping) {
297                 if($new_mapping == $mapping) {
298                     return true;
299                 }
300             }
301         }
302         return false;
303     }
304
305     function xml_escape($string)
306     {
307              return str_replace(array('&','"',"'",'<','>'),
308                 array('&amp;','&quot;','&apos;','&lt;','&gt;'),
309                 $string );
310     }
311 }
312
313 ?>