sys/sunaudio/Makefile.am: Add sunaudiosrc patch from Bala

Original commit message from CVS:
* sys/sunaudio/Makefile.am: Add sunaudiosrc patch from Bala
* sys/sunaudio/gstsunaudiosrc.c:
* sys/sunaudio/gstsunaudiosrc.h:

3 files changed, 495 insertions, 0 deletions

diff --git a/sys/sunaudio/Makefile.am b/sys/sunaudio/Makefile.am
index 5773575f..fff46318 100644
--- a/sys/sunaudio/Makefile.am
+++ b/sys/sunaudio/Makefile.am
@@ -1,6 +1,7 @@
 plugin_LTLIBRARIES = libgstsunaudio.la
 
 libgstsunaudio_la_SOURCES = gstsunaudio.c   \
+			    gstsunaudiosrc.c \
                             gstsunelement.c \
                             gstsunmixer.c
 
@@ -10,5 +11,6 @@ libgstsunaudio_la_LIBADD = $(top_builddir)/gst-libs/gst/libgstinterfaces-@GST_MA
 libgstsunaudio_la_LDFLAGS = $(GST_PLUGIN_LDFLAGS)
 
 noinst_HEADERS = gstsunelement.h \
+		 gstsunaudiosrc.h \
                  gstsunmixer.h
 
