src/msw/metafile.cpp

/////////////////////////////////////////////////////////////////////////////
// Name:        src/msw/metafile.cpp
// Purpose:     wxMetafileDC etc.
// Author:      Julian Smart
// Modified by: VZ 07.01.00: implemented wxMetaFileDataObject
// Created:     04/01/98
// RCS-ID:      $Id$
// Copyright:   (c) Julian Smart
// Licence:     wxWindows licence
/////////////////////////////////////////////////////////////////////////////

// ============================================================================
// declarations
// ============================================================================

// ----------------------------------------------------------------------------
// headers
// ----------------------------------------------------------------------------

// For compilers that support precompilation, includes "wx.h".
#include "wx/wxprec.h"

#ifdef __BORLANDC__
    #pragma hdrstop
#endif

#ifndef WX_PRECOMP
    #include "wx/utils.h"
    #include "wx/app.h"
#endif

#include "wx/metafile.h"
#include "wx/filename.h"

#if wxUSE_METAFILE && !defined(wxMETAFILE_IS_ENH)

#include "wx/clipbrd.h"
#include "wx/msw/private.h"

#include <stdio.h>
#include <string.h>

// ----------------------------------------------------------------------------
// wxWin macros
// ----------------------------------------------------------------------------

IMPLEMENT_DYNAMIC_CLASS(wxMetafile, wxObject)
IMPLEMENT_ABSTRACT_CLASS(wxMetafileDC, wxDC)

// ============================================================================
// implementation
// ============================================================================

// ----------------------------------------------------------------------------
// wxMetafileRefData
// ----------------------------------------------------------------------------

/*
 * Metafiles
 * Currently, the only purpose for making a metafile is to put
 * it on the clipboard.
 */

wxMetafileRefData::wxMetafileRefData()
{
    m_metafile = 0;
    m_windowsMappingMode = wxMM_ANISOTROPIC;
    m_width = m_height = 0;
}

wxMetafileRefData::~wxMetafileRefData()
{
    if (m_metafile)
    {
        DeleteMetaFile((HMETAFILE) m_metafile);
        m_metafile = 0;
    }
}

// ----------------------------------------------------------------------------
// wxMetafile
// ----------------------------------------------------------------------------

wxMetafile::wxMetafile(const wxString& file)
{
    m_refData = new wxMetafileRefData;

    M_METAFILEDATA->m_windowsMappingMode = wxMM_ANISOTROPIC;
    M_METAFILEDATA->m_metafile = 0;
    if (!file.empty())
        M_METAFILEDATA->m_metafile = (WXHANDLE) GetMetaFile(file);
}

wxMetafile::~wxMetafile()
{
}

wxGDIRefData *wxMetafile::CreateGDIRefData() const
{
    return new wxMetafileRefData;
}

wxGDIRefData *wxMetafile::CloneGDIRefData(const wxGDIRefData *data) const
{
    return new wxMetafileRefData(*static_cast<const wxMetafileRefData *>(data));
}

bool wxMetafile::SetClipboard(int width, int height)
{
#if !wxUSE_CLIPBOARD
    return false;
#else
    if (!m_refData)
        return false;

    bool alreadyOpen = wxClipboardOpen();
    if (!alreadyOpen)
    {
        wxOpenClipboard();
        if (!wxEmptyClipboard())
            return false;
    }
    bool success = wxSetClipboardData(wxDF_METAFILE, this, width,height);
    if (!alreadyOpen)
        wxCloseClipboard();

    return success;
#endif
}

bool wxMetafile::Play(wxDC *dc)
{
    if (!m_refData)
        return false;

    if (dc->GetHDC() && M_METAFILEDATA->m_metafile)
    {
        if ( !::PlayMetaFile(GetHdcOf(*dc), (HMETAFILE)
                             M_METAFILEDATA->m_metafile) )
        {
            wxLogLastError(_T("PlayMetaFile"));
        }
    }

    return true;
}

void wxMetafile::SetHMETAFILE(WXHANDLE mf)
{
    if (!m_refData)
        m_refData = new wxMetafileRefData;

    M_METAFILEDATA->m_metafile = mf;
}

void wxMetafile::SetWindowsMappingMode(int mm)
{
    if (!m_refData)
        m_refData = new wxMetafileRefData;

    M_METAFILEDATA->m_windowsMappingMode = mm;
}

// ----------------------------------------------------------------------------
// Metafile device context
// ----------------------------------------------------------------------------

