/* GStreamer * Copyright (C) <1999> Erik Walthinsen * * 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. */ /* Code based on modplugxmms XMMS plugin: Kenton Varda Sound Engine: Olivier Lapicque */ #include "libmodplug/stdafx.h" #include "libmodplug/sndfile.h" #include "gstmodplug.h" #include #include GstElementDetails modplug_details = { "ModPlug", "Audio/Module", "Module decoder based on modplug engine", VERSION, "Jeremy SIMON " "Kenton Varda " "Olivier Lapicque ", "(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_POLYPHASE ); 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; guint64 total_samples, sync_point; 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 = 1152 * modplug->channel; if ( modplug->_16bit ) modplug->length *= 2; modplug->audiobuffer = (guchar *) g_malloc( modplug->length ); total_samples = 0; sync_point = 0; 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; total_samples+=1152; GST_BUFFER_TIMESTAMP( buffer_out ) = total_samples * 1000000LL / modplug->frequency; gst_pad_push( srcpad, buffer_out ); gst_element_yield (element); } else { free( modplug->audiobuffer ); 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", 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 };