wp/wp-includes/SimplePie/gzdecode.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
 * Decode 'gzip' encoded HTTP data
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 HTTP
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    51
 * @link http://www.gzip.org/format.txt
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    52
 */
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    53
class SimplePie_gzdecode
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    54
{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    55
	/**
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    56
	 * Compressed data
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    57
	 *
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    58
	 * @access private
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    59
	 * @var string
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    60
	 * @see gzdecode::$data
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    61
	 */
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    62
	var $compressed_data;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    63
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    64
	/**
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    65
	 * Size of compressed data
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    66
	 *
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    67
	 * @access private
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    68
	 * @var int
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    69
	 */
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    70
	var $compressed_size;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    71
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    72
	/**
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    73
	 * Minimum size of a valid gzip string
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    74
	 *
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    75
	 * @access private
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    76
	 * @var int
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    77
	 */
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    78
	var $min_compressed_size = 18;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    79
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    80
	/**
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    81
	 * Current position of pointer
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    82
	 *
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    83
	 * @access private
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    84
	 * @var int
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    85
	 */
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    86
	var $position = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    87
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    88
	/**
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    89
	 * Flags (FLG)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    90
	 *
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    91
	 * @access private
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    92
	 * @var int
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    93
	 */
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    94
	var $flags;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    95
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    96
	/**
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    97
	 * Uncompressed data
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    98
	 *
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    99
	 * @access public
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   100
	 * @see gzdecode::$compressed_data
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   101
	 * @var string
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   102
	 */
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   103
	var $data;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   104
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   105
	/**
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   106
	 * Modified time
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   107
	 *
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   108
	 * @access public
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   109
	 * @var int
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   110
	 */
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   111
	var $MTIME;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   112
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   113
	/**
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   114
	 * Extra Flags
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   115
	 *
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   116
	 * @access public
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   117
	 * @var int
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   118
	 */
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   119
	var $XFL;
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
	 * Operating System
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   123
	 *
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   124
	 * @access public
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   125
	 * @var int
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   126
	 */
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   127
	var $OS;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   128
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   129
	/**
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   130
	 * Subfield ID 1
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   131
	 *
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   132
	 * @access public
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   133
	 * @see gzdecode::$extra_field
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   134
	 * @see gzdecode::$SI2
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   135
	 * @var string
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   136
	 */
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   137
	var $SI1;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   138
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   139
	/**
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   140
	 * Subfield ID 2
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   141
	 *
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   142
	 * @access public
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   143
	 * @see gzdecode::$extra_field
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   144
	 * @see gzdecode::$SI1
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   145
	 * @var string
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   146
	 */
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   147
	var $SI2;
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
	 * Extra field content
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 public
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   153
	 * @see gzdecode::$SI1
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   154
	 * @see gzdecode::$SI2
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   155
	 * @var string
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   156
	 */
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   157
	var $extra_field;
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
	 * Original filename
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   161
	 *
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   162
	 * @access public
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   163
	 * @var string
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   164
	 */
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   165
	var $filename;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   166
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   167
	/**
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   168
	 * Human readable comment
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   169
	 *
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   170
	 * @access public
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   171
	 * @var string
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   172
	 */
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   173
	var $comment;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   174
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   175
	/**
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   176
	 * Don't allow anything to be set
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   177
	 *
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   178
	 * @param string $name
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   179
	 * @param mixed $value
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   180
	 */
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   181
	public function __set($name, $value)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   182
	{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   183
		trigger_error("Cannot write property $name", E_USER_ERROR);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   184
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   185
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   186
	/**
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   187
	 * Set the compressed string and related properties
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   188
	 *
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   189
	 * @param string $data
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   190
	 */
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   191
	public function __construct($data)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   192
	{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   193
		$this->compressed_data = $data;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   194
		$this->compressed_size = strlen($data);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   195
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   196
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   197
	/**
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   198
	 * Decode the GZIP stream
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   199
	 *
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   200
	 * @return bool Successfulness
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   201
	 */
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   202
	public function parse()
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   203
	{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   204
		if ($this->compressed_size >= $this->min_compressed_size)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   205
		{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   206
			// Check ID1, ID2, and CM
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   207
			if (substr($this->compressed_data, 0, 3) !== "\x1F\x8B\x08")
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   208
			{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   209
				return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   210
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   211
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   212
			// Get the FLG (FLaGs)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   213
			$this->flags = ord($this->compressed_data[3]);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   214
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   215
			// FLG bits above (1 << 4) are reserved
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   216
			if ($this->flags > 0x1F)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   217
			{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   218
				return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   219
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   220
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   221
			// Advance the pointer after the above
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   222
			$this->position += 4;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   223
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   224
			// MTIME
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   225
			$mtime = substr($this->compressed_data, $this->position, 4);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   226
			// Reverse the string if we're on a big-endian arch because l is the only signed long and is machine endianness
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   227
			if (current(unpack('S', "\x00\x01")) === 1)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   228
			{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   229
				$mtime = strrev($mtime);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   230
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   231
			$this->MTIME = current(unpack('l', $mtime));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   232
			$this->position += 4;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   233
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   234
			// Get the XFL (eXtra FLags)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   235
			$this->XFL = ord($this->compressed_data[$this->position++]);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   236
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   237
			// Get the OS (Operating System)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   238
			$this->OS = ord($this->compressed_data[$this->position++]);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   239
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   240
			// Parse the FEXTRA
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   241
			if ($this->flags & 4)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   242
			{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   243
				// Read subfield IDs
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   244
				$this->SI1 = $this->compressed_data[$this->position++];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   245
				$this->SI2 = $this->compressed_data[$this->position++];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   246
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   247
				// SI2 set to zero is reserved for future use
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   248
				if ($this->SI2 === "\x00")
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   249
				{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   250
					return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   251
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   252
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   253
				// Get the length of the extra field
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   254
				$len = current(unpack('v', substr($this->compressed_data, $this->position, 2)));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   255
				$this->position += 2;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   256
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   257
				// Check the length of the string is still valid
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   258
				$this->min_compressed_size += $len + 4;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   259
				if ($this->compressed_size >= $this->min_compressed_size)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   260
				{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   261
					// Set the extra field to the given data
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   262
					$this->extra_field = substr($this->compressed_data, $this->position, $len);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   263
					$this->position += $len;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   264
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   265
				else
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   266
				{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   267
					return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   268
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   269
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   270
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   271
			// Parse the FNAME
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   272
			if ($this->flags & 8)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   273
			{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   274
				// Get the length of the filename
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   275
				$len = strcspn($this->compressed_data, "\x00", $this->position);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   276
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   277
				// Check the length of the string is still valid
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   278
				$this->min_compressed_size += $len + 1;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   279
				if ($this->compressed_size >= $this->min_compressed_size)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   280
				{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   281
					// Set the original filename to the given string
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   282
					$this->filename = substr($this->compressed_data, $this->position, $len);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   283
					$this->position += $len + 1;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   284
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   285
				else
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   286
				{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   287
					return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   288
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   289
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   290
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   291
			// Parse the FCOMMENT
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   292
			if ($this->flags & 16)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   293
			{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   294
				// Get the length of the comment
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   295
				$len = strcspn($this->compressed_data, "\x00", $this->position);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   296
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   297
				// Check the length of the string is still valid
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   298
				$this->min_compressed_size += $len + 1;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   299
				if ($this->compressed_size >= $this->min_compressed_size)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   300
				{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   301
					// Set the original comment to the given string
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   302
					$this->comment = substr($this->compressed_data, $this->position, $len);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   303
					$this->position += $len + 1;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   304
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   305
				else
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   306
				{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   307
					return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   308
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   309
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   310
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   311
			// Parse the FHCRC
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   312
			if ($this->flags & 2)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   313
			{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   314
				// Check the length of the string is still valid
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   315
				$this->min_compressed_size += $len + 2;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   316
				if ($this->compressed_size >= $this->min_compressed_size)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   317
				{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   318
					// Read the CRC
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   319
					$crc = current(unpack('v', substr($this->compressed_data, $this->position, 2)));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   320
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   321
					// Check the CRC matches
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   322
					if ((crc32(substr($this->compressed_data, 0, $this->position)) & 0xFFFF) === $crc)
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->position += 2;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   325
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   326
					else
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   327
					{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   328
						return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   329
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   330
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   331
				else
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   332
				{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   333
					return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   334
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   335
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   336
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   337
			// Decompress the actual data
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   338
			if (($this->data = gzinflate(substr($this->compressed_data, $this->position, -8))) === false)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   339
			{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   340
				return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   341
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   342
			else
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   343
			{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   344
				$this->position = $this->compressed_size - 8;
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
			// Check CRC of data
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   348
			$crc = current(unpack('V', substr($this->compressed_data, $this->position, 4)));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   349
			$this->position += 4;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   350
			/*if (extension_loaded('hash') && sprintf('%u', current(unpack('V', hash('crc32b', $this->data)))) !== sprintf('%u', $crc))
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   351
			{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   352
				return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   353
			}*/
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   354
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   355
			// Check ISIZE of data
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   356
			$isize = current(unpack('V', substr($this->compressed_data, $this->position, 4)));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   357
			$this->position += 4;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   358
			if (sprintf('%u', strlen($this->data) & 0xFFFFFFFF) !== sprintf('%u', $isize))
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   359
			{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   360
				return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   361
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   362
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   363
			// Wow, against all odds, we've actually got a valid gzip string
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   364
			return true;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   365
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   366
		else
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   367
		{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   368
			return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   369
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   370
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   371
}