Пример #1
0
 public function Analyze()
 {
     $info =& $this->getid3->info;
     $this->fseek($info['avdataoffset']);
     $NSVheader = $this->fread(4);
     switch ($NSVheader) {
         case 'NSVs':
             if ($this->getNSVsHeaderFilepointer(0)) {
                 $info['fileformat'] = 'nsv';
                 $info['audio']['dataformat'] = 'nsv';
                 $info['video']['dataformat'] = 'nsv';
                 $info['audio']['lossless'] = false;
                 $info['video']['lossless'] = false;
             }
             break;
         case 'NSVf':
             if ($this->getNSVfHeaderFilepointer(0)) {
                 $info['fileformat'] = 'nsv';
                 $info['audio']['dataformat'] = 'nsv';
                 $info['video']['dataformat'] = 'nsv';
                 $info['audio']['lossless'] = false;
                 $info['video']['lossless'] = false;
                 $this->getNSVsHeaderFilepointer($info['nsv']['NSVf']['header_length']);
             }
             break;
         default:
             $info['error'][] = 'Expecting "NSVs" or "NSVf" at offset ' . $info['avdataoffset'] . ', found "' . Utils::PrintHexBytes($NSVheader) . '"';
             return false;
             break;
     }
     if (!isset($info['nsv']['NSVf'])) {
         $info['warning'][] = 'NSVf header not present - cannot calculate playtime or bitrate';
     }
     return true;
 }
Пример #2
0
 public function Analyze()
 {
     $info =& $this->getid3->info;
     $info['mpc']['header'] = array();
     $thisfile_mpc_header =& $info['mpc']['header'];
     $info['fileformat'] = 'mpc';
     $info['audio']['dataformat'] = 'mpc';
     $info['audio']['bitrate_mode'] = 'vbr';
     $info['audio']['channels'] = 2;
     // up to SV7 the format appears to have been hardcoded for stereo only
     $info['audio']['lossless'] = false;
     $this->fseek($info['avdataoffset']);
     $MPCheaderData = $this->fread(4);
     $info['mpc']['header']['preamble'] = substr($MPCheaderData, 0, 4);
     // should be 'MPCK' (SV8) or 'MP+' (SV7), otherwise possible stream data (SV4-SV6)
     if (preg_match('#^MPCK#', $info['mpc']['header']['preamble'])) {
         // this is SV8
         return $this->ParseMPCsv8();
     } elseif (preg_match('#^MP\\+#', $info['mpc']['header']['preamble'])) {
         // this is SV7
         return $this->ParseMPCsv7();
     } elseif (preg_match('/^[\\x00\\x01\\x10\\x11\\x40\\x41\\x50\\x51\\x80\\x81\\x90\\x91\\xC0\\xC1\\xD0\\xD1][\\x20-37][\\x00\\x20\\x40\\x60\\x80\\xA0\\xC0\\xE0]/s', $MPCheaderData)) {
         // this is SV4 - SV6, handle seperately
         return $this->ParseMPCsv6();
     } else {
         $info['error'][] = 'Expecting "MP+" or "MPCK" at offset ' . $info['avdataoffset'] . ', found "' . Utils::PrintHexBytes(substr($MPCheaderData, 0, 4)) . '"';
         unset($info['fileformat']);
         unset($info['mpc']);
         return false;
     }
     return false;
 }
Пример #3
0
 public function Analyze()
 {
     $info =& $this->getid3->info;
     $this->fseek($info['avdataoffset']);
     $EXEheader = $this->fread(28);
     $magic = 'MZ';
     if (substr($EXEheader, 0, 2) != $magic) {
         $info['error'][] = 'Expecting "' . Utils::PrintHexBytes($magic) . '" at offset ' . $info['avdataoffset'] . ', found "' . Utils::PrintHexBytes(substr($EXEheader, 0, 2)) . '"';
         return false;
     }
     $info['fileformat'] = 'exe';
     $info['exe']['mz']['magic'] = 'MZ';
     $info['exe']['mz']['raw']['last_page_size'] = Utils::LittleEndian2Int(substr($EXEheader, 2, 2));
     $info['exe']['mz']['raw']['page_count'] = Utils::LittleEndian2Int(substr($EXEheader, 4, 2));
     $info['exe']['mz']['raw']['relocation_count'] = Utils::LittleEndian2Int(substr($EXEheader, 6, 2));
     $info['exe']['mz']['raw']['header_paragraphs'] = Utils::LittleEndian2Int(substr($EXEheader, 8, 2));
     $info['exe']['mz']['raw']['min_memory_paragraphs'] = Utils::LittleEndian2Int(substr($EXEheader, 10, 2));
     $info['exe']['mz']['raw']['max_memory_paragraphs'] = Utils::LittleEndian2Int(substr($EXEheader, 12, 2));
     $info['exe']['mz']['raw']['initial_ss'] = Utils::LittleEndian2Int(substr($EXEheader, 14, 2));
     $info['exe']['mz']['raw']['initial_sp'] = Utils::LittleEndian2Int(substr($EXEheader, 16, 2));
     $info['exe']['mz']['raw']['checksum'] = Utils::LittleEndian2Int(substr($EXEheader, 18, 2));
     $info['exe']['mz']['raw']['cs_ip'] = Utils::LittleEndian2Int(substr($EXEheader, 20, 4));
     $info['exe']['mz']['raw']['relocation_table_offset'] = Utils::LittleEndian2Int(substr($EXEheader, 24, 2));
     $info['exe']['mz']['raw']['overlay_number'] = Utils::LittleEndian2Int(substr($EXEheader, 26, 2));
     $info['exe']['mz']['byte_size'] = ($info['exe']['mz']['raw']['page_count'] - 1) * 512 + $info['exe']['mz']['raw']['last_page_size'];
     $info['exe']['mz']['header_size'] = $info['exe']['mz']['raw']['header_paragraphs'] * 16;
     $info['exe']['mz']['memory_minimum'] = $info['exe']['mz']['raw']['min_memory_paragraphs'] * 16;
     $info['exe']['mz']['memory_recommended'] = $info['exe']['mz']['raw']['max_memory_paragraphs'] * 16;
     $info['error'][] = 'EXE parsing not enabled in this version of getID3() [' . $this->getid3->version() . ']';
     return false;
 }
Пример #4
0
 public function Analyze()
 {
     $info =& $this->getid3->info;
     $this->fseek($info['avdataoffset']);
     $DSSheader = $this->fread(1540);
     if (!preg_match('#^(\\x02|\\x03)ds[s2]#', $DSSheader)) {
         $info['error'][] = 'Expecting "[02-03] 64 73 [73|32]" at offset ' . $info['avdataoffset'] . ', found "' . Utils::PrintHexBytes(substr($DSSheader, 0, 4)) . '"';
         return false;
     }
     // some structure information taken from http://cpansearch.perl.org/src/RGIBSON/Audio-DSS-0.02/lib/Audio/DSS.pm
     $info['encoding'] = 'ISO-8859-1';
     // not certain, but assumed
     $info['dss'] = array();
     $info['fileformat'] = 'dss';
     $info['mime_type'] = 'audio/x-' . substr($DSSheader, 1, 3);
     // "audio/x-dss" or "audio/x-ds2"
     $info['audio']['dataformat'] = substr($DSSheader, 1, 3);
     //         "dss" or         "ds2"
     $info['audio']['bitrate_mode'] = 'cbr';
     $info['dss']['version'] = ord(substr($DSSheader, 0, 1));
     $info['dss']['hardware'] = trim(substr($DSSheader, 12, 16));
     // identification string for hardware used to create the file, e.g. "DPM 9600", "DS2400"
     $info['dss']['unknown1'] = Utils::LittleEndian2Int(substr($DSSheader, 28, 4));
     // 32-37 = "FE FF FE FF F7 FF" in all the sample files I've seen
     $info['dss']['date_create'] = $this->DSSdateStringToUnixDate(substr($DSSheader, 38, 12));
     $info['dss']['date_complete'] = $this->DSSdateStringToUnixDate(substr($DSSheader, 50, 12));
     $info['dss']['playtime_sec'] = intval(substr($DSSheader, 62, 2) * 3600 + substr($DSSheader, 64, 2) * 60 + substr($DSSheader, 66, 2));
     // approximate file playtime in HHMMSS
     $info['dss']['playtime_ms'] = Utils::LittleEndian2Int(substr($DSSheader, 512, 4));
     // exact file playtime in milliseconds. Has also been observed at offset 530 in one sample file, with something else (unknown) at offset 512
     $info['dss']['priority'] = ord(substr($DSSheader, 793, 1));
     $info['dss']['comments'] = trim(substr($DSSheader, 798, 100));
     $info['dss']['sample_rate_index'] = ord(substr($DSSheader, 1538, 1));
     // this isn't certain, this may or may not be where the sample rate info is stored, but it seems consistent on my small selection of sample files
     $info['audio']['bits_per_sample'] = 16;
     // maybe, maybe not -- most compressed audio formats don't have a fixed bits-per-sample value, but this is a reasonable approximation
     $info['audio']['sample_rate'] = $this->DSSsampleRateLookup($info['dss']['sample_rate_index']);
     $info['audio']['channels'] = 1;
     $info['playtime_seconds'] = $info['dss']['playtime_ms'] / 1000;
     if (floor($info['dss']['playtime_ms'] / 1000) != $info['dss']['playtime_sec']) {
         // *should* just be playtime_ms / 1000 but at least one sample file has playtime_ms at offset 530 instead of offset 512, so safety check
         $info['playtime_seconds'] = $info['dss']['playtime_sec'];
         $this->getid3->warning('playtime_ms (' . number_format($info['dss']['playtime_ms'] / 1000, 3) . ') does not match playtime_sec (' . number_format($info['dss']['playtime_sec']) . ') - using playtime_sec value');
     }
     $info['audio']['bitrate'] = $info['filesize'] * 8 / $info['playtime_seconds'];
     return true;
 }
Пример #5
0
 public function Analyze()
 {
     $info =& $this->getid3->info;
     $this->fseek($info['avdataoffset']);
     $RKAUHeader = $this->fread(20);
     $magic = 'RKA';
     if (substr($RKAUHeader, 0, 3) != $magic) {
         $info['error'][] = 'Expecting "' . Utils::PrintHexBytes($magic) . '" at offset ' . $info['avdataoffset'] . ', found "' . Utils::PrintHexBytes(substr($RKAUHeader, 0, 3)) . '"';
         return false;
     }
     $info['fileformat'] = 'rkau';
     $info['audio']['dataformat'] = 'rkau';
     $info['audio']['bitrate_mode'] = 'vbr';
     $info['rkau']['raw']['version'] = Utils::LittleEndian2Int(substr($RKAUHeader, 3, 1));
     $info['rkau']['version'] = '1.' . str_pad($info['rkau']['raw']['version'] & 0xf, 2, '0', STR_PAD_LEFT);
     if ($info['rkau']['version'] > 1.07 || $info['rkau']['version'] < 1.06) {
         $info['error'][] = 'This version of getID3() [' . $this->getid3->version() . '] can only parse RKAU files v1.06 and 1.07 (this file is v' . $info['rkau']['version'] . ')';
         unset($info['rkau']);
         return false;
     }
     $info['rkau']['source_bytes'] = Utils::LittleEndian2Int(substr($RKAUHeader, 4, 4));
     $info['rkau']['sample_rate'] = Utils::LittleEndian2Int(substr($RKAUHeader, 8, 4));
     $info['rkau']['channels'] = Utils::LittleEndian2Int(substr($RKAUHeader, 12, 1));
     $info['rkau']['bits_per_sample'] = Utils::LittleEndian2Int(substr($RKAUHeader, 13, 1));
     $info['rkau']['raw']['quality'] = Utils::LittleEndian2Int(substr($RKAUHeader, 14, 1));
     $this->RKAUqualityLookup($info['rkau']);
     $info['rkau']['raw']['flags'] = Utils::LittleEndian2Int(substr($RKAUHeader, 15, 1));
     $info['rkau']['flags']['joint_stereo'] = (bool) (!($info['rkau']['raw']['flags'] & 0x1));
     $info['rkau']['flags']['streaming'] = (bool) ($info['rkau']['raw']['flags'] & 0x2);
     $info['rkau']['flags']['vrq_lossy_mode'] = (bool) ($info['rkau']['raw']['flags'] & 0x4);
     if ($info['rkau']['flags']['streaming']) {
         $info['avdataoffset'] += 20;
         $info['rkau']['compressed_bytes'] = Utils::LittleEndian2Int(substr($RKAUHeader, 16, 4));
     } else {
         $info['avdataoffset'] += 16;
         $info['rkau']['compressed_bytes'] = $info['avdataend'] - $info['avdataoffset'] - 1;
     }
     // Note: compressed_bytes does not always equal what appears to be the actual number of compressed bytes,
     // sometimes it's more, sometimes less. No idea why(?)
     $info['audio']['lossless'] = $info['rkau']['lossless'];
     $info['audio']['channels'] = $info['rkau']['channels'];
     $info['audio']['bits_per_sample'] = $info['rkau']['bits_per_sample'];
     $info['audio']['sample_rate'] = $info['rkau']['sample_rate'];
     $info['playtime_seconds'] = $info['rkau']['source_bytes'] / ($info['rkau']['sample_rate'] * $info['rkau']['channels'] * ($info['rkau']['bits_per_sample'] / 8));
     $info['audio']['bitrate'] = $info['rkau']['compressed_bytes'] * 8 / $info['playtime_seconds'];
     return true;
 }
Пример #6
0
 public function Analyze()
 {
     $info =& $this->getid3->info;
     $this->fseek($info['avdataoffset']);
     $AMRheader = $this->fread(6);
     $magic = '#!AMR' . "\n";
     if (substr($AMRheader, 0, 6) != $magic) {
         $info['error'][] = 'Expecting "' . Utils::PrintHexBytes($magic) . '" at offset ' . $info['avdataoffset'] . ', found "' . Utils::PrintHexBytes(substr($AMRheader, 0, 6)) . '"';
         return false;
     }
     // shortcut
     $info['amr'] = array();
     $thisfile_amr =& $info['amr'];
     $info['fileformat'] = 'amr';
     $info['audio']['dataformat'] = 'amr';
     $info['audio']['bitrate_mode'] = 'vbr';
     // within a small predefined range: 4.75kbps to 12.2kbps
     $info['audio']['bits_per_sample'] = 13;
     // http://en.wikipedia.org/wiki/Adaptive_Multi-Rate_audio_codec: "Sampling frequency 8 kHz/13-bit (160 samples for 20 ms frames), filtered to 200–3400 Hz"
     $info['audio']['sample_rate'] = 8000;
     // http://en.wikipedia.org/wiki/Adaptive_Multi-Rate_audio_codec: "Sampling frequency 8 kHz/13-bit (160 samples for 20 ms frames), filtered to 200–3400 Hz"
     $info['audio']['channels'] = 1;
     $thisfile_amr['frame_mode_count'] = array(0 => 0, 1 => 0, 2 => 0, 3 => 0, 4 => 0, 5 => 0, 6 => 0, 7 => 0);
     $buffer = '';
     do {
         if (strlen($buffer) < $this->getid3->fread_buffer_size() && !feof($this->getid3->fp)) {
             $buffer .= $this->fread($this->getid3->fread_buffer_size() * 2);
         }
         $AMR_frame_header = ord(substr($buffer, 0, 1));
         $codec_mode_request = ($AMR_frame_header & 0x78) >> 3;
         // The 2nd bit through 5th bit (counting the most significant bit as the first bit) comprise the CMR (Codec Mode Request), values 0-7 being valid for AMR. The top bit of the CMR can actually be ignored, though it is used when AMR forms RTP payloads. The lower 3-bits of the header are reserved and are not used. Viewing the header from most significant bit to least significant bit, the encoding is XCCCCXXX, where Xs are reserved (typically 0) and the Cs are the CMR.
         if ($codec_mode_request > 7) {
             $info['error'][] = '';
             break;
         }
         $thisfile_amr['frame_mode_count'][$codec_mode_request]++;
         $buffer = substr($buffer, $this->amr_mode_bytes_per_frame($codec_mode_request));
     } while (strlen($buffer) > 0);
     $info['playtime_seconds'] = array_sum($thisfile_amr['frame_mode_count']) * 0.02;
     // each frame contain 160 samples and is 20 milliseconds long
     $info['audio']['bitrate'] = 8 * ($info['avdataend'] - $info['avdataoffset']) / $info['playtime_seconds'];
     // bitrate could be calculated from average bitrate by distributation of frame types. That would give effective audio bitrate, this gives overall file bitrate which will be a little bit higher since every frame will waste 8 bits for header, plus a few bits for octet padding
     $info['bitrate'] = $info['audio']['bitrate'];
     return true;
 }
Пример #7
0
 public function Analyze()
 {
     $info =& $this->getid3->info;
     $info['error'][] = 'Bink / Smacker files not properly processed by this version of getID3() [' . $this->getid3->version() . ']';
     $this->fseek($info['avdataoffset']);
     $fileTypeID = $this->fread(3);
     switch ($fileTypeID) {
         case 'BIK':
             return $this->ParseBink();
             break;
         case 'SMK':
             return $this->ParseSmacker();
             break;
         default:
             $info['error'][] = 'Expecting "BIK" or "SMK" at offset ' . $info['avdataoffset'] . ', found "' . Utils::PrintHexBytes($fileTypeID) . '"';
             return false;
             break;
     }
     return true;
 }
Пример #8
0
 public function Analyze()
 {
     $info =& $this->getid3->info;
     $this->fseek($info['avdataoffset']);
     $AUheader = $this->fread(8);
     $magic = '.snd';
     if (substr($AUheader, 0, 4) != $magic) {
         $info['error'][] = 'Expecting "' . Utils::PrintHexBytes($magic) . '" (".snd") at offset ' . $info['avdataoffset'] . ', found "' . Utils::PrintHexBytes(substr($AUheader, 0, 4)) . '"';
         return false;
     }
     // shortcut
     $info['au'] = array();
     $thisfile_au =& $info['au'];
     $info['fileformat'] = 'au';
     $info['audio']['dataformat'] = 'au';
     $info['audio']['bitrate_mode'] = 'cbr';
     $thisfile_au['encoding'] = 'ISO-8859-1';
     $thisfile_au['header_length'] = Utils::BigEndian2Int(substr($AUheader, 4, 4));
     $AUheader .= $this->fread($thisfile_au['header_length'] - 8);
     $info['avdataoffset'] += $thisfile_au['header_length'];
     $thisfile_au['data_size'] = Utils::BigEndian2Int(substr($AUheader, 8, 4));
     $thisfile_au['data_format_id'] = Utils::BigEndian2Int(substr($AUheader, 12, 4));
     $thisfile_au['sample_rate'] = Utils::BigEndian2Int(substr($AUheader, 16, 4));
     $thisfile_au['channels'] = Utils::BigEndian2Int(substr($AUheader, 20, 4));
     $thisfile_au['comments']['comment'][] = trim(substr($AUheader, 24));
     $thisfile_au['data_format'] = $this->AUdataFormatNameLookup($thisfile_au['data_format_id']);
     $thisfile_au['used_bits_per_sample'] = $this->AUdataFormatUsedBitsPerSampleLookup($thisfile_au['data_format_id']);
     if ($thisfile_au['bits_per_sample'] = $this->AUdataFormatBitsPerSampleLookup($thisfile_au['data_format_id'])) {
         $info['audio']['bits_per_sample'] = $thisfile_au['bits_per_sample'];
     } else {
         unset($thisfile_au['bits_per_sample']);
     }
     $info['audio']['sample_rate'] = $thisfile_au['sample_rate'];
     $info['audio']['channels'] = $thisfile_au['channels'];
     if ($info['avdataoffset'] + $thisfile_au['data_size'] > $info['avdataend']) {
         $info['warning'][] = 'Possible truncated file - expecting "' . $thisfile_au['data_size'] . '" bytes of audio data, only found ' . ($info['avdataend'] - $info['avdataoffset']) . ' bytes"';
     }
     $info['playtime_seconds'] = $thisfile_au['data_size'] / ($thisfile_au['sample_rate'] * $thisfile_au['channels'] * ($thisfile_au['used_bits_per_sample'] / 8));
     $info['audio']['bitrate'] = $thisfile_au['data_size'] * 8 / $info['playtime_seconds'];
     return true;
 }
Пример #9
0
 public function Analyze()
 {
     $info =& $this->getid3->info;
     $info['fileformat'] = 'swf';
     $info['video']['dataformat'] = 'swf';
     // http://www.openswf.org/spec/SWFfileformat.html
     $this->fseek($info['avdataoffset']);
     $SWFfileData = $this->fread($info['avdataend'] - $info['avdataoffset']);
     // 8 + 2 + 2 + max(9) bytes NOT including Frame_Size RECT data
     $info['swf']['header']['signature'] = substr($SWFfileData, 0, 3);
     switch ($info['swf']['header']['signature']) {
         case 'FWS':
             $info['swf']['header']['compressed'] = false;
             break;
         case 'CWS':
             $info['swf']['header']['compressed'] = true;
             break;
         default:
             $info['error'][] = 'Expecting "FWS" or "CWS" at offset ' . $info['avdataoffset'] . ', found "' . Utils::PrintHexBytes($info['swf']['header']['signature']) . '"';
             unset($info['swf']);
             unset($info['fileformat']);
             return false;
             break;
     }
     $info['swf']['header']['version'] = Utils::LittleEndian2Int(substr($SWFfileData, 3, 1));
     $info['swf']['header']['length'] = Utils::LittleEndian2Int(substr($SWFfileData, 4, 4));
     if ($info['swf']['header']['compressed']) {
         $SWFHead = substr($SWFfileData, 0, 8);
         $SWFfileData = substr($SWFfileData, 8);
         if ($decompressed = @gzuncompress($SWFfileData)) {
             $SWFfileData = $SWFHead . $decompressed;
         } else {
             $info['error'][] = 'Error decompressing compressed SWF data (' . strlen($SWFfileData) . ' bytes compressed, should be ' . ($info['swf']['header']['length'] - 8) . ' bytes uncompressed)';
             return false;
         }
     }
     $FrameSizeBitsPerValue = (ord(substr($SWFfileData, 8, 1)) & 0xf8) >> 3;
     $FrameSizeDataLength = ceil((5 + 4 * $FrameSizeBitsPerValue) / 8);
     $FrameSizeDataString = str_pad(decbin(ord(substr($SWFfileData, 8, 1)) & 0x7), 3, '0', STR_PAD_LEFT);
     for ($i = 1; $i < $FrameSizeDataLength; $i++) {
         $FrameSizeDataString .= str_pad(decbin(ord(substr($SWFfileData, 8 + $i, 1))), 8, '0', STR_PAD_LEFT);
     }
     list($X1, $X2, $Y1, $Y2) = explode("\n", wordwrap($FrameSizeDataString, $FrameSizeBitsPerValue, "\n", 1));
     $info['swf']['header']['frame_width'] = Utils::Bin2Dec($X2);
     $info['swf']['header']['frame_height'] = Utils::Bin2Dec($Y2);
     // http://www-lehre.informatik.uni-osnabrueck.de/~fbstark/diplom/docs/swf/Flash_Uncovered.htm
     // Next in the header is the frame rate, which is kind of weird.
     // It is supposed to be stored as a 16bit integer, but the first byte
     // (or last depending on how you look at it) is completely ignored.
     // Example: 0x000C  ->  0x0C  ->  12     So the frame rate is 12 fps.
     // Byte at (8 + $FrameSizeDataLength) is always zero and ignored
     $info['swf']['header']['frame_rate'] = Utils::LittleEndian2Int(substr($SWFfileData, 9 + $FrameSizeDataLength, 1));
     $info['swf']['header']['frame_count'] = Utils::LittleEndian2Int(substr($SWFfileData, 10 + $FrameSizeDataLength, 2));
     $info['video']['frame_rate'] = $info['swf']['header']['frame_rate'];
     $info['video']['resolution_x'] = intval(round($info['swf']['header']['frame_width'] / 20));
     $info['video']['resolution_y'] = intval(round($info['swf']['header']['frame_height'] / 20));
     $info['video']['pixel_aspect_ratio'] = (double) 1;
     if ($info['swf']['header']['frame_count'] > 0 && $info['swf']['header']['frame_rate'] > 0) {
         $info['playtime_seconds'] = $info['swf']['header']['frame_count'] / $info['swf']['header']['frame_rate'];
     }
     //echo __LINE__.'='.number_format(microtime(true) - $start_time, 3).'<br>';
     // SWF tags
     $CurrentOffset = 12 + $FrameSizeDataLength;
     $SWFdataLength = strlen($SWFfileData);
     while ($CurrentOffset < $SWFdataLength) {
         //echo __LINE__.'='.number_format(microtime(true) - $start_time, 3).'<br>';
         $TagIDTagLength = Utils::LittleEndian2Int(substr($SWFfileData, $CurrentOffset, 2));
         $TagID = ($TagIDTagLength & 0xfffc) >> 6;
         $TagLength = $TagIDTagLength & 0x3f;
         $CurrentOffset += 2;
         if ($TagLength == 0x3f) {
             $TagLength = Utils::LittleEndian2Int(substr($SWFfileData, $CurrentOffset, 4));
             $CurrentOffset += 4;
         }
         unset($TagData);
         $TagData['offset'] = $CurrentOffset;
         $TagData['size'] = $TagLength;
         $TagData['id'] = $TagID;
         $TagData['data'] = substr($SWFfileData, $CurrentOffset, $TagLength);
         switch ($TagID) {
             case 0:
                 // end of movie
                 break 2;
             case 9:
                 // Set background color
                 //$info['swf']['tags'][] = $TagData;
                 $info['swf']['bgcolor'] = strtoupper(str_pad(dechex(Utils::BigEndian2Int($TagData['data'])), 6, '0', STR_PAD_LEFT));
                 break;
             default:
                 if ($this->ReturnAllTagData) {
                     $info['swf']['tags'][] = $TagData;
                 }
                 break;
         }
         $CurrentOffset += $TagLength;
     }
     return true;
 }
Пример #10
0
 public function Analyze()
 {
     $info =& $this->getid3->info;
     $OriginalAVdataOffset = $info['avdataoffset'];
     $this->fseek($info['avdataoffset']);
     $VOCheader = $this->fread(26);
     $magic = 'Creative Voice File';
     if (substr($VOCheader, 0, 19) != $magic) {
         $info['error'][] = 'Expecting "' . Utils::PrintHexBytes($magic) . '" at offset ' . $info['avdataoffset'] . ', found "' . Utils::PrintHexBytes(substr($VOCheader, 0, 19)) . '"';
         return false;
     }
     // shortcuts
     $thisfile_audio =& $info['audio'];
     $info['voc'] = array();
     $thisfile_voc =& $info['voc'];
     $info['fileformat'] = 'voc';
     $thisfile_audio['dataformat'] = 'voc';
     $thisfile_audio['bitrate_mode'] = 'cbr';
     $thisfile_audio['lossless'] = true;
     $thisfile_audio['channels'] = 1;
     // might be overriden below
     $thisfile_audio['bits_per_sample'] = 8;
     // might be overriden below
     // byte #     Description
     // ------     ------------------------------------------
     // 00-12      'Creative Voice File'
     // 13         1A (eof to abort printing of file)
     // 14-15      Offset of first datablock in .voc file (std 1A 00 in Intel Notation)
     // 16-17      Version number (minor,major) (VOC-HDR puts 0A 01)
     // 18-19      2's Comp of Ver. # + 1234h (VOC-HDR puts 29 11)
     $thisfile_voc['header']['datablock_offset'] = Utils::LittleEndian2Int(substr($VOCheader, 20, 2));
     $thisfile_voc['header']['minor_version'] = Utils::LittleEndian2Int(substr($VOCheader, 22, 1));
     $thisfile_voc['header']['major_version'] = Utils::LittleEndian2Int(substr($VOCheader, 23, 1));
     do {
         $BlockOffset = $this->ftell();
         $BlockData = $this->fread(4);
         $BlockType = ord($BlockData[0]);
         $BlockSize = Utils::LittleEndian2Int(substr($BlockData, 1, 3));
         $ThisBlock = array();
         Utils::safe_inc($thisfile_voc['blocktypes'][$BlockType], 1);
         switch ($BlockType) {
             case 0:
                 // Terminator
                 // do nothing, we'll break out of the loop down below
                 break;
             case 1:
                 // Sound data
                 $BlockData .= $this->fread(2);
                 if ($info['avdataoffset'] <= $OriginalAVdataOffset) {
                     $info['avdataoffset'] = $this->ftell();
                 }
                 $this->fseek($BlockSize - 2, SEEK_CUR);
                 $ThisBlock['sample_rate_id'] = Utils::LittleEndian2Int(substr($BlockData, 4, 1));
                 $ThisBlock['compression_type'] = Utils::LittleEndian2Int(substr($BlockData, 5, 1));
                 $ThisBlock['compression_name'] = $this->VOCcompressionTypeLookup($ThisBlock['compression_type']);
                 if ($ThisBlock['compression_type'] <= 3) {
                     $thisfile_voc['compressed_bits_per_sample'] = Utils::CastAsInt(str_replace('-bit', '', $ThisBlock['compression_name']));
                 }
                 // Less accurate sample_rate calculation than the Extended block (#8) data (but better than nothing if Extended Block is not available)
                 if (empty($thisfile_audio['sample_rate'])) {
                     // SR byte = 256 - (1000000 / sample_rate)
                     $thisfile_audio['sample_rate'] = Utils::trunc(1000000 / (256 - $ThisBlock['sample_rate_id']) / $thisfile_audio['channels']);
                 }
                 break;
             case 2:
                 // Sound continue
             // Sound continue
             case 3:
                 // Silence
             // Silence
             case 4:
                 // Marker
             // Marker
             case 6:
                 // Repeat
             // Repeat
             case 7:
                 // End repeat
                 // nothing useful, just skip
                 $this->fseek($BlockSize, SEEK_CUR);
                 break;
             case 8:
                 // Extended
                 $BlockData .= $this->fread(4);
                 //00-01  Time Constant:
                 //   Mono: 65536 - (256000000 / sample_rate)
                 // Stereo: 65536 - (256000000 / (sample_rate * 2))
                 $ThisBlock['time_constant'] = Utils::LittleEndian2Int(substr($BlockData, 4, 2));
                 $ThisBlock['pack_method'] = Utils::LittleEndian2Int(substr($BlockData, 6, 1));
                 $ThisBlock['stereo'] = (bool) Utils::LittleEndian2Int(substr($BlockData, 7, 1));
                 $thisfile_audio['channels'] = $ThisBlock['stereo'] ? 2 : 1;
                 $thisfile_audio['sample_rate'] = Utils::trunc(256000000 / (65536 - $ThisBlock['time_constant']) / $thisfile_audio['channels']);
                 break;
             case 9:
                 // data block that supersedes blocks 1 and 8. Used for stereo, 16 bit
                 $BlockData .= $this->fread(12);
                 if ($info['avdataoffset'] <= $OriginalAVdataOffset) {
                     $info['avdataoffset'] = $this->ftell();
                 }
                 $this->fseek($BlockSize - 12, SEEK_CUR);
                 $ThisBlock['sample_rate'] = Utils::LittleEndian2Int(substr($BlockData, 4, 4));
                 $ThisBlock['bits_per_sample'] = Utils::LittleEndian2Int(substr($BlockData, 8, 1));
                 $ThisBlock['channels'] = Utils::LittleEndian2Int(substr($BlockData, 9, 1));
                 $ThisBlock['wFormat'] = Utils::LittleEndian2Int(substr($BlockData, 10, 2));
                 $ThisBlock['compression_name'] = $this->VOCwFormatLookup($ThisBlock['wFormat']);
                 if ($this->VOCwFormatActualBitsPerSampleLookup($ThisBlock['wFormat'])) {
                     $thisfile_voc['compressed_bits_per_sample'] = $this->VOCwFormatActualBitsPerSampleLookup($ThisBlock['wFormat']);
                 }
                 $thisfile_audio['sample_rate'] = $ThisBlock['sample_rate'];
                 $thisfile_audio['bits_per_sample'] = $ThisBlock['bits_per_sample'];
                 $thisfile_audio['channels'] = $ThisBlock['channels'];
                 break;
             default:
                 $info['warning'][] = 'Unhandled block type "' . $BlockType . '" at offset ' . $BlockOffset;
                 $this->fseek($BlockSize, SEEK_CUR);
                 break;
         }
         if (!empty($ThisBlock)) {
             $ThisBlock['block_offset'] = $BlockOffset;
             $ThisBlock['block_size'] = $BlockSize;
             $ThisBlock['block_type_id'] = $BlockType;
             $thisfile_voc['blocks'][] = $ThisBlock;
         }
     } while (!feof($this->getid3->fp) && $BlockType != 0);
     // Terminator block doesn't have size field, so seek back 3 spaces
     $this->fseek(-3, SEEK_CUR);
     ksort($thisfile_voc['blocktypes']);
     if (!empty($thisfile_voc['compressed_bits_per_sample'])) {
         $info['playtime_seconds'] = ($info['avdataend'] - $info['avdataoffset']) * 8 / ($thisfile_voc['compressed_bits_per_sample'] * $thisfile_audio['channels'] * $thisfile_audio['sample_rate']);
         $thisfile_audio['bitrate'] = ($info['avdataend'] - $info['avdataoffset']) * 8 / $info['playtime_seconds'];
     }
     return true;
 }
Пример #11
0
 public function Analyze()
 {
     $info =& $this->getid3->info;
     // http://cui.unige.ch/OSG/info/AudioFormats/ap11.html
     // http://www.btinternet.com/~AnthonyJ/Atari/programming/avr_format.html
     // offset    type    length    name        comments
     // ---------------------------------------------------------------------
     // 0    char    4    ID        format ID == "2BIT"
     // 4    char    8    name        sample name (unused space filled with 0)
     // 12    short    1    mono/stereo    0=mono, -1 (0xFFFF)=stereo
     //                     With stereo, samples are alternated,
     //                     the first voice is the left :
     //                     (LRLRLRLRLRLRLRLRLR...)
     // 14    short    1    resolution    8, 12 or 16 (bits)
     // 16    short    1    signed or not    0=unsigned, -1 (0xFFFF)=signed
     // 18    short    1    loop or not    0=no loop, -1 (0xFFFF)=loop on
     // 20    short    1    MIDI note    0xFFnn, where 0 <= nn <= 127
     //                     0xFFFF means "no MIDI note defined"
     // 22    byte    1    Replay speed    Frequence in the Replay software
     //                     0=5.485 Khz, 1=8.084 Khz, 2=10.971 Khz,
     //                     3=16.168 Khz, 4=21.942 Khz, 5=32.336 Khz
     //                     6=43.885 Khz, 7=47.261 Khz
     //                     -1 (0xFF)=no defined Frequence
     // 23    byte    3    sample rate    in Hertz
     // 26    long    1    size in bytes (2 * bytes in stereo)
     // 30    long    1    loop begin    0 for no loop
     // 34    long    1    loop size    equal to 'size' for no loop
     // 38  short   2   Reserved, MIDI keyboard split */
     // 40  short   2   Reserved, sample compression */
     // 42  short   2   Reserved */
     // 44  char   20;  Additional filename space, used if (name[7] != 0)
     // 64    byte    64    user data
     // 128    bytes    ?    sample data    (12 bits samples are coded on 16 bits:
     //                     0000 xxxx xxxx xxxx)
     // ---------------------------------------------------------------------
     // Note that all values are in motorola (big-endian) format, and that long is
     // assumed to be 4 bytes, and short 2 bytes.
     // When reading the samples, you should handle both signed and unsigned data,
     // and be prepared to convert 16->8 bit, or mono->stereo if needed. To convert
     // 8-bit data between signed/unsigned just add 127 to the sample values.
     // Simularly for 16-bit data you should add 32769
     $info['fileformat'] = 'avr';
     $this->fseek($info['avdataoffset']);
     $AVRheader = $this->fread(128);
     $info['avr']['raw']['magic'] = substr($AVRheader, 0, 4);
     $magic = '2BIT';
     if ($info['avr']['raw']['magic'] != $magic) {
         $info['error'][] = 'Expecting "' . Utils::PrintHexBytes($magic) . '" at offset ' . $info['avdataoffset'] . ', found "' . Utils::PrintHexBytes($info['avr']['raw']['magic']) . '"';
         unset($info['fileformat']);
         unset($info['avr']);
         return false;
     }
     $info['avdataoffset'] += 128;
     $info['avr']['sample_name'] = rtrim(substr($AVRheader, 4, 8));
     $info['avr']['raw']['mono'] = Utils::BigEndian2Int(substr($AVRheader, 12, 2));
     $info['avr']['bits_per_sample'] = Utils::BigEndian2Int(substr($AVRheader, 14, 2));
     $info['avr']['raw']['signed'] = Utils::BigEndian2Int(substr($AVRheader, 16, 2));
     $info['avr']['raw']['loop'] = Utils::BigEndian2Int(substr($AVRheader, 18, 2));
     $info['avr']['raw']['midi'] = Utils::BigEndian2Int(substr($AVRheader, 20, 2));
     $info['avr']['raw']['replay_freq'] = Utils::BigEndian2Int(substr($AVRheader, 22, 1));
     $info['avr']['sample_rate'] = Utils::BigEndian2Int(substr($AVRheader, 23, 3));
     $info['avr']['sample_length'] = Utils::BigEndian2Int(substr($AVRheader, 26, 4));
     $info['avr']['loop_start'] = Utils::BigEndian2Int(substr($AVRheader, 30, 4));
     $info['avr']['loop_end'] = Utils::BigEndian2Int(substr($AVRheader, 34, 4));
     $info['avr']['midi_split'] = Utils::BigEndian2Int(substr($AVRheader, 38, 2));
     $info['avr']['sample_compression'] = Utils::BigEndian2Int(substr($AVRheader, 40, 2));
     $info['avr']['reserved'] = Utils::BigEndian2Int(substr($AVRheader, 42, 2));
     $info['avr']['sample_name_extra'] = rtrim(substr($AVRheader, 44, 20));
     $info['avr']['comment'] = rtrim(substr($AVRheader, 64, 64));
     $info['avr']['flags']['stereo'] = $info['avr']['raw']['mono'] == 0 ? false : true;
     $info['avr']['flags']['signed'] = $info['avr']['raw']['signed'] == 0 ? false : true;
     $info['avr']['flags']['loop'] = $info['avr']['raw']['loop'] == 0 ? false : true;
     $info['avr']['midi_notes'] = array();
     if (($info['avr']['raw']['midi'] & 0xff00) != 0xff00) {
         $info['avr']['midi_notes'][] = ($info['avr']['raw']['midi'] & 0xff00) >> 8;
     }
     if (($info['avr']['raw']['midi'] & 0xff) != 0xff) {
         $info['avr']['midi_notes'][] = $info['avr']['raw']['midi'] & 0xff;
     }
     if ($info['avdataend'] - $info['avdataoffset'] != $info['avr']['sample_length'] * ($info['avr']['bits_per_sample'] == 8 ? 1 : 2)) {
         $info['warning'][] = 'Probable truncated file: expecting ' . $info['avr']['sample_length'] * ($info['avr']['bits_per_sample'] == 8 ? 1 : 2) . ' bytes of audio data, found ' . ($info['avdataend'] - $info['avdataoffset']);
     }
     $info['audio']['dataformat'] = 'avr';
     $info['audio']['lossless'] = true;
     $info['audio']['bitrate_mode'] = 'cbr';
     $info['audio']['bits_per_sample'] = $info['avr']['bits_per_sample'];
     $info['audio']['sample_rate'] = $info['avr']['sample_rate'];
     $info['audio']['channels'] = $info['avr']['flags']['stereo'] ? 2 : 1;
     $info['playtime_seconds'] = $info['avr']['sample_length'] / $info['audio']['channels'] / $info['avr']['sample_rate'];
     $info['audio']['bitrate'] = $info['avr']['sample_length'] * ($info['avr']['bits_per_sample'] == 8 ? 8 : 16) / $info['playtime_seconds'];
     return true;
 }
