gtk3 0.0.1 → 1.2.0

data/ext/gtk3/rbgtkprintunixdialog.c

@@ -0,0 +1,90 @@
+/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
+/*
+ *  Copyright (C) 2011  Ruby-GNOME2 Project Team
+ *  Copyright (C) 2006  Ruby-GNOME2 Project Team
+ *
+ *  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"
+
+#ifdef HAVE_GTK_UNIX_PRINT
+#include <gtk/gtkunixprint.h>
+
+#define RG_TARGET_NAMESPACE cPrintUnixDialog
+#define _SELF(s) (RVAL2GTKPRINTUNIXDIALOG(s))
+#ifndef GTK_TYPE_PRINT_CAPABILITIES
+#  define GTK_TYPE_PRINT_CAPABILITIES (gtk_print_capabilities_get_type())
+#endif
+
+static VALUE
+rg_initialize(int argc, VALUE *argv, VALUE self)
+{
+    VALUE options, rb_title, rb_parent;
+    const gchar *title;
+    GtkWindow *parent;
+    GtkWidget *dialog;
+
+    rb_scan_args(argc, argv, "01", &options);
+    rbg_scan_options(options,
+                     "title", &rb_title,
+                     "parent", &rb_parent,
+                     NULL);
+    title = RVAL2CSTR_ACCEPT_NIL(rb_title);
+    parent = NIL_P(rb_parent) ? NULL : RVAL2GTKWINDOW(rb_parent);
+
+    dialog = gtk_print_unix_dialog_new(title, parent);
+    RBGTK_INITIALIZE(self, dialog);
+
+    return Qnil;
+}
+
+static VALUE
+rg_add_custom_tab(VALUE self, VALUE child, VALUE tab_label)
+{
+    gtk_print_unix_dialog_add_custom_tab(_SELF(self),
+                                         RVAL2GTKWIDGET(child),
+                                         RVAL2GTKWIDGET(tab_label));
+    return self;
+}
+
+static VALUE
+rg_set_manual_capability(VALUE self, VALUE rb_capabilities)
+{
+    GtkPrintCapabilities capabilities;
+
+    capabilities = RVAL2GTKPRINTCAPABILITIES(rb_capabilities);
+    gtk_print_unix_dialog_set_manual_capabilities(_SELF(self), capabilities);
+    return self;
+}
+#endif
+
+void
+Init_gtk_print_unix_dialog(VALUE mGtk)
+{
+#ifdef HAVE_GTK_UNIX_PRINT
+    VALUE RG_TARGET_NAMESPACE = G_DEF_CLASS(GTK_TYPE_PRINT_UNIX_DIALOG,
+                                         "PrintUnixDialog", mGtk);
+
+    RG_DEF_METHOD(initialize, -1);
+    RG_DEF_METHOD(add_custom_tab, 2);
+    RG_DEF_METHOD(set_manual_capability, 1);
+    RG_DEF_ALIAS("settings", "print_settings");
+    RG_DEF_ALIAS("set_settings", "set_print_settings");
+
+    G_DEF_CLASS(GTK_TYPE_PRINT_CAPABILITIES, "Capabilities", RG_TARGET_NAMESPACE);
+#endif
+}

data/ext/gtk3/rbgtkprogressbar.c

@@ -0,0 +1,72 @@
+/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
+/*
+ *  Copyright (C) 2011  Ruby-GNOME2 Project Team
+ *  Copyright (C) 2002-2005 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 cProgressBar
+
+static VALUE
+rg_initialize(VALUE self)
+{
+    RBGTK_INITIALIZE(self, gtk_progress_bar_new());
+    return Qnil;
+}
+
+static VALUE
+rg_pulse(VALUE self)
+{
+    gtk_progress_bar_pulse(RVAL2GTKPROGRESSBAR(self));
+    return self;
+}
+
+void 
+Init_gtk_progress_bar(VALUE mGtk)
+{
+    VALUE RG_TARGET_NAMESPACE = G_DEF_CLASS(GTK_TYPE_PROGRESS_BAR, "ProgressBar", mGtk);
+
+    /* GtkProgressBarOrientation */
+/* deprecated
+    G_DEF_CLASS(GTK_TYPE_PROGRESS_BAR_ORIENTATION, "Orientation", RG_TARGET_NAMESPACE);
+*/
+
+    RG_DEF_METHOD(initialize, 0);
+    RG_DEF_METHOD(pulse, 0);
+
+    /* undef deprecated properties */
+    rb_undef_method(RG_TARGET_NAMESPACE, "adjustment");
+    rb_undef_method(RG_TARGET_NAMESPACE, "adjustment=");
+    rb_undef_method(RG_TARGET_NAMESPACE, "set_adjustment");
+    rb_undef_method(RG_TARGET_NAMESPACE, "bar_style");
+    rb_undef_method(RG_TARGET_NAMESPACE, "bar_style=");
+    rb_undef_method(RG_TARGET_NAMESPACE, "set_bar_style");
+    rb_undef_method(RG_TARGET_NAMESPACE, "discrete_blocks");
+    rb_undef_method(RG_TARGET_NAMESPACE, "discrete_blocks=");
+    rb_undef_method(RG_TARGET_NAMESPACE, "set_discrete_blocks");
+    rb_undef_method(RG_TARGET_NAMESPACE, "activity_blocks");
+    rb_undef_method(RG_TARGET_NAMESPACE, "activity_blocks=");
+    rb_undef_method(RG_TARGET_NAMESPACE, "set_activity_blocks");
+    rb_undef_method(RG_TARGET_NAMESPACE, "activity_step");
+    rb_undef_method(RG_TARGET_NAMESPACE, "activity_step=");
+    rb_undef_method(RG_TARGET_NAMESPACE, "set_activity_step");
+}

