summaryrefslogtreecommitdiff
path: root/src/libreal/xine_real_audio_decoder.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/libreal/xine_real_audio_decoder.c')
-rw-r--r--src/libreal/xine_real_audio_decoder.c628
1 files changed, 628 insertions, 0 deletions
diff --git a/src/libreal/xine_real_audio_decoder.c b/src/libreal/xine_real_audio_decoder.c
new file mode 100644
index 000000000..d1bb94230
--- /dev/null
+++ b/src/libreal/xine_real_audio_decoder.c
@@ -0,0 +1,628 @@
+/*
+ * Copyright (C) 2000-2003 the xine project
+ *
+ * This file is part of xine, a free video player.
+ *
+ * xine is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * xine is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
+ *
+ * $Id: audio_decoder.c,v 1.59 2007/03/17 15:45:41 dgp85 Exp $
+ *
+ * thin layer to use real binary-only codecs in xine
+ *
+ * code inspired by work from Florian Schneider for the MPlayer Project
+ */
+
+
+#include <stdlib.h>
+#include <string.h>
+#include <sys/types.h>
+#include <sys/stat.h>
+#include <fcntl.h>
+#include <unistd.h>
+#include <dlfcn.h>
+
+#define LOG_MODULE "real_audio_decoder"
+#define LOG_VERBOSE
+/*
+#define LOG
+*/
+
+#include "bswap.h"
+#include "xine_internal.h"
+#include "video_out.h"
+#include "buffer.h"
+#include "xineutils.h"
+
+#include "real_common.h"
+
+typedef struct {
+ audio_decoder_class_t decoder_class;
+
+ /* empty so far */
+} real_class_t;
+
+typedef struct realdec_decoder_s {
+ audio_decoder_t audio_decoder;
+
+ real_class_t *cls;
+
+ xine_stream_t *stream;
+
+ void *ra_handle;
+
+ unsigned long (*raCloseCodec)(void*);
+ unsigned long (*raDecode)(void*, char*,unsigned long,char*,unsigned int*,long);
+ unsigned long (*raFlush)(unsigned long,unsigned long,unsigned long);
+ unsigned long (*raFreeDecoder)(void*);
+ void* (*raGetFlavorProperty)(void*,unsigned long,unsigned long,int*);
+ unsigned long (*raInitDecoder)(void*, void*);
+ unsigned long (*raOpenCodec2)(void*);
+ unsigned long (*raSetFlavor)(void*,unsigned long);
+ void (*raSetDLLAccessPath)(char*);
+ void (*raSetPwd)(char*,char*);
+
+ void *context;
+
+ int sps, w, h;
+ int block_align;
+
+ uint8_t *frame_buffer;
+ uint8_t *frame_reordered;
+ int frame_size;
+ int frame_num_bytes;
+
+ int sample_size;
+
+ uint64_t pts;
+
+ int output_open;
+
+ int decoder_ok;
+
+} realdec_decoder_t;
+
+typedef struct {
+ int samplerate;
+ short bits;
+ short channels;
+ int unk1;
+ int subpacket_size;
+ int coded_frame_size;
+ int codec_data_length;
+ void *extras;
+} ra_init_t;
+
+static int load_syms_linux (realdec_decoder_t *this, const char *const codec_name, const char *const codec_alternate) {
+ cfg_entry_t* entry =
+ this->stream->xine->config->lookup_entry(this->stream->xine->config,
+ "decoder.external.real_codecs_path");
+
+ if ( (this->ra_handle = _x_real_codec_open(this->stream, entry->str_value, codec_name, codec_alternate)) == NULL )
+ return 0;
+
+ this->raCloseCodec = dlsym (this->ra_handle, "RACloseCodec");
+ this->raDecode = dlsym (this->ra_handle, "RADecode");
+ this->raFlush = dlsym (this->ra_handle, "RAFlush");
+ this->raFreeDecoder = dlsym (this->ra_handle, "RAFreeDecoder");
+ this->raGetFlavorProperty = dlsym (this->ra_handle, "RAGetFlavorProperty");
+ this->raOpenCodec2 = dlsym (this->ra_handle, "RAOpenCodec2");
+ this->raInitDecoder = dlsym (this->ra_handle, "RAInitDecoder");
+ this->raSetFlavor = dlsym (this->ra_handle, "RASetFlavor");
+ this->raSetDLLAccessPath = dlsym (this->ra_handle, "SetDLLAccessPath");
+ this->raSetPwd = dlsym (this->ra_handle, "RASetPwd"); /* optional, used by SIPR */
+
+ if (!this->raCloseCodec || !this->raDecode || !this->raFlush || !this->raFreeDecoder ||
+ !this->raGetFlavorProperty || !this->raOpenCodec2 || !this->raSetFlavor ||
+ /*!raSetDLLAccessPath ||*/ !this->raInitDecoder){
+ xprintf (this->stream->xine, XINE_VERBOSITY_LOG,
+ _("libareal: (audio) Cannot resolve symbols - incompatible dll: %s\n"), codec_name);
+ return 0;
+ }
+
+ if (this->raSetDLLAccessPath){
+
+ char path[1024];
+
+ snprintf(path, sizeof(path) - 2, "DT_Codecs=%s", entry->str_value);
+ if (path[strlen(path)-1]!='/'){
+ path[strlen(path)+1]=0;
+ path[strlen(path)]='/';
+ }
+ path[strlen(path)+1]=0;
+
+ this->raSetDLLAccessPath(path);
+ }
+
+ lprintf ("audio decoder loaded successfully\n");
+
+ return 1;
+}
+
+static int init_codec (realdec_decoder_t *this, buf_element_t *buf) {
+
+ int version, result ;
+ int samples_per_sec, bits_per_sample, num_channels;
+ int subpacket_size, coded_frame_size, codec_data_length;
+ int coded_frame_size2, data_len, flavor;
+ int mode;
+ void *extras;
+
+ /*
+ * extract header data
+ */
+
+ version = BE_16 (buf->content+4);
+
+ lprintf ("header buffer detected, header version %d\n", version);
+#ifdef LOG
+ xine_hexdump (buf->content, buf->size);
+#endif
+
+ flavor = BE_16 (buf->content+22);
+ coded_frame_size = BE_32 (buf->content+24);
+ codec_data_length= BE_16 (buf->content+40);
+ coded_frame_size2= BE_16 (buf->content+42);
+ subpacket_size = BE_16 (buf->content+44);
+
+ this->sps = subpacket_size;
+ this->w = coded_frame_size2;
+ this->h = codec_data_length;
+
+ if (version == 4) {
+ samples_per_sec = BE_16 (buf->content+48);
+ bits_per_sample = BE_16 (buf->content+52);
+ num_channels = BE_16 (buf->content+54);
+
+ /* FIXME: */
+ if (buf->type==BUF_AUDIO_COOK) {
+
+ xprintf (this->stream->xine, XINE_VERBOSITY_DEBUG,
+ "libareal: audio header version 4 for COOK audio not supported.\n");
+ return 0;
+ }
+ data_len = 0; /* FIXME: COOK audio needs this */
+ extras = buf->content+71;
+
+ } else {
+ samples_per_sec = BE_16 (buf->content+54);
+ bits_per_sample = BE_16 (buf->content+58);
+ num_channels = BE_16 (buf->content+60);
+ data_len = BE_32 (buf->content+74);
+ extras = buf->content+78;
+ }
+
+ this->block_align= coded_frame_size2;
+
+ lprintf ("0x%04x 0x%04x 0x%04x 0x%04x data_len 0x%04x\n",
+ subpacket_size, coded_frame_size, codec_data_length,
+ coded_frame_size2, data_len);
+ lprintf ("%d samples/sec, %d bits/sample, %d channels\n",
+ samples_per_sec, bits_per_sample, num_channels);
+
+ /* load codec, resolv symbols */
+
+ switch (buf->type) {
+ case BUF_AUDIO_COOK:
+ _x_meta_info_set_utf8(this->stream, XINE_META_INFO_AUDIOCODEC, "Cook");
+ if (!load_syms_linux (this, "cook.so", "cook.so.6.0"))
+ return 0;
+ break;
+
+ case BUF_AUDIO_ATRK:
+ _x_meta_info_set_utf8(this->stream, XINE_META_INFO_AUDIOCODEC, "Atrac");
+ if (!load_syms_linux (this, "atrc.so", "atrc.so.6.0"))
+ return 0;
+ this->block_align = 384;
+ break;
+
+ case BUF_AUDIO_14_4:
+ _x_meta_info_set_utf8(this->stream, XINE_META_INFO_AUDIOCODEC, "Real 14.4");
+ if (!load_syms_linux (this, "14_4.so", "14_4.so.6.0"))
+ return 0;
+ break;
+
+ case BUF_AUDIO_28_8:
+ _x_meta_info_set_utf8(this->stream, XINE_META_INFO_AUDIOCODEC, "Real 28.8");
+ if (!load_syms_linux (this, "28_8.so", "28_8.so.6.0"))
+ return 0;
+ break;
+
+ case BUF_AUDIO_SIPRO:
+ _x_meta_info_set_utf8(this->stream, XINE_META_INFO_AUDIOCODEC, "Sipro");
+ if (!load_syms_linux (this, "sipr.so", "sipr.so.6.0"))
+ return 0;
+ /* this->block_align = 19; */
+ break;
+
+ default:
+ xprintf (this->stream->xine, XINE_VERBOSITY_DEBUG,
+ "libareal: error, i don't handle buf type 0x%08x\n", buf->type);
+ return 0;
+ }
+
+ /*
+ * init codec
+ */
+
+ result = this->raOpenCodec2 (&this->context);
+ if (result) {
+ xprintf (this->stream->xine, XINE_VERBOSITY_DEBUG, "libareal: error in raOpenCodec2: %d\n", result);
+ return 0;
+ }
+
+ {
+ ra_init_t init_data;
+
+ init_data.samplerate = samples_per_sec;
+ init_data.bits = bits_per_sample;
+ init_data.channels = num_channels;
+ init_data.unk1 = 100; /* ??? */
+ init_data.subpacket_size = subpacket_size; /* subpacket size */
+ init_data.coded_frame_size = coded_frame_size; /* coded frame size */
+ init_data.codec_data_length = data_len; /* codec data length */
+ init_data.extras = extras; /* extras */
+
+#ifdef LOG
+ printf ("libareal: init_data:\n");
+ xine_hexdump ((char *) &init_data, sizeof (ra_init_t));
+ printf ("libareal: extras :\n");
+ xine_hexdump (init_data.extras, data_len);
+#endif
+
+ result = this->raInitDecoder (this->context, &init_data);
+ if(result){
+ xprintf (this->stream->xine, XINE_VERBOSITY_LOG,
+ _("libareal: decoder init failed, error code: 0x%x\n"), result);
+ return 0;
+ }
+ }
+
+ if (this->raSetPwd){
+ /* used by 'SIPR' */
+ this->raSetPwd (this->context, "Ardubancel Quazanga"); /* set password... lol. */
+ lprintf ("password set\n");
+ }
+
+ result = this->raSetFlavor (this->context, flavor);
+ if (result){
+ xprintf (this->stream->xine, XINE_VERBOSITY_LOG,
+ _("libareal: decoder flavor setup failed, error code: 0x%x\n"), result);
+ return 0;
+ }
+
+ /*
+ * alloc buffers for data reordering
+ */
+
+ if (this->sps) {
+
+ this->frame_size = this->w/this->sps*this->h*this->sps;
+ this->frame_buffer = xine_xmalloc (this->frame_size);
+ this->frame_reordered = xine_xmalloc (this->frame_size);
+ this->frame_num_bytes = 0;
+
+ } else {
+
+ this->frame_size = this->w*this->h;
+ this->frame_buffer = xine_xmalloc (this->frame_size);
+ this->frame_reordered = this->frame_buffer;
+ this->frame_num_bytes = 0;
+
+ }
+
+ /*
+ * open audio output
+ */
+
+ switch (num_channels) {
+ case 1:
+ mode = AO_CAP_MODE_MONO;
+ break;
+ case 2:
+ mode = AO_CAP_MODE_STEREO;
+ break;
+ default:
+ xprintf (this->stream->xine, XINE_VERBOSITY_LOG,
+ _("libareal: oups, real can do more than 2 channels ?\n"));
+ return 0;
+ }
+
+ this->stream->audio_out->open(this->stream->audio_out,
+ this->stream,
+ bits_per_sample,
+ samples_per_sec,
+ mode) ;
+
+ this->output_open = 1;
+
+ this->sample_size = num_channels * (bits_per_sample>>3);
+
+ return 1;
+}
+
+static unsigned char sipr_swaps[38][2]={
+ {0,63},{1,22},{2,44},{3,90},{5,81},{7,31},{8,86},{9,58},{10,36},{12,68},
+ {13,39},{14,73},{15,53},{16,69},{17,57},{19,88},{20,34},{21,71},{24,46},
+ {25,94},{26,54},{28,75},{29,50},{32,70},{33,92},{35,74},{38,85},{40,56},
+ {42,87},{43,65},{45,59},{48,79},{49,93},{51,89},{55,95},{61,76},{67,83},
+ {77,80} };
+
+static void realdec_decode_data (audio_decoder_t *this_gen, buf_element_t *buf) {
+ realdec_decoder_t *this = (realdec_decoder_t *) this_gen;
+
+ lprintf ("decode_data %d bytes, flags=0x%08x, pts=%"PRId64" ...\n",
+ buf->size, buf->decoder_flags, buf->pts);
+
+ if (buf->decoder_flags & BUF_FLAG_PREVIEW) {
+
+ /* real_find_sequence_header (&this->real, buf->content, buf->content + buf->size);*/
+
+ } else if (buf->decoder_flags & BUF_FLAG_HEADER) {
+
+ this->decoder_ok = init_codec (this, buf) ;
+ if( !this->decoder_ok )
+ _x_stream_info_set(this->stream, XINE_STREAM_INFO_AUDIO_HANDLED, 0);
+
+ } else if( this->decoder_ok ) {
+
+ int size;
+
+ lprintf ("content buffer detected, %d bytes\n", buf->size);
+
+ if (buf->pts && !this->pts)
+ this->pts = buf->pts;
+
+ size = buf->size;
+
+ while (size) {
+
+ int needed;
+
+ needed = this->frame_size - this->frame_num_bytes;
+
+ if (needed>size) {
+
+ memcpy (this->frame_buffer+this->frame_num_bytes, buf->content, size);
+ this->frame_num_bytes += size;
+
+ lprintf ("buffering %d/%d bytes\n", this->frame_num_bytes, this->frame_size);
+
+ size = 0;
+
+ } else {
+
+ int result;
+ int len =-1;
+ int n;
+ int sps = this->sps;
+ int w = this->w;
+ int h = this->h;
+ audio_buffer_t *audio_buffer;
+
+ lprintf ("buffering %d bytes\n", needed);
+
+ memcpy (this->frame_buffer+this->frame_num_bytes, buf->content, needed);
+
+ size -= needed;
+ this->frame_num_bytes = 0;
+
+ lprintf ("frame completed. reordering...\n");
+ lprintf ("bs=%d sps=%d w=%d h=%d \n",/*sh->wf->nBlockAlign*/-1,sps,w,h);
+
+ if (!sps) {
+
+ int j,n;
+ int bs=h*w*2/96; /* nibbles per subpacket */
+ unsigned char *p=this->frame_buffer;
+
+ /* 'sipr' way */
+ /* demux_read_data(sh->ds, p, h*w); */
+ for (n=0;n<38;n++){
+ int i=bs*sipr_swaps[n][0];
+ int o=bs*sipr_swaps[n][1];
+ /* swap nibbles of block 'i' with 'o' TODO: optimize */
+ for (j=0;j<bs;j++) {
+ int x=(i&1) ? (p[(i>>1)]>>4) : (p[(i>>1)]&15);
+ int y=(o&1) ? (p[(o>>1)]>>4) : (p[(o>>1)]&15);
+ if (o&1)
+ p[(o>>1)]=(p[(o>>1)]&0x0F)|(x<<4);
+ else
+ p[(o>>1)]=(p[(o>>1)]&0xF0)|x;
+
+ if (i&1)
+ p[(i>>1)]=(p[(i>>1)]&0x0F)|(y<<4);
+ else
+ p[(i>>1)]=(p[(i>>1)]&0xF0)|y;
+
+ ++i;
+ ++o;
+ }
+ }
+ /*
+ sh->a_in_buffer_size=
+ sh->a_in_buffer_len=w*h;
+ */
+
+ } else {
+ int x, y;
+ uint8_t *s;
+
+ /* 'cook' way */
+
+ w /= sps; s = this->frame_buffer;
+
+ for (y=0; y<h; y++)
+
+ for (x=0; x<w; x++) {
+
+ lprintf ("x=%d, y=%d, off %d\n",
+ x, y, sps*(h*x+((h+1)/2)*(y&1)+(y>>1)));
+
+ memcpy (this->frame_reordered+sps*(h*x+((h+1)/2)*(y&1)+(y>>1)),
+ s, sps);
+ s+=sps;
+
+ /* demux_read_data(sh->ds, sh->a_in_buffer+sps*(h*x+((h+1)/2)*(y&1)+(y>>1)),
+ sps); */
+
+ }
+ /*
+ sh->a_in_buffer_size=
+ sh->a_in_buffer_len=w*h*sps;
+ */
+ }
+
+#ifdef LOG
+ xine_hexdump (this->frame_reordered, buf->size);
+#endif
+
+ n = 0;
+ while (n<this->frame_size) {
+
+ audio_buffer = this->stream->audio_out->get_buffer (this->stream->audio_out);
+
+ result = this->raDecode (this->context,
+ this->frame_reordered+n,
+ this->block_align,
+ (char *) audio_buffer->mem, &len, -1);
+
+ lprintf ("raDecode result %d, len=%d\n", result, len);
+
+ audio_buffer->vpts = this->pts;
+
+ this->pts = 0;
+
+ audio_buffer->num_frames = len/this->sample_size;;
+
+ this->stream->audio_out->put_buffer (this->stream->audio_out,
+ audio_buffer, this->stream);
+ n+=this->block_align;
+ }
+ }
+ }
+ }
+
+ lprintf ("decode_data...done\n");
+}
+
+static void realdec_reset (audio_decoder_t *this_gen) {
+ realdec_decoder_t *this = (realdec_decoder_t *) this_gen;
+
+ this->frame_num_bytes = 0;
+}
+
+static void realdec_discontinuity (audio_decoder_t *this_gen) {
+ realdec_decoder_t *this = (realdec_decoder_t *) this_gen;
+
+ this->pts = 0;
+}
+
+static void realdec_dispose (audio_decoder_t *this_gen) {
+
+ realdec_decoder_t *this = (realdec_decoder_t *) this_gen;
+
+ lprintf ("dispose\n");
+
+ if (this->context)
+ this->raCloseCodec (this->context);
+
+#if 0
+ printf ("libareal: FreeDecoder...\n");
+
+ if (this->context)
+ this->raFreeDecoder (this->context);
+#endif
+
+ lprintf ("dlclose...\n");
+
+ if (this->ra_handle)
+ dlclose (this->ra_handle);
+
+ if (this->output_open)
+ this->stream->audio_out->close (this->stream->audio_out, this->stream);
+
+ if (this->frame_buffer)
+ free (this->frame_buffer);
+
+ free (this);
+
+ lprintf ("dispose done\n");
+}
+
+static audio_decoder_t *open_plugin (audio_decoder_class_t *class_gen,
+ xine_stream_t *stream) {
+
+ real_class_t *cls = (real_class_t *) class_gen;
+ realdec_decoder_t *this ;
+
+ this = (realdec_decoder_t *) xine_xmalloc (sizeof (realdec_decoder_t));
+
+ this->audio_decoder.decode_data = realdec_decode_data;
+ this->audio_decoder.reset = realdec_reset;
+ this->audio_decoder.discontinuity = realdec_discontinuity;
+ this->audio_decoder.dispose = realdec_dispose;
+ this->stream = stream;
+ this->cls = cls;
+
+ this->output_open = 0;
+
+ return &this->audio_decoder;
+}
+
+/*
+ * real plugin class
+ */
+
+static char *get_identifier (audio_decoder_class_t *this) {
+ return "realadec";
+}
+
+static char *get_description (audio_decoder_class_t *this) {
+ return "real binary-only codec based audio decoder plugin";
+}
+
+static void dispose_class (audio_decoder_class_t *this) {
+ free (this);
+}
+
+void *init_realadec (xine_t *xine, void *data) {
+
+ real_class_t *this;
+ config_values_t *config = xine->config;
+
+ this = (real_class_t *) xine_xmalloc (sizeof (real_class_t));
+
+ this->decoder_class.open_plugin = open_plugin;
+ this->decoder_class.get_identifier = get_identifier;
+ this->decoder_class.get_description = get_description;
+ this->decoder_class.dispose = dispose_class;
+
+ _x_real_codecs_init(xine);
+
+ return this;
+}
+
+/*
+ * exported plugin catalog entry
+ */
+
+static uint32_t audio_types[] = {
+ BUF_AUDIO_COOK, BUF_AUDIO_ATRK, /* BUF_AUDIO_14_4, BUF_AUDIO_28_8, */ BUF_AUDIO_SIPRO, 0
+ };
+
+const decoder_info_t dec_info_realaudio = {
+ audio_types, /* supported types */
+ 7 /* priority */
+};