atk 0.90.2-x86-mingw32

data/ext/atk/rbatkstate.c

@@ -0,0 +1,41 @@
+/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
+/************************************************
+
+  rbatkstate.c -
+
+  $Author: mutoh $
+  $Date: 2004/10/17 23:06:07 $
+
+  Copyright (C) 2003,2004 Masao Mutoh
+************************************************/
+#include "rbatk.h"
+
+#define _SELF(s) (ATK_STATE(RVAL2GOBJ(s)))
+
+static VALUE
+rbatkstate_s_type_register(self, name)
+    VALUE self, name;
+{
+    return GENUM2RVAL(atk_state_type_register(RVAL2CSTR(name)), ATK_TYPE_STATE_TYPE);
+}
+
+/* We don't need this.
+G_CONST_RETURN gchar* atk_state_type_get_name
+                                            (AtkStateType type);
+*/
+
+static VALUE
+rbatkstate_s_for_name(self, name)
+    VALUE self, name;
+{
+    return GENUM2RVAL(atk_state_type_for_name(RVAL2CSTR(name)), ATK_TYPE_STATE_TYPE);
+}
+
+void
+Init_atk_state()
+{
+    VALUE state = G_DEF_CLASS(ATK_TYPE_STATE_TYPE, "State", mAtk);
+    rb_define_singleton_method(state, "type_register", rbatkstate_s_type_register, 1);
+    rb_define_singleton_method(state, "for_name", rbatkstate_s_for_name, 1);
+    G_DEF_CONSTANTS(mAtk, ATK_TYPE_STATE_TYPE, "ATK_");
+}

data/ext/atk/rbatkstateset.c