// Original constructor that does not takes origin and extent. If you use this,
// *DO* give origin/extent arguments to wxMakeMetafilePlaceable.
wxMetafileDCImpl::wxMetafileDCImpl(wxDC *owner, const wxString& file)
    : wxMSWDCImpl(owner)
{
    m_metaFile = NULL;
    m_minX = 10000;
    m_minY = 10000;
    m_maxX = -10000;
    m_maxY = -10000;
    //  m_title = NULL;

    if (!file.IsNull() && wxFileExists(file))
        wxRemoveFile(file);

    if (!file.IsNull() && (file != wxEmptyString))
        m_hDC = (WXHDC) CreateMetaFile(file);
    else
        m_hDC = (WXHDC) CreateMetaFile(NULL);

    m_ok = (m_hDC != (WXHDC) 0) ;

    // Actual Windows mapping mode, for future reference.
    m_windowsMappingMode = wxMM_TEXT;

    SetMapMode(wxMM_TEXT); // NOTE: does not set HDC mapmode (this is correct)
}

// New constructor that takes origin and extent. If you use this, don't
// give origin/extent arguments to wxMakeMetafilePlaceable.
wxMetafileDCImpl::wxMetafileDCImpl(wxDC *owner, const wxString& file,
                                   int xext, int yext, int xorg, int yorg)
    : wxMSWDCImpl(owner)
{
    m_minX = 10000;
    m_minY = 10000;
    m_maxX = -10000;
    m_maxY = -10000;
    if ( !file.empty() && wxFileExists(file) )
        wxRemoveFile(file);
    m_hDC = (WXHDC) CreateMetaFile(file.empty() ? NULL : file.wx_str());

    m_ok = true;

    ::SetWindowOrgEx((HDC) m_hDC,xorg,yorg, NULL);
    ::SetWindowExtEx((HDC) m_hDC,xext,yext, NULL);

    // Actual Windows mapping mode, for future reference.
    m_windowsMappingMode = wxMM_ANISOTROPIC;

    SetMapMode(wxMM_TEXT); // NOTE: does not set HDC mapmode (this is correct)
}

wxMetafileDCImpl::~wxMetafileDCImpl()
{
    m_hDC = 0;
}

void wxMetafileDCImpl::DoGetTextExtent(const wxString& string,
                                       wxCoord *x, wxCoord *y,
                                       wxCoord *descent, wxCoord *externalLeading,
                                       const wxFont *theFont) const
{
    const wxFont *fontToUse = theFont;
    if (!fontToUse)
        fontToUse = &m_font;

    ScreenHDC dc;
    SelectInHDC selFont(dc, GetHfontOf(*fontToUse));

    SIZE sizeRect;
    TEXTMETRIC tm;
    ::GetTextExtentPoint32(dc, WXSTRINGCAST string, wxStrlen(WXSTRINGCAST string), &sizeRect);
    ::GetTextMetrics(dc, &tm);

    if ( x )
        *x = sizeRect.cx;
    if ( y )
        *y = sizeRect.cy;
    if ( descent )
        *descent = tm.tmDescent;
    if ( externalLeading )
        *externalLeading = tm.tmExternalLeading;
}

void wxMetafileDCImpl::DoGetSize(int *width, int *height) const
{
    wxCHECK_RET( m_refData, _T("invalid wxMetafileDC") );

    if ( width )
        *width = M_METAFILEDATA->m_width;
    if ( height )
        *height = M_METAFILEDATA->m_height;
}

wxMetafile *wxMetafileDCImpl::Close()
{
    SelectOldObjects(m_hDC);
    HANDLE mf = CloseMetaFile((HDC) m_hDC);
    m_hDC = 0;
    if (mf)
    {
        wxMetafile *wx_mf = new wxMetafile;
        wx_mf->SetHMETAFILE((WXHANDLE) mf);
        wx_mf->SetWindowsMappingMode(m_windowsMappingMode);
        return wx_mf;
    }
    return NULL;
}

void wxMetafileDCImpl::SetMapMode(wxMappingMode mode)
{
    m_mappingMode = mode;

    //  int pixel_width = 0;
    //  int pixel_height = 0;
    //  int mm_width = 0;
    //  int mm_height = 0;

    float mm2pixelsX = 10.0;
    float mm2pixelsY = 10.0;

    switch (mode)
    {
        case wxMM_TWIPS:
            {
                m_logicalScaleX = (float)(twips2mm * mm2pixelsX);
                m_logicalScaleY = (float)(twips2mm * mm2pixelsY);
                break;
            }
        case wxMM_POINTS:
            {
                m_logicalScaleX = (float)(pt2mm * mm2pixelsX);
                m_logicalScaleY = (float)(pt2mm * mm2pixelsY);
                break;
            }
        case wxMM_METRIC:
            {
                m_logicalScaleX = mm2pixelsX;
                m_logicalScaleY = mm2pixelsY;
                break;
            }
        case wxMM_LOMETRIC:
            {
                m_logicalScaleX = (float)(mm2pixelsX/10.0);
                m_logicalScaleY = (float)(mm2pixelsY/10.0);
                break;
            }
        default:
        case wxMM_TEXT:
            {
                m_logicalScaleX = 1.0;
                m_logicalScaleY = 1.0;
                break;
            }
    }
}

