blob: 19c7581e293de0239148c5c1dd5a791e0521f12a [file] [log] [blame]
/***************************************************************************
* __________ __ ___.
* Open \______ \ ____ ____ | | _\_ |__ _______ ___
* Source | _// _ \_/ ___\| |/ /| __ \ / _ \ \/ /
* Jukebox | | ( <_> ) \___| < | \_\ ( <_> > < <
* Firmware |____|_ /\____/ \___ >__|_ \|___ /\____/__/\_ \
* \/ \/ \/ \/ \/
* $Id$
*
* Copyright (C) 2005 David Bryant
*
* All files in this archive are subject to the GNU General Public License.
* See the file COPYING in the source tree root for full license agreement.
*
* This software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY
* KIND, either express or implied.
*
****************************************************************************/
#include "codeclib.h"
#include "libwavpack/wavpack.h"
CODEC_HEADER
static struct codec_api *ci;
#define FORCE_DSP_USE /* fixes some WavPack bugs; adds about 12% to boost ratio
(when DSP would not have been used) */
#define BUFFER_SIZE 4096
static long temp_buffer [BUFFER_SIZE] IBSS_ATTR;
static long read_callback (void *buffer, long bytes)
{
long retval = ci->read_filebuf (buffer, bytes);
ci->id3->offset = ci->curpos;
return retval;
}
#ifdef USE_IRAM
extern char iramcopy[];
extern char iramstart[];
extern char iramend[];
extern char iedata[];
extern char iend[];
#endif
/* this is the codec entry point */
enum codec_status codec_start(struct codec_api* api)
{
WavpackContext *wpc;
char error [80];
int bps, nchans, sr_100;
int retval;
/* Generic codec initialisation */
ci = api;
#ifdef USE_IRAM
ci->memcpy(iramstart, iramcopy, iramend-iramstart);
ci->memset(iedata, 0, iend - iedata);
#endif
ci->configure(CODEC_SET_FILEBUF_WATERMARK, (int *)(1024*512));
ci->configure(CODEC_SET_FILEBUF_CHUNKSIZE, (int *)(1024*128));
ci->configure(DSP_DITHER, (bool *)false);
ci->configure(DSP_SET_STEREO_MODE, (int *)STEREO_INTERLEAVED);
ci->configure(DSP_SET_SAMPLE_DEPTH, (int *)(16));
next_track:
if (codec_init(api)) {
retval = CODEC_ERROR;
goto exit;
}
while (!*ci->taginfo_ready && !ci->stop_codec)
ci->sleep(1);
#ifdef FORCE_DSP_USE
ci->configure(CODEC_DSP_ENABLE, (bool *)true);
ci->configure(DSP_SET_FREQUENCY, (long *)(ci->id3->frequency));
codec_set_replaygain(ci->id3);
#else
if (ci->id3->frequency != NATIVE_FREQUENCY ||
ci->global_settings->replaygain) {
ci->configure(CODEC_DSP_ENABLE, (bool *)true);
ci->configure(DSP_SET_FREQUENCY, (long *)(ci->id3->frequency));
codec_set_replaygain(ci->id3);
}
else
ci->configure(CODEC_DSP_ENABLE, (bool *)false);
#endif
/* Create a decoder instance */
wpc = WavpackOpenFileInput (read_callback, error);
if (!wpc) {
retval = CODEC_ERROR;
goto exit;
}
bps = WavpackGetBytesPerSample (wpc);
nchans = WavpackGetReducedChannels (wpc);
sr_100 = ci->id3->frequency / 100;
ci->set_elapsed (0);
/* The main decoder loop */
while (1) {
long nsamples;
if (ci->seek_time && ci->taginfo_ready && ci->id3->length) {
ci->seek_time--;
int curpos_ms = WavpackGetSampleIndex (wpc) / sr_100 * 10;
int n, d, skip;
if (ci->seek_time > curpos_ms) {
n = ci->seek_time - curpos_ms;
d = ci->id3->length - curpos_ms;
skip = (int)((long long)(ci->filesize - ci->curpos) * n / d);
ci->seek_buffer (ci->curpos + skip);
}
else {
n = curpos_ms - ci->seek_time;
d = curpos_ms;
skip = (int)((long long) ci->curpos * n / d);
ci->seek_buffer (ci->curpos - skip);
}
wpc = WavpackOpenFileInput (read_callback, error);
ci->seek_complete();
if (!wpc)
break;
ci->set_elapsed (WavpackGetSampleIndex (wpc) / sr_100 * 10);
ci->yield ();
}
nsamples = WavpackUnpackSamples (wpc, temp_buffer, BUFFER_SIZE / 2);
if (!nsamples || ci->stop_codec || ci->reload_codec)
break;
/* convert mono to stereo here, in place */
if (nchans == 1) {
long *dst = temp_buffer + (nsamples * 2);
long *src = temp_buffer + nsamples;
long count = nsamples;
while (count--) {
*--dst = *--src;
*--dst = *src;
if (!(count & 0x7f))
ci->yield ();
}
}
if (bps == 1) {
short *dst = (short *) temp_buffer;
long *src = temp_buffer;
long count = nsamples;
while (count--) {
*dst++ = *src++ << 8;
*dst++ = *src++ << 8;
if (!(count & 0x7f))
ci->yield ();
}
}
else if (bps == 2) {
short *dst = (short *) temp_buffer;
long *src = temp_buffer;
long count = nsamples;
while (count--) {
*dst++ = *src++;
*dst++ = *src++;
if (!(count & 0x7f))
ci->yield ();
}
}
else {
short *dst = (short *) temp_buffer;
int shift = (bps - 2) * 8;
long *src = temp_buffer;
long count = nsamples;
while (count--) {
*dst++ = *src++ >> shift;
*dst++ = *src++ >> shift;
if (!(count & 0x7f))
ci->yield ();
}
}
if (ci->stop_codec || ci->reload_codec)
break;
while (!ci->pcmbuf_insert ((char *) temp_buffer, nsamples * 4))
ci->sleep (1);
ci->set_elapsed (WavpackGetSampleIndex (wpc) / sr_100 * 10);
}
if (ci->request_next_track())
goto next_track;
retval = CODEC_OK;
exit:
return retval;
}