[wxWidgets.git] / src / msw / ole / dataobj.cpp

///////////////////////////////////////////////////////////////////////////////
// Name:        msw/ole/dataobj.cpp
// Purpose:     implementation of wx[I]DataObject class
// Author:      Vadim Zeitlin
// Modified by:
// Created:     10.05.98
// RCS-ID:      $Id$
// Copyright:   (c) 1998 Vadim Zeitlin <zeitlin@dptmaths.ens-cachan.fr>
// Licence:     wxWindows license
///////////////////////////////////////////////////////////////////////////////

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

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

#ifdef __GNUG__
  #pragma implementation "dataobj.h"
#endif

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

#if defined(__BORLANDC__)
  #pragma hdrstop
#endif

#include  <wx/defs.h>

#if defined(__WIN32__) && !defined(__GNUWIN32__)

#include  <wx/log.h>
#include  <wx/msw/ole/oleutils.h>
#include  <wx/msw/ole/dataobj.h>

#ifndef __WIN32__
  #include <ole2.h>
  #include <olestd.h>
#endif

// ----------------------------------------------------------------------------
// functions
// ----------------------------------------------------------------------------

static const char *GetTymedName(DWORD tymed);

// ----------------------------------------------------------------------------
// wxIEnumFORMATETC interface implementation
// ----------------------------------------------------------------------------
class wxIEnumFORMATETC : public IEnumFORMATETC
{
public:
  wxIEnumFORMATETC(CLIPFORMAT cf);

  DECLARE_IUNKNOWN_METHODS;

  // IEnumFORMATETC
  STDMETHODIMP Next(ULONG celt, FORMATETC *rgelt, ULONG *pceltFetched);
  STDMETHODIMP Skip(ULONG celt);
  STDMETHODIMP Reset();
  STDMETHODIMP Clone(IEnumFORMATETC **ppenum);

private:
  FORMATETC   m_format;   // (unique @@@) format we can provide data in
  ULONG       m_nCurrent; // current enum position (currently either 0 or 1)
};

// ----------------------------------------------------------------------------
// wxIDataObject implementation of IDataObject interface
// ----------------------------------------------------------------------------
class wxIDataObject : public IDataObject
{
public:
  wxIDataObject(wxDataObject *pDataObject);

  DECLARE_IUNKNOWN_METHODS;

  // IDataObject
  STDMETHODIMP GetData(FORMATETC *pformatetcIn, STGMEDIUM *pmedium);
  STDMETHODIMP GetDataHere(FORMATETC *pformatetc, STGMEDIUM *pmedium);
  STDMETHODIMP QueryGetData(FORMATETC *pformatetc);
  STDMETHODIMP GetCanonicalFormatEtc(FORMATETC *In, FORMATETC *pOut);
  STDMETHODIMP SetData(FORMATETC *pfetc, STGMEDIUM *pmedium, BOOL fRelease);
  STDMETHODIMP EnumFormatEtc(DWORD dwDirection, IEnumFORMATETC **ppenumFEtc);
  STDMETHODIMP DAdvise(FORMATETC *pfetc, DWORD ad, IAdviseSink *p, DWORD *pdw);
  STDMETHODIMP DUnadvise(DWORD dwConnection);
  STDMETHODIMP EnumDAdvise(IEnumSTATDATA **ppenumAdvise);

private:
  wxDataObject *m_pDataObject;      // pointer to C++ class we belong to
};

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

// ----------------------------------------------------------------------------
// wxIEnumFORMATETC
// ----------------------------------------------------------------------------

BEGIN_IID_TABLE(wxIEnumFORMATETC)
  ADD_IID(Unknown)
  ADD_IID(EnumFORMATETC)
END_IID_TABLE;

IMPLEMENT_IUNKNOWN_METHODS(wxIEnumFORMATETC)

