gtk2 0.20.0

data/src/rbgtktable.c

@@ -0,0 +1,190 @@
+/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
+/************************************************
+
+  rbgtktable.c -
+
+  $Author: ggc $
+  $Date: 2007/07/13 16:07:32 $
+
+  Copyright (C) 2002,2003 Ruby-GNOME2 Project Team
+  Copyright (C) 1998-2000 Yukihiro Matsumoto,
+                          Daisuke Kanda,
+                          Hiroshi Igarashi
+************************************************/
+
+#include "global.h"
+
+#define _SELF(self) (GTK_TABLE(RVAL2GOBJ(self)))
+
+static VALUE
+tbl_initialize(argc, argv, self)
+    int argc;
+    VALUE *argv;
+    VALUE self;
+{
+    VALUE row, col, homogeneous;
+
+    rb_scan_args(argc, argv, "21", &row, &col, &homogeneous);
+    RBGTK_INITIALIZE(self, gtk_table_new(NUM2INT(row),
+                                         NUM2INT(col),
+                                         RVAL2CBOOL(homogeneous)));
+    return Qnil;
+}
+
+static VALUE
+tbl_resize(self, rows, columns)
+    VALUE self, rows, columns;
+{
+    gtk_table_resize(_SELF(self), NUM2UINT(rows), NUM2UINT(columns));
+    return self;
+}
+
+static VALUE
+tbl_attach(argc, argv, self)
+    int argc;
+    VALUE *argv;
+    VALUE self;
+{
+    VALUE child, left, right, top, bottom;
+    VALUE arg0, arg1, arg2, arg3;
+    gint xspc, yspc;
+    GtkAttachOptions xopt, yopt;
+
+    xopt = yopt = GTK_EXPAND | GTK_FILL;
+    xspc = yspc = 0;
+    rb_scan_args(argc, argv, "54",
+                 &child, &left, &right, &top, &bottom,
+                 &arg0, &arg1, &arg2, &arg3);
+    if (!NIL_P(arg0)) xopt = RVAL2GFLAGS(arg0, GTK_TYPE_ATTACH_OPTIONS);
+    if (!NIL_P(arg1)) yopt = RVAL2GFLAGS(arg1, GTK_TYPE_ATTACH_OPTIONS);
+    if (!NIL_P(arg2)) xspc = NUM2INT(arg2);
+    if (!NIL_P(arg3)) yspc = NUM2INT(arg3);
+
+    gtk_table_attach(_SELF(self),
+                     GTK_WIDGET(RVAL2GOBJ(child)),
+                     NUM2INT(left),NUM2INT(right),
+                     NUM2INT(top),NUM2INT(bottom),
+                     xopt, yopt, xspc, yspc);
+
+    G_CHILD_ADD(self, child);
+
+    return self;
+}
+
+static VALUE
+tbl_attach_defaults(self, widget, left_attach, right_attach, top_attach, 
+                    bottom_attach)
+    VALUE self, widget, left_attach, right_attach, top_attach, bottom_attach;
+{
+    gtk_table_attach_defaults(_SELF(self), GTK_WIDGET(RVAL2GOBJ(widget)),
+                              NUM2UINT(left_attach), NUM2UINT(right_attach),
+                              NUM2UINT(top_attach), NUM2UINT(bottom_attach));
+    G_CHILD_ADD(self, widget);
+    return self;
+}
+
+static VALUE
+tbl_set_row_spacing(self, row, spc)
+    VALUE self, row, spc;
+{
+    gtk_table_set_row_spacing(_SELF(self), NUM2UINT(row), NUM2UINT(spc));
+    return self;
+}
+
+static VALUE
+tbl_get_row_spacing(self, row)
+    VALUE self, row;
+{
+    return UINT2NUM(gtk_table_get_row_spacing(_SELF(self), NUM2UINT(row)));
+}
+
+static VALUE
+tbl_set_col_spacing(self, col, spc)
+    VALUE self, col, spc;
+{
+    gtk_table_set_col_spacing(_SELF(self), NUM2UINT(col), NUM2UINT(spc));
+    return self;
+}
+
+static VALUE
+tbl_get_col_spacing(self, col)
+    VALUE self, col;
+{
+    return UINT2NUM(gtk_table_get_col_spacing(_SELF(self), NUM2UINT(col)));
+}
+
+static VALUE
+tbl_set_row_spacings(self, spc)
+    VALUE self, spc;
+{
+    gtk_table_set_row_spacings(_SELF(self), NUM2UINT(spc));
+    return self;
+}
+
+static VALUE
+tbl_set_col_spacings(self, spc)
+    VALUE self, spc;
+{
+    gtk_table_set_col_spacings(_SELF(self), NUM2UINT(spc));
+    return self;
+}
+
+static VALUE
+tbl_get_row_spacings(self)
+    VALUE self;
+{
+    return UINT2NUM(_SELF(self)->row_spacing);
+}
+
+static VALUE
+tbl_get_col_spacings(self)
+    VALUE self;
+{
+    return UINT2NUM(_SELF(self)->column_spacing);
+}
+
+static VALUE
+tbl_get_default_row_spacing(self)
+    VALUE self;
+{
+    return UINT2NUM(gtk_table_get_default_row_spacing(_SELF(self)));
+}
+
+static VALUE
+tbl_get_default_col_spacing(self)
+    VALUE self;
+{
+    return UINT2NUM(gtk_table_get_default_col_spacing(_SELF(self)));
+}
+
+void 
+Init_gtk_table()
+{
+    VALUE gTable = G_DEF_CLASS(GTK_TYPE_TABLE, "Table", mGtk);
+
+    /* Undef properties, column/row-spacing confuse us ... */
+    rb_undef_method(gTable, "set_row_spacing");
+    rb_undef_method(gTable, "set_column_spacing");
+    rb_undef_method(gTable, "row_spacing=");
+    rb_undef_method(gTable, "column_spacing=");
+    rb_undef_method(gTable, "row_spacing");
+    rb_undef_method(gTable, "column_spacing");
+
+    rb_define_method(gTable, "initialize", tbl_initialize, -1);
+    rb_define_method(gTable, "resize", tbl_resize, 2);
+    rb_define_method(gTable, "attach", tbl_attach, -1);
+    rb_define_method(gTable, "attach_defaults", tbl_attach_defaults, 5);
+    rb_define_method(gTable, "set_row_spacing", tbl_set_row_spacing, 2);
+    rb_define_method(gTable, "set_column_spacing", tbl_set_col_spacing, 2);
+    rb_define_method(gTable, "get_row_spacing", tbl_get_row_spacing, 1);
+    rb_define_method(gTable, "get_column_spacing", tbl_get_col_spacing, 1);
+    rb_define_method(gTable, "set_row_spacings", tbl_set_row_spacings, 1);
+    rb_define_method(gTable, "set_column_spacings", tbl_set_col_spacings, 1);
+    rb_define_method(gTable, "row_spacings", tbl_get_row_spacings, 0);
+    rb_define_method(gTable, "column_spacings", tbl_get_col_spacings, 0);
+    rb_define_method(gTable, "default_row_spacing", tbl_get_default_row_spacing, 0);
+    rb_define_method(gTable, "default_column_spacing", tbl_get_default_col_spacing, 0);
+
+    G_DEF_SETTERS(gTable);
+
+}

