pango 3.1.1 → 3.1.2

data/ext/pango/rbpangoglyphinfo.c

@@ -1,123 +0,0 @@
-/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
-/*
- *  Copyright (C) 2011-2016  Ruby-GNOME2 Project Team
- *  Copyright (C) 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 cGlyphInfo
-#define _SELF(self) (RVAL2PANGOGLYPHINFO(self))
-
-/**********************************/
-static PangoGlyphInfo *
-pango_glyph_info_copy(const PangoGlyphInfo *info)
-{
-  PangoGlyphInfo *data;
-
-  g_return_val_if_fail(info != NULL, NULL);
-
-  data = g_new(PangoGlyphInfo, 1);
-  *data = *info;
-
-  return data;
-}
-
-GType
-pango_glyph_info_get_type(void)
-{
-    static GType our_type = 0;
-
-    if (our_type == 0)
-        our_type = g_boxed_type_register_static ("PangoGlyphInfo",
-                    (GBoxedCopyFunc)pango_glyph_info_copy,
-                    (GBoxedFreeFunc)g_free);
-    return our_type;
-}
-/**********************************/
-
-static VALUE
-rg_initialize(VALUE self)
-{
-    G_INITIALIZE(self, g_new0(PangoGlyphInfo, 1));
-    return Qnil;
-}
-
-static VALUE
-rg_glyph(VALUE self)
-{
-    return UINT2NUM(_SELF(self)->glyph);
-}
-
-static VALUE
-rg_set_glyph(VALUE self, VALUE val)
-{
-    _SELF(self)->glyph = NUM2UINT(val);
-    return self;
-}
-
-static VALUE
-rg_geometry(VALUE self)
-{
-    PangoGlyphGeometry geo = _SELF(self)->geometry;
-
-    return rb_ary_new3(3, INT2NUM(geo.width), 
-                       INT2NUM(geo.x_offset), INT2NUM(geo.y_offset));
-}
-
-static VALUE
-rg_set_geometry(VALUE self, VALUE width, VALUE x_offset, VALUE y_offset)
-{
-    PangoGlyphGeometry *geo = &(_SELF(self)->geometry);
-
-    geo->width = NUM2INT(width);
-    geo->x_offset = NUM2INT(x_offset);
-    geo->y_offset = NUM2INT(y_offset);
-
-    return self;
-}
-
-/*
-  This method may be changed in the future following Pango implementation.
- */
-static VALUE
-rg_cluster_start_p(VALUE self)
-{
-    return CBOOL2RVAL(_SELF(self)->attr.is_cluster_start);
-}
-
-static VALUE
-rg_set_cluster_start(VALUE self, VALUE val)
-{
-    _SELF(self)->attr.is_cluster_start = RVAL2CBOOL(val);
-    return self;
-}
-
-void
-Init_pango_glyph_info(VALUE mPango)
-{
-    VALUE RG_TARGET_NAMESPACE = G_DEF_CLASS(PANGO_TYPE_GLYPH_INFO, "GlyphInfo", mPango);
-
-    RG_DEF_METHOD(initialize, 0);
-    RG_DEF_METHOD(glyph, 0);
-    RG_DEF_METHOD(set_glyph, 1);
-    RG_DEF_METHOD(geometry, 0);
-    RG_DEF_METHOD(set_geometry, 3);
-    RG_DEF_METHOD_P(cluster_start, 0);
-    RG_DEF_METHOD(set_cluster_start, 1);
-}

data/ext/pango/rbpangoglyphitem.c

