gtk2 0.20.0

data/src/rbgdkgeometry.c

@@ -0,0 +1,272 @@
+/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
+/************************************************
+
+  rbgdkgeometry.c -
+
+  $Author: mutoh $
+  $Date: 2003/10/17 16:30:51 $
+
+  Copyright (C) 2002,2003 Masao Mutoh
+
+  This file is derived from rbgdkregion.c.
+  rbgdkregion.c -
+  Copyright (C) 1998-2000 Yukihiro Matsumoto,
+                          Daisuke Kanda,
+                          Hiroshi Igarashi
+************************************************/
+#include "global.h"
+
+/*****************************************/
+static GdkGeometry*
+geo_copy(const GdkGeometry* geo)
+{
+  GdkGeometry* new_geo;
+  g_return_val_if_fail (geo != NULL, NULL);
+  new_geo = g_new(GdkGeometry, 1);
+  *new_geo = *geo;
+  return new_geo;
+}
+
+GType
+gdk_geometry_get_type(void)
+{
+  static GType our_type = 0;
+  if (our_type == 0)
+    our_type = g_boxed_type_register_static ("GdkGeometry",
+                    (GBoxedCopyFunc)geo_copy,
+                    (GBoxedFreeFunc)g_free);
+  return our_type;
+}
+/*****************************************/
+
+#define _SELF(g) ((GdkGeometry*)RVAL2BOXED(g, GDK_TYPE_GEOMETRY))
+
+static VALUE
+geo_initialize(self)
+    VALUE self;
+{
+    GdkGeometry g;
+    G_INITIALIZE(self, &g);
+    return Qnil;
+}
+
+static VALUE
+geo_set(self, min_width, min_height, max_width,	max_height,
+		base_width, base_height, width_inc, height_inc,	min_aspect, max_aspect, gravity)
+     VALUE self, min_width, min_height, max_width, max_height,
+     base_width, base_height, width_inc, height_inc, min_aspect, max_aspect, gravity;
+{
+    GdkGeometry *geo = _SELF(self);
+    geo->min_width = NUM2INT(min_width);
+    geo->min_height = NUM2INT(min_height);
+    geo->max_width = NUM2INT(max_width);
+    geo->max_height = NUM2INT(max_height);
+    geo->base_width = NUM2INT(base_width);
+    geo->base_height = NUM2INT(base_height);
+    geo->width_inc = NUM2INT(width_inc);
+    geo->height_inc = NUM2INT(height_inc);
+    geo->min_aspect = NUM2DBL(min_aspect);
+    geo->max_aspect = NUM2DBL(max_aspect);
+    geo->win_gravity = RVAL2GENUM(gravity, GDK_TYPE_GRAVITY);
+
+    return self;
+}
+
+static VALUE
+geo_min_width(self)
+    VALUE self;
+{
+    return INT2NUM(_SELF(self)->min_width);
+}
+
+static VALUE
+geo_min_height(self)
+    VALUE self;
+{
+    return INT2NUM(_SELF(self)->min_height);
+}
+
+static VALUE
+geo_max_width(self)
+    VALUE self;
+{
+    return INT2NUM(_SELF(self)->max_width);
+}
+
+static VALUE
+geo_max_height(self)
+    VALUE self;
+{
+    return INT2NUM(_SELF(self)->max_height);
+}
+
+static VALUE
+geo_base_width(self)
+    VALUE self;
+{
+    return INT2NUM(_SELF(self)->base_width);
+}
+
+static VALUE
+geo_base_height(self)
+    VALUE self;
+{
+    return INT2NUM(_SELF(self)->base_height);
+}
+
+static VALUE
+geo_width_inc(self)
+    VALUE self;
+{
+    return INT2NUM(_SELF(self)->width_inc);
+}
+
+static VALUE
+geo_height_inc(self)
+    VALUE self;
+{
+    return INT2NUM(_SELF(self)->height_inc);
+}
+
+static VALUE
+geo_min_aspect(self)
+    VALUE self;
+{
+    return rb_float_new(_SELF(self)->min_aspect);
+}
+
+static VALUE
+geo_max_aspect(self)
+    VALUE self;
+{
+    return rb_float_new(_SELF(self)->max_aspect);
+}
+
+static VALUE
+geo_win_gravity(self)
+    VALUE self;
+{
+    return GENUM2RVAL(_SELF(self)->win_gravity, GDK_TYPE_GRAVITY);
+}
+
+static VALUE
+geo_set_min_width(self, min_width)
+    VALUE self, min_width;
+{
+    _SELF(self)->min_width = NUM2INT(min_width);
+    return self;
+}
+
+static VALUE
+geo_set_min_height(self, min_height)
+    VALUE self, min_height;
+{
+    _SELF(self)->min_height = NUM2INT(min_height);
+    return self;
+}
+
+static VALUE
+geo_set_max_width(self, max_width)
+    VALUE self, max_width;
+{
+    _SELF(self)->max_width = NUM2INT(max_width);
+    return self;
+}
+
+static VALUE
+geo_set_max_height(self, max_height)
+    VALUE self, max_height;
+{
+    _SELF(self)->max_height = NUM2INT(max_height);
+    return self;
+}
+
+static VALUE
+geo_set_base_width(self, base_width)
+    VALUE self, base_width;
+{
+    _SELF(self)->base_width = NUM2INT(base_width);
+    return self;
+}
+
+static VALUE
+geo_set_base_height(self, base_height)
+    VALUE self, base_height;
+{
+    _SELF(self)->base_height = NUM2INT(base_height);
+    return self;
+}
+
+static VALUE
+geo_set_width_inc(self, width_inc)
+    VALUE self, width_inc;
+{
+    _SELF(self)->width_inc = NUM2INT(width_inc);
+    return self;
+}
+
+static VALUE
+geo_set_height_inc(self, height_inc)
+    VALUE self, height_inc;
+{
+    _SELF(self)->height_inc = NUM2INT(height_inc);
+    return self;
+}
+
+static VALUE
+geo_set_min_aspect(self, min_aspect)
+    VALUE self, min_aspect;
+{
+    _SELF(self)->min_aspect = NUM2DBL(min_aspect);
+    return self;
+}
+
+static VALUE
+geo_set_max_aspect(self, max_aspect)
+    VALUE self, max_aspect;
+{
+    _SELF(self)->max_aspect = NUM2DBL(max_aspect);
+    return self;
+}
+
+static VALUE
+geo_set_win_gravity(self, gravity)
+    VALUE self, gravity;
+{
+    _SELF(self)->win_gravity = RVAL2GENUM(gravity, GDK_TYPE_GRAVITY);
+    return self;
+}
+
+void 
+Init_gtk_gdk_geometry()
+{
+    VALUE gdkGeometry = G_DEF_CLASS(GDK_TYPE_GEOMETRY, "Geometry", mGdk);
+
+    rb_define_method(gdkGeometry, "initialize", geo_initialize, 0);
+    rb_define_method(gdkGeometry, "min_width", geo_min_width, 0);
+    rb_define_method(gdkGeometry, "min_height", geo_min_height, 0);
+    rb_define_method(gdkGeometry, "max_width", geo_max_width, 0);
+    rb_define_method(gdkGeometry, "max_height", geo_max_height, 0);
+    rb_define_method(gdkGeometry, "base_width", geo_base_width, 0);
+    rb_define_method(gdkGeometry, "base_height", geo_base_height, 0);
+    rb_define_method(gdkGeometry, "width_inc", geo_width_inc, 0);
+    rb_define_method(gdkGeometry, "height_inc", geo_height_inc, 0);
+    rb_define_method(gdkGeometry, "min_aspect", geo_min_aspect, 0);
+    rb_define_method(gdkGeometry, "max_aspect", geo_max_aspect, 0);
+    rb_define_method(gdkGeometry, "win_gravity", geo_win_gravity, 0);
+    rb_define_method(gdkGeometry, "set", geo_set, 11);
+    rb_define_method(gdkGeometry, "set_min_width", geo_set_min_width, 1);
+    rb_define_method(gdkGeometry, "set_min_height", geo_set_min_height, 1);
+    rb_define_method(gdkGeometry, "set_max_width", geo_set_max_width, 1);
+    rb_define_method(gdkGeometry, "set_max_height", geo_set_max_height, 1);
+    rb_define_method(gdkGeometry, "set_base_width", geo_set_base_width, 1);
+    rb_define_method(gdkGeometry, "set_base_height", geo_set_base_height, 1);
+    rb_define_method(gdkGeometry, "set_width_inc", geo_set_width_inc, 1);
+    rb_define_method(gdkGeometry, "set_height_inc", geo_set_height_inc, 1);
+    rb_define_method(gdkGeometry, "set_min_aspect", geo_set_min_aspect, 1);
+    rb_define_method(gdkGeometry, "set_max_aspect", geo_set_max_aspect, 1);
+    rb_define_method(gdkGeometry, "set_win_gravity", geo_set_win_gravity, 1);
+
+    G_DEF_SETTERS(gdkGeometry);
+
+}

