gtk3 2.2.4-x64-mingw32

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

@@ -0,0 +1,147 @@
+/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
+/*
+ *  Copyright (C) 2011  Ruby-GNOME2 Project Team
+ *  Copyright (C) 2002-2006 Ruby-GNOME2 Project Team
+ *  Copyright (C) 1998-2000 Yukihiro Matsumoto,
+ *                          Daisuke Kanda,
+ *                          Hiroshi Igarashi,
+ *                          dellin 
+ *
+ *  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 cRadioMenuItem
+
+struct rbgtk_rval2gtkradiomenuitemgslist_args {
+    VALUE ary;
+    long n;
+    GSList *result;
+};
+
+static VALUE
+rbgtk_rval2gtkradiomenuitemgslist_body(VALUE value)
+{
+    long i;
+    struct rbgtk_rval2gtkradiomenuitemgslist_args *args = (struct rbgtk_rval2gtkradiomenuitemgslist_args *)value;
+
+    for (i = 0; i < args->n; i++)
+        args->result = g_slist_append(args->result, RVAL2GTKRADIOMENUITEM(RARRAY_PTR(args->ary)[i]));
+
+    return Qnil;
+}
+
+static G_GNUC_NORETURN VALUE
+rbgtk_rval2gtkradiomenuitemgslist_rescue(VALUE value)
+{
+    g_slist_free(((struct rbgtk_rval2gtkradiomenuitemgslist_args *)value)->result);
+
+    rb_exc_raise(rb_errinfo());
+}
+
+static GSList *
+rbgtk_rval2gtkradiomenuitemgslist(VALUE value)
+{
+    struct rbgtk_rval2gtkradiomenuitemgslist_args args;
+
+    args.ary = rb_ary_to_ary(value);
+    args.n = RARRAY_LEN(args.ary);
+    args.result = NULL;
+
+    rb_rescue(rbgtk_rval2gtkradiomenuitemgslist_body, (VALUE)&args,
+              rbgtk_rval2gtkradiomenuitemgslist_rescue, (VALUE)&args);
+
+    return args.result;
+}
+
+#define RVAL2GTKRADIOMENUITEMGSLIST(value) rbgtk_rval2gtkradiomenuitemgslist(value)
+
+static VALUE
+rg_initialize(int argc, VALUE *argv, VALUE self)
+{
+    VALUE arg1, arg2, arg3;
+    GtkWidget *widget;
+    GSList *list = NULL;
+    const gchar *label = NULL;
+    const gchar *mnemonic = NULL;
+
+    if (rb_scan_args(argc, argv, "03", &arg1, &arg2, &arg3) > 0 &&
+        TYPE(arg1) == T_STRING) {
+        if (NIL_P(arg2) || RVAL2CBOOL(arg2))
+            mnemonic = RVAL2CSTR(arg1);
+        else
+            label = RVAL2CSTR(arg1);
+    } else {
+        if (!NIL_P(arg2)) {
+            if (NIL_P(arg3) || RVAL2CBOOL(arg3))
+                mnemonic = RVAL2CSTR(arg2);
+            else
+                label = RVAL2CSTR(arg2);
+        }
+
+        if (rb_obj_is_kind_of(arg1, GTYPE2CLASS(GTK_TYPE_RADIO_MENU_ITEM)))
+            list = gtk_radio_menu_item_get_group(RVAL2GTKRADIOMENUITEM(arg1));
+        else if (TYPE(arg1) == T_ARRAY)
+            /* TODO: This might leak. */
+            list = RVAL2GTKRADIOMENUITEMGSLIST(arg1);
+        else if (!NIL_P(arg1))
+            rb_raise(rb_eArgError, "invalid argument %s (expect Array or Gtk::RadioMenuItem)", 
+                     rb_class2name(CLASS_OF(arg1)));
+    }
+
+    if (label != NULL)
+        widget = gtk_radio_menu_item_new_with_label(list, label);
+    else if (mnemonic != NULL)
+        widget = gtk_radio_menu_item_new_with_mnemonic(list, mnemonic);
+    else
+        widget = gtk_radio_menu_item_new(list);
+
+    RBGTK_INITIALIZE(self, widget);
+
+    return Qnil;
+}
+
+static VALUE
+rmitem_get_group(VALUE self)
+{
+    return GOBJGSLIST2RVAL(gtk_radio_menu_item_get_group(RVAL2GTKRADIOMENUITEM(self)));
+}
+
+static VALUE
+rmitem_set_group(VALUE self, VALUE grp_ary)
+{
+    GtkRadioMenuItem *rmitem2add, *rmitem_orig;
+    GSList *group;
+
+    rmitem2add = RVAL2GTKRADIOMENUITEM(self);
+    rmitem_orig = RVAL2GTKRADIOMENUITEM(rb_ary_entry(grp_ary, 0));
+    group = gtk_radio_menu_item_get_group(rmitem_orig);
+
+    gtk_radio_menu_item_set_group(rmitem2add, group);
+
+    return GOBJGSLIST2RVAL(gtk_radio_menu_item_get_group(rmitem2add));
+}
+
+void
+Init_gtk_radio_menu_item(VALUE mGtk)
+{
+    VALUE RG_TARGET_NAMESPACE = G_DEF_CLASS(GTK_TYPE_RADIO_MENU_ITEM, "RadioMenuItem", mGtk);
+
+    RG_DEF_METHOD(initialize, -1);
+    G_REPLACE_GET_PROPERTY(RG_TARGET_NAMESPACE, "group", rmitem_get_group, 0);
+    G_REPLACE_SET_PROPERTY(RG_TARGET_NAMESPACE, "group", rmitem_set_group, 1);
+}

