wp/wp-includes/SimplePie/XML/Declaration/Parser.php
author ymh <ymh.work@gmail.com>
Wed, 06 Nov 2013 03:21:17 +0000
changeset 0 d970ebf37754
child 16 a86126ab1dd4
permissions -rw-r--r--
first import
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
     1
<?php
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
     2
/**
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
     3
 * SimplePie
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
     4
 *
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
     5
 * A PHP-Based RSS and Atom Feed Framework.
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
     6
 * Takes the hard work out of managing a complete RSS/Atom solution.
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
     7
 *
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
     8
 * Copyright (c) 2004-2012, Ryan Parman, Geoffrey Sneddon, Ryan McCue, and contributors
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
     9
 * All rights reserved.
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    10
 *
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    11
 * Redistribution and use in source and binary forms, with or without modification, are
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    12
 * permitted provided that the following conditions are met:
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    13
 *
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    14
 * 	* Redistributions of source code must retain the above copyright notice, this list of
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    15
 * 	  conditions and the following disclaimer.
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    16
 *
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    17
 * 	* Redistributions in binary form must reproduce the above copyright notice, this list
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    18
 * 	  of conditions and the following disclaimer in the documentation and/or other materials
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    19
 * 	  provided with the distribution.
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    20
 *
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    21
 * 	* Neither the name of the SimplePie Team nor the names of its contributors may be used
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    22
 * 	  to endorse or promote products derived from this software without specific prior
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    23
 * 	  written permission.
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    24
 *
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    25
 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND ANY EXPRESS
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    26
 * OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    27
 * AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDERS
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    28
 * AND CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    29
 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    30
 * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    31
 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    32
 * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    33
 * POSSIBILITY OF SUCH DAMAGE.
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    34
 *
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    35
 * @package SimplePie
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    36
 * @version 1.3.1
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    37
 * @copyright 2004-2012 Ryan Parman, Geoffrey Sneddon, Ryan McCue
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    38
 * @author Ryan Parman
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    39
 * @author Geoffrey Sneddon
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    40
 * @author Ryan McCue
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    41
 * @link http://simplepie.org/ SimplePie
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    42
 * @license http://www.opensource.org/licenses/bsd-license.php BSD License
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    43
 */
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    44
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    45
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    46
/**
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    47
 * Parses the XML Declaration
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    48
 *
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    49
 * @package SimplePie
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    50
 * @subpackage Parsing
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    51
 */
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    52
class SimplePie_XML_Declaration_Parser
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    53
{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    54
	/**
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    55
	 * XML Version
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    56
	 *
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    57
	 * @access public
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    58
	 * @var string
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    59
	 */
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    60
	var $version = '1.0';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    61
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    62
	/**
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    63
	 * Encoding
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    64
	 *
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    65
	 * @access public
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    66
	 * @var string
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    67
	 */
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    68
	var $encoding = 'UTF-8';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    69
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    70
	/**
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    71
	 * Standalone
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    72
	 *
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    73
	 * @access public
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    74
	 * @var bool
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    75
	 */
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    76
	var $standalone = false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    77
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    78
	/**
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    79
	 * Current state of the state machine
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    80
	 *
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    81
	 * @access private
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    82
	 * @var string
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    83
	 */
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    84
	var $state = 'before_version_name';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    85
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    86
	/**
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    87
	 * Input data
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    88
	 *
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    89
	 * @access private
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    90
	 * @var string
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    91
	 */
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    92
	var $data = '';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    93
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    94
	/**
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    95
	 * Input data length (to avoid calling strlen() everytime this is needed)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    96
	 *
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    97
	 * @access private
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    98
	 * @var int
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    99
	 */
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   100
	var $data_length = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   101
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   102
	/**
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   103
	 * Current position of the pointer
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   104
	 *
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   105
	 * @var int
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   106
	 * @access private
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   107
	 */
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   108
	var $position = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   109
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   110
	/**
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   111
	 * Create an instance of the class with the input data
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   112
	 *
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   113
	 * @access public
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   114
	 * @param string $data Input data
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   115
	 */
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   116
	public function __construct($data)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   117
	{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   118
		$this->data = $data;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   119
		$this->data_length = strlen($this->data);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   120
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   121
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   122
	/**
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   123
	 * Parse the input data
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   124
	 *
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   125
	 * @access public
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   126
	 * @return bool true on success, false on failure
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   127
	 */
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   128
	public function parse()
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   129
	{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   130
		while ($this->state && $this->state !== 'emit' && $this->has_data())
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   131
		{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   132
			$state = $this->state;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   133
			$this->$state();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   134
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   135
		$this->data = '';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   136
		if ($this->state === 'emit')
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   137
		{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   138
			return true;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   139
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   140
		else
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   141
		{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   142
			$this->version = '';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   143
			$this->encoding = '';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   144
			$this->standalone = '';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   145
			return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   146
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   147
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   148
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   149
	/**
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   150
	 * Check whether there is data beyond the pointer
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   151
	 *
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   152
	 * @access private
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   153
	 * @return bool true if there is further data, false if not
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   154
	 */
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   155
	public function has_data()
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   156
	{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   157
		return (bool) ($this->position < $this->data_length);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   158
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   159
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   160
	/**
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   161
	 * Advance past any whitespace
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   162
	 *
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   163
	 * @return int Number of whitespace characters passed
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   164
	 */
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   165
	public function skip_whitespace()
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   166
	{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   167
		$whitespace = strspn($this->data, "\x09\x0A\x0D\x20", $this->position);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   168
		$this->position += $whitespace;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   169
		return $whitespace;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   170
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   171
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   172
	/**
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   173
	 * Read value
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   174
	 */
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   175
	public function get_value()
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   176
	{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   177
		$quote = substr($this->data, $this->position, 1);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   178
		if ($quote === '"' || $quote === "'")
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   179
		{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   180
			$this->position++;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   181
			$len = strcspn($this->data, $quote, $this->position);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   182
			if ($this->has_data())
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   183
			{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   184
				$value = substr($this->data, $this->position, $len);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   185
				$this->position += $len + 1;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   186
				return $value;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   187
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   188
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   189
		return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   190
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   191
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   192
	public function before_version_name()
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   193
	{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   194
		if ($this->skip_whitespace())
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   195
		{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   196
			$this->state = 'version_name';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   197
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   198
		else
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   199
		{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   200
			$this->state = false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   201
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   202
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   203
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   204
	public function version_name()
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   205
	{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   206
		if (substr($this->data, $this->position, 7) === 'version')
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   207
		{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   208
			$this->position += 7;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   209
			$this->skip_whitespace();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   210
			$this->state = 'version_equals';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   211
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   212
		else
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   213
		{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   214
			$this->state = false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   215
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   216
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   217
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   218
	public function version_equals()
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   219
	{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   220
		if (substr($this->data, $this->position, 1) === '=')
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   221
		{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   222
			$this->position++;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   223
			$this->skip_whitespace();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   224
			$this->state = 'version_value';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   225
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   226
		else
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   227
		{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   228
			$this->state = false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   229
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   230
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   231
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   232
	public function version_value()
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   233
	{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   234
		if ($this->version = $this->get_value())
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   235
		{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   236
			$this->skip_whitespace();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   237
			if ($this->has_data())
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   238
			{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   239
				$this->state = 'encoding_name';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   240
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   241
			else
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   242
			{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   243
				$this->state = 'emit';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   244
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   245
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   246
		else
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   247
		{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   248
			$this->state = false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   249
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   250
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   251
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   252
	public function encoding_name()
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   253
	{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   254
		if (substr($this->data, $this->position, 8) === 'encoding')
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   255
		{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   256
			$this->position += 8;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   257
			$this->skip_whitespace();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   258
			$this->state = 'encoding_equals';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   259
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   260
		else
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   261
		{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   262
			$this->state = 'standalone_name';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   263
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   264
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   265
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   266
	public function encoding_equals()
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   267
	{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   268
		if (substr($this->data, $this->position, 1) === '=')
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   269
		{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   270
			$this->position++;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   271
			$this->skip_whitespace();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   272
			$this->state = 'encoding_value';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   273
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   274
		else
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   275
		{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   276
			$this->state = false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   277
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   278
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   279
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   280
	public function encoding_value()
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   281
	{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   282
		if ($this->encoding = $this->get_value())
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   283
		{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   284
			$this->skip_whitespace();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   285
			if ($this->has_data())
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   286
			{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   287
				$this->state = 'standalone_name';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   288
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   289
			else
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   290
			{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   291
				$this->state = 'emit';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   292
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   293
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   294
		else
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   295
		{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   296
			$this->state = false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   297
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   298
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   299
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   300
	public function standalone_name()
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   301
	{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   302
		if (substr($this->data, $this->position, 10) === 'standalone')
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   303
		{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   304
			$this->position += 10;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   305
			$this->skip_whitespace();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   306
			$this->state = 'standalone_equals';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   307
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   308
		else
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   309
		{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   310
			$this->state = false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   311
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   312
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   313
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   314
	public function standalone_equals()
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   315
	{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   316
		if (substr($this->data, $this->position, 1) === '=')
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   317
		{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   318
			$this->position++;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   319
			$this->skip_whitespace();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   320
			$this->state = 'standalone_value';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   321
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   322
		else
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   323
		{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   324
			$this->state = false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   325
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   326
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   327
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   328
	public function standalone_value()
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   329
	{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   330
		if ($standalone = $this->get_value())
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   331
		{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   332
			switch ($standalone)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   333
			{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   334
				case 'yes':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   335
					$this->standalone = true;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   336
					break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   337
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   338
				case 'no':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   339
					$this->standalone = false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   340
					break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   341
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   342
				default:
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   343
					$this->state = false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   344
					return;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   345
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   346
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   347
			$this->skip_whitespace();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   348
			if ($this->has_data())
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   349
			{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   350
				$this->state = false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   351
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   352
			else
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   353
			{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   354
				$this->state = 'emit';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   355
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   356
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   357
		else
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   358
		{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   359
			$this->state = false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   360
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   361
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   362
}