2 * Copyright 2005-2009 Jacek Caban for CodeWeavers
4 * This library is free software; you can redistribute it and/or
5 * modify it under the terms of the GNU Lesser General Public
6 * License as published by the Free Software Foundation; either
7 * version 2.1 of the License, or (at your option) any later version.
9 * This library is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12 * Lesser General Public License for more details.
14 * You should have received a copy of the GNU Lesser General Public
15 * License along with this library; if not, write to the Free Software
16 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
22 #include <wine/test.h>
42 #include "mshtml_test.h"
44 DEFINE_GUID(GUID_NULL,0,0,0,0,0,0,0,0,0,0,0);
45 DEFINE_GUID(IID_IProxyManager,0x00000008,0x0000,0x0000,0xc0,0x00,0x00,0x00,0x00,0x00,0x00,0x46);
46 DEFINE_OLEGUID(CGID_DocHostCmdPriv, 0x000214D4L, 0, 0);
48 #define DEFINE_EXPECT(func) \
49 static BOOL expect_ ## func = FALSE, called_ ## func = FALSE
51 #define SET_EXPECT(func) \
52 expect_ ## func = TRUE
54 #define SET_CALLED(func) \
55 called_ ## func = TRUE
57 #define CHECK_EXPECT2(func) \
59 ok(expect_ ##func, "unexpected call " #func "\n"); \
60 called_ ## func = TRUE; \
63 #define CHECK_EXPECT(func) \
65 CHECK_EXPECT2(func); \
66 expect_ ## func = FALSE; \
69 #define CHECK_CALLED(func) \
71 ok(called_ ## func, "expected " #func "\n"); \
72 expect_ ## func = called_ ## func = FALSE; \
75 static IOleDocumentView *view = NULL;
76 static HWND container_hwnd = NULL, hwnd = NULL, last_hwnd = NULL;
78 DEFINE_EXPECT(LockContainer);
79 DEFINE_EXPECT(SetActiveObject);
80 DEFINE_EXPECT(SetActiveObject_null);
81 DEFINE_EXPECT(GetWindow);
82 DEFINE_EXPECT(CanInPlaceActivate);
83 DEFINE_EXPECT(OnInPlaceActivate);
84 DEFINE_EXPECT(OnInPlaceActivateEx);
85 DEFINE_EXPECT(OnUIActivate);
86 DEFINE_EXPECT(GetWindowContext);
87 DEFINE_EXPECT(OnUIDeactivate);
88 DEFINE_EXPECT(OnInPlaceDeactivate);
89 DEFINE_EXPECT(OnInPlaceDeactivateEx);
90 DEFINE_EXPECT(GetContainer);
91 DEFINE_EXPECT(ShowUI);
92 DEFINE_EXPECT(ActivateMe);
93 DEFINE_EXPECT(GetHostInfo);
94 DEFINE_EXPECT(HideUI);
95 DEFINE_EXPECT(GetOptionKeyPath);
96 DEFINE_EXPECT(GetOverrideKeyPath);
97 DEFINE_EXPECT(SetStatusText);
98 DEFINE_EXPECT(QueryStatus_SETPROGRESSTEXT);
99 DEFINE_EXPECT(QueryStatus_OPEN);
100 DEFINE_EXPECT(QueryStatus_NEW);
101 DEFINE_EXPECT(Exec_SETPROGRESSMAX);
102 DEFINE_EXPECT(Exec_SETPROGRESSPOS);
103 DEFINE_EXPECT(Exec_HTTPEQUIV_DONE);
104 DEFINE_EXPECT(Exec_SETDOWNLOADSTATE_0);
105 DEFINE_EXPECT(Exec_SETDOWNLOADSTATE_1);
106 DEFINE_EXPECT(Exec_ShellDocView_37);
107 DEFINE_EXPECT(Exec_ShellDocView_63);
108 DEFINE_EXPECT(Exec_ShellDocView_67);
109 DEFINE_EXPECT(Exec_ShellDocView_84);
110 DEFINE_EXPECT(Exec_ShellDocView_103);
111 DEFINE_EXPECT(Exec_ShellDocView_105);
112 DEFINE_EXPECT(Exec_ShellDocView_140);
113 DEFINE_EXPECT(Exec_UPDATECOMMANDS);
114 DEFINE_EXPECT(Exec_SETTITLE);
115 DEFINE_EXPECT(Exec_HTTPEQUIV);
116 DEFINE_EXPECT(Exec_MSHTML_PARSECOMPLETE);
117 DEFINE_EXPECT(Exec_Explorer_69);
118 DEFINE_EXPECT(Exec_DOCCANNAVIGATE);
119 DEFINE_EXPECT(Invoke_AMBIENT_USERMODE);
120 DEFINE_EXPECT(Invoke_AMBIENT_DLCONTROL);
121 DEFINE_EXPECT(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
122 DEFINE_EXPECT(Invoke_AMBIENT_SILENT);
123 DEFINE_EXPECT(Invoke_AMBIENT_USERAGENT);
124 DEFINE_EXPECT(Invoke_AMBIENT_PALETTE);
125 DEFINE_EXPECT(GetDropTarget);
126 DEFINE_EXPECT(UpdateUI);
127 DEFINE_EXPECT(Navigate);
128 DEFINE_EXPECT(OnFrameWindowActivate);
129 DEFINE_EXPECT(OnChanged_READYSTATE);
130 DEFINE_EXPECT(OnChanged_1005);
131 DEFINE_EXPECT(OnChanged_1012);
132 DEFINE_EXPECT(GetDisplayName);
133 DEFINE_EXPECT(BindToStorage);
134 DEFINE_EXPECT(IsSystemMoniker);
135 DEFINE_EXPECT(GetBindResult);
136 DEFINE_EXPECT(GetClassID);
137 DEFINE_EXPECT(Abort);
139 DEFINE_EXPECT(CreateInstance);
140 DEFINE_EXPECT(Start);
141 DEFINE_EXPECT(Terminate);
142 DEFINE_EXPECT(Protocol_Read);
143 DEFINE_EXPECT(LockRequest);
144 DEFINE_EXPECT(UnlockRequest);
145 DEFINE_EXPECT(OnFocus_TRUE);
146 DEFINE_EXPECT(OnFocus_FALSE);
147 DEFINE_EXPECT(RequestUIActivate);
148 DEFINE_EXPECT(InPlaceFrame_SetBorderSpace);
149 DEFINE_EXPECT(InPlaceUIWindow_SetActiveObject);
150 DEFINE_EXPECT(GetExternal);
151 DEFINE_EXPECT(EnableModeless_TRUE);
152 DEFINE_EXPECT(EnableModeless_FALSE);
153 DEFINE_EXPECT(Frame_EnableModeless_TRUE);
154 DEFINE_EXPECT(Frame_EnableModeless_FALSE);
155 DEFINE_EXPECT(Frame_GetWindow);
156 DEFINE_EXPECT(TranslateUrl);
157 DEFINE_EXPECT(Advise_Close);
158 DEFINE_EXPECT(OnViewChange);
159 DEFINE_EXPECT(EvaluateNewWindow);
161 static IUnknown *doc_unk;
162 static IMoniker *doc_mon;
163 static BOOL expect_LockContainer_fLock;
164 static BOOL expect_InPlaceUIWindow_SetActiveObject_active = TRUE;
165 static BOOL ipsex, ipsw;
166 static BOOL set_clientsite, container_locked;
167 static BOOL readystate_set_loading = FALSE, readystate_set_interactive = FALSE, load_from_stream;
168 static BOOL editmode = FALSE;
169 static BOOL inplace_deactivated, open_call;
170 static int stream_read, protocol_read;
171 static enum load_state_t {
180 static LPCOLESTR expect_status_text = NULL;
181 static const char *nav_url;
183 static const char html_page[] =
185 "<head><link rel=\"stylesheet\" type=\"text/css\" href=\"test.css\"></head>"
189 static const char css_data[] = "body {color: red}";
191 static const WCHAR http_urlW[] =
192 {'h','t','t','p',':','/','/','w','w','w','.','w','i','n','e','h','q','.','o','r','g',0};
194 static const WCHAR doc_url[] = {'w','i','n','e','t','e','s','t',':','d','o','c',0};
196 #define DOCHOST_DOCCANNAVIGATE 0
198 static HRESULT QueryInterface(REFIID riid, void **ppv);
199 static void test_MSHTML_QueryStatus(IHTMLDocument2*,DWORD);
201 #define test_readyState(u) _test_readyState(__LINE__,u)
202 static void _test_readyState(unsigned,IUnknown*);
204 static const WCHAR wszTimesNewRoman[] =
205 {'T','i','m','e','s',' ','N','e','w',' ','R','o','m','a','n',0};
206 static const WCHAR wszArial[] =
207 {'A','r','i','a','l',0};
209 static const char *debugstr_guid(REFIID riid)
216 sprintf(buf, "{%08X-%04X-%04X-%02X%02X-%02X%02X%02X%02X%02X%02X}",
217 riid->Data1, riid->Data2, riid->Data3, riid->Data4[0],
218 riid->Data4[1], riid->Data4[2], riid->Data4[3], riid->Data4[4],
219 riid->Data4[5], riid->Data4[6], riid->Data4[7]);
224 static int strcmp_wa(LPCWSTR strw, const char *stra)
227 WideCharToMultiByte(CP_ACP, 0, strw, -1, buf, sizeof(buf), NULL, NULL);
228 return lstrcmpA(stra, buf);
231 static const WCHAR *strstrW( const WCHAR *str, const WCHAR *sub )
235 const WCHAR *p1 = str, *p2 = sub;
236 while (*p1 && *p2 && *p1 == *p2) { p1++; p2++; }
237 if (!*p2) return str;
243 static BSTR a2bstr(const char *str)
248 len = MultiByteToWideChar(CP_ACP, 0, str, -1, NULL, 0);
249 ret = SysAllocStringLen(NULL, len);
250 MultiByteToWideChar(CP_ACP, 0, str, -1, ret, len);
255 static BOOL is_english(void)
257 return PRIMARYLANGID(GetSystemDefaultLangID()) == LANG_ENGLISH
258 && PRIMARYLANGID(GetUserDefaultLangID()) == LANG_ENGLISH;
261 #define EXPECT_UPDATEUI 1
262 #define EXPECT_SETTITLE 2
264 static void test_timer(DWORD flags)
266 BOOL *b = &called_Exec_SETTITLE;
269 if(flags & EXPECT_UPDATEUI) {
270 SET_EXPECT(UpdateUI);
271 SET_EXPECT(Exec_UPDATECOMMANDS);
272 b = &called_UpdateUI;
274 if(flags & EXPECT_SETTITLE)
275 SET_EXPECT(Exec_SETTITLE);
277 while(!*b && GetMessage(&msg, hwnd, 0, 0)) {
278 TranslateMessage(&msg);
279 DispatchMessage(&msg);
282 if(flags & EXPECT_UPDATEUI) {
283 CHECK_CALLED(UpdateUI);
284 CHECK_CALLED(Exec_UPDATECOMMANDS);
286 if(flags & EXPECT_SETTITLE)
287 CHECK_CALLED(Exec_SETTITLE);
290 static IMoniker Moniker;
292 #define test_GetCurMoniker(u,m,v) _test_GetCurMoniker(__LINE__,u,m,v)
293 static void _test_GetCurMoniker(unsigned line, IUnknown *unk, IMoniker *exmon, const char *exurl)
296 IPersistMoniker *permon;
297 IMoniker *mon = (void*)0xdeadbeef;
298 BSTR doc_url = (void*)0xdeadbeef;
304 hres = IUnknown_QueryInterface(unk, &IID_IPersistMoniker, (void**)&permon);
305 ok(hres == S_OK, "QueryInterface(IID_IPersistMoniker) failed: %08x\n", hres);
309 hres = IUnknown_QueryInterface(unk, &IID_IHTMLDocument2, (void**)&doc);
310 ok(hres == S_OK, "QueryInterface(IID_IHTMLDocument2) failed: %08x\n", hres);
312 hres = IHTMLDocument2_get_URL(doc, &doc_url);
313 ok(hres == S_OK, "get_URL failed: %08x\n", hres);
315 hres = IPersistMoniker_GetCurMoniker(permon, &mon);
316 IPersistMoniker_Release(permon);
320 BOOL exb = expect_GetDisplayName;
321 BOOL clb = called_GetDisplayName;
323 ok_(__FILE__,line)(hres == S_OK, "GetCurrentMoniker failed: %08x\n", hres);
324 ok_(__FILE__,line)(mon == exmon, "mon(%p) != exmon(%p)\n", mon, exmon);
327 SET_EXPECT(GetDisplayName);
328 hres = IMoniker_GetDisplayName(mon, NULL, NULL, &url);
329 ok(hres == S_OK, "GetDisplayName failed: %08x\n", hres);
331 CHECK_CALLED(GetDisplayName);
332 expect_GetDisplayName = exb;
333 called_GetDisplayName = clb;
335 ok(!lstrcmpW(url, doc_url), "url != doc_url\n");
340 ok_(__FILE__,line)(hres == S_OK, "GetCurrentMoniker failed: %08x\n", hres);
342 hres = IMoniker_GetDisplayName(mon, NULL, NULL, &url);
343 ok(hres == S_OK, "GetDisplayName failed: %08x\n", hres);
345 ok_(__FILE__,line)(!strcmp_wa(url, exurl), "unexpected url %s\n", wine_dbgstr_w(url));
346 ok_(__FILE__,line)(!lstrcmpW(url, doc_url), "url != doc_url\n");
350 ok_(__FILE__,line)(hres == E_UNEXPECTED,
351 "GetCurrentMoniker failed: %08x, expected E_UNEXPECTED\n", hres);
352 ok_(__FILE__,line)(mon == (IMoniker*)0xdeadbeef, "mon=%p\n", mon);
353 ok_(__FILE__,line)(!strcmp_wa(doc_url, "about:blank"), "doc_url is not about:blank\n");
356 SysFreeString(doc_url);
357 IHTMLDocument_Release(doc);
358 if(mon && mon != (void*)0xdeadbeef)
359 IMoniker_Release(mon);
362 DEFINE_GUID(IID_External_unk,0x30510406,0x98B5,0x11CF,0xBB,0x82,0x00,0xAA,0x00,0xBD,0xCE,0x0B);
364 static HRESULT WINAPI External_QueryInterface(IDispatch *iface, REFIID riid, void **ppv)
368 if(IsEqualGUID(&IID_IUnknown, riid) || IsEqualGUID(&IID_IDispatch, riid)) {
373 if(IsEqualGUID(&IID_IProxyManager, riid))
374 return E_NOINTERFACE; /* TODO */
375 if(IsEqualGUID(&IID_IDispatchEx, riid))
376 return E_NOINTERFACE; /* TODO */
377 if(IsEqualGUID(&IID_External_unk, riid))
378 return E_NOINTERFACE; /* TODO */
380 ok(0, "unexpected riid: %s\n", debugstr_guid(riid));
381 return E_NOINTERFACE;
384 static ULONG WINAPI Dispatch_AddRef(IDispatch *iface)
389 static ULONG WINAPI Dispatch_Release(IDispatch *iface)
394 static HRESULT WINAPI Dispatch_GetTypeInfoCount(IDispatch *iface, UINT *pctinfo)
396 ok(0, "unexpected call\n");
400 static HRESULT WINAPI Dispatch_GetTypeInfo(IDispatch *iface, UINT iTInfo, LCID lcid,
403 ok(0, "unexpected call\n");
407 static HRESULT WINAPI Dispatch_GetIDsOfNames(IDispatch *iface, REFIID riid, LPOLESTR *rgszNames,
408 UINT cNames, LCID lcid, DISPID *rgDispId)
410 ok(0, "unexpected call\n");
414 static HRESULT WINAPI External_Invoke(IDispatch *iface, DISPID dispIdMember, REFIID riid,
415 LCID lcid, WORD wFlags, DISPPARAMS *pDispParams, VARIANT *pVarResult,
416 EXCEPINFO *pExcepInfo, UINT *puArgErr)
418 ok(0, "unexpected call\n");
422 static const IDispatchVtbl ExternalVtbl = {
423 External_QueryInterface,
426 Dispatch_GetTypeInfoCount,
427 Dispatch_GetTypeInfo,
428 Dispatch_GetIDsOfNames,
432 static IDispatch External = { &ExternalVtbl };
434 static HRESULT WINAPI Protocol_QueryInterface(IInternetProtocol *iface, REFIID riid, void **ppv)
436 if(IsEqualGUID(&IID_IUnknown, riid) || IsEqualGUID(&IID_IInternetProtocol, riid)) {
442 return E_NOINTERFACE;
445 static ULONG WINAPI Protocol_AddRef(IInternetProtocol *iface)
450 static ULONG WINAPI Protocol_Release(IInternetProtocol *iface)
455 static HRESULT WINAPI Protocol_Start(IInternetProtocol *iface, LPCWSTR szUrl,
456 IInternetProtocolSink *pOIProtSink, IInternetBindInfo *pOIBindInfo,
457 DWORD grfPI, HANDLE_PTR dwReserved)
463 static const WCHAR wszTextCss[] = {'t','e','x','t','/','c','s','s',0};
464 static const WCHAR empty_str = {0};
468 ok(pOIProtSink != NULL, "pOIProtSink == NULL\n");
469 ok(pOIBindInfo != NULL, "pOIBindInfo == NULL\n");
470 ok(!grfPI, "grfPI = %x\n", grfPI);
471 ok(!dwReserved, "dwReserved = %lx\n", dwReserved);
473 memset(&bindinfo, 0, sizeof(bindinfo));
474 bindinfo.cbSize = sizeof(bindinfo);
475 hres = IInternetBindInfo_GetBindInfo(pOIBindInfo, &bindf, &bindinfo);
476 ok(hres == S_OK, "GetBindInfo failed: %08x\n", hres);
477 ok(bindf == (BINDF_FROMURLMON|BINDF_PULLDATA|BINDF_NEEDFILE|BINDF_ASYNCSTORAGE|BINDF_ASYNCHRONOUS),
478 "bindf = %x\n", bindf);
480 ok(bindinfo.cbSize == sizeof(bindinfo), "bindinfo.cbSize=%d\n", bindinfo.cbSize);
481 ok(bindinfo.szExtraInfo == NULL, "bindinfo.szExtraInfo=%p\n", bindinfo.szExtraInfo);
482 /* TODO: test stgmedData */
483 ok(bindinfo.grfBindInfoF == 0, "bindinfo.grfBinfInfoF=%08x\n", bindinfo.grfBindInfoF);
484 ok(bindinfo.dwBindVerb == 0, "bindinfo.dwBindVerb=%d\n", bindinfo.dwBindVerb);
485 ok(bindinfo.szCustomVerb == 0, "bindinfo.szCustomVerb=%p\n", bindinfo.szCustomVerb);
486 ok(bindinfo.cbstgmedData == 0, "bindinfo.cbstgmedData=%d\n", bindinfo.cbstgmedData);
487 ok(bindinfo.dwOptions == 0x80000 ||
488 bindinfo.dwOptions == 0x4080000, /* win2k3 */
489 "bindinfo.dwOptions=%x\n", bindinfo.dwOptions);
490 ok(bindinfo.dwOptionsFlags == 0, "bindinfo.dwOptionsFlags=%d\n", bindinfo.dwOptionsFlags);
491 /* TODO: test dwCodePage */
492 /* TODO: test securityAttributes */
493 ok(IsEqualGUID(&IID_NULL, &bindinfo.iid), "unexpected bindinfo.iid\n");
494 ok(bindinfo.pUnk == NULL, "bindinfo.pUnk=%p\n", bindinfo.pUnk);
495 ok(bindinfo.dwReserved == 0, "bindinfo.dwReserved=%d\n", bindinfo.dwReserved);
497 hres = IInternetProtocolSink_ReportProgress(pOIProtSink,
498 BINDSTATUS_CACHEFILENAMEAVAILABLE, &empty_str);
499 ok(hres == S_OK, "ReportProgress(BINDSTATUS_CACHEFILENAMEAVAILABLE) failed: %08x\n", hres);
501 hres = IInternetProtocolSink_ReportProgress(pOIProtSink,
502 BINDSTATUS_VERIFIEDMIMETYPEAVAILABLE, wszTextCss);
504 "ReportProgress(BINDSTATUS_VERIFIEDMIMETYPEAVAILABLE) failed: %08x\n", hres);
506 hres = IInternetProtocolSink_ReportData(pOIProtSink,
507 BSCF_FIRSTDATANOTIFICATION | BSCF_LASTDATANOTIFICATION, 13, 13);
508 ok(hres == S_OK, "ReportData failed: %08x\n", hres);
510 hres = IInternetProtocolSink_ReportResult(pOIProtSink, S_OK, 0, NULL);
511 ok(hres == S_OK, "ReportResult failed: %08x\n", hres);
516 static HRESULT WINAPI Protocol_Continue(IInternetProtocol *iface,
517 PROTOCOLDATA *pProtocolData)
519 ok(0, "unexpected call\n");
523 static HRESULT WINAPI Protocol_Abort(IInternetProtocol *iface, HRESULT hrReason,
526 ok(0, "unexpected call\n");
530 static HRESULT WINAPI Protocol_Terminate(IInternetProtocol *iface, DWORD dwOptions)
532 CHECK_EXPECT(Terminate);
536 static HRESULT WINAPI Protocol_Suspend(IInternetProtocol *iface)
538 ok(0, "unexpected call\n");
542 static HRESULT WINAPI Protocol_Resume(IInternetProtocol *iface)
544 ok(0, "unexpected call\n");
548 static HRESULT WINAPI Protocol_Read(IInternetProtocol *iface, void *pv,
549 ULONG cb, ULONG *pcbRead)
551 CHECK_EXPECT2(Protocol_Read);
553 ok(pv != NULL, "pv == NULL\n");
554 ok(cb > sizeof(css_data), "cb < sizeof(css_data)\n");
555 ok(pcbRead != NULL, "pcbRead == NULL\n");
556 ok(!*pcbRead, "*pcbRead=%d\n", *pcbRead);
561 protocol_read += *pcbRead = sizeof(css_data)-1;
562 memcpy(pv, css_data, sizeof(css_data)-1);
566 static HRESULT WINAPI Protocol_Seek(IInternetProtocol *iface,
567 LARGE_INTEGER dlibMove, DWORD dwOrigin, ULARGE_INTEGER *plibNewPosition)
569 ok(0, "unexpected call\n");
573 static HRESULT WINAPI Protocol_LockRequest(IInternetProtocol *iface, DWORD dwOptions)
575 CHECK_EXPECT(LockRequest);
579 static HRESULT WINAPI Protocol_UnlockRequest(IInternetProtocol *iface)
581 CHECK_EXPECT(UnlockRequest);
585 static const IInternetProtocolVtbl ProtocolVtbl = {
586 Protocol_QueryInterface,
597 Protocol_LockRequest,
598 Protocol_UnlockRequest
601 static IInternetProtocol Protocol = { &ProtocolVtbl };
603 static HRESULT WINAPI ClassFactory_QueryInterface(IClassFactory *iface, REFIID riid, void **ppv)
605 if(!IsEqualGUID(&IID_IInternetProtocolInfo, riid))
606 ok(0, "unexpected call\n");
607 return E_NOINTERFACE;
610 static ULONG WINAPI ClassFactory_AddRef(IClassFactory *iface)
615 static ULONG WINAPI ClassFactory_Release(IClassFactory *iface)
620 static HRESULT WINAPI ClassFactory_CreateInstance(IClassFactory *iface, IUnknown *pOuter,
621 REFIID riid, void **ppv)
623 if(IsEqualGUID(&IID_IInternetProtocolInfo, riid))
624 return E_NOINTERFACE;
626 CHECK_EXPECT(CreateInstance);
627 ok(ppv != NULL, "ppv == NULL\n");
633 static HRESULT WINAPI ClassFactory_LockServer(IClassFactory *iface, BOOL dolock)
635 ok(0, "unexpected call\n");
639 static const IClassFactoryVtbl ClassFactoryVtbl = {
640 ClassFactory_QueryInterface,
642 ClassFactory_Release,
643 ClassFactory_CreateInstance,
644 ClassFactory_LockServer
647 static IClassFactory ClassFactory = { &ClassFactoryVtbl };
649 static HRESULT WINAPI HlinkFrame_QueryInterface(IHlinkFrame *iface, REFIID riid, void **ppv)
651 ok(0, "unexpected call\n");
655 static ULONG WINAPI HlinkFrame_AddRef(IHlinkFrame *iface)
660 static ULONG WINAPI HlinkFrame_Release(IHlinkFrame *iface)
665 static HRESULT WINAPI HlinkFrame_SetBrowseContext(IHlinkFrame *iface,
666 IHlinkBrowseContext *pihlbc)
668 ok(0, "unexpected call\n");
672 static HRESULT WINAPI HlinkFrame_GetBrowseContext(IHlinkFrame *iface,
673 IHlinkBrowseContext **ppihlbc)
675 ok(0, "unexpected call\n");
679 static HRESULT WINAPI HlinkFrame_Navigate(IHlinkFrame *iface, DWORD grfHLNF, LPBC pbc,
680 IBindStatusCallback *pibsc, IHlink *pihlNavigate)
684 CHECK_EXPECT(Navigate);
686 ok(grfHLNF == 0, "grfHLNF=%d, expected 0\n", grfHLNF);
687 ok(pbc != NULL, "pbc == NULL\n");
688 ok(pibsc != NULL, "pubsc == NULL\n");
689 ok(pihlNavigate != NULL, "puhlNavigate == NULL\n");
692 LPWSTR frame_name = (LPWSTR)0xdeadbeef;
693 LPWSTR location = (LPWSTR)0xdeadbeef;
695 IMoniker *mon = NULL;
696 DWORD site_data = 0xdeadbeef;
698 hres = IHlink_GetTargetFrameName(pihlNavigate, &frame_name);
700 ok(hres == S_FALSE, "GetTargetFrameName failed: %08x\n", hres);
701 ok(frame_name == NULL, "frame_name = %p\n", frame_name);
703 hres = IHlink_GetMonikerReference(pihlNavigate, 1, &mon, &location);
704 ok(hres == S_OK, "GetMonikerReference failed: %08x\n", hres);
705 ok(location == NULL, "location = %p\n", location);
706 ok(mon != NULL, "mon == NULL\n");
708 hres = IHlink_GetHlinkSite(pihlNavigate, &site, &site_data);
709 ok(hres == S_OK, "GetHlinkSite failed: %08x\n", hres);
710 ok(site == NULL, "site = %p\n, expected NULL\n", site);
711 ok(site_data == 0xdeadbeef, "site_data = %x\n", site_data);
717 static HRESULT WINAPI HlinkFrame_OnNavigate(IHlinkFrame *iface, DWORD grfHLNF,
718 IMoniker *pimkTarget, LPCWSTR pwzLocation, LPCWSTR pwzFriendlyName, DWORD dwreserved)
720 ok(0, "unexpected call\n");
724 static HRESULT WINAPI HlinkFrame_UpdateHlink(IHlinkFrame *iface, ULONG uHLID,
725 IMoniker *pimkTarget, LPCWSTR pwzLocation, LPCWSTR pwzFriendlyName)
727 ok(0, "unexpected call\n");
731 static const IHlinkFrameVtbl HlinkFrameVtbl = {
732 HlinkFrame_QueryInterface,
735 HlinkFrame_SetBrowseContext,
736 HlinkFrame_GetBrowseContext,
738 HlinkFrame_OnNavigate,
739 HlinkFrame_UpdateHlink
742 static IHlinkFrame HlinkFrame = { &HlinkFrameVtbl };
744 static HRESULT WINAPI NewWindowManager_QueryInterface(INewWindowManager *iface, REFIID riid, void **ppv)
746 ok(0, "unexpected call\n");
747 return E_NOINTERFACE;
750 static ULONG WINAPI NewWindowManager_AddRef(INewWindowManager *iface)
755 static ULONG WINAPI NewWindowManager_Release(INewWindowManager *iface)
760 static HRESULT WINAPI NewWindowManager_EvaluateNewWindow(INewWindowManager *iface, LPCWSTR pszUrl,
761 LPCWSTR pszName, LPCWSTR pszUrlContext, LPCWSTR pszFeatures, BOOL fReplace, DWORD dwFlags,
762 DWORD dwUserActionTime)
764 CHECK_EXPECT(EvaluateNewWindow);
766 ok(!strcmp_wa(pszUrl, "about:blank"), "pszUrl = %s\n", wine_dbgstr_w(pszUrl));
767 ok(!strcmp_wa(pszName, "test"), "pszName = %s\n", wine_dbgstr_w(pszName));
768 ok(!strcmp_wa(pszUrlContext, "about:replace"), "pszUrlContext = %s\n", wine_dbgstr_w(pszUrlContext));
769 ok(!pszFeatures, "pszFeatures = %s\n", wine_dbgstr_w(pszFeatures));
770 ok(!fReplace, "fReplace = %x\n", fReplace);
771 ok(dwFlags == NWMF_FIRST, "dwFlags = %x\n", dwFlags);
772 ok(!dwUserActionTime, "dwUserActionime = %d\n", dwUserActionTime);
777 static const INewWindowManagerVtbl NewWindowManagerVtbl = {
778 NewWindowManager_QueryInterface,
779 NewWindowManager_AddRef,
780 NewWindowManager_Release,
781 NewWindowManager_EvaluateNewWindow
784 static INewWindowManager NewWindowManager = { &NewWindowManagerVtbl };
786 static HRESULT WINAPI PropertyNotifySink_QueryInterface(IPropertyNotifySink *iface,
787 REFIID riid, void**ppv)
789 if(IsEqualGUID(&IID_IPropertyNotifySink, riid)) {
794 ok(0, "unexpected call\n");
795 return E_NOINTERFACE;
798 static ULONG WINAPI PropertyNotifySink_AddRef(IPropertyNotifySink *iface)
803 static ULONG WINAPI PropertyNotifySink_Release(IPropertyNotifySink *iface)
808 static HRESULT WINAPI PropertyNotifySink_OnChanged(IPropertyNotifySink *iface, DISPID dispID)
811 case DISPID_READYSTATE:
812 CHECK_EXPECT2(OnChanged_READYSTATE);
814 if(!readystate_set_interactive)
815 test_MSHTML_QueryStatus(NULL, OLECMDF_SUPPORTED
816 | (editmode && (load_state == LD_INTERACTIVE || load_state == LD_COMPLETE)
817 ? OLECMDF_ENABLED : 0));
819 if(readystate_set_loading) {
820 readystate_set_loading = FALSE;
821 load_state = LD_LOADING;
823 if(!editmode || load_state != LD_LOADING || !called_Exec_Explorer_69)
824 test_readyState(NULL);
827 CHECK_EXPECT(OnChanged_1005);
829 test_readyState(NULL);
830 readystate_set_interactive = (load_state != LD_INTERACTIVE);
833 CHECK_EXPECT(OnChanged_1012);
846 ok(0, "unexpected id %d\n", dispID);
850 static HRESULT WINAPI PropertyNotifySink_OnRequestEdit(IPropertyNotifySink *iface, DISPID dispID)
852 ok(0, "unexpected call\n");
856 static IPropertyNotifySinkVtbl PropertyNotifySinkVtbl = {
857 PropertyNotifySink_QueryInterface,
858 PropertyNotifySink_AddRef,
859 PropertyNotifySink_Release,
860 PropertyNotifySink_OnChanged,
861 PropertyNotifySink_OnRequestEdit
864 static IPropertyNotifySink PropertyNotifySink = { &PropertyNotifySinkVtbl };
866 static HRESULT WINAPI Stream_QueryInterface(IStream *iface, REFIID riid, void **ppv)
868 ok(0, "unexpected call\n");
869 return E_NOINTERFACE;
872 static ULONG WINAPI Stream_AddRef(IStream *iface)
877 static ULONG WINAPI Stream_Release(IStream *iface)
882 static HRESULT WINAPI Stream_Read(IStream *iface, void *pv,
883 ULONG cb, ULONG *pcbRead)
886 ok(pv != NULL, "pv == NULL\n");
887 ok(cb > sizeof(html_page), "cb = %d\n", cb);
888 ok(pcbRead != NULL, "pcbRead == NULL\n");
889 ok(!*pcbRead, "*pcbRead = %d\n", *pcbRead);
894 memcpy(pv, html_page, sizeof(html_page)-1);
895 stream_read += *pcbRead = sizeof(html_page)-1;
899 static HRESULT WINAPI Stream_Write(IStream *iface, const void *pv,
900 ULONG cb, ULONG *pcbWritten)
902 ok(0, "unexpected call\n");
906 static HRESULT WINAPI Stream_Seek(IStream *iface, LARGE_INTEGER dlibMove,
907 DWORD dwOrigin, ULARGE_INTEGER *plibNewPosition)
909 ok(0, "unexpected call\n");
913 static HRESULT WINAPI Stream_SetSize(IStream *iface, ULARGE_INTEGER libNewSize)
915 ok(0, "unexpected call\n");
919 static HRESULT WINAPI Stream_CopyTo(IStream *iface, IStream *pstm,
920 ULARGE_INTEGER cb, ULARGE_INTEGER *pcbRead, ULARGE_INTEGER *pcbWritten)
922 ok(0, "unexpected call\n");
926 static HRESULT WINAPI Stream_Commit(IStream *iface, DWORD grfCommitFlags)
928 ok(0, "unexpected call\n");
932 static HRESULT WINAPI Stream_Revert(IStream *iface)
934 ok(0, "unexpected call\n");
938 static HRESULT WINAPI Stream_LockRegion(IStream *iface, ULARGE_INTEGER libOffset,
939 ULARGE_INTEGER cb, DWORD dwLockType)
941 ok(0, "unexpected call\n");
945 static HRESULT WINAPI Stream_UnlockRegion(IStream *iface,
946 ULARGE_INTEGER libOffset, ULARGE_INTEGER cb, DWORD dwLockType)
948 ok(0, "unexpected call\n");
952 static HRESULT WINAPI Stream_Stat(IStream *iface, STATSTG *pstatstg,
955 ok(0, "unexpected call\n");
959 static HRESULT WINAPI Stream_Clone(IStream *iface, IStream **ppstm)
961 ok(0, "unexpected call\n");
965 static const IStreamVtbl StreamVtbl = {
966 Stream_QueryInterface,
982 static IStream Stream = { &StreamVtbl };
984 static HRESULT WINAPI Binding_QueryInterface(IBinding *iface, REFIID riid, void **ppv)
986 if(IsEqualGUID(&IID_IWinInetHttpInfo, riid))
987 return E_NOINTERFACE; /* TODO */
989 if(IsEqualGUID(&IID_IWinInetInfo, riid))
990 return E_NOINTERFACE; /* TODO */
992 ok(0, "unexpected call\n");
993 return E_NOINTERFACE;
996 static ULONG WINAPI Binding_AddRef(IBinding *iface)
1001 static ULONG WINAPI Binding_Release(IBinding *iface)
1006 static HRESULT WINAPI Binding_Abort(IBinding *iface)
1008 CHECK_EXPECT(Abort);
1012 static HRESULT WINAPI Binding_Suspend(IBinding *iface)
1014 ok(0, "unexpected call\n");
1018 static HRESULT WINAPI Binding_Resume(IBinding *iface)
1020 ok(0, "unexpected call\n");
1024 static HRESULT WINAPI Binding_SetPriority(IBinding *iface, LONG nPriority)
1026 ok(0, "unexpected call\n");
1030 static HRESULT WINAPI Binding_GetPriority(IBinding *iface, LONG *pnPriority)
1032 ok(0, "unexpected call\n");
1036 static HRESULT WINAPI Binding_GetBindResult(IBinding *iface, CLSID *pclsidProtocol,
1037 DWORD *pdwResult, LPOLESTR *pszResult, DWORD *pdwReserved)
1039 CHECK_EXPECT(GetBindResult);
1043 static const IBindingVtbl BindingVtbl = {
1044 Binding_QueryInterface,
1050 Binding_SetPriority,
1051 Binding_GetPriority,
1052 Binding_GetBindResult
1055 static IBinding Binding = { &BindingVtbl };
1057 DEFINE_GUID(IID_IMoniker_unk,0xA158A630,0xED6F,0x45FB,0xB9,0x87,0xF6,0x86,0x76,0xF5,0x77,0x52);
1058 DEFINE_GUID(IID_IMoniker_unk2, 0x79EAC9D3,0xBAF9,0x11CE,0x8C,0x82,0x00,0xAA,0x00,0x4B,0xA9,0x0B);
1060 static HRESULT WINAPI Moniker_QueryInterface(IMoniker *iface, REFIID riid, void **ppv)
1064 if(IsEqualGUID(&IID_IMoniker_unk, riid))
1065 return E_NOINTERFACE; /* TODO */
1066 if(IsEqualGUID(&IID_IMoniker_unk2, riid))
1067 return E_NOINTERFACE; /* TODO */
1069 ok(0, "unexpected riid: %s\n", debugstr_guid(riid));
1070 return E_NOINTERFACE;
1073 static ULONG WINAPI Moniker_AddRef(IMoniker *iface)
1078 static ULONG WINAPI Moniker_Release(IMoniker *iface)
1083 static HRESULT WINAPI Moniker_GetClassID(IMoniker *iface, CLSID *pClassID)
1085 CHECK_EXPECT(GetClassID);
1086 ok(IsEqualGUID(pClassID, &IID_NULL), "pClassID = %s\n", debugstr_guid(pClassID));
1090 static HRESULT WINAPI Moniker_IsDirty(IMoniker *iface)
1092 ok(0, "unexpected call\n");
1096 static HRESULT WINAPI Moniker_Load(IMoniker *iface, IStream *pStm)
1098 ok(0, "unexpected call\n");
1102 static HRESULT WINAPI Moniker_Save(IMoniker *iface, IStream *pStm, BOOL fClearDirty)
1104 ok(0, "unexpected call\n");
1108 static HRESULT WINAPI Moniker_GetSizeMax(IMoniker *iface, ULARGE_INTEGER *pcbSize)
1110 ok(0, "unexpected call\n");
1114 static HRESULT WINAPI Moniker_BindToObject(IMoniker *iface, IBindCtx *pcb, IMoniker *pmkToLeft,
1115 REFIID riidResult, void **ppvResult)
1117 ok(0, "unexpected call\n");
1121 static HRESULT WINAPI Moniker_BindToStorage(IMoniker *iface, IBindCtx *pbc, IMoniker *pmkToLeft,
1122 REFIID riid, void **ppv)
1124 IBindStatusCallback *callback = NULL;
1125 FORMATETC formatetc = {0xc02d, NULL, 1, -1, TYMED_ISTREAM};
1126 STGMEDIUM stgmedium;
1131 static OLECHAR BSCBHolder[] = { '_','B','S','C','B','_','H','o','l','d','e','r','_',0 };
1132 static const WCHAR wszTextHtml[] = {'t','e','x','t','/','h','t','m','l',0};
1134 CHECK_EXPECT(BindToStorage);
1136 load_state = LD_LOADING;
1138 ok(pbc != NULL, "pbc == NULL\n");
1139 ok(pmkToLeft == NULL, "pmkToLeft=%p\n", pmkToLeft);
1140 ok(IsEqualGUID(&IID_IStream, riid), "unexpected riid\n");
1141 ok(ppv != NULL, "ppv == NULL\n");
1142 ok(*ppv == NULL, "*ppv=%p\n", *ppv);
1144 hres = IBindCtx_GetObjectParam(pbc, BSCBHolder, (IUnknown**)&callback);
1145 ok(hres == S_OK, "GetObjectParam failed: %08x\n", hres);
1146 ok(callback != NULL, "callback == NULL\n");
1148 memset(&bindinfo, 0xf0, sizeof(bindinfo));
1149 bindinfo.cbSize = sizeof(bindinfo);
1151 hres = IBindStatusCallback_GetBindInfo(callback, &bindf, &bindinfo);
1152 ok(hres == S_OK, "GetBindInfo failed: %08x\n", hres);
1153 ok(bindf == (BINDF_PULLDATA|BINDF_ASYNCSTORAGE|BINDF_ASYNCHRONOUS), "bindf = %08x\n", bindf);
1154 ok(bindinfo.cbSize == sizeof(bindinfo), "bindinfo.cbSize=%d\n", bindinfo.cbSize);
1155 ok(bindinfo.szExtraInfo == NULL, "bindinfo.szExtraInfo=%p\n", bindinfo.szExtraInfo);
1156 /* TODO: test stgmedData */
1157 ok(bindinfo.grfBindInfoF == 0, "bindinfo.grfBinfInfoF=%08x\n", bindinfo.grfBindInfoF);
1158 ok(bindinfo.dwBindVerb == 0, "bindinfo.dwBindVerb=%d\n", bindinfo.dwBindVerb);
1159 ok(bindinfo.szCustomVerb == 0, "bindinfo.szCustomVerb=%p\n", bindinfo.szCustomVerb);
1160 ok(bindinfo.cbstgmedData == 0, "bindinfo.cbstgmedData=%d\n", bindinfo.cbstgmedData);
1161 ok(bindinfo.dwOptions == 0x80000 || bindinfo.dwOptions == 0x4080000,
1162 "bindinfo.dwOptions=%x\n", bindinfo.dwOptions);
1163 ok(bindinfo.dwOptionsFlags == 0, "bindinfo.dwOptionsFlags=%d\n", bindinfo.dwOptionsFlags);
1164 /* TODO: test dwCodePage */
1165 /* TODO: test securityAttributes */
1166 ok(IsEqualGUID(&IID_NULL, &bindinfo.iid), "unexpected bindinfo.iid\n");
1167 ok(bindinfo.pUnk == NULL, "bindinfo.pUnk=%p\n", bindinfo.pUnk);
1168 ok(bindinfo.dwReserved == 0, "bindinfo.dwReserved=%d\n", bindinfo.dwReserved);
1170 hres = IBindStatusCallback_OnStartBinding(callback, 0, &Binding);
1171 ok(hres == S_OK, "OnStartBinding failed: %08x\n", hres);
1173 hres = IBindStatusCallback_OnProgress(callback, 0, 0, BINDSTATUS_MIMETYPEAVAILABLE,
1175 ok(hres == S_OK, "OnProgress(BINDSTATUS_MIMETYPEAVAILABLE) failed: %08x\n", hres);
1177 hres = IBindStatusCallback_OnProgress(callback, sizeof(html_page)-1, sizeof(html_page)-1,
1178 BINDSTATUS_BEGINDOWNLOADDATA, doc_url);
1179 ok(hres == S_OK, "OnProgress(BINDSTATUS_BEGINDOWNLOADDATA) failed: %08x\n", hres);
1182 stgmedium.tymed = TYMED_ISTREAM;
1183 U(stgmedium).pstm = &Stream;
1184 stgmedium.pUnkForRelease = (IUnknown*)iface;
1185 hres = IBindStatusCallback_OnDataAvailable(callback,
1186 BSCF_FIRSTDATANOTIFICATION|BSCF_LASTDATANOTIFICATION,
1187 sizeof(html_page)-1, &formatetc, &stgmedium);
1188 ok(hres == S_OK, "OnDataAvailable failed: %08x\n", hres);
1191 hres = IBindStatusCallback_OnProgress(callback, sizeof(html_page)-1, sizeof(html_page)-1,
1192 BINDSTATUS_ENDDOWNLOADDATA, NULL);
1193 ok(hres == S_OK, "OnProgress(BINDSTATUS_ENDDOWNLOADDATA) failed: %08x\n", hres);
1195 SET_EXPECT(GetBindResult);
1196 hres = IBindStatusCallback_OnStopBinding(callback, S_OK, NULL);
1197 ok(hres == S_OK, "OnStopBinding failed: %08x\n", hres);
1198 SET_CALLED(GetBindResult); /* IE7 */
1200 IBindStatusCallback_Release(callback);
1205 static HRESULT WINAPI Moniker_Reduce(IMoniker *iface, IBindCtx *pbc, DWORD dwReduceHowFar,
1206 IMoniker **ppmkToLeft, IMoniker **ppmkReduced)
1208 ok(0, "unexpected call\n");
1212 static HRESULT WINAPI Moniker_ComposeWith(IMoniker *iface, IMoniker *pmkRight,
1213 BOOL fOnlyIfNotGeneric, IMoniker **ppnkComposite)
1215 ok(0, "unexpected call\n");
1219 static HRESULT WINAPI Moniker_Enum(IMoniker *iface, BOOL fForwrd, IEnumMoniker **ppenumMoniker)
1221 ok(0, "unexpected call\n");
1225 static HRESULT WINAPI Moniker_IsEqual(IMoniker *iface, IMoniker *pmkOtherMoniker)
1227 ok(0, "unexpected call\n");
1231 static HRESULT WINAPI Moniker_Hash(IMoniker *iface, DWORD *pdwHash)
1233 ok(0, "unexpected call\n");
1237 static HRESULT WINAPI Moniker_IsRunning(IMoniker *iface, IBindCtx *pbc, IMoniker *pmkToLeft,
1238 IMoniker *pmkNewlyRunning)
1240 ok(0, "unexpected call\n");
1244 static HRESULT WINAPI Moniker_GetTimeOfLastChange(IMoniker *iface, IBindCtx *pbc,
1245 IMoniker *pmkToLeft, FILETIME *pFileTime)
1247 ok(0, "unexpected call\n");
1251 static HRESULT WINAPI Moniker_Inverse(IMoniker *iface, IMoniker **ppmk)
1253 ok(0, "unexpected call\n");
1257 static HRESULT WINAPI Moniker_CommonPrefixWith(IMoniker *iface, IMoniker *pmkOther,
1258 IMoniker **ppmkPrefix)
1260 ok(0, "unexpected call\n");
1264 static HRESULT WINAPI Moniker_RelativePathTo(IMoniker *iface, IMoniker *pmkOther,
1265 IMoniker **pmkRelPath)
1267 ok(0, "unexpected call\n");
1271 static HRESULT WINAPI Moniker_GetDisplayName(IMoniker *iface, IBindCtx *pbc,
1272 IMoniker *pmkToLeft, LPOLESTR *ppszDisplayName)
1274 CHECK_EXPECT2(GetDisplayName);
1276 /* ok(pbc != NULL, "pbc == NULL\n"); */
1277 ok(pmkToLeft == NULL, "pmkToLeft=%p\n", pmkToLeft);
1278 ok(ppszDisplayName != NULL, "ppszDisplayName == NULL\n");
1280 *ppszDisplayName = CoTaskMemAlloc(sizeof(doc_url));
1281 memcpy(*ppszDisplayName, doc_url, sizeof(doc_url));
1286 static HRESULT WINAPI Moniker_ParseDisplayName(IMoniker *iface, IBindCtx *pbc,
1287 IMoniker *pmkToLeft, LPOLESTR pszDisplayName, ULONG *pchEaten, IMoniker **ppmkOut)
1289 ok(0, "unexpected call\n");
1293 static HRESULT WINAPI Moniker_IsSystemMoniker(IMoniker *iface, DWORD *pdwMksys)
1295 CHECK_EXPECT(IsSystemMoniker);
1299 static const IMonikerVtbl MonikerVtbl = {
1300 Moniker_QueryInterface,
1308 Moniker_BindToObject,
1309 Moniker_BindToStorage,
1311 Moniker_ComposeWith,
1316 Moniker_GetTimeOfLastChange,
1318 Moniker_CommonPrefixWith,
1319 Moniker_RelativePathTo,
1320 Moniker_GetDisplayName,
1321 Moniker_ParseDisplayName,
1322 Moniker_IsSystemMoniker
1325 static IMoniker Moniker = { &MonikerVtbl };
1327 static HRESULT WINAPI OleContainer_QueryInterface(IOleContainer *iface, REFIID riid, void **ppv)
1329 return QueryInterface(riid, ppv);
1332 static ULONG WINAPI OleContainer_AddRef(IOleContainer *iface)
1337 static ULONG WINAPI OleContainer_Release(IOleContainer *iface)
1342 static HRESULT WINAPI OleContainer_ParseDisplayName(IOleContainer *iface, IBindCtx *pbc,
1343 LPOLESTR pszDiaplayName, ULONG *pchEaten, IMoniker **ppmkOut)
1345 ok(0, "unexpected call\n");
1349 static HRESULT WINAPI OleContainer_EnumObjects(IOleContainer *iface, DWORD grfFlags,
1350 IEnumUnknown **ppenum)
1352 ok(0, "unexpected call\n");
1356 static HRESULT WINAPI OleContainer_LockContainer(IOleContainer *iface, BOOL fLock)
1358 CHECK_EXPECT(LockContainer);
1359 ok(expect_LockContainer_fLock == fLock, "fLock=%x, expected %x\n", fLock, expect_LockContainer_fLock);
1363 static const IOleContainerVtbl OleContainerVtbl = {
1364 OleContainer_QueryInterface,
1365 OleContainer_AddRef,
1366 OleContainer_Release,
1367 OleContainer_ParseDisplayName,
1368 OleContainer_EnumObjects,
1369 OleContainer_LockContainer
1372 static IOleContainer OleContainer = { &OleContainerVtbl };
1374 static HRESULT WINAPI ClientSite_QueryInterface(IOleClientSite *iface, REFIID riid, void **ppv)
1376 return QueryInterface(riid, ppv);
1379 static ULONG WINAPI ClientSite_AddRef(IOleClientSite *iface)
1384 static ULONG WINAPI ClientSite_Release(IOleClientSite *iface)
1389 static HRESULT WINAPI ClientSite_SaveObject(IOleClientSite *iface)
1391 ok(0, "unexpected call\n");
1395 static HRESULT WINAPI ClientSite_GetMoniker(IOleClientSite *iface, DWORD dwAssign, DWORD dwWhichMoniker,
1398 ok(0, "unexpected call\n");
1402 static HRESULT WINAPI ClientSite_GetContainer(IOleClientSite *iface, IOleContainer **ppContainer)
1404 CHECK_EXPECT(GetContainer);
1405 ok(ppContainer != NULL, "ppContainer = NULL\n");
1406 *ppContainer = &OleContainer;
1410 static HRESULT WINAPI ClientSite_ShowObject(IOleClientSite *iface)
1412 ok(0, "unexpected call\n");
1416 static HRESULT WINAPI ClientSite_OnShowWindow(IOleClientSite *iface, BOOL fShow)
1418 ok(0, "unexpected call\n");
1422 static HRESULT WINAPI ClientSite_RequestNewObjectLayout(IOleClientSite *iface)
1424 ok(0, "unexpected call\n");
1428 static const IOleClientSiteVtbl ClientSiteVtbl = {
1429 ClientSite_QueryInterface,
1432 ClientSite_SaveObject,
1433 ClientSite_GetMoniker,
1434 ClientSite_GetContainer,
1435 ClientSite_ShowObject,
1436 ClientSite_OnShowWindow,
1437 ClientSite_RequestNewObjectLayout
1440 static IOleClientSite ClientSite = { &ClientSiteVtbl };
1442 static HRESULT WINAPI InPlaceFrame_QueryInterface(IOleInPlaceFrame *iface, REFIID riid, void **ppv)
1444 static const GUID undocumented_frame_iid = {0xfbece6c9,0x48d7,0x4a37,{0x8f,0xe3,0x6a,0xd4,0x27,0x2f,0xdd,0xac}};
1446 if(!IsEqualGUID(&undocumented_frame_iid, riid))
1447 ok(0, "unexpected riid %s\n", debugstr_guid(riid));
1450 return E_NOINTERFACE;
1453 static ULONG WINAPI InPlaceFrame_AddRef(IOleInPlaceFrame *iface)
1458 static ULONG WINAPI InPlaceFrame_Release(IOleInPlaceFrame *iface)
1463 static HRESULT WINAPI InPlaceFrame_GetWindow(IOleInPlaceFrame *iface, HWND *phwnd)
1465 CHECK_EXPECT(Frame_GetWindow);
1469 static HRESULT WINAPI InPlaceFrame_ContextSensitiveHelp(IOleInPlaceFrame *iface, BOOL fEnterMode)
1471 ok(0, "unexpected call\n");
1475 static HRESULT WINAPI InPlaceFrame_GetBorder(IOleInPlaceFrame *iface, LPRECT lprectBorder)
1477 ok(0, "unexpected call\n");
1481 static HRESULT WINAPI InPlaceFrame_RequestBorderSpace(IOleInPlaceFrame *iface,
1482 LPCBORDERWIDTHS pborderwidths)
1484 ok(0, "unexpected call\n");
1488 static HRESULT WINAPI InPlaceFrame_SetBorderSpace(IOleInPlaceFrame *iface,
1489 LPCBORDERWIDTHS pborderwidths)
1491 CHECK_EXPECT(InPlaceFrame_SetBorderSpace);
1495 static HRESULT WINAPI InPlaceUIWindow_SetActiveObject(IOleInPlaceFrame *iface,
1496 IOleInPlaceActiveObject *pActiveObject, LPCOLESTR pszObjName)
1498 static const WCHAR wszHTML_Document[] =
1499 {'H','T','M','L',' ','D','o','c','u','m','e','n','t',0};
1501 CHECK_EXPECT2(InPlaceUIWindow_SetActiveObject);
1503 if(expect_InPlaceUIWindow_SetActiveObject_active) {
1504 ok(pActiveObject != NULL, "pActiveObject = NULL\n");
1505 if(pActiveObject && is_english())
1506 ok(!lstrcmpW(wszHTML_Document, pszObjName), "pszObjName != \"HTML Document\"\n");
1509 ok(pActiveObject == NULL, "pActiveObject=%p, expected NULL\n", pActiveObject);
1510 ok(pszObjName == NULL, "pszObjName=%p, expected NULL\n", pszObjName);
1512 expect_InPlaceUIWindow_SetActiveObject_active = !expect_InPlaceUIWindow_SetActiveObject_active;
1516 static HRESULT WINAPI InPlaceFrame_SetActiveObject(IOleInPlaceFrame *iface,
1517 IOleInPlaceActiveObject *pActiveObject, LPCOLESTR pszObjName)
1519 static const WCHAR wszHTML_Document[] =
1520 {'H','T','M','L',' ','D','o','c','u','m','e','n','t',0};
1523 CHECK_EXPECT2(SetActiveObject);
1525 if(pActiveObject && is_english())
1526 ok(!lstrcmpW(wszHTML_Document, pszObjName), "pszObjName != \"HTML Document\"\n");
1528 CHECK_EXPECT(SetActiveObject_null);
1530 ok(pActiveObject == NULL, "pActiveObject=%p, expected NULL\n", pActiveObject);
1531 ok(pszObjName == NULL, "pszObjName=%p, expected NULL\n", pszObjName);
1537 static HRESULT WINAPI InPlaceFrame_InsertMenus(IOleInPlaceFrame *iface, HMENU hmenuShared,
1538 LPOLEMENUGROUPWIDTHS lpMenuWidths)
1540 ok(0, "unexpected call\n");
1544 static HRESULT WINAPI InPlaceFrame_SetMenu(IOleInPlaceFrame *iface, HMENU hmenuShared,
1545 HOLEMENU holemenu, HWND hwndActiveObject)
1547 ok(0, "unexpected call\n");
1551 static HRESULT WINAPI InPlaceFrame_RemoveMenus(IOleInPlaceFrame *iface, HMENU hmenuShared)
1553 ok(0, "unexpected call\n");
1557 static HRESULT WINAPI InPlaceFrame_SetStatusText(IOleInPlaceFrame *iface, LPCOLESTR pszStatusText)
1559 CHECK_EXPECT2(SetStatusText);
1560 if(!expect_status_text)
1561 ok(pszStatusText == NULL, "pszStatusText=%p, expected NULL\n", pszStatusText);
1565 static HRESULT WINAPI InPlaceFrame_EnableModeless(IOleInPlaceFrame *iface, BOOL fEnable)
1568 CHECK_EXPECT2(Frame_EnableModeless_TRUE);
1570 CHECK_EXPECT2(Frame_EnableModeless_FALSE);
1574 static HRESULT WINAPI InPlaceFrame_TranslateAccelerator(IOleInPlaceFrame *iface, LPMSG lpmsg, WORD wID)
1576 ok(0, "unexpected call\n");
1580 static const IOleInPlaceFrameVtbl InPlaceFrameVtbl = {
1581 InPlaceFrame_QueryInterface,
1582 InPlaceFrame_AddRef,
1583 InPlaceFrame_Release,
1584 InPlaceFrame_GetWindow,
1585 InPlaceFrame_ContextSensitiveHelp,
1586 InPlaceFrame_GetBorder,
1587 InPlaceFrame_RequestBorderSpace,
1588 InPlaceFrame_SetBorderSpace,
1589 InPlaceFrame_SetActiveObject,
1590 InPlaceFrame_InsertMenus,
1591 InPlaceFrame_SetMenu,
1592 InPlaceFrame_RemoveMenus,
1593 InPlaceFrame_SetStatusText,
1594 InPlaceFrame_EnableModeless,
1595 InPlaceFrame_TranslateAccelerator
1598 static IOleInPlaceFrame InPlaceFrame = { &InPlaceFrameVtbl };
1600 static const IOleInPlaceFrameVtbl InPlaceUIWindowVtbl = {
1601 InPlaceFrame_QueryInterface,
1602 InPlaceFrame_AddRef,
1603 InPlaceFrame_Release,
1604 InPlaceFrame_GetWindow,
1605 InPlaceFrame_ContextSensitiveHelp,
1606 InPlaceFrame_GetBorder,
1607 InPlaceFrame_RequestBorderSpace,
1608 InPlaceFrame_SetBorderSpace,
1609 InPlaceUIWindow_SetActiveObject,
1612 static IOleInPlaceFrame InPlaceUIWindow = { &InPlaceUIWindowVtbl };
1614 static HRESULT WINAPI InPlaceSiteWindowless_QueryInterface(IOleInPlaceSiteWindowless *iface, REFIID riid, void **ppv)
1616 return QueryInterface(riid, ppv);
1619 static ULONG WINAPI InPlaceSiteWindowless_AddRef(IOleInPlaceSiteWindowless *iface)
1624 static ULONG WINAPI InPlaceSiteWindowless_Release(IOleInPlaceSiteWindowless *iface)
1629 static HRESULT WINAPI InPlaceSiteWindowless_GetWindow(
1630 IOleInPlaceSiteWindowless *iface, HWND *phwnd)
1632 IOleClientSite *client_site;
1633 IOleObject *ole_obj;
1636 CHECK_EXPECT2(GetWindow);
1637 ok(phwnd != NULL, "phwnd = NULL\n");
1638 *phwnd = container_hwnd;
1640 hres = IUnknown_QueryInterface(doc_unk, &IID_IOleObject, (void**)&ole_obj);
1641 ok(hres == S_OK, "Could not get IOleObject: %08x\n", hres);
1643 hres = IOleObject_GetClientSite(ole_obj, &client_site);
1644 IOleObject_Release(ole_obj);
1645 ok(hres == S_OK, "GetClientSite failed: %08x\n", hres);
1646 ok(client_site == &ClientSite, "client_site != ClientSite\n");
1647 IOleClientSite_Release(client_site);
1652 static HRESULT WINAPI InPlaceSiteWindowless_ContextSensitiveHelp(
1653 IOleInPlaceSiteWindowless *iface, BOOL fEnterMode)
1655 ok(0, "unexpected call\n");
1659 static HRESULT WINAPI InPlaceSiteWindowless_CanInPlaceActivate(
1660 IOleInPlaceSiteWindowless *iface)
1662 CHECK_EXPECT(CanInPlaceActivate);
1666 static HRESULT WINAPI InPlaceSiteWindowless_OnInPlaceActivate(
1667 IOleInPlaceSiteWindowless *iface)
1669 CHECK_EXPECT(OnInPlaceActivate);
1670 inplace_deactivated = FALSE;
1674 static HRESULT WINAPI InPlaceSiteWindowless_OnUIActivate(
1675 IOleInPlaceSiteWindowless *iface)
1677 CHECK_EXPECT(OnUIActivate);
1681 static HRESULT WINAPI InPlaceSiteWindowless_GetWindowContext(
1682 IOleInPlaceSiteWindowless *iface, IOleInPlaceFrame **ppFrame,
1683 IOleInPlaceUIWindow **ppDoc, LPRECT lprcPosRect,
1684 LPRECT lprcClipRect, LPOLEINPLACEFRAMEINFO lpFrameInfo)
1686 static const RECT rect = {0,0,500,500};
1688 CHECK_EXPECT(GetWindowContext);
1690 ok(ppFrame != NULL, "ppFrame = NULL\n");
1692 *ppFrame = &InPlaceFrame;
1693 ok(ppDoc != NULL, "ppDoc = NULL\n");
1695 *ppDoc = (IOleInPlaceUIWindow*)&InPlaceUIWindow;
1696 ok(lprcPosRect != NULL, "lprcPosRect = NULL\n");
1698 memcpy(lprcPosRect, &rect, sizeof(RECT));
1699 ok(lprcClipRect != NULL, "lprcClipRect = NULL\n");
1701 memcpy(lprcClipRect, &rect, sizeof(RECT));
1702 ok(lpFrameInfo != NULL, "lpFrameInfo = NULL\n");
1704 lpFrameInfo->cb = sizeof(*lpFrameInfo);
1705 lpFrameInfo->fMDIApp = FALSE;
1706 lpFrameInfo->hwndFrame = container_hwnd;
1707 lpFrameInfo->haccel = NULL;
1708 lpFrameInfo->cAccelEntries = 0;
1714 static HRESULT WINAPI InPlaceSiteWindowless_Scroll(
1715 IOleInPlaceSiteWindowless *iface, SIZE scrollExtent)
1717 ok(0, "unexpected call\n");
1721 static HRESULT WINAPI InPlaceSiteWindowless_OnUIDeactivate(
1722 IOleInPlaceSiteWindowless *iface, BOOL fUndoable)
1724 CHECK_EXPECT(OnUIDeactivate);
1725 ok(!fUndoable, "fUndoable = TRUE\n");
1729 static HRESULT WINAPI InPlaceSiteWindowless_OnInPlaceDeactivate(
1730 IOleInPlaceSiteWindowless *iface)
1732 CHECK_EXPECT(OnInPlaceDeactivate);
1733 inplace_deactivated = TRUE;
1737 static HRESULT WINAPI InPlaceSiteWindowless_DiscardUndoState(
1738 IOleInPlaceSiteWindowless *iface)
1740 ok(0, "unexpected call\n");
1744 static HRESULT WINAPI InPlaceSiteWindowless_DeactivateAndUndo(
1745 IOleInPlaceSiteWindowless *iface)
1747 ok(0, "unexpected call\n");
1751 static HRESULT WINAPI InPlaceSiteWindowless_OnPosRectChange(
1752 IOleInPlaceSiteWindowless *iface, LPCRECT lprcPosRect)
1754 ok(0, "unexpected call\n");
1758 static HRESULT WINAPI InPlaceSiteWindowless_OnInPlaceActivateEx(
1759 IOleInPlaceSiteWindowless *iface, BOOL *pfNoRedraw, DWORD dwFlags)
1761 CHECK_EXPECT(OnInPlaceActivateEx);
1763 ok(pfNoRedraw != NULL, "pfNoRedraw == NULL\n");
1764 ok(!*pfNoRedraw, "*pfNoRedraw == TRUE\n");
1765 ok(dwFlags == 0, "dwFlags = %08x\n", dwFlags);
1770 static HRESULT WINAPI InPlaceSiteWindowless_OnInPlaceDeactivateEx(
1771 IOleInPlaceSiteWindowless *iface, BOOL fNoRedraw)
1773 CHECK_EXPECT(OnInPlaceDeactivateEx);
1775 ok(fNoRedraw, "fNoRedraw == FALSE\n");
1780 static HRESULT WINAPI InPlaceSiteWindowless_RequestUIActivate(
1781 IOleInPlaceSiteWindowless *iface)
1783 CHECK_EXPECT2(RequestUIActivate);
1787 static HRESULT WINAPI InPlaceSiteWindowless_CanWindowlessActivate(
1788 IOleInPlaceSiteWindowless *iface)
1790 ok(0, "unexpected call\n");
1794 static HRESULT WINAPI InPlaceSiteWindowless_GetCapture(
1795 IOleInPlaceSiteWindowless *iface)
1797 ok(0, "unexpected call\n");
1801 static HRESULT WINAPI InPlaceSiteWindowless_SetCapture(
1802 IOleInPlaceSiteWindowless *iface, BOOL fCapture)
1804 ok(0, "unexpected call\n");
1808 static HRESULT WINAPI InPlaceSiteWindowless_GetFocus(
1809 IOleInPlaceSiteWindowless *iface)
1811 ok(0, "unexpected call\n");
1815 static HRESULT WINAPI InPlaceSiteWindowless_SetFocus(
1816 IOleInPlaceSiteWindowless *iface, BOOL fFocus)
1818 ok(0, "unexpected call\n");
1822 static HRESULT WINAPI InPlaceSiteWindowless_GetDC(
1823 IOleInPlaceSiteWindowless *iface, LPCRECT pRect,
1824 DWORD grfFlags, HDC *phDC)
1826 ok(0, "unexpected call\n");
1830 static HRESULT WINAPI InPlaceSiteWindowless_ReleaseDC(
1831 IOleInPlaceSiteWindowless *iface, HDC hDC)
1833 ok(0, "unexpected call\n");
1837 static HRESULT WINAPI InPlaceSiteWindowless_InvalidateRect(
1838 IOleInPlaceSiteWindowless *iface, LPCRECT pRect, BOOL fErase)
1840 ok(0, "unexpected call\n");
1844 static HRESULT WINAPI InPlaceSiteWindowless_InvalidateRgn(
1845 IOleInPlaceSiteWindowless *iface, HRGN hRGN, BOOL fErase)
1847 ok(0, "unexpected call\n");
1851 static HRESULT WINAPI InPlaceSiteWindowless_ScrollRect(
1852 IOleInPlaceSiteWindowless *iface, INT dx, INT dy,
1853 LPCRECT pRectScroll, LPCRECT pRectClip)
1855 ok(0, "unexpected call\n");
1859 static HRESULT WINAPI InPlaceSiteWindowless_AdjustRect(
1860 IOleInPlaceSiteWindowless *iface, LPRECT prc)
1862 ok(0, "unexpected call\n");
1866 static HRESULT WINAPI InPlaceSiteWindowless_OnDefWindowMessage(
1867 IOleInPlaceSiteWindowless *iface, UINT msg,
1868 WPARAM wParam, LPARAM lParam, LRESULT *plResult)
1870 ok(0, "unexpected call\n");
1874 static const IOleInPlaceSiteWindowlessVtbl InPlaceSiteWindowlessVtbl = {
1875 InPlaceSiteWindowless_QueryInterface,
1876 InPlaceSiteWindowless_AddRef,
1877 InPlaceSiteWindowless_Release,
1878 InPlaceSiteWindowless_GetWindow,
1879 InPlaceSiteWindowless_ContextSensitiveHelp,
1880 InPlaceSiteWindowless_CanInPlaceActivate,
1881 InPlaceSiteWindowless_OnInPlaceActivate,
1882 InPlaceSiteWindowless_OnUIActivate,
1883 InPlaceSiteWindowless_GetWindowContext,
1884 InPlaceSiteWindowless_Scroll,
1885 InPlaceSiteWindowless_OnUIDeactivate,
1886 InPlaceSiteWindowless_OnInPlaceDeactivate,
1887 InPlaceSiteWindowless_DiscardUndoState,
1888 InPlaceSiteWindowless_DeactivateAndUndo,
1889 InPlaceSiteWindowless_OnPosRectChange,
1890 InPlaceSiteWindowless_OnInPlaceActivateEx,
1891 InPlaceSiteWindowless_OnInPlaceDeactivateEx,
1892 InPlaceSiteWindowless_RequestUIActivate,
1893 InPlaceSiteWindowless_CanWindowlessActivate,
1894 InPlaceSiteWindowless_GetCapture,
1895 InPlaceSiteWindowless_SetCapture,
1896 InPlaceSiteWindowless_GetFocus,
1897 InPlaceSiteWindowless_SetFocus,
1898 InPlaceSiteWindowless_GetDC,
1899 InPlaceSiteWindowless_ReleaseDC,
1900 InPlaceSiteWindowless_InvalidateRect,
1901 InPlaceSiteWindowless_InvalidateRgn,
1902 InPlaceSiteWindowless_ScrollRect,
1903 InPlaceSiteWindowless_AdjustRect,
1904 InPlaceSiteWindowless_OnDefWindowMessage
1907 static IOleInPlaceSiteWindowless InPlaceSiteWindowless = { &InPlaceSiteWindowlessVtbl };
1909 static HRESULT WINAPI DocumentSite_QueryInterface(IOleDocumentSite *iface, REFIID riid, void **ppv)
1911 return QueryInterface(riid, ppv);
1914 static ULONG WINAPI DocumentSite_AddRef(IOleDocumentSite *iface)
1919 static ULONG WINAPI DocumentSite_Release(IOleDocumentSite *iface)
1926 CallUIActivate_None,
1927 CallUIActivate_ActivateMe,
1928 CallUIActivate_AfterShow,
1931 static BOOL call_UIActivate = CallUIActivate_ActivateMe;
1932 static HRESULT WINAPI DocumentSite_ActivateMe(IOleDocumentSite *iface, IOleDocumentView *pViewToActivate)
1934 IOleDocument *document;
1937 CHECK_EXPECT(ActivateMe);
1938 ok(pViewToActivate != NULL, "pViewToActivate = NULL\n");
1940 hres = IOleDocumentView_QueryInterface(pViewToActivate, &IID_IOleDocument, (void**)&document);
1941 ok(hres == S_OK, "could not get IOleDocument: %08x\n", hres);
1943 if(SUCCEEDED(hres)) {
1944 hres = IOleDocument_CreateView(document, (IOleInPlaceSite*)&InPlaceSiteWindowless, NULL, 0, &view);
1945 ok(hres == S_OK, "CreateView failed: %08x\n", hres);
1947 if(SUCCEEDED(hres)) {
1948 IOleInPlaceActiveObject *activeobj = NULL;
1949 IOleInPlaceSite *inplacesite = NULL;
1950 HWND tmp_hwnd = NULL;
1951 static RECT rect = {0,0,400,500};
1953 hres = IOleDocumentView_GetInPlaceSite(view, &inplacesite);
1954 ok(hres == S_OK, "GetInPlaceSite failed: %08x\n", hres);
1955 ok(inplacesite == (IOleInPlaceSite*)&InPlaceSiteWindowless, "inplacesite=%p, expected %p\n",
1956 inplacesite, &InPlaceSiteWindowless);
1958 hres = IOleDocumentView_SetInPlaceSite(view, (IOleInPlaceSite*)&InPlaceSiteWindowless);
1959 ok(hres == S_OK, "SetInPlaceSite failed: %08x\n", hres);
1961 hres = IOleDocumentView_GetInPlaceSite(view, &inplacesite);
1962 ok(hres == S_OK, "GetInPlaceSite failed: %08x\n", hres);
1963 ok(inplacesite == (IOleInPlaceSite*)&InPlaceSiteWindowless, "inplacesite=%p, expected %p\n",
1964 inplacesite, &InPlaceSiteWindowless);
1966 hres = IOleDocumentView_QueryInterface(view, &IID_IOleInPlaceActiveObject, (void**)&activeobj);
1967 ok(hres == S_OK, "Could not get IOleInPlaceActiveObject: %08x\n", hres);
1970 IOleInPlaceActiveObject_GetWindow(activeobj, &hwnd);
1971 ok(hres == S_OK, "GetWindow failed: %08x\n", hres);
1972 ok(hwnd == NULL, "hwnd=%p, expeted NULL\n", hwnd);
1975 if(call_UIActivate == CallUIActivate_ActivateMe) {
1976 SET_EXPECT(CanInPlaceActivate);
1977 SET_EXPECT(GetWindowContext);
1978 SET_EXPECT(GetWindow);
1980 SET_EXPECT(OnInPlaceActivateEx);
1982 SET_EXPECT(OnInPlaceActivate);
1983 SET_EXPECT(SetStatusText);
1984 SET_EXPECT(Exec_SETPROGRESSMAX);
1985 SET_EXPECT(Exec_SETPROGRESSPOS);
1986 SET_EXPECT(OnUIActivate);
1987 SET_EXPECT(SetActiveObject);
1989 expect_status_text = NULL;
1991 hres = IOleDocumentView_UIActivate(view, TRUE);
1992 ok(hres == S_OK, "UIActivate failed: %08x\n", hres);
1994 CHECK_CALLED(CanInPlaceActivate);
1995 CHECK_CALLED(GetWindowContext);
1996 CHECK_CALLED(GetWindow);
1998 CHECK_CALLED(OnInPlaceActivateEx);
2000 CHECK_CALLED(OnInPlaceActivate);
2001 CHECK_CALLED(SetStatusText);
2002 CHECK_CALLED(Exec_SETPROGRESSMAX);
2003 CHECK_CALLED(Exec_SETPROGRESSPOS);
2004 CHECK_CALLED(OnUIActivate);
2005 CHECK_CALLED(SetActiveObject);
2006 CHECK_CALLED(ShowUI);
2009 hres = IOleInPlaceActiveObject_GetWindow(activeobj, &hwnd);
2010 ok(hres == S_OK, "GetWindow failed: %08x\n", hres);
2011 ok(hwnd != NULL, "hwnd == NULL\n");
2013 ok(hwnd == last_hwnd, "hwnd != last_hwnd\n");
2016 hres = IOleDocumentView_UIActivate(view, TRUE);
2017 ok(hres == S_OK, "UIActivate failed: %08x\n", hres);
2020 hres = IOleInPlaceActiveObject_GetWindow(activeobj, &tmp_hwnd);
2021 ok(hres == S_OK, "GetWindow failed: %08x\n", hres);
2022 ok(tmp_hwnd == hwnd, "tmp_hwnd=%p, expected %p\n", tmp_hwnd, hwnd);
2026 hres = IOleDocumentView_SetRect(view, &rect);
2027 ok(hres == S_OK, "SetRect failed: %08x\n", hres);
2029 if(call_UIActivate == CallUIActivate_ActivateMe) {
2030 hres = IOleDocumentView_Show(view, TRUE);
2031 ok(hres == S_OK, "Show failed: %08x\n", hres);
2033 SET_EXPECT(CanInPlaceActivate);
2034 SET_EXPECT(GetWindowContext);
2035 SET_EXPECT(GetWindow);
2037 SET_EXPECT(OnInPlaceActivateEx);
2039 SET_EXPECT(OnInPlaceActivate);
2040 SET_EXPECT(SetStatusText);
2041 SET_EXPECT(Exec_SETPROGRESSMAX);
2042 SET_EXPECT(Exec_SETPROGRESSPOS);
2043 SET_EXPECT(OnUIActivate);
2044 expect_status_text = (load_state == LD_COMPLETE ? (LPCOLESTR)0xdeadbeef : NULL);
2046 hres = IOleDocumentView_Show(view, TRUE);
2047 ok(hres == S_OK, "Show failed: %08x\n", hres);
2049 CHECK_CALLED(CanInPlaceActivate);
2050 CHECK_CALLED(GetWindowContext);
2051 CHECK_CALLED(GetWindow);
2053 CHECK_CALLED(OnInPlaceActivateEx);
2055 CHECK_CALLED(OnInPlaceActivate);
2056 CHECK_CALLED(SetStatusText);
2057 CHECK_CALLED(Exec_SETPROGRESSMAX);
2058 CHECK_CALLED(Exec_SETPROGRESSPOS);
2061 hres = IOleInPlaceActiveObject_GetWindow(activeobj, &hwnd);
2062 ok(hres == S_OK, "GetWindow failed: %08x\n", hres);
2063 ok(hwnd != NULL, "hwnd == NULL\n");
2065 ok(hwnd == last_hwnd, "hwnd != last_hwnd\n");
2069 test_timer(EXPECT_UPDATEUI | ((load_state == LD_LOADING) ? EXPECT_SETTITLE : 0));
2072 IOleInPlaceActiveObject_Release(activeobj);
2075 IOleDocument_Release(document);
2081 static const IOleDocumentSiteVtbl DocumentSiteVtbl = {
2082 DocumentSite_QueryInterface,
2083 DocumentSite_AddRef,
2084 DocumentSite_Release,
2085 DocumentSite_ActivateMe
2088 static IOleDocumentSite DocumentSite = { &DocumentSiteVtbl };
2090 static HRESULT WINAPI OleControlSite_QueryInterface(IOleControlSite *iface, REFIID riid, void **ppv)
2092 return QueryInterface(riid, ppv);
2095 static ULONG WINAPI OleControlSite_AddRef(IOleControlSite *iface)
2100 static ULONG WINAPI OleControlSite_Release(IOleControlSite *iface)
2105 static HRESULT WINAPI OleControlSite_OnControlInfoChanged(IOleControlSite *iface)
2107 ok(0, "unexpected call\n");
2111 static HRESULT WINAPI OleControlSite_LockInPlaceActive(IOleControlSite *iface, BOOL fLock)
2113 ok(0, "unexpected call\n");
2117 static HRESULT WINAPI OleControlSite_GetExtendedControl(IOleControlSite *iface, IDispatch **ppDisp)
2119 ok(0, "unexpected call\n");
2123 static HRESULT WINAPI OleControlSite_TransformCoords(IOleControlSite *iface, POINTL *pPtHimetric,
2124 POINTF *pPtfContainer, DWORD dwFlags)
2126 ok(0, "unexpected call\n");
2130 static HRESULT WINAPI OleControlSite_TranslateAccelerator(IOleControlSite *iface,
2131 MSG *pMsg, DWORD grfModifiers)
2133 ok(0, "unexpected call\n");
2137 static HRESULT WINAPI OleControlSite_OnFocus(IOleControlSite *iface, BOOL fGotFocus)
2140 CHECK_EXPECT(OnFocus_TRUE);
2142 CHECK_EXPECT2(OnFocus_FALSE);
2146 static HRESULT WINAPI OleControlSite_ShowPropertyFrame(IOleControlSite *iface)
2148 ok(0, "unexpected call\n");
2152 static const IOleControlSiteVtbl OleControlSiteVtbl = {
2153 OleControlSite_QueryInterface,
2154 OleControlSite_AddRef,
2155 OleControlSite_Release,
2156 OleControlSite_OnControlInfoChanged,
2157 OleControlSite_LockInPlaceActive,
2158 OleControlSite_GetExtendedControl,
2159 OleControlSite_TransformCoords,
2160 OleControlSite_TranslateAccelerator,
2161 OleControlSite_OnFocus,
2162 OleControlSite_ShowPropertyFrame
2165 static IOleControlSite OleControlSite = { &OleControlSiteVtbl };
2167 static IDocHostUIHandler2 *expect_uihandler_iface;
2169 static HRESULT WINAPI DocHostUIHandler_QueryInterface(IDocHostUIHandler2 *iface, REFIID riid, void **ppv)
2171 return QueryInterface(riid, ppv);
2174 static ULONG WINAPI DocHostUIHandler_AddRef(IDocHostUIHandler2 *iface)
2179 static ULONG WINAPI DocHostUIHandler_Release(IDocHostUIHandler2 *iface)
2184 static HRESULT WINAPI DocHostUIHandler_ShowContextMenu(IDocHostUIHandler2 *iface, DWORD dwID, POINT *ppt,
2185 IUnknown *pcmdtReserved, IDispatch *pdicpReserved)
2187 ok(0, "unexpected call\n");
2188 ok(iface == expect_uihandler_iface, "called on unexpected iface\n");
2192 static HRESULT WINAPI DocHostUIHandler_GetHostInfo(IDocHostUIHandler2 *iface, DOCHOSTUIINFO *pInfo)
2194 CHECK_EXPECT(GetHostInfo);
2195 ok(iface == expect_uihandler_iface, "called on unexpected iface\n");
2196 ok(pInfo != NULL, "pInfo=NULL\n");
2198 ok(pInfo->cbSize == sizeof(DOCHOSTUIINFO), "pInfo->cbSize=%u\n", pInfo->cbSize);
2199 ok(!pInfo->dwFlags, "pInfo->dwFlags=%08x, expected 0\n", pInfo->dwFlags);
2200 pInfo->dwFlags = DOCHOSTUIFLAG_DISABLE_HELP_MENU | DOCHOSTUIFLAG_DISABLE_SCRIPT_INACTIVE
2201 | DOCHOSTUIFLAG_ACTIVATE_CLIENTHIT_ONLY | DOCHOSTUIFLAG_ENABLE_INPLACE_NAVIGATION
2202 | DOCHOSTUIFLAG_IME_ENABLE_RECONVERSION;
2203 ok(!pInfo->dwDoubleClick, "pInfo->dwDoubleClick=%08x, expected 0\n", pInfo->dwDoubleClick);
2204 ok(!pInfo->pchHostCss, "pInfo->pchHostCss=%p, expected NULL\n", pInfo->pchHostCss);
2205 ok(!pInfo->pchHostNS, "pInfo->pchhostNS=%p, expected NULL\n", pInfo->pchHostNS);
2210 static HRESULT WINAPI DocHostUIHandler_ShowUI(IDocHostUIHandler2 *iface, DWORD dwID,
2211 IOleInPlaceActiveObject *pActiveObject, IOleCommandTarget *pCommandTarget,
2212 IOleInPlaceFrame *pFrame, IOleInPlaceUIWindow *pDoc)
2214 CHECK_EXPECT(ShowUI);
2215 ok(iface == expect_uihandler_iface, "called on unexpected iface\n");
2218 ok(dwID == DOCHOSTUITYPE_AUTHOR, "dwID=%d, expected DOCHOSTUITYPE_AUTHOR\n", dwID);
2220 ok(dwID == DOCHOSTUITYPE_BROWSE, "dwID=%d, expected DOCHOSTUITYPE_BROWSE\n", dwID);
2221 ok(pActiveObject != NULL, "pActiveObject = NULL\n");
2222 ok(pCommandTarget != NULL, "pCommandTarget = NULL\n");
2223 ok(pFrame == &InPlaceFrame, "pFrame=%p, expected %p\n", pFrame, &InPlaceFrame);
2224 if (expect_InPlaceUIWindow_SetActiveObject_active)
2225 ok(pDoc == (IOleInPlaceUIWindow *)&InPlaceUIWindow, "pDoc=%p, expected %p\n", pDoc, &InPlaceUIWindow);
2227 ok(pDoc == NULL, "pDoc=%p, expected NULL\n", pDoc);
2232 static HRESULT WINAPI DocHostUIHandler_HideUI(IDocHostUIHandler2 *iface)
2234 CHECK_EXPECT(HideUI);
2235 ok(iface == expect_uihandler_iface, "called on unexpected iface\n");
2239 static HRESULT WINAPI DocHostUIHandler_UpdateUI(IDocHostUIHandler2 *iface)
2241 CHECK_EXPECT(UpdateUI);
2242 ok(iface == expect_uihandler_iface, "called on unexpected iface\n");
2246 static HRESULT WINAPI DocHostUIHandler_EnableModeless(IDocHostUIHandler2 *iface, BOOL fEnable)
2248 ok(iface == expect_uihandler_iface, "called on unexpected iface\n");
2250 CHECK_EXPECT2(EnableModeless_TRUE);
2252 CHECK_EXPECT2(EnableModeless_FALSE);
2256 static HRESULT WINAPI DocHostUIHandler_OnDocWindowActivate(IDocHostUIHandler2 *iface, BOOL fActivate)
2258 ok(0, "unexpected call\n");
2259 ok(iface == expect_uihandler_iface, "called on unexpected iface\n");
2263 static BOOL expect_OnFrameWindowActivate_fActivate;
2264 static HRESULT WINAPI DocHostUIHandler_OnFrameWindowActivate(IDocHostUIHandler2 *iface, BOOL fActivate)
2266 CHECK_EXPECT2(OnFrameWindowActivate);
2267 ok(iface == expect_uihandler_iface, "called on unexpected iface\n");
2268 ok(fActivate == expect_OnFrameWindowActivate_fActivate, "fActivate=%x\n", fActivate);
2272 static HRESULT WINAPI DocHostUIHandler_ResizeBorder(IDocHostUIHandler2 *iface, LPCRECT prcBorder,
2273 IOleInPlaceUIWindow *pUIWindow, BOOL fRameWindow)
2275 ok(0, "unexpected call\n");
2279 static HRESULT WINAPI DocHostUIHandler_TranslateAccelerator(IDocHostUIHandler2 *iface, LPMSG lpMsg,
2280 const GUID *pguidCmdGroup, DWORD nCmdID)
2282 ok(0, "unexpected call\n");
2283 ok(iface == expect_uihandler_iface, "called on unexpected iface\n");
2287 static HRESULT WINAPI DocHostUIHandler_GetOptionKeyPath(IDocHostUIHandler2 *iface,
2288 LPOLESTR *pchKey, DWORD dw)
2290 CHECK_EXPECT(GetOptionKeyPath);
2291 ok(iface == expect_uihandler_iface, "called on unexpected iface\n");
2292 ok(pchKey != NULL, "pchKey = NULL\n");
2293 ok(!dw, "dw=%d, expected 0\n", dw);
2295 ok(!*pchKey, "*pchKey=%p, expected NULL\n", *pchKey);
2299 static HRESULT WINAPI DocHostUIHandler_GetDropTarget(IDocHostUIHandler2 *iface,
2300 IDropTarget *pDropTarget, IDropTarget **ppDropTarget)
2302 CHECK_EXPECT(GetDropTarget);
2303 ok(iface == expect_uihandler_iface, "called on unexpected iface\n");
2308 static HRESULT WINAPI DocHostUIHandler_GetExternal(IDocHostUIHandler2 *iface, IDispatch **ppDispatch)
2310 CHECK_EXPECT(GetExternal);
2311 ok(iface == expect_uihandler_iface, "called on unexpected iface\n");
2312 *ppDispatch = &External;
2316 static HRESULT WINAPI DocHostUIHandler_TranslateUrl(IDocHostUIHandler2 *iface, DWORD dwTranslate,
2317 OLECHAR *pchURLIn, OLECHAR **ppchURLOut)
2319 CHECK_EXPECT(TranslateUrl);
2320 ok(iface == expect_uihandler_iface, "called on unexpected iface\n");
2321 ok(!dwTranslate, "dwTranslate = %x\n", dwTranslate);
2322 ok(!strcmp_wa(pchURLIn, nav_url), "pchURLIn = %s, expected %s\n", wine_dbgstr_w(pchURLIn), nav_url);
2323 ok(ppchURLOut != NULL, "ppchURLOut == NULL\n");
2324 ok(!*ppchURLOut, "*ppchURLOut = %p\n", *ppchURLOut);
2329 static HRESULT WINAPI DocHostUIHandler_FilterDataObject(IDocHostUIHandler2 *iface, IDataObject *pDO,
2330 IDataObject **ppPORet)
2332 ok(0, "unexpected call\n");
2333 ok(iface == expect_uihandler_iface, "called on unexpected iface\n");
2337 static HRESULT WINAPI DocHostUIHandler_GetOverrideKeyPath(IDocHostUIHandler2 *iface,
2338 LPOLESTR *pchKey, DWORD dw)
2340 CHECK_EXPECT(GetOverrideKeyPath);
2341 ok(iface == expect_uihandler_iface, "called on unexpected iface\n");
2342 ok(pchKey != NULL, "pchKey = NULL\n");
2344 ok(!*pchKey, "*pchKey=%p, expected NULL\n", *pchKey);
2345 ok(!dw, "dw=%d, xepected 0\n", dw);
2349 static const IDocHostUIHandler2Vtbl DocHostUIHandlerVtbl = {
2350 DocHostUIHandler_QueryInterface,
2351 DocHostUIHandler_AddRef,
2352 DocHostUIHandler_Release,
2353 DocHostUIHandler_ShowContextMenu,
2354 DocHostUIHandler_GetHostInfo,
2355 DocHostUIHandler_ShowUI,
2356 DocHostUIHandler_HideUI,
2357 DocHostUIHandler_UpdateUI,
2358 DocHostUIHandler_EnableModeless,
2359 DocHostUIHandler_OnDocWindowActivate,
2360 DocHostUIHandler_OnFrameWindowActivate,
2361 DocHostUIHandler_ResizeBorder,
2362 DocHostUIHandler_TranslateAccelerator,
2363 DocHostUIHandler_GetOptionKeyPath,
2364 DocHostUIHandler_GetDropTarget,
2365 DocHostUIHandler_GetExternal,
2366 DocHostUIHandler_TranslateUrl,
2367 DocHostUIHandler_FilterDataObject,
2368 DocHostUIHandler_GetOverrideKeyPath
2371 static IDocHostUIHandler2 DocHostUIHandler = { &DocHostUIHandlerVtbl };
2373 static HRESULT WINAPI CustomDocHostUIHandler_QueryInterface(IDocHostUIHandler2 *iface, REFIID riid, void **ppv)
2375 if(IsEqualGUID(&IID_IDocHostUIHandler2, riid)) {
2380 if(IsEqualGUID(&IID_IOleCommandTarget, riid))
2381 return E_NOINTERFACE;
2383 else if(IsEqualGUID(&IID_IDocHostShowUI, riid))
2384 return E_NOINTERFACE; /* TODO */
2386 ok(0, "unexpected call %s\n", debugstr_guid(riid));
2387 return E_NOINTERFACE;
2390 static const IDocHostUIHandler2Vtbl CustomDocHostUIHandlerVtbl = {
2391 CustomDocHostUIHandler_QueryInterface,
2392 DocHostUIHandler_AddRef,
2393 DocHostUIHandler_Release,
2394 DocHostUIHandler_ShowContextMenu,
2395 DocHostUIHandler_GetHostInfo,
2396 DocHostUIHandler_ShowUI,
2397 DocHostUIHandler_HideUI,
2398 DocHostUIHandler_UpdateUI,
2399 DocHostUIHandler_EnableModeless,
2400 DocHostUIHandler_OnDocWindowActivate,
2401 DocHostUIHandler_OnFrameWindowActivate,
2402 DocHostUIHandler_ResizeBorder,
2403 DocHostUIHandler_TranslateAccelerator,
2404 DocHostUIHandler_GetOptionKeyPath,
2405 DocHostUIHandler_GetDropTarget,
2406 DocHostUIHandler_GetExternal,
2407 DocHostUIHandler_TranslateUrl,
2408 DocHostUIHandler_FilterDataObject,
2409 DocHostUIHandler_GetOverrideKeyPath
2412 static IDocHostUIHandler2 CustomDocHostUIHandler = { &CustomDocHostUIHandlerVtbl };
2414 static HRESULT WINAPI OleCommandTarget_QueryInterface(IOleCommandTarget *iface,
2415 REFIID riid, void **ppv)
2417 return QueryInterface(riid, ppv);
2420 static ULONG WINAPI OleCommandTarget_AddRef(IOleCommandTarget *iface)
2425 static ULONG WINAPI OleCommandTarget_Release(IOleCommandTarget *iface)
2430 static HRESULT WINAPI OleCommandTarget_QueryStatus(IOleCommandTarget *iface, const GUID *pguidCmdGroup,
2431 ULONG cCmds, OLECMD prgCmds[], OLECMDTEXT *pCmdText)
2433 ok(!pguidCmdGroup, "pguidCmdGroup != MULL\n");
2434 ok(cCmds == 1, "cCmds=%d, expected 1\n", cCmds);
2435 ok(!pCmdText, "pCmdText != NULL\n");
2437 switch(prgCmds[0].cmdID) {
2438 case OLECMDID_SETPROGRESSTEXT:
2439 CHECK_EXPECT(QueryStatus_SETPROGRESSTEXT);
2440 prgCmds[0].cmdf = OLECMDF_ENABLED;
2443 CHECK_EXPECT(QueryStatus_OPEN);
2444 prgCmds[0].cmdf = 0;
2447 CHECK_EXPECT(QueryStatus_NEW);
2448 prgCmds[0].cmdf = 0;
2451 ok(0, "unexpected command %d\n", prgCmds[0].cmdID);
2457 static HRESULT WINAPI OleCommandTarget_Exec(IOleCommandTarget *iface, const GUID *pguidCmdGroup,
2458 DWORD nCmdID, DWORD nCmdexecopt, VARIANT *pvaIn, VARIANT *pvaOut)
2460 if((!pguidCmdGroup || !IsEqualGUID(pguidCmdGroup, &CGID_Explorer))
2461 && (!pguidCmdGroup || !IsEqualGUID(&CGID_ShellDocView, pguidCmdGroup) || nCmdID != 63))
2462 test_readyState(NULL);
2464 if(!pguidCmdGroup) {
2466 case OLECMDID_SETPROGRESSMAX:
2467 CHECK_EXPECT2(Exec_SETPROGRESSMAX);
2468 ok(nCmdexecopt == OLECMDEXECOPT_DONTPROMPTUSER, "nCmdexecopts=%08x\n", nCmdexecopt);
2469 ok(pvaIn != NULL, "pvaIn == NULL\n");
2471 ok(V_VT(pvaIn) == VT_I4, "V_VT(pvaIn)=%d, expected VT_I4\n", V_VT(pvaIn));
2472 if(load_state == LD_NO)
2473 ok(V_I4(pvaIn) == 0, "V_I4(pvaIn)=%d, expected 0\n", V_I4(pvaIn));
2475 ok(pvaOut == NULL, "pvaOut=%p, expected NULL\n", pvaOut);
2477 case OLECMDID_SETPROGRESSPOS:
2478 CHECK_EXPECT2(Exec_SETPROGRESSPOS);
2479 ok(nCmdexecopt == OLECMDEXECOPT_DONTPROMPTUSER, "nCmdexecopts=%08x\n", nCmdexecopt);
2480 ok(pvaIn != NULL, "pvaIn == NULL\n");
2482 ok(V_VT(pvaIn) == VT_I4, "V_VT(pvaIn)=%d, expected VT_I4\n", V_VT(pvaIn));
2483 if(load_state == LD_NO)
2484 ok(V_I4(pvaIn) == 0, "V_I4(pvaIn)=%d, expected 0\n", V_I4(pvaIn));
2486 ok(pvaOut == NULL, "pvaOut=%p, expected NULL\n", pvaOut);
2488 case OLECMDID_HTTPEQUIV_DONE:
2489 CHECK_EXPECT(Exec_HTTPEQUIV_DONE);
2490 ok(nCmdexecopt == 0, "nCmdexecopts=%08x\n", nCmdexecopt);
2491 ok(pvaOut == NULL, "pvaOut=%p\n", pvaOut);
2492 ok(pvaIn == NULL, "pvaIn=%p\n", pvaIn);
2493 readystate_set_loading = FALSE;
2494 readystate_set_interactive = FALSE;
2495 load_state = LD_COMPLETE;
2497 case OLECMDID_SETDOWNLOADSTATE:
2498 ok(nCmdexecopt == OLECMDEXECOPT_DONTPROMPTUSER, "nCmdexecopts=%08x\n", nCmdexecopt);
2499 ok(pvaOut == NULL, "pvaOut=%p\n", pvaOut);
2500 ok(pvaIn != NULL, "pvaIn == NULL\n");
2501 ok(V_VT(pvaIn) == VT_I4, "V_VT(pvaIn)=%d\n", V_VT(pvaIn));
2503 switch(V_I4(pvaIn)) {
2505 CHECK_EXPECT(Exec_SETDOWNLOADSTATE_0);
2506 load_state = LD_INTERACTIVE;
2509 CHECK_EXPECT(Exec_SETDOWNLOADSTATE_1);
2510 readystate_set_interactive = (load_state != LD_INTERACTIVE);
2513 ok(0, "unexpevted V_I4(pvaIn)=%d\n", V_I4(pvaIn));
2517 case OLECMDID_UPDATECOMMANDS:
2518 CHECK_EXPECT(Exec_UPDATECOMMANDS);
2519 ok(nCmdexecopt == OLECMDEXECOPT_DONTPROMPTUSER, "nCmdexecopts=%08x\n", nCmdexecopt);
2520 ok(pvaIn == NULL, "pvaIn=%p\n", pvaIn);
2521 ok(pvaOut == NULL, "pvaOut=%p\n", pvaOut);
2523 case OLECMDID_SETTITLE:
2524 CHECK_EXPECT2(Exec_SETTITLE);
2525 ok(nCmdexecopt == OLECMDEXECOPT_DONTPROMPTUSER, "nCmdexecopts=%08x\n", nCmdexecopt);
2526 ok(pvaIn != NULL, "pvaIn == NULL\n");
2527 ok(pvaOut == NULL, "pvaOut=%p\n", pvaOut);
2528 ok(V_VT(pvaIn) == VT_BSTR, "V_VT(pvaIn)=%d\n", V_VT(pvaIn));
2529 ok(V_BSTR(pvaIn) != NULL, "V_BSTR(pvaIn) == NULL\n"); /* TODO */
2531 case OLECMDID_HTTPEQUIV:
2532 CHECK_EXPECT2(Exec_HTTPEQUIV);
2533 ok(!nCmdexecopt, "nCmdexecopts=%08x\n", nCmdexecopt);
2534 ok(pvaIn != NULL, "pvaIn == NULL\n");
2535 ok(pvaOut == NULL, "pvaOut=%p\n", pvaOut);
2536 ok(V_VT(pvaIn) == VT_BSTR, "V_VT(pvaIn)=%d\n", V_VT(pvaIn));
2537 ok(V_BSTR(pvaIn) != NULL, "V_BSTR(pvaIn) = NULL\n");
2538 test_readyState(NULL);
2540 case OLECMDID_UPDATETRAVELENTRY_DATARECOVERY:
2541 return E_FAIL; /* FIXME */
2543 ok(0, "unexpected command %d\n", nCmdID);
2548 if(IsEqualGUID(&CGID_ShellDocView, pguidCmdGroup)) {
2549 ok(nCmdexecopt == 0, "nCmdexecopts=%08x\n", nCmdexecopt);
2553 CHECK_EXPECT2(Exec_ShellDocView_37);
2556 test_GetCurMoniker(doc_unk, NULL, nav_url);
2557 else if(load_from_stream)
2558 test_GetCurMoniker(doc_unk, NULL, "about:blank");
2560 test_GetCurMoniker(doc_unk, doc_mon, NULL);
2562 ok(pvaOut == NULL, "pvaOut=%p, expected NULL\n", pvaOut);
2563 ok(pvaIn != NULL, "pvaIn == NULL\n");
2565 ok(V_VT(pvaIn) == VT_I4, "V_VT(pvaIn)=%d, expected VT_I4\n", V_VT(pvaIn));
2566 ok(V_I4(pvaIn) == 0, "V_I4(pvaIn)=%d, expected 0\n", V_I4(pvaIn));
2571 IHTMLPrivateWindow *priv_window;
2574 CHECK_EXPECT(Exec_ShellDocView_63);
2575 ok(pvaIn != NULL, "pvaIn == NULL\n");
2576 ok(V_VT(pvaIn) == VT_UNKNOWN, "V_VT(pvaIn) = %d\n", V_VT(pvaIn));
2577 ok(V_UNKNOWN(pvaIn) != NULL, "VPUNKNOWN(pvaIn) = NULL\n");
2578 ok(pvaOut != NULL, "pvaOut == NULL\n");
2579 ok(V_VT(pvaOut) == VT_EMPTY, "V_VT(pvaOut) = %d\n", V_VT(pvaOut));
2581 hres = IUnknown_QueryInterface(V_UNKNOWN(pvaIn), &IID_IHTMLPrivateWindow, (void**)&priv_window);
2582 ok(hres == S_OK, "Could not get IHTMLPrivateWindow: %08x\n", hres);
2584 IHTMLPrivateWindow_Release(priv_window);
2586 load_state = LD_LOADING;
2587 return S_OK; /* TODO */
2591 CHECK_EXPECT(Exec_ShellDocView_67);
2592 ok(pvaIn != NULL, "pvaIn == NULL\n");
2593 ok(V_VT(pvaIn) == VT_BSTR, "V_VT(pvaIn) = %d\n", V_VT(pvaIn));
2594 ok(!strcmp_wa(V_BSTR(pvaIn), nav_url), "V_BSTR(pvaIn) = %s, expected %s\n", wine_dbgstr_w(V_BSTR(pvaIn)), nav_url);
2595 ok(pvaOut != NULL, "pvaOut == NULL\n");
2596 ok(V_VT(pvaOut) == VT_BOOL, "V_VT(pvaOut) = %d\n", V_VT(pvaOut));
2597 ok(V_BOOL(pvaOut) == VARIANT_TRUE, "V_BOOL(pvaOut) = %x\n", V_BOOL(pvaOut));
2598 load_state = LD_DOLOAD;
2602 CHECK_EXPECT2(Exec_ShellDocView_84);
2604 ok(pvaIn == NULL, "pvaIn != NULL\n");
2605 ok(pvaOut != NULL, "pvaOut == NULL\n");
2607 ok(V_VT(pvaOut) == VT_EMPTY, "V_VT(pvaOut)=%d\n", V_VT(pvaOut));
2612 CHECK_EXPECT2(Exec_ShellDocView_103);
2614 ok(pvaIn == NULL, "pvaIn != NULL\n");
2615 ok(pvaOut == NULL, "pvaOut != NULL\n");
2620 CHECK_EXPECT2(Exec_ShellDocView_105);
2622 ok(pvaIn != NULL, "pvaIn == NULL\n");
2623 ok(pvaOut == NULL, "pvaOut != NULL\n");
2628 CHECK_EXPECT2(Exec_ShellDocView_140);
2630 ok(pvaIn == NULL, "pvaIn != NULL\n");
2631 ok(pvaOut == NULL, "pvaOut != NULL\n");
2636 ok(0, "unexpected command %d\n", nCmdID);
2641 if(IsEqualGUID(&CGID_MSHTML, pguidCmdGroup)) {
2642 ok(nCmdexecopt == 0, "nCmdexecopts=%08x\n", nCmdexecopt);
2645 case IDM_PARSECOMPLETE:
2646 CHECK_EXPECT(Exec_MSHTML_PARSECOMPLETE);
2647 ok(pvaIn == NULL, "pvaIn != NULL\n");
2648 ok(pvaOut == NULL, "pvaOut != NULL\n");
2651 ok(0, "unexpected command %d\n", nCmdID);
2655 if(IsEqualGUID(&CGID_DocHostCmdPriv, pguidCmdGroup)) {
2657 case DOCHOST_DOCCANNAVIGATE:
2658 CHECK_EXPECT(Exec_DOCCANNAVIGATE);
2659 ok(pvaIn != NULL, "pvaIn == NULL\n");
2660 ok(pvaOut == NULL, "pvaOut != NULL\n");
2661 ok(V_VT(pvaIn) == VT_UNKNOWN, "V_VT(pvaIn) != VT_UNKNOWN\n");
2662 /* FIXME: test V_UNKNOWN(pvaIn) == window */
2665 return E_FAIL; /* TODO */
2669 if(IsEqualGUID(&CGID_Explorer, pguidCmdGroup)) {
2670 ok(nCmdexecopt == 0, "nCmdexecopts=%08x\n", nCmdexecopt);
2674 CHECK_EXPECT2(Exec_Explorer_69);
2675 ok(pvaIn == NULL, "pvaIn != NULL\n");
2676 ok(pvaOut != NULL, "pvaOut == NULL\n");
2679 ok(0, "unexpected cmd %d of CGID_Explorer\n", nCmdID);
2684 if(IsEqualGUID(&CGID_DocHostCommandHandler, pguidCmdGroup)) {
2686 case OLECMDID_PAGEACTIONBLOCKED: /* win2k3 */
2687 SET_EXPECT(SetStatusText);
2688 ok(pvaIn == NULL, "pvaIn != NULL\n");
2689 ok(pvaOut == NULL, "pvaOut != NULL\n");
2691 case OLECMDID_SHOWSCRIPTERROR:
2695 ok(0, "unexpected command %d\n", nCmdID);
2700 ok(0, "unexpected pguidCmdGroup: %s\n", debugstr_guid(pguidCmdGroup));
2704 static IOleCommandTargetVtbl OleCommandTargetVtbl = {
2705 OleCommandTarget_QueryInterface,
2706 OleCommandTarget_AddRef,
2707 OleCommandTarget_Release,
2708 OleCommandTarget_QueryStatus,
2709 OleCommandTarget_Exec
2712 static IOleCommandTarget OleCommandTarget = { &OleCommandTargetVtbl };
2714 static HRESULT WINAPI Dispatch_QueryInterface(IDispatch *iface, REFIID riid, void **ppv)
2716 return QueryInterface(riid, ppv);
2719 static HRESULT WINAPI Dispatch_Invoke(IDispatch *iface, DISPID dispIdMember, REFIID riid,
2720 LCID lcid, WORD wFlags, DISPPARAMS *pDispParams, VARIANT *pVarResult,
2721 EXCEPINFO *pExcepInfo, UINT *puArgErr)
2723 ok(IsEqualGUID(&IID_NULL, riid), "riid != IID_NULL\n");
2724 ok(pDispParams != NULL, "pDispParams == NULL\n");
2725 ok(pExcepInfo == NULL, "pExcepInfo=%p, expected NULL\n", pExcepInfo);
2726 ok(puArgErr != NULL, "puArgErr == NULL\n");
2727 ok(V_VT(pVarResult) == 0, "V_VT(pVarResult)=%d, expected 0\n", V_VT(pVarResult));
2728 ok(wFlags == DISPATCH_PROPERTYGET, "wFlags=%08x, expected DISPATCH_PROPERTYGET\n", wFlags);
2729 test_readyState(NULL);
2731 switch(dispIdMember) {
2732 case DISPID_AMBIENT_USERMODE:
2733 CHECK_EXPECT2(Invoke_AMBIENT_USERMODE);
2734 V_VT(pVarResult) = VT_BOOL;
2735 V_BOOL(pVarResult) = VARIANT_TRUE;
2737 case DISPID_AMBIENT_DLCONTROL:
2738 CHECK_EXPECT2(Invoke_AMBIENT_DLCONTROL);
2740 case DISPID_AMBIENT_OFFLINEIFNOTCONNECTED:
2741 CHECK_EXPECT2(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
2743 case DISPID_AMBIENT_SILENT:
2744 CHECK_EXPECT2(Invoke_AMBIENT_SILENT);
2745 V_VT(pVarResult) = VT_BOOL;
2746 V_BOOL(pVarResult) = VARIANT_FALSE;
2748 case DISPID_AMBIENT_USERAGENT:
2749 CHECK_EXPECT(Invoke_AMBIENT_USERAGENT);
2751 case DISPID_AMBIENT_PALETTE:
2752 CHECK_EXPECT(Invoke_AMBIENT_PALETTE);
2756 ok(0, "unexpected dispid %d\n", dispIdMember);
2760 static const IDispatchVtbl DispatchVtbl = {
2761 Dispatch_QueryInterface,
2764 Dispatch_GetTypeInfoCount,
2765 Dispatch_GetTypeInfo,
2766 Dispatch_GetIDsOfNames,
2770 static IDispatch Dispatch = { &DispatchVtbl };
2772 static HRESULT WINAPI ServiceProvider_QueryInterface(IServiceProvider *iface,
2773 REFIID riid, void **ppv)
2775 return QueryInterface(riid, ppv);
2778 static ULONG WINAPI ServiceProvider_AddRef(IServiceProvider *iface)
2783 static ULONG WINAPI ServiceProvider_Release(IServiceProvider *iface)
2788 static HRESULT WINAPI ServiceProvider_QueryService(IServiceProvider *iface, REFGUID guidService,
2789 REFIID riid, void **ppv)
2792 * Services used by HTMLDocument:
2795 * IInternetSecurityManager
2797 * {D5F78C80-5252-11CF-90FA-00AA0042106E}
2800 * {3050F312-98B5-11CF-BB82-00AA00BDCE0B}
2801 * {53A2D5B1-D2FC-11D0-84E0-006097C9987D}
2802 * {AD7F6C62-F6BD-11D2-959B-006097C553C8}
2804 * {6D12FE80-7911-11CF-9534-0000C05BAE0B}
2805 * IElementBehaviorFactory
2806 * {3050F429-98B5-11CF-BB82-00AA00BDCE0B}
2816 if(IsEqualGUID(&IID_IHlinkFrame, guidService)) {
2817 ok(IsEqualGUID(&IID_IHlinkFrame, riid), "unexpected riid\n");
2822 if(IsEqualGUID(&SID_SNewWindowManager, guidService)) {
2823 ok(IsEqualGUID(&IID_INewWindowManager, riid), "unexpected riid\n");
2824 *ppv = &NewWindowManager;
2828 return E_NOINTERFACE;
2831 static const IServiceProviderVtbl ServiceProviderVtbl = {
2832 ServiceProvider_QueryInterface,
2833 ServiceProvider_AddRef,
2834 ServiceProvider_Release,
2835 ServiceProvider_QueryService
2838 static IServiceProvider ServiceProvider = { &ServiceProviderVtbl };
2840 static HRESULT WINAPI AdviseSink_QueryInterface(IAdviseSinkEx *iface,
2841 REFIID riid, void **ppv)
2843 return QueryInterface(riid, ppv);
2846 static ULONG WINAPI AdviseSink_AddRef(IAdviseSinkEx *iface)
2851 static ULONG WINAPI AdviseSink_Release(IAdviseSinkEx *iface)
2856 static void WINAPI AdviseSink_OnDataChange(IAdviseSinkEx *iface,
2857 FORMATETC *pFormatetc, STGMEDIUM *pStgmed)
2859 ok(0, "unexpected call\n");
2862 static void WINAPI AdviseSink_OnViewChange(IAdviseSinkEx *iface,
2863 DWORD dwAspect, LONG lindex)
2865 ok(0, "unexpected call\n");
2868 static void WINAPI AdviseSink_OnRename(IAdviseSinkEx *iface, IMoniker *pmk)
2870 ok(0, "unexpected call\n");
2873 static void WINAPI AdviseSink_OnSave(IAdviseSinkEx *iface)
2875 ok(0, "unexpected call\n");
2878 static void WINAPI AdviseSink_OnClose(IAdviseSinkEx *iface)
2880 ok(0, "unexpected call\n");
2883 static void WINAPI AdviseSinkEx_OnViewStatusChange(IAdviseSinkEx *iface, DWORD dwViewStatus)
2885 ok(0, "unexpected call\n");
2888 static void WINAPI ObjectAdviseSink_OnClose(IAdviseSinkEx *iface)
2890 CHECK_EXPECT(Advise_Close);
2893 static const IAdviseSinkExVtbl AdviseSinkVtbl = {
2894 AdviseSink_QueryInterface,
2897 AdviseSink_OnDataChange,
2898 AdviseSink_OnViewChange,
2899 AdviseSink_OnRename,
2901 ObjectAdviseSink_OnClose,
2902 AdviseSinkEx_OnViewStatusChange
2905 static IAdviseSinkEx AdviseSink = { &AdviseSinkVtbl };
2907 static HRESULT WINAPI ViewAdviseSink_QueryInterface(IAdviseSinkEx *iface,
2908 REFIID riid, void **ppv)
2910 if(IsEqualGUID(&IID_IAdviseSinkEx, riid)) {
2915 ok(0, "unexpected riid %s\n", debugstr_guid(riid));
2917 return E_NOINTERFACE;
2920 static void WINAPI ViewAdviseSink_OnViewChange(IAdviseSinkEx *iface,
2921 DWORD dwAspect, LONG lindex)
2923 CHECK_EXPECT2(OnViewChange);
2925 ok(dwAspect == DVASPECT_CONTENT, "dwAspect = %d\n", dwAspect);
2926 ok(lindex == -1, "lindex = %d\n", lindex);
2929 static const IAdviseSinkExVtbl ViewAdviseSinkVtbl = {
2930 ViewAdviseSink_QueryInterface,
2933 AdviseSink_OnDataChange,
2934 ViewAdviseSink_OnViewChange,
2935 AdviseSink_OnRename,
2938 AdviseSinkEx_OnViewStatusChange
2941 static IAdviseSinkEx ViewAdviseSink = { &ViewAdviseSinkVtbl };
2943 DEFINE_GUID(IID_unk1, 0xD48A6EC6,0x6A4A,0x11CF,0x94,0xA7,0x44,0x45,0x53,0x54,0x00,0x00); /* HTMLWindow2 ? */
2944 DEFINE_GUID(IID_IThumbnailView, 0x7BB0B520,0xB1A7,0x11D2,0xBB,0x23,0x00,0xC0,0x4F,0x79,0xAB,0xCD);
2945 DEFINE_GUID(IID_IRenMailEditor, 0x000670BA,0x0000,0x0000,0xC0,0x00,0x00,0x00,0x00,0x00,0x00,0x46);
2946 DEFINE_GUID(IID_unk4, 0x305104a6,0x98b5,0x11cf,0xbb,0x82,0x00,0xaa,0x00,0xbd,0xce,0x0b);
2947 DEFINE_GUID(IID_IDocHostUIHandlerPriv, 0xf0d241d1,0x5d0e,0x4e85,0xbc,0xb4,0xfa,0xd7,0xf7,0xc5,0x52,0x8c);
2949 static HRESULT QueryInterface(REFIID riid, void **ppv)
2953 if(IsEqualGUID(&IID_IUnknown, riid) || IsEqualGUID(&IID_IOleClientSite, riid))
2955 else if(IsEqualGUID(&IID_IOleDocumentSite, riid))
2956 *ppv = &DocumentSite;
2957 else if(IsEqualGUID(&IID_IDocHostUIHandler, riid) || IsEqualGUID(&IID_IDocHostUIHandler2, riid))
2958 *ppv = &DocHostUIHandler;
2959 else if(IsEqualGUID(&IID_IOleContainer, riid))
2960 *ppv = &OleContainer;
2961 else if(IsEqualGUID(&IID_IOleWindow, riid) || IsEqualGUID(&IID_IOleInPlaceSite, riid))
2962 *ppv = &InPlaceSiteWindowless;
2963 else if(IsEqualGUID(&IID_IOleCommandTarget , riid))
2964 *ppv = &OleCommandTarget;
2965 else if(IsEqualGUID(&IID_IDispatch, riid))
2967 else if(IsEqualGUID(&IID_IServiceProvider, riid))
2968 *ppv = &ServiceProvider;
2969 else if(IsEqualGUID(&IID_IOleInPlaceSiteEx, riid))
2970 *ppv = ipsex ? &InPlaceSiteWindowless : NULL;
2971 else if(IsEqualGUID(&IID_IOleInPlaceSiteWindowless, riid))
2972 *ppv = ipsw ? &InPlaceSiteWindowless : NULL;
2973 else if(IsEqualGUID(&IID_IOleControlSite, riid))
2974 *ppv = &OleControlSite;
2975 else if(IsEqualGUID(&IID_IDocHostShowUI, riid))
2976 return E_NOINTERFACE; /* TODO */
2977 else if(IsEqualGUID(&IID_IProxyManager, riid))
2978 return E_NOINTERFACE; /* ? */
2979 else if(IsEqualGUID(&IID_unk1, riid))
2980 return E_NOINTERFACE; /* HTMLWindow2 ? */
2981 else if(IsEqualGUID(&IID_IThumbnailView, riid))
2982 return E_NOINTERFACE; /* ? */
2983 else if(IsEqualGUID(&IID_IRenMailEditor, riid))
2984 return E_NOINTERFACE; /* ? */
2985 else if(IsEqualGUID(&IID_unk4, riid))
2986 return E_NOINTERFACE; /* ? */
2987 else if(IsEqualGUID(&IID_IDocHostUIHandlerPriv, riid))
2988 return E_NOINTERFACE; /* ? */
2990 ok(0, "unexpected riid %s\n", debugstr_guid(riid));
2994 return E_NOINTERFACE;
2997 static LRESULT WINAPI wnd_proc(HWND hwnd, UINT msg, WPARAM wParam, LPARAM lParam)
2999 return DefWindowProc(hwnd, msg, wParam, lParam);
3002 static void test_doscroll(IUnknown *unk)
3004 IHTMLDocument3 *doc;
3005 IHTMLElement2 *elem2;
3010 hres = IUnknown_QueryInterface(unk, &IID_IHTMLDocument3, (void**)&doc);
3011 ok(hres == S_OK, "Could not get IHTMLDocument3 iface: %08x\n", hres);
3015 hres = IHTMLDocument3_get_documentElement(doc, &elem);
3016 IHTMLDocument3_Release(doc);
3017 ok(hres == S_OK, "get_documentElement failed: %08x\n", hres);
3018 switch(load_state) {
3022 ok(!elem, "elem != NULL\n");
3025 case LD_INTERACTIVE:
3027 ok(elem != NULL, "elem == NULL\n");
3032 hres = IHTMLElement_QueryInterface(elem, &IID_IHTMLElement2, (void**)&elem2);
3033 IHTMLElement_Release(elem);
3034 ok(hres == S_OK, "Could not get IHTMLElement2 iface: %08x\n", hres);
3037 V_BSTR(&v) = a2bstr("left");
3038 hres = IHTMLElement2_doScroll(elem2, v);
3039 SysFreeString(V_BSTR(&v));
3040 IHTMLElement2_Release(elem2);
3042 if(inplace_deactivated)
3043 ok(hres == E_PENDING, "doScroll failed: %08x\n", hres);
3044 else if(load_state == LD_COMPLETE)
3045 ok(hres == S_OK, "doScroll failed: %08x\n", hres);
3047 ok(hres == E_PENDING || hres == S_OK, "doScroll failed: %08x\n", hres);
3050 static void _test_readyState(unsigned line, IUnknown *unk)
3052 IHTMLDocument2 *htmldoc;
3053 DISPPARAMS dispparams;
3059 static const LPCSTR expected_state[] = {
3074 hres = IUnknown_QueryInterface(unk, &IID_IHTMLDocument2, (void**)&htmldoc);
3075 ok(hres == S_OK, "QueryInterface(IID_IHTMLDocument2) failed: %08x\n", hres);
3079 hres = IHTMLDocument2_get_readyState(htmldoc, NULL);
3080 ok(hres == E_POINTER, "get_readyState failed: %08x, expected\n", hres);
3082 hres = IHTMLDocument2_get_readyState(htmldoc, &state);
3083 ok(hres == S_OK, "get_ReadyState failed: %08x\n", hres);
3085 if(!strcmp_wa(state, "interactive") && load_state == LD_LOADING)
3086 load_state = LD_INTERACTIVE;
3089 (!strcmp_wa(state, expected_state[load_state]), "unexpected state %s, expected %d\n",
3090 wine_dbgstr_w(state), load_state);
3091 SysFreeString(state);
3093 hres = IHTMLDocument2_get_body(htmldoc, &elem);
3094 ok_(__FILE__,line)(hres == S_OK, "get_body failed: %08x\n", hres);
3096 IHTMLElement2 *elem2;
3099 hres = IHTMLElement_QueryInterface(elem, &IID_IHTMLElement2, (void**)&elem2);
3100 IHTMLElement_Release(elem);
3101 ok(hres == S_OK, "Could not get IHTMLElement2 iface: %08x\n", hres);
3103 hres = IHTMLElement2_get_readyState(elem2, &var);
3104 IHTMLElement2_Release(elem2);
3105 ok(hres == S_OK, "get_readyState failed: %08x\n", hres);
3106 ok(V_VT(&var) == VT_BSTR, "V_VT(state) = %d\n", V_VT(&var));
3107 ok(!strcmp_wa(V_BSTR(&var), "complete"), "unexpected body state %s\n", wine_dbgstr_w(V_BSTR(&var)));
3110 ok_(__FILE__,line)(load_state != LD_COMPLETE, "body is NULL in complete state\n");
3113 dispparams.cArgs = 0;
3114 dispparams.cNamedArgs = 0;
3115 dispparams.rgdispidNamedArgs = NULL;
3116 dispparams.rgvarg = NULL;
3120 hres = IHTMLDocument2_Invoke(htmldoc, DISPID_READYSTATE, &IID_NULL, 0, DISPATCH_PROPERTYGET,
3121 &dispparams, &out, NULL, NULL);
3122 ok(hres == S_OK, "Invoke(DISPID_READYSTATE) failed: %08x\n", hres);
3124 ok_(__FILE__,line) (V_VT(&out) == VT_I4, "V_VT(out)=%d\n", V_VT(&out));
3125 ok_(__FILE__,line) (V_I4(&out) == load_state%5, "VT_I4(out)=%d, expected %d\n", V_I4(&out), load_state%5);
3127 test_doscroll((IUnknown*)htmldoc);
3129 IHTMLDocument2_Release(htmldoc);
3132 static void test_ViewAdviseSink(IHTMLDocument2 *doc)
3137 hres = IHTMLDocument2_QueryInterface(doc, &IID_IViewObject, (void**)&view);
3138 ok(hres == S_OK, "QueryInterface(IID_IViewObject) failed: %08x\n", hres);
3140 hres = IViewObject_SetAdvise(view, DVASPECT_CONTENT, ADVF_PRIMEFIRST, (IAdviseSink*)&ViewAdviseSink);
3141 ok(hres == S_OK, "SetAdvise failed: %08x\n", hres);
3143 IViewObject_Release(view);
3146 static void test_ConnectionPoint(IConnectionPointContainer *container, REFIID riid)
3148 IConnectionPointContainer *tmp_container = NULL;
3149 IConnectionPoint *cp;
3153 hres = IConnectionPointContainer_FindConnectionPoint(container, riid, &cp);
3154 ok(hres == S_OK, "FindConnectionPoint failed: %08x\n", hres);
3158 hres = IConnectionPoint_GetConnectionInterface(cp, &iid);
3159 ok(hres == S_OK, "GetConnectionInterface failed: %08x\n", hres);
3160 ok(IsEqualGUID(riid, &iid), "wrong iid\n");
3162 hres = IConnectionPoint_GetConnectionInterface(cp, NULL);
3163 ok(hres == E_POINTER, "GetConnectionInterface failed: %08x, expected E_POINTER\n", hres);
3165 hres = IConnectionPoint_GetConnectionPointContainer(cp, &tmp_container);
3166 ok(hres == S_OK, "GetConnectionPointContainer failed: %08x\n", hres);
3167 ok(tmp_container == container, "container != tmp_container\n");
3169 IConnectionPointContainer_Release(tmp_container);
3171 hres = IConnectionPoint_GetConnectionPointContainer(cp, NULL);
3172 ok(hres == E_POINTER, "GetConnectionPointContainer failed: %08x, expected E_POINTER\n", hres);
3174 if(IsEqualGUID(&IID_IPropertyNotifySink, riid)) {
3177 hres = IConnectionPoint_Advise(cp, (IUnknown*)&PropertyNotifySink, &cookie);
3178 ok(hres == S_OK, "Advise failed: %08x\n", hres);
3181 IConnectionPoint_Release(cp);
3184 static void test_ConnectionPointContainer(IHTMLDocument2 *doc)
3186 IConnectionPointContainer *container;
3189 hres = IUnknown_QueryInterface(doc, &IID_IConnectionPointContainer, (void**)&container);
3190 ok(hres == S_OK, "QueryInterface(IID_IConnectionPointContainer) failed: %08x\n", hres);
3194 test_ConnectionPoint(container, &IID_IDispatch);
3195 test_ConnectionPoint(container, &IID_IPropertyNotifySink);
3196 test_ConnectionPoint(container, &DIID_HTMLDocumentEvents);
3197 test_ConnectionPoint(container, &DIID_HTMLDocumentEvents2);
3199 IConnectionPointContainer_Release(container);
3202 static void set_custom_uihandler(IHTMLDocument2 *doc, IDocHostUIHandler2 *uihandler)
3204 ICustomDoc *custom_doc;
3207 hres = IHTMLDocument2_QueryInterface(doc, &IID_ICustomDoc, (void**)&custom_doc);
3208 ok(hres == S_OK, "Could not get ICustomDoc iface: %08x\n", hres);
3210 expect_uihandler_iface = uihandler;
3212 hres = ICustomDoc_SetUIHandler(custom_doc, (IDocHostUIHandler*)uihandler);
3213 ICustomDoc_Release(custom_doc);
3214 ok(hres == S_OK, "SetUIHandler failed: %08x\n", hres);
3217 static void test_Load(IPersistMoniker *persist, IMoniker *mon)
3221 WCHAR sz_html_clientsite_objectparam[MAX_PATH];
3223 lstrcpyW(sz_html_clientsite_objectparam, SZ_HTML_CLIENTSITE_OBJECTPARAM);
3225 test_readyState((IUnknown*)persist);
3229 CreateBindCtx(0, &bind);
3230 IBindCtx_RegisterObjectParam(bind, sz_html_clientsite_objectparam,
3231 (IUnknown*)&ClientSite);
3234 SET_EXPECT(GetDisplayName);
3235 if(!set_clientsite) {
3236 SET_EXPECT(Invoke_AMBIENT_USERMODE);
3237 SET_EXPECT(GetHostInfo);
3238 SET_EXPECT(Invoke_AMBIENT_DLCONTROL);
3239 SET_EXPECT(Invoke_AMBIENT_SILENT);
3240 SET_EXPECT(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
3241 SET_EXPECT(Invoke_AMBIENT_USERAGENT);
3242 SET_EXPECT(Invoke_AMBIENT_PALETTE);
3243 SET_EXPECT(GetOptionKeyPath);
3244 SET_EXPECT(GetOverrideKeyPath);
3245 SET_EXPECT(GetWindow);
3246 SET_EXPECT(Exec_DOCCANNAVIGATE);
3247 SET_EXPECT(QueryStatus_SETPROGRESSTEXT);
3248 SET_EXPECT(Exec_SETPROGRESSMAX);
3249 SET_EXPECT(Exec_SETPROGRESSPOS);
3250 SET_EXPECT(Exec_ShellDocView_37);
3252 if(!container_locked) {
3253 SET_EXPECT(GetContainer);
3254 SET_EXPECT(LockContainer);
3256 SET_EXPECT(OnChanged_READYSTATE);
3257 SET_EXPECT(Exec_ShellDocView_84);
3258 SET_EXPECT(IsSystemMoniker);
3260 SET_EXPECT(BindToStorage);
3261 SET_EXPECT(SetActiveObject);
3262 if(set_clientsite) {
3263 SET_EXPECT(Invoke_AMBIENT_SILENT);
3264 SET_EXPECT(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
3265 SET_EXPECT(Exec_ShellDocView_37);
3267 load_state = LD_DOLOAD;
3268 expect_LockContainer_fLock = TRUE;
3269 readystate_set_loading = TRUE;
3271 hres = IPersistMoniker_Load(persist, FALSE, mon, bind, 0x12);
3272 ok(hres == S_OK, "Load failed: %08x\n", hres);
3275 CHECK_CALLED(GetDisplayName);
3276 if(!set_clientsite) {
3277 CHECK_CALLED(Invoke_AMBIENT_USERMODE);
3278 CHECK_CALLED(GetHostInfo);
3279 CHECK_CALLED(Invoke_AMBIENT_DLCONTROL);
3280 CHECK_CALLED(Invoke_AMBIENT_SILENT);
3281 CHECK_CALLED(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
3282 CHECK_CALLED(Invoke_AMBIENT_USERAGENT);
3283 CHECK_CALLED(Invoke_AMBIENT_PALETTE);
3284 CHECK_CALLED(GetOptionKeyPath);
3285 CHECK_CALLED(GetOverrideKeyPath);
3286 CHECK_CALLED(GetWindow);
3287 CHECK_CALLED(Exec_DOCCANNAVIGATE);
3288 CHECK_CALLED(QueryStatus_SETPROGRESSTEXT);
3289 CHECK_CALLED(Exec_SETPROGRESSMAX);
3290 CHECK_CALLED(Exec_SETPROGRESSPOS);
3291 CHECK_CALLED(Exec_ShellDocView_37);
3293 if(!container_locked) {
3294 CHECK_CALLED(GetContainer);
3295 CHECK_CALLED(LockContainer);
3296 container_locked = TRUE;
3298 CHECK_CALLED(OnChanged_READYSTATE);
3299 SET_CALLED(IsSystemMoniker); /* IE7 */
3300 SET_CALLED(Exec_ShellDocView_84);
3302 CHECK_CALLED(BindToStorage);
3303 SET_CALLED(SetActiveObject); /* FIXME */
3304 if(set_clientsite) {
3305 CHECK_CALLED(Invoke_AMBIENT_SILENT);
3306 CHECK_CALLED(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
3307 CHECK_CALLED(Exec_ShellDocView_37);
3310 set_clientsite = container_locked = TRUE;
3312 test_GetCurMoniker((IUnknown*)persist, mon, NULL);
3314 IBindCtx_Release(bind);
3316 test_readyState((IUnknown*)persist);
3319 #define DWL_VERBDONE 0x0001
3320 #define DWL_CSS 0x0002
3321 #define DWL_TRYCSS 0x0004
3322 #define DWL_HTTP 0x0008
3323 #define DWL_EMPTY 0x0010
3325 static void test_download(DWORD flags)
3330 hwnd = FindWindowA("Internet Explorer_Hidden", NULL);
3331 ok(hwnd != NULL, "Could not find hidden window\n");
3333 test_readyState(NULL);
3335 if(flags & (DWL_VERBDONE|DWL_HTTP))
3336 SET_EXPECT(Exec_SETPROGRESSMAX);
3337 if((flags & DWL_VERBDONE) && !load_from_stream)
3338 SET_EXPECT(GetHostInfo);
3339 SET_EXPECT(SetStatusText);
3340 if(!(flags & DWL_EMPTY))
3341 SET_EXPECT(Exec_SETDOWNLOADSTATE_1);
3342 SET_EXPECT(OnViewChange);
3343 SET_EXPECT(GetDropTarget);
3344 if(flags & DWL_TRYCSS)
3345 SET_EXPECT(Exec_ShellDocView_84);
3346 if(flags & DWL_CSS) {
3347 SET_EXPECT(CreateInstance);
3349 SET_EXPECT(LockRequest);
3350 SET_EXPECT(Terminate);
3351 SET_EXPECT(Protocol_Read);
3352 SET_EXPECT(UnlockRequest);
3354 SET_EXPECT(Exec_Explorer_69);
3355 SET_EXPECT(EnableModeless_TRUE); /* IE7 */
3356 SET_EXPECT(Frame_EnableModeless_TRUE); /* IE7 */
3357 SET_EXPECT(EnableModeless_FALSE); /* IE7 */
3358 SET_EXPECT(Frame_EnableModeless_FALSE); /* IE7 */
3360 SET_EXPECT(Exec_ShellDocView_37);
3361 if(flags & DWL_HTTP) {
3362 SET_EXPECT(OnChanged_1012);
3363 SET_EXPECT(Exec_HTTPEQUIV);
3364 SET_EXPECT(Exec_SETTITLE);
3366 SET_EXPECT(OnChanged_1005);
3367 SET_EXPECT(OnChanged_READYSTATE);
3368 SET_EXPECT(Exec_SETPROGRESSPOS);
3369 if(!(flags & DWL_EMPTY))
3370 SET_EXPECT(Exec_SETDOWNLOADSTATE_0);
3371 SET_EXPECT(Exec_ShellDocView_103);
3372 SET_EXPECT(Exec_ShellDocView_105);
3373 SET_EXPECT(Exec_ShellDocView_140);
3374 SET_EXPECT(Exec_MSHTML_PARSECOMPLETE);
3375 SET_EXPECT(Exec_HTTPEQUIV_DONE);
3376 SET_EXPECT(SetStatusText);
3378 SET_EXPECT(UpdateUI);
3379 SET_EXPECT(Exec_UPDATECOMMANDS);
3380 SET_EXPECT(Exec_SETTITLE);
3382 expect_status_text = (LPWSTR)0xdeadbeef; /* TODO */
3384 while(!called_Exec_HTTPEQUIV_DONE && GetMessage(&msg, NULL, 0, 0)) {
3385 TranslateMessage(&msg);
3386 DispatchMessage(&msg);
3389 if(flags & DWL_VERBDONE)
3390 CHECK_CALLED(Exec_SETPROGRESSMAX);
3391 if(flags & DWL_HTTP)
3392 SET_CALLED(Exec_SETPROGRESSMAX);
3393 if((flags & DWL_VERBDONE) && !load_from_stream) {
3395 todo_wine CHECK_CALLED(GetHostInfo);
3397 CHECK_CALLED(GetHostInfo);
3399 CHECK_CALLED(SetStatusText);
3400 if(!(flags & DWL_EMPTY))
3401 CHECK_CALLED(Exec_SETDOWNLOADSTATE_1);
3402 CHECK_CALLED(OnViewChange);
3403 SET_CALLED(GetDropTarget);
3404 if(flags & DWL_TRYCSS)
3405 SET_CALLED(Exec_ShellDocView_84);
3406 if(flags & DWL_CSS) {
3407 CHECK_CALLED(CreateInstance);
3408 CHECK_CALLED(Start);
3409 CHECK_CALLED(LockRequest);
3410 CHECK_CALLED(Terminate);
3411 CHECK_CALLED(Protocol_Read);
3412 CHECK_CALLED(UnlockRequest);
3414 SET_CALLED(Exec_Explorer_69);
3415 SET_CALLED(EnableModeless_TRUE); /* IE7 */
3416 SET_CALLED(Frame_EnableModeless_TRUE); /* IE7 */
3417 SET_CALLED(EnableModeless_FALSE); /* IE7 */
3418 SET_CALLED(Frame_EnableModeless_FALSE); /* IE7 */
3420 todo_wine CHECK_CALLED(Exec_ShellDocView_37);
3421 if(flags & DWL_HTTP) todo_wine {
3422 CHECK_CALLED(OnChanged_1012);
3423 CHECK_CALLED(Exec_HTTPEQUIV);
3424 CHECK_CALLED(Exec_SETTITLE);
3426 CHECK_CALLED(OnChanged_1005);
3427 CHECK_CALLED(OnChanged_READYSTATE);
3428 CHECK_CALLED(Exec_SETPROGRESSPOS);
3429 if(!(flags & DWL_EMPTY))
3430 CHECK_CALLED(Exec_SETDOWNLOADSTATE_0);
3431 SET_CALLED(Exec_ShellDocView_103);
3432 SET_CALLED(Exec_ShellDocView_105);
3433 SET_CALLED(Exec_ShellDocView_140);
3434 CHECK_CALLED(Exec_MSHTML_PARSECOMPLETE);
3435 CHECK_CALLED(Exec_HTTPEQUIV_DONE);
3436 SET_CALLED(SetStatusText);
3437 if(nav_url) { /* avoiding race, FIXME: fund better way */
3438 SET_CALLED(UpdateUI);
3439 SET_CALLED(Exec_UPDATECOMMANDS);
3440 SET_CALLED(Exec_SETTITLE);
3443 load_state = LD_COMPLETE;
3445 test_readyState(NULL);
3448 static void test_Persist(IHTMLDocument2 *doc, IMoniker *mon)
3450 IPersistMoniker *persist_mon;
3451 IPersistFile *persist_file;
3455 hres = IUnknown_QueryInterface(doc, &IID_IPersistFile, (void**)&persist_file);
3456 ok(hres == S_OK, "QueryInterface(IID_IPersist) failed: %08x\n", hres);
3457 if(SUCCEEDED(hres)) {
3458 hres = IPersist_GetClassID(persist_file, NULL);
3459 ok(hres == E_INVALIDARG, "GetClassID returned: %08x, expected E_INVALIDARG\n", hres);
3461 hres = IPersist_GetClassID(persist_file, &guid);
3462 ok(hres == S_OK, "GetClassID failed: %08x\n", hres);
3463 ok(IsEqualGUID(&CLSID_HTMLDocument, &guid), "guid != CLSID_HTMLDocument\n");
3465 IPersist_Release(persist_file);
3468 hres = IUnknown_QueryInterface(doc, &IID_IPersistMoniker, (void**)&persist_mon);
3469 ok(hres == S_OK, "QueryInterface(IID_IPersistMoniker) failed: %08x\n", hres);
3470 if(SUCCEEDED(hres)) {
3471 hres = IPersistMoniker_GetClassID(persist_mon, NULL);
3472 ok(hres == E_INVALIDARG, "GetClassID returned: %08x, expected E_INVALIDARG\n", hres);
3474 hres = IPersistMoniker_GetClassID(persist_mon, &guid);
3475 ok(hres == S_OK, "GetClassID failed: %08x\n", hres);
3476 ok(IsEqualGUID(&CLSID_HTMLDocument, &guid), "guid != CLSID_HTMLDocument\n");
3478 if(load_state == LD_DOLOAD)
3479 test_Load(persist_mon, mon);
3481 test_readyState((IUnknown*)doc);
3483 IPersistMoniker_Release(persist_mon);
3487 static void test_put_href(IHTMLDocument2 *doc, BOOL use_replace)
3489 IHTMLPrivateWindow *priv_window;
3490 IHTMLWindow2 *window;
3491 IHTMLLocation *location;
3497 hres = IHTMLDocument2_get_location(doc, &location);
3498 ok(hres == S_OK, "get_location failed: %08x\n", hres);
3499 ok(location != NULL, "location == NULL\n");
3501 nav_url = use_replace ? "about:replace" : "about:blank";
3503 str = a2bstr(nav_url);
3504 SET_EXPECT(TranslateUrl);
3505 SET_EXPECT(Navigate);
3507 hres = IHTMLLocation_replace(location, str);
3508 ok(hres == S_OK, "put_href failed: %08x\n", hres);
3510 hres = IHTMLLocation_put_href(location, str);
3511 ok(hres == S_OK, "put_href failed: %08x\n", hres);
3513 CHECK_CALLED(TranslateUrl);
3514 CHECK_CALLED(Navigate);
3516 IHTMLLocation_Release(location);
3518 hres = IHTMLDocument2_get_parentWindow(doc, &window);
3519 ok(hres == S_OK, "get_parentWindow failed: %08x\n", hres);
3521 hres = IHTMLWindow2_QueryInterface(window, &IID_IHTMLPrivateWindow, (void**)&priv_window);
3522 IHTMLWindow2_Release(window);
3523 ok(hres == S_OK, "QueryInterface(IID_IHTMLPrivateWindow) failed: %08x\n", hres);
3525 readystate_set_loading = TRUE;
3526 SET_EXPECT(TranslateUrl);
3527 SET_EXPECT(Exec_ShellDocView_67);
3528 SET_EXPECT(Invoke_AMBIENT_SILENT);
3529 SET_EXPECT(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
3530 SET_EXPECT(OnChanged_READYSTATE);
3531 SET_EXPECT(Exec_ShellDocView_63);
3534 V_VT(&vempty) = VT_EMPTY;
3535 hres = IHTMLPrivateWindow_SuperNavigate(priv_window, str, str2, NULL, NULL, &vempty, &vempty, 0);
3536 SysFreeString(str2);
3537 ok(hres == S_OK, "SuperNavigate failed: %08x\n", hres);
3539 CHECK_CALLED(TranslateUrl);
3540 CHECK_CALLED(Exec_ShellDocView_67);
3541 CHECK_CALLED(Invoke_AMBIENT_SILENT);
3542 CHECK_CALLED(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
3543 SET_CALLED(OnChanged_READYSTATE); /* not always called */
3544 CHECK_CALLED(Exec_ShellDocView_63);
3547 test_GetCurMoniker(doc_unk, doc_mon, NULL);
3550 hres = IHTMLPrivateWindow_GetAddressBarUrl(priv_window, &str2);
3551 ok(hres == S_OK, "GetAddressBarUrl failed: %08x\n", hres);
3552 ok(!strcmp_wa(str2, use_replace?"about:blank":"http://www.winehq.org/"),
3553 "unexpected address bar url: %s\n", wine_dbgstr_w(str2));
3554 SysFreeString(str2);
3556 test_download(DWL_VERBDONE);
3558 hres = IHTMLPrivateWindow_GetAddressBarUrl(priv_window, &str2);
3559 ok(hres == S_OK, "GetAddressBarUrl failed: %08x\n", hres);
3560 ok(!lstrcmpW(str2, str), "unexpected address bar url: %s\n", wine_dbgstr_w(str2));
3561 SysFreeString(str2);
3563 IHTMLPrivateWindow_Release(priv_window);
3566 static void test_open_window(IHTMLDocument2 *doc)
3568 IHTMLWindow2 *window, *new_window;
3572 hres = IHTMLDocument2_get_parentWindow(doc, &window);
3573 ok(hres == S_OK, "get_parentWindow failed: %08x\n", hres);
3575 url = a2bstr(nav_url = "about:blank");
3576 name = a2bstr("test");
3577 new_window = (void*)0xdeadbeef;
3581 SET_EXPECT(TranslateUrl);
3582 SET_EXPECT(EvaluateNewWindow);
3584 hres = IHTMLWindow2_open(window, url, name, NULL, VARIANT_FALSE, &new_window);
3587 SysFreeString(name);
3590 CHECK_CALLED(TranslateUrl);
3592 if(!called_EvaluateNewWindow) {
3594 win_skip("INewWindowManager not supported\n");
3595 if(SUCCEEDED(hres) && new_window)
3596 IHTMLWindow2_Release(new_window);
3597 IHTMLWindow2_Release(window);
3602 CHECK_CALLED(EvaluateNewWindow);
3605 ok(hres == S_OK, "open failed: %08x\n", hres);
3607 ok(new_window == NULL, "new_window != NULL\n");
3609 IHTMLWindow2_Release(window);
3612 static void test_clear(IHTMLDocument2 *doc)
3616 hres = IHTMLDocument2_clear(doc);
3617 ok(hres == S_OK, "clear failed: %08x\n", hres);
3620 static const OLECMDF expect_cmds[OLECMDID_GETPRINTTEMPLATE+1] = {
3622 OLECMDF_SUPPORTED, /* OLECMDID_OPEN */
3623 OLECMDF_SUPPORTED, /* OLECMDID_NEW */
3624 OLECMDF_SUPPORTED, /* OLECMDID_SAVE */
3625 OLECMDF_SUPPORTED|OLECMDF_ENABLED, /* OLECMDID_SAVEAS */
3626 OLECMDF_SUPPORTED, /* OLECMDID_SAVECOPYAS */
3627 OLECMDF_SUPPORTED|OLECMDF_ENABLED, /* OLECMDID_PRINT */
3628 OLECMDF_SUPPORTED|OLECMDF_ENABLED, /* OLECMDID_PRINTPREVIEW */
3629 OLECMDF_SUPPORTED|OLECMDF_ENABLED, /* OLECMDID_PAGESETUP */
3630 OLECMDF_SUPPORTED, /* OLECMDID_SPELL */
3631 OLECMDF_SUPPORTED|OLECMDF_ENABLED, /* OLECMDID_PROPERTIES */
3632 OLECMDF_SUPPORTED, /* OLECMDID_CUT */
3633 OLECMDF_SUPPORTED, /* OLECMDID_COPY */
3634 OLECMDF_SUPPORTED, /* OLECMDID_PASTE */
3635 OLECMDF_SUPPORTED, /* OLECMDID_PASTESPECIAL */
3636 OLECMDF_SUPPORTED, /* OLECMDID_UNDO */
3637 OLECMDF_SUPPORTED, /* OLECMDID_REDO */
3638 OLECMDF_SUPPORTED|OLECMDF_ENABLED, /* OLECMDID_SELECTALL */
3639 OLECMDF_SUPPORTED, /* OLECMDID_CLEARSELECTION */
3640 OLECMDF_SUPPORTED, /* OLECMDID_ZOOM */
3641 OLECMDF_SUPPORTED, /* OLECMDID_GETZOOMRANGE */
3643 OLECMDF_SUPPORTED|OLECMDF_ENABLED, /* OLECMDID_REFRESH */
3644 OLECMDF_SUPPORTED|OLECMDF_ENABLED, /* OLECMDID_STOP */
3646 OLECMDF_SUPPORTED, /* OLECMDID_STOPDOWNLOAD */
3648 OLECMDF_SUPPORTED, /* OLECMDID_DELETE */
3650 OLECMDF_SUPPORTED, /* OLECMDID_ENABLE_INTERACTION */
3651 OLECMDF_SUPPORTED, /* OLECMDID_ONUNLOAD */
3653 OLECMDF_SUPPORTED, /* OLECMDID_SHOWPAGESETUP */
3654 OLECMDF_SUPPORTED, /* OLECMDID_SHOWPRINT */
3656 OLECMDF_SUPPORTED, /* OLECMDID_CLOSE */
3658 OLECMDF_SUPPORTED, /* OLECMDID_SETPRINTTEMPLATE */
3659 OLECMDF_SUPPORTED /* OLECMDID_GETPRINTTEMPLATE */
3662 #define test_QueryStatus(u,cgid,cmdid,cmdf) _test_QueryStatus(__LINE__,u,cgid,cmdid,cmdf)
3663 static void _test_QueryStatus(unsigned line, IUnknown *unk, REFIID cgid, ULONG cmdid, DWORD cmdf)
3665 IOleCommandTarget *cmdtrg;
3666 OLECMD olecmd = {cmdid, 0};
3669 hres = IUnknown_QueryInterface(unk, &IID_IOleCommandTarget, (void**)&cmdtrg);
3670 ok_(__FILE__,line) (hres == S_OK, "QueryInterface(IID_IOleCommandTarget failed: %08x\n", hres);
3674 hres = IOleCommandTarget_QueryStatus(cmdtrg, cgid, 1, &olecmd, NULL);
3675 ok(hres == S_OK, "QueryStatus(%u) failed: %08x\n", cmdid, hres);
3677 IOleCommandTarget_Release(cmdtrg);
3679 ok_(__FILE__,line) (olecmd.cmdID == cmdid, "cmdID changed\n");
3680 ok_(__FILE__,line) (olecmd.cmdf == cmdf, "(%u) cmdf=%08x, expected %08x\n", cmdid, olecmd.cmdf, cmdf);
3683 static void test_MSHTML_QueryStatus(IHTMLDocument2 *doc, DWORD cmdf)
3685 IUnknown *unk = doc ? (IUnknown*)doc : doc_unk;
3687 test_QueryStatus(unk, &CGID_MSHTML, IDM_FONTNAME, cmdf);
3688 test_QueryStatus(unk, &CGID_MSHTML, IDM_FONTSIZE, cmdf);
3689 test_QueryStatus(unk, &CGID_MSHTML, IDM_SELECTALL, cmdf|OLECMDF_ENABLED);
3690 test_QueryStatus(unk, &CGID_MSHTML, IDM_BOLD, cmdf);
3691 test_QueryStatus(unk, &CGID_MSHTML, IDM_FORECOLOR, cmdf);
3692 test_QueryStatus(unk, &CGID_MSHTML, IDM_JUSTIFYCENTER, cmdf);
3693 test_QueryStatus(unk, &CGID_MSHTML, IDM_JUSTIFYLEFT, cmdf);
3694 test_QueryStatus(unk, &CGID_MSHTML, IDM_JUSTIFYRIGHT, cmdf);
3695 test_QueryStatus(unk, &CGID_MSHTML, IDM_ITALIC, cmdf);
3696 test_QueryStatus(unk, &CGID_MSHTML, IDM_UNDERLINE, cmdf);
3697 test_QueryStatus(unk, &CGID_MSHTML, IDM_HORIZONTALLINE, cmdf);
3698 test_QueryStatus(unk, &CGID_MSHTML, IDM_ORDERLIST, cmdf);
3699 test_QueryStatus(unk, &CGID_MSHTML, IDM_UNORDERLIST, cmdf);
3700 test_QueryStatus(unk, &CGID_MSHTML, IDM_INDENT, cmdf);
3701 test_QueryStatus(unk, &CGID_MSHTML, IDM_OUTDENT, cmdf);
3702 test_QueryStatus(unk, &CGID_MSHTML, IDM_DELETE, cmdf);
3705 static void test_OleCommandTarget(IHTMLDocument2 *doc)
3707 IOleCommandTarget *cmdtrg;
3708 OLECMD cmds[OLECMDID_GETPRINTTEMPLATE];
3712 hres = IUnknown_QueryInterface(doc, &IID_IOleCommandTarget, (void**)&cmdtrg);
3713 ok(hres == S_OK, "QueryInterface(IID_IOleCommandTarget failed: %08x\n", hres);
3717 for(i=0; i<OLECMDID_GETPRINTTEMPLATE; i++) {
3718 cmds[i].cmdID = i+1;
3719 cmds[i].cmdf = 0xf0f0;
3722 SET_EXPECT(QueryStatus_OPEN);
3723 SET_EXPECT(QueryStatus_NEW);
3724 hres = IOleCommandTarget_QueryStatus(cmdtrg, NULL, sizeof(cmds)/sizeof(cmds[0]), cmds, NULL);
3725 ok(hres == S_OK, "QueryStatus failed: %08x\n", hres);
3726 CHECK_CALLED(QueryStatus_OPEN);
3727 CHECK_CALLED(QueryStatus_NEW);
3729 for(i=0; i<OLECMDID_GETPRINTTEMPLATE; i++) {
3730 ok(cmds[i].cmdID == i+1, "cmds[%d].cmdID canged to %x\n", i, cmds[i].cmdID);
3731 if(i+1 == OLECMDID_FIND)
3733 ok(cmds[i].cmdf == expect_cmds[i+1], "cmds[%d].cmdf=%x, expected %x\n",
3734 i+1, cmds[i].cmdf, expect_cmds[i+1]);
3737 ok(!cmds[OLECMDID_FIND-1].cmdf || cmds[OLECMDID_FIND-1].cmdf == (OLECMDF_SUPPORTED|OLECMDF_ENABLED),
3738 "cmds[OLECMDID_FIND].cmdf=%x\n", cmds[OLECMDID_FIND-1].cmdf);
3740 IOleCommandTarget_Release(cmdtrg);
3743 static void test_OleCommandTarget_fail(IHTMLDocument2 *doc)
3745 IOleCommandTarget *cmdtrg;
3750 {OLECMDID_OPEN, 0xf0f0},
3751 {OLECMDID_GETPRINTTEMPLATE+1, 0xf0f0}
3754 hres = IUnknown_QueryInterface(doc, &IID_IOleCommandTarget, (void**)&cmdtrg);
3755 ok(hres == S_OK, "QueryInterface(IIDIOleCommandTarget failed: %08x\n", hres);
3759 hres = IOleCommandTarget_QueryStatus(cmdtrg, NULL, 0, NULL, NULL);
3760 ok(hres == S_OK, "QueryStatus failed: %08x\n", hres);
3762 SET_EXPECT(QueryStatus_OPEN);
3763 hres = IOleCommandTarget_QueryStatus(cmdtrg, NULL, 2, cmd, NULL);
3764 CHECK_CALLED(QueryStatus_OPEN);
3766 ok(hres == OLECMDERR_E_NOTSUPPORTED,
3767 "QueryStatus failed: %08x, expected OLECMDERR_E_NOTSUPPORTED\n", hres);
3768 ok(cmd[1].cmdID == OLECMDID_GETPRINTTEMPLATE+1,
3769 "cmd[0].cmdID=%d, expected OLECMDID_GETPRINTTEMPLATE+1\n", cmd[0].cmdID);
3770 ok(cmd[1].cmdf == 0, "cmd[0].cmdf=%x, expected 0\n", cmd[0].cmdf);
3771 ok(cmd[0].cmdf == OLECMDF_SUPPORTED,
3772 "cmd[1].cmdf=%x, expected OLECMDF_SUPPORTED\n", cmd[1].cmdf);
3774 hres = IOleCommandTarget_QueryStatus(cmdtrg, &IID_IHTMLDocument2, 2, cmd, NULL);
3775 ok(hres == OLECMDERR_E_UNKNOWNGROUP,
3776 "QueryStatus failed: %08x, expected OLECMDERR_E_UNKNOWNGROUP\n", hres);
3778 for(i=0; i<OLECMDID_GETPRINTTEMPLATE; i++) {
3779 if(!expect_cmds[i]) {
3780 hres = IOleCommandTarget_Exec(cmdtrg, NULL, OLECMDID_UPDATECOMMANDS,
3781 OLECMDEXECOPT_DODEFAULT, NULL, NULL);
3782 ok(hres == OLECMDERR_E_NOTSUPPORTED,
3783 "Exec failed: %08x, expected OLECMDERR_E_NOTSUPPORTED\n", hres);
3787 hres = IOleCommandTarget_Exec(cmdtrg, NULL, OLECMDID_GETPRINTTEMPLATE+1,
3788 OLECMDEXECOPT_DODEFAULT, NULL, NULL);
3789 ok(hres == OLECMDERR_E_NOTSUPPORTED,
3790 "Exec failed: %08x, expected OLECMDERR_E_NOTSUPPORTED\n", hres);
3792 IOleCommandTarget_Release(cmdtrg);
3795 static void test_exec_onunload(IHTMLDocument2 *doc)
3797 IOleCommandTarget *cmdtrg;
3801 hres = IUnknown_QueryInterface(doc, &IID_IOleCommandTarget, (void**)&cmdtrg);
3802 ok(hres == S_OK, "QueryInterface(IID_IOleCommandTarget) failed: %08x\n", hres);
3806 memset(&var, 0x0a, sizeof(var));
3807 hres = IOleCommandTarget_Exec(cmdtrg, NULL, OLECMDID_ONUNLOAD,
3808 OLECMDEXECOPT_DODEFAULT, NULL, &var);
3809 ok(hres == S_OK, "Exec(..., OLECMDID_ONUNLOAD, ...) failed: %08x\n", hres);
3810 ok(V_VT(&var) == VT_BOOL, "V_VT(var)=%d, expected VT_BOOL\n", V_VT(&var));
3811 ok(V_BOOL(&var) == VARIANT_TRUE, "V_BOOL(var)=%x, expected VARIANT_TRUE\n", V_BOOL(&var));
3813 hres = IOleCommandTarget_Exec(cmdtrg, NULL, OLECMDID_ONUNLOAD,
3814 OLECMDEXECOPT_DODEFAULT, NULL, NULL);
3815 ok(hres == S_OK, "Exec(..., OLECMDID_ONUNLOAD, ...) failed: %08x\n", hres);
3817 IOleCommandTarget_Release(cmdtrg);
3820 static void test_exec_editmode(IUnknown *unk, BOOL loaded)
3822 IOleCommandTarget *cmdtrg;
3825 hres = IUnknown_QueryInterface(unk, &IID_IOleCommandTarget, (void**)&cmdtrg);
3826 ok(hres == S_OK, "QueryInterface(IID_IOleCommandTarget) failed: %08x\n", hres);
3833 load_state = LD_DOLOAD;
3836 SET_EXPECT(GetClassID);
3837 SET_EXPECT(SetStatusText);
3838 SET_EXPECT(Exec_ShellDocView_37);
3839 SET_EXPECT(GetHostInfo);
3841 SET_EXPECT(GetDisplayName);
3842 SET_EXPECT(Invoke_AMBIENT_SILENT);
3843 SET_EXPECT(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
3844 SET_EXPECT(OnChanged_READYSTATE);
3845 SET_EXPECT(IsSystemMoniker);
3846 SET_EXPECT(Exec_ShellDocView_84);
3848 SET_EXPECT(BindToStorage);
3849 SET_EXPECT(InPlaceUIWindow_SetActiveObject);
3852 SET_EXPECT(InPlaceFrame_SetBorderSpace);
3854 expect_status_text = NULL;
3855 readystate_set_loading = TRUE;
3857 hres = IOleCommandTarget_Exec(cmdtrg, &CGID_MSHTML, IDM_EDITMODE,
3858 OLECMDEXECOPT_DODEFAULT, NULL, NULL);
3859 ok(hres == S_OK, "Exec failed: %08x\n", hres);
3862 CHECK_CALLED(GetClassID);
3863 CHECK_CALLED(SetStatusText);
3864 CHECK_CALLED(Exec_ShellDocView_37);
3865 CHECK_CALLED(GetHostInfo);
3867 CHECK_CALLED(GetDisplayName);
3868 CHECK_CALLED(Invoke_AMBIENT_SILENT);
3869 CHECK_CALLED(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
3870 CHECK_CALLED(OnChanged_READYSTATE);
3871 SET_CALLED(IsSystemMoniker); /* IE7 */
3872 SET_CALLED(Exec_ShellDocView_84);
3874 CHECK_CALLED(BindToStorage);
3875 CHECK_CALLED(InPlaceUIWindow_SetActiveObject);
3876 CHECK_CALLED(HideUI);
3877 CHECK_CALLED(ShowUI);
3878 CHECK_CALLED(InPlaceFrame_SetBorderSpace);
3880 test_timer(EXPECT_UPDATEUI|EXPECT_SETTITLE);
3882 IOleCommandTarget_Release(cmdtrg);
3884 hres = IOleCommandTarget_Exec(cmdtrg, &CGID_MSHTML, IDM_EDITMODE,
3885 OLECMDEXECOPT_DODEFAULT, NULL, NULL);
3886 ok(hres == S_OK, "Exec failed: %08x\n", hres);
3889 static void test_exec_fontname(IUnknown *unk, LPCWSTR name, LPCWSTR exname)
3891 IOleCommandTarget *cmdtrg;
3892 VARIANT *in = NULL, _in, *out = NULL, _out;
3895 hres = IUnknown_QueryInterface(unk, &IID_IOleCommandTarget, (void**)&cmdtrg);
3896 ok(hres == S_OK, "QueryInterface(IIDIOleM=CommandTarget failed: %08x\n", hres);
3903 V_BSTR(in) = SysAllocString(name);
3909 V_I4(out) = 0xdeadbeef;
3912 hres = IOleCommandTarget_Exec(cmdtrg, &CGID_MSHTML, IDM_FONTNAME, 0, in, out);
3913 ok(hres == S_OK, "Exec(IDM_FONTNAME) failed: %08x\n", hres);
3919 ok(V_VT(out) == VT_BSTR, "V_VT(out) = %x\n", V_VT(out));
3920 if(V_VT(out) == VT_BSTR) {
3922 ok(!lstrcmpW(V_BSTR(out), name ? name : exname),
3923 "unexpected fontname %s\n", wine_dbgstr_w(name));
3925 ok(V_BSTR(out) == NULL, "V_BSTR(out) != NULL\n");
3930 IOleCommandTarget_Release(cmdtrg);
3933 static void test_exec_noargs(IUnknown *unk, DWORD cmdid)
3935 IOleCommandTarget *cmdtrg;
3938 hres = IUnknown_QueryInterface(unk, &IID_IOleCommandTarget, (void**)&cmdtrg);
3939 ok(hres == S_OK, "QueryInterface(IID_IOleCommandTarget) failed: %08x\n", hres);
3943 hres = IOleCommandTarget_Exec(cmdtrg, &CGID_MSHTML, cmdid,
3944 OLECMDEXECOPT_DODEFAULT, NULL, NULL);
3945 ok(hres == S_OK, "Exec failed: %08x\n", hres);
3947 IOleCommandTarget_Release(cmdtrg);
3950 static void test_IsDirty(IHTMLDocument2 *doc, HRESULT exhres)
3952 IPersistStreamInit *perinit;
3953 IPersistMoniker *permon;
3954 IPersistFile *perfile;
3957 hres = IUnknown_QueryInterface(doc, &IID_IPersistStreamInit, (void**)&perinit);
3958 ok(hres == S_OK, "QueryInterface(IID_IPersistStreamInit failed: %08x\n", hres);
3959 if(SUCCEEDED(hres)) {
3960 hres = IPersistStreamInit_IsDirty(perinit);
3961 ok(hres == exhres, "IsDirty() = %08x, expected %08x\n", hres, exhres);
3962 IPersistStreamInit_Release(perinit);
3965 hres = IUnknown_QueryInterface(doc, &IID_IPersistMoniker, (void**)&permon);
3966 ok(hres == S_OK, "QueryInterface(IID_IPersistMoniker failed: %08x\n", hres);
3967 if(SUCCEEDED(hres)) {
3968 hres = IPersistMoniker_IsDirty(permon);
3969 ok(hres == exhres, "IsDirty() = %08x, expected %08x\n", hres, exhres);
3970 IPersistMoniker_Release(permon);
3973 hres = IUnknown_QueryInterface(doc, &IID_IPersistFile, (void**)&perfile);
3974 ok(hres == S_OK, "QueryInterface(IID_IPersistFile failed: %08x\n", hres);
3975 if(SUCCEEDED(hres)) {
3976 hres = IPersistFile_IsDirty(perfile);
3977 ok(hres == exhres, "IsDirty() = %08x, expected %08x\n", hres, exhres);
3978 IPersistFile_Release(perfile);
3982 static HWND create_container_window(void)
3984 static const WCHAR wszHTMLDocumentTest[] =
3985 {'H','T','M','L','D','o','c','u','m','e','n','t','T','e','s','t',0};
3986 static WNDCLASSEXW wndclass = {
3987 sizeof(WNDCLASSEXW),
3990 0, 0, NULL, NULL, NULL, NULL, NULL,
3991 wszHTMLDocumentTest,
3995 RegisterClassExW(&wndclass);
3996 return CreateWindowW(wszHTMLDocumentTest, wszHTMLDocumentTest,
3997 WS_OVERLAPPEDWINDOW, CW_USEDEFAULT, CW_USEDEFAULT,
3998 515, 530, NULL, NULL, NULL, NULL);
4001 static void test_DoVerb(IOleObject *oleobj)
4003 RECT rect = {0,0,500,500};
4006 if(!container_locked) {
4007 SET_EXPECT(GetContainer);
4008 SET_EXPECT(LockContainer);
4010 SET_EXPECT(ActivateMe);
4011 expect_LockContainer_fLock = TRUE;
4013 hres = IOleObject_DoVerb(oleobj, OLEIVERB_SHOW, NULL, &ClientSite, -1, container_hwnd, &rect);
4014 ok(hres == S_OK, "DoVerb failed: %08x\n", hres);
4016 if(!container_locked) {
4017 CHECK_CALLED(GetContainer);
4018 CHECK_CALLED(LockContainer);
4019 container_locked = TRUE;
4021 CHECK_CALLED(ActivateMe);
4024 #define CLIENTSITE_EXPECTPATH 0x00000001
4025 #define CLIENTSITE_SETNULL 0x00000002
4026 #define CLIENTSITE_DONTSET 0x00000004
4028 static void test_ClientSite(IOleObject *oleobj, DWORD flags)
4030 IOleClientSite *clientsite;
4033 if(flags & CLIENTSITE_SETNULL) {
4034 hres = IOleObject_GetClientSite(oleobj, &clientsite);
4035 ok(hres == S_OK, "SetClientSite failed: %08x\n", hres);
4037 ok(clientsite == &ClientSite, "clientsite=%p, expected %p\n", clientsite, &ClientSite);
4039 ok(!clientsite, "clientsite != NULL\n");
4041 hres = IOleObject_SetClientSite(oleobj, NULL);
4042 ok(hres == S_OK, "SetClientSite failed: %08x\n", hres);
4044 set_clientsite = FALSE;
4047 if(flags & CLIENTSITE_DONTSET)
4050 if(!expect_uihandler_iface)
4051 expect_uihandler_iface = &DocHostUIHandler;
4053 hres = IOleObject_GetClientSite(oleobj, &clientsite);
4054 ok(hres == S_OK, "GetClientSite failed: %08x\n", hres);
4055 ok(clientsite == (set_clientsite ? &ClientSite : NULL), "GetClientSite() = %p, expected %p\n",
4056 clientsite, set_clientsite ? &ClientSite : NULL);
4058 if(!set_clientsite) {
4059 if(expect_uihandler_iface)
4060 SET_EXPECT(GetHostInfo);
4061 if(flags & CLIENTSITE_EXPECTPATH) {
4062 SET_EXPECT(GetOptionKeyPath);
4063 SET_EXPECT(GetOverrideKeyPath);
4065 SET_EXPECT(GetWindow);
4066 if(flags & CLIENTSITE_EXPECTPATH)
4067 SET_EXPECT(Exec_DOCCANNAVIGATE);
4068 SET_EXPECT(QueryStatus_SETPROGRESSTEXT);
4069 SET_EXPECT(Exec_SETPROGRESSMAX);
4070 SET_EXPECT(Exec_SETPROGRESSPOS);
4071 SET_EXPECT(Invoke_AMBIENT_USERMODE);
4072 SET_EXPECT(Invoke_AMBIENT_DLCONTROL);
4073 SET_EXPECT(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
4074 SET_EXPECT(Invoke_AMBIENT_SILENT);
4075 SET_EXPECT(Invoke_AMBIENT_USERAGENT);
4076 SET_EXPECT(Invoke_AMBIENT_PALETTE);
4078 hres = IOleObject_SetClientSite(oleobj, &ClientSite);
4079 ok(hres == S_OK, "SetClientSite failed: %08x\n", hres);
4081 if(expect_uihandler_iface)
4082 CHECK_CALLED(GetHostInfo);
4083 if(flags & CLIENTSITE_EXPECTPATH) {
4084 CHECK_CALLED(GetOptionKeyPath);
4085 CHECK_CALLED(GetOverrideKeyPath);
4087 CHECK_CALLED(GetWindow);
4088 if(flags & CLIENTSITE_EXPECTPATH)
4089 CHECK_CALLED(Exec_DOCCANNAVIGATE);
4090 CHECK_CALLED(QueryStatus_SETPROGRESSTEXT);
4091 CHECK_CALLED(Exec_SETPROGRESSMAX);
4092 CHECK_CALLED(Exec_SETPROGRESSPOS);
4093 CHECK_CALLED(Invoke_AMBIENT_USERMODE);
4094 CHECK_CALLED(Invoke_AMBIENT_DLCONTROL);
4095 CHECK_CALLED(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
4096 CHECK_CALLED(Invoke_AMBIENT_SILENT);
4097 CHECK_CALLED(Invoke_AMBIENT_USERAGENT);
4098 CHECK_CALLED(Invoke_AMBIENT_PALETTE);
4100 set_clientsite = TRUE;
4103 hres = IOleObject_SetClientSite(oleobj, &ClientSite);
4104 ok(hres == S_OK, "SetClientSite failed: %08x\n", hres);
4106 hres = IOleObject_GetClientSite(oleobj, &clientsite);
4107 ok(hres == S_OK, "GetClientSite failed: %08x\n", hres);
4108 ok(clientsite == &ClientSite, "GetClientSite() = %p, expected %p\n", clientsite, &ClientSite);
4111 static void test_OnAmbientPropertyChange(IHTMLDocument2 *doc)
4113 IOleControl *control = NULL;
4116 hres = IUnknown_QueryInterface(doc, &IID_IOleControl, (void**)&control);
4117 ok(hres == S_OK, "QueryInterface(IID_IOleControl failed: %08x\n", hres);
4121 SET_EXPECT(Invoke_AMBIENT_USERMODE);
4122 hres = IOleControl_OnAmbientPropertyChange(control, DISPID_AMBIENT_USERMODE);
4123 ok(hres == S_OK, "OnAmbientChange failed: %08x\n", hres);
4124 CHECK_CALLED(Invoke_AMBIENT_USERMODE);
4126 SET_EXPECT(Invoke_AMBIENT_DLCONTROL);
4127 hres = IOleControl_OnAmbientPropertyChange(control, DISPID_AMBIENT_DLCONTROL);
4128 ok(hres == S_OK, "OnAmbientChange failed: %08x\n", hres);
4129 CHECK_CALLED(Invoke_AMBIENT_DLCONTROL);
4131 SET_EXPECT(Invoke_AMBIENT_DLCONTROL);
4132 SET_EXPECT(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
4133 hres = IOleControl_OnAmbientPropertyChange(control, DISPID_AMBIENT_OFFLINEIFNOTCONNECTED);
4134 ok(hres == S_OK, "OnAmbientChange failed: %08x\n", hres);
4135 CHECK_CALLED(Invoke_AMBIENT_DLCONTROL);
4136 CHECK_CALLED(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
4138 SET_EXPECT(Invoke_AMBIENT_DLCONTROL);
4139 SET_EXPECT(Invoke_AMBIENT_SILENT);
4140 hres = IOleControl_OnAmbientPropertyChange(control, DISPID_AMBIENT_SILENT);
4141 ok(hres == S_OK, "OnAmbientChange failed: %08x\n", hres);
4142 CHECK_CALLED(Invoke_AMBIENT_DLCONTROL);
4143 CHECK_CALLED(Invoke_AMBIENT_SILENT);
4145 SET_EXPECT(Invoke_AMBIENT_USERAGENT);
4146 hres = IOleControl_OnAmbientPropertyChange(control, DISPID_AMBIENT_USERAGENT);
4147 ok(hres == S_OK, "OnAmbientChange failed: %08x\n", hres);
4148 CHECK_CALLED(Invoke_AMBIENT_USERAGENT);
4150 SET_EXPECT(Invoke_AMBIENT_PALETTE);
4151 hres = IOleControl_OnAmbientPropertyChange(control, DISPID_AMBIENT_PALETTE);
4152 ok(hres == S_OK, "OnAmbientChange failed: %08x\n", hres);
4153 CHECK_CALLED(Invoke_AMBIENT_PALETTE);
4155 IOleControl_Release(control);
4160 static void test_OnAmbientPropertyChange2(IHTMLDocument2 *doc)
4162 IOleControl *control = NULL;
4165 hres = IUnknown_QueryInterface(doc, &IID_IOleControl, (void**)&control);
4166 ok(hres == S_OK, "QueryInterface(IID_IOleControl failed: %08x\n", hres);
4170 hres = IOleControl_OnAmbientPropertyChange(control, DISPID_AMBIENT_PALETTE);
4171 ok(hres == S_OK, "OnAmbientPropertyChange failed: %08x\n", hres);
4173 IOleControl_Release(control);
4176 static void test_Close(IHTMLDocument2 *doc, BOOL set_client)
4178 IOleObject *oleobj = NULL;
4181 hres = IUnknown_QueryInterface(doc, &IID_IOleObject, (void**)&oleobj);
4182 ok(hres == S_OK, "QueryInterface(IID_IOleObject) failed: %08x\n", hres);
4186 SET_EXPECT(GetContainer);
4187 SET_EXPECT(LockContainer);
4188 expect_LockContainer_fLock = FALSE;
4189 hres = IOleObject_Close(oleobj, OLECLOSE_NOSAVE);
4190 ok(hres == S_OK, "Close failed: %08x\n", hres);
4191 CHECK_CALLED(GetContainer);
4192 CHECK_CALLED(LockContainer);
4193 container_locked = FALSE;
4196 test_ClientSite(oleobj, CLIENTSITE_SETNULL|CLIENTSITE_DONTSET);
4198 IOleObject_Release(oleobj);
4201 static void test_Advise(IHTMLDocument2 *doc)
4203 IOleObject *oleobj = NULL;
4204 IEnumSTATDATA *enum_advise = (void*)0xdeadbeef;
4208 hres = IUnknown_QueryInterface(doc, &IID_IOleObject, (void**)&oleobj);
4209 ok(hres == S_OK, "QueryInterface(IID_IOleObject) failed: %08x\n", hres);
4213 hres = IOleObject_Unadvise(oleobj, 0);
4214 ok(hres == OLE_E_NOCONNECTION, "Unadvise returned: %08x\n", hres);
4216 hres = IOleObject_EnumAdvise(oleobj, &enum_advise);
4217 ok(hres == S_OK, "EnumAdvise returned: %08x\n", hres);
4218 ok(enum_advise == NULL, "enum_advise != NULL\n");
4221 hres = IOleObject_Advise(oleobj, NULL, &conn);
4222 /* Old IE returns S_OK and sets conn to 1 */
4223 ok(hres == E_INVALIDARG || hres == S_OK, "Advise returned: %08x\n", hres);
4224 ok(conn == 0 || conn == 1, "conn = %d\n", conn);
4226 hres = IOleObject_Advise(oleobj, (IAdviseSink*)&AdviseSink, NULL);
4227 ok(hres == E_INVALIDARG, "Advise returned: %08x\n", hres);
4229 hres = IOleObject_Advise(oleobj, (IAdviseSink*)&AdviseSink, &conn);
4230 ok(hres == S_OK, "Advise returned: %08x\n", hres);
4231 ok(conn == 1, "conn = %d\n", conn);
4233 hres = IOleObject_Advise(oleobj, (IAdviseSink*)&AdviseSink, &conn);
4234 ok(hres == S_OK, "Advise returned: %08x\n", hres);
4235 ok(conn == 2, "conn = %d\n", conn);
4237 hres = IOleObject_Unadvise(oleobj, 1);
4238 ok(hres == S_OK, "Unadvise returned: %08x\n", hres);
4240 hres = IOleObject_Unadvise(oleobj, 1);
4241 ok(hres == OLE_E_NOCONNECTION, "Unadvise returned: %08x\n", hres);
4243 hres = IOleObject_Unadvise(oleobj, 2);
4244 ok(hres == S_OK, "Unadvise returned: %08x\n", hres);
4246 IOleObject_Release(oleobj);
4249 static void test_OnFrameWindowActivate(IUnknown *unk)
4251 IOleInPlaceActiveObject *inplaceact;
4254 hres = IUnknown_QueryInterface(unk, &IID_IOleInPlaceActiveObject, (void**)&inplaceact);
4255 ok(hres == S_OK, "QueryInterface(IID_IOleInPlaceActiveObject) failed: %08x\n", hres);
4259 if(set_clientsite) {
4260 expect_OnFrameWindowActivate_fActivate = TRUE;
4261 SET_EXPECT(OnFrameWindowActivate);
4262 hres = IOleInPlaceActiveObject_OnFrameWindowActivate(inplaceact, TRUE);
4263 ok(hres == S_OK, "OnFrameWindowActivate failed: %08x\n", hres);
4264 CHECK_CALLED(OnFrameWindowActivate);
4266 SET_EXPECT(OnFrameWindowActivate);
4267 hres = IOleInPlaceActiveObject_OnFrameWindowActivate(inplaceact, TRUE);
4268 ok(hres == S_OK, "OnFrameWindowActivate failed: %08x\n", hres);
4269 CHECK_CALLED(OnFrameWindowActivate);
4271 expect_OnFrameWindowActivate_fActivate = FALSE;
4272 SET_EXPECT(OnFrameWindowActivate);
4273 hres = IOleInPlaceActiveObject_OnFrameWindowActivate(inplaceact, FALSE);
4274 ok(hres == S_OK, "OnFrameWindowActivate failed: %08x\n", hres);
4275 CHECK_CALLED(OnFrameWindowActivate);
4277 expect_OnFrameWindowActivate_fActivate = TRUE;
4278 SET_EXPECT(OnFrameWindowActivate);
4279 hres = IOleInPlaceActiveObject_OnFrameWindowActivate(inplaceact, TRUE);
4280 ok(hres == S_OK, "OnFrameWindowActivate failed: %08x\n", hres);
4281 CHECK_CALLED(OnFrameWindowActivate);
4283 hres = IOleInPlaceActiveObject_OnFrameWindowActivate(inplaceact, FALSE);
4284 ok(hres == S_OK, "OnFrameWindowActivate failed: %08x\n", hres);
4286 hres = IOleInPlaceActiveObject_OnFrameWindowActivate(inplaceact, TRUE);
4287 ok(hres == S_OK, "OnFrameWindowActivate failed: %08x\n", hres);
4290 IOleInPlaceActiveObject_Release(inplaceact);
4293 static void test_InPlaceDeactivate(IHTMLDocument2 *doc, BOOL expect_call)
4295 IOleInPlaceObjectWindowless *windowlessobj = NULL;
4298 hres = IUnknown_QueryInterface(doc, &IID_IOleInPlaceObjectWindowless,
4299 (void**)&windowlessobj);
4300 ok(hres == S_OK, "QueryInterface(IID_IOleInPlaceObjectWindowless) failed: %08x\n", hres);
4305 SET_EXPECT(OnFocus_FALSE);
4307 SET_EXPECT(OnInPlaceDeactivateEx);
4309 SET_EXPECT(OnInPlaceDeactivate);
4311 hres = IOleInPlaceObjectWindowless_InPlaceDeactivate(windowlessobj);
4312 ok(hres == S_OK, "InPlaceDeactivate failed: %08x\n", hres);
4314 CHECK_CALLED(OnFocus_FALSE);
4316 CHECK_CALLED(OnInPlaceDeactivateEx);
4318 CHECK_CALLED(OnInPlaceDeactivate);
4321 IOleInPlaceObjectWindowless_Release(windowlessobj);
4324 static void test_Activate(IHTMLDocument2 *doc, DWORD flags)
4326 IOleObject *oleobj = NULL;
4327 IOleDocumentView *docview;
4334 IOleDocumentView_Release(view);
4337 hres = IUnknown_QueryInterface(doc, &IID_IOleObject, (void**)&oleobj);
4338 ok(hres == S_OK, "QueryInterface(IID_IOleObject) failed: %08x\n", hres);
4340 hres = IOleObject_GetUserClassID(oleobj, NULL);
4341 ok(hres == E_INVALIDARG, "GetUserClassID returned: %08x, expected E_INVALIDARG\n", hres);
4343 hres = IOleObject_GetUserClassID(oleobj, &guid);
4344 ok(hres == S_OK, "GetUserClassID failed: %08x\n", hres);
4345 ok(IsEqualGUID(&guid, &CLSID_HTMLDocument), "guid != CLSID_HTMLDocument\n");
4347 test_OnFrameWindowActivate((IUnknown*)doc);
4349 test_ClientSite(oleobj, flags);
4350 test_InPlaceDeactivate(doc, FALSE);
4351 test_DoVerb(oleobj);
4353 if(call_UIActivate == CallUIActivate_AfterShow) {
4354 hres = IOleObject_QueryInterface(oleobj, &IID_IOleDocumentView, (void **)&docview);
4355 ok(hres == S_OK, "IOleObject_QueryInterface failed with error 0x%08x\n", hres);
4357 SET_EXPECT(OnFocus_TRUE);
4358 SET_EXPECT(SetActiveObject);
4360 SET_EXPECT(InPlaceUIWindow_SetActiveObject);
4361 SET_EXPECT(InPlaceFrame_SetBorderSpace);
4362 expect_status_text = NULL;
4364 hres = IOleDocumentView_UIActivate(docview, TRUE);
4365 ok(hres == S_OK, "IOleDocumentView_UIActivate failed with error 0x%08x\n", hres);
4367 CHECK_CALLED(OnFocus_TRUE);
4368 CHECK_CALLED(SetActiveObject);
4369 CHECK_CALLED(ShowUI);
4370 CHECK_CALLED(InPlaceUIWindow_SetActiveObject);
4371 CHECK_CALLED(InPlaceFrame_SetBorderSpace);
4373 IOleDocumentView_Release(docview);
4376 IOleObject_Release(oleobj);
4378 test_OnFrameWindowActivate((IUnknown*)doc);
4381 static void test_Window(IHTMLDocument2 *doc, BOOL expect_success)
4383 IOleInPlaceActiveObject *activeobject = NULL;
4387 hres = IOleDocumentView_QueryInterface(view, &IID_IOleInPlaceActiveObject, (void**)&activeobject);
4388 ok(hres == S_OK, "Could not get IOleInPlaceActiveObject interface: %08x\n", hres);
4392 hres = IOleInPlaceActiveObject_GetWindow(activeobject, &tmp_hwnd);
4394 if(expect_success) {
4395 ok(hres == S_OK, "GetWindow failed: %08x\n", hres);
4396 ok(tmp_hwnd == hwnd, "tmp_hwnd=%p, expected %p\n", tmp_hwnd, hwnd);
4398 ok(hres == E_FAIL, "GetWindow returned %08x, expected E_FAIL\n", hres);
4399 ok(IsWindow(hwnd), "hwnd is destroyed\n");
4402 IOleInPlaceActiveObject_Release(activeobject);
4405 static void test_CloseView(void)
4407 IOleInPlaceSite *inplacesite = (IOleInPlaceSite*)0xff00ff00;
4413 hres = IOleDocumentView_Show(view, FALSE);
4414 ok(hres == S_OK, "Show failed: %08x\n", hres);
4416 hres = IOleDocumentView_CloseView(view, 0);
4417 ok(hres == S_OK, "CloseView failed: %08x\n", hres);
4419 hres = IOleDocumentView_SetInPlaceSite(view, NULL);
4420 ok(hres == S_OK, "SetInPlaceSite failed: %08x\n", hres);
4422 hres = IOleDocumentView_GetInPlaceSite(view, &inplacesite);
4423 ok(hres == S_OK, "SetInPlaceSite failed: %08x\n", hres);
4424 ok(inplacesite == NULL, "inplacesite=%p, expected NULL\n", inplacesite);
4427 static void test_UIDeactivate(void)
4431 if(call_UIActivate == CallUIActivate_AfterShow) {
4432 SET_EXPECT(InPlaceUIWindow_SetActiveObject);
4434 if(call_UIActivate != CallUIActivate_None) {
4435 SET_EXPECT(SetActiveObject_null);
4437 SET_EXPECT(OnUIDeactivate);
4440 hres = IOleDocumentView_UIActivate(view, FALSE);
4441 ok(hres == S_OK, "UIActivate failed: %08x\n", hres);
4443 if(call_UIActivate != CallUIActivate_None) {
4444 CHECK_CALLED(SetActiveObject_null);
4445 CHECK_CALLED(HideUI);
4446 CHECK_CALLED(OnUIDeactivate);
4448 if(call_UIActivate == CallUIActivate_AfterShow) {
4449 CHECK_CALLED(InPlaceUIWindow_SetActiveObject);
4453 static void test_Hide(void)
4460 hres = IOleDocumentView_Show(view, FALSE);
4461 ok(hres == S_OK, "Show failed: %08x\n", hres);
4464 static IHTMLDocument2 *create_document(void)
4466 IHTMLDocument2 *doc;
4469 hres = CoCreateInstance(&CLSID_HTMLDocument, NULL, CLSCTX_INPROC_SERVER|CLSCTX_INPROC_HANDLER,
4470 &IID_IHTMLDocument2, (void**)&doc);
4471 ok(hres == S_OK, "CoCreateInstance failed: %08x\n", hres);
4478 static void release_document(IHTMLDocument2 *doc)
4484 /* Some broken IEs don't like if the last released reference is IHTMLDocument2 iface.
4485 * To workaround it, we release it via IUnknown iface */
4486 hres = IHTMLDocument2_QueryInterface(doc, &IID_IUnknown, (void**)&unk);
4487 ok(hres == S_OK, "Could not get IUnknown iface: %08x\n", hres);
4489 IHTMLDocument2_Release(doc);
4490 ref = IUnknown_Release(unk);
4491 ok(!ref, "ref = %d\n", ref);
4494 static void test_Navigate(IHTMLDocument2 *doc)
4496 IHlinkTarget *hlink;
4499 hres = IUnknown_QueryInterface(doc, &IID_IHlinkTarget, (void**)&hlink);
4500 ok(hres == S_OK, "QueryInterface(IID_IHlinkTarget) failed: %08x\n", hres);
4502 SET_EXPECT(ActivateMe);
4503 hres = IHlinkTarget_Navigate(hlink, 0, NULL);
4504 ok(hres == S_OK, "Navigate failed: %08x\n", hres);
4505 CHECK_CALLED(ActivateMe);
4507 IHlinkTarget_Release(hlink);
4510 static void test_external(IHTMLDocument2 *doc, BOOL initialized)
4512 IDispatch *external;
4513 IHTMLWindow2 *htmlwin;
4516 hres = IHTMLDocument2_get_parentWindow(doc, &htmlwin);
4517 ok(hres == S_OK, "get_parentWindow failed: %08x\n", hres);
4520 SET_EXPECT(GetExternal);
4521 external = (void*)0xdeadbeef;
4522 hres = IHTMLWindow2_get_external(htmlwin, &external);
4524 ok(hres == S_FALSE || hres == S_OK, "get_external failed: %08x\n", hres);
4525 CHECK_CALLED(GetExternal);
4526 ok(external != NULL, "external == NULL\n");
4528 ok(hres == S_OK, "get_external failed: %08x\n", hres);
4529 ok(external == NULL, "external != NULL\n");
4532 IHTMLWindow2_Release(htmlwin);
4535 static void test_StreamLoad(IHTMLDocument2 *doc)
4537 IPersistStreamInit *init;
4540 hres = IUnknown_QueryInterface(doc, &IID_IPersistStreamInit, (void**)&init);
4541 ok(hres == S_OK, "QueryInterface(IID_IPersistStreamInit) failed: %08x\n", hres);
4545 SET_EXPECT(Invoke_AMBIENT_SILENT);
4546 SET_EXPECT(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
4547 SET_EXPECT(Exec_ShellDocView_37);
4548 SET_EXPECT(OnChanged_READYSTATE);
4550 readystate_set_loading = TRUE;
4552 hres = IPersistStreamInit_Load(init, &Stream);
4553 ok(hres == S_OK, "Load failed: %08x\n", hres);
4555 CHECK_CALLED(Invoke_AMBIENT_SILENT);
4556 CHECK_CALLED(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
4557 CHECK_CALLED(Exec_ShellDocView_37);
4558 CHECK_CALLED(OnChanged_READYSTATE);
4561 test_timer(EXPECT_SETTITLE);
4562 test_GetCurMoniker((IUnknown*)doc, NULL, "about:blank");
4564 IPersistStreamInit_Release(init);
4567 static void test_StreamInitNew(IHTMLDocument2 *doc)
4569 IPersistStreamInit *init;
4572 hres = IUnknown_QueryInterface(doc, &IID_IPersistStreamInit, (void**)&init);
4573 ok(hres == S_OK, "QueryInterface(IID_IPersistStreamInit) failed: %08x\n", hres);
4577 SET_EXPECT(Invoke_AMBIENT_SILENT);
4578 SET_EXPECT(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
4579 SET_EXPECT(Exec_ShellDocView_37);
4580 SET_EXPECT(OnChanged_READYSTATE);
4581 readystate_set_loading = TRUE;
4583 hres = IPersistStreamInit_InitNew(init);
4584 ok(hres == S_OK, "Load failed: %08x\n", hres);
4586 CHECK_CALLED(Invoke_AMBIENT_SILENT);
4587 CHECK_CALLED(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
4588 CHECK_CALLED(Exec_ShellDocView_37);
4589 CHECK_CALLED(OnChanged_READYSTATE);
4591 test_timer(EXPECT_SETTITLE);
4592 test_GetCurMoniker((IUnknown*)doc, NULL, "about:blank");
4594 IPersistStreamInit_Release(init);
4597 static void test_QueryInterface(IHTMLDocument2 *doc)
4602 static const IID IID_UndocumentedScriptIface =
4603 {0x719c3050,0xf9d3,0x11cf,{0xa4,0x93,0x00,0x40,0x05,0x23,0xa8,0xa0}};
4605 qi = (void*)0xdeadbeef;
4606 hres = IUnknown_QueryInterface(doc, &IID_IRunnableObject, (void**)&qi);
4607 ok(hres == E_NOINTERFACE, "QueryInterface returned %08x, expected E_NOINTERFACE\n", hres);
4608 ok(qi == NULL, "qirunnable=%p, expected NULL\n", qi);
4610 qi = (void*)0xdeadbeef;
4611 hres = IUnknown_QueryInterface(doc, &IID_IHTMLDOMNode, (void**)&qi);
4612 ok(hres == E_NOINTERFACE, "QueryInterface returned %08x, expected E_NOINTERFACE\n", hres);
4613 ok(qi == NULL, "qi=%p, expected NULL\n", qi);
4615 qi = (void*)0xdeadbeef;
4616 hres = IUnknown_QueryInterface(doc, &IID_IHTMLDOMNode2, (void**)&qi);
4617 ok(hres == E_NOINTERFACE, "QueryInterface returned %08x, expected E_NOINTERFACE\n", hres);
4618 ok(qi == NULL, "qi=%p, expected NULL\n", qi);
4620 qi = (void*)0xdeadbeef;
4621 hres = IUnknown_QueryInterface(doc, &IID_IPersistPropertyBag, (void**)&qi);
4622 ok(hres == E_NOINTERFACE, "QueryInterface returned %08x, expected E_NOINTERFACE\n", hres);
4623 ok(qi == NULL, "qi=%p, expected NULL\n", qi);
4625 qi = (void*)0xdeadbeef;
4626 hres = IUnknown_QueryInterface(doc, &IID_UndocumentedScriptIface, (void**)&qi);
4627 ok(hres == E_NOINTERFACE, "QueryInterface returned %08x, expected E_NOINTERFACE\n", hres);
4628 ok(qi == NULL, "qi=%p, expected NULL\n", qi);
4630 qi = (void*)0xdeadbeef;
4631 hres = IUnknown_QueryInterface(doc, &IID_IMarshal, (void**)&qi);
4632 ok(hres == E_NOINTERFACE, "QueryInterface returned %08x, expected E_NOINTERFACE\n", hres);
4633 ok(qi == NULL, "qi=%p, expected NULL\n", qi);
4635 qi = (void*)0xdeadbeef;
4636 hres = IUnknown_QueryInterface(doc, &IID_IExternalConnection, (void**)&qi);
4637 ok(hres == E_NOINTERFACE, "QueryInterface returned %08x, expected E_NOINTERFACE\n", hres);
4638 ok(qi == NULL, "qi=%p, expected NULL\n", qi);
4640 qi = (void*)0xdeadbeef;
4641 hres = IUnknown_QueryInterface(doc, &IID_IStdMarshalInfo, (void**)&qi);
4642 ok(hres == E_NOINTERFACE, "QueryInterface returned %08x, expected E_NOINTERFACE\n", hres);
4643 ok(qi == NULL, "qi=%p, expected NULL\n", qi);
4645 hres = IUnknown_QueryInterface(doc, &IID_IDispatch, (void**)&qi);
4646 ok(hres == S_OK, "Could not get IDispatch interface: %08x\n", hres);
4647 ok(qi != (IUnknown*)doc, "disp == doc\n");
4648 IUnknown_Release(qi);
4651 static void init_test(enum load_state_t ls) {
4653 hwnd = last_hwnd = NULL;
4654 set_clientsite = FALSE;
4655 load_from_stream = FALSE;
4656 call_UIActivate = CallUIActivate_None;
4663 inplace_deactivated = FALSE;
4664 expect_uihandler_iface = &DocHostUIHandler;
4667 static void test_HTMLDocument(BOOL do_load)
4669 IHTMLDocument2 *doc;
4671 trace("Testing HTMLDocument (%s)...\n", (do_load ? "load" : "no load"));
4673 init_test(do_load ? LD_DOLOAD : LD_NO);
4675 doc = create_document();
4676 doc_unk = (IUnknown*)doc;
4678 test_QueryInterface(doc);
4680 test_IsDirty(doc, S_FALSE);
4681 test_MSHTML_QueryStatus(doc, OLECMDF_SUPPORTED);
4682 test_external(doc, FALSE);
4683 test_ViewAdviseSink(doc);
4684 test_ConnectionPointContainer(doc);
4685 test_GetCurMoniker((IUnknown*)doc, NULL, NULL);
4686 test_Persist(doc, &Moniker);
4688 test_OnAmbientPropertyChange2(doc);
4690 test_Activate(doc, CLIENTSITE_EXPECTPATH);
4693 set_custom_uihandler(doc, &CustomDocHostUIHandler);
4694 test_download(DWL_CSS|DWL_TRYCSS);
4695 test_GetCurMoniker((IUnknown*)doc, &Moniker, NULL);
4698 test_MSHTML_QueryStatus(doc, OLECMDF_SUPPORTED);
4699 test_OleCommandTarget_fail(doc);
4700 test_OleCommandTarget(doc);
4701 test_OnAmbientPropertyChange(doc);
4702 test_Window(doc, TRUE);
4703 test_external(doc, TRUE);
4705 test_UIDeactivate();
4706 test_OleCommandTarget(doc);
4707 test_Window(doc, TRUE);
4708 test_InPlaceDeactivate(doc, TRUE);
4710 /* Calling test_OleCommandTarget here causes Segmentation Fault with native
4711 * MSHTML. It doesn't with Wine. */
4713 test_Window(doc, FALSE);
4715 test_InPlaceDeactivate(doc, FALSE);
4717 test_Close(doc, FALSE);
4719 /* Activate HTMLDocument again */
4720 test_Activate(doc, CLIENTSITE_SETNULL);
4721 test_Window(doc, TRUE);
4722 test_OleCommandTarget(doc);
4723 test_UIDeactivate();
4724 test_InPlaceDeactivate(doc, TRUE);
4725 test_Close(doc, FALSE);
4727 /* Activate HTMLDocument again, this time without UIActivate */
4728 call_UIActivate = CallUIActivate_None;
4729 test_Activate(doc, CLIENTSITE_SETNULL);
4730 test_Window(doc, TRUE);
4732 test_external(doc, TRUE);
4733 set_custom_uihandler(doc, NULL);
4734 test_external(doc, FALSE);
4736 test_UIDeactivate();
4737 test_InPlaceDeactivate(doc, TRUE);
4740 test_Close(doc, TRUE);
4741 test_OnAmbientPropertyChange2(doc);
4742 test_GetCurMoniker((IUnknown*)doc, do_load ? &Moniker : NULL, NULL);
4745 /* Activate HTMLDocument again, calling UIActivate after showing the window */
4746 call_UIActivate = CallUIActivate_AfterShow;
4747 test_Activate(doc, 0);
4748 test_Window(doc, TRUE);
4749 test_OleCommandTarget(doc);
4750 test_UIDeactivate();
4751 test_InPlaceDeactivate(doc, TRUE);
4752 test_Close(doc, FALSE);
4753 call_UIActivate = CallUIActivate_None;
4757 IOleDocumentView_Release(view);
4760 ok(IsWindow(hwnd), "hwnd is destroyed\n");
4761 release_document(doc);
4762 ok(!IsWindow(hwnd), "hwnd is not destroyed\n");
4765 static void test_HTMLDocument_hlink(void)
4767 IHTMLDocument2 *doc;
4769 trace("Testing HTMLDocument (hlink)...\n");
4771 init_test(LD_DOLOAD);
4774 doc = create_document();
4775 doc_unk = (IUnknown*)doc;
4777 set_custom_uihandler(doc, &CustomDocHostUIHandler);
4778 test_ViewAdviseSink(doc);
4779 test_ConnectionPointContainer(doc);
4780 test_GetCurMoniker((IUnknown*)doc, NULL, NULL);
4781 test_Persist(doc, &Moniker);
4784 test_download(DWL_CSS|DWL_TRYCSS);
4786 test_IsDirty(doc, S_FALSE);
4787 test_MSHTML_QueryStatus(doc, OLECMDF_SUPPORTED);
4789 test_exec_onunload(doc);
4790 test_Window(doc, TRUE);
4791 test_InPlaceDeactivate(doc, TRUE);
4792 test_Close(doc, FALSE);
4793 test_IsDirty(doc, S_FALSE);
4794 test_GetCurMoniker((IUnknown*)doc, &Moniker, NULL);
4796 test_GetCurMoniker((IUnknown*)doc, &Moniker, NULL);
4799 IOleDocumentView_Release(view);
4802 release_document(doc);
4805 static void test_cookies(IHTMLDocument2 *doc)
4813 hres = IHTMLDocument2_get_cookie(doc, &str);
4814 ok(hres == S_OK, "get_cookie failed: %08x\n", hres);
4816 size = sizeof(buf)/sizeof(WCHAR);
4817 b = InternetGetCookieW(http_urlW, NULL, buf, &size);
4818 ok(b, "InternetGetCookieW failed: %08x\n", GetLastError());
4819 ok(!lstrcmpW(buf, str), "cookie = %s, expected %s\n", wine_dbgstr_w(str), wine_dbgstr_w(buf));
4823 str = a2bstr("test=testval");
4824 hres = IHTMLDocument2_put_cookie(doc, str);
4825 ok(hres == S_OK, "put_cookie failed: %08x\n", hres);
4828 hres = IHTMLDocument2_get_cookie(doc, &str2);
4829 ok(hres == S_OK, "get_cookie failed: %08x\n", hres);
4830 ok(str2 != NULL, "cookie = NULL\n");
4831 size = sizeof(buf)/sizeof(WCHAR);
4832 b = InternetGetCookieW(http_urlW, NULL, buf, &size);
4833 ok(b, "InternetGetCookieW failed: %08x\n", GetLastError());
4834 ok(!lstrcmpW(buf, str2), "cookie = %s, expected %s\n", wine_dbgstr_w(str2), wine_dbgstr_w(buf));
4835 ok(strstrW(str2, str) != NULL, "could not find %s in %s\n", wine_dbgstr_w(str), wine_dbgstr_w(str2));
4837 SysFreeString(str2);
4839 str = a2bstr("test=testval2");
4840 hres = IHTMLDocument2_put_cookie(doc, str);
4841 ok(hres == S_OK, "put_cookie failed: %08x\n", hres);
4844 hres = IHTMLDocument2_get_cookie(doc, &str2);
4845 ok(hres == S_OK, "get_cookie failed: %08x\n", hres);
4846 ok(str2 != NULL, "cookie = NULL\n");
4847 size = sizeof(buf)/sizeof(WCHAR);
4848 b = InternetGetCookieW(http_urlW, NULL, buf, &size);
4849 ok(b, "InternetGetCookieW failed: %08x\n", GetLastError());
4850 ok(!lstrcmpW(buf, str2), "cookie = %s, expected %s\n", wine_dbgstr_w(str2), wine_dbgstr_w(buf));
4851 ok(strstrW(str2, str) != NULL, "could not find %s in %s\n", wine_dbgstr_w(str), wine_dbgstr_w(str2));
4853 SysFreeString(str2);
4856 static void test_HTMLDocument_http(void)
4859 IHTMLDocument2 *doc;
4863 trace("Testing HTMLDocument (http)...\n");
4865 if(!winetest_interactive && is_ie_hardened()) {
4866 win_skip("IE running in Enhanced Security Configuration\n");
4870 init_test(LD_DOLOAD);
4873 doc = create_document();
4874 doc_unk = (IUnknown*)doc;
4876 hres = CreateURLMoniker(NULL, http_urlW, &http_mon);
4877 ok(hres == S_OK, "CreateURLMoniker failed: %08x\n", hres);
4879 test_ViewAdviseSink(doc);
4880 test_ConnectionPointContainer(doc);
4881 test_GetCurMoniker((IUnknown*)doc, NULL, NULL);
4882 test_Persist(doc, http_mon);
4884 test_download(DWL_HTTP);
4886 test_IsDirty(doc, S_FALSE);
4887 test_MSHTML_QueryStatus(doc, OLECMDF_SUPPORTED);
4888 test_GetCurMoniker((IUnknown*)doc, http_mon, NULL);
4890 test_put_href(doc, FALSE);
4891 test_put_href(doc, TRUE);
4892 test_open_window(doc);
4894 test_InPlaceDeactivate(doc, TRUE);
4895 test_Close(doc, FALSE);
4896 test_IsDirty(doc, S_FALSE);
4897 test_GetCurMoniker((IUnknown*)doc, NULL, "about:replace");
4900 IOleDocumentView_Release(view);
4903 release_document(doc);
4905 ref = IMoniker_Release(http_mon);
4906 ok(!ref, "ref=%d, expected 0\n", ref);
4909 static void test_QueryService(IHTMLDocument2 *doc, BOOL success)
4911 IHTMLWindow2 *window, *sp_window;
4912 IServiceProvider *sp;
4916 hres = IUnknown_QueryInterface(doc, &IID_IServiceProvider, (void**)&sp);
4917 ok(hres == S_OK, "QueryService returned %08x\n", hres);
4919 hres = IServiceProvider_QueryService(sp, &IID_IHlinkFrame, &IID_IHlinkFrame, (void**)&hf);
4921 ok(hres == E_NOINTERFACE, "QueryService returned %08x, expected E_NOINTERFACE\n", hres);
4922 IServiceProvider_Release(sp);
4926 ok(hres == S_OK, "QueryService(IID_IHlinkFrame) failed: %08x\n", hres);
4927 ok(hf == &HlinkFrame, "hf != HlinkFrame\n");
4928 IHlinkFrame_Release(hf);
4930 IServiceProvider_Release(sp);
4932 hres = IHTMLDocument2_get_parentWindow(doc, &window);
4933 ok(hres == S_OK, "get_parentWindow failed: %08x\n", hres);
4935 hres = IHTMLWindow2_QueryInterface(window, &IID_IServiceProvider, (void**)&sp);
4936 ok(hres == S_OK, "Could not get IServiceProvider iface: %08x\n", hres);
4938 hres = IServiceProvider_QueryService(sp, &IID_IHTMLWindow2, &IID_IHTMLWindow2, (void**)&sp_window);
4939 ok(hres == S_OK, "QueryService(IID_IHTMLWindow2) failed: %08x\n", hres);
4940 /* FIXME: test returned window */
4941 IHTMLWindow2_Release(sp_window);
4943 hres = IServiceProvider_QueryService(sp, &IID_IHlinkFrame, &IID_IHlinkFrame, (void**)&hf);
4944 ok(hres == S_OK, "QueryService(IID_IHlinkFrame) failed: %08x\n", hres);
4945 ok(hf == &HlinkFrame, "hf != HlinkFrame\n");
4946 IHlinkFrame_Release(hf);
4948 IServiceProvider_Release(sp);
4949 IHTMLWindow2_Release(window);
4952 static void test_HTMLDocument_StreamLoad(void)
4954 IHTMLDocument2 *doc;
4959 trace("Testing HTMLDocument (IPersistStreamInit)...\n");
4961 init_test(LD_DOLOAD);
4962 load_from_stream = TRUE;
4964 doc = create_document();
4965 doc_unk = (IUnknown*)doc;
4967 hres = IUnknown_QueryInterface(doc, &IID_IOleObject, (void**)&oleobj);
4968 ok(hres == S_OK, "Could not get IOleObject: %08x\n", hres);
4970 hres = IOleObject_Advise(oleobj, (IAdviseSink*)&AdviseSink, &conn);
4971 ok(hres == S_OK, "Advise failed: %08x\n", hres);
4973 test_readyState((IUnknown*)doc);
4974 test_IsDirty(doc, S_FALSE);
4975 test_ViewAdviseSink(doc);
4976 test_ConnectionPointContainer(doc);
4977 test_QueryService(doc, FALSE);
4978 test_ClientSite(oleobj, CLIENTSITE_EXPECTPATH);
4979 test_QueryService(doc, TRUE);
4980 test_DoVerb(oleobj);
4981 test_MSHTML_QueryStatus(doc, OLECMDF_SUPPORTED);
4983 test_GetCurMoniker((IUnknown*)doc, NULL, NULL);
4984 test_StreamLoad(doc);
4985 test_download(DWL_VERBDONE|DWL_TRYCSS);
4986 test_MSHTML_QueryStatus(doc, OLECMDF_SUPPORTED);
4988 test_UIDeactivate();
4989 test_InPlaceDeactivate(doc, TRUE);
4990 SET_EXPECT(Advise_Close);
4991 test_Close(doc, TRUE);
4992 CHECK_CALLED(Advise_Close);
4993 test_external(doc, FALSE);
4994 test_IsDirty(doc, S_FALSE);
4996 set_custom_uihandler(doc, &CustomDocHostUIHandler);
4997 test_ClientSite(oleobj, CLIENTSITE_SETNULL);
4998 test_external(doc, TRUE);
4999 test_ClientSite(oleobj, CLIENTSITE_SETNULL|CLIENTSITE_DONTSET);
5000 test_external(doc, TRUE);
5001 set_custom_uihandler(doc, NULL);
5002 test_ClientSite(oleobj, CLIENTSITE_SETNULL|CLIENTSITE_DONTSET);
5004 IOleObject_Release(oleobj);
5006 IOleDocumentView_Release(view);
5010 release_document(doc);
5013 static void test_HTMLDocument_StreamInitNew(void)
5015 IHTMLDocument2 *doc;
5020 trace("Testing HTMLDocument (IPersistStreamInit::InitNew)...\n");
5022 init_test(LD_DOLOAD);
5023 load_from_stream = TRUE;
5025 doc = create_document();
5026 doc_unk = (IUnknown*)doc;
5028 hres = IUnknown_QueryInterface(doc, &IID_IOleObject, (void**)&oleobj);
5029 ok(hres == S_OK, "Could not get IOleObject: %08x\n", hres);
5031 hres = IOleObject_Advise(oleobj, (IAdviseSink*)&AdviseSink, &conn);
5032 ok(hres == S_OK, "Advise failed: %08x\n", hres);
5034 test_readyState((IUnknown*)doc);
5035 test_IsDirty(doc, S_FALSE);
5036 test_ViewAdviseSink(doc);
5037 test_ConnectionPointContainer(doc);
5038 test_ClientSite(oleobj, CLIENTSITE_EXPECTPATH);
5039 test_DoVerb(oleobj);
5040 test_MSHTML_QueryStatus(doc, OLECMDF_SUPPORTED);
5042 IOleObject_Release(oleobj);
5044 test_GetCurMoniker((IUnknown*)doc, NULL, NULL);
5045 test_StreamInitNew(doc);
5046 test_download(DWL_VERBDONE|DWL_TRYCSS|DWL_EMPTY);
5047 test_MSHTML_QueryStatus(doc, OLECMDF_SUPPORTED);
5049 test_UIDeactivate();
5050 test_InPlaceDeactivate(doc, TRUE);
5051 SET_EXPECT(Advise_Close);
5052 test_Close(doc, FALSE);
5053 CHECK_CALLED(Advise_Close);
5054 test_IsDirty(doc, S_FALSE);
5057 IOleDocumentView_Release(view);
5061 release_document(doc);
5064 static void test_edit_uiactivate(IOleObject *oleobj)
5066 IOleDocumentView *docview;
5069 hres = IOleObject_QueryInterface(oleobj, &IID_IOleDocumentView, (void **)&docview);
5070 ok(hres == S_OK, "IOleObject_QueryInterface failed with error 0x%08x\n", hres);
5072 SET_EXPECT(OnFocus_TRUE);
5073 SET_EXPECT(SetActiveObject);
5075 SET_EXPECT(InPlaceUIWindow_SetActiveObject);
5076 SET_EXPECT(InPlaceFrame_SetBorderSpace);
5077 expect_status_text = NULL;
5079 hres = IOleDocumentView_UIActivate(docview, TRUE);
5080 ok(hres == S_OK, "IOleDocumentView_UIActivate failed with error 0x%08x\n", hres);
5082 CHECK_CALLED(OnFocus_TRUE);
5083 CHECK_CALLED(SetActiveObject);
5084 CHECK_CALLED(ShowUI);
5085 CHECK_CALLED(InPlaceUIWindow_SetActiveObject);
5086 CHECK_CALLED(InPlaceFrame_SetBorderSpace);
5088 IOleDocumentView_Release(docview);
5091 static void test_editing_mode(BOOL do_load)
5093 IHTMLDocument2 *doc;
5099 trace("Testing HTMLDocument (edit%s)...\n", do_load ? " load" : "");
5101 init_test(do_load ? LD_DOLOAD : LD_NO);
5102 call_UIActivate = CallUIActivate_AfterShow;
5104 doc = create_document();
5105 unk = doc_unk = (IUnknown*)doc;
5107 hres = IUnknown_QueryInterface(doc, &IID_IOleObject, (void**)&oleobj);
5108 ok(hres == S_OK, "Could not get IOleObject: %08x\n", hres);
5110 hres = IOleObject_Advise(oleobj, (IAdviseSink*)&AdviseSink, &conn);
5111 ok(hres == S_OK, "Advise failed: %08x\n", hres);
5113 test_readyState((IUnknown*)doc);
5114 test_ViewAdviseSink(doc);
5115 test_ConnectionPointContainer(doc);
5116 test_ClientSite(oleobj, CLIENTSITE_EXPECTPATH);
5117 test_DoVerb(oleobj);
5118 test_edit_uiactivate(oleobj);
5120 test_MSHTML_QueryStatus(doc, OLECMDF_SUPPORTED);
5122 test_Persist(doc, &Moniker);
5123 stream_read = protocol_read = 0;
5124 test_exec_editmode(unk, do_load);
5125 test_UIDeactivate();
5126 call_UIActivate = CallUIActivate_None;
5127 IOleObject_Release(oleobj);
5129 test_MSHTML_QueryStatus(doc, OLECMDF_SUPPORTED);
5130 test_download(DWL_VERBDONE | (do_load ? DWL_CSS|DWL_TRYCSS : 0));
5132 SET_EXPECT(SetStatusText); /* ignore race in native mshtml */
5133 test_timer(EXPECT_UPDATEUI);
5134 SET_CALLED(SetStatusText);
5136 test_MSHTML_QueryStatus(doc, OLECMDF_SUPPORTED|OLECMDF_ENABLED);
5139 test_exec_fontname(unk, NULL, wszTimesNewRoman);
5140 test_exec_fontname(unk, wszArial, wszTimesNewRoman);
5141 test_timer(EXPECT_UPDATEUI);
5142 test_exec_fontname(unk, NULL, wszArial);
5144 test_exec_noargs(unk, IDM_JUSTIFYRIGHT);
5145 test_timer(EXPECT_UPDATEUI);
5146 test_QueryStatus(unk, &CGID_MSHTML, IDM_JUSTIFYRIGHT,
5147 OLECMDF_SUPPORTED|OLECMDF_ENABLED|OLECMDF_LATCHED);
5149 test_exec_noargs(unk, IDM_JUSTIFYCENTER);
5150 test_timer(EXPECT_UPDATEUI);
5151 test_QueryStatus(unk, &CGID_MSHTML, IDM_JUSTIFYRIGHT,
5152 OLECMDF_SUPPORTED|OLECMDF_ENABLED);
5153 test_QueryStatus(unk, &CGID_MSHTML, IDM_JUSTIFYCENTER,
5154 OLECMDF_SUPPORTED|OLECMDF_ENABLED|OLECMDF_LATCHED);
5156 test_exec_noargs(unk, IDM_HORIZONTALLINE);
5157 test_timer(EXPECT_UPDATEUI);
5158 test_QueryStatus(unk, &CGID_MSHTML, IDM_HORIZONTALLINE,
5159 OLECMDF_SUPPORTED|OLECMDF_ENABLED);
5162 test_UIDeactivate();
5163 test_InPlaceDeactivate(doc, TRUE);
5164 SET_EXPECT(Advise_Close);
5165 test_Close(doc, FALSE);
5166 CHECK_CALLED(Advise_Close);
5169 IOleDocumentView_Release(view);
5173 release_document(doc);
5176 static void test_UIActivate(BOOL do_load, BOOL use_ipsex, BOOL use_ipsw)
5178 IHTMLDocument2 *doc;
5180 IOleInPlaceSite *inplacesite;
5183 trace("Running OleDocumentView_UIActivate tests (%d %d %d)\n", do_load, use_ipsex, use_ipsw);
5185 init_test(do_load ? LD_DOLOAD : LD_NO);
5187 doc = create_document();
5188 doc_unk = (IUnknown*)doc;
5193 hres = IUnknown_QueryInterface(doc, &IID_IOleObject, (void**)&oleobj);
5194 ok(hres == S_OK, "QueryInterface(IID_IOleObject) failed: %08x\n", hres);
5196 hres = IUnknown_QueryInterface(doc, &IID_IOleDocumentView, (void**)&view);
5197 ok(hres == S_OK, "QueryInterface(IID_IOleDocumentView) failed: %08x\n", hres);
5199 SET_EXPECT(Invoke_AMBIENT_USERMODE);
5200 SET_EXPECT(GetHostInfo);
5201 SET_EXPECT(Invoke_AMBIENT_DLCONTROL);
5202 SET_EXPECT(Invoke_AMBIENT_SILENT);
5203 SET_EXPECT(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
5204 SET_EXPECT(Invoke_AMBIENT_USERAGENT);
5205 SET_EXPECT(Invoke_AMBIENT_PALETTE);
5206 SET_EXPECT(GetOptionKeyPath);
5207 SET_EXPECT(GetOverrideKeyPath);
5208 SET_EXPECT(GetWindow);
5209 SET_EXPECT(Exec_DOCCANNAVIGATE);
5210 SET_EXPECT(QueryStatus_SETPROGRESSTEXT);
5211 SET_EXPECT(Exec_SETPROGRESSMAX);
5212 SET_EXPECT(Exec_SETPROGRESSPOS);
5214 hres = IOleObject_SetClientSite(oleobj, &ClientSite);
5215 ok(hres == S_OK, "SetClientSite failed: %08x\n", hres);
5216 set_clientsite = TRUE;
5218 CHECK_CALLED(Invoke_AMBIENT_USERMODE);
5219 CHECK_CALLED(GetHostInfo);
5220 CHECK_CALLED(Invoke_AMBIENT_DLCONTROL);
5221 CHECK_CALLED(Invoke_AMBIENT_SILENT);
5222 CHECK_CALLED(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
5223 CHECK_CALLED(Invoke_AMBIENT_USERAGENT);
5224 CHECK_CALLED(Invoke_AMBIENT_PALETTE);
5225 CHECK_CALLED(GetOptionKeyPath);
5226 CHECK_CALLED(GetOverrideKeyPath);
5227 CHECK_CALLED(GetWindow);
5228 CHECK_CALLED(Exec_DOCCANNAVIGATE);
5229 CHECK_CALLED(QueryStatus_SETPROGRESSTEXT);
5230 CHECK_CALLED(Exec_SETPROGRESSMAX);
5231 CHECK_CALLED(Exec_SETPROGRESSPOS);
5233 hres = IOleDocumentView_GetInPlaceSite(view, &inplacesite);
5234 ok(hres == S_OK, "GetInPlaceSite failed: %08x\n", hres);
5235 ok(inplacesite == NULL, "inplacesite = %p, expected NULL\n", inplacesite);
5237 SET_EXPECT(GetContainer);
5238 SET_EXPECT(LockContainer);
5239 SET_EXPECT(CanInPlaceActivate);
5240 SET_EXPECT(GetWindowContext);
5241 SET_EXPECT(GetWindow);
5243 SET_EXPECT(OnInPlaceActivateEx);
5244 SET_EXPECT(RequestUIActivate);
5247 SET_EXPECT(OnInPlaceActivate);
5248 SET_EXPECT(OnUIActivate);
5249 SET_EXPECT(SetStatusText);
5250 SET_EXPECT(Exec_SETPROGRESSMAX);
5251 SET_EXPECT(Exec_SETPROGRESSPOS);
5253 SET_EXPECT(InPlaceUIWindow_SetActiveObject);
5254 SET_EXPECT(InPlaceFrame_SetBorderSpace);
5255 SET_EXPECT(OnFocus_TRUE);
5256 SET_EXPECT(SetActiveObject);
5257 expect_LockContainer_fLock = TRUE;
5259 hres = IOleDocumentView_UIActivate(view, TRUE);
5260 ok(hres == S_OK, "UIActivate failed: %08x\n", hres);
5262 CHECK_CALLED(GetContainer);
5263 CHECK_CALLED(LockContainer);
5264 CHECK_CALLED(CanInPlaceActivate);
5265 CHECK_CALLED(GetWindowContext);
5266 CHECK_CALLED(GetWindow);
5268 CHECK_CALLED(OnInPlaceActivateEx);
5269 SET_EXPECT(RequestUIActivate);
5272 CHECK_CALLED(OnInPlaceActivate);
5273 CHECK_CALLED(OnUIActivate);
5274 CHECK_CALLED(SetStatusText);
5275 CHECK_CALLED(Exec_SETPROGRESSMAX);
5276 CHECK_CALLED(Exec_SETPROGRESSPOS);
5277 CHECK_CALLED(ShowUI);
5278 CHECK_CALLED(InPlaceUIWindow_SetActiveObject);
5279 CHECK_CALLED(InPlaceFrame_SetBorderSpace);
5280 CHECK_CALLED(OnFocus_TRUE);
5281 CHECK_CALLED(SetActiveObject);
5282 container_locked = TRUE;
5284 SET_EXPECT(SetActiveObject_null);
5285 SET_EXPECT(InPlaceUIWindow_SetActiveObject);
5287 SET_EXPECT(OnUIDeactivate);
5289 hres = IOleDocumentView_UIActivate(view, FALSE);
5290 ok(hres == S_OK, "UIActivate failed: %08x\n", hres);
5292 CHECK_CALLED(SetActiveObject_null);
5293 CHECK_CALLED(InPlaceUIWindow_SetActiveObject);
5294 CHECK_CALLED(HideUI);
5295 CHECK_CALLED(OnUIDeactivate);
5297 hres = IOleDocumentView_GetInPlaceSite(view, &inplacesite);
5298 ok(hres == S_OK, "GetInPlaceSite failed: %08x\n", hres);
5299 ok(inplacesite != NULL, "inplacesite = NULL\n");
5300 IOleInPlaceSite_Release(inplacesite);
5302 SET_EXPECT(OnFocus_FALSE);
5304 SET_EXPECT(OnInPlaceDeactivateEx);
5306 SET_EXPECT(OnInPlaceDeactivate);
5310 CHECK_CALLED(OnFocus_FALSE);
5312 CHECK_CALLED(OnInPlaceDeactivateEx);
5314 CHECK_CALLED(OnInPlaceDeactivate);
5316 test_Close(doc, TRUE);
5318 IOleObject_Release(oleobj);
5319 IOleDocumentView_Release(view);
5322 release_document(doc);
5325 static void register_protocol(void)
5327 IInternetSession *session;
5330 static const WCHAR wsz_winetest[] = {'w','i','n','e','t','e','s','t',0};
5332 hres = CoInternetGetSession(0, &session, 0);
5333 ok(hres == S_OK, "CoInternetGetSession failed: %08x\n", hres);
5335 hres = IInternetSession_RegisterNameSpace(session, &ClassFactory, &IID_NULL,
5336 wsz_winetest, 0, NULL, 0);
5337 ok(hres == S_OK, "RegisterNameSpace failed: %08x\n", hres);
5339 IInternetSession_Release(session);
5342 static void test_HTMLDoc_ISupportErrorInfo(void)
5344 IHTMLDocument2 *doc;
5346 ISupportErrorInfo *sinfo;
5348 doc = create_document();
5350 hres = IUnknown_QueryInterface(doc, &IID_ISupportErrorInfo, (void**)&sinfo);
5351 ok(hres == S_OK, "got %x\n", hres);
5352 ok(sinfo != NULL, "got %p\n", sinfo);
5355 hres = ISupportErrorInfo_InterfaceSupportsErrorInfo(sinfo, &IID_IErrorInfo);
5356 ok(hres == S_FALSE, "Expected S_OK, got %x\n", hres);
5357 IUnknown_Release(sinfo);
5360 release_document(doc);
5363 static void test_IPersistHistory(void)
5365 IHTMLDocument2 *doc;
5367 IPersistHistory *phist;
5369 doc = create_document();
5371 hres = IUnknown_QueryInterface(doc, &IID_IPersistHistory, (void**)&phist);
5372 ok(hres == S_OK, "QueryInterface returned %08x, expected S_OK\n", hres);
5374 IPersistHistory_Release(phist);
5376 release_document(doc);
5379 static BOOL check_ie(void)
5381 IHTMLDocument2 *doc;
5382 IHTMLDocument5 *doc5;
5385 doc = create_document();
5389 hres = IHTMLDocument2_QueryInterface(doc, &IID_IHTMLDocument5, (void**)&doc5);
5391 IHTMLDocument5_Release(doc5);
5393 release_document(doc);
5394 return SUCCEEDED(hres);
5403 win_skip("Too old IE\n");
5407 container_hwnd = create_container_window();
5408 register_protocol();
5410 test_HTMLDocument_hlink();
5411 test_HTMLDocument(FALSE);
5412 test_HTMLDocument(TRUE);
5413 test_HTMLDocument_StreamLoad();
5414 test_HTMLDocument_StreamInitNew();
5415 test_editing_mode(FALSE);
5416 test_editing_mode(TRUE);
5417 test_HTMLDocument_http();
5418 test_UIActivate(FALSE, FALSE, FALSE);
5419 test_UIActivate(FALSE, TRUE, FALSE);
5420 test_UIActivate(FALSE, TRUE, TRUE);
5421 test_UIActivate(TRUE, FALSE, FALSE);
5422 test_UIActivate(TRUE, TRUE, FALSE);
5423 test_UIActivate(TRUE, TRUE, TRUE);
5424 test_HTMLDoc_ISupportErrorInfo();
5425 test_IPersistHistory();
5427 DestroyWindow(container_hwnd);