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