data/src/rbgtktargetlist.c

@@ -0,0 +1,148 @@
+/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
+/************************************************
+
+  rbgtktargetlist.c -
+
+  $Author: ggc $
+  $Date: 2007/07/13 16:07:32 $
+
+  Copyright (C) 2003-2005 Masao Mutoh
+************************************************/
+
+#include "global.h"
+
+#define _SELF(r) ((GtkTargetList*)RVAL2BOXED(r, GTK_TYPE_TARGET_LIST))
+
+/**********************************/
+#if ! GTK_CHECK_VERSION(2,10,0) 
+static GtkTargetList*
+rbgtk_target_list_copy(const GtkTargetList* list)
+{
+  GtkTargetList* new_list;
+  g_return_val_if_fail (list != NULL, NULL);
+  new_list = g_new(GtkTargetList, 1);
+  *new_list = *list;
+  return new_list;
+}
+
+GType
+gtk_target_list_get_type(void)
+{
+    static GType our_type = 0;
+
+    if (our_type == 0)
+        our_type = g_boxed_type_register_static ("GtkTargetList",
+                    (GBoxedCopyFunc)rbgtk_target_list_copy,
+                    (GBoxedFreeFunc)gtk_target_list_unref);
+    return our_type;
+}
+#endif
+/**********************************/
+
+static VALUE
+target_list_initialize(self, targets)
+     VALUE self, targets;
+{
+    Check_Type(targets, T_ARRAY);
+    G_INITIALIZE(self, gtk_target_list_new(
+                     rbgtk_get_target_entry(targets), 
+                     RARRAY_LEN(targets)));
+    return Qnil;
+}
+
+static VALUE
+target_list_add(self, target, flags, info)
+    VALUE self, target, flags, info;
+{
+    gtk_target_list_add(_SELF(self), RVAL2ATOM(target),
+                        FIX2UINT(flags), FIX2UINT(info));
+    return self;
+}
+
+static VALUE
+target_list_add_table(self, targets)
+    VALUE self, targets;
+{
+    gtk_target_list_add_table(_SELF(self),
+                              rbgtk_get_target_entry(targets), 
+                              RARRAY_LEN(targets));
+    return self;
+}
+
+#if GTK_CHECK_VERSION(2,6,0)
+static VALUE
+target_list_add_text_targets(self, info)
+    VALUE self, info;
+{
+    gtk_target_list_add_text_targets(_SELF(self), NUM2UINT(info));
+    return self;
+}
+
+static VALUE
+target_list_add_image_targets(self, info, writable)
+    VALUE self, info, writable;
+{
+    gtk_target_list_add_image_targets(_SELF(self), NUM2UINT(info), RVAL2CBOOL(writable));
+    return self;
+}
+
+static VALUE
+target_list_add_uri_targets(self, info)
+    VALUE self, info;
+{
+    gtk_target_list_add_uri_targets(_SELF(self), NUM2UINT(info));
+    return self;
+}
+#endif
+
+#if GTK_CHECK_VERSION(2,10,0)
+static VALUE
+target_list_add_rich_text_targets(self, info, deserializable, buffer)
+    VALUE self, info, deserializable, buffer;
+{
+    gtk_target_list_add_rich_text_targets(_SELF(self), NUM2UINT(info),
+                                          RVAL2CBOOL(deserializable),
+                                          GTK_TEXT_BUFFER(RVAL2GOBJ(buffer)));
+    return self;
+}
+#endif
+
+static VALUE
+target_list_remove(self, target)
+    VALUE self, target;
+{
+    gtk_target_list_remove(_SELF(self), RVAL2ATOM(target));
+    return self;
+}
+
+static VALUE
+target_list_find(self, target)
+    VALUE self, target;
+{
+    guint info;
+    gboolean ret = gtk_target_list_find(_SELF(self), RVAL2ATOM(target),
+                                        &info); 
+    return ret ? INT2NUM(info) : Qnil;
+} 
+
+void
+Init_gtk_target_list()
+{
+    VALUE gTargetList = G_DEF_CLASS(GTK_TYPE_TARGET_LIST, "TargetList", mGtk);
+
+    rbgobj_boxed_not_copy_obj(GTK_TYPE_TARGET_LIST);
+
+    rb_define_method(gTargetList, "initialize", target_list_initialize, 1);
+    rb_define_method(gTargetList, "add", target_list_add, 3);
+    rb_define_method(gTargetList, "add_table", target_list_add_table, 1);
+#if GTK_CHECK_VERSION(2,6,0)
+    rb_define_method(gTargetList, "add_text_targets", target_list_add_text_targets, 1);
+    rb_define_method(gTargetList, "add_image_targets", target_list_add_image_targets, 2);
+    rb_define_method(gTargetList, "add_uri_targets", target_list_add_uri_targets, 1);
+#endif
+#if GTK_CHECK_VERSION(2,10,0)
+    rb_define_method(gTargetList, "add_rich_text_targets", target_list_add_rich_text_targets, 3);
+#endif
+    rb_define_method(gTargetList, "remove", target_list_remove, 1);
+    rb_define_method(gTargetList, "find", target_list_find, 1);
+}

