clutter-gtk 1.2.0

data/Rakefile

@@ -0,0 +1,41 @@
+# -*- ruby -*-
+#
+# 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
+
+$LOAD_PATH.unshift("./../glib2/lib")
+require "gnome2-raketask"
+
+package = GNOME2Package.new do |_package|
+  _package.summary = "Ruby/ClutterGTK is a Ruby binding of Clutter-GTK."
+  _package.description = "Ruby/ClutterGTK is a Ruby binding of Clutter-GTK."
+  _package.dependency.gem.runtime = ["clutter", "gtk3"]
+  _package.dependency.gem.development = ["test-unit-notify"]
+  _package.win32.packages = []
+  _package.win32.dependencies = []
+  _package.win32.build_dependencies = ["glib2", "gobject-introspection"]
+  _package.win32.build_packages = []
+end
+package.define_tasks
+
+namespace :dependency do
+  desc "Install depenencies"
+  task :install do
+    # TODO: Install gir1.2-gtkclutter-1.0 on Debian.
+  end
+end
+
+task :build => "dependency:install"

data/lib/clutter-gtk.rb

@@ -0,0 +1,63 @@
+# 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 "clutter"
+require "gtk3"
+
+base_dir = Pathname.new(__FILE__).dirname.dirname.dirname.expand_path
+vendor_dir = base_dir + "vendor" + "local"
+vendor_bin_dir = vendor_dir + "bin"
+GLib.prepend_environment_path(vendor_bin_dir)
+
+module ClutterGtk
+  LOG_DOMAIN = "Clutter-Gtk"
+  GLib::Log.set_log_domain(LOG_DOMAIN)
+
+  class << self
+    @initialized = false
+    def init(argv=ARGV)
+      return if @initialized
+      @initialized = true
+      loader = Loader.new(self, argv)
+      loader.load("GtkClutter")
+      Clutter.init(argv)
+    end
+  end
+
+  class Loader < GObjectIntrospection::Loader
+    class InitError < StandardError
+    end
+
+    def initialize(base_module, init_arguments)
+      super(base_module)
+      @init_arguments = init_arguments
+    end
+
+    private
+    def pre_load(repository, namespace)
+      init = repository.find(namespace, "init")
+      error, argc, argv = init.invoke(1 + @init_arguments.size,
+                                      [$0] + @init_arguments)
+      @init_arguments.replace(argv)
+      if error.to_i <= 0
+        raise InitError, "failed to initialize Clutter: #{error.name}"
+      end
+    end
+
+    def post_load(repository, namespace)
+    end
+  end
+end

data/sample/events.rb