wxIEnumFORMATETC::wxIEnumFORMATETC(CLIPFORMAT cf)
{
  m_format.cfFormat = cf;
  m_format.ptd      = NULL;
  m_format.dwAspect = DVASPECT_CONTENT;
  m_format.lindex   = -1;
  m_format.tymed    = TYMED_HGLOBAL;
  m_cRef = 0;
  m_nCurrent = 0;
}

STDMETHODIMP wxIEnumFORMATETC::Next(ULONG      celt,
                                    FORMATETC *rgelt,
                                    ULONG     *pceltFetched)
{
  wxLogTrace("wxIEnumFORMATETC::Next");

  if ( celt > 1 )
    return S_FALSE;

  if ( m_nCurrent == 0 ) {
    *rgelt = m_format;
    m_nCurrent++;

    return S_OK;
  }
  else
    return S_FALSE;
}

STDMETHODIMP wxIEnumFORMATETC::Skip(ULONG celt)
{
  wxLogTrace("wxIEnumFORMATETC::Skip");

  if ( m_nCurrent == 0 )
    m_nCurrent++;

  return S_FALSE;
}

STDMETHODIMP wxIEnumFORMATETC::Reset()
{
  wxLogTrace("wxIEnumFORMATETC::Reset");

  m_nCurrent = 0;

  return S_OK;
}

STDMETHODIMP wxIEnumFORMATETC::Clone(IEnumFORMATETC **ppenum)
{
  wxLogTrace("wxIEnumFORMATETC::Clone");

  wxIEnumFORMATETC *pNew = new wxIEnumFORMATETC(m_format.cfFormat);
  pNew->AddRef();
  *ppenum = pNew;

  return S_OK;
}

// ----------------------------------------------------------------------------
// wxIDataObject
// ----------------------------------------------------------------------------

BEGIN_IID_TABLE(wxIDataObject)
  ADD_IID(Unknown)
  ADD_IID(DataObject)
END_IID_TABLE;

IMPLEMENT_IUNKNOWN_METHODS(wxIDataObject)

wxIDataObject::wxIDataObject(wxDataObject *pDataObject)
{
  m_cRef = 0;
  m_pDataObject = pDataObject;
}

// get data functions
STDMETHODIMP wxIDataObject::GetData(FORMATETC *pformatetcIn, STGMEDIUM *pmedium)
{
  wxLogTrace("wxIDataObject::GetData");

  // is data is in our format?
  HRESULT hr = QueryGetData(pformatetcIn);
  if ( FAILED(hr) )
    return hr;

  // alloc memory
  HGLOBAL hGlobal = GlobalAlloc(GMEM_MOVEABLE | GMEM_SHARE,
                                m_pDataObject->GetDataSize());
  if ( hGlobal == NULL ) {
    wxLogLastError("GlobalAlloc");
    return E_OUTOFMEMORY;
  }

  // copy data
  pmedium->tymed          = TYMED_HGLOBAL;
  pmedium->hGlobal        = hGlobal;
  pmedium->pUnkForRelease = NULL;

  hr = GetDataHere(pformatetcIn, pmedium);
  if ( FAILED(hr) ) {
    GlobalFree(hGlobal);
    return hr;
  }

  return S_OK;
}

STDMETHODIMP wxIDataObject::GetDataHere(FORMATETC *pformatetc,
                                        STGMEDIUM *pmedium)
{
  wxLogTrace("wxIDataObject::GetDataHere");

  // put data in caller provided medium
  if ( pmedium->tymed != TYMED_HGLOBAL )
    return DV_E_TYMED;

  // copy data
  void *pBuf = GlobalLock(pmedium->hGlobal);
  if ( pBuf == NULL ) {
    wxLogLastError("GlobalLock");
    return E_OUTOFMEMORY;
  }

  m_pDataObject->GetDataHere(pBuf);

  GlobalUnlock(pmedium->hGlobal);

  return S_OK;
}

// set data functions (not implemented)
STDMETHODIMP wxIDataObject::SetData(FORMATETC *pformatetc,
                                    STGMEDIUM *pmedium,
                                    BOOL       fRelease)
{
  wxLogTrace("wxIDataObject::SetData");
  return E_NOTIMPL;
}

