gtk3 0.0.1 → 1.2.0

data/ext/gtk3/rbgtkaccelgroupentry.c

@@ -0,0 +1,93 @@
+/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
+/*
+ *  Copyright (C) 2011  Ruby-GNOME2 Project Team
+ *  Copyright (C) 2002,2003 OGASAWARA, Takeshi
+ *
+ *  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 cAccelGroupEntry
+#define _SELF(s) (RVAL2GTKACCELGROUPENTRY(s))
+
+static GtkAccelGroupEntry *
+agentry_copy(const GtkAccelGroupEntry *agentry)
+{
+    GtkAccelGroupEntry *new_agentry;
+    g_return_val_if_fail (agentry != NULL, NULL);
+    new_agentry = g_new(GtkAccelGroupEntry, 1);
+    *new_agentry = *agentry;
+    return new_agentry;
+}
+
+GType
+gtk_accel_group_entry_get_type(void)
+{
+    static GType our_type = 0;
+    if(our_type == 0)
+        our_type = g_boxed_type_register_static("GtkAccelGroupEntry",
+                                                (GBoxedCopyFunc)agentry_copy,
+                                                (GBoxedFreeFunc)g_free);
+    return our_type;
+}
+
+/*
+struct _GtkAccelGroupEntry
+{
+  GtkAccelKey  key;
+  GClosure    *closure;
+  GQuark       accel_path_quark;
+};
+*/
+static VALUE
+rg_initialize(VALUE self)
+{
+    GtkAccelGroupEntry key;
+    G_INITIALIZE(self, &key);
+    return Qnil;
+}
+
+static VALUE
+rg_accel_key(VALUE self)
+{
+    return GTKACCELKEY2RVAL(&_SELF(self)->key);
+}
+
+static VALUE
+rg_closure(VALUE self)
+{
+    return GCLOSURE2RVAL(_SELF(self)->closure);
+}
+
+static VALUE
+rg_accel_path(VALUE self)
+{
+    const gchar *quark_str = g_quark_to_string(_SELF(self)->accel_path_quark);
+    return quark_str ? CSTR2RVAL(quark_str) : Qnil;
+}
+
+void
+Init_gtk_accel_group_entry(VALUE mGtk)
+{
+    VALUE RG_TARGET_NAMESPACE = G_DEF_CLASS(GTK_TYPE_ACCEL_GROUP_ENTRY, "AccelGroupEntry", mGtk);
+
+    RG_DEF_METHOD(initialize, 0);
+
+    RG_DEF_METHOD(accel_key, 0);
+    RG_DEF_METHOD(closure, 0);
+    RG_DEF_METHOD(accel_path, 0);
+}

data/ext/gtk3/rbgtkaccelkey.c

@@ -0,0 +1,119 @@
+/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
+/*
+ *  Copyright (C) 2011  Ruby-GNOME2 Project Team
+ *  Copyright (C) 2002,2003 OGASAWARA, Takeshi
+ *
+ *  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 cAccelKey
+#define _SELF(s) (RVAL2GTKACCELKEY(s))
+#define GTK_TYPE_ACCEL_KEY (gtk_accel_key_get_type())
+
+static GtkAccelKey *
+accel_key_copy(const GtkAccelKey *key)
+{
+    GtkAccelKey *new_key;
+    g_return_val_if_fail (key != NULL, NULL);
+    new_key = g_new(GtkAccelKey, 1);
+    *new_key = *key;
+    return new_key;
+}
+
+GType
+gtk_accel_key_get_type(void)
+{
+    static GType our_type = 0;
+    if(our_type == 0)
+        our_type = g_boxed_type_register_static("GtkAccelKey",
+                                                (GBoxedCopyFunc)accel_key_copy,
+                                                (GBoxedFreeFunc)g_free);
+    return our_type;
+}
+
+/*
+struct _GtkAccelKey
+{
+  guint           accel_key;
+  GdkModifierType accel_mods;
+  guint           accel_flags : 16;
+};
+*/
+
+static VALUE
+rg_initialize(VALUE self)
+{
+    GtkAccelKey key;
+    G_INITIALIZE(self, &key);
+    return Qnil;
+}
+
+static VALUE
+rg_key(VALUE self)
+{
+    return UINT2NUM(_SELF(self)->accel_key);
+}
+
+static VALUE
+rg_mods(VALUE self)
+{
+    return GDKMODIFIERTYPE2RVAL(_SELF(self)->accel_mods);
+}
+
+static VALUE
+rg_flags(VALUE self)
+{
+    return INT2FIX(_SELF(self)->accel_flags);
+}
+
+static VALUE
+rg_set_key(VALUE self, VALUE key)
+{
+    _SELF(self)->accel_key = NUM2UINT(key);
+    return self;
+}
+
+static VALUE
+rg_set_mods(VALUE self, VALUE mods)
+{
+    _SELF(self)->accel_mods = RVAL2GDKMODIFIERTYPE(mods);
+    return self;
+}
+
+static VALUE
+rg_set_flags(VALUE self, VALUE flags)
+{
+    _SELF(self)->accel_flags = FIX2INT(flags);
+    return self;
+}
+
+void
+Init_gtk_accel_key(VALUE mGtk)
+{
+    VALUE RG_TARGET_NAMESPACE = G_DEF_CLASS(GTK_TYPE_ACCEL_KEY, "AccelKey", mGtk);
+
+    RG_DEF_METHOD(initialize, 0);
+
+    RG_DEF_METHOD(key, 0);
+    RG_DEF_METHOD(mods, 0);
+    RG_DEF_METHOD(flags, 0);
+
+    RG_DEF_METHOD(set_key, 1);
+    RG_DEF_METHOD(set_mods, 1);
+    RG_DEF_METHOD(set_flags, 1);
+}