data/ext/gtk3/rbgtk-radio-tool-button.c

@@ -0,0 +1,131 @@
+/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
+/*
+ *  Copyright (C) 2011  Ruby-GNOME2 Project Team
+ *  Copyright (C) 2004-2006 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 cRadioToolButton
+#define _SELF(self) (RVAL2GTKRADIOTOOLBUTTON(self))
+
+static VALUE RG_TARGET_NAMESPACE;
+
+struct rbgtk_rval2gtkradiotoolbuttongslist_args {
+    VALUE ary;
+    long n;
+    GSList *result;
+};
+
+static VALUE
+rbgtk_rval2gtkradiotoolbuttongslist_body(VALUE value)
+{
+    long i;
+    struct rbgtk_rval2gtkradiotoolbuttongslist_args *args = (struct rbgtk_rval2gtkradiotoolbuttongslist_args *)value;
+
+    for (i = 0; i < args->n; i++)
+        args->result = g_slist_append(args->result, RVAL2GTKRADIOMENUITEM(RARRAY_PTR(args->ary)[i]));
+
+    return Qnil;
+}
+
+static G_GNUC_NORETURN VALUE
+rbgtk_rval2gtkradiotoolbuttongslist_rescue(VALUE value)
+{
+    g_slist_free(((struct rbgtk_rval2gtkradiotoolbuttongslist_args *)value)->result);
+
+    rb_exc_raise(rb_errinfo());
+}
+
+static GSList *
+rbgtk_rval2gtkradiotoolbuttongslist(VALUE value)
+{
+    struct rbgtk_rval2gtkradiotoolbuttongslist_args args;
+
+    args.ary = rb_ary_to_ary(value);
+    args.n = RARRAY_LEN(args.ary);
+    args.result = NULL;
+
+    rb_rescue(rbgtk_rval2gtkradiotoolbuttongslist_body, (VALUE)&args,
+              rbgtk_rval2gtkradiotoolbuttongslist_rescue, (VALUE)&args);
+
+    return args.result;
+}
+
+#define RVAL2GTKRADIOTOOLBUTTONGSLIST(value) rbgtk_rval2gtkradiotoolbuttongslist(value)
+
+static VALUE
+rg_initialize(int argc, VALUE *argv, VALUE self)
+{
+    VALUE group_or_stock_id, rbstock_id;
+    GtkToolItem *widget;
+
+    if (rb_scan_args(argc, argv, "02", &group_or_stock_id, &rbstock_id) > 0) {
+        GSList *group = NULL;
+        const gchar *stock_id = TYPE(rbstock_id) == T_SYMBOL ?
+            rb_id2name(SYM2ID(rbstock_id)) :
+            RVAL2CSTR_ACCEPT_NIL(rbstock_id);
+
+        if (TYPE(group_or_stock_id) == T_ARRAY)
+            /* TODO: This has a potential for leaking. */
+            group = RVAL2GTKRADIOTOOLBUTTONGSLIST(group_or_stock_id);
+        else if (rb_obj_is_kind_of(group_or_stock_id, RG_TARGET_NAMESPACE))
+            group = gtk_radio_tool_button_get_group(_SELF(group_or_stock_id));
+
+        if (stock_id == NULL)
+            widget = gtk_radio_tool_button_new(group);
+        else
+            widget = gtk_radio_tool_button_new_from_stock(group, stock_id);
+    } else {
+        widget = gtk_radio_tool_button_new(NULL);
+    }
+
+    RBGTK_INITIALIZE(self, widget);
+
+    return Qnil;
+}
+
+static VALUE
+rbtn_get_group(VALUE self)
+{
+    return GOBJGSLIST2RVAL(gtk_radio_tool_button_get_group(_SELF(self)));
+}
+
+static VALUE
+rbtn_set_group(VALUE self, VALUE rbgroup)
+{
+    GtkRadioToolButton *button = _SELF(self);
+    GSList *group = TYPE(rbgroup) == T_ARRAY ?
+        /* TODO: This might leak. */
+        RVAL2GTKRADIOTOOLBUTTONGSLIST(rbgroup) :
+        gtk_radio_tool_button_get_group(_SELF(rbgroup));
+
+    gtk_radio_tool_button_set_group(button, group);
+
+    return self;
+}
+
+void
+Init_gtk_radiotoolbutton(VALUE mGtk)
+{
+    RG_TARGET_NAMESPACE = G_DEF_CLASS(GTK_TYPE_RADIO_TOOL_BUTTON, "RadioToolButton", mGtk);
+
+    RG_DEF_METHOD(initialize, -1);
+    G_REPLACE_GET_PROPERTY(RG_TARGET_NAMESPACE, "group", rbtn_get_group, 0);
+    G_REPLACE_SET_PROPERTY(RG_TARGET_NAMESPACE, "group", rbtn_set_group, 1);
+}