// information functions
STDMETHODIMP wxIDataObject::QueryGetData(FORMATETC *pformatetc)
{
  // do we accept data in this format?
  if ( pformatetc == NULL ) {
    wxLogTrace("wxIDataObject::QueryGetData: invalid ptr.");
    return E_INVALIDARG;
  }

  // the only one allowed by current COM implementation
  if ( pformatetc->lindex != -1 ) {
    wxLogTrace("wxIDataObject::QueryGetData: bad lindex %d",
               pformatetc->lindex);
    return DV_E_LINDEX;
  }

  // we don't support anything other (THUMBNAIL, ICON, DOCPRINT...)
  if ( pformatetc->dwAspect != DVASPECT_CONTENT ) {
    wxLogTrace("wxIDataObject::QueryGetData: bad dwAspect %d",
               pformatetc->dwAspect);
    return DV_E_DVASPECT;
  }

  // @@ we only transfer data by global memory (bad for large amounts of it!)
  if ( !(pformatetc->tymed & TYMED_HGLOBAL) ) {
    wxLogTrace("wxIDataObject::QueryGetData: %s != TYMED_HGLOBAL.",
               GetTymedName(pformatetc->tymed));
    return DV_E_TYMED;
  }

  // and now check the type of data requested
  if ( m_pDataObject->IsSupportedFormat((wxDataFormat) pformatetc->cfFormat) ) {
    wxLogTrace("wxIDataObject::QueryGetData: %s ok",
               wxDataObject::GetFormatName((wxDataFormat) pformatetc->cfFormat));
    return S_OK;
  }
  else {
    wxLogTrace("wxIDataObject::QueryGetData: %s unsupported",
               wxDataObject::GetFormatName((wxDataFormat) pformatetc->cfFormat));
    return DV_E_FORMATETC;
  }
}

STDMETHODIMP wxIDataObject::GetCanonicalFormatEtc(FORMATETC *pFormatetcIn,
                                                  FORMATETC *pFormatetcOut)
{
  wxLogTrace("wxIDataObject::GetCanonicalFormatEtc");

  // @@ implementation is trivial, we might want something better here
  if ( pFormatetcOut != NULL )
    pFormatetcOut->ptd = NULL;
  return DATA_S_SAMEFORMATETC;
}

STDMETHODIMP wxIDataObject::EnumFormatEtc(DWORD dwDirection,
                                          IEnumFORMATETC **ppenumFormatEtc)
{
  wxLogTrace("wxIDataObject::EnumFormatEtc");

  if ( dwDirection == DATADIR_SET ) {
    // we don't allow setting of data anyhow
    return E_NOTIMPL;
  }

  wxIEnumFORMATETC *pEnum =
    new wxIEnumFORMATETC(m_pDataObject->GetPreferredFormat());
  pEnum->AddRef();
  *ppenumFormatEtc = pEnum;

  return S_OK;
}

// advise sink functions (not implemented)
STDMETHODIMP wxIDataObject::DAdvise(FORMATETC   *pformatetc,
                                    DWORD        advf,
                                    IAdviseSink *pAdvSink,
                                    DWORD       *pdwConnection)
{
  return OLE_E_ADVISENOTSUPPORTED;
}

STDMETHODIMP wxIDataObject::DUnadvise(DWORD dwConnection)
{
  return OLE_E_ADVISENOTSUPPORTED;
}

STDMETHODIMP wxIDataObject::EnumDAdvise(IEnumSTATDATA **ppenumAdvise)
{
  return OLE_E_ADVISENOTSUPPORTED;
}

// ----------------------------------------------------------------------------
// wxDataObject
// ----------------------------------------------------------------------------

wxDataObject::wxDataObject()
{
  m_pIDataObject = new wxIDataObject(this);
  m_pIDataObject->AddRef();
}

wxDataObject::~wxDataObject()
{
  m_pIDataObject->Release();
}

