2 * Copyright 2005-2007 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>
41 DEFINE_GUID(GUID_NULL,0,0,0,0,0,0,0,0,0,0,0);
42 DEFINE_GUID(IID_IProxyManager,0x00000008,0x0000,0x0000,0xc0,0x00,0x00,0x00,0x00,0x00,0x00,0x46);
43 DEFINE_OLEGUID(CGID_DocHostCmdPriv, 0x000214D4L, 0, 0);
45 #define DEFINE_EXPECT(func) \
46 static BOOL expect_ ## func = FALSE, called_ ## func = FALSE
48 #define SET_EXPECT(func) \
49 expect_ ## func = TRUE
51 #define SET_CALLED(func) \
52 called_ ## func = TRUE
54 #define CHECK_EXPECT2(func) \
56 ok(expect_ ##func, "unexpected call " #func "\n"); \
57 called_ ## func = TRUE; \
60 #define CHECK_EXPECT(func) \
62 CHECK_EXPECT2(func); \
63 expect_ ## func = FALSE; \
66 #define CHECK_CALLED(func) \
68 ok(called_ ## func, "expected " #func "\n"); \
69 expect_ ## func = called_ ## func = FALSE; \
72 static IOleDocumentView *view = NULL;
73 static HWND container_hwnd = NULL, hwnd = NULL, last_hwnd = NULL;
75 DEFINE_EXPECT(LockContainer);
76 DEFINE_EXPECT(SetActiveObject);
77 DEFINE_EXPECT(SetActiveObject_null);
78 DEFINE_EXPECT(GetWindow);
79 DEFINE_EXPECT(CanInPlaceActivate);
80 DEFINE_EXPECT(OnInPlaceActivate);
81 DEFINE_EXPECT(OnInPlaceActivateEx);
82 DEFINE_EXPECT(OnUIActivate);
83 DEFINE_EXPECT(GetWindowContext);
84 DEFINE_EXPECT(OnUIDeactivate);
85 DEFINE_EXPECT(OnInPlaceDeactivate);
86 DEFINE_EXPECT(OnInPlaceDeactivateEx);
87 DEFINE_EXPECT(GetContainer);
88 DEFINE_EXPECT(ShowUI);
89 DEFINE_EXPECT(ActivateMe);
90 DEFINE_EXPECT(GetHostInfo);
91 DEFINE_EXPECT(HideUI);
92 DEFINE_EXPECT(GetOptionKeyPath);
93 DEFINE_EXPECT(GetOverrideKeyPath);
94 DEFINE_EXPECT(SetStatusText);
95 DEFINE_EXPECT(QueryStatus_SETPROGRESSTEXT);
96 DEFINE_EXPECT(QueryStatus_OPEN);
97 DEFINE_EXPECT(QueryStatus_NEW);
98 DEFINE_EXPECT(Exec_SETPROGRESSMAX);
99 DEFINE_EXPECT(Exec_SETPROGRESSPOS);
100 DEFINE_EXPECT(Exec_HTTPEQUIV_DONE);
101 DEFINE_EXPECT(Exec_SETDOWNLOADSTATE_0);
102 DEFINE_EXPECT(Exec_SETDOWNLOADSTATE_1);
103 DEFINE_EXPECT(Exec_ShellDocView_37);
104 DEFINE_EXPECT(Exec_ShellDocView_84);
105 DEFINE_EXPECT(Exec_ShellDocView_103);
106 DEFINE_EXPECT(Exec_ShellDocView_105);
107 DEFINE_EXPECT(Exec_UPDATECOMMANDS);
108 DEFINE_EXPECT(Exec_SETTITLE);
109 DEFINE_EXPECT(Exec_HTTPEQUIV);
110 DEFINE_EXPECT(Exec_MSHTML_PARSECOMPLETE);
111 DEFINE_EXPECT(Exec_Explorer_69);
112 DEFINE_EXPECT(Invoke_AMBIENT_USERMODE);
113 DEFINE_EXPECT(Invoke_AMBIENT_DLCONTROL);
114 DEFINE_EXPECT(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
115 DEFINE_EXPECT(Invoke_AMBIENT_SILENT);
116 DEFINE_EXPECT(Invoke_AMBIENT_USERAGENT);
117 DEFINE_EXPECT(Invoke_AMBIENT_PALETTE);
118 DEFINE_EXPECT(GetDropTarget);
119 DEFINE_EXPECT(UpdateUI);
120 DEFINE_EXPECT(Navigate);
121 DEFINE_EXPECT(OnFrameWindowActivate);
122 DEFINE_EXPECT(OnChanged_READYSTATE);
123 DEFINE_EXPECT(OnChanged_1005);
124 DEFINE_EXPECT(GetDisplayName);
125 DEFINE_EXPECT(BindToStorage);
126 DEFINE_EXPECT(IsSystemMoniker);
127 DEFINE_EXPECT(GetBindResult);
128 DEFINE_EXPECT(GetClassID);
129 DEFINE_EXPECT(Abort);
131 DEFINE_EXPECT(CreateInstance);
132 DEFINE_EXPECT(Start);
133 DEFINE_EXPECT(Terminate);
134 DEFINE_EXPECT(Protocol_Read);
135 DEFINE_EXPECT(LockRequest);
136 DEFINE_EXPECT(UnlockRequest);
137 DEFINE_EXPECT(OnFocus_TRUE);
138 DEFINE_EXPECT(OnFocus_FALSE);
139 DEFINE_EXPECT(RequestUIActivate);
140 DEFINE_EXPECT(InPlaceFrame_SetBorderSpace);
141 DEFINE_EXPECT(InPlaceUIWindow_SetActiveObject);
142 DEFINE_EXPECT(GetExternal);
143 DEFINE_EXPECT(EnableModeless_TRUE);
144 DEFINE_EXPECT(EnableModeless_FALSE);
145 DEFINE_EXPECT(Frame_EnableModeless_TRUE);
146 DEFINE_EXPECT(Frame_EnableModeless_FALSE);
148 static IUnknown *doc_unk;
149 static BOOL expect_LockContainer_fLock;
150 static BOOL expect_InPlaceUIWindow_SetActiveObject_active = TRUE;
152 static BOOL set_clientsite = FALSE, container_locked = FALSE;
153 static BOOL readystate_set_loading = FALSE, readystate_set_interactive = FALSE, load_from_stream;
154 static BOOL editmode = FALSE, show_failed;
155 static int stream_read, protocol_read;
156 static enum load_state_t {
165 static LPCOLESTR expect_status_text = NULL;
167 static const char html_page[] =
169 "<head><link rel=\"stylesheet\" type=\"text/css\" href=\"test.css\"></head>"
173 static const char css_data[] = "body {color: red}";
175 static const WCHAR doc_url[] = {'w','i','n','e','t','e','s','t',':','d','o','c',0};
176 static const WCHAR about_blank_url[] = {'a','b','o','u','t',':','b','l','a','n','k',0};
178 static HRESULT QueryInterface(REFIID riid, void **ppv);
179 static void test_MSHTML_QueryStatus(IUnknown*,DWORD);
180 static BOOL nogecko = FALSE;
182 #define test_readyState(u) _test_readyState(__LINE__,u)
183 static void _test_readyState(unsigned,IUnknown*);
185 static void test_GetCurMoniker(IUnknown*,IMoniker*,LPCWSTR);
187 static const WCHAR wszTimesNewRoman[] =
188 {'T','i','m','e','s',' ','N','e','w',' ','R','o','m','a','n',0};
189 static const WCHAR wszArial[] =
190 {'A','r','i','a','l',0};
192 static const char *debugstr_guid(REFIID riid)
196 sprintf(buf, "{%08X-%04X-%04X-%02X%02X-%02X%02X%02X%02X%02X%02X}",
197 riid->Data1, riid->Data2, riid->Data3, riid->Data4[0],
198 riid->Data4[1], riid->Data4[2], riid->Data4[3], riid->Data4[4],
199 riid->Data4[5], riid->Data4[6], riid->Data4[7]);
204 static BOOL is_english(void)
206 return PRIMARYLANGID(GetSystemDefaultLangID()) == LANG_ENGLISH
207 && PRIMARYLANGID(GetUserDefaultLangID()) == LANG_ENGLISH;
210 #define EXPECT_UPDATEUI 1
211 #define EXPECT_SETTITLE 2
213 static void test_timer(DWORD flags)
215 BOOL *b = &called_Exec_SETTITLE;
218 if(flags & EXPECT_UPDATEUI) {
219 SET_EXPECT(UpdateUI);
220 SET_EXPECT(Exec_UPDATECOMMANDS);
221 b = &called_UpdateUI;
223 if(flags & EXPECT_SETTITLE)
224 SET_EXPECT(Exec_SETTITLE);
226 while(!*b && GetMessage(&msg, hwnd, 0, 0)) {
227 TranslateMessage(&msg);
228 DispatchMessage(&msg);
231 if(flags & EXPECT_UPDATEUI) {
232 CHECK_CALLED(UpdateUI);
233 CHECK_CALLED(Exec_UPDATECOMMANDS);
235 if(flags & EXPECT_SETTITLE)
236 CHECK_CALLED(Exec_SETTITLE);
239 DEFINE_GUID(IID_External_unk,0x30510406,0x98B5,0x11CF,0xBB,0x82,0x00,0xAA,0x00,0xBD,0xCE,0x0B);
241 static HRESULT WINAPI External_QueryInterface(IDispatch *iface, REFIID riid, void **ppv)
245 if(IsEqualGUID(&IID_IUnknown, riid) || IsEqualGUID(&IID_IDispatch, riid)) {
250 if(IsEqualGUID(&IID_IProxyManager, riid))
251 return E_NOINTERFACE; /* TODO */
252 if(IsEqualGUID(&IID_IDispatchEx, riid))
253 return E_NOINTERFACE; /* TODO */
254 if(IsEqualGUID(&IID_External_unk, riid))
255 return E_NOINTERFACE; /* TODO */
257 ok(0, "unexpected riid: %s\n", debugstr_guid(riid));
258 return E_NOINTERFACE;
261 static ULONG WINAPI Dispatch_AddRef(IDispatch *iface)
266 static ULONG WINAPI Dispatch_Release(IDispatch *iface)
271 static HRESULT WINAPI Dispatch_GetTypeInfoCount(IDispatch *iface, UINT *pctinfo)
273 ok(0, "unexpected call\n");
277 static HRESULT WINAPI Dispatch_GetTypeInfo(IDispatch *iface, UINT iTInfo, LCID lcid,
280 ok(0, "unexpected call\n");
284 static HRESULT WINAPI Dispatch_GetIDsOfNames(IDispatch *iface, REFIID riid, LPOLESTR *rgszNames,
285 UINT cNames, LCID lcid, DISPID *rgDispId)
287 ok(0, "unexpected call\n");
291 static HRESULT WINAPI External_Invoke(IDispatch *iface, DISPID dispIdMember, REFIID riid,
292 LCID lcid, WORD wFlags, DISPPARAMS *pDispParams, VARIANT *pVarResult,
293 EXCEPINFO *pExcepInfo, UINT *puArgErr)
295 ok(0, "unexpected call\n");
299 static const IDispatchVtbl ExternalVtbl = {
300 External_QueryInterface,
303 Dispatch_GetTypeInfoCount,
304 Dispatch_GetTypeInfo,
305 Dispatch_GetIDsOfNames,
309 static IDispatch External = { &ExternalVtbl };
311 static HRESULT WINAPI Protocol_QueryInterface(IInternetProtocol *iface, REFIID riid, void **ppv)
313 if(IsEqualGUID(&IID_IUnknown, riid) || IsEqualGUID(&IID_IInternetProtocol, riid)) {
319 return E_NOINTERFACE;
322 static ULONG WINAPI Protocol_AddRef(IInternetProtocol *iface)
327 static ULONG WINAPI Protocol_Release(IInternetProtocol *iface)
332 static HRESULT WINAPI Protocol_Start(IInternetProtocol *iface, LPCWSTR szUrl,
333 IInternetProtocolSink *pOIProtSink, IInternetBindInfo *pOIBindInfo,
334 DWORD grfPI, HANDLE_PTR dwReserved)
340 static const WCHAR wszTextCss[] = {'t','e','x','t','/','c','s','s',0};
341 static const WCHAR empty_str = {0};
345 ok(pOIProtSink != NULL, "pOIProtSink == NULL\n");
346 ok(pOIBindInfo != NULL, "pOIBindInfo == NULL\n");
347 ok(!grfPI, "grfPI = %x\n", grfPI);
348 ok(!dwReserved, "dwReserved = %lx\n", dwReserved);
350 memset(&bindinfo, 0, sizeof(bindinfo));
351 bindinfo.cbSize = sizeof(bindinfo);
352 hres = IInternetBindInfo_GetBindInfo(pOIBindInfo, &bindf, &bindinfo);
353 ok(hres == S_OK, "GetBindInfo failed: %08x\n", hres);
354 ok(bindf == (BINDF_FROMURLMON|BINDF_PULLDATA|BINDF_NEEDFILE|BINDF_ASYNCSTORAGE|BINDF_ASYNCHRONOUS),
355 "bindf = %x\n", bindf);
357 ok(bindinfo.cbSize == sizeof(bindinfo), "bindinfo.cbSize=%d\n", bindinfo.cbSize);
358 ok(bindinfo.szExtraInfo == NULL, "bindinfo.szExtraInfo=%p\n", bindinfo.szExtraInfo);
359 /* TODO: test stgmedData */
360 ok(bindinfo.grfBindInfoF == 0, "bindinfo.grfBinfInfoF=%08x\n", bindinfo.grfBindInfoF);
361 ok(bindinfo.dwBindVerb == 0, "bindinfo.dwBindVerb=%d\n", bindinfo.dwBindVerb);
362 ok(bindinfo.szCustomVerb == 0, "bindinfo.szCustomVerb=%p\n", bindinfo.szCustomVerb);
363 ok(bindinfo.cbstgmedData == 0, "bindinfo.cbstgmedData=%d\n", bindinfo.cbstgmedData);
364 ok(bindinfo.dwOptions == 0x80000 ||
365 bindinfo.dwOptions == 0x4080000, /* win2k3 */
366 "bindinfo.dwOptions=%x\n", bindinfo.dwOptions);
367 ok(bindinfo.dwOptionsFlags == 0, "bindinfo.dwOptionsFlags=%d\n", bindinfo.dwOptionsFlags);
368 /* TODO: test dwCodePage */
369 /* TODO: test securityAttributes */
370 ok(IsEqualGUID(&IID_NULL, &bindinfo.iid), "unexpected bindinfo.iid\n");
371 ok(bindinfo.pUnk == NULL, "bindinfo.pUnk=%p\n", bindinfo.pUnk);
372 ok(bindinfo.dwReserved == 0, "bindinfo.dwReserved=%d\n", bindinfo.dwReserved);
374 hres = IInternetProtocolSink_ReportProgress(pOIProtSink,
375 BINDSTATUS_CACHEFILENAMEAVAILABLE, &empty_str);
376 ok(hres == S_OK, "ReportProgress(BINDSTATUS_CACHEFILENAMEAVAILABLE) failed: %08x\n", hres);
378 hres = IInternetProtocolSink_ReportProgress(pOIProtSink,
379 BINDSTATUS_VERIFIEDMIMETYPEAVAILABLE, wszTextCss);
381 "ReportProgress(BINDSTATUS_VERIFIEDMIMETYPEAVAILABLE) failed: %08x\n", hres);
383 hres = IInternetProtocolSink_ReportData(pOIProtSink,
384 BSCF_FIRSTDATANOTIFICATION | BSCF_LASTDATANOTIFICATION, 13, 13);
385 ok(hres == S_OK, "ReportData failed: %08x\n", hres);
387 hres = IInternetProtocolSink_ReportResult(pOIProtSink, S_OK, 0, NULL);
388 ok(hres == S_OK, "ReportResult failed: %08x\n", hres);
393 static HRESULT WINAPI Protocol_Continue(IInternetProtocol *iface,
394 PROTOCOLDATA *pProtocolData)
396 ok(0, "unexpected call\n");
400 static HRESULT WINAPI Protocol_Abort(IInternetProtocol *iface, HRESULT hrReason,
403 ok(0, "unexpected call\n");
407 static HRESULT WINAPI Protocol_Terminate(IInternetProtocol *iface, DWORD dwOptions)
409 CHECK_EXPECT(Terminate);
413 static HRESULT WINAPI Protocol_Suspend(IInternetProtocol *iface)
415 ok(0, "unexpected call\n");
419 static HRESULT WINAPI Protocol_Resume(IInternetProtocol *iface)
421 ok(0, "unexpected call\n");
425 static HRESULT WINAPI Protocol_Read(IInternetProtocol *iface, void *pv,
426 ULONG cb, ULONG *pcbRead)
428 CHECK_EXPECT2(Protocol_Read);
430 ok(pv != NULL, "pv == NULL\n");
431 ok(cb > sizeof(css_data), "cb < sizeof(css_data)\n");
432 ok(pcbRead != NULL, "pcbRead == NULL\n");
433 ok(!*pcbRead, "*pcbRead=%d\n", *pcbRead);
438 protocol_read += *pcbRead = sizeof(css_data)-1;
439 memcpy(pv, css_data, sizeof(css_data)-1);
443 static HRESULT WINAPI Protocol_Seek(IInternetProtocol *iface,
444 LARGE_INTEGER dlibMove, DWORD dwOrigin, ULARGE_INTEGER *plibNewPosition)
446 ok(0, "unexpected call\n");
450 static HRESULT WINAPI Protocol_LockRequest(IInternetProtocol *iface, DWORD dwOptions)
452 CHECK_EXPECT(LockRequest);
456 static HRESULT WINAPI Protocol_UnlockRequest(IInternetProtocol *iface)
458 CHECK_EXPECT(UnlockRequest);
462 static const IInternetProtocolVtbl ProtocolVtbl = {
463 Protocol_QueryInterface,
474 Protocol_LockRequest,
475 Protocol_UnlockRequest
478 static IInternetProtocol Protocol = { &ProtocolVtbl };
480 static HRESULT WINAPI ClassFactory_QueryInterface(IClassFactory *iface, REFIID riid, void **ppv)
482 if(!IsEqualGUID(&IID_IInternetProtocolInfo, riid))
483 ok(0, "unexpected call\n");
484 return E_NOINTERFACE;
487 static ULONG WINAPI ClassFactory_AddRef(IClassFactory *iface)
492 static ULONG WINAPI ClassFactory_Release(IClassFactory *iface)
497 static HRESULT WINAPI ClassFactory_CreateInstance(IClassFactory *iface, IUnknown *pOuter,
498 REFIID riid, void **ppv)
500 if(IsEqualGUID(&IID_IInternetProtocolInfo, riid))
501 return E_NOINTERFACE;
503 CHECK_EXPECT(CreateInstance);
504 ok(ppv != NULL, "ppv == NULL\n");
510 static HRESULT WINAPI ClassFactory_LockServer(IClassFactory *iface, BOOL dolock)
512 ok(0, "unexpected call\n");
516 static const IClassFactoryVtbl ClassFactoryVtbl = {
517 ClassFactory_QueryInterface,
519 ClassFactory_Release,
520 ClassFactory_CreateInstance,
521 ClassFactory_LockServer
524 static IClassFactory ClassFactory = { &ClassFactoryVtbl };
526 static HRESULT WINAPI HlinkFrame_QueryInterface(IHlinkFrame *iface, REFIID riid, void **ppv)
528 ok(0, "unexpected call\n");
532 static ULONG WINAPI HlinkFrame_AddRef(IHlinkFrame *iface)
537 static ULONG WINAPI HlinkFrame_Release(IHlinkFrame *iface)
542 static HRESULT WINAPI HlinkFrame_SetBrowseContext(IHlinkFrame *iface,
543 IHlinkBrowseContext *pihlbc)
545 ok(0, "unexpected call\n");
549 static HRESULT WINAPI HlinkFrame_GetBrowseContext(IHlinkFrame *iface,
550 IHlinkBrowseContext **ppihlbc)
552 ok(0, "unexpected call\n");
556 static HRESULT WINAPI HlinkFrame_Navigate(IHlinkFrame *iface, DWORD grfHLNF, LPBC pbc,
557 IBindStatusCallback *pibsc, IHlink *pihlNavigate)
561 CHECK_EXPECT(Navigate);
563 ok(grfHLNF == 0, "grfHLNF=%d, expected 0\n", grfHLNF);
564 ok(pbc != NULL, "pbc == NULL\n");
565 ok(pibsc != NULL, "pubsc == NULL\n");
566 ok(pihlNavigate != NULL, "puhlNavigate == NULL\n");
569 LPWSTR frame_name = (LPWSTR)0xdeadbeef;
570 LPWSTR location = (LPWSTR)0xdeadbeef;
572 IMoniker *mon = NULL;
573 DWORD site_data = 0xdeadbeef;
575 hres = IHlink_GetTargetFrameName(pihlNavigate, &frame_name);
576 ok(hres == S_FALSE, "GetTargetFrameName failed: %08x\n", hres);
577 ok(frame_name == NULL, "frame_name = %p\n", frame_name);
579 hres = IHlink_GetMonikerReference(pihlNavigate, 1, &mon, &location);
580 ok(hres == S_OK, "GetMonikerReference failed: %08x\n", hres);
581 ok(location == NULL, "location = %p\n", location);
582 ok(mon != NULL, "mon == NULL\n");
584 hres = IHlink_GetHlinkSite(pihlNavigate, &site, &site_data);
585 ok(hres == S_OK, "GetHlinkSite failed: %08x\n", hres);
586 ok(site == NULL, "site = %p\n, expected NULL\n", site);
587 ok(site_data == 0xdeadbeef, "site_data = %x\n", site_data);
593 static HRESULT WINAPI HlinkFrame_OnNavigate(IHlinkFrame *iface, DWORD grfHLNF,
594 IMoniker *pimkTarget, LPCWSTR pwzLocation, LPCWSTR pwzFriendlyName, DWORD dwreserved)
596 ok(0, "unexpected call\n");
600 static HRESULT WINAPI HlinkFrame_UpdateHlink(IHlinkFrame *iface, ULONG uHLID,
601 IMoniker *pimkTarget, LPCWSTR pwzLocation, LPCWSTR pwzFriendlyName)
603 ok(0, "unexpected call\n");
607 static const IHlinkFrameVtbl HlinkFrameVtbl = {
608 HlinkFrame_QueryInterface,
611 HlinkFrame_SetBrowseContext,
612 HlinkFrame_GetBrowseContext,
614 HlinkFrame_OnNavigate,
615 HlinkFrame_UpdateHlink
618 static IHlinkFrame HlinkFrame = { &HlinkFrameVtbl };
620 static HRESULT WINAPI PropertyNotifySink_QueryInterface(IPropertyNotifySink *iface,
621 REFIID riid, void**ppv)
623 if(IsEqualGUID(&IID_IPropertyNotifySink, riid)) {
628 ok(0, "unexpected call\n");
629 return E_NOINTERFACE;
632 static ULONG WINAPI PropertyNotifySink_AddRef(IPropertyNotifySink *iface)
637 static ULONG WINAPI PropertyNotifySink_Release(IPropertyNotifySink *iface)
642 static HRESULT WINAPI PropertyNotifySink_OnChanged(IPropertyNotifySink *iface, DISPID dispID)
645 case DISPID_READYSTATE:
646 CHECK_EXPECT2(OnChanged_READYSTATE);
648 if(readystate_set_interactive) {
649 readystate_set_interactive = FALSE;
650 load_state = LD_INTERACTIVE;
653 test_MSHTML_QueryStatus(NULL, OLECMDF_SUPPORTED
654 | (editmode && (load_state == LD_INTERACTIVE || load_state == LD_COMPLETE)
655 ? OLECMDF_ENABLED : 0));
657 if(readystate_set_loading) {
658 readystate_set_loading = FALSE;
659 load_state = LD_LOADING;
661 if(!editmode || load_state != LD_LOADING || !called_Exec_Explorer_69)
662 test_readyState(NULL);
665 CHECK_EXPECT(OnChanged_1005);
667 test_readyState(NULL);
668 readystate_set_interactive = (load_state != LD_INTERACTIVE);
672 ok(0, "unexpected id %d\n", dispID);
676 static HRESULT WINAPI PropertyNotifySink_OnRequestEdit(IPropertyNotifySink *iface, DISPID dispID)
678 ok(0, "unexpected call\n");
682 static IPropertyNotifySinkVtbl PropertyNotifySinkVtbl = {
683 PropertyNotifySink_QueryInterface,
684 PropertyNotifySink_AddRef,
685 PropertyNotifySink_Release,
686 PropertyNotifySink_OnChanged,
687 PropertyNotifySink_OnRequestEdit
690 static IPropertyNotifySink PropertyNotifySink = { &PropertyNotifySinkVtbl };
692 static HRESULT WINAPI Stream_QueryInterface(IStream *iface, REFIID riid, void **ppv)
694 ok(0, "unexpected call\n");
695 return E_NOINTERFACE;
698 static ULONG WINAPI Stream_AddRef(IStream *iface)
703 static ULONG WINAPI Stream_Release(IStream *iface)
708 static HRESULT WINAPI Stream_Read(IStream *iface, void *pv,
709 ULONG cb, ULONG *pcbRead)
712 ok(pv != NULL, "pv == NULL\n");
713 ok(cb > sizeof(html_page), "cb = %d\n", cb);
714 ok(pcbRead != NULL, "pcbRead == NULL\n");
715 ok(!*pcbRead, "*pcbRead = %d\n", *pcbRead);
720 memcpy(pv, html_page, sizeof(html_page)-1);
721 stream_read += *pcbRead = sizeof(html_page)-1;
725 static HRESULT WINAPI Stream_Write(IStream *iface, const void *pv,
726 ULONG cb, ULONG *pcbWritten)
728 ok(0, "unexpected call\n");
732 static HRESULT WINAPI Stream_Seek(IStream *iface, LARGE_INTEGER dlibMove,
733 DWORD dwOrigin, ULARGE_INTEGER *plibNewPosition)
735 ok(0, "unexpected call\n");
739 static HRESULT WINAPI Stream_SetSize(IStream *iface, ULARGE_INTEGER libNewSize)
741 ok(0, "unexpected call\n");
745 static HRESULT WINAPI Stream_CopyTo(IStream *iface, IStream *pstm,
746 ULARGE_INTEGER cb, ULARGE_INTEGER *pcbRead, ULARGE_INTEGER *pcbWritten)
748 ok(0, "unexpected call\n");
752 static HRESULT WINAPI Stream_Commit(IStream *iface, DWORD grfCommitFlags)
754 ok(0, "unexpected call\n");
758 static HRESULT WINAPI Stream_Revert(IStream *iface)
760 ok(0, "unexpected call\n");
764 static HRESULT WINAPI Stream_LockRegion(IStream *iface, ULARGE_INTEGER libOffset,
765 ULARGE_INTEGER cb, DWORD dwLockType)
767 ok(0, "unexpected call\n");
771 static HRESULT WINAPI Stream_UnlockRegion(IStream *iface,
772 ULARGE_INTEGER libOffset, ULARGE_INTEGER cb, DWORD dwLockType)
774 ok(0, "unexpected call\n");
778 static HRESULT WINAPI Stream_Stat(IStream *iface, STATSTG *pstatstg,
781 ok(0, "unexpected call\n");
785 static HRESULT WINAPI Stream_Clone(IStream *iface, IStream **ppstm)
787 ok(0, "unexpected call\n");
791 static const IStreamVtbl StreamVtbl = {
792 Stream_QueryInterface,
808 static IStream Stream = { &StreamVtbl };
810 static HRESULT WINAPI Binding_QueryInterface(IBinding *iface, REFIID riid, void **ppv)
812 if(IsEqualGUID(&IID_IWinInetHttpInfo, riid))
813 return E_NOINTERFACE; /* TODO */
815 if(IsEqualGUID(&IID_IWinInetInfo, riid))
816 return E_NOINTERFACE; /* TODO */
818 ok(0, "unexpected call\n");
819 return E_NOINTERFACE;
822 static ULONG WINAPI Binding_AddRef(IBinding *iface)
827 static ULONG WINAPI Binding_Release(IBinding *iface)
832 static HRESULT WINAPI Binding_Abort(IBinding *iface)
838 static HRESULT WINAPI Binding_Suspend(IBinding *iface)
840 ok(0, "unexpected call\n");
844 static HRESULT WINAPI Binding_Resume(IBinding *iface)
846 ok(0, "unexpected call\n");
850 static HRESULT WINAPI Binding_SetPriority(IBinding *iface, LONG nPriority)
852 ok(0, "unexpected call\n");
856 static HRESULT WINAPI Binding_GetPriority(IBinding *iface, LONG *pnPriority)
858 ok(0, "unexpected call\n");
862 static HRESULT WINAPI Binding_GetBindResult(IBinding *iface, CLSID *pclsidProtocol,
863 DWORD *pdwResult, LPOLESTR *pszResult, DWORD *pdwReserved)
865 CHECK_EXPECT(GetBindResult);
869 static const IBindingVtbl BindingVtbl = {
870 Binding_QueryInterface,
878 Binding_GetBindResult
881 static IBinding Binding = { &BindingVtbl };
883 DEFINE_GUID(IID_IMoniker_unk,0xA158A630,0xED6F,0x45FB,0xB9,0x87,0xF6,0x86,0x76,0xF5,0x77,0x52);
884 DEFINE_GUID(IID_IMoniker_unk2, 0x79EAC9D3,0xBAF9,0x11CE,0x8C,0x82,0x00,0xAA,0x00,0x4B,0xA9,0x0B);
886 static HRESULT WINAPI Moniker_QueryInterface(IMoniker *iface, REFIID riid, void **ppv)
890 if(IsEqualGUID(&IID_IMoniker_unk, riid))
891 return E_NOINTERFACE; /* TODO */
892 if(IsEqualGUID(&IID_IMoniker_unk2, riid))
893 return E_NOINTERFACE; /* TODO */
895 ok(0, "unexpected riid: %s\n", debugstr_guid(riid));
896 return E_NOINTERFACE;
899 static ULONG WINAPI Moniker_AddRef(IMoniker *iface)
904 static ULONG WINAPI Moniker_Release(IMoniker *iface)
909 static HRESULT WINAPI Moniker_GetClassID(IMoniker *iface, CLSID *pClassID)
911 CHECK_EXPECT(GetClassID);
912 ok(IsEqualGUID(pClassID, &IID_NULL), "pClassID = %s\n", debugstr_guid(pClassID));
916 static HRESULT WINAPI Moniker_IsDirty(IMoniker *iface)
918 ok(0, "unexpected call\n");
922 static HRESULT WINAPI Moniker_Load(IMoniker *iface, IStream *pStm)
924 ok(0, "unexpected call\n");
928 static HRESULT WINAPI Moniker_Save(IMoniker *iface, IStream *pStm, BOOL fClearDirty)
930 ok(0, "unexpected call\n");
934 static HRESULT WINAPI Moniker_GetSizeMax(IMoniker *iface, ULARGE_INTEGER *pcbSize)
936 ok(0, "unexpected call\n");
940 static HRESULT WINAPI Moniker_BindToObject(IMoniker *iface, IBindCtx *pcb, IMoniker *pmkToLeft,
941 REFIID riidResult, void **ppvResult)
943 ok(0, "unexpected call\n");
947 static HRESULT WINAPI Moniker_BindToStorage(IMoniker *iface, IBindCtx *pbc, IMoniker *pmkToLeft,
948 REFIID riid, void **ppv)
950 IBindStatusCallback *callback = NULL;
951 FORMATETC formatetc = {0xc02d, NULL, 1, -1, TYMED_ISTREAM};
957 static OLECHAR BSCBHolder[] = { '_','B','S','C','B','_','H','o','l','d','e','r','_',0 };
958 static const WCHAR wszTextHtml[] = {'t','e','x','t','/','h','t','m','l',0};
960 CHECK_EXPECT(BindToStorage);
962 load_state = LD_LOADING;
964 ok(pbc != NULL, "pbc == NULL\n");
965 ok(pmkToLeft == NULL, "pmkToLeft=%p\n", pmkToLeft);
966 ok(IsEqualGUID(&IID_IStream, riid), "unexpected riid\n");
967 ok(ppv != NULL, "ppv == NULL\n");
968 ok(*ppv == NULL, "*ppv=%p\n", *ppv);
970 hres = IBindCtx_GetObjectParam(pbc, BSCBHolder, (IUnknown**)&callback);
971 ok(hres == S_OK, "GetObjectParam failed: %08x\n", hres);
972 ok(callback != NULL, "callback == NULL\n");
974 memset(&bindinfo, 0xf0, sizeof(bindinfo));
975 bindinfo.cbSize = sizeof(bindinfo);
977 hres = IBindStatusCallback_GetBindInfo(callback, &bindf, &bindinfo);
978 ok(hres == S_OK, "GetBindInfo failed: %08x\n", hres);
979 ok(bindf == (BINDF_PULLDATA|BINDF_ASYNCSTORAGE|BINDF_ASYNCHRONOUS), "bindf = %08x\n", bindf);
980 ok(bindinfo.cbSize == sizeof(bindinfo), "bindinfo.cbSize=%d\n", bindinfo.cbSize);
981 ok(bindinfo.szExtraInfo == NULL, "bindinfo.szExtraInfo=%p\n", bindinfo.szExtraInfo);
982 /* TODO: test stgmedData */
983 ok(bindinfo.grfBindInfoF == 0, "bindinfo.grfBinfInfoF=%08x\n", bindinfo.grfBindInfoF);
984 ok(bindinfo.dwBindVerb == 0, "bindinfo.dwBindVerb=%d\n", bindinfo.dwBindVerb);
985 ok(bindinfo.szCustomVerb == 0, "bindinfo.szCustomVerb=%p\n", bindinfo.szCustomVerb);
986 ok(bindinfo.cbstgmedData == 0, "bindinfo.cbstgmedData=%d\n", bindinfo.cbstgmedData);
987 ok(bindinfo.dwOptions == 0x80000 || bindinfo.dwOptions == 0x4080000,
988 "bindinfo.dwOptions=%x\n", bindinfo.dwOptions);
989 ok(bindinfo.dwOptionsFlags == 0, "bindinfo.dwOptionsFlags=%d\n", bindinfo.dwOptionsFlags);
990 /* TODO: test dwCodePage */
991 /* TODO: test securityAttributes */
992 ok(IsEqualGUID(&IID_NULL, &bindinfo.iid), "unexpected bindinfo.iid\n");
993 ok(bindinfo.pUnk == NULL, "bindinfo.pUnk=%p\n", bindinfo.pUnk);
994 ok(bindinfo.dwReserved == 0, "bindinfo.dwReserved=%d\n", bindinfo.dwReserved);
996 hres = IBindStatusCallback_OnStartBinding(callback, 0, &Binding);
997 ok(hres == S_OK, "OnStartBinding failed: %08x\n", hres);
999 hres = IBindStatusCallback_OnProgress(callback, 0, 0, BINDSTATUS_MIMETYPEAVAILABLE,
1001 ok(hres == S_OK, "OnProgress(BINDSTATUS_MIMETYPEAVAILABLE) failed: %08x\n", hres);
1003 hres = IBindStatusCallback_OnProgress(callback, sizeof(html_page)-1, sizeof(html_page)-1,
1004 BINDSTATUS_BEGINDOWNLOADDATA, doc_url);
1005 ok(hres == S_OK, "OnProgress(BINDSTATUS_BEGINDOWNLOADDATA) failed: %08x\n", hres);
1008 stgmedium.tymed = TYMED_ISTREAM;
1009 U(stgmedium).pstm = &Stream;
1010 stgmedium.pUnkForRelease = (IUnknown*)iface;
1011 hres = IBindStatusCallback_OnDataAvailable(callback,
1012 BSCF_FIRSTDATANOTIFICATION|BSCF_LASTDATANOTIFICATION,
1013 sizeof(html_page)-1, &formatetc, &stgmedium);
1014 ok(hres == S_OK, "OnDataAvailable failed: %08x\n", hres);
1017 hres = IBindStatusCallback_OnProgress(callback, sizeof(html_page)-1, sizeof(html_page)-1,
1018 BINDSTATUS_ENDDOWNLOADDATA, NULL);
1019 ok(hres == S_OK, "OnProgress(BINDSTATUS_ENDDOWNLOADDATA) failed: %08x\n", hres);
1021 SET_EXPECT(GetBindResult);
1022 hres = IBindStatusCallback_OnStopBinding(callback, S_OK, NULL);
1023 ok(hres == S_OK, "OnStopBinding failed: %08x\n", hres);
1024 SET_CALLED(GetBindResult); /* IE7 */
1026 IBindStatusCallback_Release(callback);
1031 static HRESULT WINAPI Moniker_Reduce(IMoniker *iface, IBindCtx *pbc, DWORD dwReduceHowFar,
1032 IMoniker **ppmkToLeft, IMoniker **ppmkReduced)
1034 ok(0, "unexpected call\n");
1038 static HRESULT WINAPI Moniker_ComposeWith(IMoniker *iface, IMoniker *pmkRight,
1039 BOOL fOnlyIfNotGeneric, IMoniker **ppnkComposite)
1041 ok(0, "unexpected call\n");
1045 static HRESULT WINAPI Moniker_Enum(IMoniker *iface, BOOL fForwrd, IEnumMoniker **ppenumMoniker)
1047 ok(0, "unexpected call\n");
1051 static HRESULT WINAPI Moniker_IsEqual(IMoniker *iface, IMoniker *pmkOtherMoniker)
1053 ok(0, "unexpected call\n");
1057 static HRESULT WINAPI Moniker_Hash(IMoniker *iface, DWORD *pdwHash)
1059 ok(0, "unexpected call\n");
1063 static HRESULT WINAPI Moniker_IsRunning(IMoniker *iface, IBindCtx *pbc, IMoniker *pmkToLeft,
1064 IMoniker *pmkNewlyRunning)
1066 ok(0, "unexpected call\n");
1070 static HRESULT WINAPI Moniker_GetTimeOfLastChange(IMoniker *iface, IBindCtx *pbc,
1071 IMoniker *pmkToLeft, FILETIME *pFileTime)
1073 ok(0, "unexpected call\n");
1077 static HRESULT WINAPI Moniker_Inverse(IMoniker *iface, IMoniker **ppmk)
1079 ok(0, "unexpected call\n");
1083 static HRESULT WINAPI Moniker_CommonPrefixWith(IMoniker *iface, IMoniker *pmkOther,
1084 IMoniker **ppmkPrefix)
1086 ok(0, "unexpected call\n");
1090 static HRESULT WINAPI Moniker_RelativePathTo(IMoniker *iface, IMoniker *pmkOther,
1091 IMoniker **pmkRelPath)
1093 ok(0, "unexpected call\n");
1097 static HRESULT WINAPI Moniker_GetDisplayName(IMoniker *iface, IBindCtx *pbc,
1098 IMoniker *pmkToLeft, LPOLESTR *ppszDisplayName)
1100 CHECK_EXPECT2(GetDisplayName);
1102 /* ok(pbc != NULL, "pbc == NULL\n"); */
1103 ok(pmkToLeft == NULL, "pmkToLeft=%p\n", pmkToLeft);
1104 ok(ppszDisplayName != NULL, "ppszDisplayName == NULL\n");
1106 *ppszDisplayName = CoTaskMemAlloc(sizeof(doc_url));
1107 memcpy(*ppszDisplayName, doc_url, sizeof(doc_url));
1112 static HRESULT WINAPI Moniker_ParseDisplayName(IMoniker *iface, IBindCtx *pbc,
1113 IMoniker *pmkToLeft, LPOLESTR pszDisplayName, ULONG *pchEaten, IMoniker **ppmkOut)
1115 ok(0, "unexpected call\n");
1119 static HRESULT WINAPI Moniker_IsSystemMoniker(IMoniker *iface, DWORD *pdwMksys)
1121 CHECK_EXPECT(IsSystemMoniker);
1125 static const IMonikerVtbl MonikerVtbl = {
1126 Moniker_QueryInterface,
1134 Moniker_BindToObject,
1135 Moniker_BindToStorage,
1137 Moniker_ComposeWith,
1142 Moniker_GetTimeOfLastChange,
1144 Moniker_CommonPrefixWith,
1145 Moniker_RelativePathTo,
1146 Moniker_GetDisplayName,
1147 Moniker_ParseDisplayName,
1148 Moniker_IsSystemMoniker
1151 static IMoniker Moniker = { &MonikerVtbl };
1153 static HRESULT WINAPI OleContainer_QueryInterface(IOleContainer *iface, REFIID riid, void **ppv)
1155 return QueryInterface(riid, ppv);
1158 static ULONG WINAPI OleContainer_AddRef(IOleContainer *iface)
1163 static ULONG WINAPI OleContainer_Release(IOleContainer *iface)
1168 static HRESULT WINAPI OleContainer_ParseDisplayName(IOleContainer *iface, IBindCtx *pbc,
1169 LPOLESTR pszDiaplayName, ULONG *pchEaten, IMoniker **ppmkOut)
1171 ok(0, "unexpected call\n");
1175 static HRESULT WINAPI OleContainer_EnumObjects(IOleContainer *iface, DWORD grfFlags,
1176 IEnumUnknown **ppenum)
1178 ok(0, "unexpected call\n");
1182 static HRESULT WINAPI OleContainer_LockContainer(IOleContainer *iface, BOOL fLock)
1184 CHECK_EXPECT(LockContainer);
1185 ok(expect_LockContainer_fLock == fLock, "fLock=%x, expected %x\n", fLock, expect_LockContainer_fLock);
1189 static const IOleContainerVtbl OleContainerVtbl = {
1190 OleContainer_QueryInterface,
1191 OleContainer_AddRef,
1192 OleContainer_Release,
1193 OleContainer_ParseDisplayName,
1194 OleContainer_EnumObjects,
1195 OleContainer_LockContainer
1198 static IOleContainer OleContainer = { &OleContainerVtbl };
1200 static HRESULT WINAPI InPlaceFrame_QueryInterface(IOleInPlaceFrame *iface, REFIID riid, void **ppv)
1202 static const GUID undocumented_frame_iid = {0xfbece6c9,0x48d7,0x4a37,{0x8f,0xe3,0x6a,0xd4,0x27,0x2f,0xdd,0xac}};
1204 if(!IsEqualGUID(&undocumented_frame_iid, riid))
1205 ok(0, "unexpected riid %s\n", debugstr_guid(riid));
1208 return E_NOINTERFACE;
1211 static ULONG WINAPI InPlaceFrame_AddRef(IOleInPlaceFrame *iface)
1216 static ULONG WINAPI InPlaceFrame_Release(IOleInPlaceFrame *iface)
1221 static HRESULT WINAPI InPlaceFrame_GetWindow(IOleInPlaceFrame *iface, HWND *phwnd)
1223 ok(0, "unexpected call\n");
1227 static HRESULT WINAPI InPlaceFrame_ContextSensitiveHelp(IOleInPlaceFrame *iface, BOOL fEnterMode)
1229 ok(0, "unexpected call\n");
1233 static HRESULT WINAPI InPlaceFrame_GetBorder(IOleInPlaceFrame *iface, LPRECT lprectBorder)
1235 ok(0, "unexpected call\n");
1239 static HRESULT WINAPI InPlaceFrame_RequestBorderSpace(IOleInPlaceFrame *iface,
1240 LPCBORDERWIDTHS pborderwidths)
1242 ok(0, "unexpected call\n");
1246 static HRESULT WINAPI InPlaceFrame_SetBorderSpace(IOleInPlaceFrame *iface,
1247 LPCBORDERWIDTHS pborderwidths)
1249 CHECK_EXPECT(InPlaceFrame_SetBorderSpace);
1253 static HRESULT WINAPI InPlaceUIWindow_SetActiveObject(IOleInPlaceFrame *iface,
1254 IOleInPlaceActiveObject *pActiveObject, LPCOLESTR pszObjName)
1256 static const WCHAR wszHTML_Document[] =
1257 {'H','T','M','L',' ','D','o','c','u','m','e','n','t',0};
1259 CHECK_EXPECT2(InPlaceUIWindow_SetActiveObject);
1261 if(expect_InPlaceUIWindow_SetActiveObject_active) {
1262 ok(pActiveObject != NULL, "pActiveObject = NULL\n");
1263 if(pActiveObject && is_english())
1264 ok(!lstrcmpW(wszHTML_Document, pszObjName), "pszObjName != \"HTML Document\"\n");
1267 ok(pActiveObject == NULL, "pActiveObject=%p, expected NULL\n", pActiveObject);
1268 ok(pszObjName == NULL, "pszObjName=%p, expected NULL\n", pszObjName);
1270 expect_InPlaceUIWindow_SetActiveObject_active = !expect_InPlaceUIWindow_SetActiveObject_active;
1274 static HRESULT WINAPI InPlaceFrame_SetActiveObject(IOleInPlaceFrame *iface,
1275 IOleInPlaceActiveObject *pActiveObject, LPCOLESTR pszObjName)
1277 static const WCHAR wszHTML_Document[] =
1278 {'H','T','M','L',' ','D','o','c','u','m','e','n','t',0};
1281 CHECK_EXPECT2(SetActiveObject);
1283 if(pActiveObject && is_english())
1284 ok(!lstrcmpW(wszHTML_Document, pszObjName), "pszObjName != \"HTML Document\"\n");
1286 CHECK_EXPECT(SetActiveObject_null);
1288 ok(pActiveObject == NULL, "pActiveObject=%p, expected NULL\n", pActiveObject);
1289 ok(pszObjName == NULL, "pszObjName=%p, expected NULL\n", pszObjName);
1295 static HRESULT WINAPI InPlaceFrame_InsertMenus(IOleInPlaceFrame *iface, HMENU hmenuShared,
1296 LPOLEMENUGROUPWIDTHS lpMenuWidths)
1298 ok(0, "unexpected call\n");
1302 static HRESULT WINAPI InPlaceFrame_SetMenu(IOleInPlaceFrame *iface, HMENU hmenuShared,
1303 HOLEMENU holemenu, HWND hwndActiveObject)
1305 ok(0, "unexpected call\n");
1309 static HRESULT WINAPI InPlaceFrame_RemoveMenus(IOleInPlaceFrame *iface, HMENU hmenuShared)
1311 ok(0, "unexpected call\n");
1315 static HRESULT WINAPI InPlaceFrame_SetStatusText(IOleInPlaceFrame *iface, LPCOLESTR pszStatusText)
1317 CHECK_EXPECT2(SetStatusText);
1318 if(!expect_status_text)
1319 ok(pszStatusText == NULL, "pszStatusText=%p, expected NULL\n", pszStatusText);
1323 static HRESULT WINAPI InPlaceFrame_EnableModeless(IOleInPlaceFrame *iface, BOOL fEnable)
1326 CHECK_EXPECT(Frame_EnableModeless_TRUE);
1328 CHECK_EXPECT(Frame_EnableModeless_FALSE);
1332 static HRESULT WINAPI InPlaceFrame_TranslateAccelerator(IOleInPlaceFrame *iface, LPMSG lpmsg, WORD wID)
1334 ok(0, "unexpected call\n");
1338 static const IOleInPlaceFrameVtbl InPlaceFrameVtbl = {
1339 InPlaceFrame_QueryInterface,
1340 InPlaceFrame_AddRef,
1341 InPlaceFrame_Release,
1342 InPlaceFrame_GetWindow,
1343 InPlaceFrame_ContextSensitiveHelp,
1344 InPlaceFrame_GetBorder,
1345 InPlaceFrame_RequestBorderSpace,
1346 InPlaceFrame_SetBorderSpace,
1347 InPlaceFrame_SetActiveObject,
1348 InPlaceFrame_InsertMenus,
1349 InPlaceFrame_SetMenu,
1350 InPlaceFrame_RemoveMenus,
1351 InPlaceFrame_SetStatusText,
1352 InPlaceFrame_EnableModeless,
1353 InPlaceFrame_TranslateAccelerator
1356 static IOleInPlaceFrame InPlaceFrame = { &InPlaceFrameVtbl };
1358 static const IOleInPlaceFrameVtbl InPlaceUIWindowVtbl = {
1359 InPlaceFrame_QueryInterface,
1360 InPlaceFrame_AddRef,
1361 InPlaceFrame_Release,
1362 InPlaceFrame_GetWindow,
1363 InPlaceFrame_ContextSensitiveHelp,
1364 InPlaceFrame_GetBorder,
1365 InPlaceFrame_RequestBorderSpace,
1366 InPlaceFrame_SetBorderSpace,
1367 InPlaceUIWindow_SetActiveObject,
1370 static IOleInPlaceFrame InPlaceUIWindow = { &InPlaceUIWindowVtbl };
1372 static HRESULT WINAPI InPlaceSite_QueryInterface(IOleInPlaceSiteEx *iface, REFIID riid, void **ppv)
1374 return QueryInterface(riid, ppv);
1377 static ULONG WINAPI InPlaceSite_AddRef(IOleInPlaceSiteEx *iface)
1382 static ULONG WINAPI InPlaceSite_Release(IOleInPlaceSiteEx *iface)
1387 static HRESULT WINAPI InPlaceSite_GetWindow(IOleInPlaceSiteEx *iface, HWND *phwnd)
1389 CHECK_EXPECT(GetWindow);
1390 ok(phwnd != NULL, "phwnd = NULL\n");
1391 *phwnd = container_hwnd;
1395 static HRESULT WINAPI InPlaceSite_ContextSensitiveHelp(IOleInPlaceSiteEx *iface, BOOL fEnterMode)
1397 ok(0, "unexpected call\n");
1401 static HRESULT WINAPI InPlaceSite_CanInPlaceActivate(IOleInPlaceSiteEx *iface)
1403 CHECK_EXPECT(CanInPlaceActivate);
1407 static HRESULT WINAPI InPlaceSite_OnInPlaceActivate(IOleInPlaceSiteEx *iface)
1409 CHECK_EXPECT(OnInPlaceActivate);
1413 static HRESULT WINAPI InPlaceSite_OnUIActivate(IOleInPlaceSiteEx *iface)
1415 CHECK_EXPECT(OnUIActivate);
1419 static HRESULT WINAPI InPlaceSite_GetWindowContext(IOleInPlaceSiteEx *iface,
1420 IOleInPlaceFrame **ppFrame, IOleInPlaceUIWindow **ppDoc, LPRECT lprcPosRect,
1421 LPRECT lprcClipRect, LPOLEINPLACEFRAMEINFO lpFrameInfo)
1423 static const RECT rect = {0,0,500,500};
1425 CHECK_EXPECT(GetWindowContext);
1427 ok(ppFrame != NULL, "ppFrame = NULL\n");
1429 *ppFrame = &InPlaceFrame;
1430 ok(ppDoc != NULL, "ppDoc = NULL\n");
1432 *ppDoc = (IOleInPlaceUIWindow*)&InPlaceUIWindow;
1433 ok(lprcPosRect != NULL, "lprcPosRect = NULL\n");
1435 memcpy(lprcPosRect, &rect, sizeof(RECT));
1436 ok(lprcClipRect != NULL, "lprcClipRect = NULL\n");
1438 memcpy(lprcClipRect, &rect, sizeof(RECT));
1439 ok(lpFrameInfo != NULL, "lpFrameInfo = NULL\n");
1441 lpFrameInfo->cb = sizeof(*lpFrameInfo);
1442 lpFrameInfo->fMDIApp = FALSE;
1443 lpFrameInfo->hwndFrame = container_hwnd;
1444 lpFrameInfo->haccel = NULL;
1445 lpFrameInfo->cAccelEntries = 0;
1451 static HRESULT WINAPI InPlaceSite_Scroll(IOleInPlaceSiteEx *iface, SIZE scrollExtant)
1453 ok(0, "unexpected call\n");
1457 static HRESULT WINAPI InPlaceSite_OnUIDeactivate(IOleInPlaceSiteEx *iface, BOOL fUndoable)
1459 CHECK_EXPECT(OnUIDeactivate);
1460 ok(!fUndoable, "fUndoable = TRUE\n");
1464 static HRESULT WINAPI InPlaceSite_OnInPlaceDeactivate(IOleInPlaceSiteEx *iface)
1466 CHECK_EXPECT(OnInPlaceDeactivate);
1470 static HRESULT WINAPI InPlaceSite_DiscardUndoState(IOleInPlaceSiteEx *iface)
1472 ok(0, "unexpected call\n");
1476 static HRESULT WINAPI InPlaceSite_DeactivateAndUndo(IOleInPlaceSiteEx *iface)
1478 ok(0, "unexpected call\n");
1482 static HRESULT WINAPI InPlaceSite_OnPosRectChange(IOleInPlaceSiteEx *iface, LPCRECT lprcPosRect)
1484 ok(0, "unexpected call\n");
1488 static HRESULT WINAPI InPlaceSiteEx_OnInPlaceActivateEx(IOleInPlaceSiteEx *iface, BOOL *pfNoRedraw, DWORD dwFlags)
1490 CHECK_EXPECT(OnInPlaceActivateEx);
1492 ok(pfNoRedraw != NULL, "pfNoRedraw == NULL\n");
1493 ok(!*pfNoRedraw, "*pfNoRedraw == TRUE\n");
1494 ok(dwFlags == 0, "dwFlags = %08x\n", dwFlags);
1499 static HRESULT WINAPI InPlaceSiteEx_OnInPlaceDeactivateEx(IOleInPlaceSiteEx *iface, BOOL fNoRedraw)
1501 CHECK_EXPECT(OnInPlaceDeactivateEx);
1503 ok(fNoRedraw, "fNoRedraw == FALSE\n");
1508 static HRESULT WINAPI InPlaceSiteEx_RequestUIActivate(IOleInPlaceSiteEx *iface)
1510 CHECK_EXPECT(RequestUIActivate);
1514 static const IOleInPlaceSiteExVtbl InPlaceSiteVtbl = {
1515 InPlaceSite_QueryInterface,
1517 InPlaceSite_Release,
1518 InPlaceSite_GetWindow,
1519 InPlaceSite_ContextSensitiveHelp,
1520 InPlaceSite_CanInPlaceActivate,
1521 InPlaceSite_OnInPlaceActivate,
1522 InPlaceSite_OnUIActivate,
1523 InPlaceSite_GetWindowContext,
1525 InPlaceSite_OnUIDeactivate,
1526 InPlaceSite_OnInPlaceDeactivate,
1527 InPlaceSite_DiscardUndoState,
1528 InPlaceSite_DeactivateAndUndo,
1529 InPlaceSite_OnPosRectChange,
1530 InPlaceSiteEx_OnInPlaceActivateEx,
1531 InPlaceSiteEx_OnInPlaceDeactivateEx,
1532 InPlaceSiteEx_RequestUIActivate
1535 static IOleInPlaceSiteEx InPlaceSiteEx = { &InPlaceSiteVtbl };
1537 static HRESULT WINAPI ClientSite_QueryInterface(IOleClientSite *iface, REFIID riid, void **ppv)
1539 return QueryInterface(riid, ppv);
1542 static ULONG WINAPI ClientSite_AddRef(IOleClientSite *iface)
1547 static ULONG WINAPI ClientSite_Release(IOleClientSite *iface)
1552 static HRESULT WINAPI ClientSite_SaveObject(IOleClientSite *iface)
1554 ok(0, "unexpected call\n");
1558 static HRESULT WINAPI ClientSite_GetMoniker(IOleClientSite *iface, DWORD dwAssign, DWORD dwWhichMoniker,
1561 ok(0, "unexpected call\n");
1565 static HRESULT WINAPI ClientSite_GetContainer(IOleClientSite *iface, IOleContainer **ppContainer)
1567 CHECK_EXPECT(GetContainer);
1568 ok(ppContainer != NULL, "ppContainer = NULL\n");
1569 *ppContainer = &OleContainer;
1573 static HRESULT WINAPI ClientSite_ShowObject(IOleClientSite *iface)
1575 ok(0, "unexpected call\n");
1579 static HRESULT WINAPI ClientSite_OnShowWindow(IOleClientSite *iface, BOOL fShow)
1581 ok(0, "unexpected call\n");
1585 static HRESULT WINAPI ClientSite_RequestNewObjectLayout(IOleClientSite *iface)
1587 ok(0, "unexpected call\n");
1591 static const IOleClientSiteVtbl ClientSiteVtbl = {
1592 ClientSite_QueryInterface,
1595 ClientSite_SaveObject,
1596 ClientSite_GetMoniker,
1597 ClientSite_GetContainer,
1598 ClientSite_ShowObject,
1599 ClientSite_OnShowWindow,
1600 ClientSite_RequestNewObjectLayout
1603 static IOleClientSite ClientSite = { &ClientSiteVtbl };
1605 static HRESULT WINAPI DocumentSite_QueryInterface(IOleDocumentSite *iface, REFIID riid, void **ppv)
1607 return QueryInterface(riid, ppv);
1610 static ULONG WINAPI DocumentSite_AddRef(IOleDocumentSite *iface)
1615 static ULONG WINAPI DocumentSite_Release(IOleDocumentSite *iface)
1622 CallUIActivate_None,
1623 CallUIActivate_ActivateMe,
1624 CallUIActivate_AfterShow,
1627 static BOOL call_UIActivate = CallUIActivate_ActivateMe;
1628 static HRESULT WINAPI DocumentSite_ActivateMe(IOleDocumentSite *iface, IOleDocumentView *pViewToActivate)
1630 IOleDocument *document;
1633 CHECK_EXPECT(ActivateMe);
1634 ok(pViewToActivate != NULL, "pViewToActivate = NULL\n");
1636 hres = IOleDocumentView_QueryInterface(pViewToActivate, &IID_IOleDocument, (void**)&document);
1637 ok(hres == S_OK, "could not get IOleDocument: %08x\n", hres);
1639 if(SUCCEEDED(hres)) {
1640 hres = IOleDocument_CreateView(document, (IOleInPlaceSite*)&InPlaceSiteEx, NULL, 0, &view);
1641 ok(hres == S_OK, "CreateView failed: %08x\n", hres);
1643 if(SUCCEEDED(hres)) {
1644 IOleInPlaceActiveObject *activeobj = NULL;
1645 IOleInPlaceSite *inplacesite = NULL;
1646 HWND tmp_hwnd = NULL;
1647 static RECT rect = {0,0,400,500};
1649 hres = IOleDocumentView_GetInPlaceSite(view, &inplacesite);
1650 ok(hres == S_OK, "GetInPlaceSite failed: %08x\n", hres);
1651 ok(inplacesite == (IOleInPlaceSite*)&InPlaceSiteEx, "inplacesite=%p, expected %p\n",
1652 inplacesite, &InPlaceSiteEx);
1654 hres = IOleDocumentView_SetInPlaceSite(view, (IOleInPlaceSite*)&InPlaceSiteEx);
1655 ok(hres == S_OK, "SetInPlaceSite failed: %08x\n", hres);
1657 hres = IOleDocumentView_GetInPlaceSite(view, &inplacesite);
1658 ok(hres == S_OK, "GetInPlaceSite failed: %08x\n", hres);
1659 ok(inplacesite == (IOleInPlaceSite*)&InPlaceSiteEx, "inplacesite=%p, expected %p\n",
1660 inplacesite, &InPlaceSiteEx);
1662 hres = IOleDocumentView_QueryInterface(view, &IID_IOleInPlaceActiveObject, (void**)&activeobj);
1663 ok(hres == S_OK, "Could not get IOleInPlaceActiveObject: %08x\n", hres);
1666 IOleInPlaceActiveObject_GetWindow(activeobj, &hwnd);
1667 ok(hres == S_OK, "GetWindow failed: %08x\n", hres);
1668 ok(hwnd == NULL, "hwnd=%p, expeted NULL\n", hwnd);
1671 if(call_UIActivate == CallUIActivate_ActivateMe) {
1672 SET_EXPECT(CanInPlaceActivate);
1673 SET_EXPECT(GetWindowContext);
1674 SET_EXPECT(GetWindow);
1676 SET_EXPECT(OnInPlaceActivateEx);
1678 SET_EXPECT(OnInPlaceActivate);
1679 SET_EXPECT(SetStatusText);
1680 SET_EXPECT(Exec_SETPROGRESSMAX);
1681 SET_EXPECT(Exec_SETPROGRESSPOS);
1682 SET_EXPECT(OnUIActivate);
1683 SET_EXPECT(SetActiveObject);
1685 expect_status_text = NULL;
1687 hres = IOleDocumentView_UIActivate(view, TRUE);
1688 ok(hres == S_OK, "UIActivate failed: %08x\n", hres);
1690 CHECK_CALLED(CanInPlaceActivate);
1691 CHECK_CALLED(GetWindowContext);
1692 CHECK_CALLED(GetWindow);
1694 CHECK_CALLED(OnInPlaceActivateEx);
1696 CHECK_CALLED(OnInPlaceActivate);
1697 CHECK_CALLED(SetStatusText);
1698 CHECK_CALLED(Exec_SETPROGRESSMAX);
1699 CHECK_CALLED(Exec_SETPROGRESSPOS);
1700 CHECK_CALLED(OnUIActivate);
1701 CHECK_CALLED(SetActiveObject);
1702 CHECK_CALLED(ShowUI);
1705 hres = IOleInPlaceActiveObject_GetWindow(activeobj, &hwnd);
1706 ok(hres == S_OK, "GetWindow failed: %08x\n", hres);
1707 ok(hwnd != NULL, "hwnd == NULL\n");
1709 ok(hwnd == last_hwnd, "hwnd != last_hwnd\n");
1712 hres = IOleDocumentView_UIActivate(view, TRUE);
1713 ok(hres == S_OK, "UIActivate failed: %08x\n", hres);
1716 hres = IOleInPlaceActiveObject_GetWindow(activeobj, &tmp_hwnd);
1717 ok(hres == S_OK, "GetWindow failed: %08x\n", hres);
1718 ok(tmp_hwnd == hwnd, "tmp_hwnd=%p, expected %p\n", tmp_hwnd, hwnd);
1722 hres = IOleDocumentView_SetRect(view, &rect);
1723 ok(hres == S_OK, "SetRect failed: %08x\n", hres);
1725 if(call_UIActivate == CallUIActivate_ActivateMe) {
1726 hres = IOleDocumentView_Show(view, TRUE);
1727 ok(hres == S_OK, "Show failed: %08x\n", hres);
1729 SET_EXPECT(CanInPlaceActivate);
1730 SET_EXPECT(GetWindowContext);
1731 SET_EXPECT(GetWindow);
1733 SET_EXPECT(OnInPlaceActivateEx);
1735 SET_EXPECT(OnInPlaceActivate);
1736 SET_EXPECT(SetStatusText);
1737 SET_EXPECT(Exec_SETPROGRESSMAX);
1738 SET_EXPECT(Exec_SETPROGRESSPOS);
1739 SET_EXPECT(OnUIActivate);
1740 expect_status_text = (load_state == LD_COMPLETE ? (LPCOLESTR)0xdeadbeef : NULL);
1742 hres = IOleDocumentView_Show(view, TRUE);
1744 win_skip("Show failed\n");
1746 IOleInPlaceActiveObject_Release(activeobj);
1747 IOleDocument_Release(document);
1751 ok(hres == S_OK, "Show failed: %08x\n", hres);
1753 CHECK_CALLED(CanInPlaceActivate);
1754 CHECK_CALLED(GetWindowContext);
1755 CHECK_CALLED(GetWindow);
1757 CHECK_CALLED(OnInPlaceActivateEx);
1759 CHECK_CALLED(OnInPlaceActivate);
1760 CHECK_CALLED(SetStatusText);
1761 CHECK_CALLED(Exec_SETPROGRESSMAX);
1762 CHECK_CALLED(Exec_SETPROGRESSPOS);
1765 hres = IOleInPlaceActiveObject_GetWindow(activeobj, &hwnd);
1766 ok(hres == S_OK, "GetWindow failed: %08x\n", hres);
1767 ok(hwnd != NULL, "hwnd == NULL\n");
1769 ok(hwnd == last_hwnd, "hwnd != last_hwnd\n");
1773 test_timer(EXPECT_UPDATEUI | ((load_state == LD_LOADING) ? EXPECT_SETTITLE : 0));
1776 IOleInPlaceActiveObject_Release(activeobj);
1779 IOleDocument_Release(document);
1785 static const IOleDocumentSiteVtbl DocumentSiteVtbl = {
1786 DocumentSite_QueryInterface,
1787 DocumentSite_AddRef,
1788 DocumentSite_Release,
1789 DocumentSite_ActivateMe
1792 static IOleDocumentSite DocumentSite = { &DocumentSiteVtbl };
1794 static HRESULT WINAPI OleControlSite_QueryInterface(IOleControlSite *iface, REFIID riid, void **ppv)
1796 return QueryInterface(riid, ppv);
1799 static ULONG WINAPI OleControlSite_AddRef(IOleControlSite *iface)
1804 static ULONG WINAPI OleControlSite_Release(IOleControlSite *iface)
1809 static HRESULT WINAPI OleControlSite_OnControlInfoChanged(IOleControlSite *iface)
1811 ok(0, "unexpected call\n");
1815 static HRESULT WINAPI OleControlSite_LockInPlaceActive(IOleControlSite *iface, BOOL fLock)
1817 ok(0, "unexpected call\n");
1821 static HRESULT WINAPI OleControlSite_GetExtendedControl(IOleControlSite *iface, IDispatch **ppDisp)
1823 ok(0, "unexpected call\n");
1827 static HRESULT WINAPI OleControlSite_TransformCoords(IOleControlSite *iface, POINTL *pPtHimetric,
1828 POINTF *pPtfContainer, DWORD dwFlags)
1830 ok(0, "unexpected call\n");
1834 static HRESULT WINAPI OleControlSite_TranslateAccelerator(IOleControlSite *iface,
1835 MSG *pMsg, DWORD grfModifiers)
1837 ok(0, "unexpected call\n");
1841 static HRESULT WINAPI OleControlSite_OnFocus(IOleControlSite *iface, BOOL fGotFocus)
1844 CHECK_EXPECT(OnFocus_TRUE);
1846 CHECK_EXPECT2(OnFocus_FALSE);
1850 static HRESULT WINAPI OleControlSite_ShowPropertyFrame(IOleControlSite *iface)
1852 ok(0, "unexpected call\n");
1856 static const IOleControlSiteVtbl OleControlSiteVtbl = {
1857 OleControlSite_QueryInterface,
1858 OleControlSite_AddRef,
1859 OleControlSite_Release,
1860 OleControlSite_OnControlInfoChanged,
1861 OleControlSite_LockInPlaceActive,
1862 OleControlSite_GetExtendedControl,
1863 OleControlSite_TransformCoords,
1864 OleControlSite_TranslateAccelerator,
1865 OleControlSite_OnFocus,
1866 OleControlSite_ShowPropertyFrame
1869 static IOleControlSite OleControlSite = { &OleControlSiteVtbl };
1871 static HRESULT WINAPI DocHostUIHandler_QueryInterface(IDocHostUIHandler2 *iface, REFIID riid, void **ppv)
1873 return QueryInterface(riid, ppv);
1876 static ULONG WINAPI DocHostUIHandler_AddRef(IDocHostUIHandler2 *iface)
1881 static ULONG WINAPI DocHostUIHandler_Release(IDocHostUIHandler2 *iface)
1886 static HRESULT WINAPI DocHostUIHandler_ShowContextMenu(IDocHostUIHandler2 *iface, DWORD dwID, POINT *ppt,
1887 IUnknown *pcmdtReserved, IDispatch *pdicpReserved)
1889 ok(0, "unexpected call\n");
1893 static HRESULT WINAPI DocHostUIHandler_GetHostInfo(IDocHostUIHandler2 *iface, DOCHOSTUIINFO *pInfo)
1895 CHECK_EXPECT(GetHostInfo);
1896 ok(pInfo != NULL, "pInfo=NULL\n");
1898 ok(pInfo->cbSize == sizeof(DOCHOSTUIINFO), "pInfo->cbSize=%u\n", pInfo->cbSize);
1899 ok(!pInfo->dwFlags, "pInfo->dwFlags=%08x, expected 0\n", pInfo->dwFlags);
1900 pInfo->dwFlags = DOCHOSTUIFLAG_DISABLE_HELP_MENU | DOCHOSTUIFLAG_DISABLE_SCRIPT_INACTIVE
1901 | DOCHOSTUIFLAG_ACTIVATE_CLIENTHIT_ONLY | DOCHOSTUIFLAG_ENABLE_INPLACE_NAVIGATION
1902 | DOCHOSTUIFLAG_IME_ENABLE_RECONVERSION;
1903 ok(!pInfo->dwDoubleClick, "pInfo->dwDoubleClick=%08x, expected 0\n", pInfo->dwDoubleClick);
1904 ok(!pInfo->pchHostCss, "pInfo->pchHostCss=%p, expected NULL\n", pInfo->pchHostCss);
1905 ok(!pInfo->pchHostNS, "pInfo->pchhostNS=%p, expected NULL\n", pInfo->pchHostNS);
1910 static HRESULT WINAPI DocHostUIHandler_ShowUI(IDocHostUIHandler2 *iface, DWORD dwID,
1911 IOleInPlaceActiveObject *pActiveObject, IOleCommandTarget *pCommandTarget,
1912 IOleInPlaceFrame *pFrame, IOleInPlaceUIWindow *pDoc)
1914 CHECK_EXPECT(ShowUI);
1917 ok(dwID == DOCHOSTUITYPE_AUTHOR, "dwID=%d, expected DOCHOSTUITYPE_AUTHOR\n", dwID);
1919 ok(dwID == DOCHOSTUITYPE_BROWSE, "dwID=%d, expected DOCHOSTUITYPE_BROWSE\n", dwID);
1920 ok(pActiveObject != NULL, "pActiveObject = NULL\n");
1921 ok(pCommandTarget != NULL, "pCommandTarget = NULL\n");
1922 ok(pFrame == &InPlaceFrame, "pFrame=%p, expected %p\n", pFrame, &InPlaceFrame);
1923 if (expect_InPlaceUIWindow_SetActiveObject_active)
1924 ok(pDoc == (IOleInPlaceUIWindow *)&InPlaceUIWindow, "pDoc=%p, expected %p\n", pDoc, &InPlaceUIWindow);
1926 ok(pDoc == NULL, "pDoc=%p, expected NULL\n", pDoc);
1931 static HRESULT WINAPI DocHostUIHandler_HideUI(IDocHostUIHandler2 *iface)
1933 CHECK_EXPECT(HideUI);
1937 static HRESULT WINAPI DocHostUIHandler_UpdateUI(IDocHostUIHandler2 *iface)
1939 CHECK_EXPECT(UpdateUI);
1943 static HRESULT WINAPI DocHostUIHandler_EnableModeless(IDocHostUIHandler2 *iface, BOOL fEnable)
1946 CHECK_EXPECT(EnableModeless_TRUE);
1948 CHECK_EXPECT(EnableModeless_FALSE);
1952 static HRESULT WINAPI DocHostUIHandler_OnDocWindowActivate(IDocHostUIHandler2 *iface, BOOL fActivate)
1954 ok(0, "unexpected call\n");
1958 static BOOL expect_OnFrameWindowActivate_fActivate;
1959 static HRESULT WINAPI DocHostUIHandler_OnFrameWindowActivate(IDocHostUIHandler2 *iface, BOOL fActivate)
1961 CHECK_EXPECT2(OnFrameWindowActivate);
1962 ok(fActivate == expect_OnFrameWindowActivate_fActivate, "fActivate=%x\n", fActivate);
1966 static HRESULT WINAPI DocHostUIHandler_ResizeBorder(IDocHostUIHandler2 *iface, LPCRECT prcBorder,
1967 IOleInPlaceUIWindow *pUIWindow, BOOL fRameWindow)
1969 ok(0, "unexpected call\n");
1973 static HRESULT WINAPI DocHostUIHandler_TranslateAccelerator(IDocHostUIHandler2 *iface, LPMSG lpMsg,
1974 const GUID *pguidCmdGroup, DWORD nCmdID)
1976 ok(0, "unexpected call\n");
1980 static HRESULT WINAPI DocHostUIHandler_GetOptionKeyPath(IDocHostUIHandler2 *iface,
1981 LPOLESTR *pchKey, DWORD dw)
1983 CHECK_EXPECT(GetOptionKeyPath);
1984 ok(pchKey != NULL, "pchKey = NULL\n");
1985 ok(!dw, "dw=%d, expected 0\n", dw);
1987 ok(!*pchKey, "*pchKey=%p, expected NULL\n", *pchKey);
1991 static HRESULT WINAPI DocHostUIHandler_GetDropTarget(IDocHostUIHandler2 *iface,
1992 IDropTarget *pDropTarget, IDropTarget **ppDropTarget)
1994 CHECK_EXPECT(GetDropTarget);
1999 static HRESULT WINAPI DocHostUIHandler_GetExternal(IDocHostUIHandler2 *iface, IDispatch **ppDispatch)
2001 CHECK_EXPECT(GetExternal);
2002 *ppDispatch = &External;
2006 static HRESULT WINAPI DocHostUIHandler_TranslateUrl(IDocHostUIHandler2 *iface, DWORD dwTranslate,
2007 OLECHAR *pchURLIn, OLECHAR **ppchURLOut)
2009 ok(0, "unexpected call\n");
2013 static HRESULT WINAPI DocHostUIHandler_FilterDataObject(IDocHostUIHandler2 *iface, IDataObject *pDO,
2014 IDataObject **ppPORet)
2016 ok(0, "unexpected call\n");
2020 static HRESULT WINAPI DocHostUIHandler_GetOverrideKeyPath(IDocHostUIHandler2 *iface,
2021 LPOLESTR *pchKey, DWORD dw)
2023 CHECK_EXPECT(GetOverrideKeyPath);
2024 ok(pchKey != NULL, "pchKey = NULL\n");
2026 ok(!*pchKey, "*pchKey=%p, expected NULL\n", *pchKey);
2027 ok(!dw, "dw=%d, xepected 0\n", dw);
2031 static const IDocHostUIHandler2Vtbl DocHostUIHandlerVtbl = {
2032 DocHostUIHandler_QueryInterface,
2033 DocHostUIHandler_AddRef,
2034 DocHostUIHandler_Release,
2035 DocHostUIHandler_ShowContextMenu,
2036 DocHostUIHandler_GetHostInfo,
2037 DocHostUIHandler_ShowUI,
2038 DocHostUIHandler_HideUI,
2039 DocHostUIHandler_UpdateUI,
2040 DocHostUIHandler_EnableModeless,
2041 DocHostUIHandler_OnDocWindowActivate,
2042 DocHostUIHandler_OnFrameWindowActivate,
2043 DocHostUIHandler_ResizeBorder,
2044 DocHostUIHandler_TranslateAccelerator,
2045 DocHostUIHandler_GetOptionKeyPath,
2046 DocHostUIHandler_GetDropTarget,
2047 DocHostUIHandler_GetExternal,
2048 DocHostUIHandler_TranslateUrl,
2049 DocHostUIHandler_FilterDataObject,
2050 DocHostUIHandler_GetOverrideKeyPath
2053 static IDocHostUIHandler2 DocHostUIHandler = { &DocHostUIHandlerVtbl };
2055 static HRESULT WINAPI OleCommandTarget_QueryInterface(IOleCommandTarget *iface,
2056 REFIID riid, void **ppv)
2058 return QueryInterface(riid, ppv);
2061 static ULONG WINAPI OleCommandTarget_AddRef(IOleCommandTarget *iface)
2066 static ULONG WINAPI OleCommandTarget_Release(IOleCommandTarget *iface)
2071 static HRESULT WINAPI OleCommandTarget_QueryStatus(IOleCommandTarget *iface, const GUID *pguidCmdGroup,
2072 ULONG cCmds, OLECMD prgCmds[], OLECMDTEXT *pCmdText)
2074 ok(!pguidCmdGroup, "pguidCmdGroup != MULL\n");
2075 ok(cCmds == 1, "cCmds=%d, expected 1\n", cCmds);
2076 ok(!pCmdText, "pCmdText != NULL\n");
2078 switch(prgCmds[0].cmdID) {
2079 case OLECMDID_SETPROGRESSTEXT:
2080 CHECK_EXPECT(QueryStatus_SETPROGRESSTEXT);
2081 prgCmds[0].cmdf = OLECMDF_ENABLED;
2084 CHECK_EXPECT(QueryStatus_OPEN);
2085 prgCmds[0].cmdf = 0;
2088 CHECK_EXPECT(QueryStatus_NEW);
2089 prgCmds[0].cmdf = 0;
2092 ok(0, "unexpected command %d\n", prgCmds[0].cmdID);
2098 static HRESULT WINAPI OleCommandTarget_Exec(IOleCommandTarget *iface, const GUID *pguidCmdGroup,
2099 DWORD nCmdID, DWORD nCmdexecopt, VARIANT *pvaIn, VARIANT *pvaOut)
2101 if(!pguidCmdGroup || !IsEqualGUID(pguidCmdGroup, &CGID_Explorer))
2102 test_readyState(NULL);
2104 if(!pguidCmdGroup) {
2106 case OLECMDID_SETPROGRESSMAX:
2107 CHECK_EXPECT2(Exec_SETPROGRESSMAX);
2108 ok(nCmdexecopt == OLECMDEXECOPT_DONTPROMPTUSER, "nCmdexecopts=%08x\n", nCmdexecopt);
2109 ok(pvaIn != NULL, "pvaIn == NULL\n");
2111 ok(V_VT(pvaIn) == VT_I4, "V_VT(pvaIn)=%d, expected VT_I4\n", V_VT(pvaIn));
2112 if(load_state == LD_NO)
2113 ok(V_I4(pvaIn) == 0, "V_I4(pvaIn)=%d, expected 0\n", V_I4(pvaIn));
2115 ok(pvaOut == NULL, "pvaOut=%p, expected NULL\n", pvaOut);
2117 case OLECMDID_SETPROGRESSPOS:
2118 CHECK_EXPECT2(Exec_SETPROGRESSPOS);
2119 ok(nCmdexecopt == OLECMDEXECOPT_DONTPROMPTUSER, "nCmdexecopts=%08x\n", nCmdexecopt);
2120 ok(pvaIn != NULL, "pvaIn == NULL\n");
2122 ok(V_VT(pvaIn) == VT_I4, "V_VT(pvaIn)=%d, expected VT_I4\n", V_VT(pvaIn));
2123 if(load_state == LD_NO)
2124 ok(V_I4(pvaIn) == 0, "V_I4(pvaIn)=%d, expected 0\n", V_I4(pvaIn));
2126 ok(pvaOut == NULL, "pvaOut=%p, expected NULL\n", pvaOut);
2128 case OLECMDID_HTTPEQUIV_DONE:
2129 CHECK_EXPECT(Exec_HTTPEQUIV_DONE);
2130 ok(nCmdexecopt == 0, "nCmdexecopts=%08x\n", nCmdexecopt);
2131 ok(pvaOut == NULL, "pvaOut=%p\n", pvaOut);
2132 ok(pvaIn == NULL, "pvaIn=%p\n", pvaIn);
2133 load_state = LD_COMPLETE;
2135 case OLECMDID_SETDOWNLOADSTATE:
2136 ok(nCmdexecopt == OLECMDEXECOPT_DONTPROMPTUSER, "nCmdexecopts=%08x\n", nCmdexecopt);
2137 ok(pvaOut == NULL, "pvaOut=%p\n", pvaOut);
2138 ok(pvaIn != NULL, "pvaIn == NULL\n");
2139 ok(V_VT(pvaIn) == VT_I4, "V_VT(pvaIn)=%d\n", V_VT(pvaIn));
2141 switch(V_I4(pvaIn)) {
2143 CHECK_EXPECT(Exec_SETDOWNLOADSTATE_0);
2144 load_state = LD_INTERACTIVE;
2147 CHECK_EXPECT(Exec_SETDOWNLOADSTATE_1);
2148 readystate_set_interactive = (load_state != LD_INTERACTIVE);
2151 ok(0, "unexpevted V_I4(pvaIn)=%d\n", V_I4(pvaIn));
2155 case OLECMDID_UPDATECOMMANDS:
2156 CHECK_EXPECT(Exec_UPDATECOMMANDS);
2157 ok(nCmdexecopt == OLECMDEXECOPT_DONTPROMPTUSER, "nCmdexecopts=%08x\n", nCmdexecopt);
2158 ok(pvaIn == NULL, "pvaIn=%p\n", pvaIn);
2159 ok(pvaOut == NULL, "pvaOut=%p\n", pvaOut);
2161 case OLECMDID_SETTITLE:
2162 CHECK_EXPECT2(Exec_SETTITLE);
2163 ok(nCmdexecopt == OLECMDEXECOPT_DONTPROMPTUSER, "nCmdexecopts=%08x\n", nCmdexecopt);
2164 ok(pvaIn != NULL, "pvaIn == NULL\n");
2165 ok(pvaOut == NULL, "pvaOut=%p\n", pvaOut);
2166 ok(V_VT(pvaIn) == VT_BSTR, "V_VT(pvaIn)=%d\n", V_VT(pvaIn));
2167 ok(V_BSTR(pvaIn) != NULL, "V_BSTR(pvaIn) == NULL\n"); /* TODO */
2169 case OLECMDID_HTTPEQUIV:
2170 CHECK_EXPECT2(Exec_HTTPEQUIV);
2171 ok(nCmdexecopt == OLECMDEXECOPT_DONTPROMPTUSER, "nCmdexecopts=%08x\n", nCmdexecopt);
2175 ok(0, "unexpected command %d\n", nCmdID);
2180 if(IsEqualGUID(&CGID_ShellDocView, pguidCmdGroup)) {
2181 ok(nCmdexecopt == 0, "nCmdexecopts=%08x\n", nCmdexecopt);
2185 CHECK_EXPECT2(Exec_ShellDocView_37);
2187 if(load_from_stream)
2188 test_GetCurMoniker(doc_unk, NULL, about_blank_url);
2190 test_GetCurMoniker(doc_unk, &Moniker, NULL);
2192 ok(pvaOut == NULL, "pvaOut=%p, expected NULL\n", pvaOut);
2193 ok(pvaIn != NULL, "pvaIn == NULL\n");
2195 ok(V_VT(pvaIn) == VT_I4, "V_VT(pvaIn)=%d, expected VT_I4\n", V_VT(pvaIn));
2196 ok(V_I4(pvaIn) == 0, "V_I4(pvaIn)=%d, expected 0\n", V_I4(pvaIn));
2200 CHECK_EXPECT2(Exec_ShellDocView_84);
2202 ok(pvaIn == NULL, "pvaIn != NULL\n");
2203 ok(pvaOut != NULL, "pvaOut == NULL\n");
2205 ok(V_VT(pvaOut) == VT_EMPTY, "V_VT(pvaOut)=%d\n", V_VT(pvaOut));
2210 CHECK_EXPECT2(Exec_ShellDocView_103);
2212 ok(pvaIn == NULL, "pvaIn != NULL\n");
2213 ok(pvaOut == NULL, "pvaOut != NULL\n");
2218 CHECK_EXPECT2(Exec_ShellDocView_105);
2220 ok(pvaIn != NULL, "pvaIn == NULL\n");
2221 ok(pvaOut == NULL, "pvaOut != NULL\n");
2226 ok(0, "unexpected command %d\n", nCmdID);
2231 if(IsEqualGUID(&CGID_MSHTML, pguidCmdGroup)) {
2232 ok(nCmdexecopt == 0, "nCmdexecopts=%08x\n", nCmdexecopt);
2235 case IDM_PARSECOMPLETE:
2236 CHECK_EXPECT(Exec_MSHTML_PARSECOMPLETE);
2237 ok(pvaIn == NULL, "pvaIn != NULL\n");
2238 ok(pvaOut == NULL, "pvaOut != NULL\n");
2241 ok(0, "unexpected command %d\n", nCmdID);
2245 if(IsEqualGUID(&CGID_DocHostCmdPriv, pguidCmdGroup))
2246 return E_FAIL; /* TODO */
2248 if(IsEqualGUID(&CGID_Explorer, pguidCmdGroup)) {
2249 ok(nCmdexecopt == 0, "nCmdexecopts=%08x\n", nCmdexecopt);
2253 CHECK_EXPECT2(Exec_Explorer_69);
2254 ok(pvaIn == NULL, "pvaIn != NULL\n");
2255 ok(pvaOut != NULL, "pvaOut == NULL\n");
2258 ok(0, "unexpected cmd %d of CGID_Explorer\n", nCmdID);
2263 if(IsEqualGUID(&CGID_DocHostCommandHandler, pguidCmdGroup)) {
2265 case OLECMDID_PAGEACTIONBLOCKED: /* win2k3 */
2266 SET_EXPECT(SetStatusText);
2267 ok(pvaIn == NULL, "pvaIn != NULL\n");
2268 ok(pvaOut == NULL, "pvaOut != NULL\n");
2271 ok(0, "unexpected command %d\n", nCmdID);
2276 ok(0, "unexpected pguidCmdGroup: %s\n", debugstr_guid(pguidCmdGroup));
2280 static IOleCommandTargetVtbl OleCommandTargetVtbl = {
2281 OleCommandTarget_QueryInterface,
2282 OleCommandTarget_AddRef,
2283 OleCommandTarget_Release,
2284 OleCommandTarget_QueryStatus,
2285 OleCommandTarget_Exec
2288 static IOleCommandTarget OleCommandTarget = { &OleCommandTargetVtbl };
2290 static HRESULT WINAPI Dispatch_QueryInterface(IDispatch *iface, REFIID riid, void **ppv)
2292 return QueryInterface(riid, ppv);
2295 static HRESULT WINAPI Dispatch_Invoke(IDispatch *iface, DISPID dispIdMember, REFIID riid,
2296 LCID lcid, WORD wFlags, DISPPARAMS *pDispParams, VARIANT *pVarResult,
2297 EXCEPINFO *pExcepInfo, UINT *puArgErr)
2299 ok(IsEqualGUID(&IID_NULL, riid), "riid != IID_NULL\n");
2300 ok(pDispParams != NULL, "pDispParams == NULL\n");
2301 ok(pExcepInfo == NULL, "pExcepInfo=%p, expected NULL\n", pExcepInfo);
2302 ok(puArgErr != NULL, "puArgErr == NULL\n");
2303 ok(V_VT(pVarResult) == 0, "V_VT(pVarResult)=%d, expected 0\n", V_VT(pVarResult));
2304 ok(wFlags == DISPATCH_PROPERTYGET, "wFlags=%08x, expected DISPATCH_PROPERTYGET\n", wFlags);
2305 test_readyState(NULL);
2307 switch(dispIdMember) {
2308 case DISPID_AMBIENT_USERMODE:
2309 CHECK_EXPECT2(Invoke_AMBIENT_USERMODE);
2310 V_VT(pVarResult) = VT_BOOL;
2311 V_BOOL(pVarResult) = VARIANT_TRUE;
2313 case DISPID_AMBIENT_DLCONTROL:
2314 CHECK_EXPECT2(Invoke_AMBIENT_DLCONTROL);
2316 case DISPID_AMBIENT_OFFLINEIFNOTCONNECTED:
2317 CHECK_EXPECT2(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
2319 case DISPID_AMBIENT_SILENT:
2320 CHECK_EXPECT2(Invoke_AMBIENT_SILENT);
2321 V_VT(pVarResult) = VT_BOOL;
2322 V_BOOL(pVarResult) = VARIANT_FALSE;
2324 case DISPID_AMBIENT_USERAGENT:
2325 CHECK_EXPECT(Invoke_AMBIENT_USERAGENT);
2327 case DISPID_AMBIENT_PALETTE:
2328 CHECK_EXPECT(Invoke_AMBIENT_PALETTE);
2332 ok(0, "unexpected dispid %d\n", dispIdMember);
2336 static IDispatchVtbl DispatchVtbl = {
2337 Dispatch_QueryInterface,
2340 Dispatch_GetTypeInfoCount,
2341 Dispatch_GetTypeInfo,
2342 Dispatch_GetIDsOfNames,
2346 static IDispatch Dispatch = { &DispatchVtbl };
2348 static HRESULT WINAPI ServiceProvider_QueryInterface(IServiceProvider *iface,
2349 REFIID riid, void **ppv)
2351 return QueryInterface(riid, ppv);
2354 static ULONG WINAPI ServiceProvider_AddRef(IServiceProvider *iface)
2359 static ULONG WINAPI ServiceProvider_Release(IServiceProvider *iface)
2364 static HRESULT WINAPI ServiceProvider_QueryService(IServiceProvider *iface, REFGUID guidService,
2365 REFIID riid, void **ppv)
2368 * Services used by HTMLDocument:
2371 * IInternetSecurityManager
2373 * {D5F78C80-5252-11CF-90FA-00AA0042106E}
2376 * {3050F312-98B5-11CF-BB82-00AA00BDCE0B}
2377 * {53A2D5B1-D2FC-11D0-84E0-006097C9987D}
2378 * {AD7F6C62-F6BD-11D2-959B-006097C553C8}
2380 * {6D12FE80-7911-11CF-9534-0000C05BAE0B}
2381 * IElementBehaviorFactory
2382 * {3050F429-98B5-11CF-BB82-00AA00BDCE0B}
2392 if(IsEqualGUID(&IID_IHlinkFrame, guidService)) {
2393 ok(IsEqualGUID(&IID_IHlinkFrame, riid), "unexpected riid\n");
2398 return E_NOINTERFACE;
2401 static const IServiceProviderVtbl ServiceProviderVtbl = {
2402 ServiceProvider_QueryInterface,
2403 ServiceProvider_AddRef,
2404 ServiceProvider_Release,
2405 ServiceProvider_QueryService
2408 static IServiceProvider ServiceProvider = { &ServiceProviderVtbl };
2410 DEFINE_GUID(IID_unk1, 0xD48A6EC6,0x6A4A,0x11CF,0x94,0xA7,0x44,0x45,0x53,0x54,0x00,0x00); /* HTMLWindow2 ? */
2411 DEFINE_GUID(IID_unk2, 0x7BB0B520,0xB1A7,0x11D2,0xBB,0x23,0x00,0xC0,0x4F,0x79,0xAB,0xCD);
2412 DEFINE_GUID(IID_unk3, 0x000670BA,0x0000,0x0000,0xC0,0x00,0x00,0x00,0x00,0x00,0x00,0x46);
2413 DEFINE_GUID(IID_unk4, 0x305104a6,0x98b5,0x11cf,0xbb,0x82,0x00,0xaa,0x00,0xbd,0xce,0x0b);
2415 static HRESULT QueryInterface(REFIID riid, void **ppv)
2419 if(IsEqualGUID(&IID_IUnknown, riid) || IsEqualGUID(&IID_IOleClientSite, riid))
2421 else if(IsEqualGUID(&IID_IOleDocumentSite, riid))
2422 *ppv = &DocumentSite;
2423 else if(IsEqualGUID(&IID_IDocHostUIHandler, riid) || IsEqualGUID(&IID_IDocHostUIHandler2, riid))
2424 *ppv = &DocHostUIHandler;
2425 else if(IsEqualGUID(&IID_IOleContainer, riid))
2426 *ppv = &OleContainer;
2427 else if(IsEqualGUID(&IID_IOleWindow, riid) || IsEqualGUID(&IID_IOleInPlaceSite, riid))
2428 *ppv = &InPlaceSiteEx;
2429 else if(IsEqualGUID(&IID_IOleCommandTarget , riid))
2430 *ppv = &OleCommandTarget;
2431 else if(IsEqualGUID(&IID_IDispatch, riid))
2433 else if(IsEqualGUID(&IID_IServiceProvider, riid))
2434 *ppv = &ServiceProvider;
2435 else if(IsEqualGUID(&IID_IOleInPlaceSiteEx, riid))
2436 *ppv = ipsex ? &InPlaceSiteEx : NULL;
2437 else if(IsEqualGUID(&IID_IOleControlSite, riid))
2438 *ppv = &OleControlSite;
2439 else if(IsEqualGUID(&IID_IDocHostShowUI, riid))
2440 return E_NOINTERFACE; /* TODO */
2441 else if(IsEqualGUID(&IID_IProxyManager, riid))
2442 return E_NOINTERFACE; /* ? */
2443 else if(IsEqualGUID(&IID_unk1, riid))
2444 return E_NOINTERFACE; /* HTMLWindow2 ? */
2445 else if(IsEqualGUID(&IID_unk2, riid))
2446 return E_NOINTERFACE; /* ? */
2447 else if(IsEqualGUID(&IID_unk3, riid))
2448 return E_NOINTERFACE; /* ? */
2449 else if(IsEqualGUID(&IID_unk4, riid))
2450 return E_NOINTERFACE; /* ? */
2452 ok(0, "unexpected riid %s\n", debugstr_guid(riid));
2456 return E_NOINTERFACE;
2459 static LRESULT WINAPI wnd_proc(HWND hwnd, UINT msg, WPARAM wParam, LPARAM lParam)
2461 return DefWindowProc(hwnd, msg, wParam, lParam);
2464 static void _test_readyState(unsigned line, IUnknown *unk)
2466 IHTMLDocument2 *htmldoc;
2467 DISPPARAMS dispparams;
2472 static const WCHAR wszUninitialized[] = {'u','n','i','n','i','t','i','a','l','i','z','e','d',0};
2473 static const WCHAR wszLoading[] = {'l','o','a','d','i','n','g',0};
2474 static const WCHAR wszInteractive[] = {'i','n','t','e','r','a','c','t','i','v','e',0};
2475 static const WCHAR wszComplete[] = {'c','o','m','p','l','e','t','e',0};
2477 static const LPCWSTR expected_state[] = {
2489 hres = IUnknown_QueryInterface(unk, &IID_IHTMLDocument2, (void**)&htmldoc);
2490 ok(hres == S_OK, "QueryInterface(IID_IHTMLDocument2) failed: %08x\n", hres);
2494 hres = IHTMLDocument2_get_readyState(htmldoc, NULL);
2495 ok(hres == E_POINTER, "get_readyState failed: %08x, expected\n", hres);
2497 hres = IHTMLDocument2_get_readyState(htmldoc, &state);
2498 ok(hres == S_OK, "get_ReadyState failed: %08x\n", hres);
2500 (!lstrcmpW(state, expected_state[load_state]), "unexpected state %s, expected %d\n",
2501 wine_dbgstr_w(state), load_state);
2502 SysFreeString(state);
2504 dispparams.cArgs = 0;
2505 dispparams.cNamedArgs = 0;
2506 dispparams.rgdispidNamedArgs = NULL;
2507 dispparams.rgvarg = NULL;
2511 hres = IHTMLDocument2_Invoke(htmldoc, DISPID_READYSTATE, &IID_NULL, 0, DISPATCH_PROPERTYGET,
2512 &dispparams, &out, NULL, NULL);
2513 ok(hres == S_OK, "Invoke(DISPID_READYSTATE) failed: %08x\n", hres);
2515 ok_(__FILE__,line) (V_VT(&out) == VT_I4, "V_VT(out)=%d\n", V_VT(&out));
2516 ok_(__FILE__,line) (V_I4(&out) == load_state%5, "VT_I4(out)=%d, expected %d\n", V_I4(&out), load_state%5);
2518 IHTMLDocument2_Release(htmldoc);
2521 static void test_ConnectionPoint(IConnectionPointContainer *container, REFIID riid)
2523 IConnectionPointContainer *tmp_container = NULL;
2524 IConnectionPoint *cp;
2528 hres = IConnectionPointContainer_FindConnectionPoint(container, riid, &cp);
2529 ok(hres == S_OK, "FindConnectionPoint failed: %08x\n", hres);
2533 hres = IConnectionPoint_GetConnectionInterface(cp, &iid);
2534 ok(hres == S_OK, "GetConnectionInterface failed: %08x\n", hres);
2535 ok(IsEqualGUID(riid, &iid), "wrong iid\n");
2537 hres = IConnectionPoint_GetConnectionInterface(cp, NULL);
2538 ok(hres == E_POINTER, "GetConnectionInterface failed: %08x, expected E_POINTER\n", hres);
2540 hres = IConnectionPoint_GetConnectionPointContainer(cp, &tmp_container);
2541 ok(hres == S_OK, "GetConnectionPointContainer failed: %08x\n", hres);
2542 ok(tmp_container == container, "container != tmp_container\n");
2544 IConnectionPointContainer_Release(tmp_container);
2546 hres = IConnectionPoint_GetConnectionPointContainer(cp, NULL);
2547 ok(hres == E_POINTER, "GetConnectionPointContainer failed: %08x, expected E_POINTER\n", hres);
2549 if(IsEqualGUID(&IID_IPropertyNotifySink, riid)) {
2552 hres = IConnectionPoint_Advise(cp, (IUnknown*)&PropertyNotifySink, &cookie);
2553 ok(hres == S_OK, "Advise failed: %08x\n", hres);
2556 IConnectionPoint_Release(cp);
2559 static void test_ConnectionPointContainer(IUnknown *unk)
2561 IConnectionPointContainer *container;
2564 hres = IUnknown_QueryInterface(unk, &IID_IConnectionPointContainer, (void**)&container);
2565 ok(hres == S_OK, "QueryInterface(IID_IConnectionPointContainer) failed: %08x\n", hres);
2569 test_ConnectionPoint(container, &IID_IPropertyNotifySink);
2570 test_ConnectionPoint(container, &DIID_HTMLDocumentEvents);
2571 test_ConnectionPoint(container, &DIID_HTMLDocumentEvents2);
2573 IConnectionPointContainer_Release(container);
2576 static void test_GetCurMoniker(IUnknown *unk, IMoniker *exmon, LPCWSTR exurl)
2578 IHTMLDocument2 *doc;
2579 IPersistMoniker *permon;
2580 IMoniker *mon = (void*)0xdeadbeef;
2581 BSTR doc_url = (void*)0xdeadbeef;
2584 hres = IUnknown_QueryInterface(unk, &IID_IPersistMoniker, (void**)&permon);
2585 ok(hres == S_OK, "QueryInterface(IID_IPersistMoniker) failed: %08x\n", hres);
2589 hres = IUnknown_QueryInterface(unk, &IID_IHTMLDocument2, (void**)&doc);
2590 ok(hres == S_OK, "QueryInterface(IID_IHTMLDocument2) failed: %08x\n", hres);
2592 hres = IHTMLDocument2_get_URL(doc, &doc_url);
2593 ok(hres == S_OK, "get_URL failed: %08x\n", hres);
2595 hres = IPersistMoniker_GetCurMoniker(permon, &mon);
2596 IPersistMoniker_Release(permon);
2600 BOOL exb = expect_GetDisplayName;
2601 BOOL clb = called_GetDisplayName;
2603 ok(hres == S_OK, "GetCurrentMoniker failed: %08x\n", hres);
2604 ok(mon == exmon, "mon(%p) != exmon(%p)\n", mon, exmon);
2606 SET_EXPECT(GetDisplayName);
2607 hres = IMoniker_GetDisplayName(mon, NULL, NULL, &url);
2608 ok(hres == S_OK, "GetDisplayName failed: %08x\n", hres);
2609 CHECK_CALLED(GetDisplayName);
2610 expect_GetDisplayName = exb;
2611 called_GetDisplayName = clb;
2613 ok(!lstrcmpW(url, doc_url), "url != doc_url\n");
2618 ok(hres == S_OK, "GetCurrentMoniker failed: %08x\n", hres);
2620 hres = IMoniker_GetDisplayName(mon, NULL, NULL, &url);
2621 ok(hres == S_OK, "GetDisplayName failed: %08x\n", hres);
2623 ok(!lstrcmpW(url, exurl), "unexpected url\n");
2624 ok(!lstrcmpW(url, doc_url), "url != doc_url\n");
2628 ok(hres == E_UNEXPECTED,
2629 "GetCurrentMoniker failed: %08x, expected E_UNEXPECTED\n", hres);
2630 ok(mon == (IMoniker*)0xdeadbeef, "mon=%p\n", mon);
2631 ok(!lstrcmpW(doc_url, about_blank_url), "doc_url is not about:blank\n");
2634 SysFreeString(doc_url);
2635 IHTMLDocument_Release(doc);
2636 if(mon && mon != (void*)0xdeadbeef)
2637 IMoniker_Release(mon);
2640 static void test_Load(IPersistMoniker *persist)
2644 WCHAR sz_html_clientsite_objectparam[MAX_PATH];
2646 lstrcpyW(sz_html_clientsite_objectparam, SZ_HTML_CLIENTSITE_OBJECTPARAM);
2648 test_readyState((IUnknown*)persist);
2650 CreateBindCtx(0, &bind);
2651 IBindCtx_RegisterObjectParam(bind, sz_html_clientsite_objectparam,
2652 (IUnknown*)&ClientSite);
2654 SET_EXPECT(GetDisplayName);
2655 if(!set_clientsite) {
2656 SET_EXPECT(Invoke_AMBIENT_USERMODE);
2657 SET_EXPECT(GetHostInfo);
2658 SET_EXPECT(Invoke_AMBIENT_DLCONTROL);
2659 SET_EXPECT(Invoke_AMBIENT_SILENT);
2660 SET_EXPECT(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
2661 SET_EXPECT(Invoke_AMBIENT_USERAGENT);
2662 SET_EXPECT(Invoke_AMBIENT_PALETTE);
2663 SET_EXPECT(GetOptionKeyPath);
2664 SET_EXPECT(GetOverrideKeyPath);
2665 SET_EXPECT(GetWindow);
2666 SET_EXPECT(QueryStatus_SETPROGRESSTEXT);
2667 SET_EXPECT(Exec_SETPROGRESSMAX);
2668 SET_EXPECT(Exec_SETPROGRESSPOS);
2669 SET_EXPECT(Exec_ShellDocView_37);
2671 if(!container_locked) {
2672 SET_EXPECT(GetContainer);
2673 SET_EXPECT(LockContainer);
2675 SET_EXPECT(OnChanged_READYSTATE);
2676 SET_EXPECT(Exec_ShellDocView_84);
2677 SET_EXPECT(IsSystemMoniker);
2678 SET_EXPECT(BindToStorage);
2679 SET_EXPECT(SetActiveObject);
2680 if(set_clientsite) {
2681 SET_EXPECT(Invoke_AMBIENT_SILENT);
2682 SET_EXPECT(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
2683 SET_EXPECT(Exec_ShellDocView_37);
2685 load_state = LD_DOLOAD;
2686 expect_LockContainer_fLock = TRUE;
2687 readystate_set_loading = TRUE;
2689 hres = IPersistMoniker_Load(persist, FALSE, &Moniker, bind, 0x12);
2690 ok(hres == S_OK, "Load failed: %08x\n", hres);
2692 CHECK_CALLED(GetDisplayName);
2693 if(!set_clientsite) {
2694 CHECK_CALLED(Invoke_AMBIENT_USERMODE);
2695 CHECK_CALLED(GetHostInfo);
2696 CHECK_CALLED(Invoke_AMBIENT_DLCONTROL);
2697 CHECK_CALLED(Invoke_AMBIENT_SILENT);
2698 CHECK_CALLED(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
2699 CHECK_CALLED(Invoke_AMBIENT_USERAGENT);
2700 CHECK_CALLED(Invoke_AMBIENT_PALETTE);
2701 CHECK_CALLED(GetOptionKeyPath);
2702 CHECK_CALLED(GetOverrideKeyPath);
2703 CHECK_CALLED(GetWindow);
2704 CHECK_CALLED(QueryStatus_SETPROGRESSTEXT);
2705 CHECK_CALLED(Exec_SETPROGRESSMAX);
2706 CHECK_CALLED(Exec_SETPROGRESSPOS);
2707 CHECK_CALLED(Exec_ShellDocView_37);
2709 if(!container_locked) {
2710 CHECK_CALLED(GetContainer);
2711 CHECK_CALLED(LockContainer);
2712 container_locked = TRUE;
2714 CHECK_CALLED(OnChanged_READYSTATE);
2715 SET_CALLED(IsSystemMoniker); /* IE7 */
2716 SET_CALLED(Exec_ShellDocView_84);
2717 CHECK_CALLED(BindToStorage);
2718 SET_CALLED(SetActiveObject); /* FIXME */
2719 if(set_clientsite) {
2720 CHECK_CALLED(Invoke_AMBIENT_SILENT);
2721 CHECK_CALLED(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
2722 CHECK_CALLED(Exec_ShellDocView_37);
2725 set_clientsite = container_locked = TRUE;
2727 test_GetCurMoniker((IUnknown*)persist, &Moniker, NULL);
2729 IBindCtx_Release(bind);
2731 test_readyState((IUnknown*)persist);
2734 static void test_download(BOOL verb_done, BOOL css_dwl, BOOL css_try_dwl)
2739 hwnd = FindWindowA("Internet Explorer_Hidden", NULL);
2740 ok(hwnd != NULL, "Could not find hidden window\n");
2742 test_readyState(NULL);
2745 SET_EXPECT(Exec_SETPROGRESSMAX);
2746 if(!load_from_stream)
2747 SET_EXPECT(GetHostInfo);
2749 SET_EXPECT(SetStatusText);
2750 SET_EXPECT(Exec_SETDOWNLOADSTATE_1);
2751 SET_EXPECT(GetDropTarget);
2753 SET_EXPECT(Exec_ShellDocView_84);
2755 SET_EXPECT(CreateInstance);
2757 SET_EXPECT(LockRequest);
2758 SET_EXPECT(Terminate);
2759 SET_EXPECT(Protocol_Read);
2760 SET_EXPECT(UnlockRequest);
2762 SET_EXPECT(Exec_Explorer_69);
2763 SET_EXPECT(EnableModeless_TRUE); /* IE7 */
2764 SET_EXPECT(Frame_EnableModeless_TRUE); /* IE7 */
2765 SET_EXPECT(EnableModeless_FALSE); /* IE7 */
2766 SET_EXPECT(Frame_EnableModeless_FALSE); /* IE7 */
2767 SET_EXPECT(OnChanged_1005);
2768 SET_EXPECT(OnChanged_READYSTATE);
2769 SET_EXPECT(Exec_SETPROGRESSPOS);
2770 SET_EXPECT(Exec_SETDOWNLOADSTATE_0);
2771 SET_EXPECT(Exec_ShellDocView_103);
2772 SET_EXPECT(Exec_ShellDocView_105);
2773 SET_EXPECT(Exec_MSHTML_PARSECOMPLETE);
2774 SET_EXPECT(Exec_HTTPEQUIV_DONE);
2775 SET_EXPECT(SetStatusText);
2776 expect_status_text = (LPWSTR)0xdeadbeef; /* TODO */
2778 while(!called_Exec_HTTPEQUIV_DONE && GetMessage(&msg, NULL, 0, 0)) {
2779 TranslateMessage(&msg);
2780 DispatchMessage(&msg);
2784 CHECK_CALLED(Exec_SETPROGRESSMAX);
2785 if(!load_from_stream)
2786 CHECK_CALLED(GetHostInfo);
2788 CHECK_CALLED(SetStatusText);
2789 CHECK_CALLED(Exec_SETDOWNLOADSTATE_1);
2790 CHECK_CALLED(GetDropTarget);
2792 SET_CALLED(Exec_ShellDocView_84);
2794 if(called_CreateInstance) {
2795 CHECK_CALLED(CreateInstance);
2796 CHECK_CALLED(Start);
2797 CHECK_CALLED(LockRequest);
2798 CHECK_CALLED(Terminate);
2799 CHECK_CALLED(Protocol_Read);
2800 CHECK_CALLED(UnlockRequest);
2802 skip("CreateInstance not called. Assuming no Gecko installed.\n");
2804 SET_CALLED(Exec_ShellDocView_84);
2805 SET_CALLED(CreateInstance);
2807 SET_CALLED(LockRequest);
2808 SET_CALLED(Terminate);
2809 SET_CALLED(Protocol_Read);
2810 SET_CALLED(UnlockRequest);
2815 SET_CALLED(Exec_Explorer_69);
2816 SET_CALLED(EnableModeless_TRUE); /* IE7 */
2817 SET_CALLED(Frame_EnableModeless_TRUE); /* IE7 */
2818 SET_CALLED(EnableModeless_FALSE); /* IE7 */
2819 SET_CALLED(Frame_EnableModeless_FALSE); /* IE7 */
2820 CHECK_CALLED(OnChanged_1005);
2821 CHECK_CALLED(OnChanged_READYSTATE);
2822 CHECK_CALLED(Exec_SETPROGRESSPOS);
2823 CHECK_CALLED(Exec_SETDOWNLOADSTATE_0);
2824 SET_CALLED(Exec_ShellDocView_103);
2825 SET_CALLED(Exec_ShellDocView_105);
2826 CHECK_CALLED(Exec_MSHTML_PARSECOMPLETE);
2827 CHECK_CALLED(Exec_HTTPEQUIV_DONE);
2828 SET_CALLED(SetStatusText);
2830 load_state = LD_COMPLETE;
2832 test_readyState(NULL);
2835 static void test_Persist(IUnknown *unk)
2837 IPersistMoniker *persist_mon;
2838 IPersistFile *persist_file;
2842 hres = IUnknown_QueryInterface(unk, &IID_IPersistFile, (void**)&persist_file);
2843 ok(hres == S_OK, "QueryInterface(IID_IPersist) failed: %08x\n", hres);
2844 if(SUCCEEDED(hres)) {
2845 hres = IPersist_GetClassID(persist_file, NULL);
2846 ok(hres == E_INVALIDARG, "GetClassID returned: %08x, expected E_INVALIDARG\n", hres);
2848 hres = IPersist_GetClassID(persist_file, &guid);
2849 ok(hres == S_OK, "GetClassID failed: %08x\n", hres);
2850 ok(IsEqualGUID(&CLSID_HTMLDocument, &guid), "guid != CLSID_HTMLDocument\n");
2852 IPersist_Release(persist_file);
2855 hres = IUnknown_QueryInterface(unk, &IID_IPersistMoniker, (void**)&persist_mon);
2856 ok(hres == S_OK, "QueryInterface(IID_IPersistMoniker) failed: %08x\n", hres);
2857 if(SUCCEEDED(hres)) {
2858 hres = IPersistMoniker_GetClassID(persist_mon, NULL);
2859 ok(hres == E_INVALIDARG, "GetClassID returned: %08x, expected E_INVALIDARG\n", hres);
2861 hres = IPersistMoniker_GetClassID(persist_mon, &guid);
2862 ok(hres == S_OK, "GetClassID failed: %08x\n", hres);
2863 ok(IsEqualGUID(&CLSID_HTMLDocument, &guid), "guid != CLSID_HTMLDocument\n");
2865 if(load_state == LD_DOLOAD)
2866 test_Load(persist_mon);
2868 test_readyState(unk);
2870 IPersistMoniker_Release(persist_mon);
2874 static const OLECMDF expect_cmds[OLECMDID_GETPRINTTEMPLATE+1] = {
2876 OLECMDF_SUPPORTED, /* OLECMDID_OPEN */
2877 OLECMDF_SUPPORTED, /* OLECMDID_NEW */
2878 OLECMDF_SUPPORTED, /* OLECMDID_SAVE */
2879 OLECMDF_SUPPORTED|OLECMDF_ENABLED, /* OLECMDID_SAVEAS */
2880 OLECMDF_SUPPORTED, /* OLECMDID_SAVECOPYAS */
2881 OLECMDF_SUPPORTED|OLECMDF_ENABLED, /* OLECMDID_PRINT */
2882 OLECMDF_SUPPORTED|OLECMDF_ENABLED, /* OLECMDID_PRINTPREVIEW */
2883 OLECMDF_SUPPORTED|OLECMDF_ENABLED, /* OLECMDID_PAGESETUP */
2884 OLECMDF_SUPPORTED, /* OLECMDID_SPELL */
2885 OLECMDF_SUPPORTED|OLECMDF_ENABLED, /* OLECMDID_PROPERTIES */
2886 OLECMDF_SUPPORTED, /* OLECMDID_CUT */
2887 OLECMDF_SUPPORTED, /* OLECMDID_COPY */
2888 OLECMDF_SUPPORTED, /* OLECMDID_PASTE */
2889 OLECMDF_SUPPORTED, /* OLECMDID_PASTESPECIAL */
2890 OLECMDF_SUPPORTED, /* OLECMDID_UNDO */
2891 OLECMDF_SUPPORTED, /* OLECMDID_REDO */
2892 OLECMDF_SUPPORTED|OLECMDF_ENABLED, /* OLECMDID_SELECTALL */
2893 OLECMDF_SUPPORTED, /* OLECMDID_CLEARSELECTION */
2894 OLECMDF_SUPPORTED, /* OLECMDID_ZOOM */
2895 OLECMDF_SUPPORTED, /* OLECMDID_GETZOOMRANGE */
2897 OLECMDF_SUPPORTED|OLECMDF_ENABLED, /* OLECMDID_REFRESH */
2898 OLECMDF_SUPPORTED|OLECMDF_ENABLED, /* OLECMDID_STOP */
2900 OLECMDF_SUPPORTED, /* OLECMDID_STOPDOWNLOAD */
2902 OLECMDF_SUPPORTED, /* OLECMDID_DELETE */
2904 OLECMDF_SUPPORTED, /* OLECMDID_ENABLE_INTERACTION */
2905 OLECMDF_SUPPORTED, /* OLECMDID_ONUNLOAD */
2907 OLECMDF_SUPPORTED, /* OLECMDID_SHOWPAGESETUP */
2908 OLECMDF_SUPPORTED, /* OLECMDID_SHOWPRINT */
2910 OLECMDF_SUPPORTED, /* OLECMDID_CLOSE */
2912 OLECMDF_SUPPORTED, /* OLECMDID_SETPRINTTEMPLATE */
2913 OLECMDF_SUPPORTED /* OLECMDID_GETPRINTTEMPLATE */
2916 #define test_QueryStatus(u,cgid,cmdid,cmdf) _test_QueryStatus(__LINE__,u,cgid,cmdid,cmdf)
2917 static void _test_QueryStatus(unsigned line, IUnknown *unk, REFIID cgid, ULONG cmdid, DWORD cmdf)
2919 IOleCommandTarget *cmdtrg;
2920 OLECMD olecmd = {cmdid, 0};
2923 hres = IUnknown_QueryInterface(unk, &IID_IOleCommandTarget, (void**)&cmdtrg);
2924 ok_(__FILE__,line) (hres == S_OK, "QueryInterface(IID_IOleCommandTarget failed: %08x\n", hres);
2928 hres = IOleCommandTarget_QueryStatus(cmdtrg, cgid, 1, &olecmd, NULL);
2929 ok(hres == S_OK, "QueryStatus(%u) failed: %08x\n", cmdid, hres);
2931 IOleCommandTarget_Release(cmdtrg);
2933 ok_(__FILE__,line) (olecmd.cmdID == cmdid, "cmdID changed\n");
2934 ok_(__FILE__,line) (olecmd.cmdf == cmdf, "(%u) cmdf=%08x, expected %08x\n", cmdid, olecmd.cmdf, cmdf);
2937 static void test_MSHTML_QueryStatus(IUnknown *unk, DWORD cmdf)
2942 test_QueryStatus(unk, &CGID_MSHTML, IDM_FONTNAME, cmdf);
2943 test_QueryStatus(unk, &CGID_MSHTML, IDM_FONTSIZE, cmdf);
2944 test_QueryStatus(unk, &CGID_MSHTML, IDM_SELECTALL, cmdf|OLECMDF_ENABLED);
2945 test_QueryStatus(unk, &CGID_MSHTML, IDM_BOLD, cmdf);
2946 test_QueryStatus(unk, &CGID_MSHTML, IDM_FORECOLOR, cmdf);
2947 test_QueryStatus(unk, &CGID_MSHTML, IDM_JUSTIFYCENTER, cmdf);
2948 test_QueryStatus(unk, &CGID_MSHTML, IDM_JUSTIFYLEFT, cmdf);
2949 test_QueryStatus(unk, &CGID_MSHTML, IDM_JUSTIFYRIGHT, cmdf);
2950 test_QueryStatus(unk, &CGID_MSHTML, IDM_ITALIC, cmdf);
2951 test_QueryStatus(unk, &CGID_MSHTML, IDM_UNDERLINE, cmdf);
2952 test_QueryStatus(unk, &CGID_MSHTML, IDM_HORIZONTALLINE, cmdf);
2953 test_QueryStatus(unk, &CGID_MSHTML, IDM_ORDERLIST, cmdf);
2954 test_QueryStatus(unk, &CGID_MSHTML, IDM_UNORDERLIST, cmdf);
2955 test_QueryStatus(unk, &CGID_MSHTML, IDM_INDENT, cmdf);
2956 test_QueryStatus(unk, &CGID_MSHTML, IDM_OUTDENT, cmdf);
2957 test_QueryStatus(unk, &CGID_MSHTML, IDM_DELETE, cmdf);
2960 static void test_OleCommandTarget(IUnknown *unk)
2962 IOleCommandTarget *cmdtrg;
2963 OLECMD cmds[OLECMDID_GETPRINTTEMPLATE];
2967 hres = IUnknown_QueryInterface(unk, &IID_IOleCommandTarget, (void**)&cmdtrg);
2968 ok(hres == S_OK, "QueryInterface(IID_IOleCommandTarget failed: %08x\n", hres);
2972 for(i=0; i<OLECMDID_GETPRINTTEMPLATE; i++) {
2973 cmds[i].cmdID = i+1;
2974 cmds[i].cmdf = 0xf0f0;
2977 SET_EXPECT(QueryStatus_OPEN);
2978 SET_EXPECT(QueryStatus_NEW);
2979 hres = IOleCommandTarget_QueryStatus(cmdtrg, NULL, sizeof(cmds)/sizeof(cmds[0]), cmds, NULL);
2980 ok(hres == S_OK, "QueryStatus failed: %08x\n", hres);
2981 CHECK_CALLED(QueryStatus_OPEN);
2982 CHECK_CALLED(QueryStatus_NEW);
2984 for(i=0; i<OLECMDID_GETPRINTTEMPLATE; i++) {
2985 ok(cmds[i].cmdID == i+1, "cmds[%d].cmdID canged to %x\n", i, cmds[i].cmdID);
2986 if(i+1 == OLECMDID_FIND)
2988 ok(cmds[i].cmdf == expect_cmds[i+1], "cmds[%d].cmdf=%x, expected %x\n",
2989 i+1, cmds[i].cmdf, expect_cmds[i+1]);
2992 ok(!cmds[OLECMDID_FIND-1].cmdf || cmds[OLECMDID_FIND-1].cmdf == (OLECMDF_SUPPORTED|OLECMDF_ENABLED),
2993 "cmds[OLECMDID_FIND].cmdf=%x\n", cmds[OLECMDID_FIND-1].cmdf);
2995 IOleCommandTarget_Release(cmdtrg);
2998 static void test_OleCommandTarget_fail(IUnknown *unk)
3000 IOleCommandTarget *cmdtrg;
3005 {OLECMDID_OPEN, 0xf0f0},
3006 {OLECMDID_GETPRINTTEMPLATE+1, 0xf0f0}
3009 hres = IUnknown_QueryInterface(unk, &IID_IOleCommandTarget, (void**)&cmdtrg);
3010 ok(hres == S_OK, "QueryInterface(IIDIOleCommandTarget failed: %08x\n", hres);
3014 hres = IOleCommandTarget_QueryStatus(cmdtrg, NULL, 0, NULL, NULL);
3015 ok(hres == S_OK, "QueryStatus failed: %08x\n", hres);
3017 SET_EXPECT(QueryStatus_OPEN);
3018 hres = IOleCommandTarget_QueryStatus(cmdtrg, NULL, 2, cmd, NULL);
3019 CHECK_CALLED(QueryStatus_OPEN);
3021 ok(hres == OLECMDERR_E_NOTSUPPORTED,
3022 "QueryStatus failed: %08x, expected OLECMDERR_E_NOTSUPPORTED\n", hres);
3023 ok(cmd[1].cmdID == OLECMDID_GETPRINTTEMPLATE+1,
3024 "cmd[0].cmdID=%d, expected OLECMDID_GETPRINTTEMPLATE+1\n", cmd[0].cmdID);
3025 ok(cmd[1].cmdf == 0, "cmd[0].cmdf=%x, expected 0\n", cmd[0].cmdf);
3026 ok(cmd[0].cmdf == OLECMDF_SUPPORTED,
3027 "cmd[1].cmdf=%x, expected OLECMDF_SUPPORTED\n", cmd[1].cmdf);
3029 hres = IOleCommandTarget_QueryStatus(cmdtrg, &IID_IHTMLDocument2, 2, cmd, NULL);
3030 ok(hres == OLECMDERR_E_UNKNOWNGROUP,
3031 "QueryStatus failed: %08x, expected OLECMDERR_E_UNKNOWNGROUP\n", hres);
3033 for(i=0; i<OLECMDID_GETPRINTTEMPLATE; i++) {
3034 if(!expect_cmds[i]) {
3035 hres = IOleCommandTarget_Exec(cmdtrg, NULL, OLECMDID_UPDATECOMMANDS,
3036 OLECMDEXECOPT_DODEFAULT, NULL, NULL);
3037 ok(hres == OLECMDERR_E_NOTSUPPORTED,
3038 "Exec failed: %08x, expected OLECMDERR_E_NOTSUPPORTED\n", hres);
3042 hres = IOleCommandTarget_Exec(cmdtrg, NULL, OLECMDID_GETPRINTTEMPLATE+1,
3043 OLECMDEXECOPT_DODEFAULT, NULL, NULL);
3044 ok(hres == OLECMDERR_E_NOTSUPPORTED,
3045 "Exec failed: %08x, expected OLECMDERR_E_NOTSUPPORTED\n", hres);
3047 IOleCommandTarget_Release(cmdtrg);
3050 static void test_exec_onunload(IUnknown *unk)
3052 IOleCommandTarget *cmdtrg;
3056 hres = IUnknown_QueryInterface(unk, &IID_IOleCommandTarget, (void**)&cmdtrg);
3057 ok(hres == S_OK, "QueryInterface(IID_IOleCommandTarget) failed: %08x\n", hres);
3061 memset(&var, 0x0a, sizeof(var));
3062 hres = IOleCommandTarget_Exec(cmdtrg, NULL, OLECMDID_ONUNLOAD,
3063 OLECMDEXECOPT_DODEFAULT, NULL, &var);
3064 ok(hres == S_OK, "Exec(..., OLECMDID_ONUNLOAD, ...) failed: %08x\n", hres);
3065 ok(V_VT(&var) == VT_BOOL, "V_VT(var)=%d, expected VT_BOOL\n", V_VT(&var));
3066 ok(V_BOOL(&var) == VARIANT_TRUE, "V_BOOL(var)=%x, expected VARIANT_TRUE\n", V_BOOL(&var));
3068 hres = IOleCommandTarget_Exec(cmdtrg, NULL, OLECMDID_ONUNLOAD,
3069 OLECMDEXECOPT_DODEFAULT, NULL, NULL);
3070 ok(hres == S_OK, "Exec(..., OLECMDID_ONUNLOAD, ...) failed: %08x\n", hres);
3072 IOleCommandTarget_Release(cmdtrg);
3075 static void test_exec_editmode(IUnknown *unk, BOOL loaded)
3077 IOleCommandTarget *cmdtrg;
3080 hres = IUnknown_QueryInterface(unk, &IID_IOleCommandTarget, (void**)&cmdtrg);
3081 ok(hres == S_OK, "QueryInterface(IID_IOleCommandTarget) failed: %08x\n", hres);
3088 load_state = LD_DOLOAD;
3091 SET_EXPECT(GetClassID);
3092 SET_EXPECT(SetStatusText);
3093 SET_EXPECT(Exec_ShellDocView_37);
3094 SET_EXPECT(GetHostInfo);
3096 SET_EXPECT(GetDisplayName);
3097 SET_EXPECT(Invoke_AMBIENT_SILENT);
3098 SET_EXPECT(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
3099 SET_EXPECT(OnChanged_READYSTATE);
3100 SET_EXPECT(IsSystemMoniker);
3101 SET_EXPECT(Exec_ShellDocView_84);
3103 SET_EXPECT(BindToStorage);
3104 SET_EXPECT(InPlaceUIWindow_SetActiveObject);
3107 SET_EXPECT(InPlaceFrame_SetBorderSpace);
3109 expect_status_text = NULL;
3110 readystate_set_loading = TRUE;
3112 hres = IOleCommandTarget_Exec(cmdtrg, &CGID_MSHTML, IDM_EDITMODE,
3113 OLECMDEXECOPT_DODEFAULT, NULL, NULL);
3114 ok(hres == S_OK, "Exec failed: %08x\n", hres);
3117 CHECK_CALLED(GetClassID);
3118 CHECK_CALLED(SetStatusText);
3119 CHECK_CALLED(Exec_ShellDocView_37);
3120 CHECK_CALLED(GetHostInfo);
3122 CHECK_CALLED(GetDisplayName);
3123 CHECK_CALLED(Invoke_AMBIENT_SILENT);
3124 CHECK_CALLED(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
3125 CHECK_CALLED(OnChanged_READYSTATE);
3126 SET_CALLED(IsSystemMoniker); /* IE7 */
3127 SET_CALLED(Exec_ShellDocView_84);
3129 CHECK_CALLED(BindToStorage);
3130 CHECK_CALLED(InPlaceUIWindow_SetActiveObject);
3131 CHECK_CALLED(HideUI);
3132 CHECK_CALLED(ShowUI);
3133 CHECK_CALLED(InPlaceFrame_SetBorderSpace);
3135 test_timer(EXPECT_UPDATEUI|EXPECT_SETTITLE);
3137 IOleCommandTarget_Release(cmdtrg);
3139 hres = IOleCommandTarget_Exec(cmdtrg, &CGID_MSHTML, IDM_EDITMODE,
3140 OLECMDEXECOPT_DODEFAULT, NULL, NULL);
3141 ok(hres == S_OK, "Exec failed: %08x\n", hres);
3144 static void test_exec_fontname(IUnknown *unk, LPCWSTR name, LPCWSTR exname)
3146 IOleCommandTarget *cmdtrg;
3147 VARIANT *in = NULL, _in, *out = NULL, _out;
3150 hres = IUnknown_QueryInterface(unk, &IID_IOleCommandTarget, (void**)&cmdtrg);
3151 ok(hres == S_OK, "QueryInterface(IIDIOleM=CommandTarget failed: %08x\n", hres);
3158 V_BSTR(in) = SysAllocString(name);
3164 V_I4(out) = 0xdeadbeef;
3167 hres = IOleCommandTarget_Exec(cmdtrg, &CGID_MSHTML, IDM_FONTNAME, 0, in, out);
3169 ok(hres == S_OK, "Exec(IDM_FONTNAME) failed: %08x\n", hres);
3174 if(out && !nogecko) {
3175 ok(V_VT(out) == VT_BSTR, "V_VT(out) = %x\n", V_VT(out));
3176 if(V_VT(out) == VT_BSTR) {
3178 ok(!lstrcmpW(V_BSTR(out), name ? name : exname),
3179 "unexpected fontname %s\n", wine_dbgstr_w(name));
3181 ok(V_BSTR(out) == NULL, "V_BSTR(out) != NULL\n");
3186 IOleCommandTarget_Release(cmdtrg);
3189 static void test_exec_noargs(IUnknown *unk, DWORD cmdid)
3191 IOleCommandTarget *cmdtrg;
3194 hres = IUnknown_QueryInterface(unk, &IID_IOleCommandTarget, (void**)&cmdtrg);
3195 ok(hres == S_OK, "QueryInterface(IID_IOleCommandTarget) failed: %08x\n", hres);
3199 hres = IOleCommandTarget_Exec(cmdtrg, &CGID_MSHTML, cmdid,
3200 OLECMDEXECOPT_DODEFAULT, NULL, NULL);
3201 ok(hres == S_OK, "Exec failed: %08x\n", hres);
3203 IOleCommandTarget_Release(cmdtrg);
3206 static void test_IsDirty(IUnknown *unk, HRESULT exhres)
3208 IPersistStreamInit *perinit;
3209 IPersistMoniker *permon;
3210 IPersistFile *perfile;
3213 hres = IUnknown_QueryInterface(unk, &IID_IPersistStreamInit, (void**)&perinit);
3214 ok(hres == S_OK, "QueryInterface(IID_IPersistStreamInit failed: %08x\n", hres);
3215 if(SUCCEEDED(hres)) {
3216 hres = IPersistStreamInit_IsDirty(perinit);
3217 ok(hres == exhres, "IsDirty() = %08x, expected %08x\n", hres, exhres);
3218 IPersistStreamInit_Release(perinit);
3221 hres = IUnknown_QueryInterface(unk, &IID_IPersistMoniker, (void**)&permon);
3222 ok(hres == S_OK, "QueryInterface(IID_IPersistMoniker failed: %08x\n", hres);
3223 if(SUCCEEDED(hres)) {
3224 hres = IPersistMoniker_IsDirty(permon);
3225 ok(hres == exhres, "IsDirty() = %08x, expected %08x\n", hres, exhres);
3226 IPersistMoniker_Release(permon);
3229 hres = IUnknown_QueryInterface(unk, &IID_IPersistFile, (void**)&perfile);
3230 ok(hres == S_OK, "QueryInterface(IID_IPersistFile failed: %08x\n", hres);
3231 if(SUCCEEDED(hres)) {
3232 hres = IPersistFile_IsDirty(perfile);
3233 ok(hres == exhres, "IsDirty() = %08x, expected %08x\n", hres, exhres);
3234 IPersistFile_Release(perfile);
3238 static HWND create_container_window(void)
3240 static const WCHAR wszHTMLDocumentTest[] =
3241 {'H','T','M','L','D','o','c','u','m','e','n','t','T','e','s','t',0};
3242 static WNDCLASSEXW wndclass = {
3243 sizeof(WNDCLASSEXW),
3246 0, 0, NULL, NULL, NULL, NULL, NULL,
3247 wszHTMLDocumentTest,
3251 RegisterClassExW(&wndclass);
3252 return CreateWindowW(wszHTMLDocumentTest, wszHTMLDocumentTest,
3253 WS_OVERLAPPEDWINDOW, CW_USEDEFAULT, CW_USEDEFAULT,
3254 515, 530, NULL, NULL, NULL, NULL);
3257 static void test_DoVerb(IOleObject *oleobj)
3259 RECT rect = {0,0,500,500};
3262 if(!container_locked) {
3263 SET_EXPECT(GetContainer);
3264 SET_EXPECT(LockContainer);
3266 SET_EXPECT(ActivateMe);
3267 expect_LockContainer_fLock = TRUE;
3269 hres = IOleObject_DoVerb(oleobj, OLEIVERB_SHOW, NULL, &ClientSite, -1, container_hwnd, &rect);
3270 ok(hres == S_OK, "DoVerb failed: %08x\n", hres);
3272 if(!container_locked) {
3273 CHECK_CALLED(GetContainer);
3274 CHECK_CALLED(LockContainer);
3275 container_locked = TRUE;
3277 CHECK_CALLED(ActivateMe);
3280 #define CLIENTSITE_EXPECTPATH 0x00000001
3281 #define CLIENTSITE_SETNULL 0x00000002
3282 #define CLIENTSITE_DONTSET 0x00000004
3284 static void test_ClientSite(IOleObject *oleobj, DWORD flags)
3286 IOleClientSite *clientsite;
3289 if(flags & CLIENTSITE_SETNULL) {
3290 hres = IOleObject_GetClientSite(oleobj, &clientsite);
3291 ok(clientsite == &ClientSite, "clientsite=%p, expected %p\n", clientsite, &ClientSite);
3293 hres = IOleObject_SetClientSite(oleobj, NULL);
3294 ok(hres == S_OK, "SetClientSite failed: %08x\n", hres);
3296 set_clientsite = FALSE;
3299 if(flags & CLIENTSITE_DONTSET)
3302 hres = IOleObject_GetClientSite(oleobj, &clientsite);
3303 ok(hres == S_OK, "GetClientSite failed: %08x\n", hres);
3304 ok(clientsite == (set_clientsite ? &ClientSite : NULL), "GetClientSite() = %p, expected %p\n",
3305 clientsite, set_clientsite ? &ClientSite : NULL);
3307 if(!set_clientsite) {
3308 SET_EXPECT(GetHostInfo);
3309 if(flags & CLIENTSITE_EXPECTPATH) {
3310 SET_EXPECT(GetOptionKeyPath);
3311 SET_EXPECT(GetOverrideKeyPath);
3313 SET_EXPECT(GetWindow);
3314 SET_EXPECT(QueryStatus_SETPROGRESSTEXT);
3315 SET_EXPECT(Exec_SETPROGRESSMAX);
3316 SET_EXPECT(Exec_SETPROGRESSPOS);
3317 SET_EXPECT(Invoke_AMBIENT_USERMODE);
3318 SET_EXPECT(Invoke_AMBIENT_DLCONTROL);
3319 SET_EXPECT(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
3320 SET_EXPECT(Invoke_AMBIENT_SILENT);
3321 SET_EXPECT(Invoke_AMBIENT_USERAGENT);
3322 SET_EXPECT(Invoke_AMBIENT_PALETTE);
3324 hres = IOleObject_SetClientSite(oleobj, &ClientSite);
3325 ok(hres == S_OK, "SetClientSite failed: %08x\n", hres);
3327 CHECK_CALLED(GetHostInfo);
3328 if(flags & CLIENTSITE_EXPECTPATH) {
3329 CHECK_CALLED(GetOptionKeyPath);
3330 CHECK_CALLED(GetOverrideKeyPath);
3332 CHECK_CALLED(GetWindow);
3333 CHECK_CALLED(QueryStatus_SETPROGRESSTEXT);
3334 CHECK_CALLED(Exec_SETPROGRESSMAX);
3335 CHECK_CALLED(Exec_SETPROGRESSPOS);
3336 CHECK_CALLED(Invoke_AMBIENT_USERMODE);
3337 CHECK_CALLED(Invoke_AMBIENT_DLCONTROL);
3338 CHECK_CALLED(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
3339 CHECK_CALLED(Invoke_AMBIENT_SILENT);
3340 CHECK_CALLED(Invoke_AMBIENT_USERAGENT);
3341 CHECK_CALLED(Invoke_AMBIENT_PALETTE);
3343 set_clientsite = TRUE;
3346 hres = IOleObject_SetClientSite(oleobj, &ClientSite);
3347 ok(hres == S_OK, "SetClientSite failed: %08x\n", hres);
3349 hres = IOleObject_GetClientSite(oleobj, &clientsite);
3350 ok(hres == S_OK, "GetClientSite failed: %08x\n", hres);
3351 ok(clientsite == &ClientSite, "GetClientSite() = %p, expected %p\n", clientsite, &ClientSite);
3354 static void test_OnAmbientPropertyChange(IUnknown *unk)
3356 IOleControl *control = NULL;
3359 hres = IUnknown_QueryInterface(unk, &IID_IOleControl, (void**)&control);
3360 ok(hres == S_OK, "QueryInterface(IID_IOleControl failed: %08x\n", hres);
3364 SET_EXPECT(Invoke_AMBIENT_USERMODE);
3365 hres = IOleControl_OnAmbientPropertyChange(control, DISPID_AMBIENT_USERMODE);
3366 ok(hres == S_OK, "OnAmbientChange failed: %08x\n", hres);
3367 CHECK_CALLED(Invoke_AMBIENT_USERMODE);
3369 SET_EXPECT(Invoke_AMBIENT_DLCONTROL);
3370 hres = IOleControl_OnAmbientPropertyChange(control, DISPID_AMBIENT_DLCONTROL);
3371 ok(hres == S_OK, "OnAmbientChange failed: %08x\n", hres);
3372 CHECK_CALLED(Invoke_AMBIENT_DLCONTROL);
3374 SET_EXPECT(Invoke_AMBIENT_DLCONTROL);
3375 SET_EXPECT(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
3376 hres = IOleControl_OnAmbientPropertyChange(control, DISPID_AMBIENT_OFFLINEIFNOTCONNECTED);
3377 ok(hres == S_OK, "OnAmbientChange failed: %08x\n", hres);
3378 CHECK_CALLED(Invoke_AMBIENT_DLCONTROL);
3379 CHECK_CALLED(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
3381 SET_EXPECT(Invoke_AMBIENT_DLCONTROL);
3382 SET_EXPECT(Invoke_AMBIENT_SILENT);
3383 hres = IOleControl_OnAmbientPropertyChange(control, DISPID_AMBIENT_SILENT);
3384 ok(hres == S_OK, "OnAmbientChange failed: %08x\n", hres);
3385 CHECK_CALLED(Invoke_AMBIENT_DLCONTROL);
3386 CHECK_CALLED(Invoke_AMBIENT_SILENT);
3388 SET_EXPECT(Invoke_AMBIENT_USERAGENT);
3389 hres = IOleControl_OnAmbientPropertyChange(control, DISPID_AMBIENT_USERAGENT);
3390 ok(hres == S_OK, "OnAmbientChange failed: %08x\n", hres);
3391 CHECK_CALLED(Invoke_AMBIENT_USERAGENT);
3393 SET_EXPECT(Invoke_AMBIENT_PALETTE);
3394 hres = IOleControl_OnAmbientPropertyChange(control, DISPID_AMBIENT_PALETTE);
3395 ok(hres == S_OK, "OnAmbientChange failed: %08x\n", hres);
3396 CHECK_CALLED(Invoke_AMBIENT_PALETTE);
3398 IOleControl_Release(control);
3403 static void test_OnAmbientPropertyChange2(IUnknown *unk)
3405 IOleControl *control = NULL;
3408 hres = IUnknown_QueryInterface(unk, &IID_IOleControl, (void**)&control);
3409 ok(hres == S_OK, "QueryInterface(IID_IOleControl failed: %08x\n", hres);
3413 hres = IOleControl_OnAmbientPropertyChange(control, DISPID_AMBIENT_PALETTE);
3414 ok(hres == S_OK, "OnAmbientPropertyChange failed: %08x\n", hres);
3416 IOleControl_Release(control);
3419 static void test_Close(IUnknown *unk, BOOL set_client)
3421 IOleObject *oleobj = NULL;
3424 hres = IUnknown_QueryInterface(unk, &IID_IOleObject, (void**)&oleobj);
3425 ok(hres == S_OK, "QueryInterface(IID_IOleObject) failed: %08x\n", hres);
3429 SET_EXPECT(GetContainer);
3430 SET_EXPECT(LockContainer);
3431 expect_LockContainer_fLock = FALSE;
3432 hres = IOleObject_Close(oleobj, OLECLOSE_NOSAVE);
3433 ok(hres == S_OK, "Close failed: %08x\n", hres);
3434 CHECK_CALLED(GetContainer);
3435 CHECK_CALLED(LockContainer);
3436 container_locked = FALSE;
3439 test_ClientSite(oleobj, CLIENTSITE_SETNULL|CLIENTSITE_DONTSET);
3441 IOleObject_Release(oleobj);
3444 static void test_OnFrameWindowActivate(IUnknown *unk)
3446 IOleInPlaceActiveObject *inplaceact;
3449 hres = IUnknown_QueryInterface(unk, &IID_IOleInPlaceActiveObject, (void**)&inplaceact);
3450 ok(hres == S_OK, "QueryInterface(IID_IOleInPlaceActiveObject) failed: %08x\n", hres);
3454 if(set_clientsite) {
3455 expect_OnFrameWindowActivate_fActivate = TRUE;
3456 SET_EXPECT(OnFrameWindowActivate);
3457 hres = IOleInPlaceActiveObject_OnFrameWindowActivate(inplaceact, TRUE);
3458 ok(hres == S_OK, "OnFrameWindowActivate failed: %08x\n", hres);
3459 CHECK_CALLED(OnFrameWindowActivate);
3461 SET_EXPECT(OnFrameWindowActivate);
3462 hres = IOleInPlaceActiveObject_OnFrameWindowActivate(inplaceact, TRUE);
3463 ok(hres == S_OK, "OnFrameWindowActivate failed: %08x\n", hres);
3464 CHECK_CALLED(OnFrameWindowActivate);
3466 expect_OnFrameWindowActivate_fActivate = FALSE;
3467 SET_EXPECT(OnFrameWindowActivate);
3468 hres = IOleInPlaceActiveObject_OnFrameWindowActivate(inplaceact, FALSE);
3469 ok(hres == S_OK, "OnFrameWindowActivate failed: %08x\n", hres);
3470 CHECK_CALLED(OnFrameWindowActivate);
3472 expect_OnFrameWindowActivate_fActivate = TRUE;
3473 SET_EXPECT(OnFrameWindowActivate);
3474 hres = IOleInPlaceActiveObject_OnFrameWindowActivate(inplaceact, TRUE);
3475 ok(hres == S_OK, "OnFrameWindowActivate failed: %08x\n", hres);
3476 CHECK_CALLED(OnFrameWindowActivate);
3478 hres = IOleInPlaceActiveObject_OnFrameWindowActivate(inplaceact, FALSE);
3479 ok(hres == S_OK, "OnFrameWindowActivate failed: %08x\n", hres);
3481 hres = IOleInPlaceActiveObject_OnFrameWindowActivate(inplaceact, TRUE);
3482 ok(hres == S_OK, "OnFrameWindowActivate failed: %08x\n", hres);
3485 IOleInPlaceActiveObject_Release(inplaceact);
3488 static void test_InPlaceDeactivate(IUnknown *unk, BOOL expect_call)
3490 IOleInPlaceObjectWindowless *windowlessobj = NULL;
3493 hres = IUnknown_QueryInterface(unk, &IID_IOleInPlaceObjectWindowless,
3494 (void**)&windowlessobj);
3495 ok(hres == S_OK, "QueryInterface(IID_IOleInPlaceObjectWindowless) failed: %08x\n", hres);
3500 SET_EXPECT(OnFocus_FALSE);
3502 SET_EXPECT(OnInPlaceDeactivateEx);
3504 SET_EXPECT(OnInPlaceDeactivate);
3506 hres = IOleInPlaceObjectWindowless_InPlaceDeactivate(windowlessobj);
3507 ok(hres == S_OK, "InPlaceDeactivate failed: %08x\n", hres);
3509 CHECK_CALLED(OnFocus_FALSE);
3511 CHECK_CALLED(OnInPlaceDeactivateEx);
3513 CHECK_CALLED(OnInPlaceDeactivate);
3516 IOleInPlaceObjectWindowless_Release(windowlessobj);
3519 static void test_Activate(IUnknown *unk, DWORD flags)
3521 IOleObject *oleobj = NULL;
3522 IOleDocumentView *docview;
3529 IOleDocumentView_Release(view);
3532 hres = IUnknown_QueryInterface(unk, &IID_IOleObject, (void**)&oleobj);
3533 ok(hres == S_OK, "QueryInterface(IID_IOleObject) failed: %08x\n", hres);
3535 hres = IOleObject_GetUserClassID(oleobj, NULL);
3536 ok(hres == E_INVALIDARG, "GetUserClassID returned: %08x, expected E_INVALIDARG\n", hres);
3538 hres = IOleObject_GetUserClassID(oleobj, &guid);
3539 ok(hres == S_OK, "GetUserClassID failed: %08x\n", hres);
3540 ok(IsEqualGUID(&guid, &CLSID_HTMLDocument), "guid != CLSID_HTMLDocument\n");
3542 test_OnFrameWindowActivate(unk);
3544 test_ClientSite(oleobj, flags);
3545 test_InPlaceDeactivate(unk, FALSE);
3546 test_DoVerb(oleobj);
3548 if(call_UIActivate == CallUIActivate_AfterShow) {
3549 hres = IOleObject_QueryInterface(oleobj, &IID_IOleDocumentView, (void **)&docview);
3550 ok(hres == S_OK, "IOleObject_QueryInterface failed with error 0x%08x\n", hres);
3552 SET_EXPECT(OnFocus_TRUE);
3553 SET_EXPECT(SetActiveObject);
3555 SET_EXPECT(InPlaceUIWindow_SetActiveObject);
3556 SET_EXPECT(InPlaceFrame_SetBorderSpace);
3557 expect_status_text = NULL;
3559 hres = IOleDocumentView_UIActivate(docview, TRUE);
3560 ok(hres == S_OK, "IOleDocumentView_UIActivate failed with error 0x%08x\n", hres);
3562 CHECK_CALLED(OnFocus_TRUE);
3563 CHECK_CALLED(SetActiveObject);
3564 CHECK_CALLED(ShowUI);
3565 CHECK_CALLED(InPlaceUIWindow_SetActiveObject);
3566 CHECK_CALLED(InPlaceFrame_SetBorderSpace);
3568 IOleDocumentView_Release(docview);
3571 IOleObject_Release(oleobj);
3573 test_OnFrameWindowActivate(unk);
3576 static void test_Window(IUnknown *unk, BOOL expect_success)
3578 IOleInPlaceActiveObject *activeobject = NULL;
3582 hres = IOleDocumentView_QueryInterface(view, &IID_IOleInPlaceActiveObject, (void**)&activeobject);
3583 ok(hres == S_OK, "Could not get IOleInPlaceActiveObject interface: %08x\n", hres);
3587 hres = IOleInPlaceActiveObject_GetWindow(activeobject, &tmp_hwnd);
3589 if(expect_success) {
3590 ok(hres == S_OK, "GetWindow failed: %08x\n", hres);
3591 ok(tmp_hwnd == hwnd, "tmp_hwnd=%p, expected %p\n", tmp_hwnd, hwnd);
3593 ok(hres == E_FAIL, "GetWindow returned %08x, expected E_FAIL\n", hres);
3594 ok(IsWindow(hwnd), "hwnd is destroyed\n");
3597 IOleInPlaceActiveObject_Release(activeobject);
3600 static void test_CloseView(void)
3602 IOleInPlaceSite *inplacesite = (IOleInPlaceSite*)0xff00ff00;
3608 hres = IOleDocumentView_Show(view, FALSE);
3609 ok(hres == S_OK, "Show failed: %08x\n", hres);
3611 hres = IOleDocumentView_CloseView(view, 0);
3612 ok(hres == S_OK, "CloseView failed: %08x\n", hres);
3614 hres = IOleDocumentView_SetInPlaceSite(view, NULL);
3615 ok(hres == S_OK, "SetInPlaceSite failed: %08x\n", hres);
3617 hres = IOleDocumentView_GetInPlaceSite(view, &inplacesite);
3618 ok(hres == S_OK, "SetInPlaceSite failed: %08x\n", hres);
3619 ok(inplacesite == NULL, "inplacesite=%p, expected NULL\n", inplacesite);
3622 static void test_UIDeactivate(void)
3626 if(call_UIActivate == CallUIActivate_AfterShow) {
3627 SET_EXPECT(InPlaceUIWindow_SetActiveObject);
3629 if(call_UIActivate != CallUIActivate_None) {
3630 SET_EXPECT(SetActiveObject_null);
3632 SET_EXPECT(OnUIDeactivate);
3635 hres = IOleDocumentView_UIActivate(view, FALSE);
3636 ok(hres == S_OK, "UIActivate failed: %08x\n", hres);
3638 if(call_UIActivate != CallUIActivate_None) {
3639 CHECK_CALLED(SetActiveObject_null);
3640 CHECK_CALLED(HideUI);
3641 CHECK_CALLED(OnUIDeactivate);
3643 if(call_UIActivate == CallUIActivate_AfterShow) {
3644 CHECK_CALLED(InPlaceUIWindow_SetActiveObject);
3648 static void test_Hide(void)
3655 hres = IOleDocumentView_Show(view, FALSE);
3656 ok(hres == S_OK, "Show failed: %08x\n", hres);
3659 static HRESULT create_document(IUnknown **unk)
3661 IHTMLDocument5 *doc5;
3664 hres = CoCreateInstance(&CLSID_HTMLDocument, NULL, CLSCTX_INPROC_SERVER|CLSCTX_INPROC_HANDLER,
3665 &IID_IUnknown, (void**)unk);
3666 ok(hres == S_OK, "CoCreateInstance failed: %08x\n", hres);
3670 hres = IUnknown_QueryInterface(*unk, &IID_IHTMLDocument5, (void**)&doc5);
3671 if(SUCCEEDED(hres)) {
3672 IHTMLDocument5_Release(doc5);
3674 win_skip("Could not get IHTMLDocument5, probably too old IE\n");
3675 IUnknown_Release(*unk);
3681 static void test_Navigate(IUnknown *unk)
3683 IHlinkTarget *hlink;
3686 hres = IUnknown_QueryInterface(unk, &IID_IHlinkTarget, (void**)&hlink);
3687 ok(hres == S_OK, "QueryInterface(IID_IHlinkTarget) failed: %08x\n", hres);
3689 SET_EXPECT(ActivateMe);
3690 hres = IHlinkTarget_Navigate(hlink, 0, NULL);
3691 ok(hres == S_OK, "Navigate failed: %08x\n", hres);
3692 CHECK_CALLED(ActivateMe);
3694 IHlinkTarget_Release(hlink);
3697 static void test_external(IUnknown *unk, BOOL initialized)
3699 IDispatch *external;
3700 IHTMLDocument2 *doc;
3701 IHTMLWindow2 *htmlwin;
3704 hres = IUnknown_QueryInterface(unk, &IID_IHTMLDocument2, (void**)&doc);
3705 ok(hres == S_OK, "QueryInterface(IID_IHTMLWindow2) failed: %08x\n", hres);
3707 hres = IHTMLDocument2_get_parentWindow(doc, &htmlwin);
3708 IHTMLDocument2_Release(doc);
3709 ok(hres == S_OK, "get_parentWindow failed: %08x\n", hres);
3712 SET_EXPECT(GetExternal);
3713 external = (void*)0xdeadbeef;
3714 hres = IHTMLWindow2_get_external(htmlwin, &external);
3716 ok(hres == S_FALSE || hres == S_OK, "get_external failed: %08x\n", hres);
3717 CHECK_CALLED(GetExternal);
3718 ok(external != NULL, "external == NULL\n");
3720 ok(hres == S_OK, "get_external failed: %08x\n", hres);
3721 ok(external == NULL, "external != NULL\n");
3724 IHTMLWindow2_Release(htmlwin);
3727 static void test_StreamLoad(IUnknown *unk)
3729 IPersistStreamInit *init;
3732 hres = IUnknown_QueryInterface(unk, &IID_IPersistStreamInit, (void**)&init);
3733 ok(hres == S_OK, "QueryInterface(IID_IPersistStreamInit) failed: %08x\n", hres);
3737 SET_EXPECT(Invoke_AMBIENT_SILENT);
3738 SET_EXPECT(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
3739 SET_EXPECT(Exec_ShellDocView_37);
3740 SET_EXPECT(OnChanged_READYSTATE);
3742 readystate_set_loading = TRUE;
3744 hres = IPersistStreamInit_Load(init, &Stream);
3745 ok(hres == S_OK, "Load failed: %08x\n", hres);
3747 CHECK_CALLED(Invoke_AMBIENT_SILENT);
3748 CHECK_CALLED(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
3749 CHECK_CALLED(Exec_ShellDocView_37);
3750 CHECK_CALLED(OnChanged_READYSTATE);
3753 test_timer(EXPECT_SETTITLE);
3754 test_GetCurMoniker(unk, NULL, about_blank_url);
3756 IPersistStreamInit_Release(init);
3759 static void test_QueryInterface(IUnknown *unk)
3764 static const IID IID_UndocumentedScriptIface =
3765 {0x719c3050,0xf9d3,0x11cf,{0xa4,0x93,0x00,0x40,0x05,0x23,0xa8,0xa0}};
3767 qi = (void*)0xdeadbeef;
3768 hres = IUnknown_QueryInterface(unk, &IID_IRunnableObject, (void**)&qi);
3769 ok(hres == E_NOINTERFACE, "QueryInterface returned %08x, expected E_NOINTERFACE\n", hres);
3770 ok(qi == NULL, "qirunnable=%p, expected NULL\n", qi);
3772 qi = (void*)0xdeadbeef;
3773 hres = IUnknown_QueryInterface(unk, &IID_IHTMLDOMNode, (void**)&qi);
3774 ok(hres == E_NOINTERFACE, "QueryInterface returned %08x, expected E_NOINTERFACE\n", hres);
3775 ok(qi == NULL, "qi=%p, expected NULL\n", qi);
3777 qi = (void*)0xdeadbeef;
3778 hres = IUnknown_QueryInterface(unk, &IID_IHTMLDOMNode2, (void**)&qi);
3779 ok(hres == E_NOINTERFACE, "QueryInterface returned %08x, expected E_NOINTERFACE\n", hres);
3780 ok(qi == NULL, "qi=%p, expected NULL\n", qi);
3782 qi = (void*)0xdeadbeef;
3783 hres = IUnknown_QueryInterface(unk, &IID_IPersistPropertyBag, (void**)&qi);
3784 ok(hres == E_NOINTERFACE, "QueryInterface returned %08x, expected E_NOINTERFACE\n", hres);
3785 ok(qi == NULL, "qi=%p, expected NULL\n", qi);
3787 qi = (void*)0xdeadbeef;
3788 hres = IUnknown_QueryInterface(unk, &IID_UndocumentedScriptIface, (void**)&qi);
3789 ok(hres == E_NOINTERFACE, "QueryInterface returned %08x, expected E_NOINTERFACE\n", hres);
3790 ok(qi == NULL, "qi=%p, expected NULL\n", qi);
3792 qi = (void*)0xdeadbeef;
3793 hres = IUnknown_QueryInterface(unk, &IID_IMarshal, (void**)&qi);
3794 ok(hres == E_NOINTERFACE, "QueryInterface returned %08x, expected E_NOINTERFACE\n", hres);
3795 ok(qi == NULL, "qi=%p, expected NULL\n", qi);
3798 static void init_test(enum load_state_t ls) {
3800 hwnd = last_hwnd = NULL;
3801 set_clientsite = FALSE;
3802 load_from_stream = FALSE;
3803 call_UIActivate = CallUIActivate_None;
3811 static void test_HTMLDocument(BOOL do_load)
3817 trace("Testing HTMLDocument (%s)...\n", (do_load ? "load" : "no load"));
3819 init_test(do_load ? LD_DOLOAD : LD_NO);
3821 hres = create_document(&unk);
3826 test_QueryInterface(unk);
3827 test_IsDirty(unk, S_FALSE);
3828 test_MSHTML_QueryStatus(unk, OLECMDF_SUPPORTED);
3829 test_external(unk, FALSE);
3830 test_ConnectionPointContainer(unk);
3831 test_GetCurMoniker(unk, NULL, NULL);
3834 test_OnAmbientPropertyChange2(unk);
3836 test_Activate(unk, CLIENTSITE_EXPECTPATH);
3839 test_download(FALSE, TRUE, TRUE);
3840 test_GetCurMoniker(unk, &Moniker, NULL);
3843 test_MSHTML_QueryStatus(unk, OLECMDF_SUPPORTED);
3844 test_OleCommandTarget_fail(unk);
3845 test_OleCommandTarget(unk);
3846 test_OnAmbientPropertyChange(unk);
3847 test_Window(unk, TRUE);
3848 test_external(unk, TRUE);
3850 test_UIDeactivate();
3851 test_OleCommandTarget(unk);
3852 test_Window(unk, TRUE);
3853 test_InPlaceDeactivate(unk, TRUE);
3855 /* Calling test_OleCommandTarget here causes Segmentation Fault with native
3856 * MSHTML. It doesn't with Wine. */
3858 test_Window(unk, FALSE);
3860 test_InPlaceDeactivate(unk, FALSE);
3862 test_Close(unk, FALSE);
3864 /* Activate HTMLDocument again */
3865 test_Activate(unk, CLIENTSITE_SETNULL);
3866 test_Window(unk, TRUE);
3867 test_OleCommandTarget(unk);
3868 test_UIDeactivate();
3869 test_InPlaceDeactivate(unk, TRUE);
3870 test_Close(unk, FALSE);
3872 /* Activate HTMLDocument again, this time without UIActivate */
3873 call_UIActivate = CallUIActivate_None;
3874 test_Activate(unk, CLIENTSITE_SETNULL);
3875 test_Window(unk, TRUE);
3877 test_UIDeactivate();
3878 test_InPlaceDeactivate(unk, TRUE);
3881 test_Close(unk, TRUE);
3882 test_OnAmbientPropertyChange2(unk);
3883 test_GetCurMoniker(unk, do_load ? &Moniker : NULL, NULL);
3886 /* Activate HTMLDocument again, calling UIActivate after showing the window */
3887 call_UIActivate = CallUIActivate_AfterShow;
3888 test_Activate(unk, 0);
3889 test_Window(unk, TRUE);
3890 test_OleCommandTarget(unk);
3891 test_UIDeactivate();
3892 test_InPlaceDeactivate(unk, TRUE);
3893 test_Close(unk, FALSE);
3894 call_UIActivate = CallUIActivate_None;
3898 IOleDocumentView_Release(view);
3901 ok(IsWindow(hwnd), "hwnd is destroyed\n");
3903 ref = IUnknown_Release(unk);
3904 ok(ref == 0, "ref=%d, expected 0\n", ref);
3906 ok(!IsWindow(hwnd), "hwnd is not destroyed\n");
3909 static void test_HTMLDocument_hlink(void)
3915 trace("Testing HTMLDocument (hlink)...\n");
3917 init_test(LD_DOLOAD);
3920 hres = create_document(&unk);
3925 test_ConnectionPointContainer(unk);
3926 test_GetCurMoniker(unk, NULL, NULL);
3930 IUnknown_Release(unk);
3934 test_download(FALSE, TRUE, TRUE);
3936 test_IsDirty(unk, S_FALSE);
3937 test_MSHTML_QueryStatus(unk, OLECMDF_SUPPORTED);
3939 test_exec_onunload(unk);
3940 test_Window(unk, TRUE);
3941 test_InPlaceDeactivate(unk, TRUE);
3942 test_Close(unk, FALSE);
3943 test_IsDirty(unk, S_FALSE);
3944 test_GetCurMoniker(unk, &Moniker, NULL);
3947 IOleDocumentView_Release(view);
3950 ref = IUnknown_Release(unk);
3951 ok(ref == 0, "ref=%d, expected 0\n", ref);
3954 static void test_HTMLDocument_StreamLoad(void)
3961 trace("Testing HTMLDocument (IPersistStreamInit)...\n");
3963 init_test(LD_DOLOAD);
3964 load_from_stream = TRUE;
3966 hres = create_document(&unk);
3971 hres = IUnknown_QueryInterface(unk, &IID_IOleObject, (void**)&oleobj);
3972 ok(hres == S_OK, "Could not get IOleObject: %08x\n", hres);
3974 test_readyState(unk);
3975 test_IsDirty(unk, S_FALSE);
3976 test_ConnectionPointContainer(unk);
3977 test_ClientSite(oleobj, CLIENTSITE_EXPECTPATH);
3978 test_DoVerb(oleobj);
3979 test_MSHTML_QueryStatus(unk, OLECMDF_SUPPORTED);
3981 IOleObject_Release(oleobj);
3983 test_GetCurMoniker(unk, NULL, NULL);
3984 test_StreamLoad(unk);
3985 test_download(TRUE, FALSE, TRUE);
3986 test_MSHTML_QueryStatus(unk, OLECMDF_SUPPORTED);
3988 test_UIDeactivate();
3989 test_InPlaceDeactivate(unk, TRUE);
3990 test_Close(unk, FALSE);
3991 test_IsDirty(unk, S_FALSE);
3994 IOleDocumentView_Release(view);
3999 ref = IUnknown_Release(unk);
4000 ok(ref == 0, "ref=%d, expected 0\n", ref);
4003 static void test_edit_uiactivate(IOleObject *oleobj)
4005 IOleDocumentView *docview;
4008 hres = IOleObject_QueryInterface(oleobj, &IID_IOleDocumentView, (void **)&docview);
4009 ok(hres == S_OK, "IOleObject_QueryInterface failed with error 0x%08x\n", hres);
4011 SET_EXPECT(OnFocus_TRUE);
4012 SET_EXPECT(SetActiveObject);
4014 SET_EXPECT(InPlaceUIWindow_SetActiveObject);
4015 SET_EXPECT(InPlaceFrame_SetBorderSpace);
4016 expect_status_text = NULL;
4018 hres = IOleDocumentView_UIActivate(docview, TRUE);
4019 ok(hres == S_OK, "IOleDocumentView_UIActivate failed with error 0x%08x\n", hres);
4021 CHECK_CALLED(OnFocus_TRUE);
4022 CHECK_CALLED(SetActiveObject);
4023 CHECK_CALLED(ShowUI);
4024 CHECK_CALLED(InPlaceUIWindow_SetActiveObject);
4025 CHECK_CALLED(InPlaceFrame_SetBorderSpace);
4027 IOleDocumentView_Release(docview);
4030 static void test_editing_mode(BOOL do_load)
4037 trace("Testing HTMLDocument (edit%s)...\n", do_load ? " load" : "");
4039 init_test(do_load ? LD_DOLOAD : LD_NO);
4040 call_UIActivate = CallUIActivate_AfterShow;
4042 hres = create_document(&unk);
4047 hres = IUnknown_QueryInterface(unk, &IID_IOleObject, (void**)&oleobj);
4048 ok(hres == S_OK, "Could not get IOleObject: %08x\n", hres);
4050 test_readyState(unk);
4051 test_ConnectionPointContainer(unk);
4052 test_ClientSite(oleobj, CLIENTSITE_EXPECTPATH);
4053 test_DoVerb(oleobj);
4054 test_edit_uiactivate(oleobj);
4056 test_MSHTML_QueryStatus(unk, OLECMDF_SUPPORTED);
4059 stream_read = protocol_read = 0;
4060 test_exec_editmode(unk, do_load);
4061 test_UIDeactivate();
4062 call_UIActivate = CallUIActivate_None;
4063 IOleObject_Release(oleobj);
4065 test_MSHTML_QueryStatus(unk, OLECMDF_SUPPORTED);
4066 test_download(TRUE, do_load, do_load);
4068 SET_EXPECT(SetStatusText); /* ignore race in native mshtml */
4069 test_timer(EXPECT_UPDATEUI);
4070 SET_CALLED(SetStatusText);
4072 test_MSHTML_QueryStatus(unk, OLECMDF_SUPPORTED|OLECMDF_ENABLED);
4075 test_exec_fontname(unk, NULL, wszTimesNewRoman);
4076 test_exec_fontname(unk, wszArial, wszTimesNewRoman);
4077 test_timer(EXPECT_UPDATEUI);
4078 test_exec_fontname(unk, NULL, wszArial);
4080 test_exec_noargs(unk, IDM_JUSTIFYRIGHT);
4081 test_timer(EXPECT_UPDATEUI);
4083 test_QueryStatus(unk, &CGID_MSHTML, IDM_JUSTIFYRIGHT,
4084 OLECMDF_SUPPORTED|OLECMDF_ENABLED|OLECMDF_LATCHED);
4086 test_exec_noargs(unk, IDM_JUSTIFYCENTER);
4087 test_timer(EXPECT_UPDATEUI);
4088 test_QueryStatus(unk, &CGID_MSHTML, IDM_JUSTIFYRIGHT,
4089 OLECMDF_SUPPORTED|OLECMDF_ENABLED);
4091 test_QueryStatus(unk, &CGID_MSHTML, IDM_JUSTIFYCENTER,
4092 OLECMDF_SUPPORTED|OLECMDF_ENABLED|OLECMDF_LATCHED);
4094 test_exec_noargs(unk, IDM_HORIZONTALLINE);
4095 test_timer(EXPECT_UPDATEUI);
4096 test_QueryStatus(unk, &CGID_MSHTML, IDM_HORIZONTALLINE,
4097 OLECMDF_SUPPORTED|OLECMDF_ENABLED);
4100 test_UIDeactivate();
4101 test_InPlaceDeactivate(unk, TRUE);
4102 test_Close(unk, FALSE);
4105 IOleDocumentView_Release(view);
4109 ref = IUnknown_Release(unk);
4110 ok(ref == 0, "ref=%d, expected 0\n", ref);
4113 static void register_protocol(void)
4115 IInternetSession *session;
4118 static const WCHAR wsz_winetest[] = {'w','i','n','e','t','e','s','t',0};
4120 hres = CoInternetGetSession(0, &session, 0);
4121 ok(hres == S_OK, "CoInternetGetSession failed: %08x\n", hres);
4123 hres = IInternetSession_RegisterNameSpace(session, &ClassFactory, &IID_NULL,
4124 wsz_winetest, 0, NULL, 0);
4125 ok(hres == S_OK, "RegisterNameSpace failed: %08x\n", hres);
4127 IInternetSession_Release(session);
4130 static void gecko_installer_workaround(BOOL disable)
4135 static BOOL has_url = FALSE;
4136 static char url[2048];
4138 if(!disable && !has_url)
4141 res = RegOpenKey(HKEY_CURRENT_USER, "Software\\Wine\\MSHTML", &hkey);
4142 if(res != ERROR_SUCCESS)
4146 DWORD type, size = sizeof(url);
4148 res = RegQueryValueEx(hkey, "GeckoUrl", NULL, &type, (PVOID)url, &size);
4149 if(res == ERROR_SUCCESS && type == REG_SZ)
4152 RegDeleteValue(hkey, "GeckoUrl");
4154 RegSetValueEx(hkey, "GeckoUrl", 0, REG_SZ, (PVOID)url, lstrlenA(url)+1);
4160 static void test_HTMLDoc_ISupportErrorInfo(void)
4164 ISupportErrorInfo *sinfo;
4167 hres = create_document(&unk);
4171 hres = IUnknown_QueryInterface(unk, &IID_ISupportErrorInfo, (void**)&sinfo);
4172 ok(hres == S_OK, "got %x\n", hres);
4173 ok(sinfo != NULL, "got %p\n", sinfo);
4176 hres = ISupportErrorInfo_InterfaceSupportsErrorInfo(sinfo, &IID_IErrorInfo);
4177 ok(hres == S_FALSE, "Expected S_OK, got %x\n", hres);
4178 IUnknown_Release(sinfo);
4181 ref = IUnknown_Release(unk);
4182 ok(ref == 0, "ref=%d, expected 0\n", ref);
4185 static void test_IPersistHistory(void)
4190 IPersistHistory *phist;
4192 hres = create_document(&unk);
4196 hres = IUnknown_QueryInterface(unk, &IID_IPersistHistory, (void**)&phist);
4197 ok(hres == S_OK, "QueryInterface returned %08x, expected S_OK\n", hres);
4199 IPersistHistory_Release(phist);
4201 ref = IUnknown_Release(unk);
4202 ok(ref == 0, "ref=%d, expected 0\n", ref);
4207 gecko_installer_workaround(TRUE);
4210 container_hwnd = create_container_window();
4211 register_protocol();
4213 test_HTMLDocument_hlink();
4215 test_HTMLDocument(FALSE);
4216 test_HTMLDocument(TRUE);
4217 test_HTMLDocument_StreamLoad();
4218 test_editing_mode(FALSE);
4219 test_editing_mode(TRUE);
4221 test_HTMLDoc_ISupportErrorInfo();
4222 test_IPersistHistory();
4224 DestroyWindow(container_hwnd);
4227 gecko_installer_workaround(FALSE);