<?php

/////////////////////////////////////////////////////////////////

/// getID3() by James Heinrich <info@getid3.org>               //

//  available at https://github.com/JamesHeinrich/getID3       //

//            or https://www.getid3.org                        //

//            or http://getid3.sourceforge.net                 //

//  see readme.txt for more details                            //

/////////////////////////////////////////////////////////////////

//                                                             //

// module.audio-video.asf.php                                  //

// module for analyzing ASF, WMA and WMV files                 //

// dependencies: module.audio-video.riff.php                   //

//                                                            ///

/////////////////////////////////////////////////////////////////

if (!defined('GETID3_INCLUDEPATH')) { // prevent path-exposing attacks that access modules directly on public webservers

	exit;

}

getid3_lib::IncludeDependency(GETID3_INCLUDEPATH.'module.audio-video.riff.php', __FILE__, true);

class getid3_asf extends getid3_handler

{

	protected static $ASFIndexParametersObjectIndexSpecifiersIndexTypes = array(

		1 => 'Nearest Past Data Packet',

		2 => 'Nearest Past Media Object',

		3 => 'Nearest Past Cleanpoint'

	);

	protected static $ASFMediaObjectIndexParametersObjectIndexSpecifiersIndexTypes = array(

		1 => 'Nearest Past Data Packet',

		2 => 'Nearest Past Media Object',

		3 => 'Nearest Past Cleanpoint',

		0xFF => 'Frame Number Offset'

	);

	protected static $ASFTimecodeIndexParametersObjectIndexSpecifiersIndexTypes = array(

		2 => 'Nearest Past Media Object',

		3 => 'Nearest Past Cleanpoint'

	);

	/**

	 * @param getID3 $getid3

	 */

	public function __construct(getID3 $getid3) {

		parent::__construct($getid3);  // extends getid3_handler::__construct()

		// initialize all GUID constants

		$GUIDarray = $this->KnownGUIDs();

		foreach ($GUIDarray as $GUIDname => $hexstringvalue) {

			if (!defined($GUIDname)) {

				define($GUIDname, $this->GUIDtoBytestring($hexstringvalue));

			}

		}

	}

	/**

	 * @return bool

	 */

	public function Analyze() {

		$info = &$this->getid3->info;

		// Shortcuts

		$thisfile_audio = &$info['audio'];

		$thisfile_video = &$info['video'];

		$info['asf']  = array();

		$thisfile_asf = &$info['asf'];

		$thisfile_asf['comments'] = array();

		$thisfile_asf_comments    = &$thisfile_asf['comments'];

		$thisfile_asf['header_object'] = array();

		$thisfile_asf_headerobject     = &$thisfile_asf['header_object'];

		// ASF structure:

		// * Header Object [required]

		//   * File Properties Object [required]   (global file attributes)

		//   * Stream Properties Object [required] (defines media stream & characteristics)

		//   * Header Extension Object [required]  (additional functionality)

		//   * Content Description Object          (bibliographic information)

		//   * Script Command Object               (commands for during playback)

		//   * Marker Object                       (named jumped points within the file)

		// * Data Object [required]

		//   * Data Packets

		// * Index Object

		// Header Object: (mandatory, one only)

		// Field Name                   Field Type   Size (bits)

		// Object ID                    GUID         128             // GUID for header object - GETID3_ASF_Header_Object

		// Object Size                  QWORD        64              // size of header object, including 30 bytes of Header Object header

		// Number of Header Objects     DWORD        32              // number of objects in header object

		// Reserved1                    BYTE         8               // hardcoded: 0x01

		// Reserved2                    BYTE         8               // hardcoded: 0x02

		$info['fileformat'] = 'asf';

		$this->fseek($info['avdataoffset']);

		$HeaderObjectData = $this->fread(30);

		$thisfile_asf_headerobject['objectid']      = substr($HeaderObjectData, 0, 16);

		$thisfile_asf_headerobject['objectid_guid'] = $this->BytestringToGUID($thisfile_asf_headerobject['objectid']);

		if ($thisfile_asf_headerobject['objectid'] != GETID3_ASF_Header_Object) {

			unset($info['fileformat'], $info['asf']);

			return $this->error('ASF header GUID {'.$this->BytestringToGUID($thisfile_asf_headerobject['objectid']).'} does not match expected "GETID3_ASF_Header_Object" GUID {'.$this->BytestringToGUID(GETID3_ASF_Header_Object).'}');

		}

		$thisfile_asf_headerobject['objectsize']    = getid3_lib::LittleEndian2Int(substr($HeaderObjectData, 16, 8));

		$thisfile_asf_headerobject['headerobjects'] = getid3_lib::LittleEndian2Int(substr($HeaderObjectData, 24, 4));

		$thisfile_asf_headerobject['reserved1']     = getid3_lib::LittleEndian2Int(substr($HeaderObjectData, 28, 1));

		$thisfile_asf_headerobject['reserved2']     = getid3_lib::LittleEndian2Int(substr($HeaderObjectData, 29, 1));

		$NextObjectOffset = $this->ftell();

		$ASFHeaderData = $this->fread($thisfile_asf_headerobject['objectsize'] - 30);

		$offset = 0;

		$thisfile_asf_streambitratepropertiesobject = array();

		$thisfile_asf_codeclistobject = array();

		$StreamPropertiesObjectData = array();

		for ($HeaderObjectsCounter = 0; $HeaderObjectsCounter < $thisfile_asf_headerobject['headerobjects']; $HeaderObjectsCounter++) {

			$NextObjectGUID = substr($ASFHeaderData, $offset, 16);

			$offset += 16;

			$NextObjectGUIDtext = $this->BytestringToGUID($NextObjectGUID);

			$NextObjectSize = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 8));

