libmpcodecs/ad_speex.c

   1 /*
   2  * Speex decoder by Reimar Döffinger <Reimar.Doeffinger@stud.uni-karlsruhe.de>
   3  *
   4  * This code may be be relicensed under the terms of the GNU LGPL when it
   5  * becomes part of the FFmpeg project (ffmpeg.org)
   6  *
   7  * This file is part of MPlayer.
   8  *
   9  * MPlayer is free software; you can redistribute it and/or modify
  10  * it under the terms of the GNU General Public License as published by
  11  * the Free Software Foundation; either version 2 of the License, or
  12  * (at your option) any later version.
  13  *
  14  * MPlayer is distributed in the hope that it will be useful,
  15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  17  * GNU General Public License for more details.
  18  *
  19  * You should have received a copy of the GNU General Public License along
  20  * with MPlayer; if not, write to the Free Software Foundation, Inc.,
  21  * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
  22  */
  23
  24 #include "config.h"
  25 #include <stdlib.h>
  26 #include <speex/speex.h>
  27 #include <speex/speex_stereo.h>
  28 #include <speex/speex_header.h>
  29 #include "ad_internal.h"
  30
  31 static const ad_info_t info = {
  32   "Speex audio decoder",
  33   "speex",
  34   "Reimar Döffinger",
  35   "",
  36   ""
  37 };
  38
  39 LIBAD_EXTERN(speex)
  40
  41 typedef struct {
  42   SpeexBits bits;
  43   void *dec_context;
  44   SpeexStereoState stereo;
  45   SpeexHeader *hdr;
  46 } context_t;
  47
  48 #define MAX_FRAMES_PER_PACKET 100
  49
  50 static int preinit(sh_audio_t *sh) {
  51   sh->audio_out_minsize = 2 * 320 * MAX_FRAMES_PER_PACKET * 2 * sizeof(short);
  52   return 1;
  53 }
  54
  55 static int read_le32(const uint8_t **src) {
  56     const uint8_t *p = *src;
  57     *src += 4;
  58     return p[0] + (p[1] << 8) + (p[2] << 16) + (p[3] << 24);
  59 }
  60
  61 static int init(sh_audio_t *sh) {
  62   context_t *ctx = calloc(1, sizeof(context_t));
  63   const uint8_t *hdr = (const uint8_t *)(sh->wf + 1);
  64   const SpeexMode *spx_mode;
  65   const SpeexStereoState st_st = SPEEX_STEREO_STATE_INIT; // hack
  66   if (!sh->wf || sh->wf->cbSize < 80) {
  67     mp_msg(MSGT_DECAUDIO, MSGL_FATAL, "Missing extradata!\n");
  68     return 0;
  69   }
  70   ctx->hdr = speex_packet_to_header((char *)&sh->wf[1], sh->wf->cbSize);
  71   if (!ctx->hdr && sh->wf->cbSize == 0x72 && hdr[0] == 1 && hdr[1] == 0) {
  72     // speex.acm format: raw SpeexHeader dump
  73     ctx->hdr = calloc(1, sizeof(*ctx->hdr));
  74     hdr += 2;
  75     hdr += 8; // identifier string
  76     hdr += 20; // version string
  77     ctx->hdr->speex_version_id = read_le32(&hdr);
  78     ctx->hdr->header_size = read_le32(&hdr);
  79     ctx->hdr->rate = read_le32(&hdr);
  80     ctx->hdr->mode = read_le32(&hdr);
  81     ctx->hdr->mode_bitstream_version = read_le32(&hdr);
  82     ctx->hdr->nb_channels = read_le32(&hdr);
  83     ctx->hdr->bitrate = read_le32(&hdr);
  84     ctx->hdr->frame_size = read_le32(&hdr);
  85     ctx->hdr->vbr = read_le32(&hdr);
  86     ctx->hdr->frames_per_packet = read_le32(&hdr);
  87   }
  88   if (!ctx->hdr) {
  89     mp_msg(MSGT_DECAUDIO, MSGL_FATAL, "Invalid extradata!\n");
  90     return 0;
  91   }
  92   if (ctx->hdr->nb_channels != 1 && ctx->hdr->nb_channels != 2) {
  93     mp_msg(MSGT_DECAUDIO, MSGL_WARN, "Invalid number of channels (%i), "
  94             "assuming mono\n", ctx->hdr->nb_channels);
  95     ctx->hdr->nb_channels = 1;
  96   }
  97   if (ctx->hdr->frames_per_packet > MAX_FRAMES_PER_PACKET) {
  98     mp_msg(MSGT_DECAUDIO, MSGL_WARN, "Invalid number of frames per packet (%i), "
  99             "assuming 1\n", ctx->hdr->frames_per_packet);
 100     ctx->hdr->frames_per_packet = 1;
 101   }
 102   switch (ctx->hdr->mode) {
 103     case 0:
 104       spx_mode = &speex_nb_mode; break;
 105     case 1:
 106       spx_mode = &speex_wb_mode; break;
 107     case 2:
 108       spx_mode = &speex_uwb_mode; break;
 109     default:
 110       mp_msg(MSGT_DECAUDIO, MSGL_WARN, "Unknown speex mode (%i)\n", ctx->hdr->mode);
 111       spx_mode = &speex_nb_mode;
 112   }
 113   ctx->dec_context = speex_decoder_init(spx_mode);
 114   speex_bits_init(&ctx->bits);
 115   memcpy(&ctx->stereo, &st_st, sizeof(ctx->stereo)); // hack part 2
 116   sh->channels = ctx->hdr->nb_channels;
 117   sh->samplerate = ctx->hdr->rate;
 118   sh->samplesize = 2;
 119   sh->sample_format = AF_FORMAT_S16_NE;
 120   sh->context = ctx;
 121   return 1;
 122 }
 123
 124 static void uninit(sh_audio_t *sh) {
 125   context_t *ctx = sh->context;
 126   if (ctx) {
 127     speex_bits_destroy(&ctx->bits);
 128     speex_decoder_destroy(ctx->dec_context);
 129     if (ctx->hdr)
 130       free(ctx->hdr);
 131     free(ctx);
 132   }
 133   ctx = NULL;
 134 }
 135
 136 static int decode_audio(sh_audio_t *sh, unsigned char *buf,
 137                         int minlen, int maxlen) {
 138   context_t *ctx = sh->context;
 139   int len, framelen, framesamples;
 140   char *packet;
 141   int i, err;
 142   speex_decoder_ctl(ctx->dec_context, SPEEX_GET_FRAME_SIZE, &framesamples);
 143   framelen = framesamples * ctx->hdr->nb_channels * sizeof(short);
 144   if (maxlen < ctx->hdr->frames_per_packet * framelen) {
 145     mp_msg(MSGT_DECAUDIO, MSGL_V, "maxlen too small in decode_audio\n");
 146     return -1;
 147   }
 148   len = ds_get_packet(sh->ds, (unsigned char **)&packet);
 149   if (len <= 0) return -1;
 150   speex_bits_read_from(&ctx->bits, packet, len);
 151   i = ctx->hdr->frames_per_packet;
 152   do {
 153     err = speex_decode_int(ctx->dec_context, &ctx->bits, (short *)buf);
 154     if (err == -2)
 155       mp_msg(MSGT_DECAUDIO, MSGL_ERR, "Error decoding file.\n");
 156     if (ctx->hdr->nb_channels == 2)
 157       speex_decode_stereo_int((short *)buf, framesamples, &ctx->stereo);
 158     buf = &buf[framelen];
 159   } while (--i > 0);
 160   return ctx->hdr->frames_per_packet * framelen;
 161 }
 162
 163 static int control(sh_audio_t *sh, int cmd, void *arg, ...) {
 164   return CONTROL_UNKNOWN;
 165 }