data/src/rbgdkimage.c

@@ -0,0 +1,155 @@
+/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
+/************************************************
+
+  rbgdkimage.c -
+
+  $Author: mutoh $
+  $Date: 2003/10/01 15:15:53 $
+
+  Copyright (C) 2002,2003 Ruby-GNOME2 Project Team
+  Copyright (C) 1998-2000 Yukihiro Matsumoto,
+                          Daisuke Kanda,
+                          Hiroshi Igarashi
+************************************************/
+
+#include "global.h"
+
+#define _SELF(i) GDK_IMAGE(RVAL2GOBJ(i))
+
+static VALUE
+gdkimage_initialize(self, type, visual, w, h)
+    VALUE self, type, visual, w, h;
+{
+    GdkImage* image = gdk_image_new((GdkImageType)RVAL2GENUM(type, GDK_TYPE_IMAGE_TYPE),
+                                    GDK_VISUAL(RVAL2GOBJ(visual)),
+                                    NUM2INT(w), NUM2INT(h));
+
+    if (image)
+        G_INITIALIZE(self, image);
+    else
+        rb_raise(rb_eArgError, "The image could not be created.");
+
+    return Qnil;
+}
+
+static VALUE
+gdkimage_get_colormap(self)
+    VALUE self;
+{
+    return GOBJ2RVAL(gdk_image_get_colormap(_SELF(self)));
+}
+
+static VALUE
+gdkimage_set_colormap(self, colormap)
+    VALUE self;
+{
+    gdk_image_set_colormap(_SELF(self), RVAL2GOBJ(colormap));
+    return self;
+}
+
+static VALUE
+gdkimage_put_pixel(self, x, y, pix)
+    VALUE self, x, y, pix;
+{
+    gdk_image_put_pixel(_SELF(self),
+                        NUM2INT(x), NUM2INT(y), NUM2INT(pix));
+    return self;
+}
+
+static VALUE
+gdkimage_get_pixel(self, x, y)
+    VALUE self, x, y;
+{
+    return INT2NUM(gdk_image_get_pixel(_SELF(self),
+                                       NUM2INT(x), NUM2INT(y)));
+}
+
+static VALUE
+gdkimage_image_type(self)
+    VALUE self;
+{
+    return GENUM2RVAL((_SELF(self))->type, GDK_TYPE_IMAGE_TYPE);
+}
+
+static VALUE
+gdkimage_visual(self)
+    VALUE self;
+{
+    return GOBJ2RVAL((_SELF(self))->visual);
+}
+
+static VALUE
+gdkimage_byte_order(self)
+    VALUE self;
+{
+    return GENUM2RVAL((_SELF(self))->byte_order, GDK_TYPE_BYTE_ORDER);
+}
+
+static VALUE
+gdkimage_bits_per_pixel(self)
+    VALUE self;
+{
+    return INT2NUM((_SELF(self))->bits_per_pixel);
+}
+
+static VALUE
+gdkimage_width(self)
+    VALUE self;
+{
+    return INT2NUM((_SELF(self))->width);
+}
+
+static VALUE
+gdkimage_height(self)
+    VALUE self;
+{
+    return INT2NUM((_SELF(self))->height);
+}
+
+static VALUE
+gdkimage_depth(self)
+    VALUE self;
+{
+    return INT2NUM((_SELF(self))->depth);
+}
+
+static VALUE
+gdkimage_bpp(self)
+    VALUE self;
+{
+    return INT2NUM((_SELF(self))->bpp);
+}
+
+static VALUE
+gdkimage_bpl(self)
+    VALUE self;
+{
+    return INT2NUM((_SELF(self))->bpl);
+}
+
+void 
+Init_gtk_gdk_image()
+{
+    VALUE gdkImage = G_DEF_CLASS(GDK_TYPE_IMAGE, "Image", mGdk);
+
+    rb_define_method(gdkImage, "initialize", gdkimage_initialize, 4);
+    rb_define_method(gdkImage, "colormap", gdkimage_get_colormap, 0);
+    rb_define_method(gdkImage, "set_colormap", gdkimage_set_colormap, 1);
+    rb_define_method(gdkImage, "put_pixel", gdkimage_put_pixel, 3);
+    rb_define_method(gdkImage, "get_pixel", gdkimage_get_pixel, 2);
+    rb_define_method(gdkImage, "image_type", gdkimage_image_type, 0);
+    rb_define_method(gdkImage, "visual", gdkimage_visual, 0);
+    rb_define_method(gdkImage, "byte_order", gdkimage_byte_order, 0);
+    rb_define_method(gdkImage, "bits_per_pixel", gdkimage_bits_per_pixel, 0);
+    rb_define_method(gdkImage, "width", gdkimage_width, 0);
+    rb_define_method(gdkImage, "height", gdkimage_height, 0);
+    rb_define_method(gdkImage, "depth", gdkimage_depth, 0);
+    rb_define_method(gdkImage, "bpp", gdkimage_bpp, 0);
+    rb_define_method(gdkImage, "bpl", gdkimage_bpl, 0);
+
+    G_DEF_SETTERS(gdkImage);
+
+    /* GdkImageType */
+    G_DEF_CLASS(GDK_TYPE_IMAGE_TYPE, "Type", gdkImage);
+    G_DEF_CONSTANTS(gdkImage, GDK_TYPE_IMAGE_TYPE, "GDK_IMAGE_");
+}