data/ext/gtk3/rbgtkradioaction.c

@@ -0,0 +1,122 @@
+/* -*- 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 cRadioAction
+#define _SELF(self) (RVAL2GTKRADIOACTION(self))
+
+static VALUE
+rg_initialize(int argc, VALUE *argv, VALUE self)
+{
+    VALUE name, value, options, label, tooltip, stock_id, buffer;
+
+    rb_scan_args(argc, argv, "21", &name, &value, &options);
+    rbg_scan_options(options,
+                     "label", &label,
+                     "tooltip", &tooltip,
+                     "stock_id", &stock_id,
+                     NULL);
+
+    G_INITIALIZE(self, gtk_radio_action_new(RVAL2CSTR(name),
+                                            RVAL2CSTR_ACCEPT_NIL(label),
+                                            RVAL2CSTR_ACCEPT_NIL(tooltip),
+                                            RVAL2GLIBID_ACCEPT_NIL(stock_id, buffer),
+                                            NUM2INT(value)));
+
+    return Qnil;
+}
+
+static VALUE
+raction_get_group(VALUE self)
+{
+    return GOBJGSLIST2RVAL(gtk_radio_action_get_group(_SELF(self)));
+}
+
+struct rbgtk_rval2gtkradioactiongslist_args {
+    VALUE ary;
+    long n;
+    GSList *result;
+};
+
+static VALUE
+rbgtk_rval2gtkradioactiongslist_body(VALUE value)
+{
+    long i;
+    struct rbgtk_rval2gtkradioactiongslist_args *args = (struct rbgtk_rval2gtkradioactiongslist_args *)value;
+
+    for (i = 0; i < args->n; i++)
+        args->result = g_slist_append(args->result, RVAL2GTKRADIOACTION(RARRAY_PTR(args->ary)[i]));
+
+    return Qnil;
+}
+
+static G_GNUC_NORETURN VALUE
+rbgtk_rval2gtkradioactiongslist_rescue(VALUE value)
+{
+    g_slist_free(((struct rbgtk_rval2gtkradioactiongslist_args *)value)->result);
+
+    rb_exc_raise(rb_errinfo());
+}
+
+static GSList *
+rbgtk_rval2gtkradioactiongslist(VALUE value)
+{
+    struct rbgtk_rval2gtkradioactiongslist_args args;
+
+    args.ary = rb_ary_to_ary(value);
+    args.n = RARRAY_LEN(args.ary);
+    args.result = NULL;
+
+    rb_rescue(rbgtk_rval2gtkradioactiongslist_body, (VALUE)&args,
+              rbgtk_rval2gtkradioactiongslist_rescue, (VALUE)&args);
+
+    return args.result;
+}
+
+#define RVAL2GTKRADIOACTIONGSLIST(value) rbgtk_rval2gtkradioactiongslist(value)
+
+static VALUE
+raction_set_group(VALUE self, VALUE rbgroup)
+{
+    GtkRadioAction *action = _SELF(self);
+
+    /* TODO: This might leak.  Use gtk_radio_action_join_group() in 3.0. */
+    if (TYPE(rbgroup) == T_ARRAY)
+        gtk_radio_action_set_group(action, RVAL2GTKRADIOACTIONGSLIST(rbgroup));
+    else if (NIL_P(rbgroup))
+        gtk_radio_action_set_group(action, NULL);
+    else
+        gtk_radio_action_set_group(action,
+                                   gtk_radio_action_get_group(RVAL2GTKRADIOACTION(rbgroup)));
+
+    return self;
+}
+
+void 
+Init_gtk_radio_action(VALUE mGtk)
+{
+    VALUE RG_TARGET_NAMESPACE = G_DEF_CLASS(GTK_TYPE_RADIO_ACTION, "RadioAction", mGtk);
+
+    RG_DEF_METHOD(initialize, -1);
+    G_REPLACE_GET_PROPERTY(RG_TARGET_NAMESPACE, "group", raction_get_group, 0);
+    G_REPLACE_SET_PROPERTY(RG_TARGET_NAMESPACE, "group", raction_set_group, 1);
+}

