gtk2 0.20.0

data/src/rbgtk.c

@@ -0,0 +1,93 @@
+/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
+/************************************************
+
+  rbgtk.c -
+
+  $Author: sakai $
+  $Date: 2007/07/04 13:33:17 $
+
+  Copyright (C) 2002-2006 Ruby-GNOME2 Project Team
+  Copyright (C) 1998-2001 Yukihiro Matsumoto,
+                          Daisuke Kanda,
+                          Hiroshi Igarashi
+************************************************/
+
+#include "global.h"
+#ifdef HAVE_SYS_TIME_H
+# include <sys/time.h>
+#endif
+
+VALUE mGtk;
+
+ID id_relative_callbacks;
+ID id_call;
+static ID id__windows__;
+
+static void
+remove_from_windows(GtkWidget *window, VALUE obj)
+{
+    VALUE klass;
+    klass = rb_obj_class(obj);
+    rb_hash_delete(rb_ivar_get(klass, id__windows__), obj);
+}
+
+void
+rbgtk_initialize_gtkobject(obj, gtkobj)
+    VALUE obj;
+    GtkObject *gtkobj;
+{
+    gtkobj = g_object_ref(gtkobj);
+    gtk_object_sink(gtkobj);
+    G_INITIALIZE(obj, gtkobj);
+
+    if (GTK_IS_WINDOW(gtkobj) || GTK_IS_MENU_SHELL(gtkobj)) {
+        VALUE klass;
+        klass = rb_obj_class(obj);
+        if (rb_ivar_defined(klass, id__windows__) == Qfalse) {
+            rb_ivar_set(klass, id__windows__, rb_hash_new());
+        }
+        rb_hash_aset(rb_ivar_get(klass, id__windows__), obj, Qnil);
+        g_signal_connect_after(gtkobj, "destroy",
+                               G_CALLBACK(remove_from_windows),
+                               (gpointer)obj);
+    }
+}
+
+void
+exec_callback(widget, proc)
+    GtkWidget *widget;
+    gpointer proc;
+{
+    rb_funcall((VALUE)proc, id_call, 1, GOBJ2RVAL(widget));
+}
+
+/*
+ * Gtk module
+ */
+
+/* We can't use rbgtk_poll() on native Win32.
+   Because GPollFD doesn't have file descriptor but HANDLE. */
+#define USE_POLL_FUNC
+
+static VALUE
+gtk_m_events_pending(self)
+    VALUE self;
+{
+   return CBOOL2RVAL(gtk_events_pending());
+}
+
+/*
+ * Init
+ */
+void 
+Init_gtk_gtk()
+{
+    id_call = rb_intern("call");
+    id__windows__ = rb_intern("__windows__");
+
+    mGtk = rb_define_module("Gtk");
+    rb_ivar_set(mGtk, id_relative_callbacks, Qnil);
+
+    rb_define_module_function(mGtk, "events_pending?", gtk_m_events_pending, 0);
+
+}

data/src/rbgtk.h

