Add pdf2svg utility for manual testing (not used in test suite)

3 files changed, 107 insertions, 0 deletions

diff --git a/test/.gitignore b/test/.gitignore
index eb16e4f..3f3c582 100644
--- a/test/.gitignore
+++ b/test/.gitignore
@@ -52,6 +52,7 @@ paint-with-alpha
 path-data
 pattern-get-type
 pdf2png
+pdf2svg
 pdf-features
 pdf-features.pdf
 png-flatten
diff --git a/test/Makefile.am b/test/Makefile.am
index 4c17064..1a4a15c 100644
--- a/test/Makefile.am
+++ b/test/Makefile.am
@@ -325,6 +325,11 @@ if CAIRO_CAN_TEST_SVG_SURFACE
 noinst_PROGRAMS += svg2png
 svg2png_CFLAGS = $(LIBRSVG_CFLAGS)
 svg2png_LDADD = $(LIBRSVG_LIBS)
+if CAIRO_CAN_TEST_PDF_SURFACE
+noinst_PROGRAMS += pdf2svg
+pdf2svg_CFLAGS = $(POPPLER_CFLAGS)
+pdf2svg_LDADD = $(LDADD) $(POPPLER_LIBS)
+endif
 endif
 
 CLEANFILES =					\
diff --git a/test/pdf2svg.c b/test/pdf2svg.c
new file mode 100644
index 0000000..7aa057e
--- a/dev/null
+++ b/test/pdf2svg.c
@@ -0,0 +1,101 @@
+/*
+ * Copyright © 2005 Red Hat, Inc.
+ * Copyright © 2006 Red Hat, Inc.
+ *
+ * Permission to use, copy, modify, distribute, and sell this software
+ * and its documentation for any purpose is hereby granted without
+ * fee, provided that the above copyright notice appear in all copies
+ * and that both that copyright notice and this permission notice
+ * appear in supporting documentation, and that the name of
+ * Red Hat, Inc. not be used in advertising or publicity pertaining to
+ * distribution of the software without specific, written prior
+ * permission. Red Hat, Inc. makes no representations about the
+ * suitability of this software for any purpose.  It is provided "as
+ * is" without express or implied warranty.
+ *
+ * RED HAT, INC. DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS
+ * SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND
+ * FITNESS, IN NO EVENT SHALL RED HAT, INC. BE LIABLE FOR ANY SPECIAL,
+ * INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER
+ * RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION
+ * OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR
+ * IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
+ *
+ * Authors: Kristian Høgsberg <krh@redhat.com>
+ *	    Carl Worth <cworth@redhat.com>
+ */
+
+#include <stdlib.h>
+#include <poppler.h>
+
+#include <cairo-svg.h>
+
+#define FAIL(msg)							\
+    do { fprintf (stderr, "FAIL: %s\n", msg); exit (-1); } while (0)
+
+#define PIXELS_PER_POINT 1
+
+int main (int argc, char *argv[])
+{
+    PopplerDocument *document;
+    PopplerPage *page;
+    double width, height;
+    GError *error;
+    const char *filename = argv[1];
+    const char *output_filename = argv[2];
+    const char *page_label = argv[3];
+    gchar *absolute, *uri;
+    cairo_surface_t *surface;
+    cairo_t *cr;
+    cairo_status_t status;
+
+    if (argc != 4)
+	FAIL ("usage: pdf2svg input_file.pdf output_file.svg page");
+
+    g_type_init ();
+
+    error = NULL;
+
+    if (g_path_is_absolute(filename)) {
+	absolute = g_strdup (filename);
+    } else {
+	gchar *dir = g_get_current_dir ();
+	absolute = g_build_filename (dir, filename, (gchar *) 0);
+	free (dir);
+    }
+
+    uri = g_filename_to_uri (absolute, NULL, &error);
+    free (absolute);
+    if (uri == NULL)
+	FAIL (error->message);
+
+    document = poppler_document_new_from_file (uri, NULL, &error);
+    if (document == NULL)
+	FAIL (error->message);
+
+    page = poppler_document_get_page_by_label (document, page_label);
+    if (page == NULL)
+	FAIL ("page not found");
+
+    poppler_page_get_size (page, &width, &height);
+
+    surface = cairo_svg_surface_create (output_filename, width, height);
+    cr = cairo_create (surface);
+
+    /* Clear background */
+    cairo_set_source_rgb (cr, 1.0, 1.0, 1.0); /* white */
+    cairo_paint (cr);
+
+    poppler_page_render (page, cr);
+
+    cairo_show_page (cr);
+
+    status = cairo_status (cr);
+    if (status)
+	FAIL (cairo_status_to_string (status));
+
+    cairo_destroy (cr);
+    cairo_surface_destroy (surface);
+
+    return 0;
+}