poppler 1.0.3 → 1.1.0

data/ext/poppler/rbpoppler-buttonfield.c

@@ -0,0 +1,58 @@
+/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
+/*
+ *  Copyright (C) 2011  Ruby-GNOME2 Project Team
+ *  Copyright (C) 2008  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 "rbpoppler-private.h"
+
+#define RG_TARGET_NAMESPACE cButtonField
+#define _SELF(obj) RVAL2POPPLERFORMFIELD(obj)
+
+static VALUE RG_TARGET_NAMESPACE;
+
+static VALUE
+rg_type(VALUE self)
+{
+    return POPPLERFORMBUTTONTYPE2RVAL(poppler_form_field_button_get_button_type(_SELF(self)));
+}
+
+static VALUE
+rg_active_p(VALUE self)
+{
+    return CBOOL2RVAL(poppler_form_field_button_get_state(_SELF(self)));
+}
+
+static VALUE
+rg_set_active(VALUE self, VALUE state)
+{
+    poppler_form_field_button_set_state(_SELF(self), RVAL2CBOOL(state));
+    return Qnil;
+}
+
+void
+Init_poppler_button_field(VALUE mPoppler, VALUE cFormField)
+{
+    RG_TARGET_NAMESPACE = rb_define_class_under(mPoppler, "ButtonField", cFormField);
+
+    RG_DEF_METHOD(type, 0);
+    RG_DEF_METHOD_P(active, 0);
+    RG_DEF_METHOD(set_active, 1);
+
+    G_DEF_SETTERS(RG_TARGET_NAMESPACE);
+}

data/ext/poppler/rbpoppler-choicefield.c

@@ -0,0 +1,133 @@
+/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
+/*
+ *  Copyright (C) 2011  Ruby-GNOME2 Project Team
+ *  Copyright (C) 2008  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 "rbpoppler-private.h"
+
+#define RG_TARGET_NAMESPACE cChoiceField
+#define _SELF(obj) RVAL2POPPLERFORMFIELD(obj)
+
+static VALUE RG_TARGET_NAMESPACE;
+
+static VALUE
+rg_type(VALUE self)
+{
+    return POPPLERFORMCHOICETYPE2RVAL(poppler_form_field_choice_get_choice_type(_SELF(self)));
+}
+
+static VALUE
+rg_editable_p(VALUE self)
+{
+    return CBOOL2RVAL(poppler_form_field_choice_is_editable(_SELF(self)));
+}
+
+static VALUE
+rg_select_multiple_p(VALUE self)
+{
+    return CBOOL2RVAL(poppler_form_field_choice_can_select_multiple(_SELF(self)));
+}
+
+static VALUE
+rg_spell_check_p(VALUE self)
+{
+    return CBOOL2RVAL(poppler_form_field_choice_do_spell_check(_SELF(self)));
+}
+
+static VALUE
+rg_commit_on_change_p(VALUE self)
+{
+    return CBOOL2RVAL(poppler_form_field_choice_commit_on_change(_SELF(self)));
+}
+
+static VALUE
+rg_n_items(VALUE self)
+{
+    return INT2NUM(poppler_form_field_choice_get_n_items(_SELF(self)));
+}
+
+static VALUE
+rg_operator_choice_field_get_item(VALUE self, VALUE index)
+{
+    return CSTR2RVAL(poppler_form_field_choice_get_item(_SELF(self),
+                                                        NUM2INT(index)));
+}
+
+static VALUE
+rg_selected_p(VALUE self, VALUE index)
+{
+    return CBOOL2RVAL(poppler_form_field_choice_is_item_selected(_SELF(self),
+                                                                 NUM2INT(index)));
+}
+
+static VALUE
+rg_select(VALUE self, VALUE index)
+{
+    poppler_form_field_choice_select_item(_SELF(self), NUM2INT(index));
+    return Qnil;
+}
+
+static VALUE
+rg_unselect_all(VALUE self)
+{
+    poppler_form_field_choice_unselect_all(_SELF(self));
+    return Qnil;
+}
+
+static VALUE
+rg_toggle(VALUE self, VALUE index)
+{
+    poppler_form_field_choice_toggle_item(_SELF(self), NUM2INT(index));
+    return Qnil;
+}
+
+static VALUE
+rg_set_text(VALUE self, VALUE text)
+{
+    poppler_form_field_choice_set_text(_SELF(self), RVAL2CSTR_ACCEPT_NIL(text));
+    return Qnil;
+}
+
+static VALUE
+rg_text(VALUE self)
+{
+    return CSTR2RVAL(poppler_form_field_choice_get_text(_SELF(self)));
+}
+
+void
+Init_poppler_choice_field(VALUE mPoppler, VALUE cFormField)
+{
+    RG_TARGET_NAMESPACE = rb_define_class_under(mPoppler, "ChoiceField", cFormField);
+
+    RG_DEF_METHOD(type, 0);
+    RG_DEF_METHOD_P(editable, 0);
+    RG_DEF_METHOD_P(select_multiple, 0);
+    RG_DEF_METHOD_P(spell_check, 0);
+    RG_DEF_METHOD_P(commit_on_change, 0);
+    RG_DEF_METHOD(n_items, 0);
+    RG_DEF_METHOD_OPERATOR("[]", choice_field_get_item, 1);
+    RG_DEF_METHOD_P(selected, 1);
+    RG_DEF_METHOD(select, 1);
+    RG_DEF_METHOD(unselect_all, 0);
+    RG_DEF_METHOD(toggle, 1);
+    RG_DEF_METHOD(text, 0);
+    RG_DEF_METHOD(set_text, 1);
+
+    G_DEF_SETTERS(RG_TARGET_NAMESPACE);
+}

data/ext/poppler/rbpoppler-color.c

@@ -0,0 +1,122 @@
+/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
+/*
+ *  Copyright (C) 2011  Ruby-GNOME2 Project Team
+ *  Copyright (C) 2006-2008 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 "rbpoppler-private.h"
+
+#define RG_TARGET_NAMESPACE rb_cPopplerColor
+
+#ifdef POPPLER_TYPE_COLOR
+VALUE RG_TARGET_NAMESPACE;
+
+PopplerColor *
+rb_poppler_ruby_object_to_color(VALUE color)
+{
+#ifdef POPPLER_WITH_GDK
+    if (RTEST(rb_obj_is_kind_of(color, rb_cGdkColor))) {
+        GdkColor *gdk_color;
+
+        gdk_color = RVAL2GDKCOLOR(color);
+        color = rb_funcall(RG_TARGET_NAMESPACE, rb_intern("new"),
+                           3,
+                           UINT2NUM(gdk_color->red),
+                           UINT2NUM(gdk_color->green),
+                           UINT2NUM(gdk_color->blue));
+    }
+#endif
+
+    return RVAL2BOXED(color, POPPLER_TYPE_COLOR);
+}
+
+VALUE
+rb_poppler_ruby_object_from_color_with_free(PopplerColor *color)
+{
+    VALUE rb_color;
+
+    rb_color = POPPLERCOLOR2RVAL(color);
+    g_free(color);
+    return rb_color;
+}
+
+static VALUE
+rg_initialize(VALUE self, VALUE red, VALUE green, VALUE blue)
+{
+    PopplerColor color;
+
+    color.red = NUM2UINT(red);
+    color.green = NUM2UINT(green);
+    color.blue = NUM2UINT(blue);
+
+    G_INITIALIZE(self, &color);
+    return Qnil;
+}
+
+DEF_ACCESSOR(color, red, RVAL2POPPLERCOLOR, UINT2NUM, NUM2UINT)
+DEF_ACCESSOR(color, green, RVAL2POPPLERCOLOR, UINT2NUM, NUM2UINT)
+DEF_ACCESSOR(color, blue, RVAL2POPPLERCOLOR, UINT2NUM, NUM2UINT)
+
+static VALUE
+rg_to_a(VALUE self)
+{
+    PopplerColor *color;
+    color = RVAL2POPPLERCOLOR(self);
+    return rb_ary_new3(3,
+                       UINT2NUM(color->red),
+                       UINT2NUM(color->green),
+                       UINT2NUM(color->blue));
+}
+
+static VALUE
+rg_inspect(VALUE self)
+{
+    VALUE inspected;
+    gchar *rgb;
+    PopplerColor *color;
+
+    color = RVAL2POPPLERCOLOR(self);
+    inspected = rb_call_super(0, NULL);
+    rb_str_resize(inspected, RSTRING_LEN(inspected) - 1);
+    rgb = g_strdup_printf(": [%u, %u, %u]>",
+                          color->red, color->green, color->blue);
+    rb_str_cat2(inspected, rgb);
+    g_free(rgb);
+    return inspected;
+}
+#endif
+
+void
+Init_poppler_color(VALUE mPoppler)
+{
+#ifdef POPPLER_TYPE_COLOR
+    RG_TARGET_NAMESPACE = G_DEF_CLASS(POPPLER_TYPE_COLOR, "Color", mPoppler);
+
+    RG_DEF_METHOD(initialize, 3);
+    rb_define_method(RG_TARGET_NAMESPACE, "red", color_get_red, 0);
+    rb_define_method(RG_TARGET_NAMESPACE, "green", color_get_green, 0);
+    rb_define_method(RG_TARGET_NAMESPACE, "blue", color_get_blue, 0);
+    rb_define_method(RG_TARGET_NAMESPACE, "set_red", color_set_red, 1);
+    rb_define_method(RG_TARGET_NAMESPACE, "set_green", color_set_green, 1);
+    rb_define_method(RG_TARGET_NAMESPACE, "set_blue", color_set_blue, 1);
+    RG_DEF_METHOD(to_a, 0);
+    RG_DEF_METHOD(inspect, 0);
+
+    G_DEF_SETTERS(RG_TARGET_NAMESPACE);
+#endif
+}

data/ext/poppler/rbpoppler-document.c

@@ -1,31 +1,34 @@
 /* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
-/**********************************************************************
-
-  rbpoppler-document.c -
-
-  $Author: ktou $
-  $Date: 2007/10/13 05:56:39 $
-
-  Copyright (C) 2006 Ruby-GNOME2 Project Team
-
-**********************************************************************/
-
-#include "rbpoppler.h"
-
-#define RVAL2DOC(obj) (POPPLER_DOCUMENT(RVAL2GOBJ(obj)))
-
-#define IITER2RVAL(obj) (BOXED2RVAL(obj, POPPLER_TYPE_INDEX_ITER))
-#define RVAL2IITER(obj) (RVAL2BOXED(obj, POPPLER_TYPE_INDEX_ITER))
-#define FITER2RVAL(obj) (BOXED2RVAL(obj, POPPLER_TYPE_FONTS_ITER))
-#define RVAL2FITER(obj) (RVAL2BOXED(obj, POPPLER_TYPE_FONTS_ITER))
-
-static ID id_new, id_valid, id_pdf_data_p, id_ensure_uri;
+/*
+ *  Copyright (C) 2011  Ruby-GNOME2 Project Team
+ *  Copyright (C) 2006  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 "rbpoppler-private.h"
+
+#define RG_TARGET_NAMESPACE cDocument
+
+static ID id_new, id_pdf_data_p, id_ensure_uri;
 static VALUE cIndexIter;
 static VALUE cFontInfo;
 
-
 static VALUE
-doc_initialize(int argc, VALUE *argv, VALUE self)
+rg_initialize(int argc, VALUE *argv, VALUE self)
 {
     PopplerDocument *document = NULL;
     GError *error = NULL;
@@ -34,7 +37,7 @@ doc_initialize(int argc, VALUE *argv, VALUE self)
 
     rb_scan_args(argc, argv, "11", &uri_or_data, &rb_password);
 
-    password = NIL_P(rb_password) ? NULL : RVAL2CSTR(rb_password);
+    password = RVAL2CSTR_ACCEPT_NIL(rb_password);
 
     if (RVAL2CBOOL(rb_funcall(self, id_pdf_data_p, 1, uri_or_data))) {
         document = poppler_document_new_from_data(RSTRING_PTR(uri_or_data),
@@ -56,13 +59,13 @@ doc_initialize(int argc, VALUE *argv, VALUE self)
 }
 
 static VALUE
-doc_save(VALUE self, VALUE uri)
+rg_save(VALUE self, VALUE uri)
 {
     gboolean result;
     GError *error = NULL;
 
     uri = rb_funcall(self, id_ensure_uri, 1, uri);
-    result = poppler_document_save(RVAL2DOC(self), RVAL2CSTR(uri), &error);
+    result = poppler_document_save(RVAL2POPPLERDOCUMENT(self), RVAL2CSTR(uri), &error);
 
     if (error)
         RAISE_GERROR(error);
@@ -71,14 +74,14 @@ doc_save(VALUE self, VALUE uri)
 }
 
 static VALUE
-doc_save_a_copy(VALUE self, VALUE uri)
+rg_save_a_copy(VALUE self, VALUE uri)
 {
     gboolean result;
     GError *error = NULL;
 
     uri = rb_funcall(self, id_ensure_uri, 1, uri);
-    result = poppler_document_save_a_copy(RVAL2DOC(self), RVAL2CSTR(uri),
-					  &error);
+    result = poppler_document_save_a_copy(RVAL2POPPLERDOCUMENT(self), RVAL2CSTR(uri),
+                      &error);
 
     if (error)
         RAISE_GERROR(error);
@@ -87,22 +90,22 @@ doc_save_a_copy(VALUE self, VALUE uri)
 }
 
 static VALUE
-doc_get_n_pages(VALUE self)
+rg_n_pages(VALUE self)
 {
-    return INT2NUM(poppler_document_get_n_pages(RVAL2DOC(self)));
+    return INT2NUM(poppler_document_get_n_pages(RVAL2POPPLERDOCUMENT(self)));
 }
 
 static VALUE
-doc_get_page(VALUE self, VALUE index_or_label)
+rg_get_page(VALUE self, VALUE index_or_label)
 {
     VALUE rb_page;
     PopplerPage *page;
 
     if (RVAL2CBOOL(rb_obj_is_kind_of(index_or_label, rb_cInteger))) {
-        page = poppler_document_get_page(RVAL2DOC(self),
+        page = poppler_document_get_page(RVAL2POPPLERDOCUMENT(self),
                                          NUM2INT(index_or_label));
     } else if (RVAL2CBOOL(rb_obj_is_kind_of(index_or_label, rb_cString))) {
-        page = poppler_document_get_page_by_label(RVAL2DOC(self),
+        page = poppler_document_get_page_by_label(RVAL2POPPLERDOCUMENT(self),
                                                   RVAL2CSTR(index_or_label));
     } else {
         VALUE inspect;
@@ -118,38 +121,39 @@ doc_get_page(VALUE self, VALUE index_or_label)
 }
 
 static VALUE
-doc_has_attachments(VALUE self)
+rg_has_attachments_p(VALUE self)
 {
-    return CBOOL2RVAL(poppler_document_has_attachments(RVAL2DOC(self)));
+    return CBOOL2RVAL(poppler_document_has_attachments(RVAL2POPPLERDOCUMENT(self)));
 }
 
 static VALUE
-doc_get_attachments(VALUE self)
+rg_attachments(VALUE self)
 {
-    return GLIST2ARYF(poppler_document_get_attachments(RVAL2DOC(self)));
+    return GLIST2ARYF(poppler_document_get_attachments(RVAL2POPPLERDOCUMENT(self)));
 }
 
 static VALUE
-doc_find_dest(VALUE self, VALUE link_name)
+rg_find_dest(VALUE self, VALUE link_name)
 {
-    return GOBJ2RVAL(poppler_document_find_dest(RVAL2DOC(self),
-                                                RVAL2CSTR(link_name)));
+    PopplerDest *dest;
+    dest = poppler_document_find_dest(RVAL2POPPLERDOCUMENT(self), RVAL2CSTR(link_name));
+    return POPPLERDEST2RVAL(dest);
 }
 
 static VALUE
-doc_get_form_field(VALUE self, VALUE id)
+rg_get_form_field(VALUE self, VALUE id)
 {
-    return GOBJ2RVAL(poppler_document_get_form_field(RVAL2DOC(self),
+    return GOBJ2RVAL(poppler_document_get_form_field(RVAL2POPPLERDOCUMENT(self),
                                                      NUM2INT(id)));
 }
 
 static VALUE
-doc_each(VALUE self)
+rg_each(VALUE self)
 {
     PopplerDocument *document;
     int i, n_pages;
 
-    document = RVAL2DOC(self);
+    document = RVAL2POPPLERDOCUMENT(self);
     n_pages = poppler_document_get_n_pages(document);
     for (i = 0; i < n_pages; i++) {
         PopplerPage *page;
@@ -165,251 +169,29 @@ doc_each(VALUE self)
 }
 
 static VALUE
-doc_get_index_iter(VALUE self)
+rg_index_iter(VALUE self)
 {
     return rb_funcall(cIndexIter, id_new, 1, self);
 }
 
 static VALUE
-doc_get_font_info(VALUE self)
+rg_font_info(VALUE self)
 {
     return rb_funcall(cFontInfo, id_new, 1, self);
 }
 
-
-
-/* Interface for getting the Index of a poppler_document */
-#define CHECK_IITER_IS_VALID(iter) do {         \
-    if (!RVAL2CBOOL(index_iter_valid_p(iter)))       \
-        return Qnil;                            \
-} while (0)
-
-static VALUE
-index_iter_valid_p(VALUE self)
-{
-    return rb_ivar_get(self, id_valid);
-}
-
-static VALUE
-index_iter_initialize(VALUE self, VALUE document)
-{
-    PopplerIndexIter *iter;
-    iter = poppler_index_iter_new(RVAL2GOBJ(document));
-    G_INITIALIZE(self, iter);
-    poppler_index_iter_free(iter);
-    rb_ivar_set(self, id_valid, CBOOL2RVAL(iter));
-    return Qnil;
-}
-
-static VALUE
-index_iter_get_child(VALUE self)
-{
-    PopplerIndexIter *child;
-    VALUE rb_child;
-
-    CHECK_IITER_IS_VALID(self);
-    child = poppler_index_iter_get_child(RVAL2IITER(self));
-    rb_child = IITER2RVAL(child);
-    poppler_index_iter_free(child);
-    return rb_child;
-}
-
-static VALUE
-index_iter_is_open(VALUE self)
-{
-    CHECK_IITER_IS_VALID(self);
-    return CBOOL2RVAL(poppler_index_iter_is_open(RVAL2IITER(self)));
-}
-
-#ifndef HAVE_TYPE_POPPLERACTIONANY
-static VALUE
-index_iter_get_action(VALUE self)
-{
-    CHECK_IITER_IS_VALID(self);
-    return POPPLER_ACTION2RVAL(poppler_index_iter_get_action(RVAL2IITER(self)));
-}
-#endif
-
-static VALUE
-index_iter_next(VALUE self)
-{
-    if (poppler_index_iter_next(RVAL2IITER(self))) {
-        return Qtrue;
-    } else {
-        rb_ivar_set(self, id_valid, Qfalse);
-        return Qfalse;
-    }
-}
-
-static VALUE
-index_iter_each(VALUE self)
-{
-    PopplerIndexIter *iter;
-
-    CHECK_IITER_IS_VALID(self);
-    iter = RVAL2IITER(self);
-    do {
-        rb_yield(self);
-    } while (poppler_index_iter_next(iter));
-    rb_ivar_set(self, id_valid, Qfalse);
-
-    return self;
-}
-
-
-#if POPPLER_CHECK_VERSION(0, 6, 0)
-
-static VALUE
-font_info_initialize(VALUE self, VALUE document)
-{
-    G_INITIALIZE(self, poppler_font_info_new(RVAL2GOBJ(document)));
-    return Qnil;
-}
-
-static VALUE
-font_info_scan(VALUE self, VALUE n_pages)
-{
-    VALUE rb_iter = Qnil;
-    PopplerFontsIter *iter;
-
-    if (poppler_font_info_scan(RVAL2GOBJ(self), NUM2INT(n_pages), &iter)) {
-        rb_iter = FITER2RVAL(iter);
-        rb_ivar_set(rb_iter, id_valid, Qtrue);
-        poppler_fonts_iter_free(iter);
-    }
-    return rb_iter;
-}
-#endif
-
-
-#define CHECK_FITER_IS_VALID(iter) do {         \
-    if (!RVAL2CBOOL(fonts_iter_valid_p(iter)))       \
-        return Qnil;                            \
-} while (0)
-
-static VALUE
-fonts_iter_valid_p(VALUE self)
-{
-    return rb_ivar_get(self, id_valid);
-}
-
-static VALUE
-fonts_iter_get_name(VALUE self)
-{
-    CHECK_FITER_IS_VALID(self);
-    return CSTR2RVAL(poppler_fonts_iter_get_name(RVAL2FITER(self)));
-}
-
-static VALUE
-fonts_iter_get_full_name(VALUE self)
-{
-    CHECK_FITER_IS_VALID(self);
-    return CSTR2RVAL(poppler_fonts_iter_get_full_name(RVAL2FITER(self)));
-}
-
-static VALUE
-fonts_iter_get_file_name(VALUE self)
-{
-    CHECK_FITER_IS_VALID(self);
-    return CSTR2RVAL(poppler_fonts_iter_get_file_name(RVAL2FITER(self)));
-}
-
-static VALUE
-fonts_iter_get_font_type(VALUE self)
-{
-    CHECK_FITER_IS_VALID(self);
-    return GENUM2RVAL(poppler_fonts_iter_get_font_type(RVAL2FITER(self)),
-                      POPPLER_TYPE_FONT_TYPE);
-}
-
-static VALUE
-fonts_iter_is_embedded(VALUE self)
-{
-    CHECK_FITER_IS_VALID(self);
-    return CBOOL2RVAL(poppler_fonts_iter_is_embedded(RVAL2FITER(self)));
-}
-
-static VALUE
-fonts_iter_is_subset(VALUE self)
-{
-    CHECK_FITER_IS_VALID(self);
-    return CBOOL2RVAL(poppler_fonts_iter_is_subset(RVAL2FITER(self)));
-}
-
-static VALUE
-fonts_iter_next(VALUE self)
-{
-    if (poppler_fonts_iter_next(RVAL2FITER(self))) {
-        return Qtrue;
-    } else {
-        rb_ivar_set(self, id_valid, Qfalse);
-        return Qfalse;
-    }
-}
-
-static VALUE
-fonts_iter_each(VALUE self)
-{
-    PopplerFontsIter *iter;
-
-    CHECK_FITER_IS_VALID(self);
-    iter = RVAL2FITER(self);
-    do {
-        rb_yield(self);
-    } while (poppler_fonts_iter_next(iter));
-    rb_ivar_set(self, id_valid, Qfalse);
-
-    return self;
-}
-
-
-/* Export to ps */
-static VALUE
-ps_file_initialize(VALUE self, VALUE document, VALUE filename,
-                   VALUE first_page, VALUE n_pages)
-{
-    PopplerPSFile *ps_file;
-
-    ps_file = poppler_ps_file_new(RVAL2GOBJ(document), RVAL2CSTR(filename),
-                                  NUM2INT(first_page), NUM2INT(n_pages));
-
-    if (!ps_file)
-        rb_raise(rb_eRuntimeError, "can't create Poppler::PSFile");
-
-    G_INITIALIZE(self, ps_file);
-    return Qnil;
-}
-
-static VALUE
-ps_file_set_paper_size(VALUE self, VALUE width, VALUE height)
-{
-    poppler_ps_file_set_paper_size(RVAL2GOBJ(self),
-                                   NUM2DBL(width), NUM2DBL(height));
-    return Qnil;
-}
-
-static VALUE
-ps_file_set_duplex(VALUE self, VALUE duplex)
-{
-    poppler_ps_file_set_duplex(RVAL2GOBJ(self), RVAL2CBOOL(duplex));
-    return Qnil;
-}
-
 void
 Init_poppler_document(VALUE mPoppler)
 {
-    VALUE cDocument, cFontsIter, cPSFile;
+    VALUE RG_TARGET_NAMESPACE;
+    cIndexIter = rb_const_get(mPoppler, rb_intern("IndexIter"));
+    cFontInfo = rb_const_get(mPoppler, rb_intern("FontInfo"));
 
     id_new = rb_intern("new");
-    id_valid = rb_intern("valid?");
     id_pdf_data_p = rb_intern("pdf_data?");
     id_ensure_uri = rb_intern("ensure_uri");
 
-    cDocument = G_DEF_CLASS(POPPLER_TYPE_DOCUMENT, "Document", mPoppler);
-    cIndexIter = G_DEF_CLASS(POPPLER_TYPE_INDEX_ITER, "IndexIter", mPoppler);
-    cFontInfo = G_DEF_CLASS(POPPLER_TYPE_FONT_INFO, "FontInfo", mPoppler);
-    cFontsIter = G_DEF_CLASS(POPPLER_TYPE_FONTS_ITER, "FontsIter", mPoppler);
-    cPSFile = G_DEF_CLASS(POPPLER_TYPE_PS_FILE, "PSFile", mPoppler);
+    RG_TARGET_NAMESPACE = G_DEF_CLASS(POPPLER_TYPE_DOCUMENT, "Document", mPoppler);
 
     G_DEF_CLASS(POPPLER_TYPE_PAGE_LAYOUT, "PageLayout", mPoppler);
     G_DEF_CLASS(POPPLER_TYPE_PAGE_MODE, "PageMode", mPoppler);
@@ -417,76 +199,28 @@ Init_poppler_document(VALUE mPoppler)
     G_DEF_CLASS(POPPLER_TYPE_VIEWER_PREFERENCES, "ViewerPreferences", mPoppler);
     G_DEF_CLASS(POPPLER_TYPE_PERMISSIONS, "Permissions", mPoppler);
 
-    rb_include_module(cDocument, rb_mEnumerable);
-
-    rb_define_method(cDocument, "initialize", doc_initialize, -1);
-    rb_define_method(cDocument, "save", doc_save, 1);
-    rb_define_method(cDocument, "save_a_copy", doc_save_a_copy, 1);
-    rb_define_method(cDocument, "n_pages", doc_get_n_pages, 0);
-    rb_define_alias(cDocument, "size", "n_pages");
-    rb_define_method(cDocument, "get_page", doc_get_page, 1);
-    rb_define_alias(cDocument, "[]", "get_page");
-    rb_define_method(cDocument, "has_attachments?", doc_has_attachments, 0);
-    rb_define_alias(cDocument, "have_attachments?", "has_attachments?");
-    rb_define_method(cDocument, "attachments", doc_get_attachments, 0);
-    rb_define_method(cDocument, "find_dest", doc_find_dest, 1);
-    rb_define_alias(cDocument, "get_destination", "find_dest");
-
-    rb_define_method(cDocument, "get_form_field", doc_get_form_field, 1);
-
-    rb_define_method(cDocument, "each", doc_each, 0);
-    rb_define_alias(cDocument, "pages", "to_a");
-
-    rb_define_method(cDocument, "index_iter", doc_get_index_iter, 0);
-    rb_define_method(cDocument, "font_info", doc_get_font_info, 0);
-
-    G_DEF_SETTERS(cDocument);
-
-
-/* Interface for getting the Index of a poppler_document */
-    rb_include_module(cIndexIter, rb_mEnumerable);
-
-    rb_define_method(cIndexIter, "initialize", index_iter_initialize, 1);
-    rb_define_method(cIndexIter, "child", index_iter_get_child, 0);
-    rb_define_method(cIndexIter, "open?", index_iter_is_open, 0);
-#ifndef HAVE_TYPE_POPPLERACTIONANY
-    rb_define_method(cIndexIter, "action", index_iter_get_action, 0);
-#endif
-    rb_define_method(cIndexIter, "next", index_iter_next, 0);
-
-    rb_define_method(cIndexIter, "valid?", index_iter_valid_p, 0);
-    rb_define_method(cIndexIter, "each", index_iter_each, 0);
-
-    G_DEF_SETTERS(cIndexIter);
-
-
-#if POPPLER_CHECK_VERSION(0, 6, 0)
-    rb_define_method(cFontInfo, "initialize", font_info_initialize, 1);
-    rb_define_method(cFontInfo, "scan", font_info_scan, 1);
-    G_DEF_SETTERS(cFontInfo);
-#endif
-
-    rb_include_module(cFontsIter, rb_mEnumerable);
+    rb_include_module(RG_TARGET_NAMESPACE, rb_mEnumerable);
 
-    rb_define_method(cFontsIter, "name", fonts_iter_get_name, 0);
-    rb_define_method(cFontsIter, "full_name", fonts_iter_get_full_name, 0);
-#if POPPLER_CHECK_VERSION(0, 6, 0)
-    rb_define_method(cFontsIter, "file_name", fonts_iter_get_file_name, 0);
-#endif
-    rb_define_method(cFontsIter, "font_type", fonts_iter_get_font_type, 0);
-    rb_define_method(cFontsIter, "embedded?", fonts_iter_is_embedded, 0);
-    rb_define_method(cFontsIter, "subset?", fonts_iter_is_subset, 0);
-    rb_define_method(cFontsIter, "next", fonts_iter_next, 0);
+    RG_DEF_METHOD(initialize, -1);
+    RG_DEF_METHOD(save, 1);
+    RG_DEF_METHOD(save_a_copy, 1);
+    RG_DEF_METHOD(n_pages, 0);
+    RG_DEF_ALIAS("size", "n_pages");
+    RG_DEF_METHOD(get_page, 1);
+    RG_DEF_ALIAS("[]", "get_page");
+    RG_DEF_METHOD_P(has_attachments, 0);
+    RG_DEF_ALIAS("have_attachments?", "has_attachments?");
+    RG_DEF_METHOD(attachments, 0);
+    RG_DEF_METHOD(find_dest, 1);
+    RG_DEF_ALIAS("get_destination", "find_dest");
 
-    rb_define_method(cFontsIter, "valid?", fonts_iter_valid_p, 0);
-    rb_define_method(cFontsIter, "each", fonts_iter_each, 0);
+    RG_DEF_METHOD(get_form_field, 1);
 
-    G_DEF_SETTERS(cFontsIter);
+    RG_DEF_METHOD(each, 0);
+    RG_DEF_ALIAS("pages", "to_a");
 
-/* Export to ps */
-    rb_define_method(cPSFile, "initialize", ps_file_initialize, 4);
-    rb_define_method(cPSFile, "set_paper_size", ps_file_set_paper_size, 2);
-    rb_define_method(cPSFile, "set_duplex", ps_file_set_duplex, 1);
+    RG_DEF_METHOD(index_iter, 0);
+    RG_DEF_METHOD(font_info, 0);
 
-    G_DEF_SETTERS(cPSFile);
+    G_DEF_SETTERS(RG_TARGET_NAMESPACE);
 }