pango 2.2.4-x64-mingw32

data/ext/pango/rbpangolayout.c

@@ -0,0 +1,572 @@
+/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
+/*
+ *  Copyright (C) 2011-2013  Ruby-GNOME2 Project Team
+ *  Copyright (C) 2002-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 "rbpangoprivate.h"
+
+#define RG_TARGET_NAMESPACE cLayout
+#define _SELF(self) (RVAL2PANGOLAYOUT(self))
+
+static VALUE
+rg_initialize(VALUE self, VALUE context)
+{
+    G_INITIALIZE(self, pango_layout_new(RVAL2PANGOCONTEXT(context)));
+    return Qnil;
+}
+
+static VALUE
+rg_copy(VALUE self)
+{
+    return GOBJ2RVAL_UNREF(pango_layout_copy(_SELF(self)));
+}
+
+static VALUE
+rg_context(VALUE self)
+{
+    return GOBJ2RVAL(pango_layout_get_context(_SELF(self)));
+}
+
+static VALUE
+rg_context_changed(VALUE self)
+{
+    pango_layout_context_changed(_SELF(self));
+    return Qnil;
+}
+
+static VALUE
+rg_set_text(VALUE self, VALUE text)
+{
+    StringValue(text);
+
+    pango_layout_set_text(_SELF(self), RSTRING_PTR(text), RSTRING_LEN(text));
+
+    return self;
+}
+
+static VALUE
+rg_text(VALUE self)
+{
+    return CSTR2RVAL(pango_layout_get_text(_SELF(self)));
+}
+
+static VALUE
+rg_set_markup(int argc, VALUE *argv, VALUE self)
+{
+    VALUE markup, accel_marker;
+    gunichar accel_char = 0;
+
+    rb_scan_args(argc, argv, "11", &markup, &accel_marker);
+
+    StringValue(markup);
+
+    if (NIL_P(accel_marker)){
+        pango_layout_set_markup(_SELF(self),
+                                RSTRING_PTR(markup),
+                                RSTRING_LEN(markup));
+    } else {
+        pango_layout_set_markup_with_accel(_SELF(self),
+                                           RSTRING_PTR(markup),
+                                           RSTRING_LEN(markup),
+                                           NUM2CHR(accel_marker), &accel_char);
+    }
+    return CHR2FIX(accel_char);
+}
+
+static VALUE
+rg_operator_layout_set_markup_eq(VALUE self, VALUE markup)
+{
+    StringValue(markup);
+
+    pango_layout_set_markup(_SELF(self), RSTRING_PTR(markup), RSTRING_LEN(markup));
+
+    return markup;
+}
+
+static VALUE
+rg_set_attributes(VALUE self, VALUE attrs)
+{
+    pango_layout_set_attributes(_SELF(self),
+                                RVAL2PANGOATTRLIST(attrs));
+    return self;
+}
+
+static VALUE
+rg_attributes(VALUE self)
+{
+    return PANGOATTRLIST2RVAL(pango_layout_get_attributes(_SELF(self)));
+}
+
+static VALUE
+rg_set_font_description(VALUE self, VALUE rb_desc)
+{
+    PangoFontDescription *desc;
+    gboolean desc_created = FALSE;
+
+    if (RVAL2CBOOL(rb_obj_is_kind_of(rb_desc, rb_cString))) {
+        desc = pango_font_description_from_string(RVAL2CSTR(rb_desc));
+        desc_created = TRUE;
+    } else {
+        desc = RVAL2PANGOFONTDESCRIPTION(rb_desc);
+    }
+
+    pango_layout_set_font_description(_SELF(self), desc);
+
+    if (desc_created)
+        pango_font_description_free(desc);
+
+    return self;
+}
+
+static VALUE
+rg_font_description(VALUE self)
+{
+    const PangoFontDescription* desc = pango_layout_get_font_description(_SELF(self));
+    return PANGOFONTDESCRIPTION2RVAL((gpointer)desc);
+}
+
+static VALUE
+rg_set_width(VALUE self, VALUE width)
+{
+    pango_layout_set_width(_SELF(self), NUM2INT(width));
+    return self;
+}
+
+static VALUE
+rg_width(VALUE self)
+{
+    return INT2NUM(pango_layout_get_width(_SELF(self)));
+}
+
+#if PANGO_CHECK_VERSION(1, 20, 0)
+static VALUE
+rg_set_height(VALUE self, VALUE width)
+{
+    pango_layout_set_height(_SELF(self), NUM2INT(width));
+    return self;
+}
+
+static VALUE
+rg_height(VALUE self)
+{
+    return INT2NUM(pango_layout_get_height(_SELF(self)));
+}
+#endif
+
+static VALUE
+rg_set_wrap(VALUE self, VALUE wrap)
+{
+    pango_layout_set_wrap(_SELF(self), RVAL2PANGOWRAPMODE(wrap));
+    return self;
+}
+
+static VALUE
+rg_wrap(VALUE self)
+{
+    return PANGOWRAPMODE2RVAL(pango_layout_get_wrap(_SELF(self)));
+}
+
+static VALUE
+rg_set_ellipsize(VALUE self, VALUE ellipsize)
+{
+    pango_layout_set_ellipsize(_SELF(self), RVAL2PANGOELLIPSIZEMODE(ellipsize));
+    return self;
+}
+
+static VALUE
+rg_ellipsize(VALUE self)
+{
+    return PANGOELLIPSIZEMODE2RVAL(pango_layout_get_ellipsize(_SELF(self)));
+}
+
+#if PANGO_CHECK_VERSION(1, 16, 0)
+static VALUE
+rg_ellipsized_p(VALUE self)
+{
+    return CBOOL2RVAL(pango_layout_is_ellipsized(_SELF(self)));
+}
+#endif
+
+static VALUE
+rg_set_indent(VALUE self, VALUE indent)
+{
+    pango_layout_set_indent(_SELF(self), NUM2INT(indent));
+    return self;
+}
+
+static VALUE
+rg_indent(VALUE self)
+{
+    return INT2NUM(pango_layout_get_indent(_SELF(self)));
+}
+
+static VALUE
+rg_spacing(VALUE self)
+{
+    return INT2NUM(pango_layout_get_spacing(_SELF(self)));
+}
+
+static VALUE
+rg_set_spacing(VALUE self, VALUE spacing)
+{
+    pango_layout_set_spacing(_SELF(self), NUM2INT(spacing));
+    return self;
+}
+
+static VALUE
+rg_set_justify(VALUE self, VALUE justify)
+{
+    pango_layout_set_justify(_SELF(self), RVAL2CBOOL(justify));
+    return self;
+}
+static VALUE
+rg_justify_p(VALUE self)
+{
+    return CBOOL2RVAL(pango_layout_get_justify(_SELF(self)));
+}
+
+static VALUE
+rg_set_auto_dir(VALUE self, VALUE auto_dir)
+{
+    pango_layout_set_auto_dir(_SELF(self), RVAL2CBOOL(auto_dir));
+    return self;
+}
+static VALUE
+rg_auto_dir_p(VALUE self)
+{
+    return CBOOL2RVAL(pango_layout_get_auto_dir(_SELF(self)));
+}
+
+static VALUE
+rg_set_alignment(VALUE self, VALUE align)
+{
+    pango_layout_set_alignment(_SELF(self), RVAL2PANGOALIGNMENT(align));
+    return self;
+}
+
+static VALUE
+rg_alignment(VALUE self)
+{
+    return PANGOALIGNMENT2RVAL(pango_layout_get_alignment(_SELF(self)));
+}
+
+static VALUE
+rg_set_tabs(VALUE self, VALUE tabs)
+{
+    pango_layout_set_tabs(_SELF(self),
+                          RVAL2PANGOTABARRAY(tabs));
+    return self;
+}
+
+static VALUE
+rg_tabs(VALUE self)
+{
+    VALUE ret = Qnil;
+    PangoTabArray* tabs = pango_layout_get_tabs(_SELF(self));
+
+    if (tabs) {
+        ret = PANGOTABARRAY2RVAL(tabs);
+        pango_tab_array_free(tabs);
+    }
+    return ret;
+}
+
+static VALUE
+rg_set_single_paragraph_mode(VALUE self, VALUE setting)
+{
+    pango_layout_set_single_paragraph_mode(_SELF(self), RVAL2CBOOL(setting));
+    return self;
+}
+
+static VALUE
+rg_single_paragraph_mode_p(VALUE self)
+{
+    return CBOOL2RVAL(pango_layout_get_single_paragraph_mode(_SELF(self)));
+}
+
+static VALUE
+rg_log_attrs(VALUE self)
+{
+    PangoLogAttr* attrs;
+    gint i, n_attrs;
+    VALUE ary;
+
+    pango_layout_get_log_attrs(_SELF(self), &attrs, &n_attrs);
+
+    ary = rb_ary_new();
+
+    for (i = 0; i < n_attrs; i++) {
+        rb_ary_assoc(ary, PANGOLOGATTR2RVAL(&attrs[i]));
+    }
+    g_free(attrs);
+
+    return ary;
+}
+
+static VALUE
+rg_xy_to_index(VALUE self, VALUE x, VALUE y)
+{
+    int index, trailing;
+    gboolean ret = pango_layout_xy_to_index(_SELF(self),
+                                            NUM2INT(x), NUM2INT(y),
+                                            &index, &trailing);
+
+    return rb_ary_new3(3, CBOOL2RVAL(ret), INT2NUM(index), INT2NUM(trailing));
+}
+
+static VALUE
+rg_index_to_pos(VALUE self, VALUE index)
+{
+    PangoRectangle pos;
+    pango_layout_index_to_pos(_SELF(self), NUM2INT(index), &pos);
+    return PANGORECTANGLE2RVAL(&pos);
+}
+
+static VALUE
+rg_get_cursor_pos(VALUE self, VALUE index)
+{
+    PangoRectangle strong_pos, weak_pos;
+    pango_layout_get_cursor_pos(_SELF(self), NUM2INT(index), &strong_pos, &weak_pos);
+    return rb_ary_new3(2, PANGORECTANGLE2RVAL(&strong_pos),
+                       PANGORECTANGLE2RVAL(&weak_pos));
+}
+
+static VALUE
+rg_move_cursor_visually(VALUE self, VALUE strong, VALUE old_index, VALUE old_trailing, VALUE direction)
+{
+    int new_index, new_trailing;
+    pango_layout_move_cursor_visually(_SELF(self), RVAL2CBOOL(strong),
+                                      NUM2INT(old_index), NUM2INT(old_trailing),
+                                      NUM2INT(direction),
+                                      &new_index, &new_trailing);
+    return rb_ary_new3(2, INT2NUM(new_index), INT2NUM(new_trailing));
+}
+
+static VALUE
+rg_get_extents(int argc, VALUE *argv, VALUE self)
+{
+    VALUE ink_rect, logical_rect;
+    PangoRectangle rink, rlog;
+
+    rb_scan_args(argc, argv, "02", &ink_rect, &logical_rect);
+
+    if (NIL_P(ink_rect)){
+        rink.x = 0;
+        rink.y = 0;
+        rink.width = 0;
+        rink.height = 0;
+    } else {
+        PangoRectangle* rect = RVAL2PANGORECTANGLE(ink_rect);
+        rink.x = rect->x;
+        rink.y = rect->y;
+        rink.width = rect->width;
+        rink.height = rect->height;
+    }
+    if (NIL_P(logical_rect)){
+        rlog.x = 0;
+        rlog.y = 0;
+        rlog.width = 0;
+        rlog.height = 0;
+    } else {
+        PangoRectangle* rect = RVAL2PANGORECTANGLE(logical_rect);
+        rlog.x = rect->x;
+        rlog.y = rect->y;
+        rlog.width = rect->width;
+        rlog.height = rect->height;
+    }
+
+    pango_layout_get_extents(_SELF(self), &rink, &rlog);
+
+    return rb_assoc_new(PANGORECTANGLE2RVAL(&rink),
+                        PANGORECTANGLE2RVAL(&rlog));
+}
+
+static VALUE
+rg_extents(VALUE self)
+{
+    PangoRectangle rink = {0, 0, 0, 0};
+    PangoRectangle rlog = {0, 0, 0, 0};
+
+    pango_layout_get_extents(_SELF(self), &rink, &rlog);
+    return rb_assoc_new(PANGORECTANGLE2RVAL(&rink),
+                        PANGORECTANGLE2RVAL(&rlog));
+}
+
+static VALUE
+rg_get_pixel_extents(int argc, VALUE *argv, VALUE self)
+{
+    VALUE ink_rect, logical_rect;
+    PangoRectangle rink, rlog;
+
+    rb_scan_args(argc, argv, "02", &ink_rect, &logical_rect);
+
+    if (NIL_P(ink_rect)){
+        rink.x = 0;
+        rink.y = 0;
+        rink.width = 0;
+        rink.height = 0;
+    } else {
+        PangoRectangle* rect = RVAL2PANGORECTANGLE(ink_rect);
+        rink.x = rect->x;
+        rink.y = rect->y;
+        rink.width = rect->width;
+        rink.height = rect->height;
+    }
+    if (NIL_P(logical_rect)){
+        rlog.x = 0;
+        rlog.y = 0;
+        rlog.width = 0;
+        rlog.height = 0;
+    } else {
+        PangoRectangle* rect = RVAL2PANGORECTANGLE(logical_rect);
+        rlog.x = rect->x;
+        rlog.y = rect->y;
+        rlog.width = rect->width;
+        rlog.height = rect->height;
+    }
+
+    pango_layout_get_pixel_extents(_SELF(self), &rink, &rlog);
+
+    return rb_assoc_new(PANGORECTANGLE2RVAL(&rink),
+                        PANGORECTANGLE2RVAL(&rlog));
+}
+
+static VALUE
+rg_pixel_extents(VALUE self)
+{
+    PangoRectangle rink = {0, 0, 0, 0};
+    PangoRectangle rlog = {0, 0, 0, 0};
+
+    pango_layout_get_pixel_extents(_SELF(self), &rink, &rlog);
+    return rb_assoc_new(PANGORECTANGLE2RVAL(&rink),
+                        PANGORECTANGLE2RVAL(&rlog));
+}
+
+static VALUE
+rg_size(VALUE self)
+{
+    int width, height;
+    pango_layout_get_size(_SELF(self), &width, &height);
+    return rb_ary_new3(2, INT2NUM(width), INT2NUM(height));
+}
+
+static VALUE
+rg_pixel_size(VALUE self)
+{
+    int width, height;
+    pango_layout_get_pixel_size(_SELF(self), &width, &height);
+    return rb_ary_new3(2, INT2NUM(width), INT2NUM(height));
+}
+
+static VALUE
+rg_line_count(VALUE self)
+{
+    return INT2NUM(pango_layout_get_line_count(_SELF(self)));
+}
+
+static VALUE
+rg_get_line(VALUE self, VALUE line)
+{
+    return PANGOLAYOUTLINE2RVAL(pango_layout_get_line(_SELF(self), NUM2INT(line)));
+}
+
+static VALUE
+rg_lines(VALUE self)
+{
+    return GSLIST2ARY2(pango_layout_get_lines(_SELF(self)), PANGO_TYPE_LAYOUT_LINE);
+}
+
+static VALUE
+rg_iter(VALUE self)
+{
+    return PANGOLAYOUTITER2RVAL(pango_layout_get_iter(_SELF(self)));
+}
+
+void
+Init_pango_layout(VALUE mPango)
+{
+    VALUE RG_TARGET_NAMESPACE = G_DEF_CLASS(PANGO_TYPE_LAYOUT, "Layout", mPango);
+
+    RG_DEF_METHOD(initialize, 1);
+    RG_DEF_METHOD(copy, 0);
+    RG_DEF_METHOD(context, 0);
+    RG_DEF_METHOD(context_changed, 0);
+    RG_DEF_METHOD(set_text, 1);
+    RG_DEF_METHOD(text, 0);
+    RG_DEF_METHOD(set_markup, -1);
+    RG_DEF_METHOD_OPERATOR("markup=", layout_set_markup_eq, 1);
+    RG_DEF_METHOD(set_attributes, 1);
+    RG_DEF_METHOD(attributes, 0);
+    RG_DEF_METHOD(set_font_description, 1);
+    RG_DEF_METHOD(font_description, 0);
+    RG_DEF_METHOD(set_width, 1);
+    RG_DEF_METHOD(width, 0);
+#if PANGO_CHECK_VERSION(1, 20, 0)
+    RG_DEF_METHOD(set_height, 1);
+    RG_DEF_METHOD(height, 0);
+#endif
+    RG_DEF_METHOD(set_wrap, 1);
+    RG_DEF_METHOD(wrap, 0);
+    RG_DEF_METHOD(set_ellipsize, 1);
+    RG_DEF_METHOD(ellipsize, 0);
+#if PANGO_CHECK_VERSION(1, 16, 0)
+    RG_DEF_METHOD_P(ellipsized, 0);
+#endif
+    RG_DEF_METHOD(set_indent, 1);
+    RG_DEF_METHOD(indent, 0);
+    RG_DEF_METHOD(spacing, 0);
+    RG_DEF_METHOD(set_spacing, 1);
+    RG_DEF_METHOD(set_justify, 1);
+    RG_DEF_METHOD_P(justify, 0);
+    RG_DEF_METHOD(set_auto_dir, 1);
+    RG_DEF_METHOD_P(auto_dir, 0);
+    RG_DEF_METHOD(set_alignment, 1);
+    RG_DEF_METHOD(alignment, 0);
+    RG_DEF_METHOD(set_tabs, 1);
+    RG_DEF_METHOD(tabs, 0);
+    RG_DEF_METHOD(set_single_paragraph_mode, 1);
+    RG_DEF_METHOD_P(single_paragraph_mode, 0);
+    RG_DEF_METHOD(log_attrs, 0);
+    RG_DEF_METHOD(xy_to_index, 2);
+    RG_DEF_METHOD(index_to_pos, 1);
+    RG_DEF_METHOD(get_cursor_pos, 1);
+    RG_DEF_METHOD(move_cursor_visually, 4);
+    RG_DEF_METHOD(get_extents, -1);
+    RG_DEF_METHOD(extents, 0);
+    RG_DEF_METHOD(get_pixel_extents, -1);
+    RG_DEF_METHOD(pixel_extents, 0);
+    RG_DEF_METHOD(size, 0);
+    RG_DEF_METHOD(pixel_size, 0);
+    RG_DEF_METHOD(line_count, 0);
+    RG_DEF_METHOD(get_line, 1);
+    RG_DEF_METHOD(lines, 0);
+    RG_DEF_METHOD(iter, 0);
+
+    /* PangoWrapMode */
+    G_DEF_CLASS(PANGO_TYPE_WRAP_MODE, "WrapMode", RG_TARGET_NAMESPACE);
+    G_DEF_CONSTANTS(RG_TARGET_NAMESPACE, PANGO_TYPE_WRAP_MODE, "PANGO_");
+
+    /* PangoAlignment */
+    G_DEF_CLASS(PANGO_TYPE_ALIGNMENT, "Alignment", RG_TARGET_NAMESPACE);
+    G_DEF_CONSTANTS(RG_TARGET_NAMESPACE, PANGO_TYPE_ALIGNMENT, "PANGO_");
+
+    /* PangoEllipsizeMode */
+    G_DEF_CLASS(PANGO_TYPE_ELLIPSIZE_MODE, "EllipsizeMode", RG_TARGET_NAMESPACE);
+    G_DEF_CONSTANTS(RG_TARGET_NAMESPACE, PANGO_TYPE_ELLIPSIZE_MODE, "PANGO_");
+}