const char *wxDataObject::GetFormatName(wxDataFormat format)
{
#ifdef __WXDEBUG__
  // case 'xxx' is not a valid value for switch of enum 'wxDataFormat'
  #ifdef __VISUALC__
    #pragma warning(disable:4063)
  #endif // VC++

  static char s_szBuf[128];
  switch ( format ) {
    case CF_TEXT:         return "CF_TEXT";
    case CF_BITMAP:       return "CF_BITMAP";
    case CF_METAFILEPICT: return "CF_METAFILEPICT";
    case CF_SYLK:         return "CF_SYLK";
    case CF_DIF:          return "CF_DIF";
    case CF_TIFF:         return "CF_TIFF";
    case CF_OEMTEXT:      return "CF_OEMTEXT";
    case CF_DIB:          return "CF_DIB";
    case CF_PALETTE:      return "CF_PALETTE";
    case CF_PENDATA:      return "CF_PENDATA";
    case CF_RIFF:         return "CF_RIFF";
    case CF_WAVE:         return "CF_WAVE";
    case CF_UNICODETEXT:  return "CF_UNICODETEXT";
    case CF_ENHMETAFILE:  return "CF_ENHMETAFILE";
    case CF_HDROP:        return "CF_HDROP";
    case CF_LOCALE:       return "CF_LOCALE";
    default:
      sprintf(s_szBuf, "clipboard format %d (unknown)", format);
      return s_szBuf;
  }

  #ifdef __VISUALC__
    #pragma warning(default:4063)
  #endif // VC++

#else // !Debug
  return "";
#endif // Debug
}

// ----------------------------------------------------------------------------
// private functions
// ----------------------------------------------------------------------------
static const char *GetTymedName(DWORD tymed)
{
  static char s_szBuf[128];
  switch ( tymed ) {
    case TYMED_HGLOBAL:   return "TYMED_HGLOBAL";
    case TYMED_FILE:      return "TYMED_FILE";
    case TYMED_ISTREAM:   return "TYMED_ISTREAM";
    case TYMED_ISTORAGE:  return "TYMED_ISTORAGE";
    case TYMED_GDI:       return "TYMED_GDI";
    case TYMED_MFPICT:    return "TYMED_MFPICT";
    case TYMED_ENHMF:     return "TYMED_ENHMF";
    default:
      sprintf(s_szBuf, "type of media format %d (unknown)", tymed);
      return s_szBuf;
  }
}

// TODO: OLE parts of wxBitmap/File/MetafileDataObject

#endif
Commit	Line	Data
269a5a34 VZ	1	///////////////////////////////////////////////////////////////////////////////
	2	// Name: msw/ole/dataobj.cpp
	3	// Purpose: implementation of wx[I]DataObject class
	4	// Author: Vadim Zeitlin
3f4a0c5b	5	// Modified by:
269a5a34 VZ	6	// Created: 10.05.98
	7	// RCS-ID: $Id$
	8	// Copyright: (c) 1998 Vadim Zeitlin <zeitlin@dptmaths.ens-cachan.fr>
	9	// Licence: wxWindows license
	10	///////////////////////////////////////////////////////////////////////////////
	11
	12	// ============================================================================
	13	// declarations
	14	// ============================================================================
	15
	16	// ----------------------------------------------------------------------------
	17	// headers
	18	// ----------------------------------------------------------------------------
	19
	20	#ifdef __GNUG__
	21	#pragma implementation "dataobj.h"
	22	#endif
	23
	24	// For compilers that support precompilation, includes "wx.h".
	25	#include "wx/wxprec.h"
	26
	27	#if defined(__BORLANDC__)
	28	#pragma hdrstop
	29	#endif
	30
