| /* | |
| * Ole 2 Create functions implementation | |
| * | |
| * Copyright (C) 1999-2000 Abey George | |
| * | |
| * This library is free software; you can redistribute it and/or | |
| * modify it under the terms of the GNU Lesser General Public | |
| * License as published by the Free Software Foundation; either | |
| * version 2.1 of the License, or (at your option) any later version. | |
| * | |
| * This library is distributed in the hope that it will be useful, | |
| * but WITHOUT ANY WARRANTY; without even the implied warranty of | |
| * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU | |
| * Lesser General Public License for more details. | |
| * | |
| * You should have received a copy of the GNU Lesser General Public | |
| * License along with this library; if not, write to the Free Software | |
| * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA | |
| */ | |
| #include <stdarg.h> | |
| #include <string.h> | |
| #define COBJMACROS | |
| #define NONAMELESSUNION | |
| #define NONAMELESSSTRUCT | |
| #include "windef.h" | |
| #include "winbase.h" | |
| #include "wingdi.h" | |
| #include "winuser.h" | |
| #include "wine/debug.h" | |
| #include "ole2.h" | |
| #include "olestd.h" | |
| #include "winreg.h" | |
| WINE_DEFAULT_DEBUG_CHANNEL(ole); | |
| #define MAX_CLIPFORMAT_NAME 80 | |
| /****************************************************************************** | |
| * OleQueryCreateFromData [OLE32.@] | |
| * | |
| * Author : Abey George | |
| * Checks whether an object can become an embedded object. | |
| * the clipboard or OLE drag and drop. | |
| * Returns : S_OK - Format that supports Embedded object creation are present. | |
| * OLE_E_STATIC - Format that supports static object creation are present. | |
| * S_FALSE - No acceptable format is available. | |
| */ | |
| HRESULT WINAPI OleQueryCreateFromData(LPDATAOBJECT pSrcDataObject) | |
| { | |
| IEnumFORMATETC *pfmt; | |
| FORMATETC fmt; | |
| CHAR szFmtName[MAX_CLIPFORMAT_NAME]; | |
| BOOL bFoundStatic = FALSE; | |
| HRESULT hr = IDataObject_EnumFormatEtc(pSrcDataObject, DATADIR_GET, &pfmt); | |
| if (hr == S_OK) | |
| hr = IEnumFORMATETC_Next(pfmt, 1, &fmt, NULL); | |
| while (hr == S_OK) | |
| { | |
| GetClipboardFormatNameA(fmt.cfFormat, szFmtName, MAX_CLIPFORMAT_NAME-1); | |
| /* first, Check for Embedded Object, Embed Source or Filename */ | |
| if (!strcmp(szFmtName, CF_EMBEDDEDOBJECT) || !strcmp(szFmtName, CF_EMBEDSOURCE) || !strcmp(szFmtName, CF_FILENAME)) | |
| return S_OK; | |
| /* Check for Metafile, Bitmap or DIB */ | |
| if (fmt.cfFormat == CF_METAFILEPICT || fmt.cfFormat == CF_BITMAP || fmt.cfFormat == CF_DIB) | |
| bFoundStatic = TRUE; | |
| hr = IEnumFORMATETC_Next(pfmt, 1, &fmt, NULL); | |
| } | |
| /* Found a static format, but no embed format */ | |
| if (bFoundStatic) | |
| return OLE_S_STATIC; | |
| return S_FALSE; | |
| } | |
| /****************************************************************************** | |
| * OleCreateFromData [OLE32.@] | |
| * | |
| * Author : Abey George | |
| * Creates an embedded object from data transfer object retrieved from | |
| * the clipboard or OLE drag and drop. | |
| * Returns : S_OK - Embedded object was created successfully. | |
| * OLE_E_STATIC - OLE can create only a static object | |
| * DV_E_FORMATETC - No acceptable format is available (only error return code) | |
| * TODO : CF_FILENAME, CF_EMBEDEDOBJECT formats. Parameter renderopt is currently ignored. | |
| */ | |
| HRESULT WINAPI OleCreateFromData(LPDATAOBJECT pSrcDataObject, REFIID riid, | |
| DWORD renderopt, LPFORMATETC pFormatEtc, | |
| LPOLECLIENTSITE pClientSite, LPSTORAGE pStg, | |
| LPVOID* ppvObj) | |
| { | |
| IEnumFORMATETC *pfmt; | |
| FORMATETC fmt; | |
| CHAR szFmtName[MAX_CLIPFORMAT_NAME]; | |
| STGMEDIUM std; | |
| HRESULT hr; | |
| HRESULT hr1; | |
| hr = IDataObject_EnumFormatEtc(pSrcDataObject, DATADIR_GET, &pfmt); | |
| if (hr == S_OK) | |
| { | |
| memset(&std, 0, sizeof(STGMEDIUM)); | |
| hr = IEnumFORMATETC_Next(pfmt, 1, &fmt, NULL); | |
| while (hr == S_OK) | |
| { | |
| GetClipboardFormatNameA(fmt.cfFormat, szFmtName, MAX_CLIPFORMAT_NAME-1); | |
| /* first, Check for Embedded Object, Embed Source or Filename */ | |
| /* TODO: Currently checks only for Embed Source. */ | |
| if (!strcmp(szFmtName, CF_EMBEDSOURCE)) | |
| { | |
| std.tymed = TYMED_HGLOBAL; | |
| if ((hr1 = IDataObject_GetData(pSrcDataObject, &fmt, &std)) == S_OK) | |
| { | |
| ILockBytes *ptrILockBytes = 0; | |
| IStorage *pStorage = 0; | |
| IOleObject *pOleObject = 0; | |
| IPersistStorage *pPersistStorage = 0; | |
| CLSID clsID; | |
| /* Create ILock bytes */ | |
| hr1 = CreateILockBytesOnHGlobal(std.u.hGlobal, FALSE, &ptrILockBytes); | |
| /* Open storage on the ILock bytes */ | |
| if (hr1 == S_OK) | |
| hr1 = StgOpenStorageOnILockBytes(ptrILockBytes, NULL, STGM_SHARE_EXCLUSIVE, NULL, 0, &pStorage); | |
| /* Get Class ID from the opened storage */ | |
| if (hr1 == S_OK) | |
| hr1 = ReadClassStg(pStorage, &clsID); | |
| /* Create default handler for Persist storage */ | |
| if (hr1 == S_OK) | |
| hr1 = OleCreateDefaultHandler(&clsID, NULL, &IID_IPersistStorage, (LPVOID*)&pPersistStorage); | |
| /* Load the storage to Persist storage */ | |
| if (hr1 == S_OK) | |
| hr1 = IPersistStorage_Load(pPersistStorage, pStorage); | |
| /* Query for IOleObject */ | |
| if (hr1 == S_OK) | |
| hr1 = IPersistStorage_QueryInterface(pPersistStorage, &IID_IOleObject, (LPVOID*)&pOleObject); | |
| /* Set client site with the IOleObject */ | |
| if (hr1 == S_OK) | |
| hr1 = IOleObject_SetClientSite(pOleObject, pClientSite); | |
| IPersistStorage_Release(pPersistStorage); | |
| /* Query for the requested interface */ | |
| if (hr1 == S_OK) | |
| hr1 = IPersistStorage_QueryInterface(pPersistStorage, riid, ppvObj); | |
| IPersistStorage_Release(pPersistStorage); | |
| IStorage_Release(pStorage); | |
| if (hr1 == S_OK) | |
| return S_OK; | |
| } | |
| /* Return error */ | |
| return DV_E_FORMATETC; | |
| } | |
| hr = IEnumFORMATETC_Next(pfmt, 1, &fmt, NULL); | |
| } | |
| } | |
| return DV_E_FORMATETC; | |
| } | |
| /****************************************************************************** | |
| * OleDuplicateData [OLE32.@] | |
| * | |
| * Duplicates clipboard data. | |
| * | |
| * PARAMS | |
| * hSrc [I] Handle of the source clipboard data. | |
| * cfFormat [I] The clipboard format of hSrc. | |
| * uiFlags [I] Flags to pass to GlobalAlloc. | |
| * | |
| * RETURNS | |
| * Success: handle to the duplicated data. | |
| * Failure: NULL. | |
| */ | |
| HANDLE WINAPI OleDuplicateData(HANDLE hSrc, CLIPFORMAT cfFormat, | |
| UINT uiFlags) | |
| { | |
| HANDLE hDst = NULL; | |
| TRACE("(%p,%x,%x)\n", hSrc, cfFormat, uiFlags); | |
| if (!uiFlags) uiFlags = GMEM_MOVEABLE; | |
| switch (cfFormat) | |
| { | |
| case CF_ENHMETAFILE: | |
| hDst = CopyEnhMetaFileW(hSrc, NULL); | |
| break; | |
| case CF_METAFILEPICT: | |
| hDst = CopyMetaFileW(hSrc, NULL); | |
| break; | |
| case CF_PALETTE: | |
| { | |
| LOGPALETTE * logpalette; | |
| UINT nEntries = GetPaletteEntries(hSrc, 0, 0, NULL); | |
| if (!nEntries) return NULL; | |
| logpalette = HeapAlloc(GetProcessHeap(), 0, | |
| FIELD_OFFSET(LOGPALETTE, palPalEntry[nEntries])); | |
| if (!logpalette) return NULL; | |
| if (!GetPaletteEntries(hSrc, 0, nEntries, logpalette->palPalEntry)) | |
| { | |
| HeapFree(GetProcessHeap(), 0, logpalette); | |
| return NULL; | |
| } | |
| logpalette->palVersion = 0x300; | |
| logpalette->palNumEntries = (WORD)nEntries; | |
| hDst = CreatePalette(logpalette); | |
| HeapFree(GetProcessHeap(), 0, logpalette); | |
| break; | |
| } | |
| case CF_BITMAP: | |
| { | |
| LONG size; | |
| BITMAP bm; | |
| if (!GetObjectW(hSrc, sizeof(bm), &bm)) | |
| return NULL; | |
| size = GetBitmapBits(hSrc, 0, NULL); | |
| if (!size) return NULL; | |
| bm.bmBits = HeapAlloc(GetProcessHeap(), 0, size); | |
| if (!bm.bmBits) return NULL; | |
| if (!GetBitmapBits(hSrc, size, bm.bmBits)) | |
| return NULL; | |
| hDst = CreateBitmapIndirect(&bm); | |
| HeapFree(GetProcessHeap(), 0, bm.bmBits); | |
| break; | |
| } | |
| default: | |
| { | |
| SIZE_T size = GlobalSize(hSrc); | |
| LPVOID pvSrc = NULL; | |
| LPVOID pvDst = NULL; | |
| /* allocate space for object */ | |
| if (!size) return NULL; | |
| hDst = GlobalAlloc(uiFlags, size); | |
| if (!hDst) return NULL; | |
| /* lock pointers */ | |
| pvSrc = GlobalLock(hSrc); | |
| if (!pvSrc) | |
| { | |
| GlobalFree(hDst); | |
| return NULL; | |
| } | |
| pvDst = GlobalLock(hDst); | |
| if (!pvDst) | |
| { | |
| GlobalUnlock(hSrc); | |
| GlobalFree(hDst); | |
| return NULL; | |
| } | |
| /* copy data */ | |
| memcpy(pvDst, pvSrc, size); | |
| /* cleanup */ | |
| GlobalUnlock(hDst); | |
| GlobalUnlock(hSrc); | |
| } | |
| } | |
| TRACE("returning %p\n", hDst); | |
| return hDst; | |
| } |