wp/wp-includes/ID3/module.audio.mp3.php
author ymh <ymh.work@gmail.com>
Fri, 05 Sep 2025 18:40:08 +0200
changeset 21 48c4eec2b7e6
parent 19 3d72ae0968f4
permissions -rw-r--r--
Add CLAUDE.md documentation and sync WordPress core files - Add comprehensive CLAUDE.md documentation file with project architecture, development setup, database operations, WordPress CLI usage, file sync procedures, and Mercurial commands - Update WordPress core files from wordpress/ to wp/ directory - Sync latest WordPress admin interface, includes, and core functionality - Update plugins: portfolio plugin with latest BWS framework and fancybox integration - Maintain custom configuration and theme files 🤖 Generated with [Claude Code](https://claude.ai/code) Co-Authored-By: Claude <noreply@anthropic.com>
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
     1
<?php
16
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
     2
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
     3
/////////////////////////////////////////////////////////////////
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
     4
/// getID3() by James Heinrich <info@getid3.org>               //
16
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
     5
//  available at https://github.com/JamesHeinrich/getID3       //
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
     6
//            or https://www.getid3.org                        //
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
     7
//            or http://getid3.sourceforge.net                 //
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
     8
//  see readme.txt for more details                            //
0
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.mp3.php                                        //
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    12
// module for analyzing MP3 files                              //
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    13
// dependencies: NONE                                          //
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    14
//                                                            ///
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    15
/////////////////////////////////////////////////////////////////
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    16
16
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
    17
if (!defined('GETID3_INCLUDEPATH')) { // prevent path-exposing attacks that access modules directly on public webservers
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
    18
	exit;
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
    19
}
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    20
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    21
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    22
class getid3_mp3 extends getid3_handler
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    23
{
16
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
    24
	/**
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
    25
	 * Forces getID3() to scan the file byte-by-byte and log all the valid audio frame headers - extremely slow,
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
    26
	 * unrecommended, but may provide data from otherwise-unusable files.
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
    27
	 *
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
    28
	 * @var bool
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
    29
	 */
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
    30
	public $allow_bruteforce = false;
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    31
16
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
    32
	/**
19
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
    33
	 * number of frames to scan to determine if MPEG-audio sequence is valid
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
    34
	 * Lower this number to 5-20 for faster scanning
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
    35
	 * Increase this number to 50+ for most accurate detection of valid VBR/CBR mpeg-audio streams
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
    36
	 *
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
    37
	 * @var int
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
    38
	 */
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
    39
	public $mp3_valid_check_frames = 50;
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
    40
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
    41
	/**
16
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
    42
	 * @return bool
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
    43
	 */
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    44
	public function Analyze() {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    45
		$info = &$this->getid3->info;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    46
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    47
		$initialOffset = $info['avdataoffset'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    48
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    49
		if (!$this->getOnlyMPEGaudioInfo($info['avdataoffset'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    50
			if ($this->allow_bruteforce) {
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
    51
				$this->error('Rescanning file in BruteForce mode');
16
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
    52
				$this->getOnlyMPEGaudioInfoBruteForce();
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
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    56
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    57
		if (isset($info['mpeg']['audio']['bitrate_mode'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    58
			$info['audio']['bitrate_mode'] = strtolower($info['mpeg']['audio']['bitrate_mode']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    59
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    60
19
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
    61
		$CurrentDataLAMEversionString = null;
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    62
		if (((isset($info['id3v2']['headerlength']) && ($info['avdataoffset'] > $info['id3v2']['headerlength'])) || (!isset($info['id3v2']) && ($info['avdataoffset'] > 0) && ($info['avdataoffset'] != $initialOffset)))) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    63
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    64
			$synchoffsetwarning = 'Unknown data before synch ';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    65
			if (isset($info['id3v2']['headerlength'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    66
				$synchoffsetwarning .= '(ID3v2 header ends at '.$info['id3v2']['headerlength'].', then '.($info['avdataoffset'] - $info['id3v2']['headerlength']).' bytes garbage, ';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    67
			} elseif ($initialOffset > 0) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    68
				$synchoffsetwarning .= '(should be at '.$initialOffset.', ';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    69
			} else {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    70
				$synchoffsetwarning .= '(should be at beginning of file, ';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    71
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    72
			$synchoffsetwarning .= 'synch detected at '.$info['avdataoffset'].')';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    73
			if (isset($info['audio']['bitrate_mode']) && ($info['audio']['bitrate_mode'] == 'cbr')) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    74
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    75
				if (!empty($info['id3v2']['headerlength']) && (($info['avdataoffset'] - $info['id3v2']['headerlength']) == $info['mpeg']['audio']['framelength'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    76
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    77
					$synchoffsetwarning .= '. This is a known problem with some versions of LAME (3.90-3.92) DLL in CBR mode.';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    78
					$info['audio']['codec'] = 'LAME';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    79
					$CurrentDataLAMEversionString = 'LAME3.';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    80
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    81
				} elseif (empty($info['id3v2']['headerlength']) && ($info['avdataoffset'] == $info['mpeg']['audio']['framelength'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    82
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    83
					$synchoffsetwarning .= '. This is a known problem with some versions of LAME (3.90 - 3.92) DLL in CBR mode.';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    84
					$info['audio']['codec'] = 'LAME';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    85
					$CurrentDataLAMEversionString = 'LAME3.';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    86
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    87
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    88
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    89
			}
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
    90
			$this->warning($synchoffsetwarning);
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    91
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    92
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    93
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    94
		if (isset($info['mpeg']['audio']['LAME'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    95
			$info['audio']['codec'] = 'LAME';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    96
			if (!empty($info['mpeg']['audio']['LAME']['long_version'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    97
				$info['audio']['encoder'] = rtrim($info['mpeg']['audio']['LAME']['long_version'], "\x00");
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    98
			} elseif (!empty($info['mpeg']['audio']['LAME']['short_version'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    99
				$info['audio']['encoder'] = rtrim($info['mpeg']['audio']['LAME']['short_version'], "\x00");
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   100
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   101
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   102
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   103
		$CurrentDataLAMEversionString = (!empty($CurrentDataLAMEversionString) ? $CurrentDataLAMEversionString : (isset($info['audio']['encoder']) ? $info['audio']['encoder'] : ''));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   104
		if (!empty($CurrentDataLAMEversionString) && (substr($CurrentDataLAMEversionString, 0, 6) == 'LAME3.') && !preg_match('[0-9\)]', substr($CurrentDataLAMEversionString, -1))) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   105
			// a version number of LAME that does not end with a number like "LAME3.92"
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   106
			// or with a closing parenthesis like "LAME3.88 (alpha)"
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   107
			// or a version of LAME with the LAMEtag-not-filled-in-DLL-mode bug (3.90-3.92)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   108
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   109
			// not sure what the actual last frame length will be, but will be less than or equal to 1441
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   110
			$PossiblyLongerLAMEversion_FrameLength = 1441;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   111
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   112
			// Not sure what version of LAME this is - look in padding of last frame for longer version string
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   113
			$PossibleLAMEversionStringOffset = $info['avdataend'] - $PossiblyLongerLAMEversion_FrameLength;
5
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   114
			$this->fseek($PossibleLAMEversionStringOffset);
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   115
			$PossiblyLongerLAMEversion_Data = $this->fread($PossiblyLongerLAMEversion_FrameLength);
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   116
			switch (substr($CurrentDataLAMEversionString, -1)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   117
				case 'a':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   118
				case 'b':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   119
					// "LAME3.94a" will have a longer version string of "LAME3.94 (alpha)" for example
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   120
					// need to trim off "a" to match longer string
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   121
					$CurrentDataLAMEversionString = substr($CurrentDataLAMEversionString, 0, -1);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   122
					break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   123
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   124
			if (($PossiblyLongerLAMEversion_String = strstr($PossiblyLongerLAMEversion_Data, $CurrentDataLAMEversionString)) !== false) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   125
				if (substr($PossiblyLongerLAMEversion_String, 0, strlen($CurrentDataLAMEversionString)) == $CurrentDataLAMEversionString) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   126
					$PossiblyLongerLAMEversion_NewString = substr($PossiblyLongerLAMEversion_String, 0, strspn($PossiblyLongerLAMEversion_String, 'LAME0123456789., (abcdefghijklmnopqrstuvwxyzJFSOND)')); //"LAME3.90.3"  "LAME3.87 (beta 1, Sep 27 2000)" "LAME3.88 (beta)"
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   127
					if (empty($info['audio']['encoder']) || (strlen($PossiblyLongerLAMEversion_NewString) > strlen($info['audio']['encoder']))) {
19
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   128
						if (!empty($info['audio']['encoder']) && !empty($info['mpeg']['audio']['LAME']['short_version']) && ($info['audio']['encoder'] == $info['mpeg']['audio']['LAME']['short_version'])) {
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   129
							if (preg_match('#^LAME[0-9\\.]+#', $PossiblyLongerLAMEversion_NewString, $matches)) {
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   130
								// "LAME3.100" -> "LAME3.100.1", but avoid including "(alpha)" and similar
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   131
								$info['mpeg']['audio']['LAME']['short_version'] = $matches[0];
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   132
							}
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   133
						}
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   134
						$info['audio']['encoder'] = $PossiblyLongerLAMEversion_NewString;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   135
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   136
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   137
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   138
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   139
		if (!empty($info['audio']['encoder'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   140
			$info['audio']['encoder'] = rtrim($info['audio']['encoder'], "\x00 ");
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   141
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   142
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   143
		switch (isset($info['mpeg']['audio']['layer']) ? $info['mpeg']['audio']['layer'] : '') {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   144
			case 1:
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   145
			case 2:
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   146
				$info['audio']['dataformat'] = 'mp'.$info['mpeg']['audio']['layer'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   147
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   148
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   149
		if (isset($info['fileformat']) && ($info['fileformat'] == 'mp3')) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   150
			switch ($info['audio']['dataformat']) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   151
				case 'mp1':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   152
				case 'mp2':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   153
				case 'mp3':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   154
					$info['fileformat'] = $info['audio']['dataformat'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   155
					break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   156
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   157
				default:
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   158
					$this->warning('Expecting [audio][dataformat] to be mp1/mp2/mp3 when fileformat == mp3, [audio][dataformat] actually "'.$info['audio']['dataformat'].'"');
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   159
					break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   160
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   161
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   162
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   163
		if (empty($info['fileformat'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   164
			unset($info['fileformat']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   165
			unset($info['audio']['bitrate_mode']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   166
			unset($info['avdataoffset']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   167
			unset($info['avdataend']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   168
			return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   169
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   170
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   171
		$info['mime_type']         = 'audio/mpeg';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   172
		$info['audio']['lossless'] = false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   173
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   174
		// Calculate playtime
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   175
		if (!isset($info['playtime_seconds']) && isset($info['audio']['bitrate']) && ($info['audio']['bitrate'] > 0)) {
16
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
   176
			// https://github.com/JamesHeinrich/getID3/issues/161
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
   177
			// VBR header frame contains ~0.026s of silent audio data, but is not actually part of the original encoding and should be ignored
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
   178
			$xingVBRheaderFrameLength = ((isset($info['mpeg']['audio']['VBR_frames']) && isset($info['mpeg']['audio']['framelength'])) ? $info['mpeg']['audio']['framelength'] : 0);
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
   179
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
   180
			$info['playtime_seconds'] = ($info['avdataend'] - $info['avdataoffset'] - $xingVBRheaderFrameLength) * 8 / $info['audio']['bitrate'];
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   181
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   182
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   183
		$info['audio']['encoder_options'] = $this->GuessEncoderOptions();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   184
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   185
		return true;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   186
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   187
16
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
   188
	/**
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
   189
	 * @return string
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
   190
	 */
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   191
	public function GuessEncoderOptions() {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   192
		// shortcuts
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   193
		$info = &$this->getid3->info;
16
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
   194
		$thisfile_mpeg_audio = array();
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
   195
		$thisfile_mpeg_audio_lame = array();
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   196
		if (!empty($info['mpeg']['audio'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   197
			$thisfile_mpeg_audio = &$info['mpeg']['audio'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   198
			if (!empty($thisfile_mpeg_audio['LAME'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   199
				$thisfile_mpeg_audio_lame = &$thisfile_mpeg_audio['LAME'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   200
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   201
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   202
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   203
		$encoder_options = '';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   204
		static $NamedPresetBitrates = array(16, 24, 40, 56, 112, 128, 160, 192, 256);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   205
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   206
		if (isset($thisfile_mpeg_audio['VBR_method']) && ($thisfile_mpeg_audio['VBR_method'] == 'Fraunhofer') && !empty($thisfile_mpeg_audio['VBR_quality'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   207
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   208
			$encoder_options = 'VBR q'.$thisfile_mpeg_audio['VBR_quality'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   209
16
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
   210
		} elseif (!empty($thisfile_mpeg_audio_lame['preset_used']) && isset($thisfile_mpeg_audio_lame['preset_used_id']) && (!in_array($thisfile_mpeg_audio_lame['preset_used_id'], $NamedPresetBitrates))) {
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   211
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   212
			$encoder_options = $thisfile_mpeg_audio_lame['preset_used'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   213
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   214
		} elseif (!empty($thisfile_mpeg_audio_lame['vbr_quality'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   215
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   216
			static $KnownEncoderValues = array();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   217
			if (empty($KnownEncoderValues)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   218
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   219
				//$KnownEncoderValues[abrbitrate_minbitrate][vbr_quality][raw_vbr_method][raw_noise_shaping][raw_stereo_mode][ath_type][lowpass_frequency] = 'preset name';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   220
				$KnownEncoderValues[0xFF][58][1][1][3][2][20500] = '--alt-preset insane';        // 3.90,   3.90.1, 3.92
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   221
				$KnownEncoderValues[0xFF][58][1][1][3][2][20600] = '--alt-preset insane';        // 3.90.2, 3.90.3, 3.91
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   222
				$KnownEncoderValues[0xFF][57][1][1][3][4][20500] = '--alt-preset insane';        // 3.94,   3.95
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   223
				$KnownEncoderValues['**'][78][3][2][3][2][19500] = '--alt-preset extreme';       // 3.90,   3.90.1, 3.92
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   224
				$KnownEncoderValues['**'][78][3][2][3][2][19600] = '--alt-preset extreme';       // 3.90.2, 3.91
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   225
				$KnownEncoderValues['**'][78][3][1][3][2][19600] = '--alt-preset extreme';       // 3.90.3
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   226
				$KnownEncoderValues['**'][78][4][2][3][2][19500] = '--alt-preset fast extreme';  // 3.90,   3.90.1, 3.92
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   227
				$KnownEncoderValues['**'][78][4][2][3][2][19600] = '--alt-preset fast extreme';  // 3.90.2, 3.90.3, 3.91
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   228
				$KnownEncoderValues['**'][78][3][2][3][4][19000] = '--alt-preset standard';      // 3.90,   3.90.1, 3.90.2, 3.91, 3.92
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   229
				$KnownEncoderValues['**'][78][3][1][3][4][19000] = '--alt-preset standard';      // 3.90.3
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   230
				$KnownEncoderValues['**'][78][4][2][3][4][19000] = '--alt-preset fast standard'; // 3.90,   3.90.1, 3.90.2, 3.91, 3.92
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   231
				$KnownEncoderValues['**'][78][4][1][3][4][19000] = '--alt-preset fast standard'; // 3.90.3
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   232
				$KnownEncoderValues['**'][88][4][1][3][3][19500] = '--r3mix';                    // 3.90,   3.90.1, 3.92
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   233
				$KnownEncoderValues['**'][88][4][1][3][3][19600] = '--r3mix';                    // 3.90.2, 3.90.3, 3.91
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   234
				$KnownEncoderValues['**'][67][4][1][3][4][18000] = '--r3mix';                    // 3.94,   3.95
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   235
				$KnownEncoderValues['**'][68][3][2][3][4][18000] = '--alt-preset medium';        // 3.90.3
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   236
				$KnownEncoderValues['**'][68][4][2][3][4][18000] = '--alt-preset fast medium';   // 3.90.3
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   237
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   238
				$KnownEncoderValues[0xFF][99][1][1][1][2][0]     = '--preset studio';            // 3.90,   3.90.1, 3.90.2, 3.91, 3.92
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   239
				$KnownEncoderValues[0xFF][58][2][1][3][2][20600] = '--preset studio';            // 3.90.3, 3.93.1
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   240
				$KnownEncoderValues[0xFF][58][2][1][3][2][20500] = '--preset studio';            // 3.93
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   241
				$KnownEncoderValues[0xFF][57][2][1][3][4][20500] = '--preset studio';            // 3.94,   3.95
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   242
				$KnownEncoderValues[0xC0][88][1][1][1][2][0]     = '--preset cd';                // 3.90,   3.90.1, 3.90.2,   3.91, 3.92
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   243
				$KnownEncoderValues[0xC0][58][2][2][3][2][19600] = '--preset cd';                // 3.90.3, 3.93.1
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   244
				$KnownEncoderValues[0xC0][58][2][2][3][2][19500] = '--preset cd';                // 3.93
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   245
				$KnownEncoderValues[0xC0][57][2][1][3][4][19500] = '--preset cd';                // 3.94,   3.95
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   246
				$KnownEncoderValues[0xA0][78][1][1][3][2][18000] = '--preset hifi';              // 3.90,   3.90.1, 3.90.2,   3.91, 3.92
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   247
				$KnownEncoderValues[0xA0][58][2][2][3][2][18000] = '--preset hifi';              // 3.90.3, 3.93,   3.93.1
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   248
				$KnownEncoderValues[0xA0][57][2][1][3][4][18000] = '--preset hifi';              // 3.94,   3.95
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   249
				$KnownEncoderValues[0x80][67][1][1][3][2][18000] = '--preset tape';              // 3.90,   3.90.1, 3.90.2,   3.91, 3.92
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   250
				$KnownEncoderValues[0x80][67][1][1][3][2][15000] = '--preset radio';             // 3.90,   3.90.1, 3.90.2,   3.91, 3.92
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   251
				$KnownEncoderValues[0x70][67][1][1][3][2][15000] = '--preset fm';                // 3.90,   3.90.1, 3.90.2,   3.91, 3.92
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   252
				$KnownEncoderValues[0x70][58][2][2][3][2][16000] = '--preset tape/radio/fm';     // 3.90.3, 3.93,   3.93.1
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   253
				$KnownEncoderValues[0x70][57][2][1][3][4][16000] = '--preset tape/radio/fm';     // 3.94,   3.95
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   254
				$KnownEncoderValues[0x38][58][2][2][0][2][10000] = '--preset voice';             // 3.90.3, 3.93,   3.93.1
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   255
				$KnownEncoderValues[0x38][57][2][1][0][4][15000] = '--preset voice';             // 3.94,   3.95
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   256
				$KnownEncoderValues[0x38][57][2][1][0][4][16000] = '--preset voice';             // 3.94a14
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   257
				$KnownEncoderValues[0x28][65][1][1][0][2][7500]  = '--preset mw-us';             // 3.90,   3.90.1, 3.92
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   258
				$KnownEncoderValues[0x28][65][1][1][0][2][7600]  = '--preset mw-us';             // 3.90.2, 3.91
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   259
				$KnownEncoderValues[0x28][58][2][2][0][2][7000]  = '--preset mw-us';             // 3.90.3, 3.93,   3.93.1
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   260
				$KnownEncoderValues[0x28][57][2][1][0][4][10500] = '--preset mw-us';             // 3.94,   3.95
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   261
				$KnownEncoderValues[0x28][57][2][1][0][4][11200] = '--preset mw-us';             // 3.94a14
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   262
				$KnownEncoderValues[0x28][57][2][1][0][4][8800]  = '--preset mw-us';             // 3.94a15
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   263
				$KnownEncoderValues[0x18][58][2][2][0][2][4000]  = '--preset phon+/lw/mw-eu/sw'; // 3.90.3, 3.93.1
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   264
				$KnownEncoderValues[0x18][58][2][2][0][2][3900]  = '--preset phon+/lw/mw-eu/sw'; // 3.93
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   265
				$KnownEncoderValues[0x18][57][2][1][0][4][5900]  = '--preset phon+/lw/mw-eu/sw'; // 3.94,   3.95
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   266
				$KnownEncoderValues[0x18][57][2][1][0][4][6200]  = '--preset phon+/lw/mw-eu/sw'; // 3.94a14
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   267
				$KnownEncoderValues[0x18][57][2][1][0][4][3200]  = '--preset phon+/lw/mw-eu/sw'; // 3.94a15
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   268
				$KnownEncoderValues[0x10][58][2][2][0][2][3800]  = '--preset phone';             // 3.90.3, 3.93.1
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   269
				$KnownEncoderValues[0x10][58][2][2][0][2][3700]  = '--preset phone';             // 3.93
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   270
				$KnownEncoderValues[0x10][57][2][1][0][4][5600]  = '--preset phone';             // 3.94,   3.95
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   271
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   272
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   273
			if (isset($KnownEncoderValues[$thisfile_mpeg_audio_lame['raw']['abrbitrate_minbitrate']][$thisfile_mpeg_audio_lame['vbr_quality']][$thisfile_mpeg_audio_lame['raw']['vbr_method']][$thisfile_mpeg_audio_lame['raw']['noise_shaping']][$thisfile_mpeg_audio_lame['raw']['stereo_mode']][$thisfile_mpeg_audio_lame['ath_type']][$thisfile_mpeg_audio_lame['lowpass_frequency']])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   274
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   275
				$encoder_options = $KnownEncoderValues[$thisfile_mpeg_audio_lame['raw']['abrbitrate_minbitrate']][$thisfile_mpeg_audio_lame['vbr_quality']][$thisfile_mpeg_audio_lame['raw']['vbr_method']][$thisfile_mpeg_audio_lame['raw']['noise_shaping']][$thisfile_mpeg_audio_lame['raw']['stereo_mode']][$thisfile_mpeg_audio_lame['ath_type']][$thisfile_mpeg_audio_lame['lowpass_frequency']];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   276
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   277
			} elseif (isset($KnownEncoderValues['**'][$thisfile_mpeg_audio_lame['vbr_quality']][$thisfile_mpeg_audio_lame['raw']['vbr_method']][$thisfile_mpeg_audio_lame['raw']['noise_shaping']][$thisfile_mpeg_audio_lame['raw']['stereo_mode']][$thisfile_mpeg_audio_lame['ath_type']][$thisfile_mpeg_audio_lame['lowpass_frequency']])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   278
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   279
				$encoder_options = $KnownEncoderValues['**'][$thisfile_mpeg_audio_lame['vbr_quality']][$thisfile_mpeg_audio_lame['raw']['vbr_method']][$thisfile_mpeg_audio_lame['raw']['noise_shaping']][$thisfile_mpeg_audio_lame['raw']['stereo_mode']][$thisfile_mpeg_audio_lame['ath_type']][$thisfile_mpeg_audio_lame['lowpass_frequency']];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   280
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   281
			} elseif ($info['audio']['bitrate_mode'] == 'vbr') {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   282
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   283
				// http://gabriel.mp3-tech.org/mp3infotag.html
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   284
				// int    Quality = (100 - 10 * gfp->VBR_q - gfp->quality)h
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   285
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   286
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   287
				$LAME_V_value = 10 - ceil($thisfile_mpeg_audio_lame['vbr_quality'] / 10);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   288
				$LAME_q_value = 100 - $thisfile_mpeg_audio_lame['vbr_quality'] - ($LAME_V_value * 10);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   289
				$encoder_options = '-V'.$LAME_V_value.' -q'.$LAME_q_value;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   290
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   291
			} elseif ($info['audio']['bitrate_mode'] == 'cbr') {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   292
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   293
				$encoder_options = strtoupper($info['audio']['bitrate_mode']).ceil($info['audio']['bitrate'] / 1000);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   294
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   295
			} else {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   296
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   297
				$encoder_options = strtoupper($info['audio']['bitrate_mode']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   298
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   299
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   300
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   301
		} elseif (!empty($thisfile_mpeg_audio_lame['bitrate_abr'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   302
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   303
			$encoder_options = 'ABR'.$thisfile_mpeg_audio_lame['bitrate_abr'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   304
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   305
		} elseif (!empty($info['audio']['bitrate'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   306
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   307
			if ($info['audio']['bitrate_mode'] == 'cbr') {
19
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   308
				$encoder_options = strtoupper($info['audio']['bitrate_mode']).round($info['audio']['bitrate'] / 1000);
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   309
			} else {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   310
				$encoder_options = strtoupper($info['audio']['bitrate_mode']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   311
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   312
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   313
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   314
		if (!empty($thisfile_mpeg_audio_lame['bitrate_min'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   315
			$encoder_options .= ' -b'.$thisfile_mpeg_audio_lame['bitrate_min'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   316
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   317
21
48c4eec2b7e6 Add CLAUDE.md documentation and sync WordPress core files
ymh <ymh.work@gmail.com>
parents: 19
diff changeset
   318
		if (isset($thisfile_mpeg_audio['bitrate']) && $thisfile_mpeg_audio['bitrate'] === 'free') {
48c4eec2b7e6 Add CLAUDE.md documentation and sync WordPress core files
ymh <ymh.work@gmail.com>
parents: 19
diff changeset
   319
			$encoder_options .= ' --freeformat';
48c4eec2b7e6 Add CLAUDE.md documentation and sync WordPress core files
ymh <ymh.work@gmail.com>
parents: 19
diff changeset
   320
		}
48c4eec2b7e6 Add CLAUDE.md documentation and sync WordPress core files
ymh <ymh.work@gmail.com>
parents: 19
diff changeset
   321
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   322
		if (!empty($thisfile_mpeg_audio_lame['encoding_flags']['nogap_prev']) || !empty($thisfile_mpeg_audio_lame['encoding_flags']['nogap_next'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   323
			$encoder_options .= ' --nogap';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   324
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   325
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   326
		if (!empty($thisfile_mpeg_audio_lame['lowpass_frequency'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   327
			$ExplodedOptions = explode(' ', $encoder_options, 4);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   328
			if ($ExplodedOptions[0] == '--r3mix') {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   329
				$ExplodedOptions[1] = 'r3mix';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   330
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   331
			switch ($ExplodedOptions[0]) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   332
				case '--preset':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   333
				case '--alt-preset':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   334
				case '--r3mix':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   335
					if ($ExplodedOptions[1] == 'fast') {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   336
						$ExplodedOptions[1] .= ' '.$ExplodedOptions[2];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   337
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   338
					switch ($ExplodedOptions[1]) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   339
						case 'portable':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   340
						case 'medium':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   341
						case 'standard':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   342
						case 'extreme':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   343
						case 'insane':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   344
						case 'fast portable':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   345
						case 'fast medium':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   346
						case 'fast standard':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   347
						case 'fast extreme':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   348
						case 'fast insane':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   349
						case 'r3mix':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   350
							static $ExpectedLowpass = array(
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   351
									'insane|20500'        => 20500,
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   352
									'insane|20600'        => 20600,  // 3.90.2, 3.90.3, 3.91
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   353
									'medium|18000'        => 18000,
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   354
									'fast medium|18000'   => 18000,
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   355
									'extreme|19500'       => 19500,  // 3.90,   3.90.1, 3.92, 3.95
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   356
									'extreme|19600'       => 19600,  // 3.90.2, 3.90.3, 3.91, 3.93.1
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   357
									'fast extreme|19500'  => 19500,  // 3.90,   3.90.1, 3.92, 3.95
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   358
									'fast extreme|19600'  => 19600,  // 3.90.2, 3.90.3, 3.91, 3.93.1
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   359
									'standard|19000'      => 19000,
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   360
									'fast standard|19000' => 19000,
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   361
									'r3mix|19500'         => 19500,  // 3.90,   3.90.1, 3.92
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   362
									'r3mix|19600'         => 19600,  // 3.90.2, 3.90.3, 3.91
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   363
									'r3mix|18000'         => 18000,  // 3.94,   3.95
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   364
								);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   365
							if (!isset($ExpectedLowpass[$ExplodedOptions[1].'|'.$thisfile_mpeg_audio_lame['lowpass_frequency']]) && ($thisfile_mpeg_audio_lame['lowpass_frequency'] < 22050) && (round($thisfile_mpeg_audio_lame['lowpass_frequency'] / 1000) < round($thisfile_mpeg_audio['sample_rate'] / 2000))) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   366
								$encoder_options .= ' --lowpass '.$thisfile_mpeg_audio_lame['lowpass_frequency'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   367
							}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   368
							break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   369
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   370
						default:
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
					break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   374
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   375
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   376
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   377
		if (isset($thisfile_mpeg_audio_lame['raw']['source_sample_freq'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   378
			if (($thisfile_mpeg_audio['sample_rate'] == 44100) && ($thisfile_mpeg_audio_lame['raw']['source_sample_freq'] != 1)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   379
				$encoder_options .= ' --resample 44100';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   380
			} elseif (($thisfile_mpeg_audio['sample_rate'] == 48000) && ($thisfile_mpeg_audio_lame['raw']['source_sample_freq'] != 2)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   381
				$encoder_options .= ' --resample 48000';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   382
			} elseif ($thisfile_mpeg_audio['sample_rate'] < 44100) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   383
				switch ($thisfile_mpeg_audio_lame['raw']['source_sample_freq']) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   384
					case 0: // <= 32000
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   385
						// may or may not be same as source frequency - ignore
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   386
						break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   387
					case 1: // 44100
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   388
					case 2: // 48000
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   389
					case 3: // 48000+
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   390
						$ExplodedOptions = explode(' ', $encoder_options, 4);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   391
						switch ($ExplodedOptions[0]) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   392
							case '--preset':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   393
							case '--alt-preset':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   394
								switch ($ExplodedOptions[1]) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   395
									case 'fast':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   396
									case 'portable':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   397
									case 'medium':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   398
									case 'standard':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   399
									case 'extreme':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   400
									case 'insane':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   401
										$encoder_options .= ' --resample '.$thisfile_mpeg_audio['sample_rate'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   402
										break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   403
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   404
									default:
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   405
										static $ExpectedResampledRate = array(
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   406
												'phon+/lw/mw-eu/sw|16000' => 16000,
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   407
												'mw-us|24000'             => 24000, // 3.95
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   408
												'mw-us|32000'             => 32000, // 3.93
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   409
												'mw-us|16000'             => 16000, // 3.92
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   410
												'phone|16000'             => 16000,
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   411
												'phone|11025'             => 11025, // 3.94a15
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   412
												'radio|32000'             => 32000, // 3.94a15
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   413
												'fm/radio|32000'          => 32000, // 3.92
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   414
												'fm|32000'                => 32000, // 3.90
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   415
												'voice|32000'             => 32000);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   416
										if (!isset($ExpectedResampledRate[$ExplodedOptions[1].'|'.$thisfile_mpeg_audio['sample_rate']])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   417
											$encoder_options .= ' --resample '.$thisfile_mpeg_audio['sample_rate'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   418
										}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   419
										break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   420
								}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   421
								break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   422
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   423
							case '--r3mix':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   424
							default:
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   425
								$encoder_options .= ' --resample '.$thisfile_mpeg_audio['sample_rate'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   426
								break;
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
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   431
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   432
		if (empty($encoder_options) && !empty($info['audio']['bitrate']) && !empty($info['audio']['bitrate_mode'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   433
			//$encoder_options = strtoupper($info['audio']['bitrate_mode']).ceil($info['audio']['bitrate'] / 1000);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   434
			$encoder_options = strtoupper($info['audio']['bitrate_mode']);
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
		return $encoder_options;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   438
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   439
16
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
   440
	/**
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
   441
	 * @param int   $offset
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
   442
	 * @param array $info
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
   443
	 * @param bool  $recursivesearch
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
   444
	 * @param bool  $ScanAsCBR
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
   445
	 * @param bool  $FastMPEGheaderScan
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
   446
	 *
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
   447
	 * @return bool
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
   448
	 */
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   449
	public function decodeMPEGaudioHeader($offset, &$info, $recursivesearch=true, $ScanAsCBR=false, $FastMPEGheaderScan=false) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   450
		static $MPEGaudioVersionLookup;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   451
		static $MPEGaudioLayerLookup;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   452
		static $MPEGaudioBitrateLookup;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   453
		static $MPEGaudioFrequencyLookup;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   454
		static $MPEGaudioChannelModeLookup;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   455
		static $MPEGaudioModeExtensionLookup;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   456
		static $MPEGaudioEmphasisLookup;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   457
		if (empty($MPEGaudioVersionLookup)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   458
			$MPEGaudioVersionLookup       = self::MPEGaudioVersionArray();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   459
			$MPEGaudioLayerLookup         = self::MPEGaudioLayerArray();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   460
			$MPEGaudioBitrateLookup       = self::MPEGaudioBitrateArray();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   461
			$MPEGaudioFrequencyLookup     = self::MPEGaudioFrequencyArray();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   462
			$MPEGaudioChannelModeLookup   = self::MPEGaudioChannelModeArray();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   463
			$MPEGaudioModeExtensionLookup = self::MPEGaudioModeExtensionArray();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   464
			$MPEGaudioEmphasisLookup      = self::MPEGaudioEmphasisArray();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   465
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   466
5
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   467
		if ($this->fseek($offset) != 0) {
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   468
			$this->error('decodeMPEGaudioHeader() failed to seek to next offset at '.$offset);
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   469
			return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   470
		}
5
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   471
		//$headerstring = $this->fread(1441); // worst-case max length = 32kHz @ 320kbps layer 3 = 1441 bytes/frame
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   472
		$headerstring = $this->fread(226); // LAME header at offset 36 + 190 bytes of Xing/LAME data
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   473
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   474
		// MP3 audio frame structure:
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   475
		// $aa $aa $aa $aa [$bb $bb] $cc...
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   476
		// where $aa..$aa is the four-byte mpeg-audio header (below)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   477
		// $bb $bb is the optional 2-byte CRC
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   478
		// and $cc... is the audio data
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   479
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   480
		$head4 = substr($headerstring, 0, 4);
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   481
		$head4_key = getid3_lib::PrintHexBytes($head4, true, false, false);
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   482
		static $MPEGaudioHeaderDecodeCache = array();
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   483
		if (isset($MPEGaudioHeaderDecodeCache[$head4_key])) {
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   484
			$MPEGheaderRawArray = $MPEGaudioHeaderDecodeCache[$head4_key];
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   485
		} else {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   486
			$MPEGheaderRawArray = self::MPEGaudioHeaderDecode($head4);
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   487
			$MPEGaudioHeaderDecodeCache[$head4_key] = $MPEGheaderRawArray;
0
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
		static $MPEGaudioHeaderValidCache = array();
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   491
		if (!isset($MPEGaudioHeaderValidCache[$head4_key])) { // Not in cache
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   492
			//$MPEGaudioHeaderValidCache[$head4_key] = self::MPEGaudioHeaderValid($MPEGheaderRawArray, false, true);  // allow badly-formatted freeformat (from LAME 3.90 - 3.93.1)
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   493
			$MPEGaudioHeaderValidCache[$head4_key] = self::MPEGaudioHeaderValid($MPEGheaderRawArray, false, false);
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   494
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   495
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   496
		// shortcut
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   497
		if (!isset($info['mpeg']['audio'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   498
			$info['mpeg']['audio'] = array();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   499
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   500
		$thisfile_mpeg_audio = &$info['mpeg']['audio'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   501
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   502
		if ($MPEGaudioHeaderValidCache[$head4_key]) {
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   503
			$thisfile_mpeg_audio['raw'] = $MPEGheaderRawArray;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   504
		} else {
19
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   505
			$this->warning('Invalid MPEG audio header ('.getid3_lib::PrintHexBytes($head4).') at offset '.$offset);
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   506
			return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   507
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   508
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   509
		if (!$FastMPEGheaderScan) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   510
			$thisfile_mpeg_audio['version']       = $MPEGaudioVersionLookup[$thisfile_mpeg_audio['raw']['version']];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   511
			$thisfile_mpeg_audio['layer']         = $MPEGaudioLayerLookup[$thisfile_mpeg_audio['raw']['layer']];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   512
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   513
			$thisfile_mpeg_audio['channelmode']   = $MPEGaudioChannelModeLookup[$thisfile_mpeg_audio['raw']['channelmode']];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   514
			$thisfile_mpeg_audio['channels']      = (($thisfile_mpeg_audio['channelmode'] == 'mono') ? 1 : 2);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   515
			$thisfile_mpeg_audio['sample_rate']   = $MPEGaudioFrequencyLookup[$thisfile_mpeg_audio['version']][$thisfile_mpeg_audio['raw']['sample_rate']];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   516
			$thisfile_mpeg_audio['protection']    = !$thisfile_mpeg_audio['raw']['protection'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   517
			$thisfile_mpeg_audio['private']       = (bool) $thisfile_mpeg_audio['raw']['private'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   518
			$thisfile_mpeg_audio['modeextension'] = $MPEGaudioModeExtensionLookup[$thisfile_mpeg_audio['layer']][$thisfile_mpeg_audio['raw']['modeextension']];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   519
			$thisfile_mpeg_audio['copyright']     = (bool) $thisfile_mpeg_audio['raw']['copyright'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   520
			$thisfile_mpeg_audio['original']      = (bool) $thisfile_mpeg_audio['raw']['original'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   521
			$thisfile_mpeg_audio['emphasis']      = $MPEGaudioEmphasisLookup[$thisfile_mpeg_audio['raw']['emphasis']];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   522
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   523
			$info['audio']['channels']    = $thisfile_mpeg_audio['channels'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   524
			$info['audio']['sample_rate'] = $thisfile_mpeg_audio['sample_rate'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   525
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   526
			if ($thisfile_mpeg_audio['protection']) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   527
				$thisfile_mpeg_audio['crc'] = getid3_lib::BigEndian2Int(substr($headerstring, 4, 2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   528
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   529
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   530
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   531
		if ($thisfile_mpeg_audio['raw']['bitrate'] == 15) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   532
			// http://www.hydrogenaudio.org/?act=ST&f=16&t=9682&st=0
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   533
			$this->warning('Invalid bitrate index (15), this is a known bug in free-format MP3s encoded by LAME v3.90 - 3.93.1');
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   534
			$thisfile_mpeg_audio['raw']['bitrate'] = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   535
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   536
		$thisfile_mpeg_audio['padding'] = (bool) $thisfile_mpeg_audio['raw']['padding'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   537
		$thisfile_mpeg_audio['bitrate'] = $MPEGaudioBitrateLookup[$thisfile_mpeg_audio['version']][$thisfile_mpeg_audio['layer']][$thisfile_mpeg_audio['raw']['bitrate']];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   538
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   539
		if (($thisfile_mpeg_audio['bitrate'] == 'free') && ($offset == $info['avdataoffset'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   540
			// only skip multiple frame check if free-format bitstream found at beginning of file
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   541
			// otherwise is quite possibly simply corrupted data
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   542
			$recursivesearch = false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   543
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   544
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   545
		// For Layer 2 there are some combinations of bitrate and mode which are not allowed.
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   546
		if (!$FastMPEGheaderScan && ($thisfile_mpeg_audio['layer'] == '2')) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   547
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   548
			$info['audio']['dataformat'] = 'mp2';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   549
			switch ($thisfile_mpeg_audio['channelmode']) {
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 'mono':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   552
					if (($thisfile_mpeg_audio['bitrate'] == 'free') || ($thisfile_mpeg_audio['bitrate'] <= 192000)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   553
						// these are ok
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   554
					} else {
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   555
						$this->error($thisfile_mpeg_audio['bitrate'].'kbps not allowed in Layer 2, '.$thisfile_mpeg_audio['channelmode'].'.');
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   556
						return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   557
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   558
					break;
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 'stereo':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   561
				case 'joint stereo':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   562
				case 'dual channel':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   563
					if (($thisfile_mpeg_audio['bitrate'] == 'free') || ($thisfile_mpeg_audio['bitrate'] == 64000) || ($thisfile_mpeg_audio['bitrate'] >= 96000)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   564
						// these are ok
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   565
					} else {
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   566
						$this->error(intval(round($thisfile_mpeg_audio['bitrate'] / 1000)).'kbps not allowed in Layer 2, '.$thisfile_mpeg_audio['channelmode'].'.');
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   567
						return false;
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
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   573
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   574
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   575
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   576
		if ($info['audio']['sample_rate'] > 0) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   577
			$thisfile_mpeg_audio['framelength'] = self::MPEGaudioFrameLength($thisfile_mpeg_audio['bitrate'], $thisfile_mpeg_audio['version'], $thisfile_mpeg_audio['layer'], (int) $thisfile_mpeg_audio['padding'], $info['audio']['sample_rate']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   578
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   579
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   580
		$nextframetestoffset = $offset + 1;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   581
		if ($thisfile_mpeg_audio['bitrate'] != 'free') {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   582
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   583
			$info['audio']['bitrate'] = $thisfile_mpeg_audio['bitrate'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   584
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   585
			if (isset($thisfile_mpeg_audio['framelength'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   586
				$nextframetestoffset = $offset + $thisfile_mpeg_audio['framelength'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   587
			} else {
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   588
				$this->error('Frame at offset('.$offset.') is has an invalid frame length.');
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   589
				return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   590
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   591
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   592
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   593
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   594
		$ExpectedNumberOfAudioBytes = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   595
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   596
		////////////////////////////////////////////////////////////////////////////////////
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   597
		// Variable-bitrate headers
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   598
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   599
		if (substr($headerstring, 4 + 32, 4) == 'VBRI') {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   600
			// Fraunhofer VBR header is hardcoded 'VBRI' at offset 0x24 (36)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   601
			// specs taken from http://minnie.tuhs.org/pipermail/mp3encoder/2001-January/001800.html
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   602
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   603
			$thisfile_mpeg_audio['bitrate_mode'] = 'vbr';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   604
			$thisfile_mpeg_audio['VBR_method']   = 'Fraunhofer';
16
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
   605
			$info['audio']['codec']              = 'Fraunhofer';
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   606
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   607
			$SideInfoData = substr($headerstring, 4 + 2, 32);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   608
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   609
			$FraunhoferVBROffset = 36;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   610
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   611
			$thisfile_mpeg_audio['VBR_encoder_version']     = getid3_lib::BigEndian2Int(substr($headerstring, $FraunhoferVBROffset +  4, 2)); // VbriVersion
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   612
			$thisfile_mpeg_audio['VBR_encoder_delay']       = getid3_lib::BigEndian2Int(substr($headerstring, $FraunhoferVBROffset +  6, 2)); // VbriDelay
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   613
			$thisfile_mpeg_audio['VBR_quality']             = getid3_lib::BigEndian2Int(substr($headerstring, $FraunhoferVBROffset +  8, 2)); // VbriQuality
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   614
			$thisfile_mpeg_audio['VBR_bytes']               = getid3_lib::BigEndian2Int(substr($headerstring, $FraunhoferVBROffset + 10, 4)); // VbriStreamBytes
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   615
			$thisfile_mpeg_audio['VBR_frames']              = getid3_lib::BigEndian2Int(substr($headerstring, $FraunhoferVBROffset + 14, 4)); // VbriStreamFrames
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   616
			$thisfile_mpeg_audio['VBR_seek_offsets']        = getid3_lib::BigEndian2Int(substr($headerstring, $FraunhoferVBROffset + 18, 2)); // VbriTableSize
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   617
			$thisfile_mpeg_audio['VBR_seek_scale']          = getid3_lib::BigEndian2Int(substr($headerstring, $FraunhoferVBROffset + 20, 2)); // VbriTableScale
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   618
			$thisfile_mpeg_audio['VBR_entry_bytes']         = getid3_lib::BigEndian2Int(substr($headerstring, $FraunhoferVBROffset + 22, 2)); // VbriEntryBytes
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   619
			$thisfile_mpeg_audio['VBR_entry_frames']        = getid3_lib::BigEndian2Int(substr($headerstring, $FraunhoferVBROffset + 24, 2)); // VbriEntryFrames
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   620
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   621
			$ExpectedNumberOfAudioBytes = $thisfile_mpeg_audio['VBR_bytes'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   622
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   623
			$previousbyteoffset = $offset;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   624
			for ($i = 0; $i < $thisfile_mpeg_audio['VBR_seek_offsets']; $i++) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   625
				$Fraunhofer_OffsetN = getid3_lib::BigEndian2Int(substr($headerstring, $FraunhoferVBROffset, $thisfile_mpeg_audio['VBR_entry_bytes']));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   626
				$FraunhoferVBROffset += $thisfile_mpeg_audio['VBR_entry_bytes'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   627
				$thisfile_mpeg_audio['VBR_offsets_relative'][$i] = ($Fraunhofer_OffsetN * $thisfile_mpeg_audio['VBR_seek_scale']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   628
				$thisfile_mpeg_audio['VBR_offsets_absolute'][$i] = ($Fraunhofer_OffsetN * $thisfile_mpeg_audio['VBR_seek_scale']) + $previousbyteoffset;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   629
				$previousbyteoffset += $Fraunhofer_OffsetN;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   630
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   631
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   632
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   633
		} else {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   634
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   635
			// Xing VBR header is hardcoded 'Xing' at a offset 0x0D (13), 0x15 (21) or 0x24 (36)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   636
			// depending on MPEG layer and number of channels
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   637
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   638
			$VBRidOffset = self::XingVBRidOffset($thisfile_mpeg_audio['version'], $thisfile_mpeg_audio['channelmode']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   639
			$SideInfoData = substr($headerstring, 4 + 2, $VBRidOffset - 4);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   640
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   641
			if ((substr($headerstring, $VBRidOffset, strlen('Xing')) == 'Xing') || (substr($headerstring, $VBRidOffset, strlen('Info')) == 'Info')) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   642
				// 'Xing' is traditional Xing VBR frame
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   643
				// 'Info' is LAME-encoded CBR (This was done to avoid CBR files to be recognized as traditional Xing VBR files by some decoders.)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   644
				// 'Info' *can* legally be used to specify a VBR file as well, however.
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   645
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   646
				// http://www.multiweb.cz/twoinches/MP3inside.htm
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   647
				//00..03 = "Xing" or "Info"
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   648
				//04..07 = Flags:
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   649
				//  0x01  Frames Flag     set if value for number of frames in file is stored
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   650
				//  0x02  Bytes Flag      set if value for filesize in bytes is stored
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   651
				//  0x04  TOC Flag        set if values for TOC are stored
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   652
				//  0x08  VBR Scale Flag  set if values for VBR scale is stored
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   653
				//08..11  Frames: Number of frames in file (including the first Xing/Info one)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   654
				//12..15  Bytes:  File length in Bytes
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   655
				//16..115  TOC (Table of Contents):
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   656
				//  Contains of 100 indexes (one Byte length) for easier lookup in file. Approximately solves problem with moving inside file.
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   657
				//  Each Byte has a value according this formula:
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   658
				//  (TOC[i] / 256) * fileLenInBytes
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   659
				//  So if song lasts eg. 240 sec. and you want to jump to 60. sec. (and file is 5 000 000 Bytes length) you can use:
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   660
				//  TOC[(60/240)*100] = TOC[25]
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   661
				//  and corresponding Byte in file is then approximately at:
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   662
				//  (TOC[25]/256) * 5000000
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   663
				//116..119  VBR Scale
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   664
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   665
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   666
				// should be safe to leave this at 'vbr' and let it be overriden to 'cbr' if a CBR preset/mode is used by LAME
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   667
//				if (substr($headerstring, $VBRidOffset, strlen('Info')) == 'Xing') {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   668
					$thisfile_mpeg_audio['bitrate_mode'] = 'vbr';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   669
					$thisfile_mpeg_audio['VBR_method']   = 'Xing';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   670
//				} else {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   671
//					$ScanAsCBR = true;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   672
//					$thisfile_mpeg_audio['bitrate_mode'] = 'cbr';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   673
//				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   674
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   675
				$thisfile_mpeg_audio['xing_flags_raw'] = getid3_lib::BigEndian2Int(substr($headerstring, $VBRidOffset + 4, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   676
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   677
				$thisfile_mpeg_audio['xing_flags']['frames']    = (bool) ($thisfile_mpeg_audio['xing_flags_raw'] & 0x00000001);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   678
				$thisfile_mpeg_audio['xing_flags']['bytes']     = (bool) ($thisfile_mpeg_audio['xing_flags_raw'] & 0x00000002);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   679
				$thisfile_mpeg_audio['xing_flags']['toc']       = (bool) ($thisfile_mpeg_audio['xing_flags_raw'] & 0x00000004);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   680
				$thisfile_mpeg_audio['xing_flags']['vbr_scale'] = (bool) ($thisfile_mpeg_audio['xing_flags_raw'] & 0x00000008);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   681
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   682
				if ($thisfile_mpeg_audio['xing_flags']['frames']) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   683
					$thisfile_mpeg_audio['VBR_frames'] = getid3_lib::BigEndian2Int(substr($headerstring, $VBRidOffset +  8, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   684
					//$thisfile_mpeg_audio['VBR_frames']--; // don't count header Xing/Info frame
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   685
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   686
				if ($thisfile_mpeg_audio['xing_flags']['bytes']) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   687
					$thisfile_mpeg_audio['VBR_bytes']  = getid3_lib::BigEndian2Int(substr($headerstring, $VBRidOffset + 12, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   688
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   689
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   690
				//if (($thisfile_mpeg_audio['bitrate'] == 'free') && !empty($thisfile_mpeg_audio['VBR_frames']) && !empty($thisfile_mpeg_audio['VBR_bytes'])) {
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   691
				//if (!empty($thisfile_mpeg_audio['VBR_frames']) && !empty($thisfile_mpeg_audio['VBR_bytes'])) {
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   692
				if (!empty($thisfile_mpeg_audio['VBR_frames'])) {
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   693
					$used_filesize  = 0;
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   694
					if (!empty($thisfile_mpeg_audio['VBR_bytes'])) {
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   695
						$used_filesize = $thisfile_mpeg_audio['VBR_bytes'];
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   696
					} elseif (!empty($info['filesize'])) {
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   697
						$used_filesize  = $info['filesize'];
16
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
   698
						$used_filesize -= (isset($info['id3v2']['headerlength']) ? intval($info['id3v2']['headerlength']) : 0);
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   699
						$used_filesize -= (isset($info['id3v1']) ? 128 : 0);
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   700
						$used_filesize -= (isset($info['tag_offset_end']) ? $info['tag_offset_end'] - $info['tag_offset_start'] : 0);
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   701
						$this->warning('MP3.Xing header missing VBR_bytes, assuming MPEG audio portion of file is '.number_format($used_filesize).' bytes');
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   702
					}
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   703
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   704
					$framelengthfloat = $used_filesize / $thisfile_mpeg_audio['VBR_frames'];
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   705
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   706
					if ($thisfile_mpeg_audio['layer'] == '1') {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   707
						// BitRate = (((FrameLengthInBytes / 4) - Padding) * SampleRate) / 12
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   708
						//$info['audio']['bitrate'] = ((($framelengthfloat / 4) - intval($thisfile_mpeg_audio['padding'])) * $thisfile_mpeg_audio['sample_rate']) / 12;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   709
						$info['audio']['bitrate'] = ($framelengthfloat / 4) * $thisfile_mpeg_audio['sample_rate'] * (2 / $info['audio']['channels']) / 12;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   710
					} else {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   711
						// Bitrate = ((FrameLengthInBytes - Padding) * SampleRate) / 144
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   712
						//$info['audio']['bitrate'] = (($framelengthfloat - intval($thisfile_mpeg_audio['padding'])) * $thisfile_mpeg_audio['sample_rate']) / 144;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   713
						$info['audio']['bitrate'] = $framelengthfloat * $thisfile_mpeg_audio['sample_rate'] * (2 / $info['audio']['channels']) / 144;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   714
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   715
					$thisfile_mpeg_audio['framelength'] = floor($framelengthfloat);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   716
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   717
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   718
				if ($thisfile_mpeg_audio['xing_flags']['toc']) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   719
					$LAMEtocData = substr($headerstring, $VBRidOffset + 16, 100);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   720
					for ($i = 0; $i < 100; $i++) {
16
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
   721
						$thisfile_mpeg_audio['toc'][$i] = ord($LAMEtocData[$i]);
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   722
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   723
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   724
				if ($thisfile_mpeg_audio['xing_flags']['vbr_scale']) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   725
					$thisfile_mpeg_audio['VBR_scale'] = getid3_lib::BigEndian2Int(substr($headerstring, $VBRidOffset + 116, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   726
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   727
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   728
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   729
				// http://gabriel.mp3-tech.org/mp3infotag.html
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   730
				if (substr($headerstring, $VBRidOffset + 120, 4) == 'LAME') {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   731
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   732
					// shortcut
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   733
					$thisfile_mpeg_audio['LAME'] = array();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   734
					$thisfile_mpeg_audio_lame    = &$thisfile_mpeg_audio['LAME'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   735
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   736
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   737
					$thisfile_mpeg_audio_lame['long_version']  = substr($headerstring, $VBRidOffset + 120, 20);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   738
					$thisfile_mpeg_audio_lame['short_version'] = substr($thisfile_mpeg_audio_lame['long_version'], 0, 9);
19
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   739
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   740
					//$thisfile_mpeg_audio_lame['numeric_version'] = str_replace('LAME', '', $thisfile_mpeg_audio_lame['short_version']);
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   741
					$thisfile_mpeg_audio_lame['numeric_version'] = '';
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   742
					if (preg_match('#^LAME([0-9\\.a-z]*)#', $thisfile_mpeg_audio_lame['long_version'], $matches)) {
16
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
   743
						$thisfile_mpeg_audio_lame['short_version']   = $matches[0];
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
   744
						$thisfile_mpeg_audio_lame['numeric_version'] = $matches[1];
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
   745
					}
19
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   746
					if (strlen($thisfile_mpeg_audio_lame['numeric_version']) > 0) {
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   747
						foreach (explode('.', $thisfile_mpeg_audio_lame['numeric_version']) as $key => $number) {
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   748
							$thisfile_mpeg_audio_lame['integer_version'][$key] = intval($number);
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   749
						}
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   750
						//if ($thisfile_mpeg_audio_lame['short_version'] >= 'LAME3.90') {
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   751
						if ((($thisfile_mpeg_audio_lame['integer_version'][0] * 1000) + $thisfile_mpeg_audio_lame['integer_version'][1]) >= 3090) { // cannot use string version compare, may have "LAME3.90" or "LAME3.100" -- see https://github.com/JamesHeinrich/getID3/issues/207
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   752
19
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   753
							// extra 11 chars are not part of version string when LAMEtag present
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   754
							unset($thisfile_mpeg_audio_lame['long_version']);
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   755
19
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   756
							// It the LAME tag was only introduced in LAME v3.90
21
48c4eec2b7e6 Add CLAUDE.md documentation and sync WordPress core files
ymh <ymh.work@gmail.com>
parents: 19
diff changeset
   757
							// https://wiki.hydrogenaud.io/index.php/LAME#VBR_header_and_LAME_tag
48c4eec2b7e6 Add CLAUDE.md documentation and sync WordPress core files
ymh <ymh.work@gmail.com>
parents: 19
diff changeset
   758
							// https://hydrogenaud.io/index.php?topic=9933
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   759
19
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   760
							// Offsets of various bytes in http://gabriel.mp3-tech.org/mp3infotag.html
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   761
							// are assuming a 'Xing' identifier offset of 0x24, which is the case for
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   762
							// MPEG-1 non-mono, but not for other combinations
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   763
							$LAMEtagOffsetContant = $VBRidOffset - 0x24;
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   764
19
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   765
							// shortcuts
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   766
							$thisfile_mpeg_audio_lame['RGAD']    = array('track'=>array(), 'album'=>array());
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   767
							$thisfile_mpeg_audio_lame_RGAD       = &$thisfile_mpeg_audio_lame['RGAD'];
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   768
							$thisfile_mpeg_audio_lame_RGAD_track = &$thisfile_mpeg_audio_lame_RGAD['track'];
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   769
							$thisfile_mpeg_audio_lame_RGAD_album = &$thisfile_mpeg_audio_lame_RGAD['album'];
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   770
							$thisfile_mpeg_audio_lame['raw'] = array();
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   771
							$thisfile_mpeg_audio_lame_raw    = &$thisfile_mpeg_audio_lame['raw'];
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   772
19
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   773
							// byte $9B  VBR Quality
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   774
							// This field is there to indicate a quality level, although the scale was not precised in the original Xing specifications.
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   775
							// Actually overwrites original Xing bytes
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   776
							unset($thisfile_mpeg_audio['VBR_scale']);
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   777
							$thisfile_mpeg_audio_lame['vbr_quality'] = getid3_lib::BigEndian2Int(substr($headerstring, $LAMEtagOffsetContant + 0x9B, 1));
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   778
19
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   779
							// bytes $9C-$A4  Encoder short VersionString
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   780
							$thisfile_mpeg_audio_lame['short_version'] = substr($headerstring, $LAMEtagOffsetContant + 0x9C, 9);
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   781
19
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   782
							// byte $A5  Info Tag revision + VBR method
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   783
							$LAMEtagRevisionVBRmethod = getid3_lib::BigEndian2Int(substr($headerstring, $LAMEtagOffsetContant + 0xA5, 1));
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   784
19
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   785
							$thisfile_mpeg_audio_lame['tag_revision']   = ($LAMEtagRevisionVBRmethod & 0xF0) >> 4;
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   786
							$thisfile_mpeg_audio_lame_raw['vbr_method'] =  $LAMEtagRevisionVBRmethod & 0x0F;
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   787
							$thisfile_mpeg_audio_lame['vbr_method']     = self::LAMEvbrMethodLookup($thisfile_mpeg_audio_lame_raw['vbr_method']);
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   788
							$thisfile_mpeg_audio['bitrate_mode']        = substr($thisfile_mpeg_audio_lame['vbr_method'], 0, 3); // usually either 'cbr' or 'vbr', but truncates 'vbr-old / vbr-rh' to 'vbr'
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   789
19
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   790
							// byte $A6  Lowpass filter value
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   791
							$thisfile_mpeg_audio_lame['lowpass_frequency'] = getid3_lib::BigEndian2Int(substr($headerstring, $LAMEtagOffsetContant + 0xA6, 1)) * 100;
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   792
19
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   793
							// bytes $A7-$AE  Replay Gain
21
48c4eec2b7e6 Add CLAUDE.md documentation and sync WordPress core files
ymh <ymh.work@gmail.com>
parents: 19
diff changeset
   794
							// https://web.archive.org/web/20021015212753/http://privatewww.essex.ac.uk/~djmrob/replaygain/rg_data_format.html
19
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   795
							// bytes $A7-$AA : 32 bit floating point "Peak signal amplitude"
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   796
							if ($thisfile_mpeg_audio_lame['short_version'] >= 'LAME3.94b') {
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   797
								// LAME 3.94a16 and later - 9.23 fixed point
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   798
								// ie 0x0059E2EE / (2^23) = 5890798 / 8388608 = 0.7022378444671630859375
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   799
								$thisfile_mpeg_audio_lame_RGAD['peak_amplitude'] = (float) ((getid3_lib::BigEndian2Int(substr($headerstring, $LAMEtagOffsetContant + 0xA7, 4))) / 8388608);
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   800
							} else {
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   801
								// LAME 3.94a15 and earlier - 32-bit floating point
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   802
								// Actually 3.94a16 will fall in here too and be WRONG, but is hard to detect 3.94a16 vs 3.94a15
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   803
								$thisfile_mpeg_audio_lame_RGAD['peak_amplitude'] = getid3_lib::LittleEndian2Float(substr($headerstring, $LAMEtagOffsetContant + 0xA7, 4));
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   804
							}
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   805
							if ($thisfile_mpeg_audio_lame_RGAD['peak_amplitude'] == 0) {
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   806
								unset($thisfile_mpeg_audio_lame_RGAD['peak_amplitude']);
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   807
							} else {
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   808
								$thisfile_mpeg_audio_lame_RGAD['peak_db'] = getid3_lib::RGADamplitude2dB($thisfile_mpeg_audio_lame_RGAD['peak_amplitude']);
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   809
							}
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   810
19
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   811
							$thisfile_mpeg_audio_lame_raw['RGAD_track']      =   getid3_lib::BigEndian2Int(substr($headerstring, $LAMEtagOffsetContant + 0xAB, 2));
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   812
							$thisfile_mpeg_audio_lame_raw['RGAD_album']      =   getid3_lib::BigEndian2Int(substr($headerstring, $LAMEtagOffsetContant + 0xAD, 2));
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   813
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   814
19
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   815
							if ($thisfile_mpeg_audio_lame_raw['RGAD_track'] != 0) {
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   816
19
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   817
								$thisfile_mpeg_audio_lame_RGAD_track['raw']['name']        = ($thisfile_mpeg_audio_lame_raw['RGAD_track'] & 0xE000) >> 13;
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   818
								$thisfile_mpeg_audio_lame_RGAD_track['raw']['originator']  = ($thisfile_mpeg_audio_lame_raw['RGAD_track'] & 0x1C00) >> 10;
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   819
								$thisfile_mpeg_audio_lame_RGAD_track['raw']['sign_bit']    = ($thisfile_mpeg_audio_lame_raw['RGAD_track'] & 0x0200) >> 9;
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   820
								$thisfile_mpeg_audio_lame_RGAD_track['raw']['gain_adjust'] =  $thisfile_mpeg_audio_lame_raw['RGAD_track'] & 0x01FF;
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   821
								$thisfile_mpeg_audio_lame_RGAD_track['name']       = getid3_lib::RGADnameLookup($thisfile_mpeg_audio_lame_RGAD_track['raw']['name']);
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   822
								$thisfile_mpeg_audio_lame_RGAD_track['originator'] = getid3_lib::RGADoriginatorLookup($thisfile_mpeg_audio_lame_RGAD_track['raw']['originator']);
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   823
								$thisfile_mpeg_audio_lame_RGAD_track['gain_db']    = getid3_lib::RGADadjustmentLookup($thisfile_mpeg_audio_lame_RGAD_track['raw']['gain_adjust'], $thisfile_mpeg_audio_lame_RGAD_track['raw']['sign_bit']);
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   824
19
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   825
								if (!empty($thisfile_mpeg_audio_lame_RGAD['peak_amplitude'])) {
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   826
									$info['replay_gain']['track']['peak']   = $thisfile_mpeg_audio_lame_RGAD['peak_amplitude'];
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   827
								}
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   828
								$info['replay_gain']['track']['originator'] = $thisfile_mpeg_audio_lame_RGAD_track['originator'];
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   829
								$info['replay_gain']['track']['adjustment'] = $thisfile_mpeg_audio_lame_RGAD_track['gain_db'];
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   830
							} else {
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   831
								unset($thisfile_mpeg_audio_lame_RGAD['track']);
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   832
							}
19
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   833
							if ($thisfile_mpeg_audio_lame_raw['RGAD_album'] != 0) {
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   834
19
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   835
								$thisfile_mpeg_audio_lame_RGAD_album['raw']['name']        = ($thisfile_mpeg_audio_lame_raw['RGAD_album'] & 0xE000) >> 13;
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   836
								$thisfile_mpeg_audio_lame_RGAD_album['raw']['originator']  = ($thisfile_mpeg_audio_lame_raw['RGAD_album'] & 0x1C00) >> 10;
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   837
								$thisfile_mpeg_audio_lame_RGAD_album['raw']['sign_bit']    = ($thisfile_mpeg_audio_lame_raw['RGAD_album'] & 0x0200) >> 9;
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   838
								$thisfile_mpeg_audio_lame_RGAD_album['raw']['gain_adjust'] = $thisfile_mpeg_audio_lame_raw['RGAD_album'] & 0x01FF;
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   839
								$thisfile_mpeg_audio_lame_RGAD_album['name']       = getid3_lib::RGADnameLookup($thisfile_mpeg_audio_lame_RGAD_album['raw']['name']);
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   840
								$thisfile_mpeg_audio_lame_RGAD_album['originator'] = getid3_lib::RGADoriginatorLookup($thisfile_mpeg_audio_lame_RGAD_album['raw']['originator']);
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   841
								$thisfile_mpeg_audio_lame_RGAD_album['gain_db']    = getid3_lib::RGADadjustmentLookup($thisfile_mpeg_audio_lame_RGAD_album['raw']['gain_adjust'], $thisfile_mpeg_audio_lame_RGAD_album['raw']['sign_bit']);
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   842
19
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   843
								if (!empty($thisfile_mpeg_audio_lame_RGAD['peak_amplitude'])) {
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   844
									$info['replay_gain']['album']['peak']   = $thisfile_mpeg_audio_lame_RGAD['peak_amplitude'];
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   845
								}
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   846
								$info['replay_gain']['album']['originator'] = $thisfile_mpeg_audio_lame_RGAD_album['originator'];
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   847
								$info['replay_gain']['album']['adjustment'] = $thisfile_mpeg_audio_lame_RGAD_album['gain_db'];
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   848
							} else {
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   849
								unset($thisfile_mpeg_audio_lame_RGAD['album']);
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   850
							}
19
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   851
							if (empty($thisfile_mpeg_audio_lame_RGAD)) {
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   852
								unset($thisfile_mpeg_audio_lame['RGAD']);
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   853
							}
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   854
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   855
19
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   856
							// byte $AF  Encoding flags + ATH Type
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   857
							$EncodingFlagsATHtype = getid3_lib::BigEndian2Int(substr($headerstring, $LAMEtagOffsetContant + 0xAF, 1));
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   858
							$thisfile_mpeg_audio_lame['encoding_flags']['nspsytune']   = (bool) ($EncodingFlagsATHtype & 0x10);
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   859
							$thisfile_mpeg_audio_lame['encoding_flags']['nssafejoint'] = (bool) ($EncodingFlagsATHtype & 0x20);
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   860
							$thisfile_mpeg_audio_lame['encoding_flags']['nogap_next']  = (bool) ($EncodingFlagsATHtype & 0x40);
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   861
							$thisfile_mpeg_audio_lame['encoding_flags']['nogap_prev']  = (bool) ($EncodingFlagsATHtype & 0x80);
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   862
							$thisfile_mpeg_audio_lame['ath_type']                      =         $EncodingFlagsATHtype & 0x0F;
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   863
19
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   864
							// byte $B0  if ABR {specified bitrate} else {minimal bitrate}
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   865
							$thisfile_mpeg_audio_lame['raw']['abrbitrate_minbitrate'] = getid3_lib::BigEndian2Int(substr($headerstring, $LAMEtagOffsetContant + 0xB0, 1));
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   866
							if ($thisfile_mpeg_audio_lame_raw['vbr_method'] == 2) { // Average BitRate (ABR)
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   867
								$thisfile_mpeg_audio_lame['bitrate_abr'] = $thisfile_mpeg_audio_lame['raw']['abrbitrate_minbitrate'];
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   868
							} elseif ($thisfile_mpeg_audio_lame_raw['vbr_method'] == 1) { // Constant BitRate (CBR)
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   869
								// ignore
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   870
							} elseif ($thisfile_mpeg_audio_lame['raw']['abrbitrate_minbitrate'] > 0) { // Variable BitRate (VBR) - minimum bitrate
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   871
								$thisfile_mpeg_audio_lame['bitrate_min'] = $thisfile_mpeg_audio_lame['raw']['abrbitrate_minbitrate'];
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   872
							}
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   873
19
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   874
							// bytes $B1-$B3  Encoder delays
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   875
							$EncoderDelays = getid3_lib::BigEndian2Int(substr($headerstring, $LAMEtagOffsetContant + 0xB1, 3));
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   876
							$thisfile_mpeg_audio_lame['encoder_delay'] = ($EncoderDelays & 0xFFF000) >> 12;
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   877
							$thisfile_mpeg_audio_lame['end_padding']   =  $EncoderDelays & 0x000FFF;
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   878
19
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   879
							// byte $B4  Misc
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   880
							$MiscByte = getid3_lib::BigEndian2Int(substr($headerstring, $LAMEtagOffsetContant + 0xB4, 1));
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   881
							$thisfile_mpeg_audio_lame_raw['noise_shaping']       = ($MiscByte & 0x03);
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   882
							$thisfile_mpeg_audio_lame_raw['stereo_mode']         = ($MiscByte & 0x1C) >> 2;
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   883
							$thisfile_mpeg_audio_lame_raw['not_optimal_quality'] = ($MiscByte & 0x20) >> 5;
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   884
							$thisfile_mpeg_audio_lame_raw['source_sample_freq']  = ($MiscByte & 0xC0) >> 6;
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   885
							$thisfile_mpeg_audio_lame['noise_shaping']       = $thisfile_mpeg_audio_lame_raw['noise_shaping'];
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   886
							$thisfile_mpeg_audio_lame['stereo_mode']         = self::LAMEmiscStereoModeLookup($thisfile_mpeg_audio_lame_raw['stereo_mode']);
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   887
							$thisfile_mpeg_audio_lame['not_optimal_quality'] = (bool) $thisfile_mpeg_audio_lame_raw['not_optimal_quality'];
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   888
							$thisfile_mpeg_audio_lame['source_sample_freq']  = self::LAMEmiscSourceSampleFrequencyLookup($thisfile_mpeg_audio_lame_raw['source_sample_freq']);
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   889
19
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   890
							// byte $B5  MP3 Gain
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   891
							$thisfile_mpeg_audio_lame_raw['mp3_gain'] = getid3_lib::BigEndian2Int(substr($headerstring, $LAMEtagOffsetContant + 0xB5, 1), false, true);
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   892
							$thisfile_mpeg_audio_lame['mp3_gain_db']     = (getid3_lib::RGADamplitude2dB(2) / 4) * $thisfile_mpeg_audio_lame_raw['mp3_gain'];
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   893
							$thisfile_mpeg_audio_lame['mp3_gain_factor'] = pow(2, ($thisfile_mpeg_audio_lame['mp3_gain_db'] / 6));
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   894
19
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   895
							// bytes $B6-$B7  Preset and surround info
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   896
							$PresetSurroundBytes = getid3_lib::BigEndian2Int(substr($headerstring, $LAMEtagOffsetContant + 0xB6, 2));
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   897
							// Reserved                                                    = ($PresetSurroundBytes & 0xC000);
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   898
							$thisfile_mpeg_audio_lame_raw['surround_info'] = ($PresetSurroundBytes & 0x3800);
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   899
							$thisfile_mpeg_audio_lame['surround_info']     = self::LAMEsurroundInfoLookup($thisfile_mpeg_audio_lame_raw['surround_info']);
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   900
							$thisfile_mpeg_audio_lame['preset_used_id']    = ($PresetSurroundBytes & 0x07FF);
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   901
							$thisfile_mpeg_audio_lame['preset_used']       = self::LAMEpresetUsedLookup($thisfile_mpeg_audio_lame);
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   902
							if (!empty($thisfile_mpeg_audio_lame['preset_used_id']) && empty($thisfile_mpeg_audio_lame['preset_used'])) {
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   903
								$this->warning('Unknown LAME preset used ('.$thisfile_mpeg_audio_lame['preset_used_id'].') - please report to info@getid3.org');
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   904
							}
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   905
							if (($thisfile_mpeg_audio_lame['short_version'] == 'LAME3.90.') && !empty($thisfile_mpeg_audio_lame['preset_used_id'])) {
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   906
								// this may change if 3.90.4 ever comes out
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   907
								$thisfile_mpeg_audio_lame['short_version'] = 'LAME3.90.3';
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   908
							}
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   909
19
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   910
							// bytes $B8-$BB  MusicLength
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   911
							$thisfile_mpeg_audio_lame['audio_bytes'] = getid3_lib::BigEndian2Int(substr($headerstring, $LAMEtagOffsetContant + 0xB8, 4));
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   912
							$ExpectedNumberOfAudioBytes = (($thisfile_mpeg_audio_lame['audio_bytes'] > 0) ? $thisfile_mpeg_audio_lame['audio_bytes'] : $thisfile_mpeg_audio['VBR_bytes']);
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   913
19
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   914
							// bytes $BC-$BD  MusicCRC
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   915
							$thisfile_mpeg_audio_lame['music_crc']    = getid3_lib::BigEndian2Int(substr($headerstring, $LAMEtagOffsetContant + 0xBC, 2));
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   916
19
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   917
							// bytes $BE-$BF  CRC-16 of Info Tag
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   918
							$thisfile_mpeg_audio_lame['lame_tag_crc'] = getid3_lib::BigEndian2Int(substr($headerstring, $LAMEtagOffsetContant + 0xBE, 2));
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   919
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   920
19
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   921
							// LAME CBR
21
48c4eec2b7e6 Add CLAUDE.md documentation and sync WordPress core files
ymh <ymh.work@gmail.com>
parents: 19
diff changeset
   922
							if ($thisfile_mpeg_audio_lame_raw['vbr_method'] == 1 && $thisfile_mpeg_audio['bitrate'] !== 'free') {
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   923
19
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   924
								$thisfile_mpeg_audio['bitrate_mode'] = 'cbr';
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   925
								$thisfile_mpeg_audio['bitrate'] = self::ClosestStandardMP3Bitrate($thisfile_mpeg_audio['bitrate']);
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   926
								$info['audio']['bitrate'] = $thisfile_mpeg_audio['bitrate'];
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   927
								//if (empty($thisfile_mpeg_audio['bitrate']) || (!empty($thisfile_mpeg_audio_lame['bitrate_min']) && ($thisfile_mpeg_audio_lame['bitrate_min'] != 255))) {
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   928
								//	$thisfile_mpeg_audio['bitrate'] = $thisfile_mpeg_audio_lame['bitrate_min'];
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   929
								//}
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   930
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   931
							}
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   932
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   933
						}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   934
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   935
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   936
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   937
			} else {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   938
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   939
				// not Fraunhofer or Xing VBR methods, most likely CBR (but could be VBR with no header)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   940
				$thisfile_mpeg_audio['bitrate_mode'] = 'cbr';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   941
				if ($recursivesearch) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   942
					$thisfile_mpeg_audio['bitrate_mode'] = 'vbr';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   943
					if ($this->RecursiveFrameScanning($offset, $nextframetestoffset, true)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   944
						$recursivesearch = false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   945
						$thisfile_mpeg_audio['bitrate_mode'] = 'cbr';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   946
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   947
					if ($thisfile_mpeg_audio['bitrate_mode'] == 'vbr') {
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   948
						$this->warning('VBR file with no VBR header. Bitrate values calculated from actual frame bitrates.');
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   949
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   950
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   951
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   952
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   953
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   954
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   955
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   956
		if (($ExpectedNumberOfAudioBytes > 0) && ($ExpectedNumberOfAudioBytes != ($info['avdataend'] - $info['avdataoffset']))) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   957
			if ($ExpectedNumberOfAudioBytes > ($info['avdataend'] - $info['avdataoffset'])) {
5
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   958
				if ($this->isDependencyFor('matroska') || $this->isDependencyFor('riff')) {
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   959
					// ignore, audio data is broken into chunks so will always be data "missing"
5
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   960
				}
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   961
				elseif (($ExpectedNumberOfAudioBytes - ($info['avdataend'] - $info['avdataoffset'])) == 1) {
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   962
					$this->warning('Last byte of data truncated (this is a known bug in Meracl ID3 Tag Writer before v1.3.5)');
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   963
				}
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   964
				else {
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   965
					$this->warning('Probable truncated file: expecting '.$ExpectedNumberOfAudioBytes.' bytes of audio data, only found '.($info['avdataend'] - $info['avdataoffset']).' (short by '.($ExpectedNumberOfAudioBytes - ($info['avdataend'] - $info['avdataoffset'])).' bytes)');
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   966
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   967
			} else {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   968
				if ((($info['avdataend'] - $info['avdataoffset']) - $ExpectedNumberOfAudioBytes) == 1) {
5
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   969
				//	$prenullbytefileoffset = $this->ftell();
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   970
				//	$this->fseek($info['avdataend']);
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   971
				//	$PossibleNullByte = $this->fread(1);
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   972
				//	$this->fseek($prenullbytefileoffset);
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   973
				//	if ($PossibleNullByte === "\x00") {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   974
						$info['avdataend']--;
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   975
				//		$this->warning('Extra null byte at end of MP3 data assumed to be RIFF padding and therefore ignored');
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   976
				//	} else {
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   977
				//		$this->warning('Too much data in file: expecting '.$ExpectedNumberOfAudioBytes.' bytes of audio data, found '.($info['avdataend'] - $info['avdataoffset']).' ('.(($info['avdataend'] - $info['avdataoffset']) - $ExpectedNumberOfAudioBytes).' bytes too many)');
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   978
				//	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   979
				} else {
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   980
					$this->warning('Too much data in file: expecting '.$ExpectedNumberOfAudioBytes.' bytes of audio data, found '.($info['avdataend'] - $info['avdataoffset']).' ('.(($info['avdataend'] - $info['avdataoffset']) - $ExpectedNumberOfAudioBytes).' bytes too many)');
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   981
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   982
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   983
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   984
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   985
		if (($thisfile_mpeg_audio['bitrate'] == 'free') && empty($info['audio']['bitrate'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   986
			if (($offset == $info['avdataoffset']) && empty($thisfile_mpeg_audio['VBR_frames'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   987
				$framebytelength = $this->FreeFormatFrameLength($offset, true);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   988
				if ($framebytelength > 0) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   989
					$thisfile_mpeg_audio['framelength'] = $framebytelength;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   990
					if ($thisfile_mpeg_audio['layer'] == '1') {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   991
						// BitRate = (((FrameLengthInBytes / 4) - Padding) * SampleRate) / 12
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   992
						$info['audio']['bitrate'] = ((($framebytelength / 4) - intval($thisfile_mpeg_audio['padding'])) * $thisfile_mpeg_audio['sample_rate']) / 12;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   993
					} else {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   994
						// Bitrate = ((FrameLengthInBytes - Padding) * SampleRate) / 144
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   995
						$info['audio']['bitrate'] = (($framebytelength - intval($thisfile_mpeg_audio['padding'])) * $thisfile_mpeg_audio['sample_rate']) / 144;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   996
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   997
				} else {
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   998
					$this->error('Error calculating frame length of free-format MP3 without Xing/LAME header');
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   999
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1000
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1001
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1002
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1003
		if (isset($thisfile_mpeg_audio['VBR_frames']) ? $thisfile_mpeg_audio['VBR_frames'] : '') {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1004
			switch ($thisfile_mpeg_audio['bitrate_mode']) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1005
				case 'vbr':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1006
				case 'abr':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1007
					$bytes_per_frame = 1152;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1008
					if (($thisfile_mpeg_audio['version'] == '1') && ($thisfile_mpeg_audio['layer'] == 1)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1009
						$bytes_per_frame = 384;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1010
					} elseif ((($thisfile_mpeg_audio['version'] == '2') || ($thisfile_mpeg_audio['version'] == '2.5')) && ($thisfile_mpeg_audio['layer'] == 3)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1011
						$bytes_per_frame = 576;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1012
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1013
					$thisfile_mpeg_audio['VBR_bitrate'] = (isset($thisfile_mpeg_audio['VBR_bytes']) ? (($thisfile_mpeg_audio['VBR_bytes'] / $thisfile_mpeg_audio['VBR_frames']) * 8) * ($info['audio']['sample_rate'] / $bytes_per_frame) : 0);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1014
					if ($thisfile_mpeg_audio['VBR_bitrate'] > 0) {
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1015
						$info['audio']['bitrate']       = $thisfile_mpeg_audio['VBR_bitrate'];
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1016
						$thisfile_mpeg_audio['bitrate'] = $thisfile_mpeg_audio['VBR_bitrate']; // to avoid confusion
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1017
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1018
					break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1019
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1020
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1021
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1022
		// End variable-bitrate headers
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1023
		////////////////////////////////////////////////////////////////////////////////////
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1024
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1025
		if ($recursivesearch) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1026
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1027
			if (!$this->RecursiveFrameScanning($offset, $nextframetestoffset, $ScanAsCBR)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1028
				return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1029
			}
19
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
  1030
			if (!empty($this->getid3->info['mp3_validity_check_bitrates']) && !empty($thisfile_mpeg_audio['bitrate_mode']) && ($thisfile_mpeg_audio['bitrate_mode'] == 'vbr') && !empty($thisfile_mpeg_audio['VBR_bitrate'])) {
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
  1031
				// https://github.com/JamesHeinrich/getID3/issues/287
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
  1032
				if (count(array_keys($this->getid3->info['mp3_validity_check_bitrates'])) == 1) {
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
  1033
					list($cbr_bitrate_in_short_scan) = array_keys($this->getid3->info['mp3_validity_check_bitrates']);
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
  1034
					$deviation_cbr_from_header_bitrate = abs($thisfile_mpeg_audio['VBR_bitrate'] - $cbr_bitrate_in_short_scan) / $cbr_bitrate_in_short_scan;
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
  1035
					if ($deviation_cbr_from_header_bitrate < 0.01) {
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
  1036
						// VBR header bitrate may differ slightly from true bitrate of frames, perhaps accounting for overhead of VBR header frame itself?
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
  1037
						// If measured CBR bitrate is within 1% of specified bitrate in VBR header then assume that file is truly CBR
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
  1038
						$thisfile_mpeg_audio['bitrate_mode'] = 'cbr';
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
  1039
						//$this->warning('VBR header ignored, assuming CBR '.round($cbr_bitrate_in_short_scan / 1000).'kbps based on scan of '.$this->mp3_valid_check_frames.' frames');
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
  1040
					}
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
  1041
				}
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
  1042
			}
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
  1043
			if (isset($this->getid3->info['mp3_validity_check_bitrates'])) {
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
  1044
				unset($this->getid3->info['mp3_validity_check_bitrates']);
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
  1045
			}
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1046
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1047
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1048
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1049
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1050
		//if (false) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1051
		//    // experimental side info parsing section - not returning anything useful yet
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1052
		//
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1053
		//    $SideInfoBitstream = getid3_lib::BigEndian2Bin($SideInfoData);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1054
		//    $SideInfoOffset = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1055
		//
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1056
		//    if ($thisfile_mpeg_audio['version'] == '1') {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1057
		//        if ($thisfile_mpeg_audio['channelmode'] == 'mono') {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1058
		//            // MPEG-1 (mono)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1059
		//            $thisfile_mpeg_audio['side_info']['main_data_begin'] = substr($SideInfoBitstream, $SideInfoOffset, 9);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1060
		//            $SideInfoOffset += 9;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1061
		//            $SideInfoOffset += 5;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1062
		//        } else {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1063
		//            // MPEG-1 (stereo, joint-stereo, dual-channel)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1064
		//            $thisfile_mpeg_audio['side_info']['main_data_begin'] = substr($SideInfoBitstream, $SideInfoOffset, 9);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1065
		//            $SideInfoOffset += 9;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1066
		//            $SideInfoOffset += 3;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1067
		//        }
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1068
		//    } else { // 2 or 2.5
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1069
		//        if ($thisfile_mpeg_audio['channelmode'] == 'mono') {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1070
		//            // MPEG-2, MPEG-2.5 (mono)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1071
		//            $thisfile_mpeg_audio['side_info']['main_data_begin'] = substr($SideInfoBitstream, $SideInfoOffset, 8);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1072
		//            $SideInfoOffset += 8;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1073
		//            $SideInfoOffset += 1;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1074
		//        } else {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1075
		//            // MPEG-2, MPEG-2.5 (stereo, joint-stereo, dual-channel)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1076
		//            $thisfile_mpeg_audio['side_info']['main_data_begin'] = substr($SideInfoBitstream, $SideInfoOffset, 8);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1077
		//            $SideInfoOffset += 8;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1078
		//            $SideInfoOffset += 2;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1079
		//        }
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1080
		//    }
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1081
		//
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1082
		//    if ($thisfile_mpeg_audio['version'] == '1') {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1083
		//        for ($channel = 0; $channel < $info['audio']['channels']; $channel++) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1084
		//            for ($scfsi_band = 0; $scfsi_band < 4; $scfsi_band++) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1085
		//                $thisfile_mpeg_audio['scfsi'][$channel][$scfsi_band] = substr($SideInfoBitstream, $SideInfoOffset, 1);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1086
		//                $SideInfoOffset += 2;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1087
		//            }
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
		//    for ($granule = 0; $granule < (($thisfile_mpeg_audio['version'] == '1') ? 2 : 1); $granule++) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1091
		//        for ($channel = 0; $channel < $info['audio']['channels']; $channel++) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1092
		//            $thisfile_mpeg_audio['part2_3_length'][$granule][$channel] = substr($SideInfoBitstream, $SideInfoOffset, 12);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1093
		//            $SideInfoOffset += 12;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1094
		//            $thisfile_mpeg_audio['big_values'][$granule][$channel] = substr($SideInfoBitstream, $SideInfoOffset, 9);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1095
		//            $SideInfoOffset += 9;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1096
		//            $thisfile_mpeg_audio['global_gain'][$granule][$channel] = substr($SideInfoBitstream, $SideInfoOffset, 8);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1097
		//            $SideInfoOffset += 8;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1098
		//            if ($thisfile_mpeg_audio['version'] == '1') {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1099
		//                $thisfile_mpeg_audio['scalefac_compress'][$granule][$channel] = substr($SideInfoBitstream, $SideInfoOffset, 4);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1100
		//                $SideInfoOffset += 4;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1101
		//            } else {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1102
		//                $thisfile_mpeg_audio['scalefac_compress'][$granule][$channel] = substr($SideInfoBitstream, $SideInfoOffset, 9);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1103
		//                $SideInfoOffset += 9;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1104
		//            }
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1105
		//            $thisfile_mpeg_audio['window_switching_flag'][$granule][$channel] = substr($SideInfoBitstream, $SideInfoOffset, 1);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1106
		//            $SideInfoOffset += 1;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1107
		//
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1108
		//            if ($thisfile_mpeg_audio['window_switching_flag'][$granule][$channel] == '1') {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1109
		//
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1110
		//                $thisfile_mpeg_audio['block_type'][$granule][$channel] = substr($SideInfoBitstream, $SideInfoOffset, 2);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1111
		//                $SideInfoOffset += 2;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1112
		//                $thisfile_mpeg_audio['mixed_block_flag'][$granule][$channel] = substr($SideInfoBitstream, $SideInfoOffset, 1);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1113
		//                $SideInfoOffset += 1;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1114
		//
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1115
		//                for ($region = 0; $region < 2; $region++) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1116
		//                    $thisfile_mpeg_audio['table_select'][$granule][$channel][$region] = substr($SideInfoBitstream, $SideInfoOffset, 5);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1117
		//                    $SideInfoOffset += 5;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1118
		//                }
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1119
		//                $thisfile_mpeg_audio['table_select'][$granule][$channel][2] = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1120
		//
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1121
		//                for ($window = 0; $window < 3; $window++) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1122
		//                    $thisfile_mpeg_audio['subblock_gain'][$granule][$channel][$window] = substr($SideInfoBitstream, $SideInfoOffset, 3);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1123
		//                    $SideInfoOffset += 3;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1124
		//                }
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1125
		//
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1126
		//            } else {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1127
		//
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1128
		//                for ($region = 0; $region < 3; $region++) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1129
		//                    $thisfile_mpeg_audio['table_select'][$granule][$channel][$region] = substr($SideInfoBitstream, $SideInfoOffset, 5);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1130
		//                    $SideInfoOffset += 5;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1131
		//                }
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1132
		//
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1133
		//                $thisfile_mpeg_audio['region0_count'][$granule][$channel] = substr($SideInfoBitstream, $SideInfoOffset, 4);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1134
		//                $SideInfoOffset += 4;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1135
		//                $thisfile_mpeg_audio['region1_count'][$granule][$channel] = substr($SideInfoBitstream, $SideInfoOffset, 3);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1136
		//                $SideInfoOffset += 3;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1137
		//                $thisfile_mpeg_audio['block_type'][$granule][$channel] = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1138
		//            }
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1139
		//
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1140
		//            if ($thisfile_mpeg_audio['version'] == '1') {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1141
		//                $thisfile_mpeg_audio['preflag'][$granule][$channel] = substr($SideInfoBitstream, $SideInfoOffset, 1);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1142
		//                $SideInfoOffset += 1;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1143
		//            }
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1144
		//            $thisfile_mpeg_audio['scalefac_scale'][$granule][$channel] = substr($SideInfoBitstream, $SideInfoOffset, 1);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1145
		//            $SideInfoOffset += 1;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1146
		//            $thisfile_mpeg_audio['count1table_select'][$granule][$channel] = substr($SideInfoBitstream, $SideInfoOffset, 1);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1147
		//            $SideInfoOffset += 1;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1148
		//        }
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1149
		//    }
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1150
		//}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1151
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1152
		return true;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1153
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1154
16
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1155
	/**
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1156
	 * @param int $offset
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1157
	 * @param int $nextframetestoffset
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1158
	 * @param bool $ScanAsCBR
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1159
	 *
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1160
	 * @return bool
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1161
	 */
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1162
	public function RecursiveFrameScanning(&$offset, &$nextframetestoffset, $ScanAsCBR) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1163
		$info = &$this->getid3->info;
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1164
		$firstframetestarray = array('error' => array(), 'warning'=> array(), 'avdataend' => $info['avdataend'], 'avdataoffset' => $info['avdataoffset']);
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1165
		$this->decodeMPEGaudioHeader($offset, $firstframetestarray, false);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1166
19
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
  1167
		$info['mp3_validity_check_bitrates'] = array();
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
  1168
		for ($i = 0; $i < $this->mp3_valid_check_frames; $i++) {
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
  1169
			// check next (default: 50) frames for validity, to make sure we haven't run across a false synch
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1170
			if (($nextframetestoffset + 4) >= $info['avdataend']) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1171
				// end of file
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1172
				return true;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1173
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1174
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1175
			$nextframetestarray = array('error' => array(), 'warning' => array(), 'avdataend' => $info['avdataend'], 'avdataoffset'=>$info['avdataoffset']);
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1176
			if ($this->decodeMPEGaudioHeader($nextframetestoffset, $nextframetestarray, false)) {
21
48c4eec2b7e6 Add CLAUDE.md documentation and sync WordPress core files
ymh <ymh.work@gmail.com>
parents: 19
diff changeset
  1177
				/** @phpstan-ignore-next-line */
19
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
  1178
				getid3_lib::safe_inc($info['mp3_validity_check_bitrates'][$nextframetestarray['mpeg']['audio']['bitrate']]);
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1179
				if ($ScanAsCBR) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1180
					// force CBR mode, used for trying to pick out invalid audio streams with valid(?) VBR headers, or VBR streams with no VBR header
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1181
					if (!isset($nextframetestarray['mpeg']['audio']['bitrate']) || !isset($firstframetestarray['mpeg']['audio']['bitrate']) || ($nextframetestarray['mpeg']['audio']['bitrate'] != $firstframetestarray['mpeg']['audio']['bitrate'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1182
						return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1183
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1184
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1185
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1186
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1187
				// next frame is OK, get ready to check the one after that
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1188
				if (isset($nextframetestarray['mpeg']['audio']['framelength']) && ($nextframetestarray['mpeg']['audio']['framelength'] > 0)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1189
					$nextframetestoffset += $nextframetestarray['mpeg']['audio']['framelength'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1190
				} else {
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1191
					$this->error('Frame at offset ('.$offset.') is has an invalid frame length.');
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1192
					return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1193
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1194
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1195
			} elseif (!empty($firstframetestarray['mpeg']['audio']['framelength']) && (($nextframetestoffset + $firstframetestarray['mpeg']['audio']['framelength']) > $info['avdataend'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1196
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1197
				// it's not the end of the file, but there's not enough data left for another frame, so assume it's garbage/padding and return OK
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1198
				return true;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1199
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1200
			} else {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1201
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1202
				// next frame is not valid, note the error and fail, so scanning can contiue for a valid frame sequence
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1203
				$this->warning('Frame at offset ('.$offset.') is valid, but the next one at ('.$nextframetestoffset.') is not.');
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1204
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1205
				return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1206
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1207
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1208
		return true;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1209
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1210
16
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1211
	/**
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1212
	 * @param int  $offset
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1213
	 * @param bool $deepscan
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1214
	 *
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1215
	 * @return int|false
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1216
	 */
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1217
	public function FreeFormatFrameLength($offset, $deepscan=false) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1218
		$info = &$this->getid3->info;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1219
5
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
  1220
		$this->fseek($offset);
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
  1221
		$MPEGaudioData = $this->fread(32768);
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1222
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1223
		$SyncPattern1 = substr($MPEGaudioData, 0, 4);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1224
		// may be different pattern due to padding
16
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1225
		$SyncPattern2 = $SyncPattern1[0].$SyncPattern1[1].chr(ord($SyncPattern1[2]) | 0x02).$SyncPattern1[3];
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1226
		if ($SyncPattern2 === $SyncPattern1) {
16
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1227
			$SyncPattern2 = $SyncPattern1[0].$SyncPattern1[1].chr(ord($SyncPattern1[2]) & 0xFD).$SyncPattern1[3];
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1228
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1229
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1230
		$framelength = false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1231
		$framelength1 = strpos($MPEGaudioData, $SyncPattern1, 4);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1232
		$framelength2 = strpos($MPEGaudioData, $SyncPattern2, 4);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1233
		if ($framelength1 > 4) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1234
			$framelength = $framelength1;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1235
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1236
		if (($framelength2 > 4) && ($framelength2 < $framelength1)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1237
			$framelength = $framelength2;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1238
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1239
		if (!$framelength) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1240
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1241
			// LAME 3.88 has a different value for modeextension on the first frame vs the rest
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1242
			$framelength1 = strpos($MPEGaudioData, substr($SyncPattern1, 0, 3), 4);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1243
			$framelength2 = strpos($MPEGaudioData, substr($SyncPattern2, 0, 3), 4);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1244
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1245
			if ($framelength1 > 4) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1246
				$framelength = $framelength1;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1247
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1248
			if (($framelength2 > 4) && ($framelength2 < $framelength1)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1249
				$framelength = $framelength2;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1250
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1251
			if (!$framelength) {
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1252
				$this->error('Cannot find next free-format synch pattern ('.getid3_lib::PrintHexBytes($SyncPattern1).' or '.getid3_lib::PrintHexBytes($SyncPattern2).') after offset '.$offset);
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1253
				return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1254
			} else {
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1255
				$this->warning('ModeExtension varies between first frame and other frames (known free-format issue in LAME 3.88)');
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1256
				$info['audio']['codec']   = 'LAME';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1257
				$info['audio']['encoder'] = 'LAME3.88';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1258
				$SyncPattern1 = substr($SyncPattern1, 0, 3);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1259
				$SyncPattern2 = substr($SyncPattern2, 0, 3);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1260
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1261
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1262
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1263
		if ($deepscan) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1264
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1265
			$ActualFrameLengthValues = array();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1266
			$nextoffset = $offset + $framelength;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1267
			while ($nextoffset < ($info['avdataend'] - 6)) {
5
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
  1268
				$this->fseek($nextoffset - 1);
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
  1269
				$NextSyncPattern = $this->fread(6);
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1270
				if ((substr($NextSyncPattern, 1, strlen($SyncPattern1)) == $SyncPattern1) || (substr($NextSyncPattern, 1, strlen($SyncPattern2)) == $SyncPattern2)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1271
					// good - found where expected
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1272
					$ActualFrameLengthValues[] = $framelength;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1273
				} elseif ((substr($NextSyncPattern, 0, strlen($SyncPattern1)) == $SyncPattern1) || (substr($NextSyncPattern, 0, strlen($SyncPattern2)) == $SyncPattern2)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1274
					// ok - found one byte earlier than expected (last frame wasn't padded, first frame was)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1275
					$ActualFrameLengthValues[] = ($framelength - 1);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1276
					$nextoffset--;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1277
				} elseif ((substr($NextSyncPattern, 2, strlen($SyncPattern1)) == $SyncPattern1) || (substr($NextSyncPattern, 2, strlen($SyncPattern2)) == $SyncPattern2)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1278
					// ok - found one byte later than expected (last frame was padded, first frame wasn't)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1279
					$ActualFrameLengthValues[] = ($framelength + 1);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1280
					$nextoffset++;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1281
				} else {
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1282
					$this->error('Did not find expected free-format sync pattern at offset '.$nextoffset);
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1283
					return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1284
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1285
				$nextoffset += $framelength;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1286
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1287
			if (count($ActualFrameLengthValues) > 0) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1288
				$framelength = intval(round(array_sum($ActualFrameLengthValues) / count($ActualFrameLengthValues)));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1289
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1290
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1291
		return $framelength;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1292
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1293
16
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1294
	/**
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1295
	 * @return bool
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1296
	 */
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1297
	public function getOnlyMPEGaudioInfoBruteForce() {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1298
		$MPEGaudioHeaderDecodeCache   = array();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1299
		$MPEGaudioHeaderValidCache    = array();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1300
		$MPEGaudioHeaderLengthCache   = array();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1301
		$MPEGaudioVersionLookup       = self::MPEGaudioVersionArray();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1302
		$MPEGaudioLayerLookup         = self::MPEGaudioLayerArray();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1303
		$MPEGaudioBitrateLookup       = self::MPEGaudioBitrateArray();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1304
		$MPEGaudioFrequencyLookup     = self::MPEGaudioFrequencyArray();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1305
		$MPEGaudioChannelModeLookup   = self::MPEGaudioChannelModeArray();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1306
		$MPEGaudioModeExtensionLookup = self::MPEGaudioModeExtensionArray();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1307
		$MPEGaudioEmphasisLookup      = self::MPEGaudioEmphasisArray();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1308
		$LongMPEGversionLookup        = array();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1309
		$LongMPEGlayerLookup          = array();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1310
		$LongMPEGbitrateLookup        = array();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1311
		$LongMPEGpaddingLookup        = array();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1312
		$LongMPEGfrequencyLookup      = array();
19
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
  1313
		$Distribution                 = array();
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1314
		$Distribution['bitrate']      = array();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1315
		$Distribution['frequency']    = array();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1316
		$Distribution['layer']        = array();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1317
		$Distribution['version']      = array();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1318
		$Distribution['padding']      = array();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1319
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1320
		$info = &$this->getid3->info;
5
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
  1321
		$this->fseek($info['avdataoffset']);
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1322
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1323
		$max_frames_scan = 5000;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1324
		$frames_scanned  = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1325
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1326
		$previousvalidframe = $info['avdataoffset'];
5
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
  1327
		while ($this->ftell() < $info['avdataend']) {
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1328
			set_time_limit(30);
5
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
  1329
			$head4 = $this->fread(4);
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1330
			if (strlen($head4) < 4) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1331
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1332
			}
16
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1333
			if ($head4[0] != "\xFF") {
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1334
				for ($i = 1; $i < 4; $i++) {
16
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1335
					if ($head4[$i] == "\xFF") {
5
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
  1336
						$this->fseek($i - 4, SEEK_CUR);
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1337
						continue 2;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1338
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1339
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1340
				continue;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1341
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1342
			if (!isset($MPEGaudioHeaderDecodeCache[$head4])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1343
				$MPEGaudioHeaderDecodeCache[$head4] = self::MPEGaudioHeaderDecode($head4);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1344
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1345
			if (!isset($MPEGaudioHeaderValidCache[$head4])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1346
				$MPEGaudioHeaderValidCache[$head4] = self::MPEGaudioHeaderValid($MPEGaudioHeaderDecodeCache[$head4], false, false);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1347
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1348
			if ($MPEGaudioHeaderValidCache[$head4]) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1349
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1350
				if (!isset($MPEGaudioHeaderLengthCache[$head4])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1351
					$LongMPEGversionLookup[$head4]   = $MPEGaudioVersionLookup[$MPEGaudioHeaderDecodeCache[$head4]['version']];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1352
					$LongMPEGlayerLookup[$head4]     = $MPEGaudioLayerLookup[$MPEGaudioHeaderDecodeCache[$head4]['layer']];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1353
					$LongMPEGbitrateLookup[$head4]   = $MPEGaudioBitrateLookup[$LongMPEGversionLookup[$head4]][$LongMPEGlayerLookup[$head4]][$MPEGaudioHeaderDecodeCache[$head4]['bitrate']];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1354
					$LongMPEGpaddingLookup[$head4]   = (bool) $MPEGaudioHeaderDecodeCache[$head4]['padding'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1355
					$LongMPEGfrequencyLookup[$head4] = $MPEGaudioFrequencyLookup[$LongMPEGversionLookup[$head4]][$MPEGaudioHeaderDecodeCache[$head4]['sample_rate']];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1356
					$MPEGaudioHeaderLengthCache[$head4] = self::MPEGaudioFrameLength(
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1357
						$LongMPEGbitrateLookup[$head4],
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1358
						$LongMPEGversionLookup[$head4],
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1359
						$LongMPEGlayerLookup[$head4],
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1360
						$LongMPEGpaddingLookup[$head4],
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1361
						$LongMPEGfrequencyLookup[$head4]);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1362
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1363
				if ($MPEGaudioHeaderLengthCache[$head4] > 4) {
5
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
  1364
					$WhereWeWere = $this->ftell();
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
  1365
					$this->fseek($MPEGaudioHeaderLengthCache[$head4] - 4, SEEK_CUR);
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
  1366
					$next4 = $this->fread(4);
16
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1367
					if ($next4[0] == "\xFF") {
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1368
						if (!isset($MPEGaudioHeaderDecodeCache[$next4])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1369
							$MPEGaudioHeaderDecodeCache[$next4] = self::MPEGaudioHeaderDecode($next4);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1370
						}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1371
						if (!isset($MPEGaudioHeaderValidCache[$next4])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1372
							$MPEGaudioHeaderValidCache[$next4] = self::MPEGaudioHeaderValid($MPEGaudioHeaderDecodeCache[$next4], false, false);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1373
						}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1374
						if ($MPEGaudioHeaderValidCache[$next4]) {
5
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
  1375
							$this->fseek(-4, SEEK_CUR);
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1376
16
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1377
							$Distribution['bitrate'][$LongMPEGbitrateLookup[$head4]] = isset($Distribution['bitrate'][$LongMPEGbitrateLookup[$head4]]) ? ++$Distribution['bitrate'][$LongMPEGbitrateLookup[$head4]] : 1;
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1378
							$Distribution['layer'][$LongMPEGlayerLookup[$head4]] = isset($Distribution['layer'][$LongMPEGlayerLookup[$head4]]) ? ++$Distribution['layer'][$LongMPEGlayerLookup[$head4]] : 1;
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1379
							$Distribution['version'][$LongMPEGversionLookup[$head4]] = isset($Distribution['version'][$LongMPEGversionLookup[$head4]]) ? ++$Distribution['version'][$LongMPEGversionLookup[$head4]] : 1;
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1380
							$Distribution['padding'][intval($LongMPEGpaddingLookup[$head4])] = isset($Distribution['padding'][intval($LongMPEGpaddingLookup[$head4])]) ? ++$Distribution['padding'][intval($LongMPEGpaddingLookup[$head4])] : 1;
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1381
							$Distribution['frequency'][$LongMPEGfrequencyLookup[$head4]] = isset($Distribution['frequency'][$LongMPEGfrequencyLookup[$head4]]) ? ++$Distribution['frequency'][$LongMPEGfrequencyLookup[$head4]] : 1;
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1382
							if (++$frames_scanned >= $max_frames_scan) {
21
48c4eec2b7e6 Add CLAUDE.md documentation and sync WordPress core files
ymh <ymh.work@gmail.com>
parents: 19
diff changeset
  1383
								$pct_data_scanned = getid3_lib::SafeDiv($this->ftell() - $info['avdataoffset'], $info['avdataend'] - $info['avdataoffset']);
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1384
								$this->warning('too many MPEG audio frames to scan, only scanned first '.$max_frames_scan.' frames ('.number_format($pct_data_scanned * 100, 1).'% of file) and extrapolated distribution, playtime and bitrate may be incorrect.');
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1385
								foreach ($Distribution as $key1 => $value1) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1386
									foreach ($value1 as $key2 => $value2) {
21
48c4eec2b7e6 Add CLAUDE.md documentation and sync WordPress core files
ymh <ymh.work@gmail.com>
parents: 19
diff changeset
  1387
										$Distribution[$key1][$key2] = $pct_data_scanned ? round($value2 / $pct_data_scanned) : 1;
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1388
									}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1389
								}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1390
								break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1391
							}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1392
							continue;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1393
						}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1394
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1395
					unset($next4);
5
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
  1396
					$this->fseek($WhereWeWere - 3);
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1397
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1398
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1399
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1400
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1401
		foreach ($Distribution as $key => $value) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1402
			ksort($Distribution[$key], SORT_NUMERIC);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1403
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1404
		ksort($Distribution['version'], SORT_STRING);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1405
		$info['mpeg']['audio']['bitrate_distribution']   = $Distribution['bitrate'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1406
		$info['mpeg']['audio']['frequency_distribution'] = $Distribution['frequency'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1407
		$info['mpeg']['audio']['layer_distribution']     = $Distribution['layer'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1408
		$info['mpeg']['audio']['version_distribution']   = $Distribution['version'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1409
		$info['mpeg']['audio']['padding_distribution']   = $Distribution['padding'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1410
		if (count($Distribution['version']) > 1) {
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1411
			$this->error('Corrupt file - more than one MPEG version detected');
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1412
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1413
		if (count($Distribution['layer']) > 1) {
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1414
			$this->error('Corrupt file - more than one MPEG layer detected');
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1415
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1416
		if (count($Distribution['frequency']) > 1) {
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1417
			$this->error('Corrupt file - more than one MPEG sample rate detected');
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1418
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1419
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1420
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1421
		$bittotal = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1422
		foreach ($Distribution['bitrate'] as $bitratevalue => $bitratecount) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1423
			if ($bitratevalue != 'free') {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1424
				$bittotal += ($bitratevalue * $bitratecount);
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
		$info['mpeg']['audio']['frame_count']  = array_sum($Distribution['bitrate']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1428
		if ($info['mpeg']['audio']['frame_count'] == 0) {
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1429
			$this->error('no MPEG audio frames found');
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1430
			return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1431
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1432
		$info['mpeg']['audio']['bitrate']      = ($bittotal / $info['mpeg']['audio']['frame_count']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1433
		$info['mpeg']['audio']['bitrate_mode'] = ((count($Distribution['bitrate']) > 0) ? 'vbr' : 'cbr');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1434
		$info['mpeg']['audio']['sample_rate']  = getid3_lib::array_max($Distribution['frequency'], true);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1435
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1436
		$info['audio']['bitrate']      = $info['mpeg']['audio']['bitrate'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1437
		$info['audio']['bitrate_mode'] = $info['mpeg']['audio']['bitrate_mode'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1438
		$info['audio']['sample_rate']  = $info['mpeg']['audio']['sample_rate'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1439
		$info['audio']['dataformat']   = 'mp'.getid3_lib::array_max($Distribution['layer'], true);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1440
		$info['fileformat']            = $info['audio']['dataformat'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1441
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1442
		return true;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1443
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1444
16
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1445
	/**
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1446
	 * @param int  $avdataoffset
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1447
	 * @param bool $BitrateHistogram
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1448
	 *
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1449
	 * @return bool
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1450
	 */
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1451
	public function getOnlyMPEGaudioInfo($avdataoffset, $BitrateHistogram=false) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1452
		// looks for synch, decodes MPEG audio header
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1453
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1454
		$info = &$this->getid3->info;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1455
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1456
		static $MPEGaudioVersionLookup;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1457
		static $MPEGaudioLayerLookup;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1458
		static $MPEGaudioBitrateLookup;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1459
		if (empty($MPEGaudioVersionLookup)) {
16
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1460
			$MPEGaudioVersionLookup = self::MPEGaudioVersionArray();
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1461
			$MPEGaudioLayerLookup   = self::MPEGaudioLayerArray();
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1462
			$MPEGaudioBitrateLookup = self::MPEGaudioBitrateArray();
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1463
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1464
5
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
  1465
		$this->fseek($avdataoffset);
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1466
		$sync_seek_buffer_size = min(128 * 1024, $info['avdataend'] - $avdataoffset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1467
		if ($sync_seek_buffer_size <= 0) {
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1468
			$this->error('Invalid $sync_seek_buffer_size at offset '.$avdataoffset);
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1469
			return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1470
		}
5
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
  1471
		$header = $this->fread($sync_seek_buffer_size);
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1472
		$sync_seek_buffer_size = strlen($header);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1473
		$SynchSeekOffset = 0;
19
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
  1474
		$SyncSeekAttempts = 0;
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
  1475
		$SyncSeekAttemptsMax = 1000;
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
  1476
		$FirstFrameThisfileInfo = null;
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1477
		while ($SynchSeekOffset < $sync_seek_buffer_size) {
21
48c4eec2b7e6 Add CLAUDE.md documentation and sync WordPress core files
ymh <ymh.work@gmail.com>
parents: 19
diff changeset
  1478
			if ((($avdataoffset + $SynchSeekOffset)  < $info['avdataend']) && !$this->feof()) {
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1479
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1480
				if ($SynchSeekOffset > $sync_seek_buffer_size) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1481
					// if a synch's not found within the first 128k bytes, then give up
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1482
					$this->error('Could not find valid MPEG audio synch within the first '.round($sync_seek_buffer_size / 1024).'kB');
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1483
					if (isset($info['audio']['bitrate'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1484
						unset($info['audio']['bitrate']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1485
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1486
					if (isset($info['mpeg']['audio'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1487
						unset($info['mpeg']['audio']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1488
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1489
					if (empty($info['mpeg'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1490
						unset($info['mpeg']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1491
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1492
					return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1493
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1494
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1495
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1496
			if (($SynchSeekOffset + 1) >= strlen($header)) {
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1497
				$this->error('Could not find valid MPEG synch before end of file');
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1498
				return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1499
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1500
19
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
  1501
			if (($header[$SynchSeekOffset] == "\xFF") && ($header[($SynchSeekOffset + 1)] > "\xE0")) { // possible synch detected
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
  1502
				if (++$SyncSeekAttempts >= $SyncSeekAttemptsMax) {
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
  1503
					// https://github.com/JamesHeinrich/getID3/issues/286
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
  1504
					// corrupt files claiming to be MP3, with a large number of 0xFF bytes near the beginning, can cause this loop to take a very long time
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
  1505
					// should have escape condition to avoid spending too much time scanning a corrupt file
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
  1506
					// if a synch's not found within the first 128k bytes, then give up
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
  1507
					$this->error('Could not find valid MPEG audio synch after scanning '.$SyncSeekAttempts.' candidate offsets');
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
  1508
					if (isset($info['audio']['bitrate'])) {
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
  1509
						unset($info['audio']['bitrate']);
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
  1510
					}
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
  1511
					if (isset($info['mpeg']['audio'])) {
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
  1512
						unset($info['mpeg']['audio']);
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
  1513
					}
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
  1514
					if (empty($info['mpeg'])) {
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
  1515
						unset($info['mpeg']);
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
  1516
					}
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
  1517
					return false;
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
  1518
				}
16
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1519
				$FirstFrameAVDataOffset = null;
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1520
				if (!isset($FirstFrameThisfileInfo) && !isset($info['mpeg']['audio'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1521
					$FirstFrameThisfileInfo = $info;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1522
					$FirstFrameAVDataOffset = $avdataoffset + $SynchSeekOffset;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1523
					if (!$this->decodeMPEGaudioHeader($FirstFrameAVDataOffset, $FirstFrameThisfileInfo, false)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1524
						// if this is the first valid MPEG-audio frame, save it in case it's a VBR header frame and there's
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1525
						// garbage between this frame and a valid sequence of MPEG-audio frames, to be restored below
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1526
						unset($FirstFrameThisfileInfo);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1527
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1528
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1529
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1530
				$dummy = $info; // only overwrite real data if valid header found
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1531
				if ($this->decodeMPEGaudioHeader($avdataoffset + $SynchSeekOffset, $dummy, true)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1532
					$info = $dummy;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1533
					$info['avdataoffset'] = $avdataoffset + $SynchSeekOffset;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1534
					switch (isset($info['fileformat']) ? $info['fileformat'] : '') {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1535
						case '':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1536
						case 'id3':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1537
						case 'ape':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1538
						case 'mp3':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1539
							$info['fileformat']          = 'mp3';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1540
							$info['audio']['dataformat'] = 'mp3';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1541
							break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1542
					}
16
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1543
					if (isset($FirstFrameThisfileInfo) && isset($FirstFrameThisfileInfo['mpeg']['audio']['bitrate_mode']) && ($FirstFrameThisfileInfo['mpeg']['audio']['bitrate_mode'] == 'vbr')) {
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1544
						if (!(abs($info['audio']['bitrate'] - $FirstFrameThisfileInfo['audio']['bitrate']) <= 1)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1545
							// If there is garbage data between a valid VBR header frame and a sequence
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1546
							// of valid MPEG-audio frames the VBR data is no longer discarded.
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1547
							$info = $FirstFrameThisfileInfo;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1548
							$info['avdataoffset']        = $FirstFrameAVDataOffset;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1549
							$info['fileformat']          = 'mp3';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1550
							$info['audio']['dataformat'] = 'mp3';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1551
							$dummy                       = $info;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1552
							unset($dummy['mpeg']['audio']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1553
							$GarbageOffsetStart = $FirstFrameAVDataOffset + $FirstFrameThisfileInfo['mpeg']['audio']['framelength'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1554
							$GarbageOffsetEnd   = $avdataoffset + $SynchSeekOffset;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1555
							if ($this->decodeMPEGaudioHeader($GarbageOffsetEnd, $dummy, true, true)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1556
								$info = $dummy;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1557
								$info['avdataoffset'] = $GarbageOffsetEnd;
19
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
  1558
								$this->warning('apparently-valid VBR header not used because could not find '.$this->mp3_valid_check_frames.' consecutive MPEG-audio frames immediately after VBR header (garbage data for '.($GarbageOffsetEnd - $GarbageOffsetStart).' bytes between '.$GarbageOffsetStart.' and '.$GarbageOffsetEnd.'), but did find valid CBR stream starting at '.$GarbageOffsetEnd);
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1559
							} else {
19
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
  1560
								$this->warning('using data from VBR header even though could not find '.$this->mp3_valid_check_frames.' consecutive MPEG-audio frames immediately after VBR header (garbage data for '.($GarbageOffsetEnd - $GarbageOffsetStart).' bytes between '.$GarbageOffsetStart.' and '.$GarbageOffsetEnd.')');
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1561
							}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1562
						}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1563
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1564
					if (isset($info['mpeg']['audio']['bitrate_mode']) && ($info['mpeg']['audio']['bitrate_mode'] == 'vbr') && !isset($info['mpeg']['audio']['VBR_method'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1565
						// VBR file with no VBR header
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1566
						$BitrateHistogram = true;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1567
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1568
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1569
					if ($BitrateHistogram) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1570
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1571
						$info['mpeg']['audio']['stereo_distribution']  = array('stereo'=>0, 'joint stereo'=>0, 'dual channel'=>0, 'mono'=>0);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1572
						$info['mpeg']['audio']['version_distribution'] = array('1'=>0, '2'=>0, '2.5'=>0);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1573
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1574
						if ($info['mpeg']['audio']['version'] == '1') {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1575
							if ($info['mpeg']['audio']['layer'] == 3) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1576
								$info['mpeg']['audio']['bitrate_distribution'] = array('free'=>0, 32000=>0, 40000=>0, 48000=>0, 56000=>0, 64000=>0, 80000=>0, 96000=>0, 112000=>0, 128000=>0, 160000=>0, 192000=>0, 224000=>0, 256000=>0, 320000=>0);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1577
							} elseif ($info['mpeg']['audio']['layer'] == 2) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1578
								$info['mpeg']['audio']['bitrate_distribution'] = array('free'=>0, 32000=>0, 48000=>0, 56000=>0, 64000=>0, 80000=>0, 96000=>0, 112000=>0, 128000=>0, 160000=>0, 192000=>0, 224000=>0, 256000=>0, 320000=>0, 384000=>0);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1579
							} elseif ($info['mpeg']['audio']['layer'] == 1) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1580
								$info['mpeg']['audio']['bitrate_distribution'] = array('free'=>0, 32000=>0, 64000=>0, 96000=>0, 128000=>0, 160000=>0, 192000=>0, 224000=>0, 256000=>0, 288000=>0, 320000=>0, 352000=>0, 384000=>0, 416000=>0, 448000=>0);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1581
							}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1582
						} elseif ($info['mpeg']['audio']['layer'] == 1) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1583
							$info['mpeg']['audio']['bitrate_distribution'] = array('free'=>0, 32000=>0, 48000=>0, 56000=>0, 64000=>0, 80000=>0, 96000=>0, 112000=>0, 128000=>0, 144000=>0, 160000=>0, 176000=>0, 192000=>0, 224000=>0, 256000=>0);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1584
						} else {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1585
							$info['mpeg']['audio']['bitrate_distribution'] = array('free'=>0, 8000=>0, 16000=>0, 24000=>0, 32000=>0, 40000=>0, 48000=>0, 56000=>0, 64000=>0, 80000=>0, 96000=>0, 112000=>0, 128000=>0, 144000=>0, 160000=>0);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1586
						}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1587
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1588
						$dummy = array('error'=>$info['error'], 'warning'=>$info['warning'], 'avdataend'=>$info['avdataend'], 'avdataoffset'=>$info['avdataoffset']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1589
						$synchstartoffset = $info['avdataoffset'];
5
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
  1590
						$this->fseek($info['avdataoffset']);
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1591
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1592
						// you can play with these numbers:
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1593
						$max_frames_scan  = 50000;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1594
						$max_scan_segments = 10;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1595
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1596
						// don't play with these numbers:
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1597
						$FastMode = false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1598
						$SynchErrorsFound = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1599
						$frames_scanned   = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1600
						$this_scan_segment = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1601
						$frames_scan_per_segment = ceil($max_frames_scan / $max_scan_segments);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1602
						$pct_data_scanned = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1603
						for ($current_segment = 0; $current_segment < $max_scan_segments; $current_segment++) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1604
							$frames_scanned_this_segment = 0;
19
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
  1605
							$scan_start_offset = array();
5
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
  1606
							if ($this->ftell() >= $info['avdataend']) {
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1607
								break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1608
							}
5
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
  1609
							$scan_start_offset[$current_segment] = max($this->ftell(), $info['avdataoffset'] + round($current_segment * (($info['avdataend'] - $info['avdataoffset']) / $max_scan_segments)));
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1610
							if ($current_segment > 0) {
5
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
  1611
								$this->fseek($scan_start_offset[$current_segment]);
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
  1612
								$buffer_4k = $this->fread(4096);
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1613
								for ($j = 0; $j < (strlen($buffer_4k) - 4); $j++) {
16
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1614
									if (($buffer_4k[$j] == "\xFF") && ($buffer_4k[($j + 1)] > "\xE0")) { // synch detected
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1615
										if ($this->decodeMPEGaudioHeader($scan_start_offset[$current_segment] + $j, $dummy, false, false, $FastMode)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1616
											$calculated_next_offset = $scan_start_offset[$current_segment] + $j + $dummy['mpeg']['audio']['framelength'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1617
											if ($this->decodeMPEGaudioHeader($calculated_next_offset, $dummy, false, false, $FastMode)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1618
												$scan_start_offset[$current_segment] += $j;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1619
												break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1620
											}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1621
										}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1622
									}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1623
								}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1624
							}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1625
							$synchstartoffset = $scan_start_offset[$current_segment];
16
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1626
							while (($synchstartoffset < $info['avdataend']) && $this->decodeMPEGaudioHeader($synchstartoffset, $dummy, false, false, $FastMode)) {
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1627
								$FastMode = true;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1628
								$thisframebitrate = $MPEGaudioBitrateLookup[$MPEGaudioVersionLookup[$dummy['mpeg']['audio']['raw']['version']]][$MPEGaudioLayerLookup[$dummy['mpeg']['audio']['raw']['layer']]][$dummy['mpeg']['audio']['raw']['bitrate']];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1629
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1630
								if (empty($dummy['mpeg']['audio']['framelength'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1631
									$SynchErrorsFound++;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1632
									$synchstartoffset++;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1633
								} else {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1634
									getid3_lib::safe_inc($info['mpeg']['audio']['bitrate_distribution'][$thisframebitrate]);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1635
									getid3_lib::safe_inc($info['mpeg']['audio']['stereo_distribution'][$dummy['mpeg']['audio']['channelmode']]);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1636
									getid3_lib::safe_inc($info['mpeg']['audio']['version_distribution'][$dummy['mpeg']['audio']['version']]);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1637
									$synchstartoffset += $dummy['mpeg']['audio']['framelength'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1638
								}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1639
								$frames_scanned++;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1640
								if ($frames_scan_per_segment && (++$frames_scanned_this_segment >= $frames_scan_per_segment)) {
21
48c4eec2b7e6 Add CLAUDE.md documentation and sync WordPress core files
ymh <ymh.work@gmail.com>
parents: 19
diff changeset
  1641
									$this_pct_scanned = getid3_lib::SafeDiv($this->ftell() - $scan_start_offset[$current_segment], $info['avdataend'] - $info['avdataoffset']);
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1642
									if (($current_segment == 0) && (($this_pct_scanned * $max_scan_segments) >= 1)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1643
										// file likely contains < $max_frames_scan, just scan as one segment
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1644
										$max_scan_segments = 1;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1645
										$frames_scan_per_segment = $max_frames_scan;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1646
									} else {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1647
										$pct_data_scanned += $this_pct_scanned;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1648
										break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1649
									}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1650
								}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1651
							}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1652
						}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1653
						if ($pct_data_scanned > 0) {
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1654
							$this->warning('too many MPEG audio frames to scan, only scanned '.$frames_scanned.' frames in '.$max_scan_segments.' segments ('.number_format($pct_data_scanned * 100, 1).'% of file) and extrapolated distribution, playtime and bitrate may be incorrect.');
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1655
							foreach ($info['mpeg']['audio'] as $key1 => $value1) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1656
								if (!preg_match('#_distribution$#i', $key1)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1657
									continue;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1658
								}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1659
								foreach ($value1 as $key2 => $value2) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1660
									$info['mpeg']['audio'][$key1][$key2] = round($value2 / $pct_data_scanned);
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
						}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1664
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1665
						if ($SynchErrorsFound > 0) {
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1666
							$this->warning('Found '.$SynchErrorsFound.' synch errors in histogram analysis');
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1667
							//return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1668
						}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1669
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1670
						$bittotal     = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1671
						$framecounter = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1672
						foreach ($info['mpeg']['audio']['bitrate_distribution'] as $bitratevalue => $bitratecount) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1673
							$framecounter += $bitratecount;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1674
							if ($bitratevalue != 'free') {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1675
								$bittotal += ($bitratevalue * $bitratecount);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1676
							}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1677
						}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1678
						if ($framecounter == 0) {
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1679
							$this->error('Corrupt MP3 file: framecounter == zero');
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1680
							return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1681
						}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1682
						$info['mpeg']['audio']['frame_count'] = getid3_lib::CastAsInt($framecounter);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1683
						$info['mpeg']['audio']['bitrate']     = ($bittotal / $framecounter);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1684
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1685
						$info['audio']['bitrate'] = $info['mpeg']['audio']['bitrate'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1686
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1687
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1688
						// Definitively set VBR vs CBR, even if the Xing/LAME/VBRI header says differently
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1689
						$distinct_bitrates = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1690
						foreach ($info['mpeg']['audio']['bitrate_distribution'] as $bitrate_value => $bitrate_count) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1691
							if ($bitrate_count > 0) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1692
								$distinct_bitrates++;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1693
							}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1694
						}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1695
						if ($distinct_bitrates > 1) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1696
							$info['mpeg']['audio']['bitrate_mode'] = 'vbr';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1697
						} else {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1698
							$info['mpeg']['audio']['bitrate_mode'] = 'cbr';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1699
						}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1700
						$info['audio']['bitrate_mode'] = $info['mpeg']['audio']['bitrate_mode'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1701
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1702
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1703
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1704
					break; // exit while()
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1705
				}
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
			$SynchSeekOffset++;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1709
			if (($avdataoffset + $SynchSeekOffset) >= $info['avdataend']) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1710
				// end of file/data
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1711
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1712
				if (empty($info['mpeg']['audio'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1713
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1714
					$this->error('could not find valid MPEG synch before end of file');
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1715
					if (isset($info['audio']['bitrate'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1716
						unset($info['audio']['bitrate']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1717
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1718
					if (isset($info['mpeg']['audio'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1719
						unset($info['mpeg']['audio']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1720
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1721
					if (isset($info['mpeg']) && (!is_array($info['mpeg']) || empty($info['mpeg']))) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1722
						unset($info['mpeg']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1723
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1724
					return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1725
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1726
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1727
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1728
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1729
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1730
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1731
		$info['audio']['channels']        = $info['mpeg']['audio']['channels'];
21
48c4eec2b7e6 Add CLAUDE.md documentation and sync WordPress core files
ymh <ymh.work@gmail.com>
parents: 19
diff changeset
  1732
		if ($info['audio']['channels'] < 1) {
48c4eec2b7e6 Add CLAUDE.md documentation and sync WordPress core files
ymh <ymh.work@gmail.com>
parents: 19
diff changeset
  1733
			$this->error('Corrupt MP3 file: no channels');
48c4eec2b7e6 Add CLAUDE.md documentation and sync WordPress core files
ymh <ymh.work@gmail.com>
parents: 19
diff changeset
  1734
			return false;
48c4eec2b7e6 Add CLAUDE.md documentation and sync WordPress core files
ymh <ymh.work@gmail.com>
parents: 19
diff changeset
  1735
		}
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1736
		$info['audio']['channelmode']     = $info['mpeg']['audio']['channelmode'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1737
		$info['audio']['sample_rate']     = $info['mpeg']['audio']['sample_rate'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1738
		return true;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1739
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1740
16
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1741
	/**
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1742
	 * @return array
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1743
	 */
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1744
	public static function MPEGaudioVersionArray() {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1745
		static $MPEGaudioVersion = array('2.5', false, '2', '1');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1746
		return $MPEGaudioVersion;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1747
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1748
16
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1749
	/**
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1750
	 * @return array
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1751
	 */
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1752
	public static function MPEGaudioLayerArray() {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1753
		static $MPEGaudioLayer = array(false, 3, 2, 1);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1754
		return $MPEGaudioLayer;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1755
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1756
16
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1757
	/**
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1758
	 * @return array
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1759
	 */
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1760
	public static function MPEGaudioBitrateArray() {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1761
		static $MPEGaudioBitrate;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1762
		if (empty($MPEGaudioBitrate)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1763
			$MPEGaudioBitrate = array (
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1764
				'1'  =>  array (1 => array('free', 32000, 64000, 96000, 128000, 160000, 192000, 224000, 256000, 288000, 320000, 352000, 384000, 416000, 448000),
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1765
								2 => array('free', 32000, 48000, 56000,  64000,  80000,  96000, 112000, 128000, 160000, 192000, 224000, 256000, 320000, 384000),
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1766
								3 => array('free', 32000, 40000, 48000,  56000,  64000,  80000,  96000, 112000, 128000, 160000, 192000, 224000, 256000, 320000)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1767
							   ),
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1768
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1769
				'2'  =>  array (1 => array('free', 32000, 48000, 56000,  64000,  80000,  96000, 112000, 128000, 144000, 160000, 176000, 192000, 224000, 256000),
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1770
								2 => array('free',  8000, 16000, 24000,  32000,  40000,  48000,  56000,  64000,  80000,  96000, 112000, 128000, 144000, 160000),
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1771
							   )
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1772
			);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1773
			$MPEGaudioBitrate['2'][3] = $MPEGaudioBitrate['2'][2];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1774
			$MPEGaudioBitrate['2.5']  = $MPEGaudioBitrate['2'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1775
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1776
		return $MPEGaudioBitrate;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1777
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1778
16
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1779
	/**
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1780
	 * @return array
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1781
	 */
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1782
	public static function MPEGaudioFrequencyArray() {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1783
		static $MPEGaudioFrequency;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1784
		if (empty($MPEGaudioFrequency)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1785
			$MPEGaudioFrequency = array (
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1786
				'1'   => array(44100, 48000, 32000),
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1787
				'2'   => array(22050, 24000, 16000),
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1788
				'2.5' => array(11025, 12000,  8000)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1789
			);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1790
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1791
		return $MPEGaudioFrequency;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1792
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1793
16
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1794
	/**
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1795
	 * @return array
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1796
	 */
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1797
	public static function MPEGaudioChannelModeArray() {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1798
		static $MPEGaudioChannelMode = array('stereo', 'joint stereo', 'dual channel', 'mono');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1799
		return $MPEGaudioChannelMode;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1800
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1801
16
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1802
	/**
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1803
	 * @return array
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1804
	 */
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1805
	public static function MPEGaudioModeExtensionArray() {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1806
		static $MPEGaudioModeExtension;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1807
		if (empty($MPEGaudioModeExtension)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1808
			$MPEGaudioModeExtension = array (
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1809
				1 => array('4-31', '8-31', '12-31', '16-31'),
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1810
				2 => array('4-31', '8-31', '12-31', '16-31'),
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1811
				3 => array('', 'IS', 'MS', 'IS+MS')
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1812
			);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1813
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1814
		return $MPEGaudioModeExtension;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1815
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1816
16
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1817
	/**
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1818
	 * @return array
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1819
	 */
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1820
	public static function MPEGaudioEmphasisArray() {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1821
		static $MPEGaudioEmphasis = array('none', '50/15ms', false, 'CCIT J.17');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1822
		return $MPEGaudioEmphasis;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1823
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1824
16
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1825
	/**
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1826
	 * @param string $head4
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1827
	 * @param bool   $allowBitrate15
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1828
	 *
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1829
	 * @return bool
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1830
	 */
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1831
	public static function MPEGaudioHeaderBytesValid($head4, $allowBitrate15=false) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1832
		return self::MPEGaudioHeaderValid(self::MPEGaudioHeaderDecode($head4), false, $allowBitrate15);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1833
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1834
16
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1835
	/**
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1836
	 * @param array $rawarray
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1837
	 * @param bool  $echoerrors
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1838
	 * @param bool  $allowBitrate15
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1839
	 *
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1840
	 * @return bool
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1841
	 */
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1842
	public static function MPEGaudioHeaderValid($rawarray, $echoerrors=false, $allowBitrate15=false) {
16
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1843
		if (!isset($rawarray['synch']) || ($rawarray['synch'] & 0x0FFE) != 0x0FFE) {
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1844
			return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1845
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1846
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1847
		static $MPEGaudioVersionLookup;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1848
		static $MPEGaudioLayerLookup;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1849
		static $MPEGaudioBitrateLookup;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1850
		static $MPEGaudioFrequencyLookup;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1851
		static $MPEGaudioChannelModeLookup;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1852
		static $MPEGaudioModeExtensionLookup;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1853
		static $MPEGaudioEmphasisLookup;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1854
		if (empty($MPEGaudioVersionLookup)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1855
			$MPEGaudioVersionLookup       = self::MPEGaudioVersionArray();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1856
			$MPEGaudioLayerLookup         = self::MPEGaudioLayerArray();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1857
			$MPEGaudioBitrateLookup       = self::MPEGaudioBitrateArray();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1858
			$MPEGaudioFrequencyLookup     = self::MPEGaudioFrequencyArray();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1859
			$MPEGaudioChannelModeLookup   = self::MPEGaudioChannelModeArray();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1860
			$MPEGaudioModeExtensionLookup = self::MPEGaudioModeExtensionArray();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1861
			$MPEGaudioEmphasisLookup      = self::MPEGaudioEmphasisArray();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1862
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1863
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1864
		if (isset($MPEGaudioVersionLookup[$rawarray['version']])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1865
			$decodedVersion = $MPEGaudioVersionLookup[$rawarray['version']];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1866
		} else {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1867
			echo ($echoerrors ? "\n".'invalid Version ('.$rawarray['version'].')' : '');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1868
			return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1869
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1870
		if (isset($MPEGaudioLayerLookup[$rawarray['layer']])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1871
			$decodedLayer = $MPEGaudioLayerLookup[$rawarray['layer']];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1872
		} else {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1873
			echo ($echoerrors ? "\n".'invalid Layer ('.$rawarray['layer'].')' : '');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1874
			return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1875
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1876
		if (!isset($MPEGaudioBitrateLookup[$decodedVersion][$decodedLayer][$rawarray['bitrate']])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1877
			echo ($echoerrors ? "\n".'invalid Bitrate ('.$rawarray['bitrate'].')' : '');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1878
			if ($rawarray['bitrate'] == 15) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1879
				// known issue in LAME 3.90 - 3.93.1 where free-format has bitrate ID of 15 instead of 0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1880
				// let it go through here otherwise file will not be identified
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1881
				if (!$allowBitrate15) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1882
					return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1883
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1884
			} else {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1885
				return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1886
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1887
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1888
		if (!isset($MPEGaudioFrequencyLookup[$decodedVersion][$rawarray['sample_rate']])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1889
			echo ($echoerrors ? "\n".'invalid Frequency ('.$rawarray['sample_rate'].')' : '');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1890
			return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1891
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1892
		if (!isset($MPEGaudioChannelModeLookup[$rawarray['channelmode']])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1893
			echo ($echoerrors ? "\n".'invalid ChannelMode ('.$rawarray['channelmode'].')' : '');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1894
			return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1895
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1896
		if (!isset($MPEGaudioModeExtensionLookup[$decodedLayer][$rawarray['modeextension']])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1897
			echo ($echoerrors ? "\n".'invalid Mode Extension ('.$rawarray['modeextension'].')' : '');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1898
			return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1899
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1900
		if (!isset($MPEGaudioEmphasisLookup[$rawarray['emphasis']])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1901
			echo ($echoerrors ? "\n".'invalid Emphasis ('.$rawarray['emphasis'].')' : '');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1902
			return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1903
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1904
		// These are just either set or not set, you can't mess that up :)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1905
		// $rawarray['protection'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1906
		// $rawarray['padding'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1907
		// $rawarray['private'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1908
		// $rawarray['copyright'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1909
		// $rawarray['original'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1910
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1911
		return true;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1912
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1913
16
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1914
	/**
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1915
	 * @param string $Header4Bytes
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1916
	 *
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1917
	 * @return array|false
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1918
	 */
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1919
	public static function MPEGaudioHeaderDecode($Header4Bytes) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1920
		// AAAA AAAA  AAAB BCCD  EEEE FFGH  IIJJ KLMM
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1921
		// A - Frame sync (all bits set)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1922
		// B - MPEG Audio version ID
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1923
		// C - Layer description
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1924
		// D - Protection bit
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1925
		// E - Bitrate index
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1926
		// F - Sampling rate frequency index
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1927
		// G - Padding bit
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1928
		// H - Private bit
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1929
		// I - Channel Mode
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1930
		// J - Mode extension (Only if Joint stereo)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1931
		// K - Copyright
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1932
		// L - Original
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1933
		// M - Emphasis
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1934
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1935
		if (strlen($Header4Bytes) != 4) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1936
			return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1937
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1938
19
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
  1939
		$MPEGrawHeader = array();
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1940
		$MPEGrawHeader['synch']         = (getid3_lib::BigEndian2Int(substr($Header4Bytes, 0, 2)) & 0xFFE0) >> 4;
16
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1941
		$MPEGrawHeader['version']       = (ord($Header4Bytes[1]) & 0x18) >> 3; //    BB
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1942
		$MPEGrawHeader['layer']         = (ord($Header4Bytes[1]) & 0x06) >> 1; //      CC
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1943
		$MPEGrawHeader['protection']    = (ord($Header4Bytes[1]) & 0x01);      //        D
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1944
		$MPEGrawHeader['bitrate']       = (ord($Header4Bytes[2]) & 0xF0) >> 4; // EEEE
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1945
		$MPEGrawHeader['sample_rate']   = (ord($Header4Bytes[2]) & 0x0C) >> 2; //     FF
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1946
		$MPEGrawHeader['padding']       = (ord($Header4Bytes[2]) & 0x02) >> 1; //       G
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1947
		$MPEGrawHeader['private']       = (ord($Header4Bytes[2]) & 0x01);      //        H
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1948
		$MPEGrawHeader['channelmode']   = (ord($Header4Bytes[3]) & 0xC0) >> 6; // II
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1949
		$MPEGrawHeader['modeextension'] = (ord($Header4Bytes[3]) & 0x30) >> 4; //   JJ
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1950
		$MPEGrawHeader['copyright']     = (ord($Header4Bytes[3]) & 0x08) >> 3; //     K
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1951
		$MPEGrawHeader['original']      = (ord($Header4Bytes[3]) & 0x04) >> 2; //      L
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1952
		$MPEGrawHeader['emphasis']      = (ord($Header4Bytes[3]) & 0x03);      //       MM
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1953
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1954
		return $MPEGrawHeader;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1955
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1956
16
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1957
	/**
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1958
	 * @param int|string $bitrate
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1959
	 * @param string     $version
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1960
	 * @param string     $layer
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1961
	 * @param bool       $padding
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1962
	 * @param int        $samplerate
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1963
	 *
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1964
	 * @return int|false
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  1965
	 */
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1966
	public static function MPEGaudioFrameLength(&$bitrate, &$version, &$layer, $padding, &$samplerate) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1967
		static $AudioFrameLengthCache = array();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1968
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1969
		if (!isset($AudioFrameLengthCache[$bitrate][$version][$layer][$padding][$samplerate])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1970
			$AudioFrameLengthCache[$bitrate][$version][$layer][$padding][$samplerate] = false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1971
			if ($bitrate != 'free') {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1972
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1973
				if ($version == '1') {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1974
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1975
					if ($layer == '1') {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1976
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1977
						// For Layer I slot is 32 bits long
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1978
						$FrameLengthCoefficient = 48;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1979
						$SlotLength = 4;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1980
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1981
					} else { // Layer 2 / 3
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1982
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1983
						// for Layer 2 and Layer 3 slot is 8 bits long.
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1984
						$FrameLengthCoefficient = 144;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1985
						$SlotLength = 1;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1986
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1987
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1988
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1989
				} else { // MPEG-2 / MPEG-2.5
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1990
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1991
					if ($layer == '1') {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1992
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1993
						// For Layer I slot is 32 bits long
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1994
						$FrameLengthCoefficient = 24;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1995
						$SlotLength = 4;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1996
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1997
					} elseif ($layer == '2') {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1998
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1999
						// for Layer 2 and Layer 3 slot is 8 bits long.
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2000
						$FrameLengthCoefficient = 144;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2001
						$SlotLength = 1;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2002
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2003
					} else { // layer 3
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2004
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2005
						// for Layer 2 and Layer 3 slot is 8 bits long.
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2006
						$FrameLengthCoefficient = 72;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2007
						$SlotLength = 1;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2008
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2009
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2010
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2011
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2012
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2013
				// FrameLengthInBytes = ((Coefficient * BitRate) / SampleRate) + Padding
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2014
				if ($samplerate > 0) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2015
					$NewFramelength  = ($FrameLengthCoefficient * $bitrate) / $samplerate;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2016
					$NewFramelength  = floor($NewFramelength / $SlotLength) * $SlotLength; // round to next-lower multiple of SlotLength (1 byte for Layer 2/3, 4 bytes for Layer I)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2017
					if ($padding) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2018
						$NewFramelength += $SlotLength;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2019
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2020
					$AudioFrameLengthCache[$bitrate][$version][$layer][$padding][$samplerate] = (int) $NewFramelength;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2021
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2022
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2023
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2024
		return $AudioFrameLengthCache[$bitrate][$version][$layer][$padding][$samplerate];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2025
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2026
16
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  2027
	/**
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  2028
	 * @param float|int $bit_rate
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  2029
	 *
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  2030
	 * @return int|float|string
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  2031
	 */
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2032
	public static function ClosestStandardMP3Bitrate($bit_rate) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2033
		static $standard_bit_rates = array (320000, 256000, 224000, 192000, 160000, 128000, 112000, 96000, 80000, 64000, 56000, 48000, 40000, 32000, 24000, 16000, 8000);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2034
		static $bit_rate_table = array (0=>'-');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2035
		$round_bit_rate = intval(round($bit_rate, -3));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2036
		if (!isset($bit_rate_table[$round_bit_rate])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2037
			if ($round_bit_rate > max($standard_bit_rates)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2038
				$bit_rate_table[$round_bit_rate] = round($bit_rate, 2 - strlen($bit_rate));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2039
			} else {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2040
				$bit_rate_table[$round_bit_rate] = max($standard_bit_rates);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2041
				foreach ($standard_bit_rates as $standard_bit_rate) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2042
					if ($round_bit_rate >= $standard_bit_rate + (($bit_rate_table[$round_bit_rate] - $standard_bit_rate) / 2)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2043
						break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2044
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2045
					$bit_rate_table[$round_bit_rate] = $standard_bit_rate;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2046
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2047
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2048
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2049
		return $bit_rate_table[$round_bit_rate];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2050
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2051
16
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  2052
	/**
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  2053
	 * @param string $version
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  2054
	 * @param string $channelmode
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  2055
	 *
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  2056
	 * @return int
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  2057
	 */
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2058
	public static function XingVBRidOffset($version, $channelmode) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2059
		static $XingVBRidOffsetCache = array();
16
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  2060
		if (empty($XingVBRidOffsetCache)) {
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  2061
			$XingVBRidOffsetCache = array (
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2062
				'1'   => array ('mono'          => 0x15, // 4 + 17 = 21
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2063
								'stereo'        => 0x24, // 4 + 32 = 36
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2064
								'joint stereo'  => 0x24,
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2065
								'dual channel'  => 0x24
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2066
							   ),
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2067
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2068
				'2'   => array ('mono'          => 0x0D, // 4 +  9 = 13
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2069
								'stereo'        => 0x15, // 4 + 17 = 21
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2070
								'joint stereo'  => 0x15,
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2071
								'dual channel'  => 0x15
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2072
							   ),
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2073
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2074
				'2.5' => array ('mono'          => 0x15,
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2075
								'stereo'        => 0x15,
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2076
								'joint stereo'  => 0x15,
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2077
								'dual channel'  => 0x15
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2078
							   )
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2079
			);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2080
		}
16
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  2081
		return $XingVBRidOffsetCache[$version][$channelmode];
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2082
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2083
16
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  2084
	/**
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  2085
	 * @param int $VBRmethodID
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  2086
	 *
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  2087
	 * @return string
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  2088
	 */
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2089
	public static function LAMEvbrMethodLookup($VBRmethodID) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2090
		static $LAMEvbrMethodLookup = array(
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2091
			0x00 => 'unknown',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2092
			0x01 => 'cbr',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2093
			0x02 => 'abr',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2094
			0x03 => 'vbr-old / vbr-rh',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2095
			0x04 => 'vbr-new / vbr-mtrh',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2096
			0x05 => 'vbr-mt',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2097
			0x06 => 'vbr (full vbr method 4)',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2098
			0x08 => 'cbr (constant bitrate 2 pass)',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2099
			0x09 => 'abr (2 pass)',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2100
			0x0F => 'reserved'
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2101
		);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2102
		return (isset($LAMEvbrMethodLookup[$VBRmethodID]) ? $LAMEvbrMethodLookup[$VBRmethodID] : '');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2103
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2104
16
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  2105
	/**
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  2106
	 * @param int $StereoModeID
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  2107
	 *
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  2108
	 * @return string
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  2109
	 */
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2110
	public static function LAMEmiscStereoModeLookup($StereoModeID) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2111
		static $LAMEmiscStereoModeLookup = array(
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2112
			0 => 'mono',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2113
			1 => 'stereo',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2114
			2 => 'dual mono',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2115
			3 => 'joint stereo',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2116
			4 => 'forced stereo',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2117
			5 => 'auto',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2118
			6 => 'intensity stereo',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2119
			7 => 'other'
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2120
		);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2121
		return (isset($LAMEmiscStereoModeLookup[$StereoModeID]) ? $LAMEmiscStereoModeLookup[$StereoModeID] : '');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2122
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2123
16
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  2124
	/**
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  2125
	 * @param int $SourceSampleFrequencyID
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  2126
	 *
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  2127
	 * @return string
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  2128
	 */
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2129
	public static function LAMEmiscSourceSampleFrequencyLookup($SourceSampleFrequencyID) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2130
		static $LAMEmiscSourceSampleFrequencyLookup = array(
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2131
			0 => '<= 32 kHz',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2132
			1 => '44.1 kHz',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2133
			2 => '48 kHz',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2134
			3 => '> 48kHz'
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2135
		);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2136
		return (isset($LAMEmiscSourceSampleFrequencyLookup[$SourceSampleFrequencyID]) ? $LAMEmiscSourceSampleFrequencyLookup[$SourceSampleFrequencyID] : '');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2137
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2138
16
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  2139
	/**
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  2140
	 * @param int $SurroundInfoID
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  2141
	 *
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  2142
	 * @return string
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  2143
	 */
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2144
	public static function LAMEsurroundInfoLookup($SurroundInfoID) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2145
		static $LAMEsurroundInfoLookup = array(
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2146
			0 => 'no surround info',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2147
			1 => 'DPL encoding',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2148
			2 => 'DPL2 encoding',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2149
			3 => 'Ambisonic encoding'
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2150
		);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2151
		return (isset($LAMEsurroundInfoLookup[$SurroundInfoID]) ? $LAMEsurroundInfoLookup[$SurroundInfoID] : 'reserved');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2152
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2153
16
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  2154
	/**
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  2155
	 * @param array $LAMEtag
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  2156
	 *
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  2157
	 * @return string
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
  2158
	 */
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2159
	public static function LAMEpresetUsedLookup($LAMEtag) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2160
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2161
		if ($LAMEtag['preset_used_id'] == 0) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2162
			// no preset used (LAME >=3.93)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2163
			// no preset recorded (LAME <3.93)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2164
			return '';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2165
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2166
		$LAMEpresetUsedLookup = array();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2167
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2168
		/////  THIS PART CANNOT BE STATIC .
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2169
		for ($i = 8; $i <= 320; $i++) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2170
			switch ($LAMEtag['vbr_method']) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2171
				case 'cbr':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2172
					$LAMEpresetUsedLookup[$i] = '--alt-preset '.$LAMEtag['vbr_method'].' '.$i;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2173
					break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2174
				case 'abr':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2175
				default: // other VBR modes shouldn't be here(?)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2176
					$LAMEpresetUsedLookup[$i] = '--alt-preset '.$i;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2177
					break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2178
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2179
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2180
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2181
		// named old-style presets (studio, phone, voice, etc) are handled in GuessEncoderOptions()
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2182
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2183
		// named alt-presets
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2184
		$LAMEpresetUsedLookup[1000] = '--r3mix';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2185
		$LAMEpresetUsedLookup[1001] = '--alt-preset standard';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2186
		$LAMEpresetUsedLookup[1002] = '--alt-preset extreme';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2187
		$LAMEpresetUsedLookup[1003] = '--alt-preset insane';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2188
		$LAMEpresetUsedLookup[1004] = '--alt-preset fast standard';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2189
		$LAMEpresetUsedLookup[1005] = '--alt-preset fast extreme';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2190
		$LAMEpresetUsedLookup[1006] = '--alt-preset medium';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2191
		$LAMEpresetUsedLookup[1007] = '--alt-preset fast medium';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2192
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2193
		// LAME 3.94 additions/changes
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2194
		$LAMEpresetUsedLookup[1010] = '--preset portable';                                                           // 3.94a15 Oct 21 2003
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2195
		$LAMEpresetUsedLookup[1015] = '--preset radio';                                                              // 3.94a15 Oct 21 2003
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2196
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2197
		$LAMEpresetUsedLookup[320]  = '--preset insane';                                                             // 3.94a15 Nov 12 2003
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2198
		$LAMEpresetUsedLookup[410]  = '-V9';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2199
		$LAMEpresetUsedLookup[420]  = '-V8';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2200
		$LAMEpresetUsedLookup[440]  = '-V6';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2201
		$LAMEpresetUsedLookup[430]  = '--preset radio';                                                              // 3.94a15 Nov 12 2003
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2202
		$LAMEpresetUsedLookup[450]  = '--preset '.(($LAMEtag['raw']['vbr_method'] == 4) ? 'fast ' : '').'portable';  // 3.94a15 Nov 12 2003
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2203
		$LAMEpresetUsedLookup[460]  = '--preset '.(($LAMEtag['raw']['vbr_method'] == 4) ? 'fast ' : '').'medium';    // 3.94a15 Nov 12 2003
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2204
		$LAMEpresetUsedLookup[470]  = '--r3mix';                                                                     // 3.94b1  Dec 18 2003
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2205
		$LAMEpresetUsedLookup[480]  = '--preset '.(($LAMEtag['raw']['vbr_method'] == 4) ? 'fast ' : '').'standard';  // 3.94a15 Nov 12 2003
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2206
		$LAMEpresetUsedLookup[490]  = '-V1';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2207
		$LAMEpresetUsedLookup[500]  = '--preset '.(($LAMEtag['raw']['vbr_method'] == 4) ? 'fast ' : '').'extreme';   // 3.94a15 Nov 12 2003
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2208
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2209
		return (isset($LAMEpresetUsedLookup[$LAMEtag['preset_used_id']]) ? $LAMEpresetUsedLookup[$LAMEtag['preset_used_id']] : 'new/unknown preset: '.$LAMEtag['preset_used_id'].' - report to info@getid3.org');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2210
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2211
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2212
}