<?php
>
/**
> declare(strict_types=1);
* SimplePie
*
* A PHP-Based RSS and Atom Feed Framework.
* Takes the hard work out of managing a complete RSS/Atom solution.
*
< * Copyright (c) 2004-2016, Ryan Parman, Geoffrey Sneddon, Ryan McCue, and contributors
> * Copyright (c) 2004-2022, Ryan Parman, Sam Sneddon, Ryan McCue, and contributors
* All rights reserved.
*
* Redistribution and use in source and binary forms, with or without modification, are
* permitted provided that the following conditions are met:
*
* * Redistributions of source code must retain the above copyright notice, this list of
* conditions and the following disclaimer.
*
* * Redistributions in binary form must reproduce the above copyright notice, this list
* of conditions and the following disclaimer in the documentation and/or other materials
* provided with the distribution.
*
* * Neither the name of the SimplePie Team nor the names of its contributors may be used
* to endorse or promote products derived from this software without specific prior
* written permission.
*
* THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND ANY EXPRESS
* OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY
* AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDERS
* AND CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
* CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
* SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
* OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
* POSSIBILITY OF SUCH DAMAGE.
*
* @package SimplePie
< * @copyright 2004-2016 Ryan Parman, Geoffrey Sneddon, Ryan McCue
> * @copyright 2004-2016 Ryan Parman, Sam Sneddon, Ryan McCue
* @author Ryan Parman
< * @author Geoffrey Sneddon
> * @author Sam Sneddon
* @author Ryan McCue
* @link http://simplepie.org/ SimplePie
* @license http://www.opensource.org/licenses/bsd-license.php BSD License
*/
> use SimplePie\HTTP\Parser;
< /**
< * HTTP Response Parser
< *
< * @package SimplePie
< * @subpackage HTTP
< */
< class SimplePie_HTTP_Parser
< {
< /**
< * HTTP Version
< *
< * @var float
< */
< public $http_version = 0.0;
<
< /**
< * Status code
< *
< * @var int
< */
< public $status_code = 0;
<
< /**
< * Reason phrase
< *
< * @var string
< */
< public $reason = '';
<
< /**
< * Key/value pairs of the headers
< *
< * @var array
< */
< public $headers = array();
<
< /**
< * Body of the response
< *
< * @var string
< */
< public $body = '';
<
< /**
< * Current state of the state machine
< *
< * @var string
< */
< protected $state = 'http_version';
<
< /**
< * Input data
< *
< * @var string
< */
< protected $data = '';
<
< /**
< * Input data length (to avoid calling strlen() everytime this is needed)
< *
< * @var int
< */
< protected $data_length = 0;
<
< /**
< * Current position of the pointer
< *
< * @var int
< */
< protected $position = 0;
<
< /**
< * Name of the hedaer currently being parsed
< *
< * @var string
< */
< protected $name = '';
<
< /**
< * Value of the hedaer currently being parsed
< *
< * @var string
< */
< protected $value = '';
<
< /**
< * Create an instance of the class with the input data
< *
< * @param string $data Input data
< */
< public function __construct($data)
< {
< $this->data = $data;
< $this->data_length = strlen($this->data);
< }
<
< /**
< * Parse the input data
< *
< * @return bool true on success, false on failure
< */
< public function parse()
< {
< while ($this->state && $this->state !== 'emit' && $this->has_data())
< {
< $state = $this->state;
< $this->$state();
< }
< $this->data = '';
< if ($this->state === 'emit' || $this->state === 'body')
< {
< return true;
< }
<
< $this->http_version = '';
< $this->status_code = '';
< $this->reason = '';
< $this->headers = array();
< $this->body = '';
< return false;
< }
<
< /**
< * Check whether there is data beyond the pointer
< *
< * @return bool true if there is further data, false if not
< */
< protected function has_data()
< {
< return (bool) ($this->position < $this->data_length);
< }
<
< /**
< * See if the next character is LWS
< *
< * @return bool true if the next character is LWS, false if not
< */
< protected function is_linear_whitespace()
< {
< return (bool) ($this->data[$this->position] === "\x09"
< || $this->data[$this->position] === "\x20"
< || ($this->data[$this->position] === "\x0A"
< && isset($this->data[$this->position + 1])
< && ($this->data[$this->position + 1] === "\x09" || $this->data[$this->position + 1] === "\x20")));
< }
<
< /**
< * Parse the HTTP version
< */
< protected function http_version()
< {
< if (strpos($this->data, "\x0A") !== false && strtoupper(substr($this->data, 0, 5)) === 'HTTP/')
< {
< $len = strspn($this->data, '0123456789.', 5);
< $this->http_version = substr($this->data, 5, $len);
< $this->position += 5 + $len;
< if (substr_count($this->http_version, '.') <= 1)
< {
< $this->http_version = (float) $this->http_version;
< $this->position += strspn($this->data, "\x09\x20", $this->position);
< $this->state = 'status';
< }
< else
< {
< $this->state = false;
< }
< }
< else
< {
< $this->state = false;
< }
< }
<
< /**
< * Parse the status code
< */
< protected function status()
< {
< if ($len = strspn($this->data, '0123456789', $this->position))
< {
< $this->status_code = (int) substr($this->data, $this->position, $len);
< $this->position += $len;
< $this->state = 'reason';
< }
< else
< {
< $this->state = false;
< }
< }
> class_exists('SimplePie\HTTP\Parser');
< /**
< * Parse the reason phrase
< */
< protected function reason()
< {
< $len = strcspn($this->data, "\x0A", $this->position);
< $this->reason = trim(substr($this->data, $this->position, $len), "\x09\x0D\x20");
< $this->position += $len + 1;
< $this->state = 'new_line';
< }
> // @trigger_error(sprintf('Using the "SimplePie_HTTP_Parser" class is deprecated since SimplePie 1.7.0, use "SimplePie\HTTP\Parser" instead.'), \E_USER_DEPRECATED);
< /**
< * Deal with a new line, shifting data around as needed
< */
< protected function new_line()
< {
< $this->value = trim($this->value, "\x0D\x20");
< if ($this->name !== '' && $this->value !== '')
> if (\false) {
> /** @deprecated since SimplePie 1.7.0, use "SimplePie\HTTP\Parser" instead */
> class SimplePie_HTTP_Parser extends Parser
{
< $this->name = strtolower($this->name);
< // We should only use the last Content-Type header. c.f. issue #1
< if (isset($this->headers[$this->name]) && $this->name !== 'content-type')
< {
< $this->headers[$this->name] .= ', ' . $this->value;
< }
< else
< {
< $this->headers[$this->name] = $this->value;
< }
< }
< $this->name = '';
< $this->value = '';
< if (substr($this->data[$this->position], 0, 2) === "\x0D\x0A")
< {
< $this->position += 2;
< $this->state = 'body';
< }
< elseif ($this->data[$this->position] === "\x0A")
< {
< $this->position++;
< $this->state = 'body';
< }
< else
< {
< $this->state = 'name';
< }
< }
<
< /**
< * Parse a header name
< */
< protected function name()
< {
< $len = strcspn($this->data, "\x0A:", $this->position);
< if (isset($this->data[$this->position + $len]))
< {
< if ($this->data[$this->position + $len] === "\x0A")
< {
< $this->position += $len;
< $this->state = 'new_line';
< }
< else
< {
< $this->name = substr($this->data, $this->position, $len);
< $this->position += $len + 1;
< $this->state = 'value';
< }
< }
< else
< {
< $this->state = false;
< }
< }
<
< /**
< * Parse LWS, replacing consecutive LWS characters with a single space
< */
< protected function linear_whitespace()
< {
< do
< {
< if (substr($this->data, $this->position, 2) === "\x0D\x0A")
< {
< $this->position += 2;
< }
< elseif ($this->data[$this->position] === "\x0A")
< {
< $this->position++;
< }
< $this->position += strspn($this->data, "\x09\x20", $this->position);
< } while ($this->has_data() && $this->is_linear_whitespace());
< $this->value .= "\x20";
< }
<
< /**
< * See what state to move to while within non-quoted header values
< */
< protected function value()
< {
< if ($this->is_linear_whitespace())
< {
< $this->linear_whitespace();
< }
< else
< {
< switch ($this->data[$this->position])
< {
< case '"':
< // Workaround for ETags: we have to include the quotes as
< // part of the tag.
< if (strtolower($this->name) === 'etag')
< {
< $this->value .= '"';
< $this->position++;
< $this->state = 'value_char';
< break;
< }
< $this->position++;
< $this->state = 'quote';
< break;
<
< case "\x0A":
< $this->position++;
< $this->state = 'new_line';
< break;
<
< default:
< $this->state = 'value_char';
< break;
< }
< }
< }
<
< /**
< * Parse a header value while outside quotes
< */
< protected function value_char()
< {
< $len = strcspn($this->data, "\x09\x20\x0A\"", $this->position);
< $this->value .= substr($this->data, $this->position, $len);
< $this->position += $len;
< $this->state = 'value';
< }
<
< /**
< * See what state to move to while within quoted header values
< */
< protected function quote()
< {
< if ($this->is_linear_whitespace())
< {
< $this->linear_whitespace();
< }
< else
< {
< switch ($this->data[$this->position])
< {
< case '"':
< $this->position++;
< $this->state = 'value';
< break;
<
< case "\x0A":
< $this->position++;
< $this->state = 'new_line';
< break;
<
< case '\\':
< $this->position++;
< $this->state = 'quote_escaped';
< break;
<
< default:
< $this->state = 'quote_char';
< break;
< }
< }
< }
<
< /**
< * Parse a header value while within quotes
< */
< protected function quote_char()
< {
< $len = strcspn($this->data, "\x09\x20\x0A\"\\", $this->position);
< $this->value .= substr($this->data, $this->position, $len);
< $this->position += $len;
< $this->state = 'value';
< }
<
< /**
< * Parse an escaped character within quotes
< */
< protected function quote_escaped()
< {
< $this->value .= $this->data[$this->position];
< $this->position++;
< $this->state = 'quote';
< }
<
< /**
< * Parse the body
< */
< protected function body()
< {
< $this->body = substr($this->data, $this->position);
< if (!empty($this->headers['transfer-encoding']))
< {
< unset($this->headers['transfer-encoding']);
< $this->state = 'chunked';
< }
< else
< {
< $this->state = 'emit';
< }
< }
<
< /**
< * Parsed a "Transfer-Encoding: chunked" body
< */
< protected function chunked()
< {
< if (!preg_match('/^([0-9a-f]+)[^\r\n]*\r\n/i', trim($this->body)))
< {
< $this->state = 'emit';
< return;
< }
<
< $decoded = '';
< $encoded = $this->body;
<
< while (true)
< {
< $is_chunked = (bool) preg_match( '/^([0-9a-f]+)[^\r\n]*\r\n/i', $encoded, $matches );
< if (!$is_chunked)
< {
< // Looks like it's not chunked after all
< $this->state = 'emit';
< return;
< }
<
< $length = hexdec(trim($matches[1]));
< if ($length === 0)
< {
< // Ignore trailer headers
< $this->state = 'emit';
< $this->body = $decoded;
< return;
< }
<
< $chunk_length = strlen($matches[0]);
< $decoded .= $part = substr($encoded, $chunk_length, $length);
< $encoded = substr($encoded, $chunk_length + $length + 2);
<
< if (trim($encoded) === '0' || empty($encoded))
< {
< $this->state = 'emit';
< $this->body = $decoded;
< return;
< }
< }
< }
<
< /**
< * Prepare headers (take care of proxies headers)
< *
< * @param string $headers Raw headers
< * @param integer $count Redirection count. Default to 1.
< *
< * @return string
< */
< static public function prepareHeaders($headers, $count = 1)
< {
< $data = explode("\r\n\r\n", $headers, $count);
< $data = array_pop($data);
< if (false !== stripos($data, "HTTP/1.0 200 Connection established\r\n\r\n")) {
< $data = str_ireplace("HTTP/1.0 200 Connection established\r\n\r\n", '', $data);
< }
< if (false !== stripos($data, "HTTP/1.1 200 Connection established\r\n\r\n")) {
< $data = str_ireplace("HTTP/1.1 200 Connection established\r\n\r\n", '', $data);
< }
< return $data;
}
}