@@ -1,125 +0,0 @@
-/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
-/*
- *  Copyright (C) 2011  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 cGlyphItem
-#define _SELF(r) (RVAL2PANGOGLYPHITEM(r))
-
-/**********************************/
-#ifndef HAVE_PANGO_GLYPH_ITEM_GET_TYPE
-static PangoGlyphItem*
-glyph_item_copy(const PangoGlyphItem *ref)
-{
-  PangoGlyphItem* new_ref;
-  g_return_val_if_fail (ref != NULL, NULL);
-  new_ref = g_new(PangoGlyphItem, 1);
-  *new_ref = *ref;
-  return new_ref;
-}
-
-#  ifndef HAVE_PANGO_GLYPH_ITEM_FREE
-void
-pango_glyph_item_free(PangoGlyphItem* glyph_item)
-{
-    if (glyph_item->item)
-        pango_item_free(glyph_item->item);
-    if (glyph_item->glyphs)
-        pango_glyph_string_free(glyph_item->glyphs);
-    g_free(glyph_item);
-}
-#  endif
-
-GType
-pango_glyph_item_get_type(void)
-{
-    static GType our_type = 0;
-
-    if (our_type == 0)
-        our_type = g_boxed_type_register_static ("PangoGlyphItem",
-                    (GBoxedCopyFunc)glyph_item_copy,
-                    (GBoxedFreeFunc)pango_glyph_item_free);
-    return our_type;
-}
-#endif
-/**********************************/
-
-static VALUE
-rg_item(VALUE self)
-{
-    PangoItem* item = _SELF(self)->item;
-    return PANGOITEM2RVAL(item);
-}
-
-static VALUE
-rg_glyphs(VALUE self)
-{
-    PangoGlyphString* glyphs = _SELF(self)->glyphs;
-    return PANGOGLYPHSTRING2RVAL(glyphs);
-}
-
-static VALUE
-rg_split(VALUE self, VALUE text, VALUE split_index)
-{
-    return PANGOGLYPHITEM2RVAL(pango_glyph_item_split(_SELF(self), RVAL2CSTR(text),
-                                                      NUM2INT(split_index)));
-}
-
-static VALUE
-rg_appy_attrs(VALUE self, VALUE text, VALUE attrs)
-{
-    GSList* list = pango_glyph_item_apply_attrs(_SELF(self), RVAL2CSTR(text),
-                                                RVAL2PANGOATTRLIST(attrs));
-
-    VALUE ret = rb_ary_new();
-
-    while (list) {
-        rb_ary_push(ret, PANGOGLYPHITEM2RVAL(list->data));
-        pango_glyph_item_free(list->data); 
-        list = list->next;
-    }
-
-    g_slist_free(list);
-    return ret;
-}
-
-static VALUE
-rg_letter_space(VALUE self, VALUE text, VALUE log_attrs, VALUE letter_spacing)
-{
-    pango_glyph_item_letter_space(_SELF(self), RVAL2CSTR(text),
-                                  RVAL2PANGOLOGATTR(log_attrs),
-                                  NUM2INT(letter_spacing));
-    return self;
-}
-
-void
-Init_pango_glyph_item(VALUE mPango)
-{
-    VALUE RG_TARGET_NAMESPACE = G_DEF_CLASS(PANGO_TYPE_GLYPH_ITEM, "GlyphItem", mPango);
-
-    RG_DEF_METHOD(item, 0);
-    RG_DEF_METHOD(glyphs, 0);
-
-    RG_DEF_METHOD(split, 2);
-    RG_DEF_METHOD(appy_attrs, 2);
-
-    RG_DEF_METHOD(letter_space, 3);
-}

data/ext/pango/rbpangoglyphstring.c

