gtk2 0.20.0

data/README

@@ -0,0 +1,33 @@
+Ruby/GTK2
+=========
+Ruby/GTK2 is a Ruby binding of GTK+-2.0.x.
+
+Requirements
+------------
+   Ruby: http://www.ruby-lang.org/
+   GTK+: http://www.gtk.org/
+   Pango: http://www.pango.org/
+   cairo/rcairo: http://cairographics.org/ (optional)
+   Ruby/GLib2, Ruby/ATK, Ruby/Pango: http://ruby-gnome2.sourceforge.net/
+
+Install
+-------
+   0. install ruby-1.6.x or later, GTK+-2.0.x, Ruby/GLib2, Ruby/Pango 
+      (and cairo/rcairo).
+   1. ruby extconf.rb
+      (To use rcairo on Win32, set CAIRO_PATH as a environment variable first)
+   2. make
+   3. su
+   4. make install
+
+Copying
+-------
+   Copyright (c) 2002-2005 Ruby-GNOME2 Project Team
+
+   This program is free software.
+   You can distribute/modify this program under the terms of
+   the GNU LESSER GENERAL PUBLIC LICENSE Version 2.1.
+
+Project Website
+---------------
+   http://ruby-gnome2.sourceforge.jp/

data/Rakefile

@@ -0,0 +1,71 @@
+require 'rake/clean'
+CLEAN.include '**/*.o'
+CLEAN.include "**/*.#{Config::MAKEFILE_CONFIG['DLEXT']}"
+CLOBBER.include 'doc'
+CLOBBER.include '**/*.log'
+CLOBBER.include '**/Makefile'
+CLOBBER.include '**/extconf.h'
+
+# Determine the current version of the software
+def ruby_gtk_version
+  require 'glib2'
+  GLib::BINDING_VERSION.join('.')
+end
+
+CURRENT_VERSION = ruby_gtk_version
+
+desc "Default Task (Test project)"
+task :default => :test
+
+# Make tasks -----------------------------------------------------
+make_program = (/mswin/ =~ RUBY_PLATFORM) ? 'nmake' : 'make'
+MAKECMD = ENV['MAKE_CMD'] || make_program
+MAKEOPTS = ENV['MAKE_OPTS'] || ''
+
+GTK_SO = "src/gtk2.#{Config::MAKEFILE_CONFIG['DLEXT']}"
+
+file 'Makefile' => 'extconf.rb' do
+  sh "ruby extconf.rb #{ENV['EXTCONF_OPTS']}"
+end
+
+def make(target = '')
+  pid = system("#{MAKECMD} #{MAKEOPTS} #{target}")
+  $?.exitstatus
+end
+
+# Let make handle dependencies between c/o/so - we'll just run it. 
+file GTK_SO => (['Makefile'] + Dir['src/*.c'] + Dir['src/*.h']) do
+  m = make
+  fail "Make failed (status #{m})" unless m == 0
+end
+
+desc "Configure Gtk"
+task :configure => ['Makefile']
+
+desc "Compile the shared object"
+task :compile => [GTK_SO]
+
+desc "Run gtk tests"
+task :test => :compile do
+  sh "ruby test/run-test.rb"
+end
+
+desc 'Generate gem specification'
+task :gemspec do
+  require 'erb'
+  tspec = ERB.new(File.read(File.join(File.dirname(__FILE__),'src','gtk2.gemspec.erb')))
+  File.open(File.join(File.dirname(__FILE__),'gtk2.gemspec'),'wb') do|f|
+    f << tspec.result
+  end
+end
+
+desc 'Build gem'
+task :package => :gemspec do
+  require 'rubygems/specification'
+  spec_source = File.read File.join(File.dirname(__FILE__),'gtk2.gemspec')
+  spec = nil
+  # see: http://gist.github.com/16215
+  Thread.new { spec = eval("$SAFE = 3\n#{spec_source}") }.join
+  spec.validate
+  Gem::Builder.new(spec).build
+end

data/extconf.rb

