2 * Temporary place for ole2 stubs.
4 * Copyright (C) 1999 Corel Corporation
5 * Move these functions to dlls/ole32/ole2impl.c when you implement them.
12 #include "debugtools.h"
14 DEFAULT_DEBUG_CHANNEL(ole
)
16 /******************************************************************************
17 * OleCreateLinkToFile [OLE32.96]
19 HRESULT WINAPI
OleCreateLinkToFile(LPCOLESTR lpszFileName
, REFIID riid
,
20 DWORD renderopt
, LPFORMATETC lpFormatEtc
,
21 LPOLECLIENTSITE pClientSite
, LPSTORAGE pStg
, LPVOID
* ppvObj
)
23 FIXME("(%p,%p,%li,%p,%p,%p,%p), stub!\n",lpszFileName
, riid
, renderopt
, lpFormatEtc
, pClientSite
, pStg
, ppvObj
);
28 /******************************************************************************
29 * OleDuplicateData [OLE32.102]
31 HRESULT WINAPI
OleDuplicateData(HANDLE hSrc
, CLIPFORMAT cfFormat
,
34 FIXME("(%x,%x,%x), stub!\n", hSrc
, cfFormat
, uiFlags
);
39 /***********************************************************************
40 * WriteFmtUserTypeStg (OLE32.160)
42 HRESULT WINAPI
WriteFmtUserTypeStg(
43 LPSTORAGE pstg
, CLIPFORMAT cf
, LPOLESTR lpszUserType
)
45 FIXME("(%p,%x,%s) stub!\n",pstg
,cf
,debugstr_w(lpszUserType
));
49 /***********************************************************************
50 * OleTranslateAccelerator [OLE32.130]
52 HRESULT WINAPI
OleTranslateAccelerator (LPOLEINPLACEFRAME lpFrame
,
53 LPOLEINPLACEFRAMEINFO lpFrameInfo
, LPMSG lpmsg
)
55 FIXME("(%p,%p,%p),stub!\n", lpFrame
, lpFrameInfo
, lpmsg
);
59 /******************************************************************************
60 * CoTreatAsClass [OLE32.46]
62 HRESULT WINAPI
CoTreatAsClass(REFCLSID clsidOld
, REFCLSID clsidNew
)
64 FIXME("(%p,%p), stub!\n", clsidOld
, clsidNew
);
68 /******************************************************************************
69 * OleSetAutoConvert [OLE32.@]
71 HRESULT WINAPI
OleSetAutoConvert(REFCLSID clsidOld
, REFCLSID clsidNew
)
73 FIXME("(%p,%p), stub!\n", clsidOld
, clsidNew
);
77 /******************************************************************************
78 * IsAccelerator [OLE32.75]
80 BOOL WINAPI
IsAccelerator(HACCEL hAccel
, int cAccelEntries
, LPMSG lpMsg
, WORD
* lpwCmd
)
82 FIXME("(%x,%i,%p,%p), stub!\n", hAccel
, cAccelEntries
, lpMsg
, lpwCmd
);
86 /******************************************************************************
87 * SetConvertStg [OLE32.142]
89 HRESULT WINAPI
SetConvertStg(LPSTORAGE pStg
, BOOL fConvert
)
91 FIXME("(%p,%x), stub!\n", pStg
, fConvert
);
95 /******************************************************************************
96 * OleCreate [OLE32.80]
99 HRESULT WINAPI
OleCreate(
103 LPFORMATETC pFormatEtc
,
104 LPOLECLIENTSITE pClientSite
,
109 IUnknown
* pUnk
= NULL
;
111 FIXME("\n\t%s\n\t%s stub!\n", debugstr_guid(rclsid
), debugstr_guid(riid
));
113 if (SUCCEEDED((hres
= CoCreateInstance(rclsid
, 0, CLSCTX_INPROC_SERVER
, riid
, (LPVOID
*)&pUnk
))))
118 IPersistStorage
* pPS
;
119 if (SUCCEEDED((hres
= IUnknown_QueryInterface( pUnk
, &IID_IOleObject
, (LPVOID
*)&pOE
))))
121 TRACE("trying to set clientsite %p\n", pClientSite
);
122 hres1
= IOleObject_SetClientSite(pOE
, pClientSite
);
123 TRACE("-- result 0x%08lx\n", hres1
);
124 IOleObject_Release(pOE
);
126 if (SUCCEEDED((hres
= IUnknown_QueryInterface( pUnk
, &IID_IPersistStorage
, (LPVOID
*)&pPS
))))
128 TRACE("trying to set stg %p\n", pStg
);
129 hres1
= IPersistStorage_InitNew(pPS
, pStg
);
130 TRACE("-- result 0x%08lx\n", hres1
);
131 IPersistStorage_Release(pPS
);
138 TRACE("-- %p \n", pUnk
);
142 /******************************************************************************
143 * OleCreateLink [OLE32.94]
145 HRESULT WINAPI
OleCreateLink(LPMONIKER pmkLinkSrc
, REFIID riid
, DWORD renderopt
, LPFORMATETC lpFormatEtc
,
146 LPOLECLIENTSITE pClientSite
, LPSTORAGE pStg
, LPVOID
* ppvObj
)
148 FIXME("(not shown), stub!\n");
152 /******************************************************************************
153 * OleCreateFromFile [OLE32.93]
155 HRESULT WINAPI
OleCreateFromFile(REFCLSID rclsid
, LPCOLESTR lpszFileName
, REFIID riid
,
156 DWORD renderopt
, LPFORMATETC lpFormatEtc
, LPOLECLIENTSITE pClientSite
, LPSTORAGE pStg
, LPVOID
* ppvObj
)
158 FIXME("(not shown), stub!\n");
162 /******************************************************************************
163 * OleLockRunning [OLE32.114]
165 HRESULT WINAPI
OleLockRunning(LPUNKNOWN pUnknown
, BOOL fLock
, BOOL fLastUnlockCloses
)
167 FIXME("(%p,%x,%x), stub!\n", pUnknown
, fLock
, fLastUnlockCloses
);
171 /******************************************************************************
172 * OleGetIconOfClass [OLE32.106]
174 HGLOBAL WINAPI
OleGetIconOfClass(REFCLSID rclsid
, LPOLESTR lpszLabel
, BOOL fUseTypeAsLabel
)
176 FIXME("(%p,%p,%x), stub!\n", rclsid
, lpszLabel
, fUseTypeAsLabel
);
180 /******************************************************************************
181 * ReadFmtUserTypeStg [OLE32.136]
183 HRESULT WINAPI
ReadFmtUserTypeStg (LPSTORAGE pstg
, CLIPFORMAT
* pcf
, LPOLESTR
* lplpszUserType
)
185 FIXME("(%p,%p,%p), stub!\n", pstg
, pcf
, lplpszUserType
);
189 /******************************************************************************
190 * OleCreateStaticFromData [OLE32.98]
192 HRESULT WINAPI
OleCreateStaticFromData(LPDATAOBJECT pSrcDataObj
, REFIID iid
,
193 DWORD renderopt
, LPFORMATETC pFormatEtc
, LPOLECLIENTSITE pClientSite
,
194 LPSTORAGE pStg
, LPVOID
* ppvObj
)
196 FIXME("(not shown), stub!\n");
200 /******************************************************************************
201 * OleCreateLinkFromData [OLE32.95]
204 HRESULT WINAPI
OleCreateLinkFromData(LPDATAOBJECT pSrcDataObj
, REFIID riid
,
205 DWORD renderopt
, LPFORMATETC pFormatEtc
,
206 LPOLECLIENTSITE pClientSite
, LPSTORAGE pStg
,
209 FIXME("(not shown), stub!\n");
213 /******************************************************************************
214 * OleIsRunning [OLE32.111]
216 BOOL WINAPI
OleIsRunning(LPOLEOBJECT pObject
)
218 FIXME("(%p), stub!\n", pObject
);
222 /***********************************************************************
223 * OleRegEnumVerbs [OLE32.120]
225 HRESULT WINAPI
OleRegEnumVerbs (REFCLSID clsid
, LPENUMOLEVERB
* ppenum
)
227 FIXME("(%p,%p), stub!\n", clsid
, ppenum
);
228 return OLEOBJ_E_NOVERBS
;
231 /***********************************************************************
232 * OleRegEnumFormatEtc [OLE32.119]
234 HRESULT WINAPI
OleRegEnumFormatEtc (
237 LPENUMFORMATETC
* ppenumFormatetc
)
239 FIXME("(%p, %ld, %p), stub!\n", clsid
, dwDirection
, ppenumFormatetc
);
244 /***********************************************************************
245 * PropVariantClear [OLE32.166]
247 HRESULT WINAPI
PropVariantClear(/*PROPVARIANT* */void* pvar
)
249 FIXME("(%p): stub:\n", pvar
);
252 /* sets at least the vt field to VT_EMPTY */
256 /***********************************************************************
257 * PropVariantCopy [OLE32.246]
259 HRESULT WINAPI
PropVariantCopy(/*PROPVARIANT* */void* pvarDest
,
260 /*const PROPVARIANT* */ void* pvarSrc
)
262 FIXME("(%p, %p): stub:\n", pvarDest
, pvarSrc
);
267 /***********************************************************************
268 * FreePropVariantArray [OLE32.195]
270 HRESULT WINAPI
FreePropVariantArray(ULONG cVariants
, /*PROPVARIANT* */void* rgvars
)
272 FIXME("(%lu, %p): stub:\n", cVariants
, rgvars
);
277 /***********************************************************************
278 * CoIsOle1Class [OLE32]
280 BOOL WINAPI
CoIsOle1Class(REFCLSID clsid
)
282 FIXME("%s\n", debugstr_guid(clsid
));