Search moodle.org's
Developer Documentation

See Release Notes
Long Term Support Release

  • Bug fixes for general core bugs in 3.9.x will end* 10 May 2021 (12 months).
  • Bug fixes for security issues in 3.9.x will end* 8 May 2023 (36 months).
  • PHP version: minimum PHP 7.2.0 Note: minimum PHP version has increased since Moodle 3.8. PHP 7.3.x and 7.4.x are supported too.

Differences Between: [Versions 39 and 311] [Versions 39 and 400] [Versions 39 and 401] [Versions 39 and 402] [Versions 39 and 403]

   1  <?php
   2  /**
   3   * SimplePie
   4   *
   5   * A PHP-Based RSS and Atom Feed Framework.
   6   * Takes the hard work out of managing a complete RSS/Atom solution.
   7   *
   8   * Copyright (c) 2004-2016, Ryan Parman, Geoffrey Sneddon, Ryan McCue, and contributors
   9   * All rights reserved.
  10   *
  11   * Redistribution and use in source and binary forms, with or without modification, are
  12   * permitted provided that the following conditions are met:
  13   *
  14   * 	 * Redistributions of source code must retain the above copyright notice, this list of
  15   * 	   conditions and the following disclaimer.
  16   *
  17   * 	 * Redistributions in binary form must reproduce the above copyright notice, this list
  18   * 	   of conditions and the following disclaimer in the documentation and/or other materials
  19   * 	   provided with the distribution.
  20   *
  21   * 	 * Neither the name of the SimplePie Team nor the names of its contributors may be used
  22   * 	   to endorse or promote products derived from this software without specific prior
  23   * 	   written permission.
  24   *
  25   * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND ANY EXPRESS
  26   * OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY
  27   * AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDERS
  28   * AND CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
  29   * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
  30   * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  31   * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
  32   * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
  33   * POSSIBILITY OF SUCH DAMAGE.
  34   *
  35   * @package SimplePie
  36   * @copyright 2004-2016 Ryan Parman, Geoffrey Sneddon, Ryan McCue
  37   * @author Ryan Parman
  38   * @author Geoffrey Sneddon
  39   * @author Ryan McCue
  40   * @link http://simplepie.org/ SimplePie
  41   * @license http://www.opensource.org/licenses/bsd-license.php BSD License
  42   */
  43  
  44  /**
  45   * Parses XML into something sane
  46   *
  47   *
  48   * This class can be overloaded with {@see SimplePie::set_parser_class()}
  49   *
  50   * @package SimplePie
  51   * @subpackage Parsing
  52   */
  53  class SimplePie_Parser
  54  {
  55  	 var $error_code;
  56  	 var $error_string;
  57  	 var $current_line;
  58  	 var $current_column;
  59  	 var $current_byte;
  60  	 var $separator = ' ';
  61  	 var $namespace = array('');
  62  	 var $element = array('');
  63  	 var $xml_base = array('');
  64  	 var $xml_base_explicit = array(false);
  65  	 var $xml_lang = array('');
  66  	 var $data = array();
  67  	 var $datas = array(array());
  68  	 var $current_xhtml_construct = -1;
  69  	 var $encoding;
  70  	 protected $registry;
  71  
  72  	public function set_registry(SimplePie_Registry $registry)
  73  	 {
  74  	 	 $this->registry = $registry;
  75  	 }
  76  
  77  	public function parse(&$data, $encoding, $url = '')
  78  	 {
  79  	 	 if (class_exists('DOMXpath') && function_exists('Mf2\parse')) {
  80  	 	 	 $doc = new DOMDocument();
  81  	 	 	 @$doc->loadHTML($data);
  82  	 	 	 $xpath = new DOMXpath($doc);
  83  	 	 	 // Check for both h-feed and h-entry, as both a feed with no entries
  84  	 	 	 // and a list of entries without an h-feed wrapper are both valid.
  85  	 	 	 $query = '//*[contains(concat(" ", @class, " "), " h-feed ") or '.
  86  	 	 	 	 'contains(concat(" ", @class, " "), " h-entry ")]';
  87  	 	 	 $result = $xpath->query($query);
  88  	 	 	 if ($result->length !== 0) {
  89  	 	 	 	 return $this->parse_microformats($data, $url);
  90  	 	 	 }
  91  	 	 }
  92  
  93  	 	 // Use UTF-8 if we get passed US-ASCII, as every US-ASCII character is a UTF-8 character
  94  	 	 if (strtoupper($encoding) === 'US-ASCII')
  95  	 	 {
  96  	 	 	 $this->encoding = 'UTF-8';
  97  	 	 }
  98  	 	 else
  99  	 	 {
 100  	 	 	 $this->encoding = $encoding;
 101  	 	 }
 102  
 103  	 	 // Strip BOM:
 104  	 	 // UTF-32 Big Endian BOM
 105  	 	 if (substr($data, 0, 4) === "\x00\x00\xFE\xFF")
 106  	 	 {
 107  	 	 	 $data = substr($data, 4);
 108  	 	 }
 109  	 	 // UTF-32 Little Endian BOM
 110  	 	 elseif (substr($data, 0, 4) === "\xFF\xFE\x00\x00")
 111  	 	 {
 112  	 	 	 $data = substr($data, 4);
 113  	 	 }
 114  	 	 // UTF-16 Big Endian BOM
 115  	 	 elseif (substr($data, 0, 2) === "\xFE\xFF")
 116  	 	 {
 117  	 	 	 $data = substr($data, 2);
 118  	 	 }
 119  	 	 // UTF-16 Little Endian BOM
 120  	 	 elseif (substr($data, 0, 2) === "\xFF\xFE")
 121  	 	 {
 122  	 	 	 $data = substr($data, 2);
 123  	 	 }
 124  	 	 // UTF-8 BOM
 125  	 	 elseif (substr($data, 0, 3) === "\xEF\xBB\xBF")
 126  	 	 {
 127  	 	 	 $data = substr($data, 3);
 128  	 	 }
 129  
 130  	 	 if (substr($data, 0, 5) === '<?xml' && strspn(substr($data, 5, 1), "\x09\x0A\x0D\x20") && ($pos = strpos($data, '?>')) !== false)
 131  	 	 {
 132  	 	 	 $declaration = $this->registry->create('XML_Declaration_Parser', array(substr($data, 5, $pos - 5)));
 133  	 	 	 if ($declaration->parse())
 134  	 	 	 {
 135  	 	 	 	 $data = substr($data, $pos + 2);
 136  	 	 	 	 $data = '<?xml version="' . $declaration->version . '" encoding="' . $encoding . '" standalone="' . (($declaration->standalone) ? 'yes' : 'no') . '"?>' ."\n". $this->declare_html_entities() . $data;
 137  	 	 	 }
 138  	 	 	 else
 139  	 	 	 {
 140  	 	 	 	 $this->error_string = 'SimplePie bug! Please report this!';
 141  	 	 	 	 return false;
 142  	 	 	 }
 143  	 	 }
 144  
 145  	 	 $return = true;
 146  
 147  	 	 static $xml_is_sane = null;
 148  	 	 if ($xml_is_sane === null)
 149  	 	 {
 150  	 	 	 $parser_check = xml_parser_create();
 151  	 	 	 xml_parse_into_struct($parser_check, '<foo>&amp;</foo>', $values);
 152  	 	 	 xml_parser_free($parser_check);
 153  	 	 	 $xml_is_sane = isset($values[0]['value']);
 154  	 	 }
 155  
 156  	 	 // Create the parser
 157  	 	 if ($xml_is_sane)
 158  	 	 {
 159  	 	 	 $xml = xml_parser_create_ns($this->encoding, $this->separator);
 160  	 	 	 xml_parser_set_option($xml, XML_OPTION_SKIP_WHITE, 1);
 161  	 	 	 xml_parser_set_option($xml, XML_OPTION_CASE_FOLDING, 0);
 162  	 	 	 xml_set_object($xml, $this);
 163  	 	 	 xml_set_character_data_handler($xml, 'cdata');
 164  	 	 	 xml_set_element_handler($xml, 'tag_open', 'tag_close');
 165  
 166  	 	 	 // Parse!
 167  	 	 	 if (!xml_parse($xml, $data, true))
 168  	 	 	 {
 169  	 	 	 	 $this->error_code = xml_get_error_code($xml);
 170  	 	 	 	 $this->error_string = xml_error_string($this->error_code);
 171  	 	 	 	 $return = false;
 172  	 	 	 }
 173  	 	 	 $this->current_line = xml_get_current_line_number($xml);
 174  	 	 	 $this->current_column = xml_get_current_column_number($xml);
 175  	 	 	 $this->current_byte = xml_get_current_byte_index($xml);
 176  	 	 	 xml_parser_free($xml);
 177  	 	 	 return $return;
 178  	 	 }
 179  
 180  	 	 libxml_clear_errors();
 181  	 	 $xml = new XMLReader();
 182  	 	 $xml->xml($data);
 183  	 	 while (@$xml->read())
 184  	 	 {
 185  	 	 	 switch ($xml->nodeType)
 186  	 	 	 {
 187  
 188  	 	 	 	 case constant('XMLReader::END_ELEMENT'):
 189  	 	 	 	 	 if ($xml->namespaceURI !== '')
 190  	 	 	 	 	 {
 191  	 	 	 	 	 	 $tagName = $xml->namespaceURI . $this->separator . $xml->localName;
 192  	 	 	 	 	 }
 193  	 	 	 	 	 else
 194  	 	 	 	 	 {
 195  	 	 	 	 	 	 $tagName = $xml->localName;
 196  	 	 	 	 	 }
 197  	 	 	 	 	 $this->tag_close(null, $tagName);
 198  	 	 	 	 	 break;
 199  	 	 	 	 case constant('XMLReader::ELEMENT'):
 200  	 	 	 	 	 $empty = $xml->isEmptyElement;
 201  	 	 	 	 	 if ($xml->namespaceURI !== '')
 202  	 	 	 	 	 {
 203  	 	 	 	 	 	 $tagName = $xml->namespaceURI . $this->separator . $xml->localName;
 204  	 	 	 	 	 }
 205  	 	 	 	 	 else
 206  	 	 	 	 	 {
 207  	 	 	 	 	 	 $tagName = $xml->localName;
 208  	 	 	 	 	 }
 209  	 	 	 	 	 $attributes = array();
 210  	 	 	 	 	 while ($xml->moveToNextAttribute())
 211  	 	 	 	 	 {
 212  	 	 	 	 	 	 if ($xml->namespaceURI !== '')
 213  	 	 	 	 	 	 {
 214  	 	 	 	 	 	 	 $attrName = $xml->namespaceURI . $this->separator . $xml->localName;
 215  	 	 	 	 	 	 }
 216  	 	 	 	 	 	 else
 217  	 	 	 	 	 	 {
 218  	 	 	 	 	 	 	 $attrName = $xml->localName;
 219  	 	 	 	 	 	 }
 220  	 	 	 	 	 	 $attributes[$attrName] = $xml->value;
 221  	 	 	 	 	 }
 222  	 	 	 	 	 $this->tag_open(null, $tagName, $attributes);
 223  	 	 	 	 	 if ($empty)
 224  	 	 	 	 	 {
 225  	 	 	 	 	 	 $this->tag_close(null, $tagName);
 226  	 	 	 	 	 }
 227  	 	 	 	 	 break;
 228  	 	 	 	 case constant('XMLReader::TEXT'):
 229  
 230  	 	 	 	 case constant('XMLReader::CDATA'):
 231  	 	 	 	 	 $this->cdata(null, $xml->value);
 232  	 	 	 	 	 break;
 233  	 	 	 }
 234  	 	 }
 235  	 	 if ($error = libxml_get_last_error())
 236  	 	 {
 237  	 	 	 $this->error_code = $error->code;
 238  	 	 	 $this->error_string = $error->message;
 239  	 	 	 $this->current_line = $error->line;
 240  	 	 	 $this->current_column = $error->column;
 241  	 	 	 return false;
 242  	 	 }
 243  
 244  	 	 return true;
 245  	 }
 246  
 247  	 public function get_error_code()
 248  	 {
 249  	 	 return $this->error_code;
 250  	 }
 251  
 252  	 public function get_error_string()
 253  	 {
 254  	 	 return $this->error_string;
 255  	 }
 256  
 257  	 public function get_current_line()
 258  	 {
 259  	 	 return $this->current_line;
 260  	 }
 261  
 262  	 public function get_current_column()
 263  	 {
 264  	 	 return $this->current_column;
 265  	 }
 266  
 267  	 public function get_current_byte()
 268  	 {
 269  	 	 return $this->current_byte;
 270  	 }
 271  
 272  	 public function get_data()
 273  	 {
 274  	 	 return $this->data;
 275  	 }
 276  
 277  	 public function tag_open($parser, $tag, $attributes)
 278  	 {
 279  	 	 list($this->namespace[], $this->element[]) = $this->split_ns($tag);
 280  
 281  	 	 $attribs = array();
 282  	 	 foreach ($attributes as $name => $value)
 283  	 	 {
 284  	 	 	 list($attrib_namespace, $attribute) = $this->split_ns($name);
 285  	 	 	 $attribs[$attrib_namespace][$attribute] = $value;
 286  	 	 }
 287  
 288  	 	 if (isset($attribs[SIMPLEPIE_NAMESPACE_XML]['base']))
 289  	 	 {
 290  	 	 	 $base = $this->registry->call('Misc', 'absolutize_url', array($attribs[SIMPLEPIE_NAMESPACE_XML]['base'], end($this->xml_base)));
 291  	 	 	 if ($base !== false)
 292  	 	 	 {
 293  	 	 	 	 $this->xml_base[] = $base;
 294  	 	 	 	 $this->xml_base_explicit[] = true;
 295  	 	 	 }
 296  	 	 }
 297  	 	 else
 298  	 	 {
 299  	 	 	 $this->xml_base[] = end($this->xml_base);
 300  	 	 	 $this->xml_base_explicit[] = end($this->xml_base_explicit);
 301  	 	 }
 302  
 303  	 	 if (isset($attribs[SIMPLEPIE_NAMESPACE_XML]['lang']))
 304  	 	 {
 305  	 	 	 $this->xml_lang[] = $attribs[SIMPLEPIE_NAMESPACE_XML]['lang'];
 306  	 	 }
 307  	 	 else
 308  	 	 {
 309  	 	 	 $this->xml_lang[] = end($this->xml_lang);
 310  	 	 }
 311  
 312  	 	 if ($this->current_xhtml_construct >= 0)
 313  	 	 {
 314  	 	 	 $this->current_xhtml_construct++;
 315  	 	 	 if (end($this->namespace) === SIMPLEPIE_NAMESPACE_XHTML)
 316  	 	 	 {
 317  	 	 	 	 $this->data['data'] .= '<' . end($this->element);
 318  	 	 	 	 if (isset($attribs['']))
 319  	 	 	 	 {
 320  	 	 	 	 	 foreach ($attribs[''] as $name => $value)
 321  	 	 	 	 	 {
 322  	 	 	 	 	 	 $this->data['data'] .= ' ' . $name . '="' . htmlspecialchars($value, ENT_COMPAT, $this->encoding) . '"';
 323  	 	 	 	 	 }
 324  	 	 	 	 }
 325  	 	 	 	 $this->data['data'] .= '>';
 326  	 	 	 }
 327  	 	 }
 328  	 	 else
 329  	 	 {
 330  	 	 	 $this->datas[] =& $this->data;
 331  	 	 	 $this->data =& $this->data['child'][end($this->namespace)][end($this->element)][];
 332  	 	 	 $this->data = array('data' => '', 'attribs' => $attribs, 'xml_base' => end($this->xml_base), 'xml_base_explicit' => end($this->xml_base_explicit), 'xml_lang' => end($this->xml_lang));
 333  	 	 	 if ((end($this->namespace) === SIMPLEPIE_NAMESPACE_ATOM_03 && in_array(end($this->element), array('title', 'tagline', 'copyright', 'info', 'summary', 'content')) && isset($attribs['']['mode']) && $attribs['']['mode'] === 'xml')
 334  	 	 	 || (end($this->namespace) === SIMPLEPIE_NAMESPACE_ATOM_10 && in_array(end($this->element), array('rights', 'subtitle', 'summary', 'info', 'title', 'content')) && isset($attribs['']['type']) && $attribs['']['type'] === 'xhtml')
 335  	 	 	 || (end($this->namespace) === SIMPLEPIE_NAMESPACE_RSS_20 && in_array(end($this->element), array('title')))
 336  	 	 	 || (end($this->namespace) === SIMPLEPIE_NAMESPACE_RSS_090 && in_array(end($this->element), array('title')))
 337  	 	 	 || (end($this->namespace) === SIMPLEPIE_NAMESPACE_RSS_10 && in_array(end($this->element), array('title'))))
 338  	 	 	 {
 339  	 	 	 	 $this->current_xhtml_construct = 0;
 340  	 	 	 }
 341  	 	 }
 342  	 }
 343  
 344  	 public function cdata($parser, $cdata)
 345  	 {
 346  	 	 if ($this->current_xhtml_construct >= 0)
 347  	 	 {
 348  	 	 	 $this->data['data'] .= htmlspecialchars($cdata, ENT_QUOTES, $this->encoding);
 349  	 	 }
 350  	 	 else
 351  	 	 {
 352  	 	 	 $this->data['data'] .= $cdata;
 353  	 	 }
 354  	 }
 355  
 356  	 public function tag_close($parser, $tag)
 357  	 {
 358  	 	 if ($this->current_xhtml_construct >= 0)
 359  	 	 {
 360  	 	 	 $this->current_xhtml_construct--;
 361  	 	 	 if (end($this->namespace) === SIMPLEPIE_NAMESPACE_XHTML && !in_array(end($this->element), array('area', 'base', 'basefont', 'br', 'col', 'frame', 'hr', 'img', 'input', 'isindex', 'link', 'meta', 'param')))
 362  	 	 	 {
 363  	 	 	 	 $this->data['data'] .= '</' . end($this->element) . '>';
 364  	 	 	 }
 365  	 	 }
 366  	 	 if ($this->current_xhtml_construct === -1)
 367  	 	 {
 368  	 	 	 $this->data =& $this->datas[count($this->datas) - 1];
 369  	 	 	 array_pop($this->datas);
 370  	 	 }
 371  
 372  	 	 array_pop($this->element);
 373  	 	 array_pop($this->namespace);
 374  	 	 array_pop($this->xml_base);
 375  	 	 array_pop($this->xml_base_explicit);
 376  	 	 array_pop($this->xml_lang);
 377  	 }
 378  
 379  	 public function split_ns($string)
 380  	 {
 381  	 	 static $cache = array();
 382  	 	 if (!isset($cache[$string]))
 383  	 	 {
 384  	 	 	 if ($pos = strpos($string, $this->separator))
 385  	 	 	 {
 386  	 	 	 	 static $separator_length;
 387  	 	 	 	 if (!$separator_length)
 388  	 	 	 	 {
 389  	 	 	 	 	 $separator_length = strlen($this->separator);
 390  	 	 	 	 }
 391  	 	 	 	 $namespace = substr($string, 0, $pos);
 392  	 	 	 	 $local_name = substr($string, $pos + $separator_length);
 393  	 	 	 	 if (strtolower($namespace) === SIMPLEPIE_NAMESPACE_ITUNES)
 394  	 	 	 	 {
 395  	 	 	 	 	 $namespace = SIMPLEPIE_NAMESPACE_ITUNES;
 396  	 	 	 	 }
 397  
 398  	 	 	 	 // Normalize the Media RSS namespaces
 399  	 	 	 	 if ($namespace === SIMPLEPIE_NAMESPACE_MEDIARSS_WRONG ||
 400  	 	 	 	 	 $namespace === SIMPLEPIE_NAMESPACE_MEDIARSS_WRONG2 ||
 401  	 	 	 	 	 $namespace === SIMPLEPIE_NAMESPACE_MEDIARSS_WRONG3 ||
 402  	 	 	 	 	 $namespace === SIMPLEPIE_NAMESPACE_MEDIARSS_WRONG4 ||
 403  	 	 	 	 	 $namespace === SIMPLEPIE_NAMESPACE_MEDIARSS_WRONG5 )
 404  	 	 	 	 {
 405  	 	 	 	 	 $namespace = SIMPLEPIE_NAMESPACE_MEDIARSS;
 406  	 	 	 	 }
 407  	 	 	 	 $cache[$string] = array($namespace, $local_name);
 408  	 	 	 }
 409  	 	 	 else
 410  	 	 	 {
 411  	 	 	 	 $cache[$string] = array('', $string);
 412  	 	 	 }
 413  	 	 }
 414  	 	 return $cache[$string];
 415  	 }
 416  
 417  	 private function parse_hcard($data, $category = false) {
 418  	 	 $name = '';
 419  	 	 $link = '';
 420  	 	 // Check if h-card is set and pass that information on in the link.
 421  	 	 if (isset($data['type']) && in_array('h-card', $data['type'])) {
 422  	 	 	 if (isset($data['properties']['name'][0])) {
 423  	 	 	 	 $name = $data['properties']['name'][0];
 424  	 	 	 }
 425  	 	 	 if (isset($data['properties']['url'][0])) {
 426  	 	 	 	 $link = $data['properties']['url'][0];
 427  	 	 	 	 if ($name === '') {
 428  	 	 	 	 	 $name = $link;
 429  	 	 	 	 }
 430  	 	 	 	 else {
 431  	 	 	 	 	 // can't have commas in categories.
 432  	 	 	 	 	 $name = str_replace(',', '', $name);
 433  	 	 	 	 }
 434  	 	 	 	 $person_tag = $category ? '<span class="person-tag"></span>' : '';
 435  	 	 	 	 return '<a class="h-card" href="'.$link.'">'.$person_tag.$name.'</a>';
 436  	 	 	 }
 437  	 	 }
 438  	 	 return isset($data['value']) ? $data['value'] : '';
 439  	 }
 440  
 441  	 private function parse_microformats(&$data, $url) {
 442  	 	 $feed_title = '';
 443  	 	 $feed_author = NULL;
 444  	 	 $author_cache = array();
 445  	 	 $items = array();
 446  	 	 $entries = array();
 447  	 	 $mf = Mf2\parse($data, $url);
 448  	 	 // First look for an h-feed.
 449  	 	 $h_feed = array();
 450  	 	 foreach ($mf['items'] as $mf_item) {
 451  	 	 	 if (in_array('h-feed', $mf_item['type'])) {
 452  	 	 	 	 $h_feed = $mf_item;
 453  	 	 	 	 break;
 454  	 	 	 }
 455  	 	 	 // Also look for h-feed or h-entry in the children of each top level item.
 456  	 	 	 if (!isset($mf_item['children'][0]['type'])) continue;
 457  	 	 	 if (in_array('h-feed', $mf_item['children'][0]['type'])) {
 458  	 	 	 	 $h_feed = $mf_item['children'][0];
 459  	 	 	 	 // In this case the parent of the h-feed may be an h-card, so use it as
 460  	 	 	 	 // the feed_author.
 461  	 	 	 	 if (in_array('h-card', $mf_item['type'])) $feed_author = $mf_item;
 462  	 	 	 	 break;
 463  	 	 	 }
 464  	 	 	 else if (in_array('h-entry', $mf_item['children'][0]['type'])) {
 465  	 	 	 	 $entries = $mf_item['children'];
 466  	 	 	 	 // In this case the parent of the h-entry list may be an h-card, so use
 467  	 	 	 	 // it as the feed_author.
 468  	 	 	 	 if (in_array('h-card', $mf_item['type'])) $feed_author = $mf_item;
 469  	 	 	 	 break;
 470  	 	 	 }
 471  	 	 }
 472  	 	 if (isset($h_feed['children'])) {
 473  	 	 	 $entries = $h_feed['children'];
 474  	 	 	 // Also set the feed title and store author from the h-feed if available.
 475  	 	 	 if (isset($mf['items'][0]['properties']['name'][0])) {
 476  	 	 	 	 $feed_title = $mf['items'][0]['properties']['name'][0];
 477  	 	 	 }
 478  	 	 	 if (isset($mf['items'][0]['properties']['author'][0])) {
 479  	 	 	 	 $feed_author = $mf['items'][0]['properties']['author'][0];
 480  	 	 	 }
 481  	 	 }
 482  	 	 else if (count($entries) === 0) {
 483  	 	 	 $entries = $mf['items'];
 484  	 	 }
 485  	 	 for ($i = 0; $i < count($entries); $i++) {
 486  	 	 	 $entry = $entries[$i];
 487  	 	 	 if (in_array('h-entry', $entry['type'])) {
 488  	 	 	 	 $item = array();
 489  	 	 	 	 $title = '';
 490  	 	 	 	 $description = '';
 491  	 	 	 	 if (isset($entry['properties']['url'][0])) {
 492  	 	 	 	 	 $link = $entry['properties']['url'][0];
 493  	 	 	 	 	 if (isset($link['value'])) $link = $link['value'];
 494  	 	 	 	 	 $item['link'] = array(array('data' => $link));
 495  	 	 	 	 }
 496  	 	 	 	 if (isset($entry['properties']['uid'][0])) {
 497  	 	 	 	 	 $guid = $entry['properties']['uid'][0];
 498  	 	 	 	 	 if (isset($guid['value'])) $guid = $guid['value'];
 499  	 	 	 	 	 $item['guid'] = array(array('data' => $guid));
 500  	 	 	 	 }
 501  	 	 	 	 if (isset($entry['properties']['name'][0])) {
 502  	 	 	 	 	 $title = $entry['properties']['name'][0];
 503  	 	 	 	 	 if (isset($title['value'])) $title = $title['value'];
 504  	 	 	 	 	 $item['title'] = array(array('data' => $title));
 505  	 	 	 	 }
 506  	 	 	 	 if (isset($entry['properties']['author'][0]) || isset($feed_author)) {
 507  	 	 	 	 	 // author is a special case, it can be plain text or an h-card array.
 508  	 	 	 	 	 // If it's plain text it can also be a url that should be followed to
 509  	 	 	 	 	 // get the actual h-card.
 510  	 	 	 	 	 $author = isset($entry['properties']['author'][0]) ?
 511  	 	 	 	 	 	 $entry['properties']['author'][0] : $feed_author;
 512  	 	 	 	 	 if (!is_string($author)) {
 513  	 	 	 	 	 	 $author = $this->parse_hcard($author);
 514  	 	 	 	 	 }
 515  	 	 	 	 	 else if (strpos($author, 'http') === 0) {
 516  	 	 	 	 	 	 if (isset($author_cache[$author])) {
 517  	 	 	 	 	 	 	 $author = $author_cache[$author];
 518  	 	 	 	 	 	 }
 519  	 	 	 	 	 	 else {
 520  	 	 	 	 	 	 	 $mf = Mf2\fetch($author);
 521  	 	 	 	 	 	 	 foreach ($mf['items'] as $hcard) {
 522  	 	 	 	 	 	 	 	 // Only interested in an h-card by itself in this case.
 523  	 	 	 	 	 	 	 	 if (!in_array('h-card', $hcard['type'])) {
 524  	 	 	 	 	 	 	 	 	 continue;
 525  	 	 	 	 	 	 	 	 }
 526  	 	 	 	 	 	 	 	 // It must have a url property matching what we fetched.
 527  	 	 	 	 	 	 	 	 if (!isset($hcard['properties']['url']) ||
 528  	 	 	 	 	 	 	 	 	 	 !(in_array($author, $hcard['properties']['url']))) {
 529  	 	 	 	 	 	 	 	 	 continue;
 530  	 	 	 	 	 	 	 	 }
 531  	 	 	 	 	 	 	 	 // Save parse_hcard the trouble of finding the correct url.
 532  	 	 	 	 	 	 	 	 $hcard['properties']['url'][0] = $author;
 533  	 	 	 	 	 	 	 	 // Cache this h-card for the next h-entry to check.
 534  	 	 	 	 	 	 	 	 $author_cache[$author] = $this->parse_hcard($hcard);
 535  	 	 	 	 	 	 	 	 $author = $author_cache[$author];
 536  	 	 	 	 	 	 	 	 break;
 537  	 	 	 	 	 	 	 }
 538  	 	 	 	 	 	 }
 539  	 	 	 	 	 }
 540  	 	 	 	 	 $item['author'] = array(array('data' => $author));
 541  	 	 	 	 }
 542  	 	 	 	 if (isset($entry['properties']['photo'][0])) {
 543  	 	 	 	 	 // If a photo is also in content, don't need to add it again here.
 544  	 	 	 	 	 $content = '';
 545  	 	 	 	 	 if (isset($entry['properties']['content'][0]['html'])) {
 546  	 	 	 	 	 	 $content = $entry['properties']['content'][0]['html'];
 547  	 	 	 	 	 }
 548  	 	 	 	 	 $photo_list = array();
 549  	 	 	 	 	 for ($j = 0; $j < count($entry['properties']['photo']); $j++) {
 550  	 	 	 	 	 	 $photo = $entry['properties']['photo'][$j];
 551  	 	 	 	 	 	 if (!empty($photo) && strpos($content, $photo) === false) {
 552  	 	 	 	 	 	 	 $photo_list[] = $photo;
 553  	 	 	 	 	 	 }
 554  	 	 	 	 	 }
 555  	 	 	 	 	 // When there's more than one photo show the first and use a lightbox.
 556  	 	 	 	 	 // Need a permanent, unique name for the image set, but don't have
 557  	 	 	 	 	 // anything unique except for the content itself, so use that.
 558  	 	 	 	 	 $count = count($photo_list);
 559  	 	 	 	 	 if ($count > 1) {
 560  	 	 	 	 	 	 $image_set_id = preg_replace('/[[:^alnum:]]/', '', $photo_list[0]);
 561  	 	 	 	 	 	 $description = '<p>';
 562  	 	 	 	 	 	 for ($j = 0; $j < $count; $j++) {
 563  	 	 	 	 	 	 	 $hidden = $j === 0 ? '' : 'class="hidden" ';
 564  	 	 	 	 	 	 	 $description .= '<a href="'.$photo_list[$j].'" '.$hidden.
 565  	 	 	 	 	 	 	 	 'data-lightbox="image-set-'.$image_set_id.'">'.
 566  	 	 	 	 	 	 	 	 '<img src="'.$photo_list[$j].'"></a>';
 567  	 	 	 	 	 	 }
 568  	 	 	 	 	 	 $description .= '<br><b>'.$count.' photos</b></p>';
 569  	 	 	 	 	 }
 570  	 	 	 	 	 else if ($count == 1) {
 571  	 	 	 	 	 	 $description = '<p><img src="'.$photo_list[0].'"></p>';
 572  	 	 	 	 	 }
 573  	 	 	 	 }
 574  	 	 	 	 if (isset($entry['properties']['content'][0]['html'])) {
 575  	 	 	 	 	 // e-content['value'] is the same as p-name when they are on the same
 576  	 	 	 	 	 // element. Use this to replace title with a strip_tags version so
 577  	 	 	 	 	 // that alt text from images is not included in the title.
 578  	 	 	 	 	 if ($entry['properties']['content'][0]['value'] === $title) {
 579  	 	 	 	 	 	 $title = strip_tags($entry['properties']['content'][0]['html']);
 580  	 	 	 	 	 	 $item['title'] = array(array('data' => $title));
 581  	 	 	 	 	 }
 582  	 	 	 	 	 $description .= $entry['properties']['content'][0]['html'];
 583  	 	 	 	 	 if (isset($entry['properties']['in-reply-to'][0])) {
 584  	 	 	 	 	 	 $in_reply_to = '';
 585  	 	 	 	 	 	 if (is_string($entry['properties']['in-reply-to'][0])) {
 586  	 	 	 	 	 	 	 $in_reply_to = $entry['properties']['in-reply-to'][0];
 587  	 	 	 	 	 	 }
 588  	 	 	 	 	 	 else if (isset($entry['properties']['in-reply-to'][0]['value'])) {
 589  	 	 	 	 	 	 	 $in_reply_to = $entry['properties']['in-reply-to'][0]['value'];
 590  	 	 	 	 	 	 }
 591  	 	 	 	 	 	 if ($in_reply_to !== '') {
 592  	 	 	 	 	 	 	 $description .= '<p><span class="in-reply-to"></span> '.
 593  	 	 	 	 	 	 	 	 '<a href="'.$in_reply_to.'">'.$in_reply_to.'</a><p>';
 594  	 	 	 	 	 	 }
 595  	 	 	 	 	 }
 596  	 	 	 	 	 $item['description'] = array(array('data' => $description));
 597  	 	 	 	 }
 598  	 	 	 	 if (isset($entry['properties']['category'])) {
 599  	 	 	 	 	 $category_csv = '';
 600  	 	 	 	 	 // Categories can also contain h-cards.
 601  	 	 	 	 	 foreach ($entry['properties']['category'] as $category) {
 602  	 	 	 	 	 	 if ($category_csv !== '') $category_csv .= ', ';
 603  	 	 	 	 	 	 if (is_string($category)) {
 604  	 	 	 	 	 	 	 // Can't have commas in categories.
 605  	 	 	 	 	 	 	 $category_csv .= str_replace(',', '', $category);
 606  	 	 	 	 	 	 }
 607  	 	 	 	 	 	 else {
 608  	 	 	 	 	 	 	 $category_csv .= $this->parse_hcard($category, true);
 609  	 	 	 	 	 	 }
 610  	 	 	 	 	 }
 611  	 	 	 	 	 $item['category'] = array(array('data' => $category_csv));
 612  	 	 	 	 }
 613  	 	 	 	 if (isset($entry['properties']['published'][0])) {
 614  	 	 	 	 	 $timestamp = strtotime($entry['properties']['published'][0]);
 615  	 	 	 	 	 $pub_date = date('F j Y g:ia', $timestamp).' GMT';
 616  	 	 	 	 	 $item['pubDate'] = array(array('data' => $pub_date));
 617  	 	 	 	 }
 618  	 	 	 	 // The title and description are set to the empty string to represent
 619  	 	 	 	 // a deleted item (which also makes it an invalid rss item).
 620  	 	 	 	 if (isset($entry['properties']['deleted'][0])) {
 621  	 	 	 	 	 $item['title'] = array(array('data' => ''));
 622  	 	 	 	 	 $item['description'] = array(array('data' => ''));
 623  	 	 	 	 }
 624  	 	 	 	 $items[] = array('child' => array('' => $item));
 625  	 	 	 }
 626  	 	 }
 627  	 	 // Mimic RSS data format when storing microformats.
 628  	 	 $link = array(array('data' => $url));
 629  	 	 $image = '';
 630  	 	 if (!is_string($feed_author) &&
 631  	 	 	 	 isset($feed_author['properties']['photo'][0])) {
 632  	 	 	 $image = array(array('child' => array('' => array('url' =>
 633  	 	 	 	 array(array('data' => $feed_author['properties']['photo'][0]))))));
 634  	 	 }
 635  	 	 // Use the name given for the h-feed, or get the title from the html.
 636  	 	 if ($feed_title !== '') {
 637  	 	 	 $feed_title = array(array('data' => htmlspecialchars($feed_title)));
 638  	 	 }
 639  	 	 else if ($position = strpos($data, '<title>')) {
 640  	 	 	 $start = $position < 200 ? 0 : $position - 200;
 641  	 	 	 $check = substr($data, $start, 400);
 642  	 	 	 $matches = array();
 643  	 	 	 if (preg_match('/<title>(.+)<\/title>/', $check, $matches)) {
 644  	 	 	 	 $feed_title = array(array('data' => htmlspecialchars($matches[1])));
 645  	 	 	 }
 646  	 	 }
 647  	 	 $channel = array('channel' => array(array('child' => array('' =>
 648  	 	 	 array('link' => $link, 'image' => $image, 'title' => $feed_title,
 649  	 	 	       'item' => $items)))));
 650  	 	 $rss = array(array('attribs' => array('' => array('version' => '2.0')),
 651  	 	                    'child' => array('' => $channel)));
 652  	 	 $this->data = array('child' => array('' => array('rss' => $rss)));
 653  	 	 return true;
 654  	 }
 655  
 656  	 private function declare_html_entities() {
 657  	 	 // This is required because the RSS specification says that entity-encoded
 658  	 	 // html is allowed, but the xml specification says they must be declared.
 659  	 	 return '<!DOCTYPE html [ <!ENTITY nbsp "&#x00A0;"> <!ENTITY iexcl "&#x00A1;"> <!ENTITY cent "&#x00A2;"> <!ENTITY pound "&#x00A3;"> <!ENTITY curren "&#x00A4;"> <!ENTITY yen "&#x00A5;"> <!ENTITY brvbar "&#x00A6;"> <!ENTITY sect "&#x00A7;"> <!ENTITY uml "&#x00A8;"> <!ENTITY copy "&#x00A9;"> <!ENTITY ordf "&#x00AA;"> <!ENTITY laquo "&#x00AB;"> <!ENTITY not "&#x00AC;"> <!ENTITY shy "&#x00AD;"> <!ENTITY reg "&#x00AE;"> <!ENTITY macr "&#x00AF;"> <!ENTITY deg "&#x00B0;"> <!ENTITY plusmn "&#x00B1;"> <!ENTITY sup2 "&#x00B2;"> <!ENTITY sup3 "&#x00B3;"> <!ENTITY acute "&#x00B4;"> <!ENTITY micro "&#x00B5;"> <!ENTITY para "&#x00B6;"> <!ENTITY middot "&#x00B7;"> <!ENTITY cedil "&#x00B8;"> <!ENTITY sup1 "&#x00B9;"> <!ENTITY ordm "&#x00BA;"> <!ENTITY raquo "&#x00BB;"> <!ENTITY frac14 "&#x00BC;"> <!ENTITY frac12 "&#x00BD;"> <!ENTITY frac34 "&#x00BE;"> <!ENTITY iquest "&#x00BF;"> <!ENTITY Agrave "&#x00C0;"> <!ENTITY Aacute "&#x00C1;"> <!ENTITY Acirc "&#x00C2;"> <!ENTITY Atilde "&#x00C3;"> <!ENTITY Auml "&#x00C4;"> <!ENTITY Aring "&#x00C5;"> <!ENTITY AElig "&#x00C6;"> <!ENTITY Ccedil "&#x00C7;"> <!ENTITY Egrave "&#x00C8;"> <!ENTITY Eacute "&#x00C9;"> <!ENTITY Ecirc "&#x00CA;"> <!ENTITY Euml "&#x00CB;"> <!ENTITY Igrave "&#x00CC;"> <!ENTITY Iacute "&#x00CD;"> <!ENTITY Icirc "&#x00CE;"> <!ENTITY Iuml "&#x00CF;"> <!ENTITY ETH "&#x00D0;"> <!ENTITY Ntilde "&#x00D1;"> <!ENTITY Ograve "&#x00D2;"> <!ENTITY Oacute "&#x00D3;"> <!ENTITY Ocirc "&#x00D4;"> <!ENTITY Otilde "&#x00D5;"> <!ENTITY Ouml "&#x00D6;"> <!ENTITY times "&#x00D7;"> <!ENTITY Oslash "&#x00D8;"> <!ENTITY Ugrave "&#x00D9;"> <!ENTITY Uacute "&#x00DA;"> <!ENTITY Ucirc "&#x00DB;"> <!ENTITY Uuml "&#x00DC;"> <!ENTITY Yacute "&#x00DD;"> <!ENTITY THORN "&#x00DE;"> <!ENTITY szlig "&#x00DF;"> <!ENTITY agrave "&#x00E0;"> <!ENTITY aacute "&#x00E1;"> <!ENTITY acirc "&#x00E2;"> <!ENTITY atilde "&#x00E3;"> <!ENTITY auml "&#x00E4;"> <!ENTITY aring "&#x00E5;"> <!ENTITY aelig "&#x00E6;"> <!ENTITY ccedil "&#x00E7;"> <!ENTITY egrave "&#x00E8;"> <!ENTITY eacute "&#x00E9;"> <!ENTITY ecirc "&#x00EA;"> <!ENTITY euml "&#x00EB;"> <!ENTITY igrave "&#x00EC;"> <!ENTITY iacute "&#x00ED;"> <!ENTITY icirc "&#x00EE;"> <!ENTITY iuml "&#x00EF;"> <!ENTITY eth "&#x00F0;"> <!ENTITY ntilde "&#x00F1;"> <!ENTITY ograve "&#x00F2;"> <!ENTITY oacute "&#x00F3;"> <!ENTITY ocirc "&#x00F4;"> <!ENTITY otilde "&#x00F5;"> <!ENTITY ouml "&#x00F6;"> <!ENTITY divide "&#x00F7;"> <!ENTITY oslash "&#x00F8;"> <!ENTITY ugrave "&#x00F9;"> <!ENTITY uacute "&#x00FA;"> <!ENTITY ucirc "&#x00FB;"> <!ENTITY uuml "&#x00FC;"> <!ENTITY yacute "&#x00FD;"> <!ENTITY thorn "&#x00FE;"> <!ENTITY yuml "&#x00FF;"> <!ENTITY OElig "&#x0152;"> <!ENTITY oelig "&#x0153;"> <!ENTITY Scaron "&#x0160;"> <!ENTITY scaron "&#x0161;"> <!ENTITY Yuml "&#x0178;"> <!ENTITY fnof "&#x0192;"> <!ENTITY circ "&#x02C6;"> <!ENTITY tilde "&#x02DC;"> <!ENTITY Alpha "&#x0391;"> <!ENTITY Beta "&#x0392;"> <!ENTITY Gamma "&#x0393;"> <!ENTITY Epsilon "&#x0395;"> <!ENTITY Zeta "&#x0396;"> <!ENTITY Eta "&#x0397;"> <!ENTITY Theta "&#x0398;"> <!ENTITY Iota "&#x0399;"> <!ENTITY Kappa "&#x039A;"> <!ENTITY Lambda "&#x039B;"> <!ENTITY Mu "&#x039C;"> <!ENTITY Nu "&#x039D;"> <!ENTITY Xi "&#x039E;"> <!ENTITY Omicron "&#x039F;"> <!ENTITY Pi "&#x03A0;"> <!ENTITY Rho "&#x03A1;"> <!ENTITY Sigma "&#x03A3;"> <!ENTITY Tau "&#x03A4;"> <!ENTITY Upsilon "&#x03A5;"> <!ENTITY Phi "&#x03A6;"> <!ENTITY Chi "&#x03A7;"> <!ENTITY Psi "&#x03A8;"> <!ENTITY Omega "&#x03A9;"> <!ENTITY alpha "&#x03B1;"> <!ENTITY beta "&#x03B2;"> <!ENTITY gamma "&#x03B3;"> <!ENTITY delta "&#x03B4;"> <!ENTITY epsilon "&#x03B5;"> <!ENTITY zeta "&#x03B6;"> <!ENTITY eta "&#x03B7;"> <!ENTITY theta "&#x03B8;"> <!ENTITY iota "&#x03B9;"> <!ENTITY kappa "&#x03BA;"> <!ENTITY lambda "&#x03BB;"> <!ENTITY mu "&#x03BC;"> <!ENTITY nu "&#x03BD;"> <!ENTITY xi "&#x03BE;"> <!ENTITY omicron "&#x03BF;"> <!ENTITY pi "&#x03C0;"> <!ENTITY rho "&#x03C1;"> <!ENTITY sigmaf "&#x03C2;"> <!ENTITY sigma "&#x03C3;"> <!ENTITY tau "&#x03C4;"> <!ENTITY upsilon "&#x03C5;"> <!ENTITY phi "&#x03C6;"> <!ENTITY chi "&#x03C7;"> <!ENTITY psi "&#x03C8;"> <!ENTITY omega "&#x03C9;"> <!ENTITY thetasym "&#x03D1;"> <!ENTITY upsih "&#x03D2;"> <!ENTITY piv "&#x03D6;"> <!ENTITY ensp "&#x2002;"> <!ENTITY emsp "&#x2003;"> <!ENTITY thinsp "&#x2009;"> <!ENTITY zwnj "&#x200C;"> <!ENTITY zwj "&#x200D;"> <!ENTITY lrm "&#x200E;"> <!ENTITY rlm "&#x200F;"> <!ENTITY ndash "&#x2013;"> <!ENTITY mdash "&#x2014;"> <!ENTITY lsquo "&#x2018;"> <!ENTITY rsquo "&#x2019;"> <!ENTITY sbquo "&#x201A;"> <!ENTITY ldquo "&#x201C;"> <!ENTITY rdquo "&#x201D;"> <!ENTITY bdquo "&#x201E;"> <!ENTITY dagger "&#x2020;"> <!ENTITY Dagger "&#x2021;"> <!ENTITY bull "&#x2022;"> <!ENTITY hellip "&#x2026;"> <!ENTITY permil "&#x2030;"> <!ENTITY prime "&#x2032;"> <!ENTITY Prime "&#x2033;"> <!ENTITY lsaquo "&#x2039;"> <!ENTITY rsaquo "&#x203A;"> <!ENTITY oline "&#x203E;"> <!ENTITY frasl "&#x2044;"> <!ENTITY euro "&#x20AC;"> <!ENTITY image "&#x2111;"> <!ENTITY weierp "&#x2118;"> <!ENTITY real "&#x211C;"> <!ENTITY trade "&#x2122;"> <!ENTITY alefsym "&#x2135;"> <!ENTITY larr "&#x2190;"> <!ENTITY uarr "&#x2191;"> <!ENTITY rarr "&#x2192;"> <!ENTITY darr "&#x2193;"> <!ENTITY harr "&#x2194;"> <!ENTITY crarr "&#x21B5;"> <!ENTITY lArr "&#x21D0;"> <!ENTITY uArr "&#x21D1;"> <!ENTITY rArr "&#x21D2;"> <!ENTITY dArr "&#x21D3;"> <!ENTITY hArr "&#x21D4;"> <!ENTITY forall "&#x2200;"> <!ENTITY part "&#x2202;"> <!ENTITY exist "&#x2203;"> <!ENTITY empty "&#x2205;"> <!ENTITY nabla "&#x2207;"> <!ENTITY isin "&#x2208;"> <!ENTITY notin "&#x2209;"> <!ENTITY ni "&#x220B;"> <!ENTITY prod "&#x220F;"> <!ENTITY sum "&#x2211;"> <!ENTITY minus "&#x2212;"> <!ENTITY lowast "&#x2217;"> <!ENTITY radic "&#x221A;"> <!ENTITY prop "&#x221D;"> <!ENTITY infin "&#x221E;"> <!ENTITY ang "&#x2220;"> <!ENTITY and "&#x2227;"> <!ENTITY or "&#x2228;"> <!ENTITY cap "&#x2229;"> <!ENTITY cup "&#x222A;"> <!ENTITY int "&#x222B;"> <!ENTITY there4 "&#x2234;"> <!ENTITY sim "&#x223C;"> <!ENTITY cong "&#x2245;"> <!ENTITY asymp "&#x2248;"> <!ENTITY ne "&#x2260;"> <!ENTITY equiv "&#x2261;"> <!ENTITY le "&#x2264;"> <!ENTITY ge "&#x2265;"> <!ENTITY sub "&#x2282;"> <!ENTITY sup "&#x2283;"> <!ENTITY nsub "&#x2284;"> <!ENTITY sube "&#x2286;"> <!ENTITY supe "&#x2287;"> <!ENTITY oplus "&#x2295;"> <!ENTITY otimes "&#x2297;"> <!ENTITY perp "&#x22A5;"> <!ENTITY sdot "&#x22C5;"> <!ENTITY lceil "&#x2308;"> <!ENTITY rceil "&#x2309;"> <!ENTITY lfloor "&#x230A;"> <!ENTITY rfloor "&#x230B;"> <!ENTITY lang "&#x2329;"> <!ENTITY rang "&#x232A;"> <!ENTITY loz "&#x25CA;"> <!ENTITY spades "&#x2660;"> <!ENTITY clubs "&#x2663;"> <!ENTITY hearts "&#x2665;"> <!ENTITY diams "&#x2666;"> ]>';
 660  	 }
 661  }