gtk3 2.2.4-x64-mingw32

data/ext/gtk3/rbgtk-menu-button.c

@@ -0,0 +1,41 @@
+/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
+/*
+ *  Copyright (C) 2014 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"
+
+#if GTK_CHECK_VERSION(3,6,0)
+
+#define RG_TARGET_NAMESPACE cMenuButton
+
+static VALUE
+rg_initialize(VALUE self)
+{
+    RBGTK_INITIALIZE(self, gtk_menu_button_new());
+    return Qnil;
+}
+
+void
+Init_gtk_menu_button(VALUE mGtk)
+{
+    VALUE RG_TARGET_NAMESPACE = G_DEF_CLASS(GTK_TYPE_MENU_BUTTON, "MenuButton", mGtk);
+
+    RG_DEF_METHOD(initialize, 0);
+}
+#endif

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

@@ -0,0 +1,95 @@
+/* -*- 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 cMenuItem
+#define _SELF(s) (RVAL2GTKMENUITEM(s))
+
+static VALUE
+rg_initialize(int argc, VALUE *argv, VALUE self)
+{
+    const gchar *label = NULL;
+    VALUE rb_label, use_underline;
+    GtkWidget *widget = NULL;
+
+    rb_scan_args(argc, argv, "02", &rb_label, &use_underline);
+
+    if (!NIL_P(rb_label))
+        label = RVAL2CSTR(rb_label);
+    if (label) {
+        if (NIL_P(use_underline) || RVAL2CBOOL(use_underline)) {
+            widget = gtk_menu_item_new_with_mnemonic(label);
+        } else {
+            widget = gtk_menu_item_new_with_label(label);
+        }
+    } else {
+        widget = gtk_menu_item_new();
+    }
+
+    RBGTK_INITIALIZE(self, widget);
+    return Qnil;
+}
+
+static VALUE
+mitem_set_submenu(VALUE self, VALUE child)
+{
+    GtkMenuItem *item;
+    GtkWidget *submenu;
+
+    item = _SELF(self);
+    submenu = gtk_menu_item_get_submenu(item);
+    if (submenu)
+        G_CHILD_REMOVE(self, GOBJ2RVAL(submenu));
+
+    gtk_menu_item_set_submenu(item, RVAL2GTKWIDGET(child));
+    G_CHILD_ADD(self, child);
+    return self;
+}
+
+static VALUE
+rg_toggle_size_request(VALUE self)
+{
+    gint requisition;
+    gtk_menu_item_toggle_size_request(_SELF(self), &requisition);
+    return INT2NUM(requisition);
+}
+
+static VALUE
+rg_toggle_size_allocate(VALUE self, VALUE allocation)
+{
+    gtk_menu_item_toggle_size_allocate(_SELF(self), NUM2INT(allocation));
+    return self;
+}
+
+void
+Init_gtk_menu_item(VALUE mGtk)
+{
+    VALUE RG_TARGET_NAMESPACE = G_DEF_CLASS(GTK_TYPE_MENU_ITEM, "MenuItem", mGtk);
+
+    RG_DEF_METHOD(initialize, -1);
+    G_REPLACE_SET_PROPERTY(RG_TARGET_NAMESPACE, "submenu", mitem_set_submenu, 1);
+    RG_DEF_METHOD(toggle_size_request, 0);
+    RG_DEF_METHOD(toggle_size_allocate, 1);
+}

data/ext/gtk3/rbgtk-menu-shell.c

@@ -0,0 +1,106 @@
+/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
+/*
+ *  Copyright (C) 2011  Ruby-GNOME2 Project Team
+ *  Copyright (C) 2002-2004 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 cMenuShell
+#define _SELF(self) (RVAL2GTKMENUSHELL(self))
+
+static VALUE
+rg_append(VALUE self, VALUE child)
+{
+    gtk_menu_shell_append(_SELF(self),RVAL2GTKWIDGET(child));
+    G_CHILD_ADD(self, child);
+    return self;
+}
+
+static VALUE
+rg_prepend(VALUE self, VALUE child)
+{
+    gtk_menu_shell_prepend(_SELF(self), RVAL2GTKWIDGET(child));
+    G_CHILD_ADD(self, child);
+    return self;
+}
+
+static VALUE
+rg_insert(VALUE self, VALUE child, VALUE pos)
+{
+    gtk_menu_shell_insert(_SELF(self), RVAL2GTKWIDGET(child),
+                          NUM2INT(pos));
+    G_CHILD_ADD(self, child);
+    return self;
+}
+
+static VALUE
+rg_deactivate(VALUE self)
+{
+    gtk_menu_shell_deactivate(_SELF(self));
+    return self;
+}
+
+static VALUE
+rg_select_item(VALUE self, VALUE menu_item)
+{
+    gtk_menu_shell_select_item(_SELF(self), RVAL2GTKWIDGET(menu_item));
+    return self;
+}
+
+static VALUE
+rg_select_first(VALUE self, VALUE search_sensitive)
+{
+    gtk_menu_shell_select_first(_SELF(self), RVAL2CBOOL(search_sensitive));
+    return self;
+}
+
+static VALUE
+rg_deselect(VALUE self)
+{
+    gtk_menu_shell_deselect(_SELF(self));
+    return self;
+}
+
+static VALUE
+rg_activate_item(VALUE self, VALUE menu_item, VALUE force_deactivate)
+{
+    gtk_menu_shell_activate_item(_SELF(self), RVAL2GTKWIDGET(menu_item), 
+                                 RVAL2CBOOL(force_deactivate));
+    return self;
+}
+
+void
+Init_gtk_menu_shell(VALUE mGtk)
+{
+    VALUE RG_TARGET_NAMESPACE = G_DEF_CLASS(GTK_TYPE_MENU_SHELL, "MenuShell", mGtk);
+
+    RG_DEF_METHOD(append, 1);
+    RG_DEF_METHOD(prepend, 1);
+    RG_DEF_METHOD(insert, 2);
+    RG_DEF_METHOD(deactivate, 0);
+    RG_DEF_METHOD(select_item, 1);
+    RG_DEF_METHOD(select_first, 1);
+    RG_DEF_METHOD(deselect, 0);
+    RG_DEF_METHOD(activate_item, 2);
+
+    G_DEF_CLASS(GTK_TYPE_MENU_DIRECTION_TYPE, "DirectionType", RG_TARGET_NAMESPACE);
+}

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

@@ -0,0 +1,81 @@
+/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
+/*
+ *  Copyright (C) 2011  Ruby-GNOME2 Project Team
+ *  Copyright (C) 2005  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 cMenuToolButton
+#define _SELF(self) (RVAL2GTKMENUTOOLBUTTON(self))
+
+static VALUE
+rg_initialize(int argc, VALUE *argv, VALUE self)
+{
+    VALUE arg;
+    GtkToolItem *item = NULL;
+
+    rb_scan_args(argc, argv, "01", &arg);
+    if (NIL_P(arg)) {
+        item = gtk_menu_tool_button_new(NULL, NULL);
+    } else if (TYPE(arg) == T_HASH) {
+        VALUE icon_widget, label, stock_id, buffer;
+        rbg_scan_options(arg,
+                         "icon_widget", &icon_widget,
+                         "label", &label,
+                         "stock_id", &stock_id,
+                         NULL);
+
+        if (!NIL_P(icon_widget))
+            item = gtk_menu_tool_button_new(RVAL2GTKWIDGET(icon_widget),
+                                              RVAL2CSTR_ACCEPT_NIL(label));
+        else if (!NIL_P(stock_id))
+            item = gtk_menu_tool_button_new_from_stock(RVAL2GLIBID(stock_id, buffer));
+    }
+    if (!item)
+        rb_raise(rb_eArgError, "Invalid arguments.");
+
+    RBGTK_INITIALIZE(self, item);
+
+    return Qnil;
+}
+
+/* deprecated
+static VALUE
+rg_set_arrow_tooltip(int argc, VALUE *argv, VALUE self)
+{
+    VALUE tooltips, tip_text, tip_private;
+
+    rb_scan_args(argc, argv, "12", &tooltips, &tip_text, &tip_private);
+    gtk_menu_tool_button_set_arrow_tooltip(_SELF(self), RVAL2GTKTOOLTIPS(self),
+                                           RVAL2CSTR_ACCEPT_NIL(tip_text),
+                                           RVAL2CSTR_ACCEPT_NIL(tip_private));
+    return self;
+}
+*/
+
+void
+Init_gtk_menutoolbutton(VALUE mGtk)
+{
+    VALUE RG_TARGET_NAMESPACE = G_DEF_CLASS(GTK_TYPE_MENU_TOOL_BUTTON, "MenuToolButton", mGtk);
+
+    RG_DEF_METHOD(initialize, -1);
+/* deprecated
+    RG_DEF_METHOD(set_arrow_tooltip, -1);
+*/
+}