// ----------------------------------------------------------------------------
// wxMakeMetafilePlaceable
// ----------------------------------------------------------------------------

#ifdef __WIN32__
struct RECT32
{
  short left;
  short top;
  short right;
  short bottom;
};

struct mfPLACEABLEHEADER {
    DWORD    key;
    short    hmf;
    RECT32    bbox;
    WORD    inch;
    DWORD    reserved;
    WORD    checksum;
};
#else
struct mfPLACEABLEHEADER {
    DWORD    key;
    HANDLE    hmf;
    RECT    bbox;
    WORD    inch;
    DWORD    reserved;
    WORD    checksum;
};
#endif

/*
 * Pass filename of existing non-placeable metafile, and bounding box.
 * Adds a placeable metafile header, sets the mapping mode to anisotropic,
 * and sets the window origin and extent to mimic the wxMM_TEXT mapping mode.
 *
 */

bool wxMakeMetafilePlaceable(const wxString& filename, float scale)
{
    return wxMakeMetafilePlaceable(filename, 0, 0, 0, 0, scale, false);
}

bool wxMakeMetafilePlaceable(const wxString& filename, int x1, int y1, int x2, int y2, float scale, bool useOriginAndExtent)
{
    // I'm not sure if this is the correct way of suggesting a scale
    // to the client application, but it's the only way I can find.
    int unitsPerInch = (int)(576/scale);

    mfPLACEABLEHEADER header;
    header.key = 0x9AC6CDD7L;
    header.hmf = 0;
    header.bbox.left = (int)(x1);
    header.bbox.top = (int)(y1);
    header.bbox.right = (int)(x2);
    header.bbox.bottom = (int)(y2);
    header.inch = unitsPerInch;
    header.reserved = 0;

    // Calculate checksum
    WORD *p;
    mfPLACEABLEHEADER *pMFHead = &header;
    for (p =(WORD *)pMFHead,pMFHead -> checksum = 0;
            p < (WORD *)&pMFHead ->checksum; ++p)
        pMFHead ->checksum ^= *p;

    FILE *fd = wxFopen(filename.fn_str(), _T("rb"));
    if (!fd) return false;

    wxString tempFileBuf = wxFileName::CreateTempFileName(wxT("mf"));
    if (tempFileBuf.empty())
        return false;

    FILE *fHandle = wxFopen(tempFileBuf.fn_str(), _T("wb"));
    if (!fHandle)
        return false;
    fwrite((void *)&header, sizeof(unsigned char), sizeof(mfPLACEABLEHEADER), fHandle);

    // Calculate origin and extent
    int originX = x1;
    int originY = y1;
    int extentX = x2 - x1;
    int extentY = (y2 - y1);

    // Read metafile header and write
    METAHEADER metaHeader;
    fread((void *)&metaHeader, sizeof(unsigned char), sizeof(metaHeader), fd);

    if (useOriginAndExtent)
        metaHeader.mtSize += 15;
    else
        metaHeader.mtSize += 5;

    fwrite((void *)&metaHeader, sizeof(unsigned char), sizeof(metaHeader), fHandle);

    // Write SetMapMode, SetWindowOrigin and SetWindowExt records
    char modeBuffer[8];
    char originBuffer[10];
    char extentBuffer[10];
    METARECORD *modeRecord = (METARECORD *)&modeBuffer;

    METARECORD *originRecord = (METARECORD *)&originBuffer;
    METARECORD *extentRecord = (METARECORD *)&extentBuffer;

    modeRecord->rdSize = 4;
    modeRecord->rdFunction = META_SETMAPMODE;
    modeRecord->rdParm[0] = MM_ANISOTROPIC;

    originRecord->rdSize = 5;
    originRecord->rdFunction = META_SETWINDOWORG;
    originRecord->rdParm[0] = originY;
    originRecord->rdParm[1] = originX;

    extentRecord->rdSize = 5;
    extentRecord->rdFunction = META_SETWINDOWEXT;
    extentRecord->rdParm[0] = extentY;
    extentRecord->rdParm[1] = extentX;

    fwrite((void *)modeBuffer, sizeof(char), 8, fHandle);

    if (useOriginAndExtent)
    {
        fwrite((void *)originBuffer, sizeof(char), 10, fHandle);
        fwrite((void *)extentBuffer, sizeof(char), 10, fHandle);
    }

    int ch = -2;
    while (ch != EOF)
    {
        ch = getc(fd);
        if (ch != EOF)
        {
            putc(ch, fHandle);
        }
    }
    fclose(fHandle);
    fclose(fd);
    wxRemoveFile(filename);
    wxCopyFile(tempFileBuf, filename);
    wxRemoveFile(tempFileBuf);
    return true;
}


