gdiplus: Accept a transformation matrix in GdipFlattenPath.
[wine/multimedia.git] / dlls / gdiplus / graphicspath.c
blob98d3fe9e71ed9fe00d5e2418af13c971fb4aa0a0
1 /*
2 * Copyright (C) 2007 Google (Evan Stade)
4 * This library is free software; you can redistribute it and/or
5 * modify it under the terms of the GNU Lesser General Public
6 * License as published by the Free Software Foundation; either
7 * version 2.1 of the License, or (at your option) any later version.
9 * This library is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12 * Lesser General Public License for more details.
14 * You should have received a copy of the GNU Lesser General Public
15 * License along with this library; if not, write to the Free Software
16 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
20 #include <stdarg.h>
21 #include <math.h>
23 #include "windef.h"
24 #include "winbase.h"
25 #include "winuser.h"
26 #include "wingdi.h"
28 #include "objbase.h"
30 #include "gdiplus.h"
31 #include "gdiplus_private.h"
32 #include "wine/debug.h"
34 WINE_DEFAULT_DEBUG_CHANNEL(gdiplus);
36 typedef struct path_list_node_t path_list_node_t;
37 struct path_list_node_t {
38 GpPointF pt;
39 BYTE type; /* PathPointTypeStart or PathPointTypeLine */
40 path_list_node_t *next;
43 /* init list */
44 static BOOL init_path_list(path_list_node_t **node, REAL x, REAL y)
46 *node = GdipAlloc(sizeof(path_list_node_t));
47 if(!*node)
48 return FALSE;
50 (*node)->pt.X = x;
51 (*node)->pt.Y = y;
52 (*node)->type = PathPointTypeStart;
53 (*node)->next = NULL;
55 return TRUE;
58 /* free all nodes including argument */
59 static void free_path_list(path_list_node_t *node)
61 path_list_node_t *n = node;
63 while(n){
64 n = n->next;
65 GdipFree(node);
66 node = n;
70 /* Add a node after 'node' */
72 * Returns
73 * pointer on success
74 * NULL on allocation problems
76 static path_list_node_t* add_path_list_node(path_list_node_t *node, REAL x, REAL y, BOOL type)
78 path_list_node_t *new;
80 new = GdipAlloc(sizeof(path_list_node_t));
81 if(!new)
82 return NULL;
84 new->pt.X = x;
85 new->pt.Y = y;
86 new->type = type;
87 new->next = node->next;
88 node->next = new;
90 return new;
93 /* returns element count */
94 static INT path_list_count(path_list_node_t *node)
96 INT count = 1;
98 while((node = node->next))
99 ++count;
101 return count;
104 /* GdipFlattenPath helper */
106 * Used to recursively flatten single Bezier curve
107 * Parameters:
108 * - start : pointer to start point node;
109 * - (x2, y2): first control point;
110 * - (x3, y3): second control point;
111 * - end : pointer to end point node
112 * - flatness: admissible error of linear approximation.
114 * Return value:
115 * TRUE : success
116 * FALSE: out of memory
118 * TODO: used quality criteria should be revised to match native as
119 * closer as possible.
121 static BOOL flatten_bezier(path_list_node_t *start, REAL x2, REAL y2, REAL x3, REAL y3,
122 path_list_node_t *end, REAL flatness)
124 /* this 5 middle points with start/end define to half-curves */
125 GpPointF mp[5];
126 GpPointF pt, pt_st;
127 path_list_node_t *node;
129 /* calculate bezier curve middle points == new control points */
130 mp[0].X = (start->pt.X + x2) / 2.0;
131 mp[0].Y = (start->pt.Y + y2) / 2.0;
132 /* middle point between control points */
133 pt.X = (x2 + x3) / 2.0;
134 pt.Y = (y2 + y3) / 2.0;
135 mp[1].X = (mp[0].X + pt.X) / 2.0;
136 mp[1].Y = (mp[0].Y + pt.Y) / 2.0;
137 mp[4].X = (end->pt.X + x3) / 2.0;
138 mp[4].Y = (end->pt.Y + y3) / 2.0;
139 mp[3].X = (mp[4].X + pt.X) / 2.0;
140 mp[3].Y = (mp[4].Y + pt.Y) / 2.0;
142 mp[2].X = (mp[1].X + mp[3].X) / 2.0;
143 mp[2].Y = (mp[1].Y + mp[3].Y) / 2.0;
145 pt = end->pt;
146 pt_st = start->pt;
147 /* check flatness as a half of distance between middle point and a linearized path */
148 if(fabs(((pt.Y - pt_st.Y)*mp[2].X + (pt_st.X - pt.X)*mp[2].Y +
149 (pt_st.Y*pt.X - pt_st.X*pt.Y))) <=
150 (0.5 * flatness*sqrtf((powf(pt.Y - pt_st.Y, 2.0) + powf(pt_st.X - pt.X, 2.0))))){
151 return TRUE;
153 else
154 /* add a middle point */
155 if(!(node = add_path_list_node(start, mp[2].X, mp[2].Y, PathPointTypeLine)))
156 return FALSE;
158 /* do the same with halves */
159 flatten_bezier(start, mp[0].X, mp[0].Y, mp[1].X, mp[1].Y, node, flatness);
160 flatten_bezier(node, mp[3].X, mp[3].Y, mp[4].X, mp[4].Y, end, flatness);
162 return TRUE;
165 GpStatus WINGDIPAPI GdipAddPathArc(GpPath *path, REAL x1, REAL y1, REAL x2,
166 REAL y2, REAL startAngle, REAL sweepAngle)
168 INT count, old_count, i;
170 TRACE("(%p, %.2f, %.2f, %.2f, %.2f, %.2f, %.2f)\n",
171 path, x1, y1, x2, y2, startAngle, sweepAngle);
173 if(!path)
174 return InvalidParameter;
176 count = arc2polybezier(NULL, x1, y1, x2, y2, startAngle, sweepAngle);
178 if(count == 0)
179 return Ok;
180 if(!lengthen_path(path, count))
181 return OutOfMemory;
183 old_count = path->pathdata.Count;
184 arc2polybezier(&path->pathdata.Points[old_count], x1, y1, x2, y2,
185 startAngle, sweepAngle);
187 for(i = 0; i < count; i++){
188 path->pathdata.Types[old_count + i] = PathPointTypeBezier;
191 path->pathdata.Types[old_count] =
192 (path->newfigure ? PathPointTypeStart : PathPointTypeLine);
193 path->newfigure = FALSE;
194 path->pathdata.Count += count;
196 return Ok;
199 GpStatus WINGDIPAPI GdipAddPathArcI(GpPath *path, INT x1, INT y1, INT x2,
200 INT y2, REAL startAngle, REAL sweepAngle)
202 TRACE("(%p, %d, %d, %d, %d, %.2f, %.2f)\n",
203 path, x1, y1, x2, y2, startAngle, sweepAngle);
205 return GdipAddPathArc(path,(REAL)x1,(REAL)y1,(REAL)x2,(REAL)y2,startAngle,sweepAngle);
208 GpStatus WINGDIPAPI GdipAddPathBezier(GpPath *path, REAL x1, REAL y1, REAL x2,
209 REAL y2, REAL x3, REAL y3, REAL x4, REAL y4)
211 INT old_count;
213 TRACE("(%p, %.2f, %.2f, %.2f, %.2f, %.2f, %.2f, %.2f, %.2f)\n",
214 path, x1, y1, x2, y2, x3, y3, x4, y4);
216 if(!path)
217 return InvalidParameter;
219 if(!lengthen_path(path, 4))
220 return OutOfMemory;
222 old_count = path->pathdata.Count;
224 path->pathdata.Points[old_count].X = x1;
225 path->pathdata.Points[old_count].Y = y1;
226 path->pathdata.Points[old_count + 1].X = x2;
227 path->pathdata.Points[old_count + 1].Y = y2;
228 path->pathdata.Points[old_count + 2].X = x3;
229 path->pathdata.Points[old_count + 2].Y = y3;
230 path->pathdata.Points[old_count + 3].X = x4;
231 path->pathdata.Points[old_count + 3].Y = y4;
233 path->pathdata.Types[old_count] =
234 (path->newfigure ? PathPointTypeStart : PathPointTypeLine);
235 path->pathdata.Types[old_count + 1] = PathPointTypeBezier;
236 path->pathdata.Types[old_count + 2] = PathPointTypeBezier;
237 path->pathdata.Types[old_count + 3] = PathPointTypeBezier;
239 path->newfigure = FALSE;
240 path->pathdata.Count += 4;
242 return Ok;
245 GpStatus WINGDIPAPI GdipAddPathBezierI(GpPath *path, INT x1, INT y1, INT x2,
246 INT y2, INT x3, INT y3, INT x4, INT y4)
248 TRACE("(%p, %d, %d, %d, %d, %d, %d, %d, %d)\n",
249 path, x1, y1, x2, y2, x3, y3, x4, y4);
251 return GdipAddPathBezier(path,(REAL)x1,(REAL)y1,(REAL)x2,(REAL)y2,(REAL)x3,(REAL)y3,
252 (REAL)x4,(REAL)y4);
255 GpStatus WINGDIPAPI GdipAddPathBeziers(GpPath *path, GDIPCONST GpPointF *points,
256 INT count)
258 INT i, old_count;
260 TRACE("(%p, %p, %d)\n", path, points, count);
262 if(!path || !points || ((count - 1) % 3))
263 return InvalidParameter;
265 if(!lengthen_path(path, count))
266 return OutOfMemory;
268 old_count = path->pathdata.Count;
270 for(i = 0; i < count; i++){
271 path->pathdata.Points[old_count + i].X = points[i].X;
272 path->pathdata.Points[old_count + i].Y = points[i].Y;
273 path->pathdata.Types[old_count + i] = PathPointTypeBezier;
276 path->pathdata.Types[old_count] =
277 (path->newfigure ? PathPointTypeStart : PathPointTypeLine);
278 path->newfigure = FALSE;
279 path->pathdata.Count += count;
281 return Ok;
284 GpStatus WINGDIPAPI GdipAddPathBeziersI(GpPath *path, GDIPCONST GpPoint *points,
285 INT count)
287 GpPointF *ptsF;
288 GpStatus ret;
289 INT i;
291 TRACE("(%p, %p, %d)\n", path, points, count);
293 if(!points || ((count - 1) % 3))
294 return InvalidParameter;
296 ptsF = GdipAlloc(sizeof(GpPointF) * count);
297 if(!ptsF)
298 return OutOfMemory;
300 for(i = 0; i < count; i++){
301 ptsF[i].X = (REAL)points[i].X;
302 ptsF[i].Y = (REAL)points[i].Y;
305 ret = GdipAddPathBeziers(path, ptsF, count);
306 GdipFree(ptsF);
308 return ret;
311 GpStatus WINGDIPAPI GdipAddPathClosedCurve(GpPath *path, GDIPCONST GpPointF *points,
312 INT count)
314 TRACE("(%p, %p, %d)\n", path, points, count);
316 return GdipAddPathClosedCurve2(path, points, count, 1.0);
319 GpStatus WINGDIPAPI GdipAddPathClosedCurveI(GpPath *path, GDIPCONST GpPoint *points,
320 INT count)
322 TRACE("(%p, %p, %d)\n", path, points, count);
324 return GdipAddPathClosedCurve2I(path, points, count, 1.0);
327 GpStatus WINGDIPAPI GdipAddPathClosedCurve2(GpPath *path, GDIPCONST GpPointF *points,
328 INT count, REAL tension)
330 INT i, len_pt = (count + 1)*3-2;
331 GpPointF *pt;
332 GpPointF *pts;
333 REAL x1, x2, y1, y2;
334 GpStatus stat;
336 TRACE("(%p, %p, %d, %.2f)\n", path, points, count, tension);
338 if(!path || !points || count <= 1)
339 return InvalidParameter;
341 pt = GdipAlloc(len_pt * sizeof(GpPointF));
342 pts = GdipAlloc((count + 1)*sizeof(GpPointF));
343 if(!pt || !pts){
344 GdipFree(pt);
345 GdipFree(pts);
346 return OutOfMemory;
349 /* copy source points to extend with the last one */
350 memcpy(pts, points, sizeof(GpPointF)*count);
351 pts[count] = pts[0];
353 tension = tension * TENSION_CONST;
355 for(i = 0; i < count-1; i++){
356 calc_curve_bezier(&(pts[i]), tension, &x1, &y1, &x2, &y2);
358 pt[3*i+2].X = x1;
359 pt[3*i+2].Y = y1;
360 pt[3*i+3].X = pts[i+1].X;
361 pt[3*i+3].Y = pts[i+1].Y;
362 pt[3*i+4].X = x2;
363 pt[3*i+4].Y = y2;
366 /* points [len_pt-2] and [0] are calculated
367 separately to connect splines properly */
368 pts[0] = points[count-1];
369 pts[1] = points[0]; /* equals to start and end of a resulting path */
370 pts[2] = points[1];
372 calc_curve_bezier(pts, tension, &x1, &y1, &x2, &y2);
373 pt[len_pt-2].X = x1;
374 pt[len_pt-2].Y = y1;
375 pt[0].X = pts[1].X;
376 pt[0].Y = pts[1].Y;
377 pt[1].X = x2;
378 pt[1].Y = y2;
379 /* close path */
380 pt[len_pt-1].X = pt[0].X;
381 pt[len_pt-1].Y = pt[0].Y;
383 stat = GdipAddPathBeziers(path, pt, len_pt);
385 /* close figure */
386 if(stat == Ok){
387 path->pathdata.Types[path->pathdata.Count - 1] |= PathPointTypeCloseSubpath;
388 path->newfigure = TRUE;
391 GdipFree(pts);
392 GdipFree(pt);
394 return stat;
397 GpStatus WINGDIPAPI GdipAddPathClosedCurve2I(GpPath *path, GDIPCONST GpPoint *points,
398 INT count, REAL tension)
400 GpPointF *ptf;
401 INT i;
402 GpStatus stat;
404 TRACE("(%p, %p, %d, %.2f)\n", path, points, count, tension);
406 if(!path || !points || count <= 1)
407 return InvalidParameter;
409 ptf = GdipAlloc(sizeof(GpPointF)*count);
410 if(!ptf)
411 return OutOfMemory;
413 for(i = 0; i < count; i++){
414 ptf[i].X = (REAL)points[i].X;
415 ptf[i].Y = (REAL)points[i].Y;
418 stat = GdipAddPathClosedCurve2(path, ptf, count, tension);
420 GdipFree(ptf);
422 return stat;
425 GpStatus WINGDIPAPI GdipAddPathCurve(GpPath *path, GDIPCONST GpPointF *points, INT count)
427 TRACE("(%p, %p, %d)\n", path, points, count);
429 if(!path || !points || count <= 1)
430 return InvalidParameter;
432 return GdipAddPathCurve2(path, points, count, 1.0);
435 GpStatus WINGDIPAPI GdipAddPathCurveI(GpPath *path, GDIPCONST GpPoint *points, INT count)
437 TRACE("(%p, %p, %d)\n", path, points, count);
439 if(!path || !points || count <= 1)
440 return InvalidParameter;
442 return GdipAddPathCurve2I(path, points, count, 1.0);
445 GpStatus WINGDIPAPI GdipAddPathCurve2(GpPath *path, GDIPCONST GpPointF *points, INT count,
446 REAL tension)
448 INT i, len_pt = count*3-2;
449 GpPointF *pt;
450 REAL x1, x2, y1, y2;
451 GpStatus stat;
453 TRACE("(%p, %p, %d, %.2f)\n", path, points, count, tension);
455 if(!path || !points || count <= 1)
456 return InvalidParameter;
458 pt = GdipAlloc(len_pt * sizeof(GpPointF));
459 if(!pt)
460 return OutOfMemory;
462 tension = tension * TENSION_CONST;
464 calc_curve_bezier_endp(points[0].X, points[0].Y, points[1].X, points[1].Y,
465 tension, &x1, &y1);
467 pt[0].X = points[0].X;
468 pt[0].Y = points[0].Y;
469 pt[1].X = x1;
470 pt[1].Y = y1;
472 for(i = 0; i < count-2; i++){
473 calc_curve_bezier(&(points[i]), tension, &x1, &y1, &x2, &y2);
475 pt[3*i+2].X = x1;
476 pt[3*i+2].Y = y1;
477 pt[3*i+3].X = points[i+1].X;
478 pt[3*i+3].Y = points[i+1].Y;
479 pt[3*i+4].X = x2;
480 pt[3*i+4].Y = y2;
483 calc_curve_bezier_endp(points[count-1].X, points[count-1].Y,
484 points[count-2].X, points[count-2].Y, tension, &x1, &y1);
486 pt[len_pt-2].X = x1;
487 pt[len_pt-2].Y = y1;
488 pt[len_pt-1].X = points[count-1].X;
489 pt[len_pt-1].Y = points[count-1].Y;
491 stat = GdipAddPathBeziers(path, pt, len_pt);
493 GdipFree(pt);
495 return stat;
498 GpStatus WINGDIPAPI GdipAddPathCurve2I(GpPath *path, GDIPCONST GpPoint *points,
499 INT count, REAL tension)
501 GpPointF *ptf;
502 INT i;
503 GpStatus stat;
505 TRACE("(%p, %p, %d, %.2f)\n", path, points, count, tension);
507 if(!path || !points || count <= 1)
508 return InvalidParameter;
510 ptf = GdipAlloc(sizeof(GpPointF)*count);
511 if(!ptf)
512 return OutOfMemory;
514 for(i = 0; i < count; i++){
515 ptf[i].X = (REAL)points[i].X;
516 ptf[i].Y = (REAL)points[i].Y;
519 stat = GdipAddPathCurve2(path, ptf, count, tension);
521 GdipFree(ptf);
523 return stat;
526 GpStatus WINGDIPAPI GdipAddPathCurve3(GpPath *path, GDIPCONST GpPointF *points,
527 INT count, INT offset, INT nseg, REAL tension)
529 TRACE("(%p, %p, %d, %d, %d, %.2f)\n", path, points, count, offset, nseg, tension);
531 if(!path || !points || offset + 1 >= count || count - offset < nseg + 1)
532 return InvalidParameter;
534 return GdipAddPathCurve2(path, &points[offset], nseg + 1, tension);
537 GpStatus WINGDIPAPI GdipAddPathCurve3I(GpPath *path, GDIPCONST GpPoint *points,
538 INT count, INT offset, INT nseg, REAL tension)
540 TRACE("(%p, %p, %d, %d, %d, %.2f)\n", path, points, count, offset, nseg, tension);
542 if(!path || !points || offset + 1 >= count || count - offset < nseg + 1)
543 return InvalidParameter;
545 return GdipAddPathCurve2I(path, &points[offset], nseg + 1, tension);
548 GpStatus WINGDIPAPI GdipAddPathEllipse(GpPath *path, REAL x, REAL y, REAL width,
549 REAL height)
551 INT old_count, numpts;
553 TRACE("(%p, %.2f, %.2f, %.2f, %.2f)\n", path, x, y, width, height);
555 if(!path)
556 return InvalidParameter;
558 if(!lengthen_path(path, MAX_ARC_PTS))
559 return OutOfMemory;
561 old_count = path->pathdata.Count;
562 if((numpts = arc2polybezier(&path->pathdata.Points[old_count], x, y, width,
563 height, 0.0, 360.0)) != MAX_ARC_PTS){
564 ERR("expected %d points but got %d\n", MAX_ARC_PTS, numpts);
565 return GenericError;
568 memset(&path->pathdata.Types[old_count + 1], PathPointTypeBezier,
569 MAX_ARC_PTS - 1);
571 /* An ellipse is an intrinsic figure (always is its own subpath). */
572 path->pathdata.Types[old_count] = PathPointTypeStart;
573 path->pathdata.Types[old_count + MAX_ARC_PTS - 1] |= PathPointTypeCloseSubpath;
574 path->newfigure = TRUE;
575 path->pathdata.Count += MAX_ARC_PTS;
577 return Ok;
580 GpStatus WINGDIPAPI GdipAddPathEllipseI(GpPath *path, INT x, INT y, INT width,
581 INT height)
583 TRACE("(%p, %d, %d, %d, %d)\n", path, x, y, width, height);
585 return GdipAddPathEllipse(path,(REAL)x,(REAL)y,(REAL)width,(REAL)height);
588 GpStatus WINGDIPAPI GdipAddPathLine2(GpPath *path, GDIPCONST GpPointF *points,
589 INT count)
591 INT i, old_count;
593 TRACE("(%p, %p, %d)\n", path, points, count);
595 if(!path || !points)
596 return InvalidParameter;
598 if(!lengthen_path(path, count))
599 return OutOfMemory;
601 old_count = path->pathdata.Count;
603 for(i = 0; i < count; i++){
604 path->pathdata.Points[old_count + i].X = points[i].X;
605 path->pathdata.Points[old_count + i].Y = points[i].Y;
606 path->pathdata.Types[old_count + i] = PathPointTypeLine;
609 if(path->newfigure){
610 path->pathdata.Types[old_count] = PathPointTypeStart;
611 path->newfigure = FALSE;
614 path->pathdata.Count += count;
616 return Ok;
619 GpStatus WINGDIPAPI GdipAddPathLine2I(GpPath *path, GDIPCONST GpPoint *points, INT count)
621 GpPointF *pointsF;
622 INT i;
623 GpStatus stat;
625 TRACE("(%p, %p, %d)\n", path, points, count);
627 if(count <= 0)
628 return InvalidParameter;
630 pointsF = GdipAlloc(sizeof(GpPointF) * count);
631 if(!pointsF) return OutOfMemory;
633 for(i = 0;i < count; i++){
634 pointsF[i].X = (REAL)points[i].X;
635 pointsF[i].Y = (REAL)points[i].Y;
638 stat = GdipAddPathLine2(path, pointsF, count);
640 GdipFree(pointsF);
642 return stat;
645 GpStatus WINGDIPAPI GdipAddPathLine(GpPath *path, REAL x1, REAL y1, REAL x2, REAL y2)
647 INT old_count;
649 TRACE("(%p, %.2f, %.2f, %.2f, %.2f)\n", path, x1, y1, x2, y2);
651 if(!path)
652 return InvalidParameter;
654 if(!lengthen_path(path, 2))
655 return OutOfMemory;
657 old_count = path->pathdata.Count;
659 path->pathdata.Points[old_count].X = x1;
660 path->pathdata.Points[old_count].Y = y1;
661 path->pathdata.Points[old_count + 1].X = x2;
662 path->pathdata.Points[old_count + 1].Y = y2;
664 path->pathdata.Types[old_count] =
665 (path->newfigure ? PathPointTypeStart : PathPointTypeLine);
666 path->pathdata.Types[old_count + 1] = PathPointTypeLine;
668 path->newfigure = FALSE;
669 path->pathdata.Count += 2;
671 return Ok;
674 GpStatus WINGDIPAPI GdipAddPathLineI(GpPath *path, INT x1, INT y1, INT x2, INT y2)
676 TRACE("(%p, %d, %d, %d, %d)\n", path, x1, y1, x2, y2);
678 return GdipAddPathLine(path, (REAL)x1, (REAL)y1, (REAL)x2, (REAL)y2);
681 GpStatus WINGDIPAPI GdipAddPathPath(GpPath *path, GDIPCONST GpPath* addingPath,
682 BOOL connect)
684 INT old_count, count;
686 TRACE("(%p, %p, %d)\n", path, addingPath, connect);
688 if(!path || !addingPath)
689 return InvalidParameter;
691 old_count = path->pathdata.Count;
692 count = addingPath->pathdata.Count;
694 if(!lengthen_path(path, count))
695 return OutOfMemory;
697 memcpy(&path->pathdata.Points[old_count], addingPath->pathdata.Points,
698 count * sizeof(GpPointF));
699 memcpy(&path->pathdata.Types[old_count], addingPath->pathdata.Types, count);
701 if(path->newfigure || !connect)
702 path->pathdata.Types[old_count] = PathPointTypeStart;
703 else
704 path->pathdata.Types[old_count] = PathPointTypeLine;
706 path->newfigure = FALSE;
707 path->pathdata.Count += count;
709 return Ok;
712 GpStatus WINGDIPAPI GdipAddPathPie(GpPath *path, REAL x, REAL y, REAL width, REAL height,
713 REAL startAngle, REAL sweepAngle)
715 GpPointF *ptf;
716 GpStatus status;
717 INT i, count;
719 TRACE("(%p, %.2f, %.2f, %.2f, %.2f, %.2f, %.2f)\n",
720 path, x, y, width, height, startAngle, sweepAngle);
722 if(!path)
723 return InvalidParameter;
725 /* on zero width/height only start point added */
726 if(width <= 1e-7 || height <= 1e-7){
727 if(!lengthen_path(path, 1))
728 return OutOfMemory;
729 path->pathdata.Points[0].X = x + width / 2.0;
730 path->pathdata.Points[0].Y = y + height / 2.0;
731 path->pathdata.Types[0] = PathPointTypeStart | PathPointTypeCloseSubpath;
732 path->pathdata.Count = 1;
733 return InvalidParameter;
736 count = arc2polybezier(NULL, x, y, width, height, startAngle, sweepAngle);
738 if(count == 0)
739 return Ok;
741 ptf = GdipAlloc(sizeof(GpPointF)*count);
742 if(!ptf)
743 return OutOfMemory;
745 arc2polybezier(ptf, x, y, width, height, startAngle, sweepAngle);
747 status = GdipAddPathLine(path, x + width/2, y + height/2, ptf[0].X, ptf[0].Y);
748 if(status != Ok){
749 GdipFree(ptf);
750 return status;
752 /* one spline is already added as a line endpoint */
753 if(!lengthen_path(path, count - 1)){
754 GdipFree(ptf);
755 return OutOfMemory;
758 memcpy(&(path->pathdata.Points[path->pathdata.Count]), &(ptf[1]),sizeof(GpPointF)*(count-1));
759 for(i = 0; i < count-1; i++)
760 path->pathdata.Types[path->pathdata.Count+i] = PathPointTypeBezier;
762 path->pathdata.Count += count-1;
764 GdipClosePathFigure(path);
766 GdipFree(ptf);
768 return status;
771 GpStatus WINGDIPAPI GdipAddPathPieI(GpPath *path, INT x, INT y, INT width, INT height,
772 REAL startAngle, REAL sweepAngle)
774 TRACE("(%p, %d, %d, %d, %d, %.2f, %.2f)\n",
775 path, x, y, width, height, startAngle, sweepAngle);
777 return GdipAddPathPie(path, (REAL)x, (REAL)y, (REAL)width, (REAL)height, startAngle, sweepAngle);
780 GpStatus WINGDIPAPI GdipAddPathPolygon(GpPath *path, GDIPCONST GpPointF *points, INT count)
782 INT old_count;
784 TRACE("(%p, %p, %d)\n", path, points, count);
786 if(!path || !points || count < 3)
787 return InvalidParameter;
789 if(!lengthen_path(path, count))
790 return OutOfMemory;
792 old_count = path->pathdata.Count;
794 memcpy(&path->pathdata.Points[old_count], points, count*sizeof(GpPointF));
795 memset(&path->pathdata.Types[old_count + 1], PathPointTypeLine, count - 1);
797 /* A polygon is an intrinsic figure */
798 path->pathdata.Types[old_count] = PathPointTypeStart;
799 path->pathdata.Types[old_count + count - 1] |= PathPointTypeCloseSubpath;
800 path->newfigure = TRUE;
801 path->pathdata.Count += count;
803 return Ok;
806 GpStatus WINGDIPAPI GdipAddPathPolygonI(GpPath *path, GDIPCONST GpPoint *points, INT count)
808 GpPointF *ptf;
809 GpStatus status;
810 INT i;
812 TRACE("(%p, %p, %d)\n", path, points, count);
814 if(!points || count < 3)
815 return InvalidParameter;
817 ptf = GdipAlloc(sizeof(GpPointF) * count);
818 if(!ptf)
819 return OutOfMemory;
821 for(i = 0; i < count; i++){
822 ptf[i].X = (REAL)points[i].X;
823 ptf[i].Y = (REAL)points[i].Y;
826 status = GdipAddPathPolygon(path, ptf, count);
828 GdipFree(ptf);
830 return status;
833 static float fromfixedpoint(const FIXED v)
835 float f = ((float)v.fract) / (1<<(sizeof(v.fract)*8));
836 f += v.value;
837 return f;
840 struct format_string_args
842 GpPath *path;
843 float maxY;
844 float scale;
845 float ascent;
848 static GpStatus format_string_callback(HDC dc,
849 GDIPCONST WCHAR *string, INT index, INT length, GDIPCONST GpFont *font,
850 GDIPCONST RectF *rect, GDIPCONST GpStringFormat *format,
851 INT lineno, const RectF *bounds, INT *underlined_indexes,
852 INT underlined_index_count, void *priv)
854 static const MAT2 identity = { {0,1}, {0,0}, {0,0}, {0,1} };
855 struct format_string_args *args = priv;
856 GpPath *path = args->path;
857 GpStatus status = Ok;
858 float x = rect->X + (bounds->X - rect->X) * args->scale;
859 float y = rect->Y + (bounds->Y - rect->Y) * args->scale;
860 int i;
862 if (underlined_index_count)
863 FIXME("hotkey underlines not drawn yet\n");
865 if (y + bounds->Height * args->scale > args->maxY)
866 args->maxY = y + bounds->Height * args->scale;
868 for (i = index; i < length; ++i)
870 GLYPHMETRICS gm;
871 TTPOLYGONHEADER *ph = NULL;
872 char *start;
873 DWORD len, ofs = 0;
874 len = GetGlyphOutlineW(dc, string[i], GGO_BEZIER, &gm, 0, NULL, &identity);
875 if (len == GDI_ERROR)
877 status = GenericError;
878 break;
880 ph = GdipAlloc(len);
881 start = (char *)ph;
882 if (!ph || !lengthen_path(path, len / sizeof(POINTFX)))
884 status = OutOfMemory;
885 break;
887 GetGlyphOutlineW(dc, string[i], GGO_BEZIER, &gm, len, start, &identity);
889 ofs = 0;
890 while (ofs < len)
892 DWORD ofs_start = ofs;
893 ph = (TTPOLYGONHEADER*)&start[ofs];
894 path->pathdata.Types[path->pathdata.Count] = PathPointTypeStart;
895 path->pathdata.Points[path->pathdata.Count].X = x + fromfixedpoint(ph->pfxStart.x) * args->scale;
896 path->pathdata.Points[path->pathdata.Count++].Y = y + args->ascent - fromfixedpoint(ph->pfxStart.y) * args->scale;
897 TRACE("Starting at count %i with pos %f, %f)\n", path->pathdata.Count, x, y);
898 ofs += sizeof(*ph);
899 while (ofs - ofs_start < ph->cb)
901 TTPOLYCURVE *curve = (TTPOLYCURVE*)&start[ofs];
902 int j;
903 ofs += sizeof(TTPOLYCURVE) + (curve->cpfx - 1) * sizeof(POINTFX);
905 switch (curve->wType)
907 case TT_PRIM_LINE:
908 for (j = 0; j < curve->cpfx; ++j)
910 path->pathdata.Types[path->pathdata.Count] = PathPointTypeLine;
911 path->pathdata.Points[path->pathdata.Count].X = x + fromfixedpoint(curve->apfx[j].x) * args->scale;
912 path->pathdata.Points[path->pathdata.Count++].Y = y + args->ascent - fromfixedpoint(curve->apfx[j].y) * args->scale;
914 break;
915 case TT_PRIM_CSPLINE:
916 for (j = 0; j < curve->cpfx; ++j)
918 path->pathdata.Types[path->pathdata.Count] = PathPointTypeBezier;
919 path->pathdata.Points[path->pathdata.Count].X = x + fromfixedpoint(curve->apfx[j].x) * args->scale;
920 path->pathdata.Points[path->pathdata.Count++].Y = y + args->ascent - fromfixedpoint(curve->apfx[j].y) * args->scale;
922 break;
923 default:
924 ERR("Unhandled type: %u\n", curve->wType);
925 status = GenericError;
928 path->pathdata.Types[path->pathdata.Count - 1] |= PathPointTypeCloseSubpath;
930 path->newfigure = TRUE;
931 x += gm.gmCellIncX * args->scale;
932 y += gm.gmCellIncY * args->scale;
934 GdipFree(ph);
935 if (status != Ok)
936 break;
939 return status;
942 GpStatus WINGDIPAPI GdipAddPathString(GpPath* path, GDIPCONST WCHAR* string, INT length, GDIPCONST GpFontFamily* family, INT style, REAL emSize, GDIPCONST RectF* layoutRect, GDIPCONST GpStringFormat* format)
944 GpFont *font;
945 GpStatus status;
946 LOGFONTW lfw;
947 HANDLE hfont;
948 HDC dc;
949 GpPath *backup;
950 struct format_string_args args;
951 int i;
952 UINT16 native_height;
953 RectF scaled_layout_rect;
954 TEXTMETRICW textmetric;
956 TRACE("(%p, %s, %d, %p, %d, %f, %p, %p)\n", path, debugstr_w(string), length, family, style, emSize, layoutRect, format);
957 if (!path || !string || !family || !emSize || !layoutRect || !format)
958 return InvalidParameter;
960 status = GdipGetEmHeight(family, style, &native_height);
961 if (status != Ok)
962 return status;
964 scaled_layout_rect.X = layoutRect->X;
965 scaled_layout_rect.Y = layoutRect->Y;
966 scaled_layout_rect.Width = layoutRect->Width * native_height / emSize;
967 scaled_layout_rect.Height = layoutRect->Height * native_height / emSize;
969 status = GdipCreateFont(family, native_height, style, UnitPixel, &font);
970 if (status != Ok)
971 return status;
973 get_log_fontW(font, NULL, &lfw);
974 hfont = CreateFontIndirectW(&lfw);
975 if (!hfont)
977 WARN("Failed to create font\n");
978 return GenericError;
981 if ((status = GdipClonePath(path, &backup)) != Ok)
983 DeleteObject(hfont);
984 return status;
987 dc = CreateCompatibleDC(0);
988 SelectObject(dc, hfont);
990 GetTextMetricsW(dc, &textmetric);
992 args.path = path;
993 args.maxY = 0;
994 args.scale = emSize / native_height;
995 args.ascent = textmetric.tmAscent * args.scale;
996 status = gdip_format_string(dc, string, length, NULL, &scaled_layout_rect, format, format_string_callback, &args);
998 DeleteDC(dc);
999 DeleteObject(hfont);
1001 if (status != Ok) /* free backup */
1003 GdipFree(path->pathdata.Points);
1004 GdipFree(path->pathdata.Types);
1005 *path = *backup;
1006 GdipFree(backup);
1007 return status;
1009 if (format && format->vertalign == StringAlignmentCenter && layoutRect->Y + args.maxY < layoutRect->Height)
1011 float inc = layoutRect->Height + layoutRect->Y - args.maxY;
1012 inc /= 2;
1013 for (i = backup->pathdata.Count; i < path->pathdata.Count; ++i)
1014 path->pathdata.Points[i].Y += inc;
1015 } else if (format && format->vertalign == StringAlignmentFar) {
1016 float inc = layoutRect->Height + layoutRect->Y - args.maxY;
1017 for (i = backup->pathdata.Count; i < path->pathdata.Count; ++i)
1018 path->pathdata.Points[i].Y += inc;
1020 GdipDeletePath(backup);
1021 return status;
1024 GpStatus WINGDIPAPI GdipAddPathStringI(GpPath* path, GDIPCONST WCHAR* string, INT length, GDIPCONST GpFontFamily* family, INT style, REAL emSize, GDIPCONST Rect* layoutRect, GDIPCONST GpStringFormat* format)
1026 if (layoutRect)
1028 RectF layoutRectF = {
1029 (REAL)layoutRect->X,
1030 (REAL)layoutRect->Y,
1031 (REAL)layoutRect->Width,
1032 (REAL)layoutRect->Height
1034 return GdipAddPathString(path, string, length, family, style, emSize, &layoutRectF, format);
1036 return InvalidParameter;
1039 GpStatus WINGDIPAPI GdipClonePath(GpPath* path, GpPath **clone)
1041 TRACE("(%p, %p)\n", path, clone);
1043 if(!path || !clone)
1044 return InvalidParameter;
1046 *clone = GdipAlloc(sizeof(GpPath));
1047 if(!*clone) return OutOfMemory;
1049 **clone = *path;
1051 (*clone)->pathdata.Points = GdipAlloc(path->datalen * sizeof(PointF));
1052 (*clone)->pathdata.Types = GdipAlloc(path->datalen);
1053 if(!(*clone)->pathdata.Points || !(*clone)->pathdata.Types){
1054 GdipFree(*clone);
1055 GdipFree((*clone)->pathdata.Points);
1056 GdipFree((*clone)->pathdata.Types);
1057 return OutOfMemory;
1060 memcpy((*clone)->pathdata.Points, path->pathdata.Points,
1061 path->datalen * sizeof(PointF));
1062 memcpy((*clone)->pathdata.Types, path->pathdata.Types, path->datalen);
1064 return Ok;
1067 GpStatus WINGDIPAPI GdipClosePathFigure(GpPath* path)
1069 TRACE("(%p)\n", path);
1071 if(!path)
1072 return InvalidParameter;
1074 if(path->pathdata.Count > 0){
1075 path->pathdata.Types[path->pathdata.Count - 1] |= PathPointTypeCloseSubpath;
1076 path->newfigure = TRUE;
1079 return Ok;
1082 GpStatus WINGDIPAPI GdipClosePathFigures(GpPath* path)
1084 INT i;
1086 TRACE("(%p)\n", path);
1088 if(!path)
1089 return InvalidParameter;
1091 for(i = 1; i < path->pathdata.Count; i++){
1092 if(path->pathdata.Types[i] == PathPointTypeStart)
1093 path->pathdata.Types[i-1] |= PathPointTypeCloseSubpath;
1096 path->newfigure = TRUE;
1098 return Ok;
1101 GpStatus WINGDIPAPI GdipCreatePath(GpFillMode fill, GpPath **path)
1103 TRACE("(%d, %p)\n", fill, path);
1105 if(!path)
1106 return InvalidParameter;
1108 *path = GdipAlloc(sizeof(GpPath));
1109 if(!*path) return OutOfMemory;
1111 (*path)->fill = fill;
1112 (*path)->newfigure = TRUE;
1114 return Ok;
1117 GpStatus WINGDIPAPI GdipCreatePath2(GDIPCONST GpPointF* points,
1118 GDIPCONST BYTE* types, INT count, GpFillMode fill, GpPath **path)
1120 TRACE("(%p, %p, %d, %d, %p)\n", points, types, count, fill, path);
1122 if(!path)
1123 return InvalidParameter;
1125 *path = GdipAlloc(sizeof(GpPath));
1126 if(!*path) return OutOfMemory;
1128 (*path)->pathdata.Points = GdipAlloc(count * sizeof(PointF));
1129 (*path)->pathdata.Types = GdipAlloc(count);
1131 if(!(*path)->pathdata.Points || !(*path)->pathdata.Types){
1132 GdipFree((*path)->pathdata.Points);
1133 GdipFree((*path)->pathdata.Types);
1134 GdipFree(*path);
1135 return OutOfMemory;
1138 memcpy((*path)->pathdata.Points, points, count * sizeof(PointF));
1139 memcpy((*path)->pathdata.Types, types, count);
1140 (*path)->pathdata.Count = count;
1141 (*path)->datalen = count;
1143 (*path)->fill = fill;
1144 (*path)->newfigure = TRUE;
1146 return Ok;
1149 GpStatus WINGDIPAPI GdipCreatePath2I(GDIPCONST GpPoint* points,
1150 GDIPCONST BYTE* types, INT count, GpFillMode fill, GpPath **path)
1152 GpPointF *ptF;
1153 GpStatus ret;
1154 INT i;
1156 TRACE("(%p, %p, %d, %d, %p)\n", points, types, count, fill, path);
1158 ptF = GdipAlloc(sizeof(GpPointF)*count);
1160 for(i = 0;i < count; i++){
1161 ptF[i].X = (REAL)points[i].X;
1162 ptF[i].Y = (REAL)points[i].Y;
1165 ret = GdipCreatePath2(ptF, types, count, fill, path);
1167 GdipFree(ptF);
1169 return ret;
1172 GpStatus WINGDIPAPI GdipDeletePath(GpPath *path)
1174 TRACE("(%p)\n", path);
1176 if(!path)
1177 return InvalidParameter;
1179 GdipFree(path->pathdata.Points);
1180 GdipFree(path->pathdata.Types);
1181 GdipFree(path);
1183 return Ok;
1186 GpStatus WINGDIPAPI GdipFlattenPath(GpPath *path, GpMatrix* matrix, REAL flatness)
1188 path_list_node_t *list, *node;
1189 GpPointF pt;
1190 INT i = 1;
1191 INT startidx = 0;
1192 GpStatus stat;
1194 TRACE("(%p, %p, %.2f)\n", path, matrix, flatness);
1196 if(!path)
1197 return InvalidParameter;
1199 if(path->pathdata.Count == 0)
1200 return Ok;
1202 if(matrix){
1203 stat = GdipTransformPath(path, matrix);
1204 if (stat != Ok)
1205 return stat;
1208 pt = path->pathdata.Points[0];
1209 if(!init_path_list(&list, pt.X, pt.Y))
1210 return OutOfMemory;
1212 node = list;
1214 while(i < path->pathdata.Count){
1216 BYTE type = path->pathdata.Types[i] & PathPointTypePathTypeMask;
1217 path_list_node_t *start;
1219 pt = path->pathdata.Points[i];
1221 /* save last start point index */
1222 if(type == PathPointTypeStart)
1223 startidx = i;
1225 /* always add line points and start points */
1226 if((type == PathPointTypeStart) || (type == PathPointTypeLine)){
1227 if(!add_path_list_node(node, pt.X, pt.Y, path->pathdata.Types[i]))
1228 goto memout;
1230 node = node->next;
1231 ++i;
1232 continue;
1235 /* Bezier curve */
1237 /* test for closed figure */
1238 if(path->pathdata.Types[i+1] & PathPointTypeCloseSubpath){
1239 pt = path->pathdata.Points[startidx];
1240 ++i;
1242 else
1244 i += 2;
1245 pt = path->pathdata.Points[i];
1248 start = node;
1249 /* add Bezier end point */
1250 type = (path->pathdata.Types[i] & ~PathPointTypePathTypeMask) | PathPointTypeLine;
1251 if(!add_path_list_node(node, pt.X, pt.Y, type))
1252 goto memout;
1253 node = node->next;
1255 /* flatten curve */
1256 if(!flatten_bezier(start, path->pathdata.Points[i-2].X, path->pathdata.Points[i-2].Y,
1257 path->pathdata.Points[i-1].X, path->pathdata.Points[i-1].Y,
1258 node, flatness))
1259 goto memout;
1261 ++i;
1262 }/* while */
1264 /* store path data back */
1265 i = path_list_count(list);
1266 if(!lengthen_path(path, i))
1267 goto memout;
1268 path->pathdata.Count = i;
1270 node = list;
1271 for(i = 0; i < path->pathdata.Count; i++){
1272 path->pathdata.Points[i] = node->pt;
1273 path->pathdata.Types[i] = node->type;
1274 node = node->next;
1277 free_path_list(list);
1278 return Ok;
1280 memout:
1281 free_path_list(list);
1282 return OutOfMemory;
1285 GpStatus WINGDIPAPI GdipGetPathData(GpPath *path, GpPathData* pathData)
1287 TRACE("(%p, %p)\n", path, pathData);
1289 if(!path || !pathData)
1290 return InvalidParameter;
1292 /* Only copy data. pathData allocation/freeing controlled by wrapper class.
1293 Assumed that pathData is enough wide to get all data - controlled by wrapper too. */
1294 memcpy(pathData->Points, path->pathdata.Points, sizeof(PointF) * pathData->Count);
1295 memcpy(pathData->Types , path->pathdata.Types , pathData->Count);
1297 return Ok;
1300 GpStatus WINGDIPAPI GdipGetPathFillMode(GpPath *path, GpFillMode *fillmode)
1302 TRACE("(%p, %p)\n", path, fillmode);
1304 if(!path || !fillmode)
1305 return InvalidParameter;
1307 *fillmode = path->fill;
1309 return Ok;
1312 GpStatus WINGDIPAPI GdipGetPathLastPoint(GpPath* path, GpPointF* lastPoint)
1314 INT count;
1316 TRACE("(%p, %p)\n", path, lastPoint);
1318 if(!path || !lastPoint)
1319 return InvalidParameter;
1321 count = path->pathdata.Count;
1322 if(count > 0)
1323 *lastPoint = path->pathdata.Points[count-1];
1325 return Ok;
1328 GpStatus WINGDIPAPI GdipGetPathPoints(GpPath *path, GpPointF* points, INT count)
1330 TRACE("(%p, %p, %d)\n", path, points, count);
1332 if(!path)
1333 return InvalidParameter;
1335 if(count < path->pathdata.Count)
1336 return InsufficientBuffer;
1338 memcpy(points, path->pathdata.Points, path->pathdata.Count * sizeof(GpPointF));
1340 return Ok;
1343 GpStatus WINGDIPAPI GdipGetPathPointsI(GpPath *path, GpPoint* points, INT count)
1345 GpStatus ret;
1346 GpPointF *ptf;
1347 INT i;
1349 TRACE("(%p, %p, %d)\n", path, points, count);
1351 if(count <= 0)
1352 return InvalidParameter;
1354 ptf = GdipAlloc(sizeof(GpPointF)*count);
1355 if(!ptf) return OutOfMemory;
1357 ret = GdipGetPathPoints(path,ptf,count);
1358 if(ret == Ok)
1359 for(i = 0;i < count;i++){
1360 points[i].X = roundr(ptf[i].X);
1361 points[i].Y = roundr(ptf[i].Y);
1363 GdipFree(ptf);
1365 return ret;
1368 GpStatus WINGDIPAPI GdipGetPathTypes(GpPath *path, BYTE* types, INT count)
1370 TRACE("(%p, %p, %d)\n", path, types, count);
1372 if(!path)
1373 return InvalidParameter;
1375 if(count < path->pathdata.Count)
1376 return InsufficientBuffer;
1378 memcpy(types, path->pathdata.Types, path->pathdata.Count);
1380 return Ok;
1383 /* Windows expands the bounding box to the maximum possible bounding box
1384 * for a given pen. For example, if a line join can extend past the point
1385 * it's joining by x units, the bounding box is extended by x units in every
1386 * direction (even though this is too conservative for most cases). */
1387 GpStatus WINGDIPAPI GdipGetPathWorldBounds(GpPath* path, GpRectF* bounds,
1388 GDIPCONST GpMatrix *matrix, GDIPCONST GpPen *pen)
1390 GpPointF * points, temp_pts[4];
1391 INT count, i;
1392 REAL path_width = 1.0, width, height, temp, low_x, low_y, high_x, high_y;
1394 TRACE("(%p, %p, %p, %p)\n", path, bounds, matrix, pen);
1396 /* Matrix and pen can be null. */
1397 if(!path || !bounds)
1398 return InvalidParameter;
1400 /* If path is empty just return. */
1401 count = path->pathdata.Count;
1402 if(count == 0){
1403 bounds->X = bounds->Y = bounds->Width = bounds->Height = 0.0;
1404 return Ok;
1407 points = path->pathdata.Points;
1409 low_x = high_x = points[0].X;
1410 low_y = high_y = points[0].Y;
1412 for(i = 1; i < count; i++){
1413 low_x = min(low_x, points[i].X);
1414 low_y = min(low_y, points[i].Y);
1415 high_x = max(high_x, points[i].X);
1416 high_y = max(high_y, points[i].Y);
1419 width = high_x - low_x;
1420 height = high_y - low_y;
1422 /* This looks unusual but it's the only way I can imitate windows. */
1423 if(matrix){
1424 temp_pts[0].X = low_x;
1425 temp_pts[0].Y = low_y;
1426 temp_pts[1].X = low_x;
1427 temp_pts[1].Y = high_y;
1428 temp_pts[2].X = high_x;
1429 temp_pts[2].Y = high_y;
1430 temp_pts[3].X = high_x;
1431 temp_pts[3].Y = low_y;
1433 GdipTransformMatrixPoints((GpMatrix*)matrix, temp_pts, 4);
1434 low_x = temp_pts[0].X;
1435 low_y = temp_pts[0].Y;
1437 for(i = 1; i < 4; i++){
1438 low_x = min(low_x, temp_pts[i].X);
1439 low_y = min(low_y, temp_pts[i].Y);
1442 temp = width;
1443 width = height * fabs(matrix->matrix[2]) + width * fabs(matrix->matrix[0]);
1444 height = height * fabs(matrix->matrix[3]) + temp * fabs(matrix->matrix[1]);
1447 if(pen){
1448 path_width = pen->width / 2.0;
1450 if(count > 2)
1451 path_width = max(path_width, pen->width * pen->miterlimit / 2.0);
1452 /* FIXME: this should probably also check for the startcap */
1453 if(pen->endcap & LineCapNoAnchor)
1454 path_width = max(path_width, pen->width * 2.2);
1456 low_x -= path_width;
1457 low_y -= path_width;
1458 width += 2.0 * path_width;
1459 height += 2.0 * path_width;
1462 bounds->X = low_x;
1463 bounds->Y = low_y;
1464 bounds->Width = width;
1465 bounds->Height = height;
1467 return Ok;
1470 GpStatus WINGDIPAPI GdipGetPathWorldBoundsI(GpPath* path, GpRect* bounds,
1471 GDIPCONST GpMatrix *matrix, GDIPCONST GpPen *pen)
1473 GpStatus ret;
1474 GpRectF boundsF;
1476 TRACE("(%p, %p, %p, %p)\n", path, bounds, matrix, pen);
1478 ret = GdipGetPathWorldBounds(path,&boundsF,matrix,pen);
1480 if(ret == Ok){
1481 bounds->X = roundr(boundsF.X);
1482 bounds->Y = roundr(boundsF.Y);
1483 bounds->Width = roundr(boundsF.Width);
1484 bounds->Height = roundr(boundsF.Height);
1487 return ret;
1490 GpStatus WINGDIPAPI GdipGetPointCount(GpPath *path, INT *count)
1492 TRACE("(%p, %p)\n", path, count);
1494 if(!path)
1495 return InvalidParameter;
1497 *count = path->pathdata.Count;
1499 return Ok;
1502 GpStatus WINGDIPAPI GdipReversePath(GpPath* path)
1504 INT i, count;
1505 INT start = 0; /* position in reversed path */
1506 GpPathData revpath;
1508 TRACE("(%p)\n", path);
1510 if(!path)
1511 return InvalidParameter;
1513 count = path->pathdata.Count;
1515 if(count == 0) return Ok;
1517 revpath.Points = GdipAlloc(sizeof(GpPointF)*count);
1518 revpath.Types = GdipAlloc(sizeof(BYTE)*count);
1519 revpath.Count = count;
1520 if(!revpath.Points || !revpath.Types){
1521 GdipFree(revpath.Points);
1522 GdipFree(revpath.Types);
1523 return OutOfMemory;
1526 for(i = 0; i < count; i++){
1528 /* find next start point */
1529 if(path->pathdata.Types[count-i-1] == PathPointTypeStart){
1530 INT j;
1531 for(j = start; j <= i; j++){
1532 revpath.Points[j] = path->pathdata.Points[count-j-1];
1533 revpath.Types[j] = path->pathdata.Types[count-j-1];
1535 /* mark start point */
1536 revpath.Types[start] = PathPointTypeStart;
1537 /* set 'figure' endpoint type */
1538 if(i-start > 1){
1539 revpath.Types[i] = path->pathdata.Types[count-start-1] & ~PathPointTypePathTypeMask;
1540 revpath.Types[i] |= revpath.Types[i-1];
1542 else
1543 revpath.Types[i] = path->pathdata.Types[start];
1545 start = i+1;
1549 memcpy(path->pathdata.Points, revpath.Points, sizeof(GpPointF)*count);
1550 memcpy(path->pathdata.Types, revpath.Types, sizeof(BYTE)*count);
1552 GdipFree(revpath.Points);
1553 GdipFree(revpath.Types);
1555 return Ok;
1558 GpStatus WINGDIPAPI GdipIsOutlineVisiblePathPointI(GpPath* path, INT x, INT y,
1559 GpPen *pen, GpGraphics *graphics, BOOL *result)
1561 TRACE("(%p, %d, %d, %p, %p, %p)\n", path, x, y, pen, graphics, result);
1563 return GdipIsOutlineVisiblePathPoint(path, x, y, pen, graphics, result);
1566 GpStatus WINGDIPAPI GdipIsOutlineVisiblePathPoint(GpPath* path, REAL x, REAL y,
1567 GpPen *pen, GpGraphics *graphics, BOOL *result)
1569 static int calls;
1571 TRACE("(%p,%0.2f,%0.2f,%p,%p,%p)\n", path, x, y, pen, graphics, result);
1573 if(!path || !pen)
1574 return InvalidParameter;
1576 if(!(calls++))
1577 FIXME("not implemented\n");
1579 return NotImplemented;
1582 GpStatus WINGDIPAPI GdipIsVisiblePathPointI(GpPath* path, INT x, INT y, GpGraphics *graphics, BOOL *result)
1584 TRACE("(%p, %d, %d, %p, %p)\n", path, x, y, graphics, result);
1586 return GdipIsVisiblePathPoint(path, x, y, graphics, result);
1589 /*****************************************************************************
1590 * GdipIsVisiblePathPoint [GDIPLUS.@]
1592 GpStatus WINGDIPAPI GdipIsVisiblePathPoint(GpPath* path, REAL x, REAL y, GpGraphics *graphics, BOOL *result)
1594 GpRegion *region;
1595 HRGN hrgn;
1596 GpStatus status;
1598 if(!path || !result) return InvalidParameter;
1600 status = GdipCreateRegionPath(path, &region);
1601 if(status != Ok)
1602 return status;
1604 status = GdipGetRegionHRgn(region, graphics, &hrgn);
1605 if(status != Ok){
1606 GdipDeleteRegion(region);
1607 return status;
1610 *result = PtInRegion(hrgn, roundr(x), roundr(y));
1612 DeleteObject(hrgn);
1613 GdipDeleteRegion(region);
1615 return Ok;
1618 GpStatus WINGDIPAPI GdipStartPathFigure(GpPath *path)
1620 TRACE("(%p)\n", path);
1622 if(!path)
1623 return InvalidParameter;
1625 path->newfigure = TRUE;
1627 return Ok;
1630 GpStatus WINGDIPAPI GdipResetPath(GpPath *path)
1632 TRACE("(%p)\n", path);
1634 if(!path)
1635 return InvalidParameter;
1637 path->pathdata.Count = 0;
1638 path->newfigure = TRUE;
1639 path->fill = FillModeAlternate;
1641 return Ok;
1644 GpStatus WINGDIPAPI GdipSetPathFillMode(GpPath *path, GpFillMode fill)
1646 TRACE("(%p, %d)\n", path, fill);
1648 if(!path)
1649 return InvalidParameter;
1651 path->fill = fill;
1653 return Ok;
1656 GpStatus WINGDIPAPI GdipTransformPath(GpPath *path, GpMatrix *matrix)
1658 TRACE("(%p, %p)\n", path, matrix);
1660 if(!path)
1661 return InvalidParameter;
1663 if(path->pathdata.Count == 0)
1664 return Ok;
1666 return GdipTransformMatrixPoints(matrix, path->pathdata.Points,
1667 path->pathdata.Count);
1670 GpStatus WINGDIPAPI GdipWarpPath(GpPath *path, GpMatrix* matrix,
1671 GDIPCONST GpPointF *points, INT count, REAL x, REAL y, REAL width,
1672 REAL height, WarpMode warpmode, REAL flatness)
1674 FIXME("(%p,%p,%p,%i,%0.2f,%0.2f,%0.2f,%0.2f,%i,%0.2f)\n", path, matrix,
1675 points, count, x, y, width, height, warpmode, flatness);
1677 return NotImplemented;
1680 static void add_bevel_point(const GpPointF *endpoint, const GpPointF *nextpoint,
1681 GpPen *pen, int right_side, path_list_node_t **last_point)
1683 REAL segment_dy = nextpoint->Y-endpoint->Y;
1684 REAL segment_dx = nextpoint->X-endpoint->X;
1685 REAL segment_length = sqrtf(segment_dy*segment_dy + segment_dx*segment_dx);
1686 REAL distance = pen->width/2.0;
1687 REAL bevel_dx, bevel_dy;
1689 if (right_side)
1691 bevel_dx = -distance * segment_dy / segment_length;
1692 bevel_dy = distance * segment_dx / segment_length;
1694 else
1696 bevel_dx = distance * segment_dy / segment_length;
1697 bevel_dy = -distance * segment_dx / segment_length;
1700 *last_point = add_path_list_node(*last_point, endpoint->X + bevel_dx,
1701 endpoint->Y + bevel_dy, PathPointTypeLine);
1704 static void widen_joint(const GpPointF *p1, const GpPointF *p2, const GpPointF *p3,
1705 GpPen* pen, path_list_node_t **last_point)
1707 switch (pen->join)
1709 case LineJoinMiter:
1710 case LineJoinMiterClipped:
1712 if ((p2->X - p1->X) * (p3->Y - p1->Y) > (p2->Y - p1->Y) * (p3->X - p1->X))
1714 float distance = pen->width/2.0;
1715 float length_0 = sqrtf((p2->X-p1->X)*(p2->X-p1->X)+(p2->Y-p1->Y)*(p2->Y-p1->Y));
1716 float length_1 = sqrtf((p3->X-p2->X)*(p3->X-p2->X)+(p3->Y-p2->Y)*(p3->Y-p2->Y));
1717 float dx0 = distance * (p2->X - p1->X) / length_0;
1718 float dy0 = distance * (p2->Y - p1->Y) / length_0;
1719 float dx1 = distance * (p3->X - p2->X) / length_1;
1720 float dy1 = distance * (p3->Y - p2->Y) / length_1;
1721 float det = (dy0*dx1 - dx0*dy1);
1722 float dx = (dx0*dx1*(dx0-dx1) + dy0*dy0*dx1 - dy1*dy1*dx0)/det;
1723 float dy = (dy0*dy1*(dy0-dy1) + dx0*dx0*dy1 - dx1*dx1*dy0)/det;
1724 if (dx*dx + dy*dy < pen->miterlimit*pen->miterlimit * distance*distance)
1726 *last_point = add_path_list_node(*last_point, p2->X + dx,
1727 p2->Y + dy, PathPointTypeLine);
1728 break;
1730 else if (pen->join == LineJoinMiter)
1732 static int once;
1733 if (!once++)
1734 FIXME("should add a clipped corner\n");
1736 /* else fall-through */
1738 /* else fall-through */
1740 default:
1741 case LineJoinBevel:
1742 add_bevel_point(p2, p1, pen, 1, last_point);
1743 add_bevel_point(p2, p3, pen, 0, last_point);
1744 break;
1748 static void widen_cap(const GpPointF *endpoint, const GpPointF *nextpoint,
1749 GpPen *pen, GpLineCap cap, GpCustomLineCap *custom, int add_first_points,
1750 int add_last_point, path_list_node_t **last_point)
1752 switch (cap)
1754 default:
1755 case LineCapFlat:
1756 if (add_first_points)
1757 add_bevel_point(endpoint, nextpoint, pen, 1, last_point);
1758 if (add_last_point)
1759 add_bevel_point(endpoint, nextpoint, pen, 0, last_point);
1760 break;
1764 static void widen_open_figure(GpPath *path, GpPen *pen, int start, int end,
1765 path_list_node_t **last_point)
1767 int i;
1769 if (end <= start)
1770 return;
1772 widen_cap(&path->pathdata.Points[start], &path->pathdata.Points[start+1],
1773 pen, pen->startcap, pen->customstart, FALSE, TRUE, last_point);
1775 (*last_point)->type = PathPointTypeStart;
1777 for (i=start+1; i<end; i++)
1778 widen_joint(&path->pathdata.Points[i-1], &path->pathdata.Points[i],
1779 &path->pathdata.Points[i+1], pen, last_point);
1781 widen_cap(&path->pathdata.Points[end], &path->pathdata.Points[end-1],
1782 pen, pen->endcap, pen->customend, TRUE, TRUE, last_point);
1784 for (i=end-1; i>start; i--)
1785 widen_joint(&path->pathdata.Points[i+1], &path->pathdata.Points[i],
1786 &path->pathdata.Points[i-1], pen, last_point);
1788 widen_cap(&path->pathdata.Points[start], &path->pathdata.Points[start+1],
1789 pen, pen->startcap, pen->customstart, TRUE, FALSE, last_point);
1791 (*last_point)->type |= PathPointTypeCloseSubpath;
1794 static void widen_closed_figure(GpPath *path, GpPen *pen, int start, int end,
1795 path_list_node_t **last_point)
1797 int i;
1798 path_list_node_t *prev_point;
1800 if (end <= start+1)
1801 return;
1803 /* left outline */
1804 prev_point = *last_point;
1806 widen_joint(&path->pathdata.Points[end], &path->pathdata.Points[start],
1807 &path->pathdata.Points[start+1], pen, last_point);
1809 for (i=start+1; i<end; i++)
1810 widen_joint(&path->pathdata.Points[i-1], &path->pathdata.Points[i],
1811 &path->pathdata.Points[i+1], pen, last_point);
1813 widen_joint(&path->pathdata.Points[end-1], &path->pathdata.Points[end],
1814 &path->pathdata.Points[start], pen, last_point);
1816 prev_point->next->type = PathPointTypeStart;
1817 (*last_point)->type |= PathPointTypeCloseSubpath;
1819 /* right outline */
1820 prev_point = *last_point;
1822 widen_joint(&path->pathdata.Points[start], &path->pathdata.Points[end],
1823 &path->pathdata.Points[end-1], pen, last_point);
1825 for (i=end-1; i>start; i--)
1826 widen_joint(&path->pathdata.Points[i+1], &path->pathdata.Points[i],
1827 &path->pathdata.Points[i-1], pen, last_point);
1829 widen_joint(&path->pathdata.Points[start+1], &path->pathdata.Points[start],
1830 &path->pathdata.Points[end], pen, last_point);
1832 prev_point->next->type = PathPointTypeStart;
1833 (*last_point)->type |= PathPointTypeCloseSubpath;
1836 GpStatus WINGDIPAPI GdipWidenPath(GpPath *path, GpPen *pen, GpMatrix *matrix,
1837 REAL flatness)
1839 GpPath *flat_path=NULL;
1840 GpStatus status;
1841 path_list_node_t *points=NULL, *last_point=NULL;
1842 int i, subpath_start=0, new_length;
1843 BYTE type;
1845 TRACE("(%p,%p,%p,%0.2f)\n", path, pen, matrix, flatness);
1847 if (!path || !pen)
1848 return InvalidParameter;
1850 if (path->pathdata.Count <= 1)
1851 return OutOfMemory;
1853 status = GdipClonePath(path, &flat_path);
1855 if (status == Ok)
1856 status = GdipFlattenPath(flat_path, matrix, flatness);
1858 if (status == Ok && !init_path_list(&points, 314.0, 22.0))
1859 status = OutOfMemory;
1861 if (status == Ok)
1863 last_point = points;
1865 if (pen->endcap != LineCapFlat)
1866 FIXME("unimplemented end cap %x\n", pen->endcap);
1868 if (pen->startcap != LineCapFlat)
1869 FIXME("unimplemented start cap %x\n", pen->startcap);
1871 if (pen->dashcap != DashCapFlat)
1872 FIXME("unimplemented dash cap %d\n", pen->dashcap);
1874 if (pen->join == LineJoinRound)
1875 FIXME("unimplemented line join %d\n", pen->join);
1877 if (pen->dash != DashStyleSolid)
1878 FIXME("unimplemented dash style %d\n", pen->dash);
1880 if (pen->align != PenAlignmentCenter)
1881 FIXME("unimplemented pen alignment %d\n", pen->align);
1883 for (i=0; i < flat_path->pathdata.Count; i++)
1885 type = flat_path->pathdata.Types[i];
1887 if ((type&PathPointTypePathTypeMask) == PathPointTypeStart)
1888 subpath_start = i;
1890 if ((type&PathPointTypeCloseSubpath) == PathPointTypeCloseSubpath)
1892 widen_closed_figure(flat_path, pen, subpath_start, i, &last_point);
1894 else if (i == flat_path->pathdata.Count-1 ||
1895 (flat_path->pathdata.Types[i+1]&PathPointTypePathTypeMask) == PathPointTypeStart)
1897 widen_open_figure(flat_path, pen, subpath_start, i, &last_point);
1901 new_length = path_list_count(points)-1;
1903 if (!lengthen_path(path, new_length))
1904 status = OutOfMemory;
1907 if (status == Ok)
1909 path->pathdata.Count = new_length;
1911 last_point = points->next;
1912 for (i = 0; i < new_length; i++)
1914 path->pathdata.Points[i] = last_point->pt;
1915 path->pathdata.Types[i] = last_point->type;
1916 last_point = last_point->next;
1919 path->fill = FillModeWinding;
1922 free_path_list(points);
1924 GdipDeletePath(flat_path);
1926 return status;
1929 GpStatus WINGDIPAPI GdipAddPathRectangle(GpPath *path, REAL x, REAL y,
1930 REAL width, REAL height)
1932 GpPath *backup;
1933 GpPointF ptf[2];
1934 GpStatus retstat;
1935 BOOL old_new;
1937 TRACE("(%p, %.2f, %.2f, %.2f, %.2f)\n", path, x, y, width, height);
1939 if(!path)
1940 return InvalidParameter;
1942 /* make a backup copy of path data */
1943 if((retstat = GdipClonePath(path, &backup)) != Ok)
1944 return retstat;
1946 /* rectangle should start as new path */
1947 old_new = path->newfigure;
1948 path->newfigure = TRUE;
1949 if((retstat = GdipAddPathLine(path,x,y,x+width,y)) != Ok){
1950 path->newfigure = old_new;
1951 goto fail;
1954 ptf[0].X = x+width;
1955 ptf[0].Y = y+height;
1956 ptf[1].X = x;
1957 ptf[1].Y = y+height;
1959 if((retstat = GdipAddPathLine2(path, ptf, 2)) != Ok) goto fail;
1960 path->pathdata.Types[path->pathdata.Count-1] |= PathPointTypeCloseSubpath;
1962 /* free backup */
1963 GdipDeletePath(backup);
1964 return Ok;
1966 fail:
1967 /* reverting */
1968 GdipFree(path->pathdata.Points);
1969 GdipFree(path->pathdata.Types);
1970 memcpy(path, backup, sizeof(*path));
1971 GdipFree(backup);
1973 return retstat;
1976 GpStatus WINGDIPAPI GdipAddPathRectangleI(GpPath *path, INT x, INT y,
1977 INT width, INT height)
1979 TRACE("(%p, %d, %d, %d, %d)\n", path, x, y, width, height);
1981 return GdipAddPathRectangle(path,(REAL)x,(REAL)y,(REAL)width,(REAL)height);
1984 GpStatus WINGDIPAPI GdipAddPathRectangles(GpPath *path, GDIPCONST GpRectF *rects, INT count)
1986 GpPath *backup;
1987 GpStatus retstat;
1988 INT i;
1990 TRACE("(%p, %p, %d)\n", path, rects, count);
1992 /* count == 0 - verified condition */
1993 if(!path || !rects || count == 0)
1994 return InvalidParameter;
1996 if(count < 0)
1997 return OutOfMemory;
1999 /* make a backup copy */
2000 if((retstat = GdipClonePath(path, &backup)) != Ok)
2001 return retstat;
2003 for(i = 0; i < count; i++){
2004 if((retstat = GdipAddPathRectangle(path,rects[i].X,rects[i].Y,rects[i].Width,rects[i].Height)) != Ok)
2005 goto fail;
2008 /* free backup */
2009 GdipDeletePath(backup);
2010 return Ok;
2012 fail:
2013 /* reverting */
2014 GdipFree(path->pathdata.Points);
2015 GdipFree(path->pathdata.Types);
2016 memcpy(path, backup, sizeof(*path));
2017 GdipFree(backup);
2019 return retstat;
2022 GpStatus WINGDIPAPI GdipAddPathRectanglesI(GpPath *path, GDIPCONST GpRect *rects, INT count)
2024 GpRectF *rectsF;
2025 GpStatus retstat;
2026 INT i;
2028 TRACE("(%p, %p, %d)\n", path, rects, count);
2030 if(!rects || count == 0)
2031 return InvalidParameter;
2033 if(count < 0)
2034 return OutOfMemory;
2036 rectsF = GdipAlloc(sizeof(GpRectF)*count);
2038 for(i = 0;i < count;i++){
2039 rectsF[i].X = (REAL)rects[i].X;
2040 rectsF[i].Y = (REAL)rects[i].Y;
2041 rectsF[i].Width = (REAL)rects[i].Width;
2042 rectsF[i].Height = (REAL)rects[i].Height;
2045 retstat = GdipAddPathRectangles(path, rectsF, count);
2046 GdipFree(rectsF);
2048 return retstat;
2051 GpStatus WINGDIPAPI GdipSetPathMarker(GpPath* path)
2053 INT count;
2055 TRACE("(%p)\n", path);
2057 if(!path)
2058 return InvalidParameter;
2060 count = path->pathdata.Count;
2062 /* set marker flag */
2063 if(count > 0)
2064 path->pathdata.Types[count-1] |= PathPointTypePathMarker;
2066 return Ok;
2069 GpStatus WINGDIPAPI GdipClearPathMarkers(GpPath* path)
2071 INT count;
2072 INT i;
2074 TRACE("(%p)\n", path);
2076 if(!path)
2077 return InvalidParameter;
2079 count = path->pathdata.Count;
2081 for(i = 0; i < count - 1; i++){
2082 path->pathdata.Types[i] &= ~PathPointTypePathMarker;
2085 return Ok;
2088 GpStatus WINGDIPAPI GdipWindingModeOutline(GpPath *path, GpMatrix *matrix, REAL flatness)
2090 FIXME("stub: %p, %p, %.2f\n", path, matrix, flatness);
2091 return NotImplemented;