[GDI32] Update Gdi Driver Header.
[reactos.git] / win32ss / gdi / gdi32 / wine / enhmfdrv / init.c
1 /*
2 * Enhanced MetaFile driver initialisation functions
3 *
4 * Copyright 1999 Huw D M Davies
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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
19 */
20
21 #include <assert.h>
22 #include <stdarg.h>
23 #include <string.h>
24
25 #include "windef.h"
26 #include "winbase.h"
27 #include "wingdi.h"
28 #include "winnls.h"
29 #include "gdi_private.h"
30 #include "enhmfdrv/enhmetafiledrv.h"
31 #include "wine/debug.h"
32
33 WINE_DEFAULT_DEBUG_CHANNEL(enhmetafile);
34
35 static BOOL EMFDRV_DeleteDC( PHYSDEV dev );
36
37 static const struct gdi_dc_funcs emfdrv_driver =
38 {
39 NULL, /* pAbortDoc */
40 EMFDRV_AbortPath, /* pAbortPath */
41 NULL, /* pAlphaBlend */
42 EMFDRV_AngleArc, /* pAngleArc */
43 EMFDRV_Arc, /* pArc */
44 EMFDRV_ArcTo, /* pArcTo */
45 EMFDRV_BeginPath, /* pBeginPath */
46 NULL, /* pBlendImage */
47 EMFDRV_Chord, /* pChord */
48 EMFDRV_CloseFigure, /* pCloseFigure */
49 NULL, /* pCreateCompatibleDC */
50 NULL, /* pCreateDC */
51 EMFDRV_DeleteDC, /* pDeleteDC */
52 EMFDRV_DeleteObject, /* pDeleteObject */
53 NULL, /* pDeviceCapabilities */
54 EMFDRV_Ellipse, /* pEllipse */
55 NULL, /* pEndDoc */
56 NULL, /* pEndPage */
57 EMFDRV_EndPath, /* pEndPath */
58 NULL, /* pEnumFonts */
59 NULL, /* pEnumICMProfiles */
60 EMFDRV_ExcludeClipRect, /* pExcludeClipRect */
61 NULL, /* pExtDeviceMode */
62 NULL, /* pExtEscape */
63 EMFDRV_ExtFloodFill, /* pExtFloodFill */
64 EMFDRV_ExtSelectClipRgn, /* pExtSelectClipRgn */
65 EMFDRV_ExtTextOut, /* pExtTextOut */
66 EMFDRV_FillPath, /* pFillPath */
67 EMFDRV_FillRgn, /* pFillRgn */
68 EMFDRV_FlattenPath, /* pFlattenPath */
69 NULL, /* pFontIsLinked */
70 EMFDRV_FrameRgn, /* pFrameRgn */
71 EMFDRV_GdiComment, /* pGdiComment */
72 NULL, /* pGetBoundsRect */
73 NULL, /* pGetCharABCWidths */
74 NULL, /* pGetCharABCWidthsI */
75 NULL, /* pGetCharWidth */
76 NULL, /* pGetCharWidthInfo */
77 EMFDRV_GetDeviceCaps, /* pGetDeviceCaps */
78 NULL, /* pGetDeviceGammaRamp */
79 NULL, /* pGetFontData */
80 NULL, /* pGetFontRealizationInfo */
81 NULL, /* pGetFontUnicodeRanges */
82 NULL, /* pGetGlyphIndices */
83 NULL, /* pGetGlyphOutline */
84 NULL, /* pGetICMProfile */
85 NULL, /* pGetImage */
86 NULL, /* pGetKerningPairs */
87 NULL, /* pGetNearestColor */
88 NULL, /* pGetOutlineTextMetrics */
89 NULL, /* pGetPixel */
90 NULL, /* pGetSystemPaletteEntries */
91 NULL, /* pGetTextCharsetInfo */
92 NULL, /* pGetTextExtentExPoint */
93 NULL, /* pGetTextExtentExPointI */
94 NULL, /* pGetTextFace */
95 NULL, /* pGetTextMetrics */
96 EMFDRV_GradientFill, /* pGradientFill */
97 EMFDRV_IntersectClipRect, /* pIntersectClipRect */
98 EMFDRV_InvertRgn, /* pInvertRgn */
99 EMFDRV_LineTo, /* pLineTo */
100 EMFDRV_ModifyWorldTransform, /* pModifyWorldTransform */
101 EMFDRV_MoveTo, /* pMoveTo */
102 EMFDRV_OffsetClipRgn, /* pOffsetClipRgn */
103 EMFDRV_OffsetViewportOrgEx, /* pOffsetViewportOrgEx */
104 EMFDRV_OffsetWindowOrgEx, /* pOffsetWindowOrgEx */
105 EMFDRV_PaintRgn, /* pPaintRgn */
106 EMFDRV_PatBlt, /* pPatBlt */
107 EMFDRV_Pie, /* pPie */
108 EMFDRV_PolyBezier, /* pPolyBezier */
109 EMFDRV_PolyBezierTo, /* pPolyBezierTo */
110 EMFDRV_PolyDraw, /* pPolyDraw */
111 EMFDRV_PolyPolygon, /* pPolyPolygon */
112 EMFDRV_PolyPolyline, /* pPolyPolyline */
113 EMFDRV_Polygon, /* pPolygon */
114 EMFDRV_Polyline, /* pPolyline */
115 EMFDRV_PolylineTo, /* pPolylineTo */
116 NULL, /* pPutImage */
117 NULL, /* pRealizeDefaultPalette */
118 NULL, /* pRealizePalette */
119 EMFDRV_Rectangle, /* pRectangle */
120 NULL, /* pResetDC */
121 EMFDRV_RestoreDC, /* pRestoreDC */
122 EMFDRV_RoundRect, /* pRoundRect */
123 EMFDRV_SaveDC, /* pSaveDC */
124 EMFDRV_ScaleViewportExtEx, /* pScaleViewportExtEx */
125 EMFDRV_ScaleWindowExtEx, /* pScaleWindowExtEx */
126 EMFDRV_SelectBitmap, /* pSelectBitmap */
127 EMFDRV_SelectBrush, /* pSelectBrush */
128 EMFDRV_SelectClipPath, /* pSelectClipPath */
129 EMFDRV_SelectFont, /* pSelectFont */
130 EMFDRV_SelectPalette, /* pSelectPalette */
131 EMFDRV_SelectPen, /* pSelectPen */
132 EMFDRV_SetArcDirection, /* pSetArcDirection */
133 EMFDRV_SetBkColor, /* pSetBkColor */
134 EMFDRV_SetBkMode, /* pSetBkMode */
135 NULL, /* pSetBoundsRect */
136 EMFDRV_SetDCBrushColor, /* pSetDCBrushColor*/
137 EMFDRV_SetDCPenColor, /* pSetDCPenColor*/
138 EMFDRV_SetDIBitsToDevice, /* pSetDIBitsToDevice */
139 NULL, /* pSetDeviceClipping */
140 NULL, /* pSetDeviceGammaRamp */
141 EMFDRV_SetLayout, /* pSetLayout */
142 EMFDRV_SetMapMode, /* pSetMapMode */
143 EMFDRV_SetMapperFlags, /* pSetMapperFlags */
144 EMFDRV_SetPixel, /* pSetPixel */
145 EMFDRV_SetPolyFillMode, /* pSetPolyFillMode */
146 EMFDRV_SetROP2, /* pSetROP2 */
147 NULL, /* pSetRelAbs */
148 EMFDRV_SetStretchBltMode, /* pSetStretchBltMode */
149 EMFDRV_SetTextAlign, /* pSetTextAlign */
150 NULL, /* pSetTextCharacterExtra */
151 EMFDRV_SetTextColor, /* pSetTextColor */
152 EMFDRV_SetTextJustification, /* pSetTextJustification */
153 EMFDRV_SetViewportExtEx, /* pSetViewportExtEx */
154 EMFDRV_SetViewportOrgEx, /* pSetViewportOrgEx */
155 EMFDRV_SetWindowExtEx, /* pSetWindowExtEx */
156 EMFDRV_SetWindowOrgEx, /* pSetWindowOrgEx */
157 EMFDRV_SetWorldTransform, /* pSetWorldTransform */
158 NULL, /* pStartDoc */
159 NULL, /* pStartPage */
160 EMFDRV_StretchBlt, /* pStretchBlt */
161 EMFDRV_StretchDIBits, /* pStretchDIBits */
162 EMFDRV_StrokeAndFillPath, /* pStrokeAndFillPath */
163 EMFDRV_StrokePath, /* pStrokePath */
164 NULL, /* pUnrealizePalette */
165 EMFDRV_WidenPath, /* pWidenPath */
166 NULL, /* wine_get_wgl_driver */
167 GDI_PRIORITY_GRAPHICS_DRV /* priority */
168 };
169
170
171 /**********************************************************************
172 * EMFDRV_DeleteDC
173 */
174 static BOOL EMFDRV_DeleteDC( PHYSDEV dev )
175 {
176 EMFDRV_PDEVICE *physDev = get_emf_physdev( dev );
177 UINT index;
178
179 HeapFree( GetProcessHeap(), 0, physDev->emh );
180 for(index = 0; index < physDev->handles_size; index++)
181 if(physDev->handles[index])
182 GDI_hdc_not_using_object(physDev->handles[index], dev->hdc);
183 HeapFree( GetProcessHeap(), 0, physDev->handles );
184 HeapFree( GetProcessHeap(), 0, physDev );
185 return TRUE;
186 }
187
188
189 /******************************************************************
190 * EMFDRV_WriteRecord
191 *
192 * Warning: this function can change the pointer to the metafile header.
193 */
194 BOOL EMFDRV_WriteRecord( PHYSDEV dev, EMR *emr )
195 {
196 DWORD len;
197 DWORD bytes_written;
198 ENHMETAHEADER *emh;
199 EMFDRV_PDEVICE *physDev = get_emf_physdev( dev );
200
201 TRACE("record %d, size %d %s\n",
202 emr->iType, emr->nSize, physDev->hFile ? "(to disk)" : "");
203
204 assert( !(emr->nSize & 3) );
205
206 physDev->emh->nBytes += emr->nSize;
207 physDev->emh->nRecords++;
208
209 if(physDev->hFile) {
210 if (!WriteFile(physDev->hFile, emr, emr->nSize, &bytes_written, NULL))
211 return FALSE;
212 } else {
213 DWORD nEmfSize = HeapSize(GetProcessHeap(), 0, physDev->emh);
214 len = physDev->emh->nBytes;
215 if (len > nEmfSize) {
216 nEmfSize += (nEmfSize / 2) + emr->nSize;
217 emh = HeapReAlloc(GetProcessHeap(), 0, physDev->emh, nEmfSize);
218 if (!emh) return FALSE;
219 physDev->emh = emh;
220 }
221 memcpy((CHAR *)physDev->emh + physDev->emh->nBytes - emr->nSize, emr,
222 emr->nSize);
223 }
224 return TRUE;
225 }
226
227
228 /******************************************************************
229 * EMFDRV_UpdateBBox
230 */
231 void EMFDRV_UpdateBBox( PHYSDEV dev, RECTL *rect )
232 {
233 EMFDRV_PDEVICE *physDev = get_emf_physdev( dev );
234 RECTL *bounds = &physDev->emh->rclBounds;
235 RECTL vportRect = *rect;
236
237 LPtoDP( dev->hdc, (LPPOINT)&vportRect, 2 );
238
239 /* The coordinate systems may be mirrored
240 (LPtoDP handles points, not rectangles) */
241 if (vportRect.left > vportRect.right)
242 {
243 LONG temp = vportRect.right;
244 vportRect.right = vportRect.left;
245 vportRect.left = temp;
246 }
247 if (vportRect.top > vportRect.bottom)
248 {
249 LONG temp = vportRect.bottom;
250 vportRect.bottom = vportRect.top;
251 vportRect.top = temp;
252 }
253
254 if (bounds->left > bounds->right)
255 {
256 /* first bounding rectangle */
257 *bounds = vportRect;
258 }
259 else
260 {
261 bounds->left = min(bounds->left, vportRect.left);
262 bounds->top = min(bounds->top, vportRect.top);
263 bounds->right = max(bounds->right, vportRect.right);
264 bounds->bottom = max(bounds->bottom, vportRect.bottom);
265 }
266 }
267
268 /**********************************************************************
269 * CreateEnhMetaFileA (GDI32.@)
270 */
271 HDC WINAPI CreateEnhMetaFileA(
272 HDC hdc, /* [in] optional reference DC */
273 LPCSTR filename, /* [in] optional filename for disk metafiles */
274 const RECT *rect, /* [in] optional bounding rectangle */
275 LPCSTR description /* [in] optional description */
276 )
277 {
278 LPWSTR filenameW = NULL;
279 LPWSTR descriptionW = NULL;
280 HDC hReturnDC;
281 DWORD len1, len2, total;
282
283 if(filename)
284 {
285 total = MultiByteToWideChar( CP_ACP, 0, filename, -1, NULL, 0 );
286 filenameW = HeapAlloc( GetProcessHeap(), 0, total * sizeof(WCHAR) );
287 MultiByteToWideChar( CP_ACP, 0, filename, -1, filenameW, total );
288 }
289 if(description) {
290 len1 = strlen(description);
291 len2 = strlen(description + len1 + 1);
292 total = MultiByteToWideChar( CP_ACP, 0, description, len1 + len2 + 3, NULL, 0 );
293 descriptionW = HeapAlloc( GetProcessHeap(), 0, total * sizeof(WCHAR) );
294 MultiByteToWideChar( CP_ACP, 0, description, len1 + len2 + 3, descriptionW, total );
295 }
296
297 hReturnDC = CreateEnhMetaFileW(hdc, filenameW, rect, descriptionW);
298
299 HeapFree( GetProcessHeap(), 0, filenameW );
300 HeapFree( GetProcessHeap(), 0, descriptionW );
301
302 return hReturnDC;
303 }
304
305 /**********************************************************************
306 * CreateEnhMetaFileW (GDI32.@)
307 */
308 HDC WINAPI CreateEnhMetaFileW(
309 HDC hdc, /* [in] optional reference DC */
310 LPCWSTR filename, /* [in] optional filename for disk metafiles */
311 const RECT* rect, /* [in] optional bounding rectangle */
312 LPCWSTR description /* [in] optional description */
313 )
314 {
315 static const WCHAR displayW[] = {'D','I','S','P','L','A','Y',0};
316 HDC ret;
317 DC *dc;
318 EMFDRV_PDEVICE *physDev;
319 HANDLE hFile;
320 DWORD size = 0, length = 0;
321 DWORD bytes_written;
322
323 TRACE("(%p %s %s %s)\n", hdc, debugstr_w(filename), wine_dbgstr_rect(rect), debugstr_w(description) );
324
325 if (!(dc = alloc_dc_ptr( OBJ_ENHMETADC ))) return 0;
326
327 physDev = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(*physDev));
328 if (!physDev) {
329 free_dc_ptr( dc );
330 return 0;
331 }
332 if(description) { /* App name\0Title\0\0 */
333 length = lstrlenW(description);
334 length += lstrlenW(description + length + 1);
335 length += 3;
336 length *= 2;
337 }
338 size = sizeof(ENHMETAHEADER) + (length + 3) / 4 * 4;
339
340 if (!(physDev->emh = HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, size))) {
341 HeapFree( GetProcessHeap(), 0, physDev );
342 free_dc_ptr( dc );
343 return 0;
344 }
345
346 push_dc_driver( &dc->physDev, &physDev->dev, &emfdrv_driver );
347
348 physDev->handles = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, HANDLE_LIST_INC * sizeof(physDev->handles[0]));
349 physDev->handles_size = HANDLE_LIST_INC;
350 physDev->cur_handles = 1;
351 physDev->hFile = 0;
352 physDev->dc_brush = 0;
353 physDev->dc_pen = 0;
354 physDev->screen_dc = 0;
355 physDev->restoring = 0;
356 physDev->path = FALSE;
357 if (hdc) /* if no ref, use current display */
358 physDev->ref_dc = hdc;
359 else
360 physDev->ref_dc = physDev->screen_dc = CreateDCW( displayW, NULL, NULL, NULL );
361
362 SetVirtualResolution(physDev->dev.hdc, 0, 0, 0, 0);
363
364 physDev->emh->iType = EMR_HEADER;
365 physDev->emh->nSize = size;
366
367 physDev->emh->rclBounds.left = physDev->emh->rclBounds.top = 0;
368 physDev->emh->rclBounds.right = physDev->emh->rclBounds.bottom = -1;
369
370 if(rect) {
371 physDev->emh->rclFrame.left = rect->left;
372 physDev->emh->rclFrame.top = rect->top;
373 physDev->emh->rclFrame.right = rect->right;
374 physDev->emh->rclFrame.bottom = rect->bottom;
375 } else { /* Set this to {0,0 - -1,-1} and update it at the end */
376 physDev->emh->rclFrame.left = physDev->emh->rclFrame.top = 0;
377 physDev->emh->rclFrame.right = physDev->emh->rclFrame.bottom = -1;
378 }
379
380 physDev->emh->dSignature = ENHMETA_SIGNATURE;
381 physDev->emh->nVersion = 0x10000;
382 physDev->emh->nBytes = physDev->emh->nSize;
383 physDev->emh->nRecords = 1;
384 physDev->emh->nHandles = 1;
385
386 physDev->emh->sReserved = 0; /* According to docs, this is reserved and must be 0 */
387 physDev->emh->nDescription = length / 2;
388
389 physDev->emh->offDescription = length ? sizeof(ENHMETAHEADER) : 0;
390
391 physDev->emh->nPalEntries = 0; /* I guess this should start at 0 */
392
393 /* Size in pixels */
394 physDev->emh->szlDevice.cx = GetDeviceCaps( physDev->ref_dc, HORZRES );
395 physDev->emh->szlDevice.cy = GetDeviceCaps( physDev->ref_dc, VERTRES );
396
397 /* Size in millimeters */
398 physDev->emh->szlMillimeters.cx = GetDeviceCaps( physDev->ref_dc, HORZSIZE );
399 physDev->emh->szlMillimeters.cy = GetDeviceCaps( physDev->ref_dc, VERTSIZE );
400
401 /* Size in micrometers */
402 physDev->emh->szlMicrometers.cx = physDev->emh->szlMillimeters.cx * 1000;
403 physDev->emh->szlMicrometers.cy = physDev->emh->szlMillimeters.cy * 1000;
404
405 memcpy((char *)physDev->emh + sizeof(ENHMETAHEADER), description, length);
406
407 if (filename) /* disk based metafile */
408 {
409 if ((hFile = CreateFileW(filename, GENERIC_WRITE | GENERIC_READ, 0,
410 NULL, CREATE_ALWAYS, 0, 0)) == INVALID_HANDLE_VALUE) {
411 free_dc_ptr( dc );
412 return 0;
413 }
414 if (!WriteFile( hFile, physDev->emh, size, &bytes_written, NULL )) {
415 free_dc_ptr( dc );
416 CloseHandle( hFile );
417 return 0;
418 }
419 physDev->hFile = hFile;
420 }
421
422 TRACE("returning %p\n", physDev->dev.hdc);
423 ret = physDev->dev.hdc;
424 release_dc_ptr( dc );
425
426 return ret;
427 }
428
429 /******************************************************************
430 * CloseEnhMetaFile (GDI32.@)
431 */
432 HENHMETAFILE WINAPI CloseEnhMetaFile(HDC hdc) /* [in] metafile DC */
433 {
434 HENHMETAFILE hmf;
435 EMFDRV_PDEVICE *physDev;
436 DC *dc;
437 EMREOF emr;
438 HANDLE hMapping = 0;
439
440 TRACE("(%p)\n", hdc );
441
442 if (!(dc = get_dc_ptr( hdc ))) return NULL;
443 if (GetObjectType( hdc ) != OBJ_ENHMETADC)
444 {
445 release_dc_ptr( dc );
446 return NULL;
447 }
448 if (dc->refcount != 1)
449 {
450 FIXME( "not deleting busy DC %p refcount %u\n", hdc, dc->refcount );
451 release_dc_ptr( dc );
452 return NULL;
453 }
454 physDev = get_emf_physdev( find_dc_driver( dc, &emfdrv_driver ));
455
456 if(dc->saveLevel)
457 RestoreDC(hdc, 1);
458
459 if (physDev->dc_brush) DeleteObject( physDev->dc_brush );
460 if (physDev->dc_pen) DeleteObject( physDev->dc_pen );
461 if (physDev->screen_dc) DeleteDC( physDev->screen_dc );
462
463 emr.emr.iType = EMR_EOF;
464 emr.emr.nSize = sizeof(emr);
465 emr.nPalEntries = 0;
466 emr.offPalEntries = FIELD_OFFSET(EMREOF, nSizeLast);
467 emr.nSizeLast = emr.emr.nSize;
468 EMFDRV_WriteRecord( &physDev->dev, &emr.emr );
469
470 /* Update rclFrame if not initialized in CreateEnhMetaFile */
471 if(physDev->emh->rclFrame.left > physDev->emh->rclFrame.right) {
472 physDev->emh->rclFrame.left = physDev->emh->rclBounds.left *
473 physDev->emh->szlMillimeters.cx * 100 / physDev->emh->szlDevice.cx;
474 physDev->emh->rclFrame.top = physDev->emh->rclBounds.top *
475 physDev->emh->szlMillimeters.cy * 100 / physDev->emh->szlDevice.cy;
476 physDev->emh->rclFrame.right = physDev->emh->rclBounds.right *
477 physDev->emh->szlMillimeters.cx * 100 / physDev->emh->szlDevice.cx;
478 physDev->emh->rclFrame.bottom = physDev->emh->rclBounds.bottom *
479 physDev->emh->szlMillimeters.cy * 100 / physDev->emh->szlDevice.cy;
480 }
481
482 if (physDev->hFile) /* disk based metafile */
483 {
484 if (SetFilePointer(physDev->hFile, 0, NULL, FILE_BEGIN) != 0)
485 {
486 CloseHandle( physDev->hFile );
487 free_dc_ptr( dc );
488 return 0;
489 }
490
491 if (!WriteFile(physDev->hFile, physDev->emh, sizeof(*physDev->emh),
492 NULL, NULL))
493 {
494 CloseHandle( physDev->hFile );
495 free_dc_ptr( dc );
496 return 0;
497 }
498 HeapFree( GetProcessHeap(), 0, physDev->emh );
499 hMapping = CreateFileMappingA(physDev->hFile, NULL, PAGE_READONLY, 0,
500 0, NULL);
501 TRACE("hMapping = %p\n", hMapping );
502 physDev->emh = MapViewOfFile(hMapping, FILE_MAP_READ, 0, 0, 0);
503 TRACE("view = %p\n", physDev->emh );
504 CloseHandle( hMapping );
505 CloseHandle( physDev->hFile );
506 }
507
508 hmf = EMF_Create_HENHMETAFILE( physDev->emh, (physDev->hFile != 0) );
509 physDev->emh = NULL; /* So it won't be deleted */
510 free_dc_ptr( dc );
511 return hmf;
512 }