Пример #12
0
 public function Analyze()
 {
     $info =& $this->getid3->info;
     $info['fileformat'] = 'tta';
     $info['audio']['dataformat'] = 'tta';
     $info['audio']['lossless'] = true;
     $info['audio']['bitrate_mode'] = 'vbr';
     $this->fseek($info['avdataoffset']);
     $ttaheader = $this->fread(26);
     $info['tta']['magic'] = substr($ttaheader, 0, 3);
     $magic = 'TTA';
     if ($info['tta']['magic'] != $magic) {
         $info['error'][] = 'Expecting "' . Utils::PrintHexBytes($magic) . '" at offset ' . $info['avdataoffset'] . ', found "' . Utils::PrintHexBytes($info['tta']['magic']) . '"';
         unset($info['fileformat']);
         unset($info['audio']);
         unset($info['tta']);
         return false;
     }
     switch ($ttaheader[3]) {
         case "":
             // TTA v1.x
         // TTA v1.x
         case "":
             // TTA v1.x
         // TTA v1.x
         case "":
             // TTA v1.x
             // "It was the demo-version of the TTA encoder. There is no released format with such header. TTA encoder v1 is not supported about a year."
             $info['tta']['major_version'] = 1;
             $info['avdataoffset'] += 16;
             $info['tta']['compression_level'] = ord($ttaheader[3]);
             $info['tta']['channels'] = Utils::LittleEndian2Int(substr($ttaheader, 4, 2));
             $info['tta']['bits_per_sample'] = Utils::LittleEndian2Int(substr($ttaheader, 6, 2));
             $info['tta']['sample_rate'] = Utils::LittleEndian2Int(substr($ttaheader, 8, 4));
             $info['tta']['samples_per_channel'] = Utils::LittleEndian2Int(substr($ttaheader, 12, 4));
             $info['audio']['encoder_options'] = '-e' . $info['tta']['compression_level'];
             $info['playtime_seconds'] = $info['tta']['samples_per_channel'] / $info['tta']['sample_rate'];
             break;
         case '2':
             // TTA v2.x
             // "I have hurried to release the TTA 2.0 encoder. Format documentation is removed from our site. This format still in development. Please wait the TTA2 format, encoder v4."
             $info['tta']['major_version'] = 2;
             $info['avdataoffset'] += 20;
             $info['tta']['compression_level'] = Utils::LittleEndian2Int(substr($ttaheader, 4, 2));
             $info['tta']['audio_format'] = Utils::LittleEndian2Int(substr($ttaheader, 6, 2));
             $info['tta']['channels'] = Utils::LittleEndian2Int(substr($ttaheader, 8, 2));
             $info['tta']['bits_per_sample'] = Utils::LittleEndian2Int(substr($ttaheader, 10, 2));
             $info['tta']['sample_rate'] = Utils::LittleEndian2Int(substr($ttaheader, 12, 4));
             $info['tta']['data_length'] = Utils::LittleEndian2Int(substr($ttaheader, 16, 4));
             $info['audio']['encoder_options'] = '-e' . $info['tta']['compression_level'];
             $info['playtime_seconds'] = $info['tta']['data_length'] / $info['tta']['sample_rate'];
             break;
         case '1':
             // TTA v3.x
             // "This is a first stable release of the TTA format. It will be supported by the encoders v3 or higher."
             $info['tta']['major_version'] = 3;
             $info['avdataoffset'] += 26;
             $info['tta']['audio_format'] = Utils::LittleEndian2Int(substr($ttaheader, 4, 2));
             $info['tta']['channels'] = Utils::LittleEndian2Int(substr($ttaheader, 6, 2));
             $info['tta']['bits_per_sample'] = Utils::LittleEndian2Int(substr($ttaheader, 8, 2));
             $info['tta']['sample_rate'] = Utils::LittleEndian2Int(substr($ttaheader, 10, 4));
             $info['tta']['data_length'] = Utils::LittleEndian2Int(substr($ttaheader, 14, 4));
             $info['tta']['crc32_footer'] = substr($ttaheader, 18, 4);
             $info['tta']['seek_point'] = Utils::LittleEndian2Int(substr($ttaheader, 22, 4));
             $info['playtime_seconds'] = $info['tta']['data_length'] / $info['tta']['sample_rate'];
             break;
         default:
             $info['error'][] = 'This version of getID3() [' . $this->getid3->version() . '] only knows how to handle TTA v1 and v2 - it may not work correctly with this file which appears to be TTA v' . $ttaheader[3];
             return false;
             break;
     }
     $info['audio']['encoder'] = 'TTA v' . $info['tta']['major_version'];
     $info['audio']['bits_per_sample'] = $info['tta']['bits_per_sample'];
     $info['audio']['sample_rate'] = $info['tta']['sample_rate'];
     $info['audio']['channels'] = $info['tta']['channels'];
     $info['audio']['bitrate'] = ($info['avdataend'] - $info['avdataoffset']) * 8 / $info['playtime_seconds'];
     return true;
 }
Пример #13
0
 public function Analyze()
 {
     $info =& $this->getid3->info;
     $this->fseek($info['avdataoffset']);
     $TSheader = $this->fread(19);
     $magic = "G";
     if (substr($TSheader, 0, 1) != $magic) {
         $info['error'][] = 'Expecting "' . Utils::PrintHexBytes($magic) . '" at ' . $info['avdataoffset'] . ', found ' . Utils::PrintHexBytes(substr($TSheader, 0, 1)) . ' instead.';
         return false;
     }
     $info['fileformat'] = 'ts';
     // http://en.wikipedia.org/wiki/.ts
     $offset = 0;
     $info['ts']['packet']['sync'] = Utils::BigEndian2Int(substr($TSheader, $offset, 1));
     $offset += 1;
     $pid_flags_raw = Utils::BigEndian2Int(substr($TSheader, $offset, 2));
     $offset += 2;
     $SAC_raw = Utils::BigEndian2Int(substr($TSheader, $offset, 1));
     $offset += 1;
     $info['ts']['packet']['flags']['transport_error_indicator'] = (bool) ($pid_flags_raw & 0x8000);
     // Set by demodulator if can't correct errors in the stream, to tell the demultiplexer that the packet has an uncorrectable error
     $info['ts']['packet']['flags']['payload_unit_start_indicator'] = (bool) ($pid_flags_raw & 0x4000);
     // 1 means start of PES data or PSI otherwise zero only.
     $info['ts']['packet']['flags']['transport_high_priority'] = (bool) ($pid_flags_raw & 0x2000);
     // 1 means higher priority than other packets with the same PID.
     $info['ts']['packet']['packet_id'] = ($pid_flags_raw & 0x1fff) >> 0;
     $info['ts']['packet']['raw']['scrambling_control'] = ($SAC_raw & 0xc0) >> 6;
     $info['ts']['packet']['flags']['adaption_field_exists'] = (bool) ($SAC_raw & 0x20);
     $info['ts']['packet']['flags']['payload_exists'] = (bool) ($SAC_raw & 0x10);
     $info['ts']['packet']['continuity_counter'] = ($SAC_raw & 0xf) >> 0;
     // Incremented only when a payload is present
     $info['ts']['packet']['scrambling_control'] = $this->TSscramblingControlLookup($info['ts']['packet']['raw']['scrambling_control']);
     if ($info['ts']['packet']['flags']['adaption_field_exists']) {
         $AdaptionField_raw = Utils::BigEndian2Int(substr($TSheader, $offset, 2));
         $offset += 2;
         $info['ts']['packet']['adaption']['field_length'] = ($AdaptionField_raw & 0xff00) >> 8;
         // Number of bytes in the adaptation field immediately following this byte
         $info['ts']['packet']['adaption']['flags']['discontinuity'] = (bool) ($AdaptionField_raw & 0x80);
         // Set to 1 if current TS packet is in a discontinuity state with respect to either the continuity counter or the program clock reference
         $info['ts']['packet']['adaption']['flags']['random_access'] = (bool) ($AdaptionField_raw & 0x40);
         // Set to 1 if the PES packet in this TS packet starts a video/audio sequence
         $info['ts']['packet']['adaption']['flags']['high_priority'] = (bool) ($AdaptionField_raw & 0x20);
         // 1 = higher priority
         $info['ts']['packet']['adaption']['flags']['pcr'] = (bool) ($AdaptionField_raw & 0x10);
         // 1 means adaptation field does contain a PCR field
         $info['ts']['packet']['adaption']['flags']['opcr'] = (bool) ($AdaptionField_raw & 0x8);
         // 1 means adaptation field does contain an OPCR field
         $info['ts']['packet']['adaption']['flags']['splice_point'] = (bool) ($AdaptionField_raw & 0x4);
         // 1 means presence of splice countdown field in adaptation field
         $info['ts']['packet']['adaption']['flags']['private_data'] = (bool) ($AdaptionField_raw & 0x2);
         // 1 means presence of private data bytes in adaptation field
         $info['ts']['packet']['adaption']['flags']['extension'] = (bool) ($AdaptionField_raw & 0x1);
         // 1 means presence of adaptation field extension
         if ($info['ts']['packet']['adaption']['flags']['pcr']) {
             $info['ts']['packet']['adaption']['raw']['pcr'] = Utils::BigEndian2Int(substr($TSheader, $offset, 6));
             $offset += 6;
         }
         if ($info['ts']['packet']['adaption']['flags']['opcr']) {
             $info['ts']['packet']['adaption']['raw']['opcr'] = Utils::BigEndian2Int(substr($TSheader, $offset, 6));
             $offset += 6;
         }
     }
     $info['error'][] = 'MPEG Transport Stream (.ts) parsing not enabled in this version of getID3() [' . $this->getid3->version() . ']';
     return false;
 }
Пример #14
0
 public function Analyze()
 {
     $info =& $this->getid3->info;
     // based loosely on code from TMonkey by Jurgen Faul <jfaulØgmx*de>
     // http://jfaul.de/atl  or  http://j-faul.virtualave.net/atl/atl.html
     $info['fileformat'] = 'mac';
     $info['audio']['dataformat'] = 'mac';
     $info['audio']['bitrate_mode'] = 'vbr';
     $info['audio']['lossless'] = true;
     $info['monkeys_audio']['raw'] = array();
     $thisfile_monkeysaudio =& $info['monkeys_audio'];
     $thisfile_monkeysaudio_raw =& $thisfile_monkeysaudio['raw'];
     $this->fseek($info['avdataoffset']);
     $MACheaderData = $this->fread(74);
     $thisfile_monkeysaudio_raw['magic'] = substr($MACheaderData, 0, 4);
     $magic = 'MAC ';
     if ($thisfile_monkeysaudio_raw['magic'] != $magic) {
         $info['error'][] = 'Expecting "' . Utils::PrintHexBytes($magic) . '" at offset ' . $info['avdataoffset'] . ', found "' . Utils::PrintHexBytes($thisfile_monkeysaudio_raw['magic']) . '"';
         unset($info['fileformat']);
         return false;
     }
     $thisfile_monkeysaudio_raw['nVersion'] = Utils::LittleEndian2Int(substr($MACheaderData, 4, 2));
     // appears to be uint32 in 3.98+
     if ($thisfile_monkeysaudio_raw['nVersion'] < 3980) {
         $thisfile_monkeysaudio_raw['nCompressionLevel'] = Utils::LittleEndian2Int(substr($MACheaderData, 6, 2));
         $thisfile_monkeysaudio_raw['nFormatFlags'] = Utils::LittleEndian2Int(substr($MACheaderData, 8, 2));
         $thisfile_monkeysaudio_raw['nChannels'] = Utils::LittleEndian2Int(substr($MACheaderData, 10, 2));
         $thisfile_monkeysaudio_raw['nSampleRate'] = Utils::LittleEndian2Int(substr($MACheaderData, 12, 4));
         $thisfile_monkeysaudio_raw['nHeaderDataBytes'] = Utils::LittleEndian2Int(substr($MACheaderData, 16, 4));
         $thisfile_monkeysaudio_raw['nWAVTerminatingBytes'] = Utils::LittleEndian2Int(substr($MACheaderData, 20, 4));
         $thisfile_monkeysaudio_raw['nTotalFrames'] = Utils::LittleEndian2Int(substr($MACheaderData, 24, 4));
         $thisfile_monkeysaudio_raw['nFinalFrameSamples'] = Utils::LittleEndian2Int(substr($MACheaderData, 28, 4));
         $thisfile_monkeysaudio_raw['nPeakLevel'] = Utils::LittleEndian2Int(substr($MACheaderData, 32, 4));
         $thisfile_monkeysaudio_raw['nSeekElements'] = Utils::LittleEndian2Int(substr($MACheaderData, 38, 2));
         $offset = 8;
     } else {
         $offset = 8;
         // APE_DESCRIPTOR
         $thisfile_monkeysaudio_raw['nDescriptorBytes'] = Utils::LittleEndian2Int(substr($MACheaderData, $offset, 4));
         $offset += 4;
         $thisfile_monkeysaudio_raw['nHeaderBytes'] = Utils::LittleEndian2Int(substr($MACheaderData, $offset, 4));
         $offset += 4;
         $thisfile_monkeysaudio_raw['nSeekTableBytes'] = Utils::LittleEndian2Int(substr($MACheaderData, $offset, 4));
         $offset += 4;
         $thisfile_monkeysaudio_raw['nHeaderDataBytes'] = Utils::LittleEndian2Int(substr($MACheaderData, $offset, 4));
         $offset += 4;
         $thisfile_monkeysaudio_raw['nAPEFrameDataBytes'] = Utils::LittleEndian2Int(substr($MACheaderData, $offset, 4));
         $offset += 4;
         $thisfile_monkeysaudio_raw['nAPEFrameDataBytesHigh'] = Utils::LittleEndian2Int(substr($MACheaderData, $offset, 4));
         $offset += 4;
         $thisfile_monkeysaudio_raw['nTerminatingDataBytes'] = Utils::LittleEndian2Int(substr($MACheaderData, $offset, 4));
         $offset += 4;
         $thisfile_monkeysaudio_raw['cFileMD5'] = substr($MACheaderData, $offset, 16);
         $offset += 16;
         // APE_HEADER
         $thisfile_monkeysaudio_raw['nCompressionLevel'] = Utils::LittleEndian2Int(substr($MACheaderData, $offset, 2));
         $offset += 2;
         $thisfile_monkeysaudio_raw['nFormatFlags'] = Utils::LittleEndian2Int(substr($MACheaderData, $offset, 2));
         $offset += 2;
         $thisfile_monkeysaudio_raw['nBlocksPerFrame'] = Utils::LittleEndian2Int(substr($MACheaderData, $offset, 4));
         $offset += 4;
         $thisfile_monkeysaudio_raw['nFinalFrameBlocks'] = Utils::LittleEndian2Int(substr($MACheaderData, $offset, 4));
         $offset += 4;
         $thisfile_monkeysaudio_raw['nTotalFrames'] = Utils::LittleEndian2Int(substr($MACheaderData, $offset, 4));
         $offset += 4;
         $thisfile_monkeysaudio_raw['nBitsPerSample'] = Utils::LittleEndian2Int(substr($MACheaderData, $offset, 2));
         $offset += 2;
         $thisfile_monkeysaudio_raw['nChannels'] = Utils::LittleEndian2Int(substr($MACheaderData, $offset, 2));
         $offset += 2;
         $thisfile_monkeysaudio_raw['nSampleRate'] = Utils::LittleEndian2Int(substr($MACheaderData, $offset, 4));
         $offset += 4;
     }
     $thisfile_monkeysaudio['flags']['8-bit'] = (bool) ($thisfile_monkeysaudio_raw['nFormatFlags'] & 0x1);
     $thisfile_monkeysaudio['flags']['crc-32'] = (bool) ($thisfile_monkeysaudio_raw['nFormatFlags'] & 0x2);
     $thisfile_monkeysaudio['flags']['peak_level'] = (bool) ($thisfile_monkeysaudio_raw['nFormatFlags'] & 0x4);
     $thisfile_monkeysaudio['flags']['24-bit'] = (bool) ($thisfile_monkeysaudio_raw['nFormatFlags'] & 0x8);
     $thisfile_monkeysaudio['flags']['seek_elements'] = (bool) ($thisfile_monkeysaudio_raw['nFormatFlags'] & 0x10);
     $thisfile_monkeysaudio['flags']['no_wav_header'] = (bool) ($thisfile_monkeysaudio_raw['nFormatFlags'] & 0x20);
     $thisfile_monkeysaudio['version'] = $thisfile_monkeysaudio_raw['nVersion'] / 1000;
     $thisfile_monkeysaudio['compression'] = $this->MonkeyCompressionLevelNameLookup($thisfile_monkeysaudio_raw['nCompressionLevel']);
     if ($thisfile_monkeysaudio_raw['nVersion'] < 3980) {
         $thisfile_monkeysaudio['samples_per_frame'] = $this->MonkeySamplesPerFrame($thisfile_monkeysaudio_raw['nVersion'], $thisfile_monkeysaudio_raw['nCompressionLevel']);
     }
     $thisfile_monkeysaudio['bits_per_sample'] = $thisfile_monkeysaudio['flags']['24-bit'] ? 24 : ($thisfile_monkeysaudio['flags']['8-bit'] ? 8 : 16);
     $thisfile_monkeysaudio['channels'] = $thisfile_monkeysaudio_raw['nChannels'];
     $info['audio']['channels'] = $thisfile_monkeysaudio['channels'];
     $thisfile_monkeysaudio['sample_rate'] = $thisfile_monkeysaudio_raw['nSampleRate'];
     if ($thisfile_monkeysaudio['sample_rate'] == 0) {
         $info['error'][] = 'Corrupt MAC file: frequency == zero';
         return false;
     }
     $info['audio']['sample_rate'] = $thisfile_monkeysaudio['sample_rate'];
     if ($thisfile_monkeysaudio['flags']['peak_level']) {
         $thisfile_monkeysaudio['peak_level'] = $thisfile_monkeysaudio_raw['nPeakLevel'];
         $thisfile_monkeysaudio['peak_ratio'] = $thisfile_monkeysaudio['peak_level'] / pow(2, $thisfile_monkeysaudio['bits_per_sample'] - 1);
     }
     if ($thisfile_monkeysaudio_raw['nVersion'] >= 3980) {
         $thisfile_monkeysaudio['samples'] = ($thisfile_monkeysaudio_raw['nTotalFrames'] - 1) * $thisfile_monkeysaudio_raw['nBlocksPerFrame'] + $thisfile_monkeysaudio_raw['nFinalFrameBlocks'];
     } else {
         $thisfile_monkeysaudio['samples'] = ($thisfile_monkeysaudio_raw['nTotalFrames'] - 1) * $thisfile_monkeysaudio['samples_per_frame'] + $thisfile_monkeysaudio_raw['nFinalFrameSamples'];
     }
     $thisfile_monkeysaudio['playtime'] = $thisfile_monkeysaudio['samples'] / $thisfile_monkeysaudio['sample_rate'];
     if ($thisfile_monkeysaudio['playtime'] == 0) {
         $info['error'][] = 'Corrupt MAC file: playtime == zero';
         return false;
     }
     $info['playtime_seconds'] = $thisfile_monkeysaudio['playtime'];
     $thisfile_monkeysaudio['compressed_size'] = $info['avdataend'] - $info['avdataoffset'];
     $thisfile_monkeysaudio['uncompressed_size'] = $thisfile_monkeysaudio['samples'] * $thisfile_monkeysaudio['channels'] * ($thisfile_monkeysaudio['bits_per_sample'] / 8);
     if ($thisfile_monkeysaudio['uncompressed_size'] == 0) {
         $info['error'][] = 'Corrupt MAC file: uncompressed_size == zero';
         return false;
     }
     $thisfile_monkeysaudio['compression_ratio'] = $thisfile_monkeysaudio['compressed_size'] / ($thisfile_monkeysaudio['uncompressed_size'] + $thisfile_monkeysaudio_raw['nHeaderDataBytes']);
     $thisfile_monkeysaudio['bitrate'] = $thisfile_monkeysaudio['samples'] * $thisfile_monkeysaudio['channels'] * $thisfile_monkeysaudio['bits_per_sample'] / $thisfile_monkeysaudio['playtime'] * $thisfile_monkeysaudio['compression_ratio'];
     $info['audio']['bitrate'] = $thisfile_monkeysaudio['bitrate'];
     // add size of MAC header to avdataoffset
     if ($thisfile_monkeysaudio_raw['nVersion'] >= 3980) {
         $info['avdataoffset'] += $thisfile_monkeysaudio_raw['nDescriptorBytes'];
         $info['avdataoffset'] += $thisfile_monkeysaudio_raw['nHeaderBytes'];
         $info['avdataoffset'] += $thisfile_monkeysaudio_raw['nSeekTableBytes'];
         $info['avdataoffset'] += $thisfile_monkeysaudio_raw['nHeaderDataBytes'];
         $info['avdataend'] -= $thisfile_monkeysaudio_raw['nTerminatingDataBytes'];
     } else {
         $info['avdataoffset'] += $offset;
     }
     if ($thisfile_monkeysaudio_raw['nVersion'] >= 3980) {
         if ($thisfile_monkeysaudio_raw['cFileMD5'] === str_repeat("", 16)) {
             //$info['warning'][] = 'cFileMD5 is null';
         } else {
             $info['md5_data_source'] = '';
             $md5 = $thisfile_monkeysaudio_raw['cFileMD5'];
             for ($i = 0; $i < strlen($md5); $i++) {
                 $info['md5_data_source'] .= str_pad(dechex(ord($md5[$i])), 2, '00', STR_PAD_LEFT);
             }
             if (!preg_match('/^[0-9a-f]{32}$/', $info['md5_data_source'])) {
                 unset($info['md5_data_source']);
             }
         }
     }
     $info['audio']['bits_per_sample'] = $thisfile_monkeysaudio['bits_per_sample'];
     $info['audio']['encoder'] = 'MAC v' . number_format($thisfile_monkeysaudio['version'], 2);
     $info['audio']['encoder_options'] = ucfirst($thisfile_monkeysaudio['compression']) . ' compression';
     return true;
 }
Пример #15
0
 public function ParseRIFFAMV($startoffset, $maxoffset)
 {
     // AMV files are RIFF-AVI files with parts of the spec deliberately broken, such as chunk size fields hardcoded to zero (because players known in hardware that these fields are always a certain size
     // https://code.google.com/p/amv-codec-tools/wiki/AmvDocumentation
     //typedef struct _amvmainheader {
     //FOURCC fcc; // 'amvh'
     //DWORD cb;
     //DWORD dwMicroSecPerFrame;
     //BYTE reserve[28];
     //DWORD dwWidth;
     //DWORD dwHeight;
     //DWORD dwSpeed;
     //DWORD reserve0;
     //DWORD reserve1;
     //BYTE bTimeSec;
     //BYTE bTimeMin;
     //WORD wTimeHour;
     //} AMVMAINHEADER;
     $info =& $this->getid3->info;
     $RIFFchunk = false;
     try {
         $this->fseek($startoffset);
         $maxoffset = min($maxoffset, $info['avdataend']);
         $AMVheader = $this->fread(284);
         if (substr($AMVheader, 0, 8) != 'hdrlamvh') {
             throw new \Exception('expecting "hdrlamv" at offset ' . ($startoffset + 0) . ', found "' . substr($AMVheader, 0, 8) . '"');
         }
         if (substr($AMVheader, 8, 4) != "8") {
             // "amvh" chunk size, hardcoded to 0x38 = 56 bytes
             throw new \Exception('expecting "0x38000000" at offset ' . ($startoffset + 8) . ', found "' . Utils::PrintHexBytes(substr($AMVheader, 8, 4)) . '"');
         }
         $RIFFchunk = array();
         $RIFFchunk['amvh']['us_per_frame'] = Utils::LittleEndian2Int(substr($AMVheader, 12, 4));
         $RIFFchunk['amvh']['reserved28'] = substr($AMVheader, 16, 28);
         // null? reserved?
         $RIFFchunk['amvh']['resolution_x'] = Utils::LittleEndian2Int(substr($AMVheader, 44, 4));
         $RIFFchunk['amvh']['resolution_y'] = Utils::LittleEndian2Int(substr($AMVheader, 48, 4));
         $RIFFchunk['amvh']['frame_rate_int'] = Utils::LittleEndian2Int(substr($AMVheader, 52, 4));
         $RIFFchunk['amvh']['reserved0'] = Utils::LittleEndian2Int(substr($AMVheader, 56, 4));
         // 1? reserved?
         $RIFFchunk['amvh']['reserved1'] = Utils::LittleEndian2Int(substr($AMVheader, 60, 4));
         // 0? reserved?
         $RIFFchunk['amvh']['runtime_sec'] = Utils::LittleEndian2Int(substr($AMVheader, 64, 1));
         $RIFFchunk['amvh']['runtime_min'] = Utils::LittleEndian2Int(substr($AMVheader, 65, 1));
         $RIFFchunk['amvh']['runtime_hrs'] = Utils::LittleEndian2Int(substr($AMVheader, 66, 2));
         $info['video']['frame_rate'] = 1000000 / $RIFFchunk['amvh']['us_per_frame'];
         $info['video']['resolution_x'] = $RIFFchunk['amvh']['resolution_x'];
         $info['video']['resolution_y'] = $RIFFchunk['amvh']['resolution_y'];
         $info['playtime_seconds'] = $RIFFchunk['amvh']['runtime_hrs'] * 3600 + $RIFFchunk['amvh']['runtime_min'] * 60 + $RIFFchunk['amvh']['runtime_sec'];
         // the rest is all hardcoded(?) and does not appear to be useful until you get to audio info at offset 256, even then everything is probably hardcoded
         if (substr($AMVheader, 68, 20) != 'LIST' . "" . 'strlstrh' . "8") {
             throw new \Exception('expecting "LIST<0x00000000>strlstrh<0x38000000>" at offset ' . ($startoffset + 68) . ', found "' . Utils::PrintHexBytes(substr($AMVheader, 68, 20)) . '"');
         }
         // followed by 56 bytes of null: substr($AMVheader,  88, 56) -> 144
         if (substr($AMVheader, 144, 8) != 'strf' . "\$") {
             throw new \Exception('expecting "strf<0x24000000>" at offset ' . ($startoffset + 144) . ', found "' . Utils::PrintHexBytes(substr($AMVheader, 144, 8)) . '"');
         }
         // followed by 36 bytes of null: substr($AMVheader, 144, 36) -> 180
         if (substr($AMVheader, 188, 20) != 'LIST' . "" . 'strlstrh' . "0") {
             throw new \Exception('expecting "LIST<0x00000000>strlstrh<0x30000000>" at offset ' . ($startoffset + 188) . ', found "' . Utils::PrintHexBytes(substr($AMVheader, 188, 20)) . '"');
         }
         // followed by 48 bytes of null: substr($AMVheader, 208, 48) -> 256
         if (substr($AMVheader, 256, 8) != 'strf' . "") {
             throw new \Exception('expecting "strf<0x14000000>" at offset ' . ($startoffset + 256) . ', found "' . Utils::PrintHexBytes(substr($AMVheader, 256, 8)) . '"');
         }
         // followed by 20 bytes of a modified WAVEFORMATEX:
         // typedef struct {
         // WORD wFormatTag;       //(Fixme: this is equal to PCM's 0x01 format code)
         // WORD nChannels;        //(Fixme: this is always 1)
         // DWORD nSamplesPerSec;  //(Fixme: for all known sample files this is equal to 22050)
         // DWORD nAvgBytesPerSec; //(Fixme: for all known sample files this is equal to 44100)
         // WORD nBlockAlign;      //(Fixme: this seems to be 2 in AMV files, is this correct ?)
         // WORD wBitsPerSample;   //(Fixme: this seems to be 16 in AMV files instead of the expected 4)
         // WORD cbSize;           //(Fixme: this seems to be 0 in AMV files)
         // WORD reserved;
         // } WAVEFORMATEX;
         $RIFFchunk['strf']['wformattag'] = Utils::LittleEndian2Int(substr($AMVheader, 264, 2));
         $RIFFchunk['strf']['nchannels'] = Utils::LittleEndian2Int(substr($AMVheader, 266, 2));
         $RIFFchunk['strf']['nsamplespersec'] = Utils::LittleEndian2Int(substr($AMVheader, 268, 4));
         $RIFFchunk['strf']['navgbytespersec'] = Utils::LittleEndian2Int(substr($AMVheader, 272, 4));
         $RIFFchunk['strf']['nblockalign'] = Utils::LittleEndian2Int(substr($AMVheader, 276, 2));
         $RIFFchunk['strf']['wbitspersample'] = Utils::LittleEndian2Int(substr($AMVheader, 278, 2));
         $RIFFchunk['strf']['cbsize'] = Utils::LittleEndian2Int(substr($AMVheader, 280, 2));
         $RIFFchunk['strf']['reserved'] = Utils::LittleEndian2Int(substr($AMVheader, 282, 2));
         $info['audio']['lossless'] = false;
         $info['audio']['sample_rate'] = $RIFFchunk['strf']['nsamplespersec'];
         $info['audio']['channels'] = $RIFFchunk['strf']['nchannels'];
         $info['audio']['bits_per_sample'] = $RIFFchunk['strf']['wbitspersample'];
         $info['audio']['bitrate'] = $info['audio']['sample_rate'] * $info['audio']['channels'] * $info['audio']['bits_per_sample'];
         $info['audio']['bitrate_mode'] = 'cbr';
     } catch (Exception $e) {
         if ($e->getCode() == 10) {
             $this->warning('RIFFAMV parser: ' . $e->getMessage());
         } else {
             throw $e;
         }
     }
     return $RIFFchunk;
 }
Пример #16
0
 public function Analyze()
 {
     $info =& $this->getid3->info;
     // shortcut
     $info['midi']['raw'] = array();
     $thisfile_midi =& $info['midi'];
     $thisfile_midi_raw =& $thisfile_midi['raw'];
     $info['fileformat'] = 'midi';
     $info['audio']['dataformat'] = 'midi';
     $this->fseek($info['avdataoffset']);
     $MIDIdata = $this->fread($this->getid3->fread_buffer_size());
     $offset = 0;
     $MIDIheaderID = substr($MIDIdata, $offset, 4);
     // 'MThd'
     if ($MIDIheaderID !== self::MAGIC_MTHD) {
         $info['error'][] = 'Expecting "' . Utils::PrintHexBytes(self::MAGIC_MTHD) . '" at offset ' . $info['avdataoffset'] . ', found "' . Utils::PrintHexBytes($MIDIheaderID) . '"';
         unset($info['fileformat']);
         return false;
     }
     $offset += 4;
     $thisfile_midi_raw['headersize'] = Utils::BigEndian2Int(substr($MIDIdata, $offset, 4));
     $offset += 4;
     $thisfile_midi_raw['fileformat'] = Utils::BigEndian2Int(substr($MIDIdata, $offset, 2));
     $offset += 2;
     $thisfile_midi_raw['tracks'] = Utils::BigEndian2Int(substr($MIDIdata, $offset, 2));
     $offset += 2;
     $thisfile_midi_raw['ticksperqnote'] = Utils::BigEndian2Int(substr($MIDIdata, $offset, 2));
     $offset += 2;
     for ($i = 0; $i < $thisfile_midi_raw['tracks']; $i++) {
         while (strlen($MIDIdata) - $offset < 8) {
             if ($buffer = $this->fread($this->getid3->fread_buffer_size())) {
                 $MIDIdata .= $buffer;
             } else {
                 $info['warning'][] = 'only processed ' . ($i - 1) . ' of ' . $thisfile_midi_raw['tracks'] . ' tracks';
                 $info['error'][] = 'Unabled to read more file data at ' . $this->ftell() . ' (trying to seek to : ' . $offset . '), was expecting at least 8 more bytes';
                 return false;
             }
         }
         $trackID = substr($MIDIdata, $offset, 4);
         $offset += 4;
         if ($trackID === self::MAGIC_MTRK) {
             $tracksize = Utils::BigEndian2Int(substr($MIDIdata, $offset, 4));
             $offset += 4;
             //$thisfile_midi['tracks'][$i]['size'] = $tracksize;
             $trackdataarray[$i] = substr($MIDIdata, $offset, $tracksize);
             $offset += $tracksize;
         } else {
             $info['error'][] = 'Expecting "' . Utils::PrintHexBytes(self::MAGIC_MTRK) . '" at ' . ($offset - 4) . ', found "' . Utils::PrintHexBytes($trackID) . '" instead';
             return false;
         }
     }
     if (!isset($trackdataarray) || !is_array($trackdataarray)) {
         $info['error'][] = 'Cannot find MIDI track information';
         unset($thisfile_midi);
         unset($info['fileformat']);
         return false;
     }
     if ($this->scanwholefile) {
         // this can take quite a long time, so have the option to bypass it if speed is very important
         $thisfile_midi['totalticks'] = 0;
         $info['playtime_seconds'] = 0;
         $CurrentMicroSecondsPerBeat = 500000;
         // 120 beats per minute;  60,000,000 microseconds per minute -> 500,000 microseconds per beat
         $CurrentBeatsPerMinute = 120;
         // 120 beats per minute;  60,000,000 microseconds per minute -> 500,000 microseconds per beat
         $MicroSecondsPerQuarterNoteAfter = array();
         foreach ($trackdataarray as $tracknumber => $trackdata) {
             $eventsoffset = 0;
             $LastIssuedMIDIcommand = 0;
             $LastIssuedMIDIchannel = 0;
             $CumulativeDeltaTime = 0;
             $TicksAtCurrentBPM = 0;
             while ($eventsoffset < strlen($trackdata)) {
                 $eventid = 0;
                 if (isset($MIDIevents[$tracknumber]) && is_array($MIDIevents[$tracknumber])) {
                     $eventid = count($MIDIevents[$tracknumber]);
                 }
                 $deltatime = 0;
                 for ($i = 0; $i < 4; $i++) {
                     $deltatimebyte = ord(substr($trackdata, $eventsoffset++, 1));
                     $deltatime = ($deltatime << 7) + ($deltatimebyte & 0x7f);
                     if ($deltatimebyte & 0x80) {
                         // another byte follows
                     } else {
                         break;
                     }
                 }
                 $CumulativeDeltaTime += $deltatime;
                 $TicksAtCurrentBPM += $deltatime;
                 $MIDIevents[$tracknumber][$eventid]['deltatime'] = $deltatime;
                 $MIDI_event_channel = ord(substr($trackdata, $eventsoffset++, 1));
                 if ($MIDI_event_channel & 0x80) {
                     // OK, normal event - MIDI command has MSB set
                     $LastIssuedMIDIcommand = $MIDI_event_channel >> 4;
                     $LastIssuedMIDIchannel = $MIDI_event_channel & 0xf;
                 } else {
                     // running event - assume last command
                     $eventsoffset--;
                 }
                 $MIDIevents[$tracknumber][$eventid]['eventid'] = $LastIssuedMIDIcommand;
                 $MIDIevents[$tracknumber][$eventid]['channel'] = $LastIssuedMIDIchannel;
                 if ($MIDIevents[$tracknumber][$eventid]['eventid'] == 0x8) {
                     // Note off (key is released)
                     $notenumber = ord(substr($trackdata, $eventsoffset++, 1));
                     $velocity = ord(substr($trackdata, $eventsoffset++, 1));
                 } elseif ($MIDIevents[$tracknumber][$eventid]['eventid'] == 0x9) {
                     // Note on (key is pressed)
                     $notenumber = ord(substr($trackdata, $eventsoffset++, 1));
                     $velocity = ord(substr($trackdata, $eventsoffset++, 1));
                 } elseif ($MIDIevents[$tracknumber][$eventid]['eventid'] == 0xa) {
                     // Key after-touch
                     $notenumber = ord(substr($trackdata, $eventsoffset++, 1));
                     $velocity = ord(substr($trackdata, $eventsoffset++, 1));
                 } elseif ($MIDIevents[$tracknumber][$eventid]['eventid'] == 0xb) {
                     // Control Change
                     $controllernum = ord(substr($trackdata, $eventsoffset++, 1));
                     $newvalue = ord(substr($trackdata, $eventsoffset++, 1));
                 } elseif ($MIDIevents[$tracknumber][$eventid]['eventid'] == 0xc) {
                     // Program (patch) change
                     $newprogramnum = ord(substr($trackdata, $eventsoffset++, 1));
                     $thisfile_midi_raw['track'][$tracknumber]['instrumentid'] = $newprogramnum;
                     if ($tracknumber == 10) {
                         $thisfile_midi_raw['track'][$tracknumber]['instrument'] = $this->GeneralMIDIpercussionLookup($newprogramnum);
                     } else {
                         $thisfile_midi_raw['track'][$tracknumber]['instrument'] = $this->GeneralMIDIinstrumentLookup($newprogramnum);
                     }
                 } elseif ($MIDIevents[$tracknumber][$eventid]['eventid'] == 0xd) {
                     // Channel after-touch
                     $channelnumber = ord(substr($trackdata, $eventsoffset++, 1));
                 } elseif ($MIDIevents[$tracknumber][$eventid]['eventid'] == 0xe) {
                     // Pitch wheel change (2000H is normal or no change)
                     $changeLSB = ord(substr($trackdata, $eventsoffset++, 1));
                     $changeMSB = ord(substr($trackdata, $eventsoffset++, 1));
                     $pitchwheelchange = ($changeMSB & 0x7f) << 7 & ($changeLSB & 0x7f);
                 } elseif ($MIDIevents[$tracknumber][$eventid]['eventid'] == 0xf && $MIDIevents[$tracknumber][$eventid]['channel'] == 0xf) {
                     $METAeventCommand = ord(substr($trackdata, $eventsoffset++, 1));
                     $METAeventLength = ord(substr($trackdata, $eventsoffset++, 1));
                     $METAeventData = substr($trackdata, $eventsoffset, $METAeventLength);
                     $eventsoffset += $METAeventLength;
                     switch ($METAeventCommand) {
                         case 0x0:
                             // Set track sequence number
                             $track_sequence_number = Utils::BigEndian2Int(substr($METAeventData, 0, $METAeventLength));
                             //$thisfile_midi_raw['events'][$tracknumber][$eventid]['seqno'] = $track_sequence_number;
                             break;
                         case 0x1:
                             // Text: generic
                             $text_generic = substr($METAeventData, 0, $METAeventLength);
                             //$thisfile_midi_raw['events'][$tracknumber][$eventid]['text'] = $text_generic;
                             $thisfile_midi['comments']['comment'][] = $text_generic;
                             break;
                         case 0x2:
                             // Text: copyright
                             $text_copyright = substr($METAeventData, 0, $METAeventLength);
                             //$thisfile_midi_raw['events'][$tracknumber][$eventid]['copyright'] = $text_copyright;
                             $thisfile_midi['comments']['copyright'][] = $text_copyright;
                             break;
                         case 0x3:
                             // Text: track name
                             $text_trackname = substr($METAeventData, 0, $METAeventLength);
                             $thisfile_midi_raw['track'][$tracknumber]['name'] = $text_trackname;
                             break;
                         case 0x4:
                             // Text: track instrument name
                             $text_instrument = substr($METAeventData, 0, $METAeventLength);
                             //$thisfile_midi_raw['events'][$tracknumber][$eventid]['instrument'] = $text_instrument;
                             break;
                         case 0x5:
                             // Text: lyrics
                             $text_lyrics = substr($METAeventData, 0, $METAeventLength);
                             //$thisfile_midi_raw['events'][$tracknumber][$eventid]['lyrics'] = $text_lyrics;
                             if (!isset($thisfile_midi['lyrics'])) {
                                 $thisfile_midi['lyrics'] = '';
                             }
                             $thisfile_midi['lyrics'] .= $text_lyrics . "\n";
                             break;
                         case 0x6:
                             // Text: marker
                             $text_marker = substr($METAeventData, 0, $METAeventLength);
                             //$thisfile_midi_raw['events'][$tracknumber][$eventid]['marker'] = $text_marker;
                             break;
                         case 0x7:
                             // Text: cue point
                             $text_cuepoint = substr($METAeventData, 0, $METAeventLength);
                             //$thisfile_midi_raw['events'][$tracknumber][$eventid]['cuepoint'] = $text_cuepoint;
                             break;
                         case 0x2f:
                             // End Of Track
                             //$thisfile_midi_raw['events'][$tracknumber][$eventid]['EOT'] = $CumulativeDeltaTime;
                             break;
                         case 0x51:
                             // Tempo: microseconds / quarter note
                             $CurrentMicroSecondsPerBeat = Utils::BigEndian2Int(substr($METAeventData, 0, $METAeventLength));
                             if ($CurrentMicroSecondsPerBeat == 0) {
                                 $info['error'][] = 'Corrupt MIDI file: CurrentMicroSecondsPerBeat == zero';
                                 return false;
                             }
                             $thisfile_midi_raw['events'][$tracknumber][$CumulativeDeltaTime]['us_qnote'] = $CurrentMicroSecondsPerBeat;
                             $CurrentBeatsPerMinute = 1000000 / $CurrentMicroSecondsPerBeat * 60;
                             $MicroSecondsPerQuarterNoteAfter[$CumulativeDeltaTime] = $CurrentMicroSecondsPerBeat;
                             $TicksAtCurrentBPM = 0;
                             break;
                         case 0x58:
                             // Time signature
                             $timesig_numerator = Utils::BigEndian2Int($METAeventData[0]);
                             $timesig_denominator = pow(2, Utils::BigEndian2Int($METAeventData[1]));
                             // $02 -> x/4, $03 -> x/8, etc
                             $timesig_32inqnote = Utils::BigEndian2Int($METAeventData[2]);
                             // number of 32nd notes to the quarter note
                             //$thisfile_midi_raw['events'][$tracknumber][$eventid]['timesig_32inqnote']   = $timesig_32inqnote;
                             //$thisfile_midi_raw['events'][$tracknumber][$eventid]['timesig_numerator']   = $timesig_numerator;
                             //$thisfile_midi_raw['events'][$tracknumber][$eventid]['timesig_denominator'] = $timesig_denominator;
                             //$thisfile_midi_raw['events'][$tracknumber][$eventid]['timesig_text']        = $timesig_numerator.'/'.$timesig_denominator;
                             $thisfile_midi['timesignature'][] = $timesig_numerator . '/' . $timesig_denominator;
                             break;
                         case 0x59:
                             // Keysignature
                             $keysig_sharpsflats = Utils::BigEndian2Int($METAeventData[0]);
                             if ($keysig_sharpsflats & 0x80) {
                                 // (-7 -> 7 flats, 0 ->key of C, 7 -> 7 sharps)
                                 $keysig_sharpsflats -= 256;
                             }
                             $keysig_majorminor = Utils::BigEndian2Int($METAeventData[1]);
                             // 0 -> major, 1 -> minor
                             $keysigs = array(-7 => 'Cb', -6 => 'Gb', -5 => 'Db', -4 => 'Ab', -3 => 'Eb', -2 => 'Bb', -1 => 'F', 0 => 'C', 1 => 'G', 2 => 'D', 3 => 'A', 4 => 'E', 5 => 'B', 6 => 'F#', 7 => 'C#');
                             //$thisfile_midi_raw['events'][$tracknumber][$eventid]['keysig_sharps'] = (($keysig_sharpsflats > 0) ? abs($keysig_sharpsflats) : 0);
                             //$thisfile_midi_raw['events'][$tracknumber][$eventid]['keysig_flats']  = (($keysig_sharpsflats < 0) ? abs($keysig_sharpsflats) : 0);
                             //$thisfile_midi_raw['events'][$tracknumber][$eventid]['keysig_minor']  = (bool) $keysig_majorminor;
                             //$thisfile_midi_raw['events'][$tracknumber][$eventid]['keysig_text']   = $keysigs[$keysig_sharpsflats].' '.($thisfile_midi_raw['events'][$tracknumber][$eventid]['keysig_minor'] ? 'minor' : 'major');
                             // $keysigs[$keysig_sharpsflats] gets an int key (correct) - $keysigs["$keysig_sharpsflats"] gets a string key (incorrect)
                             $thisfile_midi['keysignature'][] = $keysigs[$keysig_sharpsflats] . ' ' . ((bool) $keysig_majorminor ? 'minor' : 'major');
                             break;
                         case 0x7f:
                             // Sequencer specific information
                             $custom_data = substr($METAeventData, 0, $METAeventLength);
                             break;
                         default:
                             $info['warning'][] = 'Unhandled META Event Command: ' . $METAeventCommand;
                             break;
                     }
                 } else {
                     $info['warning'][] = 'Unhandled MIDI Event ID: ' . $MIDIevents[$tracknumber][$eventid]['eventid'] . ' + Channel ID: ' . $MIDIevents[$tracknumber][$eventid]['channel'];
                 }
             }
             if ($tracknumber > 0 || count($trackdataarray) == 1) {
                 $thisfile_midi['totalticks'] = max($thisfile_midi['totalticks'], $CumulativeDeltaTime);
             }
         }
         $previoustickoffset = null;
         ksort($MicroSecondsPerQuarterNoteAfter);
         foreach ($MicroSecondsPerQuarterNoteAfter as $tickoffset => $microsecondsperbeat) {
             if (is_null($previoustickoffset)) {
                 $prevmicrosecondsperbeat = $microsecondsperbeat;
                 $previoustickoffset = $tickoffset;
                 continue;
             }
             if ($thisfile_midi['totalticks'] > $tickoffset) {
                 if ($thisfile_midi_raw['ticksperqnote'] == 0) {
                     $info['error'][] = 'Corrupt MIDI file: ticksperqnote == zero';
                     return false;
                 }
                 $info['playtime_seconds'] += ($tickoffset - $previoustickoffset) / $thisfile_midi_raw['ticksperqnote'] * ($prevmicrosecondsperbeat / 1000000);
                 $prevmicrosecondsperbeat = $microsecondsperbeat;
                 $previoustickoffset = $tickoffset;
             }
         }
         if ($thisfile_midi['totalticks'] > $previoustickoffset) {
             if ($thisfile_midi_raw['ticksperqnote'] == 0) {
                 $info['error'][] = 'Corrupt MIDI file: ticksperqnote == zero';
                 return false;
             }
             $info['playtime_seconds'] += ($thisfile_midi['totalticks'] - $previoustickoffset) / $thisfile_midi_raw['ticksperqnote'] * ($microsecondsperbeat / 1000000);
         }
     }
     if (!empty($info['playtime_seconds'])) {
         $info['bitrate'] = ($info['avdataend'] - $info['avdataoffset']) * 8 / $info['playtime_seconds'];
     }
     if (!empty($thisfile_midi['lyrics'])) {
         $thisfile_midi['comments']['lyrics'][] = $thisfile_midi['lyrics'];
     }
     return true;
 }
