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