Murali Pattathe
[wine/multimedia.git] / objects / enhmetafile.c
blob4bc2b43c03d67121a4a4e4fc3e4069446df7fd44
1 /*
2 * Enhanced metafile functions
3 * Copyright 1998 Douglas Ridgway
4 * 1999 Huw D M Davies
6 *
7 * The enhanced format consists of the following elements:
9 * A header
10 * A table of handles to GDI objects
11 * An array of metafile records
12 * A private palette
15 * The standard format consists of a header and an array of metafile records.
17 */
19 #include <string.h>
20 #include <assert.h>
21 #include "winbase.h"
22 #include "wingdi.h"
23 #include "wine/winestring.h"
24 #include "winerror.h"
25 #include "enhmetafile.h"
26 #include "debugtools.h"
27 #include "heap.h"
28 #include "metafile.h"
30 DEFAULT_DEBUG_CHANNEL(enhmetafile)
32 /* Prototypes */
33 BOOL WINAPI EnumEnhMetaFile( HDC hdc, HENHMETAFILE hmf, ENHMFENUMPROC callback,
34 LPVOID data, const RECT *rect );
37 /****************************************************************************
38 * EMF_Create_HENHMETAFILE
40 HENHMETAFILE EMF_Create_HENHMETAFILE(ENHMETAHEADER *emh, HFILE hFile, HANDLE
41 hMapping )
43 HENHMETAFILE hmf = GDI_AllocObject( sizeof(ENHMETAFILEOBJ),
44 ENHMETAFILE_MAGIC );
45 ENHMETAFILEOBJ *metaObj = (ENHMETAFILEOBJ *)GDI_HEAP_LOCK( hmf );
46 metaObj->emh = emh;
47 metaObj->hFile = hFile;
48 metaObj->hMapping = hMapping;
49 GDI_HEAP_UNLOCK( hmf );
50 return hmf;
53 /****************************************************************************
54 * EMF_Delete_HENHMETAFILE
56 static BOOL EMF_Delete_HENHMETAFILE( HENHMETAFILE hmf )
58 ENHMETAFILEOBJ *metaObj = (ENHMETAFILEOBJ *)GDI_GetObjPtr( hmf,
59 ENHMETAFILE_MAGIC );
60 if(!metaObj) return FALSE;
61 if(metaObj->hMapping) {
62 UnmapViewOfFile( metaObj->emh );
63 CloseHandle( metaObj->hMapping );
64 CloseHandle( metaObj->hFile );
65 } else
66 HeapFree( SystemHeap, 0, metaObj->emh );
67 return GDI_FreeObject( hmf );
70 /******************************************************************
71 * EMF_GetEnhMetaHeader
73 * Returns ptr to ENHMETAHEADER associated with HENHMETAFILE
74 * Should be followed by call to EMF_ReleaseEnhMetaHeader
76 static ENHMETAHEADER *EMF_GetEnhMetaHeader( HENHMETAFILE hmf )
78 ENHMETAFILEOBJ *metaObj = (ENHMETAFILEOBJ *)GDI_GetObjPtr( hmf,
79 ENHMETAFILE_MAGIC );
80 TRACE("hmf %04x -> enhmetaObj %p\n", hmf, metaObj);
81 return metaObj ? metaObj->emh : NULL;
84 /******************************************************************
85 * EMF_ReleaseEnhMetaHeader
87 * Releases ENHMETAHEADER associated with HENHMETAFILE
89 static BOOL EMF_ReleaseEnhMetaHeader( HENHMETAFILE hmf )
91 return GDI_HEAP_UNLOCK( hmf );
94 /*****************************************************************************
95 * EMF_GetEnhMetaFile
98 static HENHMETAFILE EMF_GetEnhMetaFile( HFILE hFile )
100 ENHMETAHEADER *emh;
101 HANDLE hMapping;
103 hMapping = CreateFileMappingA( hFile, NULL, PAGE_READONLY, 0, 0, NULL );
104 emh = MapViewOfFile( hMapping, FILE_MAP_READ, 0, 0, 0 );
106 if (emh->iType != EMR_HEADER || emh->dSignature != ENHMETA_SIGNATURE) {
107 WARN("Invalid emf header type 0x%08lx sig 0x%08lx.\n",
108 emh->iType, emh->dSignature);
109 UnmapViewOfFile( emh );
110 CloseHandle( hMapping );
111 return 0;
113 return EMF_Create_HENHMETAFILE( emh, hFile, hMapping );
117 /*****************************************************************************
118 * GetEnhMetaFileA (GDI32.174)
122 HENHMETAFILE WINAPI GetEnhMetaFileA(
123 LPCSTR lpszMetaFile /* filename of enhanced metafile */
126 HENHMETAFILE hmf;
127 HFILE hFile;
129 hFile = CreateFileA(lpszMetaFile, GENERIC_READ, FILE_SHARE_READ, 0,
130 OPEN_EXISTING, 0, 0);
131 if (hFile == INVALID_HANDLE_VALUE) {
132 WARN("could not open %s\n", lpszMetaFile);
133 return 0;
135 hmf = EMF_GetEnhMetaFile( hFile );
136 if(!hmf)
137 CloseHandle( hFile );
138 return hmf;
141 /*****************************************************************************
142 * GetEnhMetaFile32W (GDI32.180)
144 HENHMETAFILE WINAPI GetEnhMetaFileW(
145 LPCWSTR lpszMetaFile) /* filename of enhanced metafile */
147 HENHMETAFILE hmf;
148 HFILE hFile;
150 hFile = CreateFileW(lpszMetaFile, GENERIC_READ, FILE_SHARE_READ, 0,
151 OPEN_EXISTING, 0, 0);
152 if (hFile == INVALID_HANDLE_VALUE) {
153 WARN("could not open %s\n", debugstr_w(lpszMetaFile));
154 return 0;
156 hmf = EMF_GetEnhMetaFile( hFile );
157 if(!hmf)
158 CloseHandle( hFile );
159 return hmf;
162 /*****************************************************************************
163 * GetEnhMetaFileHeader (GDI32.178)
165 * If _buf_ is NULL, returns the size of buffer required.
166 * Otherwise, copy up to _bufsize_ bytes of enhanced metafile header into
167 * _buf.
169 UINT WINAPI GetEnhMetaFileHeader(
170 HENHMETAFILE hmf, /* enhanced metafile */
171 UINT bufsize, /* size of buffer */
172 LPENHMETAHEADER buf /* buffer */
175 LPENHMETAHEADER emh;
177 if (!buf) return sizeof(ENHMETAHEADER);
178 emh = EMF_GetEnhMetaHeader(hmf);
179 if(!emh) return FALSE;
180 memmove(buf, emh, MIN(sizeof(ENHMETAHEADER), bufsize));
181 EMF_ReleaseEnhMetaHeader(hmf);
182 return MIN(sizeof(ENHMETAHEADER), bufsize);
186 /*****************************************************************************
187 * GetEnhMetaFileDescription32A (GDI32.176)
189 UINT WINAPI GetEnhMetaFileDescriptionA(
190 HENHMETAFILE hmf, /* enhanced metafile */
191 UINT size, /* size of buf */
192 LPSTR buf /* buffer to receive description */
195 LPENHMETAHEADER emh = EMF_GetEnhMetaHeader(hmf);
196 INT first;
198 if(!emh) return FALSE;
199 if(emh->nDescription == 0 || emh->offDescription == 0) {
200 EMF_ReleaseEnhMetaHeader(hmf);
201 return 0;
203 if (!buf || !size ) {
204 EMF_ReleaseEnhMetaHeader(hmf);
205 return emh->nDescription;
208 first = lstrlenW( (WCHAR *) ((char *) emh + emh->offDescription));
210 lstrcpynWtoA(buf, (WCHAR *) ((char *) emh + emh->offDescription), size);
211 buf += first + 1;
212 lstrcpynWtoA(buf, (WCHAR *) ((char *) emh + emh->offDescription+2*(first+1)),
213 size - first - 1);
215 EMF_ReleaseEnhMetaHeader(hmf);
216 return MIN(size, emh->nDescription);
219 /*****************************************************************************
220 * GetEnhMetaFileDescription32W (GDI32.177)
222 * Copies the description string of an enhanced metafile into a buffer
223 * _buf_.
225 * If _buf_ is NULL, returns size of _buf_ required. Otherwise, returns
226 * number of characters copied.
228 UINT WINAPI GetEnhMetaFileDescriptionW(
229 HENHMETAFILE hmf, /* enhanced metafile */
230 UINT size, /* size of buf */
231 LPWSTR buf /* buffer to receive description */
234 LPENHMETAHEADER emh = EMF_GetEnhMetaHeader(hmf);
236 if(!emh) return FALSE;
237 if(emh->nDescription == 0 || emh->offDescription == 0) {
238 EMF_ReleaseEnhMetaHeader(hmf);
239 return 0;
241 if (!buf || !size ) {
242 EMF_ReleaseEnhMetaHeader(hmf);
243 return emh->nDescription;
246 memmove(buf, (char *) emh + emh->offDescription,
247 MIN(size,emh->nDescription));
248 EMF_ReleaseEnhMetaHeader(hmf);
249 return MIN(size, emh->nDescription);
252 /****************************************************************************
253 * SetEnhMetaFileBits (GDI32.315)
255 * Creates an enhanced metafile by copying _bufsize_ bytes from _buf_.
257 HENHMETAFILE WINAPI SetEnhMetaFileBits(UINT bufsize, const BYTE *buf)
259 ENHMETAHEADER *emh = HeapAlloc( SystemHeap, 0, bufsize );
260 memmove(emh, buf, bufsize);
261 return EMF_Create_HENHMETAFILE( emh, 0, 0 );
264 INT CALLBACK cbCountSizeOfEnhMetaFile( HDC a,
265 LPHANDLETABLE b,
266 LPENHMETARECORD lpEMR,
267 INT c,
268 LPVOID lpData )
270 LPUINT uSizeOfRecordData = (LPUINT)lpData;
272 uSizeOfRecordData += lpEMR->nSize;
274 return TRUE;
277 /*****************************************************************************
278 * GetEnhMetaFileBits (GDI32.175)
281 UINT WINAPI GetEnhMetaFileBits(
282 HENHMETAFILE hmf,
283 UINT bufsize,
284 LPBYTE buf
287 LPENHMETAHEADER lpEnhMetaFile;
288 UINT uEnhMetaFileSize = 0;
290 FIXME( "(%04x,%u,%p): untested\n", hmf, bufsize, buf );
292 /* Determine the required buffer size */
293 /* Enumerate all records and count their size */
294 if( !EnumEnhMetaFile( 0, hmf, cbCountSizeOfEnhMetaFile, &uEnhMetaFileSize, NULL ) )
296 ERR( "Unable to enumerate enhanced metafile!\n" );
297 return 0;
300 if( buf == NULL )
302 return uEnhMetaFileSize;
305 /* Copy the lesser of the two byte counts */
306 uEnhMetaFileSize = MIN( uEnhMetaFileSize, bufsize );
308 /* Copy everything */
309 lpEnhMetaFile = EMF_GetEnhMetaHeader( hmf );
311 if( lpEnhMetaFile == NULL )
313 return 0;
316 /* Use memmove just in case they overlap */
317 memmove(buf, lpEnhMetaFile, bufsize);
319 EMF_ReleaseEnhMetaHeader( hmf );
321 return bufsize;
324 /*****************************************************************************
325 * PlayEnhMetaFileRecord (GDI32.264)
327 * Render a single enhanced metafile record in the device context hdc.
329 * RETURNS
330 * TRUE on success, FALSE on error.
331 * BUGS
332 * Many unimplemented records.
334 BOOL WINAPI PlayEnhMetaFileRecord(
335 HDC hdc, /* device context in which to render EMF record */
336 LPHANDLETABLE handletable, /* array of handles to be used in rendering record */
337 const ENHMETARECORD *mr, /* EMF record to render */
338 UINT handles /* size of handle array */
341 int type;
342 TRACE(
343 "hdc = %08x, handletable = %p, record = %p, numHandles = %d\n",
344 hdc, handletable, mr, handles);
345 if (!mr) return FALSE;
347 type = mr->iType;
349 TRACE(" type=%d\n", type);
350 switch(type)
352 case EMR_HEADER:
354 /* ENHMETAHEADER *h = (LPENHMETAHEADER) mr; */
355 break;
357 case EMR_EOF:
358 break;
359 case EMR_GDICOMMENT:
361 PEMRGDICOMMENT lpGdiComment = (PEMRGDICOMMENT)mr;
362 /* In an enhanced metafile, there can be both public and private GDI comments */
363 GdiComment( hdc, lpGdiComment->cbData, lpGdiComment->Data );
364 break;
366 case EMR_SETMAPMODE:
368 DWORD mode = mr->dParm[0];
369 SetMapMode(hdc, mode);
370 break;
372 case EMR_SETBKMODE:
374 DWORD mode = mr->dParm[0];
375 SetBkMode(hdc, mode);
376 break;
378 case EMR_SETBKCOLOR:
380 DWORD mode = mr->dParm[0];
381 SetBkColor(hdc, mode);
382 break;
384 case EMR_SETPOLYFILLMODE:
386 DWORD mode = mr->dParm[0];
387 SetPolyFillMode(hdc, mode);
388 break;
390 case EMR_SETROP2:
392 DWORD mode = mr->dParm[0];
393 SetROP2(hdc, mode);
394 break;
396 case EMR_SETSTRETCHBLTMODE:
398 DWORD mode = mr->dParm[0];
399 SetStretchBltMode(hdc, mode);
400 break;
402 case EMR_SETTEXTALIGN:
404 DWORD align = mr->dParm[0];
405 SetTextAlign(hdc, align);
406 break;
408 case EMR_SETTEXTCOLOR:
410 DWORD color = mr->dParm[0];
411 SetTextColor(hdc, color);
412 break;
414 case EMR_SAVEDC:
416 SaveDC(hdc);
417 break;
419 case EMR_RESTOREDC:
421 RestoreDC(hdc, mr->dParm[0]);
422 break;
424 case EMR_INTERSECTCLIPRECT:
426 INT left = mr->dParm[0], top = mr->dParm[1], right = mr->dParm[2],
427 bottom = mr->dParm[3];
428 IntersectClipRect(hdc, left, top, right, bottom);
429 break;
431 case EMR_SELECTOBJECT:
433 DWORD obj = mr->dParm[0];
434 SelectObject(hdc, (handletable->objectHandle)[obj]);
435 break;
437 case EMR_DELETEOBJECT:
439 DWORD obj = mr->dParm[0];
440 DeleteObject( (handletable->objectHandle)[obj]);
441 (handletable->objectHandle)[obj] = 0;
442 break;
444 case EMR_SETWINDOWORGEX:
446 DWORD x = mr->dParm[0], y = mr->dParm[1];
447 SetWindowOrgEx(hdc, x, y, NULL);
448 break;
450 case EMR_SETWINDOWEXTEX:
452 DWORD x = mr->dParm[0], y = mr->dParm[1];
453 SetWindowExtEx(hdc, x, y, NULL);
454 break;
456 case EMR_SETVIEWPORTORGEX:
458 DWORD x = mr->dParm[0], y = mr->dParm[1];
459 SetViewportOrgEx(hdc, x, y, NULL);
460 break;
462 case EMR_SETVIEWPORTEXTEX:
464 DWORD x = mr->dParm[0], y = mr->dParm[1];
465 SetViewportExtEx(hdc, x, y, NULL);
466 break;
468 case EMR_CREATEPEN:
470 DWORD obj = mr->dParm[0];
471 (handletable->objectHandle)[obj] =
472 CreatePenIndirect((LOGPEN *) &(mr->dParm[1]));
473 break;
475 case EMR_EXTCREATEPEN:
477 DWORD obj = mr->dParm[0];
478 DWORD style = mr->dParm[1], brush = mr->dParm[2];
479 LOGBRUSH *b = (LOGBRUSH *) &mr->dParm[3];
480 FIXME("Some ExtCreatePen args not handled\n");
481 (handletable->objectHandle)[obj] =
482 ExtCreatePen(style, brush, b, 0, NULL);
483 break;
485 case EMR_CREATEBRUSHINDIRECT:
487 DWORD obj = mr->dParm[0];
488 (handletable->objectHandle)[obj] =
489 CreateBrushIndirect((LOGBRUSH *) &(mr->dParm[1]));
490 break;
492 case EMR_EXTCREATEFONTINDIRECTW:
494 DWORD obj = mr->dParm[0];
495 (handletable->objectHandle)[obj] =
496 CreateFontIndirectW((LOGFONTW *) &(mr->dParm[1]));
497 break;
499 case EMR_MOVETOEX:
501 DWORD x = mr->dParm[0], y = mr->dParm[1];
502 MoveToEx(hdc, x, y, NULL);
503 break;
505 case EMR_LINETO:
507 DWORD x = mr->dParm[0], y = mr->dParm[1];
508 LineTo(hdc, x, y);
509 break;
511 case EMR_RECTANGLE:
513 INT left = mr->dParm[0], top = mr->dParm[1], right = mr->dParm[2],
514 bottom = mr->dParm[3];
515 Rectangle(hdc, left, top, right, bottom);
516 break;
518 case EMR_ELLIPSE:
520 INT left = mr->dParm[0], top = mr->dParm[1], right = mr->dParm[2],
521 bottom = mr->dParm[3];
522 Ellipse(hdc, left, top, right, bottom);
523 break;
525 case EMR_POLYGON16:
527 /* 0-3 : a bounding rectangle? */
528 INT count = mr->dParm[4];
529 FIXME("Some Polygon16 args not handled\n");
530 Polygon16(hdc, (POINT16 *)&mr->dParm[5], count);
531 break;
533 case EMR_POLYLINE16:
535 /* 0-3 : a bounding rectangle? */
536 INT count = mr->dParm[4];
537 FIXME("Some Polyline16 args not handled\n");
538 Polyline16(hdc, (POINT16 *)&mr->dParm[5], count);
539 break;
541 #if 0
542 case EMR_POLYPOLYGON16:
544 PEMRPOLYPOLYGON16 lpPolyPoly16 = (PEMRPOLYPOLYGON16)mr;
546 PolyPolygon16( hdc,
547 lpPolyPoly16->apts,
548 lpPolyPoly16->aPolyCounts,
549 lpPolyPoly16->nPolys );
551 break;
553 #endif
554 case EMR_STRETCHDIBITS:
556 LONG xDest = mr->dParm[4];
557 LONG yDest = mr->dParm[5];
558 LONG xSrc = mr->dParm[6];
559 LONG ySrc = mr->dParm[7];
560 LONG cxSrc = mr->dParm[8];
561 LONG cySrc = mr->dParm[9];
562 DWORD offBmiSrc = mr->dParm[10];
563 DWORD offBitsSrc = mr->dParm[12];
564 DWORD iUsageSrc = mr->dParm[14];
565 DWORD dwRop = mr->dParm[15];
566 LONG cxDest = mr->dParm[16];
567 LONG cyDest = mr->dParm[17];
569 StretchDIBits(hdc,xDest,yDest,cxDest,cyDest,
570 xSrc,ySrc,cxSrc,cySrc,
571 ((char *)mr)+offBitsSrc,
572 (const BITMAPINFO *)(((char *)mr)+offBmiSrc),
573 iUsageSrc,dwRop);
574 break;
576 case EMR_EXTTEXTOUTW:
578 /* 0-3: ??? */
579 DWORD flags = mr->dParm[4];
580 /* 5, 6: ??? */
581 DWORD x = mr->dParm[7], y = mr->dParm[8];
582 DWORD count = mr->dParm[9];
583 /* 10-16: ??? */
584 LPWSTR str = (LPWSTR)& mr->dParm[17];
585 /* trailing info: dx array? */
586 FIXME("Many ExtTextOut args not handled\n");
587 ExtTextOutW(hdc, x, y, flags, /* lpRect */ NULL,
588 str, count, /* lpDx */ NULL);
589 break;
592 case EMR_CREATEPALETTE:
594 PEMRCREATEPALETTE lpCreatePal = (PEMRCREATEPALETTE)mr;
596 (handletable->objectHandle)[ lpCreatePal->ihPal ] =
597 CreatePalette( &lpCreatePal->lgpl );
599 break;
602 case EMR_SELECTPALETTE:
604 PEMRSELECTPALETTE lpSelectPal = (PEMRSELECTPALETTE)mr;
606 /* FIXME: Should this be forcing background mode? */
607 (handletable->objectHandle)[ lpSelectPal->ihPal ] =
608 SelectPalette( hdc, lpSelectPal->ihPal, FALSE );
609 break;
612 case EMR_REALIZEPALETTE:
614 RealizePalette( hdc );
615 break;
618 #if 0
619 case EMR_EXTSELECTCLIPRGN:
621 PEMREXTSELECTCLIPRGN lpRgn = (PEMREXTSELECTCLIPRGN)mr;
623 /* Need to make a region out of the RGNDATA we have */
624 ExtSelectClipRgn( hdc, ..., (INT)(lpRgn->iMode) );
627 #endif
628 case EMR_SETMETARGN:
630 SetMetaRgn( hdc );
631 break;
633 case EMR_SETWORLDTRANSFORM:
635 PEMRSETWORLDTRANSFORM lpXfrm = (PEMRSETWORLDTRANSFORM)mr;
636 SetWorldTransform( hdc, &lpXfrm->xform );
637 break;
639 case EMR_POLYBEZIER:
640 case EMR_POLYGON:
641 case EMR_POLYLINE:
642 case EMR_POLYBEZIERTO:
643 case EMR_POLYLINETO:
644 case EMR_POLYPOLYLINE:
645 case EMR_POLYPOLYGON:
646 case EMR_SETBRUSHORGEX:
647 case EMR_SETPIXELV:
648 case EMR_SETMAPPERFLAGS:
649 case EMR_SETCOLORADJUSTMENT:
650 case EMR_OFFSETCLIPRGN:
651 case EMR_EXCLUDECLIPRECT:
652 case EMR_SCALEVIEWPORTEXTEX:
653 case EMR_SCALEWINDOWEXTEX:
654 case EMR_MODIFYWORLDTRANSFORM:
655 case EMR_ANGLEARC:
656 case EMR_ROUNDRECT:
657 case EMR_ARC:
658 case EMR_CHORD:
659 case EMR_PIE:
660 case EMR_SETPALETTEENTRIES:
661 case EMR_RESIZEPALETTE:
662 case EMR_EXTFLOODFILL:
663 case EMR_ARCTO:
664 case EMR_POLYDRAW:
665 case EMR_SETARCDIRECTION:
666 case EMR_SETMITERLIMIT:
667 case EMR_BEGINPATH:
668 case EMR_ENDPATH:
669 case EMR_CLOSEFIGURE:
670 case EMR_FILLPATH:
671 case EMR_STROKEANDFILLPATH:
672 case EMR_STROKEPATH:
673 case EMR_FLATTENPATH:
674 case EMR_WIDENPATH:
675 case EMR_SELECTCLIPPATH:
676 case EMR_ABORTPATH:
677 case EMR_FILLRGN:
678 case EMR_FRAMERGN:
679 case EMR_INVERTRGN:
680 case EMR_PAINTRGN:
681 case EMR_BITBLT:
682 case EMR_STRETCHBLT:
683 case EMR_MASKBLT:
684 case EMR_PLGBLT:
685 case EMR_SETDIBITSTODEVICE:
686 case EMR_EXTTEXTOUTA:
687 case EMR_POLYBEZIER16:
688 case EMR_POLYBEZIERTO16:
689 case EMR_POLYLINETO16:
690 case EMR_POLYPOLYLINE16:
691 case EMR_POLYPOLYGON16:
692 case EMR_POLYDRAW16:
693 case EMR_CREATEMONOBRUSH:
694 case EMR_CREATEDIBPATTERNBRUSHPT:
695 case EMR_POLYTEXTOUTA:
696 case EMR_POLYTEXTOUTW:
697 case EMR_SETICMMODE:
698 case EMR_CREATECOLORSPACE:
699 case EMR_SETCOLORSPACE:
700 case EMR_DELETECOLORSPACE:
701 case EMR_GLSRECORD:
702 case EMR_GLSBOUNDEDRECORD:
703 case EMR_PIXELFORMAT:
704 default:
705 FIXME("type %d is unimplemented\n", type);
706 /* SetLastError(E_NOTIMPL); */
707 break;
709 return TRUE;
713 /*****************************************************************************
715 * EnumEnhMetaFile32 (GDI32.79)
717 * Walk an enhanced metafile, calling a user-specified function _EnhMetaFunc_
718 * for each
719 * record. Returns when either every record has been used or
720 * when _EnhMetaFunc_ returns FALSE.
723 * RETURNS
724 * TRUE if every record is used, FALSE if any invocation of _EnhMetaFunc_
725 * returns FALSE.
727 * BUGS
728 * Ignores rect.
730 BOOL WINAPI EnumEnhMetaFile(
731 HDC hdc, /* device context to pass to _EnhMetaFunc_ */
732 HENHMETAFILE hmf, /* EMF to walk */
733 ENHMFENUMPROC callback, /* callback function */
734 LPVOID data, /* optional data for callback function */
735 const RECT *rect /* bounding rectangle for rendered metafile */
738 BOOL ret = TRUE;
739 LPENHMETARECORD p = (LPENHMETARECORD) EMF_GetEnhMetaHeader(hmf);
740 INT count;
741 HANDLETABLE *ht;
743 if(!p) return FALSE;
744 count = ((LPENHMETAHEADER) p)->nHandles;
745 ht = HeapAlloc( GetProcessHeap(), 0, sizeof(HANDLETABLE)*count);
746 ht->objectHandle[0] = hmf;
747 while (ret) {
748 ret = (*callback)(hdc, ht, p, count, data);
749 if (p->iType == EMR_EOF) break;
750 p = (LPENHMETARECORD) ((char *) p + p->nSize);
752 HeapFree( GetProcessHeap(), 0, ht);
753 EMF_ReleaseEnhMetaHeader(hmf);
754 return ret;
758 /**************************************************************************
759 * PlayEnhMetaFile (GDI32.263)
761 * Renders an enhanced metafile into a specified rectangle *lpRect
762 * in device context hdc.
764 * BUGS
765 * Almost entirely unimplemented
768 BOOL WINAPI PlayEnhMetaFile(
769 HDC hdc, /* DC to render into */
770 HENHMETAFILE hmf, /* metafile to render */
771 const RECT *lpRect /* rectangle to place metafile inside */
774 LPENHMETARECORD p = (LPENHMETARECORD) EMF_GetEnhMetaHeader(hmf);
775 INT count;
776 HANDLETABLE *ht;
777 BOOL ret = FALSE;
778 INT savedMode = 0;
780 if(!p) return FALSE;
781 count = ((LPENHMETAHEADER) p)->nHandles;
782 ht = HeapAlloc( GetProcessHeap(), 0, sizeof(HANDLETABLE) * count);
783 if (lpRect) {
784 LPENHMETAHEADER h = (LPENHMETAHEADER) p;
785 FLOAT xscale = (h->rclBounds.right - h->rclBounds.left) /
786 (lpRect->right - lpRect->left);
787 FLOAT yscale = (h->rclBounds.bottom - h->rclBounds.top) /
788 (lpRect->bottom - lpRect->top);
789 XFORM xform;
790 xform.eM11 = xscale;
791 xform.eM12 = 0;
792 xform.eM21 = 0;
793 xform.eM22 = yscale;
794 xform.eDx = lpRect->left;
795 xform.eDy = lpRect->top;
796 FIXME("play into rect doesn't work\n");
797 savedMode = SetGraphicsMode(hdc, GM_ADVANCED);
798 if (!SetWorldTransform(hdc, &xform)) {
799 WARN("World transform failed!\n");
803 ht->objectHandle[0] = hmf;
804 while (1) {
805 PlayEnhMetaFileRecord(hdc, ht, p, count);
806 if (p->iType == EMR_EOF) break;
807 p = (LPENHMETARECORD) ((char *) p + p->nSize); /* casted so that arithmetic is in bytes */
809 HeapFree( GetProcessHeap(), 0, ht );
810 EMF_ReleaseEnhMetaHeader(hmf);
811 if (savedMode) SetGraphicsMode(hdc, savedMode);
812 ret = TRUE; /* FIXME: calculate a more accurate return value */
813 return ret;
816 /*****************************************************************************
817 * DeleteEnhMetaFile (GDI32.68)
819 * Deletes an enhanced metafile and frees the associated storage.
821 BOOL WINAPI DeleteEnhMetaFile(HENHMETAFILE hmf)
823 return EMF_Delete_HENHMETAFILE( hmf );
826 /*****************************************************************************
827 * CopyEnhMetaFileA (GDI32.21) Duplicate an enhanced metafile
831 HENHMETAFILE WINAPI CopyEnhMetaFileA(
832 HENHMETAFILE hmfSrc,
833 LPCSTR file)
835 ENHMETAHEADER *emrSrc = EMF_GetEnhMetaHeader( hmfSrc ), *emrDst;
836 HENHMETAFILE hmfDst;
838 if(!emrSrc) return FALSE;
839 if (!file) {
840 emrDst = HeapAlloc( SystemHeap, 0, emrSrc->nBytes );
841 memcpy( emrDst, emrSrc, emrSrc->nBytes );
842 hmfDst = EMF_Create_HENHMETAFILE( emrDst, 0, 0 );
843 } else {
844 HFILE hFile;
845 hFile = CreateFileA( file, GENERIC_WRITE | GENERIC_READ, 0, NULL,
846 CREATE_ALWAYS, 0, -1);
847 WriteFile( hFile, emrSrc, emrSrc->nBytes, 0, 0);
848 hmfDst = EMF_GetEnhMetaFile( hFile );
850 EMF_ReleaseEnhMetaHeader( hmfSrc );
851 return hmfDst;
855 /* Struct to be used to be passed in the LPVOID parameter for cbEnhPaletteCopy */
856 typedef struct tagEMF_PaletteCopy
858 UINT cEntries;
859 LPPALETTEENTRY lpPe;
860 } EMF_PaletteCopy;
862 /***************************************************************
863 * Find the EMR_EOF record and then use it to find the
864 * palette entries for this enhanced metafile.
865 * The lpData is actually a pointer to a EMF_PaletteCopy struct
866 * which contains the max number of elements to copy and where
867 * to copy them to.
869 * NOTE: To be used by GetEnhMetaFilePaletteEntries only!
871 INT CALLBACK cbEnhPaletteCopy( HDC a,
872 LPHANDLETABLE b,
873 LPENHMETARECORD lpEMR,
874 INT c,
875 LPVOID lpData )
878 if ( lpEMR->iType == EMR_EOF )
880 PEMREOF lpEof = (PEMREOF)lpEMR;
881 EMF_PaletteCopy* info = (EMF_PaletteCopy*)lpData;
882 DWORD dwNumPalToCopy = MIN( lpEof->nPalEntries, info->cEntries );
884 TRACE( "copying 0x%08lx palettes\n", dwNumPalToCopy );
886 memcpy( (LPVOID)info->lpPe,
887 (LPVOID)(((LPSTR)lpEof) + lpEof->offPalEntries),
888 sizeof( *(info->lpPe) ) * dwNumPalToCopy );
890 /* Update the passed data as a return code */
891 info->lpPe = NULL; /* Palettes were copied! */
892 info->cEntries = (UINT)dwNumPalToCopy;
894 return FALSE; /* That's all we need */
897 return TRUE;
900 /*****************************************************************************
901 * GetEnhMetaFilePaletteEntries (GDI32.179)
903 * Copy the palette and report size
905 * BUGS: Error codes (SetLastError) are not set on failures
907 UINT WINAPI GetEnhMetaFilePaletteEntries( HENHMETAFILE hEmf,
908 UINT cEntries,
909 LPPALETTEENTRY lpPe )
911 ENHMETAHEADER* enhHeader = EMF_GetEnhMetaHeader( hEmf );
912 UINT uReturnValue = GDI_ERROR;
913 EMF_PaletteCopy infoForCallBack;
915 TRACE( "(%04x,%d,%p)\n", hEmf, cEntries, lpPe );
917 /* First check if there are any palettes associated with
918 this metafile. */
919 if ( enhHeader->nPalEntries == 0 )
921 /* No palette associated with this enhanced metafile */
922 uReturnValue = 0;
923 goto done;
926 /* Is the user requesting the number of palettes? */
927 if ( lpPe == NULL )
929 uReturnValue = (UINT)enhHeader->nPalEntries;
930 goto done;
933 /* Copy cEntries worth of PALETTEENTRY structs into the buffer */
934 infoForCallBack.cEntries = cEntries;
935 infoForCallBack.lpPe = lpPe;
937 if ( !EnumEnhMetaFile( 0, hEmf, cbEnhPaletteCopy,
938 &infoForCallBack, NULL ) )
940 goto done;
943 /* Verify that the callback executed correctly */
944 if ( infoForCallBack.lpPe != NULL )
946 /* Callback proc had error! */
947 ERR( "cbEnhPaletteCopy didn't execute correctly\n" );
948 goto done;
951 uReturnValue = infoForCallBack.cEntries;
953 done:
955 EMF_ReleaseEnhMetaHeader( hEmf );
957 return uReturnValue;
960 /******************************************************************
961 * SetWinMetaFileBits (GDI32.343)
963 * Translate from old style to new style.
965 * BUGS: - This doesn't take the DC and scaling into account
966 * - Most record conversions aren't implemented
967 * - Handle slot assignement is primative and most likely doesn't work
969 HENHMETAFILE WINAPI SetWinMetaFileBits(UINT cbBuffer,
970 CONST BYTE *lpbBuffer,
971 HDC hdcRef,
972 CONST METAFILEPICT *lpmfp
975 HENHMETAFILE hMf;
976 LPVOID lpNewEnhMetaFileBuffer = NULL;
977 UINT uNewEnhMetaFileBufferSize = 0;
978 BOOL bFoundEOF = FALSE;
980 FIXME( "(%d,%p,%04x,%p):stub\n", cbBuffer, lpbBuffer, hdcRef, lpmfp );
982 /* 1. Get the header - skip over this and get straight to the records */
984 uNewEnhMetaFileBufferSize = sizeof( ENHMETAHEADER );
985 lpNewEnhMetaFileBuffer = HeapAlloc( SystemHeap, HEAP_ZERO_MEMORY,
986 uNewEnhMetaFileBufferSize );
988 if( lpNewEnhMetaFileBuffer == NULL )
990 goto error;
993 /* Fill in the header record */
995 LPENHMETAHEADER lpNewEnhMetaFileHeader = (LPENHMETAHEADER)lpNewEnhMetaFileBuffer;
997 lpNewEnhMetaFileHeader->iType = EMR_HEADER;
998 lpNewEnhMetaFileHeader->nSize = sizeof( ENHMETAHEADER );
1000 /* FIXME: Not right. Must be able to get this from the DC */
1001 lpNewEnhMetaFileHeader->rclBounds.left = 0;
1002 lpNewEnhMetaFileHeader->rclBounds.right = 0;
1003 lpNewEnhMetaFileHeader->rclBounds.top = 0;
1004 lpNewEnhMetaFileHeader->rclBounds.bottom = 0;
1006 /* FIXME: Not right. Must be able to get this from the DC */
1007 lpNewEnhMetaFileHeader->rclFrame.left = 0;
1008 lpNewEnhMetaFileHeader->rclFrame.right = 0;
1009 lpNewEnhMetaFileHeader->rclFrame.top = 0;
1010 lpNewEnhMetaFileHeader->rclFrame.bottom = 0;
1012 lpNewEnhMetaFileHeader->nHandles = 0; /* No handles yet */
1014 /* FIXME: Add in the rest of the fields to the header */
1015 /* dSignature
1016 nVersion
1017 nRecords
1018 sReserved
1019 nDescription
1020 offDescription
1021 nPalEntries
1022 szlDevice
1023 szlMillimeters
1024 cbPixelFormat
1025 offPixelFormat,
1026 bOpenGL */
1029 (char*)lpbBuffer += ((METAHEADER*)lpbBuffer)->mtHeaderSize * 2; /* Point past the header - FIXME: metafile quirk? */
1031 /* 2. Enum over individual records and convert them to the new type of records */
1032 while( !bFoundEOF )
1035 LPMETARECORD lpMetaRecord = (LPMETARECORD)lpbBuffer;
1037 #define EMF_ReAllocAndAdjustPointers( a , b ) \
1039 LPVOID lpTmp; \
1040 lpTmp = HeapReAlloc( SystemHeap, 0, \
1041 lpNewEnhMetaFileBuffer, \
1042 uNewEnhMetaFileBufferSize + (b) ); \
1043 if( lpTmp == NULL ) { ERR( "No memory!\n" ); goto error; } \
1044 lpNewEnhMetaFileBuffer = lpTmp; \
1045 lpRecord = (a)( (char*)lpNewEnhMetaFileBuffer + uNewEnhMetaFileBufferSize ); \
1046 uNewEnhMetaFileBufferSize += (b); \
1049 switch( lpMetaRecord->rdFunction )
1051 case META_EOF:
1053 PEMREOF lpRecord;
1054 size_t uRecord = sizeof(*lpRecord);
1056 EMF_ReAllocAndAdjustPointers(PEMREOF,uRecord);
1058 /* Fill the new record - FIXME: This is not right */
1059 lpRecord->emr.iType = EMR_EOF;
1060 lpRecord->emr.nSize = sizeof( *lpRecord );
1061 lpRecord->nPalEntries = 0; /* FIXME */
1062 lpRecord->offPalEntries = 0; /* FIXME */
1063 lpRecord->nSizeLast = 0; /* FIXME */
1065 /* No more records after this one */
1066 bFoundEOF = TRUE;
1068 FIXME( "META_EOF conversion not correct\n" );
1069 break;
1072 case META_SETMAPMODE:
1074 PEMRSETMAPMODE lpRecord;
1075 size_t uRecord = sizeof(*lpRecord);
1077 EMF_ReAllocAndAdjustPointers(PEMRSETMAPMODE,uRecord);
1079 lpRecord->emr.iType = EMR_SETMAPMODE;
1080 lpRecord->emr.nSize = sizeof( *lpRecord );
1082 lpRecord->iMode = lpMetaRecord->rdParm[0];
1084 break;
1087 case META_DELETEOBJECT: /* Select and Delete structures are the same */
1088 case META_SELECTOBJECT:
1090 PEMRDELETEOBJECT lpRecord;
1091 size_t uRecord = sizeof(*lpRecord);
1093 EMF_ReAllocAndAdjustPointers(PEMRDELETEOBJECT,uRecord);
1095 if( lpMetaRecord->rdFunction == META_DELETEOBJECT )
1097 lpRecord->emr.iType = EMR_DELETEOBJECT;
1099 else
1101 lpRecord->emr.iType = EMR_SELECTOBJECT;
1103 lpRecord->emr.nSize = sizeof( *lpRecord );
1105 lpRecord->ihObject = lpMetaRecord->rdParm[0]; /* FIXME: Handle */
1107 break;
1110 case META_POLYGON: /* This is just plain busted. I don't know what I'm doing */
1112 PEMRPOLYGON16 lpRecord; /* FIXME: Should it be a poly or poly16? */
1113 size_t uRecord = sizeof(*lpRecord);
1115 EMF_ReAllocAndAdjustPointers(PEMRPOLYGON16,uRecord);
1117 /* FIXME: This is mostly all wrong */
1118 lpRecord->emr.iType = EMR_POLYGON16;
1119 lpRecord->emr.nSize = sizeof( *lpRecord );
1121 lpRecord->rclBounds.left = 0;
1122 lpRecord->rclBounds.right = 0;
1123 lpRecord->rclBounds.top = 0;
1124 lpRecord->rclBounds.bottom = 0;
1126 lpRecord->cpts = 0;
1127 lpRecord->apts[0].x = 0;
1128 lpRecord->apts[0].y = 0;
1130 FIXME( "META_POLYGON conversion not correct\n" );
1132 break;
1135 case META_SETPOLYFILLMODE:
1137 PEMRSETPOLYFILLMODE lpRecord;
1138 size_t uRecord = sizeof(*lpRecord);
1140 EMF_ReAllocAndAdjustPointers(PEMRSETPOLYFILLMODE,uRecord);
1142 lpRecord->emr.iType = EMR_SETPOLYFILLMODE;
1143 lpRecord->emr.nSize = sizeof( *lpRecord );
1145 lpRecord->iMode = lpMetaRecord->rdParm[0];
1147 break;
1150 case META_SETWINDOWORG:
1152 PEMRSETWINDOWORGEX lpRecord; /* Seems to be the closest thing */
1153 size_t uRecord = sizeof(*lpRecord);
1155 EMF_ReAllocAndAdjustPointers(PEMRSETWINDOWORGEX,uRecord);
1157 lpRecord->emr.iType = EMR_SETWINDOWORGEX;
1158 lpRecord->emr.nSize = sizeof( *lpRecord );
1160 lpRecord->ptlOrigin.x = lpMetaRecord->rdParm[1];
1161 lpRecord->ptlOrigin.y = lpMetaRecord->rdParm[0];
1163 break;
1166 case META_SETWINDOWEXT: /* Structure is the same for SETWINDOWEXT & SETVIEWPORTEXT */
1167 case META_SETVIEWPORTEXT:
1169 PEMRSETWINDOWEXTEX lpRecord;
1170 size_t uRecord = sizeof(*lpRecord);
1172 EMF_ReAllocAndAdjustPointers(PEMRSETWINDOWEXTEX,uRecord);
1174 if ( lpMetaRecord->rdFunction == META_SETWINDOWEXT )
1176 lpRecord->emr.iType = EMR_SETWINDOWORGEX;
1178 else
1180 lpRecord->emr.iType = EMR_SETVIEWPORTEXTEX;
1182 lpRecord->emr.nSize = sizeof( *lpRecord );
1184 lpRecord->szlExtent.cx = lpMetaRecord->rdParm[1];
1185 lpRecord->szlExtent.cy = lpMetaRecord->rdParm[0];
1187 break;
1190 case META_CREATEBRUSHINDIRECT:
1192 PEMRCREATEBRUSHINDIRECT lpRecord;
1193 size_t uRecord = sizeof(*lpRecord);
1195 EMF_ReAllocAndAdjustPointers(PEMRCREATEBRUSHINDIRECT,uRecord);
1197 lpRecord->emr.iType = EMR_CREATEBRUSHINDIRECT;
1198 lpRecord->emr.nSize = sizeof( *lpRecord );
1200 lpRecord->ihBrush = ((LPENHMETAHEADER)lpNewEnhMetaFileBuffer)->nHandles;
1201 lpRecord->lb.lbStyle = ((LPLOGBRUSH16)lpMetaRecord->rdParm)->lbStyle;
1202 lpRecord->lb.lbColor = ((LPLOGBRUSH16)lpMetaRecord->rdParm)->lbColor;
1203 lpRecord->lb.lbHatch = ((LPLOGBRUSH16)lpMetaRecord->rdParm)->lbHatch;
1205 ((LPENHMETAHEADER)lpNewEnhMetaFileBuffer)->nHandles += 1; /* New handle */
1207 break;
1211 /* These are all unimplemented and as such are intended to fall through to the default case */
1212 case META_SETBKCOLOR:
1213 case META_SETBKMODE:
1214 case META_SETROP2:
1215 case META_SETRELABS:
1216 case META_SETSTRETCHBLTMODE:
1217 case META_SETTEXTCOLOR:
1218 case META_SETVIEWPORTORG:
1219 case META_OFFSETWINDOWORG:
1220 case META_SCALEWINDOWEXT:
1221 case META_OFFSETVIEWPORTORG:
1222 case META_SCALEVIEWPORTEXT:
1223 case META_LINETO:
1224 case META_MOVETO:
1225 case META_EXCLUDECLIPRECT:
1226 case META_INTERSECTCLIPRECT:
1227 case META_ARC:
1228 case META_ELLIPSE:
1229 case META_FLOODFILL:
1230 case META_PIE:
1231 case META_RECTANGLE:
1232 case META_ROUNDRECT:
1233 case META_PATBLT:
1234 case META_SAVEDC:
1235 case META_SETPIXEL:
1236 case META_OFFSETCLIPRGN:
1237 case META_TEXTOUT:
1238 case META_POLYPOLYGON:
1239 case META_POLYLINE:
1240 case META_RESTOREDC:
1241 case META_CHORD:
1242 case META_CREATEPATTERNBRUSH:
1243 case META_CREATEPENINDIRECT:
1244 case META_CREATEFONTINDIRECT:
1245 case META_CREATEPALETTE:
1246 case META_SETTEXTALIGN:
1247 case META_SELECTPALETTE:
1248 case META_SETMAPPERFLAGS:
1249 case META_REALIZEPALETTE:
1250 case META_ESCAPE:
1251 case META_EXTTEXTOUT:
1252 case META_STRETCHDIB:
1253 case META_DIBSTRETCHBLT:
1254 case META_STRETCHBLT:
1255 case META_BITBLT:
1256 case META_CREATEREGION:
1257 case META_FILLREGION:
1258 case META_FRAMEREGION:
1259 case META_INVERTREGION:
1260 case META_PAINTREGION:
1261 case META_SELECTCLIPREGION:
1262 case META_DIBCREATEPATTERNBRUSH:
1263 case META_DIBBITBLT:
1264 case META_SETTEXTCHAREXTRA:
1265 case META_SETTEXTJUSTIFICATION:
1266 case META_EXTFLOODFILL:
1267 case META_SETDIBTODEV:
1268 case META_DRAWTEXT:
1269 case META_ANIMATEPALETTE:
1270 case META_SETPALENTRIES:
1271 case META_RESIZEPALETTE:
1272 case META_RESETDC:
1273 case META_STARTDOC:
1274 case META_STARTPAGE:
1275 case META_ENDPAGE:
1276 case META_ABORTDOC:
1277 case META_ENDDOC:
1278 case META_CREATEBRUSH:
1279 case META_CREATEBITMAPINDIRECT:
1280 case META_CREATEBITMAP:
1281 /* Fall through to unimplemented */
1282 default:
1284 /* Not implemented yet */
1285 FIXME( "Conversion of record type 0x%x not implemented.\n", lpMetaRecord->rdFunction );
1286 break;
1290 /* Move to the next record */
1291 (char*)lpbBuffer += ((LPMETARECORD)lpbBuffer)->rdSize * 2; /* FIXME: Seem to be doing this in metafile.c */
1293 #undef ReAllocAndAdjustPointers
1296 /* We know the last of the header information now */
1297 ((LPENHMETAHEADER)lpNewEnhMetaFileBuffer)->nBytes = uNewEnhMetaFileBufferSize;
1299 /* Create the enhanced metafile */
1300 hMf = SetEnhMetaFileBits( uNewEnhMetaFileBufferSize, (const BYTE*)lpNewEnhMetaFileBuffer );
1302 if( !hMf )
1303 ERR( "Problem creating metafile. Did the conversion fail somewhere?\n" );
1305 return hMf;
1307 error:
1308 /* Free the data associated with our copy since it's been copied */
1309 HeapFree( SystemHeap, 0, lpNewEnhMetaFileBuffer );
1311 return 0;