| /* | |
| * Metafile functions | |
| * | |
| * Copyright David W. Metcalfe, 1994 | |
| * Niels de Carpentier, Albrecht Kleine, Huw Davies 1996 | |
| * | |
| */ | |
| /* | |
| * These functions are primarily involved with metafile playback or anything | |
| * that touches a HMETAFILE. | |
| * For recording of metafiles look in graphics/metafiledrv/ | |
| * | |
| * Note that (32 bit) HMETAFILEs are GDI objects, while HMETAFILE16s are | |
| * global memory handles so these cannot be interchanged. | |
| * | |
| * Memory-based metafiles are just stored as a continuous block of memory with | |
| * a METAHEADER at the head with METARECORDs appended to it. mtType is | |
| * METAFILE_MEMORY (1). Note this is indentical to the disk image of a | |
| * disk-based metafile - even mtType is METAFILE_MEMORY. | |
| * 16bit HMETAFILE16s are global handles to this block | |
| * 32bit HMETAFILEs are GDI handles METAFILEOBJs, which contains a ptr to | |
| * the memory. | |
| * Disk-based metafiles are rather different. HMETAFILE16s point to a | |
| * METAHEADER which has mtType equal to METAFILE_DISK (2). Following the 9 | |
| * WORDs of the METAHEADER there are a further 3 WORDs of 0, 1 of 0x117, 1 | |
| * more 0, then 2 which may be a time stamp of the file and then the path of | |
| * the file (METAHEADERDISK). I've copied this for 16bit compatibility. | |
| * | |
| * HDMD - 14/4/1999 | |
| */ | |
| #include <string.h> | |
| #include <fcntl.h> | |
| #include "wine/winbase16.h" | |
| #include "metafile.h" | |
| #include "bitmap.h" | |
| #include "heap.h" | |
| #include "toolhelp.h" | |
| #include "debugtools.h" | |
| #include "global.h" | |
| DEFAULT_DEBUG_CHANNEL(metafile); | |
| /****************************************************************** | |
| * MF_AddHandle | |
| * | |
| * Add a handle to an external handle table and return the index | |
| */ | |
| static int MF_AddHandle(HANDLETABLE16 *ht, WORD htlen, HGDIOBJ16 hobj) | |
| { | |
| int i; | |
| for (i = 0; i < htlen; i++) | |
| { | |
| if (*(ht->objectHandle + i) == 0) | |
| { | |
| *(ht->objectHandle + i) = hobj; | |
| return i; | |
| } | |
| } | |
| return -1; | |
| } | |
| /****************************************************************** | |
| * MF_Create_HMETATFILE | |
| * | |
| * Creates a (32 bit) HMETAFILE object from a METAHEADER | |
| * | |
| * HMETAFILEs are GDI objects. | |
| */ | |
| HMETAFILE MF_Create_HMETAFILE(METAHEADER *mh) | |
| { | |
| HMETAFILE hmf = 0; | |
| METAFILEOBJ *metaObj = GDI_AllocObject( sizeof(METAFILEOBJ), METAFILE_MAGIC, &hmf ); | |
| if (metaObj) | |
| { | |
| metaObj->mh = mh; | |
| GDI_ReleaseObj( hmf ); | |
| } | |
| return hmf; | |
| } | |
| /****************************************************************** | |
| * MF_Create_HMETATFILE16 | |
| * | |
| * Creates a HMETAFILE16 object from a METAHEADER | |
| * | |
| * HMETAFILE16s are Global memory handles. | |
| */ | |
| HMETAFILE16 MF_Create_HMETAFILE16(METAHEADER *mh) | |
| { | |
| HMETAFILE16 hmf; | |
| DWORD size = mh->mtSize * sizeof(WORD); | |
| hmf = GlobalAlloc16(GMEM_MOVEABLE, size); | |
| if(hmf) | |
| { | |
| METAHEADER *mh_dest = GlobalLock16(hmf); | |
| memcpy(mh_dest, mh, size); | |
| GlobalUnlock16(hmf); | |
| } | |
| HeapFree(GetProcessHeap(), 0, mh); | |
| return hmf; | |
| } | |
| /****************************************************************** | |
| * MF_GetMetaHeader | |
| * | |
| * Returns ptr to METAHEADER associated with HMETAFILE | |
| * Should be followed by call to MF_ReleaseMetaHeader | |
| */ | |
| static METAHEADER *MF_GetMetaHeader( HMETAFILE hmf ) | |
| { | |
| METAFILEOBJ * metaObj = (METAFILEOBJ *)GDI_GetObjPtr( hmf, METAFILE_MAGIC ); | |
| return metaObj ? metaObj->mh : 0; | |
| } | |
| /****************************************************************** | |
| * MF_GetMetaHeader16 | |
| * | |
| * Returns ptr to METAHEADER associated with HMETAFILE16 | |
| * Should be followed by call to MF_ReleaseMetaHeader16 | |
| */ | |
| static METAHEADER *MF_GetMetaHeader16( HMETAFILE16 hmf ) | |
| { | |
| return GlobalLock16(hmf); | |
| } | |
| /****************************************************************** | |
| * MF_ReleaseMetaHeader | |
| * | |
| * Releases METAHEADER associated with HMETAFILE | |
| */ | |
| static void MF_ReleaseMetaHeader( HMETAFILE hmf ) | |
| { | |
| GDI_ReleaseObj( hmf ); | |
| } | |
| /****************************************************************** | |
| * MF_ReleaseMetaHeader16 | |
| * | |
| * Releases METAHEADER associated with HMETAFILE16 | |
| */ | |
| static BOOL16 MF_ReleaseMetaHeader16( HMETAFILE16 hmf ) | |
| { | |
| return GlobalUnlock16( hmf ); | |
| } | |
| /****************************************************************** | |
| * DeleteMetaFile16 (GDI.127) | |
| */ | |
| BOOL16 WINAPI DeleteMetaFile16( HMETAFILE16 hmf ) | |
| { | |
| return !GlobalFree16( hmf ); | |
| } | |
| /****************************************************************** | |
| * DeleteMetaFile (GDI32.@) | |
| * | |
| * Delete a memory-based metafile. | |
| */ | |
| BOOL WINAPI DeleteMetaFile( HMETAFILE hmf ) | |
| { | |
| METAFILEOBJ * metaObj = (METAFILEOBJ *)GDI_GetObjPtr( hmf, METAFILE_MAGIC ); | |
| if (!metaObj) return FALSE; | |
| HeapFree( GetProcessHeap(), 0, metaObj->mh ); | |
| GDI_FreeObject( hmf, metaObj ); | |
| return TRUE; | |
| } | |
| /****************************************************************** | |
| * MF_ReadMetaFile | |
| * | |
| * Returns a pointer to a memory based METAHEADER read in from file HFILE | |
| * | |
| */ | |
| static METAHEADER *MF_ReadMetaFile(HFILE hfile) | |
| { | |
| METAHEADER *mh; | |
| DWORD BytesRead, size; | |
| size = sizeof(METAHEADER); | |
| mh = HeapAlloc( GetProcessHeap(), 0, size ); | |
| if(!mh) return NULL; | |
| if(ReadFile( hfile, mh, size, &BytesRead, NULL) == 0 || | |
| BytesRead != size) { | |
| HeapFree( GetProcessHeap(), 0, mh ); | |
| return NULL; | |
| } | |
| size = mh->mtSize * 2; | |
| mh = HeapReAlloc( GetProcessHeap(), 0, mh, size ); | |
| if(!mh) return NULL; | |
| size -= sizeof(METAHEADER); | |
| if(ReadFile( hfile, (char *)mh + sizeof(METAHEADER), size, &BytesRead, | |
| NULL) == 0 || | |
| BytesRead != size) { | |
| HeapFree( GetProcessHeap(), 0, mh ); | |
| return NULL; | |
| } | |
| if (mh->mtType != METAFILE_MEMORY) { | |
| WARN("Disk metafile had mtType = %04x\n", mh->mtType); | |
| mh->mtType = METAFILE_MEMORY; | |
| } | |
| return mh; | |
| } | |
| /****************************************************************** | |
| * GetMetaFile16 (GDI.124) | |
| */ | |
| HMETAFILE16 WINAPI GetMetaFile16( LPCSTR lpFilename ) | |
| { | |
| METAHEADER *mh; | |
| HANDLE hFile; | |
| TRACE("%s\n", lpFilename); | |
| if(!lpFilename) | |
| return 0; | |
| if((hFile = CreateFileA(lpFilename, GENERIC_READ, FILE_SHARE_READ, NULL, | |
| OPEN_EXISTING, 0, 0)) == INVALID_HANDLE_VALUE) | |
| return 0; | |
| mh = MF_ReadMetaFile(hFile); | |
| CloseHandle(hFile); | |
| if(!mh) return 0; | |
| return MF_Create_HMETAFILE16( mh ); | |
| } | |
| /****************************************************************** | |
| * GetMetaFileA (GDI32.@) | |
| * | |
| * Read a metafile from a file. Returns handle to a memory-based metafile. | |
| */ | |
| HMETAFILE WINAPI GetMetaFileA( LPCSTR lpFilename ) | |
| { | |
| METAHEADER *mh; | |
| HANDLE hFile; | |
| TRACE("%s\n", lpFilename); | |
| if(!lpFilename) | |
| return 0; | |
| if((hFile = CreateFileA(lpFilename, GENERIC_READ, FILE_SHARE_READ, NULL, | |
| OPEN_EXISTING, 0, 0)) == INVALID_HANDLE_VALUE) | |
| return 0; | |
| mh = MF_ReadMetaFile(hFile); | |
| CloseHandle(hFile); | |
| if(!mh) return 0; | |
| return MF_Create_HMETAFILE( mh ); | |
| } | |
| /****************************************************************** | |
| * GetMetaFileW (GDI32.@) | |
| */ | |
| HMETAFILE WINAPI GetMetaFileW( LPCWSTR lpFilename ) | |
| { | |
| METAHEADER *mh; | |
| HANDLE hFile; | |
| TRACE("%s\n", debugstr_w(lpFilename)); | |
| if(!lpFilename) | |
| return 0; | |
| if((hFile = CreateFileW(lpFilename, GENERIC_READ, FILE_SHARE_READ, NULL, | |
| OPEN_EXISTING, 0, 0)) == INVALID_HANDLE_VALUE) | |
| return 0; | |
| mh = MF_ReadMetaFile(hFile); | |
| CloseHandle(hFile); | |
| if(!mh) return 0; | |
| return MF_Create_HMETAFILE( mh ); | |
| } | |
| /****************************************************************** | |
| * MF_LoadDiskBasedMetaFile | |
| * | |
| * Creates a new memory-based metafile from a disk-based one. | |
| */ | |
| static METAHEADER *MF_LoadDiskBasedMetaFile(METAHEADER *mh) | |
| { | |
| METAHEADERDISK *mhd; | |
| HANDLE hfile; | |
| METAHEADER *mh2; | |
| if(mh->mtType != METAFILE_DISK) { | |
| ERR("Not a disk based metafile\n"); | |
| return NULL; | |
| } | |
| mhd = (METAHEADERDISK *)((char *)mh + sizeof(METAHEADER)); | |
| if((hfile = CreateFileA(mhd->filename, GENERIC_READ, FILE_SHARE_READ, NULL, | |
| OPEN_EXISTING, 0, 0)) == INVALID_HANDLE_VALUE) { | |
| WARN("Can't open file of disk based metafile\n"); | |
| return NULL; | |
| } | |
| mh2 = MF_ReadMetaFile(hfile); | |
| CloseHandle(hfile); | |
| return mh2; | |
| } | |
| /****************************************************************** | |
| * MF_CreateMetaHeaderDisk | |
| * | |
| * Take a memory based METAHEADER and change it to a disk based METAHEADER | |
| * assosiated with filename. Note: Trashes contents of old one. | |
| */ | |
| METAHEADER *MF_CreateMetaHeaderDisk(METAHEADER *mh, LPCSTR filename) | |
| { | |
| METAHEADERDISK *mhd; | |
| DWORD size; | |
| mh = HeapReAlloc( GetProcessHeap(), 0, mh, | |
| sizeof(METAHEADER) + sizeof(METAHEADERDISK)); | |
| mh->mtType = METAFILE_DISK; | |
| size = HeapSize( GetProcessHeap(), 0, mh ); | |
| mhd = (METAHEADERDISK *)((char *)mh + sizeof(METAHEADER)); | |
| strcpy(mhd->filename, filename); | |
| return mh; | |
| } | |
| /****************************************************************** | |
| * CopyMetaFile16 (GDI.151) | |
| */ | |
| HMETAFILE16 WINAPI CopyMetaFile16( HMETAFILE16 hSrcMetaFile, LPCSTR lpFilename) | |
| { | |
| METAHEADER *mh = MF_GetMetaHeader16( hSrcMetaFile ); | |
| METAHEADER *mh2 = NULL; | |
| HANDLE hFile; | |
| TRACE("(%08x,%s)\n", hSrcMetaFile, lpFilename); | |
| if(!mh) return 0; | |
| if(mh->mtType == METAFILE_DISK) | |
| mh2 = MF_LoadDiskBasedMetaFile(mh); | |
| else { | |
| mh2 = HeapAlloc( GetProcessHeap(), 0, mh->mtSize * 2 ); | |
| memcpy( mh2, mh, mh->mtSize * 2 ); | |
| } | |
| MF_ReleaseMetaHeader16( hSrcMetaFile ); | |
| if(lpFilename) { /* disk based metafile */ | |
| if((hFile = CreateFileA(lpFilename, GENERIC_WRITE, 0, NULL, | |
| CREATE_ALWAYS, 0, 0)) == INVALID_HANDLE_VALUE) { | |
| HeapFree( GetProcessHeap(), 0, mh2 ); | |
| return 0; | |
| } | |
| WriteFile(hFile, mh2, mh2->mtSize * 2, NULL, NULL); | |
| CloseHandle(hFile); | |
| mh2 = MF_CreateMetaHeaderDisk(mh2, lpFilename); | |
| } | |
| return MF_Create_HMETAFILE16( mh2 ); | |
| } | |
| /****************************************************************** | |
| * CopyMetaFileA (GDI32.@) | |
| * | |
| * Copies the metafile corresponding to hSrcMetaFile to either | |
| * a disk file, if a filename is given, or to a new memory based | |
| * metafile, if lpFileName is NULL. | |
| * | |
| * RETURNS | |
| * | |
| * Handle to metafile copy on success, NULL on failure. | |
| * | |
| * BUGS | |
| * | |
| * Copying to disk returns NULL even if successful. | |
| */ | |
| HMETAFILE WINAPI CopyMetaFileA( | |
| HMETAFILE hSrcMetaFile, /* [in] handle of metafile to copy */ | |
| LPCSTR lpFilename /* [in] filename if copying to a file */ | |
| ) { | |
| METAHEADER *mh = MF_GetMetaHeader( hSrcMetaFile ); | |
| METAHEADER *mh2 = NULL; | |
| HANDLE hFile; | |
| TRACE("(%08x,%s)\n", hSrcMetaFile, lpFilename); | |
| if(!mh) return 0; | |
| if(mh->mtType == METAFILE_DISK) | |
| mh2 = MF_LoadDiskBasedMetaFile(mh); | |
| else { | |
| mh2 = HeapAlloc( GetProcessHeap(), 0, mh->mtSize * 2 ); | |
| memcpy( mh2, mh, mh->mtSize * 2 ); | |
| } | |
| MF_ReleaseMetaHeader( hSrcMetaFile ); | |
| if(lpFilename) { /* disk based metafile */ | |
| if((hFile = CreateFileA(lpFilename, GENERIC_WRITE, 0, NULL, | |
| CREATE_ALWAYS, 0, 0)) == INVALID_HANDLE_VALUE) { | |
| HeapFree( GetProcessHeap(), 0, mh2 ); | |
| return 0; | |
| } | |
| WriteFile(hFile, mh2, mh2->mtSize * 2, NULL, NULL); | |
| CloseHandle(hFile); | |
| mh2 = MF_CreateMetaHeaderDisk(mh2, lpFilename); | |
| } | |
| return MF_Create_HMETAFILE( mh2 ); | |
| } | |
| /****************************************************************** | |
| * CopyMetaFileW (GDI32.@) | |
| */ | |
| HMETAFILE WINAPI CopyMetaFileW( HMETAFILE hSrcMetaFile, | |
| LPCWSTR lpFilename ) | |
| { | |
| LPSTR p = HEAP_strdupWtoA( GetProcessHeap(), 0, lpFilename ); | |
| HMETAFILE ret = CopyMetaFileA( hSrcMetaFile, p ); | |
| HeapFree( GetProcessHeap(), 0, p ); | |
| return ret; | |
| } | |
| /****************************************************************** | |
| * IsValidMetaFile (GDI.410) | |
| * | |
| * Attempts to check if a given metafile is correctly formatted. | |
| * Currently, the only things verified are several properties of the | |
| * header. | |
| * | |
| * RETURNS | |
| * TRUE if hmf passes some tests for being a valid metafile, FALSE otherwise. | |
| * | |
| * BUGS | |
| * This is not exactly what windows does, see _Undocumented_Windows_ | |
| * for details. | |
| */ | |
| BOOL16 WINAPI IsValidMetaFile16(HMETAFILE16 hmf) | |
| { | |
| BOOL16 res=FALSE; | |
| METAHEADER *mh = MF_GetMetaHeader16(hmf); | |
| if (mh) { | |
| if (mh->mtType == METAFILE_MEMORY || mh->mtType == METAFILE_DISK) | |
| if (mh->mtHeaderSize == MFHEADERSIZE/sizeof(INT16)) | |
| if (mh->mtVersion == MFVERSION) | |
| res=TRUE; | |
| MF_ReleaseMetaHeader16(hmf); | |
| } | |
| TRACE("IsValidMetaFile %x => %d\n",hmf,res); | |
| return res; | |
| } | |
| /******************************************************************* | |
| * MF_PlayMetaFile | |
| * | |
| * Helper for PlayMetaFile | |
| */ | |
| static BOOL MF_PlayMetaFile( HDC hdc, METAHEADER *mh) | |
| { | |
| METARECORD *mr; | |
| HANDLETABLE16 *ht; | |
| unsigned int offset = 0; | |
| WORD i; | |
| HPEN hPen; | |
| HBRUSH hBrush; | |
| HFONT hFont; | |
| BOOL loaded = FALSE; | |
| if (!mh) return FALSE; | |
| if(mh->mtType == METAFILE_DISK) { /* Create a memory-based copy */ | |
| mh = MF_LoadDiskBasedMetaFile(mh); | |
| if(!mh) return FALSE; | |
| loaded = TRUE; | |
| } | |
| /* save the current pen, brush and font */ | |
| hPen = GetCurrentObject(hdc, OBJ_PEN); | |
| hBrush = GetCurrentObject(hdc, OBJ_BRUSH); | |
| hFont = GetCurrentObject(hdc, OBJ_FONT); | |
| /* create the handle table */ | |
| ht = HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, | |
| sizeof(HANDLETABLE16) * mh->mtNoObjects); | |
| if(!ht) return FALSE; | |
| /* loop through metafile playing records */ | |
| offset = mh->mtHeaderSize * 2; | |
| while (offset < mh->mtSize * 2) | |
| { | |
| mr = (METARECORD *)((char *)mh + offset); | |
| TRACE("offset=%04x,size=%08lx\n", | |
| offset, mr->rdSize); | |
| if (!mr->rdSize) { | |
| TRACE( | |
| "Entry got size 0 at offset %d, total mf length is %ld\n", | |
| offset,mh->mtSize*2); | |
| break; /* would loop endlessly otherwise */ | |
| } | |
| offset += mr->rdSize * 2; | |
| PlayMetaFileRecord16( hdc, ht, mr, mh->mtNoObjects ); | |
| } | |
| SelectObject(hdc, hBrush); | |
| SelectObject(hdc, hPen); | |
| SelectObject(hdc, hFont); | |
| /* free objects in handle table */ | |
| for(i = 0; i < mh->mtNoObjects; i++) | |
| if(*(ht->objectHandle + i) != 0) | |
| DeleteObject(*(ht->objectHandle + i)); | |
| /* free handle table */ | |
| HeapFree( GetProcessHeap(), 0, ht ); | |
| if(loaded) | |
| HeapFree( GetProcessHeap(), 0, mh ); | |
| return TRUE; | |
| } | |
| /****************************************************************** | |
| * PlayMetaFile16 (GDI.123) | |
| * | |
| */ | |
| BOOL16 WINAPI PlayMetaFile16( HDC16 hdc, HMETAFILE16 hmf ) | |
| { | |
| BOOL16 ret; | |
| METAHEADER *mh = MF_GetMetaHeader16( hmf ); | |
| ret = MF_PlayMetaFile( hdc, mh ); | |
| MF_ReleaseMetaHeader16( hmf ); | |
| return ret; | |
| } | |
| /****************************************************************** | |
| * PlayMetaFile (GDI32.@) | |
| * | |
| * Renders the metafile specified by hmf in the DC specified by | |
| * hdc. Returns FALSE on failure, TRUE on success. | |
| */ | |
| BOOL WINAPI PlayMetaFile( | |
| HDC hdc, /* [in] handle of DC to render in */ | |
| HMETAFILE hmf /* [in] handle of metafile to render */ | |
| ) | |
| { | |
| BOOL ret; | |
| METAHEADER *mh = MF_GetMetaHeader( hmf ); | |
| ret = MF_PlayMetaFile( hdc, mh ); | |
| MF_ReleaseMetaHeader( hmf ); | |
| return ret; | |
| } | |
| /****************************************************************** | |
| * EnumMetaFile16 (GDI.175) | |
| * | |
| */ | |
| BOOL16 WINAPI EnumMetaFile16( HDC16 hdc, HMETAFILE16 hmf, | |
| MFENUMPROC16 lpEnumFunc, LPARAM lpData ) | |
| { | |
| METAHEADER *mh = MF_GetMetaHeader16(hmf); | |
| METARECORD *mr; | |
| HANDLETABLE16 *ht; | |
| HGLOBAL16 hHT; | |
| SEGPTR spht; | |
| unsigned int offset = 0; | |
| WORD i, seg; | |
| HPEN hPen; | |
| HBRUSH hBrush; | |
| HFONT hFont; | |
| BOOL16 result = TRUE, loaded = FALSE; | |
| TRACE("(%04x, %04x, %08lx, %08lx)\n", | |
| hdc, hmf, (DWORD)lpEnumFunc, lpData); | |
| if(!mh) return FALSE; | |
| if(mh->mtType == METAFILE_DISK) { /* Create a memory-based copy */ | |
| mh = MF_LoadDiskBasedMetaFile(mh); | |
| if(!mh) return FALSE; | |
| loaded = TRUE; | |
| } | |
| /* save the current pen, brush and font */ | |
| hPen = GetCurrentObject(hdc, OBJ_PEN); | |
| hBrush = GetCurrentObject(hdc, OBJ_BRUSH); | |
| hFont = GetCurrentObject(hdc, OBJ_FONT); | |
| /* create the handle table */ | |
| hHT = GlobalAlloc16(GMEM_MOVEABLE | GMEM_ZEROINIT, | |
| sizeof(HANDLETABLE16) * mh->mtNoObjects); | |
| spht = K32WOWGlobalLock16(hHT); | |
| seg = hmf | 7; | |
| offset = mh->mtHeaderSize * 2; | |
| /* loop through metafile records */ | |
| while (offset < (mh->mtSize * 2)) | |
| { | |
| mr = (METARECORD *)((char *)mh + offset); | |
| if (!lpEnumFunc( hdc, (HANDLETABLE16 *)spht, | |
| (METARECORD *)MAKESEGPTR( seg + (HIWORD(offset) << __AHSHIFT), LOWORD(offset) ), | |
| mh->mtNoObjects, (LONG)lpData )) | |
| { | |
| result = FALSE; | |
| break; | |
| } | |
| offset += (mr->rdSize * 2); | |
| } | |
| SelectObject(hdc, hBrush); | |
| SelectObject(hdc, hPen); | |
| SelectObject(hdc, hFont); | |
| ht = (HANDLETABLE16 *)GlobalLock16(hHT); | |
| /* free objects in handle table */ | |
| for(i = 0; i < mh->mtNoObjects; i++) | |
| if(*(ht->objectHandle + i) != 0) | |
| DeleteObject(*(ht->objectHandle + i)); | |
| /* free handle table */ | |
| GlobalFree16(hHT); | |
| if(loaded) | |
| HeapFree( GetProcessHeap(), 0, mh ); | |
| MF_ReleaseMetaHeader16(hmf); | |
| return result; | |
| } | |
| /****************************************************************** | |
| * EnumMetaFile (GDI32.@) | |
| * | |
| * Loop through the metafile records in hmf, calling the user-specified | |
| * function for each one, stopping when the user's function returns FALSE | |
| * (which is considered to be failure) | |
| * or when no records are left (which is considered to be success). | |
| * | |
| * RETURNS | |
| * TRUE on success, FALSE on failure. | |
| * | |
| * HISTORY | |
| * Niels de carpentier, april 1996 | |
| */ | |
| BOOL WINAPI EnumMetaFile( | |
| HDC hdc, | |
| HMETAFILE hmf, | |
| MFENUMPROC lpEnumFunc, | |
| LPARAM lpData | |
| ) { | |
| METAHEADER *mhTemp = NULL, *mh = MF_GetMetaHeader(hmf); | |
| METARECORD *mr; | |
| HANDLETABLE *ht; | |
| BOOL result = TRUE; | |
| int i; | |
| unsigned int offset = 0; | |
| HPEN hPen; | |
| HBRUSH hBrush; | |
| HFONT hFont; | |
| TRACE("(%08x,%08x,%p,%p)\n", | |
| hdc, hmf, lpEnumFunc, (void*)lpData); | |
| if (!mh) return 0; | |
| if(mh->mtType == METAFILE_DISK) { /* Create a memory-based copy */ | |
| mhTemp = MF_LoadDiskBasedMetaFile(mh); | |
| if(!mhTemp) | |
| { | |
| MF_ReleaseMetaHeader(hmf); | |
| return FALSE; | |
| } | |
| mh = mhTemp; | |
| } | |
| else | |
| { | |
| /* We need to copy this thing instead of use it directly because we | |
| * have to close the hmf handle for the purpose of avoiding deadlock. | |
| */ | |
| mhTemp = HeapAlloc( GetProcessHeap(), 0, mh->mtHeaderSize + mh->mtSize*2 ); | |
| if(!mhTemp) | |
| { | |
| MF_ReleaseMetaHeader(hmf); | |
| return FALSE; | |
| } | |
| memcpy( mhTemp, mh, mh->mtHeaderSize + mh->mtSize*2 ); | |
| mh = mhTemp; | |
| } | |
| MF_ReleaseMetaHeader(hmf); | |
| hmf = 0; /* just in case */ | |
| /* save the current pen, brush and font */ | |
| hPen = GetCurrentObject(hdc, OBJ_PEN); | |
| hBrush = GetCurrentObject(hdc, OBJ_BRUSH); | |
| hFont = GetCurrentObject(hdc, OBJ_FONT); | |
| ht = HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, | |
| sizeof(HANDLETABLE) * mh->mtNoObjects); | |
| /* loop through metafile records */ | |
| offset = mh->mtHeaderSize * 2; | |
| while (offset < (mh->mtSize * 2)) | |
| { | |
| mr = (METARECORD *)((char *)mh + offset); | |
| TRACE("Calling EnumFunc with record type %x\n", | |
| mr->rdFunction); | |
| if (!lpEnumFunc( hdc, ht, mr, mh->mtNoObjects, (LONG)lpData )) | |
| { | |
| result = FALSE; | |
| break; | |
| } | |
| offset += (mr->rdSize * 2); | |
| } | |
| /* restore pen, brush and font */ | |
| SelectObject(hdc, hBrush); | |
| SelectObject(hdc, hPen); | |
| SelectObject(hdc, hFont); | |
| /* free objects in handle table */ | |
| for(i = 0; i < mh->mtNoObjects; i++) | |
| if(*(ht->objectHandle + i) != 0) | |
| DeleteObject(*(ht->objectHandle + i)); | |
| /* free handle table */ | |
| HeapFree( GetProcessHeap(), 0, ht); | |
| /* free a copy of metafile */ | |
| HeapFree( GetProcessHeap(), 0, mh ); | |
| return result; | |
| } | |
| static BOOL MF_Play_MetaCreateRegion( METARECORD *mr, HRGN hrgn ); | |
| static BOOL MF_Play_MetaExtTextOut(HDC16 hdc, METARECORD *mr); | |
| /****************************************************************** | |
| * PlayMetaFileRecord16 (GDI.176) | |
| * | |
| * Render a single metafile record specified by *mr in the DC hdc, while | |
| * using the handle table *ht, of length nHandles, | |
| * to store metafile objects. | |
| * | |
| * BUGS | |
| * The following metafile records are unimplemented: | |
| * | |
| * DRAWTEXT, ANIMATEPALETTE, SETPALENTRIES, | |
| * RESIZEPALETTE, EXTFLOODFILL, RESETDC, STARTDOC, STARTPAGE, ENDPAGE, | |
| * ABORTDOC, ENDDOC, CREATEBRUSH, CREATEBITMAPINDIRECT, and CREATEBITMAP. | |
| * | |
| */ | |
| void WINAPI PlayMetaFileRecord16( | |
| HDC16 hdc, /* [in] DC to render metafile into */ | |
| HANDLETABLE16 *ht, /* [in] pointer to handle table for metafile objects */ | |
| METARECORD *mr, /* [in] pointer to metafile record to render */ | |
| UINT16 nHandles /* [in] size of handle table */ | |
| ) { | |
| short s1; | |
| HANDLE16 hndl; | |
| char *ptr; | |
| BITMAPINFOHEADER *infohdr; | |
| TRACE("(%04x %08lx %08lx %04x) function %04x\n", | |
| hdc,(LONG)ht, (LONG)mr, nHandles, mr->rdFunction); | |
| switch (mr->rdFunction) | |
| { | |
| case META_EOF: | |
| break; | |
| case META_DELETEOBJECT: | |
| DeleteObject(*(ht->objectHandle + *(mr->rdParm))); | |
| *(ht->objectHandle + *(mr->rdParm)) = 0; | |
| break; | |
| case META_SETBKCOLOR: | |
| SetBkColor16(hdc, MAKELONG(*(mr->rdParm), *(mr->rdParm + 1))); | |
| break; | |
| case META_SETBKMODE: | |
| SetBkMode16(hdc, *(mr->rdParm)); | |
| break; | |
| case META_SETMAPMODE: | |
| SetMapMode16(hdc, *(mr->rdParm)); | |
| break; | |
| case META_SETROP2: | |
| SetROP216(hdc, *(mr->rdParm)); | |
| break; | |
| case META_SETRELABS: | |
| SetRelAbs16(hdc, *(mr->rdParm)); | |
| break; | |
| case META_SETPOLYFILLMODE: | |
| SetPolyFillMode16(hdc, *(mr->rdParm)); | |
| break; | |
| case META_SETSTRETCHBLTMODE: | |
| SetStretchBltMode16(hdc, *(mr->rdParm)); | |
| break; | |
| case META_SETTEXTCOLOR: | |
| SetTextColor16(hdc, MAKELONG(*(mr->rdParm), *(mr->rdParm + 1))); | |
| break; | |
| case META_SETWINDOWORG: | |
| SetWindowOrg16(hdc, *(mr->rdParm + 1), *(mr->rdParm)); | |
| break; | |
| case META_SETWINDOWEXT: | |
| SetWindowExt16(hdc, *(mr->rdParm + 1), *(mr->rdParm)); | |
| break; | |
| case META_SETVIEWPORTORG: | |
| SetViewportOrg16(hdc, *(mr->rdParm + 1), *(mr->rdParm)); | |
| break; | |
| case META_SETVIEWPORTEXT: | |
| SetViewportExt16(hdc, *(mr->rdParm + 1), *(mr->rdParm)); | |
| break; | |
| case META_OFFSETWINDOWORG: | |
| OffsetWindowOrg16(hdc, *(mr->rdParm + 1), *(mr->rdParm)); | |
| break; | |
| case META_SCALEWINDOWEXT: | |
| ScaleWindowExt16(hdc, *(mr->rdParm + 3), *(mr->rdParm + 2), | |
| *(mr->rdParm + 1), *(mr->rdParm)); | |
| break; | |
| case META_OFFSETVIEWPORTORG: | |
| OffsetViewportOrg16(hdc, *(mr->rdParm + 1), *(mr->rdParm)); | |
| break; | |
| case META_SCALEVIEWPORTEXT: | |
| ScaleViewportExt16(hdc, *(mr->rdParm + 3), *(mr->rdParm + 2), | |
| *(mr->rdParm + 1), *(mr->rdParm)); | |
| break; | |
| case META_LINETO: | |
| LineTo(hdc, (INT16)*(mr->rdParm + 1), (INT16)*(mr->rdParm)); | |
| break; | |
| case META_MOVETO: | |
| MoveTo16(hdc, *(mr->rdParm + 1), *(mr->rdParm)); | |
| break; | |
| case META_EXCLUDECLIPRECT: | |
| ExcludeClipRect16( hdc, *(mr->rdParm + 3), *(mr->rdParm + 2), | |
| *(mr->rdParm + 1), *(mr->rdParm) ); | |
| break; | |
| case META_INTERSECTCLIPRECT: | |
| IntersectClipRect16( hdc, *(mr->rdParm + 3), *(mr->rdParm + 2), | |
| *(mr->rdParm + 1), *(mr->rdParm) ); | |
| break; | |
| case META_ARC: | |
| Arc(hdc, (INT16)*(mr->rdParm + 7), (INT16)*(mr->rdParm + 6), | |
| (INT16)*(mr->rdParm + 5), (INT16)*(mr->rdParm + 4), | |
| (INT16)*(mr->rdParm + 3), (INT16)*(mr->rdParm + 2), | |
| (INT16)*(mr->rdParm + 1), (INT16)*(mr->rdParm)); | |
| break; | |
| case META_ELLIPSE: | |
| Ellipse(hdc, (INT16)*(mr->rdParm + 3), (INT16)*(mr->rdParm + 2), | |
| (INT16)*(mr->rdParm + 1), (INT16)*(mr->rdParm)); | |
| break; | |
| case META_FLOODFILL: | |
| FloodFill(hdc, (INT16)*(mr->rdParm + 3), (INT16)*(mr->rdParm + 2), | |
| MAKELONG(*(mr->rdParm), *(mr->rdParm + 1))); | |
| break; | |
| case META_PIE: | |
| Pie(hdc, (INT16)*(mr->rdParm + 7), (INT16)*(mr->rdParm + 6), | |
| (INT16)*(mr->rdParm + 5), (INT16)*(mr->rdParm + 4), | |
| (INT16)*(mr->rdParm + 3), (INT16)*(mr->rdParm + 2), | |
| (INT16)*(mr->rdParm + 1), (INT16)*(mr->rdParm)); | |
| break; | |
| case META_RECTANGLE: | |
| Rectangle(hdc, (INT16)*(mr->rdParm + 3), (INT16)*(mr->rdParm + 2), | |
| (INT16)*(mr->rdParm + 1), (INT16)*(mr->rdParm)); | |
| break; | |
| case META_ROUNDRECT: | |
| RoundRect(hdc, (INT16)*(mr->rdParm + 5), (INT16)*(mr->rdParm + 4), | |
| (INT16)*(mr->rdParm + 3), (INT16)*(mr->rdParm + 2), | |
| (INT16)*(mr->rdParm + 1), (INT16)*(mr->rdParm)); | |
| break; | |
| case META_PATBLT: | |
| PatBlt16(hdc, *(mr->rdParm + 5), *(mr->rdParm + 4), | |
| *(mr->rdParm + 3), *(mr->rdParm + 2), | |
| MAKELONG(*(mr->rdParm), *(mr->rdParm + 1))); | |
| break; | |
| case META_SAVEDC: | |
| SaveDC(hdc); | |
| break; | |
| case META_SETPIXEL: | |
| SetPixel(hdc, (INT16)*(mr->rdParm + 3), (INT16)*(mr->rdParm + 2), | |
| MAKELONG(*(mr->rdParm), *(mr->rdParm + 1))); | |
| break; | |
| case META_OFFSETCLIPRGN: | |
| OffsetClipRgn16( hdc, *(mr->rdParm + 1), *(mr->rdParm) ); | |
| break; | |
| case META_TEXTOUT: | |
| s1 = *(mr->rdParm); | |
| TextOut16(hdc, *(mr->rdParm + ((s1 + 1) >> 1) + 2), | |
| *(mr->rdParm + ((s1 + 1) >> 1) + 1), | |
| (char *)(mr->rdParm + 1), s1); | |
| break; | |
| case META_POLYGON: | |
| Polygon16(hdc, (LPPOINT16)(mr->rdParm + 1), *(mr->rdParm)); | |
| break; | |
| case META_POLYPOLYGON: | |
| PolyPolygon16(hdc, (LPPOINT16)(mr->rdParm + *(mr->rdParm) + 1), | |
| (LPINT16)(mr->rdParm + 1), *(mr->rdParm)); | |
| break; | |
| case META_POLYLINE: | |
| Polyline16(hdc, (LPPOINT16)(mr->rdParm + 1), *(mr->rdParm)); | |
| break; | |
| case META_RESTOREDC: | |
| RestoreDC(hdc, (INT16)*(mr->rdParm)); | |
| break; | |
| case META_SELECTOBJECT: | |
| SelectObject(hdc, *(ht->objectHandle + *(mr->rdParm))); | |
| break; | |
| case META_CHORD: | |
| Chord(hdc, (INT16)*(mr->rdParm + 7), (INT16)*(mr->rdParm + 6), | |
| (INT16)*(mr->rdParm + 5), (INT16)*(mr->rdParm + 4), | |
| (INT16)*(mr->rdParm + 3), (INT16)*(mr->rdParm + 2), | |
| (INT16)*(mr->rdParm + 1), (INT16)*(mr->rdParm)); | |
| break; | |
| case META_CREATEPATTERNBRUSH: | |
| switch (*(mr->rdParm)) | |
| { | |
| case BS_PATTERN: | |
| infohdr = (BITMAPINFOHEADER *)(mr->rdParm + 2); | |
| MF_AddHandle(ht, nHandles, | |
| CreatePatternBrush(CreateBitmap(infohdr->biWidth, | |
| infohdr->biHeight, | |
| infohdr->biPlanes, | |
| infohdr->biBitCount, | |
| (LPSTR)(mr->rdParm + | |
| (sizeof(BITMAPINFOHEADER) / 2) + 4)))); | |
| break; | |
| case BS_DIBPATTERN: | |
| s1 = mr->rdSize * 2 - sizeof(METARECORD) - 2; | |
| hndl = GlobalAlloc16(GMEM_MOVEABLE, s1); | |
| ptr = GlobalLock16(hndl); | |
| memcpy(ptr, mr->rdParm + 2, s1); | |
| GlobalUnlock16(hndl); | |
| MF_AddHandle(ht, nHandles, | |
| CreateDIBPatternBrush(hndl, *(mr->rdParm + 1))); | |
| GlobalFree16(hndl); | |
| break; | |
| default: | |
| ERR("META_CREATEPATTERNBRUSH: Unknown pattern type %d\n", | |
| mr->rdParm[0]); | |
| break; | |
| } | |
| break; | |
| case META_CREATEPENINDIRECT: | |
| MF_AddHandle(ht, nHandles, | |
| CreatePenIndirect16((LOGPEN16 *)(&(mr->rdParm)))); | |
| break; | |
| case META_CREATEFONTINDIRECT: | |
| MF_AddHandle(ht, nHandles, | |
| CreateFontIndirect16((LOGFONT16 *)(&(mr->rdParm)))); | |
| break; | |
| case META_CREATEBRUSHINDIRECT: | |
| MF_AddHandle(ht, nHandles, | |
| CreateBrushIndirect16((LOGBRUSH16 *)(&(mr->rdParm)))); | |
| break; | |
| case META_CREATEPALETTE: | |
| MF_AddHandle(ht, nHandles, | |
| CreatePalette16((LPLOGPALETTE)mr->rdParm)); | |
| break; | |
| case META_SETTEXTALIGN: | |
| SetTextAlign16(hdc, *(mr->rdParm)); | |
| break; | |
| case META_SELECTPALETTE: | |
| GDISelectPalette16(hdc, *(ht->objectHandle + *(mr->rdParm+1)), | |
| *(mr->rdParm)); | |
| break; | |
| case META_SETMAPPERFLAGS: | |
| SetMapperFlags16(hdc, MAKELONG(mr->rdParm[0],mr->rdParm[1])); | |
| break; | |
| case META_REALIZEPALETTE: | |
| GDIRealizePalette16(hdc); | |
| break; | |
| case META_ESCAPE: | |
| FIXME("META_ESCAPE unimplemented.\n"); | |
| break; | |
| case META_EXTTEXTOUT: | |
| MF_Play_MetaExtTextOut( hdc, mr ); | |
| break; | |
| case META_STRETCHDIB: | |
| { | |
| LPBITMAPINFO info = (LPBITMAPINFO) &(mr->rdParm[11]); | |
| LPSTR bits = (LPSTR)info + DIB_BitmapInfoSize( info, mr->rdParm[2] ); | |
| StretchDIBits16(hdc,mr->rdParm[10],mr->rdParm[9],mr->rdParm[8], | |
| mr->rdParm[7],mr->rdParm[6],mr->rdParm[5], | |
| mr->rdParm[4],mr->rdParm[3],bits,info, | |
| mr->rdParm[2],MAKELONG(mr->rdParm[0],mr->rdParm[1])); | |
| } | |
| break; | |
| case META_DIBSTRETCHBLT: | |
| { | |
| LPBITMAPINFO info = (LPBITMAPINFO) &(mr->rdParm[10]); | |
| LPSTR bits = (LPSTR)info + DIB_BitmapInfoSize( info, mr->rdParm[2] ); | |
| StretchDIBits16(hdc,mr->rdParm[9],mr->rdParm[8],mr->rdParm[7], | |
| mr->rdParm[6],mr->rdParm[5],mr->rdParm[4], | |
| mr->rdParm[3],mr->rdParm[2],bits,info, | |
| DIB_RGB_COLORS,MAKELONG(mr->rdParm[0],mr->rdParm[1])); | |
| } | |
| break; | |
| case META_STRETCHBLT: | |
| { | |
| HDC16 hdcSrc=CreateCompatibleDC16(hdc); | |
| HBITMAP hbitmap=CreateBitmap(mr->rdParm[10], /*Width */ | |
| mr->rdParm[11], /*Height*/ | |
| mr->rdParm[13], /*Planes*/ | |
| mr->rdParm[14], /*BitsPixel*/ | |
| (LPSTR)&mr->rdParm[15]); /*bits*/ | |
| SelectObject(hdcSrc,hbitmap); | |
| StretchBlt16(hdc,mr->rdParm[9],mr->rdParm[8], | |
| mr->rdParm[7],mr->rdParm[6], | |
| hdcSrc,mr->rdParm[5],mr->rdParm[4], | |
| mr->rdParm[3],mr->rdParm[2], | |
| MAKELONG(mr->rdParm[0],mr->rdParm[1])); | |
| DeleteDC(hdcSrc); | |
| } | |
| break; | |
| case META_BITBLT: | |
| { | |
| HDC16 hdcSrc=CreateCompatibleDC16(hdc); | |
| HBITMAP hbitmap=CreateBitmap(mr->rdParm[7]/*Width */, | |
| mr->rdParm[8]/*Height*/, | |
| mr->rdParm[10]/*Planes*/, | |
| mr->rdParm[11]/*BitsPixel*/, | |
| (LPSTR)&mr->rdParm[12]/*bits*/); | |
| SelectObject(hdcSrc,hbitmap); | |
| BitBlt(hdc,(INT16)mr->rdParm[6],(INT16)mr->rdParm[5], | |
| (INT16)mr->rdParm[4],(INT16)mr->rdParm[3], | |
| hdcSrc, (INT16)mr->rdParm[2],(INT16)mr->rdParm[1], | |
| MAKELONG(0,mr->rdParm[0])); | |
| DeleteDC(hdcSrc); | |
| } | |
| break; | |
| case META_CREATEREGION: | |
| { | |
| HRGN hrgn = CreateRectRgn(0,0,0,0); | |
| MF_Play_MetaCreateRegion(mr, hrgn); | |
| MF_AddHandle(ht, nHandles, hrgn); | |
| } | |
| break; | |
| case META_FILLREGION: | |
| FillRgn16(hdc, *(ht->objectHandle + *(mr->rdParm+1)), | |
| *(ht->objectHandle + *(mr->rdParm))); | |
| break; | |
| case META_FRAMEREGION: | |
| FrameRgn16(hdc, *(ht->objectHandle + *(mr->rdParm+3)), | |
| *(ht->objectHandle + *(mr->rdParm+2)), | |
| *(mr->rdParm+1), *(mr->rdParm)); | |
| break; | |
| case META_INVERTREGION: | |
| InvertRgn16(hdc, *(ht->objectHandle + *(mr->rdParm))); | |
| break; | |
| case META_PAINTREGION: | |
| PaintRgn16(hdc, *(ht->objectHandle + *(mr->rdParm))); | |
| break; | |
| case META_SELECTCLIPREGION: | |
| SelectClipRgn(hdc, *(ht->objectHandle + *(mr->rdParm))); | |
| break; | |
| case META_DIBCREATEPATTERNBRUSH: | |
| /* *(mr->rdParm) may be BS_PATTERN or BS_DIBPATTERN: | |
| but there's no difference */ | |
| TRACE("%d\n",*(mr->rdParm)); | |
| s1 = mr->rdSize * 2 - sizeof(METARECORD) - 2; | |
| hndl = GlobalAlloc16(GMEM_MOVEABLE, s1); | |
| ptr = GlobalLock16(hndl); | |
| memcpy(ptr, mr->rdParm + 2, s1); | |
| GlobalUnlock16(hndl); | |
| MF_AddHandle(ht, nHandles, | |
| CreateDIBPatternBrush16(hndl, *(mr->rdParm + 1))); | |
| GlobalFree16(hndl); | |
| break; | |
| case META_DIBBITBLT: | |
| /* In practice I've found that there are two layouts for | |
| META_DIBBITBLT, one (the first here) is the usual one when a src | |
| dc is actually passed to it, the second occurs when the src dc is | |
| passed in as NULL to the creating BitBlt. As the second case has | |
| no dib, a size check will suffice to distinguish. | |
| Caolan.McNamara@ul.ie */ | |
| if (mr->rdSize > 12) { | |
| LPBITMAPINFO info = (LPBITMAPINFO) &(mr->rdParm[8]); | |
| LPSTR bits = (LPSTR)info + DIB_BitmapInfoSize(info, mr->rdParm[0]); | |
| StretchDIBits16(hdc, mr->rdParm[7], mr->rdParm[6], mr->rdParm[5], | |
| mr->rdParm[4], mr->rdParm[3], mr->rdParm[2], | |
| mr->rdParm[5], mr->rdParm[4], bits, info, | |
| DIB_RGB_COLORS, | |
| MAKELONG(mr->rdParm[0], mr->rdParm[1])); | |
| } else { /* equivalent to a PatBlt */ | |
| PatBlt16(hdc, mr->rdParm[8], mr->rdParm[7], | |
| mr->rdParm[6], mr->rdParm[5], | |
| MAKELONG(mr->rdParm[0], mr->rdParm[1])); | |
| } | |
| break; | |
| case META_SETTEXTCHAREXTRA: | |
| SetTextCharacterExtra16(hdc, (INT16)*(mr->rdParm)); | |
| break; | |
| case META_SETTEXTJUSTIFICATION: | |
| SetTextJustification(hdc, *(mr->rdParm + 1), *(mr->rdParm)); | |
| break; | |
| case META_EXTFLOODFILL: | |
| ExtFloodFill(hdc, (INT16)*(mr->rdParm + 4), (INT16)*(mr->rdParm + 3), | |
| MAKELONG(*(mr->rdParm+1), *(mr->rdParm + 2)), | |
| *(mr->rdParm)); | |
| break; | |
| case META_SETDIBTODEV: | |
| { | |
| BITMAPINFO *info = (BITMAPINFO *) &(mr->rdParm[9]); | |
| char *bits = (char *)info + DIB_BitmapInfoSize( info, mr->rdParm[0] ); | |
| SetDIBitsToDevice(hdc, (INT16)mr->rdParm[8], (INT16)mr->rdParm[7], | |
| (INT16)mr->rdParm[6], (INT16)mr->rdParm[5], | |
| (INT16)mr->rdParm[4], (INT16)mr->rdParm[3], | |
| mr->rdParm[2], mr->rdParm[1], bits, info, | |
| mr->rdParm[0]); | |
| break; | |
| } | |
| #define META_UNIMP(x) case x: \ | |
| FIXME("PlayMetaFileRecord:record type "#x" not implemented.\n"); \ | |
| break; | |
| META_UNIMP(META_DRAWTEXT) | |
| META_UNIMP(META_ANIMATEPALETTE) | |
| META_UNIMP(META_SETPALENTRIES) | |
| META_UNIMP(META_RESIZEPALETTE) | |
| META_UNIMP(META_RESETDC) | |
| META_UNIMP(META_STARTDOC) | |
| META_UNIMP(META_STARTPAGE) | |
| META_UNIMP(META_ENDPAGE) | |
| META_UNIMP(META_ABORTDOC) | |
| META_UNIMP(META_ENDDOC) | |
| META_UNIMP(META_CREATEBRUSH) | |
| META_UNIMP(META_CREATEBITMAPINDIRECT) | |
| META_UNIMP(META_CREATEBITMAP) | |
| #undef META_UNIMP | |
| default: | |
| WARN("PlayMetaFileRecord: Unknown record type %x\n", | |
| mr->rdFunction); | |
| } | |
| } | |
| /****************************************************************** | |
| * PlayMetaFileRecord (GDI32.@) | |
| */ | |
| BOOL WINAPI PlayMetaFileRecord( HDC hdc, HANDLETABLE *handletable, | |
| METARECORD *metarecord, UINT handles ) | |
| { | |
| HANDLETABLE16 * ht = (void *)GlobalAlloc(GPTR, | |
| handles*sizeof(HANDLETABLE16)); | |
| unsigned int i = 0; | |
| TRACE("(%08x,%p,%p,%d)\n", hdc, handletable, metarecord, | |
| handles); | |
| for (i=0; i<handles; i++) | |
| ht->objectHandle[i] = handletable->objectHandle[i]; | |
| PlayMetaFileRecord16(hdc, ht, metarecord, handles); | |
| for (i=0; i<handles; i++) | |
| handletable->objectHandle[i] = ht->objectHandle[i]; | |
| GlobalFree((HGLOBAL)ht); | |
| return TRUE; | |
| } | |
| /****************************************************************** | |
| * GetMetaFileBits (GDI.159) | |
| * | |
| * Trade in a metafile object handle for a handle to the metafile memory. | |
| * | |
| */ | |
| HGLOBAL16 WINAPI GetMetaFileBits16( | |
| HMETAFILE16 hmf /* [in] metafile handle */ | |
| ) | |
| { | |
| TRACE("hMem out: %04x\n", hmf); | |
| return hmf; | |
| } | |
| /****************************************************************** | |
| * SetMetaFileBits (GDI.160) | |
| * | |
| * Trade in a metafile memory handle for a handle to a metafile object. | |
| * The memory region should hold a proper metafile, otherwise | |
| * problems will occur when it is used. Validity of the memory is not | |
| * checked. The function is essentially just the identity function. | |
| */ | |
| HMETAFILE16 WINAPI SetMetaFileBits16( | |
| HGLOBAL16 hMem | |
| /* [in] handle to a memory region holding a metafile */ | |
| ) | |
| { | |
| TRACE("hmf out: %04x\n", hMem); | |
| return hMem; | |
| } | |
| /****************************************************************** | |
| * SetMetaFileBitsBetter (GDI.196) | |
| * | |
| * Trade in a metafile memory handle for a handle to a metafile object, | |
| * making a cursory check (using IsValidMetaFile()) that the memory | |
| * handle points to a valid metafile. | |
| * | |
| * RETURNS | |
| * Handle to a metafile on success, NULL on failure.. | |
| */ | |
| HMETAFILE16 WINAPI SetMetaFileBitsBetter16( HMETAFILE16 hMeta ) | |
| { | |
| if( IsValidMetaFile16( hMeta ) ) | |
| return (HMETAFILE16)GlobalReAlloc16( hMeta, 0, | |
| GMEM_SHARE | GMEM_NODISCARD | GMEM_MODIFY); | |
| return (HMETAFILE16)0; | |
| } | |
| /****************************************************************** | |
| * SetMetaFileBitsEx (GDI32.@) | |
| * | |
| * Create a metafile from raw data. No checking of the data is performed. | |
| * Use _GetMetaFileBitsEx_ to get raw data from a metafile. | |
| */ | |
| HMETAFILE WINAPI SetMetaFileBitsEx( | |
| UINT size, /* [in] size of metafile, in bytes */ | |
| const BYTE *lpData /* [in] pointer to metafile data */ | |
| ) | |
| { | |
| METAHEADER *mh = HeapAlloc( GetProcessHeap(), 0, size ); | |
| if (!mh) return 0; | |
| memcpy(mh, lpData, size); | |
| return MF_Create_HMETAFILE(mh); | |
| } | |
| /***************************************************************** | |
| * GetMetaFileBitsEx (GDI32.@) Get raw metafile data | |
| * | |
| * Copies the data from metafile _hmf_ into the buffer _buf_. | |
| * If _buf_ is zero, returns size of buffer required. Otherwise, | |
| * returns number of bytes copied. | |
| */ | |
| UINT WINAPI GetMetaFileBitsEx( | |
| HMETAFILE hmf, /* [in] metafile */ | |
| UINT nSize, /* [in] size of buf */ | |
| LPVOID buf /* [out] buffer to receive raw metafile data */ | |
| ) { | |
| METAHEADER *mh = MF_GetMetaHeader(hmf); | |
| UINT mfSize; | |
| TRACE("(%08x,%d,%p)\n", hmf, nSize, buf); | |
| if (!mh) return 0; /* FIXME: error code */ | |
| if(mh->mtType == METAFILE_DISK) | |
| FIXME("Disk-based metafile?\n"); | |
| mfSize = mh->mtSize * 2; | |
| if (!buf) { | |
| MF_ReleaseMetaHeader(hmf); | |
| TRACE("returning size %d\n", mfSize); | |
| return mfSize; | |
| } | |
| if(mfSize > nSize) mfSize = nSize; | |
| memmove(buf, mh, mfSize); | |
| MF_ReleaseMetaHeader(hmf); | |
| return mfSize; | |
| } | |
| /****************************************************************** | |
| * GetWinMetaFileBits [GDI32.@] | |
| */ | |
| UINT WINAPI GetWinMetaFileBits(HENHMETAFILE hemf, | |
| UINT cbBuffer, LPBYTE lpbBuffer, | |
| INT fnMapMode, HDC hdcRef) | |
| { | |
| FIXME("(%d,%d,%p,%d,%d): stub\n", | |
| hemf, cbBuffer, lpbBuffer, fnMapMode, hdcRef); | |
| return 0; | |
| } | |
| /****************************************************************** | |
| * MF_Play_MetaCreateRegion | |
| * | |
| * Handles META_CREATEREGION for PlayMetaFileRecord(). | |
| */ | |
| /* | |
| * The layout of the record looks something like this: | |
| * | |
| * rdParm meaning | |
| * 0 Always 0? | |
| * 1 Always 6? | |
| * 2 Looks like a handle? - not constant | |
| * 3 0 or 1 ?? | |
| * 4 Total number of bytes | |
| * 5 No. of separate bands = n [see below] | |
| * 6 Largest number of x co-ords in a band | |
| * 7-10 Bounding box x1 y1 x2 y2 | |
| * 11-... n bands | |
| * | |
| * Regions are divided into bands that are uniform in the | |
| * y-direction. Each band consists of pairs of on/off x-coords and is | |
| * written as | |
| * m y0 y1 x1 x2 x3 ... xm m | |
| * into successive rdParm[]s. | |
| * | |
| * This is probably just a dump of the internal RGNOBJ? | |
| * | |
| * HDMD - 18/12/97 | |
| * | |
| */ | |
| static BOOL MF_Play_MetaCreateRegion( METARECORD *mr, HRGN hrgn ) | |
| { | |
| WORD band, pair; | |
| WORD *start, *end; | |
| INT16 y0, y1; | |
| HRGN hrgn2 = CreateRectRgn( 0, 0, 0, 0 ); | |
| for(band = 0, start = &(mr->rdParm[11]); band < mr->rdParm[5]; | |
| band++, start = end + 1) { | |
| if(*start / 2 != (*start + 1) / 2) { | |
| WARN("Delimiter not even.\n"); | |
| DeleteObject( hrgn2 ); | |
| return FALSE; | |
| } | |
| end = start + *start + 3; | |
| if(end > (WORD *)mr + mr->rdSize) { | |
| WARN("End points outside record.\n"); | |
| DeleteObject( hrgn2 ); | |
| return FALSE; | |
| } | |
| if(*start != *end) { | |
| WARN("Mismatched delimiters.\n"); | |
| DeleteObject( hrgn2 ); | |
| return FALSE; | |
| } | |
| y0 = *(INT16 *)(start + 1); | |
| y1 = *(INT16 *)(start + 2); | |
| for(pair = 0; pair < *start / 2; pair++) { | |
| SetRectRgn( hrgn2, *(INT16 *)(start + 3 + 2*pair), y0, | |
| *(INT16 *)(start + 4 + 2*pair), y1 ); | |
| CombineRgn(hrgn, hrgn, hrgn2, RGN_OR); | |
| } | |
| } | |
| DeleteObject( hrgn2 ); | |
| return TRUE; | |
| } | |
| /****************************************************************** | |
| * MF_Play_MetaExtTextOut | |
| * | |
| * Handles META_EXTTEXTOUT for PlayMetaFileRecord(). | |
| */ | |
| static BOOL MF_Play_MetaExtTextOut(HDC16 hdc, METARECORD *mr) | |
| { | |
| LPINT16 dxx; | |
| LPSTR sot; | |
| DWORD len; | |
| WORD s1; | |
| s1 = mr->rdParm[2]; /* String length */ | |
| len = sizeof(METARECORD) + (((s1 + 1) >> 1) * 2) + 2 * sizeof(short) | |
| + sizeof(UINT16) + (mr->rdParm[3] ? sizeof(RECT16) : 0); | |
| /* rec len without dx array */ | |
| sot = (LPSTR)&mr->rdParm[4]; /* start_of_text */ | |
| if (mr->rdParm[3]) | |
| sot += sizeof(RECT16); /* there is a rectangle, so add offset */ | |
| if (mr->rdSize == len / 2) | |
| dxx = NULL; /* determine if array present */ | |
| else | |
| if (mr->rdSize == (len + s1 * sizeof(INT16)) / 2) | |
| dxx = (LPINT16)(sot+(((s1+1)>>1)*2)); | |
| else { | |
| TRACE("%s len: %ld\n", sot, mr->rdSize); | |
| WARN( | |
| "Please report: ExtTextOut len=%ld slen=%d rdSize=%ld opt=%04x\n", | |
| len, s1, mr->rdSize, mr->rdParm[3]); | |
| dxx = NULL; /* should't happen -- but if, we continue with NULL */ | |
| } | |
| ExtTextOut16( hdc, mr->rdParm[1], /* X position */ | |
| mr->rdParm[0], /* Y position */ | |
| mr->rdParm[3], /* options */ | |
| mr->rdParm[3] ? (LPRECT16) &mr->rdParm[4]:NULL, | |
| /* rectangle */ | |
| sot, /* string */ | |
| s1, dxx); /* length, dx array */ | |
| if (dxx) | |
| TRACE("%s len: %ld dx0: %d\n", sot, mr->rdSize, dxx[0]); | |
| return TRUE; | |
| } |