gtk2 0.20.0

data/src/rbgtkaccelmap.c

@@ -0,0 +1,162 @@
+/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
+/************************************************
+
+  rbgtkaccelmap.c -
+
+  $Author: ggc $
+  $Date: 2007/07/13 16:07:31 $
+
+  Copyright (C) 2002,2003 OGASAWARA, Takeshi
+************************************************/
+#include "global.h"
+
+#define RVAL2MOD(mods) (NIL_P(mods) ? 0 : RVAL2GFLAGS(mods, GDK_TYPE_MODIFIER_TYPE))
+
+static VALUE
+accel_map_add_entry(self, path, key, mods)
+    VALUE self, path, key, mods;
+{
+    gtk_accel_map_add_entry(RVAL2CSTR(path), NUM2UINT(key), RVAL2MOD(mods));
+    return self;
+}
+
+static VALUE
+accel_map_lookup_entry(self, path)
+    VALUE self, path;
+{
+    GtkAccelKey key;
+    if(gtk_accel_map_lookup_entry(RVAL2CSTR(path), &key))
+        return BOXED2RVAL(&key, GTK_TYPE_ACCEL_KEY);
+    else
+        return self;
+}
+
+static VALUE
+accel_map_change_entry(self, path, key, mods, replace)
+    VALUE self, path, key, mods, replace;
+{
+    return CBOOL2RVAL(gtk_accel_map_change_entry(RVAL2CSTR(path), NUM2UINT(key),
+                                                 RVAL2MOD(mods), RVAL2CBOOL(replace)));
+}
+
+static VALUE
+accel_map_load(self, filename)
+    VALUE self, filename;
+{
+    gtk_accel_map_load(RVAL2CSTR(filename));
+    return self;
+}
+
+static VALUE
+accel_map_save(self, filename)
+    VALUE self, filename;
+{
+    gtk_accel_map_save(RVAL2CSTR(filename));
+    return self;
+}
+
+static VALUE
+accel_map_add_filter(self, pattern)
+    VALUE self, pattern;
+{
+    gtk_accel_map_add_filter(RVAL2CSTR(pattern));
+    return self;
+}
+
+static void
+accel_map_foreach_func(func, path, key, mods, changed)
+    gpointer func;
+    const gchar *path;
+    guint key;
+    GdkModifierType mods;
+    gboolean changed;
+{
+    rb_funcall((VALUE)func, id_call, 4,
+               CSTR2RVAL(path), UINT2NUM(key), GFLAGS2RVAL(mods, GDK_TYPE_MODIFIER_TYPE),
+               CBOOL2RVAL(changed));
+}
+
+static VALUE
+accel_map_foreach(self)
+    VALUE self;
+{
+    volatile VALUE func = rb_block_proc();
+    gtk_accel_map_foreach((gpointer)func,
+                          (GtkAccelMapForeach)accel_map_foreach_func);
+    return self;
+}
+
+static VALUE
+accel_map_foreach_unfilterd(self)
+    VALUE self;
+{
+    volatile VALUE func = rb_block_proc();
+    gtk_accel_map_foreach_unfiltered((gpointer)func,
+                                     (GtkAccelMapForeach)accel_map_foreach_func);
+    return self;
+}
+
+/*
+void        gtk_accel_map_load_scanner      (GScanner *scanner);
+*/
+
+/* We don't need them.
+void        gtk_accel_map_load_fd           (gint fd);
+void        gtk_accel_map_save_fd           (gint fd);
+*/
+
+#if GTK_CHECK_VERSION(2,4,0)
+static VALUE
+accel_map_get(self)
+    VALUE self;
+{
+    return GOBJ2RVAL(gtk_accel_map_get());
+}
+
+static VALUE
+accel_map_lock_path(self, accel_path)
+    VALUE self, accel_path;
+{
+    gtk_accel_map_lock_path(RVAL2CSTR(accel_path));
+    return self;
+}
+
+static VALUE
+accel_map_unlock_path(self, accel_path)
+    VALUE self, accel_path;
+{
+    gtk_accel_map_unlock_path(RVAL2CSTR(accel_path));
+    return self;
+}
+#endif
+
+void
+Init_accel_map()
+{
+#if GTK_CHECK_VERSION(2,4,0)
+    VALUE mAccelMap = G_DEF_CLASS(GTK_TYPE_ACCEL_MAP, "AccelMap", mGtk);
+
+    rb_define_singleton_method(mAccelMap, "add_entry", accel_map_add_entry, 3);
+    rb_define_singleton_method(mAccelMap, "lookup_entry", accel_map_lookup_entry, 1);
+    rb_define_singleton_method(mAccelMap, "change_entry", accel_map_change_entry, 4);
+    rb_define_singleton_method(mAccelMap, "load", accel_map_load, 1);
+    rb_define_singleton_method(mAccelMap, "save", accel_map_save, 1);
+    rb_define_singleton_method(mAccelMap, "add_filter", accel_map_add_filter, 1);
+    rb_define_singleton_method(mAccelMap, "each", accel_map_foreach, 0);
+    rb_define_singleton_method(mAccelMap, "each_unfilterd", accel_map_foreach_unfilterd, 0);
+    rb_define_singleton_method(mAccelMap, "get", accel_map_get, 0);
+    rb_define_singleton_method(mAccelMap, "lock_path", accel_map_lock_path, 1);
+    rb_define_singleton_method(mAccelMap, "unlock_path", accel_map_unlock_path, 1);
+#else
+    VALUE mAccelMap = rb_define_module_under(mGtk, "AccelMap");
+                                                                                
+    rb_define_module_function(mAccelMap, "add_entry", accel_map_add_entry, 3);
+    rb_define_module_function(mAccelMap, "lookup_entry", accel_map_lookup_entry, 1);
+    rb_define_module_function(mAccelMap, "change_entry", accel_map_change_entry, 4);
+    rb_define_module_function(mAccelMap, "load", accel_map_load, 1);
+    rb_define_module_function(mAccelMap, "save", accel_map_save, 1);
+    rb_define_module_function(mAccelMap, "add_filter", accel_map_add_filter, 1);
+    rb_define_module_function(mAccelMap, "each", accel_map_foreach, 0);
+    rb_define_module_function(mAccelMap, "each_unfilterd", accel_map_foreach_unfilterd, 0);
+#endif
+}