@@ -0,0 +1,116 @@
+=begin
+extconf.rb for Ruby/GTK extention library
+=end
+
+PACKAGE_NAME = "gtk2"
+PKG_CONFIG_ID = "gtk+-2.0"
+
+begin
+  require 'mkmf-gnome2'
+  TOPDIR = File.expand_path(File.dirname(__FILE__))
+  SRCDIR = TOPDIR + '/src'
+  require 'glib2'
+  require 'pango'
+  require 'atk'
+  require 'gdk_pixbuf2'
+  USE_GNOME_GEMS=true
+rescue LoadError => e
+  puts "Not using gems"
+  USE_GNOME_GEMS=false
+
+  TOPDIR = File.expand_path(File.dirname(__FILE__) + '/..')
+  MKMF_GNOME2_DIR = TOPDIR + '/glib/src/lib'
+  SRCDIR = TOPDIR + '/gtk/src'
+
+  $LOAD_PATH.unshift MKMF_GNOME2_DIR
+
+  require 'mkmf-gnome2'
+end
+
+#
+# detect GTK+ configurations
+#
+
+PKGConfig.have_package('gthread-2.0')
+PKGConfig.have_package(PKG_CONFIG_ID) or exit 1
+setup_win32(PACKAGE_NAME)
+
+have_header("st.h")
+have_header("ruby/st.h")
+
+STDOUT.print("checking for target... ")
+STDOUT.flush
+target = PKGConfig.variable(PKG_CONFIG_ID, "target")
+$defs << "-DRUBY_GTK2_TARGET=\\\"#{target}\\\""
+STDOUT.print(target, "\n")
+
+#
+# detect location of GDK include files
+#
+gdkincl = nil
+tmpincl = $CFLAGS.gsub(/-D\w+/, '').split(/-I/) + ['/usr/include']
+tmpincl.each do |i|
+  i.strip!
+  
+  if FileTest.exist?(i + "/gdk/gdkkeysyms.h")
+    gdkincl = i + "/gdk"
+    break
+  end
+end
+raise "can't find gdkkeysyms.h" if gdkincl.nil?
+
+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 target == "x11" and have_header('X11/Xlib.h') and have_library("X11")
+  have_func("XReadBitmapFileData", xlib_header)
+  have_func("XGetErrorText", xlib_header)
+end
+
+if PKGConfig.have_package('gtk+-unix-print-2.0')
+  $defs.push("-DHAVE_GTK_UNIX_PRINT")
+end
+
+have_func("rb_errinfo")
+
+check_cairo
+if USE_GNOME_GEMS
+  path = File.expand_path(ENV['GEM_HOME'] + "/gems/glib2-#{GLib::BINDING_VERSION.join('.')}/src")
+  add_depend_package("glib2", path, '/')
+  path = File.expand_path(ENV['GEM_HOME'] + "/gems/pango-#{GLib::BINDING_VERSION.join('.')}/src")
+  add_depend_package("pango", path, '/')
+  path = File.expand_path(ENV['GEM_HOME'] + "/gems/atk-#{GLib::BINDING_VERSION.join('.')}/src")
+  add_depend_package("atk", path, '/')
+  path = File.expand_path(ENV['GEM_HOME'] + "/gems/gdkpixbuf-#{GLib::BINDING_VERSION.join('.')}/src")
+  add_depend_package("gdkpixbuf2", path, '/')
+else
+  add_depend_package("glib2", "glib/src", TOPDIR)
+  add_depend_package("pango", "pango/src", TOPDIR)
+  add_depend_package("atk", "atk/src", TOPDIR)
+end
+
+#
+# create Makefiles
+#
+
+add_distcleanfile("rbgdkkeysyms.h")
+add_distcleanfile("rbgtkinits.c")
+
+$defs.delete("-DRUBY_GTK2_COMPILATION")
+
+create_pkg_config_file("Ruby/GTK2", PKG_CONFIG_ID, ruby_gnome2_version)
+
+create_makefile_at_srcdir(PACKAGE_NAME, SRCDIR, "-DRUBY_GTK2_COMPILATION") {
+  File.delete("rbgtkinits.c") if FileTest.exist?("rbgtkinits.c")
+  SRCDIR_QUOTED = SRCDIR.gsub(' ', '\ ')
+  system("#{$ruby} #{SRCDIR_QUOTED}/makeinits.rb #{SRCDIR_QUOTED}/*.c > rbgtkinits.c") or raise "failed to make GTK inits"
+  system("#{$ruby} #{SRCDIR_QUOTED}/makekeysyms.rb #{gdkincl}/gdkkeysyms.h > rbgdkkeysyms.h") or raise "failed to make GDK Keysyms"
+}
+
+create_top_makefile(["src"])

