X-Git-Url: http://review.tizen.org/git/?a=blobdiff_plain;f=ext%2Fladspa%2Fgstladspa.c;h=6ecb3ce16a1d655d8dfd73a82ea2f4315a1e7a4d;hb=e46d34995dbfd1481f962b620df4dfa4266f7977;hp=0eab11cdaedbe79a6815127c49cf90f8cd0d2b6c;hpb=d6258153e0aa7d3fe89a31acd3e57b9c13de4464;p=platform%2Fupstream%2Fgst-plugins-good.git diff --git a/ext/ladspa/gstladspa.c b/ext/ladspa/gstladspa.c index 0eab11c..6ecb3ce 100644 --- a/ext/ladspa/gstladspa.c +++ b/ext/ladspa/gstladspa.c @@ -1,6 +1,7 @@ /* GStreamer * Copyright (C) <1999> Erik Walthinsen * <2001> Steve Baker + * 2003 Andy Wingo * * This library is free software; you can redistribute it and/or * modify it under the terms of the GNU Library General Public @@ -18,71 +19,62 @@ * Boston, MA 02111-1307, USA. */ +#ifdef HAVE_CONFIG_H +#include "config.h" +#endif #include #include +#include +#include #include "gstladspa.h" -#include "ladspa.h" /* main ladspa sdk include file */ +#include /* main ladspa sdk include file */ #include "utils.h" /* ladspa sdk utility functions */ +/* 1.0 and the 1.1 preliminary headers don't define a version, but 1.1 final + does */ +#ifndef LADSPA_VERSION +#define LADSPA_VERSION "1.0" +#endif -static GstPadTemplate* -ladspa_src_factory (void) +/* takes ownership of the name */ +static GstPadTemplate* +ladspa_sink_factory (gchar *name) { - return - gst_padtemplate_new ( - "src", - GST_PAD_SRC, - GST_PAD_ALWAYS, - gst_caps_new ( - "ladspa_src", - "audio/raw", - gst_props_new ( - "format", GST_PROPS_STRING ("float"), - "layout", GST_PROPS_STRING ("gfloat"), - "intercept", GST_PROPS_FLOAT(0.0), - "slope", GST_PROPS_FLOAT(1.0), - "channels", GST_PROPS_INT (1), - "rate", GST_PROPS_INT_RANGE (0,G_MAXINT), - NULL)), - NULL); + return GST_PAD_TEMPLATE_NEW ( + name, + GST_PAD_SINK, + GST_PAD_ALWAYS, + gst_caps_new ( + "ladspa_sink", + "audio/x-raw-float", + GST_AUDIO_FLOAT_STANDARD_PAD_TEMPLATE_PROPS + ) + ); } -static GstPadTemplate* -ladspa_sink_factory (void) +/* takes ownership of the name */ +static GstPadTemplate* +ladspa_src_factory (gchar *name) { - return - gst_padtemplate_new ( - "sink", - GST_PAD_SINK, - GST_PAD_ALWAYS, - gst_caps_new ( - "float2int_sink", - "audio/raw", - gst_props_new ( - "format", GST_PROPS_STRING ("float"), - "layout", GST_PROPS_STRING ("gfloat"), - "intercept", GST_PROPS_FLOAT(0.0), - "slope", GST_PROPS_FLOAT(1.0), - "channels", GST_PROPS_INT (1), - "rate", GST_PROPS_INT_RANGE (0,G_MAXINT), - NULL)), - NULL); + return GST_PAD_TEMPLATE_NEW ( + name, + GST_PAD_SRC, + GST_PAD_ALWAYS, + gst_caps_new ( + "ladspa_src", + "audio/x-raw-float", + GST_AUDIO_FLOAT_STANDARD_PAD_TEMPLATE_PROPS + ) + ); } -enum { - ARG_0, - ARG_LOOP_BASED, - ARG_SAMPLERATE, - ARG_BUFFERSIZE, - ARG_LAST, -}; - static void gst_ladspa_class_init (GstLADSPAClass *klass); +static void gst_ladspa_base_init (GstLADSPAClass *klass); static void gst_ladspa_init (GstLADSPA *ladspa); -static GstPadConnectReturn gst_ladspa_connect (GstPad *pad, GstCaps *caps); -static GstPadConnectReturn gst_ladspa_connect_get (GstPad *pad, GstCaps *caps); +static void gst_ladspa_update_int (const GValue *value, gpointer data); +static GstPadLinkReturn gst_ladspa_link (GstPad *pad, GstCaps *caps); static void gst_ladspa_force_src_caps (GstLADSPA *ladspa, GstPad *pad); static void gst_ladspa_set_property (GObject *object, guint prop_id, const GValue *value, GParamSpec *pspec); @@ -94,30 +86,88 @@ static void gst_ladspa_deactivate (GstLADSPA *ladspa); static GstElementStateReturn gst_ladspa_change_state (GstElement *element); static void gst_ladspa_loop (GstElement *element); -static void gst_ladspa_chain_mono (GstPad *pad,GstBuffer *buf); -static GstBuffer * gst_ladspa_get (GstPad *pad); +static void gst_ladspa_chain (GstPad *pad,GstData *_data); +static GstData * gst_ladspa_get (GstPad *pad); static GstElementClass *parent_class = NULL; -static GstPadTemplate *srctempl, *sinktempl; -/* static guint gst_ladspa_signals[LAST_SIGNAL] = { 0 }; */ static GstPlugin *ladspa_plugin; static GHashTable *ladspa_descriptors; -static GstBufferPool* -gst_ladspa_get_bufferpool (GstPad *pad) +enum { + ARG_0, + ARG_SAMPLERATE, + ARG_BUFFERSIZE, + ARG_LAST, +}; + +GST_DEBUG_CATEGORY_STATIC (ladspa_debug); +#define DEBUG(...) \ + GST_CAT_LEVEL_LOG (ladspa_debug, GST_LEVEL_DEBUG, NULL, __VA_ARGS__) +#define DEBUG_OBJ(obj,...) \ + GST_CAT_LEVEL_LOG (ladspa_debug, GST_LEVEL_DEBUG, obj, __VA_ARGS__) + +static void +gst_ladspa_base_init (GstLADSPAClass *klass) { - gint i; - GstBufferPool *bp; - GstLADSPA *ladspa = gst_pad_get_parent (pad); - GstLADSPAClass *oclass = (GstLADSPAClass *) (G_OBJECT_GET_CLASS (ladspa)); + GstElementClass *element_class = GST_ELEMENT_CLASS (klass); + GstPadTemplate *templ; + GstElementDetails *details; + LADSPA_Descriptor *desc; + gint j, sinkcount,srccount; + + desc = g_hash_table_lookup(ladspa_descriptors, + GINT_TO_POINTER(G_TYPE_FROM_CLASS(klass))); + if (!desc) + desc = g_hash_table_lookup(ladspa_descriptors, GINT_TO_POINTER(0)); + g_assert (desc); + + /* construct the element details struct */ + details = g_new0(GstElementDetails,1); + details->longname = g_strdup(desc->Name); + details->klass = "Filter/Effect/Audio/LADSPA"; + details->description = details->longname; + details->author = g_strdup(desc->Maker); + gst_element_class_set_details (element_class, details); + + /* pad templates */ + klass->numports = desc->PortCount; + klass->numsinkpads = 0; + klass->numsrcpads = 0; + for (j=0;jPortCount;j++) { + if (LADSPA_IS_PORT_AUDIO(desc->PortDescriptors[j])) { + gchar *name = g_strdup((gchar *)desc->PortNames[j]); + g_strcanon (name, G_CSET_A_2_Z G_CSET_a_2_z G_CSET_DIGITS "-", '-'); + + /* the factories take ownership of the name */ + if (LADSPA_IS_PORT_INPUT(desc->PortDescriptors[j])) { + templ = ladspa_sink_factory (name); + klass->numsinkpads++; + } else { + templ = ladspa_src_factory (name); + klass->numsrcpads++; + } - if (oclass->numsrcpads > 0) - for (i=0;inumsrcpads;i++) - if ((bp = gst_pad_get_bufferpool(ladspa->srcpads[0])) != NULL) - return bp; + gst_element_class_add_pad_template (element_class, templ); + } + } + + klass->srcpad_portnums = g_new0(gint,klass->numsrcpads); + klass->sinkpad_portnums = g_new0(gint,klass->numsinkpads); + sinkcount = 0; + srccount = 0; - return NULL; + /* walk through the ports, note the portnums for srcpads, sinkpads */ + for (j=0; jPortCount; j++) { + if (LADSPA_IS_PORT_AUDIO(desc->PortDescriptors[j])) { + if (LADSPA_IS_PORT_INPUT(desc->PortDescriptors[j])) + klass->sinkpad_portnums[sinkcount++] = j; + else + klass->srcpad_portnums[srccount++] = j; + } + } + + klass->descriptor = desc; } static void @@ -126,7 +176,7 @@ gst_ladspa_class_init (GstLADSPAClass *klass) GObjectClass *gobject_class; GstElementClass *gstelement_class; LADSPA_Descriptor *desc; - gint i,current_portnum,sinkcount,srccount,controlcount; + gint i,current_portnum,controlcount; gint hintdesc; gint argtype,argperms; GParamSpec *paramspec = NULL; @@ -140,80 +190,37 @@ gst_ladspa_class_init (GstLADSPAClass *klass) gstelement_class->change_state = gst_ladspa_change_state; - g_object_class_install_property(G_OBJECT_CLASS(klass), ARG_LOOP_BASED, - g_param_spec_boolean("loop-based","loop-based","loop-based", - FALSE,G_PARAM_READWRITE)); - /* look up and store the ladspa descriptor */ - klass->descriptor = g_hash_table_lookup(ladspa_descriptors,GINT_TO_POINTER(G_TYPE_FROM_CLASS(klass))); - desc = klass->descriptor; + desc = g_hash_table_lookup(ladspa_descriptors, + GINT_TO_POINTER(G_TYPE_FROM_CLASS(klass))); + if (!desc) + desc = g_hash_table_lookup(ladspa_descriptors, GINT_TO_POINTER(0)); + g_assert (desc); - klass->numports = desc->PortCount; - - klass->numsinkpads = 0; - klass->numsrcpads = 0; klass->numcontrols = 0; /* walk through the ports, count the input, output and control ports */ - for (i=0;iPortCount;i++) { - if (LADSPA_IS_PORT_AUDIO(desc->PortDescriptors[i]) && - LADSPA_IS_PORT_INPUT(desc->PortDescriptors[i])){ - klass->numsinkpads++; - } - - if (LADSPA_IS_PORT_AUDIO(desc->PortDescriptors[i]) && - LADSPA_IS_PORT_OUTPUT(desc->PortDescriptors[i])){ - klass->numsrcpads++; - } - - if (LADSPA_IS_PORT_CONTROL(desc->PortDescriptors[i]) && - LADSPA_IS_PORT_INPUT(desc->PortDescriptors[i])){ + for (i=0; iPortCount; i++) { + if (!LADSPA_IS_PORT_AUDIO(desc->PortDescriptors[i]) && + LADSPA_IS_PORT_INPUT(desc->PortDescriptors[i])) klass->numcontrols++; - } } - klass->srcpad_portnums = g_new0(gint,klass->numsrcpads); - klass->sinkpad_portnums = g_new0(gint,klass->numsinkpads); + DEBUG ("ladspa element class: init %s with %d sink, %d src, %d control\n", + g_type_name (G_TYPE_FROM_CLASS (klass)), + klass->numsinkpads, klass->numsrcpads, klass->numcontrols); + klass->control_portnums = g_new0(gint,klass->numcontrols); - sinkcount = 0; - srccount = 0; controlcount = 0; - /* walk through the ports, note the portnums for srcpads, sinkpads and control - params */ - for (i=0;iPortCount;i++) { - if (LADSPA_IS_PORT_AUDIO(desc->PortDescriptors[i]) && - LADSPA_IS_PORT_INPUT(desc->PortDescriptors[i])){ - GST_DEBUG (0, "input port %d\n", i); - klass->sinkpad_portnums[sinkcount++] = i; - } - - if (LADSPA_IS_PORT_AUDIO(desc->PortDescriptors[i]) && - LADSPA_IS_PORT_OUTPUT(desc->PortDescriptors[i])){ - GST_DEBUG (0, "output port %d\n", i); - klass->srcpad_portnums[srccount++] = i; - } - - if (LADSPA_IS_PORT_CONTROL(desc->PortDescriptors[i]) && - LADSPA_IS_PORT_INPUT(desc->PortDescriptors[i])){ - GST_DEBUG (0, "control port %d\n", i); + /* walk through the ports, note the portnums for control params */ + for (i=0; iPortCount; i++) { + if (!LADSPA_IS_PORT_AUDIO(desc->PortDescriptors[i]) && + LADSPA_IS_PORT_INPUT(desc->PortDescriptors[i])) klass->control_portnums[controlcount++] = i; - } } - /* no sink pads - we'll use get mode and add params for samplerate and - buffersize */ - if (klass->numsinkpads == 0 && klass->numsrcpads > 0){ - g_object_class_install_property(G_OBJECT_CLASS(klass), ARG_SAMPLERATE, - g_param_spec_int("samplerate","samplerate","samplerate", - 0,G_MAXINT,44100,G_PARAM_READWRITE)); - g_object_class_install_property(G_OBJECT_CLASS(klass), ARG_BUFFERSIZE, - g_param_spec_int("buffersize","buffersize","buffersize", - 0,G_MAXINT,64,G_PARAM_READWRITE)); - - } - - /* now build the contorl info from the control ports */ + /* now build the control info from the control ports */ klass->control_info = g_new0(ladspa_control_info,klass->numcontrols); for (i=0;inumcontrols;i++) { @@ -242,20 +249,68 @@ gst_ladspa_class_init (GstLADSPAClass *klass) desc->PortRangeHints[current_portnum].LowerBound; } else { if (argtype==G_TYPE_INT) klass->control_info[i].lowerbound = (gfloat)G_MININT; - if (argtype==G_TYPE_FLOAT) klass->control_info[i].lowerbound = G_MINFLOAT; + if (argtype==G_TYPE_FLOAT) klass->control_info[i].lowerbound = -G_MAXFLOAT; } if (LADSPA_IS_HINT_BOUNDED_ABOVE(hintdesc)) { klass->control_info[i].upper = TRUE; klass->control_info[i].upperbound = desc->PortRangeHints[current_portnum].UpperBound; - if (LADSPA_IS_HINT_SAMPLE_RATE(hintdesc)) + if (LADSPA_IS_HINT_SAMPLE_RATE(hintdesc)) { klass->control_info[i].samplerate = TRUE; + klass->control_info[i].upperbound *= 44100; /* FIXME? */ + } } else { if (argtype==G_TYPE_INT) klass->control_info[i].upperbound = (gfloat)G_MAXINT; if (argtype==G_TYPE_FLOAT) klass->control_info[i].upperbound = G_MAXFLOAT; } + /* use the lowerbound as the default value */ + klass->control_info[i].def = klass->control_info[i].lowerbound; + +#ifdef LADSPA_IS_HINT_HAS_DEFAULT + /* figure out the defaults */ + if (LADSPA_IS_HINT_HAS_DEFAULT (hintdesc)) { + if (LADSPA_IS_HINT_DEFAULT_MINIMUM (hintdesc)) + klass->control_info[i].def = klass->control_info[i].lowerbound; + else if (LADSPA_IS_HINT_DEFAULT_LOW (hintdesc)) + if (LADSPA_IS_HINT_LOGARITHMIC (hintdesc)) + klass->control_info[i].def = exp (0.75*log(klass->control_info[i].lowerbound) + + 0.25*log(klass->control_info[i].upperbound)); + else + klass->control_info[i].def = (0.75*klass->control_info[i].lowerbound + + 0.25*klass->control_info[i].upperbound); + else if (LADSPA_IS_HINT_DEFAULT_MIDDLE (hintdesc)) + if (LADSPA_IS_HINT_LOGARITHMIC (hintdesc)) + klass->control_info[i].def = exp (0.5*log(klass->control_info[i].lowerbound) + + 0.5*log(klass->control_info[i].upperbound)); + else + klass->control_info[i].def = (0.5*klass->control_info[i].lowerbound + + 0.5*klass->control_info[i].upperbound); + else if (LADSPA_IS_HINT_DEFAULT_HIGH (hintdesc)) + if (LADSPA_IS_HINT_LOGARITHMIC (hintdesc)) + klass->control_info[i].def = exp (0.25*log(klass->control_info[i].lowerbound) + + 0.75*log(klass->control_info[i].upperbound)); + else + klass->control_info[i].def = (0.25*klass->control_info[i].lowerbound + + 0.75*klass->control_info[i].upperbound); + else if (LADSPA_IS_HINT_DEFAULT_MAXIMUM (hintdesc)) + klass->control_info[i].def = klass->control_info[i].upperbound; + else if (LADSPA_IS_HINT_DEFAULT_0 (hintdesc)) + klass->control_info[i].def = 0.0; + else if (LADSPA_IS_HINT_DEFAULT_1 (hintdesc)) + klass->control_info[i].def = 1.0; + else if (LADSPA_IS_HINT_DEFAULT_100 (hintdesc)) + klass->control_info[i].def = 100.0; + else if (LADSPA_IS_HINT_DEFAULT_440 (hintdesc)) + klass->control_info[i].def = 440.0; + } +#endif /* LADSPA_IS_HINT_HAS_DEFAULT */ + + klass->control_info[i].def = CLAMP(klass->control_info[i].def, + klass->control_info[i].lowerbound, + klass->control_info[i].upperbound); + if (LADSPA_IS_PORT_INPUT(desc->PortDescriptors[current_portnum])) { argperms = G_PARAM_READWRITE; klass->control_info[i].writable = TRUE; @@ -292,283 +347,272 @@ gst_ladspa_class_init (GstLADSPAClass *klass) argname = numargname; } - g_print("adding arg %s from %s\n",argname, klass->control_info[i].name); + klass->control_info[i].param_name = argname; + + DEBUG ("adding arg %s from %s", argname, klass->control_info[i].name); if (argtype==G_TYPE_BOOLEAN){ paramspec = g_param_spec_boolean(argname,argname,argname, FALSE, argperms); } else if (argtype==G_TYPE_INT){ paramspec = g_param_spec_int(argname,argname,argname, - (gint)klass->control_info[i].lowerbound, (gint)klass->control_info[i].upperbound, 0, argperms); + (gint)klass->control_info[i].lowerbound, + (gint)klass->control_info[i].upperbound, + (gint)klass->control_info[i].def, argperms); + } else if (klass->control_info[i].samplerate){ + paramspec = g_param_spec_float(argname,argname,argname, + 0.0, G_MAXFLOAT, + 0.0, argperms); } else { paramspec = g_param_spec_float(argname,argname,argname, klass->control_info[i].lowerbound, klass->control_info[i].upperbound, - (klass->control_info[i].lowerbound + klass->control_info[i].upperbound) / 2.0f, argperms); + klass->control_info[i].def, argperms); } - g_object_class_install_property(G_OBJECT_CLASS(klass), i+ARG_LAST, paramspec); + /* properties have an offset of 1 */ + g_object_class_install_property(G_OBJECT_CLASS(klass), i+1, paramspec); } } static void gst_ladspa_init (GstLADSPA *ladspa) { - GstLADSPAClass *oclass = (GstLADSPAClass*)(G_OBJECT_GET_CLASS(ladspa)); - + GstLADSPAClass *oclass; + ladspa_control_info cinfo; + GList *l; LADSPA_Descriptor *desc; - gint i,sinkcount,srccount,controlcount; + gint i,sinkcount,srccount; + oclass = (GstLADSPAClass*)G_OBJECT_GET_CLASS (ladspa); desc = oclass->descriptor; ladspa->descriptor = oclass->descriptor; /* allocate the various arrays */ ladspa->srcpads = g_new0(GstPad*,oclass->numsrcpads); ladspa->sinkpads = g_new0(GstPad*,oclass->numsinkpads); - ladspa->bytestreams = g_new0(GstByteStream*,oclass->numsinkpads); ladspa->controls = g_new(gfloat,oclass->numcontrols); - - /* walk through the ports and add all the pads */ + ladspa->dpman = gst_dpman_new ("ladspa_dpman", GST_ELEMENT(ladspa)); + + /* set up pads */ sinkcount = 0; srccount = 0; - controlcount = 0; - for (i=0;iPortCount;i++) { - if (LADSPA_IS_PORT_AUDIO(desc->PortDescriptors[i]) && - LADSPA_IS_PORT_INPUT(desc->PortDescriptors[i])) { - ladspa->sinkpads[sinkcount] = gst_pad_new_from_template (sinktempl, (gchar *)desc->PortNames[i]); - ladspa->bytestreams[sinkcount] = gst_bytestream_new (ladspa->sinkpads[sinkcount]); - gst_element_add_pad(GST_ELEMENT(ladspa),ladspa->sinkpads[sinkcount]); - sinkcount++; - } - if (LADSPA_IS_PORT_AUDIO(desc->PortDescriptors[i]) && - LADSPA_IS_PORT_OUTPUT(desc->PortDescriptors[i])) { - ladspa->srcpads[srccount] = gst_pad_new_from_template (srctempl, (gchar *)desc->PortNames[i]); - gst_element_add_pad(GST_ELEMENT(ladspa),ladspa->srcpads[srccount]); - srccount++; - } - if (LADSPA_IS_PORT_CONTROL(desc->PortDescriptors[i]) && - LADSPA_IS_PORT_INPUT(desc->PortDescriptors[i])) { - /* use the lowerbound as the default value if it exists */ - if (oclass->control_info[controlcount].lower){ - ladspa->controls[controlcount]=oclass->control_info[controlcount].lowerbound; - } else { - ladspa->controls[controlcount] = 0.0; + for (l=GST_ELEMENT_CLASS (oclass)->padtemplates; l; l=l->next) { + GstPad *pad = gst_pad_new_from_template (GST_PAD_TEMPLATE (l->data), + GST_PAD_TEMPLATE_NAME_TEMPLATE (l->data)); + gst_pad_set_link_function (pad, gst_ladspa_link); + gst_element_add_pad ((GstElement*)ladspa, pad); + + if (GST_PAD_DIRECTION (pad) == GST_PAD_SINK) + ladspa->sinkpads[sinkcount++] = pad; + else + ladspa->srcpads[srccount++] = pad; + } + + /* set up dparams */ + for (i=0; inumcontrols; i++) { + if (LADSPA_IS_PORT_INPUT(desc->PortDescriptors[i])) { + cinfo = oclass->control_info[i]; + ladspa->controls[i]=cinfo.def; + + if (cinfo.toggled){ + gst_dpman_add_required_dparam_callback ( + ladspa->dpman, + g_param_spec_int(cinfo.param_name, cinfo.name, cinfo.name, + 0, 1, (gint)(ladspa->controls[i]), G_PARAM_READWRITE), + "int", gst_ladspa_update_int, &(ladspa->controls[i]) + ); + } + else if (cinfo.integer){ + gst_dpman_add_required_dparam_callback ( + ladspa->dpman, + g_param_spec_int(cinfo.param_name, cinfo.name, cinfo.name, + (gint)cinfo.lowerbound, (gint)cinfo.upperbound, + (gint)ladspa->controls[i], G_PARAM_READWRITE), + "int", gst_ladspa_update_int, &(ladspa->controls[i]) + ); + } + else if (cinfo.samplerate){ + gst_dpman_add_required_dparam_direct ( + ladspa->dpman, + g_param_spec_float(cinfo.param_name, cinfo.name, cinfo.name, + cinfo.lowerbound, cinfo.upperbound, + ladspa->controls[i], G_PARAM_READWRITE), + "hertz-rate-bound", &(ladspa->controls[i]) + ); + } + else { + gst_dpman_add_required_dparam_direct ( + ladspa->dpman, + g_param_spec_float(cinfo.param_name, cinfo.name, cinfo.name, + cinfo.lowerbound, cinfo.upperbound, + ladspa->controls[i], G_PARAM_READWRITE), + "float", &(ladspa->controls[i]) + ); } - controlcount++; } } - ladspa->samplerate = 0; - ladspa->buffersize = 64; - ladspa->numbuffers = 16; - ladspa->newcaps = FALSE; + /* nonzero default needed to instantiate() some plugins */ + ladspa->samplerate = 44100; + + ladspa->buffer_frames = 0; /* should be set with caps */ ladspa->activated = FALSE; ladspa->bufpool = NULL; + ladspa->inplace_broken = LADSPA_IS_INPLACE_BROKEN(ladspa->descriptor->Properties); - /* we assume srccount > 0 because there are no LADSPA sink elements. */ - - if (sinkcount==0) { + if (sinkcount==0 && srccount == 1) { /* get mode (no sink pads) */ - GST_INFO (0, "get mode with %d src pads\n", srccount); - - ladspa->newcaps = TRUE; - ladspa->samplerate = 44100; - ladspa->buffersize = 64; - - for (i=0;isrcpads[i], gst_ladspa_connect_get); - gst_pad_set_get_function (ladspa->srcpads[i], gst_ladspa_get); - } - } else if (sinkcount==1 && srccount==1){ - /* mono chain */ - GST_INFO (0, "inplace mono chain mode\n"); - - gst_pad_set_connect_function (ladspa->sinkpads[0], gst_ladspa_connect); - gst_pad_set_chain_function (ladspa->sinkpads[0], gst_ladspa_chain_mono); - gst_pad_set_bufferpool_function (ladspa->sinkpads[0], gst_ladspa_get_bufferpool); + DEBUG_OBJ (ladspa, "mono get mode with 1 src pad"); + + gst_pad_set_get_function (ladspa->srcpads[0], gst_ladspa_get); + } else if (sinkcount==1){ + /* with one sink we can use the chain function */ + DEBUG_OBJ (ladspa, "chain mode"); + + gst_pad_set_chain_function (ladspa->sinkpads[0], gst_ladspa_chain); + } else if (sinkcount > 1){ + /* more than one sink pad needs loop mode */ + DEBUG_OBJ (ladspa, "loop mode with %d sink pads and %d src pads", sinkcount, srccount); + + gst_element_set_loop_function (GST_ELEMENT (ladspa), gst_ladspa_loop); + } else if (sinkcount==0 && srccount == 0) { + /* for example, a plugin with only control inputs and output -- just ignore + * it for now */ } else { - /* sinkcount>0 and srccount>0 : N sink pads and M src pads */ - GST_INFO (0, "loop mode with %d sink pads and %d src pads\n", sinkcount, srccount); - - for (i=0;isinkpads[i], gst_ladspa_connect); - gst_pad_set_bufferpool_function (ladspa->sinkpads[i], gst_ladspa_get_bufferpool); - } + g_warning ("%d sink pads, %d src pads not yet supported", sinkcount, srccount); + } - ladspa->loopbased = TRUE; - gst_element_set_loop_function (ladspa, gst_ladspa_loop); - } + gst_ladspa_instantiate (ladspa); +} - gst_ladspa_instantiate(ladspa); +static void +gst_ladspa_update_int(const GValue *value, gpointer data) +{ + gfloat *target = (gfloat*) data; + *target = (gfloat)g_value_get_int(value); } -static GstPadConnectReturn -gst_ladspa_connect (GstPad *pad, GstCaps *caps) +static GstPadLinkReturn +gst_ladspa_link (GstPad *pad, GstCaps *caps) { - GstLADSPA *ladspa = (GstLADSPA *) GST_PAD_PARENT (pad); - GstLADSPAClass *oclass = (GstLADSPAClass *) (G_OBJECT_GET_CLASS (ladspa)); - guint i; - - g_return_val_if_fail (caps != NULL, GST_PAD_CONNECT_DELAYED); - g_return_val_if_fail (pad != NULL, GST_PAD_CONNECT_DELAYED); - - /* have to instantiate ladspa plugin when samplerate changes (groan) */ - if (ladspa->samplerate != gst_caps_get_int (caps, "rate")){ - ladspa->samplerate = gst_caps_get_int (caps, "rate"); - if (! gst_ladspa_instantiate(ladspa)) - return GST_PAD_CONNECT_REFUSED; - } + GstElement *element = (GstElement*)GST_PAD_PARENT (pad); + GstLADSPA *ladspa = (GstLADSPA*)element; + const GList *l = NULL; + gint rate; - /* if the caps are fixed, we are going to try to set all srcpads using this - one caps object. if any of the pads barfs, we'll refuse the connection. i'm - not sure if this is correct. */ if (GST_CAPS_IS_FIXED (caps)) { - for (i=0;inumsrcpads;i++) { - if (! gst_pad_try_set_caps (ladspa->srcpads[i], caps)) - return GST_PAD_CONNECT_REFUSED; + /* if this fails in some other plugin, the graph is left in an inconsistent + state */ + for (l=gst_element_get_pad_list (element); l; l=l->next) + if (pad != (GstPad*)l->data) + if (gst_pad_try_set_caps ((GstPad*)l->data, caps) <= 0) + return GST_PAD_LINK_REFUSED; + + /* we assume that the ladspa plugin can handle any sample rate, so this + check gets put last */ + gst_caps_get_int (caps, "rate", &rate); + /* have to instantiate ladspa plugin when samplerate changes (groan) */ + if (ladspa->samplerate != rate) { + ladspa->samplerate = rate; + if (! gst_ladspa_instantiate(ladspa)) + return GST_PAD_LINK_REFUSED; } + + gst_caps_get_int (caps, "buffer-frames", &ladspa->buffer_frames); + + if (ladspa->bufpool) + gst_buffer_pool_unref (ladspa->bufpool); + ladspa->bufpool = gst_buffer_pool_get_default (ladspa->buffer_frames * sizeof(gfloat), + 3); + + return GST_PAD_LINK_OK; } - return GST_PAD_CONNECT_DELAYED; + return GST_PAD_LINK_DELAYED; } -static GstPadConnectReturn -gst_ladspa_connect_get (GstPad *pad, GstCaps *caps) +static void +gst_ladspa_force_src_caps(GstLADSPA *ladspa, GstPad *pad) { - GstLADSPA *ladspa = (GstLADSPA*)GST_OBJECT_PARENT (pad); - - g_return_val_if_fail (caps != NULL, GST_PAD_CONNECT_DELAYED); - g_return_val_if_fail (pad != NULL, GST_PAD_CONNECT_DELAYED); - - if (ladspa->samplerate != gst_caps_get_int (caps, "rate")) { - ladspa->samplerate = gst_caps_get_int (caps, "rate"); - if (! gst_ladspa_instantiate(ladspa)) - return GST_PAD_CONNECT_REFUSED; + if (!ladspa->buffer_frames) { + ladspa->buffer_frames = 256; /* 5 ms at 44100 kHz (just a default...) */ + g_return_if_fail (ladspa->bufpool == NULL); + ladspa->bufpool = + gst_buffer_pool_get_default (ladspa->buffer_frames * sizeof(gfloat), 3); } - return GST_PAD_CONNECT_DELAYED; -} + DEBUG_OBJ (ladspa, "forcing caps with rate=%d, buffer-frames=%d", + ladspa->samplerate, ladspa->buffer_frames); -static void -gst_ladspa_force_src_caps(GstLADSPA *ladspa, GstPad *pad) -{ - GST_DEBUG (0, "forcing caps\n"); - gst_pad_try_set_caps (pad, gst_caps_new ( + gst_pad_try_set_caps (pad, + gst_caps_new ( "ladspa_src_caps", - "audio/raw", + "audio/x-raw-float", gst_props_new ( - "format", GST_PROPS_STRING ("float"), - "layout", GST_PROPS_STRING ("gfloat"), - "intercept", GST_PROPS_FLOAT(0.0), - "slope", GST_PROPS_FLOAT(1.0), - "rate", GST_PROPS_INT (ladspa->samplerate), - "channels", GST_PROPS_INT (1), - NULL - ) - )); - ladspa->newcaps=FALSE; + "width", GST_PROPS_INT (32), + "endianness", GST_PROPS_INT (G_BYTE_ORDER), + "rate", GST_PROPS_INT (ladspa->samplerate), + "buffer-frames", GST_PROPS_INT (ladspa->buffer_frames), + "channels", GST_PROPS_INT (1), + NULL))); } static void gst_ladspa_set_property (GObject *object, guint prop_id, const GValue *value, GParamSpec *pspec) { GstLADSPA *ladspa = (GstLADSPA*)object; - gint cid = prop_id - ARG_LAST; GstLADSPAClass *oclass; ladspa_control_info *control_info; - gfloat val=0.0; - - /* these are only registered in get mode */ - switch (prop_id) { - case ARG_SAMPLERATE: - ladspa->samplerate = g_value_get_int (value); - ladspa->newcaps=TRUE; - break; - case ARG_BUFFERSIZE: - ladspa->buffersize = g_value_get_int (value); - break; - } - - /* is it a ladspa plugin arg? */ - if (cid < 0) return; - -/* - if (id == ARG_LOOP_BASED) { - * we can only do this in NULL state * - g_return_if_fail (GST_STATE(object) != GST_STATE_NULL); - ladspa->loopbased = g_value_get_boolean (value); - if (ladspa->loopbased) { - gst_element_set_loop_function (GST_ELEMENT (ladspa), gst_ladspa_loop); - } else { - gst_element_set_loop_function (GST_ELEMENT (ladspa), NULL); - } - } -*/ oclass = (GstLADSPAClass*)(G_OBJECT_GET_CLASS (object)); - /* verify it exists and is a control (not a port) */ - g_return_if_fail(cid < oclass->numcontrols); - - control_info = &(oclass->control_info[cid]); + /* remember, properties have an offset of 1 */ + prop_id--; + + /* verify it exists */ + g_return_if_fail (prop_id < oclass->numcontrols); + + control_info = &(oclass->control_info[prop_id]); g_return_if_fail (control_info->name != NULL); /* check to see if it's writable */ g_return_if_fail (control_info->writable); /* now see what type it is */ - if (control_info->toggled) { - if (g_value_get_boolean (value)) - ladspa->controls[cid] = 1.0; - else - ladspa->controls[cid] = 0.0; - } else if (control_info->integer) { - val = (gfloat)g_value_get_int (value); - ladspa->controls[cid] = val; - } else { - val = g_value_get_float (value); - ladspa->controls[cid] = val; - } - - GST_DEBUG (0, "set arg %s to %f\n", control_info->name, ladspa->controls[cid]); + if (control_info->toggled) + ladspa->controls[prop_id] = g_value_get_boolean (value) ? 1.f : 0.f; + else if (control_info->integer) + ladspa->controls[prop_id] = g_value_get_int (value); + else + ladspa->controls[prop_id] = g_value_get_float (value); + + DEBUG_OBJ (object, "set arg %s to %f", control_info->name, ladspa->controls[prop_id]); } static void gst_ladspa_get_property (GObject *object, guint prop_id, GValue *value, GParamSpec *pspec) { GstLADSPA *ladspa = (GstLADSPA*)object; - gint cid = prop_id - ARG_LAST; GstLADSPAClass *oclass = (GstLADSPAClass*)(G_OBJECT_GET_CLASS (object)); ladspa_control_info *control_info; - /* these are only registered in get mode */ - switch (prop_id){ - case ARG_SAMPLERATE: - g_value_set_int (value, ladspa->samplerate); - break; - case ARG_BUFFERSIZE: - g_value_set_int (value, ladspa->buffersize); - break; - } - - if (cid < 0) return; + /* remember, properties have an offset of 1 */ + prop_id--; - /* verify it exists and is a control (not a port) */ - if (cid >= oclass->numcontrols) return; - control_info = &(oclass->control_info[cid]); - if (control_info->name == NULL) return; + /* verify it exists */ + g_return_if_fail (prop_id < oclass->numcontrols); - GST_DEBUG (0, "got arg %s as %f\n", control_info->name, ladspa->controls[cid]); + control_info = &(oclass->control_info[prop_id]); + g_return_if_fail (control_info->name != NULL); /* now see what type it is */ - if (control_info->toggled) { - if (ladspa->controls[cid] == 1.0) - g_value_set_boolean (value, TRUE); - else - g_value_set_boolean (value, FALSE); - } else if (control_info->integer) { - g_value_set_int (value, (gint)ladspa->controls[cid]); - } else { - g_value_set_float (value, ladspa->controls[cid]); - } + if (control_info->toggled) + g_value_set_boolean (value, ladspa->controls[prop_id] == 1.0); + else if (control_info->integer) + g_value_set_int (value, (gint)ladspa->controls[prop_id]); + else + g_value_set_float (value, ladspa->controls[prop_id]); + + DEBUG_OBJ (object, "got arg %s as %f", control_info->name, ladspa->controls[prop_id]); } static gboolean @@ -589,24 +633,21 @@ gst_ladspa_instantiate (GstLADSPA *ladspa) } /* instantiate the plugin */ - GST_DEBUG (0, "instantiating the plugin\n"); + DEBUG_OBJ (ladspa, "instantiating the plugin at %d Hz", ladspa->samplerate); ladspa->handle = desc->instantiate(desc,ladspa->samplerate); g_return_val_if_fail (ladspa->handle != NULL, FALSE); - /* walk through the ports and add all the arguments */ - for (i=0;inumcontrols;i++) { - /* connect the argument to the plugin */ - GST_DEBUG (0, "added control port %d\n", oclass->control_portnums[i]); + /* connect the control ports */ + for (i=0;inumcontrols;i++) desc->connect_port(ladspa->handle, oclass->control_portnums[i], &(ladspa->controls[i])); - } /* reactivate if it was activated before the reinstantiation */ - if (was_activated){ + if (was_activated) gst_ladspa_activate(ladspa); - } + return TRUE; } @@ -617,7 +658,6 @@ gst_ladspa_change_state (GstElement *element) GstLADSPA *ladspa = (GstLADSPA*)element; desc = ladspa->descriptor; - GST_DEBUG (0, "changing state\n"); switch (GST_STATE_TRANSITION (element)) { case GST_STATE_NULL_TO_READY: gst_ladspa_activate(ladspa); @@ -636,37 +676,34 @@ gst_ladspa_change_state (GstElement *element) } static void -gst_ladspa_activate(GstLADSPA *ladspa) +gst_ladspa_activate (GstLADSPA *ladspa) { LADSPA_Descriptor *desc; desc = ladspa->descriptor; - if (ladspa->activated){ + if (ladspa->activated) gst_ladspa_deactivate(ladspa); - } - GST_DEBUG (0, "activating\n"); + DEBUG_OBJ (ladspa, "activating"); /* activate the plugin (function might be null) */ - if (desc->activate != NULL) { + if (desc->activate != NULL) desc->activate(ladspa->handle); - } ladspa->activated = TRUE; } static void -gst_ladspa_deactivate(GstLADSPA *ladspa) +gst_ladspa_deactivate (GstLADSPA *ladspa) { LADSPA_Descriptor *desc; desc = ladspa->descriptor; - GST_DEBUG (0, "deactivating\n"); + DEBUG_OBJ (ladspa, "deactivating"); /* deactivate the plugin (function might be null) */ - if (ladspa->activated && (desc->deactivate != NULL)) { + if (ladspa->activated && (desc->deactivate != NULL)) desc->deactivate(ladspa->handle); - } ladspa->activated = FALSE; } @@ -674,211 +711,258 @@ gst_ladspa_deactivate(GstLADSPA *ladspa) static void gst_ladspa_loop (GstElement *element) { - gint8 *raw_in, *zero_out, i, cur_buf; - GstBuffer **buffers_out; - GstEvent *event = NULL; - guint32 waiting; - LADSPA_Data **data_in, *data_out; - unsigned long size; - + guint i, j, numsrcpads, numsinkpads; + guint num_processed, num_to_process; + gint largest_buffer; + LADSPA_Data **data_in, **data_out; + GstBuffer **buffers_in, **buffers_out; + GstLADSPA *ladspa = (GstLADSPA *)element; GstLADSPAClass *oclass = (GstLADSPAClass*)(G_OBJECT_GET_CLASS (ladspa)); LADSPA_Descriptor *desc = ladspa->descriptor; - data_in = g_new0(LADSPA_Data *, oclass->numsinkpads); - buffers_out = g_new0(GstBuffer *, oclass->numsrcpads); + numsinkpads = oclass->numsinkpads; + numsrcpads = oclass->numsrcpads; - /* set up the bufferpool first if necessary */ - i = 0; - while ((ladspa->bufpool == NULL) && (i < oclass->numsrcpads)) { - ladspa->bufpool = gst_pad_get_bufferpool (ladspa->srcpads[i++]); - } - if (ladspa->bufpool == NULL) { - ladspa->bufpool = gst_buffer_pool_get_default (sizeof (LADSPA_Data) * ladspa->buffersize, - ladspa->numbuffers); - } + /* fixme: these mallocs need to die */ + data_in = g_new0(LADSPA_Data*, numsinkpads); + data_out = g_new0(LADSPA_Data*, numsrcpads); + buffers_in = g_new0(GstBuffer*, numsinkpads); + buffers_out = g_new0(GstBuffer*, numsrcpads); + + largest_buffer = -1; - /* since this is a loop element, we just loop here til things fall apart. */ - do { - - /* first get all the necessary data from the input ports */ - for (i=0;inumsinkpads;i++){ - GST_DEBUG (0, "pulling %d bytes through channel %d's bytestream\n", i); - raw_in = gst_bytestream_peek_bytes (ladspa->bytestreams[i], ladspa->buffersize * sizeof (LADSPA_Data)); - - if (raw_in == NULL) { - /* we need to check for an event. */ - gst_bytestream_get_status (ladspa->bytestreams[i], &waiting, &event); - - if (event) { - if (GST_EVENT_TYPE(event) == GST_EVENT_EOS) { - /* if we get an EOS event from one of our sink pads, we assume that - pad's finished handling data. delete the bytestream, free up the - pad, and free up the memory associated with the input channel. */ - GST_DEBUG (0, "got an EOS event on sinkpad %d\n", i); - } - - /* we need to create some zeroed out data to feed to this port of the - ladspa filter. */ - data_in[i] = g_new0 (LADSPA_Data, ladspa->buffersize * sizeof (LADSPA_Data)); - } else { - /* copy the retrieved data and bind the ladspa src port to the data */ - data_in[i] = (LADSPA_Data *) raw_in; - } + /* first get all the necessary data from the input ports */ + for (i=0 ; isinkpads[i])); + + if (GST_IS_EVENT (buffers_in[i])) { + /* push it out on all pads */ + gst_data_ref_by_count ((GstData*)buffers_in[i], numsrcpads); + for (j=0; jsrcpads[j], GST_DATA (buffers_in[i])); + if (GST_EVENT_TYPE (buffers_in[i]) == GST_EVENT_EOS) { + /* shut down */ + gst_element_set_eos (element); + return; + } else { + goto get_buffer; } - - raw_in = NULL; - desc->connect_port (ladspa->handle, oclass->sinkpad_portnums[i], data_in[i]); - gst_bytestream_flush (ladspa->bytestreams[i], ladspa->buffersize * sizeof (LADSPA_Data)); } - /* now set up the output ports */ - for (i=0;inumsrcpads;i++) { - buffers_out[i] = (GstBuffer *) gst_buffer_new_from_pool (ladspa->bufpool, 0, 0); + if (largest_buffer < 0) + largest_buffer = GST_BUFFER_SIZE (buffers_in[i])/sizeof(gfloat); + else + largest_buffer = MIN (GST_BUFFER_SIZE (buffers_in[i])/sizeof(gfloat), largest_buffer); + data_in[i] = (LADSPA_Data *) GST_BUFFER_DATA(buffers_in[i]); + GST_BUFFER_TIMESTAMP(buffers_in[i]) = ladspa->timestamp; + } - if (buffers_out[i] == NULL) - GST_ERROR (0, "could not get new output buffer for srcpad %d !\n", i); + if (!ladspa->bufpool) { + gst_element_error (element, "Caps were never set, bailing..."); + return; + } - data_out = (LADSPA_Data *) GST_BUFFER_DATA (buffers_out[i]); - size = GST_BUFFER_SIZE (buffers_out[i]); - GST_BUFFER_TIMESTAMP (buffers_out[i]) = ladspa->timestamp; + i=0; + if (!ladspa->inplace_broken) { + for (; ibufpool, 0, 0); + GST_BUFFER_TIMESTAMP (buffers_out[i]) = ladspa->timestamp; + data_out[i] = (LADSPA_Data*)GST_BUFFER_DATA (buffers_out[i]); + } + + GST_DPMAN_PREPROCESS(ladspa->dpman, largest_buffer, ladspa->timestamp); + num_processed = 0; - /* initialize the output data to 0 */ - zero_out = (gint8 *) GST_BUFFER_DATA (buffers_out[i]); - for (i = 0; i < size; i++) - zero_out[i] = 0; + /* split up processing of the buffer into chunks so that dparams can + * be updated when required. + * In many cases the buffer will be processed in one chunk anyway. + */ + while (GST_DPMAN_PROCESS (ladspa->dpman, num_processed)) { + num_to_process = GST_DPMAN_FRAMES_TO_PROCESS(ladspa->dpman); - desc->connect_port (ladspa->handle, oclass->srcpad_portnums[i], data_out); - } + for (i=0 ; iconnect_port (ladspa->handle, oclass->sinkpad_portnums[i], data_in[i]); + for (i=0 ; iconnect_port (ladspa->handle, oclass->srcpad_portnums[i], data_out[i]); - /* i'm not sure if this will work ; the number of samples might be - nonconstant across sources and sinks ... */ - desc->run (ladspa->handle, ladspa->buffersize); + desc->run(ladspa->handle, num_to_process); - /* now go through and reset the ladspa ports, pushing out the output buffers - at the same time. */ - for (i=0;inumsinkpads;i++) { - desc->connect_port (ladspa->handle, oclass->sinkpad_portnums[i], NULL); - } - for (i=0;inumsrcpads;i++) { - GST_DEBUG (0, "pushing buffer (%p) on src pad %d\n", buffers_out[i], i); - gst_pad_push (ladspa->srcpads[i], buffers_out[i]); - buffers_out[i] = NULL; - desc->connect_port (ladspa->handle, oclass->srcpad_portnums[i], NULL); - } + for (i=0 ; itimestamp += ladspa->buffersize * ladspa->samplerate * 10^9; - } while (TRUE); + num_processed += num_to_process; + } + + for (i=0 ; i= numsrcpads || buffers_out[i] != buffers_in[i]) + gst_buffer_unref(buffers_in[i]); + data_in[i] = NULL; + buffers_in[i] = NULL; + } + for (i=0 ; isrcpads[i], GST_DATA (buffers_out[i])); + + data_out[i] = NULL; + buffers_out[i] = NULL; + } + + ladspa->timestamp += ladspa->buffer_frames * GST_SECOND / ladspa->samplerate; + + /* FIXME: move these mallocs and frees to the state-change handler */ g_free (buffers_out); + g_free (buffers_in); + g_free (data_out); + g_free (data_in); } static void -gst_ladspa_chain_mono (GstPad *pad, GstBuffer *buf) +gst_ladspa_chain (GstPad *pad, GstData *_data) { + GstBuffer *buffer_in = GST_BUFFER (_data); LADSPA_Descriptor *desc; - LADSPA_Data *data; + LADSPA_Data *data_in, **data_out = NULL; + GstBuffer **buffers_out = NULL; unsigned long num_samples; - + guint num_to_process, num_processed, i, numsrcpads; GstLADSPA *ladspa; GstLADSPAClass *oclass; - g_return_if_fail(pad != NULL); - g_return_if_fail(GST_IS_PAD(pad)); - g_return_if_fail(buf != NULL); + ladspa = (GstLADSPA*)GST_OBJECT_PARENT (pad); + oclass = (GstLADSPAClass *) (G_OBJECT_GET_CLASS (ladspa)); + data_in = (LADSPA_Data *) GST_BUFFER_DATA(buffer_in); + num_samples = GST_BUFFER_SIZE(buffer_in) / sizeof(gfloat); + numsrcpads = oclass->numsrcpads; + desc = ladspa->descriptor; - ladspa = (GstLADSPA *)gst_pad_get_parent (pad); - g_return_if_fail(ladspa != NULL); + /* we shouldn't get events here... */ + g_return_if_fail (GST_IS_BUFFER (buffer_in)); + + if (!ladspa->bufpool) { + gst_element_error ((GstElement*)ladspa, "Caps were never set, bailing..."); + return; + } - /* this might happen if caps nego hasn't happened */ - g_return_if_fail(ladspa->handle != NULL); + /* FIXME: this function shouldn't need to malloc() anything */ + if (numsrcpads > 0) { + buffers_out = g_new(GstBuffer*, numsrcpads); + data_out = g_new(LADSPA_Data*, numsrcpads); + } - if (! GST_IS_EVENT (buf)) { - oclass = (GstLADSPAClass *) (G_OBJECT_GET_CLASS (ladspa)); - data = (LADSPA_Data *) GST_BUFFER_DATA(buf); - num_samples = GST_BUFFER_SIZE(buf) / sizeof(gfloat); - - desc = ladspa->descriptor; + i=0; + if (!ladspa->inplace_broken && numsrcpads) { + /* reuse the first (chained) buffer */ + buffers_out[i] = buffer_in; + DEBUG ("reuse: %d", GST_BUFFER_SIZE (buffer_in)); + data_out[i] = data_in; + i++; + } + for (; ibufpool, 0, 0); + /* the size of the buffer returned from the pool is the maximum size; this + chained buffer might be smaller */ + GST_BUFFER_SIZE (buffers_out[i]) = GST_BUFFER_SIZE (buffer_in); + DEBUG ("new %d", GST_BUFFER_SIZE (buffer_in)); + GST_BUFFER_TIMESTAMP (buffers_out[i]) = ladspa->timestamp; + data_out[i] = (LADSPA_Data*)GST_BUFFER_DATA (buffers_out[i]); + } - /* we know that we're dealing here with a filter that has one sink and one - src pad. */ - desc->connect_port(ladspa->handle,oclass->sinkpad_portnums[0],data); - desc->connect_port(ladspa->handle,oclass->srcpad_portnums[0],data); + GST_DPMAN_PREPROCESS(ladspa->dpman, num_samples, GST_BUFFER_TIMESTAMP(buffer_in)); + num_processed = 0; - desc->run(ladspa->handle,num_samples); - - desc->connect_port(ladspa->handle,oclass->sinkpad_portnums[0],NULL); - desc->connect_port(ladspa->handle,oclass->srcpad_portnums[0],NULL); + /* split up processing of the buffer into chunks so that dparams can + * be updated when required. + * In many cases the buffer will be processed in one chunk anyway. + */ + while(GST_DPMAN_PROCESS(ladspa->dpman, num_processed)) { + num_to_process = GST_DPMAN_FRAMES_TO_PROCESS(ladspa->dpman); + + desc->connect_port(ladspa->handle,oclass->sinkpad_portnums[0],data_in); + for (i=0 ; iconnect_port(ladspa->handle,oclass->srcpad_portnums[i],data_out[i]); + + desc->run(ladspa->handle, num_to_process); + + data_in += num_to_process; + for (i=0 ; isrcpads[0], buf); + if (!numsrcpads || buffers_out[0] != buffer_in) + gst_buffer_unref(buffer_in); + + if (numsrcpads) { + for (i=0; isrcpads[i], GST_DATA (buffers_out[i])); + } + + g_free(buffers_out); + g_free(data_out); + } } -static GstBuffer * +static GstData * gst_ladspa_get(GstPad *pad) -{ - LADSPA_Descriptor *desc; - LADSPA_Data *data; - +{ GstLADSPA *ladspa; GstLADSPAClass *oclass; GstBuffer *buf; - - gint8 i, *zero_out; - unsigned long size; - - g_return_val_if_fail(pad != NULL, NULL); - g_return_val_if_fail(GST_IS_PAD(pad), NULL); + LADSPA_Data *data; + LADSPA_Descriptor *desc; + guint num_to_process, num_processed; ladspa = (GstLADSPA *)gst_pad_get_parent (pad); - g_return_val_if_fail(ladspa != NULL, NULL); - - /* this might happen if caps nego hasn't happened */ - g_return_val_if_fail(ladspa->handle != NULL, NULL); - oclass = (GstLADSPAClass*)(G_OBJECT_GET_CLASS(ladspa)); + desc = ladspa->descriptor; - /* force all src pads to set their caps */ - if (ladspa->newcaps) { - for (i=0;inumsrcpads;i++) { - gst_ladspa_force_src_caps(ladspa, ladspa->srcpads[0]); - } - } - - /* get a bufferpool */ - i = 0; - while ((ladspa->bufpool == NULL) && (i < oclass->numsrcpads)) { - ladspa->bufpool = gst_pad_get_bufferpool (ladspa->srcpads[i++]); + if (!ladspa->bufpool) { + /* capsnego hasn't happened... */ + gst_ladspa_force_src_caps(ladspa, ladspa->srcpads[0]); } - if (ladspa->bufpool == NULL) { - ladspa->bufpool = gst_buffer_pool_get_default (sizeof (LADSPA_Data) * ladspa->buffersize, - ladspa->numbuffers); - } - - buf = (GstBuffer *) gst_buffer_new_from_pool (ladspa->bufpool, 0, 0); - g_return_val_if_fail (buf, NULL); - - /* initialize the output data to 0 */ - zero_out = (gint8 *) GST_BUFFER_DATA (buf); - for (i = 0; i < GST_BUFFER_SIZE (buf); i++) - zero_out[i] = 0; - data = (LADSPA_Data *) GST_BUFFER_DATA(buf); - size = GST_BUFFER_SIZE(buf); + buf = gst_buffer_new_from_pool (ladspa->bufpool, 0, 0); GST_BUFFER_TIMESTAMP(buf) = ladspa->timestamp; - ladspa->timestamp += size * ladspa->samplerate * 10^9; + data = (LADSPA_Data *) GST_BUFFER_DATA(buf); - desc = ladspa->descriptor; + GST_DPMAN_PREPROCESS(ladspa->dpman, ladspa->buffer_frames, ladspa->timestamp); + num_processed = 0; - for (i=0;inumsrcpads;i++) - desc->connect_port(ladspa->handle,oclass->srcpad_portnums[i],data); + /* split up processing of the buffer into chunks so that dparams can + * be updated when required. + * In many cases the buffer will be processed in one chunk anyway. + */ + while(GST_DPMAN_PROCESS(ladspa->dpman, num_processed)) { + num_to_process = GST_DPMAN_FRAMES_TO_PROCESS(ladspa->dpman); - desc->run(ladspa->handle, size); + /* update timestamp */ + ladspa->timestamp += num_to_process * GST_SECOND / ladspa->samplerate; - for (i=0;inumsrcpads;i++) - desc->connect_port(ladspa->handle,oclass->srcpad_portnums[i],NULL); + desc->connect_port(ladspa->handle,oclass->srcpad_portnums[0],data); - return buf; + desc->run(ladspa->handle, num_to_process); + + data += num_to_process; + num_processed = num_to_process; + } + + return GST_DATA (buf); } static void @@ -887,12 +971,10 @@ ladspa_describe_plugin(const char *pcFullFilename, LADSPA_Descriptor_Function pfDescriptorFunction) { const LADSPA_Descriptor *desc; - int i,j; - - GstElementDetails *details; + gint i; GTypeInfo typeinfo = { sizeof(GstLADSPAClass), - NULL, + (GBaseInitFunc)gst_ladspa_base_init, NULL, (GClassInitFunc)gst_ladspa_class_init, NULL, @@ -902,7 +984,6 @@ ladspa_describe_plugin(const char *pcFullFilename, (GInstanceInitFunc)gst_ladspa_init, }; GType type; - GstElementFactory *factory; /* walk through all the plugins in this pluginlibrary */ i = 0; @@ -910,55 +991,40 @@ ladspa_describe_plugin(const char *pcFullFilename, gchar *type_name; /* construct the type */ - type_name = g_strdup_printf("ladspa_%s",desc->Label); - g_strcanon (type_name, G_CSET_A_2_Z G_CSET_a_2_z G_CSET_DIGITS "-_+", '-'); + type_name = g_strdup_printf("ladspa-%s",desc->Label); + g_strcanon (type_name, G_CSET_A_2_Z G_CSET_a_2_z G_CSET_DIGITS "-+", '-'); /* if it's already registered, drop it */ if (g_type_from_name(type_name)) { g_free(type_name); continue; } - /* create the type now */ - type = g_type_register_static(GST_TYPE_ELEMENT, type_name, &typeinfo, 0); - /* construct the element details struct */ - details = g_new0(GstElementDetails,1); - details->longname = g_strdup(desc->Name); - details->klass = "Filter/LADSPA"; - details->description = details->longname; - details->version = g_strdup_printf("%ld",desc->UniqueID); - details->author = g_strdup(desc->Maker); - details->copyright = g_strdup(desc->Copyright); + /* base-init temp alloc */ + g_hash_table_insert(ladspa_descriptors, + GINT_TO_POINTER(0), + (gpointer)desc); - /* register the plugin with gstreamer */ - factory = gst_elementfactory_new(type_name,type,details); - g_return_if_fail(factory != NULL); - gst_plugin_add_feature (ladspa_plugin, GST_PLUGIN_FEATURE (factory)); + /* create the type now */ + type = g_type_register_static(GST_TYPE_ELEMENT, type_name, &typeinfo, 0); + if (!gst_element_register (ladspa_plugin, type_name, GST_RANK_NONE, type)) + continue; /* add this plugin to the hash */ g_hash_table_insert(ladspa_descriptors, GINT_TO_POINTER(type), (gpointer)desc); - - - /* only add sink padtemplate if there are sinkpads */ - for (j=0;jPortCount;j++) { - if (LADSPA_IS_PORT_AUDIO(desc->PortDescriptors[j]) && - LADSPA_IS_PORT_INPUT(desc->PortDescriptors[j])) { - sinktempl = ladspa_sink_factory(); - gst_elementfactory_add_padtemplate (factory, sinktempl); - break; - } - } - - srctempl = ladspa_src_factory(); - gst_elementfactory_add_padtemplate (factory, srctempl); - } + + g_hash_table_remove (ladspa_descriptors, GINT_TO_POINTER (0)); } static gboolean -plugin_init (GModule *module, GstPlugin *plugin) +plugin_init (GstPlugin *plugin) { + GST_DEBUG_CATEGORY_INIT (ladspa_debug, "ladspa", + GST_DEBUG_FG_GREEN | GST_DEBUG_BG_BLACK | GST_DEBUG_BOLD, + "LADSPA"); + ladspa_descriptors = g_hash_table_new(NULL,NULL); parent_class = g_type_class_ref(GST_TYPE_ELEMENT); @@ -966,18 +1032,20 @@ plugin_init (GModule *module, GstPlugin *plugin) LADSPAPluginSearch(ladspa_describe_plugin); - if (! gst_library_load ("gstbytestream")) { - gst_info ("gstladspa: could not load support library: 'gstbytestream'\n"); - return FALSE; - } - + /* initialize dparam support library */ + gst_control_init(NULL,NULL); + return TRUE; } -GstPluginDesc plugin_desc = { +GST_PLUGIN_DEFINE ( GST_VERSION_MAJOR, GST_VERSION_MINOR, "ladspa", - plugin_init -}; - + "All LADSPA plugins", + plugin_init, + VERSION, + GST_LICENSE, + GST_PACKAGE, + GST_ORIGIN +)