glib2 0.20.0

data/src/glib-enum-types.h

@@ -0,0 +1,140 @@
+
+/* Generated by glib-mkenums.rb ($Id$) */ 
+
+#ifndef __GLIB_ENUM_TYPES_H__
+#define __GLIB_ENUM_TYPES_H__
+
+#include <glib-object.h>
+
+G_BEGIN_DECLS
+
+/* enumerations from "/opt/local/include/glib-2.0/glib/gbookmarkfile.h" */
+GType g_bookmark_file_error_get_type (void);
+#define G_TYPE_BOOKMARK_FILE_ERROR (g_bookmark_file_error_get_type())
+
+/* enumerations from "/opt/local/include/glib-2.0/glib/gchecksum.h" */
+GType g_checksum_type_get_type (void);
+#define G_TYPE_CHECKSUM_TYPE (g_checksum_type_get_type())
+
+/* enumerations from "/opt/local/include/glib-2.0/glib/gconvert.h" */
+GType g_convert_error_get_type (void);
+#define G_TYPE_CONVERT_ERROR (g_convert_error_get_type())
+
+/* enumerations from "/opt/local/include/glib-2.0/glib/gdate.h" */
+GType g_date_dmy_get_type (void);
+#define G_TYPE_DATE_DMY (g_date_dmy_get_type())
+GType g_date_weekday_get_type (void);
+#define G_TYPE_DATE_WEEKDAY (g_date_weekday_get_type())
+GType g_date_month_get_type (void);
+#define G_TYPE_DATE_MONTH (g_date_month_get_type())
+
+/* enumerations from "/opt/local/include/glib-2.0/glib/gfileutils.h" */
+GType g_file_error_get_type (void);
+#define G_TYPE_FILE_ERROR (g_file_error_get_type())
+GType g_file_test_get_type (void);
+#define G_TYPE_FILE_TEST (g_file_test_get_type())
+
+/* enumerations from "/opt/local/include/glib-2.0/glib/ghook.h" */
+GType g_hook_flag_mask_get_type (void);
+#define G_TYPE_HOOK_FLAG_MASK (g_hook_flag_mask_get_type())
+
+/* enumerations from "/opt/local/include/glib-2.0/glib/gkeyfile.h" */
+GType g_key_file_error_get_type (void);
+#define G_TYPE_KEY_FILE_ERROR (g_key_file_error_get_type())
+GType g_key_file_flags_get_type (void);
+#define G_TYPE_KEY_FILE_FLAGS (g_key_file_flags_get_type())
+
+/* enumerations from "/opt/local/include/glib-2.0/glib/gmarkup.h" */
+GType g_markup_error_get_type (void);
+#define G_TYPE_MARKUP_ERROR (g_markup_error_get_type())
+GType g_markup_parse_flags_get_type (void);
+#define G_TYPE_MARKUP_PARSE_FLAGS (g_markup_parse_flags_get_type())
+GType g_markup_collect_type_get_type (void);
+#define G_TYPE_MARKUP_COLLECT_TYPE (g_markup_collect_type_get_type())
+
+/* enumerations from "/opt/local/include/glib-2.0/glib/gmessages.h" */
+GType g_log_level_flags_get_type (void);
+#define G_TYPE_LOG_LEVEL_FLAGS (g_log_level_flags_get_type())
+
+/* enumerations from "/opt/local/include/glib-2.0/glib/gnode.h" */
+GType g_traverse_flags_get_type (void);
+#define G_TYPE_TRAVERSE_FLAGS (g_traverse_flags_get_type())
+GType g_traverse_type_get_type (void);
+#define G_TYPE_TRAVERSE_TYPE (g_traverse_type_get_type())
+
+/* enumerations from "/opt/local/include/glib-2.0/glib/goption.h" */
+GType g_option_flags_get_type (void);
+#define G_TYPE_OPTION_FLAGS (g_option_flags_get_type())
+GType g_option_arg_get_type (void);
+#define G_TYPE_OPTION_ARG (g_option_arg_get_type())
+GType g_option_error_get_type (void);
+#define G_TYPE_OPTION_ERROR (g_option_error_get_type())
+
+/* enumerations from "/opt/local/include/glib-2.0/glib/gregex.h" */
+GType g_regex_error_get_type (void);
+#define G_TYPE_REGEX_ERROR (g_regex_error_get_type())
+GType g_regex_compile_flags_get_type (void);
+#define G_TYPE_REGEX_COMPILE_FLAGS (g_regex_compile_flags_get_type())
+GType g_regex_match_flags_get_type (void);
+#define G_TYPE_REGEX_MATCH_FLAGS (g_regex_match_flags_get_type())
+
+/* enumerations from "/opt/local/include/glib-2.0/glib/gshell.h" */
+GType g_shell_error_get_type (void);
+#define G_TYPE_SHELL_ERROR (g_shell_error_get_type())
+
+/* enumerations from "/opt/local/include/glib-2.0/glib/gslice.h" */
+GType g_slice_config_get_type (void);
+#define G_TYPE_SLICE_CONFIG (g_slice_config_get_type())
+
+/* enumerations from "/opt/local/include/glib-2.0/glib/gspawn.h" */
+GType g_spawn_error_get_type (void);
+#define G_TYPE_SPAWN_ERROR (g_spawn_error_get_type())
+GType g_spawn_flags_get_type (void);
+#define G_TYPE_SPAWN_FLAGS (g_spawn_flags_get_type())
+
+/* enumerations from "/opt/local/include/glib-2.0/glib/gstrfuncs.h" */
+GType g_ascii_type_get_type (void);
+#define G_TYPE_ASCII_TYPE (g_ascii_type_get_type())
+
+/* enumerations from "/opt/local/include/glib-2.0/glib/gtestutils.h" */
+GType g_test_trap_flags_get_type (void);
+#define G_TYPE_TEST_TRAP_FLAGS (g_test_trap_flags_get_type())
+GType g_test_log_type_get_type (void);
+#define G_TYPE_TEST_LOG_TYPE (g_test_log_type_get_type())
+
+/* enumerations from "/opt/local/include/glib-2.0/glib/gthread.h" */
+GType g_thread_error_get_type (void);
+#define G_TYPE_THREAD_ERROR (g_thread_error_get_type())
+GType g_thread_priority_get_type (void);
+#define G_TYPE_THREAD_PRIORITY (g_thread_priority_get_type())
+GType g_once_status_get_type (void);
+#define G_TYPE_ONCE_STATUS (g_once_status_get_type())
+
+/* enumerations from "/opt/local/include/glib-2.0/glib/gunicode.h" */
+GType g_unicode_type_get_type (void);
+#define G_TYPE_UNICODE_TYPE (g_unicode_type_get_type())
+GType g_unicode_break_type_get_type (void);
+#define G_TYPE_UNICODE_BREAK_TYPE (g_unicode_break_type_get_type())
+GType g_unicode_script_get_type (void);
+#define G_TYPE_UNICODE_SCRIPT (g_unicode_script_get_type())
+GType g_normalize_mode_get_type (void);
+#define G_TYPE_NORMALIZE_MODE (g_normalize_mode_get_type())
+
+/* enumerations from "/opt/local/include/glib-2.0/glib/gutils.h" */
+GType g_user_directory_get_type (void);
+#define G_TYPE_USER_DIRECTORY (g_user_directory_get_type())
+
+/* enumerations from "/opt/local/include/glib-2.0/gobject/gsignal.h" */
+GType g_signal_flags_get_type (void);
+#define G_TYPE_SIGNAL_FLAGS (g_signal_flags_get_type())
+GType g_connect_flags_get_type (void);
+#define G_TYPE_CONNECT_FLAGS (g_connect_flags_get_type())
+GType g_signal_match_type_get_type (void);
+#define G_TYPE_SIGNAL_MATCH_TYPE (g_signal_match_type_get_type())
+
+G_END_DECLS
+
+#endif /* __GLIB_ENUM_TYPES_H__ */
+
+/* Generated data ends here */
+

