Файл: system/libs/getid3/module.archive.gzip.php
Строк: 285
<?php
/////////////////////////////////////////////////////////////////
/// getID3() by James Heinrich <info@getid3.org>               //
//  available at https://github.com/JamesHeinrich/getID3       //
//            or https://www.getid3.org                        //
//            or http://getid3.sourceforge.net                 //
//  see readme.txt for more details                            //
/////////////////////////////////////////////////////////////////
//                                                             //
// module.archive.gzip.php                                     //
// module for analyzing GZIP files                             //
// dependencies: NONE                                          //
//                                                            ///
/////////////////////////////////////////////////////////////////
//                                                             //
// Module originally written by                                //
//      Mike Mozolin <teddybearØmail*ru>                       //
//                                                             //
/////////////////////////////////////////////////////////////////
if (!defined('GETID3_INCLUDEPATH')) { // prevent path-exposing attacks that access modules directly on public webservers
    exit;
}
class getid3_gzip extends getid3_handler
{
    /**
     * Optional file list - disable for speed.
     *
     * Decode gzipped files, if possible, and parse recursively (.tar.gz for example).
     *
     * @var bool
     */
    public $option_gzip_parse_contents = false;
    /**
     * @return bool
     */
    public function Analyze() {
        $info = &$this->getid3->info;
        $info['fileformat'] = 'gzip';
        $start_length = 10;
        $unpack_header = 'a1id1/a1id2/a1cmethod/a1flags/a4mtime/a1xflags/a1os';
        //+---+---+---+---+---+---+---+---+---+---+
        //|ID1|ID2|CM |FLG|     MTIME     |XFL|OS |
        //+---+---+---+---+---+---+---+---+---+---+
        if ($info['php_memory_limit'] && ($info['filesize'] > $info['php_memory_limit'])) {
            $this->error('File is too large ('.number_format($info['filesize']).' bytes) to read into memory (limit: '.number_format($info['php_memory_limit'] / 1048576).'MB)');
            return false;
        }
        $this->fseek(0);
        $buffer = $this->fread($info['filesize']);
        $arr_members = explode("x1Fx8Bx08", $buffer);
        $num_members = 0;
        while (true) {
            $is_wrong_members = false;
            $num_members = intval(count($arr_members));
            for ($i = 0; $i < $num_members; $i++) {
                if (strlen($arr_members[$i]) == 0) {
                    continue;
                }
                $buf = "x1Fx8Bx08".$arr_members[$i];
                $attr = unpack($unpack_header, substr($buf, 0, $start_length));
                if (!$this->get_os_type(ord($attr['os']))) {
                    // Merge member with previous if wrong OS type
                    $arr_members[($i - 1)] .= $buf;
                    $arr_members[$i] = '';
                    $is_wrong_members = true;
                    continue;
                }
            }
            if (!$is_wrong_members) {
                break;
            }
        }
        $info['gzip']['files'] = array();
        $fpointer = 0;
        $idx = 0;
        for ($i = 0; $i < $num_members; $i++) {
            if (strlen($arr_members[$i]) == 0) {
                continue;
            }
            $thisInfo = &$info['gzip']['member_header'][++$idx];
            $buff = "x1Fx8Bx08".$arr_members[$i];
            $attr = unpack($unpack_header, substr($buff, 0, $start_length));
            $thisInfo['filemtime']      = getid3_lib::LittleEndian2Int($attr['mtime']);
            $thisInfo['raw']['id1']     = ord($attr['cmethod']);
            $thisInfo['raw']['id2']     = ord($attr['cmethod']);
            $thisInfo['raw']['cmethod'] = ord($attr['cmethod']);
            $thisInfo['raw']['os']      = ord($attr['os']);
            $thisInfo['raw']['xflags']  = ord($attr['xflags']);
            $thisInfo['raw']['flags']   = ord($attr['flags']);
            $thisInfo['flags']['crc16']    = (bool) ($thisInfo['raw']['flags'] & 0x02);
            $thisInfo['flags']['extra']    = (bool) ($thisInfo['raw']['flags'] & 0x04);
            $thisInfo['flags']['filename'] = (bool) ($thisInfo['raw']['flags'] & 0x08);
            $thisInfo['flags']['comment']  = (bool) ($thisInfo['raw']['flags'] & 0x10);
            $thisInfo['compression'] = $this->get_xflag_type($thisInfo['raw']['xflags']);
            $thisInfo['os'] = $this->get_os_type($thisInfo['raw']['os']);
            if (!$thisInfo['os']) {
                $this->error('Read error on gzip file');
                return false;
            }
            $fpointer = 10;
            $arr_xsubfield = array();
            // bit 2 - FLG.FEXTRA
            //+---+---+=================================+
            //| XLEN  |...XLEN bytes of "extra field"...|
            //+---+---+=================================+
            if ($thisInfo['flags']['extra']) {
                $w_xlen = substr($buff, $fpointer, 2);
                $xlen = getid3_lib::LittleEndian2Int($w_xlen);
                $fpointer += 2;
                $thisInfo['raw']['xfield'] = substr($buff, $fpointer, $xlen);
                // Extra SubFields
                //+---+---+---+---+==================================+
                //|SI1|SI2|  LEN  |... LEN bytes of subfield data ...|
                //+---+---+---+---+==================================+
                $idx = 0;
                while (true) {
                    if ($idx >= $xlen) {
                        break;
                    }
                    $si1 = ord(substr($buff, $fpointer + $idx++, 1));
                    $si2 = ord(substr($buff, $fpointer + $idx++, 1));
                    if (($si1 == 0x41) && ($si2 == 0x70)) {
                        $w_xsublen = substr($buff, $fpointer + $idx, 2);
                        $xsublen = getid3_lib::LittleEndian2Int($w_xsublen);
                        $idx += 2;
                        $arr_xsubfield[] = substr($buff, $fpointer + $idx, $xsublen);
                        $idx += $xsublen;
                    } else {
                        break;
                    }
                }
                $fpointer += $xlen;
            }
            // bit 3 - FLG.FNAME
            //+=========================================+
            //|...original file name, zero-terminated...|
            //+=========================================+
            // GZIP files may have only one file, with no filename, so assume original filename is current filename without .gz
            $thisInfo['filename'] = preg_replace('#\.gz$#i', '', $info['filename']);
            if ($thisInfo['flags']['filename']) {
                $thisInfo['filename'] = '';
                while (true) {
                    if (ord($buff[$fpointer]) == 0) {
                        $fpointer++;
                        break;
                    }
                    $thisInfo['filename'] .= $buff[$fpointer];
                    $fpointer++;
                }
            }
            // bit 4 - FLG.FCOMMENT
            //+===================================+
            //|...file comment, zero-terminated...|
            //+===================================+
            if ($thisInfo['flags']['comment']) {
                while (true) {
                    if (ord($buff[$fpointer]) == 0) {
                        $fpointer++;
                        break;
                    }
                    $thisInfo['comment'] .= $buff[$fpointer];
                    $fpointer++;
                }
            }
            // bit 1 - FLG.FHCRC
            //+---+---+
            //| CRC16 |
            //+---+---+
            if ($thisInfo['flags']['crc16']) {
                $w_crc = substr($buff, $fpointer, 2);
                $thisInfo['crc16'] = getid3_lib::LittleEndian2Int($w_crc);
                $fpointer += 2;
            }
            // bit 0 - FLG.FTEXT
            //if ($thisInfo['raw']['flags'] & 0x01) {
            //    Ignored...
            //}
            // bits 5, 6, 7 - reserved
            $thisInfo['crc32']    = getid3_lib::LittleEndian2Int(substr($buff, strlen($buff) - 8, 4));
            $thisInfo['filesize'] = getid3_lib::LittleEndian2Int(substr($buff, strlen($buff) - 4));
            $info['gzip']['files'] = getid3_lib::array_merge_clobber($info['gzip']['files'], getid3_lib::CreateDeepArray($thisInfo['filename'], '/', $thisInfo['filesize']));
            if ($this->option_gzip_parse_contents) {
                // Try to inflate GZip
                $csize = 0;
                $inflated = '';
                $chkcrc32 = '';
                if (function_exists('gzinflate')) {
                    $cdata = substr($buff, $fpointer);
                    $cdata = substr($cdata, 0, strlen($cdata) - 8);
                    $csize = strlen($cdata);
                    $inflated = gzinflate($cdata);
                    // Calculate CRC32 for inflated content
                    $thisInfo['crc32_valid'] = sprintf('%u', crc32($inflated)) == $thisInfo['crc32'];
                    // determine format
                    $formattest = substr($inflated, 0, 32774);
                    $getid3_temp = new getID3();
                    $determined_format = $getid3_temp->GetFileFormat($formattest);
                    unset($getid3_temp);
                    // file format is determined
                    $determined_format['module'] = (isset($determined_format['module']) ? $determined_format['module'] : '');
                    switch ($determined_format['module']) {
                        case 'tar':
                            // view TAR-file info
                            if (file_exists(GETID3_INCLUDEPATH.$determined_format['include']) && include_once(GETID3_INCLUDEPATH.$determined_format['include'])) {
                                if (($temp_tar_filename = tempnam(GETID3_TEMP_DIR, 'getID3')) === false) {
                                    // can't find anywhere to create a temp file, abort
                                    $this->error('Unable to create temp file to parse TAR inside GZIP file');
                                    break;
                                }
                                if ($fp_temp_tar = fopen($temp_tar_filename, 'w+b')) {
                                    fwrite($fp_temp_tar, $inflated);
                                    fclose($fp_temp_tar);
                                    $getid3_temp = new getID3();
                                    $getid3_temp->openfile($temp_tar_filename);
                                    $getid3_tar = new getid3_tar($getid3_temp);
                                    $getid3_tar->Analyze();
                                    $info['gzip']['member_header'][$idx]['tar'] = $getid3_temp->info['tar'];
                                    unset($getid3_temp, $getid3_tar);
                                    unlink($temp_tar_filename);
                                } else {
                                    $this->error('Unable to fopen() temp file to parse TAR inside GZIP file');
                                    break;
                                }
                            }
                            break;
                        case '':
                        default:
                            // unknown or unhandled format
                            break;
                    }
                } else {
                    $this->warning('PHP is not compiled with gzinflate() support. Please enable PHP Zlib extension or recompile with the --with-zlib switch');
                }
            }
        }
        return true;
    }
    /**
     * Converts the OS type.
     *
     * @param string $key
     *
     * @return string
     */
    public function get_os_type($key) {
        static $os_type = array(
            '0'   => 'FAT filesystem (MS-DOS, OS/2, NT/Win32)',
            '1'   => 'Amiga',
            '2'   => 'VMS (or OpenVMS)',
            '3'   => 'Unix',
            '4'   => 'VM/CMS',
            '5'   => 'Atari TOS',
            '6'   => 'HPFS filesystem (OS/2, NT)',
            '7'   => 'Macintosh',
            '8'   => 'Z-System',
            '9'   => 'CP/M',
            '10'  => 'TOPS-20',
            '11'  => 'NTFS filesystem (NT)',
            '12'  => 'QDOS',
            '13'  => 'Acorn RISCOS',
            '255' => 'unknown'
        );
        return (isset($os_type[$key]) ? $os_type[$key] : '');
    }
    /**
     * Converts the eXtra FLags.
     *
     * @param string $key
     *
     * @return string
     */
    public function get_xflag_type($key) {
        static $xflag_type = array(
            '0' => 'unknown',
            '2' => 'maximum compression',
            '4' => 'fastest algorithm'
        );
        return (isset($xflag_type[$key]) ? $xflag_type[$key] : '');
    }
}