reactos/win32ss/gdi/ntgdi/dclife.c

   1 /*
   2  * COPYRIGHT:         See COPYING in the top level directory
   3  * PROJECT:           ReactOS kernel
   4  * PURPOSE:           Functions for creation and destruction of DCs
   5  * FILE:              subsystem/win32/win32k/objects/dclife.c
   6  * PROGRAMER:         Timo Kreuzer (timo.kreuzer@rectos.org)
   7  */
   8
   9 #include <win32k.h>
  10
  11 #define NDEBUG
  12 #include <debug.h>
  13
  14 // FIXME: Windows uses 0x0012009f
  15 #define DIRTY_DEFAULT DIRTY_CHARSET|DIRTY_BACKGROUND|DIRTY_TEXT|DIRTY_LINE|DIRTY_FILL
  16
  17 PSURFACE psurfDefaultBitmap = NULL;
  18 PBRUSH pbrDefaultBrush = NULL;
  19
  20 static const MATRIX     gmxWorldToDeviceDefault =
  21 {
  22     FLOATOBJ_16, FLOATOBJ_0,
  23     FLOATOBJ_0, FLOATOBJ_16,
  24     FLOATOBJ_0, FLOATOBJ_0,
  25     0, 0, 0x4b
  26 };
  27
  28 static const MATRIX     gmxDeviceToWorldDefault =
  29 {
  30     FLOATOBJ_1_16, FLOATOBJ_0,
  31     FLOATOBJ_0, FLOATOBJ_1_16,
  32     FLOATOBJ_0, FLOATOBJ_0,
  33     0, 0, 0x53
  34 };
  35
  36 static const MATRIX     gmxWorldToPageDefault =
  37 {
  38     FLOATOBJ_1, FLOATOBJ_0,
  39     FLOATOBJ_0, FLOATOBJ_1,
  40     FLOATOBJ_0, FLOATOBJ_0,
  41     0, 0, 0x63
  42 };
  43
  44 // HACK!! Fix XFORMOBJ then use 1:16 / 16:1
  45 #define gmxWorldToDeviceDefault gmxWorldToPageDefault
  46 #define gmxDeviceToWorldDefault gmxWorldToPageDefault
  47
  48 /** Internal functions ********************************************************/
  49
  50 INIT_FUNCTION
  51 NTSTATUS
  52 NTAPI
  53 InitDcImpl(VOID)
  54 {
  55     psurfDefaultBitmap = SURFACE_ShareLockSurface(StockObjects[DEFAULT_BITMAP]);
  56     if (!psurfDefaultBitmap)
  57         return STATUS_UNSUCCESSFUL;
  58
  59     pbrDefaultBrush = BRUSH_ShareLockBrush(StockObjects[BLACK_BRUSH]);
  60     if (!pbrDefaultBrush)
  61         return STATUS_UNSUCCESSFUL;
  62
  63     return STATUS_SUCCESS;
  64 }
  65
  66
  67 PDC
  68 NTAPI
  69 DC_AllocDcWithHandle(GDILOOBJTYPE eDcObjType)
  70 {
  71     PDC pdc;
  72
  73     NT_ASSERT((eDcObjType == GDILoObjType_LO_DC_TYPE) ||
  74               (eDcObjType == GDILoObjType_LO_ALTDC_TYPE));
  75
  76     /* Allocate the object */
  77     pdc = (PDC)GDIOBJ_AllocateObject(GDIObjType_DC_TYPE,
  78                                      sizeof(DC),
  79                                      BASEFLAG_LOOKASIDE);
  80     if (!pdc)
  81     {
  82         DPRINT1("Could not allocate a DC.\n");
  83         return NULL;
  84     }
  85
  86     /* Set the actual DC type */
  87     pdc->BaseObject.hHmgr = UlongToHandle(eDcObjType);
  88
  89     pdc->pdcattr = &pdc->dcattr;
  90
  91     /* Insert the object */
  92     if (!GDIOBJ_hInsertObject(&pdc->BaseObject, GDI_OBJ_HMGR_POWNED))
  93     {
  94         /// FIXME: this is broken, since the DC is not initialized yet...
  95         DPRINT1("Could not insert DC into handle table.\n");
  96         GDIOBJ_vFreeObject(&pdc->BaseObject);
  97         return NULL;
  98     }
  99
 100     return pdc;
 101 }
 102
 103
 104 void
 105 DC_InitHack(PDC pdc)
 106 {
 107     if (defaultDCstate == NULL)
 108     {
 109         defaultDCstate = ExAllocatePoolWithTag(PagedPool, sizeof(DC), TAG_DC);
 110         ASSERT(defaultDCstate);
 111         RtlZeroMemory(defaultDCstate, sizeof(DC));
 112         defaultDCstate->pdcattr = &defaultDCstate->dcattr;
 113         DC_vCopyState(pdc, defaultDCstate, TRUE);
 114     }
 115
 116     TextIntRealizeFont(pdc->pdcattr->hlfntNew,NULL);
 117     pdc->pdcattr->iCS_CP = ftGdiGetTextCharsetInfo(pdc,NULL,0);
 118
 119     /* This should never fail */
 120     ASSERT(pdc->dclevel.ppal);
 121 }
 122
 123 VOID
 124 NTAPI
 125 DC_vInitDc(
 126     PDC pdc,
 127     DCTYPE dctype,
 128     PPDEVOBJ ppdev)
 129 {
 130     /* Setup some basic fields */
 131     pdc->dctype = dctype;
 132     pdc->ppdev = ppdev;
 133     pdc->dhpdev = ppdev->dhpdev;
 134     pdc->hsem = ppdev->hsemDevLock;
 135     pdc->flGraphicsCaps = ppdev->devinfo.flGraphicsCaps;
 136     pdc->flGraphicsCaps2 = ppdev->devinfo.flGraphicsCaps2;
 137     pdc->fs = DC_DIRTY_RAO;
 138
 139     /* Setup dc attribute */
 140     pdc->pdcattr = &pdc->dcattr;
 141     pdc->dcattr.pvLDC = NULL;
 142     pdc->dcattr.ulDirty_ = DIRTY_DEFAULT;
 143     if (ppdev == gppdevPrimary)
 144         pdc->dcattr.ulDirty_ |= DC_PRIMARY_DISPLAY;
 145
 146     /* Setup the DC size */
 147     if (dctype == DCTYPE_MEMORY)
 148     {
 149         /* Memory DCs have a 1 x 1 bitmap by default */
 150         pdc->dclevel.sizl.cx = 1;
 151         pdc->dclevel.sizl.cy = 1;
 152     }
 153     else
 154     {
 155         /* Other DC's are as big as the related PDEV */
 156             pdc->dclevel.sizl.cx = ppdev->gdiinfo.ulHorzRes;
 157             pdc->dclevel.sizl.cy = ppdev->gdiinfo.ulVertRes;
 158     }
 159
 160     /* Setup Window rect based on DC size */
 161     pdc->erclWindow.left = 0;
 162     pdc->erclWindow.top = 0;
 163     pdc->erclWindow.right = pdc->dclevel.sizl.cx;
 164     pdc->erclWindow.bottom = pdc->dclevel.sizl.cy;
 165
 166     if (dctype == DCTYPE_DIRECT)
 167     {
 168         /* Direct DCs get the surface from the PDEV */
 169         pdc->dclevel.pSurface = PDEVOBJ_pSurface(ppdev);
 170
 171         pdc->erclBounds.left = 0x7fffffff;
 172         pdc->erclBounds.top = 0x7fffffff;
 173         pdc->erclBounds.right = 0x80000000;
 174         pdc->erclBounds.bottom = 0x80000000;
 175         pdc->erclBoundsApp.left = 0xffffffff;
 176         pdc->erclBoundsApp.top = 0xfffffffc;
 177         pdc->erclBoundsApp.right = 0x00007ffc; // FIXME
 178         pdc->erclBoundsApp.bottom = 0x00000333; // FIXME
 179         pdc->erclClip = pdc->erclBounds;
 180         pdc->co = gxcoTrivial;
 181     }
 182     else
 183     {
 184         /* Non-direct DCs don't have a surface by default */
 185         pdc->dclevel.pSurface = NULL;
 186
 187         pdc->erclBounds.left = 0;
 188         pdc->erclBounds.top = 0;
 189         pdc->erclBounds.right = 0;
 190         pdc->erclBounds.bottom = 0;
 191         pdc->erclBoundsApp = pdc->erclBounds;
 192         pdc->erclClip = pdc->erclWindow;
 193         pdc->co = gxcoTrivial;
 194     }
 195
 196       //pdc->dcattr.VisRectRegion:
 197
 198     /* Setup coordinate transformation data */
 199         pdc->dclevel.mxWorldToDevice = gmxWorldToDeviceDefault;
 200         pdc->dclevel.mxDeviceToWorld = gmxDeviceToWorldDefault;
 201         pdc->dclevel.mxWorldToPage = gmxWorldToPageDefault;
 202         pdc->dclevel.efM11PtoD = gef16;
 203         pdc->dclevel.efM22PtoD = gef16;
 204         pdc->dclevel.efDxPtoD = gef0;
 205         pdc->dclevel.efDyPtoD = gef0;
 206         pdc->dclevel.efM11_TWIPS = gef0;
 207         pdc->dclevel.efM22_TWIPS = gef0;
 208         pdc->dclevel.efPr11 = gef0;
 209         pdc->dclevel.efPr22 = gef0;
 210         pdc->dcattr.mxWorldToDevice = pdc->dclevel.mxWorldToDevice;
 211         pdc->dcattr.mxDeviceToWorld = pdc->dclevel.mxDeviceToWorld;
 212         pdc->dcattr.mxWorldToPage = pdc->dclevel.mxWorldToPage;
 213         pdc->dcattr.efM11PtoD = pdc->dclevel.efM11PtoD;
 214         pdc->dcattr.efM22PtoD = pdc->dclevel.efM22PtoD;
 215         pdc->dcattr.efDxPtoD = pdc->dclevel.efDxPtoD;
 216         pdc->dcattr.efDyPtoD = pdc->dclevel.efDyPtoD;
 217         pdc->dcattr.iMapMode = MM_TEXT;
 218         pdc->dcattr.dwLayout = 0;
 219         pdc->dcattr.flXform = PAGE_TO_DEVICE_SCALE_IDENTITY |
 220                               PAGE_TO_DEVICE_IDENTITY |
 221                               WORLD_TO_PAGE_IDENTITY;
 222
 223     /* Setup more coordinates */
 224     pdc->ptlDCOrig.x = 0;
 225     pdc->ptlDCOrig.y = 0;
 226         pdc->dcattr.lWindowOrgx = 0;
 227         pdc->dcattr.ptlWindowOrg.x = 0;
 228         pdc->dcattr.ptlWindowOrg.y = 0;
 229         pdc->dcattr.szlWindowExt.cx = 1;
 230         pdc->dcattr.szlWindowExt.cy = 1;
 231         pdc->dcattr.ptlViewportOrg.x = 0;
 232         pdc->dcattr.ptlViewportOrg.y = 0;
 233         pdc->dcattr.szlViewportExt.cx = 1;
 234         pdc->dcattr.szlViewportExt.cy = 1;
 235     pdc->dcattr.szlVirtualDevicePixel.cx = ppdev->gdiinfo.ulHorzRes;
 236     pdc->dcattr.szlVirtualDevicePixel.cy = ppdev->gdiinfo.ulVertRes;
 237     pdc->dcattr.szlVirtualDeviceMm.cx = ppdev->gdiinfo.ulHorzSize;
 238     pdc->dcattr.szlVirtualDeviceMm.cy = ppdev->gdiinfo.ulVertSize;
 239     pdc->dcattr.szlVirtualDeviceSize.cx = 0;
 240     pdc->dcattr.szlVirtualDeviceSize.cy = 0;
 241
 242     /* Setup regions */
 243     pdc->prgnAPI = NULL;
 244         pdc->prgnRao = NULL;
 245         pdc->dclevel.prgnClip = NULL;
 246         pdc->dclevel.prgnMeta = NULL;
 247     /* Allocate a Vis region */
 248     pdc->prgnVis = IntSysCreateRectpRgn(0, 0, pdc->dclevel.sizl.cx, pdc->dclevel.sizl.cy);
 249         ASSERT(pdc->prgnVis);
 250
 251         /* Initialize Clip object */
 252         IntEngInitClipObj(&pdc->co);
 253
 254     /* Setup palette */
 255     pdc->dclevel.hpal = StockObjects[DEFAULT_PALETTE];
 256     pdc->dclevel.ppal = PALETTE_ShareLockPalette(pdc->dclevel.hpal);
 257
 258     /* Setup path */
 259         pdc->dclevel.hPath = NULL;
 260     pdc->dclevel.flPath = 0;
 261 //      pdc->dclevel.lapath:
 262
 263     /* Setup colors */
 264         pdc->dcattr.crBackgroundClr = RGB(0xff, 0xff, 0xff);
 265         pdc->dcattr.ulBackgroundClr = RGB(0xff, 0xff, 0xff);
 266         pdc->dcattr.crForegroundClr = RGB(0, 0, 0);
 267         pdc->dcattr.ulForegroundClr = RGB(0, 0, 0);
 268         pdc->dcattr.crBrushClr = RGB(0xff, 0xff, 0xff);
 269         pdc->dcattr.ulBrushClr = RGB(0xff, 0xff, 0xff);
 270         pdc->dcattr.crPenClr = RGB(0, 0, 0);
 271         pdc->dcattr.ulPenClr = RGB(0, 0, 0);
 272
 273     /* Select the default fill and line brush */
 274         pdc->dcattr.hbrush = StockObjects[WHITE_BRUSH];
 275         pdc->dcattr.hpen = StockObjects[BLACK_PEN];
 276     pdc->dclevel.pbrFill = BRUSH_ShareLockBrush(pdc->pdcattr->hbrush);
 277     pdc->dclevel.pbrLine = PEN_ShareLockPen(pdc->pdcattr->hpen);
 278         pdc->dclevel.ptlBrushOrigin.x = 0;
 279         pdc->dclevel.ptlBrushOrigin.y = 0;
 280         pdc->dcattr.ptlBrushOrigin = pdc->dclevel.ptlBrushOrigin;
 281
 282     /* Initialize EBRUSHOBJs */
 283     EBRUSHOBJ_vInitFromDC(&pdc->eboFill, pdc->dclevel.pbrFill, pdc);
 284     EBRUSHOBJ_vInitFromDC(&pdc->eboLine, pdc->dclevel.pbrLine, pdc);
 285     EBRUSHOBJ_vInitFromDC(&pdc->eboText, pbrDefaultBrush, pdc);
 286     EBRUSHOBJ_vInitFromDC(&pdc->eboBackground, pbrDefaultBrush, pdc);
 287
 288     /* Setup fill data */
 289         pdc->dcattr.jROP2 = R2_COPYPEN;
 290         pdc->dcattr.jBkMode = 2;
 291         pdc->dcattr.lBkMode = 2;
 292         pdc->dcattr.jFillMode = ALTERNATE;
 293         pdc->dcattr.lFillMode = 1;
 294         pdc->dcattr.jStretchBltMode = 1;
 295         pdc->dcattr.lStretchBltMode = 1;
 296     pdc->ptlFillOrigin.x = 0;
 297     pdc->ptlFillOrigin.y = 0;
 298
 299     /* Setup drawing position */
 300         pdc->dcattr.ptlCurrent.x = 0;
 301         pdc->dcattr.ptlCurrent.y = 0;
 302         pdc->dcattr.ptfxCurrent.x = 0;
 303         pdc->dcattr.ptfxCurrent.y = 0;
 304
 305         /* Setup ICM data */
 306         pdc->dclevel.lIcmMode = 0;
 307         pdc->dcattr.lIcmMode = 0;
 308         pdc->dcattr.hcmXform = NULL;
 309         pdc->dcattr.flIcmFlags = 0;
 310         pdc->dcattr.IcmBrushColor = CLR_INVALID;
 311         pdc->dcattr.IcmPenColor = CLR_INVALID;
 312         pdc->dcattr.pvLIcm = NULL;
 313     pdc->dcattr.hColorSpace = NULL; // FIXME: 0189001f
 314         pdc->dclevel.pColorSpace = NULL; // FIXME
 315     pdc->pClrxFormLnk = NULL;
 316 //      pdc->dclevel.ca =
 317
 318         /* Setup font data */
 319     pdc->hlfntCur = NULL; // FIXME: 2f0a0cf8
 320     pdc->pPFFList = NULL;
 321     pdc->flSimulationFlags = 0;
 322     pdc->lEscapement = 0;
 323     pdc->prfnt = NULL;
 324         pdc->dcattr.flFontMapper = 0;
 325         pdc->dcattr.flTextAlign = 0;
 326         pdc->dcattr.lTextAlign = 0;
 327         pdc->dcattr.lTextExtra = 0;
 328         pdc->dcattr.lRelAbs = 1;
 329         pdc->dcattr.lBreakExtra = 0;
 330         pdc->dcattr.cBreak = 0;
 331     pdc->dcattr.hlfntNew = StockObjects[SYSTEM_FONT];
 332     pdc->dclevel.plfnt = LFONT_ShareLockFont(pdc->dcattr.hlfntNew);
 333
 334     /* Other stuff */
 335     pdc->hdcNext = NULL;
 336     pdc->hdcPrev = NULL;
 337     pdc->ipfdDevMax = 0;
 338     pdc->ulCopyCount = -1;
 339     pdc->ptlDoBanding.x = 0;
 340     pdc->ptlDoBanding.y = 0;
 341         pdc->dclevel.lSaveDepth = 1;
 342         pdc->dclevel.hdcSave = NULL;
 343         pdc->dcattr.iGraphicsMode = GM_COMPATIBLE;
 344         pdc->dcattr.iCS_CP = 0;
 345     pdc->pSurfInfo = NULL;
 346 }
 347
 348 VOID
 349 NTAPI
 350 DC_vCleanup(PVOID ObjectBody)
 351 {
 352     PDC pdc = (PDC)ObjectBody;
 353
 354     /* Free DC_ATTR */
 355     DC_vFreeDcAttr(pdc);
 356
 357     /* Delete saved DCs */
 358     DC_vRestoreDC(pdc, 1);
 359
 360     /* Deselect dc objects */
 361     DC_vSelectSurface(pdc, NULL);
 362     DC_vSelectFillBrush(pdc, NULL);
 363     DC_vSelectLineBrush(pdc, NULL);
 364     DC_vSelectPalette(pdc, NULL);
 365
 366     /* Cleanup the dc brushes */
 367     EBRUSHOBJ_vCleanup(&pdc->eboFill);
 368     EBRUSHOBJ_vCleanup(&pdc->eboLine);
 369     EBRUSHOBJ_vCleanup(&pdc->eboText);
 370     EBRUSHOBJ_vCleanup(&pdc->eboBackground);
 371
 372     /* Release font */
 373     LFONT_ShareUnlockFont(pdc->dclevel.plfnt);
 374
 375     /*  Free regions */
 376     if (pdc->dclevel.prgnClip)
 377         REGION_Delete(pdc->dclevel.prgnClip);
 378     if (pdc->dclevel.prgnMeta)
 379         REGION_Delete(pdc->dclevel.prgnMeta);
 380     if (pdc->prgnVis)
 381         REGION_Delete(pdc->prgnVis);
 382     if (pdc->prgnRao)
 383         REGION_Delete(pdc->prgnRao);
 384     if (pdc->prgnAPI)
 385         REGION_Delete(pdc->prgnAPI);
 386
 387     /* Free CLIPOBJ resources */
 388     IntEngFreeClipResources(&pdc->co);
 389
 390     PATH_Delete(pdc->dclevel.hPath);
 391
 392     if(pdc->dclevel.pSurface)
 393         SURFACE_ShareUnlockSurface(pdc->dclevel.pSurface);
 394
 395     PDEVOBJ_vRelease(pdc->ppdev) ;
 396 }
 397
 398 VOID
 399 NTAPI
 400 DC_vSetOwner(PDC pdc, ULONG ulOwner)
 401 {
 402     if (pdc->dclevel.hPath)
 403     {
 404         GreSetObjectOwner(pdc->dclevel.hPath, ulOwner);
 405     }
 406
 407     /* Dereference current brush and pen */
 408     BRUSH_ShareUnlockBrush(pdc->dclevel.pbrFill);
 409     BRUSH_ShareUnlockBrush(pdc->dclevel.pbrLine);
 410
 411     /* Select the default fill and line brush */
 412     pdc->dcattr.hbrush = StockObjects[WHITE_BRUSH];
 413     pdc->dcattr.hpen = StockObjects[BLACK_PEN];
 414     pdc->dclevel.pbrFill = BRUSH_ShareLockBrush(pdc->pdcattr->hbrush);
 415     pdc->dclevel.pbrLine = PEN_ShareLockPen(pdc->pdcattr->hpen);
 416
 417     /* Mark them as dirty */
 418     pdc->pdcattr->ulDirty_ |= DIRTY_FILL|DIRTY_LINE;
 419
 420     /* Allocate or free DC attribute */
 421     if (ulOwner == GDI_OBJ_HMGR_PUBLIC || ulOwner == GDI_OBJ_HMGR_NONE)
 422     {
 423         if (pdc->pdcattr != &pdc->dcattr)
 424             DC_vFreeDcAttr(pdc);
 425     }
 426     else if (ulOwner == GDI_OBJ_HMGR_POWNED)
 427     {
 428         if (pdc->pdcattr == &pdc->dcattr)
 429             DC_bAllocDcAttr(pdc);
 430     }
 431
 432     /* Set the DC's ownership */
 433     GDIOBJ_vSetObjectOwner(&pdc->BaseObject, ulOwner);
 434 }
 435
 436 BOOL
 437 NTAPI
 438 GreSetDCOwner(HDC hdc, ULONG ulOwner)
 439 {
 440     PDC pdc;
 441
 442     pdc = DC_LockDc(hdc);
 443     if (!pdc)
 444     {
 445         DPRINT1("GreSetDCOwner: Could not lock DC\n");
 446         return FALSE;
 447     }
 448
 449     /* Call the internal DC function */
 450     DC_vSetOwner(pdc, ulOwner);
 451
 452     DC_UnlockDc(pdc);
 453     return TRUE;
 454 }
 455
 456 static
 457 void
 458 DC_vUpdateDC(PDC pdc)
 459 {
 460     // PREGION VisRgn ;
 461     PPDEVOBJ ppdev = pdc->ppdev;
 462
 463     pdc->dhpdev = ppdev->dhpdev;
 464
 465     SURFACE_ShareUnlockSurface(pdc->dclevel.pSurface);
 466     pdc->dclevel.pSurface = PDEVOBJ_pSurface(ppdev);
 467
 468     PDEVOBJ_sizl(pdc->ppdev, &pdc->dclevel.sizl);
 469 #if 0
 470     VisRgn = IntSysCreateRectpRgn(0, 0, pdc->dclevel.sizl.cx, pdc->dclevel.sizl.cy);
 471     ASSERT(VisRgn);
 472     GdiSelectVisRgn(pdc->BaseObject.hHmgr, VisRgn);
 473     REGION_Delete(VisRgn);
 474 #endif
 475
 476     pdc->flGraphicsCaps = ppdev->devinfo.flGraphicsCaps;
 477     pdc->flGraphicsCaps2 = ppdev->devinfo.flGraphicsCaps2;
 478
 479     /* Mark EBRUSHOBJs as dirty */
 480     pdc->pdcattr->ulDirty_ |= DIRTY_DEFAULT ;
 481 }
 482
 483 /* Prepare a blit for up to 2 DCs */
 484 /* rc1 and rc2 are the rectangles where we want to draw or
 485  * from where we take pixels. */
 486 VOID
 487 FASTCALL
 488 DC_vPrepareDCsForBlit(
 489     PDC pdcDest,
 490     const RECT* rcDest,
 491     PDC pdcSrc,
 492     const RECT* rcSrc)
 493 {
 494     PDC pdcFirst, pdcSecond;
 495     const RECT *prcFirst, *prcSecond;
 496
 497     /* Update brushes */
 498     if (pdcDest->pdcattr->ulDirty_ & (DIRTY_FILL | DC_BRUSH_DIRTY))
 499         DC_vUpdateFillBrush(pdcDest);
 500     if (pdcDest->pdcattr->ulDirty_ & (DIRTY_LINE | DC_PEN_DIRTY))
 501         DC_vUpdateLineBrush(pdcDest);
 502     if(pdcDest->pdcattr->ulDirty_ & DIRTY_TEXT)
 503         DC_vUpdateTextBrush(pdcDest);
 504
 505     /* Lock them in good order */
 506     if (pdcSrc)
 507     {
 508         if((ULONG_PTR)pdcDest->ppdev->hsemDevLock >=
 509            (ULONG_PTR)pdcSrc->ppdev->hsemDevLock)
 510         {
 511             pdcFirst = pdcDest;
 512             prcFirst = rcDest;
 513             pdcSecond = pdcSrc;
 514             prcSecond = rcSrc;
 515         }
 516         else
 517         {
 518             pdcFirst = pdcSrc;
 519             prcFirst = rcSrc;
 520             pdcSecond = pdcDest;
 521             prcSecond = rcDest;
 522         }
 523     }
 524     else
 525     {
 526         pdcFirst = pdcDest;
 527         prcFirst = rcDest;
 528         pdcSecond = NULL;
 529         prcSecond = NULL;
 530     }
 531
 532     if (pdcDest->fs & DC_FLAG_DIRTY_RAO)
 533         CLIPPING_UpdateGCRegion(pdcDest);
 534
 535     /* Lock and update first DC */
 536     if (pdcFirst->dctype == DCTYPE_DIRECT)
 537     {
 538         EngAcquireSemaphore(pdcFirst->ppdev->hsemDevLock);
 539
 540         /* Update surface if needed */
 541         if (pdcFirst->ppdev->pSurface != pdcFirst->dclevel.pSurface)
 542         {
 543             DC_vUpdateDC(pdcFirst);
 544         }
 545     }
 546
 547     if (pdcFirst->dctype == DCTYPE_DIRECT)
 548     {
 549         if (!prcFirst)
 550             prcFirst = &pdcFirst->erclClip;
 551
 552         MouseSafetyOnDrawStart(pdcFirst->ppdev,
 553                                prcFirst->left,
 554                                prcFirst->top,
 555                                prcFirst->right,
 556                                prcFirst->bottom) ;
 557     }
 558
 559 #ifdef DBG
 560     pdcFirst->fs |= DC_PREPARED;
 561 #endif
 562
 563     if (!pdcSecond)
 564         return;
 565
 566     /* Lock and update second DC */
 567     if (pdcSecond->dctype == DCTYPE_DIRECT)
 568     {
 569         EngAcquireSemaphore(pdcSecond->ppdev->hsemDevLock);
 570
 571         /* Update surface if needed */
 572         if (pdcSecond->ppdev->pSurface != pdcSecond->dclevel.pSurface)
 573         {
 574             DC_vUpdateDC(pdcSecond);
 575         }
 576     }
 577
 578     if (pdcSecond->dctype == DCTYPE_DIRECT)
 579     {
 580         if (!prcSecond)
 581             prcSecond = &pdcSecond->erclClip;
 582         MouseSafetyOnDrawStart(pdcSecond->ppdev,
 583                                prcSecond->left,
 584                                prcSecond->top,
 585                                prcSecond->right,
 586                                prcSecond->bottom) ;
 587     }
 588
 589 #ifdef DBG
 590     pdcSecond->fs |= DC_PREPARED;
 591 #endif
 592 }
 593
 594 /* Finishes a blit for one or two DCs */
 595 VOID
 596 FASTCALL
 597 DC_vFinishBlit(PDC pdc1, PDC pdc2)
 598 {
 599     if (pdc1->dctype == DCTYPE_DIRECT)
 600     {
 601         MouseSafetyOnDrawEnd(pdc1->ppdev);
 602         EngReleaseSemaphore(pdc1->ppdev->hsemDevLock);
 603     }
 604 #ifdef DBG
 605     pdc1->fs &= ~DC_PREPARED;
 606 #endif
 607
 608     if (pdc2)
 609     {
 610         if (pdc2->dctype == DCTYPE_DIRECT)
 611         {
 612             MouseSafetyOnDrawEnd(pdc2->ppdev);
 613             EngReleaseSemaphore(pdc2->ppdev->hsemDevLock);
 614         }
 615 #ifdef DBG
 616         pdc2->fs &= ~DC_PREPARED;
 617 #endif
 618     }
 619 }
 620
 621 HDC
 622 NTAPI
 623 GreOpenDCW(
 624     PUNICODE_STRING pustrDevice,
 625     DEVMODEW *pdmInit,
 626     PUNICODE_STRING pustrLogAddr,
 627     ULONG iType,
 628     BOOL bDisplay,
 629     HANDLE hspool,
 630     VOID *pDriverInfo2,
 631     VOID *pUMdhpdev)
 632 {
 633     PPDEVOBJ ppdev;
 634     PDC pdc;
 635     HDC hdc;
 636
 637     DPRINT("GreOpenDCW(%S, iType=%lu)\n",
 638            pustrDevice ? pustrDevice->Buffer : NULL, iType);
 639
 640     /* Get a PDEVOBJ for the device */
 641     ppdev = EngpGetPDEV(pustrDevice);
 642     if (!ppdev)
 643     {
 644         DPRINT1("Didn't find a suitable PDEV\n");
 645         return NULL;
 646     }
 647
 648     DPRINT("GreOpenDCW - ppdev = %p\n", ppdev);
 649
 650     pdc = DC_AllocDcWithHandle(GDILoObjType_LO_DC_TYPE);
 651     if (!pdc)
 652     {
 653         DPRINT1("Could not Allocate a DC\n");
 654         PDEVOBJ_vRelease(ppdev);
 655         return NULL;
 656     }
 657     hdc = pdc->BaseObject.hHmgr;
 658
 659     /* Lock ppdev and initialize the new DC */
 660     DC_vInitDc(pdc, iType, ppdev);
 661     /* FIXME: HACK! */
 662     DC_InitHack(pdc);
 663
 664     DC_bAllocDcAttr(pdc);
 665
 666     DC_UnlockDc(pdc);
 667
 668     DPRINT("Returning hdc = %p\n", hdc);
 669
 670     return hdc;
 671 }
 672
 673 __kernel_entry
 674 HDC
 675 APIENTRY
 676 NtGdiOpenDCW(
 677     _In_opt_ PUNICODE_STRING pustrDevice,
 678     _In_ DEVMODEW *pdmInit,
 679     _In_ PUNICODE_STRING pustrLogAddr,
 680     _In_ ULONG iType,
 681     _In_ BOOL bDisplay,
 682     _In_opt_ HANDLE hspool,
 683     _In_opt_ DRIVER_INFO_2W *pDriverInfo2,
 684     _At_((PUMDHPDEV*)pUMdhpdev, _Out_) PVOID pUMdhpdev)
 685 {
 686     UNICODE_STRING ustrDevice;
 687     WCHAR awcDevice[CCHDEVICENAME];
 688     DEVMODEW dmInit;
 689     PVOID dhpdev;
 690     HDC hdc;
 691
 692     /* Only if a devicename is given, we need any data */
 693     if (pustrDevice)
 694     {
 695         /* Initialize destination string */
 696         RtlInitEmptyUnicodeString(&ustrDevice, awcDevice, sizeof(awcDevice));
 697
 698         _SEH2_TRY
 699         {
 700             /* Probe the UNICODE_STRING and the buffer */
 701             ProbeForRead(pustrDevice, sizeof(UNICODE_STRING), 1);
 702             ProbeForRead(pustrDevice->Buffer, pustrDevice->Length, 1);
 703
 704             /* Copy the string */
 705             RtlCopyUnicodeString(&ustrDevice, pustrDevice);
 706
 707             if (pdmInit)
 708             {
 709                 /* FIXME: could be larger */
 710                 /* According to a comment in Windows SDK the size of the buffer for
 711                    pdm is (pdm->dmSize + pdm->dmDriverExtra) */
 712                 ProbeForRead(pdmInit, sizeof(DEVMODEW), 1);
 713                 RtlCopyMemory(&dmInit, pdmInit, sizeof(DEVMODEW));
 714             }
 715
 716             if (pUMdhpdev)
 717             {
 718                 ProbeForWrite(pUMdhpdev, sizeof(HANDLE), 1);
 719             }
 720         }
 721         _SEH2_EXCEPT(EXCEPTION_EXECUTE_HANDLER)
 722         {
 723             SetLastNtError(_SEH2_GetExceptionCode());
 724             _SEH2_YIELD(return NULL);
 725         }
 726         _SEH2_END
 727     }
 728     else
 729     {
 730         pdmInit = NULL;
 731         pUMdhpdev = NULL;
 732     }
 733
 734     /* FIXME: HACK! */
 735     if (pustrDevice)
 736     {
 737         UNICODE_STRING ustrDISPLAY = RTL_CONSTANT_STRING(L"DISPLAY");
 738         if (RtlEqualUnicodeString(&ustrDevice, &ustrDISPLAY, TRUE))
 739         {
 740             pustrDevice = NULL;
 741         }
 742     }
 743
 744     /* Call the internal function */
 745     hdc = GreOpenDCW(pustrDevice ? &ustrDevice : NULL,
 746                      pdmInit ? &dmInit : NULL,
 747                      NULL, // FIXME: pwszLogAddress
 748                      iType,
 749                      bDisplay,
 750                      hspool,
 751                      NULL, // FIXME: pDriverInfo2
 752                      pUMdhpdev ? &dhpdev : NULL);
 753
 754     /* If we got a HDC and a UM dhpdev is requested,... */
 755     if (hdc && pUMdhpdev)
 756     {
 757         /* Copy dhpdev to caller (FIXME: use dhpdev?) */
 758         _SEH2_TRY
 759         {
 760             /* Pointer was already probed */
 761             *(HANDLE*)pUMdhpdev = dhpdev;
 762         }
 763         _SEH2_EXCEPT(EXCEPTION_EXECUTE_HANDLER)
 764         {
 765             /* Ignore error */
 766             (void)0;
 767         }
 768         _SEH2_END
 769     }
 770
 771     return hdc;
 772 }
 773
 774
 775 HDC
 776 APIENTRY
 777 GreCreateCompatibleDC(HDC hdc, BOOL bAltDc)
 778 {
 779     GDILOOBJTYPE eDcObjType;
 780     HDC hdcNew;
 781     PPDEVOBJ ppdev;
 782     PDC pdc, pdcNew;
 783
 784     DPRINT("NtGdiCreateCompatibleDC(0x%p)\n", hdc);
 785
 786     /* Did the caller provide a DC? */
 787     if (hdc)
 788     {
 789         /* Yes, try to lock it */
 790         pdc = DC_LockDc(hdc);
 791         if (!pdc)
 792         {
 793             DPRINT1("Could not lock source DC %p\n", hdc);
 794             return NULL;
 795         }
 796
 797         /* Get the pdev from the DC */
 798         ppdev = pdc->ppdev;
 799         InterlockedIncrement(&ppdev->cPdevRefs);
 800
 801         /* Unlock the source DC */
 802         DC_UnlockDc(pdc);
 803     }
 804     else
 805     {
 806         /* No DC given, get default device */
 807         ppdev = EngpGetPDEV(NULL);
 808     }
 809
 810     if (!ppdev)
 811     {
 812         DPRINT1("Didn't find a suitable PDEV\n");
 813         return NULL;
 814     }
 815
 816     /* Allocate a new DC */
 817     eDcObjType = bAltDc ? GDILoObjType_LO_ALTDC_TYPE : GDILoObjType_LO_DC_TYPE;
 818     pdcNew = DC_AllocDcWithHandle(eDcObjType);
 819     if (!pdcNew)
 820     {
 821         DPRINT1("Could not allocate a new DC\n");
 822         PDEVOBJ_vRelease(ppdev);
 823         return NULL;
 824     }
 825     hdcNew = pdcNew->BaseObject.hHmgr;
 826
 827     /* Lock ppdev and initialize the new DC */
 828     DC_vInitDc(pdcNew, bAltDc ? DCTYPE_INFO : DCTYPE_MEMORY, ppdev);
 829     /* FIXME: HACK! */
 830     DC_InitHack(pdcNew);
 831
 832     /* Allocate a dc attribute */
 833     DC_bAllocDcAttr(pdcNew);
 834
 835     DC_UnlockDc(pdcNew);
 836
 837     DPRINT("Leave NtGdiCreateCompatibleDC hdcNew = %p\n", hdcNew);
 838
 839     return hdcNew;
 840 }
 841
 842 HDC
 843 APIENTRY
 844 NtGdiCreateCompatibleDC(HDC hdc)
 845 {
 846     /* Call the internal function to create a normal memory DC */
 847     return GreCreateCompatibleDC(hdc, FALSE);
 848 }
 849
 850 BOOL
 851 FASTCALL
 852 IntGdiDeleteDC(HDC hDC, BOOL Force)
 853 {
 854     PDC DCToDelete = DC_LockDc(hDC);
 855
 856     if (DCToDelete == NULL)
 857     {
 858         EngSetLastError(ERROR_INVALID_HANDLE);
 859         return FALSE;
 860     }
 861
 862     if (!Force)
 863     {
 864         /* Windows permits NtGdiDeleteObjectApp to delete a permanent DC
 865          * For some reason, it's still a valid handle, pointing to some kernel data.
 866          * Not sure if this is a bug, a feature, some cache stuff... Who knows?
 867          * See NtGdiDeleteObjectApp test for details */
 868         if (DCToDelete->fs & DC_FLAG_PERMANENT)
 869         {
 870             DC_UnlockDc(DCToDelete);
 871             if(UserReleaseDC(NULL, hDC, FALSE))
 872             {
 873                 /* ReactOS feature: Call UserReleaseDC
 874                  * I don't think Windows does it.
 875                  * Still, complain, no one should ever call DeleteDC
 876                  * on a window DC */
 877                  DPRINT1("No, you naughty application!\n");
 878                  return TRUE;
 879             }
 880             else
 881             {
 882                 /* This is not a window owned DC.
 883                  * Force its deletion */
 884                 return IntGdiDeleteDC(hDC, TRUE);
 885             }
 886         }
 887     }
 888
 889     DC_UnlockDc(DCToDelete);
 890
 891     if (GreIsHandleValid(hDC))
 892     {
 893         if (!GreDeleteObject(hDC))
 894         {
 895             DPRINT1("DC_FreeDC failed\n");
 896             return FALSE;
 897         }
 898     }
 899     else
 900     {
 901         DPRINT1("Attempted to Delete 0x%p currently being destroyed!!!\n", hDC);
 902         return FALSE;
 903     }
 904
 905     return TRUE;
 906 }
 907
 908 BOOL
 909 APIENTRY
 910 NtGdiDeleteObjectApp(HANDLE hobj)
 911 {
 912     /* Complete all pending operations */
 913     NtGdiFlushUserBatch(); // FIXME: We shouldn't need this
 914
 915     if (GDI_HANDLE_IS_STOCKOBJ(hobj)) return TRUE;
 916
 917     if (GreGetObjectOwner(hobj) != GDI_OBJ_HMGR_POWNED)
 918     {
 919         EngSetLastError(ERROR_INVALID_HANDLE);
 920         return FALSE;
 921     }
 922
 923     if (GDI_HANDLE_GET_TYPE(hobj) != GDI_OBJECT_TYPE_DC)
 924         return GreDeleteObject(hobj);
 925
 926     // FIXME: Everything should be callback based
 927     return IntGdiDeleteDC(hobj, FALSE);
 928 }
 929
 930 BOOL
 931 FASTCALL
 932 MakeInfoDC(PDC pdc, BOOL bSet)
 933 {
 934     PSURFACE pSurface;
 935     SIZEL sizl;
 936
 937     /* Can not be a display DC. */
 938     if (pdc->fs & DC_FLAG_DISPLAY) return FALSE;
 939     if (bSet)
 940     {
 941         if (pdc->fs & DC_FLAG_TEMPINFODC || pdc->dctype == DC_TYPE_DIRECT)
 942             return FALSE;
 943
 944         pSurface = pdc->dclevel.pSurface;
 945         pdc->fs |= DC_FLAG_TEMPINFODC;
 946         pdc->pSurfInfo = pSurface;
 947         pdc->dctype = DC_TYPE_INFO;
 948         pdc->dclevel.pSurface = NULL;
 949
 950         PDEVOBJ_sizl(pdc->ppdev, &sizl);
 951
 952         if ( sizl.cx == pdc->dclevel.sizl.cx &&
 953              sizl.cy == pdc->dclevel.sizl.cy )
 954             return TRUE;
 955
 956         pdc->dclevel.sizl.cx = sizl.cx;
 957         pdc->dclevel.sizl.cy = sizl.cy;
 958     }
 959     else
 960     {
 961         if (!(pdc->fs & DC_FLAG_TEMPINFODC) || pdc->dctype != DC_TYPE_INFO)
 962             return FALSE;
 963
 964         pSurface = pdc->pSurfInfo;
 965         pdc->fs &= ~DC_FLAG_TEMPINFODC;
 966         pdc->dclevel.pSurface = pSurface;
 967         pdc->dctype = DC_TYPE_DIRECT;
 968         pdc->pSurfInfo = NULL;
 969
 970         if ( !pSurface ||
 971              (pSurface->SurfObj.sizlBitmap.cx == pdc->dclevel.sizl.cx &&
 972               pSurface->SurfObj.sizlBitmap.cy == pdc->dclevel.sizl.cy) )
 973             return TRUE;
 974
 975         pdc->dclevel.sizl.cx = pSurface->SurfObj.sizlBitmap.cx;
 976         pdc->dclevel.sizl.cy = pSurface->SurfObj.sizlBitmap.cy;
 977     }
 978     return IntSetDefaultRegion(pdc);
 979 }
 980
 981 /*
 982 * @implemented
 983 */
 984 BOOL
 985 APIENTRY
 986 NtGdiMakeInfoDC(
 987     IN HDC hdc,
 988     IN BOOL bSet)
 989 {
 990     BOOL Ret;
 991     PDC pdc = DC_LockDc(hdc);
 992     if (pdc)
 993     {
 994         Ret = MakeInfoDC(pdc, bSet);
 995         DC_UnlockDc(pdc);
 996         return Ret;
 997     }
 998     return FALSE;
 999 }
