gdiplus: Stub GdipWidenPath.
[wine] / dlls / gdiplus / graphicspath.c
1 /*
2  * Copyright (C) 2007 Google (Evan Stade)
3  *
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.
8  *
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.
13  *
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
17  *
18  */
19
20 #include <stdarg.h>
21 #include <math.h>
22
23 #include "windef.h"
24 #include "winbase.h"
25 #include "winuser.h"
26 #include "wingdi.h"
27
28 #include "objbase.h"
29
30 #include "gdiplus.h"
31 #include "gdiplus_private.h"
32 #include "wine/debug.h"
33
34 WINE_DEFAULT_DEBUG_CHANNEL(gdiplus);
35
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;
41 };
42
43 /* init list */
44 static BOOL init_path_list(path_list_node_t **node, REAL x, REAL y)
45 {
46     *node = GdipAlloc(sizeof(path_list_node_t));
47     if(!*node)
48         return FALSE;
49
50     (*node)->pt.X = x;
51     (*node)->pt.Y = y;
52     (*node)->type = PathPointTypeStart;
53     (*node)->next = NULL;
54
55     return TRUE;
56 }
57
58 /* free all nodes including argument */
59 static void free_path_list(path_list_node_t *node)
60 {
61     path_list_node_t *n = node;
62
63     while(n){
64         n = n->next;
65         GdipFree(node);
66         node = n;
67     }
68 }
69
70 /* Add a node after 'node' */
71 /*
72  * Returns
73  *  pointer on success
74  *  NULL    on allocation problems
75  */
76 static path_list_node_t* add_path_list_node(path_list_node_t *node, REAL x, REAL y, BOOL type)
77 {
78     path_list_node_t *new;
79
80     new = GdipAlloc(sizeof(path_list_node_t));
81     if(!new)
82         return NULL;
83
84     new->pt.X  = x;
85     new->pt.Y  = y;
86     new->type  = type;
87     new->next  = node->next;
88     node->next = new;
89
90     return new;
91 }
92
93 /* returns element count */
94 static INT path_list_count(path_list_node_t *node)
95 {
96     INT count = 1;
97
98     while((node = node->next))
99         ++count;
100
101     return count;
102 }
103
104 /* GdipFlattenPath helper */
105 /*
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.
113  *
114  * Return value:
115  *  TRUE : success
116  *  FALSE: out of memory
117  *
118  * TODO: used quality criteria should be revised to match native as
119  *       closer as possible.
120  */
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)
123 {
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;
128
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;
141
142     mp[2].X = (mp[1].X + mp[3].X) / 2.0;
143     mp[2].Y = (mp[1].Y + mp[3].Y) / 2.0;
144
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;
152     }
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;
157
158     /* do the same with halfs */
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);
161
162     return TRUE;
163 }
164
165 GpStatus WINGDIPAPI GdipAddPathArc(GpPath *path, REAL x1, REAL y1, REAL x2,
166     REAL y2, REAL startAngle, REAL sweepAngle)
167 {
168     INT count, old_count, i;
169
170     TRACE("(%p, %.2f, %.2f, %.2f, %.2f, %.2f, %.2f)\n",
171           path, x1, y1, x2, y2, startAngle, sweepAngle);
172
173     if(!path)
174         return InvalidParameter;
175
176     count = arc2polybezier(NULL, x1, y1, x2, y2, startAngle, sweepAngle);
177
178     if(count == 0)
179         return Ok;
180     if(!lengthen_path(path, count))
181         return OutOfMemory;
182
183     old_count = path->pathdata.Count;
184     arc2polybezier(&path->pathdata.Points[old_count], x1, y1, x2, y2,
185                    startAngle, sweepAngle);
186
187     for(i = 0; i < count; i++){
188         path->pathdata.Types[old_count + i] = PathPointTypeBezier;
189     }
190
191     path->pathdata.Types[old_count] =
192         (path->newfigure ? PathPointTypeStart : PathPointTypeLine);
193     path->newfigure = FALSE;
194     path->pathdata.Count += count;
195
196     return Ok;
197 }
198
199 GpStatus WINGDIPAPI GdipAddPathArcI(GpPath *path, INT x1, INT y1, INT x2,
200    INT y2, REAL startAngle, REAL sweepAngle)
201 {
202     TRACE("(%p, %d, %d, %d, %d, %.2f, %.2f)\n",
203           path, x1, y1, x2, y2, startAngle, sweepAngle);
204
205     return GdipAddPathArc(path,(REAL)x1,(REAL)y1,(REAL)x2,(REAL)y2,startAngle,sweepAngle);
206 }
207
208 GpStatus WINGDIPAPI GdipAddPathBezier(GpPath *path, REAL x1, REAL y1, REAL x2,
209     REAL y2, REAL x3, REAL y3, REAL x4, REAL y4)
210 {
211     INT old_count;
212
213     TRACE("(%p, %.2f, %.2f, %.2f, %.2f, %.2f, %.2f, %.2f, %.2f)\n",
214           path, x1, y1, x2, y2, x3, y3, x4, y4);
215
216     if(!path)
217         return InvalidParameter;
218
219     if(!lengthen_path(path, 4))
220         return OutOfMemory;
221
222     old_count = path->pathdata.Count;
223
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;
232
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;
238
239     path->newfigure = FALSE;
240     path->pathdata.Count += 4;
241
242     return Ok;
243 }
244
245 GpStatus WINGDIPAPI GdipAddPathBezierI(GpPath *path, INT x1, INT y1, INT x2,
246     INT y2, INT x3, INT y3, INT x4, INT y4)
247 {
248     TRACE("(%p, %d, %d, %d, %d, %d, %d, %d, %d)\n",
249           path, x1, y1, x2, y2, x3, y3, x4, y4);
250
251     return GdipAddPathBezier(path,(REAL)x1,(REAL)y1,(REAL)x2,(REAL)y2,(REAL)x3,(REAL)y3,
252                                   (REAL)x4,(REAL)y4);
253 }
254
255 GpStatus WINGDIPAPI GdipAddPathBeziers(GpPath *path, GDIPCONST GpPointF *points,
256     INT count)
257 {
258     INT i, old_count;
259
260     TRACE("(%p, %p, %d)\n", path, points, count);
261
262     if(!path || !points || ((count - 1) % 3))
263         return InvalidParameter;
264
265     if(!lengthen_path(path, count))
266         return OutOfMemory;
267
268     old_count = path->pathdata.Count;
269
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;
274     }
275
276     path->pathdata.Types[old_count] =
277         (path->newfigure ? PathPointTypeStart : PathPointTypeLine);
278     path->newfigure = FALSE;
279     path->pathdata.Count += count;
280
281     return Ok;
282 }
283
284 GpStatus WINGDIPAPI GdipAddPathBeziersI(GpPath *path, GDIPCONST GpPoint *points,
285     INT count)
286 {
287     GpPointF *ptsF;
288     GpStatus ret;
289     INT i;
290
291     TRACE("(%p, %p, %d)\n", path, points, count);
292
293     if(!points || ((count - 1) % 3))
294         return InvalidParameter;
295
296     ptsF = GdipAlloc(sizeof(GpPointF) * count);
297     if(!ptsF)
298         return OutOfMemory;
299
300     for(i = 0; i < count; i++){
301         ptsF[i].X = (REAL)points[i].X;
302         ptsF[i].Y = (REAL)points[i].Y;
303     }
304
305     ret = GdipAddPathBeziers(path, ptsF, count);
306     GdipFree(ptsF);
307
308     return ret;
309 }
310
311 GpStatus WINGDIPAPI GdipAddPathClosedCurve(GpPath *path, GDIPCONST GpPointF *points,
312     INT count)
313 {
314     TRACE("(%p, %p, %d)\n", path, points, count);
315
316     return GdipAddPathClosedCurve2(path, points, count, 1.0);
317 }
318
319 GpStatus WINGDIPAPI GdipAddPathClosedCurveI(GpPath *path, GDIPCONST GpPoint *points,
320     INT count)
321 {
322     TRACE("(%p, %p, %d)\n", path, points, count);
323
324     return GdipAddPathClosedCurve2I(path, points, count, 1.0);
325 }
326
327 GpStatus WINGDIPAPI GdipAddPathClosedCurve2(GpPath *path, GDIPCONST GpPointF *points,
328     INT count, REAL tension)
329 {
330     INT i, len_pt = (count + 1)*3-2;
331     GpPointF *pt;
332     GpPointF *pts;
333     REAL x1, x2, y1, y2;
334     GpStatus stat;
335
336     TRACE("(%p, %p, %d, %.2f)\n", path, points, count, tension);
337
338     if(!path || !points || count <= 1)
339         return InvalidParameter;
340
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;
347     }
348
349     /* copy source points to extend with the last one */
350     memcpy(pts, points, sizeof(GpPointF)*count);
351     pts[count] = pts[0];
352
353     tension = tension * TENSION_CONST;
354
355     for(i = 0; i < count-1; i++){
356         calc_curve_bezier(&(pts[i]), tension, &x1, &y1, &x2, &y2);
357
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;
364     }
365
366     /* points [len_pt-2] and [0] are calculated
367        separetely 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];
371
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;
382
383     stat = GdipAddPathBeziers(path, pt, len_pt);
384
385     /* close figure */
386     if(stat == Ok){
387         INT count = path->pathdata.Count;
388         path->pathdata.Types[count - 1] |= PathPointTypeCloseSubpath;
389         path->newfigure = TRUE;
390     }
391
392     GdipFree(pts);
393     GdipFree(pt);
394
395     return stat;
396 }
397
398 GpStatus WINGDIPAPI GdipAddPathClosedCurve2I(GpPath *path, GDIPCONST GpPoint *points,
399     INT count, REAL tension)
400 {
401     GpPointF *ptf;
402     INT i;
403     GpStatus stat;
404
405     TRACE("(%p, %p, %d, %.2f)\n", path, points, count, tension);
406
407     if(!path || !points || count <= 1)
408         return InvalidParameter;
409
410     ptf = GdipAlloc(sizeof(GpPointF)*count);
411     if(!ptf)
412         return OutOfMemory;
413
414     for(i = 0; i < count; i++){
415         ptf[i].X = (REAL)points[i].X;
416         ptf[i].Y = (REAL)points[i].Y;
417     }
418
419     stat = GdipAddPathClosedCurve2(path, ptf, count, tension);
420
421     GdipFree(ptf);
422
423     return stat;
424 }
425
426 GpStatus WINGDIPAPI GdipAddPathCurve(GpPath *path, GDIPCONST GpPointF *points, INT count)
427 {
428     TRACE("(%p, %p, %d)\n", path, points, count);
429
430     if(!path || !points || count <= 1)
431         return InvalidParameter;
432
433     return GdipAddPathCurve2(path, points, count, 1.0);
434 }
435
436 GpStatus WINGDIPAPI GdipAddPathCurveI(GpPath *path, GDIPCONST GpPoint *points, INT count)
437 {
438     TRACE("(%p, %p, %d)\n", path, points, count);
439
440     if(!path || !points || count <= 1)
441         return InvalidParameter;
442
443     return GdipAddPathCurve2I(path, points, count, 1.0);
444 }
445
446 GpStatus WINGDIPAPI GdipAddPathCurve2(GpPath *path, GDIPCONST GpPointF *points, INT count,
447     REAL tension)
448 {
449     INT i, len_pt = count*3-2;
450     GpPointF *pt;
451     REAL x1, x2, y1, y2;
452     GpStatus stat;
453
454     TRACE("(%p, %p, %d, %.2f)\n", path, points, count, tension);
455
456     if(!path || !points || count <= 1)
457         return InvalidParameter;
458
459     pt = GdipAlloc(len_pt * sizeof(GpPointF));
460     if(!pt)
461         return OutOfMemory;
462
463     tension = tension * TENSION_CONST;
464
465     calc_curve_bezier_endp(points[0].X, points[0].Y, points[1].X, points[1].Y,
466         tension, &x1, &y1);
467
468     pt[0].X = points[0].X;
469     pt[0].Y = points[0].Y;
470     pt[1].X = x1;
471     pt[1].Y = y1;
472
473     for(i = 0; i < count-2; i++){
474         calc_curve_bezier(&(points[i]), tension, &x1, &y1, &x2, &y2);
475
476         pt[3*i+2].X = x1;
477         pt[3*i+2].Y = y1;
478         pt[3*i+3].X = points[i+1].X;
479         pt[3*i+3].Y = points[i+1].Y;
480         pt[3*i+4].X = x2;
481         pt[3*i+4].Y = y2;
482     }
483
484     calc_curve_bezier_endp(points[count-1].X, points[count-1].Y,
485         points[count-2].X, points[count-2].Y, tension, &x1, &y1);
486
487     pt[len_pt-2].X = x1;
488     pt[len_pt-2].Y = y1;
489     pt[len_pt-1].X = points[count-1].X;
490     pt[len_pt-1].Y = points[count-1].Y;
491
492     stat = GdipAddPathBeziers(path, pt, len_pt);
493
494     GdipFree(pt);
495
496     return stat;
497 }
498
499 GpStatus WINGDIPAPI GdipAddPathCurve2I(GpPath *path, GDIPCONST GpPoint *points,
500     INT count, REAL tension)
501 {
502     GpPointF *ptf;
503     INT i;
504     GpStatus stat;
505
506     TRACE("(%p, %p, %d, %.2f)\n", path, points, count, tension);
507
508     if(!path || !points || count <= 1)
509         return InvalidParameter;
510
511     ptf = GdipAlloc(sizeof(GpPointF)*count);
512     if(!ptf)
513         return OutOfMemory;
514
515     for(i = 0; i < count; i++){
516         ptf[i].X = (REAL)points[i].X;
517         ptf[i].Y = (REAL)points[i].Y;
518     }
519
520     stat = GdipAddPathCurve2(path, ptf, count, tension);
521
522     GdipFree(ptf);
523
524     return stat;
525 }
526
527 GpStatus WINGDIPAPI GdipAddPathCurve3(GpPath *path, GDIPCONST GpPointF *points,
528     INT count, INT offset, INT nseg, REAL tension)
529 {
530     TRACE("(%p, %p, %d, %d, %d, %.2f)\n", path, points, count, offset, nseg, tension);
531
532     if(!path || !points || offset + 1 >= count || count - offset < nseg + 1)
533         return InvalidParameter;
534
535     return GdipAddPathCurve2(path, &points[offset], nseg + 1, tension);
536 }
537
538 GpStatus WINGDIPAPI GdipAddPathCurve3I(GpPath *path, GDIPCONST GpPoint *points,
539     INT count, INT offset, INT nseg, REAL tension)
540 {
541     TRACE("(%p, %p, %d, %d, %d, %.2f)\n", path, points, count, offset, nseg, tension);
542
543     if(!path || !points || offset + 1 >= count || count - offset < nseg + 1)
544         return InvalidParameter;
545
546     return GdipAddPathCurve2I(path, &points[offset], nseg + 1, tension);
547 }
548
549 GpStatus WINGDIPAPI GdipAddPathEllipse(GpPath *path, REAL x, REAL y, REAL width,
550     REAL height)
551 {
552     INT old_count, numpts;
553
554     TRACE("(%p, %.2f, %.2f, %.2f, %.2f)\n", path, x, y, width, height);
555
556     if(!path)
557         return InvalidParameter;
558
559     if(!lengthen_path(path, MAX_ARC_PTS))
560         return OutOfMemory;
561
562     old_count = path->pathdata.Count;
563     if((numpts = arc2polybezier(&path->pathdata.Points[old_count],  x, y, width,
564                                height, 0.0, 360.0)) != MAX_ARC_PTS){
565         ERR("expected %d points but got %d\n", MAX_ARC_PTS, numpts);
566         return GenericError;
567     }
568
569     memset(&path->pathdata.Types[old_count + 1], PathPointTypeBezier,
570            MAX_ARC_PTS - 1);
571
572     /* An ellipse is an intrinsic figure (always is its own subpath). */
573     path->pathdata.Types[old_count] = PathPointTypeStart;
574     path->pathdata.Types[old_count + MAX_ARC_PTS - 1] |= PathPointTypeCloseSubpath;
575     path->newfigure = TRUE;
576     path->pathdata.Count += MAX_ARC_PTS;
577
578     return Ok;
579 }
580
581 GpStatus WINGDIPAPI GdipAddPathEllipseI(GpPath *path, INT x, INT y, INT width,
582     INT height)
583 {
584     TRACE("(%p, %d, %d, %d, %d)\n", path, x, y, width, height);
585
586     return GdipAddPathEllipse(path,(REAL)x,(REAL)y,(REAL)width,(REAL)height);
587 }
588
589 GpStatus WINGDIPAPI GdipAddPathLine2(GpPath *path, GDIPCONST GpPointF *points,
590     INT count)
591 {
592     INT i, old_count;
593
594     TRACE("(%p, %p, %d)\n", path, points, count);
595
596     if(!path || !points)
597         return InvalidParameter;
598
599     if(!lengthen_path(path, count))
600         return OutOfMemory;
601
602     old_count = path->pathdata.Count;
603
604     for(i = 0; i < count; i++){
605         path->pathdata.Points[old_count + i].X = points[i].X;
606         path->pathdata.Points[old_count + i].Y = points[i].Y;
607         path->pathdata.Types[old_count + i] = PathPointTypeLine;
608     }
609
610     if(path->newfigure){
611         path->pathdata.Types[old_count] = PathPointTypeStart;
612         path->newfigure = FALSE;
613     }
614
615     path->pathdata.Count += count;
616
617     return Ok;
618 }
619
620 GpStatus WINGDIPAPI GdipAddPathLine2I(GpPath *path, GDIPCONST GpPoint *points, INT count)
621 {
622     GpPointF *pointsF;
623     INT i;
624     GpStatus stat;
625
626     TRACE("(%p, %p, %d)\n", path, points, count);
627
628     if(count <= 0)
629         return InvalidParameter;
630
631     pointsF = GdipAlloc(sizeof(GpPointF) * count);
632     if(!pointsF)    return OutOfMemory;
633
634     for(i = 0;i < count; i++){
635         pointsF[i].X = (REAL)points[i].X;
636         pointsF[i].Y = (REAL)points[i].Y;
637     }
638
639     stat = GdipAddPathLine2(path, pointsF, count);
640
641     GdipFree(pointsF);
642
643     return stat;
644 }
645
646 GpStatus WINGDIPAPI GdipAddPathLine(GpPath *path, REAL x1, REAL y1, REAL x2, REAL y2)
647 {
648     INT old_count;
649
650     TRACE("(%p, %.2f, %.2f, %.2f, %.2f)\n", path, x1, y1, x2, y2);
651
652     if(!path)
653         return InvalidParameter;
654
655     if(!lengthen_path(path, 2))
656         return OutOfMemory;
657
658     old_count = path->pathdata.Count;
659
660     path->pathdata.Points[old_count].X = x1;
661     path->pathdata.Points[old_count].Y = y1;
662     path->pathdata.Points[old_count + 1].X = x2;
663     path->pathdata.Points[old_count + 1].Y = y2;
664
665     path->pathdata.Types[old_count] =
666         (path->newfigure ? PathPointTypeStart : PathPointTypeLine);
667     path->pathdata.Types[old_count + 1] = PathPointTypeLine;
668
669     path->newfigure = FALSE;
670     path->pathdata.Count += 2;
671
672     return Ok;
673 }
674
675 GpStatus WINGDIPAPI GdipAddPathLineI(GpPath *path, INT x1, INT y1, INT x2, INT y2)
676 {
677     TRACE("(%p, %d, %d, %d, %d)\n", path, x1, y1, x2, y2);
678
679     return GdipAddPathLine(path, (REAL)x1, (REAL)y1, (REAL)x2, (REAL)y2);
680 }
681
682 GpStatus WINGDIPAPI GdipAddPathPath(GpPath *path, GDIPCONST GpPath* addingPath,
683     BOOL connect)
684 {
685     INT old_count, count;
686
687     TRACE("(%p, %p, %d)\n", path, addingPath, connect);
688
689     if(!path || !addingPath)
690         return InvalidParameter;
691
692     old_count = path->pathdata.Count;
693     count = addingPath->pathdata.Count;
694
695     if(!lengthen_path(path, count))
696         return OutOfMemory;
697
698     memcpy(&path->pathdata.Points[old_count], addingPath->pathdata.Points,
699            count * sizeof(GpPointF));
700     memcpy(&path->pathdata.Types[old_count], addingPath->pathdata.Types, count);
701
702     if(path->newfigure || !connect)
703         path->pathdata.Types[old_count] = PathPointTypeStart;
704     else
705         path->pathdata.Types[old_count] = PathPointTypeLine;
706
707     path->newfigure = FALSE;
708     path->pathdata.Count += count;
709
710     return Ok;
711 }
712
713 GpStatus WINGDIPAPI GdipAddPathPie(GpPath *path, REAL x, REAL y, REAL width, REAL height,
714     REAL startAngle, REAL sweepAngle)
715 {
716     GpPointF *ptf;
717     GpStatus status;
718     INT i, count;
719
720     TRACE("(%p, %.2f, %.2f, %.2f, %.2f, %.2f, %.2f)\n",
721           path, x, y, width, height, startAngle, sweepAngle);
722
723     if(!path)
724         return InvalidParameter;
725
726     /* on zero width/height only start point added */
727     if(width <= 1e-7 || height <= 1e-7){
728         if(!lengthen_path(path, 1))
729             return OutOfMemory;
730         path->pathdata.Points[0].X = x + width  / 2.0;
731         path->pathdata.Points[0].Y = y + height / 2.0;
732         path->pathdata.Types[0] = PathPointTypeStart | PathPointTypeCloseSubpath;
733         path->pathdata.Count = 1;
734         return InvalidParameter;
735     }
736
737     count = arc2polybezier(NULL, x, y, width, height, startAngle, sweepAngle);
738
739     if(count == 0)
740         return Ok;
741
742     ptf = GdipAlloc(sizeof(GpPointF)*count);
743     if(!ptf)
744         return OutOfMemory;
745
746     arc2polybezier(ptf, x, y, width, height, startAngle, sweepAngle);
747
748     status = GdipAddPathLine(path, (width - x)/2, (height - y)/2, ptf[0].X, ptf[0].Y);
749     if(status != Ok){
750         GdipFree(ptf);
751         return status;
752     }
753     /* one spline is already added as a line endpoint */
754     if(!lengthen_path(path, count - 1)){
755         GdipFree(ptf);
756         return OutOfMemory;
757     }
758
759     memcpy(&(path->pathdata.Points[path->pathdata.Count]), &(ptf[1]),sizeof(GpPointF)*(count-1));
760     for(i = 0; i < count-1; i++)
761         path->pathdata.Types[path->pathdata.Count+i] = PathPointTypeBezier;
762
763     path->pathdata.Count += count-1;
764
765     GdipClosePathFigure(path);
766
767     GdipFree(ptf);
768
769     return status;
770 }
771
772 GpStatus WINGDIPAPI GdipAddPathPieI(GpPath *path, INT x, INT y, INT width, INT height,
773     REAL startAngle, REAL sweepAngle)
774 {
775     TRACE("(%p, %d, %d, %d, %d, %.2f, %.2f)\n",
776           path, x, y, width, height, startAngle, sweepAngle);
777
778     return GdipAddPathPieI(path, (REAL)x, (REAL)y, (REAL)width, (REAL)height, startAngle, sweepAngle);
779 }
780
781 GpStatus WINGDIPAPI GdipAddPathPolygon(GpPath *path, GDIPCONST GpPointF *points, INT count)
782 {
783     INT old_count;
784
785     TRACE("(%p, %p, %d)\n", path, points, count);
786
787     if(!path || !points || count < 3)
788         return InvalidParameter;
789
790     if(!lengthen_path(path, count))
791         return OutOfMemory;
792
793     old_count = path->pathdata.Count;
794
795     memcpy(&path->pathdata.Points[old_count], points, count*sizeof(GpPointF));
796     memset(&path->pathdata.Types[old_count + 1], PathPointTypeLine, count - 1);
797
798     /* A polygon is an intrinsic figure */
799     path->pathdata.Types[old_count] = PathPointTypeStart;
800     path->pathdata.Types[old_count + count - 1] |= PathPointTypeCloseSubpath;
801     path->newfigure = TRUE;
802     path->pathdata.Count += count;
803
804     return Ok;
805 }
806
807 GpStatus WINGDIPAPI GdipAddPathPolygonI(GpPath *path, GDIPCONST GpPoint *points, INT count)
808 {
809     GpPointF *ptf;
810     GpStatus status;
811     INT i;
812
813     TRACE("(%p, %p, %d)\n", path, points, count);
814
815     if(!points || count < 3)
816         return InvalidParameter;
817
818     ptf = GdipAlloc(sizeof(GpPointF) * count);
819     if(!ptf)
820         return OutOfMemory;
821
822     for(i = 0; i < count; i++){
823         ptf[i].X = (REAL)points[i].X;
824         ptf[i].Y = (REAL)points[i].Y;
825     }
826
827     status = GdipAddPathPolygon(path, ptf, count);
828
829     GdipFree(ptf);
830
831     return status;
832 }
833
834 GpStatus WINGDIPAPI GdipClonePath(GpPath* path, GpPath **clone)
835 {
836     TRACE("(%p, %p)\n", path, clone);
837
838     if(!path || !clone)
839         return InvalidParameter;
840
841     *clone = GdipAlloc(sizeof(GpPath));
842     if(!*clone) return OutOfMemory;
843
844     **clone = *path;
845
846     (*clone)->pathdata.Points = GdipAlloc(path->datalen * sizeof(PointF));
847     (*clone)->pathdata.Types = GdipAlloc(path->datalen);
848     if(!(*clone)->pathdata.Points || !(*clone)->pathdata.Types){
849         GdipFree(*clone);
850         GdipFree((*clone)->pathdata.Points);
851         GdipFree((*clone)->pathdata.Types);
852         return OutOfMemory;
853     }
854
855     memcpy((*clone)->pathdata.Points, path->pathdata.Points,
856            path->datalen * sizeof(PointF));
857     memcpy((*clone)->pathdata.Types, path->pathdata.Types, path->datalen);
858
859     return Ok;
860 }
861
862 GpStatus WINGDIPAPI GdipClosePathFigure(GpPath* path)
863 {
864     TRACE("(%p)\n", path);
865
866     if(!path)
867         return InvalidParameter;
868
869     if(path->pathdata.Count > 0){
870         path->pathdata.Types[path->pathdata.Count - 1] |= PathPointTypeCloseSubpath;
871         path->newfigure = TRUE;
872     }
873
874     return Ok;
875 }
876
877 GpStatus WINGDIPAPI GdipClosePathFigures(GpPath* path)
878 {
879     INT i;
880
881     TRACE("(%p)\n", path);
882
883     if(!path)
884         return InvalidParameter;
885
886     for(i = 1; i < path->pathdata.Count; i++){
887         if(path->pathdata.Types[i] == PathPointTypeStart)
888             path->pathdata.Types[i-1] |= PathPointTypeCloseSubpath;
889     }
890
891     path->newfigure = TRUE;
892
893     return Ok;
894 }
895
896 GpStatus WINGDIPAPI GdipCreatePath(GpFillMode fill, GpPath **path)
897 {
898     TRACE("(%d, %p)\n", fill, path);
899
900     if(!path)
901         return InvalidParameter;
902
903     *path = GdipAlloc(sizeof(GpPath));
904     if(!*path)  return OutOfMemory;
905
906     (*path)->fill = fill;
907     (*path)->newfigure = TRUE;
908
909     return Ok;
910 }
911
912 GpStatus WINGDIPAPI GdipCreatePath2(GDIPCONST GpPointF* points,
913     GDIPCONST BYTE* types, INT count, GpFillMode fill, GpPath **path)
914 {
915     TRACE("(%p, %p, %d, %d, %p)\n", points, types, count, fill, path);
916
917     if(!path)
918         return InvalidParameter;
919
920     *path = GdipAlloc(sizeof(GpPath));
921     if(!*path)  return OutOfMemory;
922
923     (*path)->pathdata.Points = GdipAlloc(count * sizeof(PointF));
924     (*path)->pathdata.Types = GdipAlloc(count);
925
926     if(!(*path)->pathdata.Points || !(*path)->pathdata.Types){
927         GdipFree((*path)->pathdata.Points);
928         GdipFree((*path)->pathdata.Types);
929         GdipFree(*path);
930         return OutOfMemory;
931     }
932
933     memcpy((*path)->pathdata.Points, points, count * sizeof(PointF));
934     memcpy((*path)->pathdata.Types, types, count);
935     (*path)->pathdata.Count = count;
936     (*path)->datalen = count;
937
938     (*path)->fill = fill;
939     (*path)->newfigure = TRUE;
940
941     return Ok;
942 }
943
944 GpStatus WINGDIPAPI GdipCreatePath2I(GDIPCONST GpPoint* points,
945     GDIPCONST BYTE* types, INT count, GpFillMode fill, GpPath **path)
946 {
947     GpPointF *ptF;
948     GpStatus ret;
949     INT i;
950
951     TRACE("(%p, %p, %d, %d, %p)\n", points, types, count, fill, path);
952
953     ptF = GdipAlloc(sizeof(GpPointF)*count);
954
955     for(i = 0;i < count; i++){
956         ptF[i].X = (REAL)points[i].X;
957         ptF[i].Y = (REAL)points[i].Y;
958     }
959
960     ret = GdipCreatePath2(ptF, types, count, fill, path);
961
962     GdipFree(ptF);
963
964     return ret;
965 }
966
967 GpStatus WINGDIPAPI GdipDeletePath(GpPath *path)
968 {
969     TRACE("(%p)\n", path);
970
971     if(!path)
972         return InvalidParameter;
973
974     GdipFree(path->pathdata.Points);
975     GdipFree(path->pathdata.Types);
976     GdipFree(path);
977
978     return Ok;
979 }
980
981 GpStatus WINGDIPAPI GdipFlattenPath(GpPath *path, GpMatrix* matrix, REAL flatness)
982 {
983     path_list_node_t *list, *node;
984     GpPointF pt;
985     INT i = 1;
986     INT startidx = 0;
987
988     TRACE("(%p, %p, %.2f)\n", path, matrix, flatness);
989
990     if(!path)
991         return InvalidParameter;
992
993     if(matrix){
994         WARN("transformation not supported yet!\n");
995         return NotImplemented;
996     }
997
998     if(path->pathdata.Count == 0)
999         return Ok;
1000
1001     pt = path->pathdata.Points[0];
1002     if(!init_path_list(&list, pt.X, pt.Y))
1003         return OutOfMemory;
1004
1005     node = list;
1006
1007     while(i < path->pathdata.Count){
1008
1009         BYTE type = path->pathdata.Types[i] & PathPointTypePathTypeMask;
1010         path_list_node_t *start;
1011
1012         pt = path->pathdata.Points[i];
1013
1014         /* save last start point index */
1015         if(type == PathPointTypeStart)
1016             startidx = i;
1017
1018         /* always add line points and start points */
1019         if((type == PathPointTypeStart) || (type == PathPointTypeLine)){
1020             if(!add_path_list_node(node, pt.X, pt.Y, path->pathdata.Types[i]))
1021                 goto memout;
1022
1023             node = node->next;
1024             ++i;
1025             continue;
1026         }
1027
1028         /* Bezier curve always stored as 4 points */
1029         if((path->pathdata.Types[i-1] & PathPointTypePathTypeMask) != PathPointTypeStart){
1030             type = (path->pathdata.Types[i] & ~PathPointTypePathTypeMask) | PathPointTypeLine;
1031             if(!add_path_list_node(node, pt.X, pt.Y, type))
1032                 goto memout;
1033
1034             node = node->next;
1035         }
1036
1037         /* test for closed figure */
1038         if(path->pathdata.Types[i+1] & PathPointTypeCloseSubpath){
1039             pt = path->pathdata.Points[startidx];
1040             ++i;
1041         }
1042         else
1043         {
1044             i += 2;
1045             pt = path->pathdata.Points[i];
1046         };
1047
1048         start = node;
1049         /* add Bezier end point */
1050         type = (path->pathdata.Types[i] & ~PathPointTypePathTypeMask) | PathPointTypeLine;
1051         if(!add_path_list_node(node, pt.X, pt.Y, type))
1052             goto memout;
1053         node = node->next;
1054
1055         /* flatten curve */
1056         if(!flatten_bezier(start, path->pathdata.Points[i-2].X, path->pathdata.Points[i-2].Y,
1057                                   path->pathdata.Points[i-1].X, path->pathdata.Points[i-1].Y,
1058                            node, flatness))
1059             goto memout;
1060
1061         ++i;
1062     }/* while */
1063
1064     /* store path data back */
1065     i = path_list_count(list);
1066     if(!lengthen_path(path, i))
1067         goto memout;
1068     path->pathdata.Count = i;
1069
1070     node = list;
1071     for(i = 0; i < path->pathdata.Count; i++){
1072         path->pathdata.Points[i] = node->pt;
1073         path->pathdata.Types[i]  = node->type;
1074         node = node->next;
1075     }
1076
1077     free_path_list(list);
1078     return Ok;
1079
1080 memout:
1081     free_path_list(list);
1082     return OutOfMemory;
1083 }
1084
1085 GpStatus WINGDIPAPI GdipGetPathData(GpPath *path, GpPathData* pathData)
1086 {
1087     TRACE("(%p, %p)\n", path, pathData);
1088
1089     if(!path || !pathData)
1090         return InvalidParameter;
1091
1092     /* Only copy data. pathData allocation/freeing controlled by wrapper class.
1093        Assumed that pathData is enough wide to get all data - controlled by wrapper too. */
1094     memcpy(pathData->Points, path->pathdata.Points, sizeof(PointF) * pathData->Count);
1095     memcpy(pathData->Types , path->pathdata.Types , pathData->Count);
1096
1097     return Ok;
1098 }
1099
1100 GpStatus WINGDIPAPI GdipGetPathFillMode(GpPath *path, GpFillMode *fillmode)
1101 {
1102     TRACE("(%p, %p)\n", path, fillmode);
1103
1104     if(!path || !fillmode)
1105         return InvalidParameter;
1106
1107     *fillmode = path->fill;
1108
1109     return Ok;
1110 }
1111
1112 GpStatus WINGDIPAPI GdipGetPathLastPoint(GpPath* path, GpPointF* lastPoint)
1113 {
1114     INT count;
1115
1116     TRACE("(%p, %p)\n", path, lastPoint);
1117
1118     if(!path || !lastPoint)
1119         return InvalidParameter;
1120
1121     count = path->pathdata.Count;
1122     if(count > 0)
1123         *lastPoint = path->pathdata.Points[count-1];
1124
1125     return Ok;
1126 }
1127
1128 GpStatus WINGDIPAPI GdipGetPathPoints(GpPath *path, GpPointF* points, INT count)
1129 {
1130     TRACE("(%p, %p, %d)\n", path, points, count);
1131
1132     if(!path)
1133         return InvalidParameter;
1134
1135     if(count < path->pathdata.Count)
1136         return InsufficientBuffer;
1137
1138     memcpy(points, path->pathdata.Points, path->pathdata.Count * sizeof(GpPointF));
1139
1140     return Ok;
1141 }
1142
1143 GpStatus WINGDIPAPI GdipGetPathPointsI(GpPath *path, GpPoint* points, INT count)
1144 {
1145     GpStatus ret;
1146     GpPointF *ptf;
1147     INT i;
1148
1149     TRACE("(%p, %p, %d)\n", path, points, count);
1150
1151     if(count <= 0)
1152         return InvalidParameter;
1153
1154     ptf = GdipAlloc(sizeof(GpPointF)*count);
1155     if(!ptf)    return OutOfMemory;
1156
1157     ret = GdipGetPathPoints(path,ptf,count);
1158     if(ret == Ok)
1159         for(i = 0;i < count;i++){
1160             points[i].X = roundr(ptf[i].X);
1161             points[i].Y = roundr(ptf[i].Y);
1162         };
1163     GdipFree(ptf);
1164
1165     return ret;
1166 }
1167
1168 GpStatus WINGDIPAPI GdipGetPathTypes(GpPath *path, BYTE* types, INT count)
1169 {
1170     TRACE("(%p, %p, %d)\n", path, types, count);
1171
1172     if(!path)
1173         return InvalidParameter;
1174
1175     if(count < path->pathdata.Count)
1176         return InsufficientBuffer;
1177
1178     memcpy(types, path->pathdata.Types, path->pathdata.Count);
1179
1180     return Ok;
1181 }
1182
1183 /* Windows expands the bounding box to the maximum possible bounding box
1184  * for a given pen.  For example, if a line join can extend past the point
1185  * it's joining by x units, the bounding box is extended by x units in every
1186  * direction (even though this is too conservative for most cases). */
1187 GpStatus WINGDIPAPI GdipGetPathWorldBounds(GpPath* path, GpRectF* bounds,
1188     GDIPCONST GpMatrix *matrix, GDIPCONST GpPen *pen)
1189 {
1190     GpPointF * points, temp_pts[4];
1191     INT count, i;
1192     REAL path_width = 1.0, width, height, temp, low_x, low_y, high_x, high_y;
1193
1194     TRACE("(%p, %p, %p, %p)\n", path, bounds, matrix, pen);
1195
1196     /* Matrix and pen can be null. */
1197     if(!path || !bounds)
1198         return InvalidParameter;
1199
1200     /* If path is empty just return. */
1201     count = path->pathdata.Count;
1202     if(count == 0){
1203         bounds->X = bounds->Y = bounds->Width = bounds->Height = 0.0;
1204         return Ok;
1205     }
1206
1207     points = path->pathdata.Points;
1208
1209     low_x = high_x = points[0].X;
1210     low_y = high_y = points[0].Y;
1211
1212     for(i = 1; i < count; i++){
1213         low_x = min(low_x, points[i].X);
1214         low_y = min(low_y, points[i].Y);
1215         high_x = max(high_x, points[i].X);
1216         high_y = max(high_y, points[i].Y);
1217     }
1218
1219     width = high_x - low_x;
1220     height = high_y - low_y;
1221
1222     /* This looks unusual but it's the only way I can imitate windows. */
1223     if(matrix){
1224         temp_pts[0].X = low_x;
1225         temp_pts[0].Y = low_y;
1226         temp_pts[1].X = low_x;
1227         temp_pts[1].Y = high_y;
1228         temp_pts[2].X = high_x;
1229         temp_pts[2].Y = high_y;
1230         temp_pts[3].X = high_x;
1231         temp_pts[3].Y = low_y;
1232
1233         GdipTransformMatrixPoints((GpMatrix*)matrix, temp_pts, 4);
1234         low_x = temp_pts[0].X;
1235         low_y = temp_pts[0].Y;
1236
1237         for(i = 1; i < 4; i++){
1238             low_x = min(low_x, temp_pts[i].X);
1239             low_y = min(low_y, temp_pts[i].Y);
1240         }
1241
1242         temp = width;
1243         width = height * fabs(matrix->matrix[2]) + width * fabs(matrix->matrix[0]);
1244         height = height * fabs(matrix->matrix[3]) + temp * fabs(matrix->matrix[1]);
1245     }
1246
1247     if(pen){
1248         path_width = pen->width / 2.0;
1249
1250         if(count > 2)
1251             path_width = max(path_width,  pen->width * pen->miterlimit / 2.0);
1252         /* FIXME: this should probably also check for the startcap */
1253         if(pen->endcap & LineCapNoAnchor)
1254             path_width = max(path_width,  pen->width * 2.2);
1255
1256         low_x -= path_width;
1257         low_y -= path_width;
1258         width += 2.0 * path_width;
1259         height += 2.0 * path_width;
1260     }
1261
1262     bounds->X = low_x;
1263     bounds->Y = low_y;
1264     bounds->Width = width;
1265     bounds->Height = height;
1266
1267     return Ok;
1268 }
1269
1270 GpStatus WINGDIPAPI GdipGetPathWorldBoundsI(GpPath* path, GpRect* bounds,
1271     GDIPCONST GpMatrix *matrix, GDIPCONST GpPen *pen)
1272 {
1273     GpStatus ret;
1274     GpRectF boundsF;
1275
1276     TRACE("(%p, %p, %p, %p)\n", path, bounds, matrix, pen);
1277
1278     ret = GdipGetPathWorldBounds(path,&boundsF,matrix,pen);
1279
1280     if(ret == Ok){
1281         bounds->X      = roundr(boundsF.X);
1282         bounds->Y      = roundr(boundsF.Y);
1283         bounds->Width  = roundr(boundsF.Width);
1284         bounds->Height = roundr(boundsF.Height);
1285     }
1286
1287     return ret;
1288 }
1289
1290 GpStatus WINGDIPAPI GdipGetPointCount(GpPath *path, INT *count)
1291 {
1292     TRACE("(%p, %p)\n", path, count);
1293
1294     if(!path)
1295         return InvalidParameter;
1296
1297     *count = path->pathdata.Count;
1298
1299     return Ok;
1300 }
1301
1302 GpStatus WINGDIPAPI GdipReversePath(GpPath* path)
1303 {
1304     INT i, count;
1305     INT start = 0; /* position in reversed path */
1306     GpPathData revpath;
1307
1308     TRACE("(%p)\n", path);
1309
1310     if(!path)
1311         return InvalidParameter;
1312
1313     count = path->pathdata.Count;
1314
1315     if(count == 0) return Ok;
1316
1317     revpath.Points = GdipAlloc(sizeof(GpPointF)*count);
1318     revpath.Types  = GdipAlloc(sizeof(BYTE)*count);
1319     revpath.Count  = count;
1320     if(!revpath.Points || !revpath.Types){
1321         GdipFree(revpath.Points);
1322         GdipFree(revpath.Types);
1323         return OutOfMemory;
1324     }
1325
1326     for(i = 0; i < count; i++){
1327
1328         /* find next start point */
1329         if(path->pathdata.Types[count-i-1] == PathPointTypeStart){
1330             INT j;
1331             for(j = start; j <= i; j++){
1332                 revpath.Points[j] = path->pathdata.Points[count-j-1];
1333                 revpath.Types[j] = path->pathdata.Types[count-j-1];
1334             }
1335             /* mark start point */
1336             revpath.Types[start] = PathPointTypeStart;
1337             /* set 'figure' endpoint type */
1338             if(i-start > 1){
1339                 revpath.Types[i] = path->pathdata.Types[count-start-1] & ~PathPointTypePathTypeMask;
1340                 revpath.Types[i] |= revpath.Types[i-1];
1341             }
1342             else
1343                 revpath.Types[i] = path->pathdata.Types[start];
1344
1345             start = i+1;
1346         }
1347     }
1348
1349     memcpy(path->pathdata.Points, revpath.Points, sizeof(GpPointF)*count);
1350     memcpy(path->pathdata.Types,  revpath.Types,  sizeof(BYTE)*count);
1351
1352     GdipFree(revpath.Points);
1353     GdipFree(revpath.Types);
1354
1355     return Ok;
1356 }
1357
1358 GpStatus WINGDIPAPI GdipIsOutlineVisiblePathPointI(GpPath* path, INT x, INT y,
1359     GpPen *pen, GpGraphics *graphics, BOOL *result)
1360 {
1361     TRACE("(%p, %d, %d, %p, %p, %p)\n", path, x, y, pen, graphics, result);
1362
1363     return GdipIsOutlineVisiblePathPoint(path, x, y, pen, graphics, result);
1364 }
1365
1366 GpStatus WINGDIPAPI GdipIsOutlineVisiblePathPoint(GpPath* path, REAL x, REAL y,
1367     GpPen *pen, GpGraphics *graphics, BOOL *result)
1368 {
1369     static int calls;
1370
1371     if(!path || !pen)
1372         return InvalidParameter;
1373
1374     if(!(calls++))
1375         FIXME("not implemented\n");
1376
1377     return NotImplemented;
1378 }
1379
1380 GpStatus WINGDIPAPI GdipIsVisiblePathPointI(GpPath* path, INT x, INT y, GpGraphics *graphics, BOOL *result)
1381 {
1382     TRACE("(%p, %d, %d, %p, %p)\n", path, x, y, graphics, result);
1383
1384     return GdipIsVisiblePathPoint(path, x, y, graphics, result);
1385 }
1386
1387 /*****************************************************************************
1388  * GdipIsVisiblePathPoint [GDIPLUS.@]
1389  */
1390 GpStatus WINGDIPAPI GdipIsVisiblePathPoint(GpPath* path, REAL x, REAL y, GpGraphics *graphics, BOOL *result)
1391 {
1392     GpRegion *region;
1393     HRGN hrgn;
1394     GpStatus status;
1395
1396     if(!path || !result) return InvalidParameter;
1397
1398     status = GdipCreateRegionPath(path, &region);
1399     if(status != Ok)
1400         return status;
1401
1402     status = GdipGetRegionHRgn(region, graphics, &hrgn);
1403     if(status != Ok){
1404         GdipDeleteRegion(region);
1405         return status;
1406     }
1407
1408     *result = PtInRegion(hrgn, roundr(x), roundr(y));
1409
1410     DeleteObject(hrgn);
1411     GdipDeleteRegion(region);
1412
1413     return Ok;
1414 }
1415
1416 GpStatus WINGDIPAPI GdipStartPathFigure(GpPath *path)
1417 {
1418     TRACE("(%p)\n", path);
1419
1420     if(!path)
1421         return InvalidParameter;
1422
1423     path->newfigure = TRUE;
1424
1425     return Ok;
1426 }
1427
1428 GpStatus WINGDIPAPI GdipResetPath(GpPath *path)
1429 {
1430     TRACE("(%p)\n", path);
1431
1432     if(!path)
1433         return InvalidParameter;
1434
1435     path->pathdata.Count = 0;
1436     path->newfigure = TRUE;
1437     path->fill = FillModeAlternate;
1438
1439     return Ok;
1440 }
1441
1442 GpStatus WINGDIPAPI GdipSetPathFillMode(GpPath *path, GpFillMode fill)
1443 {
1444     TRACE("(%p, %d)\n", path, fill);
1445
1446     if(!path)
1447         return InvalidParameter;
1448
1449     path->fill = fill;
1450
1451     return Ok;
1452 }
1453
1454 GpStatus WINGDIPAPI GdipTransformPath(GpPath *path, GpMatrix *matrix)
1455 {
1456     TRACE("(%p, %p)\n", path, matrix);
1457
1458     if(!path)
1459         return InvalidParameter;
1460
1461     if(path->pathdata.Count == 0)
1462         return Ok;
1463
1464     return GdipTransformMatrixPoints(matrix, path->pathdata.Points,
1465                                      path->pathdata.Count);
1466 }
1467
1468 GpStatus WINGDIPAPI GdipWidenPath(GpPath *path, GpPen *pen, GpMatrix *matrix,
1469     REAL flatness)
1470 {
1471     FIXME("(%p,%p,%p,%0.2f)\n", path, pen, matrix, flatness);
1472
1473     return NotImplemented;
1474 }
1475
1476 GpStatus WINGDIPAPI GdipAddPathRectangle(GpPath *path, REAL x, REAL y,
1477     REAL width, REAL height)
1478 {
1479     GpPath *backup;
1480     GpPointF ptf[2];
1481     GpStatus retstat;
1482     BOOL old_new;
1483
1484     TRACE("(%p, %.2f, %.2f, %.2f, %.2f)\n", path, x, y, width, height);
1485
1486     if(!path || width < 0.0 || height < 0.0)
1487         return InvalidParameter;
1488
1489     /* make a backup copy of path data */
1490     if((retstat = GdipClonePath(path, &backup)) != Ok)
1491         return retstat;
1492
1493     /* rectangle should start as new path */
1494     old_new = path->newfigure;
1495     path->newfigure = TRUE;
1496     if((retstat = GdipAddPathLine(path,x,y,x+width,y)) != Ok){
1497         path->newfigure = old_new;
1498         goto fail;
1499     }
1500
1501     ptf[0].X = x+width;
1502     ptf[0].Y = y+height;
1503     ptf[1].X = x;
1504     ptf[1].Y = y+height;
1505
1506     if((retstat = GdipAddPathLine2(path, ptf, 2)) != Ok)  goto fail;
1507     path->pathdata.Types[path->pathdata.Count-1] |= PathPointTypeCloseSubpath;
1508
1509     /* free backup */
1510     GdipDeletePath(backup);
1511     return Ok;
1512
1513 fail:
1514     /* reverting */
1515     GdipDeletePath(path);
1516     GdipClonePath(backup, &path);
1517     GdipDeletePath(backup);
1518
1519     return retstat;
1520 }
1521
1522 GpStatus WINGDIPAPI GdipAddPathRectangleI(GpPath *path, INT x, INT y,
1523     INT width, INT height)
1524 {
1525     TRACE("(%p, %d, %d, %d, %d)\n", path, x, y, width, height);
1526
1527     return GdipAddPathRectangle(path,(REAL)x,(REAL)y,(REAL)width,(REAL)height);
1528 }
1529
1530 GpStatus WINGDIPAPI GdipAddPathRectangles(GpPath *path, GDIPCONST GpRectF *rects, INT count)
1531 {
1532     GpPath *backup;
1533     GpStatus retstat;
1534     INT i;
1535
1536     TRACE("(%p, %p, %d)\n", path, rects, count);
1537
1538     /* count == 0 - verified condition  */
1539     if(!path || !rects || count == 0)
1540         return InvalidParameter;
1541
1542     if(count < 0)
1543         return OutOfMemory;
1544
1545     /* make a backup copy */
1546     if((retstat = GdipClonePath(path, &backup)) != Ok)
1547         return retstat;
1548
1549     for(i = 0; i < count; i++){
1550         if((retstat = GdipAddPathRectangle(path,rects[i].X,rects[i].Y,rects[i].Width,rects[i].Height)) != Ok)
1551             goto fail;
1552     }
1553
1554     /* free backup */
1555     GdipDeletePath(backup);
1556     return Ok;
1557
1558 fail:
1559     /* reverting */
1560     GdipDeletePath(path);
1561     GdipClonePath(backup, &path);
1562     GdipDeletePath(backup);
1563
1564     return retstat;
1565 }
1566
1567 GpStatus WINGDIPAPI GdipAddPathRectanglesI(GpPath *path, GDIPCONST GpRect *rects, INT count)
1568 {
1569     GpRectF *rectsF;
1570     GpStatus retstat;
1571     INT i;
1572
1573     TRACE("(%p, %p, %d)\n", path, rects, count);
1574
1575     if(!rects || count == 0)
1576         return InvalidParameter;
1577
1578     if(count < 0)
1579         return OutOfMemory;
1580
1581     rectsF = GdipAlloc(sizeof(GpRectF)*count);
1582
1583     for(i = 0;i < count;i++){
1584         rectsF[i].X      = (REAL)rects[i].X;
1585         rectsF[i].Y      = (REAL)rects[i].Y;
1586         rectsF[i].Width  = (REAL)rects[i].Width;
1587         rectsF[i].Height = (REAL)rects[i].Height;
1588     }
1589
1590     retstat = GdipAddPathRectangles(path, rectsF, count);
1591     GdipFree(rectsF);
1592
1593     return retstat;
1594 }
1595
1596 GpStatus WINGDIPAPI GdipSetPathMarker(GpPath* path)
1597 {
1598     INT count;
1599
1600     TRACE("(%p)\n", path);
1601
1602     if(!path)
1603         return InvalidParameter;
1604
1605     count = path->pathdata.Count;
1606
1607     /* set marker flag */
1608     if(count > 0)
1609         path->pathdata.Types[count-1] |= PathPointTypePathMarker;
1610
1611     return Ok;
1612 }
1613
1614 GpStatus WINGDIPAPI GdipClearPathMarkers(GpPath* path)
1615 {
1616     INT count;
1617     INT i;
1618
1619     TRACE("(%p)\n", path);
1620
1621     if(!path)
1622         return InvalidParameter;
1623
1624     count = path->pathdata.Count;
1625
1626     for(i = 0; i < count - 1; i++){
1627         path->pathdata.Types[i] &= ~PathPointTypePathMarker;
1628     }
1629
1630     return Ok;
1631 }