|
1
|
|
|
<?php |
|
2
|
|
|
|
|
3
|
|
|
$web = 'index.php'; |
|
4
|
|
|
|
|
5
|
|
|
if (in_array('phar', stream_get_wrappers()) && class_exists('Phar', 0)) { |
|
6
|
|
|
Phar::interceptFileFuncs(); |
|
7
|
|
|
set_include_path('phar://' . __FILE__ . PATH_SEPARATOR . get_include_path()); |
|
8
|
|
|
Phar::webPhar(null, $web); |
|
9
|
|
|
include 'phar://' . __FILE__ . '/' . Extract_Phar::START; |
|
10
|
|
|
return; |
|
11
|
|
|
} |
|
12
|
|
|
|
|
13
|
|
|
if (@(isset($_SERVER['REQUEST_URI']) && isset($_SERVER['REQUEST_METHOD']) && ($_SERVER['REQUEST_METHOD'] == 'GET' || $_SERVER['REQUEST_METHOD'] == 'POST'))) { |
|
14
|
|
|
Extract_Phar::go(true); |
|
15
|
|
|
$mimes = array( |
|
16
|
|
|
'phps' => 2, |
|
17
|
|
|
'c' => 'text/plain', |
|
18
|
|
|
'cc' => 'text/plain', |
|
19
|
|
|
'cpp' => 'text/plain', |
|
20
|
|
|
'c++' => 'text/plain', |
|
21
|
|
|
'dtd' => 'text/plain', |
|
22
|
|
|
'h' => 'text/plain', |
|
23
|
|
|
'log' => 'text/plain', |
|
24
|
|
|
'rng' => 'text/plain', |
|
25
|
|
|
'txt' => 'text/plain', |
|
26
|
|
|
'xsd' => 'text/plain', |
|
27
|
|
|
'php' => 1, |
|
28
|
|
|
'inc' => 1, |
|
29
|
|
|
'avi' => 'video/avi', |
|
30
|
|
|
'bmp' => 'image/bmp', |
|
31
|
|
|
'css' => 'text/css', |
|
32
|
|
|
'gif' => 'image/gif', |
|
33
|
|
|
'htm' => 'text/html', |
|
34
|
|
|
'html' => 'text/html', |
|
35
|
|
|
'htmls' => 'text/html', |
|
36
|
|
|
'ico' => 'image/x-ico', |
|
37
|
|
|
'jpe' => 'image/jpeg', |
|
38
|
|
|
'jpg' => 'image/jpeg', |
|
39
|
|
|
'jpeg' => 'image/jpeg', |
|
40
|
|
|
'js' => 'application/x-javascript', |
|
41
|
|
|
'midi' => 'audio/midi', |
|
42
|
|
|
'mid' => 'audio/midi', |
|
43
|
|
|
'mod' => 'audio/mod', |
|
44
|
|
|
'mov' => 'movie/quicktime', |
|
45
|
|
|
'mp3' => 'audio/mp3', |
|
46
|
|
|
'mpg' => 'video/mpeg', |
|
47
|
|
|
'mpeg' => 'video/mpeg', |
|
48
|
|
|
'pdf' => 'application/pdf', |
|
49
|
|
|
'png' => 'image/png', |
|
50
|
|
|
'swf' => 'application/shockwave-flash', |
|
51
|
|
|
'tif' => 'image/tiff', |
|
52
|
|
|
'tiff' => 'image/tiff', |
|
53
|
|
|
'wav' => 'audio/wav', |
|
54
|
|
|
'xbm' => 'image/xbm', |
|
55
|
|
|
'xml' => 'text/xml', |
|
56
|
|
|
); |
|
57
|
|
|
|
|
58
|
|
|
header("Cache-Control: no-cache, must-revalidate"); |
|
59
|
|
|
header("Pragma: no-cache"); |
|
60
|
|
|
|
|
61
|
|
|
$basename = basename(__FILE__); |
|
62
|
|
|
if (!strpos($_SERVER['REQUEST_URI'], $basename)) { |
|
63
|
|
|
chdir(Extract_Phar::$temp); |
|
64
|
|
|
include $web; |
|
65
|
|
|
return; |
|
66
|
|
|
} |
|
67
|
|
|
$pt = substr($_SERVER['REQUEST_URI'], strpos($_SERVER['REQUEST_URI'], $basename) + strlen($basename)); |
|
68
|
|
|
if (!$pt || $pt == '/') { |
|
69
|
|
|
$pt = $web; |
|
70
|
|
|
header('HTTP/1.1 301 Moved Permanently'); |
|
71
|
|
|
header('Location: ' . $_SERVER['REQUEST_URI'] . '/' . $pt); |
|
72
|
|
|
exit; |
|
73
|
|
|
} |
|
74
|
|
|
$a = realpath(Extract_Phar::$temp . DIRECTORY_SEPARATOR . $pt); |
|
75
|
|
|
if (!$a || strlen(dirname($a)) < strlen(Extract_Phar::$temp)) { |
|
76
|
|
|
header('HTTP/1.0 404 Not Found'); |
|
77
|
|
|
echo "<html>\n <head>\n <title>File Not Found<title>\n </head>\n <body>\n <h1>404 - File ", $pt, " Not Found</h1>\n </body>\n</html>"; |
|
78
|
|
|
exit; |
|
79
|
|
|
} |
|
80
|
|
|
$b = pathinfo($a); |
|
81
|
|
|
if (!isset($b['extension'])) { |
|
82
|
|
|
header('Content-Type: text/plain'); |
|
83
|
|
|
header('Content-Length: ' . filesize($a)); |
|
84
|
|
|
readfile($a); |
|
85
|
|
|
exit; |
|
86
|
|
|
} |
|
87
|
|
|
if (isset($mimes[$b['extension']])) { |
|
88
|
|
|
if ($mimes[$b['extension']] === 1) { |
|
89
|
|
|
include $a; |
|
90
|
|
|
exit; |
|
91
|
|
|
} |
|
92
|
|
|
if ($mimes[$b['extension']] === 2) { |
|
93
|
|
|
highlight_file($a); |
|
94
|
|
|
exit; |
|
95
|
|
|
} |
|
96
|
|
|
header('Content-Type: ' .$mimes[$b['extension']]); |
|
97
|
|
|
header('Content-Length: ' . filesize($a)); |
|
98
|
|
|
readfile($a); |
|
99
|
|
|
exit; |
|
100
|
|
|
} |
|
101
|
|
|
} |
|
102
|
|
|
|
|
103
|
|
|
class Extract_Phar |
|
104
|
|
|
{ |
|
105
|
|
|
static $temp; |
|
106
|
|
|
static $origdir; |
|
107
|
|
|
const GZ = 0x1000; |
|
108
|
|
|
const BZ2 = 0x2000; |
|
109
|
|
|
const MASK = 0x3000; |
|
110
|
|
|
const START = 'index.php'; |
|
111
|
|
|
const LEN = 6653; |
|
112
|
|
|
|
|
113
|
|
|
static function go($return = false) |
|
|
|
|
|
|
114
|
|
|
{ |
|
115
|
|
|
$fp = fopen(__FILE__, 'rb'); |
|
116
|
|
|
fseek($fp, self::LEN); |
|
|
|
|
|
|
117
|
|
|
$L = unpack('V', $a = fread($fp, 4)); |
|
|
|
|
|
|
118
|
|
|
$m = ''; |
|
119
|
|
|
|
|
120
|
|
|
do { |
|
121
|
|
|
$read = 8192; |
|
122
|
|
|
if ($L[1] - strlen($m) < 8192) { |
|
123
|
|
|
$read = $L[1] - strlen($m); |
|
124
|
|
|
} |
|
125
|
|
|
$last = fread($fp, $read); |
|
126
|
|
|
$m .= $last; |
|
127
|
|
|
} while (strlen($last) && strlen($m) < $L[1]); |
|
128
|
|
|
|
|
129
|
|
|
if (strlen($m) < $L[1]) { |
|
130
|
|
|
die('ERROR: manifest length read was "' . |
|
|
|
|
|
|
131
|
|
|
strlen($m) .'" should be "' . |
|
132
|
|
|
$L[1] . '"'); |
|
133
|
|
|
} |
|
134
|
|
|
|
|
135
|
|
|
$info = self::_unpack($m); |
|
136
|
|
|
$f = $info['c']; |
|
137
|
|
|
|
|
138
|
|
|
if ($f & self::GZ) { |
|
139
|
|
|
if (!function_exists('gzinflate')) { |
|
140
|
|
|
die('Error: zlib extension is not enabled -' . |
|
|
|
|
|
|
141
|
|
|
' gzinflate() function needed for zlib-compressed .phars'); |
|
142
|
|
|
} |
|
143
|
|
|
} |
|
144
|
|
|
|
|
145
|
|
|
if ($f & self::BZ2) { |
|
146
|
|
|
if (!function_exists('bzdecompress')) { |
|
147
|
|
|
die('Error: bzip2 extension is not enabled -' . |
|
|
|
|
|
|
148
|
|
|
' bzdecompress() function needed for bz2-compressed .phars'); |
|
149
|
|
|
} |
|
150
|
|
|
} |
|
151
|
|
|
|
|
152
|
|
|
$temp = self::tmpdir(); |
|
153
|
|
|
|
|
154
|
|
|
if (!$temp || !is_writable($temp)) { |
|
|
|
|
|
|
155
|
|
|
$sessionpath = session_save_path(); |
|
156
|
|
|
if (strpos ($sessionpath, ";") !== false) |
|
157
|
|
|
$sessionpath = substr ($sessionpath, strpos ($sessionpath, ";")+1); |
|
158
|
|
|
if (!file_exists($sessionpath) || !is_dir($sessionpath)) { |
|
159
|
|
|
die('Could not locate temporary directory to extract phar'); |
|
|
|
|
|
|
160
|
|
|
} |
|
161
|
|
|
$temp = $sessionpath; |
|
162
|
|
|
} |
|
163
|
|
|
|
|
164
|
|
|
$temp .= '/pharextract/'.basename(__FILE__, '.phar'); |
|
165
|
|
|
self::$temp = $temp; |
|
166
|
|
|
self::$origdir = getcwd(); |
|
167
|
|
|
@mkdir($temp, 0777, true); |
|
|
|
|
|
|
168
|
|
|
$temp = realpath($temp); |
|
169
|
|
|
|
|
170
|
|
|
if (!file_exists($temp . DIRECTORY_SEPARATOR . md5_file(__FILE__))) { |
|
171
|
|
|
self::_removeTmpFiles($temp, getcwd()); |
|
172
|
|
|
@mkdir($temp, 0777, true); |
|
173
|
|
|
@file_put_contents($temp . '/' . md5_file(__FILE__), ''); |
|
|
|
|
|
|
174
|
|
|
|
|
175
|
|
|
foreach ($info['m'] as $path => $file) { |
|
176
|
|
|
$a = !file_exists(dirname($temp . '/' . $path)); |
|
177
|
|
|
@mkdir(dirname($temp . '/' . $path), 0777, true); |
|
178
|
|
|
clearstatcache(); |
|
179
|
|
|
|
|
180
|
|
|
if ($path[strlen($path) - 1] == '/') { |
|
181
|
|
|
@mkdir($temp . '/' . $path, 0777); |
|
182
|
|
|
} else { |
|
183
|
|
|
file_put_contents($temp . '/' . $path, self::extractFile($path, $file, $fp)); |
|
184
|
|
|
@chmod($temp . '/' . $path, 0666); |
|
|
|
|
|
|
185
|
|
|
} |
|
186
|
|
|
} |
|
187
|
|
|
} |
|
188
|
|
|
|
|
189
|
|
|
chdir($temp); |
|
190
|
|
|
|
|
191
|
|
|
if (!$return) { |
|
192
|
|
|
include self::START; |
|
193
|
|
|
} |
|
194
|
|
|
} |
|
195
|
|
|
|
|
196
|
|
|
static function tmpdir() |
|
|
|
|
|
|
197
|
|
|
{ |
|
198
|
|
|
if (strpos(PHP_OS, 'WIN') !== false) { |
|
199
|
|
|
if ($var = getenv('TMP') ? getenv('TMP') : getenv('TEMP')) { |
|
200
|
|
|
return $var; |
|
201
|
|
|
} |
|
202
|
|
|
if (is_dir('/temp') || mkdir('/temp')) { |
|
203
|
|
|
return realpath('/temp'); |
|
204
|
|
|
} |
|
205
|
|
|
return false; |
|
206
|
|
|
} |
|
207
|
|
|
if ($var = getenv('TMPDIR')) { |
|
208
|
|
|
return $var; |
|
209
|
|
|
} |
|
210
|
|
|
return realpath('/tmp'); |
|
211
|
|
|
} |
|
212
|
|
|
|
|
213
|
|
|
static function _unpack($m) |
|
|
|
|
|
|
214
|
|
|
{ |
|
215
|
|
|
$info = unpack('V', substr($m, 0, 4)); |
|
216
|
|
|
$l = unpack('V', substr($m, 10, 4)); |
|
217
|
|
|
$m = substr($m, 14 + $l[1]); |
|
218
|
|
|
$s = unpack('V', substr($m, 0, 4)); |
|
219
|
|
|
$o = 0; |
|
220
|
|
|
$start = 4 + $s[1]; |
|
221
|
|
|
$ret['c'] = 0; |
|
|
|
|
|
|
222
|
|
|
|
|
223
|
|
|
for ($i = 0; $i < $info[1]; $i++) { |
|
224
|
|
|
$len = unpack('V', substr($m, $start, 4)); |
|
225
|
|
|
$start += 4; |
|
226
|
|
|
$savepath = substr($m, $start, $len[1]); |
|
227
|
|
|
$start += $len[1]; |
|
228
|
|
|
$ret['m'][$savepath] = array_values(unpack('Va/Vb/Vc/Vd/Ve/Vf', substr($m, $start, 24))); |
|
229
|
|
|
$ret['m'][$savepath][3] = sprintf('%u', $ret['m'][$savepath][3] |
|
230
|
|
|
& 0xffffffff); |
|
231
|
|
|
$ret['m'][$savepath][7] = $o; |
|
232
|
|
|
$o += $ret['m'][$savepath][2]; |
|
233
|
|
|
$start += 24 + $ret['m'][$savepath][5]; |
|
234
|
|
|
$ret['c'] |= $ret['m'][$savepath][4] & self::MASK; |
|
235
|
|
|
} |
|
236
|
|
|
return $ret; |
|
237
|
|
|
} |
|
238
|
|
|
|
|
239
|
|
|
static function extractFile($path, $entry, $fp) |
|
|
|
|
|
|
240
|
|
|
{ |
|
241
|
|
|
$data = ''; |
|
242
|
|
|
$c = $entry[2]; |
|
243
|
|
|
|
|
244
|
|
|
while ($c) { |
|
245
|
|
|
if ($c < 8192) { |
|
246
|
|
|
$data .= @fread($fp, $c); |
|
247
|
|
|
$c = 0; |
|
248
|
|
|
} else { |
|
249
|
|
|
$c -= 8192; |
|
250
|
|
|
$data .= @fread($fp, 8192); |
|
251
|
|
|
} |
|
252
|
|
|
} |
|
253
|
|
|
|
|
254
|
|
|
if ($entry[4] & self::GZ) { |
|
255
|
|
|
$data = gzinflate($data); |
|
256
|
|
|
} elseif ($entry[4] & self::BZ2) { |
|
257
|
|
|
$data = bzdecompress($data); |
|
258
|
|
|
} |
|
259
|
|
|
|
|
260
|
|
|
if (strlen($data) != $entry[0]) { |
|
261
|
|
|
die("Invalid internal .phar file (size error " . strlen($data) . " != " . |
|
|
|
|
|
|
262
|
|
|
$stat[7] . ")"); |
|
|
|
|
|
|
263
|
|
|
} |
|
264
|
|
|
|
|
265
|
|
|
if ($entry[3] != sprintf("%u", crc32($data) & 0xffffffff)) { |
|
266
|
|
|
die("Invalid internal .phar file (checksum error)"); |
|
|
|
|
|
|
267
|
|
|
} |
|
268
|
|
|
|
|
269
|
|
|
return $data; |
|
270
|
|
|
} |
|
271
|
|
|
|
|
272
|
|
|
static function _removeTmpFiles($temp, $origdir) |
|
|
|
|
|
|
273
|
|
|
{ |
|
274
|
|
|
chdir($temp); |
|
275
|
|
|
|
|
276
|
|
|
foreach (glob('*') as $f) { |
|
277
|
|
|
if (file_exists($f)) { |
|
278
|
|
|
is_dir($f) ? @rmdir($f) : @unlink($f); |
|
279
|
|
|
if (file_exists($f) && is_dir($f)) { |
|
280
|
|
|
self::_removeTmpFiles($f, getcwd()); |
|
281
|
|
|
} |
|
282
|
|
|
} |
|
283
|
|
|
} |
|
284
|
|
|
|
|
285
|
|
|
@rmdir($temp); |
|
|
|
|
|
|
286
|
|
|
clearstatcache(); |
|
287
|
|
|
chdir($origdir); |
|
288
|
|
|
} |
|
289
|
|
|
} |
|
290
|
|
|
|
|
291
|
|
|
Extract_Phar::go(); |
|
292
|
|
|
__HALT_COMPILER(); ?> |
|
293
|
|
|
|
Adding explicit visibility (
private,protected, orpublic) is generally recommend to communicate to other developers how, and from where this method is intended to be used.