gtk3 2.2.4-x64-mingw32

data/ext/gtk3/rbgtk-selection.c

@@ -0,0 +1,168 @@
+/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
+/*
+ *  Copyright (C) 2011  Ruby-GNOME2 Project Team
+ *  Copyright (C) 2002,2003 Masao Mutoh
+ *  Copyright (C) 1998-2000 Yukihiro Matsumoto,
+ *                          Daisuke Kanda,
+ *                          Hiroshi Igarashi
+ *
+ *  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 mSelection
+
+static VALUE
+rg_s_owner_set(int argc, VALUE *argv, G_GNUC_UNUSED VALUE self)
+{
+    gboolean ret;
+
+    if (argc == 3){
+        VALUE widget, selection, time;
+        rb_scan_args(argc, argv, "30", &widget, &selection, &time);
+        ret = gtk_selection_owner_set(RVAL2GTKWIDGET(widget), 
+                                      RVAL2ATOM(selection), NUM2INT(time));
+    } else {
+        VALUE display, widget, selection, time;
+        rb_scan_args(argc, argv, "40", &display, &widget, &selection, &time);
+        ret = gtk_selection_owner_set_for_display(RVAL2GDKDISPLAYOBJECT(display),
+                                                  RVAL2GTKWIDGET(widget), 
+                                                  RVAL2ATOM(selection), NUM2INT(time));
+    }
+    return CBOOL2RVAL(ret);
+}
+
+static VALUE
+rg_s_add_target(VALUE self, VALUE widget, VALUE selection, VALUE target, VALUE info)
+{
+    gtk_selection_add_target(RVAL2GTKWIDGET(widget), RVAL2ATOM(selection),
+                             RVAL2ATOM(target), NUM2INT(info));
+    return self;
+}
+
+static VALUE
+rg_s_add_targets(VALUE self, VALUE rbwidget, VALUE rbselection, VALUE rbtargets)
+{
+    GtkWidget *widget = RVAL2GTKWIDGET(rbwidget);
+    GdkAtom selection = RVAL2ATOM(rbselection);
+    long n;
+    GtkTargetEntry *targets = RVAL2GTKTARGETENTRIES(rbtargets, &n);
+
+    gtk_selection_add_targets(widget, selection, targets, n);
+
+    g_free(targets);
+
+    return self;
+}
+
+static VALUE
+rg_s_clear_targets(VALUE self, VALUE widget, VALUE selection)
+{
+    gtk_selection_clear_targets(RVAL2GTKWIDGET(widget), RVAL2ATOM(selection));
+    return self;
+}
+
+static VALUE
+rg_s_convert(G_GNUC_UNUSED VALUE self, VALUE widget, VALUE selection, VALUE target, VALUE time)
+{
+    gboolean ret = gtk_selection_convert(RVAL2GTKWIDGET(widget), 
+                                         RVAL2ATOM(selection), RVAL2ATOM(target),
+                                         NUM2INT(time));
+    return CBOOL2RVAL(ret);
+}
+
+static VALUE
+rg_s_remove_all(VALUE self, VALUE widget)
+{
+    gtk_selection_remove_all(RVAL2GTKWIDGET(widget));
+    return self;
+}
+
+static VALUE
+rg_s_include_image_p(G_GNUC_UNUSED VALUE self, VALUE rbtargets, VALUE rbwritable)
+{
+    gboolean writable = RVAL2CBOOL(rbwritable);
+    long n;
+    GdkAtom *targets = RVAL2GDKATOMS(rbtargets, &n);
+    gboolean result;
+
+    result = gtk_targets_include_image(targets, n, writable);
+
+    g_free(targets);
+
+    return result;
+}
+
+static VALUE
+rg_s_include_text_p(G_GNUC_UNUSED VALUE self, VALUE rbtargets)
+{
+    long n;
+    GdkAtom *targets = RVAL2GDKATOMS(rbtargets, &n);
+    gboolean result;
+
+    result = gtk_targets_include_text(targets, n);
+
+    g_free(targets);
+
+    return result;
+}
+
+static VALUE
+rg_s_include_uri_p(G_GNUC_UNUSED VALUE self, VALUE rbtargets)
+{
+    long n;
+    GdkAtom *targets = RVAL2GDKATOMS(rbtargets, &n);
+    gboolean result;
+
+    result = gtk_targets_include_uri(targets, n);
+
+    g_free(targets);
+
+    return result;
+}
+
+static VALUE
+rg_s_include_rich_text_p(G_GNUC_UNUSED VALUE self, VALUE rbtargets, VALUE rbbuffer)
+{
+    GtkTextBuffer *buffer = RVAL2GTKTEXTBUFFER(rbbuffer);
+    long n;
+    GdkAtom *targets = RVAL2GDKATOMS(rbtargets, &n);
+    gboolean result;
+
+    result = gtk_targets_include_rich_text(targets, n, buffer);
+
+    g_free(targets);
+
+    return result;
+}
+
+void
+Init_gtk_selection(VALUE mGtk)
+{
+    VALUE RG_TARGET_NAMESPACE =  rb_define_module_under(mGtk, "Selection");
+
+    RG_DEF_SMETHOD(owner_set, 3);
+    RG_DEF_SMETHOD(add_target, 4);
+    RG_DEF_SMETHOD(add_targets, 3);
+    RG_DEF_SMETHOD(clear_targets, 2);
+    RG_DEF_SMETHOD(convert, 4);
+    RG_DEF_SMETHOD(remove_all, 1);
+    RG_DEF_SMETHOD_P(include_image, 2);
+    RG_DEF_SMETHOD_P(include_text, 1);
+    RG_DEF_SMETHOD_P(include_uri, 1);
+    RG_DEF_SMETHOD_P(include_rich_text, 2);
+}

data/ext/gtk3/rbgtk-separator-menu-item.c

@@ -0,0 +1,39 @@
+/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
+/*
+ *  Copyright (C) 2011  Ruby-GNOME2 Project Team
+ *  Copyright (C) 2002,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 cSeparatorMenuItem
+
+static VALUE
+rg_initialize(VALUE self)
+{
+    RBGTK_INITIALIZE(self, gtk_separator_menu_item_new());
+    return Qnil;
+}
+
+void
+Init_gtk_separator_menu_item(VALUE mGtk)
+{
+    VALUE RG_TARGET_NAMESPACE = G_DEF_CLASS(GTK_TYPE_SEPARATOR_MENU_ITEM, "SeparatorMenuItem", mGtk);
+
+    RG_DEF_METHOD(initialize, 0);
+}

data/ext/gtk3/rbgtk-separator-tool-item.c

@@ -0,0 +1,38 @@
+/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
+/*
+ *  Copyright (C) 2011  Ruby-GNOME2 Project Team
+ *  Copyright (C) 2004  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 cSeparatorToolItem
+
+static VALUE
+rg_initialize(VALUE self)
+{
+    RBGTK_INITIALIZE(self, gtk_separator_tool_item_new());
+    return Qnil;
+}
+
+void
+Init_gtk_separatortoolitem(VALUE mGtk)
+{
+    VALUE RG_TARGET_NAMESPACE = G_DEF_CLASS(GTK_TYPE_SEPARATOR_TOOL_ITEM, "SeparatorToolItem", mGtk);
+    RG_DEF_METHOD(initialize, 0);
+}

data/ext/gtk3/rbgtk-separator.c

@@ -0,0 +1,44 @@
+/* -*- 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) 1998-2000 Yukihiro Matsumoto,
+ *                          Daisuke Kanda,
+ *                          Hiroshi Igarashi
+ *
+ *  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 cSeparator
+#define _SELF(self) (RVAL2GTKSEPARATOR(self))
+
+static VALUE
+rg_initialize(VALUE self, VALUE orientation)
+{
+    RBGTK_INITIALIZE(self, gtk_separator_new(RVAL2GTKORIENTATION(orientation)));
+
+    return Qnil;
+}
+
+void
+Init_gtk_separator(VALUE mGtk)
+{
+    VALUE RG_TARGET_NAMESPACE = G_DEF_CLASS(GTK_TYPE_SEPARATOR, "Separator", mGtk);
+
+    RG_DEF_METHOD(initialize, 1);
+}

data/ext/gtk3/rbgtk-settings.c

@@ -0,0 +1,229 @@
+/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
+/*
+ *  Copyright (C) 2011  Ruby-GNOME2 Project Team
+ *  Copyright (C) 2003,2004 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 cSettings
+
+static VALUE prop_func_table;
+
+static VALUE
+rg_s_default(G_GNUC_UNUSED VALUE self)
+{
+    return GOBJ2RVAL(gtk_settings_get_default());
+}
+
+static VALUE
+rg_s_get_for_screen(G_GNUC_UNUSED VALUE self, VALUE screen)
+{
+    return GOBJ2RVAL(gtk_settings_get_for_screen(RVAL2GDKSCREEN(screen)));
+}
+
+/*
+ * Gtk::Settings.install_property(...) do |spec, str|
+ *   #parse str
+ *   new_val = ....   # parse value from string.
+ *   new_val          # return new_val or nil if you can't convert the value.
+ * end
+ */
+static gboolean
+rc_property_parser(const GParamSpec *pspec, const GString *rc_string, GValue *property_value)
+{
+    VALUE spec = GOBJ2RVAL((gpointer)pspec);
+    VALUE func = rb_hash_aref(prop_func_table, spec);
+    VALUE ret = rb_funcall(func, id_call, 2, spec, CSTR2RVAL(rc_string->str));
+    if (NIL_P(ret)) {
+        return FALSE;
+    } else if (RVAL2CBOOL(ret)){
+        rbgobj_rvalue_to_gvalue(ret, property_value);
+        return TRUE;
+    } else {
+        rb_raise(rb_eArgError, "Gtk::Settings#install_property() block should return new value or nil");
+    }
+}
+
+static VALUE
+rg_s_install_property(VALUE self, VALUE spec)
+{
+    GParamSpec* pspec = RVAL2GPARAMSPEC(spec);
+    if (rb_block_given_p()){
+        VALUE func = rb_block_proc();
+        rb_hash_aset(prop_func_table, spec, func);
+        gtk_settings_install_property_parser(pspec, (GtkRcPropertyParser)rc_property_parser);
+    } else {
+        gtk_settings_install_property(pspec);
+    }
+    return self;
+}
+
+static VALUE
+settings_rc_property_parse(G_GNUC_UNUSED VALUE self, VALUE rbspec, VALUE rbstring, GtkRcPropertyParser parser)
+{
+    GParamSpec *spec = RVAL2GPARAMSPEC(rbspec);
+    GString *string = g_string_new(RVAL2CSTR(rbstring));
+    GValue property = G_VALUE_INIT;
+    gboolean parsed;
+
+    g_value_init(&property, spec->value_type);
+
+    parsed = parser(spec, string, &property);
+
+    g_string_free(string, TRUE);
+
+    return parsed ? GVAL2RVAL_UNSET(&property) : Qnil;
+}
+
+static VALUE
+rg_s_rc_property_parse_color(VALUE self, VALUE rbspec, VALUE rbstring)
+{
+    return settings_rc_property_parse(self, rbspec, rbstring, gtk_rc_property_parse_color);
+}
+
+static VALUE
+rg_s_rc_property_parse_enum(VALUE self, VALUE rbspec, VALUE rbstring)
+{
+    return settings_rc_property_parse(self, rbspec, rbstring, gtk_rc_property_parse_enum);
+}
+
+static VALUE
+rg_s_rc_property_parse_flags(VALUE self, VALUE rbspec, VALUE rbstring)
+{
+    return settings_rc_property_parse(self, rbspec, rbstring, gtk_rc_property_parse_flags);
+}
+
+static VALUE
+rg_s_rc_property_parse_requisition(G_GNUC_UNUSED VALUE self, VALUE rbspec, VALUE rbstring)
+{
+    GParamSpec *spec = RVAL2GPARAMSPEC(rbspec);
+    GString *string = g_string_new(RVAL2CSTR(rbstring));
+    GValue property = G_VALUE_INIT;
+    gboolean parsed;
+    GtkRequisition *requisition;
+    gint width;
+    gint height;
+
+    g_value_init(&property, GTK_TYPE_REQUISITION);
+
+    parsed = gtk_rc_property_parse_requisition(spec, string, &property);
+
+    g_string_free(string, TRUE);
+
+    if (!parsed)
+        return Qnil;
+
+    requisition = g_value_get_boxed(&property);
+    width = requisition->width;
+    height = requisition->height;
+
+    g_value_unset(&property);
+
+    return rb_assoc_new(INT2NUM(width), INT2NUM(height));
+}
+
+static VALUE
+settings_rc_property_parse_border_result(VALUE value)
+{
+    return GTKBORDER2RVAL(g_value_get_boxed((GValue *)value));
+}
+
+static VALUE
+settings_rc_property_parse_border_ensure(VALUE value)
+{
+    g_value_unset((GValue *)value);
+
+    return Qnil;
+}
+
+static VALUE
+rg_s_rc_property_parse_border(G_GNUC_UNUSED VALUE self, VALUE rbspec, VALUE rbstring)
+{
+    GParamSpec *spec = RVAL2GPARAMSPEC(rbspec);
+    GString *string = g_string_new(RVAL2CSTR(rbstring));
+    GValue property = G_VALUE_INIT;
+    gboolean parsed;
+
+    g_value_init(&property, GTK_TYPE_BORDER);
+
+    parsed = gtk_rc_property_parse_border(spec, string, &property);
+
+    g_string_free(string, TRUE);
+
+    if (!parsed)
+        return Qnil;
+
+    return rb_ensure(settings_rc_property_parse_border_result, (VALUE)&property,
+                     settings_rc_property_parse_border_ensure, (VALUE)&property);
+}
+
+static VALUE
+rg_set_property_value(VALUE self, VALUE rbname, VALUE rbvalue, VALUE origin)
+{
+    GtkSettings *settings = RVAL2GTKSETTINGS(self);
+    GtkSettingsValue svalue = { (gchar *)RVAL2CSTR(origin), G_VALUE_INIT };
+    const gchar *name = RVAL2CSTR(rbname);
+    g_value_init(&svalue.value, RVAL2GTYPE(rbvalue));
+    rbgobj_rvalue_to_gvalue(rbvalue, &svalue.value);
+
+    gtk_settings_set_property_value(settings, name, &svalue);
+
+    g_value_unset(&svalue.value);
+
+    return self;
+}
+
+/* We don't need them, Use set_property_value() instead.
+void        gtk_settings_set_string_property
+                                            (GtkSettings *settings,
+                                             const gchar *name,
+                                             const gchar *v_string,
+                                             const gchar *origin);
+void        gtk_settings_set_long_property  (GtkSettings *settings,
+                                             const gchar *name,
+                                             glong v_long,
+                                             const gchar *origin);
+void        gtk_settings_set_double_property
+                                            (GtkSettings *settings,
+                                             const gchar *name,
+                                             gdouble v_double,
+                                             const gchar *origin);
+*/
+
+void
+Init_gtk_settings(VALUE mGtk)
+{
+    VALUE RG_TARGET_NAMESPACE = G_DEF_CLASS(GTK_TYPE_SETTINGS, "Settings", mGtk);
+
+    rb_global_variable(&prop_func_table);
+    prop_func_table = rb_hash_new();
+
+    RG_DEF_SMETHOD(default, 0);
+    RG_DEF_SMETHOD(get_for_screen, 1);
+    RG_DEF_SMETHOD(install_property, 1);
+
+    RG_DEF_SMETHOD(rc_property_parse_color, 2);
+    RG_DEF_SMETHOD(rc_property_parse_enum, 2);
+    RG_DEF_SMETHOD(rc_property_parse_flags, 2);
+    RG_DEF_SMETHOD(rc_property_parse_requisition, 2);
+    RG_DEF_SMETHOD(rc_property_parse_border, 2);
+
+    RG_DEF_METHOD(set_property_value, 3);
+}