@@ -0,0 +1,121 @@
+/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
+/************************************************
+
+  rbgtk.h -
+
+  $Author: sakai $
+  $Date: 2007/07/06 10:13:27 $
+
+  Copyright (C) 2003-2006 Ruby-GNOME2 Project Team
+  Copyright (C) 1998-2000 Yukihiro Matsumoto,
+                          Daisuke Kanda,
+                          Hiroshi Igarashi
+************************************************/
+
+#ifndef _RBGTK_H
+#define _RBGTK_H
+
+#include <rbgobject.h>
+#include <rbgtkmacros.h>
+#include <gtk/gtk.h>
+#include <rbgdk.h>
+#include <rbgtkconversions.h>
+
+#include <signal.h>
+
+#define RubyGtkContainerHookModule "RubyGtkContainerHook__"
+
+#define RBGTK_MAJOR_VERSION RBGLIB_MAJOR_VERSION
+#define RBGTK_MINOR_VERSION RBGLIB_MINOR_VERSION
+#define RBGTK_MICRO_VERSION RBGLIB_MICRO_VERSION
+
+#define RBGTK_INITIALIZE(obj,gtkobj)\
+ (rbgtk_initialize_gtkobject(obj, GTK_OBJECT(gtkobj)))
+
+#define GTK_TYPE_ALLOCATION (gtk_allocation_get_type())
+#define GTK_TYPE_ACCEL_KEY (gtk_accel_key_get_type())
+#define GTK_TYPE_ACCEL_GROUP_ENTRY (gtk_accel_group_entry_get_type())
+#define GTK_TYPE_BINDING_SET (gtk_bindingset_get_type())
+#define GTK_TYPE_TEXT_APPEARANCE (gtk_text_appearance_get_type())
+#define GTK_TYPE_RECENT_FILTER_INFO (gtk_recent_filter_info_get_type())
+#define GTK_TYPE_RECENT_DATA (gtk_recent_data_get_type())
+#ifndef GTK_TYPE_TARGET_LIST
+extern GType gtk_target_list_get_type();
+#define GTK_TYPE_TARGET_LIST (gtk_target_list_get_type())
+#endif
+
+RUBY_GTK2_VAR VALUE mGtk;
+
+/*
+ * for gtk2.0/gtk2.2
+ */
+#ifndef GTK_TYPE_CLIPBOARD
+#define GTK_TYPE_CLIPBOARD (rbgtk_clipboard_get_type())
+#define RVAL2CLIPBOARD(obj) (rbgtk_get_clipboard(obj))
+#define CLIPBOARD2RVAL(val) (rbgtk_make_clipboard(val))
+extern GType rbgtk_clipboard_get_type();
+extern GtkClipboard* rbgtk_get_clipboard(VALUE obj);
+extern VALUE rbgtk_make_clipboard(GtkClipboard* gobj);
+#else
+#define RVAL2CLIPBOARD(obj) (GTK_CLIPBOARD(RVAL2GOBJ(obj)))
+#define CLIPBOARD2RVAL(val) (GOBJ2RVAL(val))
+#endif
+
+#ifndef GTK_TYPE_TREE_ROW_REFERENCE
+#define GTK_TYPE_TREE_ROW_REFERENCE (rbgtk_tree_row_reference_get_type())
+#define RVAL2TREEROWREFERENCE(obj) (rbgtk_get_tree_row_reference(obj))
+extern GType rbgtk_tree_row_reference_get_type();
+extern GtkTreeRowReference* rbgtk_get_tree_row_reference(VALUE obj);
+#else
+#define RVAL2TREEROWREFERENCE(obj) ((GtkTreeRowReference*)(RVAL2BOXED(obj, GTK_TYPE_TREE_ROW_REFERENCE)))
+#endif
+  
+
+/*
+ * for gtk
+ */
+extern void rbgtk_initialize_gtkobject(VALUE obj, GtkObject *gtkobj);
+extern void exec_callback(GtkWidget *widget, gpointer proc);
+extern GType gtk_allocation_get_type();
+extern GType gtk_accel_key_get_type();
+extern GType gtk_accel_group_entry_get_type();
+extern GType gtk_bindingset_get_type();
+extern GType gtk_text_appearance_get_type();
+extern GType gtk_recent_filter_info_get_type();
+extern GType gtk_recent_data_get_type();
+
+/*
+ * Gtk::TreeIter callback
+ */
+typedef void (*rbgtkiter_set_value_func)(void *model, GtkTreeIter *iter,
+                                         gint column, GValue *value);
+extern void rbgtk_register_treeiter_set_value_func(GType, rbgtkiter_set_value_func);
+
+/*
+ * Gtk::SelectionData
+ */
+extern void rbgtk_atom2selectiondata(VALUE type, VALUE size, VALUE src, GdkAtom* gtype,
+                                     void** data, gint* format, gint* length);
+extern void rbgtk_atom2selectiondata_free(GdkAtom gtype, void* data); 
+
+/*
+ * Gtk::Drag
+ */
+extern GtkTargetEntry* rbgtk_get_target_entry(VALUE targets);
+
+/*
+ * Gtk::Container
+ */
+extern void rbgtkcontainer_register_child_property_setter(GType gtype, 
+                                                          const char* prop_name, 
+                                                          RValueToGValueFunc func);
+extern void rbgtkcontainer_register_child_property_getter(GType gtype, 
+                                                          const char* prop_name, 
+                                                          GValueToRValueFunc func);
+
+/*
+ * Dialog
+ */
+extern VALUE rbgtk_dialog_add_buttons_internal(VALUE self, VALUE button_ary);
+
+#endif /* _RBGTK_H */

