Stub for DllDebugObjectRPCHook.
[wine] / objects / enhmetafile.c
1 /*
2  * Enhanced metafile functions
3  * Copyright 1998 Douglas Ridgway
4  *           1999 Huw D M Davies 
5  *
6  * 
7  * The enhanced format consists of the following elements: 
8  *
9  *    A header 
10  *    A table of handles to GDI objects 
11  *    An array of metafile records 
12  *    A private palette 
13  *
14  * 
15  *  The standard format consists of a header and an array of metafile records. 
16  *
17  */ 
18
19 #include <string.h>
20 #include <assert.h>
21 #include "winnls.h"
22 #include "winbase.h"
23 #include "wingdi.h"
24 #include "winerror.h"
25 #include "enhmetafile.h"
26 #include "debugtools.h"
27 #include "heap.h"
28 #include "metafile.h"
29
30 DEFAULT_DEBUG_CHANNEL(enhmetafile);
31
32 /****************************************************************************
33  *          EMF_Create_HENHMETAFILE
34  */
35 HENHMETAFILE EMF_Create_HENHMETAFILE(ENHMETAHEADER *emh, HFILE hFile, HANDLE
36                                      hMapping )
37 {
38     HENHMETAFILE hmf = 0;
39     ENHMETAFILEOBJ *metaObj = GDI_AllocObject( sizeof(ENHMETAFILEOBJ),
40                                                ENHMETAFILE_MAGIC, &hmf );
41     if (metaObj)
42     {
43     metaObj->emh = emh;
44     metaObj->hFile = hFile;
45     metaObj->hMapping = hMapping;
46         GDI_ReleaseObj( hmf );
47     }
48     return hmf;
49 }
50
51 /****************************************************************************
52  *          EMF_Delete_HENHMETAFILE
53  */
54 static BOOL EMF_Delete_HENHMETAFILE( HENHMETAFILE hmf )
55 {
56     ENHMETAFILEOBJ *metaObj = (ENHMETAFILEOBJ *)GDI_GetObjPtr( hmf,
57                                                            ENHMETAFILE_MAGIC );
58     if(!metaObj) return FALSE;
59     if(metaObj->hMapping) {
60         UnmapViewOfFile( metaObj->emh );
61         CloseHandle( metaObj->hMapping );
62         CloseHandle( metaObj->hFile );
63     } else
64         HeapFree( GetProcessHeap(), 0, metaObj->emh );
65     return GDI_FreeObject( hmf, metaObj );
66 }
67
68 /******************************************************************
69  *         EMF_GetEnhMetaHeader
70  *
71  * Returns ptr to ENHMETAHEADER associated with HENHMETAFILE
72  * Should be followed by call to EMF_ReleaseEnhMetaHeader
73  */
74 static ENHMETAHEADER *EMF_GetEnhMetaHeader( HENHMETAFILE hmf )
75 {
76     ENHMETAFILEOBJ *metaObj = (ENHMETAFILEOBJ *)GDI_GetObjPtr( hmf,
77                                                            ENHMETAFILE_MAGIC );
78     TRACE("hmf %04x -> enhmetaObj %p\n", hmf, metaObj);
79     return metaObj ? metaObj->emh : NULL;
80 }
81
82 /******************************************************************
83  *         EMF_ReleaseEnhMetaHeader
84  *
85  * Releases ENHMETAHEADER associated with HENHMETAFILE
86  */
87 static void EMF_ReleaseEnhMetaHeader( HENHMETAFILE hmf )
88 {
89     GDI_ReleaseObj( hmf );
90 }
91
92 /*****************************************************************************
93  *         EMF_GetEnhMetaFile
94  *
95  */
96 static HENHMETAFILE EMF_GetEnhMetaFile( HFILE hFile )
97 {
98     ENHMETAHEADER *emh;
99     HANDLE hMapping;
100     
101     hMapping = CreateFileMappingA( hFile, NULL, PAGE_READONLY, 0, 0, NULL );
102     emh = MapViewOfFile( hMapping, FILE_MAP_READ, 0, 0, 0 );
103
104     if (emh->iType != EMR_HEADER || emh->dSignature != ENHMETA_SIGNATURE) {
105         WARN("Invalid emf header type 0x%08lx sig 0x%08lx.\n",
106              emh->iType, emh->dSignature);
107         UnmapViewOfFile( emh );
108         CloseHandle( hMapping );
109         return 0;
110     }
111     return EMF_Create_HENHMETAFILE( emh, hFile, hMapping );
112 }
113
114
115 /*****************************************************************************
116  *          GetEnhMetaFileA (GDI32.174)
117  *
118  *
119  */
120 HENHMETAFILE WINAPI GetEnhMetaFileA( 
121              LPCSTR lpszMetaFile  /* [in] filename of enhanced metafile */
122     )
123 {
124     HENHMETAFILE hmf;
125     HFILE hFile;
126
127     hFile = CreateFileA(lpszMetaFile, GENERIC_READ, FILE_SHARE_READ, 0,
128                         OPEN_EXISTING, 0, 0);
129     if (hFile == INVALID_HANDLE_VALUE) {
130         WARN("could not open %s\n", lpszMetaFile);
131         return 0;
132     }
133     hmf = EMF_GetEnhMetaFile( hFile );
134     if(!hmf)
135         CloseHandle( hFile );
136     return hmf;
137 }
138
139 /*****************************************************************************
140  *          GetEnhMetaFileW  (GDI32.180)
141  */
142 HENHMETAFILE WINAPI GetEnhMetaFileW(
143              LPCWSTR lpszMetaFile)  /* [in] filename of enhanced metafile */ 
144 {
145     HENHMETAFILE hmf;
146     HFILE hFile;
147
148     hFile = CreateFileW(lpszMetaFile, GENERIC_READ, FILE_SHARE_READ, 0,
149                         OPEN_EXISTING, 0, 0);
150     if (hFile == INVALID_HANDLE_VALUE) {
151         WARN("could not open %s\n", debugstr_w(lpszMetaFile));
152         return 0;
153     }
154     hmf = EMF_GetEnhMetaFile( hFile );
155     if(!hmf)
156         CloseHandle( hFile );
157     return hmf;
158 }
159
160 /*****************************************************************************
161  *        GetEnhMetaFileHeader  (GDI32.178)
162  *
163  *  If buf is NULL, returns the size of buffer required.
164  *  Otherwise, copy up to bufsize bytes of enhanced metafile header into 
165  *  buf.
166  */
167 UINT WINAPI GetEnhMetaFileHeader( 
168        HENHMETAFILE hmf,   /* [in] enhanced metafile */
169        UINT bufsize,       /* [in] size of buffer */
170        LPENHMETAHEADER buf /* [out] buffer */ 
171     )
172 {
173     LPENHMETAHEADER emh;
174     UINT size;
175
176     emh = EMF_GetEnhMetaHeader(hmf);
177     if(!emh) return FALSE;
178     size = emh->nSize;
179     if (!buf) {
180         EMF_ReleaseEnhMetaHeader(hmf);
181         return size;
182     }
183     size = min(size, bufsize);
184     memmove(buf, emh, size);
185     EMF_ReleaseEnhMetaHeader(hmf);
186     return size;
187 }
188
189
190 /*****************************************************************************
191  *          GetEnhMetaFileDescriptionA  (GDI32.176)
192  */
193 UINT WINAPI GetEnhMetaFileDescriptionA( 
194        HENHMETAFILE hmf, /* [in] enhanced metafile */
195        UINT size,        /* [in] size of buf */ 
196        LPSTR buf         /* [out] buffer to receive description */
197     )
198 {
199      LPENHMETAHEADER emh = EMF_GetEnhMetaHeader(hmf);
200      DWORD len;
201      WCHAR *descrW;
202
203      if(!emh) return FALSE;
204      if(emh->nDescription == 0 || emh->offDescription == 0) {
205          EMF_ReleaseEnhMetaHeader(hmf);
206         return 0;
207      }
208      descrW = (WCHAR *) ((char *) emh + emh->offDescription);
209      len = WideCharToMultiByte( CP_ACP, 0, descrW, emh->nDescription, NULL, 0, NULL, NULL );
210
211      if (!buf || !size ) {
212          EMF_ReleaseEnhMetaHeader(hmf);
213          return len;
214      }
215
216      len = min( size, len );
217      WideCharToMultiByte( CP_ACP, 0, descrW, emh->nDescription, buf, len, NULL, NULL );
218      EMF_ReleaseEnhMetaHeader(hmf);
219      return len;
220 }
221
222 /*****************************************************************************
223  *          GetEnhMetaFileDescriptionW  (GDI32.177)
224  *
225  *  Copies the description string of an enhanced metafile into a buffer 
226  *  _buf_.
227  *
228  *  If _buf_ is NULL, returns size of _buf_ required. Otherwise, returns
229  *  number of characters copied.
230  */
231 UINT WINAPI GetEnhMetaFileDescriptionW( 
232        HENHMETAFILE hmf, /* [in] enhanced metafile */
233        UINT size,        /* [in] size of buf */ 
234        LPWSTR buf        /* [out] buffer to receive description */
235     )
236 {
237      LPENHMETAHEADER emh = EMF_GetEnhMetaHeader(hmf);
238
239      if(!emh) return FALSE;
240      if(emh->nDescription == 0 || emh->offDescription == 0) {
241          EMF_ReleaseEnhMetaHeader(hmf);
242         return 0;
243      }
244      if (!buf || !size ) {
245          EMF_ReleaseEnhMetaHeader(hmf);
246         return emh->nDescription;
247      }
248  
249      memmove(buf, (char *) emh + emh->offDescription, 
250             min(size,emh->nDescription)*sizeof(WCHAR));
251      EMF_ReleaseEnhMetaHeader(hmf);
252      return min(size, emh->nDescription);
253 }
254
255 /****************************************************************************
256  *    SetEnhMetaFileBits (GDI32.315)
257  *
258  *  Creates an enhanced metafile by copying _bufsize_ bytes from _buf_.
259  */
260 HENHMETAFILE WINAPI SetEnhMetaFileBits(UINT bufsize, const BYTE *buf)
261 {
262     ENHMETAHEADER *emh = HeapAlloc( GetProcessHeap(), 0, bufsize );
263     memmove(emh, buf, bufsize);
264     return EMF_Create_HENHMETAFILE( emh, 0, 0 );
265 }
266
267 /*****************************************************************************
268  *  GetEnhMetaFileBits (GDI32.175)
269  *
270  */
271 UINT WINAPI GetEnhMetaFileBits(
272     HENHMETAFILE hmf, 
273     UINT bufsize, 
274     LPBYTE buf  
275
276 {
277     LPENHMETAHEADER emh = EMF_GetEnhMetaHeader( hmf );
278     UINT size;
279
280     if(!emh) return 0;
281
282     size = emh->nBytes;
283     if( buf == NULL ) {
284         EMF_ReleaseEnhMetaHeader( hmf ); 
285         return size;
286     }
287
288     size = min( size, bufsize );
289     memmove(buf, emh, size);
290
291     EMF_ReleaseEnhMetaHeader( hmf ); 
292     return size;
293 }
294
295 /*****************************************************************************
296  *           PlayEnhMetaFileRecord  (GDI32.264)
297  *
298  *  Render a single enhanced metafile record in the device context hdc.
299  *
300  *  RETURNS
301  *    TRUE (non zero) on success, FALSE on error.
302  *  BUGS
303  *    Many unimplemented records.
304  *    No error handling on record play failures (ie checking return codes)
305  */
306 BOOL WINAPI PlayEnhMetaFileRecord( 
307      HDC hdc,                   /* [in] device context in which to render EMF record */
308      LPHANDLETABLE handletable, /* [in] array of handles to be used in rendering record */
309      const ENHMETARECORD *mr,   /* [in] EMF record to render */
310      UINT handles               /* [in] size of handle array */
311      ) 
312 {
313   int type;
314   TRACE(
315         "hdc = %08x, handletable = %p, record = %p, numHandles = %d\n", 
316           hdc, handletable, mr, handles);
317   if (!mr) return FALSE;
318
319   type = mr->iType;
320
321   TRACE(" type=%d\n", type);
322   switch(type) 
323     {
324     case EMR_HEADER:
325       break;
326     case EMR_EOF:
327       break;
328     case EMR_GDICOMMENT:
329       {
330         PEMRGDICOMMENT lpGdiComment = (PEMRGDICOMMENT)mr;
331         /* In an enhanced metafile, there can be both public and private GDI comments */
332         GdiComment( hdc, lpGdiComment->cbData, lpGdiComment->Data );
333         break;
334       } 
335     case EMR_SETMAPMODE:
336       {
337         PEMRSETMAPMODE pSetMapMode = (PEMRSETMAPMODE) mr;
338         SetMapMode(hdc, pSetMapMode->iMode);
339         break;
340       }
341     case EMR_SETBKMODE:
342       {
343         PEMRSETBKMODE pSetBkMode = (PEMRSETBKMODE) mr;
344         SetBkMode(hdc, pSetBkMode->iMode);
345         break;
346       }
347     case EMR_SETBKCOLOR:
348       {
349         PEMRSETBKCOLOR pSetBkColor = (PEMRSETBKCOLOR) mr;
350         SetBkColor(hdc, pSetBkColor->crColor);
351         break;
352       }
353     case EMR_SETPOLYFILLMODE:
354       {
355         PEMRSETPOLYFILLMODE pSetPolyFillMode = (PEMRSETPOLYFILLMODE) mr;
356         SetPolyFillMode(hdc, pSetPolyFillMode->iMode);
357         break;
358       }
359     case EMR_SETROP2:
360       {
361         PEMRSETROP2 pSetROP2 = (PEMRSETROP2) mr;
362         SetROP2(hdc, pSetROP2->iMode);
363         break;
364       }
365     case EMR_SETSTRETCHBLTMODE:
366       {
367         PEMRSETSTRETCHBLTMODE pSetStretchBltMode = (PEMRSETSTRETCHBLTMODE) mr;
368         SetStretchBltMode(hdc, pSetStretchBltMode->iMode);
369         break;
370       }
371     case EMR_SETTEXTALIGN:
372       {
373         PEMRSETTEXTALIGN pSetTextAlign = (PEMRSETTEXTALIGN) mr;
374         SetTextAlign(hdc, pSetTextAlign->iMode);
375         break;
376       }
377     case EMR_SETTEXTCOLOR:
378       {
379         PEMRSETTEXTCOLOR pSetTextColor = (PEMRSETTEXTCOLOR) mr;
380         SetTextColor(hdc, pSetTextColor->crColor);
381         break;
382       }
383     case EMR_SAVEDC:
384       {
385         SaveDC(hdc);
386         break;
387       }
388     case EMR_RESTOREDC:
389       {
390         PEMRRESTOREDC pRestoreDC = (PEMRRESTOREDC) mr;
391         RestoreDC(hdc, pRestoreDC->iRelative);
392         break;
393       }
394     case EMR_INTERSECTCLIPRECT:
395       {
396         PEMRINTERSECTCLIPRECT pClipRect = (PEMRINTERSECTCLIPRECT) mr;
397         IntersectClipRect(hdc, pClipRect->rclClip.left, pClipRect->rclClip.top,
398                           pClipRect->rclClip.right, pClipRect->rclClip.bottom);
399         break;
400       }
401     case EMR_SELECTOBJECT:
402       {
403         PEMRSELECTOBJECT pSelectObject = (PEMRSELECTOBJECT) mr;
404         if( pSelectObject->ihObject & 0x80000000 ) {
405           /* High order bit is set - it's a stock object
406            * Strip the high bit to get the index.
407            * See MSDN article Q142319
408            */
409           SelectObject( hdc, GetStockObject( pSelectObject->ihObject &
410                                              0x7fffffff ) );
411         } else {
412           /* High order bit wasn't set - not a stock object
413            */
414               SelectObject( hdc,
415                         (handletable->objectHandle)[pSelectObject->ihObject] );
416         }
417         break;
418       }
419     case EMR_DELETEOBJECT:
420       {
421         PEMRDELETEOBJECT pDeleteObject = (PEMRDELETEOBJECT) mr;
422         DeleteObject( (handletable->objectHandle)[pDeleteObject->ihObject]);
423         (handletable->objectHandle)[pDeleteObject->ihObject] = 0;
424         break;
425       }
426     case EMR_SETWINDOWORGEX:
427       {
428         PEMRSETWINDOWORGEX pSetWindowOrgEx = (PEMRSETWINDOWORGEX) mr;
429         SetWindowOrgEx(hdc, pSetWindowOrgEx->ptlOrigin.x,
430                        pSetWindowOrgEx->ptlOrigin.y, NULL);
431         break;
432       }
433     case EMR_SETWINDOWEXTEX:
434       {
435         PEMRSETWINDOWEXTEX pSetWindowExtEx = (PEMRSETWINDOWEXTEX) mr;
436         SetWindowExtEx(hdc, pSetWindowExtEx->szlExtent.cx,
437                        pSetWindowExtEx->szlExtent.cy, NULL);
438         break;
439       }
440     case EMR_SETVIEWPORTORGEX:
441       {
442         PEMRSETVIEWPORTORGEX pSetViewportOrgEx = (PEMRSETVIEWPORTORGEX) mr;
443         SetViewportOrgEx(hdc, pSetViewportOrgEx->ptlOrigin.x,
444                          pSetViewportOrgEx->ptlOrigin.y, NULL);
445         break;
446       }
447     case EMR_SETVIEWPORTEXTEX:
448       {
449         PEMRSETVIEWPORTEXTEX pSetViewportExtEx = (PEMRSETVIEWPORTEXTEX) mr;
450         SetViewportExtEx(hdc, pSetViewportExtEx->szlExtent.cx,
451                          pSetViewportExtEx->szlExtent.cy, NULL);
452         break;
453       }
454     case EMR_CREATEPEN:
455       {
456         PEMRCREATEPEN pCreatePen = (PEMRCREATEPEN) mr;
457         (handletable->objectHandle)[pCreatePen->ihPen] = 
458           CreatePenIndirect(&pCreatePen->lopn);
459         break;
460       }
461     case EMR_EXTCREATEPEN:
462       {
463         PEMREXTCREATEPEN pPen = (PEMREXTCREATEPEN) mr;
464         LOGBRUSH lb;
465         lb.lbStyle = pPen->elp.elpBrushStyle;
466         lb.lbColor = pPen->elp.elpColor;
467         lb.lbHatch = pPen->elp.elpHatch;
468
469         if(pPen->offBmi || pPen->offBits)
470           FIXME("EMR_EXTCREATEPEN: Need to copy brush bitmap\n");
471
472         (handletable->objectHandle)[pPen->ihPen] = 
473           ExtCreatePen(pPen->elp.elpPenStyle, pPen->elp.elpWidth, &lb, 
474                        pPen->elp.elpNumEntries, pPen->elp.elpStyleEntry);
475         break;
476       }
477     case EMR_CREATEBRUSHINDIRECT:
478       {
479         PEMRCREATEBRUSHINDIRECT pBrush = (PEMRCREATEBRUSHINDIRECT) mr;
480         (handletable->objectHandle)[pBrush->ihBrush] = 
481           CreateBrushIndirect(&pBrush->lb);
482         break;
483       }
484     case EMR_EXTCREATEFONTINDIRECTW:
485       {
486         PEMREXTCREATEFONTINDIRECTW pFont = (PEMREXTCREATEFONTINDIRECTW) mr;
487         (handletable->objectHandle)[pFont->ihFont] = 
488           CreateFontIndirectW(&pFont->elfw.elfLogFont);
489         break;
490       }
491     case EMR_MOVETOEX:
492       {
493         PEMRMOVETOEX pMoveToEx = (PEMRMOVETOEX) mr;
494         MoveToEx(hdc, pMoveToEx->ptl.x, pMoveToEx->ptl.y, NULL);
495         break;
496       }
497     case EMR_LINETO:
498       {
499         PEMRLINETO pLineTo = (PEMRLINETO) mr;
500         LineTo(hdc, pLineTo->ptl.x, pLineTo->ptl.y);
501         break;
502       }
503     case EMR_RECTANGLE:
504       {
505         PEMRRECTANGLE pRect = (PEMRRECTANGLE) mr;
506         Rectangle(hdc, pRect->rclBox.left, pRect->rclBox.top,
507                   pRect->rclBox.right, pRect->rclBox.bottom);
508         break;
509       }
510     case EMR_ELLIPSE:
511       {
512         PEMRELLIPSE pEllipse = (PEMRELLIPSE) mr;
513         Ellipse(hdc, pEllipse->rclBox.left, pEllipse->rclBox.top,
514                 pEllipse->rclBox.right, pEllipse->rclBox.bottom);
515         break;
516       }
517     case EMR_POLYGON16:
518       {
519         PEMRPOLYGON16 pPoly = (PEMRPOLYGON16) mr;
520         /* Shouldn't use Polygon16 since pPoly->cpts is DWORD */
521         POINT *pts = HeapAlloc( GetProcessHeap(), 0,
522                                 pPoly->cpts * sizeof(POINT) );
523         DWORD i;
524         for(i = 0; i < pPoly->cpts; i++)
525           CONV_POINT16TO32(pPoly->apts + i, pts + i);
526         Polygon(hdc, pts, pPoly->cpts);
527         HeapFree( GetProcessHeap(), 0, pts );
528         break;
529       }
530     case EMR_POLYLINE16:
531       {
532         PEMRPOLYLINE16 pPoly = (PEMRPOLYLINE16) mr;
533         /* Shouldn't use Polyline16 since pPoly->cpts is DWORD */
534         POINT *pts = HeapAlloc( GetProcessHeap(), 0,
535                                 pPoly->cpts * sizeof(POINT) );
536         DWORD i;
537         for(i = 0; i < pPoly->cpts; i++)
538           CONV_POINT16TO32(pPoly->apts + i, pts + i);
539         Polyline(hdc, pts, pPoly->cpts);
540         HeapFree( GetProcessHeap(), 0, pts );
541         break;
542       }
543     case EMR_POLYLINETO16:
544       {
545         PEMRPOLYLINETO16 pPoly = (PEMRPOLYLINETO16) mr;
546         /* Shouldn't use PolylineTo16 since pPoly->cpts is DWORD */
547         POINT *pts = HeapAlloc( GetProcessHeap(), 0,
548                                 pPoly->cpts * sizeof(POINT) );
549         DWORD i;
550         for(i = 0; i < pPoly->cpts; i++)
551           CONV_POINT16TO32(pPoly->apts + i, pts + i);
552         PolylineTo(hdc, pts, pPoly->cpts);
553         HeapFree( GetProcessHeap(), 0, pts );
554         break;
555       }
556     case EMR_POLYBEZIER16:
557       {
558         PEMRPOLYBEZIER16 pPoly = (PEMRPOLYBEZIER16) mr;
559         /* Shouldn't use PolyBezier16 since pPoly->cpts is DWORD */
560         POINT *pts = HeapAlloc( GetProcessHeap(), 0,
561                                 pPoly->cpts * sizeof(POINT) );
562         DWORD i;
563         for(i = 0; i < pPoly->cpts; i++)
564           CONV_POINT16TO32(pPoly->apts + i, pts + i);
565         PolyBezier(hdc, pts, pPoly->cpts);
566         HeapFree( GetProcessHeap(), 0, pts );
567         break;
568       }
569     case EMR_POLYBEZIERTO16:
570       {
571         PEMRPOLYBEZIERTO16 pPoly = (PEMRPOLYBEZIERTO16) mr;
572         /* Shouldn't use PolyBezierTo16 since pPoly->cpts is DWORD */
573         POINT *pts = HeapAlloc( GetProcessHeap(), 0,
574                                 pPoly->cpts * sizeof(POINT) );
575         DWORD i;
576         for(i = 0; i < pPoly->cpts; i++)
577           CONV_POINT16TO32(pPoly->apts + i, pts + i);
578         PolyBezierTo(hdc, pts, pPoly->cpts);
579         HeapFree( GetProcessHeap(), 0, pts );
580         break;
581       }
582     case EMR_POLYPOLYGON16:
583       {
584         PEMRPOLYPOLYGON16 pPolyPoly = (PEMRPOLYPOLYGON16) mr;
585         /* NB POINTS array doesn't start at pPolyPoly->apts it's actually
586            pPolyPoly->aPolyCounts + pPolyPoly->nPolys */
587
588         POINT *pts = HeapAlloc( GetProcessHeap(), 0,
589                                 pPolyPoly->cpts * sizeof(POINT) );
590         DWORD i;
591         for(i = 0; i < pPolyPoly->cpts; i++)
592           CONV_POINT16TO32((POINT16*) (pPolyPoly->aPolyCounts +
593                                       pPolyPoly->nPolys) + i, pts + i);
594
595         PolyPolygon(hdc, pts, (INT*)pPolyPoly->aPolyCounts, pPolyPoly->nPolys);
596         HeapFree( GetProcessHeap(), 0, pts );
597         break;
598       }
599     case EMR_POLYPOLYLINE16:
600       {
601         PEMRPOLYPOLYLINE16 pPolyPoly = (PEMRPOLYPOLYLINE16) mr;
602         /* NB POINTS array doesn't start at pPolyPoly->apts it's actually
603            pPolyPoly->aPolyCounts + pPolyPoly->nPolys */
604
605         POINT *pts = HeapAlloc( GetProcessHeap(), 0,
606                                 pPolyPoly->cpts * sizeof(POINT) );
607         DWORD i;
608         for(i = 0; i < pPolyPoly->cpts; i++)
609           CONV_POINT16TO32((POINT16*) (pPolyPoly->aPolyCounts +
610                                       pPolyPoly->nPolys) + i, pts + i);
611
612         PolyPolyline(hdc, pts, pPolyPoly->aPolyCounts, pPolyPoly->nPolys);
613         HeapFree( GetProcessHeap(), 0, pts );
614         break;
615       }
616
617     case EMR_STRETCHDIBITS:
618       {
619         LONG xDest = mr->dParm[4];
620         LONG yDest = mr->dParm[5];
621         LONG xSrc = mr->dParm[6];
622         LONG ySrc = mr->dParm[7];
623         LONG cxSrc = mr->dParm[8];
624         LONG cySrc = mr->dParm[9];
625         DWORD offBmiSrc = mr->dParm[10];
626         DWORD offBitsSrc = mr->dParm[12];
627         DWORD iUsageSrc = mr->dParm[14];
628         DWORD dwRop = mr->dParm[15];
629         LONG cxDest = mr->dParm[16];
630         LONG cyDest = mr->dParm[17];
631
632         StretchDIBits(hdc,xDest,yDest,cxDest,cyDest,
633                             xSrc,ySrc,cxSrc,cySrc,
634                             ((char *)mr)+offBitsSrc,
635                             (const BITMAPINFO *)(((char *)mr)+offBmiSrc),
636                             iUsageSrc,dwRop);
637         break;
638       }
639     case EMR_EXTTEXTOUTW:
640       {
641         /* 0-3: ??? */
642         DWORD flags = mr->dParm[4];
643         /* 5, 6: ??? */
644         DWORD x = mr->dParm[7], y = mr->dParm[8];
645         DWORD count = mr->dParm[9];
646         /* 10-16: ??? */
647         LPWSTR str = (LPWSTR)& mr->dParm[17];
648         /* trailing info: dx array? */
649         FIXME("Many ExtTextOut args not handled\n");
650         ExtTextOutW(hdc, x, y, flags, /* lpRect */ NULL, 
651                       str, count, /* lpDx */ NULL); 
652         break;
653       }
654  
655     case EMR_CREATEPALETTE:
656       {
657         PEMRCREATEPALETTE lpCreatePal = (PEMRCREATEPALETTE)mr;
658
659         (handletable->objectHandle)[ lpCreatePal->ihPal ] = 
660                 CreatePalette( &lpCreatePal->lgpl );
661
662         break;
663       }
664
665     case EMR_SELECTPALETTE:
666       {
667         PEMRSELECTPALETTE lpSelectPal = (PEMRSELECTPALETTE)mr;
668
669         /* FIXME: Should this be forcing background mode? */
670         (handletable->objectHandle)[ lpSelectPal->ihPal ] = 
671                 SelectPalette( hdc, lpSelectPal->ihPal, FALSE );
672         break;
673       }
674
675     case EMR_REALIZEPALETTE:
676       {
677         RealizePalette( hdc );
678         break;
679       }
680
681 #if 0
682     case EMR_EXTSELECTCLIPRGN:
683       {
684         PEMREXTSELECTCLIPRGN lpRgn = (PEMREXTSELECTCLIPRGN)mr;
685
686         /* Need to make a region out of the RGNDATA we have */
687         ExtSelectClipRgn( hdc, ..., (INT)(lpRgn->iMode) );
688
689       }
690 #endif
691
692     case EMR_SETMETARGN:
693       {
694         SetMetaRgn( hdc );
695         break;
696       }
697
698     case EMR_SETWORLDTRANSFORM:
699       {
700         PEMRSETWORLDTRANSFORM lpXfrm = (PEMRSETWORLDTRANSFORM)mr;
701
702         SetWorldTransform( hdc, &lpXfrm->xform );
703
704         break;
705       }
706
707     case EMR_POLYBEZIER:
708       {
709         PEMRPOLYBEZIER lpPolyBez = (PEMRPOLYBEZIER)mr; 
710         PolyBezier(hdc, (const LPPOINT)lpPolyBez->aptl, (UINT)lpPolyBez->cptl);
711         break;
712       }
713
714     case EMR_POLYGON:
715       {
716         PEMRPOLYGON lpPoly = (PEMRPOLYGON)mr;
717         Polygon( hdc, (const LPPOINT)lpPoly->aptl, (UINT)lpPoly->cptl );
718         break;
719       }
720
721     case EMR_POLYLINE:
722       {
723         PEMRPOLYLINE lpPolyLine = (PEMRPOLYLINE)mr;
724         Polyline(hdc, (const LPPOINT)lpPolyLine->aptl, (UINT)lpPolyLine->cptl);
725         break; 
726       }
727
728     case EMR_POLYBEZIERTO:
729       {
730         PEMRPOLYBEZIERTO lpPolyBezierTo = (PEMRPOLYBEZIERTO)mr;
731         PolyBezierTo( hdc, (const LPPOINT)lpPolyBezierTo->aptl,
732                       (UINT)lpPolyBezierTo->cptl );
733         break; 
734       }
735
736     case EMR_POLYLINETO:
737       {
738         PEMRPOLYLINETO lpPolyLineTo = (PEMRPOLYLINETO)mr;
739         PolylineTo( hdc, (const LPPOINT)lpPolyLineTo->aptl,
740                     (UINT)lpPolyLineTo->cptl );
741         break;
742       }
743
744     case EMR_POLYPOLYLINE:
745       {
746         PEMRPOLYPOLYLINE pPolyPolyline = (PEMRPOLYPOLYLINE) mr;
747         /* NB Points at pPolyPolyline->aPolyCounts + pPolyPolyline->nPolys */
748
749         PolyPolyline(hdc, (LPPOINT)(pPolyPolyline->aPolyCounts +
750                                     pPolyPolyline->nPolys), 
751                      pPolyPolyline->aPolyCounts, 
752                      pPolyPolyline->nPolys ); 
753
754         break;
755       }
756
757     case EMR_POLYPOLYGON:
758       {
759         PEMRPOLYPOLYGON pPolyPolygon = (PEMRPOLYPOLYGON) mr;
760
761         /* NB Points at pPolyPolygon->aPolyCounts + pPolyPolygon->nPolys */
762
763         PolyPolygon(hdc, (LPPOINT)(pPolyPolygon->aPolyCounts +
764                                    pPolyPolygon->nPolys),
765                     (INT*)pPolyPolygon->aPolyCounts, pPolyPolygon->nPolys );
766         break;
767       }
768
769     case EMR_SETBRUSHORGEX:
770       {
771         PEMRSETBRUSHORGEX lpSetBrushOrgEx = (PEMRSETBRUSHORGEX)mr;
772
773         SetBrushOrgEx( hdc, 
774                        (INT)lpSetBrushOrgEx->ptlOrigin.x, 
775                        (INT)lpSetBrushOrgEx->ptlOrigin.y, 
776                        NULL );
777
778         break;
779       }
780  
781     case EMR_SETPIXELV:
782       {
783         PEMRSETPIXELV lpSetPixelV = (PEMRSETPIXELV)mr;
784
785         SetPixelV( hdc, 
786                    (INT)lpSetPixelV->ptlPixel.x, 
787                    (INT)lpSetPixelV->ptlPixel.y, 
788                    lpSetPixelV->crColor );
789
790         break;
791       }
792
793     case EMR_SETMAPPERFLAGS:
794       {
795         PEMRSETMAPPERFLAGS lpSetMapperFlags = (PEMRSETMAPPERFLAGS)mr;
796    
797         SetMapperFlags( hdc, lpSetMapperFlags->dwFlags );
798
799         break;
800       }
801
802     case EMR_SETCOLORADJUSTMENT:
803       {
804         PEMRSETCOLORADJUSTMENT lpSetColorAdjust = (PEMRSETCOLORADJUSTMENT)mr; 
805
806         SetColorAdjustment( hdc, &lpSetColorAdjust->ColorAdjustment );
807
808         break;
809       }
810
811     case EMR_OFFSETCLIPRGN:
812       {
813         PEMROFFSETCLIPRGN lpOffsetClipRgn = (PEMROFFSETCLIPRGN)mr;
814
815         OffsetClipRgn( hdc, 
816                        (INT)lpOffsetClipRgn->ptlOffset.x,
817                        (INT)lpOffsetClipRgn->ptlOffset.y );
818
819         break;
820       } 
821
822     case EMR_EXCLUDECLIPRECT:
823       {
824         PEMREXCLUDECLIPRECT lpExcludeClipRect = (PEMREXCLUDECLIPRECT)mr;
825
826         ExcludeClipRect( hdc, 
827                          lpExcludeClipRect->rclClip.left, 
828                          lpExcludeClipRect->rclClip.top, 
829                          lpExcludeClipRect->rclClip.right, 
830                          lpExcludeClipRect->rclClip.bottom  );
831
832          break;
833       }
834
835     case EMR_SCALEVIEWPORTEXTEX:
836       {
837         PEMRSCALEVIEWPORTEXTEX lpScaleViewportExtEx = (PEMRSCALEVIEWPORTEXTEX)mr;
838
839         ScaleViewportExtEx( hdc, 
840                             lpScaleViewportExtEx->xNum,
841                             lpScaleViewportExtEx->xDenom,
842                             lpScaleViewportExtEx->yNum,
843                             lpScaleViewportExtEx->yDenom,
844                             NULL );
845      
846         break;
847       }
848  
849     case EMR_SCALEWINDOWEXTEX:
850       {
851         PEMRSCALEWINDOWEXTEX lpScaleWindowExtEx = (PEMRSCALEWINDOWEXTEX)mr;
852
853         ScaleWindowExtEx( hdc,
854                           lpScaleWindowExtEx->xNum,
855                           lpScaleWindowExtEx->xDenom,
856                           lpScaleWindowExtEx->yNum,
857                           lpScaleWindowExtEx->yDenom, 
858                           NULL );
859
860         break;
861       }
862
863     case EMR_MODIFYWORLDTRANSFORM:
864       {
865         PEMRMODIFYWORLDTRANSFORM lpModifyWorldTrans = (PEMRMODIFYWORLDTRANSFORM)mr;
866
867         ModifyWorldTransform( hdc, &lpModifyWorldTrans->xform, 
868                               lpModifyWorldTrans->iMode );
869
870         break;
871       }
872
873     case EMR_ANGLEARC:
874       {
875         PEMRANGLEARC lpAngleArc = (PEMRANGLEARC)mr; 
876
877         AngleArc( hdc, 
878                  (INT)lpAngleArc->ptlCenter.x, (INT)lpAngleArc->ptlCenter.y,
879                  lpAngleArc->nRadius, lpAngleArc->eStartAngle, 
880                  lpAngleArc->eSweepAngle );
881
882         break;
883       }
884  
885     case EMR_ROUNDRECT: 
886       {
887         PEMRROUNDRECT lpRoundRect = (PEMRROUNDRECT)mr;
888
889         RoundRect( hdc, 
890                    lpRoundRect->rclBox.left,
891                    lpRoundRect->rclBox.top,
892                    lpRoundRect->rclBox.right,
893                    lpRoundRect->rclBox.bottom,
894                    lpRoundRect->szlCorner.cx,
895                    lpRoundRect->szlCorner.cy );
896
897         break; 
898       }
899
900     case EMR_ARC:
901       {
902         PEMRARC lpArc = (PEMRARC)mr;
903
904         Arc( hdc,  
905              (INT)lpArc->rclBox.left,
906              (INT)lpArc->rclBox.top,
907              (INT)lpArc->rclBox.right,
908              (INT)lpArc->rclBox.bottom,
909              (INT)lpArc->ptlStart.x, 
910              (INT)lpArc->ptlStart.y,
911              (INT)lpArc->ptlEnd.x,
912              (INT)lpArc->ptlEnd.y );
913
914         break;  
915       }
916
917     case EMR_CHORD:
918       {
919         PEMRCHORD lpChord = (PEMRCHORD)mr;
920
921         Chord( hdc,
922              (INT)lpChord->rclBox.left,
923              (INT)lpChord->rclBox.top,
924              (INT)lpChord->rclBox.right,
925              (INT)lpChord->rclBox.bottom,
926              (INT)lpChord->ptlStart.x,
927              (INT)lpChord->ptlStart.y,
928              (INT)lpChord->ptlEnd.x,
929              (INT)lpChord->ptlEnd.y );
930
931         break;
932       }
933
934     case EMR_PIE:
935       {
936         PEMRPIE lpPie = (PEMRPIE)mr;
937
938         Pie( hdc,
939              (INT)lpPie->rclBox.left,
940              (INT)lpPie->rclBox.top,
941              (INT)lpPie->rclBox.right,
942              (INT)lpPie->rclBox.bottom,
943              (INT)lpPie->ptlStart.x,
944              (INT)lpPie->ptlStart.y,
945              (INT)lpPie->ptlEnd.x,
946              (INT)lpPie->ptlEnd.y );
947
948        break;
949       }
950
951     case EMR_ARCTO: 
952       {
953         PEMRARC lpArcTo = (PEMRARC)mr;
954
955         ArcTo( hdc,
956                (INT)lpArcTo->rclBox.left,
957                (INT)lpArcTo->rclBox.top,
958                (INT)lpArcTo->rclBox.right,
959                (INT)lpArcTo->rclBox.bottom,
960                (INT)lpArcTo->ptlStart.x,
961                (INT)lpArcTo->ptlStart.y,
962                (INT)lpArcTo->ptlEnd.x,
963                (INT)lpArcTo->ptlEnd.y );
964
965         break;
966       }
967
968     case EMR_EXTFLOODFILL:
969       {
970         PEMREXTFLOODFILL lpExtFloodFill = (PEMREXTFLOODFILL)mr;
971
972         ExtFloodFill( hdc, 
973                       (INT)lpExtFloodFill->ptlStart.x,
974                       (INT)lpExtFloodFill->ptlStart.y,
975                       lpExtFloodFill->crColor,
976                       (UINT)lpExtFloodFill->iMode );
977
978         break;
979       }
980
981     case EMR_POLYDRAW:
982       {
983         PEMRPOLYDRAW lpPolyDraw = (PEMRPOLYDRAW)mr;
984         PolyDraw( hdc, 
985                   (const LPPOINT)lpPolyDraw->aptl,
986                   lpPolyDraw->abTypes,
987                   (INT)lpPolyDraw->cptl );
988  
989         break;
990       } 
991
992     case EMR_SETARCDIRECTION:
993       {
994         PEMRSETARCDIRECTION lpSetArcDirection = (PEMRSETARCDIRECTION)mr;
995         SetArcDirection( hdc, (INT)lpSetArcDirection->iArcDirection );
996         break;
997       }
998
999     case EMR_SETMITERLIMIT:
1000       {
1001         PEMRSETMITERLIMIT lpSetMiterLimit = (PEMRSETMITERLIMIT)mr;
1002         SetMiterLimit( hdc, lpSetMiterLimit->eMiterLimit, NULL );
1003         break;
1004       } 
1005
1006     case EMR_BEGINPATH:
1007       {
1008         BeginPath( hdc );
1009         break;
1010       }
1011
1012     case EMR_ENDPATH: 
1013       {
1014         EndPath( hdc );
1015         break;
1016       }
1017
1018     case EMR_CLOSEFIGURE:
1019       {
1020         CloseFigure( hdc );
1021         break;
1022       }
1023
1024     case EMR_FILLPATH:
1025       {
1026         /*PEMRFILLPATH lpFillPath = (PEMRFILLPATH)mr;*/
1027         FillPath( hdc );
1028         break;
1029       }
1030
1031     case EMR_STROKEANDFILLPATH:
1032       {
1033         /*PEMRSTROKEANDFILLPATH lpStrokeAndFillPath = (PEMRSTROKEANDFILLPATH)mr;*/
1034         StrokeAndFillPath( hdc );
1035         break;
1036       }
1037
1038     case EMR_STROKEPATH:
1039       {
1040         /*PEMRSTROKEPATH lpStrokePath = (PEMRSTROKEPATH)mr;*/
1041         StrokePath( hdc );
1042         break;
1043       }
1044
1045     case EMR_FLATTENPATH:
1046       {
1047         FlattenPath( hdc ); 
1048         break;
1049       }
1050
1051     case EMR_WIDENPATH:
1052       {
1053         WidenPath( hdc );
1054         break;
1055       }
1056
1057     case EMR_SELECTCLIPPATH:
1058       {
1059         PEMRSELECTCLIPPATH lpSelectClipPath = (PEMRSELECTCLIPPATH)mr;
1060         SelectClipPath( hdc, (INT)lpSelectClipPath->iMode );
1061         break;
1062       }
1063  
1064     case EMR_ABORTPATH:
1065       {
1066         AbortPath( hdc );
1067         break;
1068       }
1069
1070     case EMR_CREATECOLORSPACE:
1071       {
1072         PEMRCREATECOLORSPACE lpCreateColorSpace = (PEMRCREATECOLORSPACE)mr;
1073         (handletable->objectHandle)[lpCreateColorSpace->ihCS] = 
1074            CreateColorSpaceA( &lpCreateColorSpace->lcs ); 
1075         break;
1076       }
1077
1078     case EMR_SETCOLORSPACE:
1079       {
1080         PEMRSETCOLORSPACE lpSetColorSpace = (PEMRSETCOLORSPACE)mr; 
1081         SetColorSpace( hdc, 
1082                        (handletable->objectHandle)[lpSetColorSpace->ihCS] );
1083         break;
1084       }
1085
1086     case EMR_DELETECOLORSPACE:
1087       {
1088         PEMRDELETECOLORSPACE lpDeleteColorSpace = (PEMRDELETECOLORSPACE)mr;
1089         DeleteColorSpace( (handletable->objectHandle)[lpDeleteColorSpace->ihCS] );
1090         break; 
1091       }
1092
1093     case EMR_SETICMMODE:
1094       {
1095         PERMSETICMMODE lpSetICMMode = (PERMSETICMMODE)mr;
1096         SetICMMode( hdc, (INT)lpSetICMMode->iMode );
1097         break;
1098       }
1099
1100     case EMR_PIXELFORMAT: 
1101       {
1102         INT iPixelFormat;
1103         PEMRPIXELFORMAT lpPixelFormat = (PEMRPIXELFORMAT)mr;
1104
1105         iPixelFormat = ChoosePixelFormat( hdc, &lpPixelFormat->pfd );
1106         SetPixelFormat( hdc, iPixelFormat, &lpPixelFormat->pfd ); 
1107          
1108         break;
1109       }
1110
1111     case EMR_SETPALETTEENTRIES:  
1112       {
1113         PEMRSETPALETTEENTRIES lpSetPaletteEntries = (PEMRSETPALETTEENTRIES)mr;
1114
1115         SetPaletteEntries( (handletable->objectHandle)[lpSetPaletteEntries->ihPal],
1116                            (UINT)lpSetPaletteEntries->iStart,
1117                            (UINT)lpSetPaletteEntries->cEntries,
1118                            lpSetPaletteEntries->aPalEntries ); 
1119                            
1120         break;
1121       }
1122
1123     case EMR_RESIZEPALETTE:
1124       {
1125         PEMRRESIZEPALETTE lpResizePalette = (PEMRRESIZEPALETTE)mr;
1126
1127         ResizePalette( (handletable->objectHandle)[lpResizePalette->ihPal],
1128                        (UINT)lpResizePalette->cEntries );
1129
1130         break;
1131       }
1132
1133     case EMR_CREATEDIBPATTERNBRUSHPT:
1134       {
1135         PEMRCREATEDIBPATTERNBRUSHPT lpCreate = (PEMRCREATEDIBPATTERNBRUSHPT)mr;
1136
1137         /* This is a BITMAPINFO struct followed directly by bitmap bits */
1138         LPVOID lpPackedStruct = HeapAlloc( GetProcessHeap(), 
1139                                            0, 
1140                                            lpCreate->cbBmi + lpCreate->cbBits );
1141         /* Now pack this structure */
1142         memcpy( lpPackedStruct, 
1143                 ((BYTE*)lpCreate) + lpCreate->offBmi,
1144                 lpCreate->cbBmi ); 
1145         memcpy( ((BYTE*)lpPackedStruct) + lpCreate->cbBmi,
1146                 ((BYTE*)lpCreate) + lpCreate->offBits,
1147                 lpCreate->cbBits );
1148
1149         (handletable->objectHandle)[lpCreate->ihBrush] = 
1150            CreateDIBPatternBrushPt( lpPackedStruct,
1151                                     (UINT)lpCreate->iUsage ); 
1152
1153         break; 
1154       }
1155
1156     case EMR_BITBLT:
1157     case EMR_STRETCHBLT:
1158     case EMR_MASKBLT:
1159     case EMR_PLGBLT:
1160     case EMR_SETDIBITSTODEVICE:
1161     case EMR_EXTTEXTOUTA:
1162     case EMR_POLYDRAW16:
1163     case EMR_CREATEMONOBRUSH:
1164     case EMR_POLYTEXTOUTA:
1165     case EMR_POLYTEXTOUTW:
1166     case EMR_FILLRGN:
1167     case EMR_FRAMERGN:
1168     case EMR_INVERTRGN:
1169     case EMR_PAINTRGN:
1170     case EMR_GLSRECORD:
1171     case EMR_GLSBOUNDEDRECORD:
1172     default:
1173       /* From docs: If PlayEnhMetaFileRecord doesn't recognize a 
1174                     record then ignore and return TRUE. */
1175       FIXME("type %d is unimplemented\n", type);
1176       break;
1177     }
1178   return TRUE;
1179 }
1180
1181
1182 /*****************************************************************************
1183  *
1184  *        EnumEnhMetaFile  (GDI32.79)
1185  *
1186  *  Walk an enhanced metafile, calling a user-specified function _EnhMetaFunc_
1187  *  for each
1188  *  record. Returns when either every record has been used or 
1189  *  when _EnhMetaFunc_ returns FALSE.
1190  *
1191  *
1192  * RETURNS
1193  *  TRUE if every record is used, FALSE if any invocation of _EnhMetaFunc_
1194  *  returns FALSE.
1195  *
1196  * BUGS
1197  *   Ignores rect.
1198  */
1199 BOOL WINAPI EnumEnhMetaFile( 
1200      HDC hdc,                /* [in] device context to pass to _EnhMetaFunc_ */
1201      HENHMETAFILE hmf,       /* [in] EMF to walk */
1202      ENHMFENUMPROC callback, /* [in] callback function */ 
1203      LPVOID data,            /* [in] optional data for callback function */
1204      const RECT *lpRect      /* [in] bounding rectangle for rendered metafile */
1205     )
1206 {
1207     BOOL ret;
1208     ENHMETAHEADER *emh, *emhTemp;
1209     ENHMETARECORD *emr;
1210     DWORD offset;
1211     INT i;
1212     HANDLETABLE *ht;
1213     INT savedMode = 0;
1214     FLOAT xSrcPixSize, ySrcPixSize, xscale, yscale;
1215     XFORM savedXform, xform;
1216     HPEN hPen;
1217     HBRUSH hBrush;
1218     HFONT hFont;
1219
1220     if(!lpRect)
1221     {
1222         SetLastError(ERROR_INVALID_PARAMETER);
1223         return FALSE;
1224     }
1225
1226     emh = EMF_GetEnhMetaHeader(hmf);
1227     if(!emh) {
1228         SetLastError(ERROR_INVALID_HANDLE);
1229         return FALSE;
1230     }
1231
1232     /* Copy the metafile into memory, because we need to avoid deadlock. */
1233     emhTemp = HeapAlloc(GetProcessHeap(), 0, emh->nSize + emh->nBytes);
1234     if(!emhTemp)
1235     {
1236         EMF_ReleaseEnhMetaHeader(hmf);
1237         SetLastError(ERROR_NOT_ENOUGH_MEMORY);
1238         return FALSE;
1239     }
1240     memcpy(emhTemp, emh, emh->nSize + emh->nBytes);
1241     emh = emhTemp;
1242     EMF_ReleaseEnhMetaHeader(hmf);
1243
1244     ht = HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY,
1245                     sizeof(HANDLETABLE) * emh->nHandles );
1246     if(!ht)
1247     {
1248         HeapFree(GetProcessHeap(), 0, emhTemp);
1249         SetLastError(ERROR_NOT_ENOUGH_MEMORY);
1250         return FALSE;
1251     }
1252     ht->objectHandle[0] = hmf;
1253
1254     xSrcPixSize = (FLOAT) emh->szlMillimeters.cx / emh->szlDevice.cx;
1255     ySrcPixSize = (FLOAT) emh->szlMillimeters.cy / emh->szlDevice.cy;
1256     xscale = (FLOAT)(lpRect->right - lpRect->left) * 100.0 /
1257       (emh->rclFrame.right - emh->rclFrame.left) * xSrcPixSize;
1258     yscale = (FLOAT)(lpRect->bottom - lpRect->top) * 100.0 /
1259       (emh->rclFrame.bottom - emh->rclFrame.top) * ySrcPixSize;
1260
1261     xform.eM11 = xscale;
1262     xform.eM12 = 0;
1263     xform.eM21 = 0;
1264     xform.eM22 = yscale;
1265     if(emh->rclFrame.left || emh->rclFrame.top)
1266       FIXME("Can't cope with nonzero rclFrame origin yet\n");
1267  /* eDx = lpRect->left - (lpRect width) / (rclFrame width) * rclFrame.left ? */
1268     xform.eDx = lpRect->left;
1269     xform.eDy = lpRect->top;
1270     savedMode = SetGraphicsMode(hdc, GM_ADVANCED);
1271     GetWorldTransform(hdc, &savedXform);
1272     if (!ModifyWorldTransform(hdc, &xform, MWT_LEFTMULTIPLY)) {
1273         ERR("World transform failed!\n");
1274     }
1275
1276     /* save the current pen, brush and font */
1277     hPen = GetCurrentObject(hdc, OBJ_PEN);
1278     hBrush = GetCurrentObject(hdc, OBJ_BRUSH);
1279     hFont = GetCurrentObject(hdc, OBJ_FONT);
1280
1281     TRACE("nSize = %ld, nBytes = %ld, nHandles = %d, nRecords = %ld, nPalEntries = %ld\n",
1282         emh->nSize, emh->nBytes, emh->nHandles, emh->nRecords, emh->nPalEntries);
1283
1284     ret = TRUE;
1285     offset = 0;
1286     while(ret && offset < emh->nBytes)
1287     {
1288         emr = (ENHMETARECORD *)((char *)emh + offset);
1289         TRACE("Calling EnumFunc with record type %ld, size %ld\n", emr->iType, emr->nSize);
1290         ret = (*callback)(hdc, ht, emr, emh->nRecords, data);
1291         offset += emr->nSize;
1292     }
1293
1294     /* restore pen, brush and font */
1295     SelectObject(hdc, hBrush);
1296     SelectObject(hdc, hPen);
1297     SelectObject(hdc, hFont);
1298
1299     for(i = 1; i < emh->nRecords; i++) /* Don't delete element 0 (hmf) */
1300         if( (ht->objectHandle)[i] )
1301             DeleteObject( (ht->objectHandle)[i] );
1302
1303     HeapFree( GetProcessHeap(), 0, ht );
1304     HeapFree(GetProcessHeap(), 0, emhTemp);
1305
1306     SetWorldTransform(hdc, &savedXform);
1307     if (savedMode) SetGraphicsMode(hdc, savedMode);
1308
1309     return ret;
1310 }
1311
1312 static INT CALLBACK EMF_PlayEnhMetaFileCallback(HDC hdc, HANDLETABLE *ht,
1313                                                 ENHMETARECORD *emr,
1314                                                 INT handles, LPVOID data)
1315 {
1316     return PlayEnhMetaFileRecord(hdc, ht, emr, handles);
1317 }
1318                                                 
1319 /**************************************************************************
1320  *    PlayEnhMetaFile  (GDI32.263)
1321  *
1322  *    Renders an enhanced metafile into a specified rectangle *lpRect
1323  *    in device context hdc.
1324  *
1325  */
1326 BOOL WINAPI PlayEnhMetaFile( 
1327        HDC hdc,           /* [in] DC to render into */
1328        HENHMETAFILE hmf,  /* [in] metafile to render */
1329        const RECT *lpRect /* [in] rectangle to place metafile inside */
1330       )
1331 {
1332     return EnumEnhMetaFile(hdc, hmf, EMF_PlayEnhMetaFileCallback, NULL,
1333                            lpRect);
1334 }
1335
1336 /*****************************************************************************
1337  *  DeleteEnhMetaFile (GDI32.68)
1338  *
1339  *  Deletes an enhanced metafile and frees the associated storage.
1340  */
1341 BOOL WINAPI DeleteEnhMetaFile(HENHMETAFILE hmf)
1342 {
1343     return EMF_Delete_HENHMETAFILE( hmf );
1344 }
1345
1346 /*****************************************************************************
1347  *  CopyEnhMetaFileA (GDI32.21)  Duplicate an enhanced metafile
1348  *
1349  *   
1350  */
1351 HENHMETAFILE WINAPI CopyEnhMetaFileA(
1352     HENHMETAFILE hmfSrc, 
1353     LPCSTR file)
1354 {
1355     ENHMETAHEADER *emrSrc = EMF_GetEnhMetaHeader( hmfSrc ), *emrDst;
1356     HENHMETAFILE hmfDst;
1357
1358     if(!emrSrc) return FALSE;
1359     if (!file) {
1360         emrDst = HeapAlloc( GetProcessHeap(), 0, emrSrc->nBytes );
1361         memcpy( emrDst, emrSrc, emrSrc->nBytes );
1362         hmfDst = EMF_Create_HENHMETAFILE( emrDst, 0, 0 );
1363     } else {
1364         HFILE hFile;
1365         hFile = CreateFileA( file, GENERIC_WRITE | GENERIC_READ, 0, NULL,
1366                              CREATE_ALWAYS, 0, -1);
1367         WriteFile( hFile, emrSrc, emrSrc->nBytes, 0, 0);
1368         hmfDst = EMF_GetEnhMetaFile( hFile );
1369     }
1370     EMF_ReleaseEnhMetaHeader( hmfSrc );
1371     return hmfDst;
1372 }
1373
1374
1375 /* Struct to be used to be passed in the LPVOID parameter for cbEnhPaletteCopy */
1376 typedef struct tagEMF_PaletteCopy
1377 {
1378    UINT cEntries;
1379    LPPALETTEENTRY lpPe;
1380 } EMF_PaletteCopy;
1381
1382 /***************************************************************  
1383  * Find the EMR_EOF record and then use it to find the
1384  * palette entries for this enhanced metafile. 
1385  * The lpData is actually a pointer to a EMF_PaletteCopy struct  
1386  * which contains the max number of elements to copy and where
1387  * to copy them to.
1388  *
1389  * NOTE: To be used by GetEnhMetaFilePaletteEntries only!
1390  */
1391 INT CALLBACK cbEnhPaletteCopy( HDC a,
1392                                LPHANDLETABLE b,
1393                                LPENHMETARECORD lpEMR,
1394                                INT c,
1395                                LPVOID lpData )
1396 {
1397  
1398   if ( lpEMR->iType == EMR_EOF )
1399   {
1400     PEMREOF lpEof = (PEMREOF)lpEMR;
1401     EMF_PaletteCopy* info = (EMF_PaletteCopy*)lpData;
1402     DWORD dwNumPalToCopy = min( lpEof->nPalEntries, info->cEntries );
1403
1404     TRACE( "copying 0x%08lx palettes\n", dwNumPalToCopy );
1405
1406     memcpy( (LPVOID)info->lpPe, 
1407             (LPVOID)(((LPSTR)lpEof) + lpEof->offPalEntries), 
1408             sizeof( *(info->lpPe) ) * dwNumPalToCopy );
1409
1410     /* Update the passed data as a return code */
1411     info->lpPe     = NULL; /* Palettes were copied! */
1412     info->cEntries = (UINT)dwNumPalToCopy;  
1413
1414     return FALSE; /* That's all we need */
1415   }
1416   
1417   return TRUE;
1418 }
1419
1420 /*****************************************************************************
1421  *  GetEnhMetaFilePaletteEntries (GDI32.179)  
1422  * 
1423  *  Copy the palette and report size  
1424  * 
1425  *  BUGS: Error codes (SetLastError) are not set on failures
1426  */
1427 UINT WINAPI GetEnhMetaFilePaletteEntries( HENHMETAFILE hEmf,
1428                                           UINT cEntries,
1429                                           LPPALETTEENTRY lpPe )
1430 {
1431   ENHMETAHEADER* enhHeader = EMF_GetEnhMetaHeader( hEmf );
1432   UINT uReturnValue = GDI_ERROR;
1433   EMF_PaletteCopy infoForCallBack; 
1434
1435   TRACE( "(%04x,%d,%p)\n", hEmf, cEntries, lpPe ); 
1436
1437   /* First check if there are any palettes associated with
1438      this metafile. */
1439   if ( enhHeader->nPalEntries == 0 )
1440   {
1441     /* No palette associated with this enhanced metafile */
1442     uReturnValue = 0;
1443     goto done; 
1444   }
1445
1446   /* Is the user requesting the number of palettes? */
1447   if ( lpPe == NULL )
1448   {
1449      uReturnValue = (UINT)enhHeader->nPalEntries;
1450      goto done;
1451   } 
1452
1453   /* Copy cEntries worth of PALETTEENTRY structs into the buffer */
1454   infoForCallBack.cEntries = cEntries;
1455   infoForCallBack.lpPe     = lpPe; 
1456
1457   if ( !EnumEnhMetaFile( 0, hEmf, cbEnhPaletteCopy, 
1458                          &infoForCallBack, NULL ) )
1459   {
1460      goto done; 
1461   }
1462
1463   /* Verify that the callback executed correctly */
1464   if ( infoForCallBack.lpPe != NULL )
1465   {
1466      /* Callback proc had error! */
1467      ERR( "cbEnhPaletteCopy didn't execute correctly\n" );
1468      goto done;
1469   }
1470
1471   uReturnValue = infoForCallBack.cEntries;
1472
1473 done:
1474   
1475   EMF_ReleaseEnhMetaHeader( hEmf );
1476
1477   return uReturnValue;
1478 }
1479
1480 /******************************************************************
1481  *         SetWinMetaFileBits   (GDI32.343)
1482  *      
1483  *         Translate from old style to new style.
1484  *
1485  * BUGS: - This doesn't take the DC and scaling into account
1486  *       - Most record conversions aren't implemented
1487  *       - Handle slot assignement is primative and most likely doesn't work
1488  */
1489 HENHMETAFILE WINAPI SetWinMetaFileBits(UINT cbBuffer,
1490                                            CONST BYTE *lpbBuffer,
1491                                            HDC hdcRef,
1492                                            CONST METAFILEPICT *lpmfp
1493                                            ) 
1494 {
1495      HENHMETAFILE    hMf;
1496      LPVOID          lpNewEnhMetaFileBuffer = NULL;
1497      UINT            uNewEnhMetaFileBufferSize = 0;
1498      BOOL            bFoundEOF = FALSE;
1499
1500      FIXME( "(%d,%p,%04x,%p):stub\n", cbBuffer, lpbBuffer, hdcRef, lpmfp );
1501
1502      /* 1. Get the header - skip over this and get straight to the records  */
1503
1504      uNewEnhMetaFileBufferSize = sizeof( ENHMETAHEADER );
1505      lpNewEnhMetaFileBuffer = HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, 
1506                                          uNewEnhMetaFileBufferSize );
1507
1508      if( lpNewEnhMetaFileBuffer == NULL )
1509      {
1510        goto error; 
1511      }
1512
1513      /* Fill in the header record */ 
1514      {
1515        LPENHMETAHEADER lpNewEnhMetaFileHeader = (LPENHMETAHEADER)lpNewEnhMetaFileBuffer;
1516
1517        lpNewEnhMetaFileHeader->iType = EMR_HEADER;
1518        lpNewEnhMetaFileHeader->nSize = sizeof( ENHMETAHEADER );
1519
1520        /* FIXME: Not right. Must be able to get this from the DC */
1521        lpNewEnhMetaFileHeader->rclBounds.left   = 0;
1522        lpNewEnhMetaFileHeader->rclBounds.right  = 0;
1523        lpNewEnhMetaFileHeader->rclBounds.top    = 0;
1524        lpNewEnhMetaFileHeader->rclBounds.bottom = 0;
1525
1526        /* FIXME: Not right. Must be able to get this from the DC */
1527        lpNewEnhMetaFileHeader->rclFrame.left   = 0;
1528        lpNewEnhMetaFileHeader->rclFrame.right  = 0;
1529        lpNewEnhMetaFileHeader->rclFrame.top    = 0;
1530        lpNewEnhMetaFileHeader->rclFrame.bottom = 0;
1531
1532        lpNewEnhMetaFileHeader->nHandles = 0; /* No handles yet */
1533
1534        /* FIXME: Add in the rest of the fields to the header */
1535        /* dSignature
1536           nVersion
1537           nRecords
1538           sReserved
1539           nDescription
1540           offDescription
1541           nPalEntries
1542           szlDevice
1543           szlMillimeters
1544           cbPixelFormat
1545           offPixelFormat,
1546           bOpenGL */
1547      } 
1548
1549      (char*)lpbBuffer += ((METAHEADER*)lpbBuffer)->mtHeaderSize * 2; /* Point past the header - FIXME: metafile quirk? */ 
1550
1551      /* 2. Enum over individual records and convert them to the new type of records */
1552      while( !bFoundEOF )
1553      { 
1554
1555         LPMETARECORD lpMetaRecord = (LPMETARECORD)lpbBuffer;
1556
1557 #define EMF_ReAllocAndAdjustPointers( a , b ) \
1558                                         { \
1559                                           LPVOID lpTmp; \
1560                                           lpTmp = HeapReAlloc( GetProcessHeap(), 0, \
1561                                                                lpNewEnhMetaFileBuffer, \
1562                                                                uNewEnhMetaFileBufferSize + (b) ); \
1563                                           if( lpTmp == NULL ) { ERR( "No memory!\n" ); goto error; } \
1564                                           lpNewEnhMetaFileBuffer = lpTmp; \
1565                                           lpRecord = (a)( (char*)lpNewEnhMetaFileBuffer + uNewEnhMetaFileBufferSize ); \
1566                                           uNewEnhMetaFileBufferSize += (b); \
1567                                         }
1568
1569         switch( lpMetaRecord->rdFunction )
1570         {
1571           case META_EOF:  
1572           { 
1573              PEMREOF lpRecord;
1574              size_t uRecord = sizeof(*lpRecord);
1575
1576              EMF_ReAllocAndAdjustPointers(PEMREOF,uRecord);
1577               
1578              /* Fill the new record - FIXME: This is not right */
1579              lpRecord->emr.iType = EMR_EOF; 
1580              lpRecord->emr.nSize = sizeof( *lpRecord );
1581              lpRecord->nPalEntries = 0;     /* FIXME */
1582              lpRecord->offPalEntries = 0;   /* FIXME */ 
1583              lpRecord->nSizeLast = 0;       /* FIXME */
1584
1585              /* No more records after this one */
1586              bFoundEOF = TRUE;
1587
1588              FIXME( "META_EOF conversion not correct\n" );
1589              break;
1590           }
1591
1592           case META_SETMAPMODE:
1593           {  
1594              PEMRSETMAPMODE lpRecord;
1595              size_t uRecord = sizeof(*lpRecord);
1596
1597              EMF_ReAllocAndAdjustPointers(PEMRSETMAPMODE,uRecord);
1598
1599              lpRecord->emr.iType = EMR_SETMAPMODE;
1600              lpRecord->emr.nSize = sizeof( *lpRecord );
1601
1602              lpRecord->iMode = lpMetaRecord->rdParm[0];
1603
1604              break;
1605           }
1606
1607           case META_DELETEOBJECT: /* Select and Delete structures are the same */
1608           case META_SELECTOBJECT: 
1609           {
1610             PEMRDELETEOBJECT lpRecord;
1611             size_t uRecord = sizeof(*lpRecord);
1612
1613             EMF_ReAllocAndAdjustPointers(PEMRDELETEOBJECT,uRecord);
1614
1615             if( lpMetaRecord->rdFunction == META_DELETEOBJECT )
1616             {
1617               lpRecord->emr.iType = EMR_DELETEOBJECT;
1618             }
1619             else
1620             {
1621               lpRecord->emr.iType = EMR_SELECTOBJECT;
1622             }
1623             lpRecord->emr.nSize = sizeof( *lpRecord );
1624
1625             lpRecord->ihObject = lpMetaRecord->rdParm[0]; /* FIXME: Handle */
1626
1627             break;
1628           }
1629
1630           case META_POLYGON: /* This is just plain busted. I don't know what I'm doing */
1631           {
1632              PEMRPOLYGON16 lpRecord; /* FIXME: Should it be a poly or poly16? */  
1633              size_t uRecord = sizeof(*lpRecord);
1634
1635              EMF_ReAllocAndAdjustPointers(PEMRPOLYGON16,uRecord);
1636
1637              /* FIXME: This is mostly all wrong */
1638              lpRecord->emr.iType = EMR_POLYGON16;
1639              lpRecord->emr.nSize = sizeof( *lpRecord );
1640
1641              lpRecord->rclBounds.left   = 0;
1642              lpRecord->rclBounds.right  = 0;
1643              lpRecord->rclBounds.top    = 0;
1644              lpRecord->rclBounds.bottom = 0;
1645
1646              lpRecord->cpts = 0;
1647              lpRecord->apts[0].x = 0;
1648              lpRecord->apts[0].y = 0;
1649
1650              FIXME( "META_POLYGON conversion not correct\n" );
1651
1652              break;
1653           }
1654
1655           case META_SETPOLYFILLMODE:
1656           {
1657              PEMRSETPOLYFILLMODE lpRecord;
1658              size_t uRecord = sizeof(*lpRecord);
1659
1660              EMF_ReAllocAndAdjustPointers(PEMRSETPOLYFILLMODE,uRecord);
1661
1662              lpRecord->emr.iType = EMR_SETPOLYFILLMODE;
1663              lpRecord->emr.nSize = sizeof( *lpRecord );
1664
1665              lpRecord->iMode = lpMetaRecord->rdParm[0];
1666              
1667              break;
1668           }
1669
1670           case META_SETWINDOWORG:
1671           {
1672              PEMRSETWINDOWORGEX lpRecord; /* Seems to be the closest thing */
1673              size_t uRecord = sizeof(*lpRecord);
1674
1675              EMF_ReAllocAndAdjustPointers(PEMRSETWINDOWORGEX,uRecord);
1676
1677              lpRecord->emr.iType = EMR_SETWINDOWORGEX;
1678              lpRecord->emr.nSize = sizeof( *lpRecord );
1679
1680              lpRecord->ptlOrigin.x = lpMetaRecord->rdParm[1];
1681              lpRecord->ptlOrigin.y = lpMetaRecord->rdParm[0];
1682
1683              break;
1684           }
1685
1686           case META_SETWINDOWEXT:  /* Structure is the same for SETWINDOWEXT & SETVIEWPORTEXT */
1687           case META_SETVIEWPORTEXT:
1688           {
1689              PEMRSETWINDOWEXTEX lpRecord;
1690              size_t uRecord = sizeof(*lpRecord);
1691
1692              EMF_ReAllocAndAdjustPointers(PEMRSETWINDOWEXTEX,uRecord);
1693
1694              if ( lpMetaRecord->rdFunction == META_SETWINDOWEXT )
1695              {
1696                lpRecord->emr.iType = EMR_SETWINDOWORGEX;
1697              }
1698              else
1699              {
1700                lpRecord->emr.iType = EMR_SETVIEWPORTEXTEX;
1701              }
1702              lpRecord->emr.nSize = sizeof( *lpRecord );
1703
1704              lpRecord->szlExtent.cx = lpMetaRecord->rdParm[1];
1705              lpRecord->szlExtent.cy = lpMetaRecord->rdParm[0];
1706
1707              break;
1708           }
1709
1710           case META_CREATEBRUSHINDIRECT:
1711           {
1712              PEMRCREATEBRUSHINDIRECT lpRecord;
1713              size_t uRecord = sizeof(*lpRecord);
1714
1715              EMF_ReAllocAndAdjustPointers(PEMRCREATEBRUSHINDIRECT,uRecord);
1716
1717              lpRecord->emr.iType = EMR_CREATEBRUSHINDIRECT;
1718              lpRecord->emr.nSize = sizeof( *lpRecord );
1719
1720              lpRecord->ihBrush    = ((LPENHMETAHEADER)lpNewEnhMetaFileBuffer)->nHandles;
1721              lpRecord->lb.lbStyle = ((LPLOGBRUSH16)lpMetaRecord->rdParm)->lbStyle; 
1722              lpRecord->lb.lbColor = ((LPLOGBRUSH16)lpMetaRecord->rdParm)->lbColor; 
1723              lpRecord->lb.lbHatch = ((LPLOGBRUSH16)lpMetaRecord->rdParm)->lbHatch; 
1724              
1725              ((LPENHMETAHEADER)lpNewEnhMetaFileBuffer)->nHandles += 1; /* New handle */
1726
1727              break;
1728           }
1729
1730
1731           /* These are all unimplemented and as such are intended to fall through to the default case */
1732           case META_SETBKCOLOR:
1733           case META_SETBKMODE:
1734           case META_SETROP2:
1735           case META_SETRELABS:
1736           case META_SETSTRETCHBLTMODE:
1737           case META_SETTEXTCOLOR:
1738           case META_SETVIEWPORTORG:
1739           case META_OFFSETWINDOWORG:
1740           case META_SCALEWINDOWEXT:
1741           case META_OFFSETVIEWPORTORG:
1742           case META_SCALEVIEWPORTEXT:
1743           case META_LINETO:
1744           case META_MOVETO:
1745           case META_EXCLUDECLIPRECT:
1746           case META_INTERSECTCLIPRECT:
1747           case META_ARC:
1748           case META_ELLIPSE:
1749           case META_FLOODFILL:
1750           case META_PIE:
1751           case META_RECTANGLE:
1752           case META_ROUNDRECT:
1753           case META_PATBLT:
1754           case META_SAVEDC:
1755           case META_SETPIXEL:
1756           case META_OFFSETCLIPRGN:
1757           case META_TEXTOUT:
1758           case META_POLYPOLYGON:
1759           case META_POLYLINE:
1760           case META_RESTOREDC:  
1761           case META_CHORD:
1762           case META_CREATEPATTERNBRUSH:
1763           case META_CREATEPENINDIRECT:
1764           case META_CREATEFONTINDIRECT:
1765           case META_CREATEPALETTE:
1766           case META_SETTEXTALIGN:
1767           case META_SELECTPALETTE:
1768           case META_SETMAPPERFLAGS:
1769           case META_REALIZEPALETTE:
1770           case META_ESCAPE:
1771           case META_EXTTEXTOUT:
1772           case META_STRETCHDIB:
1773           case META_DIBSTRETCHBLT:
1774           case META_STRETCHBLT:
1775           case META_BITBLT:
1776           case META_CREATEREGION:
1777           case META_FILLREGION:
1778           case META_FRAMEREGION:
1779           case META_INVERTREGION:
1780           case META_PAINTREGION:
1781           case META_SELECTCLIPREGION:
1782           case META_DIBCREATEPATTERNBRUSH:
1783           case META_DIBBITBLT:
1784           case META_SETTEXTCHAREXTRA:
1785           case META_SETTEXTJUSTIFICATION:
1786           case META_EXTFLOODFILL:
1787           case META_SETDIBTODEV:
1788           case META_DRAWTEXT:
1789           case META_ANIMATEPALETTE:
1790           case META_SETPALENTRIES:
1791           case META_RESIZEPALETTE:
1792           case META_RESETDC:
1793           case META_STARTDOC:
1794           case META_STARTPAGE:
1795           case META_ENDPAGE:
1796           case META_ABORTDOC:
1797           case META_ENDDOC:
1798           case META_CREATEBRUSH:
1799           case META_CREATEBITMAPINDIRECT:
1800           case META_CREATEBITMAP:    
1801           /* Fall through to unimplemented */
1802           default:
1803           {
1804             /* Not implemented yet */
1805             FIXME( "Conversion of record type 0x%x not implemented.\n", lpMetaRecord->rdFunction );
1806             break;
1807           }
1808        }
1809
1810        /* Move to the next record */
1811        (char*)lpbBuffer += ((LPMETARECORD)lpbBuffer)->rdSize * 2; /* FIXME: Seem to be doing this in metafile.c */ 
1812
1813 #undef ReAllocAndAdjustPointers
1814      } 
1815
1816      /* We know the last of the header information now */
1817      ((LPENHMETAHEADER)lpNewEnhMetaFileBuffer)->nBytes = uNewEnhMetaFileBufferSize;
1818
1819      /* Create the enhanced metafile */
1820      hMf = SetEnhMetaFileBits( uNewEnhMetaFileBufferSize, (const BYTE*)lpNewEnhMetaFileBuffer ); 
1821
1822      if( !hMf )
1823        ERR( "Problem creating metafile. Did the conversion fail somewhere?\n" );
1824
1825      return hMf;
1826
1827 error:
1828      /* Free the data associated with our copy since it's been copied */
1829      HeapFree( GetProcessHeap(), 0, lpNewEnhMetaFileBuffer ); 
1830
1831      return 0;  
1832 }
1833
1834
1835