@@ -0,0 +1,178 @@
+#!/usr/bin/env ruby
+#
+# This sample code is a port of
+# clutter-gtk/examples/gtk-clutter-events.c. The image file used in
+# this sample code is copied from
+# clutter-gtk/examples/redhand.png. They are licensed under the terms
+# of the GNU Lesser General Public License, version 2.1 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 "clutter-gtk"
+require "gdk_pixbuf2"
+
+ClutterGtk.init
+
+window = Gtk::Window.new
+window.title = "Gtk-Clutter Interaction demo"
+window.set_default_size(800, 600)
+window.resizable = false
+window.border_width = 12
+window.signal_connect("destroy") do
+  Gtk.main_quit
+end
+
+vbox = Gtk::Box.new(:vertical, 12)
+window.add(vbox)
+
+clutter_entry = nil
+gtk_entry = Gtk::Entry.new
+gtk_entry.text = "Enter some text"
+vbox.pack_start(gtk_entry, :expand => false, :fill => false, :padding => 0)
+gtk_entry.signal_connect("changed") do |editable|
+  clutter_entry.text = editable.text
+end
+
+hbox = Gtk::Box.new(:horizontal, 12)
+vbox.pack_start(hbox, :expand => true, :fill => true, :padding => 0)
+
+# Set up clutter & create our stage
+clutter_embed = ClutterGtk::Embed.new
+hbox.pack_start(clutter_embed, :expand => true, :fill => true, :padding => 0)
+clutter_embed.grab_focus
+stage = clutter_embed.stage
+clutter_embed.set_size_request(640, 480)
+stage.signal_connect("captured-event") do |_stage, event|
+  case event
+  when Clutter::ButtonEvent
+    puts("#{event.type.nick} captured at (#{event.x}, #{event.y})");
+  when Clutter::CrossingEvent
+    if event.source == _stage and not event.related.nil?
+      if event.type == Clutter::EventType::ENTER
+        stage_action = "Entering"
+        actor_action = "leaving"
+      else
+        stage_action = "Leaving"
+        actor_action = "entering"
+      end
+      puts("#{stage_action} the stage and #{actor_action} '#{event.related.name}'")
+    end
+  when Clutter::KeyEvent
+    if event.type == Clutter::EventType::KEY_PRESS
+      format = "the stage got a key press: '%s' (symbol: %d, unicode: 0x%x)"
+      unicode = [event.key_unicode].pack("U")
+      puts(format % [unicode, event.key_symbol, event.key_unicode])
+    end
+  end
+
+  not Clutter::Event::STOP
+end
+
+clutter_embed.signal_connect("enter-notify-event") do |widget|
+  puts("Entering widget '#{widget.class.name}'")
+  false
+end
+clutter_embed.signal_connect("leave-notify-event") do |widget|
+  puts("Leaving widget '#{widget.class.name}'")
+end
+
+# Create the main texture that the spin buttons manipulate
+pixbuf = Gdk::Pixbuf.new(File.expand_path("redhand.png", File.dirname(__FILE__)));
+hand = ClutterGtk::Texture.new
+hand.from_pixbuf = pixbuf
+stage.add_child(hand)
+hand.anchor_point_from_gravity = :center
+hand.set_position(stage.width / 2, stage.height / 2)
+hand.reactive = true
+hand.name = "Red Hand"
+hand.signal_connect("button-press-event") do |actor, event|
+  puts("Button press on hand ('#{actor.class.name}')")
+  not Clutter::Event::STOP
+end
+
+# Setup the clutter entry
+clutter_entry = Clutter::Text.new
+clutter_entry.color = Clutter::Color.new(:black)
+stage.add_child(clutter_entry)
+clutter_entry.set_position(0, 0)
+clutter_entry.set_size(500, 20)
+
+# Create our adjustment widgets
+vbox = Gtk::Box.new(:vertical, 6)
+hbox.pack_start(vbox, :expand => false, :fill => false, :padding => 0)
+
+box = Gtk::Box.new(:horizontal, 6)
+vbox.pack_start(box, :expand => false, :fill => true, :padding => 0)
+label = Gtk::Label.new("Rotate x-axis")
+box.pack_start(label, :expand => true, :fill => true, :padding => 0)
+button = Gtk::SpinButton.new(0, 360, 1)
+box.pack_start(button, :expand => true, :fill => true, :padding => 0)
+button.signal_connect("value-changed") do |_button|
+  hand.set_rotation(:x_axis,
+                    _button.value,
+                    0,
+                    hand.height / 2,
+                    0)
+end
+
+box = Gtk::Box.new(:horizontal, 6)
+vbox.pack_start(box, :expand => false, :fill => true, :padding => 0)
+label = Gtk::Label.new("Rotate y-axis")
+box.pack_start(label, :expand => true, :fill => true, :padding => 0)
+button = Gtk::SpinButton.new(0, 360, 1)
+box.pack_start(button, :expand => true, :fill => true, :padding => 0)
+button.signal_connect("value-changed") do |_button|
+  hand.set_rotation(:y_axis,
+                    _button.value,
+                    hand.width / 2,
+                    0,
+                    0)
+end
+
+box = Gtk::Box.new(:horizontal, 6)
+vbox.pack_start(box, :expand => false, :fill => true, :padding => 0)
+label = Gtk::Label.new("Rotate z-axis")
+box.pack_start(label, :expand => true, :fill => true, :padding => 0)
+button = Gtk::SpinButton.new(0, 360, 1)
+box.pack_start(button, :expand => true, :fill => true, :padding => 0)
+button.signal_connect("value-changed") do |_button|
+  hand.set_rotation(:z_axis,
+                    _button.value,
+                    hand.width / 2,
+                    hand.height / 2,
+                    0)
+end
+
+box = Gtk::Box.new(:horizontal, 6)
+vbox.pack_start(box, :expand => false, :fill => true, :padding => 0)
+label = Gtk::Label.new("Adjust opacity")
+box.pack_start(label, :expand => true, :fill => true, :padding => 0)
+button = Gtk::SpinButton.new(0, 255, 1)
+button.value = 255
+box.pack_start(button, :expand => true, :fill => true, :padding => 0)
+button.signal_connect("value-changed") do |_button|
+  hand.opacity = _button.value
+end
+
+window.show_all
+
+# Only show/show_all the stage after parent show. widget_show will call
+# show on the stage.
+stage.show
+
+Gtk.main

