gdi32: Remove the remaining OpenGL entry points from the DC driver.
[wine] / dlls / gdi32 / path.c
1 /*
2  * Graphics paths (BeginPath, EndPath etc.)
3  *
4  * Copyright 1997, 1998 Martin Boehme
5  *                 1999 Huw D M Davies
6  * Copyright 2005 Dmitry Timoshkov
7  * Copyright 2011 Alexandre Julliard
8  *
9  * This library is free software; you can redistribute it and/or
10  * modify it under the terms of the GNU Lesser General Public
11  * License as published by the Free Software Foundation; either
12  * version 2.1 of the License, or (at your option) any later version.
13  *
14  * This library is distributed in the hope that it will be useful,
15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
17  * Lesser General Public License for more details.
18  *
19  * You should have received a copy of the GNU Lesser General Public
20  * License along with this library; if not, write to the Free Software
21  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
22  */
23
24 #include "config.h"
25 #include "wine/port.h"
26
27 #include <assert.h>
28 #include <math.h>
29 #include <stdarg.h>
30 #include <string.h>
31 #include <stdlib.h>
32 #if defined(HAVE_FLOAT_H)
33 #include <float.h>
34 #endif
35
36 #include "windef.h"
37 #include "winbase.h"
38 #include "wingdi.h"
39 #include "winerror.h"
40
41 #include "gdi_private.h"
42 #include "wine/debug.h"
43
44 WINE_DEFAULT_DEBUG_CHANNEL(gdi);
45
46 /* Notes on the implementation
47  *
48  * The implementation is based on dynamically resizable arrays of points and
49  * flags. I dithered for a bit before deciding on this implementation, and
50  * I had even done a bit of work on a linked list version before switching
51  * to arrays. It's a bit of a tradeoff. When you use linked lists, the
52  * implementation of FlattenPath is easier, because you can rip the
53  * PT_BEZIERTO entries out of the middle of the list and link the
54  * corresponding PT_LINETO entries in. However, when you use arrays,
55  * PathToRegion becomes easier, since you can essentially just pass your array
56  * of points to CreatePolyPolygonRgn. Also, if I'd used linked lists, I would
57  * have had the extra effort of creating a chunk-based allocation scheme
58  * in order to use memory effectively. That's why I finally decided to use
59  * arrays. Note by the way that the array based implementation has the same
60  * linear time complexity that linked lists would have since the arrays grow
61  * exponentially.
62  *
63  * The points are stored in the path in device coordinates. This is
64  * consistent with the way Windows does things (for instance, see the Win32
65  * SDK documentation for GetPath).
66  *
67  * The word "stroke" appears in several places (e.g. in the flag
68  * GdiPath.newStroke). A stroke consists of a PT_MOVETO followed by one or
69  * more PT_LINETOs or PT_BEZIERTOs, up to, but not including, the next
70  * PT_MOVETO. Note that this is not the same as the definition of a figure;
71  * a figure can contain several strokes.
72  *
73  * Martin Boehme
74  */
75
76 #define NUM_ENTRIES_INITIAL 16  /* Initial size of points / flags arrays  */
77
78 /* A floating point version of the POINT structure */
79 typedef struct tagFLOAT_POINT
80 {
81    double x, y;
82 } FLOAT_POINT;
83
84 struct gdi_path
85 {
86     POINT       *points;
87     BYTE        *flags;
88     int          count;
89     int          allocated;
90     BOOL         newStroke;
91 };
92
93 struct path_physdev
94 {
95     struct gdi_physdev dev;
96     struct gdi_path   *path;
97 };
98
99 static inline struct path_physdev *get_path_physdev( PHYSDEV dev )
100 {
101     return (struct path_physdev *)dev;
102 }
103
104 static inline void pop_path_driver( DC *dc, struct path_physdev *physdev )
105 {
106     pop_dc_driver( dc, &physdev->dev );
107     HeapFree( GetProcessHeap(), 0, physdev );
108 }
109
110 static inline struct path_physdev *find_path_physdev( DC *dc )
111 {
112     PHYSDEV dev;
113
114     for (dev = dc->physDev; dev->funcs != &null_driver; dev = dev->next)
115         if (dev->funcs == &path_driver) return get_path_physdev( dev );
116     return NULL;
117 }
118
119 void free_gdi_path( struct gdi_path *path )
120 {
121     HeapFree( GetProcessHeap(), 0, path->points );
122     HeapFree( GetProcessHeap(), 0, path->flags );
123     HeapFree( GetProcessHeap(), 0, path );
124 }
125
126 static struct gdi_path *alloc_gdi_path( int count )
127 {
128     struct gdi_path *path = HeapAlloc( GetProcessHeap(), 0, sizeof(*path) );
129
130     if (!path)
131     {
132         SetLastError( ERROR_NOT_ENOUGH_MEMORY );
133         return NULL;
134     }
135     count = max( NUM_ENTRIES_INITIAL, count );
136     path->points = HeapAlloc( GetProcessHeap(), 0, count * sizeof(*path->points) );
137     path->flags = HeapAlloc( GetProcessHeap(), 0, count * sizeof(*path->flags) );
138     if (!path->points || !path->flags)
139     {
140         free_gdi_path( path );
141         SetLastError( ERROR_NOT_ENOUGH_MEMORY );
142         return NULL;
143     }
144     path->count = 0;
145     path->allocated = count;
146     path->newStroke = TRUE;
147     return path;
148 }
149
150 static struct gdi_path *copy_gdi_path( const struct gdi_path *src_path )
151 {
152     struct gdi_path *path = HeapAlloc( GetProcessHeap(), 0, sizeof(*path) );
153
154     if (!path)
155     {
156         SetLastError( ERROR_NOT_ENOUGH_MEMORY );
157         return NULL;
158     }
159     path->count = path->allocated = src_path->count;
160     path->newStroke = src_path->newStroke;
161     path->points = HeapAlloc( GetProcessHeap(), 0, path->count * sizeof(*path->points) );
162     path->flags = HeapAlloc( GetProcessHeap(), 0, path->count * sizeof(*path->flags) );
163     if (!path->points || !path->flags)
164     {
165         free_gdi_path( path );
166         SetLastError( ERROR_NOT_ENOUGH_MEMORY );
167         return NULL;
168     }
169     memcpy( path->points, src_path->points, path->count * sizeof(*path->points) );
170     memcpy( path->flags, src_path->flags, path->count * sizeof(*path->flags) );
171     return path;
172 }
173
174 /* Performs a world-to-viewport transformation on the specified point (which
175  * is in floating point format).
176  */
177 static inline void INTERNAL_LPTODP_FLOAT( HDC hdc, FLOAT_POINT *point, int count )
178 {
179     DC *dc = get_dc_ptr( hdc );
180     double x, y;
181
182     while (count--)
183     {
184         x = point->x;
185         y = point->y;
186         point->x = x * dc->xformWorld2Vport.eM11 + y * dc->xformWorld2Vport.eM21 + dc->xformWorld2Vport.eDx;
187         point->y = x * dc->xformWorld2Vport.eM12 + y * dc->xformWorld2Vport.eM22 + dc->xformWorld2Vport.eDy;
188         point++;
189     }
190     release_dc_ptr( dc );
191 }
192
193 static inline INT int_from_fixed(FIXED f)
194 {
195     return (f.fract >= 0x8000) ? (f.value + 1) : f.value;
196 }
197
198
199 /* PATH_ReserveEntries
200  *
201  * Ensures that at least "numEntries" entries (for points and flags) have
202  * been allocated; allocates larger arrays and copies the existing entries
203  * to those arrays, if necessary. Returns TRUE if successful, else FALSE.
204  */
205 static BOOL PATH_ReserveEntries(struct gdi_path *pPath, INT count)
206 {
207     POINT *pPointsNew;
208     BYTE    *pFlagsNew;
209
210     assert(count>=0);
211
212     /* Do we have to allocate more memory? */
213     if(count > pPath->allocated)
214     {
215         /* Find number of entries to allocate. We let the size of the array
216          * grow exponentially, since that will guarantee linear time
217          * complexity. */
218         count = max( pPath->allocated * 2, count );
219
220         pPointsNew = HeapReAlloc( GetProcessHeap(), 0, pPath->points, count * sizeof(POINT) );
221         if (!pPointsNew) return FALSE;
222         pPath->points = pPointsNew;
223
224         pFlagsNew = HeapReAlloc( GetProcessHeap(), 0, pPath->flags, count * sizeof(BYTE) );
225         if (!pFlagsNew) return FALSE;
226         pPath->flags = pFlagsNew;
227
228         pPath->allocated = count;
229     }
230     return TRUE;
231 }
232
233 /* PATH_AddEntry
234  *
235  * Adds an entry to the path. For "flags", pass either PT_MOVETO, PT_LINETO
236  * or PT_BEZIERTO, optionally ORed with PT_CLOSEFIGURE. Returns TRUE if
237  * successful, FALSE otherwise (e.g. if not enough memory was available).
238  */
239 static BOOL PATH_AddEntry(struct gdi_path *pPath, const POINT *pPoint, BYTE flags)
240 {
241     /* FIXME: If newStroke is true, perhaps we want to check that we're
242      * getting a PT_MOVETO
243      */
244     TRACE("(%d,%d) - %d\n", pPoint->x, pPoint->y, flags);
245
246     /* Reserve enough memory for an extra path entry */
247     if(!PATH_ReserveEntries(pPath, pPath->count+1))
248         return FALSE;
249
250     /* Store information in path entry */
251     pPath->points[pPath->count]=*pPoint;
252     pPath->flags[pPath->count]=flags;
253
254     pPath->count++;
255
256     return TRUE;
257 }
258
259 /* add a number of points, converting them to device coords */
260 /* return a pointer to the first type byte so it can be fixed up if necessary */
261 static BYTE *add_log_points( struct path_physdev *physdev, const POINT *points, DWORD count, BYTE type )
262 {
263     BYTE *ret;
264     struct gdi_path *path = physdev->path;
265
266     if (!PATH_ReserveEntries( path, path->count + count )) return NULL;
267
268     ret = &path->flags[path->count];
269     memcpy( &path->points[path->count], points, count * sizeof(*points) );
270     LPtoDP( physdev->dev.hdc, &path->points[path->count], count );
271     memset( ret, type, count );
272     path->count += count;
273     return ret;
274 }
275
276 /* start a new path stroke if necessary */
277 static BOOL start_new_stroke( struct path_physdev *physdev )
278 {
279     POINT pos;
280     struct gdi_path *path = physdev->path;
281
282     if (!path->newStroke && path->count &&
283         !(path->flags[path->count - 1] & PT_CLOSEFIGURE))
284         return TRUE;
285
286     path->newStroke = FALSE;
287     GetCurrentPositionEx( physdev->dev.hdc, &pos );
288     return add_log_points( physdev, &pos, 1, PT_MOVETO ) != NULL;
289 }
290
291 /* PATH_CheckCorners
292  *
293  * Helper function for RoundRect() and Rectangle()
294  */
295 static void PATH_CheckCorners( HDC hdc, POINT corners[], INT x1, INT y1, INT x2, INT y2 )
296 {
297     INT temp;
298
299     /* Convert points to device coordinates */
300     corners[0].x=x1;
301     corners[0].y=y1;
302     corners[1].x=x2;
303     corners[1].y=y2;
304     LPtoDP( hdc, corners, 2 );
305
306     /* Make sure first corner is top left and second corner is bottom right */
307     if(corners[0].x>corners[1].x)
308     {
309         temp=corners[0].x;
310         corners[0].x=corners[1].x;
311         corners[1].x=temp;
312     }
313     if(corners[0].y>corners[1].y)
314     {
315         temp=corners[0].y;
316         corners[0].y=corners[1].y;
317         corners[1].y=temp;
318     }
319
320     /* In GM_COMPATIBLE, don't include bottom and right edges */
321     if (GetGraphicsMode( hdc ) == GM_COMPATIBLE)
322     {
323         corners[1].x--;
324         corners[1].y--;
325     }
326 }
327
328 /* PATH_AddFlatBezier
329  */
330 static BOOL PATH_AddFlatBezier(struct gdi_path *pPath, POINT *pt, BOOL closed)
331 {
332     POINT *pts;
333     INT no, i;
334
335     pts = GDI_Bezier( pt, 4, &no );
336     if(!pts) return FALSE;
337
338     for(i = 1; i < no; i++)
339         PATH_AddEntry(pPath, &pts[i], (i == no-1 && closed) ? PT_LINETO | PT_CLOSEFIGURE : PT_LINETO);
340     HeapFree( GetProcessHeap(), 0, pts );
341     return TRUE;
342 }
343
344 /* PATH_FlattenPath
345  *
346  * Replaces Beziers with line segments
347  *
348  */
349 static struct gdi_path *PATH_FlattenPath(const struct gdi_path *pPath)
350 {
351     struct gdi_path *new_path;
352     INT srcpt;
353
354     if (!(new_path = alloc_gdi_path( pPath->count ))) return NULL;
355
356     for(srcpt = 0; srcpt < pPath->count; srcpt++) {
357         switch(pPath->flags[srcpt] & ~PT_CLOSEFIGURE) {
358         case PT_MOVETO:
359         case PT_LINETO:
360             if (!PATH_AddEntry(new_path, &pPath->points[srcpt], pPath->flags[srcpt]))
361             {
362                 free_gdi_path( new_path );
363                 return NULL;
364             }
365             break;
366         case PT_BEZIERTO:
367             if (!PATH_AddFlatBezier(new_path, &pPath->points[srcpt-1],
368                                     pPath->flags[srcpt+2] & PT_CLOSEFIGURE))
369             {
370                 free_gdi_path( new_path );
371                 return NULL;
372             }
373             srcpt += 2;
374             break;
375         }
376     }
377     return new_path;
378 }
379
380 /* PATH_PathToRegion
381  *
382  * Creates a region from the specified path using the specified polygon
383  * filling mode. The path is left unchanged.
384  */
385 static HRGN PATH_PathToRegion(const struct gdi_path *pPath, INT nPolyFillMode)
386 {
387     struct gdi_path *rgn_path;
388     int    numStrokes, iStroke, i;
389     INT  *pNumPointsInStroke;
390     HRGN hrgn;
391
392     if (!(rgn_path = PATH_FlattenPath( pPath ))) return 0;
393
394     /* FIXME: What happens when number of points is zero? */
395
396     /* First pass: Find out how many strokes there are in the path */
397     /* FIXME: We could eliminate this with some bookkeeping in GdiPath */
398     numStrokes=0;
399     for(i=0; i<rgn_path->count; i++)
400         if((rgn_path->flags[i] & ~PT_CLOSEFIGURE) == PT_MOVETO)
401             numStrokes++;
402
403     /* Allocate memory for number-of-points-in-stroke array */
404     pNumPointsInStroke=HeapAlloc( GetProcessHeap(), 0, sizeof(int) * numStrokes );
405     if(!pNumPointsInStroke)
406     {
407         free_gdi_path( rgn_path );
408         SetLastError(ERROR_NOT_ENOUGH_MEMORY);
409         return 0;
410     }
411
412     /* Second pass: remember number of points in each polygon */
413     iStroke=-1;  /* Will get incremented to 0 at beginning of first stroke */
414     for(i=0; i<rgn_path->count; i++)
415     {
416         /* Is this the beginning of a new stroke? */
417         if((rgn_path->flags[i] & ~PT_CLOSEFIGURE) == PT_MOVETO)
418         {
419             iStroke++;
420             pNumPointsInStroke[iStroke]=0;
421         }
422
423         pNumPointsInStroke[iStroke]++;
424     }
425
426     /* Create a region from the strokes */
427     hrgn=CreatePolyPolygonRgn(rgn_path->points, pNumPointsInStroke,
428                               numStrokes, nPolyFillMode);
429
430     HeapFree( GetProcessHeap(), 0, pNumPointsInStroke );
431     free_gdi_path( rgn_path );
432     return hrgn;
433 }
434
435 /* PATH_ScaleNormalizedPoint
436  *
437  * Scales a normalized point (x, y) with respect to the box whose corners are
438  * passed in "corners". The point is stored in "*pPoint". The normalized
439  * coordinates (-1.0, -1.0) correspond to corners[0], the coordinates
440  * (1.0, 1.0) correspond to corners[1].
441  */
442 static void PATH_ScaleNormalizedPoint(FLOAT_POINT corners[], double x,
443    double y, POINT *pPoint)
444 {
445     pPoint->x=GDI_ROUND( (double)corners[0].x + (double)(corners[1].x-corners[0].x)*0.5*(x+1.0) );
446     pPoint->y=GDI_ROUND( (double)corners[0].y + (double)(corners[1].y-corners[0].y)*0.5*(y+1.0) );
447 }
448
449 /* PATH_NormalizePoint
450  *
451  * Normalizes a point with respect to the box whose corners are passed in
452  * "corners". The normalized coordinates are stored in "*pX" and "*pY".
453  */
454 static void PATH_NormalizePoint(FLOAT_POINT corners[],
455    const FLOAT_POINT *pPoint,
456    double *pX, double *pY)
457 {
458     *pX=(double)(pPoint->x-corners[0].x)/(double)(corners[1].x-corners[0].x) * 2.0 - 1.0;
459     *pY=(double)(pPoint->y-corners[0].y)/(double)(corners[1].y-corners[0].y) * 2.0 - 1.0;
460 }
461
462 /* PATH_DoArcPart
463  *
464  * Creates a Bezier spline that corresponds to part of an arc and appends the
465  * corresponding points to the path. The start and end angles are passed in
466  * "angleStart" and "angleEnd"; these angles should span a quarter circle
467  * at most. If "startEntryType" is non-zero, an entry of that type for the first
468  * control point is added to the path; otherwise, it is assumed that the current
469  * position is equal to the first control point.
470  */
471 static BOOL PATH_DoArcPart(struct gdi_path *pPath, FLOAT_POINT corners[],
472    double angleStart, double angleEnd, BYTE startEntryType)
473 {
474     double  halfAngle, a;
475     double  xNorm[4], yNorm[4];
476     POINT point;
477     int     i;
478
479     assert(fabs(angleEnd-angleStart)<=M_PI_2);
480
481     /* FIXME: Is there an easier way of computing this? */
482
483     /* Compute control points */
484     halfAngle=(angleEnd-angleStart)/2.0;
485     if(fabs(halfAngle)>1e-8)
486     {
487         a=4.0/3.0*(1-cos(halfAngle))/sin(halfAngle);
488         xNorm[0]=cos(angleStart);
489         yNorm[0]=sin(angleStart);
490         xNorm[1]=xNorm[0] - a*yNorm[0];
491         yNorm[1]=yNorm[0] + a*xNorm[0];
492         xNorm[3]=cos(angleEnd);
493         yNorm[3]=sin(angleEnd);
494         xNorm[2]=xNorm[3] + a*yNorm[3];
495         yNorm[2]=yNorm[3] - a*xNorm[3];
496     }
497     else
498         for(i=0; i<4; i++)
499         {
500             xNorm[i]=cos(angleStart);
501             yNorm[i]=sin(angleStart);
502         }
503
504     /* Add starting point to path if desired */
505     if(startEntryType)
506     {
507         PATH_ScaleNormalizedPoint(corners, xNorm[0], yNorm[0], &point);
508         if(!PATH_AddEntry(pPath, &point, startEntryType))
509             return FALSE;
510     }
511
512     /* Add remaining control points */
513     for(i=1; i<4; i++)
514     {
515         PATH_ScaleNormalizedPoint(corners, xNorm[i], yNorm[i], &point);
516         if(!PATH_AddEntry(pPath, &point, PT_BEZIERTO))
517             return FALSE;
518     }
519
520     return TRUE;
521 }
522
523
524 /***********************************************************************
525  *           BeginPath    (GDI32.@)
526  */
527 BOOL WINAPI BeginPath(HDC hdc)
528 {
529     BOOL ret = FALSE;
530     DC *dc = get_dc_ptr( hdc );
531
532     if (dc)
533     {
534         PHYSDEV physdev = GET_DC_PHYSDEV( dc, pBeginPath );
535         ret = physdev->funcs->pBeginPath( physdev );
536         release_dc_ptr( dc );
537     }
538     return ret;
539 }
540
541
542 /***********************************************************************
543  *           EndPath    (GDI32.@)
544  */
545 BOOL WINAPI EndPath(HDC hdc)
546 {
547     BOOL ret = FALSE;
548     DC *dc = get_dc_ptr( hdc );
549
550     if (dc)
551     {
552         PHYSDEV physdev = GET_DC_PHYSDEV( dc, pEndPath );
553         ret = physdev->funcs->pEndPath( physdev );
554         release_dc_ptr( dc );
555     }
556     return ret;
557 }
558
559
560 /******************************************************************************
561  * AbortPath [GDI32.@]
562  * Closes and discards paths from device context
563  *
564  * NOTES
565  *    Check that SetLastError is being called correctly
566  *
567  * PARAMS
568  *    hdc [I] Handle to device context
569  *
570  * RETURNS
571  *    Success: TRUE
572  *    Failure: FALSE
573  */
574 BOOL WINAPI AbortPath( HDC hdc )
575 {
576     BOOL ret = FALSE;
577     DC *dc = get_dc_ptr( hdc );
578
579     if (dc)
580     {
581         PHYSDEV physdev = GET_DC_PHYSDEV( dc, pAbortPath );
582         ret = physdev->funcs->pAbortPath( physdev );
583         release_dc_ptr( dc );
584     }
585     return ret;
586 }
587
588
589 /***********************************************************************
590  *           CloseFigure    (GDI32.@)
591  *
592  * FIXME: Check that SetLastError is being called correctly
593  */
594 BOOL WINAPI CloseFigure(HDC hdc)
595 {
596     BOOL ret = FALSE;
597     DC *dc = get_dc_ptr( hdc );
598
599     if (dc)
600     {
601         PHYSDEV physdev = GET_DC_PHYSDEV( dc, pCloseFigure );
602         ret = physdev->funcs->pCloseFigure( physdev );
603         release_dc_ptr( dc );
604     }
605     return ret;
606 }
607
608
609 /***********************************************************************
610  *           GetPath    (GDI32.@)
611  */
612 INT WINAPI GetPath(HDC hdc, LPPOINT pPoints, LPBYTE pTypes, INT nSize)
613 {
614    INT ret = -1;
615    DC *dc = get_dc_ptr( hdc );
616
617    if(!dc) return -1;
618
619    if (!dc->path)
620    {
621       SetLastError(ERROR_CAN_NOT_COMPLETE);
622       goto done;
623    }
624
625    if(nSize==0)
626       ret = dc->path->count;
627    else if(nSize<dc->path->count)
628    {
629       SetLastError(ERROR_INVALID_PARAMETER);
630       goto done;
631    }
632    else
633    {
634       memcpy(pPoints, dc->path->points, sizeof(POINT)*dc->path->count);
635       memcpy(pTypes, dc->path->flags, sizeof(BYTE)*dc->path->count);
636
637       /* Convert the points to logical coordinates */
638       if(!DPtoLP(hdc, pPoints, dc->path->count))
639       {
640          /* FIXME: Is this the correct value? */
641          SetLastError(ERROR_CAN_NOT_COMPLETE);
642         goto done;
643       }
644      else ret = dc->path->count;
645    }
646  done:
647    release_dc_ptr( dc );
648    return ret;
649 }
650
651
652 /***********************************************************************
653  *           PathToRegion    (GDI32.@)
654  *
655  * FIXME
656  *   Check that SetLastError is being called correctly
657  *
658  * The documentation does not state this explicitly, but a test under Windows
659  * shows that the region which is returned should be in device coordinates.
660  */
661 HRGN WINAPI PathToRegion(HDC hdc)
662 {
663    HRGN  hrgnRval = 0;
664    DC *dc = get_dc_ptr( hdc );
665
666    /* Get pointer to path */
667    if(!dc) return 0;
668
669    if (!dc->path) SetLastError(ERROR_CAN_NOT_COMPLETE);
670    else
671    {
672        if ((hrgnRval = PATH_PathToRegion(dc->path, GetPolyFillMode(hdc))))
673        {
674            /* FIXME: Should we empty the path even if conversion failed? */
675            free_gdi_path( dc->path );
676            dc->path = NULL;
677        }
678    }
679    release_dc_ptr( dc );
680    return hrgnRval;
681 }
682
683 static BOOL PATH_FillPath( HDC hdc, const struct gdi_path *pPath )
684 {
685    INT   mapMode, graphicsMode;
686    SIZE  ptViewportExt, ptWindowExt;
687    POINT ptViewportOrg, ptWindowOrg;
688    XFORM xform;
689    HRGN  hrgn;
690
691    /* Construct a region from the path and fill it */
692    if ((hrgn = PATH_PathToRegion(pPath, GetPolyFillMode(hdc))))
693    {
694       /* Since PaintRgn interprets the region as being in logical coordinates
695        * but the points we store for the path are already in device
696        * coordinates, we have to set the mapping mode to MM_TEXT temporarily.
697        * Using SaveDC to save information about the mapping mode / world
698        * transform would be easier but would require more overhead, especially
699        * now that SaveDC saves the current path.
700        */
701
702       /* Save the information about the old mapping mode */
703       mapMode=GetMapMode(hdc);
704       GetViewportExtEx(hdc, &ptViewportExt);
705       GetViewportOrgEx(hdc, &ptViewportOrg);
706       GetWindowExtEx(hdc, &ptWindowExt);
707       GetWindowOrgEx(hdc, &ptWindowOrg);
708
709       /* Save world transform
710        * NB: The Windows documentation on world transforms would lead one to
711        * believe that this has to be done only in GM_ADVANCED; however, my
712        * tests show that resetting the graphics mode to GM_COMPATIBLE does
713        * not reset the world transform.
714        */
715       GetWorldTransform(hdc, &xform);
716
717       /* Set MM_TEXT */
718       SetMapMode(hdc, MM_TEXT);
719       SetViewportOrgEx(hdc, 0, 0, NULL);
720       SetWindowOrgEx(hdc, 0, 0, NULL);
721       graphicsMode=GetGraphicsMode(hdc);
722       SetGraphicsMode(hdc, GM_ADVANCED);
723       ModifyWorldTransform(hdc, &xform, MWT_IDENTITY);
724       SetGraphicsMode(hdc, graphicsMode);
725
726       /* Paint the region */
727       PaintRgn(hdc, hrgn);
728       DeleteObject(hrgn);
729       /* Restore the old mapping mode */
730       SetMapMode(hdc, mapMode);
731       SetViewportExtEx(hdc, ptViewportExt.cx, ptViewportExt.cy, NULL);
732       SetViewportOrgEx(hdc, ptViewportOrg.x, ptViewportOrg.y, NULL);
733       SetWindowExtEx(hdc, ptWindowExt.cx, ptWindowExt.cy, NULL);
734       SetWindowOrgEx(hdc, ptWindowOrg.x, ptWindowOrg.y, NULL);
735
736       /* Go to GM_ADVANCED temporarily to restore the world transform */
737       graphicsMode=GetGraphicsMode(hdc);
738       SetGraphicsMode(hdc, GM_ADVANCED);
739       SetWorldTransform(hdc, &xform);
740       SetGraphicsMode(hdc, graphicsMode);
741       return TRUE;
742    }
743    return FALSE;
744 }
745
746
747 /***********************************************************************
748  *           FillPath    (GDI32.@)
749  *
750  * FIXME
751  *    Check that SetLastError is being called correctly
752  */
753 BOOL WINAPI FillPath(HDC hdc)
754 {
755     BOOL ret = FALSE;
756     DC *dc = get_dc_ptr( hdc );
757
758     if (dc)
759     {
760         PHYSDEV physdev = GET_DC_PHYSDEV( dc, pFillPath );
761         ret = physdev->funcs->pFillPath( physdev );
762         release_dc_ptr( dc );
763     }
764     return ret;
765 }
766
767
768 /***********************************************************************
769  *           SelectClipPath    (GDI32.@)
770  * FIXME
771  *  Check that SetLastError is being called correctly
772  */
773 BOOL WINAPI SelectClipPath(HDC hdc, INT iMode)
774 {
775     BOOL ret = FALSE;
776     DC *dc = get_dc_ptr( hdc );
777
778     if (dc)
779     {
780         PHYSDEV physdev = GET_DC_PHYSDEV( dc, pSelectClipPath );
781         ret = physdev->funcs->pSelectClipPath( physdev, iMode );
782         release_dc_ptr( dc );
783     }
784     return ret;
785 }
786
787
788 /***********************************************************************
789  *           pathdrv_BeginPath
790  */
791 static BOOL pathdrv_BeginPath( PHYSDEV dev )
792 {
793     /* path already open, nothing to do */
794     return TRUE;
795 }
796
797
798 /***********************************************************************
799  *           pathdrv_AbortPath
800  */
801 static BOOL pathdrv_AbortPath( PHYSDEV dev )
802 {
803     struct path_physdev *physdev = get_path_physdev( dev );
804     DC *dc = get_dc_ptr( dev->hdc );
805
806     if (!dc) return FALSE;
807     free_gdi_path( physdev->path );
808     pop_path_driver( dc, physdev );
809     release_dc_ptr( dc );
810     return TRUE;
811 }
812
813
814 /***********************************************************************
815  *           pathdrv_EndPath
816  */
817 static BOOL pathdrv_EndPath( PHYSDEV dev )
818 {
819     struct path_physdev *physdev = get_path_physdev( dev );
820     DC *dc = get_dc_ptr( dev->hdc );
821
822     if (!dc) return FALSE;
823     dc->path = physdev->path;
824     pop_path_driver( dc, physdev );
825     release_dc_ptr( dc );
826     return TRUE;
827 }
828
829
830 /***********************************************************************
831  *           pathdrv_CreateDC
832  */
833 static BOOL pathdrv_CreateDC( PHYSDEV *dev, LPCWSTR driver, LPCWSTR device,
834                               LPCWSTR output, const DEVMODEW *devmode )
835 {
836     struct path_physdev *physdev = HeapAlloc( GetProcessHeap(), 0, sizeof(*physdev) );
837     DC *dc;
838
839     if (!physdev) return FALSE;
840     dc = get_dc_ptr( (*dev)->hdc );
841     push_dc_driver( dev, &physdev->dev, &path_driver );
842     release_dc_ptr( dc );
843     return TRUE;
844 }
845
846
847 /*************************************************************
848  *           pathdrv_DeleteDC
849  */
850 static BOOL pathdrv_DeleteDC( PHYSDEV dev )
851 {
852     assert( 0 );  /* should never be called */
853     return TRUE;
854 }
855
856
857 BOOL PATH_SavePath( DC *dst, DC *src )
858 {
859     struct path_physdev *physdev;
860
861     if (src->path)
862     {
863         if (!(dst->path = copy_gdi_path( src->path ))) return FALSE;
864     }
865     else if ((physdev = find_path_physdev( src )))
866     {
867         if (!(dst->path = copy_gdi_path( physdev->path ))) return FALSE;
868         dst->path_open = TRUE;
869     }
870     else dst->path = NULL;
871     return TRUE;
872 }
873
874 BOOL PATH_RestorePath( DC *dst, DC *src )
875 {
876     struct path_physdev *physdev = find_path_physdev( dst );
877
878     if (src->path && src->path_open)
879     {
880         if (!physdev)
881         {
882             if (!path_driver.pCreateDC( &dst->physDev, NULL, NULL, NULL, NULL )) return FALSE;
883             physdev = get_path_physdev( dst->physDev );
884         }
885         else free_gdi_path( physdev->path );
886
887         physdev->path = src->path;
888         src->path_open = FALSE;
889         src->path = NULL;
890     }
891     else if (physdev)
892     {
893         free_gdi_path( physdev->path );
894         pop_path_driver( dst, physdev );
895     }
896     if (dst->path) free_gdi_path( dst->path );
897     dst->path = src->path;
898     src->path = NULL;
899     return TRUE;
900 }
901
902
903 /*************************************************************
904  *           pathdrv_MoveTo
905  */
906 static BOOL pathdrv_MoveTo( PHYSDEV dev, INT x, INT y )
907 {
908     struct path_physdev *physdev = get_path_physdev( dev );
909     physdev->path->newStroke = TRUE;
910     return TRUE;
911 }
912
913
914 /*************************************************************
915  *           pathdrv_LineTo
916  */
917 static BOOL pathdrv_LineTo( PHYSDEV dev, INT x, INT y )
918 {
919     struct path_physdev *physdev = get_path_physdev( dev );
920     POINT point;
921
922     if (!start_new_stroke( physdev )) return FALSE;
923     point.x = x;
924     point.y = y;
925     return add_log_points( physdev, &point, 1, PT_LINETO ) != NULL;
926 }
927
928
929 /*************************************************************
930  *           pathdrv_RoundRect
931  *
932  * FIXME: it adds the same entries to the path as windows does, but there
933  * is an error in the bezier drawing code so that there are small pixel-size
934  * gaps when the resulting path is drawn by StrokePath()
935  */
936 static BOOL pathdrv_RoundRect( PHYSDEV dev, INT x1, INT y1, INT x2, INT y2, INT ell_width, INT ell_height )
937 {
938     struct path_physdev *physdev = get_path_physdev( dev );
939     POINT corners[2], pointTemp;
940     FLOAT_POINT ellCorners[2];
941
942     PATH_CheckCorners(dev->hdc,corners,x1,y1,x2,y2);
943
944    /* Add points to the roundrect path */
945    ellCorners[0].x = corners[1].x-ell_width;
946    ellCorners[0].y = corners[0].y;
947    ellCorners[1].x = corners[1].x;
948    ellCorners[1].y = corners[0].y+ell_height;
949    if(!PATH_DoArcPart(physdev->path, ellCorners, 0, -M_PI_2, PT_MOVETO))
950       return FALSE;
951    pointTemp.x = corners[0].x+ell_width/2;
952    pointTemp.y = corners[0].y;
953    if(!PATH_AddEntry(physdev->path, &pointTemp, PT_LINETO))
954       return FALSE;
955    ellCorners[0].x = corners[0].x;
956    ellCorners[1].x = corners[0].x+ell_width;
957    if(!PATH_DoArcPart(physdev->path, ellCorners, -M_PI_2, -M_PI, FALSE))
958       return FALSE;
959    pointTemp.x = corners[0].x;
960    pointTemp.y = corners[1].y-ell_height/2;
961    if(!PATH_AddEntry(physdev->path, &pointTemp, PT_LINETO))
962       return FALSE;
963    ellCorners[0].y = corners[1].y-ell_height;
964    ellCorners[1].y = corners[1].y;
965    if(!PATH_DoArcPart(physdev->path, ellCorners, M_PI, M_PI_2, FALSE))
966       return FALSE;
967    pointTemp.x = corners[1].x-ell_width/2;
968    pointTemp.y = corners[1].y;
969    if(!PATH_AddEntry(physdev->path, &pointTemp, PT_LINETO))
970       return FALSE;
971    ellCorners[0].x = corners[1].x-ell_width;
972    ellCorners[1].x = corners[1].x;
973    if(!PATH_DoArcPart(physdev->path, ellCorners, M_PI_2, 0, FALSE))
974       return FALSE;
975
976    /* Close the roundrect figure */
977    return CloseFigure( dev->hdc );
978 }
979
980
981 /*************************************************************
982  *           pathdrv_Rectangle
983  */
984 static BOOL pathdrv_Rectangle( PHYSDEV dev, INT x1, INT y1, INT x2, INT y2 )
985 {
986     struct path_physdev *physdev = get_path_physdev( dev );
987     POINT corners[2], pointTemp;
988
989     PATH_CheckCorners(dev->hdc,corners,x1,y1,x2,y2);
990
991    /* Add four points to the path */
992    pointTemp.x=corners[1].x;
993    pointTemp.y=corners[0].y;
994    if(!PATH_AddEntry(physdev->path, &pointTemp, PT_MOVETO))
995       return FALSE;
996    if(!PATH_AddEntry(physdev->path, corners, PT_LINETO))
997       return FALSE;
998    pointTemp.x=corners[0].x;
999    pointTemp.y=corners[1].y;
1000    if(!PATH_AddEntry(physdev->path, &pointTemp, PT_LINETO))
1001       return FALSE;
1002    if(!PATH_AddEntry(physdev->path, corners+1, PT_LINETO))
1003       return FALSE;
1004
1005    /* Close the rectangle figure */
1006    return CloseFigure( dev->hdc );
1007 }
1008
1009
1010 /* PATH_Arc
1011  *
1012  * Should be called when a call to Arc is performed on a DC that has
1013  * an open path. This adds up to five Bezier splines representing the arc
1014  * to the path. When 'lines' is 1, we add 1 extra line to get a chord,
1015  * when 'lines' is 2, we add 2 extra lines to get a pie, and when 'lines' is
1016  * -1 we add 1 extra line from the current DC position to the starting position
1017  * of the arc before drawing the arc itself (arcto). Returns TRUE if successful,
1018  * else FALSE.
1019  */
1020 static BOOL PATH_Arc( PHYSDEV dev, INT x1, INT y1, INT x2, INT y2,
1021                       INT xStart, INT yStart, INT xEnd, INT yEnd, INT lines )
1022 {
1023     struct path_physdev *physdev = get_path_physdev( dev );
1024     double angleStart, angleEnd, angleStartQuadrant, angleEndQuadrant=0.0;
1025                /* Initialize angleEndQuadrant to silence gcc's warning */
1026     double x, y;
1027     FLOAT_POINT corners[2], pointStart, pointEnd;
1028     POINT centre;
1029     BOOL start, end;
1030     INT temp, direction = GetArcDirection(dev->hdc);
1031
1032    /* FIXME: Do we have to respect newStroke? */
1033
1034    /* Check for zero height / width */
1035    /* FIXME: Only in GM_COMPATIBLE? */
1036    if(x1==x2 || y1==y2)
1037       return TRUE;
1038
1039    /* Convert points to device coordinates */
1040    corners[0].x = x1;
1041    corners[0].y = y1;
1042    corners[1].x = x2;
1043    corners[1].y = y2;
1044    pointStart.x = xStart;
1045    pointStart.y = yStart;
1046    pointEnd.x = xEnd;
1047    pointEnd.y = yEnd;
1048    INTERNAL_LPTODP_FLOAT(dev->hdc, corners, 2);
1049    INTERNAL_LPTODP_FLOAT(dev->hdc, &pointStart, 1);
1050    INTERNAL_LPTODP_FLOAT(dev->hdc, &pointEnd, 1);
1051
1052    /* Make sure first corner is top left and second corner is bottom right */
1053    if(corners[0].x>corners[1].x)
1054    {
1055       temp=corners[0].x;
1056       corners[0].x=corners[1].x;
1057       corners[1].x=temp;
1058    }
1059    if(corners[0].y>corners[1].y)
1060    {
1061       temp=corners[0].y;
1062       corners[0].y=corners[1].y;
1063       corners[1].y=temp;
1064    }
1065
1066    /* Compute start and end angle */
1067    PATH_NormalizePoint(corners, &pointStart, &x, &y);
1068    angleStart=atan2(y, x);
1069    PATH_NormalizePoint(corners, &pointEnd, &x, &y);
1070    angleEnd=atan2(y, x);
1071
1072    /* Make sure the end angle is "on the right side" of the start angle */
1073    if (direction == AD_CLOCKWISE)
1074    {
1075       if(angleEnd<=angleStart)
1076       {
1077          angleEnd+=2*M_PI;
1078          assert(angleEnd>=angleStart);
1079       }
1080    }
1081    else
1082    {
1083       if(angleEnd>=angleStart)
1084       {
1085          angleEnd-=2*M_PI;
1086          assert(angleEnd<=angleStart);
1087       }
1088    }
1089
1090    /* In GM_COMPATIBLE, don't include bottom and right edges */
1091    if (GetGraphicsMode(dev->hdc) == GM_COMPATIBLE)
1092    {
1093       corners[1].x--;
1094       corners[1].y--;
1095    }
1096
1097    /* arcto: Add a PT_MOVETO only if this is the first entry in a stroke */
1098    if (lines==-1 && !start_new_stroke( physdev )) return FALSE;
1099
1100    /* Add the arc to the path with one Bezier spline per quadrant that the
1101     * arc spans */
1102    start=TRUE;
1103    end=FALSE;
1104    do
1105    {
1106       /* Determine the start and end angles for this quadrant */
1107       if(start)
1108       {
1109          angleStartQuadrant=angleStart;
1110          if (direction == AD_CLOCKWISE)
1111             angleEndQuadrant=(floor(angleStart/M_PI_2)+1.0)*M_PI_2;
1112          else
1113             angleEndQuadrant=(ceil(angleStart/M_PI_2)-1.0)*M_PI_2;
1114       }
1115       else
1116       {
1117          angleStartQuadrant=angleEndQuadrant;
1118          if (direction == AD_CLOCKWISE)
1119             angleEndQuadrant+=M_PI_2;
1120          else
1121             angleEndQuadrant-=M_PI_2;
1122       }
1123
1124       /* Have we reached the last part of the arc? */
1125       if((direction == AD_CLOCKWISE && angleEnd<angleEndQuadrant) ||
1126          (direction == AD_COUNTERCLOCKWISE && angleEnd>angleEndQuadrant))
1127       {
1128          /* Adjust the end angle for this quadrant */
1129          angleEndQuadrant=angleEnd;
1130          end=TRUE;
1131       }
1132
1133       /* Add the Bezier spline to the path */
1134       PATH_DoArcPart(physdev->path, corners, angleStartQuadrant, angleEndQuadrant,
1135          start ? (lines==-1 ? PT_LINETO : PT_MOVETO) : FALSE);
1136       start=FALSE;
1137    }  while(!end);
1138
1139    /* chord: close figure. pie: add line and close figure */
1140    if(lines==1)
1141    {
1142       return CloseFigure(dev->hdc);
1143    }
1144    else if(lines==2)
1145    {
1146       centre.x = (corners[0].x+corners[1].x)/2;
1147       centre.y = (corners[0].y+corners[1].y)/2;
1148       if(!PATH_AddEntry(physdev->path, &centre, PT_LINETO | PT_CLOSEFIGURE))
1149          return FALSE;
1150    }
1151
1152    return TRUE;
1153 }
1154
1155
1156 /*************************************************************
1157  *           pathdrv_AngleArc
1158  */
1159 static BOOL pathdrv_AngleArc( PHYSDEV dev, INT x, INT y, DWORD radius, FLOAT eStartAngle, FLOAT eSweepAngle)
1160 {
1161     INT x1, y1, x2, y2, arcdir;
1162     BOOL ret;
1163
1164     x1 = GDI_ROUND( x + cos(eStartAngle*M_PI/180) * radius );
1165     y1 = GDI_ROUND( y - sin(eStartAngle*M_PI/180) * radius );
1166     x2 = GDI_ROUND( x + cos((eStartAngle+eSweepAngle)*M_PI/180) * radius );
1167     y2 = GDI_ROUND( y - sin((eStartAngle+eSweepAngle)*M_PI/180) * radius );
1168     arcdir = SetArcDirection( dev->hdc, eSweepAngle >= 0 ? AD_COUNTERCLOCKWISE : AD_CLOCKWISE);
1169     ret = PATH_Arc( dev, x-radius, y-radius, x+radius, y+radius, x1, y1, x2, y2, -1 );
1170     SetArcDirection( dev->hdc, arcdir );
1171     return ret;
1172 }
1173
1174
1175 /*************************************************************
1176  *           pathdrv_Arc
1177  */
1178 static BOOL pathdrv_Arc( PHYSDEV dev, INT left, INT top, INT right, INT bottom,
1179                          INT xstart, INT ystart, INT xend, INT yend )
1180 {
1181     return PATH_Arc( dev, left, top, right, bottom, xstart, ystart, xend, yend, 0 );
1182 }
1183
1184
1185 /*************************************************************
1186  *           pathdrv_ArcTo
1187  */
1188 static BOOL pathdrv_ArcTo( PHYSDEV dev, INT left, INT top, INT right, INT bottom,
1189                            INT xstart, INT ystart, INT xend, INT yend )
1190 {
1191     return PATH_Arc( dev, left, top, right, bottom, xstart, ystart, xend, yend, -1 );
1192 }
1193
1194
1195 /*************************************************************
1196  *           pathdrv_Chord
1197  */
1198 static BOOL pathdrv_Chord( PHYSDEV dev, INT left, INT top, INT right, INT bottom,
1199                            INT xstart, INT ystart, INT xend, INT yend )
1200 {
1201     return PATH_Arc( dev, left, top, right, bottom, xstart, ystart, xend, yend, 1);
1202 }
1203
1204
1205 /*************************************************************
1206  *           pathdrv_Pie
1207  */
1208 static BOOL pathdrv_Pie( PHYSDEV dev, INT left, INT top, INT right, INT bottom,
1209                          INT xstart, INT ystart, INT xend, INT yend )
1210 {
1211     return PATH_Arc( dev, left, top, right, bottom, xstart, ystart, xend, yend, 2 );
1212 }
1213
1214
1215 /*************************************************************
1216  *           pathdrv_Ellipse
1217  */
1218 static BOOL pathdrv_Ellipse( PHYSDEV dev, INT x1, INT y1, INT x2, INT y2 )
1219 {
1220     return PATH_Arc( dev, x1, y1, x2, y2, x1, (y1+y2)/2, x1, (y1+y2)/2, 0 ) && CloseFigure( dev->hdc );
1221 }
1222
1223
1224 /*************************************************************
1225  *           pathdrv_PolyBezierTo
1226  */
1227 static BOOL pathdrv_PolyBezierTo( PHYSDEV dev, const POINT *pts, DWORD cbPoints )
1228 {
1229     struct path_physdev *physdev = get_path_physdev( dev );
1230
1231     if (!start_new_stroke( physdev )) return FALSE;
1232     return add_log_points( physdev, pts, cbPoints, PT_BEZIERTO ) != NULL;
1233 }
1234
1235
1236 /*************************************************************
1237  *           pathdrv_PolyBezier
1238  */
1239 static BOOL pathdrv_PolyBezier( PHYSDEV dev, const POINT *pts, DWORD cbPoints )
1240 {
1241     struct path_physdev *physdev = get_path_physdev( dev );
1242     BYTE *type = add_log_points( physdev, pts, cbPoints, PT_BEZIERTO );
1243
1244     if (!type) return FALSE;
1245     type[0] = PT_MOVETO;
1246     return TRUE;
1247 }
1248
1249
1250 /*************************************************************
1251  *           pathdrv_PolyDraw
1252  */
1253 static BOOL pathdrv_PolyDraw( PHYSDEV dev, const POINT *pts, const BYTE *types, DWORD cbPoints )
1254 {
1255     struct path_physdev *physdev = get_path_physdev( dev );
1256     POINT lastmove, orig_pos;
1257     INT i;
1258
1259     GetCurrentPositionEx( dev->hdc, &orig_pos );
1260     lastmove = orig_pos;
1261
1262     for(i = physdev->path->count - 1; i >= 0; i--){
1263         if(physdev->path->flags[i] == PT_MOVETO){
1264             lastmove = physdev->path->points[i];
1265             DPtoLP(dev->hdc, &lastmove, 1);
1266             break;
1267         }
1268     }
1269
1270     for(i = 0; i < cbPoints; i++)
1271     {
1272         switch (types[i])
1273         {
1274         case PT_MOVETO:
1275             MoveToEx( dev->hdc, pts[i].x, pts[i].y, NULL );
1276             break;
1277         case PT_LINETO:
1278         case PT_LINETO | PT_CLOSEFIGURE:
1279             LineTo( dev->hdc, pts[i].x, pts[i].y );
1280             break;
1281         case PT_BEZIERTO:
1282             if ((i + 2 < cbPoints) && (types[i + 1] == PT_BEZIERTO) &&
1283                 (types[i + 2] & ~PT_CLOSEFIGURE) == PT_BEZIERTO)
1284             {
1285                 PolyBezierTo( dev->hdc, &pts[i], 3 );
1286                 i += 2;
1287                 break;
1288             }
1289             /* fall through */
1290         default:
1291             if (i)  /* restore original position */
1292             {
1293                 if (!(types[i - 1] & PT_CLOSEFIGURE)) lastmove = pts[i - 1];
1294                 if (lastmove.x != orig_pos.x || lastmove.y != orig_pos.y)
1295                     MoveToEx( dev->hdc, orig_pos.x, orig_pos.y, NULL );
1296             }
1297             return FALSE;
1298         }
1299
1300         if(types[i] & PT_CLOSEFIGURE){
1301             physdev->path->flags[physdev->path->count-1] |= PT_CLOSEFIGURE;
1302             MoveToEx( dev->hdc, lastmove.x, lastmove.y, NULL );
1303         }
1304     }
1305
1306     return TRUE;
1307 }
1308
1309
1310 /*************************************************************
1311  *           pathdrv_Polyline
1312  */
1313 static BOOL pathdrv_Polyline( PHYSDEV dev, const POINT *pts, INT cbPoints )
1314 {
1315     struct path_physdev *physdev = get_path_physdev( dev );
1316     BYTE *type = add_log_points( physdev, pts, cbPoints, PT_LINETO );
1317
1318     if (!type) return FALSE;
1319     if (cbPoints) type[0] = PT_MOVETO;
1320     return TRUE;
1321 }
1322
1323
1324 /*************************************************************
1325  *           pathdrv_PolylineTo
1326  */
1327 static BOOL pathdrv_PolylineTo( PHYSDEV dev, const POINT *pts, INT cbPoints )
1328 {
1329     struct path_physdev *physdev = get_path_physdev( dev );
1330
1331     if (!start_new_stroke( physdev )) return FALSE;
1332     return add_log_points( physdev, pts, cbPoints, PT_LINETO ) != NULL;
1333 }
1334
1335
1336 /*************************************************************
1337  *           pathdrv_Polygon
1338  */
1339 static BOOL pathdrv_Polygon( PHYSDEV dev, const POINT *pts, INT cbPoints )
1340 {
1341     struct path_physdev *physdev = get_path_physdev( dev );
1342     BYTE *type = add_log_points( physdev, pts, cbPoints, PT_LINETO );
1343
1344     if (!type) return FALSE;
1345     if (cbPoints) type[0] = PT_MOVETO;
1346     if (cbPoints > 1) type[cbPoints - 1] = PT_LINETO | PT_CLOSEFIGURE;
1347     return TRUE;
1348 }
1349
1350
1351 /*************************************************************
1352  *           pathdrv_PolyPolygon
1353  */
1354 static BOOL pathdrv_PolyPolygon( PHYSDEV dev, const POINT* pts, const INT* counts, UINT polygons )
1355 {
1356     struct path_physdev *physdev = get_path_physdev( dev );
1357     UINT poly;
1358     BYTE *type;
1359
1360     for(poly = 0; poly < polygons; poly++) {
1361         type = add_log_points( physdev, pts, counts[poly], PT_LINETO );
1362         if (!type) return FALSE;
1363         type[0] = PT_MOVETO;
1364         /* win98 adds an extra line to close the figure for some reason */
1365         add_log_points( physdev, pts, 1, PT_LINETO | PT_CLOSEFIGURE );
1366         pts += counts[poly];
1367     }
1368     return TRUE;
1369 }
1370
1371
1372 /*************************************************************
1373  *           pathdrv_PolyPolyline
1374  */
1375 static BOOL pathdrv_PolyPolyline( PHYSDEV dev, const POINT* pts, const DWORD* counts, DWORD polylines )
1376 {
1377     struct path_physdev *physdev = get_path_physdev( dev );
1378     UINT poly, count;
1379     BYTE *type;
1380
1381     for (poly = count = 0; poly < polylines; poly++) count += counts[poly];
1382
1383     type = add_log_points( physdev, pts, count, PT_LINETO );
1384     if (!type) return FALSE;
1385
1386     /* make the first point of each polyline a PT_MOVETO */
1387     for (poly = 0; poly < polylines; poly++, type += counts[poly]) *type = PT_MOVETO;
1388     return TRUE;
1389 }
1390
1391
1392 /**********************************************************************
1393  *      PATH_BezierTo
1394  *
1395  * internally used by PATH_add_outline
1396  */
1397 static void PATH_BezierTo(struct gdi_path *pPath, POINT *lppt, INT n)
1398 {
1399     if (n < 2) return;
1400
1401     if (n == 2)
1402     {
1403         PATH_AddEntry(pPath, &lppt[1], PT_LINETO);
1404     }
1405     else if (n == 3)
1406     {
1407         PATH_AddEntry(pPath, &lppt[0], PT_BEZIERTO);
1408         PATH_AddEntry(pPath, &lppt[1], PT_BEZIERTO);
1409         PATH_AddEntry(pPath, &lppt[2], PT_BEZIERTO);
1410     }
1411     else
1412     {
1413         POINT pt[3];
1414         INT i = 0;
1415
1416         pt[2] = lppt[0];
1417         n--;
1418
1419         while (n > 2)
1420         {
1421             pt[0] = pt[2];
1422             pt[1] = lppt[i+1];
1423             pt[2].x = (lppt[i+2].x + lppt[i+1].x) / 2;
1424             pt[2].y = (lppt[i+2].y + lppt[i+1].y) / 2;
1425             PATH_BezierTo(pPath, pt, 3);
1426             n--;
1427             i++;
1428         }
1429
1430         pt[0] = pt[2];
1431         pt[1] = lppt[i+1];
1432         pt[2] = lppt[i+2];
1433         PATH_BezierTo(pPath, pt, 3);
1434     }
1435 }
1436
1437 static BOOL PATH_add_outline(struct path_physdev *physdev, INT x, INT y,
1438                              TTPOLYGONHEADER *header, DWORD size)
1439 {
1440     TTPOLYGONHEADER *start;
1441     POINT pt;
1442
1443     start = header;
1444
1445     while ((char *)header < (char *)start + size)
1446     {
1447         TTPOLYCURVE *curve;
1448
1449         if (header->dwType != TT_POLYGON_TYPE)
1450         {
1451             FIXME("Unknown header type %d\n", header->dwType);
1452             return FALSE;
1453         }
1454
1455         pt.x = x + int_from_fixed(header->pfxStart.x);
1456         pt.y = y - int_from_fixed(header->pfxStart.y);
1457         PATH_AddEntry(physdev->path, &pt, PT_MOVETO);
1458
1459         curve = (TTPOLYCURVE *)(header + 1);
1460
1461         while ((char *)curve < (char *)header + header->cb)
1462         {
1463             /*TRACE("curve->wType %d\n", curve->wType);*/
1464
1465             switch(curve->wType)
1466             {
1467             case TT_PRIM_LINE:
1468             {
1469                 WORD i;
1470
1471                 for (i = 0; i < curve->cpfx; i++)
1472                 {
1473                     pt.x = x + int_from_fixed(curve->apfx[i].x);
1474                     pt.y = y - int_from_fixed(curve->apfx[i].y);
1475                     PATH_AddEntry(physdev->path, &pt, PT_LINETO);
1476                 }
1477                 break;
1478             }
1479
1480             case TT_PRIM_QSPLINE:
1481             case TT_PRIM_CSPLINE:
1482             {
1483                 WORD i;
1484                 POINTFX ptfx;
1485                 POINT *pts = HeapAlloc(GetProcessHeap(), 0, (curve->cpfx + 1) * sizeof(POINT));
1486
1487                 if (!pts) return FALSE;
1488
1489                 ptfx = *(POINTFX *)((char *)curve - sizeof(POINTFX));
1490
1491                 pts[0].x = x + int_from_fixed(ptfx.x);
1492                 pts[0].y = y - int_from_fixed(ptfx.y);
1493
1494                 for(i = 0; i < curve->cpfx; i++)
1495                 {
1496                     pts[i + 1].x = x + int_from_fixed(curve->apfx[i].x);
1497                     pts[i + 1].y = y - int_from_fixed(curve->apfx[i].y);
1498                 }
1499
1500                 PATH_BezierTo(physdev->path, pts, curve->cpfx + 1);
1501
1502                 HeapFree(GetProcessHeap(), 0, pts);
1503                 break;
1504             }
1505
1506             default:
1507                 FIXME("Unknown curve type %04x\n", curve->wType);
1508                 return FALSE;
1509             }
1510
1511             curve = (TTPOLYCURVE *)&curve->apfx[curve->cpfx];
1512         }
1513
1514         header = (TTPOLYGONHEADER *)((char *)header + header->cb);
1515     }
1516
1517     return CloseFigure(physdev->dev.hdc);
1518 }
1519
1520 /*************************************************************
1521  *           pathdrv_ExtTextOut
1522  */
1523 static BOOL pathdrv_ExtTextOut( PHYSDEV dev, INT x, INT y, UINT flags, const RECT *lprc,
1524                                 LPCWSTR str, UINT count, const INT *dx )
1525 {
1526     struct path_physdev *physdev = get_path_physdev( dev );
1527     unsigned int idx;
1528     POINT offset = {0, 0};
1529
1530     if (!count) return TRUE;
1531
1532     for (idx = 0; idx < count; idx++)
1533     {
1534         static const MAT2 identity = { {0,1},{0,0},{0,0},{0,1} };
1535         GLYPHMETRICS gm;
1536         DWORD dwSize;
1537         void *outline;
1538
1539         dwSize = GetGlyphOutlineW(dev->hdc, str[idx], GGO_GLYPH_INDEX | GGO_NATIVE,
1540                                   &gm, 0, NULL, &identity);
1541         if (dwSize == GDI_ERROR) return FALSE;
1542
1543         /* add outline only if char is printable */
1544         if(dwSize)
1545         {
1546             outline = HeapAlloc(GetProcessHeap(), 0, dwSize);
1547             if (!outline) return FALSE;
1548
1549             GetGlyphOutlineW(dev->hdc, str[idx], GGO_GLYPH_INDEX | GGO_NATIVE,
1550                              &gm, dwSize, outline, &identity);
1551
1552             PATH_add_outline(physdev, x + offset.x, y + offset.y, outline, dwSize);
1553
1554             HeapFree(GetProcessHeap(), 0, outline);
1555         }
1556
1557         if (dx)
1558         {
1559             if(flags & ETO_PDY)
1560             {
1561                 offset.x += dx[idx * 2];
1562                 offset.y += dx[idx * 2 + 1];
1563             }
1564             else
1565                 offset.x += dx[idx];
1566         }
1567         else
1568         {
1569             offset.x += gm.gmCellIncX;
1570             offset.y += gm.gmCellIncY;
1571         }
1572     }
1573     return TRUE;
1574 }
1575
1576
1577 /*************************************************************
1578  *           pathdrv_CloseFigure
1579  */
1580 static BOOL pathdrv_CloseFigure( PHYSDEV dev )
1581 {
1582     struct path_physdev *physdev = get_path_physdev( dev );
1583
1584     /* Set PT_CLOSEFIGURE on the last entry and start a new stroke */
1585     /* It is not necessary to draw a line, PT_CLOSEFIGURE is a virtual closing line itself */
1586     if (physdev->path->count)
1587         physdev->path->flags[physdev->path->count - 1] |= PT_CLOSEFIGURE;
1588     return TRUE;
1589 }
1590
1591
1592 /*******************************************************************
1593  *      FlattenPath [GDI32.@]
1594  *
1595  *
1596  */
1597 BOOL WINAPI FlattenPath(HDC hdc)
1598 {
1599     BOOL ret = FALSE;
1600     DC *dc = get_dc_ptr( hdc );
1601
1602     if (dc)
1603     {
1604         PHYSDEV physdev = GET_DC_PHYSDEV( dc, pFlattenPath );
1605         ret = physdev->funcs->pFlattenPath( physdev );
1606         release_dc_ptr( dc );
1607     }
1608     return ret;
1609 }
1610
1611
1612 static BOOL PATH_StrokePath( HDC hdc, const struct gdi_path *pPath )
1613 {
1614     INT i, nLinePts, nAlloc;
1615     POINT *pLinePts;
1616     POINT ptViewportOrg, ptWindowOrg;
1617     SIZE szViewportExt, szWindowExt;
1618     DWORD mapMode, graphicsMode;
1619     XFORM xform;
1620     BOOL ret = TRUE;
1621
1622     /* Save the mapping mode info */
1623     mapMode=GetMapMode(hdc);
1624     GetViewportExtEx(hdc, &szViewportExt);
1625     GetViewportOrgEx(hdc, &ptViewportOrg);
1626     GetWindowExtEx(hdc, &szWindowExt);
1627     GetWindowOrgEx(hdc, &ptWindowOrg);
1628     GetWorldTransform(hdc, &xform);
1629
1630     /* Set MM_TEXT */
1631     SetMapMode(hdc, MM_TEXT);
1632     SetViewportOrgEx(hdc, 0, 0, NULL);
1633     SetWindowOrgEx(hdc, 0, 0, NULL);
1634     graphicsMode=GetGraphicsMode(hdc);
1635     SetGraphicsMode(hdc, GM_ADVANCED);
1636     ModifyWorldTransform(hdc, &xform, MWT_IDENTITY);
1637     SetGraphicsMode(hdc, graphicsMode);
1638
1639     /* Allocate enough memory for the worst case without beziers (one PT_MOVETO
1640      * and the rest PT_LINETO with PT_CLOSEFIGURE at the end) plus some buffer 
1641      * space in case we get one to keep the number of reallocations small. */
1642     nAlloc = pPath->count + 1 + 300;
1643     pLinePts = HeapAlloc(GetProcessHeap(), 0, nAlloc * sizeof(POINT));
1644     nLinePts = 0;
1645     
1646     for(i = 0; i < pPath->count; i++) {
1647         if((i == 0 || (pPath->flags[i-1] & PT_CLOSEFIGURE)) &&
1648            (pPath->flags[i] != PT_MOVETO)) {
1649             ERR("Expected PT_MOVETO %s, got path flag %d\n", 
1650                 i == 0 ? "as first point" : "after PT_CLOSEFIGURE",
1651                 pPath->flags[i]);
1652             ret = FALSE;
1653             goto end;
1654         }
1655         switch(pPath->flags[i]) {
1656         case PT_MOVETO:
1657             TRACE("Got PT_MOVETO (%d, %d)\n",
1658                   pPath->points[i].x, pPath->points[i].y);
1659             if(nLinePts >= 2)
1660                 Polyline(hdc, pLinePts, nLinePts);
1661             nLinePts = 0;
1662             pLinePts[nLinePts++] = pPath->points[i];
1663             break;
1664         case PT_LINETO:
1665         case (PT_LINETO | PT_CLOSEFIGURE):
1666             TRACE("Got PT_LINETO (%d, %d)\n",
1667                   pPath->points[i].x, pPath->points[i].y);
1668             pLinePts[nLinePts++] = pPath->points[i];
1669             break;
1670         case PT_BEZIERTO:
1671             TRACE("Got PT_BEZIERTO\n");
1672             if(pPath->flags[i+1] != PT_BEZIERTO ||
1673                (pPath->flags[i+2] & ~PT_CLOSEFIGURE) != PT_BEZIERTO) {
1674                 ERR("Path didn't contain 3 successive PT_BEZIERTOs\n");
1675                 ret = FALSE;
1676                 goto end;
1677             } else {
1678                 INT nBzrPts, nMinAlloc;
1679                 POINT *pBzrPts = GDI_Bezier(&pPath->points[i-1], 4, &nBzrPts);
1680                 /* Make sure we have allocated enough memory for the lines of 
1681                  * this bezier and the rest of the path, assuming we won't get
1682                  * another one (since we won't reallocate again then). */
1683                 nMinAlloc = nLinePts + (pPath->count - i) + nBzrPts;
1684                 if(nAlloc < nMinAlloc)
1685                 {
1686                     nAlloc = nMinAlloc * 2;
1687                     pLinePts = HeapReAlloc(GetProcessHeap(), 0, pLinePts,
1688                                            nAlloc * sizeof(POINT));
1689                 }
1690                 memcpy(&pLinePts[nLinePts], &pBzrPts[1],
1691                        (nBzrPts - 1) * sizeof(POINT));
1692                 nLinePts += nBzrPts - 1;
1693                 HeapFree(GetProcessHeap(), 0, pBzrPts);
1694                 i += 2;
1695             }
1696             break;
1697         default:
1698             ERR("Got path flag %d\n", pPath->flags[i]);
1699             ret = FALSE;
1700             goto end;
1701         }
1702         if(pPath->flags[i] & PT_CLOSEFIGURE)
1703             pLinePts[nLinePts++] = pLinePts[0];
1704     }
1705     if(nLinePts >= 2)
1706         Polyline(hdc, pLinePts, nLinePts);
1707
1708  end:
1709     HeapFree(GetProcessHeap(), 0, pLinePts);
1710
1711     /* Restore the old mapping mode */
1712     SetMapMode(hdc, mapMode);
1713     SetWindowExtEx(hdc, szWindowExt.cx, szWindowExt.cy, NULL);
1714     SetWindowOrgEx(hdc, ptWindowOrg.x, ptWindowOrg.y, NULL);
1715     SetViewportExtEx(hdc, szViewportExt.cx, szViewportExt.cy, NULL);
1716     SetViewportOrgEx(hdc, ptViewportOrg.x, ptViewportOrg.y, NULL);
1717
1718     /* Go to GM_ADVANCED temporarily to restore the world transform */
1719     graphicsMode=GetGraphicsMode(hdc);
1720     SetGraphicsMode(hdc, GM_ADVANCED);
1721     SetWorldTransform(hdc, &xform);
1722     SetGraphicsMode(hdc, graphicsMode);
1723
1724     /* If we've moved the current point then get its new position
1725        which will be in device (MM_TEXT) co-ords, convert it to
1726        logical co-ords and re-set it.  This basically updates
1727        dc->CurPosX|Y so that their values are in the correct mapping
1728        mode.
1729     */
1730     if(i > 0) {
1731         POINT pt;
1732         GetCurrentPositionEx(hdc, &pt);
1733         DPtoLP(hdc, &pt, 1);
1734         MoveToEx(hdc, pt.x, pt.y, NULL);
1735     }
1736
1737     return ret;
1738 }
1739
1740 #define round(x) ((int)((x)>0?(x)+0.5:(x)-0.5))
1741
1742 static struct gdi_path *PATH_WidenPath(DC *dc)
1743 {
1744     INT i, j, numStrokes, penWidth, penWidthIn, penWidthOut, size, penStyle;
1745     struct gdi_path *flat_path, *pNewPath, **pStrokes = NULL, *pUpPath, *pDownPath;
1746     EXTLOGPEN *elp;
1747     DWORD obj_type, joint, endcap, penType;
1748
1749     size = GetObjectW( dc->hPen, 0, NULL );
1750     if (!size) {
1751         SetLastError(ERROR_CAN_NOT_COMPLETE);
1752         return NULL;
1753     }
1754
1755     elp = HeapAlloc( GetProcessHeap(), 0, size );
1756     GetObjectW( dc->hPen, size, elp );
1757
1758     obj_type = GetObjectType(dc->hPen);
1759     if(obj_type == OBJ_PEN) {
1760         penStyle = ((LOGPEN*)elp)->lopnStyle;
1761     }
1762     else if(obj_type == OBJ_EXTPEN) {
1763         penStyle = elp->elpPenStyle;
1764     }
1765     else {
1766         SetLastError(ERROR_CAN_NOT_COMPLETE);
1767         HeapFree( GetProcessHeap(), 0, elp );
1768         return NULL;
1769     }
1770
1771     penWidth = elp->elpWidth;
1772     HeapFree( GetProcessHeap(), 0, elp );
1773
1774     endcap = (PS_ENDCAP_MASK & penStyle);
1775     joint = (PS_JOIN_MASK & penStyle);
1776     penType = (PS_TYPE_MASK & penStyle);
1777
1778     /* The function cannot apply to cosmetic pens */
1779     if(obj_type == OBJ_EXTPEN && penType == PS_COSMETIC) {
1780         SetLastError(ERROR_CAN_NOT_COMPLETE);
1781         return NULL;
1782     }
1783
1784     if (!(flat_path = PATH_FlattenPath( dc->path ))) return NULL;
1785
1786     penWidthIn = penWidth / 2;
1787     penWidthOut = penWidth / 2;
1788     if(penWidthIn + penWidthOut < penWidth)
1789         penWidthOut++;
1790
1791     numStrokes = 0;
1792
1793     for(i = 0, j = 0; i < flat_path->count; i++, j++) {
1794         POINT point;
1795         if((i == 0 || (flat_path->flags[i-1] & PT_CLOSEFIGURE)) &&
1796             (flat_path->flags[i] != PT_MOVETO)) {
1797             ERR("Expected PT_MOVETO %s, got path flag %c\n",
1798                 i == 0 ? "as first point" : "after PT_CLOSEFIGURE",
1799                 flat_path->flags[i]);
1800             free_gdi_path( flat_path );
1801             return NULL;
1802         }
1803         switch(flat_path->flags[i]) {
1804             case PT_MOVETO:
1805                 numStrokes++;
1806                 j = 0;
1807                 if(numStrokes == 1)
1808                     pStrokes = HeapAlloc(GetProcessHeap(), 0, sizeof(*pStrokes));
1809                 else
1810                     pStrokes = HeapReAlloc(GetProcessHeap(), 0, pStrokes, numStrokes * sizeof(*pStrokes));
1811                 if(!pStrokes) return NULL;
1812                 pStrokes[numStrokes - 1] = alloc_gdi_path(0);
1813                 /* fall through */
1814             case PT_LINETO:
1815             case (PT_LINETO | PT_CLOSEFIGURE):
1816                 point.x = flat_path->points[i].x;
1817                 point.y = flat_path->points[i].y;
1818                 PATH_AddEntry(pStrokes[numStrokes - 1], &point, flat_path->flags[i]);
1819                 break;
1820             case PT_BEZIERTO:
1821                 /* should never happen because of the FlattenPath call */
1822                 ERR("Should never happen\n");
1823                 break;
1824             default:
1825                 ERR("Got path flag %c\n", flat_path->flags[i]);
1826                 return NULL;
1827         }
1828     }
1829
1830     pNewPath = alloc_gdi_path( flat_path->count );
1831
1832     for(i = 0; i < numStrokes; i++) {
1833         pUpPath = alloc_gdi_path( pStrokes[i]->count );
1834         pDownPath = alloc_gdi_path( pStrokes[i]->count );
1835
1836         for(j = 0; j < pStrokes[i]->count; j++) {
1837             /* Beginning or end of the path if not closed */
1838             if((!(pStrokes[i]->flags[pStrokes[i]->count - 1] & PT_CLOSEFIGURE)) && (j == 0 || j == pStrokes[i]->count - 1) ) {
1839                 /* Compute segment angle */
1840                 double xo, yo, xa, ya, theta;
1841                 POINT pt;
1842                 FLOAT_POINT corners[2];
1843                 if(j == 0) {
1844                     xo = pStrokes[i]->points[j].x;
1845                     yo = pStrokes[i]->points[j].y;
1846                     xa = pStrokes[i]->points[1].x;
1847                     ya = pStrokes[i]->points[1].y;
1848                 }
1849                 else {
1850                     xa = pStrokes[i]->points[j - 1].x;
1851                     ya = pStrokes[i]->points[j - 1].y;
1852                     xo = pStrokes[i]->points[j].x;
1853                     yo = pStrokes[i]->points[j].y;
1854                 }
1855                 theta = atan2( ya - yo, xa - xo );
1856                 switch(endcap) {
1857                     case PS_ENDCAP_SQUARE :
1858                         pt.x = xo + round(sqrt(2) * penWidthOut * cos(M_PI_4 + theta));
1859                         pt.y = yo + round(sqrt(2) * penWidthOut * sin(M_PI_4 + theta));
1860                         PATH_AddEntry(pUpPath, &pt, (j == 0 ? PT_MOVETO : PT_LINETO) );
1861                         pt.x = xo + round(sqrt(2) * penWidthIn * cos(- M_PI_4 + theta));
1862                         pt.y = yo + round(sqrt(2) * penWidthIn * sin(- M_PI_4 + theta));
1863                         PATH_AddEntry(pUpPath, &pt, PT_LINETO);
1864                         break;
1865                     case PS_ENDCAP_FLAT :
1866                         pt.x = xo + round( penWidthOut * cos(theta + M_PI_2) );
1867                         pt.y = yo + round( penWidthOut * sin(theta + M_PI_2) );
1868                         PATH_AddEntry(pUpPath, &pt, (j == 0 ? PT_MOVETO : PT_LINETO));
1869                         pt.x = xo - round( penWidthIn * cos(theta + M_PI_2) );
1870                         pt.y = yo - round( penWidthIn * sin(theta + M_PI_2) );
1871                         PATH_AddEntry(pUpPath, &pt, PT_LINETO);
1872                         break;
1873                     case PS_ENDCAP_ROUND :
1874                     default :
1875                         corners[0].x = xo - penWidthIn;
1876                         corners[0].y = yo - penWidthIn;
1877                         corners[1].x = xo + penWidthOut;
1878                         corners[1].y = yo + penWidthOut;
1879                         PATH_DoArcPart(pUpPath ,corners, theta + M_PI_2 , theta + 3 * M_PI_4, (j == 0 ? PT_MOVETO : FALSE));
1880                         PATH_DoArcPart(pUpPath ,corners, theta + 3 * M_PI_4 , theta + M_PI, FALSE);
1881                         PATH_DoArcPart(pUpPath ,corners, theta + M_PI, theta +  5 * M_PI_4, FALSE);
1882                         PATH_DoArcPart(pUpPath ,corners, theta + 5 * M_PI_4 , theta + 3 * M_PI_2, FALSE);
1883                         break;
1884                 }
1885             }
1886             /* Corpse of the path */
1887             else {
1888                 /* Compute angle */
1889                 INT previous, next;
1890                 double xa, ya, xb, yb, xo, yo;
1891                 double alpha, theta, miterWidth;
1892                 DWORD _joint = joint;
1893                 POINT pt;
1894                 struct gdi_path *pInsidePath, *pOutsidePath;
1895                 if(j > 0 && j < pStrokes[i]->count - 1) {
1896                     previous = j - 1;
1897                     next = j + 1;
1898                 }
1899                 else if (j == 0) {
1900                     previous = pStrokes[i]->count - 1;
1901                     next = j + 1;
1902                 }
1903                 else {
1904                     previous = j - 1;
1905                     next = 0;
1906                 }
1907                 xo = pStrokes[i]->points[j].x;
1908                 yo = pStrokes[i]->points[j].y;
1909                 xa = pStrokes[i]->points[previous].x;
1910                 ya = pStrokes[i]->points[previous].y;
1911                 xb = pStrokes[i]->points[next].x;
1912                 yb = pStrokes[i]->points[next].y;
1913                 theta = atan2( yo - ya, xo - xa );
1914                 alpha = atan2( yb - yo, xb - xo ) - theta;
1915                 if (alpha > 0) alpha -= M_PI;
1916                 else alpha += M_PI;
1917                 if(_joint == PS_JOIN_MITER && dc->miterLimit < fabs(1 / sin(alpha/2))) {
1918                     _joint = PS_JOIN_BEVEL;
1919                 }
1920                 if(alpha > 0) {
1921                     pInsidePath = pUpPath;
1922                     pOutsidePath = pDownPath;
1923                 }
1924                 else if(alpha < 0) {
1925                     pInsidePath = pDownPath;
1926                     pOutsidePath = pUpPath;
1927                 }
1928                 else {
1929                     continue;
1930                 }
1931                 /* Inside angle points */
1932                 if(alpha > 0) {
1933                     pt.x = xo - round( penWidthIn * cos(theta + M_PI_2) );
1934                     pt.y = yo - round( penWidthIn * sin(theta + M_PI_2) );
1935                 }
1936                 else {
1937                     pt.x = xo + round( penWidthIn * cos(theta + M_PI_2) );
1938                     pt.y = yo + round( penWidthIn * sin(theta + M_PI_2) );
1939                 }
1940                 PATH_AddEntry(pInsidePath, &pt, PT_LINETO);
1941                 if(alpha > 0) {
1942                     pt.x = xo + round( penWidthIn * cos(M_PI_2 + alpha + theta) );
1943                     pt.y = yo + round( penWidthIn * sin(M_PI_2 + alpha + theta) );
1944                 }
1945                 else {
1946                     pt.x = xo - round( penWidthIn * cos(M_PI_2 + alpha + theta) );
1947                     pt.y = yo - round( penWidthIn * sin(M_PI_2 + alpha + theta) );
1948                 }
1949                 PATH_AddEntry(pInsidePath, &pt, PT_LINETO);
1950                 /* Outside angle point */
1951                 switch(_joint) {
1952                      case PS_JOIN_MITER :
1953                         miterWidth = fabs(penWidthOut / cos(M_PI_2 - fabs(alpha) / 2));
1954                         pt.x = xo + round( miterWidth * cos(theta + alpha / 2) );
1955                         pt.y = yo + round( miterWidth * sin(theta + alpha / 2) );
1956                         PATH_AddEntry(pOutsidePath, &pt, PT_LINETO);
1957                         break;
1958                     case PS_JOIN_BEVEL :
1959                         if(alpha > 0) {
1960                             pt.x = xo + round( penWidthOut * cos(theta + M_PI_2) );
1961                             pt.y = yo + round( penWidthOut * sin(theta + M_PI_2) );
1962                         }
1963                         else {
1964                             pt.x = xo - round( penWidthOut * cos(theta + M_PI_2) );
1965                             pt.y = yo - round( penWidthOut * sin(theta + M_PI_2) );
1966                         }
1967                         PATH_AddEntry(pOutsidePath, &pt, PT_LINETO);
1968                         if(alpha > 0) {
1969                             pt.x = xo - round( penWidthOut * cos(M_PI_2 + alpha + theta) );
1970                             pt.y = yo - round( penWidthOut * sin(M_PI_2 + alpha + theta) );
1971                         }
1972                         else {
1973                             pt.x = xo + round( penWidthOut * cos(M_PI_2 + alpha + theta) );
1974                             pt.y = yo + round( penWidthOut * sin(M_PI_2 + alpha + theta) );
1975                         }
1976                         PATH_AddEntry(pOutsidePath, &pt, PT_LINETO);
1977                         break;
1978                     case PS_JOIN_ROUND :
1979                     default :
1980                         if(alpha > 0) {
1981                             pt.x = xo + round( penWidthOut * cos(theta + M_PI_2) );
1982                             pt.y = yo + round( penWidthOut * sin(theta + M_PI_2) );
1983                         }
1984                         else {
1985                             pt.x = xo - round( penWidthOut * cos(theta + M_PI_2) );
1986                             pt.y = yo - round( penWidthOut * sin(theta + M_PI_2) );
1987                         }
1988                         PATH_AddEntry(pOutsidePath, &pt, PT_BEZIERTO);
1989                         pt.x = xo + round( penWidthOut * cos(theta + alpha / 2) );
1990                         pt.y = yo + round( penWidthOut * sin(theta + alpha / 2) );
1991                         PATH_AddEntry(pOutsidePath, &pt, PT_BEZIERTO);
1992                         if(alpha > 0) {
1993                             pt.x = xo - round( penWidthOut * cos(M_PI_2 + alpha + theta) );
1994                             pt.y = yo - round( penWidthOut * sin(M_PI_2 + alpha + theta) );
1995                         }
1996                         else {
1997                             pt.x = xo + round( penWidthOut * cos(M_PI_2 + alpha + theta) );
1998                             pt.y = yo + round( penWidthOut * sin(M_PI_2 + alpha + theta) );
1999                         }
2000                         PATH_AddEntry(pOutsidePath, &pt, PT_BEZIERTO);
2001                         break;
2002                 }
2003             }
2004         }
2005         for(j = 0; j < pUpPath->count; j++) {
2006             POINT pt;
2007             pt.x = pUpPath->points[j].x;
2008             pt.y = pUpPath->points[j].y;
2009             PATH_AddEntry(pNewPath, &pt, (j == 0 ? PT_MOVETO : PT_LINETO));
2010         }
2011         for(j = 0; j < pDownPath->count; j++) {
2012             POINT pt;
2013             pt.x = pDownPath->points[pDownPath->count - j - 1].x;
2014             pt.y = pDownPath->points[pDownPath->count - j - 1].y;
2015             PATH_AddEntry(pNewPath, &pt, ( (j == 0 && (pStrokes[i]->flags[pStrokes[i]->count - 1] & PT_CLOSEFIGURE)) ? PT_MOVETO : PT_LINETO));
2016         }
2017
2018         free_gdi_path( pStrokes[i] );
2019         free_gdi_path( pUpPath );
2020         free_gdi_path( pDownPath );
2021     }
2022     HeapFree(GetProcessHeap(), 0, pStrokes);
2023     free_gdi_path( flat_path );
2024     return pNewPath;
2025 }
2026
2027
2028 /*******************************************************************
2029  *      StrokeAndFillPath [GDI32.@]
2030  *
2031  *
2032  */
2033 BOOL WINAPI StrokeAndFillPath(HDC hdc)
2034 {
2035     BOOL ret = FALSE;
2036     DC *dc = get_dc_ptr( hdc );
2037
2038     if (dc)
2039     {
2040         PHYSDEV physdev = GET_DC_PHYSDEV( dc, pStrokeAndFillPath );
2041         ret = physdev->funcs->pStrokeAndFillPath( physdev );
2042         release_dc_ptr( dc );
2043     }
2044     return ret;
2045 }
2046
2047
2048 /*******************************************************************
2049  *      StrokePath [GDI32.@]
2050  *
2051  *
2052  */
2053 BOOL WINAPI StrokePath(HDC hdc)
2054 {
2055     BOOL ret = FALSE;
2056     DC *dc = get_dc_ptr( hdc );
2057
2058     if (dc)
2059     {
2060         PHYSDEV physdev = GET_DC_PHYSDEV( dc, pStrokePath );
2061         ret = physdev->funcs->pStrokePath( physdev );
2062         release_dc_ptr( dc );
2063     }
2064     return ret;
2065 }
2066
2067
2068 /*******************************************************************
2069  *      WidenPath [GDI32.@]
2070  *
2071  *
2072  */
2073 BOOL WINAPI WidenPath(HDC hdc)
2074 {
2075     BOOL ret = FALSE;
2076     DC *dc = get_dc_ptr( hdc );
2077
2078     if (dc)
2079     {
2080         PHYSDEV physdev = GET_DC_PHYSDEV( dc, pWidenPath );
2081         ret = physdev->funcs->pWidenPath( physdev );
2082         release_dc_ptr( dc );
2083     }
2084     return ret;
2085 }
2086
2087
2088 /***********************************************************************
2089  *           null driver fallback implementations
2090  */
2091
2092 BOOL nulldrv_BeginPath( PHYSDEV dev )
2093 {
2094     DC *dc = get_nulldrv_dc( dev );
2095     struct path_physdev *physdev;
2096     struct gdi_path *path = alloc_gdi_path(0);
2097
2098     if (!path) return FALSE;
2099     if (!path_driver.pCreateDC( &dc->physDev, NULL, NULL, NULL, NULL ))
2100     {
2101         free_gdi_path( path );
2102         return FALSE;
2103     }
2104     physdev = get_path_physdev( dc->physDev );
2105     physdev->path = path;
2106     if (dc->path) free_gdi_path( dc->path );
2107     dc->path = NULL;
2108     return TRUE;
2109 }
2110
2111 BOOL nulldrv_EndPath( PHYSDEV dev )
2112 {
2113     SetLastError( ERROR_CAN_NOT_COMPLETE );
2114     return FALSE;
2115 }
2116
2117 BOOL nulldrv_AbortPath( PHYSDEV dev )
2118 {
2119     DC *dc = get_nulldrv_dc( dev );
2120
2121     if (dc->path) free_gdi_path( dc->path );
2122     dc->path = NULL;
2123     return TRUE;
2124 }
2125
2126 BOOL nulldrv_CloseFigure( PHYSDEV dev )
2127 {
2128     SetLastError( ERROR_CAN_NOT_COMPLETE );
2129     return FALSE;
2130 }
2131
2132 BOOL nulldrv_SelectClipPath( PHYSDEV dev, INT mode )
2133 {
2134     BOOL ret;
2135     HRGN hrgn;
2136     DC *dc = get_nulldrv_dc( dev );
2137
2138     if (!dc->path)
2139     {
2140         SetLastError( ERROR_CAN_NOT_COMPLETE );
2141         return FALSE;
2142     }
2143     if (!(hrgn = PATH_PathToRegion( dc->path, GetPolyFillMode(dev->hdc)))) return FALSE;
2144     ret = ExtSelectClipRgn( dev->hdc, hrgn, mode ) != ERROR;
2145     if (ret)
2146     {
2147         free_gdi_path( dc->path );
2148         dc->path = NULL;
2149     }
2150     /* FIXME: Should this function delete the path even if it failed? */
2151     DeleteObject( hrgn );
2152     return ret;
2153 }
2154
2155 BOOL nulldrv_FillPath( PHYSDEV dev )
2156 {
2157     DC *dc = get_nulldrv_dc( dev );
2158
2159     if (!dc->path)
2160     {
2161         SetLastError( ERROR_CAN_NOT_COMPLETE );
2162         return FALSE;
2163     }
2164     if (!PATH_FillPath( dev->hdc, dc->path )) return FALSE;
2165     /* FIXME: Should the path be emptied even if conversion failed? */
2166     free_gdi_path( dc->path );
2167     dc->path = NULL;
2168     return TRUE;
2169 }
2170
2171 BOOL nulldrv_StrokeAndFillPath( PHYSDEV dev )
2172 {
2173     DC *dc = get_nulldrv_dc( dev );
2174
2175     if (!dc->path)
2176     {
2177         SetLastError( ERROR_CAN_NOT_COMPLETE );
2178         return FALSE;
2179     }
2180     if (!PATH_FillPath( dev->hdc, dc->path )) return FALSE;
2181     if (!PATH_StrokePath( dev->hdc, dc->path )) return FALSE;
2182     free_gdi_path( dc->path );
2183     dc->path = NULL;
2184     return TRUE;
2185 }
2186
2187 BOOL nulldrv_StrokePath( PHYSDEV dev )
2188 {
2189     DC *dc = get_nulldrv_dc( dev );
2190
2191     if (!dc->path)
2192     {
2193         SetLastError( ERROR_CAN_NOT_COMPLETE );
2194         return FALSE;
2195     }
2196     if (!PATH_StrokePath( dev->hdc, dc->path )) return FALSE;
2197     free_gdi_path( dc->path );
2198     dc->path = NULL;
2199     return TRUE;
2200 }
2201
2202 BOOL nulldrv_FlattenPath( PHYSDEV dev )
2203 {
2204     DC *dc = get_nulldrv_dc( dev );
2205     struct gdi_path *path;
2206
2207     if (!dc->path)
2208     {
2209         SetLastError( ERROR_CAN_NOT_COMPLETE );
2210         return FALSE;
2211     }
2212     if (!(path = PATH_FlattenPath( dc->path ))) return FALSE;
2213     free_gdi_path( dc->path );
2214     dc->path = path;
2215     return TRUE;
2216 }
2217
2218 BOOL nulldrv_WidenPath( PHYSDEV dev )
2219 {
2220     DC *dc = get_nulldrv_dc( dev );
2221     struct gdi_path *path;
2222
2223     if (!dc->path)
2224     {
2225         SetLastError( ERROR_CAN_NOT_COMPLETE );
2226         return FALSE;
2227     }
2228     if (!(path = PATH_WidenPath( dc ))) return FALSE;
2229     free_gdi_path( dc->path );
2230     dc->path = path;
2231     return TRUE;
2232 }
2233
2234 const struct gdi_dc_funcs path_driver =
2235 {
2236     NULL,                               /* pAbortDoc */
2237     pathdrv_AbortPath,                  /* pAbortPath */
2238     NULL,                               /* pAlphaBlend */
2239     pathdrv_AngleArc,                   /* pAngleArc */
2240     pathdrv_Arc,                        /* pArc */
2241     pathdrv_ArcTo,                      /* pArcTo */
2242     pathdrv_BeginPath,                  /* pBeginPath */
2243     NULL,                               /* pBlendImage */
2244     pathdrv_Chord,                      /* pChord */
2245     pathdrv_CloseFigure,                /* pCloseFigure */
2246     NULL,                               /* pCreateCompatibleDC */
2247     pathdrv_CreateDC,                   /* pCreateDC */
2248     pathdrv_DeleteDC,                   /* pDeleteDC */
2249     NULL,                               /* pDeleteObject */
2250     NULL,                               /* pDescribePixelFormat */
2251     NULL,                               /* pDeviceCapabilities */
2252     pathdrv_Ellipse,                    /* pEllipse */
2253     NULL,                               /* pEndDoc */
2254     NULL,                               /* pEndPage */
2255     pathdrv_EndPath,                    /* pEndPath */
2256     NULL,                               /* pEnumFonts */
2257     NULL,                               /* pEnumICMProfiles */
2258     NULL,                               /* pExcludeClipRect */
2259     NULL,                               /* pExtDeviceMode */
2260     NULL,                               /* pExtEscape */
2261     NULL,                               /* pExtFloodFill */
2262     NULL,                               /* pExtSelectClipRgn */
2263     pathdrv_ExtTextOut,                 /* pExtTextOut */
2264     NULL,                               /* pFillPath */
2265     NULL,                               /* pFillRgn */
2266     NULL,                               /* pFlattenPath */
2267     NULL,                               /* pFontIsLinked */
2268     NULL,                               /* pFrameRgn */
2269     NULL,                               /* pGdiComment */
2270     NULL,                               /* pGdiRealizationInfo */
2271     NULL,                               /* pGetBoundsRect */
2272     NULL,                               /* pGetCharABCWidths */
2273     NULL,                               /* pGetCharABCWidthsI */
2274     NULL,                               /* pGetCharWidth */
2275     NULL,                               /* pGetDeviceCaps */
2276     NULL,                               /* pGetDeviceGammaRamp */
2277     NULL,                               /* pGetFontData */
2278     NULL,                               /* pGetFontUnicodeRanges */
2279     NULL,                               /* pGetGlyphIndices */
2280     NULL,                               /* pGetGlyphOutline */
2281     NULL,                               /* pGetICMProfile */
2282     NULL,                               /* pGetImage */
2283     NULL,                               /* pGetKerningPairs */
2284     NULL,                               /* pGetNearestColor */
2285     NULL,                               /* pGetOutlineTextMetrics */
2286     NULL,                               /* pGetPixel */
2287     NULL,                               /* pGetSystemPaletteEntries */
2288     NULL,                               /* pGetTextCharsetInfo */
2289     NULL,                               /* pGetTextExtentExPoint */
2290     NULL,                               /* pGetTextExtentExPointI */
2291     NULL,                               /* pGetTextFace */
2292     NULL,                               /* pGetTextMetrics */
2293     NULL,                               /* pGradientFill */
2294     NULL,                               /* pIntersectClipRect */
2295     NULL,                               /* pInvertRgn */
2296     pathdrv_LineTo,                     /* pLineTo */
2297     NULL,                               /* pModifyWorldTransform */
2298     pathdrv_MoveTo,                     /* pMoveTo */
2299     NULL,                               /* pOffsetClipRgn */
2300     NULL,                               /* pOffsetViewportOrg */
2301     NULL,                               /* pOffsetWindowOrg */
2302     NULL,                               /* pPaintRgn */
2303     NULL,                               /* pPatBlt */
2304     pathdrv_Pie,                        /* pPie */
2305     pathdrv_PolyBezier,                 /* pPolyBezier */
2306     pathdrv_PolyBezierTo,               /* pPolyBezierTo */
2307     pathdrv_PolyDraw,                   /* pPolyDraw */
2308     pathdrv_PolyPolygon,                /* pPolyPolygon */
2309     pathdrv_PolyPolyline,               /* pPolyPolyline */
2310     pathdrv_Polygon,                    /* pPolygon */
2311     pathdrv_Polyline,                   /* pPolyline */
2312     pathdrv_PolylineTo,                 /* pPolylineTo */
2313     NULL,                               /* pPutImage */
2314     NULL,                               /* pRealizeDefaultPalette */
2315     NULL,                               /* pRealizePalette */
2316     pathdrv_Rectangle,                  /* pRectangle */
2317     NULL,                               /* pResetDC */
2318     NULL,                               /* pRestoreDC */
2319     pathdrv_RoundRect,                  /* pRoundRect */
2320     NULL,                               /* pSaveDC */
2321     NULL,                               /* pScaleViewportExt */
2322     NULL,                               /* pScaleWindowExt */
2323     NULL,                               /* pSelectBitmap */
2324     NULL,                               /* pSelectBrush */
2325     NULL,                               /* pSelectClipPath */
2326     NULL,                               /* pSelectFont */
2327     NULL,                               /* pSelectPalette */
2328     NULL,                               /* pSelectPen */
2329     NULL,                               /* pSetArcDirection */
2330     NULL,                               /* pSetBkColor */
2331     NULL,                               /* pSetBkMode */
2332     NULL,                               /* pSetDCBrushColor */
2333     NULL,                               /* pSetDCPenColor */
2334     NULL,                               /* pSetDIBColorTable */
2335     NULL,                               /* pSetDIBitsToDevice */
2336     NULL,                               /* pSetDeviceClipping */
2337     NULL,                               /* pSetDeviceGammaRamp */
2338     NULL,                               /* pSetLayout */
2339     NULL,                               /* pSetMapMode */
2340     NULL,                               /* pSetMapperFlags */
2341     NULL,                               /* pSetPixel */
2342     NULL,                               /* pSetPixelFormat */
2343     NULL,                               /* pSetPolyFillMode */
2344     NULL,                               /* pSetROP2 */
2345     NULL,                               /* pSetRelAbs */
2346     NULL,                               /* pSetStretchBltMode */
2347     NULL,                               /* pSetTextAlign */
2348     NULL,                               /* pSetTextCharacterExtra */
2349     NULL,                               /* pSetTextColor */
2350     NULL,                               /* pSetTextJustification */
2351     NULL,                               /* pSetViewportExt */
2352     NULL,                               /* pSetViewportOrg */
2353     NULL,                               /* pSetWindowExt */
2354     NULL,                               /* pSetWindowOrg */
2355     NULL,                               /* pSetWorldTransform */
2356     NULL,                               /* pStartDoc */
2357     NULL,                               /* pStartPage */
2358     NULL,                               /* pStretchBlt */
2359     NULL,                               /* pStretchDIBits */
2360     NULL,                               /* pStrokeAndFillPath */
2361     NULL,                               /* pStrokePath */
2362     NULL,                               /* pSwapBuffers */
2363     NULL,                               /* pUnrealizePalette */
2364     NULL,                               /* pWidenPath */
2365     NULL,                               /* wine_get_wgl_driver */
2366     GDI_PRIORITY_PATH_DRV               /* priority */
2367 };