gstreamer 2.0.0-x86-mingw32 → 2.0.1-x86-mingw32

data/Rakefile

@@ -41,7 +41,9 @@ package = GNOME2Package.new do |_package|
       :label => "Theora",
       :version => "1.1.1",
       :windows => {
-        :configure_args => [],
+        :configure_args => [
+          "--disable-examples"
+        ],
         :build_concurrently => false,
       },
     },
@@ -83,7 +85,7 @@ package = GNOME2Package.new do |_package|
       :name => "gstreamer",
       :download_base_url => "#{freedesktop_download_url_base}/gstreamer",
       :label => "GStreamer",
-      :version => "1.0.6",
+      :version => "1.0.7",
       :compression_method => "xz",
       :windows => {
         :configure_args => [
@@ -97,7 +99,7 @@ package = GNOME2Package.new do |_package|
       :name => "gst-plugins-base",
       :download_base_url => "#{freedesktop_download_url_base}/gst-plugins-base",
       :label => "GStreamer plugins (base)",
-      :version => "1.0.6",
+      :version => "1.0.7",
       :compression_method => "xz",
       :windows => {
         :configure_args => [
@@ -110,7 +112,7 @@ package = GNOME2Package.new do |_package|
       :name => "gst-plugins-good",
       :download_base_url => "#{freedesktop_download_url_base}/gst-plugins-good",
       :label => "GStreamer plugins (good)",
-      :version => "1.0.6",
+      :version => "1.0.7",
       :compression_method => "xz",
       :windows => {
         :configure_args => [
@@ -122,7 +124,7 @@ package = GNOME2Package.new do |_package|
       :name => "gst-plugins-bad",
       :download_base_url => "#{freedesktop_download_url_base}/gst-plugins-bad",
       :label => "GStreamer plugins (bad)",
-      :version => "1.0.6",
+      :version => "1.0.7",
       :compression_method => "xz",
       :windows => {
         :configure_args => ["--disable-librfb"],
@@ -132,7 +134,7 @@ package = GNOME2Package.new do |_package|
     #   :name => "gst-plugins-ugly",
     #   :download_base_url => "#{freedesktop_download_url_base}/gst-plugins-ugly",
     #   :label => "GStreamer plugins (ugly)",
-    #   :version => "1.0.6",
+    #   :version => "1.0.7",
     #   :compression_method => "xz",
     #   :windows => {
     #     :configure_args => [],
@@ -142,7 +144,7 @@ package = GNOME2Package.new do |_package|
       :name => "gst-libav",
       :download_base_url => "#{freedesktop_download_url_base}/gst-libav",
       :label => "GStreamer libav",
-      :version => "1.0.6",
+      :version => "1.0.7",
       :compression_method => "xz",
       :windows => {
         :configure_args => ["--with-libav-extra-configure=" +

data/ext/gstreamer/rbgst.c

@@ -25,24 +25,24 @@
 extern void Init_gstreamer (void);
 
 static gboolean
-rg_gst_bus_func_p(GIArgInfo *info)
+name_equal(GIArgInfo *info, const gchar *target_name)
 {
     GITypeInfo type_info;
     GIBaseInfo *interface_info;
     const gchar *namespace;
     const gchar *name;
-    gboolean gst_bus_func_p = FALSE;
+    gboolean equal_name_p = FALSE;
 
     g_arg_info_load_type(info, &type_info);
     interface_info = g_type_info_get_interface(&type_info);
     namespace = g_base_info_get_namespace(interface_info);
     name = g_base_info_get_name(interface_info);
-    if (strcmp(namespace, "Gst") == 0 && strcmp(name, "BusFunc") == 0) {
-        gst_bus_func_p = TRUE;
+    if (strcmp(namespace, "Gst") == 0 && strcmp(name, target_name) == 0) {
+        equal_name_p = TRUE;
     }
     g_base_info_unref(interface_info);
 
-    return gst_bus_func_p;
+    return equal_name_p;
 }
 
 static gboolean
@@ -65,31 +65,38 @@ rg_gst_bus_func_callback(GstBus *bus, GstMessage *message, gpointer user_data)
 static gpointer
 rg_gst_bus_func_callback_finder(GIArgInfo *info)
 {
-    if (!rg_gst_bus_func_p(info)) {
+    if (!name_equal(info, "BusFunc")) {
         return NULL;
     }
     return rg_gst_bus_func_callback;
 }
 
 static gboolean
-rg_gst_tag_foreach_func_p(GIArgInfo *info)
+rg_gst_bus_sync_handler_callback(GstBus *bus, GstMessage *message,
+                                 gpointer user_data)
 {
-    GITypeInfo type_info;
-    GIBaseInfo *interface_info;
-    const gchar *namespace;
-    const gchar *name;
-    gboolean gst_tag_foreach_func_p = FALSE;
+    RBGICallbackData *callback_data = user_data;
+    VALUE rb_bus_sync_reply;
+    ID id_call;
 
-    g_arg_info_load_type(info, &type_info);
-    interface_info = g_type_info_get_interface(&type_info);
-    namespace = g_base_info_get_namespace(interface_info);
-    name = g_base_info_get_name(interface_info);
-    if (strcmp(namespace, "Gst") == 0 && strcmp(name, "TagForeachFunc") == 0) {
-        gst_tag_foreach_func_p = TRUE;
+    CONST_ID(id_call, "call");
+    rb_bus_sync_reply =
+        rb_funcall(callback_data->rb_callback, id_call, 2,
+                   GOBJ2RVAL(bus),
+                   BOXED2RVAL(message, GST_MINI_OBJECT_TYPE(message)));
+    if (callback_data->metadata->scope_type == GI_SCOPE_TYPE_ASYNC) {
+        rb_gi_callback_data_free(callback_data);
     }
-    g_base_info_unref(interface_info);
+    return RVAL2GENUM(rb_bus_sync_reply, GST_TYPE_BUS_SYNC_REPLY);
+}
 
-    return gst_tag_foreach_func_p;
+static gpointer
+rg_gst_bus_sync_handler_callback_finder(GIArgInfo *info)
+{
+    if (!name_equal(info, "BusSyncHandler")) {
+        return NULL;
+    }
+    return rg_gst_bus_sync_handler_callback;
 }
 
 static void
@@ -101,7 +108,13 @@ rg_gst_tag_foreach_func_callback(const GstTagList *list, const gchar *tag,
 
     CONST_ID(id_call, "call");
     rb_funcall(callback_data->rb_callback, id_call, 2,
-               BOXED2RVAL(list, GST_MINI_OBJECT_TYPE(list)),
+               /*
+                * XXX: Use gst_tag_list_copy() instead if we don't trust
+                * users. Users should not use destructive methods such as
+                * #insert. If many users use these methods, we shuold use
+                * gst_tag_list_copy().
+                */
+               BOXED2RVAL((GstTagList *)list, GST_MINI_OBJECT_TYPE(list)),
                CSTR2RVAL(tag));
     if (callback_data->metadata->scope_type == GI_SCOPE_TYPE_ASYNC) {
         rb_gi_callback_data_free(callback_data);
@@ -111,7 +124,7 @@ rg_gst_tag_foreach_func_callback(const GstTagList *list, const gchar *tag,
 static gpointer
 rg_gst_tag_foreach_func_callback_finder(GIArgInfo *info)
 {
-    if (!rg_gst_tag_foreach_func_p(info)) {
+    if (!name_equal(info, "TagForeachFunc")) {
         return NULL;
     }
     return rg_gst_tag_foreach_func_callback;
@@ -121,5 +134,6 @@ void
 Init_gstreamer (void)
 {
     rb_gi_callback_register_finder(rg_gst_bus_func_callback_finder);
+    rb_gi_callback_register_finder(rg_gst_bus_sync_handler_callback_finder);
     rb_gi_callback_register_finder(rg_gst_tag_foreach_func_callback_finder);
 }

data/lib/gst.rb

@@ -33,17 +33,28 @@ module Gst
   LOG_DOMAIN = "GStreamer"
   GLib::Log.set_log_domain(LOG_DOMAIN)
 
-  @initialized = false
   class << self
+    def const_missing(name)
+      init()
+      if const_defined?(name)
+        const_get(name)
+      else
+        super
+      end
+    end
+
     def init(*argv)
-      return if @initialized
-      @initialized = true
       loader = Loader.new(self, argv)
       loader.load("Gst")
       require "gst/bin"
       require "gst/bus"
       require "gst/element"
       init_base
+      init_controller
+      class << self
+        remove_method(:init)
+        remove_method(:const_missing)
+      end
     end
 
     private
@@ -52,6 +63,12 @@ module Gst
       base_loader = BaseLoader.new(self)
       base_loader.load("GstBase")
     end
+
+    def init_controller
+      require "gst/controller_loader"
+      controller_loader = ControllerLoader.new(self)
+      controller_loader.load("GstController")
+    end
   end
 
   class Loader < GObjectIntrospection::Loader
@@ -63,8 +80,11 @@ module Gst
     private
     def pre_load(repository, namespace)
       init_check = repository.find(namespace, "init_check")
-      succeeded, argc, argv, error = init_check.invoke(1 + @init_arguments.size,
-                                                       [$0] + @init_arguments)
+      arguments = [
+        1 + @init_arguments.size,
+        [$0] + @init_arguments,
+      ]
+      succeeded, argc, argv, error = init_check.invoke(arguments)
       @init_arguments.replace(argv[1..-1])
       raise error unless succeeded
     end
@@ -97,5 +117,15 @@ module Gst
     def rubyish_method_name(function_info)
       RENAME_MAP[function_info.name] || super
     end
+
+    UNLOCK_GVL_METHODS = {
+      "Gst::Element#set_state"   => true,
+      "Gst::Element#get_state"   => true,
+      "Gst::Element#query_state" => true,
+      "Gst::Element#send_event"  => true,
+    }
+    def should_unlock_gvl?(function_info, klass)
+      UNLOCK_GVL_METHODS["#{klass}\##{function_info.name}"] || super
+    end
   end
 end

data/lib/gst/bus.rb

@@ -20,5 +20,21 @@ module Gst
     def add_watch(priority=GLib::PRIORITY_DEFAULT, &block)
       add_watch_full(priority, &block)
     end
+
+    def sync_handler(&block)
+      @sync_handler = lambda do |bus, message|
+        begin
+          block.call(bus, message)
+        rescue Exception
+          $stderr.puts("An exception is raised in " +
+                         "#{self.class}\##{__method__} callback: #{block}")
+          $stderr.puts("#{$!.class}: #{$!.message}")
+          $stderr.puts($@)
+          BusSyncReply::DROP
+        end
+      end
+      set_sync_handler(&@sync_handler)
+    end
+    private :set_sync_handler
   end
 end

data/lib/gst/controller_loader.rb

@@ -0,0 +1,20 @@
+# Copyright (C) 2013  Ruby-GNOME2 Project Team
+#
+# 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
+
+module Gst
+  class ControllerLoader < GObjectIntrospection::Loader
+  end
+end

data/sample/audio-example.rb

@@ -0,0 +1,68 @@
+#!/usr/bin/env ruby
+# -*- coding: utf-8 -*-
+#
+# audio-example.rb
+#
+# Builds a pipeline with [ audiotestsource ! autoaudiosink ] and sweeps
+# frequency and volume.
+#
+# Needs gst-plugin-base + gst-plugins-good installed.
+#
+# This sample code is a port of
+# gstreamer/tests/examples/controller/audio-example.c. It is licensed
+# under the terms of the GNU Library General Public License, version
+# 2 or (at your option) later.
+#
+# Copyright (C) 2013  Ruby-GNOME2 Project Team
+#
+# 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
+
+require "gst"
+
+bin = Gst::Pipeline.new("pipeline")
+clock = bin.clock
+src = Gst::ElementFactory.make("audiotestsrc", nil)
+raise "need audiotestsrc from gst-plugins-base" if src.nil?
+sink = Gst::ElementFactory.make("autoaudiosink", nil)
+raise "need autoaudiosink from gst-plugins-good" if sink.nil?
+
+bin << src << sink
+src >> sink
+
+# setup control sources
+cs1 = Gst::InterpolationControlSource.new
+cs2 = Gst::InterpolationControlSource.new
+
+src.add_control_binding(Gst::DirectControlBinding.new(src, "volume", cs1))
+src.add_control_binding(Gst::DirectControlBinding.new(src, "freq", cs2))
+
+# set interpolation mode
+cs1.mode = Gst::InterpolationMode::LINEAR
+cs2.mode = Gst::InterpolationMode::LINEAR
+
+# set control values
+cs1.set(0 * Gst::SECOND, 0.0)
+cs1.set(5 * Gst::SECOND, 1.0)
+
+cs2.set(0 * Gst::SECOND,  220.0 / 20000.0)
+cs2.set(3 * Gst::SECOND, 3520.0 / 20000.0)
+cs2.set(6 * Gst::SECOND,  440.0 / 20000.0)
+
+# run for 7 seconds
+clock_id = clock.new_single_shot_id(clock.time + (7 * Gst::SECOND))
+bin.play
+wait_ret, jitter = Gst::Clock.id_wait(clock_id)
+$stderr.puts "Clock::id_wait returned: #{wait_ret}" if wait_ret != Gst::ClockReturn::OK
+bin.stop

data/sample/framestep1.rb

@@ -0,0 +1,137 @@
+#!/usr/bin/env ruby
+# -*- coding: utf-8 -*-
+#
+# This sample code is a port of
+# gstreamer/tests/examples/stepping/framestep1.c. It is licensed
+# under the terms of the GNU Library General Public License, version
+# 2 or (at your option) later.
+#
+# Copyright (C) 2013  Ruby-GNOME2 Project Team
+#
+# 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
+
+require "gst"
+
+def event_loop(pipe)
+  running = true
+
+  bus = pipe.bus
+
+  while running
+    message = bus.timed_pop_filtered(Gst::CLOCK_TIME_NONE, Gst::MessageType::ANY)
+    raise "message nil" if message.nil?
+
+    case message.type
+    when Gst::MessageType::EOS
+      puts "got EOS"
+      running = false
+    when Gst::MessageType::WARNING
+      warning, debug = message.parse_warning
+      puts "Debugging info: #{debug || 'none'}"
+      puts "Warning: #{warning.message}"
+    when Gst::MessageType::ERROR
+      error, debug = message.parse_error
+      puts "Debugging info: #{debug || 'none'}"
+      puts "Error: #{error.message}"
+      running = false
+    when Gst::MessageType::STEP_DONE
+      format, amount, rate, flush, intermediate, duration, eos =
+        message.parse_step_done
+      if format == Gst::Format::DEFAULT
+        puts "step done: #{gst_time(duration)} skipped in #{gst_time(amount)} frames"
+      else
+        puts "step done: #{gst_time(duration)} skipped"
+      end
+      running = false
+    end
+  end
+end
+
+def gst_time(time)
+  Time.at(time / 1000000000.0).utc.strftime("%H:%M:%S.%N")
+end
+
+# create a new bin to hold the elements
+bin = Gst::Pipeline.new("pipeline")
+raise "'pipeline' gstreamer plugin missing" if bin.nil?
+
+# create a fake source
+videotestsrc = Gst::ElementFactory.make("videotestsrc", "videotestsrc")
+raise "'videotestsrc' gstreamer plugin missing" if videotestsrc.nil?
+videotestsrc.num_buffers = 10
+
+# and a fake sink
+appsink = Gst::ElementFactory.make("appsink", "appsink")
+raise "'appsink' gstreamer plugin missing" if appsink.nil?
+appsink.emit_signals = true
+appsink.sync = true
+appsink.signal_connect("new-preroll") do |appsink|
+  # signalled when a new preroll buffer is available
+  sample = appsink.pull_preroll
+  puts "have new-preroll sample #{sample}, timestamp #{gst_time(sample.buffer.pts)}"
+  Gst::FlowReturn::OK
+end
+
+# add objects to the main pipeline
+bin << videotestsrc << appsink
+
+# link the elements
+videotestsrc >> appsink
+
+# go to the PAUSED state and wait for preroll
+puts "prerolling first frame"
+bin.pause
+bin.get_state(Gst::CLOCK_TIME_NONE)
+
+# step two frames, flush so that new preroll is queued
+puts "stepping three frames"
+unless bin.send_event(Gst::Event.new(Gst::Format::BUFFERS, 2, 1.0, true, false))
+  raise "Failed to send STEP event!"
+end
+
+# blocks and returns when we received the step done message
+event_loop(bin)
+
+# wait for step to really complete
+bin.get_state(Gst::CLOCK_TIME_NONE)
+
+result, pos = bin.query_position(Gst::Format::TIME)
+puts "stepped two frames, now at #{gst_time(pos)}"
+
+# step 3 frames, flush so that new preroll is queued
+puts "stepping 120 milliseconds"
+unless bin.send_event(Gst::Event.new(Gst::Format::TIME, 120 * Gst::MSECOND, 1.0,
+                                      true, false))
+  raise "Failed to send STEP event!"
+end
+
+# blocks and returns when we received the step done message
+event_loop(bin)
+
+# wait for step to really complete
+bin.get_state(Gst::CLOCK_TIME_NONE)
+
+result, pos = bin.query_position(Gst::Format::TIME)
+puts "stepped 120ms frames, now at #{gst_time(pos)}"
+
+puts "playing until EOS"
+bin.play
+
+# Run event loop listening for bus messages until EOS or ERROR
+event_loop(bin)
+puts "finished"
+
+# stop the bin
+bin.stop