1 /***************************************************************************
3 * Open \______ \ ____ ____ | | _\_ |__ _______ ___
4 * Source | _// _ \_/ ___\| |/ /| __ \ / _ \ \/ /
5 * Jukebox | | ( <_> ) \___| < | \_\ ( <_> > < <
6 * Firmware |____|_ /\____/ \___ >__|_ \|___ /\____/__/\_ \
10 * Copyright (C) 2005 Dave Chapman
11 * Copyright (C) 2009 Yoshihisa Uchida
13 * This program is free software; you can redistribute it and/or
14 * modify it under the terms of the GNU General Public License
15 * as published by the Free Software Foundation; either version 2
16 * of the License, or (at your option) any later version.
18 * This software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY
19 * KIND, either express or implied.
21 ****************************************************************************/
24 #include "codecs/libpcm/support_formats.h"
30 * For a good documentation on WAVE files, see:
31 * http://www.tsp.ece.mcgill.ca/MMSP/Documents/AudioFormats/WAVE/WAVE.html
33 * http://www.sonicspot.com/guide/wavefiles.html
35 * For sample WAV files, see:
36 * http://www.tsp.ece.mcgill.ca/MMSP/Documents/AudioFormats/WAVE/Samples.html
40 #define PCM_SAMPLE_SIZE (4096*2)
42 static int32_t samples
[PCM_SAMPLE_SIZE
] IBSS_ATTR
;
44 /* This codec support WAVE files with the following formats: */
47 WAVE_FORMAT_UNKNOWN
= 0x0000, /* Microsoft Unknown Wave Format */
48 WAVE_FORMAT_PCM
= 0x0001, /* Microsoft PCM Format */
49 WAVE_FORMAT_ADPCM
= 0x0002, /* Microsoft ADPCM Format */
50 WAVE_FORMAT_IEEE_FLOAT
= 0x0003, /* IEEE Float */
51 WAVE_FORMAT_ALAW
= 0x0006, /* Microsoft ALAW */
52 WAVE_FORMAT_MULAW
= 0x0007, /* Microsoft MULAW */
53 WAVE_FORMAT_DVI_ADPCM
= 0x0011, /* Intel's DVI ADPCM */
54 WAVE_FORMAT_DIALOGIC_OKI_ADPCM
= 0x0017, /* Dialogic OKI ADPCM */
55 WAVE_FORMAT_YAMAHA_ADPCM
= 0x0020, /* Yamaha ADPCM */
56 WAVE_FORMAT_XBOX_ADPCM
= 0x0069, /* XBOX ADPCM */
57 IBM_FORMAT_MULAW
= 0x0101, /* same as WAVE_FORMAT_MULAW */
58 IBM_FORMAT_ALAW
= 0x0102, /* same as WAVE_FORMAT_ALAW */
59 WAVE_FORMAT_SWF_ADPCM
= 0x5346, /* Adobe SWF ADPCM */
60 WAVE_FORMAT_EXTENSIBLE
= 0xFFFE
63 static const struct pcm_entry wave_codecs
[] = {
64 { WAVE_FORMAT_UNKNOWN
, 0 },
65 { WAVE_FORMAT_PCM
, get_linear_pcm_codec
},
66 { WAVE_FORMAT_ADPCM
, get_ms_adpcm_codec
},
67 { WAVE_FORMAT_IEEE_FLOAT
, get_ieee_float_codec
},
68 { WAVE_FORMAT_ALAW
, get_itut_g711_alaw_codec
},
69 { WAVE_FORMAT_MULAW
, get_itut_g711_mulaw_codec
},
70 { WAVE_FORMAT_DVI_ADPCM
, get_dvi_adpcm_codec
},
71 { WAVE_FORMAT_DIALOGIC_OKI_ADPCM
, get_dialogic_oki_adpcm_codec
},
72 { WAVE_FORMAT_YAMAHA_ADPCM
, get_yamaha_adpcm_codec
},
73 { WAVE_FORMAT_XBOX_ADPCM
, get_dvi_adpcm_codec
},
74 { IBM_FORMAT_MULAW
, get_itut_g711_mulaw_codec
},
75 { IBM_FORMAT_ALAW
, get_itut_g711_alaw_codec
},
76 { WAVE_FORMAT_SWF_ADPCM
, get_swf_adpcm_codec
},
79 #define NUM_FORMATS 13
81 static const struct pcm_codec
*get_wave_codec(uint32_t formattag
)
85 for (i
= 0; i
< NUM_FORMATS
; i
++)
87 if (wave_codecs
[i
].format_tag
== formattag
)
89 if (wave_codecs
[i
].get_codec
)
90 return wave_codecs
[i
].get_codec();
97 static struct pcm_format format
;
98 static uint32_t bytesdone
;
100 static bool set_msadpcm_coeffs(const uint8_t *buf
)
106 buf
+= 4; /* skip 'fmt ' */
107 size
= buf
[0] | (buf
[1] << 8) | (buf
[1] << 16) | (buf
[1] << 24);
110 DEBUGF("CODEC_ERROR: microsoft adpcm 'fmt ' chunk size=%lu < 50\n",
111 (unsigned long)size
);
117 num
= buf
[0] | (buf
[1] << 8);
120 * In many case, nNumCoef is 7.
121 * Depending upon the encoder, as for this value there is a possibility of
123 * If you found the file where this value exceeds 7, please report.
125 if (num
!= MSADPCM_NUM_COEFF
)
127 DEBUGF("CODEC_ERROR: microsoft adpcm nNumCoef=%d != 7\n", num
);
133 for (i
= 0; i
< MSADPCM_NUM_COEFF
; i
++)
135 format
.coeffs
[i
][0] = buf
[0] | (SE(buf
[1]) << 8);
136 format
.coeffs
[i
][1] = buf
[2] | (SE(buf
[3]) << 8);
143 static uint8_t *read_buffer(size_t *realsize
)
145 uint8_t *buffer
= (uint8_t *)ci
->request_buffer(realsize
, format
.chunksize
);
146 if (bytesdone
+ (*realsize
) > format
.numbytes
)
147 *realsize
= format
.numbytes
- bytesdone
;
148 bytesdone
+= *realsize
;
149 ci
->advance_buffer(*realsize
);
153 /* this is the codec entry point */
154 enum codec_status
codec_main(enum codec_entry_call_reason reason
)
156 if (reason
== CODEC_LOAD
) {
157 /* Generic codec initialisation */
158 ci
->configure(DSP_SET_SAMPLE_DEPTH
, PCM_OUTPUT_DEPTH
-1);
164 /* this is called for each file to process */
165 enum codec_status
codec_run(void)
167 uint32_t decodedsamples
;
173 off_t firstblockposn
; /* position of the first block in file */
174 const struct pcm_codec
*codec
;
179 DEBUGF("codec_init() error\n");
183 codec_set_replaygain(ci
->id3
);
185 /* Need to save offset for later use (cleared indirectly by advance_buffer) */
186 bytesdone
= ci
->id3
->offset
;
188 /* get RIFF chunk header */
190 buf
= ci
->request_buffer(&n
, 12);
192 DEBUGF("request_buffer error\n");
195 if ((memcmp(buf
, "RIFF", 4) != 0) || (memcmp(&buf
[8], "WAVE", 4) != 0)) {
196 DEBUGF("CODEC_ERROR: missing riff header\n");
200 /* advance to first WAVE chunk */
201 ci
->advance_buffer(12);
204 ci
->memset(&format
, 0, sizeof(struct pcm_format
));
205 format
.is_signed
= true;
206 format
.is_little_endian
= true;
211 /* iterate over WAVE chunks until the 'data' chunk, which should be after the 'fmt ' chunk */
213 /* get WAVE chunk header */
214 buf
= ci
->request_buffer(&n
, 1024);
216 DEBUGF("data chunk request_buffer error\n");
217 /* no more chunks, 'data' chunk must not have been found */
222 size
= (buf
[4]|(buf
[5]<<8)|(buf
[6]<<16)|(buf
[7]<<24));
223 if (memcmp(buf
, "fmt ", 4) == 0) {
225 DEBUGF("CODEC_ERROR: 'fmt ' chunk size=%lu < 16\n",
226 (unsigned long)size
);
230 format
.formattag
=buf
[8]|(buf
[9]<<8);
232 format
.channels
=buf
[10]|(buf
[11]<<8);
233 /* skipping dwSamplesPerSec */
234 /* skipping dwAvgBytesPerSec */
236 format
.blockalign
=buf
[20]|(buf
[21]<<8);
238 format
.bitspersample
=buf
[22]|(buf
[23]<<8);
239 if (format
.formattag
!= WAVE_FORMAT_PCM
) {
241 /* this is not a fatal error with some formats,
242 * we'll see later if we can't decode it */
243 DEBUGF("CODEC_WARNING: non-PCM WAVE (formattag=0x%x) "
244 "doesn't have ext. fmt descr (chunksize=%d<18).\n",
245 (unsigned int)format
.formattag
, (int)size
);
249 if (format
.formattag
!= WAVE_FORMAT_EXTENSIBLE
)
250 format
.samplesperblock
= buf
[26]|(buf
[27]<<8);
253 format
.size
= buf
[24]|(buf
[25]<<8);
254 if (format
.size
< 22) {
255 DEBUGF("CODEC_ERROR: WAVE_FORMAT_EXTENSIBLE is "
256 "missing extension\n");
259 /* wValidBitsPerSample */
260 format
.bitspersample
= buf
[26]|(buf
[27]<<8);
261 /* skipping dwChannelMask (4bytes) */
262 /* SubFormat (only get the first two bytes) */
263 format
.formattag
= buf
[32]|(buf
[33]<<8);
268 /* msadpcm specific */
269 if (format
.formattag
== WAVE_FORMAT_ADPCM
)
271 if (!set_msadpcm_coeffs(buf
))
278 codec
= get_wave_codec(format
.formattag
);
281 DEBUGF("CODEC_ERROR: unsupported wave format 0x%x\n",
282 (unsigned int) format
.formattag
);
286 /* riff 8bit linear pcm is unsigned */
287 if (format
.formattag
== WAVE_FORMAT_PCM
&& format
.bitspersample
== 8)
288 format
.is_signed
= false;
290 /* set format, parse codec specific tag, check format, and calculate chunk size */
291 if (!codec
->set_format(&format
))
295 } else if (memcmp(buf
, "data", 4) == 0) {
296 format
.numbytes
= size
;
297 /* advance to start of data */
298 ci
->advance_buffer(8);
301 } else if (memcmp(buf
, "fact", 4) == 0) {
304 format
.totalsamples
=
305 (buf
[8]|(buf
[9]<<8)|(buf
[10]<<16)|(buf
[11]<<24));
307 DEBUGF("unknown WAVE chunk: '%c%c%c%c', size=%lu\n",
308 buf
[0], buf
[1], buf
[2], buf
[3], (unsigned long)size
);
311 /* go to next chunk (even chunk sizes must be padded) */
312 size
+= 8 + (size
& 0x01);
314 ci
->advance_buffer(size
);
315 firstblockposn
+= size
;
320 DEBUGF("CODEC_ERROR: 'fmt ' chunk not found\n");
324 /* common format check */
325 if (format
.channels
== 0) {
326 DEBUGF("CODEC_ERROR: 'fmt ' chunk not found or 0-channels file\n");
329 if (format
.samplesperblock
== 0) {
330 DEBUGF("CODEC_ERROR: 'fmt ' chunk not found or 0-wSamplesPerBlock file\n");
333 if (format
.blockalign
== 0)
335 DEBUGF("CODEC_ERROR: 'fmt ' chunk not found or 0-blockalign file\n");
338 if (format
.numbytes
== 0) {
339 DEBUGF("CODEC_ERROR: 'data' chunk not found or has zero-length\n");
343 /* check chunksize */
344 if ((format
.chunksize
/ format
.blockalign
) * format
.samplesperblock
* format
.channels
346 format
.chunksize
= (PCM_SAMPLE_SIZE
/ format
.blockalign
) * format
.blockalign
;
347 if (format
.chunksize
== 0)
349 DEBUGF("CODEC_ERROR: chunksize is 0\n");
353 ci
->configure(DSP_SWITCH_FREQUENCY
, ci
->id3
->frequency
);
354 if (format
.channels
== 2) {
355 ci
->configure(DSP_SET_STEREO_MODE
, STEREO_INTERLEAVED
);
356 } else if (format
.channels
== 1) {
357 ci
->configure(DSP_SET_STEREO_MODE
, STEREO_MONO
);
359 DEBUGF("CODEC_ERROR: more than 2 channels\n");
363 /* make sure we're at the correct offset */
364 if (bytesdone
> (uint32_t) firstblockposn
) {
365 /* Round down to previous block */
366 struct pcm_pos
*newpos
= codec
->get_seek_pos(bytesdone
- firstblockposn
,
367 PCM_SEEK_POS
, &read_buffer
);
369 if (newpos
->pos
> format
.numbytes
)
371 if (ci
->seek_buffer(firstblockposn
+ newpos
->pos
))
373 bytesdone
= newpos
->pos
;
374 decodedsamples
= newpos
->samples
;
377 /* already where we need to be */
381 /* The main decoder loop */
384 while (!endofstream
) {
385 enum codec_command_action action
= ci
->get_command(¶m
);
387 if (action
== CODEC_ACTION_HALT
)
390 if (action
== CODEC_ACTION_SEEK_TIME
) {
391 struct pcm_pos
*newpos
= codec
->get_seek_pos(param
, PCM_SEEK_TIME
,
393 if (newpos
->pos
> format
.numbytes
)
395 ci
->set_elapsed(ci
->id3
->length
);
400 if (ci
->seek_buffer(firstblockposn
+ newpos
->pos
))
402 bytesdone
= newpos
->pos
;
403 decodedsamples
= newpos
->samples
;
406 ci
->set_elapsed(decodedsamples
*1000LL/ci
->id3
->frequency
);
410 wavbuf
= (uint8_t *)ci
->request_buffer(&n
, format
.chunksize
);
412 break; /* End of stream */
413 if (bytesdone
+ n
> format
.numbytes
) {
414 n
= format
.numbytes
- bytesdone
;
418 if (codec
->decode(wavbuf
, n
, samples
, &bufcount
) == CODEC_ERROR
)
420 DEBUGF("codec error\n");
424 ci
->pcmbuf_insert(samples
, NULL
, bufcount
);
425 ci
->advance_buffer(n
);
427 decodedsamples
+= bufcount
;
429 if (bytesdone
>= format
.numbytes
)
431 ci
->set_elapsed(decodedsamples
*1000LL/ci
->id3
->frequency
);