adding modplug

Original commit message from CVS:
adding modplug

1 files changed, 552 insertions, 0 deletions

diff --git a/gst/modplug/gstmodplug.cc b/gst/modplug/gstmodplug.cc
new file mode 100644
index 00000000..180b9c5b
--- /dev/null
+++ b/gst/modplug/gstmodplug.cc
@@ -0,0 +1,552 @@
+/* Gnome-Streamer
+ * Copyright (C) <1999> 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 "libmodplug/stdafx.h"
+#include "libmodplug/sndfile.h"
+
+#include "gstmodplug.h"
+
+#include <gst/audio/audio.h>
+#include <stdlib.h>
+
+GstElementDetails modplug_details = {
+  "ModPlug",
+  "Audio/Module",
+  "Module decoder based on modplug engine from (Olivier ..)",
+  VERSION,
+  "Jeremy SIMON <jsimon13@yahoo.fr>",
+  "(C) 2001"
+};
+
+
+/* Filter signals and args */
+enum {
+  /* FILL ME */
+  LAST_SIGNAL
+};
+
+enum {
+  ARG_0,
+  ARG_SONGNAME,
+  ARG_REVERB,
+  ARG_REVERB_DEPTH,
+  ARG_REVERB_DELAY,
+  ARG_MEGABASS,
+  ARG_MEGABASS_AMOUNT,
+  ARG_MEGABASS_RANGE,
+  ARG_FREQUENCY,
+  ARG_NOISE_REDUCTION,
+  ARG_SURROUND,
+  ARG_SURROUND_DEPTH,
+  ARG_SURROUND_DELAY,
+  ARG_CHANNEL,
+  ARG_16BIT,
+  ARG_OVERSAMP
+};
+
+
+GST_PADTEMPLATE_FACTORY (modplug_src_template_factory,
+  "src",
+  GST_PAD_SRC,
+  GST_PAD_ALWAYS,
+  GST_CAPS_NEW (
+    "modplug_src",
+    "audio/raw",  
+      "format",   GST_PROPS_STRING ("int"),
+      "law",         GST_PROPS_INT (0),
+      "endianness",  GST_PROPS_INT (G_BYTE_ORDER),
+      "signed",      GST_PROPS_BOOLEAN (TRUE),
+      "width",       GST_PROPS_INT (16),
+      "depth",       GST_PROPS_INT (16), 
+      "rate",        GST_PROPS_INT_RANGE (11025, 44100),
+      "channels",    GST_PROPS_INT_RANGE (1, 2)
+  )
+)
+
+GST_PADTEMPLATE_FACTORY (modplug_sink_template_factory,
+  "sink",
+  GST_PAD_SINK,
+  GST_PAD_ALWAYS,
+  GST_CAPS_NEW (
+    "mad_sink",
+    "audio/mod",
+    NULL
+  )
+)
+
+
+static void		gst_modplug_class_init		(GstModPlugClass *klass);
+static void		gst_modplug_init		(GstModPlug *filter);
+static void		gst_modplug_set_property 	(GObject *object, guint id, const GValue *value, GParamSpec *pspec );
+static void		gst_modplug_get_property	(GObject *object, guint id, GValue *value, GParamSpec *pspec );
+static void     gst_modplug_loop                (GstElement *element);
+static void		gst_modplug_setup 		(GstModPlug *modplug);
+static GstElementStateReturn  gst_modplug_change_state 	(GstElement *element);
+
+static GstElementClass *parent_class = NULL;
+
+#define GST_TYPE_MODPLUG_MIXFREQ (gst_modplug_mixfreq_get_type())
+
+static GType 
+gst_modplug_mixfreq_get_type (void)
+{
+  static GType modplug_mixfreq_type = 0;
+  static GEnumValue modplug_mixfreq[] = {
+    { 0, "8000",  "8000 Hz" },
+    { 1, "11025", "11025 Hz" },
+    { 2, "22100", "22100 Hz" },
+    { 3, "44100", "44100 Hz" },
+    { 0, NULL, NULL },
+  };
+  if (! modplug_mixfreq_type ) {
+    modplug_mixfreq_type = g_enum_register_static ("GstModPlugmixfreq", modplug_mixfreq);
+  }
+  return modplug_mixfreq_type;
+}
+
+
+GType
+gst_modplug_get_type(void) {
+  static GType modplug_type = 0;
+
+  if (!modplug_type) {
+    static const GTypeInfo modplug_info = {
+      sizeof(GstModPlugClass),
+      NULL,
+      NULL,
+      (GClassInitFunc)gst_modplug_class_init,
+      NULL,
+      NULL,
+      sizeof(GstModPlug),
+      0,
+      (GInstanceInitFunc)gst_modplug_init,
+      NULL
+    };
+    modplug_type = g_type_register_static(GST_TYPE_ELEMENT, "GstModPlug", &modplug_info, (GTypeFlags)0);
+  }
+  return modplug_type;
+}
+
+
+static void
+gst_modplug_class_init (GstModPlugClass *klass)
+{
+  GObjectClass *gobject_class;
+  GstElementClass *gstelement_class;
+
+  gobject_class = (GObjectClass*)klass;
+  gstelement_class = (GstElementClass*)klass;
+
+  parent_class = GST_ELEMENT_CLASS( g_type_class_ref(GST_TYPE_ELEMENT));
+
+  g_object_class_install_property(G_OBJECT_CLASS(klass), ARG_SONGNAME,
+    g_param_spec_string("songname","Songname","The song name",
+                        "", G_PARAM_READABLE));
+
+  g_object_class_install_property(G_OBJECT_CLASS(klass), ARG_FREQUENCY,
+    g_param_spec_enum("mixfreq", "mixfreq", "mixfreq",
+                      GST_TYPE_MODPLUG_MIXFREQ, 3,(GParamFlags)G_PARAM_READWRITE ));
+
+  g_object_class_install_property(G_OBJECT_CLASS(klass), ARG_16BIT,
+    g_param_spec_boolean("use16bit", "use16bit", "use16bit",
+                         TRUE, (GParamFlags)G_PARAM_READWRITE ));
+
+  g_object_class_install_property(G_OBJECT_CLASS(klass), ARG_REVERB,
+    g_param_spec_boolean("reverb", "reverb", "reverb",
+                         FALSE, (GParamFlags)G_PARAM_READWRITE ));
+
+  g_object_class_install_property(G_OBJECT_CLASS(klass), ARG_REVERB_DEPTH,
+    g_param_spec_int("reverb_depth", "reverb_depth", "reverb_depth",
+   		     0, 100, 30, (GParamFlags)G_PARAM_READWRITE ));
+
+  g_object_class_install_property(G_OBJECT_CLASS(klass), ARG_REVERB_DELAY,
+    g_param_spec_int("reverb_delay", "reverb_delay", "reverb_delay",
+	 	     0, 200, 100, (GParamFlags)G_PARAM_READWRITE ));
+
+  g_object_class_install_property(G_OBJECT_CLASS(klass), ARG_MEGABASS,
+    g_param_spec_boolean("megabass", "megabass", "megabass",
+                         FALSE, (GParamFlags)G_PARAM_READWRITE ));
+
+  g_object_class_install_property(G_OBJECT_CLASS(klass), ARG_MEGABASS_AMOUNT,
+    g_param_spec_int("megabass_amount", "megabass_amount", "megabass_amount",
+                     0, 100, 40, (GParamFlags)G_PARAM_READWRITE ));
+					
+  g_object_class_install_property(G_OBJECT_CLASS(klass), ARG_MEGABASS_RANGE,
+    g_param_spec_int("megabass_range", "megabass_range", "megabass_range",
+                     0, 100, 30, (GParamFlags)G_PARAM_READWRITE ));
+
+  g_object_class_install_property(G_OBJECT_CLASS(klass), ARG_SURROUND,
+    g_param_spec_boolean("surround", "surround", "surround",
+                         TRUE, (GParamFlags)G_PARAM_READWRITE ));
+
+  g_object_class_install_property(G_OBJECT_CLASS(klass), ARG_SURROUND_DEPTH,
+    g_param_spec_int("surround_depth", "surround_depth", "surround_depth",
+                     0, 100, 20, (GParamFlags)G_PARAM_READWRITE ));
+
+  g_object_class_install_property(G_OBJECT_CLASS(klass), ARG_SURROUND_DELAY,
+    g_param_spec_int("surround_delay", "surround_delay", "surround_delay",
+                     0, 40, 20, (GParamFlags)G_PARAM_READWRITE ));
+
+  g_object_class_install_property(G_OBJECT_CLASS(klass), ARG_OVERSAMP,
+    g_param_spec_boolean("oversamp", "oversamp", "oversamp",
+                         TRUE, (GParamFlags)G_PARAM_READWRITE ));
+
+  g_object_class_install_property(G_OBJECT_CLASS(klass), ARG_NOISE_REDUCTION,
+    g_param_spec_boolean("noise_reduction", "noise_reduction", "noise_reduction",
+                         TRUE, (GParamFlags)G_PARAM_READWRITE ));
+		    
+  gobject_class->set_property = gst_modplug_set_property;
+  gobject_class->get_property = gst_modplug_get_property;
+
+  gstelement_class->change_state = gst_modplug_change_state;
+}
+
+
+static void
+gst_modplug_init (GstModPlug *modplug)
+{  
+  modplug->sinkpad = gst_pad_new_from_template( GST_PADTEMPLATE_GET (modplug_sink_template_factory), "sink");
+  modplug->srcpad = gst_pad_new_from_template( GST_PADTEMPLATE_GET (modplug_src_template_factory), "src");
+
+  gst_element_add_pad(GST_ELEMENT(modplug),modplug->sinkpad);
+  gst_element_add_pad(GST_ELEMENT(modplug),modplug->srcpad);
+  
+  gst_element_set_loop_function (GST_ELEMENT (modplug), gst_modplug_loop);
+  
+  modplug->Buffer = NULL;
+
+  modplug->reverb          = FALSE;
+  modplug->reverb_depth    = 30;
+  modplug->reverb_delay    = 100;
+  modplug->megabass        = FALSE;
+  modplug->megabass_amount = 40;
+  modplug->megabass_range  = 30;	  
+  modplug->surround        = TRUE;
+  modplug->surround_depth  = 20;
+  modplug->surround_delay  = 20;
+  modplug->oversamp        = TRUE;
+  modplug->noise_reduction = TRUE;
+
+  modplug->_16bit          = TRUE;
+  modplug->channel         = 2;
+  modplug->frequency       = 44100;
+
+  modplug->mSoundFile = new CSoundFile;
+}
+
+
+static void
+gst_modplug_setup (GstModPlug *modplug)
+{
+  if ( modplug->_16bit ) 
+    modplug->mSoundFile->SetWaveConfig ( modplug->frequency, 16, modplug->channel );
+  else
+    modplug->mSoundFile->SetWaveConfig ( modplug->frequency, 8,  modplug->channel );
+  
+  modplug->mSoundFile->SetWaveConfigEx ( modplug->surround, !modplug->oversamp, modplug->reverb, true, modplug->megabass, modplug->noise_reduction, false );
+  modplug->mSoundFile->SetResamplingMode ( SRCMODE_SPLINE );
+
+  if ( modplug->surround )
+    modplug->mSoundFile->SetSurroundParameters( modplug->surround_depth, modplug->surround_delay );
+
+  if ( modplug->megabass )
+    modplug->mSoundFile->SetXBassParameters( modplug->megabass_amount, modplug->megabass_range );
+
+  if ( modplug->reverb )
+    modplug->mSoundFile->SetReverbParameters( modplug->reverb_depth, modplug->reverb_delay );
+
+}
+  
+	
+
+static void
+gst_modplug_loop (GstElement *element)
+{
+  GstModPlug *modplug;
+  GstBuffer *buffer_in, *buffer_out;
+  gint mode16bits;
+
+  g_return_if_fail (element != NULL);
+  g_return_if_fail (GST_IS_MODPLUG (element));
+	
+  modplug = GST_MODPLUG (element);
+  srcpad = modplug->srcpad;
+  	
+  while ((buffer_in = gst_pad_pull( modplug->sinkpad ))) {
+    if ( GST_IS_EVENT (buffer_in) ) {
+      GstEvent *event = GST_EVENT (buffer_in);
+		
+      if (GST_EVENT_TYPE (event) == GST_EVENT_EOS) 
+         break;
+    }
+		
+    if ( modplug->Buffer ) {	 
+      modplug->Buffer = gst_buffer_append( modplug->Buffer, buffer_in );
+      gst_buffer_unref( buffer_in );	 	  
+    }
+    else
+      modplug->Buffer = buffer_in;
+  }  
+
+  if ( modplug->_16bit )
+    mode16bits = 16;
+  else
+    mode16bits = 8;
+
+/*  CSoundFile::SetWaveConfig ( modplug->frequency, mode16bits, modplug->channel );
+  CSoundFile::SetWaveConfigEx ( modplug->surround, !modplug->oversamp, modplug->reverb, true, modplug->megabass, modplug->noise_reduction, false );
+  CSoundFile::SetResamplingMode ( SRCMODE_SPLINE );
+  CSoundFile::SetSurroundParameters( 30, 100 );*/
+
+  gst_modplug_setup( modplug );
+
+  modplug->mSoundFile = new CSoundFile;
+  modplug->mSoundFile->Create( GST_BUFFER_DATA( modplug->Buffer ), GST_BUFFER_SIZE( modplug->Buffer ));
+  
+  gst_buffer_unref( modplug->Buffer );
+
+  gst_pad_try_set_caps (modplug->srcpad, 
+		          GST_CAPS_NEW (
+			    "modplug_src",
+			    "audio/raw",
+			      "format",      GST_PROPS_STRING ("int"),
+			      "law",         GST_PROPS_INT (0),
+			      "endianness",  GST_PROPS_INT (G_BYTE_ORDER),
+			      "signed",      GST_PROPS_BOOLEAN (TRUE),
+			      "width",       GST_PROPS_INT (mode16bits),
+			      "depth",       GST_PROPS_INT (mode16bits),
+			      "rate",        GST_PROPS_INT (modplug->frequency),
+			      "channels",    GST_PROPS_INT (modplug->channel)));
+
+  modplug->length = 512000 / modplug->frequency + 1;
+  modplug->length *= modplug->frequency;
+  modplug->length /= 1000;
+  modplug->length *= modplug->channel;
+  if ( modplug->_16bit )
+    modplug->length *= 2;
+    
+  modplug->audiobuffer = (guchar *) g_malloc( modplug->length );
+  			    
+  do {
+    if( modplug->mSoundFile->Read ( modplug->audiobuffer, modplug->length ) != 0 )
+    {
+      buffer_out = gst_buffer_new();
+      GST_BUFFER_DATA( buffer_out ) = (guchar *) g_memdup( modplug->audiobuffer, modplug->length );
+      GST_BUFFER_SIZE( buffer_out ) = modplug->length;
+
+      gst_pad_push( srcpad, buffer_out );
+	  gst_element_yield (element);      
+    }
+    else
+    {	    
+      gst_element_set_eos (GST_ELEMENT (modplug));
+      gst_pad_push (modplug->srcpad, GST_BUFFER (gst_event_new (GST_EVENT_EOS)));
+    }
+  } 
+  while ( 1 );
+}
+
+
+static GstElementStateReturn
+gst_modplug_change_state (GstElement *element)
+{
+GstModPlug *modplug;
+
+  g_return_val_if_fail (GST_IS_MODPLUG (element), GST_STATE_FAILURE);
+
+  modplug = GST_MODPLUG (element);
+
+  GST_DEBUG (0,"state pending %d\n", GST_STATE_PENDING (element));
+
+  /* if going down into NULL state, close the file if it's open */
+/*  if (GST_STATE_PENDING (element) == GST_STATE_READY) 
+  {
+     gst_modplug_setup(modplug);
+	  
+	 if ( Player_Active() )
+	 {
+		Player_TogglePause();
+		Player_SetPosition( 0 );
+	 }
+	
+  }
+  
+  if (GST_STATE_PENDING (element) == GST_STATE_PLAYING) 
+  {	 
+	 if ( Player_Active() && Player_Paused() )	 
+		Player_TogglePause();
+	 else
+	   if ( ! Player_Active() )
+	     Player_Start(module);
+	 
+  }
+    	
+  if (GST_STATE_PENDING (element) == GST_STATE_PAUSED) 
+    if ( Player_Active() && ! Player_Paused() )
+       Player_TogglePause();
+
+  if (GST_STATE_PENDING (element) == GST_STATE_NULL) 
+	  ModPlug_Exit();    
+ */ 
+
+  /* if we haven't failed already, give the parent class a chance to ;-) */
+  if (GST_ELEMENT_CLASS (parent_class)->change_state)
+    return GST_ELEMENT_CLASS (parent_class)->change_state (element);
+
+  return GST_STATE_SUCCESS;
+}
+
+
+
+static void
+gst_modplug_set_property (GObject *object, guint id, const GValue *value, GParamSpec *pspec )
+{
+  GstModPlug *modplug;
+
+  /* it's not null if we got it, but it might not be ours */
+  g_return_if_fail(GST_IS_MODPLUG(object));
+  modplug = GST_MODPLUG(object);
+
+  switch (id) {
+    case ARG_SONGNAME:
+      modplug->songname = g_value_get_string (value);
+      break;
+    case ARG_REVERB:
+      modplug->reverb = g_value_get_boolean (value);
+      break;
+    case ARG_REVERB_DEPTH:
+      modplug->reverb_depth = g_value_get_int (value);
+      break;
+    case ARG_REVERB_DELAY:
+      modplug->reverb_delay = g_value_get_int (value);
+      break;
+    case ARG_MEGABASS:
+      modplug->megabass = g_value_get_boolean (value);
+      break;
+    case ARG_MEGABASS_AMOUNT:
+      modplug->megabass_amount = g_value_get_int (value);
+      break;
+    case ARG_MEGABASS_RANGE:
+      modplug->megabass_range = g_value_get_int (value);
+      break;
+    case ARG_FREQUENCY:
+      modplug->frequency = g_value_get_enum (value);
+      break;
+    case ARG_CHANNEL:
+      modplug->channel = g_value_get_int (value);
+      break;
+    case ARG_NOISE_REDUCTION:
+      modplug->noise_reduction = g_value_get_boolean (value);
+      break;
+    case ARG_SURROUND:
+      modplug->surround = g_value_get_boolean (value);
+      break;
+    case ARG_SURROUND_DEPTH:
+      modplug->surround_depth = g_value_get_int (value);
+      break;
+    case ARG_SURROUND_DELAY:
+      modplug->surround_delay = g_value_get_int (value);
+      break;
+    case ARG_16BIT:
+      modplug->_16bit = g_value_get_boolean (value);
+      break;
+    default:
+//      G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
+      break;
+  }
+}
+
+static void
+gst_modplug_get_property (GObject *object, guint id, GValue *value, GParamSpec *pspec )
+{
+  GstModPlug *modplug;
+
+  /* it's not null if we got it, but it might not be ours */
+  g_return_if_fail(GST_IS_MODPLUG(object));
+  modplug = GST_MODPLUG(object);
+  
+  switch (id) {
+    case ARG_REVERB:
+      g_value_set_boolean (value, modplug->reverb);
+      break;
+    case ARG_REVERB_DEPTH:
+      g_value_set_int (value, modplug->reverb_depth);
+      break;
+    case ARG_REVERB_DELAY:
+      g_value_set_int (value, modplug->reverb_delay);
+      break;
+    case ARG_MEGABASS:
+      g_value_set_boolean (value, modplug->megabass);
+      break;
+    case ARG_MEGABASS_AMOUNT:
+      g_value_set_int (value, modplug->megabass_amount);
+      break;
+    case ARG_MEGABASS_RANGE:
+      g_value_set_int (value, modplug->megabass_range);
+      break;
+    case ARG_FREQUENCY:
+      g_value_set_enum (value, modplug->frequency);
+      break;
+    case ARG_CHANNEL:
+      g_value_set_int (value, modplug->channel);
+      break;
+    case ARG_16BIT:
+      g_value_set_boolean (value, modplug->_16bit);
+      break;
+    case ARG_SURROUND:
+      g_value_set_boolean (value, modplug->surround);
+      break;
+    case ARG_SURROUND_DEPTH:
+      g_value_set_int (value, modplug->surround_depth);
+      break;
+    case ARG_SURROUND_DELAY:
+      g_value_set_int (value, modplug->surround_delay);
+      break;
+    case ARG_NOISE_REDUCTION:
+      g_value_set_boolean (value, modplug->noise_reduction);
+      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("modplug",GST_TYPE_MODPLUG,
+                                   &modplug_details);
+  g_return_val_if_fail(factory != NULL, FALSE);
+ 
+  gst_elementfactory_add_padtemplate (factory, GST_PADTEMPLATE_GET (modplug_sink_template_factory));
+  gst_elementfactory_add_padtemplate (factory, GST_PADTEMPLATE_GET (modplug_src_template_factory));
+
+  gst_plugin_add_feature (plugin, GST_PLUGIN_FEATURE (factory));	
+
+  return TRUE;
+}
+
+GstPluginDesc plugin_desc = {
+  GST_VERSION_MAJOR,
+  GST_VERSION_MINOR,
+  "modplug",
+  plugin_init
+};