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