@@ -0,0 +1,143 @@
+/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
+/************************************************
+
+  rbatkstateset.c -
+
+  $Author: mutoh $
+  $Date: 2003/12/23 15:59:28 $
+
+  Copyright (C) 2003 Masao Mutoh
+************************************************/
+
+#include "rbatk.h"
+
+#define _SELF(s) (ATK_STATE_SET(RVAL2GOBJ(s)))
+
+static VALUE
+rbatkstateset_initialize(self)
+    VALUE self;
+{
+    G_INITIALIZE(self, atk_state_set_new());
+    return Qnil;
+}
+
+static VALUE
+rbatkstateset_is_empty(self)
+    VALUE self;
+{
+    return CBOOL2RVAL(atk_state_set_is_empty(_SELF(self)));
+}
+
+static VALUE
+rbatkstateset_add_state(self, type)
+    VALUE self, type;
+{
+    return CBOOL2RVAL(atk_state_set_add_state(_SELF(self), 
+                                              RVAL2GENUM(type, ATK_TYPE_STATE_TYPE)));
+}
+
+static VALUE
+rbatkstateset_add_states(self, types)
+    VALUE self, types;
+{
+    gint i;
+    gint n_types = RARRAY_LEN(types);
+    AtkStateType* atypes = g_new(AtkStateType, n_types);
+
+    Check_Type(types, T_ARRAY);
+
+    for (i = 0; i < n_types; i++) {
+        atypes[i] = RVAL2GENUM(RARRAY_PTR(types)[i], ATK_TYPE_STATE_TYPE);
+    }
+
+    atk_state_set_add_states(_SELF(self), atypes, n_types);
+    g_free(atypes);
+    return self;
+}
+
+static VALUE
+rbatkstateset_clear_states(self)
+    VALUE self;
+{
+    atk_state_set_clear_states(_SELF(self));
+    return self;
+}
+
+static VALUE
+rbatkstateset_contains_state(self, type)
+    VALUE self;
+{
+    return CBOOL2RVAL(atk_state_set_contains_state(_SELF(self), 
+                                                   RVAL2GENUM(type, ATK_TYPE_STATE_TYPE)));
+}
+
+static VALUE
+rbatkstateset_contains_states(self, types)
+    VALUE self, types;
+{
+    gint i;
+    gboolean ret;
+    gint n_types = RARRAY_LEN(types);
+    AtkStateType* atypes = g_new(AtkStateType, n_types);
+
+    Check_Type(types, T_ARRAY);
+
+    for (i = 0; i < n_types; i++) {
+        atypes[i] = RVAL2GENUM(RARRAY_PTR(types)[i], ATK_TYPE_STATE_TYPE);
+    }
+    
+    ret = CBOOL2RVAL(atk_state_set_contains_states(_SELF(self), atypes, n_types));
+
+    g_free(atypes);
+    return ret;
+}
+
+static VALUE
+rbatkstateset_remove_state(self, type)
+    VALUE self, type;
+{
+    return CBOOL2RVAL(atk_state_set_remove_state(_SELF(self), 
+                                                 RVAL2GENUM(type, ATK_TYPE_STATE_TYPE)));
+}
+
+static VALUE
+rbatkstateset_and_sets(self, compare_set)
+    VALUE self, compare_set;
+{
+    return GOBJ2RVAL(atk_state_set_and_sets(_SELF(self), _SELF(compare_set)));
+}
+
+static VALUE
+rbatkstateset_or_sets(self, compare_set)
+    VALUE self, compare_set;
+{
+    return GOBJ2RVAL(atk_state_set_or_sets(_SELF(self), _SELF(compare_set)));
+}
+
+static VALUE
+rbatkstateset_xor_sets(self, compare_set)
+    VALUE self, compare_set;
+{
+    return GOBJ2RVAL(atk_state_set_xor_sets(_SELF(self), _SELF(compare_set)));
+}
+
+void
+Init_atk_state_set()
+{
+    VALUE stateset = G_DEF_CLASS(ATK_TYPE_STATE_SET, "StateSet", mAtk);
+
+    rb_define_method(stateset, "initialize", rbatkstateset_initialize, 0);
+    rb_define_method(stateset, "empty?", rbatkstateset_is_empty, 0);
+    rb_define_method(stateset, "add_state", rbatkstateset_add_state, 1);
+    rb_define_method(stateset, "add_states", rbatkstateset_add_states, 1);
+    rb_define_method(stateset, "clear_states", rbatkstateset_clear_states, 0);
+    rb_define_method(stateset, "contains_state", rbatkstateset_contains_state, 1);
+    rb_define_method(stateset, "contains_states", rbatkstateset_contains_states, 1);
+    rb_define_method(stateset, "remove_state", rbatkstateset_remove_state, 1);
+    rb_define_method(stateset, "and", rbatkstateset_and_sets, 1);
+    rb_define_alias(stateset, "&", "and");
+    rb_define_method(stateset, "or", rbatkstateset_or_sets, 1);
+    rb_define_alias(stateset, "|", "or");
+    rb_define_method(stateset, "xor", rbatkstateset_xor_sets, 1);
+    rb_define_alias(stateset, "^", "xor");
+}

data/ext/atk/rbatkstreamablecontent.c

@@ -0,0 +1,50 @@
+/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
+/************************************************
+
+  rbatkstreamablecontent.c -
+
+  $Author: mutoh $
+  $Date: 2005/09/15 17:30:46 $
+
+  Copyright (C) 2003 Masao Mutoh
+************************************************/
+
+#include "rbatk.h"
+
+#define _SELF(s) (ATK_STREAMABLE_CONTENT(RVAL2GOBJ(s)))
+
+static VALUE
+rbatkst_get_n_mime_types(self)
+     VALUE self;
+{
+    return INT2NUM(atk_streamable_content_get_n_mime_types(_SELF(self)));
+}
+
+static VALUE
+rbatkst_get_mime_type(self, i)
+     VALUE self, i;
+{
+    return CSTR2RVAL(atk_streamable_content_get_mime_type(_SELF(self), NUM2INT(i)));
+}
+
+static VALUE
+rbatkst_get_stream(self, mime_type)
+     VALUE self, mime_type;
+{
+    GIOChannel* io = atk_streamable_content_get_stream(_SELF(self), RVAL2CSTR(mime_type));
+    if (!io)
+        rb_raise(rb_eRuntimeError, "Couldn't get the stream.");
+
+    return BOXED2RVAL(io, G_TYPE_IO_CHANNEL);
+}
+
+
+void
+Init_atk_streamable_content()
+{
+    VALUE mContent = G_DEF_INTERFACE(ATK_TYPE_STREAMABLE_CONTENT, "StreamableContent", mAtk);
+
+    rb_define_method(mContent, "n_mime_types", rbatkst_get_n_mime_types, 0);
+    rb_define_method(mContent, "mime_type", rbatkst_get_mime_type, 1);
+    rb_define_method(mContent, "get_stream", rbatkst_get_stream, 1);
+}