@@ -1,151 +0,0 @@
-/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
-/*
- *  Copyright (C) 2011  Ruby-GNOME2 Project Team
- *  Copyright (C) 2002-2006 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 cGlyphString
-#define _SELF(self) (RVAL2PANGOGLYPHSTRING(self))
-
-static VALUE
-rg_initialize(VALUE self)
-{
-    G_INITIALIZE(self, pango_glyph_string_new());
-    return Qnil;
-}
-
-static VALUE
-rg_set_size(VALUE self, VALUE len)
-{
-    pango_glyph_string_set_size(_SELF(self), NUM2INT(len));
-    return self;
-}
-
-static VALUE
-rg_extents(int argc, VALUE *argv, VALUE self)
-{
-    VALUE font, start_index, end_index;
-    PangoRectangle ink_rect;
-    PangoRectangle logical_rect;
-
-    rb_scan_args(argc, argv, "12", &font, &start_index, &end_index);
-
-    if (NIL_P(start_index)){
-        pango_glyph_string_extents(_SELF(self), 
-                                   RVAL2PANGOFONT(font),
-                                   &ink_rect, &logical_rect);
-    } else {
-        pango_glyph_string_extents_range(_SELF(self), 
-                                         NUM2INT(start_index), NUM2INT(end_index),
-                                         RVAL2PANGOFONT(font),
-                                         &ink_rect, &logical_rect);
-    }
-
-    return rb_assoc_new(PANGORECTANGLE2RVAL(&ink_rect),
-                        PANGORECTANGLE2RVAL(&logical_rect));
-}
-
-static VALUE
-rg_width(VALUE self)
-{
-    return INT2NUM(pango_glyph_string_get_width(_SELF(self)));
-}
-
-static VALUE
-rg_index_to_x(VALUE self, VALUE text, VALUE analysis, VALUE index, VALUE trailing)
-{
-    int x_pos;
-    StringValue(text);
-
-    pango_glyph_string_index_to_x(_SELF(self),
-                                  /* NOTE: This is a bug in the signature of
-                                   * pango_glyph_string_index_to_x */
-                                  (char *)RSTRING_PTR(text),
-                                  RSTRING_LEN(text),
-                                  RVAL2PANGOANALYSIS(analysis),
-                                  NUM2INT(index), RVAL2CBOOL(trailing),
-                                  &x_pos);
-    return INT2NUM(x_pos);
-}
-
-static VALUE
-rg_x_to_index(VALUE self, VALUE text, VALUE analysis, VALUE x_pos)
-{
-    int index;
-    int trailing;
-
-    StringValue(text);
-    pango_glyph_string_x_to_index(_SELF(self),
-                                  /* NOTE: This is a bug in the signature of
-                                   * pango_glyph_string_index_to_x */
-                                  (char *)RSTRING_PTR(text),
-                                  RSTRING_LEN(text),
-                                  RVAL2PANGOANALYSIS(analysis),
-                                  NUM2INT(x_pos),
-                                  &index, &trailing);
-    return rb_assoc_new(INT2NUM(index), CBOOL2RVAL(trailing));
-}
-
-static VALUE
-rg_get_logical_widths(VALUE self, VALUE rbtext, VALUE rbembedding_level)
-{
-    PangoGlyphString *glyphs = _SELF(self);
-    const char *text = RVAL2CSTR(rbtext);
-    long length = RSTRING_LEN(rbtext);
-    int embedding_level = NUM2INT(rbembedding_level);
-    glong n = g_utf8_strlen(text, length);
-    int *logical_widths = g_new(int, n);
-
-    pango_glyph_string_get_logical_widths(glyphs, text, length, embedding_level,
-                                          logical_widths);
-
-    return GINTS2RVAL_FREE(logical_widths, n);
-}
-
-static VALUE
-rg_glyphs(VALUE self)
-{
-    int i;
-    PangoGlyphInfo *glyphs = _SELF(self)->glyphs;
-    gint* log_clusters = _SELF(self)->log_clusters;
-
-    VALUE ret = rb_ary_new();
-    for (i = 0; i < _SELF(self)->num_glyphs; i++) {
-        rb_ary_push(ret, 
-                    rb_assoc_new(PANGOGLYPHINFO2RVAL(glyphs + i),
-                                 INT2NUM(log_clusters[i])));
-    }
-    return ret;
-}
-
-void
-Init_pango_glyph_string(VALUE mPango)
-{
-    VALUE RG_TARGET_NAMESPACE = G_DEF_CLASS(PANGO_TYPE_GLYPH_STRING, "GlyphString", mPango);
-
-    RG_DEF_METHOD(initialize, 0);
-    RG_DEF_METHOD(set_size, 1);
-    RG_DEF_METHOD(extents, -1);
-    RG_DEF_METHOD(width, 0);
-    RG_DEF_METHOD(index_to_x, 4);
-    RG_DEF_METHOD(x_to_index, 3);
-    RG_DEF_METHOD(get_logical_widths, 2);
-    RG_DEF_METHOD(glyphs, 0);
-}

data/ext/pango/rbpangogravity.c

@@ -1,54 +0,0 @@
-/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
-/*
- *  Copyright (C) 2011  Ruby-GNOME2 Project Team
- *
- *  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"
-
-#if PANGO_VERSION_CHECK(1,16,0)
-
-#define RG_TARGET_NAMESPACE mGravity
-
-static VALUE
-rg_s_to_rotation(G_GNUC_UNUSED VALUE self, VALUE gravity)
-{
-    return rb_float_new(pango_gravity_to_rotation(RVAL2PANGOGRAVITY(gravity)));
-}
-
-static VALUE
-rg_s_vertical_p(G_GNUC_UNUSED VALUE self, VALUE gravity)
-{
-    return CBOOL2RVAL(PANGO_GRAVITY_IS_VERTICAL(RVAL2PANGOGRAVITY(gravity)));
-}
-#endif
-
-void
-Init_pango_gravity(VALUE mPango)
-{
-#if PANGO_VERSION_CHECK(1,16,0)
-    VALUE RG_TARGET_NAMESPACE = rb_define_module_under(mPango, "Gravity");
-
-    RG_DEF_SMETHOD(to_rotation, 1);
-    RG_DEF_SMETHOD_P(vertical, 1);
-
-    G_DEF_CLASS(PANGO_TYPE_GRAVITY, "Gravity", RG_TARGET_NAMESPACE);
-    G_DEF_CONSTANTS(RG_TARGET_NAMESPACE, PANGO_TYPE_GRAVITY, "PANGO_GRAVITY_");
-    G_DEF_CLASS(PANGO_TYPE_GRAVITY_HINT, "Hint", RG_TARGET_NAMESPACE);
-    G_DEF_CONSTANTS(RG_TARGET_NAMESPACE, PANGO_TYPE_GRAVITY_HINT, "PANGO_GRAVITY_");
-#endif
-}