pango 3.1.1 → 3.1.2

data/ext/pango/rbpangoattriterator.c

@@ -1,141 +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 cAttrIterator
-#define _SELF(self) (RVAL2PANGOATTRITERATOR(self))
-
-/**********************************/
-GType
-pango_attr_iter_get_type(void)
-{
-    static GType our_type = 0;
-
-    if (our_type == 0)
-        our_type = g_boxed_type_register_static ("PangoAttrIterator",
-                    (GBoxedCopyFunc)pango_attr_iterator_copy,
-                    (GBoxedFreeFunc)pango_attr_iterator_destroy);
-    return our_type;
-}
-/**********************************/
-
-static VALUE
-rg_next_bang(VALUE self)
-{
-    return CBOOL2RVAL(pango_attr_iterator_next(_SELF(self)));
-}
-
-static VALUE
-rg_range(VALUE self)
-{
-    gint start = 0;
-    gint end = 0;
-    pango_attr_iterator_range(_SELF(self), &start, &end);
-    return rb_ary_new3(2, INT2NUM(start), INT2NUM(end));
-}
-
-static VALUE
-rg_get(int argc, VALUE *argv, VALUE self)
-{
-    VALUE type, ret;
-    PangoAttribute* attr;
-    int i;
-
-    rb_scan_args(argc, argv, "01", &type);
-
-    if (NIL_P(type)){
-        PangoAttrIterator* iter = _SELF(self);
-        ret = rb_ary_new();
-        for (i = 0; i < PANGO_ATTR_SCALE + 1; i++){
-            attr = pango_attr_iterator_get(iter, i);
-            if (attr)
-                rb_ary_push(ret, ATTR2RVAL(attr));
-        }
-    } else {
-        attr = pango_attr_iterator_get(_SELF(self), FIX2INT(type));
-        ret = attr ? ATTR2RVAL(attr) : Qnil;
-    }
-    return ret;
-}
-
-static VALUE
-rg_font(VALUE self)
-{
-    PangoFontDescription* desc;
-    PangoLanguage* lang;
-    GSList* extra_attrs;
-    VALUE ary, ret;
-
-    desc = pango_font_description_new();
-
-    pango_attr_iterator_get_font(_SELF(self), desc, &lang, &extra_attrs);
-
-    ary = rb_ary_new();
-    while(extra_attrs) {
-        rb_ary_push(ary, ATTR2RVAL(extra_attrs->data));
-        extra_attrs = extra_attrs->next;
-    }
-
-    ret = rb_ary_new3(3, PANGOFONTDESCRIPTION2RVAL(desc),
-                      PANGOLANGUAGE2RVAL(lang),
-                      ary);
-
-    pango_font_description_free(desc);
-    return ret;
-}
-
-#ifdef HAVE_PANGO_ATTR_ITERATOR_GET_ATTRS
-static VALUE
-rg_attrs(VALUE self)
-{
-    GSList* list = pango_attr_iterator_get_attrs(_SELF(self));
-    GSList* base = list;
-    GSList* old = list;
-    VALUE ary = rb_ary_new();
-
-    while (list) {
-        rb_ary_push(ary, ATTR2RVAL(list->data));
-        list = list->next;
-    }
-    while (old) {
-        pango_attribute_destroy((PangoAttribute*)old);
-        old = old->next;
-    }
-    g_slist_free(base);
-
-    return ary;
-}  
-#endif
-
-void
-Init_pango_attriterator(VALUE mPango)
-{
-    VALUE RG_TARGET_NAMESPACE = G_DEF_CLASS(PANGO_TYPE_ATTR_ITERATOR, "AttrIterator", mPango);
-
-    RG_DEF_METHOD_BANG(next, 0);
-    RG_DEF_METHOD(range, 0);
-    RG_DEF_METHOD(get, -1);
-    RG_DEF_METHOD(font, 0);
-#ifdef HAVE_PANGO_ATTR_ITERATOR_GET_ATTRS
-    RG_DEF_METHOD(attrs, 0);
-#endif
-}

data/ext/pango/rbpangoattrlist.c

