Annotation of embedaddon/php/ext/phar/tests/files/include_path2.phar, revision 1.1.1.1

1.1       misho       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 = 6685;
                    112: 
                    113: static function go($return = false)
                    114: {
                    115: $fp = fopen(__FILE__, 'rb');
                    116: fseek($fp, self::LEN);
                    117: $L = unpack('V', $a = (binary)fread($fp, 4));
                    118: $m = (binary)'';
                    119: 
                    120: do {
                    121: $read = 8192;
                    122: if ($L[1] - strlen($m) < 8192) {
                    123: $read = $L[1] - strlen($m);
                    124: }
                    125: $last = (binary)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((binary)$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(); ?>a&    file1.php
                    293: rœñH
                    294: ‰¿Â¶&test/file1.phprœñHCö®G¶&file1.php
                    295: test/file1.php
                    296: &E/Ýg–TIvé`@Ä·@Ò,.GBMB

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>