data/sample/multistage.rb

@@ -0,0 +1,176 @@
+#!/usr/bin/env ruby
+#
+# This sample code is a port of clutter-gtk/examples/gtk-clutter-multistage.c.
+# It is licensed under the terms of the GNU Lesser General Public
+# License, version 2.1 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 "clutter-gtk"
+require "gdk_pixbuf2"
+
+ClutterGtk.init
+
+window = Gtk::Window.new
+window.set_default_size(600, 400)
+window.title = "Multiple GtkClutterEmbed"
+window.signal_connect("destroy") do
+  Gtk.main_quit
+end
+
+notebook = Gtk::Notebook.new
+window.add(notebook)
+
+clutter0 = ClutterGtk::Embed.new
+notebook.append_page(clutter0, Gtk::Label.new("One stage"))
+stage0 = clutter0.stage
+stage0.background_color = Clutter::Color.new(0xdd, 0xff, 0xdd, 0xff)
+
+vbox = Gtk::Box.new(:vertical, 6)
+notebook.append_page(vbox, Gtk::Label.new("Two stages"))
+
+clutter1 = ClutterGtk::Embed.new
+clutter1.set_size_request(320, 240)
+stage1 = clutter1.stage
+stage1.background_color = Clutter::Color.new(0xff, 0xff, 0xff, 0xff)
+texture1 = ClutterGtk::Texture.new
+texture1.set_from_stock(clutter1, Gtk::Stock::DIALOG_INFO.to_s, :dialog)
+texture1.set_anchor_point(texture1.width / 2,
+                          texture1.height / 2)
+texture1.set_position(160, 120)
+stage1.add_child(texture1)
+texture1.show
+
+vbox.add(clutter1)
+
+clutter2 = ClutterGtk::Embed.new
+clutter2.set_size_request(320, 120)
+stage2 = clutter2.stage
+stage2.background_color = Clutter::Color.new(0x00, 0x00, 0x00, 0xff)
+texture2 = ClutterGtk::Texture.new
+texture2.set_from_icon_name(clutter1, "user-info", :button)
+texture2.set_anchor_point(texture2.width / 2,
+                          texture2.height / 2)
+texture2.set_position(160, 60)
+stage2.add_child(texture2)
+
+vbox.add(clutter2)
+
+stage2.signal_connect("allocation-changed") do |actor, allocation, flags|
+  texture2.set_position((allocation.x2 - allocation.x1) / 2,
+                        (allocation.y2 - allocation.y1) / 2)
+end
+
+window.show_all
+
+Gtk.main
+
+__END__
+#include <gtk/gtk.h>
+#include <clutter/clutter.h>
+
+#include <clutter-gtk/clutter-gtk.h>
+
+static void
+on_stage2_allocation_changed (ClutterActor           *stage_2,
+                              const ClutterActorBox  *allocation,
+                              ClutterAllocationFlags  flags,
+                              ClutterActor           *texture_2)
+{
+  clutter_actor_set_position (texture_2,
+                              (allocation->x2 - allocation->x1) / 2,
+                              (allocation->y2 - allocation->y1) / 2);
+}
+
+int
+main (int argc, char *argv[])
+{
+  ClutterActor *stage0, *stage1, *stage2, *tex1, *tex2;
+  GtkWidget *window, *clutter0, *clutter1, *clutter2;
+  GtkWidget *notebook, *vbox;
+  ClutterColor col0 = { 0xdd, 0xff, 0xdd, 0xff };
+  ClutterColor col1 = { 0xff, 0xff, 0xff, 0xff };
+  ClutterColor col2 = {    0,    0,    0, 0xff };
+
+  if (gtk_clutter_init (&argc, &argv) != CLUTTER_INIT_SUCCESS)
+    g_error ("Unable to initialize GtkClutter");
+
+  window = gtk_window_new (GTK_WINDOW_TOPLEVEL);
+  gtk_window_set_default_size (GTK_WINDOW (window), 600, 400);
+  gtk_window_set_title (GTK_WINDOW (window), "Multiple GtkClutterEmbed");
+  g_signal_connect (window, "destroy", G_CALLBACK (gtk_main_quit), NULL);
+
+  notebook = gtk_notebook_new ();
+  gtk_container_add (GTK_CONTAINER (window), notebook);
+
+  clutter0 = gtk_clutter_embed_new ();
+  gtk_notebook_append_page (GTK_NOTEBOOK (notebook), clutter0,
+                            gtk_label_new ("One stage"));
+  stage0 = gtk_clutter_embed_get_stage (GTK_CLUTTER_EMBED (clutter0));
+  clutter_actor_set_background_color (stage0, &col0);
+
+  vbox = gtk_box_new (GTK_ORIENTATION_VERTICAL, 6);
+  gtk_notebook_append_page (GTK_NOTEBOOK (notebook), vbox,
+                            gtk_label_new ("Two stages"));
+
+  clutter1 = gtk_clutter_embed_new ();
+  gtk_widget_set_size_request (clutter1, 320, 240);
+  stage1 = gtk_clutter_embed_get_stage (GTK_CLUTTER_EMBED (clutter1));
+  clutter_actor_set_background_color (stage1, &col1);
+  tex1 = gtk_clutter_texture_new ();
+  gtk_clutter_texture_set_from_stock (GTK_CLUTTER_TEXTURE (tex1),
+                                      clutter1,
+                                      GTK_STOCK_DIALOG_INFO,
+                                      GTK_ICON_SIZE_DIALOG,
+                                      NULL);
+  clutter_actor_set_anchor_point (tex1,
+                                  clutter_actor_get_width (tex1) / 2,
+                                  clutter_actor_get_height (tex1) / 2);
+  clutter_actor_set_position (tex1, 160, 120);
+  clutter_actor_add_child (stage1, tex1); 
+  clutter_actor_show (tex1);
+
+  gtk_container_add (GTK_CONTAINER (vbox), clutter1);
+
+  clutter2 = gtk_clutter_embed_new ();
+  gtk_widget_set_size_request (clutter2, 320, 120);
+  stage2 = gtk_clutter_embed_get_stage (GTK_CLUTTER_EMBED (clutter2));
+  clutter_actor_set_background_color (stage2, &col2);
+  tex2 = gtk_clutter_texture_new ();
+  gtk_clutter_texture_set_from_icon_name (GTK_CLUTTER_TEXTURE (tex2),
+                                          clutter1,
+                                          "user-info",
+                                          GTK_ICON_SIZE_BUTTON,
+                                          NULL);
+  clutter_actor_set_anchor_point (tex2,
+                                  clutter_actor_get_width (tex2) / 2,
+                                  clutter_actor_get_height (tex2) / 2);
+  clutter_actor_set_position (tex2, 160, 60);
+  clutter_actor_add_child (stage2, tex2);
+
+  gtk_container_add (GTK_CONTAINER (vbox), clutter2);
+
+  g_signal_connect (stage2, "allocation-changed",
+                    G_CALLBACK (on_stage2_allocation_changed),
+                    tex2);
+
+  gtk_widget_show_all (window);
+
+  gtk_main();
+
+  return 0;
+}