#if wxUSE_DRAG_AND_DROP

// ----------------------------------------------------------------------------
// wxMetafileDataObject
// ----------------------------------------------------------------------------

size_t wxMetafileDataObject::GetDataSize() const
{
    return sizeof(METAFILEPICT);
}

bool wxMetafileDataObject::GetDataHere(void *buf) const
{
    METAFILEPICT *mfpict = (METAFILEPICT *)buf;
    const wxMetafile& mf = GetMetafile();

    wxCHECK_MSG( mf.GetHMETAFILE(), false, _T("copying invalid metafile") );

    // doesn't seem to work with any other mapping mode...
    mfpict->mm   = MM_ANISOTROPIC; //mf.GetWindowsMappingMode();
    mfpict->xExt = mf.GetWidth();
    mfpict->yExt = mf.GetHeight();

    // transform the picture size to HIMETRIC units (0.01mm) - as we don't know
    // what DC the picture will be rendered to, use the default display one
    PixelToHIMETRIC(&mfpict->xExt, &mfpict->yExt);

    mfpict->hMF  = CopyMetaFile((HMETAFILE)mf.GetHMETAFILE(), NULL);

    return true;
}

bool wxMetafileDataObject::SetData(size_t WXUNUSED(len), const void *buf)
{
    const METAFILEPICT *mfpict = (const METAFILEPICT *)buf;

    wxMetafile mf;
    mf.SetWindowsMappingMode(mfpict->mm);

    LONG w = mfpict->xExt,
         h = mfpict->yExt;
    if ( mfpict->mm == MM_ANISOTROPIC )
    {
        // in this case xExt and yExt contain suggested size in HIMETRIC units
        // (0.01 mm) - transform this to something more reasonable (pixels)
        HIMETRICToPixel(&w, &h);
    }

    mf.SetWidth(w);
    mf.SetHeight(h);
    mf.SetHMETAFILE((WXHANDLE)mfpict->hMF);

    wxCHECK_MSG( mfpict->hMF, false, _T("pasting invalid metafile") );

    SetMetafile(mf);

    return true;
}

#endif // wxUSE_DRAG_AND_DROP

