aacdec_filter.c

   1 /*
   2  * Copyright (C) 2006-2011 Andre Noll <maan@systemlinux.org>
   3  *
   4  * Licensed under the GPL v2. For licencing details see COPYING.
   5  */
   6 /*
   7  * based in parts on libfaad, Copyright (C) 2003-2005 M. Bakker,
   8  * Ahead Software AG
   9  */
  10
  11 /** \file aacdec_filter.c paraslash's aac (m4a) decoder. */
  12
  13 #include <regex.h>
  14 #include <stdbool.h>
  15
  16 #include "para.h"
  17 #include "list.h"
  18 #include "sched.h"
  19 #include "ggo.h"
  20 #include "buffer_tree.h"
  21 #include "filter.h"
  22 #include "error.h"
  23 #include "string.h"
  24 #include "aac.h"
  25
  26 /** Give up decoding after that many errors. */
  27 #define MAX_ERRORS 20
  28
  29 /**
  30  * data specific to the aacdec filter
  31  *
  32  * \sa filter, filter_node
  33  */
  34 struct private_aacdec_data {
  35         /** the return value of aac_open */
  36         NeAACDecHandle handle;
  37         /** info about the currently decoded frame */
  38         NeAACDecFrameInfo frame_info;
  39         /** whether this instance of the aac decoder is already initialized */
  40         int initialized;
  41         /**
  42          * return value of aac_find_esds(). Used to call the right aacdec
  43          * init function
  44          */
  45         unsigned long decoder_length;
  46         /** number of times the decoder returned an error */
  47         unsigned error_count;
  48         /** number of bytes already consumed from the imput stream */
  49         size_t consumed_total;
  50         /** return value of aac_find_entry_point */
  51         size_t entry;
  52         /** The number of channels of the current stream. */
  53         unsigned int channels;
  54         /** Current sample rate in Hz. */
  55         unsigned int sample_rate;
  56 };
  57
  58 static int aacdec_execute(struct btr_node *btrn, const char *cmd, char **result)
  59 {
  60         struct filter_node *fn = btr_context(btrn);
  61         struct private_aacdec_data *padd = fn->private_data;
  62
  63         return decoder_execute(cmd, padd->sample_rate, padd->channels, result);
  64 }
  65
  66 static void aacdec_open(struct filter_node *fn)
  67 {
  68         struct private_aacdec_data *padd = para_calloc(sizeof(*padd));
  69
  70         fn->private_data = padd;
  71         fn->min_iqs = 2048;
  72         padd->handle = aac_open();
  73 }
  74
  75 static void aacdec_close(struct filter_node *fn)
  76 {
  77         struct private_aacdec_data *padd = fn->private_data;
  78
  79         NeAACDecClose(padd->handle);
  80         free(padd);
  81         fn->private_data = NULL;
  82 }
  83
  84 static void aacdec_post_select(__a_unused struct sched *s, struct task *t)
  85 {
  86         struct filter_node *fn = container_of(t, struct filter_node, task);
  87         struct btr_node *btrn = fn->btrn;
  88         struct private_aacdec_data *padd = fn->private_data;
  89         int i, ret;
  90         unsigned char *p, *inbuf, *outbuffer;
  91         char *btr_buf;
  92         size_t len, skip, consumed, loaded;
  93
  94 next_buffer:
  95         t->error = 0;
  96         ret = btr_node_status(btrn, fn->min_iqs, BTR_NT_INTERNAL);
  97         if (ret < 0)
  98                 goto err;
  99         if (ret == 0)
 100                 return;
 101         btr_merge(btrn, fn->min_iqs);
 102         len = btr_next_buffer(btrn, (char **)&inbuf);
 103         len = PARA_MIN(len, (size_t)8192);
 104         consumed = 0;
 105         if (!padd->initialized) {
 106                 unsigned long rate = 0;
 107                 unsigned char channels = 0;
 108                 ret = aac_find_esds(inbuf, len, &skip, &padd->decoder_length);
 109                 if (ret < 0) {
 110                         PARA_INFO_LOG("%s\n", para_strerror(-ret));
 111                         ret = NeAACDecInit(padd->handle, inbuf,
 112                                 len, &rate, &channels);
 113                         PARA_INFO_LOG("decoder init: %d\n", ret);
 114                         if (ret < 0) {
 115                                 ret = -E_AACDEC_INIT;
 116                                 goto out;
 117                         }
 118                         consumed = ret;
 119                 } else {
 120                         PARA_INFO_LOG("decoder len: %lu\n",
 121                                 padd->decoder_length);
 122                         consumed += skip;
 123                         p = inbuf + consumed;
 124                         ret = -E_AACDEC_INIT;
 125                         if (NeAACDecInit2(padd->handle, p,
 126                                         padd->decoder_length, &rate,
 127                                         &channels) < 0)
 128                                 goto out;
 129                 }
 130                 padd->sample_rate = rate;
 131                 padd->channels = channels;
 132                 PARA_INFO_LOG("rate: %u, channels: %d\n",
 133                         padd->sample_rate, padd->channels);
 134                 padd->initialized = 1;
 135         }
 136         if (padd->decoder_length > 0) {
 137                 consumed = 0;
 138                 if (!padd->entry) {
 139                         ret = aac_find_entry_point(inbuf + consumed,
 140                                 len - consumed, &skip);
 141                         if (ret < 0) {
 142                                 ret = len;
 143                                 goto out;
 144                         }
 145                         consumed += skip;
 146                         padd->entry = ret;
 147                         PARA_INFO_LOG("entry: %zu\n", padd->entry);
 148                 }
 149                 ret = len;
 150                 if (padd->consumed_total + len < padd->entry)
 151                         goto out;
 152                 if (padd->consumed_total < padd->entry)
 153                         consumed = padd->entry - padd->consumed_total;
 154         }
 155         for (; consumed < len; consumed++)
 156                 if ((inbuf[consumed] & 0xfe) == 0x20)
 157                         break;
 158         if (consumed >= len)
 159                 goto success;
 160         p = inbuf + consumed;
 161         //PARA_CRIT_LOG("consumed: %zu (%zu + %zu), have: %zu\n", padd->consumed_total + consumed,
 162         //      padd->consumed_total, consumed, len - consumed);
 163         outbuffer = NeAACDecDecode(padd->handle, &padd->frame_info, p,
 164                 len - consumed);
 165         if (padd->frame_info.error) {
 166                 int err = padd->frame_info.error;
 167                 ret = -E_AAC_DECODE;
 168                 if (padd->error_count++ > MAX_ERRORS)
 169                         goto err;
 170                 PARA_ERROR_LOG("frame_error: %d (%s), consumed: %zu + %zd + %lu\n",
 171                         err, NeAACDecGetErrorMessage(padd->frame_info.error),
 172                         padd->consumed_total, consumed,
 173                         padd->frame_info.bytesconsumed);
 174                 PARA_ERROR_LOG("%s\n", NeAACDecGetErrorMessage(
 175                         padd->frame_info.error));
 176                 if (consumed < len)
 177                         consumed++; /* catch 21 */
 178                 goto success;
 179         }
 180         padd->error_count = 0;
 181         //PARA_CRIT_LOG("decoder ate %lu\n", padd->frame_info.bytesconsumed);
 182         consumed += padd->frame_info.bytesconsumed;
 183         ret = consumed;
 184         if (!padd->frame_info.samples)
 185                 goto out;
 186         btr_buf = para_malloc(2 * padd->frame_info.samples);
 187         loaded = 0;
 188         for (i = 0; i < padd->frame_info.samples; i++) {
 189                 short sh = ((short *)outbuffer)[i];
 190                 write_int16_host_endian(btr_buf + loaded, sh);
 191                 loaded += 2;
 192         }
 193         btr_add_output(btr_buf, loaded, btrn);
 194 success:
 195         ret = consumed;
 196 out:
 197         if (ret >= 0) {
 198                 padd->consumed_total += ret;
 199                 btr_consume(btrn, ret);
 200                 goto next_buffer;
 201         }
 202 err:
 203         assert(ret < 0);
 204         t->error = ret;
 205         btr_remove_node(btrn);
 206 }
 207
 208 /**
 209  * The init function of the aacdec filter.
 210  *
 211  * \param f Pointer to the filter struct to initialize.
 212  *
 213  * \sa filter::init
 214  */
 215 void aacdec_filter_init(struct filter *f)
 216 {
 217         f->open = aacdec_open;
 218         f->close = aacdec_close;
 219         f->pre_select = generic_filter_pre_select;
 220         f->post_select = aacdec_post_select;
 221         f->execute = aacdec_execute;
 222 }