rlm@3: | rlm@3: // | Allan Hansen | rlm@3: // +----------------------------------------------------------------------+ rlm@3: // | module.audio-video.swf.php | rlm@3: // | module for analyzing Macromedia Shockwave Flash files. | rlm@3: // | dependencies: zlib support in PHP | rlm@3: // +----------------------------------------------------------------------+ rlm@3: // rlm@3: // $Id: module.audio-video.swf.php,v 1.2 2006/11/02 10:48:00 ah Exp $ rlm@3: rlm@3: rlm@3: rlm@3: class getid3_swf extends getid3_handler rlm@3: { rlm@3: rlm@3: public function Analyze() { rlm@3: rlm@3: $getid3 = $this->getid3; rlm@3: rlm@3: $getid3->info['fileformat'] = 'swf'; rlm@3: $getid3->info['video']['dataformat'] = 'swf'; rlm@3: rlm@3: // http://www.openswf.org/spec/SWFfileformat.html rlm@3: rlm@3: fseek($getid3->fp, $getid3->info['avdataoffset'], SEEK_SET); rlm@3: rlm@3: $swf_file_data = fread($getid3->fp, $getid3->info['avdataend'] - $getid3->info['avdataoffset']); // 8 + 2 + 2 + max(9) bytes NOT including Frame_Size RECT data rlm@3: rlm@3: $getid3->info['swf']['header']['signature'] = substr($swf_file_data, 0, 3); rlm@3: switch ($getid3->info['swf']['header']['signature']) { rlm@3: rlm@3: case 'FWS': rlm@3: $getid3->info['swf']['header']['compressed'] = false; rlm@3: break; rlm@3: rlm@3: case 'CWS': rlm@3: $getid3->info['swf']['header']['compressed'] = true; rlm@3: break; rlm@3: rlm@3: default: rlm@3: throw new getid3_exception('Expecting "FWS" or "CWS" at offset '.$getid3->info['avdataoffset'].', found "'.$getid3->info['swf']['header']['signature'].'"'); rlm@3: } rlm@3: $getid3->info['swf']['header']['version'] = getid3_lib::LittleEndian2Int($swf_file_data{3}); rlm@3: $getid3->info['swf']['header']['length'] = getid3_lib::LittleEndian2Int(substr($swf_file_data, 4, 4)); rlm@3: rlm@3: if (!function_exists('gzuncompress')) { rlm@3: throw new getid3_exception('getid3_swf requires --zlib support in PHP.'); rlm@3: } rlm@3: rlm@3: if ($getid3->info['swf']['header']['compressed']) { rlm@3: rlm@3: if ($uncompressed_file_data = @gzuncompress(substr($swf_file_data, 8))) { rlm@3: $swf_file_data = substr($swf_file_data, 0, 8).$uncompressed_file_data; rlm@3: rlm@3: } else { rlm@3: throw new getid3_exception('Error decompressing compressed SWF data'); rlm@3: } rlm@3: rlm@3: } rlm@3: rlm@3: $frame_size_bits_per_value = (ord(substr($swf_file_data, 8, 1)) & 0xF8) >> 3; rlm@3: $frame_size_data_length = ceil((5 + (4 * $frame_size_bits_per_value)) / 8); rlm@3: $frame_size_data_string = str_pad(decbin(ord($swf_file_data[8]) & 0x07), 3, '0', STR_PAD_LEFT); rlm@3: rlm@3: for ($i = 1; $i < $frame_size_data_length; $i++) { rlm@3: $frame_size_data_string .= str_pad(decbin(ord(substr($swf_file_data, 8 + $i, 1))), 8, '0', STR_PAD_LEFT); rlm@3: } rlm@3: rlm@3: list($x1, $x2, $y1, $y2) = explode("\n", wordwrap($frame_size_data_string, $frame_size_bits_per_value, "\n", 1)); rlm@3: $getid3->info['swf']['header']['frame_width'] = bindec($x2); rlm@3: $getid3->info['swf']['header']['frame_height'] = bindec($y2); rlm@3: rlm@3: // http://www-lehre.informatik.uni-osnabrueck.de/~fbstark/diplom/docs/swf/Flash_Uncovered.htm rlm@3: // Next in the header is the frame rate, which is kind of weird. rlm@3: // It is supposed to be stored as a 16bit integer, but the first byte rlm@3: // (or last depending on how you look at it) is completely ignored. rlm@3: // Example: 0x000C -> 0x0C -> 12 So the frame rate is 12 fps. rlm@3: rlm@3: // Byte at (8 + $frame_size_data_length) is always zero and ignored rlm@3: $getid3->info['swf']['header']['frame_rate'] = getid3_lib::LittleEndian2Int($swf_file_data[9 + $frame_size_data_length]); rlm@3: $getid3->info['swf']['header']['frame_count'] = getid3_lib::LittleEndian2Int(substr($swf_file_data, 10 + $frame_size_data_length, 2)); rlm@3: rlm@3: $getid3->info['video']['frame_rate'] = $getid3->info['swf']['header']['frame_rate']; rlm@3: $getid3->info['video']['resolution_x'] = intval(round($getid3->info['swf']['header']['frame_width'] / 20)); rlm@3: $getid3->info['video']['resolution_y'] = intval(round($getid3->info['swf']['header']['frame_height'] / 20)); rlm@3: $getid3->info['video']['pixel_aspect_ratio'] = (float)1; rlm@3: rlm@3: if (($getid3->info['swf']['header']['frame_count'] > 0) && ($getid3->info['swf']['header']['frame_rate'] > 0)) { rlm@3: $getid3->info['playtime_seconds'] = $getid3->info['swf']['header']['frame_count'] / $getid3->info['swf']['header']['frame_rate']; rlm@3: } rlm@3: rlm@3: rlm@3: // SWF tags rlm@3: rlm@3: $current_offset = 12 + $frame_size_data_length; rlm@3: $swf_data_length = strlen($swf_file_data); rlm@3: rlm@3: while ($current_offset < $swf_data_length) { rlm@3: rlm@3: $tag_ID_tag_length = getid3_lib::LittleEndian2Int(substr($swf_file_data, $current_offset, 2)); rlm@3: $tag_ID = ($tag_ID_tag_length & 0xFFFC) >> 6; rlm@3: $tag_length = ($tag_ID_tag_length & 0x003F); rlm@3: $current_offset += 2; rlm@3: if ($tag_length == 0x3F) { rlm@3: $tag_length = getid3_lib::LittleEndian2Int(substr($swf_file_data, $current_offset, 4)); rlm@3: $current_offset += 4; rlm@3: } rlm@3: rlm@3: unset($tag_data); rlm@3: $tag_data['offset'] = $current_offset; rlm@3: $tag_data['size'] = $tag_length; rlm@3: $tag_data['id'] = $tag_ID; rlm@3: $tag_data['data'] = substr($swf_file_data, $current_offset, $tag_length); rlm@3: switch ($tag_ID) { rlm@3: rlm@3: case 0: // end of movie rlm@3: break 2; rlm@3: rlm@3: case 9: // Set background color rlm@3: $getid3->info['swf']['bgcolor'] = strtoupper(str_pad(dechex(getid3_lib::BigEndian2Int($tag_data['data'])), 6, '0', STR_PAD_LEFT)); rlm@3: break; rlm@3: rlm@3: default: rlm@3: /* rlm@3: if ($ReturnAllTagData) { rlm@3: $getid3->info['swf']['tags'][] = $tag_data; rlm@3: } rlm@3: */ rlm@3: break; rlm@3: } rlm@3: rlm@3: $current_offset += $tag_length; rlm@3: } rlm@3: rlm@3: return true; rlm@3: } rlm@3: rlm@3: } rlm@3: rlm@3: rlm@3: ?>