data/src/lib/glib-mkenums.rb

@@ -0,0 +1,199 @@
+#
+# glib-mkenums.rb
+#
+# C language enum description generation library like as glib-mkenums tool.
+#
+# Copyright(C) 2006-2008 Ruby-GNOME2 Project.
+#
+# This program is licenced under the same license of Ruby-GNOME2.
+#
+
+module GLib
+  class EnumDefinition
+    attr_accessor :EnumName, :enum_name, :ENUM_NAME, :ENUM_SHORT
+    attr_accessor :type, :Type
+    attr_accessor :g_type_prefix, :prefix
+
+    attr_reader :constants
+
+    def initialize(name, const_lines, g_type_prefix, options={})
+      @options = options || {}
+      @EnumName = name
+      @g_type_prefix = g_type_prefix
+      @constants = []
+      @enum_name = @EnumName.sub(/^[A-Z]/){|v| v.downcase}.gsub(/[A-Z]+/){|v| "_" + v.downcase}.sub(/(^_|_$)/, "")
+      @ENUM_NAME = @enum_name.upcase
+      @ENUM_SHORT = @ENUM_NAME.sub(/^#{@g_type_prefix.sub(/_TYPE.*$/, "")}/, "").sub(/^_/, "")
+
+      parse_const_lines(const_lines)
+    end
+
+    def parse_const_lines(const_lines)
+      ret = ""
+
+      if @options[:force_flags] or /<</ =~ const_lines
+        @type = "flags"
+        @Type = "Flags"
+      else
+        @type = "enum"
+        @Type = "Enum"
+      end
+      constants = []
+      const_lines.scan(/^\s*([^\s,]*).*\n/) do |name|
+        constants << name[0] unless name[0] =~ /(^[\/\*]|^$)/
+      end
+      @prefix = extract_prefix(constants)
+      constants.each do |name|
+        @constants << [name, name.sub(/#{@prefix}/, "").gsub(/_/, "-").downcase]
+      end
+    end
+
+    def extract_prefix(ary)
+      return [] if ary == nil
+      a = ary[0].split(//)
+      if ary.size == 1
+        @ENUM_NAME + "_"
+      else
+        ary[1..-1].each do |b|
+          b = b.split(//)
+          l = [a.length, b.length].min
+          a = a[0, (0...l).find{|i| a[i] != b[i] } || l]
+        end 
+        a.join('')
+      end
+    end
+
+    def create_c
+      constants = "\n" + @constants.collect{|name, nick|
+        %Q[      { #{name}, "#{name}", "#{nick}" },\n] 
+      }.join +
+        %Q[      { 0, NULL, NULL }]
+
+      ret = <<-CREATE_C
+
+GType
+#{@enum_name}_get_type (void)
+{
+  static GType etype = 0;
+  if (etype == 0) {
+    static const G#{@Type}Value values[] = {#{constants}
+    };
+    etype = g_#{@type}_register_static ("#{@EnumName}", values);
+  }
+  return etype;
+}
+      CREATE_C
+      ret
+    end
+
+    def create_h
+      %Q[
+GType #{@enum_name}_get_type (void);
+#define #{@g_type_prefix}#{@ENUM_SHORT} (#{@enum_name}_get_type())]
+    end
+
+
+    def self.parse(data, g_type_prefix, options={})
+      options ||= {}
+      enums = []
+      data.scan(/^\s*typedef\s+enum\s*
+                \{?\s*(.*?)
+                \}\s*(\w+);/mx){|constants, name|
+        enum_options = {}
+        force_flags_patterns = [(options[:force_flags] || [])].flatten
+        if force_flags_patterns.any? {|pattern| pattern === name}
+          enum_options[:force_flags] = true
+        end
+        enum = new(name, constants, g_type_prefix, enum_options)
+        enums << enum
+      }
+      enums
+    end
+  end
+
+  class MkEnums
+    # Create target_filename.c and target_filename.h from files
+    # with g_type_prefix and include_files.
+    # * target_filename: the target file name. This creates #{target_filename.c} and #{target_filename.h}.
+    # * files: header files to parse
+    # * g_type_prefix: the gtype prefix such as GTK_TYPE_
+    # * include_files: define #include <file> lines into target_filename.c
+    def self.create(target_filename, files, g_type_prefix, include_files,
+                    options)
+      puts "creating #{target_filename}.c"
+      mkenums = MkEnums.new(target_filename, files, g_type_prefix, include_files,
+                            options)
+
+      open("#{target_filename}.c", "w") do |out|
+        out.write(mkenums.create_c)
+      end
+      puts "creating #{target_filename}.h"
+      open("#{target_filename}.h", "w") do |out|
+        out.write(mkenums.create_h)
+      end
+    end
+
+    # Initialize GLib::MkEnums
+    #
+    # * target_filename: the target file name. This creates #{target_filename.c} and #{target_filename.h}.
+    # * files: header files to parse
+    # * g_type_prefix: the gtype prefix such as GTK_TYPE_
+    # * include_files: define #include <file> lines into target_filename.c
+    def initialize(target_filename, files, g_type_prefix, include_files, options)
+      @target_filename = target_filename
+      @include_files = include_files
+      @targets = []
+      files.each do |path|
+        data = ""
+        File.open(path) do |i|
+          data = i.read
+        end
+        @targets << [path, EnumDefinition.parse(data, g_type_prefix, options)]
+      end
+    end
+
+    def create_enums(meth)  # :nodoc:
+      ret = ""
+      @targets.each do |target|
+        if target[1].size > 0
+          ret << %Q[\n\n/* enumerations from "#{target[0]}" */]
+          target[1].each{|enum|
+            ret << enum.__send__(meth)
+          }
+        end
+      end
+      ret
+    end
+
+    # Create a C source as a String.
+    def create_c
+      ret = "\n/* Generated by glib-mkenums.rb ($Id$) */ \n\n"
+      ret << %Q[#include "#{@target_filename}.h"\n]
+      @include_files.each do |file|
+        ret << "#include <#{file}>\n"
+      end
+      ret << "\n"
+      ret << create_enums(:create_c)
+      ret << "\n\n/* Generated data ends here */\n\n"
+      ret
+    end
+
+    # Create a C header as a String.
+    def create_h
+      header = "#{@target_filename}.h"
+      const = "__#{File.basename(header).upcase.gsub(/-|\./, '_')}__"
+
+      ret = "\n/* Generated by glib-mkenums.rb ($Id$) */ \n\n"
+      ret << "#ifndef #{const}\n"
+      ret << "#define #{const}\n\n"
+      ret << "#include <glib-object.h>\n\n"
+      ret << "G_BEGIN_DECLS"
+      ret << create_enums(:create_h)
+      ret << "\n\nG_END_DECLS\n\n"
+      ret << "#endif /* #{const} */\n"
+      ret << "\n/* Generated data ends here */\n\n"
+      ret
+    end
+  end
+end
+

data/src/lib/glib2.rb

@@ -0,0 +1,220 @@
+#
+# glib2.rb
+# Copyright(C) 2005 Ruby-GNOME2 Project.
+#
+# This program is licenced under the same 
+# license of Ruby-GNOME2.
+#
+
+require 'rbconfig'
+if /mingw|mswin|mswin32/ =~ RUBY_PLATFORM
+  ENV['PATH'] = %w(bin lib).collect{|dir|
+    "#{Config::CONFIG["prefix"]}\\lib\\GTK\\#{dir};"
+  }.join('') + ENV['PATH']
+end
+
+require 'English'
+require 'thread'
+
+module GLib
+  module_function
+  def check_binding_version?(major, minor, micro)
+    BINDING_VERSION[0] > major ||
+      (BINDING_VERSION[0] == major && 
+       BINDING_VERSION[1] > minor) ||
+      (BINDING_VERSION[0] == major && 
+       BINDING_VERSION[1] == minor &&
+       BINDING_VERSION[2] >= micro)  
+  end
+
+  def exit_application(exception, status)
+    msg = exception.message || exception.to_s
+    msg = exception.class.to_s if msg == ""
+    backtrace = exception.backtrace
+    $stderr.puts backtrace.shift + ": #{msg}"
+    backtrace.each do |v|
+      $stderr.puts "\t from #{v}"
+    end
+    exit(status)
+  end
+
+  def __add_one_arg_setter(klass)
+    #for Instance methods.
+    ary = klass.instance_methods(false)
+    ary.each do |m|
+      if /^set_(.*)/ =~ m and not ary.include? "#{$1}=" and klass.instance_method(m).arity == 1
+	begin
+          klass.module_eval("def #{$1}=(val); set_#{$1}(val); val; end\n")
+        rescue SyntaxError
+          $stderr.print "Couldn't create #{klass}\##{$1}=(v).\n" if $DEBUG
+        end
+      end
+    end
+    #for Class methods/Module functions.
+    if Object.method(:methods).arity == -1
+      ary = klass.methods(false)
+    else
+      ary = klass.methods
+    end
+    ary.each do |m|
+      if /^set_(.*)/ =~ m and not ary.include? "#{$1}=" and klass.method(m).arity == 1
+	begin
+          klass.module_eval("def self.#{$1}=(val); set_#{$1}(val); val; end\n")
+        rescue SyntaxError
+          $stderr.print "Couldn't create #{klass}\##{$1}=(v).\n" if $DEBUG
+        end
+      end
+    end
+  end
+end
+
+require 'glib2.so'
+
+module GLib
+  
+  class Type
+
+    def decendants
+      [self] + children.map{|t| t.decendants }.flatten
+    end
+
+    def ancestors
+      #  ([self] + interfaces + (parent ? parent.ancestors : [])).reverse.uniq.reverse
+      [self] + (parent ? parent.ancestors : [])
+    end
+  end
+
+
+  class Enum
+    def _dump(limit)
+      Marshal.dump(to_i, limit)
+    end
+
+    def self._load(obj)
+      new(Marshal.load(obj))
+    end
+  end
+
+
+  class Flags
+    def _dump(limit)
+      Marshal.dump(to_i, limit)
+    end
+
+    def self._load(obj)
+      new(Marshal.load(obj))
+    end
+
+    # FIXME
+    def inspect
+      values = self.class.values
+      if values.find{|x| x == self }
+        body = nick
+      else
+        a = values.select{|x| self >= x }
+        a = a.reject{|x| a.find{|y| y > x } }
+        body = a.empty? ? '{}' : a.map{|x| x.nick }.join('|')
+      end
+      format('#<%s %s>', self.class.inspect, body)
+    end
+  end
+
+  module Log
+    DOMAIN = "Ruby/GLib"
+    LEVELS = { 
+      LEVEL_ERROR => "ERROR",
+      LEVEL_CRITICAL => "CRITICAL",
+      LEVEL_WARNING => "WARNING",
+      LEVEL_MESSAGE => "MESSAGE",
+      LEVEL_INFO => "INFO",
+      LEVEL_DEBUG => "DEBUG"
+    }
+
+    module_function
+    def error(str)
+      log(DOMAIN, LEVEL_ERROR, caller(1)[0] << ": " << str)
+    end
+    def message(str)
+      log(DOMAIN, LEVEL_MESSAGE, caller(1)[0] << ": " << str)
+    end
+    def critical(str)
+      log(DOMAIN, LEVEL_CRITICAL, caller(1)[0] << ": " << str)
+    end
+    def warning(str)
+      log(DOMAIN,  LEVEL_WARNING, caller(1)[0] << ": " << str)
+    end
+    
+    def set_log_domain(domain)
+      level = GLib::Log::LEVEL_MASK
+      if $DEBUG
+        level = 255
+      elsif $VERBOSE
+        level = 127
+      end
+      GLib::Log.set_handler(domain, level)
+    end
+  end
+
+  if const_defined?(:UserDirectory)
+    class UserDirectory
+      constants.each do |name|
+        if /\ADIRECTORY_/ =~ name
+          const_set($POSTMATCH, const_get(name))
+        end
+      end
+    end
+  end
+
+  LOG_DOMAIN = "GLib"
+
+  class Object
+    LOG_DOMAIN = "GLib-GObject"
+  end
+
+  class Thread
+    LOG_DOMAIN = "GThread"
+  end
+
+  module Module
+    LOG_DOMAIN = "GModule"
+  end
+end
+
+GLib::Log.set_log_domain(nil)
+GLib::Log.set_log_domain(GLib::LOG_DOMAIN)
+GLib::Log.set_log_domain(GLib::Object::LOG_DOMAIN)
+GLib::Log.set_log_domain(GLib::Thread::LOG_DOMAIN)
+GLib::Log.set_log_domain(GLib::Module::LOG_DOMAIN)
+
+# Ruby-GetText-Package support
+begin
+  require 'gettext'
+rescue LoadError
+  unless defined? GetText
+    module GetText
+      module_function
+      def _(msgid); msgid; end
+      def N_(msgid); msgid; end
+      def n_(msgid, msgid_plural, n)
+	n == 1 ? msgid : msgid_plural
+      end
+      def s_(msgid, div = '|')
+	if index = msgid.rindex(div)
+	  msgid = msgid[(index + 1)..-1]
+	else
+	  msgid
+	end
+      end
+      def bindtextdomain(domainname, path = nil, locale = nil, charset = nil)
+      end
+    end
+  end
+end
+
+=begin
+Don't we need this?
+ObjectSpace.define_finalizer(GLib) {
+  GLib::Log.cancel_handler
+  puts "GLib::Log.cancel_handler was called." if $DEBUG
+}
+=end