4 #include "../gfxdevice.h"
8 /* factor that determines into how many line fragments a spline is converted */
9 #define SUBFRACTION (2.4)
11 static edge_t*edge_new(int x1, int y1, int x2, int y2)
13 edge_t*s = rfx_calloc(sizeof(edge_t));
21 static inline int32_t convert_coord(double x)
23 /* we clamp to 31 bit instead of 32 bit because we use
24 a (x1-x2) shortcut when comparing coordinates
26 if(x < -0x40000000) x = -0x40000000;
27 if(x > 0x3fffffff) x = 0x3fffffff;
31 static inline void gfxpoly_add_edge(gfxpoly_t*poly, double _x1, double _y1, double _x2, double _y2)
33 int x1 = convert_coord(_x1);
34 int y1 = convert_coord(_y1);
35 int x2 = convert_coord(_x2);
36 int y2 = convert_coord(_y2);
38 if(x1!=x2 || y1!=y2) {
39 edge_t*s = edge_new(x1, y1, x2, y2);
40 s->next = poly->edges;
45 static void convert_gfxline(gfxline_t*line, void*data, void(*moveto)(void*data, double x, double y), void(*lineto)(void*data, double x, double y), void(*setgridsize)(void*data, double g))
47 assert(!line || line[0].type == gfx_moveTo);
48 double lastx=0,lasty=0;
50 if(line->type == gfx_moveTo) {
51 if(line->next && line->next->type != gfx_moveTo && (line->x!=lastx || line->y!=lasty)) {
52 moveto(data, line->x, line->y);
54 } else if(line->type == gfx_lineTo) {
55 lineto(data, line->x, line->y);
56 } else if(line->type == gfx_splineTo) {
57 int parts = (int)(sqrt(fabs(line->x-2*line->sx+lastx) +
58 fabs(line->y-2*line->sy+lasty))*SUBFRACTION);
60 double stepsize = 1.0/parts;
62 for(i=0;i<parts;i++) {
63 double t = (double)i*stepsize;
64 double sx = (line->x*t*t + 2*line->sx*t*(1-t) + lastx*(1-t)*(1-t));
65 double sy = (line->y*t*t + 2*line->sy*t*(1-t) + lasty*(1-t)*(1-t));
68 lineto(data, line->x, line->y);
76 static char* readline(FILE*fi)
80 int l = fread(&c, 1, 1, fi);
91 int l = fread(&c, 1, 1, fi);
92 if(!l || c==10 || c==13) {
98 static void convert_file(const char*filename, void*data, void(*moveto)(void*data, double x, double y), void(*lineto)(void*data, double x, double y),void(*setgridsize)(void*data, double gridsize))
100 FILE*fi = fopen(filename, "rb");
106 double lastx=0,lasty=0;
108 char*line = readline(fi);
113 if(sscanf(line, "%lf %lf %s", &x, &y, &s) == 3) {
114 if(s && !strcmp(s,"moveto")) {
117 } else if(s && !strcmp(s,"lineto")) {
121 fprintf(stderr, "invalid command: %s\n", s);
123 } else if(sscanf(line, "%% gridsize %lf", &g) == 1) {
124 setgridsize(data, g);
130 fprintf(stderr, "loaded %d points from %s (gridsize %f)\n", count, filename, g);
132 fprintf(stderr, "loaded %d points from %s\n", count, filename);
136 typedef struct _stdpoly {
141 static void stdmoveto(void*data, double x, double y)
143 stdpoly_t*d = (stdpoly_t*)data;
146 d->lastx = x;d->lasty = y;
148 static void stdlineto(void*data, double x, double y)
150 stdpoly_t*d = (stdpoly_t*)data;
153 gfxpoly_add_edge(d->poly, d->lastx, d->lasty, x, y);
154 d->lastx = x;d->lasty = y;
156 static void stdsetgridsize(void*data, double gridsize)
158 stdpoly_t*d = (stdpoly_t*)data;
159 d->poly->gridsize = gridsize;
161 gfxpoly_t* gfxpoly_from_gfxline(gfxline_t*line, double gridsize)
164 data.poly = gfxpoly_new(gridsize);
165 data.z = 1.0 / gridsize;
166 data.lastx = data.lasty = 0;
167 convert_gfxline(line, &data, stdmoveto, stdlineto, stdsetgridsize);
170 gfxpoly_t* gfxpoly_from_file(const char*filename, double gridsize)
173 data.poly = gfxpoly_new(gridsize);
174 data.z = 1.0 / gridsize;
175 data.lastx = data.lasty = 0;
176 convert_file(filename, &data, stdmoveto, stdlineto, stdsetgridsize);
180 typedef struct _compactpoly {
181 gfxcompactpoly_t*poly;
191 void finish_segment(compactpoly_t*data)
193 if(data->num_points <= 1)
195 if(data->poly->num_strokes == data->strokes_size) {
196 data->strokes_size <<= 1;
197 assert(data->strokes_size > data->poly->num_strokes);
198 data->poly->strokes = rfx_realloc(data->poly->strokes, sizeof(gfxstroke_t)*data->strokes_size);
200 point_t*p = malloc(sizeof(point_t)*data->num_points);
201 gfxstroke_t*s = &data->poly->strokes[data->poly->num_strokes];
202 s->num_points = data->num_points;
205 if(data->dir == DIR_UP) {
207 int s = data->num_points;
208 for(t=0;t<data->num_points;t++) {
209 p[--s] = data->points[t];
212 memcpy(p, data->points, sizeof(point_t)*data->num_points);
214 data->poly->num_strokes++;
216 static void compactmoveto(void*_data, double _x, double _y)
218 compactpoly_t*data = (compactpoly_t*)_data;
219 data->dir = DIR_UNKNOWN;
221 p.x = convert_coord(_x);
222 p.y = convert_coord(_y);
225 static void compactlineto(void*_data, double _x, double _y)
227 compactpoly_t*data = (compactpoly_t*)_data;
229 p.x = convert_coord(_x);
230 p.y = convert_coord(_y);
231 if(p.y < data->last.y && data->dir != DIR_UP ||
232 p.y >= data->last.y && data->dir != DIR_DOWN) {
233 finish_segment(data);
234 data->dir = p.y > data->last.y ? DIR_DOWN : DIR_UP;
235 data->points[0] = data->last;
236 data->num_points = 1;
238 if(data->points_size == data->num_points) {
239 data->points_size <<= 1;
240 assert(data->points_size > data->num_points);
241 data->points = rfx_realloc(data->points, sizeof(point_t)*data->points_size);
243 data->points[data->num_points++] = p;
245 static void compactsetgridsize(void*data, double gridsize)
247 compactpoly_t*d = (compactpoly_t*)data;
248 d->poly->gridsize = gridsize;
250 static void compactinit(compactpoly_t*data, double gridsize)
252 data->poly = rfx_calloc(sizeof(gfxcompactpoly_t));
253 data->poly->gridsize = gridsize;
254 data->z = 1.0 / gridsize;
255 data->last.x = data->last.y = 0;
256 data->strokes_size = 16;
257 data->num_points = 0;
258 data->points_size = 16;
259 data->dir = DIR_UNKNOWN;
260 data->points = (point_t*)rfx_alloc(sizeof(point_t)*data->points_size);
261 data->poly->strokes = (gfxstroke_t*)rfx_alloc(sizeof(gfxstroke_t)*data->strokes_size);
263 static gfxcompactpoly_t*compactfinish(compactpoly_t*data)
265 finish_segment(data);
266 data->poly->strokes = (gfxstroke_t*)rfx_realloc(data->poly->strokes, sizeof(gfxstroke_t)*data->poly->num_strokes);
270 gfxcompactpoly_t* gfxcompactpoly_from_gfxline(gfxline_t*line, double gridsize)
273 compactinit(&data, gridsize);
274 data.poly->gridsize = gridsize;
275 convert_gfxline(line, &data, compactmoveto, compactlineto, compactsetgridsize);
276 return compactfinish(&data);
278 gfxcompactpoly_t* gfxcompactpoly_from_file(const char*filename, double gridsize)
281 compactinit(&data, gridsize);
282 data.poly->gridsize = gridsize;
283 convert_file(filename, &data, compactmoveto, compactlineto, compactsetgridsize);
284 return compactfinish(&data);
286 void gfxcompactpoly_free(gfxcompactpoly_t*poly)
289 for(t=0;t<poly->num_strokes;t++) {
290 free(poly->strokes[t].points);