X-Git-Url: https://git.saurik.com/wxWidgets.git/blobdiff_plain/8e193f384f7b98daef459653ddb8485173fba8ba..9045ad9dfc9d205ad645e6d496bec9ccddd91ced:/src/msw/ole/dataobj.cpp diff --git a/src/msw/ole/dataobj.cpp b/src/msw/ole/dataobj.cpp index f1eab4707c..6aa1b39762 100644 --- a/src/msw/ole/dataobj.cpp +++ b/src/msw/ole/dataobj.cpp @@ -18,45 +18,52 @@ // ---------------------------------------------------------------------------- #ifdef __GNUG__ - #pragma implementation "dataobj.h" + #pragma implementation "dataobj.h" #endif // For compilers that support precompilation, includes "wx.h". #include "wx/wxprec.h" #if defined(__BORLANDC__) - #pragma hdrstop + #pragma hdrstop #endif + #ifndef WX_PRECOMP -#include "wx/intl.h" + #include "wx/intl.h" + #include "wx/log.h" #endif -#include "wx/defs.h" - -#if defined(__WIN32__) && !defined(__GNUWIN32__) || defined(wxUSE_NORLANDER_HEADERS) -#include "wx/log.h" #include "wx/dataobj.h" -#include -#ifdef wxUSE_NORLANDER_HEADERS +#if wxUSE_OLE && defined(__WIN32__) && !defined(__GNUWIN32_OLD__) + +#include "wx/msw/private.h" // includes + +// for some compilers, the entire ole2.h must be included, not only oleauto.h +#if wxUSE_NORLANDER_HEADERS || defined(__WATCOMC__) #include #endif + #include +#include -#ifndef __WIN32__ - #include - #include -#endif +#include "wx/msw/ole/oleutils.h" + +#include "wx/msw/dib.h" -#include "wx/msw/ole/oleutils.h" +#ifndef CFSTR_SHELLURL +#define CFSTR_SHELLURL _T("UniformResourceLocator") +#endif // ---------------------------------------------------------------------------- // functions // ---------------------------------------------------------------------------- #ifdef __WXDEBUG__ - static const char *GetTymedName(DWORD tymed); -#endif // Debug + static const wxChar *GetTymedName(DWORD tymed); +#else // !Debug + #define GetTymedName(tymed) _T("") +#endif // Debug/!Debug // ---------------------------------------------------------------------------- // wxIEnumFORMATETC interface implementation @@ -66,7 +73,7 @@ class wxIEnumFORMATETC : public IEnumFORMATETC { public: wxIEnumFORMATETC(const wxDataFormat* formats, ULONG nCount); - ~wxIEnumFORMATETC() { delete [] m_formats; } + virtual ~wxIEnumFORMATETC() { delete [] m_formats; } DECLARE_IUNKNOWN_METHODS; @@ -80,6 +87,8 @@ private: CLIPFORMAT *m_formats; // formats we can provide data in ULONG m_nCount, // number of formats we support m_nCurrent; // current enum position + + DECLARE_NO_COPY_CLASS(wxIEnumFORMATETC) }; // ---------------------------------------------------------------------------- @@ -90,6 +99,12 @@ class wxIDataObject : public IDataObject { public: wxIDataObject(wxDataObject *pDataObject); + virtual ~wxIDataObject(); + + // normally, wxDataObject controls our lifetime (i.e. we're deleted when it + // is), but in some cases, the situation is inversed, that is we delete it + // when this object is deleted - setting this flag enables such logic + void SetDeleteFlag() { m_mustDelete = TRUE; } DECLARE_IUNKNOWN_METHODS; @@ -106,6 +121,10 @@ public: private: wxDataObject *m_pDataObject; // pointer to C++ class we belong to + + bool m_mustDelete; + + DECLARE_NO_COPY_CLASS(wxIDataObject) }; // ============================================================================ @@ -118,7 +137,7 @@ private: void wxDataFormat::SetId(const wxChar *format) { - m_format = ::RegisterClipboardFormat(format); + m_format = (wxDataFormat::NativeFormat)::RegisterClipboardFormat(format); if ( !m_format ) { wxLogError(_("Couldn't register clipboard format '%s'."), format); @@ -158,7 +177,6 @@ IMPLEMENT_IUNKNOWN_METHODS(wxIEnumFORMATETC) wxIEnumFORMATETC::wxIEnumFORMATETC(const wxDataFormat *formats, ULONG nCount) { - m_cRef = 0; m_nCurrent = 0; m_nCount = nCount; m_formats = new CLIPFORMAT[nCount]; @@ -169,7 +187,7 @@ wxIEnumFORMATETC::wxIEnumFORMATETC(const wxDataFormat *formats, ULONG nCount) STDMETHODIMP wxIEnumFORMATETC::Next(ULONG celt, FORMATETC *rgelt, - ULONG *pceltFetched) + ULONG *WXUNUSED(pceltFetched)) { wxLogTrace(wxTRACE_OleCalls, wxT("wxIEnumFORMATETC::Next")); @@ -249,8 +267,16 @@ IMPLEMENT_IUNKNOWN_METHODS(wxIDataObject) wxIDataObject::wxIDataObject(wxDataObject *pDataObject) { - m_cRef = 0; m_pDataObject = pDataObject; + m_mustDelete = FALSE; +} + +wxIDataObject::~wxIDataObject() +{ + if ( m_mustDelete ) + { + delete m_pDataObject; + } } // get data functions @@ -265,7 +291,7 @@ STDMETHODIMP wxIDataObject::GetData(FORMATETC *pformatetcIn, STGMEDIUM *pmedium) // for the bitmaps and metafiles we use the handles instead of global memory // to pass the data - wxDataFormat format = (wxDataFormatId)pformatetcIn->cfFormat; + wxDataFormat format = (wxDataFormat::NativeFormat)pformatetcIn->cfFormat; switch ( format ) { @@ -273,7 +299,17 @@ STDMETHODIMP wxIDataObject::GetData(FORMATETC *pformatetcIn, STGMEDIUM *pmedium) pmedium->tymed = TYMED_GDI; break; + case wxDF_ENHMETAFILE: + pmedium->tymed = TYMED_ENHMF; + break; + case wxDF_METAFILE: + pmedium->hGlobal = GlobalAlloc(GMEM_MOVEABLE | GMEM_SHARE, + sizeof(METAFILEPICT)); + if ( !pmedium->hGlobal ) { + wxLogLastError(wxT("GlobalAlloc")); + return E_OUTOFMEMORY; + } pmedium->tymed = TYMED_MFPICT; break; @@ -287,9 +323,17 @@ STDMETHODIMP wxIDataObject::GetData(FORMATETC *pformatetcIn, STGMEDIUM *pmedium) return DV_E_FORMATETC; } + if ( !format.IsStandard() ) { + // for custom formats, put the size with the data - alloc the + // space for it + // MB: not completely sure this is correct, + // even if I can't figure out what's wrong + size += m_pDataObject->GetBufferOffset( format ); + } + HGLOBAL hGlobal = GlobalAlloc(GMEM_MOVEABLE | GMEM_SHARE, size); if ( hGlobal == NULL ) { - wxLogLastError("GlobalAlloc"); + wxLogLastError(wxT("GlobalAlloc")); return E_OUTOFMEMORY; } @@ -304,7 +348,7 @@ STDMETHODIMP wxIDataObject::GetData(FORMATETC *pformatetcIn, STGMEDIUM *pmedium) hr = GetDataHere(pformatetcIn, pmedium); if ( FAILED(hr) ) { // free resources we allocated - if ( pmedium->tymed == TYMED_HGLOBAL ) { + if ( pmedium->tymed & (TYMED_HGLOBAL | TYMED_MFPICT) ) { GlobalFree(pmedium->hGlobal); } @@ -323,28 +367,39 @@ STDMETHODIMP wxIDataObject::GetDataHere(FORMATETC *pformatetc, switch ( pmedium->tymed ) { case TYMED_GDI: - m_pDataObject->GetDataHere(wxDF_BITMAP, &pmedium->hBitmap); + if ( !m_pDataObject->GetDataHere(wxDF_BITMAP, &pmedium->hBitmap) ) + return E_UNEXPECTED; break; - case TYMED_MFPICT: - // this should be copied on bitmaps - but I don't have time for - // this now - wxFAIL_MSG(wxT("TODO - no support for metafiles in wxDataObject")); + case TYMED_ENHMF: + if ( !m_pDataObject->GetDataHere(wxDF_ENHMETAFILE, + &pmedium->hEnhMetaFile) ) + return E_UNEXPECTED; break; + case TYMED_MFPICT: + // fall through - we pass METAFILEPICT through HGLOBAL + case TYMED_HGLOBAL: { // copy data - void *pBuf = GlobalLock(pmedium->hGlobal); + HGLOBAL hGlobal = pmedium->hGlobal; + void *pBuf = GlobalLock(hGlobal); if ( pBuf == NULL ) { wxLogLastError(wxT("GlobalLock")); return E_OUTOFMEMORY; } - wxDataFormat format = (wxDataFormatId)pformatetc->cfFormat; - m_pDataObject->GetDataHere(format, pBuf); + wxDataFormat format = pformatetc->cfFormat; + if ( !format.IsStandard() ) { + // for custom formats, put the size with the data + pBuf = m_pDataObject->SetSizeInBuffer( pBuf, GlobalSize(hGlobal), format ); + } - GlobalUnlock(pmedium->hGlobal); + if ( !m_pDataObject->GetDataHere(format, pBuf) ) + return E_UNEXPECTED; + + GlobalUnlock(hGlobal); } break; @@ -355,74 +410,197 @@ STDMETHODIMP wxIDataObject::GetDataHere(FORMATETC *pformatetc, return S_OK; } -// set data functions (not implemented) +// set data functions STDMETHODIMP wxIDataObject::SetData(FORMATETC *pformatetc, STGMEDIUM *pmedium, BOOL fRelease) { - wxLogTrace(wxTRACE_OleCalls, wxT("wxIDataObject::SetData")); + wxLogTrace(wxTRACE_OleCalls, wxT("wxIDataObject::SetData")); + + switch ( pmedium->tymed ) + { + case TYMED_GDI: + m_pDataObject->SetData(wxDF_BITMAP, 0, &pmedium->hBitmap); + break; + + case TYMED_ENHMF: + m_pDataObject->SetData(wxDF_ENHMETAFILE, 0, &pmedium->hEnhMetaFile); + break; + + case TYMED_MFPICT: + // fall through - we pass METAFILEPICT through HGLOBAL + case TYMED_HGLOBAL: + { + wxDataFormat format = pformatetc->cfFormat; + + // this is quite weird, but for file drag and drop, explorer + // calls our SetData() with the formats we do *not* support! + // + // as we can't fix this bug in explorer (it's a bug because it + // should only use formats returned by EnumFormatEtc), do the + // check here + if ( !m_pDataObject->IsSupportedFormat(format) ) { + // go away! + return DV_E_FORMATETC; + } + + // copy data + const void *pBuf = GlobalLock(pmedium->hGlobal); + if ( pBuf == NULL ) { + wxLogLastError(wxT("GlobalLock")); - return E_NOTIMPL; + return E_OUTOFMEMORY; + } + + // we've got a problem with SetData() here because the base + // class version requires the size parameter which we don't + // have anywhere in OLE data transfer - so we need to + // synthetise it for known formats and we suppose that all data + // in custom formats starts with a DWORD containing the size + size_t size; + switch ( format ) + { + case CF_TEXT: + case CF_OEMTEXT: + size = strlen((const char *)pBuf); + break; +#if !defined(__WATCOMC__) && ! (defined(__BORLANDC__) && (__BORLANDC__ < 0x500)) + case CF_UNICODETEXT: +#if ( defined(__BORLANDC__) && (__BORLANDC__ > 0x530) ) \ + || ( defined(__MWERKS__) && defined(__WXMSW__) ) + size = std::wcslen((const wchar_t *)pBuf) * sizeof(wchar_t); +#else + size = wxWcslen((const wchar_t *)pBuf) * sizeof(wchar_t); +#endif + break; +#endif + case CF_BITMAP: + case CF_HDROP: + // these formats don't use size at all, anyhow (but + // pass data by handle, which is always a single DWORD) + size = 0; + break; + + case CF_DIB: + // the handler will calculate size itself (it's too + // complicated to do it here) + size = 0; + break; + + case CF_METAFILEPICT: + size = sizeof(METAFILEPICT); + break; + + default: + { + // we suppose that the size precedes the data + pBuf = m_pDataObject->GetSizeFromBuffer( pBuf, &size, format ); + if (! format.IsStandard() ) { + // see GetData for coresponding increment + size -= m_pDataObject->GetBufferOffset( format ); + } + } + } + + bool ok = m_pDataObject->SetData(format, size, pBuf); + + GlobalUnlock(pmedium->hGlobal); + + if ( !ok ) { + return E_UNEXPECTED; + } + } + break; + + default: + return DV_E_TYMED; + } + + if ( fRelease ) { + // we own the medium, so we must release it - but do *not* free any + // data we pass by handle because we have copied it elsewhere + switch ( pmedium->tymed ) + { + case TYMED_GDI: + pmedium->hBitmap = 0; + break; + + case TYMED_MFPICT: + pmedium->hMetaFilePict = 0; + break; + + case TYMED_ENHMF: + pmedium->hEnhMetaFile = 0; + break; + } + + ReleaseStgMedium(pmedium); + } + + return S_OK; } // information functions STDMETHODIMP wxIDataObject::QueryGetData(FORMATETC *pformatetc) { - // do we accept data in this format? - if ( pformatetc == NULL ) { - wxLogTrace(wxTRACE_OleCalls, wxT("wxIDataObject::QueryGetData: invalid ptr.")); - - return E_INVALIDARG; - } - - // the only one allowed by current COM implementation - if ( pformatetc->lindex != -1 ) { - wxLogTrace(wxTRACE_OleCalls, - wxT("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(wxTRACE_OleCalls, - wxT("wxIDataObject::QueryGetData: bad dwAspect %d"), - pformatetc->dwAspect); - return DV_E_DVASPECT; - } - - // we only transfer data by global memory, except for some particular cases - wxDataFormat format = (wxDataFormatId)pformatetc->cfFormat; - DWORD tymed = pformatetc->tymed; - if ( (format == wxDF_BITMAP && !(tymed & TYMED_GDI)) || - !(tymed & TYMED_HGLOBAL) ) { - // it's not what we're waiting for -#ifdef __WXDEBUG__ - wxLogTrace(wxTRACE_OleCalls, - wxT("wxIDataObject::QueryGetData: %s & %s == 0."), - GetTymedName(tymed), - GetTymedName(format == wxDF_BITMAP ? TYMED_GDI : TYMED_HGLOBAL)); -#endif // Debug - return DV_E_TYMED; - } + // do we accept data in this format? + if ( pformatetc == NULL ) { + wxLogTrace(wxTRACE_OleCalls, + wxT("wxIDataObject::QueryGetData: invalid ptr.")); + + return E_INVALIDARG; + } + + // the only one allowed by current COM implementation + if ( pformatetc->lindex != -1 ) { + wxLogTrace(wxTRACE_OleCalls, + wxT("wxIDataObject::QueryGetData: bad lindex %ld"), + pformatetc->lindex); + + return DV_E_LINDEX; + } + + // we don't support anything other (THUMBNAIL, ICON, DOCPRINT...) + if ( pformatetc->dwAspect != DVASPECT_CONTENT ) { + wxLogTrace(wxTRACE_OleCalls, + wxT("wxIDataObject::QueryGetData: bad dwAspect %ld"), + pformatetc->dwAspect); + + return DV_E_DVASPECT; + } + + // and now check the type of data requested + wxDataFormat format = pformatetc->cfFormat; + if ( m_pDataObject->IsSupportedFormat(format) ) { + wxLogTrace(wxTRACE_OleCalls, wxT("wxIDataObject::QueryGetData: %s ok"), + wxGetFormatName(format)); + } + else { + wxLogTrace(wxTRACE_OleCalls, + wxT("wxIDataObject::QueryGetData: %s unsupported"), + wxGetFormatName(format)); + + return DV_E_FORMATETC; + } + + // we only transfer data by global memory, except for some particular cases + DWORD tymed = pformatetc->tymed; + if ( (format == wxDF_BITMAP && !(tymed & TYMED_GDI)) && + !(tymed & TYMED_HGLOBAL) ) { + // it's not what we're waiting for + wxLogTrace(wxTRACE_OleCalls, + wxT("wxIDataObject::QueryGetData: %s != %s"), + GetTymedName(tymed), + GetTymedName(format == wxDF_BITMAP ? TYMED_GDI + : TYMED_HGLOBAL)); + + return DV_E_TYMED; + } - // and now check the type of data requested - if ( m_pDataObject->IsSupportedFormat(format) ) { -#ifdef __WXDEBUG__ - wxLogTrace(wxTRACE_OleCalls, wxT("wxIDataObject::QueryGetData: %s ok"), - wxDataObject::GetFormatName(format)); -#endif // Debug return S_OK; - } - else { - wxLogTrace(wxTRACE_OleCalls, - wxT("wxIDataObject::QueryGetData: %s unsupported"), - wxDataObject::GetFormatName((wxDataFormatId)pformatetc->cfFormat)); - return DV_E_FORMATETC; - } } -STDMETHODIMP wxIDataObject::GetCanonicalFormatEtc(FORMATETC *pFormatetcIn, +STDMETHODIMP wxIDataObject::GetCanonicalFormatEtc(FORMATETC *WXUNUSED(pFormatetcIn), FORMATETC *pFormatetcOut) { wxLogTrace(wxTRACE_OleCalls, wxT("wxIDataObject::GetCanonicalFormatEtc")); @@ -434,28 +612,19 @@ STDMETHODIMP wxIDataObject::GetCanonicalFormatEtc(FORMATETC *pFormatetcIn, return DATA_S_SAMEFORMATETC; } -STDMETHODIMP wxIDataObject::EnumFormatEtc(DWORD dwDirection, +STDMETHODIMP wxIDataObject::EnumFormatEtc(DWORD dwDir, IEnumFORMATETC **ppenumFormatEtc) { wxLogTrace(wxTRACE_OleCalls, wxT("wxIDataObject::EnumFormatEtc")); - if ( dwDirection == DATADIR_SET ) { - // we don't allow setting of data anyhow - return E_NOTIMPL; - } + wxDataObject::Direction dir = dwDir == DATADIR_GET ? wxDataObject::Get + : wxDataObject::Set; - size_t nFormatCount = m_pDataObject->GetFormatCount(); - wxDataFormat format, *formats; - if ( nFormatCount == 1 ) { - // this is the most common case, this is why we consider it separately - formats = &format; - format = m_pDataObject->GetPreferredFormat(); - } - else { - // bad luck, build the array with all formats - formats = new wxDataFormat[nFormatCount]; - m_pDataObject->GetAllFormats(formats); - } + size_t nFormatCount = m_pDataObject->GetFormatCount(dir); + wxDataFormat format; + wxDataFormat *formats; + formats = nFormatCount == 1 ? &format : new wxDataFormat[nFormatCount]; + m_pDataObject->GetAllFormats(formats, dir); wxIEnumFORMATETC *pEnum = new wxIEnumFORMATETC(formats, nFormatCount); pEnum->AddRef(); @@ -468,21 +637,24 @@ STDMETHODIMP wxIDataObject::EnumFormatEtc(DWORD dwDirection, return S_OK; } +// ---------------------------------------------------------------------------- // advise sink functions (not implemented) -STDMETHODIMP wxIDataObject::DAdvise(FORMATETC *pformatetc, - DWORD advf, - IAdviseSink *pAdvSink, - DWORD *pdwConnection) +// ---------------------------------------------------------------------------- + +STDMETHODIMP wxIDataObject::DAdvise(FORMATETC *WXUNUSED(pformatetc), + DWORD WXUNUSED(advf), + IAdviseSink *WXUNUSED(pAdvSink), + DWORD *WXUNUSED(pdwConnection)) { return OLE_E_ADVISENOTSUPPORTED; } -STDMETHODIMP wxIDataObject::DUnadvise(DWORD dwConnection) +STDMETHODIMP wxIDataObject::DUnadvise(DWORD WXUNUSED(dwConnection)) { return OLE_E_ADVISENOTSUPPORTED; } -STDMETHODIMP wxIDataObject::EnumDAdvise(IEnumSTATDATA **ppenumAdvise) +STDMETHODIMP wxIDataObject::EnumDAdvise(IEnumSTATDATA **WXUNUSED(ppenumAdvise)) { return OLE_E_ADVISENOTSUPPORTED; } @@ -493,162 +665,676 @@ STDMETHODIMP wxIDataObject::EnumDAdvise(IEnumSTATDATA **ppenumAdvise) wxDataObject::wxDataObject() { - m_pIDataObject = new wxIDataObject(this); - m_pIDataObject->AddRef(); + m_pIDataObject = new wxIDataObject(this); + m_pIDataObject->AddRef(); } wxDataObject::~wxDataObject() { - m_pIDataObject->Release(); + ReleaseInterface(m_pIDataObject); } -bool wxDataObject::IsSupportedFormat(const wxDataFormat& format) const +void wxDataObject::SetAutoDelete() { - size_t nFormatCount = GetFormatCount(); - if ( nFormatCount == 1 ) { - return format == GetPreferredFormat(); - } - else { - wxDataFormat *formats = new wxDataFormat[nFormatCount]; - GetAllFormats(formats); + ((wxIDataObject *)m_pIDataObject)->SetDeleteFlag(); + m_pIDataObject->Release(); - size_t n; - for ( n = 0; n < nFormatCount; n++ ) { - if ( formats[n] == format ) - break; - } + // so that the dtor doesnt' crash + m_pIDataObject = NULL; +} - delete [] formats; +size_t wxDataObject::GetBufferOffset( const wxDataFormat& WXUNUSED(format) ) +{ + return sizeof(size_t); +} - // found? - return n < nFormatCount; - } +const void* wxDataObject::GetSizeFromBuffer( const void* buffer, size_t* size, + const wxDataFormat& WXUNUSED(format) ) +{ + size_t* p = (size_t*)buffer; + *size = *p; + + return p + 1; +} + +void* wxDataObject::SetSizeInBuffer( void* buffer, size_t size, + const wxDataFormat& WXUNUSED(format) ) +{ + size_t* p = (size_t*)buffer; + *p = size; + + return p + 1; } #ifdef __WXDEBUG__ -const char *wxDataObject::GetFormatName(wxDataFormat format) -{ - // 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++ + +const wxChar *wxDataObject::GetFormatName(wxDataFormat format) +{ + // case 'xxx' is not a valid value for switch of enum 'wxDataFormat' + #ifdef __VISUALC__ + #pragma warning(disable:4063) + #endif // VC++ + + static wxChar s_szBuf[256]; + switch ( format ) { + case CF_TEXT: return wxT("CF_TEXT"); + case CF_BITMAP: return wxT("CF_BITMAP"); + case CF_METAFILEPICT: return wxT("CF_METAFILEPICT"); + case CF_SYLK: return wxT("CF_SYLK"); + case CF_DIF: return wxT("CF_DIF"); + case CF_TIFF: return wxT("CF_TIFF"); + case CF_OEMTEXT: return wxT("CF_OEMTEXT"); + case CF_DIB: return wxT("CF_DIB"); + case CF_PALETTE: return wxT("CF_PALETTE"); + case CF_PENDATA: return wxT("CF_PENDATA"); + case CF_RIFF: return wxT("CF_RIFF"); + case CF_WAVE: return wxT("CF_WAVE"); + case CF_UNICODETEXT: return wxT("CF_UNICODETEXT"); + case CF_ENHMETAFILE: return wxT("CF_ENHMETAFILE"); + case CF_HDROP: return wxT("CF_HDROP"); + case CF_LOCALE: return wxT("CF_LOCALE"); + + default: + if ( !::GetClipboardFormatName(format, s_szBuf, WXSIZEOF(s_szBuf)) ) + { + // it must be a new predefined format we don't know the name of + wxSprintf(s_szBuf, wxT("unknown CF (0x%04x)"), format.GetFormatId()); + } + + return s_szBuf; + } + + #ifdef __VISUALC__ + #pragma warning(default:4063) + #endif // VC++ } + #endif // Debug // ---------------------------------------------------------------------------- -// wxPrivateDataObject +// wxBitmapDataObject supports CF_DIB format // ---------------------------------------------------------------------------- -wxPrivateDataObject::wxPrivateDataObject() +size_t wxBitmapDataObject::GetDataSize() const { - m_size = 0; - m_data = NULL; + return wxConvertBitmapToDIB(NULL, GetBitmap()); } -void wxPrivateDataObject::Free() +bool wxBitmapDataObject::GetDataHere(void *buf) const { - if ( m_data ) - free(m_data); + return wxConvertBitmapToDIB((LPBITMAPINFO)buf, GetBitmap()) != 0; } -void wxPrivateDataObject::SetData( const void *data, size_t size ) +bool wxBitmapDataObject::SetData(size_t WXUNUSED(len), const void *buf) { - Free(); + wxBitmap bitmap(wxConvertDIBToBitmap((const LPBITMAPINFO)buf)); + + if ( !bitmap.Ok() ) { + wxFAIL_MSG(wxT("pasting/dropping invalid bitmap")); + + return FALSE; + } + + SetBitmap(bitmap); + + return TRUE; +} + +// ---------------------------------------------------------------------------- +// wxBitmapDataObject2 supports CF_BITMAP format +// ---------------------------------------------------------------------------- - m_size = size; - m_data = malloc(size); +// the bitmaps aren't passed by value as other types of data (i.e. by copying +// the data into a global memory chunk and passing it to the clipboard or +// another application or whatever), but by handle, so these generic functions +// don't make much sense to them. - memcpy( m_data, data, size ); +size_t wxBitmapDataObject2::GetDataSize() const +{ + return 0; } -void wxPrivateDataObject::WriteData( void *dest ) const +bool wxBitmapDataObject2::GetDataHere(void *pBuf) const { - WriteData( m_data, dest ); + // we put a bitmap handle into pBuf + *(WXHBITMAP *)pBuf = GetBitmap().GetHBITMAP(); + + return TRUE; } -size_t wxPrivateDataObject::GetSize() const +bool wxBitmapDataObject2::SetData(size_t WXUNUSED(len), const void *pBuf) { - return m_size; + HBITMAP hbmp = *(HBITMAP *)pBuf; + + BITMAP bmp; + if ( !GetObject(hbmp, sizeof(BITMAP), &bmp) ) + { + wxLogLastError(wxT("GetObject(HBITMAP)")); + } + + wxBitmap bitmap(bmp.bmWidth, bmp.bmHeight, bmp.bmPlanes); + bitmap.SetHBITMAP((WXHBITMAP)hbmp); + + if ( !bitmap.Ok() ) { + wxFAIL_MSG(wxT("pasting/dropping invalid bitmap")); + + return FALSE; + } + + SetBitmap(bitmap); + + return TRUE; } -void wxPrivateDataObject::WriteData( const void *data, void *dest ) const +#if 0 + +size_t wxBitmapDataObject::GetDataSize(const wxDataFormat& format) const { - memcpy( dest, data, GetSize() ); + if ( format.GetFormatId() == CF_DIB ) + { + // create the DIB + ScreenHDC hdc; + + // shouldn't be selected into a DC or GetDIBits() would fail + wxASSERT_MSG( !m_bitmap.GetSelectedInto(), + wxT("can't copy bitmap selected into wxMemoryDC") ); + + // first get the info + BITMAPINFO bi; + if ( !GetDIBits(hdc, (HBITMAP)m_bitmap.GetHBITMAP(), 0, 0, + NULL, &bi, DIB_RGB_COLORS) ) + { + wxLogLastError(wxT("GetDIBits(NULL)")); + + return 0; + } + + return sizeof(BITMAPINFO) + bi.bmiHeader.biSizeImage; + } + else // CF_BITMAP + { + // no data to copy - we don't pass HBITMAP via global memory + return 0; + } } +bool wxBitmapDataObject::GetDataHere(const wxDataFormat& format, + void *pBuf) const +{ + wxASSERT_MSG( m_bitmap.Ok(), wxT("copying invalid bitmap") ); + + HBITMAP hbmp = (HBITMAP)m_bitmap.GetHBITMAP(); + if ( format.GetFormatId() == CF_DIB ) + { + // create the DIB + ScreenHDC hdc; + + // shouldn't be selected into a DC or GetDIBits() would fail + wxASSERT_MSG( !m_bitmap.GetSelectedInto(), + wxT("can't copy bitmap selected into wxMemoryDC") ); + + // first get the info + BITMAPINFO *pbi = (BITMAPINFO *)pBuf; + if ( !GetDIBits(hdc, hbmp, 0, 0, NULL, pbi, DIB_RGB_COLORS) ) + { + wxLogLastError(wxT("GetDIBits(NULL)")); + + return 0; + } + + // and now copy the bits + if ( !GetDIBits(hdc, hbmp, 0, pbi->bmiHeader.biHeight, pbi + 1, + pbi, DIB_RGB_COLORS) ) + { + wxLogLastError(wxT("GetDIBits")); + + return FALSE; + } + } + else // CF_BITMAP + { + // we put a bitmap handle into pBuf + *(HBITMAP *)pBuf = hbmp; + } + + return TRUE; +} + +bool wxBitmapDataObject::SetData(const wxDataFormat& format, + size_t size, const void *pBuf) +{ + HBITMAP hbmp; + if ( format.GetFormatId() == CF_DIB ) + { + // here we get BITMAPINFO struct followed by the actual bitmap bits and + // BITMAPINFO starts with BITMAPINFOHEADER followed by colour info + ScreenHDC hdc; + + BITMAPINFO *pbmi = (BITMAPINFO *)pBuf; + BITMAPINFOHEADER *pbmih = &pbmi->bmiHeader; + hbmp = CreateDIBitmap(hdc, pbmih, CBM_INIT, + pbmi + 1, pbmi, DIB_RGB_COLORS); + if ( !hbmp ) + { + wxLogLastError(wxT("CreateDIBitmap")); + } + + m_bitmap.SetWidth(pbmih->biWidth); + m_bitmap.SetHeight(pbmih->biHeight); + } + else // CF_BITMAP + { + // it's easy with bitmaps: we pass them by handle + hbmp = *(HBITMAP *)pBuf; + + BITMAP bmp; + if ( !GetObject(hbmp, sizeof(BITMAP), &bmp) ) + { + wxLogLastError(wxT("GetObject(HBITMAP)")); + } + + m_bitmap.SetWidth(bmp.bmWidth); + m_bitmap.SetHeight(bmp.bmHeight); + m_bitmap.SetDepth(bmp.bmPlanes); + } + + m_bitmap.SetHBITMAP((WXHBITMAP)hbmp); + + wxASSERT_MSG( m_bitmap.Ok(), wxT("pasting invalid bitmap") ); + + return TRUE; +} + +#endif // 0 + // ---------------------------------------------------------------------------- -// wxBitmapDataObject +// wxFileDataObject // ---------------------------------------------------------------------------- -// the bitmaps aren't passed by value as other types of data (i.e. by copyign -// the data into a global memory chunk and passing it to the clipboard or -// another application or whatever), but by handle, so these generic functions -// don't make much sense to them. +bool wxFileDataObject::SetData(size_t WXUNUSED(size), const void *pData) +{ + m_filenames.Empty(); + + // the documentation states that the first member of DROPFILES structure is + // a "DWORD offset of double NUL terminated file list". What they mean by + // this (I wonder if you see it immediately) is that the list starts at + // ((char *)&(pDropFiles.pFiles)) + pDropFiles.pFiles. We're also advised + // to use DragQueryFile to work with this structure, but not told where and + // how to get HDROP. + HDROP hdrop = (HDROP)pData; // NB: it works, but I'm not sure about it + + // get number of files (magic value -1) + UINT nFiles = ::DragQueryFile(hdrop, (unsigned)-1, NULL, 0u); + + wxCHECK_MSG ( nFiles != (UINT)-1, FALSE, wxT("wrong HDROP handle") ); + + // for each file get the length, allocate memory and then get the name + wxString str; + UINT len, n; + for ( n = 0; n < nFiles; n++ ) { + // +1 for terminating NUL + len = ::DragQueryFile(hdrop, n, NULL, 0) + 1; + + UINT len2 = ::DragQueryFile(hdrop, n, str.GetWriteBuf(len), len); + str.UngetWriteBuf(); + m_filenames.Add(str); + + if ( len2 != len - 1 ) { + wxLogDebug(wxT("In wxFileDropTarget::OnDrop DragQueryFile returned\ + %d characters, %d expected."), len2, len - 1); + } + } -size_t wxBitmapDataObject::GetDataSize(const wxDataFormat& format) const + return TRUE; +} + +void wxFileDataObject::AddFile(const wxString& file) { - // no data to copy anyhow - return 0; + // just add file to filenames array + // all useful data (such as DROPFILES struct) will be + // created later as necessary + m_filenames.Add(file); } -void wxBitmapDataObject::GetDataHere(const wxDataFormat& format, - void *pBuf) const +size_t wxFileDataObject::GetDataSize() const { - // we put a bitmap handle into pBuf - *(WXHBITMAP *)pBuf = m_bitmap.GetHBITMAP(); + // size returned will be the size of the DROPFILES structure, + // plus the list of filesnames (null byte separated), plus + // a double null at the end + + // if no filenames in list, size is 0 + if ( m_filenames.GetCount() == 0 ) + return 0; + + // inital size of DROPFILES struct + null byte + size_t sz = sizeof(DROPFILES) + 1; + + size_t count = m_filenames.GetCount(); + for ( size_t i = 0; i < count; i++ ) + { + // add filename length plus null byte + sz += m_filenames[i].Len() + 1; + } + + return sz; +} + +bool wxFileDataObject::GetDataHere(void *pData) const +{ + // pData points to an externally allocated memory block + // created using the size returned by GetDataSize() + + // if pData is NULL, or there are no files, return + if ( !pData || m_filenames.GetCount() == 0 ) + return FALSE; + + // convert data pointer to a DROPFILES struct pointer + LPDROPFILES pDrop = (LPDROPFILES) pData; + + // initialize DROPFILES struct + pDrop->pFiles = sizeof(DROPFILES); + pDrop->fNC = FALSE; // not non-client coords +#if wxUSE_UNICODE + pDrop->fWide = TRUE; +#else // ANSI + pDrop->fWide = FALSE; +#endif // Unicode/Ansi + + // set start of filenames list (null separated) + wxChar *pbuf = (wxChar*) ((BYTE *)pDrop + sizeof(DROPFILES)); + + size_t count = m_filenames.GetCount(); + for (size_t i = 0; i < count; i++ ) + { + // copy filename to pbuf and add null terminator + size_t len = m_filenames[i].Len(); + memcpy(pbuf, m_filenames[i], len); + pbuf += len; + *pbuf++ = wxT('\0'); + } + + // add final null terminator + *pbuf = wxT('\0'); + + return TRUE; +} + +// ---------------------------------------------------------------------------- +// wxURLDataObject +// ---------------------------------------------------------------------------- + +class CFSTR_SHELLURLDataObject : public wxCustomDataObject +{ +public: + CFSTR_SHELLURLDataObject() : wxCustomDataObject(CFSTR_SHELLURL) {} +protected: + virtual size_t GetBufferOffset( const wxDataFormat& WXUNUSED(format) ) + { + return 0; + } + + virtual const void* GetSizeFromBuffer( const void* buffer, size_t* size, + const wxDataFormat& WXUNUSED(format) ) + { + // CFSTR_SHELLURL is _always_ ANSI text + *size = strlen( (const char*)buffer ); + + return buffer; + } + + virtual void* SetSizeInBuffer( void* buffer, size_t WXUNUSED(size), + const wxDataFormat& WXUNUSED(format) ) + { + return buffer; + } + +#if wxUSE_UNICODE + virtual bool GetDataHere( void* buffer ) const + { + // CFSTR_SHELLURL is _always_ ANSI! + wxCharBuffer char_buffer( GetDataSize() ); + wxCustomDataObject::GetDataHere( (void*)char_buffer.data() ); + wxString unicode_buffer( char_buffer, wxConvLibc ); + memcpy( buffer, unicode_buffer.c_str(), + ( unicode_buffer.length() + 1 ) * sizeof(wxChar) ); + + return TRUE; + } +#endif +}; + + + +wxURLDataObject::wxURLDataObject() +{ + // we support CF_TEXT and CFSTR_SHELLURL formats which are basicly the same + // but it seems that some browsers only provide one of them so we have to + // support both + Add(new wxTextDataObject); + Add(new CFSTR_SHELLURLDataObject()); + + // we don't have any data yet + m_dataObjectLast = NULL; +} + +bool wxURLDataObject::SetData(const wxDataFormat& format, + size_t len, + const void *buf) +{ + m_dataObjectLast = GetObject(format); + + wxCHECK_MSG( m_dataObjectLast, FALSE, + wxT("unsupported format in wxURLDataObject")); + + return m_dataObjectLast->SetData(len, buf); +} + +wxString wxURLDataObject::GetURL() const +{ + wxString url; + wxCHECK_MSG( m_dataObjectLast, url, _T("no data in wxURLDataObject") ); + + size_t len = m_dataObjectLast->GetDataSize(); + + m_dataObjectLast->GetDataHere(url.GetWriteBuf(len)); + url.UngetWriteBuf(); + + return url; +} + +void wxURLDataObject::SetURL(const wxString& url) +{ + SetData(wxDataFormat(wxUSE_UNICODE ? wxDF_UNICODETEXT : wxDF_TEXT), + url.Length()+1, url.c_str()); + + // CFSTR_SHELLURL is always supposed to be ANSI... + wxWX2MBbuf urlA = (wxWX2MBbuf)url.mbc_str(); + size_t len = strlen(urlA); + SetData(wxDataFormat(CFSTR_SHELLURL), len+1, (const char*)urlA); } // ---------------------------------------------------------------------------- // private functions // ---------------------------------------------------------------------------- +static size_t wxGetNumOfBitmapColors(size_t bitsPerPixel) +{ + switch ( bitsPerPixel ) + { + case 1: + // monochrome bitmap, 2 entries + return 2; + + case 4: + return 16; + + case 8: + return 256; + + case 24: + // may be used with 24bit bitmaps, but we don't use it here - fall + // through + + case 16: + case 32: + // bmiColors not used at all with these bitmaps + return 0; + + default: + wxFAIL_MSG( wxT("unknown bitmap format") ); + return 0; + } +} + +size_t wxConvertBitmapToDIB(LPBITMAPINFO pbi, const wxBitmap& bitmap) +{ + wxASSERT_MSG( bitmap.Ok(), wxT("invalid bmp can't be converted to DIB") ); + + // shouldn't be selected into a DC or GetDIBits() would fail + wxASSERT_MSG( !bitmap.GetSelectedInto(), + wxT("can't copy bitmap selected into wxMemoryDC") ); + + // prepare all the info we need + BITMAP bm; + HBITMAP hbmp = (HBITMAP)bitmap.GetHBITMAP(); + if ( !GetObject(hbmp, sizeof(bm), &bm) ) + { + wxLogLastError(wxT("GetObject(bitmap)")); + + return 0; + } + + // calculate the number of bits per pixel and the number of items in + // bmiColors array (whose meaning depends on the bitmap format) + WORD biBits = bm.bmPlanes * bm.bmBitsPixel; + WORD biColors = (WORD)wxGetNumOfBitmapColors(biBits); + + BITMAPINFO bi2; + + bool wantSizeOnly = pbi == NULL; + if ( wantSizeOnly ) + pbi = &bi2; + + // just for convenience + BITMAPINFOHEADER& bi = pbi->bmiHeader; + + bi.biSize = sizeof(BITMAPINFOHEADER); + bi.biWidth = bm.bmWidth; + bi.biHeight = bm.bmHeight; + bi.biPlanes = 1; + bi.biBitCount = biBits; + bi.biCompression = BI_RGB; + bi.biSizeImage = 0; + bi.biXPelsPerMeter = 0; + bi.biYPelsPerMeter = 0; + bi.biClrUsed = 0; + bi.biClrImportant = 0; + + // memory we need for BITMAPINFO only + DWORD dwLen = bi.biSize + biColors * sizeof(RGBQUAD); + + // first get the image size + ScreenHDC hdc; + if ( !GetDIBits(hdc, hbmp, 0, bi.biHeight, NULL, pbi, DIB_RGB_COLORS) ) + { + wxLogLastError(wxT("GetDIBits(NULL)")); + + return 0; + } + + if ( wantSizeOnly ) + { + // size of the header + size of the image + return dwLen + bi.biSizeImage; + } + + // and now copy the bits + void *image = (char *)pbi + dwLen; + if ( !GetDIBits(hdc, hbmp, 0, bi.biHeight, image, pbi, DIB_RGB_COLORS) ) + { + wxLogLastError(wxT("GetDIBits")); + + return 0; + } + + return dwLen + bi.biSizeImage; +} + +wxBitmap wxConvertDIBToBitmap(const LPBITMAPINFO pbmi) +{ + // here we get BITMAPINFO struct followed by the actual bitmap bits and + // BITMAPINFO starts with BITMAPINFOHEADER followed by colour info + const BITMAPINFOHEADER *pbmih = &pbmi->bmiHeader; + + // biClrUsed has the number of colors, unless it's 0 + int numColors = pbmih->biClrUsed; + if (numColors==0) + { + numColors = wxGetNumOfBitmapColors(pbmih->biBitCount); + } + + // offset of image from the beginning of the header + DWORD ofs = numColors * sizeof(RGBQUAD); + void *image = (char *)pbmih + sizeof(BITMAPINFOHEADER) + ofs; + + ScreenHDC hdc; + HBITMAP hbmp = CreateDIBitmap(hdc, pbmih, CBM_INIT, + image, pbmi, DIB_RGB_COLORS); + if ( !hbmp ) + { + wxLogLastError(wxT("CreateDIBitmap")); + } + + wxBitmap bitmap(pbmih->biWidth, pbmih->biHeight, pbmih->biBitCount); + bitmap.SetHBITMAP((WXHBITMAP)hbmp); + + return bitmap; +} + #ifdef __WXDEBUG__ -static const char *GetTymedName(DWORD tymed) +static const wxChar *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; - } + static wxChar s_szBuf[128]; + switch ( tymed ) { + case TYMED_HGLOBAL: return wxT("TYMED_HGLOBAL"); + case TYMED_FILE: return wxT("TYMED_FILE"); + case TYMED_ISTREAM: return wxT("TYMED_ISTREAM"); + case TYMED_ISTORAGE: return wxT("TYMED_ISTORAGE"); + case TYMED_GDI: return wxT("TYMED_GDI"); + case TYMED_MFPICT: return wxT("TYMED_MFPICT"); + case TYMED_ENHMF: return wxT("TYMED_ENHMF"); + default: + wxSprintf(s_szBuf, wxT("type of media format %ld (unknown)"), tymed); + return s_szBuf; + } } #endif // Debug +#else // not using OLE at all +// ---------------------------------------------------------------------------- +// wxDataObject +// ---------------------------------------------------------------------------- + +wxDataObject::wxDataObject() +{ +} + +wxDataObject::~wxDataObject() +{ +} + +void wxDataObject::SetAutoDelete() +{ +} + +#ifdef __WXDEBUG__ +const wxChar *wxDataObject::GetFormatName(wxDataFormat format) +{ + return NULL; +} +#endif + #endif