data/src/rbgtkaccessible.c

@@ -0,0 +1,29 @@
+/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
+/************************************************
+
+  rbgtkaccessible.c -
+
+  $Author: mutoh $
+  $Date: 2003/05/24 03:27:02 $
+
+  Copyright (C) 2003 Masao Mutoh
+************************************************/
+
+#include "global.h"
+
+static VALUE
+access_connect_widget_destroyed(self)
+     VALUE self;
+{
+    gtk_accessible_connect_widget_destroyed(GTK_ACCESSIBLE(RVAL2GOBJ(self)));
+    return self;
+}
+
+void
+Init_gtk_accessible()
+{
+    VALUE gAccess = G_DEF_CLASS(GTK_TYPE_ACCESSIBLE, "Accessible", mGtk);
+
+    rb_define_method(gAccess, "connect_widget_destroyed", access_connect_widget_destroyed, 0);
+}
+

data/src/rbgtkaction.c

@@ -0,0 +1,277 @@
+/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
+/************************************************
+
+  rbgtkaction.c -
+
+  $Author: ggc $
+  $Date: 2007/07/13 16:07:31 $
+
+  Copyright (C) 2004-2006 Masao Mutoh
+************************************************/
+
+#include "global.h"
+
+#if GTK_CHECK_VERSION(2,4,0)
+
+#define _SELF(self) (GTK_ACTION(RVAL2GOBJ(self)))
+#define RVAL2WIDGET(w) (GTK_WIDGET(RVAL2GOBJ(w)))
+
+static VALUE
+action_initialize(argc, argv, self)
+    int argc;
+    VALUE *argv;
+    VALUE self;
+{
+    VALUE name, label, tooltip, stock_id;
+    const gchar *stock = NULL;
+
+    rb_scan_args(argc, argv, "22", &name, &label, &tooltip, &stock_id);
+
+    if (TYPE(stock_id) == T_SYMBOL) {
+        stock = rb_id2name(SYM2ID(stock_id));
+    } else if (TYPE(stock_id) == T_STRING){
+        stock = RVAL2CSTR(stock_id);
+    }
+
+    G_INITIALIZE(self, gtk_action_new(RVAL2CSTR(name), RVAL2CSTR(label),
+                                      NIL_P(tooltip) ? NULL : RVAL2CSTR(tooltip),
+                                      stock));
+    return Qnil;
+}
+
+static VALUE
+action_is_sensitive(self)
+    VALUE self;
+{
+    return CBOOL2RVAL(gtk_action_is_sensitive(_SELF(self)));
+}
+
+static VALUE
+action_is_visible(self)
+    VALUE self;
+{
+    return CBOOL2RVAL(gtk_action_is_visible(_SELF(self)));
+}
+
+/* Defined as property.
+const gchar* gtk_action_get_name            (GtkAction *action);
+gboolean    gtk_action_get_sensitive        (GtkAction *action);
+gboolean    gtk_action_get_visible          (GtkAction *action);
+*/
+
+static VALUE
+action_activate(self)
+    VALUE self;
+{
+    gtk_action_activate(_SELF(self));
+    return self;
+}
+
+static VALUE
+action_create_icon(self, icon_size)
+    VALUE self, icon_size;
+{
+    return GOBJ2RVAL(gtk_action_create_icon(_SELF(self), 
+                                            RVAL2GENUM(icon_size, GTK_TYPE_ICON_SIZE)));
+}
+
+static VALUE
+action_create_menu_item(self)
+    VALUE self;
+{
+    return GOBJ2RVAL(gtk_action_create_menu_item(_SELF(self)));
+}
+
+#if GTK_CHECK_VERSION(2, 12, 0)
+static VALUE
+action_create_menu(VALUE self)
+{
+    return GOBJ2RVAL(gtk_action_create_menu(_SELF(self)));
+}
+#endif
+
+static VALUE
+action_create_tool_item(self)
+    VALUE self;
+{
+    return GOBJ2RVAL(gtk_action_create_tool_item(_SELF(self)));
+}
+
+static VALUE
+action_connect_proxy(self, proxy)
+    VALUE self, proxy;
+{
+    gtk_action_connect_proxy(_SELF(self), RVAL2WIDGET(proxy));
+    return self;
+}
+
+static VALUE
+action_disconnect_proxy(self, proxy)
+    VALUE self, proxy;
+{
+    gtk_action_disconnect_proxy(_SELF(self), RVAL2WIDGET(proxy));
+    return self;
+}
+
+static VALUE
+action_get_proxies(self)
+    VALUE self;
+{
+    /* Owned by GTK+ */
+    return GSLIST2ARY(gtk_action_get_proxies(_SELF(self)));
+}
+
+static VALUE
+action_connect_accelerator(self)
+    VALUE self;
+{
+    gtk_action_connect_accelerator(_SELF(self));
+    return self;
+}
+
+static VALUE
+action_disconnect_accelerator(self)
+    VALUE self;
+{
+    gtk_action_disconnect_accelerator(_SELF(self));
+    return self;
+}
+
+static VALUE
+action_block_activate_from(self, proxy)
+    VALUE self, proxy;
+{
+    gtk_action_block_activate_from(_SELF(self), RVAL2WIDGET(proxy));
+    return self;
+}
+
+static VALUE
+action_unblock_activate_from(self, proxy)
+    VALUE self, proxy;
+{
+    gtk_action_unblock_activate_from(_SELF(self), RVAL2WIDGET(proxy));
+    return self;
+}
+
+static VALUE
+action_set_accel_path(self, accel_path)
+    VALUE self, accel_path;
+{
+    gtk_action_set_accel_path(_SELF(self), RVAL2CSTR(accel_path));
+    return self;
+}
+static VALUE
+action_set_accel_group(self, accel_group)
+    VALUE self, accel_group;
+{
+    gtk_action_set_accel_group(_SELF(self), RVAL2GOBJ(accel_group));
+    return self;
+}
+
+#if GTK_CHECK_VERSION(2,6,0)
+/* This set "sensitive" value and call g_object_notify with "sensitive". 
+   If you want not to call g_object_notify,() 
+   Use GLib::Object#set_property("sensitive", val) instead.
+ */
+static VALUE
+action_set_sensitive(self, sensitive)
+    VALUE self, sensitive;
+{
+    gtk_action_set_sensitive(_SELF(self), RVAL2CBOOL(sensitive));
+    return self;
+}
+
+/* This set "visible" value and call g_object_notify with "visible". 
+   If you want not to call g_object_notify(), 
+   Use GLib::Object#set_property("visible", val) instead.
+*/
+static VALUE
+action_set_visible(self, visible)
+    VALUE self, visible;
+{
+    gtk_action_set_visible(_SELF(self), RVAL2CBOOL(visible));
+    return self;
+}
+
+static VALUE
+action_get_accel_path(self)
+    VALUE self;
+{
+    return CSTR2RVAL(gtk_action_get_accel_path(_SELF(self)));
+}
+#endif
+
+#if GTK_CHECK_VERSION(2,8,0)
+static VALUE
+action_get_accel_closure(self)
+    VALUE self;
+{
+    return BOXED2RVAL(gtk_action_get_accel_closure(_SELF(self)), G_TYPE_CLOSURE);
+}
+#endif
+
+static void
+action_mark(void *p)
+{
+    GtkAction *action;
+    GSList *node;
+
+    action = GTK_ACTION(p);
+    for (node = gtk_action_get_proxies(action);
+	 node;
+	 node = g_slist_next(node)) {
+	GtkWidget *proxy = node->data;
+	rbgobj_gc_mark_instance(proxy);
+    }
+}
+#endif
+
+void
+Init_gtk_action()
+{
+#if GTK_CHECK_VERSION(2,4,0)
+    VALUE gAction;
+
+    gAction = G_DEF_CLASS_WITH_GC_FUNC(GTK_TYPE_ACTION, "Action", mGtk,
+				       action_mark, NULL);
+
+    rb_define_method(gAction, "initialize", action_initialize, -1);
+    /* (NOTICE) Gtk::Action#is_sensitive?, #is_visible are special.
+       Because there are also Gtk::Action#sensitive?, #visible? as property 
+       accessors. 
+       Gtk::Action#is_sensitive?, #is_visible? check its associated 
+       action group.
+       Gtk::Action#sensitive?, #visible? returns the value of the properties.
+    */
+    rb_define_method(gAction, "is_sensitive?", action_is_sensitive, 0);
+    rb_define_method(gAction, "is_visible?", action_is_visible, 0);
+    rb_define_method(gAction, "activate", action_activate, 0);
+    rb_define_method(gAction, "create_icon", action_create_icon, 1);
+    rb_define_method(gAction, "create_menu_item", action_create_menu_item, 0);
+#if GTK_CHECK_VERSION(2, 12, 0)
+    rb_define_method(gAction, "create_menu", action_create_menu, 0);
+#endif
+    rb_define_method(gAction, "create_tool_item", action_create_tool_item, 0);
+    rb_define_method(gAction, "connect_proxy", action_connect_proxy, 1);
+    rb_define_method(gAction, "disconnect_proxy", action_disconnect_proxy, 1);
+    rb_define_method(gAction, "proxies", action_get_proxies, 0);
+    rb_define_method(gAction, "connect_accelerator", action_connect_accelerator, 0);
+    rb_define_method(gAction, "disconnect_accelerator", action_disconnect_accelerator, 0);
+    rb_define_method(gAction, "block_activate_from", action_block_activate_from, 1);
+    rb_define_method(gAction, "unblock_activate_from", action_unblock_activate_from, 1);
+    rb_define_method(gAction, "set_accel_path", action_set_accel_path, 1);
+    rb_define_method(gAction, "set_accel_group", action_set_accel_group, 1);
+
+#if GTK_CHECK_VERSION(2,6,0)
+    rb_define_method(gAction, "set_sensitive", action_set_sensitive, 1);
+    rb_define_method(gAction, "set_visible", action_set_visible, 1);
+    rb_define_method(gAction, "accel_path", action_get_accel_path, 0);
+#endif
+
+#if GTK_CHECK_VERSION(2,8,0)
+    rb_define_method(gAction, "accel_closure", action_get_accel_closure, 0);
+#endif
+
+    G_DEF_SETTERS(gAction);
+#endif
+}