data/ext/gtk3/rbgtkaccellabel.c

@@ -0,0 +1,55 @@
+/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
+/*
+ *  Copyright (C) 2011  Ruby-GNOME2 Project Team
+ *  Copyright (C) 2002,2003 Ruby-GNOME2 Project Team
+ *  Copyright (C) 2001  Neil Conway
+ *
+ *  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 cAccelLabel
+
+static VALUE
+rg_initialize(VALUE self, VALUE string)
+{
+    RBGTK_INITIALIZE(self, gtk_accel_label_new(RVAL2CSTR(string)));
+    return Qnil;
+}
+
+static VALUE
+rg_accel_width(VALUE self)
+{
+    return INT2NUM(gtk_accel_label_get_accel_width(RVAL2GTKACCELLABEL(self)));
+}
+
+static VALUE
+rg_refetch(VALUE self)
+{
+    gtk_accel_label_refetch(RVAL2GTKACCELLABEL(self));
+    return Qfalse; // always returns false
+}
+
+void
+Init_gtk_accel_label(VALUE mGtk)
+{
+  VALUE RG_TARGET_NAMESPACE = G_DEF_CLASS(GTK_TYPE_ACCEL_LABEL, "AccelLabel", mGtk);
+
+  RG_DEF_METHOD(initialize, 1);
+  RG_DEF_METHOD(accel_width, 0);
+  RG_DEF_METHOD(refetch, 0);
+}

data/ext/gtk3/rbgtkaccelmap.c

@@ -0,0 +1,135 @@
+/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
+/*
+ *  Copyright (C) 2011  Ruby-GNOME2 Project Team
+ *  Copyright (C) 2002,2003 OGASAWARA, Takeshi
+ *
+ *  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 cAccelMap
+
+#define RVAL2MOD(mods) (NIL_P(mods) ? 0 : RVAL2GDKMODIFIERTYPE(mods))
+
+static VALUE
+rg_s_add_entry(VALUE self, VALUE path, VALUE key, VALUE mods)
+{
+    gtk_accel_map_add_entry(RVAL2CSTR(path), NUM2UINT(key), RVAL2MOD(mods));
+    return self;
+}
+
+static VALUE
+rg_s_lookup_entry(VALUE self, VALUE path)
+{
+    GtkAccelKey key;
+    if(gtk_accel_map_lookup_entry(RVAL2CSTR(path), &key))
+        return GTKACCELKEY2RVAL(&key);
+    else
+        return self;
+}
+
+static VALUE
+rg_s_change_entry(G_GNUC_UNUSED VALUE self, VALUE path, VALUE key, VALUE mods, VALUE replace)
+{
+    return CBOOL2RVAL(gtk_accel_map_change_entry(RVAL2CSTR(path), NUM2UINT(key),
+                                                 RVAL2MOD(mods), RVAL2CBOOL(replace)));
+}
+
+static VALUE
+rg_s_load(VALUE self, VALUE filename)
+{
+    gtk_accel_map_load(RVAL2CSTR(filename));
+    return self;
+}
+
+static VALUE
+rg_s_save(VALUE self, VALUE filename)
+{
+    gtk_accel_map_save(RVAL2CSTR(filename));
+    return self;
+}
+
+static VALUE
+rg_s_add_filter(VALUE self, VALUE pattern)
+{
+    gtk_accel_map_add_filter(RVAL2CSTR(pattern));
+    return self;
+}
+
+static void
+accel_map_foreach_func(gpointer func, const gchar *path, guint key, GdkModifierType mods, gboolean changed)
+{
+    rb_funcall((VALUE)func, id_call, 4,
+               CSTR2RVAL(path), UINT2NUM(key), GDKMODIFIERTYPE2RVAL(mods),
+               CBOOL2RVAL(changed));
+}
+
+static VALUE
+rg_s_each(VALUE self)
+{
+    volatile VALUE func = rb_block_proc();
+    gtk_accel_map_foreach((gpointer)func,
+                          (GtkAccelMapForeach)accel_map_foreach_func);
+    return self;
+}
+
+static VALUE
+rg_s_each_unfilterd(VALUE self)
+{
+    volatile VALUE func = rb_block_proc();
+    gtk_accel_map_foreach_unfiltered((gpointer)func,
+                                     (GtkAccelMapForeach)accel_map_foreach_func);
+    return self;
+}
+
+static VALUE
+rg_s_get(G_GNUC_UNUSED VALUE self)
+{
+    return GOBJ2RVAL(gtk_accel_map_get());
+}
+
+static VALUE
+rg_s_lock_path(VALUE self, VALUE accel_path)
+{
+    gtk_accel_map_lock_path(RVAL2CSTR(accel_path));
+    return self;
+}
+
+static VALUE
+rg_s_unlock_path(VALUE self, VALUE accel_path)
+{
+    gtk_accel_map_unlock_path(RVAL2CSTR(accel_path));
+    return self;
+}
+
+void
+Init_gtk_accel_map(VALUE mGtk)
+{
+    VALUE RG_TARGET_NAMESPACE = G_DEF_CLASS(GTK_TYPE_ACCEL_MAP, "AccelMap", mGtk);
+
+    RG_DEF_SMETHOD(add_entry, 3);
+    RG_DEF_SMETHOD(lookup_entry, 1);
+    RG_DEF_SMETHOD(change_entry, 4);
+    RG_DEF_SMETHOD(load, 1);
+    RG_DEF_SMETHOD(save, 1);
+    RG_DEF_SMETHOD(add_filter, 1);
+    RG_DEF_SMETHOD(each, 0);
+    RG_DEF_SMETHOD(each_unfilterd, 0);
+    RG_DEF_SMETHOD(get, 0);
+    RG_DEF_SMETHOD(lock_path, 1);
+    RG_DEF_SMETHOD(unlock_path, 1);
+}

data/ext/gtk3/rbgtkaccessible.c

@@ -0,0 +1,56 @@
+/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
+/*
+ *  Copyright (C) 2011  Ruby-GNOME2 Project Team
+ *  Copyright (C) 2003  Masao Mutoh
+ *
+ *  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 cAccessible
+#define _SELF(self) (RVAL2GTKACCESSIBLE(self))
+
+static VALUE
+rg_connect_widget_destroyed(VALUE self)
+{
+    gtk_accessible_connect_widget_destroyed(RVAL2GTKACCESSIBLE(self));
+    return self;
+}
+
+static VALUE
+rg_widget(VALUE self)
+{
+    return GOBJ2RVAL(gtk_accessible_get_widget(_SELF(self)));
+}
+
+static VALUE
+rg_set_widget(VALUE self, VALUE widget)
+{
+    gtk_accessible_set_widget(_SELF(self), RVAL2GTKWIDGET(widget));
+
+    return self;
+}
+
+void
+Init_gtk_accessible(VALUE mGtk)
+{
+    VALUE RG_TARGET_NAMESPACE = G_DEF_CLASS(GTK_TYPE_ACCESSIBLE, "Accessible", mGtk);
+
+    RG_DEF_METHOD(connect_widget_destroyed, 0);
+    RG_DEF_METHOD(widget, 0);
+    RG_DEF_METHOD(set_widget, 1);
+}