blob: 67c0eaa3defc1d9d1487f025d28b8f49a4fbddde [file] [log] [blame]
/***************************************************************************
* __________ __ ___.
* Open \______ \ ____ ____ | | _\_ |__ _______ ___
* Source | _// _ \_/ ___\| |/ /| __ \ / _ \ \/ /
* Jukebox | | ( <_> ) \___| < | \_\ ( <_> > < <
* Firmware |____|_ /\____/ \___ >__|_ \|___ /\____/__/\_ \
* \/ \/ \/ \/ \/
* $Id$
*
* Copyright (C) 2005 Thom Johansen
*
* 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 <codecs/libmusepack/musepack.h>
CODEC_HEADER
mpc_decoder decoder;
/* Our implementations of the mpc_reader callback functions. */
mpc_int32_t read_impl(void *data, void *ptr, mpc_int32_t size)
{
struct codec_api *ci = (struct codec_api *)data;
return ((mpc_int32_t)(ci->read_filebuf(ptr, size)));
}
bool seek_impl(void *data, mpc_int32_t offset)
{
struct codec_api *ci = (struct codec_api *)data;
/* WARNING: assumes we don't need to skip too far into the past,
this might not be supported by the buffering layer yet */
return ci->seek_buffer(offset);
}
mpc_int32_t tell_impl(void *data)
{
struct codec_api *ci = (struct codec_api *)data;
return ci->curpos;
}
mpc_int32_t get_size_impl(void *data)
{
struct codec_api *ci = (struct codec_api *)data;
return ci->filesize;
}
bool canseek_impl(void *data)
{
(void)data;
/* doesn't much matter, libmusepack ignores this anyway */
return true;
}
/* temporary, we probably have better use for iram than this */
MPC_SAMPLE_FORMAT sample_buffer[MPC_FRAME_LENGTH*2] IBSS_ATTR;
#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)
{
struct codec_api *ci = api;
mpc_int64_t samplesdone;
unsigned long frequency;
unsigned status;
mpc_reader reader;
mpc_streaminfo info;
int retval;
#ifdef USE_IRAM
ci->memcpy(iramstart, iramcopy, iramend - iramstart);
ci->memset(iedata, 0, iend - iedata);
#endif
ci->configure(CODEC_DSP_ENABLE, (bool *)true);
ci->configure(DSP_DITHER, (bool *)false);
/* NOTE: this _should_ be set to MPC_FIXED_POINT_SCALE_SHIFT, not with
a 1 subtracted. However, doing so yields an output with only half the
amplitude it should have, so currently we use what's here, as it gives
correct level output. */
ci->configure(DSP_SET_SAMPLE_DEPTH, (long *)(MPC_FIXED_POINT_SCALE_SHIFT - 1));
/* disable these until we can figure out what's going on.
ci->configure(DSP_SET_CLIP_MAX, (long *)MPC_FIXED_POINT_SCALE);
ci->configure(DSP_SET_CLIP_MIN, (long *)-MPC_FIXED_POINT_SCALE);*/
ci->configure(CODEC_SET_FILEBUF_CHUNKSIZE, (long *)(1024*16));
/* Create a decoder instance */
reader.read = read_impl;
reader.seek = seek_impl;
reader.tell = tell_impl;
reader.get_size = get_size_impl;
reader.canseek = canseek_impl;
reader.data = ci;
next_track:
if (codec_init(api)) {
retval = CODEC_ERROR;
goto exit;
}
/* read file's streaminfo data */
mpc_streaminfo_init(&info);
if (mpc_streaminfo_read(&info, &reader) != ERROR_CODE_OK) {
retval = CODEC_ERROR;
goto exit;
}
frequency = info.sample_freq;
ci->configure(DSP_SET_FREQUENCY, (long *)info.sample_freq);
/* set playback engine up for correct number of channels */
/* NOTE: current musepack format only allows for stereo files
but code is here to handle other configurations anyway */
if (info.channels == 2)
ci->configure(DSP_SET_STEREO_MODE, (long *)STEREO_NONINTERLEAVED);
else if (info.channels == 1)
ci->configure(DSP_SET_STEREO_MODE, (long *)STEREO_MONO);
else {
retval = CODEC_ERROR;
goto exit;
}
codec_set_replaygain(ci->id3);
/* instantiate a decoder with our file reader */
mpc_decoder_setup(&decoder, &reader);
if (!mpc_decoder_initialize(&decoder, &info)) {
retval = CODEC_ERROR;
goto exit;
}
/* This is the decoding loop. */
samplesdone = 0;
do {
#if 0
/* Complete seek handler. This will be extremely slow and unresponsive
on target, so has been disabledt. */
if (ci->seek_time) {
mpc_int64_t new_offset = (ci->seek_time - 1)*info.sample_freq/1000;
if (mpc_decoder_seek_sample(&decoder, new_offset)) {
samplesdone = new_offset;
ci->set_elapsed(ci->seek_time);
}
ci->seek_complete();
}
#else
/* Seek to start of track handler. This is the only case that isn't slow
as hell, and needs to be supported for the back button to function as
wanted. */
if (ci->seek_time == 1) {
if (mpc_decoder_seek_sample(&decoder, 0)) {
samplesdone = 0;
ci->set_elapsed(0);
}
ci->seek_complete();
}
#endif
if (ci->stop_codec || ci->reload_codec)
break;
status = mpc_decoder_decode(&decoder, sample_buffer, NULL, NULL);
ci->yield();
if (status == (unsigned)(-1)) { /* decode error */
retval = CODEC_ERROR;
goto exit;
} else {
while (!ci->pcmbuf_insert_split(sample_buffer,
sample_buffer + MPC_FRAME_LENGTH,
status*sizeof(MPC_SAMPLE_FORMAT)))
ci->yield();
samplesdone += status;
ci->set_elapsed(samplesdone/(frequency/1000));
}
} while (status != 0);
if (ci->request_next_track())
goto next_track;
retval = CODEC_OK;
exit:
return retval;
}