Return to make.dangerous.tar.php.inc CVS log

Up to [ELWIX - Embedded LightWeight unIX -] / embedaddon / php / ext / phar / tests / tar / files

Annotation of embedaddon/php/ext/phar/tests/tar/files/make.dangerous.tar.php.inc, revision 1.1

1.1     ! misho       1: <?php
        !             2: // stolen from PEAR2_Pyrus_Developer_Creator_Tar by Greg Beaver, the original author, for use in unit tests
        !             3: // this tarmaker makes a malicious tar with a header designed to overflow the buffer
        !             4: class danger_tarmaker
        !             5: {
        !             6:     /**
        !             7:      * Path to archive file
        !             8:      *
        !             9:      * @var string
        !            10:      */
        !            11:     protected $archive;
        !            12:     /**
        !            13:      * Temporary stream used for creating the archive
        !            14:      *
        !            15:      * @var stream
        !            16:      */
        !            17:     protected $tmp;
        !            18:     protected $path;
        !            19:     protected $compress;
        !            20:     function __construct($path, $compress = 'zlib')
        !            21:     {
        !            22:         $this->compress = $compress;
        !            23:         if ($compress === 'bz2' && !function_exists('bzopen')) {
        !            24:             throw new PEAR2_Pyrus_Developer_Creator_Exception(
        !            25:                 'bzip2 extension not available');
        !            26:         }
        !            27:         if ($compress === 'zlib' && !function_exists('gzopen')) {
        !            28:             throw new PEAR2_Pyrus_Developer_Creator_Exception(
        !            29:                 'zlib extension not available');
        !            30:         }
        !            31:         $this->path = $path;
        !            32:     }
        !            33: 
        !            34:     /**
        !            35:      * save a file inside this package
        !            36:      * 
        !            37:      * This code is modified from Vincent Lascaux's File_Archive
        !            38:      * package, which is licensed under the LGPL license.
        !            39:      * @param string relative path within the package
        !            40:      * @param string|resource file contents or open file handle
        !            41:      */
        !            42:     function addFile($path, $fileOrStream, $stat = null)
        !            43:     {
        !            44:         clearstatcache();
        !            45:         if ($stat === null) {
        !            46:             if (is_resource($fileOrStream)) {
        !            47:                 $stat = fstat($fileOrStream);
        !            48:             } else {
        !            49:                 $stat = array(
        !            50:                     'mode' => 0x8000 + 0644,
        !            51:                     'uid' => 0,
        !            52:                     'gid' => 0,
        !            53:                     'size' => strlen($fileOrStream),
        !            54:                     'mtime' => time(),
        !            55:                 );
        !            56:             }
        !            57:         }
        !            58: 
        !            59:         $link = null;
        !            60:         if ($stat['mode'] & 0x4000) {
        !            61:             $type = 5;        // Directory
        !            62:         } else if ($stat['mode'] & 0x8000) {
        !            63:             $type = 0;        // Regular
        !            64:         } else if ($stat['mode'] & 0xA000) {
        !            65:             $type = 1;        // Link
        !            66:             $link = @readlink($current);
        !            67:         } else {
        !            68:             $type = 9;        // Unknown
        !            69:         }
        !            70: 
        !            71:         $filePrefix = '';
        !            72:         if (strlen($path) > 255) {
        !            73:             throw new Exception(
        !            74:                 "$path is too long, must be 255 characters or less"
        !            75:             );
        !            76:         } else if (strlen($path) > 100) {
        !            77:             $filePrefix = substr($path, 0, strlen($path)-100);
        !            78:             $path = substr($path, -100);
        !            79:         }
        !            80: 
        !            81:         $block = pack('a100a8a8a8a12A12',
        !            82:                 $path,
        !            83:                 '12345678', // have a mode that allows the name to overflow
        !            84:                 sprintf('%6s ',decoct($stat['uid'])),
        !            85:                 sprintf('%6s ',decoct($stat['gid'])),
        !            86:                 sprintf('%11s ',decoct($stat['size'])),
        !            87:                 sprintf('%11s ',decoct($stat['mtime']))
        !            88:             );
        !            89: 
        !            90:         $blockend = pack('a1a100a6a2a32a32a8a8a155a12',
        !            91:             $type,
        !            92:             $link,
        !            93:             'ustar',
        !            94:             '00',
        !            95:             'Pyrus',
        !            96:             'Pyrus',
        !            97:             '',
        !            98:             '',
        !            99:             $filePrefix,
        !           100:             '123456789abc'); // malicious block
        !           101: 
        !           102:         $checkheader = array_merge(str_split($block), str_split($blockend));
        !           103:         if (!function_exists('_pear2tarchecksum')) {
        !           104:             function _pear2tarchecksum($a, $b) {return $a + ord($b);}
        !           105:         }
        !           106:         $checksum = 256; // 8 * ord(' ');
        !           107:         $checksum += array_reduce($checkheader, '_pear2tarchecksum');
        !           108: 
        !           109:         $checksum = pack('a8', sprintf('%6s ', decoct($checksum)));
        !           110: 
        !           111:         fwrite($this->tmp, (binary)$block . $checksum . $blockend, 512);
        !           112:         if (is_resource($fileOrStream)) {
        !           113:             stream_copy_to_stream($fileOrStream, $this->tmp);
        !           114:             if ($stat['size'] % 512) {
        !           115:                 fwrite($this->tmp, (binary)str_repeat("\0", 512 - $stat['size'] % 512));
        !           116:             }
        !           117:         } else {
        !           118:             fwrite($this->tmp, (binary)$fileOrStream);
        !           119:             if (strlen($fileOrStream) % 512) {
        !           120:                 fwrite($this->tmp, (binary)str_repeat("\0", 512 - strlen($fileOrStream) % 512));
        !           121:             }
        !           122:         }
        !           123:     }
        !           124: 
        !           125:     /**
        !           126:      * Initialize the package creator
        !           127:      */
        !           128:     function init()
        !           129:     {
        !           130:         switch ($this->compress) {
        !           131:             case 'zlib' :
        !           132:                 $this->tmp = gzopen($this->path, 'wb');
        !           133:                 break;
        !           134:             case 'bz2' :
        !           135:                 $this->tmp = bzopen($this->path, 'w');
        !           136:                 break;
        !           137:             case 'none' :
        !           138:                 $this->tmp = fopen($this->path, 'wb');
        !           139:                 break;
        !           140:             default :
        !           141:                 throw new Exception(
        !           142:                     'unknown compression type ' . $this->compress);
        !           143:         }
        !           144:     }
        !           145: 
        !           146:     /**
        !           147:      * Create an internal directory, creating parent directories as needed
        !           148:      * 
        !           149:      * @param string $dir
        !           150:      */
        !           151:     function mkdir($dir)
        !           152:     {
        !           153:         $this->addFile($dir, "", array(
        !           154:                     'mode' => 0x4000 + 0644,
        !           155:                     'uid' => 0,
        !           156:                     'gid' => 0,
        !           157:                     'size' => 0,
        !           158:                     'mtime' => time(),
        !           159:                 ));
        !           160:     }
        !           161: 
        !           162:     /**
        !           163:      * Finish saving the package
        !           164:      */
        !           165:     function close()
        !           166:     {
        !           167:         fwrite($this->tmp, pack('a1024', ''));
        !           168:         fclose($this->tmp);
        !           169:     }
        !           170: }