@@ -1,101 +0,0 @@
-/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
-/*
- *  Copyright (C) 2011-2016 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"
-
-static ID id_call;
-
-#define RG_TARGET_NAMESPACE cAttrList
-#define _SELF(self) (RVAL2PANGOATTRLIST(self))
-
-static VALUE
-rg_initialize(VALUE self)
-{
-    G_INITIALIZE(self, pango_attr_list_new());
-    return Qnil;
-}
-
-static VALUE
-rg_insert(VALUE self, VALUE attr)
-{
-    pango_attr_list_insert(_SELF(self), RVAL2ATTR(attr));
-    return self;
-}
-
-static VALUE
-rg_insert_before(VALUE self, VALUE attr)
-{
-    pango_attr_list_insert_before(_SELF(self), RVAL2ATTR(attr));
-    return self;
-}
-
-static VALUE
-rg_change(VALUE self, VALUE attr)
-{
-    pango_attr_list_change(_SELF(self), RVAL2ATTR(attr));
-    return self;
-}
-
-static VALUE
-rg_splice(VALUE self, VALUE other, VALUE pos, VALUE len)
-{
-    pango_attr_list_splice(_SELF(self), _SELF(other), NUM2INT(pos), NUM2INT(len));
-    return self;
-}
-
-static gboolean
-filter_func(PangoAttribute *attr, gpointer data)
-{
-    return RVAL2CBOOL(rb_funcall((VALUE)data, id_call, 1, ATTR2RVAL(attr)));
-}
-
-static VALUE
-rg_filter(VALUE self)
-{
-    VALUE func = rb_block_proc();
-    G_RELATIVE(self, func);
-    return PANGOATTRLIST2RVAL(pango_attr_list_filter(_SELF(self), 
-                                             (PangoAttrFilterFunc)filter_func, 
-                                             (gpointer)func));
-}
-
-static VALUE
-rg_iterator(VALUE self)
-{
-    return PANGOATTRITERATOR2RVAL(pango_attr_list_get_iterator(_SELF(self)));
-}
-
-void
-Init_pango_attrlist(VALUE mPango)
-{
-    VALUE RG_TARGET_NAMESPACE = G_DEF_CLASS(PANGO_TYPE_ATTR_LIST, "AttrList", mPango);
-
-    id_call = rb_intern("call");
-
-    RG_DEF_METHOD(initialize, 0);
-    RG_DEF_METHOD(insert, 1);
-    RG_DEF_METHOD(insert_before, 1);
-    RG_DEF_METHOD(change, 1);
-    RG_DEF_METHOD(splice, 3);
-    RG_DEF_METHOD(filter, 0);
-    RG_DEF_METHOD(iterator, 0);
-
-}

data/ext/pango/rbpangocairo.c

@@ -1,122 +0,0 @@
-/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
-/*
- *  Copyright (C) 2006-2014  Ruby-GNOME2 Project Team
- *  Copyright (C) 2005  Kouhei Sutou
- *
- *  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 cCairoFontMap
-#define _SELF(self) (RVAL2PANGOCAIROFONTMAP(self))
-
-static VALUE
-rg_s_create(int argc, VALUE *argv, G_GNUC_UNUSED VALUE klass)
-{
-    VALUE rb_font_type;
-    PangoFontMap *font_map = NULL;
-
-    rb_scan_args(argc, argv, "01", &rb_font_type);
-    if (NIL_P(rb_font_type)) {
-        font_map = pango_cairo_font_map_new();
-    } else {
-#if PANGO_VERSION_CHECK(1, 18, 0)
-        cairo_font_type_t font_type = CAIRO_FONT_TYPE_USER;
-        if (rbgutil_key_equal(rb_font_type, "ft") ||
-            rbgutil_key_equal(rb_font_type, "freetype")) {
-            font_type = CAIRO_FONT_TYPE_FT;
-        } else if (rbgutil_key_equal(rb_font_type, "win32")) {
-            font_type = CAIRO_FONT_TYPE_WIN32;
-        } else if (rbgutil_key_equal(rb_font_type, "quartz")) {
-            font_type = CAIRO_FONT_TYPE_QUARTZ;
-        } else {
-            rb_raise(rb_eArgError,
-                     "font type must be one of "
-                     ":ft, :freetype, :win32 or :quartz: %s",
-                     RBG_INSPECT(rb_font_type));
-        }
-        font_map = pango_cairo_font_map_new_for_font_type(font_type);
-#else
-        rb_raise(rb_eArgError,
-                 "Pango::CairoFontMap.create with font type "
-                 "requires Pango 1.18.0 or later");
-#endif
-    }
-
-    return GOBJ2RVAL(font_map);
-}
-
-static VALUE
-rg_s_default(G_GNUC_UNUSED VALUE klass)
-{
-    return GOBJ2RVAL(pango_cairo_font_map_get_default());
-}
-
-#if PANGO_VERSION_CHECK(1, 22, 0)
-static VALUE
-rg_s_set_default(VALUE klass, VALUE font_map)
-{
-    pango_cairo_font_map_set_default(RVAL2GOBJ(font_map));
-    return klass;
-}
-#endif
-
-static VALUE
-rg_set_resolution(VALUE self, VALUE dpi)
-{
-    pango_cairo_font_map_set_resolution(_SELF(self), NUM2DBL(dpi));
-    return self;
-}
-
-static VALUE
-rg_resolution(VALUE self)
-{
-    return rb_float_new(pango_cairo_font_map_get_resolution(_SELF(self)));
-}
-
-static VALUE
-rg_create_context(VALUE self)
-{
-    PangoContext *pango_context;
-
-#if PANGO_VERSION_CHECK(1, 22, 0)
-    pango_context = pango_font_map_create_context(PANGO_FONT_MAP(_SELF(self)));
-#else
-    pango_context = pango_cairo_font_map_create_context(_SELF(self));
-#endif
-
-    return GOBJ2RVAL_UNREF(pango_context);
-}
-
-void
-Init_pango_cairo(VALUE mPango)
-{
-    VALUE RG_TARGET_NAMESPACE;
-
-    /* Pango::CairoFontMap */
-    RG_TARGET_NAMESPACE = G_DEF_CLASS(PANGO_TYPE_CAIRO_FONT_MAP, "CairoFontMap", mPango);
-
-    RG_DEF_SMETHOD(create, -1);
-    RG_DEF_SMETHOD(default, 0);
-#if PANGO_VERSION_CHECK(1, 22, 0)
-    RG_DEF_SMETHOD(set_default, 1);
-#endif
-
-    RG_DEF_METHOD(set_resolution, 1);
-    RG_DEF_METHOD(resolution, 0);
-    RG_DEF_METHOD(create_context, 0);
-}

