Mercurial > judyates

comparison e2gallerypro/e2upload/Backend/Assets/getid3/module.audio.avr.php @ 3:3f6b44aa6b35 judyates

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[svn r4] added ability to buy stuff, from a Prints page, but it doesn't work well with the css, and it also has not been fitted into the perl make system.
author rlm
date Mon, 22 Feb 2010 08:02:39 -0500
parents
children
comparison
equal deleted inserted replaced
2:670229c4eb4b 3:3f6b44aa6b35
1 <?php
2 // +----------------------------------------------------------------------+
3 // | PHP version 5 |
4 // +----------------------------------------------------------------------+
5 // | Copyright (c) 2002-2006 James Heinrich, Allan Hansen |
6 // +----------------------------------------------------------------------+
7 // | This source file is subject to version 2 of the GPL license, |
8 // | that is bundled with this package in the file license.txt and is |
9 // | available through the world-wide-web at the following url: |
10 // | http://www.gnu.org/copyleft/gpl.html |
11 // +----------------------------------------------------------------------+
12 // | getID3() - http://getid3.sourceforge.net or http://www.getid3.org |
13 // +----------------------------------------------------------------------+
14 // | Authors: James Heinrich <infoØgetid3*org> |
15 // | Allan Hansen <ahØartemis*dk> |
16 // +----------------------------------------------------------------------+
17 // | module.audio.avr.php |
18 // | Module for analyzing AVR audio files |
19 // | dependencies: NONE |
20 // +----------------------------------------------------------------------+
21 //
22 // $Id: module.audio.avr.php,v 1.2 2006/11/02 10:48:01 ah Exp $
23
24
25
26 class getid3_avr extends getid3_handler
27 {
28
29 public function Analyze() {
30
31 $getid3 = $this->getid3;
32
33 // http://cui.unige.ch/OSG/info/AudioFormats/ap11.html
34 // http://www.btinternet.com/~AnthonyJ/Atari/programming/avr_format.html
35 // offset type length name comments
36 // ---------------------------------------------------------------------
37 // 0 char 4 ID format ID == "2BIT"
38 // 4 char 8 name sample name (unused space filled with 0)
39 // 12 short 1 mono/stereo 0=mono, -1 (0xFFFF)=stereo
40 // With stereo, samples are alternated,
41 // the first voice is the left :
42 // (LRLRLRLRLRLRLRLRLR...)
43 // 14 short 1 resolution 8, 12 or 16 (bits)
44 // 16 short 1 signed or not 0=unsigned, -1 (0xFFFF)=signed
45 // 18 short 1 loop or not 0=no loop, -1 (0xFFFF)=loop on
46 // 20 short 1 MIDI note 0xFFnn, where 0 <= nn <= 127
47 // 0xFFFF means "no MIDI note defined"
48 // 22 byte 1 Replay speed Frequence in the Replay software
49 // 0=5.485 Khz, 1=8.084 Khz, 2=10.971 Khz,
50 // 3=16.168 Khz, 4=21.942 Khz, 5=32.336 Khz
51 // 6=43.885 Khz, 7=47.261 Khz
52 // -1 (0xFF)=no defined Frequence
53 // 23 byte 3 sample rate in Hertz
54 // 26 long 1 size in bytes (2 * bytes in stereo)
55 // 30 long 1 loop begin 0 for no loop
56 // 34 long 1 loop size equal to 'size' for no loop
57 // 38 short 2 Reserved, MIDI keyboard split */
58 // 40 short 2 Reserved, sample compression */
59 // 42 short 2 Reserved */
60 // 44 char 20; Additional filename space, used if (name[7] != 0)
61 // 64 byte 64 user data
62 // 128 bytes ? sample data (12 bits samples are coded on 16 bits:
63 // 0000 xxxx xxxx xxxx)
64 // ---------------------------------------------------------------------
65
66 // Note that all values are in motorola (big-endian) format, and that long is
67 // assumed to be 4 bytes, and short 2 bytes.
68 // When reading the samples, you should handle both signed and unsigned data,
69 // and be prepared to convert 16->8 bit, or mono->stereo if needed. To convert
70 // 8-bit data between signed/unsigned just add 127 to the sample values.
71 // Simularly for 16-bit data you should add 32769
72
73
74 // Magic bytes: '2BIT'
75
76 $getid3->info['avr'] = array ();
77 $info_avr = &$getid3->info['avr'];
78
79 $getid3->info['fileformat'] = 'avr';
80 $info_avr['raw']['magic'] = '2BIT';
81
82 fseek($getid3->fp, $getid3->info['avdataoffset'], SEEK_SET);
83 $avr_header = fread($getid3->fp, 128);
84
85 $getid3->info['avdataoffset'] += 128;
86
87 $info_avr['sample_name'] = rtrim(substr($avr_header, 4, 8));
88
89 $info_avr['raw']['mono'] = getid3_lib::BigEndian2Int(substr($avr_header, 12, 2));
90 $info_avr['bits_per_sample'] = getid3_lib::BigEndian2Int(substr($avr_header, 14, 2));
91 $info_avr['raw']['signed'] = getid3_lib::BigEndian2Int(substr($avr_header, 16, 2));
92 $info_avr['raw']['loop'] = getid3_lib::BigEndian2Int(substr($avr_header, 18, 2));
93 $info_avr['raw']['midi'] = getid3_lib::BigEndian2Int(substr($avr_header, 20, 2));
94 $info_avr['raw']['replay_freq'] = getid3_lib::BigEndian2Int(substr($avr_header, 22, 1));
95 $info_avr['sample_rate'] = getid3_lib::BigEndian2Int(substr($avr_header, 23, 3));
96 $info_avr['sample_length'] = getid3_lib::BigEndian2Int(substr($avr_header, 26, 4));
97 $info_avr['loop_start'] = getid3_lib::BigEndian2Int(substr($avr_header, 30, 4));
98 $info_avr['loop_end'] = getid3_lib::BigEndian2Int(substr($avr_header, 34, 4));
99 $info_avr['midi_split'] = getid3_lib::BigEndian2Int(substr($avr_header, 38, 2));
100 $info_avr['sample_compression'] = getid3_lib::BigEndian2Int(substr($avr_header, 40, 2));
101 $info_avr['reserved'] = getid3_lib::BigEndian2Int(substr($avr_header, 42, 2));
102 $info_avr['sample_name_extra'] = rtrim(substr($avr_header, 44, 20));
103 $info_avr['comment'] = rtrim(substr($avr_header, 64, 64));
104
105 $info_avr['flags']['stereo'] = (($info_avr['raw']['mono'] == 0) ? false : true);
106 $info_avr['flags']['signed'] = (($info_avr['raw']['signed'] == 0) ? false : true);
107 $info_avr['flags']['loop'] = (($info_avr['raw']['loop'] == 0) ? false : true);
108
109 $info_avr['midi_notes'] = array ();
110 if (($info_avr['raw']['midi'] & 0xFF00) != 0xFF00) {
111 $info_avr['midi_notes'][] = ($info_avr['raw']['midi'] & 0xFF00) >> 8;
112 }
113 if (($info_avr['raw']['midi'] & 0x00FF) != 0x00FF) {
114 $info_avr['midi_notes'][] = ($info_avr['raw']['midi'] & 0x00FF);
115 }
116
117 if (($getid3->info['avdataend'] - $getid3->info['avdataoffset']) != ($info_avr['sample_length'] * (($info_avr['bits_per_sample'] == 8) ? 1 : 2))) {
118 $getid3->warning('Probable truncated file: expecting '.($info_avr['sample_length'] * (($info_avr['bits_per_sample'] == 8) ? 1 : 2)).' bytes of audio data, found '.($getid3->info['avdataend'] - $getid3->info['avdataoffset']));
119 }
120
121 $getid3->info['audio']['dataformat'] = 'avr';
122 $getid3->info['audio']['lossless'] = true;
123 $getid3->info['audio']['bitrate_mode'] = 'cbr';
124 $getid3->info['audio']['bits_per_sample'] = $info_avr['bits_per_sample'];
125 $getid3->info['audio']['sample_rate'] = $info_avr['sample_rate'];
126 $getid3->info['audio']['channels'] = ($info_avr['flags']['stereo'] ? 2 : 1);
127 $getid3->info['playtime_seconds'] = ($info_avr['sample_length'] / $getid3->info['audio']['channels']) / $info_avr['sample_rate'];
128 $getid3->info['audio']['bitrate'] = ($info_avr['sample_length'] * (($info_avr['bits_per_sample'] == 8) ? 8 : 16)) / $getid3->info['playtime_seconds'];
129
130 return true;
131 }
132 }
133
134
135 ?>