1<?php
2/////////////////////////////////////////////////////////////////
3/// getID3() by James Heinrich <info@getid3.org>               //
4//  available at https://github.com/JamesHeinrich/getID3       //
5//            or https://www.getid3.org                        //
6//            or http://getid3.sourceforge.net                 //
7//  see readme.txt for more details                            //
8/////////////////////////////////////////////////////////////////
9//                                                             //
10// module.audio-video.asf.php                                  //
11// module for analyzing ASF, WMA and WMV files                 //
12// dependencies: module.audio-video.riff.php                   //
13//                                                            ///
14/////////////////////////////////////////////////////////////////
15
16if (!defined('GETID3_INCLUDEPATH')) { // prevent path-exposing attacks that access modules directly on public webservers
17	exit;
18}
19getid3_lib::IncludeDependency(GETID3_INCLUDEPATH.'module.audio-video.riff.php', __FILE__, true);
20
21class getid3_asf extends getid3_handler
22{
23	/**
24	 * @param getID3 $getid3
25	 */
26	public function __construct(getID3 $getid3) {
27		parent::__construct($getid3);  // extends getid3_handler::__construct()
28
29		// initialize all GUID constants
30		$GUIDarray = $this->KnownGUIDs();
31		foreach ($GUIDarray as $GUIDname => $hexstringvalue) {
32			if (!defined($GUIDname)) {
33				define($GUIDname, $this->GUIDtoBytestring($hexstringvalue));
34			}
35		}
36	}
37
38	/**
39	 * @return bool
40	 */
41	public function Analyze() {
42		$info = &$this->getid3->info;
43
44		// Shortcuts
45		$thisfile_audio = &$info['audio'];
46		$thisfile_video = &$info['video'];
47		$info['asf']  = array();
48		$thisfile_asf = &$info['asf'];
49		$thisfile_asf['comments'] = array();
50		$thisfile_asf_comments    = &$thisfile_asf['comments'];
51		$thisfile_asf['header_object'] = array();
52		$thisfile_asf_headerobject     = &$thisfile_asf['header_object'];
53
54
55		// ASF structure:
56		// * Header Object [required]
57		//   * File Properties Object [required]   (global file attributes)
58		//   * Stream Properties Object [required] (defines media stream & characteristics)
59		//   * Header Extension Object [required]  (additional functionality)
60		//   * Content Description Object          (bibliographic information)
61		//   * Script Command Object               (commands for during playback)
62		//   * Marker Object                       (named jumped points within the file)
63		// * Data Object [required]
64		//   * Data Packets
65		// * Index Object
66
67		// Header Object: (mandatory, one only)
68		// Field Name                   Field Type   Size (bits)
69		// Object ID                    GUID         128             // GUID for header object - GETID3_ASF_Header_Object
70		// Object Size                  QWORD        64              // size of header object, including 30 bytes of Header Object header
71		// Number of Header Objects     DWORD        32              // number of objects in header object
72		// Reserved1                    BYTE         8               // hardcoded: 0x01
73		// Reserved2                    BYTE         8               // hardcoded: 0x02
74
75		$info['fileformat'] = 'asf';
76
77		$this->fseek($info['avdataoffset']);
78		$HeaderObjectData = $this->fread(30);
79
80		$thisfile_asf_headerobject['objectid']      = substr($HeaderObjectData, 0, 16);
81		$thisfile_asf_headerobject['objectid_guid'] = $this->BytestringToGUID($thisfile_asf_headerobject['objectid']);
82		if ($thisfile_asf_headerobject['objectid'] != GETID3_ASF_Header_Object) {
83			unset($info['fileformat'], $info['asf']);
84			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).'}');
85		}
86		$thisfile_asf_headerobject['objectsize']    = getid3_lib::LittleEndian2Int(substr($HeaderObjectData, 16, 8));
87		$thisfile_asf_headerobject['headerobjects'] = getid3_lib::LittleEndian2Int(substr($HeaderObjectData, 24, 4));
88		$thisfile_asf_headerobject['reserved1']     = getid3_lib::LittleEndian2Int(substr($HeaderObjectData, 28, 1));
89		$thisfile_asf_headerobject['reserved2']     = getid3_lib::LittleEndian2Int(substr($HeaderObjectData, 29, 1));
90
91		$NextObjectOffset = $this->ftell();
92		$ASFHeaderData = $this->fread($thisfile_asf_headerobject['objectsize'] - 30);
93		$offset = 0;
94		$thisfile_asf_streambitratepropertiesobject = array();
95		$thisfile_asf_codeclistobject = array();
96		$StreamPropertiesObjectData = array();
97
98		for ($HeaderObjectsCounter = 0; $HeaderObjectsCounter < $thisfile_asf_headerobject['headerobjects']; $HeaderObjectsCounter++) {
99			$NextObjectGUID = substr($ASFHeaderData, $offset, 16);
100			$offset += 16;
101			$NextObjectGUIDtext = $this->BytestringToGUID($NextObjectGUID);
102			$NextObjectSize = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 8));
103			$offset += 8;
104			switch ($NextObjectGUID) {
105
106				case GETID3_ASF_File_Properties_Object:
107					// File Properties Object: (mandatory, one only)
108					// Field Name                   Field Type   Size (bits)
109					// Object ID                    GUID         128             // GUID for file properties object - GETID3_ASF_File_Properties_Object
110					// Object Size                  QWORD        64              // size of file properties object, including 104 bytes of File Properties Object header
111					// File ID                      GUID         128             // unique ID - identical to File ID in Data Object
112					// File Size                    QWORD        64              // entire file in bytes. Invalid if Broadcast Flag == 1
113					// Creation Date                QWORD        64              // date & time of file creation. Maybe invalid if Broadcast Flag == 1
114					// Data Packets Count           QWORD        64              // number of data packets in Data Object. Invalid if Broadcast Flag == 1
115					// Play Duration                QWORD        64              // playtime, in 100-nanosecond units. Invalid if Broadcast Flag == 1
116					// Send Duration                QWORD        64              // time needed to send file, in 100-nanosecond units. Players can ignore this value. Invalid if Broadcast Flag == 1
117					// 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
118					// Flags                        DWORD        32              //
119					// * Broadcast Flag             bits         1  (0x01)       // file is currently being written, some header values are invalid
120					// * Seekable Flag              bits         1  (0x02)       // is file seekable
121					// * Reserved                   bits         30 (0xFFFFFFFC) // reserved - set to zero
122					// Minimum Data Packet Size     DWORD        32              // in bytes. should be same as Maximum Data Packet Size. Invalid if Broadcast Flag == 1
123					// Maximum Data Packet Size     DWORD        32              // in bytes. should be same as Minimum Data Packet Size. Invalid if Broadcast Flag == 1
124					// Maximum Bitrate              DWORD        32              // maximum instantaneous bitrate in bits per second for entire file, including all data streams and ASF overhead
125
126					// shortcut
127					$thisfile_asf['file_properties_object'] = array();
128					$thisfile_asf_filepropertiesobject      = &$thisfile_asf['file_properties_object'];
129
130					$thisfile_asf_filepropertiesobject['offset']             = $NextObjectOffset + $offset;
131					$thisfile_asf_filepropertiesobject['objectid']           = $NextObjectGUID;
132					$thisfile_asf_filepropertiesobject['objectid_guid']      = $NextObjectGUIDtext;
133					$thisfile_asf_filepropertiesobject['objectsize']         = $NextObjectSize;
134					$thisfile_asf_filepropertiesobject['fileid']             = substr($ASFHeaderData, $offset, 16);
135					$offset += 16;
136					$thisfile_asf_filepropertiesobject['fileid_guid']        = $this->BytestringToGUID($thisfile_asf_filepropertiesobject['fileid']);
137					$thisfile_asf_filepropertiesobject['filesize']           = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 8));
138					$offset += 8;
139					$thisfile_asf_filepropertiesobject['creation_date']      = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 8));
140					$thisfile_asf_filepropertiesobject['creation_date_unix'] = $this->FILETIMEtoUNIXtime($thisfile_asf_filepropertiesobject['creation_date']);
141					$offset += 8;
142					$thisfile_asf_filepropertiesobject['data_packets']       = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 8));
143					$offset += 8;
144					$thisfile_asf_filepropertiesobject['play_duration']      = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 8));
145					$offset += 8;
146					$thisfile_asf_filepropertiesobject['send_duration']      = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 8));
147					$offset += 8;
148					$thisfile_asf_filepropertiesobject['preroll']            = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 8));
149					$offset += 8;
150					$thisfile_asf_filepropertiesobject['flags_raw']          = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 4));
151					$offset += 4;
152					$thisfile_asf_filepropertiesobject['flags']['broadcast'] = (bool) ($thisfile_asf_filepropertiesobject['flags_raw'] & 0x0001);
153					$thisfile_asf_filepropertiesobject['flags']['seekable']  = (bool) ($thisfile_asf_filepropertiesobject['flags_raw'] & 0x0002);
154
155					$thisfile_asf_filepropertiesobject['min_packet_size']    = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 4));
156					$offset += 4;
157					$thisfile_asf_filepropertiesobject['max_packet_size']    = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 4));
158					$offset += 4;
159					$thisfile_asf_filepropertiesobject['max_bitrate']        = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 4));
160					$offset += 4;
161
162					if ($thisfile_asf_filepropertiesobject['flags']['broadcast']) {
163
164						// broadcast flag is set, some values invalid
165						unset($thisfile_asf_filepropertiesobject['filesize']);
166						unset($thisfile_asf_filepropertiesobject['data_packets']);
167						unset($thisfile_asf_filepropertiesobject['play_duration']);
168						unset($thisfile_asf_filepropertiesobject['send_duration']);
169						unset($thisfile_asf_filepropertiesobject['min_packet_size']);
170						unset($thisfile_asf_filepropertiesobject['max_packet_size']);
171
172					} else {
173
174						// broadcast flag NOT set, perform calculations
175						$info['playtime_seconds'] = ($thisfile_asf_filepropertiesobject['play_duration'] / 10000000) - ($thisfile_asf_filepropertiesobject['preroll'] / 1000);
176
177						//$info['bitrate'] = $thisfile_asf_filepropertiesobject['max_bitrate'];
178						$info['bitrate'] = ((isset($thisfile_asf_filepropertiesobject['filesize']) ? $thisfile_asf_filepropertiesobject['filesize'] : $info['filesize']) * 8) / $info['playtime_seconds'];
179					}
180					break;
181
182				case GETID3_ASF_Stream_Properties_Object:
183					// Stream Properties Object: (mandatory, one per media stream)
184					// Field Name                   Field Type   Size (bits)
185					// Object ID                    GUID         128             // GUID for stream properties object - GETID3_ASF_Stream_Properties_Object
186					// Object Size                  QWORD        64              // size of stream properties object, including 78 bytes of Stream Properties Object header
187					// Stream Type                  GUID         128             // GETID3_ASF_Audio_Media, GETID3_ASF_Video_Media or GETID3_ASF_Command_Media
188					// Error Correction Type        GUID         128             // GETID3_ASF_Audio_Spread for audio-only streams, GETID3_ASF_No_Error_Correction for other stream types
189					// Time Offset                  QWORD        64              // 100-nanosecond units. typically zero. added to all timestamps of samples in the stream
190					// Type-Specific Data Length    DWORD        32              // number of bytes for Type-Specific Data field
191					// Error Correction Data Length DWORD        32              // number of bytes for Error Correction Data field
192					// Flags                        WORD         16              //
193					// * Stream Number              bits         7 (0x007F)      // number of this stream.  1 <= valid <= 127
194					// * Reserved                   bits         8 (0x7F80)      // reserved - set to zero
195					// * Encrypted Content Flag     bits         1 (0x8000)      // stream contents encrypted if set
196					// Reserved                     DWORD        32              // reserved - set to zero
197					// Type-Specific Data           BYTESTREAM   variable        // type-specific format data, depending on value of Stream Type
198					// Error Correction Data        BYTESTREAM   variable        // error-correction-specific format data, depending on value of Error Correct Type
199
200					// There is one GETID3_ASF_Stream_Properties_Object for each stream (audio, video) but the
201					// stream number isn't known until halfway through decoding the structure, hence it
202					// it is decoded to a temporary variable and then stuck in the appropriate index later
203
204					$StreamPropertiesObjectData['offset']             = $NextObjectOffset + $offset;
205					$StreamPropertiesObjectData['objectid']           = $NextObjectGUID;
206					$StreamPropertiesObjectData['objectid_guid']      = $NextObjectGUIDtext;
207					$StreamPropertiesObjectData['objectsize']         = $NextObjectSize;
208					$StreamPropertiesObjectData['stream_type']        = substr($ASFHeaderData, $offset, 16);
209					$offset += 16;
210					$StreamPropertiesObjectData['stream_type_guid']   = $this->BytestringToGUID($StreamPropertiesObjectData['stream_type']);
211					$StreamPropertiesObjectData['error_correct_type'] = substr($ASFHeaderData, $offset, 16);
212					$offset += 16;
213					$StreamPropertiesObjectData['error_correct_guid'] = $this->BytestringToGUID($StreamPropertiesObjectData['error_correct_type']);
214					$StreamPropertiesObjectData['time_offset']        = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 8));
215					$offset += 8;
216					$StreamPropertiesObjectData['type_data_length']   = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 4));
217					$offset += 4;
218					$StreamPropertiesObjectData['error_data_length']  = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 4));
219					$offset += 4;
220					$StreamPropertiesObjectData['flags_raw']          = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 2));
221					$offset += 2;
222					$StreamPropertiesObjectStreamNumber               = $StreamPropertiesObjectData['flags_raw'] & 0x007F;
223					$StreamPropertiesObjectData['flags']['encrypted'] = (bool) ($StreamPropertiesObjectData['flags_raw'] & 0x8000);
224
225					$offset += 4; // reserved - DWORD
226					$StreamPropertiesObjectData['type_specific_data'] = substr($ASFHeaderData, $offset, $StreamPropertiesObjectData['type_data_length']);
227					$offset += $StreamPropertiesObjectData['type_data_length'];
228					$StreamPropertiesObjectData['error_correct_data'] = substr($ASFHeaderData, $offset, $StreamPropertiesObjectData['error_data_length']);
229					$offset += $StreamPropertiesObjectData['error_data_length'];
230
231					switch ($StreamPropertiesObjectData['stream_type']) {
232
233						case GETID3_ASF_Audio_Media:
234							$thisfile_audio['dataformat']   = (!empty($thisfile_audio['dataformat'])   ? $thisfile_audio['dataformat']   : 'asf');
235							$thisfile_audio['bitrate_mode'] = (!empty($thisfile_audio['bitrate_mode']) ? $thisfile_audio['bitrate_mode'] : 'cbr');
236
237							$audiodata = getid3_riff::parseWAVEFORMATex(substr($StreamPropertiesObjectData['type_specific_data'], 0, 16));
238							unset($audiodata['raw']);
239							$thisfile_audio = getid3_lib::array_merge_noclobber($audiodata, $thisfile_audio);
240							break;
241
242						case GETID3_ASF_Video_Media:
243							$thisfile_video['dataformat']   = (!empty($thisfile_video['dataformat'])   ? $thisfile_video['dataformat']   : 'asf');
244							$thisfile_video['bitrate_mode'] = (!empty($thisfile_video['bitrate_mode']) ? $thisfile_video['bitrate_mode'] : 'cbr');
245							break;
246
247						case GETID3_ASF_Command_Media:
248						default:
249							// do nothing
250							break;
251
252					}
253
254					$thisfile_asf['stream_properties_object'][$StreamPropertiesObjectStreamNumber] = $StreamPropertiesObjectData;
255					unset($StreamPropertiesObjectData); // clear for next stream, if any
256					break;
257
258				case GETID3_ASF_Header_Extension_Object:
259					// Header Extension Object: (mandatory, one only)
260					// Field Name                   Field Type   Size (bits)
261					// Object ID                    GUID         128             // GUID for Header Extension object - GETID3_ASF_Header_Extension_Object
262					// Object Size                  QWORD        64              // size of Header Extension object, including 46 bytes of Header Extension Object header
263					// Reserved Field 1             GUID         128             // hardcoded: GETID3_ASF_Reserved_1
264					// Reserved Field 2             WORD         16              // hardcoded: 0x00000006
265					// Header Extension Data Size   DWORD        32              // in bytes. valid: 0, or > 24. equals object size minus 46
266					// Header Extension Data        BYTESTREAM   variable        // array of zero or more extended header objects
267
268					// shortcut
269					$thisfile_asf['header_extension_object'] = array();
270					$thisfile_asf_headerextensionobject      = &$thisfile_asf['header_extension_object'];
271
272					$thisfile_asf_headerextensionobject['offset']              = $NextObjectOffset + $offset;
273					$thisfile_asf_headerextensionobject['objectid']            = $NextObjectGUID;
274					$thisfile_asf_headerextensionobject['objectid_guid']       = $NextObjectGUIDtext;
275					$thisfile_asf_headerextensionobject['objectsize']          = $NextObjectSize;
276					$thisfile_asf_headerextensionobject['reserved_1']          = substr($ASFHeaderData, $offset, 16);
277					$offset += 16;
278					$thisfile_asf_headerextensionobject['reserved_1_guid']     = $this->BytestringToGUID($thisfile_asf_headerextensionobject['reserved_1']);
279					if ($thisfile_asf_headerextensionobject['reserved_1'] != GETID3_ASF_Reserved_1) {
280						$this->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).')');
281						//return false;
282						break;
283					}
284					$thisfile_asf_headerextensionobject['reserved_2']          = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 2));
285					$offset += 2;
286					if ($thisfile_asf_headerextensionobject['reserved_2'] != 6) {
287						$this->warning('header_extension_object.reserved_2 ('.$thisfile_asf_headerextensionobject['reserved_2'].') does not match expected value of "6"');
288						//return false;
289						break;
290					}
291					$thisfile_asf_headerextensionobject['extension_data_size'] = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 4));
292					$offset += 4;
293					$thisfile_asf_headerextensionobject['extension_data']      =                              substr($ASFHeaderData, $offset, $thisfile_asf_headerextensionobject['extension_data_size']);
294					$unhandled_sections = 0;
295					$thisfile_asf_headerextensionobject['extension_data_parsed'] = $this->HeaderExtensionObjectDataParse($thisfile_asf_headerextensionobject['extension_data'], $unhandled_sections);
296					if ($unhandled_sections === 0) {
297						unset($thisfile_asf_headerextensionobject['extension_data']);
298					}
299					$offset += $thisfile_asf_headerextensionobject['extension_data_size'];
300					break;
301
302				case GETID3_ASF_Codec_List_Object:
303					// Codec List Object: (optional, one only)
304					// Field Name                   Field Type   Size (bits)
305					// Object ID                    GUID         128             // GUID for Codec List object - GETID3_ASF_Codec_List_Object
306					// Object Size                  QWORD        64              // size of Codec List object, including 44 bytes of Codec List Object header
307					// Reserved                     GUID         128             // hardcoded: 86D15241-311D-11D0-A3A4-00A0C90348F6
308					// Codec Entries Count          DWORD        32              // number of entries in Codec Entries array
309					// Codec Entries                array of:    variable        //
310					// * Type                       WORD         16              // 0x0001 = Video Codec, 0x0002 = Audio Codec, 0xFFFF = Unknown Codec
311					// * Codec Name Length          WORD         16              // number of Unicode characters stored in the Codec Name field
312					// * Codec Name                 WCHAR        variable        // array of Unicode characters - name of codec used to create the content
313					// * Codec Description Length   WORD         16              // number of Unicode characters stored in the Codec Description field
314					// * Codec Description          WCHAR        variable        // array of Unicode characters - description of format used to create the content
315					// * Codec Information Length   WORD         16              // number of Unicode characters stored in the Codec Information field
316					// * Codec Information          BYTESTREAM   variable        // opaque array of information bytes about the codec used to create the content
317
318					// shortcut
319					$thisfile_asf['codec_list_object'] = array();
320					$thisfile_asf_codeclistobject      = &$thisfile_asf['codec_list_object'];
321
322					$thisfile_asf_codeclistobject['offset']                    = $NextObjectOffset + $offset;
323					$thisfile_asf_codeclistobject['objectid']                  = $NextObjectGUID;
324					$thisfile_asf_codeclistobject['objectid_guid']             = $NextObjectGUIDtext;
325					$thisfile_asf_codeclistobject['objectsize']                = $NextObjectSize;
326					$thisfile_asf_codeclistobject['reserved']                  = substr($ASFHeaderData, $offset, 16);
327					$offset += 16;
328					$thisfile_asf_codeclistobject['reserved_guid']             = $this->BytestringToGUID($thisfile_asf_codeclistobject['reserved']);
329					if ($thisfile_asf_codeclistobject['reserved'] != $this->GUIDtoBytestring('86D15241-311D-11D0-A3A4-00A0C90348F6')) {
330						$this->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}');
331						//return false;
332						break;
333					}
334					$thisfile_asf_codeclistobject['codec_entries_count'] = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 4));
335					$offset += 4;
336					for ($CodecEntryCounter = 0; $CodecEntryCounter < $thisfile_asf_codeclistobject['codec_entries_count']; $CodecEntryCounter++) {
337						// shortcut
338						$thisfile_asf_codeclistobject['codec_entries'][$CodecEntryCounter] = array();
339						$thisfile_asf_codeclistobject_codecentries_current = &$thisfile_asf_codeclistobject['codec_entries'][$CodecEntryCounter];
340
341						$thisfile_asf_codeclistobject_codecentries_current['type_raw'] = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 2));
342						$offset += 2;
343						$thisfile_asf_codeclistobject_codecentries_current['type'] = self::codecListObjectTypeLookup($thisfile_asf_codeclistobject_codecentries_current['type_raw']);
344
345						$CodecNameLength = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 2)) * 2; // 2 bytes per character
346						$offset += 2;
347						$thisfile_asf_codeclistobject_codecentries_current['name'] = substr($ASFHeaderData, $offset, $CodecNameLength);
348						$offset += $CodecNameLength;
349
350						$CodecDescriptionLength = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 2)) * 2; // 2 bytes per character
351						$offset += 2;
352						$thisfile_asf_codeclistobject_codecentries_current['description'] = substr($ASFHeaderData, $offset, $CodecDescriptionLength);
353						$offset += $CodecDescriptionLength;
354
355						$CodecInformationLength = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 2));
356						$offset += 2;
357						$thisfile_asf_codeclistobject_codecentries_current['information'] = substr($ASFHeaderData, $offset, $CodecInformationLength);
358						$offset += $CodecInformationLength;
359
360						if ($thisfile_asf_codeclistobject_codecentries_current['type_raw'] == 2) { // audio codec
361
362							if (strpos($thisfile_asf_codeclistobject_codecentries_current['description'], ',') === false) {
363								$this->warning('[asf][codec_list_object][codec_entries]['.$CodecEntryCounter.'][description] expected to contain comma-separated list of parameters: "'.$thisfile_asf_codeclistobject_codecentries_current['description'].'"');
364							} else {
365
366								list($AudioCodecBitrate, $AudioCodecFrequency, $AudioCodecChannels) = explode(',', $this->TrimConvert($thisfile_asf_codeclistobject_codecentries_current['description']));
367								$thisfile_audio['codec'] = $this->TrimConvert($thisfile_asf_codeclistobject_codecentries_current['name']);
368
369								if (!isset($thisfile_audio['bitrate']) && strstr($AudioCodecBitrate, 'kbps')) {
370									$thisfile_audio['bitrate'] = (int) trim(str_replace('kbps', '', $AudioCodecBitrate)) * 1000;
371								}
372								//if (!isset($thisfile_video['bitrate']) && isset($thisfile_audio['bitrate']) && isset($thisfile_asf['file_properties_object']['max_bitrate']) && ($thisfile_asf_codeclistobject['codec_entries_count'] > 1)) {
373								if (empty($thisfile_video['bitrate']) && !empty($thisfile_audio['bitrate']) && !empty($info['bitrate'])) {
374									//$thisfile_video['bitrate'] = $thisfile_asf['file_properties_object']['max_bitrate'] - $thisfile_audio['bitrate'];
375									$thisfile_video['bitrate'] = $info['bitrate'] - $thisfile_audio['bitrate'];
376								}
377
378								$AudioCodecFrequency = (int) trim(str_replace('kHz', '', $AudioCodecFrequency));
379								switch ($AudioCodecFrequency) {
380									case 8:
381									case 8000:
382										$thisfile_audio['sample_rate'] = 8000;
383										break;
384
385									case 11:
386									case 11025:
387										$thisfile_audio['sample_rate'] = 11025;
388										break;
389
390									case 12:
391									case 12000:
392										$thisfile_audio['sample_rate'] = 12000;
393										break;
394
395									case 16:
396									case 16000:
397										$thisfile_audio['sample_rate'] = 16000;
398										break;
399
400									case 22:
401									case 22050:
402										$thisfile_audio['sample_rate'] = 22050;
403										break;
404
405									case 24:
406									case 24000:
407										$thisfile_audio['sample_rate'] = 24000;
408										break;
409
410									case 32:
411									case 32000:
412										$thisfile_audio['sample_rate'] = 32000;
413										break;
414
415									case 44:
416									case 441000:
417										$thisfile_audio['sample_rate'] = 44100;
418										break;
419
420									case 48:
421									case 48000:
422										$thisfile_audio['sample_rate'] = 48000;
423										break;
424
425									default:
426										$this->warning('unknown frequency: "'.$AudioCodecFrequency.'" ('.$this->TrimConvert($thisfile_asf_codeclistobject_codecentries_current['description']).')');
427										break;
428								}
429
430								if (!isset($thisfile_audio['channels'])) {
431									if (strstr($AudioCodecChannels, 'stereo')) {
432										$thisfile_audio['channels'] = 2;
433									} elseif (strstr($AudioCodecChannels, 'mono')) {
434										$thisfile_audio['channels'] = 1;
435									}
436								}
437
438							}
439						}
440					}
441					break;
442
443				case GETID3_ASF_Script_Command_Object:
444					// Script Command Object: (optional, one only)
445					// Field Name                   Field Type   Size (bits)
446					// Object ID                    GUID         128             // GUID for Script Command object - GETID3_ASF_Script_Command_Object
447					// Object Size                  QWORD        64              // size of Script Command object, including 44 bytes of Script Command Object header
448					// Reserved                     GUID         128             // hardcoded: 4B1ACBE3-100B-11D0-A39B-00A0C90348F6
449					// Commands Count               WORD         16              // number of Commands structures in the Script Commands Objects
450					// Command Types Count          WORD         16              // number of Command Types structures in the Script Commands Objects
451					// Command Types                array of:    variable        //
452					// * Command Type Name Length   WORD         16              // number of Unicode characters for Command Type Name
453					// * Command Type Name          WCHAR        variable        // array of Unicode characters - name of a type of command
454					// Commands                     array of:    variable        //
455					// * Presentation Time          DWORD        32              // presentation time of that command, in milliseconds
456					// * Type Index                 WORD         16              // type of this command, as a zero-based index into the array of Command Types of this object
457					// * Command Name Length        WORD         16              // number of Unicode characters for Command Name
458					// * Command Name               WCHAR        variable        // array of Unicode characters - name of this command
459
460					// shortcut
461					$thisfile_asf['script_command_object'] = array();
462					$thisfile_asf_scriptcommandobject      = &$thisfile_asf['script_command_object'];
463
464					$thisfile_asf_scriptcommandobject['offset']               = $NextObjectOffset + $offset;
465					$thisfile_asf_scriptcommandobject['objectid']             = $NextObjectGUID;
466					$thisfile_asf_scriptcommandobject['objectid_guid']        = $NextObjectGUIDtext;
467					$thisfile_asf_scriptcommandobject['objectsize']           = $NextObjectSize;
468					$thisfile_asf_scriptcommandobject['reserved']             = substr($ASFHeaderData, $offset, 16);
469					$offset += 16;
470					$thisfile_asf_scriptcommandobject['reserved_guid']        = $this->BytestringToGUID($thisfile_asf_scriptcommandobject['reserved']);
471					if ($thisfile_asf_scriptcommandobject['reserved'] != $this->GUIDtoBytestring('4B1ACBE3-100B-11D0-A39B-00A0C90348F6')) {
472						$this->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}');
473						//return false;
474						break;
475					}
476					$thisfile_asf_scriptcommandobject['commands_count']       = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 2));
477					$offset += 2;
478					$thisfile_asf_scriptcommandobject['command_types_count']  = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 2));
479					$offset += 2;
480					for ($CommandTypesCounter = 0; $CommandTypesCounter < $thisfile_asf_scriptcommandobject['command_types_count']; $CommandTypesCounter++) {
481						$CommandTypeNameLength = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 2)) * 2; // 2 bytes per character
482						$offset += 2;
483						$thisfile_asf_scriptcommandobject['command_types'][$CommandTypesCounter]['name'] = substr($ASFHeaderData, $offset, $CommandTypeNameLength);
484						$offset += $CommandTypeNameLength;
485					}
486					for ($CommandsCounter = 0; $CommandsCounter < $thisfile_asf_scriptcommandobject['commands_count']; $CommandsCounter++) {
487						$thisfile_asf_scriptcommandobject['commands'][$CommandsCounter]['presentation_time']  = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 4));
488						$offset += 4;
489						$thisfile_asf_scriptcommandobject['commands'][$CommandsCounter]['type_index']         = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 2));
490						$offset += 2;
491
492						$CommandTypeNameLength = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 2)) * 2; // 2 bytes per character
493						$offset += 2;
494						$thisfile_asf_scriptcommandobject['commands'][$CommandsCounter]['name'] = substr($ASFHeaderData, $offset, $CommandTypeNameLength);
495						$offset += $CommandTypeNameLength;
496					}
497					break;
498
499				case GETID3_ASF_Marker_Object:
500					// Marker Object: (optional, one only)
501					// Field Name                   Field Type   Size (bits)
502					// Object ID                    GUID         128             // GUID for Marker object - GETID3_ASF_Marker_Object
503					// Object Size                  QWORD        64              // size of Marker object, including 48 bytes of Marker Object header
504					// Reserved                     GUID         128             // hardcoded: 4CFEDB20-75F6-11CF-9C0F-00A0C90349CB
505					// Markers Count                DWORD        32              // number of Marker structures in Marker Object
506					// Reserved                     WORD         16              // hardcoded: 0x0000
507					// Name Length                  WORD         16              // number of bytes in the Name field
508					// Name                         WCHAR        variable        // name of the Marker Object
509					// Markers                      array of:    variable        //
510					// * Offset                     QWORD        64              // byte offset into Data Object
511					// * Presentation Time          QWORD        64              // in 100-nanosecond units
512					// * Entry Length               WORD         16              // length in bytes of (Send Time + Flags + Marker Description Length + Marker Description + Padding)
513					// * Send Time                  DWORD        32              // in milliseconds
514					// * Flags                      DWORD        32              // hardcoded: 0x00000000
515					// * Marker Description Length  DWORD        32              // number of bytes in Marker Description field
516					// * Marker Description         WCHAR        variable        // array of Unicode characters - description of marker entry
517					// * Padding                    BYTESTREAM   variable        // optional padding bytes
518
519					// shortcut
520					$thisfile_asf['marker_object'] = array();
521					$thisfile_asf_markerobject     = &$thisfile_asf['marker_object'];
522
523					$thisfile_asf_markerobject['offset']               = $NextObjectOffset + $offset;
524					$thisfile_asf_markerobject['objectid']             = $NextObjectGUID;
525					$thisfile_asf_markerobject['objectid_guid']        = $NextObjectGUIDtext;
526					$thisfile_asf_markerobject['objectsize']           = $NextObjectSize;
527					$thisfile_asf_markerobject['reserved']             = substr($ASFHeaderData, $offset, 16);
528					$offset += 16;
529					$thisfile_asf_markerobject['reserved_guid']        = $this->BytestringToGUID($thisfile_asf_markerobject['reserved']);
530					if ($thisfile_asf_markerobject['reserved'] != $this->GUIDtoBytestring('4CFEDB20-75F6-11CF-9C0F-00A0C90349CB')) {
531						$this->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}');
532						break;
533					}
534					$thisfile_asf_markerobject['markers_count'] = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 4));
535					$offset += 4;
536					$thisfile_asf_markerobject['reserved_2'] = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 2));
537					$offset += 2;
538					if ($thisfile_asf_markerobject['reserved_2'] != 0) {
539						$this->warning('marker_object.reserved_2 ('.$thisfile_asf_markerobject['reserved_2'].') does not match expected value of "0"');
540						break;
541					}
542					$thisfile_asf_markerobject['name_length'] = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 2));
543					$offset += 2;
544					$thisfile_asf_markerobject['name'] = substr($ASFHeaderData, $offset, $thisfile_asf_markerobject['name_length']);
545					$offset += $thisfile_asf_markerobject['name_length'];
546					for ($MarkersCounter = 0; $MarkersCounter < $thisfile_asf_markerobject['markers_count']; $MarkersCounter++) {
547						$thisfile_asf_markerobject['markers'][$MarkersCounter]['offset']  = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 8));
548						$offset += 8;
549						$thisfile_asf_markerobject['markers'][$MarkersCounter]['presentation_time']         = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 8));
550						$offset += 8;
551						$thisfile_asf_markerobject['markers'][$MarkersCounter]['entry_length']              = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 2));
552						$offset += 2;
553						$thisfile_asf_markerobject['markers'][$MarkersCounter]['send_time']                 = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 4));
554						$offset += 4;
555						$thisfile_asf_markerobject['markers'][$MarkersCounter]['flags']                     = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 4));
556						$offset += 4;
557						$thisfile_asf_markerobject['markers'][$MarkersCounter]['marker_description_length'] = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 4));
558						$offset += 4;
559						$thisfile_asf_markerobject['markers'][$MarkersCounter]['marker_description']        = substr($ASFHeaderData, $offset, $thisfile_asf_markerobject['markers'][$MarkersCounter]['marker_description_length']);
560						$offset += $thisfile_asf_markerobject['markers'][$MarkersCounter]['marker_description_length'];
561						$PaddingLength = $thisfile_asf_markerobject['markers'][$MarkersCounter]['entry_length'] - 4 -  4 - 4 - $thisfile_asf_markerobject['markers'][$MarkersCounter]['marker_description_length'];
562						if ($PaddingLength > 0) {
563							$thisfile_asf_markerobject['markers'][$MarkersCounter]['padding']               = substr($ASFHeaderData, $offset, $PaddingLength);
564							$offset += $PaddingLength;
565						}
566					}
567					break;
568
569				case GETID3_ASF_Bitrate_Mutual_Exclusion_Object:
570					// Bitrate Mutual Exclusion Object: (optional)
571					// Field Name                   Field Type   Size (bits)
572					// Object ID                    GUID         128             // GUID for Bitrate Mutual Exclusion object - GETID3_ASF_Bitrate_Mutual_Exclusion_Object
573					// Object Size                  QWORD        64              // size of Bitrate Mutual Exclusion object, including 42 bytes of Bitrate Mutual Exclusion Object header
574					// Exlusion Type                GUID         128             // nature of mutual exclusion relationship. one of: (GETID3_ASF_Mutex_Bitrate, GETID3_ASF_Mutex_Unknown)
575					// Stream Numbers Count         WORD         16              // number of video streams
576					// Stream Numbers               WORD         variable        // array of mutually exclusive video stream numbers. 1 <= valid <= 127
577
578					// shortcut
579					$thisfile_asf['bitrate_mutual_exclusion_object'] = array();
580					$thisfile_asf_bitratemutualexclusionobject       = &$thisfile_asf['bitrate_mutual_exclusion_object'];
581
582					$thisfile_asf_bitratemutualexclusionobject['offset']               = $NextObjectOffset + $offset;
583					$thisfile_asf_bitratemutualexclusionobject['objectid']             = $NextObjectGUID;
584					$thisfile_asf_bitratemutualexclusionobject['objectid_guid']        = $NextObjectGUIDtext;
585					$thisfile_asf_bitratemutualexclusionobject['objectsize']           = $NextObjectSize;
586					$thisfile_asf_bitratemutualexclusionobject['reserved']             = substr($ASFHeaderData, $offset, 16);
587					$thisfile_asf_bitratemutualexclusionobject['reserved_guid']        = $this->BytestringToGUID($thisfile_asf_bitratemutualexclusionobject['reserved']);
588					$offset += 16;
589					if (($thisfile_asf_bitratemutualexclusionobject['reserved'] != GETID3_ASF_Mutex_Bitrate) && ($thisfile_asf_bitratemutualexclusionobject['reserved'] != GETID3_ASF_Mutex_Unknown)) {
590						$this->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).'}');
591						//return false;
592						break;
593					}
594					$thisfile_asf_bitratemutualexclusionobject['stream_numbers_count'] = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 2));
595					$offset += 2;
596					for ($StreamNumberCounter = 0; $StreamNumberCounter < $thisfile_asf_bitratemutualexclusionobject['stream_numbers_count']; $StreamNumberCounter++) {
597						$thisfile_asf_bitratemutualexclusionobject['stream_numbers'][$StreamNumberCounter] = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 2));
598						$offset += 2;
599					}
600					break;
601
602				case GETID3_ASF_Error_Correction_Object:
603					// Error Correction Object: (optional, one only)
604					// Field Name                   Field Type   Size (bits)
605					// Object ID                    GUID         128             // GUID for Error Correction object - GETID3_ASF_Error_Correction_Object
606					// Object Size                  QWORD        64              // size of Error Correction object, including 44 bytes of Error Correction Object header
607					// Error Correction Type        GUID         128             // type of error correction. one of: (GETID3_ASF_No_Error_Correction, GETID3_ASF_Audio_Spread)
608					// Error Correction Data Length DWORD        32              // number of bytes in Error Correction Data field
609					// Error Correction Data        BYTESTREAM   variable        // structure depends on value of Error Correction Type field
610
611					// shortcut
612					$thisfile_asf['error_correction_object'] = array();
613					$thisfile_asf_errorcorrectionobject      = &$thisfile_asf['error_correction_object'];
614
615					$thisfile_asf_errorcorrectionobject['offset']                = $NextObjectOffset + $offset;
616					$thisfile_asf_errorcorrectionobject['objectid']              = $NextObjectGUID;
617					$thisfile_asf_errorcorrectionobject['objectid_guid']         = $NextObjectGUIDtext;
618					$thisfile_asf_errorcorrectionobject['objectsize']            = $NextObjectSize;
619					$thisfile_asf_errorcorrectionobject['error_correction_type'] = substr($ASFHeaderData, $offset, 16);
620					$offset += 16;
621					$thisfile_asf_errorcorrectionobject['error_correction_guid'] = $this->BytestringToGUID($thisfile_asf_errorcorrectionobject['error_correction_type']);
622					$thisfile_asf_errorcorrectionobject['error_correction_data_length'] = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 4));
623					$offset += 4;
624					switch ($thisfile_asf_errorcorrectionobject['error_correction_type']) {
625						case GETID3_ASF_No_Error_Correction:
626							// should be no data, but just in case there is, skip to the end of the field
627							$offset += $thisfile_asf_errorcorrectionobject['error_correction_data_length'];
628							break;
629
630						case GETID3_ASF_Audio_Spread:
631							// Field Name                   Field Type   Size (bits)
632							// Span                         BYTE         8               // number of packets over which audio will be spread.
633							// Virtual Packet Length        WORD         16              // size of largest audio payload found in audio stream
634							// Virtual Chunk Length         WORD         16              // size of largest audio payload found in audio stream
635							// Silence Data Length          WORD         16              // number of bytes in Silence Data field
636							// Silence Data                 BYTESTREAM   variable        // hardcoded: 0x00 * (Silence Data Length) bytes
637
638							$thisfile_asf_errorcorrectionobject['span']                  = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 1));
639							$offset += 1;
640							$thisfile_asf_errorcorrectionobject['virtual_packet_length'] = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 2));
641							$offset += 2;
642							$thisfile_asf_errorcorrectionobject['virtual_chunk_length']  = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 2));
643							$offset += 2;
644							$thisfile_asf_errorcorrectionobject['silence_data_length']   = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 2));
645							$offset += 2;
646							$thisfile_asf_errorcorrectionobject['silence_data']          = substr($ASFHeaderData, $offset, $thisfile_asf_errorcorrectionobject['silence_data_length']);
647							$offset += $thisfile_asf_errorcorrectionobject['silence_data_length'];
648							break;
649
650						default:
651							$this->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).'}');
652							//return false;
653							break;
654					}
655
656					break;
657
658				case GETID3_ASF_Content_Description_Object:
659					// Content Description Object: (optional, one only)
660					// Field Name                   Field Type   Size (bits)
661					// Object ID                    GUID         128             // GUID for Content Description object - GETID3_ASF_Content_Description_Object
662					// Object Size                  QWORD        64              // size of Content Description object, including 34 bytes of Content Description Object header
663					// Title Length                 WORD         16              // number of bytes in Title field
664					// Author Length                WORD         16              // number of bytes in Author field
665					// Copyright Length             WORD         16              // number of bytes in Copyright field
666					// Description Length           WORD         16              // number of bytes in Description field
667					// Rating Length                WORD         16              // number of bytes in Rating field
668					// Title                        WCHAR        16              // array of Unicode characters - Title
669					// Author                       WCHAR        16              // array of Unicode characters - Author
670					// Copyright                    WCHAR        16              // array of Unicode characters - Copyright
671					// Description                  WCHAR        16              // array of Unicode characters - Description
672					// Rating                       WCHAR        16              // array of Unicode characters - Rating
673
674					// shortcut
675					$thisfile_asf['content_description_object'] = array();
676					$thisfile_asf_contentdescriptionobject      = &$thisfile_asf['content_description_object'];
677
678					$thisfile_asf_contentdescriptionobject['offset']                = $NextObjectOffset + $offset;
679					$thisfile_asf_contentdescriptionobject['objectid']              = $NextObjectGUID;
680					$thisfile_asf_contentdescriptionobject['objectid_guid']         = $NextObjectGUIDtext;
681					$thisfile_asf_contentdescriptionobject['objectsize']            = $NextObjectSize;
682					$thisfile_asf_contentdescriptionobject['title_length']          = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 2));
683					$offset += 2;
684					$thisfile_asf_contentdescriptionobject['author_length']         = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 2));
685					$offset += 2;
686					$thisfile_asf_contentdescriptionobject['copyright_length']      = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 2));
687					$offset += 2;
688					$thisfile_asf_contentdescriptionobject['description_length']    = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 2));
689					$offset += 2;
690					$thisfile_asf_contentdescriptionobject['rating_length']         = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 2));
691					$offset += 2;
692					$thisfile_asf_contentdescriptionobject['title']                 = substr($ASFHeaderData, $offset, $thisfile_asf_contentdescriptionobject['title_length']);
693					$offset += $thisfile_asf_contentdescriptionobject['title_length'];
694					$thisfile_asf_contentdescriptionobject['author']                = substr($ASFHeaderData, $offset, $thisfile_asf_contentdescriptionobject['author_length']);
695					$offset += $thisfile_asf_contentdescriptionobject['author_length'];
696					$thisfile_asf_contentdescriptionobject['copyright']             = substr($ASFHeaderData, $offset, $thisfile_asf_contentdescriptionobject['copyright_length']);
697					$offset += $thisfile_asf_contentdescriptionobject['copyright_length'];
698					$thisfile_asf_contentdescriptionobject['description']           = substr($ASFHeaderData, $offset, $thisfile_asf_contentdescriptionobject['description_length']);
699					$offset += $thisfile_asf_contentdescriptionobject['description_length'];
700					$thisfile_asf_contentdescriptionobject['rating']                = substr($ASFHeaderData, $offset, $thisfile_asf_contentdescriptionobject['rating_length']);
701					$offset += $thisfile_asf_contentdescriptionobject['rating_length'];
702
703					$ASFcommentKeysToCopy = array('title'=>'title', 'author'=>'artist', 'copyright'=>'copyright', 'description'=>'comment', 'rating'=>'rating');
704					foreach ($ASFcommentKeysToCopy as $keytocopyfrom => $keytocopyto) {
705						if (!empty($thisfile_asf_contentdescriptionobject[$keytocopyfrom])) {
706							$thisfile_asf_comments[$keytocopyto][] = $this->TrimTerm($thisfile_asf_contentdescriptionobject[$keytocopyfrom]);
707						}
708					}
709					break;
710
711				case GETID3_ASF_Extended_Content_Description_Object:
712					// Extended Content Description Object: (optional, one only)
713					// Field Name                   Field Type   Size (bits)
714					// Object ID                    GUID         128             // GUID for Extended Content Description object - GETID3_ASF_Extended_Content_Description_Object
715					// Object Size                  QWORD        64              // size of ExtendedContent Description object, including 26 bytes of Extended Content Description Object header
716					// Content Descriptors Count    WORD         16              // number of entries in Content Descriptors list
717					// Content Descriptors          array of:    variable        //
718					// * Descriptor Name Length     WORD         16              // size in bytes of Descriptor Name field
719					// * Descriptor Name            WCHAR        variable        // array of Unicode characters - Descriptor Name
720					// * Descriptor Value Data Type WORD         16              // Lookup array:
721																					// 0x0000 = Unicode String (variable length)
722																					// 0x0001 = BYTE array     (variable length)
723																					// 0x0002 = BOOL           (DWORD, 32 bits)
724																					// 0x0003 = DWORD          (DWORD, 32 bits)
725																					// 0x0004 = QWORD          (QWORD, 64 bits)
726																					// 0x0005 = WORD           (WORD,  16 bits)
727					// * Descriptor Value Length    WORD         16              // number of bytes stored in Descriptor Value field
728					// * Descriptor Value           variable     variable        // value for Content Descriptor
729
730					// shortcut
731					$thisfile_asf['extended_content_description_object'] = array();
732					$thisfile_asf_extendedcontentdescriptionobject       = &$thisfile_asf['extended_content_description_object'];
733
734					$thisfile_asf_extendedcontentdescriptionobject['offset']                    = $NextObjectOffset + $offset;
735					$thisfile_asf_extendedcontentdescriptionobject['objectid']                  = $NextObjectGUID;
736					$thisfile_asf_extendedcontentdescriptionobject['objectid_guid']             = $NextObjectGUIDtext;
737					$thisfile_asf_extendedcontentdescriptionobject['objectsize']                = $NextObjectSize;
738					$thisfile_asf_extendedcontentdescriptionobject['content_descriptors_count'] = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 2));
739					$offset += 2;
740					for ($ExtendedContentDescriptorsCounter = 0; $ExtendedContentDescriptorsCounter < $thisfile_asf_extendedcontentdescriptionobject['content_descriptors_count']; $ExtendedContentDescriptorsCounter++) {
741						// shortcut
742						$thisfile_asf_extendedcontentdescriptionobject['content_descriptors'][$ExtendedContentDescriptorsCounter] = array();
743						$thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current                 = &$thisfile_asf_extendedcontentdescriptionobject['content_descriptors'][$ExtendedContentDescriptorsCounter];
744
745						$thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['base_offset']  = $offset + 30;
746						$thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['name_length']  = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 2));
747						$offset += 2;
748						$thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['name']         = substr($ASFHeaderData, $offset, $thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['name_length']);
749						$offset += $thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['name_length'];
750						$thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value_type']   = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 2));
751						$offset += 2;
752						$thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value_length'] = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 2));
753						$offset += 2;
754						$thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value']        = substr($ASFHeaderData, $offset, $thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value_length']);
755						$offset += $thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value_length'];
756						switch ($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value_type']) {
757							case 0x0000: // Unicode string
758								break;
759
760							case 0x0001: // BYTE array
761								// do nothing
762								break;
763
764							case 0x0002: // BOOL
765								$thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value'] = (bool) getid3_lib::LittleEndian2Int($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value']);
766								break;
767
768							case 0x0003: // DWORD
769							case 0x0004: // QWORD
770							case 0x0005: // WORD
771								$thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value'] = getid3_lib::LittleEndian2Int($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value']);
772								break;
773
774							default:
775								$this->warning('extended_content_description.content_descriptors.'.$ExtendedContentDescriptorsCounter.'.value_type is invalid ('.$thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value_type'].')');
776								//return false;
777								break;
778						}
779						switch ($this->TrimConvert(strtolower($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['name']))) {
780
781							case 'wm/albumartist':
782							case 'artist':
783								// Note: not 'artist', that comes from 'author' tag
784								$thisfile_asf_comments['albumartist'] = array($this->TrimTerm($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value']));
785								break;
786
787							case 'wm/albumtitle':
788							case 'album':
789								$thisfile_asf_comments['album']  = array($this->TrimTerm($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value']));
790								break;
791
792							case 'wm/genre':
793							case 'genre':
794								$thisfile_asf_comments['genre'] = array($this->TrimTerm($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value']));
795								break;
796
797							case 'wm/partofset':
798								$thisfile_asf_comments['partofset'] = array($this->TrimTerm($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value']));
799								break;
800
801							case 'wm/tracknumber':
802							case 'tracknumber':
803								// be careful casting to int: casting unicode strings to int gives unexpected results (stops parsing at first non-numeric character)
804								$thisfile_asf_comments['track_number'] = array($this->TrimTerm($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value']));
805								foreach ($thisfile_asf_comments['track_number'] as $key => $value) {
806									if (preg_match('/^[0-9\x00]+$/', $value)) {
807										$thisfile_asf_comments['track_number'][$key] = intval(str_replace("\x00", '', $value));
808									}
809								}
810								break;
811
812							case 'wm/track':
813								if (empty($thisfile_asf_comments['track_number'])) {
814									$thisfile_asf_comments['track_number'] = array(1 + (int) $this->TrimConvert($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value']));
815								}
816								break;
817
818							case 'wm/year':
819							case 'year':
820							case 'date':
821								$thisfile_asf_comments['year'] = array( $this->TrimTerm($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value']));
822								break;
823
824							case 'wm/lyrics':
825							case 'lyrics':
826								$thisfile_asf_comments['lyrics'] = array($this->TrimTerm($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value']));
827								break;
828
829							case 'isvbr':
830								if ($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value']) {
831									$thisfile_audio['bitrate_mode'] = 'vbr';
832									$thisfile_video['bitrate_mode'] = 'vbr';
833								}
834								break;
835
836							case 'id3':
837								$this->getid3->include_module('tag.id3v2');
838
839								$getid3_id3v2 = new getid3_id3v2($this->getid3);
840								$getid3_id3v2->AnalyzeString($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value']);
841								unset($getid3_id3v2);
842
843								if ($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value_length'] > 1024) {
844									$thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value'] = '<value too large to display>';
845								}
846								break;
847
848							case 'wm/encodingtime':
849								$thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['encoding_time_unix'] = $this->FILETIMEtoUNIXtime($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value']);
850								$thisfile_asf_comments['encoding_time_unix'] = array($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['encoding_time_unix']);
851								break;
852
853							case 'wm/picture':
854								$WMpicture = $this->ASF_WMpicture($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value']);
855								foreach ($WMpicture as $key => $value) {
856									$thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current[$key] = $value;
857								}
858								unset($WMpicture);
859/*
860								$wm_picture_offset = 0;
861								$thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['image_type_id'] = getid3_lib::LittleEndian2Int(substr($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value'], $wm_picture_offset, 1));
862								$wm_picture_offset += 1;
863								$thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['image_type']    = self::WMpictureTypeLookup($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['image_type_id']);
864								$thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['image_size']    = getid3_lib::LittleEndian2Int(substr($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value'], $wm_picture_offset, 4));
865								$wm_picture_offset += 4;
866
867								$thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['image_mime'] = '';
868								do {
869									$next_byte_pair = substr($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value'], $wm_picture_offset, 2);
870									$wm_picture_offset += 2;
871									$thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['image_mime'] .= $next_byte_pair;
872								} while ($next_byte_pair !== "\x00\x00");
873
874								$thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['image_description'] = '';
875								do {
876									$next_byte_pair = substr($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value'], $wm_picture_offset, 2);
877									$wm_picture_offset += 2;
878									$thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['image_description'] .= $next_byte_pair;
879								} while ($next_byte_pair !== "\x00\x00");
880
881								$thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['dataoffset'] = $wm_picture_offset;
882								$thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['data'] = substr($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value'], $wm_picture_offset);
883								unset($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value']);
884
885								$imageinfo = array();
886								$thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['image_mime'] = '';
887								$imagechunkcheck = getid3_lib::GetDataImageSize($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['data'], $imageinfo);
888								unset($imageinfo);
889								if (!empty($imagechunkcheck)) {
890									$thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['image_mime'] = image_type_to_mime_type($imagechunkcheck[2]);
891								}
892								if (!isset($thisfile_asf_comments['picture'])) {
893									$thisfile_asf_comments['picture'] = array();
894								}
895								$thisfile_asf_comments['picture'][] = array('data'=>$thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['data'], 'image_mime'=>$thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['image_mime']);
896*/
897								break;
898
899							default:
900								switch ($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value_type']) {
901									case 0: // Unicode string
902										if (substr($this->TrimConvert($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['name']), 0, 3) == 'WM/') {
903											$thisfile_asf_comments[str_replace('wm/', '', strtolower($this->TrimConvert($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['name'])))] = array($this->TrimTerm($thisfile_asf_extendedcontentdescriptionobject_contentdescriptor_current['value']));
904										}
905										break;
906
907									case 1:
908										break;
909								}
910								break;
911						}
912
913					}
914					break;
915
916				case GETID3_ASF_Stream_Bitrate_Properties_Object:
917					// Stream Bitrate Properties Object: (optional, one only)
918					// Field Name                   Field Type   Size (bits)
919					// Object ID                    GUID         128             // GUID for Stream Bitrate Properties object - GETID3_ASF_Stream_Bitrate_Properties_Object
920					// Object Size                  QWORD        64              // size of Extended Content Description object, including 26 bytes of Stream Bitrate Properties Object header
921					// Bitrate Records Count        WORD         16              // number of records in Bitrate Records
922					// Bitrate Records              array of:    variable        //
923					// * Flags                      WORD         16              //
924					// * * Stream Number            bits         7  (0x007F)     // number of this stream
925					// * * Reserved                 bits         9  (0xFF80)     // hardcoded: 0
926					// * Average Bitrate            DWORD        32              // in bits per second
927
928					// shortcut
929					$thisfile_asf['stream_bitrate_properties_object'] = array();
930					$thisfile_asf_streambitratepropertiesobject       = &$thisfile_asf['stream_bitrate_properties_object'];
931
932					$thisfile_asf_streambitratepropertiesobject['offset']                    = $NextObjectOffset + $offset;
933					$thisfile_asf_streambitratepropertiesobject['objectid']                  = $NextObjectGUID;
934					$thisfile_asf_streambitratepropertiesobject['objectid_guid']             = $NextObjectGUIDtext;
935					$thisfile_asf_streambitratepropertiesobject['objectsize']                = $NextObjectSize;
936					$thisfile_asf_streambitratepropertiesobject['bitrate_records_count']     = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 2));
937					$offset += 2;
938					for ($BitrateRecordsCounter = 0; $BitrateRecordsCounter < $thisfile_asf_streambitratepropertiesobject['bitrate_records_count']; $BitrateRecordsCounter++) {
939						$thisfile_asf_streambitratepropertiesobject['bitrate_records'][$BitrateRecordsCounter]['flags_raw'] = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 2));
940						$offset += 2;
941						$thisfile_asf_streambitratepropertiesobject['bitrate_records'][$BitrateRecordsCounter]['flags']['stream_number'] = $thisfile_asf_streambitratepropertiesobject['bitrate_records'][$BitrateRecordsCounter]['flags_raw'] & 0x007F;
942						$thisfile_asf_streambitratepropertiesobject['bitrate_records'][$BitrateRecordsCounter]['bitrate'] = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 4));
943						$offset += 4;
944					}
945					break;
946
947				case GETID3_ASF_Padding_Object:
948					// Padding Object: (optional)
949					// Field Name                   Field Type   Size (bits)
950					// Object ID                    GUID         128             // GUID for Padding object - GETID3_ASF_Padding_Object
951					// Object Size                  QWORD        64              // size of Padding object, including 24 bytes of ASF Padding Object header
952					// Padding Data                 BYTESTREAM   variable        // ignore
953
954					// shortcut
955					$thisfile_asf['padding_object'] = array();
956					$thisfile_asf_paddingobject     = &$thisfile_asf['padding_object'];
957
958					$thisfile_asf_paddingobject['offset']                    = $NextObjectOffset + $offset;
959					$thisfile_asf_paddingobject['objectid']                  = $NextObjectGUID;
960					$thisfile_asf_paddingobject['objectid_guid']             = $NextObjectGUIDtext;
961					$thisfile_asf_paddingobject['objectsize']                = $NextObjectSize;
962					$thisfile_asf_paddingobject['padding_length']            = $thisfile_asf_paddingobject['objectsize'] - 16 - 8;
963					$thisfile_asf_paddingobject['padding']                   = substr($ASFHeaderData, $offset, $thisfile_asf_paddingobject['padding_length']);
964					$offset += ($NextObjectSize - 16 - 8);
965					break;
966
967				case GETID3_ASF_Extended_Content_Encryption_Object:
968				case GETID3_ASF_Content_Encryption_Object:
969					// WMA DRM - just ignore
970					$offset += ($NextObjectSize - 16 - 8);
971					break;
972
973				default:
974					// Implementations shall ignore any standard or non-standard object that they do not know how to handle.
975					if ($this->GUIDname($NextObjectGUIDtext)) {
976						$this->warning('unhandled GUID "'.$this->GUIDname($NextObjectGUIDtext).'" {'.$NextObjectGUIDtext.'} in ASF header at offset '.($offset - 16 - 8));
977					} else {
978						$this->warning('unknown GUID {'.$NextObjectGUIDtext.'} in ASF header at offset '.($offset - 16 - 8));
979					}
980					$offset += ($NextObjectSize - 16 - 8);
981					break;
982			}
983		}
984		if (isset($thisfile_asf_streambitratepropertiesobject['bitrate_records_count'])) {
985			$ASFbitrateAudio = 0;
986			$ASFbitrateVideo = 0;
987			for ($BitrateRecordsCounter = 0; $BitrateRecordsCounter < $thisfile_asf_streambitratepropertiesobject['bitrate_records_count']; $BitrateRecordsCounter++) {
988				if (isset($thisfile_asf_codeclistobject['codec_entries'][$BitrateRecordsCounter])) {
989					switch ($thisfile_asf_codeclistobject['codec_entries'][$BitrateRecordsCounter]['type_raw']) {
990						case 1:
991							$ASFbitrateVideo += $thisfile_asf_streambitratepropertiesobject['bitrate_records'][$BitrateRecordsCounter]['bitrate'];
992							break;
993
994						case 2:
995							$ASFbitrateAudio += $thisfile_asf_streambitratepropertiesobject['bitrate_records'][$BitrateRecordsCounter]['bitrate'];
996							break;
997
998						default:
999							// do nothing
1000							break;
1001					}
1002				}
1003			}
1004			if ($ASFbitrateAudio > 0) {
1005				$thisfile_audio['bitrate'] = $ASFbitrateAudio;
1006			}
1007			if ($ASFbitrateVideo > 0) {
1008				$thisfile_video['bitrate'] = $ASFbitrateVideo;
1009			}
1010		}
1011		if (isset($thisfile_asf['stream_properties_object']) && is_array($thisfile_asf['stream_properties_object'])) {
1012
1013			$thisfile_audio['bitrate'] = 0;
1014			$thisfile_video['bitrate'] = 0;
1015
1016			foreach ($thisfile_asf['stream_properties_object'] as $streamnumber => $streamdata) {
1017
1018				switch ($streamdata['stream_type']) {
1019					case GETID3_ASF_Audio_Media:
1020						// Field Name                   Field Type   Size (bits)
1021						// Codec ID / Format Tag        WORD         16              // unique ID of audio codec - defined as wFormatTag field of WAVEFORMATEX structure
1022						// Number of Channels           WORD         16              // number of channels of audio - defined as nChannels field of WAVEFORMATEX structure
1023						// Samples Per Second           DWORD        32              // in Hertz - defined as nSamplesPerSec field of WAVEFORMATEX structure
1024						// Average number of Bytes/sec  DWORD        32              // bytes/sec of audio stream  - defined as nAvgBytesPerSec field of WAVEFORMATEX structure
1025						// Block Alignment              WORD         16              // block size in bytes of audio codec - defined as nBlockAlign field of WAVEFORMATEX structure
1026						// 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
1027						// Codec Specific Data Size     WORD         16              // size in bytes of Codec Specific Data buffer - defined as cbSize field of WAVEFORMATEX structure
1028						// Codec Specific Data          BYTESTREAM   variable        // array of codec-specific data bytes
1029
1030						// shortcut
1031						$thisfile_asf['audio_media'][$streamnumber] = array();
1032						$thisfile_asf_audiomedia_currentstream      = &$thisfile_asf['audio_media'][$streamnumber];
1033
1034						$audiomediaoffset = 0;
1035
1036						$thisfile_asf_audiomedia_currentstream = getid3_riff::parseWAVEFORMATex(substr($streamdata['type_specific_data'], $audiomediaoffset, 16));
1037						$audiomediaoffset += 16;
1038
1039						$thisfile_audio['lossless'] = false;
1040						switch ($thisfile_asf_audiomedia_currentstream['raw']['wFormatTag']) {
1041							case 0x0001: // PCM
1042							case 0x0163: // WMA9 Lossless
1043								$thisfile_audio['lossless'] = true;
1044								break;
1045						}
1046
1047						if (!empty($thisfile_asf['stream_bitrate_properties_object']['bitrate_records'])) {
1048							foreach ($thisfile_asf['stream_bitrate_properties_object']['bitrate_records'] as $dummy => $dataarray) {
1049								if (isset($dataarray['flags']['stream_number']) && ($dataarray['flags']['stream_number'] == $streamnumber)) {
1050									$thisfile_asf_audiomedia_currentstream['bitrate'] = $dataarray['bitrate'];
1051									$thisfile_audio['bitrate'] += $dataarray['bitrate'];
1052									break;
1053								}
1054							}
1055						} else {
1056							if (!empty($thisfile_asf_audiomedia_currentstream['bytes_sec'])) {
1057								$thisfile_audio['bitrate'] += $thisfile_asf_audiomedia_currentstream['bytes_sec'] * 8;
1058							} elseif (!empty($thisfile_asf_audiomedia_currentstream['bitrate'])) {
1059								$thisfile_audio['bitrate'] += $thisfile_asf_audiomedia_currentstream['bitrate'];
1060							}
1061						}
1062						$thisfile_audio['streams'][$streamnumber]                = $thisfile_asf_audiomedia_currentstream;
1063						$thisfile_audio['streams'][$streamnumber]['wformattag']  = $thisfile_asf_audiomedia_currentstream['raw']['wFormatTag'];
1064						$thisfile_audio['streams'][$streamnumber]['lossless']    = $thisfile_audio['lossless'];
1065						$thisfile_audio['streams'][$streamnumber]['bitrate']     = $thisfile_audio['bitrate'];
1066						$thisfile_audio['streams'][$streamnumber]['dataformat']  = 'wma';
1067						unset($thisfile_audio['streams'][$streamnumber]['raw']);
1068
1069						$thisfile_asf_audiomedia_currentstream['codec_data_size'] = getid3_lib::LittleEndian2Int(substr($streamdata['type_specific_data'], $audiomediaoffset, 2));
1070						$audiomediaoffset += 2;
1071						$thisfile_asf_audiomedia_currentstream['codec_data']      = substr($streamdata['type_specific_data'], $audiomediaoffset, $thisfile_asf_audiomedia_currentstream['codec_data_size']);
1072						$audiomediaoffset += $thisfile_asf_audiomedia_currentstream['codec_data_size'];
1073
1074						break;
1075
1076					case GETID3_ASF_Video_Media:
1077						// Field Name                   Field Type   Size (bits)
1078						// Encoded Image Width          DWORD        32              // width of image in pixels
1079						// Encoded Image Height         DWORD        32              // height of image in pixels
1080						// Reserved Flags               BYTE         8               // hardcoded: 0x02
1081						// Format Data Size             WORD         16              // size of Format Data field in bytes
1082						// Format Data                  array of:    variable        //
1083						// * Format Data Size           DWORD        32              // number of bytes in Format Data field, in bytes - defined as biSize field of BITMAPINFOHEADER structure
1084						// * Image Width                LONG         32              // width of encoded image in pixels - defined as biWidth field of BITMAPINFOHEADER structure
1085						// * Image Height               LONG         32              // height of encoded image in pixels - defined as biHeight field of BITMAPINFOHEADER structure
1086						// * Reserved                   WORD         16              // hardcoded: 0x0001 - defined as biPlanes field of BITMAPINFOHEADER structure
1087						// * Bits Per Pixel Count       WORD         16              // bits per pixel - defined as biBitCount field of BITMAPINFOHEADER structure
1088						// * Compression ID             FOURCC       32              // fourcc of video codec - defined as biCompression field of BITMAPINFOHEADER structure
1089						// * Image Size                 DWORD        32              // image size in bytes - defined as biSizeImage field of BITMAPINFOHEADER structure
1090						// * Horizontal Pixels / Meter  DWORD        32              // horizontal resolution of target device in pixels per meter - defined as biXPelsPerMeter field of BITMAPINFOHEADER structure
1091						// * Vertical Pixels / Meter    DWORD        32              // vertical resolution of target device in pixels per meter - defined as biYPelsPerMeter field of BITMAPINFOHEADER structure
1092						// * Colors Used Count          DWORD        32              // number of color indexes in the color table that are actually used - defined as biClrUsed field of BITMAPINFOHEADER structure
1093						// * 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
1094						// * Codec Specific Data        BYTESTREAM   variable        // array of codec-specific data bytes
1095
1096						// shortcut
1097						$thisfile_asf['video_media'][$streamnumber] = array();
1098						$thisfile_asf_videomedia_currentstream      = &$thisfile_asf['video_media'][$streamnumber];
1099
1100						$videomediaoffset = 0;
1101						$thisfile_asf_videomedia_currentstream['image_width']                     = getid3_lib::LittleEndian2Int(substr($streamdata['type_specific_data'], $videomediaoffset, 4));
1102						$videomediaoffset += 4;
1103						$thisfile_asf_videomedia_currentstream['image_height']                    = getid3_lib::LittleEndian2Int(substr($streamdata['type_specific_data'], $videomediaoffset, 4));
1104						$videomediaoffset += 4;
1105						$thisfile_asf_videomedia_currentstream['flags']                           = getid3_lib::LittleEndian2Int(substr($streamdata['type_specific_data'], $videomediaoffset, 1));
1106						$videomediaoffset += 1;
1107						$thisfile_asf_videomedia_currentstream['format_data_size']                = getid3_lib::LittleEndian2Int(substr($streamdata['type_specific_data'], $videomediaoffset, 2));
1108						$videomediaoffset += 2;
1109						$thisfile_asf_videomedia_currentstream['format_data']['format_data_size'] = getid3_lib::LittleEndian2Int(substr($streamdata['type_specific_data'], $videomediaoffset, 4));
1110						$videomediaoffset += 4;
1111						$thisfile_asf_videomedia_currentstream['format_data']['image_width']      = getid3_lib::LittleEndian2Int(substr($streamdata['type_specific_data'], $videomediaoffset, 4));
1112						$videomediaoffset += 4;
1113						$thisfile_asf_videomedia_currentstream['format_data']['image_height']     = getid3_lib::LittleEndian2Int(substr($streamdata['type_specific_data'], $videomediaoffset, 4));
1114						$videomediaoffset += 4;
1115						$thisfile_asf_videomedia_currentstream['format_data']['reserved']         = getid3_lib::LittleEndian2Int(substr($streamdata['type_specific_data'], $videomediaoffset, 2));
1116						$videomediaoffset += 2;
1117						$thisfile_asf_videomedia_currentstream['format_data']['bits_per_pixel']   = getid3_lib::LittleEndian2Int(substr($streamdata['type_specific_data'], $videomediaoffset, 2));
1118						$videomediaoffset += 2;
1119						$thisfile_asf_videomedia_currentstream['format_data']['codec_fourcc']     = substr($streamdata['type_specific_data'], $videomediaoffset, 4);
1120						$videomediaoffset += 4;
1121						$thisfile_asf_videomedia_currentstream['format_data']['image_size']       = getid3_lib::LittleEndian2Int(substr($streamdata['type_specific_data'], $videomediaoffset, 4));
1122						$videomediaoffset += 4;
1123						$thisfile_asf_videomedia_currentstream['format_data']['horizontal_pels']  = getid3_lib::LittleEndian2Int(substr($streamdata['type_specific_data'], $videomediaoffset, 4));
1124						$videomediaoffset += 4;
1125						$thisfile_asf_videomedia_currentstream['format_data']['vertical_pels']    = getid3_lib::LittleEndian2Int(substr($streamdata['type_specific_data'], $videomediaoffset, 4));
1126						$videomediaoffset += 4;
1127						$thisfile_asf_videomedia_currentstream['format_data']['colors_used']      = getid3_lib::LittleEndian2Int(substr($streamdata['type_specific_data'], $videomediaoffset, 4));
1128						$videomediaoffset += 4;
1129						$thisfile_asf_videomedia_currentstream['format_data']['colors_important'] = getid3_lib::LittleEndian2Int(substr($streamdata['type_specific_data'], $videomediaoffset, 4));
1130						$videomediaoffset += 4;
1131						$thisfile_asf_videomedia_currentstream['format_data']['codec_data']       = substr($streamdata['type_specific_data'], $videomediaoffset);
1132
1133						if (!empty($thisfile_asf['stream_bitrate_properties_object']['bitrate_records'])) {
1134							foreach ($thisfile_asf['stream_bitrate_properties_object']['bitrate_records'] as $dummy => $dataarray) {
1135								if (isset($dataarray['flags']['stream_number']) && ($dataarray['flags']['stream_number'] == $streamnumber)) {
1136									$thisfile_asf_videomedia_currentstream['bitrate'] = $dataarray['bitrate'];
1137									$thisfile_video['streams'][$streamnumber]['bitrate'] = $dataarray['bitrate'];
1138									$thisfile_video['bitrate'] += $dataarray['bitrate'];
1139									break;
1140								}
1141							}
1142						}
1143
1144						$thisfile_asf_videomedia_currentstream['format_data']['codec'] = getid3_riff::fourccLookup($thisfile_asf_videomedia_currentstream['format_data']['codec_fourcc']);
1145
1146						$thisfile_video['streams'][$streamnumber]['fourcc']          = $thisfile_asf_videomedia_currentstream['format_data']['codec_fourcc'];
1147						$thisfile_video['streams'][$streamnumber]['codec']           = $thisfile_asf_videomedia_currentstream['format_data']['codec'];
1148						$thisfile_video['streams'][$streamnumber]['resolution_x']    = $thisfile_asf_videomedia_currentstream['image_width'];
1149						$thisfile_video['streams'][$streamnumber]['resolution_y']    = $thisfile_asf_videomedia_currentstream['image_height'];
1150						$thisfile_video['streams'][$streamnumber]['bits_per_sample'] = $thisfile_asf_videomedia_currentstream['format_data']['bits_per_pixel'];
1151						break;
1152
1153					default:
1154						break;
1155				}
1156			}
1157		}
1158
1159		while ($this->ftell() < $info['avdataend']) {
1160			$NextObjectDataHeader = $this->fread(24);
1161			$offset = 0;
1162			$NextObjectGUID = substr($NextObjectDataHeader, 0, 16);
1163			$offset += 16;
1164			$NextObjectGUIDtext = $this->BytestringToGUID($NextObjectGUID);
1165			$NextObjectSize = getid3_lib::LittleEndian2Int(substr($NextObjectDataHeader, $offset, 8));
1166			$offset += 8;
1167
1168			switch ($NextObjectGUID) {
1169				case GETID3_ASF_Data_Object:
1170					// Data Object: (mandatory, one only)
1171					// Field Name                       Field Type   Size (bits)
1172					// Object ID                        GUID         128             // GUID for Data object - GETID3_ASF_Data_Object
1173					// Object Size                      QWORD        64              // size of Data object, including 50 bytes of Data Object header. may be 0 if FilePropertiesObject.BroadcastFlag == 1
1174					// File ID                          GUID         128             // unique identifier. identical to File ID field in Header Object
1175					// Total Data Packets               QWORD        64              // number of Data Packet entries in Data Object. invalid if FilePropertiesObject.BroadcastFlag == 1
1176					// Reserved                         WORD         16              // hardcoded: 0x0101
1177
1178					// shortcut
1179					$thisfile_asf['data_object'] = array();
1180					$thisfile_asf_dataobject     = &$thisfile_asf['data_object'];
1181
1182					$DataObjectData = $NextObjectDataHeader.$this->fread(50 - 24);
1183					$offset = 24;
1184
1185					$thisfile_asf_dataobject['objectid']           = $NextObjectGUID;
1186					$thisfile_asf_dataobject['objectid_guid']      = $NextObjectGUIDtext;
1187					$thisfile_asf_dataobject['objectsize']         = $NextObjectSize;
1188
1189					$thisfile_asf_dataobject['fileid']             = substr($DataObjectData, $offset, 16);
1190					$offset += 16;
1191					$thisfile_asf_dataobject['fileid_guid']        = $this->BytestringToGUID($thisfile_asf_dataobject['fileid']);
1192					$thisfile_asf_dataobject['total_data_packets'] = getid3_lib::LittleEndian2Int(substr($DataObjectData, $offset, 8));
1193					$offset += 8;
1194					$thisfile_asf_dataobject['reserved']           = getid3_lib::LittleEndian2Int(substr($DataObjectData, $offset, 2));
1195					$offset += 2;
1196					if ($thisfile_asf_dataobject['reserved'] != 0x0101) {
1197						$this->warning('data_object.reserved (0x'.sprintf('%04X', $thisfile_asf_dataobject['reserved']).') does not match expected value of "0x0101"');
1198						//return false;
1199						break;
1200					}
1201
1202					// Data Packets                     array of:    variable        //
1203					// * Error Correction Flags         BYTE         8               //
1204					// * * Error Correction Data Length bits         4               // if Error Correction Length Type == 00, size of Error Correction Data in bytes, else hardcoded: 0000
1205					// * * Opaque Data Present          bits         1               //
1206					// * * Error Correction Length Type bits         2               // number of bits for size of the error correction data. hardcoded: 00
1207					// * * Error Correction Present     bits         1               // If set, use Opaque Data Packet structure, else use Payload structure
1208					// * Error Correction Data
1209
1210					$info['avdataoffset'] = $this->ftell();
1211					$this->fseek(($thisfile_asf_dataobject['objectsize'] - 50), SEEK_CUR); // skip actual audio/video data
1212					$info['avdataend'] = $this->ftell();
1213					break;
1214
1215				case GETID3_ASF_Simple_Index_Object:
1216					// Simple Index Object: (optional, recommended, one per video stream)
1217					// Field Name                       Field Type   Size (bits)
1218					// Object ID                        GUID         128             // GUID for Simple Index object - GETID3_ASF_Data_Object
1219					// Object Size                      QWORD        64              // size of Simple Index object, including 56 bytes of Simple Index Object header
1220					// File ID                          GUID         128             // unique identifier. may be zero or identical to File ID field in Data Object and Header Object
1221					// Index Entry Time Interval        QWORD        64              // interval between index entries in 100-nanosecond units
1222					// Maximum Packet Count             DWORD        32              // maximum packet count for all index entries
1223					// Index Entries Count              DWORD        32              // number of Index Entries structures
1224					// Index Entries                    array of:    variable        //
1225					// * Packet Number                  DWORD        32              // number of the Data Packet associated with this index entry
1226					// * Packet Count                   WORD         16              // number of Data Packets to sent at this index entry
1227
1228					// shortcut
1229					$thisfile_asf['simple_index_object'] = array();
1230					$thisfile_asf_simpleindexobject      = &$thisfile_asf['simple_index_object'];
1231
1232					$SimpleIndexObjectData = $NextObjectDataHeader.$this->fread(56 - 24);
1233					$offset = 24;
1234
1235					$thisfile_asf_simpleindexobject['objectid']                  = $NextObjectGUID;
1236					$thisfile_asf_simpleindexobject['objectid_guid']             = $NextObjectGUIDtext;
1237					$thisfile_asf_simpleindexobject['objectsize']                = $NextObjectSize;
1238
1239					$thisfile_asf_simpleindexobject['fileid']                    =                  substr($SimpleIndexObjectData, $offset, 16);
1240					$offset += 16;
1241					$thisfile_asf_simpleindexobject['fileid_guid']               = $this->BytestringToGUID($thisfile_asf_simpleindexobject['fileid']);
1242					$thisfile_asf_simpleindexobject['index_entry_time_interval'] = getid3_lib::LittleEndian2Int(substr($SimpleIndexObjectData, $offset, 8));
1243					$offset += 8;
1244					$thisfile_asf_simpleindexobject['maximum_packet_count']      = getid3_lib::LittleEndian2Int(substr($SimpleIndexObjectData, $offset, 4));
1245					$offset += 4;
1246					$thisfile_asf_simpleindexobject['index_entries_count']       = getid3_lib::LittleEndian2Int(substr($SimpleIndexObjectData, $offset, 4));
1247					$offset += 4;
1248
1249					$IndexEntriesData = $SimpleIndexObjectData.$this->fread(6 * $thisfile_asf_simpleindexobject['index_entries_count']);
1250					for ($IndexEntriesCounter = 0; $IndexEntriesCounter < $thisfile_asf_simpleindexobject['index_entries_count']; $IndexEntriesCounter++) {
1251						$thisfile_asf_simpleindexobject['index_entries'][$IndexEntriesCounter]['packet_number'] = getid3_lib::LittleEndian2Int(substr($IndexEntriesData, $offset, 4));
1252						$offset += 4;
1253						$thisfile_asf_simpleindexobject['index_entries'][$IndexEntriesCounter]['packet_count']  = getid3_lib::LittleEndian2Int(substr($IndexEntriesData, $offset, 4));
1254						$offset += 2;
1255					}
1256
1257					break;
1258
1259				case GETID3_ASF_Index_Object:
1260					// 6.2 ASF top-level Index Object (optional but recommended when appropriate, 0 or 1)
1261					// Field Name                       Field Type   Size (bits)
1262					// Object ID                        GUID         128             // GUID for the Index Object - GETID3_ASF_Index_Object
1263					// Object Size                      QWORD        64              // Specifies the size, in bytes, of the Index Object, including at least 34 bytes of Index Object header
1264					// Index Entry Time Interval        DWORD        32              // Specifies the time interval between each index entry in ms.
1265					// Index Specifiers Count           WORD         16              // Specifies the number of Index Specifiers structures in this Index Object.
1266					// Index Blocks Count               DWORD        32              // Specifies the number of Index Blocks structures in this Index Object.
1267
1268					// Index Entry Time Interval        DWORD        32              // Specifies the time interval between index entries in milliseconds.  This value cannot be 0.
1269					// Index Specifiers Count           WORD         16              // Specifies the number of entries in the Index Specifiers list.  Valid values are 1 and greater.
1270					// Index Specifiers                 array of:    varies          //
1271					// * Stream Number                  WORD         16              // Specifies the stream number that the Index Specifiers refer to. Valid values are between 1 and 127.
1272					// * Index Type                     WORD         16              // Specifies Index Type values as follows:
1273																					//   1 = Nearest Past Data Packet - indexes point to the data packet whose presentation time is closest to the index entry time.
1274																					//   2 = Nearest Past Media Object - indexes point to the closest data packet containing an entire object or first fragment of an object.
1275																					//   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.
1276																					//   Nearest Past Cleanpoint is the most common type of index.
1277					// Index Entry Count                DWORD        32              // Specifies the number of Index Entries in the block.
1278					// * 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.
1279					// * Index Entries                  array of:    varies          //
1280					// * * Offsets                      DWORD        varies          // An offset value of 0xffffffff indicates an invalid offset value
1281
1282					// shortcut
1283					$thisfile_asf['asf_index_object'] = array();
1284					$thisfile_asf_asfindexobject      = &$thisfile_asf['asf_index_object'];
1285
1286					$ASFIndexObjectData = $NextObjectDataHeader.$this->fread(34 - 24);
1287					$offset = 24;
1288
1289					$thisfile_asf_asfindexobject['objectid']                  = $NextObjectGUID;
1290					$thisfile_asf_asfindexobject['objectid_guid']             = $NextObjectGUIDtext;
1291					$thisfile_asf_asfindexobject['objectsize']                = $NextObjectSize;
1292
1293					$thisfile_asf_asfindexobject['entry_time_interval']       = getid3_lib::LittleEndian2Int(substr($ASFIndexObjectData, $offset, 4));
1294					$offset += 4;
1295					$thisfile_asf_asfindexobject['index_specifiers_count']    = getid3_lib::LittleEndian2Int(substr($ASFIndexObjectData, $offset, 2));
1296					$offset += 2;
1297					$thisfile_asf_asfindexobject['index_blocks_count']        = getid3_lib::LittleEndian2Int(substr($ASFIndexObjectData, $offset, 4));
1298					$offset += 4;
1299
1300					$ASFIndexObjectData .= $this->fread(4 * $thisfile_asf_asfindexobject['index_specifiers_count']);
1301					for ($IndexSpecifiersCounter = 0; $IndexSpecifiersCounter < $thisfile_asf_asfindexobject['index_specifiers_count']; $IndexSpecifiersCounter++) {
1302						$IndexSpecifierStreamNumber = getid3_lib::LittleEndian2Int(substr($ASFIndexObjectData, $offset, 2));
1303						$offset += 2;
1304						$thisfile_asf_asfindexobject['index_specifiers'][$IndexSpecifiersCounter]['stream_number']   = $IndexSpecifierStreamNumber;
1305						$thisfile_asf_asfindexobject['index_specifiers'][$IndexSpecifiersCounter]['index_type']      = getid3_lib::LittleEndian2Int(substr($ASFIndexObjectData, $offset, 2));
1306						$offset += 2;
1307						$thisfile_asf_asfindexobject['index_specifiers'][$IndexSpecifiersCounter]['index_type_text'] = $this->ASFIndexObjectIndexTypeLookup($thisfile_asf_asfindexobject['index_specifiers'][$IndexSpecifiersCounter]['index_type']);
1308					}
1309
1310					$ASFIndexObjectData .= $this->fread(4);
1311					$thisfile_asf_asfindexobject['index_entry_count'] = getid3_lib::LittleEndian2Int(substr($ASFIndexObjectData, $offset, 4));
1312					$offset += 4;
1313
1314					$ASFIndexObjectData .= $this->fread(8 * $thisfile_asf_asfindexobject['index_specifiers_count']);
1315					for ($IndexSpecifiersCounter = 0; $IndexSpecifiersCounter < $thisfile_asf_asfindexobject['index_specifiers_count']; $IndexSpecifiersCounter++) {
1316						$thisfile_asf_asfindexobject['block_positions'][$IndexSpecifiersCounter] = getid3_lib::LittleEndian2Int(substr($ASFIndexObjectData, $offset, 8));
1317						$offset += 8;
1318					}
1319
1320					$ASFIndexObjectData .= $this->fread(4 * $thisfile_asf_asfindexobject['index_specifiers_count'] * $thisfile_asf_asfindexobject['index_entry_count']);
1321					for ($IndexEntryCounter = 0; $IndexEntryCounter < $thisfile_asf_asfindexobject['index_entry_count']; $IndexEntryCounter++) {
1322						for ($IndexSpecifiersCounter = 0; $IndexSpecifiersCounter < $thisfile_asf_asfindexobject['index_specifiers_count']; $IndexSpecifiersCounter++) {
1323							$thisfile_asf_asfindexobject['offsets'][$IndexSpecifiersCounter][$IndexEntryCounter] = getid3_lib::LittleEndian2Int(substr($ASFIndexObjectData, $offset, 4));
1324							$offset += 4;
1325						}
1326					}
1327					break;
1328
1329
1330				default:
1331					// Implementations shall ignore any standard or non-standard object that they do not know how to handle.
1332					if ($this->GUIDname($NextObjectGUIDtext)) {
1333						$this->warning('unhandled GUID "'.$this->GUIDname($NextObjectGUIDtext).'" {'.$NextObjectGUIDtext.'} in ASF body at offset '.($offset - 16 - 8));
1334					} else {
1335						$this->warning('unknown GUID {'.$NextObjectGUIDtext.'} in ASF body at offset '.($this->ftell() - 16 - 8));
1336					}
1337					$this->fseek(($NextObjectSize - 16 - 8), SEEK_CUR);
1338					break;
1339			}
1340		}
1341
1342		if (isset($thisfile_asf_codeclistobject['codec_entries']) && is_array($thisfile_asf_codeclistobject['codec_entries'])) {
1343			foreach ($thisfile_asf_codeclistobject['codec_entries'] as $streamnumber => $streamdata) {
1344				switch ($streamdata['information']) {
1345					case 'WMV1':
1346					case 'WMV2':
1347					case 'WMV3':
1348					case 'MSS1':
1349					case 'MSS2':
1350					case 'WMVA':
1351					case 'WVC1':
1352					case 'WMVP':
1353					case 'WVP2':
1354						$thisfile_video['dataformat'] = 'wmv';
1355						$info['mime_type'] = 'video/x-ms-wmv';
1356						break;
1357
1358					case 'MP42':
1359					case 'MP43':
1360					case 'MP4S':
1361					case 'mp4s':
1362						$thisfile_video['dataformat'] = 'asf';
1363						$info['mime_type'] = 'video/x-ms-asf';
1364						break;
1365
1366					default:
1367						switch ($streamdata['type_raw']) {
1368							case 1:
1369								if (strstr($this->TrimConvert($streamdata['name']), 'Windows Media')) {
1370									$thisfile_video['dataformat'] = 'wmv';
1371									if ($info['mime_type'] == 'video/x-ms-asf') {
1372										$info['mime_type'] = 'video/x-ms-wmv';
1373									}
1374								}
1375								break;
1376
1377							case 2:
1378								if (strstr($this->TrimConvert($streamdata['name']), 'Windows Media')) {
1379									$thisfile_audio['dataformat'] = 'wma';
1380									if ($info['mime_type'] == 'video/x-ms-asf') {
1381										$info['mime_type'] = 'audio/x-ms-wma';
1382									}
1383								}
1384								break;
1385
1386						}
1387						break;
1388				}
1389			}
1390		}
1391
1392		switch (isset($thisfile_audio['codec']) ? $thisfile_audio['codec'] : '') {
1393			case 'MPEG Layer-3':
1394				$thisfile_audio['dataformat'] = 'mp3';
1395				break;
1396
1397			default:
1398				break;
1399		}
1400
1401		if (isset($thisfile_asf_codeclistobject['codec_entries'])) {
1402			foreach ($thisfile_asf_codeclistobject['codec_entries'] as $streamnumber => $streamdata) {
1403				switch ($streamdata['type_raw']) {
1404
1405					case 1: // video
1406						$thisfile_video['encoder'] = $this->TrimConvert($thisfile_asf_codeclistobject['codec_entries'][$streamnumber]['name']);
1407						break;
1408
1409					case 2: // audio
1410						$thisfile_audio['encoder'] = $this->TrimConvert($thisfile_asf_codeclistobject['codec_entries'][$streamnumber]['name']);
1411
1412						// AH 2003-10-01
1413						$thisfile_audio['encoder_options'] = $this->TrimConvert($thisfile_asf_codeclistobject['codec_entries'][0]['description']);
1414
1415						$thisfile_audio['codec']   = $thisfile_audio['encoder'];
1416						break;
1417
1418					default:
1419						$this->warning('Unknown streamtype: [codec_list_object][codec_entries]['.$streamnumber.'][type_raw] == '.$streamdata['type_raw']);
1420						break;
1421
1422				}
1423			}
1424		}
1425
1426		if (isset($info['audio'])) {
1427			$thisfile_audio['lossless']           = (isset($thisfile_audio['lossless'])           ? $thisfile_audio['lossless']           : false);
1428			$thisfile_audio['dataformat']         = (!empty($thisfile_audio['dataformat'])        ? $thisfile_audio['dataformat']         : 'asf');
1429		}
1430		if (!empty($thisfile_video['dataformat'])) {
1431			$thisfile_video['lossless']           = (isset($thisfile_audio['lossless'])           ? $thisfile_audio['lossless']           : false);
1432			$thisfile_video['pixel_aspect_ratio'] = (isset($thisfile_audio['pixel_aspect_ratio']) ? $thisfile_audio['pixel_aspect_ratio'] : (float) 1);
1433			$thisfile_video['dataformat']         = (!empty($thisfile_video['dataformat'])        ? $thisfile_video['dataformat']         : 'asf');
1434		}
1435		if (!empty($thisfile_video['streams'])) {
1436			$thisfile_video['resolution_x'] = 0;
1437			$thisfile_video['resolution_y'] = 0;
1438			foreach ($thisfile_video['streams'] as $key => $valuearray) {
1439				if (($valuearray['resolution_x'] > $thisfile_video['resolution_x']) || ($valuearray['resolution_y'] > $thisfile_video['resolution_y'])) {
1440					$thisfile_video['resolution_x'] = $valuearray['resolution_x'];
1441					$thisfile_video['resolution_y'] = $valuearray['resolution_y'];
1442				}
1443			}
1444		}
1445		$info['bitrate'] = (isset($thisfile_audio['bitrate']) ? $thisfile_audio['bitrate'] : 0) + (isset($thisfile_video['bitrate']) ? $thisfile_video['bitrate'] : 0);
1446
1447		if ((!isset($info['playtime_seconds']) || ($info['playtime_seconds'] <= 0)) && ($info['bitrate'] > 0)) {
1448			$info['playtime_seconds'] = ($info['filesize'] - $info['avdataoffset']) / ($info['bitrate'] / 8);
1449		}
1450
1451		return true;
1452	}
1453
1454	/**
1455	 * @param int $CodecListType
1456	 *
1457	 * @return string
1458	 */
1459	public static function codecListObjectTypeLookup($CodecListType) {
1460		static $lookup = array(
1461			0x0001 => 'Video Codec',
1462			0x0002 => 'Audio Codec',
1463			0xFFFF => 'Unknown Codec'
1464		);
1465
1466		return (isset($lookup[$CodecListType]) ? $lookup[$CodecListType] : 'Invalid Codec Type');
1467	}
1468
1469	/**
1470	 * @return array
1471	 */
1472	public static function KnownGUIDs() {
1473		static $GUIDarray = array(
1474			'GETID3_ASF_Extended_Stream_Properties_Object'   => '14E6A5CB-C672-4332-8399-A96952065B5A',
1475			'GETID3_ASF_Padding_Object'                      => '1806D474-CADF-4509-A4BA-9AABCB96AAE8',
1476			'GETID3_ASF_Payload_Ext_Syst_Pixel_Aspect_Ratio' => '1B1EE554-F9EA-4BC8-821A-376B74E4C4B8',
1477			'GETID3_ASF_Script_Command_Object'               => '1EFB1A30-0B62-11D0-A39B-00A0C90348F6',
1478			'GETID3_ASF_No_Error_Correction'                 => '20FB5700-5B55-11CF-A8FD-00805F5C442B',
1479			'GETID3_ASF_Content_Branding_Object'             => '2211B3FA-BD23-11D2-B4B7-00A0C955FC6E',
1480			'GETID3_ASF_Content_Encryption_Object'           => '2211B3FB-BD23-11D2-B4B7-00A0C955FC6E',
1481			'GETID3_ASF_Digital_Signature_Object'            => '2211B3FC-BD23-11D2-B4B7-00A0C955FC6E',
1482			'GETID3_ASF_Extended_Content_Encryption_Object'  => '298AE614-2622-4C17-B935-DAE07EE9289C',
1483			'GETID3_ASF_Simple_Index_Object'                 => '33000890-E5B1-11CF-89F4-00A0C90349CB',
1484			'GETID3_ASF_Degradable_JPEG_Media'               => '35907DE0-E415-11CF-A917-00805F5C442B',
1485			'GETID3_ASF_Payload_Extension_System_Timecode'   => '399595EC-8667-4E2D-8FDB-98814CE76C1E',
1486			'GETID3_ASF_Binary_Media'                        => '3AFB65E2-47EF-40F2-AC2C-70A90D71D343',
1487			'GETID3_ASF_Timecode_Index_Object'               => '3CB73FD0-0C4A-4803-953D-EDF7B6228F0C',
1488			'GETID3_ASF_Metadata_Library_Object'             => '44231C94-9498-49D1-A141-1D134E457054',
1489			'GETID3_ASF_Reserved_3'                          => '4B1ACBE3-100B-11D0-A39B-00A0C90348F6',
1490			'GETID3_ASF_Reserved_4'                          => '4CFEDB20-75F6-11CF-9C0F-00A0C90349CB',
1491			'GETID3_ASF_Command_Media'                       => '59DACFC0-59E6-11D0-A3AC-00A0C90348F6',
1492			'GETID3_ASF_Header_Extension_Object'             => '5FBF03B5-A92E-11CF-8EE3-00C00C205365',
1493			'GETID3_ASF_Media_Object_Index_Parameters_Obj'   => '6B203BAD-3F11-4E84-ACA8-D7613DE2CFA7',
1494			'GETID3_ASF_Header_Object'                       => '75B22630-668E-11CF-A6D9-00AA0062CE6C',
1495			'GETID3_ASF_Content_Description_Object'          => '75B22633-668E-11CF-A6D9-00AA0062CE6C',
1496			'GETID3_ASF_Error_Correction_Object'             => '75B22635-668E-11CF-A6D9-00AA0062CE6C',
1497			'GETID3_ASF_Data_Object'                         => '75B22636-668E-11CF-A6D9-00AA0062CE6C',
1498			'GETID3_ASF_Web_Stream_Media_Subtype'            => '776257D4-C627-41CB-8F81-7AC7FF1C40CC',
1499			'GETID3_ASF_Stream_Bitrate_Properties_Object'    => '7BF875CE-468D-11D1-8D82-006097C9A2B2',
1500			'GETID3_ASF_Language_List_Object'                => '7C4346A9-EFE0-4BFC-B229-393EDE415C85',
1501			'GETID3_ASF_Codec_List_Object'                   => '86D15240-311D-11D0-A3A4-00A0C90348F6',
1502			'GETID3_ASF_Reserved_2'                          => '86D15241-311D-11D0-A3A4-00A0C90348F6',
1503			'GETID3_ASF_File_Properties_Object'              => '8CABDCA1-A947-11CF-8EE4-00C00C205365',
1504			'GETID3_ASF_File_Transfer_Media'                 => '91BD222C-F21C-497A-8B6D-5AA86BFC0185',
1505			'GETID3_ASF_Old_RTP_Extension_Data'              => '96800C63-4C94-11D1-837B-0080C7A37F95',
1506			'GETID3_ASF_Advanced_Mutual_Exclusion_Object'    => 'A08649CF-4775-4670-8A16-6E35357566CD',
1507			'GETID3_ASF_Bandwidth_Sharing_Object'            => 'A69609E6-517B-11D2-B6AF-00C04FD908E9',
1508			'GETID3_ASF_Reserved_1'                          => 'ABD3D211-A9BA-11cf-8EE6-00C00C205365',
1509			'GETID3_ASF_Bandwidth_Sharing_Exclusive'         => 'AF6060AA-5197-11D2-B6AF-00C04FD908E9',
1510			'GETID3_ASF_Bandwidth_Sharing_Partial'           => 'AF6060AB-5197-11D2-B6AF-00C04FD908E9',
1511			'GETID3_ASF_JFIF_Media'                          => 'B61BE100-5B4E-11CF-A8FD-00805F5C442B',
1512			'GETID3_ASF_Stream_Properties_Object'            => 'B7DC0791-A9B7-11CF-8EE6-00C00C205365',
1513			'GETID3_ASF_Video_Media'                         => 'BC19EFC0-5B4D-11CF-A8FD-00805F5C442B',
1514			'GETID3_ASF_Audio_Spread'                        => 'BFC3CD50-618F-11CF-8BB2-00AA00B4E220',
1515			'GETID3_ASF_Metadata_Object'                     => 'C5F8CBEA-5BAF-4877-8467-AA8C44FA4CCA',
1516			'GETID3_ASF_Payload_Ext_Syst_Sample_Duration'    => 'C6BD9450-867F-4907-83A3-C77921B733AD',
1517			'GETID3_ASF_Group_Mutual_Exclusion_Object'       => 'D1465A40-5A79-4338-B71B-E36B8FD6C249',
1518			'GETID3_ASF_Extended_Content_Description_Object' => 'D2D0A440-E307-11D2-97F0-00A0C95EA850',
1519			'GETID3_ASF_Stream_Prioritization_Object'        => 'D4FED15B-88D3-454F-81F0-ED5C45999E24',
1520			'GETID3_ASF_Payload_Ext_System_Content_Type'     => 'D590DC20-07BC-436C-9CF7-F3BBFBF1A4DC',
1521			'GETID3_ASF_Old_File_Properties_Object'          => 'D6E229D0-35DA-11D1-9034-00A0C90349BE',
1522			'GETID3_ASF_Old_ASF_Header_Object'               => 'D6E229D1-35DA-11D1-9034-00A0C90349BE',
1523			'GETID3_ASF_Old_ASF_Data_Object'                 => 'D6E229D2-35DA-11D1-9034-00A0C90349BE',
1524			'GETID3_ASF_Index_Object'                        => 'D6E229D3-35DA-11D1-9034-00A0C90349BE',
1525			'GETID3_ASF_Old_Stream_Properties_Object'        => 'D6E229D4-35DA-11D1-9034-00A0C90349BE',
1526			'GETID3_ASF_Old_Content_Description_Object'      => 'D6E229D5-35DA-11D1-9034-00A0C90349BE',
1527			'GETID3_ASF_Old_Script_Command_Object'           => 'D6E229D6-35DA-11D1-9034-00A0C90349BE',
1528			'GETID3_ASF_Old_Marker_Object'                   => 'D6E229D7-35DA-11D1-9034-00A0C90349BE',
1529			'GETID3_ASF_Old_Component_Download_Object'       => 'D6E229D8-35DA-11D1-9034-00A0C90349BE',
1530			'GETID3_ASF_Old_Stream_Group_Object'             => 'D6E229D9-35DA-11D1-9034-00A0C90349BE',
1531			'GETID3_ASF_Old_Scalable_Object'                 => 'D6E229DA-35DA-11D1-9034-00A0C90349BE',
1532			'GETID3_ASF_Old_Prioritization_Object'           => 'D6E229DB-35DA-11D1-9034-00A0C90349BE',
1533			'GETID3_ASF_Bitrate_Mutual_Exclusion_Object'     => 'D6E229DC-35DA-11D1-9034-00A0C90349BE',
1534			'GETID3_ASF_Old_Inter_Media_Dependency_Object'   => 'D6E229DD-35DA-11D1-9034-00A0C90349BE',
1535			'GETID3_ASF_Old_Rating_Object'                   => 'D6E229DE-35DA-11D1-9034-00A0C90349BE',
1536			'GETID3_ASF_Index_Parameters_Object'             => 'D6E229DF-35DA-11D1-9034-00A0C90349BE',
1537			'GETID3_ASF_Old_Color_Table_Object'              => 'D6E229E0-35DA-11D1-9034-00A0C90349BE',
1538			'GETID3_ASF_Old_Language_List_Object'            => 'D6E229E1-35DA-11D1-9034-00A0C90349BE',
1539			'GETID3_ASF_Old_Audio_Media'                     => 'D6E229E2-35DA-11D1-9034-00A0C90349BE',
1540			'GETID3_ASF_Old_Video_Media'                     => 'D6E229E3-35DA-11D1-9034-00A0C90349BE',
1541			'GETID3_ASF_Old_Image_Media'                     => 'D6E229E4-35DA-11D1-9034-00A0C90349BE',
1542			'GETID3_ASF_Old_Timecode_Media'                  => 'D6E229E5-35DA-11D1-9034-00A0C90349BE',
1543			'GETID3_ASF_Old_Text_Media'                      => 'D6E229E6-35DA-11D1-9034-00A0C90349BE',
1544			'GETID3_ASF_Old_MIDI_Media'                      => 'D6E229E7-35DA-11D1-9034-00A0C90349BE',
1545			'GETID3_ASF_Old_Command_Media'                   => 'D6E229E8-35DA-11D1-9034-00A0C90349BE',
1546			'GETID3_ASF_Old_No_Error_Concealment'            => 'D6E229EA-35DA-11D1-9034-00A0C90349BE',
1547			'GETID3_ASF_Old_Scrambled_Audio'                 => 'D6E229EB-35DA-11D1-9034-00A0C90349BE',
1548			'GETID3_ASF_Old_No_Color_Table'                  => 'D6E229EC-35DA-11D1-9034-00A0C90349BE',
1549			'GETID3_ASF_Old_SMPTE_Time'                      => 'D6E229ED-35DA-11D1-9034-00A0C90349BE',
1550			'GETID3_ASF_Old_ASCII_Text'                      => 'D6E229EE-35DA-11D1-9034-00A0C90349BE',
1551			'GETID3_ASF_Old_Unicode_Text'                    => 'D6E229EF-35DA-11D1-9034-00A0C90349BE',
1552			'GETID3_ASF_Old_HTML_Text'                       => 'D6E229F0-35DA-11D1-9034-00A0C90349BE',
1553			'GETID3_ASF_Old_URL_Command'                     => 'D6E229F1-35DA-11D1-9034-00A0C90349BE',
1554			'GETID3_ASF_Old_Filename_Command'                => 'D6E229F2-35DA-11D1-9034-00A0C90349BE',
1555			'GETID3_ASF_Old_ACM_Codec'                       => 'D6E229F3-35DA-11D1-9034-00A0C90349BE',
1556			'GETID3_ASF_Old_VCM_Codec'                       => 'D6E229F4-35DA-11D1-9034-00A0C90349BE',
1557			'GETID3_ASF_Old_QuickTime_Codec'                 => 'D6E229F5-35DA-11D1-9034-00A0C90349BE',
1558			'GETID3_ASF_Old_DirectShow_Transform_Filter'     => 'D6E229F6-35DA-11D1-9034-00A0C90349BE',
1559			'GETID3_ASF_Old_DirectShow_Rendering_Filter'     => 'D6E229F7-35DA-11D1-9034-00A0C90349BE',
1560			'GETID3_ASF_Old_No_Enhancement'                  => 'D6E229F8-35DA-11D1-9034-00A0C90349BE',
1561			'GETID3_ASF_Old_Unknown_Enhancement_Type'        => 'D6E229F9-35DA-11D1-9034-00A0C90349BE',
1562			'GETID3_ASF_Old_Temporal_Enhancement'            => 'D6E229FA-35DA-11D1-9034-00A0C90349BE',
1563			'GETID3_ASF_Old_Spatial_Enhancement'             => 'D6E229FB-35DA-11D1-9034-00A0C90349BE',
1564			'GETID3_ASF_Old_Quality_Enhancement'             => 'D6E229FC-35DA-11D1-9034-00A0C90349BE',
1565			'GETID3_ASF_Old_Number_of_Channels_Enhancement'  => 'D6E229FD-35DA-11D1-9034-00A0C90349BE',
1566			'GETID3_ASF_Old_Frequency_Response_Enhancement'  => 'D6E229FE-35DA-11D1-9034-00A0C90349BE',
1567			'GETID3_ASF_Old_Media_Object'                    => 'D6E229FF-35DA-11D1-9034-00A0C90349BE',
1568			'GETID3_ASF_Mutex_Language'                      => 'D6E22A00-35DA-11D1-9034-00A0C90349BE',
1569			'GETID3_ASF_Mutex_Bitrate'                       => 'D6E22A01-35DA-11D1-9034-00A0C90349BE',
1570			'GETID3_ASF_Mutex_Unknown'                       => 'D6E22A02-35DA-11D1-9034-00A0C90349BE',
1571			'GETID3_ASF_Old_ASF_Placeholder_Object'          => 'D6E22A0E-35DA-11D1-9034-00A0C90349BE',
1572			'GETID3_ASF_Old_Data_Unit_Extension_Object'      => 'D6E22A0F-35DA-11D1-9034-00A0C90349BE',
1573			'GETID3_ASF_Web_Stream_Format'                   => 'DA1E6B13-8359-4050-B398-388E965BF00C',
1574			'GETID3_ASF_Payload_Ext_System_File_Name'        => 'E165EC0E-19ED-45D7-B4A7-25CBD1E28E9B',
1575			'GETID3_ASF_Marker_Object'                       => 'F487CD01-A951-11CF-8EE6-00C00C205365',
1576			'GETID3_ASF_Timecode_Index_Parameters_Object'    => 'F55E496D-9797-4B5D-8C8B-604DFE9BFB24',
1577			'GETID3_ASF_Audio_Media'                         => 'F8699E40-5B4D-11CF-A8FD-00805F5C442B',
1578			'GETID3_ASF_Media_Object_Index_Object'           => 'FEB103F8-12AD-4C64-840F-2A1D2F7AD48C',
1579			'GETID3_ASF_Alt_Extended_Content_Encryption_Obj' => 'FF889EF1-ADEE-40DA-9E71-98704BB928CE',
1580			'GETID3_ASF_Index_Placeholder_Object'            => 'D9AADE20-7C17-4F9C-BC28-8555DD98E2A2', // http://cpan.uwinnipeg.ca/htdocs/Audio-WMA/Audio/WMA.pm.html
1581			'GETID3_ASF_Compatibility_Object'                => '26F18B5D-4584-47EC-9F5F-0E651F0452C9', // http://cpan.uwinnipeg.ca/htdocs/Audio-WMA/Audio/WMA.pm.html
1582		);
1583		return $GUIDarray;
1584	}
1585
1586	/**
1587	 * @param string $GUIDstring
1588	 *
1589	 * @return string|false
1590	 */
1591	public static function GUIDname($GUIDstring) {
1592		static $GUIDarray = array();
1593		if (empty($GUIDarray)) {
1594			$GUIDarray = self::KnownGUIDs();
1595		}
1596		return array_search($GUIDstring, $GUIDarray);
1597	}
1598
1599	/**
1600	 * @param int $id
1601	 *
1602	 * @return string
1603	 */
1604	public static function ASFIndexObjectIndexTypeLookup($id) {
1605		static $ASFIndexObjectIndexTypeLookup = array();
1606		if (empty($ASFIndexObjectIndexTypeLookup)) {
1607			$ASFIndexObjectIndexTypeLookup[1] = 'Nearest Past Data Packet';
1608			$ASFIndexObjectIndexTypeLookup[2] = 'Nearest Past Media Object';
1609			$ASFIndexObjectIndexTypeLookup[3] = 'Nearest Past Cleanpoint';
1610		}
1611		return (isset($ASFIndexObjectIndexTypeLookup[$id]) ? $ASFIndexObjectIndexTypeLookup[$id] : 'invalid');
1612	}
1613
1614	/**
1615	 * @param string $GUIDstring
1616	 *
1617	 * @return string
1618	 */
1619	public static function GUIDtoBytestring($GUIDstring) {
1620		// Microsoft defines these 16-byte (128-bit) GUIDs in the strangest way:
1621		// first 4 bytes are in little-endian order
1622		// next 2 bytes are appended in little-endian order
1623		// next 2 bytes are appended in little-endian order
1624		// next 2 bytes are appended in big-endian order
1625		// next 6 bytes are appended in big-endian order
1626
1627		// AaBbCcDd-EeFf-GgHh-IiJj-KkLlMmNnOoPp is stored as this 16-byte string:
1628		// $Dd $Cc $Bb $Aa $Ff $Ee $Hh $Gg $Ii $Jj $Kk $Ll $Mm $Nn $Oo $Pp
1629
1630		$hexbytecharstring  = chr(hexdec(substr($GUIDstring,  6, 2)));
1631		$hexbytecharstring .= chr(hexdec(substr($GUIDstring,  4, 2)));
1632		$hexbytecharstring .= chr(hexdec(substr($GUIDstring,  2, 2)));
1633		$hexbytecharstring .= chr(hexdec(substr($GUIDstring,  0, 2)));
1634
1635		$hexbytecharstring .= chr(hexdec(substr($GUIDstring, 11, 2)));
1636		$hexbytecharstring .= chr(hexdec(substr($GUIDstring,  9, 2)));
1637
1638		$hexbytecharstring .= chr(hexdec(substr($GUIDstring, 16, 2)));
1639		$hexbytecharstring .= chr(hexdec(substr($GUIDstring, 14, 2)));
1640
1641		$hexbytecharstring .= chr(hexdec(substr($GUIDstring, 19, 2)));
1642		$hexbytecharstring .= chr(hexdec(substr($GUIDstring, 21, 2)));
1643
1644		$hexbytecharstring .= chr(hexdec(substr($GUIDstring, 24, 2)));
1645		$hexbytecharstring .= chr(hexdec(substr($GUIDstring, 26, 2)));
1646		$hexbytecharstring .= chr(hexdec(substr($GUIDstring, 28, 2)));
1647		$hexbytecharstring .= chr(hexdec(substr($GUIDstring, 30, 2)));
1648		$hexbytecharstring .= chr(hexdec(substr($GUIDstring, 32, 2)));
1649		$hexbytecharstring .= chr(hexdec(substr($GUIDstring, 34, 2)));
1650
1651		return $hexbytecharstring;
1652	}
1653
1654	/**
1655	 * @param string $Bytestring
1656	 *
1657	 * @return string
1658	 */
1659	public static function BytestringToGUID($Bytestring) {
1660		$GUIDstring  = str_pad(dechex(ord($Bytestring[3])),  2, '0', STR_PAD_LEFT);
1661		$GUIDstring .= str_pad(dechex(ord($Bytestring[2])),  2, '0', STR_PAD_LEFT);
1662		$GUIDstring .= str_pad(dechex(ord($Bytestring[1])),  2, '0', STR_PAD_LEFT);
1663		$GUIDstring .= str_pad(dechex(ord($Bytestring[0])),  2, '0', STR_PAD_LEFT);
1664		$GUIDstring .= '-';
1665		$GUIDstring .= str_pad(dechex(ord($Bytestring[5])),  2, '0', STR_PAD_LEFT);
1666		$GUIDstring .= str_pad(dechex(ord($Bytestring[4])),  2, '0', STR_PAD_LEFT);
1667		$GUIDstring .= '-';
1668		$GUIDstring .= str_pad(dechex(ord($Bytestring[7])),  2, '0', STR_PAD_LEFT);
1669		$GUIDstring .= str_pad(dechex(ord($Bytestring[6])),  2, '0', STR_PAD_LEFT);
1670		$GUIDstring .= '-';
1671		$GUIDstring .= str_pad(dechex(ord($Bytestring[8])),  2, '0', STR_PAD_LEFT);
1672		$GUIDstring .= str_pad(dechex(ord($Bytestring[9])),  2, '0', STR_PAD_LEFT);
1673		$GUIDstring .= '-';
1674		$GUIDstring .= str_pad(dechex(ord($Bytestring[10])), 2, '0', STR_PAD_LEFT);
1675		$GUIDstring .= str_pad(dechex(ord($Bytestring[11])), 2, '0', STR_PAD_LEFT);
1676		$GUIDstring .= str_pad(dechex(ord($Bytestring[12])), 2, '0', STR_PAD_LEFT);
1677		$GUIDstring .= str_pad(dechex(ord($Bytestring[13])), 2, '0', STR_PAD_LEFT);
1678		$GUIDstring .= str_pad(dechex(ord($Bytestring[14])), 2, '0', STR_PAD_LEFT);
1679		$GUIDstring .= str_pad(dechex(ord($Bytestring[15])), 2, '0', STR_PAD_LEFT);
1680
1681		return strtoupper($GUIDstring);
1682	}
1683
1684	/**
1685	 * @param int  $FILETIME
1686	 * @param bool $round
1687	 *
1688	 * @return float|int
1689	 */
1690	public static function FILETIMEtoUNIXtime($FILETIME, $round=true) {
1691		// FILETIME is a 64-bit unsigned integer representing
1692		// the number of 100-nanosecond intervals since January 1, 1601
1693		// UNIX timestamp is number of seconds since January 1, 1970
1694		// 116444736000000000 = 10000000 * 60 * 60 * 24 * 365 * 369 + 89 leap days
1695		if ($round) {
1696			return intval(round(($FILETIME - 116444736000000000) / 10000000));
1697		}
1698		return ($FILETIME - 116444736000000000) / 10000000;
1699	}
1700
1701	/**
1702	 * @param int $WMpictureType
1703	 *
1704	 * @return string
1705	 */
1706	public static function WMpictureTypeLookup($WMpictureType) {
1707		static $lookup = null;
1708		if ($lookup === null) {
1709			$lookup = array(
1710				0x03 => 'Front Cover',
1711				0x04 => 'Back Cover',
1712				0x00 => 'User Defined',
1713				0x05 => 'Leaflet Page',
1714				0x06 => 'Media Label',
1715				0x07 => 'Lead Artist',
1716				0x08 => 'Artist',
1717				0x09 => 'Conductor',
1718				0x0A => 'Band',
1719				0x0B => 'Composer',
1720				0x0C => 'Lyricist',
1721				0x0D => 'Recording Location',
1722				0x0E => 'During Recording',
1723				0x0F => 'During Performance',
1724				0x10 => 'Video Screen Capture',
1725				0x12 => 'Illustration',
1726				0x13 => 'Band Logotype',
1727				0x14 => 'Publisher Logotype'
1728			);
1729			$lookup = array_map(function($str) {
1730				return getid3_lib::iconv_fallback('UTF-8', 'UTF-16LE', $str);
1731			}, $lookup);
1732		}
1733
1734		return (isset($lookup[$WMpictureType]) ? $lookup[$WMpictureType] : '');
1735	}
1736
1737	/**
1738	 * @param string $asf_header_extension_object_data
1739	 * @param int    $unhandled_sections
1740	 *
1741	 * @return array
1742	 */
1743	public function HeaderExtensionObjectDataParse(&$asf_header_extension_object_data, &$unhandled_sections) {
1744		// http://msdn.microsoft.com/en-us/library/bb643323.aspx
1745
1746		$offset = 0;
1747		$objectOffset = 0;
1748		$HeaderExtensionObjectParsed = array();
1749		while ($objectOffset < strlen($asf_header_extension_object_data)) {
1750			$offset = $objectOffset;
1751			$thisObject = array();
1752
1753			$thisObject['guid']                              =                              substr($asf_header_extension_object_data, $offset, 16);
1754			$offset += 16;
1755			$thisObject['guid_text'] = $this->BytestringToGUID($thisObject['guid']);
1756			$thisObject['guid_name'] = $this->GUIDname($thisObject['guid_text']);
1757
1758			$thisObject['size']                              = getid3_lib::LittleEndian2Int(substr($asf_header_extension_object_data, $offset,  8));
1759			$offset += 8;
1760			if ($thisObject['size'] <= 0) {
1761				break;
1762			}
1763
1764			switch ($thisObject['guid']) {
1765				case GETID3_ASF_Extended_Stream_Properties_Object:
1766					$thisObject['start_time']                        = getid3_lib::LittleEndian2Int(substr($asf_header_extension_object_data, $offset,  8));
1767					$offset += 8;
1768					$thisObject['start_time_unix']                   = $this->FILETIMEtoUNIXtime($thisObject['start_time']);
1769
1770					$thisObject['end_time']                          = getid3_lib::LittleEndian2Int(substr($asf_header_extension_object_data, $offset,  8));
1771					$offset += 8;
1772					$thisObject['end_time_unix']                     = $this->FILETIMEtoUNIXtime($thisObject['end_time']);
1773
1774					$thisObject['data_bitrate']                      = getid3_lib::LittleEndian2Int(substr($asf_header_extension_object_data, $offset,  4));
1775					$offset += 4;
1776
1777					$thisObject['buffer_size']                       = getid3_lib::LittleEndian2Int(substr($asf_header_extension_object_data, $offset,  4));
1778					$offset += 4;
1779
1780					$thisObject['initial_buffer_fullness']           = getid3_lib::LittleEndian2Int(substr($asf_header_extension_object_data, $offset,  4));
1781					$offset += 4;
1782
1783					$thisObject['alternate_data_bitrate']            = getid3_lib::LittleEndian2Int(substr($asf_header_extension_object_data, $offset,  4));
1784					$offset += 4;
1785
1786					$thisObject['alternate_buffer_size']             = getid3_lib::LittleEndian2Int(substr($asf_header_extension_object_data, $offset,  4));
1787					$offset += 4;
1788
1789					$thisObject['alternate_initial_buffer_fullness'] = getid3_lib::LittleEndian2Int(substr($asf_header_extension_object_data, $offset,  4));
1790					$offset += 4;
1791
1792					$thisObject['maximum_object_size']               = getid3_lib::LittleEndian2Int(substr($asf_header_extension_object_data, $offset,  4));
1793					$offset += 4;
1794
1795					$thisObject['flags_raw']                         = getid3_lib::LittleEndian2Int(substr($asf_header_extension_object_data, $offset,  4));
1796					$offset += 4;
1797					$thisObject['flags']['reliable']                = (bool) $thisObject['flags_raw'] & 0x00000001;
1798					$thisObject['flags']['seekable']                = (bool) $thisObject['flags_raw'] & 0x00000002;
1799					$thisObject['flags']['no_cleanpoints']          = (bool) $thisObject['flags_raw'] & 0x00000004;
1800					$thisObject['flags']['resend_live_cleanpoints'] = (bool) $thisObject['flags_raw'] & 0x00000008;
1801
1802					$thisObject['stream_number']                     = getid3_lib::LittleEndian2Int(substr($asf_header_extension_object_data, $offset,  2));
1803					$offset += 2;
1804
1805					$thisObject['stream_language_id_index']          = getid3_lib::LittleEndian2Int(substr($asf_header_extension_object_data, $offset,  2));
1806					$offset += 2;
1807
1808					$thisObject['average_time_per_frame']            = getid3_lib::LittleEndian2Int(substr($asf_header_extension_object_data, $offset,  4));
1809					$offset += 4;
1810
1811					$thisObject['stream_name_count']                 = getid3_lib::LittleEndian2Int(substr($asf_header_extension_object_data, $offset,  2));
1812					$offset += 2;
1813
1814					$thisObject['payload_extension_system_count']    = getid3_lib::LittleEndian2Int(substr($asf_header_extension_object_data, $offset,  2));
1815					$offset += 2;
1816
1817					for ($i = 0; $i < $thisObject['stream_name_count']; $i++) {
1818						$streamName = array();
1819
1820						$streamName['language_id_index']             = getid3_lib::LittleEndian2Int(substr($asf_header_extension_object_data, $offset,  2));
1821						$offset += 2;
1822
1823						$streamName['stream_name_length']            = getid3_lib::LittleEndian2Int(substr($asf_header_extension_object_data, $offset,  2));
1824						$offset += 2;
1825
1826						$streamName['stream_name']                   = getid3_lib::LittleEndian2Int(substr($asf_header_extension_object_data, $offset,  $streamName['stream_name_length']));
1827						$offset += $streamName['stream_name_length'];
1828
1829						$thisObject['stream_names'][$i] = $streamName;
1830					}
1831
1832					for ($i = 0; $i < $thisObject['payload_extension_system_count']; $i++) {
1833						$payloadExtensionSystem = array();
1834
1835						$payloadExtensionSystem['extension_system_id']   =                              substr($asf_header_extension_object_data, $offset, 16);
1836						$offset += 16;
1837						$payloadExtensionSystem['extension_system_id_text'] = $this->BytestringToGUID($payloadExtensionSystem['extension_system_id']);
1838
1839						$payloadExtensionSystem['extension_system_size'] = getid3_lib::LittleEndian2Int(substr($asf_header_extension_object_data, $offset,  2));
1840						$offset += 2;
1841						if ($payloadExtensionSystem['extension_system_size'] <= 0) {
1842							break 2;
1843						}
1844
1845						$payloadExtensionSystem['extension_system_info_length'] = getid3_lib::LittleEndian2Int(substr($asf_header_extension_object_data, $offset,  4));
1846						$offset += 4;
1847
1848						$payloadExtensionSystem['extension_system_info_length'] = getid3_lib::LittleEndian2Int(substr($asf_header_extension_object_data, $offset,  $payloadExtensionSystem['extension_system_info_length']));
1849						$offset += $payloadExtensionSystem['extension_system_info_length'];
1850
1851						$thisObject['payload_extension_systems'][$i] = $payloadExtensionSystem;
1852					}
1853
1854					break;
1855
1856				case GETID3_ASF_Padding_Object:
1857					// padding, skip it
1858					break;
1859
1860				case GETID3_ASF_Metadata_Object:
1861					$thisObject['description_record_counts'] = getid3_lib::LittleEndian2Int(substr($asf_header_extension_object_data, $offset,  2));
1862					$offset += 2;
1863
1864					for ($i = 0; $i < $thisObject['description_record_counts']; $i++) {
1865						$descriptionRecord = array();
1866
1867						$descriptionRecord['reserved_1']         = getid3_lib::LittleEndian2Int(substr($asf_header_extension_object_data, $offset,  2)); // must be zero
1868						$offset += 2;
1869
1870						$descriptionRecord['stream_number']      = getid3_lib::LittleEndian2Int(substr($asf_header_extension_object_data, $offset,  2));
1871						$offset += 2;
1872
1873						$descriptionRecord['name_length']        = getid3_lib::LittleEndian2Int(substr($asf_header_extension_object_data, $offset,  2));
1874						$offset += 2;
1875
1876						$descriptionRecord['data_type']          = getid3_lib::LittleEndian2Int(substr($asf_header_extension_object_data, $offset,  2));
1877						$offset += 2;
1878						$descriptionRecord['data_type_text'] = self::metadataLibraryObjectDataTypeLookup($descriptionRecord['data_type']);
1879
1880						$descriptionRecord['data_length']        = getid3_lib::LittleEndian2Int(substr($asf_header_extension_object_data, $offset,  4));
1881						$offset += 4;
1882
1883						$descriptionRecord['name']               =                              substr($asf_header_extension_object_data, $offset,  $descriptionRecord['name_length']);
1884						$offset += $descriptionRecord['name_length'];
1885
1886						$descriptionRecord['data']               =                              substr($asf_header_extension_object_data, $offset,  $descriptionRecord['data_length']);
1887						$offset += $descriptionRecord['data_length'];
1888						switch ($descriptionRecord['data_type']) {
1889							case 0x0000: // Unicode string
1890								break;
1891
1892							case 0x0001: // BYTE array
1893								// do nothing
1894								break;
1895
1896							case 0x0002: // BOOL
1897								$descriptionRecord['data'] = (bool) getid3_lib::LittleEndian2Int($descriptionRecord['data']);
1898								break;
1899
1900							case 0x0003: // DWORD
1901							case 0x0004: // QWORD
1902							case 0x0005: // WORD
1903								$descriptionRecord['data'] = getid3_lib::LittleEndian2Int($descriptionRecord['data']);
1904								break;
1905
1906							case 0x0006: // GUID
1907								$descriptionRecord['data_text'] = $this->BytestringToGUID($descriptionRecord['data']);
1908								break;
1909						}
1910
1911						$thisObject['description_record'][$i] = $descriptionRecord;
1912					}
1913					break;
1914
1915				case GETID3_ASF_Language_List_Object:
1916					$thisObject['language_id_record_counts'] = getid3_lib::LittleEndian2Int(substr($asf_header_extension_object_data, $offset,  2));
1917					$offset += 2;
1918
1919					for ($i = 0; $i < $thisObject['language_id_record_counts']; $i++) {
1920						$languageIDrecord = array();
1921
1922						$languageIDrecord['language_id_length']         = getid3_lib::LittleEndian2Int(substr($asf_header_extension_object_data, $offset,  1));
1923						$offset += 1;
1924
1925						$languageIDrecord['language_id']                =                              substr($asf_header_extension_object_data, $offset,  $languageIDrecord['language_id_length']);
1926						$offset += $languageIDrecord['language_id_length'];
1927
1928						$thisObject['language_id_record'][$i] = $languageIDrecord;
1929					}
1930					break;
1931
1932				case GETID3_ASF_Metadata_Library_Object:
1933					$thisObject['description_records_count'] = getid3_lib::LittleEndian2Int(substr($asf_header_extension_object_data, $offset,  2));
1934					$offset += 2;
1935
1936					for ($i = 0; $i < $thisObject['description_records_count']; $i++) {
1937						$descriptionRecord = array();
1938
1939						$descriptionRecord['language_list_index'] = getid3_lib::LittleEndian2Int(substr($asf_header_extension_object_data, $offset,  2));
1940						$offset += 2;
1941
1942						$descriptionRecord['stream_number']       = getid3_lib::LittleEndian2Int(substr($asf_header_extension_object_data, $offset,  2));
1943						$offset += 2;
1944
1945						$descriptionRecord['name_length']         = getid3_lib::LittleEndian2Int(substr($asf_header_extension_object_data, $offset,  2));
1946						$offset += 2;
1947
1948						$descriptionRecord['data_type']           = getid3_lib::LittleEndian2Int(substr($asf_header_extension_object_data, $offset,  2));
1949						$offset += 2;
1950						$descriptionRecord['data_type_text'] = self::metadataLibraryObjectDataTypeLookup($descriptionRecord['data_type']);
1951
1952						$descriptionRecord['data_length']         = getid3_lib::LittleEndian2Int(substr($asf_header_extension_object_data, $offset,  4));
1953						$offset += 4;
1954
1955						$descriptionRecord['name']                =                              substr($asf_header_extension_object_data, $offset,  $descriptionRecord['name_length']);
1956						$offset += $descriptionRecord['name_length'];
1957
1958						$descriptionRecord['data']                =                              substr($asf_header_extension_object_data, $offset,  $descriptionRecord['data_length']);
1959						$offset += $descriptionRecord['data_length'];
1960
1961						if (preg_match('#^WM/Picture$#', str_replace("\x00", '', trim($descriptionRecord['name'])))) {
1962							$WMpicture = $this->ASF_WMpicture($descriptionRecord['data']);
1963							foreach ($WMpicture as $key => $value) {
1964								$descriptionRecord['data'] = $WMpicture;
1965							}
1966							unset($WMpicture);
1967						}
1968
1969						$thisObject['description_record'][$i] = $descriptionRecord;
1970					}
1971					break;
1972
1973				default:
1974					$unhandled_sections++;
1975					if ($this->GUIDname($thisObject['guid_text'])) {
1976						$this->warning('unhandled Header Extension Object GUID "'.$this->GUIDname($thisObject['guid_text']).'" {'.$thisObject['guid_text'].'} at offset '.($offset - 16 - 8));
1977					} else {
1978						$this->warning('unknown Header Extension Object GUID {'.$thisObject['guid_text'].'} in at offset '.($offset - 16 - 8));
1979					}
1980					break;
1981			}
1982			$HeaderExtensionObjectParsed[] = $thisObject;
1983
1984			$objectOffset += $thisObject['size'];
1985		}
1986		return $HeaderExtensionObjectParsed;
1987	}
1988
1989	/**
1990	 * @param int $id
1991	 *
1992	 * @return string
1993	 */
1994	public static function metadataLibraryObjectDataTypeLookup($id) {
1995		static $lookup = array(
1996			0x0000 => 'Unicode string', // The data consists of a sequence of Unicode characters
1997			0x0001 => 'BYTE array',     // The type of the data is implementation-specific
1998			0x0002 => 'BOOL',           // The data is 2 bytes long and should be interpreted as a 16-bit unsigned integer. Only 0x0000 or 0x0001 are permitted values
1999			0x0003 => 'DWORD',          // The data is 4 bytes long and should be interpreted as a 32-bit unsigned integer
2000			0x0004 => 'QWORD',          // The data is 8 bytes long and should be interpreted as a 64-bit unsigned integer
2001			0x0005 => 'WORD',           // The data is 2 bytes long and should be interpreted as a 16-bit unsigned integer
2002			0x0006 => 'GUID',           // The data is 16 bytes long and should be interpreted as a 128-bit GUID
2003		);
2004		return (isset($lookup[$id]) ? $lookup[$id] : 'invalid');
2005	}
2006
2007	/**
2008	 * @param string $data
2009	 *
2010	 * @return array
2011	 */
2012	public function ASF_WMpicture(&$data) {
2013		//typedef struct _WMPicture{
2014		//  LPWSTR  pwszMIMEType;
2015		//  BYTE  bPictureType;
2016		//  LPWSTR  pwszDescription;
2017		//  DWORD  dwDataLen;
2018		//  BYTE*  pbData;
2019		//} WM_PICTURE;
2020
2021		$WMpicture = array();
2022
2023		$offset = 0;
2024		$WMpicture['image_type_id'] = getid3_lib::LittleEndian2Int(substr($data, $offset, 1));
2025		$offset += 1;
2026		$WMpicture['image_type']    = self::WMpictureTypeLookup($WMpicture['image_type_id']);
2027		$WMpicture['image_size']    = getid3_lib::LittleEndian2Int(substr($data, $offset, 4));
2028		$offset += 4;
2029
2030		$WMpicture['image_mime'] = '';
2031		do {
2032			$next_byte_pair = substr($data, $offset, 2);
2033			$offset += 2;
2034			$WMpicture['image_mime'] .= $next_byte_pair;
2035		} while ($next_byte_pair !== "\x00\x00");
2036
2037		$WMpicture['image_description'] = '';
2038		do {
2039			$next_byte_pair = substr($data, $offset, 2);
2040			$offset += 2;
2041			$WMpicture['image_description'] .= $next_byte_pair;
2042		} while ($next_byte_pair !== "\x00\x00");
2043
2044		$WMpicture['dataoffset'] = $offset;
2045		$WMpicture['data'] = substr($data, $offset);
2046
2047		$imageinfo = array();
2048		$WMpicture['image_mime'] = '';
2049		$imagechunkcheck = getid3_lib::GetDataImageSize($WMpicture['data'], $imageinfo);
2050		unset($imageinfo);
2051		if (!empty($imagechunkcheck)) {
2052			$WMpicture['image_mime'] = image_type_to_mime_type($imagechunkcheck[2]);
2053		}
2054		if (!isset($this->getid3->info['asf']['comments']['picture'])) {
2055			$this->getid3->info['asf']['comments']['picture'] = array();
2056		}
2057		$this->getid3->info['asf']['comments']['picture'][] = array('data'=>$WMpicture['data'], 'image_mime'=>$WMpicture['image_mime']);
2058
2059		return $WMpicture;
2060	}
2061
2062	/**
2063	 * Remove terminator 00 00 and convert UTF-16LE to Latin-1.
2064	 *
2065	 * @param string $string
2066	 *
2067	 * @return string
2068	 */
2069	public static function TrimConvert($string) {
2070		return trim(getid3_lib::iconv_fallback('UTF-16LE', 'ISO-8859-1', self::TrimTerm($string)), ' ');
2071	}
2072
2073	/**
2074	 * Remove terminator 00 00.
2075	 *
2076	 * @param string $string
2077	 *
2078	 * @return string
2079	 */
2080	public static function TrimTerm($string) {
2081		// remove terminator, only if present (it should be, but...)
2082		if (substr($string, -2) === "\x00\x00") {
2083			$string = substr($string, 0, -2);
2084		}
2085		return $string;
2086	}
2087
2088}
2089