clutter-gtk 2.0.0-x86-mingw32

data/Rakefile

@@ -0,0 +1,74 @@
+# -*- 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/rake/package-task"
+
+package_task = GNOME2::Rake::PackageTask.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.windows.packages = []
+  package.windows.dependencies = []
+  package.windows.build_dependencies = [
+    "glib2",
+    "atk",
+    "pango",
+    "gdk_pixbuf2",
+    "gobject-introspection",
+    "clutter",
+    "gdk3",
+  ]
+  package.windows.gobject_introspection_dependencies = [
+    "atk",
+    "pango",
+    "gdk_pixbuf2",
+    "clutter",
+    "gdk3",
+  ]
+  package.external_packages = [
+    {
+      :name => "clutter-gtk",
+      :download_site => :gnome,
+      :label => "Clutter-GTK",
+      :version => "1.4.4",
+      :compression_method => "xz",
+      :windows => {
+        :configure_args => [
+          "--enable-introspection",
+        ],
+        :patches => [
+          "0001-actor-fix-clutter-win32.h-include-path.patch",
+        ]
+      },
+    }
+  ]
+end
+package_task.define
+
+Rake::Task["native:clutter-gtk:i386-mingw32"].prerequisites.clear
+
+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,65 @@
+# 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.expand_path
+vendor_dir = base_dir + "vendor" + "local"
+vendor_bin_dir = vendor_dir + "bin"
+GLib.prepend_dll_path(vendor_bin_dir)
+vendor_girepository_dir = vendor_dir + "lib" + "girepository-1.0"
+GObjectIntrospection.prepend_typelib_path(vendor_girepository_dir)
+
+module ClutterGtk
+  LOG_DOMAIN = "Clutter-Gtk"
+  GLib::Log.set_log_domain(LOG_DOMAIN)
+
+  @initialized = false
+  class << self
+    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;
+}