1 files changed, 281 insertions, 0 deletions
diff --git a/xps/xpspage.c b/xps/xpspage.c
new file mode 100644
index 00000000..c6424d7c
--- /dev/null
+++ b/xps/xpspage.c
@@ -0,0 +1,281 @@
+/* Copyright (C) 2006-2010 Artifex Software, Inc.
+   All Rights Reserved.
+
+   This software is provided AS-IS with no warranty, either express or
+   implied.
+
+   This software is distributed under license and may not be copied, modified
+   or distributed except as expressly authorized under the terms of that
+   license.  Refer to licensing information at http://www.artifex.com/
+   or contact Artifex Software, Inc.,  7 Mt. Lassen  Drive - Suite A-134,
+   San Rafael, CA  94903, U.S.A., +1(415)492-9861, for further information.
+*/
+
+/* XPS interpreter - page parsing */
+
+#include "ghostxps.h"
+
+int
+xps_parse_canvas(xps_context_t *ctx, char *base_uri, xps_resource_t *dict, xps_item_t *root)
+{
+	xps_resource_t *new_dict = NULL;
+	xps_item_t *node;
+	char *opacity_mask_uri;
+	int code;
+
+	char *transform_att;
+	char *clip_att;
+	char *opacity_att;
+	char *opacity_mask_att;
+
+	xps_item_t *transform_tag = NULL;
+	xps_item_t *clip_tag = NULL;
+	xps_item_t *opacity_mask_tag = NULL;
+
+	gs_matrix transform;
+
+	transform_att = xps_att(root, "RenderTransform");
+	clip_att = xps_att(root, "Clip");
+	opacity_att = xps_att(root, "Opacity");
+	opacity_mask_att = xps_att(root, "OpacityMask");
+
+	for (node = xps_down(root); node; node = xps_next(node))
+	{
+		if (!strcmp(xps_tag(node), "Canvas.Resources") && xps_down(node))
+		{
+			code = xps_parse_resource_dictionary(ctx, &new_dict, base_uri, xps_down(node));
+			if (code)
+				return gs_rethrow(code, "cannot load Canvas.Resources");
+			new_dict->parent = dict;
+			dict = new_dict;
+		}
+
+		if (!strcmp(xps_tag(node), "Canvas.RenderTransform"))
+			transform_tag = xps_down(node);
+		if (!strcmp(xps_tag(node), "Canvas.Clip"))
+			clip_tag = xps_down(node);
+		if (!strcmp(xps_tag(node), "Canvas.OpacityMask"))
+			opacity_mask_tag = xps_down(node);
+	}
+
+	opacity_mask_uri = base_uri;
+	xps_resolve_resource_reference(ctx, dict, &transform_att, &transform_tag, NULL);
+	xps_resolve_resource_reference(ctx, dict, &clip_att, &clip_tag, NULL);
+	xps_resolve_resource_reference(ctx, dict, &opacity_mask_att, &opacity_mask_tag, &opacity_mask_uri);
+
+	gs_gsave(ctx->pgs);
+
+	gs_make_identity(&transform);
+	if (transform_att)
+		xps_parse_render_transform(ctx, transform_att, &transform);
+	if (transform_tag)
+		xps_parse_matrix_transform(ctx, transform_tag, &transform);
+	gs_concat(ctx->pgs, &transform);
+
+	if (clip_att || clip_tag)
+	{
+		if (clip_att)
+			xps_parse_abbreviated_geometry(ctx, clip_att);
+		if (clip_tag)
+			xps_parse_path_geometry(ctx, dict, clip_tag, 0);
+		xps_clip(ctx);
+	}
+
+	code = xps_begin_opacity(ctx, opacity_mask_uri, dict, opacity_att, opacity_mask_tag);
+	if (code)
+	{
+		gs_grestore(ctx->pgs);
+		return gs_rethrow(code, "cannot create transparency group");
+	}
+
+	for (node = xps_down(root); node; node = xps_next(node))
+	{
+		code = xps_parse_element(ctx, base_uri, dict, node);
+		if (code)
+		{
+			xps_end_opacity(ctx, opacity_mask_uri, dict, opacity_att, opacity_mask_tag);
+			gs_grestore(ctx->pgs);
+			return gs_rethrow(code, "cannot parse child of Canvas");
+		}
+	}
+
+	xps_end_opacity(ctx, opacity_mask_uri, dict, opacity_att, opacity_mask_tag);
+
+	gs_grestore(ctx->pgs);
+
+	if (new_dict)
+		xps_free_resource_dictionary(ctx, new_dict);
+
+	return 0;
+}
+
+int
+xps_parse_fixed_page(xps_context_t *ctx, xps_part_t *part)
+{
+	xps_item_t *root, *node;
+	xps_resource_t *dict;
+	char *width_att;
+	char *height_att;
+	int has_transparency;
+	char base_uri[1024];
+	char *s;
+	int code;
+
+	if_debug1('|', "doc: parsing page %s\n", part->name);
+
+	xps_strlcpy(base_uri, part->name, sizeof base_uri);
+	s = strrchr(base_uri, '/');
+	if (s)
+		s[1] = 0;
+
+	root = xps_parse_xml(ctx, part->data, part->size);
+	if (!root)
+		return gs_rethrow(-1, "cannot parse xml");
+
+	if (strcmp(xps_tag(root), "FixedPage"))
+		return gs_throw1(-1, "expected FixedPage element (found %s)", xps_tag(root));
+
+	width_att = xps_att(root, "Width");
+	height_att = xps_att(root, "Height");
+
+	if (!width_att)
+		return gs_throw(-1, "FixedPage missing required attribute: Width");
+	if (!height_att)
+		return gs_throw(-1, "FixedPage missing required attribute: Height");
+
+	dict = NULL;
+
+	/* Setup new page */
+	{
+		gs_memory_t *mem = ctx->memory;
+		gs_state *pgs = ctx->pgs;
+		gx_device *dev = gs_currentdevice(pgs);
+		gs_param_float_array fa;
+		float fv[2];
+		gs_c_param_list list;
+
+		gs_c_param_list_write(&list, mem);
+
+		fv[0] = atoi(width_att) / 96.0 * 72.0;
+		fv[1] = atoi(height_att) / 96.0 * 72.0;
+		fa.persistent = false;
+		fa.data = fv;
+		fa.size = 2;
+
+		code = param_write_float_array((gs_param_list *)&list, ".MediaSize", &fa);
+		if ( code >= 0 )
+		{
+			gs_c_param_list_read(&list);
+			code = gs_putdeviceparams(dev, (gs_param_list *)&list);
+		}
+		gs_c_param_list_release(&list);
+
+		/* nb this is for the demo it is wrong and should be removed */
+		gs_initgraphics(pgs);
+
+		/* 96 dpi default - and put the origin at the top of the page */
+
+		gs_initmatrix(pgs);
+
+		code = gs_scale(pgs, 72.0/96.0, -72.0/96.0);
+		if (code < 0)
+			return gs_rethrow(code, "cannot set page transform");
+
+		code = gs_translate(pgs, 0.0, -atoi(height_att));
+		if (code < 0)
+			return gs_rethrow(code, "cannot set page transform");
+
+		code = gs_erasepage(pgs);
+		if (code < 0)
+			return gs_rethrow(code, "cannot clear page");
+	}
+
+	/* Pre-parse looking for transparency */
+
+	has_transparency = 0;
+
+	for (node = xps_down(root); node; node = xps_next(node))
+	{
+		if (!strcmp(xps_tag(node), "FixedPage.Resources") && xps_down(node))
+			if (xps_resource_dictionary_has_transparency(ctx, base_uri, xps_down(node)))
+				has_transparency = 1;
+		if (xps_element_has_transparency(ctx, base_uri, node))
+			has_transparency = 1;
+	}
+
+	/* save the state with the original device before we push */
+	gs_gsave(ctx->pgs);
+
+	if (ctx->use_transparency && has_transparency)
+	{
+		code = gs_push_pdf14trans_device(ctx->pgs);
+		if (code < 0)
+		{
+			gs_grestore(ctx->pgs);
+			return gs_rethrow(code, "cannot install transparency device");
+		}
+	}
+
+	/* Initialize the default profiles in the ctx to what is in the manager */
+	ctx->gray->cmm_icc_profile_data = ctx->pgs->icc_manager->default_gray;
+	ctx->srgb->cmm_icc_profile_data = ctx->pgs->icc_manager->default_rgb;
+	/* scrgb really needs to be a bit different.
+	 * Unless we are handling nonlinearity before conversion from float. ToDo. */
+	ctx->scrgb->cmm_icc_profile_data = ctx->pgs->icc_manager->default_rgb;
+	ctx->cmyk->cmm_icc_profile_data = ctx->pgs->icc_manager->default_cmyk;
+
+	/* Draw contents */
+
+	for (node = xps_down(root); node; node = xps_next(node))
+	{
+		if (!strcmp(xps_tag(node), "FixedPage.Resources") && xps_down(node))
+		{
+			code = xps_parse_resource_dictionary(ctx, &dict, base_uri, xps_down(node));
+			if (code)
+			{
+				gs_pop_pdf14trans_device(ctx->pgs);
+				gs_grestore(ctx->pgs);
+				return gs_rethrow(code, "cannot load FixedPage.Resources");
+			}
+		}
+		code = xps_parse_element(ctx, base_uri, dict, node);
+		if (code)
+		{
+			gs_pop_pdf14trans_device(ctx->pgs);
+			gs_grestore(ctx->pgs);
+			return gs_rethrow(code, "cannot parse child of FixedPage");
+		}
+	}
+
+	if (ctx->use_transparency && has_transparency)
+	{
+		code = gs_pop_pdf14trans_device(ctx->pgs);
+		if (code < 0)
+		{
+			gs_grestore(ctx->pgs);
+			return gs_rethrow(code, "cannot uninstall transparency device");
+		}
+	}
+
+	/* Flush page */
+	{
+		code = xps_show_page(ctx, 1, true); /* copies, flush */
+		if (code < 0)
+		{
+			gs_grestore(ctx->pgs);
+			return gs_rethrow(code, "cannot flush page");
+		}
+	}
+
+	/* restore the original device, discarding the pdf14 compositor */
+	gs_grestore(ctx->pgs);
+
+	if (dict)
+	{
+		xps_free_resource_dictionary(ctx, dict);
+	}
+
+	xps_free_item(ctx, root);
+
+	return 0;
+}