gstreamer 1.2.6 → 2.0.0

data/ext/gstreamer/rbgstindex.c

@@ -1,315 +0,0 @@
-/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
-/*
- *  Copyright (C) 2011  Ruby-GNOME2 Project Team
- *  Copyright (C) 2003, 2004 Laurent Sansonetti <lrz@gnome.org>
- *
- *  This library is free software; you can redistribute it and/or
- *  modify it under the terms of the GNU Lesser General Public
- *  License as published by the Free Software Foundation; either
- *  version 2.1 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
- *  Lesser General Public License for more details.
- *
- *  You should have received a copy of the GNU Lesser General Public
- *  License along with this library; if not, write to the Free Software
- *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston,
- *  MA  02110-1301  USA
- */
-
-#include "rbgst-private.h"
-
-#define RG_TARGET_NAMESPACE cIndex
-
-/* Class: Gst::Index
- * Generates indexes on objects. 
- */
-
-/* Class method: new
- * Returns: a newly allocated Gst::Index object.
- */
-static VALUE
-rg_initialize (VALUE self)
-{
-    GstIndex *index = gst_index_new ();
-
-    if (index != NULL)
-        RBGST_INITIALIZE (self, index);
-    return Qnil;
-}
-
-/* Method: readable?
- * Returns: whether the index can be read.
- */
-static VALUE
-rg_readable_p (VALUE self)
-{
-    return CBOOL2RVAL (GST_INDEX_IS_READABLE (RGST_INDEX (self)));
-}
-
-/* Method: writable?
- * Returns: whether the index can be written.
- */
-static VALUE
-rg_writable_p (VALUE self)
-{
-    return CBOOL2RVAL (GST_INDEX_IS_WRITABLE (RGST_INDEX (self)));
-}
-
-/*
- * Method: commit(id)
- * id: the writer that committed the index.
- *
- * Tells the index that the writer with the given ID is done with 
- * this index and is not going to write any more entries to it.
- *
- * Returns: self.
- */
-static VALUE
-rg_commit (VALUE self, VALUE id)
-{
-    gst_index_commit (RGST_INDEX (self), FIX2INT (id));
-    return self;
-}
-
-/* Method: group
- * Returns: the ID of the current group.
- */
-static VALUE
-rg_group (VALUE self)
-{
-    return INT2FIX (gst_index_get_group (RGST_INDEX (self)));
-}
-
-/*
- * Method: new_group
- *
- * Creates a new group for the given index.  It will be set as the current
- * group.
- *
- * Returns: the ID of the newly created group.
- */
-static VALUE
-rg_new_group (VALUE self)
-{
-    return INT2FIX (gst_index_new_group (RGST_INDEX (self)));
-}
-
-/*
- * Method: set_group(group)
- * group: the number of the group to set.
- *
- * Sets the current group number to the given argument.
- *
- * Returns: true if the operation succeeded, false if the group did not exist.
- */
-static VALUE
-rg_set_group (VALUE self, VALUE group)
-{
-    return
-        CBOOL2RVAL (gst_index_set_group (RGST_INDEX (self), FIX2INT (group)));
-}
-
-/* Method: certainty
- * Returns: the certainty of the index (see Gst::Index::Certainty).
- */
-static VALUE
-rg_certainty (VALUE self)
-{
-    return GENUM2RVAL (gst_index_get_certainty (RGST_INDEX (self)),
-                       GST_TYPE_INDEX_CERTAINTY);
-}
-
-/* 
- * Method: set_certainty(certainty)
- * certainty: the certainty to set (see Gst::Index::Certainty).
- *
- * Sets the certainty of the index.
- *
- * Returns: self.
- */
-static VALUE
-rg_set_certainty (VALUE self, VALUE certainty)
-{
-    gst_index_set_certainty (RGST_INDEX (self),
-                             RVAL2GENUM (certainty, GST_TYPE_INDEX_CERTAINTY));
-    return self;
-}
-
-#if 0
-static gboolean
-__filter (GstIndex * index, GstIndexEntry * entry)
-{
-
-}
-
-static VALUE
-rg_set_filter (VALUE self)
-{
-    /*
-     * TODO 
-     */
-    return self;
-}
-
-static gboolean
-__resolver (GstIndex * index, GstObject * writer, gchar ** writer_string,
-            gpointer user_data)
-{
-    VALUE block = (VALUE) user_data;
-
-    return
-        RVAL2CBOOL (rb_funcall
-                    (block, 2, RGST_INDEX_NEW (index),
-                     RGST_OBJECT_NEW (writer)));
-}
-
-static VALUE
-rg_set_resolver (VALUE self)
-{
-    gst_index_set_resolver (RGST_INDEX (self), __resolver,
-                            (gpointer) rb_block_proc ());
-    return self;
-}
-#endif
-
-/*
- * Method: add(id, *args)
- * id: the ID of the index writer.
- * args: additional parameters, see below.
- *
- * Adds an entry into the index.  The type of the entry depends of
- * the number and kind of additional parameters.
- *
- *  * For an ID type, args must be a String.
- *  * For a FORMAT type, args must be a Gst::Format.
- *  * For an ASSOCIATION type, args must contains an association flag (see Gst::Index::AssocFlags), a Gst::Format and a value for the format.
- *  * For an OBJECT type, well you must wait, because it is not yet implemented.
- *
- * Returns: a reference to the newly allocated entry in the index, as a Gst::EntryIndex object.
- */
-static VALUE
-rg_add (int argc, VALUE * argv, VALUE self)
-{
-    GstIndexEntry *index_entry;
-    VALUE id;
-
-    if (argc == 2) {
-        VALUE var;
-
-        rb_scan_args (argc, argv, "2", &id, &var);
-
-        index_entry = CLASS2GTYPE (CLASS_OF (var)) == GST_TYPE_FORMAT2
-            ? gst_index_add_format (RGST_INDEX (self), FIX2INT (id),
-                                    *RGST_FORMAT (var))
-            : gst_index_add_id (RGST_INDEX (self), FIX2INT (id),
-                                RVAL2CSTR (var));
-
-    } else {
-        VALUE flags, format, value;
-
-        rb_scan_args (argc, argv, "4", &id, &flags, &format, &value);
-
-        index_entry =
-            gst_index_add_association (RGST_INDEX (self), FIX2INT (id),
-                                       RVAL2GFLAGS (flags,
-                                                    GST_TYPE_ASSOC_FLAGS),
-                                       *RGST_FORMAT (format), NUM2ULL (value));
-    }
-
-    return index_entry != NULL ? RGST_INDEX_ENTRY_NEW (index_entry)
-        : Qnil;
-}
-
-static gint
-__compare (gconstpointer a, gconstpointer b, gpointer user_data)
-{
-    VALUE block = (VALUE) user_data;
-
-    return
-        FIX2INT (rb_funcall
-                 (block, rb_intern ("call"), 2, RGST_INDEX_ENTRY_NEW (a),
-                  RGST_INDEX_ENTRY_NEW (b)));
-}
-
-/*
- * Method: get_assoc_entry(id, method, flags, format, value) { ... }
- * id: the ID of the index writer.
- * method: the lookup method to use (see Gst::Index::LookupMethod).
- * flags: flags for the entry (see Gst::Index::AssocFlags).
- * format: a Gst::Format object.
- * value: the value to find.
- * 
- * Finds the given format/value in the index.  If a block is given, it will be
- * called as a compare function, passing references to 2 Gst::IndexEntry objects,
- * and waiting for a boolean as the return value.
- *
- * Returns: the entry associated with the value (as a Gst::IndexEntry object), or nil 
- * if the value is not found.
- */
-static VALUE
-rg_get_assoc_entry (VALUE self, VALUE id, VALUE method, VALUE flags,
-                              VALUE format, VALUE value)
-{
-    GstIndexEntry *index_entry;
-
-    if (rb_block_given_p () == Qfalse)
-        index_entry =
-            gst_index_get_assoc_entry (RGST_INDEX (self), FIX2INT (id),
-                                       RVAL2GENUM (method,
-                                                   GST_TYPE_INDEX_LOOKUP_METHOD),
-                                       RVAL2GFLAGS (flags,
-                                                    GST_TYPE_ASSOC_FLAGS),
-                                       *RGST_FORMAT (format), NUM2ULL (value));
-    else
-        index_entry =
-            gst_index_get_assoc_entry_full (RGST_INDEX (self), FIX2INT (id),
-                                            RVAL2GENUM (method,
-                                                        GST_TYPE_INDEX_LOOKUP_METHOD),
-                                            RVAL2GFLAGS (flags,
-                                                         GST_TYPE_ASSOC_FLAGS),
-                                            *RGST_FORMAT (format),
-                                            NUM2ULL (value), __compare,
-                                            (gpointer) rb_block_proc ());
-
-    return index_entry != NULL ? RGST_INDEX_ENTRY_NEW (index_entry)
-        : Qnil;
-}
-
-void
-Init_gst_index (VALUE mGst)
-{
-    VALUE RG_TARGET_NAMESPACE = G_DEF_CLASS (GST_TYPE_INDEX, "Index", mGst);
-
-    RG_DEF_METHOD(initialize, 0);
-    RG_DEF_METHOD_P(readable, 0);
-    RG_DEF_METHOD_P(writable, 0);
-    RG_DEF_METHOD(commit, 1);
-    RG_DEF_METHOD(group, 0);
-    RG_DEF_METHOD(new_group, 0);
-    RG_DEF_METHOD(set_group, 1);
-    RG_DEF_METHOD(certainty, 0);
-    RG_DEF_METHOD(set_certainty, 1);
-#if 0
-    RG_DEF_METHOD(set_filter, 0);
-    RG_DEF_METHOD(set_resolver, 0);
-#endif
-    RG_DEF_METHOD(add, -1);
-    RG_DEF_METHOD(get_assoc_entry, 5);
-
-    G_DEF_CLASS (GST_TYPE_INDEX_CERTAINTY, "Certainty", RG_TARGET_NAMESPACE);
-    G_DEF_CONSTANTS (RG_TARGET_NAMESPACE, GST_TYPE_INDEX_CERTAINTY, "GST_INDEX_");
-    G_DEF_CLASS (GST_TYPE_INDEX_LOOKUP_METHOD, "LookupMethod", RG_TARGET_NAMESPACE);
-    G_DEF_CONSTANTS (RG_TARGET_NAMESPACE, GST_TYPE_INDEX_LOOKUP_METHOD, "GST_INDEX_");
-    G_DEF_CLASS (GST_TYPE_ASSOC_FLAGS, "AssocFlags", RG_TARGET_NAMESPACE);
-    G_DEF_CONSTANTS (RG_TARGET_NAMESPACE, GST_TYPE_ASSOC_FLAGS, "GST_");
-    G_DEF_CLASS (GST_TYPE_INDEX_RESOLVER_METHOD, "ResolverMethod", RG_TARGET_NAMESPACE);
-    G_DEF_CONSTANTS (RG_TARGET_NAMESPACE, GST_TYPE_INDEX_RESOLVER_METHOD, "GST_INDEX_");
-    G_DEF_CLASS (GST_TYPE_INDEX_FLAGS, "Flags", RG_TARGET_NAMESPACE);
-    G_DEF_CONSTANTS (RG_TARGET_NAMESPACE, GST_TYPE_INDEX_FLAGS, "GST_INDEX_");
-
-    rb_undef_method (RG_TARGET_NAMESPACE, "resolver");
-    rb_undef_method (RG_TARGET_NAMESPACE, "resolver=");
-}