5260b1c5 JS	31	#include <wx/defs.h>
5260b1c5 JS	32
cfe780fb	33	#if defined(__WIN32__) && !defined(__GNUWIN32__)
5260b1c5	34
269a5a34 VZ	35	#include <wx/log.h>
	36	#include <wx/msw/ole/oleutils.h>
	37	#include <wx/msw/ole/dataobj.h>
	38
	39	#ifndef __WIN32__
	40	#include <ole2.h>
	41	#include <olestd.h>
	42	#endif
	43
	44	// ----------------------------------------------------------------------------
	45	// functions
	46	// ----------------------------------------------------------------------------
	47
40e1a9c0	48	static const char *GetTymedName(DWORD tymed);
269a5a34 VZ	49
	50	// ----------------------------------------------------------------------------
	51	// wxIEnumFORMATETC interface implementation
	52	// ----------------------------------------------------------------------------
	53	class wxIEnumFORMATETC : public IEnumFORMATETC
	54	{
	55	public:
	56	wxIEnumFORMATETC(CLIPFORMAT cf);
	57
	58	DECLARE_IUNKNOWN_METHODS;
	59
	60	// IEnumFORMATETC
	61	STDMETHODIMP Next(ULONG celt, FORMATETC rgelt, ULONG pceltFetched);
	62	STDMETHODIMP Skip(ULONG celt);
	63	STDMETHODIMP Reset();
	64	STDMETHODIMP Clone(IEnumFORMATETC **ppenum);
	65
	66	private:
	67	FORMATETC m_format; // (unique @@@) format we can provide data in
	68	ULONG m_nCurrent; // current enum position (currently either 0 or 1)
	69	};
	70
	71	// ----------------------------------------------------------------------------
	72	// wxIDataObject implementation of IDataObject interface
	73	// ----------------------------------------------------------------------------
	74	class wxIDataObject : public IDataObject
	75	{
	76	public:
	77	wxIDataObject(wxDataObject *pDataObject);
	78
	79	DECLARE_IUNKNOWN_METHODS;
	80
	81	// IDataObject
	82	STDMETHODIMP GetData(FORMATETC pformatetcIn, STGMEDIUM pmedium);
	83	STDMETHODIMP GetDataHere(FORMATETC pformatetc, STGMEDIUM pmedium);
	84	STDMETHODIMP QueryGetData(FORMATETC *pformatetc);
	85	STDMETHODIMP GetCanonicalFormatEtc(FORMATETC In, FORMATETC pOut);
	86	STDMETHODIMP SetData(FORMATETC pfetc, STGMEDIUM pmedium, BOOL fRelease);
	87	STDMETHODIMP EnumFormatEtc(DWORD dwDirection, IEnumFORMATETC **ppenumFEtc);
	88	STDMETHODIMP DAdvise(FORMATETC pfetc, DWORD ad, IAdviseSink p, DWORD *pdw);
	89	STDMETHODIMP DUnadvise(DWORD dwConnection);
	90	STDMETHODIMP EnumDAdvise(IEnumSTATDATA **ppenumAdvise);
	91
	92	private:
	93	wxDataObject *m_pDataObject; // pointer to C++ class we belong to
	94	};
	95
	96	// ============================================================================
	97	// implementation
	98	// ============================================================================
	99
	100	// ----------------------------------------------------------------------------
	101	// wxIEnumFORMATETC
	102	// ----------------------------------------------------------------------------
	103
	104	BEGIN_IID_TABLE(wxIEnumFORMATETC)
	105	ADD_IID(Unknown)
	106	ADD_IID(EnumFORMATETC)
	107	END_IID_TABLE;
	108
	109	IMPLEMENT_IUNKNOWN_METHODS(wxIEnumFORMATETC)
	110
	111	wxIEnumFORMATETC::wxIEnumFORMATETC(CLIPFORMAT cf)
	112	{
113	m_format.cfFormat = cf;
114	m_format.ptd = NULL;
115	m_format.dwAspect = DVASPECT_CONTENT;
116	m_format.lindex = -1;
117	m_format.tymed = TYMED_HGLOBAL;
118	m_cRef = 0;
119	m_nCurrent = 0;
120	}
121
122	STDMETHODIMP wxIEnumFORMATETC::Next(ULONG celt,
123	FORMATETC *rgelt,
124	ULONG *pceltFetched)
125	{
126	wxLogTrace("wxIEnumFORMATETC::Next");
127
128	if ( celt > 1 )
129	return S_FALSE;
130
131	if ( m_nCurrent == 0 ) {
132	*rgelt = m_format;
133	m_nCurrent++;
134
135	return S_OK;
136	}
137	else
138	return S_FALSE;
139	}
140
141	STDMETHODIMP wxIEnumFORMATETC::Skip(ULONG celt)
142	{
143	wxLogTrace("wxIEnumFORMATETC::Skip");
144
145	if ( m_nCurrent == 0 )
146	m_nCurrent++;
147
148	return S_FALSE;
149	}
150
151	STDMETHODIMP wxIEnumFORMATETC::Reset()
152	{
153	wxLogTrace("wxIEnumFORMATETC::Reset");
154
155	m_nCurrent = 0;
156
157	return S_OK;
158	}
159
160	STDMETHODIMP wxIEnumFORMATETC::Clone(IEnumFORMATETC **ppenum)
161	{
162	wxLogTrace("wxIEnumFORMATETC::Clone");
163
164	wxIEnumFORMATETC *pNew = new wxIEnumFORMATETC(m_format.cfFormat);
165	pNew->AddRef();
166	*ppenum = pNew;
167
168	return S_OK;
169	}
170
171	// ----------------------------------------------------------------------------
172	// wxIDataObject
173	// ----------------------------------------------------------------------------
174
175	BEGIN_IID_TABLE(wxIDataObject)
176	ADD_IID(Unknown)
177	ADD_IID(DataObject)
178	END_IID_TABLE;
179
180	IMPLEMENT_IUNKNOWN_METHODS(wxIDataObject)
181
182	wxIDataObject::wxIDataObject(wxDataObject *pDataObject)
183	{
184	m_cRef = 0;
185	m_pDataObject = pDataObject;
186	}
187
188	// get data functions
189	STDMETHODIMP wxIDataObject::GetData(FORMATETC pformatetcIn, STGMEDIUM pmedium)
190	{
191	wxLogTrace("wxIDataObject::GetData");
192
193	// is data is in our format?
194	HRESULT hr = QueryGetData(pformatetcIn);
195	if ( FAILED(hr) )
196	return hr;
197
198	// alloc memory
199	HGLOBAL hGlobal = GlobalAlloc(GMEM_MOVEABLE \| GMEM_SHARE,
200	m_pDataObject->GetDataSize());
201	if ( hGlobal == NULL ) {
202	wxLogLastError("GlobalAlloc");
203	return E_OUTOFMEMORY;
204	}
205
206	// copy data
207	pmedium->tymed = TYMED_HGLOBAL;
208	pmedium->hGlobal = hGlobal;
209	pmedium->pUnkForRelease = NULL;
210
211	hr = GetDataHere(pformatetcIn, pmedium);
212	if ( FAILED(hr) ) {
213	GlobalFree(hGlobal);
214	return hr;
215	}
216
217	return S_OK;
218	}
219
220	STDMETHODIMP wxIDataObject::GetDataHere(FORMATETC *pformatetc,
221	STGMEDIUM *pmedium)
222	{
223	wxLogTrace("wxIDataObject::GetDataHere");
224
225	// put data in caller provided medium
226	if ( pmedium->tymed != TYMED_HGLOBAL )
227	return DV_E_TYMED;
228
229	// copy data
230	void *pBuf = GlobalLock(pmedium->hGlobal);
231	if ( pBuf == NULL ) {
232	wxLogLastError("GlobalLock");
233	return E_OUTOFMEMORY;
234	}
235
236	m_pDataObject->GetDataHere(pBuf);
237
238	GlobalUnlock(pmedium->hGlobal);
239
240	return S_OK;
241	}
242
243	// set data functions (not implemented)
244	STDMETHODIMP wxIDataObject::SetData(FORMATETC *pformatetc,
245	STGMEDIUM *pmedium,
246	BOOL fRelease)
247	{
248	wxLogTrace("wxIDataObject::SetData");
249	return E_NOTIMPL;
250	}
251
252	// information functions
253	STDMETHODIMP wxIDataObject::QueryGetData(FORMATETC *pformatetc)
254	{
255	// do we accept data in this format?
256	if ( pformatetc == NULL ) {
257	wxLogTrace("wxIDataObject::QueryGetData: invalid ptr.");
258	return E_INVALIDARG;
259	}
260
261	// the only one allowed by current COM implementation
262	if ( pformatetc->lindex != -1 ) {
263	wxLogTrace("wxIDataObject::QueryGetData: bad lindex %d",
264	pformatetc->lindex);
265	return DV_E_LINDEX;
266	}
267
268	// we don't support anything other (THUMBNAIL, ICON, DOCPRINT...)
269	if ( pformatetc->dwAspect != DVASPECT_CONTENT ) {
270	wxLogTrace("wxIDataObject::QueryGetData: bad dwAspect %d",
271	pformatetc->dwAspect);
272	return DV_E_DVASPECT;
273	}
274
275	// @@ we only transfer data by global memory (bad for large amounts of it!)
276	if ( !(pformatetc->tymed & TYMED_HGLOBAL) ) {
277	wxLogTrace("wxIDataObject::QueryGetData: %s != TYMED_HGLOBAL.",
278	GetTymedName(pformatetc->tymed));
279	return DV_E_TYMED;
280	}
281
282	// and now check the type of data requested
b3324be2	283	if ( m_pDataObject->IsSupportedFormat((wxDataFormat) pformatetc->cfFormat) ) {
269a5a34	284	wxLogTrace("wxIDataObject::QueryGetData: %s ok",
b3324be2	285	wxDataObject::GetFormatName((wxDataFormat) pformatetc->cfFormat));
269a5a34 VZ	286	return S_OK;
	287	}
	288	else {
	289	wxLogTrace("wxIDataObject::QueryGetData: %s unsupported",
b3324be2	290	wxDataObject::GetFormatName((wxDataFormat) pformatetc->cfFormat));
269a5a34 VZ	291	return DV_E_FORMATETC;
	292	}
	293	}
	294
	295	STDMETHODIMP wxIDataObject::GetCanonicalFormatEtc(FORMATETC *pFormatetcIn,
	296	FORMATETC *pFormatetcOut)
	297	{
	298	wxLogTrace("wxIDataObject::GetCanonicalFormatEtc");
	299
	300	// @@ implementation is trivial, we might want something better here
	301	if ( pFormatetcOut != NULL )
	302	pFormatetcOut->ptd = NULL;
	303	return DATA_S_SAMEFORMATETC;
	304	}
	305
	306	STDMETHODIMP wxIDataObject::EnumFormatEtc(DWORD dwDirection,
	307	IEnumFORMATETC **ppenumFormatEtc)
	308	{
	309	wxLogTrace("wxIDataObject::EnumFormatEtc");
	310
	311	if ( dwDirection == DATADIR_SET ) {
	312	// we don't allow setting of data anyhow
	313	return E_NOTIMPL;
	314	}
	315
3f4a0c5b	316	wxIEnumFORMATETC *pEnum =
269a5a34 VZ	317	new wxIEnumFORMATETC(m_pDataObject->GetPreferredFormat());
	318	pEnum->AddRef();
	319	*ppenumFormatEtc = pEnum;
	320
	321	return S_OK;
	322	}
	323
	324	// advise sink functions (not implemented)
	325	STDMETHODIMP wxIDataObject::DAdvise(FORMATETC *pformatetc,
	326	DWORD advf,
	327	IAdviseSink *pAdvSink,
	328	DWORD *pdwConnection)
	329	{
	330	return OLE_E_ADVISENOTSUPPORTED;
	331	}
	332
	333	STDMETHODIMP wxIDataObject::DUnadvise(DWORD dwConnection)
	334	{
	335	return OLE_E_ADVISENOTSUPPORTED;
	336	}
	337
	338	STDMETHODIMP wxIDataObject::EnumDAdvise(IEnumSTATDATA **ppenumAdvise)
	339	{
	340	return OLE_E_ADVISENOTSUPPORTED;
	341	}
	342
	343	// ----------------------------------------------------------------------------
	344	// wxDataObject
	345	// ----------------------------------------------------------------------------
	346
	347	wxDataObject::wxDataObject()
	348	{
	349	m_pIDataObject = new wxIDataObject(this);
	350	m_pIDataObject->AddRef();
	351	}
	352
	353	wxDataObject::~wxDataObject()
	354	{
	355	m_pIDataObject->Release();
	356	}
	357
