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