?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
quartz: Free two assert calls from having side effects.
[wine/testsucceed.git] / dlls / ieframe / tests / webbrowser.c
blob6d414622982ab44b0b4535cc13ce4036f588be7e
1 /*
2 * Copyright 2006 Jacek Caban for CodeWeavers
3 *
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.
8 *
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.
13 *
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
17 */
18
19 #define COBJMACROS
20 #define CONST_VTABLE
21
22 #include <wine/test.h>
23 #include <stdarg.h>
24 #include <stdio.h>
25
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"
45
46 DEFINE_GUID(GUID_NULL,0,0,0,0,0,0,0,0,0,0,0);
47 DEFINE_OLEGUID(CGID_DocHostCmdPriv, 0x000214D4L, 0, 0);
48
49 #define DEFINE_EXPECT(func) \
50 static BOOL expect_ ## func = FALSE, called_ ## func = FALSE
51
52 #define SET_EXPECT(func) \
53 expect_ ## func = TRUE
54
55 #define CHECK_EXPECT2(func) \
56 do { \
57 ok(expect_ ##func, "unexpected call " #func "\n"); \
58 called_ ## func = TRUE; \
59 }while(0)
60
61 #define CHECK_EXPECT(func) \
62 do { \
63 CHECK_EXPECT2(func); \
64 expect_ ## func = FALSE; \
65 }while(0)
66
67 #define CHECK_CALLED(func) \
68 do { \
69 ok(called_ ## func, "expected " #func "\n"); \
70 expect_ ## func = called_ ## func = FALSE; \
71 }while(0)
72
73 #define CLEAR_CALLED(func) \
74 expect_ ## func = called_ ## func = FALSE
75
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);
100 DEFINE_EXPECT(Invoke_DOWNLOADCOMPLETE);
101 DEFINE_EXPECT(Invoke_ONMENUBAR);
102 DEFINE_EXPECT(Invoke_ONADDRESSBAR);
103 DEFINE_EXPECT(Invoke_ONSTATUSBAR);
104 DEFINE_EXPECT(Invoke_ONTOOLBAR);
105 DEFINE_EXPECT(Invoke_ONFULLSCREEN);
106 DEFINE_EXPECT(Invoke_ONTHEATERMODE);
107 DEFINE_EXPECT(Invoke_WINDOWSETRESIZABLE);
108 DEFINE_EXPECT(Invoke_TITLECHANGE);
109 DEFINE_EXPECT(Invoke_NAVIGATECOMPLETE2);
110 DEFINE_EXPECT(Invoke_PROGRESSCHANGE);
111 DEFINE_EXPECT(Invoke_DOCUMENTCOMPLETE);
112 DEFINE_EXPECT(Invoke_282);
113 DEFINE_EXPECT(EnableModeless_TRUE);
114 DEFINE_EXPECT(EnableModeless_FALSE);
115 DEFINE_EXPECT(GetHostInfo);
116 DEFINE_EXPECT(GetOptionKeyPath);
117 DEFINE_EXPECT(GetOverridesKeyPath);
118 DEFINE_EXPECT(SetStatusText);
119 DEFINE_EXPECT(UpdateUI);
120 DEFINE_EXPECT(Exec_SETDOWNLOADSTATE_0);
121 DEFINE_EXPECT(Exec_SETDOWNLOADSTATE_1);
122 DEFINE_EXPECT(Exec_SETPROGRESSMAX);
123 DEFINE_EXPECT(Exec_SETPROGRESSPOS);
124 DEFINE_EXPECT(Exec_UPDATECOMMANDS);
125 DEFINE_EXPECT(Exec_SETTITLE);
126 DEFINE_EXPECT(QueryStatus_SETPROGRESSTEXT);
127 DEFINE_EXPECT(Exec_STOP);
128 DEFINE_EXPECT(Exec_IDM_STOP);
129 DEFINE_EXPECT(QueryStatus_STOP);
130 DEFINE_EXPECT(QueryStatus_IDM_STOP);
131 DEFINE_EXPECT(DocHost_EnableModeless_TRUE);
132 DEFINE_EXPECT(DocHost_EnableModeless_FALSE);
133 DEFINE_EXPECT(DocHost_TranslateAccelerator);
134 DEFINE_EXPECT(GetDropTarget);
135 DEFINE_EXPECT(TranslateUrl);
136 DEFINE_EXPECT(ShowUI);
137 DEFINE_EXPECT(HideUI);
138 DEFINE_EXPECT(OnUIDeactivate);
139 DEFINE_EXPECT(OnInPlaceDeactivate);
140 DEFINE_EXPECT(RequestUIActivate);
141 DEFINE_EXPECT(ControlSite_TranslateAccelerator);
142 DEFINE_EXPECT(OnFocus);
143
144 static const WCHAR wszItem[] = {'i','t','e','m',0};
145 static const WCHAR emptyW[] = {0};
146
147 static VARIANT_BOOL exvb;
148
149 static IWebBrowser2 *wb;
150
151 static HWND container_hwnd, shell_embedding_hwnd;
152 static BOOL is_downloading, is_first_load, use_container_olecmd, test_close;
153 static HRESULT hr_dochost_TranslateAccelerator = E_NOTIMPL;
154 static HRESULT hr_site_TranslateAccelerator = E_NOTIMPL;
155 static const char *current_url;
156
157 #define DWL_EXPECT_BEFORE_NAVIGATE 0x01
158 #define DWL_FROM_PUT_HREF 0x02
159
160 static DWORD dwl_flags;
161
162
163 /* Returns true if the user interface is in English. Note that this does not
164 * presume of the formatting of dates, numbers, etc.
165 */
166 static BOOL is_lang_english(void)
167 {
168 static HMODULE hkernel32 = NULL;
169 static LANGID (WINAPI *pGetThreadUILanguage)(void) = NULL;
170 static LANGID (WINAPI *pGetUserDefaultUILanguage)(void) = NULL;
171
172 if (!hkernel32)
173 {
174 hkernel32 = GetModuleHandleA("kernel32.dll");
175 pGetThreadUILanguage = (void*)GetProcAddress(hkernel32, "GetThreadUILanguage");
176 pGetUserDefaultUILanguage = (void*)GetProcAddress(hkernel32, "GetUserDefaultUILanguage");
177 }
178 if (pGetThreadUILanguage)
179 return PRIMARYLANGID(pGetThreadUILanguage()) == LANG_ENGLISH;
180 if (pGetUserDefaultUILanguage)
181 return PRIMARYLANGID(pGetUserDefaultUILanguage()) == LANG_ENGLISH;
182
183 return PRIMARYLANGID(GetUserDefaultLangID()) == LANG_ENGLISH;
184 }
185
186 static int strcmp_wa(LPCWSTR strw, const char *stra)
187 {
188 CHAR buf[512];
189 WideCharToMultiByte(CP_ACP, 0, strw, -1, buf, sizeof(buf), NULL, NULL);
190 return lstrcmpA(stra, buf);
191 }
192
193 static BOOL iface_cmp(IUnknown *iface1, IUnknown *iface2)
194 {
195 IUnknown *unk1, *unk2;
196
197 if(iface1 == iface2)
198 return TRUE;
199
200 IUnknown_QueryInterface(iface1, &IID_IUnknown, (void**)&unk1);
201 IUnknown_Release(unk1);
202 IUnknown_QueryInterface(iface2, &IID_IUnknown, (void**)&unk2);
203 IUnknown_Release(unk2);
204
205 return unk1 == unk2;
206 }
207
208 static const char *debugstr_guid(REFIID riid)
209 {
210 static char buf[50];
211
212 sprintf(buf, "{%08X-%04X-%04X-%02X%02X-%02X%02X%02X%02X%02X%02X}",
213 riid->Data1, riid->Data2, riid->Data3, riid->Data4[0],
214 riid->Data4[1], riid->Data4[2], riid->Data4[3], riid->Data4[4],
215 riid->Data4[5], riid->Data4[6], riid->Data4[7]);
216
217 return buf;
218 }
219
220 static BSTR a2bstr(const char *str)
221 {
222 BSTR ret;
223 int len;
224
225 len = MultiByteToWideChar(CP_ACP, 0, str, -1, NULL, 0);
226 ret = SysAllocStringLen(NULL, len);
227 MultiByteToWideChar(CP_ACP, 0, str, -1, ret, len);
228
229 return ret;
230 }
231
232 #define create_WebBrowser(a) _create_WebBrowser(__LINE__,a)
233 static HRESULT _create_WebBrowser(unsigned line, IUnknown **unk)
234 {
235 HRESULT hres;
236
237 hres = CoCreateInstance(&CLSID_WebBrowser, NULL, CLSCTX_INPROC_SERVER|CLSCTX_INPROC_HANDLER,
238 &IID_IUnknown, (void**)unk);
239 ok_(__FILE__,line)(hres == S_OK, "Creating WebBrowser object failed: %08x\n", hres);
240 return hres;
241 }
242
243 #define test_LocationURL(a,b) _test_LocationURL(__LINE__,a,b)
244 static void _test_LocationURL(unsigned line, IUnknown *unk, const char *exurl)
245 {
246 IWebBrowser2 *wb;
247 BSTR url = (void*)0xdeadbeef;
248 HRESULT hres;
249
250 hres = IUnknown_QueryInterface(unk, &IID_IWebBrowser2, (void**)&wb);
251 ok(hres == S_OK, "Could not get IWebBrowser2 interface: %08x\n", hres);
252 if(FAILED(hres))
253 return;
254
255 hres = IWebBrowser2_get_LocationURL(wb, &url);
256 ok_(__FILE__,line) (hres == (*exurl ? S_OK : S_FALSE), "get_LocationURL failed: %08x\n", hres);
257 if (hres == S_OK)
258 {
259 ok_(__FILE__,line) (!strcmp_wa(url, exurl), "unexpected URL: %s\n", wine_dbgstr_w(url));
260 SysFreeString(url);
261 }
262
263 IWebBrowser2_Release(wb);
264 }
265
266 #define test_ready_state(ex) _test_ready_state(__LINE__,ex);
267 static void _test_ready_state(unsigned line, READYSTATE exstate)
268 {
269 READYSTATE state;
270 HRESULT hres;
271
272 hres = IWebBrowser2_get_ReadyState(wb, &state);
273 ok_(__FILE__,line)(hres == S_OK, "get_ReadyState failed: %08x\n", hres);
274 ok_(__FILE__,line)(state == exstate, "ReadyState = %d, expected %d\n", state, exstate);
275 }
276
277 #define get_document(u) _get_document(__LINE__,u)
278 static IDispatch *_get_document(unsigned line, IUnknown *unk)
279 {
280 IHTMLDocument2 *html_doc;
281 IWebBrowser2 *wb;
282 IDispatch *disp;
283 HRESULT hres;
284
285 hres = IUnknown_QueryInterface(unk, &IID_IWebBrowser2, (void**)&wb);
286 ok_(__FILE__,line)(hres == S_OK, "QueryInterface(IID_IWebBrowser2) failed: %08x\n", hres);
287
288 disp = NULL;
289 hres = IWebBrowser2_get_Document(wb, &disp);
290 IWebBrowser2_Release(wb);
291 ok_(__FILE__,line)(hres == S_OK, "get_Document failed: %08x\n", hres);
292 ok_(__FILE__,line)(disp != NULL, "doc_disp == NULL\n");
293
294 hres = IDispatch_QueryInterface(disp, &IID_IHTMLDocument2, (void**)&html_doc);
295 ok_(__FILE__,line)(hres == S_OK, "Could not get IHTMLDocument iface: %08x\n", hres);
296 ok(disp == (IDispatch*)html_doc, "disp != html_doc\n");
297 IHTMLDocument_Release(html_doc);
298
299 return disp;
300 }
301
302 #define get_dochost(u) _get_dochost(__LINE__,u)
303 static IOleClientSite *_get_dochost(unsigned line, IUnknown *unk)
304 {
305 IOleClientSite *client_site;
306 IOleObject *oleobj;
307 IDispatch *doc;
308 HRESULT hres;
309
310 doc = _get_document(line, unk);
311 hres = IDispatch_QueryInterface(doc, &IID_IOleObject, (void**)&oleobj);
312 IDispatch_Release(doc);
313 ok_(__FILE__,line)(hres == S_OK, "Got 0x%08x\n", hres);
314
315 hres = IOleObject_GetClientSite(oleobj, &client_site);
316 IOleObject_Release(oleobj);
317 ok_(__FILE__,line)(hres == S_OK, "Got 0x%08x\n", hres);
318
319 return client_site;
320 }
321
322 static HRESULT QueryInterface(REFIID,void**);
323
324 static HRESULT WINAPI OleCommandTarget_QueryInterface(IOleCommandTarget *iface,
325 REFIID riid, void **ppv)
326 {
327 ok(0, "unexpected call\n");
328 return E_NOINTERFACE;
329 }
330
331 static ULONG WINAPI OleCommandTarget_AddRef(IOleCommandTarget *iface)
332 {
333 return 2;
334 }
335
336 static ULONG WINAPI OleCommandTarget_Release(IOleCommandTarget *iface)
337 {
338 return 1;
339 }
340
341 static HRESULT WINAPI OleCommandTarget_QueryStatus(IOleCommandTarget *iface, const GUID *pguidCmdGroup,
342 ULONG cCmds, OLECMD prgCmds[], OLECMDTEXT *pCmdText)
343 {
344 ok(!pguidCmdGroup, "pguidCmdGroup != MULL\n");
345 ok(cCmds == 1, "cCmds=%d, expected 1\n", cCmds);
346 ok(!pCmdText, "pCmdText != NULL\n");
347
348 switch(prgCmds[0].cmdID) {
349 case OLECMDID_STOP:
350 CHECK_EXPECT2(QueryStatus_STOP);
351 prgCmds[0].cmdf = OLECMDF_SUPPORTED;
352 return S_OK;
353 case OLECMDID_SETPROGRESSTEXT:
354 CHECK_EXPECT(QueryStatus_SETPROGRESSTEXT);
355 prgCmds[0].cmdf = OLECMDF_ENABLED;
356 return S_OK;
357 case IDM_STOP:
358 /* Note:
359 * IDM_STOP is a command specific to CGID_MSHTML (not an OLECMDID command).
360 * This command appears here for the ExecWB and QueryStatusWB tests in order
361 * to help demonstrate that these routines use a NULL pguidCmdGroup.
362 */
363 CHECK_EXPECT(QueryStatus_IDM_STOP);
364 prgCmds[0].cmdf = 0;
365 return S_OK;
366 default:
367 ok(0, "unexpected command %d\n", prgCmds[0].cmdID);
368 }
369
370 return E_FAIL;
371 }
372
373 static HRESULT WINAPI OleCommandTarget_Exec(IOleCommandTarget *iface, const GUID *pguidCmdGroup,
374 DWORD nCmdID, DWORD nCmdexecopt, VARIANT *pvaIn, VARIANT *pvaOut)
375 {
376 if(!pguidCmdGroup) {
377 switch(nCmdID) {
378 case OLECMDID_SETPROGRESSMAX:
379 CHECK_EXPECT2(Exec_SETPROGRESSMAX);
380 ok(nCmdexecopt == OLECMDEXECOPT_DONTPROMPTUSER, "nCmdexecopts=%08x\n", nCmdexecopt);
381 ok(pvaIn != NULL, "pvaIn == NULL\n");
382 if(pvaIn)
383 ok(V_VT(pvaIn) == VT_I4, "V_VT(pvaIn)=%d, expected VT_I4\n", V_VT(pvaIn));
384 ok(pvaOut == NULL, "pvaOut=%p, expected NULL\n", pvaOut);
385 return S_OK;
386 case OLECMDID_SETPROGRESSPOS:
387 CHECK_EXPECT2(Exec_SETPROGRESSPOS);
388 ok(nCmdexecopt == OLECMDEXECOPT_DONTPROMPTUSER, "nCmdexecopts=%08x\n", nCmdexecopt);
389 ok(pvaIn != NULL, "pvaIn == NULL\n");
390 if(pvaIn)
391 ok(V_VT(pvaIn) == VT_I4, "V_VT(pvaIn)=%d, expected VT_I4\n", V_VT(pvaIn));
392 ok(pvaOut == NULL, "pvaOut=%p, expected NULL\n", pvaOut);
393 return S_OK;
394 case OLECMDID_SETDOWNLOADSTATE:
395 if(is_downloading)
396 ok(nCmdexecopt == OLECMDEXECOPT_DONTPROMPTUSER || !nCmdexecopt,
397 "nCmdexecopts=%08x\n", nCmdexecopt);
398 else
399 ok(!nCmdexecopt, "nCmdexecopts=%08x\n", nCmdexecopt);
400 ok(pvaOut == NULL, "pvaOut=%p\n", pvaOut);
401 ok(pvaIn != NULL, "pvaIn == NULL\n");
402 ok(V_VT(pvaIn) == VT_I4, "V_VT(pvaIn)=%d\n", V_VT(pvaIn));
403 switch(V_I4(pvaIn)) {
404 case 0:
405 CHECK_EXPECT2(Exec_SETDOWNLOADSTATE_0);
406 break;
407 case 1:
408 CHECK_EXPECT2(Exec_SETDOWNLOADSTATE_1);
409 break;
410 default:
411 ok(0, "unexpevted V_I4(pvaIn)=%d\n", V_I4(pvaIn));
412 }
413 return S_OK;
414 case OLECMDID_UPDATECOMMANDS:
415 CHECK_EXPECT(Exec_UPDATECOMMANDS);
416 ok(nCmdexecopt == OLECMDEXECOPT_DONTPROMPTUSER, "nCmdexecopts=%08x\n", nCmdexecopt);
417 ok(!pvaIn, "pvaIn != NULL\n");
418 ok(!pvaOut, "pvaOut=%p, expected NULL\n", pvaOut);
419 return S_OK;
420 case OLECMDID_SETTITLE:
421 CHECK_EXPECT(Exec_SETTITLE);
422 /* TODO: test args */
423 return S_OK;
424 case OLECMDID_STOP:
425 CHECK_EXPECT(Exec_STOP);
426 return S_OK;
427 case IDM_STOP:
428 /* Note:
429 * IDM_STOP is a command specific to CGID_MSHTML (not an OLECMDID command).
430 * This command appears here for the ExecWB and QueryStatusWB tests in order
431 * to help demonstrate that these routines use a NULL pguidCmdGroup.
432 */
433 CHECK_EXPECT(Exec_IDM_STOP);
434 return OLECMDERR_E_NOTSUPPORTED;
435 default:
436 ok(0, "unexpected nsCmdID %d\n", nCmdID);
437 }
438 }else if(IsEqualGUID(&CGID_Explorer, pguidCmdGroup)) {
439 switch(nCmdID) {
440 case 24: /* TODO */
441 case 25: /* IE5 */
442 case 37: /* TODO */
443 case 39: /* TODO */
444 case 66: /* TODO */
445 case 67: /* TODO */
446 case 69: /* TODO */
447 case 101: /* TODO (IE8) */
448 return E_FAIL;
449 default:
450 ok(0, "unexpected nCmdID %d\n", nCmdID);
451 }
452 }else if(IsEqualGUID(&CGID_ShellDocView, pguidCmdGroup)) {
453 switch(nCmdID) {
454 case 105: /* TODO */
455 case 140: /* TODO (Win7) */
456 return E_FAIL;
457 default:
458 ok(0, "unexpected nCmdID %d\n", nCmdID);
459 }
460 }else if(IsEqualGUID(&CGID_DocHostCmdPriv, pguidCmdGroup)) {
461 switch(nCmdID) {
462 case 11: /* TODO */
463 break;
464 default:
465 ok(0, "unexpected nCmdID %d of CGID_DocHostCmdPriv\n", nCmdID);
466 }
467 }else if(IsEqualGUID(&CGID_DocHostCommandHandler, pguidCmdGroup)) {
468 switch(nCmdID) {
469 case 6041: /* TODO */
470 break;
471 default:
472 ok(0, "unexpected nCmdID %d of CGID_DocHostCommandHandler\n", nCmdID);
473 }
474 }else {
475 ok(0, "unexpected pguidCmdGroup %s\n", debugstr_guid(pguidCmdGroup));
476 }
477
478 return E_FAIL;
479 }
480
481 static IOleCommandTargetVtbl OleCommandTargetVtbl = {
482 OleCommandTarget_QueryInterface,
483 OleCommandTarget_AddRef,
484 OleCommandTarget_Release,
485 OleCommandTarget_QueryStatus,
486 OleCommandTarget_Exec
487 };
488
489 static IOleCommandTarget OleCommandTarget = { &OleCommandTargetVtbl };
490
491 static HRESULT WINAPI OleContainer_QueryInterface(IOleContainer *iface, REFIID riid, void **ppv)
492 {
493 if(IsEqualGUID(&IID_ITargetContainer, riid))
494 return E_NOINTERFACE; /* TODO */
495
496 if(IsEqualGUID(&IID_IOleCommandTarget, riid)) {
497 if(use_container_olecmd)
498 {
499 *ppv = &OleCommandTarget;
500 return S_OK;
501 }
502 else
503 return E_NOINTERFACE;
504 }
505
506 ok(0, "unexpected call\n");
507 return E_NOINTERFACE;
508 }
509
510 static ULONG WINAPI OleContainer_AddRef(IOleContainer *iface)
511 {
512 return 2;
513 }
514
515 static ULONG WINAPI OleContainer_Release(IOleContainer *iface)
516 {
517 return 1;
518 }
519
520 static HRESULT WINAPI OleContainer_ParseDisplayName(IOleContainer *iface, IBindCtx *pbc,
521 LPOLESTR pszDiaplayName, ULONG *pchEaten, IMoniker **ppmkOut)
522 {
523 ok(0, "unexpected call\n");
524 return E_NOTIMPL;
525 }
526
527 static HRESULT WINAPI OleContainer_EnumObjects(IOleContainer *iface, DWORD grfFlags,
528 IEnumUnknown **ppenum)
529 {
530 ok(0, "unexpected call\n");
531 return E_NOTIMPL;
532 }
533
534 static HRESULT WINAPI OleContainer_LockContainer(IOleContainer *iface, BOOL fLock)
535 {
536 ok(0, "unexpected call\n");
537 return E_NOTIMPL;
538 }
539
540 static const IOleContainerVtbl OleContainerVtbl = {
541 OleContainer_QueryInterface,
542 OleContainer_AddRef,
543 OleContainer_Release,
544 OleContainer_ParseDisplayName,
545 OleContainer_EnumObjects,
546 OleContainer_LockContainer
547 };
548
549 static IOleContainer OleContainer = { &OleContainerVtbl };
550
551 static HRESULT WINAPI Dispatch_QueryInterface(IDispatch *iface, REFIID riid, void **ppv)
552 {
553 return QueryInterface(riid, ppv);
554 }
555
556 static ULONG WINAPI Dispatch_AddRef(IDispatch *iface)
557 {
558 return 2;
559 }
560
561 static ULONG WINAPI Dispatch_Release(IDispatch *iface)
562 {
563 return 1;
564 }
565
566 static HRESULT WINAPI Dispatch_GetTypeInfoCount(IDispatch *iface, UINT *pctinfo)
567 {
568 ok(0, "unexpected call\n");
569 return E_NOTIMPL;
570 }
571
572 static HRESULT WINAPI Dispatch_GetTypeInfo(IDispatch *iface, UINT iTInfo, LCID lcid,
573 ITypeInfo **ppTInfo)
574 {
575 ok(0, "unexpected call\n");
576 return E_NOTIMPL;
577 }
578
579 static HRESULT WINAPI Dispatch_GetIDsOfNames(IDispatch *iface, REFIID riid, LPOLESTR *rgszNames,
580 UINT cNames, LCID lcid, DISPID *rgDispId)
581 {
582 ok(0, "unexpected call\n");
583 return E_NOTIMPL;
584 }
585
586 static HRESULT WINAPI Dispatch_Invoke(IDispatch *iface, DISPID dispIdMember, REFIID riid,
587 LCID lcid, WORD wFlags, DISPPARAMS *pDispParams, VARIANT *pVarResult,
588 EXCEPINFO *pExcepInfo, UINT *puArgErr)
589 {
590 ok(IsEqualGUID(&IID_NULL, riid), "riid != IID_NULL\n");
591 ok(pDispParams != NULL, "pDispParams == NULL\n");
592 ok(pExcepInfo == NULL, "pExcepInfo=%p, expected NULL\n", pExcepInfo);
593 ok(V_VT(pVarResult) == VT_EMPTY, "V_VT(pVarResult)=%d\n", V_VT(pVarResult));
594 ok(wFlags == DISPATCH_PROPERTYGET, "wFlags=%08x, expected DISPATCH_PROPERTYGET\n", wFlags);
595 ok(pDispParams->rgvarg == NULL, "pDispParams->rgvarg = %p\n", pDispParams->rgvarg);
596 ok(pDispParams->rgdispidNamedArgs == NULL,
597 "pDispParams->rgdispidNamedArgs = %p\n", pDispParams->rgdispidNamedArgs);
598 ok(pDispParams->cArgs == 0, "pDispParams->cArgs = %d\n", pDispParams->cArgs);
599 ok(pDispParams->cNamedArgs == 0, "pDispParams->cNamedArgs = %d\n", pDispParams->cNamedArgs);
600
601 switch(dispIdMember) {
602 case DISPID_AMBIENT_USERMODE:
603 CHECK_EXPECT2(Invoke_AMBIENT_USERMODE);
604 return E_FAIL;
605 case DISPID_AMBIENT_DLCONTROL:
606 CHECK_EXPECT(Invoke_AMBIENT_DLCONTROL);
607 ok(puArgErr != NULL, "puArgErr=%p\n", puArgErr);
608 return E_FAIL;
609 case DISPID_AMBIENT_USERAGENT:
610 CHECK_EXPECT(Invoke_AMBIENT_USERAGENT);
611 ok(puArgErr != NULL, "puArgErr=%p\n", puArgErr);
612 return E_FAIL;
613 case DISPID_AMBIENT_PALETTE:
614 CHECK_EXPECT(Invoke_AMBIENT_PALETTE);
615 ok(puArgErr != NULL, "puArgErr=%p\n", puArgErr);
616 return E_FAIL;
617 case DISPID_AMBIENT_OFFLINEIFNOTCONNECTED:
618 CHECK_EXPECT(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
619 ok(puArgErr == NULL, "puArgErr=%p\n", puArgErr);
620 V_VT(pVarResult) = VT_BOOL;
621 V_BOOL(pVarResult) = VARIANT_FALSE;
622 return S_OK;
623 case DISPID_AMBIENT_SILENT:
624 CHECK_EXPECT(Invoke_AMBIENT_SILENT);
625 ok(puArgErr == NULL, "puArgErr=%p\n", puArgErr);
626 V_VT(pVarResult) = VT_BOOL;
627 V_BOOL(pVarResult) = VARIANT_FALSE;
628 return S_OK;
629 }
630
631 ok(0, "unexpected dispIdMember %d\n", dispIdMember);
632 return E_NOTIMPL;
633 }
634
635 static IDispatchVtbl DispatchVtbl = {
636 Dispatch_QueryInterface,
637 Dispatch_AddRef,
638 Dispatch_Release,
639 Dispatch_GetTypeInfoCount,
640 Dispatch_GetTypeInfo,
641 Dispatch_GetIDsOfNames,
642 Dispatch_Invoke
643 };
644
645 static IDispatch Dispatch = { &DispatchVtbl };
646
647 static HRESULT WINAPI WebBrowserEvents2_QueryInterface(IDispatch *iface, REFIID riid, void **ppv)
648 {
649 *ppv = NULL;
650
651 if(IsEqualGUID(&DIID_DWebBrowserEvents2, riid)) {
652 *ppv = iface;
653 return S_OK;
654 }
655
656 ok(0, "unexpected riid %s\n", debugstr_guid(riid));
657 return E_NOINTERFACE;
658 }
659
660 #define test_invoke_bool(p,s) _test_invoke_bool(__LINE__,p,s)
661 static void _test_invoke_bool(unsigned line, const DISPPARAMS *params, BOOL strict)
662 {
663 ok_(__FILE__,line) (params->rgvarg != NULL, "rgvarg == NULL\n");
664 ok_(__FILE__,line) (params->cArgs == 1, "cArgs=%d, expected 1\n", params->cArgs);
665 ok_(__FILE__,line) (V_VT(params->rgvarg) == VT_BOOL, "V_VT(arg)=%d\n", V_VT(params->rgvarg));
666 if(strict)
667 ok_(__FILE__,line) (V_BOOL(params->rgvarg) == exvb, "V_VT(arg)=%x, expected %x\n",
668 V_BOOL(params->rgvarg), exvb);
669 else
670 ok_(__FILE__,line) (!V_BOOL(params->rgvarg) == !exvb, "V_VT(arg)=%x, expected %x\n",
671 V_BOOL(params->rgvarg), exvb);
672 }
673
674 static void test_OnBeforeNavigate(const VARIANT *disp, const VARIANT *url, const VARIANT *flags,
675 const VARIANT *frame, const VARIANT *post_data, const VARIANT *headers, const VARIANT *cancel)
676 {
677 ok(V_VT(disp) == VT_DISPATCH, "V_VT(disp)=%d, expected VT_DISPATCH\n", V_VT(disp));
678 ok(V_DISPATCH(disp) != NULL, "V_DISPATCH(disp) == NULL\n");
679 ok(V_DISPATCH(disp) == (IDispatch*)wb, "V_DISPATCH(disp)=%p, wb=%p\n", V_DISPATCH(disp), wb);
680
681 ok(V_VT(url) == (VT_BYREF|VT_VARIANT), "V_VT(url)=%x, expected VT_BYREF|VT_VARIANT\n", V_VT(url));
682 ok(V_VARIANTREF(url) != NULL, "V_VARIANTREF(url) == NULL)\n");
683 if(V_VARIANTREF(url)) {
684 ok(V_VT(V_VARIANTREF(url)) == VT_BSTR, "V_VT(V_VARIANTREF(url))=%d, expected VT_BSTR\n",
685 V_VT(V_VARIANTREF(url)));
686 ok(V_BSTR(V_VARIANTREF(url)) != NULL, "V_BSTR(V_VARIANTREF(url)) == NULL\n");
687 ok(!strcmp_wa(V_BSTR(V_VARIANTREF(url)), current_url), "unexpected url %s, expected %s\n",
688 wine_dbgstr_w(V_BSTR(V_VARIANTREF(url))), current_url);
689 }
690
691 ok(V_VT(flags) == (VT_BYREF|VT_VARIANT), "V_VT(flags)=%x, expected VT_BYREF|VT_VARIANT\n",
692 V_VT(flags));
693 ok(V_VT(flags) == (VT_BYREF|VT_VARIANT), "V_VT(flags)=%x, expected VT_BYREF|VT_VARIANT\n",
694 V_VT(flags));
695 ok(V_VARIANTREF(flags) != NULL, "V_VARIANTREF(flags) == NULL)\n");
696 if(V_VARIANTREF(flags)) {
697 ok(V_VT(V_VARIANTREF(flags)) == VT_I4, "V_VT(V_VARIANTREF(flags))=%d, expected VT_I4\n",
698 V_VT(V_VARIANTREF(flags)));
699 if(is_first_load) {
700 ok(V_I4(V_VARIANTREF(flags)) == 0, "V_I4(V_VARIANTREF(flags)) = %x, expected 0\n",
701 V_I4(V_VARIANTREF(flags)));
702 }else {
703 ok((V_I4(V_VARIANTREF(flags)) & ~0x40) == 0, "V_I4(V_VARIANTREF(flags)) = %x, expected 0x40 or 0\n",
704 V_I4(V_VARIANTREF(flags)));
705 }
706 }
707
708 ok(V_VT(frame) == (VT_BYREF|VT_VARIANT), "V_VT(frame)=%x, expected VT_BYREF|VT_VARIANT\n",
709 V_VT(frame));
710 ok(V_VT(frame) == (VT_BYREF|VT_VARIANT), "V_VT(frame)=%x, expected VT_BYREF|VT_VARIANT\n",
711 V_VT(frame));
712 ok(V_VARIANTREF(frame) != NULL, "V_VARIANTREF(frame) == NULL)\n");
713 if(V_VARIANTREF(frame)) {
714 ok(V_VT(V_VARIANTREF(frame)) == VT_BSTR, "V_VT(V_VARIANTREF(frame))=%d, expected VT_BSTR\n",
715 V_VT(V_VARIANTREF(frame)));
716 ok(V_BSTR(V_VARIANTREF(frame)) == NULL, "V_BSTR(V_VARIANTREF(frame)) = %p, expected NULL\n",
717 V_BSTR(V_VARIANTREF(frame)));
718 }
719
720 ok(V_VT(post_data) == (VT_BYREF|VT_VARIANT), "V_VT(post_data)=%x, expected VT_BYREF|VT_VARIANT\n",
721 V_VT(post_data));
722 ok(V_VT(post_data) == (VT_BYREF|VT_VARIANT), "V_VT(post_data)=%x, expected VT_BYREF|VT_VARIANT\n",
723 V_VT(post_data));
724 ok(V_VARIANTREF(post_data) != NULL, "V_VARIANTREF(post_data) == NULL)\n");
725 if(V_VARIANTREF(post_data)) {
726 ok(V_VT(V_VARIANTREF(post_data)) == (VT_VARIANT|VT_BYREF),
727 "V_VT(V_VARIANTREF(post_data))=%d, expected VT_VARIANT|VT_BYREF\n",
728 V_VT(V_VARIANTREF(post_data)));
729 ok(V_VARIANTREF(V_VARIANTREF(post_data)) != NULL,
730 "V_VARIANTREF(V_VARIANTREF(post_data)) == NULL\n");
731 if(V_VARIANTREF(V_VARIANTREF(post_data))) {
732 ok(V_VT(V_VARIANTREF(V_VARIANTREF(post_data))) == VT_EMPTY,
733 "V_VT(V_VARIANTREF(V_VARIANTREF(post_data))) = %d, expected VT_EMPTY\n",
734 V_VT(V_VARIANTREF(V_VARIANTREF(post_data))));
735
736 if(V_VT(V_VARIANTREF(V_VARIANTREF(post_data))) == (VT_UI1|VT_ARRAY)) {
737 const SAFEARRAY *sa = V_ARRAY(V_VARIANTREF(V_VARIANTREF(post_data)));
738
739 ok(sa->cDims == 1, "sa->cDims = %d, expected 1\n", sa->cDims);
740 ok(sa->fFeatures == 0, "sa->fFeatures = %d, expected 0\n", sa->fFeatures);
741 }
742 }
743 }
744
745 ok(V_VT(headers) == (VT_BYREF|VT_VARIANT), "V_VT(headers)=%x, expected VT_BYREF|VT_VARIANT\n",
746 V_VT(headers));
747 ok(V_VARIANTREF(headers) != NULL, "V_VARIANTREF(headers) == NULL)\n");
748 if(V_VARIANTREF(headers)) {
749 ok(V_VT(V_VARIANTREF(headers)) == VT_BSTR, "V_VT(V_VARIANTREF(headers))=%d, expected VT_BSTR\n",
750 V_VT(V_VARIANTREF(headers)));
751 ok(V_BSTR(V_VARIANTREF(headers)) == NULL, "V_BSTR(V_VARIANTREF(headers)) = %p, expected NULL\n",
752 V_BSTR(V_VARIANTREF(headers)));
753 }
754
755 ok(V_VT(cancel) == (VT_BYREF|VT_BOOL), "V_VT(cancel)=%x, expected VT_BYREF|VT_BOOL\n",
756 V_VT(cancel));
757 ok(V_BOOLREF(cancel) != NULL, "V_BOOLREF(pDispParams->rgvarg[0] == NULL)\n");
758 if(V_BOOLREF(cancel))
759 ok(*V_BOOLREF(cancel) == VARIANT_FALSE, "*V_BOOLREF(cancel) = %x, expected VARIANT_FALSE\n",
760 *V_BOOLREF(cancel));
761 }
762
763 static HRESULT WINAPI WebBrowserEvents2_Invoke(IDispatch *iface, DISPID dispIdMember, REFIID riid,
764 LCID lcid, WORD wFlags, DISPPARAMS *pDispParams, VARIANT *pVarResult,
765 EXCEPINFO *pExcepInfo, UINT *puArgErr)
766 {
767 ok(IsEqualGUID(&IID_NULL, riid), "riid != IID_NULL\n");
768 ok(pDispParams != NULL, "pDispParams == NULL\n");
769 ok(pExcepInfo == NULL, "pExcepInfo=%p, expected NULL\n", pExcepInfo);
770 ok(pVarResult == NULL, "pVarResult=%p\n", pVarResult);
771 ok(wFlags == DISPATCH_METHOD, "wFlags=%08x, expected DISPATCH_METHOD\n", wFlags);
772 ok(pDispParams->rgdispidNamedArgs == NULL,
773 "pDispParams->rgdispidNamedArgs = %p\n", pDispParams->rgdispidNamedArgs);
774 ok(pDispParams->cNamedArgs == 0, "pDispParams->cNamedArgs = %d\n", pDispParams->cNamedArgs);
775
776 switch(dispIdMember) {
777 case DISPID_STATUSTEXTCHANGE:
778 CHECK_EXPECT2(Invoke_STATUSTEXTCHANGE);
779
780 ok(pDispParams->rgvarg != NULL, "rgvarg == NULL\n");
781 ok(pDispParams->cArgs == 1, "cArgs=%d, expected 1\n", pDispParams->cArgs);
782 ok(V_VT(pDispParams->rgvarg) == VT_BSTR, "V_VT(pDispParams->rgvarg)=%d, expected VT_BSTR\n",
783 V_VT(pDispParams->rgvarg));
784 /* TODO: Check text */
785 break;
786
787 case DISPID_PROPERTYCHANGE:
788 CHECK_EXPECT2(Invoke_PROPERTYCHANGE);
789
790 ok(pDispParams->rgvarg != NULL, "rgvarg == NULL\n");
791 ok(pDispParams->cArgs == 1, "cArgs=%d, expected 1\n", pDispParams->cArgs);
792 /* TODO: Check args */
793 break;
794
795 case DISPID_DOWNLOADBEGIN:
796 CHECK_EXPECT(Invoke_DOWNLOADBEGIN);
797
798 ok(pDispParams->rgvarg == NULL, "rgvarg=%p, expected NULL\n", pDispParams->rgvarg);
799 ok(pDispParams->cArgs == 0, "cArgs=%d, expected 0\n", pDispParams->cArgs);
800 test_ready_state(READYSTATE_LOADING);
801 break;
802
803 case DISPID_BEFORENAVIGATE2:
804 CHECK_EXPECT(Invoke_BEFORENAVIGATE2);
805
806 ok(pDispParams->rgvarg != NULL, "rgvarg == NULL\n");
807 ok(pDispParams->cArgs == 7, "cArgs=%d, expected 7\n", pDispParams->cArgs);
808 test_OnBeforeNavigate(pDispParams->rgvarg+6, pDispParams->rgvarg+5, pDispParams->rgvarg+4,
809 pDispParams->rgvarg+3, pDispParams->rgvarg+2, pDispParams->rgvarg+1,
810 pDispParams->rgvarg);
811 test_ready_state((dwl_flags & DWL_FROM_PUT_HREF) ? READYSTATE_COMPLETE : READYSTATE_LOADING);
812 break;
813
814 case DISPID_SETSECURELOCKICON:
815 CHECK_EXPECT2(Invoke_SETSECURELOCKICON);
816
817 ok(pDispParams->rgvarg != NULL, "rgvarg == NULL\n");
818 ok(pDispParams->cArgs == 1, "cArgs=%d, expected 1\n", pDispParams->cArgs);
819 /* TODO: Check args */
820 break;
821
822 case DISPID_FILEDOWNLOAD:
823 CHECK_EXPECT(Invoke_FILEDOWNLOAD);
824
825 ok(pDispParams->rgvarg != NULL, "rgvarg == NULL\n");
826 ok(pDispParams->cArgs == 2, "cArgs=%d, expected 2\n", pDispParams->cArgs);
827 /* TODO: Check args */
828 break;
829
830 case DISPID_COMMANDSTATECHANGE:
831 CHECK_EXPECT2(Invoke_COMMANDSTATECHANGE);
832
833 ok(pDispParams->rgvarg != NULL, "rgvarg == NULL\n");
834 ok(pDispParams->cArgs == 2, "cArgs=%d, expected 2\n", pDispParams->cArgs);
835 /* TODO: Check args */
836 break;
837
838 case DISPID_DOWNLOADCOMPLETE:
839 CHECK_EXPECT(Invoke_DOWNLOADCOMPLETE);
840
841 ok(pDispParams->rgvarg == NULL, "rgvarg=%p, expected NULL\n", pDispParams->rgvarg);
842 ok(pDispParams->cArgs == 0, "cArgs=%d, expected 0\n", pDispParams->cArgs);
843 test_ready_state(READYSTATE_LOADING);
844 break;
845
846 case DISPID_ONMENUBAR:
847 CHECK_EXPECT(Invoke_ONMENUBAR);
848 test_invoke_bool(pDispParams, TRUE);
849 break;
850
851 case DISPID_ONADDRESSBAR:
852 CHECK_EXPECT(Invoke_ONADDRESSBAR);
853 test_invoke_bool(pDispParams, TRUE);
854 break;
855
856 case DISPID_ONSTATUSBAR:
857 CHECK_EXPECT(Invoke_ONSTATUSBAR);
858 test_invoke_bool(pDispParams, TRUE);
859 break;
860
861 case DISPID_ONTOOLBAR:
862 CHECK_EXPECT(Invoke_ONTOOLBAR);
863 test_invoke_bool(pDispParams, FALSE);
864 break;
865
866 case DISPID_ONFULLSCREEN:
867 CHECK_EXPECT(Invoke_ONFULLSCREEN);
868 test_invoke_bool(pDispParams, TRUE);
869 break;
870
871 case DISPID_ONTHEATERMODE:
872 CHECK_EXPECT(Invoke_ONTHEATERMODE);
873 test_invoke_bool(pDispParams, TRUE);
874 break;
875
876 case DISPID_WINDOWSETRESIZABLE:
877 CHECK_EXPECT(Invoke_WINDOWSETRESIZABLE);
878 test_invoke_bool(pDispParams, TRUE);
879 break;
880
881 case DISPID_TITLECHANGE:
882 CHECK_EXPECT2(Invoke_TITLECHANGE);
883 /* FIXME */
884 break;
885
886 case DISPID_NAVIGATECOMPLETE2:
887 CHECK_EXPECT(Invoke_NAVIGATECOMPLETE2);
888 /* FIXME */
889 test_ready_state((dwl_flags & DWL_FROM_PUT_HREF) ? READYSTATE_COMPLETE : READYSTATE_LOADING);
890 break;
891
892 case DISPID_PROGRESSCHANGE:
893 CHECK_EXPECT(Invoke_PROGRESSCHANGE);
894 /* FIXME */
895 break;
896
897 case DISPID_DOCUMENTCOMPLETE:
898 CHECK_EXPECT(Invoke_DOCUMENTCOMPLETE);
899 /* FIXME */
900 test_ready_state(READYSTATE_COMPLETE);
901 break;
902
903 case 282: /* FIXME */
904 CHECK_EXPECT2(Invoke_282);
905 break;
906
907 default:
908 ok(0, "unexpected dispIdMember %d\n", dispIdMember);
909 }
910
911 return S_OK;
912 }
913
914 static IDispatchVtbl WebBrowserEvents2Vtbl = {
915 WebBrowserEvents2_QueryInterface,
916 Dispatch_AddRef,
917 Dispatch_Release,
918 Dispatch_GetTypeInfoCount,
919 Dispatch_GetTypeInfo,
920 Dispatch_GetIDsOfNames,
921 WebBrowserEvents2_Invoke
922 };
923
924 static IDispatch WebBrowserEvents2 = { &WebBrowserEvents2Vtbl };
925
926 static HRESULT WINAPI ClientSite_QueryInterface(IOleClientSite *iface, REFIID riid, void **ppv)
927 {
928 return QueryInterface(riid, ppv);
929 }
930
931 static ULONG WINAPI ClientSite_AddRef(IOleClientSite *iface)
932 {
933 return 2;
934 }
935
936 static ULONG WINAPI ClientSite_Release(IOleClientSite *iface)
937 {
938 return 1;
939 }
940
941 static HRESULT WINAPI ClientSite_SaveObject(IOleClientSite *iface)
942 {
943 ok(0, "unexpected call\n");
944 return E_NOTIMPL;
945 }
946
947 static HRESULT WINAPI ClientSite_GetMoniker(IOleClientSite *iface, DWORD dwAssign, DWORD dwWhichMoniker,
948 IMoniker **ppmon)
949 {
950 ok(0, "unexpected call\n");
951 return E_NOTIMPL;
952 }
953
954 static HRESULT WINAPI ClientSite_GetContainer(IOleClientSite *iface, IOleContainer **ppContainer)
955 {
956 CHECK_EXPECT(GetContainer);
957
958 ok(ppContainer != NULL, "ppContainer == NULL\n");
959 if(ppContainer)
960 *ppContainer = &OleContainer;
961
962 return S_OK;
963 }
964
965 static HRESULT WINAPI ClientSite_ShowObject(IOleClientSite *iface)
966 {
967 CHECK_EXPECT(ShowObject);
968 return S_OK;
969 }
970
971 static HRESULT WINAPI ClientSite_OnShowWindow(IOleClientSite *iface, BOOL fShow)
972 {
973 ok(0, "unexpected call\n");
974 return E_NOTIMPL;
975 }
976
977 static HRESULT WINAPI ClientSite_RequestNewObjectLayout(IOleClientSite *iface)
978 {
979 ok(0, "unexpected call\n");
980 return E_NOTIMPL;
981 }
982
983 static const IOleClientSiteVtbl ClientSiteVtbl = {
984 ClientSite_QueryInterface,
985 ClientSite_AddRef,
986 ClientSite_Release,
987 ClientSite_SaveObject,
988 ClientSite_GetMoniker,
989 ClientSite_GetContainer,
990 ClientSite_ShowObject,
991 ClientSite_OnShowWindow,
992 ClientSite_RequestNewObjectLayout
993 };
994
995 static IOleClientSite ClientSite = { &ClientSiteVtbl };
996
997 static HRESULT WINAPI IOleControlSite_fnQueryInterface(IOleControlSite *iface, REFIID riid, void **ppv)
998 {
999 *ppv = NULL;
1000 return E_NOINTERFACE;
1001 }
1002
1003 static ULONG WINAPI IOleControlSite_fnAddRef(IOleControlSite *iface)
1004 {
1005 return 2;
1006 }
1007
1008 static ULONG WINAPI IOleControlSite_fnRelease(IOleControlSite *iface)
1009 {
1010 return 1;
1011 }
1012
1013 static HRESULT WINAPI IOleControlSite_fnOnControlInfoChanged(IOleControlSite* This)
1014 {
1015 ok(0, "unexpected call\n");
1016 return E_NOTIMPL;
1017 }
1018
1019 static HRESULT WINAPI IOleControlSite_fnLockInPlaceActive(IOleControlSite* This,
1020 BOOL fLock)
1021 {
1022 ok(0, "unexpected call\n");
1023 return E_NOTIMPL;
1024 }
1025
1026 static HRESULT WINAPI IOleControlSite_fnGetExtendedControl(IOleControlSite* This,
1027 IDispatch **ppDisp)
1028 {
1029 ok(0, "unexpected call\n");
1030 return E_NOTIMPL;
1031 }
1032
1033 static HRESULT WINAPI IOleControlSite_fnTransformCoords(IOleControlSite* This,
1034 POINTL *pPtlHimetric,
1035 POINTF *pPtfContainer,
1036 DWORD dwFlags)
1037 {
1038 ok(0, "unexpected call\n");
1039 return E_NOTIMPL;
1040 }
1041
1042 static HRESULT WINAPI IOleControlSite_fnTranslateAccelerator(IOleControlSite* This, MSG *pMsg,
1043 DWORD grfModifiers)
1044 {
1045 CHECK_EXPECT(ControlSite_TranslateAccelerator);
1046 return hr_site_TranslateAccelerator;
1047 }
1048
1049 static HRESULT WINAPI IOleControlSite_fnOnFocus(IOleControlSite* This, BOOL fGotFocus)
1050 {
1051 CHECK_EXPECT2(OnFocus);
1052 return E_NOTIMPL;
1053 }
1054
1055 static HRESULT WINAPI IOleControlSite_fnShowPropertyFrame(IOleControlSite* This)
1056 {
1057 ok(0, "unexpected call\n");
1058 return E_NOTIMPL;
1059 }
1060
1061 static IOleControlSiteVtbl ControlSiteVtbl = {
1062 IOleControlSite_fnQueryInterface,
1063 IOleControlSite_fnAddRef,
1064 IOleControlSite_fnRelease,
1065 IOleControlSite_fnOnControlInfoChanged,
1066 IOleControlSite_fnLockInPlaceActive,
1067 IOleControlSite_fnGetExtendedControl,
1068 IOleControlSite_fnTransformCoords,
1069 IOleControlSite_fnTranslateAccelerator,
1070 IOleControlSite_fnOnFocus,
1071 IOleControlSite_fnShowPropertyFrame
1072 };
1073
1074 static IOleControlSite ControlSite = { &ControlSiteVtbl };
1075
1076 static HRESULT WINAPI InPlaceUIWindow_QueryInterface(IOleInPlaceFrame *iface,
1077 REFIID riid, void **ppv)
1078 {
1079 ok(0, "unexpected call\n");
1080 return E_NOINTERFACE;
1081 }
1082
1083 static ULONG WINAPI InPlaceUIWindow_AddRef(IOleInPlaceFrame *iface)
1084 {
1085 return 2;
1086 }
1087
1088 static ULONG WINAPI InPlaceUIWindow_Release(IOleInPlaceFrame *iface)
1089 {
1090 return 1;
1091 }
1092
1093 static HRESULT WINAPI InPlaceUIWindow_GetWindow(IOleInPlaceFrame *iface, HWND *phwnd)
1094 {
1095 ok(0, "unexpected call\n");
1096 return E_NOTIMPL;
1097 }
1098
1099 static HRESULT WINAPI InPlaceFrame_GetWindow(IOleInPlaceFrame *iface, HWND *phwnd)
1100 {
1101 CHECK_EXPECT(Frame_GetWindow);
1102 ok(phwnd != NULL, "phwnd == NULL\n");
1103 if(phwnd)
1104 *phwnd = container_hwnd;
1105 return S_OK;
1106 }
1107
1108 static HRESULT WINAPI InPlaceUIWindow_ContextSensitiveHelp(IOleInPlaceFrame *iface, BOOL fEnterMode)
1109 {
1110 ok(0, "unexpected call\n");
1111 return E_NOTIMPL;
1112 }
1113
1114 static HRESULT WINAPI InPlaceUIWindow_GetBorder(IOleInPlaceFrame *iface, LPRECT lprectBorder)
1115 {
1116 ok(0, "unexpected call\n");
1117 return E_NOTIMPL;
1118 }
1119
1120 static HRESULT WINAPI InPlaceUIWindow_RequestBorderSpace(IOleInPlaceFrame *iface,
1121 LPCBORDERWIDTHS pborderwidths)
1122 {
1123 ok(0, "unexpected call\n");
1124 return E_NOTIMPL;
1125 }
1126
1127 static HRESULT WINAPI InPlaceUIWindow_SetBorderSpace(IOleInPlaceFrame *iface,
1128 LPCBORDERWIDTHS pborderwidths)
1129 {
1130 ok(0, "unexpected call\n");
1131 return E_NOTIMPL;
1132 }
1133
1134 static HRESULT WINAPI InPlaceUIWindow_SetActiveObject(IOleInPlaceFrame *iface,
1135 IOleInPlaceActiveObject *pActiveObject, LPCOLESTR pszObjName)
1136 {
1137 CHECK_EXPECT(UIWindow_SetActiveObject);
1138 if(!test_close) {
1139 ok(pActiveObject != NULL, "pActiveObject = NULL\n");
1140 ok(!lstrcmpW(pszObjName, wszItem), "unexpected pszObjName\n");
1141 } else {
1142 ok(!pActiveObject, "pActiveObject != NULL\n");
1143 ok(!pszObjName, "pszObjName != NULL\n");
1144 }
1145 return S_OK;
1146 }
1147
1148 static HRESULT WINAPI InPlaceFrame_SetActiveObject(IOleInPlaceFrame *iface,
1149 IOleInPlaceActiveObject *pActiveObject, LPCOLESTR pszObjName)
1150 {
1151 CHECK_EXPECT(Frame_SetActiveObject);
1152 if(!test_close) {
1153 ok(pActiveObject != NULL, "pActiveObject = NULL\n");
1154 ok(!lstrcmpW(pszObjName, wszItem), "unexpected pszObjName\n");
1155 } else {
1156 ok(!pActiveObject, "pActiveObject != NULL\n");
1157 ok(!pszObjName, "pszObjName != NULL\n");
1158 }
1159 return S_OK;
1160 }
1161
1162 static HRESULT WINAPI InPlaceFrame_InsertMenus(IOleInPlaceFrame *iface, HMENU hmenuShared,
1163 LPOLEMENUGROUPWIDTHS lpMenuWidths)
1164 {
1165 ok(0, "unexpected call\n");
1166 return E_NOTIMPL;
1167 }
1168
1169 static HRESULT WINAPI InPlaceFrame_SetMenu(IOleInPlaceFrame *iface, HMENU hmenuShared,
1170 HOLEMENU holemenu, HWND hwndActiveObject)
1171 {
1172 CHECK_EXPECT(SetMenu);
1173 ok(hmenuShared == NULL, "hmenuShared=%p\n", hmenuShared);
1174 ok(holemenu == NULL, "holemenu=%p\n", holemenu);
1175 ok(hwndActiveObject == shell_embedding_hwnd, "hwndActiveObject=%p, expected %p\n",
1176 hwndActiveObject, shell_embedding_hwnd);
1177 return S_OK;
1178 }
1179
1180 static HRESULT WINAPI InPlaceFrame_RemoveMenus(IOleInPlaceFrame *iface, HMENU hmenuShared)
1181 {
1182 ok(0, "unexpected call\n");
1183 return E_NOTIMPL;
1184 }
1185
1186 static HRESULT WINAPI InPlaceFrame_SetStatusText(IOleInPlaceFrame *iface, LPCOLESTR pszStatusText)
1187 {
1188 CHECK_EXPECT2(SetStatusText);
1189 /* FIXME: Check pszStatusText */
1190 return S_OK;
1191 }
1192
1193 static HRESULT WINAPI InPlaceFrame_EnableModeless(IOleInPlaceFrame *iface, BOOL fEnable)
1194 {
1195 if(fEnable)
1196 CHECK_EXPECT2(EnableModeless_TRUE);
1197 else
1198 CHECK_EXPECT2(EnableModeless_FALSE);
1199 return S_OK;
1200 }
1201
1202 static HRESULT WINAPI InPlaceFrame_TranslateAccelerator(IOleInPlaceFrame *iface, LPMSG lpmsg, WORD wID)
1203 {
1204 ok(0, "unexpected call\n");
1205 return E_NOTIMPL;
1206 }
1207
1208 static const IOleInPlaceFrameVtbl InPlaceUIWindowVtbl = {
1209 InPlaceUIWindow_QueryInterface,
1210 InPlaceUIWindow_AddRef,
1211 InPlaceUIWindow_Release,
1212 InPlaceUIWindow_GetWindow,
1213 InPlaceUIWindow_ContextSensitiveHelp,
1214 InPlaceUIWindow_GetBorder,
1215 InPlaceUIWindow_RequestBorderSpace,
1216 InPlaceUIWindow_SetBorderSpace,
1217 InPlaceUIWindow_SetActiveObject,
1218 };
1219
1220 static IOleInPlaceUIWindow InPlaceUIWindow = { (IOleInPlaceUIWindowVtbl*)&InPlaceUIWindowVtbl };
1221
1222 static const IOleInPlaceFrameVtbl InPlaceFrameVtbl = {
1223 InPlaceUIWindow_QueryInterface,
1224 InPlaceUIWindow_AddRef,
1225 InPlaceUIWindow_Release,
1226 InPlaceFrame_GetWindow,
1227 InPlaceUIWindow_ContextSensitiveHelp,
1228 InPlaceUIWindow_GetBorder,
1229 InPlaceUIWindow_RequestBorderSpace,
1230 InPlaceUIWindow_SetBorderSpace,
1231 InPlaceFrame_SetActiveObject,
1232 InPlaceFrame_InsertMenus,
1233 InPlaceFrame_SetMenu,
1234 InPlaceFrame_RemoveMenus,
1235 InPlaceFrame_SetStatusText,
1236 InPlaceFrame_EnableModeless,
1237 InPlaceFrame_TranslateAccelerator
1238 };
1239
1240 static IOleInPlaceFrame InPlaceFrame = { &InPlaceFrameVtbl };
1241
1242 static HRESULT WINAPI InPlaceSite_QueryInterface(IOleInPlaceSiteEx *iface, REFIID riid, void **ppv)
1243 {
1244 return QueryInterface(riid, ppv);
1245 }
1246
1247 static ULONG WINAPI InPlaceSite_AddRef(IOleInPlaceSiteEx *iface)
1248 {
1249 return 2;
1250 }
1251
1252 static ULONG WINAPI InPlaceSite_Release(IOleInPlaceSiteEx *iface)
1253 {
1254 return 1;
1255 }
1256
1257 static HRESULT WINAPI InPlaceSite_GetWindow(IOleInPlaceSiteEx *iface, HWND *phwnd)
1258 {
1259 CHECK_EXPECT(Site_GetWindow);
1260 ok(phwnd != NULL, "phwnd == NULL\n");
1261 if(phwnd)
1262 *phwnd = container_hwnd;
1263 return S_OK;
1264 }
1265
1266 static HRESULT WINAPI InPlaceSite_ContextSensitiveHelp(IOleInPlaceSiteEx *iface, BOOL fEnterMode)
1267 {
1268 ok(0, "unexpected call\n");
1269 return E_NOTIMPL;
1270 }
1271
1272 static HRESULT WINAPI InPlaceSite_CanInPlaceActivate(IOleInPlaceSiteEx *iface)
1273 {
1274 CHECK_EXPECT(CanInPlaceActivate);
1275 return S_OK;
1276 }
1277
1278 static HRESULT WINAPI InPlaceSite_OnInPlaceActivate(IOleInPlaceSiteEx *iface)
1279 {
1280 CHECK_EXPECT(OnInPlaceActivate);
1281 return S_OK;
1282 }
1283
1284 static HRESULT WINAPI InPlaceSite_OnUIActivate(IOleInPlaceSiteEx *iface)
1285 {
1286 CHECK_EXPECT(OnUIActivate);
1287 return S_OK;
1288 }
1289
1290 static HRESULT WINAPI InPlaceSite_GetWindowContext(IOleInPlaceSiteEx *iface,
1291 IOleInPlaceFrame **ppFrame, IOleInPlaceUIWindow **ppDoc, LPRECT lprcPosRect,
1292 LPRECT lprcClipRect, LPOLEINPLACEFRAMEINFO lpFrameInfo)
1293 {
1294 static const RECT pos_rect = {2,1,1002,901};
1295 static const RECT clip_rect = {10,10,990,890};
1296
1297 CHECK_EXPECT(GetWindowContext);
1298
1299 ok(ppFrame != NULL, "ppFrame = NULL\n");
1300 if(ppFrame)
1301 *ppFrame = &InPlaceFrame;
1302
1303 ok(ppDoc != NULL, "ppDoc = NULL\n");
1304 if(ppDoc)
1305 *ppDoc = &InPlaceUIWindow;
1306
1307 ok(lprcPosRect != NULL, "lprcPosRect = NULL\n");
1308 if(lprcPosRect)
1309 memcpy(lprcPosRect, &pos_rect, sizeof(RECT));
1310
1311 ok(lprcClipRect != NULL, "lprcClipRect = NULL\n");
1312 if(lprcClipRect)
1313 memcpy(lprcClipRect, &clip_rect, sizeof(RECT));
1314
1315 ok(lpFrameInfo != NULL, "lpFrameInfo = NULL\n");
1316 if(lpFrameInfo) {
1317 ok(lpFrameInfo->cb == sizeof(*lpFrameInfo), "lpFrameInfo->cb = %u, expected %u\n", lpFrameInfo->cb, (unsigned)sizeof(*lpFrameInfo));
1318 lpFrameInfo->fMDIApp = FALSE;
1319 lpFrameInfo->hwndFrame = container_hwnd;
1320 lpFrameInfo->haccel = NULL;
1321 lpFrameInfo->cAccelEntries = 0;
1322 }
1323
1324 return S_OK;
1325 }
1326
1327 static HRESULT WINAPI InPlaceSite_Scroll(IOleInPlaceSiteEx *iface, SIZE scrollExtant)
1328 {
1329 ok(0, "unexpected call\n");
1330 return E_NOTIMPL;
1331 }
1332
1333 static HRESULT WINAPI InPlaceSite_OnUIDeactivate(IOleInPlaceSiteEx *iface, BOOL fUndoable)
1334 {
1335 CHECK_EXPECT(OnUIDeactivate);
1336 ok(!fUndoable, "fUndoable should be FALSE\n");
1337 return S_OK;
1338 }
1339
1340 static HRESULT WINAPI InPlaceSite_OnInPlaceDeactivate(IOleInPlaceSiteEx *iface)
1341 {
1342 CHECK_EXPECT(OnInPlaceDeactivate);
1343 return S_OK;
1344 }
1345
1346 static HRESULT WINAPI InPlaceSite_DiscardUndoState(IOleInPlaceSiteEx *iface)
1347 {
1348 ok(0, "unexpected call\n");
1349 return E_NOTIMPL;
1350 }
1351
1352 static HRESULT WINAPI InPlaceSite_DeactivateAndUndo(IOleInPlaceSiteEx *iface)
1353 {
1354 ok(0, "unexpected call\n");
1355 return E_NOTIMPL;
1356 }
1357
1358 static HRESULT WINAPI InPlaceSite_OnPosRectChange(IOleInPlaceSiteEx *iface, LPCRECT lprcPosRect)
1359 {
1360 ok(0, "unexpected call\n");
1361 return E_NOTIMPL;
1362 }
1363
1364 static HRESULT WINAPI InPlaceSite_OnInPlaceActivateEx(IOleInPlaceSiteEx *iface,
1365 BOOL *pNoRedraw, DWORD dwFlags)
1366 {
1367 ok(0, "unexpected call\n");
1368 return E_NOTIMPL;
1369 }
1370
1371 static HRESULT WINAPI InPlaceSite_OnInPlaceDeactivateEx(IOleInPlaceSiteEx *iface,
1372 BOOL fNoRedraw)
1373 {
1374 ok(0, "unexpected call\n");
1375 return E_NOTIMPL;
1376 }
1377
1378 static HRESULT WINAPI InPlaceSite_RequestUIActivate(IOleInPlaceSiteEx *iface)
1379 {
1380 CHECK_EXPECT2(RequestUIActivate);
1381 return S_OK;
1382 }
1383
1384 static const IOleInPlaceSiteExVtbl InPlaceSiteExVtbl = {
1385 InPlaceSite_QueryInterface,
1386 InPlaceSite_AddRef,
1387 InPlaceSite_Release,
1388 InPlaceSite_GetWindow,
1389 InPlaceSite_ContextSensitiveHelp,
1390 InPlaceSite_CanInPlaceActivate,
1391 InPlaceSite_OnInPlaceActivate,
1392 InPlaceSite_OnUIActivate,
1393 InPlaceSite_GetWindowContext,
1394 InPlaceSite_Scroll,
1395 InPlaceSite_OnUIDeactivate,
1396 InPlaceSite_OnInPlaceDeactivate,
1397 InPlaceSite_DiscardUndoState,
1398 InPlaceSite_DeactivateAndUndo,
1399 InPlaceSite_OnPosRectChange,
1400 InPlaceSite_OnInPlaceActivateEx,
1401 InPlaceSite_OnInPlaceDeactivateEx,
1402 InPlaceSite_RequestUIActivate
1403 };
1404
1405 static IOleInPlaceSiteEx InPlaceSite = { &InPlaceSiteExVtbl };
1406
1407 static HRESULT WINAPI DocHostUIHandler_QueryInterface(IDocHostUIHandler2 *iface, REFIID riid, void **ppv)
1408 {
1409 return QueryInterface(riid, ppv);
1410 }
1411
1412 static ULONG WINAPI DocHostUIHandler_AddRef(IDocHostUIHandler2 *iface)
1413 {
1414 return 2;
1415 }
1416
1417 static ULONG WINAPI DocHostUIHandler_Release(IDocHostUIHandler2 *iface)
1418 {
1419 return 1;
1420 }
1421
1422 static HRESULT WINAPI DocHostUIHandler_ShowContextMenu(IDocHostUIHandler2 *iface, DWORD dwID, POINT *ppt,
1423 IUnknown *pcmdtReserved, IDispatch *pdicpReserved)
1424 {
1425 ok(0, "unexpected call %d %p %p %p\n", dwID, ppt, pcmdtReserved, pdicpReserved);
1426 return S_FALSE;
1427 }
1428
1429 static HRESULT WINAPI DocHostUIHandler_GetHostInfo(IDocHostUIHandler2 *iface, DOCHOSTUIINFO *pInfo)
1430 {
1431 CHECK_EXPECT2(GetHostInfo);
1432 ok(pInfo != NULL, "pInfo=NULL\n");
1433 if(pInfo) {
1434 ok(pInfo->cbSize == sizeof(DOCHOSTUIINFO) || broken(!pInfo->cbSize), "pInfo->cbSize=%u\n", pInfo->cbSize);
1435 ok(!pInfo->dwFlags, "pInfo->dwFlags=%08x, expected 0\n", pInfo->dwFlags);
1436 ok(!pInfo->dwDoubleClick, "pInfo->dwDoubleClick=%08x, expected 0\n", pInfo->dwDoubleClick);
1437 ok(!pInfo->pchHostCss, "pInfo->pchHostCss=%p, expected NULL\n", pInfo->pchHostCss);
1438 ok(!pInfo->pchHostNS, "pInfo->pchhostNS=%p, expected NULL\n", pInfo->pchHostNS);
1439 }
1440 return E_FAIL;
1441 }
1442
1443 static HRESULT WINAPI DocHostUIHandler_ShowUI(IDocHostUIHandler2 *iface, DWORD dwID,
1444 IOleInPlaceActiveObject *pActiveObject, IOleCommandTarget *pCommandTarget,
1445 IOleInPlaceFrame *pFrame, IOleInPlaceUIWindow *pDoc)
1446 {
1447 CHECK_EXPECT(ShowUI);
1448 return E_NOTIMPL;
1449 }
1450
1451 static HRESULT WINAPI DocHostUIHandler_HideUI(IDocHostUIHandler2 *iface)
1452 {
1453 CHECK_EXPECT(HideUI);
1454 return E_NOTIMPL;
1455 }
1456
1457 static HRESULT WINAPI DocHostUIHandler_UpdateUI(IDocHostUIHandler2 *iface)
1458 {
1459 CHECK_EXPECT(UpdateUI);
1460 return E_NOTIMPL;
1461 }
1462
1463 static HRESULT WINAPI DocHostUIHandler_EnableModeless(IDocHostUIHandler2 *iface, BOOL fEnable)
1464 {
1465 if(fEnable)
1466 CHECK_EXPECT(DocHost_EnableModeless_TRUE);
1467 else
1468 CHECK_EXPECT(DocHost_EnableModeless_FALSE);
1469
1470 return S_OK;
1471 }
1472
1473 static HRESULT WINAPI DocHostUIHandler_OnDocWindowActivate(IDocHostUIHandler2 *iface, BOOL fActivate)
1474 {
1475 ok(0, "unexpected call\n");
1476 return E_NOTIMPL;
1477 }
1478
1479 static HRESULT WINAPI DocHostUIHandler_OnFrameWindowActivate(IDocHostUIHandler2 *iface, BOOL fActivate)
1480 {
1481 ok(0, "unexpected call\n");
1482 return E_NOTIMPL;
1483 }
1484
1485 static HRESULT WINAPI DocHostUIHandler_ResizeBorder(IDocHostUIHandler2 *iface, LPCRECT prcBorder,
1486 IOleInPlaceUIWindow *pUIWindow, BOOL fRameWindow)
1487 {
1488 ok(0, "unexpected call\n");
1489 return E_NOTIMPL;
1490 }
1491
1492 static HRESULT WINAPI DocHostUIHandler_TranslateAccelerator(IDocHostUIHandler2 *iface, LPMSG lpMsg,
1493 const GUID *pguidCmdGroup, DWORD nCmdID)
1494 {
1495 CHECK_EXPECT(DocHost_TranslateAccelerator);
1496 ok(pguidCmdGroup != NULL, "Got NULL pguidCmdGroup.\n");
1497 if(pguidCmdGroup)
1498 ok(IsEqualGUID(pguidCmdGroup, &CGID_MSHTML), "Unexpected pguidCmdGroup\n");
1499 ok(lpMsg != NULL, "Got NULL lpMsg.\n");
1500 return hr_dochost_TranslateAccelerator;
1501 }
1502
1503 static HRESULT WINAPI DocHostUIHandler_GetOptionKeyPath(IDocHostUIHandler2 *iface,
1504 LPOLESTR *pchKey, DWORD dw)
1505 {
1506 CHECK_EXPECT(GetOptionKeyPath);
1507 ok(pchKey != NULL, "pchKey==NULL\n");
1508 if(pchKey)
1509 ok(*pchKey == NULL, "*pchKey=%p\n", *pchKey);
1510 ok(!dw, "dw=%x\n", dw);
1511 return E_NOTIMPL;
1512 }
1513
1514 static HRESULT WINAPI DocHostUIHandler_GetDropTarget(IDocHostUIHandler2 *iface,
1515 IDropTarget *pDropTarget, IDropTarget **ppDropTarget)
1516 {
1517 CHECK_EXPECT(GetDropTarget);
1518 return E_NOTIMPL;
1519 }
1520
1521 static HRESULT WINAPI DocHostUIHandler_GetExternal(IDocHostUIHandler2 *iface, IDispatch **ppDispatch)
1522 {
1523 ok(0, "unexpected call\n");
1524 return E_NOTIMPL;
1525 }
1526
1527 static HRESULT WINAPI DocHostUIHandler_TranslateUrl(IDocHostUIHandler2 *iface, DWORD dwTranslate,
1528 OLECHAR *pchURLIn, OLECHAR **ppchURLOut)
1529 {
1530 if(is_downloading && !(dwl_flags & DWL_EXPECT_BEFORE_NAVIGATE))
1531 todo_wine CHECK_EXPECT(TranslateUrl);
1532 else
1533 CHECK_EXPECT(TranslateUrl);
1534 return E_NOTIMPL;
1535 }
1536
1537 static HRESULT WINAPI DocHostUIHandler_FilterDataObject(IDocHostUIHandler2 *iface, IDataObject *pDO,
1538 IDataObject **ppPORet)
1539 {
1540 ok(0, "unexpected call\n");
1541 return E_NOTIMPL;
1542 }
1543
1544 static HRESULT WINAPI DocHostUIHandler_GetOverrideKeyPath(IDocHostUIHandler2 *iface,
1545 LPOLESTR *pchKey, DWORD dw)
1546 {
1547 CHECK_EXPECT(GetOverridesKeyPath);
1548 ok(pchKey != NULL, "pchKey==NULL\n");
1549 if(pchKey)
1550 ok(*pchKey == NULL, "*pchKey=%p\n", *pchKey);
1551 ok(!dw, "dw=%x\n", dw);
1552 return E_NOTIMPL;
1553 }
1554
1555 static const IDocHostUIHandler2Vtbl DocHostUIHandlerVtbl = {
1556 DocHostUIHandler_QueryInterface,
1557 DocHostUIHandler_AddRef,
1558 DocHostUIHandler_Release,
1559 DocHostUIHandler_ShowContextMenu,
1560 DocHostUIHandler_GetHostInfo,
1561 DocHostUIHandler_ShowUI,
1562 DocHostUIHandler_HideUI,
1563 DocHostUIHandler_UpdateUI,
1564 DocHostUIHandler_EnableModeless,
1565 DocHostUIHandler_OnDocWindowActivate,
1566 DocHostUIHandler_OnFrameWindowActivate,
1567 DocHostUIHandler_ResizeBorder,
1568 DocHostUIHandler_TranslateAccelerator,
1569 DocHostUIHandler_GetOptionKeyPath,
1570 DocHostUIHandler_GetDropTarget,
1571 DocHostUIHandler_GetExternal,
1572 DocHostUIHandler_TranslateUrl,
1573 DocHostUIHandler_FilterDataObject,
1574 DocHostUIHandler_GetOverrideKeyPath
1575 };
1576
1577 static IDocHostUIHandler2 DocHostUIHandler = { &DocHostUIHandlerVtbl };
1578
1579
1580 static HRESULT WINAPI ServiceProvider_QueryInterface(IServiceProvider *iface, REFIID riid, void **ppv)
1581 {
1582 return QueryInterface(riid, ppv);
1583 }
1584
1585 static ULONG WINAPI ServiceProvider_AddRef(IServiceProvider *iface)
1586 {
1587 return 2;
1588 }
1589
1590 static ULONG WINAPI ServiceProvider_Release(IServiceProvider *iface)
1591 {
1592 return 1;
1593 }
1594
1595 static HRESULT WINAPI ServiceProvider_QueryService(IServiceProvider *iface,
1596 REFGUID guidService, REFIID riid, void **ppv)
1597 {
1598 *ppv = NULL;
1599
1600 if(!winetest_interactive)
1601 return E_NOINTERFACE;
1602
1603 if (IsEqualGUID(&SID_STopLevelBrowser, guidService))
1604 trace("Service SID_STopLevelBrowser\n");
1605 else if (IsEqualGUID(&SID_SEditCommandTarget, guidService))
1606 trace("Service SID_SEditCommandTarget\n");
1607 else if (IsEqualGUID(&IID_ITargetFrame2, guidService))
1608 trace("Service IID_ITargetFrame2\n");
1609 else if (IsEqualGUID(&SID_SInternetSecurityManager, guidService))
1610 trace("Service SID_SInternetSecurityManager\n");
1611 else if (IsEqualGUID(&SID_SOleUndoManager, guidService))
1612 trace("Service SID_SOleUndoManager\n");
1613 else if (IsEqualGUID(&SID_IMimeInfo, guidService))
1614 trace("Service SID_IMimeInfo\n");
1615 else if (IsEqualGUID(&SID_STopWindow, guidService))
1616 trace("Service SID_STopWindow\n");
1617
1618 /* 30D02401-6A81-11D0-8274-00C04FD5AE38 Explorer Bar: Search */
1619 /* D1E7AFEC-6A2E-11D0-8C78-00C04FD918B4 no info */
1620 /* A9227C3C-7F8E-11D0-8CB0-00A0C92DBFE8 no info */
1621 /* 371EA634-DC5C-11D1-BA57-00C04FC2040E one reference to IVersionHost */
1622 /* 3050F429-98B5-11CF-BB82-00AA00BDCE0B IID_IElementBehaviorFactory */
1623 /* 6D12FE80-7911-11CF-9534-0000C05BAE0B SID_DefView */
1624 /* AD7F6C62-F6BD-11D2-959B-006097C553C8 no info */
1625 /* 53A2D5B1-D2FC-11D0-84E0-006097C9987D no info */
1626 /* 3050F312-98B5-11CF-BB82-00AA00BDCE0B HTMLFrameBaseClass */
1627 /* 639447BD-B2D3-44B9-9FB0-510F23CB45E4 no info */
1628 /* 20C46561-8491-11CF-960C-0080C7F4EE85 no info */
1629
1630 else
1631 trace("Service %s not supported\n", debugstr_guid(guidService));
1632
1633 return E_NOINTERFACE;
1634 }
1635
1636
1637 static const IServiceProviderVtbl ServiceProviderVtbl = {
1638 ServiceProvider_QueryInterface,
1639 ServiceProvider_AddRef,
1640 ServiceProvider_Release,
1641 ServiceProvider_QueryService
1642 };
1643
1644 static IServiceProvider ServiceProvider = { &ServiceProviderVtbl };
1645
1646
1647 static HRESULT QueryInterface(REFIID riid, void **ppv)
1648 {
1649 *ppv = NULL;
1650
1651 if(IsEqualGUID(&IID_IUnknown, riid)
1652 || IsEqualGUID(&IID_IOleClientSite, riid))
1653 *ppv = &ClientSite;
1654 else if(IsEqualGUID(&IID_IOleWindow, riid)
1655 || IsEqualGUID(&IID_IOleInPlaceSite, riid)
1656 || IsEqualGUID(&IID_IOleInPlaceSiteEx, riid))
1657 *ppv = &InPlaceSite;
1658 else if(IsEqualGUID(&IID_IDocHostUIHandler, riid)
1659 || IsEqualGUID(&IID_IDocHostUIHandler2, riid))
1660 *ppv = &DocHostUIHandler;
1661 else if(IsEqualGUID(&IID_IDispatch, riid))
1662 *ppv = &Dispatch;
1663 else if(IsEqualGUID(&IID_IServiceProvider, riid))
1664 *ppv = &ServiceProvider;
1665 else if(IsEqualGUID(&IID_IDocHostShowUI, riid))
1666 trace("interface IID_IDocHostShowUI\n");
1667 else if(IsEqualGUID(&IID_IOleControlSite, riid))
1668 *ppv = &ControlSite;
1669 else if(IsEqualGUID(&IID_IOleCommandTarget, riid))
1670 trace("interface IID_IOleCommandTarget\n");
1671
1672 /* B6EA2050-048A-11D1-82B9-00C04FB9942E IAxWinHostWindow */
1673
1674 else
1675 {
1676 /* are there more interfaces, that a host can support? */
1677 trace("%s: interface not supported\n", debugstr_guid(riid));
1678 }
1679
1680 return (*ppv) ? S_OK : E_NOINTERFACE;
1681 }
1682
1683 static LRESULT WINAPI wnd_proc(HWND hwnd, UINT msg, WPARAM wParam, LPARAM lParam)
1684 {
1685 return DefWindowProcW(hwnd, msg, wParam, lParam);
1686 }
1687
1688 static HWND create_container_window(void)
1689 {
1690 static const WCHAR wszWebBrowserContainer[] =
1691 {'W','e','b','B','r','o','w','s','e','r','C','o','n','t','a','i','n','e','r',0};
1692 static WNDCLASSEXW wndclass = {
1693 sizeof(WNDCLASSEXW),
1694 0,
1695 wnd_proc,
1696 0, 0, NULL, NULL, NULL, NULL, NULL,
1697 wszWebBrowserContainer,
1698 NULL
1699 };
1700
1701 RegisterClassExW(&wndclass);
1702 return CreateWindowW(wszWebBrowserContainer, wszWebBrowserContainer,
1703 WS_OVERLAPPEDWINDOW, CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT,
1704 CW_USEDEFAULT, NULL, NULL, NULL, NULL);
1705 }
1706
1707 static void test_DoVerb(IUnknown *unk)
1708 {
1709 IOleObject *oleobj;
1710 RECT rect = {0,0,1000,1000};
1711 HRESULT hres;
1712
1713 hres = IUnknown_QueryInterface(unk, &IID_IOleObject, (void**)&oleobj);
1714 ok(hres == S_OK, "QueryInterface(IID_OleObject) failed: %08x\n", hres);
1715 if(FAILED(hres))
1716 return;
1717
1718 SET_EXPECT(CanInPlaceActivate);
1719 SET_EXPECT(Site_GetWindow);
1720 SET_EXPECT(OnInPlaceActivate);
1721 SET_EXPECT(GetWindowContext);
1722 SET_EXPECT(ShowObject);
1723 SET_EXPECT(GetContainer);
1724 SET_EXPECT(Frame_GetWindow);
1725 SET_EXPECT(OnUIActivate);
1726 SET_EXPECT(Frame_SetActiveObject);
1727 SET_EXPECT(UIWindow_SetActiveObject);
1728 SET_EXPECT(SetMenu);
1729 SET_EXPECT(OnFocus);
1730
1731 hres = IOleObject_DoVerb(oleobj, OLEIVERB_SHOW, NULL, &ClientSite,
1732 0, (HWND)0xdeadbeef, &rect);
1733 ok(hres == S_OK, "DoVerb failed: %08x\n", hres);
1734
1735 CHECK_CALLED(CanInPlaceActivate);
1736 CHECK_CALLED(Site_GetWindow);
1737 CHECK_CALLED(OnInPlaceActivate);
1738 CHECK_CALLED(GetWindowContext);
1739 CHECK_CALLED(ShowObject);
1740 CHECK_CALLED(GetContainer);
1741 CHECK_CALLED(Frame_GetWindow);
1742 CHECK_CALLED(OnUIActivate);
1743 CHECK_CALLED(Frame_SetActiveObject);
1744 CHECK_CALLED(UIWindow_SetActiveObject);
1745 CHECK_CALLED(SetMenu);
1746 todo_wine CHECK_CALLED(OnFocus);
1747
1748 hres = IOleObject_DoVerb(oleobj, OLEIVERB_SHOW, NULL, &ClientSite,
1749 0, (HWND)0xdeadbeef, &rect);
1750 ok(hres == S_OK, "DoVerb failed: %08x\n", hres);
1751
1752 IOleObject_Release(oleobj);
1753 }
1754
1755 static void test_GetMiscStatus(IOleObject *oleobj)
1756 {
1757 DWORD st, i;
1758 HRESULT hres;
1759
1760 for(i=0; i<10; i++) {
1761 st = 0xdeadbeef;
1762 hres = IOleObject_GetMiscStatus(oleobj, i, &st);
1763 ok(hres == S_OK, "GetMiscStatus failed: %08x\n", hres);
1764 ok(st == (OLEMISC_SETCLIENTSITEFIRST|OLEMISC_ACTIVATEWHENVISIBLE|OLEMISC_INSIDEOUT
1765 |OLEMISC_CANTLINKINSIDE|OLEMISC_RECOMPOSEONRESIZE),
1766 "st=%08x, expected OLEMISC_SETCLIENTSITEFIRST|OLEMISC_ACTIVATEWHENVISIBLE|"
1767 "OLEMISC_INSIDEOUT|OLEMISC_CANTLINKINSIDE|OLEMISC_RECOMPOSEONRESIZE)\n", st);
1768 }
1769 }
1770
1771 static void test_SetHostNames(IOleObject *oleobj)
1772 {
1773 HRESULT hres;
1774
1775 static const WCHAR test_appW[] = {'t','e','s','t',' ','a','p','p',0};
1776
1777 hres = IOleObject_SetHostNames(oleobj, test_appW, (void*)0xdeadbeef);
1778 ok(hres == S_OK, "SetHostNames failed: %08x\n", hres);
1779 }
1780
1781 static void test_ClientSite(IUnknown *unk, IOleClientSite *client, BOOL stop_download)
1782 {
1783 IOleObject *oleobj;
1784 IOleInPlaceObject *inplace;
1785 HWND hwnd;
1786 HRESULT hres;
1787
1788 hres = IUnknown_QueryInterface(unk, &IID_IOleObject, (void**)&oleobj);
1789 ok(hres == S_OK, "QueryInterface(IID_OleObject) failed: %08x\n", hres);
1790 if(FAILED(hres))
1791 return;
1792
1793 test_GetMiscStatus(oleobj);
1794 test_SetHostNames(oleobj);
1795
1796 hres = IUnknown_QueryInterface(unk, &IID_IOleInPlaceObject, (void**)&inplace);
1797 ok(hres == S_OK, "QueryInterface(IID_OleInPlaceObject) failed: %08x\n", hres);
1798 if(FAILED(hres)) {
1799 IOleObject_Release(oleobj);
1800 return;
1801 }
1802
1803 hres = IOleInPlaceObject_GetWindow(inplace, &hwnd);
1804 ok(hres == S_OK, "GetWindow failed: %08x\n", hres);
1805 ok((hwnd == NULL) ^ (client == NULL), "unexpected hwnd %p\n", hwnd);
1806
1807 if(client) {
1808 SET_EXPECT(GetContainer);
1809 SET_EXPECT(Site_GetWindow);
1810 SET_EXPECT(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
1811 SET_EXPECT(Invoke_AMBIENT_SILENT);
1812 }else if(stop_download) {
1813 SET_EXPECT(Invoke_DOWNLOADCOMPLETE);
1814 if (use_container_olecmd) SET_EXPECT(Exec_SETDOWNLOADSTATE_0);
1815 SET_EXPECT(Invoke_COMMANDSTATECHANGE);
1816 }
1817
1818 hres = IOleObject_SetClientSite(oleobj, client);
1819 ok(hres == S_OK, "SetClientSite failed: %08x\n", hres);
1820
1821 if(client) {
1822 CHECK_CALLED(GetContainer);
1823 CHECK_CALLED(Site_GetWindow);
1824 CHECK_CALLED(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
1825 CHECK_CALLED(Invoke_AMBIENT_SILENT);
1826 }else if(stop_download) {
1827 todo_wine CHECK_CALLED(Invoke_DOWNLOADCOMPLETE);
1828 if (use_container_olecmd) todo_wine CHECK_CALLED(Exec_SETDOWNLOADSTATE_0);
1829 todo_wine CHECK_CALLED(Invoke_COMMANDSTATECHANGE);
1830 }
1831
1832 hres = IOleInPlaceObject_GetWindow(inplace, &hwnd);
1833 ok(hres == S_OK, "GetWindow failed: %08x\n", hres);
1834 ok((hwnd == NULL) == (client == NULL), "unexpected hwnd %p\n", hwnd);
1835
1836 shell_embedding_hwnd = hwnd;
1837
1838 test_SetHostNames(oleobj);
1839
1840 IOleInPlaceObject_Release(inplace);
1841 IOleObject_Release(oleobj);
1842 }
1843
1844 static void test_ClassInfo(IUnknown *unk)
1845 {
1846 IProvideClassInfo2 *class_info;
1847 GUID guid;
1848 HRESULT hres;
1849
1850 hres = IUnknown_QueryInterface(unk, &IID_IProvideClassInfo2, (void**)&class_info);
1851 ok(hres == S_OK, "QueryInterface(IID_IProvideClassInfo) failed: %08x\n", hres);
1852 if(FAILED(hres))
1853 return;
1854
1855 hres = IProvideClassInfo2_GetGUID(class_info, GUIDKIND_DEFAULT_SOURCE_DISP_IID, &guid);
1856 ok(hres == S_OK, "GetGUID failed: %08x\n", hres);
1857 ok(IsEqualGUID(&DIID_DWebBrowserEvents2, &guid), "wrong guid\n");
1858
1859 hres = IProvideClassInfo2_GetGUID(class_info, 0, &guid);
1860 ok(hres == E_FAIL, "GetGUID failed: %08x, expected E_FAIL\n", hres);
1861 ok(IsEqualGUID(&IID_NULL, &guid), "wrong guid\n");
1862
1863 hres = IProvideClassInfo2_GetGUID(class_info, 2, &guid);
1864 ok(hres == E_FAIL, "GetGUID failed: %08x, expected E_FAIL\n", hres);
1865 ok(IsEqualGUID(&IID_NULL, &guid), "wrong guid\n");
1866
1867 hres = IProvideClassInfo2_GetGUID(class_info, GUIDKIND_DEFAULT_SOURCE_DISP_IID, NULL);
1868 ok(hres == E_POINTER, "GetGUID failed: %08x, expected E_POINTER\n", hres);
1869
1870 hres = IProvideClassInfo2_GetGUID(class_info, 0, NULL);
1871 ok(hres == E_POINTER, "GetGUID failed: %08x, expected E_POINTER\n", hres);
1872
1873 IProvideClassInfo2_Release(class_info);
1874 }
1875
1876 static void test_ie_funcs(IUnknown *unk)
1877 {
1878 IWebBrowser2 *wb;
1879 IDispatch *disp;
1880 VARIANT_BOOL b;
1881 int i;
1882 LONG hwnd;
1883 HRESULT hres;
1884 BSTR sName;
1885
1886 hres = IUnknown_QueryInterface(unk, &IID_IWebBrowser2, (void**)&wb);
1887 ok(hres == S_OK, "Could not get IWebBrowser2 interface: %08x\n", hres);
1888 if(FAILED(hres))
1889 return;
1890
1891 /* HWND */
1892
1893 hwnd = 0xdeadbeef;
1894 hres = IWebBrowser2_get_HWND(wb, &hwnd);
1895 ok(hres == E_FAIL, "get_HWND failed: %08x, expected E_FAIL\n", hres);
1896 ok(hwnd == 0, "unexpected hwnd %x\n", hwnd);
1897
1898 /* MenuBar */
1899
1900 hres = IWebBrowser2_get_MenuBar(wb, &b);
1901 ok(hres == S_OK, "get_MenuBar failed: %08x\n", hres);
1902 ok(b == VARIANT_TRUE, "b=%x\n", b);
1903
1904 SET_EXPECT(Invoke_ONMENUBAR);
1905 hres = IWebBrowser2_put_MenuBar(wb, (exvb = VARIANT_FALSE));
1906 ok(hres == S_OK, "put_MenuBar failed: %08x\n", hres);
1907 CHECK_CALLED(Invoke_ONMENUBAR);
1908
1909 hres = IWebBrowser2_get_MenuBar(wb, &b);
1910 ok(hres == S_OK, "get_MenuBar failed: %08x\n", hres);
1911 ok(b == VARIANT_FALSE, "b=%x\n", b);
1912
1913 SET_EXPECT(Invoke_ONMENUBAR);
1914 hres = IWebBrowser2_put_MenuBar(wb, (exvb = 100));
1915 ok(hres == S_OK, "put_MenuBar failed: %08x\n", hres);
1916 CHECK_CALLED(Invoke_ONMENUBAR);
1917
1918 hres = IWebBrowser2_get_MenuBar(wb, &b);
1919 ok(hres == S_OK, "get_MenuBar failed: %08x\n", hres);
1920 ok(b == VARIANT_TRUE, "b=%x\n", b);
1921
1922 /* AddressBar */
1923
1924 hres = IWebBrowser2_get_AddressBar(wb, &b);
1925 ok(hres == S_OK, "get_AddressBar failed: %08x\n", hres);
1926 ok(b == VARIANT_TRUE, "b=%x\n", b);
1927
1928 SET_EXPECT(Invoke_ONADDRESSBAR);
1929 hres = IWebBrowser2_put_AddressBar(wb, (exvb = VARIANT_FALSE));
1930 ok(hres == S_OK, "put_AddressBar failed: %08x\n", hres);
1931 CHECK_CALLED(Invoke_ONADDRESSBAR);
1932
1933 hres = IWebBrowser2_get_AddressBar(wb, &b);
1934 ok(hres == S_OK, "get_MenuBar failed: %08x\n", hres);
1935 ok(b == VARIANT_FALSE, "b=%x\n", b);
1936
1937 SET_EXPECT(Invoke_ONADDRESSBAR);
1938 hres = IWebBrowser2_put_AddressBar(wb, (exvb = 100));
1939 ok(hres == S_OK, "put_AddressBar failed: %08x\n", hres);
1940 CHECK_CALLED(Invoke_ONADDRESSBAR);
1941
1942 hres = IWebBrowser2_get_AddressBar(wb, &b);
1943 ok(hres == S_OK, "get_AddressBar failed: %08x\n", hres);
1944 ok(b == VARIANT_TRUE, "b=%x\n", b);
1945
1946 SET_EXPECT(Invoke_ONADDRESSBAR);
1947 hres = IWebBrowser2_put_AddressBar(wb, (exvb = VARIANT_TRUE));
1948 ok(hres == S_OK, "put_MenuBar failed: %08x\n", hres);
1949 CHECK_CALLED(Invoke_ONADDRESSBAR);
1950
1951 /* StatusBar */
1952
1953 hres = IWebBrowser2_get_StatusBar(wb, &b);
1954 ok(hres == S_OK, "get_StatusBar failed: %08x\n", hres);
1955 ok(b == VARIANT_TRUE, "b=%x\n", b);
1956
1957 SET_EXPECT(Invoke_ONSTATUSBAR);
1958 hres = IWebBrowser2_put_StatusBar(wb, (exvb = VARIANT_TRUE));
1959 ok(hres == S_OK, "put_StatusBar failed: %08x\n", hres);
1960 CHECK_CALLED(Invoke_ONSTATUSBAR);
1961
1962 hres = IWebBrowser2_get_StatusBar(wb, &b);
1963 ok(hres == S_OK, "get_StatusBar failed: %08x\n", hres);
1964 ok(b == VARIANT_TRUE, "b=%x\n", b);
1965
1966 SET_EXPECT(Invoke_ONSTATUSBAR);
1967 hres = IWebBrowser2_put_StatusBar(wb, (exvb = VARIANT_FALSE));
1968 ok(hres == S_OK, "put_StatusBar failed: %08x\n", hres);
1969 CHECK_CALLED(Invoke_ONSTATUSBAR);
1970
1971 hres = IWebBrowser2_get_StatusBar(wb, &b);
1972 ok(hres == S_OK, "get_StatusBar failed: %08x\n", hres);
1973 ok(b == VARIANT_FALSE, "b=%x\n", b);
1974
1975 SET_EXPECT(Invoke_ONSTATUSBAR);
1976 hres = IWebBrowser2_put_StatusBar(wb, (exvb = 100));
1977 ok(hres == S_OK, "put_StatusBar failed: %08x\n", hres);
1978 CHECK_CALLED(Invoke_ONSTATUSBAR);
1979
1980 hres = IWebBrowser2_get_StatusBar(wb, &b);
1981 ok(hres == S_OK, "get_StatusBar failed: %08x\n", hres);
1982 ok(b == VARIANT_TRUE, "b=%x\n", b);
1983
1984 /* ToolBar */
1985
1986 hres = IWebBrowser2_get_ToolBar(wb, &i);
1987 ok(hres == S_OK, "get_ToolBar failed: %08x\n", hres);
1988 ok(i, "i=%x\n", i);
1989
1990 SET_EXPECT(Invoke_ONTOOLBAR);
1991 hres = IWebBrowser2_put_ToolBar(wb, (exvb = VARIANT_FALSE));
1992 ok(hres == S_OK, "put_ToolBar failed: %08x\n", hres);
1993 CHECK_CALLED(Invoke_ONTOOLBAR);
1994
1995 hres = IWebBrowser2_get_ToolBar(wb, &i);
1996 ok(hres == S_OK, "get_ToolBar failed: %08x\n", hres);
1997 ok(i == VARIANT_FALSE, "b=%x\n", i);
1998
1999 SET_EXPECT(Invoke_ONTOOLBAR);
2000 hres = IWebBrowser2_put_ToolBar(wb, (exvb = 100));
2001 ok(hres == S_OK, "put_ToolBar failed: %08x\n", hres);
2002 CHECK_CALLED(Invoke_ONTOOLBAR);
2003
2004 hres = IWebBrowser2_get_ToolBar(wb, &i);
2005 ok(hres == S_OK, "get_ToolBar failed: %08x\n", hres);
2006 ok(i, "i=%x\n", i);
2007
2008 SET_EXPECT(Invoke_ONTOOLBAR);
2009 hres = IWebBrowser2_put_ToolBar(wb, (exvb = VARIANT_TRUE));
2010 ok(hres == S_OK, "put_ToolBar failed: %08x\n", hres);
2011 CHECK_CALLED(Invoke_ONTOOLBAR);
2012
2013 /* FullScreen */
2014
2015 hres = IWebBrowser2_get_FullScreen(wb, &b);
2016 ok(hres == S_OK, "get_FullScreen failed: %08x\n", hres);
2017 ok(b == VARIANT_FALSE, "b=%x\n", b);
2018
2019 SET_EXPECT(Invoke_ONFULLSCREEN);
2020 hres = IWebBrowser2_put_FullScreen(wb, (exvb = VARIANT_TRUE));
2021 ok(hres == S_OK, "put_FullScreen failed: %08x\n", hres);
2022 CHECK_CALLED(Invoke_ONFULLSCREEN);
2023
2024 hres = IWebBrowser2_get_FullScreen(wb, &b);
2025 ok(hres == S_OK, "get_FullScreen failed: %08x\n", hres);
2026 ok(b == VARIANT_TRUE, "b=%x\n", b);
2027
2028 SET_EXPECT(Invoke_ONFULLSCREEN);
2029 hres = IWebBrowser2_put_FullScreen(wb, (exvb = 100));
2030 ok(hres == S_OK, "put_FullScreen failed: %08x\n", hres);
2031 CHECK_CALLED(Invoke_ONFULLSCREEN);
2032
2033 hres = IWebBrowser2_get_FullScreen(wb, &b);
2034 ok(hres == S_OK, "get_FullScreen failed: %08x\n", hres);
2035 ok(b == VARIANT_TRUE, "b=%x\n", b);
2036
2037 SET_EXPECT(Invoke_ONFULLSCREEN);
2038 hres = IWebBrowser2_put_FullScreen(wb, (exvb = VARIANT_FALSE));
2039 ok(hres == S_OK, "put_FullScreen failed: %08x\n", hres);
2040 CHECK_CALLED(Invoke_ONFULLSCREEN);
2041
2042 /* TheaterMode */
2043
2044 hres = IWebBrowser2_get_TheaterMode(wb, &b);
2045 ok(hres == S_OK, "get_TheaterMode failed: %08x\n", hres);
2046 ok(b == VARIANT_FALSE, "b=%x\n", b);
2047
2048 SET_EXPECT(Invoke_ONTHEATERMODE);
2049 hres = IWebBrowser2_put_TheaterMode(wb, (exvb = VARIANT_TRUE));
2050 ok(hres == S_OK, "put_TheaterMode failed: %08x\n", hres);
2051 CHECK_CALLED(Invoke_ONTHEATERMODE);
2052
2053 hres = IWebBrowser2_get_TheaterMode(wb, &b);
2054 ok(hres == S_OK, "get_TheaterMode failed: %08x\n", hres);
2055 ok(b == VARIANT_TRUE, "b=%x\n", b);
2056
2057 SET_EXPECT(Invoke_ONTHEATERMODE);
2058 hres = IWebBrowser2_put_TheaterMode(wb, (exvb = 100));
2059 ok(hres == S_OK, "put_TheaterMode failed: %08x\n", hres);
2060 CHECK_CALLED(Invoke_ONTHEATERMODE);
2061
2062 hres = IWebBrowser2_get_TheaterMode(wb, &b);
2063 ok(hres == S_OK, "get_TheaterMode failed: %08x\n", hres);
2064 ok(b == VARIANT_TRUE, "b=%x\n", b);
2065
2066 SET_EXPECT(Invoke_ONTHEATERMODE);
2067 hres = IWebBrowser2_put_TheaterMode(wb, (exvb = VARIANT_FALSE));
2068 ok(hres == S_OK, "put_TheaterMode failed: %08x\n", hres);
2069 CHECK_CALLED(Invoke_ONTHEATERMODE);
2070
2071 /* Resizable */
2072
2073 b = 0x100;
2074 hres = IWebBrowser2_get_Resizable(wb, &b);
2075 ok(hres == E_NOTIMPL, "get_Resizable failed: %08x\n", hres);
2076 ok(b == 0x100, "b=%x\n", b);
2077
2078 SET_EXPECT(Invoke_WINDOWSETRESIZABLE);
2079 hres = IWebBrowser2_put_Resizable(wb, (exvb = VARIANT_TRUE));
2080 ok(hres == S_OK, "put_Resizable failed: %08x\n", hres);
2081 CHECK_CALLED(Invoke_WINDOWSETRESIZABLE);
2082
2083 SET_EXPECT(Invoke_WINDOWSETRESIZABLE);
2084 hres = IWebBrowser2_put_Resizable(wb, (exvb = VARIANT_FALSE));
2085 ok(hres == S_OK, "put_Resizable failed: %08x\n", hres);
2086 CHECK_CALLED(Invoke_WINDOWSETRESIZABLE);
2087
2088 hres = IWebBrowser2_get_Resizable(wb, &b);
2089 ok(hres == E_NOTIMPL, "get_Resizable failed: %08x\n", hres);
2090 ok(b == 0x100, "b=%x\n", b);
2091
2092 /* Application */
2093
2094 disp = NULL;
2095 hres = IWebBrowser2_get_Application(wb, &disp);
2096 ok(hres == S_OK, "get_Application failed: %08x\n", hres);
2097 ok(disp == (void*)wb, "disp=%p, expected %p\n", disp, wb);
2098 if(disp)
2099 IDispatch_Release(disp);
2100
2101 hres = IWebBrowser2_get_Application(wb, NULL);
2102 ok(hres == E_POINTER, "get_Application failed: %08x, expected E_POINTER\n", hres);
2103
2104 /* Name */
2105 hres = IWebBrowser2_get_Name(wb, &sName);
2106 ok(hres == S_OK, "getName failed: %08x, expected S_OK\n", hres);
2107 if (is_lang_english())
2108 ok(!strcmp_wa(sName, "Microsoft Web Browser Control"), "got '%s', expected 'Microsoft Web Browser Control'\n", wine_dbgstr_w(sName));
2109 else /* Non-English cannot be blank. */
2110 ok(sName!=NULL, "get_Name return a NULL string.\n");
2111 SysFreeString(sName);
2112
2113 /* Quit */
2114
2115 hres = IWebBrowser2_Quit(wb);
2116 ok(hres == E_FAIL, "Quit failed: %08x, expected E_FAIL\n", hres);
2117
2118 IWebBrowser2_Release(wb);
2119 }
2120
2121 static void test_Silent(IWebBrowser2 *wb, IOleControl *control, BOOL is_clientsite)
2122 {
2123 VARIANT_BOOL b;
2124 HRESULT hres;
2125
2126 b = 100;
2127 hres = IWebBrowser2_get_Silent(wb, &b);
2128 ok(hres == S_OK, "get_Silent failed: %08x\n", hres);
2129 ok(b == VARIANT_FALSE, "b=%x\n", b);
2130
2131 hres = IWebBrowser2_put_Silent(wb, VARIANT_TRUE);
2132 ok(hres == S_OK, "set_Silent failed: %08x\n", hres);
2133
2134 b = 100;
2135 hres = IWebBrowser2_get_Silent(wb, &b);
2136 ok(hres == S_OK, "get_Silent failed: %08x\n", hres);
2137 ok(b == VARIANT_TRUE, "b=%x\n", b);
2138
2139 hres = IWebBrowser2_put_Silent(wb, 100);
2140 ok(hres == S_OK, "set_Silent failed: %08x\n", hres);
2141
2142 b = 100;
2143 hres = IWebBrowser2_get_Silent(wb, &b);
2144 ok(hres == S_OK, "get_Silent failed: %08x\n", hres);
2145 ok(b == VARIANT_TRUE, "b=%x\n", b);
2146
2147 hres = IWebBrowser2_put_Silent(wb, VARIANT_FALSE);
2148 ok(hres == S_OK, "set_Silent failed: %08x\n", hres);
2149
2150 b = 100;
2151 hres = IWebBrowser2_get_Silent(wb, &b);
2152 ok(hres == S_OK, "get_Silent failed: %08x\n", hres);
2153 ok(b == VARIANT_FALSE, "b=%x\n", b);
2154
2155 if(is_clientsite) {
2156 hres = IWebBrowser2_put_Silent(wb, VARIANT_TRUE);
2157 ok(hres == S_OK, "set_Silent failed: %08x\n", hres);
2158
2159 SET_EXPECT(Invoke_AMBIENT_SILENT);
2160 }
2161
2162 hres = IOleControl_OnAmbientPropertyChange(control, DISPID_AMBIENT_SILENT);
2163 ok(hres == S_OK, "OnAmbientPropertyChange failed %08x\n", hres);
2164
2165 if(is_clientsite)
2166 CHECK_CALLED(Invoke_AMBIENT_SILENT);
2167
2168 b = 100;
2169 hres = IWebBrowser2_get_Silent(wb, &b);
2170 ok(hres == S_OK, "get_Silent failed: %08x\n", hres);
2171 ok(b == VARIANT_FALSE, "b=%x\n", b);
2172 }
2173
2174 static void test_Offline(IWebBrowser2 *wb, IOleControl *control, BOOL is_clientsite)
2175 {
2176 VARIANT_BOOL b;
2177 HRESULT hres;
2178
2179 b = 100;
2180 hres = IWebBrowser2_get_Offline(wb, &b);
2181 ok(hres == S_OK, "get_Offline failed: %08x\n", hres);
2182 ok(b == VARIANT_FALSE, "b=%x\n", b);
2183
2184 hres = IWebBrowser2_put_Offline(wb, VARIANT_TRUE);
2185 ok(hres == S_OK, "set_Offline failed: %08x\n", hres);
2186
2187 b = 100;
2188 hres = IWebBrowser2_get_Offline(wb, &b);
2189 ok(hres == S_OK, "get_Offline failed: %08x\n", hres);
2190 ok(b == VARIANT_TRUE, "b=%x\n", b);
2191
2192 hres = IWebBrowser2_put_Offline(wb, 100);
2193 ok(hres == S_OK, "set_Offline failed: %08x\n", hres);
2194
2195 b = 100;
2196 hres = IWebBrowser2_get_Offline(wb, &b);
2197 ok(hres == S_OK, "get_Offline failed: %08x\n", hres);
2198 ok(b == VARIANT_TRUE, "b=%x\n", b);
2199
2200 hres = IWebBrowser2_put_Offline(wb, VARIANT_FALSE);
2201 ok(hres == S_OK, "set_Offline failed: %08x\n", hres);
2202
2203 b = 100;
2204 hres = IWebBrowser2_get_Offline(wb, &b);
2205 ok(hres == S_OK, "get_Offline failed: %08x\n", hres);
2206 ok(b == VARIANT_FALSE, "b=%x\n", b);
2207
2208 if(is_clientsite) {
2209 hres = IWebBrowser2_put_Offline(wb, VARIANT_TRUE);
2210 ok(hres == S_OK, "set_Offline failed: %08x\n", hres);
2211
2212 SET_EXPECT(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
2213 }
2214
2215 hres = IOleControl_OnAmbientPropertyChange(control, DISPID_AMBIENT_OFFLINEIFNOTCONNECTED);
2216 ok(hres == S_OK, "OnAmbientPropertyChange failed %08x\n", hres);
2217
2218 if(is_clientsite)
2219 CHECK_CALLED(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
2220
2221 b = 100;
2222 hres = IWebBrowser2_get_Offline(wb, &b);
2223 ok(hres == S_OK, "get_Offline failed: %08x\n", hres);
2224 ok(b == VARIANT_FALSE, "b=%x\n", b);
2225 }
2226
2227 static void test_ambient_unknown(IWebBrowser2 *wb, IOleControl *control, BOOL is_clientsite)
2228 {
2229 HRESULT hres;
2230
2231 SET_EXPECT(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
2232 SET_EXPECT(Invoke_AMBIENT_SILENT);
2233 SET_EXPECT(Invoke_AMBIENT_USERMODE);
2234 SET_EXPECT(Invoke_AMBIENT_DLCONTROL);
2235 SET_EXPECT(Invoke_AMBIENT_USERAGENT);
2236 SET_EXPECT(Invoke_AMBIENT_PALETTE);
2237
2238 hres = IOleControl_OnAmbientPropertyChange(control, DISPID_UNKNOWN);
2239 ok(hres == S_OK, "OnAmbientPropertyChange failed %08x\n", hres);
2240
2241 CHECK_EXPECT(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
2242 CHECK_EXPECT(Invoke_AMBIENT_SILENT);
2243 CHECK_EXPECT(Invoke_AMBIENT_USERMODE);
2244 CHECK_EXPECT(Invoke_AMBIENT_DLCONTROL);
2245 CHECK_EXPECT(Invoke_AMBIENT_USERAGENT);
2246 CHECK_EXPECT(Invoke_AMBIENT_PALETTE);
2247
2248 CLEAR_CALLED(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
2249 CLEAR_CALLED(Invoke_AMBIENT_SILENT);
2250 CLEAR_CALLED(Invoke_AMBIENT_USERMODE);
2251 CLEAR_CALLED(Invoke_AMBIENT_DLCONTROL);
2252 CLEAR_CALLED(Invoke_AMBIENT_USERAGENT);
2253 CLEAR_CALLED(Invoke_AMBIENT_PALETTE);
2254 }
2255
2256 static void test_wb_funcs(IUnknown *unk, BOOL is_clientsite)
2257 {
2258 IWebBrowser2 *wb;
2259 IOleControl *control;
2260 HRESULT hres;
2261
2262 hres = IUnknown_QueryInterface(unk, &IID_IWebBrowser2, (void**)&wb);
2263 ok(hres == S_OK, "Could not get IWebBrowser2 interface: %08x\n", hres);
2264
2265 hres = IUnknown_QueryInterface(unk, &IID_IOleControl, (void**)&control);
2266 ok(hres == S_OK, "Could not get IOleControl interface: %08x\n", hres);
2267
2268 test_Silent(wb, control, is_clientsite);
2269 test_Offline(wb, control, is_clientsite);
2270 test_ambient_unknown(wb, control, is_clientsite);
2271
2272 IWebBrowser_Release(wb);
2273 IOleControl_Release(control);
2274 }
2275
2276 static void test_GetControlInfo(IUnknown *unk)
2277 {
2278 IOleControl *control;
2279 CONTROLINFO info;
2280 HRESULT hres;
2281
2282 hres = IUnknown_QueryInterface(unk, &IID_IOleControl, (void**)&control);
2283 ok(hres == S_OK, "Could not get IOleControl: %08x\n", hres);
2284 if(FAILED(hres))
2285 return;
2286
2287 hres = IOleControl_GetControlInfo(control, &info);
2288 ok(hres == E_NOTIMPL, "GetControlInfo failed: %08x, expected E_NOTIMPL\n", hres);
2289 hres = IOleControl_GetControlInfo(control, NULL);
2290 ok(hres == E_NOTIMPL, "GetControlInfo failed: %08x, expected E_NOTIMPL\n", hres);
2291
2292 IOleControl_Release(control);
2293 }
2294
2295 static void test_Extent(IUnknown *unk)
2296 {
2297 IOleObject *oleobj;
2298 SIZE size, expected;
2299 HRESULT hres;
2300 DWORD dpi_x;
2301 DWORD dpi_y;
2302 HDC hdc;
2303
2304 /* default aspect ratio is 96dpi / 96dpi */
2305 hdc = GetDC(0);
2306 dpi_x = GetDeviceCaps(hdc, LOGPIXELSX);
2307 dpi_y = GetDeviceCaps(hdc, LOGPIXELSY);
2308 ReleaseDC(0, hdc);
2309 if (dpi_x != 96 || dpi_y != 96)
2310 trace("dpi: %d / %d\n", dpi_y, dpi_y);
2311
2312 hres = IUnknown_QueryInterface(unk, &IID_IOleObject, (void**)&oleobj);
2313 ok(hres == S_OK, "Could not get IOleObkect: %08x\n", hres);
2314 if(FAILED(hres))
2315 return;
2316
2317 size.cx = size.cy = 0xdeadbeef;
2318 hres = IOleObject_GetExtent(oleobj, DVASPECT_CONTENT, &size);
2319 ok(hres == S_OK, "GetExtent failed: %08x\n", hres);
2320 /* Default size is 50x20 pixels, in himetric units */
2321 expected.cx = MulDiv( 50, 2540, dpi_x );
2322 expected.cy = MulDiv( 20, 2540, dpi_y );
2323 ok(size.cx == expected.cx && size.cy == expected.cy, "size = {%d %d} (expected %d %d)\n",
2324 size.cx, size.cy, expected.cx, expected.cy );
2325
2326 size.cx = 800;
2327 size.cy = 700;
2328 hres = IOleObject_SetExtent(oleobj, DVASPECT_CONTENT, &size);
2329 ok(hres == S_OK, "SetExtent failed: %08x\n", hres);
2330
2331 size.cx = size.cy = 0xdeadbeef;
2332 hres = IOleObject_GetExtent(oleobj, DVASPECT_CONTENT, &size);
2333 ok(hres == S_OK, "GetExtent failed: %08x\n", hres);
2334 ok(size.cx == 800 && size.cy == 700, "size = {%d %d}\n", size.cx, size.cy);
2335
2336 size.cx = size.cy = 0xdeadbeef;
2337 hres = IOleObject_GetExtent(oleobj, 0, &size);
2338 ok(hres == S_OK, "GetExtent failed: %08x\n", hres);
2339 ok(size.cx == 800 && size.cy == 700, "size = {%d %d}\n", size.cx, size.cy);
2340
2341 size.cx = 900;
2342 size.cy = 800;
2343 hres = IOleObject_SetExtent(oleobj, 0, &size);
2344 ok(hres == S_OK, "SetExtent failed: %08x\n", hres);
2345
2346 size.cx = size.cy = 0xdeadbeef;
2347 hres = IOleObject_GetExtent(oleobj, 0, &size);
2348 ok(hres == S_OK, "GetExtent failed: %08x\n", hres);
2349 ok(size.cx == 900 && size.cy == 800, "size = {%d %d}\n", size.cx, size.cy);
2350
2351 size.cx = size.cy = 0xdeadbeef;
2352 hres = IOleObject_GetExtent(oleobj, 0xdeadbeef, &size);
2353 ok(hres == S_OK, "GetExtent failed: %08x\n", hres);
2354 ok(size.cx == 900 && size.cy == 800, "size = {%d %d}\n", size.cx, size.cy);
2355
2356 size.cx = 1000;
2357 size.cy = 900;
2358 hres = IOleObject_SetExtent(oleobj, 0xdeadbeef, &size);
2359 ok(hres == S_OK, "SetExtent failed: %08x\n", hres);
2360
2361 size.cx = size.cy = 0xdeadbeef;
2362 hres = IOleObject_GetExtent(oleobj, 0xdeadbeef, &size);
2363 ok(hres == S_OK, "GetExtent failed: %08x\n", hres);
2364 ok(size.cx == 1000 && size.cy == 900, "size = {%d %d}\n", size.cx, size.cy);
2365
2366 size.cx = size.cy = 0xdeadbeef;
2367 hres = IOleObject_GetExtent(oleobj, DVASPECT_CONTENT, &size);
2368 ok(hres == S_OK, "GetExtent failed: %08x\n", hres);
2369 ok(size.cx == 1000 && size.cy == 900, "size = {%d %d}\n", size.cx, size.cy);
2370
2371 IOleObject_Release(oleobj);
2372 }
2373
2374 static void test_ConnectionPoint(IUnknown *unk, BOOL init)
2375 {
2376 IConnectionPointContainer *container;
2377 IConnectionPoint *point;
2378 HRESULT hres;
2379
2380 static DWORD dw = 100;
2381
2382 hres = IUnknown_QueryInterface(unk, &IID_IConnectionPointContainer, (void**)&container);
2383 ok(hres == S_OK, "QueryInterface(IID_IConnectionPointContainer) failed: %08x\n", hres);
2384 if(FAILED(hres))
2385 return;
2386
2387 hres = IConnectionPointContainer_FindConnectionPoint(container, &DIID_DWebBrowserEvents2, &point);
2388 IConnectionPointContainer_Release(container);
2389 ok(hres == S_OK, "FindConnectionPoint failed: %08x\n", hres);
2390 if(FAILED(hres))
2391 return;
2392
2393 if(init) {
2394 hres = IConnectionPoint_Advise(point, (IUnknown*)&WebBrowserEvents2, &dw);
2395 ok(hres == S_OK, "Advise failed: %08x\n", hres);
2396 ok(dw == 1, "dw=%d, expected 1\n", dw);
2397 }else {
2398 hres = IConnectionPoint_Unadvise(point, dw);
2399 ok(hres == S_OK, "Unadvise failed: %08x\n", hres);
2400 }
2401
2402 IConnectionPoint_Release(point);
2403 }
2404
2405 static void test_Navigate2(IUnknown *unk)
2406 {
2407 IWebBrowser2 *webbrowser;
2408 VARIANT url;
2409 HRESULT hres;
2410
2411 hres = IUnknown_QueryInterface(unk, &IID_IWebBrowser2, (void**)&webbrowser);
2412 ok(hres == S_OK, "QueryInterface(IID_IWebBrowser) failed: %08x\n", hres);
2413 if(FAILED(hres))
2414 return;
2415
2416 test_LocationURL(unk, is_first_load ? "" : current_url);
2417 test_ready_state(is_first_load ? READYSTATE_UNINITIALIZED : READYSTATE_COMPLETE);
2418
2419 V_VT(&url) = VT_BSTR;
2420 V_BSTR(&url) = a2bstr("about:blank");
2421 current_url = "about:blank";
2422
2423 if(is_first_load) {
2424 SET_EXPECT(Invoke_AMBIENT_USERMODE);
2425 SET_EXPECT(Invoke_PROPERTYCHANGE);
2426 SET_EXPECT(Invoke_BEFORENAVIGATE2);
2427 SET_EXPECT(Invoke_DOWNLOADBEGIN);
2428 if (use_container_olecmd) SET_EXPECT(Exec_SETDOWNLOADSTATE_1);
2429 SET_EXPECT(EnableModeless_FALSE);
2430 SET_EXPECT(Invoke_STATUSTEXTCHANGE);
2431 SET_EXPECT(SetStatusText);
2432 SET_EXPECT(GetHostInfo);
2433 SET_EXPECT(Invoke_AMBIENT_DLCONTROL);
2434 SET_EXPECT(Invoke_AMBIENT_USERAGENT);
2435 SET_EXPECT(Invoke_AMBIENT_PALETTE);
2436 SET_EXPECT(GetOptionKeyPath);
2437 SET_EXPECT(GetOverridesKeyPath);
2438 if (use_container_olecmd) SET_EXPECT(QueryStatus_SETPROGRESSTEXT);
2439 if (use_container_olecmd) SET_EXPECT(Exec_SETPROGRESSMAX);
2440 if (use_container_olecmd) SET_EXPECT(Exec_SETPROGRESSPOS);
2441 SET_EXPECT(Invoke_SETSECURELOCKICON);
2442 SET_EXPECT(Invoke_FILEDOWNLOAD);
2443 if (use_container_olecmd) SET_EXPECT(Exec_SETDOWNLOADSTATE_0);
2444 SET_EXPECT(Invoke_COMMANDSTATECHANGE);
2445 SET_EXPECT(EnableModeless_TRUE);
2446 if (!use_container_olecmd) SET_EXPECT(Invoke_DOWNLOADCOMPLETE);
2447 }
2448
2449 hres = IWebBrowser2_Navigate2(webbrowser, &url, NULL, NULL, NULL, NULL);
2450 ok(hres == S_OK, "Navigate2 failed: %08x\n", hres);
2451
2452 if(is_first_load) {
2453 CHECK_CALLED(Invoke_AMBIENT_USERMODE);
2454 todo_wine CHECK_CALLED(Invoke_PROPERTYCHANGE);
2455 CHECK_CALLED(Invoke_BEFORENAVIGATE2);
2456 todo_wine CHECK_CALLED(Invoke_DOWNLOADBEGIN);
2457 if (use_container_olecmd) todo_wine CHECK_CALLED(Exec_SETDOWNLOADSTATE_1);
2458 CHECK_CALLED(EnableModeless_FALSE);
2459 CHECK_CALLED(Invoke_STATUSTEXTCHANGE);
2460 CHECK_CALLED(SetStatusText);
2461 CHECK_CALLED(GetHostInfo);
2462 CHECK_CALLED(Invoke_AMBIENT_DLCONTROL);
2463 CHECK_CALLED(Invoke_AMBIENT_USERAGENT);
2464 CHECK_CALLED(Invoke_AMBIENT_PALETTE);
2465 CHECK_CALLED(GetOptionKeyPath);
2466 CHECK_CALLED(GetOverridesKeyPath);
2467 if (use_container_olecmd) todo_wine CHECK_CALLED(QueryStatus_SETPROGRESSTEXT);
2468 if (use_container_olecmd) todo_wine CHECK_CALLED(Exec_SETPROGRESSMAX);
2469 if (use_container_olecmd) todo_wine CHECK_CALLED(Exec_SETPROGRESSPOS);
2470 todo_wine CHECK_CALLED(Invoke_SETSECURELOCKICON);
2471 todo_wine CHECK_CALLED(Invoke_FILEDOWNLOAD);
2472 todo_wine CHECK_CALLED(Invoke_COMMANDSTATECHANGE);
2473 if (use_container_olecmd) todo_wine CHECK_CALLED(Exec_SETDOWNLOADSTATE_0);
2474 CHECK_CALLED(EnableModeless_TRUE);
2475 }
2476
2477 VariantClear(&url);
2478 IWebBrowser2_Release(webbrowser);
2479
2480 test_ready_state(READYSTATE_LOADING);
2481 }
2482
2483 static void test_QueryStatusWB(IWebBrowser2 *webbrowser, BOOL use_custom_target, BOOL has_document)
2484 {
2485 HRESULT hres, success_state;
2486 OLECMDF success_flags;
2487 enum OLECMDF status;
2488
2489 /*
2490 * We can tell the difference between the custom container target and the built-in target
2491 * since the custom target returns OLECMDF_SUPPORTED instead of OLECMDF_ENABLED.
2492 */
2493 if (use_custom_target)
2494 success_flags = OLECMDF_SUPPORTED;
2495 else
2496 success_flags = OLECMDF_ENABLED;
2497
2498 /* When no target is available (no document or custom target) an error is returned */
2499 if (has_document)
2500 success_state = S_OK;
2501 else
2502 success_state = E_UNEXPECTED;
2503
2504 /*
2505 * Test a safe operation that exists as both a high-numbered MSHTML id and an OLECMDID.
2506 * These tests show that QueryStatusWB uses a NULL pguidCmdGroup, since OLECMDID_STOP
2507 * is enabled and IDM_STOP is not.
2508 */
2509 status = 0xdeadbeef;
2510 if (use_custom_target) SET_EXPECT(QueryStatus_STOP);
2511 hres = IWebBrowser2_QueryStatusWB(webbrowser, OLECMDID_STOP, &status);
2512 ok(hres == success_state, "QueryStatusWB failed: %08x %08x\n", hres, success_state);
2513 if (!use_custom_target && has_document)
2514 todo_wine ok((has_document && status == success_flags) || (!has_document && status == 0xdeadbeef),
2515 "OLECMDID_STOP not enabled/supported: %08x %08x\n", status, success_flags);
2516 else
2517 ok((has_document && status == success_flags) || (!has_document && status == 0xdeadbeef),
2518 "OLECMDID_STOP not enabled/supported: %08x %08x\n", status, success_flags);
2519 status = 0xdeadbeef;
2520 if (use_custom_target) SET_EXPECT(QueryStatus_IDM_STOP);
2521 hres = IWebBrowser2_QueryStatusWB(webbrowser, IDM_STOP, &status);
2522 ok(hres == success_state, "QueryStatusWB failed: %08x %08x\n", hres, success_state);
2523 ok((has_document && status == 0) || (!has_document && status == 0xdeadbeef),
2524 "IDM_STOP is enabled/supported: %08x %d\n", status, has_document);
2525 }
2526
2527 static void test_ExecWB(IWebBrowser2 *webbrowser, BOOL use_custom_target, BOOL has_document)
2528 {
2529 HRESULT hres, olecmdid_state, idm_state;
2530
2531 /* When no target is available (no document or custom target) an error is returned */
2532 if (has_document)
2533 {
2534 olecmdid_state = S_OK;
2535 idm_state = OLECMDERR_E_NOTSUPPORTED;
2536 }
2537 else
2538 {
2539 olecmdid_state = E_UNEXPECTED;
2540 idm_state = E_UNEXPECTED;
2541 }
2542
2543 /*
2544 * Test a safe operation that exists as both a high-numbered MSHTML id and an OLECMDID.
2545 * These tests show that QueryStatusWB uses a NULL pguidCmdGroup, since OLECMDID_STOP
2546 * succeeds (S_OK) and IDM_STOP does not (OLECMDERR_E_NOTSUPPORTED).
2547 */
2548 if (use_custom_target)
2549 SET_EXPECT(Exec_STOP);
2550 hres = IWebBrowser2_ExecWB(webbrowser, OLECMDID_STOP, OLECMDEXECOPT_DONTPROMPTUSER, 0, 0);
2551 if (!use_custom_target && has_document)
2552 todo_wine ok(hres == olecmdid_state, "ExecWB failed: %08x %08x\n", hres, olecmdid_state);
2553 else
2554 ok(hres == olecmdid_state, "ExecWB failed: %08x %08x\n", hres, olecmdid_state);
2555 if (use_custom_target)
2556 SET_EXPECT(Exec_IDM_STOP);
2557 hres = IWebBrowser2_ExecWB(webbrowser, IDM_STOP, OLECMDEXECOPT_DONTPROMPTUSER, 0, 0);
2558 ok(hres == idm_state, "ExecWB failed: %08x %08x\n", hres, idm_state);
2559 }
2560
2561 static void test_download(DWORD flags)
2562 {
2563 MSG msg;
2564
2565 is_downloading = TRUE;
2566 dwl_flags = flags;
2567
2568 test_ready_state((flags & DWL_FROM_PUT_HREF) ? READYSTATE_COMPLETE : READYSTATE_LOADING);
2569
2570 if(flags & DWL_EXPECT_BEFORE_NAVIGATE) {
2571 SET_EXPECT(Invoke_PROPERTYCHANGE);
2572 SET_EXPECT(Invoke_BEFORENAVIGATE2);
2573 SET_EXPECT(TranslateUrl);
2574 }
2575 SET_EXPECT(Exec_SETPROGRESSMAX);
2576 SET_EXPECT(Exec_SETPROGRESSPOS);
2577 SET_EXPECT(Exec_SETDOWNLOADSTATE_1);
2578 SET_EXPECT(DocHost_EnableModeless_FALSE);
2579 SET_EXPECT(DocHost_EnableModeless_TRUE);
2580 SET_EXPECT(Invoke_SETSECURELOCKICON);
2581 SET_EXPECT(Invoke_282);
2582 SET_EXPECT(EnableModeless_FALSE);
2583 SET_EXPECT(Invoke_COMMANDSTATECHANGE);
2584 SET_EXPECT(Invoke_STATUSTEXTCHANGE);
2585 SET_EXPECT(SetStatusText);
2586 SET_EXPECT(EnableModeless_TRUE);
2587 if(!is_first_load)
2588 SET_EXPECT(GetHostInfo);
2589 SET_EXPECT(Exec_SETDOWNLOADSTATE_0);
2590 SET_EXPECT(Invoke_TITLECHANGE);
2591 SET_EXPECT(Invoke_NAVIGATECOMPLETE2);
2592 if(is_first_load)
2593 SET_EXPECT(GetDropTarget);
2594 SET_EXPECT(Invoke_PROGRESSCHANGE);
2595 SET_EXPECT(Invoke_DOCUMENTCOMPLETE);
2596
2597 SET_EXPECT(UpdateUI);
2598 SET_EXPECT(Exec_UPDATECOMMANDS);
2599 SET_EXPECT(QueryStatus_STOP);
2600
2601 while(!called_Invoke_DOCUMENTCOMPLETE && GetMessage(&msg, NULL, 0, 0)) {
2602 TranslateMessage(&msg);
2603 DispatchMessage(&msg);
2604 }
2605
2606 if(flags & DWL_EXPECT_BEFORE_NAVIGATE) {
2607 todo_wine CHECK_CALLED(Invoke_PROPERTYCHANGE);
2608 CHECK_CALLED(Invoke_BEFORENAVIGATE2);
2609 CHECK_CALLED(TranslateUrl);
2610 }
2611 todo_wine CHECK_CALLED(Exec_SETPROGRESSMAX);
2612 todo_wine CHECK_CALLED(Exec_SETPROGRESSPOS);
2613 todo_wine CHECK_CALLED(Exec_SETDOWNLOADSTATE_1);
2614 CLEAR_CALLED(DocHost_EnableModeless_FALSE); /* IE 7 */
2615 CLEAR_CALLED(DocHost_EnableModeless_TRUE); /* IE 7 */
2616 todo_wine CHECK_CALLED(Invoke_SETSECURELOCKICON);
2617 CLEAR_CALLED(Invoke_282); /* IE 7 */
2618 if(is_first_load)
2619 todo_wine CHECK_CALLED(EnableModeless_FALSE);
2620 else
2621 CLEAR_CALLED(EnableModeless_FALSE); /* IE 8 */
2622 CLEAR_CALLED(Invoke_COMMANDSTATECHANGE);
2623 todo_wine CHECK_CALLED(Invoke_STATUSTEXTCHANGE);
2624 todo_wine CHECK_CALLED(SetStatusText);
2625 if(is_first_load)
2626 todo_wine CHECK_CALLED(EnableModeless_TRUE);
2627 else
2628 CLEAR_CALLED(EnableModeless_FALSE); /* IE 8 */
2629 if(!is_first_load)
2630 todo_wine CHECK_CALLED(GetHostInfo);
2631 todo_wine CHECK_CALLED(Exec_SETDOWNLOADSTATE_0);
2632 todo_wine CHECK_CALLED(Invoke_TITLECHANGE);
2633 CHECK_CALLED(Invoke_NAVIGATECOMPLETE2);
2634 if(is_first_load)
2635 todo_wine CHECK_CALLED(GetDropTarget);
2636 todo_wine CHECK_CALLED(Invoke_PROGRESSCHANGE);
2637 CHECK_CALLED(Invoke_DOCUMENTCOMPLETE);
2638
2639 is_downloading = FALSE;
2640
2641 test_ready_state(READYSTATE_COMPLETE);
2642
2643 while(!called_Exec_UPDATECOMMANDS && GetMessage(&msg, NULL, 0, 0)) {
2644 TranslateMessage(&msg);
2645 DispatchMessage(&msg);
2646 }
2647
2648 CHECK_CALLED(UpdateUI);
2649 CHECK_CALLED(Exec_UPDATECOMMANDS);
2650 CLEAR_CALLED(QueryStatus_STOP);
2651 }
2652
2653 static void test_olecmd(IUnknown *unk, BOOL loaded)
2654 {
2655 IOleCommandTarget *cmdtrg;
2656 OLECMD cmds[3];
2657 HRESULT hres;
2658
2659 hres = IUnknown_QueryInterface(unk, &IID_IOleCommandTarget, (void**)&cmdtrg);
2660 ok(hres == S_OK, "Could not get IOleCommandTarget iface: %08x\n", hres);
2661 if(FAILED(hres))
2662 return;
2663
2664 cmds[0].cmdID = OLECMDID_SPELL;
2665 cmds[0].cmdf = 0xdeadbeef;
2666 cmds[1].cmdID = OLECMDID_REFRESH;
2667 cmds[1].cmdf = 0xdeadbeef;
2668 hres = IOleCommandTarget_QueryStatus(cmdtrg, NULL, 2, cmds, NULL);
2669 if(loaded) {
2670 ok(hres == S_OK, "QueryStatus failed: %08x\n", hres);
2671 ok(cmds[0].cmdf == OLECMDF_SUPPORTED, "OLECMDID_SPELL cmdf = %x\n", cmds[0].cmdf);
2672 ok(cmds[1].cmdf == (OLECMDF_ENABLED|OLECMDF_SUPPORTED),
2673 "OLECMDID_REFRESH cmdf = %x\n", cmds[1].cmdf);
2674 }else {
2675 ok(hres == 0x80040104, "QueryStatus failed: %08x\n", hres);
2676 ok(cmds[0].cmdf == 0xdeadbeef, "OLECMDID_SPELL cmdf = %x\n", cmds[0].cmdf);
2677 ok(cmds[1].cmdf == 0xdeadbeef, "OLECMDID_REFRESH cmdf = %x\n", cmds[0].cmdf);
2678 }
2679
2680 IOleCommandTarget_Release(cmdtrg);
2681 }
2682
2683 static void test_IServiceProvider(IUnknown *unk)
2684 {
2685 IServiceProvider *servprov = (void*)0xdeadbeef;
2686 HRESULT hres;
2687 IUnknown *ret = NULL;
2688
2689 hres = IUnknown_QueryInterface(unk, &IID_IServiceProvider, (void**)&servprov);
2690 ok(hres == S_OK, "QueryInterface returned %08x, expected S_OK\n", hres);
2691 if(FAILED(hres))
2692 return;
2693
2694 hres = IServiceProvider_QueryService(servprov, &SID_STopLevelBrowser, &IID_IBrowserService2, (LPVOID*)&ret);
2695 ok(hres == E_FAIL, "QueryService returned %08x, expected E_FAIL\n", hres);
2696 ok(ret == NULL, "ret returned %p, expected NULL\n", ret);
2697 if(hres == S_OK)
2698 {
2699 IUnknown_Release(ret);
2700 }
2701
2702 IServiceProvider_Release(servprov);
2703 }
2704
2705 static void test_put_href(IUnknown *unk)
2706 {
2707 IHTMLLocation *location;
2708 IHTMLDocument2 *doc;
2709 IDispatch *doc_disp;
2710 BSTR str;
2711 HRESULT hres;
2712
2713 doc_disp = get_document(unk);
2714
2715 hres = IDispatch_QueryInterface(doc_disp, &IID_IHTMLDocument2, (void**)&doc);
2716 IDispatch_Release(doc_disp);
2717 ok(hres == S_OK, "QueryInterface(IID_IHTMLDocument2 failed: %08x\n", hres);
2718
2719 location = NULL;
2720 hres = IHTMLDocument2_get_location(doc, &location);
2721 IHTMLDocument2_Release(doc);
2722 ok(hres == S_OK, "get_location failed: %08x\n", hres);
2723 ok(location != NULL, "location == NULL\n");
2724
2725 SET_EXPECT(TranslateUrl);
2726 SET_EXPECT(Invoke_BEFORENAVIGATE2);
2727 SET_EXPECT(Invoke_PROPERTYCHANGE);
2728
2729 dwl_flags = DWL_FROM_PUT_HREF;
2730
2731 str = a2bstr("about:test");
2732 current_url = "about:test";
2733 is_first_load = FALSE;
2734 hres = IHTMLLocation_put_href(location, str);
2735
2736 CHECK_CALLED(TranslateUrl);
2737 CHECK_CALLED(Invoke_BEFORENAVIGATE2);
2738 todo_wine CHECK_CALLED(Invoke_PROPERTYCHANGE);
2739
2740 IHTMLLocation_Release(location);
2741 SysFreeString(str);
2742 ok(hres == S_OK, "put_href failed: %08x\n", hres);
2743
2744 test_ready_state(READYSTATE_COMPLETE);
2745 }
2746
2747 static void test_QueryInterface(IUnknown *unk)
2748 {
2749 IQuickActivate *qa = (IQuickActivate*)0xdeadbeef;
2750 IRunnableObject *runnable = (IRunnableObject*)0xdeadbeef;
2751 IPerPropertyBrowsing *propbrowse = (void*)0xdeadbeef;
2752 IOleInPlaceSite *inplace = (void*)0xdeadbeef;
2753 IOleCache *cache = (void*)0xdeadbeef;
2754 IObjectWithSite *site = (void*)0xdeadbeef;
2755 IViewObjectEx *viewex = (void*)0xdeadbeef;
2756 IOleLink *link = (void*)0xdeadbeef;
2757 IMarshal *marshal = (void*)0xdeadbeef;
2758 IStdMarshalInfo *marshalinfo = (void*)0xdeadbeef;
2759 HRESULT hres;
2760
2761 hres = IUnknown_QueryInterface(unk, &IID_IQuickActivate, (void**)&qa);
2762 ok(hres == E_NOINTERFACE, "QueryInterface returned %08x, expected E_NOINTERFACE\n", hres);
2763 ok(qa == NULL, "qa=%p, expected NULL\n", qa);
2764
2765 hres = IUnknown_QueryInterface(unk, &IID_IRunnableObject, (void**)&runnable);
2766 ok(hres == E_NOINTERFACE, "QueryInterface returned %08x, expected E_NOINTERFACE\n", hres);
2767 ok(runnable == NULL, "runnable=%p, expected NULL\n", runnable);
2768
2769 hres = IUnknown_QueryInterface(unk, &IID_IPerPropertyBrowsing, (void**)&propbrowse);
2770 ok(hres == E_NOINTERFACE, "QueryInterface returned %08x, expected E_NOINTERFACE\n", hres);
2771 ok(propbrowse == NULL, "propbrowse=%p, expected NULL\n", propbrowse);
2772
2773 hres = IUnknown_QueryInterface(unk, &IID_IOleCache, (void**)&cache);
2774 ok(hres == E_NOINTERFACE, "QueryInterface returned %08x, expected E_NOINTERFACE\n", hres);
2775 ok(cache == NULL, "cache=%p, expected NULL\n", cache);
2776
2777 hres = IUnknown_QueryInterface(unk, &IID_IOleInPlaceSite, (void**)&inplace);
2778 ok(hres == E_NOINTERFACE, "QueryInterface returned %08x, expected E_NOINTERFACE\n", hres);
2779 ok(inplace == NULL, "inplace=%p, expected NULL\n", inplace);
2780
2781 hres = IUnknown_QueryInterface(unk, &IID_IObjectWithSite, (void**)&site);
2782 ok(hres == E_NOINTERFACE, "QueryInterface returned %08x, expected E_NOINTERFACE\n", hres);
2783 ok(site == NULL, "site=%p, expected NULL\n", site);
2784
2785 hres = IUnknown_QueryInterface(unk, &IID_IViewObjectEx, (void**)&viewex);
2786 ok(hres == E_NOINTERFACE, "QueryInterface returned %08x, expected E_NOINTERFACE\n", hres);
2787 ok(viewex == NULL, "viewex=%p, expected NULL\n", viewex);
2788
2789 hres = IUnknown_QueryInterface(unk, &IID_IOleLink, (void**)&link);
2790 ok(hres == E_NOINTERFACE, "QueryInterface returned %08x, expected E_NOINTERFACE\n", hres);
2791 ok(link == NULL, "link=%p, expected NULL\n", link);
2792
2793 hres = IUnknown_QueryInterface(unk, &IID_IMarshal, (void**)&marshal);
2794 ok(hres == E_NOINTERFACE, "QueryInterface returned %08x, expected E_NOINTERFACE\n", hres);
2795 ok(marshal == NULL, "marshal=%p, expected NULL\n", marshal);
2796
2797 hres = IUnknown_QueryInterface(unk, &IID_IStdMarshalInfo, (void**)&marshalinfo);
2798 ok(hres == E_NOINTERFACE, "QueryInterface returned %08x, expected E_NOINTERFACE\n", hres);
2799 ok(marshalinfo == NULL, "marshalinfo=%p, expected NULL\n", marshalinfo);
2800
2801 }
2802
2803 static void test_UIActivate(IUnknown *unk, BOOL activate)
2804 {
2805 IOleDocumentView *docview;
2806 IDispatch *disp;
2807 HRESULT hres;
2808
2809 disp = get_document(unk);
2810
2811 hres = IDispatch_QueryInterface(disp, &IID_IOleDocumentView, (void**)&docview);
2812 ok(hres == S_OK, "Got 0x%08x\n", hres);
2813 if(SUCCEEDED(hres)) {
2814 if(activate) {
2815 SET_EXPECT(RequestUIActivate);
2816 SET_EXPECT(ShowUI);
2817 SET_EXPECT(HideUI);
2818 SET_EXPECT(OnFocus);
2819 }
2820
2821 hres = IOleDocumentView_UIActivate(docview, activate);
2822 if(activate)
2823 todo_wine ok(hres == S_OK, "Got 0x%08x\n", hres);
2824 else
2825 ok(hres == S_OK, "Got 0x%08x\n", hres);
2826
2827 if(activate) {
2828 todo_wine {
2829 CHECK_CALLED(RequestUIActivate);
2830 CHECK_CALLED(ShowUI);
2831 CHECK_CALLED(HideUI);
2832 CHECK_CALLED(OnFocus);
2833 }
2834 }
2835
2836 IOleDocumentView_Release(docview);
2837 }
2838
2839 IDispatch_Release(disp);
2840 }
2841
2842 static void test_TranslateAccelerator(IUnknown *unk)
2843 {
2844 IOleClientSite *doc_clientsite;
2845 IOleInPlaceActiveObject *pao;
2846 HRESULT hres;
2847 DWORD keycode;
2848 MSG msg_a = {
2849 container_hwnd,
2850 0, 0, 0,
2851 GetTickCount(),
2852 {5, 5}
2853 };
2854
2855 test_Navigate2(unk);
2856
2857 hres = IUnknown_QueryInterface(unk, &IID_IOleInPlaceActiveObject, (void**)&pao);
2858 ok(hres == S_OK, "Got 0x%08x\n", hres);
2859 if(SUCCEEDED(hres)) {
2860 /* One accelerator that should be handled by mshtml */
2861 msg_a.message = WM_KEYDOWN;
2862 msg_a.wParam = VK_F1;
2863 hres = IOleInPlaceActiveObject_TranslateAccelerator(pao, &msg_a);
2864 ok(hres == S_FALSE, "Got 0x%08x (%04x::%02lx)\n", hres, msg_a.message, msg_a.wParam);
2865
2866 /* And one that should not */
2867 msg_a.message = WM_KEYDOWN;
2868 msg_a.wParam = VK_F5;
2869 hres = IOleInPlaceActiveObject_TranslateAccelerator(pao, &msg_a);
2870 ok(hres == S_FALSE, "Got 0x%08x (%04x::%02lx)\n", hres, msg_a.message, msg_a.wParam);
2871
2872 IOleInPlaceActiveObject_Release(pao);
2873 }
2874
2875 test_UIActivate(unk, TRUE);
2876
2877 /* Test again after UIActivate */
2878 hres = IUnknown_QueryInterface(unk, &IID_IOleInPlaceActiveObject, (void**)&pao);
2879 ok(hres == S_OK, "Got 0x%08x\n", hres);
2880 if(SUCCEEDED(hres)) {
2881 /* One accelerator that should be handled by mshtml */
2882 msg_a.message = WM_KEYDOWN;
2883 msg_a.wParam = VK_F1;
2884 SET_EXPECT(DocHost_TranslateAccelerator);
2885 SET_EXPECT(ControlSite_TranslateAccelerator);
2886 hres = IOleInPlaceActiveObject_TranslateAccelerator(pao, &msg_a);
2887 ok(hres == S_FALSE, "Got 0x%08x (%04x::%02lx)\n", hres, msg_a.message, msg_a.wParam);
2888 todo_wine CHECK_CALLED(DocHost_TranslateAccelerator);
2889 todo_wine CHECK_CALLED(ControlSite_TranslateAccelerator);
2890
2891 /* And one that should not */
2892 msg_a.message = WM_KEYDOWN;
2893 msg_a.wParam = VK_F5;
2894 SET_EXPECT(DocHost_TranslateAccelerator);
2895 hres = IOleInPlaceActiveObject_TranslateAccelerator(pao, &msg_a);
2896 todo_wine ok(hres == S_OK, "Got 0x%08x (%04x::%02lx)\n", hres, msg_a.message, msg_a.wParam);
2897 todo_wine CHECK_CALLED(DocHost_TranslateAccelerator);
2898
2899 IOleInPlaceActiveObject_Release(pao);
2900 }
2901
2902 doc_clientsite = get_dochost(unk);
2903 if(doc_clientsite) {
2904 IDocHostUIHandler2 *dochost;
2905 IOleControlSite *doc_controlsite;
2906 IUnknown *unk_test;
2907
2908 hres = IOleClientSite_QueryInterface(doc_clientsite, &IID_IOleInPlaceFrame, (void**)&unk_test);
2909 ok(hres == E_NOINTERFACE, "Got 0x%08x\n", hres);
2910 if(SUCCEEDED(hres)) IUnknown_Release(unk_test);
2911
2912 hres = IOleClientSite_QueryInterface(doc_clientsite, &IID_IDocHostShowUI, (void**)&unk_test);
2913 todo_wine ok(hres == S_OK, "Got 0x%08x\n", hres);
2914 if(SUCCEEDED(hres)) IUnknown_Release(unk_test);
2915
2916 hres = IOleClientSite_QueryInterface(doc_clientsite, &IID_IDocHostUIHandler, (void**)&unk_test);
2917 ok(hres == S_OK, "Got 0x%08x\n", hres);
2918 if(SUCCEEDED(hres)) IUnknown_Release(unk_test);
2919
2920 hres = IOleClientSite_QueryInterface(doc_clientsite, &IID_IDocHostUIHandler2, (void**)&dochost);
2921 ok(hres == S_OK, "Got 0x%08x\n", hres);
2922 if(SUCCEEDED(hres)) {
2923 msg_a.message = WM_KEYDOWN;
2924 hr_dochost_TranslateAccelerator = 0xdeadbeef;
2925 for(keycode = 0; keycode <= 0x100; keycode++) {
2926 msg_a.wParam = keycode;
2927 SET_EXPECT(DocHost_TranslateAccelerator);
2928 hres = IDocHostUIHandler_TranslateAccelerator(dochost, &msg_a, &CGID_MSHTML, 1234);
2929 ok(hres == 0xdeadbeef, "Got 0x%08x\n", hres);
2930 CHECK_CALLED(DocHost_TranslateAccelerator);
2931 }
2932 hr_dochost_TranslateAccelerator = E_NOTIMPL;
2933
2934 SET_EXPECT(DocHost_TranslateAccelerator);
2935 hres = IDocHostUIHandler_TranslateAccelerator(dochost, &msg_a, &CGID_MSHTML, 1234);
2936 ok(hres == E_NOTIMPL, "Got 0x%08x\n", hres);
2937 CHECK_CALLED(DocHost_TranslateAccelerator);
2938
2939 IDocHostUIHandler2_Release(dochost);
2940 }
2941
2942 hres = IOleClientSite_QueryInterface(doc_clientsite, &IID_IOleControlSite, (void**)&doc_controlsite);
2943 ok(hres == S_OK, "Got 0x%08x\n", hres);
2944 if(SUCCEEDED(hres)) {
2945 msg_a.message = WM_KEYDOWN;
2946 hr_site_TranslateAccelerator = 0xdeadbeef;
2947 for(keycode = 0; keycode < 0x100; keycode++) {
2948 msg_a.wParam = keycode;
2949 SET_EXPECT(ControlSite_TranslateAccelerator);
2950 hres = IOleControlSite_TranslateAccelerator(doc_controlsite, &msg_a, 0);
2951 if(keycode == 0x9 || keycode == 0x75)
2952 todo_wine ok(hres == S_OK, "Got 0x%08x (keycode: %04x)\n", hres, keycode);
2953 else
2954 ok(hres == S_FALSE, "Got 0x%08x (keycode: %04x)\n", hres, keycode);
2955
2956 CHECK_CALLED(ControlSite_TranslateAccelerator);
2957 }
2958 msg_a.wParam = VK_LEFT;
2959 SET_EXPECT(ControlSite_TranslateAccelerator);
2960 hres = IOleControlSite_TranslateAccelerator(doc_controlsite, &msg_a, 0);
2961 ok(hres == S_FALSE, "Got 0x%08x (keycode: %04x)\n", hres, keycode);
2962 CHECK_CALLED(ControlSite_TranslateAccelerator);
2963
2964 hr_site_TranslateAccelerator = S_OK;
2965 SET_EXPECT(ControlSite_TranslateAccelerator);
2966 hres = IOleControlSite_TranslateAccelerator(doc_controlsite, &msg_a, 0);
2967 ok(hres == S_OK, "Got 0x%08x (keycode: %04x)\n", hres, keycode);
2968 CHECK_CALLED(ControlSite_TranslateAccelerator);
2969
2970 hr_site_TranslateAccelerator = E_NOTIMPL;
2971 SET_EXPECT(ControlSite_TranslateAccelerator);
2972 hres = IOleControlSite_TranslateAccelerator(doc_controlsite, &msg_a, 0);
2973 ok(hres == S_FALSE, "Got 0x%08x (keycode: %04x)\n", hres, keycode);
2974 CHECK_CALLED(ControlSite_TranslateAccelerator);
2975
2976 IOleControlSite_Release(doc_controlsite);
2977 }
2978
2979 IOleClientSite_Release(doc_clientsite);
2980 }
2981
2982 test_UIActivate(unk, FALSE);
2983 }
2984
2985 static void test_dochost_qs(IUnknown *unk)
2986 {
2987 IOleClientSite *client_site;
2988 IServiceProvider *serv_prov;
2989 IUnknown *service;
2990 HRESULT hres;
2991
2992 client_site = get_dochost(unk);
2993 hres = IOleClientSite_QueryInterface(client_site, &IID_IServiceProvider, (void**)&serv_prov);
2994 IOleClientSite_Release(client_site);
2995 ok(hres == S_OK, "Could not get IServiceProvider iface: %08x\n", hres);
2996
2997 hres = IServiceProvider_QueryService(serv_prov, &IID_IHlinkFrame, &IID_IHlinkFrame, (void**)&service);
2998 ok(hres == S_OK, "QueryService failed: %08x\n", hres);
2999 ok(iface_cmp(service, unk), "service != unk\n");
3000 IUnknown_Release(service);
3001
3002 hres = IServiceProvider_QueryService(serv_prov, &IID_IWebBrowserApp, &IID_IHlinkFrame, (void**)&service);
3003 ok(hres == S_OK, "QueryService failed: %08x\n", hres);
3004 ok(iface_cmp(service, unk), "service != unk\n");
3005 IUnknown_Release(service);
3006
3007 hres = IServiceProvider_QueryService(serv_prov, &IID_IShellBrowser, &IID_IShellBrowser, (void**)&service);
3008 ok(hres == S_OK, "QueryService failed: %08x\n", hres);
3009 IUnknown_Release(service);
3010
3011 hres = IServiceProvider_QueryService(serv_prov, &IID_IShellBrowser, &IID_IBrowserService, (void**)&service);
3012 ok(hres == S_OK, "QueryService failed: %08x\n", hres);
3013 IUnknown_Release(service);
3014
3015 hres = IServiceProvider_QueryService(serv_prov, &IID_IShellBrowser, &IID_IDocObjectService, (void**)&service);
3016 ok(hres == S_OK, "QueryService failed: %08x\n", hres);
3017 IUnknown_Release(service);
3018
3019 IServiceProvider_Release(serv_prov);
3020 }
3021
3022 static void test_Close(IWebBrowser2 *wb, BOOL do_download)
3023 {
3024 IOleObject *oo;
3025 IOleClientSite *ocs;
3026 HRESULT hres;
3027
3028 hres = IWebBrowser2_QueryInterface(wb, &IID_IOleObject, (void**)&oo);
3029 ok(hres == S_OK, "QueryInterface failed: %08x\n", hres);
3030 if(hres != S_OK)
3031 return;
3032
3033 test_close = TRUE;
3034
3035 SET_EXPECT(Frame_SetActiveObject);
3036 SET_EXPECT(UIWindow_SetActiveObject);
3037 SET_EXPECT(OnUIDeactivate);
3038 SET_EXPECT(OnFocus);
3039 SET_EXPECT(OnInPlaceDeactivate);
3040 if(!do_download) {
3041 SET_EXPECT(Invoke_COMMANDSTATECHANGE);
3042 SET_EXPECT(Invoke_DOWNLOADCOMPLETE);
3043 }
3044 hres = IOleObject_Close(oo, OLECLOSE_NOSAVE);
3045 ok(hres == S_OK, "OleObject_Close failed: %x\n", hres);
3046 CHECK_CALLED(Frame_SetActiveObject);
3047 CHECK_CALLED(UIWindow_SetActiveObject);
3048 CHECK_CALLED(OnUIDeactivate);
3049 todo_wine CHECK_CALLED(OnFocus);
3050 CHECK_CALLED(OnInPlaceDeactivate);
3051 if(!do_download) {
3052 todo_wine CHECK_CALLED(Invoke_COMMANDSTATECHANGE);
3053 todo_wine CHECK_CALLED(Invoke_DOWNLOADCOMPLETE);
3054 }
3055
3056 hres = IOleObject_GetClientSite(oo, &ocs);
3057 ok(hres == S_OK, "hres = %x\n", hres);
3058 ok(!ocs, "ocs != NULL\n");
3059
3060 hres = IOleObject_Close(oo, OLECLOSE_NOSAVE);
3061 ok(hres == S_OK, "OleObject_Close failed: %x\n", hres);
3062
3063 test_close = FALSE;
3064 IOleObject_Release(oo);
3065 }
3066
3067 static void test_WebBrowser(BOOL do_download, BOOL do_close)
3068 {
3069 IUnknown *unk = NULL;
3070 ULONG ref;
3071 HRESULT hres;
3072
3073 if (FAILED(create_WebBrowser(&unk)))
3074 return;
3075
3076 is_downloading = FALSE;
3077 is_first_load = TRUE;
3078 use_container_olecmd = TRUE;
3079
3080 hres = IUnknown_QueryInterface(unk, &IID_IWebBrowser2, (void**)&wb);
3081 ok(hres == S_OK, "Could not get IWebBrowser2 iface: %08x\n", hres);
3082
3083 test_QueryStatusWB(wb, FALSE, FALSE);
3084 test_ExecWB(wb, FALSE, FALSE);
3085 test_QueryInterface(unk);
3086 test_ready_state(READYSTATE_UNINITIALIZED);
3087 test_ClassInfo(unk);
3088 test_LocationURL(unk, "");
3089 test_ConnectionPoint(unk, TRUE);
3090 test_ClientSite(unk, &ClientSite, !do_download);
3091 test_Extent(unk);
3092 test_wb_funcs(unk, TRUE);
3093 test_DoVerb(unk);
3094 test_olecmd(unk, FALSE);
3095 test_Navigate2(unk);
3096 test_QueryStatusWB(wb, TRUE, TRUE);
3097 test_ExecWB(wb, TRUE, TRUE);
3098
3099 if(do_download) {
3100 IDispatch *doc, *doc2;
3101
3102 test_download(0);
3103 test_olecmd(unk, TRUE);
3104 doc = get_document(unk);
3105
3106 test_put_href(unk);
3107 test_download(DWL_FROM_PUT_HREF);
3108 doc2 = get_document(unk);
3109 ok(doc == doc2, "doc != doc2\n");
3110 IDispatch_Release(doc2);
3111
3112 test_Navigate2(unk);
3113 test_download(DWL_EXPECT_BEFORE_NAVIGATE);
3114 test_TranslateAccelerator(unk);
3115 doc2 = get_document(unk);
3116 ok(doc == doc2, "doc != doc2\n");
3117 IDispatch_Release(doc2);
3118 IDispatch_Release(doc2);
3119
3120 test_dochost_qs(unk);
3121 }
3122
3123 if(do_close)
3124 test_Close(wb, do_download);
3125 else
3126 test_ClientSite(unk, NULL, !do_download);
3127 test_ie_funcs(unk);
3128 test_GetControlInfo(unk);
3129 test_wb_funcs(unk, FALSE);
3130 test_ConnectionPoint(unk, FALSE);
3131 test_IServiceProvider(unk);
3132
3133 IWebBrowser2_Release(wb);
3134 ref = IUnknown_Release(unk);
3135 ok(ref == 0, "ref=%d, expected 0\n", ref);
3136 }
3137
3138 static void test_WebBrowser_NoContainerOlecmd(void)
3139 {
3140 IUnknown *unk = NULL;
3141 HRESULT hres;
3142 ULONG ref;
3143
3144 is_downloading = FALSE;
3145 is_first_load = TRUE;
3146 use_container_olecmd = FALSE;
3147
3148 /* Setup stage */
3149 if (FAILED(create_WebBrowser(&unk)))
3150 return;
3151 hres = IUnknown_QueryInterface(unk, &IID_IWebBrowser2, (void**)&wb);
3152 ok(hres == S_OK, "QueryInterface(IID_IWebBrowser) failed: %08x\n", hres);
3153 if(FAILED(hres))
3154 return;
3155 test_ConnectionPoint(unk, TRUE);
3156 test_ClientSite(unk, &ClientSite, TRUE);
3157 test_DoVerb(unk);
3158 test_Navigate2(unk);
3159
3160 /* Tests of interest */
3161 test_QueryStatusWB(wb, FALSE, TRUE);
3162 test_ExecWB(wb, FALSE, TRUE);
3163
3164 /* Cleanup stage */
3165 IWebBrowser2_Release(wb);
3166 test_ClientSite(unk, NULL, TRUE);
3167 test_ConnectionPoint(unk, FALSE);
3168 ref = IUnknown_Release(unk);
3169 ok(ref == 0, "ref=%d, expected 0\n", ref);
3170 }
3171
3172 START_TEST(webbrowser)
3173 {
3174 OleInitialize(NULL);
3175
3176 container_hwnd = create_container_window();
3177
3178 trace("Testing WebBrowser (no download)...\n");
3179 test_WebBrowser(FALSE, FALSE);
3180 test_WebBrowser(FALSE, TRUE);
3181 trace("Testing WebBrowser...\n");
3182 test_WebBrowser(TRUE, FALSE);
3183 test_WebBrowser(TRUE, TRUE);
3184 trace("Testing WebBrowser w/o container-based olecmd...\n");
3185 test_WebBrowser_NoContainerOlecmd();
3186
3187 OleUninitialize();
3188 }
Quick hack tree for wine patches julliard doesn't want to commit