This repository has been archived on 2021-09-15. You can view files and clone it, but cannot push or open issues or pull requests.
DUT2Curling/lib/ruby-gtk2-2.0.2/atk/ext/atk/rbatktext.c

319 lines
9.5 KiB
C

/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
/*
* Copyright (C) 2011 Ruby-GNOME2 Project Team
* Copyright (C) 2004 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 "rbatkprivate.h"
#define RG_TARGET_NAMESPACE mText
#define _SELF(s) (RVAL2ATKTEXT(s))
static VALUE
rg_get_text(VALUE self, VALUE start_offset, VALUE end_offset)
{
VALUE ret;
gchar* text = atk_text_get_text(_SELF(self),
NUM2INT(start_offset),
NUM2INT(end_offset));
ret = CSTR2RVAL(text);
g_free(text);
return ret;
}
static VALUE
rg_get_character_at_offset(VALUE self, VALUE offset)
{
gchar buf[10];
gint len = g_unichar_to_utf8(atk_text_get_character_at_offset
(_SELF(self), NUM2INT(offset)), buf);
buf[len] = '\0';
return rb_str_new2(buf);
}
static VALUE
rg_get_text_after_offset(VALUE self, VALUE offset, VALUE boundary_type)
{
gchar* ret;
VALUE result;
gint start_offset, end_offset;
ret = atk_text_get_text_after_offset(_SELF(self), NUM2INT(offset),
RVAL2ATKTEXTBOUNDARY(boundary_type),
&start_offset, &end_offset);
result = rb_ary_new3(3, CSTR2RVAL(ret),
INT2NUM(start_offset), INT2NUM(end_offset));
g_free(ret);
return result;
}
static VALUE
rg_get_text_at_offset(VALUE self, VALUE offset, VALUE boundary_type)
{
gchar* ret;
VALUE result;
gint start_offset, end_offset;
ret = atk_text_get_text_at_offset(_SELF(self), NUM2INT(offset),
RVAL2ATKTEXTBOUNDARY(boundary_type),
&start_offset, &end_offset);
result = rb_ary_new3(3, CSTR2RVAL(ret),
INT2NUM(start_offset), INT2NUM(end_offset));
g_free(ret);
return result;
}
static VALUE
rg_get_text_before_offset(VALUE self, VALUE offset, VALUE boundary_type)
{
gchar* ret;
VALUE result;
gint start_offset, end_offset;
ret = atk_text_get_text_before_offset(_SELF(self), NUM2INT(offset),
RVAL2ATKTEXTBOUNDARY(boundary_type),
&start_offset, &end_offset);
result = rb_ary_new3(3, CSTR2RVAL(ret),
INT2NUM(start_offset), INT2NUM(end_offset));
g_free(ret);
return result;
}
static VALUE
rg_caret_offset(VALUE self)
{
return INT2NUM(atk_text_get_caret_offset(_SELF(self)));
}
static VALUE
rg_get_character_extents(VALUE self, VALUE offset, VALUE coords)
{
gint x, y, width, height;
atk_text_get_character_extents(_SELF(self), NUM2INT(offset),
&x, &y, &width, &height,
RVAL2ATKCOORDTYPE(coords));
return rb_ary_new3(4, INT2NUM(x), INT2NUM(y), INT2NUM(width), INT2NUM(height));
}
static VALUE
rg_get_run_attributes(VALUE self, VALUE offset)
{
gint start_offset, end_offset;
AtkAttributeSet* list;
VALUE ary;
list = atk_text_get_run_attributes(_SELF(self), NUM2INT(offset),
&start_offset, &end_offset);
ary = rb_ary_new();
while (list) {
AtkAttribute* data = (AtkAttribute*)list->data;
rb_ary_push(ary, rb_assoc_new(CSTR2RVAL(data->name),
CSTR2RVAL(data->value)));
list = list->next;
}
atk_attribute_set_free(list);
return ary;
}
static VALUE
rg_default_attributes(VALUE self)
{
AtkAttributeSet* list;
VALUE ary;
list = atk_text_get_default_attributes(_SELF(self));
ary = rb_ary_new();
while (list) {
AtkAttribute* data = (AtkAttribute*)list->data;
rb_ary_push(ary, rb_assoc_new(CSTR2RVAL(data->name),
CSTR2RVAL(data->value)));
list = list->next;
}
atk_attribute_set_free(list);
return ary;
}
static VALUE
rg_character_count(VALUE self)
{
return INT2NUM(atk_text_get_character_count(_SELF(self)));
}
static VALUE
rg_get_offset_at_point(VALUE self, VALUE x, VALUE y, VALUE coords)
{
return INT2NUM(atk_text_get_offset_at_point(_SELF(self),
NUM2INT(x), NUM2INT(y),
RVAL2ATKCOORDTYPE(coords)));
}
#ifdef HAVE_ATK_TEXT_GET_BOUNDED_RANGES
#ifdef HAVE_ATK_TEXT_CLIP_TYPE_GET_TYPE
static VALUE
rg_get_bounded_ranges(VALUE self, VALUE rect, VALUE coord_type, VALUE x_clip_type, VALUE y_clip_type)
{
AtkTextRange** ranges;
int i = 0;
VALUE ary;
ranges = atk_text_get_bounded_ranges(_SELF(self),
RVAL2ATKTEXTRECTANGLE(rect),
RVAL2ATKCOORDTYPE(coord_type),
RVAL2ATKTEXTCLIPTYPE(x_clip_type),
RVAL2ATKTEXTCLIPTYPE(y_clip_type));
ary = rb_ary_new();
while(ranges[i]){
rb_ary_push(ary, ATKTEXTRANGE2RVAL(ranges[i]));
i++;
}
#ifdef HAVE_ATK_TEXT_FREE_RANGES
atk_text_free_ranges(ranges);
#endif
return ary;
}
#endif
static VALUE
rg_get_range_extents(VALUE self, VALUE start_offset, VALUE end_offset, VALUE coord_type)
{
AtkTextRectangle rect;
atk_text_get_range_extents(_SELF(self), NUM2INT(start_offset),
NUM2INT(end_offset),
RVAL2ATKCOORDTYPE(coord_type),
&rect);
return ATKTEXTRECTANGLE2RVAL(&rect);
}
/* Don't need this
void atk_text_free_ranges (AtkTextRange **ranges);
*/
#endif
static VALUE
rg_n_selections(VALUE self)
{
return INT2NUM(atk_text_get_n_selections(_SELF(self)));
}
static VALUE
rg_get_selection(VALUE self, VALUE selection_num)
{
gint start_offset, end_offset;
VALUE ret;
gchar* text = atk_text_get_selection(_SELF(self), NUM2INT(selection_num),
&start_offset, &end_offset);
ret = CSTR2RVAL(text);
g_free(text);
return ret;
}
static VALUE
rg_add_selection(VALUE self, VALUE start_offset, VALUE end_offset)
{
gboolean ret = atk_text_add_selection(_SELF(self), NUM2INT(start_offset),
NUM2INT(end_offset));
if (! ret) rb_raise(rb_eRuntimeError, "Can't add selection");
return self;
}
static VALUE
rg_remove_selection(VALUE self, VALUE selection_num)
{
gint num;
gboolean ret;
num = NUM2INT(selection_num);
ret = atk_text_remove_selection(_SELF(self), num);
if (! ret)
rb_raise(rb_eRuntimeError, "Can't remove selection. num = %d", num);
return self;
}
static VALUE
rg_set_selection(VALUE self, VALUE selection_num, VALUE start_offset, VALUE end_offset)
{
gboolean ret = atk_text_set_selection(_SELF(self), NUM2INT(selection_num),
NUM2INT(start_offset),
NUM2INT(end_offset));
if (! ret) rb_raise(rb_eRuntimeError, "Can't set selection");
return self;
}
static VALUE
rg_set_caret_offset(VALUE self, VALUE offset)
{
gboolean ret = atk_text_set_caret_offset(_SELF(self), NUM2INT(offset));
if (! ret) rb_raise(rb_eRuntimeError, "Can't set caret offset");
return self;
}
/* We don't need them.
void atk_attribute_set_free (AtkAttributeSet *attrib_set);
*/
void
Init_atk_text(VALUE mAtk)
{
VALUE RG_TARGET_NAMESPACE = G_DEF_INTERFACE(ATK_TYPE_TEXT, "Text", mAtk);
RG_DEF_METHOD(get_text, 2);
RG_DEF_METHOD(get_character_at_offset, 1);
RG_DEF_METHOD(get_text_after_offset, 2);
RG_DEF_METHOD(get_text_at_offset, 2);
RG_DEF_METHOD(get_text_before_offset, 2);
RG_DEF_METHOD(caret_offset, 0);
RG_DEF_METHOD(get_character_extents, 2);
RG_DEF_METHOD(get_run_attributes, 1);
RG_DEF_METHOD(default_attributes, 0);
RG_DEF_METHOD(character_count, 0);
RG_DEF_METHOD(get_offset_at_point, 3);
#ifdef HAVE_ATK_TEXT_GET_BOUNDED_RANGES
#ifdef HAVE_ATK_TEXT_CLIP_TYPE_GET_TYPE
RG_DEF_METHOD(get_bounded_ranges, 4);
RG_DEF_METHOD(get_range_extents, 3);
#endif
#endif
RG_DEF_METHOD(n_selections, 0);
RG_DEF_METHOD(get_selection, 1);
RG_DEF_METHOD(add_selection, 2);
RG_DEF_METHOD(remove_selection, 1);
RG_DEF_METHOD(set_selection, 3);
RG_DEF_METHOD(set_caret_offset, 1);
/* AtkTextBoundary */
#ifdef ATK_TYPE_TEXT_BOUNDARY
G_DEF_CLASS(ATK_TYPE_TEXT_BOUNDARY, "Boundary", RG_TARGET_NAMESPACE);
G_DEF_CONSTANTS(RG_TARGET_NAMESPACE, ATK_TYPE_TEXT_BOUNDARY, "ATK_TEXT_");
#endif
/* AtkTextClipType */
#ifdef HAVE_ATK_TEXT_GET_BOUNDED_RANGES
#ifdef HAVE_ATK_TEXT_CLIP_TYPE_GET_TYPE
G_DEF_CLASS(ATK_TYPE_TEXT_CLIP_TYPE, "ClipType", RG_TARGET_NAMESPACE);
G_DEF_CONSTANTS(RG_TARGET_NAMESPACE, ATK_TYPE_TEXT_CLIP_TYPE, "ATK_TEXT_");
#endif
#endif
Init_atk_text_attribute(RG_TARGET_NAMESPACE);
}