492393a8f77e620cb2d6577befb8737e1fef37e9
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 /////////////////////////////////////////////////////////////////
11 // module.audio.dss.php //
12 // module for analyzing Digital Speech Standard (DSS) files //
13 // dependencies: NONE //
15 /////////////////////////////////////////////////////////////////
18 class getid3_dss
extends getid3_handler
23 public function Analyze() {
24 $info = &$this->getid3
->info
;
26 $this->fseek($info['avdataoffset']);
27 $DSSheader = $this->fread(1540);
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)).'"');
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();
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';
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']);
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']);
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;
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;
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');
71 $info['audio']['bitrate'] = ($info['filesize'] * 8) / $info['playtime_seconds'];
77 * @param string $datestring
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);
93 * @param int $sample_rate_index
97 public function DSSsampleRateLookup($sample_rate_index) {
98 static $dssSampleRateLookup = array(
104 if (!array_key_exists($sample_rate_index, $dssSampleRateLookup)) {
105 $this->getid3
->warning('unknown sample_rate_index: 0x'.strtoupper(dechex($sample_rate_index)));
108 return $dssSampleRateLookup[$sample_rate_index];