data/src/global.h

@@ -0,0 +1,33 @@
+/* -*- c-file-style: "ruby" -*- */
+/************************************************
+
+  global.h -
+
+  $Author: sakai $
+  $Date: 2003/03/14 03:12:19 $
+
+  Copyright (C) 2002,2003 Ruby-GNOME2 Project Team
+  Copyright (C) 1998-2000 Yukihiro Matsumoto,
+                          Daisuke Kanda,
+                          Hiroshi Igarashi
+************************************************/
+
+#ifndef _RBGTK_GLOBAL_H
+#define _RBGTK_GLOBAL_H
+
+#include "rbgtk.h"
+#ifdef HAVE_RUBY_ST_H
+#  include <ruby/st.h>
+#else
+#  include <st.h>
+#endif
+
+#ifndef HAVE_RB_ERRINFO
+#  define rb_errinfo() (ruby_errinfo)
+#endif
+
+extern ID id_relative_callbacks;
+extern ID id_call;
+extern VALUE treeiter_set_value_table;
+
+#endif /* _RBGTK_GLOBAL_H */

data/src/init.c

@@ -0,0 +1,39 @@
+/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
+/************************************************
+
+  init.c -
+
+  $Author: mutoh $
+  $Date: 2006/10/21 16:58:00 $
+
+  Copyright (C) 2002-2006 Ruby-GNOME2 Project Team
+  Copyright (C) 1998-2001 Yukihiro Matsumoto,
+                          Daisuke Kanda,
+                          Hiroshi Igarashi
+************************************************/
+
+#include "global.h"
+#include "gmodule.h"
+
+extern void Init_gtk_gdk();
+extern void Init_gtk_gtk();
+extern void Init_gtk_inits();
+
+VALUE treeiter_set_value_table;
+
+void
+Init_gtk2()
+{
+    /*
+     * For Gtk::TreeModel, Gtk::TreeIter. 
+     * They should be initialized on this timing.
+     */
+    treeiter_set_value_table = rb_hash_new();
+    rb_global_variable(&treeiter_set_value_table);
+
+    Init_gtk_gdk();
+    Init_gtk_gtk();
+
+    Init_gtk_inits();
+
+}

data/src/lib/gtk2.rb

@@ -0,0 +1,13 @@
+#! /usr/bin/env ruby
+=begin
+  gtk2.rb
+
+  Copyright (c) 2006 Ruby-GNOME2 Project Team
+  This program is licenced under the same licence as Ruby-GNOME2.
+
+  $Id: gtk2.rb,v 1.9 2006/06/17 13:18:12 mutoh Exp $
+=end
+
+require 'gtk2/base'
+
+Gtk.init

data/src/lib/gtk2/base.rb