data/src/rbgtkaboutdialog.c

@@ -0,0 +1,195 @@
+/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
+/************************************************
+
+  rbgtkaboutdialog.c -
+
+  $Author: ktou $
+  $Date: 2007/08/17 11:52:05 $
+
+  Copyright (C) 2005 Masao Mutoh
+************************************************/
+
+#include "global.h"
+                                                                                
+#if GTK_CHECK_VERSION(2,6,0)
+
+#define _SELF(self) (GTK_ABOUT_DIALOG(RVAL2GOBJ(self)))
+
+static VALUE
+aboutdialog_initialize(self)
+    VALUE self;
+{
+    RBGTK_INITIALIZE(self, gtk_about_dialog_new());
+    return Qnil;
+}
+
+/* Defined as Properties
+const gchar* gtk_about_dialog_get_name      (GtkAboutDialog *about);
+void        gtk_about_dialog_set_name       (GtkAboutDialog *about,
+                                             const gchar *name);
+const gchar* gtk_about_dialog_get_version   (GtkAboutDialog *about);
+void        gtk_about_dialog_set_version    (GtkAboutDialog *about,
+                                             const gchar *version);
+const gchar* gtk_about_dialog_get_copyright (GtkAboutDialog *about);
+void        gtk_about_dialog_set_copyright  (GtkAboutDialog *about,
+                                             const gchar *copyright);
+const gchar* gtk_about_dialog_get_comments  (GtkAboutDialog *about);
+void        gtk_about_dialog_set_comments   (GtkAboutDialog *about,
+                                             const gchar *comments);
+const gchar* gtk_about_dialog_get_license   (GtkAboutDialog *about);
+void        gtk_about_dialog_set_license    (GtkAboutDialog *about,
+                                             const gchar *license);
+const gchar* gtk_about_dialog_get_website   (GtkAboutDialog *about);
+void        gtk_about_dialog_set_website    (GtkAboutDialog *about,
+                                             const gchar *website);
+const gchar* gtk_about_dialog_get_website_label
+                                            (GtkAboutDialog *about);
+void        gtk_about_dialog_set_website_label
+                                            (GtkAboutDialog *about,
+                                             const gchar *website_label);
+const gchar* const * gtk_about_dialog_get_authors
+                                            (GtkAboutDialog *about);
+void        gtk_about_dialog_set_authors    (GtkAboutDialog *about,
+                                             const gchar **authors);
+const gchar* const * gtk_about_dialog_get_artists
+                                            (GtkAboutDialog *about);
+void        gtk_about_dialog_set_artists    (GtkAboutDialog *about,
+                                             const gchar **artists);
+const gchar* const * gtk_about_dialog_get_documenters
+                                            (GtkAboutDialog *about);
+void        gtk_about_dialog_set_documenters
+                                            (GtkAboutDialog *about,
+                                             const gchar **documenters);
+const gchar* gtk_about_dialog_get_translator_credits
+                                            (GtkAboutDialog *about);
+void        gtk_about_dialog_set_translator_credits
+                                            (GtkAboutDialog *about,
+                                             const gchar *translator_credits);
+GdkPixbuf*  gtk_about_dialog_get_logo       (GtkAboutDialog *about);
+void        gtk_about_dialog_set_logo       (GtkAboutDialog *about,
+                                             GdkPixbuf *logo);
+const gchar* gtk_about_dialog_get_logo_icon_name
+                                            (GtkAboutDialog *about);
+void        gtk_about_dialog_set_logo_icon_name
+                                            (GtkAboutDialog *about,
+                                             const gchar *icon_name);
+gboolean    gtk_about_dialog_get_wrap_license
+                                            (GtkAboutDialog *about);
+void        gtk_about_dialog_set_wrap_license
+                                            (GtkAboutDialog *about,
+                                             gboolean wrap_license);
+*/
+
+static void
+activate_link_func(about, link, func)
+    GtkAboutDialog* about;
+    const gchar* link;
+    gpointer func;
+{
+    rb_funcall((VALUE)func, id_call, 2, GOBJ2RVAL(about), CSTR2RVAL(link));
+}
+
+static VALUE
+aboutdialog_s_set_email_hook(self)
+    VALUE self;
+{
+    VALUE func = rb_block_proc();
+    G_RELATIVE(self, func);
+    gtk_about_dialog_set_email_hook((GtkAboutDialogActivateLinkFunc)activate_link_func, (gpointer)func, (GDestroyNotify)NULL);
+    return self;
+}
+
+static VALUE
+aboutdialog_s_set_url_hook(self)
+    VALUE self;
+{
+    VALUE func = rb_block_proc();
+    G_RELATIVE(self, func);
+    gtk_about_dialog_set_url_hook((GtkAboutDialogActivateLinkFunc)activate_link_func, (gpointer)func, (GDestroyNotify)NULL);
+    return self;
+}
+
+
+typedef struct {
+    const char *name;
+    gpointer value;
+} prop_data;
+
+#define ABOUT_PROP_NUM (15)
+
+static VALUE
+aboutdialog_s_show_about_dialog(self, parent, props)
+    VALUE self, parent, props;
+{
+    int i;
+    VALUE ary;
+    prop_data pd[ABOUT_PROP_NUM];
+
+    Check_Type(props, T_HASH);
+
+    ary = rb_funcall(props, rb_intern("to_a"), 0);
+    
+    if (RARRAY_LEN(ary) > ABOUT_PROP_NUM)
+        rb_raise(rb_eArgError, "Too many args.");
+
+    for (i = 0; i < ABOUT_PROP_NUM; i++){
+        pd[i].name = (const char*)NULL;
+        pd[i].value = (gpointer)NULL;
+    }
+    for (i = 0; i < RARRAY_LEN(ary); i++){
+        if (TYPE(RARRAY_PTR(RARRAY_PTR(ary)[i])[0]) == T_SYMBOL){
+            pd[i].name = rb_id2name(SYM2ID(RARRAY_PTR(RARRAY_PTR(ary)[i])[0]));
+        } else {
+            pd[i].name = RVAL2CSTR(RARRAY_PTR(RARRAY_PTR(ary)[i])[0]);
+        }
+        if (strncmp(pd[i].name, "artists", strlen("artists")) == 0||
+            strncmp(pd[i].name, "authors", strlen("authors")) == 0||
+            strncmp(pd[i].name, "documenters", strlen("documenters")) == 0){
+            GValue gval = {0,};
+            g_value_init(&gval, G_TYPE_STRV);
+            rbgobj_rvalue_to_gvalue(RARRAY_PTR(RARRAY_PTR(ary)[i])[1], &gval);
+
+            pd[i].value = g_boxed_copy(G_TYPE_STRV, g_value_get_boxed(&gval));
+        } else if (strncmp(pd[i].name, "logo", strlen("logo")) == 0 &&
+                   strlen(pd[i].name) == strlen("logo")){
+            pd[i].value = g_object_ref(RVAL2GOBJ(RARRAY_PTR(RARRAY_PTR(ary)[i])[1]));
+        } else if (strncmp(pd[i].name, "wrap_license", strlen("wrap_license")) == 0){
+            pd[i].value = GINT_TO_POINTER(RVAL2CBOOL(RARRAY_PTR(ary)[i]));
+        } else {
+            pd[i].value = g_strdup(RVAL2CSTR(RARRAY_PTR(RARRAY_PTR(ary)[i])[1]));
+        }
+    }
+
+    gtk_show_about_dialog(GTK_WINDOW(RVAL2GOBJ(parent)), 
+                          pd[0].name, pd[0].value,
+                          pd[1].name, pd[1].value,
+                          pd[2].name, pd[2].value,
+                          pd[3].name, pd[3].value,
+                          pd[4].name, pd[4].value,
+                          pd[5].name, pd[5].value,
+                          pd[6].name, pd[6].value,
+                          pd[7].name, pd[7].value,
+                          pd[8].name, pd[8].value,
+                          pd[9].name, pd[9].value,
+                          pd[10].name, pd[10].value,
+                          pd[11].name, pd[11].value,
+                          pd[12].name, pd[12].value,
+                          pd[13].name, pd[13].value,
+                          pd[14].name, pd[14].value,
+                          NULL);
+    return self;
+}
+#endif
+
+void 
+Init_gtk_aboutdialog()
+{
+#if GTK_CHECK_VERSION(2,6,0)
+    VALUE gAboutDialog = G_DEF_CLASS(GTK_TYPE_ABOUT_DIALOG, "AboutDialog", mGtk);
+    rb_define_method(gAboutDialog, "initialize", aboutdialog_initialize, 0);
+
+    rb_define_singleton_method(gAboutDialog, "set_email_hook", aboutdialog_s_set_email_hook, 0);
+    rb_define_singleton_method(gAboutDialog, "set_url_hook", aboutdialog_s_set_url_hook, 0);
+    rb_define_singleton_method(gAboutDialog, "show", aboutdialog_s_show_about_dialog, 2);
+#endif
+}

