gtk3 0.0.1 → 1.2.0

data/Rakefile

@@ -0,0 +1,32 @@
+# -*- ruby -*-
+
+$LOAD_PATH.unshift("./../glib2/lib")
+require 'gnome2-raketask'
+
+package = GNOME2Package.new do |_package|
+  _package.summary = "Ruby/GTK3 is a Ruby binding of GTK+-3.x."
+  _package.description = "Ruby/GTK3 is a Ruby binding of GTK+-3.x."
+  _package.dependency.gem.runtime = ["glib2",
+                                     "gio2",
+                                     "atk",
+                                     "pango",
+                                     "gdk_pixbuf2",
+                                     "gdk3"]
+  _package.win32.packages = ["gtk+"]
+  _package.win32.dependencies = []
+  _package.required_ruby_version = ">= 1.9.2"
+  _package.post_install_message = "This library is experimental."
+end
+package.define_tasks
+
+namespace :win32 do
+  desc "create default gtkrc"
+  task :gtkrc do
+    gtkrc_path = File.join("vendor", "local", "etc", "gtk-2.0", "gtkrc")
+    mkdir_p(File.dirname(gtkrc_path))
+    File.open(gtkrc_path, "w") do |gtkrc|
+      gtkrc.puts('gtk-theme-name = "MS-Windows"')
+    end
+  end
+  task :download => :gtkrc
+end

data/ext/gtk3/conversions.c

@@ -0,0 +1,34 @@
+/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
+/*
+ *  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
+ */
+
+#include "rbgtk3private.h"
+
+static VALUE
+cairo_context_gvalue2rvalue(const GValue *value)
+{
+    return CRCONTEXT2RVAL(g_value_get_boxed(value));
+}
+
+void
+Init_conversions(void)
+{
+    rbgobj_register_g2r_func(CAIRO_GOBJECT_TYPE_CONTEXT, cairo_context_gvalue2rvalue);
+}
+

data/ext/gtk3/depend

@@ -0,0 +1,11 @@
+install-so: install-headers
+install-headers:
+	$(INSTALL_DATA) $(srcdir)/rbgtk3.h $(RUBYARCHDIR)
+	$(INSTALL_DATA) $(srcdir)/rbgtk3conversions.h $(RUBYARCHDIR)
+
+install: install-pc
+install-pc:
+	if test -n "$(pkgconfigdir)"; then			\
+	  $(MAKEDIRS) $(pkgconfigdir);				\
+	  $(INSTALL_DATA) ruby-gtk3.pc $(pkgconfigdir);		\
+	fi

data/ext/gtk3/extconf.rb

@@ -0,0 +1,108 @@
+=begin
+extconf.rb for Ruby/GTK extention library
+=end
+
+require 'pathname'
+
+source_dir = Pathname(__FILE__).dirname
+base_dir = source_dir.parent.parent.expand_path
+top_dir = base_dir.parent.expand_path
+top_build_dir = Pathname(".").parent.parent.parent.expand_path
+
+mkmf_gnome2_dir = top_dir + "glib2" + 'lib'
+version_suffix = ""
+unless mkmf_gnome2_dir.exist?
+  if /(-\d+\.\d+\.\d+)(?:\.\d+)?\z/ =~ base_dir.basename.to_s
+    version_suffix = $1
+    mkmf_gnome2_dir = top_dir + "glib2#{version_suffix}" + 'lib'
+  end
+end
+
+$LOAD_PATH.unshift(mkmf_gnome2_dir.to_s)
+
+module_name = "gtk3"
+package_id = "gtk+-3.0"
+
+begin
+  require 'mkmf-gnome2'
+rescue LoadError
+  require 'rubygems'
+  gem 'glib2'
+  require 'mkmf-gnome2'
+end
+
+have_func("rb_errinfo")
+
+["glib2", "gio2", "atk", "pango", "gdk_pixbuf2", "gdk3"].each do |package|
+  directory = "#{package}#{version_suffix}"
+  build_dir = "#{directory}/tmp/#{RUBY_PLATFORM}/#{package}/#{RUBY_VERSION}"
+  add_depend_package(package, "#{directory}/ext/#{package}",
+                     top_dir.to_s,
+                     :top_build_dir => top_build_dir.to_s,
+                     :target_build_dir => build_dir)
+end
+
+rcairo_options = {}
+rcairo_source_dir_names = ["rcairo"]
+if /mingw|cygwin|mswin32/ =~ RUBY_PLATFORM
+  rcairo_source_dir_names.unshift("rcairo.win32")
+end
+rcairo_source_dir_names.each do |rcairo_source_dir_name|
+  rcairo_source_dir = top_dir.parent.expand_path + rcairo_source_dir_name
+  if rcairo_source_dir.exist?
+    rcairo_options[:rcairo_source_dir] = rcairo_source_dir.to_s
+    break
+  end
+end
+check_cairo(rcairo_options)
+
+setup_win32(module_name, base_dir)
+
+unless required_pkg_config_package(package_id,
+                                   :debian => "libgtk-3-dev",
+                                   :fedora => "gtk3-devel",
+                                   :homebrew => "gtk+3",
+                                   :macports => "gtk3")
+  exit(false)
+end
+
+have_header("st.h")
+have_header("ruby/st.h")
+
+STDOUT.print("checking for targets... ")
+STDOUT.flush
+targets = PKGConfig.variable(package_id, "targets").split(/\s+/)
+STDOUT.print(targets.join(" "), "\n")
+
+gtk_header = "gtk/gtk.h"
+have_func('gtk_plug_get_type', gtk_header)
+have_func('gtk_socket_get_type', gtk_header)
+have_func('pango_render_part_get_type', gtk_header)
+have_header('gtk/gtkfilesystem.h') do |src|
+  "#define GTK_FILE_SYSTEM_ENABLE_UNSUPPORTED\n#{src}"
+end
+
+xlib_header = "X11/Xlib.h"
+if targets.include?("x11") and have_header('X11/Xlib.h') and have_library("X11")
+  have_func("XReadBitmapFileData", xlib_header)
+  have_func("XGetErrorText", xlib_header)
+end
+
+if !targets.include?("win32") and PKGConfig.have_package('gtk+-unix-print-3.0')
+  $defs.push("-DHAVE_GTK_UNIX_PRINT")
+end
+
+create_pkg_config_file("Ruby/GTK3", package_id, ruby_gnome2_version)
+
+ensure_objs
+
+$defs << "-DRUBY_GTK3_COMPILATION"
+create_makefile(module_name)
+
+pkg_config_dir = with_config("pkg-config-dir")
+if pkg_config_dir.is_a?(String)
+  File.open("Makefile", "ab") do |makefile|
+    makefile.puts
+    makefile.puts("pkgconfigdir=#{pkg_config_dir}")
+  end
+end

