source: branches/MootoolsFileManager-Update/plugins/MootoolsFileManager/mootools-filemanager/Assets/Connector/Assets/getid3/module.audio-video.swf.php @ 1300

Last change on this file since 1300 was 1300, checked in by gogo, 8 years ago

Update the MootoolsFileManager? to the latest cpojer with some modifications.
Add a demo for the MFM examples/mootools-file-manager.php
Change the default config for ImageManager? and ExtendedFileManager? for added security.

File size: 5.9 KB
Line 
1<?php
2/////////////////////////////////////////////////////////////////
3/// getID3() by James Heinrich <info@getid3.org>               //
4//  available at http://getid3.sourceforge.net                 //
5//            or http://www.getid3.org                         //
6/////////////////////////////////////////////////////////////////
7// See readme.txt for more details                             //
8/////////////////////////////////////////////////////////////////
9//                                                             //
10// module.audio-video.swf.php                                  //
11// module for analyzing Shockwave Flash files                  //
12// dependencies: NONE                                          //
13//                                                            ///
14/////////////////////////////////////////////////////////////////
15
16
17class getid3_swf
18{
19
20        function getid3_swf(&$fd, &$ThisFileInfo, $ReturnAllTagData=false) {
21//$start_time = microtime(true);
22                $ThisFileInfo['fileformat']          = 'swf';
23                $ThisFileInfo['video']['dataformat'] = 'swf';
24
25                // http://www.openswf.org/spec/SWFfileformat.html
26
27                fseek($fd, $ThisFileInfo['avdataoffset'], SEEK_SET);
28
29                $SWFfileData = fread($fd, $ThisFileInfo['avdataend'] - $ThisFileInfo['avdataoffset']); // 8 + 2 + 2 + max(9) bytes NOT including Frame_Size RECT data
30
31                $ThisFileInfo['swf']['header']['signature']  = substr($SWFfileData, 0, 3);
32                switch ($ThisFileInfo['swf']['header']['signature']) {
33                        case 'FWS':
34                                $ThisFileInfo['swf']['header']['compressed'] = false;
35                                break;
36
37                        case 'CWS':
38                                $ThisFileInfo['swf']['header']['compressed'] = true;
39                                break;
40
41                        default:
42                                $ThisFileInfo['error'][] = 'Expecting "FWS" or "CWS" at offset '.$ThisFileInfo['avdataoffset'].', found "'.$ThisFileInfo['swf']['header']['signature'].'"';
43                                unset($ThisFileInfo['swf']);
44                                unset($ThisFileInfo['fileformat']);
45                                return false;
46                                break;
47                }
48                $ThisFileInfo['swf']['header']['version'] = getid3_lib::LittleEndian2Int(substr($SWFfileData, 3, 1));
49                $ThisFileInfo['swf']['header']['length']  = getid3_lib::LittleEndian2Int(substr($SWFfileData, 4, 4));
50
51                if ($ThisFileInfo['swf']['header']['compressed']) {
52
53                        $SWFHead     = substr($SWFfileData, 0, 8);
54                        $SWFfileData = substr($SWFfileData, 8);
55                        ob_start();
56                        if ($decompressed = gzuncompress($SWFfileData)) {
57
58                                ob_end_clean();
59                                $SWFfileData = $SWFHead.$decompressed;
60
61                        } else {
62
63                                $errormessage = ob_get_contents();
64                                ob_end_clean();
65                                $ThisFileInfo['error'][] = 'Error decompressing compressed SWF data ('.strlen($SWFfileData).' bytes compressed, should be '.($ThisFileInfo['swf']['header']['length'] - 8).' bytes uncompressed)';
66                                return false;
67
68                        }
69
70                }
71
72                $FrameSizeBitsPerValue = (ord(substr($SWFfileData, 8, 1)) & 0xF8) >> 3;
73                $FrameSizeDataLength   = ceil((5 + (4 * $FrameSizeBitsPerValue)) / 8);
74                $FrameSizeDataString   = str_pad(decbin(ord(substr($SWFfileData, 8, 1)) & 0x07), 3, '0', STR_PAD_LEFT);
75                for ($i = 1; $i < $FrameSizeDataLength; $i++) {
76                        $FrameSizeDataString .= str_pad(decbin(ord(substr($SWFfileData, 8 + $i, 1))), 8, '0', STR_PAD_LEFT);
77                }
78                list($X1, $X2, $Y1, $Y2) = explode("\n", wordwrap($FrameSizeDataString, $FrameSizeBitsPerValue, "\n", 1));
79                $ThisFileInfo['swf']['header']['frame_width']  = getid3_lib::Bin2Dec($X2);
80                $ThisFileInfo['swf']['header']['frame_height'] = getid3_lib::Bin2Dec($Y2);
81
82                // http://www-lehre.informatik.uni-osnabrueck.de/~fbstark/diplom/docs/swf/Flash_Uncovered.htm
83                // Next in the header is the frame rate, which is kind of weird.
84                // It is supposed to be stored as a 16bit integer, but the first byte
85                // (or last depending on how you look at it) is completely ignored.
86                // Example: 0x000C  ->  0x0C  ->  12     So the frame rate is 12 fps.
87
88                // Byte at (8 + $FrameSizeDataLength) is always zero and ignored
89                $ThisFileInfo['swf']['header']['frame_rate']  = getid3_lib::LittleEndian2Int(substr($SWFfileData,  9 + $FrameSizeDataLength, 1));
90                $ThisFileInfo['swf']['header']['frame_count'] = getid3_lib::LittleEndian2Int(substr($SWFfileData, 10 + $FrameSizeDataLength, 2));
91
92                $ThisFileInfo['video']['frame_rate']         = $ThisFileInfo['swf']['header']['frame_rate'];
93                $ThisFileInfo['video']['resolution_x']       = intval(round($ThisFileInfo['swf']['header']['frame_width']  / 20));
94                $ThisFileInfo['video']['resolution_y']       = intval(round($ThisFileInfo['swf']['header']['frame_height'] / 20));
95                $ThisFileInfo['video']['pixel_aspect_ratio'] = (float) 1;
96
97                if (($ThisFileInfo['swf']['header']['frame_count'] > 0) && ($ThisFileInfo['swf']['header']['frame_rate'] > 0)) {
98                        $ThisFileInfo['playtime_seconds'] = $ThisFileInfo['swf']['header']['frame_count'] / $ThisFileInfo['swf']['header']['frame_rate'];
99                }
100//echo __LINE__.'='.number_format(microtime(true) - $start_time, 3).'<br>';
101
102
103                // SWF tags
104
105                $CurrentOffset = 12 + $FrameSizeDataLength;
106                $SWFdataLength = strlen($SWFfileData);
107
108                while ($CurrentOffset < $SWFdataLength) {
109//echo __LINE__.'='.number_format(microtime(true) - $start_time, 3).'<br>';
110
111                        $TagIDTagLength = getid3_lib::LittleEndian2Int(substr($SWFfileData, $CurrentOffset, 2));
112                        $TagID     = ($TagIDTagLength & 0xFFFC) >> 6;
113                        $TagLength = ($TagIDTagLength & 0x003F);
114                        $CurrentOffset += 2;
115                        if ($TagLength == 0x3F) {
116                                $TagLength = getid3_lib::LittleEndian2Int(substr($SWFfileData, $CurrentOffset, 4));
117                                $CurrentOffset += 4;
118                        }
119
120                        unset($TagData);
121                        $TagData['offset'] = $CurrentOffset;
122                        $TagData['size']   = $TagLength;
123                        $TagData['id']     = $TagID;
124                        $TagData['data']   = substr($SWFfileData, $CurrentOffset, $TagLength);
125                        switch ($TagID) {
126                                case 0: // end of movie
127                                        break 2;
128
129                                case 9: // Set background color
130                                        //$ThisFileInfo['swf']['tags'][] = $TagData;
131                                        $ThisFileInfo['swf']['bgcolor'] = strtoupper(str_pad(dechex(getid3_lib::BigEndian2Int($TagData['data'])), 6, '0', STR_PAD_LEFT));
132                                        break;
133
134                                default:
135                                        if ($ReturnAllTagData) {
136                                                $ThisFileInfo['swf']['tags'][] = $TagData;
137                                        }
138                                        break;
139                        }
140
141                        $CurrentOffset += $TagLength;
142                }
143
144                return true;
145        }
146
147}
148
149
150?>
Note: See TracBrowser for help on using the repository browser.