gtk3 2.2.4-x64-mingw32

data/ext/gtk3/rbgtk-print-unix-dialog.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/rbgtk-printer.c

@@ -0,0 +1,155 @@
+/* -*- 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>
+
+#ifndef GTK_TYPE_PRINT_BACKEND
+#define GTK_TYPE_PRINT_BACKEND  (gtk_print_backend_get_type ())
+#define GTK_PRINT_BACKEND(obj)  (G_TYPE_CHECK_INSTANCE_CAST ((obj), GTK_TYPE_PRINT_BACKEND, GtkPrintBackend))
+GType gtk_print_backend_get_type (void) G_GNUC_CONST;
+#endif
+
+#define RG_TARGET_NAMESPACE cPrinter
+#define _SELF(s) (RVAL2GTKPRINTER(s))
+
+static VALUE rb_mGtk;
+
+static VALUE
+rg_initialize(VALUE self, VALUE name, VALUE backend, VALUE rb_virtual)
+{
+    GtkPrinter *printer;
+
+    printer = gtk_printer_new(RVAL2CSTR(name),
+                              RVAL2GTKPRINTBACKEND(backend),
+                              RVAL2CBOOL(rb_virtual));
+
+    G_INITIALIZE(self, printer);
+    return Qnil;
+}
+
+static VALUE
+rg_description(VALUE self)
+{
+    return CSTR2RVAL(gtk_printer_get_description(_SELF(self)));
+}
+
+static VALUE
+rg_active_p(VALUE self)
+{
+    return CBOOL2RVAL(gtk_printer_is_default(_SELF(self)));
+}
+
+static VALUE
+rg_default_p(VALUE self)
+{
+    return CBOOL2RVAL(gtk_printer_is_default(_SELF(self)));
+}
+
+static VALUE
+rg_operator_p_compare(VALUE self, VALUE other)
+{
+    if (rb_obj_is_kind_of(other, GTYPE2CLASS(GTK_TYPE_PRINTER))){
+        return INT2NUM(gtk_printer_compare(_SELF(self), _SELF(other)));
+    } else {
+        rb_raise(rb_eTypeError, "%s isn't a kind of Gtk::Printer", rb_class2name(other));
+    }
+}
+
+struct callback_arg
+{
+    VALUE callback;
+    int argc;
+    VALUE *argv;
+};
+
+static VALUE
+invoke_callback(VALUE data)
+{
+    struct callback_arg *arg = (struct callback_arg *)data;
+
+    return rb_funcall2(arg->callback, id_call, arg->argc, arg->argv);
+}
+
+static gboolean
+each_printer(GtkPrinter *printer, gpointer data)
+{
+    VALUE result;
+    VALUE argv[1];
+    struct callback_arg arg;
+
+    argv[0] = GOBJ2RVAL(printer);
+
+    arg.callback = (VALUE)data;
+    arg.argc = 1;
+    arg.argv = argv;
+
+    result = G_PROTECT_CALLBACK(invoke_callback, &arg);
+    return NIL_P(rb_errinfo()) ? TRUE : RVAL2CBOOL(result);
+}
+
+static void
+remove_callback_reference(gpointer data)
+{
+    VALUE callback = (VALUE)data;
+    G_CHILD_REMOVE(rb_mGtk, callback);
+}
+
+static VALUE
+rg_s_each(int argc, VALUE *argv, VALUE self)
+{
+    VALUE wait, block;
+    rb_scan_args(argc, argv, "01", &wait);
+
+    block = rb_block_proc();
+    G_CHILD_ADD(rb_mGtk, block);
+    gtk_enumerate_printers(each_printer, (gpointer)block,
+                           remove_callback_reference, RVAL2CBOOL(wait));
+
+    return self;
+}
+#endif
+
+void
+Init_gtk_printer(VALUE mGtk)
+{
+#ifdef HAVE_GTK_UNIX_PRINT
+    rb_mGtk = mGtk;
+    VALUE RG_TARGET_NAMESPACE = G_DEF_CLASS(GTK_TYPE_PRINTER, "Printer", mGtk);
+    rb_include_module(RG_TARGET_NAMESPACE, rb_mComparable);
+
+    G_DEF_CLASS(GTK_TYPE_PRINT_BACKEND, "PrintBackend", mGtk);
+
+    RG_DEF_SMETHOD(each, -1);
+
+    RG_DEF_METHOD(initialize, 3);
+    RG_DEF_METHOD(description, 0);
+    RG_DEF_METHOD_P(active, 0);
+    RG_DEF_METHOD_P(default, 0);
+    RG_DEF_METHOD_OPERATOR("<=>", p_compare, 1);
+
+    G_DEF_CLASS3("GtkPrintBackendCups", "PrintBackendCups", mGtk);
+    G_DEF_CLASS3("GtkPrintBackendFile", "PrintBackendFile", mGtk);
+    G_DEF_CLASS3("GtkPrintBackendLpr", "PrintBackendLpr", mGtk);
+#endif
+}

data/ext/gtk3/rbgtk-progress-bar.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/rbgtk-radio-action.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/rbgtk-radio-button.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);
+}