2 * Implementation of class factory for IE Web Browser
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
22 #include "wine/debug.h"
25 WINE_DEFAULT_DEBUG_CHANNEL(shdocvw);
27 /**********************************************************************
28 * Implement the WebBrowser class factory
30 * (Based on implementation in ddraw/main.c)
33 #define FACTORY(x) ((IClassFactory*) &(x)->lpClassFactoryVtbl)
38 const IClassFactoryVtbl *lpClassFactoryVtbl;
39 HRESULT (*cf)(LPUNKNOWN, REFIID, LPVOID *);
44 /**********************************************************************
45 * WBCF_QueryInterface (IUnknown)
47 static HRESULT WINAPI WBCF_QueryInterface(LPCLASSFACTORY iface,
48 REFIID riid, LPVOID *ppobj)
50 TRACE("(%s %p)\n", debugstr_guid(riid), ppobj);
55 if(IsEqualGUID(&IID_IUnknown, riid) || IsEqualGUID(&IID_IClassFactory, riid)) {
60 WARN("Not supported interface %s\n", debugstr_guid(riid));
66 /************************************************************************
67 * WBCF_AddRef (IUnknown)
69 static ULONG WINAPI WBCF_AddRef(LPCLASSFACTORY iface)
73 return 2; /* non-heap based object */
76 /************************************************************************
77 * WBCF_Release (IUnknown)
79 static ULONG WINAPI WBCF_Release(LPCLASSFACTORY iface)
81 SHDOCVW_UnlockModule();
83 return 1; /* non-heap based object */
86 /************************************************************************
87 * WBCF_CreateInstance (IClassFactory)
89 static HRESULT WINAPI WBCF_CreateInstance(LPCLASSFACTORY iface, LPUNKNOWN pOuter,
90 REFIID riid, LPVOID *ppobj)
92 IClassFactoryImpl *This = (IClassFactoryImpl *) iface;
93 return This->cf(pOuter, riid, ppobj);
96 /************************************************************************
97 * WBCF_LockServer (IClassFactory)
99 static HRESULT WINAPI WBCF_LockServer(LPCLASSFACTORY iface, BOOL dolock)
101 TRACE("(%d)\n", dolock);
104 SHDOCVW_LockModule();
106 SHDOCVW_UnlockModule();
111 static const IClassFactoryVtbl WBCF_Vtbl =
120 /*************************************************************************
121 * DllGetClassObject (SHDOCVW.@)
123 HRESULT WINAPI DllGetClassObject(REFCLSID rclsid, REFIID riid, void **ppv)
127 static IClassFactoryImpl WB1ClassFactory = {&WBCF_Vtbl, WebBrowserV1_Create};
128 static IClassFactoryImpl WB2ClassFactory = {&WBCF_Vtbl, WebBrowserV2_Create};
132 if(IsEqualGUID(&CLSID_WebBrowser, rclsid)) {
133 hres = create_mozctl(riid, ppv);
136 return IClassFactory_QueryInterface(FACTORY(&WB2ClassFactory), riid, ppv);
139 if(IsEqualGUID(&CLSID_WebBrowser_V1, rclsid))
140 return IClassFactory_QueryInterface(FACTORY(&WB1ClassFactory), riid, ppv);
143 /* As a last resort, figure if the CLSID belongs to a 'Shell Instance Object' */
144 return SHDOCVW_GetShellInstanceObjectClassObject(rclsid, riid, ppv);
147 HRESULT register_class_object(BOOL do_reg)
152 static IClassFactoryImpl IEClassFactory = {&WBCF_Vtbl, InternetExplorer_Create};
155 hres = CoRegisterClassObject(&CLSID_InternetExplorer, (IUnknown*)FACTORY(&IEClassFactory),
156 CLSCTX_SERVER, REGCLS_MULTIPLEUSE|REGCLS_SUSPENDED, &cookie);
158 ERR("failed to register object %08lx\n", hres);
162 hres = CoResumeClassObjects();
166 ERR("failed to resume object %08lx\n", hres);
169 return CoRevokeClassObject(cookie);