summaryrefslogtreecommitdiffstats
path: root/modules/getid3/module.audio.monkey.php
diff options
context:
space:
mode:
Diffstat (limited to 'modules/getid3/module.audio.monkey.php')
-rw-r--r--modules/getid3/module.audio.monkey.php216
1 files changed, 216 insertions, 0 deletions
diff --git a/modules/getid3/module.audio.monkey.php b/modules/getid3/module.audio.monkey.php
new file mode 100644
index 00000000..4ea1d6fe
--- /dev/null
+++ b/modules/getid3/module.audio.monkey.php
@@ -0,0 +1,216 @@
+<?php
+// +----------------------------------------------------------------------+
+// | PHP version 5 |
+// +----------------------------------------------------------------------+
+// | Copyright (c) 2002-2006 James Heinrich, Allan Hansen |
+// +----------------------------------------------------------------------+
+// | This source file is subject to version 2 of the GPL license, |
+// | that is bundled with this package in the file license.txt and is |
+// | available through the world-wide-web at the following url: |
+// | http://www.gnu.org/copyleft/gpl.html |
+// +----------------------------------------------------------------------+
+// | getID3() - http://getid3.sourceforge.net or http://www.getid3.org |
+// +----------------------------------------------------------------------+
+// | Authors: James Heinrich <infoØgetid3*org> |
+// | Allan Hansen <ahØartemis*dk> |
+// +----------------------------------------------------------------------+
+// | module.audio.monkey.php |
+// | Module for analyzing Monkey's Audio files |
+// | dependencies: NONE |
+// +----------------------------------------------------------------------+
+//
+// $Id: module.audio.monkey.php,v 1.2 2006/11/02 10:48:01 ah Exp $
+
+
+
+class getid3_monkey extends getid3_handler
+{
+
+ public function Analyze() {
+
+ $getid3 = $this->getid3;
+
+ // based loosely on code from TMonkey by Jurgen Faul <jfaulØgmx*de>
+ // http://jfaul.de/atl or http://j-faul.virtualave.net/atl/atl.html
+
+ $getid3->info['fileformat'] = 'mac';
+ $getid3->info['audio']['dataformat'] = 'mac';
+ $getid3->info['audio']['bitrate_mode'] = 'vbr';
+ $getid3->info['audio']['lossless'] = true;
+
+ $getid3->info['monkeys_audio']['raw'] = array ();
+ $info_monkeys_audio = &$getid3->info['monkeys_audio'];
+ $info_monkeys_audio_raw = &$info_monkeys_audio['raw'];
+
+ // Read file header
+ fseek($getid3->fp, $getid3->info['avdataoffset'], SEEK_SET);
+ $mac_header_data = fread($getid3->fp, 74);
+
+ $info_monkeys_audio_raw['magic'] = 'MAC '; // Magic bytes
+
+ // Read MAC version
+ $info_monkeys_audio_raw['nVersion'] = getid3_lib::LittleEndian2Int(substr($mac_header_data, 4, 2)); // appears to be uint32 in 3.98+
+
+ // Parse MAC Header < v3980
+ if ($info_monkeys_audio_raw['nVersion'] < 3980) {
+
+ getid3_lib::ReadSequence("LittleEndian2Int", $info_monkeys_audio_raw, $mac_header_data, 6,
+ array (
+ 'nCompressionLevel' => 2,
+ 'nFormatFlags' => 2,
+ 'nChannels' => 2,
+ 'nSampleRate' => 4,
+ 'nHeaderDataBytes' => 4,
+ 'nWAVTerminatingBytes' => 4,
+ 'nTotalFrames' => 4,
+ 'nFinalFrameSamples' => 4,
+ 'nPeakLevel' => 4,
+ 'IGNORE-1' => 2,
+ 'nSeekElements' => 2
+ )
+ );
+ }
+
+ // Parse MAC Header >= v3980
+ else {
+
+ getid3_lib::ReadSequence("LittleEndian2Int", $info_monkeys_audio_raw, $mac_header_data, 8,
+ array (
+ // APE_DESCRIPTOR
+ 'nDescriptorBytes' => 4,
+ 'nHeaderBytes' => 4,
+ 'nSeekTableBytes' => 4,
+ 'nHeaderDataBytes' => 4,
+ 'nAPEFrameDataBytes' => 4,
+ 'nAPEFrameDataBytesHigh'=> 4,
+ 'nTerminatingDataBytes' => 4,
+
+ // MD5 - string
+ 'cFileMD5' => -16,
+
+ // APE_HEADER
+ 'nCompressionLevel' => 2,
+ 'nFormatFlags' => 2,
+ 'nBlocksPerFrame' => 4,
+ 'nFinalFrameBlocks' => 4,
+ 'nTotalFrames' => 4,
+ 'nBitsPerSample' => 2,
+ 'nChannels' => 2,
+ 'nSampleRate' => 4
+ )
+ );
+ }
+
+ // Process data
+ $info_monkeys_audio['flags']['8-bit'] = (bool)($info_monkeys_audio_raw['nFormatFlags'] & 0x0001);
+ $info_monkeys_audio['flags']['crc-32'] = (bool)($info_monkeys_audio_raw['nFormatFlags'] & 0x0002);
+ $info_monkeys_audio['flags']['peak_level'] = (bool)($info_monkeys_audio_raw['nFormatFlags'] & 0x0004);
+ $info_monkeys_audio['flags']['24-bit'] = (bool)($info_monkeys_audio_raw['nFormatFlags'] & 0x0008);
+ $info_monkeys_audio['flags']['seek_elements'] = (bool)($info_monkeys_audio_raw['nFormatFlags'] & 0x0010);
+ $info_monkeys_audio['flags']['no_wav_header'] = (bool)($info_monkeys_audio_raw['nFormatFlags'] & 0x0020);
+
+ $info_monkeys_audio['version'] = $info_monkeys_audio_raw['nVersion'] / 1000;
+
+ $info_monkeys_audio['compression'] = getid3_monkey::MonkeyCompressionLevelNameLookup($info_monkeys_audio_raw['nCompressionLevel']);
+
+ $info_monkeys_audio['bits_per_sample'] = ($info_monkeys_audio['flags']['24-bit'] ? 24 : ($info_monkeys_audio['flags']['8-bit'] ? 8 : 16));
+
+ $info_monkeys_audio['channels'] = $info_monkeys_audio_raw['nChannels'];
+
+ $getid3->info['audio']['channels'] = $info_monkeys_audio['channels'];
+
+ $info_monkeys_audio['sample_rate'] = $info_monkeys_audio_raw['nSampleRate'];
+
+ $getid3->info['audio']['sample_rate'] = $info_monkeys_audio['sample_rate'];
+
+ if ($info_monkeys_audio['flags']['peak_level']) {
+ $info_monkeys_audio['peak_level'] = $info_monkeys_audio_raw['nPeakLevel'];
+ $info_monkeys_audio['peak_ratio'] = $info_monkeys_audio['peak_level'] / pow(2, $info_monkeys_audio['bits_per_sample'] - 1);
+ }
+
+ // MAC >= v3980
+ if ($info_monkeys_audio_raw['nVersion'] >= 3980) {
+ $info_monkeys_audio['samples'] = (($info_monkeys_audio_raw['nTotalFrames'] - 1) * $info_monkeys_audio_raw['nBlocksPerFrame']) + $info_monkeys_audio_raw['nFinalFrameBlocks'];
+ }
+
+ // MAC < v3980
+ else {
+ $info_monkeys_audio['samples_per_frame'] = getid3_monkey::MonkeySamplesPerFrame($info_monkeys_audio_raw['nVersion'], $info_monkeys_audio_raw['nCompressionLevel']);
+ $info_monkeys_audio['samples'] = (($info_monkeys_audio_raw['nTotalFrames'] - 1) * $info_monkeys_audio['samples_per_frame']) + $info_monkeys_audio_raw['nFinalFrameSamples'];
+ }
+
+ $info_monkeys_audio['playtime'] = $info_monkeys_audio['samples'] / $info_monkeys_audio['sample_rate'];
+
+ $getid3->info['playtime_seconds'] = $info_monkeys_audio['playtime'];
+
+ $info_monkeys_audio['compressed_size'] = $getid3->info['avdataend'] - $getid3->info['avdataoffset'];
+ $info_monkeys_audio['uncompressed_size'] = $info_monkeys_audio['samples'] * $info_monkeys_audio['channels'] * ($info_monkeys_audio['bits_per_sample'] / 8);
+ $info_monkeys_audio['compression_ratio'] = $info_monkeys_audio['compressed_size'] / ($info_monkeys_audio['uncompressed_size'] + $info_monkeys_audio_raw['nHeaderDataBytes']);
+ $info_monkeys_audio['bitrate'] = (($info_monkeys_audio['samples'] * $info_monkeys_audio['channels'] * $info_monkeys_audio['bits_per_sample']) / $info_monkeys_audio['playtime']) * $info_monkeys_audio['compression_ratio'];
+
+ $getid3->info['audio']['bitrate'] = $info_monkeys_audio['bitrate'];
+
+ $getid3->info['audio']['bits_per_sample'] = $info_monkeys_audio['bits_per_sample'];
+ $getid3->info['audio']['encoder'] = 'MAC v'.number_format($info_monkeys_audio['version'], 2);
+ $getid3->info['audio']['encoder_options'] = ucfirst($info_monkeys_audio['compression']).' compression';
+
+ // MAC >= v3980 - get avdataoffsets from MAC header
+ if ($info_monkeys_audio_raw['nVersion'] >= 3980) {
+ $getid3->info['avdataoffset'] += $info_monkeys_audio_raw['nDescriptorBytes'] + $info_monkeys_audio_raw['nHeaderBytes'] + $info_monkeys_audio_raw['nSeekTableBytes'] + $info_monkeys_audio_raw['nHeaderDataBytes'];
+ $getid3->info['avdataend'] -= $info_monkeys_audio_raw['nTerminatingDataBytes'];
+ }
+
+ // MAC < v3980 Add size of MAC header to avdataoffset
+ else {
+ $getid3->info['avdataoffset'] += 8;
+ }
+
+ // Convert md5sum to 32 byte string
+ if (@$info_monkeys_audio_raw['cFileMD5']) {
+ if ($info_monkeys_audio_raw['cFileMD5'] !== str_repeat("\x00", 16)) {
+ $getid3->info['md5_data_source'] = '';
+ $md5 = $info_monkeys_audio_raw['cFileMD5'];
+ for ($i = 0; $i < strlen($md5); $i++) {
+ $getid3->info['md5_data_source'] .= str_pad(dechex(ord($md5{$i})), 2, '00', STR_PAD_LEFT);
+ }
+ if (!preg_match('/^[0-9a-f]{32}$/', $getid3->info['md5_data_source'])) {
+ unset($getid3->info['md5_data_source']);
+ }
+ }
+ }
+
+
+ return true;
+ }
+
+
+
+ public static function MonkeyCompressionLevelNameLookup($compression_level) {
+
+ static $lookup = array (
+ 0 => 'unknown',
+ 1000 => 'fast',
+ 2000 => 'normal',
+ 3000 => 'high',
+ 4000 => 'extra-high',
+ 5000 => 'insane'
+ );
+ return (isset($lookup[$compression_level]) ? $lookup[$compression_level] : 'invalid');
+ }
+
+
+
+ public static function MonkeySamplesPerFrame($version_id, $compression_level) {
+
+ if ($version_id >= 3950) {
+ return 73728 * 4;
+ }
+ if (($version_id >= 3900) || (($version_id >= 3800) && ($compression_level == 4000))) {
+ return 73728;
+ }
+ return 9216;
+ }
+
+}
+
+?> \ No newline at end of file
generated by cgit (git 2.34.1) at 2025-08-13 09:52:16 +0000