ieframe/tests: Remove unused string (Clang).
[wine/multimedia.git] / dlls / ieframe / tests / webbrowser.c
blob7f45182a72880b72862395519e4b12c6309c6193
1 /*
2 * Copyright 2006 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
19 #define COBJMACROS
20 #define CONST_VTABLE
22 #include <wine/test.h>
23 #include <stdarg.h>
24 #include <stdio.h>
26 #include "windef.h"
27 #include "winbase.h"
28 #include "initguid.h"
29 #include "ole2.h"
30 #include "exdisp.h"
31 #include "htiframe.h"
32 #include "mshtmhst.h"
33 #include "mshtmcid.h"
34 #include "mshtml.h"
35 #include "idispids.h"
36 #include "olectl.h"
37 #include "mshtmdid.h"
38 #include "shobjidl.h"
39 #include "shdeprecated.h"
40 #include "shlguid.h"
41 #include "exdispid.h"
42 #include "mimeinfo.h"
43 #include "hlink.h"
44 #include "docobjectservice.h"
46 DEFINE_GUID(GUID_NULL,0,0,0,0,0,0,0,0,0,0,0);
47 DEFINE_OLEGUID(CGID_DocHostCmdPriv, 0x000214D4L, 0, 0);
49 #define DEFINE_EXPECT(func) \
50 static BOOL expect_ ## func = FALSE, called_ ## func = FALSE
52 #define SET_EXPECT(func) \
53 expect_ ## func = TRUE
55 #define CHECK_EXPECT2(func) \
56 do { \
57 ok(expect_ ##func, "unexpected call " #func "\n"); \
58 called_ ## func = TRUE; \
59 }while(0)
61 #define CHECK_EXPECT(func) \
62 do { \
63 CHECK_EXPECT2(func); \
64 expect_ ## func = FALSE; \
65 }while(0)
67 #define CHECK_CALLED(func) \
68 do { \
69 ok(called_ ## func, "expected " #func "\n"); \
70 expect_ ## func = called_ ## func = FALSE; \
71 }while(0)
73 #define CLEAR_CALLED(func) \
74 expect_ ## func = called_ ## func = FALSE
76 DEFINE_EXPECT(GetContainer);
77 DEFINE_EXPECT(Site_GetWindow);
78 DEFINE_EXPECT(ShowObject);
79 DEFINE_EXPECT(CanInPlaceActivate);
80 DEFINE_EXPECT(OnInPlaceActivate);
81 DEFINE_EXPECT(OnUIActivate);
82 DEFINE_EXPECT(GetWindowContext);
83 DEFINE_EXPECT(Frame_GetWindow);
84 DEFINE_EXPECT(Frame_SetActiveObject);
85 DEFINE_EXPECT(UIWindow_SetActiveObject);
86 DEFINE_EXPECT(SetMenu);
87 DEFINE_EXPECT(Invoke_AMBIENT_USERMODE);
88 DEFINE_EXPECT(Invoke_AMBIENT_DLCONTROL);
89 DEFINE_EXPECT(Invoke_AMBIENT_USERAGENT);
90 DEFINE_EXPECT(Invoke_AMBIENT_PALETTE);
91 DEFINE_EXPECT(Invoke_AMBIENT_SILENT);
92 DEFINE_EXPECT(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
93 DEFINE_EXPECT(Invoke_STATUSTEXTCHANGE);
94 DEFINE_EXPECT(Invoke_PROPERTYCHANGE);
95 DEFINE_EXPECT(Invoke_DOWNLOADBEGIN);
96 DEFINE_EXPECT(Invoke_BEFORENAVIGATE2);
97 DEFINE_EXPECT(Invoke_SETSECURELOCKICON);
98 DEFINE_EXPECT(Invoke_FILEDOWNLOAD);
99 DEFINE_EXPECT(Invoke_COMMANDSTATECHANGE_NAVIGATEFORWARD);
100 DEFINE_EXPECT(Invoke_COMMANDSTATECHANGE_NAVIGATEBACK);
101 DEFINE_EXPECT(Invoke_COMMANDSTATECHANGE_UPDATECOMMANDS);
102 DEFINE_EXPECT(Invoke_DOWNLOADCOMPLETE);
103 DEFINE_EXPECT(Invoke_ONMENUBAR);
104 DEFINE_EXPECT(Invoke_ONADDRESSBAR);
105 DEFINE_EXPECT(Invoke_ONSTATUSBAR);
106 DEFINE_EXPECT(Invoke_ONTOOLBAR);
107 DEFINE_EXPECT(Invoke_ONFULLSCREEN);
108 DEFINE_EXPECT(Invoke_ONTHEATERMODE);
109 DEFINE_EXPECT(Invoke_WINDOWSETRESIZABLE);
110 DEFINE_EXPECT(Invoke_TITLECHANGE);
111 DEFINE_EXPECT(Invoke_NAVIGATECOMPLETE2);
112 DEFINE_EXPECT(Invoke_PROGRESSCHANGE);
113 DEFINE_EXPECT(Invoke_DOCUMENTCOMPLETE);
114 DEFINE_EXPECT(Invoke_WINDOWCLOSING);
115 DEFINE_EXPECT(Invoke_282);
116 DEFINE_EXPECT(EnableModeless_TRUE);
117 DEFINE_EXPECT(EnableModeless_FALSE);
118 DEFINE_EXPECT(GetHostInfo);
119 DEFINE_EXPECT(GetOptionKeyPath);
120 DEFINE_EXPECT(GetOverridesKeyPath);
121 DEFINE_EXPECT(SetStatusText);
122 DEFINE_EXPECT(UpdateUI);
123 DEFINE_EXPECT(Exec_SETDOWNLOADSTATE_0);
124 DEFINE_EXPECT(Exec_SETDOWNLOADSTATE_1);
125 DEFINE_EXPECT(Exec_SETPROGRESSMAX);
126 DEFINE_EXPECT(Exec_SETPROGRESSPOS);
127 DEFINE_EXPECT(Exec_UPDATECOMMANDS);
128 DEFINE_EXPECT(Exec_SETTITLE);
129 DEFINE_EXPECT(QueryStatus_SETPROGRESSTEXT);
130 DEFINE_EXPECT(Exec_STOP);
131 DEFINE_EXPECT(Exec_IDM_STOP);
132 DEFINE_EXPECT(Exec_DocHostCommandHandler_2300);
133 DEFINE_EXPECT(QueryStatus_STOP);
134 DEFINE_EXPECT(QueryStatus_IDM_STOP);
135 DEFINE_EXPECT(DocHost_EnableModeless_TRUE);
136 DEFINE_EXPECT(DocHost_EnableModeless_FALSE);
137 DEFINE_EXPECT(DocHost_TranslateAccelerator);
138 DEFINE_EXPECT(GetDropTarget);
139 DEFINE_EXPECT(TranslateUrl);
140 DEFINE_EXPECT(ShowUI);
141 DEFINE_EXPECT(HideUI);
142 DEFINE_EXPECT(OnUIDeactivate);
143 DEFINE_EXPECT(OnInPlaceDeactivate);
144 DEFINE_EXPECT(RequestUIActivate);
145 DEFINE_EXPECT(ControlSite_TranslateAccelerator);
146 DEFINE_EXPECT(OnFocus);
147 DEFINE_EXPECT(GetExternal);
149 static const WCHAR wszItem[] = {'i','t','e','m',0};
151 static VARIANT_BOOL exvb;
153 static IWebBrowser2 *wb;
155 static HWND container_hwnd, shell_embedding_hwnd;
156 static BOOL is_downloading, is_first_load, use_container_olecmd, test_close, is_http, use_container_dochostui;
157 static HRESULT hr_dochost_TranslateAccelerator = E_NOTIMPL;
158 static HRESULT hr_site_TranslateAccelerator = E_NOTIMPL;
159 static const char *current_url;
160 static int wb_version, expect_navigate_back_enable, set_navigate_back_enable, expect_navigate_forward_enable,
161 set_navigate_forward_enable, expect_update_commands_enable, set_update_commands_enable;
163 #define DWL_EXPECT_BEFORE_NAVIGATE 0x01
164 #define DWL_FROM_PUT_HREF 0x02
165 #define DWL_FROM_GOBACK 0x04
166 #define DWL_FROM_GOFORWARD 0x08
167 #define DWL_HTTP 0x10
168 #define DWL_REFRESH 0x20
170 static DWORD dwl_flags;
173 /* Returns true if the user interface is in English. Note that this does not
174 * presume of the formatting of dates, numbers, etc.
176 static BOOL is_lang_english(void)
178 static HMODULE hkernel32 = NULL;
179 static LANGID (WINAPI *pGetThreadUILanguage)(void) = NULL;
180 static LANGID (WINAPI *pGetUserDefaultUILanguage)(void) = NULL;
182 if (!hkernel32)
184 hkernel32 = GetModuleHandleA("kernel32.dll");
185 pGetThreadUILanguage = (void*)GetProcAddress(hkernel32, "GetThreadUILanguage");
186 pGetUserDefaultUILanguage = (void*)GetProcAddress(hkernel32, "GetUserDefaultUILanguage");
188 if (pGetThreadUILanguage)
189 return PRIMARYLANGID(pGetThreadUILanguage()) == LANG_ENGLISH;
190 if (pGetUserDefaultUILanguage)
191 return PRIMARYLANGID(pGetUserDefaultUILanguage()) == LANG_ENGLISH;
193 return PRIMARYLANGID(GetUserDefaultLangID()) == LANG_ENGLISH;
196 static int strcmp_wa(LPCWSTR strw, const char *stra)
198 CHAR buf[512];
199 WideCharToMultiByte(CP_ACP, 0, strw, -1, buf, sizeof(buf), NULL, NULL);
200 return lstrcmpA(stra, buf);
203 static BOOL iface_cmp(IUnknown *iface1, IUnknown *iface2)
205 IUnknown *unk1, *unk2;
207 if(iface1 == iface2)
208 return TRUE;
210 IUnknown_QueryInterface(iface1, &IID_IUnknown, (void**)&unk1);
211 IUnknown_Release(unk1);
212 IUnknown_QueryInterface(iface2, &IID_IUnknown, (void**)&unk2);
213 IUnknown_Release(unk2);
215 return unk1 == unk2;
218 static BSTR a2bstr(const char *str)
220 BSTR ret;
221 int len;
223 len = MultiByteToWideChar(CP_ACP, 0, str, -1, NULL, 0);
224 ret = SysAllocStringLen(NULL, len);
225 MultiByteToWideChar(CP_ACP, 0, str, -1, ret, len);
227 return ret;
230 #define create_webbrowser() _create_webbrowser(__LINE__)
231 static IWebBrowser2 *_create_webbrowser(unsigned line)
233 IWebBrowser2 *ret;
234 HRESULT hres;
236 wb_version = 2;
238 hres = CoCreateInstance(&CLSID_WebBrowser, NULL, CLSCTX_INPROC_SERVER|CLSCTX_INPROC_HANDLER,
239 &IID_IWebBrowser2, (void**)&ret);
240 ok_(__FILE__,line)(hres == S_OK, "Creating WebBrowser object failed: %08x\n", hres);
241 return ret;
244 #define test_LocationURL(a,b) _test_LocationURL(__LINE__,a,b)
245 static void _test_LocationURL(unsigned line, IWebBrowser2 *wb, const char *exurl)
247 BSTR url = (void*)0xdeadbeef;
248 HRESULT hres;
250 hres = IWebBrowser2_get_LocationURL(wb, &url);
251 ok_(__FILE__,line) (hres == (*exurl ? S_OK : S_FALSE), "get_LocationURL failed: %08x\n", hres);
252 if (hres == S_OK)
254 ok_(__FILE__,line) (!strcmp_wa(url, exurl), "unexpected URL: %s\n", wine_dbgstr_w(url));
255 SysFreeString(url);
259 #define test_ready_state(ex) _test_ready_state(__LINE__,ex);
260 static void _test_ready_state(unsigned line, READYSTATE exstate)
262 READYSTATE state;
263 HRESULT hres;
265 hres = IWebBrowser2_get_ReadyState(wb, &state);
266 ok_(__FILE__,line)(hres == S_OK, "get_ReadyState failed: %08x\n", hres);
267 ok_(__FILE__,line)(state == exstate, "ReadyState = %d, expected %d\n", state, exstate);
270 #define get_document(u) _get_document(__LINE__,u)
271 static IHTMLDocument2 *_get_document(unsigned line, IWebBrowser2 *wb)
273 IHTMLDocument2 *html_doc;
274 IDispatch *disp;
275 HRESULT hres;
277 disp = NULL;
278 hres = IWebBrowser2_get_Document(wb, &disp);
279 ok_(__FILE__,line)(hres == S_OK, "get_Document failed: %08x\n", hres);
280 ok_(__FILE__,line)(disp != NULL, "doc_disp == NULL\n");
282 hres = IDispatch_QueryInterface(disp, &IID_IHTMLDocument2, (void**)&html_doc);
283 ok_(__FILE__,line)(hres == S_OK, "Could not get IHTMLDocument iface: %08x\n", hres);
284 ok(disp == (IDispatch*)html_doc, "disp != html_doc\n");
285 IDispatch_Release(disp);
287 return html_doc;
290 #define get_dochost(u) _get_dochost(__LINE__,u)
291 static IOleClientSite *_get_dochost(unsigned line, IWebBrowser2 *unk)
293 IOleClientSite *client_site;
294 IHTMLDocument2 *doc;
295 IOleObject *oleobj;
296 HRESULT hres;
298 doc = _get_document(line, unk);
299 hres = IHTMLDocument2_QueryInterface(doc, &IID_IOleObject, (void**)&oleobj);
300 IHTMLDocument2_Release(doc);
301 ok_(__FILE__,line)(hres == S_OK, "Got 0x%08x\n", hres);
303 hres = IOleObject_GetClientSite(oleobj, &client_site);
304 IOleObject_Release(oleobj);
305 ok_(__FILE__,line)(hres == S_OK, "Got 0x%08x\n", hres);
307 return client_site;
310 static HRESULT QueryInterface(REFIID,void**);
312 static HRESULT WINAPI OleCommandTarget_QueryInterface(IOleCommandTarget *iface,
313 REFIID riid, void **ppv)
315 ok(0, "unexpected call\n");
316 return E_NOINTERFACE;
319 static ULONG WINAPI OleCommandTarget_AddRef(IOleCommandTarget *iface)
321 return 2;
324 static ULONG WINAPI OleCommandTarget_Release(IOleCommandTarget *iface)
326 return 1;
329 static HRESULT WINAPI OleCommandTarget_QueryStatus(IOleCommandTarget *iface, const GUID *pguidCmdGroup,
330 ULONG cCmds, OLECMD prgCmds[], OLECMDTEXT *pCmdText)
332 ok(!pguidCmdGroup, "pguidCmdGroup != MULL\n");
333 ok(cCmds == 1, "cCmds=%d, expected 1\n", cCmds);
334 ok(!pCmdText, "pCmdText != NULL\n");
336 switch(prgCmds[0].cmdID) {
337 case OLECMDID_STOP:
338 CHECK_EXPECT2(QueryStatus_STOP);
339 prgCmds[0].cmdf = OLECMDF_SUPPORTED;
340 return S_OK;
341 case OLECMDID_SETPROGRESSTEXT:
342 CHECK_EXPECT(QueryStatus_SETPROGRESSTEXT);
343 prgCmds[0].cmdf = OLECMDF_ENABLED;
344 return S_OK;
345 case IDM_STOP:
346 /* Note:
347 * IDM_STOP is a command specific to CGID_MSHTML (not an OLECMDID command).
348 * This command appears here for the ExecWB and QueryStatusWB tests in order
349 * to help demonstrate that these routines use a NULL pguidCmdGroup.
351 CHECK_EXPECT(QueryStatus_IDM_STOP);
352 prgCmds[0].cmdf = 0;
353 return S_OK;
354 default:
355 ok(0, "unexpected command %d\n", prgCmds[0].cmdID);
358 return E_FAIL;
361 static HRESULT WINAPI OleCommandTarget_Exec(IOleCommandTarget *iface, const GUID *pguidCmdGroup,
362 DWORD nCmdID, DWORD nCmdexecopt, VARIANT *pvaIn, VARIANT *pvaOut)
364 if(!pguidCmdGroup) {
365 switch(nCmdID) {
366 case OLECMDID_SETPROGRESSMAX:
367 CHECK_EXPECT2(Exec_SETPROGRESSMAX);
368 ok(nCmdexecopt == OLECMDEXECOPT_DONTPROMPTUSER, "nCmdexecopts=%08x\n", nCmdexecopt);
369 ok(pvaIn != NULL, "pvaIn == NULL\n");
370 if(pvaIn)
371 ok(V_VT(pvaIn) == VT_I4, "V_VT(pvaIn)=%d, expected VT_I4\n", V_VT(pvaIn));
372 ok(pvaOut == NULL, "pvaOut=%p, expected NULL\n", pvaOut);
373 return S_OK;
374 case OLECMDID_SETPROGRESSPOS:
375 CHECK_EXPECT2(Exec_SETPROGRESSPOS);
376 ok(nCmdexecopt == OLECMDEXECOPT_DONTPROMPTUSER, "nCmdexecopts=%08x\n", nCmdexecopt);
377 ok(pvaIn != NULL, "pvaIn == NULL\n");
378 if(pvaIn)
379 ok(V_VT(pvaIn) == VT_I4, "V_VT(pvaIn)=%d, expected VT_I4\n", V_VT(pvaIn));
380 ok(pvaOut == NULL, "pvaOut=%p, expected NULL\n", pvaOut);
381 return S_OK;
382 case OLECMDID_SETDOWNLOADSTATE:
383 if(is_downloading)
384 ok(nCmdexecopt == OLECMDEXECOPT_DONTPROMPTUSER || !nCmdexecopt,
385 "nCmdexecopts=%08x\n", nCmdexecopt);
386 else
387 ok(!nCmdexecopt, "nCmdexecopts=%08x\n", nCmdexecopt);
388 ok(pvaOut == NULL, "pvaOut=%p\n", pvaOut);
389 ok(pvaIn != NULL, "pvaIn == NULL\n");
390 ok(V_VT(pvaIn) == VT_I4, "V_VT(pvaIn)=%d\n", V_VT(pvaIn));
391 switch(V_I4(pvaIn)) {
392 case 0:
393 CHECK_EXPECT2(Exec_SETDOWNLOADSTATE_0);
394 break;
395 case 1:
396 CHECK_EXPECT2(Exec_SETDOWNLOADSTATE_1);
397 break;
398 default:
399 ok(0, "unexpevted V_I4(pvaIn)=%d\n", V_I4(pvaIn));
401 return S_OK;
402 case OLECMDID_UPDATECOMMANDS:
403 CHECK_EXPECT2(Exec_UPDATECOMMANDS);
404 ok(nCmdexecopt == OLECMDEXECOPT_DONTPROMPTUSER, "nCmdexecopts=%08x\n", nCmdexecopt);
405 ok(!pvaIn, "pvaIn != NULL\n");
406 ok(!pvaOut, "pvaOut=%p, expected NULL\n", pvaOut);
407 return S_OK;
408 case OLECMDID_SETTITLE:
409 CHECK_EXPECT(Exec_SETTITLE);
410 /* TODO: test args */
411 return S_OK;
412 case OLECMDID_STOP:
413 CHECK_EXPECT(Exec_STOP);
414 return S_OK;
415 case IDM_STOP:
416 /* Note:
417 * IDM_STOP is a command specific to CGID_MSHTML (not an OLECMDID command).
418 * This command appears here for the ExecWB and QueryStatusWB tests in order
419 * to help demonstrate that these routines use a NULL pguidCmdGroup.
421 CHECK_EXPECT(Exec_IDM_STOP);
422 return OLECMDERR_E_NOTSUPPORTED;
423 case OLECMDID_UPDATETRAVELENTRY_DATARECOVERY:
424 case OLECMDID_PAGEAVAILABLE: /* TODO (IE11) */
425 return E_NOTIMPL;
426 case 6058: /* TODO */
427 return E_NOTIMPL;
428 default:
429 ok(0, "unexpected nCmdID %d\n", nCmdID);
431 }else if(IsEqualGUID(&CGID_Explorer, pguidCmdGroup)) {
432 switch(nCmdID) {
433 case 20: /* TODO */
434 case 24: /* TODO */
435 case 25: /* IE5 */
436 case 37: /* TODO */
437 case 39: /* TODO */
438 case 66: /* TODO */
439 case 67: /* TODO */
440 case 69: /* TODO */
441 case 101: /* TODO (IE8) */
442 case 109: /* TODO (IE9) */
443 case 113: /* TODO (IE10) */
444 case 119: /* IE11 */
445 return E_FAIL;
446 default:
447 ok(0, "unexpected nCmdID %d\n", nCmdID);
449 }else if(IsEqualGUID(&CGID_ShellDocView, pguidCmdGroup)) {
450 switch(nCmdID) {
451 case 105: /* TODO */
452 case 133: /* IE11 */
453 case 134: /* TODO (IE10) */
454 case 135: /* IE11 */
455 case 136: /* TODO (IE10) */
456 case 138: /* TODO */
457 case 140: /* TODO (Win7) */
458 case 144: /* TODO */
459 case 178: /* IE11 */
460 case 179: /* IE11 */
461 case 180: /* IE11 */
462 case 181: /* IE11 */
463 return E_FAIL;
464 default:
465 ok(0, "unexpected nCmdID %d\n", nCmdID);
467 }else if(IsEqualGUID(&CGID_DocHostCmdPriv, pguidCmdGroup)) {
468 switch(nCmdID) {
469 case 11: /* TODO */
470 break;
471 default:
472 ok(0, "unexpected nCmdID %d of CGID_DocHostCmdPriv\n", nCmdID);
474 }else if(IsEqualGUID(&CGID_DocHostCommandHandler, pguidCmdGroup)) {
475 switch(nCmdID) {
476 case 6041: /* TODO */
477 break;
478 case 2300:
479 CHECK_EXPECT(Exec_DocHostCommandHandler_2300);
480 return E_NOTIMPL;
481 default:
482 ok(0, "unexpected nCmdID %d of CGID_DocHostCommandHandler\n", nCmdID);
484 }else {
485 ok(0, "unexpected pguidCmdGroup %s\n", wine_dbgstr_guid(pguidCmdGroup));
488 return E_FAIL;
491 static IOleCommandTargetVtbl OleCommandTargetVtbl = {
492 OleCommandTarget_QueryInterface,
493 OleCommandTarget_AddRef,
494 OleCommandTarget_Release,
495 OleCommandTarget_QueryStatus,
496 OleCommandTarget_Exec
499 static IOleCommandTarget OleCommandTarget = { &OleCommandTargetVtbl };
501 static HRESULT WINAPI OleContainer_QueryInterface(IOleContainer *iface, REFIID riid, void **ppv)
503 if(IsEqualGUID(&IID_ITargetContainer, riid))
504 return E_NOINTERFACE; /* TODO */
506 if(IsEqualGUID(&IID_IOleCommandTarget, riid)) {
507 if(use_container_olecmd)
509 *ppv = &OleCommandTarget;
510 return S_OK;
512 else
513 return E_NOINTERFACE;
516 ok(0, "unexpected call\n");
517 return E_NOINTERFACE;
520 static ULONG WINAPI OleContainer_AddRef(IOleContainer *iface)
522 return 2;
525 static ULONG WINAPI OleContainer_Release(IOleContainer *iface)
527 return 1;
530 static HRESULT WINAPI OleContainer_ParseDisplayName(IOleContainer *iface, IBindCtx *pbc,
531 LPOLESTR pszDiaplayName, ULONG *pchEaten, IMoniker **ppmkOut)
533 ok(0, "unexpected call\n");
534 return E_NOTIMPL;
537 static HRESULT WINAPI OleContainer_EnumObjects(IOleContainer *iface, DWORD grfFlags,
538 IEnumUnknown **ppenum)
540 ok(0, "unexpected call\n");
541 return E_NOTIMPL;
544 static HRESULT WINAPI OleContainer_LockContainer(IOleContainer *iface, BOOL fLock)
546 ok(0, "unexpected call\n");
547 return E_NOTIMPL;
550 static const IOleContainerVtbl OleContainerVtbl = {
551 OleContainer_QueryInterface,
552 OleContainer_AddRef,
553 OleContainer_Release,
554 OleContainer_ParseDisplayName,
555 OleContainer_EnumObjects,
556 OleContainer_LockContainer
559 static IOleContainer OleContainer = { &OleContainerVtbl };
561 static HRESULT WINAPI Dispatch_QueryInterface(IDispatch *iface, REFIID riid, void **ppv)
563 return QueryInterface(riid, ppv);
566 static ULONG WINAPI Dispatch_AddRef(IDispatch *iface)
568 return 2;
571 static ULONG WINAPI Dispatch_Release(IDispatch *iface)
573 return 1;
576 static HRESULT WINAPI Dispatch_GetTypeInfoCount(IDispatch *iface, UINT *pctinfo)
578 ok(0, "unexpected call\n");
579 return E_NOTIMPL;
582 static HRESULT WINAPI Dispatch_GetTypeInfo(IDispatch *iface, UINT iTInfo, LCID lcid,
583 ITypeInfo **ppTInfo)
585 ok(0, "unexpected call\n");
586 return E_NOTIMPL;
589 static HRESULT WINAPI Dispatch_GetIDsOfNames(IDispatch *iface, REFIID riid, LPOLESTR *rgszNames,
590 UINT cNames, LCID lcid, DISPID *rgDispId)
592 ok(0, "unexpected call\n");
593 return E_NOTIMPL;
596 static HRESULT WINAPI Dispatch_Invoke(IDispatch *iface, DISPID dispIdMember, REFIID riid,
597 LCID lcid, WORD wFlags, DISPPARAMS *pDispParams, VARIANT *pVarResult,
598 EXCEPINFO *pExcepInfo, UINT *puArgErr)
600 ok(IsEqualGUID(&IID_NULL, riid), "riid != IID_NULL\n");
601 ok(pDispParams != NULL, "pDispParams == NULL\n");
602 ok(pExcepInfo == NULL, "pExcepInfo=%p, expected NULL\n", pExcepInfo);
603 ok(V_VT(pVarResult) == VT_EMPTY, "V_VT(pVarResult)=%d\n", V_VT(pVarResult));
604 ok(wFlags == DISPATCH_PROPERTYGET, "wFlags=%08x, expected DISPATCH_PROPERTYGET\n", wFlags);
605 ok(pDispParams->rgvarg == NULL, "pDispParams->rgvarg = %p\n", pDispParams->rgvarg);
606 ok(pDispParams->rgdispidNamedArgs == NULL,
607 "pDispParams->rgdispidNamedArgs = %p\n", pDispParams->rgdispidNamedArgs);
608 ok(pDispParams->cArgs == 0, "pDispParams->cArgs = %d\n", pDispParams->cArgs);
609 ok(pDispParams->cNamedArgs == 0, "pDispParams->cNamedArgs = %d\n", pDispParams->cNamedArgs);
611 switch(dispIdMember) {
612 case DISPID_AMBIENT_USERMODE:
613 CHECK_EXPECT2(Invoke_AMBIENT_USERMODE);
614 return E_FAIL;
615 case DISPID_AMBIENT_DLCONTROL:
616 CHECK_EXPECT(Invoke_AMBIENT_DLCONTROL);
617 ok(puArgErr != NULL, "puArgErr=%p\n", puArgErr);
618 return E_FAIL;
619 case DISPID_AMBIENT_USERAGENT:
620 CHECK_EXPECT(Invoke_AMBIENT_USERAGENT);
621 ok(puArgErr != NULL, "puArgErr=%p\n", puArgErr);
622 return E_FAIL;
623 case DISPID_AMBIENT_PALETTE:
624 CHECK_EXPECT(Invoke_AMBIENT_PALETTE);
625 ok(puArgErr != NULL, "puArgErr=%p\n", puArgErr);
626 return E_FAIL;
627 case DISPID_AMBIENT_OFFLINEIFNOTCONNECTED:
628 CHECK_EXPECT(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
629 ok(puArgErr == NULL, "puArgErr=%p\n", puArgErr);
630 V_VT(pVarResult) = VT_BOOL;
631 V_BOOL(pVarResult) = VARIANT_FALSE;
632 return S_OK;
633 case DISPID_AMBIENT_SILENT:
634 CHECK_EXPECT(Invoke_AMBIENT_SILENT);
635 ok(puArgErr == NULL, "puArgErr=%p\n", puArgErr);
636 V_VT(pVarResult) = VT_BOOL;
637 V_BOOL(pVarResult) = VARIANT_FALSE;
638 return S_OK;
641 ok(0, "unexpected dispIdMember %d\n", dispIdMember);
642 return E_NOTIMPL;
645 static IDispatchVtbl DispatchVtbl = {
646 Dispatch_QueryInterface,
647 Dispatch_AddRef,
648 Dispatch_Release,
649 Dispatch_GetTypeInfoCount,
650 Dispatch_GetTypeInfo,
651 Dispatch_GetIDsOfNames,
652 Dispatch_Invoke
655 static IDispatch Dispatch = { &DispatchVtbl };
657 static HRESULT WINAPI WebBrowserEvents2_QueryInterface(IDispatch *iface, REFIID riid, void **ppv)
659 *ppv = NULL;
661 if(IsEqualGUID(&DIID_DWebBrowserEvents2, riid) || IsEqualGUID(&IID_IDispatch, riid)) {
662 *ppv = iface;
663 return S_OK;
666 ok(0, "unexpected riid %s\n", wine_dbgstr_guid(riid));
667 return E_NOINTERFACE;
670 #define test_invoke_bool(p,s) _test_invoke_bool(__LINE__,p,s)
671 static void _test_invoke_bool(unsigned line, const DISPPARAMS *params, BOOL strict)
673 ok_(__FILE__,line) (params->rgvarg != NULL, "rgvarg == NULL\n");
674 ok_(__FILE__,line) (params->cArgs == 1, "cArgs=%d, expected 1\n", params->cArgs);
675 ok_(__FILE__,line) (V_VT(params->rgvarg) == VT_BOOL, "V_VT(arg)=%d\n", V_VT(params->rgvarg));
676 if(strict)
677 ok_(__FILE__,line) (V_BOOL(params->rgvarg) == exvb, "V_VT(arg)=%x, expected %x\n",
678 V_BOOL(params->rgvarg), exvb);
679 else
680 ok_(__FILE__,line) (!V_BOOL(params->rgvarg) == !exvb, "V_VT(arg)=%x, expected %x\n",
681 V_BOOL(params->rgvarg), exvb);
684 static void test_OnBeforeNavigate(const VARIANT *disp, const VARIANT *url, const VARIANT *flags,
685 const VARIANT *frame, const VARIANT *post_data, const VARIANT *headers, const VARIANT *cancel)
687 ok(V_VT(disp) == VT_DISPATCH, "V_VT(disp)=%d, expected VT_DISPATCH\n", V_VT(disp));
688 ok(V_DISPATCH(disp) != NULL, "V_DISPATCH(disp) == NULL\n");
689 ok(V_DISPATCH(disp) == (IDispatch*)wb, "V_DISPATCH(disp)=%p, wb=%p\n", V_DISPATCH(disp), wb);
691 ok(V_VT(url) == (VT_BYREF|VT_VARIANT), "V_VT(url)=%x, expected VT_BYREF|VT_VARIANT\n", V_VT(url));
692 ok(V_VARIANTREF(url) != NULL, "V_VARIANTREF(url) == NULL)\n");
693 if(V_VARIANTREF(url)) {
694 ok(V_VT(V_VARIANTREF(url)) == VT_BSTR, "V_VT(V_VARIANTREF(url))=%d, expected VT_BSTR\n",
695 V_VT(V_VARIANTREF(url)));
696 ok(V_BSTR(V_VARIANTREF(url)) != NULL, "V_BSTR(V_VARIANTREF(url)) == NULL\n");
697 ok(!strcmp_wa(V_BSTR(V_VARIANTREF(url)), current_url), "unexpected url %s, expected %s\n",
698 wine_dbgstr_w(V_BSTR(V_VARIANTREF(url))), current_url);
701 ok(V_VT(flags) == (VT_BYREF|VT_VARIANT), "V_VT(flags)=%x, expected VT_BYREF|VT_VARIANT\n",
702 V_VT(flags));
703 ok(V_VT(flags) == (VT_BYREF|VT_VARIANT), "V_VT(flags)=%x, expected VT_BYREF|VT_VARIANT\n",
704 V_VT(flags));
705 ok(V_VARIANTREF(flags) != NULL, "V_VARIANTREF(flags) == NULL)\n");
706 if(V_VARIANTREF(flags)) {
707 int f;
709 ok(V_VT(V_VARIANTREF(flags)) == VT_I4, "V_VT(V_VARIANTREF(flags))=%d, expected VT_I4\n",
710 V_VT(V_VARIANTREF(flags)));
711 f = V_I4(V_VARIANTREF(flags));
712 f &= ~0x100; /* IE11 sets this flag */
713 if(is_first_load)
714 ok(!f, "flags = %x, expected 0\n", V_I4(V_VARIANTREF(flags)));
715 else
716 ok(!(f & ~0x40), "flags = %x, expected 0x40 or 0\n", V_I4(V_VARIANTREF(flags)));
719 ok(V_VT(frame) == (VT_BYREF|VT_VARIANT), "V_VT(frame)=%x, expected VT_BYREF|VT_VARIANT\n",
720 V_VT(frame));
721 ok(V_VT(frame) == (VT_BYREF|VT_VARIANT), "V_VT(frame)=%x, expected VT_BYREF|VT_VARIANT\n",
722 V_VT(frame));
723 ok(V_VARIANTREF(frame) != NULL, "V_VARIANTREF(frame) == NULL)\n");
724 if(V_VARIANTREF(frame)) {
725 ok(V_VT(V_VARIANTREF(frame)) == VT_BSTR, "V_VT(V_VARIANTREF(frame))=%d, expected VT_BSTR\n",
726 V_VT(V_VARIANTREF(frame)));
727 ok(V_BSTR(V_VARIANTREF(frame)) == NULL, "V_BSTR(V_VARIANTREF(frame)) = %p, expected NULL\n",
728 V_BSTR(V_VARIANTREF(frame)));
731 ok(V_VT(post_data) == (VT_BYREF|VT_VARIANT), "V_VT(post_data)=%x, expected VT_BYREF|VT_VARIANT\n",
732 V_VT(post_data));
733 ok(V_VT(post_data) == (VT_BYREF|VT_VARIANT), "V_VT(post_data)=%x, expected VT_BYREF|VT_VARIANT\n",
734 V_VT(post_data));
735 ok(V_VARIANTREF(post_data) != NULL, "V_VARIANTREF(post_data) == NULL)\n");
736 if(V_VARIANTREF(post_data)) {
737 ok(V_VT(V_VARIANTREF(post_data)) == (VT_VARIANT|VT_BYREF),
738 "V_VT(V_VARIANTREF(post_data))=%d, expected VT_VARIANT|VT_BYREF\n",
739 V_VT(V_VARIANTREF(post_data)));
740 ok(V_VARIANTREF(V_VARIANTREF(post_data)) != NULL,
741 "V_VARIANTREF(V_VARIANTREF(post_data)) == NULL\n");
742 if(V_VARIANTREF(V_VARIANTREF(post_data))) {
743 ok(V_VT(V_VARIANTREF(V_VARIANTREF(post_data))) == VT_EMPTY,
744 "V_VT(V_VARIANTREF(V_VARIANTREF(post_data))) = %d, expected VT_EMPTY\n",
745 V_VT(V_VARIANTREF(V_VARIANTREF(post_data))));
747 if(V_VT(V_VARIANTREF(V_VARIANTREF(post_data))) == (VT_UI1|VT_ARRAY)) {
748 const SAFEARRAY *sa = V_ARRAY(V_VARIANTREF(V_VARIANTREF(post_data)));
750 ok(sa->cDims == 1, "sa->cDims = %d, expected 1\n", sa->cDims);
751 ok(sa->fFeatures == 0, "sa->fFeatures = %d, expected 0\n", sa->fFeatures);
756 ok(V_VT(headers) == (VT_BYREF|VT_VARIANT), "V_VT(headers)=%x, expected VT_BYREF|VT_VARIANT\n",
757 V_VT(headers));
758 ok(V_VARIANTREF(headers) != NULL, "V_VARIANTREF(headers) == NULL)\n");
759 if(V_VARIANTREF(headers)) {
760 ok(V_VT(V_VARIANTREF(headers)) == VT_BSTR, "V_VT(V_VARIANTREF(headers))=%d, expected VT_BSTR\n",
761 V_VT(V_VARIANTREF(headers)));
762 ok(V_BSTR(V_VARIANTREF(headers)) == NULL, "V_BSTR(V_VARIANTREF(headers)) = %p, expected NULL\n",
763 V_BSTR(V_VARIANTREF(headers)));
766 ok(V_VT(cancel) == (VT_BYREF|VT_BOOL), "V_VT(cancel)=%x, expected VT_BYREF|VT_BOOL\n",
767 V_VT(cancel));
768 ok(V_BOOLREF(cancel) != NULL, "V_BOOLREF(pDispParams->rgvarg[0] == NULL)\n");
769 if(V_BOOLREF(cancel))
770 ok(*V_BOOLREF(cancel) == VARIANT_FALSE, "*V_BOOLREF(cancel) = %x, expected VARIANT_FALSE\n",
771 *V_BOOLREF(cancel));
774 static void test_navigatecomplete2(DISPPARAMS *dp)
776 VARIANT *v;
778 CHECK_EXPECT(Invoke_NAVIGATECOMPLETE2);
780 ok(dp->rgvarg != NULL, "rgvarg == NULL\n");
781 ok(dp->cArgs == 2, "cArgs=%d, expected 2\n", dp->cArgs);
783 ok(V_VT(dp->rgvarg) == (VT_BYREF|VT_VARIANT), "V_VT(dp->rgvarg) = %d\n", V_VT(dp->rgvarg));
784 v = V_VARIANTREF(dp->rgvarg);
785 ok(V_VT(v) == VT_BSTR, "V_VT(url) = %d\n", V_VT(v));
786 ok(!strcmp_wa(V_BSTR(v), current_url), "url=%s, expected %s\n", wine_dbgstr_w(V_BSTR(v)), current_url);
788 ok(V_VT(dp->rgvarg+1) == VT_DISPATCH, "V_VT(dp->rgvarg+1) = %d\n", V_VT(dp->rgvarg+1));
789 ok(V_DISPATCH(dp->rgvarg+1) == (IDispatch*)wb, "V_DISPATCH=%p, wb=%p\n", V_DISPATCH(dp->rgvarg+1), wb);
791 test_ready_state((dwl_flags & (DWL_FROM_PUT_HREF|DWL_FROM_GOBACK|DWL_FROM_GOFORWARD))
792 ? READYSTATE_COMPLETE : READYSTATE_LOADING);
795 static void test_documentcomplete(DISPPARAMS *dp)
797 VARIANT *v;
799 CHECK_EXPECT(Invoke_DOCUMENTCOMPLETE);
801 ok(dp->rgvarg != NULL, "rgvarg == NULL\n");
802 ok(dp->cArgs == 2, "cArgs=%d, expected 2\n", dp->cArgs);
804 ok(V_VT(dp->rgvarg) == (VT_BYREF|VT_VARIANT), "V_VT(dp->rgvarg) = %d\n", V_VT(dp->rgvarg));
805 v = V_VARIANTREF(dp->rgvarg);
806 ok(V_VT(v) == VT_BSTR, "V_VT(url) = %d\n", V_VT(v));
807 ok(!strcmp_wa(V_BSTR(v), current_url), "url=%s, expected %s\n", wine_dbgstr_w(V_BSTR(v)), current_url);
809 ok(V_VT(dp->rgvarg+1) == VT_DISPATCH, "V_VT(dp->rgvarg+1) = %d\n", V_VT(dp->rgvarg+1));
810 ok(V_DISPATCH(dp->rgvarg+1) == (IDispatch*)wb, "V_DISPATCH=%p, wb=%p\n", V_DISPATCH(dp->rgvarg+1), wb);
812 test_ready_state(READYSTATE_COMPLETE);
815 static HRESULT WINAPI WebBrowserEvents2_Invoke(IDispatch *iface, DISPID dispIdMember, REFIID riid,
816 LCID lcid, WORD wFlags, DISPPARAMS *pDispParams, VARIANT *pVarResult,
817 EXCEPINFO *pExcepInfo, UINT *puArgErr)
819 ok(IsEqualGUID(&IID_NULL, riid), "riid != IID_NULL\n");
820 ok(pDispParams != NULL, "pDispParams == NULL\n");
821 ok(pExcepInfo == NULL, "pExcepInfo=%p, expected NULL\n", pExcepInfo);
822 ok(pVarResult == NULL, "pVarResult=%p\n", pVarResult);
823 ok(wFlags == DISPATCH_METHOD, "wFlags=%08x, expected DISPATCH_METHOD\n", wFlags);
824 ok(pDispParams->rgdispidNamedArgs == NULL,
825 "pDispParams->rgdispidNamedArgs = %p\n", pDispParams->rgdispidNamedArgs);
826 ok(pDispParams->cNamedArgs == 0, "pDispParams->cNamedArgs = %d\n", pDispParams->cNamedArgs);
828 switch(dispIdMember) {
829 case DISPID_STATUSTEXTCHANGE:
830 CHECK_EXPECT2(Invoke_STATUSTEXTCHANGE);
832 ok(pDispParams->rgvarg != NULL, "rgvarg == NULL\n");
833 ok(pDispParams->cArgs == 1, "cArgs=%d, expected 1\n", pDispParams->cArgs);
834 ok(V_VT(pDispParams->rgvarg) == VT_BSTR, "V_VT(pDispParams->rgvarg)=%d, expected VT_BSTR\n",
835 V_VT(pDispParams->rgvarg));
836 /* TODO: Check text */
837 break;
839 case DISPID_PROPERTYCHANGE:
840 CHECK_EXPECT2(Invoke_PROPERTYCHANGE);
842 ok(pDispParams->rgvarg != NULL, "rgvarg == NULL\n");
843 ok(pDispParams->cArgs == 1, "cArgs=%d, expected 1\n", pDispParams->cArgs);
844 /* TODO: Check args */
845 break;
847 case DISPID_DOWNLOADBEGIN:
848 CHECK_EXPECT(Invoke_DOWNLOADBEGIN);
850 ok(pDispParams->rgvarg == NULL, "rgvarg=%p, expected NULL\n", pDispParams->rgvarg);
851 ok(pDispParams->cArgs == 0, "cArgs=%d, expected 0\n", pDispParams->cArgs);
852 test_ready_state(READYSTATE_LOADING);
853 break;
855 case DISPID_BEFORENAVIGATE2:
856 CHECK_EXPECT(Invoke_BEFORENAVIGATE2);
858 ok(pDispParams->rgvarg != NULL, "rgvarg == NULL\n");
859 ok(pDispParams->cArgs == 7, "cArgs=%d, expected 7\n", pDispParams->cArgs);
860 test_OnBeforeNavigate(pDispParams->rgvarg+6, pDispParams->rgvarg+5, pDispParams->rgvarg+4,
861 pDispParams->rgvarg+3, pDispParams->rgvarg+2, pDispParams->rgvarg+1,
862 pDispParams->rgvarg);
863 test_ready_state((dwl_flags & (DWL_FROM_PUT_HREF|DWL_FROM_GOFORWARD)) ? READYSTATE_COMPLETE : READYSTATE_LOADING);
864 break;
866 case DISPID_SETSECURELOCKICON:
867 CHECK_EXPECT2(Invoke_SETSECURELOCKICON);
869 ok(pDispParams->rgvarg != NULL, "rgvarg == NULL\n");
870 ok(pDispParams->cArgs == 1, "cArgs=%d, expected 1\n", pDispParams->cArgs);
871 /* TODO: Check args */
872 break;
874 case DISPID_FILEDOWNLOAD:
875 CHECK_EXPECT(Invoke_FILEDOWNLOAD);
877 ok(pDispParams->rgvarg != NULL, "rgvarg == NULL\n");
878 ok(pDispParams->cArgs == 2, "cArgs=%d, expected 2\n", pDispParams->cArgs);
879 /* TODO: Check args */
880 break;
882 case DISPID_COMMANDSTATECHANGE:
883 ok(pDispParams->rgvarg != NULL, "rgvarg == NULL\n");
884 ok(pDispParams->cArgs == 2, "cArgs=%d, expected 2\n", pDispParams->cArgs);
886 ok(V_VT(pDispParams->rgvarg) == VT_BOOL, "V_VT(pDispParams->rgvarg) = %d\n", V_VT(pDispParams->rgvarg));
887 ok(V_VT(pDispParams->rgvarg+1) == VT_I4, "V_VT(pDispParams->rgvarg+1) = %d\n", V_VT(pDispParams->rgvarg+1));
888 ok(V_I4(pDispParams->rgvarg+1) == CSC_NAVIGATEFORWARD ||
889 V_I4(pDispParams->rgvarg+1) == CSC_NAVIGATEBACK ||
890 V_I4(pDispParams->rgvarg+1) == CSC_UPDATECOMMANDS,
891 "V_I4(pDispParams->rgvarg+1) = %x\n", V_I4(pDispParams->rgvarg+1));
893 if (V_I4(pDispParams->rgvarg+1) == CSC_NAVIGATEFORWARD)
895 CHECK_EXPECT2(Invoke_COMMANDSTATECHANGE_NAVIGATEFORWARD);
896 set_navigate_forward_enable = V_BOOL(pDispParams->rgvarg);
898 else if (V_I4(pDispParams->rgvarg+1) == CSC_NAVIGATEBACK)
900 CHECK_EXPECT2(Invoke_COMMANDSTATECHANGE_NAVIGATEBACK);
901 set_navigate_back_enable = V_BOOL(pDispParams->rgvarg);
903 else if (V_I4(pDispParams->rgvarg+1) == CSC_UPDATECOMMANDS)
905 todo_wine CHECK_EXPECT2(Invoke_COMMANDSTATECHANGE_UPDATECOMMANDS);
906 set_update_commands_enable = V_BOOL(pDispParams->rgvarg);
908 break;
910 case DISPID_DOWNLOADCOMPLETE:
911 CHECK_EXPECT(Invoke_DOWNLOADCOMPLETE);
913 ok(pDispParams->rgvarg == NULL, "rgvarg=%p, expected NULL\n", pDispParams->rgvarg);
914 ok(pDispParams->cArgs == 0, "cArgs=%d, expected 0\n", pDispParams->cArgs);
915 test_ready_state(READYSTATE_LOADING);
916 break;
918 case DISPID_ONMENUBAR:
919 CHECK_EXPECT(Invoke_ONMENUBAR);
920 test_invoke_bool(pDispParams, TRUE);
921 break;
923 case DISPID_ONADDRESSBAR:
924 CHECK_EXPECT(Invoke_ONADDRESSBAR);
925 test_invoke_bool(pDispParams, TRUE);
926 break;
928 case DISPID_ONSTATUSBAR:
929 CHECK_EXPECT(Invoke_ONSTATUSBAR);
930 test_invoke_bool(pDispParams, TRUE);
931 break;
933 case DISPID_ONTOOLBAR:
934 CHECK_EXPECT(Invoke_ONTOOLBAR);
935 test_invoke_bool(pDispParams, FALSE);
936 break;
938 case DISPID_ONFULLSCREEN:
939 CHECK_EXPECT(Invoke_ONFULLSCREEN);
940 test_invoke_bool(pDispParams, TRUE);
941 break;
943 case DISPID_ONTHEATERMODE:
944 CHECK_EXPECT(Invoke_ONTHEATERMODE);
945 test_invoke_bool(pDispParams, TRUE);
946 break;
948 case DISPID_WINDOWSETRESIZABLE:
949 CHECK_EXPECT(Invoke_WINDOWSETRESIZABLE);
950 test_invoke_bool(pDispParams, TRUE);
951 break;
953 case DISPID_TITLECHANGE:
954 CHECK_EXPECT2(Invoke_TITLECHANGE);
955 /* FIXME */
956 break;
958 case DISPID_NAVIGATECOMPLETE2:
959 test_navigatecomplete2(pDispParams);
960 break;
962 case DISPID_PROGRESSCHANGE:
963 CHECK_EXPECT2(Invoke_PROGRESSCHANGE);
964 /* FIXME */
965 break;
967 case DISPID_DOCUMENTCOMPLETE:
968 test_documentcomplete(pDispParams);
969 break;
971 case DISPID_WINDOWCLOSING: {
972 VARIANT *is_child = pDispParams->rgvarg+1, *cancel = pDispParams->rgvarg;
974 CHECK_EXPECT(Invoke_WINDOWCLOSING);
976 ok(pDispParams->cArgs == 2, "pdp->cArgs = %d\n", pDispParams->cArgs);
977 ok(V_VT(is_child) == VT_BOOL, "V_VT(is_child) = %d\n", V_VT(is_child));
978 ok(!V_BOOL(is_child), "V_BOOL(is_child) = %x\n", V_BOOL(is_child));
979 ok(V_VT(cancel) == (VT_BYREF|VT_BOOL), "V_VT(cancel) = %d\n", V_VT(cancel));
980 ok(!*V_BOOLREF(cancel), "*V_BOOLREF(cancel) = %x\n", *V_BOOLREF(cancel));
982 *V_BOOLREF(cancel) = VARIANT_TRUE;
983 return S_OK;
986 case 282: /* FIXME */
987 CHECK_EXPECT2(Invoke_282);
988 break;
990 case 290: /* FIXME: IE10 */
991 break;
993 default:
994 ok(0, "unexpected dispIdMember %d\n", dispIdMember);
997 return S_OK;
1000 static IDispatchVtbl WebBrowserEvents2Vtbl = {
1001 WebBrowserEvents2_QueryInterface,
1002 Dispatch_AddRef,
1003 Dispatch_Release,
1004 Dispatch_GetTypeInfoCount,
1005 Dispatch_GetTypeInfo,
1006 Dispatch_GetIDsOfNames,
1007 WebBrowserEvents2_Invoke
1010 static IDispatch WebBrowserEvents2 = { &WebBrowserEvents2Vtbl };
1012 static HRESULT WINAPI ClientSite_QueryInterface(IOleClientSite *iface, REFIID riid, void **ppv)
1014 return QueryInterface(riid, ppv);
1017 static ULONG WINAPI ClientSite_AddRef(IOleClientSite *iface)
1019 return 2;
1022 static ULONG WINAPI ClientSite_Release(IOleClientSite *iface)
1024 return 1;
1027 static HRESULT WINAPI ClientSite_SaveObject(IOleClientSite *iface)
1029 ok(0, "unexpected call\n");
1030 return E_NOTIMPL;
1033 static HRESULT WINAPI ClientSite_GetMoniker(IOleClientSite *iface, DWORD dwAssign, DWORD dwWhichMoniker,
1034 IMoniker **ppmon)
1036 ok(0, "unexpected call\n");
1037 return E_NOTIMPL;
1040 static HRESULT WINAPI ClientSite_GetContainer(IOleClientSite *iface, IOleContainer **ppContainer)
1042 CHECK_EXPECT(GetContainer);
1044 ok(ppContainer != NULL, "ppContainer == NULL\n");
1045 if(ppContainer)
1046 *ppContainer = &OleContainer;
1048 return S_OK;
1051 static HRESULT WINAPI ClientSite_ShowObject(IOleClientSite *iface)
1053 CHECK_EXPECT(ShowObject);
1054 return S_OK;
1057 static HRESULT WINAPI ClientSite_OnShowWindow(IOleClientSite *iface, BOOL fShow)
1059 ok(0, "unexpected call\n");
1060 return E_NOTIMPL;
1063 static HRESULT WINAPI ClientSite_RequestNewObjectLayout(IOleClientSite *iface)
1065 ok(0, "unexpected call\n");
1066 return E_NOTIMPL;
1069 static const IOleClientSiteVtbl ClientSiteVtbl = {
1070 ClientSite_QueryInterface,
1071 ClientSite_AddRef,
1072 ClientSite_Release,
1073 ClientSite_SaveObject,
1074 ClientSite_GetMoniker,
1075 ClientSite_GetContainer,
1076 ClientSite_ShowObject,
1077 ClientSite_OnShowWindow,
1078 ClientSite_RequestNewObjectLayout
1081 static IOleClientSite ClientSite = { &ClientSiteVtbl };
1083 static HRESULT WINAPI IOleControlSite_fnQueryInterface(IOleControlSite *iface, REFIID riid, void **ppv)
1085 *ppv = NULL;
1086 return E_NOINTERFACE;
1089 static ULONG WINAPI IOleControlSite_fnAddRef(IOleControlSite *iface)
1091 return 2;
1094 static ULONG WINAPI IOleControlSite_fnRelease(IOleControlSite *iface)
1096 return 1;
1099 static HRESULT WINAPI IOleControlSite_fnOnControlInfoChanged(IOleControlSite* This)
1101 ok(0, "unexpected call\n");
1102 return E_NOTIMPL;
1105 static HRESULT WINAPI IOleControlSite_fnLockInPlaceActive(IOleControlSite* This,
1106 BOOL fLock)
1108 ok(0, "unexpected call\n");
1109 return E_NOTIMPL;
1112 static HRESULT WINAPI IOleControlSite_fnGetExtendedControl(IOleControlSite* This,
1113 IDispatch **ppDisp)
1115 ok(0, "unexpected call\n");
1116 return E_NOTIMPL;
1119 static HRESULT WINAPI IOleControlSite_fnTransformCoords(IOleControlSite* This,
1120 POINTL *pPtlHimetric,
1121 POINTF *pPtfContainer,
1122 DWORD dwFlags)
1124 ok(0, "unexpected call\n");
1125 return E_NOTIMPL;
1128 static HRESULT WINAPI IOleControlSite_fnTranslateAccelerator(IOleControlSite* This, MSG *pMsg,
1129 DWORD grfModifiers)
1131 CHECK_EXPECT(ControlSite_TranslateAccelerator);
1132 return hr_site_TranslateAccelerator;
1135 static HRESULT WINAPI IOleControlSite_fnOnFocus(IOleControlSite* This, BOOL fGotFocus)
1137 CHECK_EXPECT2(OnFocus);
1138 return E_NOTIMPL;
1141 static HRESULT WINAPI IOleControlSite_fnShowPropertyFrame(IOleControlSite* This)
1143 ok(0, "unexpected call\n");
1144 return E_NOTIMPL;
1147 static IOleControlSiteVtbl ControlSiteVtbl = {
1148 IOleControlSite_fnQueryInterface,
1149 IOleControlSite_fnAddRef,
1150 IOleControlSite_fnRelease,
1151 IOleControlSite_fnOnControlInfoChanged,
1152 IOleControlSite_fnLockInPlaceActive,
1153 IOleControlSite_fnGetExtendedControl,
1154 IOleControlSite_fnTransformCoords,
1155 IOleControlSite_fnTranslateAccelerator,
1156 IOleControlSite_fnOnFocus,
1157 IOleControlSite_fnShowPropertyFrame
1160 static IOleControlSite ControlSite = { &ControlSiteVtbl };
1162 static HRESULT WINAPI InPlaceUIWindow_QueryInterface(IOleInPlaceFrame *iface,
1163 REFIID riid, void **ppv)
1165 ok(0, "unexpected call\n");
1166 return E_NOINTERFACE;
1169 static ULONG WINAPI InPlaceUIWindow_AddRef(IOleInPlaceFrame *iface)
1171 return 2;
1174 static ULONG WINAPI InPlaceUIWindow_Release(IOleInPlaceFrame *iface)
1176 return 1;
1179 static HRESULT WINAPI InPlaceUIWindow_GetWindow(IOleInPlaceFrame *iface, HWND *phwnd)
1181 ok(0, "unexpected call\n");
1182 return E_NOTIMPL;
1185 static HRESULT WINAPI InPlaceFrame_GetWindow(IOleInPlaceFrame *iface, HWND *phwnd)
1187 CHECK_EXPECT(Frame_GetWindow);
1188 ok(phwnd != NULL, "phwnd == NULL\n");
1189 if(phwnd)
1190 *phwnd = container_hwnd;
1191 return S_OK;
1194 static HRESULT WINAPI InPlaceUIWindow_ContextSensitiveHelp(IOleInPlaceFrame *iface, BOOL fEnterMode)
1196 ok(0, "unexpected call\n");
1197 return E_NOTIMPL;
1200 static HRESULT WINAPI InPlaceUIWindow_GetBorder(IOleInPlaceFrame *iface, LPRECT lprectBorder)
1202 ok(0, "unexpected call\n");
1203 return E_NOTIMPL;
1206 static HRESULT WINAPI InPlaceUIWindow_RequestBorderSpace(IOleInPlaceFrame *iface,
1207 LPCBORDERWIDTHS pborderwidths)
1209 ok(0, "unexpected call\n");
1210 return E_NOTIMPL;
1213 static HRESULT WINAPI InPlaceUIWindow_SetBorderSpace(IOleInPlaceFrame *iface,
1214 LPCBORDERWIDTHS pborderwidths)
1216 ok(0, "unexpected call\n");
1217 return E_NOTIMPL;
1220 static HRESULT WINAPI InPlaceUIWindow_SetActiveObject(IOleInPlaceFrame *iface,
1221 IOleInPlaceActiveObject *pActiveObject, LPCOLESTR pszObjName)
1223 CHECK_EXPECT(UIWindow_SetActiveObject);
1224 if(!test_close) {
1225 ok(pActiveObject != NULL, "pActiveObject = NULL\n");
1226 ok(!lstrcmpW(pszObjName, wszItem), "unexpected pszObjName\n");
1227 } else {
1228 ok(!pActiveObject, "pActiveObject != NULL\n");
1229 ok(!pszObjName, "pszObjName != NULL\n");
1231 return S_OK;
1234 static HRESULT WINAPI InPlaceFrame_SetActiveObject(IOleInPlaceFrame *iface,
1235 IOleInPlaceActiveObject *pActiveObject, LPCOLESTR pszObjName)
1237 CHECK_EXPECT(Frame_SetActiveObject);
1238 if(!test_close) {
1239 ok(pActiveObject != NULL, "pActiveObject = NULL\n");
1240 ok(!lstrcmpW(pszObjName, wszItem), "unexpected pszObjName\n");
1241 } else {
1242 ok(!pActiveObject, "pActiveObject != NULL\n");
1243 ok(!pszObjName, "pszObjName != NULL\n");
1245 return S_OK;
1248 static HRESULT WINAPI InPlaceFrame_InsertMenus(IOleInPlaceFrame *iface, HMENU hmenuShared,
1249 LPOLEMENUGROUPWIDTHS lpMenuWidths)
1251 ok(0, "unexpected call\n");
1252 return E_NOTIMPL;
1255 static HRESULT WINAPI InPlaceFrame_SetMenu(IOleInPlaceFrame *iface, HMENU hmenuShared,
1256 HOLEMENU holemenu, HWND hwndActiveObject)
1258 CHECK_EXPECT(SetMenu);
1259 ok(hmenuShared == NULL, "hmenuShared=%p\n", hmenuShared);
1260 ok(holemenu == NULL, "holemenu=%p\n", holemenu);
1261 ok(hwndActiveObject == shell_embedding_hwnd, "hwndActiveObject=%p, expected %p\n",
1262 hwndActiveObject, shell_embedding_hwnd);
1263 return S_OK;
1266 static HRESULT WINAPI InPlaceFrame_RemoveMenus(IOleInPlaceFrame *iface, HMENU hmenuShared)
1268 ok(0, "unexpected call\n");
1269 return E_NOTIMPL;
1272 static HRESULT WINAPI InPlaceFrame_SetStatusText(IOleInPlaceFrame *iface, LPCOLESTR pszStatusText)
1274 CHECK_EXPECT2(SetStatusText);
1275 /* FIXME: Check pszStatusText */
1276 return S_OK;
1279 static HRESULT WINAPI InPlaceFrame_EnableModeless(IOleInPlaceFrame *iface, BOOL fEnable)
1281 if(fEnable)
1282 CHECK_EXPECT2(EnableModeless_TRUE);
1283 else
1284 CHECK_EXPECT2(EnableModeless_FALSE);
1285 return S_OK;
1288 static HRESULT WINAPI InPlaceFrame_TranslateAccelerator(IOleInPlaceFrame *iface, LPMSG lpmsg, WORD wID)
1290 ok(0, "unexpected call\n");
1291 return E_NOTIMPL;
1294 static const IOleInPlaceFrameVtbl InPlaceUIWindowVtbl = {
1295 InPlaceUIWindow_QueryInterface,
1296 InPlaceUIWindow_AddRef,
1297 InPlaceUIWindow_Release,
1298 InPlaceUIWindow_GetWindow,
1299 InPlaceUIWindow_ContextSensitiveHelp,
1300 InPlaceUIWindow_GetBorder,
1301 InPlaceUIWindow_RequestBorderSpace,
1302 InPlaceUIWindow_SetBorderSpace,
1303 InPlaceUIWindow_SetActiveObject,
1306 static IOleInPlaceUIWindow InPlaceUIWindow = { (IOleInPlaceUIWindowVtbl*)&InPlaceUIWindowVtbl };
1308 static const IOleInPlaceFrameVtbl InPlaceFrameVtbl = {
1309 InPlaceUIWindow_QueryInterface,
1310 InPlaceUIWindow_AddRef,
1311 InPlaceUIWindow_Release,
1312 InPlaceFrame_GetWindow,
1313 InPlaceUIWindow_ContextSensitiveHelp,
1314 InPlaceUIWindow_GetBorder,
1315 InPlaceUIWindow_RequestBorderSpace,
1316 InPlaceUIWindow_SetBorderSpace,
1317 InPlaceFrame_SetActiveObject,
1318 InPlaceFrame_InsertMenus,
1319 InPlaceFrame_SetMenu,
1320 InPlaceFrame_RemoveMenus,
1321 InPlaceFrame_SetStatusText,
1322 InPlaceFrame_EnableModeless,
1323 InPlaceFrame_TranslateAccelerator
1326 static IOleInPlaceFrame InPlaceFrame = { &InPlaceFrameVtbl };
1328 static HRESULT WINAPI InPlaceSite_QueryInterface(IOleInPlaceSiteEx *iface, REFIID riid, void **ppv)
1330 return QueryInterface(riid, ppv);
1333 static ULONG WINAPI InPlaceSite_AddRef(IOleInPlaceSiteEx *iface)
1335 return 2;
1338 static ULONG WINAPI InPlaceSite_Release(IOleInPlaceSiteEx *iface)
1340 return 1;
1343 static HRESULT WINAPI InPlaceSite_GetWindow(IOleInPlaceSiteEx *iface, HWND *phwnd)
1345 CHECK_EXPECT(Site_GetWindow);
1346 ok(phwnd != NULL, "phwnd == NULL\n");
1347 if(phwnd)
1348 *phwnd = container_hwnd;
1349 return S_OK;
1352 static HRESULT WINAPI InPlaceSite_ContextSensitiveHelp(IOleInPlaceSiteEx *iface, BOOL fEnterMode)
1354 ok(0, "unexpected call\n");
1355 return E_NOTIMPL;
1358 static HRESULT WINAPI InPlaceSite_CanInPlaceActivate(IOleInPlaceSiteEx *iface)
1360 CHECK_EXPECT(CanInPlaceActivate);
1361 return S_OK;
1364 static HRESULT WINAPI InPlaceSite_OnInPlaceActivate(IOleInPlaceSiteEx *iface)
1366 CHECK_EXPECT(OnInPlaceActivate);
1367 return S_OK;
1370 static HRESULT WINAPI InPlaceSite_OnUIActivate(IOleInPlaceSiteEx *iface)
1372 CHECK_EXPECT(OnUIActivate);
1373 return S_OK;
1376 static HRESULT WINAPI InPlaceSite_GetWindowContext(IOleInPlaceSiteEx *iface,
1377 IOleInPlaceFrame **ppFrame, IOleInPlaceUIWindow **ppDoc, LPRECT lprcPosRect,
1378 LPRECT lprcClipRect, LPOLEINPLACEFRAMEINFO lpFrameInfo)
1380 static const RECT pos_rect = {2,1,1002,901};
1381 static const RECT clip_rect = {10,10,990,890};
1383 CHECK_EXPECT(GetWindowContext);
1385 ok(ppFrame != NULL, "ppFrame = NULL\n");
1386 if(ppFrame)
1387 *ppFrame = &InPlaceFrame;
1389 ok(ppDoc != NULL, "ppDoc = NULL\n");
1390 if(ppDoc)
1391 *ppDoc = &InPlaceUIWindow;
1393 ok(lprcPosRect != NULL, "lprcPosRect = NULL\n");
1394 if(lprcPosRect)
1395 memcpy(lprcPosRect, &pos_rect, sizeof(RECT));
1397 ok(lprcClipRect != NULL, "lprcClipRect = NULL\n");
1398 if(lprcClipRect)
1399 memcpy(lprcClipRect, &clip_rect, sizeof(RECT));
1401 ok(lpFrameInfo != NULL, "lpFrameInfo = NULL\n");
1402 if(lpFrameInfo) {
1403 ok(lpFrameInfo->cb == sizeof(*lpFrameInfo), "lpFrameInfo->cb = %u, expected %u\n", lpFrameInfo->cb, (unsigned)sizeof(*lpFrameInfo));
1404 lpFrameInfo->fMDIApp = FALSE;
1405 lpFrameInfo->hwndFrame = container_hwnd;
1406 lpFrameInfo->haccel = NULL;
1407 lpFrameInfo->cAccelEntries = 0;
1410 return S_OK;
1413 static HRESULT WINAPI InPlaceSite_Scroll(IOleInPlaceSiteEx *iface, SIZE scrollExtant)
1415 ok(0, "unexpected call\n");
1416 return E_NOTIMPL;
1419 static HRESULT WINAPI InPlaceSite_OnUIDeactivate(IOleInPlaceSiteEx *iface, BOOL fUndoable)
1421 CHECK_EXPECT(OnUIDeactivate);
1422 ok(!fUndoable, "fUndoable should be FALSE\n");
1423 return S_OK;
1426 static HRESULT WINAPI InPlaceSite_OnInPlaceDeactivate(IOleInPlaceSiteEx *iface)
1428 CHECK_EXPECT(OnInPlaceDeactivate);
1429 return S_OK;
1432 static HRESULT WINAPI InPlaceSite_DiscardUndoState(IOleInPlaceSiteEx *iface)
1434 ok(0, "unexpected call\n");
1435 return E_NOTIMPL;
1438 static HRESULT WINAPI InPlaceSite_DeactivateAndUndo(IOleInPlaceSiteEx *iface)
1440 ok(0, "unexpected call\n");
1441 return E_NOTIMPL;
1444 static HRESULT WINAPI InPlaceSite_OnPosRectChange(IOleInPlaceSiteEx *iface, LPCRECT lprcPosRect)
1446 ok(0, "unexpected call\n");
1447 return E_NOTIMPL;
1450 static HRESULT WINAPI InPlaceSite_OnInPlaceActivateEx(IOleInPlaceSiteEx *iface,
1451 BOOL *pNoRedraw, DWORD dwFlags)
1453 ok(0, "unexpected call\n");
1454 return E_NOTIMPL;
1457 static HRESULT WINAPI InPlaceSite_OnInPlaceDeactivateEx(IOleInPlaceSiteEx *iface,
1458 BOOL fNoRedraw)
1460 ok(0, "unexpected call\n");
1461 return E_NOTIMPL;
1464 static HRESULT WINAPI InPlaceSite_RequestUIActivate(IOleInPlaceSiteEx *iface)
1466 CHECK_EXPECT2(RequestUIActivate);
1467 return S_OK;
1470 static const IOleInPlaceSiteExVtbl InPlaceSiteExVtbl = {
1471 InPlaceSite_QueryInterface,
1472 InPlaceSite_AddRef,
1473 InPlaceSite_Release,
1474 InPlaceSite_GetWindow,
1475 InPlaceSite_ContextSensitiveHelp,
1476 InPlaceSite_CanInPlaceActivate,
1477 InPlaceSite_OnInPlaceActivate,
1478 InPlaceSite_OnUIActivate,
1479 InPlaceSite_GetWindowContext,
1480 InPlaceSite_Scroll,
1481 InPlaceSite_OnUIDeactivate,
1482 InPlaceSite_OnInPlaceDeactivate,
1483 InPlaceSite_DiscardUndoState,
1484 InPlaceSite_DeactivateAndUndo,
1485 InPlaceSite_OnPosRectChange,
1486 InPlaceSite_OnInPlaceActivateEx,
1487 InPlaceSite_OnInPlaceDeactivateEx,
1488 InPlaceSite_RequestUIActivate
1491 static IOleInPlaceSiteEx InPlaceSite = { &InPlaceSiteExVtbl };
1493 static HRESULT WINAPI DocHostUIHandler_QueryInterface(IDocHostUIHandler2 *iface, REFIID riid, void **ppv)
1495 return QueryInterface(riid, ppv);
1498 static ULONG WINAPI DocHostUIHandler_AddRef(IDocHostUIHandler2 *iface)
1500 return 2;
1503 static ULONG WINAPI DocHostUIHandler_Release(IDocHostUIHandler2 *iface)
1505 return 1;
1508 static HRESULT WINAPI DocHostUIHandler_ShowContextMenu(IDocHostUIHandler2 *iface, DWORD dwID, POINT *ppt,
1509 IUnknown *pcmdtReserved, IDispatch *pdicpReserved)
1511 ok(0, "unexpected call %d %p %p %p\n", dwID, ppt, pcmdtReserved, pdicpReserved);
1512 return S_FALSE;
1515 static HRESULT WINAPI DocHostUIHandler_GetHostInfo(IDocHostUIHandler2 *iface, DOCHOSTUIINFO *pInfo)
1517 CHECK_EXPECT2(GetHostInfo);
1518 ok(pInfo != NULL, "pInfo=NULL\n");
1519 if(pInfo) {
1520 ok(pInfo->cbSize == sizeof(DOCHOSTUIINFO) || broken(!pInfo->cbSize), "pInfo->cbSize=%u\n", pInfo->cbSize);
1521 ok(!pInfo->dwFlags, "pInfo->dwFlags=%08x, expected 0\n", pInfo->dwFlags);
1522 ok(!pInfo->dwDoubleClick, "pInfo->dwDoubleClick=%08x, expected 0\n", pInfo->dwDoubleClick);
1523 ok(!pInfo->pchHostCss, "pInfo->pchHostCss=%p, expected NULL\n", pInfo->pchHostCss);
1524 ok(!pInfo->pchHostNS, "pInfo->pchhostNS=%p, expected NULL\n", pInfo->pchHostNS);
1526 return E_FAIL;
1529 static HRESULT WINAPI DocHostUIHandler_ShowUI(IDocHostUIHandler2 *iface, DWORD dwID,
1530 IOleInPlaceActiveObject *pActiveObject, IOleCommandTarget *pCommandTarget,
1531 IOleInPlaceFrame *pFrame, IOleInPlaceUIWindow *pDoc)
1533 CHECK_EXPECT(ShowUI);
1534 return E_NOTIMPL;
1537 static HRESULT WINAPI DocHostUIHandler_HideUI(IDocHostUIHandler2 *iface)
1539 CHECK_EXPECT(HideUI);
1540 return E_NOTIMPL;
1543 static HRESULT WINAPI DocHostUIHandler_UpdateUI(IDocHostUIHandler2 *iface)
1545 CHECK_EXPECT2(UpdateUI);
1546 return E_NOTIMPL;
1549 static HRESULT WINAPI DocHostUIHandler_EnableModeless(IDocHostUIHandler2 *iface, BOOL fEnable)
1551 if(fEnable)
1552 CHECK_EXPECT(DocHost_EnableModeless_TRUE);
1553 else
1554 CHECK_EXPECT(DocHost_EnableModeless_FALSE);
1556 return S_OK;
1559 static HRESULT WINAPI DocHostUIHandler_OnDocWindowActivate(IDocHostUIHandler2 *iface, BOOL fActivate)
1561 ok(0, "unexpected call\n");
1562 return E_NOTIMPL;
1565 static HRESULT WINAPI DocHostUIHandler_OnFrameWindowActivate(IDocHostUIHandler2 *iface, BOOL fActivate)
1567 ok(0, "unexpected call\n");
1568 return E_NOTIMPL;
1571 static HRESULT WINAPI DocHostUIHandler_ResizeBorder(IDocHostUIHandler2 *iface, LPCRECT prcBorder,
1572 IOleInPlaceUIWindow *pUIWindow, BOOL fRameWindow)
1574 ok(0, "unexpected call\n");
1575 return E_NOTIMPL;
1578 static HRESULT WINAPI DocHostUIHandler_TranslateAccelerator(IDocHostUIHandler2 *iface, LPMSG lpMsg,
1579 const GUID *pguidCmdGroup, DWORD nCmdID)
1581 CHECK_EXPECT(DocHost_TranslateAccelerator);
1582 ok(pguidCmdGroup != NULL, "Got NULL pguidCmdGroup.\n");
1583 if(pguidCmdGroup)
1584 ok(IsEqualGUID(pguidCmdGroup, &CGID_MSHTML), "Unexpected pguidCmdGroup\n");
1585 ok(lpMsg != NULL, "Got NULL lpMsg.\n");
1586 return hr_dochost_TranslateAccelerator;
1589 static HRESULT WINAPI DocHostUIHandler_GetOptionKeyPath(IDocHostUIHandler2 *iface,
1590 LPOLESTR *pchKey, DWORD dw)
1592 CHECK_EXPECT(GetOptionKeyPath);
1593 ok(pchKey != NULL, "pchKey==NULL\n");
1594 if(pchKey)
1595 ok(*pchKey == NULL, "*pchKey=%p\n", *pchKey);
1596 ok(!dw, "dw=%x\n", dw);
1597 return E_NOTIMPL;
1600 static HRESULT WINAPI DocHostUIHandler_GetDropTarget(IDocHostUIHandler2 *iface,
1601 IDropTarget *pDropTarget, IDropTarget **ppDropTarget)
1603 CHECK_EXPECT(GetDropTarget);
1604 return E_NOTIMPL;
1607 static HRESULT WINAPI DocHostUIHandler_GetExternal(IDocHostUIHandler2 *iface, IDispatch **ppDispatch)
1609 CHECK_EXPECT(GetExternal);
1610 *ppDispatch = NULL;
1611 return S_FALSE;
1614 static HRESULT WINAPI DocHostUIHandler_TranslateUrl(IDocHostUIHandler2 *iface, DWORD dwTranslate,
1615 OLECHAR *pchURLIn, OLECHAR **ppchURLOut)
1617 if(is_downloading && !(dwl_flags & DWL_EXPECT_BEFORE_NAVIGATE))
1618 todo_wine CHECK_EXPECT(TranslateUrl);
1619 else
1620 CHECK_EXPECT(TranslateUrl);
1621 return E_NOTIMPL;
1624 static HRESULT WINAPI DocHostUIHandler_FilterDataObject(IDocHostUIHandler2 *iface, IDataObject *pDO,
1625 IDataObject **ppPORet)
1627 ok(0, "unexpected call\n");
1628 return E_NOTIMPL;
1631 static HRESULT WINAPI DocHostUIHandler_GetOverrideKeyPath(IDocHostUIHandler2 *iface,
1632 LPOLESTR *pchKey, DWORD dw)
1634 CHECK_EXPECT(GetOverridesKeyPath);
1635 ok(pchKey != NULL, "pchKey==NULL\n");
1636 if(pchKey)
1637 ok(*pchKey == NULL, "*pchKey=%p\n", *pchKey);
1638 ok(!dw, "dw=%x\n", dw);
1639 return E_NOTIMPL;
1642 static const IDocHostUIHandler2Vtbl DocHostUIHandlerVtbl = {
1643 DocHostUIHandler_QueryInterface,
1644 DocHostUIHandler_AddRef,
1645 DocHostUIHandler_Release,
1646 DocHostUIHandler_ShowContextMenu,
1647 DocHostUIHandler_GetHostInfo,
1648 DocHostUIHandler_ShowUI,
1649 DocHostUIHandler_HideUI,
1650 DocHostUIHandler_UpdateUI,
1651 DocHostUIHandler_EnableModeless,
1652 DocHostUIHandler_OnDocWindowActivate,
1653 DocHostUIHandler_OnFrameWindowActivate,
1654 DocHostUIHandler_ResizeBorder,
1655 DocHostUIHandler_TranslateAccelerator,
1656 DocHostUIHandler_GetOptionKeyPath,
1657 DocHostUIHandler_GetDropTarget,
1658 DocHostUIHandler_GetExternal,
1659 DocHostUIHandler_TranslateUrl,
1660 DocHostUIHandler_FilterDataObject,
1661 DocHostUIHandler_GetOverrideKeyPath
1664 static IDocHostUIHandler2 DocHostUIHandler = { &DocHostUIHandlerVtbl };
1667 static HRESULT WINAPI ServiceProvider_QueryInterface(IServiceProvider *iface, REFIID riid, void **ppv)
1669 return QueryInterface(riid, ppv);
1672 static ULONG WINAPI ServiceProvider_AddRef(IServiceProvider *iface)
1674 return 2;
1677 static ULONG WINAPI ServiceProvider_Release(IServiceProvider *iface)
1679 return 1;
1682 static HRESULT WINAPI ServiceProvider_QueryService(IServiceProvider *iface,
1683 REFGUID guidService, REFIID riid, void **ppv)
1685 *ppv = NULL;
1687 if(!winetest_interactive)
1688 return E_NOINTERFACE;
1690 if (IsEqualGUID(&SID_STopLevelBrowser, guidService))
1691 trace("Service SID_STopLevelBrowser\n");
1692 else if (IsEqualGUID(&SID_SEditCommandTarget, guidService))
1693 trace("Service SID_SEditCommandTarget\n");
1694 else if (IsEqualGUID(&IID_ITargetFrame2, guidService))
1695 trace("Service IID_ITargetFrame2\n");
1696 else if (IsEqualGUID(&SID_SInternetSecurityManager, guidService))
1697 trace("Service SID_SInternetSecurityManager\n");
1698 else if (IsEqualGUID(&SID_SOleUndoManager, guidService))
1699 trace("Service SID_SOleUndoManager\n");
1700 else if (IsEqualGUID(&SID_IMimeInfo, guidService))
1701 trace("Service SID_IMimeInfo\n");
1702 else if (IsEqualGUID(&SID_STopWindow, guidService))
1703 trace("Service SID_STopWindow\n");
1705 /* 30D02401-6A81-11D0-8274-00C04FD5AE38 Explorer Bar: Search */
1706 /* D1E7AFEC-6A2E-11D0-8C78-00C04FD918B4 no info */
1707 /* A9227C3C-7F8E-11D0-8CB0-00A0C92DBFE8 no info */
1708 /* 371EA634-DC5C-11D1-BA57-00C04FC2040E one reference to IVersionHost */
1709 /* 3050F429-98B5-11CF-BB82-00AA00BDCE0B IID_IElementBehaviorFactory */
1710 /* 6D12FE80-7911-11CF-9534-0000C05BAE0B SID_DefView */
1711 /* AD7F6C62-F6BD-11D2-959B-006097C553C8 no info */
1712 /* 53A2D5B1-D2FC-11D0-84E0-006097C9987D no info */
1713 /* 3050F312-98B5-11CF-BB82-00AA00BDCE0B HTMLFrameBaseClass */
1714 /* 639447BD-B2D3-44B9-9FB0-510F23CB45E4 no info */
1715 /* 20C46561-8491-11CF-960C-0080C7F4EE85 no info */
1717 else
1718 trace("Service %s not supported\n", wine_dbgstr_guid(guidService));
1720 return E_NOINTERFACE;
1724 static const IServiceProviderVtbl ServiceProviderVtbl = {
1725 ServiceProvider_QueryInterface,
1726 ServiceProvider_AddRef,
1727 ServiceProvider_Release,
1728 ServiceProvider_QueryService
1731 static IServiceProvider ServiceProvider = { &ServiceProviderVtbl };
1734 static HRESULT QueryInterface(REFIID riid, void **ppv)
1736 *ppv = NULL;
1738 if(IsEqualGUID(&IID_IUnknown, riid)
1739 || IsEqualGUID(&IID_IOleClientSite, riid))
1740 *ppv = &ClientSite;
1741 else if(IsEqualGUID(&IID_IOleWindow, riid)
1742 || IsEqualGUID(&IID_IOleInPlaceSite, riid)
1743 || IsEqualGUID(&IID_IOleInPlaceSiteEx, riid))
1744 *ppv = &InPlaceSite;
1745 else if(IsEqualGUID(&IID_IDocHostUIHandler, riid)
1746 || IsEqualGUID(&IID_IDocHostUIHandler2, riid))
1747 *ppv = use_container_dochostui ? &DocHostUIHandler : NULL;
1748 else if(IsEqualGUID(&IID_IDispatch, riid))
1749 *ppv = &Dispatch;
1750 else if(IsEqualGUID(&IID_IServiceProvider, riid))
1751 *ppv = &ServiceProvider;
1752 else if(IsEqualGUID(&IID_IDocHostShowUI, riid))
1753 trace("interface IID_IDocHostShowUI\n");
1754 else if(IsEqualGUID(&IID_IOleControlSite, riid))
1755 *ppv = &ControlSite;
1756 else if(IsEqualGUID(&IID_IOleCommandTarget, riid))
1757 trace("interface IID_IOleCommandTarget\n");
1759 /* B6EA2050-048A-11D1-82B9-00C04FB9942E IAxWinHostWindow */
1761 else
1763 /* are there more interfaces, that a host can support? */
1764 trace("%s: interface not supported\n", wine_dbgstr_guid(riid));
1767 return (*ppv) ? S_OK : E_NOINTERFACE;
1770 static LRESULT WINAPI wnd_proc(HWND hwnd, UINT msg, WPARAM wParam, LPARAM lParam)
1772 return DefWindowProcW(hwnd, msg, wParam, lParam);
1775 static HWND create_container_window(void)
1777 static const WCHAR wszWebBrowserContainer[] =
1778 {'W','e','b','B','r','o','w','s','e','r','C','o','n','t','a','i','n','e','r',0};
1779 static WNDCLASSEXW wndclass = {
1780 sizeof(WNDCLASSEXW),
1782 wnd_proc,
1783 0, 0, NULL, NULL, NULL, NULL, NULL,
1784 wszWebBrowserContainer,
1785 NULL
1788 RegisterClassExW(&wndclass);
1789 return CreateWindowW(wszWebBrowserContainer, wszWebBrowserContainer,
1790 WS_OVERLAPPEDWINDOW, 10, 10, 600, 600, NULL, NULL, NULL, NULL);
1793 static void test_DoVerb(IWebBrowser2 *unk)
1795 IOleObject *oleobj;
1796 RECT rect = {0,0,1000,1000};
1797 HRESULT hres;
1799 hres = IWebBrowser2_QueryInterface(unk, &IID_IOleObject, (void**)&oleobj);
1800 ok(hres == S_OK, "QueryInterface(IID_OleObject) failed: %08x\n", hres);
1801 if(FAILED(hres))
1802 return;
1804 SET_EXPECT(CanInPlaceActivate);
1805 SET_EXPECT(Site_GetWindow);
1806 SET_EXPECT(OnInPlaceActivate);
1807 SET_EXPECT(GetWindowContext);
1808 SET_EXPECT(ShowObject);
1809 SET_EXPECT(GetContainer);
1810 SET_EXPECT(Frame_GetWindow);
1811 SET_EXPECT(OnUIActivate);
1812 SET_EXPECT(Frame_SetActiveObject);
1813 SET_EXPECT(UIWindow_SetActiveObject);
1814 SET_EXPECT(SetMenu);
1815 SET_EXPECT(OnFocus);
1817 hres = IOleObject_DoVerb(oleobj, OLEIVERB_SHOW, NULL, &ClientSite,
1818 0, (HWND)0xdeadbeef, &rect);
1819 ok(hres == S_OK, "DoVerb failed: %08x\n", hres);
1821 CHECK_CALLED(CanInPlaceActivate);
1822 CHECK_CALLED(Site_GetWindow);
1823 CHECK_CALLED(OnInPlaceActivate);
1824 CHECK_CALLED(GetWindowContext);
1825 CHECK_CALLED(ShowObject);
1826 CHECK_CALLED(GetContainer);
1827 CHECK_CALLED(Frame_GetWindow);
1828 CHECK_CALLED(OnUIActivate);
1829 CHECK_CALLED(Frame_SetActiveObject);
1830 CHECK_CALLED(UIWindow_SetActiveObject);
1831 CHECK_CALLED(SetMenu);
1832 todo_wine CHECK_CALLED(OnFocus);
1834 hres = IOleObject_DoVerb(oleobj, OLEIVERB_SHOW, NULL, &ClientSite,
1835 0, (HWND)0xdeadbeef, &rect);
1836 ok(hres == S_OK, "DoVerb failed: %08x\n", hres);
1838 IOleObject_Release(oleobj);
1841 static void call_DoVerb(IWebBrowser2 *unk, LONG verb)
1843 IOleObject *oleobj;
1844 RECT rect = {60,60,600,600};
1845 HRESULT hres;
1847 hres = IWebBrowser2_QueryInterface(unk, &IID_IOleObject, (void**)&oleobj);
1848 ok(hres == S_OK, "QueryInterface(IID_OleObject) failed: %08x\n", hres);
1849 if(FAILED(hres))
1850 return;
1852 hres = IOleObject_DoVerb(oleobj, verb, NULL, &ClientSite,
1853 -1, container_hwnd, &rect);
1854 ok(hres == S_OK, "DoVerb failed: %08x\n", hres);
1856 IOleObject_Release(oleobj);
1859 static HWND get_hwnd(IWebBrowser2 *unk)
1861 IOleInPlaceObject *inplace;
1862 HWND hwnd;
1863 HRESULT hres;
1865 hres = IWebBrowser2_QueryInterface(unk, &IID_IOleInPlaceObject, (void**)&inplace);
1866 ok(hres == S_OK, "QueryInterface(IID_OleInPlaceObject) failed: %08x\n", hres);
1868 hres = IOleInPlaceObject_GetWindow(inplace, &hwnd);
1869 ok(hres == S_OK, "GetWindow failed: %08x\n", hres);
1871 IOleInPlaceObject_Release(inplace);
1872 return hwnd;
1875 static void test_GetMiscStatus(IOleObject *oleobj)
1877 DWORD st, i;
1878 HRESULT hres;
1880 for(i=0; i<10; i++) {
1881 st = 0xdeadbeef;
1882 hres = IOleObject_GetMiscStatus(oleobj, i, &st);
1883 ok(hres == S_OK, "GetMiscStatus failed: %08x\n", hres);
1884 ok(st == (OLEMISC_SETCLIENTSITEFIRST|OLEMISC_ACTIVATEWHENVISIBLE|OLEMISC_INSIDEOUT
1885 |OLEMISC_CANTLINKINSIDE|OLEMISC_RECOMPOSEONRESIZE),
1886 "st=%08x, expected OLEMISC_SETCLIENTSITEFIRST|OLEMISC_ACTIVATEWHENVISIBLE|"
1887 "OLEMISC_INSIDEOUT|OLEMISC_CANTLINKINSIDE|OLEMISC_RECOMPOSEONRESIZE)\n", st);
1891 static void test_SetHostNames(IOleObject *oleobj)
1893 HRESULT hres;
1895 static const WCHAR test_appW[] = {'t','e','s','t',' ','a','p','p',0};
1897 hres = IOleObject_SetHostNames(oleobj, test_appW, (void*)0xdeadbeef);
1898 ok(hres == S_OK, "SetHostNames failed: %08x\n", hres);
1901 static void test_ClientSite(IWebBrowser2 *unk, IOleClientSite *client, BOOL stop_download)
1903 IOleObject *oleobj;
1904 IOleInPlaceObject *inplace;
1905 HWND hwnd;
1906 HRESULT hres;
1908 hres = IWebBrowser2_QueryInterface(unk, &IID_IOleObject, (void**)&oleobj);
1909 ok(hres == S_OK, "QueryInterface(IID_OleObject) failed: %08x\n", hres);
1910 if(FAILED(hres))
1911 return;
1913 test_GetMiscStatus(oleobj);
1914 test_SetHostNames(oleobj);
1916 hres = IWebBrowser2_QueryInterface(unk, &IID_IOleInPlaceObject, (void**)&inplace);
1917 ok(hres == S_OK, "QueryInterface(IID_OleInPlaceObject) failed: %08x\n", hres);
1918 if(FAILED(hres)) {
1919 IOleObject_Release(oleobj);
1920 return;
1923 hres = IOleInPlaceObject_GetWindow(inplace, &hwnd);
1924 ok(hres == S_OK, "GetWindow failed: %08x\n", hres);
1925 ok((hwnd == NULL) ^ (client == NULL), "unexpected hwnd %p\n", hwnd);
1927 if(client) {
1928 SET_EXPECT(GetContainer);
1929 SET_EXPECT(Site_GetWindow);
1930 SET_EXPECT(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
1931 SET_EXPECT(Invoke_AMBIENT_SILENT);
1932 }else if(stop_download) {
1933 SET_EXPECT(Invoke_DOWNLOADCOMPLETE);
1934 if (use_container_olecmd) SET_EXPECT(Exec_SETDOWNLOADSTATE_0);
1936 expect_navigate_back_enable = 0;
1937 set_navigate_back_enable = 0xdead;
1938 SET_EXPECT(Invoke_COMMANDSTATECHANGE_NAVIGATEBACK);
1940 expect_navigate_forward_enable = 0;
1941 set_navigate_forward_enable = 0xdead;
1942 SET_EXPECT(Invoke_COMMANDSTATECHANGE_NAVIGATEFORWARD);
1944 expect_update_commands_enable = 0;
1945 set_update_commands_enable = 0xdead;
1946 SET_EXPECT(Invoke_COMMANDSTATECHANGE_UPDATECOMMANDS);
1947 }else {
1948 SET_EXPECT(Invoke_STATUSTEXTCHANGE);
1949 SET_EXPECT(Invoke_PROGRESSCHANGE);
1952 hres = IOleObject_SetClientSite(oleobj, client);
1953 ok(hres == S_OK, "SetClientSite failed: %08x\n", hres);
1955 if(client) {
1956 CHECK_CALLED(GetContainer);
1957 CHECK_CALLED(Site_GetWindow);
1958 CHECK_CALLED(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
1959 CHECK_CALLED(Invoke_AMBIENT_SILENT);
1960 }else if(stop_download) {
1961 todo_wine CHECK_CALLED(Invoke_DOWNLOADCOMPLETE);
1962 if (use_container_olecmd) todo_wine CHECK_CALLED(Exec_SETDOWNLOADSTATE_0);
1964 CHECK_CALLED(Invoke_COMMANDSTATECHANGE_NAVIGATEBACK);
1965 ok(expect_navigate_back_enable == set_navigate_back_enable,
1966 "got %d\n", set_navigate_back_enable);
1968 CHECK_CALLED(Invoke_COMMANDSTATECHANGE_NAVIGATEFORWARD);
1969 ok(expect_navigate_forward_enable == set_navigate_forward_enable,
1970 "got %d\n", set_navigate_forward_enable);
1972 todo_wine CHECK_CALLED(Invoke_COMMANDSTATECHANGE_UPDATECOMMANDS);
1973 todo_wine ok(expect_update_commands_enable == set_update_commands_enable,
1974 "got %d\n", set_update_commands_enable);
1975 }else {
1976 CLEAR_CALLED(Invoke_STATUSTEXTCHANGE); /* Called by IE9 */
1977 CLEAR_CALLED(Invoke_PROGRESSCHANGE);
1980 hres = IOleInPlaceObject_GetWindow(inplace, &hwnd);
1981 ok(hres == S_OK, "GetWindow failed: %08x\n", hres);
1982 ok((hwnd == NULL) == (client == NULL), "unexpected hwnd %p\n", hwnd);
1984 shell_embedding_hwnd = hwnd;
1986 test_SetHostNames(oleobj);
1988 IOleInPlaceObject_Release(inplace);
1989 IOleObject_Release(oleobj);
1992 static void test_ClassInfo(IWebBrowser2 *unk)
1994 IProvideClassInfo2 *class_info;
1995 TYPEATTR *type_attr;
1996 ITypeInfo *typeinfo;
1997 GUID guid;
1998 HRESULT hres;
2000 hres = IWebBrowser2_QueryInterface(unk, &IID_IProvideClassInfo2, (void**)&class_info);
2001 ok(hres == S_OK, "QueryInterface(IID_IProvideClassInfo) failed: %08x\n", hres);
2002 if(FAILED(hres))
2003 return;
2005 hres = IProvideClassInfo2_GetGUID(class_info, GUIDKIND_DEFAULT_SOURCE_DISP_IID, &guid);
2006 ok(hres == S_OK, "GetGUID failed: %08x\n", hres);
2007 ok(IsEqualGUID(wb_version > 1 ? &DIID_DWebBrowserEvents2 : &DIID_DWebBrowserEvents, &guid), "wrong guid\n");
2009 hres = IProvideClassInfo2_GetGUID(class_info, 0, &guid);
2010 ok(hres == E_FAIL, "GetGUID failed: %08x, expected E_FAIL\n", hres);
2011 ok(IsEqualGUID(&IID_NULL, &guid), "wrong guid\n");
2013 hres = IProvideClassInfo2_GetGUID(class_info, 2, &guid);
2014 ok(hres == E_FAIL, "GetGUID failed: %08x, expected E_FAIL\n", hres);
2015 ok(IsEqualGUID(&IID_NULL, &guid), "wrong guid\n");
2017 hres = IProvideClassInfo2_GetGUID(class_info, GUIDKIND_DEFAULT_SOURCE_DISP_IID, NULL);
2018 ok(hres == E_POINTER, "GetGUID failed: %08x, expected E_POINTER\n", hres);
2020 hres = IProvideClassInfo2_GetGUID(class_info, 0, NULL);
2021 ok(hres == E_POINTER, "GetGUID failed: %08x, expected E_POINTER\n", hres);
2023 typeinfo = NULL;
2024 hres = IProvideClassInfo2_GetClassInfo(class_info, &typeinfo);
2025 ok(hres == S_OK, "GetClassInfo failed: %08x\n", hres);
2026 ok(typeinfo != NULL, "typeinfo == NULL\n");
2028 hres = ITypeInfo_GetTypeAttr(typeinfo, &type_attr);
2029 ok(hres == S_OK, "GetTypeAtr failed: %08x\n", hres);
2031 ok(IsEqualGUID(&type_attr->guid, wb_version > 1 ? &CLSID_WebBrowser : &CLSID_WebBrowser_V1),
2032 "guid = %s\n", wine_dbgstr_guid(&type_attr->guid));
2034 ITypeInfo_ReleaseTypeAttr(typeinfo, type_attr);
2035 ITypeInfo_Release(typeinfo);
2037 IProvideClassInfo2_Release(class_info);
2040 #define expect_oleverb(a,b) _expect_oleverb(__LINE__,a,b)
2041 static void _expect_oleverb(unsigned line, const OLEVERB *verb, LONG exverb)
2043 ok_(__FILE__,line)(verb->lVerb == exverb, "verb->lVerb = %d, expected %d\n", verb->lVerb, exverb);
2044 ok_(__FILE__,line)(!verb->lpszVerbName, "verb->lpszVerbName = %s\n", wine_dbgstr_w(verb->lpszVerbName));
2045 ok_(__FILE__,line)(!verb->fuFlags, "verb->fuFlags = %x\n", verb->fuFlags);
2046 ok_(__FILE__,line)(!verb->grfAttribs, "verb->grfAttribs = %x\n", verb->grfAttribs);
2049 #define test_next_oleverb(a,b) _test_next_oleverb(__LINE__,a,b)
2050 static void _test_next_oleverb(unsigned line, IEnumOLEVERB *enum_verbs, LONG exverb)
2052 ULONG fetched = 0xdeadbeef;
2053 OLEVERB verb;
2054 HRESULT hres;
2056 fetched = 0xdeadbeef;
2057 memset(&verb, 0xa, sizeof(verb));
2058 hres = IEnumOLEVERB_Next(enum_verbs, 1, &verb, &fetched);
2059 ok_(__FILE__,line)(hres == S_OK, "Next failed: %08x\n", hres);
2060 ok_(__FILE__,line)(!fetched, "fetched = %d\n", fetched);
2061 _expect_oleverb(line, &verb, exverb);
2064 static void test_EnumVerbs(IWebBrowser2 *wb)
2066 IEnumOLEVERB *enum_verbs;
2067 IOleObject *oleobj;
2068 OLEVERB verbs[20];
2069 ULONG fetched;
2070 HRESULT hres;
2072 hres = IWebBrowser2_QueryInterface(wb, &IID_IOleObject, (void**)&oleobj);
2073 ok(hres == S_OK, "QueryInterface(IID_IOleObject) failed: %08x\n", hres);
2075 hres = IOleObject_EnumVerbs(oleobj, &enum_verbs);
2076 IOleObject_Release(oleobj);
2077 ok(hres == S_OK, "EnumVerbs failed: %08x\n", hres);
2078 ok(enum_verbs != NULL, "enum_verbs == NULL\n");
2080 fetched = 0xdeadbeef;
2081 memset(verbs, 0xa, sizeof(verbs));
2082 verbs[1].lVerb = 0xdeadbeef;
2083 hres = IEnumOLEVERB_Next(enum_verbs, sizeof(verbs)/sizeof(*verbs), verbs, &fetched);
2084 ok(hres == S_OK, "Next failed: %08x\n", hres);
2085 ok(!fetched, "fetched = %d\n", fetched);
2086 /* Although fetched==0, an element is returned. */
2087 expect_oleverb(verbs, OLEIVERB_PRIMARY);
2088 /* The first argument is ignorred and always one element is returned. */
2089 ok(verbs[1].lVerb == 0xdeadbeef, "verbs[1].lVerb = %x\n", verbs[1].lVerb);
2091 test_next_oleverb(enum_verbs, OLEIVERB_INPLACEACTIVATE);
2092 test_next_oleverb(enum_verbs, OLEIVERB_UIACTIVATE);
2093 test_next_oleverb(enum_verbs, OLEIVERB_SHOW);
2094 test_next_oleverb(enum_verbs, OLEIVERB_HIDE);
2096 /* There is anouther verb, returned correctly. */
2097 fetched = 0xdeadbeef;
2098 memset(verbs, 0xa, sizeof(verbs));
2099 verbs[0].lVerb = 0xdeadbeef;
2100 hres = IEnumOLEVERB_Next(enum_verbs, sizeof(verbs)/sizeof(*verbs), verbs, &fetched);
2101 todo_wine ok(hres == S_OK, "Next failed: %08x\n", hres);
2102 todo_wine ok(fetched == 1, "fetched = %d\n", fetched);
2103 todo_wine ok(verbs[0].lVerb != 0xdeadbeef, "verbs[0].lVerb = %x\n", verbs[0].lVerb);
2105 hres = IEnumOLEVERB_Next(enum_verbs, sizeof(verbs)/sizeof(*verbs), verbs, &fetched);
2106 ok(hres == S_FALSE, "Next failed: %08x\n", hres);
2107 ok(!fetched, "fetched = %d\n", fetched);
2109 hres = IEnumOLEVERB_Reset(enum_verbs);
2110 ok(hres == S_OK, "Reset failed: %08x\n", hres);
2112 fetched = 0xdeadbeef;
2113 hres = IEnumOLEVERB_Next(enum_verbs, 1, verbs, &fetched);
2114 ok(hres == S_OK, "Next failed: %08x\n", hres);
2115 ok(!fetched, "fetched = %d\n", fetched);
2117 hres = IEnumOLEVERB_Next(enum_verbs, 1, verbs, NULL);
2118 ok(hres == S_OK, "Next failed: %08x\n", hres);
2120 hres = IEnumOLEVERB_Skip(enum_verbs, 20);
2121 ok(hres == S_OK, "Reset failed: %08x\n", hres);
2123 fetched = 0xdeadbeef;
2124 hres = IEnumOLEVERB_Next(enum_verbs, 1, verbs, &fetched);
2125 ok(hres == S_OK, "Next failed: %08x\n", hres);
2126 ok(!fetched, "fetched = %d\n", fetched);
2128 test_next_oleverb(enum_verbs, OLEIVERB_SHOW);
2130 IEnumOLEVERB_Release(enum_verbs);
2133 static void test_ie_funcs(IWebBrowser2 *wb)
2135 IDispatch *disp;
2136 VARIANT_BOOL b;
2137 int i;
2138 SHANDLE_PTR hwnd;
2139 HRESULT hres;
2140 BSTR sName;
2142 /* HWND */
2144 hwnd = 0xdeadbeef;
2145 hres = IWebBrowser2_get_HWND(wb, &hwnd);
2146 ok(hres == E_FAIL, "get_HWND failed: %08x, expected E_FAIL\n", hres);
2147 ok(hwnd == 0, "unexpected hwnd %p\n", (PVOID)hwnd);
2149 /* MenuBar */
2151 hres = IWebBrowser2_get_MenuBar(wb, &b);
2152 ok(hres == S_OK, "get_MenuBar failed: %08x\n", hres);
2153 ok(b == VARIANT_TRUE, "b=%x\n", b);
2155 SET_EXPECT(Invoke_ONMENUBAR);
2156 hres = IWebBrowser2_put_MenuBar(wb, (exvb = VARIANT_FALSE));
2157 ok(hres == S_OK, "put_MenuBar failed: %08x\n", hres);
2158 CHECK_CALLED(Invoke_ONMENUBAR);
2160 hres = IWebBrowser2_get_MenuBar(wb, &b);
2161 ok(hres == S_OK, "get_MenuBar failed: %08x\n", hres);
2162 ok(b == VARIANT_FALSE, "b=%x\n", b);
2164 SET_EXPECT(Invoke_ONMENUBAR);
2165 hres = IWebBrowser2_put_MenuBar(wb, (exvb = 100));
2166 ok(hres == S_OK, "put_MenuBar failed: %08x\n", hres);
2167 CHECK_CALLED(Invoke_ONMENUBAR);
2169 hres = IWebBrowser2_get_MenuBar(wb, &b);
2170 ok(hres == S_OK, "get_MenuBar failed: %08x\n", hres);
2171 ok(b == VARIANT_TRUE, "b=%x\n", b);
2173 /* AddressBar */
2175 hres = IWebBrowser2_get_AddressBar(wb, &b);
2176 ok(hres == S_OK, "get_AddressBar failed: %08x\n", hres);
2177 ok(b == VARIANT_TRUE, "b=%x\n", b);
2179 SET_EXPECT(Invoke_ONADDRESSBAR);
2180 hres = IWebBrowser2_put_AddressBar(wb, (exvb = VARIANT_FALSE));
2181 ok(hres == S_OK, "put_AddressBar failed: %08x\n", hres);
2182 CHECK_CALLED(Invoke_ONADDRESSBAR);
2184 hres = IWebBrowser2_get_AddressBar(wb, &b);
2185 ok(hres == S_OK, "get_MenuBar failed: %08x\n", hres);
2186 ok(b == VARIANT_FALSE, "b=%x\n", b);
2188 SET_EXPECT(Invoke_ONADDRESSBAR);
2189 hres = IWebBrowser2_put_AddressBar(wb, (exvb = 100));
2190 ok(hres == S_OK, "put_AddressBar failed: %08x\n", hres);
2191 CHECK_CALLED(Invoke_ONADDRESSBAR);
2193 hres = IWebBrowser2_get_AddressBar(wb, &b);
2194 ok(hres == S_OK, "get_AddressBar failed: %08x\n", hres);
2195 ok(b == VARIANT_TRUE, "b=%x\n", b);
2197 SET_EXPECT(Invoke_ONADDRESSBAR);
2198 hres = IWebBrowser2_put_AddressBar(wb, (exvb = VARIANT_TRUE));
2199 ok(hres == S_OK, "put_MenuBar failed: %08x\n", hres);
2200 CHECK_CALLED(Invoke_ONADDRESSBAR);
2202 /* StatusBar */
2204 hres = IWebBrowser2_get_StatusBar(wb, &b);
2205 ok(hres == S_OK, "get_StatusBar failed: %08x\n", hres);
2206 ok(b == VARIANT_TRUE, "b=%x\n", b);
2208 SET_EXPECT(Invoke_ONSTATUSBAR);
2209 hres = IWebBrowser2_put_StatusBar(wb, (exvb = VARIANT_TRUE));
2210 ok(hres == S_OK, "put_StatusBar failed: %08x\n", hres);
2211 CHECK_CALLED(Invoke_ONSTATUSBAR);
2213 hres = IWebBrowser2_get_StatusBar(wb, &b);
2214 ok(hres == S_OK, "get_StatusBar failed: %08x\n", hres);
2215 ok(b == VARIANT_TRUE, "b=%x\n", b);
2217 SET_EXPECT(Invoke_ONSTATUSBAR);
2218 hres = IWebBrowser2_put_StatusBar(wb, (exvb = VARIANT_FALSE));
2219 ok(hres == S_OK, "put_StatusBar failed: %08x\n", hres);
2220 CHECK_CALLED(Invoke_ONSTATUSBAR);
2222 hres = IWebBrowser2_get_StatusBar(wb, &b);
2223 ok(hres == S_OK, "get_StatusBar failed: %08x\n", hres);
2224 ok(b == VARIANT_FALSE, "b=%x\n", b);
2226 SET_EXPECT(Invoke_ONSTATUSBAR);
2227 hres = IWebBrowser2_put_StatusBar(wb, (exvb = 100));
2228 ok(hres == S_OK, "put_StatusBar failed: %08x\n", hres);
2229 CHECK_CALLED(Invoke_ONSTATUSBAR);
2231 hres = IWebBrowser2_get_StatusBar(wb, &b);
2232 ok(hres == S_OK, "get_StatusBar failed: %08x\n", hres);
2233 ok(b == VARIANT_TRUE, "b=%x\n", b);
2235 /* ToolBar */
2237 hres = IWebBrowser2_get_ToolBar(wb, &i);
2238 ok(hres == S_OK, "get_ToolBar failed: %08x\n", hres);
2239 ok(i, "i=%x\n", i);
2241 SET_EXPECT(Invoke_ONTOOLBAR);
2242 hres = IWebBrowser2_put_ToolBar(wb, (exvb = VARIANT_FALSE));
2243 ok(hres == S_OK, "put_ToolBar failed: %08x\n", hres);
2244 CHECK_CALLED(Invoke_ONTOOLBAR);
2246 hres = IWebBrowser2_get_ToolBar(wb, &i);
2247 ok(hres == S_OK, "get_ToolBar failed: %08x\n", hres);
2248 ok(i == VARIANT_FALSE, "b=%x\n", i);
2250 SET_EXPECT(Invoke_ONTOOLBAR);
2251 hres = IWebBrowser2_put_ToolBar(wb, (exvb = 100));
2252 ok(hres == S_OK, "put_ToolBar failed: %08x\n", hres);
2253 CHECK_CALLED(Invoke_ONTOOLBAR);
2255 hres = IWebBrowser2_get_ToolBar(wb, &i);
2256 ok(hres == S_OK, "get_ToolBar failed: %08x\n", hres);
2257 ok(i, "i=%x\n", i);
2259 SET_EXPECT(Invoke_ONTOOLBAR);
2260 hres = IWebBrowser2_put_ToolBar(wb, (exvb = VARIANT_TRUE));
2261 ok(hres == S_OK, "put_ToolBar failed: %08x\n", hres);
2262 CHECK_CALLED(Invoke_ONTOOLBAR);
2264 /* FullScreen */
2266 hres = IWebBrowser2_get_FullScreen(wb, &b);
2267 ok(hres == S_OK, "get_FullScreen failed: %08x\n", hres);
2268 ok(b == VARIANT_FALSE, "b=%x\n", b);
2270 SET_EXPECT(Invoke_ONFULLSCREEN);
2271 hres = IWebBrowser2_put_FullScreen(wb, (exvb = VARIANT_TRUE));
2272 ok(hres == S_OK, "put_FullScreen failed: %08x\n", hres);
2273 CHECK_CALLED(Invoke_ONFULLSCREEN);
2275 hres = IWebBrowser2_get_FullScreen(wb, &b);
2276 ok(hres == S_OK, "get_FullScreen failed: %08x\n", hres);
2277 ok(b == VARIANT_TRUE, "b=%x\n", b);
2279 SET_EXPECT(Invoke_ONFULLSCREEN);
2280 hres = IWebBrowser2_put_FullScreen(wb, (exvb = 100));
2281 ok(hres == S_OK, "put_FullScreen failed: %08x\n", hres);
2282 CHECK_CALLED(Invoke_ONFULLSCREEN);
2284 hres = IWebBrowser2_get_FullScreen(wb, &b);
2285 ok(hres == S_OK, "get_FullScreen failed: %08x\n", hres);
2286 ok(b == VARIANT_TRUE, "b=%x\n", b);
2288 SET_EXPECT(Invoke_ONFULLSCREEN);
2289 hres = IWebBrowser2_put_FullScreen(wb, (exvb = VARIANT_FALSE));
2290 ok(hres == S_OK, "put_FullScreen failed: %08x\n", hres);
2291 CHECK_CALLED(Invoke_ONFULLSCREEN);
2293 /* TheaterMode */
2295 hres = IWebBrowser2_get_TheaterMode(wb, &b);
2296 ok(hres == S_OK, "get_TheaterMode failed: %08x\n", hres);
2297 ok(b == VARIANT_FALSE, "b=%x\n", b);
2299 SET_EXPECT(Invoke_ONTHEATERMODE);
2300 hres = IWebBrowser2_put_TheaterMode(wb, (exvb = VARIANT_TRUE));
2301 ok(hres == S_OK, "put_TheaterMode failed: %08x\n", hres);
2302 CHECK_CALLED(Invoke_ONTHEATERMODE);
2304 hres = IWebBrowser2_get_TheaterMode(wb, &b);
2305 ok(hres == S_OK, "get_TheaterMode failed: %08x\n", hres);
2306 ok(b == VARIANT_TRUE, "b=%x\n", b);
2308 SET_EXPECT(Invoke_ONTHEATERMODE);
2309 hres = IWebBrowser2_put_TheaterMode(wb, (exvb = 100));
2310 ok(hres == S_OK, "put_TheaterMode failed: %08x\n", hres);
2311 CHECK_CALLED(Invoke_ONTHEATERMODE);
2313 hres = IWebBrowser2_get_TheaterMode(wb, &b);
2314 ok(hres == S_OK, "get_TheaterMode failed: %08x\n", hres);
2315 ok(b == VARIANT_TRUE, "b=%x\n", b);
2317 SET_EXPECT(Invoke_ONTHEATERMODE);
2318 hres = IWebBrowser2_put_TheaterMode(wb, (exvb = VARIANT_FALSE));
2319 ok(hres == S_OK, "put_TheaterMode failed: %08x\n", hres);
2320 CHECK_CALLED(Invoke_ONTHEATERMODE);
2322 /* Resizable */
2324 b = 0x100;
2325 hres = IWebBrowser2_get_Resizable(wb, &b);
2326 ok(hres == E_NOTIMPL, "get_Resizable failed: %08x\n", hres);
2327 ok(b == 0x100, "b=%x\n", b);
2329 SET_EXPECT(Invoke_WINDOWSETRESIZABLE);
2330 hres = IWebBrowser2_put_Resizable(wb, (exvb = VARIANT_TRUE));
2331 ok(hres == S_OK, "put_Resizable failed: %08x\n", hres);
2332 CHECK_CALLED(Invoke_WINDOWSETRESIZABLE);
2334 SET_EXPECT(Invoke_WINDOWSETRESIZABLE);
2335 hres = IWebBrowser2_put_Resizable(wb, (exvb = VARIANT_FALSE));
2336 ok(hres == S_OK, "put_Resizable failed: %08x\n", hres);
2337 CHECK_CALLED(Invoke_WINDOWSETRESIZABLE);
2339 hres = IWebBrowser2_get_Resizable(wb, &b);
2340 ok(hres == E_NOTIMPL, "get_Resizable failed: %08x\n", hres);
2341 ok(b == 0x100, "b=%x\n", b);
2343 /* Application */
2345 disp = NULL;
2346 hres = IWebBrowser2_get_Application(wb, &disp);
2347 ok(hres == S_OK, "get_Application failed: %08x\n", hres);
2348 ok(disp == (void*)wb, "disp=%p, expected %p\n", disp, wb);
2349 if(disp)
2350 IDispatch_Release(disp);
2352 hres = IWebBrowser2_get_Application(wb, NULL);
2353 ok(hres == E_POINTER, "get_Application failed: %08x, expected E_POINTER\n", hres);
2355 /* Name */
2356 hres = IWebBrowser2_get_Name(wb, &sName);
2357 ok(hres == S_OK, "getName failed: %08x, expected S_OK\n", hres);
2358 if (is_lang_english())
2359 ok(!strcmp_wa(sName, "Microsoft Web Browser Control"), "got '%s', expected 'Microsoft Web Browser Control'\n", wine_dbgstr_w(sName));
2360 else /* Non-English cannot be blank. */
2361 ok(sName!=NULL, "get_Name return a NULL string.\n");
2362 SysFreeString(sName);
2364 /* RegisterAsDropTarget */
2365 hres = IWebBrowser2_get_RegisterAsDropTarget(wb, NULL);
2366 ok(hres == E_INVALIDARG, "get_RegisterAsDropTarget returned: %08x\n", hres);
2368 /* Quit */
2370 hres = IWebBrowser2_Quit(wb);
2371 ok(hres == E_FAIL, "Quit failed: %08x, expected E_FAIL\n", hres);
2374 static void test_Silent(IWebBrowser2 *wb, IOleControl *control, BOOL is_clientsite)
2376 VARIANT_BOOL b;
2377 HRESULT hres;
2379 b = 100;
2380 hres = IWebBrowser2_get_Silent(wb, &b);
2381 ok(hres == S_OK, "get_Silent failed: %08x\n", hres);
2382 ok(b == VARIANT_FALSE, "b=%x\n", b);
2384 hres = IWebBrowser2_put_Silent(wb, VARIANT_TRUE);
2385 ok(hres == S_OK, "set_Silent failed: %08x\n", hres);
2387 b = 100;
2388 hres = IWebBrowser2_get_Silent(wb, &b);
2389 ok(hres == S_OK, "get_Silent failed: %08x\n", hres);
2390 ok(b == VARIANT_TRUE, "b=%x\n", b);
2392 hres = IWebBrowser2_put_Silent(wb, 100);
2393 ok(hres == S_OK, "set_Silent failed: %08x\n", hres);
2395 b = 100;
2396 hres = IWebBrowser2_get_Silent(wb, &b);
2397 ok(hres == S_OK, "get_Silent failed: %08x\n", hres);
2398 ok(b == VARIANT_TRUE, "b=%x\n", b);
2400 hres = IWebBrowser2_put_Silent(wb, VARIANT_FALSE);
2401 ok(hres == S_OK, "set_Silent failed: %08x\n", hres);
2403 b = 100;
2404 hres = IWebBrowser2_get_Silent(wb, &b);
2405 ok(hres == S_OK, "get_Silent failed: %08x\n", hres);
2406 ok(b == VARIANT_FALSE, "b=%x\n", b);
2408 if(is_clientsite) {
2409 hres = IWebBrowser2_put_Silent(wb, VARIANT_TRUE);
2410 ok(hres == S_OK, "set_Silent failed: %08x\n", hres);
2412 SET_EXPECT(Invoke_AMBIENT_SILENT);
2415 hres = IOleControl_OnAmbientPropertyChange(control, DISPID_AMBIENT_SILENT);
2416 ok(hres == S_OK, "OnAmbientPropertyChange failed %08x\n", hres);
2418 if(is_clientsite)
2419 CHECK_CALLED(Invoke_AMBIENT_SILENT);
2421 b = 100;
2422 hres = IWebBrowser2_get_Silent(wb, &b);
2423 ok(hres == S_OK, "get_Silent failed: %08x\n", hres);
2424 ok(b == VARIANT_FALSE, "b=%x\n", b);
2427 static void test_Offline(IWebBrowser2 *wb, IOleControl *control, BOOL is_clientsite)
2429 VARIANT_BOOL b;
2430 HRESULT hres;
2432 b = 100;
2433 hres = IWebBrowser2_get_Offline(wb, &b);
2434 ok(hres == S_OK, "get_Offline failed: %08x\n", hres);
2435 ok(b == VARIANT_FALSE, "b=%x\n", b);
2437 hres = IWebBrowser2_put_Offline(wb, VARIANT_TRUE);
2438 ok(hres == S_OK, "set_Offline failed: %08x\n", hres);
2440 b = 100;
2441 hres = IWebBrowser2_get_Offline(wb, &b);
2442 ok(hres == S_OK, "get_Offline failed: %08x\n", hres);
2443 ok(b == VARIANT_TRUE, "b=%x\n", b);
2445 hres = IWebBrowser2_put_Offline(wb, 100);
2446 ok(hres == S_OK, "set_Offline failed: %08x\n", hres);
2448 b = 100;
2449 hres = IWebBrowser2_get_Offline(wb, &b);
2450 ok(hres == S_OK, "get_Offline failed: %08x\n", hres);
2451 ok(b == VARIANT_TRUE, "b=%x\n", b);
2453 hres = IWebBrowser2_put_Offline(wb, VARIANT_FALSE);
2454 ok(hres == S_OK, "set_Offline failed: %08x\n", hres);
2456 b = 100;
2457 hres = IWebBrowser2_get_Offline(wb, &b);
2458 ok(hres == S_OK, "get_Offline failed: %08x\n", hres);
2459 ok(b == VARIANT_FALSE, "b=%x\n", b);
2461 if(is_clientsite) {
2462 hres = IWebBrowser2_put_Offline(wb, VARIANT_TRUE);
2463 ok(hres == S_OK, "set_Offline failed: %08x\n", hres);
2465 SET_EXPECT(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
2468 hres = IOleControl_OnAmbientPropertyChange(control, DISPID_AMBIENT_OFFLINEIFNOTCONNECTED);
2469 ok(hres == S_OK, "OnAmbientPropertyChange failed %08x\n", hres);
2471 if(is_clientsite)
2472 CHECK_CALLED(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
2474 b = 100;
2475 hres = IWebBrowser2_get_Offline(wb, &b);
2476 ok(hres == S_OK, "get_Offline failed: %08x\n", hres);
2477 ok(b == VARIANT_FALSE, "b=%x\n", b);
2480 static void test_ambient_unknown(IWebBrowser2 *wb, IOleControl *control, BOOL is_clientsite)
2482 HRESULT hres;
2484 SET_EXPECT(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
2485 SET_EXPECT(Invoke_AMBIENT_SILENT);
2486 SET_EXPECT(Invoke_AMBIENT_USERMODE);
2487 SET_EXPECT(Invoke_AMBIENT_DLCONTROL);
2488 SET_EXPECT(Invoke_AMBIENT_USERAGENT);
2489 SET_EXPECT(Invoke_AMBIENT_PALETTE);
2491 hres = IOleControl_OnAmbientPropertyChange(control, DISPID_UNKNOWN);
2492 ok(hres == S_OK, "OnAmbientPropertyChange failed %08x\n", hres);
2494 CHECK_EXPECT(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
2495 CHECK_EXPECT(Invoke_AMBIENT_SILENT);
2496 CHECK_EXPECT(Invoke_AMBIENT_USERMODE);
2497 CHECK_EXPECT(Invoke_AMBIENT_DLCONTROL);
2498 CHECK_EXPECT(Invoke_AMBIENT_USERAGENT);
2499 CHECK_EXPECT(Invoke_AMBIENT_PALETTE);
2501 CLEAR_CALLED(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
2502 CLEAR_CALLED(Invoke_AMBIENT_SILENT);
2503 CLEAR_CALLED(Invoke_AMBIENT_USERMODE);
2504 CLEAR_CALLED(Invoke_AMBIENT_DLCONTROL);
2505 CLEAR_CALLED(Invoke_AMBIENT_USERAGENT);
2506 CLEAR_CALLED(Invoke_AMBIENT_PALETTE);
2509 static void test_wb_funcs(IWebBrowser2 *wb, BOOL is_clientsite)
2511 IOleControl *control;
2512 HRESULT hres;
2514 hres = IWebBrowser2_QueryInterface(wb, &IID_IOleControl, (void**)&control);
2515 ok(hres == S_OK, "Could not get IOleControl interface: %08x\n", hres);
2517 test_Silent(wb, control, is_clientsite);
2518 test_Offline(wb, control, is_clientsite);
2519 test_ambient_unknown(wb, control, is_clientsite);
2521 IOleControl_Release(control);
2524 static void test_GetControlInfo(IWebBrowser2 *unk)
2526 IOleControl *control;
2527 CONTROLINFO info;
2528 HRESULT hres;
2530 hres = IWebBrowser2_QueryInterface(unk, &IID_IOleControl, (void**)&control);
2531 ok(hres == S_OK, "Could not get IOleControl: %08x\n", hres);
2532 if(FAILED(hres))
2533 return;
2535 hres = IOleControl_GetControlInfo(control, &info);
2536 ok(hres == E_NOTIMPL, "GetControlInfo failed: %08x, expected E_NOTIMPL\n", hres);
2537 hres = IOleControl_GetControlInfo(control, NULL);
2538 ok(hres == E_NOTIMPL, "GetControlInfo failed: %08x, expected E_NOTIMPL\n", hres);
2540 IOleControl_Release(control);
2543 static void test_Extent(IWebBrowser2 *unk)
2545 IOleObject *oleobj;
2546 SIZE size, expected;
2547 HRESULT hres;
2548 DWORD dpi_x;
2549 DWORD dpi_y;
2550 HDC hdc;
2552 /* default aspect ratio is 96dpi / 96dpi */
2553 hdc = GetDC(0);
2554 dpi_x = GetDeviceCaps(hdc, LOGPIXELSX);
2555 dpi_y = GetDeviceCaps(hdc, LOGPIXELSY);
2556 ReleaseDC(0, hdc);
2557 if (dpi_x != 96 || dpi_y != 96)
2558 trace("dpi: %d / %d\n", dpi_y, dpi_y);
2560 hres = IWebBrowser2_QueryInterface(unk, &IID_IOleObject, (void**)&oleobj);
2561 ok(hres == S_OK, "Could not get IOleObkect: %08x\n", hres);
2562 if(FAILED(hres))
2563 return;
2565 size.cx = size.cy = 0xdeadbeef;
2566 hres = IOleObject_GetExtent(oleobj, DVASPECT_CONTENT, &size);
2567 ok(hres == S_OK, "GetExtent failed: %08x\n", hres);
2568 /* Default size is 50x20 pixels, in himetric units */
2569 expected.cx = MulDiv( 50, 2540, dpi_x );
2570 expected.cy = MulDiv( 20, 2540, dpi_y );
2571 ok(size.cx == expected.cx && size.cy == expected.cy, "size = {%d %d} (expected %d %d)\n",
2572 size.cx, size.cy, expected.cx, expected.cy );
2574 size.cx = 800;
2575 size.cy = 700;
2576 hres = IOleObject_SetExtent(oleobj, DVASPECT_CONTENT, &size);
2577 ok(hres == S_OK, "SetExtent failed: %08x\n", hres);
2579 size.cx = size.cy = 0xdeadbeef;
2580 hres = IOleObject_GetExtent(oleobj, DVASPECT_CONTENT, &size);
2581 ok(hres == S_OK, "GetExtent failed: %08x\n", hres);
2582 ok(size.cx == 800 && size.cy == 700, "size = {%d %d}\n", size.cx, size.cy);
2584 size.cx = size.cy = 0xdeadbeef;
2585 hres = IOleObject_GetExtent(oleobj, 0, &size);
2586 ok(hres == S_OK, "GetExtent failed: %08x\n", hres);
2587 ok(size.cx == 800 && size.cy == 700, "size = {%d %d}\n", size.cx, size.cy);
2589 size.cx = 900;
2590 size.cy = 800;
2591 hres = IOleObject_SetExtent(oleobj, 0, &size);
2592 ok(hres == S_OK, "SetExtent failed: %08x\n", hres);
2594 size.cx = size.cy = 0xdeadbeef;
2595 hres = IOleObject_GetExtent(oleobj, 0, &size);
2596 ok(hres == S_OK, "GetExtent failed: %08x\n", hres);
2597 ok(size.cx == 900 && size.cy == 800, "size = {%d %d}\n", size.cx, size.cy);
2599 size.cx = size.cy = 0xdeadbeef;
2600 hres = IOleObject_GetExtent(oleobj, 0xdeadbeef, &size);
2601 ok(hres == S_OK, "GetExtent failed: %08x\n", hres);
2602 ok(size.cx == 900 && size.cy == 800, "size = {%d %d}\n", size.cx, size.cy);
2604 size.cx = 1000;
2605 size.cy = 900;
2606 hres = IOleObject_SetExtent(oleobj, 0xdeadbeef, &size);
2607 ok(hres == S_OK, "SetExtent failed: %08x\n", hres);
2609 size.cx = size.cy = 0xdeadbeef;
2610 hres = IOleObject_GetExtent(oleobj, 0xdeadbeef, &size);
2611 ok(hres == S_OK, "GetExtent failed: %08x\n", hres);
2612 ok(size.cx == 1000 && size.cy == 900, "size = {%d %d}\n", size.cx, size.cy);
2614 size.cx = size.cy = 0xdeadbeef;
2615 hres = IOleObject_GetExtent(oleobj, DVASPECT_CONTENT, &size);
2616 ok(hres == S_OK, "GetExtent failed: %08x\n", hres);
2617 ok(size.cx == 1000 && size.cy == 900, "size = {%d %d}\n", size.cx, size.cy);
2619 IOleObject_Release(oleobj);
2622 static void test_ConnectionPoint(IWebBrowser2 *unk, BOOL init)
2624 IConnectionPointContainer *container;
2625 IConnectionPoint *point;
2626 HRESULT hres;
2628 static DWORD dw = 100;
2630 hres = IWebBrowser2_QueryInterface(unk, &IID_IConnectionPointContainer, (void**)&container);
2631 ok(hres == S_OK, "QueryInterface(IID_IConnectionPointContainer) failed: %08x\n", hres);
2632 if(FAILED(hres))
2633 return;
2635 hres = IConnectionPointContainer_FindConnectionPoint(container, &DIID_DWebBrowserEvents2, &point);
2636 IConnectionPointContainer_Release(container);
2637 ok(hres == S_OK, "FindConnectionPoint failed: %08x\n", hres);
2638 if(FAILED(hres))
2639 return;
2641 if(init) {
2642 hres = IConnectionPoint_Advise(point, (IUnknown*)&WebBrowserEvents2, &dw);
2643 ok(hres == S_OK, "Advise failed: %08x\n", hres);
2644 ok(dw == 1, "dw=%d, expected 1\n", dw);
2645 }else {
2646 hres = IConnectionPoint_Unadvise(point, dw);
2647 ok(hres == S_OK, "Unadvise failed: %08x\n", hres);
2650 IConnectionPoint_Release(point);
2653 static void test_Navigate2(IWebBrowser2 *webbrowser, const char *nav_url)
2655 VARIANT url;
2656 BOOL is_file;
2657 HRESULT hres;
2659 test_LocationURL(webbrowser, is_first_load ? "" : current_url);
2660 test_ready_state(is_first_load ? READYSTATE_UNINITIALIZED : READYSTATE_COMPLETE);
2662 is_http = !memcmp(nav_url, "http:", 5);
2663 V_VT(&url) = VT_BSTR;
2664 V_BSTR(&url) = a2bstr(current_url = nav_url);
2666 if((is_file = !strncasecmp(nav_url, "file://", 7)))
2667 current_url = nav_url + 7;
2669 if(is_first_load) {
2670 SET_EXPECT(Invoke_AMBIENT_USERMODE);
2671 SET_EXPECT(Invoke_PROPERTYCHANGE);
2672 SET_EXPECT(Invoke_BEFORENAVIGATE2);
2673 SET_EXPECT(Invoke_DOWNLOADBEGIN);
2674 if (use_container_olecmd) SET_EXPECT(Exec_SETDOWNLOADSTATE_1);
2675 SET_EXPECT(EnableModeless_FALSE);
2676 SET_EXPECT(Invoke_STATUSTEXTCHANGE);
2677 SET_EXPECT(SetStatusText);
2678 if(use_container_dochostui)
2679 SET_EXPECT(GetHostInfo);
2680 SET_EXPECT(Invoke_AMBIENT_DLCONTROL);
2681 SET_EXPECT(Invoke_AMBIENT_USERAGENT);
2682 SET_EXPECT(Invoke_AMBIENT_PALETTE);
2683 if(use_container_dochostui) {
2684 SET_EXPECT(GetOptionKeyPath);
2685 SET_EXPECT(GetOverridesKeyPath);
2687 if (use_container_olecmd) SET_EXPECT(QueryStatus_SETPROGRESSTEXT);
2688 if (use_container_olecmd) SET_EXPECT(Exec_SETPROGRESSMAX);
2689 if (use_container_olecmd) SET_EXPECT(Exec_SETPROGRESSPOS);
2690 SET_EXPECT(Invoke_SETSECURELOCKICON);
2691 SET_EXPECT(Invoke_FILEDOWNLOAD);
2692 if (use_container_olecmd) SET_EXPECT(Exec_SETDOWNLOADSTATE_0);
2694 expect_navigate_back_enable = 0;
2695 set_navigate_back_enable = 0xdead;
2696 SET_EXPECT(Invoke_COMMANDSTATECHANGE_NAVIGATEBACK);
2698 expect_navigate_forward_enable = 0;
2699 set_navigate_forward_enable = 0xdead;
2700 SET_EXPECT(Invoke_COMMANDSTATECHANGE_NAVIGATEFORWARD);
2702 SET_EXPECT(EnableModeless_TRUE);
2703 if (!use_container_olecmd) SET_EXPECT(Invoke_DOWNLOADCOMPLETE);
2704 if (is_file) SET_EXPECT(Invoke_PROGRESSCHANGE);
2707 hres = IWebBrowser2_Navigate2(webbrowser, &url, NULL, NULL, NULL, NULL);
2708 ok(hres == S_OK, "Navigate2 failed: %08x\n", hres);
2710 if(is_first_load) {
2711 CHECK_CALLED(Invoke_AMBIENT_USERMODE);
2712 todo_wine CHECK_CALLED(Invoke_PROPERTYCHANGE);
2713 CHECK_CALLED(Invoke_BEFORENAVIGATE2);
2714 todo_wine CHECK_CALLED(Invoke_DOWNLOADBEGIN);
2715 if (use_container_olecmd) todo_wine CHECK_CALLED(Exec_SETDOWNLOADSTATE_1);
2716 CHECK_CALLED(EnableModeless_FALSE);
2717 CHECK_CALLED(Invoke_STATUSTEXTCHANGE);
2718 CHECK_CALLED(SetStatusText);
2719 if(use_container_dochostui)
2720 CHECK_CALLED(GetHostInfo);
2721 CHECK_CALLED(Invoke_AMBIENT_DLCONTROL);
2722 CHECK_CALLED(Invoke_AMBIENT_USERAGENT);
2723 CLEAR_CALLED(Invoke_AMBIENT_PALETTE); /* Not called by IE9 */
2724 if(use_container_dochostui) {
2725 CLEAR_CALLED(GetOptionKeyPath);
2726 CHECK_CALLED(GetOverridesKeyPath);
2728 if (use_container_olecmd) todo_wine CHECK_CALLED(QueryStatus_SETPROGRESSTEXT);
2729 if (use_container_olecmd) todo_wine CHECK_CALLED(Exec_SETPROGRESSMAX);
2730 if (use_container_olecmd) todo_wine CHECK_CALLED(Exec_SETPROGRESSPOS);
2731 todo_wine CHECK_CALLED(Invoke_SETSECURELOCKICON);
2732 todo_wine CHECK_CALLED(Invoke_FILEDOWNLOAD);
2734 CHECK_CALLED(Invoke_COMMANDSTATECHANGE_NAVIGATEBACK);
2735 ok(expect_navigate_back_enable == set_navigate_back_enable,
2736 "got %d\n", set_navigate_back_enable);
2738 CHECK_CALLED(Invoke_COMMANDSTATECHANGE_NAVIGATEFORWARD);
2739 ok(expect_navigate_forward_enable == set_navigate_forward_enable,
2740 "got %d\n", set_navigate_forward_enable);
2742 if (use_container_olecmd) todo_wine CHECK_CALLED(Exec_SETDOWNLOADSTATE_0);
2743 CHECK_CALLED(EnableModeless_TRUE);
2744 if (is_file) todo_wine CHECK_CALLED(Invoke_PROGRESSCHANGE);
2747 VariantClear(&url);
2749 test_ready_state(READYSTATE_LOADING);
2752 static void test_QueryStatusWB(IWebBrowser2 *webbrowser, BOOL use_custom_target, BOOL has_document)
2754 HRESULT hres, success_state;
2755 OLECMDF success_flags;
2756 enum OLECMDF status;
2759 * We can tell the difference between the custom container target and the built-in target
2760 * since the custom target returns OLECMDF_SUPPORTED instead of OLECMDF_ENABLED.
2762 if (use_custom_target)
2763 success_flags = OLECMDF_SUPPORTED;
2764 else
2765 success_flags = OLECMDF_ENABLED;
2767 /* When no target is available (no document or custom target) an error is returned */
2768 if (has_document)
2769 success_state = S_OK;
2770 else
2771 success_state = E_UNEXPECTED;
2774 * Test a safe operation that exists as both a high-numbered MSHTML id and an OLECMDID.
2775 * These tests show that QueryStatusWB uses a NULL pguidCmdGroup, since OLECMDID_STOP
2776 * is enabled and IDM_STOP is not.
2778 status = 0xdeadbeef;
2779 if (use_custom_target) SET_EXPECT(QueryStatus_STOP);
2780 hres = IWebBrowser2_QueryStatusWB(webbrowser, OLECMDID_STOP, &status);
2781 ok(hres == success_state, "QueryStatusWB failed: %08x %08x\n", hres, success_state);
2782 if (!use_custom_target && has_document)
2783 todo_wine ok((has_document && status == success_flags) || (!has_document && status == 0xdeadbeef),
2784 "OLECMDID_STOP not enabled/supported: %08x %08x\n", status, success_flags);
2785 else
2786 ok((has_document && status == success_flags) || (!has_document && status == 0xdeadbeef),
2787 "OLECMDID_STOP not enabled/supported: %08x %08x\n", status, success_flags);
2788 status = 0xdeadbeef;
2789 if (use_custom_target) SET_EXPECT(QueryStatus_IDM_STOP);
2790 hres = IWebBrowser2_QueryStatusWB(webbrowser, IDM_STOP, &status);
2791 ok(hres == success_state, "QueryStatusWB failed: %08x %08x\n", hres, success_state);
2792 ok((has_document && status == 0) || (!has_document && status == 0xdeadbeef),
2793 "IDM_STOP is enabled/supported: %08x %d\n", status, has_document);
2796 static void test_ExecWB(IWebBrowser2 *webbrowser, BOOL use_custom_target, BOOL has_document)
2798 HRESULT hres, olecmdid_state, idm_state;
2800 /* When no target is available (no document or custom target) an error is returned */
2801 if (has_document)
2803 olecmdid_state = S_OK;
2804 idm_state = OLECMDERR_E_NOTSUPPORTED;
2806 else
2808 olecmdid_state = E_UNEXPECTED;
2809 idm_state = E_UNEXPECTED;
2813 * Test a safe operation that exists as both a high-numbered MSHTML id and an OLECMDID.
2814 * These tests show that QueryStatusWB uses a NULL pguidCmdGroup, since OLECMDID_STOP
2815 * succeeds (S_OK) and IDM_STOP does not (OLECMDERR_E_NOTSUPPORTED).
2817 if(use_custom_target) {
2818 SET_EXPECT(Exec_STOP);
2819 }else if(has_document) {
2820 SET_EXPECT(Invoke_STATUSTEXTCHANGE);
2821 SET_EXPECT(SetStatusText);
2823 hres = IWebBrowser2_ExecWB(webbrowser, OLECMDID_STOP, OLECMDEXECOPT_DONTPROMPTUSER, 0, 0);
2824 if(!use_custom_target && has_document) {
2825 todo_wine ok(hres == olecmdid_state, "ExecWB failed: %08x %08x\n", hres, olecmdid_state);
2826 CLEAR_CALLED(Invoke_STATUSTEXTCHANGE); /* Called by IE9 */
2827 CLEAR_CALLED(SetStatusText); /* Called by IE9 */
2828 }else {
2829 ok(hres == olecmdid_state, "ExecWB failed: %08x %08x\n", hres, olecmdid_state);
2831 if (use_custom_target)
2832 SET_EXPECT(Exec_IDM_STOP);
2833 hres = IWebBrowser2_ExecWB(webbrowser, IDM_STOP, OLECMDEXECOPT_DONTPROMPTUSER, 0, 0);
2834 ok(hres == idm_state, "ExecWB failed: %08x %08x\n", hres, idm_state);
2837 static void test_download(DWORD flags)
2839 BOOL *b = (flags & DWL_REFRESH) ? &called_Exec_SETDOWNLOADSTATE_0 : &called_Invoke_DOCUMENTCOMPLETE;
2840 MSG msg;
2842 is_downloading = TRUE;
2843 dwl_flags = flags;
2845 test_ready_state((flags & (DWL_FROM_PUT_HREF|DWL_FROM_GOBACK|DWL_FROM_GOFORWARD|DWL_REFRESH))
2846 ? READYSTATE_COMPLETE : READYSTATE_LOADING);
2848 if(flags & (DWL_EXPECT_BEFORE_NAVIGATE|(is_http ? DWL_FROM_PUT_HREF : 0)|DWL_FROM_GOFORWARD))
2849 SET_EXPECT(Invoke_PROPERTYCHANGE);
2851 if(flags & DWL_EXPECT_BEFORE_NAVIGATE) {
2852 SET_EXPECT(Invoke_BEFORENAVIGATE2);
2853 SET_EXPECT(TranslateUrl);
2855 SET_EXPECT(Exec_SETPROGRESSMAX);
2856 SET_EXPECT(Exec_SETPROGRESSPOS);
2857 SET_EXPECT(Exec_SETDOWNLOADSTATE_1);
2858 SET_EXPECT(DocHost_EnableModeless_FALSE);
2859 SET_EXPECT(DocHost_EnableModeless_TRUE);
2860 SET_EXPECT(Invoke_SETSECURELOCKICON);
2861 SET_EXPECT(Invoke_282);
2862 SET_EXPECT(EnableModeless_FALSE);
2864 expect_navigate_back_enable = 0;
2865 set_navigate_back_enable = 0xdead;
2866 SET_EXPECT(Invoke_COMMANDSTATECHANGE_NAVIGATEBACK);
2868 expect_navigate_forward_enable = 0;
2869 set_navigate_forward_enable = 0xdead;
2870 SET_EXPECT(Invoke_COMMANDSTATECHANGE_NAVIGATEFORWARD);
2872 expect_update_commands_enable = 0;
2873 set_update_commands_enable = 0xdead;
2874 SET_EXPECT(Invoke_COMMANDSTATECHANGE_UPDATECOMMANDS);
2876 SET_EXPECT(Invoke_STATUSTEXTCHANGE);
2877 SET_EXPECT(SetStatusText);
2878 SET_EXPECT(EnableModeless_TRUE);
2879 if(!is_first_load)
2880 SET_EXPECT(GetHostInfo);
2881 SET_EXPECT(Exec_SETDOWNLOADSTATE_0);
2882 SET_EXPECT(Invoke_TITLECHANGE);
2883 if(!(flags & DWL_REFRESH))
2884 SET_EXPECT(Invoke_NAVIGATECOMPLETE2);
2885 if(is_first_load)
2886 SET_EXPECT(GetDropTarget);
2887 SET_EXPECT(Invoke_PROGRESSCHANGE);
2888 if(!(flags & DWL_REFRESH))
2889 SET_EXPECT(Invoke_DOCUMENTCOMPLETE);
2891 if(flags & DWL_HTTP)
2892 SET_EXPECT(Exec_SETTITLE);
2893 SET_EXPECT(UpdateUI);
2894 SET_EXPECT(Exec_UPDATECOMMANDS);
2895 SET_EXPECT(QueryStatus_STOP);
2897 while(!*b && GetMessageW(&msg, NULL, 0, 0)) {
2898 TranslateMessage(&msg);
2899 DispatchMessageW(&msg);
2902 if(flags & (DWL_EXPECT_BEFORE_NAVIGATE|(is_http ? DWL_FROM_PUT_HREF : 0)))
2903 todo_wine CHECK_CALLED(Invoke_PROPERTYCHANGE);
2904 else if(flags & DWL_FROM_GOFORWARD)
2905 CLEAR_CALLED(Invoke_PROPERTYCHANGE); /* called by IE11 */
2907 if(flags & DWL_EXPECT_BEFORE_NAVIGATE) {
2908 CHECK_CALLED(Invoke_BEFORENAVIGATE2);
2909 CHECK_CALLED(TranslateUrl);
2911 todo_wine CHECK_CALLED(Exec_SETPROGRESSMAX);
2912 todo_wine CHECK_CALLED(Exec_SETPROGRESSPOS);
2913 CHECK_CALLED(Exec_SETDOWNLOADSTATE_1);
2914 CLEAR_CALLED(DocHost_EnableModeless_FALSE); /* IE 7 */
2915 CLEAR_CALLED(DocHost_EnableModeless_TRUE); /* IE 7 */
2916 todo_wine CHECK_CALLED(Invoke_SETSECURELOCKICON);
2917 CLEAR_CALLED(Invoke_282); /* IE 7 */
2918 if(is_first_load)
2919 todo_wine CHECK_CALLED(EnableModeless_FALSE);
2920 else
2921 CLEAR_CALLED(EnableModeless_FALSE); /* IE 8 */
2922 CLEAR_CALLED(Invoke_COMMANDSTATECHANGE_UPDATECOMMANDS);
2923 todo_wine CHECK_CALLED(Invoke_STATUSTEXTCHANGE);
2924 todo_wine CHECK_CALLED(SetStatusText);
2925 if(is_first_load)
2926 todo_wine CHECK_CALLED(EnableModeless_TRUE);
2927 else
2928 CLEAR_CALLED(EnableModeless_FALSE); /* IE 8 */
2929 if(!is_first_load)
2930 todo_wine CHECK_CALLED(GetHostInfo);
2931 CHECK_CALLED(Exec_SETDOWNLOADSTATE_0);
2932 todo_wine CHECK_CALLED(Invoke_TITLECHANGE);
2933 if(!(flags & DWL_REFRESH))
2934 CHECK_CALLED(Invoke_NAVIGATECOMPLETE2);
2935 if(is_first_load)
2936 todo_wine CHECK_CALLED(GetDropTarget);
2937 if(!(flags & DWL_REFRESH))
2938 CHECK_CALLED(Invoke_DOCUMENTCOMPLETE);
2940 is_downloading = FALSE;
2942 test_ready_state(READYSTATE_COMPLETE);
2944 while(!called_Exec_UPDATECOMMANDS && GetMessageA(&msg, NULL, 0, 0)) {
2945 TranslateMessage(&msg);
2946 DispatchMessageA(&msg);
2949 todo_wine CHECK_CALLED(Invoke_PROGRESSCHANGE);
2950 if(flags & DWL_HTTP)
2951 CLEAR_CALLED(Exec_SETTITLE); /* FIXME: make it more strict */
2952 CHECK_CALLED(UpdateUI);
2953 CHECK_CALLED(Exec_UPDATECOMMANDS);
2954 CLEAR_CALLED(QueryStatus_STOP);
2957 static void test_Refresh(IWebBrowser2 *webbrowser, BOOL use_refresh2)
2959 HRESULT hres;
2961 trace("Refresh...\n");
2963 SET_EXPECT(Exec_DocHostCommandHandler_2300);
2965 if(use_refresh2) {
2966 VARIANT v;
2968 V_VT(&v) = VT_I4;
2969 V_I4(&v) = REFRESH_NORMAL;
2971 hres = IWebBrowser2_Refresh2(webbrowser, &v);
2972 ok(hres == S_OK, "Refresh failed: %08x\n", hres);
2973 }else {
2974 hres = IWebBrowser2_Refresh(webbrowser);
2975 ok(hres == S_OK, "Refresh failed: %08x\n", hres);
2978 CHECK_CALLED(Exec_DocHostCommandHandler_2300);
2980 test_download(DWL_REFRESH);
2983 static void test_olecmd(IWebBrowser2 *unk, BOOL loaded)
2985 IOleCommandTarget *cmdtrg;
2986 OLECMD cmds[3];
2987 HRESULT hres;
2989 hres = IWebBrowser2_QueryInterface(unk, &IID_IOleCommandTarget, (void**)&cmdtrg);
2990 ok(hres == S_OK, "Could not get IOleCommandTarget iface: %08x\n", hres);
2991 if(FAILED(hres))
2992 return;
2994 cmds[0].cmdID = OLECMDID_SPELL;
2995 cmds[0].cmdf = 0xdeadbeef;
2996 cmds[1].cmdID = OLECMDID_REFRESH;
2997 cmds[1].cmdf = 0xdeadbeef;
2998 hres = IOleCommandTarget_QueryStatus(cmdtrg, NULL, 2, cmds, NULL);
2999 if(loaded) {
3000 ok(hres == S_OK, "QueryStatus failed: %08x\n", hres);
3001 ok(cmds[0].cmdf == OLECMDF_SUPPORTED, "OLECMDID_SPELL cmdf = %x\n", cmds[0].cmdf);
3002 ok(cmds[1].cmdf == (OLECMDF_ENABLED|OLECMDF_SUPPORTED),
3003 "OLECMDID_REFRESH cmdf = %x\n", cmds[1].cmdf);
3004 }else {
3005 ok(hres == 0x80040104, "QueryStatus failed: %08x\n", hres);
3006 ok(cmds[0].cmdf == 0xdeadbeef, "OLECMDID_SPELL cmdf = %x\n", cmds[0].cmdf);
3007 ok(cmds[1].cmdf == 0xdeadbeef, "OLECMDID_REFRESH cmdf = %x\n", cmds[0].cmdf);
3010 IOleCommandTarget_Release(cmdtrg);
3013 static void test_IServiceProvider(IWebBrowser2 *unk)
3015 IServiceProvider *servprov = (void*)0xdeadbeef;
3016 IUnknown *iface;
3017 HRESULT hres;
3019 hres = IWebBrowser2_QueryInterface(unk, &IID_IServiceProvider, (void**)&servprov);
3020 ok(hres == S_OK, "QueryInterface returned %08x, expected S_OK\n", hres);
3021 if(FAILED(hres))
3022 return;
3024 hres = IServiceProvider_QueryService(servprov, &SID_STopLevelBrowser, &IID_IBrowserService2, (LPVOID*)&iface);
3025 ok(hres == E_FAIL, "QueryService returned %08x, expected E_FAIL\n", hres);
3026 ok(!iface, "QueryService returned %p, expected NULL\n", iface);
3027 if(hres == S_OK)
3028 IUnknown_Release(iface);
3030 hres = IServiceProvider_QueryService(servprov, &SID_SHTMLWindow, &IID_IHTMLWindow2, (LPVOID*)&iface);
3031 ok(hres == S_OK, "QueryService returned %08x, expected S_OK\n", hres);
3032 ok(iface != NULL, "QueryService returned NULL\n");
3033 if(hres == S_OK)
3034 IUnknown_Release(iface);
3036 IServiceProvider_Release(servprov);
3039 static void test_put_href(IWebBrowser2 *unk, const char *url)
3041 IHTMLLocation *location;
3042 IHTMLDocument2 *doc;
3043 BSTR str;
3044 HRESULT hres;
3046 trace("put_href(%s)...\n", url);
3048 doc = get_document(unk);
3050 location = NULL;
3051 hres = IHTMLDocument2_get_location(doc, &location);
3052 IHTMLDocument2_Release(doc);
3053 ok(hres == S_OK, "get_location failed: %08x\n", hres);
3054 ok(location != NULL, "location == NULL\n");
3056 is_http = !memcmp(url, "http:", 5);
3058 SET_EXPECT(TranslateUrl);
3059 SET_EXPECT(Invoke_BEFORENAVIGATE2);
3060 if(!is_http)
3061 SET_EXPECT(Invoke_PROPERTYCHANGE);
3063 dwl_flags = DWL_FROM_PUT_HREF;
3065 str = a2bstr(current_url = url);
3066 is_first_load = FALSE;
3067 hres = IHTMLLocation_put_href(location, str);
3069 CHECK_CALLED(TranslateUrl);
3070 CHECK_CALLED(Invoke_BEFORENAVIGATE2);
3071 if(!is_http)
3072 todo_wine CHECK_CALLED(Invoke_PROPERTYCHANGE);
3074 IHTMLLocation_Release(location);
3075 SysFreeString(str);
3076 ok(hres == S_OK, "put_href failed: %08x\n", hres);
3078 test_ready_state(READYSTATE_COMPLETE);
3081 static void test_go_back(IWebBrowser2 *wb, const char *back_url, int back_enable, int forward_enable, int forward_todo)
3083 HRESULT hres;
3085 current_url = back_url;
3087 SET_EXPECT(Invoke_BEFORENAVIGATE2);
3089 expect_navigate_back_enable = back_enable;
3090 set_navigate_back_enable = 0xdead;
3091 SET_EXPECT(Invoke_COMMANDSTATECHANGE_NAVIGATEBACK);
3093 expect_navigate_forward_enable = forward_enable;
3094 set_navigate_forward_enable = 0xdead;
3095 SET_EXPECT(Invoke_COMMANDSTATECHANGE_NAVIGATEFORWARD);
3097 SET_EXPECT(Invoke_PROPERTYCHANGE);
3098 hres = IWebBrowser2_GoBack(wb);
3099 ok(hres == S_OK, "GoBack failed: %08x\n", hres);
3100 CHECK_CALLED(Invoke_BEFORENAVIGATE2);
3102 CHECK_CALLED(Invoke_COMMANDSTATECHANGE_NAVIGATEBACK);
3103 ok(expect_navigate_back_enable == set_navigate_back_enable, "got %d\n", set_navigate_back_enable);
3105 CHECK_CALLED(Invoke_COMMANDSTATECHANGE_NAVIGATEFORWARD);
3106 if (forward_todo)
3107 todo_wine ok(expect_navigate_forward_enable == set_navigate_forward_enable, "got %d\n", set_navigate_forward_enable);
3108 else
3109 ok(expect_navigate_forward_enable == set_navigate_forward_enable, "got %d\n", set_navigate_forward_enable);
3111 CLEAR_CALLED(Invoke_PROPERTYCHANGE); /* called by IE11 */
3114 static void test_go_forward(IWebBrowser2 *wb, const char *forward_url, int back_enable, int forward_enable)
3116 HRESULT hres;
3118 current_url = forward_url;
3119 dwl_flags |= DWL_FROM_GOFORWARD;
3121 SET_EXPECT(Invoke_BEFORENAVIGATE2);
3123 expect_navigate_back_enable = back_enable;
3124 set_navigate_back_enable = 0xdead;
3125 SET_EXPECT(Invoke_COMMANDSTATECHANGE_NAVIGATEBACK);
3127 expect_navigate_forward_enable = forward_enable;
3128 set_navigate_forward_enable = 0xdead;
3129 SET_EXPECT(Invoke_COMMANDSTATECHANGE_NAVIGATEFORWARD);
3131 hres = IWebBrowser2_GoForward(wb);
3132 ok(hres == S_OK, "GoForward failed: %08x\n", hres);
3133 CHECK_CALLED(Invoke_BEFORENAVIGATE2);
3135 CHECK_CALLED(Invoke_COMMANDSTATECHANGE_NAVIGATEBACK);
3136 ok(expect_navigate_back_enable == set_navigate_back_enable,
3137 "got %d\n", set_navigate_back_enable);
3139 CHECK_CALLED(Invoke_COMMANDSTATECHANGE_NAVIGATEFORWARD);
3140 ok(expect_navigate_forward_enable == set_navigate_forward_enable,
3141 "got %d\n", set_navigate_forward_enable);
3144 static void test_QueryInterface(IWebBrowser2 *wb)
3146 IQuickActivate *qa = (IQuickActivate*)0xdeadbeef;
3147 IRunnableObject *runnable = (IRunnableObject*)0xdeadbeef;
3148 IPerPropertyBrowsing *propbrowse = (void*)0xdeadbeef;
3149 IOleInPlaceSite *inplace = (void*)0xdeadbeef;
3150 IOleCache *cache = (void*)0xdeadbeef;
3151 IObjectWithSite *site = (void*)0xdeadbeef;
3152 IViewObjectEx *viewex = (void*)0xdeadbeef;
3153 IOleLink *link = (void*)0xdeadbeef;
3154 IMarshal *marshal = (void*)0xdeadbeef;
3155 IUnknown *unk = (IUnknown*)wb;
3156 HRESULT hres;
3158 hres = IUnknown_QueryInterface(unk, &IID_IQuickActivate, (void**)&qa);
3159 ok(hres == E_NOINTERFACE, "QueryInterface returned %08x, expected E_NOINTERFACE\n", hres);
3160 ok(qa == NULL, "qa=%p, expected NULL\n", qa);
3162 hres = IUnknown_QueryInterface(unk, &IID_IRunnableObject, (void**)&runnable);
3163 ok(hres == E_NOINTERFACE, "QueryInterface returned %08x, expected E_NOINTERFACE\n", hres);
3164 ok(runnable == NULL, "runnable=%p, expected NULL\n", runnable);
3166 hres = IUnknown_QueryInterface(unk, &IID_IPerPropertyBrowsing, (void**)&propbrowse);
3167 ok(hres == E_NOINTERFACE, "QueryInterface returned %08x, expected E_NOINTERFACE\n", hres);
3168 ok(propbrowse == NULL, "propbrowse=%p, expected NULL\n", propbrowse);
3170 hres = IUnknown_QueryInterface(unk, &IID_IOleCache, (void**)&cache);
3171 ok(hres == E_NOINTERFACE, "QueryInterface returned %08x, expected E_NOINTERFACE\n", hres);
3172 ok(cache == NULL, "cache=%p, expected NULL\n", cache);
3174 hres = IUnknown_QueryInterface(unk, &IID_IOleInPlaceSite, (void**)&inplace);
3175 ok(hres == E_NOINTERFACE, "QueryInterface returned %08x, expected E_NOINTERFACE\n", hres);
3176 ok(inplace == NULL, "inplace=%p, expected NULL\n", inplace);
3178 hres = IUnknown_QueryInterface(unk, &IID_IObjectWithSite, (void**)&site);
3179 ok(hres == E_NOINTERFACE, "QueryInterface returned %08x, expected E_NOINTERFACE\n", hres);
3180 ok(site == NULL, "site=%p, expected NULL\n", site);
3182 hres = IUnknown_QueryInterface(unk, &IID_IViewObjectEx, (void**)&viewex);
3183 ok(hres == E_NOINTERFACE, "QueryInterface returned %08x, expected E_NOINTERFACE\n", hres);
3184 ok(viewex == NULL, "viewex=%p, expected NULL\n", viewex);
3186 hres = IUnknown_QueryInterface(unk, &IID_IOleLink, (void**)&link);
3187 ok(hres == E_NOINTERFACE, "QueryInterface returned %08x, expected E_NOINTERFACE\n", hres);
3188 ok(link == NULL, "link=%p, expected NULL\n", link);
3190 hres = IUnknown_QueryInterface(unk, &IID_IMarshal, (void**)&marshal);
3191 ok(hres == E_NOINTERFACE, "QueryInterface returned %08x, expected E_NOINTERFACE\n", hres);
3192 ok(marshal == NULL, "marshal=%p, expected NULL\n", marshal);
3196 static void test_UIActivate(IWebBrowser2 *unk, BOOL activate)
3198 IOleDocumentView *docview;
3199 IHTMLDocument2 *doc;
3200 HRESULT hres;
3202 doc = get_document(unk);
3204 hres = IHTMLDocument2_QueryInterface(doc, &IID_IOleDocumentView, (void**)&docview);
3205 ok(hres == S_OK, "Got 0x%08x\n", hres);
3206 if(SUCCEEDED(hres)) {
3207 if(activate) {
3208 SET_EXPECT(RequestUIActivate);
3209 SET_EXPECT(ShowUI);
3210 SET_EXPECT(HideUI);
3211 SET_EXPECT(OnFocus);
3214 hres = IOleDocumentView_UIActivate(docview, activate);
3215 if(activate)
3216 todo_wine ok(hres == S_OK, "Got 0x%08x\n", hres);
3217 else
3218 ok(hres == S_OK, "Got 0x%08x\n", hres);
3220 if(activate) {
3221 todo_wine {
3222 CHECK_CALLED(RequestUIActivate);
3223 CHECK_CALLED(ShowUI);
3224 CHECK_CALLED(HideUI);
3225 CHECK_CALLED(OnFocus);
3229 IOleDocumentView_Release(docview);
3232 IHTMLDocument2_Release(doc);
3235 static void test_external(IWebBrowser2 *unk)
3237 IDocHostUIHandler2 *dochost;
3238 IOleClientSite *client;
3239 IDispatch *disp;
3240 HRESULT hres;
3242 client = get_dochost(unk);
3244 hres = IOleClientSite_QueryInterface(client, &IID_IDocHostUIHandler2, (void**)&dochost);
3245 ok(hres == S_OK, "Could not get IDocHostUIHandler2 iface: %08x\n", hres);
3246 IOleClientSite_Release(client);
3248 if(use_container_dochostui)
3249 SET_EXPECT(GetExternal);
3250 disp = (void*)0xdeadbeef;
3251 hres = IDocHostUIHandler2_GetExternal(dochost, &disp);
3252 if(use_container_dochostui) {
3253 CHECK_CALLED(GetExternal);
3254 ok(hres == S_FALSE, "GetExternal failed: %08x\n", hres);
3255 ok(!disp, "disp = %p\n", disp);
3256 }else {
3257 IShellUIHelper *uihelper;
3259 ok(hres == S_OK, "GetExternal failed: %08x\n", hres);
3260 ok(disp != NULL, "disp == NULL\n");
3262 hres = IDispatch_QueryInterface(disp, &IID_IShellUIHelper, (void**)&uihelper);
3263 ok(hres == S_OK, "Could not get IShellUIHelper iface: %08x\n", hres);
3264 IShellUIHelper_Release(uihelper);
3267 IDocHostUIHandler2_Release(dochost);
3270 static void test_htmlwindow_close(IWebBrowser2 *wb)
3272 IHTMLWindow2 *window;
3273 IHTMLDocument2 *doc;
3274 HRESULT hres;
3276 doc = get_document(wb);
3278 hres = IHTMLDocument2_get_parentWindow(doc, &window);
3279 ok(hres == S_OK, "get_parentWindow failed: %08x\n", hres);
3280 IHTMLDocument2_Release(doc);
3282 SET_EXPECT(Invoke_WINDOWCLOSING);
3284 hres = IHTMLWindow2_close(window);
3285 ok(hres == S_OK, "close failed: %08x\n", hres);
3287 CHECK_CALLED(Invoke_WINDOWCLOSING);
3289 IHTMLWindow2_Release(window);
3292 static void test_TranslateAccelerator(IWebBrowser2 *unk)
3294 IOleClientSite *doc_clientsite;
3295 IOleInPlaceActiveObject *pao;
3296 HRESULT hres;
3297 DWORD keycode;
3298 MSG msg_a = {
3299 container_hwnd,
3300 0, 0, 0,
3301 GetTickCount(),
3302 {5, 5}
3305 test_Navigate2(unk, "about:blank");
3307 hres = IWebBrowser2_QueryInterface(unk, &IID_IOleInPlaceActiveObject, (void**)&pao);
3308 ok(hres == S_OK, "Got 0x%08x\n", hres);
3309 if(SUCCEEDED(hres)) {
3310 /* One accelerator that should be handled by mshtml */
3311 msg_a.message = WM_KEYDOWN;
3312 msg_a.wParam = VK_F1;
3313 hres = IOleInPlaceActiveObject_TranslateAccelerator(pao, &msg_a);
3314 ok(hres == S_FALSE, "Got 0x%08x (%04x::%02lx)\n", hres, msg_a.message, msg_a.wParam);
3316 /* And one that should not */
3317 msg_a.message = WM_KEYDOWN;
3318 msg_a.wParam = VK_F5;
3319 hres = IOleInPlaceActiveObject_TranslateAccelerator(pao, &msg_a);
3320 ok(hres == S_FALSE, "Got 0x%08x (%04x::%02lx)\n", hres, msg_a.message, msg_a.wParam);
3322 IOleInPlaceActiveObject_Release(pao);
3325 test_UIActivate(unk, TRUE);
3327 /* Test again after UIActivate */
3328 hres = IWebBrowser2_QueryInterface(unk, &IID_IOleInPlaceActiveObject, (void**)&pao);
3329 ok(hres == S_OK, "Got 0x%08x\n", hres);
3330 if(SUCCEEDED(hres)) {
3331 /* One accelerator that should be handled by mshtml */
3332 msg_a.message = WM_KEYDOWN;
3333 msg_a.wParam = VK_F1;
3334 SET_EXPECT(DocHost_TranslateAccelerator);
3335 SET_EXPECT(ControlSite_TranslateAccelerator);
3336 hres = IOleInPlaceActiveObject_TranslateAccelerator(pao, &msg_a);
3337 ok(hres == S_FALSE, "Got 0x%08x (%04x::%02lx)\n", hres, msg_a.message, msg_a.wParam);
3338 todo_wine CHECK_CALLED(DocHost_TranslateAccelerator);
3339 todo_wine CHECK_CALLED(ControlSite_TranslateAccelerator);
3341 /* And one that should not */
3342 msg_a.message = WM_KEYDOWN;
3343 msg_a.wParam = VK_F5;
3344 SET_EXPECT(DocHost_TranslateAccelerator);
3345 hres = IOleInPlaceActiveObject_TranslateAccelerator(pao, &msg_a);
3346 todo_wine ok(hres == S_OK, "Got 0x%08x (%04x::%02lx)\n", hres, msg_a.message, msg_a.wParam);
3347 todo_wine CHECK_CALLED(DocHost_TranslateAccelerator);
3349 IOleInPlaceActiveObject_Release(pao);
3352 doc_clientsite = get_dochost(unk);
3353 if(doc_clientsite) {
3354 IDocHostUIHandler2 *dochost;
3355 IOleControlSite *doc_controlsite;
3356 IUnknown *unk_test;
3358 hres = IOleClientSite_QueryInterface(doc_clientsite, &IID_IOleInPlaceFrame, (void**)&unk_test);
3359 ok(hres == E_NOINTERFACE, "Got 0x%08x\n", hres);
3360 if(SUCCEEDED(hres)) IUnknown_Release(unk_test);
3362 hres = IOleClientSite_QueryInterface(doc_clientsite, &IID_IDocHostShowUI, (void**)&unk_test);
3363 todo_wine ok(hres == S_OK, "Got 0x%08x\n", hres);
3364 if(SUCCEEDED(hres)) IUnknown_Release(unk_test);
3366 hres = IOleClientSite_QueryInterface(doc_clientsite, &IID_IDocHostUIHandler, (void**)&unk_test);
3367 ok(hres == S_OK, "Got 0x%08x\n", hres);
3368 if(SUCCEEDED(hres)) IUnknown_Release(unk_test);
3370 hres = IOleClientSite_QueryInterface(doc_clientsite, &IID_IDocHostUIHandler2, (void**)&dochost);
3371 ok(hres == S_OK, "Got 0x%08x\n", hres);
3372 if(SUCCEEDED(hres)) {
3373 msg_a.message = WM_KEYDOWN;
3374 hr_dochost_TranslateAccelerator = 0xdeadbeef;
3375 for(keycode = 0; keycode <= 0x100; keycode++) {
3376 msg_a.wParam = keycode;
3377 SET_EXPECT(DocHost_TranslateAccelerator);
3378 hres = IDocHostUIHandler2_TranslateAccelerator(dochost, &msg_a, &CGID_MSHTML, 1234);
3379 ok(hres == 0xdeadbeef, "Got 0x%08x\n", hres);
3380 CHECK_CALLED(DocHost_TranslateAccelerator);
3382 hr_dochost_TranslateAccelerator = E_NOTIMPL;
3384 SET_EXPECT(DocHost_TranslateAccelerator);
3385 hres = IDocHostUIHandler2_TranslateAccelerator(dochost, &msg_a, &CGID_MSHTML, 1234);
3386 ok(hres == E_NOTIMPL, "Got 0x%08x\n", hres);
3387 CHECK_CALLED(DocHost_TranslateAccelerator);
3389 IDocHostUIHandler2_Release(dochost);
3392 hres = IOleClientSite_QueryInterface(doc_clientsite, &IID_IOleControlSite, (void**)&doc_controlsite);
3393 ok(hres == S_OK, "Got 0x%08x\n", hres);
3394 if(SUCCEEDED(hres)) {
3395 msg_a.message = WM_KEYDOWN;
3396 hr_site_TranslateAccelerator = 0xdeadbeef;
3397 for(keycode = 0; keycode < 0x100; keycode++) {
3398 msg_a.wParam = keycode;
3399 SET_EXPECT(ControlSite_TranslateAccelerator);
3400 hres = IOleControlSite_TranslateAccelerator(doc_controlsite, &msg_a, 0);
3401 if(keycode == 0x9 || keycode == 0x75)
3402 todo_wine ok(hres == S_OK, "Got 0x%08x (keycode: %04x)\n", hres, keycode);
3403 else
3404 ok(hres == S_FALSE, "Got 0x%08x (keycode: %04x)\n", hres, keycode);
3406 CHECK_CALLED(ControlSite_TranslateAccelerator);
3408 msg_a.wParam = VK_LEFT;
3409 SET_EXPECT(ControlSite_TranslateAccelerator);
3410 hres = IOleControlSite_TranslateAccelerator(doc_controlsite, &msg_a, 0);
3411 ok(hres == S_FALSE, "Got 0x%08x (keycode: %04x)\n", hres, keycode);
3412 CHECK_CALLED(ControlSite_TranslateAccelerator);
3414 hr_site_TranslateAccelerator = S_OK;
3415 SET_EXPECT(ControlSite_TranslateAccelerator);
3416 hres = IOleControlSite_TranslateAccelerator(doc_controlsite, &msg_a, 0);
3417 ok(hres == S_OK, "Got 0x%08x (keycode: %04x)\n", hres, keycode);
3418 CHECK_CALLED(ControlSite_TranslateAccelerator);
3420 hr_site_TranslateAccelerator = E_NOTIMPL;
3421 SET_EXPECT(ControlSite_TranslateAccelerator);
3422 hres = IOleControlSite_TranslateAccelerator(doc_controlsite, &msg_a, 0);
3423 ok(hres == S_FALSE, "Got 0x%08x (keycode: %04x)\n", hres, keycode);
3424 CHECK_CALLED(ControlSite_TranslateAccelerator);
3426 IOleControlSite_Release(doc_controlsite);
3429 IOleClientSite_Release(doc_clientsite);
3432 test_UIActivate(unk, FALSE);
3435 static void test_dochost_qs(IWebBrowser2 *webbrowser)
3437 IOleClientSite *client_site;
3438 IServiceProvider *serv_prov;
3439 IUnknown *service;
3440 HRESULT hres;
3442 client_site = get_dochost(webbrowser);
3443 hres = IOleClientSite_QueryInterface(client_site, &IID_IServiceProvider, (void**)&serv_prov);
3444 IOleClientSite_Release(client_site);
3445 ok(hres == S_OK, "Could not get IServiceProvider iface: %08x\n", hres);
3447 hres = IServiceProvider_QueryService(serv_prov, &IID_IHlinkFrame, &IID_IHlinkFrame, (void**)&service);
3448 ok(hres == S_OK, "QueryService failed: %08x\n", hres);
3449 ok(iface_cmp(service, (IUnknown*)webbrowser), "service != unk\n");
3450 IUnknown_Release(service);
3452 hres = IServiceProvider_QueryService(serv_prov, &IID_IWebBrowserApp, &IID_IHlinkFrame, (void**)&service);
3453 ok(hres == S_OK, "QueryService failed: %08x\n", hres);
3454 ok(iface_cmp(service, (IUnknown*)webbrowser), "service != unk\n");
3455 IUnknown_Release(service);
3457 hres = IServiceProvider_QueryService(serv_prov, &IID_IShellBrowser, &IID_IShellBrowser, (void**)&service);
3458 ok(hres == S_OK, "QueryService failed: %08x\n", hres);
3459 IUnknown_Release(service);
3461 hres = IServiceProvider_QueryService(serv_prov, &IID_IShellBrowser, &IID_IBrowserService, (void**)&service);
3462 ok(hres == S_OK, "QueryService failed: %08x\n", hres);
3463 IUnknown_Release(service);
3465 hres = IServiceProvider_QueryService(serv_prov, &IID_IShellBrowser, &IID_IDocObjectService, (void**)&service);
3466 ok(hres == S_OK, "QueryService failed: %08x\n", hres);
3467 IUnknown_Release(service);
3469 IServiceProvider_Release(serv_prov);
3472 static void test_Close(IWebBrowser2 *wb, BOOL do_download)
3474 IOleObject *oo;
3475 IOleClientSite *ocs;
3476 HRESULT hres;
3478 hres = IWebBrowser2_QueryInterface(wb, &IID_IOleObject, (void**)&oo);
3479 ok(hres == S_OK, "QueryInterface failed: %08x\n", hres);
3480 if(hres != S_OK)
3481 return;
3483 test_close = TRUE;
3485 SET_EXPECT(Frame_SetActiveObject);
3486 SET_EXPECT(UIWindow_SetActiveObject);
3487 SET_EXPECT(OnUIDeactivate);
3488 SET_EXPECT(OnFocus);
3489 SET_EXPECT(OnInPlaceDeactivate);
3490 SET_EXPECT(Invoke_STATUSTEXTCHANGE);
3491 if(!do_download) {
3492 expect_navigate_back_enable = 0;
3493 set_navigate_back_enable = 0xdead;
3494 SET_EXPECT(Invoke_COMMANDSTATECHANGE_NAVIGATEBACK);
3496 expect_navigate_forward_enable = 0;
3497 set_navigate_forward_enable = 0xdead;
3498 SET_EXPECT(Invoke_COMMANDSTATECHANGE_NAVIGATEFORWARD);
3500 expect_update_commands_enable = 0;
3501 set_update_commands_enable = 0xdead;
3502 SET_EXPECT(Invoke_COMMANDSTATECHANGE_UPDATECOMMANDS);
3504 SET_EXPECT(Invoke_DOWNLOADCOMPLETE);
3506 hres = IOleObject_Close(oo, OLECLOSE_NOSAVE);
3507 ok(hres == S_OK, "OleObject_Close failed: %x\n", hres);
3508 CHECK_CALLED(Frame_SetActiveObject);
3509 CHECK_CALLED(UIWindow_SetActiveObject);
3510 CHECK_CALLED(OnUIDeactivate);
3511 todo_wine CHECK_CALLED(OnFocus);
3512 CHECK_CALLED(OnInPlaceDeactivate);
3513 CLEAR_CALLED(Invoke_STATUSTEXTCHANGE); /* Called by IE9 */
3514 if(!do_download) {
3515 CHECK_CALLED(Invoke_COMMANDSTATECHANGE_NAVIGATEBACK);
3516 ok(expect_navigate_back_enable == set_navigate_back_enable,
3517 "got %d\n", set_navigate_back_enable);
3519 CHECK_CALLED(Invoke_COMMANDSTATECHANGE_NAVIGATEFORWARD);
3520 ok(expect_navigate_forward_enable == set_navigate_forward_enable,
3521 "got %d\n", set_navigate_forward_enable);
3523 todo_wine CHECK_CALLED(Invoke_COMMANDSTATECHANGE_UPDATECOMMANDS);
3524 todo_wine ok(expect_update_commands_enable == set_update_commands_enable,
3525 "got %d\n", set_update_commands_enable);
3527 todo_wine CHECK_CALLED(Invoke_DOWNLOADCOMPLETE);
3530 hres = IOleObject_GetClientSite(oo, &ocs);
3531 ok(hres == S_OK, "hres = %x\n", hres);
3532 ok(!ocs, "ocs != NULL\n");
3534 hres = IOleObject_Close(oo, OLECLOSE_NOSAVE);
3535 ok(hres == S_OK, "OleObject_Close failed: %x\n", hres);
3537 test_close = FALSE;
3538 IOleObject_Release(oo);
3541 #define TEST_DOWNLOAD 0x0001
3542 #define TEST_NOOLECMD 0x0002
3543 #define TEST_NODOCHOST 0x0004
3545 static void init_test(IWebBrowser2 *webbrowser, DWORD flags)
3547 wb = webbrowser;
3549 is_downloading = (flags & TEST_DOWNLOAD) != 0;
3550 is_first_load = TRUE;
3551 dwl_flags = 0;
3552 use_container_olecmd = !(flags & TEST_NOOLECMD);
3553 use_container_dochostui = !(flags & TEST_NODOCHOST);
3556 static void test_WebBrowser(BOOL do_download, BOOL do_close)
3558 IWebBrowser2 *webbrowser;
3559 ULONG ref;
3561 webbrowser = create_webbrowser();
3562 if(!webbrowser)
3563 return;
3565 init_test(webbrowser, do_download ? TEST_DOWNLOAD : 0);
3567 test_QueryStatusWB(webbrowser, FALSE, FALSE);
3568 test_ExecWB(webbrowser, FALSE, FALSE);
3569 test_QueryInterface(webbrowser);
3570 test_ready_state(READYSTATE_UNINITIALIZED);
3571 test_ClassInfo(webbrowser);
3572 test_EnumVerbs(webbrowser);
3573 test_LocationURL(webbrowser, "");
3574 test_ConnectionPoint(webbrowser, TRUE);
3575 test_ClientSite(webbrowser, &ClientSite, !do_download);
3576 test_Extent(webbrowser);
3577 test_wb_funcs(webbrowser, TRUE);
3578 test_DoVerb(webbrowser);
3579 test_olecmd(webbrowser, FALSE);
3580 test_Navigate2(webbrowser, "about:blank");
3581 test_QueryStatusWB(webbrowser, TRUE, TRUE);
3582 test_ExecWB(webbrowser, TRUE, TRUE);
3584 if(do_download) {
3585 IHTMLDocument2 *doc, *doc2;
3587 test_download(0);
3588 test_olecmd(webbrowser, TRUE);
3589 doc = get_document(webbrowser);
3591 test_put_href(webbrowser, "about:test");
3592 test_download(DWL_FROM_PUT_HREF);
3593 doc2 = get_document(webbrowser);
3594 ok(doc == doc2, "doc != doc2\n");
3595 IHTMLDocument2_Release(doc2);
3597 trace("Navigate2 repeated...\n");
3598 test_Navigate2(webbrowser, "about:blank");
3599 test_download(DWL_EXPECT_BEFORE_NAVIGATE);
3600 doc2 = get_document(webbrowser);
3601 ok(doc == doc2, "doc != doc2\n");
3602 IHTMLDocument2_Release(doc2);
3603 IHTMLDocument2_Release(doc);
3605 if(!do_close) {
3606 trace("Navigate2 http URL...\n");
3607 test_ready_state(READYSTATE_COMPLETE);
3608 test_Navigate2(webbrowser, "http://test.winehq.org/tests/hello.html");
3609 test_download(DWL_EXPECT_BEFORE_NAVIGATE|DWL_HTTP);
3611 test_Refresh(webbrowser, FALSE);
3612 test_Refresh(webbrowser, TRUE);
3614 trace("put_href http URL...\n");
3615 test_put_href(webbrowser, "http://test.winehq.org/tests/winehq_snapshot/");
3616 test_download(DWL_FROM_PUT_HREF|DWL_HTTP);
3618 trace("GoBack...\n");
3619 test_go_back(webbrowser, "http://test.winehq.org/tests/hello.html", 0, 0, 1);
3620 test_download(DWL_FROM_GOBACK|DWL_HTTP);
3622 trace("GoForward...\n");
3623 test_go_forward(webbrowser, "http://test.winehq.org/tests/winehq_snapshot/", -1, 0);
3624 test_download(DWL_FROM_GOFORWARD|DWL_HTTP);
3626 trace("GoBack...\n");
3627 test_go_back(webbrowser, "http://test.winehq.org/tests/hello.html", 0, -1, 0);
3628 test_download(DWL_FROM_GOBACK|DWL_HTTP);
3630 trace("GoForward...\n");
3631 test_go_forward(webbrowser, "http://test.winehq.org/tests/winehq_snapshot/", -1, 0);
3632 test_download(DWL_FROM_GOFORWARD|DWL_HTTP);
3633 }else {
3634 trace("Navigate2 repeated with the same URL...\n");
3635 test_Navigate2(webbrowser, "about:blank");
3636 test_download(DWL_EXPECT_BEFORE_NAVIGATE);
3639 test_EnumVerbs(webbrowser);
3640 test_TranslateAccelerator(webbrowser);
3642 test_dochost_qs(webbrowser);
3645 test_external(webbrowser);
3646 test_htmlwindow_close(webbrowser);
3648 if(do_close)
3649 test_Close(webbrowser, do_download);
3650 else
3651 test_ClientSite(webbrowser, NULL, !do_download);
3652 test_ie_funcs(webbrowser);
3653 test_GetControlInfo(webbrowser);
3654 test_wb_funcs(webbrowser, FALSE);
3655 test_ConnectionPoint(webbrowser, FALSE);
3656 test_IServiceProvider(webbrowser);
3658 ref = IWebBrowser2_Release(webbrowser);
3659 ok(ref == 0 || broken(do_download && !do_close), "ref=%d, expected 0\n", ref);
3662 static void test_WebBrowserV1(void)
3664 IWebBrowser2 *wb;
3665 ULONG ref;
3666 HRESULT hres;
3668 hres = CoCreateInstance(&CLSID_WebBrowser_V1, NULL, CLSCTX_INPROC_SERVER|CLSCTX_INPROC_HANDLER,
3669 &IID_IWebBrowser2, (void**)&wb);
3670 ok(hres == S_OK, "Could not get WebBrowserV1 instance: %08x\n", hres);
3672 init_test(wb, 0);
3673 wb_version = 1;
3675 test_QueryStatusWB(wb, FALSE, FALSE);
3676 test_ExecWB(wb, FALSE, FALSE);
3677 test_QueryInterface(wb);
3678 test_ready_state(READYSTATE_UNINITIALIZED);
3679 test_ClassInfo(wb);
3680 test_EnumVerbs(wb);
3682 ref = IWebBrowser2_Release(wb);
3683 ok(ref == 0, "ref=%d, expected 0\n", ref);
3686 static void test_WebBrowser_slim_container(void)
3688 IWebBrowser2 *webbrowser;
3689 ULONG ref;
3691 webbrowser = create_webbrowser();
3692 init_test(webbrowser, TEST_NOOLECMD|TEST_NODOCHOST);
3694 test_ConnectionPoint(webbrowser, TRUE);
3695 test_ClientSite(webbrowser, &ClientSite, TRUE);
3696 test_DoVerb(webbrowser);
3697 test_Navigate2(webbrowser, "about:blank");
3699 /* Tests of interest */
3700 test_QueryStatusWB(webbrowser, FALSE, TRUE);
3701 test_ExecWB(webbrowser, FALSE, TRUE);
3702 test_external(webbrowser);
3704 /* Cleanup stage */
3705 test_ClientSite(webbrowser, NULL, TRUE);
3706 test_ConnectionPoint(webbrowser, FALSE);
3708 ref = IWebBrowser2_Release(webbrowser);
3709 ok(ref == 0, "ref=%d, expected 0\n", ref);
3712 static void test_WebBrowser_DoVerb(void)
3714 IWebBrowser2 *webbrowser;
3715 RECT rect;
3716 HWND hwnd;
3717 ULONG ref;
3718 BOOL res;
3720 webbrowser = create_webbrowser();
3721 init_test(webbrowser, 0);
3723 test_ClientSite(webbrowser, &ClientSite, FALSE);
3725 SET_EXPECT(CanInPlaceActivate);
3726 SET_EXPECT(Site_GetWindow);
3727 SET_EXPECT(OnInPlaceActivate);
3728 SET_EXPECT(GetWindowContext);
3729 SET_EXPECT(ShowObject);
3730 SET_EXPECT(GetContainer);
3731 SET_EXPECT(Frame_GetWindow);
3732 call_DoVerb(webbrowser, OLEIVERB_INPLACEACTIVATE);
3733 CHECK_CALLED(CanInPlaceActivate);
3734 CHECK_CALLED(Site_GetWindow);
3735 CHECK_CALLED(OnInPlaceActivate);
3736 CHECK_CALLED(GetWindowContext);
3737 CHECK_CALLED(ShowObject);
3738 CHECK_CALLED(GetContainer);
3739 CHECK_CALLED(Frame_GetWindow);
3741 hwnd = get_hwnd(webbrowser);
3743 memset(&rect, 0xa, sizeof(rect));
3744 res = GetWindowRect(hwnd, &rect);
3745 ok(res, "GetWindowRect failed: %u\n", GetLastError());
3747 SET_EXPECT(OnInPlaceDeactivate);
3748 call_DoVerb(webbrowser, OLEIVERB_HIDE);
3749 CHECK_CALLED(OnInPlaceDeactivate);
3751 test_ClientSite(webbrowser, NULL, FALSE);
3753 ref = IWebBrowser2_Release(webbrowser);
3754 ok(ref == 0, "ref=%d, expected 0\n", ref);
3758 /* Check if Internet Explorer is configured to run in "Enhanced Security Configuration" (aka hardened mode) */
3759 /* Note: this code is duplicated in dlls/mshtml/tests/mshtml_test.h and dlls/urlmon/tests/sec_mgr.c */
3760 static BOOL is_ie_hardened(void)
3762 HKEY zone_map;
3763 DWORD ie_harden, type, size;
3765 ie_harden = 0;
3766 if(RegOpenKeyExA(HKEY_CURRENT_USER, "Software\\Microsoft\\Windows\\CurrentVersion\\Internet Settings\\ZoneMap",
3767 0, KEY_QUERY_VALUE, &zone_map) == ERROR_SUCCESS) {
3768 size = sizeof(DWORD);
3769 if (RegQueryValueExA(zone_map, "IEHarden", NULL, &type, (LPBYTE) &ie_harden, &size) != ERROR_SUCCESS ||
3770 type != REG_DWORD) {
3771 ie_harden = 0;
3773 RegCloseKey(zone_map);
3776 return ie_harden != 0;
3779 static void test_FileProtocol(void)
3781 IWebBrowser2 *webbrowser;
3782 HANDLE file;
3783 ULONG ref;
3784 char file_path[MAX_PATH];
3785 char file_url[MAX_PATH] = "File://";
3787 static const char test_file[] = "wine_test.html";
3789 GetTempPathA(MAX_PATH, file_path);
3790 strcat(file_path, test_file);
3792 webbrowser = create_webbrowser();
3793 if(!webbrowser)
3794 return;
3796 init_test(webbrowser, 0);
3798 file = CreateFileA(file_path, GENERIC_WRITE, 0, NULL,
3799 CREATE_NEW, FILE_ATTRIBUTE_NORMAL, NULL);
3800 if(file == INVALID_HANDLE_VALUE && GetLastError() != ERROR_FILE_EXISTS){
3801 ok(0, "CreateFile failed\n");
3802 return;
3804 CloseHandle(file);
3806 GetLongPathNameA(file_path, file_path, sizeof(file_path));
3807 strcat(file_url, file_path);
3809 test_ConnectionPoint(webbrowser, TRUE);
3810 test_ClientSite(webbrowser, &ClientSite, TRUE);
3811 test_DoVerb(webbrowser);
3812 test_Navigate2(webbrowser, file_url);
3813 test_ClientSite(webbrowser, NULL, TRUE);
3815 ref = IWebBrowser2_Release(webbrowser);
3816 ok(ref == 0, "ref=%u, expected 0\n", ref);
3818 if(file != INVALID_HANDLE_VALUE)
3819 DeleteFileA(file_path);
3822 START_TEST(webbrowser)
3824 OleInitialize(NULL);
3826 container_hwnd = create_container_window();
3828 trace("Testing WebBrowser (no download)...\n");
3829 test_WebBrowser(FALSE, FALSE);
3830 test_WebBrowser(FALSE, TRUE);
3832 if(!is_ie_hardened()) {
3833 trace("Testing WebBrowser...\n");
3834 test_WebBrowser(TRUE, FALSE);
3835 }else {
3836 win_skip("Skipping http tests in hardened mode\n");
3839 trace("Testing WebBrowser DoVerb\n");
3840 test_WebBrowser_DoVerb();
3841 trace("Testing WebBrowser (with close)...\n");
3842 test_WebBrowser(TRUE, TRUE);
3843 trace("Testing WebBrowser w/o container-based olecmd...\n");
3844 test_WebBrowser_slim_container();
3845 trace("Testing WebBrowserV1...\n");
3846 test_WebBrowserV1();
3847 test_FileProtocol();
3849 OleUninitialize();