data/ext/gtk3/rbgtk-menu.c

@@ -0,0 +1,168 @@
+/* -*- 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 cMenu
+#define _SELF(self) (RVAL2GTKMENU(self))
+
+static VALUE
+rg_initialize(VALUE self)
+{
+    RBGTK_INITIALIZE(self, gtk_menu_new());
+    return Qnil;
+}
+
+static VALUE
+rg_set_screen(VALUE self, VALUE screen)
+{
+    gtk_menu_set_screen(_SELF(self), RVAL2GDKSCREEN(screen));
+    return self;
+}
+
+static VALUE
+rg_reorder_child(VALUE self, VALUE child, VALUE position)
+{
+    gtk_menu_reorder_child(_SELF(self), RVAL2GTKWIDGET(child),
+                           NUM2INT(position));
+    return self;
+}
+
+static VALUE
+rg_attach(VALUE self, VALUE child, VALUE left_attach, VALUE right_attach, VALUE top_attach, VALUE bottom_attach)
+{
+    gtk_menu_attach(_SELF(self), RVAL2GTKWIDGET(child), 
+                    NUM2UINT(left_attach), NUM2UINT(right_attach), 
+                    NUM2UINT(top_attach), NUM2UINT(bottom_attach));
+    return self;
+}
+
+static void
+menu_pos_func(GtkMenu *menu, gint *px, gint *py, gboolean *push_in, gpointer data)
+{
+    VALUE arr = rb_funcall((VALUE)data, id_call, 4, GOBJ2RVAL(menu), 
+                           INT2FIX(*px), INT2FIX(*py), 
+                           CBOOL2RVAL(*push_in));
+
+    if (TYPE(arr) == T_ARRAY && (RARRAY_LEN(arr) == 2 || RARRAY_LEN(arr) == 3)){
+        *px = NUM2INT(RARRAY_PTR(arr)[0]);
+        *py = NUM2INT(RARRAY_PTR(arr)[1]);
+        if (RARRAY_LEN(arr) == 3)
+            *push_in = RVAL2CBOOL(RARRAY_PTR(arr)[2]);
+    } else {
+        rb_raise(rb_eArgError, "block should return [x, y, push_in]"); 
+    } 
+}
+
+/* the proc should return [x, y, push_in] */
+static VALUE
+rg_popup(VALUE self, VALUE pshell, VALUE pitem, VALUE button, VALUE activate_time)
+{
+    GtkWidget *gpshell = NULL;
+    GtkWidget *gpitem = NULL;
+    GtkMenuPositionFunc pfunc = NULL;
+    gpointer data = NULL;
+    VALUE func;
+
+    if (rb_block_given_p()) {
+        func = rb_block_proc();
+        pfunc = (GtkMenuPositionFunc)menu_pos_func;
+        data = (gpointer)func;
+        G_RELATIVE(self, func);
+    }
+    if (!NIL_P(pshell)){
+        gpshell = RVAL2GTKWIDGET(pshell);
+    }
+    if (!NIL_P(pitem)) {
+        gpitem = RVAL2GTKWIDGET(pitem);
+    }
+
+    gtk_menu_popup(_SELF(self), gpshell, gpitem,
+                   pfunc, data, NUM2UINT(button),
+                   NUM2UINT(activate_time));
+    return self;
+}
+
+static VALUE
+rg_popdown(VALUE self)
+{
+    gtk_menu_popdown(_SELF(self));
+    return self;
+}
+
+static VALUE
+rg_reposition(VALUE self)
+{
+    gtk_menu_reposition(_SELF(self));
+    return self;
+}
+
+static VALUE menu_detacher;
+static void
+detach_func(GtkWidget *attach_widget, GtkMenu *menu)
+{
+    rb_funcall((VALUE)menu_detacher, id_call, 2, 
+               GOBJ2RVAL(attach_widget), GOBJ2RVAL(menu));    
+}
+
+static VALUE
+rg_attach_to_widget(VALUE self, VALUE attach_widget)
+{
+    menu_detacher = rb_block_proc();
+    G_RELATIVE(self, menu_detacher);
+    gtk_menu_attach_to_widget(_SELF(self),
+                              RVAL2GTKWIDGET(attach_widget),
+                              (GtkMenuDetachFunc)detach_func);
+    return self;
+}
+
+static VALUE
+rg_detach(VALUE self)
+{
+    gtk_menu_detach(_SELF(self));
+    return self;
+}
+
+static VALUE
+rg_s_get_for_attach_widget(G_GNUC_UNUSED VALUE self, VALUE widget)
+{
+    return GOBJGLIST2RVAL(gtk_menu_get_for_attach_widget(RVAL2GTKWIDGET(widget)));
+}
+
+void
+Init_gtk_menu(VALUE mGtk)
+{
+    VALUE RG_TARGET_NAMESPACE = G_DEF_CLASS(GTK_TYPE_MENU, "Menu", mGtk);
+
+    RG_DEF_METHOD(initialize, 0);
+    RG_DEF_METHOD(set_screen, 1);
+    RG_DEF_METHOD(reorder_child, 2);
+    RG_DEF_METHOD(attach, 5);
+    RG_DEF_METHOD(popup, 4);
+    RG_DEF_METHOD(popdown, 0);
+    RG_DEF_METHOD(reposition, 0);
+    RG_DEF_METHOD(detach, 0);
+    RG_DEF_SMETHOD(get_for_attach_widget, 1);
+    RG_DEF_METHOD(attach_to_widget, 1);
+}