data/ext/gtk3/rbgtkradiobutton.c

@@ -0,0 +1,89 @@
+/* -*- 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 cRadioButton
+
+static VALUE RG_TARGET_NAMESPACE;
+
+#define _GROUP(s) (NIL_P(s) ? NULL : RVAL2GTKRADIOBUTTON(s))
+
+static GtkWidget*
+create_button(VALUE group, VALUE label, VALUE use_underline)
+{
+    GtkWidget* widget = NULL;
+
+    if (TYPE(label) == T_STRING){
+        if (NIL_P(use_underline) || RVAL2CBOOL(use_underline)){
+            widget = gtk_radio_button_new_with_mnemonic_from_widget(_GROUP(group), RVAL2CSTR(label));
+        } else {
+            widget = gtk_radio_button_new_with_label_from_widget(_GROUP(group), RVAL2CSTR(label));
+        }
+    } else if (TYPE(label) == T_SYMBOL){
+        widget = gtk_radio_button_new_with_label_from_widget(_GROUP(group), rb_id2name(SYM2ID(label)));
+        gtk_button_set_use_stock(GTK_BUTTON(widget), TRUE);
+    } else if (NIL_P(label)){
+        widget = gtk_radio_button_new_from_widget(_GROUP(group));
+    } else {
+        rb_raise(rb_eArgError, "invalid argument %s (expect Symbol(Gtk::Stock constants) or String)", 
+                         rb_class2name(CLASS_OF(label)));
+    }
+    return widget;
+}
+
+static VALUE
+rg_initialize(int argc, VALUE *argv, VALUE self)
+{
+    VALUE group_or_label, label_or_use_underline, use_underline;
+    GtkWidget *widget;
+
+    if (rb_scan_args(argc, argv, "03", &group_or_label, &label_or_use_underline, &use_underline) > 0) {
+        if (rb_obj_is_kind_of(group_or_label, RG_TARGET_NAMESPACE)){
+            widget = create_button(group_or_label, label_or_use_underline, use_underline);
+        } else {
+            widget = create_button(Qnil, group_or_label, label_or_use_underline);
+        }
+    } else {
+        widget = gtk_radio_button_new(NULL);
+    }
+
+    RBGTK_INITIALIZE(self, widget);
+    return Qnil;
+}
+
+static VALUE
+rg_group(VALUE self)
+{
+    return GOBJGSLIST2RVAL(gtk_radio_button_get_group(RVAL2GTKRADIOBUTTON(self)));
+}
+
+void 
+Init_gtk_radio_button(VALUE mGtk)
+{
+    RG_TARGET_NAMESPACE = G_DEF_CLASS(GTK_TYPE_RADIO_BUTTON, "RadioButton", mGtk);
+
+    RG_DEF_METHOD(initialize, -1);
+    RG_DEF_METHOD(group, 0);
+}

data/ext/gtk3/rbgtkradiomenuitem.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);
+}