source: spip-zone/_core_/branches/spip-3.1/plugins/medias/lib/getid3/module.audio.dss.php @ 113163

Last change on this file since 113163 was 113163, checked in by spip.franck@…, 5 months ago

Mise à jour de la lib getid en version 1.9.16, nous étions en 1.9.12
https://github.com/JamesHeinrich/getID3/blob/master/changelog.txt

File size: 5.5 KB
Line 
1<?php
2
3/////////////////////////////////////////////////////////////////
4/// getID3() by James Heinrich <info@getid3.org>               //
5//  available at https://github.com/JamesHeinrich/getID3       //
6//            or https://www.getid3.org                        //
7//            or http://getid3.sourceforge.net                 //
8//  see readme.txt for more details                            //
9/////////////////////////////////////////////////////////////////
10//                                                             //
11// module.audio.dss.php                                        //
12// module for analyzing Digital Speech Standard (DSS) files    //
13// dependencies: NONE                                          //
14//                                                            ///
15/////////////////////////////////////////////////////////////////
16
17
18class getid3_dss extends getid3_handler
19{
20        /**
21         * @return bool
22         */
23        public function Analyze() {
24                $info = &$this->getid3->info;
25
26                $this->fseek($info['avdataoffset']);
27                $DSSheader  = $this->fread(1540);
28
29                if (!preg_match('#^[\\x02-\\x06]ds[s2]#', $DSSheader)) {
30                        $this->error('Expecting "[02-06] 64 73 [73|32]" at offset '.$info['avdataoffset'].', found "'.getid3_lib::PrintHexBytes(substr($DSSheader, 0, 4)).'"');
31                        return false;
32                }
33
34                // some structure information taken from http://cpansearch.perl.org/src/RGIBSON/Audio-DSS-0.02/lib/Audio/DSS.pm
35                $info['encoding']              = 'ISO-8859-1'; // not certain, but assumed
36                $info['dss'] = array();
37
38                $info['fileformat']            = 'dss';
39                $info['mime_type']             = 'audio/x-'.substr($DSSheader, 1, 3); // "audio/x-dss" or "audio/x-ds2"
40                $info['audio']['dataformat']   =            substr($DSSheader, 1, 3); //         "dss" or         "ds2"
41                $info['audio']['bitrate_mode'] = 'cbr';
42
43                $info['dss']['version']            =                            ord(substr($DSSheader,    0,   1));
44                $info['dss']['hardware']           =                           trim(substr($DSSheader,   12,  16)); // identification string for hardware used to create the file, e.g. "DPM 9600", "DS2400"
45                $info['dss']['unknown1']           =   getid3_lib::LittleEndian2Int(substr($DSSheader,   28,   4));
46                // 32-37 = "FE FF FE FF F7 FF" in all the sample files I've seen
47                $info['dss']['date_create_unix']   = $this->DSSdateStringToUnixDate(substr($DSSheader,   38,  12));
48                $info['dss']['date_complete_unix'] = $this->DSSdateStringToUnixDate(substr($DSSheader,   50,  12));
49                $info['dss']['playtime_sec']       = intval((substr($DSSheader,  62, 2) * 3600) + (substr($DSSheader,  64, 2) * 60) + substr($DSSheader,  66, 2)); // approximate file playtime in HHMMSS
50                if ($info['dss']['version'] <= 3) {
51                        $info['dss']['playtime_ms']        =   getid3_lib::LittleEndian2Int(substr($DSSheader,  512,   4)); // exact file playtime in milliseconds. Has also been observed at offset 530 in one sample file, with something else (unknown) at offset 512
52                        $info['dss']['priority']           =                            ord(substr($DSSheader,  793,   1));
53                        $info['dss']['comments']           =                           trim(substr($DSSheader,  798, 100));
54                        $info['dss']['sample_rate_index']  =                            ord(substr($DSSheader, 1538,   1));  // this isn't certain, this may or may not be where the sample rate info is stored, but it seems consistent on my small selection of sample files
55                        $info['audio']['sample_rate']      = $this->DSSsampleRateLookup($info['dss']['sample_rate_index']);
56                } else {
57                        $this->getid3->warning('DSS above version 3 not fully supported in this version of getID3. Any additional documentation or format specifications would be welcome. This file is version '.$info['dss']['version']);
58                }
59
60                $info['audio']['bits_per_sample']  = 16; // maybe, maybe not -- most compressed audio formats don't have a fixed bits-per-sample value, but this is a reasonable approximation
61                $info['audio']['channels']         = 1;
62
63                if (!empty($info['dss']['playtime_ms']) && (floor($info['dss']['playtime_ms'] / 1000) == $info['dss']['playtime_sec'])) { // *should* just be playtime_ms / 1000 but at least one sample file has playtime_ms at offset 530 instead of offset 512, so safety check
64                        $info['playtime_seconds'] = $info['dss']['playtime_ms'] / 1000;
65                } else {
66                        $info['playtime_seconds'] = $info['dss']['playtime_sec'];
67                        if (!empty($info['dss']['playtime_ms'])) {
68                                $this->getid3->warning('playtime_ms ('.number_format($info['dss']['playtime_ms'] / 1000, 3).') does not match playtime_sec ('.number_format($info['dss']['playtime_sec']).') - using playtime_sec value');
69                        }
70                }
71                $info['audio']['bitrate'] = ($info['filesize'] * 8) / $info['playtime_seconds'];
72
73                return true;
74        }
75
76        /**
77         * @param string $datestring
78         *
79         * @return int|false
80         */
81        public function DSSdateStringToUnixDate($datestring) {
82                $y = substr($datestring,  0, 2);
83                $m = substr($datestring,  2, 2);
84                $d = substr($datestring,  4, 2);
85                $h = substr($datestring,  6, 2);
86                $i = substr($datestring,  8, 2);
87                $s = substr($datestring, 10, 2);
88                $y += (($y < 95) ? 2000 : 1900);
89                return mktime($h, $i, $s, $m, $d, $y);
90        }
91
92        /**
93         * @param int $sample_rate_index
94         *
95         * @return int|false
96         */
97        public function DSSsampleRateLookup($sample_rate_index) {
98                static $dssSampleRateLookup = array(
99                        0x0A => 16000,
100                        0x0C => 11025,
101                        0x0D => 12000,
102                        0x15 =>  8000,
103                );
104                if (!array_key_exists($sample_rate_index, $dssSampleRateLookup)) {
105                        $this->getid3->warning('unknown sample_rate_index: 0x'.strtoupper(dechex($sample_rate_index)));
106                        return false;
107                }
108                return $dssSampleRateLookup[$sample_rate_index];
109        }
110
111}
Note: See TracBrowser for help on using the repository browser.