← Back to branch summary

~ubuntu-branches/ubuntu/karmic/ampache/karmic

« back to all changes in this revision

Viewing changes to modules/id3/getid3/module.audio.vqf.php

  • Committer: Bazaar Package Importer
  • Author(s): Charlie Smotherman
  • Date: 2008-05-15 18:44:23 UTC
  • mfrom: (1.1.2 upstream)
  • Revision ID: james.westby@ubuntu.com-20080515184423-n47i81yk2s99iuci
Tags: 3.4-2
Included some upstream gather album art fixes.

Show diffs side-by-side

added added

removed removed

Lines of Context:
modules/id3/getid3/module.audio.vqf.php
1
 
<?php
2
 
/////////////////////////////////////////////////////////////////
3
 
/// getID3() by James Heinrich <info@getid3.org>               //
4
 
//  available at http://getid3.sourceforge.net                 //
5
 
//            or http://www.getid3.org                         //
6
 
/////////////////////////////////////////////////////////////////
7
 
// See readme.txt for more details                             //
8
 
/////////////////////////////////////////////////////////////////
9
 
//                                                             //
10
 
// module.audio.vqf.php                                        //
11
 
// module for analyzing VQF audio files                        //
12
 
// dependencies: NONE                                          //
13
 
//                                                            ///
14
 
/////////////////////////////////////////////////////////////////
15
 
 
16
 
 
17
 
class getid3_vqf
18
 