Пример #17
0
 public function Analyze()
 {
     $info =& $this->getid3->info;
     $this->fseek($info['avdataoffset']);
     $ShortenHeader = $this->fread(8);
     $magic = 'ajkg';
     if (substr($ShortenHeader, 0, 4) != $magic) {
         $info['error'][] = 'Expecting "' . Utils::PrintHexBytes($magic) . '" at offset ' . $info['avdataoffset'] . ', found "' . Utils::PrintHexBytes(substr($ShortenHeader, 0, 4)) . '"';
         return false;
     }
     $info['fileformat'] = 'shn';
     $info['audio']['dataformat'] = 'shn';
     $info['audio']['lossless'] = true;
     $info['audio']['bitrate_mode'] = 'vbr';
     $info['shn']['version'] = Utils::LittleEndian2Int(substr($ShortenHeader, 4, 1));
     $this->fseek($info['avdataend'] - 12);
     $SeekTableSignatureTest = $this->fread(12);
     $info['shn']['seektable']['present'] = (bool) (substr($SeekTableSignatureTest, 4, 8) == 'SHNAMPSK');
     if ($info['shn']['seektable']['present']) {
         $info['shn']['seektable']['length'] = Utils::LittleEndian2Int(substr($SeekTableSignatureTest, 0, 4));
         $info['shn']['seektable']['offset'] = $info['avdataend'] - $info['shn']['seektable']['length'];
         $this->fseek($info['shn']['seektable']['offset']);
         $SeekTableMagic = $this->fread(4);
         $magic = 'SEEK';
         if ($SeekTableMagic != $magic) {
             $info['error'][] = 'Expecting "' . Utils::PrintHexBytes($magic) . '" at offset ' . $info['shn']['seektable']['offset'] . ', found "' . Utils::PrintHexBytes($SeekTableMagic) . '"';
             return false;
         } else {
             // typedef struct tag_TSeekEntry
             // {
             //   unsigned long SampleNumber;
             //   unsigned long SHNFileByteOffset;
             //   unsigned long SHNLastBufferReadPosition;
             //   unsigned short SHNByteGet;
             //   unsigned short SHNBufferOffset;
             //   unsigned short SHNFileBitOffset;
             //   unsigned long SHNGBuffer;
             //   unsigned short SHNBitShift;
             //   long CBuf0[3];
             //   long CBuf1[3];
             //   long Offset0[4];
             //   long Offset1[4];
             // }TSeekEntry;
             $SeekTableData = $this->fread($info['shn']['seektable']['length'] - 16);
             $info['shn']['seektable']['entry_count'] = floor(strlen($SeekTableData) / 80);
             //$info['shn']['seektable']['entries'] = array();
             //$SeekTableOffset = 0;
             //for ($i = 0; $i < $info['shn']['seektable']['entry_count']; $i++) {
             //	$SeekTableEntry['sample_number'] = Utils::LittleEndian2Int(substr($SeekTableData, $SeekTableOffset, 4));
             //	$SeekTableOffset += 4;
             //	$SeekTableEntry['shn_file_byte_offset'] = Utils::LittleEndian2Int(substr($SeekTableData, $SeekTableOffset, 4));
             //	$SeekTableOffset += 4;
             //	$SeekTableEntry['shn_last_buffer_read_position'] = Utils::LittleEndian2Int(substr($SeekTableData, $SeekTableOffset, 4));
             //	$SeekTableOffset += 4;
             //	$SeekTableEntry['shn_byte_get'] = Utils::LittleEndian2Int(substr($SeekTableData, $SeekTableOffset, 2));
             //	$SeekTableOffset += 2;
             //	$SeekTableEntry['shn_buffer_offset'] = Utils::LittleEndian2Int(substr($SeekTableData, $SeekTableOffset, 2));
             //	$SeekTableOffset += 2;
             //	$SeekTableEntry['shn_file_bit_offset'] = Utils::LittleEndian2Int(substr($SeekTableData, $SeekTableOffset, 2));
             //	$SeekTableOffset += 2;
             //	$SeekTableEntry['shn_gbuffer'] = Utils::LittleEndian2Int(substr($SeekTableData, $SeekTableOffset, 4));
             //	$SeekTableOffset += 4;
             //	$SeekTableEntry['shn_bit_shift'] = Utils::LittleEndian2Int(substr($SeekTableData, $SeekTableOffset, 2));
             //	$SeekTableOffset += 2;
             //	for ($j = 0; $j < 3; $j++) {
             //		$SeekTableEntry['cbuf0'][$j] = Utils::LittleEndian2Int(substr($SeekTableData, $SeekTableOffset, 4));
             //		$SeekTableOffset += 4;
             //	}
             //	for ($j = 0; $j < 3; $j++) {
             //		$SeekTableEntry['cbuf1'][$j] = Utils::LittleEndian2Int(substr($SeekTableData, $SeekTableOffset, 4));
             //		$SeekTableOffset += 4;
             //	}
             //	for ($j = 0; $j < 4; $j++) {
             //		$SeekTableEntry['offset0'][$j] = Utils::LittleEndian2Int(substr($SeekTableData, $SeekTableOffset, 4));
             //		$SeekTableOffset += 4;
             //	}
             //	for ($j = 0; $j < 4; $j++) {
             //		$SeekTableEntry['offset1'][$j] = Utils::LittleEndian2Int(substr($SeekTableData, $SeekTableOffset, 4));
             //		$SeekTableOffset += 4;
             //	}
             //
             //	$info['shn']['seektable']['entries'][] = $SeekTableEntry;
             //}
         }
     }
     if (Utils::isWindows()) {
         $RequiredFiles = array('shorten.exe', 'cygwin1.dll', 'head.exe');
         foreach ($RequiredFiles as $required_file) {
             if (!is_readable(Utils::getHelperAppDirectory() . $required_file)) {
                 $info['error'][] = Utils::getHelperAppDirectory() . $required_file . ' does not exist';
                 return false;
             }
         }
         $commandline = Utils::getHelperAppDirectory() . 'shorten.exe -x "' . $info['filenamepath'] . '" - | ' . Utils::getHelperAppDirectory() . 'head.exe -c 64';
         $commandline = str_replace('/', '\\', $commandline);
     } else {
         static $shorten_present;
         if (!isset($shorten_present)) {
             $shorten_present = file_exists('/usr/local/bin/shorten') || `which shorten`;
         }
         if (!$shorten_present) {
             $info['error'][] = 'shorten binary was not found in path or /usr/local/bin';
             return false;
         }
         $commandline = (file_exists('/usr/local/bin/shorten') ? '/usr/local/bin/' : '') . 'shorten -x ' . escapeshellarg($info['filenamepath']) . ' - | head -c 64';
     }
     $output = `{$commandline}`;
     if (!empty($output) && substr($output, 12, 4) == 'fmt ') {
         $fmt_size = Utils::LittleEndian2Int(substr($output, 16, 4));
         $DecodedWAVFORMATEX = Riff::parseWAVEFORMATex(substr($output, 20, $fmt_size));
         $info['audio']['channels'] = $DecodedWAVFORMATEX['channels'];
         $info['audio']['bits_per_sample'] = $DecodedWAVFORMATEX['bits_per_sample'];
         $info['audio']['sample_rate'] = $DecodedWAVFORMATEX['sample_rate'];
         if (substr($output, 20 + $fmt_size, 4) == 'data') {
             $info['playtime_seconds'] = Utils::LittleEndian2Int(substr($output, 20 + 4 + $fmt_size, 4)) / $DecodedWAVFORMATEX['raw']['nAvgBytesPerSec'];
         } else {
             $info['error'][] = 'shorten failed to decode DATA chunk to expected location, cannot determine playtime';
             return false;
         }
         $info['audio']['bitrate'] = ($info['avdataend'] - $info['avdataoffset']) / $info['playtime_seconds'] * 8;
     } else {
         $info['error'][] = 'shorten failed to decode file to WAV for parsing';
         return false;
     }
     return true;
 }
Пример #18
0
 public function ParseOptimFROGheader45()
 {
     // for fileformat of v4.50a and higher
     $info =& $this->getid3->info;
     $RIFFdata = '';
     $this->fseek($info['avdataoffset']);
     while (!feof($this->getid3->fp) && $this->ftell() < $info['avdataend']) {
         $BlockOffset = $this->ftell();
         $BlockData = $this->fread(8);
         $offset = 8;
         $BlockName = substr($BlockData, 0, 4);
         $BlockSize = Utils::LittleEndian2Int(substr($BlockData, 4, 4));
         if ($BlockName == 'OFRX') {
             $BlockName = 'OFR ';
         }
         if (!isset($info['ofr'][$BlockName])) {
             $info['ofr'][$BlockName] = array();
         }
         $thisfile_ofr_thisblock =& $info['ofr'][$BlockName];
         switch ($BlockName) {
             case 'OFR ':
                 // shortcut
                 $thisfile_ofr_thisblock['offset'] = $BlockOffset;
                 $thisfile_ofr_thisblock['size'] = $BlockSize;
                 $info['audio']['encoder'] = 'OptimFROG 4.50 alpha';
                 switch ($BlockSize) {
                     case 12:
                     case 15:
                         // good
                         break;
                     default:
                         $info['warning'][] = '"' . $BlockName . '" contains more data than expected (expected 12 or 15 bytes, found ' . $BlockSize . ' bytes)';
                         break;
                 }
                 $BlockData .= $this->fread($BlockSize);
                 $thisfile_ofr_thisblock['total_samples'] = Utils::LittleEndian2Int(substr($BlockData, $offset, 6));
                 $offset += 6;
                 $thisfile_ofr_thisblock['raw']['sample_type'] = Utils::LittleEndian2Int(substr($BlockData, $offset, 1));
                 $thisfile_ofr_thisblock['sample_type'] = $this->OptimFROGsampleTypeLookup($thisfile_ofr_thisblock['raw']['sample_type']);
                 $offset += 1;
                 $thisfile_ofr_thisblock['channel_config'] = Utils::LittleEndian2Int(substr($BlockData, $offset, 1));
                 $thisfile_ofr_thisblock['channels'] = $thisfile_ofr_thisblock['channel_config'];
                 $offset += 1;
                 $thisfile_ofr_thisblock['sample_rate'] = Utils::LittleEndian2Int(substr($BlockData, $offset, 4));
                 $offset += 4;
                 if ($BlockSize > 12) {
                     // OFR 4.504b or higher
                     $thisfile_ofr_thisblock['channels'] = $this->OptimFROGchannelConfigNumChannelsLookup($thisfile_ofr_thisblock['channel_config']);
                     $thisfile_ofr_thisblock['raw']['encoder_id'] = Utils::LittleEndian2Int(substr($BlockData, $offset, 2));
                     $thisfile_ofr_thisblock['encoder'] = $this->OptimFROGencoderNameLookup($thisfile_ofr_thisblock['raw']['encoder_id']);
                     $offset += 2;
                     $thisfile_ofr_thisblock['raw']['compression'] = Utils::LittleEndian2Int(substr($BlockData, $offset, 1));
                     $thisfile_ofr_thisblock['compression'] = $this->OptimFROGcompressionLookup($thisfile_ofr_thisblock['raw']['compression']);
                     $thisfile_ofr_thisblock['speedup'] = $this->OptimFROGspeedupLookup($thisfile_ofr_thisblock['raw']['compression']);
                     $offset += 1;
                     $info['audio']['encoder'] = 'OptimFROG ' . $thisfile_ofr_thisblock['encoder'];
                     $info['audio']['encoder_options'] = '--mode ' . $thisfile_ofr_thisblock['compression'];
                     if (($thisfile_ofr_thisblock['raw']['encoder_id'] & 0xf0) >> 4 == 7) {
                         // v4.507
                         if (strtolower(Utils::fileextension($info['filename'])) == 'ofs') {
                             // OptimFROG DualStream format is lossy, but as of v4.507 there is no way to tell the difference
                             // between lossless and lossy other than the file extension.
                             $info['audio']['dataformat'] = 'ofs';
                             $info['audio']['lossless'] = true;
                         }
                     }
                 }
                 $info['audio']['channels'] = $thisfile_ofr_thisblock['channels'];
                 $info['audio']['sample_rate'] = $thisfile_ofr_thisblock['sample_rate'];
                 $info['audio']['bits_per_sample'] = $this->OptimFROGbitsPerSampleTypeLookup($thisfile_ofr_thisblock['raw']['sample_type']);
                 break;
             case 'COMP':
                 // unlike other block types, there CAN be multiple COMP blocks
                 $COMPdata['offset'] = $BlockOffset;
                 $COMPdata['size'] = $BlockSize;
                 if ($info['avdataoffset'] == 0) {
                     $info['avdataoffset'] = $BlockOffset;
                 }
                 // Only interested in first 14 bytes (only first 12 needed for v4.50 alpha), not actual audio data
                 $BlockData .= $this->fread(14);
                 $this->fseek($BlockSize - 14, SEEK_CUR);
                 $COMPdata['crc_32'] = Utils::LittleEndian2Int(substr($BlockData, $offset, 4));
                 $offset += 4;
                 $COMPdata['sample_count'] = Utils::LittleEndian2Int(substr($BlockData, $offset, 4));
                 $offset += 4;
                 $COMPdata['raw']['sample_type'] = Utils::LittleEndian2Int(substr($BlockData, $offset, 1));
                 $COMPdata['sample_type'] = $this->OptimFROGsampleTypeLookup($COMPdata['raw']['sample_type']);
                 $offset += 1;
                 $COMPdata['raw']['channel_configuration'] = Utils::LittleEndian2Int(substr($BlockData, $offset, 1));
                 $COMPdata['channel_configuration'] = $this->OptimFROGchannelConfigurationLookup($COMPdata['raw']['channel_configuration']);
                 $offset += 1;
                 $COMPdata['raw']['algorithm_id'] = Utils::LittleEndian2Int(substr($BlockData, $offset, 2));
                 //$COMPdata['algorithm']                    = OptimFROGalgorithmNameLookup($COMPdata['raw']['algorithm_id']);
                 $offset += 2;
                 if ($info['ofr']['OFR ']['size'] > 12) {
                     // OFR 4.504b or higher
                     $COMPdata['raw']['encoder_id'] = Utils::LittleEndian2Int(substr($BlockData, $offset, 2));
                     $COMPdata['encoder'] = $this->OptimFROGencoderNameLookup($COMPdata['raw']['encoder_id']);
                     $offset += 2;
                 }
                 if ($COMPdata['crc_32'] == 0x454e4f4e) {
                     // ASCII value of 'NONE' - placeholder value in v4.50a
                     $COMPdata['crc_32'] = false;
                 }
                 $thisfile_ofr_thisblock[] = $COMPdata;
                 break;
             case 'HEAD':
                 $thisfile_ofr_thisblock['offset'] = $BlockOffset;
                 $thisfile_ofr_thisblock['size'] = $BlockSize;
                 $RIFFdata .= $this->fread($BlockSize);
                 break;
             case 'TAIL':
                 $thisfile_ofr_thisblock['offset'] = $BlockOffset;
                 $thisfile_ofr_thisblock['size'] = $BlockSize;
                 if ($BlockSize > 0) {
                     $RIFFdata .= $this->fread($BlockSize);
                 }
                 break;
             case 'RECV':
                 // block contains no useful meta data - simply note and skip
                 $thisfile_ofr_thisblock['offset'] = $BlockOffset;
                 $thisfile_ofr_thisblock['size'] = $BlockSize;
                 $this->fseek($BlockSize, SEEK_CUR);
                 break;
             case 'APET':
                 // APEtag v2
                 $thisfile_ofr_thisblock['offset'] = $BlockOffset;
                 $thisfile_ofr_thisblock['size'] = $BlockSize;
                 $info['warning'][] = 'APEtag processing inside OptimFROG not supported in this version (' . $this->getid3->version() . ') of getID3()';
                 $this->fseek($BlockSize, SEEK_CUR);
                 break;
             case 'MD5 ':
                 // APEtag v2
                 $thisfile_ofr_thisblock['offset'] = $BlockOffset;
                 $thisfile_ofr_thisblock['size'] = $BlockSize;
                 if ($BlockSize == 16) {
                     $thisfile_ofr_thisblock['md5_binary'] = $this->fread($BlockSize);
                     $thisfile_ofr_thisblock['md5_string'] = Utils::PrintHexBytes($thisfile_ofr_thisblock['md5_binary'], true, false, false);
                     $info['md5_data_source'] = $thisfile_ofr_thisblock['md5_string'];
                 } else {
                     $info['warning'][] = 'Expecting block size of 16 in "MD5 " chunk, found ' . $BlockSize . ' instead';
                     $this->fseek($BlockSize, SEEK_CUR);
                 }
                 break;
             default:
                 $thisfile_ofr_thisblock['offset'] = $BlockOffset;
                 $thisfile_ofr_thisblock['size'] = $BlockSize;
                 $info['warning'][] = 'Unhandled OptimFROG block type "' . $BlockName . '" at offset ' . $thisfile_ofr_thisblock['offset'];
                 $this->fseek($BlockSize, SEEK_CUR);
                 break;
         }
     }
     if (isset($info['ofr']['TAIL']['offset'])) {
         $info['avdataend'] = $info['ofr']['TAIL']['offset'];
     }
     $info['playtime_seconds'] = (double) $info['ofr']['OFR ']['total_samples'] / ($info['audio']['channels'] * $info['audio']['sample_rate']);
     $info['audio']['bitrate'] = ($info['avdataend'] - $info['avdataoffset']) * 8 / $info['playtime_seconds'];
     // move the data chunk after all other chunks (if any)
     // so that the RIFF parser doesn't see EOF when trying
     // to skip over the data chunk
     $RIFFdata = substr($RIFFdata, 0, 36) . substr($RIFFdata, 44) . substr($RIFFdata, 36, 8);
     $getid3_temp = new GetID3();
     $getid3_temp->openfile($this->getid3->filename);
     $getid3_temp->info['avdataoffset'] = $info['avdataoffset'];
     $getid3_temp->info['avdataend'] = $info['avdataend'];
     $getid3_riff = new Riff($getid3_temp);
     $getid3_riff->ParseRIFFdata($RIFFdata);
     $info['riff'] = $getid3_temp->info['riff'];
     unset($getid3_riff, $getid3_temp, $RIFFdata);
     return true;
 }
Пример #19
0
 public function Analyze()
 {
     $info =& $this->getid3->info;
     $info['fileformat'] = 'gif';
     $info['video']['dataformat'] = 'gif';
     $info['video']['lossless'] = true;
     $info['video']['pixel_aspect_ratio'] = (double) 1;
     $this->fseek($info['avdataoffset']);
     $GIFheader = $this->fread(13);
     $offset = 0;
     $info['gif']['header']['raw']['identifier'] = substr($GIFheader, $offset, 3);
     $offset += 3;
     $magic = 'GIF';
     if ($info['gif']['header']['raw']['identifier'] != $magic) {
         $info['error'][] = 'Expecting "' . Utils::PrintHexBytes($magic) . '" at offset ' . $info['avdataoffset'] . ', found "' . Utils::PrintHexBytes($info['gif']['header']['raw']['identifier']) . '"';
         unset($info['fileformat']);
         unset($info['gif']);
         return false;
     }
     $info['gif']['header']['raw']['version'] = substr($GIFheader, $offset, 3);
     $offset += 3;
     $info['gif']['header']['raw']['width'] = Utils::LittleEndian2Int(substr($GIFheader, $offset, 2));
     $offset += 2;
     $info['gif']['header']['raw']['height'] = Utils::LittleEndian2Int(substr($GIFheader, $offset, 2));
     $offset += 2;
     $info['gif']['header']['raw']['flags'] = Utils::LittleEndian2Int(substr($GIFheader, $offset, 1));
     $offset += 1;
     $info['gif']['header']['raw']['bg_color_index'] = Utils::LittleEndian2Int(substr($GIFheader, $offset, 1));
     $offset += 1;
     $info['gif']['header']['raw']['aspect_ratio'] = Utils::LittleEndian2Int(substr($GIFheader, $offset, 1));
     $offset += 1;
     $info['video']['resolution_x'] = $info['gif']['header']['raw']['width'];
     $info['video']['resolution_y'] = $info['gif']['header']['raw']['height'];
     $info['gif']['version'] = $info['gif']['header']['raw']['version'];
     $info['gif']['header']['flags']['global_color_table'] = (bool) ($info['gif']['header']['raw']['flags'] & 0x80);
     if ($info['gif']['header']['raw']['flags'] & 0x80) {
         // Number of bits per primary color available to the original image, minus 1
         $info['gif']['header']['bits_per_pixel'] = 3 * ((($info['gif']['header']['raw']['flags'] & 0x70) >> 4) + 1);
     } else {
         $info['gif']['header']['bits_per_pixel'] = 0;
     }
     $info['gif']['header']['flags']['global_color_sorted'] = (bool) ($info['gif']['header']['raw']['flags'] & 0x40);
     if ($info['gif']['header']['flags']['global_color_table']) {
         // the number of bytes contained in the Global Color Table. To determine that
         // actual size of the color table, raise 2 to [the value of the field + 1]
         $info['gif']['header']['global_color_size'] = pow(2, ($info['gif']['header']['raw']['flags'] & 0x7) + 1);
         $info['video']['bits_per_sample'] = ($info['gif']['header']['raw']['flags'] & 0x7) + 1;
     } else {
         $info['gif']['header']['global_color_size'] = 0;
     }
     if ($info['gif']['header']['raw']['aspect_ratio'] != 0) {
         // Aspect Ratio = (Pixel Aspect Ratio + 15) / 64
         $info['gif']['header']['aspect_ratio'] = ($info['gif']['header']['raw']['aspect_ratio'] + 15) / 64;
     }
     //		if ($info['gif']['header']['flags']['global_color_table']) {
     //			$GIFcolorTable = $this->fread(3 * $info['gif']['header']['global_color_size']);
     //			$offset = 0;
     //			for ($i = 0; $i < $info['gif']['header']['global_color_size']; $i++) {
     //				$red   = Utils::LittleEndian2Int(substr($GIFcolorTable, $offset++, 1));
     //				$green = Utils::LittleEndian2Int(substr($GIFcolorTable, $offset++, 1));
     //				$blue  = Utils::LittleEndian2Int(substr($GIFcolorTable, $offset++, 1));
     //				$info['gif']['global_color_table'][$i] = (($red << 16) | ($green << 8) | ($blue));
     //			}
     //		}
     //
     //		// Image Descriptor
     //		while (!feof($this->getid3->fp)) {
     //			$NextBlockTest = $this->fread(1);
     //			switch ($NextBlockTest) {
     //
     //				case ',': // ',' - Image separator character
     //
     //					$ImageDescriptorData = $NextBlockTest.$this->fread(9);
     //					$ImageDescriptor = array();
     //					$ImageDescriptor['image_left']   = Utils::LittleEndian2Int(substr($ImageDescriptorData, 1, 2));
     //					$ImageDescriptor['image_top']    = Utils::LittleEndian2Int(substr($ImageDescriptorData, 3, 2));
     //					$ImageDescriptor['image_width']  = Utils::LittleEndian2Int(substr($ImageDescriptorData, 5, 2));
     //					$ImageDescriptor['image_height'] = Utils::LittleEndian2Int(substr($ImageDescriptorData, 7, 2));
     //					$ImageDescriptor['flags_raw']    = Utils::LittleEndian2Int(substr($ImageDescriptorData, 9, 1));
     //					$ImageDescriptor['flags']['use_local_color_map'] = (bool) ($ImageDescriptor['flags_raw'] & 0x80);
     //					$ImageDescriptor['flags']['image_interlaced']    = (bool) ($ImageDescriptor['flags_raw'] & 0x40);
     //					$info['gif']['image_descriptor'][] = $ImageDescriptor;
     //
     //					if ($ImageDescriptor['flags']['use_local_color_map']) {
     //
     //						$info['warning'][] = 'This version of getID3() cannot parse local color maps for GIFs';
     //						return true;
     //
     //					}
     //echo 'Start of raster data: '.$this->ftell().'<BR>';
     //					$RasterData = array();
     //					$RasterData['code_size']        = Utils::LittleEndian2Int($this->fread(1));
     //					$RasterData['block_byte_count'] = Utils::LittleEndian2Int($this->fread(1));
     //					$info['gif']['raster_data'][count($info['gif']['image_descriptor']) - 1] = $RasterData;
     //
     //					$CurrentCodeSize = $RasterData['code_size'] + 1;
     //					for ($i = 0; $i < pow(2, $RasterData['code_size']); $i++) {
     //						$DefaultDataLookupTable[$i] = chr($i);
     //					}
     //					$DefaultDataLookupTable[pow(2, $RasterData['code_size']) + 0] = ''; // Clear Code
     //					$DefaultDataLookupTable[pow(2, $RasterData['code_size']) + 1] = ''; // End Of Image Code
     //
     //
     //					$NextValue = $this->GetLSBits($CurrentCodeSize);
     //					echo 'Clear Code: '.$NextValue.'<BR>';
     //
     //					$NextValue = $this->GetLSBits($CurrentCodeSize);
     //					echo 'First Color: '.$NextValue.'<BR>';
     //
     //					$Prefix = $NextValue;
     //$i = 0;
     //					while ($i++ < 20) {
     //						$NextValue = $this->GetLSBits($CurrentCodeSize);
     //						echo $NextValue.'<BR>';
     //					}
     //return true;
     //					break;
     //
     //				case '!':
     //					// GIF Extension Block
     //					$ExtensionBlockData = $NextBlockTest.$this->fread(2);
     //					$ExtensionBlock = array();
     //					$ExtensionBlock['function_code']  = Utils::LittleEndian2Int(substr($ExtensionBlockData, 1, 1));
     //					$ExtensionBlock['byte_length']    = Utils::LittleEndian2Int(substr($ExtensionBlockData, 2, 1));
     //					$ExtensionBlock['data']           = $this->fread($ExtensionBlock['byte_length']);
     //					$info['gif']['extension_blocks'][] = $ExtensionBlock;
     //					break;
     //
     //				case ';':
     //					$info['gif']['terminator_offset'] = $this->ftell() - 1;
     //					// GIF Terminator
     //					break;
     //
     //				default:
     //					break;
     //
     //
     //			}
     //		}
     return true;
 }
Пример #20
0
 public function Analyze()
 {
     $info =& $this->getid3->info;
     // shortcut
     $info['bonk'] = array();
     $thisfile_bonk =& $info['bonk'];
     $thisfile_bonk['dataoffset'] = $info['avdataoffset'];
     $thisfile_bonk['dataend'] = $info['avdataend'];
     if (!Utils::intValueSupported($thisfile_bonk['dataend'])) {
         $info['warning'][] = 'Unable to parse BONK file from end (v0.6+ preferred method) because PHP filesystem functions only support up to ' . round(PHP_INT_MAX / 1073741824) . 'GB';
     } else {
         // scan-from-end method, for v0.6 and higher
         $this->fseek($thisfile_bonk['dataend'] - 8);
         $PossibleBonkTag = $this->fread(8);
         while ($this->BonkIsValidTagName(substr($PossibleBonkTag, 4, 4), true)) {
             $BonkTagSize = Utils::LittleEndian2Int(substr($PossibleBonkTag, 0, 4));
             $this->fseek(0 - $BonkTagSize, SEEK_CUR);
             $BonkTagOffset = $this->ftell();
             $TagHeaderTest = $this->fread(5);
             if ($TagHeaderTest[0] != "" || substr($PossibleBonkTag, 4, 4) != strtolower(substr($PossibleBonkTag, 4, 4))) {
                 $info['error'][] = 'Expecting "' . Utils::PrintHexBytes("" . strtoupper(substr($PossibleBonkTag, 4, 4))) . '" at offset ' . $BonkTagOffset . ', found "' . Utils::PrintHexBytes($TagHeaderTest) . '"';
                 return false;
             }
             $BonkTagName = substr($TagHeaderTest, 1, 4);
             $thisfile_bonk[$BonkTagName]['size'] = $BonkTagSize;
             $thisfile_bonk[$BonkTagName]['offset'] = $BonkTagOffset;
             $this->HandleBonkTags($BonkTagName);
             $NextTagEndOffset = $BonkTagOffset - 8;
             if ($NextTagEndOffset < $thisfile_bonk['dataoffset']) {
                 if (empty($info['audio']['encoder'])) {
                     $info['audio']['encoder'] = 'Extended BONK v0.9+';
                 }
                 return true;
             }
             $this->fseek($NextTagEndOffset);
             $PossibleBonkTag = $this->fread(8);
         }
     }
     // seek-from-beginning method for v0.4 and v0.5
     if (empty($thisfile_bonk['BONK'])) {
         $this->fseek($thisfile_bonk['dataoffset']);
         do {
             $TagHeaderTest = $this->fread(5);
             switch ($TagHeaderTest) {
                 case "" . 'BONK':
                     if (empty($info['audio']['encoder'])) {
                         $info['audio']['encoder'] = 'BONK v0.4';
                     }
                     break;
                 case "" . 'INFO':
                     $info['audio']['encoder'] = 'Extended BONK v0.5';
                     break;
                 default:
                     break 2;
             }
             $BonkTagName = substr($TagHeaderTest, 1, 4);
             $thisfile_bonk[$BonkTagName]['size'] = $thisfile_bonk['dataend'] - $thisfile_bonk['dataoffset'];
             $thisfile_bonk[$BonkTagName]['offset'] = $thisfile_bonk['dataoffset'];
             $this->HandleBonkTags($BonkTagName);
         } while (true);
     }
     // parse META block for v0.6 - v0.8
     if (empty($thisfile_bonk['INFO']) && isset($thisfile_bonk['META']['tags']['info'])) {
         $this->fseek($thisfile_bonk['META']['tags']['info']);
         $TagHeaderTest = $this->fread(5);
         if ($TagHeaderTest == "" . 'INFO') {
             $info['audio']['encoder'] = 'Extended BONK v0.6 - v0.8';
             $BonkTagName = substr($TagHeaderTest, 1, 4);
             $thisfile_bonk[$BonkTagName]['size'] = $thisfile_bonk['dataend'] - $thisfile_bonk['dataoffset'];
             $thisfile_bonk[$BonkTagName]['offset'] = $thisfile_bonk['dataoffset'];
             $this->HandleBonkTags($BonkTagName);
         }
     }
     if (empty($info['audio']['encoder'])) {
         $info['audio']['encoder'] = 'Extended BONK v0.9+';
     }
     if (empty($thisfile_bonk['BONK'])) {
         unset($info['bonk']);
     }
     return true;
 }
