Commit df078d98 authored by Christian Schaller's avatar Christian Schaller
Browse files

adding NAS plugin

Original commit message from CVS:
adding NAS plugin
parent d5db8ac2
2004-01-21 Christian Schaller <uraeus@gnome.org>
* ext/nas/
Add libnas (network audio system) plugin, patch from Arwed von Merkatz
based on earlier patch from Laurent Vivier
2004-01-20 Jeremy Simon <jesimon@libertysurf.fr>
* ext/ffmpeg/gstffmpegcodecmap.c: (gst_ffmpeg_caps_to_extradata):
......
......@@ -25,8 +25,8 @@ SUBDIRS=gst-libs \
po \
pkgconfig
DIST_SUBDIRS=gst-libs \
gst sys ext \
DIST_SUBDIRS=ext gst-libs \
gst sys \
examples \
tools \
gconf \
......
......@@ -38,3 +38,5 @@
* check if we can drop some of the AC_SUBST's for libs and cflags
* the mikmod author needs to drop the lib from the name ;)
* Port wavparse plugin to use our rifflib - Ask Ronald Bultje for details
......@@ -1219,6 +1219,21 @@ GST_CHECK_FEATURE(MUSICBRAINZ, [musicbrainz], musicbrainz, [
AC_SUBST(MUSICBRAINZ_LIBS)
])
dnl *** nas ***
translit(dnm, m, l) AM_CONDITIONAL(USE_NAS, true)
GST_CHECK_FEATURE(NAS, [nas plug-in], nassink, [
HAVE_NAS="no"
if test "x$HAVE_X" = "xyes"; then
save_cppflags=$CFLAGS
CPPFLAGS="$CPPFLAGS $X_CFLAGS"
GST_CHECK_LIBHEADER(NAS, audio, AuOpenServer, $X_LIBS, audio/audiolib.h,
NAS_LIBS="$X_LIBS -laudio" NAS_CFLAGS="$X_CFLAGS")
CPPFLAGS="$save_cppflags"
fi
AC_SUBST(NAS_CFLAGS)
AC_SUBST(NAS_LIBS)
])
dnl *** pango ***
translit(dnm, m, l) AM_CONDITIONAL(USE_PANGO, true)
GST_CHECK_FEATURE(PANGO, [pango], pango, [
......@@ -1659,6 +1674,7 @@ ext/mpeg2dec/Makefile
ext/mpeg2enc/Makefile
ext/mplex/Makefile
ext/musicbrainz/Makefile
ext/nas/Makefile
ext/ogg/Makefile
ext/pango/Makefile
ext/raw1394/Makefile
......
......@@ -82,6 +82,12 @@ else
FAAD_DIR=
endif
if USE_NAS
NAS_DIR=nas
else
NAS_DIR=
endif
## if USE_FESTIVAL
## FESTIVAL_DIR=festival
## else
......@@ -322,6 +328,7 @@ SUBDIRS=\
$(DVDREAD_DIR) \
$(DVDNAV_DIR) \
$(ESD_DIR) \
$(NAS_DIR) \
$(FAAC_DIR) \
$(FAAD_DIR) \
$(FFMPEG_DIR) \
......@@ -376,6 +383,7 @@ DIST_SUBDIRS=\
dvdread \
dvdnav \
esd \
nas \
mas \
faac \
faad \
......@@ -401,6 +409,7 @@ DIST_SUBDIRS=\
mpeg2enc \
mplex \
musicbrainz \
nas \
ogg \
pango \
raw1394 \
......
plugin_LTLIBRARIES = libgstnassink.la
libgstnassink_la_SOURCES = nassink.c
libgstnassink_la_CFLAGS = $(GST_CFLAGS) $(NAS_CFLAGS)
libgstnassink_la_LIBADD = $(NAS_LIBS)
libgstnassink_la_LDFLAGS = $(GST_PLUGIN_LDFLAGS)
noinst_HEADERS = nassink.h
EXTRA_DIST = README
The nassink plugin
==================
The nassink plugin is for outputting an audio stream to a Network Audio Server (NCD X/Terminal)
nassink has arguments that it accepts:
- 'mute' (boolean value)
- 'host' (name of X/Terminal, default is $AUDIOSERVER or $DISPLAY)
/* GStreamer
* Copyright (C) <2003> Laurent Vivier <Laurent.Vivier@bull.net>
* Copyright (C) <2004> Arwed v. Merkatz <v.merkatz@gmx.net>
*
* Based on esdsink.c:
* Copyright (C) <2001> Richard Boulton <richard-gst@tartarus.org>
*
* 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
#include <gst/gst.h>
#include <string.h>
#include <audio/audiolib.h>
#include <audio/soundlib.h>
#include "nassink.h"
#define NAS_SOUND_PORT_DURATION (2)
/* Signals and args */
enum {
/* FILL ME */
LAST_SIGNAL
};
enum {
ARG_0,
ARG_MUTE,
ARG_HOST
};
static GstStaticPadTemplate sink_factory =
GST_STATIC_PAD_TEMPLATE (
"sink",
GST_PAD_SINK,
GST_PAD_ALWAYS,
GST_STATIC_CAPS(
"audio/x-raw-int, "
"endianess = (int) BYTE_ORDER, "
"signed = (boolean) TRUE, "
"width = (int) 16, "
"depth = (int) 16, "
"rate = (int) [ 8000, 96000 ], "
"channels = (int) [ 1, 2 ]; "
"audio/x-raw-int, "
"signed = (boolean) FALSE, "
"width = (int) 8, "
"depth = (int) 8, "
"rate = (int) [ 8000, 96000 ], "
"channels = (int) [ 1, 2 ]"
)
);
static void gst_nassink_base_init (gpointer g_class);
static void gst_nassink_class_init (GstNassinkClass *klass);
static void gst_nassink_init (GstNassink *nassink);
static gboolean gst_nassink_open_audio (GstNassink *sink);
static void gst_nassink_close_audio (GstNassink *sink);
static GstElementStateReturn gst_nassink_change_state (GstElement *element);
static gboolean gst_nassink_sync_parms (GstNassink *nassink);
static GstPadLinkReturn gst_nassink_sinkconnect (GstPad *pad, const GstCaps *caps);
static void gst_nassink_chain (GstPad *pad, GstData *_data);
static void gst_nassink_set_property (GObject *object, guint prop_id,
const GValue *value, GParamSpec *pspec);
static void gst_nassink_get_property (GObject *object, guint prop_id,
GValue *value, GParamSpec *pspec);
static void NAS_flush (GstNassink *sink);
static void NAS_sendData (GstNassink *sink, AuUint32 numBytes);
static AuBool NAS_EventHandler (AuServer *aud, AuEvent *ev, AuEventHandlerRec *handler);
static AuDeviceID NAS_getDevice (AuServer* aud, int numTracks);
static int NAS_allocBuffer (GstNassink *sink);
static int NAS_createFlow (GstNassink *sink, unsigned char format, unsigned short rate, int numTracks);
static GstElementClass *parent_class = NULL;
GType
gst_nassink_get_type (void)
{
static GType nassink_type = 0;
if (!nassink_type) {
static const GTypeInfo nassink_info = {
sizeof(GstNassinkClass),
gst_nassink_base_init,
NULL,
(GClassInitFunc)gst_nassink_class_init,
NULL,
NULL,
sizeof(GstNassink),
0,
(GInstanceInitFunc)gst_nassink_init,
};
nassink_type = g_type_register_static(GST_TYPE_ELEMENT, "GstNassink", &nassink_info, 0);
}
return nassink_type;
}
static void
gst_nassink_base_init (gpointer g_class)
{
static GstElementDetails nassink_details = {
"NAS sink",
"Sink/Audio",
"Plays audio to a Network Audio Server",
"Laurent Vivier <Laurent.Vivier@bull.net>, "
"Arwed v. Merkatz <v.merkatz@gmx.net>"
};
GstElementClass *element_class = GST_ELEMENT_CLASS (g_class);
gst_element_class_add_pad_template (element_class,
gst_static_pad_template_get (&sink_factory));
gst_element_class_set_details (element_class, &nassink_details);
}
static void
gst_nassink_class_init (GstNassinkClass *klass)
{
GObjectClass *gobject_class;
GstElementClass *gstelement_class;
gobject_class = (GObjectClass*)klass;
gstelement_class = (GstElementClass*)klass;
if (parent_class == NULL)
parent_class = g_type_class_ref(GST_TYPE_ELEMENT);
gobject_class->set_property = gst_nassink_set_property;
gobject_class->get_property = gst_nassink_get_property;
g_object_class_install_property(G_OBJECT_CLASS(klass), ARG_MUTE,
g_param_spec_boolean("mute","mute","mute",
TRUE,G_PARAM_READWRITE)); /* CHECKME */
g_object_class_install_property(G_OBJECT_CLASS(klass), ARG_HOST,
g_param_spec_string("host","host","host",
NULL, G_PARAM_READWRITE)); /* CHECKME */
gstelement_class->change_state = gst_nassink_change_state;
}
static void
gst_nassink_init(GstNassink *nassink)
{
nassink->sinkpad = gst_pad_new_from_template (
gst_static_pad_template_get (&sink_factory), "sink");
gst_element_add_pad(GST_ELEMENT(nassink), nassink->sinkpad);
gst_pad_set_chain_function(nassink->sinkpad, GST_DEBUG_FUNCPTR(gst_nassink_chain));
gst_pad_set_link_function(nassink->sinkpad, gst_nassink_sinkconnect);
nassink->mute = FALSE;
nassink->depth = 16;
nassink->tracks = 2;
nassink->rate = 44100;
nassink->host = g_strdup (getenv("AUDIOSERVER"));
if (nassink->host == NULL)
nassink->host = g_strdup (getenv("DISPLAY"));
nassink->audio = NULL;
nassink->flow = AuNone;
nassink->size = 0;
nassink->pos = 0;
nassink->buf = NULL;
}
static gboolean
gst_nassink_sync_parms (GstNassink *nassink)
{
gint ret;
unsigned char format;
g_return_val_if_fail (nassink != NULL, FALSE);
g_return_val_if_fail (GST_IS_NASSINK (nassink), FALSE);
if (nassink->audio == NULL) return TRUE;
if (nassink->flow != AuNone)
{
while (nassink->pos && nassink->buf)
NAS_flush(nassink);
AuStopFlow( nassink->audio, nassink->flow, NULL);
AuReleaseScratchFlow(nassink->audio, nassink->flow, NULL);
nassink->flow = AuNone;
}
if (nassink->depth == 16)
#if G_BYTE_ORDER == G_BIG_ENDIAN
format = AuFormatLinearSigned16MSB;
#else
format = AuFormatLinearSigned16LSB;
#endif
else
format = AuFormatLinearUnsigned8;
ret = NAS_createFlow(nassink, format, nassink->rate, nassink->tracks);
return ret >= 0;
}
static GstPadLinkReturn
gst_nassink_sinkconnect (GstPad *pad, const GstCaps *caps)
{
GstNassink *nassink;
GstStructure *structure;
nassink = GST_NASSINK (gst_pad_get_parent (pad));
structure = gst_caps_get_structure (caps, 0);
gst_structure_get_int (structure, "depth", &nassink->depth);
gst_structure_get_int (structure, "channels", &nassink->tracks);
gst_structure_get_int (structure, "rate", &nassink->rate);
if (!gst_nassink_sync_parms(nassink))
return GST_PAD_LINK_REFUSED;
return GST_PAD_LINK_OK;
}
static void
gst_nassink_chain (GstPad *pad, GstData *_data)
{
GstBuffer *buf = GST_BUFFER (_data);
int pos = 0;
int remaining;
int available;
GstNassink *nassink;
g_return_if_fail(pad != NULL);
g_return_if_fail(GST_IS_PAD(pad));
g_return_if_fail(buf != NULL);
nassink = GST_NASSINK (gst_pad_get_parent (pad));
g_return_if_fail(nassink->buf != NULL);
if (GST_BUFFER_DATA (buf) != NULL) {
if (!nassink->mute && nassink->audio != NULL) {
GST_DEBUG ("nassink: data=%p size=%d", GST_BUFFER_DATA (buf), GST_BUFFER_SIZE (buf));
remaining = GST_BUFFER_SIZE (buf);
while ((nassink->flow != AuNone) && ( remaining > 0)) {
/* number of bytes we can copy to buffer */
available = remaining > nassink->size - nassink->pos ?
nassink->size - nassink->pos : remaining;
/* fill the buffer */
memcpy (nassink->buf + nassink->pos, GST_BUFFER_DATA (buf) + pos, available);
nassink->pos += available;
pos += available;
remaining -= available;
/* if we have more bytes, need to flush the buffer */
if (remaining > 0) {
while ((nassink->flow != AuNone) && (nassink->pos == nassink->size)) {
NAS_flush(nassink);
}
}
}
/* give some time to event handler */
AuSync(nassink->audio, AuFalse);
}
}
gst_buffer_unref (buf);
}
static void
gst_nassink_set_property (GObject *object, guint prop_id, const GValue *value, GParamSpec *pspec)
{
GstNassink *nassink;
/* it's not null if we got it, but it might not be ours */
g_return_if_fail(GST_IS_NASSINK(object));
nassink = GST_NASSINK(object);
switch (prop_id) {
case ARG_MUTE:
nassink->mute = g_value_get_boolean (value);
break;
case ARG_HOST:
if (nassink->host != NULL) g_free(nassink->host);
if (g_value_get_string (value) == NULL)
nassink->host = NULL;
else
nassink->host = g_strdup (g_value_get_string (value));
break;
default:
G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
break;
}
}
static void
gst_nassink_get_property (GObject *object, guint prop_id, GValue *value, GParamSpec *pspec)
{
GstNassink *nassink;
g_return_if_fail(GST_IS_NASSINK(object));
nassink = GST_NASSINK(object);
switch (prop_id) {
case ARG_MUTE:
g_value_set_boolean (value, nassink->mute);
break;
case ARG_HOST:
g_value_set_string (value, nassink->host);
break;
default:
G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
break;
}
}
static gboolean
plugin_init (GstPlugin *plugin)
{
if (!gst_element_register (plugin, "nassink", GST_RANK_NONE,
GST_TYPE_NASSINK)){
return FALSE;
}
return TRUE;
}
GST_PLUGIN_DEFINE (
GST_VERSION_MAJOR,
GST_VERSION_MINOR,
"nassink",
"uses NAS for audio output",
plugin_init,
VERSION,
"LGPL",
GST_PACKAGE,
GST_ORIGIN
);
static gboolean
gst_nassink_open_audio (GstNassink *sink)
{
/* Open Server */
sink->audio = AuOpenServer(sink->host, 0, NULL, 0, NULL, NULL);
if (sink->audio == NULL)
return FALSE;
sink->flow = AuNone;
sink->size = 0;
sink->pos = 0;
sink->buf = NULL;
/* Start a flow */
GST_FLAG_SET (sink, GST_NASSINK_OPEN);
return TRUE;
}
static void
gst_nassink_close_audio (GstNassink *sink)
{
if (sink->audio == NULL) return;
if (sink->flow != AuNone) {
while (sink->pos && sink->buf) {
NAS_flush(sink);
}
AuStopFlow( sink->audio, sink->flow, NULL);
AuReleaseScratchFlow(sink->audio, sink->flow, NULL);
sink->flow = AuNone;
}
if (sink->buf != NULL)
{
free(sink->buf);
sink->buf = NULL;
}
AuCloseServer(sink->audio);
sink->audio = NULL;
GST_FLAG_UNSET (sink, GST_NASSINK_OPEN);
GST_DEBUG ("nassink: closed sound device");
}
static GstElementStateReturn
gst_nassink_change_state (GstElement *element)
{
GstNassink *nassink;
g_return_val_if_fail (GST_IS_NASSINK (element), FALSE);
nassink = GST_NASSINK (element);
switch (GST_STATE_PENDING (element)) {
case GST_STATE_NULL:
if (GST_FLAG_IS_SET (element, GST_NASSINK_OPEN))
gst_nassink_close_audio (nassink);
break;
case GST_STATE_READY:
if (!GST_FLAG_IS_SET (element, GST_NASSINK_OPEN))
gst_nassink_open_audio (nassink);
break;
case GST_STATE_PAUSED:
while (nassink->pos && nassink->buf)
NAS_flush(nassink);
break;
case GST_STATE_PLAYING:
break;
}
if (GST_ELEMENT_CLASS (parent_class)->change_state)
return GST_ELEMENT_CLASS (parent_class)->change_state (element);
return GST_STATE_SUCCESS;
}
static void
NAS_flush(GstNassink *sink)
{
AuEvent ev;
AuNextEvent(sink->audio, AuTrue, &ev);
AuDispatchEvent(sink->audio, &ev);
}
static void
NAS_sendData(GstNassink *sink, AuUint32 numBytes)
{
if (numBytes < (sink->pos)) {
AuWriteElement(sink->audio, sink->flow, 0,
numBytes, sink->buf, AuFalse, NULL);
memmove(sink->buf, sink->buf + numBytes,
sink->pos - numBytes);
sink->pos = sink->pos - numBytes;
} else
{
AuWriteElement(sink->audio, sink->flow, 0,
sink->pos, sink->buf,
(numBytes > sink->pos), NULL);
sink->pos = 0;
}
}
static AuBool
NAS_EventHandler(AuServer *aud, AuEvent *ev, AuEventHandlerRec *handler)
{
GstNassink *sink = (GstNassink *)handler->data;
AuElementNotifyEvent *notify;
switch (ev->type) {
case AuEventTypeElementNotify:
notify = (AuElementNotifyEvent *) ev;
switch(notify->kind) {
case AuElementNotifyKindLowWater:
NAS_sendData(sink, notify->num_bytes);
break;
case AuElementNotifyKindState:
switch(notify->cur_state) {
case AuStateStop:
if (sink->flow != AuNone) {
if (notify->reason == AuReasonEOF)
AuStopFlow(handler->aud, sink->flow, NULL);
AuReleaseScratchFlow(handler->aud, sink->flow, NULL);
sink->flow = AuNone;
}
AuUnregisterEventHandler(handler->aud, handler);
break;
case AuStatePause:
switch(notify->reason) {
case AuReasonUnderrun:
case AuReasonOverrun:
case AuReasonEOF:
case AuReasonWatermark: