mirror of
https://github.com/reactos/wine.git
synced 2024-11-25 20:59:54 +00:00
303 lines
8.8 KiB
C
303 lines
8.8 KiB
C
/*
|
|
* 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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, 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"
|
|
|
|
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))
|
|
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;
|
|
}
|