data/ext/gstreamer/rbgstindexentry.c

@@ -1,99 +0,0 @@
-/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
-/*
- *  Copyright (C) 2011  Ruby-GNOME2 Project Team
- *  Copyright (C) 2003, 2004 Laurent Sansonetti <lrz@gnome.org>
- *
- *  This library is free software; you can redistribute it and/or
- *  modify it under the terms of the GNU Lesser General Public
- *  License as published by the Free Software Foundation; either
- *  version 2.1 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
- *  Lesser General Public License for more details.
- *
- *  You should have received a copy of the GNU Lesser General Public
- *  License along with this library; if not, write to the Free Software
- *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston,
- *  MA  02110-1301  USA
- */
-
-#include "rbgst-private.h"
-
-#define RG_TARGET_NAMESPACE cIndexEntry
-
-/* Class: Gst::IndexEntry
- * An index's entry. 
- */
-
-/*
- * Method: data
- *
- * Gets the internal data stored in the entry.  The data depends of the type
- * of the entry:
- *  * Gst::IndexEntry::ID: the description of the ID, as a String. 
- *  * Gst::IndexEntry::ASSOCIATION: an Array that contains the number of associations, a Gst::Format, the value of the format and the association flags (see Gst::Index::AssocFlags).
- *  * Gst::IndexEntry::FORMAT: an Array that contains a Gst::Format and its value.
- *  * Gst::IndexEntry::OBJECt: not yet implemented.
- *
- * Returns: the internal data of the entry. 
- */
-static VALUE
-rg_data (VALUE self)
-{
-    GstIndexEntry *entry;
-    VALUE data;
-
-    entry = RGST_INDEX_ENTRY (self);
-    switch (entry->type) {
-    case GST_INDEX_ENTRY_ID:
-        data = CSTR2RVAL (entry->data.id.description);
-        break;
-
-    case GST_INDEX_ENTRY_ASSOCIATION:
-        data = rb_ary_new ();
-        rb_ary_push (data, INT2FIX (entry->data.assoc.nassocs));
-        rb_ary_push (data, RGST_FORMAT_NEW (entry->data.assoc.assocs->format));
-        rb_ary_push (data, ULL2NUM (entry->data.assoc.assocs->value));
-        rb_ary_push (data,
-                     GFLAGS2RVAL (entry->data.assoc.flags,
-                                  GST_TYPE_ASSOC_FLAGS));
-        break;
-
-    case GST_INDEX_ENTRY_FORMAT:
-        data = rb_ary_new ();
-        rb_ary_push (data, RGST_FORMAT_NEW (entry->data.format.format));
-        rb_ary_push (data, CSTR2RVAL (entry->data.format.key));
-        break;
-
-    case GST_INDEX_ENTRY_OBJECT:   /* TODO */
-    default:
-        data = Qnil;
-    }
-    return data;
-}
-
-/* Method: entry_type
- * Returns: the type of the entry (see Gst::IndexEntry::Types).
- */
-static VALUE
-rg_entry_type (VALUE self)
-{
-    GstIndexEntry *entry = RGST_INDEX_ENTRY (self);
-
-    return GENUM2RVAL (entry->type, GST_TYPE_INDEX_ENTRY_TYPE);
-}
-
-void
-Init_gst_indexentry (VALUE mGst)
-{
-    VALUE RG_TARGET_NAMESPACE = G_DEF_CLASS (GST_TYPE_INDEX_ENTRY, "IndexEntry", mGst);
-
-    rb_undef_method (RG_TARGET_NAMESPACE, "initialize");
-    RG_DEF_METHOD(data, 0);
-    RG_DEF_METHOD(entry_type, 0);
-
-    G_DEF_CLASS (GST_TYPE_INDEX_ENTRY_TYPE, "Types", RG_TARGET_NAMESPACE);
-    G_DEF_CONSTANTS (RG_TARGET_NAMESPACE, GST_TYPE_INDEX_ENTRY_TYPE, "GST_INDEX_ENTRY_");
-}