data/ext/pango/rbpangocairocontext.c

@@ -1,131 +0,0 @@
-/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
-/*
- *  Copyright (C) 2006-2013  Ruby-GNOME2 Project Team
- *  Copyright (C) 2005  Kouhei Sutou
- *
- *  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 rb_cCairo_Context
-
-static VALUE
-rg_update_pango_context(VALUE self, VALUE context)
-{
-    pango_cairo_update_context(RVAL2CRCONTEXT(self), RVAL2PANGOCONTEXT(context));
-    return self;
-}
-
-/* Convenience */
-static VALUE
-rg_create_pango_layout(VALUE self)
-{
-    return GOBJ2RVAL_UNREF(pango_cairo_create_layout(RVAL2CRCONTEXT(self)));
-}
-
-static VALUE
-rg_update_pango_layout(VALUE self, VALUE layout)
-{
-    pango_cairo_update_layout(RVAL2CRCONTEXT(self), RVAL2PANGOLAYOUT(layout));
-    return self;
-}
-
-/* Rendering */
-static VALUE
-rg_show_pango_glyph_string(VALUE self, VALUE font, VALUE glyphs)
-{
-    pango_cairo_show_glyph_string(RVAL2CRCONTEXT(self),
-                                  RVAL2PANGOFONT(font),
-                                  RVAL2PANGOGLYPHSTRING(glyphs));
-    return self;
-}
-
-static VALUE
-rg_show_pango_layout_line(VALUE self, VALUE line)
-{
-    pango_cairo_show_layout_line(RVAL2CRCONTEXT(self), RVAL2PANGOLAYOUTLINE(line));
-    return self;
-}
-
-static VALUE
-rg_show_pango_layout(VALUE self, VALUE layout)
-{
-    pango_cairo_show_layout(RVAL2CRCONTEXT(self), RVAL2PANGOLAYOUT(layout));
-    return self;
-}
-
-static VALUE
-rg_show_pango_error_underline(VALUE self, VALUE x, VALUE y, VALUE width, VALUE height)
-{
-    pango_cairo_show_error_underline(RVAL2CRCONTEXT(self),
-                                     NUM2DBL(x), NUM2DBL(y),
-                                     NUM2DBL(width), NUM2DBL(height));
-    return self;
-}
-
-/* Rendering to a path */
-static VALUE
-rg_pango_glyph_string_path(VALUE self, VALUE font, VALUE glyphs)
-{
-    pango_cairo_glyph_string_path(RVAL2CRCONTEXT(self),
-                                  RVAL2PANGOFONT(font),
-                                  RVAL2PANGOGLYPHSTRING(glyphs));
-    return self;
-}
-
-static VALUE
-rg_pango_layout_line_path(VALUE self, VALUE line)
-{
-    pango_cairo_layout_line_path(RVAL2CRCONTEXT(self), RVAL2PANGOLAYOUTLINE(line));
-    return self;
-}
-
-static VALUE
-rg_pango_layout_path(VALUE self, VALUE layout)
-{
-    pango_cairo_layout_path(RVAL2CRCONTEXT(self), RVAL2PANGOLAYOUT(layout));
-    return self;
-}
-
-static VALUE
-rg_pango_error_underline_path(VALUE self, VALUE x, VALUE y, VALUE width, VALUE height)
-{
-    pango_cairo_error_underline_path(RVAL2CRCONTEXT(self),
-                                     NUM2DBL(x), NUM2DBL(y),
-                                     NUM2DBL(width), NUM2DBL(height));
-    return self;
-}
-
-void
-Init_pango_cairo_context(G_GNUC_UNUSED VALUE mPango)
-{
-    /* Cairo::Context */
-    RG_DEF_METHOD(update_pango_context, 1);
-    /* Convenience */
-    RG_DEF_METHOD(create_pango_layout, 0);
-    RG_DEF_METHOD(update_pango_layout, 1);
-    /* Rendering */
-    RG_DEF_METHOD(show_pango_glyph_string, 2);
-    RG_DEF_METHOD(show_pango_layout_line, 1);
-    RG_DEF_METHOD(show_pango_layout, 1);
-    RG_DEF_METHOD(show_pango_error_underline, 4);
-    /* Rendering to a path */
-    RG_DEF_METHOD(pango_glyph_string_path, 2);
-    RG_DEF_METHOD(pango_layout_line_path, 1);
-    RG_DEF_METHOD(pango_layout_path, 1);
-    RG_DEF_METHOD(pango_error_underline_path, 4);
-}