git.oblomov.eu Git - wine/blob - dlls/ieframe/tests/webbrowser.c

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