data/sample/test-actor.rb

@@ -0,0 +1,165 @@
+#!/usr/bin/env ruby
+#
+# This sample code is a port of clutter-gtk/examples/gtk-clutter-test-actor.c.
+# It is licensed under the terms of the GNU Lesser General Public
+# License, version 2.1 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 "clutter-gtk"
+
+ClutterGtk.init
+
+MAX_N_WIDGETS = 4
+WINDOW_WIDTH  = 400
+WINDOW_HEIGHT = 400
+RADIUS        = 80
+
+do_rotate_p   = true
+
+window = Gtk::Window.new
+window.signal_connect("destroy") do
+  Gtk.main_quit
+end
+
+vbox = Gtk::Box.new(:vertical, 6)
+window.add(vbox)
+
+clutter = ClutterGtk::Embed.new
+clutter.set_size_request(WINDOW_WIDTH, WINDOW_HEIGHT)
+
+vbox.pack_start(clutter, :expand => true, :fill => true, :padding => 0)
+
+stage = clutter.stage
+
+button = Gtk::Button.new(:stock_id => Gtk::Stock::QUIT)
+button.signal_connect("clicked") do |_button|
+  window.destroy
+end
+vbox.pack_end(button, :expand => false, :fill => false, :padding => 0)
+
+stage.background_color = Clutter::Color.new(0x61, 0x64, 0x8c, 0xff)
+
+widgets = []
+
+# create a new group to hold multiple actors in a group
+group = Clutter::Actor.new
+
+create_gtk_actor = lambda do
+  gtk_actor = ClutterGtk::Actor.new
+  bin = gtk_actor.widget
+
+  vbox = Gtk::Box.new(:vertical, 6)
+  bin.add(vbox)
+
+  button = Gtk::Button.new(:label => "A Button")
+  vbox.pack_start(button, :expand => false, :fill => false, :padding => 0)
+
+  button.signal_connect("clicked") do |_button|
+    puts("button clicked")
+    label = Gtk::Label.new("A new label")
+    label.show
+    vbox.pack_start(label, :expand => false, :fill => false, :padding => 0)
+  end
+
+  button = Gtk::CheckButton.new("Another button")
+  vbox.pack_start(button, :expand => false, :fill => false, :padding => 0)
+
+  entry = Gtk::Entry.new
+  vbox.pack_start(entry, :expand => false, :fill => false, :padding => 0)
+
+  bin.show_all
+
+  gtk_actor
+end
+
+add_clutter_actor = lambda do |actor, container, i|
+  container.add_child(actor)
+
+  # Place around a circle
+  w = widgets.first.width
+  h = widgets.first.height
+
+  x = WINDOW_WIDTH / 2  +
+    RADIUS * Math.cos(i * 2 * Math::PI / (MAX_N_WIDGETS)) - w / 2
+  y = WINDOW_HEIGHT / 2 +
+    RADIUS * Math.sin(i * 2 * Math::PI / (MAX_N_WIDGETS)) - h / 2
+
+  actor.set_position(x, y)
+end
+
+MAX_N_WIDGETS.times do |i|
+  widget = create_gtk_actor.call
+  widgets[i] = widget
+  add_clutter_actor.call(widget, group, i)
+end
+
+# Add the group to the stage and center it
+stage.add_child(group)
+group.add_constraint(Clutter::AlignConstraint.new(stage, :x_axis, 0.5))
+group.add_constraint(Clutter::AlignConstraint.new(stage, :y_axis, 0.5))
+
+window.show_all
+
+# Create a timeline to manage animation
+timeline = Clutter::Timeline.new(6000)
+timeline.repeat_count = -1
+
+# fire a callback for frame change
+timeline.signal_connect("new-frame") do |_timeline, m_secs|
+  rotation = _timeline.progress * 360.0
+  if do_rotate_p
+    # Rotate everything clockwise about stage center
+    group.set_rotation(:z_axis,
+                       rotation,
+                       WINDOW_WIDTH / 2,
+                       WINDOW_HEIGHT / 2,
+                       0)
+
+    widgets.each do |widget|
+      # rotate each widget around its center
+      w = widget.width
+      h = widget.height
+
+      widget.set_rotation(:z_axis,
+                          -(2 * rotation),
+                          w / 2,
+                          h / 2,
+                          0)
+      widget.opacity = 50 * Math.sin(2 * Math::PI * rotation / 360) + (255 - 50)
+    end
+  end
+end
+
+# and start it
+timeline.start
+
+GLib::Timeout.add_seconds(3) do
+  if MAX_N_WIDGETS == widgets.size
+    # Removing an item
+    group.remove_child(widgets.pop)
+  else
+    # Adding an item
+    widget = create_gtk_actor.call
+    widgets << widget
+    add_clutter_actor.call(widget, group, MAX_N_WIDGETS - 1)
+  end
+  keep_callback = true
+  keep_callback
+end
+
+Gtk.main