mp3dec.c

   1 /*
   2  * Copyright (C) 2005-2007 Andre Noll <maan@systemlinux.org>
   3  *
   4  *     This program is free software; you can redistribute it and/or modify
   5  *     it under the terms of the GNU General Public License as published by
   6  *     the Free Software Foundation; either version 2 of the License, or
   7  *     (at your option) any later version.
   8  *
   9  *     This program is distributed in the hope that it will be useful,
  10  *     but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  *     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12  *     GNU General Public License for more details.
  13  *
  14  *     You should have received a copy of the GNU General Public License
  15  *     along with this program; if not, write to the Free Software
  16  *     Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111, USA.
  17  */
  18
  19 /** \file mp3dec.c paraslash's mp3 decoder */
  20
  21 #include "para.h"
  22 #include "list.h"
  23 #include "sched.h"
  24 #include "filter.h"
  25 #include "error.h"
  26 #include <mad.h>
  27 #include "string.h"
  28
  29 /** the output buffer size */
  30 #define MP3_OUTBUF_SIZE 128 * 1024
  31
  32 /** \cond a helper macro */
  33 #define MAD_TO_SHORT(f) (f) >= MAD_F_ONE? SHRT_MAX :\
  34         (f) <= -MAD_F_ONE? -SHRT_MAX : (signed short) ((f) >> (MAD_F_FRACBITS - 15))
  35 /** \endcond */
  36
  37 /**
  38  * data specific to the mp3dec filter
  39  *
  40  * \sa filter, filter_node
  41  */
  42 struct private_mp3dec_data {
  43         /** information on the current mp3 stream */
  44         struct mad_stream stream;
  45         /** information about the frame which is currently decoded */
  46         struct mad_frame frame;
  47         /** contains the PCM output */
  48         struct mad_synth synth;
  49 };
  50
  51 static ssize_t mp3dec(char *inbuffer, size_t len, struct filter_node *fn)
  52 {
  53         int i, ret;
  54         struct private_mp3dec_data *pmd = fn->private_data;
  55         size_t copy = PARA_MIN(len, 4096);
  56
  57         if (fn->loaded > fn->bufsize * 4 / 5)
  58                 return 0;
  59         mad_stream_buffer(&pmd->stream, (unsigned char *) inbuffer, copy);
  60         pmd->stream.error = 0;
  61 next_frame:
  62         ret = mad_header_decode(&pmd->frame.header, &pmd->stream);
  63         if (ret < 0)
  64                 goto out;
  65         fn->fc->samplerate = pmd->frame.header.samplerate;
  66         fn->fc->channels = MAD_NCHANNELS(&pmd->frame.header);
  67         ret = mad_frame_decode(&pmd->frame, &pmd->stream);
  68         if (ret) {
  69                 if (MAD_RECOVERABLE(pmd->stream.error) || pmd->stream.error == MAD_ERROR_BUFLEN)
  70                         goto out;
  71                 PARA_ERROR_LOG("fatal: ret = %d, loaded = %zd\n", ret, fn->loaded);
  72                 return -E_MAD_FRAME_DECODE;
  73         }
  74         mad_synth_frame(&pmd->synth, &pmd->frame);
  75
  76         for (i = 0; i < pmd->synth.pcm.length; i++) {
  77                 int s = MAD_TO_SHORT(pmd->synth.pcm.samples[0][i]);
  78                 write_int16_host_endian(fn->buf + fn->loaded, s);
  79                 fn->loaded += 2;
  80                 if (MAD_NCHANNELS(&pmd->frame.header) == 2) { /* stereo */
  81                         s = MAD_TO_SHORT(pmd->synth.pcm.samples[1][i]);
  82                         write_int16_host_endian(fn->buf + fn->loaded, s);
  83                         fn->loaded += 2;
  84                 }
  85                 if (fn->loaded != fn->bufsize) /* output buffer not full */
  86                         continue;
  87                 PARA_ERROR_LOG("output buffer full: %zd\n", fn->loaded);
  88                         return -E_MP3DEC_OVERRUN;
  89         }
  90         if (fn->loaded <= fn->bufsize * 4 / 5)
  91                 goto next_frame;
  92 out:
  93         if (pmd->stream.next_frame) { /* we still have some data */
  94                 size_t off = pmd->stream.bufend - pmd->stream.next_frame;
  95 //              PARA_INFO_LOG("off: %zd, rate: %u, returning %zd\n", off,
  96 //                      fn->fc->samplerate, copy - off);
  97                 return copy - off;
  98         }
  99         return copy;
 100 }
 101
 102 static void mp3dec_close(struct filter_node *fn)
 103 {
 104         struct private_mp3dec_data *pmd = fn->private_data;
 105
 106         mad_synth_finish(&pmd->synth);
 107         mad_frame_finish(&pmd->frame);
 108         mad_stream_finish(&pmd->stream);
 109
 110         free(fn->buf);
 111         fn->buf = NULL;
 112         free(pmd);
 113         fn->private_data = NULL;
 114 }
 115
 116 static void mp3dec_open(struct filter_node *fn)
 117 {
 118         fn->private_data = para_calloc(sizeof(struct private_mp3dec_data));
 119         struct private_mp3dec_data *pmd = fn->private_data;
 120
 121         mad_stream_init(&pmd->stream);
 122         mad_frame_init(&pmd->frame);
 123         mad_synth_init(&pmd->synth);
 124         fn->loaded = 0;
 125         fn->bufsize = MP3_OUTBUF_SIZE;
 126         fn->buf = para_calloc(fn->bufsize);
 127 }
 128
 129 /**
 130  * the init function of the mp3dec filter
 131  *
 132  * \param f pointer to the filter struct to initialize
 133  *
 134  * \sa filter::init
 135  */
 136 void mp3dec_init(struct filter *f)
 137 {
 138         f->open = mp3dec_open;
 139         f->convert = mp3dec;
 140         f->close = mp3dec_close;
 141 }