Jacek Caban : ieframe: Use Custom IEnumOLEVERBVtbl implementation in IOleObject::EnumVerbs.

[Alexandre Julliard]

Module: wine
Branch: master
Commit: bae8f52b5b74be991fc4ddc6baf589fa1a4cd91a
URL:    http://source.winehq.org/git/wine.git/?a=commit;h=bae8f52b5b74be991fc4ddc6ba...

Author: Jacek Caban <jacek(a)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)