1550 lines
46 KiB
C
1550 lines
46 KiB
C
/*
|
|
* Metafile functions
|
|
*
|
|
* Copyright David W. Metcalfe, 1994
|
|
* Niels de Carpentier, Albrecht Kleine, Huw Davies 1996
|
|
*
|
|
* This library is free software; you can redistribute it and/or
|
|
* modify it under the terms of the GNU Lesser General Public
|
|
* License as published by the Free Software Foundation; either
|
|
* version 2.1 of the License, or (at your option) any later version.
|
|
*
|
|
* This library is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
* Lesser General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU Lesser General Public
|
|
* License along with this library; if not, write to the Free Software
|
|
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
|
*/
|
|
|
|
/*
|
|
* 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 "config.h"
|
|
|
|
#include <string.h>
|
|
#include <fcntl.h>
|
|
|
|
#include "wine/winbase16.h"
|
|
#include "wine/wingdi16.h"
|
|
#include "bitmap.h"
|
|
#include "wownt32.h"
|
|
#include "winreg.h"
|
|
#include "winternl.h"
|
|
#include "gdi_private.h"
|
|
#include "wine/debug.h"
|
|
|
|
WINE_DEFAULT_DEBUG_CHANNEL(metafile);
|
|
|
|
#include "pshpack1.h"
|
|
typedef struct
|
|
{
|
|
DWORD dw1, dw2, dw3;
|
|
WORD w4;
|
|
CHAR filename[0x100];
|
|
} METAHEADERDISK;
|
|
#include "poppack.h"
|
|
|
|
typedef struct
|
|
{
|
|
GDIOBJHDR header;
|
|
METAHEADER *mh;
|
|
} METAFILEOBJ;
|
|
|
|
#define MFHEADERSIZE (sizeof(METAHEADER))
|
|
#define MFVERSION 0x300
|
|
|
|
|
|
/******************************************************************
|
|
* MF_AddHandle
|
|
*
|
|
* Add a handle to an external handle table and return the index
|
|
*/
|
|
static int MF_AddHandle(HANDLETABLE *ht, UINT htlen, HGDIOBJ 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,
|
|
(HGDIOBJ *)&hmf, NULL );
|
|
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
|
|
*/
|
|
static METAHEADER *MF_GetMetaHeader( HMETAFILE hmf )
|
|
{
|
|
METAHEADER *ret = NULL;
|
|
METAFILEOBJ * metaObj = (METAFILEOBJ *)GDI_GetObjPtr( hmf, METAFILE_MAGIC );
|
|
if (metaObj)
|
|
{
|
|
ret = metaObj->mh;
|
|
GDI_ReleaseObj( hmf );
|
|
}
|
|
return ret;
|
|
}
|
|
|
|
/******************************************************************
|
|
* 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_ReleaseMetaHeader16
|
|
*
|
|
* Releases METAHEADER associated with HMETAFILE16
|
|
*/
|
|
static BOOL16 MF_ReleaseMetaHeader16( HMETAFILE16 hmf )
|
|
{
|
|
return GlobalUnlock16( hmf );
|
|
}
|
|
|
|
|
|
/******************************************************************
|
|
* convert_points
|
|
*
|
|
* Convert an array of POINT16 to an array of POINT.
|
|
* Result must be freed by caller.
|
|
*/
|
|
static POINT *convert_points( UINT count, POINT16 *pt16 )
|
|
{
|
|
UINT i;
|
|
POINT *ret = HeapAlloc( GetProcessHeap(), 0, count * sizeof(*ret) );
|
|
if (ret)
|
|
{
|
|
for (i = 0; i < count; i++)
|
|
{
|
|
ret[i].x = pt16[i].x;
|
|
ret[i].y = pt16[i].y;
|
|
}
|
|
}
|
|
return ret;
|
|
}
|
|
|
|
|
|
/******************************************************************
|
|
* DeleteMetaFile (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(HANDLE 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;
|
|
}
|
|
|
|
/******************************************************************
|
|
* GetMetaFile (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;
|
|
}
|
|
|
|
/******************************************************************
|
|
* CopyMetaFile (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 );
|
|
}
|
|
|
|
|
|
/******************************************************************
|
|
* CopyMetaFileW (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 CopyMetaFileW(
|
|
HMETAFILE hSrcMetaFile, /* [in] handle of metafile to copy */
|
|
LPCWSTR lpFilename /* [in] filename if copying to a file */
|
|
) {
|
|
METAHEADER *mh = MF_GetMetaHeader( hSrcMetaFile );
|
|
METAHEADER *mh2 = NULL;
|
|
HANDLE hFile;
|
|
|
|
TRACE("(%p,%s)\n", hSrcMetaFile, debugstr_w(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 );
|
|
}
|
|
|
|
if(lpFilename) { /* disk based metafile */
|
|
DWORD len;
|
|
LPSTR lpFilenameA;
|
|
if((hFile = CreateFileW(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);
|
|
len = WideCharToMultiByte(CP_ACP, 0, lpFilename, -1, NULL, 0, NULL, NULL);
|
|
lpFilenameA = HeapAlloc(GetProcessHeap(), 0, len);
|
|
WideCharToMultiByte(CP_ACP, 0, lpFilename, -1, lpFilenameA, len, NULL, NULL);
|
|
mh2 = MF_CreateMetaHeaderDisk(mh2, lpFilenameA);
|
|
HeapFree(GetProcessHeap(), 0, lpFilenameA);
|
|
}
|
|
|
|
return MF_Create_HMETAFILE( mh2 );
|
|
}
|
|
|
|
|
|
/******************************************************************
|
|
* CopyMetaFileA (GDI32.@)
|
|
*/
|
|
HMETAFILE WINAPI CopyMetaFileA( HMETAFILE hSrcMetaFile,
|
|
LPCSTR lpFilename )
|
|
{
|
|
UNICODE_STRING lpFilenameW;
|
|
HMETAFILE ret = 0;
|
|
|
|
if (lpFilename) RtlCreateUnicodeStringFromAsciiz(&lpFilenameW, lpFilename);
|
|
else lpFilenameW.Buffer = NULL;
|
|
|
|
if (lpFilenameW.Buffer) {
|
|
ret = CopyMetaFileW( hSrcMetaFile, lpFilenameW.Buffer );
|
|
}
|
|
RtlFreeUnicodeString(&lpFilenameW);
|
|
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;
|
|
HANDLETABLE *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(HANDLETABLE) * 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;
|
|
PlayMetaFileRecord( 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;
|
|
}
|
|
|
|
/******************************************************************
|
|
* PlayMetaFile (GDI.123)
|
|
*
|
|
*/
|
|
BOOL16 WINAPI PlayMetaFile16( HDC16 hdc, HMETAFILE16 hmf )
|
|
{
|
|
BOOL16 ret;
|
|
METAHEADER *mh = MF_GetMetaHeader16( hmf );
|
|
ret = MF_PlayMetaFile( HDC_32(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 */
|
|
)
|
|
{
|
|
METAHEADER *mh = MF_GetMetaHeader( hmf );
|
|
return MF_PlayMetaFile( hdc, mh );
|
|
}
|
|
|
|
|
|
/******************************************************************
|
|
* EnumMetaFile (GDI.175)
|
|
*
|
|
*/
|
|
BOOL16 WINAPI EnumMetaFile16( HDC16 hdc16, HMETAFILE16 hmf,
|
|
MFENUMPROC16 lpEnumFunc, LPARAM lpData )
|
|
{
|
|
METAHEADER *mh = MF_GetMetaHeader16(hmf);
|
|
METARECORD *mr;
|
|
HANDLETABLE16 *ht;
|
|
HDC hdc = HDC_32(hdc16);
|
|
HGLOBAL16 hHT;
|
|
SEGPTR spht;
|
|
unsigned int offset = 0;
|
|
WORD i, seg;
|
|
HPEN hPen;
|
|
HBRUSH hBrush;
|
|
HFONT hFont;
|
|
WORD args[8];
|
|
BOOL16 result = TRUE, loaded = FALSE;
|
|
|
|
TRACE("(%p, %04x, %p, %08lx)\n", hdc, hmf, 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 */
|
|
|
|
args[7] = hdc16;
|
|
args[6] = SELECTOROF(spht);
|
|
args[5] = OFFSETOF(spht);
|
|
args[4] = seg + (HIWORD(offset) << __AHSHIFT);
|
|
args[3] = LOWORD(offset);
|
|
args[2] = mh->mtNoObjects;
|
|
args[1] = HIWORD(lpData);
|
|
args[0] = LOWORD(lpData);
|
|
|
|
while (offset < (mh->mtSize * 2))
|
|
{
|
|
DWORD ret;
|
|
|
|
mr = (METARECORD *)((char *)mh + offset);
|
|
|
|
WOWCallback16Ex( (DWORD)lpEnumFunc, WCB16_PASCAL, sizeof(args), args, &ret );
|
|
if (!LOWORD(ret))
|
|
{
|
|
result = FALSE;
|
|
break;
|
|
}
|
|
|
|
offset += (mr->rdSize * 2);
|
|
args[4] = seg + (HIWORD(offset) << __AHSHIFT);
|
|
args[3] = LOWORD(offset);
|
|
}
|
|
|
|
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( (HGDIOBJ)(ULONG_PTR)(*(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("(%p,%p,%p,%p)\n", hdc, hmf, lpEnumFunc, (void*)lpData);
|
|
if (!mh) return 0;
|
|
if(mh->mtType == METAFILE_DISK)
|
|
{
|
|
/* Create a memory-based copy */
|
|
if (!(mhTemp = MF_LoadDiskBasedMetaFile(mh))) return FALSE;
|
|
mh = mhTemp;
|
|
}
|
|
|
|
/* 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);
|
|
if(mr->rdFunction == META_EOF) {
|
|
TRACE("Got META_EOF so stopping\n");
|
|
break;
|
|
}
|
|
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 */
|
|
if (mhTemp) HeapFree( GetProcessHeap(), 0, mhTemp );
|
|
return result;
|
|
}
|
|
|
|
static BOOL MF_Play_MetaCreateRegion( METARECORD *mr, HRGN hrgn );
|
|
static BOOL MF_Play_MetaExtTextOut(HDC hdc, METARECORD *mr);
|
|
/******************************************************************
|
|
* PlayMetaFileRecord (GDI32.@)
|
|
*
|
|
* Render a single metafile record specified by *mr in the DC hdc, while
|
|
* using the handle table *ht, of length handles,
|
|
* 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.
|
|
*/
|
|
BOOL WINAPI PlayMetaFileRecord( HDC hdc, HANDLETABLE *ht, METARECORD *mr, UINT handles )
|
|
{
|
|
short s1;
|
|
POINT *pt;
|
|
BITMAPINFOHEADER *infohdr;
|
|
|
|
TRACE("(%p %p %p %u) function %04x\n", hdc, ht, mr, handles, mr->rdFunction);
|
|
|
|
switch (mr->rdFunction)
|
|
{
|
|
case META_EOF:
|
|
break;
|
|
|
|
case META_DELETEOBJECT:
|
|
DeleteObject(*(ht->objectHandle + mr->rdParm[0]));
|
|
*(ht->objectHandle + mr->rdParm[0]) = 0;
|
|
break;
|
|
|
|
case META_SETBKCOLOR:
|
|
SetBkColor(hdc, MAKELONG(mr->rdParm[0], mr->rdParm[1]));
|
|
break;
|
|
|
|
case META_SETBKMODE:
|
|
SetBkMode(hdc, mr->rdParm[0]);
|
|
break;
|
|
|
|
case META_SETMAPMODE:
|
|
SetMapMode(hdc, mr->rdParm[0]);
|
|
break;
|
|
|
|
case META_SETROP2:
|
|
SetROP2(hdc, mr->rdParm[0]);
|
|
break;
|
|
|
|
case META_SETRELABS:
|
|
SetRelAbs(hdc, mr->rdParm[0]);
|
|
break;
|
|
|
|
case META_SETPOLYFILLMODE:
|
|
SetPolyFillMode(hdc, mr->rdParm[0]);
|
|
break;
|
|
|
|
case META_SETSTRETCHBLTMODE:
|
|
SetStretchBltMode(hdc, mr->rdParm[0]);
|
|
break;
|
|
|
|
case META_SETTEXTCOLOR:
|
|
SetTextColor(hdc, MAKELONG(mr->rdParm[0], mr->rdParm[1]));
|
|
break;
|
|
|
|
case META_SETWINDOWORG:
|
|
SetWindowOrgEx(hdc, (SHORT)mr->rdParm[1], (SHORT)mr->rdParm[0], NULL);
|
|
break;
|
|
|
|
case META_SETWINDOWEXT:
|
|
SetWindowExtEx(hdc, (SHORT)mr->rdParm[1], (SHORT)mr->rdParm[0], NULL);
|
|
break;
|
|
|
|
case META_SETVIEWPORTORG:
|
|
SetViewportOrgEx(hdc, (SHORT)mr->rdParm[1], (SHORT)mr->rdParm[0], NULL);
|
|
break;
|
|
|
|
case META_SETVIEWPORTEXT:
|
|
SetViewportExtEx(hdc, (SHORT)mr->rdParm[1], (SHORT)mr->rdParm[0], NULL);
|
|
break;
|
|
|
|
case META_OFFSETWINDOWORG:
|
|
OffsetWindowOrgEx(hdc, (SHORT)mr->rdParm[1], (SHORT)mr->rdParm[0], NULL);
|
|
break;
|
|
|
|
case META_SCALEWINDOWEXT:
|
|
ScaleWindowExtEx(hdc, (SHORT)mr->rdParm[3], (SHORT)mr->rdParm[2],
|
|
(SHORT)mr->rdParm[1], (SHORT)mr->rdParm[0], NULL);
|
|
break;
|
|
|
|
case META_OFFSETVIEWPORTORG:
|
|
OffsetViewportOrgEx(hdc, (SHORT)mr->rdParm[1], (SHORT)mr->rdParm[0], NULL);
|
|
break;
|
|
|
|
case META_SCALEVIEWPORTEXT:
|
|
ScaleViewportExtEx(hdc, (SHORT)mr->rdParm[3], (SHORT)mr->rdParm[2],
|
|
(SHORT)mr->rdParm[1], (SHORT)mr->rdParm[0], NULL);
|
|
break;
|
|
|
|
case META_LINETO:
|
|
LineTo(hdc, (SHORT)mr->rdParm[1], (SHORT)mr->rdParm[0]);
|
|
break;
|
|
|
|
case META_MOVETO:
|
|
MoveToEx(hdc, (SHORT)mr->rdParm[1], (SHORT)mr->rdParm[0], NULL);
|
|
break;
|
|
|
|
case META_EXCLUDECLIPRECT:
|
|
ExcludeClipRect( hdc, (SHORT)mr->rdParm[3], (SHORT)mr->rdParm[2],
|
|
(SHORT)mr->rdParm[1], (SHORT)mr->rdParm[0] );
|
|
break;
|
|
|
|
case META_INTERSECTCLIPRECT:
|
|
IntersectClipRect( hdc, (SHORT)mr->rdParm[3], (SHORT)mr->rdParm[2],
|
|
(SHORT)mr->rdParm[1], (SHORT)mr->rdParm[0] );
|
|
break;
|
|
|
|
case META_ARC:
|
|
Arc(hdc, (SHORT)mr->rdParm[7], (SHORT)mr->rdParm[6],
|
|
(SHORT)mr->rdParm[5], (SHORT)mr->rdParm[4],
|
|
(SHORT)mr->rdParm[3], (SHORT)mr->rdParm[2],
|
|
(SHORT)mr->rdParm[1], (SHORT)mr->rdParm[0]);
|
|
break;
|
|
|
|
case META_ELLIPSE:
|
|
Ellipse(hdc, (SHORT)mr->rdParm[3], (SHORT)mr->rdParm[2],
|
|
(SHORT)mr->rdParm[1], (SHORT)mr->rdParm[0]);
|
|
break;
|
|
|
|
case META_FLOODFILL:
|
|
FloodFill(hdc, (SHORT)mr->rdParm[3], (SHORT)mr->rdParm[2],
|
|
MAKELONG(mr->rdParm[0], mr->rdParm[1]));
|
|
break;
|
|
|
|
case META_PIE:
|
|
Pie(hdc, (SHORT)mr->rdParm[7], (SHORT)mr->rdParm[6],
|
|
(SHORT)mr->rdParm[5], (SHORT)mr->rdParm[4],
|
|
(SHORT)mr->rdParm[3], (SHORT)mr->rdParm[2],
|
|
(SHORT)mr->rdParm[1], (SHORT)mr->rdParm[0]);
|
|
break;
|
|
|
|
case META_RECTANGLE:
|
|
Rectangle(hdc, (SHORT)mr->rdParm[3], (SHORT)mr->rdParm[2],
|
|
(SHORT)mr->rdParm[1], (SHORT)mr->rdParm[0]);
|
|
break;
|
|
|
|
case META_ROUNDRECT:
|
|
RoundRect(hdc, (SHORT)mr->rdParm[5], (SHORT)mr->rdParm[4],
|
|
(SHORT)mr->rdParm[3], (SHORT)mr->rdParm[2],
|
|
(SHORT)mr->rdParm[1], (SHORT)mr->rdParm[0]);
|
|
break;
|
|
|
|
case META_PATBLT:
|
|
PatBlt(hdc, (SHORT)mr->rdParm[5], (SHORT)mr->rdParm[4],
|
|
(SHORT)mr->rdParm[3], (SHORT)mr->rdParm[2],
|
|
MAKELONG(mr->rdParm[0], mr->rdParm[1]));
|
|
break;
|
|
|
|
case META_SAVEDC:
|
|
SaveDC(hdc);
|
|
break;
|
|
|
|
case META_SETPIXEL:
|
|
SetPixel(hdc, (SHORT)mr->rdParm[3], (SHORT)mr->rdParm[2],
|
|
MAKELONG(mr->rdParm[0], mr->rdParm[1]));
|
|
break;
|
|
|
|
case META_OFFSETCLIPRGN:
|
|
OffsetClipRgn( hdc, (SHORT)mr->rdParm[1], (SHORT)mr->rdParm[0] );
|
|
break;
|
|
|
|
case META_TEXTOUT:
|
|
s1 = mr->rdParm[0];
|
|
TextOutA(hdc, (SHORT)mr->rdParm[((s1 + 1) >> 1) + 2],
|
|
(SHORT)mr->rdParm[((s1 + 1) >> 1) + 1],
|
|
(char *)(mr->rdParm + 1), s1);
|
|
break;
|
|
|
|
case META_POLYGON:
|
|
if ((pt = convert_points( mr->rdParm[0], (LPPOINT16)(mr->rdParm + 1))))
|
|
{
|
|
Polygon(hdc, pt, mr->rdParm[0]);
|
|
HeapFree( GetProcessHeap(), 0, pt );
|
|
}
|
|
break;
|
|
|
|
case META_POLYPOLYGON:
|
|
{
|
|
UINT i, total;
|
|
SHORT *counts = (SHORT *)(mr->rdParm + 1);
|
|
|
|
for (i = total = 0; i < mr->rdParm[0]; i++) total += counts[i];
|
|
pt = convert_points( total, (LPPOINT16)(counts + mr->rdParm[0]) );
|
|
if (pt)
|
|
{
|
|
INT *cnt32 = HeapAlloc( GetProcessHeap(), 0, mr->rdParm[0] * sizeof(*cnt32) );
|
|
if (cnt32)
|
|
{
|
|
for (i = 0; i < mr->rdParm[0]; i++) cnt32[i] = counts[i];
|
|
PolyPolygon( hdc, pt, cnt32, mr->rdParm[0]);
|
|
HeapFree( GetProcessHeap(), 0, cnt32 );
|
|
}
|
|
}
|
|
HeapFree( GetProcessHeap(), 0, pt );
|
|
}
|
|
break;
|
|
|
|
case META_POLYLINE:
|
|
if ((pt = convert_points( mr->rdParm[0], (LPPOINT16)(mr->rdParm + 1))))
|
|
{
|
|
Polyline( hdc, pt, mr->rdParm[0] );
|
|
HeapFree( GetProcessHeap(), 0, pt );
|
|
}
|
|
break;
|
|
|
|
case META_RESTOREDC:
|
|
RestoreDC(hdc, (SHORT)mr->rdParm[0]);
|
|
break;
|
|
|
|
case META_SELECTOBJECT:
|
|
SelectObject(hdc, *(ht->objectHandle + mr->rdParm[0]));
|
|
break;
|
|
|
|
case META_CHORD:
|
|
Chord(hdc, (SHORT)mr->rdParm[7], (SHORT)mr->rdParm[6],
|
|
(SHORT)mr->rdParm[5], (SHORT)mr->rdParm[4],
|
|
(SHORT)mr->rdParm[3], (SHORT)mr->rdParm[2],
|
|
(SHORT)mr->rdParm[1], (SHORT)mr->rdParm[0]);
|
|
break;
|
|
|
|
case META_CREATEPATTERNBRUSH:
|
|
switch (mr->rdParm[0])
|
|
{
|
|
case BS_PATTERN:
|
|
infohdr = (BITMAPINFOHEADER *)(mr->rdParm + 2);
|
|
MF_AddHandle(ht, handles,
|
|
CreatePatternBrush(CreateBitmap(infohdr->biWidth,
|
|
infohdr->biHeight,
|
|
infohdr->biPlanes,
|
|
infohdr->biBitCount,
|
|
(LPSTR)(mr->rdParm +
|
|
(sizeof(BITMAPINFOHEADER) / 2) + 4))));
|
|
break;
|
|
|
|
case BS_DIBPATTERN:
|
|
infohdr = (BITMAPINFOHEADER *)(mr->rdParm + 2);
|
|
MF_AddHandle(ht, handles, CreateDIBPatternBrushPt( infohdr, mr->rdParm[1] ));
|
|
break;
|
|
|
|
default:
|
|
ERR("META_CREATEPATTERNBRUSH: Unknown pattern type %d\n",
|
|
mr->rdParm[0]);
|
|
break;
|
|
}
|
|
break;
|
|
|
|
case META_CREATEPENINDIRECT:
|
|
{
|
|
LOGPEN pen;
|
|
pen.lopnStyle = mr->rdParm[0];
|
|
pen.lopnWidth.x = (SHORT)mr->rdParm[1];
|
|
pen.lopnWidth.y = (SHORT)mr->rdParm[2];
|
|
pen.lopnColor = MAKELONG( mr->rdParm[3], mr->rdParm[4] );
|
|
MF_AddHandle(ht, handles, CreatePenIndirect( &pen ));
|
|
}
|
|
break;
|
|
|
|
case META_CREATEFONTINDIRECT:
|
|
{
|
|
LOGFONTA font;
|
|
font.lfHeight = (SHORT)mr->rdParm[0];
|
|
font.lfWidth = (SHORT)mr->rdParm[1];
|
|
font.lfEscapement = (SHORT)mr->rdParm[2];
|
|
font.lfOrientation = (SHORT)mr->rdParm[3];
|
|
font.lfWeight = (SHORT)mr->rdParm[4];
|
|
font.lfItalic = LOBYTE(mr->rdParm[5]);
|
|
font.lfUnderline = HIBYTE(mr->rdParm[5]);
|
|
font.lfStrikeOut = LOBYTE(mr->rdParm[6]);
|
|
font.lfCharSet = HIBYTE(mr->rdParm[6]);
|
|
font.lfOutPrecision = LOBYTE(mr->rdParm[7]);
|
|
font.lfClipPrecision = HIBYTE(mr->rdParm[7]);
|
|
font.lfQuality = LOBYTE(mr->rdParm[8]);
|
|
font.lfPitchAndFamily = HIBYTE(mr->rdParm[8]);
|
|
memcpy( font.lfFaceName, mr->rdParm + 9, LF_FACESIZE );
|
|
MF_AddHandle(ht, handles, CreateFontIndirectA( &font ));
|
|
}
|
|
break;
|
|
|
|
case META_CREATEBRUSHINDIRECT:
|
|
{
|
|
LOGBRUSH brush;
|
|
brush.lbStyle = mr->rdParm[0];
|
|
brush.lbColor = MAKELONG( mr->rdParm[1], mr->rdParm[2] );
|
|
brush.lbHatch = mr->rdParm[3];
|
|
MF_AddHandle(ht, handles, CreateBrushIndirect( &brush ));
|
|
}
|
|
break;
|
|
|
|
case META_CREATEPALETTE:
|
|
MF_AddHandle(ht, handles, CreatePalette((LPLOGPALETTE)mr->rdParm));
|
|
break;
|
|
|
|
case META_SETTEXTALIGN:
|
|
SetTextAlign(hdc, mr->rdParm[0]);
|
|
break;
|
|
|
|
case META_SELECTPALETTE:
|
|
GDISelectPalette(hdc, *(ht->objectHandle + mr->rdParm[1]), mr->rdParm[0]);
|
|
break;
|
|
|
|
case META_SETMAPPERFLAGS:
|
|
SetMapperFlags(hdc, MAKELONG(mr->rdParm[0],mr->rdParm[1]));
|
|
break;
|
|
|
|
case META_REALIZEPALETTE:
|
|
GDIRealizePalette(hdc);
|
|
break;
|
|
|
|
case META_ESCAPE:
|
|
Escape(hdc, mr->rdParm[0], mr->rdParm[1], (LPCSTR)&mr->rdParm[2], NULL);
|
|
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] );
|
|
StretchDIBits( hdc, (SHORT)mr->rdParm[10], (SHORT)mr->rdParm[9], (SHORT)mr->rdParm[8],
|
|
(SHORT)mr->rdParm[7], (SHORT)mr->rdParm[6], (SHORT)mr->rdParm[5],
|
|
(SHORT)mr->rdParm[4], (SHORT)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] );
|
|
StretchDIBits( hdc, (SHORT)mr->rdParm[9], (SHORT)mr->rdParm[8], (SHORT)mr->rdParm[7],
|
|
(SHORT)mr->rdParm[6], (SHORT)mr->rdParm[5], (SHORT)mr->rdParm[4],
|
|
(SHORT)mr->rdParm[3], (SHORT)mr->rdParm[2], bits, info,
|
|
DIB_RGB_COLORS,MAKELONG(mr->rdParm[0],mr->rdParm[1]));
|
|
}
|
|
break;
|
|
|
|
case META_STRETCHBLT:
|
|
{
|
|
HDC hdcSrc = CreateCompatibleDC(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);
|
|
StretchBlt(hdc, (SHORT)mr->rdParm[9], (SHORT)mr->rdParm[8],
|
|
(SHORT)mr->rdParm[7], (SHORT)mr->rdParm[6],
|
|
hdcSrc, (SHORT)mr->rdParm[5], (SHORT)mr->rdParm[4],
|
|
(SHORT)mr->rdParm[3], (SHORT)mr->rdParm[2],
|
|
MAKELONG(mr->rdParm[0],mr->rdParm[1]));
|
|
DeleteDC(hdcSrc);
|
|
}
|
|
break;
|
|
|
|
case META_BITBLT:
|
|
{
|
|
HDC hdcSrc = CreateCompatibleDC(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,(SHORT)mr->rdParm[6],(SHORT)mr->rdParm[5],
|
|
(SHORT)mr->rdParm[4],(SHORT)mr->rdParm[3],
|
|
hdcSrc, (SHORT)mr->rdParm[2],(SHORT)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, handles, hrgn);
|
|
}
|
|
break;
|
|
|
|
case META_FILLREGION:
|
|
FillRgn(hdc, *(ht->objectHandle + mr->rdParm[1]),
|
|
*(ht->objectHandle + mr->rdParm[0]));
|
|
break;
|
|
|
|
case META_FRAMEREGION:
|
|
FrameRgn(hdc, *(ht->objectHandle + mr->rdParm[3]),
|
|
*(ht->objectHandle + mr->rdParm[2]),
|
|
(SHORT)mr->rdParm[1], (SHORT)mr->rdParm[0]);
|
|
break;
|
|
|
|
case META_INVERTREGION:
|
|
InvertRgn(hdc, *(ht->objectHandle + mr->rdParm[0]));
|
|
break;
|
|
|
|
case META_PAINTREGION:
|
|
PaintRgn(hdc, *(ht->objectHandle + mr->rdParm[0]));
|
|
break;
|
|
|
|
case META_SELECTCLIPREGION:
|
|
SelectClipRgn(hdc, *(ht->objectHandle + mr->rdParm[0]));
|
|
break;
|
|
|
|
case META_DIBCREATEPATTERNBRUSH:
|
|
/* mr->rdParm[0] may be BS_PATTERN or BS_DIBPATTERN:
|
|
but there's no difference */
|
|
MF_AddHandle(ht, handles, CreateDIBPatternBrushPt( mr->rdParm + 2, mr->rdParm[1] ));
|
|
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]);
|
|
|
|
StretchDIBits(hdc, (SHORT)mr->rdParm[7], (SHORT)mr->rdParm[6], (SHORT)mr->rdParm[5],
|
|
(SHORT)mr->rdParm[4], (SHORT)mr->rdParm[3], (SHORT)mr->rdParm[2],
|
|
(SHORT)mr->rdParm[5], (SHORT)mr->rdParm[4], bits, info,
|
|
DIB_RGB_COLORS, MAKELONG(mr->rdParm[0], mr->rdParm[1]));
|
|
}
|
|
else /* equivalent to a PatBlt */
|
|
PatBlt(hdc, (SHORT)mr->rdParm[8], (SHORT)mr->rdParm[7],
|
|
(SHORT)mr->rdParm[6], (SHORT)mr->rdParm[5],
|
|
MAKELONG(mr->rdParm[0], mr->rdParm[1]));
|
|
break;
|
|
|
|
case META_SETTEXTCHAREXTRA:
|
|
SetTextCharacterExtra(hdc, (SHORT)mr->rdParm[0]);
|
|
break;
|
|
|
|
case META_SETTEXTJUSTIFICATION:
|
|
SetTextJustification(hdc, (SHORT)mr->rdParm[1], (SHORT)mr->rdParm[0]);
|
|
break;
|
|
|
|
case META_EXTFLOODFILL:
|
|
ExtFloodFill(hdc, (SHORT)mr->rdParm[4], (SHORT)mr->rdParm[3],
|
|
MAKELONG(mr->rdParm[1], mr->rdParm[2]),
|
|
mr->rdParm[0]);
|
|
break;
|
|
|
|
case META_SETDIBTODEV:
|
|
{
|
|
BITMAPINFO *info = (BITMAPINFO *) &(mr->rdParm[9]);
|
|
char *bits = (char *)info + DIB_BitmapInfoSize( info, mr->rdParm[0] );
|
|
SetDIBitsToDevice(hdc, (SHORT)mr->rdParm[8], (SHORT)mr->rdParm[7],
|
|
(SHORT)mr->rdParm[6], (SHORT)mr->rdParm[5],
|
|
(SHORT)mr->rdParm[4], (SHORT)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);
|
|
return FALSE;
|
|
}
|
|
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("(%p,%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) {
|
|
TRACE("returning size %d\n", mfSize);
|
|
return mfSize;
|
|
}
|
|
if(mfSize > nSize) mfSize = nSize;
|
|
memmove(buf, mh, mfSize);
|
|
return mfSize;
|
|
}
|
|
|
|
/******************************************************************
|
|
* GetWinMetaFileBits [GDI32.@]
|
|
*/
|
|
UINT WINAPI GetWinMetaFileBits(HENHMETAFILE hemf,
|
|
UINT cbBuffer, LPBYTE lpbBuffer,
|
|
INT fnMapMode, HDC hdcRef)
|
|
{
|
|
HDC hdcmf;
|
|
HMETAFILE hmf;
|
|
UINT ret;
|
|
|
|
FIXME("(%p,%d,%p,%d,%p): stub\n", hemf, cbBuffer, lpbBuffer, fnMapMode, hdcRef);
|
|
hdcmf = CreateMetaFileA(NULL);
|
|
/* PlayEnhMetaFile(hdcmf, hemf, lpRect); where does the bounding rect come from? */
|
|
hmf = CloseMetaFile(hdcmf);
|
|
ret = GetMetaFileBitsEx(hmf, cbBuffer, lpbBuffer);
|
|
DeleteMetaFile(hmf);
|
|
return ret;
|
|
}
|
|
|
|
/******************************************************************
|
|
* 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(HDC hdc, METARECORD *mr)
|
|
{
|
|
INT *dx = NULL;
|
|
int i;
|
|
LPINT16 dxx;
|
|
LPSTR sot;
|
|
DWORD len;
|
|
WORD s1;
|
|
RECT rect;
|
|
BOOL isrect = mr->rdParm[3] & (ETO_OPAQUE | ETO_CLIPPED);
|
|
|
|
s1 = mr->rdParm[2]; /* String length */
|
|
len = sizeof(METARECORD) + (((s1 + 1) >> 1) * 2) + 2 * sizeof(short)
|
|
+ sizeof(UINT16) + (isrect ? sizeof(RECT16) : 0);
|
|
/* rec len without dx array */
|
|
|
|
sot = (LPSTR)&mr->rdParm[4]; /* start_of_text */
|
|
if (isrect)
|
|
{
|
|
rect.left = (SHORT)mr->rdParm[4];
|
|
rect.top = (SHORT)mr->rdParm[5];
|
|
rect.right = (SHORT)mr->rdParm[6];
|
|
rect.bottom = (SHORT)mr->rdParm[7];
|
|
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));
|
|
dx = HeapAlloc( GetProcessHeap(), 0, s1*sizeof(INT));
|
|
if (dx) for (i = 0; i < s1; i++) dx[i] = (SHORT)dxx[i];
|
|
}
|
|
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 */
|
|
}
|
|
ExtTextOutA( hdc,
|
|
(SHORT)mr->rdParm[1], /* X position */
|
|
(SHORT)mr->rdParm[0], /* Y position */
|
|
mr->rdParm[3], /* options */
|
|
&rect, /* rectangle */
|
|
sot, /* string */
|
|
s1, dx); /* length, dx array */
|
|
if (dx)
|
|
{
|
|
TRACE("%s len: %ld dx0: %d\n", sot, mr->rdSize, dx[0]);
|
|
HeapFree( GetProcessHeap(), 0, dx );
|
|
}
|
|
return TRUE;
|
|
}
|