wp/wp-includes/ID3/module.audio-video.quicktime.php
author ymh <ymh.work@gmail.com>
Wed, 06 Nov 2013 03:21:17 +0000
changeset 0 d970ebf37754
child 5 5e2f62d02dcd
permissions -rw-r--r--
first import
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
     1
<?php
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
     2
/////////////////////////////////////////////////////////////////
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
     3
/// getID3() by James Heinrich <info@getid3.org>               //
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
     4
//  available at http://getid3.sourceforge.net                 //
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
     5
//            or http://www.getid3.org                         //
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
     6
/////////////////////////////////////////////////////////////////
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
     7
// See readme.txt for more details                             //
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
     8
/////////////////////////////////////////////////////////////////
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
     9
//                                                             //
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    10
// module.audio-video.quicktime.php                            //
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    11
// module for analyzing Quicktime and MP3-in-MP4 files         //
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    12
// dependencies: module.audio.mp3.php                          //
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    13
// dependencies: module.tag.id3v2.php                          //
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    14
//                                                            ///
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    15
/////////////////////////////////////////////////////////////////
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    16
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    17
getid3_lib::IncludeDependency(GETID3_INCLUDEPATH.'module.audio.mp3.php', __FILE__, true);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    18
getid3_lib::IncludeDependency(GETID3_INCLUDEPATH.'module.tag.id3v2.php', __FILE__, true); // needed for ISO 639-2 language code lookup
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    19
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    20
class getid3_quicktime extends getid3_handler
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    21
{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    22
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    23
	public $ReturnAtomData        = true;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    24
	public $ParseAllPossibleAtoms = false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    25
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    26
	public function Analyze() {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    27
		$info = &$this->getid3->info;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    28
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    29
		$info['fileformat'] = 'quicktime';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    30
		$info['quicktime']['hinting']    = false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    31
		$info['quicktime']['controller'] = 'standard'; // may be overridden if 'ctyp' atom is present
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    32
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    33
		fseek($this->getid3->fp, $info['avdataoffset'], SEEK_SET);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    34
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    35
		$offset      = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    36
		$atomcounter = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    37
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    38
		while ($offset < $info['avdataend']) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    39
			if (!getid3_lib::intValueSupported($offset)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    40
				$info['error'][] = 'Unable to parse atom at offset '.$offset.' because beyond '.round(PHP_INT_MAX / 1073741824).'GB limit of PHP filesystem functions';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    41
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    42
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    43
			fseek($this->getid3->fp, $offset, SEEK_SET);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    44
			$AtomHeader = fread($this->getid3->fp, 8);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    45
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    46
			$atomsize = getid3_lib::BigEndian2Int(substr($AtomHeader, 0, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    47
			$atomname = substr($AtomHeader, 4, 4);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    48
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    49
			// 64-bit MOV patch by jlegateØktnc*com
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    50
			if ($atomsize == 1) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    51
				$atomsize = getid3_lib::BigEndian2Int(fread($this->getid3->fp, 8));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    52
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    53
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    54
			$info['quicktime'][$atomname]['name']   = $atomname;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    55
			$info['quicktime'][$atomname]['size']   = $atomsize;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    56
			$info['quicktime'][$atomname]['offset'] = $offset;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    57
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    58
			if (($offset + $atomsize) > $info['avdataend']) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    59
				$info['error'][] = 'Atom at offset '.$offset.' claims to go beyond end-of-file (length: '.$atomsize.' bytes)';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    60
				return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    61
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    62
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    63
			if ($atomsize == 0) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    64
				// Furthermore, for historical reasons the list of atoms is optionally
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    65
				// terminated by a 32-bit integer set to 0. If you are writing a program
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    66
				// to read user data atoms, you should allow for the terminating 0.
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    67
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    68
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    69
			switch ($atomname) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    70
				case 'mdat': // Media DATa atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    71
					// 'mdat' contains the actual data for the audio/video
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    72
					if (($atomsize > 8) && (!isset($info['avdataend_tmp']) || ($info['quicktime'][$atomname]['size'] > ($info['avdataend_tmp'] - $info['avdataoffset'])))) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    73
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    74
						$info['avdataoffset'] = $info['quicktime'][$atomname]['offset'] + 8;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    75
						$OldAVDataEnd         = $info['avdataend'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    76
						$info['avdataend']    = $info['quicktime'][$atomname]['offset'] + $info['quicktime'][$atomname]['size'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    77
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    78
						$getid3_temp = new getID3();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    79
						$getid3_temp->openfile($this->getid3->filename);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    80
						$getid3_temp->info['avdataoffset'] = $info['avdataoffset'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    81
						$getid3_temp->info['avdataend']    = $info['avdataend'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    82
						$getid3_mp3 = new getid3_mp3($getid3_temp);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    83
						if ($getid3_mp3->MPEGaudioHeaderValid($getid3_mp3->MPEGaudioHeaderDecode(fread($this->getid3->fp, 4)))) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    84
							$getid3_mp3->getOnlyMPEGaudioInfo($getid3_temp->info['avdataoffset'], false);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    85
							if (!empty($getid3_temp->info['warning'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    86
								foreach ($getid3_temp->info['warning'] as $value) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    87
									$info['warning'][] = $value;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    88
								}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    89
							}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    90
							if (!empty($getid3_temp->info['mpeg'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    91
								$info['mpeg'] = $getid3_temp->info['mpeg'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    92
								if (isset($info['mpeg']['audio'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    93
									$info['audio']['dataformat']   = 'mp3';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    94
									$info['audio']['codec']        = (!empty($info['mpeg']['audio']['encoder']) ? $info['mpeg']['audio']['encoder'] : (!empty($info['mpeg']['audio']['codec']) ? $info['mpeg']['audio']['codec'] : (!empty($info['mpeg']['audio']['LAME']) ? 'LAME' :'mp3')));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    95
									$info['audio']['sample_rate']  = $info['mpeg']['audio']['sample_rate'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    96
									$info['audio']['channels']     = $info['mpeg']['audio']['channels'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    97
									$info['audio']['bitrate']      = $info['mpeg']['audio']['bitrate'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    98
									$info['audio']['bitrate_mode'] = strtolower($info['mpeg']['audio']['bitrate_mode']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    99
									$info['bitrate']               = $info['audio']['bitrate'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   100
								}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   101
							}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   102
						}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   103
						unset($getid3_mp3, $getid3_temp);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   104
						$info['avdataend'] = $OldAVDataEnd;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   105
						unset($OldAVDataEnd);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   106
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   107
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   108
					break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   109
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   110
				case 'free': // FREE space atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   111
				case 'skip': // SKIP atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   112
				case 'wide': // 64-bit expansion placeholder atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   113
					// 'free', 'skip' and 'wide' are just padding, contains no useful data at all
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   114
					break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   115
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   116
				default:
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   117
					$atomHierarchy = array();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   118
					$info['quicktime'][$atomname] = $this->QuicktimeParseAtom($atomname, $atomsize, fread($this->getid3->fp, $atomsize), $offset, $atomHierarchy, $this->ParseAllPossibleAtoms);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   119
					break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   120
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   121
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   122
			$offset += $atomsize;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   123
			$atomcounter++;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   124
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   125
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   126
		if (!empty($info['avdataend_tmp'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   127
			// this value is assigned to a temp value and then erased because
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   128
			// otherwise any atoms beyond the 'mdat' atom would not get parsed
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   129
			$info['avdataend'] = $info['avdataend_tmp'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   130
			unset($info['avdataend_tmp']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   131
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   132
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   133
		if (!isset($info['bitrate']) && isset($info['playtime_seconds'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   134
			$info['bitrate'] = (($info['avdataend'] - $info['avdataoffset']) * 8) / $info['playtime_seconds'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   135
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   136
		if (isset($info['bitrate']) && !isset($info['audio']['bitrate']) && !isset($info['quicktime']['video'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   137
			$info['audio']['bitrate'] = $info['bitrate'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   138
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   139
		if (!empty($info['playtime_seconds']) && !isset($info['video']['frame_rate']) && !empty($info['quicktime']['stts_framecount'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   140
			foreach ($info['quicktime']['stts_framecount'] as $key => $samples_count) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   141
				$samples_per_second = $samples_count / $info['playtime_seconds'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   142
				if ($samples_per_second > 240) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   143
					// has to be audio samples
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   144
				} else {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   145
					$info['video']['frame_rate'] = $samples_per_second;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   146
					break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   147
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   148
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   149
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   150
		if (($info['audio']['dataformat'] == 'mp4') && empty($info['video']['resolution_x'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   151
			$info['fileformat'] = 'mp4';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   152
			$info['mime_type']  = 'audio/mp4';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   153
			unset($info['video']['dataformat']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   154
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   155
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   156
		if (!$this->ReturnAtomData) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   157
			unset($info['quicktime']['moov']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   158
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   159
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   160
		if (empty($info['audio']['dataformat']) && !empty($info['quicktime']['audio'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   161
			$info['audio']['dataformat'] = 'quicktime';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   162
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   163
		if (empty($info['video']['dataformat']) && !empty($info['quicktime']['video'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   164
			$info['video']['dataformat'] = 'quicktime';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   165
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   166
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   167
		return true;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   168
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   169
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   170
	public function QuicktimeParseAtom($atomname, $atomsize, $atom_data, $baseoffset, &$atomHierarchy, $ParseAllPossibleAtoms) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   171
		// http://developer.apple.com/techpubs/quicktime/qtdevdocs/APIREF/INDEX/atomalphaindex.htm
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   172
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   173
		$info = &$this->getid3->info;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   174
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   175
		//$atom_parent = array_pop($atomHierarchy);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   176
		$atom_parent = end($atomHierarchy); // http://www.getid3.org/phpBB3/viewtopic.php?t=1717
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   177
		array_push($atomHierarchy, $atomname);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   178
		$atom_structure['hierarchy'] = implode(' ', $atomHierarchy);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   179
		$atom_structure['name']      = $atomname;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   180
		$atom_structure['size']      = $atomsize;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   181
		$atom_structure['offset']    = $baseoffset;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   182
//echo getid3_lib::PrintHexBytes(substr($atom_data, 0, 8)).'<br>';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   183
//echo getid3_lib::PrintHexBytes(substr($atom_data, 0, 8), false).'<br><br>';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   184
		switch ($atomname) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   185
			case 'moov': // MOVie container atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   186
			case 'trak': // TRAcK container atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   187
			case 'clip': // CLIPping container atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   188
			case 'matt': // track MATTe container atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   189
			case 'edts': // EDiTS container atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   190
			case 'tref': // Track REFerence container atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   191
			case 'mdia': // MeDIA container atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   192
			case 'minf': // Media INFormation container atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   193
			case 'dinf': // Data INFormation container atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   194
			case 'udta': // User DaTA container atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   195
			case 'cmov': // Compressed MOVie container atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   196
			case 'rmra': // Reference Movie Record Atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   197
			case 'rmda': // Reference Movie Descriptor Atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   198
			case 'gmhd': // Generic Media info HeaDer atom (seen on QTVR)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   199
				$atom_structure['subatoms'] = $this->QuicktimeParseContainerAtom($atom_data, $baseoffset + 8, $atomHierarchy, $ParseAllPossibleAtoms);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   200
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   201
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   202
			case 'ilst': // Item LiST container atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   203
				$atom_structure['subatoms'] = $this->QuicktimeParseContainerAtom($atom_data, $baseoffset + 8, $atomHierarchy, $ParseAllPossibleAtoms);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   204
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   205
				// some "ilst" atoms contain data atoms that have a numeric name, and the data is far more accessible if the returned array is compacted
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   206
				$allnumericnames = true;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   207
				foreach ($atom_structure['subatoms'] as $subatomarray) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   208
					if (!is_integer($subatomarray['name']) || (count($subatomarray['subatoms']) != 1)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   209
						$allnumericnames = false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   210
						break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   211
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   212
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   213
				if ($allnumericnames) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   214
					$newData = array();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   215
					foreach ($atom_structure['subatoms'] as $subatomarray) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   216
						foreach ($subatomarray['subatoms'] as $newData_subatomarray) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   217
							unset($newData_subatomarray['hierarchy'], $newData_subatomarray['name']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   218
							$newData[$subatomarray['name']] = $newData_subatomarray;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   219
							break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   220
						}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   221
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   222
					$atom_structure['data'] = $newData;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   223
					unset($atom_structure['subatoms']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   224
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   225
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   226
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   227
			case "\x00\x00\x00\x01":
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   228
			case "\x00\x00\x00\x02":
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   229
			case "\x00\x00\x00\x03":
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   230
			case "\x00\x00\x00\x04":
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   231
			case "\x00\x00\x00\x05":
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   232
				$atomname = getid3_lib::BigEndian2Int($atomname);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   233
				$atom_structure['name'] = $atomname;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   234
				$atom_structure['subatoms'] = $this->QuicktimeParseContainerAtom($atom_data, $baseoffset + 8, $atomHierarchy, $ParseAllPossibleAtoms);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   235
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   236
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   237
			case 'stbl': // Sample TaBLe container atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   238
				$atom_structure['subatoms'] = $this->QuicktimeParseContainerAtom($atom_data, $baseoffset + 8, $atomHierarchy, $ParseAllPossibleAtoms);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   239
				$isVideo = false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   240
				$framerate  = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   241
				$framecount = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   242
				foreach ($atom_structure['subatoms'] as $key => $value_array) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   243
					if (isset($value_array['sample_description_table'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   244
						foreach ($value_array['sample_description_table'] as $key2 => $value_array2) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   245
							if (isset($value_array2['data_format'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   246
								switch ($value_array2['data_format']) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   247
									case 'avc1':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   248
									case 'mp4v':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   249
										// video data
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   250
										$isVideo = true;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   251
										break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   252
									case 'mp4a':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   253
										// audio data
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   254
										break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   255
								}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   256
							}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   257
						}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   258
					} elseif (isset($value_array['time_to_sample_table'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   259
						foreach ($value_array['time_to_sample_table'] as $key2 => $value_array2) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   260
							if (isset($value_array2['sample_count']) && isset($value_array2['sample_duration']) && ($value_array2['sample_duration'] > 0)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   261
								$framerate  = round($info['quicktime']['time_scale'] / $value_array2['sample_duration'], 3);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   262
								$framecount = $value_array2['sample_count'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   263
							}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   264
						}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   265
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   266
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   267
				if ($isVideo && $framerate) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   268
					$info['quicktime']['video']['frame_rate'] = $framerate;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   269
					$info['video']['frame_rate'] = $info['quicktime']['video']['frame_rate'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   270
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   271
				if ($isVideo && $framecount) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   272
					$info['quicktime']['video']['frame_count'] = $framecount;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   273
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   274
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   275
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   276
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   277
			case 'aART': // Album ARTist
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   278
			case 'catg': // CaTeGory
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   279
			case 'covr': // COVeR artwork
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   280
			case 'cpil': // ComPILation
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   281
			case 'cprt': // CoPyRighT
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   282
			case 'desc': // DESCription
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   283
			case 'disk': // DISK number
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   284
			case 'egid': // Episode Global ID
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   285
			case 'gnre': // GeNRE
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   286
			case 'keyw': // KEYWord
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   287
			case 'ldes':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   288
			case 'pcst': // PodCaST
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   289
			case 'pgap': // GAPless Playback
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   290
			case 'purd': // PURchase Date
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   291
			case 'purl': // Podcast URL
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   292
			case 'rati':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   293
			case 'rndu':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   294
			case 'rpdu':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   295
			case 'rtng': // RaTiNG
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   296
			case 'stik':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   297
			case 'tmpo': // TeMPO (BPM)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   298
			case 'trkn': // TRacK Number
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   299
			case 'tves': // TV EpiSode
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   300
			case 'tvnn': // TV Network Name
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   301
			case 'tvsh': // TV SHow Name
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   302
			case 'tvsn': // TV SeasoN
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   303
			case 'akID': // iTunes store account type
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   304
			case 'apID':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   305
			case 'atID':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   306
			case 'cmID':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   307
			case 'cnID':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   308
			case 'geID':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   309
			case 'plID':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   310
			case 'sfID': // iTunes store country
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   311
			case '©alb': // ALBum
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   312
			case '©art': // ARTist
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   313
			case '©ART':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   314
			case '©aut':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   315
			case '©cmt': // CoMmenT
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   316
			case '©com': // COMposer
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   317
			case '©cpy':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   318
			case '©day': // content created year
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   319
			case '©dir':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   320
			case '©ed1':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   321
			case '©ed2':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   322
			case '©ed3':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   323
			case '©ed4':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   324
			case '©ed5':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   325
			case '©ed6':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   326
			case '©ed7':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   327
			case '©ed8':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   328
			case '©ed9':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   329
			case '©enc':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   330
			case '©fmt':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   331
			case '©gen': // GENre
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   332
			case '©grp': // GRouPing
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   333
			case '©hst':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   334
			case '©inf':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   335
			case '©lyr': // LYRics
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   336
			case '©mak':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   337
			case '©mod':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   338
			case '©nam': // full NAMe
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   339
			case '©ope':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   340
			case '©PRD':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   341
			case '©prd':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   342
			case '©prf':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   343
			case '©req':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   344
			case '©src':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   345
			case '©swr':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   346
			case '©too': // encoder
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   347
			case '©trk': // TRacK
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   348
			case '©url':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   349
			case '©wrn':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   350
			case '©wrt': // WRiTer
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   351
			case '----': // itunes specific
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   352
				if ($atom_parent == 'udta') {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   353
					// User data atom handler
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   354
					$atom_structure['data_length'] = getid3_lib::BigEndian2Int(substr($atom_data, 0, 2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   355
					$atom_structure['language_id'] = getid3_lib::BigEndian2Int(substr($atom_data, 2, 2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   356
					$atom_structure['data']        =                           substr($atom_data, 4);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   357
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   358
					$atom_structure['language']    = $this->QuicktimeLanguageLookup($atom_structure['language_id']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   359
					if (empty($info['comments']['language']) || (!in_array($atom_structure['language'], $info['comments']['language']))) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   360
						$info['comments']['language'][] = $atom_structure['language'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   361
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   362
				} else {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   363
					// Apple item list box atom handler
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   364
					$atomoffset = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   365
					if (substr($atom_data, 2, 2) == "\x10\xB5") {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   366
						// not sure what it means, but observed on iPhone4 data.
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   367
						// Each $atom_data has 2 bytes of datasize, plus 0x10B5, then data
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   368
						while ($atomoffset < strlen($atom_data)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   369
							$boxsmallsize = getid3_lib::BigEndian2Int(substr($atom_data, $atomoffset,     2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   370
							$boxsmalltype =                           substr($atom_data, $atomoffset + 2, 2);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   371
							$boxsmalldata =                           substr($atom_data, $atomoffset + 4, $boxsmallsize);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   372
							if ($boxsmallsize <= 1) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   373
								$info['warning'][] = 'Invalid QuickTime atom smallbox size "'.$boxsmallsize.'" in atom "'.$atomname.'" at offset: '.($atom_structure['offset'] + $atomoffset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   374
								$atom_structure['data'] = null;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   375
								$atomoffset = strlen($atom_data);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   376
								break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   377
							}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   378
							switch ($boxsmalltype) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   379
								case "\x10\xB5":
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   380
									$atom_structure['data'] = $boxsmalldata;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   381
									break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   382
								default:
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   383
									$info['warning'][] = 'Unknown QuickTime smallbox type: "'.getid3_lib::PrintHexBytes($boxsmalltype).'" at offset '.$baseoffset;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   384
									$atom_structure['data'] = $atom_data;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   385
									break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   386
							}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   387
							$atomoffset += (4 + $boxsmallsize);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   388
						}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   389
					} else {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   390
						while ($atomoffset < strlen($atom_data)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   391
							$boxsize = getid3_lib::BigEndian2Int(substr($atom_data, $atomoffset, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   392
							$boxtype =                           substr($atom_data, $atomoffset + 4, 4);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   393
							$boxdata =                           substr($atom_data, $atomoffset + 8, $boxsize - 8);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   394
							if ($boxsize <= 1) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   395
								$info['warning'][] = 'Invalid QuickTime atom box size "'.$boxsize.'" in atom "'.$atomname.'" at offset: '.($atom_structure['offset'] + $atomoffset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   396
								$atom_structure['data'] = null;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   397
								$atomoffset = strlen($atom_data);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   398
								break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   399
							}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   400
							$atomoffset += $boxsize;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   401
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   402
							switch ($boxtype) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   403
								case 'mean':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   404
								case 'name':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   405
									$atom_structure[$boxtype] = substr($boxdata, 4);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   406
									break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   407
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   408
								case 'data':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   409
									$atom_structure['version']   = getid3_lib::BigEndian2Int(substr($boxdata,  0, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   410
									$atom_structure['flags_raw'] = getid3_lib::BigEndian2Int(substr($boxdata,  1, 3));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   411
									switch ($atom_structure['flags_raw']) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   412
										case 0:  // data flag
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   413
										case 21: // tmpo/cpil flag
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   414
											switch ($atomname) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   415
												case 'cpil':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   416
												case 'pcst':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   417
												case 'pgap':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   418
													$atom_structure['data'] = getid3_lib::BigEndian2Int(substr($boxdata, 8, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   419
													break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   420
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   421
												case 'tmpo':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   422
													$atom_structure['data'] = getid3_lib::BigEndian2Int(substr($boxdata, 8, 2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   423
													break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   424
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   425
												case 'disk':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   426
												case 'trkn':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   427
													$num       = getid3_lib::BigEndian2Int(substr($boxdata, 10, 2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   428
													$num_total = getid3_lib::BigEndian2Int(substr($boxdata, 12, 2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   429
													$atom_structure['data']  = empty($num) ? '' : $num;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   430
													$atom_structure['data'] .= empty($num_total) ? '' : '/'.$num_total;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   431
													break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   432
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   433
												case 'gnre':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   434
													$GenreID = getid3_lib::BigEndian2Int(substr($boxdata, 8, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   435
													$atom_structure['data']    = getid3_id3v1::LookupGenreName($GenreID - 1);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   436
													break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   437
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   438
												case 'rtng':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   439
													$atom_structure[$atomname] = getid3_lib::BigEndian2Int(substr($boxdata, 8, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   440
													$atom_structure['data']    = $this->QuicktimeContentRatingLookup($atom_structure[$atomname]);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   441
													break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   442
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   443
												case 'stik':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   444
													$atom_structure[$atomname] = getid3_lib::BigEndian2Int(substr($boxdata, 8, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   445
													$atom_structure['data']    = $this->QuicktimeSTIKLookup($atom_structure[$atomname]);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   446
													break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   447
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   448
												case 'sfID':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   449
													$atom_structure[$atomname] = getid3_lib::BigEndian2Int(substr($boxdata, 8, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   450
													$atom_structure['data']    = $this->QuicktimeStoreFrontCodeLookup($atom_structure[$atomname]);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   451
													break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   452
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   453
												case 'egid':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   454
												case 'purl':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   455
													$atom_structure['data'] = substr($boxdata, 8);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   456
													break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   457
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   458
												default:
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   459
													$atom_structure['data'] = getid3_lib::BigEndian2Int(substr($boxdata, 8, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   460
											}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   461
											break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   462
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   463
										case 1:  // text flag
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   464
										case 13: // image flag
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   465
										default:
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   466
											$atom_structure['data'] = substr($boxdata, 8);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   467
											break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   468
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   469
									}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   470
									break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   471
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   472
								default:
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   473
									$info['warning'][] = 'Unknown QuickTime box type: "'.getid3_lib::PrintHexBytes($boxtype).'" at offset '.$baseoffset;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   474
									$atom_structure['data'] = $atom_data;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   475
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   476
							}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   477
						}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   478
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   479
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   480
				$this->CopyToAppropriateCommentsSection($atomname, $atom_structure['data'], $atom_structure['name']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   481
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   482
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   483
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   484
			case 'play': // auto-PLAY atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   485
				$atom_structure['autoplay'] = (bool) getid3_lib::BigEndian2Int(substr($atom_data,  0, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   486
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   487
				$info['quicktime']['autoplay'] = $atom_structure['autoplay'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   488
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   489
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   490
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   491
			case 'WLOC': // Window LOCation atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   492
				$atom_structure['location_x']  = getid3_lib::BigEndian2Int(substr($atom_data,  0, 2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   493
				$atom_structure['location_y']  = getid3_lib::BigEndian2Int(substr($atom_data,  2, 2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   494
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   495
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   496
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   497
			case 'LOOP': // LOOPing atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   498
			case 'SelO': // play SELection Only atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   499
			case 'AllF': // play ALL Frames atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   500
				$atom_structure['data'] = getid3_lib::BigEndian2Int($atom_data);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   501
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   502
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   503
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   504
			case 'name': //
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   505
			case 'MCPS': // Media Cleaner PRo
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   506
			case '@PRM': // adobe PReMiere version
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   507
			case '@PRQ': // adobe PRemiere Quicktime version
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   508
				$atom_structure['data'] = $atom_data;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   509
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   510
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   511
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   512
			case 'cmvd': // Compressed MooV Data atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   513
				// Code by ubergeekØubergeek*tv based on information from
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   514
				// http://developer.apple.com/quicktime/icefloe/dispatch012.html
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   515
				$atom_structure['unCompressedSize'] = getid3_lib::BigEndian2Int(substr($atom_data, 0, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   516
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   517
				$CompressedFileData = substr($atom_data, 4);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   518
				if ($UncompressedHeader = @gzuncompress($CompressedFileData)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   519
					$atom_structure['subatoms'] = $this->QuicktimeParseContainerAtom($UncompressedHeader, 0, $atomHierarchy, $ParseAllPossibleAtoms);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   520
				} else {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   521
					$info['warning'][] = 'Error decompressing compressed MOV atom at offset '.$atom_structure['offset'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   522
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   523
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   524
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   525
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   526
			case 'dcom': // Data COMpression atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   527
				$atom_structure['compression_id']   = $atom_data;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   528
				$atom_structure['compression_text'] = $this->QuicktimeDCOMLookup($atom_data);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   529
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   530
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   531
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   532
			case 'rdrf': // Reference movie Data ReFerence atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   533
				$atom_structure['version']                = getid3_lib::BigEndian2Int(substr($atom_data,  0, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   534
				$atom_structure['flags_raw']              = getid3_lib::BigEndian2Int(substr($atom_data,  1, 3));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   535
				$atom_structure['flags']['internal_data'] = (bool) ($atom_structure['flags_raw'] & 0x000001);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   536
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   537
				$atom_structure['reference_type_name']    =                           substr($atom_data,  4, 4);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   538
				$atom_structure['reference_length']       = getid3_lib::BigEndian2Int(substr($atom_data,  8, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   539
				switch ($atom_structure['reference_type_name']) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   540
					case 'url ':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   541
						$atom_structure['url']            =       $this->NoNullString(substr($atom_data, 12));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   542
						break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   543
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   544
					case 'alis':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   545
						$atom_structure['file_alias']     =                           substr($atom_data, 12);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   546
						break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   547
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   548
					case 'rsrc':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   549
						$atom_structure['resource_alias'] =                           substr($atom_data, 12);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   550
						break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   551
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   552
					default:
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   553
						$atom_structure['data']           =                           substr($atom_data, 12);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   554
						break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   555
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   556
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   557
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   558
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   559
			case 'rmqu': // Reference Movie QUality atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   560
				$atom_structure['movie_quality'] = getid3_lib::BigEndian2Int($atom_data);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   561
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   562
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   563
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   564
			case 'rmcs': // Reference Movie Cpu Speed atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   565
				$atom_structure['version']          = getid3_lib::BigEndian2Int(substr($atom_data,  0, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   566
				$atom_structure['flags_raw']        = getid3_lib::BigEndian2Int(substr($atom_data,  1, 3)); // hardcoded: 0x0000
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   567
				$atom_structure['cpu_speed_rating'] = getid3_lib::BigEndian2Int(substr($atom_data,  4, 2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   568
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   569
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   570
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   571
			case 'rmvc': // Reference Movie Version Check atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   572
				$atom_structure['version']            = getid3_lib::BigEndian2Int(substr($atom_data,  0, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   573
				$atom_structure['flags_raw']          = getid3_lib::BigEndian2Int(substr($atom_data,  1, 3)); // hardcoded: 0x0000
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   574
				$atom_structure['gestalt_selector']   =                           substr($atom_data,  4, 4);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   575
				$atom_structure['gestalt_value_mask'] = getid3_lib::BigEndian2Int(substr($atom_data,  8, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   576
				$atom_structure['gestalt_value']      = getid3_lib::BigEndian2Int(substr($atom_data, 12, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   577
				$atom_structure['gestalt_check_type'] = getid3_lib::BigEndian2Int(substr($atom_data, 14, 2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   578
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   579
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   580
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   581
			case 'rmcd': // Reference Movie Component check atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   582
				$atom_structure['version']                = getid3_lib::BigEndian2Int(substr($atom_data,  0, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   583
				$atom_structure['flags_raw']              = getid3_lib::BigEndian2Int(substr($atom_data,  1, 3)); // hardcoded: 0x0000
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   584
				$atom_structure['component_type']         =                           substr($atom_data,  4, 4);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   585
				$atom_structure['component_subtype']      =                           substr($atom_data,  8, 4);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   586
				$atom_structure['component_manufacturer'] =                           substr($atom_data, 12, 4);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   587
				$atom_structure['component_flags_raw']    = getid3_lib::BigEndian2Int(substr($atom_data, 16, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   588
				$atom_structure['component_flags_mask']   = getid3_lib::BigEndian2Int(substr($atom_data, 20, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   589
				$atom_structure['component_min_version']  = getid3_lib::BigEndian2Int(substr($atom_data, 24, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   590
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   591
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   592
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   593
			case 'rmdr': // Reference Movie Data Rate atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   594
				$atom_structure['version']       = getid3_lib::BigEndian2Int(substr($atom_data,  0, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   595
				$atom_structure['flags_raw']     = getid3_lib::BigEndian2Int(substr($atom_data,  1, 3)); // hardcoded: 0x0000
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   596
				$atom_structure['data_rate']     = getid3_lib::BigEndian2Int(substr($atom_data,  4, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   597
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   598
				$atom_structure['data_rate_bps'] = $atom_structure['data_rate'] * 10;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   599
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   600
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   601
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   602
			case 'rmla': // Reference Movie Language Atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   603
				$atom_structure['version']     = getid3_lib::BigEndian2Int(substr($atom_data,  0, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   604
				$atom_structure['flags_raw']   = getid3_lib::BigEndian2Int(substr($atom_data,  1, 3)); // hardcoded: 0x0000
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   605
				$atom_structure['language_id'] = getid3_lib::BigEndian2Int(substr($atom_data,  4, 2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   606
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   607
				$atom_structure['language']    = $this->QuicktimeLanguageLookup($atom_structure['language_id']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   608
				if (empty($info['comments']['language']) || (!in_array($atom_structure['language'], $info['comments']['language']))) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   609
					$info['comments']['language'][] = $atom_structure['language'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   610
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   611
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   612
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   613
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   614
			case 'rmla': // Reference Movie Language Atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   615
				$atom_structure['version']   = getid3_lib::BigEndian2Int(substr($atom_data,  0, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   616
				$atom_structure['flags_raw'] = getid3_lib::BigEndian2Int(substr($atom_data,  1, 3)); // hardcoded: 0x0000
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   617
				$atom_structure['track_id']  = getid3_lib::BigEndian2Int(substr($atom_data,  4, 2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   618
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   619
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   620
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   621
			case 'ptv ': // Print To Video - defines a movie's full screen mode
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   622
				// http://developer.apple.com/documentation/QuickTime/APIREF/SOURCESIV/at_ptv-_pg.htm
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   623
				$atom_structure['display_size_raw']  = getid3_lib::BigEndian2Int(substr($atom_data, 0, 2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   624
				$atom_structure['reserved_1']        = getid3_lib::BigEndian2Int(substr($atom_data, 2, 2)); // hardcoded: 0x0000
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   625
				$atom_structure['reserved_2']        = getid3_lib::BigEndian2Int(substr($atom_data, 4, 2)); // hardcoded: 0x0000
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   626
				$atom_structure['slide_show_flag']   = getid3_lib::BigEndian2Int(substr($atom_data, 6, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   627
				$atom_structure['play_on_open_flag'] = getid3_lib::BigEndian2Int(substr($atom_data, 7, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   628
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   629
				$atom_structure['flags']['play_on_open'] = (bool) $atom_structure['play_on_open_flag'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   630
				$atom_structure['flags']['slide_show']   = (bool) $atom_structure['slide_show_flag'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   631
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   632
				$ptv_lookup[0] = 'normal';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   633
				$ptv_lookup[1] = 'double';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   634
				$ptv_lookup[2] = 'half';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   635
				$ptv_lookup[3] = 'full';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   636
				$ptv_lookup[4] = 'current';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   637
				if (isset($ptv_lookup[$atom_structure['display_size_raw']])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   638
					$atom_structure['display_size'] = $ptv_lookup[$atom_structure['display_size_raw']];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   639
				} else {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   640
					$info['warning'][] = 'unknown "ptv " display constant ('.$atom_structure['display_size_raw'].')';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   641
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   642
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   643
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   644
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   645
			case 'stsd': // Sample Table Sample Description atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   646
				$atom_structure['version']        = getid3_lib::BigEndian2Int(substr($atom_data,  0, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   647
				$atom_structure['flags_raw']      = getid3_lib::BigEndian2Int(substr($atom_data,  1, 3)); // hardcoded: 0x0000
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   648
				$atom_structure['number_entries'] = getid3_lib::BigEndian2Int(substr($atom_data,  4, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   649
				$stsdEntriesDataOffset = 8;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   650
				for ($i = 0; $i < $atom_structure['number_entries']; $i++) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   651
					$atom_structure['sample_description_table'][$i]['size']             = getid3_lib::BigEndian2Int(substr($atom_data, $stsdEntriesDataOffset, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   652
					$stsdEntriesDataOffset += 4;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   653
					$atom_structure['sample_description_table'][$i]['data_format']      =                           substr($atom_data, $stsdEntriesDataOffset, 4);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   654
					$stsdEntriesDataOffset += 4;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   655
					$atom_structure['sample_description_table'][$i]['reserved']         = getid3_lib::BigEndian2Int(substr($atom_data, $stsdEntriesDataOffset, 6));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   656
					$stsdEntriesDataOffset += 6;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   657
					$atom_structure['sample_description_table'][$i]['reference_index']  = getid3_lib::BigEndian2Int(substr($atom_data, $stsdEntriesDataOffset, 2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   658
					$stsdEntriesDataOffset += 2;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   659
					$atom_structure['sample_description_table'][$i]['data']             =                           substr($atom_data, $stsdEntriesDataOffset, ($atom_structure['sample_description_table'][$i]['size'] - 4 - 4 - 6 - 2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   660
					$stsdEntriesDataOffset += ($atom_structure['sample_description_table'][$i]['size'] - 4 - 4 - 6 - 2);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   661
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   662
					$atom_structure['sample_description_table'][$i]['encoder_version']  = getid3_lib::BigEndian2Int(substr($atom_structure['sample_description_table'][$i]['data'],  0, 2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   663
					$atom_structure['sample_description_table'][$i]['encoder_revision'] = getid3_lib::BigEndian2Int(substr($atom_structure['sample_description_table'][$i]['data'],  2, 2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   664
					$atom_structure['sample_description_table'][$i]['encoder_vendor']   =                           substr($atom_structure['sample_description_table'][$i]['data'],  4, 4);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   665
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   666
					switch ($atom_structure['sample_description_table'][$i]['encoder_vendor']) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   667
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   668
						case "\x00\x00\x00\x00":
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   669
							// audio tracks
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   670
							$atom_structure['sample_description_table'][$i]['audio_channels']       =   getid3_lib::BigEndian2Int(substr($atom_structure['sample_description_table'][$i]['data'],  8,  2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   671
							$atom_structure['sample_description_table'][$i]['audio_bit_depth']      =   getid3_lib::BigEndian2Int(substr($atom_structure['sample_description_table'][$i]['data'], 10,  2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   672
							$atom_structure['sample_description_table'][$i]['audio_compression_id'] =   getid3_lib::BigEndian2Int(substr($atom_structure['sample_description_table'][$i]['data'], 12,  2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   673
							$atom_structure['sample_description_table'][$i]['audio_packet_size']    =   getid3_lib::BigEndian2Int(substr($atom_structure['sample_description_table'][$i]['data'], 14,  2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   674
							$atom_structure['sample_description_table'][$i]['audio_sample_rate']    = getid3_lib::FixedPoint16_16(substr($atom_structure['sample_description_table'][$i]['data'], 16,  4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   675
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   676
							// video tracks
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   677
							// http://developer.apple.com/library/mac/#documentation/QuickTime/QTFF/QTFFChap3/qtff3.html
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   678
							$atom_structure['sample_description_table'][$i]['temporal_quality'] =   getid3_lib::BigEndian2Int(substr($atom_structure['sample_description_table'][$i]['data'],  8,  4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   679
							$atom_structure['sample_description_table'][$i]['spatial_quality']  =   getid3_lib::BigEndian2Int(substr($atom_structure['sample_description_table'][$i]['data'], 12,  4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   680
							$atom_structure['sample_description_table'][$i]['width']            =   getid3_lib::BigEndian2Int(substr($atom_structure['sample_description_table'][$i]['data'], 16,  2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   681
							$atom_structure['sample_description_table'][$i]['height']           =   getid3_lib::BigEndian2Int(substr($atom_structure['sample_description_table'][$i]['data'], 18,  2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   682
							$atom_structure['sample_description_table'][$i]['resolution_x']     = getid3_lib::FixedPoint16_16(substr($atom_structure['sample_description_table'][$i]['data'], 24,  4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   683
							$atom_structure['sample_description_table'][$i]['resolution_y']     = getid3_lib::FixedPoint16_16(substr($atom_structure['sample_description_table'][$i]['data'], 28,  4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   684
							$atom_structure['sample_description_table'][$i]['data_size']        =   getid3_lib::BigEndian2Int(substr($atom_structure['sample_description_table'][$i]['data'], 32,  4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   685
							$atom_structure['sample_description_table'][$i]['frame_count']      =   getid3_lib::BigEndian2Int(substr($atom_structure['sample_description_table'][$i]['data'], 36,  2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   686
							$atom_structure['sample_description_table'][$i]['compressor_name']  =                             substr($atom_structure['sample_description_table'][$i]['data'], 38,  4);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   687
							$atom_structure['sample_description_table'][$i]['pixel_depth']      =   getid3_lib::BigEndian2Int(substr($atom_structure['sample_description_table'][$i]['data'], 42,  2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   688
							$atom_structure['sample_description_table'][$i]['color_table_id']   =   getid3_lib::BigEndian2Int(substr($atom_structure['sample_description_table'][$i]['data'], 44,  2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   689
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   690
							switch ($atom_structure['sample_description_table'][$i]['data_format']) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   691
								case '2vuY':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   692
								case 'avc1':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   693
								case 'cvid':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   694
								case 'dvc ':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   695
								case 'dvcp':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   696
								case 'gif ':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   697
								case 'h263':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   698
								case 'jpeg':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   699
								case 'kpcd':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   700
								case 'mjpa':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   701
								case 'mjpb':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   702
								case 'mp4v':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   703
								case 'png ':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   704
								case 'raw ':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   705
								case 'rle ':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   706
								case 'rpza':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   707
								case 'smc ':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   708
								case 'SVQ1':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   709
								case 'SVQ3':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   710
								case 'tiff':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   711
								case 'v210':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   712
								case 'v216':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   713
								case 'v308':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   714
								case 'v408':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   715
								case 'v410':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   716
								case 'yuv2':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   717
									$info['fileformat'] = 'mp4';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   718
									$info['video']['fourcc'] = $atom_structure['sample_description_table'][$i]['data_format'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   719
// http://www.getid3.org/phpBB3/viewtopic.php?t=1550
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   720
//if ((!empty($atom_structure['sample_description_table'][$i]['width']) && !empty($atom_structure['sample_description_table'][$i]['width'])) && (empty($info['video']['resolution_x']) || empty($info['video']['resolution_y']) || (number_format($info['video']['resolution_x'], 6) != number_format(round($info['video']['resolution_x']), 6)) || (number_format($info['video']['resolution_y'], 6) != number_format(round($info['video']['resolution_y']), 6)))) { // ugly check for floating point numbers
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   721
if (!empty($atom_structure['sample_description_table'][$i]['width']) && !empty($atom_structure['sample_description_table'][$i]['height'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   722
	// assume that values stored here are more important than values stored in [tkhd] atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   723
	$info['video']['resolution_x'] = $atom_structure['sample_description_table'][$i]['width'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   724
	$info['video']['resolution_y'] = $atom_structure['sample_description_table'][$i]['height'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   725
	$info['quicktime']['video']['resolution_x'] = $info['video']['resolution_x'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   726
	$info['quicktime']['video']['resolution_y'] = $info['video']['resolution_y'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   727
}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   728
									break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   729
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   730
								case 'qtvr':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   731
									$info['video']['dataformat'] = 'quicktimevr';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   732
									break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   733
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   734
								case 'mp4a':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   735
								default:
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   736
									$info['quicktime']['audio']['codec']       = $this->QuicktimeAudioCodecLookup($atom_structure['sample_description_table'][$i]['data_format']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   737
									$info['quicktime']['audio']['sample_rate'] = $atom_structure['sample_description_table'][$i]['audio_sample_rate'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   738
									$info['quicktime']['audio']['channels']    = $atom_structure['sample_description_table'][$i]['audio_channels'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   739
									$info['quicktime']['audio']['bit_depth']   = $atom_structure['sample_description_table'][$i]['audio_bit_depth'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   740
									$info['audio']['codec']                    = $info['quicktime']['audio']['codec'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   741
									$info['audio']['sample_rate']              = $info['quicktime']['audio']['sample_rate'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   742
									$info['audio']['channels']                 = $info['quicktime']['audio']['channels'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   743
									$info['audio']['bits_per_sample']          = $info['quicktime']['audio']['bit_depth'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   744
									switch ($atom_structure['sample_description_table'][$i]['data_format']) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   745
										case 'raw ': // PCM
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   746
										case 'alac': // Apple Lossless Audio Codec
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   747
											$info['audio']['lossless'] = true;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   748
											break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   749
										default:
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   750
											$info['audio']['lossless'] = false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   751
											break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   752
									}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   753
									break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   754
							}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   755
							break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   756
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   757
						default:
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   758
							switch ($atom_structure['sample_description_table'][$i]['data_format']) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   759
								case 'mp4s':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   760
									$info['fileformat'] = 'mp4';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   761
									break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   762
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   763
								default:
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   764
									// video atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   765
									$atom_structure['sample_description_table'][$i]['video_temporal_quality']  =   getid3_lib::BigEndian2Int(substr($atom_structure['sample_description_table'][$i]['data'],  8,  4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   766
									$atom_structure['sample_description_table'][$i]['video_spatial_quality']   =   getid3_lib::BigEndian2Int(substr($atom_structure['sample_description_table'][$i]['data'], 12,  4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   767
									$atom_structure['sample_description_table'][$i]['video_frame_width']       =   getid3_lib::BigEndian2Int(substr($atom_structure['sample_description_table'][$i]['data'], 16,  2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   768
									$atom_structure['sample_description_table'][$i]['video_frame_height']      =   getid3_lib::BigEndian2Int(substr($atom_structure['sample_description_table'][$i]['data'], 18,  2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   769
									$atom_structure['sample_description_table'][$i]['video_resolution_x']      = getid3_lib::FixedPoint16_16(substr($atom_structure['sample_description_table'][$i]['data'], 20,  4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   770
									$atom_structure['sample_description_table'][$i]['video_resolution_y']      = getid3_lib::FixedPoint16_16(substr($atom_structure['sample_description_table'][$i]['data'], 24,  4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   771
									$atom_structure['sample_description_table'][$i]['video_data_size']         =   getid3_lib::BigEndian2Int(substr($atom_structure['sample_description_table'][$i]['data'], 28,  4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   772
									$atom_structure['sample_description_table'][$i]['video_frame_count']       =   getid3_lib::BigEndian2Int(substr($atom_structure['sample_description_table'][$i]['data'], 32,  2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   773
									$atom_structure['sample_description_table'][$i]['video_encoder_name_len']  =   getid3_lib::BigEndian2Int(substr($atom_structure['sample_description_table'][$i]['data'], 34,  1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   774
									$atom_structure['sample_description_table'][$i]['video_encoder_name']      =                             substr($atom_structure['sample_description_table'][$i]['data'], 35, $atom_structure['sample_description_table'][$i]['video_encoder_name_len']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   775
									$atom_structure['sample_description_table'][$i]['video_pixel_color_depth'] =   getid3_lib::BigEndian2Int(substr($atom_structure['sample_description_table'][$i]['data'], 66,  2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   776
									$atom_structure['sample_description_table'][$i]['video_color_table_id']    =   getid3_lib::BigEndian2Int(substr($atom_structure['sample_description_table'][$i]['data'], 68,  2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   777
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   778
									$atom_structure['sample_description_table'][$i]['video_pixel_color_type']  = (($atom_structure['sample_description_table'][$i]['video_pixel_color_depth'] > 32) ? 'grayscale' : 'color');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   779
									$atom_structure['sample_description_table'][$i]['video_pixel_color_name']  = $this->QuicktimeColorNameLookup($atom_structure['sample_description_table'][$i]['video_pixel_color_depth']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   780
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   781
									if ($atom_structure['sample_description_table'][$i]['video_pixel_color_name'] != 'invalid') {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   782
										$info['quicktime']['video']['codec_fourcc']        = $atom_structure['sample_description_table'][$i]['data_format'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   783
										$info['quicktime']['video']['codec_fourcc_lookup'] = $this->QuicktimeVideoCodecLookup($atom_structure['sample_description_table'][$i]['data_format']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   784
										$info['quicktime']['video']['codec']               = (($atom_structure['sample_description_table'][$i]['video_encoder_name_len'] > 0) ? $atom_structure['sample_description_table'][$i]['video_encoder_name'] : $atom_structure['sample_description_table'][$i]['data_format']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   785
										$info['quicktime']['video']['color_depth']         = $atom_structure['sample_description_table'][$i]['video_pixel_color_depth'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   786
										$info['quicktime']['video']['color_depth_name']    = $atom_structure['sample_description_table'][$i]['video_pixel_color_name'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   787
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   788
										$info['video']['codec']           = $info['quicktime']['video']['codec'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   789
										$info['video']['bits_per_sample'] = $info['quicktime']['video']['color_depth'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   790
									}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   791
									$info['video']['lossless']           = false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   792
									$info['video']['pixel_aspect_ratio'] = (float) 1;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   793
									break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   794
							}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   795
							break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   796
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   797
					switch (strtolower($atom_structure['sample_description_table'][$i]['data_format'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   798
						case 'mp4a':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   799
							$info['audio']['dataformat']         = 'mp4';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   800
							$info['quicktime']['audio']['codec'] = 'mp4';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   801
							break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   802
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   803
						case '3ivx':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   804
						case '3iv1':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   805
						case '3iv2':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   806
							$info['video']['dataformat'] = '3ivx';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   807
							break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   808
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   809
						case 'xvid':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   810
							$info['video']['dataformat'] = 'xvid';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   811
							break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   812
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   813
						case 'mp4v':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   814
							$info['video']['dataformat'] = 'mpeg4';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   815
							break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   816
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   817
						case 'divx':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   818
						case 'div1':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   819
						case 'div2':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   820
						case 'div3':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   821
						case 'div4':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   822
						case 'div5':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   823
						case 'div6':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   824
							$info['video']['dataformat'] = 'divx';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   825
							break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   826
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   827
						default:
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   828
							// do nothing
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   829
							break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   830
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   831
					unset($atom_structure['sample_description_table'][$i]['data']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   832
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   833
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   834
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   835
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   836
			case 'stts': // Sample Table Time-to-Sample atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   837
				$atom_structure['version']        = getid3_lib::BigEndian2Int(substr($atom_data,  0, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   838
				$atom_structure['flags_raw']      = getid3_lib::BigEndian2Int(substr($atom_data,  1, 3)); // hardcoded: 0x0000
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   839
				$atom_structure['number_entries'] = getid3_lib::BigEndian2Int(substr($atom_data,  4, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   840
				$sttsEntriesDataOffset = 8;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   841
				//$FrameRateCalculatorArray = array();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   842
				$frames_count = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   843
				for ($i = 0; $i < $atom_structure['number_entries']; $i++) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   844
					$atom_structure['time_to_sample_table'][$i]['sample_count']    = getid3_lib::BigEndian2Int(substr($atom_data, $sttsEntriesDataOffset, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   845
					$sttsEntriesDataOffset += 4;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   846
					$atom_structure['time_to_sample_table'][$i]['sample_duration'] = getid3_lib::BigEndian2Int(substr($atom_data, $sttsEntriesDataOffset, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   847
					$sttsEntriesDataOffset += 4;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   848
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   849
					$frames_count += $atom_structure['time_to_sample_table'][$i]['sample_count'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   850
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   851
					// THIS SECTION REPLACED WITH CODE IN "stbl" ATOM
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   852
					//if (!empty($info['quicktime']['time_scale']) && ($atom_structure['time_to_sample_table'][$i]['sample_duration'] > 0)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   853
					//	$stts_new_framerate = $info['quicktime']['time_scale'] / $atom_structure['time_to_sample_table'][$i]['sample_duration'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   854
					//	if ($stts_new_framerate <= 60) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   855
					//		// some atoms have durations of "1" giving a very large framerate, which probably is not right
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   856
					//		$info['video']['frame_rate'] = max($info['video']['frame_rate'], $stts_new_framerate);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   857
					//	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   858
					//}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   859
					//
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   860
					//$FrameRateCalculatorArray[($info['quicktime']['time_scale'] / $atom_structure['time_to_sample_table'][$i]['sample_duration'])] += $atom_structure['time_to_sample_table'][$i]['sample_count'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   861
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   862
				$info['quicktime']['stts_framecount'][] = $frames_count;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   863
				//$sttsFramesTotal  = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   864
				//$sttsSecondsTotal = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   865
				//foreach ($FrameRateCalculatorArray as $frames_per_second => $frame_count) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   866
				//	if (($frames_per_second > 60) || ($frames_per_second < 1)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   867
				//		// not video FPS information, probably audio information
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   868
				//		$sttsFramesTotal  = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   869
				//		$sttsSecondsTotal = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   870
				//		break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   871
				//	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   872
				//	$sttsFramesTotal  += $frame_count;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   873
				//	$sttsSecondsTotal += $frame_count / $frames_per_second;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   874
				//}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   875
				//if (($sttsFramesTotal > 0) && ($sttsSecondsTotal > 0)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   876
				//	if (($sttsFramesTotal / $sttsSecondsTotal) > $info['video']['frame_rate']) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   877
				//		$info['video']['frame_rate'] = $sttsFramesTotal / $sttsSecondsTotal;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   878
				//	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   879
				//}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   880
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   881
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   882
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   883
			case 'stss': // Sample Table Sync Sample (key frames) atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   884
				if ($ParseAllPossibleAtoms) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   885
					$atom_structure['version']        = getid3_lib::BigEndian2Int(substr($atom_data,  0, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   886
					$atom_structure['flags_raw']      = getid3_lib::BigEndian2Int(substr($atom_data,  1, 3)); // hardcoded: 0x0000
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   887
					$atom_structure['number_entries'] = getid3_lib::BigEndian2Int(substr($atom_data,  4, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   888
					$stssEntriesDataOffset = 8;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   889
					for ($i = 0; $i < $atom_structure['number_entries']; $i++) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   890
						$atom_structure['time_to_sample_table'][$i] = getid3_lib::BigEndian2Int(substr($atom_data, $stssEntriesDataOffset, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   891
						$stssEntriesDataOffset += 4;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   892
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   893
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   894
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   895
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   896
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   897
			case 'stsc': // Sample Table Sample-to-Chunk atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   898
				if ($ParseAllPossibleAtoms) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   899
					$atom_structure['version']        = getid3_lib::BigEndian2Int(substr($atom_data,  0, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   900
					$atom_structure['flags_raw']      = getid3_lib::BigEndian2Int(substr($atom_data,  1, 3)); // hardcoded: 0x0000
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   901
					$atom_structure['number_entries'] = getid3_lib::BigEndian2Int(substr($atom_data,  4, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   902
					$stscEntriesDataOffset = 8;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   903
					for ($i = 0; $i < $atom_structure['number_entries']; $i++) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   904
						$atom_structure['sample_to_chunk_table'][$i]['first_chunk']        = getid3_lib::BigEndian2Int(substr($atom_data, $stscEntriesDataOffset, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   905
						$stscEntriesDataOffset += 4;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   906
						$atom_structure['sample_to_chunk_table'][$i]['samples_per_chunk']  = getid3_lib::BigEndian2Int(substr($atom_data, $stscEntriesDataOffset, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   907
						$stscEntriesDataOffset += 4;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   908
						$atom_structure['sample_to_chunk_table'][$i]['sample_description'] = getid3_lib::BigEndian2Int(substr($atom_data, $stscEntriesDataOffset, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   909
						$stscEntriesDataOffset += 4;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   910
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   911
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   912
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   913
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   914
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   915
			case 'stsz': // Sample Table SiZe atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   916
				if ($ParseAllPossibleAtoms) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   917
					$atom_structure['version']        = getid3_lib::BigEndian2Int(substr($atom_data,  0, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   918
					$atom_structure['flags_raw']      = getid3_lib::BigEndian2Int(substr($atom_data,  1, 3)); // hardcoded: 0x0000
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   919
					$atom_structure['sample_size']    = getid3_lib::BigEndian2Int(substr($atom_data,  4, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   920
					$atom_structure['number_entries'] = getid3_lib::BigEndian2Int(substr($atom_data,  8, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   921
					$stszEntriesDataOffset = 12;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   922
					if ($atom_structure['sample_size'] == 0) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   923
						for ($i = 0; $i < $atom_structure['number_entries']; $i++) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   924
							$atom_structure['sample_size_table'][$i] = getid3_lib::BigEndian2Int(substr($atom_data, $stszEntriesDataOffset, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   925
							$stszEntriesDataOffset += 4;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   926
						}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   927
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   928
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   929
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   930
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   931
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   932
			case 'stco': // Sample Table Chunk Offset atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   933
				if ($ParseAllPossibleAtoms) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   934
					$atom_structure['version']        = getid3_lib::BigEndian2Int(substr($atom_data,  0, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   935
					$atom_structure['flags_raw']      = getid3_lib::BigEndian2Int(substr($atom_data,  1, 3)); // hardcoded: 0x0000
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   936
					$atom_structure['number_entries'] = getid3_lib::BigEndian2Int(substr($atom_data,  4, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   937
					$stcoEntriesDataOffset = 8;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   938
					for ($i = 0; $i < $atom_structure['number_entries']; $i++) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   939
						$atom_structure['chunk_offset_table'][$i] = getid3_lib::BigEndian2Int(substr($atom_data, $stcoEntriesDataOffset, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   940
						$stcoEntriesDataOffset += 4;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   941
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   942
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   943
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   944
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   945
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   946
			case 'co64': // Chunk Offset 64-bit (version of "stco" that supports > 2GB files)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   947
				if ($ParseAllPossibleAtoms) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   948
					$atom_structure['version']        = getid3_lib::BigEndian2Int(substr($atom_data,  0, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   949
					$atom_structure['flags_raw']      = getid3_lib::BigEndian2Int(substr($atom_data,  1, 3)); // hardcoded: 0x0000
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   950
					$atom_structure['number_entries'] = getid3_lib::BigEndian2Int(substr($atom_data,  4, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   951
					$stcoEntriesDataOffset = 8;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   952
					for ($i = 0; $i < $atom_structure['number_entries']; $i++) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   953
						$atom_structure['chunk_offset_table'][$i] = getid3_lib::BigEndian2Int(substr($atom_data, $stcoEntriesDataOffset, 8));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   954
						$stcoEntriesDataOffset += 8;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   955
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   956
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   957
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   958
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   959
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   960
			case 'dref': // Data REFerence atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   961
				$atom_structure['version']        = getid3_lib::BigEndian2Int(substr($atom_data,  0, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   962
				$atom_structure['flags_raw']      = getid3_lib::BigEndian2Int(substr($atom_data,  1, 3)); // hardcoded: 0x0000
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   963
				$atom_structure['number_entries'] = getid3_lib::BigEndian2Int(substr($atom_data,  4, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   964
				$drefDataOffset = 8;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   965
				for ($i = 0; $i < $atom_structure['number_entries']; $i++) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   966
					$atom_structure['data_references'][$i]['size']                    = getid3_lib::BigEndian2Int(substr($atom_data, $drefDataOffset, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   967
					$drefDataOffset += 4;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   968
					$atom_structure['data_references'][$i]['type']                    =               substr($atom_data, $drefDataOffset, 4);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   969
					$drefDataOffset += 4;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   970
					$atom_structure['data_references'][$i]['version']                 = getid3_lib::BigEndian2Int(substr($atom_data,  $drefDataOffset, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   971
					$drefDataOffset += 1;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   972
					$atom_structure['data_references'][$i]['flags_raw']               = getid3_lib::BigEndian2Int(substr($atom_data,  $drefDataOffset, 3)); // hardcoded: 0x0000
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   973
					$drefDataOffset += 3;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   974
					$atom_structure['data_references'][$i]['data']                    =               substr($atom_data, $drefDataOffset, ($atom_structure['data_references'][$i]['size'] - 4 - 4 - 1 - 3));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   975
					$drefDataOffset += ($atom_structure['data_references'][$i]['size'] - 4 - 4 - 1 - 3);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   976
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   977
					$atom_structure['data_references'][$i]['flags']['self_reference'] = (bool) ($atom_structure['data_references'][$i]['flags_raw'] & 0x001);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   978
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   979
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   980
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   981
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   982
			case 'gmin': // base Media INformation atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   983
				$atom_structure['version']                = getid3_lib::BigEndian2Int(substr($atom_data,  0, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   984
				$atom_structure['flags_raw']              = getid3_lib::BigEndian2Int(substr($atom_data,  1, 3)); // hardcoded: 0x0000
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   985
				$atom_structure['graphics_mode']          = getid3_lib::BigEndian2Int(substr($atom_data,  4, 2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   986
				$atom_structure['opcolor_red']            = getid3_lib::BigEndian2Int(substr($atom_data,  6, 2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   987
				$atom_structure['opcolor_green']          = getid3_lib::BigEndian2Int(substr($atom_data,  8, 2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   988
				$atom_structure['opcolor_blue']           = getid3_lib::BigEndian2Int(substr($atom_data, 10, 2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   989
				$atom_structure['balance']                = getid3_lib::BigEndian2Int(substr($atom_data, 12, 2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   990
				$atom_structure['reserved']               = getid3_lib::BigEndian2Int(substr($atom_data, 14, 2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   991
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   992
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   993
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   994
			case 'smhd': // Sound Media information HeaDer atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   995
				$atom_structure['version']                = getid3_lib::BigEndian2Int(substr($atom_data,  0, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   996
				$atom_structure['flags_raw']              = getid3_lib::BigEndian2Int(substr($atom_data,  1, 3)); // hardcoded: 0x0000
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   997
				$atom_structure['balance']                = getid3_lib::BigEndian2Int(substr($atom_data,  4, 2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   998
				$atom_structure['reserved']               = getid3_lib::BigEndian2Int(substr($atom_data,  6, 2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   999
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1000
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1001
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1002
			case 'vmhd': // Video Media information HeaDer atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1003
				$atom_structure['version']                = getid3_lib::BigEndian2Int(substr($atom_data,  0, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1004
				$atom_structure['flags_raw']              = getid3_lib::BigEndian2Int(substr($atom_data,  1, 3));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1005
				$atom_structure['graphics_mode']          = getid3_lib::BigEndian2Int(substr($atom_data,  4, 2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1006
				$atom_structure['opcolor_red']            = getid3_lib::BigEndian2Int(substr($atom_data,  6, 2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1007
				$atom_structure['opcolor_green']          = getid3_lib::BigEndian2Int(substr($atom_data,  8, 2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1008
				$atom_structure['opcolor_blue']           = getid3_lib::BigEndian2Int(substr($atom_data, 10, 2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1009
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1010
				$atom_structure['flags']['no_lean_ahead'] = (bool) ($atom_structure['flags_raw'] & 0x001);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1011
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1012
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1013
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1014
			case 'hdlr': // HanDLeR reference atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1015
				$atom_structure['version']                = getid3_lib::BigEndian2Int(substr($atom_data,  0, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1016
				$atom_structure['flags_raw']              = getid3_lib::BigEndian2Int(substr($atom_data,  1, 3)); // hardcoded: 0x0000
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1017
				$atom_structure['component_type']         =                           substr($atom_data,  4, 4);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1018
				$atom_structure['component_subtype']      =                           substr($atom_data,  8, 4);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1019
				$atom_structure['component_manufacturer'] =                           substr($atom_data, 12, 4);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1020
				$atom_structure['component_flags_raw']    = getid3_lib::BigEndian2Int(substr($atom_data, 16, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1021
				$atom_structure['component_flags_mask']   = getid3_lib::BigEndian2Int(substr($atom_data, 20, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1022
				$atom_structure['component_name']         =      $this->Pascal2String(substr($atom_data, 24));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1023
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1024
				if (($atom_structure['component_subtype'] == 'STpn') && ($atom_structure['component_manufacturer'] == 'zzzz')) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1025
					$info['video']['dataformat'] = 'quicktimevr';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1026
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1027
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1028
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1029
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1030
			case 'mdhd': // MeDia HeaDer atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1031
				$atom_structure['version']               = getid3_lib::BigEndian2Int(substr($atom_data,  0, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1032
				$atom_structure['flags_raw']             = getid3_lib::BigEndian2Int(substr($atom_data,  1, 3)); // hardcoded: 0x0000
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1033
				$atom_structure['creation_time']         = getid3_lib::BigEndian2Int(substr($atom_data,  4, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1034
				$atom_structure['modify_time']           = getid3_lib::BigEndian2Int(substr($atom_data,  8, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1035
				$atom_structure['time_scale']            = getid3_lib::BigEndian2Int(substr($atom_data, 12, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1036
				$atom_structure['duration']              = getid3_lib::BigEndian2Int(substr($atom_data, 16, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1037
				$atom_structure['language_id']           = getid3_lib::BigEndian2Int(substr($atom_data, 20, 2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1038
				$atom_structure['quality']               = getid3_lib::BigEndian2Int(substr($atom_data, 22, 2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1039
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1040
				if ($atom_structure['time_scale'] == 0) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1041
					$info['error'][] = 'Corrupt Quicktime file: mdhd.time_scale == zero';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1042
					return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1043
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1044
				$info['quicktime']['time_scale'] = (isset($info['quicktime']['time_scale']) ? max($info['quicktime']['time_scale'], $atom_structure['time_scale']) : $atom_structure['time_scale']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1045
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1046
				$atom_structure['creation_time_unix']    = getid3_lib::DateMac2Unix($atom_structure['creation_time']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1047
				$atom_structure['modify_time_unix']      = getid3_lib::DateMac2Unix($atom_structure['modify_time']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1048
				$atom_structure['playtime_seconds']      = $atom_structure['duration'] / $atom_structure['time_scale'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1049
				$atom_structure['language']              = $this->QuicktimeLanguageLookup($atom_structure['language_id']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1050
				if (empty($info['comments']['language']) || (!in_array($atom_structure['language'], $info['comments']['language']))) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1051
					$info['comments']['language'][] = $atom_structure['language'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1052
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1053
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1054
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1055
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1056
			case 'pnot': // Preview atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1057
				$atom_structure['modification_date']      = getid3_lib::BigEndian2Int(substr($atom_data,  0, 4)); // "standard Macintosh format"
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1058
				$atom_structure['version_number']         = getid3_lib::BigEndian2Int(substr($atom_data,  4, 2)); // hardcoded: 0x00
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1059
				$atom_structure['atom_type']              =               substr($atom_data,  6, 4);        // usually: 'PICT'
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1060
				$atom_structure['atom_index']             = getid3_lib::BigEndian2Int(substr($atom_data, 10, 2)); // usually: 0x01
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1061
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1062
				$atom_structure['modification_date_unix'] = getid3_lib::DateMac2Unix($atom_structure['modification_date']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1063
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1064
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1065
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1066
			case 'crgn': // Clipping ReGioN atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1067
				$atom_structure['region_size']   = getid3_lib::BigEndian2Int(substr($atom_data,  0, 2)); // The Region size, Region boundary box,
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1068
				$atom_structure['boundary_box']  = getid3_lib::BigEndian2Int(substr($atom_data,  2, 8)); // and Clipping region data fields
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1069
				$atom_structure['clipping_data'] =               substr($atom_data, 10);           // constitute a QuickDraw region.
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1070
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1071
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1072
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1073
			case 'load': // track LOAD settings atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1074
				$atom_structure['preload_start_time'] = getid3_lib::BigEndian2Int(substr($atom_data,  0, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1075
				$atom_structure['preload_duration']   = getid3_lib::BigEndian2Int(substr($atom_data,  4, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1076
				$atom_structure['preload_flags_raw']  = getid3_lib::BigEndian2Int(substr($atom_data,  8, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1077
				$atom_structure['default_hints_raw']  = getid3_lib::BigEndian2Int(substr($atom_data, 12, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1078
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1079
				$atom_structure['default_hints']['double_buffer'] = (bool) ($atom_structure['default_hints_raw'] & 0x0020);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1080
				$atom_structure['default_hints']['high_quality']  = (bool) ($atom_structure['default_hints_raw'] & 0x0100);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1081
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1082
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1083
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1084
			case 'tmcd': // TiMe CoDe atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1085
			case 'chap': // CHAPter list atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1086
			case 'sync': // SYNChronization atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1087
			case 'scpt': // tranSCriPT atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1088
			case 'ssrc': // non-primary SouRCe atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1089
				for ($i = 0; $i < (strlen($atom_data) % 4); $i++) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1090
					$atom_structure['track_id'][$i] = getid3_lib::BigEndian2Int(substr($atom_data, $i * 4, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1091
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1092
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1093
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1094
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1095
			case 'elst': // Edit LiST atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1096
				$atom_structure['version']        = getid3_lib::BigEndian2Int(substr($atom_data,  0, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1097
				$atom_structure['flags_raw']      = getid3_lib::BigEndian2Int(substr($atom_data,  1, 3)); // hardcoded: 0x0000
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1098
				$atom_structure['number_entries'] = getid3_lib::BigEndian2Int(substr($atom_data,  4, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1099
				for ($i = 0; $i < $atom_structure['number_entries']; $i++ ) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1100
					$atom_structure['edit_list'][$i]['track_duration'] =   getid3_lib::BigEndian2Int(substr($atom_data, 8 + ($i * 12) + 0, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1101
					$atom_structure['edit_list'][$i]['media_time']     =   getid3_lib::BigEndian2Int(substr($atom_data, 8 + ($i * 12) + 4, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1102
					$atom_structure['edit_list'][$i]['media_rate']     = getid3_lib::FixedPoint16_16(substr($atom_data, 8 + ($i * 12) + 8, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1103
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1104
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1105
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1106
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1107
			case 'kmat': // compressed MATte atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1108
				$atom_structure['version']        = getid3_lib::BigEndian2Int(substr($atom_data,  0, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1109
				$atom_structure['flags_raw']      = getid3_lib::BigEndian2Int(substr($atom_data,  1, 3)); // hardcoded: 0x0000
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1110
				$atom_structure['matte_data_raw'] =               substr($atom_data,  4);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1111
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1112
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1113
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1114
			case 'ctab': // Color TABle atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1115
				$atom_structure['color_table_seed']   = getid3_lib::BigEndian2Int(substr($atom_data,  0, 4)); // hardcoded: 0x00000000
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1116
				$atom_structure['color_table_flags']  = getid3_lib::BigEndian2Int(substr($atom_data,  4, 2)); // hardcoded: 0x8000
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1117
				$atom_structure['color_table_size']   = getid3_lib::BigEndian2Int(substr($atom_data,  6, 2)) + 1;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1118
				for ($colortableentry = 0; $colortableentry < $atom_structure['color_table_size']; $colortableentry++) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1119
					$atom_structure['color_table'][$colortableentry]['alpha'] = getid3_lib::BigEndian2Int(substr($atom_data, 8 + ($colortableentry * 8) + 0, 2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1120
					$atom_structure['color_table'][$colortableentry]['red']   = getid3_lib::BigEndian2Int(substr($atom_data, 8 + ($colortableentry * 8) + 2, 2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1121
					$atom_structure['color_table'][$colortableentry]['green'] = getid3_lib::BigEndian2Int(substr($atom_data, 8 + ($colortableentry * 8) + 4, 2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1122
					$atom_structure['color_table'][$colortableentry]['blue']  = getid3_lib::BigEndian2Int(substr($atom_data, 8 + ($colortableentry * 8) + 6, 2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1123
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1124
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1125
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1126
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1127
			case 'mvhd': // MoVie HeaDer atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1128
				$atom_structure['version']            =   getid3_lib::BigEndian2Int(substr($atom_data,  0, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1129
				$atom_structure['flags_raw']          =   getid3_lib::BigEndian2Int(substr($atom_data,  1, 3));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1130
				$atom_structure['creation_time']      =   getid3_lib::BigEndian2Int(substr($atom_data,  4, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1131
				$atom_structure['modify_time']        =   getid3_lib::BigEndian2Int(substr($atom_data,  8, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1132
				$atom_structure['time_scale']         =   getid3_lib::BigEndian2Int(substr($atom_data, 12, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1133
				$atom_structure['duration']           =   getid3_lib::BigEndian2Int(substr($atom_data, 16, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1134
				$atom_structure['preferred_rate']     = getid3_lib::FixedPoint16_16(substr($atom_data, 20, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1135
				$atom_structure['preferred_volume']   =   getid3_lib::FixedPoint8_8(substr($atom_data, 24, 2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1136
				$atom_structure['reserved']           =                             substr($atom_data, 26, 10);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1137
				$atom_structure['matrix_a']           = getid3_lib::FixedPoint16_16(substr($atom_data, 36, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1138
				$atom_structure['matrix_b']           = getid3_lib::FixedPoint16_16(substr($atom_data, 40, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1139
				$atom_structure['matrix_u']           =  getid3_lib::FixedPoint2_30(substr($atom_data, 44, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1140
				$atom_structure['matrix_c']           = getid3_lib::FixedPoint16_16(substr($atom_data, 48, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1141
				$atom_structure['matrix_d']           = getid3_lib::FixedPoint16_16(substr($atom_data, 52, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1142
				$atom_structure['matrix_v']           =  getid3_lib::FixedPoint2_30(substr($atom_data, 56, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1143
				$atom_structure['matrix_x']           = getid3_lib::FixedPoint16_16(substr($atom_data, 60, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1144
				$atom_structure['matrix_y']           = getid3_lib::FixedPoint16_16(substr($atom_data, 64, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1145
				$atom_structure['matrix_w']           =  getid3_lib::FixedPoint2_30(substr($atom_data, 68, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1146
				$atom_structure['preview_time']       =   getid3_lib::BigEndian2Int(substr($atom_data, 72, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1147
				$atom_structure['preview_duration']   =   getid3_lib::BigEndian2Int(substr($atom_data, 76, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1148
				$atom_structure['poster_time']        =   getid3_lib::BigEndian2Int(substr($atom_data, 80, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1149
				$atom_structure['selection_time']     =   getid3_lib::BigEndian2Int(substr($atom_data, 84, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1150
				$atom_structure['selection_duration'] =   getid3_lib::BigEndian2Int(substr($atom_data, 88, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1151
				$atom_structure['current_time']       =   getid3_lib::BigEndian2Int(substr($atom_data, 92, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1152
				$atom_structure['next_track_id']      =   getid3_lib::BigEndian2Int(substr($atom_data, 96, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1153
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1154
				if ($atom_structure['time_scale'] == 0) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1155
					$info['error'][] = 'Corrupt Quicktime file: mvhd.time_scale == zero';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1156
					return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1157
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1158
				$atom_structure['creation_time_unix']        = getid3_lib::DateMac2Unix($atom_structure['creation_time']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1159
				$atom_structure['modify_time_unix']          = getid3_lib::DateMac2Unix($atom_structure['modify_time']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1160
				$info['quicktime']['time_scale']    = (isset($info['quicktime']['time_scale']) ? max($info['quicktime']['time_scale'], $atom_structure['time_scale']) : $atom_structure['time_scale']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1161
				$info['quicktime']['display_scale'] = $atom_structure['matrix_a'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1162
				$info['playtime_seconds']           = $atom_structure['duration'] / $atom_structure['time_scale'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1163
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1164
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1165
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1166
			case 'tkhd': // TracK HeaDer atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1167
				$atom_structure['version']             =   getid3_lib::BigEndian2Int(substr($atom_data,  0, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1168
				$atom_structure['flags_raw']           =   getid3_lib::BigEndian2Int(substr($atom_data,  1, 3));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1169
				$atom_structure['creation_time']       =   getid3_lib::BigEndian2Int(substr($atom_data,  4, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1170
				$atom_structure['modify_time']         =   getid3_lib::BigEndian2Int(substr($atom_data,  8, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1171
				$atom_structure['trackid']             =   getid3_lib::BigEndian2Int(substr($atom_data, 12, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1172
				$atom_structure['reserved1']           =   getid3_lib::BigEndian2Int(substr($atom_data, 16, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1173
				$atom_structure['duration']            =   getid3_lib::BigEndian2Int(substr($atom_data, 20, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1174
				$atom_structure['reserved2']           =   getid3_lib::BigEndian2Int(substr($atom_data, 24, 8));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1175
				$atom_structure['layer']               =   getid3_lib::BigEndian2Int(substr($atom_data, 32, 2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1176
				$atom_structure['alternate_group']     =   getid3_lib::BigEndian2Int(substr($atom_data, 34, 2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1177
				$atom_structure['volume']              =   getid3_lib::FixedPoint8_8(substr($atom_data, 36, 2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1178
				$atom_structure['reserved3']           =   getid3_lib::BigEndian2Int(substr($atom_data, 38, 2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1179
// http://developer.apple.com/library/mac/#documentation/QuickTime/RM/MovieBasics/MTEditing/K-Chapter/11MatrixFunctions.html
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1180
// http://developer.apple.com/library/mac/#documentation/QuickTime/qtff/QTFFChap4/qtff4.html#//apple_ref/doc/uid/TP40000939-CH206-18737
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1181
				$atom_structure['matrix_a']            = getid3_lib::FixedPoint16_16(substr($atom_data, 40, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1182
				$atom_structure['matrix_b']            = getid3_lib::FixedPoint16_16(substr($atom_data, 44, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1183
				$atom_structure['matrix_u']            =  getid3_lib::FixedPoint2_30(substr($atom_data, 48, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1184
				$atom_structure['matrix_c']            = getid3_lib::FixedPoint16_16(substr($atom_data, 52, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1185
				$atom_structure['matrix_d']            = getid3_lib::FixedPoint16_16(substr($atom_data, 56, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1186
				$atom_structure['matrix_v']            =  getid3_lib::FixedPoint2_30(substr($atom_data, 60, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1187
				$atom_structure['matrix_x']            = getid3_lib::FixedPoint16_16(substr($atom_data, 64, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1188
				$atom_structure['matrix_y']            = getid3_lib::FixedPoint16_16(substr($atom_data, 68, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1189
				$atom_structure['matrix_w']            =  getid3_lib::FixedPoint2_30(substr($atom_data, 72, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1190
				$atom_structure['width']               = getid3_lib::FixedPoint16_16(substr($atom_data, 76, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1191
				$atom_structure['height']              = getid3_lib::FixedPoint16_16(substr($atom_data, 80, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1192
				$atom_structure['flags']['enabled']    = (bool) ($atom_structure['flags_raw'] & 0x0001);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1193
				$atom_structure['flags']['in_movie']   = (bool) ($atom_structure['flags_raw'] & 0x0002);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1194
				$atom_structure['flags']['in_preview'] = (bool) ($atom_structure['flags_raw'] & 0x0004);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1195
				$atom_structure['flags']['in_poster']  = (bool) ($atom_structure['flags_raw'] & 0x0008);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1196
				$atom_structure['creation_time_unix']  = getid3_lib::DateMac2Unix($atom_structure['creation_time']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1197
				$atom_structure['modify_time_unix']    = getid3_lib::DateMac2Unix($atom_structure['modify_time']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1198
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1199
				if ($atom_structure['flags']['enabled'] == 1) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1200
					if (!isset($info['video']['resolution_x']) || !isset($info['video']['resolution_y'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1201
						$info['video']['resolution_x'] = $atom_structure['width'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1202
						$info['video']['resolution_y'] = $atom_structure['height'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1203
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1204
					$info['video']['resolution_x'] = max($info['video']['resolution_x'], $atom_structure['width']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1205
					$info['video']['resolution_y'] = max($info['video']['resolution_y'], $atom_structure['height']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1206
					$info['quicktime']['video']['resolution_x'] = $info['video']['resolution_x'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1207
					$info['quicktime']['video']['resolution_y'] = $info['video']['resolution_y'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1208
				} else {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1209
					// see: http://www.getid3.org/phpBB3/viewtopic.php?t=1295
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1210
					//if (isset($info['video']['resolution_x'])) { unset($info['video']['resolution_x']); }
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1211
					//if (isset($info['video']['resolution_y'])) { unset($info['video']['resolution_y']); }
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1212
					//if (isset($info['quicktime']['video']))    { unset($info['quicktime']['video']);    }
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1213
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1214
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1215
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1216
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1217
			case 'iods': // Initial Object DeScriptor atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1218
				// http://www.koders.com/c/fid1FAB3E762903DC482D8A246D4A4BF9F28E049594.aspx?s=windows.h
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1219
				// http://libquicktime.sourcearchive.com/documentation/1.0.2plus-pdebian/iods_8c-source.html
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1220
				$offset = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1221
				$atom_structure['version']                =       getid3_lib::BigEndian2Int(substr($atom_data, $offset, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1222
				$offset += 1;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1223
				$atom_structure['flags_raw']              =       getid3_lib::BigEndian2Int(substr($atom_data, $offset, 3));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1224
				$offset += 3;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1225
				$atom_structure['mp4_iod_tag']            =       getid3_lib::BigEndian2Int(substr($atom_data, $offset, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1226
				$offset += 1;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1227
				$atom_structure['length']                 = $this->quicktime_read_mp4_descr_length($atom_data, $offset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1228
				//$offset already adjusted by quicktime_read_mp4_descr_length()
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1229
				$atom_structure['object_descriptor_id']   =       getid3_lib::BigEndian2Int(substr($atom_data, $offset, 2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1230
				$offset += 2;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1231
				$atom_structure['od_profile_level']       =       getid3_lib::BigEndian2Int(substr($atom_data, $offset, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1232
				$offset += 1;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1233
				$atom_structure['scene_profile_level']    =       getid3_lib::BigEndian2Int(substr($atom_data, $offset, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1234
				$offset += 1;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1235
				$atom_structure['audio_profile_id']       =       getid3_lib::BigEndian2Int(substr($atom_data, $offset, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1236
				$offset += 1;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1237
				$atom_structure['video_profile_id']       =       getid3_lib::BigEndian2Int(substr($atom_data, $offset, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1238
				$offset += 1;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1239
				$atom_structure['graphics_profile_level'] =       getid3_lib::BigEndian2Int(substr($atom_data, $offset, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1240
				$offset += 1;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1241
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1242
				$atom_structure['num_iods_tracks'] = ($atom_structure['length'] - 7) / 6; // 6 bytes would only be right if all tracks use 1-byte length fields
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1243
				for ($i = 0; $i < $atom_structure['num_iods_tracks']; $i++) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1244
					$atom_structure['track'][$i]['ES_ID_IncTag'] =       getid3_lib::BigEndian2Int(substr($atom_data, $offset, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1245
					$offset += 1;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1246
					$atom_structure['track'][$i]['length']       = $this->quicktime_read_mp4_descr_length($atom_data, $offset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1247
					//$offset already adjusted by quicktime_read_mp4_descr_length()
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1248
					$atom_structure['track'][$i]['track_id']     =       getid3_lib::BigEndian2Int(substr($atom_data, $offset, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1249
					$offset += 4;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1250
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1251
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1252
				$atom_structure['audio_profile_name'] = $this->QuicktimeIODSaudioProfileName($atom_structure['audio_profile_id']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1253
				$atom_structure['video_profile_name'] = $this->QuicktimeIODSvideoProfileName($atom_structure['video_profile_id']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1254
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1255
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1256
			case 'ftyp': // FileTYPe (?) atom (for MP4 it seems)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1257
				$atom_structure['signature'] =                           substr($atom_data,  0, 4);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1258
				$atom_structure['unknown_1'] = getid3_lib::BigEndian2Int(substr($atom_data,  4, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1259
				$atom_structure['fourcc']    =                           substr($atom_data,  8, 4);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1260
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1261
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1262
			case 'mdat': // Media DATa atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1263
			case 'free': // FREE space atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1264
			case 'skip': // SKIP atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1265
			case 'wide': // 64-bit expansion placeholder atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1266
				// 'mdat' data is too big to deal with, contains no useful metadata
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1267
				// 'free', 'skip' and 'wide' are just padding, contains no useful data at all
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1268
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1269
				// When writing QuickTime files, it is sometimes necessary to update an atom's size.
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1270
				// It is impossible to update a 32-bit atom to a 64-bit atom since the 32-bit atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1271
				// is only 8 bytes in size, and the 64-bit atom requires 16 bytes. Therefore, QuickTime
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1272
				// puts an 8-byte placeholder atom before any atoms it may have to update the size of.
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1273
				// In this way, if the atom needs to be converted from a 32-bit to a 64-bit atom, the
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1274
				// placeholder atom can be overwritten to obtain the necessary 8 extra bytes.
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1275
				// The placeholder atom has a type of kWideAtomPlaceholderType ( 'wide' ).
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1276
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1277
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1278
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1279
			case 'nsav': // NoSAVe atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1280
				// http://developer.apple.com/technotes/tn/tn2038.html
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1281
				$atom_structure['data'] = getid3_lib::BigEndian2Int(substr($atom_data,  0, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1282
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1283
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1284
			case 'ctyp': // Controller TYPe atom (seen on QTVR)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1285
				// http://homepages.slingshot.co.nz/~helmboy/quicktime/formats/qtm-layout.txt
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1286
				// some controller names are:
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1287
				//   0x00 + 'std' for linear movie
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1288
				//   'none' for no controls
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1289
				$atom_structure['ctyp'] = substr($atom_data, 0, 4);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1290
				$info['quicktime']['controller'] = $atom_structure['ctyp'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1291
				switch ($atom_structure['ctyp']) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1292
					case 'qtvr':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1293
						$info['video']['dataformat'] = 'quicktimevr';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1294
						break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1295
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1296
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1297
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1298
			case 'pano': // PANOrama track (seen on QTVR)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1299
				$atom_structure['pano'] = getid3_lib::BigEndian2Int(substr($atom_data,  0, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1300
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1301
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1302
			case 'hint': // HINT track
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1303
			case 'hinf': //
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1304
			case 'hinv': //
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1305
			case 'hnti': //
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1306
				$info['quicktime']['hinting'] = true;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1307
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1308
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1309
			case 'imgt': // IMaGe Track reference (kQTVRImageTrackRefType) (seen on QTVR)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1310
				for ($i = 0; $i < ($atom_structure['size'] - 8); $i += 4) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1311
					$atom_structure['imgt'][] = getid3_lib::BigEndian2Int(substr($atom_data, $i, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1312
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1313
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1314
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1315
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1316
			// Observed-but-not-handled atom types are just listed here to prevent warnings being generated
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1317
			case 'FXTC': // Something to do with Adobe After Effects (?)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1318
			case 'PrmA':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1319
			case 'code':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1320
			case 'FIEL': // this is NOT "fiel" (Field Ordering) as describe here: http://developer.apple.com/documentation/QuickTime/QTFF/QTFFChap3/chapter_4_section_2.html
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1321
			case 'tapt': // TrackApertureModeDimensionsAID - http://developer.apple.com/documentation/QuickTime/Reference/QT7-1_Update_Reference/Constants/Constants.html
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1322
						// tapt seems to be used to compute the video size [http://www.getid3.org/phpBB3/viewtopic.php?t=838]
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1323
						// * http://lists.apple.com/archives/quicktime-api/2006/Aug/msg00014.html
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1324
						// * http://handbrake.fr/irclogs/handbrake-dev/handbrake-dev20080128_pg2.html
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1325
			case 'ctts'://  STCompositionOffsetAID             - http://developer.apple.com/documentation/QuickTime/Reference/QTRef_Constants/Reference/reference.html
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1326
			case 'cslg'://  STCompositionShiftLeastGreatestAID - http://developer.apple.com/documentation/QuickTime/Reference/QTRef_Constants/Reference/reference.html
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1327
			case 'sdtp'://  STSampleDependencyAID              - http://developer.apple.com/documentation/QuickTime/Reference/QTRef_Constants/Reference/reference.html
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1328
			case 'stps'://  STPartialSyncSampleAID             - http://developer.apple.com/documentation/QuickTime/Reference/QTRef_Constants/Reference/reference.html
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1329
				//$atom_structure['data'] = $atom_data;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1330
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1331
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1332
			case '©xyz':  // GPS latitude+longitude+altitude
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1333
				$atom_structure['data'] = $atom_data;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1334
				if (preg_match('#([\\+\\-][0-9\\.]+)([\\+\\-][0-9\\.]+)([\\+\\-][0-9\\.]+)?/$#i', $atom_data, $matches)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1335
					@list($all, $latitude, $longitude, $altitude) = $matches;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1336
					$info['quicktime']['comments']['gps_latitude'][]  = floatval($latitude);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1337
					$info['quicktime']['comments']['gps_longitude'][] = floatval($longitude);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1338
					if (!empty($altitude)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1339
						$info['quicktime']['comments']['gps_altitude'][] = floatval($altitude);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1340
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1341
				} else {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1342
					$info['warning'][] = 'QuickTime atom "©xyz" data does not match expected data pattern at offset '.$baseoffset.'. Please report as getID3() bug.';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1343
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1344
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1345
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1346
			case 'NCDT':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1347
				// http://www.sno.phy.queensu.ca/~phil/exiftool/TagNames/Nikon.html
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1348
				// Nikon-specific QuickTime tags found in the NCDT atom of MOV videos from some Nikon cameras such as the Coolpix S8000 and D5100
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1349
				$atom_structure['subatoms'] = $this->QuicktimeParseContainerAtom($atom_data, $baseoffset + 4, $atomHierarchy, $ParseAllPossibleAtoms);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1350
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1351
			case 'NCTH': // Nikon Camera THumbnail image
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1352
			case 'NCVW': // Nikon Camera preVieW image
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1353
				// http://www.sno.phy.queensu.ca/~phil/exiftool/TagNames/Nikon.html
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1354
				if (preg_match('/^\xFF\xD8\xFF/', $atom_data)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1355
					$atom_structure['data'] = $atom_data;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1356
					$atom_structure['image_mime'] = 'image/jpeg';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1357
					$atom_structure['description'] = (($atomname == 'NCTH') ? 'Nikon Camera Thumbnail Image' : (($atomname == 'NCVW') ? 'Nikon Camera Preview Image' : 'Nikon preview image'));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1358
					$info['quicktime']['comments']['picture'][] = array('image_mime'=>$atom_structure['image_mime'], 'data'=>$atom_data, 'description'=>$atom_structure['description']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1359
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1360
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1361
			case 'NCHD': // MakerNoteVersion
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1362
				// http://www.sno.phy.queensu.ca/~phil/exiftool/TagNames/Nikon.html
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1363
				$atom_structure['data'] = $atom_data;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1364
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1365
			case 'NCTG': // NikonTags
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1366
				// http://www.sno.phy.queensu.ca/~phil/exiftool/TagNames/Nikon.html#NCTG
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1367
				$atom_structure['data'] = $this->QuicktimeParseNikonNCTG($atom_data);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1368
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1369
			case 'NCDB': // NikonTags
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1370
				// http://www.sno.phy.queensu.ca/~phil/exiftool/TagNames/Nikon.html
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1371
				$atom_structure['data'] = $atom_data;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1372
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1373
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1374
			case "\x00\x00\x00\x00":
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1375
			case 'meta': // METAdata atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1376
				// some kind of metacontainer, may contain a big data dump such as:
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1377
				// mdta keys  mdtacom.apple.quicktime.make (mdtacom.apple.quicktime.creationdate ,mdtacom.apple.quicktime.location.ISO6709 $mdtacom.apple.quicktime.software !mdtacom.apple.quicktime.model ilst   data DEApple 0  (data DE2011-05-11T17:54:04+0200 2  *data DE+52.4936+013.3897+040.247/   data DE4.3.1  data DEiPhone 4
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1378
				// http://www.geocities.com/xhelmboyx/quicktime/formats/qti-layout.txt
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1379
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1380
	            $atom_structure['version']   =          getid3_lib::BigEndian2Int(substr($atom_data, 0, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1381
	            $atom_structure['flags_raw'] =          getid3_lib::BigEndian2Int(substr($atom_data, 1, 3));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1382
	            $atom_structure['subatoms']  = $this->QuicktimeParseContainerAtom(substr($atom_data, 4), $baseoffset + 8, $atomHierarchy, $ParseAllPossibleAtoms);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1383
				//$atom_structure['subatoms']  = $this->QuicktimeParseContainerAtom($atom_data, $baseoffset + 8, $atomHierarchy, $ParseAllPossibleAtoms);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1384
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1385
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1386
			case 'data': // metaDATA atom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1387
				// seems to be 2 bytes language code (ASCII), 2 bytes unknown (set to 0x10B5 in sample I have), remainder is useful data
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1388
				$atom_structure['language'] =                           substr($atom_data, 4 + 0, 2);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1389
				$atom_structure['unknown']  = getid3_lib::BigEndian2Int(substr($atom_data, 4 + 2, 2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1390
				$atom_structure['data']     =                           substr($atom_data, 4 + 4);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1391
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1392
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1393
			default:
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1394
				$info['warning'][] = 'Unknown QuickTime atom type: "'.$atomname.'" ('.trim(getid3_lib::PrintHexBytes($atomname)).') at offset '.$baseoffset;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1395
				$atom_structure['data'] = $atom_data;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1396
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1397
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1398
		array_pop($atomHierarchy);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1399
		return $atom_structure;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1400
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1401
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1402
	public function QuicktimeParseContainerAtom($atom_data, $baseoffset, &$atomHierarchy, $ParseAllPossibleAtoms) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1403
//echo 'QuicktimeParseContainerAtom('.substr($atom_data, 4, 4).') @ '.$baseoffset.'<br><br>';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1404
		$atom_structure  = false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1405
		$subatomoffset  = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1406
		$subatomcounter = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1407
		if ((strlen($atom_data) == 4) && (getid3_lib::BigEndian2Int($atom_data) == 0x00000000)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1408
			return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1409
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1410
		while ($subatomoffset < strlen($atom_data)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1411
			$subatomsize = getid3_lib::BigEndian2Int(substr($atom_data, $subatomoffset + 0, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1412
			$subatomname =                           substr($atom_data, $subatomoffset + 4, 4);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1413
			$subatomdata =                           substr($atom_data, $subatomoffset + 8, $subatomsize - 8);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1414
			if ($subatomsize == 0) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1415
				// Furthermore, for historical reasons the list of atoms is optionally
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1416
				// terminated by a 32-bit integer set to 0. If you are writing a program
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1417
				// to read user data atoms, you should allow for the terminating 0.
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1418
				return $atom_structure;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1419
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1420
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1421
			$atom_structure[$subatomcounter] = $this->QuicktimeParseAtom($subatomname, $subatomsize, $subatomdata, $baseoffset + $subatomoffset, $atomHierarchy, $ParseAllPossibleAtoms);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1422
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1423
			$subatomoffset += $subatomsize;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1424
			$subatomcounter++;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1425
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1426
		return $atom_structure;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1427
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1428
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1429
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1430
	public function quicktime_read_mp4_descr_length($data, &$offset) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1431
		// http://libquicktime.sourcearchive.com/documentation/2:1.0.2plus-pdebian-2build1/esds_8c-source.html
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1432
		$num_bytes = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1433
		$length    = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1434
		do {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1435
			$b = ord(substr($data, $offset++, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1436
			$length = ($length << 7) | ($b & 0x7F);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1437
		} while (($b & 0x80) && ($num_bytes++ < 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1438
		return $length;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1439
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1440
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1441
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1442
	public function QuicktimeLanguageLookup($languageid) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1443
		// http://developer.apple.com/library/mac/#documentation/QuickTime/QTFF/QTFFChap4/qtff4.html#//apple_ref/doc/uid/TP40000939-CH206-34353
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1444
		static $QuicktimeLanguageLookup = array();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1445
		if (empty($QuicktimeLanguageLookup)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1446
			$QuicktimeLanguageLookup[0]     = 'English';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1447
			$QuicktimeLanguageLookup[1]     = 'French';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1448
			$QuicktimeLanguageLookup[2]     = 'German';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1449
			$QuicktimeLanguageLookup[3]     = 'Italian';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1450
			$QuicktimeLanguageLookup[4]     = 'Dutch';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1451
			$QuicktimeLanguageLookup[5]     = 'Swedish';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1452
			$QuicktimeLanguageLookup[6]     = 'Spanish';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1453
			$QuicktimeLanguageLookup[7]     = 'Danish';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1454
			$QuicktimeLanguageLookup[8]     = 'Portuguese';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1455
			$QuicktimeLanguageLookup[9]     = 'Norwegian';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1456
			$QuicktimeLanguageLookup[10]    = 'Hebrew';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1457
			$QuicktimeLanguageLookup[11]    = 'Japanese';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1458
			$QuicktimeLanguageLookup[12]    = 'Arabic';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1459
			$QuicktimeLanguageLookup[13]    = 'Finnish';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1460
			$QuicktimeLanguageLookup[14]    = 'Greek';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1461
			$QuicktimeLanguageLookup[15]    = 'Icelandic';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1462
			$QuicktimeLanguageLookup[16]    = 'Maltese';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1463
			$QuicktimeLanguageLookup[17]    = 'Turkish';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1464
			$QuicktimeLanguageLookup[18]    = 'Croatian';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1465
			$QuicktimeLanguageLookup[19]    = 'Chinese (Traditional)';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1466
			$QuicktimeLanguageLookup[20]    = 'Urdu';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1467
			$QuicktimeLanguageLookup[21]    = 'Hindi';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1468
			$QuicktimeLanguageLookup[22]    = 'Thai';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1469
			$QuicktimeLanguageLookup[23]    = 'Korean';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1470
			$QuicktimeLanguageLookup[24]    = 'Lithuanian';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1471
			$QuicktimeLanguageLookup[25]    = 'Polish';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1472
			$QuicktimeLanguageLookup[26]    = 'Hungarian';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1473
			$QuicktimeLanguageLookup[27]    = 'Estonian';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1474
			$QuicktimeLanguageLookup[28]    = 'Lettish';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1475
			$QuicktimeLanguageLookup[28]    = 'Latvian';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1476
			$QuicktimeLanguageLookup[29]    = 'Saamisk';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1477
			$QuicktimeLanguageLookup[29]    = 'Lappish';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1478
			$QuicktimeLanguageLookup[30]    = 'Faeroese';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1479
			$QuicktimeLanguageLookup[31]    = 'Farsi';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1480
			$QuicktimeLanguageLookup[31]    = 'Persian';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1481
			$QuicktimeLanguageLookup[32]    = 'Russian';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1482
			$QuicktimeLanguageLookup[33]    = 'Chinese (Simplified)';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1483
			$QuicktimeLanguageLookup[34]    = 'Flemish';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1484
			$QuicktimeLanguageLookup[35]    = 'Irish';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1485
			$QuicktimeLanguageLookup[36]    = 'Albanian';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1486
			$QuicktimeLanguageLookup[37]    = 'Romanian';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1487
			$QuicktimeLanguageLookup[38]    = 'Czech';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1488
			$QuicktimeLanguageLookup[39]    = 'Slovak';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1489
			$QuicktimeLanguageLookup[40]    = 'Slovenian';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1490
			$QuicktimeLanguageLookup[41]    = 'Yiddish';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1491
			$QuicktimeLanguageLookup[42]    = 'Serbian';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1492
			$QuicktimeLanguageLookup[43]    = 'Macedonian';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1493
			$QuicktimeLanguageLookup[44]    = 'Bulgarian';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1494
			$QuicktimeLanguageLookup[45]    = 'Ukrainian';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1495
			$QuicktimeLanguageLookup[46]    = 'Byelorussian';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1496
			$QuicktimeLanguageLookup[47]    = 'Uzbek';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1497
			$QuicktimeLanguageLookup[48]    = 'Kazakh';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1498
			$QuicktimeLanguageLookup[49]    = 'Azerbaijani';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1499
			$QuicktimeLanguageLookup[50]    = 'AzerbaijanAr';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1500
			$QuicktimeLanguageLookup[51]    = 'Armenian';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1501
			$QuicktimeLanguageLookup[52]    = 'Georgian';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1502
			$QuicktimeLanguageLookup[53]    = 'Moldavian';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1503
			$QuicktimeLanguageLookup[54]    = 'Kirghiz';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1504
			$QuicktimeLanguageLookup[55]    = 'Tajiki';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1505
			$QuicktimeLanguageLookup[56]    = 'Turkmen';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1506
			$QuicktimeLanguageLookup[57]    = 'Mongolian';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1507
			$QuicktimeLanguageLookup[58]    = 'MongolianCyr';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1508
			$QuicktimeLanguageLookup[59]    = 'Pashto';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1509
			$QuicktimeLanguageLookup[60]    = 'Kurdish';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1510
			$QuicktimeLanguageLookup[61]    = 'Kashmiri';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1511
			$QuicktimeLanguageLookup[62]    = 'Sindhi';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1512
			$QuicktimeLanguageLookup[63]    = 'Tibetan';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1513
			$QuicktimeLanguageLookup[64]    = 'Nepali';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1514
			$QuicktimeLanguageLookup[65]    = 'Sanskrit';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1515
			$QuicktimeLanguageLookup[66]    = 'Marathi';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1516
			$QuicktimeLanguageLookup[67]    = 'Bengali';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1517
			$QuicktimeLanguageLookup[68]    = 'Assamese';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1518
			$QuicktimeLanguageLookup[69]    = 'Gujarati';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1519
			$QuicktimeLanguageLookup[70]    = 'Punjabi';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1520
			$QuicktimeLanguageLookup[71]    = 'Oriya';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1521
			$QuicktimeLanguageLookup[72]    = 'Malayalam';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1522
			$QuicktimeLanguageLookup[73]    = 'Kannada';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1523
			$QuicktimeLanguageLookup[74]    = 'Tamil';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1524
			$QuicktimeLanguageLookup[75]    = 'Telugu';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1525
			$QuicktimeLanguageLookup[76]    = 'Sinhalese';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1526
			$QuicktimeLanguageLookup[77]    = 'Burmese';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1527
			$QuicktimeLanguageLookup[78]    = 'Khmer';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1528
			$QuicktimeLanguageLookup[79]    = 'Lao';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1529
			$QuicktimeLanguageLookup[80]    = 'Vietnamese';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1530
			$QuicktimeLanguageLookup[81]    = 'Indonesian';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1531
			$QuicktimeLanguageLookup[82]    = 'Tagalog';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1532
			$QuicktimeLanguageLookup[83]    = 'MalayRoman';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1533
			$QuicktimeLanguageLookup[84]    = 'MalayArabic';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1534
			$QuicktimeLanguageLookup[85]    = 'Amharic';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1535
			$QuicktimeLanguageLookup[86]    = 'Tigrinya';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1536
			$QuicktimeLanguageLookup[87]    = 'Galla';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1537
			$QuicktimeLanguageLookup[87]    = 'Oromo';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1538
			$QuicktimeLanguageLookup[88]    = 'Somali';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1539
			$QuicktimeLanguageLookup[89]    = 'Swahili';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1540
			$QuicktimeLanguageLookup[90]    = 'Ruanda';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1541
			$QuicktimeLanguageLookup[91]    = 'Rundi';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1542
			$QuicktimeLanguageLookup[92]    = 'Chewa';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1543
			$QuicktimeLanguageLookup[93]    = 'Malagasy';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1544
			$QuicktimeLanguageLookup[94]    = 'Esperanto';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1545
			$QuicktimeLanguageLookup[128]   = 'Welsh';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1546
			$QuicktimeLanguageLookup[129]   = 'Basque';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1547
			$QuicktimeLanguageLookup[130]   = 'Catalan';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1548
			$QuicktimeLanguageLookup[131]   = 'Latin';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1549
			$QuicktimeLanguageLookup[132]   = 'Quechua';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1550
			$QuicktimeLanguageLookup[133]   = 'Guarani';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1551
			$QuicktimeLanguageLookup[134]   = 'Aymara';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1552
			$QuicktimeLanguageLookup[135]   = 'Tatar';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1553
			$QuicktimeLanguageLookup[136]   = 'Uighur';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1554
			$QuicktimeLanguageLookup[137]   = 'Dzongkha';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1555
			$QuicktimeLanguageLookup[138]   = 'JavaneseRom';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1556
			$QuicktimeLanguageLookup[32767] = 'Unspecified';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1557
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1558
		if (($languageid > 138) && ($languageid < 32767)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1559
			/*
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1560
			ISO Language Codes - http://www.loc.gov/standards/iso639-2/php/code_list.php
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1561
			Because the language codes specified by ISO 639-2/T are three characters long, they must be packed to fit into a 16-bit field.
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1562
			The packing algorithm must map each of the three characters, which are always lowercase, into a 5-bit integer and then concatenate
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1563
			these integers into the least significant 15 bits of a 16-bit integer, leaving the 16-bit integer's most significant bit set to zero.
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1564
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1565
			One algorithm for performing this packing is to treat each ISO character as a 16-bit integer. Subtract 0x60 from the first character
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1566
			and multiply by 2^10 (0x400), subtract 0x60 from the second character and multiply by 2^5 (0x20), subtract 0x60 from the third character,
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1567
			and add the three 16-bit values. This will result in a single 16-bit value with the three codes correctly packed into the 15 least
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1568
			significant bits and the most significant bit set to zero.
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1569
			*/
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1570
			$iso_language_id  = '';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1571
			$iso_language_id .= chr((($languageid & 0x7C00) >> 10) + 0x60);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1572
			$iso_language_id .= chr((($languageid & 0x03E0) >>  5) + 0x60);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1573
			$iso_language_id .= chr((($languageid & 0x001F) >>  0) + 0x60);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1574
			$QuicktimeLanguageLookup[$languageid] = getid3_id3v2::LanguageLookup($iso_language_id);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1575
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1576
		return (isset($QuicktimeLanguageLookup[$languageid]) ? $QuicktimeLanguageLookup[$languageid] : 'invalid');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1577
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1578
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1579
	public function QuicktimeVideoCodecLookup($codecid) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1580
		static $QuicktimeVideoCodecLookup = array();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1581
		if (empty($QuicktimeVideoCodecLookup)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1582
			$QuicktimeVideoCodecLookup['.SGI'] = 'SGI';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1583
			$QuicktimeVideoCodecLookup['3IV1'] = '3ivx MPEG-4 v1';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1584
			$QuicktimeVideoCodecLookup['3IV2'] = '3ivx MPEG-4 v2';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1585
			$QuicktimeVideoCodecLookup['3IVX'] = '3ivx MPEG-4';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1586
			$QuicktimeVideoCodecLookup['8BPS'] = 'Planar RGB';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1587
			$QuicktimeVideoCodecLookup['avc1'] = 'H.264/MPEG-4 AVC';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1588
			$QuicktimeVideoCodecLookup['avr '] = 'AVR-JPEG';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1589
			$QuicktimeVideoCodecLookup['b16g'] = '16Gray';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1590
			$QuicktimeVideoCodecLookup['b32a'] = '32AlphaGray';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1591
			$QuicktimeVideoCodecLookup['b48r'] = '48RGB';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1592
			$QuicktimeVideoCodecLookup['b64a'] = '64ARGB';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1593
			$QuicktimeVideoCodecLookup['base'] = 'Base';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1594
			$QuicktimeVideoCodecLookup['clou'] = 'Cloud';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1595
			$QuicktimeVideoCodecLookup['cmyk'] = 'CMYK';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1596
			$QuicktimeVideoCodecLookup['cvid'] = 'Cinepak';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1597
			$QuicktimeVideoCodecLookup['dmb1'] = 'OpenDML JPEG';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1598
			$QuicktimeVideoCodecLookup['dvc '] = 'DVC-NTSC';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1599
			$QuicktimeVideoCodecLookup['dvcp'] = 'DVC-PAL';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1600
			$QuicktimeVideoCodecLookup['dvpn'] = 'DVCPro-NTSC';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1601
			$QuicktimeVideoCodecLookup['dvpp'] = 'DVCPro-PAL';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1602
			$QuicktimeVideoCodecLookup['fire'] = 'Fire';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1603
			$QuicktimeVideoCodecLookup['flic'] = 'FLC';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1604
			$QuicktimeVideoCodecLookup['gif '] = 'GIF';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1605
			$QuicktimeVideoCodecLookup['h261'] = 'H261';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1606
			$QuicktimeVideoCodecLookup['h263'] = 'H263';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1607
			$QuicktimeVideoCodecLookup['IV41'] = 'Indeo4';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1608
			$QuicktimeVideoCodecLookup['jpeg'] = 'JPEG';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1609
			$QuicktimeVideoCodecLookup['kpcd'] = 'PhotoCD';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1610
			$QuicktimeVideoCodecLookup['mjpa'] = 'Motion JPEG-A';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1611
			$QuicktimeVideoCodecLookup['mjpb'] = 'Motion JPEG-B';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1612
			$QuicktimeVideoCodecLookup['msvc'] = 'Microsoft Video1';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1613
			$QuicktimeVideoCodecLookup['myuv'] = 'MPEG YUV420';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1614
			$QuicktimeVideoCodecLookup['path'] = 'Vector';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1615
			$QuicktimeVideoCodecLookup['png '] = 'PNG';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1616
			$QuicktimeVideoCodecLookup['PNTG'] = 'MacPaint';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1617
			$QuicktimeVideoCodecLookup['qdgx'] = 'QuickDrawGX';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1618
			$QuicktimeVideoCodecLookup['qdrw'] = 'QuickDraw';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1619
			$QuicktimeVideoCodecLookup['raw '] = 'RAW';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1620
			$QuicktimeVideoCodecLookup['ripl'] = 'WaterRipple';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1621
			$QuicktimeVideoCodecLookup['rpza'] = 'Video';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1622
			$QuicktimeVideoCodecLookup['smc '] = 'Graphics';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1623
			$QuicktimeVideoCodecLookup['SVQ1'] = 'Sorenson Video 1';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1624
			$QuicktimeVideoCodecLookup['SVQ1'] = 'Sorenson Video 3';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1625
			$QuicktimeVideoCodecLookup['syv9'] = 'Sorenson YUV9';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1626
			$QuicktimeVideoCodecLookup['tga '] = 'Targa';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1627
			$QuicktimeVideoCodecLookup['tiff'] = 'TIFF';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1628
			$QuicktimeVideoCodecLookup['WRAW'] = 'Windows RAW';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1629
			$QuicktimeVideoCodecLookup['WRLE'] = 'BMP';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1630
			$QuicktimeVideoCodecLookup['y420'] = 'YUV420';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1631
			$QuicktimeVideoCodecLookup['yuv2'] = 'ComponentVideo';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1632
			$QuicktimeVideoCodecLookup['yuvs'] = 'ComponentVideoUnsigned';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1633
			$QuicktimeVideoCodecLookup['yuvu'] = 'ComponentVideoSigned';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1634
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1635
		return (isset($QuicktimeVideoCodecLookup[$codecid]) ? $QuicktimeVideoCodecLookup[$codecid] : '');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1636
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1637
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1638
	public function QuicktimeAudioCodecLookup($codecid) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1639
		static $QuicktimeAudioCodecLookup = array();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1640
		if (empty($QuicktimeAudioCodecLookup)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1641
			$QuicktimeAudioCodecLookup['.mp3']          = 'Fraunhofer MPEG Layer-III alias';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1642
			$QuicktimeAudioCodecLookup['aac ']          = 'ISO/IEC 14496-3 AAC';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1643
			$QuicktimeAudioCodecLookup['agsm']          = 'Apple GSM 10:1';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1644
			$QuicktimeAudioCodecLookup['alac']          = 'Apple Lossless Audio Codec';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1645
			$QuicktimeAudioCodecLookup['alaw']          = 'A-law 2:1';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1646
			$QuicktimeAudioCodecLookup['conv']          = 'Sample Format';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1647
			$QuicktimeAudioCodecLookup['dvca']          = 'DV';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1648
			$QuicktimeAudioCodecLookup['dvi ']          = 'DV 4:1';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1649
			$QuicktimeAudioCodecLookup['eqal']          = 'Frequency Equalizer';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1650
			$QuicktimeAudioCodecLookup['fl32']          = '32-bit Floating Point';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1651
			$QuicktimeAudioCodecLookup['fl64']          = '64-bit Floating Point';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1652
			$QuicktimeAudioCodecLookup['ima4']          = 'Interactive Multimedia Association 4:1';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1653
			$QuicktimeAudioCodecLookup['in24']          = '24-bit Integer';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1654
			$QuicktimeAudioCodecLookup['in32']          = '32-bit Integer';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1655
			$QuicktimeAudioCodecLookup['lpc ']          = 'LPC 23:1';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1656
			$QuicktimeAudioCodecLookup['MAC3']          = 'Macintosh Audio Compression/Expansion (MACE) 3:1';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1657
			$QuicktimeAudioCodecLookup['MAC6']          = 'Macintosh Audio Compression/Expansion (MACE) 6:1';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1658
			$QuicktimeAudioCodecLookup['mixb']          = '8-bit Mixer';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1659
			$QuicktimeAudioCodecLookup['mixw']          = '16-bit Mixer';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1660
			$QuicktimeAudioCodecLookup['mp4a']          = 'ISO/IEC 14496-3 AAC';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1661
			$QuicktimeAudioCodecLookup['MS'."\x00\x02"] = 'Microsoft ADPCM';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1662
			$QuicktimeAudioCodecLookup['MS'."\x00\x11"] = 'DV IMA';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1663
			$QuicktimeAudioCodecLookup['MS'."\x00\x55"] = 'Fraunhofer MPEG Layer III';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1664
			$QuicktimeAudioCodecLookup['NONE']          = 'No Encoding';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1665
			$QuicktimeAudioCodecLookup['Qclp']          = 'Qualcomm PureVoice';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1666
			$QuicktimeAudioCodecLookup['QDM2']          = 'QDesign Music 2';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1667
			$QuicktimeAudioCodecLookup['QDMC']          = 'QDesign Music 1';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1668
			$QuicktimeAudioCodecLookup['ratb']          = '8-bit Rate';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1669
			$QuicktimeAudioCodecLookup['ratw']          = '16-bit Rate';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1670
			$QuicktimeAudioCodecLookup['raw ']          = 'raw PCM';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1671
			$QuicktimeAudioCodecLookup['sour']          = 'Sound Source';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1672
			$QuicktimeAudioCodecLookup['sowt']          = 'signed/two\'s complement (Little Endian)';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1673
			$QuicktimeAudioCodecLookup['str1']          = 'Iomega MPEG layer II';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1674
			$QuicktimeAudioCodecLookup['str2']          = 'Iomega MPEG *layer II';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1675
			$QuicktimeAudioCodecLookup['str3']          = 'Iomega MPEG **layer II';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1676
			$QuicktimeAudioCodecLookup['str4']          = 'Iomega MPEG ***layer II';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1677
			$QuicktimeAudioCodecLookup['twos']          = 'signed/two\'s complement (Big Endian)';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1678
			$QuicktimeAudioCodecLookup['ulaw']          = 'mu-law 2:1';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1679
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1680
		return (isset($QuicktimeAudioCodecLookup[$codecid]) ? $QuicktimeAudioCodecLookup[$codecid] : '');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1681
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1682
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1683
	public function QuicktimeDCOMLookup($compressionid) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1684
		static $QuicktimeDCOMLookup = array();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1685
		if (empty($QuicktimeDCOMLookup)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1686
			$QuicktimeDCOMLookup['zlib'] = 'ZLib Deflate';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1687
			$QuicktimeDCOMLookup['adec'] = 'Apple Compression';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1688
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1689
		return (isset($QuicktimeDCOMLookup[$compressionid]) ? $QuicktimeDCOMLookup[$compressionid] : '');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1690
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1691
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1692
	public function QuicktimeColorNameLookup($colordepthid) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1693
		static $QuicktimeColorNameLookup = array();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1694
		if (empty($QuicktimeColorNameLookup)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1695
			$QuicktimeColorNameLookup[1]  = '2-color (monochrome)';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1696
			$QuicktimeColorNameLookup[2]  = '4-color';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1697
			$QuicktimeColorNameLookup[4]  = '16-color';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1698
			$QuicktimeColorNameLookup[8]  = '256-color';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1699
			$QuicktimeColorNameLookup[16] = 'thousands (16-bit color)';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1700
			$QuicktimeColorNameLookup[24] = 'millions (24-bit color)';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1701
			$QuicktimeColorNameLookup[32] = 'millions+ (32-bit color)';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1702
			$QuicktimeColorNameLookup[33] = 'black & white';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1703
			$QuicktimeColorNameLookup[34] = '4-gray';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1704
			$QuicktimeColorNameLookup[36] = '16-gray';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1705
			$QuicktimeColorNameLookup[40] = '256-gray';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1706
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1707
		return (isset($QuicktimeColorNameLookup[$colordepthid]) ? $QuicktimeColorNameLookup[$colordepthid] : 'invalid');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1708
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1709
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1710
	public function QuicktimeSTIKLookup($stik) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1711
		static $QuicktimeSTIKLookup = array();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1712
		if (empty($QuicktimeSTIKLookup)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1713
			$QuicktimeSTIKLookup[0]  = 'Movie';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1714
			$QuicktimeSTIKLookup[1]  = 'Normal';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1715
			$QuicktimeSTIKLookup[2]  = 'Audiobook';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1716
			$QuicktimeSTIKLookup[5]  = 'Whacked Bookmark';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1717
			$QuicktimeSTIKLookup[6]  = 'Music Video';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1718
			$QuicktimeSTIKLookup[9]  = 'Short Film';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1719
			$QuicktimeSTIKLookup[10] = 'TV Show';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1720
			$QuicktimeSTIKLookup[11] = 'Booklet';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1721
			$QuicktimeSTIKLookup[14] = 'Ringtone';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1722
			$QuicktimeSTIKLookup[21] = 'Podcast';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1723
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1724
		return (isset($QuicktimeSTIKLookup[$stik]) ? $QuicktimeSTIKLookup[$stik] : 'invalid');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1725
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1726
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1727
	public function QuicktimeIODSaudioProfileName($audio_profile_id) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1728
		static $QuicktimeIODSaudioProfileNameLookup = array();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1729
		if (empty($QuicktimeIODSaudioProfileNameLookup)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1730
			$QuicktimeIODSaudioProfileNameLookup = array(
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1731
			    0x00 => 'ISO Reserved (0x00)',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1732
			    0x01 => 'Main Audio Profile @ Level 1',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1733
			    0x02 => 'Main Audio Profile @ Level 2',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1734
			    0x03 => 'Main Audio Profile @ Level 3',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1735
			    0x04 => 'Main Audio Profile @ Level 4',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1736
			    0x05 => 'Scalable Audio Profile @ Level 1',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1737
			    0x06 => 'Scalable Audio Profile @ Level 2',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1738
			    0x07 => 'Scalable Audio Profile @ Level 3',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1739
			    0x08 => 'Scalable Audio Profile @ Level 4',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1740
			    0x09 => 'Speech Audio Profile @ Level 1',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1741
			    0x0A => 'Speech Audio Profile @ Level 2',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1742
			    0x0B => 'Synthetic Audio Profile @ Level 1',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1743
			    0x0C => 'Synthetic Audio Profile @ Level 2',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1744
			    0x0D => 'Synthetic Audio Profile @ Level 3',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1745
			    0x0E => 'High Quality Audio Profile @ Level 1',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1746
			    0x0F => 'High Quality Audio Profile @ Level 2',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1747
			    0x10 => 'High Quality Audio Profile @ Level 3',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1748
			    0x11 => 'High Quality Audio Profile @ Level 4',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1749
			    0x12 => 'High Quality Audio Profile @ Level 5',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1750
			    0x13 => 'High Quality Audio Profile @ Level 6',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1751
			    0x14 => 'High Quality Audio Profile @ Level 7',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1752
			    0x15 => 'High Quality Audio Profile @ Level 8',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1753
			    0x16 => 'Low Delay Audio Profile @ Level 1',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1754
			    0x17 => 'Low Delay Audio Profile @ Level 2',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1755
			    0x18 => 'Low Delay Audio Profile @ Level 3',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1756
			    0x19 => 'Low Delay Audio Profile @ Level 4',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1757
			    0x1A => 'Low Delay Audio Profile @ Level 5',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1758
			    0x1B => 'Low Delay Audio Profile @ Level 6',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1759
			    0x1C => 'Low Delay Audio Profile @ Level 7',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1760
			    0x1D => 'Low Delay Audio Profile @ Level 8',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1761
			    0x1E => 'Natural Audio Profile @ Level 1',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1762
			    0x1F => 'Natural Audio Profile @ Level 2',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1763
			    0x20 => 'Natural Audio Profile @ Level 3',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1764
			    0x21 => 'Natural Audio Profile @ Level 4',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1765
			    0x22 => 'Mobile Audio Internetworking Profile @ Level 1',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1766
			    0x23 => 'Mobile Audio Internetworking Profile @ Level 2',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1767
			    0x24 => 'Mobile Audio Internetworking Profile @ Level 3',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1768
			    0x25 => 'Mobile Audio Internetworking Profile @ Level 4',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1769
			    0x26 => 'Mobile Audio Internetworking Profile @ Level 5',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1770
			    0x27 => 'Mobile Audio Internetworking Profile @ Level 6',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1771
			    0x28 => 'AAC Profile @ Level 1',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1772
			    0x29 => 'AAC Profile @ Level 2',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1773
			    0x2A => 'AAC Profile @ Level 4',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1774
			    0x2B => 'AAC Profile @ Level 5',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1775
			    0x2C => 'High Efficiency AAC Profile @ Level 2',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1776
			    0x2D => 'High Efficiency AAC Profile @ Level 3',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1777
			    0x2E => 'High Efficiency AAC Profile @ Level 4',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1778
			    0x2F => 'High Efficiency AAC Profile @ Level 5',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1779
			    0xFE => 'Not part of MPEG-4 audio profiles',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1780
			    0xFF => 'No audio capability required',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1781
			);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1782
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1783
		return (isset($QuicktimeIODSaudioProfileNameLookup[$audio_profile_id]) ? $QuicktimeIODSaudioProfileNameLookup[$audio_profile_id] : 'ISO Reserved / User Private');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1784
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1785
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1786
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1787
	public function QuicktimeIODSvideoProfileName($video_profile_id) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1788
		static $QuicktimeIODSvideoProfileNameLookup = array();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1789
		if (empty($QuicktimeIODSvideoProfileNameLookup)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1790
			$QuicktimeIODSvideoProfileNameLookup = array(
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1791
				0x00 => 'Reserved (0x00) Profile',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1792
				0x01 => 'Simple Profile @ Level 1',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1793
				0x02 => 'Simple Profile @ Level 2',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1794
				0x03 => 'Simple Profile @ Level 3',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1795
				0x08 => 'Simple Profile @ Level 0',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1796
				0x10 => 'Simple Scalable Profile @ Level 0',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1797
				0x11 => 'Simple Scalable Profile @ Level 1',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1798
				0x12 => 'Simple Scalable Profile @ Level 2',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1799
				0x15 => 'AVC/H264 Profile',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1800
				0x21 => 'Core Profile @ Level 1',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1801
				0x22 => 'Core Profile @ Level 2',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1802
				0x32 => 'Main Profile @ Level 2',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1803
				0x33 => 'Main Profile @ Level 3',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1804
				0x34 => 'Main Profile @ Level 4',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1805
				0x42 => 'N-bit Profile @ Level 2',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1806
				0x51 => 'Scalable Texture Profile @ Level 1',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1807
				0x61 => 'Simple Face Animation Profile @ Level 1',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1808
				0x62 => 'Simple Face Animation Profile @ Level 2',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1809
				0x63 => 'Simple FBA Profile @ Level 1',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1810
				0x64 => 'Simple FBA Profile @ Level 2',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1811
				0x71 => 'Basic Animated Texture Profile @ Level 1',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1812
				0x72 => 'Basic Animated Texture Profile @ Level 2',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1813
				0x81 => 'Hybrid Profile @ Level 1',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1814
				0x82 => 'Hybrid Profile @ Level 2',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1815
				0x91 => 'Advanced Real Time Simple Profile @ Level 1',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1816
				0x92 => 'Advanced Real Time Simple Profile @ Level 2',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1817
				0x93 => 'Advanced Real Time Simple Profile @ Level 3',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1818
				0x94 => 'Advanced Real Time Simple Profile @ Level 4',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1819
				0xA1 => 'Core Scalable Profile @ Level1',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1820
				0xA2 => 'Core Scalable Profile @ Level2',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1821
				0xA3 => 'Core Scalable Profile @ Level3',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1822
				0xB1 => 'Advanced Coding Efficiency Profile @ Level 1',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1823
				0xB2 => 'Advanced Coding Efficiency Profile @ Level 2',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1824
				0xB3 => 'Advanced Coding Efficiency Profile @ Level 3',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1825
				0xB4 => 'Advanced Coding Efficiency Profile @ Level 4',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1826
				0xC1 => 'Advanced Core Profile @ Level 1',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1827
				0xC2 => 'Advanced Core Profile @ Level 2',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1828
				0xD1 => 'Advanced Scalable Texture @ Level1',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1829
				0xD2 => 'Advanced Scalable Texture @ Level2',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1830
				0xE1 => 'Simple Studio Profile @ Level 1',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1831
				0xE2 => 'Simple Studio Profile @ Level 2',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1832
				0xE3 => 'Simple Studio Profile @ Level 3',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1833
				0xE4 => 'Simple Studio Profile @ Level 4',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1834
				0xE5 => 'Core Studio Profile @ Level 1',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1835
				0xE6 => 'Core Studio Profile @ Level 2',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1836
				0xE7 => 'Core Studio Profile @ Level 3',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1837
				0xE8 => 'Core Studio Profile @ Level 4',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1838
				0xF0 => 'Advanced Simple Profile @ Level 0',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1839
				0xF1 => 'Advanced Simple Profile @ Level 1',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1840
				0xF2 => 'Advanced Simple Profile @ Level 2',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1841
				0xF3 => 'Advanced Simple Profile @ Level 3',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1842
				0xF4 => 'Advanced Simple Profile @ Level 4',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1843
				0xF5 => 'Advanced Simple Profile @ Level 5',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1844
				0xF7 => 'Advanced Simple Profile @ Level 3b',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1845
				0xF8 => 'Fine Granularity Scalable Profile @ Level 0',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1846
				0xF9 => 'Fine Granularity Scalable Profile @ Level 1',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1847
				0xFA => 'Fine Granularity Scalable Profile @ Level 2',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1848
				0xFB => 'Fine Granularity Scalable Profile @ Level 3',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1849
				0xFC => 'Fine Granularity Scalable Profile @ Level 4',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1850
				0xFD => 'Fine Granularity Scalable Profile @ Level 5',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1851
				0xFE => 'Not part of MPEG-4 Visual profiles',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1852
				0xFF => 'No visual capability required',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1853
			);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1854
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1855
		return (isset($QuicktimeIODSvideoProfileNameLookup[$video_profile_id]) ? $QuicktimeIODSvideoProfileNameLookup[$video_profile_id] : 'ISO Reserved Profile');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1856
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1857
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1858
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1859
	public function QuicktimeContentRatingLookup($rtng) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1860
		static $QuicktimeContentRatingLookup = array();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1861
		if (empty($QuicktimeContentRatingLookup)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1862
			$QuicktimeContentRatingLookup[0]  = 'None';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1863
			$QuicktimeContentRatingLookup[2]  = 'Clean';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1864
			$QuicktimeContentRatingLookup[4]  = 'Explicit';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1865
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1866
		return (isset($QuicktimeContentRatingLookup[$rtng]) ? $QuicktimeContentRatingLookup[$rtng] : 'invalid');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1867
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1868
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1869
	public function QuicktimeStoreAccountTypeLookup($akid) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1870
		static $QuicktimeStoreAccountTypeLookup = array();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1871
		if (empty($QuicktimeStoreAccountTypeLookup)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1872
			$QuicktimeStoreAccountTypeLookup[0] = 'iTunes';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1873
			$QuicktimeStoreAccountTypeLookup[1] = 'AOL';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1874
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1875
		return (isset($QuicktimeStoreAccountTypeLookup[$akid]) ? $QuicktimeStoreAccountTypeLookup[$akid] : 'invalid');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1876
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1877
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1878
	public function QuicktimeStoreFrontCodeLookup($sfid) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1879
		static $QuicktimeStoreFrontCodeLookup = array();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1880
		if (empty($QuicktimeStoreFrontCodeLookup)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1881
			$QuicktimeStoreFrontCodeLookup[143460] = 'Australia';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1882
			$QuicktimeStoreFrontCodeLookup[143445] = 'Austria';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1883
			$QuicktimeStoreFrontCodeLookup[143446] = 'Belgium';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1884
			$QuicktimeStoreFrontCodeLookup[143455] = 'Canada';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1885
			$QuicktimeStoreFrontCodeLookup[143458] = 'Denmark';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1886
			$QuicktimeStoreFrontCodeLookup[143447] = 'Finland';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1887
			$QuicktimeStoreFrontCodeLookup[143442] = 'France';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1888
			$QuicktimeStoreFrontCodeLookup[143443] = 'Germany';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1889
			$QuicktimeStoreFrontCodeLookup[143448] = 'Greece';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1890
			$QuicktimeStoreFrontCodeLookup[143449] = 'Ireland';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1891
			$QuicktimeStoreFrontCodeLookup[143450] = 'Italy';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1892
			$QuicktimeStoreFrontCodeLookup[143462] = 'Japan';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1893
			$QuicktimeStoreFrontCodeLookup[143451] = 'Luxembourg';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1894
			$QuicktimeStoreFrontCodeLookup[143452] = 'Netherlands';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1895
			$QuicktimeStoreFrontCodeLookup[143461] = 'New Zealand';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1896
			$QuicktimeStoreFrontCodeLookup[143457] = 'Norway';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1897
			$QuicktimeStoreFrontCodeLookup[143453] = 'Portugal';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1898
			$QuicktimeStoreFrontCodeLookup[143454] = 'Spain';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1899
			$QuicktimeStoreFrontCodeLookup[143456] = 'Sweden';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1900
			$QuicktimeStoreFrontCodeLookup[143459] = 'Switzerland';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1901
			$QuicktimeStoreFrontCodeLookup[143444] = 'United Kingdom';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1902
			$QuicktimeStoreFrontCodeLookup[143441] = 'United States';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1903
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1904
		return (isset($QuicktimeStoreFrontCodeLookup[$sfid]) ? $QuicktimeStoreFrontCodeLookup[$sfid] : 'invalid');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1905
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1906
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1907
	public function QuicktimeParseNikonNCTG($atom_data) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1908
		// http://www.sno.phy.queensu.ca/~phil/exiftool/TagNames/Nikon.html#NCTG
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1909
		// Nikon-specific QuickTime tags found in the NCDT atom of MOV videos from some Nikon cameras such as the Coolpix S8000 and D5100
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1910
		// Data is stored as records of:
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1911
		// * 4 bytes record type
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1912
		// * 2 bytes size of data field type:
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1913
		//     0x0001 = flag   (size field *= 1-byte)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1914
		//     0x0002 = char   (size field *= 1-byte)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1915
		//     0x0003 = DWORD+ (size field *= 2-byte), values are stored CDAB
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1916
		//     0x0004 = QWORD+ (size field *= 4-byte), values are stored EFGHABCD
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1917
		//     0x0005 = float  (size field *= 8-byte), values are stored aaaabbbb where value is aaaa/bbbb; possibly multiple sets of values appended together
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1918
		//     0x0007 = bytes  (size field *= 1-byte), values are stored as ??????
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1919
		//     0x0008 = ?????  (size field *= 2-byte), values are stored as ??????
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1920
		// * 2 bytes data size field
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1921
		// * ? bytes data (string data may be null-padded; datestamp fields are in the format "2011:05:25 20:24:15")
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1922
		// all integers are stored BigEndian
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1923
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1924
		$NCTGtagName = array(
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1925
			0x00000001 => 'Make',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1926
			0x00000002 => 'Model',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1927
			0x00000003 => 'Software',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1928
			0x00000011 => 'CreateDate',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1929
			0x00000012 => 'DateTimeOriginal',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1930
			0x00000013 => 'FrameCount',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1931
			0x00000016 => 'FrameRate',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1932
			0x00000022 => 'FrameWidth',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1933
			0x00000023 => 'FrameHeight',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1934
			0x00000032 => 'AudioChannels',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1935
			0x00000033 => 'AudioBitsPerSample',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1936
			0x00000034 => 'AudioSampleRate',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1937
			0x02000001 => 'MakerNoteVersion',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1938
			0x02000005 => 'WhiteBalance',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1939
			0x0200000b => 'WhiteBalanceFineTune',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1940
			0x0200001e => 'ColorSpace',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1941
			0x02000023 => 'PictureControlData',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1942
			0x02000024 => 'WorldTime',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1943
			0x02000032 => 'UnknownInfo',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1944
			0x02000083 => 'LensType',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1945
			0x02000084 => 'Lens',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1946
		);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1947
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1948
		$offset = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1949
		$datalength = strlen($atom_data);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1950
		$parsed = array();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1951
		while ($offset < $datalength) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1952
//echo getid3_lib::PrintHexBytes(substr($atom_data, $offset, 4)).'<br>';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1953
			$record_type       = getid3_lib::BigEndian2Int(substr($atom_data, $offset, 4));  $offset += 4;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1954
			$data_size_type    = getid3_lib::BigEndian2Int(substr($atom_data, $offset, 2));  $offset += 2;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1955
			$data_size         = getid3_lib::BigEndian2Int(substr($atom_data, $offset, 2));  $offset += 2;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1956
			switch ($data_size_type) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1957
				case 0x0001: // 0x0001 = flag   (size field *= 1-byte)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1958
					$data = getid3_lib::BigEndian2Int(substr($atom_data, $offset, $data_size * 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1959
					$offset += ($data_size * 1);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1960
					break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1961
				case 0x0002: // 0x0002 = char   (size field *= 1-byte)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1962
					$data = substr($atom_data, $offset, $data_size * 1);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1963
					$offset += ($data_size * 1);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1964
					$data = rtrim($data, "\x00");
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1965
					break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1966
				case 0x0003: // 0x0003 = DWORD+ (size field *= 2-byte), values are stored CDAB
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1967
					$data = '';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1968
					for ($i = $data_size - 1; $i >= 0; $i--) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1969
						$data .= substr($atom_data, $offset + ($i * 2), 2);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1970
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1971
					$data = getid3_lib::BigEndian2Int($data);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1972
					$offset += ($data_size * 2);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1973
					break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1974
				case 0x0004: // 0x0004 = QWORD+ (size field *= 4-byte), values are stored EFGHABCD
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1975
					$data = '';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1976
					for ($i = $data_size - 1; $i >= 0; $i--) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1977
						$data .= substr($atom_data, $offset + ($i * 4), 4);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1978
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1979
					$data = getid3_lib::BigEndian2Int($data);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1980
					$offset += ($data_size * 4);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1981
					break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1982
				case 0x0005: // 0x0005 = float  (size field *= 8-byte), values are stored aaaabbbb where value is aaaa/bbbb; possibly multiple sets of values appended together
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1983
					$data = array();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1984
					for ($i = 0; $i < $data_size; $i++) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1985
						$numerator    = getid3_lib::BigEndian2Int(substr($atom_data, $offset + ($i * 8) + 0, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1986
						$denomninator = getid3_lib::BigEndian2Int(substr($atom_data, $offset + ($i * 8) + 4, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1987
						if ($denomninator == 0) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1988
							$data[$i] = false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1989
						} else {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1990
							$data[$i] = (double) $numerator / $denomninator;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1991
						}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1992
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1993
					$offset += (8 * $data_size);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1994
					if (count($data) == 1) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1995
						$data = $data[0];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1996
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1997
					break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1998
				case 0x0007: // 0x0007 = bytes  (size field *= 1-byte), values are stored as ??????
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1999
					$data = substr($atom_data, $offset, $data_size * 1);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2000
					$offset += ($data_size * 1);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2001
					break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2002
				case 0x0008: // 0x0008 = ?????  (size field *= 2-byte), values are stored as ??????
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2003
					$data = substr($atom_data, $offset, $data_size * 2);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2004
					$offset += ($data_size * 2);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2005
					break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2006
				default:
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2007
echo 'QuicktimeParseNikonNCTG()::unknown $data_size_type: '.$data_size_type.'<br>';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2008
					break 2;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2009
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2010
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2011
			switch ($record_type) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2012
				case 0x00000011: // CreateDate
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2013
				case 0x00000012: // DateTimeOriginal
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2014
					$data = strtotime($data);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2015
					break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2016
				case 0x0200001e: // ColorSpace
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2017
					switch ($data) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2018
						case 1:
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2019
							$data = 'sRGB';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2020
							break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2021
						case 2:
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2022
							$data = 'Adobe RGB';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2023
							break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2024
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2025
					break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2026
				case 0x02000023: // PictureControlData
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2027
					$PictureControlAdjust = array(0=>'default', 1=>'quick', 2=>'full');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2028
					$FilterEffect = array(0x80=>'off', 0x81=>'yellow', 0x82=>'orange',    0x83=>'red', 0x84=>'green',  0xff=>'n/a');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2029
					$ToningEffect = array(0x80=>'b&w', 0x81=>'sepia',  0x82=>'cyanotype', 0x83=>'red', 0x84=>'yellow', 0x85=>'green', 0x86=>'blue-green', 0x87=>'blue', 0x88=>'purple-blue', 0x89=>'red-purple', 0xff=>'n/a');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2030
					$data = array(
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2031
						'PictureControlVersion'     =>                           substr($data,  0,  4),
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2032
						'PictureControlName'        =>                     rtrim(substr($data,  4, 20), "\x00"),
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2033
						'PictureControlBase'        =>                     rtrim(substr($data, 24, 20), "\x00"),
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2034
						//'?'                       =>                           substr($data, 44,  4),
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2035
						'PictureControlAdjust'      => $PictureControlAdjust[ord(substr($data, 48,  1))],
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2036
						'PictureControlQuickAdjust' =>                       ord(substr($data, 49,  1)),
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2037
						'Sharpness'                 =>                       ord(substr($data, 50,  1)),
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2038
						'Contrast'                  =>                       ord(substr($data, 51,  1)),
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2039
						'Brightness'                =>                       ord(substr($data, 52,  1)),
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2040
						'Saturation'                =>                       ord(substr($data, 53,  1)),
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2041
						'HueAdjustment'             =>                       ord(substr($data, 54,  1)),
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2042
						'FilterEffect'              =>         $FilterEffect[ord(substr($data, 55,  1))],
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2043
						'ToningEffect'              =>         $ToningEffect[ord(substr($data, 56,  1))],
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2044
						'ToningSaturation'          =>                       ord(substr($data, 57,  1)),
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2045
					);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2046
					break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2047
				case 0x02000024: // WorldTime
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2048
					// http://www.sno.phy.queensu.ca/~phil/exiftool/TagNames/Nikon.html#WorldTime
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2049
					// timezone is stored as offset from GMT in minutes
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2050
					$timezone = getid3_lib::BigEndian2Int(substr($data, 0, 2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2051
					if ($timezone & 0x8000) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2052
						$timezone = 0 - (0x10000 - $timezone);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2053
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2054
					$timezone /= 60;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2055
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2056
					$dst = (bool) getid3_lib::BigEndian2Int(substr($data, 2, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2057
					switch (getid3_lib::BigEndian2Int(substr($data, 3, 1))) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2058
						case 2:
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2059
							$datedisplayformat = 'D/M/Y'; break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2060
						case 1:
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2061
							$datedisplayformat = 'M/D/Y'; break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2062
						case 0:
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2063
						default:
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2064
							$datedisplayformat = 'Y/M/D'; break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2065
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2066
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2067
					$data = array('timezone'=>floatval($timezone), 'dst'=>$dst, 'display'=>$datedisplayformat);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2068
					break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2069
				case 0x02000083: // LensType
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2070
					$data = array(
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2071
						//'_'  => $data,
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2072
						'mf' => (bool) ($data & 0x01),
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2073
						'd'  => (bool) ($data & 0x02),
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2074
						'g'  => (bool) ($data & 0x04),
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2075
						'vr' => (bool) ($data & 0x08),
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2076
					);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2077
					break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2078
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2079
			$tag_name = (isset($NCTGtagName[$record_type]) ? $NCTGtagName[$record_type] : '0x'.str_pad(dechex($record_type), 8, '0', STR_PAD_LEFT));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2080
			$parsed[$tag_name] = $data;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2081
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2082
		return $parsed;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2083
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2084
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2085
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2086
	public function CopyToAppropriateCommentsSection($keyname, $data, $boxname='') {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2087
		static $handyatomtranslatorarray = array();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2088
		if (empty($handyatomtranslatorarray)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2089
			$handyatomtranslatorarray['©cpy'] = 'copyright';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2090
			$handyatomtranslatorarray['©day'] = 'creation_date';    // iTunes 4.0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2091
			$handyatomtranslatorarray['©dir'] = 'director';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2092
			$handyatomtranslatorarray['©ed1'] = 'edit1';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2093
			$handyatomtranslatorarray['©ed2'] = 'edit2';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2094
			$handyatomtranslatorarray['©ed3'] = 'edit3';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2095
			$handyatomtranslatorarray['©ed4'] = 'edit4';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2096
			$handyatomtranslatorarray['©ed5'] = 'edit5';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2097
			$handyatomtranslatorarray['©ed6'] = 'edit6';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2098
			$handyatomtranslatorarray['©ed7'] = 'edit7';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2099
			$handyatomtranslatorarray['©ed8'] = 'edit8';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2100
			$handyatomtranslatorarray['©ed9'] = 'edit9';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2101
			$handyatomtranslatorarray['©fmt'] = 'format';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2102
			$handyatomtranslatorarray['©inf'] = 'information';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2103
			$handyatomtranslatorarray['©prd'] = 'producer';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2104
			$handyatomtranslatorarray['©prf'] = 'performers';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2105
			$handyatomtranslatorarray['©req'] = 'system_requirements';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2106
			$handyatomtranslatorarray['©src'] = 'source_credit';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2107
			$handyatomtranslatorarray['©wrt'] = 'writer';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2108
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2109
			// http://www.geocities.com/xhelmboyx/quicktime/formats/qtm-layout.txt
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2110
			$handyatomtranslatorarray['©nam'] = 'title';           // iTunes 4.0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2111
			$handyatomtranslatorarray['©cmt'] = 'comment';         // iTunes 4.0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2112
			$handyatomtranslatorarray['©wrn'] = 'warning';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2113
			$handyatomtranslatorarray['©hst'] = 'host_computer';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2114
			$handyatomtranslatorarray['©mak'] = 'make';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2115
			$handyatomtranslatorarray['©mod'] = 'model';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2116
			$handyatomtranslatorarray['©PRD'] = 'product';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2117
			$handyatomtranslatorarray['©swr'] = 'software';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2118
			$handyatomtranslatorarray['©aut'] = 'author';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2119
			$handyatomtranslatorarray['©ART'] = 'artist';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2120
			$handyatomtranslatorarray['©trk'] = 'track';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2121
			$handyatomtranslatorarray['©alb'] = 'album';           // iTunes 4.0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2122
			$handyatomtranslatorarray['©com'] = 'comment';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2123
			$handyatomtranslatorarray['©gen'] = 'genre';           // iTunes 4.0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2124
			$handyatomtranslatorarray['©ope'] = 'composer';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2125
			$handyatomtranslatorarray['©url'] = 'url';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2126
			$handyatomtranslatorarray['©enc'] = 'encoder';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2127
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2128
			// http://atomicparsley.sourceforge.net/mpeg-4files.html
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2129
			$handyatomtranslatorarray['©art'] = 'artist';           // iTunes 4.0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2130
			$handyatomtranslatorarray['aART'] = 'album_artist';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2131
			$handyatomtranslatorarray['trkn'] = 'track_number';     // iTunes 4.0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2132
			$handyatomtranslatorarray['disk'] = 'disc_number';      // iTunes 4.0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2133
			$handyatomtranslatorarray['gnre'] = 'genre';            // iTunes 4.0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2134
			$handyatomtranslatorarray['©too'] = 'encoder';          // iTunes 4.0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2135
			$handyatomtranslatorarray['tmpo'] = 'bpm';              // iTunes 4.0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2136
			$handyatomtranslatorarray['cprt'] = 'copyright';        // iTunes 4.0?
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2137
			$handyatomtranslatorarray['cpil'] = 'compilation';      // iTunes 4.0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2138
			$handyatomtranslatorarray['covr'] = 'picture';          // iTunes 4.0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2139
			$handyatomtranslatorarray['rtng'] = 'rating';           // iTunes 4.0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2140
			$handyatomtranslatorarray['©grp'] = 'grouping';         // iTunes 4.2
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2141
			$handyatomtranslatorarray['stik'] = 'stik';             // iTunes 4.9
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2142
			$handyatomtranslatorarray['pcst'] = 'podcast';          // iTunes 4.9
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2143
			$handyatomtranslatorarray['catg'] = 'category';         // iTunes 4.9
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2144
			$handyatomtranslatorarray['keyw'] = 'keyword';          // iTunes 4.9
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2145
			$handyatomtranslatorarray['purl'] = 'podcast_url';      // iTunes 4.9
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2146
			$handyatomtranslatorarray['egid'] = 'episode_guid';     // iTunes 4.9
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2147
			$handyatomtranslatorarray['desc'] = 'description';      // iTunes 5.0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2148
			$handyatomtranslatorarray['©lyr'] = 'lyrics';           // iTunes 5.0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2149
			$handyatomtranslatorarray['tvnn'] = 'tv_network_name';  // iTunes 6.0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2150
			$handyatomtranslatorarray['tvsh'] = 'tv_show_name';     // iTunes 6.0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2151
			$handyatomtranslatorarray['tvsn'] = 'tv_season';        // iTunes 6.0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2152
			$handyatomtranslatorarray['tves'] = 'tv_episode';       // iTunes 6.0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2153
			$handyatomtranslatorarray['purd'] = 'purchase_date';    // iTunes 6.0.2
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2154
			$handyatomtranslatorarray['pgap'] = 'gapless_playback'; // iTunes 7.0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2155
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2156
			// http://www.geocities.com/xhelmboyx/quicktime/formats/mp4-layout.txt
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2157
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2158
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2159
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2160
			// boxnames:
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2161
			/*
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2162
			$handyatomtranslatorarray['iTunSMPB']                    = 'iTunSMPB';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2163
			$handyatomtranslatorarray['iTunNORM']                    = 'iTunNORM';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2164
			$handyatomtranslatorarray['Encoding Params']             = 'Encoding Params';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2165
			$handyatomtranslatorarray['replaygain_track_gain']       = 'replaygain_track_gain';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2166
			$handyatomtranslatorarray['replaygain_track_peak']       = 'replaygain_track_peak';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2167
			$handyatomtranslatorarray['replaygain_track_minmax']     = 'replaygain_track_minmax';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2168
			$handyatomtranslatorarray['MusicIP PUID']                = 'MusicIP PUID';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2169
			$handyatomtranslatorarray['MusicBrainz Artist Id']       = 'MusicBrainz Artist Id';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2170
			$handyatomtranslatorarray['MusicBrainz Album Id']        = 'MusicBrainz Album Id';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2171
			$handyatomtranslatorarray['MusicBrainz Album Artist Id'] = 'MusicBrainz Album Artist Id';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2172
			$handyatomtranslatorarray['MusicBrainz Track Id']        = 'MusicBrainz Track Id';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2173
			$handyatomtranslatorarray['MusicBrainz Disc Id']         = 'MusicBrainz Disc Id';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2174
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2175
			// http://age.hobba.nl/audio/tag_frame_reference.html
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2176
			$handyatomtranslatorarray['PLAY_COUNTER']                = 'play_counter'; // Foobar2000 - http://www.getid3.org/phpBB3/viewtopic.php?t=1355
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2177
			$handyatomtranslatorarray['MEDIATYPE']                   = 'mediatype';    // Foobar2000 - http://www.getid3.org/phpBB3/viewtopic.php?t=1355
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2178
			*/
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2179
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2180
		$info = &$this->getid3->info;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2181
		$comment_key = '';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2182
		if ($boxname && ($boxname != $keyname)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2183
			$comment_key = (isset($handyatomtranslatorarray[$boxname]) ? $handyatomtranslatorarray[$boxname] : $boxname);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2184
		} elseif (isset($handyatomtranslatorarray[$keyname])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2185
			$comment_key = $handyatomtranslatorarray[$keyname];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2186
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2187
		if ($comment_key) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2188
			if ($comment_key == 'picture') {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2189
				if (!is_array($data)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2190
					$image_mime = '';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2191
					if (preg_match('#^\x89\x50\x4E\x47\x0D\x0A\x1A\x0A#', $data)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2192
						$image_mime = 'image/png';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2193
					} elseif (preg_match('#^\xFF\xD8\xFF#', $data)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2194
						$image_mime = 'image/jpeg';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2195
					} elseif (preg_match('#^GIF#', $data)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2196
						$image_mime = 'image/gif';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2197
					} elseif (preg_match('#^BM#', $data)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2198
						$image_mime = 'image/bmp';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2199
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2200
					$data = array('data'=>$data, 'image_mime'=>$image_mime);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2201
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2202
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2203
			$info['quicktime']['comments'][$comment_key][] = $data;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2204
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2205
		return true;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2206
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2207
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2208
	public function NoNullString($nullterminatedstring) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2209
		// remove the single null terminator on null terminated strings
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2210
		if (substr($nullterminatedstring, strlen($nullterminatedstring) - 1, 1) === "\x00") {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2211
			return substr($nullterminatedstring, 0, strlen($nullterminatedstring) - 1);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2212
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2213
		return $nullterminatedstring;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2214
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2215
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2216
	public function Pascal2String($pascalstring) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2217
		// Pascal strings have 1 unsigned byte at the beginning saying how many chars (1-255) are in the string
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2218
		return substr($pascalstring, 1);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2219
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2220
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2221
}