reactos/dll/win32/gdi32/objects/metafile.c

#include "precomp.h"

/* DEFINES *******************************************************************/


/* PRIVATE DATA **************************************************************/

PMF_ENTRY hMF_List = NULL;
DWORD hMFCount = 0;

/* INTERNAL FUNCTIONS ********************************************************/

BOOL
MF_CreateMFDC ( HGDIOBJ hMDC,
                PMETAFILEDC pmfDC )
{
  PMF_ENTRY pMFME;

  pMFME = LocalAlloc(LMEM_ZEROINIT, sizeof(MF_ENTRY));
  if (!pMFME)
  {
    return FALSE;
  }

  if (hMF_List == NULL)
  {
    hMF_List = pMFME;
    InitializeListHead(&hMF_List->List);
  }
  else
    InsertTailList(&hMF_List->List, &pMFME->List);

  pMFME->hmDC  = hMDC;
  pMFME->pmfDC = pmfDC;

  hMFCount++;
  return TRUE;
}


PMETAFILEDC
MF_GetMFDC ( HGDIOBJ hMDC )
{
  PMF_ENTRY pMFME = hMF_List;

  do
  {
    if ( pMFME->hmDC == hMDC ) return pMFME->pmfDC;
    pMFME = (PMF_ENTRY) pMFME->List.Flink;
  }
  while ( pMFME != hMF_List );

  return NULL;
}


BOOL
MF_DeleteMFDC ( HGDIOBJ hMDC )
{
  PMF_ENTRY pMFME = hMF_List;

  do
  {
    if ( pMFME->hmDC == hMDC)
    {
       RemoveEntryList(&pMFME->List);
       LocalFree ( pMFME );
       hMFCount--;
       if (!hMFCount) hMF_List = NULL;
       return TRUE;
    }
    pMFME = (PMF_ENTRY) pMFME->List.Flink;
  }
  while ( pMFME != hMF_List );

  return FALSE;
}

/* FUNCTIONS *****************************************************************/

/*
 * @unimplemented
 */
HMETAFILE
WINAPI
CloseMetaFile(
	HDC	a0
	)
{
	return 0;
}


/*
 * @implemented
 */
HMETAFILE
WINAPI
CopyMetaFileW(
	HMETAFILE	hmfSrc,
	LPCWSTR		lpszFile
	)
{
  return NULL;
}


/*
 * @implemented
 */
HMETAFILE
WINAPI
CopyMetaFileA(
	HMETAFILE	hmfSrc,
	LPCSTR		lpszFile
	)
{
  NTSTATUS Status;
  PWSTR lpszFileW;
  HMETAFILE rc = 0;

  Status = HEAP_strdupA2W ( &lpszFileW, lpszFile );
  if (!NT_SUCCESS (Status))
    SetLastError (RtlNtStatusToDosError(Status));
  else
  {
    rc = CopyMetaFileW( hmfSrc, lpszFileW );
    HEAP_free ( lpszFileW );
  }

  return rc;
}


/*
 * @implemented
 */
HDC
WINAPI
CreateMetaFileW(
	LPCWSTR		lpszFile
	)
{
  HANDLE hFile;
  HDC hmDC;
  PMETAFILEDC pmfDC = LocalAlloc(LMEM_ZEROINIT, sizeof(METAFILEDC));
  if (!pmfDC) return NULL;

  pmfDC->mh.mtHeaderSize   = sizeof(METAHEADER) / sizeof(WORD);
  pmfDC->mh.mtVersion      = 0x0300;
  pmfDC->mh.mtSize         = pmfDC->mh.mtHeaderSize;

  pmfDC->hPen = GetStockObject(BLACK_PEN);
  pmfDC->hBrush = GetStockObject(WHITE_BRUSH);
  pmfDC->hFont = GetStockObject(DEVICE_DEFAULT_FONT);
  pmfDC->hBitmap = GetStockObject(DEFAULT_BITMAP);
  pmfDC->hPalette = GetStockObject(DEFAULT_PALETTE);

  if (lpszFile)  /* disk based metafile */
  {
    pmfDC->mh.mtType = METAFILE_DISK;

    if(!GetFullPathName(  lpszFile,
                          MAX_PATH,
         (LPTSTR) &pmfDC->Filename,
               (LPTSTR*) &lpszFile))
    {
       LocalFree(pmfDC);
       return NULL;
    }

    if ((hFile = CreateFileW(pmfDC->Filename, GENERIC_WRITE, 0, NULL,
				CREATE_ALWAYS, 0, 0)) == INVALID_HANDLE_VALUE)
    {
       LocalFree(pmfDC);
       return NULL;
    }

    if (!WriteFile( hFile, &pmfDC->mh, sizeof(pmfDC->mh), &pmfDC->dwWritten, NULL ))
    {
       LocalFree(pmfDC);
       return NULL;
    }
      pmfDC->hFile = hFile;
  }
  else  /* memory based metafile */
    pmfDC->mh.mtType = METAFILE_MEMORY;

  hmDC = NtGdiCreateClientObj ( GDI_OBJECT_TYPE_METADC );

  MF_CreateMFDC ( hmDC, pmfDC );

  return hmDC;
}


/*
 * @implemented
 */
HDC
WINAPI
CreateMetaFileA(
	LPCSTR		lpszFile
	)
{
  NTSTATUS Status;
  PWSTR lpszFileW;
  HDC rc = 0;

  Status = HEAP_strdupA2W ( &lpszFileW, lpszFile );
  if (!NT_SUCCESS (Status))
    SetLastError (RtlNtStatusToDosError(Status));
  else
    {
      rc = CreateMetaFileW( lpszFileW );
      HEAP_free ( lpszFileW );
    }
  return rc;
}


/*
 * @unimplemented
 */
BOOL
WINAPI
DeleteMetaFile(
	HMETAFILE	a0
	)
{
	return FALSE;
}


/*
 * @implemented
 */
HMETAFILE
WINAPI
GetMetaFileW(
	LPCWSTR	lpszMetaFile
	)
{
  return NULL;
}


/*
 * @implemented
 */
HMETAFILE
WINAPI
GetMetaFileA(
	LPCSTR	lpszMetaFile
	)
{
  NTSTATUS Status;
  LPWSTR lpszMetaFileW;
  HMETAFILE rc = 0;

  Status = HEAP_strdupA2W ( &lpszMetaFileW, lpszMetaFile );
  if (!NT_SUCCESS (Status))
    SetLastError (RtlNtStatusToDosError(Status));
  else
    {
      rc = GetMetaFileW( lpszMetaFileW );
      HEAP_free ( lpszMetaFileW );
    }

  return rc;
}