usp10: Add Ethiopic script.
[wine.git] / dlls / ieframe / classinfo.c
blob30b887117d5d11805011b160232b11cdac2db258
1 /*
2 * Implementation of IProvideClassInfo interfaces for WebBrowser control
4 * Copyright 2001 John R. Sheets (for CodeWeavers)
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.
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.
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
21 #include "ieframe.h"
23 #include "wine/debug.h"
25 WINE_DEFAULT_DEBUG_CHANNEL(ieframe);
27 /**********************************************************************
28 * Implement the IProvideClassInfo2 interface
31 static inline WebBrowser *impl_from_IProvideClassInfo2(IProvideClassInfo2 *iface)
33 return CONTAINING_RECORD(iface, WebBrowser, IProvideClassInfo2_iface);
36 static HRESULT WINAPI ProvideClassInfo_QueryInterface(IProvideClassInfo2 *iface,
37 REFIID riid, LPVOID *ppobj)
39 WebBrowser *This = impl_from_IProvideClassInfo2(iface);
40 return IWebBrowser_QueryInterface(&This->IWebBrowser2_iface, riid, ppobj);
43 static ULONG WINAPI ProvideClassInfo_AddRef(IProvideClassInfo2 *iface)
45 WebBrowser *This = impl_from_IProvideClassInfo2(iface);
46 return IWebBrowser_AddRef(&This->IWebBrowser2_iface);
49 static ULONG WINAPI ProvideClassInfo_Release(IProvideClassInfo2 *iface)
51 WebBrowser *This = impl_from_IProvideClassInfo2(iface);
52 return IWebBrowser_Release(&This->IWebBrowser2_iface);
55 static HRESULT WINAPI ProvideClassInfo_GetClassInfo(IProvideClassInfo2 *iface, LPTYPEINFO *ppTI)
57 WebBrowser *This = impl_from_IProvideClassInfo2(iface);
58 FIXME("(%p)->(%p)\n", This, ppTI);
59 return E_NOTIMPL;
62 static HRESULT WINAPI ProvideClassInfo_GetGUID(IProvideClassInfo2 *iface,
63 DWORD dwGuidKind, GUID *pGUID)
65 WebBrowser *This = impl_from_IProvideClassInfo2(iface);
67 TRACE("(%p)->(%d %p)\n", This, dwGuidKind, pGUID);
69 if(!pGUID)
70 return E_POINTER;
72 if (dwGuidKind != GUIDKIND_DEFAULT_SOURCE_DISP_IID) {
73 WARN("Wrong GUID type: %d\n", dwGuidKind);
74 *pGUID = IID_NULL;
75 return E_FAIL;
78 memcpy(pGUID, This->version == 1 ? &DIID_DWebBrowserEvents : &DIID_DWebBrowserEvents2,
79 sizeof(GUID));
80 return S_OK;
83 static const IProvideClassInfo2Vtbl ProvideClassInfoVtbl =
85 ProvideClassInfo_QueryInterface,
86 ProvideClassInfo_AddRef,
87 ProvideClassInfo_Release,
88 ProvideClassInfo_GetClassInfo,
89 ProvideClassInfo_GetGUID
92 void WebBrowser_ClassInfo_Init(WebBrowser *This)
94 This->IProvideClassInfo2_iface.lpVtbl = &ProvideClassInfoVtbl;