data/ext/gstreamer/rbgstparse.c

@@ -1,69 +0,0 @@
-/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
-/*
- *  Copyright (C) 2011  Ruby-GNOME2 Project Team
- *  Copyright (C) 2003, 2004 Laurent Sansonetti <lrz@gnome.org>
- *
- *  This library is free software; you can redistribute it and/or
- *  modify it under the terms of the GNU Lesser General Public
- *  License as published by the Free Software Foundation; either
- *  version 2.1 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
- *  Lesser General Public License for more details.
- *
- *  You should have received a copy of the GNU Lesser General Public
- *  License along with this library; if not, write to the Free Software
- *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston,
- *  MA  02110-1301  USA
- */
-
-#include "rbgst-private.h"
-
-#define RG_TARGET_NAMESPACE mParse
-
-/* Module: Gst::Parse
- * Parses command-line syntax into a pipeline. 
- */
-
-/*
- * Class method: launch(command)
- * command: a command line.
- *
- * Creates a new pipeline based on command line syntax.
- * On failure, an exception is thrown with a specific
- * error message.   
- *
- * Returns: a reference to a new Gst::Bin on success,
- * an exception on failure.
- */
-static VALUE
-rg_s_launch (G_GNUC_UNUSED VALUE self, VALUE command)
-{
-#if !defined(GST_DISABLE_PARSE)
-    GError *error;
-    GstBin *bin;
-
-    error = NULL;
-    bin = (GstBin*)gst_parse_launch (RVAL2CSTR (command), &error);
-    if (bin != NULL)
-        return RGST_BIN_NEW (bin);
-        RAISE_GERROR(error);
-#else
-    rb_raise (rb_eRuntimeError, 
-          "This function has been disabled "
-          "when GStreamer was compiled");
-#endif
-    return Qnil;
-}
-
-void
-Init_gst_parse (VALUE mGst)
-{
-    VALUE RG_TARGET_NAMESPACE = rb_define_module_under (mGst, "Parse"); 
-    RG_DEF_SMETHOD(launch, 1);
-
-        G_DEF_ERROR(GST_PARSE_ERROR, "ParseError", mGst, rb_eRuntimeError,
-                    GST_TYPE_PARSE_ERROR);
-}

