File indexing completed on 2024-05-12 17:25:55

 <?php
 /////////////////////////////////////////////////////////////////
 /// getID3() by James Heinrich <info@getid3.org>               //
 //  available at http://getid3.sourceforge.net                 //
 //            or http://www.getid3.org                         //
 //          also https://github.com/JamesHeinrich/getID3       //
 /////////////////////////////////////////////////////////////////
 // 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>                       //
 //                                                             //
 /////////////////////////////////////////////////////////////////
 
 
 class getid3_gzip extends getid3_handler {
 
   // public: Optional file list - disable for speed.
   public $option_gzip_parse_contents = false; // decode gzipped files, if possible, and parse recursively (.tar.gz for example)
 
   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['filesize'] > $info['php_memory_limit']) {
       $info['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("\x1F\x8B\x08", $buffer);
     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 = "\x1F\x8B\x08".$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 = "\x1F\x8B\x08".$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']) {
         $info['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'] = (bool) (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
                   $info['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 {
                   $info['error'][] = 'Unable to fopen() temp file to parse TAR inside GZIP file';
                   break;
                 }
               }
               break;
 
             case '':
             default:
               // unknown or unhandled format
               break;
           }
         }
       }
     }
     return true;
   }
 
   // Converts the OS type
   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
   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] : '');
   }
 }