summaryrefslogtreecommitdiffstats
path: root/gst/speed/gstspeed.c
diff options
context:
space:
mode:
Diffstat (limited to 'gst/speed/gstspeed.c')
-rw-r--r--gst/speed/gstspeed.c347
1 files changed, 347 insertions, 0 deletions
diff --git a/gst/speed/gstspeed.c b/gst/speed/gstspeed.c
new file mode 100644
index 00000000..51811227
--- /dev/null
+++ b/gst/speed/gstspeed.c
@@ -0,0 +1,347 @@
+/* -*- c-basic-offset: 2 -*-
+ * GStreamer
+ * Copyright (C) 1999-2001 Erik Walthinsen <omega@cse.ogi.edu>
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library 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
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the
+ * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+ * Boston, MA 02111-1307, USA.
+ */
+
+#include <string.h>
+#include <gst/gst.h>
+#include <math.h>
+#include <libs/audio/gstaudio.h>
+#include "gstspeed.h"
+
+/* buffer size to make if no bufferpool is available, must be divisible by
+ * sizeof(gfloat) */
+#define SPEED_BUFSIZE 4096
+/* number of buffers to allocate per chunk in sink buffer pool */
+#define SPEED_NUMBUF 6
+
+static GstElementDetails speed_details = {
+ "Speed",
+ "Filter/Effect",
+ "Set speed/pitch on audio/raw streams (resampler)",
+ VERSION,
+ "Andy Wingo <apwingo@eos.ncsu.edu>",
+ "(C) 2001"
+};
+
+
+/* Filter signals and args */
+enum {
+ /* FILL ME */
+ LAST_SIGNAL
+};
+
+enum {
+ ARG_0,
+ ARG_SILENT,
+ ARG_SPEED
+};
+
+static GstPadTemplate*
+speed_sink_factory (void)
+{
+ static GstPadTemplate *template = NULL;
+
+ if (!template) {
+ template = gst_padtemplate_new
+ ("sink", GST_PAD_SINK, GST_PAD_ALWAYS,
+ gst_caps_append(gst_caps_new ("sink_int", "audio/raw",
+ GST_AUDIO_INT_MONO_PAD_TEMPLATE_PROPS),
+ gst_caps_new ("sink_float", "audio/raw",
+ GST_AUDIO_FLOAT_MONO_PAD_TEMPLATE_PROPS)),
+ NULL);
+ }
+ return template;
+}
+
+static GstPadTemplate*
+speed_src_factory (void)
+{
+ static GstPadTemplate *template = NULL;
+
+ if (!template)
+ template = gst_padtemplate_new
+ ("src", GST_PAD_SRC, GST_PAD_ALWAYS,
+ gst_caps_append (gst_caps_new ("src_float", "audio/raw",
+ GST_AUDIO_FLOAT_MONO_PAD_TEMPLATE_PROPS),
+ gst_caps_new ("src_int", "audio/raw",
+ GST_AUDIO_INT_MONO_PAD_TEMPLATE_PROPS)),
+ NULL);
+
+ return template;
+}
+
+static GstBufferPool*
+speed_sink_get_bufferpool (GstPad *pad)
+{
+ GstSpeed *filter;
+
+ filter = GST_SPEED (gst_pad_get_parent(pad));
+
+ return filter->sinkpool;
+}
+
+static void speed_class_init (GstSpeedClass *klass);
+static void speed_init (GstSpeed *filter);
+
+static void speed_set_property (GObject *object, guint prop_id, const GValue *value, GParamSpec *pspec);
+static void speed_get_property (GObject *object, guint prop_id, GValue *value, GParamSpec *pspec);
+
+static gint speed_parse_caps (GstSpeed *filter, GstCaps *caps);
+
+static void speed_loop (GstElement *element);
+
+static GstElementClass *parent_class = NULL;
+//static guint gst_filter_signals[LAST_SIGNAL] = { 0 };
+
+static GstPadNegotiateReturn
+speed_negotiate_src (GstPad *pad, GstCaps **caps, gpointer *data)
+{
+ GstSpeed* filter = GST_SPEED (gst_pad_get_parent (pad));
+
+ if (*caps==NULL)
+ return GST_PAD_NEGOTIATE_FAIL;
+
+ if (speed_parse_caps(filter, *caps))
+ return GST_PAD_NEGOTIATE_FAIL;
+
+ return gst_pad_negotiate_proxy(pad,filter->sinkpad,caps);
+}
+
+static GstPadNegotiateReturn
+speed_negotiate_sink (GstPad *pad, GstCaps **caps, gpointer *data)
+{
+ GstSpeed* filter = GST_SPEED (gst_pad_get_parent (pad));
+
+ if (*caps==NULL)
+ return GST_PAD_NEGOTIATE_FAIL;
+
+ if (speed_parse_caps(filter, *caps))
+ return GST_PAD_NEGOTIATE_FAIL;
+
+ return gst_pad_negotiate_proxy(pad,filter->srcpad,caps);
+}
+
+static gint
+speed_parse_caps (GstSpeed *filter, GstCaps *caps)
+{
+ const gchar *format;
+
+ g_return_val_if_fail(filter!=NULL,-1);
+ g_return_val_if_fail(caps!=NULL,-1);
+
+ format = gst_caps_get_string(caps, "format");
+
+ filter->rate = gst_caps_get_int (caps, "rate");
+ filter->channels = gst_caps_get_int (caps, "channels");
+
+ if (strcmp(format, "int")==0) {
+ filter->format = GST_SPEED_FORMAT_INT;
+ filter->width = gst_caps_get_int (caps, "width");
+ filter->depth = gst_caps_get_int (caps, "depth");
+ filter->law = gst_caps_get_int (caps, "law");
+ filter->endianness = gst_caps_get_int (caps, "endianness");
+ filter->is_signed = gst_caps_get_int (caps, "signed");
+ if (!filter->silent) {
+ g_print ("Speed : channels %d, rate %d\n",
+ filter->channels, filter->rate);
+ g_print ("Speed : format int, bit width %d, endianness %d, signed %s\n",
+ filter->width, filter->endianness, filter->is_signed ? "yes" : "no");
+ }
+ } else if (strcmp(format, "float")==0) {
+ filter->format = GST_SPEED_FORMAT_FLOAT;
+ filter->layout = gst_caps_get_string(caps, "layout");
+ filter->intercept = gst_caps_get_float(caps, "intercept");
+ filter->slope = gst_caps_get_float(caps, "slope");
+ if (!filter->silent) {
+ g_print ("Speed : channels %d, rate %d\n",
+ filter->channels, filter->rate);
+ g_print ("Speed : format float, layout %s, intercept %f, slope %f\n",
+ filter->layout, filter->intercept, filter->slope);
+ }
+ } else {
+ return -1;
+ }
+ return 0;
+}
+
+
+GType
+gst_speed_get_type(void) {
+ static GType speed_type = 0;
+
+ if (!speed_type) {
+ static const GTypeInfo speed_info = {
+ sizeof(GstSpeedClass), NULL,
+ NULL,
+ (GClassInitFunc)speed_class_init,
+ NULL,
+ NULL,
+ sizeof(GstSpeed),
+ 0,
+ (GInstanceInitFunc)speed_init,
+ };
+ speed_type = g_type_register_static(GST_TYPE_ELEMENT, "GstSpeed", &speed_info, 0);
+ }
+ return speed_type;
+}
+
+static void
+speed_class_init (GstSpeedClass *klass)
+{
+ GObjectClass *gobject_class;
+ GstElementClass *gstelement_class;
+
+ gobject_class = (GObjectClass*)klass;
+ gstelement_class = (GstElementClass*)klass;
+
+ parent_class = g_type_class_ref(GST_TYPE_ELEMENT);
+
+ g_object_class_install_property(G_OBJECT_CLASS(klass), ARG_SILENT,
+ g_param_spec_boolean("silent","silent","silent",
+ TRUE,G_PARAM_READWRITE)); // CHECKME
+
+ g_object_class_install_property(G_OBJECT_CLASS(klass), ARG_SPEED,
+ g_param_spec_float("speed","speed","speed",
+ 0.1,40.0,1.0,G_PARAM_READWRITE));
+
+ gobject_class->set_property = speed_set_property;
+ gobject_class->get_property = speed_get_property;
+}
+
+static void
+speed_init (GstSpeed *filter)
+{
+ filter->sinkpad = gst_pad_new_from_template(speed_sink_factory (),"sink");
+ gst_pad_set_negotiate_function(filter->sinkpad,speed_negotiate_sink);
+ gst_pad_set_bufferpool_function (filter->sinkpad, speed_sink_get_bufferpool);
+ filter->srcpad = gst_pad_new_from_template(speed_src_factory (),"src");
+ gst_pad_set_negotiate_function(filter->srcpad,speed_negotiate_src);
+
+ gst_element_add_pad(GST_ELEMENT(filter),filter->sinkpad);
+ gst_element_add_pad(GST_ELEMENT(filter),filter->srcpad);
+ gst_element_set_loop_function(GST_ELEMENT(filter),speed_loop);
+ filter->silent = FALSE;
+ filter->speed = 1.0;
+
+ filter->sinkpool = gst_buffer_pool_get_default(SPEED_BUFSIZE,
+ SPEED_NUMBUF);
+}
+
+static void
+speed_loop (GstElement *element)
+{
+ GstSpeed *filter = GST_SPEED(element);
+ GstBuffer *in, *out;
+ guint i, j, nin, nout;
+ gfloat interp, speed, lower, i_float;
+
+ g_return_if_fail(filter != NULL);
+ g_return_if_fail(GST_IS_SPEED(filter));
+
+ filter->srcpool = gst_pad_get_bufferpool(filter->srcpad);
+
+ i = j = 0;
+ speed = filter->speed;
+
+ in = gst_pad_pull(filter->sinkpad);
+
+ /* this is a bit nasty, but hey, it's what you've got to do to keep the same
+ * algorithm and multiple data types in c. */
+ if (filter->format==GST_SPEED_FORMAT_FLOAT) {
+#define _FORMAT gfloat
+#include "filter.func"
+#undef _FORMAT
+ } else if (filter->format==GST_SPEED_FORMAT_INT && filter->width==16) {
+#define _FORMAT gint16
+#include "filter.func"
+#undef _FORMAT
+ } else if (filter->format==GST_SPEED_FORMAT_INT && filter->width==8) {
+#define _FORMAT gint8
+#include "filter.func"
+#undef _FORMAT
+ }
+}
+
+static void
+speed_set_property (GObject *object, guint prop_id, const GValue *value, GParamSpec *pspec)
+{
+ GstSpeed *filter;
+
+ /* it's not null if we got it, but it might not be ours */
+ g_return_if_fail(GST_IS_SPEED(object));
+ filter = GST_SPEED(object);
+
+ switch (prop_id)
+ {
+ case ARG_SILENT:
+ filter->silent = g_value_get_boolean (value);
+ break;
+ case ARG_SPEED:
+ filter->speed = g_value_get_float (value);
+ break;
+ default:
+ break;
+ }
+}
+
+static void
+speed_get_property (GObject *object, guint prop_id, GValue *value, GParamSpec *pspec)
+{
+ GstSpeed *filter;
+
+ /* it's not null if we got it, but it might not be ours */
+ g_return_if_fail(GST_IS_SPEED(object));
+ filter = GST_SPEED(object);
+
+ switch (prop_id) {
+ case ARG_SILENT:
+ g_value_set_boolean (value, filter->silent);
+ break;
+ case ARG_SPEED:
+ g_value_set_float (value, filter->speed);
+ break;
+ default:
+ G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
+ break;
+ }
+}
+
+static gboolean
+plugin_init (GModule *module, GstPlugin *plugin)
+{
+ GstElementFactory *factory;
+
+ factory = gst_elementfactory_new("speed",GST_TYPE_SPEED,
+ &speed_details);
+ g_return_val_if_fail(factory != NULL, FALSE);
+
+ gst_elementfactory_add_padtemplate (factory, speed_src_factory ());
+ gst_elementfactory_add_padtemplate (factory, speed_sink_factory ());
+
+ gst_plugin_add_feature (plugin, GST_PLUGIN_FEATURE (factory));
+
+ return TRUE;
+}
+
+GstPluginDesc plugin_desc = {
+ GST_VERSION_MAJOR,
+ GST_VERSION_MINOR,
+ "speed",
+ plugin_init
+};