?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
mshtml: Respond to SID_SContainerDispatch service id.
[wine/multimedia.git] / dlls / mshtml / tests / htmldoc.c
blob85fbd9b4e98c88ada0cf92b99ea6721cdc53eddc
1 /*
2 * Copyright 2005-2009 Jacek Caban for CodeWeavers
3 *
4 * This library is free software; you can redistribute it and/or
5 * modify it under the terms of the GNU Lesser General Public
6 * License as published by the Free Software Foundation; either
7 * version 2.1 of the License, or (at your option) any later version.
8 *
9 * This library is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12 * Lesser General Public License for more details.
13 *
14 * You should have received a copy of the GNU Lesser General Public
15 * License along with this library; if not, write to the Free Software
16 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
17 */
18
19 #define COBJMACROS
20 #define CONST_VTABLE
21
22 #include <wine/test.h>
23 #include <stdarg.h>
24 #include <stdio.h>
25
26 #include "windef.h"
27 #include "winbase.h"
28 #include "initguid.h"
29 #include "ole2.h"
30 #include "mshtml.h"
31 #include "docobj.h"
32 #include "docobjectservice.h"
33 #include "wininet.h"
34 #include "mshtmhst.h"
35 #include "mshtmdid.h"
36 #include "mshtmcid.h"
37 #include "hlink.h"
38 #include "dispex.h"
39 #include "idispids.h"
40 #include "shlguid.h"
41 #include "shdeprecated.h"
42 #include "perhist.h"
43 #include "shobjidl.h"
44 #include "htiface.h"
45 #include "mshtml_test.h"
46
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);
50 DEFINE_GUID(SID_SContainerDispatch,0xb722be00,0x4e68,0x101b,0xa2,0xbc,0x00,0xaa,0x00,0x40,0x47,0x70);
51
52 #define DEFINE_EXPECT(func) \
53 static BOOL expect_ ## func = FALSE, called_ ## func = FALSE
54
55 #define SET_EXPECT(func) \
56 expect_ ## func = TRUE
57
58 #define SET_CALLED(func) \
59 called_ ## func = TRUE
60
61 #define CHECK_EXPECT2(func) \
62 do { \
63 ok(expect_ ##func, "unexpected call " #func "\n"); \
64 called_ ## func = TRUE; \
65 }while(0)
66
67 #define CHECK_EXPECT(func) \
68 do { \
69 CHECK_EXPECT2(func); \
70 expect_ ## func = FALSE; \
71 }while(0)
72
73 #define CHECK_CALLED(func) \
74 do { \
75 ok(called_ ## func, "expected " #func "\n"); \
76 expect_ ## func = called_ ## func = FALSE; \
77 }while(0)
78
79 #define CHECK_NOT_CALLED(func) \
80 do { \
81 ok(!called_ ## func, "unexpected " #func "\n"); \
82 expect_ ## func = called_ ## func = FALSE; \
83 }while(0)
84
85 #define CHECK_CALLED_BROKEN(func) \
86 do { \
87 ok(called_ ## func || broken(!called_ ## func), "expected " #func "\n"); \
88 expect_ ## func = called_ ## func = FALSE; \
89 }while(0)
90
91 #define CLEAR_CALLED(func) \
92 expect_ ## func = called_ ## func = FALSE
93
94 static IOleDocumentView *view = NULL;
95 static HWND container_hwnd = NULL, hwnd = NULL, last_hwnd = NULL;
96
97 DEFINE_EXPECT(LockContainer);
98 DEFINE_EXPECT(SetActiveObject);
99 DEFINE_EXPECT(SetActiveObject_null);
100 DEFINE_EXPECT(GetWindow);
101 DEFINE_EXPECT(CanInPlaceActivate);
102 DEFINE_EXPECT(OnInPlaceActivate);
103 DEFINE_EXPECT(OnInPlaceActivateEx);
104 DEFINE_EXPECT(OnUIActivate);
105 DEFINE_EXPECT(GetWindowContext);
106 DEFINE_EXPECT(OnUIDeactivate);
107 DEFINE_EXPECT(OnInPlaceDeactivate);
108 DEFINE_EXPECT(OnInPlaceDeactivateEx);
109 DEFINE_EXPECT(GetContainer);
110 DEFINE_EXPECT(ShowUI);
111 DEFINE_EXPECT(ActivateMe);
112 DEFINE_EXPECT(GetHostInfo);
113 DEFINE_EXPECT(HideUI);
114 DEFINE_EXPECT(GetOptionKeyPath);
115 DEFINE_EXPECT(GetOverrideKeyPath);
116 DEFINE_EXPECT(SetStatusText);
117 DEFINE_EXPECT(QueryStatus_SETPROGRESSTEXT);
118 DEFINE_EXPECT(QueryStatus_OPEN);
119 DEFINE_EXPECT(QueryStatus_NEW);
120 DEFINE_EXPECT(Exec_SETPROGRESSMAX);
121 DEFINE_EXPECT(Exec_SETPROGRESSPOS);
122 DEFINE_EXPECT(Exec_HTTPEQUIV_DONE);
123 DEFINE_EXPECT(Exec_SETDOWNLOADSTATE_0);
124 DEFINE_EXPECT(Exec_SETDOWNLOADSTATE_1);
125 DEFINE_EXPECT(Exec_ShellDocView_37);
126 DEFINE_EXPECT(Exec_ShellDocView_63);
127 DEFINE_EXPECT(Exec_ShellDocView_67);
128 DEFINE_EXPECT(Exec_ShellDocView_84);
129 DEFINE_EXPECT(Exec_ShellDocView_103);
130 DEFINE_EXPECT(Exec_ShellDocView_105);
131 DEFINE_EXPECT(Exec_ShellDocView_140);
132 DEFINE_EXPECT(Exec_UPDATECOMMANDS);
133 DEFINE_EXPECT(Exec_SETTITLE);
134 DEFINE_EXPECT(Exec_HTTPEQUIV);
135 DEFINE_EXPECT(Exec_MSHTML_PARSECOMPLETE);
136 DEFINE_EXPECT(Exec_Explorer_69);
137 DEFINE_EXPECT(Exec_DOCCANNAVIGATE);
138 DEFINE_EXPECT(Invoke_AMBIENT_USERMODE);
139 DEFINE_EXPECT(Invoke_AMBIENT_DLCONTROL);
140 DEFINE_EXPECT(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
141 DEFINE_EXPECT(Invoke_AMBIENT_SILENT);
142 DEFINE_EXPECT(Invoke_AMBIENT_USERAGENT);
143 DEFINE_EXPECT(Invoke_AMBIENT_PALETTE);
144 DEFINE_EXPECT(Invoke_OnReadyStateChange_Interactive);
145 DEFINE_EXPECT(Invoke_OnReadyStateChange_Loading);
146 DEFINE_EXPECT(Invoke_OnReadyStateChange_Complete);
147 DEFINE_EXPECT(GetDropTarget);
148 DEFINE_EXPECT(UpdateUI);
149 DEFINE_EXPECT(Navigate);
150 DEFINE_EXPECT(OnFrameWindowActivate);
151 DEFINE_EXPECT(OnChanged_READYSTATE);
152 DEFINE_EXPECT(OnChanged_1005);
153 DEFINE_EXPECT(OnChanged_1012);
154 DEFINE_EXPECT(GetDisplayName);
155 DEFINE_EXPECT(BindToStorage);
156 DEFINE_EXPECT(IsSystemMoniker);
157 DEFINE_EXPECT(GetBindResult);
158 DEFINE_EXPECT(GetClassID);
159 DEFINE_EXPECT(Abort);
160 DEFINE_EXPECT(Read);
161 DEFINE_EXPECT(CreateInstance);
162 DEFINE_EXPECT(Start);
163 DEFINE_EXPECT(Terminate);
164 DEFINE_EXPECT(Protocol_Read);
165 DEFINE_EXPECT(LockRequest);
166 DEFINE_EXPECT(UnlockRequest);
167 DEFINE_EXPECT(OnFocus_TRUE);
168 DEFINE_EXPECT(OnFocus_FALSE);
169 DEFINE_EXPECT(RequestUIActivate);
170 DEFINE_EXPECT(InPlaceFrame_SetBorderSpace);
171 DEFINE_EXPECT(InPlaceUIWindow_SetActiveObject);
172 DEFINE_EXPECT(GetExternal);
173 DEFINE_EXPECT(EnableModeless_TRUE);
174 DEFINE_EXPECT(EnableModeless_FALSE);
175 DEFINE_EXPECT(Frame_EnableModeless_TRUE);
176 DEFINE_EXPECT(Frame_EnableModeless_FALSE);
177 DEFINE_EXPECT(Frame_GetWindow);
178 DEFINE_EXPECT(TranslateUrl);
179 DEFINE_EXPECT(Advise_Close);
180 DEFINE_EXPECT(OnViewChange);
181 DEFINE_EXPECT(EvaluateNewWindow);
182 DEFINE_EXPECT(GetTravelLog);
183 DEFINE_EXPECT(UpdateBackForwardState);
184 DEFINE_EXPECT(FireBeforeNavigate2);
185 DEFINE_EXPECT(FireNavigateComplete2);
186 DEFINE_EXPECT(FireDocumentComplete);
187 DEFINE_EXPECT(GetPendingUrl);
188 DEFINE_EXPECT(ActiveElementChanged);
189 DEFINE_EXPECT(IsErrorUrl);
190 DEFINE_EXPECT(get_LocationURL);
191
192 static IUnknown *doc_unk;
193 static IMoniker *doc_mon;
194 static BOOL expect_LockContainer_fLock;
195 static BOOL expect_InPlaceUIWindow_SetActiveObject_active = TRUE;
196 static BOOL ipsex, ipsw;
197 static BOOL set_clientsite, container_locked;
198 static BOOL readystate_set_loading = FALSE, readystate_set_interactive = FALSE, load_from_stream;
199 static BOOL editmode = FALSE, ignore_external_qi;
200 static BOOL inplace_deactivated, open_call;
201 static BOOL complete, loading_js, loading_hash;
202 static DWORD status_code = HTTP_STATUS_OK;
203 static BOOL asynchronous_binding = FALSE;
204 static BOOL support_wbapp, allow_new_window;
205 static int stream_read, protocol_read;
206 static enum load_state_t {
207 LD_DOLOAD,
208 LD_LOADING,
209 LD_LOADED,
210 LD_INTERACTIVE,
211 LD_COMPLETE,
212 LD_NO
213 } load_state;
214
215 static LPCOLESTR expect_status_text = NULL;
216 static const char *nav_url, *nav_serv_url;
217
218 static const char html_page[] =
219 "<html>"
220 "<head><link rel=\"stylesheet\" type=\"text/css\" href=\"test.css\"></head>"
221 "<body><div>test</div></body>"
222 "</html>";
223
224 static const char css_data[] = "body {color: red; margin: 0}";
225
226 static const WCHAR http_urlW[] =
227 {'h','t','t','p',':','/','/','w','w','w','.','w','i','n','e','h','q','.','o','r','g',0};
228
229 static const WCHAR doc_url[] = {'w','i','n','e','t','e','s','t',':','d','o','c',0};
230
231 #define DOCHOST_DOCCANNAVIGATE 0
232 #define WM_CONTINUE_BINDING (WM_APP+1)
233
234 static HRESULT QueryInterface(REFIID riid, void **ppv);
235 static void test_MSHTML_QueryStatus(IHTMLDocument2*,DWORD);
236
237 #define test_readyState(u) _test_readyState(__LINE__,u)
238 static void _test_readyState(unsigned,IUnknown*);
239
240 static const WCHAR wszTimesNewRoman[] =
241 {'T','i','m','e','s',' ','N','e','w',' ','R','o','m','a','n',0};
242 static const WCHAR wszArial[] =
243 {'A','r','i','a','l',0};
244
245 static const char *debugstr_guid(REFIID riid)
246 {
247 static char buf[50];
248
249 if(!riid)
250 return "(null)";
251
252 sprintf(buf, "{%08X-%04X-%04X-%02X%02X-%02X%02X%02X%02X%02X%02X}",
253 riid->Data1, riid->Data2, riid->Data3, riid->Data4[0],
254 riid->Data4[1], riid->Data4[2], riid->Data4[3], riid->Data4[4],
255 riid->Data4[5], riid->Data4[6], riid->Data4[7]);
256
257 return buf;
258 }
259
260 static int strcmp_wa(LPCWSTR strw, const char *stra)
261 {
262 CHAR buf[512];
263 WideCharToMultiByte(CP_ACP, 0, strw, -1, buf, sizeof(buf), NULL, NULL);
264 return lstrcmpA(stra, buf);
265 }
266
267 static const WCHAR *strstrW( const WCHAR *str, const WCHAR *sub )
268 {
269 while (*str)
270 {
271 const WCHAR *p1 = str, *p2 = sub;
272 while (*p1 && *p2 && *p1 == *p2) { p1++; p2++; }
273 if (!*p2) return str;
274 str++;
275 }
276 return NULL;
277 }
278
279 static BSTR a2bstr(const char *str)
280 {
281 BSTR ret;
282 int len;
283
284 len = MultiByteToWideChar(CP_ACP, 0, str, -1, NULL, 0);
285 ret = SysAllocStringLen(NULL, len);
286 MultiByteToWideChar(CP_ACP, 0, str, -1, ret, len);
287
288 return ret;
289 }
290
291 /* Returns true if the user interface is in English. Note that this does not
292 * presume of the formatting of dates, numbers, etc.
293 */
294 static BOOL is_lang_english(void)
295 {
296 static HMODULE hkernel32 = NULL;
297 static LANGID (WINAPI *pGetThreadUILanguage)(void) = NULL;
298 static LANGID (WINAPI *pGetUserDefaultUILanguage)(void) = NULL;
299
300 if (!hkernel32)
301 {
302 hkernel32 = GetModuleHandleA("kernel32.dll");
303 pGetThreadUILanguage = (void*)GetProcAddress(hkernel32, "GetThreadUILanguage");
304 pGetUserDefaultUILanguage = (void*)GetProcAddress(hkernel32, "GetUserDefaultUILanguage");
305 }
306 if (pGetThreadUILanguage)
307 return PRIMARYLANGID(pGetThreadUILanguage()) == LANG_ENGLISH;
308 if (pGetUserDefaultUILanguage)
309 return PRIMARYLANGID(pGetUserDefaultUILanguage()) == LANG_ENGLISH;
310
311 return PRIMARYLANGID(GetUserDefaultLangID()) == LANG_ENGLISH;
312 }
313
314 static BOOL iface_cmp(IUnknown *iface1, IUnknown *iface2)
315 {
316 IUnknown *unk1, *unk2;
317
318 if(iface1 == iface2)
319 return TRUE;
320
321 IUnknown_QueryInterface(iface1, &IID_IUnknown, (void**)&unk1);
322 IUnknown_Release(unk1);
323 IUnknown_QueryInterface(iface2, &IID_IUnknown, (void**)&unk2);
324 IUnknown_Release(unk2);
325
326 return unk1 == unk2;
327 }
328
329 #define EXPECT_UPDATEUI 1
330 #define EXPECT_SETTITLE 2
331
332 static void test_timer(DWORD flags)
333 {
334 BOOL *b = &called_Exec_SETTITLE;
335 MSG msg;
336
337 if(flags & EXPECT_UPDATEUI) {
338 SET_EXPECT(UpdateUI);
339 SET_EXPECT(Exec_UPDATECOMMANDS);
340 b = &called_UpdateUI;
341 }
342 if(flags & EXPECT_SETTITLE)
343 SET_EXPECT(Exec_SETTITLE);
344
345 while(!*b && GetMessage(&msg, hwnd, 0, 0)) {
346 TranslateMessage(&msg);
347 DispatchMessage(&msg);
348 }
349
350 if(flags & EXPECT_UPDATEUI) {
351 CHECK_CALLED(UpdateUI);
352 CHECK_CALLED(Exec_UPDATECOMMANDS);
353 }
354 if(flags & EXPECT_SETTITLE)
355 CHECK_CALLED(Exec_SETTITLE);
356 }
357
358 static IMoniker Moniker;
359
360 #define test_GetCurMoniker(u,m,v) _test_GetCurMoniker(__LINE__,u,m,v)
361 static void _test_GetCurMoniker(unsigned line, IUnknown *unk, IMoniker *exmon, const char *exurl)
362 {
363 IHTMLDocument2 *doc;
364 IPersistMoniker *permon;
365 IMoniker *mon = (void*)0xdeadbeef;
366 BSTR doc_url = (void*)0xdeadbeef;
367 HRESULT hres;
368
369 if(open_call)
370 return; /* FIXME */
371
372 hres = IUnknown_QueryInterface(unk, &IID_IPersistMoniker, (void**)&permon);
373 ok(hres == S_OK, "QueryInterface(IID_IPersistMoniker) failed: %08x\n", hres);
374 if(FAILED(hres))
375 return;
376
377 hres = IUnknown_QueryInterface(unk, &IID_IHTMLDocument2, (void**)&doc);
378 ok(hres == S_OK, "QueryInterface(IID_IHTMLDocument2) failed: %08x\n", hres);
379
380 hres = IHTMLDocument2_get_URL(doc, &doc_url);
381 ok(hres == S_OK, "get_URL failed: %08x\n", hres);
382
383 hres = IPersistMoniker_GetCurMoniker(permon, &mon);
384 IPersistMoniker_Release(permon);
385
386 if(exmon) {
387 LPOLESTR url;
388 BOOL exb = expect_GetDisplayName;
389 BOOL clb = called_GetDisplayName;
390
391 ok_(__FILE__,line)(hres == S_OK, "GetCurrentMoniker failed: %08x\n", hres);
392 ok_(__FILE__,line)(mon == exmon, "mon(%p) != exmon(%p)\n", mon, exmon);
393
394 if(mon == &Moniker)
395 SET_EXPECT(GetDisplayName);
396 hres = IMoniker_GetDisplayName(mon, NULL, NULL, &url);
397 ok(hres == S_OK, "GetDisplayName failed: %08x\n", hres);
398 if(mon == &Moniker)
399 CHECK_CALLED(GetDisplayName);
400 expect_GetDisplayName = exb;
401 called_GetDisplayName = clb;
402
403 if(!loading_hash)
404 ok(!lstrcmpW(url, doc_url), "url != doc_url\n");
405 else
406 ok(!strcmp_wa(url, nav_serv_url), "url = %s, expected %s\n", wine_dbgstr_w(url), nav_serv_url);
407 CoTaskMemFree(url);
408 }else if(exurl) {
409 LPOLESTR url;
410
411 ok_(__FILE__,line)(hres == S_OK, "GetCurrentMoniker failed: %08x\n", hres);
412
413 hres = IMoniker_GetDisplayName(mon, NULL, NULL, &url);
414 ok(hres == S_OK, "GetDisplayName failed: %08x\n", hres);
415
416 ok_(__FILE__,line)(!strcmp_wa(url, exurl), "unexpected url %s\n", wine_dbgstr_w(url));
417 ok_(__FILE__,line)(!lstrcmpW(url, doc_url), "url != doc_url\n");
418
419 CoTaskMemFree(url);
420 }else {
421 ok_(__FILE__,line)(hres == E_UNEXPECTED,
422 "GetCurrentMoniker failed: %08x, expected E_UNEXPECTED\n", hres);
423 ok_(__FILE__,line)(mon == (IMoniker*)0xdeadbeef, "mon=%p\n", mon);
424 ok_(__FILE__,line)(!strcmp_wa(doc_url, "about:blank"), "doc_url is not about:blank\n");
425 }
426
427 SysFreeString(doc_url);
428 IHTMLDocument_Release(doc);
429 if(mon && mon != (void*)0xdeadbeef)
430 IMoniker_Release(mon);
431 }
432
433 DEFINE_GUID(IID_External_unk,0x30510406,0x98B5,0x11CF,0xBB,0x82,0x00,0xAA,0x00,0xBD,0xCE,0x0B);
434
435 static HRESULT WINAPI External_QueryInterface(IDispatch *iface, REFIID riid, void **ppv)
436 {
437 *ppv = NULL;
438
439 if(IsEqualGUID(&IID_IUnknown, riid) || IsEqualGUID(&IID_IDispatch, riid)) {
440 *ppv = iface;
441 return S_OK;
442 }
443
444 if(IsEqualGUID(&IID_IProxyManager, riid))
445 return E_NOINTERFACE; /* TODO */
446 if(IsEqualGUID(&IID_IDispatchEx, riid))
447 return E_NOINTERFACE; /* TODO */
448 if(IsEqualGUID(&IID_External_unk, riid))
449 return E_NOINTERFACE; /* TODO */
450
451 if(!ignore_external_qi)
452 ok(0, "unexpected riid: %s\n", debugstr_guid(riid));
453 return E_NOINTERFACE;
454 }
455
456 static ULONG WINAPI Dispatch_AddRef(IDispatch *iface)
457 {
458 return 2;
459 }
460
461 static ULONG WINAPI Dispatch_Release(IDispatch *iface)
462 {
463 return 1;
464 }
465
466 static HRESULT WINAPI Dispatch_GetTypeInfoCount(IDispatch *iface, UINT *pctinfo)
467 {
468 ok(0, "unexpected call\n");
469 return E_NOTIMPL;
470 }
471
472 static HRESULT WINAPI Dispatch_GetTypeInfo(IDispatch *iface, UINT iTInfo, LCID lcid,
473 ITypeInfo **ppTInfo)
474 {
475 ok(0, "unexpected call\n");
476 return E_NOTIMPL;
477 }
478
479 static HRESULT WINAPI Dispatch_GetIDsOfNames(IDispatch *iface, REFIID riid, LPOLESTR *rgszNames,
480 UINT cNames, LCID lcid, DISPID *rgDispId)
481 {
482 ok(0, "unexpected call\n");
483 return E_NOTIMPL;
484 }
485
486 static HRESULT WINAPI External_Invoke(IDispatch *iface, DISPID dispIdMember, REFIID riid,
487 LCID lcid, WORD wFlags, DISPPARAMS *pDispParams, VARIANT *pVarResult,
488 EXCEPINFO *pExcepInfo, UINT *puArgErr)
489 {
490 ok(0, "unexpected call\n");
491 return E_NOTIMPL;
492 }
493
494 static const IDispatchVtbl ExternalVtbl = {
495 External_QueryInterface,
496 Dispatch_AddRef,
497 Dispatch_Release,
498 Dispatch_GetTypeInfoCount,
499 Dispatch_GetTypeInfo,
500 Dispatch_GetIDsOfNames,
501 External_Invoke
502 };
503
504 static IDispatch External = { &ExternalVtbl };
505
506 static HRESULT WINAPI Protocol_QueryInterface(IInternetProtocol *iface, REFIID riid, void **ppv)
507 {
508 if(IsEqualGUID(&IID_IUnknown, riid) || IsEqualGUID(&IID_IInternetProtocol, riid)) {
509 *ppv = iface;
510 return S_OK;
511 }
512
513 *ppv = NULL;
514 return E_NOINTERFACE;
515 }
516
517 static ULONG WINAPI Protocol_AddRef(IInternetProtocol *iface)
518 {
519 return 2;
520 }
521
522 static ULONG WINAPI Protocol_Release(IInternetProtocol *iface)
523 {
524 return 1;
525 }
526
527 static HRESULT WINAPI Protocol_Start(IInternetProtocol *iface, LPCWSTR szUrl,
528 IInternetProtocolSink *pOIProtSink, IInternetBindInfo *pOIBindInfo,
529 DWORD grfPI, HANDLE_PTR dwReserved)
530 {
531 BINDINFO bindinfo;
532 DWORD bindf = 0;
533 HRESULT hres;
534
535 static const WCHAR wszTextCss[] = {'t','e','x','t','/','c','s','s',0};
536 static const WCHAR empty_str = {0};
537
538 CHECK_EXPECT(Start);
539
540 ok(pOIProtSink != NULL, "pOIProtSink == NULL\n");
541 ok(pOIBindInfo != NULL, "pOIBindInfo == NULL\n");
542 ok(!grfPI, "grfPI = %x\n", grfPI);
543 ok(!dwReserved, "dwReserved = %lx\n", dwReserved);
544
545 memset(&bindinfo, 0, sizeof(bindinfo));
546 bindinfo.cbSize = sizeof(bindinfo);
547 hres = IInternetBindInfo_GetBindInfo(pOIBindInfo, &bindf, &bindinfo);
548 ok(hres == S_OK, "GetBindInfo failed: %08x\n", hres);
549 ok(bindf == (BINDF_FROMURLMON|BINDF_PULLDATA|BINDF_NEEDFILE|BINDF_ASYNCSTORAGE|BINDF_ASYNCHRONOUS),
550 "bindf = %x\n", bindf);
551
552 ok(bindinfo.cbSize == sizeof(bindinfo), "bindinfo.cbSize=%d\n", bindinfo.cbSize);
553 ok(bindinfo.szExtraInfo == NULL, "bindinfo.szExtraInfo=%p\n", bindinfo.szExtraInfo);
554 /* TODO: test stgmedData */
555 ok(bindinfo.grfBindInfoF == 0, "bindinfo.grfBinfInfoF=%08x\n", bindinfo.grfBindInfoF);
556 ok(bindinfo.dwBindVerb == 0, "bindinfo.dwBindVerb=%d\n", bindinfo.dwBindVerb);
557 ok(bindinfo.szCustomVerb == 0, "bindinfo.szCustomVerb=%p\n", bindinfo.szCustomVerb);
558 ok(bindinfo.cbstgmedData == 0, "bindinfo.cbstgmedData=%d\n", bindinfo.cbstgmedData);
559 ok(bindinfo.dwOptions == 0x80000 ||
560 bindinfo.dwOptions == 0x4080000, /* win2k3 */
561 "bindinfo.dwOptions=%x\n", bindinfo.dwOptions);
562 ok(bindinfo.dwOptionsFlags == 0, "bindinfo.dwOptionsFlags=%d\n", bindinfo.dwOptionsFlags);
563 /* TODO: test dwCodePage */
564 /* TODO: test securityAttributes */
565 ok(IsEqualGUID(&IID_NULL, &bindinfo.iid), "unexpected bindinfo.iid\n");
566 ok(bindinfo.pUnk == NULL, "bindinfo.pUnk=%p\n", bindinfo.pUnk);
567 ok(bindinfo.dwReserved == 0, "bindinfo.dwReserved=%d\n", bindinfo.dwReserved);
568
569 hres = IInternetProtocolSink_ReportProgress(pOIProtSink,
570 BINDSTATUS_CACHEFILENAMEAVAILABLE, &empty_str);
571 ok(hres == S_OK, "ReportProgress(BINDSTATUS_CACHEFILENAMEAVAILABLE) failed: %08x\n", hres);
572
573 hres = IInternetProtocolSink_ReportProgress(pOIProtSink,
574 BINDSTATUS_VERIFIEDMIMETYPEAVAILABLE, wszTextCss);
575 ok(hres == S_OK,
576 "ReportProgress(BINDSTATUS_VERIFIEDMIMETYPEAVAILABLE) failed: %08x\n", hres);
577
578 hres = IInternetProtocolSink_ReportData(pOIProtSink,
579 BSCF_FIRSTDATANOTIFICATION | BSCF_LASTDATANOTIFICATION, 13, 13);
580 ok(hres == S_OK, "ReportData failed: %08x\n", hres);
581
582 hres = IInternetProtocolSink_ReportResult(pOIProtSink, S_OK, 0, NULL);
583 ok(hres == S_OK, "ReportResult failed: %08x\n", hres);
584
585 return S_OK;
586 }
587
588 static HRESULT WINAPI Protocol_Continue(IInternetProtocol *iface,
589 PROTOCOLDATA *pProtocolData)
590 {
591 ok(0, "unexpected call\n");
592 return E_NOTIMPL;
593 }
594
595 static HRESULT WINAPI Protocol_Abort(IInternetProtocol *iface, HRESULT hrReason,
596 DWORD dwOptions)
597 {
598 ok(0, "unexpected call\n");
599 return E_NOTIMPL;
600 }
601
602 static HRESULT WINAPI Protocol_Terminate(IInternetProtocol *iface, DWORD dwOptions)
603 {
604 CHECK_EXPECT(Terminate);
605 return S_OK;
606 }
607
608 static HRESULT WINAPI Protocol_Suspend(IInternetProtocol *iface)
609 {
610 ok(0, "unexpected call\n");
611 return E_NOTIMPL;
612 }
613
614 static HRESULT WINAPI Protocol_Resume(IInternetProtocol *iface)
615 {
616 ok(0, "unexpected call\n");
617 return E_NOTIMPL;
618 }
619
620 static HRESULT WINAPI Protocol_Read(IInternetProtocol *iface, void *pv,
621 ULONG cb, ULONG *pcbRead)
622 {
623 CHECK_EXPECT2(Protocol_Read);
624
625 ok(pv != NULL, "pv == NULL\n");
626 ok(cb > sizeof(css_data), "cb < sizeof(css_data)\n");
627 ok(pcbRead != NULL, "pcbRead == NULL\n");
628 ok(!*pcbRead, "*pcbRead=%d\n", *pcbRead);
629
630 if(protocol_read)
631 return S_FALSE;
632
633 protocol_read += *pcbRead = sizeof(css_data)-1;
634 memcpy(pv, css_data, sizeof(css_data)-1);
635 return S_OK;
636 }
637
638 static HRESULT WINAPI Protocol_Seek(IInternetProtocol *iface,
639 LARGE_INTEGER dlibMove, DWORD dwOrigin, ULARGE_INTEGER *plibNewPosition)
640 {
641 ok(0, "unexpected call\n");
642 return E_NOTIMPL;
643 }
644
645 static HRESULT WINAPI Protocol_LockRequest(IInternetProtocol *iface, DWORD dwOptions)
646 {
647 CHECK_EXPECT(LockRequest);
648 return S_OK;
649 }
650
651 static HRESULT WINAPI Protocol_UnlockRequest(IInternetProtocol *iface)
652 {
653 CHECK_EXPECT(UnlockRequest);
654 return S_OK;
655 }
656
657 static const IInternetProtocolVtbl ProtocolVtbl = {
658 Protocol_QueryInterface,
659 Protocol_AddRef,
660 Protocol_Release,
661 Protocol_Start,
662 Protocol_Continue,
663 Protocol_Abort,
664 Protocol_Terminate,
665 Protocol_Suspend,
666 Protocol_Resume,
667 Protocol_Read,
668 Protocol_Seek,
669 Protocol_LockRequest,
670 Protocol_UnlockRequest
671 };
672
673 static IInternetProtocol Protocol = { &ProtocolVtbl };
674
675 static HRESULT WINAPI ClassFactory_QueryInterface(IClassFactory *iface, REFIID riid, void **ppv)
676 {
677 if(!IsEqualGUID(&IID_IInternetProtocolInfo, riid))
678 ok(0, "unexpected call\n");
679 return E_NOINTERFACE;
680 }
681
682 static ULONG WINAPI ClassFactory_AddRef(IClassFactory *iface)
683 {
684 return 2;
685 }
686
687 static ULONG WINAPI ClassFactory_Release(IClassFactory *iface)
688 {
689 return 1;
690 }
691
692 static HRESULT WINAPI ClassFactory_CreateInstance(IClassFactory *iface, IUnknown *pOuter,
693 REFIID riid, void **ppv)
694 {
695 if(IsEqualGUID(&IID_IInternetProtocolInfo, riid))
696 return E_NOINTERFACE;
697
698 CHECK_EXPECT(CreateInstance);
699 ok(ppv != NULL, "ppv == NULL\n");
700
701 *ppv = &Protocol;
702 return S_OK;
703 }
704
705 static HRESULT WINAPI ClassFactory_LockServer(IClassFactory *iface, BOOL dolock)
706 {
707 ok(0, "unexpected call\n");
708 return S_OK;
709 }
710
711 static const IClassFactoryVtbl ClassFactoryVtbl = {
712 ClassFactory_QueryInterface,
713 ClassFactory_AddRef,
714 ClassFactory_Release,
715 ClassFactory_CreateInstance,
716 ClassFactory_LockServer
717 };
718
719 static IClassFactory ClassFactory = { &ClassFactoryVtbl };
720
721 static HRESULT WINAPI HlinkFrame_QueryInterface(IHlinkFrame *iface, REFIID riid, void **ppv)
722 {
723 ok(0, "unexpected call\n");
724 return E_NOTIMPL;
725 }
726
727 static ULONG WINAPI HlinkFrame_AddRef(IHlinkFrame *iface)
728 {
729 return 2;
730 }
731
732 static ULONG WINAPI HlinkFrame_Release(IHlinkFrame *iface)
733 {
734 return 1;
735 }
736
737 static HRESULT WINAPI HlinkFrame_SetBrowseContext(IHlinkFrame *iface,
738 IHlinkBrowseContext *pihlbc)
739 {
740 ok(0, "unexpected call\n");
741 return E_NOTIMPL;
742 }
743
744 static HRESULT WINAPI HlinkFrame_GetBrowseContext(IHlinkFrame *iface,
745 IHlinkBrowseContext **ppihlbc)
746 {
747 ok(0, "unexpected call\n");
748 return E_NOTIMPL;
749 }
750
751 static HRESULT WINAPI HlinkFrame_Navigate(IHlinkFrame *iface, DWORD grfHLNF, LPBC pbc,
752 IBindStatusCallback *pibsc, IHlink *pihlNavigate)
753 {
754 HRESULT hres;
755
756 CHECK_EXPECT(Navigate);
757
758 ok(grfHLNF == 0, "grfHLNF=%d, expected 0\n", grfHLNF);
759 ok(pbc != NULL, "pbc == NULL\n");
760 ok(pibsc != NULL, "pubsc == NULL\n");
761 ok(pihlNavigate != NULL, "puhlNavigate == NULL\n");
762
763 if(pihlNavigate) {
764 LPWSTR frame_name = (LPWSTR)0xdeadbeef;
765 LPWSTR location = (LPWSTR)0xdeadbeef;
766 IHlinkSite *site;
767 IMoniker *mon = NULL;
768 DWORD site_data = 0xdeadbeef;
769
770 hres = IHlink_GetTargetFrameName(pihlNavigate, &frame_name);
771 ok(hres == S_FALSE, "GetTargetFrameName failed: %08x\n", hres);
772 ok(frame_name == NULL, "frame_name = %p\n", frame_name);
773
774 hres = IHlink_GetMonikerReference(pihlNavigate, 1, &mon, &location);
775 ok(hres == S_OK, "GetMonikerReference failed: %08x\n", hres);
776 ok(location == NULL, "location = %p\n", location);
777 ok(mon != NULL, "mon == NULL\n");
778
779 hres = IMoniker_GetDisplayName(mon, NULL, NULL, &location);
780 ok(hres == S_OK, "GetDisplayName failed: %08x\n", hres);
781 ok(!strcmp_wa(location, nav_url), "unexpected display name %s, expected %s\n", wine_dbgstr_w(location), nav_url);
782 CoTaskMemFree(location);
783 IMoniker_Release(mon);
784
785 hres = IHlink_GetHlinkSite(pihlNavigate, &site, &site_data);
786 ok(hres == S_OK, "GetHlinkSite failed: %08x\n", hres);
787 ok(site == NULL, "site = %p\n, expected NULL\n", site);
788 ok(site_data == 0xdeadbeef, "site_data = %x\n", site_data);
789 }
790
791 return S_OK;
792 }
793
794 static HRESULT WINAPI HlinkFrame_OnNavigate(IHlinkFrame *iface, DWORD grfHLNF,
795 IMoniker *pimkTarget, LPCWSTR pwzLocation, LPCWSTR pwzFriendlyName, DWORD dwreserved)
796 {
797 ok(0, "unexpected call\n");
798 return E_NOTIMPL;
799 }
800
801 static HRESULT WINAPI HlinkFrame_UpdateHlink(IHlinkFrame *iface, ULONG uHLID,
802 IMoniker *pimkTarget, LPCWSTR pwzLocation, LPCWSTR pwzFriendlyName)
803 {
804 ok(0, "unexpected call\n");
805 return E_NOTIMPL;
806 }
807
808 static const IHlinkFrameVtbl HlinkFrameVtbl = {
809 HlinkFrame_QueryInterface,
810 HlinkFrame_AddRef,
811 HlinkFrame_Release,
812 HlinkFrame_SetBrowseContext,
813 HlinkFrame_GetBrowseContext,
814 HlinkFrame_Navigate,
815 HlinkFrame_OnNavigate,
816 HlinkFrame_UpdateHlink
817 };
818
819 static IHlinkFrame HlinkFrame = { &HlinkFrameVtbl };
820
821 static HRESULT WINAPI NewWindowManager_QueryInterface(INewWindowManager *iface, REFIID riid, void **ppv)
822 {
823 ok(0, "unexpected call\n");
824 return E_NOINTERFACE;
825 }
826
827 static ULONG WINAPI NewWindowManager_AddRef(INewWindowManager *iface)
828 {
829 return 2;
830 }
831
832 static ULONG WINAPI NewWindowManager_Release(INewWindowManager *iface)
833 {
834 return 1;
835 }
836
837 static HRESULT WINAPI NewWindowManager_EvaluateNewWindow(INewWindowManager *iface, LPCWSTR pszUrl,
838 LPCWSTR pszName, LPCWSTR pszUrlContext, LPCWSTR pszFeatures, BOOL fReplace, DWORD dwFlags,
839 DWORD dwUserActionTime)
840 {
841 CHECK_EXPECT(EvaluateNewWindow);
842
843 ok(!strcmp_wa(pszUrl, "about:blank"), "pszUrl = %s\n", wine_dbgstr_w(pszUrl));
844 ok(!strcmp_wa(pszName, "test"), "pszName = %s\n", wine_dbgstr_w(pszName));
845 ok(!strcmp_wa(pszUrlContext, "about:replace"), "pszUrlContext = %s\n", wine_dbgstr_w(pszUrlContext));
846 ok(!pszFeatures, "pszFeatures = %s\n", wine_dbgstr_w(pszFeatures));
847 ok(!fReplace, "fReplace = %x\n", fReplace);
848 ok(dwFlags == (allow_new_window ? 0 : NWMF_FIRST), "dwFlags = %x\n", dwFlags);
849 ok(!dwUserActionTime, "dwUserActionime = %d\n", dwUserActionTime);
850
851 return allow_new_window ? S_OK : E_FAIL;
852 }
853
854 static const INewWindowManagerVtbl NewWindowManagerVtbl = {
855 NewWindowManager_QueryInterface,
856 NewWindowManager_AddRef,
857 NewWindowManager_Release,
858 NewWindowManager_EvaluateNewWindow
859 };
860
861 static INewWindowManager NewWindowManager = { &NewWindowManagerVtbl };
862
863 static HRESULT WINAPI PropertyNotifySink_QueryInterface(IPropertyNotifySink *iface,
864 REFIID riid, void**ppv)
865 {
866 if(IsEqualGUID(&IID_IPropertyNotifySink, riid)) {
867 *ppv = iface;
868 return S_OK;
869 }
870
871 ok(0, "unexpected call\n");
872 return E_NOINTERFACE;
873 }
874
875 static ULONG WINAPI PropertyNotifySink_AddRef(IPropertyNotifySink *iface)
876 {
877 return 2;
878 }
879
880 static ULONG WINAPI PropertyNotifySink_Release(IPropertyNotifySink *iface)
881 {
882 return 1;
883 }
884
885 static HRESULT WINAPI PropertyNotifySink_OnChanged(IPropertyNotifySink *iface, DISPID dispID)
886 {
887 switch(dispID) {
888 case DISPID_READYSTATE:
889 CHECK_EXPECT2(OnChanged_READYSTATE);
890
891 if(!readystate_set_interactive)
892 test_MSHTML_QueryStatus(NULL, OLECMDF_SUPPORTED
893 | (editmode && (load_state == LD_INTERACTIVE || load_state == LD_COMPLETE)
894 ? OLECMDF_ENABLED : 0));
895
896 if(readystate_set_loading) {
897 readystate_set_loading = FALSE;
898 load_state = LD_LOADING;
899 }
900 if(!editmode || load_state != LD_LOADING || !called_Exec_Explorer_69)
901 test_readyState(NULL);
902 return S_OK;
903 case 1005:
904 CHECK_EXPECT(OnChanged_1005);
905 if(!editmode)
906 test_readyState(NULL);
907 readystate_set_interactive = (load_state != LD_INTERACTIVE);
908 return S_OK;
909 case 1012:
910 CHECK_EXPECT(OnChanged_1012);
911 return S_OK;
912 case 1030:
913 case 3000022:
914 case 3000023:
915 case 3000024:
916 case 3000025:
917 case 3000028:
918 case 3000029:
919 case 3000030:
920 case 3000031:
921 /* TODO */
922 return S_OK;
923 }
924
925 ok(0, "unexpected id %d\n", dispID);
926 return E_NOTIMPL;
927 }
928
929 static HRESULT WINAPI PropertyNotifySink_OnRequestEdit(IPropertyNotifySink *iface, DISPID dispID)
930 {
931 ok(0, "unexpected call\n");
932 return E_NOTIMPL;
933 }
934
935 static IPropertyNotifySinkVtbl PropertyNotifySinkVtbl = {
936 PropertyNotifySink_QueryInterface,
937 PropertyNotifySink_AddRef,
938 PropertyNotifySink_Release,
939 PropertyNotifySink_OnChanged,
940 PropertyNotifySink_OnRequestEdit
941 };
942
943 static IPropertyNotifySink PropertyNotifySink = { &PropertyNotifySinkVtbl };
944
945 static HRESULT WINAPI Stream_QueryInterface(IStream *iface, REFIID riid, void **ppv)
946 {
947 if(IsEqualGUID(&IID_IUnknown, riid) || IsEqualGUID(&IID_ISequentialStream, riid) || IsEqualGUID(&IID_IStream, riid)) {
948 *ppv = iface;
949 return S_OK;
950 }
951
952 ok(0, "unexpected call %s\n", debugstr_guid(riid));
953 *ppv = NULL;
954 return E_NOINTERFACE;
955 }
956
957 static ULONG WINAPI Stream_AddRef(IStream *iface)
958 {
959 return 2;
960 }
961
962 static ULONG WINAPI Stream_Release(IStream *iface)
963 {
964 return 1;
965 }
966
967 static HRESULT WINAPI Stream_Read(IStream *iface, void *pv,
968 ULONG cb, ULONG *pcbRead)
969 {
970 CHECK_EXPECT2(Read);
971 ok(pv != NULL, "pv == NULL\n");
972 ok(cb > sizeof(html_page), "cb = %d\n", cb);
973 ok(pcbRead != NULL, "pcbRead == NULL\n");
974 ok(!*pcbRead, "*pcbRead = %d\n", *pcbRead);
975
976 if(stream_read)
977 return S_FALSE;
978
979 memcpy(pv, html_page, sizeof(html_page)-1);
980 stream_read += *pcbRead = sizeof(html_page)-1;
981 return S_OK;
982 }
983
984 static HRESULT WINAPI Stream_Write(IStream *iface, const void *pv,
985 ULONG cb, ULONG *pcbWritten)
986 {
987 ok(0, "unexpected call\n");
988 return E_NOTIMPL;
989 }
990
991 static HRESULT WINAPI Stream_Seek(IStream *iface, LARGE_INTEGER dlibMove,
992 DWORD dwOrigin, ULARGE_INTEGER *plibNewPosition)
993 {
994 ok(0, "unexpected call\n");
995 return E_NOTIMPL;
996 }
997
998 static HRESULT WINAPI Stream_SetSize(IStream *iface, ULARGE_INTEGER libNewSize)
999 {
1000 ok(0, "unexpected call\n");
1001 return E_NOTIMPL;
1002 }
1003
1004 static HRESULT WINAPI Stream_CopyTo(IStream *iface, IStream *pstm,
1005 ULARGE_INTEGER cb, ULARGE_INTEGER *pcbRead, ULARGE_INTEGER *pcbWritten)
1006 {
1007 ok(0, "unexpected call\n");
1008 return E_NOTIMPL;
1009 }
1010
1011 static HRESULT WINAPI Stream_Commit(IStream *iface, DWORD grfCommitFlags)
1012 {
1013 ok(0, "unexpected call\n");
1014 return E_NOTIMPL;
1015 }
1016
1017 static HRESULT WINAPI Stream_Revert(IStream *iface)
1018 {
1019 ok(0, "unexpected call\n");
1020 return E_NOTIMPL;
1021 }
1022
1023 static HRESULT WINAPI Stream_LockRegion(IStream *iface, ULARGE_INTEGER libOffset,
1024 ULARGE_INTEGER cb, DWORD dwLockType)
1025 {
1026 ok(0, "unexpected call\n");
1027 return E_NOTIMPL;
1028 }
1029
1030 static HRESULT WINAPI Stream_UnlockRegion(IStream *iface,
1031 ULARGE_INTEGER libOffset, ULARGE_INTEGER cb, DWORD dwLockType)
1032 {
1033 ok(0, "unexpected call\n");
1034 return E_NOTIMPL;
1035 }
1036
1037 static HRESULT WINAPI Stream_Stat(IStream *iface, STATSTG *pstatstg,
1038 DWORD dwStatFlag)
1039 {
1040 ok(0, "unexpected call\n");
1041 return E_NOTIMPL;
1042 }
1043
1044 static HRESULT WINAPI Stream_Clone(IStream *iface, IStream **ppstm)
1045 {
1046 ok(0, "unexpected call\n");
1047 return E_NOTIMPL;
1048 }
1049
1050 static const IStreamVtbl StreamVtbl = {
1051 Stream_QueryInterface,
1052 Stream_AddRef,
1053 Stream_Release,
1054 Stream_Read,
1055 Stream_Write,
1056 Stream_Seek,
1057 Stream_SetSize,
1058 Stream_CopyTo,
1059 Stream_Commit,
1060 Stream_Revert,
1061 Stream_LockRegion,
1062 Stream_UnlockRegion,
1063 Stream_Stat,
1064 Stream_Clone
1065 };
1066
1067 static IStream Stream = { &StreamVtbl };
1068
1069 static HRESULT WINAPI WinInetHttpInfo_QueryInterface(
1070 IWinInetHttpInfo* This,
1071 REFIID riid,
1072 void **ppvObject)
1073 {
1074 ok(0, "unexpected call\n");
1075 return E_NOINTERFACE;
1076 }
1077
1078 static ULONG WINAPI WinInetHttpInfo_AddRef(
1079 IWinInetHttpInfo* This)
1080 {
1081 return 2;
1082 }
1083
1084 static ULONG WINAPI WinInetHttpInfo_Release(
1085 IWinInetHttpInfo* This)
1086 {
1087 return 1;
1088 }
1089
1090 static HRESULT WINAPI WinInetHttpInfo_QueryOption(
1091 IWinInetHttpInfo* This,
1092 DWORD dwOption,
1093 LPVOID pBuffer,
1094 DWORD *pcbBuf)
1095 {
1096 return E_NOTIMPL; /* TODO */
1097 }
1098
1099 static HRESULT WINAPI WinInetHttpInfo_QueryInfo(
1100 IWinInetHttpInfo* This,
1101 DWORD dwOption,
1102 LPVOID pBuffer,
1103 DWORD *pcbBuf,
1104 DWORD *pdwFlags,
1105 DWORD *pdwReserved)
1106 {
1107 ok(pdwReserved == NULL, "pdwReserved != NULL\n");
1108
1109 if(dwOption == (HTTP_QUERY_STATUS_CODE|HTTP_QUERY_FLAG_NUMBER)) {
1110 ok(pBuffer != NULL, "pBuffer == NULL\n");
1111 ok(*pcbBuf == sizeof(DWORD), "*pcbBuf = %d\n", *pcbBuf);
1112 ok(pdwFlags == NULL, "*pdwFlags != NULL\n");
1113 *((DWORD*)pBuffer) = status_code;
1114 return S_OK;
1115 }
1116
1117 return E_NOTIMPL; /* TODO */
1118 }
1119
1120 static const IWinInetHttpInfoVtbl WinInetHttpInfoVtbl = {
1121 WinInetHttpInfo_QueryInterface,
1122 WinInetHttpInfo_AddRef,
1123 WinInetHttpInfo_Release,
1124 WinInetHttpInfo_QueryOption,
1125 WinInetHttpInfo_QueryInfo
1126 };
1127
1128 static IWinInetHttpInfo WinInetHttpInfo = { &WinInetHttpInfoVtbl };
1129
1130 static HRESULT WINAPI Binding_QueryInterface(IBinding *iface, REFIID riid, void **ppv)
1131 {
1132 if(IsEqualGUID(&IID_IUnknown, riid)) {
1133 *ppv = iface;
1134 return S_OK;
1135 }
1136
1137 if(IsEqualGUID(&IID_IWinInetInfo, riid) || IsEqualGUID(&IID_IWinInetHttpInfo, riid)) {
1138 *ppv = &WinInetHttpInfo;
1139 return S_OK;
1140 }
1141
1142 ok(0, "unexpected call\n");
1143 return E_NOINTERFACE;
1144 }
1145
1146 static ULONG WINAPI Binding_AddRef(IBinding *iface)
1147 {
1148 return 2;
1149 }
1150
1151 static ULONG WINAPI Binding_Release(IBinding *iface)
1152 {
1153 return 1;
1154 }
1155
1156 static HRESULT WINAPI Binding_Abort(IBinding *iface)
1157 {
1158 CHECK_EXPECT(Abort);
1159 if(asynchronous_binding)
1160 PeekMessage(NULL, container_hwnd, WM_CONTINUE_BINDING, WM_CONTINUE_BINDING, PM_REMOVE);
1161 return S_OK;
1162 }
1163
1164 static HRESULT WINAPI Binding_Suspend(IBinding *iface)
1165 {
1166 ok(0, "unexpected call\n");
1167 return E_NOTIMPL;
1168 }
1169
1170 static HRESULT WINAPI Binding_Resume(IBinding *iface)
1171 {
1172 ok(0, "unexpected call\n");
1173 return E_NOTIMPL;
1174 }
1175
1176 static HRESULT WINAPI Binding_SetPriority(IBinding *iface, LONG nPriority)
1177 {
1178 ok(0, "unexpected call\n");
1179 return E_NOTIMPL;
1180 }
1181
1182 static HRESULT WINAPI Binding_GetPriority(IBinding *iface, LONG *pnPriority)
1183 {
1184 ok(0, "unexpected call\n");
1185 return E_NOTIMPL;
1186 }
1187
1188 static HRESULT WINAPI Binding_GetBindResult(IBinding *iface, CLSID *pclsidProtocol,
1189 DWORD *pdwResult, LPOLESTR *pszResult, DWORD *pdwReserved)
1190 {
1191 CHECK_EXPECT(GetBindResult);
1192 return E_NOTIMPL;
1193 }
1194
1195 static const IBindingVtbl BindingVtbl = {
1196 Binding_QueryInterface,
1197 Binding_AddRef,
1198 Binding_Release,
1199 Binding_Abort,
1200 Binding_Suspend,
1201 Binding_Resume,
1202 Binding_SetPriority,
1203 Binding_GetPriority,
1204 Binding_GetBindResult
1205 };
1206
1207 static IBinding Binding = { &BindingVtbl };
1208
1209 DEFINE_GUID(IID_IMoniker_unk,0xA158A630,0xED6F,0x45FB,0xB9,0x87,0xF6,0x86,0x76,0xF5,0x77,0x52);
1210 DEFINE_GUID(IID_IMoniker_unk2, 0x79EAC9D3,0xBAF9,0x11CE,0x8C,0x82,0x00,0xAA,0x00,0x4B,0xA9,0x0B);
1211
1212 static HRESULT WINAPI Moniker_QueryInterface(IMoniker *iface, REFIID riid, void **ppv)
1213 {
1214 *ppv = NULL;
1215
1216 if(IsEqualGUID(&IID_IMoniker_unk, riid))
1217 return E_NOINTERFACE; /* TODO */
1218 if(IsEqualGUID(&IID_IMoniker_unk2, riid))
1219 return E_NOINTERFACE; /* TODO */
1220
1221 ok(0, "unexpected riid: %s\n", debugstr_guid(riid));
1222 return E_NOINTERFACE;
1223 }
1224
1225 static ULONG WINAPI Moniker_AddRef(IMoniker *iface)
1226 {
1227 return 2;
1228 }
1229
1230 static ULONG WINAPI Moniker_Release(IMoniker *iface)
1231 {
1232 return 1;
1233 }
1234
1235 static HRESULT WINAPI Moniker_GetClassID(IMoniker *iface, CLSID *pClassID)
1236 {
1237 CHECK_EXPECT(GetClassID);
1238 ok(IsEqualGUID(pClassID, &IID_NULL), "pClassID = %s\n", debugstr_guid(pClassID));
1239 return E_FAIL;
1240 }
1241
1242 static HRESULT WINAPI Moniker_IsDirty(IMoniker *iface)
1243 {
1244 ok(0, "unexpected call\n");
1245 return E_NOTIMPL;
1246 }
1247
1248 static HRESULT WINAPI Moniker_Load(IMoniker *iface, IStream *pStm)
1249 {
1250 ok(0, "unexpected call\n");
1251 return E_NOTIMPL;
1252 }
1253
1254 static HRESULT WINAPI Moniker_Save(IMoniker *iface, IStream *pStm, BOOL fClearDirty)
1255 {
1256 ok(0, "unexpected call\n");
1257 return E_NOTIMPL;
1258 }
1259
1260 static HRESULT WINAPI Moniker_GetSizeMax(IMoniker *iface, ULARGE_INTEGER *pcbSize)
1261 {
1262 ok(0, "unexpected call\n");
1263 return E_NOTIMPL;
1264 }
1265
1266 static HRESULT WINAPI Moniker_BindToObject(IMoniker *iface, IBindCtx *pcb, IMoniker *pmkToLeft,
1267 REFIID riidResult, void **ppvResult)
1268 {
1269 ok(0, "unexpected call\n");
1270 return E_NOTIMPL;
1271 }
1272
1273 static void continue_binding(IBindStatusCallback *callback)
1274 {
1275 FORMATETC formatetc = {0xc02d, NULL, 1, -1, TYMED_ISTREAM};
1276 STGMEDIUM stgmedium;
1277 HRESULT hres;
1278
1279 static const WCHAR wszTextHtml[] = {'t','e','x','t','/','h','t','m','l',0};
1280
1281 hres = IBindStatusCallback_OnProgress(callback, 0, 0, BINDSTATUS_MIMETYPEAVAILABLE,
1282 wszTextHtml);
1283 ok(hres == S_OK, "OnProgress(BINDSTATUS_MIMETYPEAVAILABLE) failed: %08x\n", hres);
1284
1285 hres = IBindStatusCallback_OnProgress(callback, sizeof(html_page)-1, sizeof(html_page)-1,
1286 BINDSTATUS_BEGINDOWNLOADDATA, doc_url);
1287 ok(hres == S_OK, "OnProgress(BINDSTATUS_BEGINDOWNLOADDATA) failed: %08x\n", hres);
1288 if(status_code != HTTP_STATUS_OK) {
1289 CHECK_CALLED_BROKEN(IsErrorUrl);
1290 SET_EXPECT(IsErrorUrl);
1291 }
1292
1293 SET_EXPECT(Read);
1294 stgmedium.tymed = TYMED_ISTREAM;
1295 U(stgmedium).pstm = &Stream;
1296 stgmedium.pUnkForRelease = (IUnknown*)&Moniker;
1297 hres = IBindStatusCallback_OnDataAvailable(callback,
1298 BSCF_FIRSTDATANOTIFICATION|BSCF_LASTDATANOTIFICATION,
1299 sizeof(html_page)-1, &formatetc, &stgmedium);
1300 ok(hres == S_OK, "OnDataAvailable failed: %08x\n", hres);
1301 CHECK_CALLED(Read);
1302
1303 hres = IBindStatusCallback_OnProgress(callback, sizeof(html_page)-1, sizeof(html_page)-1,
1304 BINDSTATUS_ENDDOWNLOADDATA, NULL);
1305 ok(hres == S_OK, "OnProgress(BINDSTATUS_ENDDOWNLOADDATA) failed: %08x\n", hres);
1306
1307 SET_EXPECT(GetBindResult);
1308 hres = IBindStatusCallback_OnStopBinding(callback, S_OK, NULL);
1309 ok(hres == S_OK, "OnStopBinding failed: %08x\n", hres);
1310 CLEAR_CALLED(GetBindResult); /* IE7 */
1311
1312 IBindStatusCallback_Release(callback);
1313 }
1314
1315 static HRESULT WINAPI Moniker_BindToStorage(IMoniker *iface, IBindCtx *pbc, IMoniker *pmkToLeft,
1316 REFIID riid, void **ppv)
1317 {
1318 IBindStatusCallback *callback = NULL;
1319 BINDINFO bindinfo;
1320 DWORD bindf;
1321 HRESULT hres;
1322
1323 static OLECHAR BSCBHolder[] = { '_','B','S','C','B','_','H','o','l','d','e','r','_',0 };
1324
1325 CHECK_EXPECT(BindToStorage);
1326
1327 load_state = LD_LOADING;
1328
1329 ok(pbc != NULL, "pbc == NULL\n");
1330 ok(pmkToLeft == NULL, "pmkToLeft=%p\n", pmkToLeft);
1331 ok(IsEqualGUID(&IID_IStream, riid), "unexpected riid\n");
1332 ok(ppv != NULL, "ppv == NULL\n");
1333 ok(*ppv == NULL, "*ppv=%p\n", *ppv);
1334
1335 hres = IBindCtx_GetObjectParam(pbc, BSCBHolder, (IUnknown**)&callback);
1336 ok(hres == S_OK, "GetObjectParam failed: %08x\n", hres);
1337 ok(callback != NULL, "callback == NULL\n");
1338
1339 memset(&bindinfo, 0xf0, sizeof(bindinfo));
1340 bindinfo.cbSize = sizeof(bindinfo);
1341
1342 hres = IBindStatusCallback_GetBindInfo(callback, &bindf, &bindinfo);
1343 ok(hres == S_OK, "GetBindInfo failed: %08x\n", hres);
1344 ok((bindf & ~BINDF_HYPERLINK /* IE9 */) == (BINDF_PULLDATA|BINDF_ASYNCSTORAGE|BINDF_ASYNCHRONOUS), "bindf = %08x\n", bindf);
1345 ok(bindinfo.cbSize == sizeof(bindinfo), "bindinfo.cbSize=%d\n", bindinfo.cbSize);
1346 ok(bindinfo.szExtraInfo == NULL, "bindinfo.szExtraInfo=%p\n", bindinfo.szExtraInfo);
1347 /* TODO: test stgmedData */
1348 ok(bindinfo.grfBindInfoF == 0, "bindinfo.grfBinfInfoF=%08x\n", bindinfo.grfBindInfoF);
1349 ok(bindinfo.dwBindVerb == 0, "bindinfo.dwBindVerb=%d\n", bindinfo.dwBindVerb);
1350 ok(bindinfo.szCustomVerb == 0, "bindinfo.szCustomVerb=%p\n", bindinfo.szCustomVerb);
1351 ok(bindinfo.cbstgmedData == 0, "bindinfo.cbstgmedData=%d\n", bindinfo.cbstgmedData);
1352 ok(bindinfo.dwOptions == 0x80000 || bindinfo.dwOptions == 0x4080000,
1353 "bindinfo.dwOptions=%x\n", bindinfo.dwOptions);
1354 ok(bindinfo.dwOptionsFlags == 0, "bindinfo.dwOptionsFlags=%d\n", bindinfo.dwOptionsFlags);
1355 /* TODO: test dwCodePage */
1356 /* TODO: test securityAttributes */
1357 ok(IsEqualGUID(&IID_NULL, &bindinfo.iid), "unexpected bindinfo.iid\n");
1358 ok(bindinfo.pUnk == NULL, "bindinfo.pUnk=%p\n", bindinfo.pUnk);
1359 ok(bindinfo.dwReserved == 0, "bindinfo.dwReserved=%d\n", bindinfo.dwReserved);
1360
1361 hres = IBindStatusCallback_OnStartBinding(callback, 0, &Binding);
1362 ok(hres == S_OK, "OnStartBinding failed: %08x\n", hres);
1363
1364 if(asynchronous_binding) {
1365 PostMessageW(container_hwnd, WM_CONTINUE_BINDING, (WPARAM)callback, 0);
1366 return MK_S_ASYNCHRONOUS;
1367 }
1368
1369 continue_binding(callback);
1370 return S_OK;
1371 }
1372
1373 static HRESULT WINAPI Moniker_Reduce(IMoniker *iface, IBindCtx *pbc, DWORD dwReduceHowFar,
1374 IMoniker **ppmkToLeft, IMoniker **ppmkReduced)
1375 {
1376 ok(0, "unexpected call\n");
1377 return E_NOTIMPL;
1378 }
1379
1380 static HRESULT WINAPI Moniker_ComposeWith(IMoniker *iface, IMoniker *pmkRight,
1381 BOOL fOnlyIfNotGeneric, IMoniker **ppnkComposite)
1382 {
1383 ok(0, "unexpected call\n");
1384 return E_NOTIMPL;
1385 }
1386
1387 static HRESULT WINAPI Moniker_Enum(IMoniker *iface, BOOL fForwrd, IEnumMoniker **ppenumMoniker)
1388 {
1389 ok(0, "unexpected call\n");
1390 return E_NOTIMPL;
1391 }
1392
1393 static HRESULT WINAPI Moniker_IsEqual(IMoniker *iface, IMoniker *pmkOtherMoniker)
1394 {
1395 ok(0, "unexpected call\n");
1396 return E_NOTIMPL;
1397 }
1398
1399 static HRESULT WINAPI Moniker_Hash(IMoniker *iface, DWORD *pdwHash)
1400 {
1401 ok(0, "unexpected call\n");
1402 return E_NOTIMPL;
1403 }
1404
1405 static HRESULT WINAPI Moniker_IsRunning(IMoniker *iface, IBindCtx *pbc, IMoniker *pmkToLeft,
1406 IMoniker *pmkNewlyRunning)
1407 {
1408 ok(0, "unexpected call\n");
1409 return E_NOTIMPL;
1410 }
1411
1412 static HRESULT WINAPI Moniker_GetTimeOfLastChange(IMoniker *iface, IBindCtx *pbc,
1413 IMoniker *pmkToLeft, FILETIME *pFileTime)
1414 {
1415 ok(0, "unexpected call\n");
1416 return E_NOTIMPL;
1417 }
1418
1419 static HRESULT WINAPI Moniker_Inverse(IMoniker *iface, IMoniker **ppmk)
1420 {
1421 ok(0, "unexpected call\n");
1422 return E_NOTIMPL;
1423 }
1424
1425 static HRESULT WINAPI Moniker_CommonPrefixWith(IMoniker *iface, IMoniker *pmkOther,
1426 IMoniker **ppmkPrefix)
1427 {
1428 ok(0, "unexpected call\n");
1429 return E_NOTIMPL;
1430 }
1431
1432 static HRESULT WINAPI Moniker_RelativePathTo(IMoniker *iface, IMoniker *pmkOther,
1433 IMoniker **pmkRelPath)
1434 {
1435 ok(0, "unexpected call\n");
1436 return E_NOTIMPL;
1437 }
1438
1439 static HRESULT WINAPI Moniker_GetDisplayName(IMoniker *iface, IBindCtx *pbc,
1440 IMoniker *pmkToLeft, LPOLESTR *ppszDisplayName)
1441 {
1442 CHECK_EXPECT2(GetDisplayName);
1443
1444 /* ok(pbc != NULL, "pbc == NULL\n"); */
1445 ok(pmkToLeft == NULL, "pmkToLeft=%p\n", pmkToLeft);
1446 ok(ppszDisplayName != NULL, "ppszDisplayName == NULL\n");
1447
1448 *ppszDisplayName = CoTaskMemAlloc(sizeof(doc_url));
1449 memcpy(*ppszDisplayName, doc_url, sizeof(doc_url));
1450
1451 return S_OK;
1452 }
1453
1454 static HRESULT WINAPI Moniker_ParseDisplayName(IMoniker *iface, IBindCtx *pbc,
1455 IMoniker *pmkToLeft, LPOLESTR pszDisplayName, ULONG *pchEaten, IMoniker **ppmkOut)
1456 {
1457 ok(0, "unexpected call\n");
1458 return E_NOTIMPL;
1459 }
1460
1461 static HRESULT WINAPI Moniker_IsSystemMoniker(IMoniker *iface, DWORD *pdwMksys)
1462 {
1463 CHECK_EXPECT(IsSystemMoniker);
1464 return E_NOTIMPL;
1465 }
1466
1467 static const IMonikerVtbl MonikerVtbl = {
1468 Moniker_QueryInterface,
1469 Moniker_AddRef,
1470 Moniker_Release,
1471 Moniker_GetClassID,
1472 Moniker_IsDirty,
1473 Moniker_Load,
1474 Moniker_Save,
1475 Moniker_GetSizeMax,
1476 Moniker_BindToObject,
1477 Moniker_BindToStorage,
1478 Moniker_Reduce,
1479 Moniker_ComposeWith,
1480 Moniker_Enum,
1481 Moniker_IsEqual,
1482 Moniker_Hash,
1483 Moniker_IsRunning,
1484 Moniker_GetTimeOfLastChange,
1485 Moniker_Inverse,
1486 Moniker_CommonPrefixWith,
1487 Moniker_RelativePathTo,
1488 Moniker_GetDisplayName,
1489 Moniker_ParseDisplayName,
1490 Moniker_IsSystemMoniker
1491 };
1492
1493 static IMoniker Moniker = { &MonikerVtbl };
1494
1495 static HRESULT WINAPI OleContainer_QueryInterface(IOleContainer *iface, REFIID riid, void **ppv)
1496 {
1497 return QueryInterface(riid, ppv);
1498 }
1499
1500 static ULONG WINAPI OleContainer_AddRef(IOleContainer *iface)
1501 {
1502 return 2;
1503 }
1504
1505 static ULONG WINAPI OleContainer_Release(IOleContainer *iface)
1506 {
1507 return 1;
1508 }
1509
1510 static HRESULT WINAPI OleContainer_ParseDisplayName(IOleContainer *iface, IBindCtx *pbc,
1511 LPOLESTR pszDiaplayName, ULONG *pchEaten, IMoniker **ppmkOut)
1512 {
1513 ok(0, "unexpected call\n");
1514 return E_NOTIMPL;
1515 }
1516
1517 static HRESULT WINAPI OleContainer_EnumObjects(IOleContainer *iface, DWORD grfFlags,
1518 IEnumUnknown **ppenum)
1519 {
1520 ok(0, "unexpected call\n");
1521 return E_NOTIMPL;
1522 }
1523
1524 static HRESULT WINAPI OleContainer_LockContainer(IOleContainer *iface, BOOL fLock)
1525 {
1526 CHECK_EXPECT(LockContainer);
1527 ok(expect_LockContainer_fLock == fLock, "fLock=%x, expected %x\n", fLock, expect_LockContainer_fLock);
1528 return S_OK;
1529 }
1530
1531 static const IOleContainerVtbl OleContainerVtbl = {
1532 OleContainer_QueryInterface,
1533 OleContainer_AddRef,
1534 OleContainer_Release,
1535 OleContainer_ParseDisplayName,
1536 OleContainer_EnumObjects,
1537 OleContainer_LockContainer
1538 };
1539
1540 static IOleContainer OleContainer = { &OleContainerVtbl };
1541
1542 static HRESULT WINAPI ClientSite_QueryInterface(IOleClientSite *iface, REFIID riid, void **ppv)
1543 {
1544 return QueryInterface(riid, ppv);
1545 }
1546
1547 static ULONG WINAPI ClientSite_AddRef(IOleClientSite *iface)
1548 {
1549 return 2;
1550 }
1551
1552 static ULONG WINAPI ClientSite_Release(IOleClientSite *iface)
1553 {
1554 return 1;
1555 }
1556
1557 static HRESULT WINAPI ClientSite_SaveObject(IOleClientSite *iface)
1558 {
1559 ok(0, "unexpected call\n");
1560 return E_NOTIMPL;
1561 }
1562
1563 static HRESULT WINAPI ClientSite_GetMoniker(IOleClientSite *iface, DWORD dwAssign, DWORD dwWhichMoniker,
1564 IMoniker **ppmon)
1565 {
1566 ok(0, "unexpected call\n");
1567 return E_NOTIMPL;
1568 }
1569
1570 static HRESULT WINAPI ClientSite_GetContainer(IOleClientSite *iface, IOleContainer **ppContainer)
1571 {
1572 CHECK_EXPECT(GetContainer);
1573 ok(ppContainer != NULL, "ppContainer = NULL\n");
1574 *ppContainer = &OleContainer;
1575 return S_OK;
1576 }
1577
1578 static HRESULT WINAPI ClientSite_ShowObject(IOleClientSite *iface)
1579 {
1580 ok(0, "unexpected call\n");
1581 return E_NOTIMPL;
1582 }
1583
1584 static HRESULT WINAPI ClientSite_OnShowWindow(IOleClientSite *iface, BOOL fShow)
1585 {
1586 ok(0, "unexpected call\n");
1587 return E_NOTIMPL;
1588 }
1589
1590 static HRESULT WINAPI ClientSite_RequestNewObjectLayout(IOleClientSite *iface)
1591 {
1592 ok(0, "unexpected call\n");
1593 return E_NOTIMPL;
1594 }
1595
1596 static const IOleClientSiteVtbl ClientSiteVtbl = {
1597 ClientSite_QueryInterface,
1598 ClientSite_AddRef,
1599 ClientSite_Release,
1600 ClientSite_SaveObject,
1601 ClientSite_GetMoniker,
1602 ClientSite_GetContainer,
1603 ClientSite_ShowObject,
1604 ClientSite_OnShowWindow,
1605 ClientSite_RequestNewObjectLayout
1606 };
1607
1608 static IOleClientSite ClientSite = { &ClientSiteVtbl };
1609
1610 static HRESULT WINAPI InPlaceFrame_QueryInterface(IOleInPlaceFrame *iface, REFIID riid, void **ppv)
1611 {
1612 static const GUID undocumented_frame_iid = {0xfbece6c9,0x48d7,0x4a37,{0x8f,0xe3,0x6a,0xd4,0x27,0x2f,0xdd,0xac}};
1613
1614 if(!IsEqualGUID(&undocumented_frame_iid, riid))
1615 ok(0, "unexpected riid %s\n", debugstr_guid(riid));
1616
1617 *ppv = NULL;
1618 return E_NOINTERFACE;
1619 }
1620
1621 static ULONG WINAPI InPlaceFrame_AddRef(IOleInPlaceFrame *iface)
1622 {
1623 return 2;
1624 }
1625
1626 static ULONG WINAPI InPlaceFrame_Release(IOleInPlaceFrame *iface)
1627 {
1628 return 1;
1629 }
1630
1631 static HRESULT WINAPI InPlaceFrame_GetWindow(IOleInPlaceFrame *iface, HWND *phwnd)
1632 {
1633 CHECK_EXPECT(Frame_GetWindow);
1634 return E_NOTIMPL;
1635 }
1636
1637 static HRESULT WINAPI InPlaceFrame_ContextSensitiveHelp(IOleInPlaceFrame *iface, BOOL fEnterMode)
1638 {
1639 ok(0, "unexpected call\n");
1640 return E_NOTIMPL;
1641 }
1642
1643 static HRESULT WINAPI InPlaceFrame_GetBorder(IOleInPlaceFrame *iface, LPRECT lprectBorder)
1644 {
1645 ok(0, "unexpected call\n");
1646 return E_NOTIMPL;
1647 }
1648
1649 static HRESULT WINAPI InPlaceFrame_RequestBorderSpace(IOleInPlaceFrame *iface,
1650 LPCBORDERWIDTHS pborderwidths)
1651 {
1652 ok(0, "unexpected call\n");
1653 return E_NOTIMPL;
1654 }
1655
1656 static HRESULT WINAPI InPlaceFrame_SetBorderSpace(IOleInPlaceFrame *iface,
1657 LPCBORDERWIDTHS pborderwidths)
1658 {
1659 CHECK_EXPECT(InPlaceFrame_SetBorderSpace);
1660 return S_OK;
1661 }
1662
1663 static HRESULT WINAPI InPlaceUIWindow_SetActiveObject(IOleInPlaceFrame *iface,
1664 IOleInPlaceActiveObject *pActiveObject, LPCOLESTR pszObjName)
1665 {
1666 static const WCHAR wszHTML_Document[] =
1667 {'H','T','M','L',' ','D','o','c','u','m','e','n','t',0};
1668
1669 CHECK_EXPECT2(InPlaceUIWindow_SetActiveObject);
1670
1671 if(expect_InPlaceUIWindow_SetActiveObject_active) {
1672 ok(pActiveObject != NULL, "pActiveObject = NULL\n");
1673 if(pActiveObject && is_lang_english())
1674 ok(!lstrcmpW(wszHTML_Document, pszObjName), "%s != \"HTML Document\"\n", wine_dbgstr_w(pszObjName));
1675 }
1676 else {
1677 ok(pActiveObject == NULL, "pActiveObject=%p, expected NULL\n", pActiveObject);
1678 ok(pszObjName == NULL, "pszObjName=%p, expected NULL\n", pszObjName);
1679 }
1680 expect_InPlaceUIWindow_SetActiveObject_active = !expect_InPlaceUIWindow_SetActiveObject_active;
1681 return S_OK;
1682 }
1683
1684 static HRESULT WINAPI InPlaceFrame_SetActiveObject(IOleInPlaceFrame *iface,
1685 IOleInPlaceActiveObject *pActiveObject, LPCOLESTR pszObjName)
1686 {
1687 static const WCHAR wszHTML_Document[] =
1688 {'H','T','M','L',' ','D','o','c','u','m','e','n','t',0};
1689
1690 if(pActiveObject) {
1691 CHECK_EXPECT2(SetActiveObject);
1692
1693 if(pActiveObject && is_lang_english())
1694 ok(!lstrcmpW(wszHTML_Document, pszObjName), "%s != \"HTML Document\"\n", wine_dbgstr_w(pszObjName));
1695 }else {
1696 CHECK_EXPECT(SetActiveObject_null);
1697
1698 ok(pActiveObject == NULL, "pActiveObject=%p, expected NULL\n", pActiveObject);
1699 ok(pszObjName == NULL, "pszObjName=%p, expected NULL\n", pszObjName);
1700 }
1701
1702 return S_OK;
1703 }
1704
1705 static HRESULT WINAPI InPlaceFrame_InsertMenus(IOleInPlaceFrame *iface, HMENU hmenuShared,
1706 LPOLEMENUGROUPWIDTHS lpMenuWidths)
1707 {
1708 ok(0, "unexpected call\n");
1709 return E_NOTIMPL;
1710 }
1711
1712 static HRESULT WINAPI InPlaceFrame_SetMenu(IOleInPlaceFrame *iface, HMENU hmenuShared,
1713 HOLEMENU holemenu, HWND hwndActiveObject)
1714 {
1715 ok(0, "unexpected call\n");
1716 return E_NOTIMPL;
1717 }
1718
1719 static HRESULT WINAPI InPlaceFrame_RemoveMenus(IOleInPlaceFrame *iface, HMENU hmenuShared)
1720 {
1721 ok(0, "unexpected call\n");
1722 return E_NOTIMPL;
1723 }
1724
1725 static HRESULT WINAPI InPlaceFrame_SetStatusText(IOleInPlaceFrame *iface, LPCOLESTR pszStatusText)
1726 {
1727 CHECK_EXPECT2(SetStatusText);
1728 if(!expect_status_text)
1729 ok(pszStatusText == NULL, "pszStatusText=%p, expected NULL\n", pszStatusText);
1730 return S_OK;
1731 }
1732
1733 static HRESULT WINAPI InPlaceFrame_EnableModeless(IOleInPlaceFrame *iface, BOOL fEnable)
1734 {
1735 if(fEnable)
1736 CHECK_EXPECT2(Frame_EnableModeless_TRUE);
1737 else
1738 CHECK_EXPECT2(Frame_EnableModeless_FALSE);
1739 return E_NOTIMPL;
1740 }
1741
1742 static HRESULT WINAPI InPlaceFrame_TranslateAccelerator(IOleInPlaceFrame *iface, LPMSG lpmsg, WORD wID)
1743 {
1744 ok(0, "unexpected call\n");
1745 return E_NOTIMPL;
1746 }
1747
1748 static const IOleInPlaceFrameVtbl InPlaceFrameVtbl = {
1749 InPlaceFrame_QueryInterface,
1750 InPlaceFrame_AddRef,
1751 InPlaceFrame_Release,
1752 InPlaceFrame_GetWindow,
1753 InPlaceFrame_ContextSensitiveHelp,
1754 InPlaceFrame_GetBorder,
1755 InPlaceFrame_RequestBorderSpace,
1756 InPlaceFrame_SetBorderSpace,
1757 InPlaceFrame_SetActiveObject,
1758 InPlaceFrame_InsertMenus,
1759 InPlaceFrame_SetMenu,
1760 InPlaceFrame_RemoveMenus,
1761 InPlaceFrame_SetStatusText,
1762 InPlaceFrame_EnableModeless,
1763 InPlaceFrame_TranslateAccelerator
1764 };
1765
1766 static IOleInPlaceFrame InPlaceFrame = { &InPlaceFrameVtbl };
1767
1768 static const IOleInPlaceFrameVtbl InPlaceUIWindowVtbl = {
1769 InPlaceFrame_QueryInterface,
1770 InPlaceFrame_AddRef,
1771 InPlaceFrame_Release,
1772 InPlaceFrame_GetWindow,
1773 InPlaceFrame_ContextSensitiveHelp,
1774 InPlaceFrame_GetBorder,
1775 InPlaceFrame_RequestBorderSpace,
1776 InPlaceFrame_SetBorderSpace,
1777 InPlaceUIWindow_SetActiveObject,
1778 };
1779
1780 static IOleInPlaceFrame InPlaceUIWindow = { &InPlaceUIWindowVtbl };
1781
1782 static HRESULT WINAPI InPlaceSiteWindowless_QueryInterface(IOleInPlaceSiteWindowless *iface, REFIID riid, void **ppv)
1783 {
1784 return QueryInterface(riid, ppv);
1785 }
1786
1787 static ULONG WINAPI InPlaceSiteWindowless_AddRef(IOleInPlaceSiteWindowless *iface)
1788 {
1789 return 2;
1790 }
1791
1792 static ULONG WINAPI InPlaceSiteWindowless_Release(IOleInPlaceSiteWindowless *iface)
1793 {
1794 return 1;
1795 }
1796
1797 static HRESULT WINAPI InPlaceSiteWindowless_GetWindow(
1798 IOleInPlaceSiteWindowless *iface, HWND *phwnd)
1799 {
1800 IOleClientSite *client_site;
1801 IOleObject *ole_obj;
1802 HRESULT hres;
1803
1804 CHECK_EXPECT2(GetWindow);
1805 ok(phwnd != NULL, "phwnd = NULL\n");
1806 *phwnd = container_hwnd;
1807
1808 hres = IUnknown_QueryInterface(doc_unk, &IID_IOleObject, (void**)&ole_obj);
1809 ok(hres == S_OK, "Could not get IOleObject: %08x\n", hres);
1810
1811 hres = IOleObject_GetClientSite(ole_obj, &client_site);
1812 IOleObject_Release(ole_obj);
1813 ok(hres == S_OK, "GetClientSite failed: %08x\n", hres);
1814 ok(client_site == &ClientSite, "client_site != ClientSite\n");
1815 IOleClientSite_Release(client_site);
1816
1817 return S_OK;
1818 }
1819
1820 static HRESULT WINAPI InPlaceSiteWindowless_ContextSensitiveHelp(
1821 IOleInPlaceSiteWindowless *iface, BOOL fEnterMode)
1822 {
1823 ok(0, "unexpected call\n");
1824 return E_NOTIMPL;
1825 }
1826
1827 static HRESULT WINAPI InPlaceSiteWindowless_CanInPlaceActivate(
1828 IOleInPlaceSiteWindowless *iface)
1829 {
1830 CHECK_EXPECT(CanInPlaceActivate);
1831 return S_OK;
1832 }
1833
1834 static HRESULT WINAPI InPlaceSiteWindowless_OnInPlaceActivate(
1835 IOleInPlaceSiteWindowless *iface)
1836 {
1837 CHECK_EXPECT(OnInPlaceActivate);
1838 inplace_deactivated = FALSE;
1839 return S_OK;
1840 }
1841
1842 static HRESULT WINAPI InPlaceSiteWindowless_OnUIActivate(
1843 IOleInPlaceSiteWindowless *iface)
1844 {
1845 CHECK_EXPECT(OnUIActivate);
1846 return S_OK;
1847 }
1848
1849 static HRESULT WINAPI InPlaceSiteWindowless_GetWindowContext(
1850 IOleInPlaceSiteWindowless *iface, IOleInPlaceFrame **ppFrame,
1851 IOleInPlaceUIWindow **ppDoc, LPRECT lprcPosRect,
1852 LPRECT lprcClipRect, LPOLEINPLACEFRAMEINFO lpFrameInfo)
1853 {
1854 static const RECT rect = {0,0,500,500};
1855
1856 CHECK_EXPECT(GetWindowContext);
1857
1858 ok(ppFrame != NULL, "ppFrame = NULL\n");
1859 if(ppFrame)
1860 *ppFrame = &InPlaceFrame;
1861 ok(ppDoc != NULL, "ppDoc = NULL\n");
1862 if(ppDoc)
1863 *ppDoc = (IOleInPlaceUIWindow*)&InPlaceUIWindow;
1864 ok(lprcPosRect != NULL, "lprcPosRect = NULL\n");
1865 if(lprcPosRect)
1866 memcpy(lprcPosRect, &rect, sizeof(RECT));
1867 ok(lprcClipRect != NULL, "lprcClipRect = NULL\n");
1868 if(lprcClipRect)
1869 memcpy(lprcClipRect, &rect, sizeof(RECT));
1870 ok(lpFrameInfo != NULL, "lpFrameInfo = NULL\n");
1871 if(lpFrameInfo) {
1872 ok(lpFrameInfo->cb == sizeof(*lpFrameInfo), "lpFrameInfo->cb = %u, expected %u\n", lpFrameInfo->cb, (unsigned)sizeof(*lpFrameInfo));
1873 lpFrameInfo->fMDIApp = FALSE;
1874 lpFrameInfo->hwndFrame = container_hwnd;
1875 lpFrameInfo->haccel = NULL;
1876 lpFrameInfo->cAccelEntries = 0;
1877 }
1878
1879 return S_OK;
1880 }
1881
1882 static HRESULT WINAPI InPlaceSiteWindowless_Scroll(
1883 IOleInPlaceSiteWindowless *iface, SIZE scrollExtent)
1884 {
1885 ok(0, "unexpected call\n");
1886 return E_NOTIMPL;
1887 }
1888
1889 static HRESULT WINAPI InPlaceSiteWindowless_OnUIDeactivate(
1890 IOleInPlaceSiteWindowless *iface, BOOL fUndoable)
1891 {
1892 CHECK_EXPECT(OnUIDeactivate);
1893 ok(!fUndoable, "fUndoable = TRUE\n");
1894 return S_OK;
1895 }
1896
1897 static HRESULT WINAPI InPlaceSiteWindowless_OnInPlaceDeactivate(
1898 IOleInPlaceSiteWindowless *iface)
1899 {
1900 CHECK_EXPECT(OnInPlaceDeactivate);
1901 inplace_deactivated = TRUE;
1902 return S_OK;
1903 }
1904
1905 static HRESULT WINAPI InPlaceSiteWindowless_DiscardUndoState(
1906 IOleInPlaceSiteWindowless *iface)
1907 {
1908 ok(0, "unexpected call\n");
1909 return E_NOTIMPL;
1910 }
1911
1912 static HRESULT WINAPI InPlaceSiteWindowless_DeactivateAndUndo(
1913 IOleInPlaceSiteWindowless *iface)
1914 {
1915 ok(0, "unexpected call\n");
1916 return E_NOTIMPL;
1917 }
1918
1919 static HRESULT WINAPI InPlaceSiteWindowless_OnPosRectChange(
1920 IOleInPlaceSiteWindowless *iface, LPCRECT lprcPosRect)
1921 {
1922 ok(0, "unexpected call\n");
1923 return E_NOTIMPL;
1924 }
1925
1926 static HRESULT WINAPI InPlaceSiteWindowless_OnInPlaceActivateEx(
1927 IOleInPlaceSiteWindowless *iface, BOOL *pfNoRedraw, DWORD dwFlags)
1928 {
1929 CHECK_EXPECT(OnInPlaceActivateEx);
1930
1931 ok(pfNoRedraw != NULL, "pfNoRedraw == NULL\n");
1932 ok(!*pfNoRedraw, "*pfNoRedraw == TRUE\n");
1933 ok(dwFlags == 0, "dwFlags = %08x\n", dwFlags);
1934
1935 return S_OK;
1936 }
1937
1938 static HRESULT WINAPI InPlaceSiteWindowless_OnInPlaceDeactivateEx(
1939 IOleInPlaceSiteWindowless *iface, BOOL fNoRedraw)
1940 {
1941 CHECK_EXPECT(OnInPlaceDeactivateEx);
1942
1943 ok(fNoRedraw, "fNoRedraw == FALSE\n");
1944
1945 return S_OK;
1946 }
1947
1948 static HRESULT WINAPI InPlaceSiteWindowless_RequestUIActivate(
1949 IOleInPlaceSiteWindowless *iface)
1950 {
1951 CHECK_EXPECT2(RequestUIActivate);
1952 return S_OK;
1953 }
1954
1955 static HRESULT WINAPI InPlaceSiteWindowless_CanWindowlessActivate(
1956 IOleInPlaceSiteWindowless *iface)
1957 {
1958 ok(0, "unexpected call\n");
1959 return E_NOTIMPL;
1960 }
1961
1962 static HRESULT WINAPI InPlaceSiteWindowless_GetCapture(
1963 IOleInPlaceSiteWindowless *iface)
1964 {
1965 ok(0, "unexpected call\n");
1966 return E_NOTIMPL;
1967 }
1968
1969 static HRESULT WINAPI InPlaceSiteWindowless_SetCapture(
1970 IOleInPlaceSiteWindowless *iface, BOOL fCapture)
1971 {
1972 ok(0, "unexpected call\n");
1973 return E_NOTIMPL;
1974 }
1975
1976 static HRESULT WINAPI InPlaceSiteWindowless_GetFocus(
1977 IOleInPlaceSiteWindowless *iface)
1978 {
1979 ok(0, "unexpected call\n");
1980 return E_NOTIMPL;
1981 }
1982
1983 static HRESULT WINAPI InPlaceSiteWindowless_SetFocus(
1984 IOleInPlaceSiteWindowless *iface, BOOL fFocus)
1985 {
1986 ok(0, "unexpected call\n");
1987 return E_NOTIMPL;
1988 }
1989
1990 static HRESULT WINAPI InPlaceSiteWindowless_GetDC(
1991 IOleInPlaceSiteWindowless *iface, LPCRECT pRect,
1992 DWORD grfFlags, HDC *phDC)
1993 {
1994 ok(0, "unexpected call\n");
1995 return E_NOTIMPL;
1996 }
1997
1998 static HRESULT WINAPI InPlaceSiteWindowless_ReleaseDC(
1999 IOleInPlaceSiteWindowless *iface, HDC hDC)
2000 {
2001 ok(0, "unexpected call\n");
2002 return E_NOTIMPL;
2003 }
2004
2005 static HRESULT WINAPI InPlaceSiteWindowless_InvalidateRect(
2006 IOleInPlaceSiteWindowless *iface, LPCRECT pRect, BOOL fErase)
2007 {
2008 ok(0, "unexpected call\n");
2009 return E_NOTIMPL;
2010 }
2011
2012 static HRESULT WINAPI InPlaceSiteWindowless_InvalidateRgn(
2013 IOleInPlaceSiteWindowless *iface, HRGN hRGN, BOOL fErase)
2014 {
2015 ok(0, "unexpected call\n");
2016 return E_NOTIMPL;
2017 }
2018
2019 static HRESULT WINAPI InPlaceSiteWindowless_ScrollRect(
2020 IOleInPlaceSiteWindowless *iface, INT dx, INT dy,
2021 LPCRECT pRectScroll, LPCRECT pRectClip)
2022 {
2023 ok(0, "unexpected call\n");
2024 return E_NOTIMPL;
2025 }
2026
2027 static HRESULT WINAPI InPlaceSiteWindowless_AdjustRect(
2028 IOleInPlaceSiteWindowless *iface, LPRECT prc)
2029 {
2030 ok(0, "unexpected call\n");
2031 return E_NOTIMPL;
2032 }
2033
2034 static HRESULT WINAPI InPlaceSiteWindowless_OnDefWindowMessage(
2035 IOleInPlaceSiteWindowless *iface, UINT msg,
2036 WPARAM wParam, LPARAM lParam, LRESULT *plResult)
2037 {
2038 ok(0, "unexpected call\n");
2039 return E_NOTIMPL;
2040 }
2041
2042 static const IOleInPlaceSiteWindowlessVtbl InPlaceSiteWindowlessVtbl = {
2043 InPlaceSiteWindowless_QueryInterface,
2044 InPlaceSiteWindowless_AddRef,
2045 InPlaceSiteWindowless_Release,
2046 InPlaceSiteWindowless_GetWindow,
2047 InPlaceSiteWindowless_ContextSensitiveHelp,
2048 InPlaceSiteWindowless_CanInPlaceActivate,
2049 InPlaceSiteWindowless_OnInPlaceActivate,
2050 InPlaceSiteWindowless_OnUIActivate,
2051 InPlaceSiteWindowless_GetWindowContext,
2052 InPlaceSiteWindowless_Scroll,
2053 InPlaceSiteWindowless_OnUIDeactivate,
2054 InPlaceSiteWindowless_OnInPlaceDeactivate,
2055 InPlaceSiteWindowless_DiscardUndoState,
2056 InPlaceSiteWindowless_DeactivateAndUndo,
2057 InPlaceSiteWindowless_OnPosRectChange,
2058 InPlaceSiteWindowless_OnInPlaceActivateEx,
2059 InPlaceSiteWindowless_OnInPlaceDeactivateEx,
2060 InPlaceSiteWindowless_RequestUIActivate,
2061 InPlaceSiteWindowless_CanWindowlessActivate,
2062 InPlaceSiteWindowless_GetCapture,
2063 InPlaceSiteWindowless_SetCapture,
2064 InPlaceSiteWindowless_GetFocus,
2065 InPlaceSiteWindowless_SetFocus,
2066 InPlaceSiteWindowless_GetDC,
2067 InPlaceSiteWindowless_ReleaseDC,
2068 InPlaceSiteWindowless_InvalidateRect,
2069 InPlaceSiteWindowless_InvalidateRgn,
2070 InPlaceSiteWindowless_ScrollRect,
2071 InPlaceSiteWindowless_AdjustRect,
2072 InPlaceSiteWindowless_OnDefWindowMessage
2073 };
2074
2075 static IOleInPlaceSiteWindowless InPlaceSiteWindowless = { &InPlaceSiteWindowlessVtbl };
2076
2077 static HRESULT WINAPI DocumentSite_QueryInterface(IOleDocumentSite *iface, REFIID riid, void **ppv)
2078 {
2079 return QueryInterface(riid, ppv);
2080 }
2081
2082 static ULONG WINAPI DocumentSite_AddRef(IOleDocumentSite *iface)
2083 {
2084 return 2;
2085 }
2086
2087 static ULONG WINAPI DocumentSite_Release(IOleDocumentSite *iface)
2088 {
2089 return 1;
2090 }
2091
2092 typedef enum
2093 {
2094 CallUIActivate_None,
2095 CallUIActivate_ActivateMe,
2096 CallUIActivate_AfterShow,
2097 } CallUIActivate;
2098
2099 static BOOL call_UIActivate = CallUIActivate_ActivateMe;
2100 static HRESULT WINAPI DocumentSite_ActivateMe(IOleDocumentSite *iface, IOleDocumentView *pViewToActivate)
2101 {
2102 IOleDocument *document;
2103 HRESULT hres;
2104
2105 CHECK_EXPECT(ActivateMe);
2106 ok(pViewToActivate != NULL, "pViewToActivate = NULL\n");
2107
2108 hres = IOleDocumentView_QueryInterface(pViewToActivate, &IID_IOleDocument, (void**)&document);
2109 ok(hres == S_OK, "could not get IOleDocument: %08x\n", hres);
2110
2111 if(SUCCEEDED(hres)) {
2112 hres = IOleDocument_CreateView(document, (IOleInPlaceSite*)&InPlaceSiteWindowless, NULL, 0, &view);
2113 ok(hres == S_OK, "CreateView failed: %08x\n", hres);
2114
2115 if(SUCCEEDED(hres)) {
2116 IOleInPlaceActiveObject *activeobj = NULL;
2117 IOleInPlaceSite *inplacesite = NULL;
2118 HWND tmp_hwnd = NULL;
2119 static RECT rect = {0,0,400,500};
2120
2121 hres = IOleDocumentView_GetInPlaceSite(view, &inplacesite);
2122 ok(hres == S_OK, "GetInPlaceSite failed: %08x\n", hres);
2123 ok(inplacesite == (IOleInPlaceSite*)&InPlaceSiteWindowless, "inplacesite=%p, expected %p\n",
2124 inplacesite, &InPlaceSiteWindowless);
2125
2126 hres = IOleDocumentView_SetInPlaceSite(view, (IOleInPlaceSite*)&InPlaceSiteWindowless);
2127 ok(hres == S_OK, "SetInPlaceSite failed: %08x\n", hres);
2128
2129 hres = IOleDocumentView_GetInPlaceSite(view, &inplacesite);
2130 ok(hres == S_OK, "GetInPlaceSite failed: %08x\n", hres);
2131 ok(inplacesite == (IOleInPlaceSite*)&InPlaceSiteWindowless, "inplacesite=%p, expected %p\n",
2132 inplacesite, &InPlaceSiteWindowless);
2133
2134 hres = IOleDocumentView_QueryInterface(view, &IID_IOleInPlaceActiveObject, (void**)&activeobj);
2135 ok(hres == S_OK, "Could not get IOleInPlaceActiveObject: %08x\n", hres);
2136
2137 if(activeobj) {
2138 IOleInPlaceActiveObject_GetWindow(activeobj, &hwnd);
2139 ok(hres == S_OK, "GetWindow failed: %08x\n", hres);
2140 ok(hwnd == NULL, "hwnd=%p, expected NULL\n", hwnd);
2141 }
2142
2143 if(call_UIActivate == CallUIActivate_ActivateMe) {
2144 SET_EXPECT(CanInPlaceActivate);
2145 SET_EXPECT(GetWindowContext);
2146 SET_EXPECT(GetWindow);
2147 if(ipsex)
2148 SET_EXPECT(OnInPlaceActivateEx);
2149 else
2150 SET_EXPECT(OnInPlaceActivate);
2151 SET_EXPECT(SetStatusText);
2152 SET_EXPECT(Exec_SETPROGRESSMAX);
2153 SET_EXPECT(Exec_SETPROGRESSPOS);
2154 SET_EXPECT(OnUIActivate);
2155 SET_EXPECT(SetActiveObject);
2156 SET_EXPECT(ShowUI);
2157 expect_status_text = NULL;
2158
2159 hres = IOleDocumentView_UIActivate(view, TRUE);
2160 ok(hres == S_OK, "UIActivate failed: %08x\n", hres);
2161
2162 CHECK_CALLED(CanInPlaceActivate);
2163 CHECK_CALLED(GetWindowContext);
2164 CHECK_CALLED(GetWindow);
2165 if(ipsex)
2166 CHECK_CALLED(OnInPlaceActivateEx);
2167 else
2168 CHECK_CALLED(OnInPlaceActivate);
2169 CHECK_CALLED(SetStatusText);
2170 CHECK_CALLED(Exec_SETPROGRESSMAX);
2171 CHECK_CALLED(Exec_SETPROGRESSPOS);
2172 CHECK_CALLED(OnUIActivate);
2173 CHECK_CALLED(SetActiveObject);
2174 CHECK_CALLED(ShowUI);
2175
2176 if(activeobj) {
2177 hres = IOleInPlaceActiveObject_GetWindow(activeobj, &hwnd);
2178 ok(hres == S_OK, "GetWindow failed: %08x\n", hres);
2179 ok(hwnd != NULL, "hwnd == NULL\n");
2180 if(last_hwnd)
2181 ok(hwnd == last_hwnd, "hwnd != last_hwnd\n");
2182 }
2183
2184 hres = IOleDocumentView_UIActivate(view, TRUE);
2185 ok(hres == S_OK, "UIActivate failed: %08x\n", hres);
2186
2187 if(activeobj) {
2188 hres = IOleInPlaceActiveObject_GetWindow(activeobj, &tmp_hwnd);
2189 ok(hres == S_OK, "GetWindow failed: %08x\n", hres);
2190 ok(tmp_hwnd == hwnd, "tmp_hwnd=%p, expected %p\n", tmp_hwnd, hwnd);
2191 }
2192 }
2193
2194 hres = IOleDocumentView_SetRect(view, &rect);
2195 ok(hres == S_OK, "SetRect failed: %08x\n", hres);
2196
2197 if(call_UIActivate == CallUIActivate_ActivateMe) {
2198 hres = IOleDocumentView_Show(view, TRUE);
2199 ok(hres == S_OK, "Show failed: %08x\n", hres);
2200 }else {
2201 SET_EXPECT(CanInPlaceActivate);
2202 SET_EXPECT(GetWindowContext);
2203 SET_EXPECT(GetWindow);
2204 if(ipsex)
2205 SET_EXPECT(OnInPlaceActivateEx);
2206 else
2207 SET_EXPECT(OnInPlaceActivate);
2208 SET_EXPECT(SetStatusText);
2209 SET_EXPECT(Exec_SETPROGRESSMAX);
2210 SET_EXPECT(Exec_SETPROGRESSPOS);
2211 SET_EXPECT(OnUIActivate);
2212 expect_status_text = (load_state == LD_COMPLETE ? (LPCOLESTR)0xdeadbeef : NULL);
2213
2214 hres = IOleDocumentView_Show(view, TRUE);
2215 ok(hres == S_OK, "Show failed: %08x\n", hres);
2216
2217 CHECK_CALLED(CanInPlaceActivate);
2218 CHECK_CALLED(GetWindowContext);
2219 CHECK_CALLED(GetWindow);
2220 if(ipsex)
2221 CHECK_CALLED(OnInPlaceActivateEx);
2222 else
2223 CHECK_CALLED(OnInPlaceActivate);
2224 CHECK_CALLED(SetStatusText);
2225 CHECK_CALLED(Exec_SETPROGRESSMAX);
2226 CHECK_CALLED(Exec_SETPROGRESSPOS);
2227
2228 if(activeobj) {
2229 hres = IOleInPlaceActiveObject_GetWindow(activeobj, &hwnd);
2230 ok(hres == S_OK, "GetWindow failed: %08x\n", hres);
2231 ok(hwnd != NULL, "hwnd == NULL\n");
2232 if(last_hwnd)
2233 ok(hwnd == last_hwnd, "hwnd != last_hwnd\n");
2234 }
2235 }
2236
2237 test_timer(EXPECT_UPDATEUI | ((load_state == LD_LOADING) ? EXPECT_SETTITLE : 0));
2238
2239 if(activeobj)
2240 IOleInPlaceActiveObject_Release(activeobj);
2241 }
2242
2243 IOleDocument_Release(document);
2244 }
2245
2246 return S_OK;
2247 }
2248
2249 static const IOleDocumentSiteVtbl DocumentSiteVtbl = {
2250 DocumentSite_QueryInterface,
2251 DocumentSite_AddRef,
2252 DocumentSite_Release,
2253 DocumentSite_ActivateMe
2254 };
2255
2256 static IOleDocumentSite DocumentSite = { &DocumentSiteVtbl };
2257
2258 static HRESULT WINAPI OleControlSite_QueryInterface(IOleControlSite *iface, REFIID riid, void **ppv)
2259 {
2260 return QueryInterface(riid, ppv);
2261 }
2262
2263 static ULONG WINAPI OleControlSite_AddRef(IOleControlSite *iface)
2264 {
2265 return 2;
2266 }
2267
2268 static ULONG WINAPI OleControlSite_Release(IOleControlSite *iface)
2269 {
2270 return 1;
2271 }
2272
2273 static HRESULT WINAPI OleControlSite_OnControlInfoChanged(IOleControlSite *iface)
2274 {
2275 ok(0, "unexpected call\n");
2276 return E_NOTIMPL;
2277 }
2278
2279 static HRESULT WINAPI OleControlSite_LockInPlaceActive(IOleControlSite *iface, BOOL fLock)
2280 {
2281 ok(0, "unexpected call\n");
2282 return E_NOTIMPL;
2283 }
2284
2285 static HRESULT WINAPI OleControlSite_GetExtendedControl(IOleControlSite *iface, IDispatch **ppDisp)
2286 {
2287 ok(0, "unexpected call\n");
2288 return E_NOTIMPL;
2289 }
2290
2291 static HRESULT WINAPI OleControlSite_TransformCoords(IOleControlSite *iface, POINTL *pPtHimetric,
2292 POINTF *pPtfContainer, DWORD dwFlags)
2293 {
2294 ok(0, "unexpected call\n");
2295 return E_NOTIMPL;
2296 }
2297
2298 static HRESULT WINAPI OleControlSite_TranslateAccelerator(IOleControlSite *iface,
2299 MSG *pMsg, DWORD grfModifiers)
2300 {
2301 ok(0, "unexpected call\n");
2302 return E_NOTIMPL;
2303 }
2304
2305 static HRESULT WINAPI OleControlSite_OnFocus(IOleControlSite *iface, BOOL fGotFocus)
2306 {
2307 if(fGotFocus)
2308 CHECK_EXPECT(OnFocus_TRUE);
2309 else
2310 CHECK_EXPECT2(OnFocus_FALSE);
2311 return S_OK;
2312 }
2313
2314 static HRESULT WINAPI OleControlSite_ShowPropertyFrame(IOleControlSite *iface)
2315 {
2316 ok(0, "unexpected call\n");
2317 return E_NOTIMPL;
2318 }
2319
2320 static const IOleControlSiteVtbl OleControlSiteVtbl = {
2321 OleControlSite_QueryInterface,
2322 OleControlSite_AddRef,
2323 OleControlSite_Release,
2324 OleControlSite_OnControlInfoChanged,
2325 OleControlSite_LockInPlaceActive,
2326 OleControlSite_GetExtendedControl,
2327 OleControlSite_TransformCoords,
2328 OleControlSite_TranslateAccelerator,
2329 OleControlSite_OnFocus,
2330 OleControlSite_ShowPropertyFrame
2331 };
2332
2333 static IOleControlSite OleControlSite = { &OleControlSiteVtbl };
2334
2335 static IDocHostUIHandler2 *expect_uihandler_iface;
2336
2337 static HRESULT WINAPI DocHostUIHandler_QueryInterface(IDocHostUIHandler2 *iface, REFIID riid, void **ppv)
2338 {
2339 return QueryInterface(riid, ppv);
2340 }
2341
2342 static ULONG WINAPI DocHostUIHandler_AddRef(IDocHostUIHandler2 *iface)
2343 {
2344 return 2;
2345 }
2346
2347 static ULONG WINAPI DocHostUIHandler_Release(IDocHostUIHandler2 *iface)
2348 {
2349 return 1;
2350 }
2351
2352 static HRESULT WINAPI DocHostUIHandler_ShowContextMenu(IDocHostUIHandler2 *iface, DWORD dwID, POINT *ppt,
2353 IUnknown *pcmdtReserved, IDispatch *pdicpReserved)
2354 {
2355 ok(0, "unexpected call\n");
2356 ok(iface == expect_uihandler_iface, "called on unexpected iface\n");
2357 return E_NOTIMPL;
2358 }
2359
2360 static HRESULT WINAPI DocHostUIHandler_GetHostInfo(IDocHostUIHandler2 *iface, DOCHOSTUIINFO *pInfo)
2361 {
2362 CHECK_EXPECT(GetHostInfo);
2363 ok(iface == expect_uihandler_iface, "called on unexpected iface\n");
2364 ok(pInfo != NULL, "pInfo=NULL\n");
2365 if(pInfo) {
2366 ok(pInfo->cbSize == sizeof(DOCHOSTUIINFO), "pInfo->cbSize=%u\n", pInfo->cbSize);
2367 ok(!pInfo->dwFlags, "pInfo->dwFlags=%08x, expected 0\n", pInfo->dwFlags);
2368 pInfo->dwFlags = DOCHOSTUIFLAG_DISABLE_HELP_MENU | DOCHOSTUIFLAG_DISABLE_SCRIPT_INACTIVE
2369 | DOCHOSTUIFLAG_ACTIVATE_CLIENTHIT_ONLY | DOCHOSTUIFLAG_ENABLE_INPLACE_NAVIGATION
2370 | DOCHOSTUIFLAG_IME_ENABLE_RECONVERSION;
2371 ok(!pInfo->dwDoubleClick, "pInfo->dwDoubleClick=%08x, expected 0\n", pInfo->dwDoubleClick);
2372 ok(!pInfo->pchHostCss, "pInfo->pchHostCss=%p, expected NULL\n", pInfo->pchHostCss);
2373 ok(!pInfo->pchHostNS, "pInfo->pchhostNS=%p, expected NULL\n", pInfo->pchHostNS);
2374 }
2375 return S_OK;
2376 }
2377
2378 static HRESULT WINAPI DocHostUIHandler_ShowUI(IDocHostUIHandler2 *iface, DWORD dwID,
2379 IOleInPlaceActiveObject *pActiveObject, IOleCommandTarget *pCommandTarget,
2380 IOleInPlaceFrame *pFrame, IOleInPlaceUIWindow *pDoc)
2381 {
2382 CHECK_EXPECT(ShowUI);
2383 ok(iface == expect_uihandler_iface, "called on unexpected iface\n");
2384
2385 if (editmode)
2386 ok(dwID == DOCHOSTUITYPE_AUTHOR, "dwID=%d, expected DOCHOSTUITYPE_AUTHOR\n", dwID);
2387 else
2388 ok(dwID == DOCHOSTUITYPE_BROWSE, "dwID=%d, expected DOCHOSTUITYPE_BROWSE\n", dwID);
2389 ok(pActiveObject != NULL, "pActiveObject = NULL\n");
2390 ok(pCommandTarget != NULL, "pCommandTarget = NULL\n");
2391 ok(pFrame == &InPlaceFrame, "pFrame=%p, expected %p\n", pFrame, &InPlaceFrame);
2392 if (expect_InPlaceUIWindow_SetActiveObject_active)
2393 ok(pDoc == (IOleInPlaceUIWindow *)&InPlaceUIWindow, "pDoc=%p, expected %p\n", pDoc, &InPlaceUIWindow);
2394 else
2395 ok(pDoc == NULL, "pDoc=%p, expected NULL\n", pDoc);
2396
2397 return S_OK;
2398 }
2399
2400 static HRESULT WINAPI DocHostUIHandler_HideUI(IDocHostUIHandler2 *iface)
2401 {
2402 CHECK_EXPECT(HideUI);
2403 ok(iface == expect_uihandler_iface, "called on unexpected iface\n");
2404 return S_OK;
2405 }
2406
2407 static HRESULT WINAPI DocHostUIHandler_UpdateUI(IDocHostUIHandler2 *iface)
2408 {
2409 CHECK_EXPECT(UpdateUI);
2410 ok(iface == expect_uihandler_iface, "called on unexpected iface\n");
2411 return S_OK;
2412 }
2413
2414 static HRESULT WINAPI DocHostUIHandler_EnableModeless(IDocHostUIHandler2 *iface, BOOL fEnable)
2415 {
2416 ok(iface == expect_uihandler_iface, "called on unexpected iface\n");
2417 if(fEnable)
2418 CHECK_EXPECT2(EnableModeless_TRUE);
2419 else
2420 CHECK_EXPECT2(EnableModeless_FALSE);
2421 return E_NOTIMPL;
2422 }
2423
2424 static HRESULT WINAPI DocHostUIHandler_OnDocWindowActivate(IDocHostUIHandler2 *iface, BOOL fActivate)
2425 {
2426 ok(0, "unexpected call\n");
2427 ok(iface == expect_uihandler_iface, "called on unexpected iface\n");
2428 return E_NOTIMPL;
2429 }
2430
2431 static BOOL expect_OnFrameWindowActivate_fActivate;
2432 static HRESULT WINAPI DocHostUIHandler_OnFrameWindowActivate(IDocHostUIHandler2 *iface, BOOL fActivate)
2433 {
2434 CHECK_EXPECT2(OnFrameWindowActivate);
2435 ok(iface == expect_uihandler_iface, "called on unexpected iface\n");
2436 ok(fActivate == expect_OnFrameWindowActivate_fActivate, "fActivate=%x\n", fActivate);
2437 return S_OK;
2438 }
2439
2440 static HRESULT WINAPI DocHostUIHandler_ResizeBorder(IDocHostUIHandler2 *iface, LPCRECT prcBorder,
2441 IOleInPlaceUIWindow *pUIWindow, BOOL fRameWindow)
2442 {
2443 ok(0, "unexpected call\n");
2444 return E_NOTIMPL;
2445 }
2446
2447 static HRESULT WINAPI DocHostUIHandler_TranslateAccelerator(IDocHostUIHandler2 *iface, LPMSG lpMsg,
2448 const GUID *pguidCmdGroup, DWORD nCmdID)
2449 {
2450 ok(0, "unexpected call\n");
2451 ok(iface == expect_uihandler_iface, "called on unexpected iface\n");
2452 return E_NOTIMPL;
2453 }
2454
2455 static HRESULT WINAPI DocHostUIHandler_GetOptionKeyPath(IDocHostUIHandler2 *iface,
2456 LPOLESTR *pchKey, DWORD dw)
2457 {
2458 CHECK_EXPECT(GetOptionKeyPath);
2459 ok(iface == expect_uihandler_iface, "called on unexpected iface\n");
2460 ok(pchKey != NULL, "pchKey = NULL\n");
2461 ok(!dw, "dw=%d, expected 0\n", dw);
2462 if(pchKey)
2463 ok(!*pchKey, "*pchKey=%p, expected NULL\n", *pchKey);
2464 return S_OK;
2465 }
2466
2467 static HRESULT WINAPI DocHostUIHandler_GetDropTarget(IDocHostUIHandler2 *iface,
2468 IDropTarget *pDropTarget, IDropTarget **ppDropTarget)
2469 {
2470 CHECK_EXPECT(GetDropTarget);
2471 ok(iface == expect_uihandler_iface, "called on unexpected iface\n");
2472 /* TODO */
2473 return E_NOTIMPL;
2474 }
2475
2476 static HRESULT WINAPI DocHostUIHandler_GetExternal(IDocHostUIHandler2 *iface, IDispatch **ppDispatch)
2477 {
2478 CHECK_EXPECT(GetExternal);
2479 ok(iface == expect_uihandler_iface, "called on unexpected iface\n");
2480 *ppDispatch = &External;
2481 return S_FALSE;
2482 }
2483
2484 static HRESULT WINAPI DocHostUIHandler_TranslateUrl(IDocHostUIHandler2 *iface, DWORD dwTranslate,
2485 OLECHAR *pchURLIn, OLECHAR **ppchURLOut)
2486 {
2487 CHECK_EXPECT(TranslateUrl);
2488 ok(iface == expect_uihandler_iface, "called on unexpected iface\n");
2489 ok(!dwTranslate, "dwTranslate = %x\n", dwTranslate);
2490 if(!loading_hash)
2491 ok(!strcmp_wa(pchURLIn, nav_serv_url), "pchURLIn = %s, expected %s\n", wine_dbgstr_w(pchURLIn), nav_serv_url);
2492 else
2493 todo_wine ok(!strcmp_wa(pchURLIn, nav_serv_url), "pchURLIn = %s, expected %s\n", wine_dbgstr_w(pchURLIn), nav_serv_url);
2494 ok(ppchURLOut != NULL, "ppchURLOut == NULL\n");
2495 ok(!*ppchURLOut, "*ppchURLOut = %p\n", *ppchURLOut);
2496
2497 return S_FALSE;
2498 }
2499
2500 static HRESULT WINAPI DocHostUIHandler_FilterDataObject(IDocHostUIHandler2 *iface, IDataObject *pDO,
2501 IDataObject **ppPORet)
2502 {
2503 ok(0, "unexpected call\n");
2504 ok(iface == expect_uihandler_iface, "called on unexpected iface\n");
2505 return E_NOTIMPL;
2506 }
2507
2508 static HRESULT WINAPI DocHostUIHandler_GetOverrideKeyPath(IDocHostUIHandler2 *iface,
2509 LPOLESTR *pchKey, DWORD dw)
2510 {
2511 CHECK_EXPECT(GetOverrideKeyPath);
2512 ok(iface == expect_uihandler_iface, "called on unexpected iface\n");
2513 ok(pchKey != NULL, "pchKey = NULL\n");
2514 if(pchKey)
2515 ok(!*pchKey, "*pchKey=%p, expected NULL\n", *pchKey);
2516 ok(!dw, "dw=%d, xepected 0\n", dw);
2517 return S_OK;
2518 }
2519
2520 static const IDocHostUIHandler2Vtbl DocHostUIHandlerVtbl = {
2521 DocHostUIHandler_QueryInterface,
2522 DocHostUIHandler_AddRef,
2523 DocHostUIHandler_Release,
2524 DocHostUIHandler_ShowContextMenu,
2525 DocHostUIHandler_GetHostInfo,
2526 DocHostUIHandler_ShowUI,
2527 DocHostUIHandler_HideUI,
2528 DocHostUIHandler_UpdateUI,
2529 DocHostUIHandler_EnableModeless,
2530 DocHostUIHandler_OnDocWindowActivate,
2531 DocHostUIHandler_OnFrameWindowActivate,
2532 DocHostUIHandler_ResizeBorder,
2533 DocHostUIHandler_TranslateAccelerator,
2534 DocHostUIHandler_GetOptionKeyPath,
2535 DocHostUIHandler_GetDropTarget,
2536 DocHostUIHandler_GetExternal,
2537 DocHostUIHandler_TranslateUrl,
2538 DocHostUIHandler_FilterDataObject,
2539 DocHostUIHandler_GetOverrideKeyPath
2540 };
2541
2542 static IDocHostUIHandler2 DocHostUIHandler = { &DocHostUIHandlerVtbl };
2543
2544 static HRESULT WINAPI CustomDocHostUIHandler_QueryInterface(IDocHostUIHandler2 *iface, REFIID riid, void **ppv)
2545 {
2546 if(IsEqualGUID(&IID_IDocHostUIHandler2, riid)) {
2547 *ppv = iface;
2548 return S_OK;
2549 }
2550
2551 if(IsEqualGUID(&IID_IOleCommandTarget, riid))
2552 return E_NOINTERFACE;
2553
2554 else if(IsEqualGUID(&IID_IDocHostShowUI, riid))
2555 return E_NOINTERFACE; /* TODO */
2556
2557 ok(0, "unexpected call %s\n", debugstr_guid(riid));
2558 return E_NOINTERFACE;
2559 }
2560
2561 static const IDocHostUIHandler2Vtbl CustomDocHostUIHandlerVtbl = {
2562 CustomDocHostUIHandler_QueryInterface,
2563 DocHostUIHandler_AddRef,
2564 DocHostUIHandler_Release,
2565 DocHostUIHandler_ShowContextMenu,
2566 DocHostUIHandler_GetHostInfo,
2567 DocHostUIHandler_ShowUI,
2568 DocHostUIHandler_HideUI,
2569 DocHostUIHandler_UpdateUI,
2570 DocHostUIHandler_EnableModeless,
2571 DocHostUIHandler_OnDocWindowActivate,
2572 DocHostUIHandler_OnFrameWindowActivate,
2573 DocHostUIHandler_ResizeBorder,
2574 DocHostUIHandler_TranslateAccelerator,
2575 DocHostUIHandler_GetOptionKeyPath,
2576 DocHostUIHandler_GetDropTarget,
2577 DocHostUIHandler_GetExternal,
2578 DocHostUIHandler_TranslateUrl,
2579 DocHostUIHandler_FilterDataObject,
2580 DocHostUIHandler_GetOverrideKeyPath
2581 };
2582
2583 static IDocHostUIHandler2 CustomDocHostUIHandler = { &CustomDocHostUIHandlerVtbl };
2584
2585 static HRESULT WINAPI OleCommandTarget_QueryInterface(IOleCommandTarget *iface,
2586 REFIID riid, void **ppv)
2587 {
2588 return QueryInterface(riid, ppv);
2589 }
2590
2591 static ULONG WINAPI OleCommandTarget_AddRef(IOleCommandTarget *iface)
2592 {
2593 return 2;
2594 }
2595
2596 static ULONG WINAPI OleCommandTarget_Release(IOleCommandTarget *iface)
2597 {
2598 return 1;
2599 }
2600
2601 static HRESULT WINAPI OleCommandTarget_QueryStatus(IOleCommandTarget *iface, const GUID *pguidCmdGroup,
2602 ULONG cCmds, OLECMD prgCmds[], OLECMDTEXT *pCmdText)
2603 {
2604 ok(!pguidCmdGroup, "pguidCmdGroup != MULL\n");
2605 ok(cCmds == 1, "cCmds=%d, expected 1\n", cCmds);
2606 ok(!pCmdText, "pCmdText != NULL\n");
2607
2608 switch(prgCmds[0].cmdID) {
2609 case OLECMDID_SETPROGRESSTEXT:
2610 CHECK_EXPECT(QueryStatus_SETPROGRESSTEXT);
2611 prgCmds[0].cmdf = OLECMDF_ENABLED;
2612 return S_OK;
2613 case OLECMDID_OPEN:
2614 CHECK_EXPECT(QueryStatus_OPEN);
2615 prgCmds[0].cmdf = 0;
2616 return S_OK;
2617 case OLECMDID_NEW:
2618 CHECK_EXPECT(QueryStatus_NEW);
2619 prgCmds[0].cmdf = 0;
2620 return S_OK;
2621 default:
2622 ok(0, "unexpected command %d\n", prgCmds[0].cmdID);
2623 };
2624
2625 return E_FAIL;
2626 }
2627
2628 static HRESULT WINAPI OleCommandTarget_Exec(IOleCommandTarget *iface, const GUID *pguidCmdGroup,
2629 DWORD nCmdID, DWORD nCmdexecopt, VARIANT *pvaIn, VARIANT *pvaOut)
2630 {
2631 if((!pguidCmdGroup || !IsEqualGUID(pguidCmdGroup, &CGID_Explorer))
2632 && (!pguidCmdGroup || !IsEqualGUID(&CGID_ShellDocView, pguidCmdGroup) || nCmdID != 63))
2633 test_readyState(NULL);
2634
2635 if(!pguidCmdGroup) {
2636 switch(nCmdID) {
2637 case OLECMDID_SETPROGRESSMAX:
2638 CHECK_EXPECT2(Exec_SETPROGRESSMAX);
2639 ok(nCmdexecopt == OLECMDEXECOPT_DONTPROMPTUSER, "nCmdexecopts=%08x\n", nCmdexecopt);
2640 ok(pvaIn != NULL, "pvaIn == NULL\n");
2641 if(pvaIn) {
2642 ok(V_VT(pvaIn) == VT_I4, "V_VT(pvaIn)=%d, expected VT_I4\n", V_VT(pvaIn));
2643 if(load_state == LD_NO)
2644 ok(V_I4(pvaIn) == 0, "V_I4(pvaIn)=%d, expected 0\n", V_I4(pvaIn));
2645 }
2646 ok(pvaOut == NULL, "pvaOut=%p, expected NULL\n", pvaOut);
2647 return S_OK;
2648 case OLECMDID_SETPROGRESSPOS:
2649 CHECK_EXPECT2(Exec_SETPROGRESSPOS);
2650 ok(nCmdexecopt == OLECMDEXECOPT_DONTPROMPTUSER, "nCmdexecopts=%08x\n", nCmdexecopt);
2651 ok(pvaIn != NULL, "pvaIn == NULL\n");
2652 if(pvaIn) {
2653 ok(V_VT(pvaIn) == VT_I4, "V_VT(pvaIn)=%d, expected VT_I4\n", V_VT(pvaIn));
2654 if(load_state == LD_NO)
2655 ok(V_I4(pvaIn) == 0, "V_I4(pvaIn)=%d, expected 0\n", V_I4(pvaIn));
2656 }
2657 ok(pvaOut == NULL, "pvaOut=%p, expected NULL\n", pvaOut);
2658 return S_OK;
2659 case OLECMDID_HTTPEQUIV_DONE:
2660 CHECK_EXPECT(Exec_HTTPEQUIV_DONE);
2661 ok(nCmdexecopt == 0, "nCmdexecopts=%08x\n", nCmdexecopt);
2662 ok(pvaOut == NULL, "pvaOut=%p\n", pvaOut);
2663 ok(pvaIn == NULL, "pvaIn=%p\n", pvaIn);
2664 readystate_set_loading = FALSE;
2665 readystate_set_interactive = FALSE;
2666 load_state = LD_COMPLETE;
2667 return S_OK;
2668 case OLECMDID_SETDOWNLOADSTATE:
2669 ok(nCmdexecopt == OLECMDEXECOPT_DONTPROMPTUSER, "nCmdexecopts=%08x\n", nCmdexecopt);
2670 ok(pvaOut == NULL, "pvaOut=%p\n", pvaOut);
2671 ok(pvaIn != NULL, "pvaIn == NULL\n");
2672 ok(V_VT(pvaIn) == VT_I4, "V_VT(pvaIn)=%d\n", V_VT(pvaIn));
2673
2674 switch(V_I4(pvaIn)) {
2675 case 0:
2676 CHECK_EXPECT(Exec_SETDOWNLOADSTATE_0);
2677 if(!loading_js)
2678 load_state = LD_INTERACTIVE;
2679 break;
2680 case 1:
2681 CHECK_EXPECT(Exec_SETDOWNLOADSTATE_1);
2682 readystate_set_interactive = (load_state != LD_INTERACTIVE);
2683 break;
2684 default:
2685 ok(0, "unexpevted V_I4(pvaIn)=%d\n", V_I4(pvaIn));
2686 }
2687
2688 return S_OK;
2689 case OLECMDID_UPDATECOMMANDS:
2690 CHECK_EXPECT(Exec_UPDATECOMMANDS);
2691 ok(nCmdexecopt == OLECMDEXECOPT_DONTPROMPTUSER, "nCmdexecopts=%08x\n", nCmdexecopt);
2692 ok(pvaIn == NULL, "pvaIn=%p\n", pvaIn);
2693 ok(pvaOut == NULL, "pvaOut=%p\n", pvaOut);
2694 return S_OK;
2695 case OLECMDID_SETTITLE:
2696 CHECK_EXPECT2(Exec_SETTITLE);
2697 ok(nCmdexecopt == OLECMDEXECOPT_DONTPROMPTUSER, "nCmdexecopts=%08x\n", nCmdexecopt);
2698 ok(pvaIn != NULL, "pvaIn == NULL\n");
2699 ok(pvaOut == NULL, "pvaOut=%p\n", pvaOut);
2700 ok(V_VT(pvaIn) == VT_BSTR, "V_VT(pvaIn)=%d\n", V_VT(pvaIn));
2701 ok(V_BSTR(pvaIn) != NULL, "V_BSTR(pvaIn) == NULL\n"); /* TODO */
2702 return S_OK;
2703 case OLECMDID_HTTPEQUIV:
2704 CHECK_EXPECT2(Exec_HTTPEQUIV);
2705 ok(!nCmdexecopt, "nCmdexecopts=%08x\n", nCmdexecopt);
2706 ok(pvaIn != NULL, "pvaIn == NULL\n");
2707 ok(pvaOut == NULL, "pvaOut=%p\n", pvaOut);
2708 ok(V_VT(pvaIn) == VT_BSTR, "V_VT(pvaIn)=%d\n", V_VT(pvaIn));
2709 ok(V_BSTR(pvaIn) != NULL, "V_BSTR(pvaIn) = NULL\n");
2710 test_readyState(NULL);
2711 return S_OK;
2712 case OLECMDID_UPDATETRAVELENTRY_DATARECOVERY:
2713 case 6058:
2714 return E_FAIL; /* FIXME */
2715 default:
2716 ok(0, "unexpected command %d\n", nCmdID);
2717 return E_FAIL;
2718 };
2719 }
2720
2721 if(IsEqualGUID(&CGID_ShellDocView, pguidCmdGroup)) {
2722 ok(nCmdexecopt == 0, "nCmdexecopts=%08x\n", nCmdexecopt);
2723
2724 switch(nCmdID) {
2725 case 37:
2726 CHECK_EXPECT2(Exec_ShellDocView_37);
2727
2728 if(nav_url)
2729 test_GetCurMoniker(doc_unk, NULL, nav_url);
2730 else if(load_from_stream)
2731 test_GetCurMoniker(doc_unk, NULL, "about:blank");
2732 else if(!editmode)
2733 test_GetCurMoniker(doc_unk, doc_mon, NULL);
2734
2735 ok(pvaOut == NULL, "pvaOut=%p, expected NULL\n", pvaOut);
2736 ok(pvaIn != NULL, "pvaIn == NULL\n");
2737 if(pvaIn) {
2738 ok(V_VT(pvaIn) == VT_I4, "V_VT(pvaIn)=%d, expected VT_I4\n", V_VT(pvaIn));
2739 ok(V_I4(pvaIn) == 0, "V_I4(pvaIn)=%d, expected 0\n", V_I4(pvaIn));
2740 }
2741 return S_OK;
2742
2743 case 63: {
2744 IHTMLPrivateWindow *priv_window;
2745 HRESULT hres;
2746
2747 CHECK_EXPECT(Exec_ShellDocView_63);
2748 ok(pvaIn != NULL, "pvaIn == NULL\n");
2749 ok(V_VT(pvaIn) == VT_UNKNOWN, "V_VT(pvaIn) = %d\n", V_VT(pvaIn));
2750 ok(V_UNKNOWN(pvaIn) != NULL, "VPUNKNOWN(pvaIn) = NULL\n");
2751 ok(pvaOut != NULL, "pvaOut == NULL\n");
2752 ok(V_VT(pvaOut) == VT_EMPTY, "V_VT(pvaOut) = %d\n", V_VT(pvaOut));
2753
2754 hres = IUnknown_QueryInterface(V_UNKNOWN(pvaIn), &IID_IHTMLPrivateWindow, (void**)&priv_window);
2755 ok(hres == S_OK, "Could not get IHTMLPrivateWindow: %08x\n", hres);
2756 if(SUCCEEDED(hres))
2757 IHTMLPrivateWindow_Release(priv_window);
2758
2759 load_state = loading_js ? LD_COMPLETE : LD_LOADING;
2760 return S_OK; /* TODO */
2761 }
2762
2763 case 67:
2764 CHECK_EXPECT(Exec_ShellDocView_67);
2765 ok(pvaIn != NULL, "pvaIn == NULL\n");
2766 ok(V_VT(pvaIn) == VT_BSTR, "V_VT(pvaIn) = %d\n", V_VT(pvaIn));
2767 if(!loading_hash)
2768 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);
2769 else
2770 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);
2771 ok(pvaOut != NULL, "pvaOut == NULL\n");
2772 ok(V_VT(pvaOut) == VT_BOOL, "V_VT(pvaOut) = %d\n", V_VT(pvaOut));
2773 ok(V_BOOL(pvaOut) == VARIANT_TRUE, "V_BOOL(pvaOut) = %x\n", V_BOOL(pvaOut));
2774 if(!loading_hash)
2775 load_state = LD_DOLOAD;
2776 return S_OK;
2777
2778 case 84:
2779 CHECK_EXPECT2(Exec_ShellDocView_84);
2780
2781 ok(pvaIn == NULL, "pvaIn != NULL\n");
2782 ok(pvaOut != NULL, "pvaOut == NULL\n");
2783 if(pvaIn)
2784 ok(V_VT(pvaOut) == VT_EMPTY, "V_VT(pvaOut)=%d\n", V_VT(pvaOut));
2785
2786 return E_NOTIMPL;
2787
2788 case 103:
2789 CHECK_EXPECT2(Exec_ShellDocView_103);
2790
2791 ok(pvaIn == NULL, "pvaIn != NULL\n");
2792 ok(pvaOut == NULL, "pvaOut != NULL\n");
2793
2794 return E_NOTIMPL;
2795
2796 case 105:
2797 CHECK_EXPECT2(Exec_ShellDocView_105);
2798
2799 ok(pvaIn != NULL, "pvaIn == NULL\n");
2800 ok(pvaOut == NULL, "pvaOut != NULL\n");
2801
2802 return E_NOTIMPL;
2803
2804 case 140:
2805 CHECK_EXPECT2(Exec_ShellDocView_140);
2806
2807 ok(pvaIn == NULL, "pvaIn != NULL\n");
2808 ok(pvaOut == NULL, "pvaOut != NULL\n");
2809
2810 return E_NOTIMPL;
2811
2812 case 143: /* TODO */
2813 case 144: /* TODO */
2814 return E_NOTIMPL;
2815
2816 default:
2817 ok(0, "unexpected command %d\n", nCmdID);
2818 return E_FAIL;
2819 };
2820 }
2821
2822 if(IsEqualGUID(&CGID_MSHTML, pguidCmdGroup)) {
2823 ok(nCmdexecopt == 0, "nCmdexecopts=%08x\n", nCmdexecopt);
2824
2825 switch(nCmdID) {
2826 case IDM_PARSECOMPLETE:
2827 CHECK_EXPECT(Exec_MSHTML_PARSECOMPLETE);
2828 ok(pvaIn == NULL, "pvaIn != NULL\n");
2829 ok(pvaOut == NULL, "pvaOut != NULL\n");
2830 return S_OK;
2831 default:
2832 ok(0, "unexpected command %d\n", nCmdID);
2833 };
2834 }
2835
2836 if(IsEqualGUID(&CGID_DocHostCmdPriv, pguidCmdGroup)) {
2837 switch(nCmdID) {
2838 case DOCHOST_DOCCANNAVIGATE:
2839 CHECK_EXPECT(Exec_DOCCANNAVIGATE);
2840 ok(pvaIn != NULL, "pvaIn == NULL\n");
2841 ok(pvaOut == NULL, "pvaOut != NULL\n");
2842 ok(V_VT(pvaIn) == VT_UNKNOWN, "V_VT(pvaIn) != VT_UNKNOWN\n");
2843 /* FIXME: test V_UNKNOWN(pvaIn) == window */
2844 return S_OK;
2845 case 1: {
2846 SAFEARRAY *sa;
2847 UINT dim;
2848 LONG ind=0;
2849 VARIANT var;
2850 HRESULT hres;
2851
2852 ok(pvaIn != NULL, "pvaIn == NULL\n");
2853 ok(pvaOut != NULL, "pvaOut != NULL\n");
2854 ok(V_VT(pvaIn) == VT_ARRAY, "V_VT(pvaIn) = %d\n", V_VT(pvaIn));
2855 ok(V_VT(pvaOut) == VT_BOOL, "V_VT(pvaOut) = %d\n", V_VT(pvaOut));
2856 sa = V_ARRAY(pvaIn);
2857
2858 dim = SafeArrayGetDim(sa);
2859 ok(dim == 1, "dim = %d\n", dim);
2860 hres = SafeArrayGetLBound(sa, 1, &ind);
2861 ok(hres == S_OK, "SafeArrayGetLBound failed: %x\n", hres);
2862 ok(ind == 0, "Lower bound = %d\n", ind);
2863 hres = SafeArrayGetUBound(sa, 1, &ind);
2864 ok(hres == S_OK, "SafeArrayGetUBound failed: %x\n", hres);
2865 ok(ind == 7 || broken(ind == 5), "Upper bound = %d\n", ind);
2866
2867 ind = 0;
2868 SafeArrayGetElement(sa, &ind, &var);
2869 ok(V_VT(&var) == VT_I4, "Incorrect data type: %d\n", V_VT(&var));
2870 ok(V_I4(&var) == status_code, "Incorrect error code: %d\n", V_I4(&var));
2871 VariantClear(&var);
2872 ind = 1;
2873 SafeArrayGetElement(sa, &ind, &var);
2874 ok(V_VT(&var) == VT_BSTR, "Incorrect data type: %d\n", V_VT(&var));
2875 ok(!strcmp_wa(V_BSTR(&var), "winetest:doc"), "Page address: %s\n", wine_dbgstr_w(V_BSTR(&var)));
2876 VariantClear(&var);
2877 ind = 2;
2878 SafeArrayGetElement(sa, &ind, &var);
2879 ok(V_VT(&var) == VT_UNKNOWN, "Incorrect data type: %d\n", V_VT(&var));
2880 VariantClear(&var);
2881 ind = 3;
2882 SafeArrayGetElement(sa, &ind, &var);
2883 ok(V_VT(&var) == VT_UNKNOWN, "Incorrect data type: %d\n", V_VT(&var));
2884 VariantClear(&var);
2885 ind = 4;
2886 SafeArrayGetElement(sa, &ind, &var);
2887 ok(V_VT(&var) == VT_BOOL, "Incorrect data type: %d\n", V_VT(&var));
2888 ok(!V_BOOL(&var), "Unknown value is incorrect\n");
2889 VariantClear(&var);
2890 ind = 5;
2891 SafeArrayGetElement(sa, &ind, &var);
2892 ok(V_VT(&var) == VT_BOOL, "Incorrect data type: %d\n", V_VT(&var));
2893 ok(!V_BOOL(&var), "Unknown value is incorrect\n");
2894 VariantClear(&var);
2895 }
2896 default:
2897 return E_FAIL; /* TODO */
2898 }
2899 }
2900
2901 if(IsEqualGUID(&CGID_Explorer, pguidCmdGroup)) {
2902 ok(nCmdexecopt == 0, "nCmdexecopts=%08x\n", nCmdexecopt);
2903
2904 switch(nCmdID) {
2905 case 69:
2906 CHECK_EXPECT2(Exec_Explorer_69);
2907 ok(pvaIn == NULL, "pvaIn != NULL\n");
2908 ok(pvaOut != NULL, "pvaOut == NULL\n");
2909 return E_NOTIMPL;
2910 case 109: /* TODO */
2911 return E_NOTIMPL;
2912 default:
2913 ok(0, "unexpected cmd %d of CGID_Explorer\n", nCmdID);
2914 }
2915 return E_NOTIMPL;
2916 }
2917
2918 if(IsEqualGUID(&CGID_DocHostCommandHandler, pguidCmdGroup)) {
2919 switch (nCmdID) {
2920 case OLECMDID_PAGEACTIONBLOCKED: /* win2k3 */
2921 SET_EXPECT(SetStatusText);
2922 ok(pvaIn == NULL, "pvaIn != NULL\n");
2923 ok(pvaOut == NULL, "pvaOut != NULL\n");
2924 return S_OK;
2925 case OLECMDID_SHOWSCRIPTERROR:
2926 /* TODO */
2927 return S_OK;
2928 default:
2929 ok(0, "unexpected command %d\n", nCmdID);
2930 return E_FAIL;
2931 }
2932 }
2933
2934 ok(0, "unexpected pguidCmdGroup: %s\n", debugstr_guid(pguidCmdGroup));
2935 return E_NOTIMPL;
2936 }
2937
2938 static IOleCommandTargetVtbl OleCommandTargetVtbl = {
2939 OleCommandTarget_QueryInterface,
2940 OleCommandTarget_AddRef,
2941 OleCommandTarget_Release,
2942 OleCommandTarget_QueryStatus,
2943 OleCommandTarget_Exec
2944 };
2945
2946 static IOleCommandTarget OleCommandTarget = { &OleCommandTargetVtbl };
2947
2948 static HRESULT WINAPI Dispatch_QueryInterface(IDispatch *iface, REFIID riid, void **ppv)
2949 {
2950 return QueryInterface(riid, ppv);
2951 }
2952
2953 static HRESULT WINAPI Dispatch_Invoke(IDispatch *iface, DISPID dispIdMember, REFIID riid,
2954 LCID lcid, WORD wFlags, DISPPARAMS *pDispParams, VARIANT *pVarResult,
2955 EXCEPINFO *pExcepInfo, UINT *puArgErr)
2956 {
2957 ok(IsEqualGUID(&IID_NULL, riid), "riid != IID_NULL\n");
2958 ok(pDispParams != NULL, "pDispParams == NULL\n");
2959 ok(pExcepInfo == NULL, "pExcepInfo=%p, expected NULL\n", pExcepInfo);
2960 ok(puArgErr != NULL, "puArgErr == NULL\n");
2961 ok(V_VT(pVarResult) == 0, "V_VT(pVarResult)=%d, expected 0\n", V_VT(pVarResult));
2962 ok(wFlags == DISPATCH_PROPERTYGET, "wFlags=%08x, expected DISPATCH_PROPERTYGET\n", wFlags);
2963 test_readyState(NULL);
2964
2965 switch(dispIdMember) {
2966 case DISPID_AMBIENT_USERMODE:
2967 CHECK_EXPECT2(Invoke_AMBIENT_USERMODE);
2968 V_VT(pVarResult) = VT_BOOL;
2969 V_BOOL(pVarResult) = VARIANT_TRUE;
2970 return S_OK;
2971 case DISPID_AMBIENT_DLCONTROL:
2972 CHECK_EXPECT2(Invoke_AMBIENT_DLCONTROL);
2973 return E_FAIL;
2974 case DISPID_AMBIENT_OFFLINEIFNOTCONNECTED:
2975 CHECK_EXPECT2(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
2976 return E_FAIL;
2977 case DISPID_AMBIENT_SILENT:
2978 CHECK_EXPECT2(Invoke_AMBIENT_SILENT);
2979 V_VT(pVarResult) = VT_BOOL;
2980 V_BOOL(pVarResult) = VARIANT_FALSE;
2981 return S_OK;
2982 case DISPID_AMBIENT_USERAGENT:
2983 CHECK_EXPECT(Invoke_AMBIENT_USERAGENT);
2984 return E_FAIL;
2985 case DISPID_AMBIENT_PALETTE:
2986 CHECK_EXPECT(Invoke_AMBIENT_PALETTE);
2987 return E_FAIL;
2988 };
2989
2990 ok(0, "unexpected dispid %d\n", dispIdMember);
2991 return E_FAIL;
2992 }
2993
2994 static const IDispatchVtbl DispatchVtbl = {
2995 Dispatch_QueryInterface,
2996 Dispatch_AddRef,
2997 Dispatch_Release,
2998 Dispatch_GetTypeInfoCount,
2999 Dispatch_GetTypeInfo,
3000 Dispatch_GetIDsOfNames,
3001 Dispatch_Invoke
3002 };
3003
3004 static IDispatch Dispatch = { &DispatchVtbl };
3005
3006 static HRESULT WINAPI EventDispatch_QueryInterface(IDispatch *iface, REFIID riid, void **ppv)
3007 {
3008 if(IsEqualGUID(&IID_IUnknown, riid) || IsEqualGUID(&IID_IDispatch, riid)) {
3009 *ppv = iface;
3010 return S_OK;
3011 }
3012
3013 ok(0, "Unexpected call\n");
3014 return E_NOINTERFACE;
3015 }
3016
3017 static HRESULT WINAPI EventDispatch_Invoke(IDispatch *iface, DISPID dispIdMember, REFIID riid,
3018 LCID lcid, WORD wFlags, DISPPARAMS *pDispParams, VARIANT *pVarResult,
3019 EXCEPINFO *pExcepInfo, UINT *puArgErr)
3020 {
3021 HRESULT hres;
3022 IHTMLDocument2 *doc;
3023 BSTR state;
3024
3025 ok(IsEqualGUID(&IID_NULL, riid), "riid = %s\n", debugstr_guid(riid));
3026 ok(pDispParams != NULL, "pDispParams == NULL\n");
3027 ok(pExcepInfo != NULL, "pExcepInfo == NULL\n");
3028 ok(puArgErr != NULL, "puArgErr == NULL\n");
3029 ok(V_VT(pVarResult) == 0, "V_VT(pVarResult) = %d\n", V_VT(pVarResult));
3030 ok(wFlags == DISPATCH_METHOD, "wFlags = %d, expected DISPATCH_METHOD\n", wFlags);
3031
3032 hres = IUnknown_QueryInterface(doc_unk, &IID_IHTMLDocument2, (void**)&doc);
3033 ok(hres == S_OK, "QueryInterface(IID_IHTMLDocument2) failed: %08x\n", hres);
3034
3035 switch(dispIdMember) {
3036 case DISPID_HTMLDOCUMENTEVENTS2_ONREADYSTATECHANGE:
3037 hres = IHTMLDocument2_get_readyState(doc, &state);
3038 ok(hres == S_OK, "get_readyState failed: %08x\n", hres);
3039
3040 if(!strcmp_wa(state, "interactive"))
3041 CHECK_EXPECT(Invoke_OnReadyStateChange_Interactive);
3042 else if(!strcmp_wa(state, "loading"))
3043 CHECK_EXPECT(Invoke_OnReadyStateChange_Loading);
3044 else if(!strcmp_wa(state, "complete")) {
3045 CHECK_EXPECT(Invoke_OnReadyStateChange_Complete);
3046 complete = TRUE;
3047 } else
3048 ok(0, "Unexpected readyState: %s\n", wine_dbgstr_w(state));
3049
3050 SysFreeString(state);
3051 break;
3052 case DISPID_HTMLDOCUMENTEVENTS2_ONPROPERTYCHANGE:
3053 case 1026:
3054 case 1027:
3055 case 1034:
3056 case 1035:
3057 case 1037:
3058 case 1047:
3059 case 1045:
3060 case 1044:
3061 case 1048:
3062 case 1049:
3063 break; /* FIXME: Handle these events. */
3064 default:
3065 ok(0, "Unexpected DISPID: %d\n", dispIdMember);
3066 }
3067
3068 IHTMLDocument2_Release(doc);
3069 return S_OK;
3070 }
3071
3072 static const IDispatchVtbl EventDispatchVtbl = {
3073 EventDispatch_QueryInterface,
3074 Dispatch_AddRef,
3075 Dispatch_Release,
3076 Dispatch_GetTypeInfoCount,
3077 Dispatch_GetTypeInfo,
3078 Dispatch_GetIDsOfNames,
3079 EventDispatch_Invoke
3080 };
3081
3082 static IDispatch EventDispatch = { &EventDispatchVtbl };
3083
3084 static HRESULT browserservice_qi(REFIID,void**);
3085
3086 static HRESULT WINAPI DocObjectService_QueryInterface(IDocObjectService* This, REFIID riid, void **ppv)
3087 {
3088 return browserservice_qi(riid, ppv);
3089 }
3090
3091 static ULONG WINAPI DocObjectService_AddRef(
3092 IDocObjectService* This)
3093 {
3094 return 2;
3095 }
3096
3097 static ULONG WINAPI DocObjectService_Release(
3098 IDocObjectService* This)
3099 {
3100 return 1;
3101 }
3102
3103 static HRESULT WINAPI DocObjectService_FireBeforeNavigate2(IDocObjectService *iface, IDispatch *pDispatch,
3104 LPCWSTR lpszUrl, DWORD dwFlags, LPCWSTR lpszFrameName, BYTE *pPostData, DWORD cbPostData,
3105 LPCWSTR lpszHeaders, BOOL fPlayNavSound, BOOL *pfCancel)
3106 {
3107 CHECK_EXPECT(FireBeforeNavigate2);
3108
3109 ok(!pDispatch, "pDispatch = %p\n", pDispatch);
3110 ok(!strcmp_wa(lpszUrl, nav_url), "lpszUrl = %s, expected %s\n", wine_dbgstr_w(lpszUrl), nav_url);
3111 ok(dwFlags == 0x40 || !dwFlags, "dwFlags = %x\n", dwFlags);
3112 ok(!lpszFrameName, "lpszFrameName = %s\n", wine_dbgstr_w(lpszFrameName));
3113 ok(!pPostData, "pPostData = %p\n", pPostData);
3114 ok(!cbPostData, "cbPostData = %d\n", cbPostData);
3115 ok(!lpszHeaders, "lpszHeaders = %s\n", wine_dbgstr_w(lpszHeaders));
3116 ok(fPlayNavSound, "fPlayNavSound = %x\n", fPlayNavSound);
3117 ok(pfCancel != NULL, "pfCancel = NULL\n");
3118 ok(!*pfCancel, "*pfCancel = %x\n", *pfCancel);
3119
3120 return S_OK;
3121 }
3122
3123 static HRESULT WINAPI DocObjectService_FireNavigateComplete2(
3124 IDocObjectService* This,
3125 IHTMLWindow2 *pHTMLWindow2,
3126 DWORD dwFlags)
3127 {
3128 CHECK_EXPECT(FireNavigateComplete2);
3129 test_readyState(NULL);
3130
3131 if(loading_hash)
3132 ok(dwFlags == 0x10 || broken(!dwFlags), "dwFlags = %x, expected 0x10\n", dwFlags);
3133 else
3134 ok(!(dwFlags &~1), "dwFlags = %x\n", dwFlags);
3135
3136 ok(pHTMLWindow2 != NULL, "pHTMLWindow2 = NULL\n");
3137
3138 return S_OK;
3139 }
3140
3141 static HRESULT WINAPI DocObjectService_FireDownloadBegin(
3142 IDocObjectService* This)
3143 {
3144 ok(0, "unexpected call\n");
3145 return E_NOTIMPL;
3146 }
3147
3148 static HRESULT WINAPI DocObjectService_FireDownloadComplete(
3149 IDocObjectService* This)
3150 {
3151 ok(0, "unexpected call\n");
3152 return E_NOTIMPL;
3153 }
3154
3155 static HRESULT WINAPI DocObjectService_FireDocumentComplete(
3156 IDocObjectService* This,
3157 IHTMLWindow2 *pHTMLWindow,
3158 DWORD dwFlags)
3159 {
3160 CHECK_EXPECT(FireDocumentComplete);
3161
3162 ok(pHTMLWindow != NULL, "pHTMLWindow == NULL\n");
3163 ok(!dwFlags, "dwFlags = %x\n", dwFlags);
3164
3165 return S_OK;
3166 }
3167
3168 static HRESULT WINAPI DocObjectService_UpdateDesktopComponent(
3169 IDocObjectService* This,
3170 IHTMLWindow2 *pHTMLWindow)
3171 {
3172 ok(0, "unexpected call\n");
3173 return E_NOTIMPL;
3174 }
3175
3176 static HRESULT WINAPI DocObjectService_GetPendingUrl(
3177 IDocObjectService* This,
3178 BSTR *pbstrPendingUrl)
3179 {
3180 CHECK_EXPECT(GetPendingUrl);
3181 return E_NOTIMPL;
3182 }
3183
3184 static HRESULT WINAPI DocObjectService_ActiveElementChanged(
3185 IDocObjectService* This,
3186 IHTMLElement *pHTMLElement)
3187 {
3188 CHECK_EXPECT(ActiveElementChanged);
3189 return E_NOTIMPL;
3190 }
3191
3192 static HRESULT WINAPI DocObjectService_GetUrlSearchComponent(
3193 IDocObjectService* This,
3194 BSTR *pbstrSearch)
3195 {
3196 ok(0, "unexpected call\n");
3197 return E_NOTIMPL;
3198 }
3199
3200 static HRESULT WINAPI DocObjectService_IsErrorUrl(
3201 IDocObjectService* This,
3202 LPCWSTR lpszUrl,
3203 BOOL *pfIsError)
3204 {
3205 CHECK_EXPECT(IsErrorUrl);
3206 *pfIsError = FALSE;
3207 return S_OK;
3208 }
3209
3210 static IDocObjectServiceVtbl DocObjectServiceVtbl = {
3211 DocObjectService_QueryInterface,
3212 DocObjectService_AddRef,
3213 DocObjectService_Release,
3214 DocObjectService_FireBeforeNavigate2,
3215 DocObjectService_FireNavigateComplete2,
3216 DocObjectService_FireDownloadBegin,
3217 DocObjectService_FireDownloadComplete,
3218 DocObjectService_FireDocumentComplete,
3219 DocObjectService_UpdateDesktopComponent,
3220 DocObjectService_GetPendingUrl,
3221 DocObjectService_ActiveElementChanged,
3222 DocObjectService_GetUrlSearchComponent,
3223 DocObjectService_IsErrorUrl
3224 };
3225
3226 static IDocObjectService DocObjectService = { &DocObjectServiceVtbl };
3227
3228 static HRESULT WINAPI ShellBrowser_QueryInterface(IShellBrowser *iface, REFIID riid, void **ppv)
3229 {
3230 return browserservice_qi(riid, ppv);
3231 }
3232
3233 static ULONG WINAPI ShellBrowser_AddRef(IShellBrowser *iface)
3234 {
3235 return 2;
3236 }
3237
3238 static ULONG WINAPI ShellBrowser_Release(IShellBrowser *iface)
3239 {
3240 return 1;
3241 }
3242
3243 static HRESULT WINAPI ShellBrowser_GetWindow(IShellBrowser *iface, HWND *phwnd)
3244 {
3245 ok(0, "unexpected call\n");
3246 return E_NOTIMPL;
3247 }
3248
3249 static HRESULT WINAPI ShellBrowser_ContextSensitiveHelp(IShellBrowser *iface, BOOL fEnterMode)
3250 {
3251 ok(0, "unexpected call\n");
3252 return E_NOTIMPL;
3253 }
3254
3255 static HRESULT WINAPI ShellBrowser_InsertMenusSB(IShellBrowser *iface, HMENU hmenuShared, LPOLEMENUGROUPWIDTHS lpMenuWidths)
3256 {
3257 ok(0, "unexpected call\n");
3258 return E_NOTIMPL;
3259 }
3260
3261 static HRESULT WINAPI ShellBrowser_SetMenuSB(IShellBrowser *iface, HMENU hmenuShared, HOLEMENU holemenuReserved,
3262 HWND hwndActiveObject)
3263 {
3264 ok(0, "unexpected call\n");
3265 return E_NOTIMPL;
3266 }
3267
3268 static HRESULT WINAPI ShellBrowser_RemoveMenusSB(IShellBrowser *iface, HMENU hmenuShared)
3269 {
3270 ok(0, "unexpected call\n");
3271 return E_NOTIMPL;
3272 }
3273
3274 static HRESULT WINAPI ShellBrowser_SetStatusTextSB(IShellBrowser *iface, LPCOLESTR pszStatusText)
3275 {
3276 ok(0, "unexpected call\n");
3277 return E_NOTIMPL;
3278 }
3279
3280 static HRESULT WINAPI ShellBrowser_EnableModelessSB(IShellBrowser *iface, BOOL fEnable)
3281 {
3282 ok(0, "unexpected call\n");
3283 return E_NOTIMPL;
3284 }
3285
3286 static HRESULT WINAPI ShellBrowser_TranslateAcceleratorSB(IShellBrowser *iface, MSG *pmsg, WORD wID)
3287 {
3288 ok(0, "unexpected call\n");
3289 return E_NOTIMPL;
3290 }
3291
3292 static HRESULT WINAPI ShellBrowser_BrowseObject(IShellBrowser *iface, LPCITEMIDLIST pidl, UINT wFlags)
3293 {
3294 ok(0, "unexpected call\n");
3295 return E_NOTIMPL;
3296 }
3297
3298 static HRESULT WINAPI ShellBrowser_GetViewStateStream(IShellBrowser *iface, DWORD grfMode, IStream **ppStrm)
3299 {
3300 ok(0, "unexpected call\n");
3301 return E_NOTIMPL;
3302 }
3303
3304 static HRESULT WINAPI ShellBrowser_GetControlWindow(IShellBrowser *iface, UINT id, HWND *phwnd)
3305 {
3306 ok(0, "unexpected call\n");
3307 return E_NOTIMPL;
3308 }
3309
3310 static HRESULT WINAPI ShellBrowser_SendControlMsg(IShellBrowser *iface, UINT id, UINT uMsg, WPARAM wParam,
3311 LPARAM lParam, LRESULT *pret)
3312 {
3313 ok(0, "unexpected call\n");
3314 return E_NOTIMPL;
3315 }
3316
3317 static HRESULT WINAPI ShellBrowser_QueryActiveShellView(IShellBrowser *iface, IShellView **ppshv)
3318 {
3319 ok(0, "unexpected call\n");
3320 return E_NOTIMPL;
3321 }
3322
3323 static HRESULT WINAPI ShellBrowser_OnViewWindowActive(IShellBrowser* iface, IShellView *pshv)
3324 {
3325 ok(0, "unexpected call\n");
3326 return E_NOTIMPL;
3327 }
3328
3329 static HRESULT WINAPI ShellBrowser_SetToolbarItems(IShellBrowser *iface, LPTBBUTTONSB lpButtons,
3330 UINT nButtons, UINT uFlags)
3331 {
3332 ok(0, "unexpected call\n");
3333 return E_NOTIMPL;
3334 }
3335
3336 static const IShellBrowserVtbl ShellBrowserVtbl = {
3337 ShellBrowser_QueryInterface,
3338 ShellBrowser_AddRef,
3339 ShellBrowser_Release,
3340 ShellBrowser_GetWindow,
3341 ShellBrowser_ContextSensitiveHelp,
3342 ShellBrowser_InsertMenusSB,
3343 ShellBrowser_SetMenuSB,
3344 ShellBrowser_RemoveMenusSB,
3345 ShellBrowser_SetStatusTextSB,
3346 ShellBrowser_EnableModelessSB,
3347 ShellBrowser_TranslateAcceleratorSB,
3348 ShellBrowser_BrowseObject,
3349 ShellBrowser_GetViewStateStream,
3350 ShellBrowser_GetControlWindow,
3351 ShellBrowser_SendControlMsg,
3352 ShellBrowser_QueryActiveShellView,
3353 ShellBrowser_OnViewWindowActive,
3354 ShellBrowser_SetToolbarItems
3355 };
3356
3357 static IShellBrowser ShellBrowser = { &ShellBrowserVtbl };
3358
3359 static HRESULT WINAPI BrowserService_QueryInterface(IBrowserService *iface, REFIID riid, void **ppv)
3360 {
3361 return browserservice_qi(riid, ppv);
3362 }
3363
3364 static ULONG WINAPI BrowserService_AddRef(
3365 IBrowserService* This)
3366 {
3367 return 2;
3368 }
3369
3370 static ULONG WINAPI BrowserService_Release(
3371 IBrowserService* This)
3372 {
3373 return 1;
3374 }
3375
3376 static HRESULT WINAPI BrowserService_GetParentSite(
3377 IBrowserService* This,
3378 IOleInPlaceSite **ppipsite)
3379 {
3380 ok(0, "unexpected call\n");
3381 return E_NOTIMPL;
3382 }
3383
3384 static HRESULT WINAPI BrowserService_SetTitle(
3385 IBrowserService* This,
3386 IShellView *psv,
3387 LPCWSTR pszName)
3388 {
3389 ok(0, "unexpected call\n");
3390 return E_NOTIMPL;
3391 }
3392
3393 static HRESULT WINAPI BrowserService_GetTitle(
3394 IBrowserService* This,
3395 IShellView *psv,
3396 LPWSTR pszName,
3397 DWORD cchName)
3398 {
3399 ok(0, "unexpected call\n");
3400 return E_NOTIMPL;
3401 }
3402
3403 static HRESULT WINAPI BrowserService_GetOleObject(
3404 IBrowserService* This,
3405 IOleObject **ppobjv)
3406 {
3407 ok(0, "unexpected call\n");
3408 return E_NOTIMPL;
3409 }
3410
3411 static HRESULT WINAPI BrowserService_GetTravelLog(
3412 IBrowserService* This,
3413 ITravelLog **pptl)
3414 {
3415 CHECK_EXPECT(GetTravelLog);
3416 return E_NOTIMPL;
3417 }
3418
3419 static HRESULT WINAPI BrowserService_ShowControlWindow(
3420 IBrowserService* This,
3421 UINT id,
3422 BOOL fShow)
3423 {
3424 ok(0, "unexpected call\n");
3425 return E_NOTIMPL;
3426 }
3427
3428 static HRESULT WINAPI BrowserService_IsControlWindowShown(
3429 IBrowserService* This,
3430 UINT id,
3431 BOOL *pfShown)
3432 {
3433 ok(0, "unexpected call\n");
3434 return E_NOTIMPL;
3435 }
3436
3437 static HRESULT WINAPI BrowserService_IEGetDisplayName(
3438 IBrowserService* This,
3439 PCIDLIST_ABSOLUTE pidl,
3440 LPWSTR pwszName,
3441 UINT uFlags)
3442 {
3443 ok(0, "unexpected call\n");
3444 return E_NOTIMPL;
3445 }
3446
3447 static HRESULT WINAPI BrowserService_IEParseDisplayName(
3448 IBrowserService* This,
3449 UINT uiCP,
3450 LPCWSTR pwszPath,
3451 PIDLIST_ABSOLUTE *ppidlOut)
3452 {
3453 ok(0, "unexpected call\n");
3454 return E_NOTIMPL;
3455 }
3456
3457 static HRESULT WINAPI BrowserService_DisplayParseError(
3458 IBrowserService* This,
3459 HRESULT hres,
3460 LPCWSTR pwszPath)
3461 {
3462 ok(0, "unexpected call\n");
3463 return E_NOTIMPL;
3464 }
3465
3466 static HRESULT WINAPI BrowserService_NavigateToPidl(
3467 IBrowserService* This,
3468 PCIDLIST_ABSOLUTE pidl,
3469 DWORD grfHLNF)
3470 {
3471 ok(0, "unexpected call\n");
3472 return E_NOTIMPL;
3473 }
3474
3475 static HRESULT WINAPI BrowserService_SetNavigateState(
3476 IBrowserService* This,
3477 BNSTATE bnstate)
3478 {
3479 ok(0, "unexpected call\n");
3480 return E_NOTIMPL;
3481 }
3482
3483 static HRESULT WINAPI BrowserService_GetNavigateState(
3484 IBrowserService* This,
3485 BNSTATE *pbnstate)
3486 {
3487 ok(0, "unexpected call\n");
3488 return E_NOTIMPL;
3489 }
3490
3491 static HRESULT WINAPI BrowserService_NotifyRedirect(
3492 IBrowserService* This,
3493 IShellView *psv,
3494 PCIDLIST_ABSOLUTE pidl,
3495 BOOL *pfDidBrowse)
3496 {
3497 ok(0, "unexpected call\n");
3498 return E_NOTIMPL;
3499 }
3500
3501 static HRESULT WINAPI BrowserService_UpdateWindowList(
3502 IBrowserService* This)
3503 {
3504 ok(0, "unexpected call\n");
3505 return E_NOTIMPL;
3506 }
3507
3508 static HRESULT WINAPI BrowserService_UpdateBackForwardState(
3509 IBrowserService* This)
3510 {
3511 CHECK_EXPECT(UpdateBackForwardState);
3512 return S_OK;
3513 }
3514
3515 static HRESULT WINAPI BrowserService_SetFlags(
3516 IBrowserService* This,
3517 DWORD dwFlags,
3518 DWORD dwFlagMask)
3519 {
3520 ok(0, "unexpected call\n");
3521 return E_NOTIMPL;
3522 }
3523
3524 static HRESULT WINAPI BrowserService_GetFlags(
3525 IBrowserService* This,
3526 DWORD *pdwFlags)
3527 {
3528 ok(0, "unexpected call\n");
3529 return E_NOTIMPL;
3530 }
3531
3532 static HRESULT WINAPI BrowserService_CanNavigateNow(
3533 IBrowserService* This)
3534 {
3535 ok(0, "unexpected call\n");
3536 return E_NOTIMPL;
3537 }
3538
3539 static HRESULT WINAPI BrowserService_GetPidl(
3540 IBrowserService* This,
3541 PIDLIST_ABSOLUTE *ppidl)
3542 {
3543 ok(0, "unexpected call\n");
3544 return E_NOTIMPL;
3545 }
3546
3547 static HRESULT WINAPI BrowserService_SetReferrer(
3548 IBrowserService* This,
3549 PCIDLIST_ABSOLUTE pidl)
3550 {
3551 ok(0, "unexpected call\n");
3552 return E_NOTIMPL;
3553 }
3554
3555 static DWORD WINAPI BrowserService_GetBrowserIndex(
3556 IBrowserService* This)
3557 {
3558 ok(0, "unexpected call\n");
3559 return E_NOTIMPL;
3560 }
3561
3562 static HRESULT WINAPI BrowserService_GetBrowserByIndex(
3563 IBrowserService* This,
3564 DWORD dwID,
3565 IUnknown **ppunk)
3566 {
3567 ok(0, "unexpected call\n");
3568 return E_NOTIMPL;
3569 }
3570
3571 static HRESULT WINAPI BrowserService_GetHistoryObject(
3572 IBrowserService* This,
3573 IOleObject **ppole,
3574 IStream **pstm,
3575 IBindCtx **ppbc)
3576 {
3577 ok(0, "unexpected call\n");
3578 return E_NOTIMPL;
3579 }
3580
3581 static HRESULT WINAPI BrowserService_SetHistoryObject(
3582 IBrowserService* This,
3583 IOleObject *pole,
3584 BOOL fIsLocalAnchor)
3585 {
3586 ok(0, "unexpected call\n");
3587 return E_NOTIMPL;
3588 }
3589
3590 static HRESULT WINAPI BrowserService_CacheOLEServer(
3591 IBrowserService* This,
3592 IOleObject *pole)
3593 {
3594 ok(0, "unexpected call\n");
3595 return E_NOTIMPL;
3596 }
3597
3598 static HRESULT WINAPI BrowserService_GetSetCodePage(
3599 IBrowserService* This,
3600 VARIANT *pvarIn,
3601 VARIANT *pvarOut)
3602 {
3603 ok(0, "unexpected call\n");
3604 return E_NOTIMPL;
3605 }
3606
3607 static HRESULT WINAPI BrowserService_OnHttpEquiv(
3608 IBrowserService* This,
3609 IShellView *psv,
3610 BOOL fDone,
3611 VARIANT *pvarargIn,
3612 VARIANT *pvarargOut)
3613 {
3614 ok(0, "unexpected call\n");
3615 return E_NOTIMPL;
3616 }
3617
3618 static HRESULT WINAPI BrowserService_GetPalette(
3619 IBrowserService* This,
3620 HPALETTE *hpal)
3621 {
3622 ok(0, "unexpected call\n");
3623 return E_NOTIMPL;
3624 }
3625
3626 static HRESULT WINAPI BrowserService_RegisterWindow(
3627 IBrowserService* This,
3628 BOOL fForceRegister,
3629 int swc)
3630 {
3631 ok(0, "unexpected call\n");
3632 return E_NOTIMPL;
3633 }
3634
3635 static IBrowserServiceVtbl BrowserServiceVtbl = {
3636 BrowserService_QueryInterface,
3637 BrowserService_AddRef,
3638 BrowserService_Release,
3639 BrowserService_GetParentSite,
3640 BrowserService_SetTitle,
3641 BrowserService_GetTitle,
3642 BrowserService_GetOleObject,
3643 BrowserService_GetTravelLog,
3644 BrowserService_ShowControlWindow,
3645 BrowserService_IsControlWindowShown,
3646 BrowserService_IEGetDisplayName,
3647 BrowserService_IEParseDisplayName,
3648 BrowserService_DisplayParseError,
3649 BrowserService_NavigateToPidl,
3650 BrowserService_SetNavigateState,
3651 BrowserService_GetNavigateState,
3652 BrowserService_NotifyRedirect,
3653 BrowserService_UpdateWindowList,
3654 BrowserService_UpdateBackForwardState,
3655 BrowserService_SetFlags,
3656 BrowserService_GetFlags,
3657 BrowserService_CanNavigateNow,
3658 BrowserService_GetPidl,
3659 BrowserService_SetReferrer,
3660 BrowserService_GetBrowserIndex,
3661 BrowserService_GetBrowserByIndex,
3662 BrowserService_GetHistoryObject,
3663 BrowserService_SetHistoryObject,
3664 BrowserService_CacheOLEServer,
3665 BrowserService_GetSetCodePage,
3666 BrowserService_OnHttpEquiv,
3667 BrowserService_GetPalette,
3668 BrowserService_RegisterWindow
3669 };
3670
3671 static IBrowserService BrowserService = { &BrowserServiceVtbl };
3672
3673 DEFINE_GUID(IID_ITabBrowserService, 0x5E8FA523,0x83D4,0x4DBE,0x81,0x99,0x4C,0x18,0xE4,0x85,0x87,0x25);
3674
3675 static HRESULT browserservice_qi(REFIID riid, void **ppv)
3676 {
3677 if(IsEqualGUID(&IID_IShellBrowser, riid)) {
3678 *ppv = &ShellBrowser;
3679 return S_OK;
3680 }
3681
3682 if(IsEqualGUID(&IID_IDocObjectService, riid)) {
3683 *ppv = &DocObjectService;
3684 return S_OK;
3685 }
3686
3687 if(IsEqualGUID(&IID_IBrowserService, riid)) {
3688 *ppv = &BrowserService;
3689 return S_OK;
3690 }
3691
3692 *ppv = NULL;
3693 return E_NOINTERFACE;
3694 }
3695
3696 static HRESULT WINAPI WebBrowser_QueryInterface(IWebBrowser2 *iface, REFIID riid, void **ppv)
3697 {
3698 *ppv = NULL;
3699
3700 if(IsEqualGUID(&IID_IUnknown, riid) || IsEqualGUID(&IID_IWebBrowser, riid)
3701 || IsEqualGUID(&IID_IWebBrowserApp, riid) || IsEqualGUID(&IID_IWebBrowser2, riid)) {
3702 *ppv = iface;
3703 return S_OK;
3704 }
3705
3706 if(IsEqualGUID(riid, &IID_IOleObject))
3707 return E_NOINTERFACE; /* TODO */
3708
3709 ok(0, "unexpected call %s\n", debugstr_guid(riid));
3710 return E_NOINTERFACE;
3711 }
3712
3713 static ULONG WINAPI WebBrowser_AddRef(IWebBrowser2 *iface)
3714 {
3715 return 2;
3716 }
3717
3718 static ULONG WINAPI WebBrowser_Release(IWebBrowser2 *iface)
3719 {
3720 return 1;
3721 }
3722
3723 static HRESULT WINAPI WebBrowser_GetTypeInfoCount(IWebBrowser2 *iface, UINT *pctinfo)
3724 {
3725 ok(0, "unexpected call\n");
3726 return E_NOTIMPL;
3727 }
3728
3729 static HRESULT WINAPI WebBrowser_GetTypeInfo(IWebBrowser2 *iface, UINT iTInfo, LCID lcid,
3730 LPTYPEINFO *ppTInfo)
3731 {
3732 ok(0, "unexpected call\n");
3733 return E_NOTIMPL;
3734 }
3735
3736 static HRESULT WINAPI WebBrowser_GetIDsOfNames(IWebBrowser2 *iface, REFIID riid,
3737 LPOLESTR *rgszNames, UINT cNames, LCID lcid, DISPID *rgDispId)
3738 {
3739 ok(0, "unexpected call\n");
3740 return E_NOTIMPL;
3741 }
3742
3743 static HRESULT WINAPI WebBrowser_Invoke(IWebBrowser2 *iface, DISPID dispIdMember,
3744 REFIID riid, LCID lcid, WORD wFlags, DISPPARAMS *pDispParams, VARIANT *pVarResult,
3745 EXCEPINFO *pExepInfo, UINT *puArgErr)
3746 {
3747 ok(0, "unexpected call\n");
3748 return E_NOTIMPL;
3749 }
3750
3751 static HRESULT WINAPI WebBrowser_GoBack(IWebBrowser2 *iface)
3752 {
3753 ok(0, "unexpected call\n");
3754 return E_NOTIMPL;
3755 }
3756
3757 static HRESULT WINAPI WebBrowser_GoForward(IWebBrowser2 *iface)
3758 {
3759 ok(0, "unexpected call\n");
3760 return E_NOTIMPL;
3761 }
3762
3763 static HRESULT WINAPI WebBrowser_GoHome(IWebBrowser2 *iface)
3764 {
3765 ok(0, "unexpected call\n");
3766 return E_NOTIMPL;
3767 }
3768
3769 static HRESULT WINAPI WebBrowser_GoSearch(IWebBrowser2 *iface)
3770 {
3771 ok(0, "unexpected call\n");
3772 return E_NOTIMPL;
3773 }
3774
3775 static HRESULT WINAPI WebBrowser_Navigate(IWebBrowser2 *iface, BSTR szUrl,
3776 VARIANT *Flags, VARIANT *TargetFrameName, VARIANT *PostData, VARIANT *Headers)
3777 {
3778 ok(0, "unexpected call\n");
3779 return E_NOTIMPL;
3780 }
3781
3782 static HRESULT WINAPI WebBrowser_Refresh(IWebBrowser2 *iface)
3783 {
3784 ok(0, "unexpected call\n");
3785 return E_NOTIMPL;
3786 }
3787
3788 static HRESULT WINAPI WebBrowser_Refresh2(IWebBrowser2 *iface, VARIANT *Level)
3789 {
3790 ok(0, "unexpected call\n");
3791 return E_NOTIMPL;
3792 }
3793
3794 static HRESULT WINAPI WebBrowser_Stop(IWebBrowser2 *iface)
3795 {
3796 ok(0, "unexpected call\n");
3797 return E_NOTIMPL;
3798 }
3799
3800 static HRESULT WINAPI WebBrowser_get_Application(IWebBrowser2 *iface, IDispatch **ppDisp)
3801 {
3802 ok(0, "unexpected call\n");
3803 return E_NOTIMPL;
3804 }
3805
3806 static HRESULT WINAPI WebBrowser_get_Parent(IWebBrowser2 *iface, IDispatch **ppDisp)
3807 {
3808 ok(0, "unexpected call\n");
3809 return E_NOTIMPL;
3810 }
3811
3812 static HRESULT WINAPI WebBrowser_get_Container(IWebBrowser2 *iface, IDispatch **ppDisp)
3813 {
3814 ok(0, "unexpected call\n");
3815 return E_NOTIMPL;
3816 }
3817
3818 static HRESULT WINAPI WebBrowser_get_Document(IWebBrowser2 *iface, IDispatch **ppDisp)
3819 {
3820 ok(0, "unexpected call\n");
3821 return E_NOTIMPL;
3822 }
3823
3824 static HRESULT WINAPI WebBrowser_get_TopLevelContainer(IWebBrowser2 *iface, VARIANT_BOOL *pBool)
3825 {
3826 ok(0, "unexpected call\n");
3827 return E_NOTIMPL;
3828 }
3829
3830 static HRESULT WINAPI WebBrowser_get_Type(IWebBrowser2 *iface, BSTR *Type)
3831 {
3832 ok(0, "unexpected call\n");
3833 return E_NOTIMPL;
3834 }
3835
3836 static HRESULT WINAPI WebBrowser_get_Left(IWebBrowser2 *iface, LONG *pl)
3837 {
3838 ok(0, "unexpected call\n");
3839 return E_NOTIMPL;
3840 }
3841
3842 static HRESULT WINAPI WebBrowser_put_Left(IWebBrowser2 *iface, LONG Left)
3843 {
3844 ok(0, "unexpected call\n");
3845 return E_NOTIMPL;
3846 }
3847
3848 static HRESULT WINAPI WebBrowser_get_Top(IWebBrowser2 *iface, LONG *pl)
3849 {
3850 ok(0, "unexpected call\n");
3851 return E_NOTIMPL;
3852 }
3853
3854 static HRESULT WINAPI WebBrowser_put_Top(IWebBrowser2 *iface, LONG Top)
3855 {
3856 ok(0, "unexpected call\n");
3857 return E_NOTIMPL;
3858 }
3859
3860 static HRESULT WINAPI WebBrowser_get_Width(IWebBrowser2 *iface, LONG *pl)
3861 {
3862 ok(0, "unexpected call\n");
3863 return E_NOTIMPL;
3864 }
3865
3866 static HRESULT WINAPI WebBrowser_put_Width(IWebBrowser2 *iface, LONG Width)
3867 {
3868 ok(0, "unexpected call\n");
3869 return E_NOTIMPL;
3870 }
3871
3872 static HRESULT WINAPI WebBrowser_get_Height(IWebBrowser2 *iface, LONG *pl)
3873 {
3874 ok(0, "unexpected call\n");
3875 return E_NOTIMPL;
3876 }
3877
3878 static HRESULT WINAPI WebBrowser_put_Height(IWebBrowser2 *iface, LONG Height)
3879 {
3880 ok(0, "unexpected call\n");
3881 return E_NOTIMPL;
3882 }
3883
3884 static HRESULT WINAPI WebBrowser_get_LocationName(IWebBrowser2 *iface, BSTR *LocationName)
3885 {
3886 ok(0, "unexpected call\n");
3887 return E_NOTIMPL;
3888 }
3889
3890 static HRESULT WINAPI WebBrowser_get_LocationURL(IWebBrowser2 *iface, BSTR *LocationURL)
3891 {
3892 CHECK_EXPECT(get_LocationURL);
3893 return E_NOTIMPL;
3894 }
3895
3896 static HRESULT WINAPI WebBrowser_get_Busy(IWebBrowser2 *iface, VARIANT_BOOL *pBool)
3897 {
3898 ok(0, "unexpected call\n");
3899 return E_NOTIMPL;
3900 }
3901
3902 static HRESULT WINAPI WebBrowser_Quit(IWebBrowser2 *iface)
3903 {
3904 ok(0, "unexpected call\n");
3905 return E_NOTIMPL;
3906 }
3907
3908 static HRESULT WINAPI WebBrowser_ClientToWindow(IWebBrowser2 *iface, int *pcx, int *pcy)
3909 {
3910 ok(0, "unexpected call\n");
3911 return E_NOTIMPL;
3912 }
3913
3914 static HRESULT WINAPI WebBrowser_PutProperty(IWebBrowser2 *iface, BSTR szProperty, VARIANT vtValue)
3915 {
3916 ok(0, "unexpected call\n");
3917 return E_NOTIMPL;
3918 }
3919
3920 static HRESULT WINAPI WebBrowser_GetProperty(IWebBrowser2 *iface, BSTR szProperty, VARIANT *pvtValue)
3921 {
3922 ok(0, "unexpected call\n");
3923 return E_NOTIMPL;
3924 }
3925
3926 static HRESULT WINAPI WebBrowser_get_Name(IWebBrowser2 *iface, BSTR *Name)
3927 {
3928 ok(0, "unexpected call\n");
3929 return E_NOTIMPL;
3930 }
3931
3932 static HRESULT WINAPI WebBrowser_get_HWND(IWebBrowser2 *iface, LONG *pHWND)
3933 {
3934 ok(0, "unexpected call\n");
3935 return E_NOTIMPL;
3936 }
3937
3938 static HRESULT WINAPI WebBrowser_get_FullName(IWebBrowser2 *iface, BSTR *FullName)
3939 {
3940 ok(0, "unexpected call\n");
3941 return E_NOTIMPL;
3942 }
3943
3944 static HRESULT WINAPI WebBrowser_get_Path(IWebBrowser2 *iface, BSTR *Path)
3945 {
3946 ok(0, "unexpected call\n");
3947 return E_NOTIMPL;
3948 }
3949
3950 static HRESULT WINAPI WebBrowser_get_Visible(IWebBrowser2 *iface, VARIANT_BOOL *pBool)
3951 {
3952 ok(0, "unexpected call\n");
3953 return E_NOTIMPL;
3954 }
3955
3956 static HRESULT WINAPI WebBrowser_put_Visible(IWebBrowser2 *iface, VARIANT_BOOL Value)
3957 {
3958 ok(0, "unexpected call\n");
3959 return E_NOTIMPL;
3960 }
3961
3962 static HRESULT WINAPI WebBrowser_get_StatusBar(IWebBrowser2 *iface, VARIANT_BOOL *pBool)
3963 {
3964 ok(0, "unexpected call\n");
3965 return E_NOTIMPL;
3966 }
3967
3968 static HRESULT WINAPI WebBrowser_put_StatusBar(IWebBrowser2 *iface, VARIANT_BOOL Value)
3969 {
3970 ok(0, "unexpected call\n");
3971 return E_NOTIMPL;
3972 }
3973
3974 static HRESULT WINAPI WebBrowser_get_StatusText(IWebBrowser2 *iface, BSTR *StatusText)
3975 {
3976 ok(0, "unexpected call\n");
3977 return E_NOTIMPL;
3978 }
3979
3980 static HRESULT WINAPI WebBrowser_put_StatusText(IWebBrowser2 *iface, BSTR StatusText)
3981 {
3982 ok(0, "unexpected call\n");
3983 return E_NOTIMPL;
3984 }
3985
3986 static HRESULT WINAPI WebBrowser_get_ToolBar(IWebBrowser2 *iface, int *Value)
3987 {
3988 ok(0, "unexpected call\n");
3989 return E_NOTIMPL;
3990 }
3991
3992 static HRESULT WINAPI WebBrowser_put_ToolBar(IWebBrowser2 *iface, int Value)
3993 {
3994 ok(0, "unexpected call\n");
3995 return E_NOTIMPL;
3996 }
3997
3998 static HRESULT WINAPI WebBrowser_get_MenuBar(IWebBrowser2 *iface, VARIANT_BOOL *Value)
3999 {
4000 ok(0, "unexpected call\n");
4001 return E_NOTIMPL;
4002 }
4003
4004 static HRESULT WINAPI WebBrowser_put_MenuBar(IWebBrowser2 *iface, VARIANT_BOOL Value)
4005 {
4006 ok(0, "unexpected call\n");
4007 return E_NOTIMPL;
4008 }
4009
4010 static HRESULT WINAPI WebBrowser_get_FullScreen(IWebBrowser2 *iface, VARIANT_BOOL *pbFullScreen)
4011 {
4012 ok(0, "unexpected call\n");
4013 return E_NOTIMPL;
4014 }
4015
4016 static HRESULT WINAPI WebBrowser_put_FullScreen(IWebBrowser2 *iface, VARIANT_BOOL bFullScreen)
4017 {
4018 ok(0, "unexpected call\n");
4019 return E_NOTIMPL;
4020 }
4021
4022 static HRESULT WINAPI WebBrowser_Navigate2(IWebBrowser2 *iface, VARIANT *URL, VARIANT *Flags,
4023 VARIANT *TargetFrameName, VARIANT *PostData, VARIANT *Headers)
4024 {
4025 ok(0, "unexpected call\n");
4026 return E_NOTIMPL;
4027 }
4028
4029 static HRESULT WINAPI WebBrowser_QueryStatusWB(IWebBrowser2 *iface, OLECMDID cmdID, OLECMDF *pcmdf)
4030 {
4031 ok(0, "unexpected call\n");
4032 return E_NOTIMPL;
4033 }
4034
4035 static HRESULT WINAPI WebBrowser_ExecWB(IWebBrowser2 *iface, OLECMDID cmdID,
4036 OLECMDEXECOPT cmdexecopt, VARIANT *pvaIn, VARIANT *pvaOut)
4037 {
4038 ok(0, "unexpected call\n");
4039 return E_NOTIMPL;
4040 }
4041
4042 static HRESULT WINAPI WebBrowser_ShowBrowserBar(IWebBrowser2 *iface, VARIANT *pvaClsid,
4043 VARIANT *pvarShow, VARIANT *pvarSize)
4044 {
4045 ok(0, "unexpected call\n");
4046 return E_NOTIMPL;
4047 }
4048
4049 static HRESULT WINAPI WebBrowser_get_ReadyState(IWebBrowser2 *iface, READYSTATE *lpReadyState)
4050 {
4051 ok(0, "unexpected call\n");
4052 return E_NOTIMPL;
4053 }
4054
4055 static HRESULT WINAPI WebBrowser_get_Offline(IWebBrowser2 *iface, VARIANT_BOOL *pbOffline)
4056 {
4057 ok(0, "unexpected call\n");
4058 return E_NOTIMPL;
4059 }
4060
4061 static HRESULT WINAPI WebBrowser_put_Offline(IWebBrowser2 *iface, VARIANT_BOOL bOffline)
4062 {
4063 ok(0, "unexpected call\n");
4064 return E_NOTIMPL;
4065 }
4066
4067 static HRESULT WINAPI WebBrowser_get_Silent(IWebBrowser2 *iface, VARIANT_BOOL *pbSilent)
4068 {
4069 ok(0, "unexpected call\n");
4070 return E_NOTIMPL;
4071 }
4072
4073 static HRESULT WINAPI WebBrowser_put_Silent(IWebBrowser2 *iface, VARIANT_BOOL bSilent)
4074 {
4075 ok(0, "unexpected call\n");
4076 return E_NOTIMPL;
4077 }
4078
4079 static HRESULT WINAPI WebBrowser_get_RegisterAsBrowser(IWebBrowser2 *iface,
4080 VARIANT_BOOL *pbRegister)
4081 {
4082 ok(0, "unexpected call\n");
4083 return E_NOTIMPL;
4084 }
4085
4086 static HRESULT WINAPI WebBrowser_put_RegisterAsBrowser(IWebBrowser2 *iface,
4087 VARIANT_BOOL bRegister)
4088 {
4089 ok(0, "unexpected call\n");
4090 return E_NOTIMPL;
4091 }
4092
4093 static HRESULT WINAPI WebBrowser_get_RegisterAsDropTarget(IWebBrowser2 *iface,
4094 VARIANT_BOOL *pbRegister)
4095 {
4096 ok(0, "unexpected call\n");
4097 return E_NOTIMPL;
4098 }
4099
4100 static HRESULT WINAPI WebBrowser_put_RegisterAsDropTarget(IWebBrowser2 *iface,
4101 VARIANT_BOOL bRegister)
4102 {
4103 ok(0, "unexpected call\n");
4104 return E_NOTIMPL;
4105 }
4106
4107 static HRESULT WINAPI WebBrowser_get_TheaterMode(IWebBrowser2 *iface, VARIANT_BOOL *pbRegister)
4108 {
4109 ok(0, "unexpected call\n");
4110 return E_NOTIMPL;
4111 }
4112
4113 static HRESULT WINAPI WebBrowser_put_TheaterMode(IWebBrowser2 *iface, VARIANT_BOOL bRegister)
4114 {
4115 ok(0, "unexpected call\n");
4116 return E_NOTIMPL;
4117 }
4118
4119 static HRESULT WINAPI WebBrowser_get_AddressBar(IWebBrowser2 *iface, VARIANT_BOOL *Value)
4120 {
4121 ok(0, "unexpected call\n");
4122 return E_NOTIMPL;
4123 }
4124
4125 static HRESULT WINAPI WebBrowser_put_AddressBar(IWebBrowser2 *iface, VARIANT_BOOL Value)
4126 {
4127 ok(0, "unexpected call\n");
4128 return E_NOTIMPL;
4129 }
4130
4131 static HRESULT WINAPI WebBrowser_get_Resizable(IWebBrowser2 *iface, VARIANT_BOOL *Value)
4132 {
4133 ok(0, "unexpected call\n");
4134 return E_NOTIMPL;
4135 }
4136
4137 static HRESULT WINAPI WebBrowser_put_Resizable(IWebBrowser2 *iface, VARIANT_BOOL Value)
4138 {
4139 ok(0, "unexpected call\n");
4140 return E_NOTIMPL;
4141 }
4142
4143 static const IWebBrowser2Vtbl WebBrowser2Vtbl =
4144 {
4145 WebBrowser_QueryInterface,
4146 WebBrowser_AddRef,
4147 WebBrowser_Release,
4148 WebBrowser_GetTypeInfoCount,
4149 WebBrowser_GetTypeInfo,
4150 WebBrowser_GetIDsOfNames,
4151 WebBrowser_Invoke,
4152 WebBrowser_GoBack,
4153 WebBrowser_GoForward,
4154 WebBrowser_GoHome,
4155 WebBrowser_GoSearch,
4156 WebBrowser_Navigate,
4157 WebBrowser_Refresh,
4158 WebBrowser_Refresh2,
4159 WebBrowser_Stop,
4160 WebBrowser_get_Application,
4161 WebBrowser_get_Parent,
4162 WebBrowser_get_Container,
4163 WebBrowser_get_Document,
4164 WebBrowser_get_TopLevelContainer,
4165 WebBrowser_get_Type,
4166 WebBrowser_get_Left,
4167 WebBrowser_put_Left,
4168 WebBrowser_get_Top,
4169 WebBrowser_put_Top,
4170 WebBrowser_get_Width,
4171 WebBrowser_put_Width,
4172 WebBrowser_get_Height,
4173 WebBrowser_put_Height,
4174 WebBrowser_get_LocationName,
4175 WebBrowser_get_LocationURL,
4176 WebBrowser_get_Busy,
4177 WebBrowser_Quit,
4178 WebBrowser_ClientToWindow,
4179 WebBrowser_PutProperty,
4180 WebBrowser_GetProperty,
4181 WebBrowser_get_Name,
4182 WebBrowser_get_HWND,
4183 WebBrowser_get_FullName,
4184 WebBrowser_get_Path,
4185 WebBrowser_get_Visible,
4186 WebBrowser_put_Visible,
4187 WebBrowser_get_StatusBar,
4188 WebBrowser_put_StatusBar,
4189 WebBrowser_get_StatusText,
4190 WebBrowser_put_StatusText,
4191 WebBrowser_get_ToolBar,
4192 WebBrowser_put_ToolBar,
4193 WebBrowser_get_MenuBar,
4194 WebBrowser_put_MenuBar,
4195 WebBrowser_get_FullScreen,
4196 WebBrowser_put_FullScreen,
4197 WebBrowser_Navigate2,
4198 WebBrowser_QueryStatusWB,
4199 WebBrowser_ExecWB,
4200 WebBrowser_ShowBrowserBar,
4201 WebBrowser_get_ReadyState,
4202 WebBrowser_get_Offline,
4203 WebBrowser_put_Offline,
4204 WebBrowser_get_Silent,
4205 WebBrowser_put_Silent,
4206 WebBrowser_get_RegisterAsBrowser,
4207 WebBrowser_put_RegisterAsBrowser,
4208 WebBrowser_get_RegisterAsDropTarget,
4209 WebBrowser_put_RegisterAsDropTarget,
4210 WebBrowser_get_TheaterMode,
4211 WebBrowser_put_TheaterMode,
4212 WebBrowser_get_AddressBar,
4213 WebBrowser_put_AddressBar,
4214 WebBrowser_get_Resizable,
4215 WebBrowser_put_Resizable
4216 };
4217
4218 static IWebBrowser2 WebBrowser2 = { &WebBrowser2Vtbl };
4219
4220 static HRESULT WINAPI ServiceProvider_QueryInterface(IServiceProvider *iface,
4221 REFIID riid, void **ppv)
4222 {
4223 return QueryInterface(riid, ppv);
4224 }
4225
4226 static ULONG WINAPI ServiceProvider_AddRef(IServiceProvider *iface)
4227 {
4228 return 2;
4229 }
4230
4231 static ULONG WINAPI ServiceProvider_Release(IServiceProvider *iface)
4232 {
4233 return 1;
4234 }
4235
4236 static HRESULT WINAPI ServiceProvider_QueryService(IServiceProvider *iface, REFGUID guidService,
4237 REFIID riid, void **ppv)
4238 {
4239 /*
4240 * Services used by HTMLDocument:
4241 *
4242 * IOleUndoManager
4243 * IInternetSecurityManager
4244 * ITargetFrame
4245 * {D5F78C80-5252-11CF-90FA-00AA0042106E}
4246 * HTMLFrameBase
4247 * IShellObject
4248 * {3050F312-98B5-11CF-BB82-00AA00BDCE0B}
4249 * {53A2D5B1-D2FC-11D0-84E0-006097C9987D}
4250 * {AD7F6C62-F6BD-11D2-959B-006097C553C8}
4251 * DefView (?)
4252 * {6D12FE80-7911-11CF-9534-0000C05BAE0B}
4253 * IElementBehaviorFactory
4254 * {3050F429-98B5-11CF-BB82-00AA00BDCE0B}
4255 * STopLevelBrowser
4256 * IHTMLWindow2
4257 * IInternetProtocol
4258 * UrlHostory
4259 * IHTMLEditHost
4260 * IHlinkFrame
4261 */
4262
4263 if(IsEqualGUID(&IID_IHlinkFrame, guidService)) {
4264 ok(IsEqualGUID(&IID_IHlinkFrame, riid), "unexpected riid\n");
4265 *ppv = &HlinkFrame;
4266 return S_OK;
4267 }
4268
4269 if(IsEqualGUID(&SID_SNewWindowManager, guidService)) {
4270 ok(IsEqualGUID(&IID_INewWindowManager, riid), "unexpected riid\n");
4271 *ppv = &NewWindowManager;
4272 return S_OK;
4273 }
4274
4275 if(IsEqualGUID(&IID_IShellBrowser, guidService)) {
4276 ok(IsEqualGUID(&IID_IBrowserService, riid), "unexpected riid\n");
4277 *ppv = &BrowserService;
4278 return S_OK;
4279 }
4280
4281 if(support_wbapp && IsEqualGUID(&IID_IWebBrowserApp, guidService)) {
4282 if(IsEqualGUID(riid, &IID_IWebBrowser2)) {
4283 *ppv = &WebBrowser2;
4284 return S_OK;
4285 }
4286 ok(0, "unexpected riid %s\n", debugstr_guid(riid));
4287 }
4288
4289 return E_NOINTERFACE;
4290 }
4291
4292 static const IServiceProviderVtbl ServiceProviderVtbl = {
4293 ServiceProvider_QueryInterface,
4294 ServiceProvider_AddRef,
4295 ServiceProvider_Release,
4296 ServiceProvider_QueryService
4297 };
4298
4299 static IServiceProvider ServiceProvider = { &ServiceProviderVtbl };
4300
4301 static HRESULT WINAPI AdviseSink_QueryInterface(IAdviseSinkEx *iface,
4302 REFIID riid, void **ppv)
4303 {
4304 return QueryInterface(riid, ppv);
4305 }
4306
4307 static ULONG WINAPI AdviseSink_AddRef(IAdviseSinkEx *iface)
4308 {
4309 return 2;
4310 }
4311
4312 static ULONG WINAPI AdviseSink_Release(IAdviseSinkEx *iface)
4313 {
4314 return 1;
4315 }
4316
4317 static void WINAPI AdviseSink_OnDataChange(IAdviseSinkEx *iface,
4318 FORMATETC *pFormatetc, STGMEDIUM *pStgmed)
4319 {
4320 ok(0, "unexpected call\n");
4321 }
4322
4323 static void WINAPI AdviseSink_OnViewChange(IAdviseSinkEx *iface,
4324 DWORD dwAspect, LONG lindex)
4325 {
4326 ok(0, "unexpected call\n");
4327 }
4328
4329 static void WINAPI AdviseSink_OnRename(IAdviseSinkEx *iface, IMoniker *pmk)
4330 {
4331 ok(0, "unexpected call\n");
4332 }
4333
4334 static void WINAPI AdviseSink_OnSave(IAdviseSinkEx *iface)
4335 {
4336 ok(0, "unexpected call\n");
4337 }
4338
4339 static void WINAPI AdviseSink_OnClose(IAdviseSinkEx *iface)
4340 {
4341 ok(0, "unexpected call\n");
4342 }
4343
4344 static void WINAPI AdviseSinkEx_OnViewStatusChange(IAdviseSinkEx *iface, DWORD dwViewStatus)
4345 {
4346 ok(0, "unexpected call\n");
4347 }
4348
4349 static void WINAPI ObjectAdviseSink_OnClose(IAdviseSinkEx *iface)
4350 {
4351 CHECK_EXPECT(Advise_Close);
4352 }
4353
4354 static const IAdviseSinkExVtbl AdviseSinkVtbl = {
4355 AdviseSink_QueryInterface,
4356 AdviseSink_AddRef,
4357 AdviseSink_Release,
4358 AdviseSink_OnDataChange,
4359 AdviseSink_OnViewChange,
4360 AdviseSink_OnRename,
4361 AdviseSink_OnSave,
4362 ObjectAdviseSink_OnClose,
4363 AdviseSinkEx_OnViewStatusChange
4364 };
4365
4366 static IAdviseSinkEx AdviseSink = { &AdviseSinkVtbl };
4367
4368 static HRESULT WINAPI ViewAdviseSink_QueryInterface(IAdviseSinkEx *iface,
4369 REFIID riid, void **ppv)
4370 {
4371 if(IsEqualGUID(&IID_IAdviseSinkEx, riid)) {
4372 *ppv = iface;
4373 return S_OK;
4374 }
4375
4376 ok(0, "unexpected riid %s\n", debugstr_guid(riid));
4377 *ppv = NULL;
4378 return E_NOINTERFACE;
4379 }
4380
4381 static void WINAPI ViewAdviseSink_OnViewChange(IAdviseSinkEx *iface,
4382 DWORD dwAspect, LONG lindex)
4383 {
4384 CHECK_EXPECT2(OnViewChange);
4385
4386 ok(dwAspect == DVASPECT_CONTENT, "dwAspect = %d\n", dwAspect);
4387 ok(lindex == -1, "lindex = %d\n", lindex);
4388 }
4389
4390 static const IAdviseSinkExVtbl ViewAdviseSinkVtbl = {
4391 ViewAdviseSink_QueryInterface,
4392 AdviseSink_AddRef,
4393 AdviseSink_Release,
4394 AdviseSink_OnDataChange,
4395 ViewAdviseSink_OnViewChange,
4396 AdviseSink_OnRename,
4397 AdviseSink_OnSave,
4398 AdviseSink_OnClose,
4399 AdviseSinkEx_OnViewStatusChange
4400 };
4401
4402 static IAdviseSinkEx ViewAdviseSink = { &ViewAdviseSinkVtbl };
4403
4404 DEFINE_GUID(IID_unk1, 0xD48A6EC6,0x6A4A,0x11CF,0x94,0xA7,0x44,0x45,0x53,0x54,0x00,0x00); /* HTMLWindow2 ? */
4405 DEFINE_GUID(IID_IThumbnailView, 0x7BB0B520,0xB1A7,0x11D2,0xBB,0x23,0x00,0xC0,0x4F,0x79,0xAB,0xCD);
4406 DEFINE_GUID(IID_IRenMailEditor, 0x000670BA,0x0000,0x0000,0xC0,0x00,0x00,0x00,0x00,0x00,0x00,0x46);
4407 DEFINE_GUID(IID_unk4, 0x305104a6,0x98b5,0x11cf,0xbb,0x82,0x00,0xaa,0x00,0xbd,0xce,0x0b);
4408 DEFINE_GUID(IID_IDocHostUIHandlerPriv, 0xf0d241d1,0x5d0e,0x4e85,0xbc,0xb4,0xfa,0xd7,0xf7,0xc5,0x52,0x8c);
4409
4410 static HRESULT QueryInterface(REFIID riid, void **ppv)
4411 {
4412 *ppv = NULL;
4413
4414 if(IsEqualGUID(&IID_IUnknown, riid) || IsEqualGUID(&IID_IOleClientSite, riid))
4415 *ppv = &ClientSite;
4416 else if(IsEqualGUID(&IID_IOleDocumentSite, riid))
4417 *ppv = &DocumentSite;
4418 else if(IsEqualGUID(&IID_IDocHostUIHandler, riid) || IsEqualGUID(&IID_IDocHostUIHandler2, riid))
4419 *ppv = &DocHostUIHandler;
4420 else if(IsEqualGUID(&IID_IOleContainer, riid))
4421 *ppv = &OleContainer;
4422 else if(IsEqualGUID(&IID_IOleWindow, riid) || IsEqualGUID(&IID_IOleInPlaceSite, riid))
4423 *ppv = &InPlaceSiteWindowless;
4424 else if(IsEqualGUID(&IID_IOleCommandTarget , riid))
4425 *ppv = &OleCommandTarget;
4426 else if(IsEqualGUID(&IID_IDispatch, riid))
4427 *ppv = &Dispatch;
4428 else if(IsEqualGUID(&IID_IServiceProvider, riid))
4429 *ppv = &ServiceProvider;
4430 else if(IsEqualGUID(&IID_IOleInPlaceSiteEx, riid))
4431 *ppv = ipsex ? &InPlaceSiteWindowless : NULL;
4432 else if(IsEqualGUID(&IID_IOleInPlaceSiteWindowless, riid))
4433 *ppv = ipsw ? &InPlaceSiteWindowless : NULL;
4434 else if(IsEqualGUID(&IID_IOleControlSite, riid))
4435 *ppv = &OleControlSite;
4436 else if(IsEqualGUID(&IID_IDocHostShowUI, riid))
4437 return E_NOINTERFACE; /* TODO */
4438 else if(IsEqualGUID(&IID_IProxyManager, riid))
4439 return E_NOINTERFACE; /* ? */
4440 else if(IsEqualGUID(&IID_unk1, riid))
4441 return E_NOINTERFACE; /* HTMLWindow2 ? */
4442 else if(IsEqualGUID(&IID_IThumbnailView, riid))
4443 return E_NOINTERFACE; /* ? */
4444 else if(IsEqualGUID(&IID_IRenMailEditor, riid))
4445 return E_NOINTERFACE; /* ? */
4446 else if(IsEqualGUID(&IID_unk4, riid))
4447 return E_NOINTERFACE; /* ? */
4448 else if(IsEqualGUID(&IID_IDocHostUIHandlerPriv, riid))
4449 return E_NOINTERFACE; /* ? */
4450 else
4451 ok(0, "unexpected riid %s\n", debugstr_guid(riid));
4452
4453 if(*ppv)
4454 return S_OK;
4455 return E_NOINTERFACE;
4456 }
4457
4458 static LRESULT WINAPI wnd_proc(HWND hwnd, UINT msg, WPARAM wParam, LPARAM lParam)
4459 {
4460 if(msg == WM_CONTINUE_BINDING) {
4461 IBindStatusCallback *callback = (IBindStatusCallback*)wParam;
4462 continue_binding(callback);
4463 }
4464
4465 return DefWindowProc(hwnd, msg, wParam, lParam);
4466 }
4467
4468 static void test_doscroll(IUnknown *unk)
4469 {
4470 IHTMLDocument3 *doc;
4471 IHTMLElement2 *elem2;
4472 IHTMLElement *elem;
4473 VARIANT v;
4474 HRESULT hres;
4475
4476 hres = IUnknown_QueryInterface(unk, &IID_IHTMLDocument3, (void**)&doc);
4477 ok(hres == S_OK, "Could not get IHTMLDocument3 iface: %08x\n", hres);
4478 if(FAILED(hres))
4479 return;
4480
4481 hres = IHTMLDocument3_get_documentElement(doc, &elem);
4482 IHTMLDocument3_Release(doc);
4483 ok(hres == S_OK, "get_documentElement failed: %08x\n", hres);
4484 switch(load_state) {
4485 case LD_DOLOAD:
4486 case LD_NO:
4487 if(!nav_url)
4488 ok(!elem, "elem != NULL\n");
4489 default:
4490 break;
4491 case LD_INTERACTIVE:
4492 case LD_COMPLETE:
4493 ok(elem != NULL, "elem == NULL\n");
4494 }
4495 if(!elem)
4496 return;
4497
4498 hres = IHTMLElement_QueryInterface(elem, &IID_IHTMLElement2, (void**)&elem2);
4499 IHTMLElement_Release(elem);
4500 ok(hres == S_OK, "Could not get IHTMLElement2 iface: %08x\n", hres);
4501
4502 V_VT(&v) = VT_BSTR;
4503 V_BSTR(&v) = a2bstr("left");
4504 hres = IHTMLElement2_doScroll(elem2, v);
4505 SysFreeString(V_BSTR(&v));
4506 IHTMLElement2_Release(elem2);
4507
4508 if(inplace_deactivated)
4509 ok(hres == E_PENDING, "doScroll failed: %08x\n", hres);
4510 else if(load_state == LD_COMPLETE)
4511 ok(hres == S_OK, "doScroll failed: %08x\n", hres);
4512 else
4513 ok(hres == E_PENDING || hres == S_OK, "doScroll failed: %08x\n", hres);
4514 }
4515
4516 static void _test_readyState(unsigned line, IUnknown *unk)
4517 {
4518 IHTMLDocument2 *htmldoc;
4519 DISPPARAMS dispparams;
4520 IHTMLElement *elem;
4521 BSTR state;
4522 VARIANT out;
4523 HRESULT hres;
4524
4525 static const LPCSTR expected_state[] = {
4526 "uninitialized",
4527 "loading",
4528 NULL,
4529 "interactive",
4530 "complete",
4531 "uninitialized"
4532 };
4533
4534 if(open_call)
4535 return; /* FIXME */
4536
4537 if(!unk)
4538 unk = doc_unk;
4539
4540 hres = IUnknown_QueryInterface(unk, &IID_IHTMLDocument2, (void**)&htmldoc);
4541 ok(hres == S_OK, "QueryInterface(IID_IHTMLDocument2) failed: %08x\n", hres);
4542 if(FAILED(hres))
4543 return;
4544
4545 hres = IHTMLDocument2_get_readyState(htmldoc, NULL);
4546 ok(hres == E_POINTER, "get_readyState failed: %08x, expected\n", hres);
4547
4548 hres = IHTMLDocument2_get_readyState(htmldoc, &state);
4549 ok(hres == S_OK, "get_ReadyState failed: %08x\n", hres);
4550
4551 if(!strcmp_wa(state, "interactive") && load_state == LD_LOADING)
4552 load_state = LD_INTERACTIVE;
4553
4554 ok_(__FILE__, line)
4555 (!strcmp_wa(state, expected_state[load_state]), "unexpected state %s, expected %d\n",
4556 wine_dbgstr_w(state), load_state);
4557 SysFreeString(state);
4558
4559 hres = IHTMLDocument2_get_body(htmldoc, &elem);
4560 ok_(__FILE__,line)(hres == S_OK, "get_body failed: %08x\n", hres);
4561 if(elem) {
4562 IHTMLElement2 *elem2;
4563 VARIANT var;
4564
4565 hres = IHTMLElement_QueryInterface(elem, &IID_IHTMLElement2, (void**)&elem2);
4566 IHTMLElement_Release(elem);
4567 ok(hres == S_OK, "Could not get IHTMLElement2 iface: %08x\n", hres);
4568
4569 hres = IHTMLElement2_get_readyState(elem2, &var);
4570 IHTMLElement2_Release(elem2);
4571 ok(hres == S_OK, "get_readyState failed: %08x\n", hres);
4572 ok(V_VT(&var) == VT_BSTR, "V_VT(state) = %d\n", V_VT(&var));
4573 ok(!strcmp_wa(V_BSTR(&var), "complete"), "unexpected body state %s\n", wine_dbgstr_w(V_BSTR(&var)));
4574 VariantClear(&var);
4575 }else {
4576 ok_(__FILE__,line)(load_state != LD_COMPLETE, "body is NULL in complete state\n");
4577 }
4578
4579 dispparams.cArgs = 0;
4580 dispparams.cNamedArgs = 0;
4581 dispparams.rgdispidNamedArgs = NULL;
4582 dispparams.rgvarg = NULL;
4583
4584 VariantInit(&out);
4585
4586 hres = IHTMLDocument2_Invoke(htmldoc, DISPID_READYSTATE, &IID_NULL, 0, DISPATCH_PROPERTYGET,
4587 &dispparams, &out, NULL, NULL);
4588 ok(hres == S_OK, "Invoke(DISPID_READYSTATE) failed: %08x\n", hres);
4589
4590 ok_(__FILE__,line) (V_VT(&out) == VT_I4, "V_VT(out)=%d\n", V_VT(&out));
4591 ok_(__FILE__,line) (V_I4(&out) == load_state%5, "VT_I4(out)=%d, expected %d\n", V_I4(&out), load_state%5);
4592
4593 test_doscroll((IUnknown*)htmldoc);
4594
4595 IHTMLDocument2_Release(htmldoc);
4596 }
4597
4598 static void test_ViewAdviseSink(IHTMLDocument2 *doc)
4599 {
4600 IViewObject *view;
4601 HRESULT hres;
4602
4603 hres = IHTMLDocument2_QueryInterface(doc, &IID_IViewObject, (void**)&view);
4604 ok(hres == S_OK, "QueryInterface(IID_IViewObject) failed: %08x\n", hres);
4605
4606 hres = IViewObject_SetAdvise(view, DVASPECT_CONTENT, ADVF_PRIMEFIRST, (IAdviseSink*)&ViewAdviseSink);
4607 ok(hres == S_OK, "SetAdvise failed: %08x\n", hres);
4608
4609 IViewObject_Release(view);
4610 }
4611
4612 static void test_ConnectionPoint(IConnectionPointContainer *container, REFIID riid)
4613 {
4614 IConnectionPointContainer *tmp_container = NULL;
4615 IConnectionPoint *cp;
4616 IID iid;
4617 HRESULT hres;
4618 DWORD cookie;
4619
4620 hres = IConnectionPointContainer_FindConnectionPoint(container, riid, &cp);
4621 ok(hres == S_OK, "FindConnectionPoint failed: %08x\n", hres);
4622 if(FAILED(hres))
4623 return;
4624
4625 hres = IConnectionPoint_GetConnectionInterface(cp, &iid);
4626 ok(hres == S_OK, "GetConnectionInterface failed: %08x\n", hres);
4627 ok(IsEqualGUID(riid, &iid), "wrong iid\n");
4628
4629 hres = IConnectionPoint_GetConnectionInterface(cp, NULL);
4630 ok(hres == E_POINTER, "GetConnectionInterface failed: %08x, expected E_POINTER\n", hres);
4631
4632 hres = IConnectionPoint_GetConnectionPointContainer(cp, &tmp_container);
4633 ok(hres == S_OK, "GetConnectionPointContainer failed: %08x\n", hres);
4634 ok(tmp_container == container, "container != tmp_container\n");
4635 if(SUCCEEDED(hres))
4636 IConnectionPointContainer_Release(tmp_container);
4637
4638 hres = IConnectionPoint_GetConnectionPointContainer(cp, NULL);
4639 ok(hres == E_POINTER, "GetConnectionPointContainer failed: %08x, expected E_POINTER\n", hres);
4640
4641 if(IsEqualGUID(&IID_IPropertyNotifySink, riid)) {
4642 hres = IConnectionPoint_Advise(cp, (IUnknown*)&PropertyNotifySink, &cookie);
4643 ok(hres == S_OK, "Advise failed: %08x\n", hres);
4644 } else if(IsEqualGUID(&IID_IDispatch, riid)) {
4645 hres = IConnectionPoint_Advise(cp, (IUnknown*)&EventDispatch, &cookie);
4646 ok(hres == S_OK, "Advise failed: %08x\n", hres);
4647 }
4648
4649 IConnectionPoint_Release(cp);
4650 }
4651
4652 static void test_ConnectionPointContainer(IHTMLDocument2 *doc)
4653 {
4654 IConnectionPointContainer *container;
4655 HRESULT hres;
4656
4657 hres = IUnknown_QueryInterface(doc, &IID_IConnectionPointContainer, (void**)&container);
4658 ok(hres == S_OK, "QueryInterface(IID_IConnectionPointContainer) failed: %08x\n", hres);
4659 if(FAILED(hres))
4660 return;
4661
4662 test_ConnectionPoint(container, &IID_IDispatch);
4663 test_ConnectionPoint(container, &IID_IPropertyNotifySink);
4664 test_ConnectionPoint(container, &DIID_HTMLDocumentEvents);
4665 test_ConnectionPoint(container, &DIID_HTMLDocumentEvents2);
4666
4667 IConnectionPointContainer_Release(container);
4668 }
4669
4670 static void set_custom_uihandler(IHTMLDocument2 *doc, IDocHostUIHandler2 *uihandler)
4671 {
4672 ICustomDoc *custom_doc;
4673 HRESULT hres;
4674
4675 hres = IHTMLDocument2_QueryInterface(doc, &IID_ICustomDoc, (void**)&custom_doc);
4676 ok(hres == S_OK, "Could not get ICustomDoc iface: %08x\n", hres);
4677
4678 expect_uihandler_iface = uihandler;
4679
4680 hres = ICustomDoc_SetUIHandler(custom_doc, (IDocHostUIHandler*)uihandler);
4681 ICustomDoc_Release(custom_doc);
4682 ok(hres == S_OK, "SetUIHandler failed: %08x\n", hres);
4683 }
4684
4685 static void test_Load(IPersistMoniker *persist, IMoniker *mon)
4686 {
4687 IBindCtx *bind;
4688 HRESULT hres;
4689 WCHAR sz_html_clientsite_objectparam[MAX_PATH];
4690
4691 lstrcpyW(sz_html_clientsite_objectparam, SZ_HTML_CLIENTSITE_OBJECTPARAM);
4692
4693 test_readyState((IUnknown*)persist);
4694
4695 doc_mon = mon;
4696
4697 CreateBindCtx(0, &bind);
4698 IBindCtx_RegisterObjectParam(bind, sz_html_clientsite_objectparam,
4699 (IUnknown*)&ClientSite);
4700
4701 if(mon == &Moniker)
4702 SET_EXPECT(GetDisplayName);
4703 if(!set_clientsite) {
4704 SET_EXPECT(Invoke_AMBIENT_USERMODE);
4705 SET_EXPECT(GetHostInfo);
4706 SET_EXPECT(Invoke_AMBIENT_DLCONTROL);
4707 SET_EXPECT(Invoke_AMBIENT_SILENT);
4708 SET_EXPECT(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
4709 SET_EXPECT(Invoke_AMBIENT_USERAGENT);
4710 SET_EXPECT(Invoke_AMBIENT_PALETTE);
4711 SET_EXPECT(GetOptionKeyPath);
4712 SET_EXPECT(GetOverrideKeyPath);
4713 SET_EXPECT(GetWindow);
4714 SET_EXPECT(Exec_DOCCANNAVIGATE);
4715 SET_EXPECT(QueryStatus_SETPROGRESSTEXT);
4716 SET_EXPECT(Exec_SETPROGRESSMAX);
4717 SET_EXPECT(Exec_SETPROGRESSPOS);
4718 SET_EXPECT(Exec_ShellDocView_37);
4719 }
4720 if(!container_locked) {
4721 SET_EXPECT(GetContainer);
4722 SET_EXPECT(LockContainer);
4723 }
4724 SET_EXPECT(OnChanged_READYSTATE);
4725 SET_EXPECT(Invoke_OnReadyStateChange_Loading);
4726 SET_EXPECT(Exec_ShellDocView_84);
4727 SET_EXPECT(IsSystemMoniker);
4728 if(mon == &Moniker)
4729 SET_EXPECT(BindToStorage);
4730 SET_EXPECT(SetActiveObject);
4731 if(set_clientsite) {
4732 SET_EXPECT(Invoke_AMBIENT_SILENT);
4733 SET_EXPECT(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
4734 SET_EXPECT(Exec_ShellDocView_37);
4735 SET_EXPECT(IsErrorUrl);
4736 }
4737 else
4738 SET_EXPECT(GetTravelLog);
4739 SET_EXPECT(GetPendingUrl);
4740 load_state = LD_DOLOAD;
4741 expect_LockContainer_fLock = TRUE;
4742 readystate_set_loading = TRUE;
4743
4744 hres = IPersistMoniker_Load(persist, FALSE, mon, bind, 0x12);
4745 ok(hres == S_OK, "Load failed: %08x\n", hres);
4746
4747 if(mon == &Moniker)
4748 CHECK_CALLED(GetDisplayName);
4749 if(!set_clientsite) {
4750 CHECK_CALLED(Invoke_AMBIENT_USERMODE);
4751 CHECK_CALLED(GetHostInfo);
4752 CHECK_CALLED(Invoke_AMBIENT_DLCONTROL);
4753 CHECK_CALLED(Invoke_AMBIENT_SILENT);
4754 CHECK_CALLED(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
4755 CHECK_CALLED(Invoke_AMBIENT_USERAGENT);
4756 CLEAR_CALLED(Invoke_AMBIENT_PALETTE); /* not called on IE9 */
4757 CLEAR_CALLED(GetOptionKeyPath); /* not called on some IE9 */
4758 CHECK_CALLED(GetOverrideKeyPath);
4759 CHECK_CALLED(GetWindow);
4760 CHECK_CALLED(Exec_DOCCANNAVIGATE);
4761 CHECK_CALLED(QueryStatus_SETPROGRESSTEXT);
4762 CHECK_CALLED(Exec_SETPROGRESSMAX);
4763 CHECK_CALLED(Exec_SETPROGRESSPOS);
4764 CHECK_CALLED(Exec_ShellDocView_37);
4765 }
4766 if(!container_locked) {
4767 CHECK_CALLED(GetContainer);
4768 CHECK_CALLED(LockContainer);
4769 container_locked = TRUE;
4770 }
4771 CHECK_CALLED(OnChanged_READYSTATE);
4772 CHECK_CALLED(Invoke_OnReadyStateChange_Loading);
4773 CLEAR_CALLED(IsSystemMoniker); /* IE7 */
4774 SET_CALLED(Exec_ShellDocView_84);
4775 if(mon == &Moniker)
4776 CHECK_CALLED(BindToStorage);
4777 CLEAR_CALLED(SetActiveObject); /* FIXME */
4778 if(set_clientsite) {
4779 CHECK_CALLED(Invoke_AMBIENT_SILENT);
4780 CHECK_CALLED(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
4781 CHECK_CALLED(Exec_ShellDocView_37);
4782 todo_wine CHECK_CALLED_BROKEN(IsErrorUrl);
4783 }
4784 else
4785 todo_wine CHECK_CALLED(GetTravelLog);
4786 todo_wine CHECK_CALLED(GetPendingUrl);
4787
4788 set_clientsite = container_locked = TRUE;
4789
4790 test_GetCurMoniker((IUnknown*)persist, mon, NULL);
4791
4792 IBindCtx_Release(bind);
4793
4794 test_readyState((IUnknown*)persist);
4795 }
4796
4797 #define DWL_VERBDONE 0x0001
4798 #define DWL_CSS 0x0002
4799 #define DWL_TRYCSS 0x0004
4800 #define DWL_HTTP 0x0008
4801 #define DWL_EMPTY 0x0010
4802 #define DWL_JAVASCRIPT 0x0020
4803 #define DWL_ONREADY_LOADING 0x0040
4804
4805 static void test_download(DWORD flags)
4806 {
4807 const BOOL is_js = (flags & DWL_JAVASCRIPT) != 0;
4808 HWND hwnd;
4809 BOOL *b;
4810 MSG msg;
4811
4812 b = is_js ? &called_Exec_SETDOWNLOADSTATE_0 : &called_Exec_HTTPEQUIV_DONE;
4813
4814 hwnd = FindWindowA("Internet Explorer_Hidden", NULL);
4815 ok(hwnd != NULL, "Could not find hidden window\n");
4816
4817 test_readyState(NULL);
4818
4819 if(flags & (DWL_VERBDONE|DWL_HTTP))
4820 SET_EXPECT(Exec_SETPROGRESSMAX);
4821 if((flags & DWL_VERBDONE) && !load_from_stream && !is_js)
4822 SET_EXPECT(GetHostInfo);
4823 SET_EXPECT(SetStatusText);
4824 if(!(flags & DWL_EMPTY))
4825 SET_EXPECT(Exec_SETDOWNLOADSTATE_1);
4826 if(is_js)
4827 SET_EXPECT(GetExternal);
4828 SET_EXPECT(OnViewChange);
4829 SET_EXPECT(GetDropTarget);
4830 if(flags & DWL_TRYCSS)
4831 SET_EXPECT(Exec_ShellDocView_84);
4832 if(flags & DWL_CSS) {
4833 SET_EXPECT(CreateInstance);
4834 SET_EXPECT(Start);
4835 SET_EXPECT(LockRequest);
4836 SET_EXPECT(Terminate);
4837 SET_EXPECT(Protocol_Read);
4838 SET_EXPECT(UnlockRequest);
4839 }
4840 if(flags & DWL_ONREADY_LOADING)
4841 SET_EXPECT(Invoke_OnReadyStateChange_Loading);
4842 if(!(flags & (DWL_EMPTY|DWL_JAVASCRIPT)))
4843 SET_EXPECT(Invoke_OnReadyStateChange_Interactive);
4844 if(!is_js)
4845 SET_EXPECT(Invoke_OnReadyStateChange_Complete);
4846 SET_EXPECT(Exec_Explorer_69);
4847 SET_EXPECT(EnableModeless_TRUE); /* IE7 */
4848 SET_EXPECT(Frame_EnableModeless_TRUE); /* IE7 */
4849 SET_EXPECT(EnableModeless_FALSE); /* IE7 */
4850 SET_EXPECT(Frame_EnableModeless_FALSE); /* IE7 */
4851 if((nav_url && !is_js) || (flags & (DWL_CSS|DWL_HTTP)))
4852 SET_EXPECT(Exec_ShellDocView_37);
4853 if(flags & DWL_HTTP) {
4854 SET_EXPECT(OnChanged_1012);
4855 SET_EXPECT(Exec_HTTPEQUIV);
4856 SET_EXPECT(Exec_SETTITLE);
4857 }
4858 if(!is_js)
4859 SET_EXPECT(OnChanged_1005);
4860 SET_EXPECT(OnChanged_READYSTATE);
4861 SET_EXPECT(Exec_SETPROGRESSPOS);
4862 if(!(flags & DWL_EMPTY))
4863 SET_EXPECT(Exec_SETDOWNLOADSTATE_0);
4864 SET_EXPECT(Exec_ShellDocView_103);
4865 SET_EXPECT(Exec_ShellDocView_105);
4866 SET_EXPECT(Exec_ShellDocView_140);
4867 if(!is_js) {
4868 SET_EXPECT(Exec_MSHTML_PARSECOMPLETE);
4869 SET_EXPECT(Exec_HTTPEQUIV_DONE);
4870 }
4871 SET_EXPECT(SetStatusText);
4872 if(nav_url || support_wbapp) {
4873 SET_EXPECT(UpdateUI);
4874 SET_EXPECT(Exec_UPDATECOMMANDS);
4875 SET_EXPECT(Exec_SETTITLE);
4876 SET_EXPECT(UpdateBackForwardState);
4877 }
4878 if(!is_js) {
4879 if(!editmode) {
4880 if(!(flags & DWL_EMPTY))
4881 SET_EXPECT(FireNavigateComplete2);
4882 SET_EXPECT(FireDocumentComplete);
4883 }
4884 SET_EXPECT(ActiveElementChanged);
4885 }
4886 SET_EXPECT(IsErrorUrl);
4887 expect_status_text = (LPWSTR)0xdeadbeef; /* TODO */
4888
4889 while(!*b && GetMessage(&msg, NULL, 0, 0)) {
4890 TranslateMessage(&msg);
4891 DispatchMessage(&msg);
4892 }
4893
4894 if(flags & DWL_VERBDONE)
4895 CHECK_CALLED(Exec_SETPROGRESSMAX);
4896 if(flags & DWL_HTTP)
4897 SET_CALLED(Exec_SETPROGRESSMAX);
4898 if((flags & DWL_VERBDONE) && !load_from_stream && !is_js) {
4899 if(nav_url)
4900 todo_wine CHECK_CALLED(GetHostInfo);
4901 else
4902 CHECK_CALLED(GetHostInfo);
4903 }
4904 CHECK_CALLED(SetStatusText);
4905 if(!(flags & DWL_EMPTY))
4906 CHECK_CALLED(Exec_SETDOWNLOADSTATE_1);
4907 if(is_js)
4908 CHECK_CALLED(GetExternal);
4909 CHECK_CALLED(OnViewChange);
4910 CLEAR_CALLED(GetDropTarget);
4911 if(flags & DWL_TRYCSS)
4912 SET_CALLED(Exec_ShellDocView_84);
4913 if(flags & DWL_CSS) {
4914 CHECK_CALLED(CreateInstance);
4915 CHECK_CALLED(Start);
4916 CHECK_CALLED(LockRequest);
4917 CHECK_CALLED(Terminate);
4918 CHECK_CALLED(Protocol_Read);
4919 CHECK_CALLED(UnlockRequest);
4920 }
4921 if(flags & DWL_ONREADY_LOADING)
4922 CHECK_CALLED(Invoke_OnReadyStateChange_Loading);
4923 if(!(flags & (DWL_EMPTY|DWL_JAVASCRIPT)))
4924 CHECK_CALLED(Invoke_OnReadyStateChange_Interactive);
4925 if(!is_js)
4926 CHECK_CALLED(Invoke_OnReadyStateChange_Complete);
4927 SET_CALLED(Exec_Explorer_69);
4928 SET_CALLED(EnableModeless_TRUE); /* IE7 */
4929 SET_CALLED(Frame_EnableModeless_TRUE); /* IE7 */
4930 SET_CALLED(EnableModeless_FALSE); /* IE7 */
4931 SET_CALLED(Frame_EnableModeless_FALSE); /* IE7 */
4932 if(nav_url && !is_js)
4933 todo_wine CHECK_CALLED(Exec_ShellDocView_37);
4934 else if(flags & (DWL_CSS|DWL_HTTP))
4935 CLEAR_CALLED(Exec_ShellDocView_37); /* Called by IE9 */
4936 if(flags & DWL_HTTP) {
4937 todo_wine CHECK_CALLED(OnChanged_1012);
4938 todo_wine CHECK_CALLED(Exec_HTTPEQUIV);
4939 todo_wine CHECK_CALLED(Exec_SETTITLE);
4940 }
4941 if(!is_js) {
4942 CHECK_CALLED(OnChanged_1005);
4943 CHECK_CALLED(OnChanged_READYSTATE);
4944 CHECK_CALLED(Exec_SETPROGRESSPOS);
4945 }else {
4946 CLEAR_CALLED(OnChanged_READYSTATE); /* sometimes called */
4947 todo_wine CHECK_CALLED(Exec_SETPROGRESSPOS);
4948 }
4949 if(!(flags & DWL_EMPTY))
4950 CHECK_CALLED(Exec_SETDOWNLOADSTATE_0);
4951 CLEAR_CALLED(Exec_ShellDocView_103);
4952 CLEAR_CALLED(Exec_ShellDocView_105);
4953 CLEAR_CALLED(Exec_ShellDocView_140);
4954 if(!is_js) {
4955 CHECK_CALLED(Exec_MSHTML_PARSECOMPLETE);
4956 CHECK_CALLED(Exec_HTTPEQUIV_DONE);
4957 }
4958 SET_CALLED(SetStatusText);
4959 if(nav_url || support_wbapp) { /* avoiding race, FIXME: find better way */
4960 CLEAR_CALLED(UpdateUI);
4961 CLEAR_CALLED(Exec_UPDATECOMMANDS);
4962 CLEAR_CALLED(Exec_SETTITLE);
4963 todo_wine CHECK_CALLED_BROKEN(UpdateBackForwardState);
4964 }
4965 if(!is_js) {
4966 if(!editmode) {
4967 if(!(flags & DWL_EMPTY)) {
4968 if(support_wbapp)
4969 CHECK_CALLED(FireNavigateComplete2);
4970 else
4971 todo_wine CHECK_CALLED(FireNavigateComplete2);
4972 }
4973 CHECK_CALLED(FireDocumentComplete);
4974 }
4975 todo_wine CHECK_CALLED(ActiveElementChanged);
4976 }
4977 todo_wine CHECK_CALLED_BROKEN(IsErrorUrl);
4978
4979 load_state = LD_COMPLETE;
4980
4981 test_readyState(NULL);
4982 }
4983
4984 static void test_Persist(IHTMLDocument2 *doc, IMoniker *mon)
4985 {
4986 IPersistMoniker *persist_mon;
4987 IPersistFile *persist_file;
4988 GUID guid;
4989 HRESULT hres;
4990
4991 hres = IUnknown_QueryInterface(doc, &IID_IPersistFile, (void**)&persist_file);
4992 ok(hres == S_OK, "QueryInterface(IID_IPersist) failed: %08x\n", hres);
4993 if(SUCCEEDED(hres)) {
4994 hres = IPersist_GetClassID(persist_file, NULL);
4995 ok(hres == E_INVALIDARG, "GetClassID returned: %08x, expected E_INVALIDARG\n", hres);
4996
4997 hres = IPersist_GetClassID(persist_file, &guid);
4998 ok(hres == S_OK, "GetClassID failed: %08x\n", hres);
4999 ok(IsEqualGUID(&CLSID_HTMLDocument, &guid), "guid != CLSID_HTMLDocument\n");
5000
5001 IPersist_Release(persist_file);
5002 }
5003
5004 hres = IUnknown_QueryInterface(doc, &IID_IPersistMoniker, (void**)&persist_mon);
5005 ok(hres == S_OK, "QueryInterface(IID_IPersistMoniker) failed: %08x\n", hres);
5006 if(SUCCEEDED(hres)) {
5007 hres = IPersistMoniker_GetClassID(persist_mon, NULL);
5008 ok(hres == E_INVALIDARG, "GetClassID returned: %08x, expected E_INVALIDARG\n", hres);
5009
5010 hres = IPersistMoniker_GetClassID(persist_mon, &guid);
5011 ok(hres == S_OK, "GetClassID failed: %08x\n", hres);
5012 ok(IsEqualGUID(&CLSID_HTMLDocument, &guid), "guid != CLSID_HTMLDocument\n");
5013
5014 if(load_state == LD_DOLOAD)
5015 test_Load(persist_mon, mon);
5016
5017 test_readyState((IUnknown*)doc);
5018
5019 IPersistMoniker_Release(persist_mon);
5020 }
5021 }
5022
5023 static void test_put_href(IHTMLDocument2 *doc, BOOL use_replace, const char *href, const char *new_nav_url, BOOL is_js, BOOL is_hash)
5024 {
5025 const char *prev_nav_url = NULL;
5026 IHTMLPrivateWindow *priv_window;
5027 IHTMLLocation *location;
5028 IHTMLWindow2 *window;
5029 BSTR str, str2;
5030 HRESULT hres;
5031
5032 trace("put_href %s...\n", new_nav_url);
5033
5034 loading_js = is_js;
5035 loading_hash = is_hash;
5036
5037 location = NULL;
5038 hres = IHTMLDocument2_get_location(doc, &location);
5039 ok(hres == S_OK, "get_location failed: %08x\n", hres);
5040 ok(location != NULL, "location == NULL\n");
5041
5042 prev_nav_url = nav_url;
5043 nav_url = new_nav_url;
5044 if(!loading_hash)
5045 nav_serv_url = new_nav_url;
5046 if(!href)
5047 href = new_nav_url;
5048
5049 str = a2bstr(href);
5050 SET_EXPECT(TranslateUrl);
5051 if(support_wbapp) {
5052 SET_EXPECT(FireBeforeNavigate2);
5053 SET_EXPECT(Exec_ShellDocView_67);
5054 if(!is_hash) {
5055 SET_EXPECT(Invoke_AMBIENT_SILENT);
5056 SET_EXPECT(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
5057 SET_EXPECT(Exec_ShellDocView_63);
5058 }else {
5059 SET_EXPECT(FireNavigateComplete2);
5060 SET_EXPECT(FireDocumentComplete);
5061 }
5062 }else {
5063 SET_EXPECT(Navigate);
5064 }
5065 if(use_replace) {
5066 hres = IHTMLLocation_replace(location, str);
5067 ok(hres == S_OK, "put_href failed: %08x\n", hres);
5068 }else {
5069 hres = IHTMLLocation_put_href(location, str);
5070 if(is_js && hres == E_ACCESSDENIED)
5071 win_skip("put_href: got E_ACCESSDENIED\n");
5072 else
5073 ok(hres == S_OK, "put_href failed: %08x\n", hres);
5074 }
5075 SysFreeString(str);
5076 if(hres == S_OK) {
5077 CHECK_CALLED(TranslateUrl);
5078 if(support_wbapp) {
5079 CHECK_CALLED(FireBeforeNavigate2);
5080 CHECK_CALLED(Exec_ShellDocView_67);
5081 if(!is_hash) {
5082 CHECK_CALLED(Invoke_AMBIENT_SILENT);
5083 CHECK_CALLED(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
5084 CHECK_CALLED(Exec_ShellDocView_63);
5085 }else {
5086 CHECK_CALLED(FireNavigateComplete2);
5087 CHECK_CALLED(FireDocumentComplete);
5088 }
5089 }else {
5090 CHECK_CALLED(Navigate);
5091 }
5092 }else {
5093 CLEAR_CALLED(TranslateUrl);
5094 if(support_wbapp) {
5095 CLEAR_CALLED(FireBeforeNavigate2);
5096 SET_CALLED(Exec_ShellDocView_67);
5097 if(!is_hash) {
5098 CLEAR_CALLED(Invoke_AMBIENT_SILENT);
5099 CLEAR_CALLED(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
5100 CLEAR_CALLED(Exec_ShellDocView_63);
5101 }else {
5102 CLEAR_CALLED(FireNavigateComplete2);
5103 CLEAR_CALLED(FireDocumentComplete);
5104 }
5105 }else {
5106 CLEAR_CALLED(Navigate);
5107 }
5108 }
5109
5110 IHTMLLocation_Release(location);
5111
5112 if(is_js && hres == E_ACCESSDENIED) {
5113 nav_url = prev_nav_url;
5114 return;
5115 }
5116
5117 hres = IHTMLDocument2_get_parentWindow(doc, &window);
5118 ok(hres == S_OK, "get_parentWindow failed: %08x\n", hres);
5119
5120 hres = IHTMLWindow2_QueryInterface(window, &IID_IHTMLPrivateWindow, (void**)&priv_window);
5121 IHTMLWindow2_Release(window);
5122 ok(hres == S_OK, "QueryInterface(IID_IHTMLPrivateWindow) failed: %08x\n", hres);
5123
5124 if(!support_wbapp) {
5125 VARIANT vempty;
5126
5127 readystate_set_loading = TRUE;
5128 SET_EXPECT(TranslateUrl);
5129 SET_EXPECT(Exec_ShellDocView_67);
5130 SET_EXPECT(Invoke_AMBIENT_SILENT);
5131 SET_EXPECT(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
5132 SET_EXPECT(Exec_ShellDocView_63);
5133
5134 str = a2bstr(nav_url);
5135 str2 = a2bstr("");
5136 V_VT(&vempty) = VT_EMPTY;
5137 hres = IHTMLPrivateWindow_SuperNavigate(priv_window, str, str2, NULL, NULL, &vempty, &vempty, 0);
5138 SysFreeString(str);
5139 SysFreeString(str2);
5140 ok(hres == S_OK, "SuperNavigate failed: %08x\n", hres);
5141
5142 CHECK_CALLED(TranslateUrl);
5143 CHECK_CALLED(Exec_ShellDocView_67);
5144 CHECK_CALLED(Invoke_AMBIENT_SILENT);
5145 CHECK_CALLED(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
5146 CHECK_CALLED(Exec_ShellDocView_63);
5147 }
5148
5149 if(doc_mon) {
5150 test_GetCurMoniker(doc_unk, doc_mon, NULL);
5151 doc_mon = NULL;
5152 }
5153
5154 if(!is_hash) {
5155 hres = IHTMLPrivateWindow_GetAddressBarUrl(priv_window, &str2);
5156 ok(hres == S_OK, "GetAddressBarUrl failed: %08x\n", hres);
5157 ok(!strcmp_wa(str2, prev_nav_url), "unexpected address bar url: %s, expected %s\n", wine_dbgstr_w(str2), prev_nav_url);
5158 SysFreeString(str2);
5159
5160 if(is_js)
5161 ignore_external_qi = TRUE;
5162 test_download(DWL_VERBDONE | (is_js ? DWL_JAVASCRIPT : DWL_ONREADY_LOADING));
5163 if(is_js)
5164 ignore_external_qi = FALSE;
5165
5166 }
5167
5168 hres = IHTMLPrivateWindow_GetAddressBarUrl(priv_window, &str2);
5169 ok(hres == S_OK, "GetAddressBarUrl failed: %08x\n", hres);
5170 if(is_js)
5171 ok(!strcmp_wa(str2, prev_nav_url), "unexpected address bar url: %s\n", wine_dbgstr_w(str2));
5172 else
5173 ok(!strcmp_wa(str2, nav_url), "unexpected address bar url: %s\n", wine_dbgstr_w(str2));
5174 SysFreeString(str2);
5175 IHTMLPrivateWindow_Release(priv_window);
5176
5177 loading_js = FALSE;
5178 if(is_js)
5179 nav_url = prev_nav_url;
5180 }
5181
5182 static void test_open_window(IHTMLDocument2 *doc, BOOL do_block)
5183 {
5184 IHTMLWindow2 *window, *new_window;
5185 BSTR name, url;
5186 HRESULT hres;
5187
5188 allow_new_window = !do_block;
5189
5190 hres = IHTMLDocument2_get_parentWindow(doc, &window);
5191 ok(hres == S_OK, "get_parentWindow failed: %08x\n", hres);
5192
5193 url = a2bstr(nav_serv_url = nav_url = "about:blank");
5194 name = a2bstr("test");
5195 new_window = (void*)0xdeadbeef;
5196
5197 trace("open...\n");
5198 open_call = TRUE;
5199
5200 if(support_wbapp)
5201 SET_EXPECT(get_LocationURL);
5202 SET_EXPECT(TranslateUrl);
5203 SET_EXPECT(EvaluateNewWindow);
5204
5205 hres = IHTMLWindow2_open(window, url, name, NULL, VARIANT_FALSE, &new_window);
5206 open_call = FALSE;
5207 SysFreeString(url);
5208 SysFreeString(name);
5209
5210 if(support_wbapp)
5211 todo_wine CHECK_CALLED_BROKEN(get_LocationURL);
5212 todo_wine
5213 CHECK_CALLED(TranslateUrl);
5214
5215 if(!called_EvaluateNewWindow) {
5216 win_skip("INewWindowManager not supported\n");
5217 if(SUCCEEDED(hres) && new_window)
5218 IHTMLWindow2_Release(new_window);
5219 IHTMLWindow2_Release(window);
5220 return;
5221 }
5222 CHECK_CALLED(EvaluateNewWindow);
5223
5224 ok(hres == S_OK, "open failed: %08x\n", hres);
5225
5226 if(do_block) {
5227 ok(!new_window, "new_window != NULL\n");
5228 }else {
5229 ok(new_window != NULL, "new_window == NULL\n");
5230
5231 hres = IHTMLWindow2_close(new_window);
5232 ok(hres == S_OK, "close failed: %08x\n", hres);
5233 }
5234
5235 IHTMLWindow2_Release(window);
5236 }
5237
5238 static void test_elem_from_point(IHTMLDocument2 *doc)
5239 {
5240 IHTMLElement *elem;
5241 BSTR tag;
5242 HRESULT hres;
5243
5244 elem = NULL;
5245 hres = IHTMLDocument2_elementFromPoint(doc, 3, 3, &elem);
5246 ok(hres == S_OK, "elementFromPoint failed: %08x\n", hres);
5247 ok(elem != NULL, "elem == NULL\n");
5248
5249 hres = IHTMLElement_get_tagName(elem, &tag);
5250 IHTMLElement_Release(elem);
5251 ok(hres == S_OK, "get_tagName failed: %08x\n", hres);
5252 ok(!strcmp_wa(tag, "DIV"), "tag = %s\n", wine_dbgstr_w(tag));
5253 }
5254
5255 static void test_clear(IHTMLDocument2 *doc)
5256 {
5257 HRESULT hres;
5258
5259 hres = IHTMLDocument2_clear(doc);
5260 ok(hres == S_OK, "clear failed: %08x\n", hres);
5261 }
5262
5263 static const OLECMDF expect_cmds[OLECMDID_GETPRINTTEMPLATE+1] = {
5264 0,
5265 OLECMDF_SUPPORTED, /* OLECMDID_OPEN */
5266 OLECMDF_SUPPORTED, /* OLECMDID_NEW */
5267 OLECMDF_SUPPORTED, /* OLECMDID_SAVE */
5268 OLECMDF_SUPPORTED|OLECMDF_ENABLED, /* OLECMDID_SAVEAS */
5269 OLECMDF_SUPPORTED, /* OLECMDID_SAVECOPYAS */
5270 OLECMDF_SUPPORTED|OLECMDF_ENABLED, /* OLECMDID_PRINT */
5271 OLECMDF_SUPPORTED|OLECMDF_ENABLED, /* OLECMDID_PRINTPREVIEW */
5272 OLECMDF_SUPPORTED|OLECMDF_ENABLED, /* OLECMDID_PAGESETUP */
5273 OLECMDF_SUPPORTED, /* OLECMDID_SPELL */
5274 OLECMDF_SUPPORTED|OLECMDF_ENABLED, /* OLECMDID_PROPERTIES */
5275 OLECMDF_SUPPORTED, /* OLECMDID_CUT */
5276 OLECMDF_SUPPORTED, /* OLECMDID_COPY */
5277 OLECMDF_SUPPORTED, /* OLECMDID_PASTE */
5278 OLECMDF_SUPPORTED, /* OLECMDID_PASTESPECIAL */
5279 OLECMDF_SUPPORTED, /* OLECMDID_UNDO */
5280 OLECMDF_SUPPORTED, /* OLECMDID_REDO */
5281 OLECMDF_SUPPORTED|OLECMDF_ENABLED, /* OLECMDID_SELECTALL */
5282 OLECMDF_SUPPORTED, /* OLECMDID_CLEARSELECTION */
5283 OLECMDF_SUPPORTED, /* OLECMDID_ZOOM */
5284 OLECMDF_SUPPORTED, /* OLECMDID_GETZOOMRANGE */
5285 0,
5286 OLECMDF_SUPPORTED|OLECMDF_ENABLED, /* OLECMDID_REFRESH */
5287 OLECMDF_SUPPORTED|OLECMDF_ENABLED, /* OLECMDID_STOP */
5288 0,0,0,0,0,0,
5289 OLECMDF_SUPPORTED, /* OLECMDID_STOPDOWNLOAD */
5290 0,0,
5291 OLECMDF_SUPPORTED, /* OLECMDID_DELETE */
5292 0,0,
5293 OLECMDF_SUPPORTED, /* OLECMDID_ENABLE_INTERACTION */
5294 OLECMDF_SUPPORTED, /* OLECMDID_ONUNLOAD */
5295 0,0,0,0,0,
5296 OLECMDF_SUPPORTED, /* OLECMDID_SHOWPAGESETUP */
5297 OLECMDF_SUPPORTED, /* OLECMDID_SHOWPRINT */
5298 0,0,
5299 OLECMDF_SUPPORTED, /* OLECMDID_CLOSE */
5300 0,0,0,
5301 OLECMDF_SUPPORTED, /* OLECMDID_SETPRINTTEMPLATE */
5302 OLECMDF_SUPPORTED /* OLECMDID_GETPRINTTEMPLATE */
5303 };
5304
5305 #define test_QueryStatus(u,cgid,cmdid,cmdf) _test_QueryStatus(__LINE__,u,cgid,cmdid,cmdf)
5306 static void _test_QueryStatus(unsigned line, IUnknown *unk, REFIID cgid, ULONG cmdid, DWORD cmdf)
5307 {
5308 IOleCommandTarget *cmdtrg;
5309 OLECMD olecmd = {cmdid, 0};
5310 HRESULT hres;
5311
5312 hres = IUnknown_QueryInterface(unk, &IID_IOleCommandTarget, (void**)&cmdtrg);
5313 ok_(__FILE__,line) (hres == S_OK, "QueryInterface(IID_IOleCommandTarget failed: %08x\n", hres);
5314 if(FAILED(hres))
5315 return;
5316
5317 hres = IOleCommandTarget_QueryStatus(cmdtrg, cgid, 1, &olecmd, NULL);
5318 ok(hres == S_OK, "QueryStatus(%u) failed: %08x\n", cmdid, hres);
5319
5320 IOleCommandTarget_Release(cmdtrg);
5321
5322 ok_(__FILE__,line) (olecmd.cmdID == cmdid, "cmdID changed\n");
5323 ok_(__FILE__,line) (olecmd.cmdf == cmdf, "(%u) cmdf=%08x, expected %08x\n", cmdid, olecmd.cmdf, cmdf);
5324 }
5325
5326 static void test_MSHTML_QueryStatus(IHTMLDocument2 *doc, DWORD cmdf)
5327 {
5328 IUnknown *unk = doc ? (IUnknown*)doc : doc_unk;
5329
5330 test_QueryStatus(unk, &CGID_MSHTML, IDM_FONTNAME, cmdf);
5331 test_QueryStatus(unk, &CGID_MSHTML, IDM_FONTSIZE, cmdf);
5332 test_QueryStatus(unk, &CGID_MSHTML, IDM_SELECTALL, cmdf|OLECMDF_ENABLED);
5333 test_QueryStatus(unk, &CGID_MSHTML, IDM_BOLD, cmdf);
5334 test_QueryStatus(unk, &CGID_MSHTML, IDM_FORECOLOR, cmdf);
5335 test_QueryStatus(unk, &CGID_MSHTML, IDM_JUSTIFYCENTER, cmdf);
5336 test_QueryStatus(unk, &CGID_MSHTML, IDM_JUSTIFYLEFT, cmdf);
5337 test_QueryStatus(unk, &CGID_MSHTML, IDM_JUSTIFYRIGHT, cmdf);
5338 test_QueryStatus(unk, &CGID_MSHTML, IDM_ITALIC, cmdf);
5339 test_QueryStatus(unk, &CGID_MSHTML, IDM_UNDERLINE, cmdf);
5340 test_QueryStatus(unk, &CGID_MSHTML, IDM_HORIZONTALLINE, cmdf);
5341 test_QueryStatus(unk, &CGID_MSHTML, IDM_ORDERLIST, cmdf);
5342 test_QueryStatus(unk, &CGID_MSHTML, IDM_UNORDERLIST, cmdf);
5343 test_QueryStatus(unk, &CGID_MSHTML, IDM_INDENT, cmdf);
5344 test_QueryStatus(unk, &CGID_MSHTML, IDM_OUTDENT, cmdf);
5345 test_QueryStatus(unk, &CGID_MSHTML, IDM_DELETE, cmdf);
5346 }
5347
5348 static void test_OleCommandTarget(IHTMLDocument2 *doc)
5349 {
5350 IOleCommandTarget *cmdtrg;
5351 OLECMD cmds[OLECMDID_GETPRINTTEMPLATE];
5352 int i;
5353 HRESULT hres;
5354
5355 hres = IUnknown_QueryInterface(doc, &IID_IOleCommandTarget, (void**)&cmdtrg);
5356 ok(hres == S_OK, "QueryInterface(IID_IOleCommandTarget failed: %08x\n", hres);
5357 if(FAILED(hres))
5358 return;
5359
5360 for(i=0; i<OLECMDID_GETPRINTTEMPLATE; i++) {
5361 cmds[i].cmdID = i+1;
5362 cmds[i].cmdf = 0xf0f0;
5363 }
5364
5365 SET_EXPECT(QueryStatus_OPEN);
5366 SET_EXPECT(QueryStatus_NEW);
5367 hres = IOleCommandTarget_QueryStatus(cmdtrg, NULL, sizeof(cmds)/sizeof(cmds[0]), cmds, NULL);
5368 ok(hres == S_OK, "QueryStatus failed: %08x\n", hres);
5369 CHECK_CALLED(QueryStatus_OPEN);
5370 CHECK_CALLED(QueryStatus_NEW);
5371
5372 for(i=0; i<OLECMDID_GETPRINTTEMPLATE; i++) {
5373 ok(cmds[i].cmdID == i+1, "cmds[%d].cmdID canged to %x\n", i, cmds[i].cmdID);
5374 if(i+1 == OLECMDID_FIND)
5375 continue;
5376 ok(cmds[i].cmdf == expect_cmds[i+1], "cmds[%d].cmdf=%x, expected %x\n",
5377 i+1, cmds[i].cmdf, expect_cmds[i+1]);
5378 }
5379
5380 ok(!cmds[OLECMDID_FIND-1].cmdf || cmds[OLECMDID_FIND-1].cmdf == (OLECMDF_SUPPORTED|OLECMDF_ENABLED),
5381 "cmds[OLECMDID_FIND].cmdf=%x\n", cmds[OLECMDID_FIND-1].cmdf);
5382
5383 IOleCommandTarget_Release(cmdtrg);
5384 }
5385
5386 static void test_OleCommandTarget_fail(IHTMLDocument2 *doc)
5387 {
5388 IOleCommandTarget *cmdtrg;
5389 int i;
5390 HRESULT hres;
5391
5392 OLECMD cmd[2] = {
5393 {OLECMDID_OPEN, 0xf0f0},
5394 {OLECMDID_GETPRINTTEMPLATE+1, 0xf0f0}
5395 };
5396
5397 hres = IUnknown_QueryInterface(doc, &IID_IOleCommandTarget, (void**)&cmdtrg);
5398 ok(hres == S_OK, "QueryInterface(IIDIOleCommandTarget failed: %08x\n", hres);
5399 if(FAILED(hres))
5400 return;
5401
5402 hres = IOleCommandTarget_QueryStatus(cmdtrg, NULL, 0, NULL, NULL);
5403 ok(hres == S_OK, "QueryStatus failed: %08x\n", hres);
5404
5405 SET_EXPECT(QueryStatus_OPEN);
5406 hres = IOleCommandTarget_QueryStatus(cmdtrg, NULL, 2, cmd, NULL);
5407 CHECK_CALLED(QueryStatus_OPEN);
5408
5409 ok(hres == OLECMDERR_E_NOTSUPPORTED,
5410 "QueryStatus failed: %08x, expected OLECMDERR_E_NOTSUPPORTED\n", hres);
5411 ok(cmd[1].cmdID == OLECMDID_GETPRINTTEMPLATE+1,
5412 "cmd[0].cmdID=%d, expected OLECMDID_GETPRINTTEMPLATE+1\n", cmd[0].cmdID);
5413 ok(cmd[1].cmdf == 0, "cmd[0].cmdf=%x, expected 0\n", cmd[0].cmdf);
5414 ok(cmd[0].cmdf == OLECMDF_SUPPORTED,
5415 "cmd[1].cmdf=%x, expected OLECMDF_SUPPORTED\n", cmd[1].cmdf);
5416
5417 hres = IOleCommandTarget_QueryStatus(cmdtrg, &IID_IHTMLDocument2, 2, cmd, NULL);
5418 ok(hres == OLECMDERR_E_UNKNOWNGROUP,
5419 "QueryStatus failed: %08x, expected OLECMDERR_E_UNKNOWNGROUP\n", hres);
5420
5421 for(i=0; i<OLECMDID_GETPRINTTEMPLATE; i++) {
5422 if(!expect_cmds[i]) {
5423 hres = IOleCommandTarget_Exec(cmdtrg, NULL, OLECMDID_UPDATECOMMANDS,
5424 OLECMDEXECOPT_DODEFAULT, NULL, NULL);
5425 ok(hres == OLECMDERR_E_NOTSUPPORTED,
5426 "Exec failed: %08x, expected OLECMDERR_E_NOTSUPPORTED\n", hres);
5427 }
5428 }
5429
5430 hres = IOleCommandTarget_Exec(cmdtrg, NULL, OLECMDID_GETPRINTTEMPLATE+1,
5431 OLECMDEXECOPT_DODEFAULT, NULL, NULL);
5432 ok(hres == OLECMDERR_E_NOTSUPPORTED,
5433 "Exec failed: %08x, expected OLECMDERR_E_NOTSUPPORTED\n", hres);
5434
5435 IOleCommandTarget_Release(cmdtrg);
5436 }
5437
5438 static void test_exec_onunload(IHTMLDocument2 *doc)
5439 {
5440 IOleCommandTarget *cmdtrg;
5441 VARIANT var;
5442 HRESULT hres;
5443
5444 hres = IUnknown_QueryInterface(doc, &IID_IOleCommandTarget, (void**)&cmdtrg);
5445 ok(hres == S_OK, "QueryInterface(IID_IOleCommandTarget) failed: %08x\n", hres);
5446 if(FAILED(hres))
5447 return;
5448
5449 memset(&var, 0x0a, sizeof(var));
5450 hres = IOleCommandTarget_Exec(cmdtrg, NULL, OLECMDID_ONUNLOAD,
5451 OLECMDEXECOPT_DODEFAULT, NULL, &var);
5452 ok(hres == S_OK, "Exec(..., OLECMDID_ONUNLOAD, ...) failed: %08x\n", hres);
5453 ok(V_VT(&var) == VT_BOOL, "V_VT(var)=%d, expected VT_BOOL\n", V_VT(&var));
5454 ok(V_BOOL(&var) == VARIANT_TRUE, "V_BOOL(var)=%x, expected VARIANT_TRUE\n", V_BOOL(&var));
5455
5456 hres = IOleCommandTarget_Exec(cmdtrg, NULL, OLECMDID_ONUNLOAD,
5457 OLECMDEXECOPT_DODEFAULT, NULL, NULL);
5458 ok(hres == S_OK, "Exec(..., OLECMDID_ONUNLOAD, ...) failed: %08x\n", hres);
5459
5460 IOleCommandTarget_Release(cmdtrg);
5461 }
5462
5463 static void test_exec_editmode(IUnknown *unk, BOOL loaded)
5464 {
5465 IOleCommandTarget *cmdtrg;
5466 HRESULT hres;
5467
5468 hres = IUnknown_QueryInterface(unk, &IID_IOleCommandTarget, (void**)&cmdtrg);
5469 ok(hres == S_OK, "QueryInterface(IID_IOleCommandTarget) failed: %08x\n", hres);
5470 if(FAILED(hres))
5471 return;
5472
5473 editmode = TRUE;
5474
5475 if(loaded)
5476 load_state = LD_DOLOAD;
5477
5478 if(loaded)
5479 SET_EXPECT(GetClassID);
5480 SET_EXPECT(SetStatusText);
5481 SET_EXPECT(Exec_ShellDocView_37);
5482 SET_EXPECT(GetHostInfo);
5483 if(loaded)
5484 SET_EXPECT(GetDisplayName);
5485 SET_EXPECT(Invoke_AMBIENT_SILENT);
5486 SET_EXPECT(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
5487 SET_EXPECT(OnChanged_READYSTATE);
5488 SET_EXPECT(Invoke_OnReadyStateChange_Loading);
5489 SET_EXPECT(IsSystemMoniker);
5490 SET_EXPECT(Exec_ShellDocView_84);
5491 if(loaded)
5492 SET_EXPECT(BindToStorage);
5493 SET_EXPECT(InPlaceUIWindow_SetActiveObject);
5494 SET_EXPECT(HideUI);
5495 SET_EXPECT(ShowUI);
5496 SET_EXPECT(InPlaceFrame_SetBorderSpace);
5497
5498 expect_status_text = NULL;
5499 readystate_set_loading = TRUE;
5500
5501 hres = IOleCommandTarget_Exec(cmdtrg, &CGID_MSHTML, IDM_EDITMODE,
5502 OLECMDEXECOPT_DODEFAULT, NULL, NULL);
5503 ok(hres == S_OK, "Exec failed: %08x\n", hres);
5504
5505 if(loaded)
5506 CHECK_CALLED(GetClassID);
5507 CHECK_CALLED(SetStatusText);
5508 CHECK_CALLED(Exec_ShellDocView_37);
5509 CHECK_CALLED(GetHostInfo);
5510 if(loaded)
5511 CHECK_CALLED(GetDisplayName);
5512 CHECK_CALLED(Invoke_AMBIENT_SILENT);
5513 CHECK_CALLED(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
5514 CHECK_CALLED(OnChanged_READYSTATE);
5515 CHECK_CALLED(Invoke_OnReadyStateChange_Loading);
5516 CLEAR_CALLED(IsSystemMoniker); /* IE7 */
5517 SET_CALLED(Exec_ShellDocView_84);
5518 if(loaded)
5519 CHECK_CALLED(BindToStorage);
5520 CHECK_CALLED(InPlaceUIWindow_SetActiveObject);
5521 CHECK_CALLED(HideUI);
5522 CHECK_CALLED(ShowUI);
5523 CHECK_CALLED(InPlaceFrame_SetBorderSpace);
5524
5525 test_timer(EXPECT_UPDATEUI|EXPECT_SETTITLE);
5526
5527 IOleCommandTarget_Release(cmdtrg);
5528
5529 hres = IOleCommandTarget_Exec(cmdtrg, &CGID_MSHTML, IDM_EDITMODE,
5530 OLECMDEXECOPT_DODEFAULT, NULL, NULL);
5531 ok(hres == S_OK, "Exec failed: %08x\n", hres);
5532 }
5533
5534 static void test_exec_fontname(IUnknown *unk, LPCWSTR name, LPCWSTR exname)
5535 {
5536 IOleCommandTarget *cmdtrg;
5537 VARIANT *in = NULL, _in, *out = NULL, _out;
5538 HRESULT hres;
5539
5540 hres = IUnknown_QueryInterface(unk, &IID_IOleCommandTarget, (void**)&cmdtrg);
5541 ok(hres == S_OK, "QueryInterface(IIDIOleM=CommandTarget failed: %08x\n", hres);
5542 if(FAILED(hres))
5543 return;
5544
5545 if(name) {
5546 in = &_in;
5547 V_VT(in) = VT_BSTR;
5548 V_BSTR(in) = SysAllocString(name);
5549 }
5550
5551 if(exname) {
5552 out = &_out;
5553 V_VT(out) = VT_I4;
5554 V_I4(out) = 0xdeadbeef;
5555 }
5556
5557 hres = IOleCommandTarget_Exec(cmdtrg, &CGID_MSHTML, IDM_FONTNAME, 0, in, out);
5558 ok(hres == S_OK, "Exec(IDM_FONTNAME) failed: %08x\n", hres);
5559
5560 if(in)
5561 VariantClear(in);
5562
5563 if(out) {
5564 ok(V_VT(out) == VT_BSTR, "V_VT(out) = %x\n", V_VT(out));
5565 if(V_VT(out) == VT_BSTR) {
5566 if(exname)
5567 ok(!lstrcmpW(V_BSTR(out), name ? name : exname),
5568 "unexpected fontname %s\n", wine_dbgstr_w(name));
5569 else
5570 ok(V_BSTR(out) == NULL, "V_BSTR(out) != NULL\n");
5571 }
5572 VariantClear(out);
5573 }
5574
5575 IOleCommandTarget_Release(cmdtrg);
5576 }
5577
5578 static void test_exec_noargs(IUnknown *unk, DWORD cmdid)
5579 {
5580 IOleCommandTarget *cmdtrg;
5581 HRESULT hres;
5582
5583 hres = IUnknown_QueryInterface(unk, &IID_IOleCommandTarget, (void**)&cmdtrg);
5584 ok(hres == S_OK, "QueryInterface(IID_IOleCommandTarget) failed: %08x\n", hres);
5585 if(FAILED(hres))
5586 return;
5587
5588 hres = IOleCommandTarget_Exec(cmdtrg, &CGID_MSHTML, cmdid,
5589 OLECMDEXECOPT_DODEFAULT, NULL, NULL);
5590 ok(hres == S_OK, "Exec failed: %08x\n", hres);
5591
5592 IOleCommandTarget_Release(cmdtrg);
5593 }
5594
5595 static void test_IsDirty(IHTMLDocument2 *doc, HRESULT exhres)
5596 {
5597 IPersistStreamInit *perinit;
5598 IPersistMoniker *permon;
5599 IPersistFile *perfile;
5600 HRESULT hres;
5601
5602 hres = IUnknown_QueryInterface(doc, &IID_IPersistStreamInit, (void**)&perinit);
5603 ok(hres == S_OK, "QueryInterface(IID_IPersistStreamInit failed: %08x\n", hres);
5604 if(SUCCEEDED(hres)) {
5605 hres = IPersistStreamInit_IsDirty(perinit);
5606 ok(hres == exhres, "IsDirty() = %08x, expected %08x\n", hres, exhres);
5607 IPersistStreamInit_Release(perinit);
5608 }
5609
5610 hres = IUnknown_QueryInterface(doc, &IID_IPersistMoniker, (void**)&permon);
5611 ok(hres == S_OK, "QueryInterface(IID_IPersistMoniker failed: %08x\n", hres);
5612 if(SUCCEEDED(hres)) {
5613 hres = IPersistMoniker_IsDirty(permon);
5614 ok(hres == exhres, "IsDirty() = %08x, expected %08x\n", hres, exhres);
5615 IPersistMoniker_Release(permon);
5616 }
5617
5618 hres = IUnknown_QueryInterface(doc, &IID_IPersistFile, (void**)&perfile);
5619 ok(hres == S_OK, "QueryInterface(IID_IPersistFile failed: %08x\n", hres);
5620 if(SUCCEEDED(hres)) {
5621 hres = IPersistFile_IsDirty(perfile);
5622 ok(hres == exhres, "IsDirty() = %08x, expected %08x\n", hres, exhres);
5623 IPersistFile_Release(perfile);
5624 }
5625 }
5626
5627 static HWND create_container_window(void)
5628 {
5629 static const WCHAR wszHTMLDocumentTest[] =
5630 {'H','T','M','L','D','o','c','u','m','e','n','t','T','e','s','t',0};
5631 static WNDCLASSEXW wndclass = {
5632 sizeof(WNDCLASSEXW),
5633 0,
5634 wnd_proc,
5635 0, 0, NULL, NULL, NULL, NULL, NULL,
5636 wszHTMLDocumentTest,
5637 NULL
5638 };
5639
5640 RegisterClassExW(&wndclass);
5641 return CreateWindowW(wszHTMLDocumentTest, wszHTMLDocumentTest,
5642 WS_OVERLAPPEDWINDOW, CW_USEDEFAULT, CW_USEDEFAULT,
5643 515, 530, NULL, NULL, NULL, NULL);
5644 }
5645
5646 static void test_DoVerb(IOleObject *oleobj)
5647 {
5648 RECT rect = {0,0,500,500};
5649 HRESULT hres;
5650
5651 if(!container_locked) {
5652 SET_EXPECT(GetContainer);
5653 SET_EXPECT(LockContainer);
5654 }
5655 SET_EXPECT(ActivateMe);
5656 expect_LockContainer_fLock = TRUE;
5657
5658 hres = IOleObject_DoVerb(oleobj, OLEIVERB_SHOW, NULL, &ClientSite, -1, container_hwnd, &rect);
5659 ok(hres == S_OK, "DoVerb failed: %08x\n", hres);
5660
5661 if(!container_locked) {
5662 CHECK_CALLED(GetContainer);
5663 CHECK_CALLED(LockContainer);
5664 container_locked = TRUE;
5665 }
5666 CHECK_CALLED(ActivateMe);
5667 }
5668
5669 #define CLIENTSITE_EXPECTPATH 0x00000001
5670 #define CLIENTSITE_SETNULL 0x00000002
5671 #define CLIENTSITE_DONTSET 0x00000004
5672
5673 static void test_ClientSite(IOleObject *oleobj, DWORD flags)
5674 {
5675 IOleClientSite *clientsite;
5676 HRESULT hres;
5677
5678 if(flags & CLIENTSITE_SETNULL) {
5679 hres = IOleObject_GetClientSite(oleobj, &clientsite);
5680 ok(hres == S_OK, "SetClientSite failed: %08x\n", hres);
5681 if(set_clientsite)
5682 ok(clientsite == &ClientSite, "clientsite=%p, expected %p\n", clientsite, &ClientSite);
5683 else
5684 ok(!clientsite, "clientsite != NULL\n");
5685
5686 SET_EXPECT(GetOverrideKeyPath);
5687 hres = IOleObject_SetClientSite(oleobj, NULL);
5688 ok(hres == S_OK, "SetClientSite failed: %08x\n", hres);
5689 CLEAR_CALLED(GetOverrideKeyPath); /* IE9 sometimes calls it */
5690
5691 set_clientsite = FALSE;
5692 }
5693
5694 if(flags & CLIENTSITE_DONTSET)
5695 return;
5696
5697 if(!expect_uihandler_iface)
5698 expect_uihandler_iface = &DocHostUIHandler;
5699
5700 hres = IOleObject_GetClientSite(oleobj, &clientsite);
5701 ok(hres == S_OK, "GetClientSite failed: %08x\n", hres);
5702 ok(clientsite == (set_clientsite ? &ClientSite : NULL), "GetClientSite() = %p, expected %p\n",
5703 clientsite, set_clientsite ? &ClientSite : NULL);
5704
5705 if(!set_clientsite) {
5706 if(expect_uihandler_iface)
5707 SET_EXPECT(GetHostInfo);
5708 if(flags & CLIENTSITE_EXPECTPATH) {
5709 SET_EXPECT(GetOptionKeyPath);
5710 SET_EXPECT(GetOverrideKeyPath);
5711 }
5712 SET_EXPECT(GetWindow);
5713 if(flags & CLIENTSITE_EXPECTPATH)
5714 SET_EXPECT(Exec_DOCCANNAVIGATE);
5715 SET_EXPECT(QueryStatus_SETPROGRESSTEXT);
5716 SET_EXPECT(Exec_SETPROGRESSMAX);
5717 SET_EXPECT(Exec_SETPROGRESSPOS);
5718 SET_EXPECT(Invoke_AMBIENT_USERMODE);
5719 SET_EXPECT(Invoke_AMBIENT_DLCONTROL);
5720 SET_EXPECT(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
5721 SET_EXPECT(Invoke_AMBIENT_SILENT);
5722 SET_EXPECT(Invoke_AMBIENT_USERAGENT);
5723 SET_EXPECT(Invoke_AMBIENT_PALETTE);
5724 SET_EXPECT(GetOverrideKeyPath);
5725 SET_EXPECT(GetTravelLog);
5726
5727 hres = IOleObject_SetClientSite(oleobj, &ClientSite);
5728 ok(hres == S_OK, "SetClientSite failed: %08x\n", hres);
5729
5730 if(expect_uihandler_iface)
5731 CHECK_CALLED(GetHostInfo);
5732 if(flags & CLIENTSITE_EXPECTPATH) {
5733 CLEAR_CALLED(GetOptionKeyPath); /* not called on some IE9 */
5734 CHECK_CALLED(GetOverrideKeyPath);
5735 }
5736 CHECK_CALLED(GetWindow);
5737 if(flags & CLIENTSITE_EXPECTPATH)
5738 CHECK_CALLED(Exec_DOCCANNAVIGATE);
5739 CHECK_CALLED(QueryStatus_SETPROGRESSTEXT);
5740 CHECK_CALLED(Exec_SETPROGRESSMAX);
5741 CHECK_CALLED(Exec_SETPROGRESSPOS);
5742 CHECK_CALLED(Invoke_AMBIENT_USERMODE);
5743 CHECK_CALLED(Invoke_AMBIENT_DLCONTROL);
5744 CHECK_CALLED(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
5745 CHECK_CALLED(Invoke_AMBIENT_SILENT);
5746 CHECK_CALLED(Invoke_AMBIENT_USERAGENT);
5747 CLEAR_CALLED(Invoke_AMBIENT_PALETTE); /* not called on IE9 */
5748 CLEAR_CALLED(GetOverrideKeyPath); /* Called by IE9 */
5749 todo_wine CHECK_CALLED(GetTravelLog);
5750
5751 set_clientsite = TRUE;
5752 }
5753
5754 hres = IOleObject_SetClientSite(oleobj, &ClientSite);
5755 ok(hres == S_OK, "SetClientSite failed: %08x\n", hres);
5756
5757 hres = IOleObject_GetClientSite(oleobj, &clientsite);
5758 ok(hres == S_OK, "GetClientSite failed: %08x\n", hres);
5759 ok(clientsite == &ClientSite, "GetClientSite() = %p, expected %p\n", clientsite, &ClientSite);
5760 }
5761
5762 static void test_OnAmbientPropertyChange(IHTMLDocument2 *doc)
5763 {
5764 IOleControl *control = NULL;
5765 HRESULT hres;
5766
5767 hres = IUnknown_QueryInterface(doc, &IID_IOleControl, (void**)&control);
5768 ok(hres == S_OK, "QueryInterface(IID_IOleControl failed: %08x\n", hres);
5769 if(FAILED(hres))
5770 return;
5771
5772 SET_EXPECT(Invoke_AMBIENT_USERMODE);
5773 hres = IOleControl_OnAmbientPropertyChange(control, DISPID_AMBIENT_USERMODE);
5774 ok(hres == S_OK, "OnAmbientChange failed: %08x\n", hres);
5775 CHECK_CALLED(Invoke_AMBIENT_USERMODE);
5776
5777 SET_EXPECT(Invoke_AMBIENT_DLCONTROL);
5778 hres = IOleControl_OnAmbientPropertyChange(control, DISPID_AMBIENT_DLCONTROL);
5779 ok(hres == S_OK, "OnAmbientChange failed: %08x\n", hres);
5780 CHECK_CALLED(Invoke_AMBIENT_DLCONTROL);
5781
5782 SET_EXPECT(Invoke_AMBIENT_DLCONTROL);
5783 SET_EXPECT(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
5784 hres = IOleControl_OnAmbientPropertyChange(control, DISPID_AMBIENT_OFFLINEIFNOTCONNECTED);
5785 ok(hres == S_OK, "OnAmbientChange failed: %08x\n", hres);
5786 CHECK_CALLED(Invoke_AMBIENT_DLCONTROL);
5787 CHECK_CALLED(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
5788
5789 SET_EXPECT(Invoke_AMBIENT_DLCONTROL);
5790 SET_EXPECT(Invoke_AMBIENT_SILENT);
5791 hres = IOleControl_OnAmbientPropertyChange(control, DISPID_AMBIENT_SILENT);
5792 ok(hres == S_OK, "OnAmbientChange failed: %08x\n", hres);
5793 CHECK_CALLED(Invoke_AMBIENT_DLCONTROL);
5794 CHECK_CALLED(Invoke_AMBIENT_SILENT);
5795
5796 SET_EXPECT(Invoke_AMBIENT_USERAGENT);
5797 hres = IOleControl_OnAmbientPropertyChange(control, DISPID_AMBIENT_USERAGENT);
5798 ok(hres == S_OK, "OnAmbientChange failed: %08x\n", hres);
5799 CHECK_CALLED(Invoke_AMBIENT_USERAGENT);
5800
5801 SET_EXPECT(Invoke_AMBIENT_PALETTE);
5802 hres = IOleControl_OnAmbientPropertyChange(control, DISPID_AMBIENT_PALETTE);
5803 ok(hres == S_OK, "OnAmbientChange failed: %08x\n", hres);
5804 CLEAR_CALLED(Invoke_AMBIENT_PALETTE); /* not called on IE9 */
5805
5806 IOleControl_Release(control);
5807 }
5808
5809
5810
5811 static void test_OnAmbientPropertyChange2(IHTMLDocument2 *doc)
5812 {
5813 IOleControl *control = NULL;
5814 HRESULT hres;
5815
5816 hres = IUnknown_QueryInterface(doc, &IID_IOleControl, (void**)&control);
5817 ok(hres == S_OK, "QueryInterface(IID_IOleControl failed: %08x\n", hres);
5818 if(FAILED(hres))
5819 return;
5820
5821 hres = IOleControl_OnAmbientPropertyChange(control, DISPID_AMBIENT_PALETTE);
5822 ok(hres == S_OK, "OnAmbientPropertyChange failed: %08x\n", hres);
5823
5824 IOleControl_Release(control);
5825 }
5826
5827 static void test_Close(IHTMLDocument2 *doc, BOOL set_client)
5828 {
5829 IOleObject *oleobj = NULL;
5830 HRESULT hres;
5831
5832 hres = IUnknown_QueryInterface(doc, &IID_IOleObject, (void**)&oleobj);
5833 ok(hres == S_OK, "QueryInterface(IID_IOleObject) failed: %08x\n", hres);
5834 if(FAILED(hres))
5835 return;
5836
5837 SET_EXPECT(GetContainer);
5838 SET_EXPECT(LockContainer);
5839 expect_LockContainer_fLock = FALSE;
5840 hres = IOleObject_Close(oleobj, OLECLOSE_NOSAVE);
5841 ok(hres == S_OK, "Close failed: %08x\n", hres);
5842 CHECK_CALLED(GetContainer);
5843 CHECK_CALLED(LockContainer);
5844 container_locked = FALSE;
5845
5846 if(set_client)
5847 test_ClientSite(oleobj, CLIENTSITE_SETNULL|CLIENTSITE_DONTSET);
5848
5849 IOleObject_Release(oleobj);
5850 }
5851
5852 static void test_Advise(IHTMLDocument2 *doc)
5853 {
5854 IOleObject *oleobj = NULL;
5855 IEnumSTATDATA *enum_advise = (void*)0xdeadbeef;
5856 DWORD conn;
5857 HRESULT hres;
5858
5859 hres = IUnknown_QueryInterface(doc, &IID_IOleObject, (void**)&oleobj);
5860 ok(hres == S_OK, "QueryInterface(IID_IOleObject) failed: %08x\n", hres);
5861 if(FAILED(hres))
5862 return;
5863
5864 hres = IOleObject_Unadvise(oleobj, 0);
5865 ok(hres == OLE_E_NOCONNECTION, "Unadvise returned: %08x\n", hres);
5866
5867 hres = IOleObject_EnumAdvise(oleobj, &enum_advise);
5868 ok(hres == S_OK, "EnumAdvise returned: %08x\n", hres);
5869 ok(enum_advise == NULL, "enum_advise != NULL\n");
5870
5871 conn = -1;
5872 hres = IOleObject_Advise(oleobj, NULL, &conn);
5873 /* Old IE returns S_OK and sets conn to 1 */
5874 ok(hres == E_INVALIDARG || hres == S_OK, "Advise returned: %08x\n", hres);
5875 ok(conn == 0 || conn == 1, "conn = %d\n", conn);
5876
5877 hres = IOleObject_Advise(oleobj, (IAdviseSink*)&AdviseSink, NULL);
5878 ok(hres == E_INVALIDARG, "Advise returned: %08x\n", hres);
5879
5880 hres = IOleObject_Advise(oleobj, (IAdviseSink*)&AdviseSink, &conn);
5881 ok(hres == S_OK, "Advise returned: %08x\n", hres);
5882 ok(conn == 1, "conn = %d\n", conn);
5883
5884 hres = IOleObject_Advise(oleobj, (IAdviseSink*)&AdviseSink, &conn);
5885 ok(hres == S_OK, "Advise returned: %08x\n", hres);
5886 ok(conn == 2, "conn = %d\n", conn);
5887
5888 hres = IOleObject_Unadvise(oleobj, 1);
5889 ok(hres == S_OK, "Unadvise returned: %08x\n", hres);
5890
5891 hres = IOleObject_Unadvise(oleobj, 1);
5892 ok(hres == OLE_E_NOCONNECTION, "Unadvise returned: %08x\n", hres);
5893
5894 hres = IOleObject_Unadvise(oleobj, 2);
5895 ok(hres == S_OK, "Unadvise returned: %08x\n", hres);
5896
5897 IOleObject_Release(oleobj);
5898 }
5899
5900 static void test_OnFrameWindowActivate(IUnknown *unk)
5901 {
5902 IOleInPlaceActiveObject *inplaceact;
5903 HRESULT hres;
5904
5905 hres = IUnknown_QueryInterface(unk, &IID_IOleInPlaceActiveObject, (void**)&inplaceact);
5906 ok(hres == S_OK, "QueryInterface(IID_IOleInPlaceActiveObject) failed: %08x\n", hres);
5907 if(FAILED(hres))
5908 return;
5909
5910 if(set_clientsite) {
5911 expect_OnFrameWindowActivate_fActivate = TRUE;
5912 SET_EXPECT(OnFrameWindowActivate);
5913 hres = IOleInPlaceActiveObject_OnFrameWindowActivate(inplaceact, TRUE);
5914 ok(hres == S_OK, "OnFrameWindowActivate failed: %08x\n", hres);
5915 CHECK_CALLED(OnFrameWindowActivate);
5916
5917 SET_EXPECT(OnFrameWindowActivate);
5918 hres = IOleInPlaceActiveObject_OnFrameWindowActivate(inplaceact, TRUE);
5919 ok(hres == S_OK, "OnFrameWindowActivate failed: %08x\n", hres);
5920 CHECK_CALLED(OnFrameWindowActivate);
5921
5922 expect_OnFrameWindowActivate_fActivate = FALSE;
5923 SET_EXPECT(OnFrameWindowActivate);
5924 hres = IOleInPlaceActiveObject_OnFrameWindowActivate(inplaceact, FALSE);
5925 ok(hres == S_OK, "OnFrameWindowActivate failed: %08x\n", hres);
5926 CHECK_CALLED(OnFrameWindowActivate);
5927
5928 expect_OnFrameWindowActivate_fActivate = TRUE;
5929 SET_EXPECT(OnFrameWindowActivate);
5930 hres = IOleInPlaceActiveObject_OnFrameWindowActivate(inplaceact, TRUE);
5931 ok(hres == S_OK, "OnFrameWindowActivate failed: %08x\n", hres);
5932 CHECK_CALLED(OnFrameWindowActivate);
5933 }else {
5934 hres = IOleInPlaceActiveObject_OnFrameWindowActivate(inplaceact, FALSE);
5935 ok(hres == S_OK, "OnFrameWindowActivate failed: %08x\n", hres);
5936
5937 hres = IOleInPlaceActiveObject_OnFrameWindowActivate(inplaceact, TRUE);
5938 ok(hres == S_OK, "OnFrameWindowActivate failed: %08x\n", hres);
5939 }
5940
5941 IOleInPlaceActiveObject_Release(inplaceact);
5942 }
5943
5944 static void test_InPlaceDeactivate(IHTMLDocument2 *doc, BOOL expect_call)
5945 {
5946 IOleInPlaceObjectWindowless *windowlessobj = NULL;
5947 HRESULT hres;
5948
5949 hres = IUnknown_QueryInterface(doc, &IID_IOleInPlaceObjectWindowless,
5950 (void**)&windowlessobj);
5951 ok(hres == S_OK, "QueryInterface(IID_IOleInPlaceObjectWindowless) failed: %08x\n", hres);
5952 if(FAILED(hres))
5953 return;
5954
5955 if(expect_call) {
5956 SET_EXPECT(SetStatusText);
5957 SET_EXPECT(OnFocus_FALSE);
5958 if(ipsex)
5959 SET_EXPECT(OnInPlaceDeactivateEx);
5960 else
5961 SET_EXPECT(OnInPlaceDeactivate);
5962 }
5963 hres = IOleInPlaceObjectWindowless_InPlaceDeactivate(windowlessobj);
5964 ok(hres == S_OK, "InPlaceDeactivate failed: %08x\n", hres);
5965 if(expect_call) {
5966 CLEAR_CALLED(SetStatusText); /* Called by IE9 */
5967 CHECK_CALLED(OnFocus_FALSE);
5968 if(ipsex)
5969 CHECK_CALLED(OnInPlaceDeactivateEx);
5970 else
5971 CHECK_CALLED(OnInPlaceDeactivate);
5972 }
5973
5974 IOleInPlaceObjectWindowless_Release(windowlessobj);
5975 }
5976
5977 static void test_Activate(IHTMLDocument2 *doc, DWORD flags)
5978 {
5979 IOleObject *oleobj = NULL;
5980 IOleDocumentView *docview;
5981 GUID guid;
5982 HRESULT hres;
5983
5984 last_hwnd = hwnd;
5985
5986 if(view)
5987 IOleDocumentView_Release(view);
5988 view = NULL;
5989
5990 hres = IUnknown_QueryInterface(doc, &IID_IOleObject, (void**)&oleobj);
5991 ok(hres == S_OK, "QueryInterface(IID_IOleObject) failed: %08x\n", hres);
5992
5993 hres = IOleObject_GetUserClassID(oleobj, NULL);
5994 ok(hres == E_INVALIDARG, "GetUserClassID returned: %08x, expected E_INVALIDARG\n", hres);
5995
5996 hres = IOleObject_GetUserClassID(oleobj, &guid);
5997 ok(hres == S_OK, "GetUserClassID failed: %08x\n", hres);
5998 ok(IsEqualGUID(&guid, &CLSID_HTMLDocument), "guid != CLSID_HTMLDocument\n");
5999
6000 test_OnFrameWindowActivate((IUnknown*)doc);
6001
6002 test_ClientSite(oleobj, flags);
6003 test_InPlaceDeactivate(doc, FALSE);
6004 test_DoVerb(oleobj);
6005
6006 if(call_UIActivate == CallUIActivate_AfterShow) {
6007 hres = IOleObject_QueryInterface(oleobj, &IID_IOleDocumentView, (void **)&docview);
6008 ok(hres == S_OK, "IOleObject_QueryInterface failed with error 0x%08x\n", hres);
6009
6010 SET_EXPECT(OnFocus_TRUE);
6011 SET_EXPECT(SetActiveObject);
6012 SET_EXPECT(ShowUI);
6013 SET_EXPECT(InPlaceUIWindow_SetActiveObject);
6014 SET_EXPECT(InPlaceFrame_SetBorderSpace);
6015 expect_status_text = NULL;
6016
6017 hres = IOleDocumentView_UIActivate(docview, TRUE);
6018 ok(hres == S_OK, "IOleDocumentView_UIActivate failed with error 0x%08x\n", hres);
6019
6020 CHECK_CALLED(OnFocus_TRUE);
6021 CHECK_CALLED(SetActiveObject);
6022 CHECK_CALLED(ShowUI);
6023 CHECK_CALLED(InPlaceUIWindow_SetActiveObject);
6024 CHECK_CALLED(InPlaceFrame_SetBorderSpace);
6025
6026 IOleDocumentView_Release(docview);
6027 }
6028
6029 IOleObject_Release(oleobj);
6030
6031 test_OnFrameWindowActivate((IUnknown*)doc);
6032 }
6033
6034 static void test_Window(IHTMLDocument2 *doc, BOOL expect_success)
6035 {
6036 IOleInPlaceActiveObject *activeobject = NULL;
6037 HWND tmp_hwnd;
6038 HRESULT hres;
6039
6040 hres = IOleDocumentView_QueryInterface(view, &IID_IOleInPlaceActiveObject, (void**)&activeobject);
6041 ok(hres == S_OK, "Could not get IOleInPlaceActiveObject interface: %08x\n", hres);
6042 if(FAILED(hres))
6043 return;
6044
6045 hres = IOleInPlaceActiveObject_GetWindow(activeobject, &tmp_hwnd);
6046
6047 if(expect_success) {
6048 ok(hres == S_OK, "GetWindow failed: %08x\n", hres);
6049 ok(tmp_hwnd == hwnd, "tmp_hwnd=%p, expected %p\n", tmp_hwnd, hwnd);
6050 }else {
6051 ok(hres == E_FAIL, "GetWindow returned %08x, expected E_FAIL\n", hres);
6052 ok(IsWindow(hwnd), "hwnd is destroyed\n");
6053 }
6054
6055 IOleInPlaceActiveObject_Release(activeobject);
6056 }
6057
6058 static void test_CloseView(void)
6059 {
6060 IOleInPlaceSite *inplacesite = (IOleInPlaceSite*)0xff00ff00;
6061 HRESULT hres;
6062
6063 if(!view)
6064 return;
6065
6066 hres = IOleDocumentView_Show(view, FALSE);
6067 ok(hres == S_OK, "Show failed: %08x\n", hres);
6068
6069 hres = IOleDocumentView_CloseView(view, 0);
6070 ok(hres == S_OK, "CloseView failed: %08x\n", hres);
6071
6072 hres = IOleDocumentView_SetInPlaceSite(view, NULL);
6073 ok(hres == S_OK, "SetInPlaceSite failed: %08x\n", hres);
6074
6075 hres = IOleDocumentView_GetInPlaceSite(view, &inplacesite);
6076 ok(hres == S_OK, "SetInPlaceSite failed: %08x\n", hres);
6077 ok(inplacesite == NULL, "inplacesite=%p, expected NULL\n", inplacesite);
6078 }
6079
6080 static void test_UIDeactivate(void)
6081 {
6082 HRESULT hres;
6083
6084 if(call_UIActivate == CallUIActivate_AfterShow) {
6085 SET_EXPECT(InPlaceUIWindow_SetActiveObject);
6086 }
6087 if(call_UIActivate != CallUIActivate_None) {
6088 SET_EXPECT(SetActiveObject_null);
6089 SET_EXPECT(HideUI);
6090 SET_EXPECT(OnUIDeactivate);
6091 }
6092
6093 hres = IOleDocumentView_UIActivate(view, FALSE);
6094 ok(hres == S_OK, "UIActivate failed: %08x\n", hres);
6095
6096 if(call_UIActivate != CallUIActivate_None) {
6097 CHECK_CALLED(SetActiveObject_null);
6098 CHECK_CALLED(HideUI);
6099 CHECK_CALLED(OnUIDeactivate);
6100 }
6101 if(call_UIActivate == CallUIActivate_AfterShow) {
6102 CHECK_CALLED(InPlaceUIWindow_SetActiveObject);
6103 }
6104 }
6105
6106 static void test_Hide(void)
6107 {
6108 HRESULT hres;
6109
6110 if(!view)
6111 return;
6112
6113 hres = IOleDocumentView_Show(view, FALSE);
6114 ok(hres == S_OK, "Show failed: %08x\n", hres);
6115 }
6116
6117 static IHTMLDocument2 *create_document(void)
6118 {
6119 IHTMLDocument2 *doc;
6120 HRESULT hres;
6121
6122 hres = CoCreateInstance(&CLSID_HTMLDocument, NULL, CLSCTX_INPROC_SERVER|CLSCTX_INPROC_HANDLER,
6123 &IID_IHTMLDocument2, (void**)&doc);
6124 ok(hres == S_OK, "CoCreateInstance failed: %08x\n", hres);
6125 if(FAILED(hres))
6126 return NULL;
6127
6128 return doc;
6129 }
6130
6131 static void release_document(IHTMLDocument2 *doc)
6132 {
6133 IUnknown *unk;
6134 ULONG ref;
6135 HRESULT hres;
6136
6137 /* Some broken IEs don't like if the last released reference is IHTMLDocument2 iface.
6138 * To workaround it, we release it via IUnknown iface */
6139 hres = IHTMLDocument2_QueryInterface(doc, &IID_IUnknown, (void**)&unk);
6140 ok(hres == S_OK, "Could not get IUnknown iface: %08x\n", hres);
6141
6142 IHTMLDocument2_Release(doc);
6143 ref = IUnknown_Release(unk);
6144 ok(!ref, "ref = %d\n", ref);
6145 }
6146
6147 static void test_Navigate(IHTMLDocument2 *doc)
6148 {
6149 IHlinkTarget *hlink;
6150 HRESULT hres;
6151
6152 hres = IUnknown_QueryInterface(doc, &IID_IHlinkTarget, (void**)&hlink);
6153 ok(hres == S_OK, "QueryInterface(IID_IHlinkTarget) failed: %08x\n", hres);
6154
6155 SET_EXPECT(ActivateMe);
6156 hres = IHlinkTarget_Navigate(hlink, 0, NULL);
6157 ok(hres == S_OK, "Navigate failed: %08x\n", hres);
6158 CHECK_CALLED(ActivateMe);
6159
6160 IHlinkTarget_Release(hlink);
6161 }
6162
6163 static void test_external(IHTMLDocument2 *doc, BOOL initialized)
6164 {
6165 IDispatch *external;
6166 IHTMLWindow2 *htmlwin;
6167 HRESULT hres;
6168
6169 hres = IHTMLDocument2_get_parentWindow(doc, &htmlwin);
6170 ok(hres == S_OK, "get_parentWindow failed: %08x\n", hres);
6171
6172 if(initialized)
6173 SET_EXPECT(GetExternal);
6174 external = (void*)0xdeadbeef;
6175 hres = IHTMLWindow2_get_external(htmlwin, &external);
6176 if(initialized) {
6177 ok(hres == S_FALSE || hres == S_OK, "get_external failed: %08x\n", hres);
6178 CHECK_CALLED(GetExternal);
6179 ok(external != NULL, "external == NULL\n");
6180 }else {
6181 ok(hres == S_OK, "get_external failed: %08x\n", hres);
6182 ok(external == NULL, "external != NULL\n");
6183 }
6184
6185 IHTMLWindow2_Release(htmlwin);
6186 }
6187
6188 static void test_enum_objects(IOleContainer *container)
6189 {
6190 IEnumUnknown *enum_unknown;
6191 IUnknown *buf[100] = {(void*)0xdeadbeef};
6192 ULONG fetched;
6193 HRESULT hres;
6194
6195 enum_unknown = NULL;
6196 hres = IOleContainer_EnumObjects(container, OLECONTF_EMBEDDINGS, &enum_unknown);
6197 ok(hres == S_OK, "EnumObjects failed: %08x\n", hres);
6198 ok(enum_unknown != NULL, "enum_unknown == NULL\n");
6199
6200 fetched = 0xdeadbeef;
6201 hres = IEnumUnknown_Next(enum_unknown, sizeof(buf)/sizeof(*buf), buf, &fetched);
6202 ok(hres == S_FALSE, "Next returned %08x\n", hres);
6203 ok(!fetched, "fetched = %d\n", fetched);
6204 ok(buf[0] == (void*)0xdeadbeef, "buf[0] = %p\n", buf[0]);
6205
6206 fetched = 0xdeadbeef;
6207 hres = IEnumUnknown_Next(enum_unknown, 1, buf, &fetched);
6208 ok(hres == S_FALSE, "Next returned %08x\n", hres);
6209 ok(!fetched, "fetched = %d\n", fetched);
6210
6211 hres = IEnumUnknown_Next(enum_unknown, 1, buf, NULL);
6212 ok(hres == S_FALSE, "Next returned %08x\n", hres);
6213
6214 IEnumUnknown_Release(enum_unknown);
6215 }
6216
6217 static void test_target_container(IHTMLDocument2 *doc)
6218 {
6219 IOleContainer *ole_container, *doc_ole_container;
6220 ITargetContainer *target_container;
6221 HRESULT hres;
6222
6223 hres = IHTMLDocument2_QueryInterface(doc, &IID_ITargetContainer, (void**)&target_container);
6224 ok(hres == S_OK, "Could not get ITargetContainer iface: %08x\n", hres);
6225
6226 hres = IHTMLDocument2_QueryInterface(doc, &IID_IOleContainer, (void**)&doc_ole_container);
6227 ok(hres == S_OK, "Could not get ITargetContainer iface: %08x\n", hres);
6228
6229 ole_container = (void*)0xdeadbeef;
6230 hres = ITargetContainer_GetFramesContainer(target_container, &ole_container);
6231 ok(hres == S_OK, "GetFramesContainer failed: %08x\n", hres);
6232 ok(ole_container != NULL, "ole_container == NULL\n");
6233 ok(iface_cmp((IUnknown*)ole_container, (IUnknown*)doc_ole_container), "ole_container != doc_ole_container\n");
6234 test_enum_objects(ole_container);
6235 IOleContainer_Release(ole_container);
6236
6237 ITargetContainer_Release(target_container);
6238 IOleContainer_Release(doc_ole_container);
6239 }
6240
6241 static void test_StreamLoad(IHTMLDocument2 *doc)
6242 {
6243 IPersistStreamInit *init;
6244 HRESULT hres;
6245
6246 hres = IUnknown_QueryInterface(doc, &IID_IPersistStreamInit, (void**)&init);
6247 ok(hres == S_OK, "QueryInterface(IID_IPersistStreamInit) failed: %08x\n", hres);
6248 if(FAILED(hres))
6249 return;
6250
6251 SET_EXPECT(Invoke_AMBIENT_SILENT);
6252 SET_EXPECT(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
6253 SET_EXPECT(Exec_ShellDocView_37);
6254 SET_EXPECT(OnChanged_READYSTATE);
6255 SET_EXPECT(Invoke_OnReadyStateChange_Loading);
6256 SET_EXPECT(Read);
6257 SET_EXPECT(GetPendingUrl);
6258 readystate_set_loading = TRUE;
6259
6260 hres = IPersistStreamInit_Load(init, &Stream);
6261 ok(hres == S_OK, "Load failed: %08x\n", hres);
6262
6263 CHECK_CALLED(Invoke_AMBIENT_SILENT);
6264 CHECK_CALLED(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
6265 CHECK_CALLED(Exec_ShellDocView_37);
6266 CHECK_CALLED(OnChanged_READYSTATE);
6267 CHECK_CALLED(Invoke_OnReadyStateChange_Loading);
6268 CHECK_CALLED(Read);
6269 todo_wine CHECK_CALLED(GetPendingUrl);
6270
6271 test_timer(EXPECT_SETTITLE);
6272 test_GetCurMoniker((IUnknown*)doc, NULL, "about:blank");
6273
6274 IPersistStreamInit_Release(init);
6275 }
6276
6277 static void test_StreamInitNew(IHTMLDocument2 *doc)
6278 {
6279 IPersistStreamInit *init;
6280 HRESULT hres;
6281
6282 hres = IUnknown_QueryInterface(doc, &IID_IPersistStreamInit, (void**)&init);
6283 ok(hres == S_OK, "QueryInterface(IID_IPersistStreamInit) failed: %08x\n", hres);
6284 if(FAILED(hres))
6285 return;
6286
6287 SET_EXPECT(Invoke_AMBIENT_SILENT);
6288 SET_EXPECT(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
6289 SET_EXPECT(Exec_ShellDocView_37);
6290 SET_EXPECT(OnChanged_READYSTATE);
6291 SET_EXPECT(Invoke_OnReadyStateChange_Loading);
6292 SET_EXPECT(GetPendingUrl);
6293 readystate_set_loading = TRUE;
6294
6295 hres = IPersistStreamInit_InitNew(init);
6296 ok(hres == S_OK, "Load failed: %08x\n", hres);
6297
6298 CHECK_CALLED(Invoke_AMBIENT_SILENT);
6299 CHECK_CALLED(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
6300 CHECK_CALLED(Exec_ShellDocView_37);
6301 CHECK_CALLED(OnChanged_READYSTATE);
6302 CHECK_CALLED(Invoke_OnReadyStateChange_Loading);
6303 todo_wine CHECK_CALLED(GetPendingUrl);
6304
6305 test_timer(EXPECT_SETTITLE);
6306 test_GetCurMoniker((IUnknown*)doc, NULL, "about:blank");
6307
6308 IPersistStreamInit_Release(init);
6309 }
6310
6311 static void test_QueryInterface(IHTMLDocument2 *doc)
6312 {
6313 IUnknown *qi;
6314 HRESULT hres;
6315
6316 static const IID IID_UndocumentedScriptIface =
6317 {0x719c3050,0xf9d3,0x11cf,{0xa4,0x93,0x00,0x40,0x05,0x23,0xa8,0xa0}};
6318
6319 qi = (void*)0xdeadbeef;
6320 hres = IUnknown_QueryInterface(doc, &IID_IRunnableObject, (void**)&qi);
6321 ok(hres == E_NOINTERFACE, "QueryInterface returned %08x, expected E_NOINTERFACE\n", hres);
6322 ok(qi == NULL, "qirunnable=%p, expected NULL\n", qi);
6323
6324 qi = (void*)0xdeadbeef;
6325 hres = IUnknown_QueryInterface(doc, &IID_IHTMLDOMNode, (void**)&qi);
6326 ok(hres == E_NOINTERFACE, "QueryInterface returned %08x, expected E_NOINTERFACE\n", hres);
6327 ok(qi == NULL, "qi=%p, expected NULL\n", qi);
6328
6329 qi = (void*)0xdeadbeef;
6330 hres = IUnknown_QueryInterface(doc, &IID_IHTMLDOMNode2, (void**)&qi);
6331 ok(hres == E_NOINTERFACE, "QueryInterface returned %08x, expected E_NOINTERFACE\n", hres);
6332 ok(qi == NULL, "qi=%p, expected NULL\n", qi);
6333
6334 qi = (void*)0xdeadbeef;
6335 hres = IUnknown_QueryInterface(doc, &IID_IPersistPropertyBag, (void**)&qi);
6336 ok(hres == E_NOINTERFACE, "QueryInterface returned %08x, expected E_NOINTERFACE\n", hres);
6337 ok(qi == NULL, "qi=%p, expected NULL\n", qi);
6338
6339 qi = (void*)0xdeadbeef;
6340 hres = IUnknown_QueryInterface(doc, &IID_UndocumentedScriptIface, (void**)&qi);
6341 ok(hres == E_NOINTERFACE, "QueryInterface returned %08x, expected E_NOINTERFACE\n", hres);
6342 ok(qi == NULL, "qi=%p, expected NULL\n", qi);
6343
6344 qi = (void*)0xdeadbeef;
6345 hres = IUnknown_QueryInterface(doc, &IID_IMarshal, (void**)&qi);
6346 ok(hres == E_NOINTERFACE, "QueryInterface returned %08x, expected E_NOINTERFACE\n", hres);
6347 ok(qi == NULL, "qi=%p, expected NULL\n", qi);
6348
6349 qi = (void*)0xdeadbeef;
6350 hres = IUnknown_QueryInterface(doc, &IID_IExternalConnection, (void**)&qi);
6351 ok(hres == E_NOINTERFACE, "QueryInterface returned %08x, expected E_NOINTERFACE\n", hres);
6352 ok(qi == NULL, "qi=%p, expected NULL\n", qi);
6353
6354 qi = (void*)0xdeadbeef;
6355 hres = IUnknown_QueryInterface(doc, &IID_IStdMarshalInfo, (void**)&qi);
6356 ok(hres == E_NOINTERFACE, "QueryInterface returned %08x, expected E_NOINTERFACE\n", hres);
6357 ok(qi == NULL, "qi=%p, expected NULL\n", qi);
6358
6359 qi = (void*)0xdeadbeef;
6360 hres = IUnknown_QueryInterface(doc, &IID_ITargetFrame, (void**)&qi);
6361 ok(hres == E_NOINTERFACE, "QueryInterface returned %08x, expected E_NOINTERFACE\n", hres);
6362 ok(qi == NULL, "qi=%p, expected NULL\n", qi);
6363
6364 hres = IUnknown_QueryInterface(doc, &IID_IDispatch, (void**)&qi);
6365 ok(hres == S_OK, "Could not get IDispatch interface: %08x\n", hres);
6366 ok(qi != (IUnknown*)doc, "disp == doc\n");
6367 IUnknown_Release(qi);
6368 }
6369
6370 static void init_test(enum load_state_t ls) {
6371 doc_unk = NULL;
6372 hwnd = last_hwnd = NULL;
6373 set_clientsite = FALSE;
6374 load_from_stream = FALSE;
6375 call_UIActivate = CallUIActivate_None;
6376 load_state = ls;
6377 editmode = FALSE;
6378 stream_read = 0;
6379 protocol_read = 0;
6380 nav_url = NULL;
6381 ipsex = FALSE;
6382 inplace_deactivated = FALSE;
6383 complete = FALSE;
6384 expect_uihandler_iface = &DocHostUIHandler;
6385 }
6386
6387 static void test_HTMLDocument(BOOL do_load)
6388 {
6389 IHTMLDocument2 *doc;
6390
6391 trace("Testing HTMLDocument (%s)...\n", (do_load ? "load" : "no load"));
6392
6393 init_test(do_load ? LD_DOLOAD : LD_NO);
6394
6395 doc = create_document();
6396 doc_unk = (IUnknown*)doc;
6397
6398 test_QueryInterface(doc);
6399 test_Advise(doc);
6400 test_IsDirty(doc, S_FALSE);
6401 test_MSHTML_QueryStatus(doc, OLECMDF_SUPPORTED);
6402 test_external(doc, FALSE);
6403 test_ViewAdviseSink(doc);
6404 test_ConnectionPointContainer(doc);
6405 test_GetCurMoniker((IUnknown*)doc, NULL, NULL);
6406 test_Persist(doc, &Moniker);
6407 if(!do_load)
6408 test_OnAmbientPropertyChange2(doc);
6409
6410 test_Activate(doc, CLIENTSITE_EXPECTPATH);
6411
6412 if(do_load) {
6413 set_custom_uihandler(doc, &CustomDocHostUIHandler);
6414 test_download(DWL_CSS|DWL_TRYCSS);
6415 test_GetCurMoniker((IUnknown*)doc, &Moniker, NULL);
6416 test_elem_from_point(doc);
6417 }
6418
6419 test_MSHTML_QueryStatus(doc, OLECMDF_SUPPORTED);
6420 test_OleCommandTarget_fail(doc);
6421 test_OleCommandTarget(doc);
6422 test_OnAmbientPropertyChange(doc);
6423 test_Window(doc, TRUE);
6424 test_external(doc, TRUE);
6425 test_target_container(doc);
6426
6427 test_UIDeactivate();
6428 test_OleCommandTarget(doc);
6429 test_Window(doc, TRUE);
6430 test_InPlaceDeactivate(doc, TRUE);
6431
6432 /* Calling test_OleCommandTarget here causes Segmentation Fault with native
6433 * MSHTML. It doesn't with Wine. */
6434
6435 test_Window(doc, FALSE);
6436 test_Hide();
6437 test_InPlaceDeactivate(doc, FALSE);
6438 test_CloseView();
6439 test_Close(doc, FALSE);
6440
6441 /* Activate HTMLDocument again */
6442 test_Activate(doc, CLIENTSITE_SETNULL);
6443 test_Window(doc, TRUE);
6444 test_OleCommandTarget(doc);
6445 test_UIDeactivate();
6446 test_InPlaceDeactivate(doc, TRUE);
6447 test_Close(doc, FALSE);
6448
6449 /* Activate HTMLDocument again, this time without UIActivate */
6450 call_UIActivate = CallUIActivate_None;
6451 test_Activate(doc, CLIENTSITE_SETNULL);
6452 test_Window(doc, TRUE);
6453
6454 test_external(doc, TRUE);
6455 set_custom_uihandler(doc, NULL);
6456 test_external(doc, FALSE);
6457
6458 test_UIDeactivate();
6459 test_InPlaceDeactivate(doc, TRUE);
6460 test_CloseView();
6461 test_CloseView();
6462 test_Close(doc, TRUE);
6463 test_OnAmbientPropertyChange2(doc);
6464 test_GetCurMoniker((IUnknown*)doc, do_load ? &Moniker : NULL, NULL);
6465
6466 if(!do_load) {
6467 /* Activate HTMLDocument again, calling UIActivate after showing the window */
6468 call_UIActivate = CallUIActivate_AfterShow;
6469 test_Activate(doc, 0);
6470 test_Window(doc, TRUE);
6471 test_OleCommandTarget(doc);
6472 test_UIDeactivate();
6473 test_InPlaceDeactivate(doc, TRUE);
6474 test_Close(doc, FALSE);
6475 call_UIActivate = CallUIActivate_None;
6476 }
6477
6478 if(view)
6479 IOleDocumentView_Release(view);
6480 view = NULL;
6481
6482 ok(IsWindow(hwnd), "hwnd is destroyed\n");
6483 release_document(doc);
6484 ok(!IsWindow(hwnd), "hwnd is not destroyed\n");
6485 }
6486
6487 static void test_HTMLDocument_hlink(DWORD status)
6488 {
6489 IHTMLDocument2 *doc;
6490
6491 trace("Testing HTMLDocument (hlink)...\n");
6492
6493 init_test(LD_DOLOAD);
6494 ipsex = TRUE;
6495
6496 doc = create_document();
6497 doc_unk = (IUnknown*)doc;
6498
6499 set_custom_uihandler(doc, &CustomDocHostUIHandler);
6500 test_ViewAdviseSink(doc);
6501 test_ConnectionPointContainer(doc);
6502 test_GetCurMoniker((IUnknown*)doc, NULL, NULL);
6503 test_Persist(doc, &Moniker);
6504 test_Navigate(doc);
6505
6506 status_code = status;
6507 test_download(DWL_CSS|DWL_TRYCSS);
6508 status_code = HTTP_STATUS_OK;
6509
6510 test_IsDirty(doc, S_FALSE);
6511 test_MSHTML_QueryStatus(doc, OLECMDF_SUPPORTED);
6512
6513 test_exec_onunload(doc);
6514 test_Window(doc, TRUE);
6515 test_InPlaceDeactivate(doc, TRUE);
6516 test_Close(doc, FALSE);
6517 test_IsDirty(doc, S_FALSE);
6518 test_GetCurMoniker((IUnknown*)doc, &Moniker, NULL);
6519 test_clear(doc);
6520 test_GetCurMoniker((IUnknown*)doc, &Moniker, NULL);
6521
6522 if(view)
6523 IOleDocumentView_Release(view);
6524 view = NULL;
6525
6526 release_document(doc);
6527 }
6528
6529 static void test_cookies(IHTMLDocument2 *doc)
6530 {
6531 WCHAR buf[1024];
6532 DWORD size;
6533 BSTR str, str2;
6534 BOOL b;
6535 HRESULT hres;
6536
6537 hres = IHTMLDocument2_get_cookie(doc, &str);
6538 ok(hres == S_OK, "get_cookie failed: %08x\n", hres);
6539 if(str) {
6540 size = sizeof(buf)/sizeof(WCHAR);
6541 b = InternetGetCookieW(http_urlW, NULL, buf, &size);
6542 ok(b, "InternetGetCookieW failed: %08x\n", GetLastError());
6543 ok(!lstrcmpW(buf, str), "cookie = %s, expected %s\n", wine_dbgstr_w(str), wine_dbgstr_w(buf));
6544 SysFreeString(str);
6545 }
6546
6547 str = a2bstr("test=testval");
6548 hres = IHTMLDocument2_put_cookie(doc, str);
6549 ok(hres == S_OK, "put_cookie failed: %08x\n", hres);
6550
6551 str2 = NULL;
6552 hres = IHTMLDocument2_get_cookie(doc, &str2);
6553 ok(hres == S_OK, "get_cookie failed: %08x\n", hres);
6554 ok(str2 != NULL, "cookie = NULL\n");
6555 size = sizeof(buf)/sizeof(WCHAR);
6556 b = InternetGetCookieW(http_urlW, NULL, buf, &size);
6557 ok(b, "InternetGetCookieW failed: %08x\n", GetLastError());
6558 ok(!lstrcmpW(buf, str2), "cookie = %s, expected %s\n", wine_dbgstr_w(str2), wine_dbgstr_w(buf));
6559 ok(strstrW(str2, str) != NULL, "could not find %s in %s\n", wine_dbgstr_w(str), wine_dbgstr_w(str2));
6560 SysFreeString(str);
6561 SysFreeString(str2);
6562
6563 str = a2bstr("test=testval2");
6564 hres = IHTMLDocument2_put_cookie(doc, str);
6565 ok(hres == S_OK, "put_cookie failed: %08x\n", hres);
6566
6567 str2 = NULL;
6568 hres = IHTMLDocument2_get_cookie(doc, &str2);
6569 ok(hres == S_OK, "get_cookie failed: %08x\n", hres);
6570 ok(str2 != NULL, "cookie = NULL\n");
6571 size = sizeof(buf)/sizeof(WCHAR);
6572 b = InternetGetCookieW(http_urlW, NULL, buf, &size);
6573 ok(b, "InternetGetCookieW failed: %08x\n", GetLastError());
6574 ok(!lstrcmpW(buf, str2), "cookie = %s, expected %s\n", wine_dbgstr_w(str2), wine_dbgstr_w(buf));
6575 ok(strstrW(str2, str) != NULL, "could not find %s in %s\n", wine_dbgstr_w(str), wine_dbgstr_w(str2));
6576 SysFreeString(str);
6577 SysFreeString(str2);
6578 }
6579
6580 static void test_HTMLDocument_http(BOOL with_wbapp)
6581 {
6582 IMoniker *http_mon;
6583 IHTMLDocument2 *doc;
6584 ULONG ref;
6585 HRESULT hres;
6586
6587 trace("Testing HTMLDocument (http%s)...\n", with_wbapp ? " with IWebBrowserApp" : "");
6588
6589 support_wbapp = with_wbapp;
6590
6591 if(!winetest_interactive && is_ie_hardened()) {
6592 win_skip("IE running in Enhanced Security Configuration\n");
6593 return;
6594 }
6595
6596 init_test(LD_DOLOAD);
6597 ipsex = TRUE;
6598
6599 doc = create_document();
6600 doc_unk = (IUnknown*)doc;
6601
6602 hres = CreateURLMoniker(NULL, http_urlW, &http_mon);
6603 ok(hres == S_OK, "CreateURLMoniker failed: %08x\n", hres);
6604
6605 test_ViewAdviseSink(doc);
6606 test_ConnectionPointContainer(doc);
6607 test_GetCurMoniker((IUnknown*)doc, NULL, NULL);
6608 test_Persist(doc, http_mon);
6609 test_Navigate(doc);
6610 test_download(DWL_HTTP);
6611 test_cookies(doc);
6612 test_IsDirty(doc, S_FALSE);
6613 test_MSHTML_QueryStatus(doc, OLECMDF_SUPPORTED);
6614 test_GetCurMoniker((IUnknown*)doc, http_mon, NULL);
6615
6616 nav_url = nav_serv_url = "http://www.winehq.org/"; /* for valid prev nav_url */
6617 if(support_wbapp)
6618 test_put_href(doc, FALSE, "#test", "http://www.winehq.org/#test", FALSE, TRUE);
6619 test_put_href(doc, FALSE, NULL, "javascript:external&&undefined", TRUE, FALSE);
6620
6621 test_put_href(doc, FALSE, NULL, "about:blank", FALSE, FALSE);
6622 test_put_href(doc, TRUE, NULL, "about:replace", FALSE, FALSE);
6623
6624 test_open_window(doc, TRUE);
6625 if(!support_wbapp) /* FIXME */
6626 test_open_window(doc, FALSE);
6627
6628 test_InPlaceDeactivate(doc, TRUE);
6629 test_Close(doc, FALSE);
6630 test_IsDirty(doc, S_FALSE);
6631 test_GetCurMoniker((IUnknown*)doc, NULL, "about:replace");
6632
6633 if(view)
6634 IOleDocumentView_Release(view);
6635 view = NULL;
6636
6637 release_document(doc);
6638
6639 ref = IMoniker_Release(http_mon);
6640 ok(!ref, "ref=%d, expected 0\n", ref);
6641 }
6642
6643 static void test_QueryService(IHTMLDocument2 *doc, BOOL success)
6644 {
6645 IHTMLWindow2 *window, *sp_window;
6646 IServiceProvider *sp;
6647 IHlinkFrame *hf;
6648 HRESULT hres;
6649
6650 hres = IUnknown_QueryInterface(doc, &IID_IServiceProvider, (void**)&sp);
6651 ok(hres == S_OK, "QueryService returned %08x\n", hres);
6652
6653 hres = IServiceProvider_QueryService(sp, &IID_IHlinkFrame, &IID_IHlinkFrame, (void**)&hf);
6654 if(!success) {
6655 ok(hres == E_NOINTERFACE, "QueryService returned %08x, expected E_NOINTERFACE\n", hres);
6656 IServiceProvider_Release(sp);
6657 return;
6658 }
6659
6660 ok(hres == S_OK, "QueryService(IID_IHlinkFrame) failed: %08x\n", hres);
6661 ok(hf == &HlinkFrame, "hf != HlinkFrame\n");
6662 IHlinkFrame_Release(hf);
6663
6664 IServiceProvider_Release(sp);
6665
6666 hres = IHTMLDocument2_get_parentWindow(doc, &window);
6667 ok(hres == S_OK, "get_parentWindow failed: %08x\n", hres);
6668
6669 hres = IHTMLWindow2_QueryInterface(window, &IID_IServiceProvider, (void**)&sp);
6670 ok(hres == S_OK, "Could not get IServiceProvider iface: %08x\n", hres);
6671
6672 hres = IServiceProvider_QueryService(sp, &IID_IHTMLWindow2, &IID_IHTMLWindow2, (void**)&sp_window);
6673 ok(hres == S_OK, "QueryService(IID_IHTMLWindow2) failed: %08x\n", hres);
6674 /* FIXME: test returned window */
6675 IHTMLWindow2_Release(sp_window);
6676
6677 hres = IServiceProvider_QueryService(sp, &IID_IHlinkFrame, &IID_IHlinkFrame, (void**)&hf);
6678 ok(hres == S_OK, "QueryService(IID_IHlinkFrame) failed: %08x\n", hres);
6679 ok(hf == &HlinkFrame, "hf != HlinkFrame\n");
6680 IHlinkFrame_Release(hf);
6681
6682 IServiceProvider_Release(sp);
6683 IHTMLWindow2_Release(window);
6684 }
6685
6686 static void test_HTMLDocument_StreamLoad(void)
6687 {
6688 IHTMLDocument2 *doc;
6689 IOleObject *oleobj;
6690 DWORD conn;
6691 HRESULT hres;
6692
6693 trace("Testing HTMLDocument (IPersistStreamInit)...\n");
6694
6695 init_test(LD_DOLOAD);
6696 load_from_stream = TRUE;
6697
6698 doc = create_document();
6699 doc_unk = (IUnknown*)doc;
6700
6701 hres = IUnknown_QueryInterface(doc, &IID_IOleObject, (void**)&oleobj);
6702 ok(hres == S_OK, "Could not get IOleObject: %08x\n", hres);
6703
6704 hres = IOleObject_Advise(oleobj, (IAdviseSink*)&AdviseSink, &conn);
6705 ok(hres == S_OK, "Advise failed: %08x\n", hres);
6706
6707 test_readyState((IUnknown*)doc);
6708 test_IsDirty(doc, S_FALSE);
6709 test_ViewAdviseSink(doc);
6710 test_ConnectionPointContainer(doc);
6711 test_QueryService(doc, FALSE);
6712 test_ClientSite(oleobj, CLIENTSITE_EXPECTPATH);
6713 test_QueryService(doc, TRUE);
6714 test_DoVerb(oleobj);
6715 test_MSHTML_QueryStatus(doc, OLECMDF_SUPPORTED);
6716
6717 test_GetCurMoniker((IUnknown*)doc, NULL, NULL);
6718 test_StreamLoad(doc);
6719 test_download(DWL_VERBDONE|DWL_TRYCSS);
6720 test_MSHTML_QueryStatus(doc, OLECMDF_SUPPORTED);
6721
6722 test_UIDeactivate();
6723 test_InPlaceDeactivate(doc, TRUE);
6724 SET_EXPECT(Advise_Close);
6725 test_Close(doc, TRUE);
6726 CHECK_CALLED(Advise_Close);
6727 test_external(doc, FALSE);
6728 test_IsDirty(doc, S_FALSE);
6729
6730 set_custom_uihandler(doc, &CustomDocHostUIHandler);
6731 test_ClientSite(oleobj, CLIENTSITE_SETNULL);
6732 test_external(doc, TRUE);
6733 test_ClientSite(oleobj, CLIENTSITE_SETNULL|CLIENTSITE_DONTSET);
6734 test_external(doc, TRUE);
6735 set_custom_uihandler(doc, NULL);
6736 test_ClientSite(oleobj, CLIENTSITE_SETNULL|CLIENTSITE_DONTSET);
6737
6738 IOleObject_Release(oleobj);
6739 if(view) {
6740 IOleDocumentView_Release(view);
6741 view = NULL;
6742 }
6743
6744 release_document(doc);
6745 }
6746
6747 static void test_HTMLDocument_StreamInitNew(void)
6748 {
6749 IHTMLDocument2 *doc;
6750 IOleObject *oleobj;
6751 DWORD conn;
6752 HRESULT hres;
6753
6754 trace("Testing HTMLDocument (IPersistStreamInit::InitNew)...\n");
6755
6756 init_test(LD_DOLOAD);
6757 load_from_stream = TRUE;
6758
6759 doc = create_document();
6760 doc_unk = (IUnknown*)doc;
6761
6762 hres = IUnknown_QueryInterface(doc, &IID_IOleObject, (void**)&oleobj);
6763 ok(hres == S_OK, "Could not get IOleObject: %08x\n", hres);
6764
6765 hres = IOleObject_Advise(oleobj, (IAdviseSink*)&AdviseSink, &conn);
6766 ok(hres == S_OK, "Advise failed: %08x\n", hres);
6767
6768 test_readyState((IUnknown*)doc);
6769 test_IsDirty(doc, S_FALSE);
6770 test_ViewAdviseSink(doc);
6771 test_ConnectionPointContainer(doc);
6772 test_ClientSite(oleobj, CLIENTSITE_EXPECTPATH);
6773 test_DoVerb(oleobj);
6774 test_MSHTML_QueryStatus(doc, OLECMDF_SUPPORTED);
6775
6776 IOleObject_Release(oleobj);
6777
6778 test_GetCurMoniker((IUnknown*)doc, NULL, NULL);
6779 test_StreamInitNew(doc);
6780
6781 SET_EXPECT(Invoke_OnReadyStateChange_Interactive);
6782 test_download(DWL_VERBDONE|DWL_TRYCSS|DWL_EMPTY);
6783 todo_wine CHECK_NOT_CALLED(Invoke_OnReadyStateChange_Interactive);
6784
6785 test_MSHTML_QueryStatus(doc, OLECMDF_SUPPORTED);
6786
6787 test_UIDeactivate();
6788 test_InPlaceDeactivate(doc, TRUE);
6789 SET_EXPECT(Advise_Close);
6790 test_Close(doc, FALSE);
6791 CHECK_CALLED(Advise_Close);
6792 test_IsDirty(doc, S_FALSE);
6793
6794 if(view) {
6795 IOleDocumentView_Release(view);
6796 view = NULL;
6797 }
6798
6799 release_document(doc);
6800 }
6801
6802 static void test_edit_uiactivate(IOleObject *oleobj)
6803 {
6804 IOleDocumentView *docview;
6805 HRESULT hres;
6806
6807 hres = IOleObject_QueryInterface(oleobj, &IID_IOleDocumentView, (void **)&docview);
6808 ok(hres == S_OK, "IOleObject_QueryInterface failed with error 0x%08x\n", hres);
6809
6810 SET_EXPECT(OnFocus_TRUE);
6811 SET_EXPECT(SetActiveObject);
6812 SET_EXPECT(ShowUI);
6813 SET_EXPECT(InPlaceUIWindow_SetActiveObject);
6814 SET_EXPECT(InPlaceFrame_SetBorderSpace);
6815 expect_status_text = NULL;
6816
6817 hres = IOleDocumentView_UIActivate(docview, TRUE);
6818 ok(hres == S_OK, "IOleDocumentView_UIActivate failed with error 0x%08x\n", hres);
6819
6820 CHECK_CALLED(OnFocus_TRUE);
6821 CHECK_CALLED(SetActiveObject);
6822 CHECK_CALLED(ShowUI);
6823 CHECK_CALLED(InPlaceUIWindow_SetActiveObject);
6824 CHECK_CALLED(InPlaceFrame_SetBorderSpace);
6825
6826 IOleDocumentView_Release(docview);
6827 }
6828
6829 static void test_editing_mode(BOOL do_load)
6830 {
6831 IHTMLDocument2 *doc;
6832 IUnknown *unk;
6833 IOleObject *oleobj;
6834 DWORD conn;
6835 HRESULT hres;
6836
6837 trace("Testing HTMLDocument (edit%s)...\n", do_load ? " load" : "");
6838
6839 init_test(do_load ? LD_DOLOAD : LD_NO);
6840 call_UIActivate = CallUIActivate_AfterShow;
6841
6842 doc = create_document();
6843 unk = doc_unk = (IUnknown*)doc;
6844
6845 hres = IUnknown_QueryInterface(doc, &IID_IOleObject, (void**)&oleobj);
6846 ok(hres == S_OK, "Could not get IOleObject: %08x\n", hres);
6847
6848 hres = IOleObject_Advise(oleobj, (IAdviseSink*)&AdviseSink, &conn);
6849 ok(hres == S_OK, "Advise failed: %08x\n", hres);
6850
6851 test_readyState((IUnknown*)doc);
6852 test_ViewAdviseSink(doc);
6853 test_ConnectionPointContainer(doc);
6854 test_ClientSite(oleobj, CLIENTSITE_EXPECTPATH);
6855 test_DoVerb(oleobj);
6856 test_edit_uiactivate(oleobj);
6857
6858 test_MSHTML_QueryStatus(doc, OLECMDF_SUPPORTED);
6859 if(do_load)
6860 test_Persist(doc, &Moniker);
6861 stream_read = protocol_read = 0;
6862 test_exec_editmode(unk, do_load);
6863 test_UIDeactivate();
6864 call_UIActivate = CallUIActivate_None;
6865 IOleObject_Release(oleobj);
6866
6867 test_MSHTML_QueryStatus(doc, OLECMDF_SUPPORTED);
6868 test_download(DWL_VERBDONE | (do_load ? DWL_CSS|DWL_TRYCSS : 0));
6869
6870 SET_EXPECT(SetStatusText); /* ignore race in native mshtml */
6871 test_timer(EXPECT_UPDATEUI);
6872 CLEAR_CALLED(SetStatusText);
6873
6874 test_MSHTML_QueryStatus(doc, OLECMDF_SUPPORTED|OLECMDF_ENABLED);
6875
6876 if(!do_load) {
6877 test_exec_fontname(unk, NULL, wszTimesNewRoman);
6878 test_exec_fontname(unk, wszArial, wszTimesNewRoman);
6879 test_timer(EXPECT_UPDATEUI);
6880 test_exec_fontname(unk, NULL, wszArial);
6881
6882 test_exec_noargs(unk, IDM_JUSTIFYRIGHT);
6883 test_timer(EXPECT_UPDATEUI);
6884 test_QueryStatus(unk, &CGID_MSHTML, IDM_JUSTIFYRIGHT,
6885 OLECMDF_SUPPORTED|OLECMDF_ENABLED|OLECMDF_LATCHED);
6886
6887 test_exec_noargs(unk, IDM_JUSTIFYCENTER);
6888 test_timer(EXPECT_UPDATEUI);
6889 test_QueryStatus(unk, &CGID_MSHTML, IDM_JUSTIFYRIGHT,
6890 OLECMDF_SUPPORTED|OLECMDF_ENABLED);
6891 test_QueryStatus(unk, &CGID_MSHTML, IDM_JUSTIFYCENTER,
6892 OLECMDF_SUPPORTED|OLECMDF_ENABLED|OLECMDF_LATCHED);
6893
6894 test_exec_noargs(unk, IDM_HORIZONTALLINE);
6895 test_timer(EXPECT_UPDATEUI);
6896 test_QueryStatus(unk, &CGID_MSHTML, IDM_HORIZONTALLINE,
6897 OLECMDF_SUPPORTED|OLECMDF_ENABLED);
6898 }
6899
6900 test_UIDeactivate();
6901 test_InPlaceDeactivate(doc, TRUE);
6902 SET_EXPECT(Advise_Close);
6903 test_Close(doc, FALSE);
6904 CHECK_CALLED(Advise_Close);
6905
6906 if(view) {
6907 IOleDocumentView_Release(view);
6908 view = NULL;
6909 }
6910
6911 release_document(doc);
6912 }
6913
6914 static void test_UIActivate(BOOL do_load, BOOL use_ipsex, BOOL use_ipsw)
6915 {
6916 IHTMLDocument2 *doc;
6917 IOleObject *oleobj;
6918 IOleInPlaceSite *inplacesite;
6919 HRESULT hres;
6920
6921 trace("Running OleDocumentView_UIActivate tests (%d %d %d)\n", do_load, use_ipsex, use_ipsw);
6922
6923 init_test(do_load ? LD_DOLOAD : LD_NO);
6924
6925 doc = create_document();
6926 doc_unk = (IUnknown*)doc;
6927
6928 ipsex = use_ipsex;
6929 ipsw = use_ipsw;
6930
6931 hres = IUnknown_QueryInterface(doc, &IID_IOleObject, (void**)&oleobj);
6932 ok(hres == S_OK, "QueryInterface(IID_IOleObject) failed: %08x\n", hres);
6933
6934 hres = IUnknown_QueryInterface(doc, &IID_IOleDocumentView, (void**)&view);
6935 ok(hres == S_OK, "QueryInterface(IID_IOleDocumentView) failed: %08x\n", hres);
6936
6937 SET_EXPECT(Invoke_AMBIENT_USERMODE);
6938 SET_EXPECT(GetHostInfo);
6939 SET_EXPECT(Invoke_AMBIENT_DLCONTROL);
6940 SET_EXPECT(Invoke_AMBIENT_SILENT);
6941 SET_EXPECT(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
6942 SET_EXPECT(Invoke_AMBIENT_USERAGENT);
6943 SET_EXPECT(Invoke_AMBIENT_PALETTE);
6944 SET_EXPECT(GetOptionKeyPath);
6945 SET_EXPECT(GetOverrideKeyPath);
6946 SET_EXPECT(GetWindow);
6947 SET_EXPECT(Exec_DOCCANNAVIGATE);
6948 SET_EXPECT(QueryStatus_SETPROGRESSTEXT);
6949 SET_EXPECT(Exec_SETPROGRESSMAX);
6950 SET_EXPECT(Exec_SETPROGRESSPOS);
6951 SET_EXPECT(GetTravelLog);
6952
6953 hres = IOleObject_SetClientSite(oleobj, &ClientSite);
6954 ok(hres == S_OK, "SetClientSite failed: %08x\n", hres);
6955 set_clientsite = TRUE;
6956
6957 CHECK_CALLED(Invoke_AMBIENT_USERMODE);
6958 CHECK_CALLED(GetHostInfo);
6959 CHECK_CALLED(Invoke_AMBIENT_DLCONTROL);
6960 CHECK_CALLED(Invoke_AMBIENT_SILENT);
6961 CHECK_CALLED(Invoke_AMBIENT_OFFLINEIFNOTCONNECTED);
6962 CHECK_CALLED(Invoke_AMBIENT_USERAGENT);
6963 CLEAR_CALLED(Invoke_AMBIENT_PALETTE); /* not called on IE9 */
6964 CLEAR_CALLED(GetOptionKeyPath); /* not called on some IE9 */
6965 CHECK_CALLED(GetOverrideKeyPath);
6966 CHECK_CALLED(GetWindow);
6967 CHECK_CALLED(Exec_DOCCANNAVIGATE);
6968 CHECK_CALLED(QueryStatus_SETPROGRESSTEXT);
6969 CHECK_CALLED(Exec_SETPROGRESSMAX);
6970 CHECK_CALLED(Exec_SETPROGRESSPOS);
6971 todo_wine CHECK_CALLED(GetTravelLog);
6972
6973 hres = IOleDocumentView_GetInPlaceSite(view, &inplacesite);
6974 ok(hres == S_OK, "GetInPlaceSite failed: %08x\n", hres);
6975 ok(inplacesite == NULL, "inplacesite = %p, expected NULL\n", inplacesite);
6976
6977 SET_EXPECT(GetContainer);
6978 SET_EXPECT(LockContainer);
6979 SET_EXPECT(CanInPlaceActivate);
6980 SET_EXPECT(GetWindowContext);
6981 SET_EXPECT(GetWindow);
6982 if(use_ipsex) {
6983 SET_EXPECT(OnInPlaceActivateEx);
6984 SET_EXPECT(RequestUIActivate);
6985 }
6986 else
6987 SET_EXPECT(OnInPlaceActivate);
6988 SET_EXPECT(OnUIActivate);
6989 SET_EXPECT(SetStatusText);
6990 SET_EXPECT(Exec_SETPROGRESSMAX);
6991 SET_EXPECT(Exec_SETPROGRESSPOS);
6992 SET_EXPECT(ShowUI);
6993 SET_EXPECT(InPlaceUIWindow_SetActiveObject);
6994 SET_EXPECT(InPlaceFrame_SetBorderSpace);
6995 SET_EXPECT(OnFocus_TRUE);
6996 SET_EXPECT(SetActiveObject);
6997 expect_LockContainer_fLock = TRUE;
6998
6999 hres = IOleDocumentView_UIActivate(view, TRUE);
7000 ok(hres == S_OK, "UIActivate failed: %08x\n", hres);
7001
7002 CHECK_CALLED(GetContainer);
7003 CHECK_CALLED(LockContainer);
7004 CHECK_CALLED(CanInPlaceActivate);
7005 CHECK_CALLED(GetWindowContext);
7006 CHECK_CALLED(GetWindow);
7007 if(use_ipsex) {
7008 CHECK_CALLED(OnInPlaceActivateEx);
7009 SET_EXPECT(RequestUIActivate);
7010 }
7011 else
7012 CHECK_CALLED(OnInPlaceActivate);
7013 CHECK_CALLED(OnUIActivate);
7014 CHECK_CALLED(SetStatusText);
7015 CHECK_CALLED(Exec_SETPROGRESSMAX);
7016 CHECK_CALLED(Exec_SETPROGRESSPOS);
7017 CHECK_CALLED(ShowUI);
7018 CHECK_CALLED(InPlaceUIWindow_SetActiveObject);
7019 CHECK_CALLED(InPlaceFrame_SetBorderSpace);
7020 CHECK_CALLED(OnFocus_TRUE);
7021 CHECK_CALLED(SetActiveObject);
7022 container_locked = TRUE;
7023
7024 SET_EXPECT(SetActiveObject_null);
7025 SET_EXPECT(InPlaceUIWindow_SetActiveObject);
7026 SET_EXPECT(HideUI);
7027 SET_EXPECT(OnUIDeactivate);
7028
7029 hres = IOleDocumentView_UIActivate(view, FALSE);
7030 ok(hres == S_OK, "UIActivate failed: %08x\n", hres);
7031
7032 CHECK_CALLED(SetActiveObject_null);
7033 CHECK_CALLED(InPlaceUIWindow_SetActiveObject);
7034 CHECK_CALLED(HideUI);
7035 CHECK_CALLED(OnUIDeactivate);
7036
7037 hres = IOleDocumentView_GetInPlaceSite(view, &inplacesite);
7038 ok(hres == S_OK, "GetInPlaceSite failed: %08x\n", hres);
7039 ok(inplacesite != NULL, "inplacesite = NULL\n");
7040 IOleInPlaceSite_Release(inplacesite);
7041
7042 SET_EXPECT(SetStatusText);
7043 SET_EXPECT(OnFocus_FALSE);
7044 if(use_ipsex)
7045 SET_EXPECT(OnInPlaceDeactivateEx);
7046 else
7047 SET_EXPECT(OnInPlaceDeactivate);
7048
7049 test_CloseView();
7050
7051 CLEAR_CALLED(SetStatusText); /* Called by IE9 */
7052 CHECK_CALLED(OnFocus_FALSE);
7053 if(use_ipsex)
7054 CHECK_CALLED(OnInPlaceDeactivateEx);
7055 else
7056 CHECK_CALLED(OnInPlaceDeactivate);
7057
7058 test_Close(doc, TRUE);
7059
7060 IOleObject_Release(oleobj);
7061 IOleDocumentView_Release(view);
7062 view = NULL;
7063
7064 release_document(doc);
7065 }
7066
7067 static void register_protocol(void)
7068 {
7069 IInternetSession *session;
7070 HRESULT hres;
7071
7072 static const WCHAR wsz_winetest[] = {'w','i','n','e','t','e','s','t',0};
7073
7074 hres = CoInternetGetSession(0, &session, 0);
7075 ok(hres == S_OK, "CoInternetGetSession failed: %08x\n", hres);
7076
7077 hres = IInternetSession_RegisterNameSpace(session, &ClassFactory, &IID_NULL,
7078 wsz_winetest, 0, NULL, 0);
7079 ok(hres == S_OK, "RegisterNameSpace failed: %08x\n", hres);
7080
7081 IInternetSession_Release(session);
7082 }
7083
7084 static void test_HTMLDoc_ISupportErrorInfo(void)
7085 {
7086 IHTMLDocument2 *doc;
7087 HRESULT hres;
7088 ISupportErrorInfo *sinfo;
7089
7090 doc = create_document();
7091
7092 hres = IUnknown_QueryInterface(doc, &IID_ISupportErrorInfo, (void**)&sinfo);
7093 ok(hres == S_OK, "got %x\n", hres);
7094 ok(sinfo != NULL, "got %p\n", sinfo);
7095 if(sinfo)
7096 {
7097 hres = ISupportErrorInfo_InterfaceSupportsErrorInfo(sinfo, &IID_IErrorInfo);
7098 ok(hres == S_FALSE, "Expected S_OK, got %x\n", hres);
7099 IUnknown_Release(sinfo);
7100 }
7101
7102 release_document(doc);
7103 }
7104
7105 static void test_IPersistHistory(void)
7106 {
7107 IHTMLDocument2 *doc;
7108 HRESULT hres;
7109 IPersistHistory *phist;
7110
7111 doc = create_document();
7112
7113 hres = IUnknown_QueryInterface(doc, &IID_IPersistHistory, (void**)&phist);
7114 ok(hres == S_OK, "QueryInterface returned %08x, expected S_OK\n", hres);
7115 if(hres == S_OK)
7116 IPersistHistory_Release(phist);
7117
7118 release_document(doc);
7119 }
7120
7121 static BOOL check_ie(void)
7122 {
7123 IHTMLDocument2 *doc;
7124 IHTMLDocument5 *doc5;
7125 HRESULT hres;
7126
7127 doc = create_document();
7128 if(!doc)
7129 return FALSE;
7130
7131 hres = IHTMLDocument2_QueryInterface(doc, &IID_IHTMLDocument5, (void**)&doc5);
7132 if(SUCCEEDED(hres))
7133 IHTMLDocument5_Release(doc5);
7134
7135 release_document(doc);
7136 return SUCCEEDED(hres);
7137 }
7138
7139 static void test_ServiceProvider(void)
7140 {
7141 IHTMLDocument3 *doc3, *doc3_2;
7142 IServiceProvider *provider;
7143 IHTMLDocument2 *doc, *doc2;
7144 IUnknown *unk;
7145 HRESULT hres;
7146
7147 doc = create_document();
7148 if(!doc)
7149 return;
7150
7151 hres = IHTMLDocument2_QueryInterface(doc, &IID_IServiceProvider, (void**)&provider);
7152 ok(hres == S_OK, "got 0x%08x\n", hres);
7153
7154 hres = IServiceProvider_QueryService(provider, &SID_SContainerDispatch, &IID_IHTMLDocument2, (void**)&doc2);
7155 ok(hres == S_OK, "got 0x%08x\n", hres);
7156 ok(iface_cmp((IUnknown*)doc2, (IUnknown*)doc), "got wrong pointer\n");
7157 IHTMLDocument2_Release(doc2);
7158
7159 hres = IServiceProvider_QueryService(provider, &SID_SContainerDispatch, &IID_IHTMLDocument3, (void**)&doc3);
7160 ok(hres == S_OK, "got 0x%08x\n", hres);
7161 ok(iface_cmp((IUnknown*)doc3, (IUnknown*)doc), "got wrong pointer\n");
7162
7163 hres = IHTMLDocument2_QueryInterface(doc, &IID_IHTMLDocument3, (void**)&doc3_2);
7164 ok(hres == S_OK, "got 0x%08x\n", hres);
7165 ok(iface_cmp((IUnknown*)doc3_2, (IUnknown*)doc), "got wrong pointer\n");
7166 ok(iface_cmp((IUnknown*)doc3_2, (IUnknown*)doc3), "got wrong pointer\n");
7167 IHTMLDocument3_Release(doc3);
7168 IHTMLDocument3_Release(doc3_2);
7169
7170 hres = IServiceProvider_QueryService(provider, &SID_SContainerDispatch, &IID_IUnknown, (void**)&unk);
7171 ok(hres == S_OK, "got 0x%08x\n", hres);
7172 ok(iface_cmp((IUnknown*)doc, unk), "got wrong pointer\n");
7173
7174 IUnknown_Release(unk);
7175 IServiceProvider_Release(provider);
7176 release_document(doc);
7177 }
7178
7179 START_TEST(htmldoc)
7180 {
7181 CoInitialize(NULL);
7182
7183 if(!check_ie()) {
7184 CoUninitialize();
7185 win_skip("Too old IE\n");
7186 return;
7187 }
7188
7189 container_hwnd = create_container_window();
7190 register_protocol();
7191
7192 asynchronous_binding = TRUE;
7193 test_HTMLDocument_hlink(HTTP_STATUS_NOT_FOUND);
7194
7195 asynchronous_binding = FALSE;
7196 test_HTMLDocument_hlink(HTTP_STATUS_OK);
7197 test_HTMLDocument(FALSE);
7198 test_HTMLDocument(TRUE);
7199 test_HTMLDocument_StreamLoad();
7200 test_HTMLDocument_StreamInitNew();
7201 test_editing_mode(FALSE);
7202 test_editing_mode(TRUE);
7203 test_HTMLDocument_http(FALSE);
7204 test_HTMLDocument_http(TRUE);
7205 test_UIActivate(FALSE, FALSE, FALSE);
7206 test_UIActivate(FALSE, TRUE, FALSE);
7207 test_UIActivate(FALSE, TRUE, TRUE);
7208 test_UIActivate(TRUE, FALSE, FALSE);
7209 test_UIActivate(TRUE, TRUE, FALSE);
7210 test_UIActivate(TRUE, TRUE, TRUE);
7211 test_HTMLDoc_ISupportErrorInfo();
7212 test_IPersistHistory();
7213 test_ServiceProvider();
7214
7215 DestroyWindow(container_hwnd);
7216 CoUninitialize();
7217 }
Maarten's multimedia branch