git.oblomov.eu Git - wine/blob - dlls/shdocvw/classinfo.c

   1 /*
   2  * Implementation of IProvideClassInfo interfaces for WebBrowser control
   3  *
   4  * Copyright 2001 John R. Sheets (for CodeWeavers)
   5  *
   6  * This library is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU Lesser General Public
   8  * License as published by the Free Software Foundation; either
   9  * version 2.1 of the License, or (at your option) any later version.
  10  *
  11  * This library is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * Lesser General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Lesser General Public
  17  * License along with this library; if not, write to the Free Software
  18  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  19  */
  20
  21 #include <stdarg.h>
  22 #include <string.h>
  23
  24 #include "windef.h"
  25 #include "winbase.h"
  26 #include "shdocvw.h"
  27 #include "wine/debug.h"
  28
  29 WINE_DEFAULT_DEBUG_CHANNEL(shdocvw);
  30
  31 /**********************************************************************
  32  * Implement the IProvideClassInfo2 interface
  33  */
  34
  35 static inline WebBrowser *impl_from_IProvideClassInfo2(IProvideClassInfo2 *iface)
  36 {
  37     return CONTAINING_RECORD(iface, WebBrowser, IProvideClassInfo2_iface);
  38 }
  39
  40 static HRESULT WINAPI ProvideClassInfo_QueryInterface(IProvideClassInfo2 *iface,
  41         REFIID riid, LPVOID *ppobj)
  42 {
  43     WebBrowser *This = impl_from_IProvideClassInfo2(iface);
  44     return IWebBrowser_QueryInterface(&This->IWebBrowser2_iface, riid, ppobj);
  45 }
  46
  47 static ULONG WINAPI ProvideClassInfo_AddRef(IProvideClassInfo2 *iface)
  48 {
  49     WebBrowser *This = impl_from_IProvideClassInfo2(iface);
  50     return IWebBrowser_AddRef(&This->IWebBrowser2_iface);
  51 }
  52
  53 static ULONG WINAPI ProvideClassInfo_Release(IProvideClassInfo2 *iface)
  54 {
  55     WebBrowser *This = impl_from_IProvideClassInfo2(iface);
  56     return IWebBrowser_Release(&This->IWebBrowser2_iface);
  57 }
  58
  59 static HRESULT WINAPI ProvideClassInfo_GetClassInfo(IProvideClassInfo2 *iface, LPTYPEINFO *ppTI)
  60 {
  61     WebBrowser *This = impl_from_IProvideClassInfo2(iface);
  62     FIXME("(%p)->(%p)\n", This, ppTI);
  63     return E_NOTIMPL;
  64 }
  65
  66 static HRESULT WINAPI ProvideClassInfo_GetGUID(IProvideClassInfo2 *iface,
  67         DWORD dwGuidKind, GUID *pGUID)
  68 {
  69     WebBrowser *This = impl_from_IProvideClassInfo2(iface);
  70
  71     TRACE("(%p)->(%d %p)\n", This, dwGuidKind, pGUID);
  72
  73     if(!pGUID)
  74         return E_POINTER;
  75
  76     if (dwGuidKind != GUIDKIND_DEFAULT_SOURCE_DISP_IID) {
  77         WARN("Wrong GUID type: %d\n", dwGuidKind);
  78         *pGUID = IID_NULL;
  79         return E_FAIL;
  80     }
  81
  82     memcpy(pGUID, This->version == 1 ? &DIID_DWebBrowserEvents : &DIID_DWebBrowserEvents2,
  83            sizeof(GUID));
  84     return S_OK;
  85 }
  86
  87 static const IProvideClassInfo2Vtbl ProvideClassInfoVtbl =
  88 {
  89     ProvideClassInfo_QueryInterface,
  90     ProvideClassInfo_AddRef,
  91     ProvideClassInfo_Release,
  92     ProvideClassInfo_GetClassInfo,
  93     ProvideClassInfo_GetGUID
  94 };
  95
  96 void WebBrowser_ClassInfo_Init(WebBrowser *This)
  97 {
  98     This->IProvideClassInfo2_iface.lpVtbl = &ProvideClassInfoVtbl;
  99 }