data/src/rbgtkaccelerator.c

@@ -0,0 +1,78 @@
+/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
+/************************************************
+
+  rbgtkaccelerator.c -
+
+  $Author: ggc $
+  $Date: 2007/07/13 14:27:09 $
+
+  Copyright (C) 2002,2003 Masao Mutoh
+************************************************/
+#include "global.h"
+
+#define RVAL2MOD(mods) RVAL2GFLAGS(mods, GDK_TYPE_MODIFIER_TYPE)
+
+static VALUE
+accel_valid(self, keyval, modifiers)
+    VALUE self, keyval, modifiers;
+{
+    return CBOOL2RVAL(gtk_accelerator_valid(NUM2UINT(keyval), RVAL2MOD(modifiers)));
+}
+
+static VALUE
+accel_parse(self, accelerator)
+    VALUE self, accelerator;
+{
+    guint key;
+    GdkModifierType mods;
+    gtk_accelerator_parse(RVAL2CSTR(accelerator), &key, &mods);
+    return rb_ary_new3(2, UINT2NUM(key), GFLAGS2RVAL(mods, GDK_TYPE_MODIFIER_TYPE));
+}
+
+static VALUE
+accel_name(self, key, mods)
+    VALUE self, key, mods;
+{
+    return CSTR2RVAL(gtk_accelerator_name(NUM2UINT(key), RVAL2MOD(mods)));
+}
+
+#if GTK_CHECK_VERSION(2,6,0)
+static VALUE
+accel_get_label(self, key, mods)
+    VALUE self, key, mods;
+{
+    return CSTR2RVAL(gtk_accelerator_get_label(NUM2UINT(key), RVAL2MOD(mods)));
+}
+#endif
+
+static VALUE
+accel_set_default_mod_mask(self, default_mod_mask)
+    VALUE self, default_mod_mask;
+{
+    gtk_accelerator_set_default_mod_mask(RVAL2MOD(default_mod_mask));
+    return self;
+}
+
+static VALUE
+accel_get_default_mod_mask(self)
+    VALUE self;
+{
+    return GFLAGS2RVAL(gtk_accelerator_get_default_mod_mask(), GDK_TYPE_MODIFIER_TYPE);
+}
+
+void
+Init_gtk_accelerator()
+{
+    VALUE mGtkAccel = rb_define_module_under(mGtk, "Accelerator");
+
+    rb_define_singleton_method(mGtkAccel, "valid", accel_valid, 2);
+    rb_define_singleton_method(mGtkAccel, "parse", accel_parse, 1);
+    /* name is reserved by Ruby */
+    rb_define_singleton_method(mGtkAccel, "to_name", accel_name, 2);
+#if GTK_CHECK_VERSION(2,6,0)
+    rb_define_singleton_method(mGtkAccel, "get_label", accel_get_label, 2);
+#endif
+    rb_define_singleton_method(mGtkAccel, "set_default_mod_mask", accel_set_default_mod_mask, 1);
+    rb_define_singleton_method(mGtkAccel, "default_mod_mask", accel_get_default_mod_mask, 0);
+    G_DEF_SETTERS(mGtkAccel);
+}