mirrors/gstreamer
mirrors/gstreamer
1
1
Fork 0
mirror of https://gitlab.freedesktop.org/gstreamer/gstreamer.git synced 2024-07-02 20:55:55 +00:00
Code Issues 1 Projects Releases Wiki Activity

Add second midi renderer. Fix some double frees and leaks. Clean up logging.

Browse source 
Original commit message from CVS:
* configure.ac:
* ext/timidity/Makefile.am:
* ext/timidity/gsttimidity.c: (plugin_init):
* ext/timidity/gstwildmidi.c: (gst_wildmidi_base_init),
(gst_wildmidi_class_init), (gst_wildmidi_init),
(gst_wildmidi_src_convert), (gst_wildmidi_src_query),
(gst_wildmidi_get_upstream_size), (gst_wildmidi_get_segment),
(gst_wildmidi_get_new_segment_event), (gst_wildmidi_src_event),
(gst_wildmidi_activate), (gst_wildmidi_activatepull),
(gst_wildmidi_allocate_buffer), (gst_wildmidi_clip_buffer),
(gst_wildmidi_fill_buffer), (gst_wildmidi_get_buffer),
(gst_wildmidi_loop), (gst_wildmidi_change_state),
(gst_wildmidi_set_property), (gst_wildmidi_get_property),
(gst_wildmidi_typefind), (wildmidi_open_config), (plugin_init):
* ext/timidity/gstwildmidi.h:
Add second midi renderer. Fix some double frees and leaks. Clean up
logging.
This commit is contained in:
Stefan Kost 2007-02-11 15:46:24 +00:00
parent 711f00bb88
commit ba820cdc34
6 changed files with 1051 additions and 9 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

20
ChangeLog
View file

@ -1,3 +1,23 @@
2007-02-11 Stefan Kost <ensonic@users.sf.net>
* configure.ac:
* ext/timidity/Makefile.am:
* ext/timidity/gsttimidity.c: (plugin_init):
* ext/timidity/gstwildmidi.c: (gst_wildmidi_base_init),
(gst_wildmidi_class_init), (gst_wildmidi_init),
(gst_wildmidi_src_convert), (gst_wildmidi_src_query),
(gst_wildmidi_get_upstream_size), (gst_wildmidi_get_segment),
(gst_wildmidi_get_new_segment_event), (gst_wildmidi_src_event),
(gst_wildmidi_activate), (gst_wildmidi_activatepull),
(gst_wildmidi_allocate_buffer), (gst_wildmidi_clip_buffer),
(gst_wildmidi_fill_buffer), (gst_wildmidi_get_buffer),
(gst_wildmidi_loop), (gst_wildmidi_change_state),
(gst_wildmidi_set_property), (gst_wildmidi_get_property),
(gst_wildmidi_typefind), (wildmidi_open_config), (plugin_init):
* ext/timidity/gstwildmidi.h:
Add second midi renderer. Fix some double frees and leaks. Clean up
logging.
2007-02-11 Sébastien Moutte <sebastien@moutte.net>
* Makefile.am:

40
configure.ac
View file

