Jacek Caban : ieframe: Use Custom IEnumOLEVERBVtbl implementation in IOleObject::EnumVerbs.
Alexandre Julliard
julliard at winehq.org
Thu Mar 15 15:35:20 CDT 2012
Module: wine
Branch: master
Commit: bae8f52b5b74be991fc4ddc6baf589fa1a4cd91a
URL: http://source.winehq.org/git/wine.git/?a=commit;h=bae8f52b5b74be991fc4ddc6baf589fa1a4cd91a
Author: Jacek Caban <jacek at codeweavers.com>
Date: Thu Mar 15 13:10:37 2012 +0100
ieframe: Use Custom IEnumOLEVERBVtbl implementation in IOleObject::EnumVerbs.
OleRegEnumVerbs can't work because CLSID_WebBrowser doesn't have
required registries set
---
dlls/ieframe/oleobject.c | 109 +++++++++++++++++++++++++++++++++++++++++++++-
1 files changed, 108 insertions(+), 1 deletions(-)
diff --git a/dlls/ieframe/oleobject.c b/dlls/ieframe/oleobject.c
index 3906f85..601e458 100644
--- a/dlls/ieframe/oleobject.c
+++ b/dlls/ieframe/oleobject.c
@@ -290,6 +290,102 @@ static void release_client_site(WebBrowser *This)
}
}
+typedef struct {
+ IEnumOLEVERB IEnumOLEVERB_iface;
+
+ LONG ref;
+} EnumOLEVERB;
+
+static inline EnumOLEVERB *impl_from_IEnumOLEVERB(IEnumOLEVERB *iface)
+{
+ return CONTAINING_RECORD(iface, EnumOLEVERB, IEnumOLEVERB_iface);
+}
+
+static HRESULT WINAPI EnumOLEVERB_QueryInterface(IEnumOLEVERB *iface, REFIID riid, void **ppv)
+{
+ EnumOLEVERB *This = impl_from_IEnumOLEVERB(iface);
+
+ if(IsEqualGUID(&IID_IUnknown, riid)) {
+ TRACE("(%p)->(IID_IUnknown %p)\n", This, ppv);
+ *ppv = &This->IEnumOLEVERB_iface;
+ }else if(IsEqualGUID(&IID_IEnumOLEVERB, riid)) {
+ TRACE("(%p)->(IID_IEnumOLEVERB %p)\n", This, ppv);
+ *ppv = &This->IEnumOLEVERB_iface;
+ }else {
+ WARN("(%p)->(%s %p)\n", This, debugstr_guid(riid), ppv);
+ *ppv = NULL;
+ return E_NOINTERFACE;
+ }
+
+ IUnknown_AddRef((IUnknown*)*ppv);
+ return S_OK;
+}
+
+static ULONG WINAPI EnumOLEVERB_AddRef(IEnumOLEVERB *iface)
+{
+ EnumOLEVERB *This = impl_from_IEnumOLEVERB(iface);
+ LONG ref = InterlockedIncrement(&This->ref);
+
+ TRACE("(%p) ref=%d\n", This, ref);
+
+ return ref;
+}
+
+static ULONG WINAPI EnumOLEVERB_Release(IEnumOLEVERB *iface)
+{
+ EnumOLEVERB *This = impl_from_IEnumOLEVERB(iface);
+ LONG ref = InterlockedDecrement(&This->ref);
+
+ TRACE("(%p) ref=%d\n", This, ref);
+
+ if(!ref)
+ heap_free(This);
+
+ return ref;
+}
+
+static HRESULT WINAPI EnumOLEVERB_Next(IEnumOLEVERB *iface, ULONG celt, OLEVERB *rgelt, ULONG *pceltFetched)
+{
+ EnumOLEVERB *This = impl_from_IEnumOLEVERB(iface);
+
+ TRACE("(%p)->(%u %p %p)\n", This, celt, rgelt, pceltFetched);
+
+ if(pceltFetched)
+ *pceltFetched = 0;
+ return S_OK;
+}
+
+static HRESULT WINAPI EnumOLEVERB_Skip(IEnumOLEVERB *iface, ULONG celt)
+{
+ EnumOLEVERB *This = impl_from_IEnumOLEVERB(iface);
+ TRACE("(%p)->(%u)\n", This, celt);
+ return S_OK;
+}
+
+static HRESULT WINAPI EnumOLEVERB_Reset(IEnumOLEVERB *iface)
+{
+ EnumOLEVERB *This = impl_from_IEnumOLEVERB(iface);
+ TRACE("(%p)\n", This);
+ return S_OK;
+}
+
+static HRESULT WINAPI EnumOLEVERB_Clone(IEnumOLEVERB *iface, IEnumOLEVERB **ppenum)
+{
+ EnumOLEVERB *This = impl_from_IEnumOLEVERB(iface);
+ FIXME("(%p)->(%p)\n", This, ppenum);
+ return E_NOTIMPL;
+}
+
+static const IEnumOLEVERBVtbl EnumOLEVERBVtbl = {
+ EnumOLEVERB_QueryInterface,
+ EnumOLEVERB_AddRef,
+ EnumOLEVERB_Release,
+ EnumOLEVERB_Next,
+ EnumOLEVERB_Skip,
+ EnumOLEVERB_Reset,
+ EnumOLEVERB_Clone
+};
+
/**********************************************************************
* Implement the IOleObject interface for the WebBrowser control
*/
@@ -491,8 +587,19 @@ static HRESULT WINAPI OleObject_DoVerb(IOleObject *iface, LONG iVerb, struct tag
static HRESULT WINAPI OleObject_EnumVerbs(IOleObject *iface, IEnumOLEVERB **ppEnumOleVerb)
{
WebBrowser *This = impl_from_IOleObject(iface);
+ EnumOLEVERB *ret;
+
TRACE("(%p)->(%p)\n", This, ppEnumOleVerb);
- return OleRegEnumVerbs(&CLSID_WebBrowser, ppEnumOleVerb);
+
+ ret = heap_alloc(sizeof(*ret));
+ if(!ret)
+ return E_OUTOFMEMORY;
+
+ ret->IEnumOLEVERB_iface.lpVtbl = &EnumOLEVERBVtbl;
+ ret->ref = 1;
+
+ *ppEnumOleVerb = &ret->IEnumOLEVERB_iface;
+ return S_OK;
}
static HRESULT WINAPI OleObject_Update(IOleObject *iface)
More information about the wine-cvs
mailing list