			$offset += 8;

			switch ($NextObjectGUID) {

				case GETID3_ASF_File_Properties_Object:

					// File Properties Object: (mandatory, one only)

					// Field Name                   Field Type   Size (bits)

					// Object ID                    GUID         128             // GUID for file properties object - GETID3_ASF_File_Properties_Object

					// Object Size                  QWORD        64              // size of file properties object, including 104 bytes of File Properties Object header

					// File ID                      GUID         128             // unique ID - identical to File ID in Data Object

					// File Size                    QWORD        64              // entire file in bytes. Invalid if Broadcast Flag == 1

					// Creation Date                QWORD        64              // date & time of file creation. Maybe invalid if Broadcast Flag == 1

					// Data Packets Count           QWORD        64              // number of data packets in Data Object. Invalid if Broadcast Flag == 1

					// Play Duration                QWORD        64              // playtime, in 100-nanosecond units. Invalid if Broadcast Flag == 1

					// Send Duration                QWORD        64              // time needed to send file, in 100-nanosecond units. Players can ignore this value. Invalid if Broadcast Flag == 1

					// Preroll                      QWORD        64              // time to buffer data before starting to play file, in 1-millisecond units. If <> 0, PlayDuration and PresentationTime have been offset by this amount

					// Flags                        DWORD        32              //

					// * Broadcast Flag             bits         1  (0x01)       // file is currently being written, some header values are invalid

					// * Seekable Flag              bits         1  (0x02)       // is file seekable

					// * Reserved                   bits         30 (0xFFFFFFFC) // reserved - set to zero

					// Minimum Data Packet Size     DWORD        32              // in bytes. should be same as Maximum Data Packet Size. Invalid if Broadcast Flag == 1

					// Maximum Data Packet Size     DWORD        32              // in bytes. should be same as Minimum Data Packet Size. Invalid if Broadcast Flag == 1

					// Maximum Bitrate              DWORD        32              // maximum instantaneous bitrate in bits per second for entire file, including all data streams and ASF overhead

					// shortcut

					$thisfile_asf['file_properties_object'] = array();

					$thisfile_asf_filepropertiesobject      = &$thisfile_asf['file_properties_object'];

					$thisfile_asf_filepropertiesobject['offset']             = $NextObjectOffset + $offset;

					$thisfile_asf_filepropertiesobject['objectid']           = $NextObjectGUID;

					$thisfile_asf_filepropertiesobject['objectid_guid']      = $NextObjectGUIDtext;

					$thisfile_asf_filepropertiesobject['objectsize']         = $NextObjectSize;

					$thisfile_asf_filepropertiesobject['fileid']             = substr($ASFHeaderData, $offset, 16);

					$offset += 16;

					$thisfile_asf_filepropertiesobject['fileid_guid']        = $this->BytestringToGUID($thisfile_asf_filepropertiesobject['fileid']);

					$thisfile_asf_filepropertiesobject['filesize']           = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 8));

					$offset += 8;

					$thisfile_asf_filepropertiesobject['creation_date']      = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 8));

					$thisfile_asf_filepropertiesobject['creation_date_unix'] = $this->FILETIMEtoUNIXtime($thisfile_asf_filepropertiesobject['creation_date']);

					$offset += 8;

					$thisfile_asf_filepropertiesobject['data_packets']       = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 8));

					$offset += 8;

					$thisfile_asf_filepropertiesobject['play_duration']      = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 8));

					$offset += 8;

					$thisfile_asf_filepropertiesobject['send_duration']      = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 8));

					$offset += 8;

					$thisfile_asf_filepropertiesobject['preroll']            = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 8));

					$offset += 8;

					$thisfile_asf_filepropertiesobject['flags_raw']          = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 4));

					$offset += 4;

					$thisfile_asf_filepropertiesobject['flags']['broadcast'] = (bool) ($thisfile_asf_filepropertiesobject['flags_raw'] & 0x0001);

					$thisfile_asf_filepropertiesobject['flags']['seekable']  = (bool) ($thisfile_asf_filepropertiesobject['flags_raw'] & 0x0002);

					$thisfile_asf_filepropertiesobject['min_packet_size']    = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 4));

					$offset += 4;

					$thisfile_asf_filepropertiesobject['max_packet_size']    = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 4));

					$offset += 4;

					$thisfile_asf_filepropertiesobject['max_bitrate']        = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 4));

					$offset += 4;

					if ($thisfile_asf_filepropertiesobject['flags']['broadcast']) {

						// broadcast flag is set, some values invalid

						unset($thisfile_asf_filepropertiesobject['filesize']);

						unset($thisfile_asf_filepropertiesobject['data_packets']);

						unset($thisfile_asf_filepropertiesobject['play_duration']);

						unset($thisfile_asf_filepropertiesobject['send_duration']);

						unset($thisfile_asf_filepropertiesobject['min_packet_size']);

						unset($thisfile_asf_filepropertiesobject['max_packet_size']);

					} else {

						// broadcast flag NOT set, perform calculations

						$info['playtime_seconds'] = ($thisfile_asf_filepropertiesobject['play_duration'] / 10000000) - ($thisfile_asf_filepropertiesobject['preroll'] / 1000);

						//$info['bitrate'] = $thisfile_asf_filepropertiesobject['max_bitrate'];

						$info['bitrate'] = getid3_lib::SafeDiv($thisfile_asf_filepropertiesobject['filesize'] * 8, $info['playtime_seconds']);

					}

					break;

				case GETID3_ASF_Stream_Properties_Object:

					// Stream Properties Object: (mandatory, one per media stream)

					// Field Name                   Field Type   Size (bits)

					// Object ID                    GUID         128             // GUID for stream properties object - GETID3_ASF_Stream_Properties_Object

					// Object Size                  QWORD        64              // size of stream properties object, including 78 bytes of Stream Properties Object header

					// Stream Type                  GUID         128             // GETID3_ASF_Audio_Media, GETID3_ASF_Video_Media or GETID3_ASF_Command_Media

					// Error Correction Type        GUID         128             // GETID3_ASF_Audio_Spread for audio-only streams, GETID3_ASF_No_Error_Correction for other stream types

					// Time Offset                  QWORD        64              // 100-nanosecond units. typically zero. added to all timestamps of samples in the stream

					// Type-Specific Data Length    DWORD        32              // number of bytes for Type-Specific Data field

					// Error Correction Data Length DWORD        32              // number of bytes for Error Correction Data field

					// Flags                        WORD         16              //

					// * Stream Number              bits         7 (0x007F)      // number of this stream.  1 <= valid <= 127

					// * Reserved                   bits         8 (0x7F80)      // reserved - set to zero

					// * Encrypted Content Flag     bits         1 (0x8000)      // stream contents encrypted if set

					// Reserved                     DWORD        32              // reserved - set to zero

					// Type-Specific Data           BYTESTREAM   variable        // type-specific format data, depending on value of Stream Type

					// Error Correction Data        BYTESTREAM   variable        // error-correction-specific format data, depending on value of Error Correct Type

					// There is one GETID3_ASF_Stream_Properties_Object for each stream (audio, video) but the

					// stream number isn't known until halfway through decoding the structure, hence it

					// it is decoded to a temporary variable and then stuck in the appropriate index later

					$StreamPropertiesObjectData['offset']             = $NextObjectOffset + $offset;

					$StreamPropertiesObjectData['objectid']           = $NextObjectGUID;

					$StreamPropertiesObjectData['objectid_guid']      = $NextObjectGUIDtext;

					$StreamPropertiesObjectData['objectsize']         = $NextObjectSize;

					$StreamPropertiesObjectData['stream_type']        = substr($ASFHeaderData, $offset, 16);

					$offset += 16;

					$StreamPropertiesObjectData['stream_type_guid']   = $this->BytestringToGUID($StreamPropertiesObjectData['stream_type']);

					$StreamPropertiesObjectData['error_correct_type'] = substr($ASFHeaderData, $offset, 16);

					$offset += 16;

					$StreamPropertiesObjectData['error_correct_guid'] = $this->BytestringToGUID($StreamPropertiesObjectData['error_correct_type']);

					$StreamPropertiesObjectData['time_offset']        = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 8));

					$offset += 8;

					$StreamPropertiesObjectData['type_data_length']   = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 4));

					$offset += 4;

					$StreamPropertiesObjectData['error_data_length']  = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 4));

					$offset += 4;

					$StreamPropertiesObjectData['flags_raw']          = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 2));

					$offset += 2;

					$StreamPropertiesObjectStreamNumber               = $StreamPropertiesObjectData['flags_raw'] & 0x007F;

					$StreamPropertiesObjectData['flags']['encrypted'] = (bool) ($StreamPropertiesObjectData['flags_raw'] & 0x8000);

					$offset += 4; // reserved - DWORD

					$StreamPropertiesObjectData['type_specific_data'] = substr($ASFHeaderData, $offset, $StreamPropertiesObjectData['type_data_length']);

					$offset += $StreamPropertiesObjectData['type_data_length'];

					$StreamPropertiesObjectData['error_correct_data'] = substr($ASFHeaderData, $offset, $StreamPropertiesObjectData['error_data_length']);

					$offset += $StreamPropertiesObjectData['error_data_length'];

					switch ($StreamPropertiesObjectData['stream_type']) {

						case GETID3_ASF_Audio_Media:

							$thisfile_audio['dataformat']   = (!empty($thisfile_audio['dataformat'])   ? $thisfile_audio['dataformat']   : 'asf');

							$thisfile_audio['bitrate_mode'] = (!empty($thisfile_audio['bitrate_mode']) ? $thisfile_audio['bitrate_mode'] : 'cbr');

							$audiodata = getid3_riff::parseWAVEFORMATex(substr($StreamPropertiesObjectData['type_specific_data'], 0, 16));

							unset($audiodata['raw']);

							$thisfile_audio = getid3_lib::array_merge_noclobber($audiodata, $thisfile_audio);

							break;

						case GETID3_ASF_Video_Media:

							$thisfile_video['dataformat']   = (!empty($thisfile_video['dataformat'])   ? $thisfile_video['dataformat']   : 'asf');

							$thisfile_video['bitrate_mode'] = (!empty($thisfile_video['bitrate_mode']) ? $thisfile_video['bitrate_mode'] : 'cbr');

							break;

						case GETID3_ASF_Command_Media:

						default:

							// do nothing

							break;

					}

					$thisfile_asf['stream_properties_object'][$StreamPropertiesObjectStreamNumber] = $StreamPropertiesObjectData;

					unset($StreamPropertiesObjectData); // clear for next stream, if any

					break;

				case GETID3_ASF_Header_Extension_Object:

					// Header Extension Object: (mandatory, one only)

					// Field Name                   Field Type   Size (bits)

					// Object ID                    GUID         128             // GUID for Header Extension object - GETID3_ASF_Header_Extension_Object

					// Object Size                  QWORD        64              // size of Header Extension object, including 46 bytes of Header Extension Object header

					// Reserved Field 1             GUID         128             // hardcoded: GETID3_ASF_Reserved_1

					// Reserved Field 2             WORD         16              // hardcoded: 0x00000006

					// Header Extension Data Size   DWORD        32              // in bytes. valid: 0, or > 24. equals object size minus 46

					// Header Extension Data        BYTESTREAM   variable        // array of zero or more extended header objects

					// shortcut

					$thisfile_asf['header_extension_object'] = array();

					$thisfile_asf_headerextensionobject      = &$thisfile_asf['header_extension_object'];

					$thisfile_asf_headerextensionobject['offset']              = $NextObjectOffset + $offset;

					$thisfile_asf_headerextensionobject['objectid']            = $NextObjectGUID;

					$thisfile_asf_headerextensionobject['objectid_guid']       = $NextObjectGUIDtext;

					$thisfile_asf_headerextensionobject['objectsize']          = $NextObjectSize;

					$thisfile_asf_headerextensionobject['reserved_1']          = substr($ASFHeaderData, $offset, 16);

					$offset += 16;

					$thisfile_asf_headerextensionobject['reserved_1_guid']     = $this->BytestringToGUID($thisfile_asf_headerextensionobject['reserved_1']);

					if ($thisfile_asf_headerextensionobject['reserved_1'] != GETID3_ASF_Reserved_1) {

						$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).')');

						//return false;

						break;

					}

					$thisfile_asf_headerextensionobject['reserved_2']          = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 2));

					$offset += 2;

					if ($thisfile_asf_headerextensionobject['reserved_2'] != 6) {

						$this->warning('header_extension_object.reserved_2 ('.$thisfile_asf_headerextensionobject['reserved_2'].') does not match expected value of "6"');

						//return false;

						break;

					}

					$thisfile_asf_headerextensionobject['extension_data_size'] = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 4));

					$offset += 4;

					$thisfile_asf_headerextensionobject['extension_data']      =                              substr($ASFHeaderData, $offset, $thisfile_asf_headerextensionobject['extension_data_size']);

					$unhandled_sections = 0;

					$thisfile_asf_headerextensionobject['extension_data_parsed'] = $this->HeaderExtensionObjectDataParse($thisfile_asf_headerextensionobject['extension_data'], $unhandled_sections);

					if ($unhandled_sections === 0) {

						unset($thisfile_asf_headerextensionobject['extension_data']);

					}

					$offset += $thisfile_asf_headerextensionobject['extension_data_size'];

					break;

				case GETID3_ASF_Codec_List_Object:

					// Codec List Object: (optional, one only)

					// Field Name                   Field Type   Size (bits)

					// Object ID                    GUID         128             // GUID for Codec List object - GETID3_ASF_Codec_List_Object

					// Object Size                  QWORD        64              // size of Codec List object, including 44 bytes of Codec List Object header

					// Reserved                     GUID         128             // hardcoded: 86D15241-311D-11D0-A3A4-00A0C90348F6

					// Codec Entries Count          DWORD        32              // number of entries in Codec Entries array

					// Codec Entries                array of:    variable        //

					// * Type                       WORD         16              // 0x0001 = Video Codec, 0x0002 = Audio Codec, 0xFFFF = Unknown Codec

					// * Codec Name Length          WORD         16              // number of Unicode characters stored in the Codec Name field

					// * Codec Name                 WCHAR        variable        // array of Unicode characters - name of codec used to create the content

					// * Codec Description Length   WORD         16              // number of Unicode characters stored in the Codec Description field

					// * Codec Description          WCHAR        variable        // array of Unicode characters - description of format used to create the content

					// * Codec Information Length   WORD         16              // number of Unicode characters stored in the Codec Information field

					// * Codec Information          BYTESTREAM   variable        // opaque array of information bytes about the codec used to create the content

					// shortcut

					$thisfile_asf['codec_list_object'] = array();

					/** @var mixed[] $thisfile_asf_codeclistobject */

					$thisfile_asf_codeclistobject      = &$thisfile_asf['codec_list_object'];

					$thisfile_asf_codeclistobject['offset']                    = $NextObjectOffset + $offset;

					$thisfile_asf_codeclistobject['objectid']                  = $NextObjectGUID;

					$thisfile_asf_codeclistobject['objectid_guid']             = $NextObjectGUIDtext;

					$thisfile_asf_codeclistobject['objectsize']                = $NextObjectSize;

					$thisfile_asf_codeclistobject['reserved']                  = substr($ASFHeaderData, $offset, 16);

					$offset += 16;

					$thisfile_asf_codeclistobject['reserved_guid']             = $this->BytestringToGUID($thisfile_asf_codeclistobject['reserved']);

					if ($thisfile_asf_codeclistobject['reserved'] != $this->GUIDtoBytestring('86D15241-311D-11D0-A3A4-00A0C90348F6')) {

						$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}');

						//return false;

						break;

					}

					$thisfile_asf_codeclistobject['codec_entries_count'] = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 4));

					if ($thisfile_asf_codeclistobject['codec_entries_count'] > 0) {

						$thisfile_asf_codeclistobject['codec_entries'] = array();

					}

					$offset += 4;

					for ($CodecEntryCounter = 0; $CodecEntryCounter < $thisfile_asf_codeclistobject['codec_entries_count']; $CodecEntryCounter++) {

						// shortcut

						$thisfile_asf_codeclistobject['codec_entries'][$CodecEntryCounter] = array();

						$thisfile_asf_codeclistobject_codecentries_current = &$thisfile_asf_codeclistobject['codec_entries'][$CodecEntryCounter];

						$thisfile_asf_codeclistobject_codecentries_current['type_raw'] = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 2));

						$offset += 2;

						$thisfile_asf_codeclistobject_codecentries_current['type'] = self::codecListObjectTypeLookup($thisfile_asf_codeclistobject_codecentries_current['type_raw']);

						$CodecNameLength = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 2)) * 2; // 2 bytes per character

						$offset += 2;

						$thisfile_asf_codeclistobject_codecentries_current['name'] = substr($ASFHeaderData, $offset, $CodecNameLength);

						$offset += $CodecNameLength;

						$CodecDescriptionLength = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 2)) * 2; // 2 bytes per character

						$offset += 2;

						$thisfile_asf_codeclistobject_codecentries_current['description'] = substr($ASFHeaderData, $offset, $CodecDescriptionLength);

						$offset += $CodecDescriptionLength;

						$CodecInformationLength = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 2));

						$offset += 2;

						$thisfile_asf_codeclistobject_codecentries_current['information'] = substr($ASFHeaderData, $offset, $CodecInformationLength);

						$offset += $CodecInformationLength;

						if ($thisfile_asf_codeclistobject_codecentries_current['type_raw'] == 2) { // audio codec

							if (strpos($thisfile_asf_codeclistobject_codecentries_current['description'], ',') === false) {

								$this->warning('[asf][codec_list_object][codec_entries]['.$CodecEntryCounter.'][description] expected to contain comma-separated list of parameters: "'.$thisfile_asf_codeclistobject_codecentries_current['description'].'"');

							} else {

								list($AudioCodecBitrate, $AudioCodecFrequency, $AudioCodecChannels) = explode(',', $this->TrimConvert($thisfile_asf_codeclistobject_codecentries_current['description']));

								$thisfile_audio['codec'] = $this->TrimConvert($thisfile_asf_codeclistobject_codecentries_current['name']);

								if (!isset($thisfile_audio['bitrate']) && strstr($AudioCodecBitrate, 'kbps')) {

									$thisfile_audio['bitrate'] = (int) trim(str_replace('kbps', '', $AudioCodecBitrate)) * 1000;

								}

								//if (!isset($thisfile_video['bitrate']) && isset($thisfile_audio['bitrate']) && isset($thisfile_asf['file_properties_object']['max_bitrate']) && ($thisfile_asf_codeclistobject['codec_entries_count'] > 1)) {

								if (empty($thisfile_video['bitrate']) && !empty($thisfile_audio['bitrate']) && !empty($info['bitrate'])) {

									//$thisfile_video['bitrate'] = $thisfile_asf['file_properties_object']['max_bitrate'] - $thisfile_audio['bitrate'];

									$thisfile_video['bitrate'] = $info['bitrate'] - $thisfile_audio['bitrate'];

								}

								$AudioCodecFrequency = (int) trim(str_replace('kHz', '', $AudioCodecFrequency));

								switch ($AudioCodecFrequency) {

									case 8:

									case 8000:

										$thisfile_audio['sample_rate'] = 8000;

										break;

									case 11:

									case 11025:

										$thisfile_audio['sample_rate'] = 11025;

										break;

									case 12:

									case 12000:

										$thisfile_audio['sample_rate'] = 12000;

										break;

									case 16:

									case 16000:

										$thisfile_audio['sample_rate'] = 16000;

										break;

									case 22:

									case 22050:

										$thisfile_audio['sample_rate'] = 22050;

										break;

									case 24:

									case 24000:

										$thisfile_audio['sample_rate'] = 24000;

										break;

									case 32:

									case 32000:

										$thisfile_audio['sample_rate'] = 32000;

										break;

									case 44:

									case 441000:

										$thisfile_audio['sample_rate'] = 44100;

										break;

									case 48:

									case 48000:

										$thisfile_audio['sample_rate'] = 48000;

										break;

									default:

										$this->warning('unknown frequency: "'.$AudioCodecFrequency.'" ('.$this->TrimConvert($thisfile_asf_codeclistobject_codecentries_current['description']).')');

										break;

								}

								if (!isset($thisfile_audio['channels'])) {

									if (strstr($AudioCodecChannels, 'stereo')) {

										$thisfile_audio['channels'] = 2;

									} elseif (strstr($AudioCodecChannels, 'mono')) {

										$thisfile_audio['channels'] = 1;

									}

								}

							}

						}

					}

					break;

				case GETID3_ASF_Script_Command_Object:

					// Script Command Object: (optional, one only)

					// Field Name                   Field Type   Size (bits)

					// Object ID                    GUID         128             // GUID for Script Command object - GETID3_ASF_Script_Command_Object

					// Object Size                  QWORD        64              // size of Script Command object, including 44 bytes of Script Command Object header

					// Reserved                     GUID         128             // hardcoded: 4B1ACBE3-100B-11D0-A39B-00A0C90348F6

					// Commands Count               WORD         16              // number of Commands structures in the Script Commands Objects

					// Command Types Count          WORD         16              // number of Command Types structures in the Script Commands Objects

					// Command Types                array of:    variable        //

					// * Command Type Name Length   WORD         16              // number of Unicode characters for Command Type Name

					// * Command Type Name          WCHAR        variable        // array of Unicode characters - name of a type of command

					// Commands                     array of:    variable        //

					// * Presentation Time          DWORD        32              // presentation time of that command, in milliseconds

					// * Type Index                 WORD         16              // type of this command, as a zero-based index into the array of Command Types of this object

					// * Command Name Length        WORD         16              // number of Unicode characters for Command Name

					// * Command Name               WCHAR        variable        // array of Unicode characters - name of this command

					// shortcut

					$thisfile_asf['script_command_object'] = array();

					$thisfile_asf_scriptcommandobject      = &$thisfile_asf['script_command_object'];

					$thisfile_asf_scriptcommandobject['offset']               = $NextObjectOffset + $offset;

					$thisfile_asf_scriptcommandobject['objectid']             = $NextObjectGUID;

					$thisfile_asf_scriptcommandobject['objectid_guid']        = $NextObjectGUIDtext;

					$thisfile_asf_scriptcommandobject['objectsize']           = $NextObjectSize;

					$thisfile_asf_scriptcommandobject['reserved']             = substr($ASFHeaderData, $offset, 16);

					$offset += 16;

					$thisfile_asf_scriptcommandobject['reserved_guid']        = $this->BytestringToGUID($thisfile_asf_scriptcommandobject['reserved']);

					if ($thisfile_asf_scriptcommandobject['reserved'] != $this->GUIDtoBytestring('4B1ACBE3-100B-11D0-A39B-00A0C90348F6')) {

						$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}');

						//return false;

						break;

					}

					$thisfile_asf_scriptcommandobject['commands_count']       = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 2));

					$offset += 2;

					$thisfile_asf_scriptcommandobject['command_types_count']  = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 2));

					$offset += 2;

					for ($CommandTypesCounter = 0; $CommandTypesCounter < $thisfile_asf_scriptcommandobject['command_types_count']; $CommandTypesCounter++) {

						$CommandTypeNameLength = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 2)) * 2; // 2 bytes per character

						$offset += 2;

						$thisfile_asf_scriptcommandobject['command_types'][$CommandTypesCounter]['name'] = substr($ASFHeaderData, $offset, $CommandTypeNameLength);

						$offset += $CommandTypeNameLength;

					}

					for ($CommandsCounter = 0; $CommandsCounter < $thisfile_asf_scriptcommandobject['commands_count']; $CommandsCounter++) {

						$thisfile_asf_scriptcommandobject['commands'][$CommandsCounter]['presentation_time']  = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 4));

						$offset += 4;

						$thisfile_asf_scriptcommandobject['commands'][$CommandsCounter]['type_index']         = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 2));

						$offset += 2;

						$CommandTypeNameLength = getid3_lib::LittleEndian2Int(substr($ASFHeaderData, $offset, 2)) * 2; // 2 bytes per character

						$offset += 2;

						$thisfile_asf_scriptcommandobject['commands'][$CommandsCounter]['name'] = substr($ASFHeaderData, $offset, $CommandTypeNameLength);

						$offset += $CommandTypeNameLength;

					}

					break;

				case GETID3_ASF_Marker_Object:

					// Marker Object: (optional, one only)