1000
1001
1002 HDC FASTCALL
1003 IntGdiCreateDC(
1004     PUNICODE_STRING Driver,
1005     PUNICODE_STRING pustrDevice,
1006     PVOID pUMdhpdev,
1007     CONST PDEVMODEW pdmInit,
1008     BOOL CreateAsIC)
1009 {
1010     HDC hdc;
1011
1012     hdc = GreOpenDCW(pustrDevice,
1013                      pdmInit,
1014                      NULL,
1015                      CreateAsIC ? DCTYPE_INFO :
1016                           (Driver ? DC_TYPE_DIRECT : DC_TYPE_DIRECT),
1017                      TRUE,
1018                      NULL,
1019                      NULL,
1020                      pUMdhpdev);
1021
1022     return hdc;
1023 }
1024
1025 HDC FASTCALL
1026 IntGdiCreateDisplayDC(HDEV hDev, ULONG DcType, BOOL EmptyDC)
1027 {
1028     HDC hDC;
1029     UNIMPLEMENTED;
1030     ASSERT(FALSE);
1031
1032     if (DcType == DC_TYPE_MEMORY)
1033         hDC = NtGdiCreateCompatibleDC(NULL); // OH~ Yuck! I think I taste vomit in my mouth!
1034     else
1035         hDC = IntGdiCreateDC(NULL, NULL, NULL, NULL, (DcType == DC_TYPE_INFO));
1036
1037     return hDC;
1038 }
1039