data/ext/gtk3/gtk3.def

@@ -0,0 +1,10 @@
+EXPORTS
+    Init_gtk3
+    rbgtk_initialize_gtkobject
+    gtk_accel_group_entry_get_type
+    gtk_accel_key_get_type
+    gtk_allocation_get_type
+    gtk_bindingset_get_type
+    gtk_recent_data_get_type
+    gtk_recent_filter_info_get_type
+    gtk_text_appearance_get_type

data/ext/gtk3/init.c

@@ -0,0 +1,38 @@
+/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
+/*
+ *  Copyright (C) 2011  Ruby-GNOME2 Project Team
+ *  Copyright (C) 2002-2006 Ruby-GNOME2 Project Team
+ *  Copyright (C) 1998-2001 Yukihiro Matsumoto,
+ *                          Daisuke Kanda,
+ *                          Hiroshi Igarashi
+ *
+ *  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 "rbgtk3private.h"
+
+extern void Init_gtk3(void);
+
+void
+Init_gtk3(void)
+{
+    Init_gdk_display();
+    Init_gdk_dragcontext();
+    Init_gdk_event();
+    Init_gdk_screen();
+    Init_gtk();
+    Init_conversions();
+}

data/ext/gtk3/rbgdkdisplay.c

@@ -0,0 +1,39 @@
+/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
+/*
+ *  Copyright (C) 2011  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
+ */
+
+#include "rbgtk3private.h"
+
+#define RG_TARGET_NAMESPACE cDisplay
+#define _SELF(self) (RVAL2GDKDISPLAYOBJECT(self))
+
+static VALUE
+rg_trigger_tooltip_query(VALUE self)
+{
+    gtk_tooltip_trigger_tooltip_query(_SELF(self));
+    return self;
+}
+
+void 
+Init_gdk_display(void)
+{
+    VALUE RG_TARGET_NAMESPACE = GTYPE2CLASS(GDK_TYPE_DISPLAY);
+
+    RG_DEF_METHOD(trigger_tooltip_query, 0);
+}

data/ext/gtk3/rbgdkdragcontext.c