data/src/rbgdkinput.c

@@ -0,0 +1,70 @@
+/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
+/************************************************
+
+  rbgdkinput.c -
+
+  $Author: sakai $
+  $Date: 2007/07/08 03:00:50 $
+
+  Copyright (C) 2002,2003 Masao Mutoh
+
+  This file is devided from rbgtkmain.c.
+  rbgtkmain.c -
+  Copyright (C) 1998-2000 Yukihiro Matsumoto,
+                          Daisuke Kanda,
+                          Hiroshi Igarashi
+************************************************/
+
+#include "global.h"
+
+static void
+exec_input(data, source, condition)
+    gpointer data;
+    gint source;
+    GdkInputCondition condition;
+{
+    rb_funcall((VALUE)data, id_call, 1, 
+               GFLAGS2RVAL(condition, GDK_TYPE_INPUT_CONDITION));
+}
+
+static VALUE
+input_add(self, filedescriptor, gdk_input_condition)
+    VALUE self, filedescriptor, gdk_input_condition;
+{
+    VALUE id;
+    VALUE func;
+
+    func = rb_block_proc();
+    id = INT2FIX(gdk_input_add(NUM2INT(rb_funcall(filedescriptor,
+                                                  rb_intern("to_i"), 0)),
+                               RVAL2GFLAGS(gdk_input_condition, GDK_TYPE_INPUT_CONDITION),
+                               (GdkInputFunction)exec_input,
+                               (gpointer)func));
+    G_RELATIVE2(self, func, id_relative_callbacks, id);
+    return id;
+}
+
+static VALUE
+input_remove(self, id)
+    VALUE self, id;
+{
+    gdk_input_remove(NUM2INT(id));
+    G_REMOVE_RELATIVE(self, id_relative_callbacks, id);
+    return id;
+}
+
+
+void
+Init_gtk_gdk_input()
+{
+    VALUE mGdkInput = rb_define_module_under(mGdk, "Input");
+
+    rb_define_module_function(mGdkInput, "add", input_add, 2);
+    rb_define_module_function(mGdkInput, "remove", input_remove, 1);
+
+    /* GdkInputCondition */
+    G_DEF_CLASS(GDK_TYPE_INPUT_CONDITION, "Condition", mGdkInput);
+    G_DEF_CONSTANTS(mGdkInput, GDK_TYPE_INPUT_CONDITION, "GDK_INPUT_");
+
+}
+