dlls/gdi/dc.c

   1 /*
   2  * GDI Device Context functions
   3  *
   4  * Copyright 1993 Alexandre Julliard
   5  *
   6  * This library is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU Lesser General Public
   8  * License as published by the Free Software Foundation; either
   9  * version 2.1 of the License, or (at your option) any later version.
  10  *
  11  * This library is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * Lesser General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Lesser General Public
  17  * License along with this library; if not, write to the Free Software
  18  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  19  */
  20
  21 #include "config.h"
  22
  23 #include <stdarg.h>
  24 #include <stdlib.h>
  25 #include <string.h>
  26 #include "windef.h"
  27 #include "winbase.h"
  28 #include "wingdi.h"
  29 #include "winreg.h"
  30 #include "winternl.h"
  31 #include "winerror.h"
  32 #include "wownt32.h"
  33 #include "wine/winuser16.h"
  34 #include "gdi.h"
  35 #include "gdi_private.h"
  36 #include "wine/unicode.h"
  37 #include "wine/debug.h"
  38
  39 WINE_DEFAULT_DEBUG_CHANNEL(dc);
  40
  41 static BOOL DC_DeleteObject( HGDIOBJ handle, void *obj );
  42
  43 static const struct gdi_obj_funcs dc_funcs =
  44 {
  45     NULL,             /* pSelectObject */
  46     NULL,             /* pGetObject16 */
  47     NULL,             /* pGetObjectA */
  48     NULL,             /* pGetObjectW */
  49     NULL,             /* pUnrealizeObject */
  50     DC_DeleteObject   /* pDeleteObject */
  51 };
  52
  53 /***********************************************************************
  54  *           DC_AllocDC
  55  */
  56 DC *DC_AllocDC( const DC_FUNCTIONS *funcs, WORD magic )
  57 {
  58     HDC hdc;
  59     DC *dc;
  60
  61     if (!(dc = GDI_AllocObject( sizeof(*dc), magic, (HGDIOBJ*)&hdc, &dc_funcs ))) return NULL;
  62
  63     dc->hSelf               = hdc;
  64     dc->funcs               = funcs;
  65     dc->physDev             = NULL;
  66     dc->saveLevel           = 0;
  67     dc->dwHookData          = 0;
  68     dc->hookProc            = NULL;
  69     dc->hookThunk           = NULL;
  70     dc->wndOrgX             = 0;
  71     dc->wndOrgY             = 0;
  72     dc->wndExtX             = 1;
  73     dc->wndExtY             = 1;
  74     dc->vportOrgX           = 0;
  75     dc->vportOrgY           = 0;
  76     dc->vportExtX           = 1;
  77     dc->vportExtY           = 1;
  78     dc->flags               = 0;
  79     dc->hClipRgn            = 0;
  80     dc->hVisRgn             = 0;
  81     dc->hPen                = GetStockObject( BLACK_PEN );
  82     dc->hBrush              = GetStockObject( WHITE_BRUSH );
  83     dc->hFont               = GetStockObject( SYSTEM_FONT );
  84     dc->hBitmap             = 0;
  85     dc->hDevice             = 0;
  86     dc->hPalette            = GetStockObject( DEFAULT_PALETTE );
  87     dc->gdiFont             = 0;
  88     dc->ROPmode             = R2_COPYPEN;
  89     dc->polyFillMode        = ALTERNATE;
  90     dc->stretchBltMode      = BLACKONWHITE;
  91     dc->relAbsMode          = ABSOLUTE;
  92     dc->backgroundMode      = OPAQUE;
  93     dc->backgroundColor     = RGB( 255, 255, 255 );
  94     dc->dcBrushColor        = RGB( 255, 255, 255 );
  95     dc->dcPenColor          = RGB( 0, 0, 0 );
  96     dc->textColor           = RGB( 0, 0, 0 );
  97     dc->brushOrgX           = 0;
  98     dc->brushOrgY           = 0;
  99     dc->textAlign           = TA_LEFT | TA_TOP | TA_NOUPDATECP;
 100     dc->charExtra           = 0;
 101     dc->breakExtra          = 0;
 102     dc->breakRem            = 0;
 103     dc->MapMode             = MM_TEXT;
 104     dc->GraphicsMode        = GM_COMPATIBLE;
 105     dc->pAbortProc          = NULL;
 106     dc->CursPosX            = 0;
 107     dc->CursPosY            = 0;
 108     dc->ArcDirection        = AD_COUNTERCLOCKWISE;
 109     dc->xformWorld2Wnd.eM11 = 1.0f;
 110     dc->xformWorld2Wnd.eM12 = 0.0f;
 111     dc->xformWorld2Wnd.eM21 = 0.0f;
 112     dc->xformWorld2Wnd.eM22 = 1.0f;
 113     dc->xformWorld2Wnd.eDx  = 0.0f;
 114     dc->xformWorld2Wnd.eDy  = 0.0f;
 115     dc->xformWorld2Vport    = dc->xformWorld2Wnd;
 116     dc->xformVport2World    = dc->xformWorld2Wnd;
 117     dc->vport2WorldValid    = TRUE;
 118     dc->BoundsRect.left     = 0;
 119     dc->BoundsRect.top      = 0;
 120     dc->BoundsRect.right    = 0;
 121     dc->BoundsRect.bottom   = 0;
 122     PATH_InitGdiPath(&dc->path);
 123     return dc;
 124 }
 125
 126
 127
 128 /***********************************************************************
 129  *           DC_GetDCPtr
 130  */
 131 DC *DC_GetDCPtr( HDC hdc )
 132 {
 133     GDIOBJHDR *ptr = GDI_GetObjPtr( hdc, MAGIC_DONTCARE );
 134     if (!ptr) return NULL;
 135     if ((GDIMAGIC(ptr->wMagic) == DC_MAGIC) ||
 136         (GDIMAGIC(ptr->wMagic) == MEMORY_DC_MAGIC) ||
 137         (GDIMAGIC(ptr->wMagic) == METAFILE_DC_MAGIC) ||
 138         (GDIMAGIC(ptr->wMagic) == ENHMETAFILE_DC_MAGIC))
 139         return (DC *)ptr;
 140     GDI_ReleaseObj( hdc );
 141     SetLastError( ERROR_INVALID_HANDLE );
 142     return NULL;
 143 }
 144
 145 /***********************************************************************
 146  *           DC_GetDCUpdate
 147  *
 148  * Retrieve a DC ptr while making sure the visRgn is updated.
 149  * This function may call up to USER so the GDI lock should _not_
 150  * be held when calling it.
 151  */
 152 DC *DC_GetDCUpdate( HDC hdc )
 153 {
 154     DC *dc = DC_GetDCPtr( hdc );
 155     if (!dc) return NULL;
 156     while (dc->flags & DC_DIRTY)
 157     {
 158         DCHOOKPROC proc = dc->hookThunk;
 159         dc->flags &= ~DC_DIRTY;
 160         if (proc)
 161         {
 162             DWORD data = dc->dwHookData;
 163             GDI_ReleaseObj( hdc );
 164             proc( HDC_16(hdc), DCHC_INVALIDVISRGN, data, 0 );
 165             if (!(dc = DC_GetDCPtr( hdc ))) break;
 166             /* otherwise restart the loop in case it became dirty again in the meantime */
 167         }
 168     }
 169     return dc;
 170 }
 171
 172
 173 /***********************************************************************
 174  *           DC_DeleteObject
 175  */
 176 static BOOL DC_DeleteObject( HGDIOBJ handle, void *obj )
 177 {
 178     GDI_ReleaseObj( handle );
 179     return DeleteDC( handle );
 180 }
 181
 182
 183 /***********************************************************************
 184  *           DC_InitDC
 185  *
 186  * Setup device-specific DC values for a newly created DC.
 187  */
 188 void DC_InitDC( DC* dc )
 189 {
 190     if (dc->funcs->pRealizeDefaultPalette) dc->funcs->pRealizeDefaultPalette( dc->physDev );
 191     SetTextColor( dc->hSelf, dc->textColor );
 192     SetBkColor( dc->hSelf, dc->backgroundColor );
 193     SelectObject( dc->hSelf, dc->hPen );
 194     SelectObject( dc->hSelf, dc->hBrush );
 195     SelectObject( dc->hSelf, dc->hFont );
 196     CLIPPING_UpdateGCRegion( dc );
 197 }
 198
 199
 200 /***********************************************************************
 201  *           DC_InvertXform
 202  *
 203  * Computes the inverse of the transformation xformSrc and stores it to
 204  * xformDest. Returns TRUE if successful or FALSE if the xformSrc matrix
 205  * is singular.
 206  */
 207 static BOOL DC_InvertXform( const XFORM *xformSrc, XFORM *xformDest )
 208 {
 209     FLOAT determinant;
 210
 211     determinant = xformSrc->eM11*xformSrc->eM22 -
 212         xformSrc->eM12*xformSrc->eM21;
 213     if (determinant > -1e-12 && determinant < 1e-12)
 214         return FALSE;
 215
 216     xformDest->eM11 =  xformSrc->eM22 / determinant;
 217     xformDest->eM12 = -xformSrc->eM12 / determinant;
 218     xformDest->eM21 = -xformSrc->eM21 / determinant;
 219     xformDest->eM22 =  xformSrc->eM11 / determinant;
 220     xformDest->eDx  = -xformSrc->eDx * xformDest->eM11 -
 221                        xformSrc->eDy * xformDest->eM21;
 222     xformDest->eDy  = -xformSrc->eDx * xformDest->eM12 -
 223                        xformSrc->eDy * xformDest->eM22;
 224
 225     return TRUE;
 226 }
 227
 228
 229 /***********************************************************************
 230  *           DC_UpdateXforms
 231  *
 232  * Updates the xformWorld2Vport, xformVport2World and vport2WorldValid
 233  * fields of the specified DC by creating a transformation that
 234  * represents the current mapping mode and combining it with the DC's
 235  * world transform. This function should be called whenever the
 236  * parameters associated with the mapping mode (window and viewport
 237  * extents and origins) or the world transform change.
 238  */
 239 void DC_UpdateXforms( DC *dc )
 240 {
 241     XFORM xformWnd2Vport, oldworld2vport;
 242     FLOAT scaleX, scaleY;
 243
 244     /* Construct a transformation to do the window-to-viewport conversion */
 245     scaleX = (FLOAT)dc->vportExtX / (FLOAT)dc->wndExtX;
 246     scaleY = (FLOAT)dc->vportExtY / (FLOAT)dc->wndExtY;
 247     xformWnd2Vport.eM11 = scaleX;
 248     xformWnd2Vport.eM12 = 0.0;
 249     xformWnd2Vport.eM21 = 0.0;
 250     xformWnd2Vport.eM22 = scaleY;
 251     xformWnd2Vport.eDx  = (FLOAT)dc->vportOrgX -
 252         scaleX * (FLOAT)dc->wndOrgX;
 253     xformWnd2Vport.eDy  = (FLOAT)dc->vportOrgY -
 254         scaleY * (FLOAT)dc->wndOrgY;
 255
 256     oldworld2vport = dc->xformWorld2Vport;
 257     /* Combine with the world transformation */
 258     CombineTransform( &dc->xformWorld2Vport, &dc->xformWorld2Wnd,
 259         &xformWnd2Vport );
 260
 261     /* Create inverse of world-to-viewport transformation */
 262     dc->vport2WorldValid = DC_InvertXform( &dc->xformWorld2Vport,
 263         &dc->xformVport2World );
 264
 265     /* Reselect the font back into the dc so that the font size
 266        gets updated. */
 267     if(memcmp(&oldworld2vport, &dc->xformWorld2Vport, sizeof(oldworld2vport)))
 268         SelectObject(dc->hSelf, GetCurrentObject(dc->hSelf, OBJ_FONT));
 269 }
 270
 271
 272 /***********************************************************************
 273  *           GetDCState   (Not a Windows API)
 274  */
 275 HDC WINAPI GetDCState( HDC hdc )
 276 {
 277     DC * newdc, * dc;
 278     HGDIOBJ handle;
 279
 280     if (!(dc = DC_GetDCPtr( hdc ))) return 0;
 281     if (!(newdc = GDI_AllocObject( sizeof(DC), GDIMAGIC(dc->header.wMagic), &handle, &dc_funcs )))
 282     {
 283       GDI_ReleaseObj( hdc );
 284       return 0;
 285     }
 286     TRACE("(%p): returning %p\n", hdc, handle );
 287
 288     newdc->flags            = dc->flags | DC_SAVED;
 289     newdc->hPen             = dc->hPen;
 290     newdc->hBrush           = dc->hBrush;
 291     newdc->hFont            = dc->hFont;
 292     newdc->hBitmap          = dc->hBitmap;
 293     newdc->hDevice          = dc->hDevice;
 294     newdc->hPalette         = dc->hPalette;
 295     newdc->ROPmode          = dc->ROPmode;
 296     newdc->polyFillMode     = dc->polyFillMode;
 297     newdc->stretchBltMode   = dc->stretchBltMode;
 298     newdc->relAbsMode       = dc->relAbsMode;
 299     newdc->backgroundMode   = dc->backgroundMode;
 300     newdc->backgroundColor  = dc->backgroundColor;
 301     newdc->textColor        = dc->textColor;
 302     newdc->dcBrushColor     = dc->dcBrushColor;
 303     newdc->dcPenColor       = dc->dcPenColor;
 304     newdc->brushOrgX        = dc->brushOrgX;
 305     newdc->brushOrgY        = dc->brushOrgY;
 306     newdc->textAlign        = dc->textAlign;
 307     newdc->charExtra        = dc->charExtra;
 308     newdc->breakExtra       = dc->breakExtra;
 309     newdc->breakRem         = dc->breakRem;
 310     newdc->MapMode          = dc->MapMode;
 311     newdc->GraphicsMode     = dc->GraphicsMode;
 312     newdc->CursPosX         = dc->CursPosX;
 313     newdc->CursPosY         = dc->CursPosY;
 314     newdc->ArcDirection     = dc->ArcDirection;
 315     newdc->xformWorld2Wnd   = dc->xformWorld2Wnd;
 316     newdc->xformWorld2Vport = dc->xformWorld2Vport;
 317     newdc->xformVport2World = dc->xformVport2World;
 318     newdc->vport2WorldValid = dc->vport2WorldValid;
 319     newdc->wndOrgX          = dc->wndOrgX;
 320     newdc->wndOrgY          = dc->wndOrgY;
 321     newdc->wndExtX          = dc->wndExtX;
 322     newdc->wndExtY          = dc->wndExtY;
 323     newdc->vportOrgX        = dc->vportOrgX;
 324     newdc->vportOrgY        = dc->vportOrgY;
 325     newdc->vportExtX        = dc->vportExtX;
 326     newdc->vportExtY        = dc->vportExtY;
 327     newdc->BoundsRect       = dc->BoundsRect;
 328
 329     newdc->hSelf = (HDC)handle;
 330     newdc->saveLevel = 0;
 331
 332     PATH_InitGdiPath( &newdc->path );
 333
 334     newdc->pAbortProc = NULL;
 335     newdc->hookThunk  = NULL;
 336     newdc->hookProc   = 0;
 337
 338     /* Get/SetDCState() don't change hVisRgn field ("Undoc. Windows" p.559). */
 339
 340     newdc->hVisRgn = 0;
 341     if (dc->hClipRgn)
 342     {
 343         newdc->hClipRgn = CreateRectRgn( 0, 0, 0, 0 );
 344         CombineRgn( newdc->hClipRgn, dc->hClipRgn, 0, RGN_COPY );
 345     }
 346     else
 347         newdc->hClipRgn = 0;
 348
 349     if(dc->gdiFont) {
 350         newdc->gdiFont = dc->gdiFont;
 351     } else
 352         newdc->gdiFont = 0;
 353
 354     GDI_ReleaseObj( handle );
 355     GDI_ReleaseObj( hdc );
 356     return handle;
 357 }
 358
 359
 360 /***********************************************************************
 361  *           SetDCState   (Not a Windows API)
 362  */
 363 void WINAPI SetDCState( HDC hdc, HDC hdcs )
 364 {
 365     DC *dc, *dcs;
 366
 367     if (!(dc = DC_GetDCUpdate( hdc ))) return;
 368     if (!(dcs = DC_GetDCPtr( hdcs )))
 369     {
 370       GDI_ReleaseObj( hdc );
 371       return;
 372     }
 373     if (!dcs->flags & DC_SAVED)
 374     {
 375       GDI_ReleaseObj( hdc );
 376       GDI_ReleaseObj( hdcs );
 377       return;
 378     }
 379     TRACE("%p %p\n", hdc, hdcs );
 380
 381     dc->flags            = dcs->flags & ~(DC_SAVED | DC_DIRTY);
 382     dc->hDevice          = dcs->hDevice;
 383     dc->ROPmode          = dcs->ROPmode;
 384     dc->polyFillMode     = dcs->polyFillMode;
 385     dc->stretchBltMode   = dcs->stretchBltMode;
 386     dc->relAbsMode       = dcs->relAbsMode;
 387     dc->backgroundMode   = dcs->backgroundMode;
 388     dc->backgroundColor  = dcs->backgroundColor;
 389     dc->textColor        = dcs->textColor;
 390     dc->dcBrushColor     = dcs->dcBrushColor;
 391     dc->dcPenColor       = dcs->dcPenColor;
 392     dc->brushOrgX        = dcs->brushOrgX;
 393     dc->brushOrgY        = dcs->brushOrgY;
 394     dc->textAlign        = dcs->textAlign;
 395     dc->charExtra        = dcs->charExtra;
 396     dc->breakExtra       = dcs->breakExtra;
 397     dc->breakRem         = dcs->breakRem;
 398     dc->MapMode          = dcs->MapMode;
 399     dc->GraphicsMode     = dcs->GraphicsMode;
 400     dc->CursPosX         = dcs->CursPosX;
 401     dc->CursPosY         = dcs->CursPosY;
 402     dc->ArcDirection     = dcs->ArcDirection;
 403     dc->xformWorld2Wnd   = dcs->xformWorld2Wnd;
 404     dc->xformWorld2Vport = dcs->xformWorld2Vport;
 405     dc->xformVport2World = dcs->xformVport2World;
 406     dc->vport2WorldValid = dcs->vport2WorldValid;
 407     dc->BoundsRect       = dcs->BoundsRect;
 408
 409     dc->wndOrgX          = dcs->wndOrgX;
 410     dc->wndOrgY          = dcs->wndOrgY;
 411     dc->wndExtX          = dcs->wndExtX;
 412     dc->wndExtY          = dcs->wndExtY;
 413     dc->vportOrgX        = dcs->vportOrgX;
 414     dc->vportOrgY        = dcs->vportOrgY;
 415     dc->vportExtX        = dcs->vportExtX;
 416     dc->vportExtY        = dcs->vportExtY;
 417
 418     if (dcs->hClipRgn)
 419     {
 420         if (!dc->hClipRgn) dc->hClipRgn = CreateRectRgn( 0, 0, 0, 0 );
 421         CombineRgn( dc->hClipRgn, dcs->hClipRgn, 0, RGN_COPY );
 422     }
 423     else
 424     {
 425         if (dc->hClipRgn) DeleteObject( dc->hClipRgn );
 426         dc->hClipRgn = 0;
 427     }
 428     CLIPPING_UpdateGCRegion( dc );
 429
 430     SelectObject( hdc, dcs->hBitmap );
 431     SelectObject( hdc, dcs->hBrush );
 432     SelectObject( hdc, dcs->hFont );
 433     SelectObject( hdc, dcs->hPen );
 434     SetBkColor( hdc, dcs->backgroundColor);
 435     SetTextColor( hdc, dcs->textColor);
 436     GDISelectPalette( hdc, dcs->hPalette, FALSE );
 437     GDI_ReleaseObj( hdcs );
 438     GDI_ReleaseObj( hdc );
 439 }
 440
 441
 442 /***********************************************************************
 443  *           GetDCState   (GDI.179)
 444  */
 445 HDC16 WINAPI GetDCState16( HDC16 hdc )
 446 {
 447     return HDC_16( GetDCState( HDC_32(hdc) ));
 448 }
 449
 450
 451 /***********************************************************************
 452  *           SetDCState   (GDI.180)
 453  */
 454 void WINAPI SetDCState16( HDC16 hdc, HDC16 hdcs )
 455 {
 456     SetDCState( HDC_32(hdc), HDC_32(hdcs) );
 457 }
 458
 459
 460 /***********************************************************************
 461  *           SaveDC    (GDI32.@)
 462  */
 463 INT WINAPI SaveDC( HDC hdc )
 464 {
 465     HDC hdcs;
 466     DC * dc, * dcs;
 467     INT ret;
 468
 469     dc = DC_GetDCPtr( hdc );
 470     if (!dc) return 0;
 471
 472     if(dc->funcs->pSaveDC)
 473     {
 474         ret = dc->funcs->pSaveDC( dc->physDev );
 475         GDI_ReleaseObj( hdc );
 476         return ret;
 477     }
 478
 479     if (!(hdcs = GetDCState( hdc )))
 480     {
 481       GDI_ReleaseObj( hdc );
 482       return 0;
 483     }
 484     dcs = DC_GetDCPtr( hdcs );
 485
 486     /* Copy path. The reason why path saving / restoring is in SaveDC/
 487      * RestoreDC and not in GetDCState/SetDCState is that the ...DCState
 488      * functions are only in Win16 (which doesn't have paths) and that
 489      * SetDCState doesn't allow us to signal an error (which can happen
 490      * when copying paths).
 491      */
 492     if (!PATH_AssignGdiPath( &dcs->path, &dc->path ))
 493     {
 494         GDI_ReleaseObj( hdc );
 495         GDI_ReleaseObj( hdcs );
 496         DeleteDC( hdcs );
 497         return 0;
 498     }
 499
 500     dcs->header.hNext = dc->header.hNext;
 501     dc->header.hNext = HDC_16(hdcs);
 502     TRACE("(%p): returning %d\n", hdc, dc->saveLevel+1 );
 503     ret = ++dc->saveLevel;
 504     GDI_ReleaseObj( hdcs );
 505     GDI_ReleaseObj( hdc );
 506     return ret;
 507 }
 508
 509
 510 /***********************************************************************
 511  *           RestoreDC    (GDI32.@)
 512  */
 513 BOOL WINAPI RestoreDC( HDC hdc, INT level )
 514 {
 515     DC * dc, * dcs;
 516     BOOL success;
 517
 518     TRACE("%p %d\n", hdc, level );
 519     dc = DC_GetDCUpdate( hdc );
 520     if(!dc) return FALSE;
 521     if(dc->funcs->pRestoreDC)
 522     {
 523         success = dc->funcs->pRestoreDC( dc->physDev, level );
 524         GDI_ReleaseObj( hdc );
 525         return success;
 526     }
 527
 528     if (level == -1) level = dc->saveLevel;
 529     if ((level < 1)
 530             /* This pair of checks disagrees with MSDN "Platform SDK:
 531                Windows GDI" July 2000 which says all negative values
 532                for level will be interpreted as an instance relative
 533                to the current state.  Restricting it to just -1 does
 534                not satisfy this */
 535         || (level > dc->saveLevel))
 536     {
 537         GDI_ReleaseObj( hdc );
 538         return FALSE;
 539     }
 540
 541     success=TRUE;
 542     while (dc->saveLevel >= level)
 543     {
 544         HDC hdcs = HDC_32(dc->header.hNext);
 545         if (!(dcs = DC_GetDCPtr( hdcs )))
 546         {
 547           GDI_ReleaseObj( hdc );
 548           return FALSE;
 549         }
 550         dc->header.hNext = dcs->header.hNext;
 551         if (--dc->saveLevel < level)
 552         {
 553             SetDCState( hdc, hdcs );
 554             if (!PATH_AssignGdiPath( &dc->path, &dcs->path ))
 555                 /* FIXME: This might not be quite right, since we're
 556                  * returning FALSE but still destroying the saved DC state */
 557                 success=FALSE;
 558         }
 559         GDI_ReleaseObj( hdcs );
 560         GDI_ReleaseObj( hdc );
 561         DeleteDC( hdcs );
 562         if (!(dc = DC_GetDCPtr( hdc ))) return FALSE;
 563     }
 564     GDI_ReleaseObj( hdc );
 565     return success;
 566 }
 567
 568
 569 /***********************************************************************
 570  *           CreateDCW    (GDI32.@)
 571  */
 572 HDC WINAPI CreateDCW( LPCWSTR driver, LPCWSTR device, LPCWSTR output,
 573                       const DEVMODEW *initData )
 574 {
 575     HDC hdc;
 576     DC * dc;
 577     const DC_FUNCTIONS *funcs;
 578     WCHAR buf[300];
 579
 580     GDI_CheckNotLock();
 581
 582     if (!device || !DRIVER_GetDriverName( device, buf, 300 ))
 583     {
 584         if (!driver) return 0;
 585         strcpyW(buf, driver);
 586     }
 587
 588     if (!(funcs = DRIVER_load_driver( buf )))
 589     {
 590         ERR( "no driver found for %s\n", debugstr_w(buf) );
 591         return 0;
 592     }
 593     if (!(dc = DC_AllocDC( funcs, DC_MAGIC )))
 594     {
 595         DRIVER_release_driver( funcs );
 596         return 0;
 597     }
 598     hdc = dc->hSelf;
 599
 600     dc->hBitmap = GetStockObject( DEFAULT_BITMAP );
 601
 602     TRACE("(driver=%s, device=%s, output=%s): returning %p\n",
 603           debugstr_w(driver), debugstr_w(device), debugstr_w(output), dc->hSelf );
 604
 605     if (dc->funcs->pCreateDC &&
 606         !dc->funcs->pCreateDC( hdc, &dc->physDev, buf, device, output, initData ))
 607     {
 608         WARN("creation aborted by device\n" );
 609         GDI_FreeObject( dc->hSelf, dc );
 610         DRIVER_release_driver( funcs );
 611         return 0;
 612     }
 613
 614     dc->hVisRgn = CreateRectRgn( 0, 0, GetDeviceCaps( hdc, HORZRES ),
 615                                  GetDeviceCaps( hdc, VERTRES ) );
 616
 617     DC_InitDC( dc );
 618     GDI_ReleaseObj( hdc );
 619     return hdc;
 620 }
 621
 622
 623 /***********************************************************************
 624  *           CreateDCA    (GDI32.@)
 625  */
 626 HDC WINAPI CreateDCA( LPCSTR driver, LPCSTR device, LPCSTR output,
 627                       const DEVMODEA *initData )
 628 {
 629     UNICODE_STRING driverW, deviceW, outputW;
 630     DEVMODEW *initDataW;
 631     HDC ret;
 632
 633     if (driver) RtlCreateUnicodeStringFromAsciiz(&driverW, driver);
 634     else driverW.Buffer = NULL;
 635
 636     if (device) RtlCreateUnicodeStringFromAsciiz(&deviceW, device);
 637     else deviceW.Buffer = NULL;
 638
 639     if (output) RtlCreateUnicodeStringFromAsciiz(&outputW, output);
 640     else outputW.Buffer = NULL;
 641
 642     if (initData) initDataW = GdiConvertToDevmodeW(initData);
 643     else initDataW = NULL;
 644
 645     ret = CreateDCW( driverW.Buffer, deviceW.Buffer, outputW.Buffer, initDataW );
 646
 647     RtlFreeUnicodeString(&driverW);
 648     RtlFreeUnicodeString(&deviceW);
 649     RtlFreeUnicodeString(&outputW);
 650     if (initDataW) HeapFree(GetProcessHeap(), 0, initDataW);
 651     return ret;
 652 }
 653
 654
 655 /***********************************************************************
 656  *           CreateICA    (GDI32.@)
 657  */
 658 HDC WINAPI CreateICA( LPCSTR driver, LPCSTR device, LPCSTR output,
 659                           const DEVMODEA* initData )
 660 {
 661       /* Nothing special yet for ICs */
 662     return CreateDCA( driver, device, output, initData );
 663 }
 664
 665
 666 /***********************************************************************
 667  *           CreateICW    (GDI32.@)
 668  */
 669 HDC WINAPI CreateICW( LPCWSTR driver, LPCWSTR device, LPCWSTR output,
 670                           const DEVMODEW* initData )
 671 {
 672       /* Nothing special yet for ICs */
 673     return CreateDCW( driver, device, output, initData );
 674 }
 675
 676
 677 /***********************************************************************
 678  *           CreateCompatibleDC   (GDI32.@)
 679  */
 680 HDC WINAPI CreateCompatibleDC( HDC hdc )
 681 {
 682     DC *dc, *origDC;
 683     const DC_FUNCTIONS *funcs;
 684     PHYSDEV physDev;
 685
 686     GDI_CheckNotLock();
 687
 688     if ((origDC = GDI_GetObjPtr( hdc, DC_MAGIC )))
 689     {
 690         funcs = origDC->funcs;
 691         physDev = origDC->physDev;
 692         GDI_ReleaseObj( hdc ); /* can't hold the lock while loading the driver */
 693         funcs = DRIVER_get_driver( funcs );
 694     }
 695     else
 696     {
 697         static const WCHAR displayW[] = { 'd','i','s','p','l','a','y',0 };
 698         funcs = DRIVER_load_driver( displayW );
 699         physDev = NULL;
 700     }
 701
 702     if (!funcs) return 0;
 703
 704     if (!(dc = DC_AllocDC( funcs, MEMORY_DC_MAGIC )))
 705     {
 706         DRIVER_release_driver( funcs );
 707         return 0;
 708     }
 709
 710     TRACE("(%p): returning %p\n", hdc, dc->hSelf );
 711
 712     dc->hBitmap = GetStockObject( DEFAULT_BITMAP );
 713
 714     /* Copy the driver-specific physical device info into
 715      * the new DC. The driver may use this read-only info
 716      * while creating the compatible DC below. */
 717     dc->physDev = physDev;
 718
 719     if (dc->funcs->pCreateDC &&
 720         !dc->funcs->pCreateDC( dc->hSelf, &dc->physDev, NULL, NULL, NULL, NULL ))
 721     {
 722         WARN("creation aborted by device\n");
 723         GDI_FreeObject( dc->hSelf, dc );
 724         DRIVER_release_driver( funcs );
 725         return 0;
 726     }
 727
 728     dc->hVisRgn = CreateRectRgn( 0, 0, 1, 1 );  /* default bitmap is 1x1 */
 729
 730     DC_InitDC( dc );
 731     GDI_ReleaseObj( dc->hSelf );
 732     return dc->hSelf;
 733 }
 734
 735
 736 /***********************************************************************
 737  *           DeleteDC    (GDI32.@)
 738  */
 739 BOOL WINAPI DeleteDC( HDC hdc )
 740 {
 741     const DC_FUNCTIONS *funcs = NULL;
 742     DC * dc;
 743
 744     TRACE("%p\n", hdc );
 745
 746     GDI_CheckNotLock();
 747
 748     if (!(dc = DC_GetDCPtr( hdc ))) return FALSE;
 749
 750     /* Call hook procedure to check whether is it OK to delete this DC */
 751     if (dc->hookThunk)
 752     {
 753         DCHOOKPROC proc = dc->hookThunk;
 754         DWORD data = dc->dwHookData;
 755         GDI_ReleaseObj( hdc );
 756         if (!proc( HDC_16(hdc), DCHC_DELETEDC, data, 0 )) return FALSE;
 757         if (!(dc = DC_GetDCPtr( hdc ))) return TRUE;  /* deleted by the hook */
 758     }
 759
 760     while (dc->saveLevel)
 761     {
 762         DC * dcs;
 763         HDC hdcs = HDC_32(dc->header.hNext);
 764         if (!(dcs = DC_GetDCPtr( hdcs ))) break;
 765         dc->header.hNext = dcs->header.hNext;
 766         dc->saveLevel--;
 767         if (dcs->hClipRgn) DeleteObject( dcs->hClipRgn );
 768         if (dcs->hVisRgn) DeleteObject( dcs->hVisRgn );
 769         PATH_DestroyGdiPath(&dcs->path);
 770         GDI_FreeObject( hdcs, dcs );
 771     }
 772
 773     if (!(dc->flags & DC_SAVED))
 774     {
 775         SelectObject( hdc, GetStockObject(BLACK_PEN) );
 776         SelectObject( hdc, GetStockObject(WHITE_BRUSH) );
 777         SelectObject( hdc, GetStockObject(SYSTEM_FONT) );
 778         SelectObject( hdc, GetStockObject(DEFAULT_BITMAP) );
 779         funcs = dc->funcs;
 780         if (dc->funcs->pDeleteDC) dc->funcs->pDeleteDC(dc->physDev);
 781         dc->physDev = NULL;
 782     }
 783
 784     if (dc->hClipRgn) DeleteObject( dc->hClipRgn );
 785     if (dc->hVisRgn) DeleteObject( dc->hVisRgn );
 786     PATH_DestroyGdiPath(&dc->path);
 787
 788     GDI_FreeObject( hdc, dc );
 789     if (funcs) DRIVER_release_driver( funcs );  /* do that after releasing the GDI lock */
 790     return TRUE;
 791 }
 792
 793
 794 /***********************************************************************
 795  *           ResetDCW    (GDI32.@)
 796  */
 797 HDC WINAPI ResetDCW( HDC hdc, const DEVMODEW *devmode )
 798 {
 799     DC *dc;
 800     HDC ret = hdc;
 801
 802     if ((dc = DC_GetDCPtr( hdc )))
 803     {
 804         if (dc->funcs->pResetDC) ret = dc->funcs->pResetDC( dc->physDev, devmode );
 805         GDI_ReleaseObj( hdc );
 806     }
 807     return ret;
 808 }
 809
 810
 811 /***********************************************************************
 812  *           ResetDCA    (GDI32.@)
 813  */
 814 HDC WINAPI ResetDCA( HDC hdc, const DEVMODEA *devmode )
 815 {
 816     DEVMODEW *devmodeW;
 817     HDC ret;
 818
 819     if (devmode) devmodeW = GdiConvertToDevmodeW(devmode);
 820     else devmodeW = NULL;
 821
 822     ret = ResetDCW(hdc, devmodeW);
 823
 824     if (devmodeW) HeapFree(GetProcessHeap(), 0, devmodeW);
 825     return ret;
 826 }
 827
 828
 829 /***********************************************************************
 830  *           GetDeviceCaps    (GDI32.@)
 831  */
 832 INT WINAPI GetDeviceCaps( HDC hdc, INT cap )
 833 {
 834     DC *dc;
 835     INT ret = 0;
 836
 837     if ((dc = DC_GetDCPtr( hdc )))
 838     {
 839         if (dc->funcs->pGetDeviceCaps) ret = dc->funcs->pGetDeviceCaps( dc->physDev, cap );
 840         GDI_ReleaseObj( hdc );
 841     }
 842     return ret;
 843 }
 844
 845
 846 /***********************************************************************
 847  *              GetBkColor (GDI32.@)
 848  */
 849 COLORREF WINAPI GetBkColor( HDC hdc )
 850 {
 851     COLORREF ret = 0;
 852     DC * dc = DC_GetDCPtr( hdc );
 853     if (dc)
 854     {
 855         ret = dc->backgroundColor;
 856         GDI_ReleaseObj( hdc );
 857     }
 858     return ret;
 859 }
 860
 861
 862 /***********************************************************************
 863  *           SetBkColor    (GDI32.@)
 864  */
 865 COLORREF WINAPI SetBkColor( HDC hdc, COLORREF color )
 866 {
 867     COLORREF oldColor;
 868     DC * dc = DC_GetDCPtr( hdc );
 869
 870     TRACE("hdc=%p color=0x%08lx\n", hdc, color);
 871
 872     if (!dc) return CLR_INVALID;
 873     oldColor = dc->backgroundColor;
 874     if (dc->funcs->pSetBkColor)
 875     {
 876         color = dc->funcs->pSetBkColor(dc->physDev, color);
 877         if (color == CLR_INVALID)  /* don't change it */
 878         {
 879             color = oldColor;
 880             oldColor = CLR_INVALID;
 881         }
 882     }
 883     dc->backgroundColor = color;
 884     GDI_ReleaseObj( hdc );
 885     return oldColor;
 886 }
 887
 888
 889 /***********************************************************************
 890  *              GetTextColor (GDI32.@)
 891  */
 892 COLORREF WINAPI GetTextColor( HDC hdc )
 893 {
 894     COLORREF ret = 0;
 895     DC * dc = DC_GetDCPtr( hdc );
 896     if (dc)
 897     {
 898         ret = dc->textColor;
 899         GDI_ReleaseObj( hdc );
 900     }
 901     return ret;
 902 }
 903
 904
 905 /***********************************************************************
 906  *           SetTextColor    (GDI32.@)
 907  */
 908 COLORREF WINAPI SetTextColor( HDC hdc, COLORREF color )
 909 {
 910     COLORREF oldColor;
 911     DC * dc = DC_GetDCPtr( hdc );
 912
 913     TRACE(" hdc=%p color=0x%08lx\n", hdc, color);
 914
 915     if (!dc) return CLR_INVALID;
 916     oldColor = dc->textColor;
 917     if (dc->funcs->pSetTextColor)
 918     {
 919         color = dc->funcs->pSetTextColor(dc->physDev, color);
 920         if (color == CLR_INVALID)  /* don't change it */
 921         {
 922             color = oldColor;
 923             oldColor = CLR_INVALID;
 924         }
 925     }
 926     dc->textColor = color;
 927     GDI_ReleaseObj( hdc );
 928     return oldColor;
 929 }
 930
 931
 932 /***********************************************************************
 933  *              GetTextAlign (GDI32.@)
 934  */
 935 UINT WINAPI GetTextAlign( HDC hdc )
 936 {
 937     UINT ret = 0;
 938     DC * dc = DC_GetDCPtr( hdc );
 939     if (dc)
 940     {
 941         ret = dc->textAlign;
 942         GDI_ReleaseObj( hdc );
 943     }
 944     return ret;
 945 }
 946
 947
 948 /***********************************************************************
 949  *           SetTextAlign    (GDI32.@)
 950  */
 951 UINT WINAPI SetTextAlign( HDC hdc, UINT align )
 952 {
 953     UINT prevAlign;
 954     DC *dc = DC_GetDCPtr( hdc );
 955
 956     TRACE("hdc=%p align=%d\n", hdc, align);
 957
 958     if (!dc) return 0x0;
 959     if (dc->funcs->pSetTextAlign)
 960         prevAlign = dc->funcs->pSetTextAlign(dc->physDev, align);
 961     else {
 962         prevAlign = dc->textAlign;
 963         dc->textAlign = align;
 964     }
 965     GDI_ReleaseObj( hdc );
 966     return prevAlign;
 967 }
 968
 969 /***********************************************************************
 970  *           GetDCOrgEx  (GDI32.@)
 971  */
 972 BOOL WINAPI GetDCOrgEx( HDC hDC, LPPOINT lpp )
 973 {
 974     DC * dc;
 975
 976     if (!lpp) return FALSE;
 977     if (!(dc = DC_GetDCPtr( hDC ))) return FALSE;
 978
 979     lpp->x = lpp->y = 0;
 980     if (dc->funcs->pGetDCOrgEx) dc->funcs->pGetDCOrgEx( dc->physDev, lpp );
 981     GDI_ReleaseObj( hDC );
 982     return TRUE;
 983 }
 984
 985
 986 /***********************************************************************
 987  *           SetDCOrg   (GDI.117)
 988  */
 989 DWORD WINAPI SetDCOrg16( HDC16 hdc16, INT16 x, INT16 y )
 990 {
 991     DWORD prevOrg = 0;
 992     HDC hdc = HDC_32( hdc16 );
 993     DC *dc = DC_GetDCPtr( hdc );
 994     if (!dc) return 0;
 995     if (dc->funcs->pSetDCOrg) prevOrg = dc->funcs->pSetDCOrg( dc->physDev, x, y );
 996     GDI_ReleaseObj( hdc );
 997     return prevOrg;
 998 }
 999