@@ -0,0 +1,108 @@
+/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
+/*
+ *  Copyright (C) 2011  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
+ */
+
+#include "rbgtk3private.h"
+
+#define RG_TARGET_NAMESPACE cDragContext
+#define _SELF(self) (RVAL2GDKDRAGCONTEXT(self))
+
+static VALUE
+rg_finish(VALUE self, VALUE success, VALUE del, VALUE time)
+{
+    gtk_drag_finish(_SELF(self),
+                    RVAL2CBOOL(success),
+                    RVAL2CBOOL(del),
+                    NUM2UINT(time));
+    return self;
+}
+
+static VALUE
+rg_source_widget(VALUE self)
+{
+    return GOBJ2RVAL(gtk_drag_get_source_widget(_SELF(self)));
+}
+
+static VALUE
+rg_set_icon(VALUE self, VALUE icon)
+{
+    if (TYPE(icon) == T_HASH) {
+        VALUE stock_id, icon_name, gicon, pixbuf, surface, widget, hot_x, hot_y, buffer;
+        rbg_scan_options(icon,
+                         "stock_id", &stock_id,
+                         "icon_name", &icon_name,
+                         "gicon", &gicon,
+                         "pixbuf", &pixbuf,
+                         "surface", &surface,
+                         "widget", &widget,
+                         "hot_x", &hot_x,
+                         "hot_y", &hot_y,
+                         NULL);
+
+        if (!NIL_P(stock_id))
+            gtk_drag_set_icon_stock(_SELF(self),
+                                    RVAL2GLIBID(stock_id, buffer),
+                                    NUM2INT(hot_x), NUM2INT(hot_y));
+        else if (!NIL_P(icon_name))
+            gtk_drag_set_icon_name(_SELF(self),
+                                   RVAL2CSTR(icon_name),
+                                   NUM2INT(hot_x), NUM2INT(hot_y));
+#if GTK_CHECK_VERSION(3, 2, 0)
+        else if (!NIL_P(gicon))
+            gtk_drag_set_icon_gicon(_SELF(self),
+                                    RVAL2GICON(gicon),
+                                    NUM2INT(hot_x), NUM2INT(hot_y));
+#endif
+        else if (!NIL_P(pixbuf))
+            gtk_drag_set_icon_pixbuf(_SELF(self),
+                                     RVAL2GDKPIXBUF(pixbuf),
+                                     NUM2INT(hot_x), NUM2INT(hot_y));
+        else if (!NIL_P(surface))
+            gtk_drag_set_icon_surface(_SELF(self),
+                                      RVAL2CRSURFACE(surface));
+        else if (!NIL_P(widget))
+            gtk_drag_set_icon_widget(_SELF(self),
+                                     RVAL2GTKWIDGET(widget),
+                                     NUM2INT(hot_x), NUM2INT(hot_y));
+        else
+            rb_raise(rb_eArgError, "Invalid arguments.");
+    } else {
+        gtk_drag_set_icon_surface(_SELF(self), RVAL2CRSURFACE(icon));
+    }
+
+    return self;
+}
+
+static VALUE
+rg_set_icon_default(VALUE self)
+{
+    gtk_drag_set_icon_default(_SELF(self));
+    return self;
+}
+
+void
+Init_gdk_dragcontext(void)
+{
+    VALUE RG_TARGET_NAMESPACE = GTYPE2CLASS(GDK_TYPE_DRAG_CONTEXT);
+
+    RG_DEF_METHOD(finish, 3);
+    RG_DEF_METHOD(source_widget, 0);
+    RG_DEF_METHOD(set_icon, 1);
+    RG_DEF_METHOD(set_icon_default, 0);
+}

data/ext/gtk3/rbgdkevent.c

@@ -0,0 +1,38 @@
+/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
+/*
+ *  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
+ */
+
+#include "rbgtk3private.h"
+
+#define RG_TARGET_NAMESPACE cEvent
+#define _SELF(self) (RVAL2GEV(self))
+
+static VALUE
+rg_event_widget(VALUE self)
+{
+    return GOBJ2RVAL(gtk_get_event_widget(_SELF(self)));
+}
+
+void 
+Init_gdk_event(void)
+{
+    VALUE RG_TARGET_NAMESPACE = GTYPE2CLASS(GDK_TYPE_EVENT);
+
+    RG_DEF_METHOD(event_widget, 0);
+}

data/ext/gtk3/rbgdkscreen.c

@@ -0,0 +1,61 @@
+/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
+/*
+ *  Copyright (C) 2011  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
+ */
+
+#include "rbgtk3private.h"
+
+#define RG_TARGET_NAMESPACE cScreen
+#define _SELF(self) (RVAL2GDKSCREEN(self))
+
+static VALUE
+rg_add_provider(VALUE self, VALUE provider, VALUE priority)
+{
+    gtk_style_context_add_provider_for_screen(_SELF(self),
+                                              RVAL2GTKSTYLEPROVIDER(provider),
+                                              NUM2UINT(priority));
+
+    return self;
+}
+
+static VALUE
+rg_remove_provider(VALUE self, VALUE provider)
+{
+    gtk_style_context_remove_provider_for_screen(_SELF(self),
+                                                 RVAL2GTKSTYLEPROVIDER(provider));
+
+    return self;
+}
+
+static VALUE
+rg_reset_widgets(VALUE self)
+{
+    gtk_style_context_reset_widgets(_SELF(self));
+
+    return self;
+}
+
+void 
+Init_gdk_screen(void)
+{
+    VALUE RG_TARGET_NAMESPACE = GTYPE2CLASS(GDK_TYPE_SCREEN);
+
+    RG_DEF_METHOD(add_provider, 2);
+    RG_DEF_METHOD(remove_provider, 1);
+    RG_DEF_METHOD(reset_widgets, 0);
+}