MadButterfly: src/shape_path.c annotate

annotate src/shape_path.c @ 97:9453e68092b5

Fix bug of translation relative to absolute points

author	Thinker K.F. Li <thinker@branda.to>
date	Thu, 04 Sep 2008 08:21:39 +0800
parents	ca94493b75bb
children	688f76b8e71c

rev	line source
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	1 #include <stdio.h>
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	2 #include <stdlib.h>
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	3 #include <ctype.h>
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	4 #include <string.h>
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	5 #include <cairo.h>
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	6 #include "mb_types.h"
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	7
8 94b4b5bd8810 - Thinker K.F. Li <thinker@branda.to> parents: 7 diff changeset	8 /*! \brief Implement respective objects for SVG path tag.
94b4b5bd8810 - Thinker K.F. Li <thinker@branda.to> parents: 7 diff changeset	9 *
94b4b5bd8810 - Thinker K.F. Li <thinker@branda.to> parents: 7 diff changeset	10 * In user_data or dev_data, 0x00 bytes are padding after commands.
94b4b5bd8810 - Thinker K.F. Li <thinker@branda.to> parents: 7 diff changeset	11 * No commands other than 0x00 can resident after 0x00 itself.
94b4b5bd8810 - Thinker K.F. Li <thinker@branda.to> parents: 7 diff changeset	12 * It means command processing code can skip commands after a 0x00.
12 79e9edf4c00a Add redraw manager Thinker K.F. Li <thinker@branda.to> parents: 11 diff changeset	13 *
79e9edf4c00a Add redraw manager Thinker K.F. Li <thinker@branda.to> parents: 11 diff changeset	14 * Shapes should check if shape_t::geo is assigned. Once transformation
79e9edf4c00a Add redraw manager Thinker K.F. Li <thinker@branda.to> parents: 11 diff changeset	15 * matrics are changed, shape objects should update shape_t::geo if
79e9edf4c00a Add redraw manager Thinker K.F. Li <thinker@branda.to> parents: 11 diff changeset	16 * it is assigned.
8 94b4b5bd8810 - Thinker K.F. Li <thinker@branda.to> parents: 7 diff changeset	17 */
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	18 typedef struct _sh_path {
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	19 shape_t shape;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	20 int cmd_len;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	21 int arg_len;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	22 char *user_data;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	23 char dev_data; / device space data */
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	24 } sh_path_t;
10 7cfecdce94cc Remove warning messages Thinker K.F. Li <thinker@branda.to> parents: 9 diff changeset	25 #define RESERVED_AIXS sizeof(co_aix[2])
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	26
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	27 #define ASSERT(x)
11 128af06c876c Fix the bug that data of a path end with white spaces would make system down Thinker K.F. Li <thinker@branda.to> parents: 10 diff changeset	28 #define SKIP_SPACE(x) while((x) && (isspace((x)) \|\| *(x) == ',')) { (x)++; }
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	29 #define SKIP_NUM(x) \
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	30 while(*(x) && \
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	31 (isdigit(*(x)) \|\| \
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	32 *(x) == '-' \|\| \
11 128af06c876c Fix the bug that data of a path end with white spaces would make system down Thinker K.F. Li <thinker@branda.to> parents: 10 diff changeset	33 *(x) == '+' \|\| \
128af06c876c Fix the bug that data of a path end with white spaces would make system down Thinker K.F. Li <thinker@branda.to> parents: 10 diff changeset	34 *(x) == '.')) { \
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	35 (x)++; \
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	36 }
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	37 #define OK 0
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	38 #define ERR -1
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	39
73 9ab15ebc9061 Observer for mouse events Thinker K.F. Li <thinker@branda.to> parents: 58 diff changeset	40 static void sh_path_free(shape_t *shape) {
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	41 sh_path_t path = (sh_path_t )shape;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	42 if(path->user_data)
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	43 free(path->user_data);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	44 if(path->dev_data)
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	45 free(path->dev_data);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	46 free(path);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	47 }
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	48
86 7d0580f89468 Fix bug of dealing matrix(). Thinker K.F. Li <thinker@branda.to> parents: 73 diff changeset	49 /*! \brief Count number of arguments.
7d0580f89468 Fix bug of dealing matrix(). Thinker K.F. Li <thinker@branda.to> parents: 73 diff changeset	50 *
7d0580f89468 Fix bug of dealing matrix(). Thinker K.F. Li <thinker@branda.to> parents: 73 diff changeset	51 * \todo Notify programmers that syntax or value error of path data.
7d0580f89468 Fix bug of dealing matrix(). Thinker K.F. Li <thinker@branda.to> parents: 73 diff changeset	52 */
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	53 static int sh_path_cmd_arg_cnt(char data, int cmd_cntp, int *arg_cntp) {
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	54 char p, old;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	55 int cmd_cnt, arg_cnt;
96 ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	56 int i;
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	57
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	58 cmd_cnt = arg_cnt = 0;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	59 p = data;
11 128af06c876c Fix the bug that data of a path end with white spaces would make system down Thinker K.F. Li <thinker@branda.to> parents: 10 diff changeset	60 SKIP_SPACE(p);
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	61 while(*p) {
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	62 switch(*p++) {
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	63 case 'c':
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	64 case 'C':
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	65 while(*p) {
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	66 old = p;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	67 SKIP_SPACE(p);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	68 old = p;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	69 SKIP_NUM(p);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	70 if(p == old)
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	71 break;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	72 arg_cnt++;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	73
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	74 SKIP_SPACE(p);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	75 old = p;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	76 SKIP_NUM(p);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	77 if(p == old)
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	78 return ERR;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	79 arg_cnt++;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	80
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	81 SKIP_SPACE(p);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	82 old = p;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	83 SKIP_NUM(p);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	84 if(p == old)
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	85 return ERR;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	86 arg_cnt++;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	87
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	88 SKIP_SPACE(p);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	89 old = p;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	90 SKIP_NUM(p);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	91 if(p == old)
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	92 return ERR;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	93 arg_cnt++;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	94 SKIP_SPACE(p);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	95 old = p;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	96 SKIP_NUM(p);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	97 if(p == old)
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	98 return ERR;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	99 arg_cnt++;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	100
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	101 SKIP_SPACE(p);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	102 old = p;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	103 SKIP_NUM(p);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	104 if(p == old)
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	105 return ERR;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	106 arg_cnt++;
97 9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	107
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	108 cmd_cnt++;
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	109 }
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	110 break;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	111 case 's':
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	112 case 'S':
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	113 case 'q':
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	114 case 'Q':
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	115 while(*p) {
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	116 old = p;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	117 SKIP_SPACE(p);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	118 old = p;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	119 SKIP_NUM(p);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	120 if(p == old)
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	121 break;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	122 arg_cnt++;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	123
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	124 SKIP_SPACE(p);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	125 old = p;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	126 SKIP_NUM(p);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	127 if(p == old)
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	128 return ERR;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	129 arg_cnt++;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	130
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	131 SKIP_SPACE(p);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	132 old = p;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	133 SKIP_NUM(p);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	134 if(p == old)
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	135 return ERR;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	136 arg_cnt++;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	137
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	138 SKIP_SPACE(p);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	139 old = p;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	140 SKIP_NUM(p);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	141 if(p == old)
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	142 return ERR;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	143 arg_cnt++;
97 9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	144
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	145 cmd_cnt++;
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	146 }
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	147 break;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	148 case 'm':
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	149 case 'M':
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	150 case 'l':
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	151 case 'L':
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	152 case 't':
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	153 case 'T':
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	154 while(*p) {
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	155 old = p;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	156 SKIP_SPACE(p);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	157 old = p;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	158 SKIP_NUM(p);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	159 if(p == old)
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	160 break;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	161 arg_cnt++;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	162
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	163 SKIP_SPACE(p);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	164 old = p;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	165 SKIP_NUM(p);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	166 if(p == old)
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	167 return ERR;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	168 arg_cnt++;
97 9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	169
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	170 cmd_cnt++;
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	171 }
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	172 break;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	173 case 'h':
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	174 case 'H':
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	175 case 'v':
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	176 case 'V':
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	177 while(*p) {
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	178 SKIP_SPACE(p);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	179 old = p;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	180 SKIP_NUM(p);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	181 if(p == old)
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	182 break;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	183 arg_cnt += 2;
97 9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	184
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	185 cmd_cnt++;
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	186 }
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	187 break;
96 ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	188 case 'A':
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	189 case 'a':
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	190 while(*p) {
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	191 SKIP_SPACE(p);
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	192 old = p;
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	193 SKIP_NUM(p);
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	194 if(p == old)
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	195 break;
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	196
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	197 for(i = 0; i < 6; i++) {
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	198 SKIP_SPACE(p);
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	199 old = p;
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	200 SKIP_NUM(p);
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	201 if(p == old)
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	202 return ERR;
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	203 }
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	204
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	205 arg_cnt += 6;
97 9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	206
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	207 cmd_cnt++;
96 ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	208 }
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	209 break;
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	210 case 'z':
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	211 case 'Z':
97 9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	212 cmd_cnt++;
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	213 break;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	214 default:
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	215 return ERR;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	216 }
96 ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	217 /! \todo cmd_cnt should be increased for each implicit repeating. /
11 128af06c876c Fix the bug that data of a path end with white spaces would make system down Thinker K.F. Li <thinker@branda.to> parents: 10 diff changeset	218 SKIP_SPACE(p);
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	219 }
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	220
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	221 *cmd_cntp = cmd_cnt;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	222 *arg_cntp = arg_cnt;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	223 return OK;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	224 }
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	225
97 9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	226 #include <math.h>
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	227 /*! \brief Calculate center of the ellipse of an arc.
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	228 *
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	229 * - ux0 = x0 / rx
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	230 * - uy0 = y0 / ry
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	231 * - ux = x / rx
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	232 * - uy = y / rx
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	233 * ux0, uy0, ux, yu are got by transforming (x0, y0) and (x, y) into points
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	234 * on the unit circle. The center of unit circle are (ucx, ucy):
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	235 * - umx = (ux0 + ux) / 2
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	236 * - umy = (uy0 + uy) / 2
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	237 * - udcx = ucx - umx
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	238 * - udcy = ucy - umy
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	239 * - udx = ux - umx
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	240 * - udy = uy - umy
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	241 * - udcx * udx + udcy * udy = 0
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	242 * - udcy = - udcx * udx / udy
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	243 * - udcx 2 + udcy 2 + udx 2 + udy 2 = 1
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	244 * - udcx ** 2 + (udcx * udx / udy) 2 = 1 - udx 2 - udy ** 2
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	245 * - udcx 2 = (1 - udx 2 - udy 2) / (1 + (udx/udy) 2)
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	246 *
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	247 * - cx = rx * ucx
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	248 * - cx = rx * (udcx + umx)
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	249 * - cy = ry * ucy
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	250 * - cy = ry * (udcy + umy)
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	251 */
96 ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	252 static int calc_center_and_x_aix(co_aix x0, co_aix y0,
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	253 co_aix x, co_aix y,
97 9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	254 co_aix rx, co_aix ry,
96 ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	255 co_aix x_rotate,
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	256 int large, int sweep,
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	257 co_aix cx, co_aix cy,
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	258 co_aix xx, co_aix xy) {
97 9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	259 co_aix nrx, nry, nrx0, nry0;
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	260 co_aix udx, udy, udx2, udy2;
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	261 co_aix umx, umy;
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	262 co_aix udcx, udcy;
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	263 co_aix nrcx, nrcy;
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	264 float _sin = sinf(x_rotate);
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	265 float _cos = cosf(x_rotate);
96 ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	266
97 9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	267 nrx = x * _cos + y * _sin;
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	268 nry = x * -_sin + y * _cos;
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	269 nrx0 = x0 * _cos + y0 * _sin;
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	270 nry0 = x0 * -_sin + y0 * _cos;
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	271
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	272 udx = (nrx - nrx0) / 2 / rx;
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	273 udy = (nry - nry0) / 2 / ry;
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	274 umx = (nrx + nrx0) / 2 / rx;
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	275 umy = (nry + nry0) / 2 / ry;
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	276 udx2 = udx * udx;
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	277 udy2 = udy * udy;
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	278 udcx = sqrtf((1 - udx2 - udy2) / (1 + udx2 / udy2));
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	279 udcy = - udcx * udx / udy;
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	280 nrcx = rx * (udcx + umx);
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	281 nrcy = ry * (udcy + umy);
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	282
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	283 cx = nrcx _cos - nrcy * _sin;
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	284 cy = nrcx _sin + nrcy * _cos;
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	285
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	286 xx = rx _cos + *cx;
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	287 xy = rx _sin + *cy;
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	288
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	289 return OK;
96 ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	290 }
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	291
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	292
97 9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	293 static int sh_path_arc_cmd_arg_fill(char cmd, char **cmds_p,
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	294 const char data_p, co_aix args_p) {
96 ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	295 co_aix rx, ry;
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	296 co_aix x_rotate;
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	297 int large, sweep;
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	298 co_aix x, y, x0, y0, cx, cy, xx, xy;
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	299 co_aix args = args_p;
97 9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	300 const char *old;
96 ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	301 const char *p;
97 9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	302 char *cmds;
96 ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	303
97 9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	304 p = *data_p;
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	305 cmds = *cmds_p;
96 ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	306 while(*p) {
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	307 SKIP_SPACE(p);
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	308 old = p;
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	309 SKIP_NUM(p);
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	310 if(p == old)
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	311 break;
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	312 rx = atof(old);
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	313
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	314 SKIP_SPACE(p);
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	315 old = p;
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	316 SKIP_NUM(p);
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	317 if(p == old)
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	318 return ERR;
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	319 ry = atof(old);
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	320
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	321 SKIP_SPACE(p);
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	322 old = p;
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	323 SKIP_NUM(p);
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	324 if(p == old)
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	325 return ERR;
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	326 x_rotate = atof(old);
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	327
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	328 SKIP_SPACE(p);
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	329 old = p;
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	330 SKIP_NUM(p);
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	331 if(p == old)
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	332 return ERR;
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	333 large = atoi(old);
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	334
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	335 SKIP_SPACE(p);
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	336 old = p;
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	337 SKIP_NUM(p);
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	338 if(p == old)
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	339 return ERR;
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	340 sweep = atoi(old);
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	341
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	342 SKIP_SPACE(p);
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	343 old = p;
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	344 SKIP_NUM(p);
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	345 if(p == old)
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	346 return ERR;
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	347 x = atof(old);
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	348
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	349 SKIP_SPACE(p);
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	350 old = p;
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	351 SKIP_NUM(p);
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	352 if(p == old)
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	353 return ERR;
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	354 y = atof(old);
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	355
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	356 x0 = *(args - 2);
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	357 y0 = *(args - 1);
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	358
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	359 if(islower(cmd)) {
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	360 x += x0;
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	361 y += y0;
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	362 }
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	363
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	364 calc_center_and_x_aix(x0, y0, x, y,
97 9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	365 rx, ry,
96 ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	366 x_rotate, large, sweep,
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	367 &cx, &cy, &xx, &xy);
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	368
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	369 *(args++) = cx;
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	370 *(args++) = cy;
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	371 *(args++) = xx;
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	372 *(args++) = xy;
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	373 *(args++) = x;
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	374 *(args++) = y;
97 9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	375
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	376 *cmds++ = toupper(cmd);
96 ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	377 }
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	378
97 9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	379 *data_p = p;
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	380 *args_p = args;
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	381 *cmds_p = cmds;
96 ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	382
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	383 return OK;
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	384 }
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	385
97 9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	386 void sh_path_arc_path(cairo_t cr, const co_aix *args) {
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	387
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	388 }
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	389
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	390 #define TO_ABSX islower(cmd)? x + atof(old): atof(old)
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	391 #define TO_ABSY islower(cmd)? y + atof(old): atof(old)
10 7cfecdce94cc Remove warning messages Thinker K.F. Li <thinker@branda.to> parents: 9 diff changeset	392
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	393 static int sh_path_cmd_arg_fill(char data, sh_path_t path) {
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	394 char p, old;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	395 char *cmds;
7 569f3168ba53 Clear background & tranform relative pos into absolute ones Thinker K.F. Li <thinker@branda.to> parents: 6 diff changeset	396 char cmd;
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	397 co_aix *args;
97 9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	398 co_aix x, y;
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	399 int r;
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	400
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	401 cmds = path->user_data;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	402 args = (co_aix *)(cmds + path->cmd_len);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	403 p = data;
11 128af06c876c Fix the bug that data of a path end with white spaces would make system down Thinker K.F. Li <thinker@branda.to> parents: 10 diff changeset	404 SKIP_SPACE(p);
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	405 while(*p) {
7 569f3168ba53 Clear background & tranform relative pos into absolute ones Thinker K.F. Li <thinker@branda.to> parents: 6 diff changeset	406 /* Transform all relative to absolute, */
97 9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	407 x = *(args - 2);
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	408 y = *(args - 1);
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	409
7 569f3168ba53 Clear background & tranform relative pos into absolute ones Thinker K.F. Li <thinker@branda.to> parents: 6 diff changeset	410 switch((cmd = *p++)) {
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	411 case 'c':
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	412 case 'C':
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	413 while(*p) {
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	414 old = p;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	415 SKIP_SPACE(p);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	416 old = p;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	417 SKIP_NUM(p);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	418 if(p == old)
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	419 break;
97 9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	420 *args = TO_ABSX;
10 7cfecdce94cc Remove warning messages Thinker K.F. Li <thinker@branda.to> parents: 9 diff changeset	421 args++;
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	422
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	423 SKIP_SPACE(p);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	424 old = p;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	425 SKIP_NUM(p);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	426 if(p == old)
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	427 return ERR;
97 9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	428 *args = TO_ABSY;
10 7cfecdce94cc Remove warning messages Thinker K.F. Li <thinker@branda.to> parents: 9 diff changeset	429 args++;
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	430
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	431 SKIP_SPACE(p);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	432 old = p;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	433 SKIP_NUM(p);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	434 if(p == old)
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	435 return ERR;
97 9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	436 *args = TO_ABSX;
10 7cfecdce94cc Remove warning messages Thinker K.F. Li <thinker@branda.to> parents: 9 diff changeset	437 args++;
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	438
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	439 SKIP_SPACE(p);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	440 old = p;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	441 SKIP_NUM(p);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	442 if(p == old)
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	443 return ERR;
97 9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	444 *args = TO_ABSY;
10 7cfecdce94cc Remove warning messages Thinker K.F. Li <thinker@branda.to> parents: 9 diff changeset	445 args++;
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	446 SKIP_SPACE(p);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	447 old = p;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	448 SKIP_NUM(p);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	449 if(p == old)
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	450 return ERR;
97 9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	451 *args = TO_ABSX;
10 7cfecdce94cc Remove warning messages Thinker K.F. Li <thinker@branda.to> parents: 9 diff changeset	452 args++;
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	453
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	454 SKIP_SPACE(p);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	455 old = p;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	456 SKIP_NUM(p);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	457 if(p == old)
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	458 return ERR;
97 9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	459 *args = TO_ABSY;
10 7cfecdce94cc Remove warning messages Thinker K.F. Li <thinker@branda.to> parents: 9 diff changeset	460 args++;
97 9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	461
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	462 *cmds++ = toupper(cmd);
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	463 }
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	464 break;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	465 case 's':
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	466 case 'S':
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	467 case 'q':
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	468 case 'Q':
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	469 while(*p) {
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	470 old = p;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	471 SKIP_SPACE(p);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	472 old = p;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	473 SKIP_NUM(p);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	474 if(p == old)
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	475 break;
97 9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	476 *args = TO_ABSX;
10 7cfecdce94cc Remove warning messages Thinker K.F. Li <thinker@branda.to> parents: 9 diff changeset	477 args++;
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	478
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	479 SKIP_SPACE(p);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	480 old = p;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	481 SKIP_NUM(p);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	482 if(p == old)
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	483 return ERR;
97 9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	484 *args = TO_ABSY;
10 7cfecdce94cc Remove warning messages Thinker K.F. Li <thinker@branda.to> parents: 9 diff changeset	485 args++;
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	486
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	487 SKIP_SPACE(p);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	488 old = p;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	489 SKIP_NUM(p);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	490 if(p == old)
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	491 return ERR;
97 9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	492 *args = TO_ABSX;
10 7cfecdce94cc Remove warning messages Thinker K.F. Li <thinker@branda.to> parents: 9 diff changeset	493 args++;
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	494
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	495 SKIP_SPACE(p);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	496 old = p;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	497 SKIP_NUM(p);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	498 if(p == old)
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	499 return ERR;
97 9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	500 *args = TO_ABSY;
10 7cfecdce94cc Remove warning messages Thinker K.F. Li <thinker@branda.to> parents: 9 diff changeset	501 args++;
97 9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	502
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	503 *cmds++ = toupper(cmd);
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	504 }
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	505 break;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	506 case 'm':
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	507 case 'M':
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	508 case 'l':
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	509 case 'L':
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	510 case 't':
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	511 case 'T':
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	512 while(*p) {
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	513 old = p;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	514 SKIP_SPACE(p);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	515 old = p;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	516 SKIP_NUM(p);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	517 if(p == old)
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	518 break;
97 9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	519 *args = TO_ABSX;
10 7cfecdce94cc Remove warning messages Thinker K.F. Li <thinker@branda.to> parents: 9 diff changeset	520 args++;
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	521
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	522 SKIP_SPACE(p);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	523 old = p;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	524 SKIP_NUM(p);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	525 if(p == old)
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	526 return ERR;
97 9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	527 *args = TO_ABSY;
10 7cfecdce94cc Remove warning messages Thinker K.F. Li <thinker@branda.to> parents: 9 diff changeset	528 args++;
97 9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	529
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	530 *cmds++ = toupper(cmd);
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	531 }
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	532 break;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	533 case 'h':
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	534 case 'H':
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	535 case 'v':
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	536 case 'V':
58 1ca417f741f1 - Thinker K.F. Li <thinker@branda.to> parents: 34 diff changeset	537 /! \todo implement h, H, v, V comamnds for path. /
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	538 return ERR;
96 ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	539
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	540 case 'A':
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	541 case 'a':
97 9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	542 r = sh_path_arc_cmd_arg_fill(cmd, &cmds, (const char **)&p, &args);
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	543 if(r != OK)
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	544 return ERR;
96 ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	545 break;
ca94493b75bb - Thinker K.F. Li <thinker@branda.to> parents: 86 diff changeset	546
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	547 case 'z':
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	548 case 'Z':
97 9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	549 *cmds++ = toupper(cmd);
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	550 break;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	551 default:
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	552 return ERR;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	553 }
11 128af06c876c Fix the bug that data of a path end with white spaces would make system down Thinker K.F. Li <thinker@branda.to> parents: 10 diff changeset	554 SKIP_SPACE(p);
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	555 }
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	556
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	557 return OK;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	558 }
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	559
9 6eecdd331fe7 Fix bug in testcase Thinker K.F. Li <thinker@branda.to> parents: 8 diff changeset	560 /*! \brief Create a path from value of 'data' of SVG path.
6eecdd331fe7 Fix bug in testcase Thinker K.F. Li <thinker@branda.to> parents: 8 diff changeset	561 */
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	562 shape_t sh_path_new(char data) {
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	563 sh_path_t *path;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	564 int cmd_cnt, arg_cnt;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	565 int r;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	566
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	567 r = sh_path_cmd_arg_cnt(data, &cmd_cnt, &arg_cnt);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	568 if(r == ERR)
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	569 return NULL;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	570
8 94b4b5bd8810 - Thinker K.F. Li <thinker@branda.to> parents: 7 diff changeset	571 /* Align at 4's boundary and keep 2 unused co_aix space
94b4b5bd8810 - Thinker K.F. Li <thinker@branda.to> parents: 7 diff changeset	572 * to make logic of transformation from relative to absolute
94b4b5bd8810 - Thinker K.F. Li <thinker@branda.to> parents: 7 diff changeset	573 * simple.
94b4b5bd8810 - Thinker K.F. Li <thinker@branda.to> parents: 7 diff changeset	574 */
10 7cfecdce94cc Remove warning messages Thinker K.F. Li <thinker@branda.to> parents: 9 diff changeset	575 cmd_cnt += RESERVED_AIXS;
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	576 cmd_cnt = (cmd_cnt + 3) & ~0x3;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	577
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	578 path = (sh_path_t *)malloc(sizeof(sh_path_t));
12 79e9edf4c00a Add redraw manager Thinker K.F. Li <thinker@branda.to> parents: 11 diff changeset	579 memset(&path->shape, 0, sizeof(shape_t));
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	580 path->shape.sh_type = SHT_PATH;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	581 path->cmd_len = cmd_cnt;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	582 path->arg_len = arg_cnt;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	583 path->user_data = (char )malloc(cmd_cnt + sizeof(co_aix) arg_cnt);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	584 if(path->user_data == NULL) {
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	585 free(path);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	586 return NULL;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	587 }
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	588 path->dev_data = (char )malloc(cmd_cnt + sizeof(co_aix) arg_cnt);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	589 if(path->dev_data == NULL) {
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	590 free(path->dev_data);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	591 free(path);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	592 return NULL;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	593 }
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	594
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	595 memset(path->user_data, 0, cmd_cnt);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	596 r = sh_path_cmd_arg_fill(data, path);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	597 if(r == ERR) {
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	598 free(path->user_data);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	599 free(path->dev_data);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	600 free(path);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	601 return NULL;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	602 }
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	603 memcpy(path->dev_data, path->user_data, cmd_cnt);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	604
73 9ab15ebc9061 Observer for mouse events Thinker K.F. Li <thinker@branda.to> parents: 58 diff changeset	605 path->shape.free = sh_path_free;
9ab15ebc9061 Observer for mouse events Thinker K.F. Li <thinker@branda.to> parents: 58 diff changeset	606
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	607 return (shape_t *)path;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	608 }
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	609
9 6eecdd331fe7 Fix bug in testcase Thinker K.F. Li <thinker@branda.to> parents: 8 diff changeset	610 /*! \brief Transform a path from user space to device space.
6eecdd331fe7 Fix bug in testcase Thinker K.F. Li <thinker@branda.to> parents: 8 diff changeset	611 *
58 1ca417f741f1 - Thinker K.F. Li <thinker@branda.to> parents: 34 diff changeset	612 * \todo associate coord_t with shape objects and transform them
9 6eecdd331fe7 Fix bug in testcase Thinker K.F. Li <thinker@branda.to> parents: 8 diff changeset	613 * automatically.
6eecdd331fe7 Fix bug in testcase Thinker K.F. Li <thinker@branda.to> parents: 8 diff changeset	614 */
12 79e9edf4c00a Add redraw manager Thinker K.F. Li <thinker@branda.to> parents: 11 diff changeset	615 void sh_path_transform(shape_t *shape) {
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	616 sh_path_t *path;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	617 co_aix user_args, dev_args;
12 79e9edf4c00a Add redraw manager Thinker K.F. Li <thinker@branda.to> parents: 11 diff changeset	618 co_aix (*poses)[2];
26 d50f33040de6 Set line width for path. Thinker K.F. Li <thinker@branda.to> parents: 22 diff changeset	619 area_t *area;
12 79e9edf4c00a Add redraw manager Thinker K.F. Li <thinker@branda.to> parents: 11 diff changeset	620 int arg_len;
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	621 int i;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	622
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	623 ASSERT(shape->type == SHT_PATH);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	624 ASSERT((shape->arg_len & 0x1) == 0);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	625
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	626 path = (sh_path_t *)shape;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	627 user_args = (co_aix *)(path->user_data + path->cmd_len);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	628 dev_args = (co_aix *)(path->dev_data + path->cmd_len);
12 79e9edf4c00a Add redraw manager Thinker K.F. Li <thinker@branda.to> parents: 11 diff changeset	629 arg_len = path->arg_len;
79e9edf4c00a Add redraw manager Thinker K.F. Li <thinker@branda.to> parents: 11 diff changeset	630 for(i = 0; i < arg_len; i += 2) {
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	631 dev_args[0] = *user_args++;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	632 dev_args[1] = *user_args++;
12 79e9edf4c00a Add redraw manager Thinker K.F. Li <thinker@branda.to> parents: 11 diff changeset	633 coord_trans_pos(shape->coord, dev_args, dev_args + 1);
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	634 dev_args += 2;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	635 }
12 79e9edf4c00a Add redraw manager Thinker K.F. Li <thinker@branda.to> parents: 11 diff changeset	636
79e9edf4c00a Add redraw manager Thinker K.F. Li <thinker@branda.to> parents: 11 diff changeset	637 if(path->shape.geo) {
79e9edf4c00a Add redraw manager Thinker K.F. Li <thinker@branda.to> parents: 11 diff changeset	638 poses = (co_aix (*)[2])(path->dev_data + path->cmd_len);
17 41f0907b27ac Unittest for rdman_redraw_changed(). Thinker K.F. Li <thinker@branda.to> parents: 15 diff changeset	639 geo_from_positions(path->shape.geo, arg_len / 2, poses);
26 d50f33040de6 Set line width for path. Thinker K.F. Li <thinker@branda.to> parents: 22 diff changeset	640 area = shape->geo->cur_area;
d50f33040de6 Set line width for path. Thinker K.F. Li <thinker@branda.to> parents: 22 diff changeset	641 area->x -= shape->stroke_width/2 + 1;
d50f33040de6 Set line width for path. Thinker K.F. Li <thinker@branda.to> parents: 22 diff changeset	642 area->y -= shape->stroke_width/2 + 1;
d50f33040de6 Set line width for path. Thinker K.F. Li <thinker@branda.to> parents: 22 diff changeset	643 area->w += shape->stroke_width + 2;
d50f33040de6 Set line width for path. Thinker K.F. Li <thinker@branda.to> parents: 22 diff changeset	644 area->h += shape->stroke_width + 2;
12 79e9edf4c00a Add redraw manager Thinker K.F. Li <thinker@branda.to> parents: 11 diff changeset	645 }
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	646 }
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	647
22 8fcf2d878ecd shapes with stroke Thinker K.F. Li <thinker@branda.to> parents: 20 diff changeset	648 static void sh_path_path(shape_t shape, cairo_t cr) {
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	649 sh_path_t *path;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	650 int cmd_len;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	651 char *cmds, cmd;
97 9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	652 const co_aix *args;
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	653 co_aix x, y, x1, y1, x2, y2;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	654 int i;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	655
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	656 ASSERT(shape->type == SHT_PATH);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	657
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	658 path = (sh_path_t *)shape;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	659 cmd_len = path->cmd_len;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	660 cmds = path->dev_data;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	661 args = (co_aix *)(cmds + cmd_len);
15 c2ce186a5c37 X_main uses rdman_redraw_all() Thinker K.F. Li <thinker@branda.to> parents: 12 diff changeset	662 x = y = x1 = y1 = x2 = y2 = 0;
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	663 for(i = 0; i < cmd_len; i++) {
97 9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	664 /* All path commands and arguments are transformed
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	665 * to absoluted form.
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	666 */
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	667 cmd = *cmds++;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	668 switch(cmd) {
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	669 case 'M':
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	670 x = *args++;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	671 y = *args++;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	672 cairo_move_to(cr, x, y);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	673 break;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	674 case 'L':
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	675 x = *args++;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	676 y = *args++;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	677 cairo_line_to(cr, x, y);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	678 break;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	679 case 'C':
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	680 x1 = *args++;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	681 y1 = *args++;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	682 x2 = *args++;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	683 y2 = *args++;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	684 x = *args++;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	685 y = *args++;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	686 cairo_curve_to(cr, x1, y1, x2, y2, x, y);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	687 break;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	688 case 'S':
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	689 x1 = x + x - x2;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	690 y1 = y + y - y2;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	691 x2 = *args++;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	692 y2 = *args++;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	693 x = *args++;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	694 y = *args++;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	695 cairo_curve_to(cr, x1, y1, x2, y2, x, y);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	696 break;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	697 case 'Q':
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	698 x1 = *args++;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	699 y1 = *args++;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	700 x2 = x1;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	701 y2 = y1;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	702 x = *args++;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	703 y = *args++;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	704 cairo_curve_to(cr, x1, y1, x2, y2, x, y);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	705 break;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	706 case 'T':
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	707 x1 = x + x - x2;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	708 y1 = y + y - y2;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	709 x2 = x1;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	710 y2 = y1;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	711 x = *args++;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	712 y = *args++;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	713 cairo_curve_to(cr, x1, y1, x2, y2, x, y);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	714 break;
97 9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	715 case 'A':
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	716 sh_path_arc_path(cr, &args);
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	717 break;
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	718 case 'Z':
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	719 cairo_close_path(cr);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	720 break;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	721 case '\x0':
8 94b4b5bd8810 - Thinker K.F. Li <thinker@branda.to> parents: 7 diff changeset	722 i = cmd_len; /* padding! Skip remain ones. */
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	723 break;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	724 }
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	725 }
22 8fcf2d878ecd shapes with stroke Thinker K.F. Li <thinker@branda.to> parents: 20 diff changeset	726 }
6 772511b8b9be Cairo specify RGB values in range 0.0 ~ 1.0. Thinker K.F. Li <thinker@branda.to> parents: 5 diff changeset	727
30 e06a4a667ce2 Accept mouse/pointer event and hint the shape that the pointer is over. Thinker K.F. Li <thinker@branda.to> parents: 26 diff changeset	728 void sh_path_draw(shape_t shape, cairo_t cr) {
e06a4a667ce2 Accept mouse/pointer event and hint the shape that the pointer is over. Thinker K.F. Li <thinker@branda.to> parents: 26 diff changeset	729 sh_path_path(shape, cr);
e06a4a667ce2 Accept mouse/pointer event and hint the shape that the pointer is over. Thinker K.F. Li <thinker@branda.to> parents: 26 diff changeset	730 }
e06a4a667ce2 Accept mouse/pointer event and hint the shape that the pointer is over. Thinker K.F. Li <thinker@branda.to> parents: 26 diff changeset	731
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	732 #ifdef UNITTEST
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	733
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	734 #include <CUnit/Basic.h>
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	735
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	736 void test_sh_path_new(void) {
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	737 sh_path_t *path;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	738 co_aix *args;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	739
97 9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	740 path = (sh_path_t *)sh_path_new("M 33 25l33 55c 33 87 44 22 55 99L33 77z");
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	741 CU_ASSERT(path != NULL);
10 7cfecdce94cc Remove warning messages Thinker K.F. Li <thinker@branda.to> parents: 9 diff changeset	742 CU_ASSERT(path->cmd_len == ((5 + RESERVED_AIXS + 3) & ~0x3));
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	743 CU_ASSERT(path->arg_len == 12);
9 6eecdd331fe7 Fix bug in testcase Thinker K.F. Li <thinker@branda.to> parents: 8 diff changeset	744 CU_ASSERT(strcmp(path->user_data, "MLCLZ") == 0);
6eecdd331fe7 Fix bug in testcase Thinker K.F. Li <thinker@branda.to> parents: 8 diff changeset	745 CU_ASSERT(strcmp(path->dev_data, "MLCLZ") == 0);
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	746
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	747 args = (co_aix *)(path->user_data + path->cmd_len);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	748 CU_ASSERT(args[0] == 33);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	749 CU_ASSERT(args[1] == 25);
9 6eecdd331fe7 Fix bug in testcase Thinker K.F. Li <thinker@branda.to> parents: 8 diff changeset	750 CU_ASSERT(args[2] == 66);
6eecdd331fe7 Fix bug in testcase Thinker K.F. Li <thinker@branda.to> parents: 8 diff changeset	751 CU_ASSERT(args[3] == 80);
97 9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	752 CU_ASSERT(args[4] == 99);
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	753 CU_ASSERT(args[5] == 167);
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	754 CU_ASSERT(args[6] == 110);
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	755 CU_ASSERT(args[7] == 102);
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	756 CU_ASSERT(args[8] == 121);
9453e68092b5 Fix bug of translation relative to absolute points Thinker K.F. Li <thinker@branda.to> parents: 96 diff changeset	757 CU_ASSERT(args[9] == 179);
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	758 CU_ASSERT(args[10] == 33);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	759 CU_ASSERT(args[11] == 77);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	760 sh_path_free((shape_t *)path);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	761 }
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	762
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	763 void test_path_transform(void) {
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	764 sh_path_t *path;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	765 co_aix *args;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	766 coord_t coord;
12 79e9edf4c00a Add redraw manager Thinker K.F. Li <thinker@branda.to> parents: 11 diff changeset	767 geo_t geo;
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	768
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	769 path = (sh_path_t *)sh_path_new("M 33 25l33 55C 33 87 44 22 55 99L33 77z");
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	770 CU_ASSERT(path != NULL);
10 7cfecdce94cc Remove warning messages Thinker K.F. Li <thinker@branda.to> parents: 9 diff changeset	771 CU_ASSERT(path->cmd_len == ((5 + RESERVED_AIXS + 3) & ~0x3));
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	772 CU_ASSERT(path->arg_len == 12);
9 6eecdd331fe7 Fix bug in testcase Thinker K.F. Li <thinker@branda.to> parents: 8 diff changeset	773 CU_ASSERT(strcmp(path->user_data, "MLCLZ") == 0);
6eecdd331fe7 Fix bug in testcase Thinker K.F. Li <thinker@branda.to> parents: 8 diff changeset	774 CU_ASSERT(strcmp(path->dev_data, "MLCLZ") == 0);
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	775
73 9ab15ebc9061 Observer for mouse events Thinker K.F. Li <thinker@branda.to> parents: 58 diff changeset	776 geo_init(&geo);
12 79e9edf4c00a Add redraw manager Thinker K.F. Li <thinker@branda.to> parents: 11 diff changeset	777 path->shape.geo = &geo;
79e9edf4c00a Add redraw manager Thinker K.F. Li <thinker@branda.to> parents: 11 diff changeset	778 geo.shape = (shape_t *)path;
79e9edf4c00a Add redraw manager Thinker K.F. Li <thinker@branda.to> parents: 11 diff changeset	779
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	780 coord.aggr_matrix[0] = 1;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	781 coord.aggr_matrix[1] = 0;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	782 coord.aggr_matrix[2] = 1;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	783 coord.aggr_matrix[3] = 0;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	784 coord.aggr_matrix[4] = 2;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	785 coord.aggr_matrix[5] = 0;
12 79e9edf4c00a Add redraw manager Thinker K.F. Li <thinker@branda.to> parents: 11 diff changeset	786 path->shape.coord = &coord;
79e9edf4c00a Add redraw manager Thinker K.F. Li <thinker@branda.to> parents: 11 diff changeset	787 sh_path_transform((shape_t *)path);
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	788
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	789 args = (co_aix *)(path->dev_data + path->cmd_len);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	790 CU_ASSERT(args[0] == 34);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	791 CU_ASSERT(args[1] == 50);
9 6eecdd331fe7 Fix bug in testcase Thinker K.F. Li <thinker@branda.to> parents: 8 diff changeset	792 CU_ASSERT(args[2] == 67);
6eecdd331fe7 Fix bug in testcase Thinker K.F. Li <thinker@branda.to> parents: 8 diff changeset	793 CU_ASSERT(args[3] == 160);
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	794 CU_ASSERT(args[4] == 34);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	795 CU_ASSERT(args[5] == 174);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	796 CU_ASSERT(args[6] == 45);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	797 CU_ASSERT(args[7] == 44);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	798 CU_ASSERT(args[8] == 56);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	799 CU_ASSERT(args[9] == 198);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	800 CU_ASSERT(args[10] == 34);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	801 CU_ASSERT(args[11] == 154);
12 79e9edf4c00a Add redraw manager Thinker K.F. Li <thinker@branda.to> parents: 11 diff changeset	802
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	803 sh_path_free((shape_t *)path);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	804 }
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	805
11 128af06c876c Fix the bug that data of a path end with white spaces would make system down Thinker K.F. Li <thinker@branda.to> parents: 10 diff changeset	806 void test_spaces_head_tail(void) {
128af06c876c Fix the bug that data of a path end with white spaces would make system down Thinker K.F. Li <thinker@branda.to> parents: 10 diff changeset	807 sh_path_t *path;
128af06c876c Fix the bug that data of a path end with white spaces would make system down Thinker K.F. Li <thinker@branda.to> parents: 10 diff changeset	808
128af06c876c Fix the bug that data of a path end with white spaces would make system down Thinker K.F. Li <thinker@branda.to> parents: 10 diff changeset	809 path = (sh_path_t *)
128af06c876c Fix the bug that data of a path end with white spaces would make system down Thinker K.F. Li <thinker@branda.to> parents: 10 diff changeset	810 sh_path_new(" M 33 25l33 55C 33 87 44 22 55 99L33 77z ");
128af06c876c Fix the bug that data of a path end with white spaces would make system down Thinker K.F. Li <thinker@branda.to> parents: 10 diff changeset	811 CU_ASSERT(path != NULL);
128af06c876c Fix the bug that data of a path end with white spaces would make system down Thinker K.F. Li <thinker@branda.to> parents: 10 diff changeset	812 sh_path_free((shape_t *)path);
128af06c876c Fix the bug that data of a path end with white spaces would make system down Thinker K.F. Li <thinker@branda.to> parents: 10 diff changeset	813 }
128af06c876c Fix the bug that data of a path end with white spaces would make system down Thinker K.F. Li <thinker@branda.to> parents: 10 diff changeset	814
5 9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	815 CU_pSuite get_shape_path_suite(void) {
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	816 CU_pSuite suite;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	817
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	818 suite = CU_add_suite("Suite_shape_path", NULL, NULL);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	819 CU_ADD_TEST(suite, test_sh_path_new);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	820 CU_ADD_TEST(suite, test_path_transform);
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	821
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	822 return suite;
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	823 }
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	824
9c331ec9e210 SVG path is partially supported Thinker K.F. Li <thinker@branda.to> parents: diff changeset	825 #endif /* UNITTEST */

Mercurial > MadButterfly

annotate src/shape_path.c @ 97:9453e68092b5