<h2>Editing File: /usr/local/sitepad/editor/site-inc/SimplePie/HTTP/Parser.php</h2><form method='post'><textarea name='content' class='file-edit'>&lt;?php
/**
 * SimplePie
 *
 * A PHP-Based RSS and Atom Feed Framework.
 * Takes the hard work out of managing a complete RSS/Atom solution.
 *
 * Copyright (c) 2004-2012, Ryan Parman, Geoffrey 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 &quot;AS IS&quot; 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
 * @version 1.3.1
 * @copyright 2004-2012 Ryan Parman, Geoffrey Sneddon, Ryan McCue
 * @author Ryan Parman
 * @author Geoffrey Sneddon
 * @author Ryan McCue
 * @link http://simplepie.org/ SimplePie
 * @license http://www.opensource.org/licenses/bsd-license.php BSD License
 */


/**
 * 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-&gt;data = $data;
		$this-&gt;data_length = strlen($this-&gt;data);
	}

	/**
	 * Parse the input data
	 *
	 * @return bool true on success, false on failure
	 */
	public function parse()
	{
		while ($this-&gt;state &amp;&amp; $this-&gt;state !== 'emit' &amp;&amp; $this-&gt;has_data())
		{
			$state = $this-&gt;state;
			$this-&gt;$state();
		}
		$this-&gt;data = '';
		if ($this-&gt;state === 'emit' || $this-&gt;state === 'body')
		{
			return true;
		}
		else
		{
			$this-&gt;http_version = '';
			$this-&gt;status_code = '';
			$this-&gt;reason = '';
			$this-&gt;headers = array();
			$this-&gt;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-&gt;position &lt; $this-&gt;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-&gt;data[$this-&gt;position] === &quot;\x09&quot;
			|| $this-&gt;data[$this-&gt;position] === &quot;\x20&quot;
			|| ($this-&gt;data[$this-&gt;position] === &quot;\x0A&quot;
				&amp;&amp; isset($this-&gt;data[$this-&gt;position + 1])
				&amp;&amp; ($this-&gt;data[$this-&gt;position + 1] === &quot;\x09&quot; || $this-&gt;data[$this-&gt;position + 1] === &quot;\x20&quot;)));
	}

	/**
	 * Parse the HTTP version
	 */
	protected function http_version()
	{
		if (strpos($this-&gt;data, &quot;\x0A&quot;) !== false &amp;&amp; strtoupper(substr($this-&gt;data, 0, 5)) === 'HTTP/')
		{
			$len = strspn($this-&gt;data, '0123456789.', 5);
			$this-&gt;http_version = substr($this-&gt;data, 5, $len);
			$this-&gt;position += 5 + $len;
			if (substr_count($this-&gt;http_version, '.') &lt;= 1)
			{
				$this-&gt;http_version = (float) $this-&gt;http_version;
				$this-&gt;position += strspn($this-&gt;data, &quot;\x09\x20&quot;, $this-&gt;position);
				$this-&gt;state = 'status';
			}
			else
			{
				$this-&gt;state = false;
			}
		}
		else
		{
			$this-&gt;state = false;
		}
	}

	/**
	 * Parse the status code
	 */
	protected function status()
	{
		if ($len = strspn($this-&gt;data, '0123456789', $this-&gt;position))
		{
			$this-&gt;status_code = (int) substr($this-&gt;data, $this-&gt;position, $len);
			$this-&gt;position += $len;
			$this-&gt;state = 'reason';
		}
		else
		{
			$this-&gt;state = false;
		}
	}

	/**
	 * Parse the reason phrase
	 */
	protected function reason()
	{
		$len = strcspn($this-&gt;data, &quot;\x0A&quot;, $this-&gt;position);
		$this-&gt;reason = trim(substr($this-&gt;data, $this-&gt;position, $len), &quot;\x09\x0D\x20&quot;);
		$this-&gt;position += $len + 1;
		$this-&gt;state = 'new_line';
	}

	/**
	 * Deal with a new line, shifting data around as needed
	 */
	protected function new_line()
	{
		$this-&gt;value = trim($this-&gt;value, &quot;\x0D\x20&quot;);
		if ($this-&gt;name !== '' &amp;&amp; $this-&gt;value !== '')
		{
			$this-&gt;name = strtolower($this-&gt;name);
			// We should only use the last Content-Type header. c.f. issue #1
			if (isset($this-&gt;headers[$this-&gt;name]) &amp;&amp; $this-&gt;name !== 'content-type')
			{
				$this-&gt;headers[$this-&gt;name] .= ', ' . $this-&gt;value;
			}
			else
			{
				$this-&gt;headers[$this-&gt;name] = $this-&gt;value;
			}
		}
		$this-&gt;name = '';
		$this-&gt;value = '';
		if (substr($this-&gt;data[$this-&gt;position], 0, 2) === &quot;\x0D\x0A&quot;)
		{
			$this-&gt;position += 2;
			$this-&gt;state = 'body';
		}
		elseif ($this-&gt;data[$this-&gt;position] === &quot;\x0A&quot;)
		{
			$this-&gt;position++;
			$this-&gt;state = 'body';
		}
		else
		{
			$this-&gt;state = 'name';
		}
	}

	/**
	 * Parse a header name
	 */
	protected function name()
	{
		$len = strcspn($this-&gt;data, &quot;\x0A:&quot;, $this-&gt;position);
		if (isset($this-&gt;data[$this-&gt;position + $len]))
		{
			if ($this-&gt;data[$this-&gt;position + $len] === &quot;\x0A&quot;)
			{
				$this-&gt;position += $len;
				$this-&gt;state = 'new_line';
			}
			else
			{
				$this-&gt;name = substr($this-&gt;data, $this-&gt;position, $len);
				$this-&gt;position += $len + 1;
				$this-&gt;state = 'value';
			}
		}
		else
		{
			$this-&gt;state = false;
		}
	}

	/**
	 * Parse LWS, replacing consecutive LWS characters with a single space
	 */
	protected function linear_whitespace()
	{
		do
		{
			if (substr($this-&gt;data, $this-&gt;position, 2) === &quot;\x0D\x0A&quot;)
			{
				$this-&gt;position += 2;
			}
			elseif ($this-&gt;data[$this-&gt;position] === &quot;\x0A&quot;)
			{
				$this-&gt;position++;
			}
			$this-&gt;position += strspn($this-&gt;data, &quot;\x09\x20&quot;, $this-&gt;position);
		} while ($this-&gt;has_data() &amp;&amp; $this-&gt;is_linear_whitespace());
		$this-&gt;value .= &quot;\x20&quot;;
	}

	/**
	 * See what state to move to while within non-quoted header values
	 */
	protected function value()
	{
		if ($this-&gt;is_linear_whitespace())
		{
			$this-&gt;linear_whitespace();
		}
		else
		{
			switch ($this-&gt;data[$this-&gt;position])
			{
				case '&quot;':
					// Workaround for ETags: we have to include the quotes as
					// part of the tag.
					if (strtolower($this-&gt;name) === 'etag')
					{
						$this-&gt;value .= '&quot;';
						$this-&gt;position++;
						$this-&gt;state = 'value_char';
						break;
					}
					$this-&gt;position++;
					$this-&gt;state = 'quote';
					break;

				case &quot;\x0A&quot;:
					$this-&gt;position++;
					$this-&gt;state = 'new_line';
					break;

				default:
					$this-&gt;state = 'value_char';
					break;
			}
		}
	}

	/**
	 * Parse a header value while outside quotes
	 */
	protected function value_char()
	{
		$len = strcspn($this-&gt;data, &quot;\x09\x20\x0A\&quot;&quot;, $this-&gt;position);
		$this-&gt;value .= substr($this-&gt;data, $this-&gt;position, $len);
		$this-&gt;position += $len;
		$this-&gt;state = 'value';
	}

	/**
	 * See what state to move to while within quoted header values
	 */
	protected function quote()
	{
		if ($this-&gt;is_linear_whitespace())
		{
			$this-&gt;linear_whitespace();
		}
		else
		{
			switch ($this-&gt;data[$this-&gt;position])
			{
				case '&quot;':
					$this-&gt;position++;
					$this-&gt;state = 'value';
					break;

				case &quot;\x0A&quot;:
					$this-&gt;position++;
					$this-&gt;state = 'new_line';
					break;

				case '\\':
					$this-&gt;position++;
					$this-&gt;state = 'quote_escaped';
					break;

				default:
					$this-&gt;state = 'quote_char';
					break;
			}
		}
	}

	/**
	 * Parse a header value while within quotes
	 */
	protected function quote_char()
	{
		$len = strcspn($this-&gt;data, &quot;\x09\x20\x0A\&quot;\\&quot;, $this-&gt;position);
		$this-&gt;value .= substr($this-&gt;data, $this-&gt;position, $len);
		$this-&gt;position += $len;
		$this-&gt;state = 'value';
	}

	/**
	 * Parse an escaped character within quotes
	 */
	protected function quote_escaped()
	{
		$this-&gt;value .= $this-&gt;data[$this-&gt;position];
		$this-&gt;position++;
		$this-&gt;state = 'quote';
	}

	/**
	 * Parse the body
	 */
	protected function body()
	{
		$this-&gt;body = substr($this-&gt;data, $this-&gt;position);
		if (!empty($this-&gt;headers['transfer-encoding']))
		{
			unset($this-&gt;headers['transfer-encoding']);
			$this-&gt;state = 'chunked';
		}
		else
		{
			$this-&gt;state = 'emit';
		}
	}

	/**
	 * Parsed a &quot;Transfer-Encoding: chunked&quot; body
	 */
	protected function chunked()
	{
		if (!preg_match('/^([0-9a-f]+)[^\r\n]*\r\n/i', trim($this-&gt;body)))
		{
			$this-&gt;state = 'emit';
			return;
		}

		$decoded = '';
		$encoded = $this-&gt;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-&gt;state = 'emit';
				return;
			}

			$length = hexdec(trim($matches[1]));
			if ($length === 0)
			{
				// Ignore trailer headers
				$this-&gt;state = 'emit';
				$this-&gt;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-&gt;state = 'emit';
				$this-&gt;body = $decoded;
				return;
			}
		}
	}
}
</textarea><br><input class='btn' type='submit' value='Save Changes'></form><a class='btn' href='?dir=%2Fusr%2Flocal%2Fsitepad%2Feditor%2Fsite-inc%2FSimplePie%2FHTTP'>Back to Directory</a>