data/ext/gtk3/rbgtk-range.c

@@ -0,0 +1,68 @@
+/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
+/*
+ *  Copyright (C) 2011  Ruby-GNOME2 Project Team
+ *  Copyright (C) 2002-2006 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 cRange
+#define _SELF(self) (RVAL2GTKRANGE(self))
+
+static VALUE
+rg_value(VALUE self)
+{
+    return rb_float_new(gtk_range_get_value(_SELF(self)));
+}
+
+static VALUE
+rg_set_increments(VALUE self, VALUE step, VALUE page)
+{
+    gtk_range_set_increments(_SELF(self), NUM2DBL(step), NUM2DBL(page));
+    return self;
+}
+
+static VALUE
+rg_set_range(VALUE self, VALUE min, VALUE max)
+{
+    gtk_range_set_range(_SELF(self), NUM2DBL(min), NUM2DBL(max));
+    return self;
+}
+
+static VALUE
+rg_set_value(VALUE self, VALUE value)
+{
+    gtk_range_set_value(_SELF(self), NUM2DBL(value));
+    return self;
+}
+
+void
+Init_gtk_range(VALUE mGtk)
+{
+    VALUE RG_TARGET_NAMESPACE = G_DEF_CLASS(GTK_TYPE_RANGE, "Range", mGtk);
+
+    RG_DEF_METHOD(value, 0);
+    RG_DEF_METHOD(set_increments, 2);
+    RG_DEF_METHOD(set_range, 2);
+    RG_DEF_METHOD(set_value, 1);
+
+    G_DEF_CLASS(GTK_TYPE_SENSITIVITY_TYPE, "SensitivityType", RG_TARGET_NAMESPACE);
+}

data/ext/gtk3/rbgtk-recent-action.c

@@ -0,0 +1,64 @@
+/* -*- 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 cRecentAction
+
+static VALUE
+rg_initialize(int argc, VALUE *argv, VALUE self)
+{
+    VALUE name, options, label, tooltip, stock_id, buffer, manager;
+    GtkAction *action = NULL;
+
+    rb_scan_args(argc, argv, "11", &name, &options);
+    rbg_scan_options(options,
+                     "label", &label,
+                     "tooltip", &tooltip,
+                     "stock_id", &stock_id,
+                     "manager", &manager,
+                     NULL);
+
+    if (NIL_P(manager))
+        action = gtk_recent_action_new(RVAL2CSTR(name),
+                                       RVAL2CSTR_ACCEPT_NIL(label),
+                                       RVAL2CSTR_ACCEPT_NIL(tooltip),
+                                       RVAL2GLIBID_ACCEPT_NIL(stock_id, buffer));
+    else
+        action = gtk_recent_action_new_for_manager(RVAL2CSTR(name),
+                                                   RVAL2CSTR_ACCEPT_NIL(label),
+                                                   RVAL2CSTR_ACCEPT_NIL(tooltip),
+                                                   RVAL2GLIBID_ACCEPT_NIL(stock_id, buffer),
+                                                   RVAL2GTKRECENTMANAGER(manager));
+    G_INITIALIZE(self, action);
+
+    return Qnil;
+}
+
+void
+Init_gtk_recentaction(VALUE mGtk)
+{
+    VALUE RG_TARGET_NAMESPACE = G_DEF_CLASS(GTK_TYPE_RECENT_ACTION, "RecentAction", mGtk);
+    RG_DEF_METHOD(initialize, -1);
+}

data/ext/gtk3/rbgtk-recent-chooser-dialog.c

@@ -0,0 +1,66 @@
+/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
+/*
+ *  Copyright (C) 2011  Ruby-GNOME2 Project Team
+ *  Copyright (C) 2006  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 cRecentChooserDialog
+#define _SELF(self) (RVAL2GTKRECENTCHOOSERDIALOG(self))
+
+static VALUE
+rg_initialize(int argc, VALUE *argv, VALUE self)
+{
+    VALUE options, rb_title, rb_parent, rb_manager, rb_button_ary;
+    const gchar *title;
+    GtkWindow *parent;
+    GtkRecentManager *manager;
+    GtkWidget *dialog;
+
+    rb_scan_args(argc, argv, "01", &options);
+    rbg_scan_options(options,
+                     "title", &rb_title,
+                     "parent", &rb_parent,
+                     "manager", &rb_manager,
+                     "buttons", &rb_button_ary,
+                     NULL);
+    title = RVAL2CSTR_ACCEPT_NIL(rb_title);
+    parent = NIL_P(rb_parent) ? NULL : RVAL2GTKWINDOW(rb_parent);
+    manager = NIL_P(rb_manager) ? NULL : RVAL2GTKRECENTMANAGER(rb_manager);
+
+    if (manager) {
+        dialog = gtk_recent_chooser_dialog_new_for_manager(title, parent, manager, NULL, NULL);
+    } else {
+        dialog = gtk_recent_chooser_dialog_new(title, parent, NULL, NULL);
+    }
+    RBGTK_INITIALIZE(self, dialog);
+    if (!NIL_P(rb_button_ary))
+        rb_funcall2(self, rb_intern("add_buttons"),
+                    RARRAY_LEN(rb_button_ary), RARRAY_PTR(rb_button_ary));
+
+    return Qnil;
+}
+
+void
+Init_gtk_recent_chooser_dialog(VALUE mGtk)
+{
+  VALUE RG_TARGET_NAMESPACE = G_DEF_CLASS(GTK_TYPE_RECENT_CHOOSER_DIALOG, "RecentChooserDialog", mGtk);
+
+  RG_DEF_METHOD(initialize, -1);
+}