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
;