Пример #21
0
 public function Analyze()
 {
     $info =& $this->getid3->info;
     $this->fseek($info['avdataoffset']);
     $FLVdataLength = $info['avdataend'] - $info['avdataoffset'];
     $FLVheader = $this->fread(5);
     $info['fileformat'] = 'flv';
     $info['flv']['header']['signature'] = substr($FLVheader, 0, 3);
     $info['flv']['header']['version'] = Utils::BigEndian2Int(substr($FLVheader, 3, 1));
     $TypeFlags = Utils::BigEndian2Int(substr($FLVheader, 4, 1));
     if ($info['flv']['header']['signature'] != self::magic) {
         $info['error'][] = 'Expecting "' . Utils::PrintHexBytes(self::magic) . '" at offset ' . $info['avdataoffset'] . ', found "' . Utils::PrintHexBytes($info['flv']['header']['signature']) . '"';
         unset($info['flv'], $info['fileformat']);
         return false;
     }
     $info['flv']['header']['hasAudio'] = (bool) ($TypeFlags & 0x4);
     $info['flv']['header']['hasVideo'] = (bool) ($TypeFlags & 0x1);
     $FrameSizeDataLength = Utils::BigEndian2Int($this->fread(4));
     $FLVheaderFrameLength = 9;
     if ($FrameSizeDataLength > $FLVheaderFrameLength) {
         $this->fseek($FrameSizeDataLength - $FLVheaderFrameLength, SEEK_CUR);
     }
     $Duration = 0;
     $found_video = false;
     $found_audio = false;
     $found_meta = false;
     $found_valid_meta_playtime = false;
     $tagParseCount = 0;
     $info['flv']['framecount'] = array('total' => 0, 'audio' => 0, 'video' => 0);
     $flv_framecount =& $info['flv']['framecount'];
     while ($this->ftell() + 16 < $info['avdataend'] && ($tagParseCount++ <= $this->max_frames || !$found_valid_meta_playtime)) {
         $ThisTagHeader = $this->fread(16);
         $PreviousTagLength = Utils::BigEndian2Int(substr($ThisTagHeader, 0, 4));
         $TagType = Utils::BigEndian2Int(substr($ThisTagHeader, 4, 1));
         $DataLength = Utils::BigEndian2Int(substr($ThisTagHeader, 5, 3));
         $Timestamp = Utils::BigEndian2Int(substr($ThisTagHeader, 8, 3));
         $LastHeaderByte = Utils::BigEndian2Int(substr($ThisTagHeader, 15, 1));
         $NextOffset = $this->ftell() - 1 + $DataLength;
         if ($Timestamp > $Duration) {
             $Duration = $Timestamp;
         }
         $flv_framecount['total']++;
         switch ($TagType) {
             case self::TAG_AUDIO:
                 $flv_framecount['audio']++;
                 if (!$found_audio) {
                     $found_audio = true;
                     $info['flv']['audio']['audioFormat'] = $LastHeaderByte >> 4 & 0xf;
                     $info['flv']['audio']['audioRate'] = $LastHeaderByte >> 2 & 0x3;
                     $info['flv']['audio']['audioSampleSize'] = $LastHeaderByte >> 1 & 0x1;
                     $info['flv']['audio']['audioType'] = $LastHeaderByte & 0x1;
                 }
                 break;
             case self::TAG_VIDEO:
                 $flv_framecount['video']++;
                 if (!$found_video) {
                     $found_video = true;
                     $info['flv']['video']['videoCodec'] = $LastHeaderByte & 0x7;
                     $FLVvideoHeader = $this->fread(11);
                     if ($info['flv']['video']['videoCodec'] === self::VIDEO_H264) {
                         // this code block contributed by: moysevichØgmail*com
                         $AVCPacketType = Utils::BigEndian2Int(substr($FLVvideoHeader, 0, 1));
                         if ($AVCPacketType == H264_AVC_SEQUENCE_HEADER) {
                             //	read AVCDecoderConfigurationRecord
                             $configurationVersion = Utils::BigEndian2Int(substr($FLVvideoHeader, 4, 1));
                             $AVCProfileIndication = Utils::BigEndian2Int(substr($FLVvideoHeader, 5, 1));
                             $profile_compatibility = Utils::BigEndian2Int(substr($FLVvideoHeader, 6, 1));
                             $lengthSizeMinusOne = Utils::BigEndian2Int(substr($FLVvideoHeader, 7, 1));
                             $numOfSequenceParameterSets = Utils::BigEndian2Int(substr($FLVvideoHeader, 8, 1));
                             if (($numOfSequenceParameterSets & 0x1f) != 0) {
                                 //	there is at least one SequenceParameterSet
                                 //	read size of the first SequenceParameterSet
                                 //$spsSize = Utils::BigEndian2Int(substr($FLVvideoHeader, 9, 2));
                                 $spsSize = Utils::LittleEndian2Int(substr($FLVvideoHeader, 9, 2));
                                 //	read the first SequenceParameterSet
                                 $sps = $this->fread($spsSize);
                                 if (strlen($sps) == $spsSize) {
                                     //	make sure that whole SequenceParameterSet was red
                                     $spsReader = new AVCSequenceParameterSetReader($sps);
                                     $spsReader->readData();
                                     $info['video']['resolution_x'] = $spsReader->getWidth();
                                     $info['video']['resolution_y'] = $spsReader->getHeight();
                                 }
                             }
                         }
                         // end: moysevichØgmail*com
                     } elseif ($info['flv']['video']['videoCodec'] === self::VIDEO_H263) {
                         $PictureSizeType = Utils::BigEndian2Int(substr($FLVvideoHeader, 3, 2)) >> 7;
                         $PictureSizeType = $PictureSizeType & 0x7;
                         $info['flv']['header']['videoSizeType'] = $PictureSizeType;
                         switch ($PictureSizeType) {
                             case 0:
                                 //$PictureSizeEnc = Utils::BigEndian2Int(substr($FLVvideoHeader, 5, 2));
                                 //$PictureSizeEnc <<= 1;
                                 //$info['video']['resolution_x'] = ($PictureSizeEnc & 0xFF00) >> 8;
                                 //$PictureSizeEnc = Utils::BigEndian2Int(substr($FLVvideoHeader, 6, 2));
                                 //$PictureSizeEnc <<= 1;
                                 //$info['video']['resolution_y'] = ($PictureSizeEnc & 0xFF00) >> 8;
                                 $PictureSizeEnc['x'] = Utils::BigEndian2Int(substr($FLVvideoHeader, 4, 2)) >> 7;
                                 $PictureSizeEnc['y'] = Utils::BigEndian2Int(substr($FLVvideoHeader, 5, 2)) >> 7;
                                 $info['video']['resolution_x'] = $PictureSizeEnc['x'] & 0xff;
                                 $info['video']['resolution_y'] = $PictureSizeEnc['y'] & 0xff;
                                 break;
                             case 1:
                                 $PictureSizeEnc['x'] = Utils::BigEndian2Int(substr($FLVvideoHeader, 4, 3)) >> 7;
                                 $PictureSizeEnc['y'] = Utils::BigEndian2Int(substr($FLVvideoHeader, 6, 3)) >> 7;
                                 $info['video']['resolution_x'] = $PictureSizeEnc['x'] & 0xffff;
                                 $info['video']['resolution_y'] = $PictureSizeEnc['y'] & 0xffff;
                                 break;
                             case 2:
                                 $info['video']['resolution_x'] = 352;
                                 $info['video']['resolution_y'] = 288;
                                 break;
                             case 3:
                                 $info['video']['resolution_x'] = 176;
                                 $info['video']['resolution_y'] = 144;
                                 break;
                             case 4:
                                 $info['video']['resolution_x'] = 128;
                                 $info['video']['resolution_y'] = 96;
                                 break;
                             case 5:
                                 $info['video']['resolution_x'] = 320;
                                 $info['video']['resolution_y'] = 240;
                                 break;
                             case 6:
                                 $info['video']['resolution_x'] = 160;
                                 $info['video']['resolution_y'] = 120;
                                 break;
                             default:
                                 $info['video']['resolution_x'] = 0;
                                 $info['video']['resolution_y'] = 0;
                                 break;
                         }
                     } elseif ($info['flv']['video']['videoCodec'] === self::VIDEO_VP6FLV_ALPHA) {
                         /* contributed by schouwerwouØgmail*com */
                         if (!isset($info['video']['resolution_x'])) {
                             // only when meta data isn't set
                             $PictureSizeEnc['x'] = Utils::BigEndian2Int(substr($FLVvideoHeader, 6, 2));
                             $PictureSizeEnc['y'] = Utils::BigEndian2Int(substr($FLVvideoHeader, 7, 2));
                             $info['video']['resolution_x'] = ($PictureSizeEnc['x'] & 0xff) << 3;
                             $info['video']['resolution_y'] = ($PictureSizeEnc['y'] & 0xff) << 3;
                         }
                         /* end schouwerwouØgmail*com */
                     }
                     if (!empty($info['video']['resolution_x']) && !empty($info['video']['resolution_y'])) {
                         $info['video']['pixel_aspect_ratio'] = $info['video']['resolution_x'] / $info['video']['resolution_y'];
                     }
                 }
                 break;
                 // Meta tag
             // Meta tag
             case self::TAG_META:
                 if (!$found_meta) {
                     $found_meta = true;
                     $this->fseek(-1, SEEK_CUR);
                     $datachunk = $this->fread($DataLength);
                     $AMFstream = new AMFStream($datachunk);
                     $reader = new AMFReader($AMFstream);
                     $eventName = $reader->readData();
                     $info['flv']['meta'][$eventName] = $reader->readData();
                     unset($reader);
                     $copykeys = array('framerate' => 'frame_rate', 'width' => 'resolution_x', 'height' => 'resolution_y', 'audiodatarate' => 'bitrate', 'videodatarate' => 'bitrate');
                     foreach ($copykeys as $sourcekey => $destkey) {
                         if (isset($info['flv']['meta']['onMetaData'][$sourcekey])) {
                             switch ($sourcekey) {
                                 case 'width':
                                 case 'height':
                                     $info['video'][$destkey] = intval(round($info['flv']['meta']['onMetaData'][$sourcekey]));
                                     break;
                                 case 'audiodatarate':
                                     $info['audio'][$destkey] = Utils::CastAsInt(round($info['flv']['meta']['onMetaData'][$sourcekey] * 1000));
                                     break;
                                 case 'videodatarate':
                                 case 'frame_rate':
                                 default:
                                     $info['video'][$destkey] = $info['flv']['meta']['onMetaData'][$sourcekey];
                                     break;
                             }
                         }
                     }
                     if (!empty($info['flv']['meta']['onMetaData']['duration'])) {
                         $found_valid_meta_playtime = true;
                     }
                 }
                 break;
             default:
                 // noop
                 break;
         }
         $this->fseek($NextOffset);
     }
     $info['playtime_seconds'] = $Duration / 1000;
     if ($info['playtime_seconds'] > 0) {
         $info['bitrate'] = ($info['avdataend'] - $info['avdataoffset']) * 8 / $info['playtime_seconds'];
     }
     if ($info['flv']['header']['hasAudio']) {
         $info['audio']['codec'] = self::audioFormatLookup($info['flv']['audio']['audioFormat']);
         $info['audio']['sample_rate'] = self::audioRateLookup($info['flv']['audio']['audioRate']);
         $info['audio']['bits_per_sample'] = self::audioBitDepthLookup($info['flv']['audio']['audioSampleSize']);
         $info['audio']['channels'] = $info['flv']['audio']['audioType'] + 1;
         // 0=mono,1=stereo
         $info['audio']['lossless'] = $info['flv']['audio']['audioFormat'] ? false : true;
         // 0=uncompressed
         $info['audio']['dataformat'] = 'flv';
     }
     if (!empty($info['flv']['header']['hasVideo'])) {
         $info['video']['codec'] = self::videoCodecLookup($info['flv']['video']['videoCodec']);
         $info['video']['dataformat'] = 'flv';
         $info['video']['lossless'] = false;
     }
     // Set information from meta
     if (!empty($info['flv']['meta']['onMetaData']['duration'])) {
         $info['playtime_seconds'] = $info['flv']['meta']['onMetaData']['duration'];
         $info['bitrate'] = ($info['avdataend'] - $info['avdataoffset']) * 8 / $info['playtime_seconds'];
     }
     if (isset($info['flv']['meta']['onMetaData']['audiocodecid'])) {
         $info['audio']['codec'] = self::audioFormatLookup($info['flv']['meta']['onMetaData']['audiocodecid']);
     }
     if (isset($info['flv']['meta']['onMetaData']['videocodecid'])) {
         $info['video']['codec'] = self::videoCodecLookup($info['flv']['meta']['onMetaData']['videocodecid']);
     }
     return true;
 }