data/src/rbgtktearoffmenuitem.c

@@ -0,0 +1,30 @@
+/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
+/************************************************
+
+  rbgtktearoffmenuitem.c -
+
+  $Author: mutoh $
+  $Date: 2003/02/01 16:46:24 $
+
+  Copyright (C) 2002,2003 Ruby-GNOME2 Project Team
+  Copyright (C) 1998-2000 Yukihiro Matsumoto,
+                          Daisuke Kanda,
+                          Hiroshi Igarashi
+************************************************/
+
+#include "global.h"
+
+static VALUE
+tmitem_initialize(self)
+    VALUE self;
+{
+    RBGTK_INITIALIZE(self, gtk_tearoff_menu_item_new());
+    return Qnil;
+}
+
+void 
+Init_gtk_tearoff_menu_item()
+{
+    VALUE gTMenuItem = G_DEF_CLASS(GTK_TYPE_TEAROFF_MENU_ITEM, "TearoffMenuItem", mGtk);
+    rb_define_method(gTMenuItem, "initialize", tmitem_initialize, 0);
+}

data/src/rbgtktextappearance.c

@@ -0,0 +1,173 @@
+/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
+/************************************************
+
+  rbgtktextappearance.c -
+ 
+  $Author: ggc $
+  $Date: 2007/07/13 16:07:32 $
+
+  Copyright (C) 2004 Masao Mutoh
+************************************************/
+
+#include "global.h"
+
+/*****************************************/
+static GtkTextAppearance*
+app_copy(const GtkTextAppearance* app)
+{
+  GtkTextAppearance* new_app;
+  g_return_val_if_fail (app != NULL, NULL);
+  new_app = g_new(GtkTextAppearance, 1);
+  *new_app = *app;
+  return new_app;
+}
+
+GType
+gtk_text_appearance_get_type(void)
+{
+  static GType our_type = 0;
+  if (our_type == 0)
+    our_type = g_boxed_type_register_static ("GtkTextAppearance",
+                    (GBoxedCopyFunc)app_copy,
+                    (GBoxedFreeFunc)g_free);
+  return our_type;
+}
+/*****************************************/
+
+#define _SELF(t) ((GtkTextAppearance*)RVAL2BOXED(t, GTK_TYPE_TEXT_APPEARANCE))
+
+/***********************************************/
+#define ATTR_INT(name)\
+static VALUE \
+txt_app_int_ ## name (self)\
+    VALUE self;\
+{\
+    return INT2NUM(_SELF(self)->name);\
+}\
+static VALUE \
+txt_app_int_set_ ## name (self, val)\
+    VALUE self, val;\
+{\
+    _SELF(self)->name = NUM2INT(val); \
+    return self;\
+}
+
+#define ATTR_BOOL(name)\
+static VALUE \
+txt_app_bool_ ## name (self)\
+    VALUE self;\
+{\
+    return CBOOL2RVAL(_SELF(self)->name);\
+}\
+static VALUE \
+txt_app_bool_set_ ## name (self, val)\
+    VALUE self, val;\
+{\
+    _SELF(self)->name = RVAL2CBOOL(val);\
+    return self;\
+}
+
+#define ATTR_ENUM(name, gtype)\
+static VALUE \
+txt_app_enums_ ## name (self)\
+    VALUE self;\
+{\
+    return GENUM2RVAL(_SELF(self)->name, gtype);\
+}\
+static VALUE \
+txt_app_enums_set_ ## name (self, val)\
+    VALUE self, val;\
+{\
+    _SELF(self)->name = RVAL2GENUM(val, gtype);\
+    return self;\
+}
+
+#define ATTR_GOBJ(name)\
+static VALUE \
+txt_app_gobj_ ## name (self)\
+    VALUE self;\
+{\
+    VALUE val; \
+    if (_SELF(self)->name == NULL) return Qnil;\
+    val = GOBJ2RVAL(_SELF(self)->name);  \
+    G_CHILD_SET(self, rb_intern(G_STRINGIFY(name)), val);\
+    return val; \
+}\
+static VALUE \
+txt_app_gobj_set_ ## name (self, val)\
+    VALUE self, val;\
+{\
+    _SELF(self)->name = RVAL2GOBJ(val);\
+    G_CHILD_SET(self, rb_intern(G_STRINGIFY(name)), val);\
+    return self;\
+}
+
+#define ATTR_COLOR(name)\
+static VALUE \
+txt_app_color_ ## name (self)\
+    VALUE self;\
+{\
+    VALUE val = BOXED2RVAL(&_SELF(self)->name, GDK_TYPE_COLOR);\
+    G_CHILD_SET(self, rb_intern(G_STRINGIFY(name)), val);\
+    return val;\
+}\
+static VALUE \
+txt_app_color_set_ ## name (self, val)\
+    VALUE self, val;\
+{\
+    G_CHILD_SET(self, rb_intern(G_STRINGIFY(name)), val);\
+    _SELF(self)->name = *RVAL2GDKCOLOR(val);	\
+    return self;\
+}
+
+#define DEFINE_ACCESSOR(gt, type, name)			\
+    rb_define_method(gt, G_STRINGIFY(name), txt_app_ ## type ## _## name, 0);\
+    rb_define_method(gt, G_STRINGIFY(set_ ## name), txt_app_ ## type ## _set_## name, 1);
+/***********************************************/
+ATTR_COLOR(bg_color);
+ATTR_COLOR(fg_color);
+ATTR_GOBJ(bg_stipple);
+ATTR_GOBJ(fg_stipple);
+
+ATTR_INT(rise);
+ATTR_ENUM(underline, PANGO_TYPE_UNDERLINE);
+ATTR_BOOL(strikethrough);
+ATTR_BOOL(draw_bg);
+ATTR_BOOL(inside_selection);
+ATTR_BOOL(is_text);
+
+static VALUE
+txt_app_initialize(self)
+    VALUE self;
+{
+    GtkTextAppearance* app = ALLOC(GtkTextAppearance);
+    memset(app, 0, sizeof(GtkTextAppearance));
+    G_INITIALIZE(self, app);
+    return Qnil;
+}
+
+
+void
+Init_txt_appearance()
+{
+    VALUE gTextApp = G_DEF_CLASS(GTK_TYPE_TEXT_APPEARANCE, "TextAppearance", mGtk);
+
+    DEFINE_ACCESSOR(gTextApp, color, bg_color);
+    DEFINE_ACCESSOR(gTextApp, color, fg_color);
+    DEFINE_ACCESSOR(gTextApp, gobj, bg_stipple);
+    DEFINE_ACCESSOR(gTextApp, gobj, fg_stipple);
+    DEFINE_ACCESSOR(gTextApp, int, rise);
+    DEFINE_ACCESSOR(gTextApp, enums, underline);
+
+    rb_define_method(gTextApp, "initialize", txt_app_initialize, 0);
+    rb_define_method(gTextApp, "strikethrough?", txt_app_bool_strikethrough, 0);
+    rb_define_method(gTextApp, "set_strikethrough", txt_app_bool_set_strikethrough, 1);
+    rb_define_method(gTextApp, "draw_bg?", txt_app_bool_draw_bg, 0);
+    rb_define_method(gTextApp, "set_draw_bg", txt_app_bool_set_draw_bg, 1);
+    rb_define_method(gTextApp, "inside_selection?", txt_app_bool_inside_selection, 0);
+    rb_define_method(gTextApp, "set_inside_selection", txt_app_bool_set_inside_selection, 1);
+    rb_define_method(gTextApp, "text?", txt_app_bool_is_text, 0);
+    rb_define_method(gTextApp, "set_text", txt_app_bool_set_is_text, 1);
+
+    G_DEF_SETTERS(gTextApp);
+}