?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
shdocvw: Return IHTMLDocument2's IDispatch in get_Document.
[wine/testsucceed.git] / dlls / shdocvw / tests / webbrowser.c
blob15fc1ec0d72430c69bf325f0c1ac453c37654800
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 "shlguid.h"
40 #include "exdispid.h"
41 #include "mimeinfo.h"
42
43 DEFINE_GUID(GUID_NULL,0,0,0,0,0,0,0,0,0,0,0);
44 DEFINE_OLEGUID(CGID_DocHostCmdPriv, 0x000214D4L, 0, 0);
45
46 #define DEFINE_EXPECT(func) \
47 static BOOL expect_ ## func = FALSE, called_ ## func = FALSE
48
49 #define SET_EXPECT(func) \
50 expect_ ## func = TRUE
51
52 #define CHECK_EXPECT2(func) \
53 do { \
54 ok(expect_ ##func, "unexpected call " #func "\n"); \
55 called_ ## func = TRUE; \
56 }while(0)
57
58 #define CHECK_EXPECT(func) \
59 do { \
60 CHECK_EXPECT2(func); \
61 expect_ ## func = FALSE; \
62 }while(0)
63
64 #define CHECK_CALLED(func) \
65 do { \
66 ok(called_ ## func, "expected " #func "\n"); \
67 expect_ ## func = called_ ## func = FALSE; \
68 }while(0)
69
70 #define CHECK_CALLED_BROKEN(func) \
71 do { \
72 ok(called_ ## func || broken(!called_ ## func), "expected " #func "\n"); \
73 expect_ ## func = called_ ## func = FALSE; \
74 }while(0)
75
76 #define CLEAR_CALLED(func) \
77 expect_ ## func = called_ ## func = FALSE
78
79 DEFINE_EXPECT(GetContainer);
80 DEFINE_EXPECT(Site_GetWindow);
81 DEFINE_EXPECT(ShowObject);
82 DEFINE_EXPECT(CanInPlaceActivate);
83 DEFINE_EXPECT(OnInPlaceActivate);
84 DEFINE_EXPECT(OnUIActivate);
85 DEFINE_EXPECT(GetWindowContext);
86 DEFINE_EXPECT(Frame_GetWindow);
87 DEFINE_EXPECT(Frame_SetActiveObject);
88 DEFINE_EXPECT(UIWindow_SetActiveObject);
89 DEFINE_EXPECT(SetMenu);
90 DEFINE_EXPECT(Invoke_AMBIENT_USERMODE);
91 DEFINE_EXPECT(Invoke_AMBIENT_DLCONTROL);
92 DEFINE_EXPECT(Invoke_AMBIENT_USERAGENT);
93 DEFINE_EXPECT(Invoke_AMBIENT_PALETTE);
94 DEFINE_EXPECT(Invoke_AMBIENT_SILENT);
95 DEFINE_EXPECT(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
96 DEFINE_EXPECT(Invoke_STATUSTEXTCHANGE);
97 DEFINE_EXPECT(Invoke_PROPERTYCHANGE);
98 DEFINE_EXPECT(Invoke_DOWNLOADBEGIN);
99 DEFINE_EXPECT(Invoke_BEFORENAVIGATE2);
100 DEFINE_EXPECT(Invoke_SETSECURELOCKICON);
101 DEFINE_EXPECT(Invoke_FILEDOWNLOAD);
102 DEFINE_EXPECT(Invoke_COMMANDSTATECHANGE);
103 DEFINE_EXPECT(Invoke_DOWNLOADCOMPLETE);
104 DEFINE_EXPECT(Invoke_ONMENUBAR);
105 DEFINE_EXPECT(Invoke_ONADDRESSBAR);
106 DEFINE_EXPECT(Invoke_ONSTATUSBAR);
107 DEFINE_EXPECT(Invoke_ONTOOLBAR);
108 DEFINE_EXPECT(Invoke_ONFULLSCREEN);
109 DEFINE_EXPECT(Invoke_ONTHEATERMODE);
110 DEFINE_EXPECT(Invoke_WINDOWSETRESIZABLE);
111 DEFINE_EXPECT(Invoke_TITLECHANGE);
112 DEFINE_EXPECT(Invoke_NAVIGATECOMPLETE2);
113 DEFINE_EXPECT(Invoke_PROGRESSCHANGE);
114 DEFINE_EXPECT(Invoke_DOCUMENTCOMPLETE);
115 DEFINE_EXPECT(Invoke_282);
116 DEFINE_EXPECT(EnableModeless_TRUE);
117 DEFINE_EXPECT(EnableModeless_FALSE);
118 DEFINE_EXPECT(GetHostInfo);
119 DEFINE_EXPECT(GetOptionKeyPath);
120 DEFINE_EXPECT(GetOverridesKeyPath);
121 DEFINE_EXPECT(SetStatusText);
122 DEFINE_EXPECT(UpdateUI);
123 DEFINE_EXPECT(Exec_SETDOWNLOADSTATE_0);
124 DEFINE_EXPECT(Exec_SETDOWNLOADSTATE_1);
125 DEFINE_EXPECT(Exec_SETPROGRESSMAX);
126 DEFINE_EXPECT(Exec_SETPROGRESSPOS);
127 DEFINE_EXPECT(QueryStatus_SETPROGRESSTEXT);
128 DEFINE_EXPECT(QueryStatus_STOP);
129 DEFINE_EXPECT(DocHost_EnableModeless_TRUE);
130 DEFINE_EXPECT(DocHost_EnableModeless_FALSE);
131 DEFINE_EXPECT(GetDropTarget);
132 DEFINE_EXPECT(TranslateUrl);
133
134 static const WCHAR wszItem[] = {'i','t','e','m',0};
135 static const WCHAR emptyW[] = {0};
136
137 static VARIANT_BOOL exvb;
138 static IWebBrowser2 *wb;
139
140 static HWND container_hwnd, shell_embedding_hwnd;
141 static BOOL is_downloading, is_first_load;
142 static const char *current_url;
143
144 #define DWL_EXPECT_BEFORE_NAVIGATE 0x01
145 #define DWL_FROM_PUT_HREF 0x02
146
147 static DWORD dwl_flags;
148
149 static int strcmp_wa(LPCWSTR strw, const char *stra)
150 {
151 CHAR buf[512];
152 WideCharToMultiByte(CP_ACP, 0, strw, -1, buf, sizeof(buf), NULL, NULL);
153 return lstrcmpA(stra, buf);
154 }
155
156 static const char *debugstr_guid(REFIID riid)
157 {
158 static char buf[50];
159
160 sprintf(buf, "{%08X-%04X-%04X-%02X%02X-%02X%02X%02X%02X%02X%02X}",
161 riid->Data1, riid->Data2, riid->Data3, riid->Data4[0],
162 riid->Data4[1], riid->Data4[2], riid->Data4[3], riid->Data4[4],
163 riid->Data4[5], riid->Data4[6], riid->Data4[7]);
164
165 return buf;
166 }
167
168 static BSTR a2bstr(const char *str)
169 {
170 BSTR ret;
171 int len;
172
173 len = MultiByteToWideChar(CP_ACP, 0, str, -1, NULL, 0);
174 ret = SysAllocStringLen(NULL, len);
175 MultiByteToWideChar(CP_ACP, 0, str, -1, ret, len);
176
177 return ret;
178 }
179
180 #define test_LocationURL(a,b) _test_LocationURL(__LINE__,a,b)
181 static void _test_LocationURL(unsigned line, IUnknown *unk, const char *exurl)
182 {
183 IWebBrowser2 *wb;
184 BSTR url = (void*)0xdeadbeef;
185 HRESULT hres;
186
187 hres = IUnknown_QueryInterface(unk, &IID_IWebBrowser2, (void**)&wb);
188 ok(hres == S_OK, "Could not get IWebBrowser2 interface: %08x\n", hres);
189 if(FAILED(hres))
190 return;
191
192 hres = IWebBrowser2_get_LocationURL(wb, &url);
193 ok_(__FILE__,line) (hres == (*exurl ? S_OK : S_FALSE), "get_LocationURL failed: %08x\n", hres);
194 ok_(__FILE__,line) (!strcmp_wa(url, exurl), "unexpected URL: %s\n", wine_dbgstr_w(url));
195
196 SysFreeString(url);
197 IWebBrowser2_Release(wb);
198 }
199
200 #define test_ready_state(ex) _test_ready_state(__LINE__,ex);
201 static void _test_ready_state(unsigned line, READYSTATE exstate)
202 {
203 READYSTATE state;
204 HRESULT hres;
205
206 hres = IWebBrowser2_get_ReadyState(wb, &state);
207 ok_(__FILE__,line)(hres == S_OK, "get_ReadyState failed: %08x\n", hres);
208 ok_(__FILE__,line)(state == exstate, "ReadyState = %d, expected %d\n", state, exstate);
209 }
210
211 static HRESULT QueryInterface(REFIID,void**);
212
213 static HRESULT WINAPI OleCommandTarget_QueryInterface(IOleCommandTarget *iface,
214 REFIID riid, void **ppv)
215 {
216 ok(0, "unexpected call\n");
217 return E_NOINTERFACE;
218 }
219
220 static ULONG WINAPI OleCommandTarget_AddRef(IOleCommandTarget *iface)
221 {
222 return 2;
223 }
224
225 static ULONG WINAPI OleCommandTarget_Release(IOleCommandTarget *iface)
226 {
227 return 1;
228 }
229
230 static HRESULT WINAPI OleCommandTarget_QueryStatus(IOleCommandTarget *iface, const GUID *pguidCmdGroup,
231 ULONG cCmds, OLECMD prgCmds[], OLECMDTEXT *pCmdText)
232 {
233 ok(!pguidCmdGroup, "pguidCmdGroup != MULL\n");
234 ok(cCmds == 1, "cCmds=%d, expected 1\n", cCmds);
235 ok(!pCmdText, "pCmdText != NULL\n");
236
237 switch(prgCmds[0].cmdID) {
238 case OLECMDID_STOP:
239 CHECK_EXPECT2(QueryStatus_STOP);
240 prgCmds[0].cmdf = OLECMDF_SUPPORTED;
241 return S_OK;
242 case OLECMDID_SETPROGRESSTEXT:
243 CHECK_EXPECT(QueryStatus_SETPROGRESSTEXT);
244 prgCmds[0].cmdf = OLECMDF_ENABLED;
245 return S_OK;
246 default:
247 ok(0, "unexpected command %d\n", prgCmds[0].cmdID);
248 }
249
250 return E_FAIL;
251 }
252
253 static HRESULT WINAPI OleCommandTarget_Exec(IOleCommandTarget *iface, const GUID *pguidCmdGroup,
254 DWORD nCmdID, DWORD nCmdexecopt, VARIANT *pvaIn, VARIANT *pvaOut)
255 {
256 if(!pguidCmdGroup) {
257 switch(nCmdID) {
258 case OLECMDID_SETPROGRESSMAX:
259 CHECK_EXPECT2(Exec_SETPROGRESSMAX);
260 ok(nCmdexecopt == OLECMDEXECOPT_DONTPROMPTUSER, "nCmdexecopts=%08x\n", nCmdexecopt);
261 ok(pvaIn != NULL, "pvaIn == NULL\n");
262 if(pvaIn)
263 ok(V_VT(pvaIn) == VT_I4, "V_VT(pvaIn)=%d, expected VT_I4\n", V_VT(pvaIn));
264 ok(pvaOut == NULL, "pvaOut=%p, expected NULL\n", pvaOut);
265 return S_OK;
266 case OLECMDID_SETPROGRESSPOS:
267 CHECK_EXPECT2(Exec_SETPROGRESSPOS);
268 ok(nCmdexecopt == OLECMDEXECOPT_DONTPROMPTUSER, "nCmdexecopts=%08x\n", nCmdexecopt);
269 ok(pvaIn != NULL, "pvaIn == NULL\n");
270 if(pvaIn)
271 ok(V_VT(pvaIn) == VT_I4, "V_VT(pvaIn)=%d, expected VT_I4\n", V_VT(pvaIn));
272 ok(pvaOut == NULL, "pvaOut=%p, expected NULL\n", pvaOut);
273 return S_OK;
274 case OLECMDID_SETDOWNLOADSTATE:
275 if(is_downloading)
276 ok(nCmdexecopt == OLECMDEXECOPT_DONTPROMPTUSER || !nCmdexecopt,
277 "nCmdexecopts=%08x\n", nCmdexecopt);
278 else
279 ok(!nCmdexecopt, "nCmdexecopts=%08x\n", nCmdexecopt);
280 ok(pvaOut == NULL, "pvaOut=%p\n", pvaOut);
281 ok(pvaIn != NULL, "pvaIn == NULL\n");
282 ok(V_VT(pvaIn) == VT_I4, "V_VT(pvaIn)=%d\n", V_VT(pvaIn));
283 switch(V_I4(pvaIn)) {
284 case 0:
285 CHECK_EXPECT2(Exec_SETDOWNLOADSTATE_0);
286 break;
287 case 1:
288 CHECK_EXPECT2(Exec_SETDOWNLOADSTATE_1);
289 break;
290 default:
291 ok(0, "unexpevted V_I4(pvaIn)=%d\n", V_I4(pvaIn));
292 }
293 return S_OK;
294 default:
295 ok(0, "unexpected nsCmdID %d\n", nCmdID);
296 }
297 }else if(IsEqualGUID(&CGID_Explorer, pguidCmdGroup)) {
298 switch(nCmdID) {
299 case 24: /* TODO */
300 case 25: /* IE5 */
301 case 37: /* TODO */
302 case 39: /* TODO */
303 case 66: /* TODO */
304 case 67: /* TODO */
305 case 69: /* TODO */
306 case 101: /* TODO (IE8) */
307 return E_FAIL;
308 default:
309 ok(0, "unexpected nCmdID %d\n", nCmdID);
310 }
311 }else if(IsEqualGUID(&CGID_ShellDocView, pguidCmdGroup)) {
312 switch(nCmdID) {
313 case 105: /* TODO */
314 case 140: /* TODO (Win7) */
315 return E_FAIL;
316 default:
317 ok(0, "unexpected nCmdID %d\n", nCmdID);
318 }
319 }else if(IsEqualGUID(&CGID_DocHostCmdPriv, pguidCmdGroup)) {
320 switch(nCmdID) {
321 case 11: /* TODO */
322 break;
323 default:
324 ok(0, "unexpected nCmdID %d of CGID_DocHostCmdPriv\n", nCmdID);
325 }
326 }else {
327 ok(0, "unexpected pguidCmdGroup %s\n", debugstr_guid(pguidCmdGroup));
328 }
329
330 return E_FAIL;
331 }
332
333 static IOleCommandTargetVtbl OleCommandTargetVtbl = {
334 OleCommandTarget_QueryInterface,
335 OleCommandTarget_AddRef,
336 OleCommandTarget_Release,
337 OleCommandTarget_QueryStatus,
338 OleCommandTarget_Exec
339 };
340
341 static IOleCommandTarget OleCommandTarget = { &OleCommandTargetVtbl };
342
343 static HRESULT WINAPI OleContainer_QueryInterface(IOleContainer *iface, REFIID riid, void **ppv)
344 {
345 if(IsEqualGUID(&IID_ITargetContainer, riid))
346 return E_NOINTERFACE; /* TODO */
347
348 if(IsEqualGUID(&IID_IOleCommandTarget, riid)) {
349 *ppv = &OleCommandTarget;
350 return S_OK;
351 }
352
353 ok(0, "unexpected call\n");
354 return E_NOINTERFACE;
355 }
356
357 static ULONG WINAPI OleContainer_AddRef(IOleContainer *iface)
358 {
359 return 2;
360 }
361
362 static ULONG WINAPI OleContainer_Release(IOleContainer *iface)
363 {
364 return 1;
365 }
366
367 static HRESULT WINAPI OleContainer_ParseDisplayName(IOleContainer *iface, IBindCtx *pbc,
368 LPOLESTR pszDiaplayName, ULONG *pchEaten, IMoniker **ppmkOut)
369 {
370 ok(0, "unexpected call\n");
371 return E_NOTIMPL;
372 }
373
374 static HRESULT WINAPI OleContainer_EnumObjects(IOleContainer *iface, DWORD grfFlags,
375 IEnumUnknown **ppenum)
376 {
377 ok(0, "unexpected call\n");
378 return E_NOTIMPL;
379 }
380
381 static HRESULT WINAPI OleContainer_LockContainer(IOleContainer *iface, BOOL fLock)
382 {
383 ok(0, "unexpected call\n");
384 return E_NOTIMPL;
385 }
386
387 static const IOleContainerVtbl OleContainerVtbl = {
388 OleContainer_QueryInterface,
389 OleContainer_AddRef,
390 OleContainer_Release,
391 OleContainer_ParseDisplayName,
392 OleContainer_EnumObjects,
393 OleContainer_LockContainer
394 };
395
396 static IOleContainer OleContainer = { &OleContainerVtbl };
397
398 static HRESULT WINAPI Dispatch_QueryInterface(IDispatch *iface, REFIID riid, void **ppv)
399 {
400 return QueryInterface(riid, ppv);
401 }
402
403 static ULONG WINAPI Dispatch_AddRef(IDispatch *iface)
404 {
405 return 2;
406 }
407
408 static ULONG WINAPI Dispatch_Release(IDispatch *iface)
409 {
410 return 1;
411 }
412
413 static HRESULT WINAPI Dispatch_GetTypeInfoCount(IDispatch *iface, UINT *pctinfo)
414 {
415 ok(0, "unexpected call\n");
416 return E_NOTIMPL;
417 }
418
419 static HRESULT WINAPI Dispatch_GetTypeInfo(IDispatch *iface, UINT iTInfo, LCID lcid,
420 ITypeInfo **ppTInfo)
421 {
422 ok(0, "unexpected call\n");
423 return E_NOTIMPL;
424 }
425
426 static HRESULT WINAPI Dispatch_GetIDsOfNames(IDispatch *iface, REFIID riid, LPOLESTR *rgszNames,
427 UINT cNames, LCID lcid, DISPID *rgDispId)
428 {
429 ok(0, "unexpected call\n");
430 return E_NOTIMPL;
431 }
432
433 static HRESULT WINAPI Dispatch_Invoke(IDispatch *iface, DISPID dispIdMember, REFIID riid,
434 LCID lcid, WORD wFlags, DISPPARAMS *pDispParams, VARIANT *pVarResult,
435 EXCEPINFO *pExcepInfo, UINT *puArgErr)
436 {
437 ok(IsEqualGUID(&IID_NULL, riid), "riid != IID_NULL\n");
438 ok(pDispParams != NULL, "pDispParams == NULL\n");
439 ok(pExcepInfo == NULL, "pExcepInfo=%p, expected NULL\n", pExcepInfo);
440 ok(V_VT(pVarResult) == VT_EMPTY, "V_VT(pVarResult)=%d\n", V_VT(pVarResult));
441 ok(wFlags == DISPATCH_PROPERTYGET, "wFlags=%08x, expected DISPATCH_PROPERTYGET\n", wFlags);
442 ok(pDispParams->rgvarg == NULL, "pDispParams->rgvarg = %p\n", pDispParams->rgvarg);
443 ok(pDispParams->rgdispidNamedArgs == NULL,
444 "pDispParams->rgdispidNamedArgs = %p\n", pDispParams->rgdispidNamedArgs);
445 ok(pDispParams->cArgs == 0, "pDispParams->cArgs = %d\n", pDispParams->cArgs);
446 ok(pDispParams->cNamedArgs == 0, "pDispParams->cNamedArgs = %d\n", pDispParams->cNamedArgs);
447
448 switch(dispIdMember) {
449 case DISPID_AMBIENT_USERMODE:
450 CHECK_EXPECT2(Invoke_AMBIENT_USERMODE);
451 return E_FAIL;
452 case DISPID_AMBIENT_DLCONTROL:
453 CHECK_EXPECT(Invoke_AMBIENT_DLCONTROL);
454 ok(puArgErr != NULL, "puArgErr=%p\n", puArgErr);
455 return E_FAIL;
456 case DISPID_AMBIENT_USERAGENT:
457 CHECK_EXPECT(Invoke_AMBIENT_USERAGENT);
458 ok(puArgErr != NULL, "puArgErr=%p\n", puArgErr);
459 return E_FAIL;
460 case DISPID_AMBIENT_PALETTE:
461 CHECK_EXPECT(Invoke_AMBIENT_PALETTE);
462 ok(puArgErr != NULL, "puArgErr=%p\n", puArgErr);
463 return E_FAIL;
464 case DISPID_AMBIENT_OFFLINEIFNOTCONNECTED:
465 CHECK_EXPECT(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
466 ok(puArgErr == NULL, "puArgErr=%p\n", puArgErr);
467 V_VT(pVarResult) = VT_BOOL;
468 V_BOOL(pVarResult) = VARIANT_FALSE;
469 return S_OK;
470 case DISPID_AMBIENT_SILENT:
471 CHECK_EXPECT(Invoke_AMBIENT_SILENT);
472 ok(puArgErr == NULL, "puArgErr=%p\n", puArgErr);
473 V_VT(pVarResult) = VT_BOOL;
474 V_BOOL(pVarResult) = VARIANT_FALSE;
475 return S_OK;
476 }
477
478 ok(0, "unexpected dispIdMember %d\n", dispIdMember);
479 return E_NOTIMPL;
480 }
481
482 static IDispatchVtbl DispatchVtbl = {
483 Dispatch_QueryInterface,
484 Dispatch_AddRef,
485 Dispatch_Release,
486 Dispatch_GetTypeInfoCount,
487 Dispatch_GetTypeInfo,
488 Dispatch_GetIDsOfNames,
489 Dispatch_Invoke
490 };
491
492 static IDispatch Dispatch = { &DispatchVtbl };
493
494 static HRESULT WINAPI WebBrowserEvents2_QueryInterface(IDispatch *iface, REFIID riid, void **ppv)
495 {
496 *ppv = NULL;
497
498 if(IsEqualGUID(&DIID_DWebBrowserEvents2, riid)) {
499 *ppv = iface;
500 return S_OK;
501 }
502
503 ok(0, "unexpected riid %s\n", debugstr_guid(riid));
504 return E_NOINTERFACE;
505 }
506
507 #define test_invoke_bool(p,s) _test_invoke_bool(__LINE__,p,s)
508 static void _test_invoke_bool(unsigned line, const DISPPARAMS *params, BOOL strict)
509 {
510 ok_(__FILE__,line) (params->rgvarg != NULL, "rgvarg == NULL\n");
511 ok_(__FILE__,line) (params->cArgs == 1, "cArgs=%d, expected 1\n", params->cArgs);
512 ok_(__FILE__,line) (V_VT(params->rgvarg) == VT_BOOL, "V_VT(arg)=%d\n", V_VT(params->rgvarg));
513 if(strict)
514 ok_(__FILE__,line) (V_BOOL(params->rgvarg) == exvb, "V_VT(arg)=%x, expected %x\n",
515 V_BOOL(params->rgvarg), exvb);
516 else
517 ok_(__FILE__,line) (!V_BOOL(params->rgvarg) == !exvb, "V_VT(arg)=%x, expected %x\n",
518 V_BOOL(params->rgvarg), exvb);
519 }
520
521 static void test_OnBeforeNavigate(const VARIANT *disp, const VARIANT *url, const VARIANT *flags,
522 const VARIANT *frame, const VARIANT *post_data, const VARIANT *headers, const VARIANT *cancel)
523 {
524 ok(V_VT(disp) == VT_DISPATCH, "V_VT(disp)=%d, expected VT_DISPATCH\n", V_VT(disp));
525 ok(V_DISPATCH(disp) != NULL, "V_DISPATCH(disp) == NULL\n");
526 ok(V_DISPATCH(disp) == (IDispatch*)wb, "V_DISPATCH(disp)=%p, wb=%p\n", V_DISPATCH(disp), wb);
527
528 ok(V_VT(url) == (VT_BYREF|VT_VARIANT), "V_VT(url)=%x, expected VT_BYREF|VT_VARIANT\n", V_VT(url));
529 ok(V_VARIANTREF(url) != NULL, "V_VARIANTREF(url) == NULL)\n");
530 if(V_VARIANTREF(url)) {
531 ok(V_VT(V_VARIANTREF(url)) == VT_BSTR, "V_VT(V_VARIANTREF(url))=%d, expected VT_BSTR\n",
532 V_VT(V_VARIANTREF(url)));
533 ok(V_BSTR(V_VARIANTREF(url)) != NULL, "V_BSTR(V_VARIANTREF(url)) == NULL\n");
534 ok(!strcmp_wa(V_BSTR(V_VARIANTREF(url)), current_url), "unexpected url %s, expected %s\n",
535 wine_dbgstr_w(V_BSTR(V_VARIANTREF(url))), current_url);
536 }
537
538 ok(V_VT(flags) == (VT_BYREF|VT_VARIANT), "V_VT(flags)=%x, expected VT_BYREF|VT_VARIANT\n",
539 V_VT(flags));
540 ok(V_VT(flags) == (VT_BYREF|VT_VARIANT), "V_VT(flags)=%x, expected VT_BYREF|VT_VARIANT\n",
541 V_VT(flags));
542 ok(V_VARIANTREF(flags) != NULL, "V_VARIANTREF(flags) == NULL)\n");
543 if(V_VARIANTREF(flags)) {
544 ok(V_VT(V_VARIANTREF(flags)) == VT_I4, "V_VT(V_VARIANTREF(flags))=%d, expected VT_I4\n",
545 V_VT(V_VARIANTREF(flags)));
546 if(is_first_load) {
547 ok(V_I4(V_VARIANTREF(flags)) == 0, "V_I4(V_VARIANTREF(flags)) = %x, expected 0\n",
548 V_I4(V_VARIANTREF(flags)));
549 }else {
550 ok((V_I4(V_VARIANTREF(flags)) & ~0x40) == 0, "V_I4(V_VARIANTREF(flags)) = %x, expected 0x40 or 0\n",
551 V_I4(V_VARIANTREF(flags)));
552 }
553 }
554
555 ok(V_VT(frame) == (VT_BYREF|VT_VARIANT), "V_VT(frame)=%x, expected VT_BYREF|VT_VARIANT\n",
556 V_VT(frame));
557 ok(V_VT(frame) == (VT_BYREF|VT_VARIANT), "V_VT(frame)=%x, expected VT_BYREF|VT_VARIANT\n",
558 V_VT(frame));
559 ok(V_VARIANTREF(frame) != NULL, "V_VARIANTREF(frame) == NULL)\n");
560 if(V_VARIANTREF(frame)) {
561 ok(V_VT(V_VARIANTREF(frame)) == VT_BSTR, "V_VT(V_VARIANTREF(frame))=%d, expected VT_BSTR\n",
562 V_VT(V_VARIANTREF(frame)));
563 ok(V_BSTR(V_VARIANTREF(frame)) == NULL, "V_BSTR(V_VARIANTREF(frame)) = %p, expected NULL\n",
564 V_BSTR(V_VARIANTREF(frame)));
565 }
566
567 ok(V_VT(post_data) == (VT_BYREF|VT_VARIANT), "V_VT(post_data)=%x, expected VT_BYREF|VT_VARIANT\n",
568 V_VT(post_data));
569 ok(V_VT(post_data) == (VT_BYREF|VT_VARIANT), "V_VT(post_data)=%x, expected VT_BYREF|VT_VARIANT\n",
570 V_VT(post_data));
571 ok(V_VARIANTREF(post_data) != NULL, "V_VARIANTREF(post_data) == NULL)\n");
572 if(V_VARIANTREF(post_data)) {
573 ok(V_VT(V_VARIANTREF(post_data)) == (VT_VARIANT|VT_BYREF),
574 "V_VT(V_VARIANTREF(post_data))=%d, expected VT_VARIANT|VT_BYREF\n",
575 V_VT(V_VARIANTREF(post_data)));
576 ok(V_VARIANTREF(V_VARIANTREF(post_data)) != NULL,
577 "V_VARIANTREF(V_VARIANTREF(post_data)) == NULL\n");
578 if(V_VARIANTREF(V_VARIANTREF(post_data))) {
579 ok(V_VT(V_VARIANTREF(V_VARIANTREF(post_data))) == VT_EMPTY,
580 "V_VT(V_VARIANTREF(V_VARIANTREF(post_data))) = %d, expected VT_EMPTY\n",
581 V_VT(V_VARIANTREF(V_VARIANTREF(post_data))));
582
583 if(V_VT(V_VARIANTREF(V_VARIANTREF(post_data))) == (VT_UI1|VT_ARRAY)) {
584 const SAFEARRAY *sa = V_ARRAY(V_VARIANTREF(V_VARIANTREF(post_data)));
585
586 ok(sa->cDims == 1, "sa->cDims = %d, expected 1\n", sa->cDims);
587 ok(sa->fFeatures == 0, "sa->fFeatures = %d, expected 0\n", sa->fFeatures);
588 }
589 }
590 }
591
592 ok(V_VT(headers) == (VT_BYREF|VT_VARIANT), "V_VT(headers)=%x, expected VT_BYREF|VT_VARIANT\n",
593 V_VT(headers));
594 ok(V_VARIANTREF(headers) != NULL, "V_VARIANTREF(headers) == NULL)\n");
595 if(V_VARIANTREF(headers)) {
596 ok(V_VT(V_VARIANTREF(headers)) == VT_BSTR, "V_VT(V_VARIANTREF(headers))=%d, expected VT_BSTR\n",
597 V_VT(V_VARIANTREF(headers)));
598 ok(V_BSTR(V_VARIANTREF(headers)) == NULL, "V_BSTR(V_VARIANTREF(heders)) = %p, expected NULL\n",
599 V_BSTR(V_VARIANTREF(headers)));
600 }
601
602 ok(V_VT(cancel) == (VT_BYREF|VT_BOOL), "V_VT(cancel)=%x, expected VT_BYREF|VT_BOOL\n",
603 V_VT(cancel));
604 ok(V_BOOLREF(cancel) != NULL, "V_BOOLREF(pDispParams->rgvarg[0] == NULL)\n");
605 if(V_BOOLREF(cancel))
606 ok(*V_BOOLREF(cancel) == VARIANT_FALSE, "*V_BOOLREF(calcel) = %x, expected VARIANT_FALSE\n",
607 *V_BOOLREF(cancel));
608 }
609
610 static HRESULT WINAPI WebBrowserEvents2_Invoke(IDispatch *iface, DISPID dispIdMember, REFIID riid,
611 LCID lcid, WORD wFlags, DISPPARAMS *pDispParams, VARIANT *pVarResult,
612 EXCEPINFO *pExcepInfo, UINT *puArgErr)
613 {
614 ok(IsEqualGUID(&IID_NULL, riid), "riid != IID_NULL\n");
615 ok(pDispParams != NULL, "pDispParams == NULL\n");
616 ok(pExcepInfo == NULL, "pExcepInfo=%p, expected NULL\n", pExcepInfo);
617 ok(pVarResult == NULL, "pVarResult=%p\n", pVarResult);
618 ok(wFlags == DISPATCH_METHOD, "wFlags=%08x, expected DISPATCH_METHOD\n", wFlags);
619 ok(pDispParams->rgdispidNamedArgs == NULL,
620 "pDispParams->rgdispidNamedArgs = %p\n", pDispParams->rgdispidNamedArgs);
621 ok(pDispParams->cNamedArgs == 0, "pDispParams->cNamedArgs = %d\n", pDispParams->cNamedArgs);
622
623 switch(dispIdMember) {
624 case DISPID_STATUSTEXTCHANGE:
625 CHECK_EXPECT2(Invoke_STATUSTEXTCHANGE);
626
627 ok(pDispParams->rgvarg != NULL, "rgvarg == NULL\n");
628 ok(pDispParams->cArgs == 1, "cArgs=%d, expected 1\n", pDispParams->cArgs);
629 ok(V_VT(pDispParams->rgvarg) == VT_BSTR, "V_VT(pDispParams->rgvarg)=%d, expected VT_BSTR\n",
630 V_VT(pDispParams->rgvarg));
631 /* TODO: Check text */
632 break;
633
634 case DISPID_PROPERTYCHANGE:
635 CHECK_EXPECT2(Invoke_PROPERTYCHANGE);
636
637 ok(pDispParams->rgvarg != NULL, "rgvarg == NULL\n");
638 ok(pDispParams->cArgs == 1, "cArgs=%d, expected 1\n", pDispParams->cArgs);
639 /* TODO: Check args */
640 break;
641
642 case DISPID_DOWNLOADBEGIN:
643 CHECK_EXPECT(Invoke_DOWNLOADBEGIN);
644
645 ok(pDispParams->rgvarg == NULL, "rgvarg=%p, expected NULL\n", pDispParams->rgvarg);
646 ok(pDispParams->cArgs == 0, "cArgs=%d, expected 0\n", pDispParams->cArgs);
647 test_ready_state(READYSTATE_LOADING);
648 break;
649
650 case DISPID_BEFORENAVIGATE2:
651 CHECK_EXPECT(Invoke_BEFORENAVIGATE2);
652
653 ok(pDispParams->rgvarg != NULL, "rgvarg == NULL\n");
654 ok(pDispParams->cArgs == 7, "cArgs=%d, expected 7\n", pDispParams->cArgs);
655 test_OnBeforeNavigate(pDispParams->rgvarg+6, pDispParams->rgvarg+5, pDispParams->rgvarg+4,
656 pDispParams->rgvarg+3, pDispParams->rgvarg+2, pDispParams->rgvarg+1,
657 pDispParams->rgvarg);
658 test_ready_state((dwl_flags & DWL_FROM_PUT_HREF) ? READYSTATE_COMPLETE : READYSTATE_LOADING);
659 break;
660
661 case DISPID_SETSECURELOCKICON:
662 CHECK_EXPECT2(Invoke_SETSECURELOCKICON);
663
664 ok(pDispParams->rgvarg != NULL, "rgvarg == NULL\n");
665 ok(pDispParams->cArgs == 1, "cArgs=%d, expected 1\n", pDispParams->cArgs);
666 /* TODO: Check args */
667 break;
668
669 case DISPID_FILEDOWNLOAD:
670 CHECK_EXPECT(Invoke_FILEDOWNLOAD);
671
672 ok(pDispParams->rgvarg != NULL, "rgvarg == NULL\n");
673 ok(pDispParams->cArgs == 2, "cArgs=%d, expected 2\n", pDispParams->cArgs);
674 /* TODO: Check args */
675 break;
676
677 case DISPID_COMMANDSTATECHANGE:
678 CHECK_EXPECT2(Invoke_COMMANDSTATECHANGE);
679
680 ok(pDispParams->rgvarg != NULL, "rgvarg == NULL\n");
681 ok(pDispParams->cArgs == 2, "cArgs=%d, expected 2\n", pDispParams->cArgs);
682 /* TODO: Check args */
683 break;
684
685 case DISPID_DOWNLOADCOMPLETE:
686 CHECK_EXPECT(Invoke_DOWNLOADCOMPLETE);
687
688 ok(pDispParams->rgvarg == NULL, "rgvarg=%p, expected NULL\n", pDispParams->rgvarg);
689 ok(pDispParams->cArgs == 0, "cArgs=%d, expected 0\n", pDispParams->cArgs);
690 test_ready_state(READYSTATE_LOADING);
691 break;
692
693 case DISPID_ONMENUBAR:
694 CHECK_EXPECT(Invoke_ONMENUBAR);
695 test_invoke_bool(pDispParams, TRUE);
696 break;
697
698 case DISPID_ONADDRESSBAR:
699 CHECK_EXPECT(Invoke_ONADDRESSBAR);
700 test_invoke_bool(pDispParams, TRUE);
701 break;
702
703 case DISPID_ONSTATUSBAR:
704 CHECK_EXPECT(Invoke_ONSTATUSBAR);
705 test_invoke_bool(pDispParams, TRUE);
706 break;
707
708 case DISPID_ONTOOLBAR:
709 CHECK_EXPECT(Invoke_ONTOOLBAR);
710 test_invoke_bool(pDispParams, FALSE);
711 break;
712
713 case DISPID_ONFULLSCREEN:
714 CHECK_EXPECT(Invoke_ONFULLSCREEN);
715 test_invoke_bool(pDispParams, TRUE);
716 break;
717
718 case DISPID_ONTHEATERMODE:
719 CHECK_EXPECT(Invoke_ONTHEATERMODE);
720 test_invoke_bool(pDispParams, TRUE);
721 break;
722
723 case DISPID_WINDOWSETRESIZABLE:
724 CHECK_EXPECT(Invoke_WINDOWSETRESIZABLE);
725 test_invoke_bool(pDispParams, TRUE);
726 break;
727
728 case DISPID_TITLECHANGE:
729 CHECK_EXPECT2(Invoke_TITLECHANGE);
730 /* FIXME */
731 break;
732
733 case DISPID_NAVIGATECOMPLETE2:
734 CHECK_EXPECT(Invoke_NAVIGATECOMPLETE2);
735 /* FIXME */
736 test_ready_state((dwl_flags & DWL_FROM_PUT_HREF) ? READYSTATE_COMPLETE : READYSTATE_LOADING);
737 break;
738
739 case DISPID_PROGRESSCHANGE:
740 CHECK_EXPECT(Invoke_PROGRESSCHANGE);
741 /* FIXME */
742 break;
743
744 case DISPID_DOCUMENTCOMPLETE:
745 CHECK_EXPECT(Invoke_DOCUMENTCOMPLETE);
746 /* FIXME */
747 test_ready_state(READYSTATE_COMPLETE);
748 break;
749
750 case 282: /* FIXME */
751 CHECK_EXPECT2(Invoke_282);
752 break;
753
754 default:
755 ok(0, "unexpected dispIdMember %d\n", dispIdMember);
756 }
757
758 return S_OK;
759 }
760
761 static IDispatchVtbl WebBrowserEvents2Vtbl = {
762 WebBrowserEvents2_QueryInterface,
763 Dispatch_AddRef,
764 Dispatch_Release,
765 Dispatch_GetTypeInfoCount,
766 Dispatch_GetTypeInfo,
767 Dispatch_GetIDsOfNames,
768 WebBrowserEvents2_Invoke
769 };
770
771 static IDispatch WebBrowserEvents2 = { &WebBrowserEvents2Vtbl };
772
773 static HRESULT WINAPI ClientSite_QueryInterface(IOleClientSite *iface, REFIID riid, void **ppv)
774 {
775 return QueryInterface(riid, ppv);
776 }
777
778 static ULONG WINAPI ClientSite_AddRef(IOleClientSite *iface)
779 {
780 return 2;
781 }
782
783 static ULONG WINAPI ClientSite_Release(IOleClientSite *iface)
784 {
785 return 1;
786 }
787
788 static HRESULT WINAPI ClientSite_SaveObject(IOleClientSite *iface)
789 {
790 ok(0, "unexpected call\n");
791 return E_NOTIMPL;
792 }
793
794 static HRESULT WINAPI ClientSite_GetMoniker(IOleClientSite *iface, DWORD dwAssign, DWORD dwWhichMoniker,
795 IMoniker **ppmon)
796 {
797 ok(0, "unexpected call\n");
798 return E_NOTIMPL;
799 }
800
801 static HRESULT WINAPI ClientSite_GetContainer(IOleClientSite *iface, IOleContainer **ppContainer)
802 {
803 CHECK_EXPECT(GetContainer);
804
805 ok(ppContainer != NULL, "ppContainer == NULL\n");
806 if(ppContainer)
807 *ppContainer = &OleContainer;
808
809 return S_OK;
810 }
811
812 static HRESULT WINAPI ClientSite_ShowObject(IOleClientSite *iface)
813 {
814 CHECK_EXPECT(ShowObject);
815 return S_OK;
816 }
817
818 static HRESULT WINAPI ClientSite_OnShowWindow(IOleClientSite *iface, BOOL fShow)
819 {
820 ok(0, "unexpected call\n");
821 return E_NOTIMPL;
822 }
823
824 static HRESULT WINAPI ClientSite_RequestNewObjectLayout(IOleClientSite *iface)
825 {
826 ok(0, "unexpected call\n");
827 return E_NOTIMPL;
828 }
829
830 static const IOleClientSiteVtbl ClientSiteVtbl = {
831 ClientSite_QueryInterface,
832 ClientSite_AddRef,
833 ClientSite_Release,
834 ClientSite_SaveObject,
835 ClientSite_GetMoniker,
836 ClientSite_GetContainer,
837 ClientSite_ShowObject,
838 ClientSite_OnShowWindow,
839 ClientSite_RequestNewObjectLayout
840 };
841
842 static IOleClientSite ClientSite = { &ClientSiteVtbl };
843
844 static HRESULT WINAPI InPlaceUIWindow_QueryInterface(IOleInPlaceFrame *iface,
845 REFIID riid, void **ppv)
846 {
847 ok(0, "unexpected call\n");
848 return E_NOINTERFACE;
849 }
850
851 static ULONG WINAPI InPlaceUIWindow_AddRef(IOleInPlaceFrame *iface)
852 {
853 return 2;
854 }
855
856 static ULONG WINAPI InPlaceUIWindow_Release(IOleInPlaceFrame *iface)
857 {
858 return 1;
859 }
860
861 static HRESULT WINAPI InPlaceUIWindow_GetWindow(IOleInPlaceFrame *iface, HWND *phwnd)
862 {
863 ok(0, "unexpected call\n");
864 return E_NOTIMPL;
865 }
866
867 static HRESULT WINAPI InPlaceFrame_GetWindow(IOleInPlaceFrame *iface, HWND *phwnd)
868 {
869 CHECK_EXPECT(Frame_GetWindow);
870 ok(phwnd != NULL, "phwnd == NULL\n");
871 if(phwnd)
872 *phwnd = container_hwnd;
873 return S_OK;
874 }
875
876 static HRESULT WINAPI InPlaceUIWindow_ContextSensitiveHelp(IOleInPlaceFrame *iface, BOOL fEnterMode)
877 {
878 ok(0, "unexpected call\n");
879 return E_NOTIMPL;
880 }
881
882 static HRESULT WINAPI InPlaceUIWindow_GetBorder(IOleInPlaceFrame *iface, LPRECT lprectBorder)
883 {
884 ok(0, "unexpected call\n");
885 return E_NOTIMPL;
886 }
887
888 static HRESULT WINAPI InPlaceUIWindow_RequestBorderSpace(IOleInPlaceFrame *iface,
889 LPCBORDERWIDTHS pborderwidths)
890 {
891 ok(0, "unexpected call\n");
892 return E_NOTIMPL;
893 }
894
895 static HRESULT WINAPI InPlaceUIWindow_SetBorderSpace(IOleInPlaceFrame *iface,
896 LPCBORDERWIDTHS pborderwidths)
897 {
898 ok(0, "unexpected call\n");
899 return E_NOTIMPL;
900 }
901
902 static HRESULT WINAPI InPlaceUIWindow_SetActiveObject(IOleInPlaceFrame *iface,
903 IOleInPlaceActiveObject *pActiveObject, LPCOLESTR pszObjName)
904 {
905 CHECK_EXPECT(UIWindow_SetActiveObject);
906 ok(pActiveObject != NULL, "pActiveObject = NULL\n");
907 ok(!lstrcmpW(pszObjName, wszItem), "unexpected pszObjName\n");
908 return S_OK;
909 }
910
911 static HRESULT WINAPI InPlaceFrame_SetActiveObject(IOleInPlaceFrame *iface,
912 IOleInPlaceActiveObject *pActiveObject, LPCOLESTR pszObjName)
913 {
914 CHECK_EXPECT(Frame_SetActiveObject);
915 ok(pActiveObject != NULL, "pActiveObject = NULL\n");
916 ok(!lstrcmpW(pszObjName, wszItem), "unexpected pszObjName\n");
917 return S_OK;
918 }
919
920 static HRESULT WINAPI InPlaceFrame_InsertMenus(IOleInPlaceFrame *iface, HMENU hmenuShared,
921 LPOLEMENUGROUPWIDTHS lpMenuWidths)
922 {
923 ok(0, "unexpected call\n");
924 return E_NOTIMPL;
925 }
926
927 static HRESULT WINAPI InPlaceFrame_SetMenu(IOleInPlaceFrame *iface, HMENU hmenuShared,
928 HOLEMENU holemenu, HWND hwndActiveObject)
929 {
930 CHECK_EXPECT(SetMenu);
931 ok(hmenuShared == NULL, "hmenuShared=%p\n", hmenuShared);
932 ok(holemenu == NULL, "holemenu=%p\n", holemenu);
933 ok(hwndActiveObject == shell_embedding_hwnd, "hwndActiveObject=%p, expected %p\n",
934 hwndActiveObject, shell_embedding_hwnd);
935 return S_OK;
936 }
937
938 static HRESULT WINAPI InPlaceFrame_RemoveMenus(IOleInPlaceFrame *iface, HMENU hmenuShared)
939 {
940 ok(0, "unexpected call\n");
941 return E_NOTIMPL;
942 }
943
944 static HRESULT WINAPI InPlaceFrame_SetStatusText(IOleInPlaceFrame *iface, LPCOLESTR pszStatusText)
945 {
946 CHECK_EXPECT2(SetStatusText);
947 /* FIXME: Check pszStatusText */
948 return S_OK;
949 }
950
951 static HRESULT WINAPI InPlaceFrame_EnableModeless(IOleInPlaceFrame *iface, BOOL fEnable)
952 {
953 if(fEnable)
954 CHECK_EXPECT2(EnableModeless_TRUE);
955 else
956 CHECK_EXPECT2(EnableModeless_FALSE);
957 return S_OK;
958 }
959
960 static HRESULT WINAPI InPlaceFrame_TranslateAccelerator(IOleInPlaceFrame *iface, LPMSG lpmsg, WORD wID)
961 {
962 ok(0, "unexpected call\n");
963 return E_NOTIMPL;
964 }
965
966 static const IOleInPlaceFrameVtbl InPlaceUIWindowVtbl = {
967 InPlaceUIWindow_QueryInterface,
968 InPlaceUIWindow_AddRef,
969 InPlaceUIWindow_Release,
970 InPlaceUIWindow_GetWindow,
971 InPlaceUIWindow_ContextSensitiveHelp,
972 InPlaceUIWindow_GetBorder,
973 InPlaceUIWindow_RequestBorderSpace,
974 InPlaceUIWindow_SetBorderSpace,
975 InPlaceUIWindow_SetActiveObject,
976 };
977
978 static IOleInPlaceUIWindow InPlaceUIWindow = { (IOleInPlaceUIWindowVtbl*)&InPlaceUIWindowVtbl };
979
980 static const IOleInPlaceFrameVtbl InPlaceFrameVtbl = {
981 InPlaceUIWindow_QueryInterface,
982 InPlaceUIWindow_AddRef,
983 InPlaceUIWindow_Release,
984 InPlaceFrame_GetWindow,
985 InPlaceUIWindow_ContextSensitiveHelp,
986 InPlaceUIWindow_GetBorder,
987 InPlaceUIWindow_RequestBorderSpace,
988 InPlaceUIWindow_SetBorderSpace,
989 InPlaceFrame_SetActiveObject,
990 InPlaceFrame_InsertMenus,
991 InPlaceFrame_SetMenu,
992 InPlaceFrame_RemoveMenus,
993 InPlaceFrame_SetStatusText,
994 InPlaceFrame_EnableModeless,
995 InPlaceFrame_TranslateAccelerator
996 };
997
998 static IOleInPlaceFrame InPlaceFrame = { &InPlaceFrameVtbl };
999
1000 static HRESULT WINAPI InPlaceSite_QueryInterface(IOleInPlaceSiteEx *iface, REFIID riid, void **ppv)
1001 {
1002 return QueryInterface(riid, ppv);
1003 }
1004
1005 static ULONG WINAPI InPlaceSite_AddRef(IOleInPlaceSiteEx *iface)
1006 {
1007 return 2;
1008 }
1009
1010 static ULONG WINAPI InPlaceSite_Release(IOleInPlaceSiteEx *iface)
1011 {
1012 return 1;
1013 }
1014
1015 static HRESULT WINAPI InPlaceSite_GetWindow(IOleInPlaceSiteEx *iface, HWND *phwnd)
1016 {
1017 CHECK_EXPECT(Site_GetWindow);
1018 ok(phwnd != NULL, "phwnd == NULL\n");
1019 if(phwnd)
1020 *phwnd = container_hwnd;
1021 return S_OK;
1022 }
1023
1024 static HRESULT WINAPI InPlaceSite_ContextSensitiveHelp(IOleInPlaceSiteEx *iface, BOOL fEnterMode)
1025 {
1026 ok(0, "unexpected call\n");
1027 return E_NOTIMPL;
1028 }
1029
1030 static HRESULT WINAPI InPlaceSite_CanInPlaceActivate(IOleInPlaceSiteEx *iface)
1031 {
1032 CHECK_EXPECT(CanInPlaceActivate);
1033 return S_OK;
1034 }
1035
1036 static HRESULT WINAPI InPlaceSite_OnInPlaceActivate(IOleInPlaceSiteEx *iface)
1037 {
1038 CHECK_EXPECT(OnInPlaceActivate);
1039 return S_OK;
1040 }
1041
1042 static HRESULT WINAPI InPlaceSite_OnUIActivate(IOleInPlaceSiteEx *iface)
1043 {
1044 CHECK_EXPECT(OnUIActivate);
1045 return S_OK;
1046 }
1047
1048 static HRESULT WINAPI InPlaceSite_GetWindowContext(IOleInPlaceSiteEx *iface,
1049 IOleInPlaceFrame **ppFrame, IOleInPlaceUIWindow **ppDoc, LPRECT lprcPosRect,
1050 LPRECT lprcClipRect, LPOLEINPLACEFRAMEINFO lpFrameInfo)
1051 {
1052 static const RECT pos_rect = {2,1,1002,901};
1053 static const RECT clip_rect = {10,10,990,890};
1054
1055 CHECK_EXPECT(GetWindowContext);
1056
1057 ok(ppFrame != NULL, "ppFrame = NULL\n");
1058 if(ppFrame)
1059 *ppFrame = &InPlaceFrame;
1060
1061 ok(ppDoc != NULL, "ppDoc = NULL\n");
1062 if(ppDoc)
1063 *ppDoc = &InPlaceUIWindow;
1064
1065 ok(lprcPosRect != NULL, "lprcPosRect = NULL\n");
1066 if(lprcPosRect)
1067 memcpy(lprcPosRect, &pos_rect, sizeof(RECT));
1068
1069 ok(lprcClipRect != NULL, "lprcClipRect = NULL\n");
1070 if(lprcClipRect)
1071 memcpy(lprcClipRect, &clip_rect, sizeof(RECT));
1072
1073 ok(lpFrameInfo != NULL, "lpFrameInfo = NULL\n");
1074 if(lpFrameInfo) {
1075 lpFrameInfo->cb = sizeof(*lpFrameInfo);
1076 lpFrameInfo->fMDIApp = FALSE;
1077 lpFrameInfo->hwndFrame = container_hwnd;
1078 lpFrameInfo->haccel = NULL;
1079 lpFrameInfo->cAccelEntries = 0;
1080 }
1081
1082 return S_OK;
1083 }
1084
1085 static HRESULT WINAPI InPlaceSite_Scroll(IOleInPlaceSiteEx *iface, SIZE scrollExtant)
1086 {
1087 ok(0, "unexpected call\n");
1088 return E_NOTIMPL;
1089 }
1090
1091 static HRESULT WINAPI InPlaceSite_OnUIDeactivate(IOleInPlaceSiteEx *iface, BOOL fUndoable)
1092 {
1093 ok(0, "unexpected call\n");
1094 return E_NOTIMPL;
1095 }
1096
1097 static HRESULT WINAPI InPlaceSite_OnInPlaceDeactivate(IOleInPlaceSiteEx *iface)
1098 {
1099 ok(0, "unexpected call\n");
1100 return E_NOTIMPL;
1101 }
1102
1103 static HRESULT WINAPI InPlaceSite_DiscardUndoState(IOleInPlaceSiteEx *iface)
1104 {
1105 ok(0, "unexpected call\n");
1106 return E_NOTIMPL;
1107 }
1108
1109 static HRESULT WINAPI InPlaceSite_DeactivateAndUndo(IOleInPlaceSiteEx *iface)
1110 {
1111 ok(0, "unexpected call\n");
1112 return E_NOTIMPL;
1113 }
1114
1115 static HRESULT WINAPI InPlaceSite_OnPosRectChange(IOleInPlaceSiteEx *iface, LPCRECT lprcPosRect)
1116 {
1117 ok(0, "unexpected call\n");
1118 return E_NOTIMPL;
1119 }
1120
1121 static HRESULT WINAPI InPlaceSite_OnInPlaceActivateEx(IOleInPlaceSiteEx *iface,
1122 BOOL *pNoRedraw, DWORD dwFlags)
1123 {
1124 ok(0, "unexpected call\n");
1125 return E_NOTIMPL;
1126 }
1127
1128 static HRESULT WINAPI InPlaceSite_OnInPlaceDeactivateEx(IOleInPlaceSiteEx *iface,
1129 BOOL fNoRedraw)
1130 {
1131 ok(0, "unexpected call\n");
1132 return E_NOTIMPL;
1133 }
1134
1135 static HRESULT WINAPI InPlaceSite_RequestUIActivate(IOleInPlaceSiteEx *iface)
1136 {
1137 ok(0, "unexpected call\n");
1138 return S_OK;
1139 }
1140
1141 static const IOleInPlaceSiteExVtbl InPlaceSiteExVtbl = {
1142 InPlaceSite_QueryInterface,
1143 InPlaceSite_AddRef,
1144 InPlaceSite_Release,
1145 InPlaceSite_GetWindow,
1146 InPlaceSite_ContextSensitiveHelp,
1147 InPlaceSite_CanInPlaceActivate,
1148 InPlaceSite_OnInPlaceActivate,
1149 InPlaceSite_OnUIActivate,
1150 InPlaceSite_GetWindowContext,
1151 InPlaceSite_Scroll,
1152 InPlaceSite_OnUIDeactivate,
1153 InPlaceSite_OnInPlaceDeactivate,
1154 InPlaceSite_DiscardUndoState,
1155 InPlaceSite_DeactivateAndUndo,
1156 InPlaceSite_OnPosRectChange,
1157 InPlaceSite_OnInPlaceActivateEx,
1158 InPlaceSite_OnInPlaceDeactivateEx,
1159 InPlaceSite_RequestUIActivate
1160 };
1161
1162 static IOleInPlaceSiteEx InPlaceSite = { &InPlaceSiteExVtbl };
1163
1164 static HRESULT WINAPI DocHostUIHandler_QueryInterface(IDocHostUIHandler2 *iface, REFIID riid, void **ppv)
1165 {
1166 return QueryInterface(riid, ppv);
1167 }
1168
1169 static ULONG WINAPI DocHostUIHandler_AddRef(IDocHostUIHandler2 *iface)
1170 {
1171 return 2;
1172 }
1173
1174 static ULONG WINAPI DocHostUIHandler_Release(IDocHostUIHandler2 *iface)
1175 {
1176 return 1;
1177 }
1178
1179 static HRESULT WINAPI DocHostUIHandler_ShowContextMenu(IDocHostUIHandler2 *iface, DWORD dwID, POINT *ppt,
1180 IUnknown *pcmdtReserved, IDispatch *pdicpReserved)
1181 {
1182 ok(0, "unexpected call %d %p %p %p\n", dwID, ppt, pcmdtReserved, pdicpReserved);
1183 return S_FALSE;
1184 }
1185
1186 static HRESULT WINAPI DocHostUIHandler_GetHostInfo(IDocHostUIHandler2 *iface, DOCHOSTUIINFO *pInfo)
1187 {
1188 CHECK_EXPECT2(GetHostInfo);
1189 ok(pInfo != NULL, "pInfo=NULL\n");
1190 if(pInfo) {
1191 ok(pInfo->cbSize == sizeof(DOCHOSTUIINFO) || broken(!pInfo->cbSize), "pInfo->cbSize=%u\n", pInfo->cbSize);
1192 ok(!pInfo->dwFlags, "pInfo->dwFlags=%08x, expected 0\n", pInfo->dwFlags);
1193 ok(!pInfo->dwDoubleClick, "pInfo->dwDoubleClick=%08x, expected 0\n", pInfo->dwDoubleClick);
1194 ok(!pInfo->pchHostCss, "pInfo->pchHostCss=%p, expected NULL\n", pInfo->pchHostCss);
1195 ok(!pInfo->pchHostNS, "pInfo->pchhostNS=%p, expected NULL\n", pInfo->pchHostNS);
1196 }
1197 return E_FAIL;
1198 }
1199
1200 static HRESULT WINAPI DocHostUIHandler_ShowUI(IDocHostUIHandler2 *iface, DWORD dwID,
1201 IOleInPlaceActiveObject *pActiveObject, IOleCommandTarget *pCommandTarget,
1202 IOleInPlaceFrame *pFrame, IOleInPlaceUIWindow *pDoc)
1203 {
1204 ok(0, "unexpected call\n");
1205 return E_NOTIMPL;
1206 }
1207
1208 static HRESULT WINAPI DocHostUIHandler_HideUI(IDocHostUIHandler2 *iface)
1209 {
1210 ok(0, "unexpected call\n");
1211 return E_NOTIMPL;
1212 }
1213
1214 static HRESULT WINAPI DocHostUIHandler_UpdateUI(IDocHostUIHandler2 *iface)
1215 {
1216 CHECK_EXPECT(UpdateUI);
1217 return E_NOTIMPL;
1218 }
1219
1220 static HRESULT WINAPI DocHostUIHandler_EnableModeless(IDocHostUIHandler2 *iface, BOOL fEnable)
1221 {
1222 if(fEnable)
1223 CHECK_EXPECT(DocHost_EnableModeless_TRUE);
1224 else
1225 CHECK_EXPECT(DocHost_EnableModeless_FALSE);
1226
1227 return S_OK;
1228 }
1229
1230 static HRESULT WINAPI DocHostUIHandler_OnDocWindowActivate(IDocHostUIHandler2 *iface, BOOL fActivate)
1231 {
1232 ok(0, "unexpected call\n");
1233 return E_NOTIMPL;
1234 }
1235
1236 static HRESULT WINAPI DocHostUIHandler_OnFrameWindowActivate(IDocHostUIHandler2 *iface, BOOL fActivate)
1237 {
1238 ok(0, "unexpected call\n");
1239 return E_NOTIMPL;
1240 }
1241
1242 static HRESULT WINAPI DocHostUIHandler_ResizeBorder(IDocHostUIHandler2 *iface, LPCRECT prcBorder,
1243 IOleInPlaceUIWindow *pUIWindow, BOOL fRameWindow)
1244 {
1245 ok(0, "unexpected call\n");
1246 return E_NOTIMPL;
1247 }
1248
1249 static HRESULT WINAPI DocHostUIHandler_TranslateAccelerator(IDocHostUIHandler2 *iface, LPMSG lpMsg,
1250 const GUID *pguidCmdGroup, DWORD nCmdID)
1251 {
1252 ok(0, "unexpected call\n");
1253 return E_NOTIMPL;
1254 }
1255
1256 static HRESULT WINAPI DocHostUIHandler_GetOptionKeyPath(IDocHostUIHandler2 *iface,
1257 LPOLESTR *pchKey, DWORD dw)
1258 {
1259 CHECK_EXPECT(GetOptionKeyPath);
1260 ok(pchKey != NULL, "pchKey==NULL\n");
1261 if(pchKey)
1262 ok(*pchKey == NULL, "*pchKey=%p\n", *pchKey);
1263 ok(!dw, "dw=%x\n", dw);
1264 return E_NOTIMPL;
1265 }
1266
1267 static HRESULT WINAPI DocHostUIHandler_GetDropTarget(IDocHostUIHandler2 *iface,
1268 IDropTarget *pDropTarget, IDropTarget **ppDropTarget)
1269 {
1270 CHECK_EXPECT(GetDropTarget);
1271 return E_NOTIMPL;
1272 }
1273
1274 static HRESULT WINAPI DocHostUIHandler_GetExternal(IDocHostUIHandler2 *iface, IDispatch **ppDispatch)
1275 {
1276 ok(0, "unexpected call\n");
1277 return E_NOTIMPL;
1278 }
1279
1280 static HRESULT WINAPI DocHostUIHandler_TranslateUrl(IDocHostUIHandler2 *iface, DWORD dwTranslate,
1281 OLECHAR *pchURLIn, OLECHAR **ppchURLOut)
1282 {
1283 if(is_downloading && !(dwl_flags & DWL_EXPECT_BEFORE_NAVIGATE))
1284 todo_wine CHECK_EXPECT(TranslateUrl);
1285 else
1286 CHECK_EXPECT(TranslateUrl);
1287 return E_NOTIMPL;
1288 }
1289
1290 static HRESULT WINAPI DocHostUIHandler_FilterDataObject(IDocHostUIHandler2 *iface, IDataObject *pDO,
1291 IDataObject **ppPORet)
1292 {
1293 ok(0, "unexpected call\n");
1294 return E_NOTIMPL;
1295 }
1296
1297 static HRESULT WINAPI DocHostUIHandler_GetOverrideKeyPath(IDocHostUIHandler2 *iface,
1298 LPOLESTR *pchKey, DWORD dw)
1299 {
1300 CHECK_EXPECT(GetOverridesKeyPath);
1301 ok(pchKey != NULL, "pchKey==NULL\n");
1302 if(pchKey)
1303 ok(*pchKey == NULL, "*pchKey=%p\n", *pchKey);
1304 ok(!dw, "dw=%x\n", dw);
1305 return E_NOTIMPL;
1306 }
1307
1308 static const IDocHostUIHandler2Vtbl DocHostUIHandlerVtbl = {
1309 DocHostUIHandler_QueryInterface,
1310 DocHostUIHandler_AddRef,
1311 DocHostUIHandler_Release,
1312 DocHostUIHandler_ShowContextMenu,
1313 DocHostUIHandler_GetHostInfo,
1314 DocHostUIHandler_ShowUI,
1315 DocHostUIHandler_HideUI,
1316 DocHostUIHandler_UpdateUI,
1317 DocHostUIHandler_EnableModeless,
1318 DocHostUIHandler_OnDocWindowActivate,
1319 DocHostUIHandler_OnFrameWindowActivate,
1320 DocHostUIHandler_ResizeBorder,
1321 DocHostUIHandler_TranslateAccelerator,
1322 DocHostUIHandler_GetOptionKeyPath,
1323 DocHostUIHandler_GetDropTarget,
1324 DocHostUIHandler_GetExternal,
1325 DocHostUIHandler_TranslateUrl,
1326 DocHostUIHandler_FilterDataObject,
1327 DocHostUIHandler_GetOverrideKeyPath
1328 };
1329
1330 static IDocHostUIHandler2 DocHostUIHandler = { &DocHostUIHandlerVtbl };
1331
1332
1333 static HRESULT WINAPI ServiceProvider_QueryInterface(IServiceProvider *iface, REFIID riid, void **ppv)
1334 {
1335 return QueryInterface(riid, ppv);
1336 }
1337
1338 static ULONG WINAPI ServiceProvider_AddRef(IServiceProvider *iface)
1339 {
1340 return 2;
1341 }
1342
1343 static ULONG WINAPI ServiceProvider_Release(IServiceProvider *iface)
1344 {
1345 return 1;
1346 }
1347
1348 static HRESULT WINAPI ServiceProvider_QueryService(IServiceProvider *iface,
1349 REFGUID guidService, REFIID riid, void **ppv)
1350 {
1351 *ppv = NULL;
1352
1353 if(!winetest_interactive)
1354 return E_NOINTERFACE;
1355
1356 if (IsEqualGUID(&SID_STopLevelBrowser, guidService))
1357 trace("Service SID_STopLevelBrowser\n");
1358 else if (IsEqualGUID(&SID_SEditCommandTarget, guidService))
1359 trace("Service SID_SEditCommandTarget\n");
1360 else if (IsEqualGUID(&IID_ITargetFrame2, guidService))
1361 trace("Service IID_ITargetFrame2\n");
1362 else if (IsEqualGUID(&SID_SInternetSecurityManager, guidService))
1363 trace("Service SID_SInternetSecurityManager\n");
1364 else if (IsEqualGUID(&SID_SOleUndoManager, guidService))
1365 trace("Service SID_SOleUndoManager\n");
1366 else if (IsEqualGUID(&SID_IMimeInfo, guidService))
1367 trace("Service SID_IMimeInfo\n");
1368 else if (IsEqualGUID(&SID_STopWindow, guidService))
1369 trace("Service SID_STopWindow\n");
1370
1371 /* 30D02401-6A81-11D0-8274-00C04FD5AE38 Explorer Bar: Search */
1372 /* D1E7AFEC-6A2E-11D0-8C78-00C04FD918B4 no info */
1373 /* A9227C3C-7F8E-11D0-8CB0-00A0C92DBFE8 no info */
1374 /* 371EA634-DC5C-11D1-BA57-00C04FC2040E one reference to IVersionHost */
1375 /* 3050F429-98B5-11CF-BB82-00AA00BDCE0B IID_IElementBehaviorFactory */
1376 /* 6D12FE80-7911-11CF-9534-0000C05BAE0B SID_DefView */
1377 /* AD7F6C62-F6BD-11D2-959B-006097C553C8 no info */
1378 /* 53A2D5B1-D2FC-11D0-84E0-006097C9987D no info */
1379 /* 3050F312-98B5-11CF-BB82-00AA00BDCE0B HTMLFrameBaseClass */
1380 /* 639447BD-B2D3-44B9-9FB0-510F23CB45E4 no info */
1381 /* 20C46561-8491-11CF-960C-0080C7F4EE85 no info */
1382
1383 else
1384 trace("Service %s not supported\n", debugstr_guid(guidService));
1385
1386 return E_NOINTERFACE;
1387 }
1388
1389
1390 static const IServiceProviderVtbl ServiceProviderVtbl = {
1391 ServiceProvider_QueryInterface,
1392 ServiceProvider_AddRef,
1393 ServiceProvider_Release,
1394 ServiceProvider_QueryService
1395 };
1396
1397 static IServiceProvider ServiceProvider = { &ServiceProviderVtbl };
1398
1399
1400 static HRESULT QueryInterface(REFIID riid, void **ppv)
1401 {
1402 *ppv = NULL;
1403
1404 if(IsEqualGUID(&IID_IUnknown, riid)
1405 || IsEqualGUID(&IID_IOleClientSite, riid))
1406 *ppv = &ClientSite;
1407 else if(IsEqualGUID(&IID_IOleWindow, riid)
1408 || IsEqualGUID(&IID_IOleInPlaceSite, riid)
1409 || IsEqualGUID(&IID_IOleInPlaceSiteEx, riid))
1410 *ppv = &InPlaceSite;
1411 else if(IsEqualGUID(&IID_IDocHostUIHandler, riid)
1412 || IsEqualGUID(&IID_IDocHostUIHandler2, riid))
1413 *ppv = &DocHostUIHandler;
1414 else if(IsEqualGUID(&IID_IDispatch, riid))
1415 *ppv = &Dispatch;
1416 else if(IsEqualGUID(&IID_IServiceProvider, riid))
1417 *ppv = &ServiceProvider;
1418 else if(IsEqualGUID(&IID_IDocHostShowUI, riid))
1419 trace("interface IID_IDocHostShowUI\n");
1420 else if(IsEqualGUID(&IID_IOleControlSite, riid))
1421 trace("interface IID_IOleControlSite\n");
1422 else if(IsEqualGUID(&IID_IOleCommandTarget, riid))
1423 trace("interface IID_IOleCommandTarget\n");
1424
1425 /* B6EA2050-048A-11D1-82B9-00C04FB9942E IAxWinHostWindow */
1426
1427 else
1428 {
1429 /* are there more interfaces, that a host can support? */
1430 trace("%s: interface not supported\n", debugstr_guid(riid));
1431 }
1432
1433 return (*ppv) ? S_OK : E_NOINTERFACE;
1434 }
1435
1436 static LRESULT WINAPI wnd_proc(HWND hwnd, UINT msg, WPARAM wParam, LPARAM lParam)
1437 {
1438 return DefWindowProcW(hwnd, msg, wParam, lParam);
1439 }
1440
1441 static HWND create_container_window(void)
1442 {
1443 static const WCHAR wszWebBrowserContainer[] =
1444 {'W','e','b','B','r','o','w','s','e','r','C','o','n','t','a','i','n','e','r',0};
1445 static WNDCLASSEXW wndclass = {
1446 sizeof(WNDCLASSEXW),
1447 0,
1448 wnd_proc,
1449 0, 0, NULL, NULL, NULL, NULL, NULL,
1450 wszWebBrowserContainer,
1451 NULL
1452 };
1453
1454 RegisterClassExW(&wndclass);
1455 return CreateWindowW(wszWebBrowserContainer, wszWebBrowserContainer,
1456 WS_OVERLAPPEDWINDOW, CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT,
1457 CW_USEDEFAULT, NULL, NULL, NULL, NULL);
1458 }
1459
1460 static void test_DoVerb(IUnknown *unk)
1461 {
1462 IOleObject *oleobj;
1463 RECT rect = {0,0,1000,1000};
1464 HRESULT hres;
1465
1466 hres = IUnknown_QueryInterface(unk, &IID_IOleObject, (void**)&oleobj);
1467 ok(hres == S_OK, "QueryInterface(IID_OleObject) failed: %08x\n", hres);
1468 if(FAILED(hres))
1469 return;
1470
1471 SET_EXPECT(CanInPlaceActivate);
1472 SET_EXPECT(Site_GetWindow);
1473 SET_EXPECT(OnInPlaceActivate);
1474 SET_EXPECT(GetWindowContext);
1475 SET_EXPECT(ShowObject);
1476 SET_EXPECT(GetContainer);
1477 SET_EXPECT(Frame_GetWindow);
1478 SET_EXPECT(OnUIActivate);
1479 SET_EXPECT(Frame_SetActiveObject);
1480 SET_EXPECT(UIWindow_SetActiveObject);
1481 SET_EXPECT(SetMenu);
1482
1483 hres = IOleObject_DoVerb(oleobj, OLEIVERB_SHOW, NULL, &ClientSite,
1484 0, (HWND)0xdeadbeef, &rect);
1485 ok(hres == S_OK, "DoVerb failed: %08x\n", hres);
1486
1487 CHECK_CALLED(CanInPlaceActivate);
1488 CHECK_CALLED(Site_GetWindow);
1489 CHECK_CALLED(OnInPlaceActivate);
1490 CHECK_CALLED(GetWindowContext);
1491 CHECK_CALLED(ShowObject);
1492 CHECK_CALLED(GetContainer);
1493 CHECK_CALLED(Frame_GetWindow);
1494 CHECK_CALLED(OnUIActivate);
1495 CHECK_CALLED(Frame_SetActiveObject);
1496 CHECK_CALLED(UIWindow_SetActiveObject);
1497 CHECK_CALLED(SetMenu);
1498
1499 hres = IOleObject_DoVerb(oleobj, OLEIVERB_SHOW, NULL, &ClientSite,
1500 0, (HWND)0xdeadbeef, &rect);
1501 ok(hres == S_OK, "DoVerb failed: %08x\n", hres);
1502
1503 IOleObject_Release(oleobj);
1504 }
1505
1506 static void test_GetMiscStatus(IOleObject *oleobj)
1507 {
1508 DWORD st, i;
1509 HRESULT hres;
1510
1511 for(i=0; i<10; i++) {
1512 st = 0xdeadbeef;
1513 hres = IOleObject_GetMiscStatus(oleobj, i, &st);
1514 ok(hres == S_OK, "GetMiscStatus failed: %08x\n", hres);
1515 ok(st == (OLEMISC_SETCLIENTSITEFIRST|OLEMISC_ACTIVATEWHENVISIBLE|OLEMISC_INSIDEOUT
1516 |OLEMISC_CANTLINKINSIDE|OLEMISC_RECOMPOSEONRESIZE),
1517 "st=%08x, expected OLEMISC_SETCLIENTSITEFIRST|OLEMISC_ACTIVATEWHENVISIBLE|"
1518 "OLEMISC_INSIDEOUT|OLEMISC_CANTLINKINSIDE|OLEMISC_RECOMPOSEONRESIZE)\n", st);
1519 }
1520 }
1521
1522 static void test_SetHostNames(IOleObject *oleobj)
1523 {
1524 HRESULT hres;
1525
1526 static const WCHAR test_appW[] = {'t','e','s','t',' ','a','p','p',0};
1527
1528 hres = IOleObject_SetHostNames(oleobj, test_appW, (void*)0xdeadbeef);
1529 ok(hres == S_OK, "SetHostNames failed: %08x\n", hres);
1530 }
1531
1532 static void test_ClientSite(IUnknown *unk, IOleClientSite *client, BOOL stop_download)
1533 {
1534 IOleObject *oleobj;
1535 IOleInPlaceObject *inplace;
1536 HWND hwnd;
1537 HRESULT hres;
1538
1539 hres = IUnknown_QueryInterface(unk, &IID_IOleObject, (void**)&oleobj);
1540 ok(hres == S_OK, "QueryInterface(IID_OleObject) failed: %08x\n", hres);
1541 if(FAILED(hres))
1542 return;
1543
1544 test_GetMiscStatus(oleobj);
1545 test_SetHostNames(oleobj);
1546
1547 hres = IUnknown_QueryInterface(unk, &IID_IOleInPlaceObject, (void**)&inplace);
1548 ok(hres == S_OK, "QueryInterface(IID_OleInPlaceObject) failed: %08x\n", hres);
1549 if(FAILED(hres)) {
1550 IOleObject_Release(oleobj);
1551 return;
1552 }
1553
1554 hres = IOleInPlaceObject_GetWindow(inplace, &hwnd);
1555 ok(hres == S_OK, "GetWindow failed: %08x\n", hres);
1556 ok((hwnd == NULL) ^ (client == NULL), "unexpected hwnd %p\n", hwnd);
1557
1558 if(client) {
1559 SET_EXPECT(GetContainer);
1560 SET_EXPECT(Site_GetWindow);
1561 SET_EXPECT(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
1562 SET_EXPECT(Invoke_AMBIENT_SILENT);
1563 }else if(stop_download) {
1564 SET_EXPECT(Invoke_DOWNLOADCOMPLETE);
1565 SET_EXPECT(Exec_SETDOWNLOADSTATE_0);
1566 SET_EXPECT(Invoke_COMMANDSTATECHANGE);
1567 }
1568
1569 hres = IOleObject_SetClientSite(oleobj, client);
1570 ok(hres == S_OK, "SetClientSite failed: %08x\n", hres);
1571
1572 if(client) {
1573 CHECK_CALLED(GetContainer);
1574 CHECK_CALLED(Site_GetWindow);
1575 CHECK_CALLED(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
1576 CHECK_CALLED(Invoke_AMBIENT_SILENT);
1577 }else if(stop_download) {
1578 todo_wine CHECK_CALLED(Invoke_DOWNLOADCOMPLETE);
1579 todo_wine CHECK_CALLED(Exec_SETDOWNLOADSTATE_0);
1580 todo_wine CHECK_CALLED(Invoke_COMMANDSTATECHANGE);
1581 }
1582
1583 hres = IOleInPlaceObject_GetWindow(inplace, &hwnd);
1584 ok(hres == S_OK, "GetWindow failed: %08x\n", hres);
1585 ok((hwnd == NULL) == (client == NULL), "unexpected hwnd %p\n", hwnd);
1586
1587 shell_embedding_hwnd = hwnd;
1588
1589 test_SetHostNames(oleobj);
1590
1591 IOleInPlaceObject_Release(inplace);
1592 IOleObject_Release(oleobj);
1593 }
1594
1595 static void test_ClassInfo(IUnknown *unk)
1596 {
1597 IProvideClassInfo2 *class_info;
1598 GUID guid;
1599 HRESULT hres;
1600
1601 hres = IUnknown_QueryInterface(unk, &IID_IProvideClassInfo2, (void**)&class_info);
1602 ok(hres == S_OK, "QueryInterface(IID_IProvideClassInfo) failed: %08x\n", hres);
1603 if(FAILED(hres))
1604 return;
1605
1606 hres = IProvideClassInfo2_GetGUID(class_info, GUIDKIND_DEFAULT_SOURCE_DISP_IID, &guid);
1607 ok(hres == S_OK, "GetGUID failed: %08x\n", hres);
1608 ok(IsEqualGUID(&DIID_DWebBrowserEvents2, &guid), "wrong guid\n");
1609
1610 hres = IProvideClassInfo2_GetGUID(class_info, 0, &guid);
1611 ok(hres == E_FAIL, "GetGUID failed: %08x, expected E_FAIL\n", hres);
1612 ok(IsEqualGUID(&IID_NULL, &guid), "wrong guid\n");
1613
1614 hres = IProvideClassInfo2_GetGUID(class_info, 2, &guid);
1615 ok(hres == E_FAIL, "GetGUID failed: %08x, expected E_FAIL\n", hres);
1616 ok(IsEqualGUID(&IID_NULL, &guid), "wrong guid\n");
1617
1618 hres = IProvideClassInfo2_GetGUID(class_info, GUIDKIND_DEFAULT_SOURCE_DISP_IID, NULL);
1619 ok(hres == E_POINTER, "GetGUID failed: %08x, expected E_POINTER\n", hres);
1620
1621 hres = IProvideClassInfo2_GetGUID(class_info, 0, NULL);
1622 ok(hres == E_POINTER, "GetGUID failed: %08x, expected E_POINTER\n", hres);
1623
1624 IProvideClassInfo2_Release(class_info);
1625 }
1626
1627 static void test_ie_funcs(IUnknown *unk)
1628 {
1629 IWebBrowser2 *wb;
1630 IDispatch *disp;
1631 VARIANT_BOOL b;
1632 int i;
1633 LONG hwnd;
1634 HRESULT hres;
1635 BSTR sName;
1636
1637 hres = IUnknown_QueryInterface(unk, &IID_IWebBrowser2, (void**)&wb);
1638 ok(hres == S_OK, "Could not get IWebBrowser2 interface: %08x\n", hres);
1639 if(FAILED(hres))
1640 return;
1641
1642 /* HWND */
1643
1644 hwnd = 0xdeadbeef;
1645 hres = IWebBrowser2_get_HWND(wb, &hwnd);
1646 ok(hres == E_FAIL, "get_HWND failed: %08x, expected E_FAIL\n", hres);
1647 ok(hwnd == 0, "unexpected hwnd %x\n", hwnd);
1648
1649 /* MenuBar */
1650
1651 hres = IWebBrowser2_get_MenuBar(wb, &b);
1652 ok(hres == S_OK, "get_MenuBar failed: %08x\n", hres);
1653 ok(b == VARIANT_TRUE, "b=%x\n", b);
1654
1655 SET_EXPECT(Invoke_ONMENUBAR);
1656 hres = IWebBrowser2_put_MenuBar(wb, (exvb = VARIANT_FALSE));
1657 ok(hres == S_OK, "put_MenuBar failed: %08x\n", hres);
1658 CHECK_CALLED(Invoke_ONMENUBAR);
1659
1660 hres = IWebBrowser2_get_MenuBar(wb, &b);
1661 ok(hres == S_OK, "get_MenuBar failed: %08x\n", hres);
1662 ok(b == VARIANT_FALSE, "b=%x\n", b);
1663
1664 SET_EXPECT(Invoke_ONMENUBAR);
1665 hres = IWebBrowser2_put_MenuBar(wb, (exvb = 100));
1666 ok(hres == S_OK, "put_MenuBar failed: %08x\n", hres);
1667 CHECK_CALLED(Invoke_ONMENUBAR);
1668
1669 hres = IWebBrowser2_get_MenuBar(wb, &b);
1670 ok(hres == S_OK, "get_MenuBar failed: %08x\n", hres);
1671 ok(b == VARIANT_TRUE, "b=%x\n", b);
1672
1673 /* AddressBar */
1674
1675 hres = IWebBrowser2_get_AddressBar(wb, &b);
1676 ok(hres == S_OK, "get_AddressBar failed: %08x\n", hres);
1677 ok(b == VARIANT_TRUE, "b=%x\n", b);
1678
1679 SET_EXPECT(Invoke_ONADDRESSBAR);
1680 hres = IWebBrowser2_put_AddressBar(wb, (exvb = VARIANT_FALSE));
1681 ok(hres == S_OK, "put_AddressBar failed: %08x\n", hres);
1682 CHECK_CALLED(Invoke_ONADDRESSBAR);
1683
1684 hres = IWebBrowser2_get_AddressBar(wb, &b);
1685 ok(hres == S_OK, "get_MenuBar failed: %08x\n", hres);
1686 ok(b == VARIANT_FALSE, "b=%x\n", b);
1687
1688 SET_EXPECT(Invoke_ONADDRESSBAR);
1689 hres = IWebBrowser2_put_AddressBar(wb, (exvb = 100));
1690 ok(hres == S_OK, "put_AddressBar failed: %08x\n", hres);
1691 CHECK_CALLED(Invoke_ONADDRESSBAR);
1692
1693 hres = IWebBrowser2_get_AddressBar(wb, &b);
1694 ok(hres == S_OK, "get_AddressBar failed: %08x\n", hres);
1695 ok(b == VARIANT_TRUE, "b=%x\n", b);
1696
1697 SET_EXPECT(Invoke_ONADDRESSBAR);
1698 hres = IWebBrowser2_put_AddressBar(wb, (exvb = VARIANT_TRUE));
1699 ok(hres == S_OK, "put_MenuBar failed: %08x\n", hres);
1700 CHECK_CALLED(Invoke_ONADDRESSBAR);
1701
1702 /* StatusBar */
1703
1704 hres = IWebBrowser2_get_StatusBar(wb, &b);
1705 ok(hres == S_OK, "get_StatusBar failed: %08x\n", hres);
1706 ok(b == VARIANT_TRUE, "b=%x\n", b);
1707
1708 SET_EXPECT(Invoke_ONSTATUSBAR);
1709 hres = IWebBrowser2_put_StatusBar(wb, (exvb = VARIANT_TRUE));
1710 ok(hres == S_OK, "put_StatusBar failed: %08x\n", hres);
1711 CHECK_CALLED(Invoke_ONSTATUSBAR);
1712
1713 hres = IWebBrowser2_get_StatusBar(wb, &b);
1714 ok(hres == S_OK, "get_StatusBar failed: %08x\n", hres);
1715 ok(b == VARIANT_TRUE, "b=%x\n", b);
1716
1717 SET_EXPECT(Invoke_ONSTATUSBAR);
1718 hres = IWebBrowser2_put_StatusBar(wb, (exvb = VARIANT_FALSE));
1719 ok(hres == S_OK, "put_StatusBar failed: %08x\n", hres);
1720 CHECK_CALLED(Invoke_ONSTATUSBAR);
1721
1722 hres = IWebBrowser2_get_StatusBar(wb, &b);
1723 ok(hres == S_OK, "get_StatusBar failed: %08x\n", hres);
1724 ok(b == VARIANT_FALSE, "b=%x\n", b);
1725
1726 SET_EXPECT(Invoke_ONSTATUSBAR);
1727 hres = IWebBrowser2_put_StatusBar(wb, (exvb = 100));
1728 ok(hres == S_OK, "put_StatusBar failed: %08x\n", hres);
1729 CHECK_CALLED(Invoke_ONSTATUSBAR);
1730
1731 hres = IWebBrowser2_get_StatusBar(wb, &b);
1732 ok(hres == S_OK, "get_StatusBar failed: %08x\n", hres);
1733 ok(b == VARIANT_TRUE, "b=%x\n", b);
1734
1735 /* ToolBar */
1736
1737 hres = IWebBrowser2_get_ToolBar(wb, &i);
1738 ok(hres == S_OK, "get_ToolBar failed: %08x\n", hres);
1739 ok(i, "i=%x\n", i);
1740
1741 SET_EXPECT(Invoke_ONTOOLBAR);
1742 hres = IWebBrowser2_put_ToolBar(wb, (exvb = VARIANT_FALSE));
1743 ok(hres == S_OK, "put_ToolBar failed: %08x\n", hres);
1744 CHECK_CALLED(Invoke_ONTOOLBAR);
1745
1746 hres = IWebBrowser2_get_ToolBar(wb, &i);
1747 ok(hres == S_OK, "get_ToolBar failed: %08x\n", hres);
1748 ok(i == VARIANT_FALSE, "b=%x\n", i);
1749
1750 SET_EXPECT(Invoke_ONTOOLBAR);
1751 hres = IWebBrowser2_put_ToolBar(wb, (exvb = 100));
1752 ok(hres == S_OK, "put_ToolBar failed: %08x\n", hres);
1753 CHECK_CALLED(Invoke_ONTOOLBAR);
1754
1755 hres = IWebBrowser2_get_ToolBar(wb, &i);
1756 ok(hres == S_OK, "get_ToolBar failed: %08x\n", hres);
1757 ok(i, "i=%x\n", i);
1758
1759 SET_EXPECT(Invoke_ONTOOLBAR);
1760 hres = IWebBrowser2_put_ToolBar(wb, (exvb = VARIANT_TRUE));
1761 ok(hres == S_OK, "put_ToolBar failed: %08x\n", hres);
1762 CHECK_CALLED(Invoke_ONTOOLBAR);
1763
1764 /* FullScreen */
1765
1766 hres = IWebBrowser2_get_FullScreen(wb, &b);
1767 ok(hres == S_OK, "get_FullScreen failed: %08x\n", hres);
1768 ok(b == VARIANT_FALSE, "b=%x\n", b);
1769
1770 SET_EXPECT(Invoke_ONFULLSCREEN);
1771 hres = IWebBrowser2_put_FullScreen(wb, (exvb = VARIANT_TRUE));
1772 ok(hres == S_OK, "put_FullScreen failed: %08x\n", hres);
1773 CHECK_CALLED(Invoke_ONFULLSCREEN);
1774
1775 hres = IWebBrowser2_get_FullScreen(wb, &b);
1776 ok(hres == S_OK, "get_FullScreen failed: %08x\n", hres);
1777 ok(b == VARIANT_TRUE, "b=%x\n", b);
1778
1779 SET_EXPECT(Invoke_ONFULLSCREEN);
1780 hres = IWebBrowser2_put_FullScreen(wb, (exvb = 100));
1781 ok(hres == S_OK, "put_FullScreen failed: %08x\n", hres);
1782 CHECK_CALLED(Invoke_ONFULLSCREEN);
1783
1784 hres = IWebBrowser2_get_FullScreen(wb, &b);
1785 ok(hres == S_OK, "get_FullScreen failed: %08x\n", hres);
1786 ok(b == VARIANT_TRUE, "b=%x\n", b);
1787
1788 SET_EXPECT(Invoke_ONFULLSCREEN);
1789 hres = IWebBrowser2_put_FullScreen(wb, (exvb = VARIANT_FALSE));
1790 ok(hres == S_OK, "put_FullScreen failed: %08x\n", hres);
1791 CHECK_CALLED(Invoke_ONFULLSCREEN);
1792
1793 /* TheaterMode */
1794
1795 hres = IWebBrowser2_get_TheaterMode(wb, &b);
1796 ok(hres == S_OK, "get_TheaterMode failed: %08x\n", hres);
1797 ok(b == VARIANT_FALSE, "b=%x\n", b);
1798
1799 SET_EXPECT(Invoke_ONTHEATERMODE);
1800 hres = IWebBrowser2_put_TheaterMode(wb, (exvb = VARIANT_TRUE));
1801 ok(hres == S_OK, "put_TheaterMode failed: %08x\n", hres);
1802 CHECK_CALLED(Invoke_ONTHEATERMODE);
1803
1804 hres = IWebBrowser2_get_TheaterMode(wb, &b);
1805 ok(hres == S_OK, "get_TheaterMode failed: %08x\n", hres);
1806 ok(b == VARIANT_TRUE, "b=%x\n", b);
1807
1808 SET_EXPECT(Invoke_ONTHEATERMODE);
1809 hres = IWebBrowser2_put_TheaterMode(wb, (exvb = 100));
1810 ok(hres == S_OK, "put_TheaterMode failed: %08x\n", hres);
1811 CHECK_CALLED(Invoke_ONTHEATERMODE);
1812
1813 hres = IWebBrowser2_get_TheaterMode(wb, &b);
1814 ok(hres == S_OK, "get_TheaterMode failed: %08x\n", hres);
1815 ok(b == VARIANT_TRUE, "b=%x\n", b);
1816
1817 SET_EXPECT(Invoke_ONTHEATERMODE);
1818 hres = IWebBrowser2_put_TheaterMode(wb, (exvb = VARIANT_FALSE));
1819 ok(hres == S_OK, "put_TheaterMode failed: %08x\n", hres);
1820 CHECK_CALLED(Invoke_ONTHEATERMODE);
1821
1822 /* Resizable */
1823
1824 b = 0x100;
1825 hres = IWebBrowser2_get_Resizable(wb, &b);
1826 ok(hres == E_NOTIMPL, "get_Resizable failed: %08x\n", hres);
1827 ok(b == 0x100, "b=%x\n", b);
1828
1829 SET_EXPECT(Invoke_WINDOWSETRESIZABLE);
1830 hres = IWebBrowser2_put_Resizable(wb, (exvb = VARIANT_TRUE));
1831 ok(hres == S_OK || broken(hres == E_NOTIMPL), "put_Resizable failed: %08x\n", hres);
1832 CHECK_CALLED_BROKEN(Invoke_WINDOWSETRESIZABLE);
1833
1834 SET_EXPECT(Invoke_WINDOWSETRESIZABLE);
1835 hres = IWebBrowser2_put_Resizable(wb, (exvb = VARIANT_FALSE));
1836 ok(hres == S_OK || broken(hres == E_NOTIMPL), "put_Resizable failed: %08x\n", hres);
1837 CHECK_CALLED_BROKEN(Invoke_WINDOWSETRESIZABLE);
1838
1839 hres = IWebBrowser2_get_Resizable(wb, &b);
1840 ok(hres == E_NOTIMPL, "get_Resizable failed: %08x\n", hres);
1841 ok(b == 0x100, "b=%x\n", b);
1842
1843 /* Application */
1844
1845 disp = NULL;
1846 hres = IWebBrowser2_get_Application(wb, &disp);
1847 ok(hres == S_OK, "get_Application failed: %08x\n", hres);
1848 ok(disp == (void*)wb, "disp=%p, expected %p\n", disp, wb);
1849 if(disp)
1850 IDispatch_Release(disp);
1851
1852 hres = IWebBrowser2_get_Application(wb, NULL);
1853 ok(hres == E_POINTER, "get_Application failed: %08x, expected E_POINTER\n", hres);
1854
1855 /* Name */
1856 hres = IWebBrowser2_get_Name(wb, &sName);
1857 ok(hres == S_OK, "getName failed: %08x, expected S_OK\n", hres);
1858 if (PRIMARYLANGID(LANGIDFROMLCID(GetThreadLocale())) == LANG_ENGLISH)
1859 ok(!strcmp_wa(sName, "Microsoft Web Browser Control"), "got '%s', expected 'Microsoft Web Browser Control'\n", wine_dbgstr_w(sName));
1860 else /* Non-English cannot be blank. */
1861 ok(sName!=NULL, "get_Name return a NULL string.\n");
1862 SysFreeString(sName);
1863
1864 /* Quit */
1865
1866 hres = IWebBrowser2_Quit(wb);
1867 ok(hres == E_FAIL, "Quit failed: %08x, expected E_FAIL\n", hres);
1868
1869 IWebBrowser2_Release(wb);
1870 }
1871
1872 static void test_Silent(IWebBrowser2 *wb, IOleControl *control, BOOL is_clientsite)
1873 {
1874 VARIANT_BOOL b;
1875 HRESULT hres;
1876
1877 b = 100;
1878 hres = IWebBrowser2_get_Silent(wb, &b);
1879 ok(hres == S_OK, "get_Silent failed: %08x\n", hres);
1880 ok(b == VARIANT_FALSE, "b=%x\n", b);
1881
1882 hres = IWebBrowser2_put_Silent(wb, VARIANT_TRUE);
1883 ok(hres == S_OK, "set_Silent failed: %08x\n", hres);
1884
1885 b = 100;
1886 hres = IWebBrowser2_get_Silent(wb, &b);
1887 ok(hres == S_OK, "get_Silent failed: %08x\n", hres);
1888 ok(b == VARIANT_TRUE, "b=%x\n", b);
1889
1890 hres = IWebBrowser2_put_Silent(wb, 100);
1891 ok(hres == S_OK, "set_Silent failed: %08x\n", hres);
1892
1893 b = 100;
1894 hres = IWebBrowser2_get_Silent(wb, &b);
1895 ok(hres == S_OK, "get_Silent failed: %08x\n", hres);
1896 ok(b == VARIANT_TRUE, "b=%x\n", b);
1897
1898 hres = IWebBrowser2_put_Silent(wb, VARIANT_FALSE);
1899 ok(hres == S_OK, "set_Silent failed: %08x\n", hres);
1900
1901 b = 100;
1902 hres = IWebBrowser2_get_Silent(wb, &b);
1903 ok(hres == S_OK, "get_Silent failed: %08x\n", hres);
1904 ok(b == VARIANT_FALSE, "b=%x\n", b);
1905
1906 if(is_clientsite) {
1907 hres = IWebBrowser2_put_Silent(wb, VARIANT_TRUE);
1908 ok(hres == S_OK, "set_Silent failed: %08x\n", hres);
1909
1910 SET_EXPECT(Invoke_AMBIENT_SILENT);
1911 }
1912
1913 hres = IOleControl_OnAmbientPropertyChange(control, DISPID_AMBIENT_SILENT);
1914 ok(hres == S_OK, "OnAmbientPropertyChange failed %08x\n", hres);
1915
1916 if(is_clientsite)
1917 CHECK_CALLED(Invoke_AMBIENT_SILENT);
1918
1919 b = 100;
1920 hres = IWebBrowser2_get_Silent(wb, &b);
1921 ok(hres == S_OK, "get_Silent failed: %08x\n", hres);
1922 ok(b == VARIANT_FALSE, "b=%x\n", b);
1923 }
1924
1925 static void test_Offline(IWebBrowser2 *wb, IOleControl *control, BOOL is_clientsite)
1926 {
1927 VARIANT_BOOL b;
1928 HRESULT hres;
1929
1930 b = 100;
1931 hres = IWebBrowser2_get_Offline(wb, &b);
1932 ok(hres == S_OK, "get_Offline failed: %08x\n", hres);
1933 ok(b == VARIANT_FALSE, "b=%x\n", b);
1934
1935 hres = IWebBrowser2_put_Offline(wb, VARIANT_TRUE);
1936 ok(hres == S_OK, "set_Offline failed: %08x\n", hres);
1937
1938 b = 100;
1939 hres = IWebBrowser2_get_Offline(wb, &b);
1940 ok(hres == S_OK, "get_Offline failed: %08x\n", hres);
1941 ok(b == VARIANT_TRUE, "b=%x\n", b);
1942
1943 hres = IWebBrowser2_put_Offline(wb, 100);
1944 ok(hres == S_OK, "set_Offline failed: %08x\n", hres);
1945
1946 b = 100;
1947 hres = IWebBrowser2_get_Offline(wb, &b);
1948 ok(hres == S_OK, "get_Offline failed: %08x\n", hres);
1949 ok(b == VARIANT_TRUE, "b=%x\n", b);
1950
1951 hres = IWebBrowser2_put_Offline(wb, VARIANT_FALSE);
1952 ok(hres == S_OK, "set_Offline failed: %08x\n", hres);
1953
1954 b = 100;
1955 hres = IWebBrowser2_get_Offline(wb, &b);
1956 ok(hres == S_OK, "get_Offline failed: %08x\n", hres);
1957 ok(b == VARIANT_FALSE, "b=%x\n", b);
1958
1959 if(is_clientsite) {
1960 hres = IWebBrowser2_put_Offline(wb, VARIANT_TRUE);
1961 ok(hres == S_OK, "set_Offline failed: %08x\n", hres);
1962
1963 SET_EXPECT(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
1964 }
1965
1966 hres = IOleControl_OnAmbientPropertyChange(control, DISPID_AMBIENT_OFFLINEIFNOTCONNECTED);
1967 ok(hres == S_OK, "OnAmbientPropertyChange failed %08x\n", hres);
1968
1969 if(is_clientsite)
1970 CHECK_CALLED(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
1971
1972 b = 100;
1973 hres = IWebBrowser2_get_Offline(wb, &b);
1974 ok(hres == S_OK, "get_Offline failed: %08x\n", hres);
1975 ok(b == VARIANT_FALSE, "b=%x\n", b);
1976 }
1977
1978 static void test_ambient_unknown(IWebBrowser2 *wb, IOleControl *control, BOOL is_clientsite)
1979 {
1980 HRESULT hres;
1981
1982 SET_EXPECT(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
1983 SET_EXPECT(Invoke_AMBIENT_SILENT);
1984 SET_EXPECT(Invoke_AMBIENT_USERMODE);
1985 SET_EXPECT(Invoke_AMBIENT_DLCONTROL);
1986 SET_EXPECT(Invoke_AMBIENT_USERAGENT);
1987 SET_EXPECT(Invoke_AMBIENT_PALETTE);
1988
1989 hres = IOleControl_OnAmbientPropertyChange(control, DISPID_UNKNOWN);
1990 ok(hres == S_OK, "OnAmbientPropertyChange failed %08x\n", hres);
1991
1992 CHECK_EXPECT(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
1993 CHECK_EXPECT(Invoke_AMBIENT_SILENT);
1994 CHECK_EXPECT(Invoke_AMBIENT_USERMODE);
1995 CHECK_EXPECT(Invoke_AMBIENT_DLCONTROL);
1996 CHECK_EXPECT(Invoke_AMBIENT_USERAGENT);
1997 CHECK_EXPECT(Invoke_AMBIENT_PALETTE);
1998
1999 CLEAR_CALLED(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
2000 CLEAR_CALLED(Invoke_AMBIENT_SILENT);
2001 CLEAR_CALLED(Invoke_AMBIENT_USERMODE);
2002 CLEAR_CALLED(Invoke_AMBIENT_DLCONTROL);
2003 CLEAR_CALLED(Invoke_AMBIENT_USERAGENT);
2004 CLEAR_CALLED(Invoke_AMBIENT_PALETTE);
2005 }
2006
2007 static void test_wb_funcs(IUnknown *unk, BOOL is_clientsite)
2008 {
2009 IWebBrowser2 *wb;
2010 IOleControl *control;
2011 HRESULT hres;
2012
2013 hres = IUnknown_QueryInterface(unk, &IID_IWebBrowser2, (void**)&wb);
2014 ok(hres == S_OK, "Could not get IWebBrowser2 interface: %08x\n", hres);
2015
2016 hres = IUnknown_QueryInterface(unk, &IID_IOleControl, (void**)&control);
2017 ok(hres == S_OK, "Could not get IOleControl interface: %08x\n", hres);
2018
2019 test_Silent(wb, control, is_clientsite);
2020 test_Offline(wb, control, is_clientsite);
2021 test_ambient_unknown(wb, control, is_clientsite);
2022
2023 IWebBrowser_Release(wb);
2024 IOleControl_Release(control);
2025 }
2026
2027 static void test_GetControlInfo(IUnknown *unk)
2028 {
2029 IOleControl *control;
2030 CONTROLINFO info;
2031 HRESULT hres;
2032
2033 hres = IUnknown_QueryInterface(unk, &IID_IOleControl, (void**)&control);
2034 ok(hres == S_OK, "Could not get IOleControl: %08x\n", hres);
2035 if(FAILED(hres))
2036 return;
2037
2038 hres = IOleControl_GetControlInfo(control, &info);
2039 ok(hres == E_NOTIMPL, "GetControlInfo failed: %08x, exxpected E_NOTIMPL\n", hres);
2040 hres = IOleControl_GetControlInfo(control, NULL);
2041 ok(hres == E_NOTIMPL, "GetControlInfo failed: %08x, exxpected E_NOTIMPL\n", hres);
2042
2043 IOleControl_Release(control);
2044 }
2045
2046 static void test_Extent(IUnknown *unk)
2047 {
2048 IOleObject *oleobj;
2049 SIZE size, expected;
2050 HRESULT hres;
2051 DWORD dpi_x;
2052 DWORD dpi_y;
2053 HDC hdc;
2054
2055 /* default aspect ratio is 96dpi / 96dpi */
2056 hdc = GetDC(0);
2057 dpi_x = GetDeviceCaps(hdc, LOGPIXELSX);
2058 dpi_y = GetDeviceCaps(hdc, LOGPIXELSY);
2059 ReleaseDC(0, hdc);
2060 if (dpi_x != 96 || dpi_y != 96)
2061 trace("dpi: %d / %d\n", dpi_y, dpi_y);
2062
2063 hres = IUnknown_QueryInterface(unk, &IID_IOleObject, (void**)&oleobj);
2064 ok(hres == S_OK, "Could not get IOleObkect: %08x\n", hres);
2065 if(FAILED(hres))
2066 return;
2067
2068 size.cx = size.cy = 0xdeadbeef;
2069 hres = IOleObject_GetExtent(oleobj, DVASPECT_CONTENT, &size);
2070 ok(hres == S_OK, "GetExtent failed: %08x\n", hres);
2071 /* Default size is 50x20 pixels, in himetric units */
2072 expected.cx = MulDiv( 50, 2540, dpi_x );
2073 expected.cy = MulDiv( 20, 2540, dpi_y );
2074 ok(size.cx == expected.cx && size.cy == expected.cy, "size = {%d %d} (expected %d %d)\n",
2075 size.cx, size.cy, expected.cx, expected.cy );
2076
2077 size.cx = 800;
2078 size.cy = 700;
2079 hres = IOleObject_SetExtent(oleobj, DVASPECT_CONTENT, &size);
2080 ok(hres == S_OK, "SetExtent failed: %08x\n", hres);
2081
2082 size.cx = size.cy = 0xdeadbeef;
2083 hres = IOleObject_GetExtent(oleobj, DVASPECT_CONTENT, &size);
2084 ok(hres == S_OK, "GetExtent failed: %08x\n", hres);
2085 ok(size.cx == 800 && size.cy == 700, "size = {%d %d}\n", size.cx, size.cy);
2086
2087 size.cx = size.cy = 0xdeadbeef;
2088 hres = IOleObject_GetExtent(oleobj, 0, &size);
2089 ok(hres == S_OK, "GetExtent failed: %08x\n", hres);
2090 ok(size.cx == 800 && size.cy == 700, "size = {%d %d}\n", size.cx, size.cy);
2091
2092 size.cx = 900;
2093 size.cy = 800;
2094 hres = IOleObject_SetExtent(oleobj, 0, &size);
2095 ok(hres == S_OK, "SetExtent failed: %08x\n", hres);
2096
2097 size.cx = size.cy = 0xdeadbeef;
2098 hres = IOleObject_GetExtent(oleobj, 0, &size);
2099 ok(hres == S_OK, "GetExtent failed: %08x\n", hres);
2100 ok(size.cx == 900 && size.cy == 800, "size = {%d %d}\n", size.cx, size.cy);
2101
2102 size.cx = size.cy = 0xdeadbeef;
2103 hres = IOleObject_GetExtent(oleobj, 0xdeadbeef, &size);
2104 ok(hres == S_OK, "GetExtent failed: %08x\n", hres);
2105 ok(size.cx == 900 && size.cy == 800, "size = {%d %d}\n", size.cx, size.cy);
2106
2107 size.cx = 1000;
2108 size.cy = 900;
2109 hres = IOleObject_SetExtent(oleobj, 0xdeadbeef, &size);
2110 ok(hres == S_OK, "SetExtent failed: %08x\n", hres);
2111
2112 size.cx = size.cy = 0xdeadbeef;
2113 hres = IOleObject_GetExtent(oleobj, 0xdeadbeef, &size);
2114 ok(hres == S_OK, "GetExtent failed: %08x\n", hres);
2115 ok(size.cx == 1000 && size.cy == 900, "size = {%d %d}\n", size.cx, size.cy);
2116
2117 size.cx = size.cy = 0xdeadbeef;
2118 hres = IOleObject_GetExtent(oleobj, DVASPECT_CONTENT, &size);
2119 ok(hres == S_OK, "GetExtent failed: %08x\n", hres);
2120 ok(size.cx == 1000 && size.cy == 900, "size = {%d %d}\n", size.cx, size.cy);
2121
2122 IOleObject_Release(oleobj);
2123 }
2124
2125 static void test_ConnectionPoint(IUnknown *unk, BOOL init)
2126 {
2127 IConnectionPointContainer *container;
2128 IConnectionPoint *point;
2129 HRESULT hres;
2130
2131 static DWORD dw = 100;
2132
2133 hres = IUnknown_QueryInterface(unk, &IID_IConnectionPointContainer, (void**)&container);
2134 ok(hres == S_OK, "QueryInterface(IID_IConnectionPointContainer) failed: %08x\n", hres);
2135 if(FAILED(hres))
2136 return;
2137
2138 hres = IConnectionPointContainer_FindConnectionPoint(container, &DIID_DWebBrowserEvents2, &point);
2139 IConnectionPointContainer_Release(container);
2140 ok(hres == S_OK, "FindConnectionPoint failed: %08x\n", hres);
2141 if(FAILED(hres))
2142 return;
2143
2144 if(init) {
2145 hres = IConnectionPoint_Advise(point, (IUnknown*)&WebBrowserEvents2, &dw);
2146 ok(hres == S_OK, "Advise failed: %08x\n", hres);
2147 ok(dw == 1, "dw=%d, expected 1\n", dw);
2148 }else {
2149 hres = IConnectionPoint_Unadvise(point, dw);
2150 ok(hres == S_OK, "Unadvise failed: %08x\n", hres);
2151 }
2152
2153 IConnectionPoint_Release(point);
2154 }
2155
2156 static void test_Navigate2(IUnknown *unk)
2157 {
2158 IWebBrowser2 *webbrowser;
2159 VARIANT url;
2160 HRESULT hres;
2161
2162 hres = IUnknown_QueryInterface(unk, &IID_IWebBrowser2, (void**)&webbrowser);
2163 ok(hres == S_OK, "QueryInterface(IID_IWebBrowser) failed: %08x\n", hres);
2164 if(FAILED(hres))
2165 return;
2166
2167 test_LocationURL(unk, is_first_load ? "" : current_url);
2168 test_ready_state(is_first_load ? READYSTATE_UNINITIALIZED : READYSTATE_COMPLETE);
2169
2170 V_VT(&url) = VT_BSTR;
2171 V_BSTR(&url) = a2bstr("about:blank");
2172 current_url = "about:blank";
2173
2174 if(is_first_load) {
2175 SET_EXPECT(Invoke_AMBIENT_USERMODE);
2176 SET_EXPECT(Invoke_PROPERTYCHANGE);
2177 SET_EXPECT(Invoke_BEFORENAVIGATE2);
2178 SET_EXPECT(Invoke_DOWNLOADBEGIN);
2179 SET_EXPECT(Exec_SETDOWNLOADSTATE_1);
2180 SET_EXPECT(EnableModeless_FALSE);
2181 SET_EXPECT(Invoke_STATUSTEXTCHANGE);
2182 SET_EXPECT(SetStatusText);
2183 SET_EXPECT(GetHostInfo);
2184 SET_EXPECT(Invoke_AMBIENT_DLCONTROL);
2185 SET_EXPECT(Invoke_AMBIENT_USERAGENT);
2186 SET_EXPECT(Invoke_AMBIENT_PALETTE);
2187 SET_EXPECT(GetOptionKeyPath);
2188 SET_EXPECT(GetOverridesKeyPath);
2189 SET_EXPECT(QueryStatus_SETPROGRESSTEXT);
2190 SET_EXPECT(Exec_SETPROGRESSMAX);
2191 SET_EXPECT(Exec_SETPROGRESSPOS);
2192 SET_EXPECT(Invoke_SETSECURELOCKICON);
2193 SET_EXPECT(Invoke_FILEDOWNLOAD);
2194 SET_EXPECT(Exec_SETDOWNLOADSTATE_0);
2195 SET_EXPECT(Invoke_COMMANDSTATECHANGE);
2196 SET_EXPECT(EnableModeless_TRUE);
2197 }
2198
2199 hres = IWebBrowser2_Navigate2(webbrowser, &url, NULL, NULL, NULL, NULL);
2200 ok(hres == S_OK, "Navigate2 failed: %08x\n", hres);
2201
2202 if(is_first_load) {
2203 CHECK_CALLED(Invoke_AMBIENT_USERMODE);
2204 todo_wine CHECK_CALLED(Invoke_PROPERTYCHANGE);
2205 CHECK_CALLED(Invoke_BEFORENAVIGATE2);
2206 todo_wine CHECK_CALLED(Invoke_DOWNLOADBEGIN);
2207 todo_wine CHECK_CALLED(Exec_SETDOWNLOADSTATE_1);
2208 CHECK_CALLED(EnableModeless_FALSE);
2209 CHECK_CALLED(Invoke_STATUSTEXTCHANGE);
2210 CHECK_CALLED(SetStatusText);
2211 CHECK_CALLED(GetHostInfo);
2212 CHECK_CALLED(Invoke_AMBIENT_DLCONTROL);
2213 CHECK_CALLED(Invoke_AMBIENT_USERAGENT);
2214 CHECK_CALLED(Invoke_AMBIENT_PALETTE);
2215 CHECK_CALLED(GetOptionKeyPath);
2216 CHECK_CALLED_BROKEN(GetOverridesKeyPath);
2217 todo_wine CHECK_CALLED(QueryStatus_SETPROGRESSTEXT);
2218 todo_wine CHECK_CALLED(Exec_SETPROGRESSMAX);
2219 todo_wine CHECK_CALLED(Exec_SETPROGRESSPOS);
2220 todo_wine CHECK_CALLED_BROKEN(Invoke_SETSECURELOCKICON);
2221 todo_wine CHECK_CALLED_BROKEN(Invoke_FILEDOWNLOAD);
2222 todo_wine CHECK_CALLED(Invoke_COMMANDSTATECHANGE);
2223 todo_wine CHECK_CALLED(Exec_SETDOWNLOADSTATE_0);
2224 CHECK_CALLED(EnableModeless_TRUE);
2225 }
2226
2227 VariantClear(&url);
2228 IWebBrowser2_Release(webbrowser);
2229
2230 test_ready_state(READYSTATE_LOADING);
2231 }
2232
2233 static void test_download(DWORD flags)
2234 {
2235 MSG msg;
2236
2237 is_downloading = TRUE;
2238 dwl_flags = flags;
2239
2240 test_ready_state((flags & DWL_FROM_PUT_HREF) ? READYSTATE_COMPLETE : READYSTATE_LOADING);
2241
2242 if(flags & DWL_EXPECT_BEFORE_NAVIGATE) {
2243 SET_EXPECT(Invoke_PROPERTYCHANGE);
2244 SET_EXPECT(Invoke_BEFORENAVIGATE2);
2245 SET_EXPECT(TranslateUrl);
2246 }
2247 SET_EXPECT(Exec_SETPROGRESSMAX);
2248 SET_EXPECT(Exec_SETPROGRESSPOS);
2249 SET_EXPECT(Exec_SETDOWNLOADSTATE_1);
2250 SET_EXPECT(DocHost_EnableModeless_FALSE);
2251 SET_EXPECT(DocHost_EnableModeless_TRUE);
2252 SET_EXPECT(Invoke_SETSECURELOCKICON);
2253 SET_EXPECT(Invoke_282);
2254 SET_EXPECT(EnableModeless_FALSE);
2255 SET_EXPECT(Invoke_COMMANDSTATECHANGE);
2256 SET_EXPECT(Invoke_STATUSTEXTCHANGE);
2257 SET_EXPECT(SetStatusText);
2258 SET_EXPECT(EnableModeless_TRUE);
2259 if(is_first_load)
2260 SET_EXPECT(QueryStatus_STOP);
2261 else
2262 SET_EXPECT(GetHostInfo);
2263 SET_EXPECT(Exec_SETDOWNLOADSTATE_0);
2264 SET_EXPECT(Invoke_TITLECHANGE);
2265 SET_EXPECT(Invoke_NAVIGATECOMPLETE2);
2266 if(is_first_load)
2267 SET_EXPECT(GetDropTarget);
2268 SET_EXPECT(Invoke_PROGRESSCHANGE);
2269 SET_EXPECT(Invoke_DOCUMENTCOMPLETE);
2270 while(!called_Invoke_DOCUMENTCOMPLETE && GetMessage(&msg, NULL, 0, 0)) {
2271 TranslateMessage(&msg);
2272 DispatchMessage(&msg);
2273 }
2274
2275 if(flags & DWL_EXPECT_BEFORE_NAVIGATE) {
2276 todo_wine CHECK_CALLED(Invoke_PROPERTYCHANGE);
2277 CHECK_CALLED(Invoke_BEFORENAVIGATE2);
2278 CHECK_CALLED(TranslateUrl);
2279 }
2280 todo_wine CHECK_CALLED(Exec_SETPROGRESSMAX);
2281 todo_wine CHECK_CALLED(Exec_SETPROGRESSPOS);
2282 todo_wine CHECK_CALLED(Exec_SETDOWNLOADSTATE_1);
2283 CLEAR_CALLED(DocHost_EnableModeless_FALSE); /* IE 7 */
2284 CLEAR_CALLED(DocHost_EnableModeless_TRUE); /* IE 7 */
2285 todo_wine CHECK_CALLED(Invoke_SETSECURELOCKICON);
2286 CLEAR_CALLED(Invoke_282); /* IE 7 */
2287 if(is_first_load)
2288 todo_wine CHECK_CALLED(EnableModeless_FALSE);
2289 else
2290 CLEAR_CALLED(EnableModeless_FALSE); /* IE 8 */
2291 CLEAR_CALLED(Invoke_COMMANDSTATECHANGE);
2292 todo_wine CHECK_CALLED(Invoke_STATUSTEXTCHANGE);
2293 todo_wine CHECK_CALLED(SetStatusText);
2294 if(is_first_load)
2295 todo_wine CHECK_CALLED(EnableModeless_TRUE);
2296 else
2297 CLEAR_CALLED(EnableModeless_FALSE); /* IE 8 */
2298 if(is_first_load)
2299 todo_wine CHECK_CALLED(QueryStatus_STOP);
2300 else
2301 todo_wine CHECK_CALLED(GetHostInfo);
2302 todo_wine CHECK_CALLED(Exec_SETDOWNLOADSTATE_0);
2303 todo_wine CHECK_CALLED(Invoke_TITLECHANGE);
2304 CHECK_CALLED(Invoke_NAVIGATECOMPLETE2);
2305 if(is_first_load)
2306 todo_wine CHECK_CALLED(GetDropTarget);
2307 todo_wine CHECK_CALLED(Invoke_PROGRESSCHANGE);
2308 CHECK_CALLED(Invoke_DOCUMENTCOMPLETE);
2309
2310 is_downloading = FALSE;
2311
2312 test_ready_state(READYSTATE_COMPLETE);
2313 }
2314
2315 static void test_olecmd(IUnknown *unk, BOOL loaded)
2316 {
2317 IOleCommandTarget *cmdtrg;
2318 OLECMD cmds[3];
2319 HRESULT hres;
2320
2321 hres = IUnknown_QueryInterface(unk, &IID_IOleCommandTarget, (void**)&cmdtrg);
2322 ok(hres == S_OK, "Could not get IOleCommandTarget iface: %08x\n", hres);
2323 if(FAILED(hres))
2324 return;
2325
2326 cmds[0].cmdID = OLECMDID_SPELL;
2327 cmds[0].cmdf = 0xdeadbeef;
2328 cmds[1].cmdID = OLECMDID_REFRESH;
2329 cmds[1].cmdf = 0xdeadbeef;
2330 hres = IOleCommandTarget_QueryStatus(cmdtrg, NULL, 2, cmds, NULL);
2331 if(loaded) {
2332 ok(hres == S_OK, "QueryStatus failed: %08x\n", hres);
2333 ok(cmds[0].cmdf == OLECMDF_SUPPORTED, "OLECMDID_SPELL cmdf = %x\n", cmds[0].cmdf);
2334 ok(cmds[1].cmdf == (OLECMDF_ENABLED|OLECMDF_SUPPORTED),
2335 "OLECMDID_REFRESH cmdf = %x\n", cmds[1].cmdf);
2336 }else {
2337 ok(hres == 0x80040104, "QueryStatus failed: %08x\n", hres);
2338 ok(cmds[0].cmdf == 0xdeadbeef, "OLECMDID_SPELL cmdf = %x\n", cmds[0].cmdf);
2339 ok(cmds[1].cmdf == 0xdeadbeef, "OLECMDID_REFRESH cmdf = %x\n", cmds[0].cmdf);
2340 }
2341
2342 IOleCommandTarget_Release(cmdtrg);
2343 }
2344
2345 static void test_IServiceProvider(IUnknown *unk)
2346 {
2347 IServiceProvider *servprov = (void*)0xdeadbeef;
2348 HRESULT hres;
2349 IUnknown *ret = NULL;
2350 static const IID IID_IBrowserService2 =
2351 {0x68BD21CC,0x438B,0x11d2,{0xA5,0x60,0x00,0xA0,0xC,0x2D,0xBF,0xE8}};
2352
2353 hres = IUnknown_QueryInterface(unk, &IID_IServiceProvider, (void**)&servprov);
2354 ok(hres == S_OK, "QueryInterface returned %08x, expected S_OK\n", hres);
2355 if(FAILED(hres))
2356 return;
2357
2358 hres = IServiceProvider_QueryService(servprov, &SID_STopLevelBrowser, &IID_IBrowserService2, (LPVOID*)&ret);
2359 ok(hres == E_FAIL, "QueryService returned %08x, expected E_FAIL\n", hres);
2360 ok(ret == NULL, "ret returned %p, expected NULL\n", ret);
2361 if(hres == S_OK)
2362 {
2363 IUnknown_Release(ret);
2364 }
2365
2366 IServiceProvider_Release(servprov);
2367 }
2368
2369 #define get_document(u) _get_document(__LINE__,u)
2370 static IDispatch *_get_document(unsigned line, IUnknown *unk)
2371 {
2372 IHTMLDocument2 *html_doc;
2373 IWebBrowser2 *wb;
2374 IDispatch *disp;
2375 HRESULT hres;
2376
2377 hres = IUnknown_QueryInterface(unk, &IID_IWebBrowser2, (void**)&wb);
2378 ok_(__FILE__,line)(hres == S_OK, "QueryInterface(IID_IWebBrowser2) failed: %08x\n", hres);
2379
2380 disp = NULL;
2381 hres = IWebBrowser2_get_Document(wb, &disp);
2382 IWebBrowser2_Release(wb);
2383 ok_(__FILE__,line)(hres == S_OK, "get_Document failed: %08x\n", hres);
2384 ok_(__FILE__,line)(disp != NULL, "doc_disp == NULL\n");
2385
2386 hres = IDispatch_QueryInterface(disp, &IID_IHTMLDocument2, (void**)&html_doc);
2387 ok_(__FILE__,line)(hres == S_OK, "Could not get IHTMLDocument iface: %08x\n", hres);
2388 ok(disp == (IDispatch*)html_doc, "disp != html_doc\n");
2389 IHTMLDocument_Release(html_doc);
2390
2391 return disp;
2392 }
2393
2394 static void test_put_href(IUnknown *unk)
2395 {
2396 IHTMLLocation *location;
2397 IHTMLDocument2 *doc;
2398 IDispatch *doc_disp;
2399 BSTR str;
2400 HRESULT hres;
2401
2402 doc_disp = get_document(unk);
2403
2404 hres = IDispatch_QueryInterface(doc_disp, &IID_IHTMLDocument2, (void**)&doc);
2405 IDispatch_Release(doc_disp);
2406 ok(hres == S_OK, "QueryInterface(IID_IHTMLDocument2 failed: %08x\n", hres);
2407
2408 location = NULL;
2409 hres = IHTMLDocument2_get_location(doc, &location);
2410 IHTMLDocument2_Release(doc);
2411 ok(hres == S_OK, "get_location failed: %08x\n", hres);
2412 ok(location != NULL, "location == NULL\n");
2413
2414 SET_EXPECT(TranslateUrl);
2415 SET_EXPECT(Invoke_BEFORENAVIGATE2);
2416 SET_EXPECT(Invoke_PROPERTYCHANGE);
2417
2418 dwl_flags = DWL_FROM_PUT_HREF;
2419
2420 str = a2bstr("about:test");
2421 current_url = "about:test";
2422 is_first_load = FALSE;
2423 hres = IHTMLLocation_put_href(location, str);
2424
2425 CHECK_CALLED(TranslateUrl);
2426 CHECK_CALLED(Invoke_BEFORENAVIGATE2);
2427 todo_wine CHECK_CALLED(Invoke_PROPERTYCHANGE);
2428
2429 IHTMLLocation_Release(location);
2430 SysFreeString(str);
2431 ok(hres == S_OK, "put_href failed: %08x\n", hres);
2432
2433 test_ready_state(READYSTATE_COMPLETE);
2434 }
2435
2436 static void test_QueryInterface(IUnknown *unk)
2437 {
2438 IQuickActivate *qa = (IQuickActivate*)0xdeadbeef;
2439 IRunnableObject *runnable = (IRunnableObject*)0xdeadbeef;
2440 IPerPropertyBrowsing *propbrowse = (void*)0xdeadbeef;
2441 IOleInPlaceSite *inplace = (void*)0xdeadbeef;
2442 IOleCache *cache = (void*)0xdeadbeef;
2443 IObjectWithSite *site = (void*)0xdeadbeef;
2444 IViewObjectEx *viewex = (void*)0xdeadbeef;
2445 HRESULT hres;
2446
2447 hres = IUnknown_QueryInterface(unk, &IID_IQuickActivate, (void**)&qa);
2448 ok(hres == E_NOINTERFACE, "QueryInterface returned %08x, expected E_NOINTERFACE\n", hres);
2449 ok(qa == NULL, "qa=%p, expected NULL\n", qa);
2450
2451 hres = IUnknown_QueryInterface(unk, &IID_IRunnableObject, (void**)&runnable);
2452 ok(hres == E_NOINTERFACE, "QueryInterface returned %08x, expected E_NOINTERFACE\n", hres);
2453 ok(runnable == NULL, "runnable=%p, expected NULL\n", runnable);
2454
2455 hres = IUnknown_QueryInterface(unk, &IID_IPerPropertyBrowsing, (void**)&propbrowse);
2456 ok(hres == E_NOINTERFACE, "QueryInterface returned %08x, expected E_NOINTERFACE\n", hres);
2457 ok(propbrowse == NULL, "propbrowse=%p, expected NULL\n", propbrowse);
2458
2459 hres = IUnknown_QueryInterface(unk, &IID_IOleCache, (void**)&cache);
2460 ok(hres == E_NOINTERFACE, "QueryInterface returned %08x, expected E_NOINTERFACE\n", hres);
2461 ok(cache == NULL, "cache=%p, expected NULL\n", cache);
2462
2463 hres = IUnknown_QueryInterface(unk, &IID_IOleInPlaceSite, (void**)&inplace);
2464 ok(hres == E_NOINTERFACE, "QueryInterface returned %08x, expected E_NOINTERFACE\n", hres);
2465 ok(inplace == NULL, "inplace=%p, expected NULL\n", inplace);
2466
2467 hres = IUnknown_QueryInterface(unk, &IID_IObjectWithSite, (void**)&site);
2468 ok(hres == E_NOINTERFACE, "QueryInterface returned %08x, expected E_NOINTERFACE\n", hres);
2469 ok(site == NULL, "site=%p, expected NULL\n", site);
2470
2471 hres = IUnknown_QueryInterface(unk, &IID_IViewObjectEx, (void**)&viewex);
2472 ok(hres == E_NOINTERFACE, "QueryInterface returned %08x, expected E_NOINTERFACE\n", hres);
2473 ok(viewex == NULL, "viewex=%p, expected NULL\n", viewex);
2474
2475 }
2476
2477 static void test_WebBrowser(BOOL do_download)
2478 {
2479 IUnknown *unk = NULL;
2480 ULONG ref;
2481 HRESULT hres;
2482
2483 hres = CoCreateInstance(&CLSID_WebBrowser, NULL, CLSCTX_INPROC_SERVER|CLSCTX_INPROC_HANDLER,
2484 &IID_IUnknown, (void**)&unk);
2485 ok(hres == S_OK, "CoCreateInterface failed: %08x\n", hres);
2486 if(FAILED(hres))
2487 return;
2488
2489 is_downloading = FALSE;
2490 is_first_load = TRUE;
2491
2492 hres = IUnknown_QueryInterface(unk, &IID_IWebBrowser2, (void**)&wb);
2493 ok(hres == S_OK, "Could not get IWebBrowser2 iface: %08x\n", hres);
2494
2495 test_QueryInterface(unk);
2496 test_ready_state(READYSTATE_UNINITIALIZED);
2497 test_ClassInfo(unk);
2498 test_LocationURL(unk, "");
2499 test_ConnectionPoint(unk, TRUE);
2500 test_ClientSite(unk, &ClientSite, !do_download);
2501 test_Extent(unk);
2502 test_wb_funcs(unk, TRUE);
2503 test_DoVerb(unk);
2504 test_olecmd(unk, FALSE);
2505 test_Navigate2(unk);
2506
2507 if(do_download) {
2508 IDispatch *doc, *doc2;
2509
2510 test_download(0);
2511 test_olecmd(unk, TRUE);
2512 doc = get_document(unk);
2513
2514 test_put_href(unk);
2515 test_download(DWL_FROM_PUT_HREF);
2516 doc2 = get_document(unk);
2517 ok(doc == doc2, "doc != doc2\n");
2518 IDispatch_Release(doc2);
2519
2520 test_Navigate2(unk);
2521 test_download(DWL_EXPECT_BEFORE_NAVIGATE);
2522 doc2 = get_document(unk);
2523 ok(doc == doc2, "doc != doc2\n");
2524 IDispatch_Release(doc2);
2525 IDispatch_Release(doc2);
2526 }
2527
2528 test_ClientSite(unk, NULL, !do_download);
2529 test_ie_funcs(unk);
2530 test_GetControlInfo(unk);
2531 test_wb_funcs(unk, FALSE);
2532 test_ConnectionPoint(unk, FALSE);
2533 test_IServiceProvider(unk);
2534
2535 IWebBrowser2_Release(wb);
2536 ref = IUnknown_Release(unk);
2537 ok(ref == 0, "ref=%d, expected 0\n", ref);
2538 }
2539
2540 START_TEST(webbrowser)
2541 {
2542 container_hwnd = create_container_window();
2543
2544 OleInitialize(NULL);
2545
2546 trace("Testing WebBrowser (no download)...\n");
2547 test_WebBrowser(FALSE);
2548 trace("Testing WebBrowser...\n");
2549 test_WebBrowser(TRUE);
2550
2551 OleUninitialize();
2552 }
Quick hack tree for wine patches julliard doesn't want to commit