data/ext/gstreamer/rbgstquerytype.c

@@ -1,162 +0,0 @@
-/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
-/*
- *  Copyright (C) 2011  Ruby-GNOME2 Project Team
- *  Copyright (C) 2003, 2004 Laurent Sansonetti <lrz@gnome.org>
- *
- *  This library is free software; you can redistribute it and/or
- *  modify it under the terms of the GNU Lesser General Public
- *  License as published by the Free Software Foundation; either
- *  version 2.1 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
- *  Lesser General Public License for more details.
- *
- *  You should have received a copy of the GNU Lesser General Public
- *  License along with this library; if not, write to the Free Software
- *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston,
- *  MA  02110-1301  USA
- */
-
-#include "rbgst-private.h"
-
-#define RG_TARGET_NAMESPACE cQueryType
-
-/* Class: Gst::QueryType
- * Dynamically register new query types. 
- */
-
-static GstQueryType *
-query_type_copy (const GstQueryType* query_type)
-{
-    GstQueryType *new_query_type;
-    g_return_val_if_fail (query_type != NULL, NULL);
-    new_query_type = g_new (GstQueryType, 1);
-    *new_query_type = *query_type;
-    return new_query_type;
-}
-
-GType
-gst_query_type_get_type2 (void)
-{
-    static GType our_type = 0;
-    if (our_type == 0)
-        our_type = g_boxed_type_register_static ("GstQueryTypeClass",
-            (GBoxedCopyFunc)query_type_copy,
-            (GBoxedFreeFunc)g_free);
-    return our_type;
-}
-
-/*
- * Class method: find(nick)
- * nick: the nick of an existing query type.
- *
- * Returns: a reference to the Gst::QueryType object registered with the 
- * given nick, or nil if this query was not registered.
- */
-static VALUE
-rg_s_find (G_GNUC_UNUSED VALUE self, VALUE nick)
-{
-    GstQueryType type = gst_query_type_get_by_nick (RVAL2CSTR (nick));
-    return type != GST_QUERY_NONE 
-        ? RGST_QUERY_TYPE_NEW (&type)
-        : Qnil; 
-}
-
-/*
- * Class method: each { |query_type| block }
- *
- * Calls the block for each registered query type, passing a reference
- * to the Gst::QueryType object as parameter.
- *
- * Returns: always nil.
- */
-static VALUE
-rg_s_each (G_GNUC_UNUSED VALUE self)
-{
-    GstIterator *iter;
-    gpointer value;
-
-    iter = gst_query_type_iterate_definitions();
-    while (gst_iterator_next(iter, &value) == GST_ITERATOR_OK) {
-        GstQueryTypeDefinition *definition = value;
-        rb_yield(RGST_QUERY_TYPE_NEW(&(definition->value)));
-    }
-    gst_iterator_free(iter);
-    return Qnil;
-}
-
-/* Method: type_id
- * Returns: the type id of this query type (see Gst::QueryType::Type).
- */
-static VALUE
-rg_type_id (VALUE self)
-{
-    GstQueryType *querytype = RGST_QUERY_TYPE (self);
-    return INT2FIX (*querytype);
-}
-
-/* Method: nick
- * Returns: the short nick of the query type.
- */
-static VALUE
-rg_nick (VALUE self)
-{
-    GstQueryType *querytype = RGST_QUERY_TYPE (self);
-    return CSTR2RVAL (gst_query_type_get_details (*querytype)->nick);
-}
-
-/* Method: description
- * Returns: a longer description of the query type.
- */
-static VALUE
-rg_description (VALUE self)
-{
-    GstQueryType *querytype = RGST_QUERY_TYPE (self);
-    return CSTR2RVAL (gst_query_type_get_details (*querytype)->description);
-}
-
-/*
- * Method: ==(query_type)
- * query_type: a Gst::QueryType object.
- *
- * Checks if two Gst::QueryType objects are registered under the
- * same nick.
- *
- * Returns: true on success, false on failure.
- */
-static VALUE
-rg_operator_is_equal (VALUE self, VALUE other_query)
-{
-    GstQueryType *q1, *q2;
-    const gchar *n1, *n2;
-
-    if (NIL_P (other_query))
-        return Qfalse;
-
-    q1 = RGST_QUERY_TYPE (self);
-    q2 = RGST_QUERY_TYPE (other_query);
-
-    n1 = gst_query_type_get_details (*q1)->nick;
-    n2 = gst_query_type_get_details (*q2)->nick;
-
-    return CBOOL2RVAL( strcmp (n1, n2) == 0);
-}
-
-void
-Init_gst_querytype (VALUE mGst)
-{
-    VALUE RG_TARGET_NAMESPACE = G_DEF_CLASS (GST_TYPE_QUERY_TYPE2, "QueryType", mGst);
-
-    RG_DEF_SMETHOD(each, 0);
-    RG_DEF_SMETHOD(find, 1);
-
-    RG_DEF_METHOD(type_id, 0);
-    RG_DEF_METHOD(nick, 0);
-    RG_DEF_METHOD(description, 0);
-    RG_DEF_METHOD_OPERATOR("==", is_equal, 1);
-
-    G_DEF_CLASS (GST_TYPE_QUERY_TYPE, "Type", RG_TARGET_NAMESPACE);
-    G_DEF_CONSTANTS (RG_TARGET_NAMESPACE, GST_TYPE_QUERY_TYPE, "GST_QUERY_");
-}