2 * Copyright 2009 Jacek Caban for CodeWeavers
4 * This library is free software; you can redistribute it and/or
5 * modify it under the terms of the GNU Lesser General Public
6 * License as published by the Free Software Foundation; either
7 * version 2.1 of the License, or (at your option) any later version.
9 * This library is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12 * Lesser General Public License for more details.
14 * You should have received a copy of the GNU Lesser General Public
15 * License along with this library; if not, write to the Free Software
16 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
33 #include "wine/debug.h"
35 #include "mshtml_private.h"
37 WINE_DEFAULT_DEBUG_CHANNEL(mshtml);
39 static const WCHAR about_blankW[] = {'a','b','o','u','t',':','b','l','a','n','k',0};
41 /* Defined as extern in urlmon.idl, but not exported by uuid.lib */
42 const GUID GUID_CUSTOM_CONFIRMOBJECTSAFETY =
43 {0x10200490,0xfa38,0x11d0,{0xac,0x0e,0x00,0xa0,0xc9,0xf,0xff,0xc0}};
45 #define HOSTSECMGR_THIS(iface) DEFINE_THIS(HTMLDocumentNode, IInternetHostSecurityManager, iface)
47 static HRESULT WINAPI InternetHostSecurityManager_QueryInterface(IInternetHostSecurityManager *iface, REFIID riid, void **ppv)
49 HTMLDocumentNode *This = HOSTSECMGR_THIS(iface);
50 return IHTMLDOMNode_QueryInterface(HTMLDOMNODE(&This->node), riid, ppv);
53 static ULONG WINAPI InternetHostSecurityManager_AddRef(IInternetHostSecurityManager *iface)
55 HTMLDocumentNode *This = HOSTSECMGR_THIS(iface);
56 return IHTMLDOMNode_AddRef(HTMLDOMNODE(&This->node));
59 static ULONG WINAPI InternetHostSecurityManager_Release(IInternetHostSecurityManager *iface)
61 HTMLDocumentNode *This = HOSTSECMGR_THIS(iface);
62 return IHTMLDOMNode_Release(HTMLDOMNODE(&This->node));
65 static HRESULT WINAPI InternetHostSecurityManager_GetSecurityId(IInternetHostSecurityManager *iface, BYTE *pbSecurityId,
66 DWORD *pcbSecurityId, DWORD_PTR dwReserved)
68 HTMLDocumentNode *This = HOSTSECMGR_THIS(iface);
69 FIXME("(%p)->(%p %p %lx)\n", This, pbSecurityId, pcbSecurityId, dwReserved);
73 static HRESULT WINAPI InternetHostSecurityManager_ProcessUrlAction(IInternetHostSecurityManager *iface, DWORD dwAction,
74 BYTE *pPolicy, DWORD cbPolicy, BYTE *pContext, DWORD cbContext, DWORD dwFlags, DWORD dwReserved)
76 HTMLDocumentNode *This = HOSTSECMGR_THIS(iface);
79 TRACE("(%p)->(%d %p %d %p %d %x %x)\n", This, dwAction, pPolicy, cbPolicy, pContext, cbContext, dwFlags, dwReserved);
81 url = This->basedoc.window->url ? This->basedoc.window->url : about_blankW;
83 return IInternetSecurityManager_ProcessUrlAction(This->secmgr, url, dwAction, pPolicy, cbPolicy,
84 pContext, cbContext, dwFlags, dwReserved);
87 static HRESULT confirm_safety(HTMLDocumentNode *This, const WCHAR *url, struct CONFIRMSAFETY *cs, DWORD *ret)
89 DWORD policy, enabled_opts, supported_opts;
90 IObjectSafety *obj_safety;
93 /* FIXME: Check URLACTION_ACTIVEX_OVERRIDE_SCRIPT_SAFETY */
95 hres = IInternetSecurityManager_ProcessUrlAction(This->secmgr, url, URLACTION_SCRIPT_SAFE_ACTIVEX,
96 (BYTE*)&policy, sizeof(policy), NULL, 0, 0, 0);
97 if(FAILED(hres) || policy != URLPOLICY_ALLOW) {
98 *ret = URLPOLICY_DISALLOW;
102 hres = IUnknown_QueryInterface(cs->pUnk, &IID_IObjectSafety, (void**)&obj_safety);
104 CATID scripting_catid = CATID_SafeForScripting;
107 hres = CoCreateInstance(&CLSID_StdComponentCategoriesMgr, NULL, CLSCTX_INPROC_SERVER,
108 &IID_ICatInformation, (void**)&This->catmgr);
113 hres = ICatInformation_IsClassOfCategories(This->catmgr, &cs->clsid, 1, &scripting_catid, 0, NULL);
117 *ret = hres == S_OK ? URLPOLICY_ALLOW : URLPOLICY_DISALLOW;
121 hres = IObjectSafety_GetInterfaceSafetyOptions(obj_safety, &IID_IDispatchEx, &supported_opts, &enabled_opts);
122 if(SUCCEEDED(hres)) {
123 enabled_opts = INTERFACESAFE_FOR_UNTRUSTED_CALLER;
124 if(supported_opts & INTERFACE_USES_SECURITY_MANAGER)
125 enabled_opts |= INTERFACE_USES_SECURITY_MANAGER;
126 hres = IObjectSafety_SetInterfaceSafetyOptions(obj_safety, &IID_IDispatchEx, enabled_opts, enabled_opts);
128 IObjectSafety_Release(obj_safety);
130 *ret = SUCCEEDED(hres) ? URLPOLICY_ALLOW : URLPOLICY_DISALLOW;
134 static HRESULT WINAPI InternetHostSecurityManager_QueryCustomPolicy(IInternetHostSecurityManager *iface, REFGUID guidKey,
135 BYTE **ppPolicy, DWORD *pcbPolicy, BYTE *pContext, DWORD cbContext, DWORD dwReserved)
137 HTMLDocumentNode *This = HOSTSECMGR_THIS(iface);
141 TRACE("(%p)->(%s %p %p %p %d %x)\n", This, debugstr_guid(guidKey), ppPolicy, pcbPolicy, pContext, cbContext, dwReserved);
143 url = This->basedoc.window->url ? This->basedoc.window->url : about_blankW;
145 hres = IInternetSecurityManager_QueryCustomPolicy(This->secmgr, url, guidKey, ppPolicy, pcbPolicy,
146 pContext, cbContext, dwReserved);
147 if(hres != HRESULT_FROM_WIN32(ERROR_NOT_FOUND))
150 if(IsEqualGUID(&GUID_CUSTOM_CONFIRMOBJECTSAFETY, guidKey)) {
151 IActiveScript *active_script;
152 struct CONFIRMSAFETY *cs;
155 if(cbContext != sizeof(struct CONFIRMSAFETY)) {
156 FIXME("wrong context size\n");
160 cs = (struct CONFIRMSAFETY*)pContext;
161 hres = IUnknown_QueryInterface(cs->pUnk, &IID_IActiveScript, (void**)&active_script);
162 if(SUCCEEDED(hres)) {
163 FIXME("Got IAciveScript iface\n");
164 IActiveScript_Release(active_script);
168 hres = confirm_safety(This, url, cs, &policy);
172 *ppPolicy = CoTaskMemAlloc(sizeof(policy));
174 return E_OUTOFMEMORY;
176 *(DWORD*)*ppPolicy = policy;
177 *pcbPolicy = sizeof(policy);
181 FIXME("Unknown guidKey %s\n", debugstr_guid(guidKey));
185 #undef HOSTSECMGR_THIS
187 static const IInternetHostSecurityManagerVtbl InternetHostSecurityManagerVtbl = {
188 InternetHostSecurityManager_QueryInterface,
189 InternetHostSecurityManager_AddRef,
190 InternetHostSecurityManager_Release,
191 InternetHostSecurityManager_GetSecurityId,
192 InternetHostSecurityManager_ProcessUrlAction,
193 InternetHostSecurityManager_QueryCustomPolicy
196 void HTMLDocumentNode_SecMgr_Init(HTMLDocumentNode *This)
198 This->lpIInternetHostSecurityManagerVtbl = &InternetHostSecurityManagerVtbl;