diff --git a/sys/sunaudio/gstsunaudiosrc.c b/sys/sunaudio/gstsunaudiosrc.c
new file mode 100644
index 00000000..cf89592b
--- /dev/null
+++ b/sys/sunaudio/gstsunaudiosrc.c
@@ -0,0 +1,419 @@
+/* GStreamer
+ * Copyright (C) 1999,2000 Erik Walthinsen <omega@cse.ogi.edu>
+ *                    2000 Wim Taymans <wtay@chello.be>
+ *
+ * gstsunaudiosrc.c:
+ *
+ * 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 <fcntl.h>
+#include <unistd.h>
+#include <string.h>
+#include <sys/audioio.h>
+
+#include <gstsunaudiosrc.h>
+#include <gstsunelement.h>
+
+/* elementfactory information */
+static GstElementDetails gst_sunaudiosrc_details =
+GST_ELEMENT_DETAILS ("SunAudioSource",
+    "Source/Audio",
+    "Audio source for Sun Audio devices",
+    "Balamurali Viswanathan <balamurali.viswanathan@wipro.com>");
+
+enum
+{
+  ARG_0,
+  ARG_DEVICE,
+  ARG_BUFFER_SIZE
+};
+
+/*Pending Bala check this template */
+static GstStaticPadTemplate gst_sunaudiosrc_src_factory =
+GST_STATIC_PAD_TEMPLATE ("src",
+    GST_PAD_SRC,
+    GST_PAD_ALWAYS,
+    GST_STATIC_CAPS ("audio/x-raw-int, "
+        "endianness = (int) BYTE_ORDER, "
+        "signed = (boolean) TRUE, "
+        "width = (int) 16, "
+        "depth = (int) 16, "
+        "rate = (int) [ 5510, 48000 ], " "channels = (int) [ 1, 2 ]")
+    );
+
+static void gst_sunaudiosrc_base_init (gpointer g_class);
+static void gst_sunaudiosrc_class_init (GstSunAudioSrcClass * klass);
+static void gst_sunaudiosrc_init (GstSunAudioSrc * sunaudiosrc);
+
+static void gst_sunaudiosrc_set_property (GObject * object, guint prop_id,
+    const GValue * value, GParamSpec * pspec);
+static void gst_sunaudiosrc_get_property (GObject * object, guint prop_id,
+    GValue * value, GParamSpec * pspec);
+
+static GstElementStateReturn gst_sunaudiosrc_change_state (GstElement *
+    element);
+
+static gboolean gst_sunaudiosrc_setparams (GstSunAudioSrc * sunaudiosrc);
+static GstData *gst_sunaudiosrc_get (GstPad * pad);
+static GstCaps *gst_sunaudiosrc_getcaps (GstPad * pad);
+static GstPadLinkReturn gst_sunaudiosrc_pad_link (GstPad * pad,
+    const GstCaps * caps);
+
+static gboolean gst_sunaudiosrc_open (GstSunAudioSrc * sunaudiosrc);
+static void gst_sunaudiosrc_close (GstSunAudioSrc * sunaudiosrc);
+
+static GstElementClass *parent_class = NULL;
+
+GType
+gst_sunaudiosrc_get_type (void)
+{
+  static GType sunaudiosrc_type = 0;
+
+  if (!sunaudiosrc_type) {
+    static const GTypeInfo sunaudiosrc_info = {
+      sizeof (GstSunAudioSrcClass),
+      gst_sunaudiosrc_base_init,
+      NULL,
+      (GClassInitFunc) gst_sunaudiosrc_class_init,
+      NULL,
+      NULL,
+      sizeof (GstSunAudioSrc),
+      0,
+      (GInstanceInitFunc) gst_sunaudiosrc_init,
+    };
+
+    sunaudiosrc_type = g_type_register_static (GST_TYPE_SUNAUDIOELEMENT,
+        "GstSunAudioSrc", &sunaudiosrc_info, 0);
+  }
+  return sunaudiosrc_type;
+}
+
+static void
+gst_sunaudiosrc_base_init (gpointer g_class)
+{
+  GstElementClass *element_class = GST_ELEMENT_CLASS (g_class);
+
+  gst_element_class_set_details (element_class, &gst_sunaudiosrc_details);
+  gst_element_class_add_pad_template (element_class,
+      gst_static_pad_template_get (&gst_sunaudiosrc_src_factory));
+}
+
+static void
+gst_sunaudiosrc_class_init (GstSunAudioSrcClass * klass)
+{
+  GObjectClass *gobject_class;
+  GstElementClass *gstelement_class;
+
+  gobject_class = (GObjectClass *) klass;
+  gstelement_class = (GstElementClass *) klass;
+
+  parent_class = g_type_class_ref (GST_TYPE_SUNAUDIOELEMENT);
+
+  gobject_class->set_property = gst_sunaudiosrc_set_property;
+  gobject_class->get_property = gst_sunaudiosrc_get_property;
+
+  gstelement_class->change_state = gst_sunaudiosrc_change_state;
+
+  g_object_class_install_property (gobject_class, ARG_DEVICE,
+      g_param_spec_string ("device", "Device", "Audio Device (/dev/audio)",
+          "/dev/audio", G_PARAM_READWRITE));
+  g_object_class_install_property (gobject_class, ARG_BUFFER_SIZE,
+      g_param_spec_int ("buffer_size", "Buffer Size", "Buffer Size",
+          1, G_MAXINT, 64, G_PARAM_READWRITE));
+
+}
+
+
+static void
+gst_sunaudiosrc_init (GstSunAudioSrc * sunaudiosrc)
+{
+  const char *audiodev;
+
+  sunaudiosrc->srcpad =
+      gst_pad_new_from_template (gst_static_pad_template_get
+      (&gst_sunaudiosrc_src_factory), "src");
+
+  gst_pad_set_get_function (sunaudiosrc->srcpad, gst_sunaudiosrc_get);
+  gst_pad_set_getcaps_function (sunaudiosrc->srcpad, gst_sunaudiosrc_getcaps);
+  gst_pad_set_link_function (sunaudiosrc->srcpad, gst_sunaudiosrc_pad_link);
+
+  gst_element_add_pad (GST_ELEMENT (sunaudiosrc), sunaudiosrc->srcpad);
+
+  sunaudiosrc->buffer_size = 64;
+
+  audiodev = g_getenv ("AUDIODEV");
+  if (audiodev == NULL)
+    audiodev = "/dev/audio";
+  sunaudiosrc->device = g_strdup (audiodev);
+
+}
+
+static void
+gst_sunaudiosrc_set_property (GObject * object, guint prop_id,
+    const GValue * value, GParamSpec * pspec)
+{
+  GstSunAudioSrc *sunaudiosrc;
+
+  g_return_if_fail (GST_IS_SUNAUDIOSRC (object));
+  sunaudiosrc = GST_SUNAUDIOSRC (object);
+
+  switch (prop_id) {
+    case ARG_DEVICE:
+      if (gst_element_get_state (GST_ELEMENT (sunaudiosrc)) == GST_STATE_NULL) {
+        g_free (sunaudiosrc->device);
+        sunaudiosrc->device = g_strdup (g_value_get_string (value));
+      }
+      break;
+    case ARG_BUFFER_SIZE:
+      if (gst_element_get_state (GST_ELEMENT (sunaudiosrc)) == GST_STATE_NULL) {
+        sunaudiosrc->buffer_size = g_value_get_int (value);
+      }
+      break;
+    default:
+      G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
+      break;
+  }
+}
+
+static void
+gst_sunaudiosrc_get_property (GObject * object, guint prop_id,
+    GValue * value, GParamSpec * pspec)
+{
+  GstSunAudioSrc *sunaudiosrc;
+
+  g_return_if_fail (GST_IS_SUNAUDIOSRC (object));
+  sunaudiosrc = GST_SUNAUDIOSRC (object);
+
+  switch (prop_id) {
+    case ARG_DEVICE:
+      g_value_set_string (value, sunaudiosrc->device);
+      break;
+    case ARG_BUFFER_SIZE:
+      g_value_set_int (value, sunaudiosrc->buffer_size);
+      break;
+    default:
+      G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
+      break;
+  }
+}
+
+static gboolean
+gst_sunaudiosrc_open (GstSunAudioSrc * sunaudiosrc)
+{
+  int fd, ret;
+
+  fd = open ("/dev/audio", O_RDONLY);
+  if (fd == -1) {
+    /* FIXME error */
+    return FALSE;
+  } else {
+    sunaudiosrc->fd = fd;
+  }
+
+  ret = ioctl (fd, AUDIO_GETDEV, &sunaudiosrc->dev);
+  if (ret == -1) {
+    GST_ELEMENT_ERROR (sunaudiosrc, RESOURCE, SETTINGS, (NULL), ("%s",
+            strerror (errno)));
+    return FALSE;
+  }
+
+  GST_INFO ("name %s", sunaudiosrc->dev.name);
+  GST_INFO ("version %s", sunaudiosrc->dev.version);
+  GST_INFO ("config %s", sunaudiosrc->dev.config);
+
+  ret = ioctl (fd, AUDIO_GETINFO, &sunaudiosrc->info);
+  if (ret == -1) {
+    GST_ELEMENT_ERROR (sunaudiosrc, RESOURCE, SETTINGS, (NULL), ("%s",
+            strerror (errno)));
+    return FALSE;
+  }
+
+  return TRUE;
+}
+
+static void
+gst_sunaudiosrc_close (GstSunAudioSrc * sunaudiosrc)
+{
+  close (sunaudiosrc->fd);
+}
+
+static GstElementStateReturn
+gst_sunaudiosrc_change_state (GstElement * element)
+{
+  GstSunAudioSrc *sunaudiosrc = GST_SUNAUDIOSRC (element);
+
+  switch (GST_STATE_TRANSITION (element)) {
+    case GST_STATE_NULL_TO_READY:
+      //if (!gst_sunaudiosrc_open (sunaudiosrc)) {
+      //return GST_STATE_FAILURE;
+      //}
+      break;
+    case GST_STATE_READY_TO_PAUSED:
+      break;
+    case GST_STATE_PAUSED_TO_PLAYING:
+      break;
+    case GST_STATE_PLAYING_TO_PAUSED:
+      break;
+    case GST_STATE_PAUSED_TO_READY:
+      break;
+    case GST_STATE_READY_TO_NULL:
+      gst_sunaudiosrc_close (sunaudiosrc);
+      break;
+  }
+
+  if (GST_ELEMENT_CLASS (parent_class)->change_state)
+    return GST_ELEMENT_CLASS (parent_class)->change_state (element);
+
+  return GST_STATE_SUCCESS;
+
+}
+
+static gboolean
+gst_sunaudiosrc_negotiate (GstPad * pad)
+{
+  GstSunAudioSrc *sunaudiosrc;
+  GstCaps *allowed;
+
+  sunaudiosrc = GST_SUNAUDIOSRC (gst_pad_get_parent (pad));
+
+  allowed = gst_pad_get_allowed_caps (pad);
+
+  if (gst_pad_try_set_caps (sunaudiosrc->srcpad,
+          gst_caps_new_simple ("audio/x-raw-int",
+              "width", G_TYPE_INT, sunaudiosrc->width,
+              "rate", G_TYPE_INT, sunaudiosrc->rate,
+              "channels", G_TYPE_INT, sunaudiosrc->channels, NULL)) <= 0) {
+    return FALSE;
+  }
+  return TRUE;
+}
+
+static GstData *
+gst_sunaudiosrc_get (GstPad * pad)
+{
+  GstBuffer *buf;
+  glong readbytes;
+  glong readsamples;
+  GstSunAudioSrc *sunaudiosrc = GST_SUNAUDIOSRC (gst_pad_get_parent (pad));
+
+  buf = gst_buffer_new_and_alloc (sunaudiosrc->buffer_size);
+
+  if (!GST_PAD_CAPS (pad)) {
+    /* nothing was negotiated, we can decide on a format */
+    if (!gst_sunaudiosrc_negotiate (pad)) {
+      gst_buffer_unref (buf);
+      GST_ELEMENT_ERROR (sunaudiosrc, CORE, NEGOTIATION, (NULL), (NULL));
+      return GST_DATA (gst_event_new (GST_EVENT_INTERRUPT));
+    }
+  }
+
+  readbytes =
+      read (GST_SUNAUDIOELEMENT (sunaudiosrc)->fd, GST_BUFFER_DATA (buf),
+      sunaudiosrc->buffer_size);
+
+  if (readbytes < 0) {
+    gst_buffer_unref (buf);
+    GST_ELEMENT_ERROR (sunaudiosrc, RESOURCE, READ, (NULL), GST_ERROR_SYSTEM);
+    return GST_DATA (gst_event_new (GST_EVENT_INTERRUPT));
+  }
+
+  if (readbytes == 0) {
+    gst_buffer_unref (buf);
+    gst_element_set_eos (GST_ELEMENT (sunaudiosrc));
+    return GST_DATA (gst_event_new (GST_EVENT_INTERRUPT));
+  }
+
+  readsamples = readbytes * sunaudiosrc->rate / 1;      /* Pending bps */
+
+  GST_BUFFER_SIZE (buf) = readbytes;
+  GST_BUFFER_OFFSET (buf) = sunaudiosrc->curoffset;
+  GST_BUFFER_OFFSET_END (buf) = sunaudiosrc->curoffset + readsamples;
+  GST_BUFFER_DURATION (buf) = readsamples * GST_SECOND / sunaudiosrc->rate;
+
+  GST_BUFFER_TIMESTAMP (buf) = GST_CLOCK_TIME_NONE;
+
+  sunaudiosrc->curoffset += readsamples;
+
+  return GST_DATA (buf);
+}
+
+static GstCaps *
+gst_sunaudiosrc_getcaps (GstPad * pad)
+{
+  GstSunAudioSrc *sunaudiosrc = GST_SUNAUDIOSRC (gst_pad_get_parent (pad));
+  GstCaps *caps;
+
+  caps = gst_caps_copy (gst_pad_get_pad_template_caps (pad));
+  GST_DEBUG ("getcaps called on %" GST_PTR_FORMAT ", returning %"
+      GST_PTR_FORMAT, pad, caps);
+
+  return caps;
+}
+
+static GstPadLinkReturn
+gst_sunaudiosrc_pad_link (GstPad * pad, const GstCaps * caps)
+{
+  GstSunAudioSrc *sunaudiosrc = GST_SUNAUDIOSRC (gst_pad_get_parent (pad));
+  GstPadLinkReturn ret;
+  GstStructure *structure;
+
+  structure = gst_caps_get_structure (caps, 0);
+
+  gst_structure_get_int (structure, "rate", &sunaudiosrc->rate);
+  gst_structure_get_int (structure, "width", &sunaudiosrc->width);
+  gst_structure_get_int (structure, "channels", &sunaudiosrc->channels);
+
+  if (gst_sunaudiosrc_setparams (sunaudiosrc)) {
+    ret = GST_PAD_LINK_OK;
+  } else {
+    ret = GST_PAD_LINK_REFUSED;
+  }
+  GST_DEBUG ("pad_link called on %" GST_PTR_FORMAT " with caps %"
+      GST_PTR_FORMAT ", returning %d", pad, caps, ret);
+
+  return ret;
+}
+
+static gboolean
+gst_sunaudiosrc_setparams (GstSunAudioSrc * sunaudiosrc)
+{
+  audio_info_t ainfo;
+  int ret;
+
+  AUDIO_INITINFO (&ainfo);
+
+  ainfo.record.sample_rate = sunaudiosrc->rate;
+  ainfo.record.channels = sunaudiosrc->channels;
+  ainfo.record.precision = sunaudiosrc->width;
+  ainfo.record.encoding = AUDIO_ENCODING_LINEAR;
+  ainfo.record.port = AUDIO_MICROPHONE;
+  ainfo.record.buffer_size = sunaudiosrc->buffer_size;
+  //ainfo.output_muted = 0;
+
+  ret = ioctl (GST_SUNAUDIOELEMENT (sunaudiosrc)->fd, AUDIO_SETINFO, &ainfo);
+  if (ret == -1) {
+    GST_ELEMENT_ERROR (sunaudiosrc, RESOURCE, SETTINGS, (NULL), ("%s",
+            strerror (errno)));
+    return FALSE;
+  }
+
+  return TRUE;
+}
diff --git a/sys/sunaudio/gstsunaudiosrc.h b/sys/sunaudio/gstsunaudiosrc.h
new file mode 100644
index 00000000..b5546e1b
--- /dev/null
+++ b/sys/sunaudio/gstsunaudiosrc.h
@@ -0,0 +1,74 @@
+/* GStreamer
+ * Copyright (C) 1999,2000 Erik Walthinsen <omega@cse.ogi.edu>
+ *                    2000 Wim Taymans <wtay@chello.be>
+ *
+ * gstsunaudiosrc.h:
+ *
+ * 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.
+ */
+
+#ifndef __GST_SUNAUDIO_SRC_H__
+#define __GST_SUNAUDIO_SRC_H__
+                                                                                
+                                                                                
+#include <gst/gst.h>
+#include "gstsunelement.h"
+                                                                                
+G_BEGIN_DECLS
+                                                                                
+#define GST_TYPE_SUNAUDIOSRC \
+  (gst_sunaudiosrc_get_type())
+#define GST_SUNAUDIOSRC(obj) \
+  (G_TYPE_CHECK_INSTANCE_CAST((obj),GST_TYPE_SUNAUDIOSRC,GstSunAudioSrc))
+#define GST_SUNAUDIOSRC_CLASS(klass) \
+  (G_TYPE_CHECK_CLASS_CAST((klass),GST_TYPE_SUNAUDIOSRC,GstSunAudioSrcClass))
+#define GST_IS_SUNAUDIOSRC(obj) \
+  (G_TYPE_CHECK_INSTANCE_TYPE((obj),GST_TYPE_SUNAUDIOSRC))
+#define GST_IS_SUNAUDIOSRC_CLASS(obj) \
+  (G_TYPE_CHECK_CLASS_TYPE((klass),GST_TYPE_SUNAUDIOSRC))
+
+
+struct _GstSunAudioSrc {
+  GstSunAudioElement   element;
+
+  GstPad               *srcpad;
+
+  char *device;
+  int fd;
+
+  audio_device_t dev;
+  audio_info_t info;
+
+  int rate;
+  int width;
+  int channels;
+  int buffer_size;
+
+  gulong curoffset;
+};
+
+struct _GstSunAudioSrcClass {
+  GstSunAudioElementClass parent_class;
+};
+
+typedef struct _GstSunAudioSrc GstSunAudioSrc;
+typedef struct _GstSunAudioSrcClass GstSunAudioSrcClass;
+
+GType gst_sunaudiosrc_get_type (void);
+
+G_END_DECLS
+
+#endif /* __GST_SUNAUDIO_SRC_H__ */