Пример #22
0
 public function Analyze()
 {
     $info =& $this->getid3->info;
     // Shortcuts
     $thisfile_audio =& $info['audio'];
     $thisfile_video =& $info['video'];
     $info['asf'] = array();
     $thisfile_asf =& $info['asf'];
     $thisfile_asf['comments'] = array();
     $thisfile_asf_comments =& $thisfile_asf['comments'];
     $thisfile_asf['header_object'] = array();
     $thisfile_asf_headerobject =& $thisfile_asf['header_object'];
     // ASF structure:
     // * Header Object [required]
     //   * File Properties Object [required]   (global file attributes)
     //   * Stream Properties Object [required] (defines media stream & characteristics)
     //   * Header Extension Object [required]  (additional functionality)
     //   * Content Description Object          (bibliographic information)
     //   * Script Command Object               (commands for during playback)
     //   * Marker Object                       (named jumped points within the file)
     // * Data Object [required]
     //   * Data Packets
     // * Index Object
     // Header Object: (mandatory, one only)
     // Field Name                   Field Type   Size (bits)
     // Object ID                    GUID         128             // GUID for header object - GETID3_ASF_Header_Object
     // Object Size                  QWORD        64              // size of header object, including 30 bytes of Header Object header
     // Number of Header Objects     DWORD        32              // number of objects in header object
     // Reserved1                    BYTE         8               // hardcoded: 0x01
     // Reserved2                    BYTE         8               // hardcoded: 0x02
     $info['fileformat'] = 'asf';
     $this->fseek($info['avdataoffset']);
     $HeaderObjectData = $this->fread(30);
     $thisfile_asf_headerobject['objectid'] = substr($HeaderObjectData, 0, 16);
     $thisfile_asf_headerobject['objectid_guid'] = $this->BytestringToGUID($thisfile_asf_headerobject['objectid']);
     if ($thisfile_asf_headerobject['objectid'] != GETID3_ASF_Header_Object) {
         unset($info['fileformat'], $info['asf']);
         return $this->error('ASF header GUID {' . $this->BytestringToGUID($thisfile_asf_headerobject['objectid']) . '} does not match expected "GETID3_ASF_Header_Object" GUID {' . $this->BytestringToGUID(GETID3_ASF_Header_Object) . '}');
     }
     $thisfile_asf_headerobject['objectsize'] = Utils::LittleEndian2Int(substr($HeaderObjectData, 16, 8));
     $thisfile_asf_headerobject['headerobjects'] = Utils::LittleEndian2Int(substr($HeaderObjectData, 24, 4));
     $thisfile_asf_headerobject['reserved1'] = Utils::LittleEndian2Int(substr($HeaderObjectData, 28, 1));
     $thisfile_asf_headerobject['reserved2'] = Utils::LittleEndian2Int(substr($HeaderObjectData, 29, 1));
     $NextObjectOffset = $this->ftell();
     $ASFHeaderData = $this->fread($thisfile_asf_headerobject['objectsize'] - 30);
     $offset = 0;
     for ($HeaderObjectsCounter = 0; $HeaderObjectsCounter < $thisfile_asf_headerobject['headerobjects']; $HeaderObjectsCounter++) {
         $NextObjectGUID = substr($ASFHeaderData, $offset, 16);
         $offset += 16;
         $NextObjectGUIDtext = $this->BytestringToGUID($NextObjectGUID);
         $NextObjectSize = Utils::LittleEndian2Int(substr($ASFHeaderData, $offset, 8));
         $offset += 8;
         switch ($NextObjectGUID) {
             case GETID3_ASF_File_Properties_Object:
                 // File Properties Object: (mandatory, one only)
                 // Field Name                   Field Type   Size (bits)
                 // Object ID                    GUID         128             // GUID for file properties object - GETID3_ASF_File_Properties_Object
                 // Object Size                  QWORD        64              // size of file properties object, including 104 bytes of File Properties Object header
                 // File ID                      GUID         128             // unique ID - identical to File ID in Data Object
                 // File Size                    QWORD        64              // entire file in bytes. Invalid if Broadcast Flag == 1
                 // Creation Date                QWORD        64              // date & time of file creation. Maybe invalid if Broadcast Flag == 1
                 // Data Packets Count           QWORD        64              // number of data packets in Data Object. Invalid if Broadcast Flag == 1
                 // Play Duration                QWORD        64              // playtime, in 100-nanosecond units. Invalid if Broadcast Flag == 1
                 // Send Duration                QWORD        64              // time needed to send file, in 100-nanosecond units. Players can ignore this value. Invalid if Broadcast Flag == 1
                 // Preroll                      QWORD        64              // time to buffer data before starting to play file, in 1-millisecond units. If <> 0, PlayDuration and PresentationTime have been offset by this amount
                 // Flags                        DWORD        32              //
                 // * Broadcast Flag             bits         1  (0x01)       // file is currently being written, some header values are invalid
                 // * Seekable Flag              bits         1  (0x02)       // is file seekable
                 // * Reserved                   bits         30 (0xFFFFFFFC) // reserved - set to zero
                 // Minimum Data Packet Size     DWORD        32              // in bytes. should be same as Maximum Data Packet Size. Invalid if Broadcast Flag == 1
                 // Maximum Data Packet Size     DWORD        32              // in bytes. should be same as Minimum Data Packet Size. Invalid if Broadcast Flag == 1
                 // Maximum Bitrate              DWORD        32              // maximum instantaneous bitrate in bits per second for entire file, including all data streams and ASF overhead
                 // shortcut
                 $thisfile_asf['file_properties_object'] = array();
                 $thisfile_asf_filepropertiesobject =& $thisfile_asf['file_properties_object'];
                 $thisfile_asf_filepropertiesobject['offset'] = $NextObjectOffset + $offset;
                 $thisfile_asf_filepropertiesobject['objectid'] = $NextObjectGUID;
                 $thisfile_asf_filepropertiesobject['objectid_guid'] = $NextObjectGUIDtext;
                 $thisfile_asf_filepropertiesobject['objectsize'] = $NextObjectSize;
                 $thisfile_asf_filepropertiesobject['fileid'] = substr($ASFHeaderData, $offset, 16);
                 $offset += 16;
                 $thisfile_asf_filepropertiesobject['fileid_guid'] = $this->BytestringToGUID($thisfile_asf_filepropertiesobject['fileid']);
                 $thisfile_asf_filepropertiesobject['filesize'] = Utils::LittleEndian2Int(substr($ASFHeaderData, $offset, 8));
                 $offset += 8;
                 $thisfile_asf_filepropertiesobject['creation_date'] = Utils::LittleEndian2Int(substr($ASFHeaderData, $offset, 8));
                 $thisfile_asf_filepropertiesobject['creation_date_unix'] = $this->FILETIMEtoUNIXtime($thisfile_asf_filepropertiesobject['creation_date']);
                 $offset += 8;
                 $thisfile_asf_filepropertiesobject['data_packets'] = Utils::LittleEndian2Int(substr($ASFHeaderData, $offset, 8));
                 $offset += 8;
                 $thisfile_asf_filepropertiesobject['play_duration'] = Utils::LittleEndian2Int(substr($ASFHeaderData, $offset, 8));
                 $offset += 8;
                 $thisfile_asf_filepropertiesobject['send_duration'] = Utils::LittleEndian2Int(substr($ASFHeaderData, $offset, 8));
                 $offset += 8;
                 $thisfile_asf_filepropertiesobject['preroll'] = Utils::LittleEndian2Int(substr($ASFHeaderData, $offset, 8));
                 $offset += 8;
                 $thisfile_asf_filepropertiesobject['flags_raw'] = Utils::LittleEndian2Int(substr($ASFHeaderData, $offset, 4));
                 $offset += 4;
                 $thisfile_asf_filepropertiesobject['flags']['broadcast'] = (bool) ($thisfile_asf_filepropertiesobject['flags_raw'] & 0x1);
                 $thisfile_asf_filepropertiesobject['flags']['seekable'] = (bool) ($thisfile_asf_filepropertiesobject['flags_raw'] & 0x2);
                 $thisfile_asf_filepropertiesobject['min_packet_size'] = Utils::LittleEndian2Int(substr($ASFHeaderData, $offset, 4));
                 $offset += 4;
                 $thisfile_asf_filepropertiesobject['max_packet_size'] = Utils::LittleEndian2Int(substr($ASFHeaderData, $offset, 4));
                 $offset += 4;
                 $thisfile_asf_filepropertiesobject['max_bitrate'] = Utils::LittleEndian2Int(substr($ASFHeaderData, $offset, 4));
                 $offset += 4;
                 if ($thisfile_asf_filepropertiesobject['flags']['broadcast']) {
                     // broadcast flag is set, some values invalid
                     unset($thisfile_asf_filepropertiesobject['filesize']);
                     unset($thisfile_asf_filepropertiesobject['data_packets']);
                     unset($thisfile_asf_filepropertiesobject['play_duration']);
                     unset($thisfile_asf_filepropertiesobject['send_duration']);
                     unset($thisfile_asf_filepropertiesobject['min_packet_size']);
                     unset($thisfile_asf_filepropertiesobject['max_packet_size']);
                 } else {
                     // broadcast flag NOT set, perform calculations
                     $info['playtime_seconds'] = $thisfile_asf_filepropertiesobject['play_duration'] / 10000000 - $thisfile_asf_filepropertiesobject['preroll'] / 1000;
                     //$info['bitrate'] = $thisfile_asf_filepropertiesobject['max_bitrate'];
                     $info['bitrate'] = (isset($thisfile_asf_filepropertiesobject['filesize']) ? $thisfile_asf_filepropertiesobject['filesize'] : $info['filesize']) * 8 / $info['playtime_seconds'];
                 }
                 break;
             case GETID3_ASF_Stream_Properties_Object:
                 // Stream Properties Object: (mandatory, one per media stream)
                 // Field Name                   Field Type   Size (bits)
                 // Object ID                    GUID         128             // GUID for stream properties object - GETID3_ASF_Stream_Properties_Object
                 // Object Size                  QWORD        64              // size of stream properties object, including 78 bytes of Stream Properties Object header
                 // Stream Type                  GUID         128             // GETID3_ASF_Audio_Media, GETID3_ASF_Video_Media or GETID3_ASF_Command_Media
                 // Error Correction Type        GUID         128             // GETID3_ASF_Audio_Spread for audio-only streams, GETID3_ASF_No_Error_Correction for other stream types
                 // Time Offset                  QWORD        64              // 100-nanosecond units. typically zero. added to all timestamps of samples in the stream
                 // Type-Specific Data Length    DWORD        32              // number of bytes for Type-Specific Data field
                 // Error Correction Data Length DWORD        32              // number of bytes for Error Correction Data field
                 // Flags                        WORD         16              //
                 // * Stream Number              bits         7 (0x007F)      // number of this stream.  1 <= valid <= 127
                 // * Reserved                   bits         8 (0x7F80)      // reserved - set to zero
                 // * Encrypted Content Flag     bits         1 (0x8000)      // stream contents encrypted if set
                 // Reserved                     DWORD        32              // reserved - set to zero
                 // Type-Specific Data           BYTESTREAM   variable        // type-specific format data, depending on value of Stream Type
                 // Error Correction Data        BYTESTREAM   variable        // error-correction-specific format data, depending on value of Error Correct Type
                 // There is one GETID3_ASF_Stream_Properties_Object for each stream (audio, video) but the
                 // stream number isn't known until halfway through decoding the structure, hence it
                 // it is decoded to a temporary variable and then stuck in the appropriate index later
                 $StreamPropertiesObjectData['offset'] = $NextObjectOffset + $offset;
                 $StreamPropertiesObjectData['objectid'] = $NextObjectGUID;
                 $StreamPropertiesObjectData['objectid_guid'] = $NextObjectGUIDtext;
                 $StreamPropertiesObjectData['objectsize'] = $NextObjectSize;
                 $StreamPropertiesObjectData['stream_type'] = substr($ASFHeaderData, $offset, 16);
                 $offset += 16;
                 $StreamPropertiesObjectData['stream_type_guid'] = $this->BytestringToGUID($StreamPropertiesObjectData['stream_type']);
                 $StreamPropertiesObjectData['error_correct_type'] = substr($ASFHeaderData, $offset, 16);
                 $offset += 16;
                 $StreamPropertiesObjectData['error_correct_guid'] = $this->BytestringToGUID($StreamPropertiesObjectData['error_correct_type']);
                 $StreamPropertiesObjectData['time_offset'] = Utils::LittleEndian2Int(substr($ASFHeaderData, $offset, 8));
                 $offset += 8;
                 $StreamPropertiesObjectData['type_data_length'] = Utils::LittleEndian2Int(substr($ASFHeaderData, $offset, 4));
                 $offset += 4;
                 $StreamPropertiesObjectData['error_data_length'] = Utils::LittleEndian2Int(substr($ASFHeaderData, $offset, 4));
                 $offset += 4;
                 $StreamPropertiesObjectData['flags_raw'] = Utils::LittleEndian2Int(substr($ASFHeaderData, $offset, 2));
                 $offset += 2;
                 $StreamPropertiesObjectStreamNumber = $StreamPropertiesObjectData['flags_raw'] & 0x7f;
                 $StreamPropertiesObjectData['flags']['encrypted'] = (bool) ($StreamPropertiesObjectData['flags_raw'] & 0x8000);
                 $offset += 4;
                 // reserved - DWORD
                 $StreamPropertiesObjectData['type_specific_data'] = substr($ASFHeaderData, $offset, $StreamPropertiesObjectData['type_data_length']);
                 $offset += $StreamPropertiesObjectData['type_data_length'];
                 $StreamPropertiesObjectData['error_correct_data'] = substr($ASFHeaderData, $offset, $StreamPropertiesObjectData['error_data_length']);
                 $offset += $StreamPropertiesObjectData['error_data_length'];
                 switch ($StreamPropertiesObjectData['stream_type']) {
                     case GETID3_ASF_Audio_Media:
                         $thisfile_audio['dataformat'] = !empty($thisfile_audio['dataformat']) ? $thisfile_audio['dataformat'] : 'asf';
                         $thisfile_audio['bitrate_mode'] = !empty($thisfile_audio['bitrate_mode']) ? $thisfile_audio['bitrate_mode'] : 'cbr';
                         $audiodata = Riff::parseWAVEFORMATex(substr($StreamPropertiesObjectData['type_specific_data'], 0, 16));
                         unset($audiodata['raw']);
                         $thisfile_audio = Utils::array_merge_noclobber($audiodata, $thisfile_audio);
                         break;
                     case GETID3_ASF_Video_Media:
                         $thisfile_video['dataformat'] = !empty($thisfile_video['dataformat']) ? $thisfile_video['dataformat'] : 'asf';
                         $thisfile_video['bitrate_mode'] = !empty($thisfile_video['bitrate_mode']) ? $thisfile_video['bitrate_mode'] : 'cbr';
                         break;
                     case GETID3_ASF_Command_Media:
                     default:
                         // do nothing
                         break;
                 }
                 $thisfile_asf['stream_properties_object'][$StreamPropertiesObjectStreamNumber] = $StreamPropertiesObjectData;
                 unset($StreamPropertiesObjectData);
                 // clear for next stream, if any
                 break;
             case GETID3_ASF_Header_Extension_Object:
                 // Header Extension Object: (mandatory, one only)
                 // Field Name                   Field Type   Size (bits)
                 // Object ID                    GUID         128             // GUID for Header Extension object - GETID3_ASF_Header_Extension_Object
                 // Object Size                  QWORD        64              // size of Header Extension object, including 46 bytes of Header Extension Object header
                 // Reserved Field 1             GUID         128             // hardcoded: GETID3_ASF_Reserved_1
                 // Reserved Field 2             WORD         16              // hardcoded: 0x00000006
                 // Header Extension Data Size   DWORD        32              // in bytes. valid: 0, or > 24. equals object size minus 46
                 // Header Extension Data        BYTESTREAM   variable        // array of zero or more extended header objects
                 // shortcut
                 $thisfile_asf['header_extension_object'] = array();
                 $thisfile_asf_headerextensionobject =& $thisfile_asf['header_extension_object'];
                 $thisfile_asf_headerextensionobject['offset'] = $NextObjectOffset + $offset;
                 $thisfile_asf_headerextensionobject['objectid'] = $NextObjectGUID;
                 $thisfile_asf_headerextensionobject['objectid_guid'] = $NextObjectGUIDtext;
                 $thisfile_asf_headerextensionobject['objectsize'] = $NextObjectSize;
                 $thisfile_asf_headerextensionobject['reserved_1'] = substr($ASFHeaderData, $offset, 16);
                 $offset += 16;
                 $thisfile_asf_headerextensionobject['reserved_1_guid'] = $this->BytestringToGUID($thisfile_asf_headerextensionobject['reserved_1']);
                 if ($thisfile_asf_headerextensionobject['reserved_1'] != GETID3_ASF_Reserved_1) {
                     $info['warning'][] = 'header_extension_object.reserved_1 GUID (' . $this->BytestringToGUID($thisfile_asf_headerextensionobject['reserved_1']) . ') does not match expected "GETID3_ASF_Reserved_1" GUID (' . $this->BytestringToGUID(GETID3_ASF_Reserved_1) . ')';
                     //return false;
                     break;
                 }
                 $thisfile_asf_headerextensionobject['reserved_2'] = Utils::LittleEndian2Int(substr($ASFHeaderData, $offset, 2));
                 $offset += 2;
                 if ($thisfile_asf_headerextensionobject['reserved_2'] != 6) {
                     $info['warning'][] = 'header_extension_object.reserved_2 (' . Utils::PrintHexBytes($thisfile_asf_headerextensionobject['reserved_2']) . ') does not match expected value of "6"';
                     //return false;
                     break;
                 }
                 $thisfile_asf_headerextensionobject['extension_data_size'] = Utils::LittleEndian2Int(substr($ASFHeaderData, $offset, 4));
                 $offset += 4;
                 $thisfile_asf_headerextensionobject['extension_data'] = substr($ASFHeaderData, $offset, $thisfile_asf_headerextensionobject['extension_data_size']);
                 $unhandled_sections = 0;
                 $thisfile_asf_headerextensionobject['extension_data_parsed'] = $this->HeaderExtensionObjectDataParse($thisfile_asf_headerextensionobject['extension_data'], $unhandled_sections);
                 if ($unhandled_sections === 0) {
                     unset($thisfile_asf_headerextensionobject['extension_data']);
                 }
                 $offset += $thisfile_asf_headerextensionobject['extension_data_size'];
                 break;
             case GETID3_ASF_Codec_List_Object:
                 // Codec List Object: (optional, one only)
                 // Field Name                   Field Type   Size (bits)
                 // Object ID                    GUID         128             // GUID for Codec List object - GETID3_ASF_Codec_List_Object
                 // Object Size                  QWORD        64              // size of Codec List object, including 44 bytes of Codec List Object header
                 // Reserved                     GUID         128             // hardcoded: 86D15241-311D-11D0-A3A4-00A0C90348F6
                 // Codec Entries Count          DWORD        32              // number of entries in Codec Entries array
                 // Codec Entries                array of:    variable        //
                 // * Type                       WORD         16              // 0x0001 = Video Codec, 0x0002 = Audio Codec, 0xFFFF = Unknown Codec
                 // * Codec Name Length          WORD         16              // number of Unicode characters stored in the Codec Name field
                 // * Codec Name                 WCHAR        variable        // array of Unicode characters - name of codec used to create the content
                 // * Codec Description Length   WORD         16              // number of Unicode characters stored in the Codec Description field
                 // * Codec Description          WCHAR        variable        // array of Unicode characters - description of format used to create the content
                 // * Codec Information Length   WORD         16              // number of Unicode characters stored in the Codec Information field
                 // * Codec Information          BYTESTREAM   variable        // opaque array of information bytes about the codec used to create the content
                 // shortcut
                 $thisfile_asf['codec_list_object'] = array();
                 $thisfile_asf_codeclistobject =& $thisfile_asf['codec_list_object'];
                 $thisfile_asf_codeclistobject['offset'] = $NextObjectOffset + $offset;
                 $thisfile_asf_codeclistobject['objectid'] = $NextObjectGUID;
                 $thisfile_asf_codeclistobject['objectid_guid'] = $NextObjectGUIDtext;
                 $thisfile_asf_codeclistobject['objectsize'] = $NextObjectSize;
                 $thisfile_asf_codeclistobject['reserved'] = substr($ASFHeaderData, $offset, 16);
                 $offset += 16;
                 $thisfile_asf_codeclistobject['reserved_guid'] = $this->BytestringToGUID($thisfile_asf_codeclistobject['reserved']);
                 if ($thisfile_asf_codeclistobject['reserved'] != $this->GUIDtoBytestring('86D15241-311D-11D0-A3A4-00A0C90348F6')) {
                     $info['warning'][] = 'codec_list_object.reserved GUID {' . $this->BytestringToGUID($thisfile_asf_codeclistobject['reserved']) . '} does not match expected "GETID3_ASF_Reserved_1" GUID {86D15241-311D-11D0-A3A4-00A0C90348F6}';
                     //return false;
                     break;
                 }
                 $thisfile_asf_codeclistobject['codec_entries_count'] = Utils::LittleEndian2Int(substr($ASFHeaderData, $offset, 4));
                 $offset += 4;
                 for ($CodecEntryCounter = 0; $CodecEntryCounter < $thisfile_asf_codeclistobject['codec_entries_count']; $CodecEntryCounter++) {
                     // shortcut
                     $thisfile_asf_codeclistobject['codec_entries'][$CodecEntryCounter] = array();
                     $thisfile_asf_codeclistobject_codecentries_current =& $thisfile_asf_codeclistobject['codec_entries'][$CodecEntryCounter];
                     $thisfile_asf_codeclistobject_codecentries_current['type_raw'] = Utils::LittleEndian2Int(substr($ASFHeaderData, $offset, 2));
                     $offset += 2;
                     $thisfile_asf_codeclistobject_codecentries_current['type'] = self::codecListObjectTypeLookup($thisfile_asf_codeclistobject_codecentries_current['type_raw']);
                     $CodecNameLength = Utils::LittleEndian2Int(substr($ASFHeaderData, $offset, 2)) * 2;
                     // 2 bytes per character
                     $offset += 2;
                     $thisfile_asf_codeclistobject_codecentries_current['name'] = substr($ASFHeaderData, $offset, $CodecNameLength);
                     $offset += $CodecNameLength;
                     $CodecDescriptionLength = Utils::LittleEndian2Int(substr($ASFHeaderData, $offset, 2)) * 2;
                     // 2 bytes per character
                     $offset += 2;
                     $thisfile_asf_codeclistobject_codecentries_current['description'] = substr($ASFHeaderData, $offset, $CodecDescriptionLength);
                     $offset += $CodecDescriptionLength;
                     $CodecInformationLength = Utils::LittleEndian2Int(substr($ASFHeaderData, $offset, 2));
                     $offset += 2;
                     $thisfile_asf_codeclistobject_codecentries_current['information'] = substr($ASFHeaderData, $offset, $CodecInformationLength);
                     $offset += $CodecInformationLength;
                     if ($thisfile_asf_codeclistobject_codecentries_current['type_raw'] == 2) {
                         // audio codec
                         if (strpos($thisfile_asf_codeclistobject_codecentries_current['description'], ',') === false) {
                             $info['warning'][] = '[asf][codec_list_object][codec_entries][' . $CodecEntryCounter . '][description] expected to contain comma-seperated list of parameters: "' . $thisfile_asf_codeclistobject_codecentries_current['description'] . '"';
                         } else {
                             list($AudioCodecBitrate, $AudioCodecFrequency, $AudioCodecChannels) = explode(',', $this->TrimConvert($thisfile_asf_codeclistobject_codecentries_current['description']));
                             $thisfile_audio['codec'] = $this->TrimConvert($thisfile_asf_codeclistobject_codecentries_current['name']);
                             if (!isset($thisfile_audio['bitrate']) && strstr($AudioCodecBitrate, 'kbps')) {
                                 $thisfile_audio['bitrate'] = (int) (trim(str_replace('kbps', '', $AudioCodecBitrate)) * 1000);
                             }
                             //if (!isset($thisfile_video['bitrate']) && isset($thisfile_audio['bitrate']) && isset($thisfile_asf['file_properties_object']['max_bitrate']) && ($thisfile_asf_codeclistobject['codec_entries_count'] > 1)) {
                             if (empty($thisfile_video['bitrate']) && !empty($thisfile_audio['bitrate']) && !empty($info['bitrate'])) {
                                 //$thisfile_video['bitrate'] = $thisfile_asf['file_properties_object']['max_bitrate'] - $thisfile_audio['bitrate'];
                                 $thisfile_video['bitrate'] = $info['bitrate'] - $thisfile_audio['bitrate'];
                             }
                             $AudioCodecFrequency = (int) trim(str_replace('kHz', '', $AudioCodecFrequency));
                             switch ($AudioCodecFrequency) {
                                 case 8:
                                 case 8000:
                                     $thisfile_audio['sample_rate'] = 8000;
                                     break;
                                 case 11:
                                 case 11025:
                                     $thisfile_audio['sample_rate'] = 11025;
                                     break;
                                 case 12:
                                 case 12000:
                                     $thisfile_audio['sample_rate'] = 12000;
                                     break;
                                 case 16:
                                 case 16000:
                                     $thisfile_audio['sample_rate'] = 16000;
                                     break;
                                 case 22:
                                 case 22050:
                                     $thisfile_audio['sample_rate'] = 22050;
                                     break;
                                 case 24:
                                 case 24000:
                                     $thisfile_audio['sample_rate'] = 24000;
                                     break;
                                 case 32:
                                 case 32000:
                                     $thisfile_audio['sample_rate'] = 32000;
                                     break;
                                 case 44:
                                 case 441000:
                                     $thisfile_audio['sample_rate'] = 44100;
                                     break;
                                 case 48:
                                 case 48000:
                                     $thisfile_audio['sample_rate'] = 48000;
                                     break;
                                 default:
                                     $info['warning'][] = 'unknown frequency: "' . $AudioCodecFrequency . '" (' . $this->TrimConvert($thisfile_asf_codeclistobject_codecentries_current['description']) . ')';
                                     break;
                             }
                             if (!isset($thisfile_audio['channels'])) {
                                 if (strstr($AudioCodecChannels, 'stereo')) {
                                     $thisfile_audio['channels'] = 2;
                                 } elseif (strstr($AudioCodecChannels, 'mono')) {
                                     $thisfile_audio['channels'] = 1;
                                 }
                             }
                         }
                     }
                 }
                 break;
             case GETID3_ASF_Script_Command_Object:
                 // Script Command Object: (optional, one only)
                 // Field Name                   Field Type   Size (bits)
                 // Object ID                    GUID         128             // GUID for Script Command object - GETID3_ASF_Script_Command_Object
                 // Object Size                  QWORD        64              // size of Script Command object, including 44 bytes of Script Command Object header
                 // Reserved                     GUID         128             // hardcoded: 4B1ACBE3-100B-11D0-A39B-00A0C90348F6
                 // Commands Count               WORD         16              // number of Commands structures in the Script Commands Objects
                 // Command Types Count          WORD         16              // number of Command Types structures in the Script Commands Objects
                 // Command Types                array of:    variable        //
                 // * Command Type Name Length   WORD         16              // number of Unicode characters for Command Type Name
                 // * Command Type Name          WCHAR        variable        // array of Unicode characters - name of a type of command
                 // Commands                     array of:    variable        //
                 // * Presentation Time          DWORD        32              // presentation time of that command, in milliseconds
                 // * Type Index                 WORD         16              // type of this command, as a zero-based index into the array of Command Types of this object
                 // * Command Name Length        WORD         16              // number of Unicode characters for Command Name
                 // * Command Name               WCHAR        variable        // array of Unicode characters - name of this command
                 // shortcut
                 $thisfile_asf['script_command_object'] = array();
                 $thisfile_asf_scriptcommandobject =& $thisfile_asf['script_command_object'];
                 $thisfile_asf_scriptcommandobject['offset'] = $NextObjectOffset + $offset;
                 $thisfile_asf_scriptcommandobject['objectid'] = $NextObjectGUID;
                 $thisfile_asf_scriptcommandobject['objectid_guid'] = $NextObjectGUIDtext;
                 $thisfile_asf_scriptcommandobject['objectsize'] = $NextObjectSize;
                 $thisfile_asf_scriptcommandobject['reserved'] = substr($ASFHeaderData, $offset, 16);
                 $offset += 16;
                 $thisfile_asf_scriptcommandobject['reserved_guid'] = $this->BytestringToGUID($thisfile_asf_scriptcommandobject['reserved']);
                 if ($thisfile_asf_scriptcommandobject['reserved'] != $this->GUIDtoBytestring('4B1ACBE3-100B-11D0-A39B-00A0C90348F6')) {
                     $info['warning'][] = 'script_command_object.reserved GUID {' . $this->BytestringToGUID($thisfile_asf_scriptcommandobject['reserved']) . '} does not match expected "GETID3_ASF_Reserved_1" GUID {4B1ACBE3-100B-11D0-A39B-00A0C90348F6}';
                     //return false;
                     break;
                 }
                 $thisfile_asf_scriptcommandobject['commands_count'] = Utils::LittleEndian2Int(substr($ASFHeaderData, $offset, 2));
                 $offset += 2;
                 $thisfile_asf_scriptcommandobject['command_types_count'] = Utils::LittleEndian2Int(substr($ASFHeaderData, $offset, 2));
                 $offset += 2;
                 for ($CommandTypesCounter = 0; $CommandTypesCounter < $thisfile_asf_scriptcommandobject['command_types_count']; $CommandTypesCounter++) {
                     $CommandTypeNameLength = Utils::LittleEndian2Int(substr($ASFHeaderData, $offset, 2)) * 2;
                     // 2 bytes per character
                     $offset += 2;
                     $thisfile_asf_scriptcommandobject['command_types'][$CommandTypesCounter]['name'] = substr($ASFHeaderData, $offset, $CommandTypeNameLength);
                     $offset += $CommandTypeNameLength;
                 }
                 for ($CommandsCounter = 0; $CommandsCounter < $thisfile_asf_scriptcommandobject['commands_count']; $CommandsCounter++) {
                     $thisfile_asf_scriptcommandobject['commands'][$CommandsCounter]['presentation_time'] = Utils::LittleEndian2Int(substr($ASFHeaderData, $offset, 4));
                     $offset += 4;
                     $thisfile_asf_scriptcommandobject['commands'][$CommandsCounter]['type_index'] = Utils::LittleEndian2Int(substr($ASFHeaderData, $offset, 2));
                     $offset += 2;
                     $CommandTypeNameLength = Utils::LittleEndian2Int(substr($ASFHeaderData, $offset, 2)) * 2;
                     // 2 bytes per character
                     $offset += 2;
                     $thisfile_asf_scriptcommandobject['commands'][$CommandsCounter]['name'] = substr($ASFHeaderData, $offset, $CommandTypeNameLength);
                     $offset += $CommandTypeNameLength;
                 }
                 break;
             case GETID3_ASF_Marker_Object:
                 // Marker Object: (optional, one only)
                 // Field Name                   Field Type   Size (bits)
                 // Object ID                    GUID         128             // GUID for Marker object - GETID3_ASF_Marker_Object
                 // Object Size                  QWORD        64              // size of Marker object, including 48 bytes of Marker Object header
                 // Reserved                     GUID         128             // hardcoded: 4CFEDB20-75F6-11CF-9C0F-00A0C90349CB
                 // Markers Count                DWORD        32              // number of Marker structures in Marker Object
                 // Reserved                     WORD         16              // hardcoded: 0x0000
                 // Name Length                  WORD         16              // number of bytes in the Name field
                 // Name                         WCHAR        variable        // name of the Marker Object
                 // Markers                      array of:    variable        //
                 // * Offset                     QWORD        64              // byte offset into Data Object
                 // * Presentation Time          QWORD        64              // in 100-nanosecond units
                 // * Entry Length               WORD         16              // length in bytes of (Send Time + Flags + Marker Description Length + Marker Description + Padding)
                 // * Send Time                  DWORD        32              // in milliseconds
                 // * Flags                      DWORD        32              // hardcoded: 0x00000000
                 // * Marker Description Length  DWORD        32              // number of bytes in Marker Description field
                 // * Marker Description         WCHAR        variable        // array of Unicode characters - description of marker entry
                 // * Padding                    BYTESTREAM   variable        // optional padding bytes
                 // shortcut
                 $thisfile_asf['marker_object'] = array();
                 $thisfile_asf_markerobject =& $thisfile_asf['marker_object'];
                 $thisfile_asf_markerobject['offset'] = $NextObjectOffset + $offset;
                 $thisfile_asf_markerobject['objectid'] = $NextObjectGUID;
                 $thisfile_asf_markerobject['objectid_guid'] = $NextObjectGUIDtext;
                 $thisfile_asf_markerobject['objectsize'] = $NextObjectSize;
                 $thisfile_asf_markerobject['reserved'] = substr($ASFHeaderData, $offset, 16);
                 $offset += 16;
                 $thisfile_asf_markerobject['reserved_guid'] = $this->BytestringToGUID($thisfile_asf_markerobject['reserved']);
                 if ($thisfile_asf_markerobject['reserved'] != $this->GUIDtoBytestring('4CFEDB20-75F6-11CF-9C0F-00A0C90349CB')) {
                     $info['warning'][] = 'marker_object.reserved GUID {' . $this->BytestringToGUID($thisfile_asf_markerobject['reserved_1']) . '} does not match expected "GETID3_ASF_Reserved_1" GUID {4CFEDB20-75F6-11CF-9C0F-00A0C90349CB}';
                     break;
                 }
                 $thisfile_asf_markerobject['markers_count'] = Utils::LittleEndian2Int(substr($ASFHeaderData, $offset, 4));
                 $offset += 4;
                 $thisfile_asf_markerobject['reserved_2'] = Utils::LittleEndian2Int(substr($ASFHeaderData, $offset, 2));
                 $offset += 2;
                 if ($thisfile_asf_markerobject['reserved_2'] != 0) {
                     $info['warning'][] = 'marker_object.reserved_2 (' . Utils::PrintHexBytes($thisfile_asf_markerobject['reserved_2']) . ') does not match expected value of "0"';
                     break;
                 }
                 $thisfile_asf_markerobject['name_length'] = Utils::LittleEndian2Int(substr($ASFHeaderData, $offset, 2));
                 $offset += 2;
                 $thisfile_asf_markerobject['name'] = substr($ASFHeaderData, $offset, $thisfile_asf_markerobject['name_length']);
                 $offset += $thisfile_asf_markerobject['name_length'];
                 for ($MarkersCounter = 0; $MarkersCounter < $thisfile_asf_markerobject['markers_count']; $MarkersCounter++) {
                     $thisfile_asf_markerobject['markers'][$MarkersCounter]['offset'] = Utils::LittleEndian2Int(substr($ASFHeaderData, $offset, 8));
                     $offset += 8;
                     $thisfile_asf_markerobject['markers'][$MarkersCounter]['presentation_time'] = Utils::LittleEndian2Int(substr($ASFHeaderData, $offset, 8));
                     $offset += 8;
                     $thisfile_asf_markerobject['markers'][$MarkersCounter]['entry_length'] = Utils::LittleEndian2Int(substr($ASFHeaderData, $offset, 2));
                     $offset += 2;
                     $thisfile_asf_markerobject['markers'][$MarkersCounter]['send_time'] = Utils::LittleEndian2Int(substr($ASFHeaderData, $offset, 4));
                     $offset += 4;
                     $thisfile_asf_markerobject['markers'][$MarkersCounter]['flags'] = Utils::LittleEndian2Int(substr($ASFHeaderData, $offset, 4));
                     $offset += 4;
                     $thisfile_asf_markerobject['markers'][$MarkersCounter]['marker_description_length'] = Utils::LittleEndian2Int(substr($ASFHeaderData, $offset, 4));
                     $offset += 4;
                     $thisfile_asf_markerobject['markers'][$MarkersCounter]['marker_description'] = substr($ASFHeaderData, $offset, $thisfile_asf_markerobject['markers'][$MarkersCounter]['marker_description_length']);
                     $offset += $thisfile_asf_markerobject['markers'][$MarkersCounter]['marker_description_length'];
                     $PaddingLength = $thisfile_asf_markerobject['markers'][$MarkersCounter]['entry_length'] - 4 - 4 - 4 - $thisfile_asf_markerobject['markers'][$MarkersCounter]['marker_description_length'];
                     if ($PaddingLength > 0) {
                         $thisfile_asf_markerobject['markers'][$MarkersCounter]['padding'] = substr($ASFHeaderData, $offset, $PaddingLength);
                         $offset += $PaddingLength;
                     }
                 }
                 break;
             case GETID3_ASF_Bitrate_Mutual_Exclusion_Object:
                 // Bitrate Mutual Exclusion Object: (optional)
                 // Field Name                   Field Type   Size (bits)
                 // Object ID                    GUID         128             // GUID for Bitrate Mutual Exclusion object - GETID3_ASF_Bitrate_Mutual_Exclusion_Object
                 // Object Size                  QWORD        64              // size of Bitrate Mutual Exclusion object, including 42 bytes of Bitrate Mutual Exclusion Object header
                 // Exlusion Type                GUID         128             // nature of mutual exclusion relationship. one of: (GETID3_ASF_Mutex_Bitrate, GETID3_ASF_Mutex_Unknown)
                 // Stream Numbers Count         WORD         16              // number of video streams
                 // Stream Numbers               WORD         variable        // array of mutually exclusive video stream numbers. 1 <= valid <= 127
                 // shortcut
                 $thisfile_asf['bitrate_mutual_exclusion_object'] = array();
                 $thisfile_asf_bitratemutualexclusionobject =& $thisfile_asf['bitrate_mutual_exclusion_object'];
                 $thisfile_asf_bitratemutualexclusionobject['offset'] = $NextObjectOffset + $offset;
                 $thisfile_asf_bitratemutualexclusionobject['objectid'] = $NextObjectGUID;
                 $thisfile_asf_bitratemutualexclusionobject['objectid_guid'] = $NextObjectGUIDtext;
                 $thisfile_asf_bitratemutualexclusionobject['objectsize'] = $NextObjectSize;
                 $thisfile_asf_bitratemutualexclusionobject['reserved'] = substr($ASFHeaderData, $offset, 16);
                 $thisfile_asf_bitratemutualexclusionobject['reserved_guid'] = $this->BytestringToGUID($thisfile_asf_bitratemutualexclusionobject['reserved']);
                 $offset += 16;
                 if ($thisfile_asf_bitratemutualexclusionobject['reserved'] != GETID3_ASF_Mutex_Bitrate && $thisfile_asf_bitratemutualexclusionobject['reserved'] != GETID3_ASF_Mutex_Unknown) {
                     $info['warning'][] = 'bitrate_mutual_exclusion_object.reserved GUID {' . $this->BytestringToGUID($thisfile_asf_bitratemutualexclusionobject['reserved']) . '} does not match expected "GETID3_ASF_Mutex_Bitrate" GUID {' . $this->BytestringToGUID(GETID3_ASF_Mutex_Bitrate) . '} or  "GETID3_ASF_Mutex_Unknown" GUID {' . $this->BytestringToGUID(GETID3_ASF_Mutex_Unknown) . '}';
                     //return false;
                     break;
                 }
                 $thisfile_asf_bitratemutualexclusionobject['stream_numbers_count'] = Utils::LittleEndian2Int(substr($ASFHeaderData, $offset, 2));
                 $offset += 2;
                 for ($StreamNumberCounter = 0; $StreamNumberCounter < $thisfile_asf_bitratemutualexclusionobject['stream_numbers_count']; $StreamNumberCounter++) {
                     $thisfile_asf_bitratemutualexclusionobject['stream_numbers'][$StreamNumberCounter] = Utils::LittleEndian2Int(substr($ASFHeaderData, $offset, 2));
                     $offset += 2;
                 }
                 break;
             case GETID3_ASF_Error_Correction_Object:
                 // Error Correction Object: (optional, one only)
                 // Field Name                   Field Type   Size (bits)
                 // Object ID                    GUID         128             // GUID for Error Correction object - GETID3_ASF_Error_Correction_Object
                 // Object Size                  QWORD        64              // size of Error Correction object, including 44 bytes of Error Correction Object header
                 // Error Correction Type        GUID         128             // type of error correction. one of: (GETID3_ASF_No_Error_Correction, GETID3_ASF_Audio_Spread)
                 // Error Correction Data Length DWORD        32              // number of bytes in Error Correction Data field
                 // Error Correction Data        BYTESTREAM   variable        // structure depends on value of Error Correction Type field
                 // shortcut
                 $thisfile_asf['error_correction_object'] = array();
                 $thisfile_asf_errorcorrectionobject =& $thisfile_asf['error_correction_object'];
                 $thisfile_asf_errorcorrectionobject['offset'] = $NextObjectOffset + $offset;
                 $thisfile_asf_errorcorrectionobject['objectid'] = $NextObjectGUID;
                 $thisfile_asf_errorcorrectionobject['objectid_guid'] = $NextObjectGUIDtext;
                 $thisfile_asf_errorcorrectionobject['objectsize'] = $NextObjectSize;
                 $thisfile_asf_errorcorrectionobject['error_correction_type'] = substr($ASFHeaderData, $offset, 16);
                 $offset += 16;
                 $thisfile_asf_errorcorrectionobject['error_correction_guid'] = $this->BytestringToGUID($thisfile_asf_errorcorrectionobject['error_correction_type']);
                 $thisfile_asf_errorcorrectionobject['error_correction_data_length'] = Utils::LittleEndian2Int(substr($ASFHeaderData, $offset, 4));
                 $offset += 4;
                 switch ($thisfile_asf_errorcorrectionobject['error_correction_type']) {
                     case GETID3_ASF_No_Error_Correction:
                         // should be no data, but just in case there is, skip to the end of the field
                         $offset += $thisfile_asf_errorcorrectionobject['error_correction_data_length'];
                         break;
                     case GETID3_ASF_Audio_Spread:
                         // Field Name                   Field Type   Size (bits)
                         // Span                         BYTE         8               // number of packets over which audio will be spread.
                         // Virtual Packet Length        WORD         16              // size of largest audio payload found in audio stream
                         // Virtual Chunk Length         WORD         16              // size of largest audio payload found in audio stream
                         // Silence Data Length          WORD         16              // number of bytes in Silence Data field
                         // Silence Data                 BYTESTREAM   variable        // hardcoded: 0x00 * (Silence Data Length) bytes
                         $thisfile_asf_errorcorrectionobject['span'] = Utils::LittleEndian2Int(substr($ASFHeaderData, $offset, 1));
                         $offset += 1;
                         $thisfile_asf_errorcorrectionobject['virtual_packet_length'] = Utils::LittleEndian2Int(substr($ASFHeaderData, $offset, 2));
                         $offset += 2;
                         $thisfile_asf_errorcorrectionobject['virtual_chunk_length'] = Utils::LittleEndian2Int(substr($ASFHeaderData, $offset, 2));
                         $offset += 2;
                         $thisfile_asf_errorcorrectionobject['silence_data_length'] = Utils::LittleEndian2Int(substr($ASFHeaderData, $offset, 2));
                         $offset += 2;
                         $thisfile_asf_errorcorrectionobject['silence_data'] = substr($ASFHeaderData, $offset, $thisfile_asf_errorcorrectionobject['silence_data_length']);
                         $offset += $thisfile_asf_errorcorrectionobject['silence_data_length'];
                         break;
                     default:
                         $info['warning'][] = 'error_correction_object.error_correction_type GUID {' . $this->BytestringToGUID($thisfile_asf_errorcorrectionobject['reserved']) . '} does not match expected "GETID3_ASF_No_Error_Correction" GUID {' . $this->BytestringToGUID(GETID3_ASF_No_Error_Correction) . '} or  "GETID3_ASF_Audio_Spread" GUID {' . $this->BytestringToGUID(GETID3_ASF_Audio_Spread) . '}';
                         //return false;
                         break;
                 }
                 break;
             case GETID3_ASF_Content_Description_Object:
                 // Content Description Object: (optional, one only)
                 // Field Name                   Field Type   Size (bits)
                 // Object ID                    GUID         128             // GUID for Content Description object - GETID3_ASF_Content_Description_Object
                 // Object Size                  QWORD        64              // size of Content Description object, including 34 bytes of Content Description Object header
                 // Title Length                 WORD         16              // number of bytes in Title field
                 // Author Length                WORD         16              // number of bytes in Author field
                 // Copyright Length             WORD         16              // number of bytes in Copyright field
                 // Description Length           WORD         16              // number of bytes in Description field
                 // Rating Length                WORD         16              // number of bytes in Rating field
                 // Title                        WCHAR        16              // array of Unicode characters - Title
                 // Author                       WCHAR        16              // array of Unicode characters - Author
                 // Copyright                    WCHAR        16              // array of Unicode characters - Copyright
                 // Description                  WCHAR        16              // array of Unicode characters - Description
                 // Rating                       WCHAR        16              // array of Unicode characters - Rating
                 // shortcut
                 $thisfile_asf['content_description_object'] = array();
                 $thisfile_asf_contentdescriptionobject =& $thisfile_asf['content_description_object'];
                 $thisfile_asf_contentdescriptionobject['offset'] = $NextObjectOffset + $offset;
                 $thisfile_asf_contentdescriptionobject['objectid'] = $NextObjectGUID;
                 $thisfile_asf_contentdescriptionobject['objectid_guid'] = $NextObjectGUIDtext;
                 $thisfile_asf_contentdescriptionobject['objectsize'] = $NextObjectSize;
                 $thisfile_asf_contentdescriptionobject['title_length'] = Utils::LittleEndian2Int(substr($ASFHeaderData, $offset, 2));
                 $offset += 2;
                 $thisfile_asf_contentdescriptionobject['author_length'] = Utils::LittleEndian2Int(substr($ASFHeaderData, $offset, 2));
                 $offset += 2;
                 $thisfile_asf_contentdescriptionobject['copyright_length'] = Utils::LittleEndian2Int(substr($ASFHeaderData, $offset, 2));
                 $offset += 2;
                 $thisfile_asf_contentdescriptionobject['description_length'] = Utils::LittleEndian2Int(substr($ASFHeaderData, $offset, 2));
                 $offset += 2;
                 $thisfile_asf_contentdescriptionobject['rating_length'] = Utils::LittleEndian2Int(substr($ASFHeaderData, $offset, 2));
                 $offset += 2;
                 $thisfile_asf_contentdescriptionobject['title'] = substr($ASFHeaderData, $offset, $thisfile_asf_contentdescriptionobject['title_length']);
                 $offset += $thisfile_asf_contentdescriptionobject['title_length'];
                 $thisfile_asf_contentdescriptionobject['author'] = substr($ASFHeaderData, $offset, $thisfile_asf_contentdescriptionobject['author_length']);
                 $offset += $thisfile_asf_contentdescriptionobject['author_length'];
                 $thisfile_asf_contentdescriptionobject['copyright'] = substr($ASFHeaderData, $offset, $thisfile_asf_contentdescriptionobject['copyright_length']);
                 $offset += $thisfile_asf_contentdescriptionobject['copyright_length'];
                 $thisfile_asf_contentdescriptionobject['description'] = substr($ASFHeaderData, $offset, $thisfile_asf_contentdescriptionobject['description_length']);
                 $offset += $thisfile_asf_contentdescriptionobject['description_length'];
                 $thisfile_asf_contentdescriptionobject['rating'] = substr($ASFHeaderData, $offset, $thisfile_asf_contentdescriptionobject['rating_length']);
                 $offset += $thisfile_asf_contentdescriptionobject['rating_length'];
                 $ASFcommentKeysToCopy = array('title' => 'title', 'author' => 'artist', 'copyright' => 'copyright', 'description' => 'comment', 'rating' => 'rating');
                 foreach ($ASFcommentKeysToCopy as $keytocopyfrom => $keytocopyto) {
                     if (!empty($thisfile_asf_contentdescriptionobject[$keytocopyfrom])) {
                         $thisfile_asf_comments[$keytocopyto][] = $this->TrimTerm($thisfile_asf_contentdescriptionobject[$keytocopyfrom]);
                     }
                 }
                 break;
             case GETID3_ASF_Extended_Content_Description_Object:
                 // Extended Content Description Object: (optional, one only)
                 // Field Name                   Field Type   Size (bits)
                 // Object ID                    GUID         128             // GUID for Extended Content Description object - GETID3_ASF_Extended_Content_Description_Object
                 // Object Size                  QWORD        64              // size of ExtendedContent Description object, including 26 bytes of Extended Content Description Object header
                 // Content Descriptors Count    WORD         16              // number of entries in Content Descriptors list
                 // Content Descriptors          array of:    variable        //
                 // * Descriptor Name Length     WORD         16              // size in bytes of Descriptor Name field
                 // * Descriptor Name            WCHAR        variable        // array of Unicode characters - Descriptor Name
                 // * Descriptor Value Data Type WORD         16              // Lookup array:
                 // 0x0000 = Unicode String (variable length)
                 // 0x0001 = BYTE array     (variable length)
                 // 0x0002 = BOOL           (DWORD, 32 bits)
                 // 0x0003 = DWORD          (DWORD, 32 bits)
                 // 0x0004 = QWORD          (QWORD, 64 bits)
                 // 0x0005 = WORD           (WORD,  16 bits)
                 // * Descriptor Value Length    WORD         16              // number of bytes stored in Descriptor Value field
                 // * Descriptor Value           variable     variable        // value for Content Descriptor
                 // shortcut
                 $thisfile_asf['extended_content_description_object'] = array();
                 $thisfile_asf_extendedcontentdescriptionobject =& $thisfile_asf['extended_content_description_object'];
                 $thisfile_asf_extendedcontentdescriptionobject['offset'] = $NextObjectOffset + $offset;
                 $thisfile_asf_extendedcontentdescriptionobject['objectid'] = $NextObjectGUID;
                 $thisfile_asf_extendedcontentdescriptionobject['objectid_guid'] = $NextObjectGUIDtext;
                 $thisfile_asf_extendedcontentdescriptionobject['objectsize'] = $NextObjectSize;
                 $thisfile_asf_extendedcontentdescriptionobject['content_descriptors_count'] = Utils::LittleEndian2Int(substr($ASFHeaderData, $offset, 2));
                 $offset += 2;
                 for ($ExtendedContentDescriptorsCounter = 0; $ExtendedContentDescriptorsCounter < $thisfile_asf_extendedcontentdescriptionobject['content_descriptors_count']; $ExtendedContentDescriptorsCounter++) {
                     // shortcut
                     $thisfile_asf_extendedcontentdescriptionobject['content_descriptors'][$ExtendedContentDescriptorsCounter] = array();
                     $thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current =& $thisfile_asf_extendedcontentdescriptionobject['content_descriptors'][$ExtendedContentDescriptorsCounter];
                     $thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['base_offset'] = $offset + 30;
                     $thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['name_length'] = Utils::LittleEndian2Int(substr($ASFHeaderData, $offset, 2));
                     $offset += 2;
                     $thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['name'] = substr($ASFHeaderData, $offset, $thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['name_length']);
                     $offset += $thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['name_length'];
                     $thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value_type'] = Utils::LittleEndian2Int(substr($ASFHeaderData, $offset, 2));
                     $offset += 2;
                     $thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value_length'] = Utils::LittleEndian2Int(substr($ASFHeaderData, $offset, 2));
                     $offset += 2;
                     $thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value'] = substr($ASFHeaderData, $offset, $thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value_length']);
                     $offset += $thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value_length'];
                     switch ($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value_type']) {
                         case 0x0:
                             // Unicode string
                             break;
                         case 0x1:
                             // BYTE array
                             // do nothing
                             break;
                         case 0x2:
                             // BOOL
                             $thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value'] = (bool) Utils::LittleEndian2Int($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value']);
                             break;
                         case 0x3:
                             // DWORD
                         // DWORD
                         case 0x4:
                             // QWORD
                         // QWORD
                         case 0x5:
                             // WORD
                             $thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value'] = Utils::LittleEndian2Int($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value']);
                             break;
                         default:
                             $info['warning'][] = 'extended_content_description.content_descriptors.' . $ExtendedContentDescriptorsCounter . '.value_type is invalid (' . $thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value_type'] . ')';
                             //return false;
                             break;
                     }
                     switch ($this->TrimConvert(strtolower($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['name']))) {
                         case 'wm/albumartist':
                         case 'artist':
                             // Note: not 'artist', that comes from 'author' tag
                             $thisfile_asf_comments['albumartist'] = array($this->TrimTerm($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value']));
                             break;
                         case 'wm/albumtitle':
                         case 'album':
                             $thisfile_asf_comments['album'] = array($this->TrimTerm($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value']));
                             break;
                         case 'wm/genre':
                         case 'genre':
                             $thisfile_asf_comments['genre'] = array($this->TrimTerm($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value']));
                             break;
                         case 'wm/partofset':
                             $thisfile_asf_comments['partofset'] = array($this->TrimTerm($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value']));
                             break;
                         case 'wm/tracknumber':
                         case 'tracknumber':
                             // be careful casting to int: casting unicode strings to int gives unexpected results (stops parsing at first non-numeric character)
                             $thisfile_asf_comments['track'] = array($this->TrimTerm($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value']));
                             foreach ($thisfile_asf_comments['track'] as $key => $value) {
                                 if (preg_match('/^[0-9\\x00]+$/', $value)) {
                                     $thisfile_asf_comments['track'][$key] = intval(str_replace("", '', $value));
                                 }
                             }
                             break;
                         case 'wm/track':
                             if (empty($thisfile_asf_comments['track'])) {
                                 $thisfile_asf_comments['track'] = array(1 + $this->TrimConvert($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value']));
                             }
                             break;
                         case 'wm/year':
                         case 'year':
                         case 'date':
                             $thisfile_asf_comments['year'] = array($this->TrimTerm($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value']));
                             break;
                         case 'wm/lyrics':
                         case 'lyrics':
                             $thisfile_asf_comments['lyrics'] = array($this->TrimTerm($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value']));
                             break;
                         case 'isvbr':
                             if ($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value']) {
                                 $thisfile_audio['bitrate_mode'] = 'vbr';
                                 $thisfile_video['bitrate_mode'] = 'vbr';
                             }
                             break;
                         case 'id3':
                             $getid3_id3v2 = new ID3v2($this->getid3);
                             $getid3_id3v2->AnalyzeString($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value']);
                             unset($getid3_id3v2);
                             if ($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value_length'] > 1024) {
                                 $thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value'] = '<value too large to display>';
                             }
                             break;
                         case 'wm/encodingtime':
                             $thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['encoding_time_unix'] = $this->FILETIMEtoUNIXtime($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value']);
                             $thisfile_asf_comments['encoding_time_unix'] = array($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['encoding_time_unix']);
                             break;
                         case 'wm/picture':
                             $WMpicture = $this->ASF_WMpicture($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value']);
                             foreach ($WMpicture as $key => $value) {
                                 $thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current[$key] = $value;
                             }
                             unset($WMpicture);
                             /*
                             								$wm_picture_offset = 0;
                             								$thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['image_type_id'] = Utils::LittleEndian2Int(substr($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value'], $wm_picture_offset, 1));
                             								$wm_picture_offset += 1;
                             								$thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['image_type']    = self::WMpictureTypeLookup($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['image_type_id']);
                             								$thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['image_size']    = Utils::LittleEndian2Int(substr($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value'], $wm_picture_offset, 4));
                             								$wm_picture_offset += 4;
                             
                             								$thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['image_mime'] = '';
                             								do {
                             									$next_byte_pair = substr($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value'], $wm_picture_offset, 2);
                             									$wm_picture_offset += 2;
                             									$thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['image_mime'] .= $next_byte_pair;
                             								} while ($next_byte_pair !== "\x00\x00");
                             
                             								$thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['image_description'] = '';
                             								do {
                             									$next_byte_pair = substr($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value'], $wm_picture_offset, 2);
                             									$wm_picture_offset += 2;
                             									$thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['image_description'] .= $next_byte_pair;
                             								} while ($next_byte_pair !== "\x00\x00");
                             
                             								$thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['dataoffset'] = $wm_picture_offset;
                             								$thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['data'] = substr($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value'], $wm_picture_offset);
                             								unset($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value']);
                             
                             								$imageinfo = array();
                             								$thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['image_mime'] = '';
                             								$imagechunkcheck = Utils::GetDataImageSize($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['data'], $imageinfo);
                             								unset($imageinfo);
                             								if (!empty($imagechunkcheck)) {
                             									$thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['image_mime'] = image_type_to_mime_type($imagechunkcheck[2]);
                             								}
                             								if (!isset($thisfile_asf_comments['picture'])) {
                             									$thisfile_asf_comments['picture'] = array();
                             								}
                             								$thisfile_asf_comments['picture'][] = array('data'=>$thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['data'], 'image_mime'=>$thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['image_mime']);
                             */
                             break;
                         default:
                             switch ($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value_type']) {
                                 case 0:
                                     // Unicode string
                                     if (substr($this->TrimConvert($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['name']), 0, 3) == 'WM/') {
                                         $thisfile_asf_comments[str_replace('wm/', '', strtolower($this->TrimConvert($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['name'])))] = array($this->TrimTerm($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value']));
                                     }
                                     break;
                                 case 1:
                                     break;
                             }
                             break;
                     }
                 }
                 break;
             case GETID3_ASF_Stream_Bitrate_Properties_Object:
                 // Stream Bitrate Properties Object: (optional, one only)
                 // Field Name                   Field Type   Size (bits)
                 // Object ID                    GUID         128             // GUID for Stream Bitrate Properties object - GETID3_ASF_Stream_Bitrate_Properties_Object
                 // Object Size                  QWORD        64              // size of Extended Content Description object, including 26 bytes of Stream Bitrate Properties Object header
                 // Bitrate Records Count        WORD         16              // number of records in Bitrate Records
                 // Bitrate Records              array of:    variable        //
                 // * Flags                      WORD         16              //
                 // * * Stream Number            bits         7  (0x007F)     // number of this stream
                 // * * Reserved                 bits         9  (0xFF80)     // hardcoded: 0
                 // * Average Bitrate            DWORD        32              // in bits per second
                 // shortcut
                 $thisfile_asf['stream_bitrate_properties_object'] = array();
                 $thisfile_asf_streambitratepropertiesobject =& $thisfile_asf['stream_bitrate_properties_object'];
                 $thisfile_asf_streambitratepropertiesobject['offset'] = $NextObjectOffset + $offset;
                 $thisfile_asf_streambitratepropertiesobject['objectid'] = $NextObjectGUID;
                 $thisfile_asf_streambitratepropertiesobject['objectid_guid'] = $NextObjectGUIDtext;
                 $thisfile_asf_streambitratepropertiesobject['objectsize'] = $NextObjectSize;
                 $thisfile_asf_streambitratepropertiesobject['bitrate_records_count'] = Utils::LittleEndian2Int(substr($ASFHeaderData, $offset, 2));
                 $offset += 2;
                 for ($BitrateRecordsCounter = 0; $BitrateRecordsCounter < $thisfile_asf_streambitratepropertiesobject['bitrate_records_count']; $BitrateRecordsCounter++) {
                     $thisfile_asf_streambitratepropertiesobject['bitrate_records'][$BitrateRecordsCounter]['flags_raw'] = Utils::LittleEndian2Int(substr($ASFHeaderData, $offset, 2));
                     $offset += 2;
                     $thisfile_asf_streambitratepropertiesobject['bitrate_records'][$BitrateRecordsCounter]['flags']['stream_number'] = $thisfile_asf_streambitratepropertiesobject['bitrate_records'][$BitrateRecordsCounter]['flags_raw'] & 0x7f;
                     $thisfile_asf_streambitratepropertiesobject['bitrate_records'][$BitrateRecordsCounter]['bitrate'] = Utils::LittleEndian2Int(substr($ASFHeaderData, $offset, 4));
                     $offset += 4;
                 }
                 break;
             case GETID3_ASF_Padding_Object:
                 // Padding Object: (optional)
                 // Field Name                   Field Type   Size (bits)
                 // Object ID                    GUID         128             // GUID for Padding object - GETID3_ASF_Padding_Object
                 // Object Size                  QWORD        64              // size of Padding object, including 24 bytes of ASF Padding Object header
                 // Padding Data                 BYTESTREAM   variable        // ignore
                 // shortcut
                 $thisfile_asf['padding_object'] = array();
                 $thisfile_asf_paddingobject =& $thisfile_asf['padding_object'];
                 $thisfile_asf_paddingobject['offset'] = $NextObjectOffset + $offset;
                 $thisfile_asf_paddingobject['objectid'] = $NextObjectGUID;
                 $thisfile_asf_paddingobject['objectid_guid'] = $NextObjectGUIDtext;
                 $thisfile_asf_paddingobject['objectsize'] = $NextObjectSize;
                 $thisfile_asf_paddingobject['padding_length'] = $thisfile_asf_paddingobject['objectsize'] - 16 - 8;
                 $thisfile_asf_paddingobject['padding'] = substr($ASFHeaderData, $offset, $thisfile_asf_paddingobject['padding_length']);
                 $offset += $NextObjectSize - 16 - 8;
                 break;
             case GETID3_ASF_Extended_Content_Encryption_Object:
             case GETID3_ASF_Content_Encryption_Object:
                 // WMA DRM - just ignore
                 $offset += $NextObjectSize - 16 - 8;
                 break;
             default:
                 // Implementations shall ignore any standard or non-standard object that they do not know how to handle.
                 if ($this->GUIDname($NextObjectGUIDtext)) {
                     $info['warning'][] = 'unhandled GUID "' . $this->GUIDname($NextObjectGUIDtext) . '" {' . $NextObjectGUIDtext . '} in ASF header at offset ' . ($offset - 16 - 8);
                 } else {
                     $info['warning'][] = 'unknown GUID {' . $NextObjectGUIDtext . '} in ASF header at offset ' . ($offset - 16 - 8);
                 }
                 $offset += $NextObjectSize - 16 - 8;
                 break;
         }
     }
     if (isset($thisfile_asf_streambitrateproperties['bitrate_records_count'])) {
         $ASFbitrateAudio = 0;
         $ASFbitrateVideo = 0;
         for ($BitrateRecordsCounter = 0; $BitrateRecordsCounter < $thisfile_asf_streambitrateproperties['bitrate_records_count']; $BitrateRecordsCounter++) {
             if (isset($thisfile_asf_codeclistobject['codec_entries'][$BitrateRecordsCounter])) {
                 switch ($thisfile_asf_codeclistobject['codec_entries'][$BitrateRecordsCounter]['type_raw']) {
                     case 1:
                         $ASFbitrateVideo += $thisfile_asf_streambitrateproperties['bitrate_records'][$BitrateRecordsCounter]['bitrate'];
                         break;
                     case 2:
                         $ASFbitrateAudio += $thisfile_asf_streambitrateproperties['bitrate_records'][$BitrateRecordsCounter]['bitrate'];
                         break;
                     default:
                         // do nothing
                         break;
                 }
             }
         }
         if ($ASFbitrateAudio > 0) {
             $thisfile_audio['bitrate'] = $ASFbitrateAudio;
         }
         if ($ASFbitrateVideo > 0) {
             $thisfile_video['bitrate'] = $ASFbitrateVideo;
         }
     }
     if (isset($thisfile_asf['stream_properties_object']) && is_array($thisfile_asf['stream_properties_object'])) {
         $thisfile_audio['bitrate'] = 0;
         $thisfile_video['bitrate'] = 0;
         foreach ($thisfile_asf['stream_properties_object'] as $streamnumber => $streamdata) {
             switch ($streamdata['stream_type']) {
                 case GETID3_ASF_Audio_Media:
                     // Field Name                   Field Type   Size (bits)
                     // Codec ID / Format Tag        WORD         16              // unique ID of audio codec - defined as wFormatTag field of WAVEFORMATEX structure
                     // Number of Channels           WORD         16              // number of channels of audio - defined as nChannels field of WAVEFORMATEX structure
                     // Samples Per Second           DWORD        32              // in Hertz - defined as nSamplesPerSec field of WAVEFORMATEX structure
                     // Average number of Bytes/sec  DWORD        32              // bytes/sec of audio stream  - defined as nAvgBytesPerSec field of WAVEFORMATEX structure
                     // Block Alignment              WORD         16              // block size in bytes of audio codec - defined as nBlockAlign field of WAVEFORMATEX structure
                     // Bits per sample              WORD         16              // bits per sample of mono data. set to zero for variable bitrate codecs. defined as wBitsPerSample field of WAVEFORMATEX structure
                     // Codec Specific Data Size     WORD         16              // size in bytes of Codec Specific Data buffer - defined as cbSize field of WAVEFORMATEX structure
                     // Codec Specific Data          BYTESTREAM   variable        // array of codec-specific data bytes
                     // shortcut
                     $thisfile_asf['audio_media'][$streamnumber] = array();
                     $thisfile_asf_audiomedia_currentstream =& $thisfile_asf['audio_media'][$streamnumber];
                     $audiomediaoffset = 0;
                     $thisfile_asf_audiomedia_currentstream = Riff::parseWAVEFORMATex(substr($streamdata['type_specific_data'], $audiomediaoffset, 16));
                     $audiomediaoffset += 16;
                     $thisfile_audio['lossless'] = false;
                     switch ($thisfile_asf_audiomedia_currentstream['raw']['wFormatTag']) {
                         case 0x1:
                             // PCM
                         // PCM
                         case 0x163:
                             // WMA9 Lossless
                             $thisfile_audio['lossless'] = true;
                             break;
                     }
                     if (!empty($thisfile_asf['stream_bitrate_properties_object']['bitrate_records'])) {
                         foreach ($thisfile_asf['stream_bitrate_properties_object']['bitrate_records'] as $dummy => $dataarray) {
                             if (isset($dataarray['flags']['stream_number']) && $dataarray['flags']['stream_number'] == $streamnumber) {
                                 $thisfile_asf_audiomedia_currentstream['bitrate'] = $dataarray['bitrate'];
                                 $thisfile_audio['bitrate'] += $dataarray['bitrate'];
                                 break;
                             }
                         }
                     } else {
                         if (!empty($thisfile_asf_audiomedia_currentstream['bytes_sec'])) {
                             $thisfile_audio['bitrate'] += $thisfile_asf_audiomedia_currentstream['bytes_sec'] * 8;
                         } elseif (!empty($thisfile_asf_audiomedia_currentstream['bitrate'])) {
                             $thisfile_audio['bitrate'] += $thisfile_asf_audiomedia_currentstream['bitrate'];
                         }
                     }
                     $thisfile_audio['streams'][$streamnumber] = $thisfile_asf_audiomedia_currentstream;
                     $thisfile_audio['streams'][$streamnumber]['wformattag'] = $thisfile_asf_audiomedia_currentstream['raw']['wFormatTag'];
                     $thisfile_audio['streams'][$streamnumber]['lossless'] = $thisfile_audio['lossless'];
                     $thisfile_audio['streams'][$streamnumber]['bitrate'] = $thisfile_audio['bitrate'];
                     $thisfile_audio['streams'][$streamnumber]['dataformat'] = 'wma';
                     unset($thisfile_audio['streams'][$streamnumber]['raw']);
                     $thisfile_asf_audiomedia_currentstream['codec_data_size'] = Utils::LittleEndian2Int(substr($streamdata['type_specific_data'], $audiomediaoffset, 2));
                     $audiomediaoffset += 2;
                     $thisfile_asf_audiomedia_currentstream['codec_data'] = substr($streamdata['type_specific_data'], $audiomediaoffset, $thisfile_asf_audiomedia_currentstream['codec_data_size']);
                     $audiomediaoffset += $thisfile_asf_audiomedia_currentstream['codec_data_size'];
                     break;
                 case GETID3_ASF_Video_Media:
                     // Field Name                   Field Type   Size (bits)
                     // Encoded Image Width          DWORD        32              // width of image in pixels
                     // Encoded Image Height         DWORD        32              // height of image in pixels
                     // Reserved Flags               BYTE         8               // hardcoded: 0x02
                     // Format Data Size             WORD         16              // size of Format Data field in bytes
                     // Format Data                  array of:    variable        //
                     // * Format Data Size           DWORD        32              // number of bytes in Format Data field, in bytes - defined as biSize field of BITMAPINFOHEADER structure
                     // * Image Width                LONG         32              // width of encoded image in pixels - defined as biWidth field of BITMAPINFOHEADER structure
                     // * Image Height               LONG         32              // height of encoded image in pixels - defined as biHeight field of BITMAPINFOHEADER structure
                     // * Reserved                   WORD         16              // hardcoded: 0x0001 - defined as biPlanes field of BITMAPINFOHEADER structure
                     // * Bits Per Pixel Count       WORD         16              // bits per pixel - defined as biBitCount field of BITMAPINFOHEADER structure
                     // * Compression ID             FOURCC       32              // fourcc of video codec - defined as biCompression field of BITMAPINFOHEADER structure
                     // * Image Size                 DWORD        32              // image size in bytes - defined as biSizeImage field of BITMAPINFOHEADER structure
                     // * Horizontal Pixels / Meter  DWORD        32              // horizontal resolution of target device in pixels per meter - defined as biXPelsPerMeter field of BITMAPINFOHEADER structure
                     // * Vertical Pixels / Meter    DWORD        32              // vertical resolution of target device in pixels per meter - defined as biYPelsPerMeter field of BITMAPINFOHEADER structure
                     // * Colors Used Count          DWORD        32              // number of color indexes in the color table that are actually used - defined as biClrUsed field of BITMAPINFOHEADER structure
                     // * Important Colors Count     DWORD        32              // number of color index required for displaying bitmap. if zero, all colors are required. defined as biClrImportant field of BITMAPINFOHEADER structure
                     // * Codec Specific Data        BYTESTREAM   variable        // array of codec-specific data bytes
                     // shortcut
                     $thisfile_asf['video_media'][$streamnumber] = array();
                     $thisfile_asf_videomedia_currentstream =& $thisfile_asf['video_media'][$streamnumber];
                     $videomediaoffset = 0;
                     $thisfile_asf_videomedia_currentstream['image_width'] = Utils::LittleEndian2Int(substr($streamdata['type_specific_data'], $videomediaoffset, 4));
                     $videomediaoffset += 4;
                     $thisfile_asf_videomedia_currentstream['image_height'] = Utils::LittleEndian2Int(substr($streamdata['type_specific_data'], $videomediaoffset, 4));
                     $videomediaoffset += 4;
                     $thisfile_asf_videomedia_currentstream['flags'] = Utils::LittleEndian2Int(substr($streamdata['type_specific_data'], $videomediaoffset, 1));
                     $videomediaoffset += 1;
                     $thisfile_asf_videomedia_currentstream['format_data_size'] = Utils::LittleEndian2Int(substr($streamdata['type_specific_data'], $videomediaoffset, 2));
                     $videomediaoffset += 2;
                     $thisfile_asf_videomedia_currentstream['format_data']['format_data_size'] = Utils::LittleEndian2Int(substr($streamdata['type_specific_data'], $videomediaoffset, 4));
                     $videomediaoffset += 4;
                     $thisfile_asf_videomedia_currentstream['format_data']['image_width'] = Utils::LittleEndian2Int(substr($streamdata['type_specific_data'], $videomediaoffset, 4));
                     $videomediaoffset += 4;
                     $thisfile_asf_videomedia_currentstream['format_data']['image_height'] = Utils::LittleEndian2Int(substr($streamdata['type_specific_data'], $videomediaoffset, 4));
                     $videomediaoffset += 4;
                     $thisfile_asf_videomedia_currentstream['format_data']['reserved'] = Utils::LittleEndian2Int(substr($streamdata['type_specific_data'], $videomediaoffset, 2));
                     $videomediaoffset += 2;
                     $thisfile_asf_videomedia_currentstream['format_data']['bits_per_pixel'] = Utils::LittleEndian2Int(substr($streamdata['type_specific_data'], $videomediaoffset, 2));
                     $videomediaoffset += 2;
                     $thisfile_asf_videomedia_currentstream['format_data']['codec_fourcc'] = substr($streamdata['type_specific_data'], $videomediaoffset, 4);
                     $videomediaoffset += 4;
                     $thisfile_asf_videomedia_currentstream['format_data']['image_size'] = Utils::LittleEndian2Int(substr($streamdata['type_specific_data'], $videomediaoffset, 4));
                     $videomediaoffset += 4;
                     $thisfile_asf_videomedia_currentstream['format_data']['horizontal_pels'] = Utils::LittleEndian2Int(substr($streamdata['type_specific_data'], $videomediaoffset, 4));
                     $videomediaoffset += 4;
                     $thisfile_asf_videomedia_currentstream['format_data']['vertical_pels'] = Utils::LittleEndian2Int(substr($streamdata['type_specific_data'], $videomediaoffset, 4));
                     $videomediaoffset += 4;
                     $thisfile_asf_videomedia_currentstream['format_data']['colors_used'] = Utils::LittleEndian2Int(substr($streamdata['type_specific_data'], $videomediaoffset, 4));
                     $videomediaoffset += 4;
                     $thisfile_asf_videomedia_currentstream['format_data']['colors_important'] = Utils::LittleEndian2Int(substr($streamdata['type_specific_data'], $videomediaoffset, 4));
                     $videomediaoffset += 4;
                     $thisfile_asf_videomedia_currentstream['format_data']['codec_data'] = substr($streamdata['type_specific_data'], $videomediaoffset);
                     if (!empty($thisfile_asf['stream_bitrate_properties_object']['bitrate_records'])) {
                         foreach ($thisfile_asf['stream_bitrate_properties_object']['bitrate_records'] as $dummy => $dataarray) {
                             if (isset($dataarray['flags']['stream_number']) && $dataarray['flags']['stream_number'] == $streamnumber) {
                                 $thisfile_asf_videomedia_currentstream['bitrate'] = $dataarray['bitrate'];
                                 $thisfile_video['streams'][$streamnumber]['bitrate'] = $dataarray['bitrate'];
                                 $thisfile_video['bitrate'] += $dataarray['bitrate'];
                                 break;
                             }
                         }
                     }
                     $thisfile_asf_videomedia_currentstream['format_data']['codec'] = Riff::fourccLookup($thisfile_asf_videomedia_currentstream['format_data']['codec_fourcc']);
                     $thisfile_video['streams'][$streamnumber]['fourcc'] = $thisfile_asf_videomedia_currentstream['format_data']['codec_fourcc'];
                     $thisfile_video['streams'][$streamnumber]['codec'] = $thisfile_asf_videomedia_currentstream['format_data']['codec'];
                     $thisfile_video['streams'][$streamnumber]['resolution_x'] = $thisfile_asf_videomedia_currentstream['image_width'];
                     $thisfile_video['streams'][$streamnumber]['resolution_y'] = $thisfile_asf_videomedia_currentstream['image_height'];
                     $thisfile_video['streams'][$streamnumber]['bits_per_sample'] = $thisfile_asf_videomedia_currentstream['format_data']['bits_per_pixel'];
                     break;
                 default:
                     break;
             }
         }
     }
     while ($this->ftell() < $info['avdataend']) {
         $NextObjectDataHeader = $this->fread(24);
         $offset = 0;
         $NextObjectGUID = substr($NextObjectDataHeader, 0, 16);
         $offset += 16;
         $NextObjectGUIDtext = $this->BytestringToGUID($NextObjectGUID);
         $NextObjectSize = Utils::LittleEndian2Int(substr($NextObjectDataHeader, $offset, 8));
         $offset += 8;
         switch ($NextObjectGUID) {
             case GETID3_ASF_Data_Object:
                 // Data Object: (mandatory, one only)
                 // Field Name                       Field Type   Size (bits)
                 // Object ID                        GUID         128             // GUID for Data object - GETID3_ASF_Data_Object
                 // Object Size                      QWORD        64              // size of Data object, including 50 bytes of Data Object header. may be 0 if FilePropertiesObject.BroadcastFlag == 1
                 // File ID                          GUID         128             // unique identifier. identical to File ID field in Header Object
                 // Total Data Packets               QWORD        64              // number of Data Packet entries in Data Object. invalid if FilePropertiesObject.BroadcastFlag == 1
                 // Reserved                         WORD         16              // hardcoded: 0x0101
                 // shortcut
                 $thisfile_asf['data_object'] = array();
                 $thisfile_asf_dataobject =& $thisfile_asf['data_object'];
                 $DataObjectData = $NextObjectDataHeader . $this->fread(50 - 24);
                 $offset = 24;
                 $thisfile_asf_dataobject['objectid'] = $NextObjectGUID;
                 $thisfile_asf_dataobject['objectid_guid'] = $NextObjectGUIDtext;
                 $thisfile_asf_dataobject['objectsize'] = $NextObjectSize;
                 $thisfile_asf_dataobject['fileid'] = substr($DataObjectData, $offset, 16);
                 $offset += 16;
                 $thisfile_asf_dataobject['fileid_guid'] = $this->BytestringToGUID($thisfile_asf_dataobject['fileid']);
                 $thisfile_asf_dataobject['total_data_packets'] = Utils::LittleEndian2Int(substr($DataObjectData, $offset, 8));
                 $offset += 8;
                 $thisfile_asf_dataobject['reserved'] = Utils::LittleEndian2Int(substr($DataObjectData, $offset, 2));
                 $offset += 2;
                 if ($thisfile_asf_dataobject['reserved'] != 0x101) {
                     $info['warning'][] = 'data_object.reserved (' . Utils::PrintHexBytes($thisfile_asf_dataobject['reserved']) . ') does not match expected value of "0x0101"';
                     //return false;
                     break;
                 }
                 // Data Packets                     array of:    variable        //
                 // * Error Correction Flags         BYTE         8               //
                 // * * Error Correction Data Length bits         4               // if Error Correction Length Type == 00, size of Error Correction Data in bytes, else hardcoded: 0000
                 // * * Opaque Data Present          bits         1               //
                 // * * Error Correction Length Type bits         2               // number of bits for size of the error correction data. hardcoded: 00
                 // * * Error Correction Present     bits         1               // If set, use Opaque Data Packet structure, else use Payload structure
                 // * Error Correction Data
                 $info['avdataoffset'] = $this->ftell();
                 $this->fseek($thisfile_asf_dataobject['objectsize'] - 50, SEEK_CUR);
                 // skip actual audio/video data
                 $info['avdataend'] = $this->ftell();
                 break;
             case GETID3_ASF_Simple_Index_Object:
                 // Simple Index Object: (optional, recommended, one per video stream)
                 // Field Name                       Field Type   Size (bits)
                 // Object ID                        GUID         128             // GUID for Simple Index object - GETID3_ASF_Data_Object
                 // Object Size                      QWORD        64              // size of Simple Index object, including 56 bytes of Simple Index Object header
                 // File ID                          GUID         128             // unique identifier. may be zero or identical to File ID field in Data Object and Header Object
                 // Index Entry Time Interval        QWORD        64              // interval between index entries in 100-nanosecond units
                 // Maximum Packet Count             DWORD        32              // maximum packet count for all index entries
                 // Index Entries Count              DWORD        32              // number of Index Entries structures
                 // Index Entries                    array of:    variable        //
                 // * Packet Number                  DWORD        32              // number of the Data Packet associated with this index entry
                 // * Packet Count                   WORD         16              // number of Data Packets to sent at this index entry
                 // shortcut
                 $thisfile_asf['simple_index_object'] = array();
                 $thisfile_asf_simpleindexobject =& $thisfile_asf['simple_index_object'];
                 $SimpleIndexObjectData = $NextObjectDataHeader . $this->fread(56 - 24);
                 $offset = 24;
                 $thisfile_asf_simpleindexobject['objectid'] = $NextObjectGUID;
                 $thisfile_asf_simpleindexobject['objectid_guid'] = $NextObjectGUIDtext;
                 $thisfile_asf_simpleindexobject['objectsize'] = $NextObjectSize;
                 $thisfile_asf_simpleindexobject['fileid'] = substr($SimpleIndexObjectData, $offset, 16);
                 $offset += 16;
                 $thisfile_asf_simpleindexobject['fileid_guid'] = $this->BytestringToGUID($thisfile_asf_simpleindexobject['fileid']);
                 $thisfile_asf_simpleindexobject['index_entry_time_interval'] = Utils::LittleEndian2Int(substr($SimpleIndexObjectData, $offset, 8));
                 $offset += 8;
                 $thisfile_asf_simpleindexobject['maximum_packet_count'] = Utils::LittleEndian2Int(substr($SimpleIndexObjectData, $offset, 4));
                 $offset += 4;
                 $thisfile_asf_simpleindexobject['index_entries_count'] = Utils::LittleEndian2Int(substr($SimpleIndexObjectData, $offset, 4));
                 $offset += 4;
                 $IndexEntriesData = $SimpleIndexObjectData . $this->fread(6 * $thisfile_asf_simpleindexobject['index_entries_count']);
                 for ($IndexEntriesCounter = 0; $IndexEntriesCounter < $thisfile_asf_simpleindexobject['index_entries_count']; $IndexEntriesCounter++) {
                     $thisfile_asf_simpleindexobject['index_entries'][$IndexEntriesCounter]['packet_number'] = Utils::LittleEndian2Int(substr($IndexEntriesData, $offset, 4));
                     $offset += 4;
                     $thisfile_asf_simpleindexobject['index_entries'][$IndexEntriesCounter]['packet_count'] = Utils::LittleEndian2Int(substr($IndexEntriesData, $offset, 4));
                     $offset += 2;
                 }
                 break;
             case GETID3_ASF_Index_Object:
                 // 6.2 ASF top-level Index Object (optional but recommended when appropriate, 0 or 1)
                 // Field Name                       Field Type   Size (bits)
                 // Object ID                        GUID         128             // GUID for the Index Object - GETID3_ASF_Index_Object
                 // Object Size                      QWORD        64              // Specifies the size, in bytes, of the Index Object, including at least 34 bytes of Index Object header
                 // Index Entry Time Interval        DWORD        32              // Specifies the time interval between each index entry in ms.
                 // Index Specifiers Count           WORD         16              // Specifies the number of Index Specifiers structures in this Index Object.
                 // Index Blocks Count               DWORD        32              // Specifies the number of Index Blocks structures in this Index Object.
                 // Index Entry Time Interval        DWORD        32              // Specifies the time interval between index entries in milliseconds.  This value cannot be 0.
                 // Index Specifiers Count           WORD         16              // Specifies the number of entries in the Index Specifiers list.  Valid values are 1 and greater.
                 // Index Specifiers                 array of:    varies          //
                 // * Stream Number                  WORD         16              // Specifies the stream number that the Index Specifiers refer to. Valid values are between 1 and 127.
                 // * Index Type                     WORD         16              // Specifies Index Type values as follows:
                 //   1 = Nearest Past Data Packet - indexes point to the data packet whose presentation time is closest to the index entry time.
                 //   2 = Nearest Past Media Object - indexes point to the closest data packet containing an entire object or first fragment of an object.
                 //   3 = Nearest Past Cleanpoint. - indexes point to the closest data packet containing an entire object (or first fragment of an object) that has the Cleanpoint Flag set.
                 //   Nearest Past Cleanpoint is the most common type of index.
                 // Index Entry Count                DWORD        32              // Specifies the number of Index Entries in the block.
                 // * Block Positions                QWORD        varies          // Specifies a list of byte offsets of the beginnings of the blocks relative to the beginning of the first Data Packet (i.e., the beginning of the Data Object + 50 bytes). The number of entries in this list is specified by the value of the Index Specifiers Count field. The order of those byte offsets is tied to the order in which Index Specifiers are listed.
                 // * Index Entries                  array of:    varies          //
                 // * * Offsets                      DWORD        varies          // An offset value of 0xffffffff indicates an invalid offset value
                 // shortcut
                 $thisfile_asf['asf_index_object'] = array();
                 $thisfile_asf_asfindexobject =& $thisfile_asf['asf_index_object'];
                 $ASFIndexObjectData = $NextObjectDataHeader . $this->fread(34 - 24);
                 $offset = 24;
                 $thisfile_asf_asfindexobject['objectid'] = $NextObjectGUID;
                 $thisfile_asf_asfindexobject['objectid_guid'] = $NextObjectGUIDtext;
                 $thisfile_asf_asfindexobject['objectsize'] = $NextObjectSize;
                 $thisfile_asf_asfindexobject['entry_time_interval'] = Utils::LittleEndian2Int(substr($ASFIndexObjectData, $offset, 4));
                 $offset += 4;
                 $thisfile_asf_asfindexobject['index_specifiers_count'] = Utils::LittleEndian2Int(substr($ASFIndexObjectData, $offset, 2));
                 $offset += 2;
                 $thisfile_asf_asfindexobject['index_blocks_count'] = Utils::LittleEndian2Int(substr($ASFIndexObjectData, $offset, 4));
                 $offset += 4;
                 $ASFIndexObjectData .= $this->fread(4 * $thisfile_asf_asfindexobject['index_specifiers_count']);
                 for ($IndexSpecifiersCounter = 0; $IndexSpecifiersCounter < $thisfile_asf_asfindexobject['index_specifiers_count']; $IndexSpecifiersCounter++) {
                     $IndexSpecifierStreamNumber = Utils::LittleEndian2Int(substr($ASFIndexObjectData, $offset, 2));
                     $offset += 2;
                     $thisfile_asf_asfindexobject['index_specifiers'][$IndexSpecifiersCounter]['stream_number'] = $IndexSpecifierStreamNumber;
                     $thisfile_asf_asfindexobject['index_specifiers'][$IndexSpecifiersCounter]['index_type'] = Utils::LittleEndian2Int(substr($ASFIndexObjectData, $offset, 2));
                     $offset += 2;
                     $thisfile_asf_asfindexobject['index_specifiers'][$IndexSpecifiersCounter]['index_type_text'] = $this->ASFIndexObjectIndexTypeLookup($thisfile_asf_asfindexobject['index_specifiers'][$IndexSpecifiersCounter]['index_type']);
                 }
                 $ASFIndexObjectData .= $this->fread(4);
                 $thisfile_asf_asfindexobject['index_entry_count'] = Utils::LittleEndian2Int(substr($ASFIndexObjectData, $offset, 4));
                 $offset += 4;
                 $ASFIndexObjectData .= $this->fread(8 * $thisfile_asf_asfindexobject['index_specifiers_count']);
                 for ($IndexSpecifiersCounter = 0; $IndexSpecifiersCounter < $thisfile_asf_asfindexobject['index_specifiers_count']; $IndexSpecifiersCounter++) {
                     $thisfile_asf_asfindexobject['block_positions'][$IndexSpecifiersCounter] = Utils::LittleEndian2Int(substr($ASFIndexObjectData, $offset, 8));
                     $offset += 8;
                 }
                 $ASFIndexObjectData .= $this->fread(4 * $thisfile_asf_asfindexobject['index_specifiers_count'] * $thisfile_asf_asfindexobject['index_entry_count']);
                 for ($IndexEntryCounter = 0; $IndexEntryCounter < $thisfile_asf_asfindexobject['index_entry_count']; $IndexEntryCounter++) {
                     for ($IndexSpecifiersCounter = 0; $IndexSpecifiersCounter < $thisfile_asf_asfindexobject['index_specifiers_count']; $IndexSpecifiersCounter++) {
                         $thisfile_asf_asfindexobject['offsets'][$IndexSpecifiersCounter][$IndexEntryCounter] = Utils::LittleEndian2Int(substr($ASFIndexObjectData, $offset, 4));
                         $offset += 4;
                     }
                 }
                 break;
             default:
                 // Implementations shall ignore any standard or non-standard object that they do not know how to handle.
                 if ($this->GUIDname($NextObjectGUIDtext)) {
                     $info['warning'][] = 'unhandled GUID "' . $this->GUIDname($NextObjectGUIDtext) . '" {' . $NextObjectGUIDtext . '} in ASF body at offset ' . ($offset - 16 - 8);
                 } else {
                     $info['warning'][] = 'unknown GUID {' . $NextObjectGUIDtext . '} in ASF body at offset ' . ($this->ftell() - 16 - 8);
                 }
                 $this->fseek($NextObjectSize - 16 - 8, SEEK_CUR);
                 break;
         }
     }
     if (isset($thisfile_asf_codeclistobject['codec_entries']) && is_array($thisfile_asf_codeclistobject['codec_entries'])) {
         foreach ($thisfile_asf_codeclistobject['codec_entries'] as $streamnumber => $streamdata) {
             switch ($streamdata['information']) {
                 case 'WMV1':
                 case 'WMV2':
                 case 'WMV3':
                 case 'MSS1':
                 case 'MSS2':
                 case 'WMVA':
                 case 'WVC1':
                 case 'WMVP':
                 case 'WVP2':
                     $thisfile_video['dataformat'] = 'wmv';
                     $info['mime_type'] = 'video/x-ms-wmv';
                     break;
                 case 'MP42':
                 case 'MP43':
                 case 'MP4S':
                 case 'mp4s':
                     $thisfile_video['dataformat'] = 'asf';
                     $info['mime_type'] = 'video/x-ms-asf';
                     break;
                 default:
                     switch ($streamdata['type_raw']) {
                         case 1:
                             if (strstr($this->TrimConvert($streamdata['name']), 'Windows Media')) {
                                 $thisfile_video['dataformat'] = 'wmv';
                                 if ($info['mime_type'] == 'video/x-ms-asf') {
                                     $info['mime_type'] = 'video/x-ms-wmv';
                                 }
                             }
                             break;
                         case 2:
                             if (strstr($this->TrimConvert($streamdata['name']), 'Windows Media')) {
                                 $thisfile_audio['dataformat'] = 'wma';
                                 if ($info['mime_type'] == 'video/x-ms-asf') {
                                     $info['mime_type'] = 'audio/x-ms-wma';
                                 }
                             }
                             break;
                     }
                     break;
             }
         }
     }
     switch (isset($thisfile_audio['codec']) ? $thisfile_audio['codec'] : '') {
         case 'MPEG Layer-3':
             $thisfile_audio['dataformat'] = 'mp3';
             break;
         default:
             break;
     }
     if (isset($thisfile_asf_codeclistobject['codec_entries'])) {
         foreach ($thisfile_asf_codeclistobject['codec_entries'] as $streamnumber => $streamdata) {
             switch ($streamdata['type_raw']) {
                 case 1:
                     // video
                     $thisfile_video['encoder'] = $this->TrimConvert($thisfile_asf_codeclistobject['codec_entries'][$streamnumber]['name']);
                     break;
                 case 2:
                     // audio
                     $thisfile_audio['encoder'] = $this->TrimConvert($thisfile_asf_codeclistobject['codec_entries'][$streamnumber]['name']);
                     // AH 2003-10-01
                     $thisfile_audio['encoder_options'] = $this->TrimConvert($thisfile_asf_codeclistobject['codec_entries'][0]['description']);
                     $thisfile_audio['codec'] = $thisfile_audio['encoder'];
                     break;
                 default:
                     $info['warning'][] = 'Unknown streamtype: [codec_list_object][codec_entries][' . $streamnumber . '][type_raw] == ' . $streamdata['type_raw'];
                     break;
             }
         }
     }
     if (isset($info['audio'])) {
         $thisfile_audio['lossless'] = isset($thisfile_audio['lossless']) ? $thisfile_audio['lossless'] : false;
         $thisfile_audio['dataformat'] = !empty($thisfile_audio['dataformat']) ? $thisfile_audio['dataformat'] : 'asf';
     }
     if (!empty($thisfile_video['dataformat'])) {
         $thisfile_video['lossless'] = isset($thisfile_audio['lossless']) ? $thisfile_audio['lossless'] : false;
         $thisfile_video['pixel_aspect_ratio'] = isset($thisfile_audio['pixel_aspect_ratio']) ? $thisfile_audio['pixel_aspect_ratio'] : (double) 1;
         $thisfile_video['dataformat'] = !empty($thisfile_video['dataformat']) ? $thisfile_video['dataformat'] : 'asf';
     }
     if (!empty($thisfile_video['streams'])) {
         $thisfile_video['resolution_x'] = 0;
         $thisfile_video['resolution_y'] = 0;
         foreach ($thisfile_video['streams'] as $key => $valuearray) {
             if ($valuearray['resolution_x'] > $thisfile_video['resolution_x'] || $valuearray['resolution_y'] > $thisfile_video['resolution_y']) {
                 $thisfile_video['resolution_x'] = $valuearray['resolution_x'];
                 $thisfile_video['resolution_y'] = $valuearray['resolution_y'];
             }
         }
     }
     $info['bitrate'] = (isset($thisfile_audio['bitrate']) ? $thisfile_audio['bitrate'] : 0) + (isset($thisfile_video['bitrate']) ? $thisfile_video['bitrate'] : 0);
     if ((!isset($info['playtime_seconds']) || $info['playtime_seconds'] <= 0) && $info['bitrate'] > 0) {
         $info['playtime_seconds'] = ($info['filesize'] - $info['avdataoffset']) / ($info['bitrate'] / 8);
     }
     return true;
 }
Пример #23
0
 public function Analyze()
 {
     $info =& $this->getid3->info;
     ///AH
     $info['ac3']['raw']['bsi'] = array();
     $thisfile_ac3 =& $info['ac3'];
     $thisfile_ac3_raw =& $thisfile_ac3['raw'];
     $thisfile_ac3_raw_bsi =& $thisfile_ac3_raw['bsi'];
     // http://www.atsc.org/standards/a_52a.pdf
     $info['fileformat'] = 'ac3';
     // An AC-3 serial coded audio bit stream is made up of a sequence of synchronization frames
     // Each synchronization frame contains 6 coded audio blocks (AB), each of which represent 256
     // new audio samples per channel. A synchronization information (SI) header at the beginning
     // of each frame contains information needed to acquire and maintain synchronization. A
     // bit stream information (BSI) header follows SI, and contains parameters describing the coded
     // audio service. The coded audio blocks may be followed by an auxiliary data (Aux) field. At the
     // end of each frame is an error check field that includes a CRC word for error detection. An
     // additional CRC word is located in the SI header, the use of which, by a decoder, is optional.
     //
     // syncinfo() | bsi() | AB0 | AB1 | AB2 | AB3 | AB4 | AB5 | Aux | CRC
     // syncinfo() {
     // 	 syncword    16
     // 	 crc1        16
     // 	 fscod        2
     // 	 frmsizecod   6
     // } /* end of syncinfo */
     $this->fseek($info['avdataoffset']);
     $this->AC3header['syncinfo'] = $this->fread(5);
     if (strpos($this->AC3header['syncinfo'], self::syncword) === 0) {
         $thisfile_ac3_raw['synchinfo']['synchword'] = self::syncword;
         $offset = 2;
     } else {
         if (!$this->isDependencyFor('Matroska')) {
             unset($info['fileformat'], $info['ac3']);
             return $this->error('Expecting "' . Utils::PrintHexBytes(self::syncword) . '" at offset ' . $info['avdataoffset'] . ', found "' . Utils::PrintHexBytes(substr($this->AC3header['syncinfo'], 0, 2)) . '"');
         }
         $offset = 0;
         $this->fseek(-2, SEEK_CUR);
     }
     $info['audio']['dataformat'] = 'ac3';
     $info['audio']['bitrate_mode'] = 'cbr';
     $info['audio']['lossless'] = false;
     $thisfile_ac3_raw['synchinfo']['crc1'] = Utils::LittleEndian2Int(substr($this->AC3header['syncinfo'], $offset, 2));
     $ac3_synchinfo_fscod_frmsizecod = Utils::LittleEndian2Int(substr($this->AC3header['syncinfo'], $offset + 2, 1));
     $thisfile_ac3_raw['synchinfo']['fscod'] = ($ac3_synchinfo_fscod_frmsizecod & 0xc0) >> 6;
     $thisfile_ac3_raw['synchinfo']['frmsizecod'] = $ac3_synchinfo_fscod_frmsizecod & 0x3f;
     $thisfile_ac3['sample_rate'] = self::sampleRateCodeLookup($thisfile_ac3_raw['synchinfo']['fscod']);
     if ($thisfile_ac3_raw['synchinfo']['fscod'] <= 3) {
         $info['audio']['sample_rate'] = $thisfile_ac3['sample_rate'];
     }
     $thisfile_ac3['frame_length'] = self::frameSizeLookup($thisfile_ac3_raw['synchinfo']['frmsizecod'], $thisfile_ac3_raw['synchinfo']['fscod']);
     $thisfile_ac3['bitrate'] = self::bitrateLookup($thisfile_ac3_raw['synchinfo']['frmsizecod']);
     $info['audio']['bitrate'] = $thisfile_ac3['bitrate'];
     $this->AC3header['bsi'] = Utils::BigEndian2Bin($this->fread(15));
     $ac3_bsi_offset = 0;
     $thisfile_ac3_raw_bsi['bsid'] = $this->readHeaderBSI(5);
     if ($thisfile_ac3_raw_bsi['bsid'] > 8) {
         // Decoders which can decode version 8 will thus be able to decode version numbers less than 8.
         // If this standard is extended by the addition of additional elements or features, a value of bsid greater than 8 will be used.
         // Decoders built to this version of the standard will not be able to decode versions with bsid greater than 8.
         $this->error('Bit stream identification is version ' . $thisfile_ac3_raw_bsi['bsid'] . ', but getID3() only understands up to version 8');
         unset($info['ac3']);
         return false;
     }
     $thisfile_ac3_raw_bsi['bsmod'] = $this->readHeaderBSI(3);
     $thisfile_ac3_raw_bsi['acmod'] = $this->readHeaderBSI(3);
     $thisfile_ac3['service_type'] = self::serviceTypeLookup($thisfile_ac3_raw_bsi['bsmod'], $thisfile_ac3_raw_bsi['acmod']);
     $ac3_coding_mode = self::audioCodingModeLookup($thisfile_ac3_raw_bsi['acmod']);
     foreach ($ac3_coding_mode as $key => $value) {
         $thisfile_ac3[$key] = $value;
     }
     switch ($thisfile_ac3_raw_bsi['acmod']) {
         case 0:
         case 1:
             $info['audio']['channelmode'] = 'mono';
             break;
         case 3:
         case 4:
             $info['audio']['channelmode'] = 'stereo';
             break;
         default:
             $info['audio']['channelmode'] = 'surround';
             break;
     }
     $info['audio']['channels'] = $thisfile_ac3['num_channels'];
     if ($thisfile_ac3_raw_bsi['acmod'] & 0x1) {
         // If the lsb of acmod is a 1, center channel is in use and cmixlev follows in the bit stream.
         $thisfile_ac3_raw_bsi['cmixlev'] = $this->readHeaderBSI(2);
         $thisfile_ac3['center_mix_level'] = self::centerMixLevelLookup($thisfile_ac3_raw_bsi['cmixlev']);
     }
     if ($thisfile_ac3_raw_bsi['acmod'] & 0x4) {
         // If the msb of acmod is a 1, surround channels are in use and surmixlev follows in the bit stream.
         $thisfile_ac3_raw_bsi['surmixlev'] = $this->readHeaderBSI(2);
         $thisfile_ac3['surround_mix_level'] = self::surroundMixLevelLookup($thisfile_ac3_raw_bsi['surmixlev']);
     }
     if ($thisfile_ac3_raw_bsi['acmod'] == 0x2) {
         // When operating in the two channel mode, this 2-bit code indicates whether or not the program has been encoded in Dolby Surround.
         $thisfile_ac3_raw_bsi['dsurmod'] = $this->readHeaderBSI(2);
         $thisfile_ac3['dolby_surround_mode'] = self::dolbySurroundModeLookup($thisfile_ac3_raw_bsi['dsurmod']);
     }
     $thisfile_ac3_raw_bsi['lfeon'] = (bool) $this->readHeaderBSI(1);
     $thisfile_ac3['lfe_enabled'] = $thisfile_ac3_raw_bsi['lfeon'];
     if ($thisfile_ac3_raw_bsi['lfeon']) {
         //$info['audio']['channels']++;
         $info['audio']['channels'] .= '.1';
     }
     $thisfile_ac3['channels_enabled'] = self::channelsEnabledLookup($thisfile_ac3_raw_bsi['acmod'], $thisfile_ac3_raw_bsi['lfeon']);
     // This indicates how far the average dialogue level is below digital 100 percent. Valid values are 1-31.
     // The value of 0 is reserved. The values of 1 to 31 are interpreted as -1 dB to -31 dB with respect to digital 100 percent.
     $thisfile_ac3_raw_bsi['dialnorm'] = $this->readHeaderBSI(5);
     $thisfile_ac3['dialogue_normalization'] = '-' . $thisfile_ac3_raw_bsi['dialnorm'] . 'dB';
     $thisfile_ac3_raw_bsi['compre_flag'] = (bool) $this->readHeaderBSI(1);
     if ($thisfile_ac3_raw_bsi['compre_flag']) {
         $thisfile_ac3_raw_bsi['compr'] = $this->readHeaderBSI(8);
         $thisfile_ac3['heavy_compression'] = self::heavyCompression($thisfile_ac3_raw_bsi['compr']);
     }
     $thisfile_ac3_raw_bsi['langcode_flag'] = (bool) $this->readHeaderBSI(1);
     if ($thisfile_ac3_raw_bsi['langcode_flag']) {
         $thisfile_ac3_raw_bsi['langcod'] = $this->readHeaderBSI(8);
     }
     $thisfile_ac3_raw_bsi['audprodie'] = (bool) $this->readHeaderBSI(1);
     if ($thisfile_ac3_raw_bsi['audprodie']) {
         $thisfile_ac3_raw_bsi['mixlevel'] = $this->readHeaderBSI(5);
         $thisfile_ac3_raw_bsi['roomtyp'] = $this->readHeaderBSI(2);
         $thisfile_ac3['mixing_level'] = 80 + $thisfile_ac3_raw_bsi['mixlevel'] . 'dB';
         $thisfile_ac3['room_type'] = self::roomTypeLookup($thisfile_ac3_raw_bsi['roomtyp']);
     }
     if ($thisfile_ac3_raw_bsi['acmod'] == 0x0) {
         // If acmod is 0, then two completely independent program channels (dual mono)
         // are encoded into the bit stream, and are referenced as Ch1, Ch2. In this case,
         // a number of additional items are present in BSI or audblk to fully describe Ch2.
         // This indicates how far the average dialogue level is below digital 100 percent. Valid values are 1-31.
         // The value of 0 is reserved. The values of 1 to 31 are interpreted as -1 dB to -31 dB with respect to digital 100 percent.
         $thisfile_ac3_raw_bsi['dialnorm2'] = $this->readHeaderBSI(5);
         $thisfile_ac3['dialogue_normalization2'] = '-' . $thisfile_ac3_raw_bsi['dialnorm2'] . 'dB';
         $thisfile_ac3_raw_bsi['compre_flag2'] = (bool) $this->readHeaderBSI(1);
         if ($thisfile_ac3_raw_bsi['compre_flag2']) {
             $thisfile_ac3_raw_bsi['compr2'] = $this->readHeaderBSI(8);
             $thisfile_ac3['heavy_compression2'] = self::heavyCompression($thisfile_ac3_raw_bsi['compr2']);
         }
         $thisfile_ac3_raw_bsi['langcode_flag2'] = (bool) $this->readHeaderBSI(1);
         if ($thisfile_ac3_raw_bsi['langcode_flag2']) {
             $thisfile_ac3_raw_bsi['langcod2'] = $this->readHeaderBSI(8);
         }
         $thisfile_ac3_raw_bsi['audprodie2'] = (bool) $this->readHeaderBSI(1);
         if ($thisfile_ac3_raw_bsi['audprodie2']) {
             $thisfile_ac3_raw_bsi['mixlevel2'] = $this->readHeaderBSI(5);
             $thisfile_ac3_raw_bsi['roomtyp2'] = $this->readHeaderBSI(2);
             $thisfile_ac3['mixing_level2'] = 80 + $thisfile_ac3_raw_bsi['mixlevel2'] . 'dB';
             $thisfile_ac3['room_type2'] = self::roomTypeLookup($thisfile_ac3_raw_bsi['roomtyp2']);
         }
     }
     $thisfile_ac3_raw_bsi['copyright'] = (bool) $this->readHeaderBSI(1);
     $thisfile_ac3_raw_bsi['original'] = (bool) $this->readHeaderBSI(1);
     $thisfile_ac3_raw_bsi['timecode1_flag'] = (bool) $this->readHeaderBSI(1);
     if ($thisfile_ac3_raw_bsi['timecode1_flag']) {
         $thisfile_ac3_raw_bsi['timecode1'] = $this->readHeaderBSI(14);
     }
     $thisfile_ac3_raw_bsi['timecode2_flag'] = (bool) $this->readHeaderBSI(1);
     if ($thisfile_ac3_raw_bsi['timecode2_flag']) {
         $thisfile_ac3_raw_bsi['timecode2'] = $this->readHeaderBSI(14);
     }
     $thisfile_ac3_raw_bsi['addbsi_flag'] = (bool) $this->readHeaderBSI(1);
     if ($thisfile_ac3_raw_bsi['addbsi_flag']) {
         $thisfile_ac3_raw_bsi['addbsi_length'] = $this->readHeaderBSI(6);
         $this->AC3header['bsi'] .= Utils::BigEndian2Bin($this->fread($thisfile_ac3_raw_bsi['addbsi_length']));
         $thisfile_ac3_raw_bsi['addbsi_data'] = substr($this->AC3header['bsi'], $this->BSIoffset, $thisfile_ac3_raw_bsi['addbsi_length'] * 8);
         $this->BSIoffset += $thisfile_ac3_raw_bsi['addbsi_length'] * 8;
     }
     return true;
 }
Пример #24
0
 public function ZIPparseLocalFileHeader()
 {
     $LocalFileHeader['offset'] = $this->ftell();
     $ZIPlocalFileHeader = $this->fread(30);
     $LocalFileHeader['raw']['signature'] = Utils::LittleEndian2Int(substr($ZIPlocalFileHeader, 0, 4));
     if ($LocalFileHeader['raw']['signature'] != 0x4034b50) {
         // "PK\x03\x04"
         // invalid Local File Header Signature
         $this->fseek($LocalFileHeader['offset']);
         // seek back to where filepointer originally was so it can be handled properly
         return false;
     }
     $LocalFileHeader['raw']['extract_version'] = Utils::LittleEndian2Int(substr($ZIPlocalFileHeader, 4, 2));
     $LocalFileHeader['raw']['general_flags'] = Utils::LittleEndian2Int(substr($ZIPlocalFileHeader, 6, 2));
     $LocalFileHeader['raw']['compression_method'] = Utils::LittleEndian2Int(substr($ZIPlocalFileHeader, 8, 2));
     $LocalFileHeader['raw']['last_mod_file_time'] = Utils::LittleEndian2Int(substr($ZIPlocalFileHeader, 10, 2));
     $LocalFileHeader['raw']['last_mod_file_date'] = Utils::LittleEndian2Int(substr($ZIPlocalFileHeader, 12, 2));
     $LocalFileHeader['raw']['crc_32'] = Utils::LittleEndian2Int(substr($ZIPlocalFileHeader, 14, 4));
     $LocalFileHeader['raw']['compressed_size'] = Utils::LittleEndian2Int(substr($ZIPlocalFileHeader, 18, 4));
     $LocalFileHeader['raw']['uncompressed_size'] = Utils::LittleEndian2Int(substr($ZIPlocalFileHeader, 22, 4));
     $LocalFileHeader['raw']['filename_length'] = Utils::LittleEndian2Int(substr($ZIPlocalFileHeader, 26, 2));
     $LocalFileHeader['raw']['extra_field_length'] = Utils::LittleEndian2Int(substr($ZIPlocalFileHeader, 28, 2));
     $LocalFileHeader['extract_version'] = sprintf('%1.1f', $LocalFileHeader['raw']['extract_version'] / 10);
     $LocalFileHeader['host_os'] = $this->ZIPversionOSLookup(($LocalFileHeader['raw']['extract_version'] & 0xff00) >> 8);
     $LocalFileHeader['compression_method'] = $this->ZIPcompressionMethodLookup($LocalFileHeader['raw']['compression_method']);
     $LocalFileHeader['compressed_size'] = $LocalFileHeader['raw']['compressed_size'];
     $LocalFileHeader['uncompressed_size'] = $LocalFileHeader['raw']['uncompressed_size'];
     $LocalFileHeader['flags'] = $this->ZIPparseGeneralPurposeFlags($LocalFileHeader['raw']['general_flags'], $LocalFileHeader['raw']['compression_method']);
     $LocalFileHeader['last_modified_timestamp'] = $this->DOStime2UNIXtime($LocalFileHeader['raw']['last_mod_file_date'], $LocalFileHeader['raw']['last_mod_file_time']);
     $FilenameExtrafieldLength = $LocalFileHeader['raw']['filename_length'] + $LocalFileHeader['raw']['extra_field_length'];
     if ($FilenameExtrafieldLength > 0) {
         $ZIPlocalFileHeader .= $this->fread($FilenameExtrafieldLength);
         if ($LocalFileHeader['raw']['filename_length'] > 0) {
             $LocalFileHeader['filename'] = substr($ZIPlocalFileHeader, 30, $LocalFileHeader['raw']['filename_length']);
         }
         if ($LocalFileHeader['raw']['extra_field_length'] > 0) {
             $LocalFileHeader['raw']['extra_field_data'] = substr($ZIPlocalFileHeader, 30 + $LocalFileHeader['raw']['filename_length'], $LocalFileHeader['raw']['extra_field_length']);
         }
     }
     if ($LocalFileHeader['compressed_size'] == 0) {
         // *Could* be a zero-byte file
         // But could also be a file written on the fly that didn't know compressed filesize beforehand.
         // Correct compressed filesize should be in the data_descriptor located after this file data, and also in Central Directory (at end of zip file)
         if (!empty($this->getid3->info['zip']['central_directory'])) {
             foreach ($this->getid3->info['zip']['central_directory'] as $central_directory_entry) {
                 if ($central_directory_entry['entry_offset'] == $LocalFileHeader['offset']) {
                     if ($central_directory_entry['compressed_size'] > 0) {
                         // overwrite local zero value (but not ['raw']'compressed_size']) so that seeking for data_descriptor (and next file entry) works correctly
                         $LocalFileHeader['compressed_size'] = $central_directory_entry['compressed_size'];
                     }
                     break;
                 }
             }
         }
     }
     $LocalFileHeader['data_offset'] = $this->ftell();
     $this->fseek($LocalFileHeader['compressed_size'], SEEK_CUR);
     // this should (but may not) match value in $LocalFileHeader['raw']['compressed_size'] -- $LocalFileHeader['compressed_size'] could have been overwritten above with value from Central Directory
     if ($LocalFileHeader['flags']['data_descriptor_used']) {
         $DataDescriptor = $this->fread(16);
         $LocalFileHeader['data_descriptor']['signature'] = Utils::LittleEndian2Int(substr($DataDescriptor, 0, 4));
         if ($LocalFileHeader['data_descriptor']['signature'] != 0x8074b50) {
             // "PK\x07\x08"
             $this->getid3->warning[] = 'invalid Local File Header Data Descriptor Signature at offset ' . ($this->ftell() - 16) . ' - expecting 08 07 4B 50, found ' . Utils::PrintHexBytes($LocalFileHeader['data_descriptor']['signature']);
             $this->fseek($LocalFileHeader['offset']);
             // seek back to where filepointer originally was so it can be handled properly
             return false;
         }
         $LocalFileHeader['data_descriptor']['crc_32'] = Utils::LittleEndian2Int(substr($DataDescriptor, 4, 4));
         $LocalFileHeader['data_descriptor']['compressed_size'] = Utils::LittleEndian2Int(substr($DataDescriptor, 8, 4));
         $LocalFileHeader['data_descriptor']['uncompressed_size'] = Utils::LittleEndian2Int(substr($DataDescriptor, 12, 4));
         if (!$LocalFileHeader['raw']['compressed_size'] && $LocalFileHeader['data_descriptor']['compressed_size']) {
             foreach ($this->getid3->info['zip']['central_directory'] as $central_directory_entry) {
                 if ($central_directory_entry['entry_offset'] == $LocalFileHeader['offset']) {
                     if ($LocalFileHeader['data_descriptor']['compressed_size'] == $central_directory_entry['compressed_size']) {
                         // $LocalFileHeader['compressed_size'] already set from Central Directory
                     } else {
                         $this->getid3->info['warning'][] = 'conflicting compressed_size from data_descriptor (' . $LocalFileHeader['data_descriptor']['compressed_size'] . ') vs Central Directory (' . $central_directory_entry['compressed_size'] . ') for file at offset ' . $LocalFileHeader['offset'];
                     }
                     if ($LocalFileHeader['data_descriptor']['uncompressed_size'] == $central_directory_entry['uncompressed_size']) {
                         $LocalFileHeader['uncompressed_size'] = $LocalFileHeader['data_descriptor']['uncompressed_size'];
                     } else {
                         $this->getid3->info['warning'][] = 'conflicting uncompressed_size from data_descriptor (' . $LocalFileHeader['data_descriptor']['uncompressed_size'] . ') vs Central Directory (' . $central_directory_entry['uncompressed_size'] . ') for file at offset ' . $LocalFileHeader['offset'];
                     }
                     break;
                 }
             }
         }
     }
     return $LocalFileHeader;
 }
Пример #25
0
 public function Analyze()
 {
     $info =& $this->getid3->info;
     $this->fseek($info['avdataoffset']);
     while (true) {
         $wavpackheader = $this->fread(32);
         if ($this->ftell() >= $info['avdataend']) {
             break;
         } elseif (feof($this->getid3->fp)) {
             break;
         } elseif (isset($info['wavpack']['blockheader']['total_samples']) && isset($info['wavpack']['blockheader']['block_samples']) && $info['wavpack']['blockheader']['total_samples'] > 0 && $info['wavpack']['blockheader']['block_samples'] > 0 && (!isset($info['wavpack']['riff_trailer_size']) || $info['wavpack']['riff_trailer_size'] <= 0) && (isset($info['wavpack']['config_flags']['md5_checksum']) && $info['wavpack']['config_flags']['md5_checksum'] === false || !empty($info['md5_data_source']))) {
             break;
         }
         $blockheader_offset = $this->ftell() - 32;
         $blockheader_magic = substr($wavpackheader, 0, 4);
         $blockheader_size = Utils::LittleEndian2Int(substr($wavpackheader, 4, 4));
         $magic = 'wvpk';
         if ($blockheader_magic != $magic) {
             $info['error'][] = 'Expecting "' . Utils::PrintHexBytes($magic) . '" at offset ' . $blockheader_offset . ', found "' . Utils::PrintHexBytes($blockheader_magic) . '"';
             switch (isset($info['audio']['dataformat']) ? $info['audio']['dataformat'] : '') {
                 case 'wavpack':
                 case 'wvc':
                     break;
                 default:
                     unset($info['fileformat']);
                     unset($info['audio']);
                     unset($info['wavpack']);
                     break;
             }
             return false;
         }
         if (empty($info['wavpack']['blockheader']['block_samples']) || empty($info['wavpack']['blockheader']['total_samples']) || $info['wavpack']['blockheader']['block_samples'] <= 0 || $info['wavpack']['blockheader']['total_samples'] <= 0) {
             // Also, it is possible that the first block might not have
             // any samples (block_samples == 0) and in this case you should skip blocks
             // until you find one with samples because the other information (like
             // total_samples) are not guaranteed to be correct until (block_samples > 0)
             // Finally, I have defined a format for files in which the length is not known
             // (for example when raw files are created using pipes). In these cases
             // total_samples will be -1 and you must seek to the final block to determine
             // the total number of samples.
             $info['audio']['dataformat'] = 'wavpack';
             $info['fileformat'] = 'wavpack';
             $info['audio']['lossless'] = true;
             $info['audio']['bitrate_mode'] = 'vbr';
             $info['wavpack']['blockheader']['offset'] = $blockheader_offset;
             $info['wavpack']['blockheader']['magic'] = $blockheader_magic;
             $info['wavpack']['blockheader']['size'] = $blockheader_size;
             if ($info['wavpack']['blockheader']['size'] >= 0x100000) {
                 $info['error'][] = 'Expecting WavPack block size less than "0x100000", found "' . $info['wavpack']['blockheader']['size'] . '" at offset ' . $info['wavpack']['blockheader']['offset'];
                 switch (isset($info['audio']['dataformat']) ? $info['audio']['dataformat'] : '') {
                     case 'wavpack':
                     case 'wvc':
                         break;
                     default:
                         unset($info['fileformat']);
                         unset($info['audio']);
                         unset($info['wavpack']);
                         break;
                 }
                 return false;
             }
             $info['wavpack']['blockheader']['minor_version'] = ord($wavpackheader[8]);
             $info['wavpack']['blockheader']['major_version'] = ord($wavpackheader[9]);
             if ($info['wavpack']['blockheader']['major_version'] != 4 || $info['wavpack']['blockheader']['minor_version'] < 4 && $info['wavpack']['blockheader']['minor_version'] > 16) {
                 $info['error'][] = 'Expecting WavPack version between "4.2" and "4.16", found version "' . $info['wavpack']['blockheader']['major_version'] . '.' . $info['wavpack']['blockheader']['minor_version'] . '" at offset ' . $info['wavpack']['blockheader']['offset'];
                 switch (isset($info['audio']['dataformat']) ? $info['audio']['dataformat'] : '') {
                     case 'wavpack':
                     case 'wvc':
                         break;
                     default:
                         unset($info['fileformat']);
                         unset($info['audio']);
                         unset($info['wavpack']);
                         break;
                 }
                 return false;
             }
             $info['wavpack']['blockheader']['track_number'] = ord($wavpackheader[10]);
             // unused
             $info['wavpack']['blockheader']['index_number'] = ord($wavpackheader[11]);
             // unused
             $info['wavpack']['blockheader']['total_samples'] = Utils::LittleEndian2Int(substr($wavpackheader, 12, 4));
             $info['wavpack']['blockheader']['block_index'] = Utils::LittleEndian2Int(substr($wavpackheader, 16, 4));
             $info['wavpack']['blockheader']['block_samples'] = Utils::LittleEndian2Int(substr($wavpackheader, 20, 4));
             $info['wavpack']['blockheader']['flags_raw'] = Utils::LittleEndian2Int(substr($wavpackheader, 24, 4));
             $info['wavpack']['blockheader']['crc'] = Utils::LittleEndian2Int(substr($wavpackheader, 28, 4));
             $info['wavpack']['blockheader']['flags']['bytes_per_sample'] = 1 + ($info['wavpack']['blockheader']['flags_raw'] & 0x3);
             $info['wavpack']['blockheader']['flags']['mono'] = (bool) ($info['wavpack']['blockheader']['flags_raw'] & 0x4);
             $info['wavpack']['blockheader']['flags']['hybrid'] = (bool) ($info['wavpack']['blockheader']['flags_raw'] & 0x8);
             $info['wavpack']['blockheader']['flags']['joint_stereo'] = (bool) ($info['wavpack']['blockheader']['flags_raw'] & 0x10);
             $info['wavpack']['blockheader']['flags']['cross_decorrelation'] = (bool) ($info['wavpack']['blockheader']['flags_raw'] & 0x20);
             $info['wavpack']['blockheader']['flags']['hybrid_noiseshape'] = (bool) ($info['wavpack']['blockheader']['flags_raw'] & 0x40);
             $info['wavpack']['blockheader']['flags']['ieee_32bit_float'] = (bool) ($info['wavpack']['blockheader']['flags_raw'] & 0x80);
             $info['wavpack']['blockheader']['flags']['int_32bit'] = (bool) ($info['wavpack']['blockheader']['flags_raw'] & 0x100);
             $info['wavpack']['blockheader']['flags']['hybrid_bitrate_noise'] = (bool) ($info['wavpack']['blockheader']['flags_raw'] & 0x200);
             $info['wavpack']['blockheader']['flags']['hybrid_balance_noise'] = (bool) ($info['wavpack']['blockheader']['flags_raw'] & 0x400);
             $info['wavpack']['blockheader']['flags']['multichannel_initial'] = (bool) ($info['wavpack']['blockheader']['flags_raw'] & 0x800);
             $info['wavpack']['blockheader']['flags']['multichannel_final'] = (bool) ($info['wavpack']['blockheader']['flags_raw'] & 0x1000);
             $info['audio']['lossless'] = !$info['wavpack']['blockheader']['flags']['hybrid'];
         }
         while (!feof($this->getid3->fp) && $this->ftell() < $blockheader_offset + $blockheader_size + 8) {
             $metablock = array('offset' => $this->ftell());
             $metablockheader = $this->fread(2);
             if (feof($this->getid3->fp)) {
                 break;
             }
             $metablock['id'] = ord($metablockheader[0]);
             $metablock['function_id'] = $metablock['id'] & 0x3f;
             $metablock['function_name'] = $this->WavPackMetablockNameLookup($metablock['function_id']);
             // The 0x20 bit in the id of the meta subblocks (which is defined as
             // ID_OPTIONAL_DATA) is a permanent part of the id. The idea is that
             // if a decoder encounters an id that it does not know about, it uses
             // that "ID_OPTIONAL_DATA" flag to determine what to do. If it is set
             // then the decoder simply ignores the metadata, but if it is zero
             // then the decoder should quit because it means that an understanding
             // of the metadata is required to correctly decode the audio.
             $metablock['non_decoder'] = (bool) ($metablock['id'] & 0x20);
             $metablock['padded_data'] = (bool) ($metablock['id'] & 0x40);
             $metablock['large_block'] = (bool) ($metablock['id'] & 0x80);
             if ($metablock['large_block']) {
                 $metablockheader .= $this->fread(2);
             }
             $metablock['size'] = Utils::LittleEndian2Int(substr($metablockheader, 1)) * 2;
             // size is stored in words
             $metablock['data'] = null;
             if ($metablock['size'] > 0) {
                 switch ($metablock['function_id']) {
                     case 0x21:
                         // ID_RIFF_HEADER
                     // ID_RIFF_HEADER
                     case 0x22:
                         // ID_RIFF_TRAILER
                     // ID_RIFF_TRAILER
                     case 0x23:
                         // ID_REPLAY_GAIN
                     // ID_REPLAY_GAIN
                     case 0x24:
                         // ID_CUESHEET
                     // ID_CUESHEET
                     case 0x25:
                         // ID_CONFIG_BLOCK
                     // ID_CONFIG_BLOCK
                     case 0x26:
                         // ID_MD5_CHECKSUM
                         $metablock['data'] = $this->fread($metablock['size']);
                         if ($metablock['padded_data']) {
                             // padded to the nearest even byte
                             $metablock['size']--;
                             $metablock['data'] = substr($metablock['data'], 0, -1);
                         }
                         break;
                     case 0x0:
                         // ID_DUMMY
                     // ID_DUMMY
                     case 0x1:
                         // ID_ENCODER_INFO
                     // ID_ENCODER_INFO
                     case 0x2:
                         // ID_DECORR_TERMS
                     // ID_DECORR_TERMS
                     case 0x3:
                         // ID_DECORR_WEIGHTS
                     // ID_DECORR_WEIGHTS
                     case 0x4:
                         // ID_DECORR_SAMPLES
                     // ID_DECORR_SAMPLES
                     case 0x5:
                         // ID_ENTROPY_VARS
                     // ID_ENTROPY_VARS
                     case 0x6:
                         // ID_HYBRID_PROFILE
                     // ID_HYBRID_PROFILE
                     case 0x7:
                         // ID_SHAPING_WEIGHTS
                     // ID_SHAPING_WEIGHTS
                     case 0x8:
                         // ID_FLOAT_INFO
                     // ID_FLOAT_INFO
                     case 0x9:
                         // ID_INT32_INFO
                     // ID_INT32_INFO
                     case 0xa:
                         // ID_WV_BITSTREAM
                     // ID_WV_BITSTREAM
                     case 0xb:
                         // ID_WVC_BITSTREAM
                     // ID_WVC_BITSTREAM
                     case 0xc:
                         // ID_WVX_BITSTREAM
                     // ID_WVX_BITSTREAM
                     case 0xd:
                         // ID_CHANNEL_INFO
                         $this->fseek($metablock['offset'] + ($metablock['large_block'] ? 4 : 2) + $metablock['size']);
                         break;
                     default:
                         $info['warning'][] = 'Unexpected metablock type "0x' . str_pad(dechex($metablock['function_id']), 2, '0', STR_PAD_LEFT) . '" at offset ' . $metablock['offset'];
                         $this->fseek($metablock['offset'] + ($metablock['large_block'] ? 4 : 2) + $metablock['size']);
                         break;
                 }
                 switch ($metablock['function_id']) {
                     case 0x21:
                         // ID_RIFF_HEADER
                         $original_wav_filesize = Utils::LittleEndian2Int(substr($metablock['data'], 4, 4));
                         $getid3_temp = new GetID3();
                         $getid3_temp->openfile($this->getid3->filename);
                         $getid3_riff = new Riff($getid3_temp);
                         $getid3_riff->ParseRIFFdata($metablock['data']);
                         $metablock['riff'] = $getid3_temp->info['riff'];
                         $info['audio']['sample_rate'] = $getid3_temp->info['riff']['raw']['fmt ']['nSamplesPerSec'];
                         unset($getid3_riff, $getid3_temp);
                         $metablock['riff']['original_filesize'] = $original_wav_filesize;
                         $info['wavpack']['riff_trailer_size'] = $original_wav_filesize - $metablock['riff']['WAVE']['data'][0]['size'] - $metablock['riff']['header_size'];
                         $info['playtime_seconds'] = $info['wavpack']['blockheader']['total_samples'] / $info['audio']['sample_rate'];
                         // Safe RIFF header in case there's a RIFF footer later
                         $metablockRIFFheader = $metablock['data'];
                         break;
                     case 0x22:
                         // ID_RIFF_TRAILER
                         $metablockRIFFfooter = $metablockRIFFheader . $metablock['data'];
                         $startoffset = $metablock['offset'] + ($metablock['large_block'] ? 4 : 2);
                         $getid3_temp = new GetID3();
                         $getid3_temp->openfile($this->getid3->filename);
                         $getid3_temp->info['avdataend'] = $info['avdataend'];
                         //$getid3_temp->info['fileformat'] = 'riff';
                         $getid3_riff = new Riff($getid3_temp);
                         $metablock['riff'] = $getid3_riff->ParseRIFF($startoffset, $startoffset + $metablock['size']);
                         if (!empty($metablock['riff']['INFO'])) {
                             Riff::parseComments($metablock['riff']['INFO'], $metablock['comments']);
                             $info['tags']['riff'] = $metablock['comments'];
                         }
                         unset($getid3_temp, $getid3_riff);
                         break;
                     case 0x23:
                         // ID_REPLAY_GAIN
                         $info['warning'][] = 'WavPack "Replay Gain" contents not yet handled by getID3() in metablock at offset ' . $metablock['offset'];
                         break;
                     case 0x24:
                         // ID_CUESHEET
                         $info['warning'][] = 'WavPack "Cuesheet" contents not yet handled by getID3() in metablock at offset ' . $metablock['offset'];
                         break;
                     case 0x25:
                         // ID_CONFIG_BLOCK
                         $metablock['flags_raw'] = Utils::LittleEndian2Int(substr($metablock['data'], 0, 3));
                         $metablock['flags']['adobe_mode'] = (bool) ($metablock['flags_raw'] & 0x1);
                         // "adobe" mode for 32-bit floats
                         $metablock['flags']['fast_flag'] = (bool) ($metablock['flags_raw'] & 0x2);
                         // fast mode
                         $metablock['flags']['very_fast_flag'] = (bool) ($metablock['flags_raw'] & 0x4);
                         // double fast
                         $metablock['flags']['high_flag'] = (bool) ($metablock['flags_raw'] & 0x8);
                         // high quality mode
                         $metablock['flags']['very_high_flag'] = (bool) ($metablock['flags_raw'] & 0x10);
                         // double high (not used yet)
                         $metablock['flags']['bitrate_kbps'] = (bool) ($metablock['flags_raw'] & 0x20);
                         // bitrate is kbps, not bits / sample
                         $metablock['flags']['auto_shaping'] = (bool) ($metablock['flags_raw'] & 0x40);
                         // automatic noise shaping
                         $metablock['flags']['shape_override'] = (bool) ($metablock['flags_raw'] & 0x80);
                         // shaping mode specified
                         $metablock['flags']['joint_override'] = (bool) ($metablock['flags_raw'] & 0x100);
                         // joint-stereo mode specified
                         $metablock['flags']['copy_time'] = (bool) ($metablock['flags_raw'] & 0x200);
                         // copy file-time from source
                         $metablock['flags']['create_exe'] = (bool) ($metablock['flags_raw'] & 0x400);
                         // create executable
                         $metablock['flags']['create_wvc'] = (bool) ($metablock['flags_raw'] & 0x800);
                         // create correction file
                         $metablock['flags']['optimize_wvc'] = (bool) ($metablock['flags_raw'] & 0x1000);
                         // maximize bybrid compression
                         $metablock['flags']['quality_mode'] = (bool) ($metablock['flags_raw'] & 0x2000);
                         // psychoacoustic quality mode
                         $metablock['flags']['raw_flag'] = (bool) ($metablock['flags_raw'] & 0x4000);
                         // raw mode (not implemented yet)
                         $metablock['flags']['calc_noise'] = (bool) ($metablock['flags_raw'] & 0x8000);
                         // calc noise in hybrid mode
                         $metablock['flags']['lossy_mode'] = (bool) ($metablock['flags_raw'] & 0x10000);
                         // obsolete (for information)
                         $metablock['flags']['extra_mode'] = (bool) ($metablock['flags_raw'] & 0x20000);
                         // extra processing mode
                         $metablock['flags']['skip_wvx'] = (bool) ($metablock['flags_raw'] & 0x40000);
                         // no wvx stream w/ floats & big ints
                         $metablock['flags']['md5_checksum'] = (bool) ($metablock['flags_raw'] & 0x80000);
                         // compute & store MD5 signature
                         $metablock['flags']['quiet_mode'] = (bool) ($metablock['flags_raw'] & 0x100000);
                         // don't report progress %
                         $info['wavpack']['config_flags'] = $metablock['flags'];
                         $info['audio']['encoder_options'] = '';
                         if ($info['wavpack']['blockheader']['flags']['hybrid']) {
                             $info['audio']['encoder_options'] .= ' -b???';
                         }
                         $info['audio']['encoder_options'] .= $metablock['flags']['adobe_mode'] ? ' -a' : '';
                         $info['audio']['encoder_options'] .= $metablock['flags']['optimize_wvc'] ? ' -cc' : '';
                         $info['audio']['encoder_options'] .= $metablock['flags']['create_exe'] ? ' -e' : '';
                         $info['audio']['encoder_options'] .= $metablock['flags']['fast_flag'] ? ' -f' : '';
                         $info['audio']['encoder_options'] .= $metablock['flags']['joint_override'] ? ' -j?' : '';
                         $info['audio']['encoder_options'] .= $metablock['flags']['high_flag'] ? ' -h' : '';
                         $info['audio']['encoder_options'] .= $metablock['flags']['md5_checksum'] ? ' -m' : '';
                         $info['audio']['encoder_options'] .= $metablock['flags']['calc_noise'] ? ' -n' : '';
                         $info['audio']['encoder_options'] .= $metablock['flags']['shape_override'] ? ' -s?' : '';
                         $info['audio']['encoder_options'] .= $metablock['flags']['extra_mode'] ? ' -x?' : '';
                         if (!empty($info['audio']['encoder_options'])) {
                             $info['audio']['encoder_options'] = trim($info['audio']['encoder_options']);
                         } elseif (isset($info['audio']['encoder_options'])) {
                             unset($info['audio']['encoder_options']);
                         }
                         break;
                     case 0x26:
                         // ID_MD5_CHECKSUM
                         if (strlen($metablock['data']) == 16) {
                             $info['md5_data_source'] = strtolower(Utils::PrintHexBytes($metablock['data'], true, false, false));
                         } else {
                             $info['warning'][] = 'Expecting 16 bytes of WavPack "MD5 Checksum" in metablock at offset ' . $metablock['offset'] . ', but found ' . strlen($metablock['data']) . ' bytes';
                         }
                         break;
                     case 0x0:
                         // ID_DUMMY
                     // ID_DUMMY
                     case 0x1:
                         // ID_ENCODER_INFO
                     // ID_ENCODER_INFO
                     case 0x2:
                         // ID_DECORR_TERMS
                     // ID_DECORR_TERMS
                     case 0x3:
                         // ID_DECORR_WEIGHTS
                     // ID_DECORR_WEIGHTS
                     case 0x4:
                         // ID_DECORR_SAMPLES
                     // ID_DECORR_SAMPLES
                     case 0x5:
                         // ID_ENTROPY_VARS
                     // ID_ENTROPY_VARS
                     case 0x6:
                         // ID_HYBRID_PROFILE
                     // ID_HYBRID_PROFILE
                     case 0x7:
                         // ID_SHAPING_WEIGHTS
                     // ID_SHAPING_WEIGHTS
                     case 0x8:
                         // ID_FLOAT_INFO
                     // ID_FLOAT_INFO
                     case 0x9:
                         // ID_INT32_INFO
                     // ID_INT32_INFO
                     case 0xa:
                         // ID_WV_BITSTREAM
                     // ID_WV_BITSTREAM
                     case 0xb:
                         // ID_WVC_BITSTREAM
                     // ID_WVC_BITSTREAM
                     case 0xc:
                         // ID_WVX_BITSTREAM
                     // ID_WVX_BITSTREAM
                     case 0xd:
                         // ID_CHANNEL_INFO
                         unset($metablock);
                         break;
                 }
             }
             if (!empty($metablock)) {
                 $info['wavpack']['metablocks'][] = $metablock;
             }
         }
     }
     $info['audio']['encoder'] = 'WavPack v' . $info['wavpack']['blockheader']['major_version'] . '.' . str_pad($info['wavpack']['blockheader']['minor_version'], 2, '0', STR_PAD_LEFT);
     $info['audio']['bits_per_sample'] = $info['wavpack']['blockheader']['flags']['bytes_per_sample'] * 8;
     $info['audio']['channels'] = $info['wavpack']['blockheader']['flags']['mono'] ? 1 : 2;
     if (!empty($info['playtime_seconds'])) {
         $info['audio']['bitrate'] = ($info['avdataend'] - $info['avdataoffset']) * 8 / $info['playtime_seconds'];
     } else {
         $info['audio']['dataformat'] = 'wvc';
     }
     return true;
 }
Пример #26
0
 public function Analyze()
 {
     $info =& $this->getid3->info;
     // shortcuts
     $info['bmp']['header']['raw'] = array();
     $thisfile_bmp =& $info['bmp'];
     $thisfile_bmp_header =& $thisfile_bmp['header'];
     $thisfile_bmp_header_raw =& $thisfile_bmp_header['raw'];
     // BITMAPFILEHEADER [14 bytes] - http://msdn.microsoft.com/library/en-us/gdi/bitmaps_62uq.asp
     // all versions
     // WORD    bfType;
     // DWORD   bfSize;
     // WORD    bfReserved1;
     // WORD    bfReserved2;
     // DWORD   bfOffBits;
     $this->fseek($info['avdataoffset']);
     $offset = 0;
     $BMPheader = $this->fread(14 + 40);
     $thisfile_bmp_header_raw['identifier'] = substr($BMPheader, $offset, 2);
     $offset += 2;
     $magic = 'BM';
     if ($thisfile_bmp_header_raw['identifier'] != $magic) {
         $info['error'][] = 'Expecting "' . Utils::PrintHexBytes($magic) . '" at offset ' . $info['avdataoffset'] . ', found "' . Utils::PrintHexBytes($thisfile_bmp_header_raw['identifier']) . '"';
         unset($info['fileformat']);
         unset($info['bmp']);
         return false;
     }
     $thisfile_bmp_header_raw['filesize'] = Utils::LittleEndian2Int(substr($BMPheader, $offset, 4));
     $offset += 4;
     $thisfile_bmp_header_raw['reserved1'] = Utils::LittleEndian2Int(substr($BMPheader, $offset, 2));
     $offset += 2;
     $thisfile_bmp_header_raw['reserved2'] = Utils::LittleEndian2Int(substr($BMPheader, $offset, 2));
     $offset += 2;
     $thisfile_bmp_header_raw['data_offset'] = Utils::LittleEndian2Int(substr($BMPheader, $offset, 4));
     $offset += 4;
     $thisfile_bmp_header_raw['header_size'] = Utils::LittleEndian2Int(substr($BMPheader, $offset, 4));
     $offset += 4;
     // check if the hardcoded-to-1 "planes" is at offset 22 or 26
     $planes22 = Utils::LittleEndian2Int(substr($BMPheader, 22, 2));
     $planes26 = Utils::LittleEndian2Int(substr($BMPheader, 26, 2));
     if ($planes22 == 1 && $planes26 != 1) {
         $thisfile_bmp['type_os'] = 'OS/2';
         $thisfile_bmp['type_version'] = 1;
     } elseif ($planes26 == 1 && $planes22 != 1) {
         $thisfile_bmp['type_os'] = 'Windows';
         $thisfile_bmp['type_version'] = 1;
     } elseif ($thisfile_bmp_header_raw['header_size'] == 12) {
         $thisfile_bmp['type_os'] = 'OS/2';
         $thisfile_bmp['type_version'] = 1;
     } elseif ($thisfile_bmp_header_raw['header_size'] == 40) {
         $thisfile_bmp['type_os'] = 'Windows';
         $thisfile_bmp['type_version'] = 1;
     } elseif ($thisfile_bmp_header_raw['header_size'] == 84) {
         $thisfile_bmp['type_os'] = 'Windows';
         $thisfile_bmp['type_version'] = 4;
     } elseif ($thisfile_bmp_header_raw['header_size'] == 100) {
         $thisfile_bmp['type_os'] = 'Windows';
         $thisfile_bmp['type_version'] = 5;
     } else {
         $info['error'][] = 'Unknown BMP subtype (or not a BMP file)';
         unset($info['fileformat']);
         unset($info['bmp']);
         return false;
     }
     $info['fileformat'] = 'bmp';
     $info['video']['dataformat'] = 'bmp';
     $info['video']['lossless'] = true;
     $info['video']['pixel_aspect_ratio'] = (double) 1;
     if ($thisfile_bmp['type_os'] == 'OS/2') {
         // OS/2-format BMP
         // http://netghost.narod.ru/gff/graphics/summary/os2bmp.htm
         // DWORD  Size;             /* Size of this structure in bytes */
         // DWORD  Width;            /* Bitmap width in pixels */
         // DWORD  Height;           /* Bitmap height in pixel */
         // WORD   NumPlanes;        /* Number of bit planes (color depth) */
         // WORD   BitsPerPixel;     /* Number of bits per pixel per plane */
         $thisfile_bmp_header_raw['width'] = Utils::LittleEndian2Int(substr($BMPheader, $offset, 2));
         $offset += 2;
         $thisfile_bmp_header_raw['height'] = Utils::LittleEndian2Int(substr($BMPheader, $offset, 2));
         $offset += 2;
         $thisfile_bmp_header_raw['planes'] = Utils::LittleEndian2Int(substr($BMPheader, $offset, 2));
         $offset += 2;
         $thisfile_bmp_header_raw['bits_per_pixel'] = Utils::LittleEndian2Int(substr($BMPheader, $offset, 2));
         $offset += 2;
         $info['video']['resolution_x'] = $thisfile_bmp_header_raw['width'];
         $info['video']['resolution_y'] = $thisfile_bmp_header_raw['height'];
         $info['video']['codec'] = 'BI_RGB ' . $thisfile_bmp_header_raw['bits_per_pixel'] . '-bit';
         $info['video']['bits_per_sample'] = $thisfile_bmp_header_raw['bits_per_pixel'];
         if ($thisfile_bmp['type_version'] >= 2) {
             // DWORD  Compression;      /* Bitmap compression scheme */
             // DWORD  ImageDataSize;    /* Size of bitmap data in bytes */
             // DWORD  XResolution;      /* X resolution of display device */
             // DWORD  YResolution;      /* Y resolution of display device */
             // DWORD  ColorsUsed;       /* Number of color table indices used */
             // DWORD  ColorsImportant;  /* Number of important color indices */
             // WORD   Units;            /* Type of units used to measure resolution */
             // WORD   Reserved;         /* Pad structure to 4-byte boundary */
             // WORD   Recording;        /* Recording algorithm */
             // WORD   Rendering;        /* Halftoning algorithm used */
             // DWORD  Size1;            /* Reserved for halftoning algorithm use */
             // DWORD  Size2;            /* Reserved for halftoning algorithm use */
             // DWORD  ColorEncoding;    /* Color model used in bitmap */
             // DWORD  Identifier;       /* Reserved for application use */
             $thisfile_bmp_header_raw['compression'] = Utils::LittleEndian2Int(substr($BMPheader, $offset, 4));
             $offset += 4;
             $thisfile_bmp_header_raw['bmp_data_size'] = Utils::LittleEndian2Int(substr($BMPheader, $offset, 4));
             $offset += 4;
             $thisfile_bmp_header_raw['resolution_h'] = Utils::LittleEndian2Int(substr($BMPheader, $offset, 4));
             $offset += 4;
             $thisfile_bmp_header_raw['resolution_v'] = Utils::LittleEndian2Int(substr($BMPheader, $offset, 4));
             $offset += 4;
             $thisfile_bmp_header_raw['colors_used'] = Utils::LittleEndian2Int(substr($BMPheader, $offset, 4));
             $offset += 4;
             $thisfile_bmp_header_raw['colors_important'] = Utils::LittleEndian2Int(substr($BMPheader, $offset, 4));
             $offset += 4;
             $thisfile_bmp_header_raw['resolution_units'] = Utils::LittleEndian2Int(substr($BMPheader, $offset, 2));
             $offset += 2;
             $thisfile_bmp_header_raw['reserved1'] = Utils::LittleEndian2Int(substr($BMPheader, $offset, 2));
             $offset += 2;
             $thisfile_bmp_header_raw['recording'] = Utils::LittleEndian2Int(substr($BMPheader, $offset, 2));
             $offset += 2;
             $thisfile_bmp_header_raw['rendering'] = Utils::LittleEndian2Int(substr($BMPheader, $offset, 2));
             $offset += 2;
             $thisfile_bmp_header_raw['size1'] = Utils::LittleEndian2Int(substr($BMPheader, $offset, 4));
             $offset += 4;
             $thisfile_bmp_header_raw['size2'] = Utils::LittleEndian2Int(substr($BMPheader, $offset, 4));
             $offset += 4;
             $thisfile_bmp_header_raw['color_encoding'] = Utils::LittleEndian2Int(substr($BMPheader, $offset, 4));
             $offset += 4;
             $thisfile_bmp_header_raw['identifier'] = Utils::LittleEndian2Int(substr($BMPheader, $offset, 4));
             $offset += 4;
             $thisfile_bmp_header['compression'] = $this->BMPcompressionOS2Lookup($thisfile_bmp_header_raw['compression']);
             $info['video']['codec'] = $thisfile_bmp_header['compression'] . ' ' . $thisfile_bmp_header_raw['bits_per_pixel'] . '-bit';
         }
     } elseif ($thisfile_bmp['type_os'] == 'Windows') {
         // Windows-format BMP
         // BITMAPINFOHEADER - [40 bytes] http://msdn.microsoft.com/library/en-us/gdi/bitmaps_1rw2.asp
         // all versions
         // DWORD  biSize;
         // LONG   biWidth;
         // LONG   biHeight;
         // WORD   biPlanes;
         // WORD   biBitCount;
         // DWORD  biCompression;
         // DWORD  biSizeImage;
         // LONG   biXPelsPerMeter;
         // LONG   biYPelsPerMeter;
         // DWORD  biClrUsed;
         // DWORD  biClrImportant;
         // possibly integrate this section and module.audio-video.riff.php::ParseBITMAPINFOHEADER() ?
         $thisfile_bmp_header_raw['width'] = Utils::LittleEndian2Int(substr($BMPheader, $offset, 4), true);
         $offset += 4;
         $thisfile_bmp_header_raw['height'] = Utils::LittleEndian2Int(substr($BMPheader, $offset, 4), true);
         $offset += 4;
         $thisfile_bmp_header_raw['planes'] = Utils::LittleEndian2Int(substr($BMPheader, $offset, 2));
         $offset += 2;
         $thisfile_bmp_header_raw['bits_per_pixel'] = Utils::LittleEndian2Int(substr($BMPheader, $offset, 2));
         $offset += 2;
         $thisfile_bmp_header_raw['compression'] = Utils::LittleEndian2Int(substr($BMPheader, $offset, 4));
         $offset += 4;
         $thisfile_bmp_header_raw['bmp_data_size'] = Utils::LittleEndian2Int(substr($BMPheader, $offset, 4));
         $offset += 4;
         $thisfile_bmp_header_raw['resolution_h'] = Utils::LittleEndian2Int(substr($BMPheader, $offset, 4), true);
         $offset += 4;
         $thisfile_bmp_header_raw['resolution_v'] = Utils::LittleEndian2Int(substr($BMPheader, $offset, 4), true);
         $offset += 4;
         $thisfile_bmp_header_raw['colors_used'] = Utils::LittleEndian2Int(substr($BMPheader, $offset, 4));
         $offset += 4;
         $thisfile_bmp_header_raw['colors_important'] = Utils::LittleEndian2Int(substr($BMPheader, $offset, 4));
         $offset += 4;
         $thisfile_bmp_header['compression'] = $this->BMPcompressionWindowsLookup($thisfile_bmp_header_raw['compression']);
         $info['video']['resolution_x'] = $thisfile_bmp_header_raw['width'];
         $info['video']['resolution_y'] = $thisfile_bmp_header_raw['height'];
         $info['video']['codec'] = $thisfile_bmp_header['compression'] . ' ' . $thisfile_bmp_header_raw['bits_per_pixel'] . '-bit';
         $info['video']['bits_per_sample'] = $thisfile_bmp_header_raw['bits_per_pixel'];
         if ($thisfile_bmp['type_version'] >= 4 || $thisfile_bmp_header_raw['compression'] == 3) {
             // should only be v4+, but BMPs with type_version==1 and BI_BITFIELDS compression have been seen
             $BMPheader .= $this->fread(44);
             // BITMAPV4HEADER - [44 bytes] - http://msdn.microsoft.com/library/en-us/gdi/bitmaps_2k1e.asp
             // Win95+, WinNT4.0+
             // DWORD        bV4RedMask;
             // DWORD        bV4GreenMask;
             // DWORD        bV4BlueMask;
             // DWORD        bV4AlphaMask;
             // DWORD        bV4CSType;
             // CIEXYZTRIPLE bV4Endpoints;
             // DWORD        bV4GammaRed;
             // DWORD        bV4GammaGreen;
             // DWORD        bV4GammaBlue;
             $thisfile_bmp_header_raw['red_mask'] = Utils::LittleEndian2Int(substr($BMPheader, $offset, 4));
             $offset += 4;
             $thisfile_bmp_header_raw['green_mask'] = Utils::LittleEndian2Int(substr($BMPheader, $offset, 4));
             $offset += 4;
             $thisfile_bmp_header_raw['blue_mask'] = Utils::LittleEndian2Int(substr($BMPheader, $offset, 4));
             $offset += 4;
             $thisfile_bmp_header_raw['alpha_mask'] = Utils::LittleEndian2Int(substr($BMPheader, $offset, 4));
             $offset += 4;
             $thisfile_bmp_header_raw['cs_type'] = Utils::LittleEndian2Int(substr($BMPheader, $offset, 4));
             $offset += 4;
             $thisfile_bmp_header_raw['ciexyz_red'] = substr($BMPheader, $offset, 4);
             $offset += 4;
             $thisfile_bmp_header_raw['ciexyz_green'] = substr($BMPheader, $offset, 4);
             $offset += 4;
             $thisfile_bmp_header_raw['ciexyz_blue'] = substr($BMPheader, $offset, 4);
             $offset += 4;
             $thisfile_bmp_header_raw['gamma_red'] = Utils::LittleEndian2Int(substr($BMPheader, $offset, 4));
             $offset += 4;
             $thisfile_bmp_header_raw['gamma_green'] = Utils::LittleEndian2Int(substr($BMPheader, $offset, 4));
             $offset += 4;
             $thisfile_bmp_header_raw['gamma_blue'] = Utils::LittleEndian2Int(substr($BMPheader, $offset, 4));
             $offset += 4;
             $thisfile_bmp_header['ciexyz_red'] = Utils::FixedPoint2_30(strrev($thisfile_bmp_header_raw['ciexyz_red']));
             $thisfile_bmp_header['ciexyz_green'] = Utils::FixedPoint2_30(strrev($thisfile_bmp_header_raw['ciexyz_green']));
             $thisfile_bmp_header['ciexyz_blue'] = Utils::FixedPoint2_30(strrev($thisfile_bmp_header_raw['ciexyz_blue']));
         }
         if ($thisfile_bmp['type_version'] >= 5) {
             $BMPheader .= $this->fread(16);
             // BITMAPV5HEADER - [16 bytes] - http://msdn.microsoft.com/library/en-us/gdi/bitmaps_7c36.asp
             // Win98+, Win2000+
             // DWORD        bV5Intent;
             // DWORD        bV5ProfileData;
             // DWORD        bV5ProfileSize;
             // DWORD        bV5Reserved;
             $thisfile_bmp_header_raw['intent'] = Utils::LittleEndian2Int(substr($BMPheader, $offset, 4));
             $offset += 4;
             $thisfile_bmp_header_raw['profile_data_offset'] = Utils::LittleEndian2Int(substr($BMPheader, $offset, 4));
             $offset += 4;
             $thisfile_bmp_header_raw['profile_data_size'] = Utils::LittleEndian2Int(substr($BMPheader, $offset, 4));
             $offset += 4;
             $thisfile_bmp_header_raw['reserved3'] = Utils::LittleEndian2Int(substr($BMPheader, $offset, 4));
             $offset += 4;
         }
     } else {
         $info['error'][] = 'Unknown BMP format in header.';
         return false;
     }
     if ($this->ExtractPalette || $this->ExtractData) {
         $PaletteEntries = 0;
         if ($thisfile_bmp_header_raw['bits_per_pixel'] < 16) {
             $PaletteEntries = pow(2, $thisfile_bmp_header_raw['bits_per_pixel']);
         } elseif (isset($thisfile_bmp_header_raw['colors_used']) && $thisfile_bmp_header_raw['colors_used'] > 0 && $thisfile_bmp_header_raw['colors_used'] <= 256) {
             $PaletteEntries = $thisfile_bmp_header_raw['colors_used'];
         }
         if ($PaletteEntries > 0) {
             $BMPpalette = $this->fread(4 * $PaletteEntries);
             $paletteoffset = 0;
             for ($i = 0; $i < $PaletteEntries; $i++) {
                 // RGBQUAD          - http://msdn.microsoft.com/library/en-us/gdi/bitmaps_5f8y.asp
                 // BYTE    rgbBlue;
                 // BYTE    rgbGreen;
                 // BYTE    rgbRed;
                 // BYTE    rgbReserved;
                 $blue = Utils::LittleEndian2Int(substr($BMPpalette, $paletteoffset++, 1));
                 $green = Utils::LittleEndian2Int(substr($BMPpalette, $paletteoffset++, 1));
                 $red = Utils::LittleEndian2Int(substr($BMPpalette, $paletteoffset++, 1));
                 if ($thisfile_bmp['type_os'] == 'OS/2' && $thisfile_bmp['type_version'] == 1) {
                     // no padding byte
                 } else {
                     $paletteoffset++;
                     // padding byte
                 }
                 $thisfile_bmp['palette'][$i] = $red << 16 | $green << 8 | $blue;
             }
         }
     }
     if ($this->ExtractData) {
         $this->fseek($thisfile_bmp_header_raw['data_offset']);
         $RowByteLength = ceil($thisfile_bmp_header_raw['width'] * ($thisfile_bmp_header_raw['bits_per_pixel'] / 8) / 4) * 4;
         // round up to nearest DWORD boundry
         $BMPpixelData = $this->fread($thisfile_bmp_header_raw['height'] * $RowByteLength);
         $pixeldataoffset = 0;
         $thisfile_bmp_header_raw['compression'] = isset($thisfile_bmp_header_raw['compression']) ? $thisfile_bmp_header_raw['compression'] : '';
         switch ($thisfile_bmp_header_raw['compression']) {
             case 0:
                 // BI_RGB
                 switch ($thisfile_bmp_header_raw['bits_per_pixel']) {
                     case 1:
                         for ($row = $thisfile_bmp_header_raw['height'] - 1; $row >= 0; $row--) {
                             for ($col = 0; $col < $thisfile_bmp_header_raw['width']; $col = $col) {
                                 $paletteindexbyte = ord($BMPpixelData[$pixeldataoffset++]);
                                 for ($i = 7; $i >= 0; $i--) {
                                     $paletteindex = ($paletteindexbyte & 0x1 << $i) >> $i;
                                     $thisfile_bmp['data'][$row][$col] = $thisfile_bmp['palette'][$paletteindex];
                                     $col++;
                                 }
                             }
                             while ($pixeldataoffset % 4 != 0) {
                                 // lines are padded to nearest DWORD
                                 $pixeldataoffset++;
                             }
                         }
                         break;
                     case 4:
                         for ($row = $thisfile_bmp_header_raw['height'] - 1; $row >= 0; $row--) {
                             for ($col = 0; $col < $thisfile_bmp_header_raw['width']; $col = $col) {
                                 $paletteindexbyte = ord($BMPpixelData[$pixeldataoffset++]);
                                 for ($i = 1; $i >= 0; $i--) {
                                     $paletteindex = ($paletteindexbyte & 0xf << 4 * $i) >> 4 * $i;
                                     $thisfile_bmp['data'][$row][$col] = $thisfile_bmp['palette'][$paletteindex];
                                     $col++;
                                 }
                             }
                             while ($pixeldataoffset % 4 != 0) {
                                 // lines are padded to nearest DWORD
                                 $pixeldataoffset++;
                             }
                         }
                         break;
                     case 8:
                         for ($row = $thisfile_bmp_header_raw['height'] - 1; $row >= 0; $row--) {
                             for ($col = 0; $col < $thisfile_bmp_header_raw['width']; $col++) {
                                 $paletteindex = ord($BMPpixelData[$pixeldataoffset++]);
                                 $thisfile_bmp['data'][$row][$col] = $thisfile_bmp['palette'][$paletteindex];
                             }
                             while ($pixeldataoffset % 4 != 0) {
                                 // lines are padded to nearest DWORD
                                 $pixeldataoffset++;
                             }
                         }
                         break;
                     case 24:
                         for ($row = $thisfile_bmp_header_raw['height'] - 1; $row >= 0; $row--) {
                             for ($col = 0; $col < $thisfile_bmp_header_raw['width']; $col++) {
                                 $thisfile_bmp['data'][$row][$col] = ord($BMPpixelData[$pixeldataoffset + 2]) << 16 | ord($BMPpixelData[$pixeldataoffset + 1]) << 8 | ord($BMPpixelData[$pixeldataoffset]);
                                 $pixeldataoffset += 3;
                             }
                             while ($pixeldataoffset % 4 != 0) {
                                 // lines are padded to nearest DWORD
                                 $pixeldataoffset++;
                             }
                         }
                         break;
                     case 32:
                         for ($row = $thisfile_bmp_header_raw['height'] - 1; $row >= 0; $row--) {
                             for ($col = 0; $col < $thisfile_bmp_header_raw['width']; $col++) {
                                 $thisfile_bmp['data'][$row][$col] = ord($BMPpixelData[$pixeldataoffset + 3]) << 24 | ord($BMPpixelData[$pixeldataoffset + 2]) << 16 | ord($BMPpixelData[$pixeldataoffset + 1]) << 8 | ord($BMPpixelData[$pixeldataoffset]);
                                 $pixeldataoffset += 4;
                             }
                             while ($pixeldataoffset % 4 != 0) {
                                 // lines are padded to nearest DWORD
                                 $pixeldataoffset++;
                             }
                         }
                         break;
                     case 16:
                         // ?
                         break;
                     default:
                         $info['error'][] = 'Unknown bits-per-pixel value (' . $thisfile_bmp_header_raw['bits_per_pixel'] . ') - cannot read pixel data';
                         break;
                 }
                 break;
             case 1:
                 // BI_RLE8 - http://msdn.microsoft.com/library/en-us/gdi/bitmaps_6x0u.asp
                 switch ($thisfile_bmp_header_raw['bits_per_pixel']) {
                     case 8:
                         $pixelcounter = 0;
                         while ($pixeldataoffset < strlen($BMPpixelData)) {
                             $firstbyte = Utils::LittleEndian2Int(substr($BMPpixelData, $pixeldataoffset++, 1));
                             $secondbyte = Utils::LittleEndian2Int(substr($BMPpixelData, $pixeldataoffset++, 1));
                             if ($firstbyte == 0) {
                                 // escaped/absolute mode - the first byte of the pair can be set to zero to
                                 // indicate an escape character that denotes the end of a line, the end of
                                 // a bitmap, or a delta, depending on the value of the second byte.
                                 switch ($secondbyte) {
                                     case 0:
                                         // end of line
                                         // no need for special processing, just ignore
                                         break;
                                     case 1:
                                         // end of bitmap
                                         $pixeldataoffset = strlen($BMPpixelData);
                                         // force to exit loop just in case
                                         break;
                                     case 2:
                                         // delta - The 2 bytes following the escape contain unsigned values
                                         // indicating the horizontal and vertical offsets of the next pixel
                                         // from the current position.
                                         $colincrement = Utils::LittleEndian2Int(substr($BMPpixelData, $pixeldataoffset++, 1));
                                         $rowincrement = Utils::LittleEndian2Int(substr($BMPpixelData, $pixeldataoffset++, 1));
                                         $col = $pixelcounter % $thisfile_bmp_header_raw['width'] + $colincrement;
                                         $row = $thisfile_bmp_header_raw['height'] - 1 - ($pixelcounter - $col) / $thisfile_bmp_header_raw['width'] - $rowincrement;
                                         $pixelcounter = $row * $thisfile_bmp_header_raw['width'] + $col;
                                         break;
                                     default:
                                         // In absolute mode, the first byte is zero and the second byte is a
                                         // value in the range 03H through FFH. The second byte represents the
                                         // number of bytes that follow, each of which contains the color index
                                         // of a single pixel. Each run must be aligned on a word boundary.
                                         for ($i = 0; $i < $secondbyte; $i++) {
                                             $paletteindex = Utils::LittleEndian2Int(substr($BMPpixelData, $pixeldataoffset++, 1));
                                             $col = $pixelcounter % $thisfile_bmp_header_raw['width'];
                                             $row = $thisfile_bmp_header_raw['height'] - 1 - ($pixelcounter - $col) / $thisfile_bmp_header_raw['width'];
                                             $thisfile_bmp['data'][$row][$col] = $thisfile_bmp['palette'][$paletteindex];
                                             $pixelcounter++;
                                         }
                                         while ($pixeldataoffset % 2 != 0) {
                                             // Each run must be aligned on a word boundary.
                                             $pixeldataoffset++;
                                         }
                                         break;
                                 }
                             } else {
                                 // encoded mode - the first byte specifies the number of consecutive pixels
                                 // to be drawn using the color index contained in the second byte.
                                 for ($i = 0; $i < $firstbyte; $i++) {
                                     $col = $pixelcounter % $thisfile_bmp_header_raw['width'];
                                     $row = $thisfile_bmp_header_raw['height'] - 1 - ($pixelcounter - $col) / $thisfile_bmp_header_raw['width'];
                                     $thisfile_bmp['data'][$row][$col] = $thisfile_bmp['palette'][$secondbyte];
                                     $pixelcounter++;
                                 }
                             }
                         }
                         break;
                     default:
                         $info['error'][] = 'Unknown bits-per-pixel value (' . $thisfile_bmp_header_raw['bits_per_pixel'] . ') - cannot read pixel data';
                         break;
                 }
                 break;
             case 2:
                 // BI_RLE4 - http://msdn.microsoft.com/library/en-us/gdi/bitmaps_6x0u.asp
                 switch ($thisfile_bmp_header_raw['bits_per_pixel']) {
                     case 4:
                         $pixelcounter = 0;
                         while ($pixeldataoffset < strlen($BMPpixelData)) {
                             $firstbyte = Utils::LittleEndian2Int(substr($BMPpixelData, $pixeldataoffset++, 1));
                             $secondbyte = Utils::LittleEndian2Int(substr($BMPpixelData, $pixeldataoffset++, 1));
                             if ($firstbyte == 0) {
                                 // escaped/absolute mode - the first byte of the pair can be set to zero to
                                 // indicate an escape character that denotes the end of a line, the end of
                                 // a bitmap, or a delta, depending on the value of the second byte.
                                 switch ($secondbyte) {
                                     case 0:
                                         // end of line
                                         // no need for special processing, just ignore
                                         break;
                                     case 1:
                                         // end of bitmap
                                         $pixeldataoffset = strlen($BMPpixelData);
                                         // force to exit loop just in case
                                         break;
                                     case 2:
                                         // delta - The 2 bytes following the escape contain unsigned values
                                         // indicating the horizontal and vertical offsets of the next pixel
                                         // from the current position.
                                         $colincrement = Utils::LittleEndian2Int(substr($BMPpixelData, $pixeldataoffset++, 1));
                                         $rowincrement = Utils::LittleEndian2Int(substr($BMPpixelData, $pixeldataoffset++, 1));
                                         $col = $pixelcounter % $thisfile_bmp_header_raw['width'] + $colincrement;
                                         $row = $thisfile_bmp_header_raw['height'] - 1 - ($pixelcounter - $col) / $thisfile_bmp_header_raw['width'] - $rowincrement;
                                         $pixelcounter = $row * $thisfile_bmp_header_raw['width'] + $col;
                                         break;
                                     default:
                                         // In absolute mode, the first byte is zero. The second byte contains the number
                                         // of color indexes that follow. Subsequent bytes contain color indexes in their
                                         // high- and low-order 4 bits, one color index for each pixel. In absolute mode,
                                         // each run must be aligned on a word boundary.
                                         unset($paletteindexes);
                                         for ($i = 0; $i < ceil($secondbyte / 2); $i++) {
                                             $paletteindexbyte = Utils::LittleEndian2Int(substr($BMPpixelData, $pixeldataoffset++, 1));
                                             $paletteindexes[] = ($paletteindexbyte & 0xf0) >> 4;
                                             $paletteindexes[] = $paletteindexbyte & 0xf;
                                         }
                                         while ($pixeldataoffset % 2 != 0) {
                                             // Each run must be aligned on a word boundary.
                                             $pixeldataoffset++;
                                         }
                                         foreach ($paletteindexes as $paletteindex) {
                                             $col = $pixelcounter % $thisfile_bmp_header_raw['width'];
                                             $row = $thisfile_bmp_header_raw['height'] - 1 - ($pixelcounter - $col) / $thisfile_bmp_header_raw['width'];
                                             $thisfile_bmp['data'][$row][$col] = $thisfile_bmp['palette'][$paletteindex];
                                             $pixelcounter++;
                                         }
                                         break;
                                 }
                             } else {
                                 // encoded mode - the first byte of the pair contains the number of pixels to be
                                 // drawn using the color indexes in the second byte. The second byte contains two
                                 // color indexes, one in its high-order 4 bits and one in its low-order 4 bits.
                                 // The first of the pixels is drawn using the color specified by the high-order
                                 // 4 bits, the second is drawn using the color in the low-order 4 bits, the third
                                 // is drawn using the color in the high-order 4 bits, and so on, until all the
                                 // pixels specified by the first byte have been drawn.
                                 $paletteindexes[0] = ($secondbyte & 0xf0) >> 4;
                                 $paletteindexes[1] = $secondbyte & 0xf;
                                 for ($i = 0; $i < $firstbyte; $i++) {
                                     $col = $pixelcounter % $thisfile_bmp_header_raw['width'];
                                     $row = $thisfile_bmp_header_raw['height'] - 1 - ($pixelcounter - $col) / $thisfile_bmp_header_raw['width'];
                                     $thisfile_bmp['data'][$row][$col] = $thisfile_bmp['palette'][$paletteindexes[$i % 2]];
                                     $pixelcounter++;
                                 }
                             }
                         }
                         break;
                     default:
                         $info['error'][] = 'Unknown bits-per-pixel value (' . $thisfile_bmp_header_raw['bits_per_pixel'] . ') - cannot read pixel data';
                         break;
                 }
                 break;
             case 3:
                 // BI_BITFIELDS
                 switch ($thisfile_bmp_header_raw['bits_per_pixel']) {
                     case 16:
                     case 32:
                         $redshift = 0;
                         $greenshift = 0;
                         $blueshift = 0;
                         while (($thisfile_bmp_header_raw['red_mask'] >> $redshift & 0x1) == 0) {
                             $redshift++;
                         }
                         while (($thisfile_bmp_header_raw['green_mask'] >> $greenshift & 0x1) == 0) {
                             $greenshift++;
                         }
                         while (($thisfile_bmp_header_raw['blue_mask'] >> $blueshift & 0x1) == 0) {
                             $blueshift++;
                         }
                         for ($row = $thisfile_bmp_header_raw['height'] - 1; $row >= 0; $row--) {
                             for ($col = 0; $col < $thisfile_bmp_header_raw['width']; $col++) {
                                 $pixelvalue = Utils::LittleEndian2Int(substr($BMPpixelData, $pixeldataoffset, $thisfile_bmp_header_raw['bits_per_pixel'] / 8));
                                 $pixeldataoffset += $thisfile_bmp_header_raw['bits_per_pixel'] / 8;
                                 $red = intval(round((($pixelvalue & $thisfile_bmp_header_raw['red_mask']) >> $redshift) / ($thisfile_bmp_header_raw['red_mask'] >> $redshift) * 255));
                                 $green = intval(round((($pixelvalue & $thisfile_bmp_header_raw['green_mask']) >> $greenshift) / ($thisfile_bmp_header_raw['green_mask'] >> $greenshift) * 255));
                                 $blue = intval(round((($pixelvalue & $thisfile_bmp_header_raw['blue_mask']) >> $blueshift) / ($thisfile_bmp_header_raw['blue_mask'] >> $blueshift) * 255));
                                 $thisfile_bmp['data'][$row][$col] = $red << 16 | $green << 8 | $blue;
                             }
                             while ($pixeldataoffset % 4 != 0) {
                                 // lines are padded to nearest DWORD
                                 $pixeldataoffset++;
                             }
                         }
                         break;
                     default:
                         $info['error'][] = 'Unknown bits-per-pixel value (' . $thisfile_bmp_header_raw['bits_per_pixel'] . ') - cannot read pixel data';
                         break;
                 }
                 break;
             default:
                 // unhandled compression type
                 $info['error'][] = 'Unknown/unhandled compression type value (' . $thisfile_bmp_header_raw['compression'] . ') - cannot decompress pixel data';
                 break;
         }
     }
     return true;
 }
Пример #27
0
 public function Analyze()
 {
     $info =& $this->getid3->info;
     $offset = 0;
     $this->fseek($info['avdataoffset']);
     $rawdata = $this->fread($this->getid3->fread_buffer_size());
     switch (substr($rawdata, $offset, 4)) {
         case 'LA02':
         case 'LA03':
         case 'LA04':
             $info['fileformat'] = 'la';
             $info['audio']['dataformat'] = 'la';
             $info['audio']['lossless'] = true;
             $info['la']['version_major'] = (int) substr($rawdata, $offset + 2, 1);
             $info['la']['version_minor'] = (int) substr($rawdata, $offset + 3, 1);
             $info['la']['version'] = (double) $info['la']['version_major'] + $info['la']['version_minor'] / 10;
             $offset += 4;
             $info['la']['uncompressed_size'] = Utils::LittleEndian2Int(substr($rawdata, $offset, 4));
             $offset += 4;
             if ($info['la']['uncompressed_size'] == 0) {
                 $info['error'][] = 'Corrupt LA file: uncompressed_size == zero';
                 return false;
             }
             $WAVEchunk = substr($rawdata, $offset, 4);
             if ($WAVEchunk !== 'WAVE') {
                 $info['error'][] = 'Expected "WAVE" (' . Utils::PrintHexBytes('WAVE') . ') at offset ' . $offset . ', found "' . $WAVEchunk . '" (' . Utils::PrintHexBytes($WAVEchunk) . ') instead.';
                 return false;
             }
             $offset += 4;
             $info['la']['fmt_size'] = 24;
             if ($info['la']['version'] >= 0.3) {
                 $info['la']['fmt_size'] = Utils::LittleEndian2Int(substr($rawdata, $offset, 4));
                 $info['la']['header_size'] = 49 + $info['la']['fmt_size'] - 24;
                 $offset += 4;
             } else {
                 // version 0.2 didn't support additional data blocks
                 $info['la']['header_size'] = 41;
             }
             $fmt_chunk = substr($rawdata, $offset, 4);
             if ($fmt_chunk !== 'fmt ') {
                 $info['error'][] = 'Expected "fmt " (' . Utils::PrintHexBytes('fmt ') . ') at offset ' . $offset . ', found "' . $fmt_chunk . '" (' . Utils::PrintHexBytes($fmt_chunk) . ') instead.';
                 return false;
             }
             $offset += 4;
             $fmt_size = Utils::LittleEndian2Int(substr($rawdata, $offset, 4));
             $offset += 4;
             $info['la']['raw']['format'] = Utils::LittleEndian2Int(substr($rawdata, $offset, 2));
             $offset += 2;
             $info['la']['channels'] = Utils::LittleEndian2Int(substr($rawdata, $offset, 2));
             $offset += 2;
             if ($info['la']['channels'] == 0) {
                 $info['error'][] = 'Corrupt LA file: channels == zero';
                 return false;
             }
             $info['la']['sample_rate'] = Utils::LittleEndian2Int(substr($rawdata, $offset, 4));
             $offset += 4;
             if ($info['la']['sample_rate'] == 0) {
                 $info['error'][] = 'Corrupt LA file: sample_rate == zero';
                 return false;
             }
             $info['la']['bytes_per_second'] = Utils::LittleEndian2Int(substr($rawdata, $offset, 4));
             $offset += 4;
             $info['la']['bytes_per_sample'] = Utils::LittleEndian2Int(substr($rawdata, $offset, 2));
             $offset += 2;
             $info['la']['bits_per_sample'] = Utils::LittleEndian2Int(substr($rawdata, $offset, 2));
             $offset += 2;
             $info['la']['samples'] = Utils::LittleEndian2Int(substr($rawdata, $offset, 4));
             $offset += 4;
             $info['la']['raw']['flags'] = Utils::LittleEndian2Int(substr($rawdata, $offset, 1));
             $offset += 1;
             $info['la']['flags']['seekable'] = (bool) ($info['la']['raw']['flags'] & 0x1);
             if ($info['la']['version'] >= 0.4) {
                 $info['la']['flags']['high_compression'] = (bool) ($info['la']['raw']['flags'] & 0x2);
             }
             $info['la']['original_crc'] = Utils::LittleEndian2Int(substr($rawdata, $offset, 4));
             $offset += 4;
             // mikeØbevin*de
             // Basically, the blocksize/seekevery are 61440/19 in La0.4 and 73728/16
             // in earlier versions. A seekpoint is added every blocksize * seekevery
             // samples, so 4 * int(totalSamples / (blockSize * seekEvery)) should
             // give the number of bytes used for the seekpoints. Of course, if seeking
             // is disabled, there are no seekpoints stored.
             if ($info['la']['version'] >= 0.4) {
                 $info['la']['blocksize'] = 61440;
                 $info['la']['seekevery'] = 19;
             } else {
                 $info['la']['blocksize'] = 73728;
                 $info['la']['seekevery'] = 16;
             }
             $info['la']['seekpoint_count'] = 0;
             if ($info['la']['flags']['seekable']) {
                 $info['la']['seekpoint_count'] = floor($info['la']['samples'] / ($info['la']['blocksize'] * $info['la']['seekevery']));
                 for ($i = 0; $i < $info['la']['seekpoint_count']; $i++) {
                     $info['la']['seekpoints'][] = Utils::LittleEndian2Int(substr($rawdata, $offset, 4));
                     $offset += 4;
                 }
             }
             if ($info['la']['version'] >= 0.3) {
                 // Following the main header information, the program outputs all of the
                 // seekpoints. Following these is what I called the 'footer start',
                 // i.e. the position immediately after the La audio data is finished.
                 $info['la']['footerstart'] = Utils::LittleEndian2Int(substr($rawdata, $offset, 4));
                 $offset += 4;
                 if ($info['la']['footerstart'] > $info['filesize']) {
                     $info['warning'][] = 'FooterStart value points to offset ' . $info['la']['footerstart'] . ' which is beyond end-of-file (' . $info['filesize'] . ')';
                     $info['la']['footerstart'] = $info['filesize'];
                 }
             } else {
                 // La v0.2 didn't have FooterStart value
                 $info['la']['footerstart'] = $info['avdataend'];
             }
             if ($info['la']['footerstart'] < $info['avdataend']) {
                 if ($RIFFtempfilename = tempnam(Utils::getTempDirectory(), 'id3')) {
                     if ($RIFF_fp = fopen($RIFFtempfilename, 'w+b')) {
                         $RIFFdata = 'WAVE';
                         if ($info['la']['version'] == 0.2) {
                             $RIFFdata .= substr($rawdata, 12, 24);
                         } else {
                             $RIFFdata .= substr($rawdata, 16, 24);
                         }
                         if ($info['la']['footerstart'] < $info['avdataend']) {
                             $this->fseek($info['la']['footerstart']);
                             $RIFFdata .= $this->fread($info['avdataend'] - $info['la']['footerstart']);
                         }
                         $RIFFdata = 'RIFF' . Utils::LittleEndian2String(strlen($RIFFdata), 4, false) . $RIFFdata;
                         fwrite($RIFF_fp, $RIFFdata, strlen($RIFFdata));
                         fclose($RIFF_fp);
                         $getid3_temp = new GetID3();
                         $getid3_temp->openfile($RIFFtempfilename);
                         $getid3_riff = new Riff($getid3_temp);
                         $getid3_riff->Analyze();
                         if (empty($getid3_temp->info['error'])) {
                             $info['riff'] = $getid3_temp->info['riff'];
                         } else {
                             $info['warning'][] = 'Error parsing RIFF portion of La file: ' . implode($getid3_temp->info['error']);
                         }
                         unset($getid3_temp, $getid3_riff);
                     }
                     unlink($RIFFtempfilename);
                 }
             }
             // $info['avdataoffset'] should be zero to begin with, but just in case it's not, include the addition anyway
             $info['avdataend'] = $info['avdataoffset'] + $info['la']['footerstart'];
             $info['avdataoffset'] = $info['avdataoffset'] + $offset;
             $info['la']['compression_ratio'] = (double) (($info['avdataend'] - $info['avdataoffset']) / $info['la']['uncompressed_size']);
             $info['playtime_seconds'] = (double) ($info['la']['samples'] / $info['la']['sample_rate']) / $info['la']['channels'];
             if ($info['playtime_seconds'] == 0) {
                 $info['error'][] = 'Corrupt LA file: playtime_seconds == zero';
                 return false;
             }
             $info['audio']['bitrate'] = ($info['avdataend'] - $info['avdataoffset']) * 8 / $info['playtime_seconds'];
             //$info['audio']['codec']              = $info['la']['codec'];
             $info['audio']['bits_per_sample'] = $info['la']['bits_per_sample'];
             break;
         default:
             if (substr($rawdata, $offset, 2) == 'LA') {
                 $info['error'][] = 'This version of getID3() [' . $this->getid3->version() . '] does not support LA version ' . substr($rawdata, $offset + 2, 1) . '.' . substr($rawdata, $offset + 3, 1) . ' which this appears to be - check http://getid3.sourceforge.net for updates.';
             } else {
                 $info['error'][] = 'Not a LA (Lossless-Audio) file';
             }
             return false;
             break;
     }
     $info['audio']['channels'] = $info['la']['channels'];
     $info['audio']['sample_rate'] = (int) $info['la']['sample_rate'];
     $info['audio']['encoder'] = 'LA v' . $info['la']['version'];
     return true;
 }
Пример #28
0
 public function Analyze()
 {
     $info =& $this->getid3->info;
     // based loosely on code from TTwinVQ by Jurgen Faul <jfaulØgmx*de>
     // http://jfaul.de/atl  or  http://j-faul.virtualave.net/atl/atl.html
     $info['fileformat'] = 'vqf';
     $info['audio']['dataformat'] = 'vqf';
     $info['audio']['bitrate_mode'] = 'cbr';
     $info['audio']['lossless'] = false;
     // shortcut
     $info['vqf']['raw'] = array();
     $thisfile_vqf =& $info['vqf'];
     $thisfile_vqf_raw =& $thisfile_vqf['raw'];
     $this->fseek($info['avdataoffset']);
     $VQFheaderData = $this->fread(16);
     $offset = 0;
     $thisfile_vqf_raw['header_tag'] = substr($VQFheaderData, $offset, 4);
     $magic = 'TWIN';
     if ($thisfile_vqf_raw['header_tag'] != $magic) {
         $info['error'][] = 'Expecting "' . Utils::PrintHexBytes($magic) . '" at offset ' . $info['avdataoffset'] . ', found "' . Utils::PrintHexBytes($thisfile_vqf_raw['header_tag']) . '"';
         unset($info['vqf']);
         unset($info['fileformat']);
         return false;
     }
     $offset += 4;
     $thisfile_vqf_raw['version'] = substr($VQFheaderData, $offset, 8);
     $offset += 8;
     $thisfile_vqf_raw['size'] = Utils::BigEndian2Int(substr($VQFheaderData, $offset, 4));
     $offset += 4;
     while ($this->ftell() < $info['avdataend']) {
         $ChunkBaseOffset = $this->ftell();
         $chunkoffset = 0;
         $ChunkData = $this->fread(8);
         $ChunkName = substr($ChunkData, $chunkoffset, 4);
         if ($ChunkName == 'DATA') {
             $info['avdataoffset'] = $ChunkBaseOffset;
             break;
         }
         $chunkoffset += 4;
         $ChunkSize = Utils::BigEndian2Int(substr($ChunkData, $chunkoffset, 4));
         $chunkoffset += 4;
         if ($ChunkSize > $info['avdataend'] - $this->ftell()) {
             $info['error'][] = 'Invalid chunk size (' . $ChunkSize . ') for chunk "' . $ChunkName . '" at offset ' . $ChunkBaseOffset;
             break;
         }
         if ($ChunkSize > 0) {
             $ChunkData .= $this->fread($ChunkSize);
         }
         switch ($ChunkName) {
             case 'COMM':
                 // shortcut
                 $thisfile_vqf['COMM'] = array();
                 $thisfile_vqf_COMM =& $thisfile_vqf['COMM'];
                 $thisfile_vqf_COMM['channel_mode'] = Utils::BigEndian2Int(substr($ChunkData, $chunkoffset, 4));
                 $chunkoffset += 4;
                 $thisfile_vqf_COMM['bitrate'] = Utils::BigEndian2Int(substr($ChunkData, $chunkoffset, 4));
                 $chunkoffset += 4;
                 $thisfile_vqf_COMM['sample_rate'] = Utils::BigEndian2Int(substr($ChunkData, $chunkoffset, 4));
                 $chunkoffset += 4;
                 $thisfile_vqf_COMM['security_level'] = Utils::BigEndian2Int(substr($ChunkData, $chunkoffset, 4));
                 $chunkoffset += 4;
                 $info['audio']['channels'] = $thisfile_vqf_COMM['channel_mode'] + 1;
                 $info['audio']['sample_rate'] = $this->VQFchannelFrequencyLookup($thisfile_vqf_COMM['sample_rate']);
                 $info['audio']['bitrate'] = $thisfile_vqf_COMM['bitrate'] * 1000;
                 $info['audio']['encoder_options'] = 'CBR' . ceil($info['audio']['bitrate'] / 1000);
                 if ($info['audio']['bitrate'] == 0) {
                     $info['error'][] = 'Corrupt VQF file: bitrate_audio == zero';
                     return false;
                 }
                 break;
             case 'NAME':
             case 'AUTH':
             case '(c) ':
             case 'FILE':
             case 'COMT':
             case 'ALBM':
                 $thisfile_vqf['comments'][$this->VQFcommentNiceNameLookup($ChunkName)][] = trim(substr($ChunkData, 8));
                 break;
             case 'DSIZ':
                 $thisfile_vqf['DSIZ'] = Utils::BigEndian2Int(substr($ChunkData, 8, 4));
                 break;
             default:
                 $info['warning'][] = 'Unhandled chunk type "' . $ChunkName . '" at offset ' . $ChunkBaseOffset;
                 break;
         }
     }
     $info['playtime_seconds'] = ($info['avdataend'] - $info['avdataoffset']) * 8 / $info['audio']['bitrate'];
     if (isset($thisfile_vqf['DSIZ']) && $thisfile_vqf['DSIZ'] != $info['avdataend'] - $info['avdataoffset'] - strlen('DATA')) {
         switch ($thisfile_vqf['DSIZ']) {
             case 0:
             case 1:
                 $info['warning'][] = 'Invalid DSIZ value "' . $thisfile_vqf['DSIZ'] . '". This is known to happen with VQF files encoded by Ahead Nero, and seems to be its way of saying this is TwinVQF v' . ($thisfile_vqf['DSIZ'] + 1) . '.0';
                 $info['audio']['encoder'] = 'Ahead Nero';
                 break;
             default:
                 $info['warning'][] = 'Probable corrupted file - should be ' . $thisfile_vqf['DSIZ'] . ' bytes, actually ' . ($info['avdataend'] - $info['avdataoffset'] - strlen('DATA'));
                 break;
         }
     }
     return true;
 }
Пример #29
0
 public function Analyze()
 {
     $info =& $this->getid3->info;
     $this->fseek($info['avdataoffset']);
     $SZIPHeader = $this->fread(6);
     if (substr($SZIPHeader, 0, 4) != "SZ\n") {
         $info['error'][] = 'Expecting "53 5A 0A 04" at offset ' . $info['avdataoffset'] . ', found "' . Utils::PrintHexBytes(substr($SZIPHeader, 0, 4)) . '"';
         return false;
     }
     $info['fileformat'] = 'szip';
     $info['szip']['major_version'] = Utils::BigEndian2Int(substr($SZIPHeader, 4, 1));
     $info['szip']['minor_version'] = Utils::BigEndian2Int(substr($SZIPHeader, 5, 1));
     $info['error'][] = 'SZIP parsing not enabled in this version of getID3() [' . $this->getid3->version() . ']';
     return false;
     while (!$this->feof()) {
         $NextBlockID = $this->fread(2);
         switch ($NextBlockID) {
             case 'SZ':
                 // Note that szip files can be concatenated, this has the same effect as
                 // concatenating the files. this also means that global header blocks
                 // might be present between directory/data blocks.
                 $this->fseek(4, SEEK_CUR);
                 break;
             case 'BH':
                 $BHheaderbytes = Utils::BigEndian2Int($this->fread(3));
                 $BHheaderdata = $this->fread($BHheaderbytes);
                 $BHheaderoffset = 0;
                 while (strpos($BHheaderdata, "", $BHheaderoffset) > 0) {
                     //filename as \0 terminated string  (empty string indicates end)
                     //owner as \0 terminated string (empty is same as last file)
                     //group as \0 terminated string (empty is same as last file)
                     //3 byte filelength in this block
                     //2 byte access flags
                     //4 byte creation time (like in unix)
                     //4 byte modification time (like in unix)
                     //4 byte access time (like in unix)
                     $BHdataArray['filename'] = substr($BHheaderdata, $BHheaderoffset, strcspn($BHheaderdata, ""));
                     $BHheaderoffset += strlen($BHdataArray['filename']) + 1;
                     $BHdataArray['owner'] = substr($BHheaderdata, $BHheaderoffset, strcspn($BHheaderdata, ""));
                     $BHheaderoffset += strlen($BHdataArray['owner']) + 1;
                     $BHdataArray['group'] = substr($BHheaderdata, $BHheaderoffset, strcspn($BHheaderdata, ""));
                     $BHheaderoffset += strlen($BHdataArray['group']) + 1;
                     $BHdataArray['filelength'] = Utils::BigEndian2Int(substr($BHheaderdata, $BHheaderoffset, 3));
                     $BHheaderoffset += 3;
                     $BHdataArray['access_flags'] = Utils::BigEndian2Int(substr($BHheaderdata, $BHheaderoffset, 2));
                     $BHheaderoffset += 2;
                     $BHdataArray['creation_time'] = Utils::BigEndian2Int(substr($BHheaderdata, $BHheaderoffset, 4));
                     $BHheaderoffset += 4;
                     $BHdataArray['modification_time'] = Utils::BigEndian2Int(substr($BHheaderdata, $BHheaderoffset, 4));
                     $BHheaderoffset += 4;
                     $BHdataArray['access_time'] = Utils::BigEndian2Int(substr($BHheaderdata, $BHheaderoffset, 4));
                     $BHheaderoffset += 4;
                     $info['szip']['BH'][] = $BHdataArray;
                 }
                 break;
             default:
                 break 2;
         }
     }
     return true;
 }