dlls/gdi/mfdrv/init.c

   1 /*
   2  * Metafile driver initialisation functions
   3  *
   4  * Copyright 1996 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 "windef.h"
  22 #include "wine/winbase16.h"
  23 #include "gdi.h"
  24 #include "mfdrv/metafiledrv.h"
  25 #include "wine/debug.h"
  26
  27 WINE_DEFAULT_DEBUG_CHANNEL(metafile);
  28
  29 #include <string.h>
  30
  31 static const DC_FUNCTIONS MFDRV_Funcs =
  32 {
  33     NULL,                            /* pAbortDoc */
  34     MFDRV_AbortPath,                 /* pAbortPath */
  35     NULL,                            /* pAngleArc */
  36     MFDRV_Arc,                       /* pArc */
  37     NULL,                            /* pArcTo */
  38     MFDRV_BeginPath,                 /* pBeginPath */
  39     MFDRV_BitBlt,                    /* pBitBlt */
  40     NULL,                            /* pChoosePixelFormat */
  41     MFDRV_Chord,                     /* pChord */
  42     MFDRV_CloseFigure,               /* pCloseFigure */
  43     NULL,                            /* pCreateBitmap */
  44     NULL,                            /* pCreateDC */
  45     NULL,                            /* pCreateDIBSection */
  46     NULL,                            /* pDeleteBitmap */
  47     NULL,                            /* pDeleteDC */
  48     NULL,                            /* pDescribePixelFormat */
  49     NULL,                            /* pDeviceCapabilities */
  50     MFDRV_Ellipse,                   /* pEllipse */
  51     NULL,                            /* pEndDoc */
  52     NULL,                            /* pEndPage */
  53     MFDRV_EndPath,                   /* pEndPath */
  54     NULL,                            /* pEnumDeviceFonts */
  55     MFDRV_ExcludeClipRect,           /* pExcludeClipRect */
  56     NULL,                            /* pExtDeviceMode */
  57     MFDRV_ExtEscape,                 /* pExtEscape */
  58     MFDRV_ExtFloodFill,              /* pExtFloodFill */
  59     MFDRV_ExtSelectClipRgn,          /* pExtSelectClipRgn */
  60     MFDRV_ExtTextOut,                /* pExtTextOut */
  61     MFDRV_FillPath,                  /* pFillPath */
  62     MFDRV_FillRgn,                   /* pFillRgn */
  63     MFDRV_FlattenPath,               /* pFlattenPath */
  64     MFDRV_FrameRgn,                  /* pFrameRgn */
  65     NULL,                            /* pGetBitmapBits */
  66     NULL,                            /* pGetCharWidth */
  67     NULL,                            /* pGetDCOrgEx */
  68     NULL,                            /* pGetDIBColorTable */
  69     NULL,                            /* pGetDIBits */
  70     NULL,                            /* pGetDeviceCaps */
  71     NULL,                            /* pGetDeviceGammaRamp */
  72     NULL,                            /* pGetNearestColor */
  73     NULL,                            /* pGetPixel */
  74     NULL,                            /* pGetPixelFormat */
  75     NULL,                            /* pGetSystemPaletteEntries */
  76     NULL,                            /* pGetTextExtentPoint */
  77     NULL,                            /* pGetTextMetrics */
  78     MFDRV_IntersectClipRect,         /* pIntersectClipRect */
  79     MFDRV_InvertRgn,                 /* pInvertRgn */
  80     MFDRV_LineTo,                    /* pLineTo */
  81     MFDRV_MoveTo,                    /* pMoveTo */
  82     MFDRV_OffsetClipRgn,             /* pOffsetClipRgn */
  83     MFDRV_OffsetViewportOrg,         /* pOffsetViewportOrg */
  84     MFDRV_OffsetWindowOrg,           /* pOffsetWindowOrg */
  85     MFDRV_PaintRgn,                  /* pPaintRgn */
  86     MFDRV_PatBlt,                    /* pPatBlt */
  87     MFDRV_Pie,                       /* pPie */
  88     MFDRV_PolyBezier,                /* pPolyBezier */
  89     MFDRV_PolyBezierTo,              /* pPolyBezierTo */
  90     NULL,                            /* pPolyDraw */
  91     MFDRV_PolyPolygon,               /* pPolyPolygon */
  92     NULL,                            /* pPolyPolyline */
  93     MFDRV_Polygon,                   /* pPolygon */
  94     MFDRV_Polyline,                  /* pPolyline */
  95     NULL,                            /* pPolylineTo */
  96     NULL,                            /* pRealizeDefaultPalette */
  97     NULL,                            /* pRealizePalette */
  98     MFDRV_Rectangle,                 /* pRectangle */
  99     NULL,                            /* pResetDC */
 100     MFDRV_RestoreDC,                 /* pRestoreDC */
 101     MFDRV_RoundRect,                 /* pRoundRect */
 102     MFDRV_SaveDC,                    /* pSaveDC */
 103     MFDRV_ScaleViewportExt,          /* pScaleViewportExt */
 104     MFDRV_ScaleWindowExt,            /* pScaleWindowExt */
 105     MFDRV_SelectBitmap,              /* pSelectBitmap */
 106     MFDRV_SelectBrush,               /* pSelectBrush */
 107     MFDRV_SelectClipPath,            /* pSelectClipPath */
 108     MFDRV_SelectFont,                /* pSelectFont */
 109     NULL,                            /* pSelectPalette */
 110     MFDRV_SelectPen,                 /* pSelectPen */
 111     NULL,                            /* pSetBitmapBits */
 112     MFDRV_SetBkColor,                /* pSetBkColor */
 113     MFDRV_SetBkMode,                 /* pSetBkMode */
 114     NULL,                            /* pSetDCOrg */
 115     NULL,                            /* pSetDIBColorTable */
 116     NULL,                            /* pSetDIBits */
 117     MFDRV_SetDIBitsToDevice,         /* pSetDIBitsToDevice */
 118     NULL,                            /* pSetDeviceClipping */
 119     NULL,                            /* pSetDeviceGammaRamp */
 120     MFDRV_SetMapMode,                /* pSetMapMode */
 121     MFDRV_SetMapperFlags,            /* pSetMapperFlags */
 122     MFDRV_SetPixel,                  /* pSetPixel */
 123     NULL,                            /* pSetPixelFormat */
 124     MFDRV_SetPolyFillMode,           /* pSetPolyFillMode */
 125     MFDRV_SetROP2,                   /* pSetROP2 */
 126     MFDRV_SetRelAbs,                 /* pSetRelAbs */
 127     MFDRV_SetStretchBltMode,         /* pSetStretchBltMode */
 128     MFDRV_SetTextAlign,              /* pSetTextAlign */
 129     MFDRV_SetTextCharacterExtra,     /* pSetTextCharacterExtra */
 130     MFDRV_SetTextColor,              /* pSetTextColor */
 131     MFDRV_SetTextJustification,      /* pSetTextJustification */
 132     MFDRV_SetViewportExt,            /* pSetViewportExt */
 133     MFDRV_SetViewportOrg,            /* pSetViewportOrg */
 134     MFDRV_SetWindowExt,              /* pSetWindowExt */
 135     MFDRV_SetWindowOrg,              /* pSetWindowOrg */
 136     NULL,                            /* pStartDoc */
 137     NULL,                            /* pStartPage */
 138     MFDRV_StretchBlt,                /* pStretchBlt */
 139     MFDRV_StretchDIBits,             /* pStretchDIBits */
 140     MFDRV_StrokeAndFillPath,         /* pStrokeAndFillPath */
 141     MFDRV_StrokePath,                /* pStrokePath */
 142     NULL,                            /* pSwapBuffers */
 143     MFDRV_WidenPath                  /* pWidenPath */
 144 };
 145
 146
 147
 148 /**********************************************************************
 149  *           MFDRV_AllocMetaFile
 150  */
 151 static DC *MFDRV_AllocMetaFile(void)
 152 {
 153     DC *dc;
 154     METAFILEDRV_PDEVICE *physDev;
 155
 156     if (!(dc = DC_AllocDC( &MFDRV_Funcs ))) return NULL;
 157     dc->header.wMagic = METAFILE_DC_MAGIC;
 158
 159     physDev = (METAFILEDRV_PDEVICE *)HeapAlloc(GetProcessHeap(),0,sizeof(*physDev));
 160     if (!physDev)
 161     {
 162         GDI_FreeObject( dc->hSelf, dc );
 163         return NULL;
 164     }
 165     dc->physDev = (PHYSDEV)physDev;
 166     physDev->hdc = dc->hSelf;
 167     physDev->dc = dc;
 168
 169     if (!(physDev->mh = HeapAlloc( GetProcessHeap(), 0, sizeof(*physDev->mh) )))
 170     {
 171         HeapFree( GetProcessHeap(), 0, physDev );
 172         GDI_FreeObject( dc->hSelf, dc );
 173         return NULL;
 174     }
 175
 176     physDev->nextHandle = 0;
 177     physDev->hFile = 0;
 178
 179     physDev->mh->mtHeaderSize   = sizeof(METAHEADER) / sizeof(WORD);
 180     physDev->mh->mtVersion      = 0x0300;
 181     physDev->mh->mtSize         = physDev->mh->mtHeaderSize;
 182     physDev->mh->mtNoObjects    = 0;
 183     physDev->mh->mtMaxRecord    = 0;
 184     physDev->mh->mtNoParameters = 0;
 185
 186     return dc;
 187 }
 188
 189
 190 /**********************************************************************
 191  *           MFDRV_DeleteDC
 192  */
 193 static BOOL MFDRV_DeleteDC( PHYSDEV dev )
 194 {
 195     METAFILEDRV_PDEVICE *physDev = (METAFILEDRV_PDEVICE *)dev;
 196     DC *dc = physDev->dc;
 197
 198     if (physDev->mh) HeapFree( GetProcessHeap(), 0, physDev->mh );
 199     HeapFree( GetProcessHeap(), 0, physDev );
 200     dc->physDev = NULL;
 201     GDI_FreeObject( dc->hSelf, dc );
 202     return TRUE;
 203 }
 204
 205
 206 /**********************************************************************
 207  *           CreateMetaFileA   (GDI32.@)
 208  *
 209  *  Create a new DC and associate it with a metafile. Pass a filename
 210  *  to create a disk-based metafile, NULL to create a memory metafile.
 211  *
 212  * RETURNS
 213  *  A handle to the metafile DC if successful, NULL on failure.
 214  */
 215 HDC WINAPI CreateMetaFileA( LPCSTR filename ) /* [in] Filename of disk metafile */
 216 {
 217     HDC ret;
 218     DC *dc;
 219     METAFILEDRV_PDEVICE *physDev;
 220     HANDLE hFile;
 221
 222     TRACE("'%s'\n", filename );
 223
 224     if (!(dc = MFDRV_AllocMetaFile())) return 0;
 225     physDev = (METAFILEDRV_PDEVICE *)dc->physDev;
 226
 227     if (filename)  /* disk based metafile */
 228     {
 229         physDev->mh->mtType = METAFILE_DISK;
 230         if ((hFile = CreateFileA(filename, GENERIC_WRITE, 0, NULL,
 231                                 CREATE_ALWAYS, 0, 0)) == INVALID_HANDLE_VALUE) {
 232             MFDRV_DeleteDC( dc->physDev );
 233             return 0;
 234         }
 235         if (!WriteFile( hFile, (LPSTR)physDev->mh, sizeof(*physDev->mh), NULL,
 236                         NULL )) {
 237             MFDRV_DeleteDC( dc->physDev );
 238             return 0;
 239         }
 240         physDev->hFile = hFile;
 241
 242         /* Grow METAHEADER to include filename */
 243         physDev->mh = MF_CreateMetaHeaderDisk(physDev->mh, filename);
 244     }
 245     else  /* memory based metafile */
 246         physDev->mh->mtType = METAFILE_MEMORY;
 247
 248     TRACE("returning %04x\n", dc->hSelf);
 249     ret = dc->hSelf;
 250     GDI_ReleaseObj( dc->hSelf );
 251     return ret;
 252 }
 253
 254 /**********************************************************************
 255  *          CreateMetaFileW   (GDI32.@)
 256  */
 257 HDC WINAPI CreateMetaFileW(LPCWSTR filename)
 258 {
 259     LPSTR filenameA;
 260     DWORD len;
 261     HDC hReturnDC;
 262
 263     len = WideCharToMultiByte( CP_ACP, 0, filename, -1, NULL, 0, NULL, NULL );
 264     filenameA = HeapAlloc( GetProcessHeap(), 0, len );
 265     WideCharToMultiByte( CP_ACP, 0, filename, -1, filenameA, len, NULL, NULL );
 266
 267     hReturnDC = CreateMetaFileA(filenameA);
 268
 269     HeapFree( GetProcessHeap(), 0, filenameA );
 270
 271     return hReturnDC;
 272 }
 273
 274
 275 /**********************************************************************
 276  *          MFDRV_CloseMetaFile
 277  */
 278 static DC *MFDRV_CloseMetaFile( HDC hdc )
 279 {
 280     DC *dc;
 281     METAFILEDRV_PDEVICE *physDev;
 282
 283     TRACE("(%04x)\n", hdc );
 284
 285     if (!(dc = (DC *) GDI_GetObjPtr( hdc, METAFILE_DC_MAGIC ))) return 0;
 286     physDev = (METAFILEDRV_PDEVICE *)dc->physDev;
 287
 288     /* Construct the end of metafile record - this is documented
 289      * in SDK Knowledgebase Q99334.
 290      */
 291
 292     if (!MFDRV_MetaParam0(dc->physDev, META_EOF))
 293     {
 294         MFDRV_DeleteDC( dc->physDev );
 295         return 0;
 296     }
 297
 298     if (physDev->mh->mtType == METAFILE_DISK)  /* disk based metafile */
 299     {
 300         if (SetFilePointer(physDev->hFile, 0, NULL, FILE_BEGIN) != 0) {
 301             MFDRV_DeleteDC( dc->physDev );
 302             return 0;
 303         }
 304
 305         physDev->mh->mtType = METAFILE_MEMORY; /* This is what windows does */
 306         if (!WriteFile(physDev->hFile, (LPSTR)physDev->mh,
 307                        sizeof(*physDev->mh), NULL, NULL)) {
 308             MFDRV_DeleteDC( dc->physDev );
 309             return 0;
 310         }
 311         CloseHandle(physDev->hFile);
 312         physDev->mh->mtType = METAFILE_DISK;
 313     }
 314
 315     return dc;
 316 }
 317
 318 /******************************************************************
 319  *           CloseMetaFile     (GDI.126)
 320  *           CloseMetaFile16   (GDI32.@)
 321  */
 322 HMETAFILE16 WINAPI CloseMetaFile16(
 323                                    HDC16 hdc /* [in] Metafile DC to close */
 324 )
 325 {
 326     HMETAFILE16 hmf;
 327     METAFILEDRV_PDEVICE *physDev;
 328     DC *dc = MFDRV_CloseMetaFile(hdc);
 329     if (!dc) return 0;
 330     physDev = (METAFILEDRV_PDEVICE *)dc->physDev;
 331
 332     /* Now allocate a global handle for the metafile */
 333
 334     hmf = MF_Create_HMETAFILE16( physDev->mh );
 335
 336     physDev->mh = NULL;  /* So it won't be deleted */
 337     MFDRV_DeleteDC( dc->physDev );
 338     return hmf;
 339 }
 340
 341 /******************************************************************
 342  *           CloseMetaFile   (GDI32.@)
 343  *
 344  *  Stop recording graphics operations in metafile associated with
 345  *  hdc and retrieve metafile.
 346  *
 347  * RETURNS
 348  *  Handle of newly created metafile on success, NULL on failure.
 349  */
 350 HMETAFILE WINAPI CloseMetaFile(
 351                                    HDC hdc /* [in] Metafile DC to close */
 352 )
 353 {
 354     HMETAFILE hmf;
 355     METAFILEDRV_PDEVICE *physDev;
 356     DC *dc = MFDRV_CloseMetaFile(hdc);
 357     if (!dc) return 0;
 358     physDev = (METAFILEDRV_PDEVICE *)dc->physDev;
 359
 360     /* Now allocate a global handle for the metafile */
 361
 362     hmf = MF_Create_HMETAFILE( physDev->mh );
 363
 364     physDev->mh = NULL;  /* So it won't be deleted */
 365     MFDRV_DeleteDC( dc->physDev );
 366     return hmf;
 367 }
 368
 369
 370 /******************************************************************
 371  *         MFDRV_WriteRecord
 372  *
 373  * Warning: this function can change the pointer to the metafile header.
 374  */
 375 BOOL MFDRV_WriteRecord( PHYSDEV dev, METARECORD *mr, DWORD rlen)
 376 {
 377     DWORD len;
 378     METAHEADER *mh;
 379     METAFILEDRV_PDEVICE *physDev = (METAFILEDRV_PDEVICE *)dev;
 380
 381     switch(physDev->mh->mtType)
 382     {
 383     case METAFILE_MEMORY:
 384         len = physDev->mh->mtSize * 2 + rlen;
 385         mh = HeapReAlloc( GetProcessHeap(), 0, physDev->mh, len );
 386         if (!mh) return FALSE;
 387         physDev->mh = mh;
 388         memcpy((WORD *)physDev->mh + physDev->mh->mtSize, mr, rlen);
 389         break;
 390     case METAFILE_DISK:
 391         TRACE("Writing record to disk\n");
 392         if (!WriteFile(physDev->hFile, (char *)mr, rlen, NULL, NULL))
 393             return FALSE;
 394         break;
 395     default:
 396         ERR("Unknown metafile type %d\n", physDev->mh->mtType );
 397         return FALSE;
 398     }
 399
 400     physDev->mh->mtSize += rlen / 2;
 401     physDev->mh->mtMaxRecord = max(physDev->mh->mtMaxRecord, rlen / 2);
 402     return TRUE;
 403 }
 404
 405
 406 /******************************************************************
 407  *         MFDRV_MetaParam0
 408  */
 409
 410 BOOL MFDRV_MetaParam0(PHYSDEV dev, short func)
 411 {
 412     char buffer[8];
 413     METARECORD *mr = (METARECORD *)&buffer;
 414
 415     mr->rdSize = 3;
 416     mr->rdFunction = func;
 417     return MFDRV_WriteRecord( dev, mr, mr->rdSize * 2);
 418 }
 419
 420
 421 /******************************************************************
 422  *         MFDRV_MetaParam1
 423  */
 424 BOOL MFDRV_MetaParam1(PHYSDEV dev, short func, short param1)
 425 {
 426     char buffer[8];
 427     METARECORD *mr = (METARECORD *)&buffer;
 428
 429     mr->rdSize = 4;
 430     mr->rdFunction = func;
 431     *(mr->rdParm) = param1;
 432     return MFDRV_WriteRecord( dev, mr, mr->rdSize * 2);
 433 }
 434
 435
 436 /******************************************************************
 437  *         MFDRV_MetaParam2
 438  */
 439 BOOL MFDRV_MetaParam2(PHYSDEV dev, short func, short param1, short param2)
 440 {
 441     char buffer[10];
 442     METARECORD *mr = (METARECORD *)&buffer;
 443
 444     mr->rdSize = 5;
 445     mr->rdFunction = func;
 446     *(mr->rdParm) = param2;
 447     *(mr->rdParm + 1) = param1;
 448     return MFDRV_WriteRecord( dev, mr, mr->rdSize * 2);
 449 }
 450
 451
 452 /******************************************************************
 453  *         MFDRV_MetaParam4
 454  */
 455
 456 BOOL MFDRV_MetaParam4(PHYSDEV dev, short func, short param1, short param2,
 457                       short param3, short param4)
 458 {
 459     char buffer[14];
 460     METARECORD *mr = (METARECORD *)&buffer;
 461
 462     mr->rdSize = 7;
 463     mr->rdFunction = func;
 464     *(mr->rdParm) = param4;
 465     *(mr->rdParm + 1) = param3;
 466     *(mr->rdParm + 2) = param2;
 467     *(mr->rdParm + 3) = param1;
 468     return MFDRV_WriteRecord( dev, mr, mr->rdSize * 2);
 469 }
 470
 471
 472 /******************************************************************
 473  *         MFDRV_MetaParam6
 474  */
 475
 476 BOOL MFDRV_MetaParam6(PHYSDEV dev, short func, short param1, short param2,
 477                       short param3, short param4, short param5, short param6)
 478 {
 479     char buffer[18];
 480     METARECORD *mr = (METARECORD *)&buffer;
 481
 482     mr->rdSize = 9;
 483     mr->rdFunction = func;
 484     *(mr->rdParm) = param6;
 485     *(mr->rdParm + 1) = param5;
 486     *(mr->rdParm + 2) = param4;
 487     *(mr->rdParm + 3) = param3;
 488     *(mr->rdParm + 4) = param2;
 489     *(mr->rdParm + 5) = param1;
 490     return MFDRV_WriteRecord( dev, mr, mr->rdSize * 2);
 491 }
 492
 493
 494 /******************************************************************
 495  *         MFDRV_MetaParam8
 496  */
 497 BOOL MFDRV_MetaParam8(PHYSDEV dev, short func, short param1, short param2,
 498                       short param3, short param4, short param5,
 499                       short param6, short param7, short param8)
 500 {
 501     char buffer[22];
 502     METARECORD *mr = (METARECORD *)&buffer;
 503
 504     mr->rdSize = 11;
 505     mr->rdFunction = func;
 506     *(mr->rdParm) = param8;
 507     *(mr->rdParm + 1) = param7;
 508     *(mr->rdParm + 2) = param6;
 509     *(mr->rdParm + 3) = param5;
 510     *(mr->rdParm + 4) = param4;
 511     *(mr->rdParm + 5) = param3;
 512     *(mr->rdParm + 6) = param2;
 513     *(mr->rdParm + 7) = param1;
 514     return MFDRV_WriteRecord( dev, mr, mr->rdSize * 2);
 515 }
 516
 517
 518 /******************************************************************
 519  *         MFDRV_AddHandleDC
 520  *
 521  * Note: this function assumes that we never delete objects.
 522  * If we do someday, we'll need to maintain a table to re-use deleted
 523  * handles.
 524  */
 525 int MFDRV_AddHandleDC( PHYSDEV dev )
 526 {
 527     METAFILEDRV_PDEVICE *physDev = (METAFILEDRV_PDEVICE *)dev;
 528     physDev->mh->mtNoObjects++;
 529     return physDev->nextHandle++;
 530 }
 531
 532 /**********************************************************************
 533  *           MFDRV_ExtEscape
 534  */
 535 INT MFDRV_ExtEscape( PHYSDEV dev, INT nEscape, INT cbInput, LPCVOID in_data,
 536                      INT cbOutput, LPVOID out_data )
 537 {
 538     METARECORD *mr;
 539     DWORD len;
 540
 541     if(nEscape == MFCOMMENT) {
 542         len = sizeof(*mr) + sizeof(WORD) + ((cbInput + 1) & ~1);
 543         mr = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, len);
 544         mr->rdSize = len / 2;
 545         mr->rdFunction = META_ESCAPE;
 546         mr->rdParm[0] = nEscape;
 547         mr->rdParm[1] = cbInput;
 548         memcpy(&(mr->rdParm[2]), in_data, cbInput);
 549         MFDRV_WriteRecord( dev, mr, len);
 550         HeapFree(GetProcessHeap(), 0, mr);
 551         return 1;
 552     }
 553     return 0;
 554 }