{
19
 
        function getid3_vqf(&$fd, &$ThisFileInfo) {
20
 
                // based loosely on code from TTwinVQ by Jurgen Faul <jfaul�gmx*de>
21
 
                // http://jfaul.de/atl  or  http://j-faul.virtualave.net/atl/atl.html
22
 
 
23
 
                $ThisFileInfo['fileformat']            = 'vqf';
24
 
                $ThisFileInfo['audio']['dataformat']   = 'vqf';
25
 
                $ThisFileInfo['audio']['bitrate_mode'] = 'cbr';
26
 
                $ThisFileInfo['audio']['lossless']     = false;
27
 
 
28
 
                // shortcut
29
 
                $ThisFileInfo['vqf']['raw'] = array();
30
 
                $thisfile_vqf               = &$ThisFileInfo['vqf'];
31
 
                $thisfile_vqf_raw           = &$thisfile_vqf['raw'];
32
 
 
33
 
                fseek($fd, $ThisFileInfo['avdataoffset'], SEEK_SET);
34
 
                $VQFheaderData = fread($fd, 16);
35
 
 
36
 
                $offset = 0;
37
 
                $thisfile_vqf_raw['header_tag']     =               substr($VQFheaderData, $offset, 4);
38
 
                if ($thisfile_vqf_raw['header_tag'] != 'TWIN') {
39
 
                        $ThisFileInfo['error'][] = 'Expecting "TWIN" at offset '.$ThisFileInfo['avdataoffset'].', found "'.$thisfile_vqf_raw['header_tag'].'"';
40
 
                        unset($ThisFileInfo['vqf']);
41
 
                        unset($ThisFileInfo['fileformat']);
42
 
                        return false;
43
 
                }
44
 
                $offset += 4;
45
 
                $thisfile_vqf_raw['version']        =               substr($VQFheaderData, $offset, 8);
46
 
                $offset += 8;
47
 
                $thisfile_vqf_raw['size']           = getid3_lib::BigEndian2Int(substr($VQFheaderData, $offset, 4));
48
 
                $offset += 4;
49
 
 
50
 
                while (ftell($fd) < $ThisFileInfo['avdataend']) {
51
 
 
52
 
                        $ChunkBaseOffset = ftell($fd);
53
 
                        $chunkoffset = 0;
54
 
                        $ChunkData = fread($fd, 8);
55
 
                        $ChunkName = substr($ChunkData, $chunkoffset, 4);
56
 
                        if ($ChunkName == 'DATA') {
57
 
                                $ThisFileInfo['avdataoffset'] = $ChunkBaseOffset;
58
 
                                break;
59
 
                        }
60
 
                        $chunkoffset += 4;
61
 
                        $ChunkSize = getid3_lib::BigEndian2Int(substr($ChunkData, $chunkoffset, 4));
62
 
                        $chunkoffset += 4;
63
 
                        if ($ChunkSize > ($ThisFileInfo['avdataend'] - ftell($fd))) {
64
 
                                $ThisFileInfo['error'][] = 'Invalid chunk size ('.$ChunkSize.') for chunk "'.$ChunkName.'" at offset '.$ChunkBaseOffset;
65
 
                                break;
66
 
                        }
67
 
                        if ($ChunkSize > 0) {
68
 
                                $ChunkData .= fread($fd, $ChunkSize);
69
 
                        }
70
 
 
71
 
                        switch ($ChunkName) {
72
 
                                case 'COMM':
73
 
                                        // shortcut
74
 
                                        $thisfile_vqf['COMM'] = array();
75
 
                                        $thisfile_vqf_COMM    = &$thisfile_vqf['COMM'];
76
 
 
77
 
                                        $thisfile_vqf_COMM['channel_mode']   = getid3_lib::BigEndian2Int(substr($ChunkData, $chunkoffset, 4));
78
 
                                        $chunkoffset += 4;
79
 
                                        $thisfile_vqf_COMM['bitrate']        = getid3_lib::BigEndian2Int(substr($ChunkData, $chunkoffset, 4));
80
 
                                        $chunkoffset += 4;
81
 
                                        $thisfile_vqf_COMM['sample_rate']    = getid3_lib::BigEndian2Int(substr($ChunkData, $chunkoffset, 4));
82
 
                                        $chunkoffset += 4;
83
 
                                        $thisfile_vqf_COMM['security_level'] = getid3_lib::BigEndian2Int(substr($ChunkData, $chunkoffset, 4));
84
 
                                        $chunkoffset += 4;
85
 
 
86
 
                                        $ThisFileInfo['audio']['channels']        = $thisfile_vqf_COMM['channel_mode'] + 1;
87
 
                                        $ThisFileInfo['audio']['sample_rate']     = $this->VQFchannelFrequencyLookup($thisfile_vqf_COMM['sample_rate']);
88
 
                                        $ThisFileInfo['audio']['bitrate']         = $thisfile_vqf_COMM['bitrate'] * 1000;
89
 
                                        $ThisFileInfo['audio']['encoder_options'] = 'CBR' . ceil($ThisFileInfo['audio']['bitrate']/1000);
90
 
 
91
 
                                        if ($ThisFileInfo['audio']['bitrate'] == 0) {
92
 
                                                $ThisFileInfo['error'][] = 'Corrupt VQF file: bitrate_audio == zero';
93
 
                                                return false;
94
 
                                        }
95
 
                                        break;
96
 
 
97
 
                                case 'NAME':
98
 
                                case 'AUTH':
99
 
                                case '(c) ':
100
 
                                case 'FILE':
101
 
                                case 'COMT':
102
 
                                case 'ALBM':
103
 
                                        $thisfile_vqf['comments'][$this->VQFcommentNiceNameLookup($ChunkName)][] = trim(substr($ChunkData, 8));
104
 
                                        break;
105
 
 
106
 
                                case 'DSIZ':
107
 
                                        $thisfile_vqf['DSIZ'] = getid3_lib::BigEndian2Int(substr($ChunkData, 8, 4));
108
 
                                        break;
109
 
 
110
 
                                default:
111
 
                                        $ThisFileInfo['warning'][] = 'Unhandled chunk type "'.$ChunkName.'" at offset '.$ChunkBaseOffset;
112
 
                                        break;
113
 
                        }
114
 
                }
115
 
 
116
 
                $ThisFileInfo['playtime_seconds'] = (($ThisFileInfo['avdataend'] - $ThisFileInfo['avdataoffset']) * 8) / $ThisFileInfo['audio']['bitrate'];
117
 
 
118
 
                if (isset($thisfile_vqf['DSIZ']) && (($thisfile_vqf['DSIZ'] != ($ThisFileInfo['avdataend'] - $ThisFileInfo['avdataoffset'] - strlen('DATA'))))) {
119
 
                        switch ($thisfile_vqf['DSIZ']) {
120
 
                                case 0:
121
 
                                case 1:
122
 
                                        $ThisFileInfo['warning'][] = 'Invalid DSIZ value "'.$thisfile_vqf['DSIZ'].'". This is known to happen with VQF files encoded by Ahead Nero, and seems to be its way of saying this is TwinVQF v'.($thisfile_vqf['DSIZ'] + 1).'.0';
123
 
                                        $ThisFileInfo['audio']['encoder'] = 'Ahead Nero';
124
 
                                        break;
125
 
 
126
 
                                default:
127
 
                                        $ThisFileInfo['warning'][] = 'Probable corrupted file - should be '.$thisfile_vqf['DSIZ'].' bytes, actually '.($ThisFileInfo['avdataend'] - $ThisFileInfo['avdataoffset'] - strlen('DATA'));
128
 
                                        break;
129
 
                        }
130
 
                }
131
 
 
132
 
                return true;
133
 
        }
134
 
 
135
 
        function VQFchannelFrequencyLookup($frequencyid) {
136
 
                static $VQFchannelFrequencyLookup = array(
137
 
                        11 => 11025,
138
 
                        22 => 22050,
139
 
                        44 => 44100
140
 
                );
141
 
                return (isset($VQFchannelFrequencyLookup[$frequencyid]) ? $VQFchannelFrequencyLookup[$frequencyid] : $frequencyid * 1000);
142
 
        }
143
 
 
144
 
        function VQFcommentNiceNameLookup($shortname) {
145
 
                static $VQFcommentNiceNameLookup = array(
146
 
                        'NAME' => 'title',
147
 
                        'AUTH' => 'artist',
148
 
                        '(c) ' => 'copyright',
149
 
                        'FILE' => 'filename',
150
 
                        'COMT' => 'comment',
151
 
                        'ALBM' => 'album'
152
 
                );
153
 
                return (isset($VQFcommentNiceNameLookup[$shortname]) ? $VQFcommentNiceNameLookup[$shortname] : $shortname);
154
 
        }
155
 
 
156
 
}
157
 
 
158
 
 
159
 
?>
 
 
b'\\ No newline at end of file'