git.oblomov.eu Git - wine/blob - dlls/gdi32/painting.c

   1 /*
   2  * GDI drawing functions.
   3  *
   4  * Copyright 1993, 1994 Alexandre Julliard
   5  * Copyright 1997 Bertho A. Stultiens
   6  *           1999 Huw D M Davies
   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 <stdarg.h>
  27 #include <string.h>
  28 #include <stdlib.h>
  29
  30 #include "windef.h"
  31 #include "winbase.h"
  32 #include "wingdi.h"
  33 #include "winerror.h"
  34 #include "gdi_private.h"
  35 #include "wine/debug.h"
  36
  37 WINE_DEFAULT_DEBUG_CHANNEL(gdi);
  38
  39
  40 /***********************************************************************
  41  *           null driver fallback implementations
  42  */
  43
  44 BOOL nulldrv_AngleArc( PHYSDEV dev, INT x, INT y, DWORD radius, FLOAT start, FLOAT sweep )
  45 {
  46     INT x1 = GDI_ROUND( x + cos( start * M_PI / 180 ) * radius );
  47     INT y1 = GDI_ROUND( y - sin( start * M_PI / 180 ) * radius );
  48     INT x2 = GDI_ROUND( x + cos( (start + sweep) * M_PI / 180) * radius );
  49     INT y2 = GDI_ROUND( y - sin( (start + sweep) * M_PI / 180) * radius );
  50     INT arcdir = SetArcDirection( dev->hdc, sweep >= 0 ? AD_COUNTERCLOCKWISE : AD_CLOCKWISE );
  51     BOOL ret = ArcTo( dev->hdc, x - radius, y - radius, x + radius, y + radius, x1, y1, x2, y2 );
  52     SetArcDirection( dev->hdc, arcdir );
  53     return ret;
  54 }
  55
  56 BOOL nulldrv_ArcTo( PHYSDEV dev, INT left, INT top, INT right, INT bottom,
  57                     INT xstart, INT ystart, INT xend, INT yend )
  58 {
  59     INT width = abs( right - left );
  60     INT height = abs( bottom - top );
  61     double xradius = width / 2.0;
  62     double yradius = height / 2.0;
  63     double xcenter = right > left ? left + xradius : right + xradius;
  64     double ycenter = bottom > top ? top + yradius : bottom + yradius;
  65     double angle;
  66
  67     if (!height || !width) return FALSE;
  68     /* draw a line from the current position to the starting point of the arc, then draw the arc */
  69     angle = atan2( (ystart - ycenter) / height, (xstart - xcenter) / width );
  70     LineTo( dev->hdc, GDI_ROUND( xcenter + cos(angle) * xradius ),
  71             GDI_ROUND( ycenter + sin(angle) * yradius ));
  72     return Arc( dev->hdc, left, top, right, bottom, xstart, ystart, xend, yend );
  73 }
  74
  75 BOOL nulldrv_FillRgn( PHYSDEV dev, HRGN rgn, HBRUSH brush )
  76 {
  77     BOOL ret = FALSE;
  78     HBRUSH prev;
  79
  80     if ((prev = SelectObject( dev->hdc, brush )))
  81     {
  82         ret = PaintRgn( dev->hdc, rgn );
  83         SelectObject( dev->hdc, prev );
  84     }
  85     return ret;
  86 }
  87
  88 BOOL nulldrv_FrameRgn( PHYSDEV dev, HRGN rgn, HBRUSH brush, INT width, INT height )
  89 {
  90     BOOL ret = FALSE;
  91     HRGN tmp = CreateRectRgn( 0, 0, 0, 0 );
  92
  93     if (tmp)
  94     {
  95         if (REGION_FrameRgn( tmp, rgn, width, height )) ret = FillRgn( dev->hdc, tmp, brush );
  96         DeleteObject( tmp );
  97     }
  98     return ret;
  99 }
 100
 101 BOOL nulldrv_InvertRgn( PHYSDEV dev, HRGN rgn )
 102 {
 103     HBRUSH prev_brush = SelectObject( dev->hdc, GetStockObject(BLACK_BRUSH) );
 104     INT prev_rop = SetROP2( dev->hdc, R2_NOT );
 105     BOOL ret = PaintRgn( dev->hdc, rgn );
 106     SelectObject( dev->hdc, prev_brush );
 107     SetROP2( dev->hdc, prev_rop );
 108     return ret;
 109 }
 110
 111 BOOL nulldrv_PolyBezier( PHYSDEV dev, const POINT *points, DWORD count )
 112 {
 113     BOOL ret = FALSE;
 114     POINT *pts;
 115     INT n;
 116
 117     if ((pts = GDI_Bezier( points, count, &n )))
 118     {
 119         ret = Polyline( dev->hdc, pts, n );
 120         HeapFree( GetProcessHeap(), 0, pts );
 121     }
 122     return ret;
 123 }
 124
 125 BOOL nulldrv_PolyBezierTo( PHYSDEV dev, const POINT *points, DWORD count )
 126 {
 127     BOOL ret = FALSE;
 128     POINT *pts = HeapAlloc( GetProcessHeap(), 0, sizeof(POINT) * (count + 1) );
 129
 130     if (pts)
 131     {
 132         GetCurrentPositionEx( dev->hdc, &pts[0] );
 133         memcpy( pts + 1, points, sizeof(POINT) * count );
 134         ret = PolyBezier( dev->hdc, pts, count + 1 );
 135         HeapFree( GetProcessHeap(), 0, pts );
 136     }
 137     return ret;
 138 }
 139
 140 BOOL nulldrv_PolyDraw( PHYSDEV dev, const POINT *points, const BYTE *types, DWORD count )
 141 {
 142     POINT *line_pts = NULL, *bzr_pts = NULL, bzr[4];
 143     INT i, num_pts, num_bzr_pts, space, size;
 144
 145     /* check for valid point types */
 146     for (i = 0; i < count; i++)
 147     {
 148         switch (types[i])
 149         {
 150         case PT_MOVETO:
 151         case PT_LINETO | PT_CLOSEFIGURE:
 152         case PT_LINETO:
 153             break;
 154         case PT_BEZIERTO:
 155             if((i + 2 < count) && (types[i + 1] == PT_BEZIERTO) &&
 156                ((types[i + 2] & ~PT_CLOSEFIGURE) == PT_BEZIERTO))
 157             {
 158                 i += 2;
 159                 break;
 160             }
 161         default:
 162             return FALSE;
 163         }
 164     }
 165
 166     space = count + 300;
 167     line_pts = HeapAlloc( GetProcessHeap(), 0, space * sizeof(POINT) );
 168     num_pts = 1;
 169
 170     GetCurrentPositionEx( dev->hdc, &line_pts[0] );
 171     for (i = 0; i < count; i++)
 172     {
 173         switch (types[i])
 174         {
 175         case PT_MOVETO:
 176             if (num_pts >= 2) Polyline( dev->hdc, line_pts, num_pts );
 177             num_pts = 0;
 178             line_pts[num_pts++] = points[i];
 179             break;
 180         case PT_LINETO:
 181         case (PT_LINETO | PT_CLOSEFIGURE):
 182             line_pts[num_pts++] = points[i];
 183             break;
 184         case PT_BEZIERTO:
 185             bzr[0].x = line_pts[num_pts - 1].x;
 186             bzr[0].y = line_pts[num_pts - 1].y;
 187             memcpy( &bzr[1], &points[i], 3 * sizeof(POINT) );
 188
 189             if ((bzr_pts = GDI_Bezier( bzr, 4, &num_bzr_pts )))
 190             {
 191                 size = num_pts + (count - i) + num_bzr_pts;
 192                 if (space < size)
 193                 {
 194                     space = size * 2;
 195                     line_pts = HeapReAlloc( GetProcessHeap(), 0, line_pts, space * sizeof(POINT) );
 196                 }
 197                 memcpy( &line_pts[num_pts], &bzr_pts[1], (num_bzr_pts - 1) * sizeof(POINT) );
 198                 num_pts += num_bzr_pts - 1;
 199                 HeapFree( GetProcessHeap(), 0, bzr_pts );
 200             }
 201             i += 2;
 202             break;
 203         }
 204         if (types[i] & PT_CLOSEFIGURE) line_pts[num_pts++] = line_pts[0];
 205     }
 206
 207     if (num_pts >= 2) Polyline( dev->hdc, line_pts, num_pts );
 208     MoveToEx( dev->hdc, line_pts[num_pts - 1].x, line_pts[num_pts - 1].y, NULL );
 209     HeapFree( GetProcessHeap(), 0, line_pts );
 210     return TRUE;
 211 }
 212
 213 BOOL nulldrv_PolylineTo( PHYSDEV dev, const POINT *points, INT count )
 214 {
 215     BOOL ret = FALSE;
 216     POINT *pts;
 217
 218     if (!count) return FALSE;
 219     if ((pts = HeapAlloc( GetProcessHeap(), 0, sizeof(POINT) * (count + 1) )))
 220     {
 221         GetCurrentPositionEx( dev->hdc, &pts[0] );
 222         memcpy( pts + 1, points, sizeof(POINT) * count );
 223         ret = Polyline( dev->hdc, pts, count + 1 );
 224         HeapFree( GetProcessHeap(), 0, pts );
 225     }
 226     return ret;
 227 }
 228
 229 /***********************************************************************
 230  *           LineTo    (GDI32.@)
 231  */
 232 BOOL WINAPI LineTo( HDC hdc, INT x, INT y )
 233 {
 234     DC * dc = get_dc_ptr( hdc );
 235     PHYSDEV physdev;
 236     BOOL ret;
 237
 238     if(!dc) return FALSE;
 239
 240     update_dc( dc );
 241     physdev = GET_DC_PHYSDEV( dc, pLineTo );
 242     ret = physdev->funcs->pLineTo( physdev, x, y );
 243
 244     if(ret) {
 245         dc->CursPosX = x;
 246         dc->CursPosY = y;
 247     }
 248     release_dc_ptr( dc );
 249     return ret;
 250 }
 251
 252
 253 /***********************************************************************
 254  *           MoveToEx    (GDI32.@)
 255  */
 256 BOOL WINAPI MoveToEx( HDC hdc, INT x, INT y, LPPOINT pt )
 257 {
 258     BOOL ret;
 259     PHYSDEV physdev;
 260     DC * dc = get_dc_ptr( hdc );
 261
 262     if(!dc) return FALSE;
 263
 264     if(pt) {
 265         pt->x = dc->CursPosX;
 266         pt->y = dc->CursPosY;
 267     }
 268     dc->CursPosX = x;
 269     dc->CursPosY = y;
 270
 271     physdev = GET_DC_PHYSDEV( dc, pMoveTo );
 272     ret = physdev->funcs->pMoveTo( physdev, x, y );
 273     release_dc_ptr( dc );
 274     return ret;
 275 }
 276
 277
 278 /***********************************************************************
 279  *           Arc    (GDI32.@)
 280  */
 281 BOOL WINAPI Arc( HDC hdc, INT left, INT top, INT right,
 282                      INT bottom, INT xstart, INT ystart,
 283                      INT xend, INT yend )
 284 {
 285     BOOL ret = FALSE;
 286     DC * dc = get_dc_ptr( hdc );
 287
 288     if (dc)
 289     {
 290         PHYSDEV physdev = GET_DC_PHYSDEV( dc, pArc );
 291         update_dc( dc );
 292         ret = physdev->funcs->pArc( physdev, left, top, right, bottom, xstart, ystart, xend, yend );
 293         release_dc_ptr( dc );
 294     }
 295     return ret;
 296 }
 297
 298 /***********************************************************************
 299  *           ArcTo    (GDI32.@)
 300  */
 301 BOOL WINAPI ArcTo( HDC hdc,
 302                      INT left,   INT top,
 303                      INT right,  INT bottom,
 304                      INT xstart, INT ystart,
 305                      INT xend,   INT yend )
 306 {
 307     double width = fabs(right-left),
 308         height = fabs(bottom-top),
 309         xradius = width/2,
 310         yradius = height/2,
 311         xcenter = right > left ? left+xradius : right+xradius,
 312         ycenter = bottom > top ? top+yradius : bottom+yradius,
 313         angle;
 314     PHYSDEV physdev;
 315     BOOL result;
 316     DC * dc = get_dc_ptr( hdc );
 317     if(!dc) return FALSE;
 318
 319     update_dc( dc );
 320     physdev = GET_DC_PHYSDEV( dc, pArcTo );
 321     result = physdev->funcs->pArcTo( physdev, left, top, right, bottom, xstart, ystart, xend, yend );
 322
 323     if (result) {
 324         angle = atan2(((yend-ycenter)/height),
 325                       ((xend-xcenter)/width));
 326         dc->CursPosX = GDI_ROUND(xcenter+(cos(angle)*xradius));
 327         dc->CursPosY = GDI_ROUND(ycenter+(sin(angle)*yradius));
 328     }
 329     release_dc_ptr( dc );
 330     return result;
 331 }
 332
 333
 334 /***********************************************************************
 335  *           Pie   (GDI32.@)
 336  */
 337 BOOL WINAPI Pie( HDC hdc, INT left, INT top,
 338                      INT right, INT bottom, INT xstart, INT ystart,
 339                      INT xend, INT yend )
 340 {
 341     BOOL ret;
 342     PHYSDEV physdev;
 343     DC * dc = get_dc_ptr( hdc );
 344     if (!dc) return FALSE;
 345
 346     update_dc( dc );
 347     physdev = GET_DC_PHYSDEV( dc, pPie );
 348     ret = physdev->funcs->pPie( physdev, left, top, right, bottom, xstart, ystart, xend, yend );
 349     release_dc_ptr( dc );
 350     return ret;
 351 }
 352
 353
 354 /***********************************************************************
 355  *           Chord    (GDI32.@)
 356  */
 357 BOOL WINAPI Chord( HDC hdc, INT left, INT top,
 358                        INT right, INT bottom, INT xstart, INT ystart,
 359                        INT xend, INT yend )
 360 {
 361     BOOL ret;
 362     PHYSDEV physdev;
 363     DC * dc = get_dc_ptr( hdc );
 364     if (!dc) return FALSE;
 365
 366     update_dc( dc );
 367     physdev = GET_DC_PHYSDEV( dc, pChord );
 368     ret = physdev->funcs->pChord( physdev, left, top, right, bottom, xstart, ystart, xend, yend );
 369     release_dc_ptr( dc );
 370     return ret;
 371 }
 372
 373
 374 /***********************************************************************
 375  *           Ellipse    (GDI32.@)
 376  */
 377 BOOL WINAPI Ellipse( HDC hdc, INT left, INT top,
 378                          INT right, INT bottom )
 379 {
 380     BOOL ret;
 381     PHYSDEV physdev;
 382     DC * dc = get_dc_ptr( hdc );
 383     if (!dc) return FALSE;
 384
 385     update_dc( dc );
 386     physdev = GET_DC_PHYSDEV( dc, pEllipse );
 387     ret = physdev->funcs->pEllipse( physdev, left, top, right, bottom );
 388     release_dc_ptr( dc );
 389     return ret;
 390 }
 391
 392
 393 /***********************************************************************
 394  *           Rectangle    (GDI32.@)
 395  */
 396 BOOL WINAPI Rectangle( HDC hdc, INT left, INT top,
 397                            INT right, INT bottom )
 398 {
 399     BOOL ret = FALSE;
 400     DC * dc = get_dc_ptr( hdc );
 401
 402     if (dc)
 403     {
 404         PHYSDEV physdev = GET_DC_PHYSDEV( dc, pRectangle );
 405         update_dc( dc );
 406         ret = physdev->funcs->pRectangle( physdev, left, top, right, bottom );
 407         release_dc_ptr( dc );
 408     }
 409     return ret;
 410 }
 411
 412
 413 /***********************************************************************
 414  *           RoundRect    (GDI32.@)
 415  */
 416 BOOL WINAPI RoundRect( HDC hdc, INT left, INT top, INT right,
 417                            INT bottom, INT ell_width, INT ell_height )
 418 {
 419     BOOL ret = FALSE;
 420     DC *dc = get_dc_ptr( hdc );
 421
 422     if (dc)
 423     {
 424         PHYSDEV physdev = GET_DC_PHYSDEV( dc, pRoundRect );
 425         update_dc( dc );
 426         ret = physdev->funcs->pRoundRect( physdev, left, top, right, bottom, ell_width, ell_height );
 427         release_dc_ptr( dc );
 428     }
 429     return ret;
 430 }
 431
 432 /***********************************************************************
 433  *           SetPixel    (GDI32.@)
 434  */
 435 COLORREF WINAPI SetPixel( HDC hdc, INT x, INT y, COLORREF color )
 436 {
 437     COLORREF ret = 0;
 438     DC * dc = get_dc_ptr( hdc );
 439
 440     if (dc)
 441     {
 442         PHYSDEV physdev = GET_DC_PHYSDEV( dc, pSetPixel );
 443         update_dc( dc );
 444         ret = physdev->funcs->pSetPixel( physdev, x, y, color );
 445         release_dc_ptr( dc );
 446     }
 447     return ret;
 448 }
 449
 450 /***********************************************************************
 451  *           SetPixelV    (GDI32.@)
 452  */
 453 BOOL WINAPI SetPixelV( HDC hdc, INT x, INT y, COLORREF color )
 454 {
 455     BOOL ret = FALSE;
 456     DC * dc = get_dc_ptr( hdc );
 457
 458     if (dc)
 459     {
 460         PHYSDEV physdev = GET_DC_PHYSDEV( dc, pSetPixel );
 461         update_dc( dc );
 462         physdev->funcs->pSetPixel( physdev, x, y, color );
 463         ret = TRUE;
 464         release_dc_ptr( dc );
 465     }
 466     return ret;
 467 }
 468
 469 /***********************************************************************
 470  *           GetPixel    (GDI32.@)
 471  */
 472 COLORREF WINAPI GetPixel( HDC hdc, INT x, INT y )
 473 {
 474     COLORREF ret = CLR_INVALID;
 475     DC * dc = get_dc_ptr( hdc );
 476
 477     if (dc)
 478     {
 479         PHYSDEV physdev = GET_DC_PHYSDEV( dc, pGetPixel );
 480         update_dc( dc );
 481         ret = physdev->funcs->pGetPixel( physdev, x, y );
 482         release_dc_ptr( dc );
 483     }
 484     return ret;
 485 }
 486
 487
 488 /******************************************************************************
 489  * SetPixelFormat [GDI32.@]
 490  * Sets pixel format of device context
 491  *
 492  * PARAMS
 493  *    hdc          [I] Device context to search for best pixel match
 494  *    iPixelFormat [I] Pixel format index
 495  *    ppfd         [I] Pixel format for which a match is sought
 496  *
 497  * RETURNS
 498  *    Success: TRUE
 499  *    Failure: FALSE
 500  */
 501 BOOL WINAPI SetPixelFormat( HDC hdc, INT iPixelFormat,
 502                             const PIXELFORMATDESCRIPTOR *ppfd)
 503 {
 504     INT bRet = FALSE;
 505     DC * dc = get_dc_ptr( hdc );
 506
 507     TRACE("(%p,%d,%p)\n",hdc,iPixelFormat,ppfd);
 508
 509     if (dc)
 510     {
 511         PHYSDEV physdev = GET_DC_PHYSDEV( dc, pSetPixelFormat );
 512         update_dc( dc );
 513         bRet = physdev->funcs->pSetPixelFormat( physdev, iPixelFormat, ppfd );
 514         release_dc_ptr( dc );
 515     }
 516     return bRet;
 517 }
 518
 519
 520 /******************************************************************************
 521  * GetPixelFormat [GDI32.@]
 522  * Gets index of pixel format of DC
 523  *
 524  * PARAMETERS
 525  *    hdc [I] Device context whose pixel format index is sought
 526  *
 527  * RETURNS
 528  *    Success: Currently selected pixel format
 529  *    Failure: 0
 530  */
 531 INT WINAPI GetPixelFormat( HDC hdc )
 532 {
 533     INT ret = 0;
 534     DC * dc = get_dc_ptr( hdc );
 535
 536     TRACE("(%p)\n",hdc);
 537
 538     if (dc)
 539     {
 540         PHYSDEV physdev = GET_DC_PHYSDEV( dc, pGetPixelFormat );
 541         update_dc( dc );
 542         ret = physdev->funcs->pGetPixelFormat( physdev );
 543         release_dc_ptr( dc );
 544     }
 545     return ret;
 546 }
 547
 548
 549 /******************************************************************************
 550  * GdiDescribePixelFormat [GDI32.@]
 551  *
 552  * Probably not the correct semantics, it's supposed to be an internal backend for DescribePixelFormat.
 553  */
 554 INT WINAPI GdiDescribePixelFormat( HDC hdc, INT iPixelFormat, UINT nBytes,
 555                                    LPPIXELFORMATDESCRIPTOR ppfd )
 556 {
 557     INT ret = 0;
 558     DC * dc = get_dc_ptr( hdc );
 559
 560     TRACE("(%p,%d,%d,%p): stub\n",hdc,iPixelFormat,nBytes,ppfd);
 561
 562     if (dc)
 563     {
 564         PHYSDEV physdev = GET_DC_PHYSDEV( dc, pDescribePixelFormat );
 565         update_dc( dc );
 566         ret = physdev->funcs->pDescribePixelFormat( physdev, iPixelFormat, nBytes, ppfd );
 567         release_dc_ptr( dc );
 568     }
 569     return ret;
 570 }
 571
 572
 573 /******************************************************************************
 574  * SwapBuffers [GDI32.@]
 575  * Exchanges front and back buffers of window
 576  *
 577  * PARAMS
 578  *    hdc [I] Device context whose buffers get swapped
 579  *
 580  * RETURNS
 581  *    Success: TRUE
 582  *    Failure: FALSE
 583  */
 584 BOOL WINAPI SwapBuffers( HDC hdc )
 585 {
 586     INT bRet = FALSE;
 587     DC * dc = get_dc_ptr( hdc );
 588
 589     TRACE("(%p)\n",hdc);
 590
 591     if (dc)
 592     {
 593         PHYSDEV physdev = GET_DC_PHYSDEV( dc, pSwapBuffers );
 594         update_dc( dc );
 595         bRet = physdev->funcs->pSwapBuffers( physdev );
 596         release_dc_ptr( dc );
 597     }
 598     return bRet;
 599 }
 600
 601
 602 /***********************************************************************
 603  *           PaintRgn    (GDI32.@)
 604  */
 605 BOOL WINAPI PaintRgn( HDC hdc, HRGN hrgn )
 606 {
 607     BOOL ret = FALSE;
 608     DC * dc = get_dc_ptr( hdc );
 609
 610     if (dc)
 611     {
 612         PHYSDEV physdev = GET_DC_PHYSDEV( dc, pPaintRgn );
 613         update_dc( dc );
 614         ret = physdev->funcs->pPaintRgn( physdev, hrgn );
 615         release_dc_ptr( dc );
 616     }
 617     return ret;
 618 }
 619
 620
 621 /***********************************************************************
 622  *           FillRgn    (GDI32.@)
 623  */
 624 BOOL WINAPI FillRgn( HDC hdc, HRGN hrgn, HBRUSH hbrush )
 625 {
 626     BOOL retval = FALSE;
 627     DC * dc = get_dc_ptr( hdc );
 628
 629     if (dc)
 630     {
 631         PHYSDEV physdev = GET_DC_PHYSDEV( dc, pFillRgn );
 632         update_dc( dc );
 633         retval = physdev->funcs->pFillRgn( physdev, hrgn, hbrush );
 634         release_dc_ptr( dc );
 635     }
 636     return retval;
 637 }
 638
 639
 640 /***********************************************************************
 641  *           FrameRgn     (GDI32.@)
 642  */
 643 BOOL WINAPI FrameRgn( HDC hdc, HRGN hrgn, HBRUSH hbrush,
 644                           INT nWidth, INT nHeight )
 645 {
 646     BOOL ret = FALSE;
 647     DC *dc = get_dc_ptr( hdc );
 648
 649     if (dc)
 650     {
 651         PHYSDEV physdev = GET_DC_PHYSDEV( dc, pFrameRgn );
 652         update_dc( dc );
 653         ret = physdev->funcs->pFrameRgn( physdev, hrgn, hbrush, nWidth, nHeight );
 654         release_dc_ptr( dc );
 655     }
 656     return ret;
 657 }
 658
 659
 660 /***********************************************************************
 661  *           InvertRgn    (GDI32.@)
 662  */
 663 BOOL WINAPI InvertRgn( HDC hdc, HRGN hrgn )
 664 {
 665     BOOL ret = FALSE;
 666     DC *dc = get_dc_ptr( hdc );
 667
 668     if (dc)
 669     {
 670         PHYSDEV physdev = GET_DC_PHYSDEV( dc, pInvertRgn );
 671         update_dc( dc );
 672         ret = physdev->funcs->pInvertRgn( physdev, hrgn );
 673         release_dc_ptr( dc );
 674     }
 675     return ret;
 676 }
 677
 678
 679 /**********************************************************************
 680  *          Polyline   (GDI32.@)
 681  */
 682 BOOL WINAPI Polyline( HDC hdc, const POINT* pt, INT count )
 683 {
 684     BOOL ret = FALSE;
 685     DC * dc = get_dc_ptr( hdc );
 686
 687     if (dc)
 688     {
 689         PHYSDEV physdev = GET_DC_PHYSDEV( dc, pPolyline );
 690         update_dc( dc );
 691         ret = physdev->funcs->pPolyline( physdev, pt, count );
 692         release_dc_ptr( dc );
 693     }
 694     return ret;
 695 }
 696
 697 /**********************************************************************
 698  *          PolylineTo   (GDI32.@)
 699  */
 700 BOOL WINAPI PolylineTo( HDC hdc, const POINT* pt, DWORD cCount )
 701 {
 702     DC * dc = get_dc_ptr( hdc );
 703     PHYSDEV physdev;
 704     BOOL ret;
 705
 706     if(!dc) return FALSE;
 707
 708     update_dc( dc );
 709     physdev = GET_DC_PHYSDEV( dc, pPolylineTo );
 710     ret = physdev->funcs->pPolylineTo( physdev, pt, cCount );
 711
 712     if (ret && cCount)
 713     {
 714         dc->CursPosX = pt[cCount-1].x;
 715         dc->CursPosY = pt[cCount-1].y;
 716     }
 717     release_dc_ptr( dc );
 718     return ret;
 719 }
 720
 721
 722 /**********************************************************************
 723  *          Polygon  (GDI32.@)
 724  */
 725 BOOL WINAPI Polygon( HDC hdc, const POINT* pt, INT count )
 726 {
 727     BOOL ret = FALSE;
 728     DC * dc = get_dc_ptr( hdc );
 729
 730     if (dc)
 731     {
 732         PHYSDEV physdev = GET_DC_PHYSDEV( dc, pPolygon );
 733         update_dc( dc );
 734         ret = physdev->funcs->pPolygon( physdev, pt, count );
 735         release_dc_ptr( dc );
 736     }
 737     return ret;
 738 }
 739
 740
 741 /**********************************************************************
 742  *          PolyPolygon  (GDI32.@)
 743  */
 744 BOOL WINAPI PolyPolygon( HDC hdc, const POINT* pt, const INT* counts,
 745                              UINT polygons )
 746 {
 747     BOOL ret = FALSE;
 748     DC * dc = get_dc_ptr( hdc );
 749
 750     if (dc)
 751     {
 752         PHYSDEV physdev = GET_DC_PHYSDEV( dc, pPolyPolygon );
 753         update_dc( dc );
 754         ret = physdev->funcs->pPolyPolygon( physdev, pt, counts, polygons );
 755         release_dc_ptr( dc );
 756     }
 757     return ret;
 758 }
 759
 760 /**********************************************************************
 761  *          PolyPolyline  (GDI32.@)
 762  */
 763 BOOL WINAPI PolyPolyline( HDC hdc, const POINT* pt, const DWORD* counts,
 764                             DWORD polylines )
 765 {
 766     BOOL ret = FALSE;
 767     DC * dc = get_dc_ptr( hdc );
 768
 769     if (dc)
 770     {
 771         PHYSDEV physdev = GET_DC_PHYSDEV( dc, pPolyPolyline );
 772         update_dc( dc );
 773         ret = physdev->funcs->pPolyPolyline( physdev, pt, counts, polylines );
 774         release_dc_ptr( dc );
 775     }
 776     return ret;
 777 }
 778
 779 /**********************************************************************
 780  *          ExtFloodFill   (GDI32.@)
 781  */
 782 BOOL WINAPI ExtFloodFill( HDC hdc, INT x, INT y, COLORREF color,
 783                               UINT fillType )
 784 {
 785     BOOL ret = FALSE;
 786     DC * dc = get_dc_ptr( hdc );
 787
 788     if (dc)
 789     {
 790         PHYSDEV physdev = GET_DC_PHYSDEV( dc, pExtFloodFill );
 791
 792         update_dc( dc );
 793         ret = physdev->funcs->pExtFloodFill( physdev, x, y, color, fillType );
 794         release_dc_ptr( dc );
 795     }
 796     return ret;
 797 }
 798
 799
 800 /**********************************************************************
 801  *          FloodFill   (GDI32.@)
 802  */
 803 BOOL WINAPI FloodFill( HDC hdc, INT x, INT y, COLORREF color )
 804 {
 805     return ExtFloodFill( hdc, x, y, color, FLOODFILLBORDER );
 806 }
 807
 808
 809 /******************************************************************************
 810  * PolyBezier [GDI32.@]
 811  * Draws one or more Bezier curves
 812  *
 813  * PARAMS
 814  *    hDc     [I] Handle to device context
 815  *    lppt    [I] Pointer to endpoints and control points
 816  *    cPoints [I] Count of endpoints and control points
 817  *
 818  * RETURNS
 819  *    Success: TRUE
 820  *    Failure: FALSE
 821  */
 822 BOOL WINAPI PolyBezier( HDC hdc, const POINT* lppt, DWORD cPoints )
 823 {
 824     PHYSDEV physdev;
 825     BOOL ret;
 826     DC * dc;
 827
 828     /* cPoints must be 3 * n + 1 (where n>=1) */
 829     if (cPoints == 1 || (cPoints % 3) != 1) return FALSE;
 830
 831     dc = get_dc_ptr( hdc );
 832     if(!dc) return FALSE;
 833
 834     update_dc( dc );
 835     physdev = GET_DC_PHYSDEV( dc, pPolyBezier );
 836     ret = physdev->funcs->pPolyBezier( physdev, lppt, cPoints );
 837     release_dc_ptr( dc );
 838     return ret;
 839 }
 840
 841 /******************************************************************************
 842  * PolyBezierTo [GDI32.@]
 843  * Draws one or more Bezier curves
 844  *
 845  * PARAMS
 846  *    hDc     [I] Handle to device context
 847  *    lppt    [I] Pointer to endpoints and control points
 848  *    cPoints [I] Count of endpoints and control points
 849  *
 850  * RETURNS
 851  *    Success: TRUE
 852  *    Failure: FALSE
 853  */
 854 BOOL WINAPI PolyBezierTo( HDC hdc, const POINT* lppt, DWORD cPoints )
 855 {
 856     DC * dc;
 857     BOOL ret;
 858     PHYSDEV physdev;
 859
 860     /* cbPoints must be 3 * n (where n>=1) */
 861     if (!cPoints || (cPoints % 3) != 0) return FALSE;
 862
 863     dc = get_dc_ptr( hdc );
 864     if(!dc) return FALSE;
 865
 866     update_dc( dc );
 867     physdev = GET_DC_PHYSDEV( dc, pPolyBezierTo );
 868     ret = physdev->funcs->pPolyBezierTo( physdev, lppt, cPoints );
 869
 870     if(ret) {
 871         dc->CursPosX = lppt[cPoints-1].x;
 872         dc->CursPosY = lppt[cPoints-1].y;
 873     }
 874     release_dc_ptr( dc );
 875     return ret;
 876 }
 877
 878 /***********************************************************************
 879  *      AngleArc (GDI32.@)
 880  */
 881 BOOL WINAPI AngleArc(HDC hdc, INT x, INT y, DWORD dwRadius, FLOAT eStartAngle, FLOAT eSweepAngle)
 882 {
 883     PHYSDEV physdev;
 884     BOOL result;
 885     DC *dc;
 886
 887     if( (signed int)dwRadius < 0 )
 888         return FALSE;
 889
 890     dc = get_dc_ptr( hdc );
 891     if(!dc) return FALSE;
 892
 893     update_dc( dc );
 894     physdev = GET_DC_PHYSDEV( dc, pAngleArc );
 895     result = physdev->funcs->pAngleArc( physdev, x, y, dwRadius, eStartAngle, eSweepAngle );
 896
 897     if (result) {
 898         dc->CursPosX = GDI_ROUND( x + cos((eStartAngle+eSweepAngle)*M_PI/180) * dwRadius );
 899         dc->CursPosY = GDI_ROUND( y - sin((eStartAngle+eSweepAngle)*M_PI/180) * dwRadius );
 900     }
 901     release_dc_ptr( dc );
 902     return result;
 903 }
 904
 905 /***********************************************************************
 906  *      PolyDraw (GDI32.@)
 907  */
 908 BOOL WINAPI PolyDraw(HDC hdc, const POINT *lppt, const BYTE *lpbTypes,
 909                        DWORD cCount)
 910 {
 911     DC *dc = get_dc_ptr( hdc );
 912     PHYSDEV physdev;
 913     BOOL result;
 914
 915     if(!dc) return FALSE;
 916
 917     update_dc( dc );
 918     physdev = GET_DC_PHYSDEV( dc, pPolyDraw );
 919     result = physdev->funcs->pPolyDraw( physdev, lppt, lpbTypes, cCount );
 920     release_dc_ptr( dc );
 921     return result;
 922 }
 923
 924
 925 /**********************************************************************
 926  *           LineDDA   (GDI32.@)
 927  */
 928 BOOL WINAPI LineDDA(INT nXStart, INT nYStart, INT nXEnd, INT nYEnd,
 929                     LINEDDAPROC callback, LPARAM lParam )
 930 {
 931     INT xadd = 1, yadd = 1;
 932     INT err,erradd;
 933     INT cnt;
 934     INT dx = nXEnd - nXStart;
 935     INT dy = nYEnd - nYStart;
 936
 937     if (dx < 0)
 938     {
 939         dx = -dx;
 940         xadd = -1;
 941     }
 942     if (dy < 0)
 943     {
 944         dy = -dy;
 945         yadd = -1;
 946     }
 947     if (dx > dy)  /* line is "more horizontal" */
 948     {
 949         err = 2*dy - dx; erradd = 2*dy - 2*dx;
 950         for(cnt = 0;cnt < dx; cnt++)
 951         {
 952             callback(nXStart,nYStart,lParam);
 953             if (err > 0)
 954             {
 955                 nYStart += yadd;
 956                 err += erradd;
 957             }
 958             else err += 2*dy;
 959             nXStart += xadd;
 960         }
 961     }
 962     else   /* line is "more vertical" */
 963     {
 964         err = 2*dx - dy; erradd = 2*dx - 2*dy;
 965         for(cnt = 0;cnt < dy; cnt++)
 966         {
 967             callback(nXStart,nYStart,lParam);
 968             if (err > 0)
 969             {
 970                 nXStart += xadd;
 971                 err += erradd;
 972             }
 973             else err += 2*dx;
 974             nYStart += yadd;
 975         }
 976     }
 977     return TRUE;
 978 }
 979
 980
 981 /******************************************************************
 982  *
 983  *   *Very* simple bezier drawing code,
 984  *
 985  *   It uses a recursive algorithm to divide the curve in a series
 986  *   of straight line segments. Not ideal but sufficient for me.
 987  *   If you are in need for something better look for some incremental
 988  *   algorithm.
 989  *
 990  *   7 July 1998 Rein Klazes
 991  */
 992
 993  /*
 994   * some macro definitions for bezier drawing
 995   *
 996   * to avoid truncation errors the coordinates are
 997   * shifted upwards. When used in drawing they are
 998   * shifted down again, including correct rounding
 999   * and avoiding floating point arithmetic
1000   * 4 bits should allow 27 bits coordinates which I saw
1001   * somewhere in the win32 doc's
1002   *
1003   */
1004
1005 #define BEZIERSHIFTBITS 4
1006 #define BEZIERSHIFTUP(x)    ((x)<<BEZIERSHIFTBITS)
1007 #define BEZIERPIXEL        BEZIERSHIFTUP(1)
1008 #define BEZIERSHIFTDOWN(x)  (((x)+(1<<(BEZIERSHIFTBITS-1)))>>BEZIERSHIFTBITS)
1009 /* maximum depth of recursion */
1010 #define BEZIERMAXDEPTH  8
1011
1012 /* size of array to store points on */
1013 /* enough for one curve */
1014 #define BEZIER_INITBUFSIZE    (150)
1015
1016 /* calculate Bezier average, in this case the middle
1017  * correctly rounded...
1018  * */
1019
1020 #define BEZIERMIDDLE(Mid, P1, P2) \
1021     (Mid).x=((P1).x+(P2).x + 1)/2;\
1022     (Mid).y=((P1).y+(P2).y + 1)/2;
1023
1024 /**********************************************************
1025 * BezierCheck helper function to check
1026 * that recursion can be terminated
1027 *       Points[0] and Points[3] are begin and endpoint
1028 *       Points[1] and Points[2] are control points
1029 *       level is the recursion depth
1030 *       returns true if the recursion can be terminated
1031 */
1032 static BOOL BezierCheck( int level, POINT *Points)
1033 {
1034     INT dx, dy;
1035     dx=Points[3].x-Points[0].x;
1036     dy=Points[3].y-Points[0].y;
1037     if(abs(dy)<=abs(dx)){/* shallow line */
1038         /* check that control points are between begin and end */
1039         if(Points[1].x < Points[0].x){
1040             if(Points[1].x < Points[3].x)
1041                 return FALSE;
1042         }else
1043             if(Points[1].x > Points[3].x)
1044                 return FALSE;
1045         if(Points[2].x < Points[0].x){
1046             if(Points[2].x < Points[3].x)
1047                 return FALSE;
1048         }else
1049             if(Points[2].x > Points[3].x)
1050                 return FALSE;
1051         dx=BEZIERSHIFTDOWN(dx);
1052         if(!dx) return TRUE;
1053         if(abs(Points[1].y-Points[0].y-(dy/dx)*
1054                 BEZIERSHIFTDOWN(Points[1].x-Points[0].x)) > BEZIERPIXEL ||
1055            abs(Points[2].y-Points[0].y-(dy/dx)*
1056                    BEZIERSHIFTDOWN(Points[2].x-Points[0].x)) > BEZIERPIXEL )
1057             return FALSE;
1058         else
1059             return TRUE;
1060     }else{ /* steep line */
1061         /* check that control points are between begin and end */
1062         if(Points[1].y < Points[0].y){
1063             if(Points[1].y < Points[3].y)
1064                 return FALSE;
1065         }else
1066             if(Points[1].y > Points[3].y)
1067                 return FALSE;
1068         if(Points[2].y < Points[0].y){
1069             if(Points[2].y < Points[3].y)
1070                 return FALSE;
1071         }else
1072             if(Points[2].y > Points[3].y)
1073                 return FALSE;
1074         dy=BEZIERSHIFTDOWN(dy);
1075         if(!dy) return TRUE;
1076         if(abs(Points[1].x-Points[0].x-(dx/dy)*
1077                 BEZIERSHIFTDOWN(Points[1].y-Points[0].y)) > BEZIERPIXEL ||
1078            abs(Points[2].x-Points[0].x-(dx/dy)*
1079                    BEZIERSHIFTDOWN(Points[2].y-Points[0].y)) > BEZIERPIXEL )
1080             return FALSE;
1081         else
1082             return TRUE;
1083     }
1084 }
1085
1086 /* Helper for GDI_Bezier.
1087  * Just handles one Bezier, so Points should point to four POINTs
1088  */
1089 static void GDI_InternalBezier( POINT *Points, POINT **PtsOut, INT *dwOut,
1090                                 INT *nPtsOut, INT level )
1091 {
1092     if(*nPtsOut == *dwOut) {
1093         *dwOut *= 2;
1094         *PtsOut = HeapReAlloc( GetProcessHeap(), 0, *PtsOut,
1095                                *dwOut * sizeof(POINT) );
1096     }
1097
1098     if(!level || BezierCheck(level, Points)) {
1099         if(*nPtsOut == 0) {
1100             (*PtsOut)[0].x = BEZIERSHIFTDOWN(Points[0].x);
1101             (*PtsOut)[0].y = BEZIERSHIFTDOWN(Points[0].y);
1102             *nPtsOut = 1;
1103         }
1104         (*PtsOut)[*nPtsOut].x = BEZIERSHIFTDOWN(Points[3].x);
1105         (*PtsOut)[*nPtsOut].y = BEZIERSHIFTDOWN(Points[3].y);
1106         (*nPtsOut) ++;
1107     } else {
1108         POINT Points2[4]; /* for the second recursive call */
1109         Points2[3]=Points[3];
1110         BEZIERMIDDLE(Points2[2], Points[2], Points[3]);
1111         BEZIERMIDDLE(Points2[0], Points[1], Points[2]);
1112         BEZIERMIDDLE(Points2[1],Points2[0],Points2[2]);
1113
1114         BEZIERMIDDLE(Points[1], Points[0],  Points[1]);
1115         BEZIERMIDDLE(Points[2], Points[1], Points2[0]);
1116         BEZIERMIDDLE(Points[3], Points[2], Points2[1]);
1117
1118         Points2[0]=Points[3];
1119
1120         /* do the two halves */
1121         GDI_InternalBezier(Points, PtsOut, dwOut, nPtsOut, level-1);
1122         GDI_InternalBezier(Points2, PtsOut, dwOut, nPtsOut, level-1);
1123     }
1124 }
1125
1126
1127
1128 /***********************************************************************
1129  *           GDI_Bezier   [INTERNAL]
1130  *   Calculate line segments that approximate -what microsoft calls- a bezier
1131  *   curve.
1132  *   The routine recursively divides the curve in two parts until a straight
1133  *   line can be drawn
1134  *
1135  *  PARAMS
1136  *
1137  *  Points  [I] Ptr to count POINTs which are the end and control points
1138  *              of the set of Bezier curves to flatten.
1139  *  count   [I] Number of Points.  Must be 3n+1.
1140  *  nPtsOut [O] Will contain no of points that have been produced (i.e. no. of
1141  *              lines+1).
1142  *
1143  *  RETURNS
1144  *
1145  *  Ptr to an array of POINTs that contain the lines that approximate the
1146  *  Beziers.  The array is allocated on the process heap and it is the caller's
1147  *  responsibility to HeapFree it. [this is not a particularly nice interface
1148  *  but since we can't know in advance how many points we will generate, the
1149  *  alternative would be to call the function twice, once to determine the size
1150  *  and a second time to do the work - I decided this was too much of a pain].
1151  */
1152 POINT *GDI_Bezier( const POINT *Points, INT count, INT *nPtsOut )
1153 {
1154     POINT *out;
1155     INT Bezier, dwOut = BEZIER_INITBUFSIZE, i;
1156
1157     if (count == 1 || (count - 1) % 3 != 0) {
1158         ERR("Invalid no. of points %d\n", count);
1159         return NULL;
1160     }
1161     *nPtsOut = 0;
1162     out = HeapAlloc( GetProcessHeap(), 0, dwOut * sizeof(POINT));
1163     for(Bezier = 0; Bezier < (count-1)/3; Bezier++) {
1164         POINT ptBuf[4];
1165         memcpy(ptBuf, Points + Bezier * 3, sizeof(POINT) * 4);
1166         for(i = 0; i < 4; i++) {
1167             ptBuf[i].x = BEZIERSHIFTUP(ptBuf[i].x);
1168             ptBuf[i].y = BEZIERSHIFTUP(ptBuf[i].y);
1169         }
1170         GDI_InternalBezier( ptBuf, &out, &dwOut, nPtsOut, BEZIERMAXDEPTH );
1171     }
1172     TRACE("Produced %d points\n", *nPtsOut);
1173     return out;
1174 }
1175
1176 /******************************************************************************
1177  *           GdiGradientFill   (GDI32.@)
1178  */
1179 BOOL WINAPI GdiGradientFill( HDC hdc, TRIVERTEX *vert_array, ULONG nvert,
1180                              void *grad_array, ULONG ngrad, ULONG mode )
1181 {
1182     DC *dc;
1183     PHYSDEV physdev;
1184     BOOL ret;
1185     ULONG i;
1186
1187     TRACE("%p vert_array:%p nvert:%d grad_array:%p ngrad:%d\n", hdc, vert_array, nvert, grad_array, ngrad);
1188
1189     if (!vert_array || !nvert || !grad_array || !ngrad || mode > GRADIENT_FILL_TRIANGLE)
1190     {
1191         SetLastError( ERROR_INVALID_PARAMETER );
1192         return FALSE;
1193     }
1194     for (i = 0; i < ngrad * (mode == GRADIENT_FILL_TRIANGLE ? 3 : 2); i++)
1195         if (((ULONG *)grad_array)[i] >= nvert) return FALSE;
1196
1197     if (!(dc = get_dc_ptr( hdc )))
1198     {
1199         SetLastError( ERROR_INVALID_PARAMETER );
1200         return FALSE;
1201     }
1202     update_dc( dc );
1203     physdev = GET_DC_PHYSDEV( dc, pGradientFill );
1204     ret = physdev->funcs->pGradientFill( physdev, vert_array, nvert, grad_array, ngrad, mode );
1205     release_dc_ptr( dc );
1206     return ret;
1207 }
1208
1209 /******************************************************************************
1210  *           GdiDrawStream   (GDI32.@)
1211  *
1212  */
1213 BOOL WINAPI GdiDrawStream( HDC hdc, ULONG in, void * pvin )
1214 {
1215     FIXME("stub: %p, %d, %p\n", hdc, in, pvin);
1216     return FALSE;
1217 }