clutter-gtk 1.2.0

data/sample/test-scroll.rb

@@ -0,0 +1,176 @@
+#!/usr/bin/env ruby
+#
+# This sample code is a port of clutter-gtk/examples/gtk-clutter-test-scroll.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
+
+N_WIDGETS     = 5
+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.add(clutter)
+
+stage = clutter.stage
+
+button = Gtk::Button.new(:stock_id => Gtk::Stock::QUIT)
+button.signal_connect("clicked") do |_button|
+  window.destroy
+end
+vbox.pack_start(button, :expand => false, :fill => false, :padding => 0)
+
+# and its background color
+stage.background_color = Clutter::Color.new(0x61, 0x64, 0x8c, 0xff)
+
+widgets = []
+
+# create a new group to hold multiple actors in a group
+group = Clutter::Group.new
+
+create_gtk_actor = lambda do
+  gtk_actor = ClutterGtk::Actor.new
+  bin = gtk_actor.widget
+
+  scroll = Gtk::ScrolledWindow.new
+  scroll.set_policy(:never, :automatic)
+  bin.add(scroll)
+
+  vbox = Gtk::Box.new(:vertical, 6)
+  scroll.add_with_viewport(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
+
+  6.times do |i|
+    button = Gtk::CheckButton.new("Another button")
+    vbox.pack_start(button, :expand => false, :fill => false, :padding => 0)
+  end
+
+  entry = Gtk::Entry.new
+  vbox.pack_start(entry, :expand => false, :fill => false, :padding => 0)
+
+  bin.show_all
+
+  gtk_actor
+end
+
+N_WIDGETS.times do |i|
+  widget = create_gtk_actor.call
+  widgets[i] = widget
+
+  # Place around a circle
+  w = widgets.first.width
+  h = widgets.first.height
+
+  x = WINDOW_WIDTH / 2  +
+    RADIUS * Math.cos(i * 2 * Math::PI / (N_WIDGETS)) - w / 2
+  y = WINDOW_HEIGHT / 2 +
+    RADIUS * Math.sin(i * 2 * Math::PI / (N_WIDGETS)) - h / 2
+
+  widget.set_position(x, y)
+
+  # Add to our group group
+  group.add_actor(widget)
+end
+
+# Add the group to the stage
+stage.add_actor(group)
+stage.signal_connect("button-press-event") do |_stage, event|
+  x, y = event.coords
+
+  actor = _stage.get_actor_at_pos(:all, x, y)
+  puts("click at #{x}, #{y} -> #{actor.gtype.name}:#{actor}")
+  if !actor.is_a?(Clutter::Stage) and !actor.is_a?(Clutter::Group)
+    actor.hide
+  end
+end
+stage.signal_connect("key-release-event") do |_sage, event|
+  unichar = [event.key_unicode].pack("U*")
+  puts("*** key press event (key:#{unichar}) ***")
+
+  if event.key_symbol == Clutter::Keys::KEY_q
+    Gtk.main_quit
+  end
+end
+
+window.show_all
+
+# Only show the actors after parent show otherwise it will just be
+# unrealized when the clutter foreign window is set. widget_show
+# will call show on the stage.
+group.show_all
+
+# Create a timeline to manage animation
+timeline = Clutter::Timeline.new(6000)
+timeline.loop = true
+
+# 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
+
+Gtk.main

data/sample/test.rb

@@ -0,0 +1,171 @@
+#!/usr/bin/env ruby
+#
+# This sample code is a port of
+# clutter-gtk/examples/gtk-clutter-test.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
+
+N_HANDS       = 4
+WINDOW_WIDTH  = 400
+WINDOW_HEIGHT = 400
+RADIUS        = 150
+
+fade_p        = false
+fullscreen_p  = false
+
+pixbuf = Gdk::Pixbuf.new(File.expand_path("redhand.png", File.dirname(__FILE__)))
+
+window = Gtk::Window.new
+window.set_default_size(WINDOW_WIDTH, WINDOW_HEIGHT)
+window.title = "Clutter Embedding"
+window.signal_connect("destroy") do
+  Gtk.main_quit
+end
+
+vbox = Gtk::Grid.new
+vbox.orientation = :vertical
+vbox.hexpand = true
+vbox.vexpand = true
+window.add(vbox)
+
+clutter = ClutterGtk::Embed.new
+vbox.add(clutter)
+
+stage = clutter.stage
+stage.background_color = Clutter::Color.new(:sky_blue_light)
+
+label = Gtk::Label.new("This is a label")
+vbox.add(label)
+label.hexpand = true
+
+button = Gtk::Button.new(:label => "This is a button...clicky")
+button.signal_connect("clicked") do |_button|
+  fade_p = !fade_p
+end
+vbox.add(button)
+button.hexpand = true
+
+button = Gtk::Button.new(:label => "Fullscreen")
+button.image = Gtk::Image.new(:stock => Gtk::Stock::FULLSCREEN, :size => :button)
+button.signal_connect("clicked") do |_button|
+  if fullscreen_p
+    window.unfullscreen
+    fullscreen_p = false
+  else
+    window.fullscreen
+    fullscreen_p = true
+  end
+end
+vbox.add(button)
+button.hexpand = true
+
+button = Gtk::Button.new(:stock_id => Gtk::Stock::QUIT)
+button.signal_connect("clicked") do |_button|
+  _button.destroy
+end
+vbox.add(button)
+button.hexpand = true
+
+group = Clutter::Actor.new
+hands = []
+N_HANDS.times do |i|
+  if i.zero?
+    hands[i] = ClutterGtk::Texture.new
+    hands[i].set_from_pixbuf(pixbuf)
+  else
+    hands[i] = Clutter::Clone.new(hands[0])
+  end
+
+  # Place around a circle
+  w = hands[0].width
+  h = hands[0].height
+
+  x = WINDOW_WIDTH / 2  + RADIUS * Math.cos(i * Math::PI / (N_HANDS / 2)) - w / 2
+  y = WINDOW_HEIGHT / 2 + RADIUS * Math.sin(i * Math::PI / (N_HANDS / 2)) - h / 2
+
+  hands[i].set_position(x, y)
+
+  # Add to our group group
+  group.add_child(hands[i])
+end
+
+# Add the group to the stage
+stage.add_child(group)
+
+constraint = Clutter::AlignConstraint.new(stage, :x_axis, 0.5)
+group.add_constraint(constraint)
+constraint = Clutter::AlignConstraint.new(stage, :y_axis, 0.5)
+group.add_constraint(constraint)
+
+stage.signal_connect("button-press-event") do |_stage, event|
+  x, y = event.coords
+  actor = _stage.get_actor_at_pos(:all, x, y)
+  if actor.is_a?(ClutterGtk::Texture) or actor.is_a?(Clutter::Clone)
+    actor.hide
+  end
+
+  Clutter::Event::STOP
+end
+stage.signal_connect("key-release-event") do |_stage, event|
+  puts("*** key press event (key:#{[event.key_unicode].pack('U*')}) ***")
+  case event.key_symbol
+  when Clutter::Keys::KEY_q
+      Gtk.main_quit
+  when Clutter::Keys::KEY_r
+    N_HANDS.times do |i|
+      hands[i].show
+    end
+  end
+
+  Clutter::Event::STOP
+end
+
+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, msecs|
+  rotation = _timeline.progress * 360.0
+  group.set_rotation(:z_axis, rotation, WINDOW_WIDTH / 2, WINDOW_HEIGHT / 2, 0)
+  N_HANDS.times do |i|
+    hands[i].set_rotation(:z_axis,
+                          -(6.0 * rotation),
+                          hands[i].width / 2,
+                          hands[i].height / 2,
+                          0)
+    if fade_p
+      hands[i].opacity = (255 - (rotation % 255))
+    end
+  end
+end
+
+# and start it
+timeline.start
+
+Gtk.main

data/sample/window-test.rb

@@ -0,0 +1,115 @@
+#!/usr/bin/env ruby
+#
+# This sample code is a port of clutter-gtk/examples/gtk-clutter-window-test.c.
+# It is licensed under the terms of the GNU Lesser General Public
+# License, version 2.1 or (at your option) later.
+#
+# The original header:
+#   (c) 2009, Collabora Ltd.
+#
+#   Written by Davyd Madeley <davyd.madeley@collabora.co.uk>
+#
+# 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 = ClutterGtk::Window.new
+window.signal_connect("destroy") do
+  Gtk.main_quit
+end
+window.set_default_size(400, 300)
+
+NAME_COLUMN   = 0
+PIXBUF_COLUMN = 1
+store = Gtk::ListStore.new(String, Gdk::Pixbuf)
+theme = Gtk::IconTheme.default
+[
+  "devhelp",
+  "empathy",
+  "evince",
+  "gnome-panel",
+  "seahorse",
+  "sound-juicer",
+  "totem",
+].each do |icon_name|
+  pixbuf = theme.load_icon(icon_name, 48, 0)
+  iter = store.append
+  iter[0] = icon_name
+  iter[1] = pixbuf
+end
+
+icon_view = Gtk::IconView.new(store)
+icon_view.text_column = NAME_COLUMN
+icon_view.pixbuf_column = PIXBUF_COLUMN
+
+scrolled_window = Gtk::ScrolledWindow.new
+window.add(scrolled_window)
+scrolled_window.add(icon_view)
+scrolled_window.show_all
+
+# Widget 2 is a toolbar
+stage = window.stage
+
+toolbar = Gtk::Toolbar.new
+[
+  Gtk::Stock::ADD,
+  Gtk::Stock::BOLD,
+  Gtk::Stock::ITALIC,
+  Gtk::Stock::CANCEL,
+  Gtk::Stock::CDROM,
+  Gtk::Stock::CONVERT,
+].each do |stock_id|
+  item = Gtk::ToolButton.new(:stock_id => stock_id)
+  toolbar.insert(item, -1)
+end
+
+toolbar.show_all
+actor = ClutterGtk::Actor.new(toolbar)
+actor.add_constraint(Clutter::BindConstraint.new(stage, :width, 0.0))
+actor.signal_connect("enter-event") do |_actor, event|
+  _actor.save_easing_state do
+    _actor.easing_mode = :linear
+
+    _actor.opacity = 255
+    _actor.y = 0
+  end
+
+  Clutter::Event::STOP
+end
+
+actor.signal_connect("leave-event") do |_actor, event|
+  _actor.save_easing_state do
+    _actor.easing_mode = :linear
+
+    _actor.opacity = 128
+    _actor.y = _actor.height * -0.5
+  end
+
+  Clutter::Event::STOP
+end
+
+actor.y = actor.height * -0.5
+actor.opacity = 128
+actor.reactive = true
+stage.add_child(actor)
+
+window.show_all
+
+Gtk.main

data/sample/window-test2.rb

@@ -0,0 +1,134 @@
+#!/usr/bin/env ruby
+#
+# This sample code is a port of clutter-gtk/examples/gtk-clutter-window-test2.c.
+# It is licensed under the terms of the GNU Lesser General Public
+# License, version 2.1 or (at your option) later.
+#
+# The original header:
+#   (c) 2009, Collabora Ltd.
+#
+#   Written by Davyd Madeley <davyd.madeley@collabora.co.uk>
+#
+# 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 = ClutterGtk::Window.new
+
+table = Gtk::Grid.new
+
+table.hexpand = true
+table.vexpand = true
+
+add_button = lambda do |stock_id, row|
+  button = Gtk::Button.new(:stock_id => stock_id)
+  table.insert_row(row)
+  table.insert_column(row)
+  table.attach(button, row, row, 1, 1)
+
+  button.signal_connect("clicked") do |_button|
+    puts("button clicked: #{stock_id}")
+
+    toplevel = _button.toplevel
+    if toplevel.is_a?(ClutterGtk::Window)
+      # create a texture from the button image
+      texture = ClutterGtk::Texture.new
+      image = _button.image
+      size = image.icon_size
+      texture.set_from_stock(_button, stock_id.to_s, size)
+
+      # position the texture on top of the existing icon
+      stage = toplevel.stage
+      stage.add_actor(texture)
+
+      allocation = image.allocation
+
+      # replace the icon itself
+      blank = Gdk::Pixbuf.new(:colorspace => :rgb,
+                              :has_alpha =>  true,
+                              :bits_per_sample => 8,
+                              :width => allocation.width,
+                              :height => allocation.height)
+      blank.fill!(0x00000000)
+      image.pixbuf = blank
+
+      # animate a fall due to gravity
+      toplevel_allocation = toplevel.allocation
+      texture.save_easing_state do
+        texture.easing_mode = :ease_in_quad
+        texture.easing_duration = 200
+        texture.set_final_state("x", allocation.x.to_f)
+        texture.set_final_state("y", allocation.y.to_f)
+        texture.y = toplevel_allocation.height.to_f
+      end
+
+      first_completed_id = texture.signal_connect_after("transitions-completed") do
+        image_allocation = image.allocation
+
+        # do the second animation, have the icon grow out from the middle of the
+        # button
+        texture.save_easing_state do
+          texture.easing_mode = :ease_out_sine
+          texture.easing_duration = 100
+          texture.set_final_state("x", image_allocation.x.to_f)
+          texture.set_final_state("y", image_allocation.y.to_f)
+          texture.set_final_state("scale-x", 0.0)
+          texture.set_final_state("scale-y", 0.0)
+          texture.scale_x = 1.0
+          texture.scale_y = 1.0
+          texture.set_final_state("scale-gravity", Clutter::Gravity::CENTER)
+        end
+
+        texture.signal_handler_disconnect(first_completed_id)
+
+        second_completed_id = texture.signal_connect_after("transitions-completed") do
+          # undo our changes
+          puts("set stock = #{stock_id}, size = #{size}")
+          image.icon_size = size
+          image.stock = stock_id
+          texture.signal_handler_disconnect(second_completed_id)
+          texture.destroy
+        end
+      end
+    end
+  end
+end
+
+add_button.call(Gtk::Stock::OK,     0)
+add_button.call(Gtk::Stock::CANCEL, 1)
+add_button.call(Gtk::Stock::CLOSE,  2)
+add_button.call(Gtk::Stock::ABOUT,  3)
+add_button.call(Gtk::Stock::BOLD,   4)
+add_button.call(Gtk::Stock::ITALIC, 5)
+
+window.add(table)
+window.show_all
+
+# override the gtk-button-images setting, since we kind
+# of rely on this to be true to actually show the stock
+# icon falling off the button
+settings = window.settings
+settings.gtk_button_images = true
+
+window.signal_connect("destroy") do
+  Gtk.main_quit
+end
+
+Gtk.main

data/test/clutter-gtk-test-utils.rb

@@ -0,0 +1,21 @@
+# 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 "test-unit"
+require "test/unit/notify"
+
+module ClutterGtkTestUtils
+end

data/test/run-test.rb

@@ -0,0 +1,50 @@
+#!/usr/bin/env ruby
+#
+# Copyright (C) 2012  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
+
+ruby_gnome2_base = File.join(File.dirname(__FILE__), "..", "..")
+ruby_gnome2_base = File.expand_path(ruby_gnome2_base)
+
+glib_base = File.join(ruby_gnome2_base, "glib2")
+gobject_introspection_base = File.join(ruby_gnome2_base, "gobject-introspection")
+clutter_base = File.join(ruby_gnome2_base, "clutter")
+
+modules = [
+  [glib_base, "glib2"],
+  [gobject_introspection_base, "gobject-introspection"],
+  [clutter_base, "clutter"],
+]
+modules.each do |target, module_name|
+  if system("which make > /dev/null")
+    `make -C #{target.dump} > /dev/null` or exit(false)
+  end
+  $LOAD_PATH.unshift(File.join(target, "ext", module_name))
+  $LOAD_PATH.unshift(File.join(target, "lib"))
+end
+
+$LOAD_PATH.unshift(File.join(glib_base, "test"))
+require "glib-test-init"
+
+$LOAD_PATH.unshift(File.join(gobject_introspection_base, "test"))
+require "gobject-introspection-test-utils"
+
+$LOAD_PATH.unshift(File.join(clutter_base, "test"))
+require "clutter-test-utils"
+
+require "clutter"
+
+exit Test::Unit::AutoRunner.run(true)