data/ext/atk/rbatktable.c

@@ -0,0 +1,292 @@
+/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
+/************************************************
+
+  rbatktable.c -
+
+  $Author: mutoh $
+  $Date: 2004/03/05 15:33:48 $
+
+  Copyright (C) 2003,2004 Masao Mutoh
+************************************************/
+
+#include "rbatk.h"
+
+#define _SELF(s) (ATK_TABLE(RVAL2GOBJ(s)))
+
+static VALUE
+rbatk_table_ref_at(self, row, column)
+    VALUE self, row, column;
+{
+    return GOBJ2RVAL(atk_table_ref_at(_SELF(self), NUM2INT(row), NUM2INT(column)));
+}
+
+static VALUE
+rbatk_table_get_index_at(self, row, column)
+    VALUE self, row, column;
+{
+    return INT2NUM(atk_table_get_index_at(_SELF(self), NUM2INT(row), NUM2INT(column)));
+}
+
+static VALUE
+rbatk_table_get_column_at_index(self, index_)
+    VALUE self, index_;
+{
+    return INT2NUM(atk_table_get_column_at_index(_SELF(self), NUM2INT(index_)));
+}
+
+static VALUE
+rbatk_table_get_row_at_index(self, index_)
+    VALUE self, index_;
+{
+    return INT2NUM(atk_table_get_row_at_index(_SELF(self), NUM2INT(index_)));
+}
+
+static VALUE
+rbatk_table_get_n_columns(self)
+    VALUE self;
+{
+    return INT2NUM(atk_table_get_n_columns(_SELF(self)));
+}
+
+static VALUE
+rbatk_table_get_n_rows(self)
+    VALUE self;
+{
+    return INT2NUM(atk_table_get_n_rows(_SELF(self)));
+}
+
+static VALUE
+rbatk_table_get_column_extent_at(self, row, column)
+    VALUE self, row, column;
+{
+    return INT2NUM(atk_table_get_column_extent_at(_SELF(self), NUM2INT(row), NUM2INT(column)));
+}
+
+static VALUE
+rbatk_table_get_row_extent_at(self, row, column)
+    VALUE self, row, column;
+{
+    return INT2NUM(atk_table_get_row_extent_at(_SELF(self), NUM2INT(row), NUM2INT(column)));
+}
+
+static VALUE
+rbatk_table_get_caption(self)
+    VALUE self;
+{
+    return GOBJ2RVAL(atk_table_get_caption(_SELF(self)));
+}
+
+static VALUE
+rbatk_table_get_column_description(self, column)
+    VALUE self, column;
+{
+    return CSTR2RVAL(atk_table_get_column_description(_SELF(self), NUM2INT(column)));
+}
+
+static VALUE
+rbatk_table_get_row_description(self, row)
+    VALUE self, row;
+{
+    return CSTR2RVAL(atk_table_get_row_description(_SELF(self), NUM2INT(row)));
+}
+
+static VALUE
+rbatk_table_get_column_header(self, column)
+    VALUE self, column;
+{
+    return GOBJ2RVAL(atk_table_get_column_header(_SELF(self), NUM2INT(column)));
+}
+
+static VALUE
+rbatk_table_get_row_header(self, row)
+    VALUE self, row;
+{
+    return GOBJ2RVAL(atk_table_get_row_header(_SELF(self), NUM2INT(row)));
+}
+
+static VALUE
+rbatk_table_get_summary(self)
+    VALUE self;
+{
+    return GOBJ2RVAL(atk_table_get_summary(_SELF(self)));
+}
+
+static VALUE
+rbatk_table_set_caption(self, caption)
+    VALUE self, caption;
+{
+    atk_table_set_caption(_SELF(self), ATK_OBJECT(RVAL2GOBJ(caption)));
+    return self;
+}
+
+static VALUE
+rbatk_table_set_row_description(self, row, description)
+    VALUE self, row, description;
+{
+    atk_table_set_row_description(_SELF(self), NUM2INT(row), RVAL2CSTR(description));
+    return self;
+}
+
+static VALUE
+rbatk_table_set_column_description(self, column, description)
+    VALUE self, column, description;
+{
+    atk_table_set_column_description(_SELF(self), NUM2INT(column), RVAL2CSTR(description));
+    return self;
+}
+
+static VALUE
+rbatk_table_set_row_header(self, row, header)
+    VALUE self, row, header;
+{
+    atk_table_set_row_header(_SELF(self), NUM2INT(row), ATK_OBJECT(RVAL2GOBJ(header)));
+    return self;
+}
+
+static VALUE
+rbatk_table_set_column_header(self, column, header)
+    VALUE self, column, header;
+{
+    atk_table_set_column_header(_SELF(self), NUM2INT(column), ATK_OBJECT(RVAL2GOBJ(header)));
+    return self;
+}
+
+static VALUE
+rbatk_table_set_summary(self, accessible)
+    VALUE self, accessible;
+{
+    atk_table_set_summary(_SELF(self), ATK_OBJECT(RVAL2GOBJ(accessible)));
+    return self;
+}
+
+static VALUE
+rbatk_table_get_selected_columns(self)
+    VALUE self;
+{
+    gint ret;
+    gint* selected;
+    VALUE result = Qnil;
+    ret = atk_table_get_selected_columns(_SELF(self), &selected);
+    if (ret > 0){
+        gint i;
+        result = rb_ary_new2(ret);
+        for (i = 0; i < ret; i++){
+            rb_ary_push(result, INT2NUM(selected[i]));
+        }
+    }
+    return result;
+}
+
+static VALUE
+rbatk_table_get_selected_rows(self)
+    VALUE self;
+{
+    gint ret;
+    gint* selected;
+    VALUE result = Qnil;
+    ret = atk_table_get_selected_rows(_SELF(self), &selected);
+    if (ret > 0){
+        gint i;
+        result = rb_ary_new2(ret);
+        for (i = 0; i < ret; i++){
+            rb_ary_push(result, INT2NUM(selected[i]));
+        }
+    }
+    return result;
+}
+
+static VALUE
+rbatk_table_is_column_selected(self, column)
+    VALUE self, column;
+{
+    return CBOOL2RVAL(atk_table_is_column_selected(_SELF(self), NUM2INT(column)));
+}
+
+static VALUE
+rbatk_table_is_row_selected(self, row)
+    VALUE self, row;
+{
+    return CBOOL2RVAL(atk_table_is_row_selected(_SELF(self), NUM2INT(row)));
+}
+
+static VALUE
+rbatk_table_is_selected(self, row, column)
+    VALUE self, row, column;
+{
+    return CBOOL2RVAL(atk_table_is_selected(_SELF(self), NUM2INT(row), NUM2INT(column)));
+}
+
+static VALUE
+rbatk_table_add_column_selection(self, column)
+    VALUE self, column;
+{
+    gboolean ret = atk_table_add_column_selection(_SELF(self), NUM2INT(column));
+    if (! ret) rb_raise(rb_eRuntimeError, "not implement this interface");
+    return self;
+}
+
+static VALUE
+rbatk_table_add_row_selection(self, row)
+    VALUE self, row;
+{
+    gboolean ret = atk_table_add_row_selection(_SELF(self), NUM2INT(row));
+    if (! ret) rb_raise(rb_eRuntimeError, "not implement this interface");
+    return self;
+}
+
+static VALUE
+rbatk_table_remove_column_selection(self, column)
+    VALUE self, column;
+{
+    gboolean ret = atk_table_remove_column_selection(_SELF(self), NUM2INT(column));
+    if (! ret) rb_raise(rb_eRuntimeError, "not implement this interface");
+    return self;
+}
+
+static VALUE
+rbatk_table_remove_row_selection(self, row)
+    VALUE self, row;
+{
+    gboolean ret = atk_table_remove_row_selection(_SELF(self), NUM2INT(row));
+    if (! ret) rb_raise(rb_eRuntimeError, "not implement this interface");
+    return self;
+}
+
+void
+Init_atk_table()
+{
+    VALUE mTable = G_DEF_INTERFACE(ATK_TYPE_TABLE, "Table", mAtk);
+
+    rb_define_method(mTable, "set_caption", rbatk_table_set_caption, 1);
+    rb_define_method(mTable, "ref_at", rbatk_table_ref_at, 2);
+    rb_define_method(mTable, "get_index_at", rbatk_table_get_index_at, 2);
+    rb_define_method(mTable, "get_column_at_index", rbatk_table_get_column_at_index, 1);
+    rb_define_method(mTable, "get_row_at_index", rbatk_table_get_row_at_index, 1);
+    rb_define_method(mTable, "n_columns", rbatk_table_get_n_columns, 0);
+    rb_define_method(mTable, "n_rows", rbatk_table_get_n_rows, 0);
+    rb_define_method(mTable, "get_column_extent_at", rbatk_table_get_column_extent_at, 2);
+    rb_define_method(mTable, "get_row_extent_at", rbatk_table_get_row_extent_at, 2);
+    rb_define_method(mTable, "caption", rbatk_table_get_caption, 0);
+    rb_define_method(mTable, "get_column_description", rbatk_table_get_column_description, 1);
+    rb_define_method(mTable, "get_row_description", rbatk_table_get_row_description, 1);
+    rb_define_method(mTable, "get_column_header", rbatk_table_get_column_header, 1);
+    rb_define_method(mTable, "get_row_header", rbatk_table_get_row_header, 1);
+    rb_define_method(mTable, "summary", rbatk_table_get_summary, 0);
+    rb_define_method(mTable, "set_caption", rbatk_table_set_caption, 1);
+    rb_define_method(mTable, "set_row_description", rbatk_table_set_row_description, 2);
+    rb_define_method(mTable, "set_column_description", rbatk_table_set_column_description, 2);
+    rb_define_method(mTable, "set_row_header", rbatk_table_set_row_header, 2);
+    rb_define_method(mTable, "set_column_header", rbatk_table_set_column_header, 2);
+    rb_define_method(mTable, "set_summary", rbatk_table_set_summary, 1);
+    rb_define_method(mTable, "selected_columns", rbatk_table_get_selected_columns, 0);
+    rb_define_method(mTable, "selected_rows", rbatk_table_get_selected_rows, 0);
+    rb_define_method(mTable, "column_selected?", rbatk_table_is_column_selected, 1);
+    rb_define_method(mTable, "row_selected?", rbatk_table_is_row_selected, 1);
+    rb_define_method(mTable, "selected?", rbatk_table_is_selected, 2);
+    rb_define_method(mTable, "add_column_selection", rbatk_table_add_column_selection, 1);
+    rb_define_method(mTable, "add_row_selection", rbatk_table_add_row_selection, 1);
+    rb_define_method(mTable, "remove_column_selection", rbatk_table_remove_column_selection, 1);
+    rb_define_method(mTable, "remove_row_selection", rbatk_table_remove_row_selection, 1);
+
+    G_DEF_SETTERS(mTable);
+}