@ -755,8 +755,27 @@ GST_CHECK_FEATURE(NEON, [neon http client plugins], neonhttpsrc, [
dnl *** timidity ***
translit(dnm, m, l) AM_CONDITIONAL(USE_TIMIDITY, true)
GST_CHECK_FEATURE(TIMIDITY, [timidity midie soft synth plugin], timidity, [
PKG_CHECK_MODULES(TIMIDITY, libtimidity, HAVE_TIMIDITY="yes", [
GST_CHECK_FEATURE(TIMIDITY, [timidity midi soft synth plugin], timidity, [
PKG_CHECK_MODULES(TIMIDITY, libtimidity, [
HAVE_TIMIDITY="yes",
AC_MSG_CHECKING([for timidity.cfg])
timidity_cfg=""
if test -r /etc/timidity.cfg; then
timidity_cfg=/etc/timidity.cfg
elif test -r /etc/timidify/timidity.cfg; then
timidity_cfg=/etc/timidify/timidity.cfg
elif test -r /usr/share/timidity/timidity.cfg; then
timidity_cfg=/usr/share/timidity/timidity.cfg
elif test -r /usr/local/share/timidity/timidity.cfg; then
timidity_cfg=/usr/local/share/timidity/timidity.cfg
fi
if test "x$timidity_cfg" != "x"; then
AC_MSG_RESULT($timidity_cfg)
AC_DEFINE_UNQUOTED(TIMIDITY_CFG, "$timidity_cfg", [Define location of timidity.cfg])
else
AC_MSG_RESULT([not found])
fi
], [
HAVE_TIMIDITY="no"
AC_MSG_RESULT(no)
])
@ -764,6 +783,23 @@ GST_CHECK_FEATURE(TIMIDITY, [timidity midie soft synth plugin], timidity, [
AC_SUBST(TIMIDITY_LIBS)
])
dnl *** wildmidi ***
translit(dnm, m, l) AM_CONDITIONAL(USE_WILDMIDI, true)
GST_CHECK_FEATURE(WILDMIDI, [wildmidi midi soft synth plugin], wildmidi, [
AC_CHECK_HEADER([wildmidi_lib.h],HAVE_WILDMIDI=yes, HAVE_WILDMIDI=no)
if test "x$HAVE_WILDMIDI" = "xyes"; then
WILDMIDI_CFLAGS=
WILDMIDI_LIBS=-lWildMidi
AC_MSG_NOTICE(compiling gstWildMidi)
else
WILDMIDI_CFLAGS=
WILDMIDI_LIBS=
AC_MSG_WARN(no WildMidi library found (libWildMidi))
fi
AC_SUBST(WILDMIDI_CFLAGS)
AC_SUBST(WILDMIDI_LIBS)
])
dnl *** SDL ***
translit(dnm, m, l) AM_CONDITIONAL(USE_SDL, true)
GST_CHECK_FEATURE(SDL, [SDL plug-in], sdlvideosink sdlaudiosink, [

24
ext/timidity/Makefile.am
View file

@ -1,9 +1,8 @@
# plugindir is set in configure
plugin_LTLIBRARIES =
# change libgstplugin.la to something more suitable
plugin_LTLIBRARIES = libgsttimidity.la
# for the next set of variables, rename the prefix if you renamed the .la
if USE_TIMIDITY
plugin_LTLIBRARIES += libgsttimidity.la
# sources used to compile this plug-in
libgsttimidity_la_SOURCES = gsttimidity.c
@ -15,3 +14,20 @@ libgsttimidity_la_LIBADD = $(GST_LIBS) $(GST_BASE_LIBS) $(TIMIDITY_LIBS)
libgsttimidity_la_LDFLAGS = $(GST_PLUGIN_LDFLAGS)
noinst_HEADERS = gsttimidity.h
endif
if USE_WILDMIDI
plugin_LTLIBRARIES += libgstwildmidi.la
# sources used to compile this plug-in
libgstwildmidi_la_SOURCES = gstwildmidi.c
# flags used to compile this plugin
# add other _CFLAGS and _LIBS as needed
libgstwildmidi_la_CFLAGS = $(GST_CFLAGS) $(GST_BASE_CFLAGS) $(WILDMIDI_CFLAGS)
libgstwildmidi_la_LIBADD = $(GST_LIBS) $(GST_BASE_LIBS) $(WILDMIDI_LIBS)
libgstwildmidi_la_LDFLAGS = $(GST_PLUGIN_LDFLAGS)
noinst_HEADERS = gstwildmidi.h
endif

8
ext/timidity/gsttimidity.c
View file

@ -784,15 +784,17 @@ plugin_init (GstPlugin * plugin)
/* initialise timidity library, fail loading the plugin if this fails
* FIXME: check for config location during configure
*/
if (mid_init ("/etc/timidity/timidity.cfg") != 0) {
GST_WARNING ("can't initialize timidity, is it configured?");
if (mid_init (TIMIDITY_CFG) != 0) {
GST_WARNING ("can't initialize timidity with config: " TIMIDITY_CFG);
return FALSE;
}
if (!gst_type_find_register (plugin, "audio/midi", GST_RANK_PRIMARY,
gst_timidity_typefind, exts,
gst_caps_new_simple ("audio/midi", NULL), NULL, NULL))
gst_caps_new_simple ("audio/midi", NULL), NULL, NULL)) {
GST_WARNING ("can't register typefind");
return FALSE;
}
return gst_element_register (plugin, "timidity",
GST_RANK_PRIMARY, GST_TYPE_TIMIDITY);

880
ext/timidity/gstwildmidi.c Normal file
View file

@ -0,0 +1,880 @@
/*
* gstwildmidi - wildmidi plugin for gstreamer
*
* Copyright 2007 Wouter Paesen <wouter@blue-gate.be>
*
* 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.
*/
#ifdef HAVE_CONFIG_H
# include <config.h>
#endif
#define WILDMIDI_RATE 44100
#define WILDMIDI_BPS (2 * 2)
#include <gst/gst.h>
#include <string.h>
#include <glib.h>
#include <glib/gstdio.h>
#include <unistd.h>
#include "gstwildmidi.h"
GST_DEBUG_CATEGORY_STATIC (gst_wildmidi_debug);
#define GST_CAT_DEFAULT gst_wildmidi_debug
static const GstElementDetails gst_wildmidi_details =
GST_ELEMENT_DETAILS ("WildMidi",
"Codec/Decoder/Audio",
"Midi Synthesizer Element",
"Wouter Paesen <wouter@blue-gate.be>");
enum
{
/* FILL ME */
LAST_SIGNAL
};
enum
{
ARG_0,
ARG_LINEAR_VOLUME,
ARG_HIGH_QUALITY,
/* FILL ME */
};
static void gst_wildmidi_base_init (gpointer g_class);
static void gst_wildmidi_class_init (GstWildmidiClass * klass);
static gboolean gst_wildmidi_src_event (GstPad * pad, GstEvent * event);
static GstStateChangeReturn gst_wildmidi_change_state (GstElement * element,
GstStateChange transition);
static gboolean gst_wildmidi_activate (GstPad * pad);
static gboolean gst_wildmidi_activatepull (GstPad * pad, gboolean active);
static void gst_wildmidi_loop (GstPad * sinkpad);
static gboolean gst_wildmidi_src_query (GstPad * pad, GstQuery * query);
static void gst_wildmidi_set_property (GObject * object, guint prop_id,
const GValue * value, GParamSpec * pspec);
static void gst_wildmidi_get_property (GObject * object, guint prop_id,
GValue * value, GParamSpec * pspec);
static GstStaticPadTemplate sink_factory = GST_STATIC_PAD_TEMPLATE ("sink",
GST_PAD_SINK,
GST_PAD_ALWAYS,
GST_STATIC_CAPS ("audio/midi")
);
static GstStaticPadTemplate src_factory = GST_STATIC_PAD_TEMPLATE ("src",
GST_PAD_SRC,
GST_PAD_ALWAYS,
GST_STATIC_CAPS ("audio/x-raw-int, "
"rate = (int) 44100, "
"channels = (int) 2, "
"endianness = (int) LITTLE_ENDIAN, "
"width = (int) 16, " "depth = (int) 16, " "signed = (boolean) true"));
GST_BOILERPLATE (GstWildmidi, gst_wildmidi, GstElement, GST_TYPE_ELEMENT);
static void
gst_wildmidi_base_init (gpointer gclass)
{
GstElementClass *element_class = GST_ELEMENT_CLASS (gclass);
gst_element_class_add_pad_template (element_class,
gst_static_pad_template_get (&src_factory));
gst_element_class_add_pad_template (element_class,
gst_static_pad_template_get (&sink_factory));
gst_element_class_set_details (element_class, &gst_wildmidi_details);
}
/* initialize the plugin's class */
static void
gst_wildmidi_class_init (GstWildmidiClass * klass)
{
GObjectClass *gobject_class;
GstElementClass *gstelement_class;
gobject_class = (GObjectClass *) klass;
gstelement_class = (GstElementClass *) klass;
gstelement_class->change_state = gst_wildmidi_change_state;
gobject_class->set_property = gst_wildmidi_set_property;
gobject_class->get_property = gst_wildmidi_get_property;
g_object_class_install_property (gobject_class, ARG_LINEAR_VOLUME,
g_param_spec_boolean ("linear-volume", "Linear volume",
"Linear volume", TRUE, G_PARAM_READWRITE | G_PARAM_CONSTRUCT));
g_object_class_install_property (gobject_class, ARG_HIGH_QUALITY,
g_param_spec_boolean ("high-quality", "High Quality",
"High Quality", TRUE, G_PARAM_READWRITE | G_PARAM_CONSTRUCT));
}
/* initialize the new element
* instantiate pads and add them to element
* set functions
* initialize structure
*/
static void
gst_wildmidi_init (GstWildmidi * filter, GstWildmidiClass * g_class)
{
GstElementClass *klass = GST_ELEMENT_GET_CLASS (filter);
filter->sinkpad =
gst_pad_new_from_template (gst_element_class_get_pad_template (klass,
"sink"), "sink");
gst_pad_set_activatepull_function (filter->sinkpad,
gst_wildmidi_activatepull);
gst_pad_set_activate_function (filter->sinkpad, gst_wildmidi_activate);
gst_pad_set_setcaps_function (filter->sinkpad, gst_pad_set_caps);
gst_pad_use_fixed_caps (filter->sinkpad);
gst_element_add_pad (GST_ELEMENT (filter), filter->sinkpad);
filter->srcpad =
gst_pad_new_from_template (gst_element_class_get_pad_template (klass,
"src"), "src");
gst_pad_set_query_function (filter->srcpad, gst_wildmidi_src_query);
gst_pad_set_event_function (filter->srcpad, gst_wildmidi_src_event);
gst_pad_use_fixed_caps (filter->srcpad);
gst_pad_set_setcaps_function (filter->srcpad, gst_pad_set_caps);
gst_element_add_pad (GST_ELEMENT (filter), filter->srcpad);
gst_segment_init (filter->o_segment, GST_FORMAT_DEFAULT);
filter->bytes_per_frame = WILDMIDI_BPS;
filter->time_per_frame = GST_SECOND / WILDMIDI_RATE;
}
static gboolean
gst_wildmidi_src_convert (GstWildmidi * wildmidi,
GstFormat src_format, gint64 src_value,
GstFormat * dest_format, gint64 * dest_value)
{
gboolean res = TRUE;
gint64 frames;
if (src_format == *dest_format) {
*dest_value = src_value;
goto done;
}
switch (src_format) {
case GST_FORMAT_TIME:
frames = src_value / wildmidi->time_per_frame;
break;
case GST_FORMAT_BYTES:
frames = src_value / (wildmidi->bytes_per_frame);
break;
case GST_FORMAT_DEFAULT:
frames = src_value;
break;
default:
res = FALSE;
goto done;
}
switch (*dest_format) {
case GST_FORMAT_TIME:
*dest_value = frames * wildmidi->time_per_frame;
break;
case GST_FORMAT_BYTES:
*dest_value = frames * wildmidi->bytes_per_frame;
break;
case GST_FORMAT_DEFAULT:
*dest_value = frames;
break;
default:
res = FALSE;
break;
}
done:
return res;
}
static gboolean
gst_wildmidi_src_query (GstPad * pad, GstQuery * query)
{
gboolean res = TRUE;
GstWildmidi *wildmidi = GST_WILDMIDI (gst_pad_get_parent (pad));
GstFormat src_format, dst_format;
gint64 src_value, dst_value;
if (!wildmidi->song) {
gst_object_unref (wildmidi);
return FALSE;
}
switch (GST_QUERY_TYPE (query)) {
case GST_QUERY_DURATION:
gst_query_set_duration (query, GST_FORMAT_TIME,
wildmidi->o_len * wildmidi->time_per_frame);
break;
case GST_QUERY_POSITION:
gst_query_set_position (query, GST_FORMAT_TIME,
wildmidi->o_segment->last_stop * wildmidi->time_per_frame);
break;
case GST_QUERY_CONVERT:
gst_query_parse_convert (query, &src_format, &src_value,
&dst_format, NULL);
res =
gst_wildmidi_src_convert (wildmidi, src_format, src_value,
&dst_format, &dst_value);
if (res)
gst_query_set_convert (query, src_format, src_value, dst_format,
dst_value);
break;
case GST_QUERY_FORMATS:
gst_query_set_formats (query, 3,
GST_FORMAT_TIME, GST_FORMAT_BYTES, GST_FORMAT_DEFAULT);
break;
case GST_QUERY_SEGMENT:
gst_query_set_segment (query, wildmidi->o_segment->rate,
wildmidi->o_segment->format, wildmidi->o_segment->start,
wildmidi->o_segment->stop);
break;
case GST_QUERY_SEEKING:
gst_query_set_seeking (query, wildmidi->o_segment->format,
TRUE, 0, wildmidi->o_len);
break;
default:
res = FALSE;
break;
}
gst_object_unref (wildmidi);
return res;
}
static gboolean
gst_wildmidi_get_upstream_size (GstWildmidi * wildmidi, gint64 * size)
{
GstFormat format = GST_FORMAT_BYTES;
gboolean res = FALSE;
GstPad *peer = gst_pad_get_peer (wildmidi->sinkpad);
if (peer != NULL)
res = gst_pad_query_duration (peer, &format, size) && *size >= 0;
gst_object_unref (peer);
return res;
}
static GstSegment *
gst_wildmidi_get_segment (GstWildmidi * wildmidi, GstFormat format,
gboolean update)
{
gint64 start, stop, time;
GstSegment *segment = gst_segment_new ();
gst_wildmidi_src_convert (wildmidi,
wildmidi->o_segment->format, wildmidi->o_segment->start, &format, &start);
if (wildmidi->o_segment->stop == GST_CLOCK_TIME_NONE) {
stop = GST_CLOCK_TIME_NONE;
} else {
gst_wildmidi_src_convert (wildmidi,
wildmidi->o_segment->format, wildmidi->o_segment->stop, &format, &stop);
}
gst_wildmidi_src_convert (wildmidi,
wildmidi->o_segment->format, wildmidi->o_segment->time, &format, &time);
gst_segment_set_newsegment_full (segment, update,
wildmidi->o_segment->rate, wildmidi->o_segment->applied_rate,
format, start, stop, time);
segment->last_stop = time;
return segment;
}
static GstEvent *
gst_wildmidi_get_new_segment_event (GstWildmidi * wildmidi, GstFormat format,
gboolean update)
{
GstSegment *segment;
GstEvent *event;
segment = gst_wildmidi_get_segment (wildmidi, format, update);
event = gst_event_new_new_segment_full (update,
segment->rate, segment->applied_rate, segment->format,
segment->start, segment->stop, segment->time);
gst_segment_free (segment);
return event;
}
static gboolean
gst_wildmidi_src_event (GstPad * pad, GstEvent * event)
{
gboolean res = FALSE;
GstWildmidi *wildmidi = GST_WILDMIDI (gst_pad_get_parent (pad));
GST_DEBUG_OBJECT (pad, "%s event received", GST_EVENT_TYPE_NAME (event));
switch (GST_EVENT_TYPE (event)) {
case GST_EVENT_SEEK:
{
gdouble rate;
GstFormat src_format, dst_format;
GstSeekFlags flags;
GstSeekType start_type, stop_type;
gint64 orig_start, start, stop;
gboolean flush, update;
if (!wildmidi->song)
break;
gst_event_parse_seek (event, &rate, &src_format, &flags,
&start_type, &orig_start, &stop_type, &stop);
dst_format = GST_FORMAT_DEFAULT;
gst_wildmidi_src_convert (wildmidi, src_format, orig_start,
&dst_format, &start);
gst_wildmidi_src_convert (wildmidi, src_format, stop, &dst_format, &stop);
flush = ((flags & GST_SEEK_FLAG_FLUSH) == GST_SEEK_FLAG_FLUSH);
if (flush) {
GST_DEBUG ("performing flush");
gst_pad_push_event (wildmidi->srcpad, gst_event_new_flush_start ());
} else {
gst_pad_stop_task (wildmidi->sinkpad);
}
GST_PAD_STREAM_LOCK (wildmidi->sinkpad);
if (flush) {
gst_pad_push_event (wildmidi->srcpad, gst_event_new_flush_stop ());
}
gst_segment_set_seek (wildmidi->o_segment, rate, dst_format, flags,
start_type, start, stop_type, stop, &update);
if ((flags && GST_SEEK_FLAG_SEGMENT) == GST_SEEK_FLAG_SEGMENT) {
GST_DEBUG_OBJECT (wildmidi, "received segment seek %d, %d",
(gint) start_type, (gint) stop_type);
} else {
GST_DEBUG_OBJECT (wildmidi, "received normal seek %d",
(gint) start_type);
update = FALSE;
}
gst_pad_push_event (wildmidi->srcpad,
gst_wildmidi_get_new_segment_event (wildmidi, GST_FORMAT_TIME,
update));
wildmidi->o_seek = TRUE;
gst_pad_start_task (wildmidi->sinkpad,
(GstTaskFunction) gst_wildmidi_loop, wildmidi->sinkpad);
GST_PAD_STREAM_UNLOCK (wildmidi->sinkpad);
GST_DEBUG ("seek done");
}
res = TRUE;
break;
default:
break;
}
g_object_unref (wildmidi);
return res;
}
static gboolean
gst_wildmidi_activate (GstPad * sinkpad)
{
if (gst_pad_check_pull_range (sinkpad))
return gst_pad_activate_pull (sinkpad, TRUE);
return FALSE;
}
static gboolean
gst_wildmidi_activatepull (GstPad * pad, gboolean active)
{
if (active) {
return gst_pad_start_task (pad, (GstTaskFunction) gst_wildmidi_loop, pad);
} else {
return gst_pad_stop_task (pad);
}
}
static GstBuffer *
gst_wildmidi_allocate_buffer (GstWildmidi * wildmidi, gint64 samples)
{
return gst_buffer_new_and_alloc (samples * wildmidi->bytes_per_frame);
}
static GstBuffer *
gst_wildmidi_clip_buffer (GstWildmidi * wildmidi, GstBuffer * buffer)
{
gint64 new_start, new_stop;
gint64 offset, length;
GstBuffer *out;
return buffer;
if (!gst_segment_clip (wildmidi->o_segment, GST_FORMAT_DEFAULT,
GST_BUFFER_OFFSET (buffer), GST_BUFFER_OFFSET_END (buffer),
&new_start, &new_stop)) {
gst_buffer_unref (buffer);
return NULL;
}
if (GST_BUFFER_OFFSET (buffer) == new_start &&
GST_BUFFER_OFFSET_END (buffer) == new_stop)
return buffer;
offset = new_start - GST_BUFFER_OFFSET (buffer);
length = new_stop - new_start;
out = gst_buffer_create_sub (buffer, offset * wildmidi->bytes_per_frame,
length * wildmidi->bytes_per_frame);
GST_BUFFER_OFFSET (out) = new_start;
GST_BUFFER_OFFSET_END (out) = new_stop;
GST_BUFFER_TIMESTAMP (out) = new_start * wildmidi->time_per_frame;
GST_BUFFER_DURATION (out) = (new_stop - new_start) * wildmidi->time_per_frame;
gst_buffer_unref (buffer);
return out;
}
/* generate audio data and advance internal timers */
static GstBuffer *
gst_wildmidi_fill_buffer (GstWildmidi * wildmidi, GstBuffer * buffer)
{
size_t bytes_read;
gint64 samples;
bytes_read =
WildMidi_GetOutput (wildmidi->song, (char *) GST_BUFFER_DATA (buffer),
(unsigned long int) GST_BUFFER_SIZE (buffer));
if (bytes_read == 0) {
gst_buffer_unref (buffer);
return NULL;
}
GST_BUFFER_OFFSET (buffer) =
wildmidi->o_segment->last_stop * wildmidi->bytes_per_frame;
GST_BUFFER_TIMESTAMP (buffer) =
wildmidi->o_segment->last_stop * wildmidi->time_per_frame;
if (bytes_read < GST_BUFFER_SIZE (buffer)) {
GstBuffer *old = buffer;
buffer = gst_buffer_create_sub (buffer, 0, bytes_read);
gst_buffer_unref (old);
}
samples = GST_BUFFER_SIZE (buffer) / wildmidi->bytes_per_frame;
wildmidi->o_segment->last_stop += samples;
GST_BUFFER_OFFSET_END (buffer) =
wildmidi->o_segment->last_stop * wildmidi->bytes_per_frame;
GST_BUFFER_DURATION (buffer) = samples * wildmidi->time_per_frame;
GST_DEBUG_OBJECT (wildmidi,
"generated buffer %" GST_TIME_FORMAT "-%" GST_TIME_FORMAT
" (%d samples)",
GST_TIME_ARGS ((guint64) GST_BUFFER_TIMESTAMP (buffer)),
GST_TIME_ARGS (((guint64) (GST_BUFFER_TIMESTAMP (buffer) +
GST_BUFFER_DURATION (buffer)))), samples);
return buffer;
}
static GstBuffer *
gst_wildmidi_get_buffer (GstWildmidi * wildmidi)
{
GstBuffer *out;
out =
gst_wildmidi_fill_buffer (wildmidi,
gst_wildmidi_allocate_buffer (wildmidi, 256));
if (!out)
return NULL;
return gst_wildmidi_clip_buffer (wildmidi, out);
}
static void
gst_wildmidi_loop (GstPad * sinkpad)
{
GstWildmidi *wildmidi = GST_WILDMIDI (GST_PAD_PARENT (sinkpad));
GstBuffer *out;
GstFlowReturn ret;
if (wildmidi->mididata_size == 0) {
if (!gst_wildmidi_get_upstream_size (wildmidi, &wildmidi->mididata_size)) {
GST_ELEMENT_ERROR (wildmidi, STREAM, DECODE, (NULL),
("Unable to get song length"));
goto paused;
}
if (wildmidi->mididata)
free (wildmidi->mididata);
wildmidi->mididata = malloc (wildmidi->mididata_size);
wildmidi->mididata_offset = 0;
return;
}
if (wildmidi->mididata_offset < wildmidi->mididata_size) {
GstBuffer *buffer;
gint64 size;
GST_DEBUG_OBJECT (wildmidi, "loading song");
ret =
gst_pad_pull_range (wildmidi->sinkpad, wildmidi->mididata_offset,
-1, &buffer);
if (ret != GST_FLOW_OK) {
GST_ELEMENT_ERROR (wildmidi, STREAM, DECODE, (NULL),
("Unable to load song"));
goto paused;
}
size = wildmidi->mididata_size - wildmidi->mididata_offset;
if (GST_BUFFER_SIZE (buffer) < size)
size = GST_BUFFER_SIZE (buffer);
memmove (wildmidi->mididata + wildmidi->mididata_offset,
GST_BUFFER_DATA (buffer), size);
gst_buffer_unref (buffer);
wildmidi->mididata_offset += size;
GST_DEBUG_OBJECT (wildmidi, "Song loaded");
return;
}
if (!wildmidi->song) {
struct _WM_Info *info;
GST_DEBUG_OBJECT (wildmidi, "Parsing song");
/* this method takes our memory block */
wildmidi->song =
WildMidi_OpenBuffer ((unsigned char *) wildmidi->mididata,
wildmidi->mididata_size);
wildmidi->mididata_size = 0;
wildmidi->mididata = NULL;
if (!wildmidi->song) {
GST_ELEMENT_ERROR (wildmidi, STREAM, DECODE, (NULL),
("Unable to parse midi"));
goto paused;
}
WildMidi_LoadSamples (wildmidi->song);
WildMidi_SetOption (wildmidi->song, WM_MO_LINEAR_VOLUME,
wildmidi->linear_volume);
WildMidi_SetOption (wildmidi->song, WM_MO_EXPENSIVE_INTERPOLATION,
wildmidi->high_quality);
info = WildMidi_GetInfo (wildmidi->song);
wildmidi->o_len = info->approx_total_samples;
gst_segment_set_newsegment (wildmidi->o_segment, FALSE, 1.0,
GST_FORMAT_DEFAULT, 0, GST_CLOCK_TIME_NONE, 0);
gst_pad_push_event (wildmidi->srcpad,
gst_wildmidi_get_new_segment_event (wildmidi, GST_FORMAT_TIME, FALSE));
GST_DEBUG_OBJECT (wildmidi, "Parsing song done");
return;
}
if (wildmidi->o_segment_changed) {
GST_DEBUG_OBJECT (wildmidi, "segment changed");
GstSegment *segment = gst_wildmidi_get_segment (wildmidi, GST_FORMAT_TIME,
!wildmidi->o_new_segment);
GST_LOG_OBJECT (wildmidi,
"sending newsegment from %" GST_TIME_FORMAT "-%" GST_TIME_FORMAT
", pos=%" GST_TIME_FORMAT, GST_TIME_ARGS ((guint64) segment->start),
GST_TIME_ARGS ((guint64) segment->stop),
GST_TIME_ARGS ((guint64) segment->time));
if (wildmidi->o_segment->flags & GST_SEEK_FLAG_SEGMENT) {
gst_element_post_message (GST_ELEMENT (wildmidi),
gst_message_new_segment_start (GST_OBJECT (wildmidi),
segment->format, segment->start));
}
gst_segment_free (segment);
wildmidi->o_segment_changed = FALSE;
return;
}
if (wildmidi->o_seek) {
unsigned long int sample;
/* perform a seek internally */
sample = wildmidi->o_segment->time;
if (wildmidi->accurate_seek) {
WildMidi_SampledSeek (wildmidi->song, &sample);
} else {
WildMidi_FastSeek (wildmidi->song, &sample);
}
wildmidi->o_segment->last_stop = wildmidi->o_segment->time = sample;
}
out = gst_wildmidi_get_buffer (wildmidi);
if (!out) {
GST_LOG_OBJECT (wildmidi, "Song ended, generating eos");
gst_pad_push_event (wildmidi->srcpad, gst_event_new_eos ());
wildmidi->o_seek = FALSE;
goto paused;
}
if (wildmidi->o_seek) {
GST_BUFFER_FLAG_SET (out, GST_BUFFER_FLAG_DISCONT);
wildmidi->o_seek = FALSE;
}
gst_buffer_set_caps (out, wildmidi->out_caps);
ret = gst_pad_push (wildmidi->srcpad, out);
if (ret == GST_FLOW_OK)
return;
if (GST_FLOW_IS_FATAL (ret)) {
GST_ELEMENT_ERROR (wildmidi, STREAM, FAILED,
("Internal data stream error XXX"),
("Streaming stopped, reason %s", gst_flow_get_name (ret)));
}
paused:
GST_LOG_OBJECT (wildmidi, "pausing task");
gst_pad_pause_task (wildmidi->sinkpad);
}
static GstStateChangeReturn
gst_wildmidi_change_state (GstElement * element, GstStateChange transition)
{
GstStateChangeReturn ret = GST_STATE_CHANGE_SUCCESS;
GstWildmidi *wildmidi = GST_WILDMIDI (element);
switch (transition) {
case GST_STATE_CHANGE_NULL_TO_READY:
wildmidi->out_caps =
gst_caps_copy (gst_pad_get_pad_template_caps (wildmidi->srcpad));
wildmidi->mididata = NULL;
break;
case GST_STATE_CHANGE_READY_TO_PAUSED:
wildmidi->mididata_size = 0;
break;
case GST_STATE_CHANGE_PAUSED_TO_PLAYING:
break;
default:
break;
}
ret = GST_ELEMENT_CLASS (parent_class)->change_state (element, transition);
switch (transition) {
case GST_STATE_CHANGE_PLAYING_TO_PAUSED:
break;
case GST_STATE_CHANGE_PAUSED_TO_READY:
if (wildmidi->song)
WildMidi_Close (wildmidi->song);
wildmidi->song = NULL;
if (wildmidi->mididata)
free (wildmidi->mididata);
wildmidi->mididata = NULL;
break;
case GST_STATE_CHANGE_READY_TO_NULL:
gst_caps_unref (wildmidi->out_caps);
break;
default:
break;
}
return ret;
}
static void
gst_wildmidi_set_property (GObject * object, guint prop_id,
const GValue * value, GParamSpec * pspec)
{
GstWildmidi *wildmidi;
g_return_if_fail (GST_IS_WILDMIDI (object));
wildmidi = GST_WILDMIDI (object);
switch (prop_id) {
case ARG_LINEAR_VOLUME:
wildmidi->linear_volume = g_value_get_boolean (value);
if (wildmidi->song)
WildMidi_SetOption (wildmidi->song, WM_MO_LINEAR_VOLUME,
wildmidi->linear_volume);
break;
case ARG_HIGH_QUALITY:
wildmidi->high_quality = g_value_get_boolean (value);
if (wildmidi->song)
WildMidi_SetOption (wildmidi->song, WM_MO_EXPENSIVE_INTERPOLATION,
wildmidi->high_quality);
break;
default:
G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
break;
}
}
static void
gst_wildmidi_get_property (GObject * object, guint prop_id,
GValue * value, GParamSpec * pspec)
{
GstWildmidi *wildmidi;
g_return_if_fail (GST_IS_WILDMIDI (object));
wildmidi = GST_WILDMIDI (object);
switch (prop_id) {
case ARG_LINEAR_VOLUME:
g_value_set_boolean (value, wildmidi->linear_volume);
break;
case ARG_HIGH_QUALITY:
g_value_set_boolean (value, wildmidi->high_quality);
break;
default:
G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
break;
}
}
/*
* http://jedi.ks.uiuc.edu/~johns/links/music/midifile.html
*/
static void
gst_wildmidi_typefind (GstTypeFind * tf, gpointer _data)
{
guint8 *data = gst_type_find_peek (tf, 0, 4);
if (data && data[0] == 'M' && data[1] == 'T' && data[2] == 'h'
&& data[3] == 'd') {
gst_type_find_suggest (tf, GST_TYPE_FIND_MAXIMUM,
gst_caps_new_simple ("audio/midi", NULL));
}
}
static gboolean
wildmidi_open_config ()
{
gchar *path = g_strdup (g_getenv ("WILDMIDI_CFG"));
gint ret;
GST_DEBUG ("trying %s", path);
if (path && (g_access (path, R_OK) == -1)) {
g_free (path);
path = NULL;
}
if (path == NULL) {
path =
g_build_path (G_DIR_SEPARATOR_S, g_get_home_dir (), ".wildmidirc",
NULL);
GST_DEBUG ("trying %s", path);
if (path && (g_access (path, R_OK) == -1)) {
g_free (path);
path = NULL;
}
}
if (path == NULL) {
path = g_build_path (G_DIR_SEPARATOR_S, "/etc", "wildmidi.cfg", NULL);
GST_DEBUG ("trying %s", path);
if (path && (g_access (path, R_OK) == -1)) {
g_free (path);
path = NULL;
}
}
if (path == NULL) {
/* I've created a symlink to get it playing
* ln -s /usr/share/timidity/timidity.cfg /etc/wildmidi.cfg
* we could make it use : TIMIDITY_CFG
* but unfortunately it fails to create a proper filename if the config
* has a redirect
* http://sourceforge.net/tracker/index.php?func=detail&aid=1657358&group_id=42635&atid=433744
*/
GST_INFO ("no config file");
return FALSE;
}
ret = WildMidi_Init (path, WILDMIDI_RATE, 0);
g_free (path);
return (ret == 0);
}
static gboolean
plugin_init (GstPlugin * plugin)
{
static gchar *exts[] = { "mid", "midi", NULL };
/* exchange the strings 'plugin' and 'Template plugin' with your
* plugin name and description */
GST_DEBUG_CATEGORY_INIT (gst_wildmidi_debug, "wildmidi",
0, "Wildmidi plugin");
/* initialise wildmidi library, fail loading the plugin if this fails */
if (!wildmidi_open_config ()) {
GST_WARNING ("can't initialize wildmidi");
return FALSE;
}
if (!gst_type_find_register (plugin, "audio/midi", GST_RANK_SECONDARY,
gst_wildmidi_typefind, exts,
gst_caps_new_simple ("audio/midi", NULL), NULL, NULL)) {
GST_WARNING ("can't register typefind");
return FALSE;
}
return gst_element_register (plugin, "wildmidi",
GST_RANK_SECONDARY, GST_TYPE_WILDMIDI);
}
GST_PLUGIN_DEFINE (GST_VERSION_MAJOR,
GST_VERSION_MINOR,
"wildmidi",
"Wildmidi Plugin",
plugin_init, VERSION, "LGPL", "GStreamer", "http://gstreamer.net/")

88
ext/timidity/gstwildmidi.h Normal file
View file

@ -0,0 +1,88 @@
/*
* gsttimdity - timidity plugin for gstreamer
*
* Copyright 2007 Wouter Paesen <wouter@blue-gate.be>
*
* 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.
*
* Wrapper element for libtimidity. This element works in pull
* based mode because that's essentially how libwildmidi works.
* We create a libwildmidi stream that operates on the srcpad.
* The sinkpad is in pull mode.
*/
#ifndef __GST_WILDMIDI_H__
#define __GST_WILDMIDI_H__
#include <gst/gst.h>
#include <gst/base/gstadapter.h>
#include <wildmidi_lib.h>
G_BEGIN_DECLS
#define GST_TYPE_WILDMIDI \
(gst_wildmidi_get_type())
#define GST_WILDMIDI(obj) \
(G_TYPE_CHECK_INSTANCE_CAST((obj),GST_TYPE_WILDMIDI,GstWildmidi))
#define GST_WILDMIDI_CLASS(klass) \
(G_TYPE_CHECK_CLASS_CAST((klass),GST_TYPE_WILDMIDI,GstWildmidiClass))
#define GST_IS_WILDMIDI(obj) \
(G_TYPE_CHECK_INSTANCE_TYPE((obj),GST_TYPE_WILDMIDI))
#define GST_IS_WILDMIDI_CLASS(klass) \
(G_TYPE_CHECK_CLASS_TYPE((klass),GST_TYPE_WILDMIDI))
typedef struct _GstWildmidi GstWildmidi;
typedef struct _GstWildmidiClass GstWildmidiClass;
struct _GstWildmidi
{
GstElement element;
GstPad *sinkpad, *srcpad;
/* input stream properties */
gint64 mididata_size, mididata_offset;
gchar *mididata;
gboolean mididata_filled;
midi *song;
/* output data */
gboolean o_new_segment, o_segment_changed, o_seek;
GstSegment o_segment[1];
gint64 o_len;
/* format of the stream */
gint64 bytes_per_frame;
GstClockTime time_per_frame;
/* options */
gboolean accurate_seek;
/* wildmidi settings */
gboolean high_quality;
gboolean linear_volume;
GstCaps *out_caps;
};
struct _GstWildmidiClass
{
GstElementClass parent_class;
};
GType gst_wildmidi_get_type (void);
G_END_DECLS
#endif /* __GST_WILDMIDI_H__ */