removed this from gstreamer core please check out the gst-bind module and pick up from there

Original commit message from CVS:
removed this from gstreamer core
please check out the gst-bind module and pick up from there

swig/Gst.i

@@ -1,14 +0,0 @@
- /* File : Gst.i */
-%module Gst
-
-%include "typemap.i"
-%include "GstPipeline.i"
-%include "GstElement.i"
-%include "GstBin.i"
-%include "GstPad.i"
-
-%{
-#include <gst/gst.h>
-%}
-
-%include "gstswig.c"

swig/GstBin.i

@@ -1,3 +0,0 @@
-void gst_bin_add (GstBin *bin, GstElement *element);
-gboolean gst_bin_iterate (GstBin *bin);
-

swig/GstElement.i

@@ -1,17 +0,0 @@
-GstElement* 
-gst_elementfactory_make (const gchar *factoryname, const gchar *name);
-
-GstPad*                 
-gst_element_get_pad (GstElement *element, const gchar *name);
-
-gint
-gst_element_set_state (GstElement *element, GstElementState state);
-
-typedef enum {
-  GST_STATE_VOID_PENDING        = 0,
-  GST_STATE_NULL                = (1 << 0),
-  GST_STATE_READY               = (1 << 1),
-  GST_STATE_PAUSED              = (1 << 2),
-  GST_STATE_PLAYING             = (1 << 3),
-} GstElementState;
-

swig/GstPad.i

@@ -1,3 +0,0 @@
-gboolean
-gst_pad_connect (GstPad *srcpad, GstPad *sinkpad);
-

swig/GstPipeline.i

@@ -1,2 +0,0 @@
-GstElement*     gst_pipeline_new                (const guchar *name);
-

swig/Makefile.PL.in

@@ -1,14 +0,0 @@
-#!/usr/bin/perl -w
-use ExtUtils::MakeMaker;
-WriteMakefile(
-	'NAME'	=>	'Gst',
-# FIXME : I hardcoded my lib path here
-	'LIBS'	=>	'@GLIB_LIBS@ @GTK_LIBS@ @XML_LIBS@ '.
-			'-L../gst/.libs/ -lgst '
-			,
-	'INC'	=>	'@GLIB_CFLAGS@ @GTK_CFLAGS@ @XML_CFLAGS@ '.
-			'-DHAVE_CPU_I386 -D_GNU_SOURCE -DHAVE_CONFIG '.
-			'-I.. ' 
-			,
-	'OBJECT' =>	'Gst_wrap.o gstswig.o'
-);

swig/README

@@ -1,15 +0,0 @@
-Perl bindings for Gstreamer
-thomas@apestaart.org, August 2001
-
-This is work in progress.  
-
-Here's some basic instructions :
-
-* configure gstreamer
-* run ./bootstrap in this directory; this will create a symbolic link to
-Gst.so which will be made later on so that you can test the module without
-installing it.
-* run helloworld.pl /path/to/mp3
-
-Some of the gstreamer functions are wrapped up now, we'll change that
-later.

swig/bootstrap

@@ -1,8 +0,0 @@
-#!/bin/bash
-if test ! -e Gst.so
-then
-  ln -s blib/arch/auto/Gst/Gst.so
-fi
-swig -perl5 Gst.i && \
-perl Makefile.PL && \
-make

swig/gstswig.c

@@ -1,45 +0,0 @@
-/* let's get gstreamer to work with swig and do perl */
-#include <gst/gst.h>
-
-void init ()
-{
-  int argc = 3;
-  char **argv = NULL;
-
-  g_module_open ("libgst.so", G_MODULE_BIND_LAZY);
-
-  argv = (char **) malloc (sizeof (char *) * 3);
-  argv[0] = (char *) malloc (80);
-  argv[1] = (char *) malloc (80);
-  argv[2] = (char *) malloc (80);
-  strcpy (argv[0], "swigged gst");
-  strcpy (argv[1], "--gst-debug-mask=0");
-  strcpy (argv[2], "--gst-info-mask=0");
-  
-  gst_init (&argc, &argv);
-}
-
-// FIXME: find a way to get the actual macro from gobject2gtk in here
-void gobject_set (GstElement* element, const gchar *first_arg_name, const gchar *first_arg_value)
-{
-  gtk_object_set ((GtkObject*) element, first_arg_name, first_arg_value, NULL);
-}
-
-// FIXME: the typecast should be done using typemaps or some other way
-
-void wrap_gst_bin_add (GstElement *bin, GstElement *element)
-{
-  gst_bin_add ((GstBin *) bin, element);
-}
-
-// FIXME: no wrapper, the actual enums should be used
-gint gst_element_set_state_play (GstElement *bin)
-{
-  gst_element_set_state (bin, GST_STATE_PLAYING);
-}
-
-// FIXME: no wrapper, typeconversion should be automatic
-gboolean wrap_gst_bin_iterate (GstElement *bin)
-{
-  gst_bin_iterate (bin);
-}

swig/helloworld.pl

@@ -1,48 +0,0 @@
-#!/usr/bin/perl -w
-
-use Gst;
-
-Gst::init ();
-
-my $bin = Gst::gst_pipeline_new ("pipeline")
-  or die "Cannot create pipeline !\n";
-print "DEBUG: bin: $bin\n";
-
-my $file = shift || die "Please give a file to test !";
-
-my $parse = Gst::gst_elementfactory_make ("mp3parse", "parse")
-  or die "Cannot create mp3parse element !\n";
-
-my $disksrc = Gst::gst_elementfactory_make ("disksrc", "disk_source")
-  or die "Cannot create disksrc element !\n";
-Gst::gobject_set ($disksrc, "location", $file);
-
-my $decoder = Gst::gst_elementfactory_make ("mpg123", "decoder")
-  or die "Cannot create decoder element !\n";
-my $osssink = Gst::gst_elementfactory_make ("osssink", "play_audio")
-  or die "Cannot create decoder element !\n";
-
-Gst::wrap_gst_bin_add ($bin, $disksrc);
-Gst::wrap_gst_bin_add ($bin, $parse);
-Gst::wrap_gst_bin_add ($bin, $decoder);
-Gst::wrap_gst_bin_add ($bin, $osssink);
-
-Gst::gst_pad_connect (Gst::gst_element_get_pad ($disksrc, "src"),
-		      Gst::gst_element_get_pad ($parse, "sink"));
-Gst::gst_pad_connect (Gst::gst_element_get_pad ($parse, "src"),
-		      Gst::gst_element_get_pad ($decoder, "sink"));
-Gst::gst_pad_connect (Gst::gst_element_get_pad ($decoder, "src"),
-		      Gst::gst_element_get_pad ($osssink, "sink"));
-#print "DEBUG: disksrc: $disksrc\n";
-
-#FIXME
-#Gst::gst_element_set_state ($bin, GST_STATE_PLAYING);
-Gst::gst_element_set_state_play ($bin);
-
-my $playing = 1;
-
-while ($playing)
-{
-  Gst::wrap_gst_bin_iterate ($bin);
-}
-

swig/typemap.i

@@ -1,14 +0,0 @@
-%include "typemap.i"
-
-%typemap(perl5,in) const guchar *
-{
-  int len;
-  $target = (guchar *) SvPV ($source, len);
-}
-
-%typemap(perl5,in) const gchar *
-{
-  int len;
-  $target = (gchar *) SvPV ($source, len);
-}
-