#endif // wxUSE_METAFILE
Commit	Line	Data
	1	/////////////////////////////////////////////////////////////////////////////
	2	// Name: src/msw/metafile.cpp
	3	// Purpose: wxMetafileDC etc.
	4	// Author: Julian Smart
	5	// Modified by: VZ 07.01.00: implemented wxMetaFileDataObject
	6	// Created: 04/01/98
	7	// RCS-ID: $Id$
	8	// Copyright: (c) Julian Smart
	9	// Licence: wxWindows licence
	10	/////////////////////////////////////////////////////////////////////////////
	11
	12	// ============================================================================
	13	// declarations
	14	// ============================================================================
	15
	16	// ----------------------------------------------------------------------------
	17	// headers
	18	// ----------------------------------------------------------------------------
	19
	20	// For compilers that support precompilation, includes "wx.h".
	21	#include "wx/wxprec.h"
	22
	23	#ifdef __BORLANDC__
	24	#pragma hdrstop
	25	#endif
	26
	27	#ifndef WX_PRECOMP
	28	#include "wx/utils.h"
	29	#include "wx/app.h"
	30	#endif
	31
	32	#include "wx/metafile.h"
	33	#include "wx/filename.h"
	34
	35	#if wxUSE_METAFILE && !defined(wxMETAFILE_IS_ENH)
	36
	37	#include "wx/clipbrd.h"
	38	#include "wx/msw/private.h"
	39
	40	#include <stdio.h>
	41	#include <string.h>
	42
	43	// ----------------------------------------------------------------------------
	44	// wxWin macros
	45	// ----------------------------------------------------------------------------
	46
	47	IMPLEMENT_DYNAMIC_CLASS(wxMetafile, wxObject)
	48	IMPLEMENT_ABSTRACT_CLASS(wxMetafileDC, wxDC)
	49
	50	// ============================================================================
	51	// implementation
	52	// ============================================================================
	53
	54	// ----------------------------------------------------------------------------
	55	// wxMetafileRefData
	56	// ----------------------------------------------------------------------------
	57
	58	/*
	59	* Metafiles
	60	* Currently, the only purpose for making a metafile is to put
	61	* it on the clipboard.
	62	*/
	63
	64	wxMetafileRefData::wxMetafileRefData()
	65	{
	66	m_metafile = 0;
	67	m_windowsMappingMode = wxMM_ANISOTROPIC;
	68	m_width = m_height = 0;
	69	}
	70
	71	wxMetafileRefData::~wxMetafileRefData()
	72	{
	73	if (m_metafile)
	74	{
	75	DeleteMetaFile((HMETAFILE) m_metafile);
	76	m_metafile = 0;
	77	}
	78	}
	79
	80	// ----------------------------------------------------------------------------
	81	// wxMetafile
	82	// ----------------------------------------------------------------------------
	83
	84	wxMetafile::wxMetafile(const wxString& file)
	85	{
	86	m_refData = new wxMetafileRefData;
	87
	88	M_METAFILEDATA->m_windowsMappingMode = wxMM_ANISOTROPIC;
	89	M_METAFILEDATA->m_metafile = 0;
	90	if (!file.empty())
	91	M_METAFILEDATA->m_metafile = (WXHANDLE) GetMetaFile(file);
	92	}
	93
	94	wxMetafile::~wxMetafile()
	95	{
	96	}
	97
	98	wxGDIRefData *wxMetafile::CreateGDIRefData() const
	99	{
	100	return new wxMetafileRefData;
	101	}
	102
	103	wxGDIRefData wxMetafile::CloneGDIRefData(const wxGDIRefData data) const
	104	{
	105	return new wxMetafileRefData(static_cast<const wxMetafileRefData >(data));
	106	}
	107
	108	bool wxMetafile::SetClipboard(int width, int height)
	109	{
	110	#if !wxUSE_CLIPBOARD
	111	return false;
	112	#else
	113	if (!m_refData)
	114	return false;
	115
	116	bool alreadyOpen = wxClipboardOpen();
	117	if (!alreadyOpen)
	118	{
	119	wxOpenClipboard();
	120	if (!wxEmptyClipboard())
	121	return false;
	122	}
	123	bool success = wxSetClipboardData(wxDF_METAFILE, this, width,height);
	124	if (!alreadyOpen)
	125	wxCloseClipboard();
	126
	127	return success;
	128	#endif
	129	}
	130
	131	bool wxMetafile::Play(wxDC *dc)
	132	{
	133	if (!m_refData)
	134	return false;
	135
	136	if (dc->GetHDC() && M_METAFILEDATA->m_metafile)
	137	{
	138	if ( !::PlayMetaFile(GetHdcOf(*dc), (HMETAFILE)
	139	M_METAFILEDATA->m_metafile) )
	140	{
	141	wxLogLastError(_T("PlayMetaFile"));
	142	}
	143	}
	144
	145	return true;
	146	}
	147
	148	void wxMetafile::SetHMETAFILE(WXHANDLE mf)
	149	{
	150	if (!m_refData)
	151	m_refData = new wxMetafileRefData;
	152
	153	M_METAFILEDATA->m_metafile = mf;
	154	}
	155
	156	void wxMetafile::SetWindowsMappingMode(int mm)
	157	{
	158	if (!m_refData)
	159	m_refData = new wxMetafileRefData;
	160
	161	M_METAFILEDATA->m_windowsMappingMode = mm;
	162	}
	163
	164	// ----------------------------------------------------------------------------
	165	// Metafile device context
	166	// ----------------------------------------------------------------------------
	167
	168	// Original constructor that does not takes origin and extent. If you use this,
	169	// DO give origin/extent arguments to wxMakeMetafilePlaceable.
	170	wxMetafileDCImpl::wxMetafileDCImpl(wxDC *owner, const wxString& file)
	171	: wxMSWDCImpl(owner)
	172	{
	173	m_metaFile = NULL;
	174	m_minX = 10000;
	175	m_minY = 10000;
	176	m_maxX = -10000;
	177	m_maxY = -10000;
	178	// m_title = NULL;
	179
	180	if (!file.IsNull() && wxFileExists(file))
	181	wxRemoveFile(file);
	182
	183	if (!file.IsNull() && (file != wxEmptyString))
	184	m_hDC = (WXHDC) CreateMetaFile(file);
	185	else
	186	m_hDC = (WXHDC) CreateMetaFile(NULL);
	187
	188	m_ok = (m_hDC != (WXHDC) 0) ;
	189
	190	// Actual Windows mapping mode, for future reference.
	191	m_windowsMappingMode = wxMM_TEXT;
	192
	193	SetMapMode(wxMM_TEXT); // NOTE: does not set HDC mapmode (this is correct)
	194	}
	195
	196	// New constructor that takes origin and extent. If you use this, don't
	197	// give origin/extent arguments to wxMakeMetafilePlaceable.
	198	wxMetafileDCImpl::wxMetafileDCImpl(wxDC *owner, const wxString& file,
	199	int xext, int yext, int xorg, int yorg)
	200	: wxMSWDCImpl(owner)
	201	{
	202	m_minX = 10000;
	203	m_minY = 10000;
	204	m_maxX = -10000;
	205	m_maxY = -10000;
	206	if ( !file.empty() && wxFileExists(file) )
	207	wxRemoveFile(file);
	208	m_hDC = (WXHDC) CreateMetaFile(file.empty() ? NULL : file.wx_str());
	209
	210	m_ok = true;
	211
	212	::SetWindowOrgEx((HDC) m_hDC,xorg,yorg, NULL);
	213	::SetWindowExtEx((HDC) m_hDC,xext,yext, NULL);
	214
	215	// Actual Windows mapping mode, for future reference.
	216	m_windowsMappingMode = wxMM_ANISOTROPIC;
	217
	218	SetMapMode(wxMM_TEXT); // NOTE: does not set HDC mapmode (this is correct)
	219	}
	220
	221	wxMetafileDCImpl::~wxMetafileDCImpl()
	222	{
	223	m_hDC = 0;
	224	}
	225
	226	void wxMetafileDCImpl::DoGetTextExtent(const wxString& string,
	227	wxCoord x, wxCoord y,
	228	wxCoord descent, wxCoord externalLeading,
	229	const wxFont *theFont) const
	230	{
	231	const wxFont *fontToUse = theFont;
	232	if (!fontToUse)
	233	fontToUse = &m_font;
	234
	235	ScreenHDC dc;
	236	SelectInHDC selFont(dc, GetHfontOf(*fontToUse));
	237
	238	SIZE sizeRect;
	239	TEXTMETRIC tm;
	240	::GetTextExtentPoint32(dc, WXSTRINGCAST string, wxStrlen(WXSTRINGCAST string), &sizeRect);
	241	::GetTextMetrics(dc, &tm);
	242
	243	if ( x )
	244	*x = sizeRect.cx;
	245	if ( y )
	246	*y = sizeRect.cy;
	247	if ( descent )
	248	*descent = tm.tmDescent;
	249	if ( externalLeading )
	250	*externalLeading = tm.tmExternalLeading;
	251	}
	252
	253	void wxMetafileDCImpl::DoGetSize(int width, int height) const
	254	{
	255	wxCHECK_RET( m_refData, _T("invalid wxMetafileDC") );
	256
	257	if ( width )
	258	*width = M_METAFILEDATA->m_width;
	259	if ( height )
	260	*height = M_METAFILEDATA->m_height;
	261	}
	262
	263	wxMetafile *wxMetafileDCImpl::Close()
	264	{
	265	SelectOldObjects(m_hDC);
	266	HANDLE mf = CloseMetaFile((HDC) m_hDC);
	267	m_hDC = 0;
	268	if (mf)
	269	{
	270	wxMetafile *wx_mf = new wxMetafile;
	271	wx_mf->SetHMETAFILE((WXHANDLE) mf);
	272	wx_mf->SetWindowsMappingMode(m_windowsMappingMode);
	273	return wx_mf;
	274	}
	275	return NULL;
	276	}
	277
	278	void wxMetafileDCImpl::SetMapMode(wxMappingMode mode)
	279	{
	280	m_mappingMode = mode;
	281
	282	// int pixel_width = 0;
	283	// int pixel_height = 0;
	284	// int mm_width = 0;
	285	// int mm_height = 0;
	286
	287	float mm2pixelsX = 10.0;
	288	float mm2pixelsY = 10.0;
	289
	290	switch (mode)
	291	{
	292	case wxMM_TWIPS:
	293	{
	294	m_logicalScaleX = (float)(twips2mm * mm2pixelsX);
	295	m_logicalScaleY = (float)(twips2mm * mm2pixelsY);
	296	break;
	297	}
	298	case wxMM_POINTS:
	299	{
	300	m_logicalScaleX = (float)(pt2mm * mm2pixelsX);
	301	m_logicalScaleY = (float)(pt2mm * mm2pixelsY);
	302	break;
	303	}
	304	case wxMM_METRIC:
	305	{
	306	m_logicalScaleX = mm2pixelsX;
	307	m_logicalScaleY = mm2pixelsY;
	308	break;
	309	}
	310	case wxMM_LOMETRIC:
	311	{
	312	m_logicalScaleX = (float)(mm2pixelsX/10.0);
	313	m_logicalScaleY = (float)(mm2pixelsY/10.0);
	314	break;
	315	}
	316	default:
	317	case wxMM_TEXT:
	318	{
	319	m_logicalScaleX = 1.0;
	320	m_logicalScaleY = 1.0;
	321	break;
	322	}
	323	}
	324	}
	325
	326	// ----------------------------------------------------------------------------
	327	// wxMakeMetafilePlaceable
	328	// ----------------------------------------------------------------------------
	329
	330	#ifdef __WIN32__
	331	struct RECT32
	332	{
	333	short left;
	334	short top;
	335	short right;
	336	short bottom;
	337	};
	338
	339	struct mfPLACEABLEHEADER {
	340	DWORD key;
	341	short hmf;
	342	RECT32 bbox;
	343	WORD inch;
	344	DWORD reserved;
	345	WORD checksum;
	346	};
	347	#else
	348	struct mfPLACEABLEHEADER {
	349	DWORD key;
	350	HANDLE hmf;
	351	RECT bbox;
	352	WORD inch;
	353	DWORD reserved;
	354	WORD checksum;
	355	};
	356	#endif
	357
	358	/*
	359	* Pass filename of existing non-placeable metafile, and bounding box.
	360	* Adds a placeable metafile header, sets the mapping mode to anisotropic,
	361	* and sets the window origin and extent to mimic the wxMM_TEXT mapping mode.
	362	*
	363	*/
	364
	365	bool wxMakeMetafilePlaceable(const wxString& filename, float scale)
	366	{
	367	return wxMakeMetafilePlaceable(filename, 0, 0, 0, 0, scale, false);
	368	}
	369
	370	bool wxMakeMetafilePlaceable(const wxString& filename, int x1, int y1, int x2, int y2, float scale, bool useOriginAndExtent)
	371	{
	372	// I'm not sure if this is the correct way of suggesting a scale
	373	// to the client application, but it's the only way I can find.
	374	int unitsPerInch = (int)(576/scale);
	375
	376	mfPLACEABLEHEADER header;
	377	header.key = 0x9AC6CDD7L;
	378	header.hmf = 0;
	379	header.bbox.left = (int)(x1);
	380	header.bbox.top = (int)(y1);
	381	header.bbox.right = (int)(x2);
	382	header.bbox.bottom = (int)(y2);
	383	header.inch = unitsPerInch;
	384	header.reserved = 0;
	385
	386	// Calculate checksum
	387	WORD *p;
	388	mfPLACEABLEHEADER *pMFHead = &header;
	389	for (p =(WORD *)pMFHead,pMFHead -> checksum = 0;
	390	p < (WORD *)&pMFHead ->checksum; ++p)
	391	pMFHead ->checksum ^= *p;
	392
	393	FILE *fd = wxFopen(filename.fn_str(), _T("rb"));
	394	if (!fd) return false;
	395
	396	wxString tempFileBuf = wxFileName::CreateTempFileName(wxT("mf"));
	397	if (tempFileBuf.empty())
	398	return false;
	399
	400	FILE *fHandle = wxFopen(tempFileBuf.fn_str(), _T("wb"));
	401	if (!fHandle)
	402	return false;
	403	fwrite((void *)&header, sizeof(unsigned char), sizeof(mfPLACEABLEHEADER), fHandle);
	404
	405	// Calculate origin and extent
	406	int originX = x1;
	407	int originY = y1;
	408	int extentX = x2 - x1;
	409	int extentY = (y2 - y1);
	410
	411	// Read metafile header and write
	412	METAHEADER metaHeader;
	413	fread((void *)&metaHeader, sizeof(unsigned char), sizeof(metaHeader), fd);
	414
	415	if (useOriginAndExtent)
	416	metaHeader.mtSize += 15;
	417	else
	418	metaHeader.mtSize += 5;
	419
	420	fwrite((void *)&metaHeader, sizeof(unsigned char), sizeof(metaHeader), fHandle);
	421
	422	// Write SetMapMode, SetWindowOrigin and SetWindowExt records
	423	char modeBuffer[8];
	424	char originBuffer[10];
	425	char extentBuffer[10];
	426	METARECORD modeRecord = (METARECORD )&modeBuffer;
	427
	428	METARECORD originRecord = (METARECORD )&originBuffer;
	429	METARECORD extentRecord = (METARECORD )&extentBuffer;
	430
	431	modeRecord->rdSize = 4;
	432	modeRecord->rdFunction = META_SETMAPMODE;
	433	modeRecord->rdParm[0] = MM_ANISOTROPIC;
	434
	435	originRecord->rdSize = 5;
	436	originRecord->rdFunction = META_SETWINDOWORG;
	437	originRecord->rdParm[0] = originY;
	438	originRecord->rdParm[1] = originX;
	439
	440	extentRecord->rdSize = 5;
	441	extentRecord->rdFunction = META_SETWINDOWEXT;
	442	extentRecord->rdParm[0] = extentY;
	443	extentRecord->rdParm[1] = extentX;
	444
	445	fwrite((void *)modeBuffer, sizeof(char), 8, fHandle);
	446
	447	if (useOriginAndExtent)
	448	{
	449	fwrite((void *)originBuffer, sizeof(char), 10, fHandle);
	450	fwrite((void *)extentBuffer, sizeof(char), 10, fHandle);
	451	}
	452
	453	int ch = -2;
	454	while (ch != EOF)
	455	{
	456	ch = getc(fd);
	457	if (ch != EOF)
	458	{
	459	putc(ch, fHandle);
	460	}
	461	}
	462	fclose(fHandle);
	463	fclose(fd);
	464	wxRemoveFile(filename);
	465	wxCopyFile(tempFileBuf, filename);
	466	wxRemoveFile(tempFileBuf);
	467	return true;
	468	}
	469
	470
	471	#if wxUSE_DRAG_AND_DROP
	472
	473	// ----------------------------------------------------------------------------
	474	// wxMetafileDataObject
	475	// ----------------------------------------------------------------------------
	476
	477	size_t wxMetafileDataObject::GetDataSize() const
	478	{
	479	return sizeof(METAFILEPICT);
	480	}
	481
	482	bool wxMetafileDataObject::GetDataHere(void *buf) const
	483	{
	484	METAFILEPICT mfpict = (METAFILEPICT )buf;
	485	const wxMetafile& mf = GetMetafile();
	486
	487	wxCHECK_MSG( mf.GetHMETAFILE(), false, _T("copying invalid metafile") );
	488
	489	// doesn't seem to work with any other mapping mode...
	490	mfpict->mm = MM_ANISOTROPIC; //mf.GetWindowsMappingMode();
	491	mfpict->xExt = mf.GetWidth();
	492	mfpict->yExt = mf.GetHeight();
	493
	494	// transform the picture size to HIMETRIC units (0.01mm) - as we don't know
	495	// what DC the picture will be rendered to, use the default display one
	496	PixelToHIMETRIC(&mfpict->xExt, &mfpict->yExt);
	497
	498	mfpict->hMF = CopyMetaFile((HMETAFILE)mf.GetHMETAFILE(), NULL);
	499
	500	return true;
	501	}
	502
	503	bool wxMetafileDataObject::SetData(size_t WXUNUSED(len), const void *buf)
	504	{
	505	const METAFILEPICT mfpict = (const METAFILEPICT )buf;
	506
	507	wxMetafile mf;
	508	mf.SetWindowsMappingMode(mfpict->mm);
	509
	510	LONG w = mfpict->xExt,
	511	h = mfpict->yExt;
	512	if ( mfpict->mm == MM_ANISOTROPIC )
	513	{
	514	// in this case xExt and yExt contain suggested size in HIMETRIC units
	515	// (0.01 mm) - transform this to something more reasonable (pixels)
	516	HIMETRICToPixel(&w, &h);
	517	}
	518
	519	mf.SetWidth(w);
	520	mf.SetHeight(h);
	521	mf.SetHMETAFILE((WXHANDLE)mfpict->hMF);
	522
	523	wxCHECK_MSG( mfpict->hMF, false, _T("pasting invalid metafile") );
	524
	525	SetMetafile(mf);
	526
	527	return true;
	528	}
	529
	530	#endif // wxUSE_DRAG_AND_DROP
	531
	532	#endif // wxUSE_METAFILE