apps/codecs/vorbis.c

   1 /***************************************************************************
   2  *             __________               __   ___.
   3  *   Open      \______   \ ____   ____ |  | _\_ |__   _______  ___
   4  *   Source     |       _//  _ \_/ ___\|  |/ /| __ \ /  _ \  \/  /
   5  *   Jukebox    |    |   (  <_> )  \___|    < | \_\ (  <_> > <  <
   6  *   Firmware   |____|_  /\____/ \___  >__|_ \|___  /\____/__/\_ \
   7  *                     \/            \/     \/    \/            \/
   8  * $Id$
   9  *
  10  * Copyright (C) 2002 Björn Stenberg
  11  *
  12  * This program is free software; you can redistribute it and/or
  13  * modify it under the terms of the GNU General Public License
  14  * as published by the Free Software Foundation; either version 2
  15  * of the License, or (at your option) any later version.
  16  *
  17  * This software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY
  18  * KIND, either express or implied.
  19  *
  20  ****************************************************************************/
  21
  22 #include "codeclib.h"
  23 #include "libtremor/ivorbisfile.h"
  24 #include "libtremor/ogg.h"
  25 #ifdef SIMULATOR
  26 #include "lib/tlsf/src/tlsf.h"
  27 #endif
  28
  29 CODEC_HEADER
  30
  31 #if defined(CPU_ARM) || defined(CPU_COLDFIRE) || defined(CPU_MIPS)
  32 #include <setjmp.h>
  33 jmp_buf rb_jump_buf;
  34 #endif
  35
  36 /* Some standard functions and variables needed by Tremor */
  37
  38 static size_t read_handler(void *ptr, size_t size, size_t nmemb, void *datasource)
  39 {
  40     (void)datasource;
  41     return ci->read_filebuf(ptr, nmemb*size);
  42 }
  43
  44 static int initial_seek_handler(void *datasource, ogg_int64_t offset, int whence)
  45 {
  46     (void)datasource;
  47     (void)offset;
  48     (void)whence;
  49     return -1;
  50 }
  51
  52 static int seek_handler(void *datasource, ogg_int64_t offset, int whence)
  53 {
  54     (void)datasource;
  55
  56     if (whence == SEEK_CUR) {
  57         offset += ci->curpos;
  58     } else if (whence == SEEK_END) {
  59         offset += ci->filesize;
  60     }
  61
  62     if (ci->seek_buffer(offset)) {
  63         return 0;
  64     }
  65
  66     return -1;
  67 }
  68
  69 static int close_handler(void *datasource)
  70 {
  71     (void)datasource;
  72     return 0;
  73 }
  74
  75 static long tell_handler(void *datasource)
  76 {
  77     (void)datasource;
  78     return ci->curpos;
  79 }
  80
  81 /* This sets the DSP parameters based on the current logical bitstream
  82  * (sampling rate, number of channels, etc).
  83  */
  84 static bool vorbis_set_codec_parameters(OggVorbis_File *vf)
  85 {
  86     vorbis_info *vi;
  87
  88     vi = ov_info(vf, -1);
  89
  90     if (vi == NULL) {
  91         return false;
  92     }
  93
  94     ci->configure(DSP_SWITCH_FREQUENCY, ci->id3->frequency);
  95     codec_set_replaygain(ci->id3);
  96
  97     if (vi->channels == 2) {
  98           ci->configure(DSP_SET_STEREO_MODE, STEREO_NONINTERLEAVED);
  99     } else if (vi->channels == 1) {
 100           ci->configure(DSP_SET_STEREO_MODE, STEREO_MONO);
 101     }
 102
 103     return true;
 104 }
 105
 106 /* this is the codec entry point */
 107 enum codec_status codec_main(void)
 108 {
 109     ov_callbacks callbacks;
 110     OggVorbis_File vf;
 111     ogg_int32_t **pcm;
 112
 113     int error;
 114     long n;
 115     int current_section;
 116     int previous_section;
 117     int eof;
 118     ogg_int64_t vf_offsets[2];
 119     ogg_int64_t vf_dataoffsets;
 120     ogg_uint32_t vf_serialnos;
 121     ogg_int64_t vf_pcmlengths[2];
 122
 123     ci->configure(DSP_SET_SAMPLE_DEPTH, 24);
 124
 125     if (codec_init()) {
 126         error = CODEC_ERROR;
 127         goto exit;
 128     }
 129
 130 #if defined(CPU_ARM) || defined(CPU_COLDFIRE) || defined(CPU_MIPS)
 131     if (setjmp(rb_jump_buf) != 0) {
 132         /* malloc failed; skip to next track */
 133         error = CODEC_ERROR;
 134         goto done;
 135     }
 136 #endif
 137
 138 next_track:
 139     error = CODEC_OK;
 140
 141     ogg_malloc_init();
 142
 143     if (codec_wait_taginfo() != 0)
 144         goto done;
 145
 146     /* Create a decoder instance */
 147     callbacks.read_func = read_handler;
 148     callbacks.seek_func = initial_seek_handler;
 149     callbacks.tell_func = tell_handler;
 150     callbacks.close_func = close_handler;
 151
 152     /* Open a non-seekable stream */
 153     error = ov_open_callbacks(ci, &vf, NULL, 0, callbacks);
 154
 155     /* If the non-seekable open was successful, we need to supply the missing
 156      * data to make it seekable.  This is a hack, but it's reasonable since we
 157      * don't want to run the whole file through the buffer before we start
 158      * playing.  Using Tremor's seekable open routine would cause us to do
 159      * this, so we pretend not to be seekable at first.  Then we fill in the
 160      * missing fields of vf with 1) information in ci->id3, and 2) info
 161      * obtained by Tremor in the above ov_open call.
 162      *
 163      * Note that this assumes there is only ONE logical Vorbis bitstream in our
 164      * physical Ogg bitstream.  This is verified in metadata.c, well before we
 165      * get here.
 166      */
 167     if (!error) {
 168          ogg_free(vf.offsets);
 169          ogg_free(vf.dataoffsets);
 170          ogg_free(vf.serialnos);
 171
 172          vf.offsets = vf_offsets;
 173          vf.dataoffsets = &vf_dataoffsets;
 174          vf.serialnos = &vf_serialnos;
 175          vf.pcmlengths = vf_pcmlengths;
 176
 177          vf.offsets[0] = 0;
 178          vf.offsets[1] = ci->id3->filesize;
 179          vf.dataoffsets[0] = vf.offset;
 180          vf.pcmlengths[0] = 0;
 181          vf.pcmlengths[1] = ci->id3->samples;
 182          vf.serialnos[0] = vf.current_serialno;
 183          vf.callbacks.seek_func = seek_handler;
 184          vf.seekable = 1;
 185          vf.end = ci->id3->filesize;
 186          vf.ready_state = OPENED;
 187          vf.links = 1;
 188     } else {
 189          DEBUGF("Vorbis: ov_open failed: %d\n", error);
 190          error = CODEC_ERROR;
 191          goto done;
 192     }
 193
 194     if (ci->id3->offset) {
 195         ci->advance_buffer(ci->id3->offset);
 196         ov_raw_seek(&vf, ci->id3->offset);
 197         ci->set_elapsed(ov_time_tell(&vf));
 198         ci->set_offset(ov_raw_tell(&vf));
 199     }
 200
 201     previous_section = -1;
 202     eof = 0;
 203     while (!eof) {
 204         ci->yield();
 205         if (ci->stop_codec || ci->new_track)
 206             break;
 207
 208         if (ci->seek_time) {
 209             if (ov_time_seek(&vf, ci->seek_time - 1)) {
 210                 //ci->logf("ov_time_seek failed");
 211             }
 212             ci->seek_complete();
 213         }
 214
 215         /* Read host-endian signed 24-bit PCM samples */
 216         n = ov_read_fixed(&vf, &pcm, 1024, &current_section);
 217
 218         /* Change DSP and buffer settings for this bitstream */
 219         if (current_section != previous_section) {
 220             if (!vorbis_set_codec_parameters(&vf)) {
 221                 error = CODEC_ERROR;
 222                 goto done;
 223             } else {
 224                 previous_section = current_section;
 225             }
 226         }
 227
 228         if (n == 0) {
 229             eof = 1;
 230         } else if (n < 0) {
 231             DEBUGF("Vorbis: Error decoding frame\n");
 232         } else {
 233             ci->pcmbuf_insert(pcm[0], pcm[1], n);
 234             ci->set_offset(ov_raw_tell(&vf));
 235             ci->set_elapsed(ov_time_tell(&vf));
 236         }
 237     }
 238
 239 done:
 240 #if 0 /* defined(SIMULATOR) */
 241     {
 242         size_t bufsize;
 243         void* buf = ci->codec_get_buffer(&bufsize);
 244
 245         DEBUGF("Vorbis: Memory max: %u\n", get_max_size(buf));
 246     }
 247 #endif
 248     ogg_malloc_destroy();
 249
 250     if (ci->request_next_track()) {
 251         /* Clean things up for the next track */
 252         vf.dataoffsets = NULL;
 253         vf.offsets = NULL;
 254         vf.serialnos = NULL;
 255         vf.pcmlengths = NULL;
 256         ov_clear(&vf);
 257         goto next_track;
 258     }
 259
 260 exit:
 261     return error;
 262 }