From 15cdb30e3125ce542289fe385f559799e5abf220 Mon Sep 17 00:00:00 2001 From: John Mark Bell Date: Mon, 24 Aug 2009 08:06:29 +0000 Subject: Beginnings of port to core buildsystem svn path=/trunk/libsvgtiny/; revision=9419 --- src/colors.gperf | 169 ++++++++ src/svgtiny.c | 1079 ++++++++++++++++++++++++++++++++++++++++++++++++ src/svgtiny_gradient.c | 648 +++++++++++++++++++++++++++++ src/svgtiny_internal.h | 84 ++++ src/svgtiny_list.c | 125 ++++++ 5 files changed, 2105 insertions(+) create mode 100644 src/colors.gperf create mode 100644 src/svgtiny.c create mode 100644 src/svgtiny_gradient.c create mode 100644 src/svgtiny_internal.h create mode 100644 src/svgtiny_list.c (limited to 'src') diff --git a/src/colors.gperf b/src/colors.gperf new file mode 100644 index 0000000..89152d2 --- /dev/null +++ b/src/colors.gperf @@ -0,0 +1,169 @@ +/* + * This file is part of Libsvgtiny + * Licensed under the MIT License, + * http://opensource.org/licenses/mit-license.php + * Copyright 2008 James Bursa + */ + +%language=ANSI-C +%struct-type +%switch=1 +%define hash-function-name svgtiny_color_hash +%define lookup-function-name svgtiny_color_lookup +%readonly-tables + +%{ +#include +#include "svgtiny.h" +#include "svgtiny_internal.h" +%} + +struct svgtiny_named_color; +%% +aliceblue, svgtiny_RGB(240, 248, 255) +antiquewhite, svgtiny_RGB(250, 235, 215) +aqua, svgtiny_RGB( 0, 255, 255) +aquamarine, svgtiny_RGB(127, 255, 212) +azure, svgtiny_RGB(240, 255, 255) +beige, svgtiny_RGB(245, 245, 220) +bisque, svgtiny_RGB(255, 228, 196) +black, svgtiny_RGB( 0, 0, 0) +blanchedalmond, svgtiny_RGB(255, 235, 205) +blue, svgtiny_RGB( 0, 0, 255) +blueviolet, svgtiny_RGB(138, 43, 226) +brown, svgtiny_RGB(165, 42, 42) +burlywood, svgtiny_RGB(222, 184, 135) +cadetblue, svgtiny_RGB( 95, 158, 160) +chartreuse, svgtiny_RGB(127, 255, 0) +chocolate, svgtiny_RGB(210, 105, 30) +coral, svgtiny_RGB(255, 127, 80) +cornflowerblue, svgtiny_RGB(100, 149, 237) +cornsilk, svgtiny_RGB(255, 248, 220) +crimson, svgtiny_RGB(220, 20, 60) +cyan, svgtiny_RGB( 0, 255, 255) +darkblue, svgtiny_RGB( 0, 0, 139) +darkcyan, svgtiny_RGB( 0, 139, 139) +darkgoldenrod, svgtiny_RGB(184, 134, 11) +darkgray, svgtiny_RGB(169, 169, 169) +darkgreen, svgtiny_RGB( 0, 100, 0) +darkgrey, svgtiny_RGB(169, 169, 169) +darkkhaki, svgtiny_RGB(189, 183, 107) +darkmagenta, svgtiny_RGB(139, 0, 139) +darkolivegreen, svgtiny_RGB( 85, 107, 47) +darkorange, svgtiny_RGB(255, 140, 0) +darkorchid, svgtiny_RGB(153, 50, 204) +darkred, svgtiny_RGB(139, 0, 0) +darksalmon, svgtiny_RGB(233, 150, 122) +darkseagreen, svgtiny_RGB(143, 188, 143) +darkslateblue, svgtiny_RGB( 72, 61, 139) +darkslategray, svgtiny_RGB( 47, 79, 79) +darkslategrey, svgtiny_RGB( 47, 79, 79) +darkturquoise, svgtiny_RGB( 0, 206, 209) +darkviolet, svgtiny_RGB(148, 0, 211) +deeppink, svgtiny_RGB(255, 20, 147) +deepskyblue, svgtiny_RGB( 0, 191, 255) +dimgray, svgtiny_RGB(105, 105, 105) +dimgrey, svgtiny_RGB(105, 105, 105) +dodgerblue, svgtiny_RGB( 30, 144, 255) +firebrick, svgtiny_RGB(178, 34, 34) +floralwhite, svgtiny_RGB(255, 250, 240) +forestgreen, svgtiny_RGB( 34, 139, 34) +fuchsia, svgtiny_RGB(255, 0, 255) +gainsboro, svgtiny_RGB(220, 220, 220) +ghostwhite, svgtiny_RGB(248, 248, 255) +gold, svgtiny_RGB(255, 215, 0) +goldenrod, svgtiny_RGB(218, 165, 32) +gray, svgtiny_RGB(128, 128, 128) +grey, svgtiny_RGB(128, 128, 128) +green, svgtiny_RGB( 0, 128, 0) +greenyellow, svgtiny_RGB(173, 255, 47) +honeydew, svgtiny_RGB(240, 255, 240) +hotpink, svgtiny_RGB(255, 105, 180) +indianred, svgtiny_RGB(205, 92, 92) +indigo, svgtiny_RGB( 75, 0, 130) +ivory, svgtiny_RGB(255, 255, 240) +khaki, svgtiny_RGB(240, 230, 140) +lavender, svgtiny_RGB(230, 230, 250) +lavenderblush, svgtiny_RGB(255, 240, 245) +lawngreen, svgtiny_RGB(124, 252, 0) +lemonchiffon, svgtiny_RGB(255, 250, 205) +lightblue, svgtiny_RGB(173, 216, 230) +lightcoral, svgtiny_RGB(240, 128, 128) +lightcyan, svgtiny_RGB(224, 255, 255) +lightgoldenrodyellow, svgtiny_RGB(250, 250, 210) +lightgray, svgtiny_RGB(211, 211, 211) +lightgreen, svgtiny_RGB(144, 238, 144) +lightgrey, svgtiny_RGB(211, 211, 211) +lightpink, svgtiny_RGB(255, 182, 193) +lightsalmon, svgtiny_RGB(255, 160, 122) +lightseagreen, svgtiny_RGB( 32, 178, 170) +lightskyblue, svgtiny_RGB(135, 206, 250) +lightslategray, svgtiny_RGB(119, 136, 153) +lightslategrey, svgtiny_RGB(119, 136, 153) +lightsteelblue, svgtiny_RGB(176, 196, 222) +lightyellow, svgtiny_RGB(255, 255, 224) +lime, svgtiny_RGB( 0, 255, 0) +limegreen, svgtiny_RGB( 50, 205, 50) +linen, svgtiny_RGB(250, 240, 230) +magenta, svgtiny_RGB(255, 0, 255) +maroon, svgtiny_RGB(128, 0, 0) +mediumaquamarine, svgtiny_RGB(102, 205, 170) +mediumblue, svgtiny_RGB( 0, 0, 205) +mediumorchid, svgtiny_RGB(186, 85, 211) +mediumpurple, svgtiny_RGB(147, 112, 219) +mediumseagreen, svgtiny_RGB( 60, 179, 113) +mediumslateblue, svgtiny_RGB(123, 104, 238) +mediumspringgreen, svgtiny_RGB( 0, 250, 154) +mediumturquoise, svgtiny_RGB( 72, 209, 204) +mediumvioletred, svgtiny_RGB(199, 21, 133) +midnightblue, svgtiny_RGB( 25, 25, 112) +mintcream, svgtiny_RGB(245, 255, 250) +mistyrose, svgtiny_RGB(255, 228, 225) +moccasin, svgtiny_RGB(255, 228, 181) +navajowhite, svgtiny_RGB(255, 222, 173) +navy, svgtiny_RGB( 0, 0, 128) +oldlace, svgtiny_RGB(253, 245, 230) +olive, svgtiny_RGB(128, 128, 0) +olivedrab, svgtiny_RGB(107, 142, 35) +orange, svgtiny_RGB(255, 165, 0) +orangered, svgtiny_RGB(255, 69, 0) +orchid, svgtiny_RGB(218, 112, 214) +palegoldenrod, svgtiny_RGB(238, 232, 170) +palegreen, svgtiny_RGB(152, 251, 152) +paleturquoise, svgtiny_RGB(175, 238, 238) +palevioletred, svgtiny_RGB(219, 112, 147) +papayawhip, svgtiny_RGB(255, 239, 213) +peachpuff, svgtiny_RGB(255, 218, 185) +peru, svgtiny_RGB(205, 133, 63) +pink, svgtiny_RGB(255, 192, 203) +plum, svgtiny_RGB(221, 160, 221) +powderblue, svgtiny_RGB(176, 224, 230) +purple, svgtiny_RGB(128, 0, 128) +red, svgtiny_RGB(255, 0, 0) +rosybrown, svgtiny_RGB(188, 143, 143) +royalblue, svgtiny_RGB( 65, 105, 225) +saddlebrown, svgtiny_RGB(139, 69, 19) +salmon, svgtiny_RGB(250, 128, 114) +sandybrown, svgtiny_RGB(244, 164, 96) +seagreen, svgtiny_RGB( 46, 139, 87) +seashell, svgtiny_RGB(255, 245, 238) +sienna, svgtiny_RGB(160, 82, 45) +silver, svgtiny_RGB(192, 192, 192) +skyblue, svgtiny_RGB(135, 206, 235) +slateblue, svgtiny_RGB(106, 90, 205) +slategray, svgtiny_RGB(112, 128, 144) +slategrey, svgtiny_RGB(112, 128, 144) +snow, svgtiny_RGB(255, 250, 250) +springgreen, svgtiny_RGB( 0, 255, 127) +steelblue, svgtiny_RGB( 70, 130, 180) +tan, svgtiny_RGB(210, 180, 140) +teal, svgtiny_RGB( 0, 128, 128) +thistle, svgtiny_RGB(216, 191, 216) +tomato, svgtiny_RGB(255, 99, 71) +turquoise, svgtiny_RGB( 64, 224, 208) +violet, svgtiny_RGB(238, 130, 238) +wheat, svgtiny_RGB(245, 222, 179) +white, svgtiny_RGB(255, 255, 255) +whitesmoke, svgtiny_RGB(245, 245, 245) +yellow, svgtiny_RGB(255, 255, 0) +yellowgreen, svgtiny_RGB(154, 205, 50) diff --git a/src/svgtiny.c b/src/svgtiny.c new file mode 100644 index 0000000..ab6b6dd --- /dev/null +++ b/src/svgtiny.c @@ -0,0 +1,1079 @@ +/* + * This file is part of Libsvgtiny + * Licensed under the MIT License, + * http://opensource.org/licenses/mit-license.php + * Copyright 2008 James Bursa + */ + +#define _GNU_SOURCE /* for strndup */ +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include "svgtiny.h" +#include "svgtiny_internal.h" + + +static svgtiny_code svgtiny_parse_svg(xmlNode *svg, + struct svgtiny_parse_state state); +static svgtiny_code svgtiny_parse_path(xmlNode *path, + struct svgtiny_parse_state state); +static svgtiny_code svgtiny_parse_rect(xmlNode *rect, + struct svgtiny_parse_state state); +static svgtiny_code svgtiny_parse_circle(xmlNode *circle, + struct svgtiny_parse_state state); +static svgtiny_code svgtiny_parse_line(xmlNode *line, + struct svgtiny_parse_state state); +static svgtiny_code svgtiny_parse_poly(xmlNode *poly, + struct svgtiny_parse_state state, bool polygon); +static svgtiny_code svgtiny_parse_text(xmlNode *text, + struct svgtiny_parse_state state); +static void svgtiny_parse_position_attributes(const xmlNode *node, + const struct svgtiny_parse_state state, + float *x, float *y, float *width, float *height); +static void svgtiny_parse_paint_attributes(const xmlNode *node, + struct svgtiny_parse_state *state); +static void svgtiny_parse_font_attributes(const xmlNode *node, + struct svgtiny_parse_state *state); +static void svgtiny_parse_transform_attributes(xmlNode *node, + struct svgtiny_parse_state *state); +static svgtiny_code svgtiny_add_path(float *p, unsigned int n, + struct svgtiny_parse_state *state); + + +/** + * Create a new svgtiny_diagram structure. + */ + +struct svgtiny_diagram *svgtiny_create(void) +{ + struct svgtiny_diagram *diagram; + + diagram = malloc(sizeof *diagram); + if (!diagram) + return 0; + + diagram->shape = 0; + diagram->shape_count = 0; + diagram->error_line = 0; + diagram->error_message = 0; + + return diagram; +} + + +/** + * Parse a block of memory into a svgtiny_diagram. + */ + +svgtiny_code svgtiny_parse(struct svgtiny_diagram *diagram, + const char *buffer, size_t size, const char *url, + int viewport_width, int viewport_height) +{ + xmlDoc *document; + xmlNode *svg; + struct svgtiny_parse_state state; + float x, y, width, height; + svgtiny_code code; + + assert(diagram); + assert(buffer); + assert(url); + + /* parse XML to tree */ + document = xmlReadMemory(buffer, size, url, 0, + XML_PARSE_NONET | XML_PARSE_COMPACT); + if (!document) + return svgtiny_LIBXML_ERROR; + + /*xmlDebugDumpDocument(stderr, document);*/ + + /* find root element */ + svg = xmlDocGetRootElement(document); + if (!svg) + return svgtiny_NOT_SVG; + if (strcmp((const char *) svg->name, "svg") != 0) + return svgtiny_NOT_SVG; + + /* get graphic dimensions */ + state.diagram = diagram; + state.document = document; + state.viewport_width = viewport_width; + state.viewport_height = viewport_height; + svgtiny_parse_position_attributes(svg, state, &x, &y, &width, &height); + diagram->width = width; + diagram->height = height; + + /* set up parsing state */ + state.viewport_width = width; + state.viewport_height = height; + state.ctm.a = 1; /*(float) viewport_width / (float) width;*/ + state.ctm.b = 0; + state.ctm.c = 0; + state.ctm.d = 1; /*(float) viewport_height / (float) height;*/ + state.ctm.e = 0; /*x;*/ + state.ctm.f = 0; /*y;*/ + /*state.style = css_base_style; + state.style.font_size.value.length.value = option_font_size * 0.1;*/ + state.fill = 0x000000; + state.stroke = svgtiny_TRANSPARENT; + state.stroke_width = 1; + state.linear_gradient_stop_count = 0; + + /* parse tree */ + code = svgtiny_parse_svg(svg, state); + + /* free XML tree */ + xmlFreeDoc(document); + + return code; +} + + +/** + * Parse a or element node. + */ + +svgtiny_code svgtiny_parse_svg(xmlNode *svg, + struct svgtiny_parse_state state) +{ + float x, y, width, height; + + svgtiny_parse_position_attributes(svg, state, &x, &y, &width, &height); + svgtiny_parse_paint_attributes(svg, &state); + svgtiny_parse_font_attributes(svg, &state); + + /* parse viewBox */ + xmlAttr *view_box = xmlHasProp(svg, (const xmlChar *) "viewBox"); + if (view_box) { + const char *s = (const char *) view_box->children->content; + float min_x, min_y, vwidth, vheight; + if (sscanf(s, "%f,%f,%f,%f", + &min_x, &min_y, &vwidth, &vheight) == 4 || + sscanf(s, "%f %f %f %f", + &min_x, &min_y, &vwidth, &vheight) == 4) { + state.ctm.a = (float) state.viewport_width / vwidth; + state.ctm.d = (float) state.viewport_height / vheight; + state.ctm.e += -min_x * state.ctm.a; + state.ctm.f += -min_y * state.ctm.d; + } + } + + svgtiny_parse_transform_attributes(svg, &state); + + for (xmlNode *child = svg->children; child; child = child->next) { + svgtiny_code code = svgtiny_OK; + + if (child->type == XML_ELEMENT_NODE) { + const char *name = (const char *) child->name; + if (strcmp(name, "svg") == 0) + code = svgtiny_parse_svg(child, state); + else if (strcmp(name, "g") == 0) + code = svgtiny_parse_svg(child, state); + else if (strcmp(name, "a") == 0) + code = svgtiny_parse_svg(child, state); + else if (strcmp(name, "path") == 0) + code = svgtiny_parse_path(child, state); + else if (strcmp(name, "rect") == 0) + code = svgtiny_parse_rect(child, state); + else if (strcmp(name, "circle") == 0) + code = svgtiny_parse_circle(child, state); + else if (strcmp(name, "line") == 0) + code = svgtiny_parse_line(child, state); + else if (strcmp(name, "polyline") == 0) + code = svgtiny_parse_poly(child, state, false); + else if (strcmp(name, "polygon") == 0) + code = svgtiny_parse_poly(child, state, true); + else if (strcmp(name, "text") == 0) + code = svgtiny_parse_text(child, state); + } + + if (code != svgtiny_OK) + return code; + } + + return svgtiny_OK; +} + + + +/** + * Parse a element node. + * + * http://www.w3.org/TR/SVG11/paths#PathElement + */ + +svgtiny_code svgtiny_parse_path(xmlNode *path, + struct svgtiny_parse_state state) +{ + char *s, *path_d; + + svgtiny_parse_paint_attributes(path, &state); + svgtiny_parse_transform_attributes(path, &state); + + /* read d attribute */ + s = path_d = (char *) xmlGetProp(path, (const xmlChar *) "d"); + if (!s) { + state.diagram->error_line = path->line; + state.diagram->error_message = "path: missing d attribute"; + return svgtiny_SVG_ERROR; + } + + /* allocate space for path: it will never have more elements than d */ + float *p = malloc(sizeof p[0] * strlen(s)); + if (!p) + return svgtiny_OUT_OF_MEMORY; + + /* parse d and build path */ + for (unsigned int i = 0; s[i]; i++) + if (s[i] == ',') + s[i] = ' '; + unsigned int i = 0; + float last_x = 0, last_y = 0; + float last_cubic_x = 0, last_cubic_y = 0; + float last_quad_x = 0, last_quad_y = 0; + while (*s) { + char command[2]; + int plot_command; + float x, y, x1, y1, x2, y2; + int n; + + /* moveto (M, m), lineto (L, l) (2 arguments) */ + if (sscanf(s, " %1[MmLl] %f %f %n", command, &x, &y, &n) == 3) { + /*LOG(("moveto or lineto"));*/ + if (*command == 'M' || *command == 'm') + plot_command = svgtiny_PATH_MOVE; + else + plot_command = svgtiny_PATH_LINE; + do { + p[i++] = plot_command; + if ('a' <= *command) { + x += last_x; + y += last_y; + } + p[i++] = last_cubic_x = last_quad_x = last_x + = x; + p[i++] = last_cubic_y = last_quad_y = last_y + = y; + s += n; + plot_command = svgtiny_PATH_LINE; + } while (sscanf(s, "%f %f %n", &x, &y, &n) == 2); + + /* closepath (Z, z) (no arguments) */ + } else if (sscanf(s, " %1[Zz] %n", command, &n) == 1) { + /*LOG(("closepath"));*/ + p[i++] = svgtiny_PATH_CLOSE; + s += n; + + /* horizontal lineto (H, h) (1 argument) */ + } else if (sscanf(s, " %1[Hh] %f %n", command, &x, &n) == 2) { + /*LOG(("horizontal lineto"));*/ + do { + p[i++] = svgtiny_PATH_LINE; + if (*command == 'h') + x += last_x; + p[i++] = last_cubic_x = last_quad_x = last_x + = x; + p[i++] = last_cubic_y = last_quad_y = last_y; + s += n; + } while (sscanf(s, "%f %n", &x, &n) == 1); + + /* vertical lineto (V, v) (1 argument) */ + } else if (sscanf(s, " %1[Vv] %f %n", command, &y, &n) == 2) { + /*LOG(("vertical lineto"));*/ + do { + p[i++] = svgtiny_PATH_LINE; + if (*command == 'v') + y += last_y; + p[i++] = last_cubic_x = last_quad_x = last_x; + p[i++] = last_cubic_y = last_quad_y = last_y + = y; + s += n; + } while (sscanf(s, "%f %n", &x, &n) == 1); + + /* curveto (C, c) (6 arguments) */ + } else if (sscanf(s, " %1[Cc] %f %f %f %f %f %f %n", command, + &x1, &y1, &x2, &y2, &x, &y, &n) == 7) { + /*LOG(("curveto"));*/ + do { + p[i++] = svgtiny_PATH_BEZIER; + if (*command == 'c') { + x1 += last_x; + y1 += last_y; + x2 += last_x; + y2 += last_y; + x += last_x; + y += last_y; + } + p[i++] = x1; + p[i++] = y1; + p[i++] = last_cubic_x = x2; + p[i++] = last_cubic_y = y2; + p[i++] = last_quad_x = last_x = x; + p[i++] = last_quad_y = last_y = y; + s += n; + } while (sscanf(s, "%f %f %f %f %f %f %n", + &x1, &y1, &x2, &y2, &x, &y, &n) == 6); + + /* shorthand/smooth curveto (S, s) (4 arguments) */ + } else if (sscanf(s, " %1[Ss] %f %f %f %f %n", command, + &x2, &y2, &x, &y, &n) == 5) { + /*LOG(("shorthand/smooth curveto"));*/ + do { + p[i++] = svgtiny_PATH_BEZIER; + x1 = last_x + (last_x - last_cubic_x); + y1 = last_y + (last_y - last_cubic_y); + if (*command == 's') { + x2 += last_x; + y2 += last_y; + x += last_x; + y += last_y; + } + p[i++] = x1; + p[i++] = y1; + p[i++] = last_cubic_x = x2; + p[i++] = last_cubic_y = y2; + p[i++] = last_quad_x = last_x = x; + p[i++] = last_quad_y = last_y = y; + s += n; + } while (sscanf(s, "%f %f %f %f %n", + &x2, &y2, &x, &y, &n) == 4); + + /* quadratic Bezier curveto (Q, q) (4 arguments) */ + } else if (sscanf(s, " %1[Qq] %f %f %f %f %n", command, + &x1, &y1, &x, &y, &n) == 5) { + /*LOG(("quadratic Bezier curveto"));*/ + do { + p[i++] = svgtiny_PATH_BEZIER; + last_quad_x = x1; + last_quad_y = y1; + if (*command == 'q') { + x1 += last_x; + y1 += last_y; + x += last_x; + y += last_y; + } + p[i++] = 1./3 * last_x + 2./3 * x1; + p[i++] = 1./3 * last_y + 2./3 * y1; + p[i++] = 2./3 * x1 + 1./3 * x; + p[i++] = 2./3 * y1 + 1./3 * y; + p[i++] = last_cubic_x = last_x = x; + p[i++] = last_cubic_y = last_y = y; + s += n; + } while (sscanf(s, "%f %f %f %f %n", + &x1, &y1, &x, &y, &n) == 4); + + /* shorthand/smooth quadratic Bezier curveto (T, t) + (2 arguments) */ + } else if (sscanf(s, " %1[Tt] %f %f %n", command, + &x, &y, &n) == 3) { + /*LOG(("shorthand/smooth quadratic Bezier curveto"));*/ + do { + p[i++] = svgtiny_PATH_BEZIER; + x1 = last_x + (last_x - last_quad_x); + y1 = last_y + (last_y - last_quad_y); + last_quad_x = x1; + last_quad_y = y1; + if (*command == 't') { + x1 += last_x; + y1 += last_y; + x += last_x; + y += last_y; + } + p[i++] = 1./3 * last_x + 2./3 * x1; + p[i++] = 1./3 * last_y + 2./3 * y1; + p[i++] = 2./3 * x1 + 1./3 * x; + p[i++] = 2./3 * y1 + 1./3 * y; + p[i++] = last_cubic_x = last_x = x; + p[i++] = last_cubic_y = last_y = y; + s += n; + } while (sscanf(s, "%f %f %n", + &x, &y, &n) == 2); + + } else { + /*LOG(("parse failed at \"%s\"", s));*/ + break; + } + } + + xmlFree(path_d); + + return svgtiny_add_path(p, i, &state); +} + + +/** + * Parse a element node. + * + * http://www.w3.org/TR/SVG11/shapes#RectElement + */ + +svgtiny_code svgtiny_parse_rect(xmlNode *rect, + struct svgtiny_parse_state state) +{ + float x, y, width, height; + + svgtiny_parse_position_attributes(rect, state, + &x, &y, &width, &height); + svgtiny_parse_paint_attributes(rect, &state); + svgtiny_parse_transform_attributes(rect, &state); + + float *p = malloc(13 * sizeof p[0]); + if (!p) + return svgtiny_OUT_OF_MEMORY; + + p[0] = svgtiny_PATH_MOVE; + p[1] = x; + p[2] = y; + p[3] = svgtiny_PATH_LINE; + p[4] = x + width; + p[5] = y; + p[6] = svgtiny_PATH_LINE; + p[7] = x + width; + p[8] = y + height; + p[9] = svgtiny_PATH_LINE; + p[10] = x; + p[11] = y + height; + p[12] = svgtiny_PATH_CLOSE; + + return svgtiny_add_path(p, 13, &state); +} + + +/** + * Parse a element node. + */ + +svgtiny_code svgtiny_parse_circle(xmlNode *circle, + struct svgtiny_parse_state state) +{ + float x = 0, y = 0, r = 0; + const float kappa = 0.5522847498; + + for (xmlAttr *attr = circle->properties; attr; attr = attr->next) { + const char *name = (const char *) attr->name; + const char *content = (const char *) attr->children->content; + if (strcmp(name, "cx") == 0) + x = svgtiny_parse_length(content, + state.viewport_width, state); + else if (strcmp(name, "cy") == 0) + y = svgtiny_parse_length(content, + state.viewport_height, state); + else if (strcmp(name, "r") == 0) + r = svgtiny_parse_length(content, + state.viewport_width, state); + } + svgtiny_parse_paint_attributes(circle, &state); + svgtiny_parse_transform_attributes(circle, &state); + + float *p = malloc(32 * sizeof p[0]); + if (!p) + return svgtiny_OUT_OF_MEMORY; + + p[0] = svgtiny_PATH_MOVE; + p[1] = x - r; + p[2] = y; + p[3] = svgtiny_PATH_BEZIER; + p[4] = x - r; + p[5] = y + r * kappa; + p[6] = x - r * kappa; + p[7] = y + r; + p[8] = x; + p[9] = y + r; + p[10] = svgtiny_PATH_BEZIER; + p[11] = x + r * kappa; + p[12] = y + r; + p[13] = x + r; + p[14] = y + r * kappa; + p[15] = x + r; + p[16] = y; + p[17] = svgtiny_PATH_BEZIER; + p[18] = x + r; + p[19] = y - r * kappa; + p[20] = x + r * kappa; + p[21] = y - r; + p[22] = x; + p[23] = y - r; + p[24] = svgtiny_PATH_BEZIER; + p[25] = x - r * kappa; + p[26] = y - r; + p[27] = x - r; + p[28] = y - r * kappa; + p[29] = x - r; + p[30] = y; + p[31] = svgtiny_PATH_CLOSE; + + return svgtiny_add_path(p, 32, &state); +} + + +/** + * Parse a element node. + */ + +svgtiny_code svgtiny_parse_line(xmlNode *line, + struct svgtiny_parse_state state) +{ + float x1 = 0, y1 = 0, x2 = 0, y2 = 0; + + for (xmlAttr *attr = line->properties; attr; attr = attr->next) { + const char *name = (const char *) attr->name; + const char *content = (const char *) attr->children->content; + if (strcmp(name, "x1") == 0) + x1 = svgtiny_parse_length(content, + state.viewport_width, state); + else if (strcmp(name, "y1") == 0) + y1 = svgtiny_parse_length(content, + state.viewport_height, state); + else if (strcmp(name, "x2") == 0) + x2 = svgtiny_parse_length(content, + state.viewport_width, state); + else if (strcmp(name, "y2") == 0) + y2 = svgtiny_parse_length(content, + state.viewport_height, state); + } + svgtiny_parse_paint_attributes(line, &state); + svgtiny_parse_transform_attributes(line, &state); + + float *p = malloc(7 * sizeof p[0]); + if (!p) + return svgtiny_OUT_OF_MEMORY; + + p[0] = svgtiny_PATH_MOVE; + p[1] = x1; + p[2] = y1; + p[3] = svgtiny_PATH_LINE; + p[4] = x2; + p[5] = y2; + p[6] = svgtiny_PATH_CLOSE; + + return svgtiny_add_path(p, 7, &state); +} + + +/** + * Parse a or element node. + * + * http://www.w3.org/TR/SVG11/shapes#PolylineElement + * http://www.w3.org/TR/SVG11/shapes#PolygonElement + */ + +svgtiny_code svgtiny_parse_poly(xmlNode *poly, + struct svgtiny_parse_state state, bool polygon) +{ + char *s, *points; + + svgtiny_parse_paint_attributes(poly, &state); + svgtiny_parse_transform_attributes(poly, &state); + + /* read points attribute */ + s = points = (char *) xmlGetProp(poly, (const xmlChar *) "points"); + if (!s) { + state.diagram->error_line = poly->line; + state.diagram->error_message = + "polyline/polygon: missing points attribute"; + return svgtiny_SVG_ERROR; + } + + /* allocate space for path: it will never have more elements than s */ + float *p = malloc(sizeof p[0] * strlen(s)); + if (!p) { + xmlFree(points); + return svgtiny_OUT_OF_MEMORY; + } + + /* parse s and build path */ + for (unsigned int i = 0; s[i]; i++) + if (s[i] == ',') + s[i] = ' '; + unsigned int i = 0; + while (*s) { + float x, y; + int n; + + if (sscanf(s, "%f %f %n", &x, &y, &n) == 2) { + if (i == 0) + p[i++] = svgtiny_PATH_MOVE; + else + p[i++] = svgtiny_PATH_LINE; + p[i++] = x; + p[i++] = y; + s += n; + } else { + break; + } + } + if (polygon) + p[i++] = svgtiny_PATH_CLOSE; + + xmlFree(points); + + return svgtiny_add_path(p, i, &state); +} + + +/** + * Parse a or element node. + */ + +svgtiny_code svgtiny_parse_text(xmlNode *text, + struct svgtiny_parse_state state) +{ + float x, y, width, height; + + svgtiny_parse_position_attributes(text, state, + &x, &y, &width, &height); + svgtiny_parse_font_attributes(text, &state); + svgtiny_parse_transform_attributes(text, &state); + + float px = state.ctm.a * x + state.ctm.c * y + state.ctm.e; + float py = state.ctm.b * x + state.ctm.d * y + state.ctm.f; +/* state.ctm.e = px - state.origin_x; */ +/* state.ctm.f = py - state.origin_y; */ + + /*struct css_style style = state.style; + style.font_size.value.length.value *= state.ctm.a;*/ + + for (xmlNode *child = text->children; child; child = child->next) { + svgtiny_code code = svgtiny_OK; + + if (child->type == XML_TEXT_NODE) { + struct svgtiny_shape *shape = svgtiny_add_shape(&state); + if (!shape) + return svgtiny_OUT_OF_MEMORY; + shape->text = strdup((const char *) child->content); + shape->text_x = px; + shape->text_y = py; + state.diagram->shape_count++; + + } else if (child->type == XML_ELEMENT_NODE && + strcmp((const char *) child->name, + "tspan") == 0) { + code = svgtiny_parse_text(child, state); + } + + if (!code != svgtiny_OK) + return code; + } + + return svgtiny_OK; +} + + +/** + * Parse x, y, width, and height attributes, if present. + */ + +void svgtiny_parse_position_attributes(const xmlNode *node, + const struct svgtiny_parse_state state, + float *x, float *y, float *width, float *height) +{ + *x = 0; + *y = 0; + *width = state.viewport_width; + *height = state.viewport_height; + + for (xmlAttr *attr = node->properties; attr; attr = attr->next) { + const char *name = (const char *) attr->name; + const char *content = (const char *) attr->children->content; + if (strcmp(name, "x") == 0) + *x = svgtiny_parse_length(content, + state.viewport_width, state); + else if (strcmp(name, "y") == 0) + *y = svgtiny_parse_length(content, + state.viewport_height, state); + else if (strcmp(name, "width") == 0) + *width = svgtiny_parse_length(content, + state.viewport_width, state); + else if (strcmp(name, "height") == 0) + *height = svgtiny_parse_length(content, + state.viewport_height, state); + } +} + + +/** + * Parse a length as a number of pixels. + */ + +float svgtiny_parse_length(const char *s, int viewport_size, + const struct svgtiny_parse_state state) +{ + int num_length = strspn(s, "0123456789+-."); + const char *unit = s + num_length; + float n = atof((const char *) s); + float font_size = 20; /*css_len2px(&state.style.font_size.value.length, 0);*/ + + if (unit[0] == 0) { + return n; + } else if (unit[0] == '%') { + return n / 100.0 * viewport_size; + } else if (unit[0] == 'e' && unit[1] == 'm') { + return n * font_size; + } else if (unit[0] == 'e' && unit[1] == 'x') { + return n / 2.0 * font_size; + } else if (unit[0] == 'p' && unit[1] == 'x') { + return n; + } else if (unit[0] == 'p' && unit[1] == 't') { + return n * 1.25; + } else if (unit[0] == 'p' && unit[1] == 'c') { + return n * 15.0; + } else if (unit[0] == 'm' && unit[1] == 'm') { + return n * 3.543307; + } else if (unit[0] == 'c' && unit[1] == 'm') { + return n * 35.43307; + } else if (unit[0] == 'i' && unit[1] == 'n') { + return n * 90; + } + + return 0; +} + + +/** + * Parse paint attributes, if present. + */ + +void svgtiny_parse_paint_attributes(const xmlNode *node, + struct svgtiny_parse_state *state) +{ + for (const xmlAttr *attr = node->properties; attr; attr = attr->next) { + const char *name = (const char *) attr->name; + const char *content = (const char *) attr->children->content; + if (strcmp(name, "fill") == 0) + svgtiny_parse_color(content, &state->fill, state); + else if (strcmp(name, "stroke") == 0) + svgtiny_parse_color(content, &state->stroke, state); + else if (strcmp(name, "stroke-width") == 0) + state->stroke_width = svgtiny_parse_length(content, + state->viewport_width, *state); + else if (strcmp(name, "style") == 0) { + const char *style = (const char *) + attr->children->content; + const char *s; + char *value; + if ((s = strstr(style, "fill:"))) { + s += 5; + while (*s == ' ') + s++; + value = strndup(s, strcspn(s, "; ")); + svgtiny_parse_color(value, &state->fill, state); + free(value); + } + if ((s = strstr(style, "stroke:"))) { + s += 7; + while (*s == ' ') + s++; + value = strndup(s, strcspn(s, "; ")); + svgtiny_parse_color(value, &state->stroke, state); + free(value); + } + if ((s = strstr(style, "stroke-width:"))) { + s += 13; + while (*s == ' ') + s++; + state->stroke_width = svgtiny_parse_length(s, + state->viewport_width, *state); + } + } + } +} + + +/** + * Parse a colour. + */ + +void svgtiny_parse_color(const char *s, svgtiny_colour *c, + struct svgtiny_parse_state *state) +{ + unsigned int r, g, b; + float rf, gf, bf; + size_t len = strlen(s); + char *id = 0, *rparen; + + if (len == 4 && s[0] == '#') { + if (sscanf(s + 1, "%1x%1x%1x", &r, &g, &b) == 3) + *c = svgtiny_RGB(r | r << 4, g | g << 4, b | b << 4); + + } else if (len == 7 && s[0] == '#') { + if (sscanf(s + 1, "%2x%2x%2x", &r, &g, &b) == 3) + *c = svgtiny_RGB(r, g, b); + + } else if (10 <= len && s[0] == 'r' && s[1] == 'g' && s[2] == 'b' && + s[3] == '(' && s[len - 1] == ')') { + if (sscanf(s + 4, "%i,%i,%i", &r, &g, &b) == 3) + *c = svgtiny_RGB(r, g, b); + else if (sscanf(s + 4, "%f%%,%f%%,%f%%", &rf, &gf, &bf) == 3) { + b = bf * 255 / 100; + g = gf * 255 / 100; + r = rf * 255 / 100; + *c = svgtiny_RGB(r, g, b); + } + + } else if (len == 4 && strcmp(s, "none") == 0) { + *c = svgtiny_TRANSPARENT; + + } else if (5 < len && s[0] == 'u' && s[1] == 'r' && s[2] == 'l' && + s[3] == '(') { + if (s[4] == '#') { + id = strdup(s + 5); + if (!id) + return; + rparen = strchr(id, ')'); + if (rparen) + *rparen = 0; + svgtiny_find_gradient(id, state); + free(id); + fprintf(stderr, "linear_gradient_stop_count %i\n", + state->linear_gradient_stop_count); + if (state->linear_gradient_stop_count == 0) + *c = svgtiny_TRANSPARENT; + else if (state->linear_gradient_stop_count == 1) + *c = state->gradient_stop[0].color; + else + *c = svgtiny_LINEAR_GRADIENT; + } + + } else { + const struct svgtiny_named_color *named_color; + named_color = svgtiny_color_lookup(s, strlen(s)); + if (named_color) + *c = named_color->color; + } +} + + +/** + * Parse font attributes, if present. + */ + +void svgtiny_parse_font_attributes(const xmlNode *node, + struct svgtiny_parse_state *state) +{ + for (const xmlAttr *attr = node->properties; attr; attr = attr->next) { + if (strcmp((const char *) attr->name, "font-size") == 0) { + /*if (css_parse_length( + (const char *) attr->children->content, + &state->style.font_size.value.length, + true, true)) { + state->style.font_size.size = + CSS_FONT_SIZE_LENGTH; + }*/ + } + } +} + + +/** + * Parse transform attributes, if present. + * + * http://www.w3.org/TR/SVG11/coords#TransformAttribute + */ + +void svgtiny_parse_transform_attributes(xmlNode *node, + struct svgtiny_parse_state *state) +{ + char *transform; + + /* parse transform */ + transform = (char *) xmlGetProp(node, (const xmlChar *) "transform"); + if (transform) { + svgtiny_parse_transform(transform, &state->ctm.a, &state->ctm.b, + &state->ctm.c, &state->ctm.d, + &state->ctm.e, &state->ctm.f); + xmlFree(transform); + } +} + + +/** + * Parse a transform string. + */ + +void svgtiny_parse_transform(char *s, float *ma, float *mb, + float *mc, float *md, float *me, float *mf) +{ + float a, b, c, d, e, f; + float za, zb, zc, zd, ze, zf; + float angle, x, y; + int n; + + for (unsigned int i = 0; s[i]; i++) + if (s[i] == ',') + s[i] = ' '; + + while (*s) { + a = d = 1; + b = c = 0; + e = f = 0; + if (sscanf(s, "matrix (%f %f %f %f %f %f) %n", + &a, &b, &c, &d, &e, &f, &n) == 6) + ; + else if (sscanf(s, "translate (%f %f) %n", + &e, &f, &n) == 2) + ; + else if (sscanf(s, "translate (%f) %n", + &e, &n) == 1) + ; + else if (sscanf(s, "scale (%f %f) %n", + &a, &d, &n) == 2) + ; + else if (sscanf(s, "scale (%f) %n", + &a, &n) == 1) + d = a; + else if (sscanf(s, "rotate (%f %f %f) %n", + &angle, &x, &y, &n) == 3) { + angle = angle / 180 * M_PI; + a = cos(angle); + b = sin(angle); + c = -sin(angle); + d = cos(angle); + e = -x * cos(angle) + y * sin(angle) + x; + f = -x * sin(angle) - y * cos(angle) + y; + } else if (sscanf(s, "rotate (%f) %n", + &angle, &n) == 1) { + angle = angle / 180 * M_PI; + a = cos(angle); + b = sin(angle); + c = -sin(angle); + d = cos(angle); + } else if (sscanf(s, "skewX (%f) %n", + &angle, &n) == 1) { + angle = angle / 180 * M_PI; + c = tan(angle); + } else if (sscanf(s, "skewY (%f) %n", + &angle, &n) == 1) { + angle = angle / 180 * M_PI; + b = tan(angle); + } else + break; + za = *ma * a + *mc * b; + zb = *mb * a + *md * b; + zc = *ma * c + *mc * d; + zd = *mb * c + *md * d; + ze = *ma * e + *mc * f + *me; + zf = *mb * e + *md * f + *mf; + *ma = za; + *mb = zb; + *mc = zc; + *md = zd; + *me = ze; + *mf = zf; + s += n; + } +} + + +/** + * Add a path to the svgtiny_diagram. + */ + +svgtiny_code svgtiny_add_path(float *p, unsigned int n, + struct svgtiny_parse_state *state) +{ + if (state->fill == svgtiny_LINEAR_GRADIENT) + return svgtiny_add_path_linear_gradient(p, n, state); + + svgtiny_transform_path(p, n, state); + + struct svgtiny_shape *shape = svgtiny_add_shape(state); + if (!shape) { + free(p); + return svgtiny_OUT_OF_MEMORY; + } + shape->path = p; + shape->path_length = n; + state->diagram->shape_count++; + + return svgtiny_OK; +} + + +/** + * Add a svgtiny_shape to the svgtiny_diagram. + */ + +struct svgtiny_shape *svgtiny_add_shape(struct svgtiny_parse_state *state) +{ + struct svgtiny_shape *shape = realloc(state->diagram->shape, + (state->diagram->shape_count + 1) * + sizeof (state->diagram->shape[0])); + if (!shape) + return 0; + state->diagram->shape = shape; + + shape += state->diagram->shape_count; + shape->path = 0; + shape->path_length = 0; + shape->text = 0; + shape->fill = state->fill; + shape->stroke = state->stroke; + shape->stroke_width = state->stroke_width * + (state->ctm.a + state->ctm.d) / 2; + + return shape; +} + + +/** + * Apply the current transformation matrix to a path. + */ + +void svgtiny_transform_path(float *p, unsigned int n, + struct svgtiny_parse_state *state) +{ + for (unsigned int j = 0; j != n; ) { + unsigned int points = 0; + switch ((int) p[j]) { + case svgtiny_PATH_MOVE: + case svgtiny_PATH_LINE: + points = 1; + break; + case svgtiny_PATH_CLOSE: + points = 0; + break; + case svgtiny_PATH_BEZIER: + points = 3; + break; + default: + assert(0); + } + j++; + for (unsigned int k = 0; k != points; k++) { + float x0 = p[j], y0 = p[j + 1]; + float x = state->ctm.a * x0 + state->ctm.c * y0 + + state->ctm.e; + float y = state->ctm.b * x0 + state->ctm.d * y0 + + state->ctm.f; + p[j] = x; + p[j + 1] = y; + j += 2; + } + } +} + + +/** + * Free all memory used by a diagram. + */ + +void svgtiny_free(struct svgtiny_diagram *svg) +{ + assert(svg); + + for (unsigned int i = 0; i != svg->shape_count; i++) { + free(svg->shape[i].path); + free(svg->shape[i].text); + } + + free(svg->shape); + + free(svg); +} + diff --git a/src/svgtiny_gradient.c b/src/svgtiny_gradient.c new file mode 100644 index 0000000..be4f256 --- /dev/null +++ b/src/svgtiny_gradient.c @@ -0,0 +1,648 @@ +/* + * This file is part of Libsvgtiny + * Licensed under the MIT License, + * http://opensource.org/licenses/mit-license.php + * Copyright 2008 James Bursa + */ + +#define _GNU_SOURCE /* for strndup */ +#include +#include +#include +#include "svgtiny.h" +#include "svgtiny_internal.h" + +#undef GRADIENT_DEBUG + +static svgtiny_code svgtiny_parse_linear_gradient(xmlNode *linear, + struct svgtiny_parse_state *state); +static float svgtiny_parse_gradient_offset(const char *s); +static void svgtiny_path_bbox(float *p, unsigned int n, + float *x0, float *y0, float *x1, float *y1); +static void svgtiny_invert_matrix(float *m, float *inv); + + +/** + * Find a gradient by id and parse it. + */ + +void svgtiny_find_gradient(const char *id, struct svgtiny_parse_state *state) +{ + fprintf(stderr, "svgtiny_find_gradient: id \"%s\"\n", id); + + state->linear_gradient_stop_count = 0; + state->gradient_x1 = "0%"; + state->gradient_y1 = "0%"; + state->gradient_x2 = "100%"; + state->gradient_y2 = "0%"; + state->gradient_user_space_on_use = false; + state->gradient_transform.a = 1; + state->gradient_transform.b = 0; + state->gradient_transform.c = 0; + state->gradient_transform.d = 1; + state->gradient_transform.e = 0; + state->gradient_transform.f = 0; + + xmlNode *gradient = svgtiny_find_element_by_id( + (xmlNode *) state->document, id); + fprintf(stderr, "gradient %p\n", gradient); + if (!gradient) { + fprintf(stderr, "gradient \"%s\" not found\n", id); + return; + } + + fprintf(stderr, "gradient name \"%s\"\n", gradient->name); + if (strcmp((const char *) gradient->name, "linearGradient") == 0) { + svgtiny_parse_linear_gradient(gradient, state); + } +} + + +/** + * Parse a element node. + * + * http://www.w3.org/TR/SVG11/pservers#LinearGradients + */ + +svgtiny_code svgtiny_parse_linear_gradient(xmlNode *linear, + struct svgtiny_parse_state *state) +{ + xmlAttr *href = xmlHasProp(linear, (const xmlChar *) "href"); + if (href && href->children->content[0] == '#') + svgtiny_find_gradient((const char *) href->children->content + + 1, state); + + for (xmlAttr *attr = linear->properties; attr; attr = attr->next) { + const char *name = (const char *) attr->name; + const char *content = (const char *) attr->children->content; + if (strcmp(name, "x1") == 0) + state->gradient_x1 = content; + else if (strcmp(name, "y1") == 0) + state->gradient_y1 = content; + else if (strcmp(name, "x2") == 0) + state->gradient_x2 = content; + else if (strcmp(name, "y2") == 0) + state->gradient_y2 = content; + else if (strcmp(name, "gradientUnits") == 0) + state->gradient_user_space_on_use = + strcmp(content, "userSpaceOnUse") == 0; + else if (strcmp(name, "gradientTransform") == 0) { + float a = 1, b = 0, c = 0, d = 1, e = 0, f = 0; + char *s = strdup(content); + if (!s) + return svgtiny_OUT_OF_MEMORY; + svgtiny_parse_transform(s, &a, &b, &c, &d, &e, &f); + free(s); + fprintf(stderr, "transform %g %g %g %g %g %g\n", + a, b, c, d, e, f); + state->gradient_transform.a = a; + state->gradient_transform.b = b; + state->gradient_transform.c = c; + state->gradient_transform.d = d; + state->gradient_transform.e = e; + state->gradient_transform.f = f; + } + } + + unsigned int i = 0; + for (xmlNode *stop = linear->children; stop; stop = stop->next) { + float offset = -1; + svgtiny_colour color = svgtiny_TRANSPARENT; + + if (stop->type != XML_ELEMENT_NODE) + continue; + if (strcmp((const char *) stop->name, "stop") != 0) + continue; + + for (xmlAttr *attr = stop->properties; attr; + attr = attr->next) { + const char *name = (const char *) attr->name; + const char *content = + (const char *) attr->children->content; + if (strcmp(name, "offset") == 0) + offset = svgtiny_parse_gradient_offset(content); + else if (strcmp(name, "stop-color") == 0) + svgtiny_parse_color(content, &color, state); + else if (strcmp(name, "style") == 0) { + const char *s; + char *value; + if ((s = strstr(content, "stop-color:"))) { + s += 11; + while (*s == ' ') + s++; + value = strndup(s, strcspn(s, "; ")); + svgtiny_parse_color(value, &color, + state); + free(value); + } + } + } + + if (offset != -1 && color != svgtiny_TRANSPARENT) { + fprintf(stderr, "stop %g %x\n", offset, color); + state->gradient_stop[i].offset = offset; + state->gradient_stop[i].color = color; + i++; + } + + if (i == svgtiny_MAX_STOPS) + break; + } + + if (i) + state->linear_gradient_stop_count = i; + + return svgtiny_OK; +} + + +float svgtiny_parse_gradient_offset(const char *s) +{ + int num_length = strspn(s, "0123456789+-."); + const char *unit = s + num_length; + float n = atof((const char *) s); + + if (unit[0] == 0) + ; + else if (unit[0] == '%') + n /= 100.0; + else + return -1; + + if (n < 0) + n = 0; + if (1 < n) + n = 1; + return n; +} + + +/** + * Add a path with a linear gradient fill to the svgtiny_diagram. + */ + +svgtiny_code svgtiny_add_path_linear_gradient(float *p, unsigned int n, + struct svgtiny_parse_state *state) +{ + /* determine object bounding box */ + float object_x0, object_y0, object_x1, object_y1; + svgtiny_path_bbox(p, n, &object_x0, &object_y0, &object_x1, &object_y1); + #ifdef GRADIENT_DEBUG + fprintf(stderr, "object bbox: (%g %g) (%g %g)\n", + object_x0, object_y0, object_x1, object_y1); + #endif + + /* compute gradient vector */ + fprintf(stderr, "x1 %s, y1 %s, x2 %s, y2 %s\n", + state->gradient_x1, state->gradient_y1, + state->gradient_x2, state->gradient_y2); + float gradient_x0, gradient_y0, gradient_x1, gradient_y1, + gradient_dx, gradient_dy; + if (!state->gradient_user_space_on_use) { + gradient_x0 = object_x0 + + svgtiny_parse_length(state->gradient_x1, + object_x1 - object_x0, *state); + gradient_y0 = object_y0 + + svgtiny_parse_length(state->gradient_y1, + object_y1 - object_y0, *state); + gradient_x1 = object_x0 + + svgtiny_parse_length(state->gradient_x2, + object_x1 - object_x0, *state); + gradient_y1 = object_y0 + + svgtiny_parse_length(state->gradient_y2, + object_y1 - object_y0, *state); + } else { + gradient_x0 = svgtiny_parse_length(state->gradient_x1, + state->viewport_width, *state); + gradient_y0 = svgtiny_parse_length(state->gradient_y1, + state->viewport_height, *state); + gradient_x1 = svgtiny_parse_length(state->gradient_x2, + state->viewport_width, *state); + gradient_y1 = svgtiny_parse_length(state->gradient_y2, + state->viewport_height, *state); + } + gradient_dx = gradient_x1 - gradient_x0; + gradient_dy = gradient_y1 - gradient_y0; + #ifdef GRADIENT_DEBUG + fprintf(stderr, "gradient vector: (%g %g) => (%g %g)\n", + gradient_x0, gradient_y0, gradient_x1, gradient_y1); + #endif + + /* show theoretical gradient strips for debugging */ + /*unsigned int strips = 10; + for (unsigned int z = 0; z != strips; z++) { + float f0, fd, strip_x0, strip_y0, strip_dx, strip_dy; + f0 = (float) z / (float) strips; + fd = (float) 1 / (float) strips; + strip_x0 = gradient_x0 + f0 * gradient_dx; + strip_y0 = gradient_y0 + f0 * gradient_dy; + strip_dx = fd * gradient_dx; + strip_dy = fd * gradient_dy; + fprintf(stderr, "strip %i vector: (%g %g) + (%g %g)\n", + z, strip_x0, strip_y0, strip_dx, strip_dy); + + float *p = malloc(13 * sizeof p[0]); + if (!p) + return svgtiny_OUT_OF_MEMORY; + p[0] = svgtiny_PATH_MOVE; + p[1] = strip_x0 + (strip_dy * 3); + p[2] = strip_y0 - (strip_dx * 3); + p[3] = svgtiny_PATH_LINE; + p[4] = p[1] + strip_dx; + p[5] = p[2] + strip_dy; + p[6] = svgtiny_PATH_LINE; + p[7] = p[4] - (strip_dy * 6); + p[8] = p[5] + (strip_dx * 6); + p[9] = svgtiny_PATH_LINE; + p[10] = p[7] - strip_dx; + p[11] = p[8] - strip_dy; + p[12] = svgtiny_PATH_CLOSE; + svgtiny_transform_path(p, 13, state); + struct svgtiny_shape *shape = svgtiny_add_shape(state); + if (!shape) { + free(p); + return svgtiny_OUT_OF_MEMORY; + } + shape->path = p; + shape->path_length = 13; + shape->fill = svgtiny_TRANSPARENT; + shape->stroke = svgtiny_RGB(0, 0xff, 0); + state->diagram->shape_count++; + }*/ + + /* invert gradient transform for applying to vertices */ + float trans[6]; + svgtiny_invert_matrix(&state->gradient_transform.a, trans); + fprintf(stderr, "inverse transform %g %g %g %g %g %g\n", + trans[0], trans[1], trans[2], trans[3], + trans[4], trans[5]); + + /* compute points on the path for triangle vertices */ + /* r, r0, r1 are distance along gradient vector */ + unsigned int steps = 10; + float x0, y0, x0_trans, y0_trans, r0; /* segment start point */ + float x1, y1, x1_trans, y1_trans, r1; /* segment end point */ + float c0x, c0y, c1x, c1y; /* segment control points (beziers only) */ + float gradient_norm_squared = gradient_dx * gradient_dx + + gradient_dy * gradient_dy; + struct grad_point { + float x, y, r; + }; + struct svgtiny_list *pts = svgtiny_list_create( + sizeof (struct grad_point)); + if (!pts) + return svgtiny_OUT_OF_MEMORY; + float min_r = 1000; + unsigned int min_pt = 0; + for (unsigned int j = 0; j != n; ) { + int segment_type = (int) p[j]; + + if (segment_type == svgtiny_PATH_MOVE) { + x0 = p[j + 1]; + y0 = p[j + 2]; + j += 3; + continue; + } + + assert(segment_type == svgtiny_PATH_CLOSE || + segment_type == svgtiny_PATH_LINE || + segment_type == svgtiny_PATH_BEZIER); + + /* start point (x0, y0) */ + x0_trans = trans[0]*x0 + trans[2]*y0 + trans[4]; + y0_trans = trans[1]*x0 + trans[3]*y0 + trans[5]; + r0 = ((x0_trans - gradient_x0) * gradient_dx + + (y0_trans - gradient_y0) * gradient_dy) / + gradient_norm_squared; + struct grad_point *point = svgtiny_list_push(pts); + if (!point) { + svgtiny_list_free(pts); + return svgtiny_OUT_OF_MEMORY; + } + point->x = x0; + point->y = y0; + point->r = r0; + if (r0 < min_r) { + min_r = r0; + min_pt = svgtiny_list_size(pts) - 1; + } + + /* end point (x1, y1) */ + if (segment_type == svgtiny_PATH_LINE) { + x1 = p[j + 1]; + y1 = p[j + 2]; + j += 3; + } else if (segment_type == svgtiny_PATH_CLOSE) { + x1 = p[1]; + y1 = p[2]; + j++; + } else /* svgtiny_PATH_BEZIER */ { + c0x = p[j + 1]; + c0y = p[j + 2]; + c1x = p[j + 3]; + c1y = p[j + 4]; + x1 = p[j + 5]; + y1 = p[j + 6]; + j += 7; + } + x1_trans = trans[0]*x1 + trans[2]*y1 + trans[4]; + y1_trans = trans[1]*x1 + trans[3]*y1 + trans[5]; + r1 = ((x1_trans - gradient_x0) * gradient_dx + + (y1_trans - gradient_y0) * gradient_dy) / + gradient_norm_squared; + + /* determine steps from change in r */ + steps = ceilf(fabsf(r1 - r0) / 0.05); + if (steps == 0) + steps = 1; + fprintf(stderr, "r0 %g, r1 %g, steps %i\n", + r0, r1, steps); + + /* loop through intermediate points */ + for (unsigned int z = 1; z != steps; z++) { + float t, x, y, x_trans, y_trans, r; + t = (float) z / (float) steps; + if (segment_type == svgtiny_PATH_BEZIER) { + x = (1-t) * (1-t) * (1-t) * x0 + + 3 * t * (1-t) * (1-t) * c0x + + 3 * t * t * (1-t) * c1x + + t * t * t * x1; + y = (1-t) * (1-t) * (1-t) * y0 + + 3 * t * (1-t) * (1-t) * c0y + + 3 * t * t * (1-t) * c1y + + t * t * t * y1; + } else { + x = (1-t) * x0 + t * x1; + y = (1-t) * y0 + t * y1; + } + x_trans = trans[0]*x + trans[2]*y + trans[4]; + y_trans = trans[1]*x + trans[3]*y + trans[5]; + r = ((x_trans - gradient_x0) * gradient_dx + + (y_trans - gradient_y0) * gradient_dy) / + gradient_norm_squared; + fprintf(stderr, "(%g %g [%g]) ", x, y, r); + struct grad_point *point = svgtiny_list_push(pts); + if (!point) { + svgtiny_list_free(pts); + return svgtiny_OUT_OF_MEMORY; + } + point->x = x; + point->y = y; + point->r = r; + if (r < min_r) { + min_r = r; + min_pt = svgtiny_list_size(pts) - 1; + } + } + fprintf(stderr, "\n"); + + /* next segment start point is this segment end point */ + x0 = x1; + y0 = y1; + } + fprintf(stderr, "pts size %i, min_pt %i, min_r %.3f\n", + svgtiny_list_size(pts), min_pt, min_r); + + /* render triangles */ + unsigned int stop_count = state->linear_gradient_stop_count; + assert(2 <= stop_count); + unsigned int current_stop = 0; + float last_stop_r = 0; + float current_stop_r = state->gradient_stop[0].offset; + int red0, green0, blue0, red1, green1, blue1; + red0 = red1 = svgtiny_RED(state->gradient_stop[0].color); + green0 = green1 = svgtiny_GREEN(state->gradient_stop[0].color); + blue0 = blue1 = svgtiny_BLUE(state->gradient_stop[0].color); + unsigned int t, a, b; + t = min_pt; + a = (min_pt + 1) % svgtiny_list_size(pts); + b = min_pt == 0 ? svgtiny_list_size(pts) - 1 : min_pt - 1; + while (a != b) { + struct grad_point *point_t = svgtiny_list_get(pts, t); + struct grad_point *point_a = svgtiny_list_get(pts, a); + struct grad_point *point_b = svgtiny_list_get(pts, b); + float mean_r = (point_t->r + point_a->r + point_b->r) / 3; + /*fprintf(stderr, "triangle: t %i %.3f a %i %.3f b %i %.3f " + "mean_r %.3f\n", + t, pts[t].r, a, pts[a].r, b, pts[b].r, + mean_r);*/ + while (current_stop != stop_count && current_stop_r < mean_r) { + current_stop++; + if (current_stop == stop_count) + break; + red0 = red1; + green0 = green1; + blue0 = blue1; + red1 = svgtiny_RED(state-> + gradient_stop[current_stop].color); + green1 = svgtiny_GREEN(state-> + gradient_stop[current_stop].color); + blue1 = svgtiny_BLUE(state-> + gradient_stop[current_stop].color); + last_stop_r = current_stop_r; + current_stop_r = state-> + gradient_stop[current_stop].offset; + } + float *p = malloc(10 * sizeof p[0]); + if (!p) + return svgtiny_OUT_OF_MEMORY; + p[0] = svgtiny_PATH_MOVE; + p[1] = point_t->x; + p[2] = point_t->y; + p[3] = svgtiny_PATH_LINE; + p[4] = point_a->x; + p[5] = point_a->y; + p[6] = svgtiny_PATH_LINE; + p[7] = point_b->x; + p[8] = point_b->y; + p[9] = svgtiny_PATH_CLOSE; + svgtiny_transform_path(p, 10, state); + struct svgtiny_shape *shape = svgtiny_add_shape(state); + if (!shape) { + free(p); + return svgtiny_OUT_OF_MEMORY; + } + shape->path = p; + shape->path_length = 10; + /*shape->fill = svgtiny_TRANSPARENT;*/ + if (current_stop == 0) + shape->fill = state->gradient_stop[0].color; + else if (current_stop == stop_count) + shape->fill = state-> + gradient_stop[stop_count - 1].color; + else { + float stop_r = (mean_r - last_stop_r) / + (current_stop_r - last_stop_r); + shape->fill = svgtiny_RGB( + (int) ((1 - stop_r) * red0 + stop_r * red1), + (int) ((1 - stop_r) * green0 + stop_r * green1), + (int) ((1 - stop_r) * blue0 + stop_r * blue1)); + } + shape->stroke = svgtiny_TRANSPARENT; + #ifdef GRADIENT_DEBUG + shape->stroke = svgtiny_RGB(0, 0, 0xff); + #endif + state->diagram->shape_count++; + if (point_a->r < point_b->r) { + t = a; + a = (a + 1) % svgtiny_list_size(pts); + } else { + t = b; + b = b == 0 ? svgtiny_list_size(pts) - 1 : b - 1; + } + } + + /* render gradient vector for debugging */ + #ifdef GRADIENT_DEBUG + { + float *p = malloc(7 * sizeof p[0]); + if (!p) + return svgtiny_OUT_OF_MEMORY; + p[0] = svgtiny_PATH_MOVE; + p[1] = gradient_x0; + p[2] = gradient_y0; + p[3] = svgtiny_PATH_LINE; + p[4] = gradient_x1; + p[5] = gradient_y1; + p[6] = svgtiny_PATH_CLOSE; + svgtiny_transform_path(p, 7, state); + struct svgtiny_shape *shape = svgtiny_add_shape(state); + if (!shape) { + free(p); + return svgtiny_OUT_OF_MEMORY; + } + shape->path = p; + shape->path_length = 7; + shape->fill = svgtiny_TRANSPARENT; + shape->stroke = svgtiny_RGB(0xff, 0, 0); + state->diagram->shape_count++; + } + #endif + + /* render triangle vertices with r values for debugging */ + #ifdef GRADIENT_DEBUG + for (unsigned int i = 0; i != pts->size; i++) { + struct grad_point *point = svgtiny_list_get(pts, i); + struct svgtiny_shape *shape = svgtiny_add_shape(state); + if (!shape) + return svgtiny_OUT_OF_MEMORY; + char *text = malloc(20); + if (!text) + return svgtiny_OUT_OF_MEMORY; + sprintf(text, "%i=%.3f", i, point->r); + shape->text = text; + shape->text_x = state->ctm.a * point->x + + state->ctm.c * point->y + state->ctm.e; + shape->text_y = state->ctm.b * point->x + + state->ctm.d * point->y + state->ctm.f; + shape->fill = svgtiny_RGB(0, 0, 0); + shape->stroke = svgtiny_TRANSPARENT; + state->diagram->shape_count++; + } + #endif + + /* plot actual path outline */ + if (state->stroke != svgtiny_TRANSPARENT) { + svgtiny_transform_path(p, n, state); + + struct svgtiny_shape *shape = svgtiny_add_shape(state); + if (!shape) { + free(p); + return svgtiny_OUT_OF_MEMORY; + } + shape->path = p; + shape->path_length = n; + shape->fill = svgtiny_TRANSPARENT; + state->diagram->shape_count++; + } else { + free(p); + } + + svgtiny_list_free(pts); + + return svgtiny_OK; +} + + +/** + * Get the bounding box of path. + */ + +void svgtiny_path_bbox(float *p, unsigned int n, + float *x0, float *y0, float *x1, float *y1) +{ + *x0 = *x1 = p[1]; + *y0 = *y1 = p[2]; + + for (unsigned int j = 0; j != n; ) { + unsigned int points = 0; + switch ((int) p[j]) { + case svgtiny_PATH_MOVE: + case svgtiny_PATH_LINE: + points = 1; + break; + case svgtiny_PATH_CLOSE: + points = 0; + break; + case svgtiny_PATH_BEZIER: + points = 3; + break; + default: + assert(0); + } + j++; + for (unsigned int k = 0; k != points; k++) { + float x = p[j], y = p[j + 1]; + if (x < *x0) + *x0 = x; + else if (*x1 < x) + *x1 = x; + if (y < *y0) + *y0 = y; + else if (*y1 < y) + *y1 = y; + j += 2; + } + } +} + + +/** + * Invert a transformation matrix. + */ +void svgtiny_invert_matrix(float *m, float *inv) +{ + float determinant = m[0]*m[3] - m[1]*m[2]; + inv[0] = m[3] / determinant; + inv[1] = -m[1] / determinant; + inv[2] = -m[2] / determinant; + inv[3] = m[0] / determinant; + inv[4] = (m[2]*m[5] - m[3]*m[4]) / determinant; + inv[5] = (m[1]*m[4] - m[0]*m[5]) / determinant; +} + + +/** + * Find an element in the document by id. + */ + +xmlNode *svgtiny_find_element_by_id(xmlNode *node, const char *id) +{ + xmlNode *child; + xmlNode *found; + + for (child = node->children; child; child = child->next) { + if (child->type != XML_ELEMENT_NODE) + continue; + xmlAttr *attr = xmlHasProp(child, (const xmlChar *) "id"); + if (attr && strcmp(id, (const char *) attr->children->content) + == 0) + return child; + found = svgtiny_find_element_by_id(child, id); + if (found) + return found; + } + + return 0; +} + diff --git a/src/svgtiny_internal.h b/src/svgtiny_internal.h new file mode 100644 index 0000000..f07f430 --- /dev/null +++ b/src/svgtiny_internal.h @@ -0,0 +1,84 @@ +/* + * This file is part of Libsvgtiny + * Licensed under the MIT License, + * http://opensource.org/licenses/mit-license.php + * Copyright 2008 James Bursa + */ + +#ifndef SVGTINY_INTERNAL_H +#define SVGTINY_INTERNAL_H + +#include + +struct svgtiny_gradient_stop { + float offset; + svgtiny_colour color; +}; + +#define svgtiny_MAX_STOPS 10 +#define svgtiny_LINEAR_GRADIENT 0x2000000 + +struct svgtiny_parse_state { + struct svgtiny_diagram *diagram; + xmlDoc *document; + + float viewport_width; + float viewport_height; + + /* current transformation matrix */ + struct { + float a, b, c, d, e, f; + } ctm; + + /*struct css_style style;*/ + + /* paint attributes */ + svgtiny_colour fill; + svgtiny_colour stroke; + int stroke_width; + + /* gradients */ + unsigned int linear_gradient_stop_count; + const char *gradient_x1, *gradient_y1, *gradient_x2, *gradient_y2; + struct svgtiny_gradient_stop gradient_stop[svgtiny_MAX_STOPS]; + bool gradient_user_space_on_use; + struct { + float a, b, c, d, e, f; + } gradient_transform; +}; + +struct svgtiny_list; + +/* svgtiny.c */ +float svgtiny_parse_length(const char *s, int viewport_size, + const struct svgtiny_parse_state state); +void svgtiny_parse_color(const char *s, svgtiny_colour *c, + struct svgtiny_parse_state *state); +void svgtiny_parse_transform(char *s, float *ma, float *mb, + float *mc, float *md, float *me, float *mf); +struct svgtiny_shape *svgtiny_add_shape(struct svgtiny_parse_state *state); +void svgtiny_transform_path(float *p, unsigned int n, + struct svgtiny_parse_state *state); + +/* svgtiny_gradient.c */ +void svgtiny_find_gradient(const char *id, struct svgtiny_parse_state *state); +svgtiny_code svgtiny_add_path_linear_gradient(float *p, unsigned int n, + struct svgtiny_parse_state *state); +xmlNode *svgtiny_find_element_by_id(xmlNode *node, const char *id); + +/* svgtiny_list.c */ +struct svgtiny_list *svgtiny_list_create(size_t item_size); +unsigned int svgtiny_list_size(struct svgtiny_list *list); +svgtiny_code svgtiny_list_resize(struct svgtiny_list *list, + unsigned int new_size); +void *svgtiny_list_get(struct svgtiny_list *list, + unsigned int i); +void *svgtiny_list_push(struct svgtiny_list *list); +void svgtiny_list_free(struct svgtiny_list *list); + +/* colors.gperf */ +const struct svgtiny_named_color * + svgtiny_color_lookup(register const char *str, + register unsigned int len); + +#endif diff --git a/src/svgtiny_list.c b/src/svgtiny_list.c new file mode 100644 index 0000000..53cfb34 --- /dev/null +++ b/src/svgtiny_list.c @@ -0,0 +1,125 @@ +/* + * This file is part of Libsvgtiny + * Licensed under the MIT License, + * http://opensource.org/licenses/mit-license.php + * Copyright 2008 James Bursa + */ + +/** + * A svgtiny_list is a managed array of objects. It grows in chunks to reduce + * calls to realloc(), but keeps wasted space low. + */ + +#include +#include "svgtiny.h" +#include "svgtiny_internal.h" + + +struct svgtiny_list { + unsigned int size; /* number of slots used */ + unsigned int allocated; /* number of slots allocated (>= size) */ + size_t item_size; /* size of each slot / bytes */ + char *items; /* array of slots */ +}; + + +/** + * Create an empty svgtiny_list. + */ + +struct svgtiny_list *svgtiny_list_create(size_t item_size) +{ + struct svgtiny_list *list = malloc(sizeof *list); + if (!list) + return 0; + list->size = 0; + list->allocated = 0; + list->item_size = item_size; + list->items = 0; + return list; +} + + +/** + * Return the number of objects in a list. + */ + +unsigned int svgtiny_list_size(struct svgtiny_list *list) +{ + return list->size; +} + + +/** + * Set the number of objects in a list. If the size is increased, the new + * objects are not initialized in any way. + * + * The allocation size formula is taken from Python's list: + * http://svn.python.org/view/python/trunk/Objects/listobject.c?view=markup + * + * Objects may have moved after this call. Use svgtiny_list_get() to get new + * pointers. + */ + +svgtiny_code svgtiny_list_resize(struct svgtiny_list *list, + unsigned int new_size) +{ + unsigned int new_allocated; + void *new_items; + + if (new_size <= list->allocated) { + list->size = new_size; + return svgtiny_OK; + } + + new_allocated = (new_size >> 3) + (new_size < 9 ? 3 : 6) + new_size; + if (new_size == 0) + new_allocated = 0; + new_items = realloc(list->items, new_allocated * list->item_size); + if (!new_items) + return svgtiny_OUT_OF_MEMORY; + + list->size = new_size; + list->allocated = new_allocated; + list->items = new_items; + + return svgtiny_OK; +} + + +/** + * Return a pointer to an object in a list. + */ + +void *svgtiny_list_get(struct svgtiny_list *list, + unsigned int i) +{ + assert(i < list->size); + return (void *) (list->items + i * list->item_size); +} + + +/** + * Add space for one object to a list and return a pointer to it. + */ + +void *svgtiny_list_push(struct svgtiny_list *list) +{ + svgtiny_code code; + code = svgtiny_list_resize(list, list->size + 1); + if (code != svgtiny_OK) + return 0; + return svgtiny_list_get(list, list->size - 1); +} + + +/** + * Free an entire list. + */ + +void svgtiny_list_free(struct svgtiny_list *list) +{ + free(list->items); + free(list); +} + -- cgit v1.2.3