4 * Copyright 2004 Kevin Koltzau
5 * Copyright 2004-2007 Jacek Caban for CodeWeavers
7 * This library is free software; you can redistribute it and/or
8 * modify it under the terms of the GNU Lesser General Public
9 * License as published by the Free Software Foundation; either
10 * version 2.1 of the License, or (at your option) any later version.
12 * This library is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 * Lesser General Public License for more details.
17 * You should have received a copy of the GNU Lesser General Public
18 * License along with this library; if not, write to the Free Software
19 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
26 #define NONAMELESSUNION
36 #include "wine/test.h"
38 static HRESULT (WINAPI
*pCreateAsyncBindCtxEx
)(IBindCtx
*, DWORD
,
39 IBindStatusCallback
*, IEnumFORMATETC
*, IBindCtx
**, DWORD
);
42 DEFINE_GUID(GUID_NULL
,0,0,0,0,0,0,0,0,0,0,0);
43 DEFINE_GUID(CLSID_IdentityUnmarshal
,0x0000001b,0x0000,0x0000,0xc0,0x00,0x00,0x00,0x00,0x00,0x00,0x46);
44 DEFINE_GUID(IID_IBindStatusCallbackHolder
,0x79eac9cc,0xbaf9,0x11ce,0x8c,0x82,0x00,0xaa,0x00,0x4b,0xa9,0x0b);
46 #define DEFINE_EXPECT(func) \
47 static BOOL expect_ ## func = FALSE, called_ ## func = FALSE
49 #define SET_EXPECT(func) \
50 do { called_ ## func = FALSE; expect_ ## func = TRUE; } while(0)
52 #define CHECK_EXPECT2(func) \
54 ok(expect_ ##func, "unexpected call " #func "\n"); \
55 called_ ## func = TRUE; \
58 #define CHECK_EXPECT(func) \
60 CHECK_EXPECT2(func); \
61 expect_ ## func = FALSE; \
64 #define CHECK_CALLED(func) \
66 ok(called_ ## func, "expected " #func "\n"); \
67 expect_ ## func = called_ ## func = FALSE; \
70 #define CHECK_NOT_CALLED(func) \
72 ok(!called_ ## func, "unexpected " #func "\n"); \
73 expect_ ## func = called_ ## func = FALSE; \
76 #define CHECK_CALLED_BROKEN(func) \
78 ok(called_ ## func || broken(!called_ ## func), "expected " #func "\n"); \
79 expect_ ## func = called_ ## func = FALSE; \
82 #define CLEAR_CALLED(func) \
83 expect_ ## func = called_ ## func = FALSE
85 DEFINE_EXPECT(QueryInterface_IServiceProvider
);
86 DEFINE_EXPECT(QueryInterface_IHttpNegotiate
);
87 DEFINE_EXPECT(QueryInterface_IBindStatusCallback
);
88 DEFINE_EXPECT(QueryInterface_IBindStatusCallbackEx
);
89 DEFINE_EXPECT(QueryInterface_IBindStatusCallbackHolder
);
90 DEFINE_EXPECT(QueryInterface_IInternetBindInfo
);
91 DEFINE_EXPECT(QueryInterface_IAuthenticate
);
92 DEFINE_EXPECT(QueryInterface_IInternetProtocol
);
93 DEFINE_EXPECT(QueryInterface_IWindowForBindingUI
);
94 DEFINE_EXPECT(QueryService_IAuthenticate
);
95 DEFINE_EXPECT(QueryService_IInternetProtocol
);
96 DEFINE_EXPECT(QueryService_IInternetBindInfo
);
97 DEFINE_EXPECT(QueryService_IWindowForBindingUI
);
98 DEFINE_EXPECT(BeginningTransaction
);
99 DEFINE_EXPECT(OnResponse
);
100 DEFINE_EXPECT(QueryInterface_IHttpNegotiate2
);
101 DEFINE_EXPECT(GetRootSecurityId
);
102 DEFINE_EXPECT(GetBindInfo
);
103 DEFINE_EXPECT(GetBindInfoEx
);
104 DEFINE_EXPECT(OnStartBinding
);
105 DEFINE_EXPECT(OnProgress_FINDINGRESOURCE
);
106 DEFINE_EXPECT(OnProgress_CONNECTING
);
107 DEFINE_EXPECT(OnProgress_REDIRECTING
);
108 DEFINE_EXPECT(OnProgress_SENDINGREQUEST
);
109 DEFINE_EXPECT(OnProgress_MIMETYPEAVAILABLE
);
110 DEFINE_EXPECT(OnProgress_BEGINDOWNLOADDATA
);
111 DEFINE_EXPECT(OnProgress_DOWNLOADINGDATA
);
112 DEFINE_EXPECT(OnProgress_ENDDOWNLOADDATA
);
113 DEFINE_EXPECT(OnProgress_CACHEFILENAMEAVAILABLE
);
114 DEFINE_EXPECT(OnStopBinding
);
115 DEFINE_EXPECT(OnDataAvailable
);
116 DEFINE_EXPECT(OnObjectAvailable
);
117 DEFINE_EXPECT(Obj_OnStartBinding
);
118 DEFINE_EXPECT(Obj_OnStopBinding
);
119 DEFINE_EXPECT(Obj_GetBindInfo
);
120 DEFINE_EXPECT(Obj_OnProgress_BEGINDOWNLOADDATA
);
121 DEFINE_EXPECT(Obj_OnProgress_ENDDOWNLOADDATA
);
122 DEFINE_EXPECT(Obj_OnProgress_SENDINGREQUEST
);
123 DEFINE_EXPECT(Obj_OnProgress_MIMETYPEAVAILABLE
);
124 DEFINE_EXPECT(Obj_OnProgress_CLASSIDAVAILABLE
);
125 DEFINE_EXPECT(Obj_OnProgress_BEGINSYNCOPERATION
);
126 DEFINE_EXPECT(Obj_OnProgress_ENDSYNCOPERATION
);
127 DEFINE_EXPECT(Obj_OnProgress_FINDINGRESOURCE
);
128 DEFINE_EXPECT(Obj_OnProgress_CONNECTING
);
129 DEFINE_EXPECT(Obj_OnProgress_REDIRECTING
);
130 DEFINE_EXPECT(Obj_OnProgress_CACHEFILENAMEAVAILABLE
);
131 DEFINE_EXPECT(Start
);
133 DEFINE_EXPECT(LockRequest
);
134 DEFINE_EXPECT(Terminate
);
135 DEFINE_EXPECT(UnlockRequest
);
136 DEFINE_EXPECT(Continue
);
137 DEFINE_EXPECT(CreateInstance
);
139 DEFINE_EXPECT(PutProperty_MIMETYPEPROP
);
140 DEFINE_EXPECT(PutProperty_CLASSIDPROP
);
141 DEFINE_EXPECT(SetPriority
);
143 static const WCHAR TEST_URL_1
[] = {'h','t','t','p',':','/','/','w','w','w','.','w','i','n','e','h','q','.','o','r','g','/','\0'};
144 static const WCHAR TEST_PART_URL_1
[] = {'/','t','e','s','t','/','\0'};
146 static const WCHAR WINE_ABOUT_URL
[] = {'h','t','t','p',':','/','/','w','w','w','.','w','i','n','e','h','q','.',
147 'o','r','g','/','s','i','t','e','/','a','b','o','u','t',0};
148 static const WCHAR SHORT_RESPONSE_URL
[] =
149 {'h','t','t','p',':','/','/','c','r','o','s','s','o','v','e','r','.',
150 'c','o','d','e','w','e','a','v','e','r','s','.','c','o','m','/',
151 'p','o','s','t','t','e','s','t','.','p','h','p',0};
152 static const WCHAR ABOUT_BLANK
[] = {'a','b','o','u','t',':','b','l','a','n','k',0};
153 static WCHAR INDEX_HTML
[MAX_PATH
];
154 static const WCHAR ITS_URL
[] =
155 {'i','t','s',':','t','e','s','t','.','c','h','m',':',':','/','b','l','a','n','k','.','h','t','m','l',0};
156 static const WCHAR MK_URL
[] = {'m','k',':','@','M','S','I','T','S','t','o','r','e',':',
157 't','e','s','t','.','c','h','m',':',':','/','b','l','a','n','k','.','h','t','m','l',0};
158 static const WCHAR https_urlW
[] =
159 {'h','t','t','p','s',':','/','/','w','w','w','.','c','o','d','e','w','e','a','v','e','r','s','.','c','o','m',
160 '/','t','e','s','t','.','h','t','m','l',0};
161 static const WCHAR ftp_urlW
[] = {'f','t','p',':','/','/','f','t','p','.','w','i','n','e','h','q','.','o','r','g',
162 '/','p','u','b','/','o','t','h','e','r','/',
163 'w','i','n','e','l','o','g','o','.','x','c','f','.','t','a','r','.','b','z','2',0};
166 static const WCHAR wszTextHtml
[] = {'t','e','x','t','/','h','t','m','l',0};
168 static WCHAR BSCBHolder
[] = { '_','B','S','C','B','_','H','o','l','d','e','r','_',0 };
170 static const WCHAR wszWineHQSite
[] =
171 {'w','w','w','.','w','i','n','e','h','q','.','o','r','g',0};
172 static const WCHAR wszWineHQIP
[] =
173 {'2','0','9','.','3','2','.','1','4','1','.','3',0};
174 static const CHAR wszIndexHtmlA
[] = "index.html";
175 static const WCHAR wszIndexHtml
[] = {'i','n','d','e','x','.','h','t','m','l',0};
176 static const WCHAR cache_fileW
[] = {'c',':','\\','c','a','c','h','e','.','h','t','m',0};
177 static const CHAR dwl_htmlA
[] = "dwl.html";
178 static const WCHAR dwl_htmlW
[] = {'d','w','l','.','h','t','m','l',0};
179 static const WCHAR test_txtW
[] = {'t','e','s','t','.','t','x','t',0};
180 static const WCHAR emptyW
[] = {0};
182 static BOOL stopped_binding
= FALSE
, stopped_obj_binding
= FALSE
, emulate_protocol
= FALSE
,
183 data_available
= FALSE
, http_is_first
= TRUE
, bind_to_object
= FALSE
, filedwl_api
;
184 static DWORD read
= 0, bindf
= 0, prot_state
= 0, thread_id
, tymed
;
185 static CHAR mime_type
[512];
186 static IInternetProtocolSink
*protocol_sink
= NULL
;
187 static IBinding
*current_binding
;
188 static HANDLE complete_event
, complete_event2
;
189 static HRESULT binding_hres
;
190 static BOOL have_IHttpNegotiate2
, use_bscex
;
191 static BOOL test_redirect
, use_cache_file
, callback_read
;
192 static WCHAR cache_file_name
[MAX_PATH
];
194 static LPCWSTR urls
[] = {
204 static WCHAR file_url
[INTERNET_MAX_URL_LENGTH
];
222 static const char *debugstr_guid(REFIID riid
)
226 sprintf(buf
, "{%08X-%04X-%04X-%02X%02X-%02X%02X%02X%02X%02X%02X}",
227 riid
->Data1
, riid
->Data2
, riid
->Data3
, riid
->Data4
[0],
228 riid
->Data4
[1], riid
->Data4
[2], riid
->Data4
[3], riid
->Data4
[4],
229 riid
->Data4
[5], riid
->Data4
[6], riid
->Data4
[7]);
234 static BOOL
is_urlmon_protocol(int prot
)
236 return prot
== FILE_TEST
|| prot
== HTTP_TEST
|| prot
== HTTPS_TEST
|| prot
== FTP_TEST
|| prot
== MK_TEST
;
239 static void test_CreateURLMoniker(LPCWSTR url1
, LPCWSTR url2
)
242 IMoniker
*mon1
= NULL
;
243 IMoniker
*mon2
= NULL
;
245 hr
= CreateURLMoniker(NULL
, url1
, &mon1
);
246 ok(SUCCEEDED(hr
), "failed to create moniker: 0x%08x\n", hr
);
248 hr
= CreateURLMoniker(mon1
, url2
, &mon2
);
249 ok(SUCCEEDED(hr
), "failed to create moniker: 0x%08x\n", hr
);
251 if(mon1
) IMoniker_Release(mon1
);
252 if(mon2
) IMoniker_Release(mon2
);
255 static void test_create(void)
257 test_CreateURLMoniker(TEST_URL_1
, TEST_PART_URL_1
);
260 static HRESULT WINAPI
Priority_QueryInterface(IInternetPriority
*iface
, REFIID riid
, void **ppv
)
262 ok(0, "unexpected call\n");
263 return E_NOINTERFACE
;
266 static ULONG WINAPI
Priority_AddRef(IInternetPriority
*iface
)
271 static ULONG WINAPI
Priority_Release(IInternetPriority
*iface
)
276 static HRESULT WINAPI
Priority_SetPriority(IInternetPriority
*iface
, LONG nPriority
)
278 CHECK_EXPECT(SetPriority
);
279 ok(!nPriority
, "nPriority = %d\n", nPriority
);
283 static HRESULT WINAPI
Priority_GetPriority(IInternetPriority
*iface
, LONG
*pnPriority
)
285 ok(0, "unexpected call\n");
289 static const IInternetPriorityVtbl InternetPriorityVtbl
= {
290 Priority_QueryInterface
,
293 Priority_SetPriority
,
297 static IInternetPriority InternetPriority
= { &InternetPriorityVtbl
};
299 static HRESULT WINAPI
Protocol_QueryInterface(IInternetProtocol
*iface
, REFIID riid
, void **ppv
)
303 if(IsEqualGUID(&IID_IUnknown
, riid
) || IsEqualGUID(&IID_IInternetProtocol
, riid
)) {
308 if(IsEqualGUID(&IID_IInternetPriority
, riid
)) {
309 if(!is_urlmon_protocol(test_protocol
))
310 return E_NOINTERFACE
;
312 *ppv
= &InternetPriority
;
316 if(IsEqualGUID(&IID_IInternetProtocolEx
, riid
))
317 return E_NOINTERFACE
; /* TODO */
319 ok(0, "unexpected call %s\n", debugstr_guid(riid
));
320 return E_NOINTERFACE
;
323 static ULONG WINAPI
Protocol_AddRef(IInternetProtocol
*iface
)
328 static ULONG WINAPI
Protocol_Release(IInternetProtocol
*iface
)
333 static void test_switch_fail(void)
335 IInternetProtocolSink
*binding_sink
;
336 PROTOCOLDATA protocoldata
;
339 static BOOL tested_switch_fail
;
341 if(tested_switch_fail
)
344 tested_switch_fail
= TRUE
;
346 hres
= IBinding_QueryInterface(current_binding
, &IID_IInternetProtocolSink
, (void**)&binding_sink
);
347 ok(hres
== S_OK
, "Could not get IInternetProtocolSink iface: %08x\n", hres
);
348 if(SUCCEEDED(hres
)) {
349 hres
= IInternetProtocolSink_Switch(binding_sink
, &protocoldata
);
350 ok(hres
== E_FAIL
, "Switch failed: %08x, expected E_FAIL\n", hres
);
351 IInternetProtocolSink_Release(binding_sink
);
355 static DWORD WINAPI
thread_proc(PVOID arg
)
357 PROTOCOLDATA protocoldata
;
361 SET_EXPECT(Obj_OnProgress_FINDINGRESOURCE
);
363 SET_EXPECT(OnProgress_FINDINGRESOURCE
);
364 hres
= IInternetProtocolSink_ReportProgress(protocol_sink
,
365 BINDSTATUS_FINDINGRESOURCE
, wszWineHQSite
);
366 ok(hres
== S_OK
, "ReportProgress failed: %08x\n", hres
);
367 WaitForSingleObject(complete_event
, INFINITE
);
369 CHECK_CALLED(Obj_OnProgress_FINDINGRESOURCE
);
371 CHECK_CALLED(OnProgress_FINDINGRESOURCE
);
374 SET_EXPECT(Obj_OnProgress_CONNECTING
);
376 SET_EXPECT(OnProgress_CONNECTING
);
377 hres
= IInternetProtocolSink_ReportProgress(protocol_sink
,
378 BINDSTATUS_CONNECTING
, wszWineHQIP
);
379 ok(hres
== S_OK
, "ReportProgress failed: %08x\n", hres
);
380 WaitForSingleObject(complete_event
, INFINITE
);
382 CHECK_CALLED(Obj_OnProgress_CONNECTING
);
384 CHECK_CALLED(OnProgress_CONNECTING
);
387 SET_EXPECT(Obj_OnProgress_SENDINGREQUEST
);
389 SET_EXPECT(OnProgress_SENDINGREQUEST
);
390 hres
= IInternetProtocolSink_ReportProgress(protocol_sink
,
391 BINDSTATUS_SENDINGREQUEST
, NULL
);
392 ok(hres
== S_OK
, "ReportProgress failed: %08x\n", hres
);
393 WaitForSingleObject(complete_event
, INFINITE
);
395 CHECK_CALLED(Obj_OnProgress_SENDINGREQUEST
);
397 CHECK_CALLED(OnProgress_SENDINGREQUEST
);
401 SET_EXPECT(Obj_OnProgress_REDIRECTING
);
403 SET_EXPECT(OnProgress_REDIRECTING
);
404 hres
= IInternetProtocolSink_ReportProgress(protocol_sink
, BINDSTATUS_REDIRECTING
, WINE_ABOUT_URL
);
405 ok(hres
== S_OK
, "ReportProgress(BINDSTATUS_REFIRECTING) failed: %08x\n", hres
);
406 WaitForSingleObject(complete_event
, INFINITE
);
408 CHECK_CALLED(Obj_OnProgress_REDIRECTING
);
410 CHECK_CALLED(OnProgress_REDIRECTING
);
415 SET_EXPECT(Continue
);
417 hres
= IInternetProtocolSink_Switch(protocol_sink
, &protocoldata
);
418 ok(hres
== S_OK
, "Switch failed: %08x\n", hres
);
419 WaitForSingleObject(complete_event
, INFINITE
);
421 CHECK_CALLED(Continue
);
424 CHECK_CALLED(Obj_OnProgress_MIMETYPEAVAILABLE
);
425 CHECK_CALLED(Obj_OnProgress_BEGINDOWNLOADDATA
);
426 CHECK_CALLED(Obj_OnProgress_CLASSIDAVAILABLE
);
427 CHECK_CALLED(Obj_OnProgress_BEGINSYNCOPERATION
);
428 CHECK_CALLED(CreateInstance
);
429 CHECK_CALLED(PutProperty_MIMETYPEPROP
);
430 CHECK_CALLED_BROKEN(PutProperty_CLASSIDPROP
);
432 CHECK_CALLED(Obj_OnProgress_ENDSYNCOPERATION
);
433 CHECK_CALLED(OnObjectAvailable
);
434 CHECK_CALLED(Obj_OnStopBinding
);
436 CHECK_CALLED(OnProgress_MIMETYPEAVAILABLE
);
437 CHECK_CALLED(OnProgress_BEGINDOWNLOADDATA
);
438 CHECK_CALLED(LockRequest
);
439 CHECK_CALLED(OnDataAvailable
);
442 SET_EXPECT(Continue
);
444 hres
= IInternetProtocolSink_Switch(protocol_sink
, &protocoldata
);
445 ok(hres
== S_OK
, "Switch failed: %08x\n", hres
);
446 WaitForSingleObject(complete_event
, INFINITE
);
447 CHECK_CALLED(Continue
);
449 CHECK_CALLED(OnProgress_DOWNLOADINGDATA
);
450 CHECK_CALLED(OnDataAvailable
);
452 SET_EXPECT(Continue
);
454 hres
= IInternetProtocolSink_Switch(protocol_sink
, &protocoldata
);
455 ok(hres
== S_OK
, "Switch failed: %08x\n", hres
);
456 WaitForSingleObject(complete_event
, INFINITE
);
457 CHECK_CALLED(Continue
);
459 CHECK_CALLED(OnProgress_DOWNLOADINGDATA
);
460 CHECK_CALLED(OnDataAvailable
);
462 SET_EXPECT(Continue
);
464 hres
= IInternetProtocolSink_Switch(protocol_sink
, &protocoldata
);
465 ok(hres
== S_OK
, "Switch failed: %08x\n", hres
);
466 WaitForSingleObject(complete_event
, INFINITE
);
467 CHECK_CALLED(Continue
);
469 CHECK_CALLED(OnProgress_ENDDOWNLOADDATA
);
470 CHECK_CALLED(OnDataAvailable
);
471 CHECK_CALLED(OnStopBinding
);
475 SetEvent(complete_event2
);
479 static HRESULT WINAPI
Protocol_Start(IInternetProtocol
*iface
, LPCWSTR szUrl
,
480 IInternetProtocolSink
*pOIProtSink
, IInternetBindInfo
*pOIBindInfo
,
481 DWORD grfPI
, HANDLE_PTR dwReserved
)
484 DWORD bind_info
, bscf
= BSCF_FIRSTDATANOTIFICATION
| BSCF_LASTDATANOTIFICATION
;
487 static const STGMEDIUM stgmed_zero
= {0};
488 static const SECURITY_ATTRIBUTES sa_zero
= {0};
494 if(!filedwl_api
) /* FIXME */
495 ok(szUrl
&& !lstrcmpW(szUrl
, urls
[test_protocol
]), "wrong url %s\n", wine_dbgstr_w(szUrl
));
496 ok(pOIProtSink
!= NULL
, "pOIProtSink == NULL\n");
497 ok(pOIBindInfo
!= NULL
, "pOIBindInfo == NULL\n");
498 ok(grfPI
== 0, "grfPI=%d, expected 0\n", grfPI
);
499 ok(dwReserved
== 0, "dwReserved=%lx, expected 0\n", dwReserved
);
501 if(!filedwl_api
&& binding_hres
!= S_OK
) {
502 SET_EXPECT(OnStopBinding
);
503 SET_EXPECT(Terminate
);
504 hres
= IInternetProtocolSink_ReportResult(pOIProtSink
, binding_hres
, 0, NULL
);
505 ok(hres
== S_OK
, "ReportResult failed: %08x\n", hres
);
506 CHECK_CALLED(OnStopBinding
);
507 CHECK_CALLED(Terminate
);
512 memset(&bindinfo
, 0, sizeof(bindinfo
));
513 bindinfo
.cbSize
= sizeof(bindinfo
);
514 hres
= IInternetBindInfo_GetBindInfo(pOIBindInfo
, &bind_info
, &bindinfo
);
515 ok(hres
== S_OK
, "GetBindInfo failed: %08x\n", hres
);
517 ok(bind_info
& BINDF_FROMURLMON
, "BINDF_FROMURLMON is not set\n");
519 if(filedwl_api
|| !is_urlmon_protocol(test_protocol
) || !(bindf
&BINDF_ASYNCSTORAGE
) || tymed
!= TYMED_ISTREAM
)
520 ok(bind_info
& BINDF_NEEDFILE
, "BINDF_NEEDFILE is not set\n");
522 ok(!(bind_info
& BINDF_NEEDFILE
), "BINDF_NEEDFILE is set\n");
524 bind_info
&= ~(BINDF_NEEDFILE
|BINDF_FROMURLMON
);
526 ok(bind_info
== BINDF_PULLDATA
, "bind_info = %x, expected BINDF_PULLDATA\n", bind_info
);
528 ok(bind_info
== (bindf
& ~(BINDF_NEEDFILE
|BINDF_FROMURLMON
)), "bind_info = %x, expected %x\n",
529 bind_info
, (bindf
& ~(BINDF_NEEDFILE
|BINDF_FROMURLMON
)));
531 ok(bindinfo
.cbSize
== sizeof(bindinfo
), "bindinfo.cbSize = %d\n", bindinfo
.cbSize
);
532 ok(!bindinfo
.szExtraInfo
, "bindinfo.szExtraInfo = %p\n", bindinfo
.szExtraInfo
);
533 ok(!memcmp(&bindinfo
.stgmedData
, &stgmed_zero
, sizeof(STGMEDIUM
)), "wrong stgmedData\n");
534 ok(!bindinfo
.grfBindInfoF
, "bindinfo.grfBindInfoF = %d\n", bindinfo
.grfBindInfoF
);
535 ok(!bindinfo
.dwBindVerb
, "bindinfo.dwBindVerb = %d\n", bindinfo
.dwBindVerb
);
536 ok(!bindinfo
.szCustomVerb
, "bindinfo.szCustomVerb = %p\n", bindinfo
.szCustomVerb
);
537 ok(!bindinfo
.cbstgmedData
, "bindinfo.cbstgmedData = %d\n", bindinfo
.cbstgmedData
);
538 ok(bindinfo
.dwOptions
== (bind_to_object
? 0x100000 : 0), "bindinfo.dwOptions = %x\n", bindinfo
.dwOptions
);
539 ok(!bindinfo
.dwOptionsFlags
, "bindinfo.dwOptionsFlags = %d\n", bindinfo
.dwOptionsFlags
);
540 ok(!bindinfo
.dwCodePage
, "bindinfo.dwCodePage = %d\n", bindinfo
.dwCodePage
);
541 ok(!memcmp(&bindinfo
.securityAttributes
, &sa_zero
, sizeof(sa_zero
)), "wrong bindinfo.securityAttributes\n");
542 ok(IsEqualGUID(&bindinfo
.iid
, &IID_NULL
), "wrong bindinfo.iid\n");
543 ok(!bindinfo
.pUnk
, "bindinfo.pUnk = %p\n", bindinfo
.pUnk
);
544 ok(!bindinfo
.dwReserved
, "bindinfo.dwReserved = %d\n", bindinfo
.dwReserved
);
546 switch(test_protocol
) {
548 hres
= IInternetProtocolSink_ReportProgress(pOIProtSink
,
549 BINDSTATUS_DIRECTBIND
, NULL
);
551 "ReportProgress(BINDSTATUS_SENDINGREQUEST) failed: %08x\n", hres
);
556 SET_EXPECT(Obj_OnProgress_SENDINGREQUEST
);
558 SET_EXPECT(OnProgress_SENDINGREQUEST
);
559 hres
= IInternetProtocolSink_ReportProgress(pOIProtSink
,
560 BINDSTATUS_SENDINGREQUEST
, emptyW
);
562 "ReportProgress(BINDSTATUS_SENDINGREQUEST) failed: %08x\n", hres
);
564 CHECK_CALLED(Obj_OnProgress_SENDINGREQUEST
);
566 CHECK_CALLED(OnProgress_SENDINGREQUEST
);
571 if(test_protocol
== HTTP_TEST
|| test_protocol
== HTTPS_TEST
) {
572 IServiceProvider
*service_provider
;
573 IHttpNegotiate
*http_negotiate
;
574 IHttpNegotiate2
*http_negotiate2
;
575 LPWSTR ua
= (LPWSTR
)0xdeadbeef, accept_mimes
[256];
576 LPWSTR additional_headers
= (LPWSTR
)0xdeadbeef;
578 DWORD fetched
= 256, size
= 100;
581 static const WCHAR wszMimes
[] = {'*','/','*',0};
583 SET_EXPECT(QueryInterface_IInternetBindInfo
);
584 SET_EXPECT(QueryService_IInternetBindInfo
);
585 hres
= IInternetBindInfo_GetBindString(pOIBindInfo
, BINDSTRING_USER_AGENT
,
587 CLEAR_CALLED(QueryInterface_IInternetBindInfo
); /* IE <8 */
588 CLEAR_CALLED(QueryService_IInternetBindInfo
); /* IE <8 */
590 ok(hres
== E_NOINTERFACE
,
591 "GetBindString(BINDSTRING_USER_AGETNT) failed: %08x\n", hres
);
592 ok(fetched
== 256, "fetched = %d, expected 254\n", fetched
);
593 ok(ua
== (LPWSTR
)0xdeadbeef, "ua = %p\n", ua
);
595 hres
= IInternetBindInfo_GetBindString(pOIBindInfo
, BINDSTRING_ACCEPT_MIMES
,
596 accept_mimes
, 256, &fetched
);
598 "GetBindString(BINDSTRING_ACCEPT_MIMES) failed: %08x\n", hres
);
599 ok(fetched
== 1, "fetched = %d, expected 1\n", fetched
);
600 ok(!lstrcmpW(wszMimes
, accept_mimes
[0]), "unexpected mimes\n");
602 hres
= IInternetBindInfo_GetBindString(pOIBindInfo
, BINDSTRING_ACCEPT_MIMES
,
603 NULL
, 256, &fetched
);
604 ok(hres
== E_INVALIDARG
,
605 "GetBindString(BINDSTRING_ACCEPT_MIMES) failed: %08x\n", hres
);
607 hres
= IInternetBindInfo_GetBindString(pOIBindInfo
, BINDSTRING_ACCEPT_MIMES
,
608 accept_mimes
, 256, NULL
);
609 ok(hres
== E_INVALIDARG
,
610 "GetBindString(BINDSTRING_ACCEPT_MIMES) failed: %08x\n", hres
);
612 hres
= IInternetBindInfo_QueryInterface(pOIBindInfo
, &IID_IServiceProvider
,
613 (void**)&service_provider
);
614 ok(hres
== S_OK
, "QueryInterface failed: %08x\n", hres
);
616 SET_EXPECT(QueryInterface_IHttpNegotiate
);
617 hres
= IServiceProvider_QueryService(service_provider
, &IID_IHttpNegotiate
,
618 &IID_IHttpNegotiate
, (void**)&http_negotiate
);
619 CLEAR_CALLED(QueryInterface_IHttpNegotiate
); /* IE <8 */
620 ok(hres
== S_OK
, "QueryService failed: %08x\n", hres
);
622 SET_EXPECT(BeginningTransaction
);
623 SET_EXPECT(QueryInterface_IHttpNegotiate
);
624 hres
= IHttpNegotiate_BeginningTransaction(http_negotiate
, urls
[test_protocol
],
625 NULL
, 0, &additional_headers
);
626 CHECK_CALLED_BROKEN(QueryInterface_IHttpNegotiate
);
627 CHECK_CALLED(BeginningTransaction
);
628 IHttpNegotiate_Release(http_negotiate
);
629 ok(hres
== S_OK
, "BeginningTransction failed: %08x\n", hres
);
630 ok(additional_headers
== NULL
, "additional_headers=%p\n", additional_headers
);
632 SET_EXPECT(QueryInterface_IHttpNegotiate2
);
633 hres
= IServiceProvider_QueryService(service_provider
, &IID_IHttpNegotiate2
,
634 &IID_IHttpNegotiate2
, (void**)&http_negotiate2
);
635 CLEAR_CALLED(QueryInterface_IHttpNegotiate2
); /* IE <8 */
636 ok(hres
== S_OK
, "QueryService failed: %08x\n", hres
);
639 SET_EXPECT(QueryInterface_IHttpNegotiate2
);
640 SET_EXPECT(GetRootSecurityId
);
641 hres
= IHttpNegotiate2_GetRootSecurityId(http_negotiate2
, sec_id
, &size
, 0);
642 CHECK_CALLED_BROKEN(QueryInterface_IHttpNegotiate2
);
643 CHECK_CALLED(GetRootSecurityId
);
644 IHttpNegotiate2_Release(http_negotiate2
);
645 ok(hres
== E_FAIL
, "GetRootSecurityId failed: %08x, expected E_FAIL\n", hres
);
646 ok(size
== 13, "size=%d\n", size
);
648 IServiceProvider_Release(service_provider
);
650 IInternetProtocolSink_AddRef(pOIProtSink
);
651 protocol_sink
= pOIProtSink
;
652 CreateThread(NULL
, 0, thread_proc
, NULL
, 0, &tid
);
657 if(test_protocol
== FILE_TEST
) {
658 hres
= IInternetProtocolSink_ReportProgress(pOIProtSink
,
659 BINDSTATUS_CACHEFILENAMEAVAILABLE
, file_url
+8);
661 "ReportProgress(BINDSTATUS_CACHEFILENAMEAVAILABLE) failed: %08x\n", hres
);
664 SET_EXPECT(Obj_OnProgress_MIMETYPEAVAILABLE
);
666 SET_EXPECT(OnProgress_MIMETYPEAVAILABLE
);
667 hres
= IInternetProtocolSink_ReportProgress(pOIProtSink
,
668 BINDSTATUS_VERIFIEDMIMETYPEAVAILABLE
, wszTextHtml
);
670 "ReportProgress(BINDSTATUS_VERIFIEDMIMETYPEAVAILABLE) failed: %08x\n", hres
);
672 CHECK_CALLED(Obj_OnProgress_MIMETYPEAVAILABLE
);
674 CHECK_CALLED(OnProgress_MIMETYPEAVAILABLE
);
676 hres
= IInternetProtocolSink_ReportProgress(pOIProtSink
,
677 BINDSTATUS_MIMETYPEAVAILABLE
, wszTextHtml
);
679 "ReportProgress(BINDSTATUS_MIMETYPEAVAILABLE) failed: %08x\n", hres
);
682 if(test_protocol
== ABOUT_TEST
)
683 bscf
|= BSCF_DATAFULLYAVAILABLE
;
684 if(test_protocol
== ITS_TEST
)
685 bscf
= BSCF_FIRSTDATANOTIFICATION
|BSCF_DATAFULLYAVAILABLE
;
689 if(test_protocol
!= FILE_TEST
&& test_protocol
!= MK_TEST
)
690 SET_EXPECT(Obj_OnProgress_MIMETYPEAVAILABLE
);
691 SET_EXPECT(Obj_OnProgress_BEGINDOWNLOADDATA
);
692 if(test_protocol
== FILE_TEST
)
693 SET_EXPECT(Obj_OnProgress_CACHEFILENAMEAVAILABLE
);
694 SET_EXPECT(Obj_OnProgress_ENDDOWNLOADDATA
);
695 SET_EXPECT(Obj_OnProgress_CLASSIDAVAILABLE
);
696 SET_EXPECT(Obj_OnProgress_BEGINSYNCOPERATION
);
697 SET_EXPECT(CreateInstance
);
698 SET_EXPECT(PutProperty_MIMETYPEPROP
);
699 SET_EXPECT(PutProperty_CLASSIDPROP
);
701 SET_EXPECT(Obj_OnProgress_ENDSYNCOPERATION
);
702 SET_EXPECT(OnObjectAvailable
);
703 SET_EXPECT(Obj_OnStopBinding
);
705 if(test_protocol
!= FILE_TEST
&& test_protocol
!= MK_TEST
)
706 SET_EXPECT(OnProgress_MIMETYPEAVAILABLE
);
707 SET_EXPECT(OnProgress_BEGINDOWNLOADDATA
);
708 if(test_protocol
== FILE_TEST
)
709 SET_EXPECT(OnProgress_CACHEFILENAMEAVAILABLE
);
710 SET_EXPECT(OnProgress_ENDDOWNLOADDATA
);
711 SET_EXPECT(LockRequest
);
713 SET_EXPECT(OnDataAvailable
);
714 SET_EXPECT(OnStopBinding
);
717 hres
= IInternetProtocolSink_ReportData(pOIProtSink
, bscf
, 13, 13);
718 ok(hres
== S_OK
, "ReportData failed: %08x\n", hres
);
722 if(test_protocol
!= FILE_TEST
&& test_protocol
!= MK_TEST
)
723 CHECK_CALLED(Obj_OnProgress_MIMETYPEAVAILABLE
);
724 CHECK_CALLED(Obj_OnProgress_BEGINDOWNLOADDATA
);
725 if(test_protocol
== FILE_TEST
)
726 CHECK_CALLED(Obj_OnProgress_CACHEFILENAMEAVAILABLE
);
727 CHECK_CALLED(Obj_OnProgress_ENDDOWNLOADDATA
);
728 CHECK_CALLED(Obj_OnProgress_CLASSIDAVAILABLE
);
729 CHECK_CALLED(Obj_OnProgress_BEGINSYNCOPERATION
);
730 CHECK_CALLED(CreateInstance
);
731 CHECK_CALLED(PutProperty_MIMETYPEPROP
);
732 CHECK_CALLED_BROKEN(PutProperty_CLASSIDPROP
);
734 CHECK_CALLED(Obj_OnProgress_ENDSYNCOPERATION
);
735 CHECK_CALLED(OnObjectAvailable
);
736 CHECK_CALLED(Obj_OnStopBinding
);
738 if(test_protocol
!= FILE_TEST
&& test_protocol
!= MK_TEST
)
739 CHECK_CALLED(OnProgress_MIMETYPEAVAILABLE
);
740 CHECK_CALLED(OnProgress_BEGINDOWNLOADDATA
);
741 if(test_protocol
== FILE_TEST
)
742 CHECK_CALLED(OnProgress_CACHEFILENAMEAVAILABLE
);
743 CHECK_CALLED(OnProgress_ENDDOWNLOADDATA
);
744 CHECK_CALLED(LockRequest
);
746 CHECK_CALLED(OnDataAvailable
);
747 CHECK_CALLED(OnStopBinding
);
750 if(test_protocol
== ITS_TEST
) {
752 hres
= IInternetProtocolSink_ReportProgress(pOIProtSink
, BINDSTATUS_BEGINDOWNLOADDATA
, NULL
);
753 ok(hres
== S_OK
, "ReportProgress(BINDSTATUS_BEGINDOWNLOADDATA) failed: %08x\n", hres
);
757 SET_EXPECT(Terminate
);
758 hres
= IInternetProtocolSink_ReportResult(pOIProtSink
, S_OK
, 0, NULL
);
759 ok(hres
== S_OK
, "ReportResult failed: %08x\n", hres
);
760 CHECK_CALLED(Terminate
);
765 static HRESULT WINAPI
Protocol_Continue(IInternetProtocol
*iface
,
766 PROTOCOLDATA
*pProtocolData
)
771 CHECK_EXPECT(Continue
);
773 ok(GetCurrentThreadId() == thread_id
, "wrong thread %d\n", GetCurrentThreadId());
775 ok(pProtocolData
!= NULL
, "pProtocolData == NULL\n");
781 IServiceProvider
*service_provider
;
782 IHttpNegotiate
*http_negotiate
;
783 static WCHAR header
[] = {'?',0};
785 hres
= IInternetProtocolSink_QueryInterface(protocol_sink
, &IID_IServiceProvider
,
786 (void**)&service_provider
);
787 ok(hres
== S_OK
, "Could not get IServiceProvicder\n");
789 hres
= IServiceProvider_QueryService(service_provider
, &IID_IHttpNegotiate
,
790 &IID_IHttpNegotiate
, (void**)&http_negotiate
);
791 ok(hres
== S_OK
, "Could not get IHttpNegotiate\n");
793 SET_EXPECT(QueryInterface_IHttpNegotiate
);
794 SET_EXPECT(OnResponse
);
795 hres
= IHttpNegotiate_OnResponse(http_negotiate
, 200, header
, NULL
, NULL
);
796 CHECK_CALLED_BROKEN(QueryInterface_IHttpNegotiate
);
797 CHECK_CALLED(OnResponse
);
798 IHttpNegotiate_Release(http_negotiate
);
799 ok(hres
== S_OK
, "OnResponse failed: %08x\n", hres
);
801 if(test_protocol
== HTTPS_TEST
|| test_redirect
) {
802 hres
= IInternetProtocolSink_ReportProgress(protocol_sink
, BINDSTATUS_ACCEPTRANGES
, NULL
);
803 ok(hres
== S_OK
, "ReportProgress(BINDSTATUS_ACCEPTRANGES) failed: %08x\n", hres
);
806 hres
= IInternetProtocolSink_ReportProgress(protocol_sink
,
807 BINDSTATUS_MIMETYPEAVAILABLE
, wszTextHtml
);
809 "ReportProgress(BINDSTATUS_MIMETYPEAVAILABLE) failed: %08x\n", hres
);
811 hres
= IInternetProtocolSink_ReportProgress(protocol_sink
,
812 BINDSTATUS_CACHEFILENAMEAVAILABLE
, use_cache_file
? cache_file_name
: cache_fileW
);
813 ok(hres
== S_OK
, "ReportProgress(BINDSTATUS_CACHEFILENAMEAVAILABLE) failed: %08x\n", hres
);
815 bscf
|= BSCF_FIRSTDATANOTIFICATION
;
820 bscf
= BSCF_INTERMEDIATEDATANOTIFICATION
;
824 hres
= IInternetProtocolSink_ReportData(protocol_sink
, bscf
, 100, 400);
825 ok(hres
== S_OK
, "ReportData failed: %08x\n", hres
);
831 SET_EXPECT(Obj_OnProgress_MIMETYPEAVAILABLE
);
832 SET_EXPECT(Obj_OnProgress_BEGINDOWNLOADDATA
);
833 SET_EXPECT(Obj_OnProgress_CLASSIDAVAILABLE
);
834 SET_EXPECT(Obj_OnProgress_BEGINSYNCOPERATION
);
835 SET_EXPECT(CreateInstance
);
836 SET_EXPECT(PutProperty_MIMETYPEPROP
);
837 SET_EXPECT(PutProperty_CLASSIDPROP
);
839 SET_EXPECT(Obj_OnProgress_ENDSYNCOPERATION
);
840 SET_EXPECT(OnObjectAvailable
);
841 SET_EXPECT(Obj_OnStopBinding
);
843 SET_EXPECT(OnProgress_MIMETYPEAVAILABLE
);
844 SET_EXPECT(OnProgress_BEGINDOWNLOADDATA
);
845 SET_EXPECT(LockRequest
);
849 SET_EXPECT(OnProgress_DOWNLOADINGDATA
);
852 SET_EXPECT(OnProgress_DOWNLOADINGDATA
);
853 SET_EXPECT(OnProgress_ENDDOWNLOADDATA
);
855 if(!bind_to_object
|| prot_state
>= 2)
856 SET_EXPECT(OnDataAvailable
);
858 SET_EXPECT(OnStopBinding
);
863 static HRESULT WINAPI
Protocol_Abort(IInternetProtocol
*iface
, HRESULT hrReason
,
866 ok(0, "unexpected call\n");
870 static HRESULT WINAPI
Protocol_Terminate(IInternetProtocol
*iface
, DWORD dwOptions
)
872 CHECK_EXPECT(Terminate
);
874 ok(dwOptions
== 0, "dwOptions=%d, expected 0\n", dwOptions
);
877 IInternetProtocolSink_Release(protocol_sink
);
878 protocol_sink
= NULL
;
884 static HRESULT WINAPI
Protocol_Suspend(IInternetProtocol
*iface
)
886 ok(0, "unexpected call\n");
890 static HRESULT WINAPI
Protocol_Resume(IInternetProtocol
*iface
)
892 ok(0, "unexpected call\n");
896 static HRESULT WINAPI
Protocol_Read(IInternetProtocol
*iface
, void *pv
,
897 ULONG cb
, ULONG
*pcbRead
)
899 static const char data
[] = "<HTML></HTML>";
903 if(test_protocol
== HTTP_TEST
|| test_protocol
== HTTPS_TEST
) {
906 static BOOL pending
= TRUE
;
928 hres
= IInternetProtocolSink_ReportData(protocol_sink
,
929 BSCF_LASTDATANOTIFICATION
|BSCF_INTERMEDIATEDATANOTIFICATION
, 2000, 2000);
930 ok(hres
== S_OK
, "ReportData failed: %08x\n", hres
);
932 hres
= IInternetProtocolSink_ReportResult(protocol_sink
, S_OK
, 0, NULL
);
933 ok(hres
== S_OK
, "ReportResult failed: %08x\n", hres
);
947 ok(pv
!= NULL
, "pv == NULL\n");
948 ok(cb
!= 0, "cb == 0\n");
949 ok(pcbRead
!= NULL
, "pcbRead == NULL\n");
951 ok(*pcbRead
== 0, "*pcbRead=%d, expected 0\n", *pcbRead
);
952 read
+= *pcbRead
= sizeof(data
)-1;
955 memcpy(pv
, data
, sizeof(data
));
960 static HRESULT WINAPI
Protocol_Seek(IInternetProtocol
*iface
,
961 LARGE_INTEGER dlibMove
, DWORD dwOrigin
, ULARGE_INTEGER
*plibNewPosition
)
963 ok(0, "unexpected call\n");
967 static HRESULT WINAPI
Protocol_LockRequest(IInternetProtocol
*iface
, DWORD dwOptions
)
969 CHECK_EXPECT(LockRequest
);
973 static HRESULT WINAPI
Protocol_UnlockRequest(IInternetProtocol
*iface
)
975 CHECK_EXPECT(UnlockRequest
);
979 static const IInternetProtocolVtbl ProtocolVtbl
= {
980 Protocol_QueryInterface
,
991 Protocol_LockRequest
,
992 Protocol_UnlockRequest
995 static IInternetProtocol Protocol
= { &ProtocolVtbl
};
997 static HRESULT WINAPI
HttpNegotiate_QueryInterface(IHttpNegotiate2
*iface
, REFIID riid
, void **ppv
)
999 if(IsEqualGUID(&IID_IUnknown
, riid
)
1000 || IsEqualGUID(&IID_IHttpNegotiate
, riid
)
1001 || IsEqualGUID(&IID_IHttpNegotiate2
, riid
)) {
1006 ok(0, "unexpected call\n");
1007 return E_NOINTERFACE
;
1010 static ULONG WINAPI
HttpNegotiate_AddRef(IHttpNegotiate2
*iface
)
1015 static ULONG WINAPI
HttpNegotiate_Release(IHttpNegotiate2
*iface
)
1020 static HRESULT WINAPI
HttpNegotiate_BeginningTransaction(IHttpNegotiate2
*iface
, LPCWSTR szURL
,
1021 LPCWSTR szHeaders
, DWORD dwReserved
, LPWSTR
*pszAdditionalHeaders
)
1023 CHECK_EXPECT(BeginningTransaction
);
1025 ok(GetCurrentThreadId() == thread_id
, "wrong thread %d\n", GetCurrentThreadId());
1027 ok(!lstrcmpW(szURL
, urls
[test_protocol
]), "szURL != urls[test_protocol]\n");
1028 ok(!dwReserved
, "dwReserved=%d, expected 0\n", dwReserved
);
1029 ok(pszAdditionalHeaders
!= NULL
, "pszAdditionalHeaders == NULL\n");
1030 if(pszAdditionalHeaders
)
1031 ok(*pszAdditionalHeaders
== NULL
, "*pszAdditionalHeaders != NULL\n");
1036 static HRESULT WINAPI
HttpNegotiate_OnResponse(IHttpNegotiate2
*iface
, DWORD dwResponseCode
,
1037 LPCWSTR szResponseHeaders
, LPCWSTR szRequestHeaders
, LPWSTR
*pszAdditionalRequestHeaders
)
1039 CHECK_EXPECT(OnResponse
);
1041 ok(GetCurrentThreadId() == thread_id
, "wrong thread %d\n", GetCurrentThreadId());
1043 ok(dwResponseCode
== 200, "dwResponseCode=%d, expected 200\n", dwResponseCode
);
1044 ok(szResponseHeaders
!= NULL
, "szResponseHeaders == NULL\n");
1045 ok(szRequestHeaders
== NULL
, "szRequestHeaders != NULL\n");
1046 /* Note: in protocol.c tests, OnResponse pszAdditionalRequestHeaders _is_ NULL */
1047 ok(pszAdditionalRequestHeaders
!= NULL
, "pszAdditionalHeaders == NULL\n");
1048 if(pszAdditionalRequestHeaders
)
1049 ok(*pszAdditionalRequestHeaders
== NULL
, "*pszAdditionalHeaders != NULL\n");
1054 static HRESULT WINAPI
HttpNegotiate_GetRootSecurityId(IHttpNegotiate2
*iface
,
1055 BYTE
*pbSecurityId
, DWORD
*pcbSecurityId
, DWORD_PTR dwReserved
)
1057 static const BYTE sec_id
[] = {'h','t','t','p',':','t','e','s','t',1,0,0,0};
1059 CHECK_EXPECT(GetRootSecurityId
);
1061 ok(GetCurrentThreadId() == thread_id
, "wrong thread %d\n", GetCurrentThreadId());
1063 ok(!dwReserved
, "dwReserved=%ld, expected 0\n", dwReserved
);
1064 ok(pbSecurityId
!= NULL
, "pbSecurityId == NULL\n");
1065 ok(pcbSecurityId
!= NULL
, "pcbSecurityId == NULL\n");
1067 if(pbSecurityId
== (void*)0xdeadbeef)
1071 ok(*pcbSecurityId
== 512, "*pcbSecurityId=%d, expected 512\n", *pcbSecurityId
);
1072 *pcbSecurityId
= sizeof(sec_id
);
1076 memcpy(pbSecurityId
, sec_id
, sizeof(sec_id
));
1081 static IHttpNegotiate2Vtbl HttpNegotiateVtbl
= {
1082 HttpNegotiate_QueryInterface
,
1083 HttpNegotiate_AddRef
,
1084 HttpNegotiate_Release
,
1085 HttpNegotiate_BeginningTransaction
,
1086 HttpNegotiate_OnResponse
,
1087 HttpNegotiate_GetRootSecurityId
1090 static IHttpNegotiate2 HttpNegotiate
= { &HttpNegotiateVtbl
};
1092 static HRESULT WINAPI
ServiceProvider_QueryInterface(IServiceProvider
*iface
, REFIID riid
, void **ppv
)
1094 ok(0, "unexpected call\n");
1095 return E_NOINTERFACE
;
1098 static ULONG WINAPI
ServiceProvider_AddRef(IServiceProvider
*iface
)
1103 static ULONG WINAPI
ServiceProvider_Release(IServiceProvider
*iface
)
1108 static HRESULT WINAPI
ServiceProvider_QueryService(IServiceProvider
*iface
,
1109 REFGUID guidService
, REFIID riid
, void **ppv
)
1111 if(IsEqualGUID(&IID_IAuthenticate
, guidService
)) {
1112 CHECK_EXPECT(QueryService_IAuthenticate
);
1116 if(IsEqualGUID(&IID_IInternetProtocol
, guidService
)) {
1117 CHECK_EXPECT2(QueryService_IInternetProtocol
);
1121 if(IsEqualGUID(&IID_IInternetBindInfo
, guidService
)) {
1122 CHECK_EXPECT(QueryService_IInternetBindInfo
);
1126 if(IsEqualGUID(&IID_IWindowForBindingUI
, guidService
)) {
1127 CHECK_EXPECT(QueryService_IWindowForBindingUI
);
1131 ok(0, "unexpected service %s\n", debugstr_guid(guidService
));
1132 return E_NOINTERFACE
;
1135 static IServiceProviderVtbl ServiceProviderVtbl
= {
1136 ServiceProvider_QueryInterface
,
1137 ServiceProvider_AddRef
,
1138 ServiceProvider_Release
,
1139 ServiceProvider_QueryService
1142 static IServiceProvider ServiceProvider
= { &ServiceProviderVtbl
};
1144 static IBindStatusCallbackEx objbsc
;
1146 static HRESULT WINAPI
statusclb_QueryInterface(IBindStatusCallbackEx
*iface
, REFIID riid
, void **ppv
)
1148 ok(GetCurrentThreadId() == thread_id
, "wrong thread %d\n", GetCurrentThreadId());
1150 if(IsEqualGUID(&IID_IInternetProtocol
, riid
)) {
1151 CHECK_EXPECT2(QueryInterface_IInternetProtocol
);
1152 if(emulate_protocol
) {
1156 return E_NOINTERFACE
;
1159 else if (IsEqualGUID(&IID_IServiceProvider
, riid
))
1161 CHECK_EXPECT2(QueryInterface_IServiceProvider
);
1162 *ppv
= &ServiceProvider
;
1165 else if (IsEqualGUID(&IID_IHttpNegotiate
, riid
))
1167 CHECK_EXPECT2(QueryInterface_IHttpNegotiate
);
1168 *ppv
= &HttpNegotiate
;
1171 else if (IsEqualGUID(&IID_IHttpNegotiate2
, riid
))
1173 CHECK_EXPECT(QueryInterface_IHttpNegotiate2
);
1174 *ppv
= &HttpNegotiate
;
1177 else if (IsEqualGUID(&IID_IAuthenticate
, riid
))
1179 CHECK_EXPECT(QueryInterface_IAuthenticate
);
1180 return E_NOINTERFACE
;
1182 else if(IsEqualGUID(&IID_IBindStatusCallback
, riid
))
1184 CHECK_EXPECT2(QueryInterface_IBindStatusCallback
);
1188 else if(IsEqualGUID(&IID_IBindStatusCallbackHolder
, riid
))
1190 CHECK_EXPECT2(QueryInterface_IBindStatusCallbackHolder
);
1191 return E_NOINTERFACE
;
1193 else if(IsEqualGUID(&IID_IBindStatusCallbackEx
, riid
))
1195 CHECK_EXPECT(QueryInterface_IBindStatusCallbackEx
);
1197 return E_NOINTERFACE
;
1201 else if(IsEqualGUID(&IID_IInternetBindInfo
, riid
))
1204 CHECK_EXPECT2(QueryInterface_IInternetBindInfo
);
1206 else if(IsEqualGUID(&IID_IWindowForBindingUI
, riid
))
1208 CHECK_EXPECT2(QueryInterface_IWindowForBindingUI
);
1209 return E_NOINTERFACE
;
1213 ok(0, "unexpected interface %s\n", debugstr_guid(riid
));
1216 return E_NOINTERFACE
;
1219 static ULONG WINAPI
statusclb_AddRef(IBindStatusCallbackEx
*iface
)
1224 static ULONG WINAPI
statusclb_Release(IBindStatusCallbackEx
*iface
)
1229 static HRESULT WINAPI
statusclb_OnStartBinding(IBindStatusCallbackEx
*iface
, DWORD dwReserved
,
1232 IWinInetHttpInfo
*http_info
;
1236 if(iface
== &objbsc
)
1237 CHECK_EXPECT(Obj_OnStartBinding
);
1239 CHECK_EXPECT(OnStartBinding
);
1241 ok(GetCurrentThreadId() == thread_id
, "wrong thread %d\n", GetCurrentThreadId());
1243 ok(pib
!= NULL
, "pib should not be NULL\n");
1244 ok(dwReserved
== 0xff, "dwReserved=%x\n", dwReserved
);
1246 if(pib
== (void*)0xdeadbeef)
1249 current_binding
= pib
;
1251 hres
= IBinding_QueryInterface(pib
, &IID_IMoniker
, (void**)&mon
);
1252 ok(hres
== E_NOINTERFACE
, "IBinding should not have IMoniker interface\n");
1254 IMoniker_Release(mon
);
1256 hres
= IBinding_QueryInterface(pib
, &IID_IWinInetHttpInfo
, (void**)&http_info
);
1257 ok(hres
== E_NOINTERFACE
, "Could not get IID_IWinInetHttpInfo: %08x\n", hres
);
1262 static HRESULT WINAPI
statusclb_GetPriority(IBindStatusCallbackEx
*iface
, LONG
*pnPriority
)
1264 ok(0, "unexpected call\n");
1268 static HRESULT WINAPI
statusclb_OnLowResource(IBindStatusCallbackEx
*iface
, DWORD reserved
)
1270 ok(0, "unexpected call\n");
1274 static HRESULT WINAPI
statusclb_OnProgress(IBindStatusCallbackEx
*iface
, ULONG ulProgress
,
1275 ULONG ulProgressMax
, ULONG ulStatusCode
, LPCWSTR szStatusText
)
1277 ok(GetCurrentThreadId() == thread_id
, "wrong thread %d\n", GetCurrentThreadId());
1279 switch(ulStatusCode
) {
1280 case BINDSTATUS_FINDINGRESOURCE
:
1281 if(iface
== &objbsc
)
1282 CHECK_EXPECT(Obj_OnProgress_FINDINGRESOURCE
);
1283 else if(test_protocol
== FTP_TEST
)
1284 todo_wine
CHECK_EXPECT(OnProgress_FINDINGRESOURCE
);
1286 CHECK_EXPECT(OnProgress_FINDINGRESOURCE
);
1287 if(emulate_protocol
&& (test_protocol
== HTTP_TEST
|| test_protocol
== HTTPS_TEST
))
1288 SetEvent(complete_event
);
1290 case BINDSTATUS_CONNECTING
:
1291 if(iface
== &objbsc
)
1292 CHECK_EXPECT(Obj_OnProgress_CONNECTING
);
1293 else if(test_protocol
== FTP_TEST
)
1294 todo_wine
CHECK_EXPECT(OnProgress_CONNECTING
);
1296 CHECK_EXPECT(OnProgress_CONNECTING
);
1297 if(emulate_protocol
&& (test_protocol
== HTTP_TEST
|| test_protocol
== HTTPS_TEST
))
1298 SetEvent(complete_event
);
1300 case BINDSTATUS_REDIRECTING
:
1301 if(iface
== &objbsc
)
1302 CHECK_EXPECT(Obj_OnProgress_REDIRECTING
);
1304 CHECK_EXPECT(OnProgress_REDIRECTING
);
1305 ok(!lstrcmpW(szStatusText
, WINE_ABOUT_URL
), "unexpected status text %s\n",
1306 wine_dbgstr_w(szStatusText
));
1307 if(emulate_protocol
&& (test_protocol
== HTTP_TEST
|| test_protocol
== HTTPS_TEST
)
1308 && (!bind_to_object
|| iface
== &objbsc
))
1309 SetEvent(complete_event
);
1311 case BINDSTATUS_SENDINGREQUEST
:
1312 if(iface
== &objbsc
)
1313 CHECK_EXPECT(Obj_OnProgress_SENDINGREQUEST
);
1314 else if(test_protocol
== FTP_TEST
)
1315 CHECK_EXPECT2(OnProgress_SENDINGREQUEST
);
1317 CHECK_EXPECT(OnProgress_SENDINGREQUEST
);
1318 if(emulate_protocol
&& (test_protocol
== HTTP_TEST
|| test_protocol
== HTTPS_TEST
))
1319 SetEvent(complete_event
);
1321 case BINDSTATUS_MIMETYPEAVAILABLE
:
1322 if(iface
== &objbsc
)
1323 CHECK_EXPECT(Obj_OnProgress_MIMETYPEAVAILABLE
);
1325 CHECK_EXPECT(OnProgress_MIMETYPEAVAILABLE
);
1327 ok(download_state
== BEFORE_DOWNLOAD
, "Download state was %d, expected BEFORE_DOWNLOAD\n",
1329 WideCharToMultiByte(CP_ACP
, 0, szStatusText
, -1, mime_type
, sizeof(mime_type
)-1, NULL
, NULL
);
1331 case BINDSTATUS_BEGINDOWNLOADDATA
:
1332 if(iface
== &objbsc
)
1333 CHECK_EXPECT(Obj_OnProgress_BEGINDOWNLOADDATA
);
1335 CHECK_EXPECT(OnProgress_BEGINDOWNLOADDATA
);
1336 ok(szStatusText
!= NULL
, "szStatusText == NULL\n");
1341 ok(!lstrcmpW(szStatusText
, urls
[test_protocol
]), "wrong szStatusText %s\n", wine_dbgstr_w(szStatusText
));
1345 ok(download_state
== BEFORE_DOWNLOAD
, "Download state was %d, expected BEFORE_DOWNLOAD\n",
1347 download_state
= DOWNLOADING
;
1349 case BINDSTATUS_DOWNLOADINGDATA
:
1350 CHECK_EXPECT2(OnProgress_DOWNLOADINGDATA
);
1351 ok(iface
!= &objbsc
, "unexpected call\n");
1352 ok(download_state
== DOWNLOADING
, "Download state was %d, expected DOWNLOADING\n",
1355 case BINDSTATUS_ENDDOWNLOADDATA
:
1356 if(iface
== &objbsc
)
1357 CHECK_EXPECT(Obj_OnProgress_ENDDOWNLOADDATA
);
1359 CHECK_EXPECT(OnProgress_ENDDOWNLOADDATA
);
1360 ok(szStatusText
!= NULL
, "szStatusText == NULL\n");
1365 ok(!lstrcmpW(szStatusText
, urls
[test_protocol
]), "wrong szStatusText %s\n", wine_dbgstr_w(szStatusText
));
1368 ok(download_state
== DOWNLOADING
, "Download state was %d, expected DOWNLOADING\n",
1370 download_state
= END_DOWNLOAD
;
1372 case BINDSTATUS_CACHEFILENAMEAVAILABLE
:
1373 if(test_protocol
!= HTTP_TEST
&& test_protocol
!= HTTPS_TEST
) {
1374 if(iface
== &objbsc
)
1375 CHECK_EXPECT(Obj_OnProgress_CACHEFILENAMEAVAILABLE
);
1377 CHECK_EXPECT(OnProgress_CACHEFILENAMEAVAILABLE
);
1379 CLEAR_CALLED(OnProgress_CACHEFILENAMEAVAILABLE
);
1380 CLEAR_CALLED(Obj_OnProgress_CACHEFILENAMEAVAILABLE
);
1383 ok(szStatusText
!= NULL
, "szStatusText == NULL\n");
1384 if(szStatusText
&& test_protocol
== FILE_TEST
)
1385 ok(!lstrcmpW(file_url
+8, szStatusText
), "wrong szStatusText %s\n", wine_dbgstr_w(szStatusText
));
1387 case BINDSTATUS_CLASSIDAVAILABLE
:
1391 if(iface
!= &objbsc
)
1392 ok(0, "unexpected call\n");
1393 else if(1||emulate_protocol
)
1394 CHECK_EXPECT(Obj_OnProgress_CLASSIDAVAILABLE
);
1396 todo_wine
CHECK_EXPECT(Obj_OnProgress_CLASSIDAVAILABLE
);
1397 hr
= CLSIDFromString((LPCOLESTR
)szStatusText
, &clsid
);
1398 ok(hr
== S_OK
, "CLSIDFromString failed with error 0x%08x\n", hr
);
1399 ok(IsEqualCLSID(&clsid
, &CLSID_HTMLDocument
),
1400 "Expected clsid to be CLSID_HTMLDocument instead of %s\n", debugstr_guid(&clsid
));
1403 case BINDSTATUS_BEGINSYNCOPERATION
:
1404 CHECK_EXPECT(Obj_OnProgress_BEGINSYNCOPERATION
);
1405 if(iface
!= &objbsc
)
1406 ok(0, "unexpected call\n");
1407 ok(szStatusText
== NULL
, "Expected szStatusText to be NULL\n");
1409 case BINDSTATUS_ENDSYNCOPERATION
:
1410 CHECK_EXPECT(Obj_OnProgress_ENDSYNCOPERATION
);
1411 if(iface
!= &objbsc
)
1412 ok(0, "unexpected call\n");
1413 ok(szStatusText
== NULL
, "Expected szStatusText to be NULL\n");
1415 case BINDSTATUS_PROXYDETECTING
:
1416 trace("BINDSTATUS_PROXYDETECTING\n");
1418 case BINDSTATUS_COOKIE_SENT
:
1419 trace("BINDSTATUS_COOKIE_SENT\n");
1422 ok(0, "unexpected code %d\n", ulStatusCode
);
1425 if(current_binding
) {
1426 IWinInetHttpInfo
*http_info
;
1429 hres
= IBinding_QueryInterface(current_binding
, &IID_IWinInetHttpInfo
, (void**)&http_info
);
1430 if(!emulate_protocol
&& test_protocol
!= FILE_TEST
&& is_urlmon_protocol(test_protocol
))
1431 ok(hres
== S_OK
, "Could not get IWinInetHttpInfo iface: %08x\n", hres
);
1433 ok(hres
== E_NOINTERFACE
,
1434 "QueryInterface(IID_IWinInetHttpInfo) returned: %08x, expected E_NOINTERFACE\n", hres
);
1436 IWinInetHttpInfo_Release(http_info
);
1442 static HRESULT WINAPI
statusclb_OnStopBinding(IBindStatusCallbackEx
*iface
, HRESULT hresult
, LPCWSTR szError
)
1444 if(iface
== &objbsc
) {
1445 CHECK_EXPECT(Obj_OnStopBinding
);
1446 stopped_obj_binding
= TRUE
;
1448 CHECK_EXPECT(OnStopBinding
);
1449 stopped_binding
= TRUE
;
1452 ok(GetCurrentThreadId() == thread_id
, "wrong thread %d\n", GetCurrentThreadId());
1454 /* ignore DNS failure */
1455 if (hresult
== HRESULT_FROM_WIN32(ERROR_INTERNET_NAME_NOT_RESOLVED
))
1459 ok(SUCCEEDED(hresult
), "binding failed: %08x\n", hresult
);
1461 ok(hresult
== binding_hres
, "binding failed: %08x, expected %08x\n", hresult
, binding_hres
);
1462 ok(szError
== NULL
, "szError should be NULL\n");
1464 if((test_protocol
== HTTP_TEST
|| test_protocol
== HTTPS_TEST
) && emulate_protocol
) {
1465 SetEvent(complete_event
);
1466 if(iface
!= &objbsc
)
1467 WaitForSingleObject(complete_event2
, INFINITE
);
1473 static HRESULT WINAPI
statusclb_GetBindInfo(IBindStatusCallbackEx
*iface
, DWORD
*grfBINDF
, BINDINFO
*pbindinfo
)
1477 if(iface
== &objbsc
)
1478 CHECK_EXPECT(Obj_GetBindInfo
);
1480 CHECK_EXPECT(GetBindInfo
);
1482 ok(GetCurrentThreadId() == thread_id
, "wrong thread %d\n", GetCurrentThreadId());
1485 cbSize
= pbindinfo
->cbSize
;
1486 memset(pbindinfo
, 0, cbSize
);
1487 pbindinfo
->cbSize
= cbSize
;
1492 static HRESULT WINAPI
statusclb_OnDataAvailable(IBindStatusCallbackEx
*iface
, DWORD grfBSCF
,
1493 DWORD dwSize
, FORMATETC
* pformatetc
, STGMEDIUM
* pstgmed
)
1500 if(iface
== &objbsc
)
1501 ok(0, "unexpected call\n");
1503 CHECK_EXPECT2(OnDataAvailable
);
1505 ok(GetCurrentThreadId() == thread_id
, "wrong thread %d\n", GetCurrentThreadId());
1507 ok(download_state
== DOWNLOADING
|| download_state
== END_DOWNLOAD
,
1508 "Download state was %d, expected DOWNLOADING or END_DOWNLOAD\n",
1510 data_available
= TRUE
;
1512 ok(pformatetc
!= NULL
, "pformatetx == NULL\n");
1516 ok(GetClipboardFormatName(pformatetc
->cfFormat
, clipfmt
, sizeof(clipfmt
)-1),
1517 "GetClipboardFormatName failed, error %d\n", GetLastError());
1518 ok(!lstrcmp(clipfmt
, mime_type
), "clipformat %x != mime_type, \"%s\" != \"%s\"\n",
1519 pformatetc
->cfFormat
, clipfmt
, mime_type
);
1521 ok(pformatetc
->cfFormat
== 0, "clipformat=%x\n", pformatetc
->cfFormat
);
1523 ok(pformatetc
->ptd
== NULL
, "ptd = %p\n", pformatetc
->ptd
);
1524 ok(pformatetc
->dwAspect
== 1, "dwAspect=%u\n", pformatetc
->dwAspect
);
1525 ok(pformatetc
->lindex
== -1, "lindex=%d\n", pformatetc
->lindex
);
1526 ok(pformatetc
->tymed
== tymed
, "tymed=%u, expected %u\n", pformatetc
->tymed
, tymed
);
1529 ok(pstgmed
!= NULL
, "stgmeg == NULL\n");
1530 ok(pstgmed
->tymed
== tymed
, "tymed=%u, expected %u\n", pstgmed
->tymed
, tymed
);
1531 ok(pstgmed
->pUnkForRelease
!= NULL
, "pUnkForRelease == NULL\n");
1533 switch(pstgmed
->tymed
) {
1535 if(grfBSCF
& BSCF_FIRSTDATANOTIFICATION
) {
1536 hres
= IStream_Write(U(*pstgmed
).pstm
, buf
, 10, NULL
);
1537 ok(hres
== STG_E_ACCESSDENIED
,
1538 "Write failed: %08x, expected STG_E_ACCESSDENIED\n", hres
);
1540 hres
= IStream_Commit(U(*pstgmed
).pstm
, 0);
1541 ok(hres
== E_NOTIMPL
, "Commit failed: %08x, expected E_NOTIMPL\n", hres
);
1543 hres
= IStream_Revert(U(*pstgmed
).pstm
);
1544 ok(hres
== E_NOTIMPL
, "Revert failed: %08x, expected E_NOTIMPL\n", hres
);
1547 ok(U(*pstgmed
).pstm
!= NULL
, "U(*pstgmed).pstm == NULL\n");
1550 hres
= IStream_Read(U(*pstgmed
).pstm
, buf
, 512, &readed
);
1551 if(test_protocol
== HTTP_TEST
&& emulate_protocol
&& readed
)
1552 ok(buf
[0] == (use_cache_file
&& !(bindf
&BINDF_ASYNCHRONOUS
) ? 'X' : '?'), "buf[0] = '%c'\n", buf
[0]);
1553 }while(hres
== S_OK
);
1554 ok(hres
== S_FALSE
|| hres
== E_PENDING
, "IStream_Read returned %08x\n", hres
);
1559 if(test_protocol
== FILE_TEST
)
1560 ok(!lstrcmpW(pstgmed
->u
.lpszFileName
, INDEX_HTML
+7),
1561 "unexpected file name %s\n", wine_dbgstr_w(pstgmed
->u
.lpszFileName
));
1562 else if(emulate_protocol
)
1563 ok(!lstrcmpW(pstgmed
->u
.lpszFileName
, cache_fileW
),
1564 "unexpected file name %s\n", wine_dbgstr_w(pstgmed
->u
.lpszFileName
));
1566 ok(pstgmed
->u
.lpszFileName
!= NULL
, "lpszFileName == NULL\n");
1569 if((test_protocol
== HTTP_TEST
|| test_protocol
== HTTPS_TEST
)
1570 && emulate_protocol
&& prot_state
< 4 && (!bind_to_object
|| prot_state
> 1))
1571 SetEvent(complete_event
);
1576 static HRESULT WINAPI
statusclb_OnObjectAvailable(IBindStatusCallbackEx
*iface
, REFIID riid
, IUnknown
*punk
)
1578 CHECK_EXPECT(OnObjectAvailable
);
1580 if(iface
!= &objbsc
)
1581 ok(0, "unexpected call\n");
1583 ok(IsEqualGUID(&IID_IUnknown
, riid
), "riid = %s\n", debugstr_guid(riid
));
1584 ok(punk
!= NULL
, "punk == NULL\n");
1589 static HRESULT WINAPI
statusclb_GetBindInfoEx(IBindStatusCallbackEx
*iface
, DWORD
*grfBINDF
, BINDINFO
*pbindinfo
,
1590 DWORD
*grfBINDF2
, DWORD
*pdwReserved
)
1592 CHECK_EXPECT(GetBindInfoEx
);
1594 ok(grfBINDF
!= NULL
, "grfBINDF == NULL\n");
1595 ok(grfBINDF2
!= NULL
, "grfBINDF2 == NULL\n");
1596 ok(pbindinfo
!= NULL
, "pbindinfo == NULL\n");
1597 ok(pdwReserved
!= NULL
, "dwReserved == NULL\n");
1602 static const IBindStatusCallbackExVtbl BindStatusCallbackVtbl
= {
1603 statusclb_QueryInterface
,
1606 statusclb_OnStartBinding
,
1607 statusclb_GetPriority
,
1608 statusclb_OnLowResource
,
1609 statusclb_OnProgress
,
1610 statusclb_OnStopBinding
,
1611 statusclb_GetBindInfo
,
1612 statusclb_OnDataAvailable
,
1613 statusclb_OnObjectAvailable
,
1614 statusclb_GetBindInfoEx
1617 static IBindStatusCallbackEx bsc
= { &BindStatusCallbackVtbl
};
1618 static IBindStatusCallbackEx objbsc
= { &BindStatusCallbackVtbl
};
1620 static HRESULT WINAPI
MonikerProp_QueryInterface(IMonikerProp
*iface
, REFIID riid
, void **ppv
)
1623 ok(0, "unexpected riid %s\n", debugstr_guid(riid
));
1624 return E_NOINTERFACE
;
1627 static ULONG WINAPI
MonikerProp_AddRef(IMonikerProp
*iface
)
1632 static ULONG WINAPI
MonikerProp_Release(IMonikerProp
*iface
)
1637 static HRESULT WINAPI
MonikerProp_PutProperty(IMonikerProp
*iface
, MONIKERPROPERTY mkp
, LPCWSTR val
)
1641 CHECK_EXPECT(PutProperty_MIMETYPEPROP
);
1642 ok(!lstrcmpW(val
, wszTextHtml
), "val = %s\n", wine_dbgstr_w(val
));
1645 CHECK_EXPECT(PutProperty_CLASSIDPROP
);
1654 static const IMonikerPropVtbl MonikerPropVtbl
= {
1655 MonikerProp_QueryInterface
,
1657 MonikerProp_Release
,
1658 MonikerProp_PutProperty
1661 static IMonikerProp MonikerProp
= { &MonikerPropVtbl
};
1663 static HRESULT WINAPI
PersistMoniker_QueryInterface(IPersistMoniker
*iface
, REFIID riid
, void **ppv
)
1667 if(IsEqualGUID(&IID_IUnknown
, riid
) || IsEqualGUID(&IID_IPersistMoniker
, riid
))
1669 else if(IsEqualGUID(&IID_IMonikerProp
, riid
))
1670 *ppv
= &MonikerProp
;
1675 ok(0, "unexpected riid %s\n", debugstr_guid(riid
));
1676 return E_NOINTERFACE
;
1679 static ULONG WINAPI
PersistMoniker_AddRef(IPersistMoniker
*iface
)
1684 static ULONG WINAPI
PersistMoniker_Release(IPersistMoniker
*iface
)
1689 static HRESULT WINAPI
PersistMoniker_GetClassID(IPersistMoniker
*iface
, CLSID
*pClassID
)
1691 ok(0, "unexpected call\n");
1695 static HRESULT WINAPI
PersistMoniker_IsDirty(IPersistMoniker
*iface
)
1697 ok(0, "unexpected call\n");
1701 static HRESULT WINAPI
PersistMoniker_Load(IPersistMoniker
*iface
, BOOL fFullyAvailable
,
1702 IMoniker
*pimkName
, LPBC pibc
, DWORD grfMode
)
1707 static WCHAR cbinding_contextW
[] =
1708 {'C','B','i','n','d','i','n','g',' ','C','o','n','t','e','x','t',0};
1711 ok(GetCurrentThreadId() == thread_id
, "wrong thread %d\n", GetCurrentThreadId());
1713 if(test_protocol
== HTTP_TEST
|| test_protocol
== HTTPS_TEST
)
1714 ok(!fFullyAvailable
, "fFulyAvailable = %x\n", fFullyAvailable
);
1716 ok(fFullyAvailable
, "fFulyAvailable = %x\n", fFullyAvailable
);
1717 ok(pimkName
!= NULL
, "pimkName == NULL\n");
1718 ok(pibc
!= NULL
, "pibc == NULL\n");
1719 ok(grfMode
== 0x12, "grfMode = %x\n", grfMode
);
1721 hres
= IBindCtx_GetObjectParam(pibc
, cbinding_contextW
, &unk
);
1722 ok(hres
== S_OK
, "GetObjectParam(CBinding Context) failed: %08x\n", hres
);
1723 if(SUCCEEDED(hres
)) {
1726 hres
= IUnknown_QueryInterface(unk
, &IID_IBinding
, (void**)&binding
);
1727 ok(hres
== S_OK
, "Could not get IBinding: %08x\n", hres
);
1729 IBinding_Release(binding
);
1730 IUnknown_Release(unk
);
1733 SET_EXPECT(QueryInterface_IServiceProvider
);
1734 hres
= RegisterBindStatusCallback(pibc
, (IBindStatusCallback
*)&bsc
, NULL
, 0);
1735 ok(hres
== S_OK
, "RegisterBindStatusCallback failed: %08x\n", hres
);
1736 CHECK_CALLED(QueryInterface_IServiceProvider
);
1738 SET_EXPECT(QueryInterface_IBindStatusCallbackEx
);
1739 SET_EXPECT(GetBindInfo
);
1740 SET_EXPECT(OnStartBinding
);
1742 SET_EXPECT(OnProgress_REDIRECTING
);
1743 SET_EXPECT(OnProgress_BEGINDOWNLOADDATA
);
1744 if(test_protocol
== FILE_TEST
)
1745 SET_EXPECT(OnProgress_CACHEFILENAMEAVAILABLE
);
1746 if(test_protocol
!= HTTP_TEST
&& test_protocol
!= HTTPS_TEST
)
1747 SET_EXPECT(OnProgress_ENDDOWNLOADDATA
);
1748 SET_EXPECT(LockRequest
);
1749 SET_EXPECT(OnDataAvailable
);
1750 if(test_protocol
!= HTTP_TEST
&& test_protocol
!= HTTPS_TEST
)
1751 SET_EXPECT(OnStopBinding
);
1753 hres
= IMoniker_BindToStorage(pimkName
, pibc
, NULL
, &IID_IStream
, (void**)&unk
);
1754 ok(hres
== S_OK
, "Load failed: %08x\n", hres
);
1756 CLEAR_CALLED(QueryInterface_IBindStatusCallbackEx
); /* IE 8 */
1757 CHECK_CALLED(GetBindInfo
);
1758 CHECK_CALLED(OnStartBinding
);
1760 CHECK_CALLED(OnProgress_REDIRECTING
);
1761 CHECK_CALLED(OnProgress_BEGINDOWNLOADDATA
);
1762 if(test_protocol
== FILE_TEST
)
1763 CHECK_CALLED(OnProgress_CACHEFILENAMEAVAILABLE
);
1764 if(test_protocol
!= HTTP_TEST
&& test_protocol
!= HTTPS_TEST
)
1765 CHECK_CALLED(OnProgress_ENDDOWNLOADDATA
);
1766 CHECK_CALLED(LockRequest
);
1767 CHECK_CALLED(OnDataAvailable
);
1768 if(test_protocol
!= HTTP_TEST
&& test_protocol
!= HTTPS_TEST
)
1769 CHECK_CALLED(OnStopBinding
);
1772 IUnknown_Release(unk
);
1777 static HRESULT WINAPI
PersistMoniker_Save(IPersistMoniker
*iface
, IMoniker
*pimkName
, LPBC pbc
, BOOL fRemember
)
1779 ok(0, "unexpected call\n");
1783 static HRESULT WINAPI
PersistMoniker_SaveCompleted(IPersistMoniker
*iface
, IMoniker
*pimkName
, LPBC pibc
)
1785 ok(0, "unexpected call\n");
1789 static HRESULT WINAPI
PersistMoniker_GetCurMoniker(IPersistMoniker
*iface
, IMoniker
**pimkName
)
1791 ok(0, "unexpected call\n");
1795 static const IPersistMonikerVtbl PersistMonikerVtbl
= {
1796 PersistMoniker_QueryInterface
,
1797 PersistMoniker_AddRef
,
1798 PersistMoniker_Release
,
1799 PersistMoniker_GetClassID
,
1800 PersistMoniker_IsDirty
,
1801 PersistMoniker_Load
,
1802 PersistMoniker_Save
,
1803 PersistMoniker_SaveCompleted
,
1804 PersistMoniker_GetCurMoniker
1807 static IPersistMoniker PersistMoniker
= { &PersistMonikerVtbl
};
1809 static HRESULT WINAPI
ClassFactory_QueryInterface(IClassFactory
*iface
, REFIID riid
, void **ppv
)
1813 if(IsEqualGUID(&IID_IUnknown
, riid
) || IsEqualGUID(&IID_IClassFactory
, riid
)) {
1818 if(IsEqualGUID(&IID_IMarshal
, riid
))
1819 return E_NOINTERFACE
;
1820 if(IsEqualGUID(&CLSID_IdentityUnmarshal
, riid
))
1821 return E_NOINTERFACE
;
1823 ok(0, "unexpected riid %s\n", debugstr_guid(riid
));
1827 static ULONG WINAPI
ClassFactory_AddRef(IClassFactory
*iface
)
1832 static ULONG WINAPI
ClassFactory_Release(IClassFactory
*iface
)
1837 static HRESULT WINAPI
ClassFactory_CreateInstance(IClassFactory
*iface
, IUnknown
*outer
, REFIID riid
, void **ppv
)
1839 CHECK_EXPECT(CreateInstance
);
1840 ok(!outer
, "outer = %p\n", outer
);
1841 ok(IsEqualGUID(&IID_IUnknown
, riid
), "unexpected riid %s\n", debugstr_guid(riid
));
1842 *ppv
= &PersistMoniker
;
1846 static HRESULT WINAPI
ClassFactory_LockServer(IClassFactory
*iface
, BOOL dolock
)
1848 ok(0, "unexpected call\n");
1852 static const IClassFactoryVtbl ClassFactoryVtbl
= {
1853 ClassFactory_QueryInterface
,
1854 ClassFactory_AddRef
,
1855 ClassFactory_Release
,
1856 ClassFactory_CreateInstance
,
1857 ClassFactory_LockServer
1860 static IClassFactory mime_cf
= { &ClassFactoryVtbl
};
1862 static void test_CreateAsyncBindCtx(void)
1864 IBindCtx
*bctx
= (IBindCtx
*)0x0ff00ff0;
1870 hres
= CreateAsyncBindCtx(0, NULL
, NULL
, &bctx
);
1871 ok(hres
== E_INVALIDARG
, "CreateAsyncBindCtx failed. expected: E_INVALIDARG, got: %08x\n", hres
);
1872 ok(bctx
== (IBindCtx
*)0x0ff00ff0, "bctx should not be changed\n");
1874 hres
= CreateAsyncBindCtx(0, NULL
, NULL
, NULL
);
1875 ok(hres
== E_INVALIDARG
, "CreateAsyncBindCtx failed. expected: E_INVALIDARG, got: %08x\n", hres
);
1877 SET_EXPECT(QueryInterface_IServiceProvider
);
1878 hres
= CreateAsyncBindCtx(0, (IBindStatusCallback
*)&bsc
, NULL
, &bctx
);
1879 ok(hres
== S_OK
, "CreateAsyncBindCtx failed: %08x\n", hres
);
1880 CHECK_CALLED(QueryInterface_IServiceProvider
);
1882 bindopts
.cbStruct
= sizeof(bindopts
);
1883 hres
= IBindCtx_GetBindOptions(bctx
, &bindopts
);
1884 ok(SUCCEEDED(hres
), "IBindCtx_GetBindOptions failed: %08x\n", hres
);
1885 ok(bindopts
.grfFlags
== BIND_MAYBOTHERUSER
,
1886 "bindopts.grfFlags = %08x, expected: BIND_MAYBOTHERUSER\n", bindopts
.grfFlags
);
1887 ok(bindopts
.grfMode
== (STGM_READWRITE
| STGM_SHARE_EXCLUSIVE
),
1888 "bindopts.grfMode = %08x, expected: STGM_READWRITE | STGM_SHARE_EXCLUSIVE\n",
1890 ok(bindopts
.dwTickCountDeadline
== 0,
1891 "bindopts.dwTickCountDeadline = %08x, expected: 0\n", bindopts
.dwTickCountDeadline
);
1893 hres
= IBindCtx_QueryInterface(bctx
, &IID_IAsyncBindCtx
, (void**)&unk
);
1894 ok(hres
== E_NOINTERFACE
, "QueryInterface(IID_IAsyncBindCtx) failed: %08x, expected E_NOINTERFACE\n", hres
);
1896 IUnknown_Release(unk
);
1898 ref
= IBindCtx_Release(bctx
);
1899 ok(ref
== 0, "bctx should be destroyed here\n");
1902 static void test_CreateAsyncBindCtxEx(void)
1904 IBindCtx
*bctx
= NULL
, *bctx2
= NULL
, *bctx_arg
= NULL
;
1909 static WCHAR testW
[] = {'t','e','s','t',0};
1911 if (!pCreateAsyncBindCtxEx
) {
1912 win_skip("CreateAsyncBindCtxEx not present\n");
1916 hres
= pCreateAsyncBindCtxEx(NULL
, 0, NULL
, NULL
, NULL
, 0);
1917 ok(hres
== E_INVALIDARG
, "CreateAsyncBindCtx failed: %08x, expected E_INVALIDARG\n", hres
);
1919 hres
= pCreateAsyncBindCtxEx(NULL
, 0, NULL
, NULL
, &bctx
, 0);
1920 ok(hres
== S_OK
, "CreateAsyncBindCtxEx failed: %08x\n", hres
);
1922 if(SUCCEEDED(hres
)) {
1923 bindopts
.cbStruct
= sizeof(bindopts
);
1924 hres
= IBindCtx_GetBindOptions(bctx
, &bindopts
);
1925 ok(SUCCEEDED(hres
), "IBindCtx_GetBindOptions failed: %08x\n", hres
);
1926 ok(bindopts
.grfFlags
== BIND_MAYBOTHERUSER
,
1927 "bindopts.grfFlags = %08x, expected: BIND_MAYBOTHERUSER\n", bindopts
.grfFlags
);
1928 ok(bindopts
.grfMode
== (STGM_READWRITE
| STGM_SHARE_EXCLUSIVE
),
1929 "bindopts.grfMode = %08x, expected: STGM_READWRITE | STGM_SHARE_EXCLUSIVE\n",
1931 ok(bindopts
.dwTickCountDeadline
== 0,
1932 "bindopts.dwTickCountDeadline = %08x, expected: 0\n", bindopts
.dwTickCountDeadline
);
1934 IBindCtx_Release(bctx
);
1937 CreateBindCtx(0, &bctx_arg
);
1938 hres
= pCreateAsyncBindCtxEx(NULL
, 0, NULL
, NULL
, &bctx
, 0);
1939 ok(hres
== S_OK
, "CreateAsyncBindCtxEx failed: %08x\n", hres
);
1941 if(SUCCEEDED(hres
)) {
1942 bindopts
.cbStruct
= sizeof(bindopts
);
1943 hres
= IBindCtx_GetBindOptions(bctx
, &bindopts
);
1944 ok(SUCCEEDED(hres
), "IBindCtx_GetBindOptions failed: %08x\n", hres
);
1945 ok(bindopts
.grfFlags
== BIND_MAYBOTHERUSER
,
1946 "bindopts.grfFlags = %08x, expected: BIND_MAYBOTHERUSER\n", bindopts
.grfFlags
);
1947 ok(bindopts
.grfMode
== (STGM_READWRITE
| STGM_SHARE_EXCLUSIVE
),
1948 "bindopts.grfMode = %08x, expected: STGM_READWRITE | STGM_SHARE_EXCLUSIVE\n",
1950 ok(bindopts
.dwTickCountDeadline
== 0,
1951 "bindopts.dwTickCountDeadline = %08x, expected: 0\n", bindopts
.dwTickCountDeadline
);
1953 IBindCtx_Release(bctx
);
1956 IBindCtx_Release(bctx_arg
);
1958 SET_EXPECT(QueryInterface_IServiceProvider
);
1959 hres
= pCreateAsyncBindCtxEx(NULL
, 0, (IBindStatusCallback
*)&bsc
, NULL
, &bctx
, 0);
1960 ok(hres
== S_OK
, "CreateAsyncBindCtxEx failed: %08x\n", hres
);
1961 CHECK_CALLED(QueryInterface_IServiceProvider
);
1963 hres
= IBindCtx_QueryInterface(bctx
, &IID_IAsyncBindCtx
, (void**)&unk
);
1964 ok(hres
== S_OK
, "QueryInterface(IID_IAsyncBindCtx) failed: %08x\n", hres
);
1966 IUnknown_Release(unk
);
1968 IBindCtx_Release(bctx
);
1970 hres
= CreateBindCtx(0, &bctx2
);
1971 ok(hres
== S_OK
, "CreateBindCtx failed: %08x\n", hres
);
1973 hres
= pCreateAsyncBindCtxEx(bctx2
, 0, NULL
, NULL
, &bctx
, 0);
1974 ok(hres
== S_OK
, "CreateAsyncBindCtxEx failed: %08x\n", hres
);
1976 hres
= IBindCtx_RegisterObjectParam(bctx2
, testW
, (IUnknown
*)&Protocol
);
1977 ok(hres
== S_OK
, "RegisterObjectParam failed: %08x\n", hres
);
1979 hres
= IBindCtx_GetObjectParam(bctx
, testW
, &unk
);
1980 ok(hres
== S_OK
, "GetObjectParam failed: %08x\n", hres
);
1981 ok(unk
== (IUnknown
*)&Protocol
, "unexpected unk %p\n", unk
);
1983 IBindCtx_Release(bctx
);
1984 IBindCtx_Release(bctx2
);
1987 static void test_GetBindInfoEx(IBindStatusCallback
*holder
)
1989 IBindStatusCallbackEx
*bscex
;
1990 BINDINFO bindinfo
= {sizeof(bindinfo
)};
1991 DWORD bindf
, bindf2
, dw
;
1994 hres
= IBindStatusCallback_QueryInterface(holder
, &IID_IBindStatusCallbackEx
, (void**)&bscex
);
1996 win_skip("IBindStatusCallbackEx not supported\n");
2003 SET_EXPECT(QueryInterface_IBindStatusCallbackEx
);
2004 SET_EXPECT(GetBindInfoEx
);
2005 hres
= IBindStatusCallback_GetBindInfo(holder
, &bindf
, &bindinfo
);
2006 ok(hres
== S_OK
, "GetBindInfo failed: %08x\n", hres
);
2007 CHECK_CALLED(QueryInterface_IBindStatusCallbackEx
);
2008 CHECK_CALLED(GetBindInfoEx
);
2010 bindf
= bindf2
= dw
= 0;
2011 SET_EXPECT(QueryInterface_IBindStatusCallbackEx
);
2012 SET_EXPECT(GetBindInfoEx
);
2013 hres
= IBindStatusCallbackEx_GetBindInfoEx(bscex
, &bindf
, &bindinfo
, &bindf2
, &dw
);
2014 ok(hres
== S_OK
, "GetBindInfo failed: %08x\n", hres
);
2015 CHECK_CALLED(QueryInterface_IBindStatusCallbackEx
);
2016 CHECK_CALLED(GetBindInfoEx
);
2020 bindf
= bindf2
= dw
= 0xdeadbeef;
2021 SET_EXPECT(QueryInterface_IBindStatusCallbackEx
);
2022 SET_EXPECT(GetBindInfo
);
2023 hres
= IBindStatusCallbackEx_GetBindInfoEx(bscex
, &bindf
, &bindinfo
, &bindf2
, &dw
);
2024 ok(hres
== S_OK
, "GetBindInfo failed: %08x\n", hres
);
2025 CHECK_CALLED(QueryInterface_IBindStatusCallbackEx
);
2026 CHECK_CALLED(GetBindInfo
);
2027 ok(bindf2
== 0xdeadbeef, "bindf2 = %x\n", bindf2
);
2028 ok(dw
== 0xdeadbeef, "dw = %x\n", dw
);
2030 IBindStatusCallbackEx_Release(bscex
);
2033 static BOOL
test_bscholder(IBindStatusCallback
*holder
)
2035 IServiceProvider
*serv_prov
;
2036 IHttpNegotiate
*http_negotiate
, *http_negotiate_serv
;
2037 IHttpNegotiate2
*http_negotiate2
, *http_negotiate2_serv
;
2038 IAuthenticate
*authenticate
, *authenticate_serv
;
2039 IInternetProtocol
*protocol
;
2040 BINDINFO bindinfo
= {sizeof(bindinfo
)};
2046 hres
= IBindStatusCallback_QueryInterface(holder
, &IID_IServiceProvider
, (void**)&serv_prov
);
2047 ok(hres
== S_OK
, "Could not get IServiceProvider interface: %08x\n", hres
);
2050 SET_EXPECT(QueryInterface_IBindStatusCallbackEx
);
2051 SET_EXPECT(GetBindInfo
);
2052 hres
= IBindStatusCallback_GetBindInfo(holder
, &dw
, &bindinfo
);
2053 ok(hres
== S_OK
, "GetBindInfo failed: %08x\n", hres
);
2054 CLEAR_CALLED(QueryInterface_IBindStatusCallbackEx
); /* IE 8 */
2055 CHECK_CALLED(GetBindInfo
);
2057 test_GetBindInfoEx(holder
);
2059 SET_EXPECT(OnStartBinding
);
2060 hres
= IBindStatusCallback_OnStartBinding(holder
, 0, (void*)0xdeadbeef);
2061 ok(hres
== S_OK
, "OnStartBinding failed: %08x\n", hres
);
2062 CHECK_CALLED(OnStartBinding
);
2064 hres
= IBindStatusCallback_QueryInterface(holder
, &IID_IHttpNegotiate
, (void**)&http_negotiate
);
2065 ok(hres
== S_OK
, "Could not get IHttpNegotiate interface: %08x\n", hres
);
2067 SET_EXPECT(QueryInterface_IHttpNegotiate
);
2068 hres
= IServiceProvider_QueryService(serv_prov
, &IID_IHttpNegotiate
, &IID_IHttpNegotiate
,
2069 (void**)&http_negotiate_serv
);
2070 ok(hres
== S_OK
, "Could not get IHttpNegotiate service: %08x\n", hres
);
2071 CLEAR_CALLED(QueryInterface_IHttpNegotiate
); /* IE <8 */
2073 ok(http_negotiate
== http_negotiate_serv
, "http_negotiate != http_negotiate_serv\n");
2075 wstr
= (void*)0xdeadbeef;
2076 SET_EXPECT(QueryInterface_IHttpNegotiate
);
2077 SET_EXPECT(BeginningTransaction
);
2078 hres
= IHttpNegotiate_BeginningTransaction(http_negotiate_serv
, urls
[test_protocol
], emptyW
, 0, &wstr
);
2079 CHECK_CALLED_BROKEN(QueryInterface_IHttpNegotiate
); /* IE8 */
2080 CHECK_CALLED(BeginningTransaction
);
2081 ok(hres
== S_OK
, "BeginningTransaction failed: %08x\n", hres
);
2082 ok(wstr
== NULL
, "wstr = %p\n", wstr
);
2084 IHttpNegotiate_Release(http_negotiate_serv
);
2086 hres
= IServiceProvider_QueryService(serv_prov
, &IID_IHttpNegotiate
, &IID_IHttpNegotiate
,
2087 (void**)&http_negotiate_serv
);
2088 ok(hres
== S_OK
, "Could not get IHttpNegotiate service: %08x\n", hres
);
2089 ok(http_negotiate
== http_negotiate_serv
, "http_negotiate != http_negotiate_serv\n");
2090 IHttpNegotiate_Release(http_negotiate_serv
);
2092 hres
= IBindStatusCallback_QueryInterface(holder
, &IID_IHttpNegotiate2
, (void**)&http_negotiate2
);
2093 if(SUCCEEDED(hres
)) {
2094 have_IHttpNegotiate2
= TRUE
;
2096 SET_EXPECT(QueryInterface_IHttpNegotiate2
);
2097 hres
= IServiceProvider_QueryService(serv_prov
, &IID_IHttpNegotiate2
, &IID_IHttpNegotiate2
,
2098 (void**)&http_negotiate2_serv
);
2099 ok(hres
== S_OK
, "Could not get IHttpNegotiate2 service: %08x\n", hres
);
2100 CLEAR_CALLED(QueryInterface_IHttpNegotiate2
); /* IE <8 */
2101 ok(http_negotiate2
== http_negotiate2_serv
, "http_negotiate != http_negotiate_serv\n");
2103 SET_EXPECT(QueryInterface_IHttpNegotiate2
);
2104 SET_EXPECT(GetRootSecurityId
);
2105 hres
= IHttpNegotiate2_GetRootSecurityId(http_negotiate2
, (void*)0xdeadbeef, (void*)0xdeadbeef, 0);
2106 ok(hres
== E_NOTIMPL
, "GetRootSecurityId failed: %08x\n", hres
);
2107 CHECK_CALLED_BROKEN(QueryInterface_IHttpNegotiate2
); /* IE8 */
2108 CHECK_CALLED(GetRootSecurityId
);
2110 IHttpNegotiate_Release(http_negotiate2_serv
);
2111 IHttpNegotiate_Release(http_negotiate2
);
2113 skip("Could not get IHttpNegotiate2\n");
2117 SET_EXPECT(OnProgress_FINDINGRESOURCE
);
2118 hres
= IBindStatusCallback_OnProgress(holder
, 0, 0, BINDSTATUS_FINDINGRESOURCE
, NULL
);
2119 ok(hres
== S_OK
, "OnProgress failed: %08x\n", hres
);
2120 CHECK_CALLED(OnProgress_FINDINGRESOURCE
);
2122 SET_EXPECT(QueryInterface_IHttpNegotiate
);
2123 SET_EXPECT(OnResponse
);
2124 wstr
= (void*)0xdeadbeef;
2125 hres
= IHttpNegotiate_OnResponse(http_negotiate
, 200, emptyW
, NULL
, NULL
);
2126 ok(hres
== S_OK
, "OnResponse failed: %08x\n", hres
);
2127 CHECK_CALLED_BROKEN(QueryInterface_IHttpNegotiate
); /* IE8 */
2128 CHECK_CALLED(OnResponse
);
2130 IHttpNegotiate_Release(http_negotiate
);
2132 hres
= IBindStatusCallback_QueryInterface(holder
, &IID_IAuthenticate
, (void**)&authenticate
);
2133 ok(hres
== S_OK
, "Could not get IAuthenticate interface: %08x\n", hres
);
2135 SET_EXPECT(QueryInterface_IAuthenticate
);
2136 SET_EXPECT(QueryService_IAuthenticate
);
2137 hres
= IServiceProvider_QueryService(serv_prov
, &IID_IAuthenticate
, &IID_IAuthenticate
,
2138 (void**)&authenticate_serv
);
2139 ok(hres
== S_OK
, "Could not get IAuthenticate service: %08x\n", hres
);
2140 CLEAR_CALLED(QueryInterface_IAuthenticate
); /* IE <8 */
2141 CLEAR_CALLED(QueryService_IAuthenticate
); /* IE <8 */
2142 ok(authenticate
== authenticate_serv
, "authenticate != authenticate_serv\n");
2143 IAuthenticate_Release(authenticate_serv
);
2145 hres
= IServiceProvider_QueryService(serv_prov
, &IID_IAuthenticate
, &IID_IAuthenticate
,
2146 (void**)&authenticate_serv
);
2147 ok(hres
== S_OK
, "Could not get IAuthenticate service: %08x\n", hres
);
2148 ok(authenticate
== authenticate_serv
, "authenticate != authenticate_serv\n");
2150 IAuthenticate_Release(authenticate
);
2151 IAuthenticate_Release(authenticate_serv
);
2153 SET_EXPECT(OnStopBinding
);
2154 hres
= IBindStatusCallback_OnStopBinding(holder
, S_OK
, NULL
);
2155 ok(hres
== S_OK
, "OnStopBinding failed: %08x\n", hres
);
2156 CHECK_CALLED(OnStopBinding
);
2158 SET_EXPECT(QueryInterface_IInternetProtocol
);
2159 SET_EXPECT(QueryService_IInternetProtocol
);
2160 hres
= IServiceProvider_QueryService(serv_prov
, &IID_IInternetProtocol
, &IID_IInternetProtocol
,
2162 ok(hres
== E_NOINTERFACE
, "QueryService(IInternetProtocol) failed: %08x\n", hres
);
2163 CHECK_CALLED(QueryInterface_IInternetProtocol
);
2164 CHECK_CALLED(QueryService_IInternetProtocol
);
2166 IServiceProvider_Release(serv_prov
);
2170 static BOOL
test_RegisterBindStatusCallback(void)
2172 IBindStatusCallback
*prevbsc
, *clb
;
2178 hres
= CreateBindCtx(0, &bindctx
);
2179 ok(hres
== S_OK
, "BindCtx failed: %08x\n", hres
);
2181 SET_EXPECT(QueryInterface_IServiceProvider
);
2183 hres
= IBindCtx_RegisterObjectParam(bindctx
, BSCBHolder
, (IUnknown
*)&bsc
);
2184 ok(hres
== S_OK
, "RegisterObjectParam failed: %08x\n", hres
);
2186 SET_EXPECT(QueryInterface_IBindStatusCallback
);
2187 SET_EXPECT(QueryInterface_IBindStatusCallbackHolder
);
2188 prevbsc
= (void*)0xdeadbeef;
2189 hres
= RegisterBindStatusCallback(bindctx
, (IBindStatusCallback
*)&bsc
, &prevbsc
, 0);
2190 ok(hres
== S_OK
, "RegisterBindStatusCallback failed: %08x\n", hres
);
2191 ok(prevbsc
== (IBindStatusCallback
*)&bsc
, "prevbsc=%p\n", prevbsc
);
2192 CHECK_CALLED(QueryInterface_IBindStatusCallback
);
2193 CHECK_CALLED(QueryInterface_IBindStatusCallbackHolder
);
2195 CHECK_CALLED(QueryInterface_IServiceProvider
);
2197 hres
= IBindCtx_GetObjectParam(bindctx
, BSCBHolder
, &unk
);
2198 ok(hres
== S_OK
, "GetObjectParam failed: %08x\n", hres
);
2200 hres
= IUnknown_QueryInterface(unk
, &IID_IBindStatusCallback
, (void**)&clb
);
2201 IUnknown_Release(unk
);
2202 ok(hres
== S_OK
, "QueryInterface(IID_IBindStatusCallback) failed: %08x\n", hres
);
2203 ok(clb
!= (IBindStatusCallback
*)&bsc
, "bsc == clb\n");
2205 if(!test_bscholder(clb
))
2208 IBindStatusCallback_Release(clb
);
2210 hres
= RevokeBindStatusCallback(bindctx
, (IBindStatusCallback
*)&bsc
);
2211 ok(hres
== S_OK
, "RevokeBindStatusCallback failed: %08x\n", hres
);
2213 unk
= (void*)0xdeadbeef;
2214 hres
= IBindCtx_GetObjectParam(bindctx
, BSCBHolder
, &unk
);
2215 ok(hres
== E_FAIL
, "GetObjectParam failed: %08x\n", hres
);
2216 ok(unk
== NULL
, "unk != NULL\n");
2219 IUnknown_Release(unk
);
2221 hres
= RevokeBindStatusCallback(bindctx
, (void*)0xdeadbeef);
2222 ok(hres
== S_OK
, "RevokeBindStatusCallback failed: %08x\n", hres
);
2224 hres
= RevokeBindStatusCallback(NULL
, (void*)0xdeadbeef);
2225 ok(hres
== E_INVALIDARG
, "RevokeBindStatusCallback failed: %08x\n", hres
);
2227 hres
= RevokeBindStatusCallback(bindctx
, NULL
);
2228 ok(hres
== E_INVALIDARG
, "RevokeBindStatusCallback failed: %08x\n", hres
);
2230 IBindCtx_Release(bindctx
);
2234 #define BINDTEST_EMULATE 0x0001
2235 #define BINDTEST_TOOBJECT 0x0002
2236 #define BINDTEST_FILEDWLAPI 0x0004
2237 #define BINDTEST_HTTPRESPONSE 0x0008
2238 #define BINDTEST_REDIRECT 0x0010
2239 #define BINDTEST_USE_CACHE 0x0020
2240 #define BINDTEST_NO_CALLBACK_READ 0x0040
2242 static void init_bind_test(int protocol
, DWORD flags
, DWORD t
)
2244 test_protocol
= protocol
;
2245 emulate_protocol
= (flags
& BINDTEST_EMULATE
) != 0;
2246 download_state
= BEFORE_DOWNLOAD
;
2247 stopped_binding
= FALSE
;
2248 stopped_obj_binding
= FALSE
;
2249 data_available
= FALSE
;
2251 binding_hres
= S_OK
;
2252 bind_to_object
= (flags
& BINDTEST_TOOBJECT
) != 0;
2254 filedwl_api
= (flags
& BINDTEST_FILEDWLAPI
) != 0;
2255 if(flags
& BINDTEST_HTTPRESPONSE
)
2256 urls
[HTTP_TEST
] = SHORT_RESPONSE_URL
;
2258 urls
[HTTP_TEST
] = WINE_ABOUT_URL
;
2259 test_redirect
= (flags
& BINDTEST_REDIRECT
) != 0;
2260 use_cache_file
= (flags
& BINDTEST_USE_CACHE
) != 0;
2261 callback_read
= !(flags
& BINDTEST_NO_CALLBACK_READ
);
2264 static void test_BindToStorage(int protocol
, DWORD flags
, DWORD t
)
2268 LPOLESTR display_name
;
2271 IBindStatusCallback
*previousclb
;
2272 IUnknown
*unk
= (IUnknown
*)0x00ff00ff;
2275 init_bind_test(protocol
, flags
, t
);
2277 SET_EXPECT(QueryInterface_IServiceProvider
);
2278 hres
= CreateAsyncBindCtx(0, (IBindStatusCallback
*)&bsc
, NULL
, &bctx
);
2279 ok(hres
== S_OK
, "CreateAsyncBindCtx failed: %08x\n\n", hres
);
2280 CHECK_CALLED(QueryInterface_IServiceProvider
);
2284 SET_EXPECT(QueryInterface_IServiceProvider
);
2285 hres
= RegisterBindStatusCallback(bctx
, (IBindStatusCallback
*)&bsc
, &previousclb
, 0);
2286 ok(hres
== S_OK
, "RegisterBindStatusCallback failed: %08x\n", hres
);
2287 ok(previousclb
== (IBindStatusCallback
*)&bsc
, "previousclb(%p) != sclb(%p)\n", previousclb
, &bsc
);
2288 CHECK_CALLED(QueryInterface_IServiceProvider
);
2290 IBindStatusCallback_Release(previousclb
);
2292 hres
= CreateURLMoniker(NULL
, test_protocol
== FILE_TEST
? file_url
: urls
[test_protocol
], &mon
);
2293 ok(SUCCEEDED(hres
), "failed to create moniker: %08x\n", hres
);
2295 IBindCtx_Release(bctx
);
2299 hres
= IMoniker_QueryInterface(mon
, &IID_IBinding
, (void**)&bind
);
2300 ok(hres
== E_NOINTERFACE
, "IMoniker should not have IBinding interface\n");
2302 IBinding_Release(bind
);
2304 hres
= IMoniker_GetDisplayName(mon
, bctx
, NULL
, &display_name
);
2305 ok(hres
== S_OK
, "GetDisplayName failed %08x\n", hres
);
2306 ok(!lstrcmpW(display_name
, urls
[test_protocol
]),
2307 "GetDisplayName got wrong name %s\n", wine_dbgstr_w(display_name
));
2308 CoTaskMemFree(display_name
);
2310 if(tymed
== TYMED_FILE
&& (test_protocol
== ABOUT_TEST
|| test_protocol
== ITS_TEST
))
2311 binding_hres
= INET_E_DATA_NOT_AVAILABLE
;
2313 SET_EXPECT(QueryInterface_IBindStatusCallbackEx
);
2314 SET_EXPECT(GetBindInfo
);
2315 SET_EXPECT(QueryInterface_IInternetProtocol
);
2316 if(!emulate_protocol
)
2317 SET_EXPECT(QueryService_IInternetProtocol
);
2318 SET_EXPECT(OnStartBinding
);
2319 if(emulate_protocol
) {
2320 if(is_urlmon_protocol(test_protocol
))
2321 SET_EXPECT(SetPriority
);
2323 if(test_protocol
== HTTP_TEST
|| test_protocol
== HTTPS_TEST
)
2324 SET_EXPECT(Terminate
);
2325 if(tymed
!= TYMED_FILE
|| (test_protocol
!= ABOUT_TEST
&& test_protocol
!= ITS_TEST
))
2326 SET_EXPECT(UnlockRequest
);
2328 if(test_protocol
== HTTP_TEST
|| test_protocol
== HTTPS_TEST
) {
2329 SET_EXPECT(QueryInterface_IInternetBindInfo
);
2330 SET_EXPECT(QueryService_IInternetBindInfo
);
2331 SET_EXPECT(QueryInterface_IHttpNegotiate
);
2332 SET_EXPECT(QueryInterface_IWindowForBindingUI
);
2333 SET_EXPECT(QueryService_IWindowForBindingUI
);
2334 SET_EXPECT(BeginningTransaction
);
2335 SET_EXPECT(QueryInterface_IHttpNegotiate2
);
2336 SET_EXPECT(GetRootSecurityId
);
2337 SET_EXPECT(OnProgress_FINDINGRESOURCE
);
2338 SET_EXPECT(OnProgress_CONNECTING
);
2340 if(test_protocol
== HTTP_TEST
|| test_protocol
== HTTPS_TEST
|| test_protocol
== FTP_TEST
2341 || test_protocol
== FILE_TEST
)
2342 SET_EXPECT(OnProgress_SENDINGREQUEST
);
2343 if(test_protocol
== HTTP_TEST
|| test_protocol
== HTTPS_TEST
) {
2344 SET_EXPECT(QueryInterface_IHttpNegotiate
);
2345 SET_EXPECT(OnResponse
);
2347 SET_EXPECT(OnProgress_MIMETYPEAVAILABLE
);
2348 SET_EXPECT(OnProgress_BEGINDOWNLOADDATA
);
2349 if(test_protocol
== FILE_TEST
)
2350 SET_EXPECT(OnProgress_CACHEFILENAMEAVAILABLE
);
2351 if(test_protocol
== HTTP_TEST
|| test_protocol
== HTTPS_TEST
|| test_protocol
== FTP_TEST
)
2352 SET_EXPECT(OnProgress_DOWNLOADINGDATA
);
2353 SET_EXPECT(OnProgress_ENDDOWNLOADDATA
);
2354 if(tymed
!= TYMED_FILE
|| test_protocol
!= ABOUT_TEST
)
2355 SET_EXPECT(OnDataAvailable
);
2356 SET_EXPECT(OnStopBinding
);
2359 hres
= IMoniker_BindToStorage(mon
, bctx
, NULL
, tymed
== TYMED_ISTREAM
? &IID_IStream
: &IID_IUnknown
, (void**)&unk
);
2360 if ((test_protocol
== HTTP_TEST
|| test_protocol
== HTTPS_TEST
)
2361 && hres
== HRESULT_FROM_WIN32(ERROR_INTERNET_NAME_NOT_RESOLVED
))
2363 skip("Network unreachable, skipping tests\n");
2367 if(!(bindf
& BINDF_ASYNCHRONOUS
) && tymed
== TYMED_FILE
) {
2368 ok(hres
== S_OK
, "IMoniker_BindToStorage failed: %08x\n", hres
);
2369 ok(unk
== NULL
, "unk != NULL\n");
2370 }else if(((bindf
& BINDF_ASYNCHRONOUS
) && !data_available
)
2371 || (tymed
== TYMED_FILE
&& test_protocol
== FILE_TEST
)) {
2372 ok(hres
== MK_S_ASYNCHRONOUS
, "IMoniker_BindToStorage failed: %08x\n", hres
);
2373 ok(unk
== NULL
, "istr should be NULL\n");
2374 }else if(tymed
== TYMED_FILE
&& test_protocol
== ABOUT_TEST
) {
2375 ok(hres
== INET_E_DATA_NOT_AVAILABLE
,
2376 "IMoniker_BindToStorage failed: %08x, expected INET_E_DATA_NOT_AVAILABLE\n", hres
);
2377 ok(unk
== NULL
, "istr should be NULL\n");
2379 ok(hres
== S_OK
, "IMoniker_BindToStorage failed: %08x\n", hres
);
2380 ok(unk
!= NULL
, "unk == NULL\n");
2382 if(unk
&& callback_read
)
2383 IUnknown_Release(unk
);
2388 while((bindf
& BINDF_ASYNCHRONOUS
) &&
2389 !stopped_binding
&& GetMessage(&msg
,NULL
,0,0)) {
2390 TranslateMessage(&msg
);
2391 DispatchMessage(&msg
);
2394 CLEAR_CALLED(QueryInterface_IBindStatusCallbackEx
); /* IE 8 */
2395 CHECK_CALLED(GetBindInfo
);
2396 CHECK_CALLED(QueryInterface_IInternetProtocol
);
2397 if(!emulate_protocol
)
2398 CHECK_CALLED(QueryService_IInternetProtocol
);
2399 CHECK_CALLED(OnStartBinding
);
2400 if(emulate_protocol
) {
2401 if(is_urlmon_protocol(test_protocol
))
2402 CHECK_CALLED(SetPriority
);
2403 CHECK_CALLED(Start
);
2404 if(test_protocol
== HTTP_TEST
|| test_protocol
== HTTPS_TEST
) {
2405 if(tymed
== TYMED_FILE
)
2407 CHECK_CALLED(Terminate
);
2409 if(tymed
!= TYMED_FILE
|| (test_protocol
!= ABOUT_TEST
&& test_protocol
!= ITS_TEST
))
2410 CHECK_CALLED(UnlockRequest
);
2412 if(test_protocol
== HTTP_TEST
|| test_protocol
== HTTPS_TEST
) {
2413 CLEAR_CALLED(QueryInterface_IInternetBindInfo
);
2414 CLEAR_CALLED(QueryService_IInternetBindInfo
);
2415 CHECK_CALLED(QueryInterface_IHttpNegotiate
);
2416 CLEAR_CALLED(QueryInterface_IWindowForBindingUI
);
2417 CLEAR_CALLED(QueryService_IWindowForBindingUI
);
2418 CHECK_CALLED(BeginningTransaction
);
2419 if (have_IHttpNegotiate2
)
2421 CHECK_CALLED(QueryInterface_IHttpNegotiate2
);
2422 CHECK_CALLED(GetRootSecurityId
);
2424 if(http_is_first
|| test_protocol
== HTTPS_TEST
) {
2425 CHECK_CALLED(OnProgress_FINDINGRESOURCE
);
2426 CHECK_CALLED(OnProgress_CONNECTING
);
2428 CHECK_NOT_CALLED(OnProgress_FINDINGRESOURCE
);
2429 /* IE7 does call this */
2430 CLEAR_CALLED(OnProgress_CONNECTING
);
2433 if(test_protocol
== HTTP_TEST
|| test_protocol
== HTTPS_TEST
|| test_protocol
== FILE_TEST
)
2434 CHECK_CALLED(OnProgress_SENDINGREQUEST
);
2435 else if(test_protocol
== FTP_TEST
)
2436 todo_wine
CHECK_CALLED(OnProgress_SENDINGREQUEST
);
2437 if(test_protocol
== HTTP_TEST
|| test_protocol
== HTTPS_TEST
) {
2438 CLEAR_CALLED(QueryInterface_IHttpNegotiate
);
2439 CHECK_CALLED(OnResponse
);
2441 CHECK_CALLED(OnProgress_MIMETYPEAVAILABLE
);
2442 CHECK_CALLED(OnProgress_BEGINDOWNLOADDATA
);
2443 if(test_protocol
== FILE_TEST
)
2444 CHECK_CALLED(OnProgress_CACHEFILENAMEAVAILABLE
);
2445 if(test_protocol
== HTTP_TEST
|| test_protocol
== HTTPS_TEST
|| test_protocol
== FTP_TEST
)
2446 CLEAR_CALLED(OnProgress_DOWNLOADINGDATA
);
2447 CHECK_CALLED(OnProgress_ENDDOWNLOADDATA
);
2448 if(tymed
!= TYMED_FILE
|| test_protocol
!= ABOUT_TEST
)
2449 CHECK_CALLED(OnDataAvailable
);
2450 CHECK_CALLED(OnStopBinding
);
2453 ok(IMoniker_Release(mon
) == 0, "mon should be destroyed here\n");
2454 ok(IBindCtx_Release(bctx
) == 0, "bctx should be destroyed here\n");
2456 if(test_protocol
== HTTP_TEST
|| test_protocol
== HTTPS_TEST
)
2457 http_is_first
= FALSE
;
2459 if(!callback_read
) {
2464 hres
= IUnknown_QueryInterface(unk
, &IID_IStream
, (void**)&stream
);
2465 ok(hres
== S_OK
, "Could not get IStream iface: %08x\n", hres
);
2466 IUnknown_Release(unk
);
2469 readed
= 0xdeadbeef;
2470 hres
= IStream_Read(stream
, buf
, sizeof(buf
), &readed
);
2471 ok(readed
!= 0xdeadbeef, "readed = 0xdeadbeef\n");
2472 if(emulate_protocol
&& test_protocol
== HTTP_TEST
&& readed
)
2473 ok(buf
[0] == (use_cache_file
&& !(bindf
&BINDF_ASYNCHRONOUS
) ? 'X' : '?'), "buf[0] = '%c'\n", buf
[0]);
2474 }while(hres
== S_OK
);
2475 ok(hres
== S_FALSE
, "IStream_Read returned %08x\n", hres
);
2476 ok(!readed
, "readed = %d\n", readed
);
2478 IStream_Release(stream
);
2482 static void test_BindToObject(int protocol
, DWORD flags
)
2486 LPOLESTR display_name
;
2490 IUnknown
*unk
= (IUnknown
*)0x00ff00ff;
2493 init_bind_test(protocol
, BINDTEST_TOOBJECT
|flags
, TYMED_ISTREAM
);
2495 if(emulate_protocol
)
2496 CoRegisterClassObject(&CLSID_HTMLDocument
, (IUnknown
*)&mime_cf
,
2497 CLSCTX_INPROC_SERVER
, REGCLS_MULTIPLEUSE
, ®id
);
2499 SET_EXPECT(QueryInterface_IServiceProvider
);
2500 hres
= CreateAsyncBindCtx(0, (IBindStatusCallback
*)&objbsc
, NULL
, &bctx
);
2501 ok(SUCCEEDED(hres
), "CreateAsyncBindCtx failed: %08x\n\n", hres
);
2502 CHECK_CALLED(QueryInterface_IServiceProvider
);
2506 hres
= CreateURLMoniker(NULL
, test_protocol
== FILE_TEST
? file_url
: urls
[test_protocol
], &mon
);
2507 ok(SUCCEEDED(hres
), "failed to create moniker: %08x\n", hres
);
2509 IBindCtx_Release(bctx
);
2513 hres
= IMoniker_QueryInterface(mon
, &IID_IBinding
, (void**)&bind
);
2514 ok(hres
== E_NOINTERFACE
, "IMoniker should not have IBinding interface\n");
2516 IBinding_Release(bind
);
2518 hres
= IMoniker_GetDisplayName(mon
, bctx
, NULL
, &display_name
);
2519 ok(hres
== S_OK
, "GetDisplayName failed %08x\n", hres
);
2520 ok(!lstrcmpW(display_name
, urls
[test_protocol
]), "GetDisplayName got wrong name\n");
2522 SET_EXPECT(QueryInterface_IBindStatusCallbackEx
);
2523 SET_EXPECT(Obj_GetBindInfo
);
2524 SET_EXPECT(QueryInterface_IInternetProtocol
);
2525 if(!emulate_protocol
)
2526 SET_EXPECT(QueryService_IInternetProtocol
);
2527 SET_EXPECT(Obj_OnStartBinding
);
2528 if(emulate_protocol
) {
2529 if(is_urlmon_protocol(test_protocol
))
2530 SET_EXPECT(SetPriority
);
2532 if(test_protocol
== HTTP_TEST
|| test_protocol
== HTTPS_TEST
)
2533 SET_EXPECT(Terminate
);
2534 if(test_protocol
== FILE_TEST
)
2535 SET_EXPECT(OnProgress_MIMETYPEAVAILABLE
);
2536 SET_EXPECT(UnlockRequest
);
2538 if(test_protocol
== HTTP_TEST
|| test_protocol
== HTTPS_TEST
) {
2539 SET_EXPECT(QueryInterface_IHttpNegotiate
);
2540 SET_EXPECT(BeginningTransaction
);
2541 SET_EXPECT(QueryInterface_IHttpNegotiate2
);
2542 SET_EXPECT(GetRootSecurityId
);
2543 SET_EXPECT(Obj_OnProgress_FINDINGRESOURCE
);
2544 SET_EXPECT(Obj_OnProgress_CONNECTING
);
2545 SET_EXPECT(QueryInterface_IWindowForBindingUI
);
2546 SET_EXPECT(QueryService_IWindowForBindingUI
);
2548 if(test_protocol
== HTTP_TEST
|| test_protocol
== HTTPS_TEST
|| test_protocol
== FILE_TEST
)
2549 SET_EXPECT(Obj_OnProgress_SENDINGREQUEST
);
2550 if(test_protocol
== HTTP_TEST
|| test_protocol
== HTTPS_TEST
) {
2551 SET_EXPECT(QueryInterface_IHttpNegotiate
);
2552 SET_EXPECT(OnResponse
);
2554 SET_EXPECT(Obj_OnProgress_MIMETYPEAVAILABLE
);
2555 SET_EXPECT(Obj_OnProgress_BEGINDOWNLOADDATA
);
2556 if(test_protocol
== FILE_TEST
)
2557 SET_EXPECT(Obj_OnProgress_CACHEFILENAMEAVAILABLE
);
2558 if(test_protocol
== HTTP_TEST
|| test_protocol
== HTTPS_TEST
)
2559 SET_EXPECT(OnProgress_DOWNLOADINGDATA
);
2560 SET_EXPECT(Obj_OnProgress_ENDDOWNLOADDATA
);
2561 SET_EXPECT(Obj_OnProgress_CLASSIDAVAILABLE
);
2562 SET_EXPECT(Obj_OnProgress_BEGINSYNCOPERATION
);
2563 SET_EXPECT(Obj_OnProgress_ENDSYNCOPERATION
);
2564 SET_EXPECT(OnObjectAvailable
);
2565 SET_EXPECT(Obj_OnStopBinding
);
2568 hres
= IMoniker_BindToObject(mon
, bctx
, NULL
, &IID_IUnknown
, (void**)&unk
);
2570 if ((test_protocol
== HTTP_TEST
|| test_protocol
== HTTPS_TEST
)
2571 && hres
== HRESULT_FROM_WIN32(ERROR_INTERNET_NAME_NOT_RESOLVED
))
2573 skip( "Network unreachable, skipping tests\n" );
2577 /* no point testing the calls if binding didn't even work */
2578 if (FAILED(hres
)) return;
2580 if(bindf
& BINDF_ASYNCHRONOUS
) {
2581 ok(hres
== MK_S_ASYNCHRONOUS
, "IMoniker_BindToObject failed: %08x\n", hres
);
2582 ok(unk
== NULL
, "istr should be NULL\n");
2584 ok(hres
== S_OK
, "IMoniker_BindToStorage failed: %08x\n", hres
);
2585 ok(unk
!= NULL
, "unk == NULL\n");
2586 if(emulate_protocol
)
2587 ok(unk
== (IUnknown
*)&PersistMoniker
, "unk != PersistMoniker\n");
2590 IUnknown_Release(unk
);
2592 while((bindf
& BINDF_ASYNCHRONOUS
) &&
2593 !((!emulate_protocol
|| stopped_binding
) && stopped_obj_binding
) && GetMessage(&msg
,NULL
,0,0)) {
2594 TranslateMessage(&msg
);
2595 DispatchMessage(&msg
);
2598 CLEAR_CALLED(QueryInterface_IBindStatusCallbackEx
);
2599 CHECK_CALLED(Obj_GetBindInfo
);
2600 CHECK_CALLED(QueryInterface_IInternetProtocol
);
2601 if(!emulate_protocol
)
2602 CHECK_CALLED(QueryService_IInternetProtocol
);
2603 CHECK_CALLED(Obj_OnStartBinding
);
2604 if(emulate_protocol
) {
2605 if(is_urlmon_protocol(test_protocol
))
2606 CHECK_CALLED(SetPriority
);
2607 CHECK_CALLED(Start
);
2608 if(test_protocol
== HTTP_TEST
|| test_protocol
== HTTPS_TEST
)
2609 CHECK_CALLED(Terminate
);
2610 if(test_protocol
== FILE_TEST
)
2611 CLEAR_CALLED(OnProgress_MIMETYPEAVAILABLE
); /* not called in IE7 */
2612 CHECK_CALLED(UnlockRequest
);
2614 if(test_protocol
== HTTP_TEST
|| test_protocol
== HTTPS_TEST
) {
2615 CHECK_CALLED(QueryInterface_IHttpNegotiate
);
2616 CHECK_CALLED(BeginningTransaction
);
2617 if (have_IHttpNegotiate2
)
2619 CHECK_CALLED(QueryInterface_IHttpNegotiate2
);
2620 CHECK_CALLED(GetRootSecurityId
);
2623 CHECK_CALLED(Obj_OnProgress_FINDINGRESOURCE
);
2624 CHECK_CALLED(Obj_OnProgress_CONNECTING
);
2626 CHECK_NOT_CALLED(Obj_OnProgress_FINDINGRESOURCE
);
2627 /* IE7 does call this */
2628 CLEAR_CALLED(Obj_OnProgress_CONNECTING
);
2630 CLEAR_CALLED(QueryInterface_IWindowForBindingUI
);
2631 CLEAR_CALLED(QueryService_IWindowForBindingUI
);
2633 if(test_protocol
== HTTP_TEST
|| test_protocol
== HTTPS_TEST
|| test_protocol
== FILE_TEST
) {
2634 if(urls
[test_protocol
] == SHORT_RESPONSE_URL
)
2635 CLEAR_CALLED(Obj_OnProgress_SENDINGREQUEST
);
2637 CHECK_CALLED(Obj_OnProgress_SENDINGREQUEST
);
2639 if(test_protocol
== HTTP_TEST
|| test_protocol
== HTTPS_TEST
) {
2640 CLEAR_CALLED(QueryInterface_IHttpNegotiate
);
2641 CHECK_CALLED(OnResponse
);
2643 CHECK_CALLED(Obj_OnProgress_MIMETYPEAVAILABLE
);
2644 CHECK_CALLED(Obj_OnProgress_BEGINDOWNLOADDATA
);
2645 if(test_protocol
== FILE_TEST
)
2646 CHECK_CALLED(Obj_OnProgress_CACHEFILENAMEAVAILABLE
);
2647 if(test_protocol
== HTTP_TEST
|| test_protocol
== HTTPS_TEST
)
2648 CLEAR_CALLED(OnProgress_DOWNLOADINGDATA
);
2649 CLEAR_CALLED(Obj_OnProgress_ENDDOWNLOADDATA
);
2650 CHECK_CALLED(Obj_OnProgress_CLASSIDAVAILABLE
);
2651 CHECK_CALLED(Obj_OnProgress_BEGINSYNCOPERATION
);
2652 CHECK_CALLED(Obj_OnProgress_ENDSYNCOPERATION
);
2653 CHECK_CALLED(OnObjectAvailable
);
2654 CHECK_CALLED(Obj_OnStopBinding
);
2657 if(test_protocol
!= HTTP_TEST
|| emulate_protocol
|| !(bindf
& BINDF_ASYNCHRONOUS
)) {
2658 ok(IMoniker_Release(mon
) == 0, "mon should be destroyed here\n");
2659 ok(IBindCtx_Release(bctx
) == 0, "bctx should be destroyed here\n");
2661 todo_wine
ok(IMoniker_Release(mon
) == 0, "mon should be destroyed here\n");
2662 IBindCtx_Release(bctx
);
2665 if(emulate_protocol
)
2666 CoRevokeClassObject(regid
);
2668 if(test_protocol
== HTTP_TEST
|| test_protocol
== HTTPS_TEST
)
2669 http_is_first
= FALSE
;
2672 static void test_URLDownloadToFile(DWORD prot
, BOOL emul
)
2677 init_bind_test(prot
, BINDTEST_FILEDWLAPI
| (emul
? BINDTEST_EMULATE
: 0), TYMED_FILE
);
2679 SET_EXPECT(GetBindInfo
);
2680 SET_EXPECT(QueryInterface_IInternetProtocol
);
2681 if(!emulate_protocol
) {
2682 SET_EXPECT(QueryInterface_IServiceProvider
);
2683 SET_EXPECT(QueryService_IInternetProtocol
);
2685 SET_EXPECT(OnStartBinding
);
2686 if(emulate_protocol
) {
2687 if(is_urlmon_protocol(test_protocol
))
2688 SET_EXPECT(SetPriority
);
2690 SET_EXPECT(UnlockRequest
);
2692 if(test_protocol
== HTTP_TEST
|| test_protocol
== HTTPS_TEST
) {
2693 SET_EXPECT(QueryInterface_IHttpNegotiate
);
2694 SET_EXPECT(BeginningTransaction
);
2695 SET_EXPECT(QueryInterface_IHttpNegotiate2
);
2696 SET_EXPECT(GetRootSecurityId
);
2697 SET_EXPECT(QueryInterface_IWindowForBindingUI
);
2698 SET_EXPECT(OnProgress_CONNECTING
);
2700 if(test_protocol
== HTTP_TEST
|| test_protocol
== HTTPS_TEST
|| test_protocol
== FILE_TEST
)
2701 SET_EXPECT(OnProgress_SENDINGREQUEST
);
2702 if(test_protocol
== HTTP_TEST
|| test_protocol
== HTTPS_TEST
) {
2703 SET_EXPECT(QueryInterface_IHttpNegotiate
);
2704 SET_EXPECT(OnResponse
);
2706 SET_EXPECT(OnProgress_MIMETYPEAVAILABLE
);
2707 SET_EXPECT(OnProgress_BEGINDOWNLOADDATA
);
2708 if(test_protocol
== FILE_TEST
)
2709 SET_EXPECT(OnProgress_CACHEFILENAMEAVAILABLE
);
2710 if(test_protocol
== HTTP_TEST
|| test_protocol
== HTTPS_TEST
)
2711 SET_EXPECT(OnProgress_DOWNLOADINGDATA
);
2712 SET_EXPECT(OnProgress_ENDDOWNLOADDATA
);
2713 SET_EXPECT(OnStopBinding
);
2716 hres
= URLDownloadToFileW(NULL
, test_protocol
== FILE_TEST
? file_url
: urls
[test_protocol
],
2717 dwl_htmlW
, 0, (IBindStatusCallback
*)&bsc
);
2718 ok(hres
== S_OK
, "URLDownloadToFile failed: %08x\n", hres
);
2720 CHECK_CALLED(GetBindInfo
);
2721 CHECK_CALLED(QueryInterface_IInternetProtocol
);
2722 if(!emulate_protocol
) {
2723 CHECK_CALLED(QueryInterface_IServiceProvider
);
2724 CHECK_CALLED(QueryService_IInternetProtocol
);
2726 CHECK_CALLED(OnStartBinding
);
2727 if(emulate_protocol
) {
2728 if(is_urlmon_protocol(test_protocol
))
2729 CHECK_CALLED(SetPriority
);
2730 CHECK_CALLED(Start
);
2731 CHECK_CALLED(UnlockRequest
);
2733 if(test_protocol
== HTTP_TEST
|| test_protocol
== HTTPS_TEST
) {
2734 CHECK_CALLED(QueryInterface_IHttpNegotiate
);
2735 CHECK_CALLED(BeginningTransaction
);
2736 if (have_IHttpNegotiate2
)
2738 CHECK_CALLED(QueryInterface_IHttpNegotiate2
);
2739 CHECK_CALLED(GetRootSecurityId
);
2741 CLEAR_CALLED(QueryInterface_IWindowForBindingUI
);
2742 CLEAR_CALLED(OnProgress_CONNECTING
);
2744 if(test_protocol
== FILE_TEST
)
2745 CHECK_CALLED(OnProgress_SENDINGREQUEST
);
2746 else if(test_protocol
== HTTP_TEST
|| test_protocol
== HTTPS_TEST
)
2747 CLEAR_CALLED(OnProgress_SENDINGREQUEST
); /* not called by IE7 */
2748 if(test_protocol
== HTTP_TEST
|| test_protocol
== HTTPS_TEST
) {
2749 CLEAR_CALLED(QueryInterface_IHttpNegotiate
);
2750 CHECK_CALLED(OnResponse
);
2752 CHECK_CALLED(OnProgress_MIMETYPEAVAILABLE
);
2753 CHECK_CALLED(OnProgress_BEGINDOWNLOADDATA
);
2754 if(test_protocol
== FILE_TEST
)
2755 CHECK_CALLED(OnProgress_CACHEFILENAMEAVAILABLE
);
2756 if(test_protocol
== HTTP_TEST
|| test_protocol
== HTTPS_TEST
)
2757 CLEAR_CALLED(OnProgress_DOWNLOADINGDATA
);
2758 CHECK_CALLED(OnProgress_ENDDOWNLOADDATA
);
2759 CHECK_CALLED(OnStopBinding
);
2762 res
= DeleteFileA(dwl_htmlA
);
2763 ok(res
, "DeleteFile failed: %u\n", GetLastError());
2765 if(prot
!= FILE_TEST
|| emul
)
2768 hres
= URLDownloadToFileW(NULL
, urls
[test_protocol
], dwl_htmlW
, 0, NULL
);
2769 ok(hres
== S_OK
, "URLDownloadToFile failed: %08x\n", hres
);
2771 res
= DeleteFileA(dwl_htmlA
);
2772 ok(res
, "DeleteFile failed: %u\n", GetLastError());
2775 static void set_file_url(char *path
)
2777 CHAR file_urlA
[INTERNET_MAX_URL_LENGTH
];
2778 CHAR INDEX_HTMLA
[MAX_PATH
];
2780 lstrcpyA(file_urlA
, "file:///");
2781 lstrcatA(file_urlA
, path
);
2782 MultiByteToWideChar(CP_ACP
, 0, file_urlA
, -1, file_url
, INTERNET_MAX_URL_LENGTH
);
2784 lstrcpyA(INDEX_HTMLA
, "file://");
2785 lstrcatA(INDEX_HTMLA
, path
);
2786 MultiByteToWideChar(CP_ACP
, 0, INDEX_HTMLA
, -1, INDEX_HTML
, MAX_PATH
);
2789 static void create_file(void)
2793 CHAR path
[MAX_PATH
];
2795 static const char html_doc
[] = "<HTML></HTML>";
2797 file
= CreateFileA(wszIndexHtmlA
, GENERIC_WRITE
, 0, NULL
, CREATE_ALWAYS
,
2798 FILE_ATTRIBUTE_NORMAL
, NULL
);
2799 ok(file
!= INVALID_HANDLE_VALUE
, "CreateFile failed\n");
2800 if(file
== INVALID_HANDLE_VALUE
)
2803 WriteFile(file
, html_doc
, sizeof(html_doc
)-1, &size
, NULL
);
2806 GetCurrentDirectoryA(MAX_PATH
, path
);
2807 lstrcatA(path
, "\\");
2808 lstrcatA(path
, wszIndexHtmlA
);
2812 static void create_cache_file(void)
2818 file
= CreateFileW(test_txtW
, GENERIC_WRITE
, 0, NULL
, CREATE_ALWAYS
,
2819 FILE_ATTRIBUTE_NORMAL
, NULL
);
2820 ok(file
!= INVALID_HANDLE_VALUE
, "CreateFile failed\n");
2821 if(file
== INVALID_HANDLE_VALUE
)
2824 memset(buf
, 'X', sizeof(buf
));
2825 WriteFile(file
, buf
, sizeof(buf
), &size
, NULL
);
2828 size
= GetCurrentDirectoryW(MAX_PATH
, cache_file_name
);
2829 cache_file_name
[size
] = '\\';
2830 memcpy(cache_file_name
+size
+1, test_txtW
, sizeof(test_txtW
));
2833 static void test_ReportResult(HRESULT exhres
)
2835 IMoniker
*mon
= NULL
;
2836 IBindCtx
*bctx
= NULL
;
2837 IUnknown
*unk
= (void*)0xdeadbeef;
2840 init_bind_test(ABOUT_TEST
, BINDTEST_EMULATE
, TYMED_ISTREAM
);
2841 binding_hres
= exhres
;
2843 hres
= CreateURLMoniker(NULL
, ABOUT_BLANK
, &mon
);
2844 ok(hres
== S_OK
, "CreateURLMoniker failed: %08x\n", hres
);
2846 SET_EXPECT(QueryInterface_IServiceProvider
);
2847 hres
= CreateAsyncBindCtx(0, (IBindStatusCallback
*)&bsc
, NULL
, &bctx
);
2848 ok(hres
== S_OK
, "CreateAsyncBindCtx failed: %08x\n\n", hres
);
2849 CHECK_CALLED(QueryInterface_IServiceProvider
);
2851 SET_EXPECT(QueryInterface_IBindStatusCallbackEx
);
2852 SET_EXPECT(GetBindInfo
);
2853 SET_EXPECT(QueryInterface_IInternetProtocol
);
2854 SET_EXPECT(OnStartBinding
);
2855 if(is_urlmon_protocol(test_protocol
))
2856 SET_EXPECT(SetPriority
);
2859 hres
= IMoniker_BindToStorage(mon
, bctx
, NULL
, &IID_IStream
, (void**)&unk
);
2860 if(SUCCEEDED(exhres
))
2861 ok(hres
== S_OK
|| hres
== MK_S_ASYNCHRONOUS
, "BindToStorage failed: %08x\n", hres
);
2863 ok(hres
== exhres
|| hres
== MK_S_ASYNCHRONOUS
,
2864 "BindToStorage failed: %08x, expected %08x or MK_S_ASYNCHRONOUS\n", hres
, exhres
);
2866 CLEAR_CALLED(QueryInterface_IBindStatusCallbackEx
); /* IE 8 */
2867 CHECK_CALLED(GetBindInfo
);
2868 CHECK_CALLED(QueryInterface_IInternetProtocol
);
2869 CHECK_CALLED(OnStartBinding
);
2870 if(is_urlmon_protocol(test_protocol
))
2871 CHECK_CALLED(SetPriority
);
2872 CHECK_CALLED(Start
);
2874 ok(unk
== NULL
, "unk=%p\n", unk
);
2876 IBindCtx_Release(bctx
);
2877 IMoniker_Release(mon
);
2880 static void test_BindToStorage_fail(void)
2882 IMoniker
*mon
= NULL
;
2883 IBindCtx
*bctx
= NULL
;
2887 hres
= CreateURLMoniker(NULL
, ABOUT_BLANK
, &mon
);
2888 ok(hres
== S_OK
, "CreateURLMoniker failed: %08x\n", hres
);
2892 hres
= pCreateAsyncBindCtxEx(NULL
, 0, NULL
, NULL
, &bctx
, 0);
2893 ok(hres
== S_OK
, "CreateAsyncBindCtxEx failed: %08x\n", hres
);
2895 hres
= IMoniker_BindToStorage(mon
, bctx
, NULL
, &IID_IStream
, (void**)&unk
);
2896 ok(hres
== MK_E_SYNTAX
|| hres
== INET_E_DATA_NOT_AVAILABLE
,
2897 "hres=%08x, expected MK_E_SYNTAX or INET_E_DATA_NOT_AVAILABLE\n", hres
);
2899 IBindCtx_Release(bctx
);
2901 IMoniker_Release(mon
);
2903 test_ReportResult(E_NOTIMPL
);
2904 test_ReportResult(S_FALSE
);
2907 static void test_StdURLMoniker(void)
2909 IMoniker
*mon
, *async_mon
;
2910 LPOLESTR display_name
;
2913 hres
= CoCreateInstance(&IID_IInternet
, NULL
, CLSCTX_INPROC_SERVER
|CLSCTX_INPROC_HANDLER
,
2914 &IID_IMoniker
, (void**)&mon
);
2915 ok(hres
== S_OK
, "Could not create IInternet instance: %08x\n", hres
);
2919 hres
= IMoniker_QueryInterface(mon
, &IID_IAsyncMoniker
, (void**)&async_mon
);
2920 ok(hres
== S_OK
, "Could not get IAsyncMoniker iface: %08x\n", hres
);
2921 ok(mon
== async_mon
, "mon != async_mon\n");
2922 IMoniker_Release(async_mon
);
2924 hres
= IMoniker_GetDisplayName(mon
, NULL
, NULL
, &display_name
);
2925 ok(hres
== E_OUTOFMEMORY
, "GetDisplayName failed: %08x, expected E_OUTOFMEMORY\n", hres
);
2927 IMoniker_Release(mon
);
2934 hurlmon
= GetModuleHandle("urlmon.dll");
2935 pCreateAsyncBindCtxEx
= (void*) GetProcAddress(hurlmon
, "CreateAsyncBindCtxEx");
2937 complete_event
= CreateEvent(NULL
, FALSE
, FALSE
, NULL
);
2938 complete_event2
= CreateEvent(NULL
, FALSE
, FALSE
, NULL
);
2939 thread_id
= GetCurrentThreadId();
2941 create_cache_file();
2945 trace("test CreateAsyncBindCtx...\n");
2946 test_CreateAsyncBindCtx();
2948 trace("test CreateAsyncBindCtxEx...\n");
2949 test_CreateAsyncBindCtxEx();
2951 trace("test RegisterBindStatusCallback...\n");
2952 if(test_RegisterBindStatusCallback()) {
2953 trace("test BindToStorage failures...\n");
2954 test_BindToStorage_fail();
2956 trace("synchronous http test (COM not initialised)...\n");
2957 test_BindToStorage(HTTP_TEST
, 0, TYMED_ISTREAM
);
2961 trace("test StdURLMoniker...\n");
2962 test_StdURLMoniker();
2964 trace("synchronous http test...\n");
2965 test_BindToStorage(HTTP_TEST
, 0, TYMED_ISTREAM
);
2967 trace("emulated synchronous http test (to file)...\n");
2968 test_BindToStorage(HTTP_TEST
, BINDTEST_EMULATE
, TYMED_FILE
);
2970 trace("synchronous http test (to object)...\n");
2971 test_BindToObject(HTTP_TEST
, 0);
2973 trace("emulated synchronous http test (with cache)...\n");
2974 test_BindToStorage(HTTP_TEST
, BINDTEST_EMULATE
|BINDTEST_USE_CACHE
, TYMED_ISTREAM
);
2976 trace("emulated synchronous http test (with cache, no read)...\n");
2977 test_BindToStorage(HTTP_TEST
, BINDTEST_EMULATE
|BINDTEST_USE_CACHE
|BINDTEST_NO_CALLBACK_READ
, TYMED_ISTREAM
);
2979 trace("synchronous http test (with cache, no read)...\n");
2980 test_BindToStorage(HTTP_TEST
, BINDTEST_USE_CACHE
|BINDTEST_NO_CALLBACK_READ
, TYMED_ISTREAM
);
2982 trace("synchronous file test...\n");
2983 test_BindToStorage(FILE_TEST
, 0, TYMED_ISTREAM
);
2985 trace("emulated synchronous file test (to file)...\n");
2986 test_BindToStorage(FILE_TEST
, BINDTEST_EMULATE
, TYMED_FILE
);
2988 trace("synchronous file test (to object)...\n");
2989 test_BindToObject(FILE_TEST
, 0);
2991 bindf
= BINDF_ASYNCHRONOUS
| BINDF_ASYNCSTORAGE
| BINDF_PULLDATA
;
2993 trace("http test...\n");
2994 test_BindToStorage(HTTP_TEST
, 0, TYMED_ISTREAM
);
2996 trace("http test (to file)...\n");
2997 test_BindToStorage(HTTP_TEST
, 0, TYMED_FILE
);
2999 trace("http test (to object)...\n");
3000 test_BindToObject(HTTP_TEST
, 0);
3002 trace("http test (short response)...\n");
3003 http_is_first
= TRUE
;
3004 test_BindToStorage(HTTP_TEST
, BINDTEST_HTTPRESPONSE
, TYMED_ISTREAM
);
3006 trace("http test (short response, to object)...\n");
3007 test_BindToObject(HTTP_TEST
, 0);
3009 trace("emulated http test...\n");
3010 test_BindToStorage(HTTP_TEST
, BINDTEST_EMULATE
, TYMED_ISTREAM
);
3012 trace("emulated http test (to object)...\n");
3013 test_BindToObject(HTTP_TEST
, BINDTEST_EMULATE
);
3015 trace("emulated http test (to object, redirect)...\n");
3016 test_BindToObject(HTTP_TEST
, BINDTEST_EMULATE
|BINDTEST_REDIRECT
);
3018 trace("emulated http test (to file)...\n");
3019 test_BindToStorage(HTTP_TEST
, BINDTEST_EMULATE
, TYMED_FILE
);
3021 trace("emulated http test (redirect)...\n");
3022 test_BindToStorage(HTTP_TEST
, BINDTEST_EMULATE
|BINDTEST_REDIRECT
, TYMED_ISTREAM
);
3024 trace("emulated http test (with cache)...\n");
3025 test_BindToStorage(HTTP_TEST
, BINDTEST_EMULATE
|BINDTEST_USE_CACHE
, TYMED_ISTREAM
);
3027 trace("asynchronous https test...\n");
3028 test_BindToStorage(HTTPS_TEST
, 0, TYMED_ISTREAM
);
3030 trace("emulated https test...\n");
3031 test_BindToStorage(HTTPS_TEST
, BINDTEST_EMULATE
, TYMED_ISTREAM
);
3033 trace("about test...\n");
3034 test_BindToStorage(ABOUT_TEST
, 0, TYMED_ISTREAM
);
3036 trace("about test (to file)...\n");
3037 test_BindToStorage(ABOUT_TEST
, 0, TYMED_FILE
);
3039 trace("about test (to object)...\n");
3040 test_BindToObject(ABOUT_TEST
, 0);
3042 trace("emulated about test...\n");
3043 test_BindToStorage(ABOUT_TEST
, BINDTEST_EMULATE
, TYMED_ISTREAM
);
3045 trace("emulated about test (to file)...\n");
3046 test_BindToStorage(ABOUT_TEST
, BINDTEST_EMULATE
, TYMED_FILE
);
3048 trace("emulated about test (to object)...\n");
3049 test_BindToObject(ABOUT_TEST
, BINDTEST_EMULATE
);
3051 trace("file test...\n");
3052 test_BindToStorage(FILE_TEST
, 0, TYMED_ISTREAM
);
3054 trace("file test (to file)...\n");
3055 test_BindToStorage(FILE_TEST
, 0, TYMED_FILE
);
3057 trace("file test (to object)...\n");
3058 test_BindToObject(FILE_TEST
, 0);
3060 trace("emulated file test...\n");
3061 test_BindToStorage(FILE_TEST
, BINDTEST_EMULATE
, TYMED_ISTREAM
);
3063 trace("emulated file test (to file)...\n");
3064 test_BindToStorage(FILE_TEST
, BINDTEST_EMULATE
, TYMED_FILE
);
3066 trace("emulated file test (to object)...\n");
3067 test_BindToObject(FILE_TEST
, BINDTEST_EMULATE
);
3069 trace("emulated its test...\n");
3070 test_BindToStorage(ITS_TEST
, BINDTEST_EMULATE
, TYMED_ISTREAM
);
3072 trace("emulated its test (to file)...\n");
3073 test_BindToStorage(ITS_TEST
, BINDTEST_EMULATE
, TYMED_FILE
);
3075 trace("emulated mk test...\n");
3076 test_BindToStorage(MK_TEST
, BINDTEST_EMULATE
, TYMED_ISTREAM
);
3078 trace("test URLDownloadToFile for file protocol...\n");
3079 test_URLDownloadToFile(FILE_TEST
, FALSE
);
3081 trace("test URLDownloadToFile for emulated file protocol...\n");
3082 test_URLDownloadToFile(FILE_TEST
, TRUE
);
3084 trace("test URLDownloadToFile for http protocol...\n");
3085 test_URLDownloadToFile(HTTP_TEST
, FALSE
);
3087 bindf
|= BINDF_NOWRITECACHE
;
3089 trace("ftp test...\n");
3090 test_BindToStorage(FTP_TEST
, 0, TYMED_ISTREAM
);
3092 trace("test failures...\n");
3093 test_BindToStorage_fail();
3096 DeleteFileA(wszIndexHtmlA
);
3097 DeleteFileW(test_txtW
);
3098 CloseHandle(complete_event
);
3099 CloseHandle(complete_event2
);