269a5a34 VZ	358	const char *wxDataObject::GetFormatName(wxDataFormat format)
269a5a34 VZ	359	{
b2aef89b	360	#ifdef __WXDEBUG__
fd3f686c	361	// case 'xxx' is not a valid value for switch of enum 'wxDataFormat'
3f4a0c5b	362	#ifdef __VISUALC__
fd3f686c VZ	363	#pragma warning(disable:4063)
	364	#endif // VC++
	365
269a5a34 VZ	366	static char s_szBuf[128];
	367	switch ( format ) {
	368	case CF_TEXT: return "CF_TEXT";
	369	case CF_BITMAP: return "CF_BITMAP";
	370	case CF_METAFILEPICT: return "CF_METAFILEPICT";
	371	case CF_SYLK: return "CF_SYLK";
	372	case CF_DIF: return "CF_DIF";
	373	case CF_TIFF: return "CF_TIFF";
	374	case CF_OEMTEXT: return "CF_OEMTEXT";
	375	case CF_DIB: return "CF_DIB";
	376	case CF_PALETTE: return "CF_PALETTE";
	377	case CF_PENDATA: return "CF_PENDATA";
	378	case CF_RIFF: return "CF_RIFF";
	379	case CF_WAVE: return "CF_WAVE";
	380	case CF_UNICODETEXT: return "CF_UNICODETEXT";
	381	case CF_ENHMETAFILE: return "CF_ENHMETAFILE";
	382	case CF_HDROP: return "CF_HDROP";
	383	case CF_LOCALE: return "CF_LOCALE";
	384	default:
	385	sprintf(s_szBuf, "clipboard format %d (unknown)", format);
	386	return s_szBuf;
	387	}
fd3f686c	388
3f4a0c5b	389	#ifdef __VISUALC__
fd3f686c VZ	390	#pragma warning(default:4063)
	391	#endif // VC++
	392
	393	#else // !Debug
40e1a9c0	394	return "";
fd3f686c	395	#endif // Debug
269a5a34 VZ	396	}
	397
	398	// ----------------------------------------------------------------------------
	399	// private functions
	400	// ----------------------------------------------------------------------------
	401	static const char *GetTymedName(DWORD tymed)
	402	{
	403	static char s_szBuf[128];
	404	switch ( tymed ) {
	405	case TYMED_HGLOBAL: return "TYMED_HGLOBAL";
	406	case TYMED_FILE: return "TYMED_FILE";
	407	case TYMED_ISTREAM: return "TYMED_ISTREAM";
	408	case TYMED_ISTORAGE: return "TYMED_ISTORAGE";
	409	case TYMED_GDI: return "TYMED_GDI";
	410	case TYMED_MFPICT: return "TYMED_MFPICT";
	411	case TYMED_ENHMF: return "TYMED_ENHMF";
	412	default:
	413	sprintf(s_szBuf, "type of media format %d (unknown)", tymed);
	414	return s_szBuf;
	415	}
	416	}
5260b1c5	417
2845ddc2 JS	418	// TODO: OLE parts of wxBitmap/File/MetafileDataObject
2845ddc2 JS	419
5260b1c5 JS	420	#endif
5260b1c5 JS	421