2 * Copyright 2005-2009 Jacek Caban for CodeWeavers
4 * This library is free software; you can redistribute it and/or
5 * modify it under the terms of the GNU Lesser General Public
6 * License as published by the Free Software Foundation; either
7 * version 2.1 of the License, or (at your option) any later version.
9 * This library is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12 * Lesser General Public License for more details.
14 * You should have received a copy of the GNU Lesser General Public
15 * License along with this library; if not, write to the Free Software
16 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
22 #include <wine/test.h>
32 #include "docobjectservice.h"
41 #include "shdeprecated.h"
45 #include "mshtml_test.h"
47 DEFINE_GUID(GUID_NULL
,0,0,0,0,0,0,0,0,0,0,0);
48 DEFINE_GUID(IID_IProxyManager
,0x00000008,0x0000,0x0000,0xc0,0x00,0x00,0x00,0x00,0x00,0x00,0x46);
49 DEFINE_OLEGUID(CGID_DocHostCmdPriv
, 0x000214D4L
, 0, 0);
51 #define DEFINE_EXPECT(func) \
52 static BOOL expect_ ## func = FALSE, called_ ## func = FALSE
54 #define SET_EXPECT(func) \
55 expect_ ## func = TRUE
57 #define SET_CALLED(func) \
58 called_ ## func = TRUE
60 #define CHECK_EXPECT2(func) \
62 ok(expect_ ##func, "unexpected call " #func "\n"); \
63 called_ ## func = TRUE; \
66 #define CHECK_EXPECT(func) \
68 CHECK_EXPECT2(func); \
69 expect_ ## func = FALSE; \
72 #define CHECK_CALLED(func) \
74 ok(called_ ## func, "expected " #func "\n"); \
75 expect_ ## func = called_ ## func = FALSE; \
78 #define CHECK_NOT_CALLED(func) \
80 ok(!called_ ## func, "unexpected " #func "\n"); \
81 expect_ ## func = called_ ## func = FALSE; \
84 #define CHECK_CALLED_BROKEN(func) \
86 ok(called_ ## func || broken(!called_ ## func), "expected " #func "\n"); \
87 expect_ ## func = called_ ## func = FALSE; \
90 #define CLEAR_CALLED(func) \
91 expect_ ## func = called_ ## func = FALSE
93 static IOleDocumentView
*view
= NULL
;
94 static HWND container_hwnd
= NULL
, hwnd
= NULL
, last_hwnd
= NULL
;
96 DEFINE_EXPECT(LockContainer
);
97 DEFINE_EXPECT(SetActiveObject
);
98 DEFINE_EXPECT(SetActiveObject_null
);
99 DEFINE_EXPECT(GetWindow
);
100 DEFINE_EXPECT(CanInPlaceActivate
);
101 DEFINE_EXPECT(OnInPlaceActivate
);
102 DEFINE_EXPECT(OnInPlaceActivateEx
);
103 DEFINE_EXPECT(OnUIActivate
);
104 DEFINE_EXPECT(GetWindowContext
);
105 DEFINE_EXPECT(OnUIDeactivate
);
106 DEFINE_EXPECT(OnInPlaceDeactivate
);
107 DEFINE_EXPECT(OnInPlaceDeactivateEx
);
108 DEFINE_EXPECT(GetContainer
);
109 DEFINE_EXPECT(ShowUI
);
110 DEFINE_EXPECT(ActivateMe
);
111 DEFINE_EXPECT(GetHostInfo
);
112 DEFINE_EXPECT(HideUI
);
113 DEFINE_EXPECT(GetOptionKeyPath
);
114 DEFINE_EXPECT(GetOverrideKeyPath
);
115 DEFINE_EXPECT(SetStatusText
);
116 DEFINE_EXPECT(QueryStatus_SETPROGRESSTEXT
);
117 DEFINE_EXPECT(QueryStatus_OPEN
);
118 DEFINE_EXPECT(QueryStatus_NEW
);
119 DEFINE_EXPECT(Exec_SETPROGRESSMAX
);
120 DEFINE_EXPECT(Exec_SETPROGRESSPOS
);
121 DEFINE_EXPECT(Exec_HTTPEQUIV_DONE
);
122 DEFINE_EXPECT(Exec_SETDOWNLOADSTATE_0
);
123 DEFINE_EXPECT(Exec_SETDOWNLOADSTATE_1
);
124 DEFINE_EXPECT(Exec_ShellDocView_37
);
125 DEFINE_EXPECT(Exec_ShellDocView_63
);
126 DEFINE_EXPECT(Exec_ShellDocView_67
);
127 DEFINE_EXPECT(Exec_ShellDocView_84
);
128 DEFINE_EXPECT(Exec_ShellDocView_103
);
129 DEFINE_EXPECT(Exec_ShellDocView_105
);
130 DEFINE_EXPECT(Exec_ShellDocView_140
);
131 DEFINE_EXPECT(Exec_UPDATECOMMANDS
);
132 DEFINE_EXPECT(Exec_SETTITLE
);
133 DEFINE_EXPECT(Exec_HTTPEQUIV
);
134 DEFINE_EXPECT(Exec_MSHTML_PARSECOMPLETE
);
135 DEFINE_EXPECT(Exec_Explorer_69
);
136 DEFINE_EXPECT(Exec_DOCCANNAVIGATE
);
137 DEFINE_EXPECT(Invoke_AMBIENT_USERMODE
);
138 DEFINE_EXPECT(Invoke_AMBIENT_DLCONTROL
);
139 DEFINE_EXPECT(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED
);
140 DEFINE_EXPECT(Invoke_AMBIENT_SILENT
);
141 DEFINE_EXPECT(Invoke_AMBIENT_USERAGENT
);
142 DEFINE_EXPECT(Invoke_AMBIENT_PALETTE
);
143 DEFINE_EXPECT(Invoke_OnReadyStateChange_Interactive
);
144 DEFINE_EXPECT(Invoke_OnReadyStateChange_Loading
);
145 DEFINE_EXPECT(Invoke_OnReadyStateChange_Complete
);
146 DEFINE_EXPECT(GetDropTarget
);
147 DEFINE_EXPECT(UpdateUI
);
148 DEFINE_EXPECT(Navigate
);
149 DEFINE_EXPECT(OnFrameWindowActivate
);
150 DEFINE_EXPECT(OnChanged_READYSTATE
);
151 DEFINE_EXPECT(OnChanged_1005
);
152 DEFINE_EXPECT(OnChanged_1012
);
153 DEFINE_EXPECT(GetDisplayName
);
154 DEFINE_EXPECT(BindToStorage
);
155 DEFINE_EXPECT(IsSystemMoniker
);
156 DEFINE_EXPECT(GetBindResult
);
157 DEFINE_EXPECT(GetClassID
);
158 DEFINE_EXPECT(Abort
);
160 DEFINE_EXPECT(CreateInstance
);
161 DEFINE_EXPECT(Start
);
162 DEFINE_EXPECT(Terminate
);
163 DEFINE_EXPECT(Protocol_Read
);
164 DEFINE_EXPECT(LockRequest
);
165 DEFINE_EXPECT(UnlockRequest
);
166 DEFINE_EXPECT(OnFocus_TRUE
);
167 DEFINE_EXPECT(OnFocus_FALSE
);
168 DEFINE_EXPECT(RequestUIActivate
);
169 DEFINE_EXPECT(InPlaceFrame_SetBorderSpace
);
170 DEFINE_EXPECT(InPlaceUIWindow_SetActiveObject
);
171 DEFINE_EXPECT(GetExternal
);
172 DEFINE_EXPECT(EnableModeless_TRUE
);
173 DEFINE_EXPECT(EnableModeless_FALSE
);
174 DEFINE_EXPECT(Frame_EnableModeless_TRUE
);
175 DEFINE_EXPECT(Frame_EnableModeless_FALSE
);
176 DEFINE_EXPECT(Frame_GetWindow
);
177 DEFINE_EXPECT(TranslateUrl
);
178 DEFINE_EXPECT(Advise_Close
);
179 DEFINE_EXPECT(OnViewChange
);
180 DEFINE_EXPECT(EvaluateNewWindow
);
181 DEFINE_EXPECT(GetTravelLog
);
182 DEFINE_EXPECT(UpdateBackForwardState
);
183 DEFINE_EXPECT(FireBeforeNavigate2
);
184 DEFINE_EXPECT(FireNavigateComplete2
);
185 DEFINE_EXPECT(FireDocumentComplete
);
186 DEFINE_EXPECT(GetPendingUrl
);
187 DEFINE_EXPECT(ActiveElementChanged
);
188 DEFINE_EXPECT(IsErrorUrl
);
189 DEFINE_EXPECT(get_LocationURL
);
191 static IUnknown
*doc_unk
;
192 static IMoniker
*doc_mon
;
193 static BOOL expect_LockContainer_fLock
;
194 static BOOL expect_InPlaceUIWindow_SetActiveObject_active
= TRUE
;
195 static BOOL ipsex
, ipsw
;
196 static BOOL set_clientsite
, container_locked
;
197 static BOOL readystate_set_loading
= FALSE
, readystate_set_interactive
= FALSE
, load_from_stream
;
198 static BOOL editmode
= FALSE
, ignore_external_qi
;
199 static BOOL inplace_deactivated
, open_call
;
200 static BOOL complete
, loading_js
, loading_hash
;
201 static DWORD status_code
= HTTP_STATUS_OK
;
202 static BOOL asynchronous_binding
= FALSE
;
203 static BOOL support_wbapp
, allow_new_window
;
204 static int stream_read
, protocol_read
;
205 static enum load_state_t
{
214 static LPCOLESTR expect_status_text
= NULL
;
215 static const char *nav_url
, *nav_serv_url
;
217 static const char html_page
[] =
219 "<head><link rel=\"stylesheet\" type=\"text/css\" href=\"test.css\"></head>"
220 "<body><div>test</div></body>"
223 static const char css_data
[] = "body {color: red; margin: 0}";
225 static const WCHAR http_urlW
[] =
226 {'h','t','t','p',':','/','/','w','w','w','.','w','i','n','e','h','q','.','o','r','g',0};
228 static const WCHAR doc_url
[] = {'w','i','n','e','t','e','s','t',':','d','o','c',0};
230 #define DOCHOST_DOCCANNAVIGATE 0
231 #define WM_CONTINUE_BINDING (WM_APP+1)
233 static HRESULT
QueryInterface(REFIID riid
, void **ppv
);
234 static void test_MSHTML_QueryStatus(IHTMLDocument2
*,DWORD
);
236 #define test_readyState(u) _test_readyState(__LINE__,u)
237 static void _test_readyState(unsigned,IUnknown
*);
239 static const WCHAR wszTimesNewRoman
[] =
240 {'T','i','m','e','s',' ','N','e','w',' ','R','o','m','a','n',0};
241 static const WCHAR wszArial
[] =
242 {'A','r','i','a','l',0};
244 static const char *debugstr_guid(REFIID riid
)
251 sprintf(buf
, "{%08X-%04X-%04X-%02X%02X-%02X%02X%02X%02X%02X%02X}",
252 riid
->Data1
, riid
->Data2
, riid
->Data3
, riid
->Data4
[0],
253 riid
->Data4
[1], riid
->Data4
[2], riid
->Data4
[3], riid
->Data4
[4],
254 riid
->Data4
[5], riid
->Data4
[6], riid
->Data4
[7]);
259 static int strcmp_wa(LPCWSTR strw
, const char *stra
)
262 WideCharToMultiByte(CP_ACP
, 0, strw
, -1, buf
, sizeof(buf
), NULL
, NULL
);
263 return lstrcmpA(stra
, buf
);
266 static const WCHAR
*strstrW( const WCHAR
*str
, const WCHAR
*sub
)
270 const WCHAR
*p1
= str
, *p2
= sub
;
271 while (*p1
&& *p2
&& *p1
== *p2
) { p1
++; p2
++; }
272 if (!*p2
) return str
;
278 static BSTR
a2bstr(const char *str
)
283 len
= MultiByteToWideChar(CP_ACP
, 0, str
, -1, NULL
, 0);
284 ret
= SysAllocStringLen(NULL
, len
);
285 MultiByteToWideChar(CP_ACP
, 0, str
, -1, ret
, len
);
290 /* Returns true if the user interface is in English. Note that this does not
291 * presume of the formatting of dates, numbers, etc.
293 static BOOL
is_lang_english(void)
295 static HMODULE hkernel32
= NULL
;
296 static LANGID (WINAPI
*pGetThreadUILanguage
)(void) = NULL
;
297 static LANGID (WINAPI
*pGetUserDefaultUILanguage
)(void) = NULL
;
301 hkernel32
= GetModuleHandleA("kernel32.dll");
302 pGetThreadUILanguage
= (void*)GetProcAddress(hkernel32
, "GetThreadUILanguage");
303 pGetUserDefaultUILanguage
= (void*)GetProcAddress(hkernel32
, "GetUserDefaultUILanguage");
305 if (pGetThreadUILanguage
)
306 return PRIMARYLANGID(pGetThreadUILanguage()) == LANG_ENGLISH
;
307 if (pGetUserDefaultUILanguage
)
308 return PRIMARYLANGID(pGetUserDefaultUILanguage()) == LANG_ENGLISH
;
310 return PRIMARYLANGID(GetUserDefaultLangID()) == LANG_ENGLISH
;
313 #define EXPECT_UPDATEUI 1
314 #define EXPECT_SETTITLE 2
316 static void test_timer(DWORD flags
)
318 BOOL
*b
= &called_Exec_SETTITLE
;
321 if(flags
& EXPECT_UPDATEUI
) {
322 SET_EXPECT(UpdateUI
);
323 SET_EXPECT(Exec_UPDATECOMMANDS
);
324 b
= &called_UpdateUI
;
326 if(flags
& EXPECT_SETTITLE
)
327 SET_EXPECT(Exec_SETTITLE
);
329 while(!*b
&& GetMessage(&msg
, hwnd
, 0, 0)) {
330 TranslateMessage(&msg
);
331 DispatchMessage(&msg
);
334 if(flags
& EXPECT_UPDATEUI
) {
335 CHECK_CALLED(UpdateUI
);
336 CHECK_CALLED(Exec_UPDATECOMMANDS
);
338 if(flags
& EXPECT_SETTITLE
)
339 CHECK_CALLED(Exec_SETTITLE
);
342 static IMoniker Moniker
;
344 #define test_GetCurMoniker(u,m,v) _test_GetCurMoniker(__LINE__,u,m,v)
345 static void _test_GetCurMoniker(unsigned line
, IUnknown
*unk
, IMoniker
*exmon
, const char *exurl
)
348 IPersistMoniker
*permon
;
349 IMoniker
*mon
= (void*)0xdeadbeef;
350 BSTR doc_url
= (void*)0xdeadbeef;
356 hres
= IUnknown_QueryInterface(unk
, &IID_IPersistMoniker
, (void**)&permon
);
357 ok(hres
== S_OK
, "QueryInterface(IID_IPersistMoniker) failed: %08x\n", hres
);
361 hres
= IUnknown_QueryInterface(unk
, &IID_IHTMLDocument2
, (void**)&doc
);
362 ok(hres
== S_OK
, "QueryInterface(IID_IHTMLDocument2) failed: %08x\n", hres
);
364 hres
= IHTMLDocument2_get_URL(doc
, &doc_url
);
365 ok(hres
== S_OK
, "get_URL failed: %08x\n", hres
);
367 hres
= IPersistMoniker_GetCurMoniker(permon
, &mon
);
368 IPersistMoniker_Release(permon
);
372 BOOL exb
= expect_GetDisplayName
;
373 BOOL clb
= called_GetDisplayName
;
375 ok_(__FILE__
,line
)(hres
== S_OK
, "GetCurrentMoniker failed: %08x\n", hres
);
376 ok_(__FILE__
,line
)(mon
== exmon
, "mon(%p) != exmon(%p)\n", mon
, exmon
);
379 SET_EXPECT(GetDisplayName
);
380 hres
= IMoniker_GetDisplayName(mon
, NULL
, NULL
, &url
);
381 ok(hres
== S_OK
, "GetDisplayName failed: %08x\n", hres
);
383 CHECK_CALLED(GetDisplayName
);
384 expect_GetDisplayName
= exb
;
385 called_GetDisplayName
= clb
;
388 ok(!lstrcmpW(url
, doc_url
), "url != doc_url\n");
390 ok(!strcmp_wa(url
, nav_serv_url
), "url = %s, expected %s\n", wine_dbgstr_w(url
), nav_serv_url
);
395 ok_(__FILE__
,line
)(hres
== S_OK
, "GetCurrentMoniker failed: %08x\n", hres
);
397 hres
= IMoniker_GetDisplayName(mon
, NULL
, NULL
, &url
);
398 ok(hres
== S_OK
, "GetDisplayName failed: %08x\n", hres
);
400 ok_(__FILE__
,line
)(!strcmp_wa(url
, exurl
), "unexpected url %s\n", wine_dbgstr_w(url
));
401 ok_(__FILE__
,line
)(!lstrcmpW(url
, doc_url
), "url != doc_url\n");
405 ok_(__FILE__
,line
)(hres
== E_UNEXPECTED
,
406 "GetCurrentMoniker failed: %08x, expected E_UNEXPECTED\n", hres
);
407 ok_(__FILE__
,line
)(mon
== (IMoniker
*)0xdeadbeef, "mon=%p\n", mon
);
408 ok_(__FILE__
,line
)(!strcmp_wa(doc_url
, "about:blank"), "doc_url is not about:blank\n");
411 SysFreeString(doc_url
);
412 IHTMLDocument_Release(doc
);
413 if(mon
&& mon
!= (void*)0xdeadbeef)
414 IMoniker_Release(mon
);
417 DEFINE_GUID(IID_External_unk
,0x30510406,0x98B5,0x11CF,0xBB,0x82,0x00,0xAA,0x00,0xBD,0xCE,0x0B);
419 static HRESULT WINAPI
External_QueryInterface(IDispatch
*iface
, REFIID riid
, void **ppv
)
423 if(IsEqualGUID(&IID_IUnknown
, riid
) || IsEqualGUID(&IID_IDispatch
, riid
)) {
428 if(IsEqualGUID(&IID_IProxyManager
, riid
))
429 return E_NOINTERFACE
; /* TODO */
430 if(IsEqualGUID(&IID_IDispatchEx
, riid
))
431 return E_NOINTERFACE
; /* TODO */
432 if(IsEqualGUID(&IID_External_unk
, riid
))
433 return E_NOINTERFACE
; /* TODO */
435 if(!ignore_external_qi
)
436 ok(0, "unexpected riid: %s\n", debugstr_guid(riid
));
437 return E_NOINTERFACE
;
440 static ULONG WINAPI
Dispatch_AddRef(IDispatch
*iface
)
445 static ULONG WINAPI
Dispatch_Release(IDispatch
*iface
)
450 static HRESULT WINAPI
Dispatch_GetTypeInfoCount(IDispatch
*iface
, UINT
*pctinfo
)
452 ok(0, "unexpected call\n");
456 static HRESULT WINAPI
Dispatch_GetTypeInfo(IDispatch
*iface
, UINT iTInfo
, LCID lcid
,
459 ok(0, "unexpected call\n");
463 static HRESULT WINAPI
Dispatch_GetIDsOfNames(IDispatch
*iface
, REFIID riid
, LPOLESTR
*rgszNames
,
464 UINT cNames
, LCID lcid
, DISPID
*rgDispId
)
466 ok(0, "unexpected call\n");
470 static HRESULT WINAPI
External_Invoke(IDispatch
*iface
, DISPID dispIdMember
, REFIID riid
,
471 LCID lcid
, WORD wFlags
, DISPPARAMS
*pDispParams
, VARIANT
*pVarResult
,
472 EXCEPINFO
*pExcepInfo
, UINT
*puArgErr
)
474 ok(0, "unexpected call\n");
478 static const IDispatchVtbl ExternalVtbl
= {
479 External_QueryInterface
,
482 Dispatch_GetTypeInfoCount
,
483 Dispatch_GetTypeInfo
,
484 Dispatch_GetIDsOfNames
,
488 static IDispatch External
= { &ExternalVtbl
};
490 static HRESULT WINAPI
Protocol_QueryInterface(IInternetProtocol
*iface
, REFIID riid
, void **ppv
)
492 if(IsEqualGUID(&IID_IUnknown
, riid
) || IsEqualGUID(&IID_IInternetProtocol
, riid
)) {
498 return E_NOINTERFACE
;
501 static ULONG WINAPI
Protocol_AddRef(IInternetProtocol
*iface
)
506 static ULONG WINAPI
Protocol_Release(IInternetProtocol
*iface
)
511 static HRESULT WINAPI
Protocol_Start(IInternetProtocol
*iface
, LPCWSTR szUrl
,
512 IInternetProtocolSink
*pOIProtSink
, IInternetBindInfo
*pOIBindInfo
,
513 DWORD grfPI
, HANDLE_PTR dwReserved
)
519 static const WCHAR wszTextCss
[] = {'t','e','x','t','/','c','s','s',0};
520 static const WCHAR empty_str
= {0};
524 ok(pOIProtSink
!= NULL
, "pOIProtSink == NULL\n");
525 ok(pOIBindInfo
!= NULL
, "pOIBindInfo == NULL\n");
526 ok(!grfPI
, "grfPI = %x\n", grfPI
);
527 ok(!dwReserved
, "dwReserved = %lx\n", dwReserved
);
529 memset(&bindinfo
, 0, sizeof(bindinfo
));
530 bindinfo
.cbSize
= sizeof(bindinfo
);
531 hres
= IInternetBindInfo_GetBindInfo(pOIBindInfo
, &bindf
, &bindinfo
);
532 ok(hres
== S_OK
, "GetBindInfo failed: %08x\n", hres
);
533 ok(bindf
== (BINDF_FROMURLMON
|BINDF_PULLDATA
|BINDF_NEEDFILE
|BINDF_ASYNCSTORAGE
|BINDF_ASYNCHRONOUS
),
534 "bindf = %x\n", bindf
);
536 ok(bindinfo
.cbSize
== sizeof(bindinfo
), "bindinfo.cbSize=%d\n", bindinfo
.cbSize
);
537 ok(bindinfo
.szExtraInfo
== NULL
, "bindinfo.szExtraInfo=%p\n", bindinfo
.szExtraInfo
);
538 /* TODO: test stgmedData */
539 ok(bindinfo
.grfBindInfoF
== 0, "bindinfo.grfBinfInfoF=%08x\n", bindinfo
.grfBindInfoF
);
540 ok(bindinfo
.dwBindVerb
== 0, "bindinfo.dwBindVerb=%d\n", bindinfo
.dwBindVerb
);
541 ok(bindinfo
.szCustomVerb
== 0, "bindinfo.szCustomVerb=%p\n", bindinfo
.szCustomVerb
);
542 ok(bindinfo
.cbstgmedData
== 0, "bindinfo.cbstgmedData=%d\n", bindinfo
.cbstgmedData
);
543 ok(bindinfo
.dwOptions
== 0x80000 ||
544 bindinfo
.dwOptions
== 0x4080000, /* win2k3 */
545 "bindinfo.dwOptions=%x\n", bindinfo
.dwOptions
);
546 ok(bindinfo
.dwOptionsFlags
== 0, "bindinfo.dwOptionsFlags=%d\n", bindinfo
.dwOptionsFlags
);
547 /* TODO: test dwCodePage */
548 /* TODO: test securityAttributes */
549 ok(IsEqualGUID(&IID_NULL
, &bindinfo
.iid
), "unexpected bindinfo.iid\n");
550 ok(bindinfo
.pUnk
== NULL
, "bindinfo.pUnk=%p\n", bindinfo
.pUnk
);
551 ok(bindinfo
.dwReserved
== 0, "bindinfo.dwReserved=%d\n", bindinfo
.dwReserved
);
553 hres
= IInternetProtocolSink_ReportProgress(pOIProtSink
,
554 BINDSTATUS_CACHEFILENAMEAVAILABLE
, &empty_str
);
555 ok(hres
== S_OK
, "ReportProgress(BINDSTATUS_CACHEFILENAMEAVAILABLE) failed: %08x\n", hres
);
557 hres
= IInternetProtocolSink_ReportProgress(pOIProtSink
,
558 BINDSTATUS_VERIFIEDMIMETYPEAVAILABLE
, wszTextCss
);
560 "ReportProgress(BINDSTATUS_VERIFIEDMIMETYPEAVAILABLE) failed: %08x\n", hres
);
562 hres
= IInternetProtocolSink_ReportData(pOIProtSink
,
563 BSCF_FIRSTDATANOTIFICATION
| BSCF_LASTDATANOTIFICATION
, 13, 13);
564 ok(hres
== S_OK
, "ReportData failed: %08x\n", hres
);
566 hres
= IInternetProtocolSink_ReportResult(pOIProtSink
, S_OK
, 0, NULL
);
567 ok(hres
== S_OK
, "ReportResult failed: %08x\n", hres
);
572 static HRESULT WINAPI
Protocol_Continue(IInternetProtocol
*iface
,
573 PROTOCOLDATA
*pProtocolData
)
575 ok(0, "unexpected call\n");
579 static HRESULT WINAPI
Protocol_Abort(IInternetProtocol
*iface
, HRESULT hrReason
,
582 ok(0, "unexpected call\n");
586 static HRESULT WINAPI
Protocol_Terminate(IInternetProtocol
*iface
, DWORD dwOptions
)
588 CHECK_EXPECT(Terminate
);
592 static HRESULT WINAPI
Protocol_Suspend(IInternetProtocol
*iface
)
594 ok(0, "unexpected call\n");
598 static HRESULT WINAPI
Protocol_Resume(IInternetProtocol
*iface
)
600 ok(0, "unexpected call\n");
604 static HRESULT WINAPI
Protocol_Read(IInternetProtocol
*iface
, void *pv
,
605 ULONG cb
, ULONG
*pcbRead
)
607 CHECK_EXPECT2(Protocol_Read
);
609 ok(pv
!= NULL
, "pv == NULL\n");
610 ok(cb
> sizeof(css_data
), "cb < sizeof(css_data)\n");
611 ok(pcbRead
!= NULL
, "pcbRead == NULL\n");
612 ok(!*pcbRead
, "*pcbRead=%d\n", *pcbRead
);
617 protocol_read
+= *pcbRead
= sizeof(css_data
)-1;
618 memcpy(pv
, css_data
, sizeof(css_data
)-1);
622 static HRESULT WINAPI
Protocol_Seek(IInternetProtocol
*iface
,
623 LARGE_INTEGER dlibMove
, DWORD dwOrigin
, ULARGE_INTEGER
*plibNewPosition
)
625 ok(0, "unexpected call\n");
629 static HRESULT WINAPI
Protocol_LockRequest(IInternetProtocol
*iface
, DWORD dwOptions
)
631 CHECK_EXPECT(LockRequest
);
635 static HRESULT WINAPI
Protocol_UnlockRequest(IInternetProtocol
*iface
)
637 CHECK_EXPECT(UnlockRequest
);
641 static const IInternetProtocolVtbl ProtocolVtbl
= {
642 Protocol_QueryInterface
,
653 Protocol_LockRequest
,
654 Protocol_UnlockRequest
657 static IInternetProtocol Protocol
= { &ProtocolVtbl
};
659 static HRESULT WINAPI
ClassFactory_QueryInterface(IClassFactory
*iface
, REFIID riid
, void **ppv
)
661 if(!IsEqualGUID(&IID_IInternetProtocolInfo
, riid
))
662 ok(0, "unexpected call\n");
663 return E_NOINTERFACE
;
666 static ULONG WINAPI
ClassFactory_AddRef(IClassFactory
*iface
)
671 static ULONG WINAPI
ClassFactory_Release(IClassFactory
*iface
)
676 static HRESULT WINAPI
ClassFactory_CreateInstance(IClassFactory
*iface
, IUnknown
*pOuter
,
677 REFIID riid
, void **ppv
)
679 if(IsEqualGUID(&IID_IInternetProtocolInfo
, riid
))
680 return E_NOINTERFACE
;
682 CHECK_EXPECT(CreateInstance
);
683 ok(ppv
!= NULL
, "ppv == NULL\n");
689 static HRESULT WINAPI
ClassFactory_LockServer(IClassFactory
*iface
, BOOL dolock
)
691 ok(0, "unexpected call\n");
695 static const IClassFactoryVtbl ClassFactoryVtbl
= {
696 ClassFactory_QueryInterface
,
698 ClassFactory_Release
,
699 ClassFactory_CreateInstance
,
700 ClassFactory_LockServer
703 static IClassFactory ClassFactory
= { &ClassFactoryVtbl
};
705 static HRESULT WINAPI
HlinkFrame_QueryInterface(IHlinkFrame
*iface
, REFIID riid
, void **ppv
)
707 ok(0, "unexpected call\n");
711 static ULONG WINAPI
HlinkFrame_AddRef(IHlinkFrame
*iface
)
716 static ULONG WINAPI
HlinkFrame_Release(IHlinkFrame
*iface
)
721 static HRESULT WINAPI
HlinkFrame_SetBrowseContext(IHlinkFrame
*iface
,
722 IHlinkBrowseContext
*pihlbc
)
724 ok(0, "unexpected call\n");
728 static HRESULT WINAPI
HlinkFrame_GetBrowseContext(IHlinkFrame
*iface
,
729 IHlinkBrowseContext
**ppihlbc
)
731 ok(0, "unexpected call\n");
735 static HRESULT WINAPI
HlinkFrame_Navigate(IHlinkFrame
*iface
, DWORD grfHLNF
, LPBC pbc
,
736 IBindStatusCallback
*pibsc
, IHlink
*pihlNavigate
)
740 CHECK_EXPECT(Navigate
);
742 ok(grfHLNF
== 0, "grfHLNF=%d, expected 0\n", grfHLNF
);
743 ok(pbc
!= NULL
, "pbc == NULL\n");
744 ok(pibsc
!= NULL
, "pubsc == NULL\n");
745 ok(pihlNavigate
!= NULL
, "puhlNavigate == NULL\n");
748 LPWSTR frame_name
= (LPWSTR
)0xdeadbeef;
749 LPWSTR location
= (LPWSTR
)0xdeadbeef;
751 IMoniker
*mon
= NULL
;
752 DWORD site_data
= 0xdeadbeef;
754 hres
= IHlink_GetTargetFrameName(pihlNavigate
, &frame_name
);
755 ok(hres
== S_FALSE
, "GetTargetFrameName failed: %08x\n", hres
);
756 ok(frame_name
== NULL
, "frame_name = %p\n", frame_name
);
758 hres
= IHlink_GetMonikerReference(pihlNavigate
, 1, &mon
, &location
);
759 ok(hres
== S_OK
, "GetMonikerReference failed: %08x\n", hres
);
760 ok(location
== NULL
, "location = %p\n", location
);
761 ok(mon
!= NULL
, "mon == NULL\n");
763 hres
= IMoniker_GetDisplayName(mon
, NULL
, NULL
, &location
);
764 ok(hres
== S_OK
, "GetDisplayName failed: %08x\n", hres
);
765 ok(!strcmp_wa(location
, nav_url
), "unexpected display name %s, expected %s\n", wine_dbgstr_w(location
), nav_url
);
766 CoTaskMemFree(location
);
767 IMoniker_Release(mon
);
769 hres
= IHlink_GetHlinkSite(pihlNavigate
, &site
, &site_data
);
770 ok(hres
== S_OK
, "GetHlinkSite failed: %08x\n", hres
);
771 ok(site
== NULL
, "site = %p\n, expected NULL\n", site
);
772 ok(site_data
== 0xdeadbeef, "site_data = %x\n", site_data
);
778 static HRESULT WINAPI
HlinkFrame_OnNavigate(IHlinkFrame
*iface
, DWORD grfHLNF
,
779 IMoniker
*pimkTarget
, LPCWSTR pwzLocation
, LPCWSTR pwzFriendlyName
, DWORD dwreserved
)
781 ok(0, "unexpected call\n");
785 static HRESULT WINAPI
HlinkFrame_UpdateHlink(IHlinkFrame
*iface
, ULONG uHLID
,
786 IMoniker
*pimkTarget
, LPCWSTR pwzLocation
, LPCWSTR pwzFriendlyName
)
788 ok(0, "unexpected call\n");
792 static const IHlinkFrameVtbl HlinkFrameVtbl
= {
793 HlinkFrame_QueryInterface
,
796 HlinkFrame_SetBrowseContext
,
797 HlinkFrame_GetBrowseContext
,
799 HlinkFrame_OnNavigate
,
800 HlinkFrame_UpdateHlink
803 static IHlinkFrame HlinkFrame
= { &HlinkFrameVtbl
};
805 static HRESULT WINAPI
NewWindowManager_QueryInterface(INewWindowManager
*iface
, REFIID riid
, void **ppv
)
807 ok(0, "unexpected call\n");
808 return E_NOINTERFACE
;
811 static ULONG WINAPI
NewWindowManager_AddRef(INewWindowManager
*iface
)
816 static ULONG WINAPI
NewWindowManager_Release(INewWindowManager
*iface
)
821 static HRESULT WINAPI
NewWindowManager_EvaluateNewWindow(INewWindowManager
*iface
, LPCWSTR pszUrl
,
822 LPCWSTR pszName
, LPCWSTR pszUrlContext
, LPCWSTR pszFeatures
, BOOL fReplace
, DWORD dwFlags
,
823 DWORD dwUserActionTime
)
825 CHECK_EXPECT(EvaluateNewWindow
);
827 ok(!strcmp_wa(pszUrl
, "about:blank"), "pszUrl = %s\n", wine_dbgstr_w(pszUrl
));
828 ok(!strcmp_wa(pszName
, "test"), "pszName = %s\n", wine_dbgstr_w(pszName
));
829 ok(!strcmp_wa(pszUrlContext
, "about:replace"), "pszUrlContext = %s\n", wine_dbgstr_w(pszUrlContext
));
830 ok(!pszFeatures
, "pszFeatures = %s\n", wine_dbgstr_w(pszFeatures
));
831 ok(!fReplace
, "fReplace = %x\n", fReplace
);
832 ok(dwFlags
== (allow_new_window
? 0 : NWMF_FIRST
), "dwFlags = %x\n", dwFlags
);
833 ok(!dwUserActionTime
, "dwUserActionime = %d\n", dwUserActionTime
);
835 return allow_new_window
? S_OK
: E_FAIL
;
838 static const INewWindowManagerVtbl NewWindowManagerVtbl
= {
839 NewWindowManager_QueryInterface
,
840 NewWindowManager_AddRef
,
841 NewWindowManager_Release
,
842 NewWindowManager_EvaluateNewWindow
845 static INewWindowManager NewWindowManager
= { &NewWindowManagerVtbl
};
847 static HRESULT WINAPI
PropertyNotifySink_QueryInterface(IPropertyNotifySink
*iface
,
848 REFIID riid
, void**ppv
)
850 if(IsEqualGUID(&IID_IPropertyNotifySink
, riid
)) {
855 ok(0, "unexpected call\n");
856 return E_NOINTERFACE
;
859 static ULONG WINAPI
PropertyNotifySink_AddRef(IPropertyNotifySink
*iface
)
864 static ULONG WINAPI
PropertyNotifySink_Release(IPropertyNotifySink
*iface
)
869 static HRESULT WINAPI
PropertyNotifySink_OnChanged(IPropertyNotifySink
*iface
, DISPID dispID
)
872 case DISPID_READYSTATE
:
873 CHECK_EXPECT2(OnChanged_READYSTATE
);
875 if(!readystate_set_interactive
)
876 test_MSHTML_QueryStatus(NULL
, OLECMDF_SUPPORTED
877 | (editmode
&& (load_state
== LD_INTERACTIVE
|| load_state
== LD_COMPLETE
)
878 ? OLECMDF_ENABLED
: 0));
880 if(readystate_set_loading
) {
881 readystate_set_loading
= FALSE
;
882 load_state
= LD_LOADING
;
884 if(!editmode
|| load_state
!= LD_LOADING
|| !called_Exec_Explorer_69
)
885 test_readyState(NULL
);
888 CHECK_EXPECT(OnChanged_1005
);
890 test_readyState(NULL
);
891 readystate_set_interactive
= (load_state
!= LD_INTERACTIVE
);
894 CHECK_EXPECT(OnChanged_1012
);
909 ok(0, "unexpected id %d\n", dispID
);
913 static HRESULT WINAPI
PropertyNotifySink_OnRequestEdit(IPropertyNotifySink
*iface
, DISPID dispID
)
915 ok(0, "unexpected call\n");
919 static IPropertyNotifySinkVtbl PropertyNotifySinkVtbl
= {
920 PropertyNotifySink_QueryInterface
,
921 PropertyNotifySink_AddRef
,
922 PropertyNotifySink_Release
,
923 PropertyNotifySink_OnChanged
,
924 PropertyNotifySink_OnRequestEdit
927 static IPropertyNotifySink PropertyNotifySink
= { &PropertyNotifySinkVtbl
};
929 static HRESULT WINAPI
Stream_QueryInterface(IStream
*iface
, REFIID riid
, void **ppv
)
931 if(IsEqualGUID(&IID_IUnknown
, riid
) || IsEqualGUID(&IID_ISequentialStream
, riid
) || IsEqualGUID(&IID_IStream
, riid
)) {
936 ok(0, "unexpected call %s\n", debugstr_guid(riid
));
938 return E_NOINTERFACE
;
941 static ULONG WINAPI
Stream_AddRef(IStream
*iface
)
946 static ULONG WINAPI
Stream_Release(IStream
*iface
)
951 static HRESULT WINAPI
Stream_Read(IStream
*iface
, void *pv
,
952 ULONG cb
, ULONG
*pcbRead
)
955 ok(pv
!= NULL
, "pv == NULL\n");
956 ok(cb
> sizeof(html_page
), "cb = %d\n", cb
);
957 ok(pcbRead
!= NULL
, "pcbRead == NULL\n");
958 ok(!*pcbRead
, "*pcbRead = %d\n", *pcbRead
);
963 memcpy(pv
, html_page
, sizeof(html_page
)-1);
964 stream_read
+= *pcbRead
= sizeof(html_page
)-1;
968 static HRESULT WINAPI
Stream_Write(IStream
*iface
, const void *pv
,
969 ULONG cb
, ULONG
*pcbWritten
)
971 ok(0, "unexpected call\n");
975 static HRESULT WINAPI
Stream_Seek(IStream
*iface
, LARGE_INTEGER dlibMove
,
976 DWORD dwOrigin
, ULARGE_INTEGER
*plibNewPosition
)
978 ok(0, "unexpected call\n");
982 static HRESULT WINAPI
Stream_SetSize(IStream
*iface
, ULARGE_INTEGER libNewSize
)
984 ok(0, "unexpected call\n");
988 static HRESULT WINAPI
Stream_CopyTo(IStream
*iface
, IStream
*pstm
,
989 ULARGE_INTEGER cb
, ULARGE_INTEGER
*pcbRead
, ULARGE_INTEGER
*pcbWritten
)
991 ok(0, "unexpected call\n");
995 static HRESULT WINAPI
Stream_Commit(IStream
*iface
, DWORD grfCommitFlags
)
997 ok(0, "unexpected call\n");
1001 static HRESULT WINAPI
Stream_Revert(IStream
*iface
)
1003 ok(0, "unexpected call\n");
1007 static HRESULT WINAPI
Stream_LockRegion(IStream
*iface
, ULARGE_INTEGER libOffset
,
1008 ULARGE_INTEGER cb
, DWORD dwLockType
)
1010 ok(0, "unexpected call\n");
1014 static HRESULT WINAPI
Stream_UnlockRegion(IStream
*iface
,
1015 ULARGE_INTEGER libOffset
, ULARGE_INTEGER cb
, DWORD dwLockType
)
1017 ok(0, "unexpected call\n");
1021 static HRESULT WINAPI
Stream_Stat(IStream
*iface
, STATSTG
*pstatstg
,
1024 ok(0, "unexpected call\n");
1028 static HRESULT WINAPI
Stream_Clone(IStream
*iface
, IStream
**ppstm
)
1030 ok(0, "unexpected call\n");
1034 static const IStreamVtbl StreamVtbl
= {
1035 Stream_QueryInterface
,
1046 Stream_UnlockRegion
,
1051 static IStream Stream
= { &StreamVtbl
};
1053 static HRESULT WINAPI
WinInetHttpInfo_QueryInterface(
1054 IWinInetHttpInfo
* This
,
1058 ok(0, "unexpected call\n");
1059 return E_NOINTERFACE
;
1062 static ULONG WINAPI
WinInetHttpInfo_AddRef(
1063 IWinInetHttpInfo
* This
)
1068 static ULONG WINAPI
WinInetHttpInfo_Release(
1069 IWinInetHttpInfo
* This
)
1074 static HRESULT WINAPI
WinInetHttpInfo_QueryOption(
1075 IWinInetHttpInfo
* This
,
1080 return E_NOTIMPL
; /* TODO */
1083 static HRESULT WINAPI
WinInetHttpInfo_QueryInfo(
1084 IWinInetHttpInfo
* This
,
1091 ok(pdwReserved
== NULL
, "pdwReserved != NULL\n");
1093 if(dwOption
== (HTTP_QUERY_STATUS_CODE
|HTTP_QUERY_FLAG_NUMBER
)) {
1094 ok(pBuffer
!= NULL
, "pBuffer == NULL\n");
1095 ok(*pcbBuf
== sizeof(DWORD
), "*pcbBuf = %d\n", *pcbBuf
);
1096 ok(pdwFlags
== NULL
, "*pdwFlags != NULL\n");
1097 *((DWORD
*)pBuffer
) = status_code
;
1101 return E_NOTIMPL
; /* TODO */
1104 static const IWinInetHttpInfoVtbl WinInetHttpInfoVtbl
= {
1105 WinInetHttpInfo_QueryInterface
,
1106 WinInetHttpInfo_AddRef
,
1107 WinInetHttpInfo_Release
,
1108 WinInetHttpInfo_QueryOption
,
1109 WinInetHttpInfo_QueryInfo
1112 static IWinInetHttpInfo WinInetHttpInfo
= { &WinInetHttpInfoVtbl
};
1114 static HRESULT WINAPI
Binding_QueryInterface(IBinding
*iface
, REFIID riid
, void **ppv
)
1116 if(IsEqualGUID(&IID_IUnknown
, riid
)) {
1121 if(IsEqualGUID(&IID_IWinInetInfo
, riid
) || IsEqualGUID(&IID_IWinInetHttpInfo
, riid
)) {
1122 *ppv
= &WinInetHttpInfo
;
1126 ok(0, "unexpected call\n");
1127 return E_NOINTERFACE
;
1130 static ULONG WINAPI
Binding_AddRef(IBinding
*iface
)
1135 static ULONG WINAPI
Binding_Release(IBinding
*iface
)
1140 static HRESULT WINAPI
Binding_Abort(IBinding
*iface
)
1142 CHECK_EXPECT(Abort
);
1143 if(asynchronous_binding
)
1144 PeekMessage(NULL
, container_hwnd
, WM_CONTINUE_BINDING
, WM_CONTINUE_BINDING
, PM_REMOVE
);
1148 static HRESULT WINAPI
Binding_Suspend(IBinding
*iface
)
1150 ok(0, "unexpected call\n");
1154 static HRESULT WINAPI
Binding_Resume(IBinding
*iface
)
1156 ok(0, "unexpected call\n");
1160 static HRESULT WINAPI
Binding_SetPriority(IBinding
*iface
, LONG nPriority
)
1162 ok(0, "unexpected call\n");
1166 static HRESULT WINAPI
Binding_GetPriority(IBinding
*iface
, LONG
*pnPriority
)
1168 ok(0, "unexpected call\n");
1172 static HRESULT WINAPI
Binding_GetBindResult(IBinding
*iface
, CLSID
*pclsidProtocol
,
1173 DWORD
*pdwResult
, LPOLESTR
*pszResult
, DWORD
*pdwReserved
)
1175 CHECK_EXPECT(GetBindResult
);
1179 static const IBindingVtbl BindingVtbl
= {
1180 Binding_QueryInterface
,
1186 Binding_SetPriority
,
1187 Binding_GetPriority
,
1188 Binding_GetBindResult
1191 static IBinding Binding
= { &BindingVtbl
};
1193 DEFINE_GUID(IID_IMoniker_unk
,0xA158A630,0xED6F,0x45FB,0xB9,0x87,0xF6,0x86,0x76,0xF5,0x77,0x52);
1194 DEFINE_GUID(IID_IMoniker_unk2
, 0x79EAC9D3,0xBAF9,0x11CE,0x8C,0x82,0x00,0xAA,0x00,0x4B,0xA9,0x0B);
1196 static HRESULT WINAPI
Moniker_QueryInterface(IMoniker
*iface
, REFIID riid
, void **ppv
)
1200 if(IsEqualGUID(&IID_IMoniker_unk
, riid
))
1201 return E_NOINTERFACE
; /* TODO */
1202 if(IsEqualGUID(&IID_IMoniker_unk2
, riid
))
1203 return E_NOINTERFACE
; /* TODO */
1205 ok(0, "unexpected riid: %s\n", debugstr_guid(riid
));
1206 return E_NOINTERFACE
;
1209 static ULONG WINAPI
Moniker_AddRef(IMoniker
*iface
)
1214 static ULONG WINAPI
Moniker_Release(IMoniker
*iface
)
1219 static HRESULT WINAPI
Moniker_GetClassID(IMoniker
*iface
, CLSID
*pClassID
)
1221 CHECK_EXPECT(GetClassID
);
1222 ok(IsEqualGUID(pClassID
, &IID_NULL
), "pClassID = %s\n", debugstr_guid(pClassID
));
1226 static HRESULT WINAPI
Moniker_IsDirty(IMoniker
*iface
)
1228 ok(0, "unexpected call\n");
1232 static HRESULT WINAPI
Moniker_Load(IMoniker
*iface
, IStream
*pStm
)
1234 ok(0, "unexpected call\n");
1238 static HRESULT WINAPI
Moniker_Save(IMoniker
*iface
, IStream
*pStm
, BOOL fClearDirty
)
1240 ok(0, "unexpected call\n");
1244 static HRESULT WINAPI
Moniker_GetSizeMax(IMoniker
*iface
, ULARGE_INTEGER
*pcbSize
)
1246 ok(0, "unexpected call\n");
1250 static HRESULT WINAPI
Moniker_BindToObject(IMoniker
*iface
, IBindCtx
*pcb
, IMoniker
*pmkToLeft
,
1251 REFIID riidResult
, void **ppvResult
)
1253 ok(0, "unexpected call\n");
1257 static void continue_binding(IBindStatusCallback
*callback
)
1259 FORMATETC formatetc
= {0xc02d, NULL
, 1, -1, TYMED_ISTREAM
};
1260 STGMEDIUM stgmedium
;
1263 static const WCHAR wszTextHtml
[] = {'t','e','x','t','/','h','t','m','l',0};
1265 hres
= IBindStatusCallback_OnProgress(callback
, 0, 0, BINDSTATUS_MIMETYPEAVAILABLE
,
1267 ok(hres
== S_OK
, "OnProgress(BINDSTATUS_MIMETYPEAVAILABLE) failed: %08x\n", hres
);
1269 hres
= IBindStatusCallback_OnProgress(callback
, sizeof(html_page
)-1, sizeof(html_page
)-1,
1270 BINDSTATUS_BEGINDOWNLOADDATA
, doc_url
);
1271 ok(hres
== S_OK
, "OnProgress(BINDSTATUS_BEGINDOWNLOADDATA) failed: %08x\n", hres
);
1272 if(status_code
!= HTTP_STATUS_OK
) {
1273 CHECK_CALLED_BROKEN(IsErrorUrl
);
1274 SET_EXPECT(IsErrorUrl
);
1278 stgmedium
.tymed
= TYMED_ISTREAM
;
1279 U(stgmedium
).pstm
= &Stream
;
1280 stgmedium
.pUnkForRelease
= (IUnknown
*)&Moniker
;
1281 hres
= IBindStatusCallback_OnDataAvailable(callback
,
1282 BSCF_FIRSTDATANOTIFICATION
|BSCF_LASTDATANOTIFICATION
,
1283 sizeof(html_page
)-1, &formatetc
, &stgmedium
);
1284 ok(hres
== S_OK
, "OnDataAvailable failed: %08x\n", hres
);
1287 hres
= IBindStatusCallback_OnProgress(callback
, sizeof(html_page
)-1, sizeof(html_page
)-1,
1288 BINDSTATUS_ENDDOWNLOADDATA
, NULL
);
1289 ok(hres
== S_OK
, "OnProgress(BINDSTATUS_ENDDOWNLOADDATA) failed: %08x\n", hres
);
1291 SET_EXPECT(GetBindResult
);
1292 hres
= IBindStatusCallback_OnStopBinding(callback
, S_OK
, NULL
);
1293 ok(hres
== S_OK
, "OnStopBinding failed: %08x\n", hres
);
1294 CLEAR_CALLED(GetBindResult
); /* IE7 */
1296 IBindStatusCallback_Release(callback
);
1299 static HRESULT WINAPI
Moniker_BindToStorage(IMoniker
*iface
, IBindCtx
*pbc
, IMoniker
*pmkToLeft
,
1300 REFIID riid
, void **ppv
)
1302 IBindStatusCallback
*callback
= NULL
;
1307 static OLECHAR BSCBHolder
[] = { '_','B','S','C','B','_','H','o','l','d','e','r','_',0 };
1309 CHECK_EXPECT(BindToStorage
);
1311 load_state
= LD_LOADING
;
1313 ok(pbc
!= NULL
, "pbc == NULL\n");
1314 ok(pmkToLeft
== NULL
, "pmkToLeft=%p\n", pmkToLeft
);
1315 ok(IsEqualGUID(&IID_IStream
, riid
), "unexpected riid\n");
1316 ok(ppv
!= NULL
, "ppv == NULL\n");
1317 ok(*ppv
== NULL
, "*ppv=%p\n", *ppv
);
1319 hres
= IBindCtx_GetObjectParam(pbc
, BSCBHolder
, (IUnknown
**)&callback
);
1320 ok(hres
== S_OK
, "GetObjectParam failed: %08x\n", hres
);
1321 ok(callback
!= NULL
, "callback == NULL\n");
1323 memset(&bindinfo
, 0xf0, sizeof(bindinfo
));
1324 bindinfo
.cbSize
= sizeof(bindinfo
);
1326 hres
= IBindStatusCallback_GetBindInfo(callback
, &bindf
, &bindinfo
);
1327 ok(hres
== S_OK
, "GetBindInfo failed: %08x\n", hres
);
1328 ok((bindf
& ~BINDF_HYPERLINK
/* IE9 */) == (BINDF_PULLDATA
|BINDF_ASYNCSTORAGE
|BINDF_ASYNCHRONOUS
), "bindf = %08x\n", bindf
);
1329 ok(bindinfo
.cbSize
== sizeof(bindinfo
), "bindinfo.cbSize=%d\n", bindinfo
.cbSize
);
1330 ok(bindinfo
.szExtraInfo
== NULL
, "bindinfo.szExtraInfo=%p\n", bindinfo
.szExtraInfo
);
1331 /* TODO: test stgmedData */
1332 ok(bindinfo
.grfBindInfoF
== 0, "bindinfo.grfBinfInfoF=%08x\n", bindinfo
.grfBindInfoF
);
1333 ok(bindinfo
.dwBindVerb
== 0, "bindinfo.dwBindVerb=%d\n", bindinfo
.dwBindVerb
);
1334 ok(bindinfo
.szCustomVerb
== 0, "bindinfo.szCustomVerb=%p\n", bindinfo
.szCustomVerb
);
1335 ok(bindinfo
.cbstgmedData
== 0, "bindinfo.cbstgmedData=%d\n", bindinfo
.cbstgmedData
);
1336 ok(bindinfo
.dwOptions
== 0x80000 || bindinfo
.dwOptions
== 0x4080000,
1337 "bindinfo.dwOptions=%x\n", bindinfo
.dwOptions
);
1338 ok(bindinfo
.dwOptionsFlags
== 0, "bindinfo.dwOptionsFlags=%d\n", bindinfo
.dwOptionsFlags
);
1339 /* TODO: test dwCodePage */
1340 /* TODO: test securityAttributes */
1341 ok(IsEqualGUID(&IID_NULL
, &bindinfo
.iid
), "unexpected bindinfo.iid\n");
1342 ok(bindinfo
.pUnk
== NULL
, "bindinfo.pUnk=%p\n", bindinfo
.pUnk
);
1343 ok(bindinfo
.dwReserved
== 0, "bindinfo.dwReserved=%d\n", bindinfo
.dwReserved
);
1345 hres
= IBindStatusCallback_OnStartBinding(callback
, 0, &Binding
);
1346 ok(hres
== S_OK
, "OnStartBinding failed: %08x\n", hres
);
1348 if(asynchronous_binding
) {
1349 PostMessageW(container_hwnd
, WM_CONTINUE_BINDING
, (WPARAM
)callback
, 0);
1350 return MK_S_ASYNCHRONOUS
;
1353 continue_binding(callback
);
1357 static HRESULT WINAPI
Moniker_Reduce(IMoniker
*iface
, IBindCtx
*pbc
, DWORD dwReduceHowFar
,
1358 IMoniker
**ppmkToLeft
, IMoniker
**ppmkReduced
)
1360 ok(0, "unexpected call\n");
1364 static HRESULT WINAPI
Moniker_ComposeWith(IMoniker
*iface
, IMoniker
*pmkRight
,
1365 BOOL fOnlyIfNotGeneric
, IMoniker
**ppnkComposite
)
1367 ok(0, "unexpected call\n");
1371 static HRESULT WINAPI
Moniker_Enum(IMoniker
*iface
, BOOL fForwrd
, IEnumMoniker
**ppenumMoniker
)
1373 ok(0, "unexpected call\n");
1377 static HRESULT WINAPI
Moniker_IsEqual(IMoniker
*iface
, IMoniker
*pmkOtherMoniker
)
1379 ok(0, "unexpected call\n");
1383 static HRESULT WINAPI
Moniker_Hash(IMoniker
*iface
, DWORD
*pdwHash
)
1385 ok(0, "unexpected call\n");
1389 static HRESULT WINAPI
Moniker_IsRunning(IMoniker
*iface
, IBindCtx
*pbc
, IMoniker
*pmkToLeft
,
1390 IMoniker
*pmkNewlyRunning
)
1392 ok(0, "unexpected call\n");
1396 static HRESULT WINAPI
Moniker_GetTimeOfLastChange(IMoniker
*iface
, IBindCtx
*pbc
,
1397 IMoniker
*pmkToLeft
, FILETIME
*pFileTime
)
1399 ok(0, "unexpected call\n");
1403 static HRESULT WINAPI
Moniker_Inverse(IMoniker
*iface
, IMoniker
**ppmk
)
1405 ok(0, "unexpected call\n");
1409 static HRESULT WINAPI
Moniker_CommonPrefixWith(IMoniker
*iface
, IMoniker
*pmkOther
,
1410 IMoniker
**ppmkPrefix
)
1412 ok(0, "unexpected call\n");
1416 static HRESULT WINAPI
Moniker_RelativePathTo(IMoniker
*iface
, IMoniker
*pmkOther
,
1417 IMoniker
**pmkRelPath
)
1419 ok(0, "unexpected call\n");
1423 static HRESULT WINAPI
Moniker_GetDisplayName(IMoniker
*iface
, IBindCtx
*pbc
,
1424 IMoniker
*pmkToLeft
, LPOLESTR
*ppszDisplayName
)
1426 CHECK_EXPECT2(GetDisplayName
);
1428 /* ok(pbc != NULL, "pbc == NULL\n"); */
1429 ok(pmkToLeft
== NULL
, "pmkToLeft=%p\n", pmkToLeft
);
1430 ok(ppszDisplayName
!= NULL
, "ppszDisplayName == NULL\n");
1432 *ppszDisplayName
= CoTaskMemAlloc(sizeof(doc_url
));
1433 memcpy(*ppszDisplayName
, doc_url
, sizeof(doc_url
));
1438 static HRESULT WINAPI
Moniker_ParseDisplayName(IMoniker
*iface
, IBindCtx
*pbc
,
1439 IMoniker
*pmkToLeft
, LPOLESTR pszDisplayName
, ULONG
*pchEaten
, IMoniker
**ppmkOut
)
1441 ok(0, "unexpected call\n");
1445 static HRESULT WINAPI
Moniker_IsSystemMoniker(IMoniker
*iface
, DWORD
*pdwMksys
)
1447 CHECK_EXPECT(IsSystemMoniker
);
1451 static const IMonikerVtbl MonikerVtbl
= {
1452 Moniker_QueryInterface
,
1460 Moniker_BindToObject
,
1461 Moniker_BindToStorage
,
1463 Moniker_ComposeWith
,
1468 Moniker_GetTimeOfLastChange
,
1470 Moniker_CommonPrefixWith
,
1471 Moniker_RelativePathTo
,
1472 Moniker_GetDisplayName
,
1473 Moniker_ParseDisplayName
,
1474 Moniker_IsSystemMoniker
1477 static IMoniker Moniker
= { &MonikerVtbl
};
1479 static HRESULT WINAPI
OleContainer_QueryInterface(IOleContainer
*iface
, REFIID riid
, void **ppv
)
1481 return QueryInterface(riid
, ppv
);
1484 static ULONG WINAPI
OleContainer_AddRef(IOleContainer
*iface
)
1489 static ULONG WINAPI
OleContainer_Release(IOleContainer
*iface
)
1494 static HRESULT WINAPI
OleContainer_ParseDisplayName(IOleContainer
*iface
, IBindCtx
*pbc
,
1495 LPOLESTR pszDiaplayName
, ULONG
*pchEaten
, IMoniker
**ppmkOut
)
1497 ok(0, "unexpected call\n");
1501 static HRESULT WINAPI
OleContainer_EnumObjects(IOleContainer
*iface
, DWORD grfFlags
,
1502 IEnumUnknown
**ppenum
)
1504 ok(0, "unexpected call\n");
1508 static HRESULT WINAPI
OleContainer_LockContainer(IOleContainer
*iface
, BOOL fLock
)
1510 CHECK_EXPECT(LockContainer
);
1511 ok(expect_LockContainer_fLock
== fLock
, "fLock=%x, expected %x\n", fLock
, expect_LockContainer_fLock
);
1515 static const IOleContainerVtbl OleContainerVtbl
= {
1516 OleContainer_QueryInterface
,
1517 OleContainer_AddRef
,
1518 OleContainer_Release
,
1519 OleContainer_ParseDisplayName
,
1520 OleContainer_EnumObjects
,
1521 OleContainer_LockContainer
1524 static IOleContainer OleContainer
= { &OleContainerVtbl
};
1526 static HRESULT WINAPI
ClientSite_QueryInterface(IOleClientSite
*iface
, REFIID riid
, void **ppv
)
1528 return QueryInterface(riid
, ppv
);
1531 static ULONG WINAPI
ClientSite_AddRef(IOleClientSite
*iface
)
1536 static ULONG WINAPI
ClientSite_Release(IOleClientSite
*iface
)
1541 static HRESULT WINAPI
ClientSite_SaveObject(IOleClientSite
*iface
)
1543 ok(0, "unexpected call\n");
1547 static HRESULT WINAPI
ClientSite_GetMoniker(IOleClientSite
*iface
, DWORD dwAssign
, DWORD dwWhichMoniker
,
1550 ok(0, "unexpected call\n");
1554 static HRESULT WINAPI
ClientSite_GetContainer(IOleClientSite
*iface
, IOleContainer
**ppContainer
)
1556 CHECK_EXPECT(GetContainer
);
1557 ok(ppContainer
!= NULL
, "ppContainer = NULL\n");
1558 *ppContainer
= &OleContainer
;
1562 static HRESULT WINAPI
ClientSite_ShowObject(IOleClientSite
*iface
)
1564 ok(0, "unexpected call\n");
1568 static HRESULT WINAPI
ClientSite_OnShowWindow(IOleClientSite
*iface
, BOOL fShow
)
1570 ok(0, "unexpected call\n");
1574 static HRESULT WINAPI
ClientSite_RequestNewObjectLayout(IOleClientSite
*iface
)
1576 ok(0, "unexpected call\n");
1580 static const IOleClientSiteVtbl ClientSiteVtbl
= {
1581 ClientSite_QueryInterface
,
1584 ClientSite_SaveObject
,
1585 ClientSite_GetMoniker
,
1586 ClientSite_GetContainer
,
1587 ClientSite_ShowObject
,
1588 ClientSite_OnShowWindow
,
1589 ClientSite_RequestNewObjectLayout
1592 static IOleClientSite ClientSite
= { &ClientSiteVtbl
};
1594 static HRESULT WINAPI
InPlaceFrame_QueryInterface(IOleInPlaceFrame
*iface
, REFIID riid
, void **ppv
)
1596 static const GUID undocumented_frame_iid
= {0xfbece6c9,0x48d7,0x4a37,{0x8f,0xe3,0x6a,0xd4,0x27,0x2f,0xdd,0xac}};
1598 if(!IsEqualGUID(&undocumented_frame_iid
, riid
))
1599 ok(0, "unexpected riid %s\n", debugstr_guid(riid
));
1602 return E_NOINTERFACE
;
1605 static ULONG WINAPI
InPlaceFrame_AddRef(IOleInPlaceFrame
*iface
)
1610 static ULONG WINAPI
InPlaceFrame_Release(IOleInPlaceFrame
*iface
)
1615 static HRESULT WINAPI
InPlaceFrame_GetWindow(IOleInPlaceFrame
*iface
, HWND
*phwnd
)
1617 CHECK_EXPECT(Frame_GetWindow
);
1621 static HRESULT WINAPI
InPlaceFrame_ContextSensitiveHelp(IOleInPlaceFrame
*iface
, BOOL fEnterMode
)
1623 ok(0, "unexpected call\n");
1627 static HRESULT WINAPI
InPlaceFrame_GetBorder(IOleInPlaceFrame
*iface
, LPRECT lprectBorder
)
1629 ok(0, "unexpected call\n");
1633 static HRESULT WINAPI
InPlaceFrame_RequestBorderSpace(IOleInPlaceFrame
*iface
,
1634 LPCBORDERWIDTHS pborderwidths
)
1636 ok(0, "unexpected call\n");
1640 static HRESULT WINAPI
InPlaceFrame_SetBorderSpace(IOleInPlaceFrame
*iface
,
1641 LPCBORDERWIDTHS pborderwidths
)
1643 CHECK_EXPECT(InPlaceFrame_SetBorderSpace
);
1647 static HRESULT WINAPI
InPlaceUIWindow_SetActiveObject(IOleInPlaceFrame
*iface
,
1648 IOleInPlaceActiveObject
*pActiveObject
, LPCOLESTR pszObjName
)
1650 static const WCHAR wszHTML_Document
[] =
1651 {'H','T','M','L',' ','D','o','c','u','m','e','n','t',0};
1653 CHECK_EXPECT2(InPlaceUIWindow_SetActiveObject
);
1655 if(expect_InPlaceUIWindow_SetActiveObject_active
) {
1656 ok(pActiveObject
!= NULL
, "pActiveObject = NULL\n");
1657 if(pActiveObject
&& is_lang_english())
1658 ok(!lstrcmpW(wszHTML_Document
, pszObjName
), "%s != \"HTML Document\"\n", wine_dbgstr_w(pszObjName
));
1661 ok(pActiveObject
== NULL
, "pActiveObject=%p, expected NULL\n", pActiveObject
);
1662 ok(pszObjName
== NULL
, "pszObjName=%p, expected NULL\n", pszObjName
);
1664 expect_InPlaceUIWindow_SetActiveObject_active
= !expect_InPlaceUIWindow_SetActiveObject_active
;
1668 static HRESULT WINAPI
InPlaceFrame_SetActiveObject(IOleInPlaceFrame
*iface
,
1669 IOleInPlaceActiveObject
*pActiveObject
, LPCOLESTR pszObjName
)
1671 static const WCHAR wszHTML_Document
[] =
1672 {'H','T','M','L',' ','D','o','c','u','m','e','n','t',0};
1675 CHECK_EXPECT2(SetActiveObject
);
1677 if(pActiveObject
&& is_lang_english())
1678 ok(!lstrcmpW(wszHTML_Document
, pszObjName
), "%s != \"HTML Document\"\n", wine_dbgstr_w(pszObjName
));
1680 CHECK_EXPECT(SetActiveObject_null
);
1682 ok(pActiveObject
== NULL
, "pActiveObject=%p, expected NULL\n", pActiveObject
);
1683 ok(pszObjName
== NULL
, "pszObjName=%p, expected NULL\n", pszObjName
);
1689 static HRESULT WINAPI
InPlaceFrame_InsertMenus(IOleInPlaceFrame
*iface
, HMENU hmenuShared
,
1690 LPOLEMENUGROUPWIDTHS lpMenuWidths
)
1692 ok(0, "unexpected call\n");
1696 static HRESULT WINAPI
InPlaceFrame_SetMenu(IOleInPlaceFrame
*iface
, HMENU hmenuShared
,
1697 HOLEMENU holemenu
, HWND hwndActiveObject
)
1699 ok(0, "unexpected call\n");
1703 static HRESULT WINAPI
InPlaceFrame_RemoveMenus(IOleInPlaceFrame
*iface
, HMENU hmenuShared
)
1705 ok(0, "unexpected call\n");
1709 static HRESULT WINAPI
InPlaceFrame_SetStatusText(IOleInPlaceFrame
*iface
, LPCOLESTR pszStatusText
)
1711 CHECK_EXPECT2(SetStatusText
);
1712 if(!expect_status_text
)
1713 ok(pszStatusText
== NULL
, "pszStatusText=%p, expected NULL\n", pszStatusText
);
1717 static HRESULT WINAPI
InPlaceFrame_EnableModeless(IOleInPlaceFrame
*iface
, BOOL fEnable
)
1720 CHECK_EXPECT2(Frame_EnableModeless_TRUE
);
1722 CHECK_EXPECT2(Frame_EnableModeless_FALSE
);
1726 static HRESULT WINAPI
InPlaceFrame_TranslateAccelerator(IOleInPlaceFrame
*iface
, LPMSG lpmsg
, WORD wID
)
1728 ok(0, "unexpected call\n");
1732 static const IOleInPlaceFrameVtbl InPlaceFrameVtbl
= {
1733 InPlaceFrame_QueryInterface
,
1734 InPlaceFrame_AddRef
,
1735 InPlaceFrame_Release
,
1736 InPlaceFrame_GetWindow
,
1737 InPlaceFrame_ContextSensitiveHelp
,
1738 InPlaceFrame_GetBorder
,
1739 InPlaceFrame_RequestBorderSpace
,
1740 InPlaceFrame_SetBorderSpace
,
1741 InPlaceFrame_SetActiveObject
,
1742 InPlaceFrame_InsertMenus
,
1743 InPlaceFrame_SetMenu
,
1744 InPlaceFrame_RemoveMenus
,
1745 InPlaceFrame_SetStatusText
,
1746 InPlaceFrame_EnableModeless
,
1747 InPlaceFrame_TranslateAccelerator
1750 static IOleInPlaceFrame InPlaceFrame
= { &InPlaceFrameVtbl
};
1752 static const IOleInPlaceFrameVtbl InPlaceUIWindowVtbl
= {
1753 InPlaceFrame_QueryInterface
,
1754 InPlaceFrame_AddRef
,
1755 InPlaceFrame_Release
,
1756 InPlaceFrame_GetWindow
,
1757 InPlaceFrame_ContextSensitiveHelp
,
1758 InPlaceFrame_GetBorder
,
1759 InPlaceFrame_RequestBorderSpace
,
1760 InPlaceFrame_SetBorderSpace
,
1761 InPlaceUIWindow_SetActiveObject
,
1764 static IOleInPlaceFrame InPlaceUIWindow
= { &InPlaceUIWindowVtbl
};
1766 static HRESULT WINAPI
InPlaceSiteWindowless_QueryInterface(IOleInPlaceSiteWindowless
*iface
, REFIID riid
, void **ppv
)
1768 return QueryInterface(riid
, ppv
);
1771 static ULONG WINAPI
InPlaceSiteWindowless_AddRef(IOleInPlaceSiteWindowless
*iface
)
1776 static ULONG WINAPI
InPlaceSiteWindowless_Release(IOleInPlaceSiteWindowless
*iface
)
1781 static HRESULT WINAPI
InPlaceSiteWindowless_GetWindow(
1782 IOleInPlaceSiteWindowless
*iface
, HWND
*phwnd
)
1784 IOleClientSite
*client_site
;
1785 IOleObject
*ole_obj
;
1788 CHECK_EXPECT2(GetWindow
);
1789 ok(phwnd
!= NULL
, "phwnd = NULL\n");
1790 *phwnd
= container_hwnd
;
1792 hres
= IUnknown_QueryInterface(doc_unk
, &IID_IOleObject
, (void**)&ole_obj
);
1793 ok(hres
== S_OK
, "Could not get IOleObject: %08x\n", hres
);
1795 hres
= IOleObject_GetClientSite(ole_obj
, &client_site
);
1796 IOleObject_Release(ole_obj
);
1797 ok(hres
== S_OK
, "GetClientSite failed: %08x\n", hres
);
1798 ok(client_site
== &ClientSite
, "client_site != ClientSite\n");
1799 IOleClientSite_Release(client_site
);
1804 static HRESULT WINAPI
InPlaceSiteWindowless_ContextSensitiveHelp(
1805 IOleInPlaceSiteWindowless
*iface
, BOOL fEnterMode
)
1807 ok(0, "unexpected call\n");
1811 static HRESULT WINAPI
InPlaceSiteWindowless_CanInPlaceActivate(
1812 IOleInPlaceSiteWindowless
*iface
)
1814 CHECK_EXPECT(CanInPlaceActivate
);
1818 static HRESULT WINAPI
InPlaceSiteWindowless_OnInPlaceActivate(
1819 IOleInPlaceSiteWindowless
*iface
)
1821 CHECK_EXPECT(OnInPlaceActivate
);
1822 inplace_deactivated
= FALSE
;
1826 static HRESULT WINAPI
InPlaceSiteWindowless_OnUIActivate(
1827 IOleInPlaceSiteWindowless
*iface
)
1829 CHECK_EXPECT(OnUIActivate
);
1833 static HRESULT WINAPI
InPlaceSiteWindowless_GetWindowContext(
1834 IOleInPlaceSiteWindowless
*iface
, IOleInPlaceFrame
**ppFrame
,
1835 IOleInPlaceUIWindow
**ppDoc
, LPRECT lprcPosRect
,
1836 LPRECT lprcClipRect
, LPOLEINPLACEFRAMEINFO lpFrameInfo
)
1838 static const RECT rect
= {0,0,500,500};
1840 CHECK_EXPECT(GetWindowContext
);
1842 ok(ppFrame
!= NULL
, "ppFrame = NULL\n");
1844 *ppFrame
= &InPlaceFrame
;
1845 ok(ppDoc
!= NULL
, "ppDoc = NULL\n");
1847 *ppDoc
= (IOleInPlaceUIWindow
*)&InPlaceUIWindow
;
1848 ok(lprcPosRect
!= NULL
, "lprcPosRect = NULL\n");
1850 memcpy(lprcPosRect
, &rect
, sizeof(RECT
));
1851 ok(lprcClipRect
!= NULL
, "lprcClipRect = NULL\n");
1853 memcpy(lprcClipRect
, &rect
, sizeof(RECT
));
1854 ok(lpFrameInfo
!= NULL
, "lpFrameInfo = NULL\n");
1856 ok(lpFrameInfo
->cb
== sizeof(*lpFrameInfo
), "lpFrameInfo->cb = %u, expected %u\n", lpFrameInfo
->cb
, (unsigned)sizeof(*lpFrameInfo
));
1857 lpFrameInfo
->fMDIApp
= FALSE
;
1858 lpFrameInfo
->hwndFrame
= container_hwnd
;
1859 lpFrameInfo
->haccel
= NULL
;
1860 lpFrameInfo
->cAccelEntries
= 0;
1866 static HRESULT WINAPI
InPlaceSiteWindowless_Scroll(
1867 IOleInPlaceSiteWindowless
*iface
, SIZE scrollExtent
)
1869 ok(0, "unexpected call\n");
1873 static HRESULT WINAPI
InPlaceSiteWindowless_OnUIDeactivate(
1874 IOleInPlaceSiteWindowless
*iface
, BOOL fUndoable
)
1876 CHECK_EXPECT(OnUIDeactivate
);
1877 ok(!fUndoable
, "fUndoable = TRUE\n");
1881 static HRESULT WINAPI
InPlaceSiteWindowless_OnInPlaceDeactivate(
1882 IOleInPlaceSiteWindowless
*iface
)
1884 CHECK_EXPECT(OnInPlaceDeactivate
);
1885 inplace_deactivated
= TRUE
;
1889 static HRESULT WINAPI
InPlaceSiteWindowless_DiscardUndoState(
1890 IOleInPlaceSiteWindowless
*iface
)
1892 ok(0, "unexpected call\n");
1896 static HRESULT WINAPI
InPlaceSiteWindowless_DeactivateAndUndo(
1897 IOleInPlaceSiteWindowless
*iface
)
1899 ok(0, "unexpected call\n");
1903 static HRESULT WINAPI
InPlaceSiteWindowless_OnPosRectChange(
1904 IOleInPlaceSiteWindowless
*iface
, LPCRECT lprcPosRect
)
1906 ok(0, "unexpected call\n");
1910 static HRESULT WINAPI
InPlaceSiteWindowless_OnInPlaceActivateEx(
1911 IOleInPlaceSiteWindowless
*iface
, BOOL
*pfNoRedraw
, DWORD dwFlags
)
1913 CHECK_EXPECT(OnInPlaceActivateEx
);
1915 ok(pfNoRedraw
!= NULL
, "pfNoRedraw == NULL\n");
1916 ok(!*pfNoRedraw
, "*pfNoRedraw == TRUE\n");
1917 ok(dwFlags
== 0, "dwFlags = %08x\n", dwFlags
);
1922 static HRESULT WINAPI
InPlaceSiteWindowless_OnInPlaceDeactivateEx(
1923 IOleInPlaceSiteWindowless
*iface
, BOOL fNoRedraw
)
1925 CHECK_EXPECT(OnInPlaceDeactivateEx
);
1927 ok(fNoRedraw
, "fNoRedraw == FALSE\n");
1932 static HRESULT WINAPI
InPlaceSiteWindowless_RequestUIActivate(
1933 IOleInPlaceSiteWindowless
*iface
)
1935 CHECK_EXPECT2(RequestUIActivate
);
1939 static HRESULT WINAPI
InPlaceSiteWindowless_CanWindowlessActivate(
1940 IOleInPlaceSiteWindowless
*iface
)
1942 ok(0, "unexpected call\n");
1946 static HRESULT WINAPI
InPlaceSiteWindowless_GetCapture(
1947 IOleInPlaceSiteWindowless
*iface
)
1949 ok(0, "unexpected call\n");
1953 static HRESULT WINAPI
InPlaceSiteWindowless_SetCapture(
1954 IOleInPlaceSiteWindowless
*iface
, BOOL fCapture
)
1956 ok(0, "unexpected call\n");
1960 static HRESULT WINAPI
InPlaceSiteWindowless_GetFocus(
1961 IOleInPlaceSiteWindowless
*iface
)
1963 ok(0, "unexpected call\n");
1967 static HRESULT WINAPI
InPlaceSiteWindowless_SetFocus(
1968 IOleInPlaceSiteWindowless
*iface
, BOOL fFocus
)
1970 ok(0, "unexpected call\n");
1974 static HRESULT WINAPI
InPlaceSiteWindowless_GetDC(
1975 IOleInPlaceSiteWindowless
*iface
, LPCRECT pRect
,
1976 DWORD grfFlags
, HDC
*phDC
)
1978 ok(0, "unexpected call\n");
1982 static HRESULT WINAPI
InPlaceSiteWindowless_ReleaseDC(
1983 IOleInPlaceSiteWindowless
*iface
, HDC hDC
)
1985 ok(0, "unexpected call\n");
1989 static HRESULT WINAPI
InPlaceSiteWindowless_InvalidateRect(
1990 IOleInPlaceSiteWindowless
*iface
, LPCRECT pRect
, BOOL fErase
)
1992 ok(0, "unexpected call\n");
1996 static HRESULT WINAPI
InPlaceSiteWindowless_InvalidateRgn(
1997 IOleInPlaceSiteWindowless
*iface
, HRGN hRGN
, BOOL fErase
)
1999 ok(0, "unexpected call\n");
2003 static HRESULT WINAPI
InPlaceSiteWindowless_ScrollRect(
2004 IOleInPlaceSiteWindowless
*iface
, INT dx
, INT dy
,
2005 LPCRECT pRectScroll
, LPCRECT pRectClip
)
2007 ok(0, "unexpected call\n");
2011 static HRESULT WINAPI
InPlaceSiteWindowless_AdjustRect(
2012 IOleInPlaceSiteWindowless
*iface
, LPRECT prc
)
2014 ok(0, "unexpected call\n");
2018 static HRESULT WINAPI
InPlaceSiteWindowless_OnDefWindowMessage(
2019 IOleInPlaceSiteWindowless
*iface
, UINT msg
,
2020 WPARAM wParam
, LPARAM lParam
, LRESULT
*plResult
)
2022 ok(0, "unexpected call\n");
2026 static const IOleInPlaceSiteWindowlessVtbl InPlaceSiteWindowlessVtbl
= {
2027 InPlaceSiteWindowless_QueryInterface
,
2028 InPlaceSiteWindowless_AddRef
,
2029 InPlaceSiteWindowless_Release
,
2030 InPlaceSiteWindowless_GetWindow
,
2031 InPlaceSiteWindowless_ContextSensitiveHelp
,
2032 InPlaceSiteWindowless_CanInPlaceActivate
,
2033 InPlaceSiteWindowless_OnInPlaceActivate
,
2034 InPlaceSiteWindowless_OnUIActivate
,
2035 InPlaceSiteWindowless_GetWindowContext
,
2036 InPlaceSiteWindowless_Scroll
,
2037 InPlaceSiteWindowless_OnUIDeactivate
,
2038 InPlaceSiteWindowless_OnInPlaceDeactivate
,
2039 InPlaceSiteWindowless_DiscardUndoState
,
2040 InPlaceSiteWindowless_DeactivateAndUndo
,
2041 InPlaceSiteWindowless_OnPosRectChange
,
2042 InPlaceSiteWindowless_OnInPlaceActivateEx
,
2043 InPlaceSiteWindowless_OnInPlaceDeactivateEx
,
2044 InPlaceSiteWindowless_RequestUIActivate
,
2045 InPlaceSiteWindowless_CanWindowlessActivate
,
2046 InPlaceSiteWindowless_GetCapture
,
2047 InPlaceSiteWindowless_SetCapture
,
2048 InPlaceSiteWindowless_GetFocus
,
2049 InPlaceSiteWindowless_SetFocus
,
2050 InPlaceSiteWindowless_GetDC
,
2051 InPlaceSiteWindowless_ReleaseDC
,
2052 InPlaceSiteWindowless_InvalidateRect
,
2053 InPlaceSiteWindowless_InvalidateRgn
,
2054 InPlaceSiteWindowless_ScrollRect
,
2055 InPlaceSiteWindowless_AdjustRect
,
2056 InPlaceSiteWindowless_OnDefWindowMessage
2059 static IOleInPlaceSiteWindowless InPlaceSiteWindowless
= { &InPlaceSiteWindowlessVtbl
};
2061 static HRESULT WINAPI
DocumentSite_QueryInterface(IOleDocumentSite
*iface
, REFIID riid
, void **ppv
)
2063 return QueryInterface(riid
, ppv
);
2066 static ULONG WINAPI
DocumentSite_AddRef(IOleDocumentSite
*iface
)
2071 static ULONG WINAPI
DocumentSite_Release(IOleDocumentSite
*iface
)
2078 CallUIActivate_None
,
2079 CallUIActivate_ActivateMe
,
2080 CallUIActivate_AfterShow
,
2083 static BOOL call_UIActivate
= CallUIActivate_ActivateMe
;
2084 static HRESULT WINAPI
DocumentSite_ActivateMe(IOleDocumentSite
*iface
, IOleDocumentView
*pViewToActivate
)
2086 IOleDocument
*document
;
2089 CHECK_EXPECT(ActivateMe
);
2090 ok(pViewToActivate
!= NULL
, "pViewToActivate = NULL\n");
2092 hres
= IOleDocumentView_QueryInterface(pViewToActivate
, &IID_IOleDocument
, (void**)&document
);
2093 ok(hres
== S_OK
, "could not get IOleDocument: %08x\n", hres
);
2095 if(SUCCEEDED(hres
)) {
2096 hres
= IOleDocument_CreateView(document
, (IOleInPlaceSite
*)&InPlaceSiteWindowless
, NULL
, 0, &view
);
2097 ok(hres
== S_OK
, "CreateView failed: %08x\n", hres
);
2099 if(SUCCEEDED(hres
)) {
2100 IOleInPlaceActiveObject
*activeobj
= NULL
;
2101 IOleInPlaceSite
*inplacesite
= NULL
;
2102 HWND tmp_hwnd
= NULL
;
2103 static RECT rect
= {0,0,400,500};
2105 hres
= IOleDocumentView_GetInPlaceSite(view
, &inplacesite
);
2106 ok(hres
== S_OK
, "GetInPlaceSite failed: %08x\n", hres
);
2107 ok(inplacesite
== (IOleInPlaceSite
*)&InPlaceSiteWindowless
, "inplacesite=%p, expected %p\n",
2108 inplacesite
, &InPlaceSiteWindowless
);
2110 hres
= IOleDocumentView_SetInPlaceSite(view
, (IOleInPlaceSite
*)&InPlaceSiteWindowless
);
2111 ok(hres
== S_OK
, "SetInPlaceSite failed: %08x\n", hres
);
2113 hres
= IOleDocumentView_GetInPlaceSite(view
, &inplacesite
);
2114 ok(hres
== S_OK
, "GetInPlaceSite failed: %08x\n", hres
);
2115 ok(inplacesite
== (IOleInPlaceSite
*)&InPlaceSiteWindowless
, "inplacesite=%p, expected %p\n",
2116 inplacesite
, &InPlaceSiteWindowless
);
2118 hres
= IOleDocumentView_QueryInterface(view
, &IID_IOleInPlaceActiveObject
, (void**)&activeobj
);
2119 ok(hres
== S_OK
, "Could not get IOleInPlaceActiveObject: %08x\n", hres
);
2122 IOleInPlaceActiveObject_GetWindow(activeobj
, &hwnd
);
2123 ok(hres
== S_OK
, "GetWindow failed: %08x\n", hres
);
2124 ok(hwnd
== NULL
, "hwnd=%p, expected NULL\n", hwnd
);
2127 if(call_UIActivate
== CallUIActivate_ActivateMe
) {
2128 SET_EXPECT(CanInPlaceActivate
);
2129 SET_EXPECT(GetWindowContext
);
2130 SET_EXPECT(GetWindow
);
2132 SET_EXPECT(OnInPlaceActivateEx
);
2134 SET_EXPECT(OnInPlaceActivate
);
2135 SET_EXPECT(SetStatusText
);
2136 SET_EXPECT(Exec_SETPROGRESSMAX
);
2137 SET_EXPECT(Exec_SETPROGRESSPOS
);
2138 SET_EXPECT(OnUIActivate
);
2139 SET_EXPECT(SetActiveObject
);
2141 expect_status_text
= NULL
;
2143 hres
= IOleDocumentView_UIActivate(view
, TRUE
);
2144 ok(hres
== S_OK
, "UIActivate failed: %08x\n", hres
);
2146 CHECK_CALLED(CanInPlaceActivate
);
2147 CHECK_CALLED(GetWindowContext
);
2148 CHECK_CALLED(GetWindow
);
2150 CHECK_CALLED(OnInPlaceActivateEx
);
2152 CHECK_CALLED(OnInPlaceActivate
);
2153 CHECK_CALLED(SetStatusText
);
2154 CHECK_CALLED(Exec_SETPROGRESSMAX
);
2155 CHECK_CALLED(Exec_SETPROGRESSPOS
);
2156 CHECK_CALLED(OnUIActivate
);
2157 CHECK_CALLED(SetActiveObject
);
2158 CHECK_CALLED(ShowUI
);
2161 hres
= IOleInPlaceActiveObject_GetWindow(activeobj
, &hwnd
);
2162 ok(hres
== S_OK
, "GetWindow failed: %08x\n", hres
);
2163 ok(hwnd
!= NULL
, "hwnd == NULL\n");
2165 ok(hwnd
== last_hwnd
, "hwnd != last_hwnd\n");
2168 hres
= IOleDocumentView_UIActivate(view
, TRUE
);
2169 ok(hres
== S_OK
, "UIActivate failed: %08x\n", hres
);
2172 hres
= IOleInPlaceActiveObject_GetWindow(activeobj
, &tmp_hwnd
);
2173 ok(hres
== S_OK
, "GetWindow failed: %08x\n", hres
);
2174 ok(tmp_hwnd
== hwnd
, "tmp_hwnd=%p, expected %p\n", tmp_hwnd
, hwnd
);
2178 hres
= IOleDocumentView_SetRect(view
, &rect
);
2179 ok(hres
== S_OK
, "SetRect failed: %08x\n", hres
);
2181 if(call_UIActivate
== CallUIActivate_ActivateMe
) {
2182 hres
= IOleDocumentView_Show(view
, TRUE
);
2183 ok(hres
== S_OK
, "Show failed: %08x\n", hres
);
2185 SET_EXPECT(CanInPlaceActivate
);
2186 SET_EXPECT(GetWindowContext
);
2187 SET_EXPECT(GetWindow
);
2189 SET_EXPECT(OnInPlaceActivateEx
);
2191 SET_EXPECT(OnInPlaceActivate
);
2192 SET_EXPECT(SetStatusText
);
2193 SET_EXPECT(Exec_SETPROGRESSMAX
);
2194 SET_EXPECT(Exec_SETPROGRESSPOS
);
2195 SET_EXPECT(OnUIActivate
);
2196 expect_status_text
= (load_state
== LD_COMPLETE
? (LPCOLESTR
)0xdeadbeef : NULL
);
2198 hres
= IOleDocumentView_Show(view
, TRUE
);
2199 ok(hres
== S_OK
, "Show failed: %08x\n", hres
);
2201 CHECK_CALLED(CanInPlaceActivate
);
2202 CHECK_CALLED(GetWindowContext
);
2203 CHECK_CALLED(GetWindow
);
2205 CHECK_CALLED(OnInPlaceActivateEx
);
2207 CHECK_CALLED(OnInPlaceActivate
);
2208 CHECK_CALLED(SetStatusText
);
2209 CHECK_CALLED(Exec_SETPROGRESSMAX
);
2210 CHECK_CALLED(Exec_SETPROGRESSPOS
);
2213 hres
= IOleInPlaceActiveObject_GetWindow(activeobj
, &hwnd
);
2214 ok(hres
== S_OK
, "GetWindow failed: %08x\n", hres
);
2215 ok(hwnd
!= NULL
, "hwnd == NULL\n");
2217 ok(hwnd
== last_hwnd
, "hwnd != last_hwnd\n");
2221 test_timer(EXPECT_UPDATEUI
| ((load_state
== LD_LOADING
) ? EXPECT_SETTITLE
: 0));
2224 IOleInPlaceActiveObject_Release(activeobj
);
2227 IOleDocument_Release(document
);
2233 static const IOleDocumentSiteVtbl DocumentSiteVtbl
= {
2234 DocumentSite_QueryInterface
,
2235 DocumentSite_AddRef
,
2236 DocumentSite_Release
,
2237 DocumentSite_ActivateMe
2240 static IOleDocumentSite DocumentSite
= { &DocumentSiteVtbl
};
2242 static HRESULT WINAPI
OleControlSite_QueryInterface(IOleControlSite
*iface
, REFIID riid
, void **ppv
)
2244 return QueryInterface(riid
, ppv
);
2247 static ULONG WINAPI
OleControlSite_AddRef(IOleControlSite
*iface
)
2252 static ULONG WINAPI
OleControlSite_Release(IOleControlSite
*iface
)
2257 static HRESULT WINAPI
OleControlSite_OnControlInfoChanged(IOleControlSite
*iface
)
2259 ok(0, "unexpected call\n");
2263 static HRESULT WINAPI
OleControlSite_LockInPlaceActive(IOleControlSite
*iface
, BOOL fLock
)
2265 ok(0, "unexpected call\n");
2269 static HRESULT WINAPI
OleControlSite_GetExtendedControl(IOleControlSite
*iface
, IDispatch
**ppDisp
)
2271 ok(0, "unexpected call\n");
2275 static HRESULT WINAPI
OleControlSite_TransformCoords(IOleControlSite
*iface
, POINTL
*pPtHimetric
,
2276 POINTF
*pPtfContainer
, DWORD dwFlags
)
2278 ok(0, "unexpected call\n");
2282 static HRESULT WINAPI
OleControlSite_TranslateAccelerator(IOleControlSite
*iface
,
2283 MSG
*pMsg
, DWORD grfModifiers
)
2285 ok(0, "unexpected call\n");
2289 static HRESULT WINAPI
OleControlSite_OnFocus(IOleControlSite
*iface
, BOOL fGotFocus
)
2292 CHECK_EXPECT(OnFocus_TRUE
);
2294 CHECK_EXPECT2(OnFocus_FALSE
);
2298 static HRESULT WINAPI
OleControlSite_ShowPropertyFrame(IOleControlSite
*iface
)
2300 ok(0, "unexpected call\n");
2304 static const IOleControlSiteVtbl OleControlSiteVtbl
= {
2305 OleControlSite_QueryInterface
,
2306 OleControlSite_AddRef
,
2307 OleControlSite_Release
,
2308 OleControlSite_OnControlInfoChanged
,
2309 OleControlSite_LockInPlaceActive
,
2310 OleControlSite_GetExtendedControl
,
2311 OleControlSite_TransformCoords
,
2312 OleControlSite_TranslateAccelerator
,
2313 OleControlSite_OnFocus
,
2314 OleControlSite_ShowPropertyFrame
2317 static IOleControlSite OleControlSite
= { &OleControlSiteVtbl
};
2319 static IDocHostUIHandler2
*expect_uihandler_iface
;
2321 static HRESULT WINAPI
DocHostUIHandler_QueryInterface(IDocHostUIHandler2
*iface
, REFIID riid
, void **ppv
)
2323 return QueryInterface(riid
, ppv
);
2326 static ULONG WINAPI
DocHostUIHandler_AddRef(IDocHostUIHandler2
*iface
)
2331 static ULONG WINAPI
DocHostUIHandler_Release(IDocHostUIHandler2
*iface
)
2336 static HRESULT WINAPI
DocHostUIHandler_ShowContextMenu(IDocHostUIHandler2
*iface
, DWORD dwID
, POINT
*ppt
,
2337 IUnknown
*pcmdtReserved
, IDispatch
*pdicpReserved
)
2339 ok(0, "unexpected call\n");
2340 ok(iface
== expect_uihandler_iface
, "called on unexpected iface\n");
2344 static HRESULT WINAPI
DocHostUIHandler_GetHostInfo(IDocHostUIHandler2
*iface
, DOCHOSTUIINFO
*pInfo
)
2346 CHECK_EXPECT(GetHostInfo
);
2347 ok(iface
== expect_uihandler_iface
, "called on unexpected iface\n");
2348 ok(pInfo
!= NULL
, "pInfo=NULL\n");
2350 ok(pInfo
->cbSize
== sizeof(DOCHOSTUIINFO
), "pInfo->cbSize=%u\n", pInfo
->cbSize
);
2351 ok(!pInfo
->dwFlags
, "pInfo->dwFlags=%08x, expected 0\n", pInfo
->dwFlags
);
2352 pInfo
->dwFlags
= DOCHOSTUIFLAG_DISABLE_HELP_MENU
| DOCHOSTUIFLAG_DISABLE_SCRIPT_INACTIVE
2353 | DOCHOSTUIFLAG_ACTIVATE_CLIENTHIT_ONLY
| DOCHOSTUIFLAG_ENABLE_INPLACE_NAVIGATION
2354 | DOCHOSTUIFLAG_IME_ENABLE_RECONVERSION
;
2355 ok(!pInfo
->dwDoubleClick
, "pInfo->dwDoubleClick=%08x, expected 0\n", pInfo
->dwDoubleClick
);
2356 ok(!pInfo
->pchHostCss
, "pInfo->pchHostCss=%p, expected NULL\n", pInfo
->pchHostCss
);
2357 ok(!pInfo
->pchHostNS
, "pInfo->pchhostNS=%p, expected NULL\n", pInfo
->pchHostNS
);
2362 static HRESULT WINAPI
DocHostUIHandler_ShowUI(IDocHostUIHandler2
*iface
, DWORD dwID
,
2363 IOleInPlaceActiveObject
*pActiveObject
, IOleCommandTarget
*pCommandTarget
,
2364 IOleInPlaceFrame
*pFrame
, IOleInPlaceUIWindow
*pDoc
)
2366 CHECK_EXPECT(ShowUI
);
2367 ok(iface
== expect_uihandler_iface
, "called on unexpected iface\n");
2370 ok(dwID
== DOCHOSTUITYPE_AUTHOR
, "dwID=%d, expected DOCHOSTUITYPE_AUTHOR\n", dwID
);
2372 ok(dwID
== DOCHOSTUITYPE_BROWSE
, "dwID=%d, expected DOCHOSTUITYPE_BROWSE\n", dwID
);
2373 ok(pActiveObject
!= NULL
, "pActiveObject = NULL\n");
2374 ok(pCommandTarget
!= NULL
, "pCommandTarget = NULL\n");
2375 ok(pFrame
== &InPlaceFrame
, "pFrame=%p, expected %p\n", pFrame
, &InPlaceFrame
);
2376 if (expect_InPlaceUIWindow_SetActiveObject_active
)
2377 ok(pDoc
== (IOleInPlaceUIWindow
*)&InPlaceUIWindow
, "pDoc=%p, expected %p\n", pDoc
, &InPlaceUIWindow
);
2379 ok(pDoc
== NULL
, "pDoc=%p, expected NULL\n", pDoc
);
2384 static HRESULT WINAPI
DocHostUIHandler_HideUI(IDocHostUIHandler2
*iface
)
2386 CHECK_EXPECT(HideUI
);
2387 ok(iface
== expect_uihandler_iface
, "called on unexpected iface\n");
2391 static HRESULT WINAPI
DocHostUIHandler_UpdateUI(IDocHostUIHandler2
*iface
)
2393 CHECK_EXPECT(UpdateUI
);
2394 ok(iface
== expect_uihandler_iface
, "called on unexpected iface\n");
2398 static HRESULT WINAPI
DocHostUIHandler_EnableModeless(IDocHostUIHandler2
*iface
, BOOL fEnable
)
2400 ok(iface
== expect_uihandler_iface
, "called on unexpected iface\n");
2402 CHECK_EXPECT2(EnableModeless_TRUE
);
2404 CHECK_EXPECT2(EnableModeless_FALSE
);
2408 static HRESULT WINAPI
DocHostUIHandler_OnDocWindowActivate(IDocHostUIHandler2
*iface
, BOOL fActivate
)
2410 ok(0, "unexpected call\n");
2411 ok(iface
== expect_uihandler_iface
, "called on unexpected iface\n");
2415 static BOOL expect_OnFrameWindowActivate_fActivate
;
2416 static HRESULT WINAPI
DocHostUIHandler_OnFrameWindowActivate(IDocHostUIHandler2
*iface
, BOOL fActivate
)
2418 CHECK_EXPECT2(OnFrameWindowActivate
);
2419 ok(iface
== expect_uihandler_iface
, "called on unexpected iface\n");
2420 ok(fActivate
== expect_OnFrameWindowActivate_fActivate
, "fActivate=%x\n", fActivate
);
2424 static HRESULT WINAPI
DocHostUIHandler_ResizeBorder(IDocHostUIHandler2
*iface
, LPCRECT prcBorder
,
2425 IOleInPlaceUIWindow
*pUIWindow
, BOOL fRameWindow
)
2427 ok(0, "unexpected call\n");
2431 static HRESULT WINAPI
DocHostUIHandler_TranslateAccelerator(IDocHostUIHandler2
*iface
, LPMSG lpMsg
,
2432 const GUID
*pguidCmdGroup
, DWORD nCmdID
)
2434 ok(0, "unexpected call\n");
2435 ok(iface
== expect_uihandler_iface
, "called on unexpected iface\n");
2439 static HRESULT WINAPI
DocHostUIHandler_GetOptionKeyPath(IDocHostUIHandler2
*iface
,
2440 LPOLESTR
*pchKey
, DWORD dw
)
2442 CHECK_EXPECT(GetOptionKeyPath
);
2443 ok(iface
== expect_uihandler_iface
, "called on unexpected iface\n");
2444 ok(pchKey
!= NULL
, "pchKey = NULL\n");
2445 ok(!dw
, "dw=%d, expected 0\n", dw
);
2447 ok(!*pchKey
, "*pchKey=%p, expected NULL\n", *pchKey
);
2451 static HRESULT WINAPI
DocHostUIHandler_GetDropTarget(IDocHostUIHandler2
*iface
,
2452 IDropTarget
*pDropTarget
, IDropTarget
**ppDropTarget
)
2454 CHECK_EXPECT(GetDropTarget
);
2455 ok(iface
== expect_uihandler_iface
, "called on unexpected iface\n");
2460 static HRESULT WINAPI
DocHostUIHandler_GetExternal(IDocHostUIHandler2
*iface
, IDispatch
**ppDispatch
)
2462 CHECK_EXPECT(GetExternal
);
2463 ok(iface
== expect_uihandler_iface
, "called on unexpected iface\n");
2464 *ppDispatch
= &External
;
2468 static HRESULT WINAPI
DocHostUIHandler_TranslateUrl(IDocHostUIHandler2
*iface
, DWORD dwTranslate
,
2469 OLECHAR
*pchURLIn
, OLECHAR
**ppchURLOut
)
2471 CHECK_EXPECT(TranslateUrl
);
2472 ok(iface
== expect_uihandler_iface
, "called on unexpected iface\n");
2473 ok(!dwTranslate
, "dwTranslate = %x\n", dwTranslate
);
2475 ok(!strcmp_wa(pchURLIn
, nav_serv_url
), "pchURLIn = %s, expected %s\n", wine_dbgstr_w(pchURLIn
), nav_serv_url
);
2477 todo_wine
ok(!strcmp_wa(pchURLIn
, nav_serv_url
), "pchURLIn = %s, expected %s\n", wine_dbgstr_w(pchURLIn
), nav_serv_url
);
2478 ok(ppchURLOut
!= NULL
, "ppchURLOut == NULL\n");
2479 ok(!*ppchURLOut
, "*ppchURLOut = %p\n", *ppchURLOut
);
2484 static HRESULT WINAPI
DocHostUIHandler_FilterDataObject(IDocHostUIHandler2
*iface
, IDataObject
*pDO
,
2485 IDataObject
**ppPORet
)
2487 ok(0, "unexpected call\n");
2488 ok(iface
== expect_uihandler_iface
, "called on unexpected iface\n");
2492 static HRESULT WINAPI
DocHostUIHandler_GetOverrideKeyPath(IDocHostUIHandler2
*iface
,
2493 LPOLESTR
*pchKey
, DWORD dw
)
2495 CHECK_EXPECT(GetOverrideKeyPath
);
2496 ok(iface
== expect_uihandler_iface
, "called on unexpected iface\n");
2497 ok(pchKey
!= NULL
, "pchKey = NULL\n");
2499 ok(!*pchKey
, "*pchKey=%p, expected NULL\n", *pchKey
);
2500 ok(!dw
, "dw=%d, xepected 0\n", dw
);
2504 static const IDocHostUIHandler2Vtbl DocHostUIHandlerVtbl
= {
2505 DocHostUIHandler_QueryInterface
,
2506 DocHostUIHandler_AddRef
,
2507 DocHostUIHandler_Release
,
2508 DocHostUIHandler_ShowContextMenu
,
2509 DocHostUIHandler_GetHostInfo
,
2510 DocHostUIHandler_ShowUI
,
2511 DocHostUIHandler_HideUI
,
2512 DocHostUIHandler_UpdateUI
,
2513 DocHostUIHandler_EnableModeless
,
2514 DocHostUIHandler_OnDocWindowActivate
,
2515 DocHostUIHandler_OnFrameWindowActivate
,
2516 DocHostUIHandler_ResizeBorder
,
2517 DocHostUIHandler_TranslateAccelerator
,
2518 DocHostUIHandler_GetOptionKeyPath
,
2519 DocHostUIHandler_GetDropTarget
,
2520 DocHostUIHandler_GetExternal
,
2521 DocHostUIHandler_TranslateUrl
,
2522 DocHostUIHandler_FilterDataObject
,
2523 DocHostUIHandler_GetOverrideKeyPath
2526 static IDocHostUIHandler2 DocHostUIHandler
= { &DocHostUIHandlerVtbl
};
2528 static HRESULT WINAPI
CustomDocHostUIHandler_QueryInterface(IDocHostUIHandler2
*iface
, REFIID riid
, void **ppv
)
2530 if(IsEqualGUID(&IID_IDocHostUIHandler2
, riid
)) {
2535 if(IsEqualGUID(&IID_IOleCommandTarget
, riid
))
2536 return E_NOINTERFACE
;
2538 else if(IsEqualGUID(&IID_IDocHostShowUI
, riid
))
2539 return E_NOINTERFACE
; /* TODO */
2541 ok(0, "unexpected call %s\n", debugstr_guid(riid
));
2542 return E_NOINTERFACE
;
2545 static const IDocHostUIHandler2Vtbl CustomDocHostUIHandlerVtbl
= {
2546 CustomDocHostUIHandler_QueryInterface
,
2547 DocHostUIHandler_AddRef
,
2548 DocHostUIHandler_Release
,
2549 DocHostUIHandler_ShowContextMenu
,
2550 DocHostUIHandler_GetHostInfo
,
2551 DocHostUIHandler_ShowUI
,
2552 DocHostUIHandler_HideUI
,
2553 DocHostUIHandler_UpdateUI
,
2554 DocHostUIHandler_EnableModeless
,
2555 DocHostUIHandler_OnDocWindowActivate
,
2556 DocHostUIHandler_OnFrameWindowActivate
,
2557 DocHostUIHandler_ResizeBorder
,
2558 DocHostUIHandler_TranslateAccelerator
,
2559 DocHostUIHandler_GetOptionKeyPath
,
2560 DocHostUIHandler_GetDropTarget
,
2561 DocHostUIHandler_GetExternal
,
2562 DocHostUIHandler_TranslateUrl
,
2563 DocHostUIHandler_FilterDataObject
,
2564 DocHostUIHandler_GetOverrideKeyPath
2567 static IDocHostUIHandler2 CustomDocHostUIHandler
= { &CustomDocHostUIHandlerVtbl
};
2569 static HRESULT WINAPI
OleCommandTarget_QueryInterface(IOleCommandTarget
*iface
,
2570 REFIID riid
, void **ppv
)
2572 return QueryInterface(riid
, ppv
);
2575 static ULONG WINAPI
OleCommandTarget_AddRef(IOleCommandTarget
*iface
)
2580 static ULONG WINAPI
OleCommandTarget_Release(IOleCommandTarget
*iface
)
2585 static HRESULT WINAPI
OleCommandTarget_QueryStatus(IOleCommandTarget
*iface
, const GUID
*pguidCmdGroup
,
2586 ULONG cCmds
, OLECMD prgCmds
[], OLECMDTEXT
*pCmdText
)
2588 ok(!pguidCmdGroup
, "pguidCmdGroup != MULL\n");
2589 ok(cCmds
== 1, "cCmds=%d, expected 1\n", cCmds
);
2590 ok(!pCmdText
, "pCmdText != NULL\n");
2592 switch(prgCmds
[0].cmdID
) {
2593 case OLECMDID_SETPROGRESSTEXT
:
2594 CHECK_EXPECT(QueryStatus_SETPROGRESSTEXT
);
2595 prgCmds
[0].cmdf
= OLECMDF_ENABLED
;
2598 CHECK_EXPECT(QueryStatus_OPEN
);
2599 prgCmds
[0].cmdf
= 0;
2602 CHECK_EXPECT(QueryStatus_NEW
);
2603 prgCmds
[0].cmdf
= 0;
2606 ok(0, "unexpected command %d\n", prgCmds
[0].cmdID
);
2612 static HRESULT WINAPI
OleCommandTarget_Exec(IOleCommandTarget
*iface
, const GUID
*pguidCmdGroup
,
2613 DWORD nCmdID
, DWORD nCmdexecopt
, VARIANT
*pvaIn
, VARIANT
*pvaOut
)
2615 if((!pguidCmdGroup
|| !IsEqualGUID(pguidCmdGroup
, &CGID_Explorer
))
2616 && (!pguidCmdGroup
|| !IsEqualGUID(&CGID_ShellDocView
, pguidCmdGroup
) || nCmdID
!= 63))
2617 test_readyState(NULL
);
2619 if(!pguidCmdGroup
) {
2621 case OLECMDID_SETPROGRESSMAX
:
2622 CHECK_EXPECT2(Exec_SETPROGRESSMAX
);
2623 ok(nCmdexecopt
== OLECMDEXECOPT_DONTPROMPTUSER
, "nCmdexecopts=%08x\n", nCmdexecopt
);
2624 ok(pvaIn
!= NULL
, "pvaIn == NULL\n");
2626 ok(V_VT(pvaIn
) == VT_I4
, "V_VT(pvaIn)=%d, expected VT_I4\n", V_VT(pvaIn
));
2627 if(load_state
== LD_NO
)
2628 ok(V_I4(pvaIn
) == 0, "V_I4(pvaIn)=%d, expected 0\n", V_I4(pvaIn
));
2630 ok(pvaOut
== NULL
, "pvaOut=%p, expected NULL\n", pvaOut
);
2632 case OLECMDID_SETPROGRESSPOS
:
2633 CHECK_EXPECT2(Exec_SETPROGRESSPOS
);
2634 ok(nCmdexecopt
== OLECMDEXECOPT_DONTPROMPTUSER
, "nCmdexecopts=%08x\n", nCmdexecopt
);
2635 ok(pvaIn
!= NULL
, "pvaIn == NULL\n");
2637 ok(V_VT(pvaIn
) == VT_I4
, "V_VT(pvaIn)=%d, expected VT_I4\n", V_VT(pvaIn
));
2638 if(load_state
== LD_NO
)
2639 ok(V_I4(pvaIn
) == 0, "V_I4(pvaIn)=%d, expected 0\n", V_I4(pvaIn
));
2641 ok(pvaOut
== NULL
, "pvaOut=%p, expected NULL\n", pvaOut
);
2643 case OLECMDID_HTTPEQUIV_DONE
:
2644 CHECK_EXPECT(Exec_HTTPEQUIV_DONE
);
2645 ok(nCmdexecopt
== 0, "nCmdexecopts=%08x\n", nCmdexecopt
);
2646 ok(pvaOut
== NULL
, "pvaOut=%p\n", pvaOut
);
2647 ok(pvaIn
== NULL
, "pvaIn=%p\n", pvaIn
);
2648 readystate_set_loading
= FALSE
;
2649 readystate_set_interactive
= FALSE
;
2650 load_state
= LD_COMPLETE
;
2652 case OLECMDID_SETDOWNLOADSTATE
:
2653 ok(nCmdexecopt
== OLECMDEXECOPT_DONTPROMPTUSER
, "nCmdexecopts=%08x\n", nCmdexecopt
);
2654 ok(pvaOut
== NULL
, "pvaOut=%p\n", pvaOut
);
2655 ok(pvaIn
!= NULL
, "pvaIn == NULL\n");
2656 ok(V_VT(pvaIn
) == VT_I4
, "V_VT(pvaIn)=%d\n", V_VT(pvaIn
));
2658 switch(V_I4(pvaIn
)) {
2660 CHECK_EXPECT(Exec_SETDOWNLOADSTATE_0
);
2662 load_state
= LD_INTERACTIVE
;
2665 CHECK_EXPECT(Exec_SETDOWNLOADSTATE_1
);
2666 readystate_set_interactive
= (load_state
!= LD_INTERACTIVE
);
2669 ok(0, "unexpevted V_I4(pvaIn)=%d\n", V_I4(pvaIn
));
2673 case OLECMDID_UPDATECOMMANDS
:
2674 CHECK_EXPECT(Exec_UPDATECOMMANDS
);
2675 ok(nCmdexecopt
== OLECMDEXECOPT_DONTPROMPTUSER
, "nCmdexecopts=%08x\n", nCmdexecopt
);
2676 ok(pvaIn
== NULL
, "pvaIn=%p\n", pvaIn
);
2677 ok(pvaOut
== NULL
, "pvaOut=%p\n", pvaOut
);
2679 case OLECMDID_SETTITLE
:
2680 CHECK_EXPECT2(Exec_SETTITLE
);
2681 ok(nCmdexecopt
== OLECMDEXECOPT_DONTPROMPTUSER
, "nCmdexecopts=%08x\n", nCmdexecopt
);
2682 ok(pvaIn
!= NULL
, "pvaIn == NULL\n");
2683 ok(pvaOut
== NULL
, "pvaOut=%p\n", pvaOut
);
2684 ok(V_VT(pvaIn
) == VT_BSTR
, "V_VT(pvaIn)=%d\n", V_VT(pvaIn
));
2685 ok(V_BSTR(pvaIn
) != NULL
, "V_BSTR(pvaIn) == NULL\n"); /* TODO */
2687 case OLECMDID_HTTPEQUIV
:
2688 CHECK_EXPECT2(Exec_HTTPEQUIV
);
2689 ok(!nCmdexecopt
, "nCmdexecopts=%08x\n", nCmdexecopt
);
2690 ok(pvaIn
!= NULL
, "pvaIn == NULL\n");
2691 ok(pvaOut
== NULL
, "pvaOut=%p\n", pvaOut
);
2692 ok(V_VT(pvaIn
) == VT_BSTR
, "V_VT(pvaIn)=%d\n", V_VT(pvaIn
));
2693 ok(V_BSTR(pvaIn
) != NULL
, "V_BSTR(pvaIn) = NULL\n");
2694 test_readyState(NULL
);
2696 case OLECMDID_UPDATETRAVELENTRY_DATARECOVERY
:
2698 return E_FAIL
; /* FIXME */
2700 ok(0, "unexpected command %d\n", nCmdID
);
2705 if(IsEqualGUID(&CGID_ShellDocView
, pguidCmdGroup
)) {
2706 ok(nCmdexecopt
== 0, "nCmdexecopts=%08x\n", nCmdexecopt
);
2710 CHECK_EXPECT2(Exec_ShellDocView_37
);
2713 test_GetCurMoniker(doc_unk
, NULL
, nav_url
);
2714 else if(load_from_stream
)
2715 test_GetCurMoniker(doc_unk
, NULL
, "about:blank");
2717 test_GetCurMoniker(doc_unk
, doc_mon
, NULL
);
2719 ok(pvaOut
== NULL
, "pvaOut=%p, expected NULL\n", pvaOut
);
2720 ok(pvaIn
!= NULL
, "pvaIn == NULL\n");
2722 ok(V_VT(pvaIn
) == VT_I4
, "V_VT(pvaIn)=%d, expected VT_I4\n", V_VT(pvaIn
));
2723 ok(V_I4(pvaIn
) == 0, "V_I4(pvaIn)=%d, expected 0\n", V_I4(pvaIn
));
2728 IHTMLPrivateWindow
*priv_window
;
2731 CHECK_EXPECT(Exec_ShellDocView_63
);
2732 ok(pvaIn
!= NULL
, "pvaIn == NULL\n");
2733 ok(V_VT(pvaIn
) == VT_UNKNOWN
, "V_VT(pvaIn) = %d\n", V_VT(pvaIn
));
2734 ok(V_UNKNOWN(pvaIn
) != NULL
, "VPUNKNOWN(pvaIn) = NULL\n");
2735 ok(pvaOut
!= NULL
, "pvaOut == NULL\n");
2736 ok(V_VT(pvaOut
) == VT_EMPTY
, "V_VT(pvaOut) = %d\n", V_VT(pvaOut
));
2738 hres
= IUnknown_QueryInterface(V_UNKNOWN(pvaIn
), &IID_IHTMLPrivateWindow
, (void**)&priv_window
);
2739 ok(hres
== S_OK
, "Could not get IHTMLPrivateWindow: %08x\n", hres
);
2741 IHTMLPrivateWindow_Release(priv_window
);
2743 load_state
= loading_js
? LD_COMPLETE
: LD_LOADING
;
2744 return S_OK
; /* TODO */
2748 CHECK_EXPECT(Exec_ShellDocView_67
);
2749 ok(pvaIn
!= NULL
, "pvaIn == NULL\n");
2750 ok(V_VT(pvaIn
) == VT_BSTR
, "V_VT(pvaIn) = %d\n", V_VT(pvaIn
));
2752 ok(!strcmp_wa(V_BSTR(pvaIn
), nav_serv_url
), "V_BSTR(pvaIn) = %s, expected %s\n", wine_dbgstr_w(V_BSTR(pvaIn
)), nav_serv_url
);
2754 todo_wine
ok(!strcmp_wa(V_BSTR(pvaIn
), nav_serv_url
), "V_BSTR(pvaIn) = %s, expected %s\n", wine_dbgstr_w(V_BSTR(pvaIn
)), nav_serv_url
);
2755 ok(pvaOut
!= NULL
, "pvaOut == NULL\n");
2756 ok(V_VT(pvaOut
) == VT_BOOL
, "V_VT(pvaOut) = %d\n", V_VT(pvaOut
));
2757 ok(V_BOOL(pvaOut
) == VARIANT_TRUE
, "V_BOOL(pvaOut) = %x\n", V_BOOL(pvaOut
));
2759 load_state
= LD_DOLOAD
;
2763 CHECK_EXPECT2(Exec_ShellDocView_84
);
2765 ok(pvaIn
== NULL
, "pvaIn != NULL\n");
2766 ok(pvaOut
!= NULL
, "pvaOut == NULL\n");
2768 ok(V_VT(pvaOut
) == VT_EMPTY
, "V_VT(pvaOut)=%d\n", V_VT(pvaOut
));
2773 CHECK_EXPECT2(Exec_ShellDocView_103
);
2775 ok(pvaIn
== NULL
, "pvaIn != NULL\n");
2776 ok(pvaOut
== NULL
, "pvaOut != NULL\n");
2781 CHECK_EXPECT2(Exec_ShellDocView_105
);
2783 ok(pvaIn
!= NULL
, "pvaIn == NULL\n");
2784 ok(pvaOut
== NULL
, "pvaOut != NULL\n");
2789 CHECK_EXPECT2(Exec_ShellDocView_140
);
2791 ok(pvaIn
== NULL
, "pvaIn != NULL\n");
2792 ok(pvaOut
== NULL
, "pvaOut != NULL\n");
2796 case 143: /* TODO */
2797 case 144: /* TODO */
2801 ok(0, "unexpected command %d\n", nCmdID
);
2806 if(IsEqualGUID(&CGID_MSHTML
, pguidCmdGroup
)) {
2807 ok(nCmdexecopt
== 0, "nCmdexecopts=%08x\n", nCmdexecopt
);
2810 case IDM_PARSECOMPLETE
:
2811 CHECK_EXPECT(Exec_MSHTML_PARSECOMPLETE
);
2812 ok(pvaIn
== NULL
, "pvaIn != NULL\n");
2813 ok(pvaOut
== NULL
, "pvaOut != NULL\n");
2816 ok(0, "unexpected command %d\n", nCmdID
);
2820 if(IsEqualGUID(&CGID_DocHostCmdPriv
, pguidCmdGroup
)) {
2822 case DOCHOST_DOCCANNAVIGATE
:
2823 CHECK_EXPECT(Exec_DOCCANNAVIGATE
);
2824 ok(pvaIn
!= NULL
, "pvaIn == NULL\n");
2825 ok(pvaOut
== NULL
, "pvaOut != NULL\n");
2826 ok(V_VT(pvaIn
) == VT_UNKNOWN
, "V_VT(pvaIn) != VT_UNKNOWN\n");
2827 /* FIXME: test V_UNKNOWN(pvaIn) == window */
2836 ok(pvaIn
!= NULL
, "pvaIn == NULL\n");
2837 ok(pvaOut
!= NULL
, "pvaOut != NULL\n");
2838 ok(V_VT(pvaIn
) == VT_ARRAY
, "V_VT(pvaIn) = %d\n", V_VT(pvaIn
));
2839 ok(V_VT(pvaOut
) == VT_BOOL
, "V_VT(pvaOut) = %d\n", V_VT(pvaOut
));
2840 sa
= V_ARRAY(pvaIn
);
2842 dim
= SafeArrayGetDim(sa
);
2843 ok(dim
== 1, "dim = %d\n", dim
);
2844 hres
= SafeArrayGetLBound(sa
, 1, &ind
);
2845 ok(hres
== S_OK
, "SafeArrayGetLBound failed: %x\n", hres
);
2846 ok(ind
== 0, "Lower bound = %d\n", ind
);
2847 hres
= SafeArrayGetUBound(sa
, 1, &ind
);
2848 ok(hres
== S_OK
, "SafeArrayGetUBound failed: %x\n", hres
);
2849 ok(ind
== 7 || broken(ind
== 5), "Upper bound = %d\n", ind
);
2852 SafeArrayGetElement(sa
, &ind
, &var
);
2853 ok(V_VT(&var
) == VT_I4
, "Incorrect data type: %d\n", V_VT(&var
));
2854 ok(V_I4(&var
) == status_code
, "Incorrect error code: %d\n", V_I4(&var
));
2857 SafeArrayGetElement(sa
, &ind
, &var
);
2858 ok(V_VT(&var
) == VT_BSTR
, "Incorrect data type: %d\n", V_VT(&var
));
2859 ok(!strcmp_wa(V_BSTR(&var
), "winetest:doc"), "Page address: %s\n", wine_dbgstr_w(V_BSTR(&var
)));
2862 SafeArrayGetElement(sa
, &ind
, &var
);
2863 ok(V_VT(&var
) == VT_UNKNOWN
, "Incorrect data type: %d\n", V_VT(&var
));
2866 SafeArrayGetElement(sa
, &ind
, &var
);
2867 ok(V_VT(&var
) == VT_UNKNOWN
, "Incorrect data type: %d\n", V_VT(&var
));
2870 SafeArrayGetElement(sa
, &ind
, &var
);
2871 ok(V_VT(&var
) == VT_BOOL
, "Incorrect data type: %d\n", V_VT(&var
));
2872 ok(!V_BOOL(&var
), "Unknown value is incorrect\n");
2875 SafeArrayGetElement(sa
, &ind
, &var
);
2876 ok(V_VT(&var
) == VT_BOOL
, "Incorrect data type: %d\n", V_VT(&var
));
2877 ok(!V_BOOL(&var
), "Unknown value is incorrect\n");
2881 return E_FAIL
; /* TODO */
2885 if(IsEqualGUID(&CGID_Explorer
, pguidCmdGroup
)) {
2886 ok(nCmdexecopt
== 0, "nCmdexecopts=%08x\n", nCmdexecopt
);
2890 CHECK_EXPECT2(Exec_Explorer_69
);
2891 ok(pvaIn
== NULL
, "pvaIn != NULL\n");
2892 ok(pvaOut
!= NULL
, "pvaOut == NULL\n");
2894 case 109: /* TODO */
2897 ok(0, "unexpected cmd %d of CGID_Explorer\n", nCmdID
);
2902 if(IsEqualGUID(&CGID_DocHostCommandHandler
, pguidCmdGroup
)) {
2904 case OLECMDID_PAGEACTIONBLOCKED
: /* win2k3 */
2905 SET_EXPECT(SetStatusText
);
2906 ok(pvaIn
== NULL
, "pvaIn != NULL\n");
2907 ok(pvaOut
== NULL
, "pvaOut != NULL\n");
2909 case OLECMDID_SHOWSCRIPTERROR
:
2913 ok(0, "unexpected command %d\n", nCmdID
);
2918 ok(0, "unexpected pguidCmdGroup: %s\n", debugstr_guid(pguidCmdGroup
));
2922 static IOleCommandTargetVtbl OleCommandTargetVtbl
= {
2923 OleCommandTarget_QueryInterface
,
2924 OleCommandTarget_AddRef
,
2925 OleCommandTarget_Release
,
2926 OleCommandTarget_QueryStatus
,
2927 OleCommandTarget_Exec
2930 static IOleCommandTarget OleCommandTarget
= { &OleCommandTargetVtbl
};
2932 static HRESULT WINAPI
Dispatch_QueryInterface(IDispatch
*iface
, REFIID riid
, void **ppv
)
2934 return QueryInterface(riid
, ppv
);
2937 static HRESULT WINAPI
Dispatch_Invoke(IDispatch
*iface
, DISPID dispIdMember
, REFIID riid
,
2938 LCID lcid
, WORD wFlags
, DISPPARAMS
*pDispParams
, VARIANT
*pVarResult
,
2939 EXCEPINFO
*pExcepInfo
, UINT
*puArgErr
)
2941 ok(IsEqualGUID(&IID_NULL
, riid
), "riid != IID_NULL\n");
2942 ok(pDispParams
!= NULL
, "pDispParams == NULL\n");
2943 ok(pExcepInfo
== NULL
, "pExcepInfo=%p, expected NULL\n", pExcepInfo
);
2944 ok(puArgErr
!= NULL
, "puArgErr == NULL\n");
2945 ok(V_VT(pVarResult
) == 0, "V_VT(pVarResult)=%d, expected 0\n", V_VT(pVarResult
));
2946 ok(wFlags
== DISPATCH_PROPERTYGET
, "wFlags=%08x, expected DISPATCH_PROPERTYGET\n", wFlags
);
2947 test_readyState(NULL
);
2949 switch(dispIdMember
) {
2950 case DISPID_AMBIENT_USERMODE
:
2951 CHECK_EXPECT2(Invoke_AMBIENT_USERMODE
);
2952 V_VT(pVarResult
) = VT_BOOL
;
2953 V_BOOL(pVarResult
) = VARIANT_TRUE
;
2955 case DISPID_AMBIENT_DLCONTROL
:
2956 CHECK_EXPECT2(Invoke_AMBIENT_DLCONTROL
);
2958 case DISPID_AMBIENT_OFFLINEIFNOTCONNECTED
:
2959 CHECK_EXPECT2(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED
);
2961 case DISPID_AMBIENT_SILENT
:
2962 CHECK_EXPECT2(Invoke_AMBIENT_SILENT
);
2963 V_VT(pVarResult
) = VT_BOOL
;
2964 V_BOOL(pVarResult
) = VARIANT_FALSE
;
2966 case DISPID_AMBIENT_USERAGENT
:
2967 CHECK_EXPECT(Invoke_AMBIENT_USERAGENT
);
2969 case DISPID_AMBIENT_PALETTE
:
2970 CHECK_EXPECT(Invoke_AMBIENT_PALETTE
);
2974 ok(0, "unexpected dispid %d\n", dispIdMember
);
2978 static const IDispatchVtbl DispatchVtbl
= {
2979 Dispatch_QueryInterface
,
2982 Dispatch_GetTypeInfoCount
,
2983 Dispatch_GetTypeInfo
,
2984 Dispatch_GetIDsOfNames
,
2988 static IDispatch Dispatch
= { &DispatchVtbl
};
2990 static HRESULT WINAPI
EventDispatch_QueryInterface(IDispatch
*iface
, REFIID riid
, void **ppv
)
2992 if(IsEqualGUID(&IID_IUnknown
, riid
) || IsEqualGUID(&IID_IDispatch
, riid
)) {
2997 ok(0, "Unexpected call\n");
2998 return E_NOINTERFACE
;
3001 static HRESULT WINAPI
EventDispatch_Invoke(IDispatch
*iface
, DISPID dispIdMember
, REFIID riid
,
3002 LCID lcid
, WORD wFlags
, DISPPARAMS
*pDispParams
, VARIANT
*pVarResult
,
3003 EXCEPINFO
*pExcepInfo
, UINT
*puArgErr
)
3006 IHTMLDocument2
*doc
;
3009 ok(IsEqualGUID(&IID_NULL
, riid
), "riid = %s\n", debugstr_guid(riid
));
3010 ok(pDispParams
!= NULL
, "pDispParams == NULL\n");
3011 ok(pExcepInfo
!= NULL
, "pExcepInfo == NULL\n");
3012 ok(puArgErr
!= NULL
, "puArgErr == NULL\n");
3013 ok(V_VT(pVarResult
) == 0, "V_VT(pVarResult) = %d\n", V_VT(pVarResult
));
3014 ok(wFlags
== DISPATCH_METHOD
, "wFlags = %d, expected DISPATCH_METHOD\n", wFlags
);
3016 hres
= IUnknown_QueryInterface(doc_unk
, &IID_IHTMLDocument2
, (void**)&doc
);
3017 ok(hres
== S_OK
, "QueryInterface(IID_IHTMLDocument2) failed: %08x\n", hres
);
3019 switch(dispIdMember
) {
3020 case DISPID_HTMLDOCUMENTEVENTS2_ONREADYSTATECHANGE
:
3021 hres
= IHTMLDocument2_get_readyState(doc
, &state
);
3022 ok(hres
== S_OK
, "get_readyState failed: %08x\n", hres
);
3024 if(!strcmp_wa(state
, "interactive"))
3025 CHECK_EXPECT(Invoke_OnReadyStateChange_Interactive
);
3026 else if(!strcmp_wa(state
, "loading"))
3027 CHECK_EXPECT(Invoke_OnReadyStateChange_Loading
);
3028 else if(!strcmp_wa(state
, "complete")) {
3029 CHECK_EXPECT(Invoke_OnReadyStateChange_Complete
);
3032 ok(0, "Unexpected readyState: %s\n", wine_dbgstr_w(state
));
3034 SysFreeString(state
);
3036 case DISPID_HTMLDOCUMENTEVENTS2_ONPROPERTYCHANGE
:
3047 break; /* FIXME: Handle these events. */
3049 ok(0, "Unexpected DISPID: %d\n", dispIdMember
);
3052 IHTMLDocument2_Release(doc
);
3056 static const IDispatchVtbl EventDispatchVtbl
= {
3057 EventDispatch_QueryInterface
,
3060 Dispatch_GetTypeInfoCount
,
3061 Dispatch_GetTypeInfo
,
3062 Dispatch_GetIDsOfNames
,
3063 EventDispatch_Invoke
3066 static IDispatch EventDispatch
= { &EventDispatchVtbl
};
3068 static HRESULT
browserservice_qi(REFIID
,void**);
3070 static HRESULT WINAPI
DocObjectService_QueryInterface(IDocObjectService
* This
, REFIID riid
, void **ppv
)
3072 return browserservice_qi(riid
, ppv
);
3075 static ULONG WINAPI
DocObjectService_AddRef(
3076 IDocObjectService
* This
)
3081 static ULONG WINAPI
DocObjectService_Release(
3082 IDocObjectService
* This
)
3087 static HRESULT WINAPI
DocObjectService_FireBeforeNavigate2(IDocObjectService
*iface
, IDispatch
*pDispatch
,
3088 LPCWSTR lpszUrl
, DWORD dwFlags
, LPCWSTR lpszFrameName
, BYTE
*pPostData
, DWORD cbPostData
,
3089 LPCWSTR lpszHeaders
, BOOL fPlayNavSound
, BOOL
*pfCancel
)
3091 CHECK_EXPECT(FireBeforeNavigate2
);
3093 ok(!pDispatch
, "pDispatch = %p\n", pDispatch
);
3094 ok(!strcmp_wa(lpszUrl
, nav_url
), "lpszUrl = %s, expected %s\n", wine_dbgstr_w(lpszUrl
), nav_url
);
3095 ok(dwFlags
== 0x40 || !dwFlags
, "dwFlags = %x\n", dwFlags
);
3096 ok(!lpszFrameName
, "lpszFrameName = %s\n", wine_dbgstr_w(lpszFrameName
));
3097 ok(!pPostData
, "pPostData = %p\n", pPostData
);
3098 ok(!cbPostData
, "cbPostData = %d\n", cbPostData
);
3099 ok(!lpszHeaders
, "lpszHeaders = %s\n", wine_dbgstr_w(lpszHeaders
));
3100 ok(fPlayNavSound
, "fPlayNavSound = %x\n", fPlayNavSound
);
3101 ok(pfCancel
!= NULL
, "pfCancel = NULL\n");
3102 ok(!*pfCancel
, "*pfCancel = %x\n", *pfCancel
);
3107 static HRESULT WINAPI
DocObjectService_FireNavigateComplete2(
3108 IDocObjectService
* This
,
3109 IHTMLWindow2
*pHTMLWindow2
,
3112 CHECK_EXPECT(FireNavigateComplete2
);
3113 test_readyState(NULL
);
3116 ok(dwFlags
== 0x10 || broken(!dwFlags
), "dwFlags = %x, expected 0x10\n", dwFlags
);
3118 ok(!(dwFlags
&~1), "dwFlags = %x\n", dwFlags
);
3120 ok(pHTMLWindow2
!= NULL
, "pHTMLWindow2 = NULL\n");
3125 static HRESULT WINAPI
DocObjectService_FireDownloadBegin(
3126 IDocObjectService
* This
)
3128 ok(0, "unexpected call\n");
3132 static HRESULT WINAPI
DocObjectService_FireDownloadComplete(
3133 IDocObjectService
* This
)
3135 ok(0, "unexpected call\n");
3139 static HRESULT WINAPI
DocObjectService_FireDocumentComplete(
3140 IDocObjectService
* This
,
3141 IHTMLWindow2
*pHTMLWindow
,
3144 CHECK_EXPECT(FireDocumentComplete
);
3146 ok(pHTMLWindow
!= NULL
, "pHTMLWindow == NULL\n");
3147 ok(!dwFlags
, "dwFlags = %x\n", dwFlags
);
3152 static HRESULT WINAPI
DocObjectService_UpdateDesktopComponent(
3153 IDocObjectService
* This
,
3154 IHTMLWindow2
*pHTMLWindow
)
3156 ok(0, "unexpected call\n");
3160 static HRESULT WINAPI
DocObjectService_GetPendingUrl(
3161 IDocObjectService
* This
,
3162 BSTR
*pbstrPendingUrl
)
3164 CHECK_EXPECT(GetPendingUrl
);
3168 static HRESULT WINAPI
DocObjectService_ActiveElementChanged(
3169 IDocObjectService
* This
,
3170 IHTMLElement
*pHTMLElement
)
3172 CHECK_EXPECT(ActiveElementChanged
);
3176 static HRESULT WINAPI
DocObjectService_GetUrlSearchComponent(
3177 IDocObjectService
* This
,
3180 ok(0, "unexpected call\n");
3184 static HRESULT WINAPI
DocObjectService_IsErrorUrl(
3185 IDocObjectService
* This
,
3189 CHECK_EXPECT(IsErrorUrl
);
3194 static IDocObjectServiceVtbl DocObjectServiceVtbl
= {
3195 DocObjectService_QueryInterface
,
3196 DocObjectService_AddRef
,
3197 DocObjectService_Release
,
3198 DocObjectService_FireBeforeNavigate2
,
3199 DocObjectService_FireNavigateComplete2
,
3200 DocObjectService_FireDownloadBegin
,
3201 DocObjectService_FireDownloadComplete
,
3202 DocObjectService_FireDocumentComplete
,
3203 DocObjectService_UpdateDesktopComponent
,
3204 DocObjectService_GetPendingUrl
,
3205 DocObjectService_ActiveElementChanged
,
3206 DocObjectService_GetUrlSearchComponent
,
3207 DocObjectService_IsErrorUrl
3210 static IDocObjectService DocObjectService
= { &DocObjectServiceVtbl
};
3212 static HRESULT WINAPI
ShellBrowser_QueryInterface(IShellBrowser
*iface
, REFIID riid
, void **ppv
)
3214 return browserservice_qi(riid
, ppv
);
3217 static ULONG WINAPI
ShellBrowser_AddRef(IShellBrowser
*iface
)
3222 static ULONG WINAPI
ShellBrowser_Release(IShellBrowser
*iface
)
3227 static HRESULT WINAPI
ShellBrowser_GetWindow(IShellBrowser
*iface
, HWND
*phwnd
)
3229 ok(0, "unexpected call\n");
3233 static HRESULT WINAPI
ShellBrowser_ContextSensitiveHelp(IShellBrowser
*iface
, BOOL fEnterMode
)
3235 ok(0, "unexpected call\n");
3239 static HRESULT WINAPI
ShellBrowser_InsertMenusSB(IShellBrowser
*iface
, HMENU hmenuShared
, LPOLEMENUGROUPWIDTHS lpMenuWidths
)
3241 ok(0, "unexpected call\n");
3245 static HRESULT WINAPI
ShellBrowser_SetMenuSB(IShellBrowser
*iface
, HMENU hmenuShared
, HOLEMENU holemenuReserved
,
3246 HWND hwndActiveObject
)
3248 ok(0, "unexpected call\n");
3252 static HRESULT WINAPI
ShellBrowser_RemoveMenusSB(IShellBrowser
*iface
, HMENU hmenuShared
)
3254 ok(0, "unexpected call\n");
3258 static HRESULT WINAPI
ShellBrowser_SetStatusTextSB(IShellBrowser
*iface
, LPCOLESTR pszStatusText
)
3260 ok(0, "unexpected call\n");
3264 static HRESULT WINAPI
ShellBrowser_EnableModelessSB(IShellBrowser
*iface
, BOOL fEnable
)
3266 ok(0, "unexpected call\n");
3270 static HRESULT WINAPI
ShellBrowser_TranslateAcceleratorSB(IShellBrowser
*iface
, MSG
*pmsg
, WORD wID
)
3272 ok(0, "unexpected call\n");
3276 static HRESULT WINAPI
ShellBrowser_BrowseObject(IShellBrowser
*iface
, LPCITEMIDLIST pidl
, UINT wFlags
)
3278 ok(0, "unexpected call\n");
3282 static HRESULT WINAPI
ShellBrowser_GetViewStateStream(IShellBrowser
*iface
, DWORD grfMode
, IStream
**ppStrm
)
3284 ok(0, "unexpected call\n");
3288 static HRESULT WINAPI
ShellBrowser_GetControlWindow(IShellBrowser
*iface
, UINT id
, HWND
*phwnd
)
3290 ok(0, "unexpected call\n");
3294 static HRESULT WINAPI
ShellBrowser_SendControlMsg(IShellBrowser
*iface
, UINT id
, UINT uMsg
, WPARAM wParam
,
3295 LPARAM lParam
, LRESULT
*pret
)
3297 ok(0, "unexpected call\n");
3301 static HRESULT WINAPI
ShellBrowser_QueryActiveShellView(IShellBrowser
*iface
, IShellView
**ppshv
)
3303 ok(0, "unexpected call\n");
3307 static HRESULT WINAPI
ShellBrowser_OnViewWindowActive(IShellBrowser
* iface
, IShellView
*pshv
)
3309 ok(0, "unexpected call\n");
3313 static HRESULT WINAPI
ShellBrowser_SetToolbarItems(IShellBrowser
*iface
, LPTBBUTTONSB lpButtons
,
3314 UINT nButtons
, UINT uFlags
)
3316 ok(0, "unexpected call\n");
3320 static const IShellBrowserVtbl ShellBrowserVtbl
= {
3321 ShellBrowser_QueryInterface
,
3322 ShellBrowser_AddRef
,
3323 ShellBrowser_Release
,
3324 ShellBrowser_GetWindow
,
3325 ShellBrowser_ContextSensitiveHelp
,
3326 ShellBrowser_InsertMenusSB
,
3327 ShellBrowser_SetMenuSB
,
3328 ShellBrowser_RemoveMenusSB
,
3329 ShellBrowser_SetStatusTextSB
,
3330 ShellBrowser_EnableModelessSB
,
3331 ShellBrowser_TranslateAcceleratorSB
,
3332 ShellBrowser_BrowseObject
,
3333 ShellBrowser_GetViewStateStream
,
3334 ShellBrowser_GetControlWindow
,
3335 ShellBrowser_SendControlMsg
,
3336 ShellBrowser_QueryActiveShellView
,
3337 ShellBrowser_OnViewWindowActive
,
3338 ShellBrowser_SetToolbarItems
3341 static IShellBrowser ShellBrowser
= { &ShellBrowserVtbl
};
3343 static HRESULT WINAPI
BrowserService_QueryInterface(IBrowserService
*iface
, REFIID riid
, void **ppv
)
3345 return browserservice_qi(riid
, ppv
);
3348 static ULONG WINAPI
BrowserService_AddRef(
3349 IBrowserService
* This
)
3354 static ULONG WINAPI
BrowserService_Release(
3355 IBrowserService
* This
)
3360 static HRESULT WINAPI
BrowserService_GetParentSite(
3361 IBrowserService
* This
,
3362 IOleInPlaceSite
**ppipsite
)
3364 ok(0, "unexpected call\n");
3368 static HRESULT WINAPI
BrowserService_SetTitle(
3369 IBrowserService
* This
,
3373 ok(0, "unexpected call\n");
3377 static HRESULT WINAPI
BrowserService_GetTitle(
3378 IBrowserService
* This
,
3383 ok(0, "unexpected call\n");
3387 static HRESULT WINAPI
BrowserService_GetOleObject(
3388 IBrowserService
* This
,
3389 IOleObject
**ppobjv
)
3391 ok(0, "unexpected call\n");
3395 static HRESULT WINAPI
BrowserService_GetTravelLog(
3396 IBrowserService
* This
,
3399 CHECK_EXPECT(GetTravelLog
);
3403 static HRESULT WINAPI
BrowserService_ShowControlWindow(
3404 IBrowserService
* This
,
3408 ok(0, "unexpected call\n");
3412 static HRESULT WINAPI
BrowserService_IsControlWindowShown(
3413 IBrowserService
* This
,
3417 ok(0, "unexpected call\n");
3421 static HRESULT WINAPI
BrowserService_IEGetDisplayName(
3422 IBrowserService
* This
,
3423 PCIDLIST_ABSOLUTE pidl
,
3427 ok(0, "unexpected call\n");
3431 static HRESULT WINAPI
BrowserService_IEParseDisplayName(
3432 IBrowserService
* This
,
3435 PIDLIST_ABSOLUTE
*ppidlOut
)
3437 ok(0, "unexpected call\n");
3441 static HRESULT WINAPI
BrowserService_DisplayParseError(
3442 IBrowserService
* This
,
3446 ok(0, "unexpected call\n");
3450 static HRESULT WINAPI
BrowserService_NavigateToPidl(
3451 IBrowserService
* This
,
3452 PCIDLIST_ABSOLUTE pidl
,
3455 ok(0, "unexpected call\n");
3459 static HRESULT WINAPI
BrowserService_SetNavigateState(
3460 IBrowserService
* This
,
3463 ok(0, "unexpected call\n");
3467 static HRESULT WINAPI
BrowserService_GetNavigateState(
3468 IBrowserService
* This
,
3471 ok(0, "unexpected call\n");
3475 static HRESULT WINAPI
BrowserService_NotifyRedirect(
3476 IBrowserService
* This
,
3478 PCIDLIST_ABSOLUTE pidl
,
3481 ok(0, "unexpected call\n");
3485 static HRESULT WINAPI
BrowserService_UpdateWindowList(
3486 IBrowserService
* This
)
3488 ok(0, "unexpected call\n");
3492 static HRESULT WINAPI
BrowserService_UpdateBackForwardState(
3493 IBrowserService
* This
)
3495 CHECK_EXPECT(UpdateBackForwardState
);
3499 static HRESULT WINAPI
BrowserService_SetFlags(
3500 IBrowserService
* This
,
3504 ok(0, "unexpected call\n");
3508 static HRESULT WINAPI
BrowserService_GetFlags(
3509 IBrowserService
* This
,
3512 ok(0, "unexpected call\n");
3516 static HRESULT WINAPI
BrowserService_CanNavigateNow(
3517 IBrowserService
* This
)
3519 ok(0, "unexpected call\n");
3523 static HRESULT WINAPI
BrowserService_GetPidl(
3524 IBrowserService
* This
,
3525 PIDLIST_ABSOLUTE
*ppidl
)
3527 ok(0, "unexpected call\n");
3531 static HRESULT WINAPI
BrowserService_SetReferrer(
3532 IBrowserService
* This
,
3533 PCIDLIST_ABSOLUTE pidl
)
3535 ok(0, "unexpected call\n");
3539 static DWORD WINAPI
BrowserService_GetBrowserIndex(
3540 IBrowserService
* This
)
3542 ok(0, "unexpected call\n");
3546 static HRESULT WINAPI
BrowserService_GetBrowserByIndex(
3547 IBrowserService
* This
,
3551 ok(0, "unexpected call\n");
3555 static HRESULT WINAPI
BrowserService_GetHistoryObject(
3556 IBrowserService
* This
,
3561 ok(0, "unexpected call\n");
3565 static HRESULT WINAPI
BrowserService_SetHistoryObject(
3566 IBrowserService
* This
,
3568 BOOL fIsLocalAnchor
)
3570 ok(0, "unexpected call\n");
3574 static HRESULT WINAPI
BrowserService_CacheOLEServer(
3575 IBrowserService
* This
,
3578 ok(0, "unexpected call\n");
3582 static HRESULT WINAPI
BrowserService_GetSetCodePage(
3583 IBrowserService
* This
,
3587 ok(0, "unexpected call\n");
3591 static HRESULT WINAPI
BrowserService_OnHttpEquiv(
3592 IBrowserService
* This
,
3596 VARIANT
*pvarargOut
)
3598 ok(0, "unexpected call\n");
3602 static HRESULT WINAPI
BrowserService_GetPalette(
3603 IBrowserService
* This
,
3606 ok(0, "unexpected call\n");
3610 static HRESULT WINAPI
BrowserService_RegisterWindow(
3611 IBrowserService
* This
,
3612 BOOL fForceRegister
,
3615 ok(0, "unexpected call\n");
3619 static IBrowserServiceVtbl BrowserServiceVtbl
= {
3620 BrowserService_QueryInterface
,
3621 BrowserService_AddRef
,
3622 BrowserService_Release
,
3623 BrowserService_GetParentSite
,
3624 BrowserService_SetTitle
,
3625 BrowserService_GetTitle
,
3626 BrowserService_GetOleObject
,
3627 BrowserService_GetTravelLog
,
3628 BrowserService_ShowControlWindow
,
3629 BrowserService_IsControlWindowShown
,
3630 BrowserService_IEGetDisplayName
,
3631 BrowserService_IEParseDisplayName
,
3632 BrowserService_DisplayParseError
,
3633 BrowserService_NavigateToPidl
,
3634 BrowserService_SetNavigateState
,
3635 BrowserService_GetNavigateState
,
3636 BrowserService_NotifyRedirect
,
3637 BrowserService_UpdateWindowList
,
3638 BrowserService_UpdateBackForwardState
,
3639 BrowserService_SetFlags
,
3640 BrowserService_GetFlags
,
3641 BrowserService_CanNavigateNow
,
3642 BrowserService_GetPidl
,
3643 BrowserService_SetReferrer
,
3644 BrowserService_GetBrowserIndex
,
3645 BrowserService_GetBrowserByIndex
,
3646 BrowserService_GetHistoryObject
,
3647 BrowserService_SetHistoryObject
,
3648 BrowserService_CacheOLEServer
,
3649 BrowserService_GetSetCodePage
,
3650 BrowserService_OnHttpEquiv
,
3651 BrowserService_GetPalette
,
3652 BrowserService_RegisterWindow
3655 static IBrowserService BrowserService
= { &BrowserServiceVtbl
};
3657 DEFINE_GUID(IID_ITabBrowserService
, 0x5E8FA523,0x83D4,0x4DBE,0x81,0x99,0x4C,0x18,0xE4,0x85,0x87,0x25);
3659 static HRESULT
browserservice_qi(REFIID riid
, void **ppv
)
3661 if(IsEqualGUID(&IID_IShellBrowser
, riid
)) {
3662 *ppv
= &ShellBrowser
;
3666 if(IsEqualGUID(&IID_IDocObjectService
, riid
)) {
3667 *ppv
= &DocObjectService
;
3671 if(IsEqualGUID(&IID_IBrowserService
, riid
)) {
3672 *ppv
= &BrowserService
;
3677 return E_NOINTERFACE
;
3680 static HRESULT WINAPI
WebBrowser_QueryInterface(IWebBrowser2
*iface
, REFIID riid
, void **ppv
)
3684 if(IsEqualGUID(&IID_IUnknown
, riid
) || IsEqualGUID(&IID_IWebBrowser
, riid
)
3685 || IsEqualGUID(&IID_IWebBrowserApp
, riid
) || IsEqualGUID(&IID_IWebBrowser2
, riid
)) {
3690 if(IsEqualGUID(riid
, &IID_IOleObject
))
3691 return E_NOINTERFACE
; /* TODO */
3693 ok(0, "unexpected call %s\n", debugstr_guid(riid
));
3694 return E_NOINTERFACE
;
3697 static ULONG WINAPI
WebBrowser_AddRef(IWebBrowser2
*iface
)
3702 static ULONG WINAPI
WebBrowser_Release(IWebBrowser2
*iface
)
3707 static HRESULT WINAPI
WebBrowser_GetTypeInfoCount(IWebBrowser2
*iface
, UINT
*pctinfo
)
3709 ok(0, "unexpected call\n");
3713 static HRESULT WINAPI
WebBrowser_GetTypeInfo(IWebBrowser2
*iface
, UINT iTInfo
, LCID lcid
,
3714 LPTYPEINFO
*ppTInfo
)
3716 ok(0, "unexpected call\n");
3720 static HRESULT WINAPI
WebBrowser_GetIDsOfNames(IWebBrowser2
*iface
, REFIID riid
,
3721 LPOLESTR
*rgszNames
, UINT cNames
, LCID lcid
, DISPID
*rgDispId
)
3723 ok(0, "unexpected call\n");
3727 static HRESULT WINAPI
WebBrowser_Invoke(IWebBrowser2
*iface
, DISPID dispIdMember
,
3728 REFIID riid
, LCID lcid
, WORD wFlags
, DISPPARAMS
*pDispParams
, VARIANT
*pVarResult
,
3729 EXCEPINFO
*pExepInfo
, UINT
*puArgErr
)
3731 ok(0, "unexpected call\n");
3735 static HRESULT WINAPI
WebBrowser_GoBack(IWebBrowser2
*iface
)
3737 ok(0, "unexpected call\n");
3741 static HRESULT WINAPI
WebBrowser_GoForward(IWebBrowser2
*iface
)
3743 ok(0, "unexpected call\n");
3747 static HRESULT WINAPI
WebBrowser_GoHome(IWebBrowser2
*iface
)
3749 ok(0, "unexpected call\n");
3753 static HRESULT WINAPI
WebBrowser_GoSearch(IWebBrowser2
*iface
)
3755 ok(0, "unexpected call\n");
3759 static HRESULT WINAPI
WebBrowser_Navigate(IWebBrowser2
*iface
, BSTR szUrl
,
3760 VARIANT
*Flags
, VARIANT
*TargetFrameName
, VARIANT
*PostData
, VARIANT
*Headers
)
3762 ok(0, "unexpected call\n");
3766 static HRESULT WINAPI
WebBrowser_Refresh(IWebBrowser2
*iface
)
3768 ok(0, "unexpected call\n");
3772 static HRESULT WINAPI
WebBrowser_Refresh2(IWebBrowser2
*iface
, VARIANT
*Level
)
3774 ok(0, "unexpected call\n");
3778 static HRESULT WINAPI
WebBrowser_Stop(IWebBrowser2
*iface
)
3780 ok(0, "unexpected call\n");
3784 static HRESULT WINAPI
WebBrowser_get_Application(IWebBrowser2
*iface
, IDispatch
**ppDisp
)
3786 ok(0, "unexpected call\n");
3790 static HRESULT WINAPI
WebBrowser_get_Parent(IWebBrowser2
*iface
, IDispatch
**ppDisp
)
3792 ok(0, "unexpected call\n");
3796 static HRESULT WINAPI
WebBrowser_get_Container(IWebBrowser2
*iface
, IDispatch
**ppDisp
)
3798 ok(0, "unexpected call\n");
3802 static HRESULT WINAPI
WebBrowser_get_Document(IWebBrowser2
*iface
, IDispatch
**ppDisp
)
3804 ok(0, "unexpected call\n");
3808 static HRESULT WINAPI
WebBrowser_get_TopLevelContainer(IWebBrowser2
*iface
, VARIANT_BOOL
*pBool
)
3810 ok(0, "unexpected call\n");
3814 static HRESULT WINAPI
WebBrowser_get_Type(IWebBrowser2
*iface
, BSTR
*Type
)
3816 ok(0, "unexpected call\n");
3820 static HRESULT WINAPI
WebBrowser_get_Left(IWebBrowser2
*iface
, LONG
*pl
)
3822 ok(0, "unexpected call\n");
3826 static HRESULT WINAPI
WebBrowser_put_Left(IWebBrowser2
*iface
, LONG Left
)
3828 ok(0, "unexpected call\n");
3832 static HRESULT WINAPI
WebBrowser_get_Top(IWebBrowser2
*iface
, LONG
*pl
)
3834 ok(0, "unexpected call\n");
3838 static HRESULT WINAPI
WebBrowser_put_Top(IWebBrowser2
*iface
, LONG Top
)
3840 ok(0, "unexpected call\n");
3844 static HRESULT WINAPI
WebBrowser_get_Width(IWebBrowser2
*iface
, LONG
*pl
)
3846 ok(0, "unexpected call\n");
3850 static HRESULT WINAPI
WebBrowser_put_Width(IWebBrowser2
*iface
, LONG Width
)
3852 ok(0, "unexpected call\n");
3856 static HRESULT WINAPI
WebBrowser_get_Height(IWebBrowser2
*iface
, LONG
*pl
)
3858 ok(0, "unexpected call\n");
3862 static HRESULT WINAPI
WebBrowser_put_Height(IWebBrowser2
*iface
, LONG Height
)
3864 ok(0, "unexpected call\n");
3868 static HRESULT WINAPI
WebBrowser_get_LocationName(IWebBrowser2
*iface
, BSTR
*LocationName
)
3870 ok(0, "unexpected call\n");
3874 static HRESULT WINAPI
WebBrowser_get_LocationURL(IWebBrowser2
*iface
, BSTR
*LocationURL
)
3876 CHECK_EXPECT(get_LocationURL
);
3880 static HRESULT WINAPI
WebBrowser_get_Busy(IWebBrowser2
*iface
, VARIANT_BOOL
*pBool
)
3882 ok(0, "unexpected call\n");
3886 static HRESULT WINAPI
WebBrowser_Quit(IWebBrowser2
*iface
)
3888 ok(0, "unexpected call\n");
3892 static HRESULT WINAPI
WebBrowser_ClientToWindow(IWebBrowser2
*iface
, int *pcx
, int *pcy
)
3894 ok(0, "unexpected call\n");
3898 static HRESULT WINAPI
WebBrowser_PutProperty(IWebBrowser2
*iface
, BSTR szProperty
, VARIANT vtValue
)
3900 ok(0, "unexpected call\n");
3904 static HRESULT WINAPI
WebBrowser_GetProperty(IWebBrowser2
*iface
, BSTR szProperty
, VARIANT
*pvtValue
)
3906 ok(0, "unexpected call\n");
3910 static HRESULT WINAPI
WebBrowser_get_Name(IWebBrowser2
*iface
, BSTR
*Name
)
3912 ok(0, "unexpected call\n");
3916 static HRESULT WINAPI
WebBrowser_get_HWND(IWebBrowser2
*iface
, LONG
*pHWND
)
3918 ok(0, "unexpected call\n");
3922 static HRESULT WINAPI
WebBrowser_get_FullName(IWebBrowser2
*iface
, BSTR
*FullName
)
3924 ok(0, "unexpected call\n");
3928 static HRESULT WINAPI
WebBrowser_get_Path(IWebBrowser2
*iface
, BSTR
*Path
)
3930 ok(0, "unexpected call\n");
3934 static HRESULT WINAPI
WebBrowser_get_Visible(IWebBrowser2
*iface
, VARIANT_BOOL
*pBool
)
3936 ok(0, "unexpected call\n");
3940 static HRESULT WINAPI
WebBrowser_put_Visible(IWebBrowser2
*iface
, VARIANT_BOOL Value
)
3942 ok(0, "unexpected call\n");
3946 static HRESULT WINAPI
WebBrowser_get_StatusBar(IWebBrowser2
*iface
, VARIANT_BOOL
*pBool
)
3948 ok(0, "unexpected call\n");
3952 static HRESULT WINAPI
WebBrowser_put_StatusBar(IWebBrowser2
*iface
, VARIANT_BOOL Value
)
3954 ok(0, "unexpected call\n");
3958 static HRESULT WINAPI
WebBrowser_get_StatusText(IWebBrowser2
*iface
, BSTR
*StatusText
)
3960 ok(0, "unexpected call\n");
3964 static HRESULT WINAPI
WebBrowser_put_StatusText(IWebBrowser2
*iface
, BSTR StatusText
)
3966 ok(0, "unexpected call\n");
3970 static HRESULT WINAPI
WebBrowser_get_ToolBar(IWebBrowser2
*iface
, int *Value
)
3972 ok(0, "unexpected call\n");
3976 static HRESULT WINAPI
WebBrowser_put_ToolBar(IWebBrowser2
*iface
, int Value
)
3978 ok(0, "unexpected call\n");
3982 static HRESULT WINAPI
WebBrowser_get_MenuBar(IWebBrowser2
*iface
, VARIANT_BOOL
*Value
)
3984 ok(0, "unexpected call\n");
3988 static HRESULT WINAPI
WebBrowser_put_MenuBar(IWebBrowser2
*iface
, VARIANT_BOOL Value
)
3990 ok(0, "unexpected call\n");
3994 static HRESULT WINAPI
WebBrowser_get_FullScreen(IWebBrowser2
*iface
, VARIANT_BOOL
*pbFullScreen
)
3996 ok(0, "unexpected call\n");
4000 static HRESULT WINAPI
WebBrowser_put_FullScreen(IWebBrowser2
*iface
, VARIANT_BOOL bFullScreen
)
4002 ok(0, "unexpected call\n");
4006 static HRESULT WINAPI
WebBrowser_Navigate2(IWebBrowser2
*iface
, VARIANT
*URL
, VARIANT
*Flags
,
4007 VARIANT
*TargetFrameName
, VARIANT
*PostData
, VARIANT
*Headers
)
4009 ok(0, "unexpected call\n");
4013 static HRESULT WINAPI
WebBrowser_QueryStatusWB(IWebBrowser2
*iface
, OLECMDID cmdID
, OLECMDF
*pcmdf
)
4015 ok(0, "unexpected call\n");
4019 static HRESULT WINAPI
WebBrowser_ExecWB(IWebBrowser2
*iface
, OLECMDID cmdID
,
4020 OLECMDEXECOPT cmdexecopt
, VARIANT
*pvaIn
, VARIANT
*pvaOut
)
4022 ok(0, "unexpected call\n");
4026 static HRESULT WINAPI
WebBrowser_ShowBrowserBar(IWebBrowser2
*iface
, VARIANT
*pvaClsid
,
4027 VARIANT
*pvarShow
, VARIANT
*pvarSize
)
4029 ok(0, "unexpected call\n");
4033 static HRESULT WINAPI
WebBrowser_get_ReadyState(IWebBrowser2
*iface
, READYSTATE
*lpReadyState
)
4035 ok(0, "unexpected call\n");
4039 static HRESULT WINAPI
WebBrowser_get_Offline(IWebBrowser2
*iface
, VARIANT_BOOL
*pbOffline
)
4041 ok(0, "unexpected call\n");
4045 static HRESULT WINAPI
WebBrowser_put_Offline(IWebBrowser2
*iface
, VARIANT_BOOL bOffline
)
4047 ok(0, "unexpected call\n");
4051 static HRESULT WINAPI
WebBrowser_get_Silent(IWebBrowser2
*iface
, VARIANT_BOOL
*pbSilent
)
4053 ok(0, "unexpected call\n");
4057 static HRESULT WINAPI
WebBrowser_put_Silent(IWebBrowser2
*iface
, VARIANT_BOOL bSilent
)
4059 ok(0, "unexpected call\n");
4063 static HRESULT WINAPI
WebBrowser_get_RegisterAsBrowser(IWebBrowser2
*iface
,
4064 VARIANT_BOOL
*pbRegister
)
4066 ok(0, "unexpected call\n");
4070 static HRESULT WINAPI
WebBrowser_put_RegisterAsBrowser(IWebBrowser2
*iface
,
4071 VARIANT_BOOL bRegister
)
4073 ok(0, "unexpected call\n");
4077 static HRESULT WINAPI
WebBrowser_get_RegisterAsDropTarget(IWebBrowser2
*iface
,
4078 VARIANT_BOOL
*pbRegister
)
4080 ok(0, "unexpected call\n");
4084 static HRESULT WINAPI
WebBrowser_put_RegisterAsDropTarget(IWebBrowser2
*iface
,
4085 VARIANT_BOOL bRegister
)
4087 ok(0, "unexpected call\n");
4091 static HRESULT WINAPI
WebBrowser_get_TheaterMode(IWebBrowser2
*iface
, VARIANT_BOOL
*pbRegister
)
4093 ok(0, "unexpected call\n");
4097 static HRESULT WINAPI
WebBrowser_put_TheaterMode(IWebBrowser2
*iface
, VARIANT_BOOL bRegister
)
4099 ok(0, "unexpected call\n");
4103 static HRESULT WINAPI
WebBrowser_get_AddressBar(IWebBrowser2
*iface
, VARIANT_BOOL
*Value
)
4105 ok(0, "unexpected call\n");
4109 static HRESULT WINAPI
WebBrowser_put_AddressBar(IWebBrowser2
*iface
, VARIANT_BOOL Value
)
4111 ok(0, "unexpected call\n");
4115 static HRESULT WINAPI
WebBrowser_get_Resizable(IWebBrowser2
*iface
, VARIANT_BOOL
*Value
)
4117 ok(0, "unexpected call\n");
4121 static HRESULT WINAPI
WebBrowser_put_Resizable(IWebBrowser2
*iface
, VARIANT_BOOL Value
)
4123 ok(0, "unexpected call\n");
4127 static const IWebBrowser2Vtbl WebBrowser2Vtbl
=
4129 WebBrowser_QueryInterface
,
4132 WebBrowser_GetTypeInfoCount
,
4133 WebBrowser_GetTypeInfo
,
4134 WebBrowser_GetIDsOfNames
,
4137 WebBrowser_GoForward
,
4139 WebBrowser_GoSearch
,
4140 WebBrowser_Navigate
,
4142 WebBrowser_Refresh2
,
4144 WebBrowser_get_Application
,
4145 WebBrowser_get_Parent
,
4146 WebBrowser_get_Container
,
4147 WebBrowser_get_Document
,
4148 WebBrowser_get_TopLevelContainer
,
4149 WebBrowser_get_Type
,
4150 WebBrowser_get_Left
,
4151 WebBrowser_put_Left
,
4154 WebBrowser_get_Width
,
4155 WebBrowser_put_Width
,
4156 WebBrowser_get_Height
,
4157 WebBrowser_put_Height
,
4158 WebBrowser_get_LocationName
,
4159 WebBrowser_get_LocationURL
,
4160 WebBrowser_get_Busy
,
4162 WebBrowser_ClientToWindow
,
4163 WebBrowser_PutProperty
,
4164 WebBrowser_GetProperty
,
4165 WebBrowser_get_Name
,
4166 WebBrowser_get_HWND
,
4167 WebBrowser_get_FullName
,
4168 WebBrowser_get_Path
,
4169 WebBrowser_get_Visible
,
4170 WebBrowser_put_Visible
,
4171 WebBrowser_get_StatusBar
,
4172 WebBrowser_put_StatusBar
,
4173 WebBrowser_get_StatusText
,
4174 WebBrowser_put_StatusText
,
4175 WebBrowser_get_ToolBar
,
4176 WebBrowser_put_ToolBar
,
4177 WebBrowser_get_MenuBar
,
4178 WebBrowser_put_MenuBar
,
4179 WebBrowser_get_FullScreen
,
4180 WebBrowser_put_FullScreen
,
4181 WebBrowser_Navigate2
,
4182 WebBrowser_QueryStatusWB
,
4184 WebBrowser_ShowBrowserBar
,
4185 WebBrowser_get_ReadyState
,
4186 WebBrowser_get_Offline
,
4187 WebBrowser_put_Offline
,
4188 WebBrowser_get_Silent
,
4189 WebBrowser_put_Silent
,
4190 WebBrowser_get_RegisterAsBrowser
,
4191 WebBrowser_put_RegisterAsBrowser
,
4192 WebBrowser_get_RegisterAsDropTarget
,
4193 WebBrowser_put_RegisterAsDropTarget
,
4194 WebBrowser_get_TheaterMode
,
4195 WebBrowser_put_TheaterMode
,
4196 WebBrowser_get_AddressBar
,
4197 WebBrowser_put_AddressBar
,
4198 WebBrowser_get_Resizable
,
4199 WebBrowser_put_Resizable
4202 static IWebBrowser2 WebBrowser2
= { &WebBrowser2Vtbl
};
4204 static HRESULT WINAPI
ServiceProvider_QueryInterface(IServiceProvider
*iface
,
4205 REFIID riid
, void **ppv
)
4207 return QueryInterface(riid
, ppv
);
4210 static ULONG WINAPI
ServiceProvider_AddRef(IServiceProvider
*iface
)
4215 static ULONG WINAPI
ServiceProvider_Release(IServiceProvider
*iface
)
4220 static HRESULT WINAPI
ServiceProvider_QueryService(IServiceProvider
*iface
, REFGUID guidService
,
4221 REFIID riid
, void **ppv
)
4224 * Services used by HTMLDocument:
4227 * IInternetSecurityManager
4229 * {D5F78C80-5252-11CF-90FA-00AA0042106E}
4232 * {3050F312-98B5-11CF-BB82-00AA00BDCE0B}
4233 * {53A2D5B1-D2FC-11D0-84E0-006097C9987D}
4234 * {AD7F6C62-F6BD-11D2-959B-006097C553C8}
4236 * {6D12FE80-7911-11CF-9534-0000C05BAE0B}
4237 * IElementBehaviorFactory
4238 * {3050F429-98B5-11CF-BB82-00AA00BDCE0B}
4247 if(IsEqualGUID(&IID_IHlinkFrame
, guidService
)) {
4248 ok(IsEqualGUID(&IID_IHlinkFrame
, riid
), "unexpected riid\n");
4253 if(IsEqualGUID(&SID_SNewWindowManager
, guidService
)) {
4254 ok(IsEqualGUID(&IID_INewWindowManager
, riid
), "unexpected riid\n");
4255 *ppv
= &NewWindowManager
;
4259 if(IsEqualGUID(&IID_IShellBrowser
, guidService
)) {
4260 ok(IsEqualGUID(&IID_IBrowserService
, riid
), "unexpected riid\n");
4261 *ppv
= &BrowserService
;
4265 if(support_wbapp
&& IsEqualGUID(&IID_IWebBrowserApp
, guidService
)) {
4266 if(IsEqualGUID(riid
, &IID_IWebBrowser2
)) {
4267 *ppv
= &WebBrowser2
;
4270 ok(0, "unexpected riid %s\n", debugstr_guid(riid
));
4273 return E_NOINTERFACE
;
4276 static const IServiceProviderVtbl ServiceProviderVtbl
= {
4277 ServiceProvider_QueryInterface
,
4278 ServiceProvider_AddRef
,
4279 ServiceProvider_Release
,
4280 ServiceProvider_QueryService
4283 static IServiceProvider ServiceProvider
= { &ServiceProviderVtbl
};
4285 static HRESULT WINAPI
AdviseSink_QueryInterface(IAdviseSinkEx
*iface
,
4286 REFIID riid
, void **ppv
)
4288 return QueryInterface(riid
, ppv
);
4291 static ULONG WINAPI
AdviseSink_AddRef(IAdviseSinkEx
*iface
)
4296 static ULONG WINAPI
AdviseSink_Release(IAdviseSinkEx
*iface
)
4301 static void WINAPI
AdviseSink_OnDataChange(IAdviseSinkEx
*iface
,
4302 FORMATETC
*pFormatetc
, STGMEDIUM
*pStgmed
)
4304 ok(0, "unexpected call\n");
4307 static void WINAPI
AdviseSink_OnViewChange(IAdviseSinkEx
*iface
,
4308 DWORD dwAspect
, LONG lindex
)
4310 ok(0, "unexpected call\n");
4313 static void WINAPI
AdviseSink_OnRename(IAdviseSinkEx
*iface
, IMoniker
*pmk
)
4315 ok(0, "unexpected call\n");
4318 static void WINAPI
AdviseSink_OnSave(IAdviseSinkEx
*iface
)
4320 ok(0, "unexpected call\n");
4323 static void WINAPI
AdviseSink_OnClose(IAdviseSinkEx
*iface
)
4325 ok(0, "unexpected call\n");
4328 static void WINAPI
AdviseSinkEx_OnViewStatusChange(IAdviseSinkEx
*iface
, DWORD dwViewStatus
)
4330 ok(0, "unexpected call\n");
4333 static void WINAPI
ObjectAdviseSink_OnClose(IAdviseSinkEx
*iface
)
4335 CHECK_EXPECT(Advise_Close
);
4338 static const IAdviseSinkExVtbl AdviseSinkVtbl
= {
4339 AdviseSink_QueryInterface
,
4342 AdviseSink_OnDataChange
,
4343 AdviseSink_OnViewChange
,
4344 AdviseSink_OnRename
,
4346 ObjectAdviseSink_OnClose
,
4347 AdviseSinkEx_OnViewStatusChange
4350 static IAdviseSinkEx AdviseSink
= { &AdviseSinkVtbl
};
4352 static HRESULT WINAPI
ViewAdviseSink_QueryInterface(IAdviseSinkEx
*iface
,
4353 REFIID riid
, void **ppv
)
4355 if(IsEqualGUID(&IID_IAdviseSinkEx
, riid
)) {
4360 ok(0, "unexpected riid %s\n", debugstr_guid(riid
));
4362 return E_NOINTERFACE
;
4365 static void WINAPI
ViewAdviseSink_OnViewChange(IAdviseSinkEx
*iface
,
4366 DWORD dwAspect
, LONG lindex
)
4368 CHECK_EXPECT2(OnViewChange
);
4370 ok(dwAspect
== DVASPECT_CONTENT
, "dwAspect = %d\n", dwAspect
);
4371 ok(lindex
== -1, "lindex = %d\n", lindex
);
4374 static const IAdviseSinkExVtbl ViewAdviseSinkVtbl
= {
4375 ViewAdviseSink_QueryInterface
,
4378 AdviseSink_OnDataChange
,
4379 ViewAdviseSink_OnViewChange
,
4380 AdviseSink_OnRename
,
4383 AdviseSinkEx_OnViewStatusChange
4386 static IAdviseSinkEx ViewAdviseSink
= { &ViewAdviseSinkVtbl
};
4388 DEFINE_GUID(IID_unk1
, 0xD48A6EC6,0x6A4A,0x11CF,0x94,0xA7,0x44,0x45,0x53,0x54,0x00,0x00); /* HTMLWindow2 ? */
4389 DEFINE_GUID(IID_IThumbnailView
, 0x7BB0B520,0xB1A7,0x11D2,0xBB,0x23,0x00,0xC0,0x4F,0x79,0xAB,0xCD);
4390 DEFINE_GUID(IID_IRenMailEditor
, 0x000670BA,0x0000,0x0000,0xC0,0x00,0x00,0x00,0x00,0x00,0x00,0x46);
4391 DEFINE_GUID(IID_unk4
, 0x305104a6,0x98b5,0x11cf,0xbb,0x82,0x00,0xaa,0x00,0xbd,0xce,0x0b);
4392 DEFINE_GUID(IID_IDocHostUIHandlerPriv
, 0xf0d241d1,0x5d0e,0x4e85,0xbc,0xb4,0xfa,0xd7,0xf7,0xc5,0x52,0x8c);
4394 static HRESULT
QueryInterface(REFIID riid
, void **ppv
)
4398 if(IsEqualGUID(&IID_IUnknown
, riid
) || IsEqualGUID(&IID_IOleClientSite
, riid
))
4400 else if(IsEqualGUID(&IID_IOleDocumentSite
, riid
))
4401 *ppv
= &DocumentSite
;
4402 else if(IsEqualGUID(&IID_IDocHostUIHandler
, riid
) || IsEqualGUID(&IID_IDocHostUIHandler2
, riid
))
4403 *ppv
= &DocHostUIHandler
;
4404 else if(IsEqualGUID(&IID_IOleContainer
, riid
))
4405 *ppv
= &OleContainer
;
4406 else if(IsEqualGUID(&IID_IOleWindow
, riid
) || IsEqualGUID(&IID_IOleInPlaceSite
, riid
))
4407 *ppv
= &InPlaceSiteWindowless
;
4408 else if(IsEqualGUID(&IID_IOleCommandTarget
, riid
))
4409 *ppv
= &OleCommandTarget
;
4410 else if(IsEqualGUID(&IID_IDispatch
, riid
))
4412 else if(IsEqualGUID(&IID_IServiceProvider
, riid
))
4413 *ppv
= &ServiceProvider
;
4414 else if(IsEqualGUID(&IID_IOleInPlaceSiteEx
, riid
))
4415 *ppv
= ipsex
? &InPlaceSiteWindowless
: NULL
;
4416 else if(IsEqualGUID(&IID_IOleInPlaceSiteWindowless
, riid
))
4417 *ppv
= ipsw
? &InPlaceSiteWindowless
: NULL
;
4418 else if(IsEqualGUID(&IID_IOleControlSite
, riid
))
4419 *ppv
= &OleControlSite
;
4420 else if(IsEqualGUID(&IID_IDocHostShowUI
, riid
))
4421 return E_NOINTERFACE
; /* TODO */
4422 else if(IsEqualGUID(&IID_IProxyManager
, riid
))
4423 return E_NOINTERFACE
; /* ? */
4424 else if(IsEqualGUID(&IID_unk1
, riid
))
4425 return E_NOINTERFACE
; /* HTMLWindow2 ? */
4426 else if(IsEqualGUID(&IID_IThumbnailView
, riid
))
4427 return E_NOINTERFACE
; /* ? */
4428 else if(IsEqualGUID(&IID_IRenMailEditor
, riid
))
4429 return E_NOINTERFACE
; /* ? */
4430 else if(IsEqualGUID(&IID_unk4
, riid
))
4431 return E_NOINTERFACE
; /* ? */
4432 else if(IsEqualGUID(&IID_IDocHostUIHandlerPriv
, riid
))
4433 return E_NOINTERFACE
; /* ? */
4435 ok(0, "unexpected riid %s\n", debugstr_guid(riid
));
4439 return E_NOINTERFACE
;
4442 static LRESULT WINAPI
wnd_proc(HWND hwnd
, UINT msg
, WPARAM wParam
, LPARAM lParam
)
4444 if(msg
== WM_CONTINUE_BINDING
) {
4445 IBindStatusCallback
*callback
= (IBindStatusCallback
*)wParam
;
4446 continue_binding(callback
);
4449 return DefWindowProc(hwnd
, msg
, wParam
, lParam
);
4452 static void test_doscroll(IUnknown
*unk
)
4454 IHTMLDocument3
*doc
;
4455 IHTMLElement2
*elem2
;
4460 hres
= IUnknown_QueryInterface(unk
, &IID_IHTMLDocument3
, (void**)&doc
);
4461 ok(hres
== S_OK
, "Could not get IHTMLDocument3 iface: %08x\n", hres
);
4465 hres
= IHTMLDocument3_get_documentElement(doc
, &elem
);
4466 IHTMLDocument3_Release(doc
);
4467 ok(hres
== S_OK
, "get_documentElement failed: %08x\n", hres
);
4468 switch(load_state
) {
4472 ok(!elem
, "elem != NULL\n");
4475 case LD_INTERACTIVE
:
4477 ok(elem
!= NULL
, "elem == NULL\n");
4482 hres
= IHTMLElement_QueryInterface(elem
, &IID_IHTMLElement2
, (void**)&elem2
);
4483 IHTMLElement_Release(elem
);
4484 ok(hres
== S_OK
, "Could not get IHTMLElement2 iface: %08x\n", hres
);
4487 V_BSTR(&v
) = a2bstr("left");
4488 hres
= IHTMLElement2_doScroll(elem2
, v
);
4489 SysFreeString(V_BSTR(&v
));
4490 IHTMLElement2_Release(elem2
);
4492 if(inplace_deactivated
)
4493 ok(hres
== E_PENDING
, "doScroll failed: %08x\n", hres
);
4494 else if(load_state
== LD_COMPLETE
)
4495 ok(hres
== S_OK
, "doScroll failed: %08x\n", hres
);
4497 ok(hres
== E_PENDING
|| hres
== S_OK
, "doScroll failed: %08x\n", hres
);
4500 static void _test_readyState(unsigned line
, IUnknown
*unk
)
4502 IHTMLDocument2
*htmldoc
;
4503 DISPPARAMS dispparams
;
4509 static const LPCSTR expected_state
[] = {
4524 hres
= IUnknown_QueryInterface(unk
, &IID_IHTMLDocument2
, (void**)&htmldoc
);
4525 ok(hres
== S_OK
, "QueryInterface(IID_IHTMLDocument2) failed: %08x\n", hres
);
4529 hres
= IHTMLDocument2_get_readyState(htmldoc
, NULL
);
4530 ok(hres
== E_POINTER
, "get_readyState failed: %08x, expected\n", hres
);
4532 hres
= IHTMLDocument2_get_readyState(htmldoc
, &state
);
4533 ok(hres
== S_OK
, "get_ReadyState failed: %08x\n", hres
);
4535 if(!strcmp_wa(state
, "interactive") && load_state
== LD_LOADING
)
4536 load_state
= LD_INTERACTIVE
;
4539 (!strcmp_wa(state
, expected_state
[load_state
]), "unexpected state %s, expected %d\n",
4540 wine_dbgstr_w(state
), load_state
);
4541 SysFreeString(state
);
4543 hres
= IHTMLDocument2_get_body(htmldoc
, &elem
);
4544 ok_(__FILE__
,line
)(hres
== S_OK
, "get_body failed: %08x\n", hres
);
4546 IHTMLElement2
*elem2
;
4549 hres
= IHTMLElement_QueryInterface(elem
, &IID_IHTMLElement2
, (void**)&elem2
);
4550 IHTMLElement_Release(elem
);
4551 ok(hres
== S_OK
, "Could not get IHTMLElement2 iface: %08x\n", hres
);
4553 hres
= IHTMLElement2_get_readyState(elem2
, &var
);
4554 IHTMLElement2_Release(elem2
);
4555 ok(hres
== S_OK
, "get_readyState failed: %08x\n", hres
);
4556 ok(V_VT(&var
) == VT_BSTR
, "V_VT(state) = %d\n", V_VT(&var
));
4557 ok(!strcmp_wa(V_BSTR(&var
), "complete"), "unexpected body state %s\n", wine_dbgstr_w(V_BSTR(&var
)));
4560 ok_(__FILE__
,line
)(load_state
!= LD_COMPLETE
, "body is NULL in complete state\n");
4563 dispparams
.cArgs
= 0;
4564 dispparams
.cNamedArgs
= 0;
4565 dispparams
.rgdispidNamedArgs
= NULL
;
4566 dispparams
.rgvarg
= NULL
;
4570 hres
= IHTMLDocument2_Invoke(htmldoc
, DISPID_READYSTATE
, &IID_NULL
, 0, DISPATCH_PROPERTYGET
,
4571 &dispparams
, &out
, NULL
, NULL
);
4572 ok(hres
== S_OK
, "Invoke(DISPID_READYSTATE) failed: %08x\n", hres
);
4574 ok_(__FILE__
,line
) (V_VT(&out
) == VT_I4
, "V_VT(out)=%d\n", V_VT(&out
));
4575 ok_(__FILE__
,line
) (V_I4(&out
) == load_state
%5, "VT_I4(out)=%d, expected %d\n", V_I4(&out
), load_state
%5);
4577 test_doscroll((IUnknown
*)htmldoc
);
4579 IHTMLDocument2_Release(htmldoc
);
4582 static void test_ViewAdviseSink(IHTMLDocument2
*doc
)
4587 hres
= IHTMLDocument2_QueryInterface(doc
, &IID_IViewObject
, (void**)&view
);
4588 ok(hres
== S_OK
, "QueryInterface(IID_IViewObject) failed: %08x\n", hres
);
4590 hres
= IViewObject_SetAdvise(view
, DVASPECT_CONTENT
, ADVF_PRIMEFIRST
, (IAdviseSink
*)&ViewAdviseSink
);
4591 ok(hres
== S_OK
, "SetAdvise failed: %08x\n", hres
);
4593 IViewObject_Release(view
);
4596 static void test_ConnectionPoint(IConnectionPointContainer
*container
, REFIID riid
)
4598 IConnectionPointContainer
*tmp_container
= NULL
;
4599 IConnectionPoint
*cp
;
4604 hres
= IConnectionPointContainer_FindConnectionPoint(container
, riid
, &cp
);
4605 ok(hres
== S_OK
, "FindConnectionPoint failed: %08x\n", hres
);
4609 hres
= IConnectionPoint_GetConnectionInterface(cp
, &iid
);
4610 ok(hres
== S_OK
, "GetConnectionInterface failed: %08x\n", hres
);
4611 ok(IsEqualGUID(riid
, &iid
), "wrong iid\n");
4613 hres
= IConnectionPoint_GetConnectionInterface(cp
, NULL
);
4614 ok(hres
== E_POINTER
, "GetConnectionInterface failed: %08x, expected E_POINTER\n", hres
);
4616 hres
= IConnectionPoint_GetConnectionPointContainer(cp
, &tmp_container
);
4617 ok(hres
== S_OK
, "GetConnectionPointContainer failed: %08x\n", hres
);
4618 ok(tmp_container
== container
, "container != tmp_container\n");
4620 IConnectionPointContainer_Release(tmp_container
);
4622 hres
= IConnectionPoint_GetConnectionPointContainer(cp
, NULL
);
4623 ok(hres
== E_POINTER
, "GetConnectionPointContainer failed: %08x, expected E_POINTER\n", hres
);
4625 if(IsEqualGUID(&IID_IPropertyNotifySink
, riid
)) {
4626 hres
= IConnectionPoint_Advise(cp
, (IUnknown
*)&PropertyNotifySink
, &cookie
);
4627 ok(hres
== S_OK
, "Advise failed: %08x\n", hres
);
4628 } else if(IsEqualGUID(&IID_IDispatch
, riid
)) {
4629 hres
= IConnectionPoint_Advise(cp
, (IUnknown
*)&EventDispatch
, &cookie
);
4630 ok(hres
== S_OK
, "Advise failed: %08x\n", hres
);
4633 IConnectionPoint_Release(cp
);
4636 static void test_ConnectionPointContainer(IHTMLDocument2
*doc
)
4638 IConnectionPointContainer
*container
;
4641 hres
= IUnknown_QueryInterface(doc
, &IID_IConnectionPointContainer
, (void**)&container
);
4642 ok(hres
== S_OK
, "QueryInterface(IID_IConnectionPointContainer) failed: %08x\n", hres
);
4646 test_ConnectionPoint(container
, &IID_IDispatch
);
4647 test_ConnectionPoint(container
, &IID_IPropertyNotifySink
);
4648 test_ConnectionPoint(container
, &DIID_HTMLDocumentEvents
);
4649 test_ConnectionPoint(container
, &DIID_HTMLDocumentEvents2
);
4651 IConnectionPointContainer_Release(container
);
4654 static void set_custom_uihandler(IHTMLDocument2
*doc
, IDocHostUIHandler2
*uihandler
)
4656 ICustomDoc
*custom_doc
;
4659 hres
= IHTMLDocument2_QueryInterface(doc
, &IID_ICustomDoc
, (void**)&custom_doc
);
4660 ok(hres
== S_OK
, "Could not get ICustomDoc iface: %08x\n", hres
);
4662 expect_uihandler_iface
= uihandler
;
4664 hres
= ICustomDoc_SetUIHandler(custom_doc
, (IDocHostUIHandler
*)uihandler
);
4665 ICustomDoc_Release(custom_doc
);
4666 ok(hres
== S_OK
, "SetUIHandler failed: %08x\n", hres
);
4669 static void test_Load(IPersistMoniker
*persist
, IMoniker
*mon
)
4673 WCHAR sz_html_clientsite_objectparam
[MAX_PATH
];
4675 lstrcpyW(sz_html_clientsite_objectparam
, SZ_HTML_CLIENTSITE_OBJECTPARAM
);
4677 test_readyState((IUnknown
*)persist
);
4681 CreateBindCtx(0, &bind
);
4682 IBindCtx_RegisterObjectParam(bind
, sz_html_clientsite_objectparam
,
4683 (IUnknown
*)&ClientSite
);
4686 SET_EXPECT(GetDisplayName
);
4687 if(!set_clientsite
) {
4688 SET_EXPECT(Invoke_AMBIENT_USERMODE
);
4689 SET_EXPECT(GetHostInfo
);
4690 SET_EXPECT(Invoke_AMBIENT_DLCONTROL
);
4691 SET_EXPECT(Invoke_AMBIENT_SILENT
);
4692 SET_EXPECT(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED
);
4693 SET_EXPECT(Invoke_AMBIENT_USERAGENT
);
4694 SET_EXPECT(Invoke_AMBIENT_PALETTE
);
4695 SET_EXPECT(GetOptionKeyPath
);
4696 SET_EXPECT(GetOverrideKeyPath
);
4697 SET_EXPECT(GetWindow
);
4698 SET_EXPECT(Exec_DOCCANNAVIGATE
);
4699 SET_EXPECT(QueryStatus_SETPROGRESSTEXT
);
4700 SET_EXPECT(Exec_SETPROGRESSMAX
);
4701 SET_EXPECT(Exec_SETPROGRESSPOS
);
4702 SET_EXPECT(Exec_ShellDocView_37
);
4704 if(!container_locked
) {
4705 SET_EXPECT(GetContainer
);
4706 SET_EXPECT(LockContainer
);
4708 SET_EXPECT(OnChanged_READYSTATE
);
4709 SET_EXPECT(Invoke_OnReadyStateChange_Loading
);
4710 SET_EXPECT(Exec_ShellDocView_84
);
4711 SET_EXPECT(IsSystemMoniker
);
4713 SET_EXPECT(BindToStorage
);
4714 SET_EXPECT(SetActiveObject
);
4715 if(set_clientsite
) {
4716 SET_EXPECT(Invoke_AMBIENT_SILENT
);
4717 SET_EXPECT(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED
);
4718 SET_EXPECT(Exec_ShellDocView_37
);
4719 SET_EXPECT(IsErrorUrl
);
4722 SET_EXPECT(GetTravelLog
);
4723 SET_EXPECT(GetPendingUrl
);
4724 load_state
= LD_DOLOAD
;
4725 expect_LockContainer_fLock
= TRUE
;
4726 readystate_set_loading
= TRUE
;
4728 hres
= IPersistMoniker_Load(persist
, FALSE
, mon
, bind
, 0x12);
4729 ok(hres
== S_OK
, "Load failed: %08x\n", hres
);
4732 CHECK_CALLED(GetDisplayName
);
4733 if(!set_clientsite
) {
4734 CHECK_CALLED(Invoke_AMBIENT_USERMODE
);
4735 CHECK_CALLED(GetHostInfo
);
4736 CHECK_CALLED(Invoke_AMBIENT_DLCONTROL
);
4737 CHECK_CALLED(Invoke_AMBIENT_SILENT
);
4738 CHECK_CALLED(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED
);
4739 CHECK_CALLED(Invoke_AMBIENT_USERAGENT
);
4740 CLEAR_CALLED(Invoke_AMBIENT_PALETTE
); /* not called on IE9 */
4741 CLEAR_CALLED(GetOptionKeyPath
); /* not called on some IE9 */
4742 CHECK_CALLED(GetOverrideKeyPath
);
4743 CHECK_CALLED(GetWindow
);
4744 CHECK_CALLED(Exec_DOCCANNAVIGATE
);
4745 CHECK_CALLED(QueryStatus_SETPROGRESSTEXT
);
4746 CHECK_CALLED(Exec_SETPROGRESSMAX
);
4747 CHECK_CALLED(Exec_SETPROGRESSPOS
);
4748 CHECK_CALLED(Exec_ShellDocView_37
);
4750 if(!container_locked
) {
4751 CHECK_CALLED(GetContainer
);
4752 CHECK_CALLED(LockContainer
);
4753 container_locked
= TRUE
;
4755 CHECK_CALLED(OnChanged_READYSTATE
);
4756 CHECK_CALLED(Invoke_OnReadyStateChange_Loading
);
4757 CLEAR_CALLED(IsSystemMoniker
); /* IE7 */
4758 SET_CALLED(Exec_ShellDocView_84
);
4760 CHECK_CALLED(BindToStorage
);
4761 CLEAR_CALLED(SetActiveObject
); /* FIXME */
4762 if(set_clientsite
) {
4763 CHECK_CALLED(Invoke_AMBIENT_SILENT
);
4764 CHECK_CALLED(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED
);
4765 CHECK_CALLED(Exec_ShellDocView_37
);
4766 todo_wine
CHECK_CALLED_BROKEN(IsErrorUrl
);
4769 todo_wine
CHECK_CALLED(GetTravelLog
);
4770 todo_wine
CHECK_CALLED(GetPendingUrl
);
4772 set_clientsite
= container_locked
= TRUE
;
4774 test_GetCurMoniker((IUnknown
*)persist
, mon
, NULL
);
4776 IBindCtx_Release(bind
);
4778 test_readyState((IUnknown
*)persist
);
4781 #define DWL_VERBDONE 0x0001
4782 #define DWL_CSS 0x0002
4783 #define DWL_TRYCSS 0x0004
4784 #define DWL_HTTP 0x0008
4785 #define DWL_EMPTY 0x0010
4786 #define DWL_JAVASCRIPT 0x0020
4787 #define DWL_ONREADY_LOADING 0x0040
4789 static void test_download(DWORD flags
)
4791 const BOOL is_js
= (flags
& DWL_JAVASCRIPT
) != 0;
4796 b
= is_js
? &called_Exec_SETDOWNLOADSTATE_0
: &called_Exec_HTTPEQUIV_DONE
;
4798 hwnd
= FindWindowA("Internet Explorer_Hidden", NULL
);
4799 ok(hwnd
!= NULL
, "Could not find hidden window\n");
4801 test_readyState(NULL
);
4803 if(flags
& (DWL_VERBDONE
|DWL_HTTP
))
4804 SET_EXPECT(Exec_SETPROGRESSMAX
);
4805 if((flags
& DWL_VERBDONE
) && !load_from_stream
&& !is_js
)
4806 SET_EXPECT(GetHostInfo
);
4807 SET_EXPECT(SetStatusText
);
4808 if(!(flags
& DWL_EMPTY
))
4809 SET_EXPECT(Exec_SETDOWNLOADSTATE_1
);
4811 SET_EXPECT(GetExternal
);
4812 SET_EXPECT(OnViewChange
);
4813 SET_EXPECT(GetDropTarget
);
4814 if(flags
& DWL_TRYCSS
)
4815 SET_EXPECT(Exec_ShellDocView_84
);
4816 if(flags
& DWL_CSS
) {
4817 SET_EXPECT(CreateInstance
);
4819 SET_EXPECT(LockRequest
);
4820 SET_EXPECT(Terminate
);
4821 SET_EXPECT(Protocol_Read
);
4822 SET_EXPECT(UnlockRequest
);
4824 if(flags
& DWL_ONREADY_LOADING
)
4825 SET_EXPECT(Invoke_OnReadyStateChange_Loading
);
4826 if(!(flags
& (DWL_EMPTY
|DWL_JAVASCRIPT
)))
4827 SET_EXPECT(Invoke_OnReadyStateChange_Interactive
);
4829 SET_EXPECT(Invoke_OnReadyStateChange_Complete
);
4830 SET_EXPECT(Exec_Explorer_69
);
4831 SET_EXPECT(EnableModeless_TRUE
); /* IE7 */
4832 SET_EXPECT(Frame_EnableModeless_TRUE
); /* IE7 */
4833 SET_EXPECT(EnableModeless_FALSE
); /* IE7 */
4834 SET_EXPECT(Frame_EnableModeless_FALSE
); /* IE7 */
4835 if((nav_url
&& !is_js
) || (flags
& (DWL_CSS
|DWL_HTTP
)))
4836 SET_EXPECT(Exec_ShellDocView_37
);
4837 if(flags
& DWL_HTTP
) {
4838 SET_EXPECT(OnChanged_1012
);
4839 SET_EXPECT(Exec_HTTPEQUIV
);
4840 SET_EXPECT(Exec_SETTITLE
);
4843 SET_EXPECT(OnChanged_1005
);
4844 SET_EXPECT(OnChanged_READYSTATE
);
4845 SET_EXPECT(Exec_SETPROGRESSPOS
);
4846 if(!(flags
& DWL_EMPTY
))
4847 SET_EXPECT(Exec_SETDOWNLOADSTATE_0
);
4848 SET_EXPECT(Exec_ShellDocView_103
);
4849 SET_EXPECT(Exec_ShellDocView_105
);
4850 SET_EXPECT(Exec_ShellDocView_140
);
4852 SET_EXPECT(Exec_MSHTML_PARSECOMPLETE
);
4853 SET_EXPECT(Exec_HTTPEQUIV_DONE
);
4855 SET_EXPECT(SetStatusText
);
4856 if(nav_url
|| support_wbapp
) {
4857 SET_EXPECT(UpdateUI
);
4858 SET_EXPECT(Exec_UPDATECOMMANDS
);
4859 SET_EXPECT(Exec_SETTITLE
);
4860 SET_EXPECT(UpdateBackForwardState
);
4864 if(!(flags
& DWL_EMPTY
))
4865 SET_EXPECT(FireNavigateComplete2
);
4866 SET_EXPECT(FireDocumentComplete
);
4868 SET_EXPECT(ActiveElementChanged
);
4870 SET_EXPECT(IsErrorUrl
);
4871 expect_status_text
= (LPWSTR
)0xdeadbeef; /* TODO */
4873 while(!*b
&& GetMessage(&msg
, NULL
, 0, 0)) {
4874 TranslateMessage(&msg
);
4875 DispatchMessage(&msg
);
4878 if(flags
& DWL_VERBDONE
)
4879 CHECK_CALLED(Exec_SETPROGRESSMAX
);
4880 if(flags
& DWL_HTTP
)
4881 SET_CALLED(Exec_SETPROGRESSMAX
);
4882 if((flags
& DWL_VERBDONE
) && !load_from_stream
&& !is_js
) {
4884 todo_wine
CHECK_CALLED(GetHostInfo
);
4886 CHECK_CALLED(GetHostInfo
);
4888 CHECK_CALLED(SetStatusText
);
4889 if(!(flags
& DWL_EMPTY
))
4890 CHECK_CALLED(Exec_SETDOWNLOADSTATE_1
);
4892 CHECK_CALLED(GetExternal
);
4893 CHECK_CALLED(OnViewChange
);
4894 CLEAR_CALLED(GetDropTarget
);
4895 if(flags
& DWL_TRYCSS
)
4896 SET_CALLED(Exec_ShellDocView_84
);
4897 if(flags
& DWL_CSS
) {
4898 CHECK_CALLED(CreateInstance
);
4899 CHECK_CALLED(Start
);
4900 CHECK_CALLED(LockRequest
);
4901 CHECK_CALLED(Terminate
);
4902 CHECK_CALLED(Protocol_Read
);
4903 CHECK_CALLED(UnlockRequest
);
4905 if(flags
& DWL_ONREADY_LOADING
)
4906 CHECK_CALLED(Invoke_OnReadyStateChange_Loading
);
4907 if(!(flags
& (DWL_EMPTY
|DWL_JAVASCRIPT
)))
4908 CHECK_CALLED(Invoke_OnReadyStateChange_Interactive
);
4910 CHECK_CALLED(Invoke_OnReadyStateChange_Complete
);
4911 SET_CALLED(Exec_Explorer_69
);
4912 SET_CALLED(EnableModeless_TRUE
); /* IE7 */
4913 SET_CALLED(Frame_EnableModeless_TRUE
); /* IE7 */
4914 SET_CALLED(EnableModeless_FALSE
); /* IE7 */
4915 SET_CALLED(Frame_EnableModeless_FALSE
); /* IE7 */
4916 if(nav_url
&& !is_js
)
4917 todo_wine
CHECK_CALLED(Exec_ShellDocView_37
);
4918 else if(flags
& (DWL_CSS
|DWL_HTTP
))
4919 CLEAR_CALLED(Exec_ShellDocView_37
); /* Called by IE9 */
4920 if(flags
& DWL_HTTP
) {
4921 todo_wine
CHECK_CALLED(OnChanged_1012
);
4922 todo_wine
CHECK_CALLED(Exec_HTTPEQUIV
);
4923 todo_wine
CHECK_CALLED(Exec_SETTITLE
);
4926 CHECK_CALLED(OnChanged_1005
);
4927 CHECK_CALLED(OnChanged_READYSTATE
);
4928 CHECK_CALLED(Exec_SETPROGRESSPOS
);
4930 CLEAR_CALLED(OnChanged_READYSTATE
); /* sometimes called */
4931 todo_wine
CHECK_CALLED(Exec_SETPROGRESSPOS
);
4933 if(!(flags
& DWL_EMPTY
))
4934 CHECK_CALLED(Exec_SETDOWNLOADSTATE_0
);
4935 CLEAR_CALLED(Exec_ShellDocView_103
);
4936 CLEAR_CALLED(Exec_ShellDocView_105
);
4937 CLEAR_CALLED(Exec_ShellDocView_140
);
4939 CHECK_CALLED(Exec_MSHTML_PARSECOMPLETE
);
4940 CHECK_CALLED(Exec_HTTPEQUIV_DONE
);
4942 SET_CALLED(SetStatusText
);
4943 if(nav_url
|| support_wbapp
) { /* avoiding race, FIXME: find better way */
4944 CLEAR_CALLED(UpdateUI
);
4945 CLEAR_CALLED(Exec_UPDATECOMMANDS
);
4946 CLEAR_CALLED(Exec_SETTITLE
);
4947 todo_wine
CHECK_CALLED_BROKEN(UpdateBackForwardState
);
4951 if(!(flags
& DWL_EMPTY
)) {
4953 CHECK_CALLED(FireNavigateComplete2
);
4955 todo_wine
CHECK_CALLED(FireNavigateComplete2
);
4957 CHECK_CALLED(FireDocumentComplete
);
4959 todo_wine
CHECK_CALLED(ActiveElementChanged
);
4961 todo_wine
CHECK_CALLED_BROKEN(IsErrorUrl
);
4963 load_state
= LD_COMPLETE
;
4965 test_readyState(NULL
);
4968 static void test_Persist(IHTMLDocument2
*doc
, IMoniker
*mon
)
4970 IPersistMoniker
*persist_mon
;
4971 IPersistFile
*persist_file
;
4975 hres
= IUnknown_QueryInterface(doc
, &IID_IPersistFile
, (void**)&persist_file
);
4976 ok(hres
== S_OK
, "QueryInterface(IID_IPersist) failed: %08x\n", hres
);
4977 if(SUCCEEDED(hres
)) {
4978 hres
= IPersist_GetClassID(persist_file
, NULL
);
4979 ok(hres
== E_INVALIDARG
, "GetClassID returned: %08x, expected E_INVALIDARG\n", hres
);
4981 hres
= IPersist_GetClassID(persist_file
, &guid
);
4982 ok(hres
== S_OK
, "GetClassID failed: %08x\n", hres
);
4983 ok(IsEqualGUID(&CLSID_HTMLDocument
, &guid
), "guid != CLSID_HTMLDocument\n");
4985 IPersist_Release(persist_file
);
4988 hres
= IUnknown_QueryInterface(doc
, &IID_IPersistMoniker
, (void**)&persist_mon
);
4989 ok(hres
== S_OK
, "QueryInterface(IID_IPersistMoniker) failed: %08x\n", hres
);
4990 if(SUCCEEDED(hres
)) {
4991 hres
= IPersistMoniker_GetClassID(persist_mon
, NULL
);
4992 ok(hres
== E_INVALIDARG
, "GetClassID returned: %08x, expected E_INVALIDARG\n", hres
);
4994 hres
= IPersistMoniker_GetClassID(persist_mon
, &guid
);
4995 ok(hres
== S_OK
, "GetClassID failed: %08x\n", hres
);
4996 ok(IsEqualGUID(&CLSID_HTMLDocument
, &guid
), "guid != CLSID_HTMLDocument\n");
4998 if(load_state
== LD_DOLOAD
)
4999 test_Load(persist_mon
, mon
);
5001 test_readyState((IUnknown
*)doc
);
5003 IPersistMoniker_Release(persist_mon
);
5007 static void test_put_href(IHTMLDocument2
*doc
, BOOL use_replace
, const char *href
, const char *new_nav_url
, BOOL is_js
, BOOL is_hash
)
5009 const char *prev_nav_url
= NULL
;
5010 IHTMLPrivateWindow
*priv_window
;
5011 IHTMLLocation
*location
;
5012 IHTMLWindow2
*window
;
5016 trace("put_href %s...\n", new_nav_url
);
5019 loading_hash
= is_hash
;
5022 hres
= IHTMLDocument2_get_location(doc
, &location
);
5023 ok(hres
== S_OK
, "get_location failed: %08x\n", hres
);
5024 ok(location
!= NULL
, "location == NULL\n");
5026 prev_nav_url
= nav_url
;
5027 nav_url
= new_nav_url
;
5029 nav_serv_url
= new_nav_url
;
5034 SET_EXPECT(TranslateUrl
);
5036 SET_EXPECT(FireBeforeNavigate2
);
5037 SET_EXPECT(Exec_ShellDocView_67
);
5039 SET_EXPECT(Invoke_AMBIENT_SILENT
);
5040 SET_EXPECT(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED
);
5041 SET_EXPECT(Exec_ShellDocView_63
);
5043 SET_EXPECT(FireNavigateComplete2
);
5044 SET_EXPECT(FireDocumentComplete
);
5047 SET_EXPECT(Navigate
);
5050 hres
= IHTMLLocation_replace(location
, str
);
5051 ok(hres
== S_OK
, "put_href failed: %08x\n", hres
);
5053 hres
= IHTMLLocation_put_href(location
, str
);
5054 if(is_js
&& hres
== E_ACCESSDENIED
)
5055 win_skip("put_href: got E_ACCESSDENIED\n");
5057 ok(hres
== S_OK
, "put_href failed: %08x\n", hres
);
5061 CHECK_CALLED(TranslateUrl
);
5063 CHECK_CALLED(FireBeforeNavigate2
);
5064 CHECK_CALLED(Exec_ShellDocView_67
);
5066 CHECK_CALLED(Invoke_AMBIENT_SILENT
);
5067 CHECK_CALLED(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED
);
5068 CHECK_CALLED(Exec_ShellDocView_63
);
5070 CHECK_CALLED(FireNavigateComplete2
);
5071 CHECK_CALLED(FireDocumentComplete
);
5074 CHECK_CALLED(Navigate
);
5077 CLEAR_CALLED(TranslateUrl
);
5079 CLEAR_CALLED(FireBeforeNavigate2
);
5080 SET_CALLED(Exec_ShellDocView_67
);
5082 CLEAR_CALLED(Invoke_AMBIENT_SILENT
);
5083 CLEAR_CALLED(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED
);
5084 CLEAR_CALLED(Exec_ShellDocView_63
);
5086 CLEAR_CALLED(FireNavigateComplete2
);
5087 CLEAR_CALLED(FireDocumentComplete
);
5090 CLEAR_CALLED(Navigate
);
5094 IHTMLLocation_Release(location
);
5096 if(is_js
&& hres
== E_ACCESSDENIED
) {
5097 nav_url
= prev_nav_url
;
5101 hres
= IHTMLDocument2_get_parentWindow(doc
, &window
);
5102 ok(hres
== S_OK
, "get_parentWindow failed: %08x\n", hres
);
5104 hres
= IHTMLWindow2_QueryInterface(window
, &IID_IHTMLPrivateWindow
, (void**)&priv_window
);
5105 IHTMLWindow2_Release(window
);
5106 ok(hres
== S_OK
, "QueryInterface(IID_IHTMLPrivateWindow) failed: %08x\n", hres
);
5108 if(!support_wbapp
) {
5111 readystate_set_loading
= TRUE
;
5112 SET_EXPECT(TranslateUrl
);
5113 SET_EXPECT(Exec_ShellDocView_67
);
5114 SET_EXPECT(Invoke_AMBIENT_SILENT
);
5115 SET_EXPECT(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED
);
5116 SET_EXPECT(Exec_ShellDocView_63
);
5118 str
= a2bstr(nav_url
);
5120 V_VT(&vempty
) = VT_EMPTY
;
5121 hres
= IHTMLPrivateWindow_SuperNavigate(priv_window
, str
, str2
, NULL
, NULL
, &vempty
, &vempty
, 0);
5123 SysFreeString(str2
);
5124 ok(hres
== S_OK
, "SuperNavigate failed: %08x\n", hres
);
5126 CHECK_CALLED(TranslateUrl
);
5127 CHECK_CALLED(Exec_ShellDocView_67
);
5128 CHECK_CALLED(Invoke_AMBIENT_SILENT
);
5129 CHECK_CALLED(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED
);
5130 CHECK_CALLED(Exec_ShellDocView_63
);
5134 test_GetCurMoniker(doc_unk
, doc_mon
, NULL
);
5139 hres
= IHTMLPrivateWindow_GetAddressBarUrl(priv_window
, &str2
);
5140 ok(hres
== S_OK
, "GetAddressBarUrl failed: %08x\n", hres
);
5141 ok(!strcmp_wa(str2
, prev_nav_url
), "unexpected address bar url: %s, expected %s\n", wine_dbgstr_w(str2
), prev_nav_url
);
5142 SysFreeString(str2
);
5145 ignore_external_qi
= TRUE
;
5146 test_download(DWL_VERBDONE
| (is_js
? DWL_JAVASCRIPT
: DWL_ONREADY_LOADING
));
5148 ignore_external_qi
= FALSE
;
5152 hres
= IHTMLPrivateWindow_GetAddressBarUrl(priv_window
, &str2
);
5153 ok(hres
== S_OK
, "GetAddressBarUrl failed: %08x\n", hres
);
5155 ok(!strcmp_wa(str2
, prev_nav_url
), "unexpected address bar url: %s\n", wine_dbgstr_w(str2
));
5157 ok(!strcmp_wa(str2
, nav_url
), "unexpected address bar url: %s\n", wine_dbgstr_w(str2
));
5158 SysFreeString(str2
);
5159 IHTMLPrivateWindow_Release(priv_window
);
5163 nav_url
= prev_nav_url
;
5166 static void test_open_window(IHTMLDocument2
*doc
, BOOL do_block
)
5168 IHTMLWindow2
*window
, *new_window
;
5172 allow_new_window
= !do_block
;
5174 hres
= IHTMLDocument2_get_parentWindow(doc
, &window
);
5175 ok(hres
== S_OK
, "get_parentWindow failed: %08x\n", hres
);
5177 url
= a2bstr(nav_serv_url
= nav_url
= "about:blank");
5178 name
= a2bstr("test");
5179 new_window
= (void*)0xdeadbeef;
5185 SET_EXPECT(get_LocationURL
);
5186 SET_EXPECT(TranslateUrl
);
5187 SET_EXPECT(EvaluateNewWindow
);
5189 hres
= IHTMLWindow2_open(window
, url
, name
, NULL
, VARIANT_FALSE
, &new_window
);
5192 SysFreeString(name
);
5195 todo_wine
CHECK_CALLED_BROKEN(get_LocationURL
);
5197 CHECK_CALLED(TranslateUrl
);
5199 if(!called_EvaluateNewWindow
) {
5200 win_skip("INewWindowManager not supported\n");
5201 if(SUCCEEDED(hres
) && new_window
)
5202 IHTMLWindow2_Release(new_window
);
5203 IHTMLWindow2_Release(window
);
5206 CHECK_CALLED(EvaluateNewWindow
);
5208 ok(hres
== S_OK
, "open failed: %08x\n", hres
);
5211 ok(!new_window
, "new_window != NULL\n");
5213 ok(new_window
!= NULL
, "new_window == NULL\n");
5215 trace("WINDOW %p\n", new_window
);
5216 hres
= IHTMLWindow2_close(new_window
);
5217 ok(hres
== S_OK
, "close failed: %08x\n", hres
);
5220 IHTMLWindow2_Release(window
);
5223 static void test_elem_from_point(IHTMLDocument2
*doc
)
5230 hres
= IHTMLDocument2_elementFromPoint(doc
, 3, 3, &elem
);
5231 ok(hres
== S_OK
, "elementFromPoint failed: %08x\n", hres
);
5232 ok(elem
!= NULL
, "elem == NULL\n");
5234 hres
= IHTMLElement_get_tagName(elem
, &tag
);
5235 IHTMLElement_Release(elem
);
5236 ok(hres
== S_OK
, "get_tagName failed: %08x\n", hres
);
5237 ok(!strcmp_wa(tag
, "DIV"), "tag = %s\n", wine_dbgstr_w(tag
));
5240 static void test_clear(IHTMLDocument2
*doc
)
5244 hres
= IHTMLDocument2_clear(doc
);
5245 ok(hres
== S_OK
, "clear failed: %08x\n", hres
);
5248 static const OLECMDF expect_cmds
[OLECMDID_GETPRINTTEMPLATE
+1] = {
5250 OLECMDF_SUPPORTED
, /* OLECMDID_OPEN */
5251 OLECMDF_SUPPORTED
, /* OLECMDID_NEW */
5252 OLECMDF_SUPPORTED
, /* OLECMDID_SAVE */
5253 OLECMDF_SUPPORTED
|OLECMDF_ENABLED
, /* OLECMDID_SAVEAS */
5254 OLECMDF_SUPPORTED
, /* OLECMDID_SAVECOPYAS */
5255 OLECMDF_SUPPORTED
|OLECMDF_ENABLED
, /* OLECMDID_PRINT */
5256 OLECMDF_SUPPORTED
|OLECMDF_ENABLED
, /* OLECMDID_PRINTPREVIEW */
5257 OLECMDF_SUPPORTED
|OLECMDF_ENABLED
, /* OLECMDID_PAGESETUP */
5258 OLECMDF_SUPPORTED
, /* OLECMDID_SPELL */
5259 OLECMDF_SUPPORTED
|OLECMDF_ENABLED
, /* OLECMDID_PROPERTIES */
5260 OLECMDF_SUPPORTED
, /* OLECMDID_CUT */
5261 OLECMDF_SUPPORTED
, /* OLECMDID_COPY */
5262 OLECMDF_SUPPORTED
, /* OLECMDID_PASTE */
5263 OLECMDF_SUPPORTED
, /* OLECMDID_PASTESPECIAL */
5264 OLECMDF_SUPPORTED
, /* OLECMDID_UNDO */
5265 OLECMDF_SUPPORTED
, /* OLECMDID_REDO */
5266 OLECMDF_SUPPORTED
|OLECMDF_ENABLED
, /* OLECMDID_SELECTALL */
5267 OLECMDF_SUPPORTED
, /* OLECMDID_CLEARSELECTION */
5268 OLECMDF_SUPPORTED
, /* OLECMDID_ZOOM */
5269 OLECMDF_SUPPORTED
, /* OLECMDID_GETZOOMRANGE */
5271 OLECMDF_SUPPORTED
|OLECMDF_ENABLED
, /* OLECMDID_REFRESH */
5272 OLECMDF_SUPPORTED
|OLECMDF_ENABLED
, /* OLECMDID_STOP */
5274 OLECMDF_SUPPORTED
, /* OLECMDID_STOPDOWNLOAD */
5276 OLECMDF_SUPPORTED
, /* OLECMDID_DELETE */
5278 OLECMDF_SUPPORTED
, /* OLECMDID_ENABLE_INTERACTION */
5279 OLECMDF_SUPPORTED
, /* OLECMDID_ONUNLOAD */
5281 OLECMDF_SUPPORTED
, /* OLECMDID_SHOWPAGESETUP */
5282 OLECMDF_SUPPORTED
, /* OLECMDID_SHOWPRINT */
5284 OLECMDF_SUPPORTED
, /* OLECMDID_CLOSE */
5286 OLECMDF_SUPPORTED
, /* OLECMDID_SETPRINTTEMPLATE */
5287 OLECMDF_SUPPORTED
/* OLECMDID_GETPRINTTEMPLATE */
5290 #define test_QueryStatus(u,cgid,cmdid,cmdf) _test_QueryStatus(__LINE__,u,cgid,cmdid,cmdf)
5291 static void _test_QueryStatus(unsigned line
, IUnknown
*unk
, REFIID cgid
, ULONG cmdid
, DWORD cmdf
)
5293 IOleCommandTarget
*cmdtrg
;
5294 OLECMD olecmd
= {cmdid
, 0};
5297 hres
= IUnknown_QueryInterface(unk
, &IID_IOleCommandTarget
, (void**)&cmdtrg
);
5298 ok_(__FILE__
,line
) (hres
== S_OK
, "QueryInterface(IID_IOleCommandTarget failed: %08x\n", hres
);
5302 hres
= IOleCommandTarget_QueryStatus(cmdtrg
, cgid
, 1, &olecmd
, NULL
);
5303 ok(hres
== S_OK
, "QueryStatus(%u) failed: %08x\n", cmdid
, hres
);
5305 IOleCommandTarget_Release(cmdtrg
);
5307 ok_(__FILE__
,line
) (olecmd
.cmdID
== cmdid
, "cmdID changed\n");
5308 ok_(__FILE__
,line
) (olecmd
.cmdf
== cmdf
, "(%u) cmdf=%08x, expected %08x\n", cmdid
, olecmd
.cmdf
, cmdf
);
5311 static void test_MSHTML_QueryStatus(IHTMLDocument2
*doc
, DWORD cmdf
)
5313 IUnknown
*unk
= doc
? (IUnknown
*)doc
: doc_unk
;
5315 test_QueryStatus(unk
, &CGID_MSHTML
, IDM_FONTNAME
, cmdf
);
5316 test_QueryStatus(unk
, &CGID_MSHTML
, IDM_FONTSIZE
, cmdf
);
5317 test_QueryStatus(unk
, &CGID_MSHTML
, IDM_SELECTALL
, cmdf
|OLECMDF_ENABLED
);
5318 test_QueryStatus(unk
, &CGID_MSHTML
, IDM_BOLD
, cmdf
);
5319 test_QueryStatus(unk
, &CGID_MSHTML
, IDM_FORECOLOR
, cmdf
);
5320 test_QueryStatus(unk
, &CGID_MSHTML
, IDM_JUSTIFYCENTER
, cmdf
);
5321 test_QueryStatus(unk
, &CGID_MSHTML
, IDM_JUSTIFYLEFT
, cmdf
);
5322 test_QueryStatus(unk
, &CGID_MSHTML
, IDM_JUSTIFYRIGHT
, cmdf
);
5323 test_QueryStatus(unk
, &CGID_MSHTML
, IDM_ITALIC
, cmdf
);
5324 test_QueryStatus(unk
, &CGID_MSHTML
, IDM_UNDERLINE
, cmdf
);
5325 test_QueryStatus(unk
, &CGID_MSHTML
, IDM_HORIZONTALLINE
, cmdf
);
5326 test_QueryStatus(unk
, &CGID_MSHTML
, IDM_ORDERLIST
, cmdf
);
5327 test_QueryStatus(unk
, &CGID_MSHTML
, IDM_UNORDERLIST
, cmdf
);
5328 test_QueryStatus(unk
, &CGID_MSHTML
, IDM_INDENT
, cmdf
);
5329 test_QueryStatus(unk
, &CGID_MSHTML
, IDM_OUTDENT
, cmdf
);
5330 test_QueryStatus(unk
, &CGID_MSHTML
, IDM_DELETE
, cmdf
);
5333 static void test_OleCommandTarget(IHTMLDocument2
*doc
)
5335 IOleCommandTarget
*cmdtrg
;
5336 OLECMD cmds
[OLECMDID_GETPRINTTEMPLATE
];
5340 hres
= IUnknown_QueryInterface(doc
, &IID_IOleCommandTarget
, (void**)&cmdtrg
);
5341 ok(hres
== S_OK
, "QueryInterface(IID_IOleCommandTarget failed: %08x\n", hres
);
5345 for(i
=0; i
<OLECMDID_GETPRINTTEMPLATE
; i
++) {
5346 cmds
[i
].cmdID
= i
+1;
5347 cmds
[i
].cmdf
= 0xf0f0;
5350 SET_EXPECT(QueryStatus_OPEN
);
5351 SET_EXPECT(QueryStatus_NEW
);
5352 hres
= IOleCommandTarget_QueryStatus(cmdtrg
, NULL
, sizeof(cmds
)/sizeof(cmds
[0]), cmds
, NULL
);
5353 ok(hres
== S_OK
, "QueryStatus failed: %08x\n", hres
);
5354 CHECK_CALLED(QueryStatus_OPEN
);
5355 CHECK_CALLED(QueryStatus_NEW
);
5357 for(i
=0; i
<OLECMDID_GETPRINTTEMPLATE
; i
++) {
5358 ok(cmds
[i
].cmdID
== i
+1, "cmds[%d].cmdID canged to %x\n", i
, cmds
[i
].cmdID
);
5359 if(i
+1 == OLECMDID_FIND
)
5361 ok(cmds
[i
].cmdf
== expect_cmds
[i
+1], "cmds[%d].cmdf=%x, expected %x\n",
5362 i
+1, cmds
[i
].cmdf
, expect_cmds
[i
+1]);
5365 ok(!cmds
[OLECMDID_FIND
-1].cmdf
|| cmds
[OLECMDID_FIND
-1].cmdf
== (OLECMDF_SUPPORTED
|OLECMDF_ENABLED
),
5366 "cmds[OLECMDID_FIND].cmdf=%x\n", cmds
[OLECMDID_FIND
-1].cmdf
);
5368 IOleCommandTarget_Release(cmdtrg
);
5371 static void test_OleCommandTarget_fail(IHTMLDocument2
*doc
)
5373 IOleCommandTarget
*cmdtrg
;
5378 {OLECMDID_OPEN
, 0xf0f0},
5379 {OLECMDID_GETPRINTTEMPLATE
+1, 0xf0f0}
5382 hres
= IUnknown_QueryInterface(doc
, &IID_IOleCommandTarget
, (void**)&cmdtrg
);
5383 ok(hres
== S_OK
, "QueryInterface(IIDIOleCommandTarget failed: %08x\n", hres
);
5387 hres
= IOleCommandTarget_QueryStatus(cmdtrg
, NULL
, 0, NULL
, NULL
);
5388 ok(hres
== S_OK
, "QueryStatus failed: %08x\n", hres
);
5390 SET_EXPECT(QueryStatus_OPEN
);
5391 hres
= IOleCommandTarget_QueryStatus(cmdtrg
, NULL
, 2, cmd
, NULL
);
5392 CHECK_CALLED(QueryStatus_OPEN
);
5394 ok(hres
== OLECMDERR_E_NOTSUPPORTED
,
5395 "QueryStatus failed: %08x, expected OLECMDERR_E_NOTSUPPORTED\n", hres
);
5396 ok(cmd
[1].cmdID
== OLECMDID_GETPRINTTEMPLATE
+1,
5397 "cmd[0].cmdID=%d, expected OLECMDID_GETPRINTTEMPLATE+1\n", cmd
[0].cmdID
);
5398 ok(cmd
[1].cmdf
== 0, "cmd[0].cmdf=%x, expected 0\n", cmd
[0].cmdf
);
5399 ok(cmd
[0].cmdf
== OLECMDF_SUPPORTED
,
5400 "cmd[1].cmdf=%x, expected OLECMDF_SUPPORTED\n", cmd
[1].cmdf
);
5402 hres
= IOleCommandTarget_QueryStatus(cmdtrg
, &IID_IHTMLDocument2
, 2, cmd
, NULL
);
5403 ok(hres
== OLECMDERR_E_UNKNOWNGROUP
,
5404 "QueryStatus failed: %08x, expected OLECMDERR_E_UNKNOWNGROUP\n", hres
);
5406 for(i
=0; i
<OLECMDID_GETPRINTTEMPLATE
; i
++) {
5407 if(!expect_cmds
[i
]) {
5408 hres
= IOleCommandTarget_Exec(cmdtrg
, NULL
, OLECMDID_UPDATECOMMANDS
,
5409 OLECMDEXECOPT_DODEFAULT
, NULL
, NULL
);
5410 ok(hres
== OLECMDERR_E_NOTSUPPORTED
,
5411 "Exec failed: %08x, expected OLECMDERR_E_NOTSUPPORTED\n", hres
);
5415 hres
= IOleCommandTarget_Exec(cmdtrg
, NULL
, OLECMDID_GETPRINTTEMPLATE
+1,
5416 OLECMDEXECOPT_DODEFAULT
, NULL
, NULL
);
5417 ok(hres
== OLECMDERR_E_NOTSUPPORTED
,
5418 "Exec failed: %08x, expected OLECMDERR_E_NOTSUPPORTED\n", hres
);
5420 IOleCommandTarget_Release(cmdtrg
);
5423 static void test_exec_onunload(IHTMLDocument2
*doc
)
5425 IOleCommandTarget
*cmdtrg
;
5429 hres
= IUnknown_QueryInterface(doc
, &IID_IOleCommandTarget
, (void**)&cmdtrg
);
5430 ok(hres
== S_OK
, "QueryInterface(IID_IOleCommandTarget) failed: %08x\n", hres
);
5434 memset(&var
, 0x0a, sizeof(var
));
5435 hres
= IOleCommandTarget_Exec(cmdtrg
, NULL
, OLECMDID_ONUNLOAD
,
5436 OLECMDEXECOPT_DODEFAULT
, NULL
, &var
);
5437 ok(hres
== S_OK
, "Exec(..., OLECMDID_ONUNLOAD, ...) failed: %08x\n", hres
);
5438 ok(V_VT(&var
) == VT_BOOL
, "V_VT(var)=%d, expected VT_BOOL\n", V_VT(&var
));
5439 ok(V_BOOL(&var
) == VARIANT_TRUE
, "V_BOOL(var)=%x, expected VARIANT_TRUE\n", V_BOOL(&var
));
5441 hres
= IOleCommandTarget_Exec(cmdtrg
, NULL
, OLECMDID_ONUNLOAD
,
5442 OLECMDEXECOPT_DODEFAULT
, NULL
, NULL
);
5443 ok(hres
== S_OK
, "Exec(..., OLECMDID_ONUNLOAD, ...) failed: %08x\n", hres
);
5445 IOleCommandTarget_Release(cmdtrg
);
5448 static void test_exec_editmode(IUnknown
*unk
, BOOL loaded
)
5450 IOleCommandTarget
*cmdtrg
;
5453 hres
= IUnknown_QueryInterface(unk
, &IID_IOleCommandTarget
, (void**)&cmdtrg
);
5454 ok(hres
== S_OK
, "QueryInterface(IID_IOleCommandTarget) failed: %08x\n", hres
);
5461 load_state
= LD_DOLOAD
;
5464 SET_EXPECT(GetClassID
);
5465 SET_EXPECT(SetStatusText
);
5466 SET_EXPECT(Exec_ShellDocView_37
);
5467 SET_EXPECT(GetHostInfo
);
5469 SET_EXPECT(GetDisplayName
);
5470 SET_EXPECT(Invoke_AMBIENT_SILENT
);
5471 SET_EXPECT(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED
);
5472 SET_EXPECT(OnChanged_READYSTATE
);
5473 SET_EXPECT(Invoke_OnReadyStateChange_Loading
);
5474 SET_EXPECT(IsSystemMoniker
);
5475 SET_EXPECT(Exec_ShellDocView_84
);
5477 SET_EXPECT(BindToStorage
);
5478 SET_EXPECT(InPlaceUIWindow_SetActiveObject
);
5481 SET_EXPECT(InPlaceFrame_SetBorderSpace
);
5483 expect_status_text
= NULL
;
5484 readystate_set_loading
= TRUE
;
5486 hres
= IOleCommandTarget_Exec(cmdtrg
, &CGID_MSHTML
, IDM_EDITMODE
,
5487 OLECMDEXECOPT_DODEFAULT
, NULL
, NULL
);
5488 ok(hres
== S_OK
, "Exec failed: %08x\n", hres
);
5491 CHECK_CALLED(GetClassID
);
5492 CHECK_CALLED(SetStatusText
);
5493 CHECK_CALLED(Exec_ShellDocView_37
);
5494 CHECK_CALLED(GetHostInfo
);
5496 CHECK_CALLED(GetDisplayName
);
5497 CHECK_CALLED(Invoke_AMBIENT_SILENT
);
5498 CHECK_CALLED(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED
);
5499 CHECK_CALLED(OnChanged_READYSTATE
);
5500 CHECK_CALLED(Invoke_OnReadyStateChange_Loading
);
5501 CLEAR_CALLED(IsSystemMoniker
); /* IE7 */
5502 SET_CALLED(Exec_ShellDocView_84
);
5504 CHECK_CALLED(BindToStorage
);
5505 CHECK_CALLED(InPlaceUIWindow_SetActiveObject
);
5506 CHECK_CALLED(HideUI
);
5507 CHECK_CALLED(ShowUI
);
5508 CHECK_CALLED(InPlaceFrame_SetBorderSpace
);
5510 test_timer(EXPECT_UPDATEUI
|EXPECT_SETTITLE
);
5512 IOleCommandTarget_Release(cmdtrg
);
5514 hres
= IOleCommandTarget_Exec(cmdtrg
, &CGID_MSHTML
, IDM_EDITMODE
,
5515 OLECMDEXECOPT_DODEFAULT
, NULL
, NULL
);
5516 ok(hres
== S_OK
, "Exec failed: %08x\n", hres
);
5519 static void test_exec_fontname(IUnknown
*unk
, LPCWSTR name
, LPCWSTR exname
)
5521 IOleCommandTarget
*cmdtrg
;
5522 VARIANT
*in
= NULL
, _in
, *out
= NULL
, _out
;
5525 hres
= IUnknown_QueryInterface(unk
, &IID_IOleCommandTarget
, (void**)&cmdtrg
);
5526 ok(hres
== S_OK
, "QueryInterface(IIDIOleM=CommandTarget failed: %08x\n", hres
);
5533 V_BSTR(in
) = SysAllocString(name
);
5539 V_I4(out
) = 0xdeadbeef;
5542 hres
= IOleCommandTarget_Exec(cmdtrg
, &CGID_MSHTML
, IDM_FONTNAME
, 0, in
, out
);
5543 ok(hres
== S_OK
, "Exec(IDM_FONTNAME) failed: %08x\n", hres
);
5549 ok(V_VT(out
) == VT_BSTR
, "V_VT(out) = %x\n", V_VT(out
));
5550 if(V_VT(out
) == VT_BSTR
) {
5552 ok(!lstrcmpW(V_BSTR(out
), name
? name
: exname
),
5553 "unexpected fontname %s\n", wine_dbgstr_w(name
));
5555 ok(V_BSTR(out
) == NULL
, "V_BSTR(out) != NULL\n");
5560 IOleCommandTarget_Release(cmdtrg
);
5563 static void test_exec_noargs(IUnknown
*unk
, DWORD cmdid
)
5565 IOleCommandTarget
*cmdtrg
;
5568 hres
= IUnknown_QueryInterface(unk
, &IID_IOleCommandTarget
, (void**)&cmdtrg
);
5569 ok(hres
== S_OK
, "QueryInterface(IID_IOleCommandTarget) failed: %08x\n", hres
);
5573 hres
= IOleCommandTarget_Exec(cmdtrg
, &CGID_MSHTML
, cmdid
,
5574 OLECMDEXECOPT_DODEFAULT
, NULL
, NULL
);
5575 ok(hres
== S_OK
, "Exec failed: %08x\n", hres
);
5577 IOleCommandTarget_Release(cmdtrg
);
5580 static void test_IsDirty(IHTMLDocument2
*doc
, HRESULT exhres
)
5582 IPersistStreamInit
*perinit
;
5583 IPersistMoniker
*permon
;
5584 IPersistFile
*perfile
;
5587 hres
= IUnknown_QueryInterface(doc
, &IID_IPersistStreamInit
, (void**)&perinit
);
5588 ok(hres
== S_OK
, "QueryInterface(IID_IPersistStreamInit failed: %08x\n", hres
);
5589 if(SUCCEEDED(hres
)) {
5590 hres
= IPersistStreamInit_IsDirty(perinit
);
5591 ok(hres
== exhres
, "IsDirty() = %08x, expected %08x\n", hres
, exhres
);
5592 IPersistStreamInit_Release(perinit
);
5595 hres
= IUnknown_QueryInterface(doc
, &IID_IPersistMoniker
, (void**)&permon
);
5596 ok(hres
== S_OK
, "QueryInterface(IID_IPersistMoniker failed: %08x\n", hres
);
5597 if(SUCCEEDED(hres
)) {
5598 hres
= IPersistMoniker_IsDirty(permon
);
5599 ok(hres
== exhres
, "IsDirty() = %08x, expected %08x\n", hres
, exhres
);
5600 IPersistMoniker_Release(permon
);
5603 hres
= IUnknown_QueryInterface(doc
, &IID_IPersistFile
, (void**)&perfile
);
5604 ok(hres
== S_OK
, "QueryInterface(IID_IPersistFile failed: %08x\n", hres
);
5605 if(SUCCEEDED(hres
)) {
5606 hres
= IPersistFile_IsDirty(perfile
);
5607 ok(hres
== exhres
, "IsDirty() = %08x, expected %08x\n", hres
, exhres
);
5608 IPersistFile_Release(perfile
);
5612 static HWND
create_container_window(void)
5614 static const WCHAR wszHTMLDocumentTest
[] =
5615 {'H','T','M','L','D','o','c','u','m','e','n','t','T','e','s','t',0};
5616 static WNDCLASSEXW wndclass
= {
5617 sizeof(WNDCLASSEXW
),
5620 0, 0, NULL
, NULL
, NULL
, NULL
, NULL
,
5621 wszHTMLDocumentTest
,
5625 RegisterClassExW(&wndclass
);
5626 return CreateWindowW(wszHTMLDocumentTest
, wszHTMLDocumentTest
,
5627 WS_OVERLAPPEDWINDOW
, CW_USEDEFAULT
, CW_USEDEFAULT
,
5628 515, 530, NULL
, NULL
, NULL
, NULL
);
5631 static void test_DoVerb(IOleObject
*oleobj
)
5633 RECT rect
= {0,0,500,500};
5636 if(!container_locked
) {
5637 SET_EXPECT(GetContainer
);
5638 SET_EXPECT(LockContainer
);
5640 SET_EXPECT(ActivateMe
);
5641 expect_LockContainer_fLock
= TRUE
;
5643 hres
= IOleObject_DoVerb(oleobj
, OLEIVERB_SHOW
, NULL
, &ClientSite
, -1, container_hwnd
, &rect
);
5644 ok(hres
== S_OK
, "DoVerb failed: %08x\n", hres
);
5646 if(!container_locked
) {
5647 CHECK_CALLED(GetContainer
);
5648 CHECK_CALLED(LockContainer
);
5649 container_locked
= TRUE
;
5651 CHECK_CALLED(ActivateMe
);
5654 #define CLIENTSITE_EXPECTPATH 0x00000001
5655 #define CLIENTSITE_SETNULL 0x00000002
5656 #define CLIENTSITE_DONTSET 0x00000004
5658 static void test_ClientSite(IOleObject
*oleobj
, DWORD flags
)
5660 IOleClientSite
*clientsite
;
5663 if(flags
& CLIENTSITE_SETNULL
) {
5664 hres
= IOleObject_GetClientSite(oleobj
, &clientsite
);
5665 ok(hres
== S_OK
, "SetClientSite failed: %08x\n", hres
);
5667 ok(clientsite
== &ClientSite
, "clientsite=%p, expected %p\n", clientsite
, &ClientSite
);
5669 ok(!clientsite
, "clientsite != NULL\n");
5671 SET_EXPECT(GetOverrideKeyPath
);
5672 hres
= IOleObject_SetClientSite(oleobj
, NULL
);
5673 ok(hres
== S_OK
, "SetClientSite failed: %08x\n", hres
);
5674 CLEAR_CALLED(GetOverrideKeyPath
); /* IE9 sometimes calls it */
5676 set_clientsite
= FALSE
;
5679 if(flags
& CLIENTSITE_DONTSET
)
5682 if(!expect_uihandler_iface
)
5683 expect_uihandler_iface
= &DocHostUIHandler
;
5685 hres
= IOleObject_GetClientSite(oleobj
, &clientsite
);
5686 ok(hres
== S_OK
, "GetClientSite failed: %08x\n", hres
);
5687 ok(clientsite
== (set_clientsite
? &ClientSite
: NULL
), "GetClientSite() = %p, expected %p\n",
5688 clientsite
, set_clientsite
? &ClientSite
: NULL
);
5690 if(!set_clientsite
) {
5691 if(expect_uihandler_iface
)
5692 SET_EXPECT(GetHostInfo
);
5693 if(flags
& CLIENTSITE_EXPECTPATH
) {
5694 SET_EXPECT(GetOptionKeyPath
);
5695 SET_EXPECT(GetOverrideKeyPath
);
5697 SET_EXPECT(GetWindow
);
5698 if(flags
& CLIENTSITE_EXPECTPATH
)
5699 SET_EXPECT(Exec_DOCCANNAVIGATE
);
5700 SET_EXPECT(QueryStatus_SETPROGRESSTEXT
);
5701 SET_EXPECT(Exec_SETPROGRESSMAX
);
5702 SET_EXPECT(Exec_SETPROGRESSPOS
);
5703 SET_EXPECT(Invoke_AMBIENT_USERMODE
);
5704 SET_EXPECT(Invoke_AMBIENT_DLCONTROL
);
5705 SET_EXPECT(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED
);
5706 SET_EXPECT(Invoke_AMBIENT_SILENT
);
5707 SET_EXPECT(Invoke_AMBIENT_USERAGENT
);
5708 SET_EXPECT(Invoke_AMBIENT_PALETTE
);
5709 SET_EXPECT(GetOverrideKeyPath
);
5710 SET_EXPECT(GetTravelLog
);
5712 hres
= IOleObject_SetClientSite(oleobj
, &ClientSite
);
5713 ok(hres
== S_OK
, "SetClientSite failed: %08x\n", hres
);
5715 if(expect_uihandler_iface
)
5716 CHECK_CALLED(GetHostInfo
);
5717 if(flags
& CLIENTSITE_EXPECTPATH
) {
5718 CLEAR_CALLED(GetOptionKeyPath
); /* not called on some IE9 */
5719 CHECK_CALLED(GetOverrideKeyPath
);
5721 CHECK_CALLED(GetWindow
);
5722 if(flags
& CLIENTSITE_EXPECTPATH
)
5723 CHECK_CALLED(Exec_DOCCANNAVIGATE
);
5724 CHECK_CALLED(QueryStatus_SETPROGRESSTEXT
);
5725 CHECK_CALLED(Exec_SETPROGRESSMAX
);
5726 CHECK_CALLED(Exec_SETPROGRESSPOS
);
5727 CHECK_CALLED(Invoke_AMBIENT_USERMODE
);
5728 CHECK_CALLED(Invoke_AMBIENT_DLCONTROL
);
5729 CHECK_CALLED(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED
);
5730 CHECK_CALLED(Invoke_AMBIENT_SILENT
);
5731 CHECK_CALLED(Invoke_AMBIENT_USERAGENT
);
5732 CLEAR_CALLED(Invoke_AMBIENT_PALETTE
); /* not called on IE9 */
5733 CLEAR_CALLED(GetOverrideKeyPath
); /* Called by IE9 */
5734 todo_wine
CHECK_CALLED(GetTravelLog
);
5736 set_clientsite
= TRUE
;
5739 hres
= IOleObject_SetClientSite(oleobj
, &ClientSite
);
5740 ok(hres
== S_OK
, "SetClientSite failed: %08x\n", hres
);
5742 hres
= IOleObject_GetClientSite(oleobj
, &clientsite
);
5743 ok(hres
== S_OK
, "GetClientSite failed: %08x\n", hres
);
5744 ok(clientsite
== &ClientSite
, "GetClientSite() = %p, expected %p\n", clientsite
, &ClientSite
);
5747 static void test_OnAmbientPropertyChange(IHTMLDocument2
*doc
)
5749 IOleControl
*control
= NULL
;
5752 hres
= IUnknown_QueryInterface(doc
, &IID_IOleControl
, (void**)&control
);
5753 ok(hres
== S_OK
, "QueryInterface(IID_IOleControl failed: %08x\n", hres
);
5757 SET_EXPECT(Invoke_AMBIENT_USERMODE
);
5758 hres
= IOleControl_OnAmbientPropertyChange(control
, DISPID_AMBIENT_USERMODE
);
5759 ok(hres
== S_OK
, "OnAmbientChange failed: %08x\n", hres
);
5760 CHECK_CALLED(Invoke_AMBIENT_USERMODE
);
5762 SET_EXPECT(Invoke_AMBIENT_DLCONTROL
);
5763 hres
= IOleControl_OnAmbientPropertyChange(control
, DISPID_AMBIENT_DLCONTROL
);
5764 ok(hres
== S_OK
, "OnAmbientChange failed: %08x\n", hres
);
5765 CHECK_CALLED(Invoke_AMBIENT_DLCONTROL
);
5767 SET_EXPECT(Invoke_AMBIENT_DLCONTROL
);
5768 SET_EXPECT(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED
);
5769 hres
= IOleControl_OnAmbientPropertyChange(control
, DISPID_AMBIENT_OFFLINEIFNOTCONNECTED
);
5770 ok(hres
== S_OK
, "OnAmbientChange failed: %08x\n", hres
);
5771 CHECK_CALLED(Invoke_AMBIENT_DLCONTROL
);
5772 CHECK_CALLED(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED
);
5774 SET_EXPECT(Invoke_AMBIENT_DLCONTROL
);
5775 SET_EXPECT(Invoke_AMBIENT_SILENT
);
5776 hres
= IOleControl_OnAmbientPropertyChange(control
, DISPID_AMBIENT_SILENT
);
5777 ok(hres
== S_OK
, "OnAmbientChange failed: %08x\n", hres
);
5778 CHECK_CALLED(Invoke_AMBIENT_DLCONTROL
);
5779 CHECK_CALLED(Invoke_AMBIENT_SILENT
);
5781 SET_EXPECT(Invoke_AMBIENT_USERAGENT
);
5782 hres
= IOleControl_OnAmbientPropertyChange(control
, DISPID_AMBIENT_USERAGENT
);
5783 ok(hres
== S_OK
, "OnAmbientChange failed: %08x\n", hres
);
5784 CHECK_CALLED(Invoke_AMBIENT_USERAGENT
);
5786 SET_EXPECT(Invoke_AMBIENT_PALETTE
);
5787 hres
= IOleControl_OnAmbientPropertyChange(control
, DISPID_AMBIENT_PALETTE
);
5788 ok(hres
== S_OK
, "OnAmbientChange failed: %08x\n", hres
);
5789 CLEAR_CALLED(Invoke_AMBIENT_PALETTE
); /* not called on IE9 */
5791 IOleControl_Release(control
);
5796 static void test_OnAmbientPropertyChange2(IHTMLDocument2
*doc
)
5798 IOleControl
*control
= NULL
;
5801 hres
= IUnknown_QueryInterface(doc
, &IID_IOleControl
, (void**)&control
);
5802 ok(hres
== S_OK
, "QueryInterface(IID_IOleControl failed: %08x\n", hres
);
5806 hres
= IOleControl_OnAmbientPropertyChange(control
, DISPID_AMBIENT_PALETTE
);
5807 ok(hres
== S_OK
, "OnAmbientPropertyChange failed: %08x\n", hres
);
5809 IOleControl_Release(control
);
5812 static void test_Close(IHTMLDocument2
*doc
, BOOL set_client
)
5814 IOleObject
*oleobj
= NULL
;
5817 hres
= IUnknown_QueryInterface(doc
, &IID_IOleObject
, (void**)&oleobj
);
5818 ok(hres
== S_OK
, "QueryInterface(IID_IOleObject) failed: %08x\n", hres
);
5822 SET_EXPECT(GetContainer
);
5823 SET_EXPECT(LockContainer
);
5824 expect_LockContainer_fLock
= FALSE
;
5825 hres
= IOleObject_Close(oleobj
, OLECLOSE_NOSAVE
);
5826 ok(hres
== S_OK
, "Close failed: %08x\n", hres
);
5827 CHECK_CALLED(GetContainer
);
5828 CHECK_CALLED(LockContainer
);
5829 container_locked
= FALSE
;
5832 test_ClientSite(oleobj
, CLIENTSITE_SETNULL
|CLIENTSITE_DONTSET
);
5834 IOleObject_Release(oleobj
);
5837 static void test_Advise(IHTMLDocument2
*doc
)
5839 IOleObject
*oleobj
= NULL
;
5840 IEnumSTATDATA
*enum_advise
= (void*)0xdeadbeef;
5844 hres
= IUnknown_QueryInterface(doc
, &IID_IOleObject
, (void**)&oleobj
);
5845 ok(hres
== S_OK
, "QueryInterface(IID_IOleObject) failed: %08x\n", hres
);
5849 hres
= IOleObject_Unadvise(oleobj
, 0);
5850 ok(hres
== OLE_E_NOCONNECTION
, "Unadvise returned: %08x\n", hres
);
5852 hres
= IOleObject_EnumAdvise(oleobj
, &enum_advise
);
5853 ok(hres
== S_OK
, "EnumAdvise returned: %08x\n", hres
);
5854 ok(enum_advise
== NULL
, "enum_advise != NULL\n");
5857 hres
= IOleObject_Advise(oleobj
, NULL
, &conn
);
5858 /* Old IE returns S_OK and sets conn to 1 */
5859 ok(hres
== E_INVALIDARG
|| hres
== S_OK
, "Advise returned: %08x\n", hres
);
5860 ok(conn
== 0 || conn
== 1, "conn = %d\n", conn
);
5862 hres
= IOleObject_Advise(oleobj
, (IAdviseSink
*)&AdviseSink
, NULL
);
5863 ok(hres
== E_INVALIDARG
, "Advise returned: %08x\n", hres
);
5865 hres
= IOleObject_Advise(oleobj
, (IAdviseSink
*)&AdviseSink
, &conn
);
5866 ok(hres
== S_OK
, "Advise returned: %08x\n", hres
);
5867 ok(conn
== 1, "conn = %d\n", conn
);
5869 hres
= IOleObject_Advise(oleobj
, (IAdviseSink
*)&AdviseSink
, &conn
);
5870 ok(hres
== S_OK
, "Advise returned: %08x\n", hres
);
5871 ok(conn
== 2, "conn = %d\n", conn
);
5873 hres
= IOleObject_Unadvise(oleobj
, 1);
5874 ok(hres
== S_OK
, "Unadvise returned: %08x\n", hres
);
5876 hres
= IOleObject_Unadvise(oleobj
, 1);
5877 ok(hres
== OLE_E_NOCONNECTION
, "Unadvise returned: %08x\n", hres
);
5879 hres
= IOleObject_Unadvise(oleobj
, 2);
5880 ok(hres
== S_OK
, "Unadvise returned: %08x\n", hres
);
5882 IOleObject_Release(oleobj
);
5885 static void test_OnFrameWindowActivate(IUnknown
*unk
)
5887 IOleInPlaceActiveObject
*inplaceact
;
5890 hres
= IUnknown_QueryInterface(unk
, &IID_IOleInPlaceActiveObject
, (void**)&inplaceact
);
5891 ok(hres
== S_OK
, "QueryInterface(IID_IOleInPlaceActiveObject) failed: %08x\n", hres
);
5895 if(set_clientsite
) {
5896 expect_OnFrameWindowActivate_fActivate
= TRUE
;
5897 SET_EXPECT(OnFrameWindowActivate
);
5898 hres
= IOleInPlaceActiveObject_OnFrameWindowActivate(inplaceact
, TRUE
);
5899 ok(hres
== S_OK
, "OnFrameWindowActivate failed: %08x\n", hres
);
5900 CHECK_CALLED(OnFrameWindowActivate
);
5902 SET_EXPECT(OnFrameWindowActivate
);
5903 hres
= IOleInPlaceActiveObject_OnFrameWindowActivate(inplaceact
, TRUE
);
5904 ok(hres
== S_OK
, "OnFrameWindowActivate failed: %08x\n", hres
);
5905 CHECK_CALLED(OnFrameWindowActivate
);
5907 expect_OnFrameWindowActivate_fActivate
= FALSE
;
5908 SET_EXPECT(OnFrameWindowActivate
);
5909 hres
= IOleInPlaceActiveObject_OnFrameWindowActivate(inplaceact
, FALSE
);
5910 ok(hres
== S_OK
, "OnFrameWindowActivate failed: %08x\n", hres
);
5911 CHECK_CALLED(OnFrameWindowActivate
);
5913 expect_OnFrameWindowActivate_fActivate
= TRUE
;
5914 SET_EXPECT(OnFrameWindowActivate
);
5915 hres
= IOleInPlaceActiveObject_OnFrameWindowActivate(inplaceact
, TRUE
);
5916 ok(hres
== S_OK
, "OnFrameWindowActivate failed: %08x\n", hres
);
5917 CHECK_CALLED(OnFrameWindowActivate
);
5919 hres
= IOleInPlaceActiveObject_OnFrameWindowActivate(inplaceact
, FALSE
);
5920 ok(hres
== S_OK
, "OnFrameWindowActivate failed: %08x\n", hres
);
5922 hres
= IOleInPlaceActiveObject_OnFrameWindowActivate(inplaceact
, TRUE
);
5923 ok(hres
== S_OK
, "OnFrameWindowActivate failed: %08x\n", hres
);
5926 IOleInPlaceActiveObject_Release(inplaceact
);
5929 static void test_InPlaceDeactivate(IHTMLDocument2
*doc
, BOOL expect_call
)
5931 IOleInPlaceObjectWindowless
*windowlessobj
= NULL
;
5934 hres
= IUnknown_QueryInterface(doc
, &IID_IOleInPlaceObjectWindowless
,
5935 (void**)&windowlessobj
);
5936 ok(hres
== S_OK
, "QueryInterface(IID_IOleInPlaceObjectWindowless) failed: %08x\n", hres
);
5941 SET_EXPECT(SetStatusText
);
5942 SET_EXPECT(OnFocus_FALSE
);
5944 SET_EXPECT(OnInPlaceDeactivateEx
);
5946 SET_EXPECT(OnInPlaceDeactivate
);
5948 hres
= IOleInPlaceObjectWindowless_InPlaceDeactivate(windowlessobj
);
5949 ok(hres
== S_OK
, "InPlaceDeactivate failed: %08x\n", hres
);
5951 CLEAR_CALLED(SetStatusText
); /* Called by IE9 */
5952 CHECK_CALLED(OnFocus_FALSE
);
5954 CHECK_CALLED(OnInPlaceDeactivateEx
);
5956 CHECK_CALLED(OnInPlaceDeactivate
);
5959 IOleInPlaceObjectWindowless_Release(windowlessobj
);
5962 static void test_Activate(IHTMLDocument2
*doc
, DWORD flags
)
5964 IOleObject
*oleobj
= NULL
;
5965 IOleDocumentView
*docview
;
5972 IOleDocumentView_Release(view
);
5975 hres
= IUnknown_QueryInterface(doc
, &IID_IOleObject
, (void**)&oleobj
);
5976 ok(hres
== S_OK
, "QueryInterface(IID_IOleObject) failed: %08x\n", hres
);
5978 hres
= IOleObject_GetUserClassID(oleobj
, NULL
);
5979 ok(hres
== E_INVALIDARG
, "GetUserClassID returned: %08x, expected E_INVALIDARG\n", hres
);
5981 hres
= IOleObject_GetUserClassID(oleobj
, &guid
);
5982 ok(hres
== S_OK
, "GetUserClassID failed: %08x\n", hres
);
5983 ok(IsEqualGUID(&guid
, &CLSID_HTMLDocument
), "guid != CLSID_HTMLDocument\n");
5985 test_OnFrameWindowActivate((IUnknown
*)doc
);
5987 test_ClientSite(oleobj
, flags
);
5988 test_InPlaceDeactivate(doc
, FALSE
);
5989 test_DoVerb(oleobj
);
5991 if(call_UIActivate
== CallUIActivate_AfterShow
) {
5992 hres
= IOleObject_QueryInterface(oleobj
, &IID_IOleDocumentView
, (void **)&docview
);
5993 ok(hres
== S_OK
, "IOleObject_QueryInterface failed with error 0x%08x\n", hres
);
5995 SET_EXPECT(OnFocus_TRUE
);
5996 SET_EXPECT(SetActiveObject
);
5998 SET_EXPECT(InPlaceUIWindow_SetActiveObject
);
5999 SET_EXPECT(InPlaceFrame_SetBorderSpace
);
6000 expect_status_text
= NULL
;
6002 hres
= IOleDocumentView_UIActivate(docview
, TRUE
);
6003 ok(hres
== S_OK
, "IOleDocumentView_UIActivate failed with error 0x%08x\n", hres
);
6005 CHECK_CALLED(OnFocus_TRUE
);
6006 CHECK_CALLED(SetActiveObject
);
6007 CHECK_CALLED(ShowUI
);
6008 CHECK_CALLED(InPlaceUIWindow_SetActiveObject
);
6009 CHECK_CALLED(InPlaceFrame_SetBorderSpace
);
6011 IOleDocumentView_Release(docview
);
6014 IOleObject_Release(oleobj
);
6016 test_OnFrameWindowActivate((IUnknown
*)doc
);
6019 static void test_Window(IHTMLDocument2
*doc
, BOOL expect_success
)
6021 IOleInPlaceActiveObject
*activeobject
= NULL
;
6025 hres
= IOleDocumentView_QueryInterface(view
, &IID_IOleInPlaceActiveObject
, (void**)&activeobject
);
6026 ok(hres
== S_OK
, "Could not get IOleInPlaceActiveObject interface: %08x\n", hres
);
6030 hres
= IOleInPlaceActiveObject_GetWindow(activeobject
, &tmp_hwnd
);
6032 if(expect_success
) {
6033 ok(hres
== S_OK
, "GetWindow failed: %08x\n", hres
);
6034 ok(tmp_hwnd
== hwnd
, "tmp_hwnd=%p, expected %p\n", tmp_hwnd
, hwnd
);
6036 ok(hres
== E_FAIL
, "GetWindow returned %08x, expected E_FAIL\n", hres
);
6037 ok(IsWindow(hwnd
), "hwnd is destroyed\n");
6040 IOleInPlaceActiveObject_Release(activeobject
);
6043 static void test_CloseView(void)
6045 IOleInPlaceSite
*inplacesite
= (IOleInPlaceSite
*)0xff00ff00;
6051 hres
= IOleDocumentView_Show(view
, FALSE
);
6052 ok(hres
== S_OK
, "Show failed: %08x\n", hres
);
6054 hres
= IOleDocumentView_CloseView(view
, 0);
6055 ok(hres
== S_OK
, "CloseView failed: %08x\n", hres
);
6057 hres
= IOleDocumentView_SetInPlaceSite(view
, NULL
);
6058 ok(hres
== S_OK
, "SetInPlaceSite failed: %08x\n", hres
);
6060 hres
= IOleDocumentView_GetInPlaceSite(view
, &inplacesite
);
6061 ok(hres
== S_OK
, "SetInPlaceSite failed: %08x\n", hres
);
6062 ok(inplacesite
== NULL
, "inplacesite=%p, expected NULL\n", inplacesite
);
6065 static void test_UIDeactivate(void)
6069 if(call_UIActivate
== CallUIActivate_AfterShow
) {
6070 SET_EXPECT(InPlaceUIWindow_SetActiveObject
);
6072 if(call_UIActivate
!= CallUIActivate_None
) {
6073 SET_EXPECT(SetActiveObject_null
);
6075 SET_EXPECT(OnUIDeactivate
);
6078 hres
= IOleDocumentView_UIActivate(view
, FALSE
);
6079 ok(hres
== S_OK
, "UIActivate failed: %08x\n", hres
);
6081 if(call_UIActivate
!= CallUIActivate_None
) {
6082 CHECK_CALLED(SetActiveObject_null
);
6083 CHECK_CALLED(HideUI
);
6084 CHECK_CALLED(OnUIDeactivate
);
6086 if(call_UIActivate
== CallUIActivate_AfterShow
) {
6087 CHECK_CALLED(InPlaceUIWindow_SetActiveObject
);
6091 static void test_Hide(void)
6098 hres
= IOleDocumentView_Show(view
, FALSE
);
6099 ok(hres
== S_OK
, "Show failed: %08x\n", hres
);
6102 static IHTMLDocument2
*create_document(void)
6104 IHTMLDocument2
*doc
;
6107 hres
= CoCreateInstance(&CLSID_HTMLDocument
, NULL
, CLSCTX_INPROC_SERVER
|CLSCTX_INPROC_HANDLER
,
6108 &IID_IHTMLDocument2
, (void**)&doc
);
6109 ok(hres
== S_OK
, "CoCreateInstance failed: %08x\n", hres
);
6116 static void release_document(IHTMLDocument2
*doc
)
6122 /* Some broken IEs don't like if the last released reference is IHTMLDocument2 iface.
6123 * To workaround it, we release it via IUnknown iface */
6124 hres
= IHTMLDocument2_QueryInterface(doc
, &IID_IUnknown
, (void**)&unk
);
6125 ok(hres
== S_OK
, "Could not get IUnknown iface: %08x\n", hres
);
6127 IHTMLDocument2_Release(doc
);
6128 ref
= IUnknown_Release(unk
);
6129 ok(!ref
, "ref = %d\n", ref
);
6132 static void test_Navigate(IHTMLDocument2
*doc
)
6134 IHlinkTarget
*hlink
;
6137 hres
= IUnknown_QueryInterface(doc
, &IID_IHlinkTarget
, (void**)&hlink
);
6138 ok(hres
== S_OK
, "QueryInterface(IID_IHlinkTarget) failed: %08x\n", hres
);
6140 SET_EXPECT(ActivateMe
);
6141 hres
= IHlinkTarget_Navigate(hlink
, 0, NULL
);
6142 ok(hres
== S_OK
, "Navigate failed: %08x\n", hres
);
6143 CHECK_CALLED(ActivateMe
);
6145 IHlinkTarget_Release(hlink
);
6148 static void test_external(IHTMLDocument2
*doc
, BOOL initialized
)
6150 IDispatch
*external
;
6151 IHTMLWindow2
*htmlwin
;
6154 hres
= IHTMLDocument2_get_parentWindow(doc
, &htmlwin
);
6155 ok(hres
== S_OK
, "get_parentWindow failed: %08x\n", hres
);
6158 SET_EXPECT(GetExternal
);
6159 external
= (void*)0xdeadbeef;
6160 hres
= IHTMLWindow2_get_external(htmlwin
, &external
);
6162 ok(hres
== S_FALSE
|| hres
== S_OK
, "get_external failed: %08x\n", hres
);
6163 CHECK_CALLED(GetExternal
);
6164 ok(external
!= NULL
, "external == NULL\n");
6166 ok(hres
== S_OK
, "get_external failed: %08x\n", hres
);
6167 ok(external
== NULL
, "external != NULL\n");
6170 IHTMLWindow2_Release(htmlwin
);
6173 static void test_StreamLoad(IHTMLDocument2
*doc
)
6175 IPersistStreamInit
*init
;
6178 hres
= IUnknown_QueryInterface(doc
, &IID_IPersistStreamInit
, (void**)&init
);
6179 ok(hres
== S_OK
, "QueryInterface(IID_IPersistStreamInit) failed: %08x\n", hres
);
6183 SET_EXPECT(Invoke_AMBIENT_SILENT
);
6184 SET_EXPECT(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED
);
6185 SET_EXPECT(Exec_ShellDocView_37
);
6186 SET_EXPECT(OnChanged_READYSTATE
);
6187 SET_EXPECT(Invoke_OnReadyStateChange_Loading
);
6189 SET_EXPECT(GetPendingUrl
);
6190 readystate_set_loading
= TRUE
;
6192 hres
= IPersistStreamInit_Load(init
, &Stream
);
6193 ok(hres
== S_OK
, "Load failed: %08x\n", hres
);
6195 CHECK_CALLED(Invoke_AMBIENT_SILENT
);
6196 CHECK_CALLED(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED
);
6197 CHECK_CALLED(Exec_ShellDocView_37
);
6198 CHECK_CALLED(OnChanged_READYSTATE
);
6199 CHECK_CALLED(Invoke_OnReadyStateChange_Loading
);
6201 todo_wine
CHECK_CALLED(GetPendingUrl
);
6203 test_timer(EXPECT_SETTITLE
);
6204 test_GetCurMoniker((IUnknown
*)doc
, NULL
, "about:blank");
6206 IPersistStreamInit_Release(init
);
6209 static void test_StreamInitNew(IHTMLDocument2
*doc
)
6211 IPersistStreamInit
*init
;
6214 hres
= IUnknown_QueryInterface(doc
, &IID_IPersistStreamInit
, (void**)&init
);
6215 ok(hres
== S_OK
, "QueryInterface(IID_IPersistStreamInit) failed: %08x\n", hres
);
6219 SET_EXPECT(Invoke_AMBIENT_SILENT
);
6220 SET_EXPECT(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED
);
6221 SET_EXPECT(Exec_ShellDocView_37
);
6222 SET_EXPECT(OnChanged_READYSTATE
);
6223 SET_EXPECT(Invoke_OnReadyStateChange_Loading
);
6224 SET_EXPECT(GetPendingUrl
);
6225 readystate_set_loading
= TRUE
;
6227 hres
= IPersistStreamInit_InitNew(init
);
6228 ok(hres
== S_OK
, "Load failed: %08x\n", hres
);
6230 CHECK_CALLED(Invoke_AMBIENT_SILENT
);
6231 CHECK_CALLED(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED
);
6232 CHECK_CALLED(Exec_ShellDocView_37
);
6233 CHECK_CALLED(OnChanged_READYSTATE
);
6234 CHECK_CALLED(Invoke_OnReadyStateChange_Loading
);
6235 todo_wine
CHECK_CALLED(GetPendingUrl
);
6237 test_timer(EXPECT_SETTITLE
);
6238 test_GetCurMoniker((IUnknown
*)doc
, NULL
, "about:blank");
6240 IPersistStreamInit_Release(init
);
6243 static void test_QueryInterface(IHTMLDocument2
*doc
)
6248 static const IID IID_UndocumentedScriptIface
=
6249 {0x719c3050,0xf9d3,0x11cf,{0xa4,0x93,0x00,0x40,0x05,0x23,0xa8,0xa0}};
6251 qi
= (void*)0xdeadbeef;
6252 hres
= IUnknown_QueryInterface(doc
, &IID_IRunnableObject
, (void**)&qi
);
6253 ok(hres
== E_NOINTERFACE
, "QueryInterface returned %08x, expected E_NOINTERFACE\n", hres
);
6254 ok(qi
== NULL
, "qirunnable=%p, expected NULL\n", qi
);
6256 qi
= (void*)0xdeadbeef;
6257 hres
= IUnknown_QueryInterface(doc
, &IID_IHTMLDOMNode
, (void**)&qi
);
6258 ok(hres
== E_NOINTERFACE
, "QueryInterface returned %08x, expected E_NOINTERFACE\n", hres
);
6259 ok(qi
== NULL
, "qi=%p, expected NULL\n", qi
);
6261 qi
= (void*)0xdeadbeef;
6262 hres
= IUnknown_QueryInterface(doc
, &IID_IHTMLDOMNode2
, (void**)&qi
);
6263 ok(hres
== E_NOINTERFACE
, "QueryInterface returned %08x, expected E_NOINTERFACE\n", hres
);
6264 ok(qi
== NULL
, "qi=%p, expected NULL\n", qi
);
6266 qi
= (void*)0xdeadbeef;
6267 hres
= IUnknown_QueryInterface(doc
, &IID_IPersistPropertyBag
, (void**)&qi
);
6268 ok(hres
== E_NOINTERFACE
, "QueryInterface returned %08x, expected E_NOINTERFACE\n", hres
);
6269 ok(qi
== NULL
, "qi=%p, expected NULL\n", qi
);
6271 qi
= (void*)0xdeadbeef;
6272 hres
= IUnknown_QueryInterface(doc
, &IID_UndocumentedScriptIface
, (void**)&qi
);
6273 ok(hres
== E_NOINTERFACE
, "QueryInterface returned %08x, expected E_NOINTERFACE\n", hres
);
6274 ok(qi
== NULL
, "qi=%p, expected NULL\n", qi
);
6276 qi
= (void*)0xdeadbeef;
6277 hres
= IUnknown_QueryInterface(doc
, &IID_IMarshal
, (void**)&qi
);
6278 ok(hres
== E_NOINTERFACE
, "QueryInterface returned %08x, expected E_NOINTERFACE\n", hres
);
6279 ok(qi
== NULL
, "qi=%p, expected NULL\n", qi
);
6281 qi
= (void*)0xdeadbeef;
6282 hres
= IUnknown_QueryInterface(doc
, &IID_IExternalConnection
, (void**)&qi
);
6283 ok(hres
== E_NOINTERFACE
, "QueryInterface returned %08x, expected E_NOINTERFACE\n", hres
);
6284 ok(qi
== NULL
, "qi=%p, expected NULL\n", qi
);
6286 qi
= (void*)0xdeadbeef;
6287 hres
= IUnknown_QueryInterface(doc
, &IID_IStdMarshalInfo
, (void**)&qi
);
6288 ok(hres
== E_NOINTERFACE
, "QueryInterface returned %08x, expected E_NOINTERFACE\n", hres
);
6289 ok(qi
== NULL
, "qi=%p, expected NULL\n", qi
);
6291 hres
= IUnknown_QueryInterface(doc
, &IID_IDispatch
, (void**)&qi
);
6292 ok(hres
== S_OK
, "Could not get IDispatch interface: %08x\n", hres
);
6293 ok(qi
!= (IUnknown
*)doc
, "disp == doc\n");
6294 IUnknown_Release(qi
);
6297 static void init_test(enum load_state_t ls
) {
6299 hwnd
= last_hwnd
= NULL
;
6300 set_clientsite
= FALSE
;
6301 load_from_stream
= FALSE
;
6302 call_UIActivate
= CallUIActivate_None
;
6309 inplace_deactivated
= FALSE
;
6311 expect_uihandler_iface
= &DocHostUIHandler
;
6314 static void test_HTMLDocument(BOOL do_load
)
6316 IHTMLDocument2
*doc
;
6318 trace("Testing HTMLDocument (%s)...\n", (do_load
? "load" : "no load"));
6320 init_test(do_load
? LD_DOLOAD
: LD_NO
);
6322 doc
= create_document();
6323 doc_unk
= (IUnknown
*)doc
;
6325 test_QueryInterface(doc
);
6327 test_IsDirty(doc
, S_FALSE
);
6328 test_MSHTML_QueryStatus(doc
, OLECMDF_SUPPORTED
);
6329 test_external(doc
, FALSE
);
6330 test_ViewAdviseSink(doc
);
6331 test_ConnectionPointContainer(doc
);
6332 test_GetCurMoniker((IUnknown
*)doc
, NULL
, NULL
);
6333 test_Persist(doc
, &Moniker
);
6335 test_OnAmbientPropertyChange2(doc
);
6337 test_Activate(doc
, CLIENTSITE_EXPECTPATH
);
6340 set_custom_uihandler(doc
, &CustomDocHostUIHandler
);
6341 test_download(DWL_CSS
|DWL_TRYCSS
);
6342 test_GetCurMoniker((IUnknown
*)doc
, &Moniker
, NULL
);
6343 test_elem_from_point(doc
);
6346 test_MSHTML_QueryStatus(doc
, OLECMDF_SUPPORTED
);
6347 test_OleCommandTarget_fail(doc
);
6348 test_OleCommandTarget(doc
);
6349 test_OnAmbientPropertyChange(doc
);
6350 test_Window(doc
, TRUE
);
6351 test_external(doc
, TRUE
);
6353 test_UIDeactivate();
6354 test_OleCommandTarget(doc
);
6355 test_Window(doc
, TRUE
);
6356 test_InPlaceDeactivate(doc
, TRUE
);
6358 /* Calling test_OleCommandTarget here causes Segmentation Fault with native
6359 * MSHTML. It doesn't with Wine. */
6361 test_Window(doc
, FALSE
);
6363 test_InPlaceDeactivate(doc
, FALSE
);
6365 test_Close(doc
, FALSE
);
6367 /* Activate HTMLDocument again */
6368 test_Activate(doc
, CLIENTSITE_SETNULL
);
6369 test_Window(doc
, TRUE
);
6370 test_OleCommandTarget(doc
);
6371 test_UIDeactivate();
6372 test_InPlaceDeactivate(doc
, TRUE
);
6373 test_Close(doc
, FALSE
);
6375 /* Activate HTMLDocument again, this time without UIActivate */
6376 call_UIActivate
= CallUIActivate_None
;
6377 test_Activate(doc
, CLIENTSITE_SETNULL
);
6378 test_Window(doc
, TRUE
);
6380 test_external(doc
, TRUE
);
6381 set_custom_uihandler(doc
, NULL
);
6382 test_external(doc
, FALSE
);
6384 test_UIDeactivate();
6385 test_InPlaceDeactivate(doc
, TRUE
);
6388 test_Close(doc
, TRUE
);
6389 test_OnAmbientPropertyChange2(doc
);
6390 test_GetCurMoniker((IUnknown
*)doc
, do_load
? &Moniker
: NULL
, NULL
);
6393 /* Activate HTMLDocument again, calling UIActivate after showing the window */
6394 call_UIActivate
= CallUIActivate_AfterShow
;
6395 test_Activate(doc
, 0);
6396 test_Window(doc
, TRUE
);
6397 test_OleCommandTarget(doc
);
6398 test_UIDeactivate();
6399 test_InPlaceDeactivate(doc
, TRUE
);
6400 test_Close(doc
, FALSE
);
6401 call_UIActivate
= CallUIActivate_None
;
6405 IOleDocumentView_Release(view
);
6408 ok(IsWindow(hwnd
), "hwnd is destroyed\n");
6409 release_document(doc
);
6410 ok(!IsWindow(hwnd
), "hwnd is not destroyed\n");
6413 static void test_HTMLDocument_hlink(DWORD status
)
6415 IHTMLDocument2
*doc
;
6417 trace("Testing HTMLDocument (hlink)...\n");
6419 init_test(LD_DOLOAD
);
6422 doc
= create_document();
6423 doc_unk
= (IUnknown
*)doc
;
6425 set_custom_uihandler(doc
, &CustomDocHostUIHandler
);
6426 test_ViewAdviseSink(doc
);
6427 test_ConnectionPointContainer(doc
);
6428 test_GetCurMoniker((IUnknown
*)doc
, NULL
, NULL
);
6429 test_Persist(doc
, &Moniker
);
6432 status_code
= status
;
6433 test_download(DWL_CSS
|DWL_TRYCSS
);
6434 status_code
= HTTP_STATUS_OK
;
6436 test_IsDirty(doc
, S_FALSE
);
6437 test_MSHTML_QueryStatus(doc
, OLECMDF_SUPPORTED
);
6439 test_exec_onunload(doc
);
6440 test_Window(doc
, TRUE
);
6441 test_InPlaceDeactivate(doc
, TRUE
);
6442 test_Close(doc
, FALSE
);
6443 test_IsDirty(doc
, S_FALSE
);
6444 test_GetCurMoniker((IUnknown
*)doc
, &Moniker
, NULL
);
6446 test_GetCurMoniker((IUnknown
*)doc
, &Moniker
, NULL
);
6449 IOleDocumentView_Release(view
);
6452 release_document(doc
);
6455 static void test_cookies(IHTMLDocument2
*doc
)
6463 hres
= IHTMLDocument2_get_cookie(doc
, &str
);
6464 ok(hres
== S_OK
, "get_cookie failed: %08x\n", hres
);
6466 size
= sizeof(buf
)/sizeof(WCHAR
);
6467 b
= InternetGetCookieW(http_urlW
, NULL
, buf
, &size
);
6468 ok(b
, "InternetGetCookieW failed: %08x\n", GetLastError());
6469 ok(!lstrcmpW(buf
, str
), "cookie = %s, expected %s\n", wine_dbgstr_w(str
), wine_dbgstr_w(buf
));
6473 str
= a2bstr("test=testval");
6474 hres
= IHTMLDocument2_put_cookie(doc
, str
);
6475 ok(hres
== S_OK
, "put_cookie failed: %08x\n", hres
);
6478 hres
= IHTMLDocument2_get_cookie(doc
, &str2
);
6479 ok(hres
== S_OK
, "get_cookie failed: %08x\n", hres
);
6480 ok(str2
!= NULL
, "cookie = NULL\n");
6481 size
= sizeof(buf
)/sizeof(WCHAR
);
6482 b
= InternetGetCookieW(http_urlW
, NULL
, buf
, &size
);
6483 ok(b
, "InternetGetCookieW failed: %08x\n", GetLastError());
6484 ok(!lstrcmpW(buf
, str2
), "cookie = %s, expected %s\n", wine_dbgstr_w(str2
), wine_dbgstr_w(buf
));
6485 ok(strstrW(str2
, str
) != NULL
, "could not find %s in %s\n", wine_dbgstr_w(str
), wine_dbgstr_w(str2
));
6487 SysFreeString(str2
);
6489 str
= a2bstr("test=testval2");
6490 hres
= IHTMLDocument2_put_cookie(doc
, str
);
6491 ok(hres
== S_OK
, "put_cookie failed: %08x\n", hres
);
6494 hres
= IHTMLDocument2_get_cookie(doc
, &str2
);
6495 ok(hres
== S_OK
, "get_cookie failed: %08x\n", hres
);
6496 ok(str2
!= NULL
, "cookie = NULL\n");
6497 size
= sizeof(buf
)/sizeof(WCHAR
);
6498 b
= InternetGetCookieW(http_urlW
, NULL
, buf
, &size
);
6499 ok(b
, "InternetGetCookieW failed: %08x\n", GetLastError());
6500 ok(!lstrcmpW(buf
, str2
), "cookie = %s, expected %s\n", wine_dbgstr_w(str2
), wine_dbgstr_w(buf
));
6501 ok(strstrW(str2
, str
) != NULL
, "could not find %s in %s\n", wine_dbgstr_w(str
), wine_dbgstr_w(str2
));
6503 SysFreeString(str2
);
6506 static void test_HTMLDocument_http(BOOL with_wbapp
)
6509 IHTMLDocument2
*doc
;
6513 trace("Testing HTMLDocument (http%s)...\n", with_wbapp
? " with IWebBrowserApp" : "");
6515 support_wbapp
= with_wbapp
;
6517 if(!winetest_interactive
&& is_ie_hardened()) {
6518 win_skip("IE running in Enhanced Security Configuration\n");
6522 init_test(LD_DOLOAD
);
6525 doc
= create_document();
6526 doc_unk
= (IUnknown
*)doc
;
6528 hres
= CreateURLMoniker(NULL
, http_urlW
, &http_mon
);
6529 ok(hres
== S_OK
, "CreateURLMoniker failed: %08x\n", hres
);
6531 test_ViewAdviseSink(doc
);
6532 test_ConnectionPointContainer(doc
);
6533 test_GetCurMoniker((IUnknown
*)doc
, NULL
, NULL
);
6534 test_Persist(doc
, http_mon
);
6536 test_download(DWL_HTTP
);
6538 test_IsDirty(doc
, S_FALSE
);
6539 test_MSHTML_QueryStatus(doc
, OLECMDF_SUPPORTED
);
6540 test_GetCurMoniker((IUnknown
*)doc
, http_mon
, NULL
);
6542 nav_url
= nav_serv_url
= "http://www.winehq.org/"; /* for valid prev nav_url */
6544 test_put_href(doc
, FALSE
, "#test", "http://www.winehq.org/#test", FALSE
, TRUE
);
6545 test_put_href(doc
, FALSE
, NULL
, "javascript:external&&undefined", TRUE
, FALSE
);
6547 test_put_href(doc
, FALSE
, NULL
, "about:blank", FALSE
, FALSE
);
6548 test_put_href(doc
, TRUE
, NULL
, "about:replace", FALSE
, FALSE
);
6550 test_open_window(doc
, TRUE
);
6551 if(!support_wbapp
) /* FIXME */
6552 test_open_window(doc
, FALSE
);
6554 test_InPlaceDeactivate(doc
, TRUE
);
6555 test_Close(doc
, FALSE
);
6556 test_IsDirty(doc
, S_FALSE
);
6557 test_GetCurMoniker((IUnknown
*)doc
, NULL
, "about:replace");
6560 IOleDocumentView_Release(view
);
6563 release_document(doc
);
6565 ref
= IMoniker_Release(http_mon
);
6566 ok(!ref
, "ref=%d, expected 0\n", ref
);
6569 static void test_QueryService(IHTMLDocument2
*doc
, BOOL success
)
6571 IHTMLWindow2
*window
, *sp_window
;
6572 IServiceProvider
*sp
;
6576 hres
= IUnknown_QueryInterface(doc
, &IID_IServiceProvider
, (void**)&sp
);
6577 ok(hres
== S_OK
, "QueryService returned %08x\n", hres
);
6579 hres
= IServiceProvider_QueryService(sp
, &IID_IHlinkFrame
, &IID_IHlinkFrame
, (void**)&hf
);
6581 ok(hres
== E_NOINTERFACE
, "QueryService returned %08x, expected E_NOINTERFACE\n", hres
);
6582 IServiceProvider_Release(sp
);
6586 ok(hres
== S_OK
, "QueryService(IID_IHlinkFrame) failed: %08x\n", hres
);
6587 ok(hf
== &HlinkFrame
, "hf != HlinkFrame\n");
6588 IHlinkFrame_Release(hf
);
6590 IServiceProvider_Release(sp
);
6592 hres
= IHTMLDocument2_get_parentWindow(doc
, &window
);
6593 ok(hres
== S_OK
, "get_parentWindow failed: %08x\n", hres
);
6595 hres
= IHTMLWindow2_QueryInterface(window
, &IID_IServiceProvider
, (void**)&sp
);
6596 ok(hres
== S_OK
, "Could not get IServiceProvider iface: %08x\n", hres
);
6598 hres
= IServiceProvider_QueryService(sp
, &IID_IHTMLWindow2
, &IID_IHTMLWindow2
, (void**)&sp_window
);
6599 ok(hres
== S_OK
, "QueryService(IID_IHTMLWindow2) failed: %08x\n", hres
);
6600 /* FIXME: test returned window */
6601 IHTMLWindow2_Release(sp_window
);
6603 hres
= IServiceProvider_QueryService(sp
, &IID_IHlinkFrame
, &IID_IHlinkFrame
, (void**)&hf
);
6604 ok(hres
== S_OK
, "QueryService(IID_IHlinkFrame) failed: %08x\n", hres
);
6605 ok(hf
== &HlinkFrame
, "hf != HlinkFrame\n");
6606 IHlinkFrame_Release(hf
);
6608 IServiceProvider_Release(sp
);
6609 IHTMLWindow2_Release(window
);
6612 static void test_HTMLDocument_StreamLoad(void)
6614 IHTMLDocument2
*doc
;
6619 trace("Testing HTMLDocument (IPersistStreamInit)...\n");
6621 init_test(LD_DOLOAD
);
6622 load_from_stream
= TRUE
;
6624 doc
= create_document();
6625 doc_unk
= (IUnknown
*)doc
;
6627 hres
= IUnknown_QueryInterface(doc
, &IID_IOleObject
, (void**)&oleobj
);
6628 ok(hres
== S_OK
, "Could not get IOleObject: %08x\n", hres
);
6630 hres
= IOleObject_Advise(oleobj
, (IAdviseSink
*)&AdviseSink
, &conn
);
6631 ok(hres
== S_OK
, "Advise failed: %08x\n", hres
);
6633 test_readyState((IUnknown
*)doc
);
6634 test_IsDirty(doc
, S_FALSE
);
6635 test_ViewAdviseSink(doc
);
6636 test_ConnectionPointContainer(doc
);
6637 test_QueryService(doc
, FALSE
);
6638 test_ClientSite(oleobj
, CLIENTSITE_EXPECTPATH
);
6639 test_QueryService(doc
, TRUE
);
6640 test_DoVerb(oleobj
);
6641 test_MSHTML_QueryStatus(doc
, OLECMDF_SUPPORTED
);
6643 test_GetCurMoniker((IUnknown
*)doc
, NULL
, NULL
);
6644 test_StreamLoad(doc
);
6645 test_download(DWL_VERBDONE
|DWL_TRYCSS
);
6646 test_MSHTML_QueryStatus(doc
, OLECMDF_SUPPORTED
);
6648 test_UIDeactivate();
6649 test_InPlaceDeactivate(doc
, TRUE
);
6650 SET_EXPECT(Advise_Close
);
6651 test_Close(doc
, TRUE
);
6652 CHECK_CALLED(Advise_Close
);
6653 test_external(doc
, FALSE
);
6654 test_IsDirty(doc
, S_FALSE
);
6656 set_custom_uihandler(doc
, &CustomDocHostUIHandler
);
6657 test_ClientSite(oleobj
, CLIENTSITE_SETNULL
);
6658 test_external(doc
, TRUE
);
6659 test_ClientSite(oleobj
, CLIENTSITE_SETNULL
|CLIENTSITE_DONTSET
);
6660 test_external(doc
, TRUE
);
6661 set_custom_uihandler(doc
, NULL
);
6662 test_ClientSite(oleobj
, CLIENTSITE_SETNULL
|CLIENTSITE_DONTSET
);
6664 IOleObject_Release(oleobj
);
6666 IOleDocumentView_Release(view
);
6670 release_document(doc
);
6673 static void test_HTMLDocument_StreamInitNew(void)
6675 IHTMLDocument2
*doc
;
6680 trace("Testing HTMLDocument (IPersistStreamInit::InitNew)...\n");
6682 init_test(LD_DOLOAD
);
6683 load_from_stream
= TRUE
;
6685 doc
= create_document();
6686 doc_unk
= (IUnknown
*)doc
;
6688 hres
= IUnknown_QueryInterface(doc
, &IID_IOleObject
, (void**)&oleobj
);
6689 ok(hres
== S_OK
, "Could not get IOleObject: %08x\n", hres
);
6691 hres
= IOleObject_Advise(oleobj
, (IAdviseSink
*)&AdviseSink
, &conn
);
6692 ok(hres
== S_OK
, "Advise failed: %08x\n", hres
);
6694 test_readyState((IUnknown
*)doc
);
6695 test_IsDirty(doc
, S_FALSE
);
6696 test_ViewAdviseSink(doc
);
6697 test_ConnectionPointContainer(doc
);
6698 test_ClientSite(oleobj
, CLIENTSITE_EXPECTPATH
);
6699 test_DoVerb(oleobj
);
6700 test_MSHTML_QueryStatus(doc
, OLECMDF_SUPPORTED
);
6702 IOleObject_Release(oleobj
);
6704 test_GetCurMoniker((IUnknown
*)doc
, NULL
, NULL
);
6705 test_StreamInitNew(doc
);
6707 SET_EXPECT(Invoke_OnReadyStateChange_Interactive
);
6708 test_download(DWL_VERBDONE
|DWL_TRYCSS
|DWL_EMPTY
);
6709 todo_wine
CHECK_NOT_CALLED(Invoke_OnReadyStateChange_Interactive
);
6711 test_MSHTML_QueryStatus(doc
, OLECMDF_SUPPORTED
);
6713 test_UIDeactivate();
6714 test_InPlaceDeactivate(doc
, TRUE
);
6715 SET_EXPECT(Advise_Close
);
6716 test_Close(doc
, FALSE
);
6717 CHECK_CALLED(Advise_Close
);
6718 test_IsDirty(doc
, S_FALSE
);
6721 IOleDocumentView_Release(view
);
6725 release_document(doc
);
6728 static void test_edit_uiactivate(IOleObject
*oleobj
)
6730 IOleDocumentView
*docview
;
6733 hres
= IOleObject_QueryInterface(oleobj
, &IID_IOleDocumentView
, (void **)&docview
);
6734 ok(hres
== S_OK
, "IOleObject_QueryInterface failed with error 0x%08x\n", hres
);
6736 SET_EXPECT(OnFocus_TRUE
);
6737 SET_EXPECT(SetActiveObject
);
6739 SET_EXPECT(InPlaceUIWindow_SetActiveObject
);
6740 SET_EXPECT(InPlaceFrame_SetBorderSpace
);
6741 expect_status_text
= NULL
;
6743 hres
= IOleDocumentView_UIActivate(docview
, TRUE
);
6744 ok(hres
== S_OK
, "IOleDocumentView_UIActivate failed with error 0x%08x\n", hres
);
6746 CHECK_CALLED(OnFocus_TRUE
);
6747 CHECK_CALLED(SetActiveObject
);
6748 CHECK_CALLED(ShowUI
);
6749 CHECK_CALLED(InPlaceUIWindow_SetActiveObject
);
6750 CHECK_CALLED(InPlaceFrame_SetBorderSpace
);
6752 IOleDocumentView_Release(docview
);
6755 static void test_editing_mode(BOOL do_load
)
6757 IHTMLDocument2
*doc
;
6763 trace("Testing HTMLDocument (edit%s)...\n", do_load
? " load" : "");
6765 init_test(do_load
? LD_DOLOAD
: LD_NO
);
6766 call_UIActivate
= CallUIActivate_AfterShow
;
6768 doc
= create_document();
6769 unk
= doc_unk
= (IUnknown
*)doc
;
6771 hres
= IUnknown_QueryInterface(doc
, &IID_IOleObject
, (void**)&oleobj
);
6772 ok(hres
== S_OK
, "Could not get IOleObject: %08x\n", hres
);
6774 hres
= IOleObject_Advise(oleobj
, (IAdviseSink
*)&AdviseSink
, &conn
);
6775 ok(hres
== S_OK
, "Advise failed: %08x\n", hres
);
6777 test_readyState((IUnknown
*)doc
);
6778 test_ViewAdviseSink(doc
);
6779 test_ConnectionPointContainer(doc
);
6780 test_ClientSite(oleobj
, CLIENTSITE_EXPECTPATH
);
6781 test_DoVerb(oleobj
);
6782 test_edit_uiactivate(oleobj
);
6784 test_MSHTML_QueryStatus(doc
, OLECMDF_SUPPORTED
);
6786 test_Persist(doc
, &Moniker
);
6787 stream_read
= protocol_read
= 0;
6788 test_exec_editmode(unk
, do_load
);
6789 test_UIDeactivate();
6790 call_UIActivate
= CallUIActivate_None
;
6791 IOleObject_Release(oleobj
);
6793 test_MSHTML_QueryStatus(doc
, OLECMDF_SUPPORTED
);
6794 test_download(DWL_VERBDONE
| (do_load
? DWL_CSS
|DWL_TRYCSS
: 0));
6796 SET_EXPECT(SetStatusText
); /* ignore race in native mshtml */
6797 test_timer(EXPECT_UPDATEUI
);
6798 CLEAR_CALLED(SetStatusText
);
6800 test_MSHTML_QueryStatus(doc
, OLECMDF_SUPPORTED
|OLECMDF_ENABLED
);
6803 test_exec_fontname(unk
, NULL
, wszTimesNewRoman
);
6804 test_exec_fontname(unk
, wszArial
, wszTimesNewRoman
);
6805 test_timer(EXPECT_UPDATEUI
);
6806 test_exec_fontname(unk
, NULL
, wszArial
);
6808 test_exec_noargs(unk
, IDM_JUSTIFYRIGHT
);
6809 test_timer(EXPECT_UPDATEUI
);
6810 test_QueryStatus(unk
, &CGID_MSHTML
, IDM_JUSTIFYRIGHT
,
6811 OLECMDF_SUPPORTED
|OLECMDF_ENABLED
|OLECMDF_LATCHED
);
6813 test_exec_noargs(unk
, IDM_JUSTIFYCENTER
);
6814 test_timer(EXPECT_UPDATEUI
);
6815 test_QueryStatus(unk
, &CGID_MSHTML
, IDM_JUSTIFYRIGHT
,
6816 OLECMDF_SUPPORTED
|OLECMDF_ENABLED
);
6817 test_QueryStatus(unk
, &CGID_MSHTML
, IDM_JUSTIFYCENTER
,
6818 OLECMDF_SUPPORTED
|OLECMDF_ENABLED
|OLECMDF_LATCHED
);
6820 test_exec_noargs(unk
, IDM_HORIZONTALLINE
);
6821 test_timer(EXPECT_UPDATEUI
);
6822 test_QueryStatus(unk
, &CGID_MSHTML
, IDM_HORIZONTALLINE
,
6823 OLECMDF_SUPPORTED
|OLECMDF_ENABLED
);
6826 test_UIDeactivate();
6827 test_InPlaceDeactivate(doc
, TRUE
);
6828 SET_EXPECT(Advise_Close
);
6829 test_Close(doc
, FALSE
);
6830 CHECK_CALLED(Advise_Close
);
6833 IOleDocumentView_Release(view
);
6837 release_document(doc
);
6840 static void test_UIActivate(BOOL do_load
, BOOL use_ipsex
, BOOL use_ipsw
)
6842 IHTMLDocument2
*doc
;
6844 IOleInPlaceSite
*inplacesite
;
6847 trace("Running OleDocumentView_UIActivate tests (%d %d %d)\n", do_load
, use_ipsex
, use_ipsw
);
6849 init_test(do_load
? LD_DOLOAD
: LD_NO
);
6851 doc
= create_document();
6852 doc_unk
= (IUnknown
*)doc
;
6857 hres
= IUnknown_QueryInterface(doc
, &IID_IOleObject
, (void**)&oleobj
);
6858 ok(hres
== S_OK
, "QueryInterface(IID_IOleObject) failed: %08x\n", hres
);
6860 hres
= IUnknown_QueryInterface(doc
, &IID_IOleDocumentView
, (void**)&view
);
6861 ok(hres
== S_OK
, "QueryInterface(IID_IOleDocumentView) failed: %08x\n", hres
);
6863 SET_EXPECT(Invoke_AMBIENT_USERMODE
);
6864 SET_EXPECT(GetHostInfo
);
6865 SET_EXPECT(Invoke_AMBIENT_DLCONTROL
);
6866 SET_EXPECT(Invoke_AMBIENT_SILENT
);
6867 SET_EXPECT(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED
);
6868 SET_EXPECT(Invoke_AMBIENT_USERAGENT
);
6869 SET_EXPECT(Invoke_AMBIENT_PALETTE
);
6870 SET_EXPECT(GetOptionKeyPath
);
6871 SET_EXPECT(GetOverrideKeyPath
);
6872 SET_EXPECT(GetWindow
);
6873 SET_EXPECT(Exec_DOCCANNAVIGATE
);
6874 SET_EXPECT(QueryStatus_SETPROGRESSTEXT
);
6875 SET_EXPECT(Exec_SETPROGRESSMAX
);
6876 SET_EXPECT(Exec_SETPROGRESSPOS
);
6877 SET_EXPECT(GetTravelLog
);
6879 hres
= IOleObject_SetClientSite(oleobj
, &ClientSite
);
6880 ok(hres
== S_OK
, "SetClientSite failed: %08x\n", hres
);
6881 set_clientsite
= TRUE
;
6883 CHECK_CALLED(Invoke_AMBIENT_USERMODE
);
6884 CHECK_CALLED(GetHostInfo
);
6885 CHECK_CALLED(Invoke_AMBIENT_DLCONTROL
);
6886 CHECK_CALLED(Invoke_AMBIENT_SILENT
);
6887 CHECK_CALLED(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED
);
6888 CHECK_CALLED(Invoke_AMBIENT_USERAGENT
);
6889 CLEAR_CALLED(Invoke_AMBIENT_PALETTE
); /* not called on IE9 */
6890 CLEAR_CALLED(GetOptionKeyPath
); /* not called on some IE9 */
6891 CHECK_CALLED(GetOverrideKeyPath
);
6892 CHECK_CALLED(GetWindow
);
6893 CHECK_CALLED(Exec_DOCCANNAVIGATE
);
6894 CHECK_CALLED(QueryStatus_SETPROGRESSTEXT
);
6895 CHECK_CALLED(Exec_SETPROGRESSMAX
);
6896 CHECK_CALLED(Exec_SETPROGRESSPOS
);
6897 todo_wine
CHECK_CALLED(GetTravelLog
);
6899 hres
= IOleDocumentView_GetInPlaceSite(view
, &inplacesite
);
6900 ok(hres
== S_OK
, "GetInPlaceSite failed: %08x\n", hres
);
6901 ok(inplacesite
== NULL
, "inplacesite = %p, expected NULL\n", inplacesite
);
6903 SET_EXPECT(GetContainer
);
6904 SET_EXPECT(LockContainer
);
6905 SET_EXPECT(CanInPlaceActivate
);
6906 SET_EXPECT(GetWindowContext
);
6907 SET_EXPECT(GetWindow
);
6909 SET_EXPECT(OnInPlaceActivateEx
);
6910 SET_EXPECT(RequestUIActivate
);
6913 SET_EXPECT(OnInPlaceActivate
);
6914 SET_EXPECT(OnUIActivate
);
6915 SET_EXPECT(SetStatusText
);
6916 SET_EXPECT(Exec_SETPROGRESSMAX
);
6917 SET_EXPECT(Exec_SETPROGRESSPOS
);
6919 SET_EXPECT(InPlaceUIWindow_SetActiveObject
);
6920 SET_EXPECT(InPlaceFrame_SetBorderSpace
);
6921 SET_EXPECT(OnFocus_TRUE
);
6922 SET_EXPECT(SetActiveObject
);
6923 expect_LockContainer_fLock
= TRUE
;
6925 hres
= IOleDocumentView_UIActivate(view
, TRUE
);
6926 ok(hres
== S_OK
, "UIActivate failed: %08x\n", hres
);
6928 CHECK_CALLED(GetContainer
);
6929 CHECK_CALLED(LockContainer
);
6930 CHECK_CALLED(CanInPlaceActivate
);
6931 CHECK_CALLED(GetWindowContext
);
6932 CHECK_CALLED(GetWindow
);
6934 CHECK_CALLED(OnInPlaceActivateEx
);
6935 SET_EXPECT(RequestUIActivate
);
6938 CHECK_CALLED(OnInPlaceActivate
);
6939 CHECK_CALLED(OnUIActivate
);
6940 CHECK_CALLED(SetStatusText
);
6941 CHECK_CALLED(Exec_SETPROGRESSMAX
);
6942 CHECK_CALLED(Exec_SETPROGRESSPOS
);
6943 CHECK_CALLED(ShowUI
);
6944 CHECK_CALLED(InPlaceUIWindow_SetActiveObject
);
6945 CHECK_CALLED(InPlaceFrame_SetBorderSpace
);
6946 CHECK_CALLED(OnFocus_TRUE
);
6947 CHECK_CALLED(SetActiveObject
);
6948 container_locked
= TRUE
;
6950 SET_EXPECT(SetActiveObject_null
);
6951 SET_EXPECT(InPlaceUIWindow_SetActiveObject
);
6953 SET_EXPECT(OnUIDeactivate
);
6955 hres
= IOleDocumentView_UIActivate(view
, FALSE
);
6956 ok(hres
== S_OK
, "UIActivate failed: %08x\n", hres
);
6958 CHECK_CALLED(SetActiveObject_null
);
6959 CHECK_CALLED(InPlaceUIWindow_SetActiveObject
);
6960 CHECK_CALLED(HideUI
);
6961 CHECK_CALLED(OnUIDeactivate
);
6963 hres
= IOleDocumentView_GetInPlaceSite(view
, &inplacesite
);
6964 ok(hres
== S_OK
, "GetInPlaceSite failed: %08x\n", hres
);
6965 ok(inplacesite
!= NULL
, "inplacesite = NULL\n");
6966 IOleInPlaceSite_Release(inplacesite
);
6968 SET_EXPECT(SetStatusText
);
6969 SET_EXPECT(OnFocus_FALSE
);
6971 SET_EXPECT(OnInPlaceDeactivateEx
);
6973 SET_EXPECT(OnInPlaceDeactivate
);
6977 CLEAR_CALLED(SetStatusText
); /* Called by IE9 */
6978 CHECK_CALLED(OnFocus_FALSE
);
6980 CHECK_CALLED(OnInPlaceDeactivateEx
);
6982 CHECK_CALLED(OnInPlaceDeactivate
);
6984 test_Close(doc
, TRUE
);
6986 IOleObject_Release(oleobj
);
6987 IOleDocumentView_Release(view
);
6990 release_document(doc
);
6993 static void register_protocol(void)
6995 IInternetSession
*session
;
6998 static const WCHAR wsz_winetest
[] = {'w','i','n','e','t','e','s','t',0};
7000 hres
= CoInternetGetSession(0, &session
, 0);
7001 ok(hres
== S_OK
, "CoInternetGetSession failed: %08x\n", hres
);
7003 hres
= IInternetSession_RegisterNameSpace(session
, &ClassFactory
, &IID_NULL
,
7004 wsz_winetest
, 0, NULL
, 0);
7005 ok(hres
== S_OK
, "RegisterNameSpace failed: %08x\n", hres
);
7007 IInternetSession_Release(session
);
7010 static void test_HTMLDoc_ISupportErrorInfo(void)
7012 IHTMLDocument2
*doc
;
7014 ISupportErrorInfo
*sinfo
;
7016 doc
= create_document();
7018 hres
= IUnknown_QueryInterface(doc
, &IID_ISupportErrorInfo
, (void**)&sinfo
);
7019 ok(hres
== S_OK
, "got %x\n", hres
);
7020 ok(sinfo
!= NULL
, "got %p\n", sinfo
);
7023 hres
= ISupportErrorInfo_InterfaceSupportsErrorInfo(sinfo
, &IID_IErrorInfo
);
7024 ok(hres
== S_FALSE
, "Expected S_OK, got %x\n", hres
);
7025 IUnknown_Release(sinfo
);
7028 release_document(doc
);
7031 static void test_IPersistHistory(void)
7033 IHTMLDocument2
*doc
;
7035 IPersistHistory
*phist
;
7037 doc
= create_document();
7039 hres
= IUnknown_QueryInterface(doc
, &IID_IPersistHistory
, (void**)&phist
);
7040 ok(hres
== S_OK
, "QueryInterface returned %08x, expected S_OK\n", hres
);
7042 IPersistHistory_Release(phist
);
7044 release_document(doc
);
7047 static BOOL
check_ie(void)
7049 IHTMLDocument2
*doc
;
7050 IHTMLDocument5
*doc5
;
7053 doc
= create_document();
7057 hres
= IHTMLDocument2_QueryInterface(doc
, &IID_IHTMLDocument5
, (void**)&doc5
);
7059 IHTMLDocument5_Release(doc5
);
7061 release_document(doc
);
7062 return SUCCEEDED(hres
);
7071 win_skip("Too old IE\n");
7075 container_hwnd
= create_container_window();
7076 register_protocol();
7078 asynchronous_binding
= TRUE
;
7079 test_HTMLDocument_hlink(HTTP_STATUS_NOT_FOUND
);
7081 asynchronous_binding
= FALSE
;
7082 test_HTMLDocument_hlink(HTTP_STATUS_OK
);
7083 test_HTMLDocument(FALSE
);
7084 test_HTMLDocument(TRUE
);
7085 test_HTMLDocument_StreamLoad();
7086 test_HTMLDocument_StreamInitNew();
7087 test_editing_mode(FALSE
);
7088 test_editing_mode(TRUE
);
7089 test_HTMLDocument_http(FALSE
);
7090 test_HTMLDocument_http(TRUE
);
7091 test_UIActivate(FALSE
, FALSE
, FALSE
);
7092 test_UIActivate(FALSE
, TRUE
, FALSE
);
7093 test_UIActivate(FALSE
, TRUE
, TRUE
);
7094 test_UIActivate(TRUE
, FALSE
, FALSE
);
7095 test_UIActivate(TRUE
, TRUE
, FALSE
);
7096 test_UIActivate(TRUE
, TRUE
, TRUE
);
7097 test_HTMLDoc_ISupportErrorInfo();
7098 test_IPersistHistory();
7100 DestroyWindow(container_hwnd
);