@@ -0,0 +1,95 @@
+#! /usr/bin/env ruby
+=begin
+  gtk2/base.rb
+
+  Copyright (c) 2006 Ruby-GNOME2 Project Team
+  This program is licenced under the same licence as Ruby-GNOME2.
+
+  $Id: base.rb,v 1.6 2007/08/13 11:09:22 ktou Exp $
+=end
+
+
+require 'glib2'
+require 'atk'
+require 'pango'
+require 'gtk2.so'
+require 'gdk_pixbuf2'
+
+module Gdk
+  LOG_DOMAIN = "Gdk"
+end
+
+if Gdk.cairo_available?
+  module Cairo
+    class Context
+      if method_defined?(:set_source_color)
+        alias_method :set_source_not_gdk_color, :set_source_color
+        def set_source_color(color)
+          if color.is_a?(Gdk::Color)
+            set_source_gdk_color(color)
+          else
+            set_source_not_gdk_color(color)
+          end
+        end
+      else
+        alias_method :set_source_color, :set_source_gdk_color
+      end
+
+      def source_color=(color)
+        set_source_color(color)
+        color
+      end
+    end
+  end
+end
+
+
+module Gtk
+  LOG_DOMAIN = "Gtk"
+
+  class Printer
+    def self.printers(wait = false)
+      printers = []
+      self.each(wait) {|v| printers << v}
+      printers
+    end
+  end
+
+  if check_version?(2, 12, 0)
+    class Builder
+      private
+      def canonical_handler_name(name)
+        name.gsub(/[-\s]+/, "_")
+      end
+
+      def __connect_signals__(connector, object, signal_name,
+                              handler_name, connect_object, flags)
+        handler_name = canonical_handler_name(handler_name)
+        if connect_object
+          handler = connect_object.method(handler_name)
+        else
+          handler = connector.call(handler_name)
+        end
+        unless handler
+          $stderr.puts("Undefined handler: #{handler_name}") if $DEBUG
+          return
+        end
+
+        if flags.after?
+          signal_connect_method = :signal_connect_after
+        else
+          signal_connect_method = :signal_connect
+        end
+
+        if handler.arity.zero?
+          object.send(signal_connect_method, signal_name) {handler.call}
+        else
+          object.send(signal_connect_method, signal_name, &handler)
+        end
+      end
+    end
+  end
+end
+
+GLib::Log.set_log_domain(Gdk::LOG_DOMAIN)
+GLib::Log.set_log_domain(Gtk::LOG_DOMAIN)

data/src/makeinits.rb

@@ -0,0 +1,57 @@
+except_targets = ["Init_gtk2()", "Init_gtk_gdk()", "Init_gtk_gtk()"]
+
+def print_data(array, type, defs, extern = false)
+  if array[type]
+    dependencies = {
+      "Init_gtk_gdk_gc()" => ["Init_gtk_gdk_draw()"],
+    }
+    extern_def = "extern void" if extern
+    print "##{defs} #{type}\n" if defs
+    sorted_array = array[type].dup
+    dependencies.each do |key, values|
+      key_index = sorted_array.index(key)
+      values.each do |value|
+        value_index = sorted_array.index(value)
+        next if value_index.nil?
+        sorted_array.delete(value)
+        sorted_array[key_index - 1, 0] = value
+        key_index = sorted_array.index(key)
+      end
+    end
+    sorted_array.each do |val|
+	   print "#{extern_def}   #{val};\n"
+    end
+    print "#endif\n" if defs
+  end
+end
+
+inits = Hash.new
+
+while gets
+  if ~ /^(Init_.*\(\))(.*)/
+	init = $1
+	unless except_targets.include?(init)
+	  flag = $2
+	  if flag.size > 0
+		if flag =~ /\/\*\s*(\w*)\s*\*\//
+		  inits[$1] = Array.new unless inits[$1]
+		  inits[$1] << init
+		end
+	  else
+		inits[""] = Array.new unless inits[""]
+		inits[""] << init
+	  end
+	end
+  end
+end
+
+print_data(inits, "", nil, true)
+print_data(inits, "GTK_DISABLE_DEPRECATED", "ifndef", true)
+print_data(inits, "GTK_ENABLE_BROKEN", "ifdef", true)
+
+print "void Init_gtk_inits()\n"
+print "{\n"
+print_data(inits, "", nil)
+print_data(inits, "GTK_DISABLE_DEPRECATED", "ifndef")
+print_data(inits, "GTK_ENABLE_BROKEN", "ifdef")
+print "}\n"