1000
1001 /***********************************************************************
1002  *              GetGraphicsMode (GDI32.@)
1003  */
1004 INT WINAPI GetGraphicsMode( HDC hdc )
1005 {
1006     INT ret = 0;
1007     DC * dc = DC_GetDCPtr( hdc );
1008     if (dc)
1009     {
1010         ret = dc->GraphicsMode;
1011         GDI_ReleaseObj( hdc );
1012     }
1013     return ret;
1014 }
1015
1016
1017 /***********************************************************************
1018  *           SetGraphicsMode    (GDI32.@)
1019  */
1020 INT WINAPI SetGraphicsMode( HDC hdc, INT mode )
1021 {
1022     INT ret = 0;
1023     DC *dc = DC_GetDCPtr( hdc );
1024
1025     /* One would think that setting the graphics mode to GM_COMPATIBLE
1026      * would also reset the world transformation matrix to the unity
1027      * matrix. However, in Windows, this is not the case. This doesn't
1028      * make a lot of sense to me, but that's the way it is.
1029      */
1030     if (!dc) return 0;
1031     if ((mode > 0) && (mode <= GM_LAST))
1032     {
1033         ret = dc->GraphicsMode;
1034         dc->GraphicsMode = mode;
1035     }
1036     GDI_ReleaseObj( hdc );
1037     return ret;
1038 }
1039
1040
1041 /***********************************************************************
1042  *              GetArcDirection (GDI32.@)
1043  */
1044 INT WINAPI GetArcDirection( HDC hdc )
1045 {
1046     INT ret = 0;
1047     DC * dc = DC_GetDCPtr( hdc );
1048     if (dc)
1049     {
1050         ret = dc->ArcDirection;
1051         GDI_ReleaseObj( hdc );
1052     }
1053     return ret;
1054 }
1055
1056
1057 /***********************************************************************
1058  *           SetArcDirection    (GDI32.@)
1059  */
1060 INT WINAPI SetArcDirection( HDC hdc, INT nDirection )
1061 {
1062     DC * dc;
1063     INT nOldDirection = 0;
1064
1065     if (nDirection!=AD_COUNTERCLOCKWISE && nDirection!=AD_CLOCKWISE)
1066     {
1067         SetLastError(ERROR_INVALID_PARAMETER);
1068         return 0;
1069     }
1070
1071     if ((dc = DC_GetDCPtr( hdc )))
1072     {
1073         if (dc->funcs->pSetArcDirection)
1074         {
1075             dc->funcs->pSetArcDirection(dc->physDev, nDirection);
1076         }
1077         nOldDirection = dc->ArcDirection;
1078         dc->ArcDirection = nDirection;
1079         GDI_ReleaseObj( hdc );
1080     }
1081     return nOldDirection;
1082 }
1083
1084
1085 /***********************************************************************
1086  *           GetWorldTransform    (GDI32.@)
1087  */
1088 BOOL WINAPI GetWorldTransform( HDC hdc, LPXFORM xform )
1089 {
1090     DC * dc;
1091     if (!xform) return FALSE;
1092     if (!(dc = DC_GetDCPtr( hdc ))) return FALSE;
1093     *xform = dc->xformWorld2Wnd;
1094     GDI_ReleaseObj( hdc );
1095     return TRUE;
1096 }
1097
1098
1099 /***********************************************************************
1100  *           GetTransform    (GDI32.@)
1101  */
1102 BOOL WINAPI GetTransform( HDC hdc, DWORD unknown, LPXFORM xform )
1103 {
1104     if (unknown == 0x0203) return GetWorldTransform( hdc, xform );
1105     FIXME("stub: don't know what to do for code %lx\n", unknown );
1106     return FALSE;
1107 }
1108
1109
1110 /***********************************************************************
1111  *           SetWorldTransform    (GDI32.@)
1112  */
1113 BOOL WINAPI SetWorldTransform( HDC hdc, const XFORM *xform )
1114 {
1115     BOOL ret = FALSE;
1116     DC *dc = DC_GetDCPtr( hdc );
1117
1118     if (!dc) return FALSE;
1119     if (!xform) goto done;
1120
1121     /* Check that graphics mode is GM_ADVANCED */
1122     if (dc->GraphicsMode!=GM_ADVANCED) goto done;
1123
1124     if (dc->funcs->pSetWorldTransform)
1125     {
1126         ret = dc->funcs->pSetWorldTransform(dc->physDev, xform);
1127         if (!ret) goto done;
1128     }
1129
1130     dc->xformWorld2Wnd = *xform;
1131     DC_UpdateXforms( dc );
1132     ret = TRUE;
1133  done:
1134     GDI_ReleaseObj( hdc );
1135     return ret;
1136 }
1137
1138
1139 /****************************************************************************
1140  * ModifyWorldTransform [GDI32.@]
1141  * Modifies the world transformation for a device context.
1142  *
1143  * PARAMS
1144  *    hdc   [I] Handle to device context
1145  *    xform [I] XFORM structure that will be used to modify the world
1146  *              transformation
1147  *    iMode [I] Specifies in what way to modify the world transformation
1148  *              Possible values:
1149  *              MWT_IDENTITY
1150  *                 Resets the world transformation to the identity matrix.
1151  *                 The parameter xform is ignored.
1152  *              MWT_LEFTMULTIPLY
1153  *                 Multiplies xform into the world transformation matrix from
1154  *                 the left.
1155  *              MWT_RIGHTMULTIPLY
1156  *                 Multiplies xform into the world transformation matrix from
1157  *                 the right.
1158  *
1159  * RETURNS
1160  *  Success: TRUE.
1161  *  Failure: FALSE. Use GetLastError() to determine the cause.
1162  */
1163 BOOL WINAPI ModifyWorldTransform( HDC hdc, const XFORM *xform,
1164     DWORD iMode )
1165 {
1166     BOOL ret = FALSE;
1167     DC *dc = DC_GetDCPtr( hdc );
1168
1169     /* Check for illegal parameters */
1170     if (!dc) return FALSE;
1171     if (!xform) goto done;
1172
1173     /* Check that graphics mode is GM_ADVANCED */
1174     if (dc->GraphicsMode!=GM_ADVANCED) goto done;
1175
1176     if (dc->funcs->pModifyWorldTransform)
1177     {
1178         ret = dc->funcs->pModifyWorldTransform(dc->physDev, xform, iMode);
1179         if (!ret) goto done;
1180     }
1181
1182     switch (iMode)
1183     {
1184         case MWT_IDENTITY:
1185             dc->xformWorld2Wnd.eM11 = 1.0f;
1186             dc->xformWorld2Wnd.eM12 = 0.0f;
1187             dc->xformWorld2Wnd.eM21 = 0.0f;
1188             dc->xformWorld2Wnd.eM22 = 1.0f;
1189             dc->xformWorld2Wnd.eDx  = 0.0f;
1190             dc->xformWorld2Wnd.eDy  = 0.0f;
1191             break;
1192         case MWT_LEFTMULTIPLY:
1193             CombineTransform( &dc->xformWorld2Wnd, xform,
1194                 &dc->xformWorld2Wnd );
1195             break;
1196         case MWT_RIGHTMULTIPLY:
1197             CombineTransform( &dc->xformWorld2Wnd, &dc->xformWorld2Wnd,
1198                 xform );
1199             break;
1200         default:
1201             goto done;
1202     }
1203
1204     DC_UpdateXforms( dc );
1205     ret = TRUE;
1206  done:
1207     GDI_ReleaseObj( hdc );
1208     return ret;
1209 }
1210
1211
1212 /****************************************************************************
1213  * CombineTransform [GDI32.@]
1214  * Combines two transformation matrices.
1215  *
1216  * PARAMS
1217  *    xformResult [O] Stores the result of combining the two matrices
1218  *    xform1      [I] Specifies the first matrix to apply
1219  *    xform2      [I] Specifies the second matrix to apply
1220  *
1221  * REMARKS
1222  *    The same matrix can be passed in for more than one of the parameters.
1223  *
1224  * RETURNS
1225  *  Success: TRUE.
1226  *  Failure: FALSE. Use GetLastError() to determine the cause.
1227  */
1228 BOOL WINAPI CombineTransform( LPXFORM xformResult, const XFORM *xform1,
1229     const XFORM *xform2 )
1230 {
1231     XFORM xformTemp;
1232
1233     /* Check for illegal parameters */
1234     if (!xformResult || !xform1 || !xform2)
1235         return FALSE;
1236
1237     /* Create the result in a temporary XFORM, since xformResult may be
1238      * equal to xform1 or xform2 */
1239     xformTemp.eM11 = xform1->eM11 * xform2->eM11 +
1240                      xform1->eM12 * xform2->eM21;
1241     xformTemp.eM12 = xform1->eM11 * xform2->eM12 +
1242                      xform1->eM12 * xform2->eM22;
1243     xformTemp.eM21 = xform1->eM21 * xform2->eM11 +
1244                      xform1->eM22 * xform2->eM21;
1245     xformTemp.eM22 = xform1->eM21 * xform2->eM12 +
1246                      xform1->eM22 * xform2->eM22;
1247     xformTemp.eDx  = xform1->eDx  * xform2->eM11 +
1248                      xform1->eDy  * xform2->eM21 +
1249                      xform2->eDx;
1250     xformTemp.eDy  = xform1->eDx  * xform2->eM12 +
1251                      xform1->eDy  * xform2->eM22 +
1252                      xform2->eDy;
1253
1254     /* Copy the result to xformResult */
1255     *xformResult = xformTemp;
1256
1257     return TRUE;
1258 }
1259
1260
1261 /***********************************************************************
1262  *           SetDCHook   (GDI32.@)
1263  *
1264  * Note: this doesn't exist in Win32, we add it here because user32 needs it.
1265  */
1266 BOOL WINAPI SetDCHook( HDC hdc, DCHOOKPROC hookProc, DWORD dwHookData )
1267 {
1268     DC *dc = GDI_GetObjPtr( hdc, DC_MAGIC );
1269
1270     if (!dc) return FALSE;
1271
1272     if (!(dc->flags & DC_SAVED))
1273     {
1274         dc->dwHookData = dwHookData;
1275         dc->hookThunk = hookProc;
1276     }
1277     GDI_ReleaseObj( hdc );
1278     return TRUE;
1279 }
1280
1281
1282 /* relay function to call the 16-bit DC hook proc */
1283 static BOOL16 WINAPI call_dc_hook16( HDC16 hdc16, WORD code, DWORD data, LPARAM lParam )
1284 {
1285     WORD args[6];
1286     DWORD ret;
1287     FARPROC16 proc = NULL;
1288     HDC hdc = HDC_32( hdc16 );
1289     DC *dc = DC_GetDCPtr( hdc );
1290
1291     if (!dc) return FALSE;
1292     proc = dc->hookProc;
1293     GDI_ReleaseObj( hdc );
1294     if (!proc) return FALSE;
1295     args[5] = hdc16;
1296     args[4] = code;
1297     args[3] = HIWORD(data);
1298     args[2] = LOWORD(data);
1299     args[1] = HIWORD(lParam);
1300     args[0] = LOWORD(lParam);
1301     WOWCallback16Ex( (DWORD)proc, WCB16_PASCAL, sizeof(args), args, &ret );
1302     return LOWORD(ret);
1303 }
1304
1305 /***********************************************************************
1306  *           SetDCHook   (GDI.190)
1307  */
1308 BOOL16 WINAPI SetDCHook16( HDC16 hdc16, FARPROC16 hookProc, DWORD dwHookData )
1309 {
1310     HDC hdc = HDC_32( hdc16 );
1311     DC *dc = DC_GetDCPtr( hdc );
1312     if (!dc) return FALSE;
1313
1314     dc->hookProc = hookProc;
1315     GDI_ReleaseObj( hdc );
1316     return SetDCHook( hdc, call_dc_hook16, dwHookData );
1317 }
1318
1319
1320 /***********************************************************************
1321  *           GetDCHook   (GDI.191)
1322  */
1323 DWORD WINAPI GetDCHook16( HDC16 hdc16, FARPROC16 *phookProc )
1324 {
1325     HDC hdc = HDC_32( hdc16 );
1326     DC *dc = DC_GetDCPtr( hdc );
1327     DWORD ret;
1328
1329     if (!dc) return 0;
1330     *phookProc = dc->hookProc;
1331     ret = dc->dwHookData;
1332     GDI_ReleaseObj( hdc );
1333     return ret;
1334 }
1335
1336
1337 /***********************************************************************
1338  *           SetHookFlags   (GDI.192)
1339  */
1340 WORD WINAPI SetHookFlags16(HDC16 hdc16, WORD flags)
1341 {
1342     HDC hdc = HDC_32( hdc16 );
1343     DC *dc = DC_GetDCPtr( hdc );
1344
1345     if( dc )
1346     {
1347         WORD wRet = dc->flags & DC_DIRTY;
1348
1349         /* "Undocumented Windows" info is slightly confusing.
1350          */
1351
1352         TRACE("hDC %p, flags %04x\n",hdc,flags);
1353
1354         if( flags & DCHF_INVALIDATEVISRGN )
1355             dc->flags |= DC_DIRTY;
1356         else if( flags & DCHF_VALIDATEVISRGN || !flags )
1357             dc->flags &= ~DC_DIRTY;
1358         GDI_ReleaseObj( hdc );
1359         return wRet;
1360     }
1361     return 0;
1362 }
1363
1364 /***********************************************************************
1365  *           SetICMMode    (GDI32.@)
1366  */
1367 INT WINAPI SetICMMode(HDC hdc, INT iEnableICM)
1368 {
1369 /*FIXME  Asuming that ICM is always off, and cannot be turned on */
1370     if (iEnableICM == ICM_OFF) return ICM_OFF;
1371     if (iEnableICM == ICM_ON) return 0;
1372     if (iEnableICM == ICM_QUERY) return ICM_OFF;
1373     return 0;
1374 }
1375
1376 /***********************************************************************
1377  *           GetDeviceGammaRamp    (GDI32.@)
1378  */
1379 BOOL WINAPI GetDeviceGammaRamp(HDC hDC, LPVOID ptr)
1380 {
1381     BOOL ret = FALSE;
1382     DC *dc = DC_GetDCPtr( hDC );
1383
1384     if( dc )
1385     {
1386         if (dc->funcs->pGetDeviceGammaRamp)
1387             ret = dc->funcs->pGetDeviceGammaRamp(dc->physDev, ptr);
1388         GDI_ReleaseObj( hDC );
1389     }
1390     return ret;
1391 }
1392
1393 /***********************************************************************
1394  *           SetDeviceGammaRamp    (GDI32.@)
1395  */
1396 BOOL WINAPI SetDeviceGammaRamp(HDC hDC, LPVOID ptr)
1397 {
1398     BOOL ret = FALSE;
1399     DC *dc = DC_GetDCPtr( hDC );
1400
1401     if( dc )
1402     {
1403         if (dc->funcs->pSetDeviceGammaRamp)
1404             ret = dc->funcs->pSetDeviceGammaRamp(dc->physDev, ptr);
1405         GDI_ReleaseObj( hDC );
1406     }
1407     return ret;
1408 }
1409
1410 /***********************************************************************
1411  *           GetColorSpace    (GDI32.@)
1412  */
1413 HCOLORSPACE WINAPI GetColorSpace(HDC hdc)
1414 {
1415 /*FIXME    Need to to whatever GetColorSpace actually does */
1416     return 0;
1417 }
1418
1419 /***********************************************************************
1420  *           CreateColorSpaceA    (GDI32.@)
1421  */
1422 HCOLORSPACE WINAPI CreateColorSpaceA( LPLOGCOLORSPACEA lpLogColorSpace )
1423 {
1424   FIXME( "stub\n" );
1425   return 0;
1426 }
1427
1428 /***********************************************************************
1429  *           CreateColorSpaceW    (GDI32.@)
1430  */
1431 HCOLORSPACE WINAPI CreateColorSpaceW( LPLOGCOLORSPACEW lpLogColorSpace )
1432 {
1433   FIXME( "stub\n" );
1434   return 0;
1435 }
1436
1437 /***********************************************************************
1438  *           DeleteColorSpace     (GDI32.@)
1439  */
1440 BOOL WINAPI DeleteColorSpace( HCOLORSPACE hColorSpace )
1441 {
1442   FIXME( "stub\n" );
1443
1444   return TRUE;
1445 }
1446
1447 /***********************************************************************
1448  *           SetColorSpace     (GDI32.@)
1449  */
1450 HCOLORSPACE WINAPI SetColorSpace( HDC hDC, HCOLORSPACE hColorSpace )
1451 {
1452   FIXME( "stub\n" );
1453
1454   return hColorSpace;
1455 }
1456
1457 /***********************************************************************
1458  *           GetBoundsRect    (GDI32.@)
1459  */
1460 UINT WINAPI GetBoundsRect(HDC hdc, LPRECT rect, UINT flags)
1461 {
1462     UINT ret;
1463     DC *dc = DC_GetDCPtr( hdc );
1464
1465     if ( !dc ) return 0;
1466
1467     if (rect) *rect = dc->BoundsRect;
1468
1469     ret = ((dc->flags & DC_BOUNDS_SET) ? DCB_SET : DCB_RESET);
1470
1471     if (flags & DCB_RESET)
1472     {
1473         dc->BoundsRect.left   = 0;
1474         dc->BoundsRect.top    = 0;
1475         dc->BoundsRect.right  = 0;
1476         dc->BoundsRect.bottom = 0;
1477         dc->flags &= ~DC_BOUNDS_SET;
1478     }
1479     GDI_ReleaseObj( hdc );
1480     return ret;
1481 }
1482
1483
1484 /***********************************************************************
1485  *           SetBoundsRect    (GDI32.@)
1486  */
1487 UINT WINAPI SetBoundsRect(HDC hdc, const RECT* rect, UINT flags)
1488 {
1489     UINT ret;
1490     DC *dc;
1491
1492     if ((flags & DCB_ENABLE) && (flags & DCB_DISABLE)) return 0;
1493     if (!(dc = DC_GetDCPtr( hdc ))) return 0;
1494
1495     ret = ((dc->flags & DC_BOUNDS_ENABLE) ? DCB_ENABLE : DCB_DISABLE) |
1496           ((dc->flags & DC_BOUNDS_SET) ? DCB_SET : DCB_RESET);
1497
1498     if (flags & DCB_RESET)
1499     {
1500         dc->BoundsRect.left   = 0;
1501         dc->BoundsRect.top    = 0;
1502         dc->BoundsRect.right  = 0;
1503         dc->BoundsRect.bottom = 0;
1504         dc->flags &= ~DC_BOUNDS_SET;
1505     }
1506
1507     if ((flags & DCB_ACCUMULATE) && rect && rect->left < rect->right && rect->top < rect->bottom)
1508     {
1509         if (dc->flags & DC_BOUNDS_SET)
1510         {
1511             dc->BoundsRect.left   = min( dc->BoundsRect.left, rect->left );
1512             dc->BoundsRect.top    = min( dc->BoundsRect.top, rect->top );
1513             dc->BoundsRect.right  = max( dc->BoundsRect.right, rect->right );
1514             dc->BoundsRect.bottom = max( dc->BoundsRect.bottom, rect->bottom );
1515         }
1516         else
1517         {
1518             dc->BoundsRect = *rect;
1519             dc->flags |= DC_BOUNDS_SET;
1520         }
1521     }
1522
1523     if (flags & DCB_ENABLE) dc->flags |= DC_BOUNDS_ENABLE;
1524     if (flags & DCB_DISABLE) dc->flags &= ~DC_BOUNDS_ENABLE;
1525
1526     GDI_ReleaseObj( hdc );
1527     return ret;
1528 }
1529
1530
1531 /***********************************************************************
1532  *              GetRelAbs               (GDI32.@)
1533  */
1534 INT WINAPI GetRelAbs( HDC hdc, DWORD dwIgnore )
1535 {
1536     INT ret = 0;
1537     DC *dc = DC_GetDCPtr( hdc );
1538     if (dc) ret = dc->relAbsMode;
1539     GDI_ReleaseObj( hdc );
1540     return ret;
1541 }
1542
1543
1544
1545
1546 /***********************************************************************
1547  *              GetBkMode (GDI32.@)
1548  */
1549 INT WINAPI GetBkMode( HDC hdc )
1550 {
1551     INT ret = 0;
1552     DC * dc = DC_GetDCPtr( hdc );
1553     if (dc)
1554     {
1555         ret = dc->backgroundMode;
1556         GDI_ReleaseObj( hdc );
1557     }
1558     return ret;
1559 }
1560
1561
1562 /***********************************************************************
1563  *              SetBkMode (GDI32.@)
1564  */
1565 INT WINAPI SetBkMode( HDC hdc, INT mode )
1566 {
1567     INT ret;
1568     DC *dc;
1569     if ((mode <= 0) || (mode > BKMODE_LAST))
1570     {
1571         SetLastError(ERROR_INVALID_PARAMETER);
1572         return 0;
1573     }
1574     if (!(dc = DC_GetDCPtr( hdc ))) return 0;
1575     if (dc->funcs->pSetBkMode)
1576         ret = dc->funcs->pSetBkMode( dc->physDev, mode );
1577     else
1578     {
1579         ret = dc->backgroundMode;
1580         dc->backgroundMode = mode;
1581     }
1582     GDI_ReleaseObj( hdc );
1583     return ret;
1584 }
1585
1586
1587 /***********************************************************************
1588  *              GetROP2 (GDI32.@)
1589  */
1590 INT WINAPI GetROP2( HDC hdc )
1591 {
1592     INT ret = 0;
1593     DC * dc = DC_GetDCPtr( hdc );
1594     if (dc)
1595     {
1596         ret = dc->ROPmode;
1597         GDI_ReleaseObj( hdc );
1598     }
1599     return ret;
1600 }
1601
1602
1603 /***********************************************************************
1604  *              SetROP2 (GDI32.@)
1605  */
1606 INT WINAPI SetROP2( HDC hdc, INT mode )
1607 {
1608     INT ret;
1609     DC *dc;
1610     if ((mode < R2_BLACK) || (mode > R2_WHITE))
1611     {
1612         SetLastError(ERROR_INVALID_PARAMETER);
1613         return 0;
1614     }
1615     if (!(dc = DC_GetDCPtr( hdc ))) return 0;
1616     if (dc->funcs->pSetROP2)
1617         ret = dc->funcs->pSetROP2( dc->physDev, mode );
1618     else
1619     {
1620         ret = dc->ROPmode;
1621         dc->ROPmode = mode;
1622     }
1623     GDI_ReleaseObj( hdc );
1624     return ret;
1625 }
1626
1627
1628 /***********************************************************************
1629  *              SetRelAbs (GDI32.@)
1630  */
1631 INT WINAPI SetRelAbs( HDC hdc, INT mode )
1632 {
1633     INT ret;
1634     DC *dc;
1635     if ((mode != ABSOLUTE) && (mode != RELATIVE))
1636     {
1637         SetLastError(ERROR_INVALID_PARAMETER);
1638         return 0;
1639     }
1640     if (!(dc = DC_GetDCPtr( hdc ))) return 0;
1641     if (dc->funcs->pSetRelAbs)
1642         ret = dc->funcs->pSetRelAbs( dc->physDev, mode );
1643     else
1644     {
1645         ret = dc->relAbsMode;
1646         dc->relAbsMode = mode;
1647     }
1648     GDI_ReleaseObj( hdc );
1649     return ret;
1650 }
1651
1652
1653 /***********************************************************************
1654  *              GetPolyFillMode (GDI32.@)
1655  */
1656 INT WINAPI GetPolyFillMode( HDC hdc )
1657 {
1658     INT ret = 0;
1659     DC * dc = DC_GetDCPtr( hdc );
1660     if (dc)
1661     {
1662         ret = dc->polyFillMode;
1663         GDI_ReleaseObj( hdc );
1664     }
1665     return ret;
1666 }
1667
1668
1669 /***********************************************************************
1670  *              SetPolyFillMode (GDI32.@)
1671  */
1672 INT WINAPI SetPolyFillMode( HDC hdc, INT mode )
1673 {
1674     INT ret;
1675     DC *dc;
1676     if ((mode <= 0) || (mode > POLYFILL_LAST))
1677     {
1678         SetLastError(ERROR_INVALID_PARAMETER);
1679         return 0;
1680     }
1681     if (!(dc = DC_GetDCPtr( hdc ))) return 0;
1682     if (dc->funcs->pSetPolyFillMode)
1683         ret = dc->funcs->pSetPolyFillMode( dc->physDev, mode );
1684     else
1685     {
1686         ret = dc->polyFillMode;
1687         dc->polyFillMode = mode;
1688     }
1689     GDI_ReleaseObj( hdc );
1690     return ret;
1691 }
1692
1693
1694 /***********************************************************************
1695  *              GetStretchBltMode (GDI32.@)
1696  */
1697 INT WINAPI GetStretchBltMode( HDC hdc )
1698 {
1699     INT ret = 0;
1700     DC * dc = DC_GetDCPtr( hdc );
1701     if (dc)
1702     {
1703         ret = dc->stretchBltMode;
1704         GDI_ReleaseObj( hdc );
1705     }
1706     return ret;
1707 }
1708
1709
1710 /***********************************************************************
1711  *              SetStretchBltMode (GDI32.@)
1712  */
1713 INT WINAPI SetStretchBltMode( HDC hdc, INT mode )
1714 {
1715     INT ret;
1716     DC *dc;
1717     if ((mode <= 0) || (mode > MAXSTRETCHBLTMODE))
1718     {
1719         SetLastError(ERROR_INVALID_PARAMETER);
1720         return 0;
1721     }
1722     if (!(dc = DC_GetDCPtr( hdc ))) return 0;
1723     if (dc->funcs->pSetStretchBltMode)
1724         ret = dc->funcs->pSetStretchBltMode( dc->physDev, mode );
1725     else
1726     {
1727         ret = dc->stretchBltMode;
1728         dc->stretchBltMode = mode;
1729     }
1730     GDI_ReleaseObj( hdc );
1731     return ret;
1732 }
1733
1734
1735 /***********************************************************************
1736  *              GetMapMode (GDI32.@)
1737  */
1738 INT WINAPI GetMapMode( HDC hdc )
1739 {
1740     INT ret = 0;
1741     DC * dc = DC_GetDCPtr( hdc );
1742     if (dc)
1743     {
1744         ret = dc->MapMode;
1745         GDI_ReleaseObj( hdc );
1746     }
1747     return ret;
1748 }
1749
1750
1751 /***********************************************************************
1752  *              GetBrushOrgEx (GDI32.@)
1753  */
1754 BOOL WINAPI GetBrushOrgEx( HDC hdc, LPPOINT pt )
1755 {
1756     DC * dc = DC_GetDCPtr( hdc );
1757     if (!dc) return FALSE;
1758     pt->x = dc->brushOrgX;
1759     pt->y = dc->brushOrgY;
1760     GDI_ReleaseObj( hdc );
1761     return TRUE;
1762 }
1763
1764
1765 /***********************************************************************
1766  *              GetCurrentPositionEx (GDI32.@)
1767  */
1768 BOOL WINAPI GetCurrentPositionEx( HDC hdc, LPPOINT pt )
1769 {
1770     DC * dc = DC_GetDCPtr( hdc );
1771     if (!dc) return FALSE;
1772     pt->x = dc->CursPosX;
1773     pt->y = dc->CursPosY;
1774     GDI_ReleaseObj( hdc );
1775     return TRUE;
1776 }
1777
1778
1779 /***********************************************************************
1780  *              GetViewportExtEx (GDI32.@)
1781  */
1782 BOOL WINAPI GetViewportExtEx( HDC hdc, LPSIZE size )
1783 {
1784     DC * dc = DC_GetDCPtr( hdc );
1785     if (!dc) return FALSE;
1786     size->cx = dc->vportExtX;
1787     size->cy = dc->vportExtY;
1788     GDI_ReleaseObj( hdc );
1789     return TRUE;
1790 }
1791
1792
1793 /***********************************************************************
1794  *              GetViewportOrgEx (GDI32.@)
1795  */
1796 BOOL WINAPI GetViewportOrgEx( HDC hdc, LPPOINT pt )
1797 {
1798     DC * dc = DC_GetDCPtr( hdc );
1799     if (!dc) return FALSE;
1800     pt->x = dc->vportOrgX;
1801     pt->y = dc->vportOrgY;
1802     GDI_ReleaseObj( hdc );
1803     return TRUE;
1804 }
1805
1806
1807 /***********************************************************************
1808  *              GetWindowExtEx (GDI32.@)
1809  */
1810 BOOL WINAPI GetWindowExtEx( HDC hdc, LPSIZE size )
1811 {
1812     DC * dc = DC_GetDCPtr( hdc );
1813     if (!dc) return FALSE;
1814     size->cx = dc->wndExtX;
1815     size->cy = dc->wndExtY;
1816     GDI_ReleaseObj( hdc );
1817     return TRUE;
1818 }
1819
1820
1821 /***********************************************************************
1822  *              GetWindowOrgEx (GDI32.@)
1823  */
1824 BOOL WINAPI GetWindowOrgEx( HDC hdc, LPPOINT pt )
1825 {
1826     DC * dc = DC_GetDCPtr( hdc );
1827     if (!dc) return FALSE;
1828     pt->x = dc->wndOrgX;
1829     pt->y = dc->wndOrgY;
1830     GDI_ReleaseObj( hdc );
1831     return TRUE;
1832 }
1833
1834
1835 /***********************************************************************
1836  *              InquireVisRgn   (GDI.131)
1837  */
1838 HRGN16 WINAPI InquireVisRgn16( HDC16 hdc )
1839 {
1840     HRGN16 ret = 0;
1841     DC * dc = DC_GetDCPtr( HDC_32(hdc) );
1842     if (dc)
1843     {
1844         ret = HRGN_16(dc->hVisRgn);
1845         GDI_ReleaseObj( HDC_32(hdc) );
1846     }
1847     return ret;
1848 }
1849
1850
1851 /***********************************************************************
1852  *              GetClipRgn (GDI.173)
1853  */
1854 HRGN16 WINAPI GetClipRgn16( HDC16 hdc )
1855 {
1856     HRGN16 ret = 0;
1857     DC * dc = DC_GetDCPtr( HDC_32(hdc) );
1858     if (dc)
1859     {
1860         ret = HRGN_16(dc->hClipRgn);
1861         GDI_ReleaseObj( HDC_32(hdc) );
1862     }
1863     return ret;
1864 }
1865
1866
1867 /***********************************************************************
1868  *           GetLayout    (GDI32.@)
1869  *
1870  * Gets left->right or right->left text layout flags of a dc.
1871  * win98 just returns 0 and sets ERROR_CALL_NOT_IMPLEMENTED so we do the same
1872  *
1873  */
1874 DWORD WINAPI GetLayout(HDC hdc)
1875 {
1876     FIXME("(%p): stub\n", hdc);
1877     SetLastError(ERROR_CALL_NOT_IMPLEMENTED);
1878     return 0;
1879 }
1880
1881 /***********************************************************************
1882  *           SetLayout    (GDI32.@)
1883  *
1884  * Sets left->right or right->left text layout flags of a dc.
1885  * win98 just returns 0 and sets ERROR_CALL_NOT_IMPLEMENTED so we do the same
1886  *
1887  */
1888 DWORD WINAPI SetLayout(HDC hdc, DWORD layout)
1889 {
1890     FIXME("(%p,%08lx): stub\n", hdc, layout);
1891     SetLastError(ERROR_CALL_NOT_IMPLEMENTED);
1892     return 0;
1893 }
1894
1895 /***********************************************************************
1896  *           GetDCBrushColor    (GDI32.@)
1897  *
1898  * Retrieves the current brush color for the specified device
1899  * context (DC).
1900  *
1901  */
1902 COLORREF WINAPI GetDCBrushColor(HDC hdc)
1903 {
1904     DC *dc;
1905     COLORREF dcBrushColor = CLR_INVALID;
1906
1907     TRACE("hdc(%p)\n", hdc);
1908
1909     dc = DC_GetDCPtr( hdc );
1910     if (dc)
1911     {
1912         dcBrushColor = dc->dcBrushColor;
1913         GDI_ReleaseObj( hdc );
1914     }
1915
1916     return dcBrushColor;
1917 }
1918
1919 /***********************************************************************
1920  *           SetDCBrushColor    (GDI32.@)
1921  *
1922  * Sets the current device context (DC) brush color to the specified
1923  * color value. If the device cannot represent the specified color
1924  * value, the color is set to the nearest physical color.
1925  *
1926  */
1927 COLORREF WINAPI SetDCBrushColor(HDC hdc, COLORREF crColor)
1928 {
1929     DC *dc;
1930     COLORREF oldClr = CLR_INVALID;
1931
1932     TRACE("hdc(%p) crColor(%08lx)\n", hdc, crColor);
1933
1934     dc = DC_GetDCPtr( hdc );
1935     if (dc)
1936     {
1937         if (dc->funcs->pSetDCBrushColor)
1938             crColor = dc->funcs->pSetDCBrushColor( dc->physDev, crColor );
1939         else if (dc->hBrush == GetStockObject( DC_BRUSH ))
1940         {
1941             /* If DC_BRUSH is selected, update driver pen color */
1942             HBRUSH hBrush = CreateSolidBrush( crColor );
1943             dc->funcs->pSelectBrush( dc->physDev, hBrush );
1944             DeleteObject( hBrush );
1945         }
1946
1947         if (crColor != CLR_INVALID)
1948         {
1949             oldClr = dc->dcBrushColor;
1950             dc->dcBrushColor = crColor;
1951         }
1952
1953         GDI_ReleaseObj( hdc );
1954     }
1955
1956     return oldClr;
1957 }
1958
1959 /***********************************************************************
1960  *           GetDCPenColor    (GDI32.@)
1961  *
1962  * Retrieves the current pen color for the specified device
1963  * context (DC).
1964  *
1965  */
1966 COLORREF WINAPI GetDCPenColor(HDC hdc)
1967 {
1968     DC *dc;
1969     COLORREF dcPenColor = CLR_INVALID;
1970
1971     TRACE("hdc(%p)\n", hdc);
1972
1973     dc = DC_GetDCPtr( hdc );
1974     if (dc)
1975     {
1976         dcPenColor = dc->dcPenColor;
1977         GDI_ReleaseObj( hdc );
1978     }
1979
1980     return dcPenColor;
1981 }
1982
1983 /***********************************************************************
1984  *           SetDCPenColor    (GDI32.@)
1985  *
1986  * Sets the current device context (DC) pen color to the specified
1987  * color value. If the device cannot represent the specified color
1988  * value, the color is set to the nearest physical color.
1989  *
1990  */
1991 COLORREF WINAPI SetDCPenColor(HDC hdc, COLORREF crColor)
1992 {
1993     DC *dc;
1994     COLORREF oldClr = CLR_INVALID;
1995
1996     TRACE("hdc(%p) crColor(%08lx)\n", hdc, crColor);
1997
1998     dc = DC_GetDCPtr( hdc );
1999     if (dc)
2000     {
2001         if (dc->funcs->pSetDCPenColor)
2002             crColor = dc->funcs->pSetDCPenColor( dc->physDev, crColor );
2003         else if (dc->hPen == GetStockObject( DC_PEN ))
2004         {
2005             /* If DC_PEN is selected, update the driver pen color */
2006             LOGPEN logpen = { PS_SOLID, { 0, 0 }, crColor };
2007             HPEN hPen = CreatePenIndirect( &logpen );
2008             dc->funcs->pSelectPen( dc->physDev, hPen );
2009             DeleteObject( hPen );
2010         }
2011
2012         if (crColor != CLR_INVALID)
2013         {
2014             oldClr = dc->dcPenColor;
2015             dc->dcPenColor = crColor;
2016         }
2017
2018         GDI_ReleaseObj( hdc );
2019     }
2020
2021     return oldClr;
2022 }
2023
2024 /***********************************************************************
2025  *           SetVirtualResolution   (GDI32.@)
2026  *
2027  * Undocumented on msdn.  Called when PowerPoint XP saves a file.
2028  */
2029 DWORD WINAPI SetVirtualResolution(HDC hdc, DWORD dw2, DWORD dw3, DWORD dw4, DWORD dw5)
2030 {
2031     FIXME("(%p %08lx %08lx %08lx %08lx): stub!\n", hdc, dw2, dw3, dw4, dw5);
2032     return FALSE;
2033 }