4 * Copyright 2004 Kevin Koltzau
5 * Copyright 2004 Jacek Caban
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., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
30 #include "wine/test.h"
32 #define DEFINE_EXPECT(func) \
33 static BOOL expect_ ## func = FALSE, called_ ## func = FALSE
35 #define SET_EXPECT(func) \
36 expect_ ## func = TRUE
38 #define CHECK_EXPECT(func) \
40 ok(expect_ ##func, "unexpected call " #func "\n"); \
41 expect_ ## func = FALSE; \
42 called_ ## func = TRUE; \
45 #define CHECK_EXPECT2(func) \
47 ok(expect_ ##func, "unexpected call " #func "\n"); \
48 called_ ## func = TRUE; \
51 #define CHECK_CALLED(func) \
53 ok(called_ ## func, "expected " #func "\n"); \
54 expect_ ## func = called_ ## func = FALSE; \
57 DEFINE_EXPECT(GetBindInfo
);
58 DEFINE_EXPECT(OnStartBinding
);
59 DEFINE_EXPECT(OnProgress_FINDINGRESOURCE
);
60 DEFINE_EXPECT(OnProgress_CONNECTING
);
61 DEFINE_EXPECT(OnProgress_SENDINGREQUEST
);
62 DEFINE_EXPECT(OnProgress_MIMETYPEAVAILABLE
);
63 DEFINE_EXPECT(OnProgress_BEGINDOWNLOADDATA
);
64 DEFINE_EXPECT(OnProgress_DOWNLOADINGDATA
);
65 DEFINE_EXPECT(OnProgress_ENDDOWNLOADDATA
);
66 DEFINE_EXPECT(OnStopBinding
);
67 DEFINE_EXPECT(OnDataAvailable
);
70 DEFINE_EXPECT(LockRequest
);
71 DEFINE_EXPECT(Terminate
);
72 DEFINE_EXPECT(UnlockRequest
);
74 static const WCHAR TEST_URL_1
[] = {'h','t','t','p',':','/','/','w','w','w','.','w','i','n','e','h','q','.','o','r','g','/','\0'};
75 static const WCHAR TEST_PART_URL_1
[] = {'/','t','e','s','t','/','\0'};
77 static const WCHAR WINE_ABOUT_URL
[] = {'h','t','t','p',':','/','/','w','w','w','.','w','i','n','e','h','q','.',
78 'o','r','g','/','s','i','t','e','/','a','b','o','u','t',0};
79 static const WCHAR ABOUT_BLANK
[] = {'a','b','o','u','t',':','b','l','a','n','k',0};
80 static WCHAR INDEX_HTML
[MAX_PATH
];
82 static const WCHAR wszIndexHtml
[] = {'i','n','d','e','x','.','h','t','m','l',0};
84 static BOOL stopped_binding
= FALSE
, emulate_protocol
= FALSE
;
85 static DWORD read
= 0;
87 static const LPCWSTR urls
[] = {
99 static void test_CreateURLMoniker(LPCWSTR url1
, LPCWSTR url2
)
102 IMoniker
*mon1
= NULL
;
103 IMoniker
*mon2
= NULL
;
105 hr
= CreateURLMoniker(NULL
, url1
, &mon1
);
106 ok(SUCCEEDED(hr
), "failed to create moniker: 0x%08lx\n", hr
);
108 hr
= CreateURLMoniker(mon1
, url2
, &mon2
);
109 ok(SUCCEEDED(hr
), "failed to create moniker: 0x%08lx\n", hr
);
111 if(mon1
) IMoniker_Release(mon1
);
112 if(mon2
) IMoniker_Release(mon2
);
115 static void test_create(void)
117 test_CreateURLMoniker(TEST_URL_1
, TEST_PART_URL_1
);
120 static HRESULT WINAPI
Protocol_QueryInterface(IInternetProtocol
*iface
, REFIID riid
, void **ppv
)
122 if(IsEqualGUID(&IID_IUnknown
, riid
) || IsEqualGUID(&IID_IInternetProtocol
, riid
)) {
128 return E_NOINTERFACE
;
131 static ULONG WINAPI
Protocol_AddRef(IInternetProtocol
*iface
)
136 static ULONG WINAPI
Protocol_Release(IInternetProtocol
*iface
)
141 static HRESULT WINAPI
Protocol_Start(IInternetProtocol
*iface
, LPCWSTR szUrl
,
142 IInternetProtocolSink
*pOIProtSink
, IInternetBindInfo
*pOIBindInfo
,
143 DWORD grfPI
, DWORD dwReserved
)
145 BINDINFO bindinfo
, bi
= {sizeof(bi
), 0};
146 DWORD bindf
, bscf
= BSCF_FIRSTDATANOTIFICATION
| BSCF_LASTDATANOTIFICATION
;
150 static const WCHAR wszTextHtml
[] = {'t','e','x','t','/','h','t','m','l',0};
156 ok(szUrl
&& !lstrcmpW(szUrl
, urls
[test_protocol
]), "wrong url\n");
157 ok(pOIProtSink
!= NULL
, "pOIProtSink == NULL\n");
158 ok(pOIBindInfo
!= NULL
, "pOIBindInfo == NULL\n");
159 ok(grfPI
== 0, "grfPI=%ld, expected 0\n", grfPI
);
160 ok(dwReserved
== 0, "dwReserved=%ld, expected 0\n", dwReserved
);
162 memset(&bindinfo
, 0, sizeof(bindinfo
));
163 bindinfo
.cbSize
= sizeof(bindinfo
);
164 hres
= IInternetBindInfo_GetBindInfo(pOIBindInfo
, &bindf
, &bindinfo
);
165 ok(hres
== S_OK
, "GetBindInfo failed: %08lx\n", hres
);
167 if(test_protocol
== FILE_TEST
) {
168 ok(bindf
== (BINDF_ASYNCHRONOUS
|BINDF_ASYNCSTORAGE
|BINDF_PULLDATA
170 "bindf=%08lx\n", bindf
);
172 ok(bindf
== (BINDF_ASYNCHRONOUS
|BINDF_ASYNCSTORAGE
|BINDF_PULLDATA
|
173 BINDF_FROMURLMON
|BINDF_NEEDFILE
),
174 "bindf=%08lx\n", bindf
);
177 ok(!memcmp(&bindinfo
, &bi
, sizeof(bindinfo
)), "wrong bindinfo\n");
179 if(test_protocol
== FILE_TEST
) {
180 SET_EXPECT(OnProgress_SENDINGREQUEST
);
181 hres
= IInternetProtocolSink_ReportProgress(pOIProtSink
,
182 BINDSTATUS_SENDINGREQUEST
, &null_char
);
184 "ReportProgress(BINDSTATUS_SENDINGREQUEST) failed: %08lx\n", hres
);
185 CHECK_CALLED(OnProgress_SENDINGREQUEST
);
187 hres
= IInternetProtocolSink_ReportProgress(pOIProtSink
,
188 BINDSTATUS_CACHEFILENAMEAVAILABLE
, &null_char
);
190 "ReportProgress(BINDSTATUS_CACHEFILENAMEAVAILABLE) failed: %08lx\n", hres
);
192 SET_EXPECT(OnProgress_MIMETYPEAVAILABLE
);
193 hres
= IInternetProtocolSink_ReportProgress(pOIProtSink
,
194 BINDSTATUS_VERIFIEDMIMETYPEAVAILABLE
, wszTextHtml
);
196 "ReportProgress(BINDSTATUS_MIMETYPEAVAILABLE) failed: %08lx\n", hres
);
197 CHECK_CALLED(OnProgress_MIMETYPEAVAILABLE
);
199 hres
= IInternetProtocolSink_ReportProgress(pOIProtSink
,
200 BINDSTATUS_MIMETYPEAVAILABLE
, wszTextHtml
);
202 "ReportProgress(BINDSTATUS_MIMETYPEAVAILABLE) failed: %08lx\n", hres
);
205 if(test_protocol
== ABOUT_TEST
)
206 bscf
|= BSCF_DATAFULLYAVAILABLE
;
209 if(test_protocol
!= FILE_TEST
)
210 SET_EXPECT(OnProgress_MIMETYPEAVAILABLE
);
211 SET_EXPECT(OnProgress_BEGINDOWNLOADDATA
);
212 SET_EXPECT(OnProgress_ENDDOWNLOADDATA
);
213 SET_EXPECT(LockRequest
);
214 SET_EXPECT(OnDataAvailable
);
215 SET_EXPECT(OnStopBinding
);
217 hres
= IInternetProtocolSink_ReportData(pOIProtSink
, bscf
, 13, 13);
218 ok(hres
== S_OK
, "ReportData failed: %08lx\n", hres
);
221 if(test_protocol
!= FILE_TEST
)
222 CHECK_CALLED(OnProgress_MIMETYPEAVAILABLE
);
223 CHECK_CALLED(OnProgress_BEGINDOWNLOADDATA
);
224 CHECK_CALLED(OnProgress_ENDDOWNLOADDATA
);
225 CHECK_CALLED(LockRequest
);
226 CHECK_CALLED(OnDataAvailable
);
227 CHECK_CALLED(OnStopBinding
);
229 IInternetProtocolSink_ReportResult(pOIProtSink
, S_OK
, 0, NULL
);
234 static HRESULT WINAPI
Protocol_Continue(IInternetProtocol
*iface
,
235 PROTOCOLDATA
*pProtocolData
)
237 ok(0, "unexpected call\n");
241 static HRESULT WINAPI
Protocol_Abort(IInternetProtocol
*iface
, HRESULT hrReason
,
244 ok(0, "unexpected call\n");
248 static HRESULT WINAPI
Protocol_Terminate(IInternetProtocol
*iface
, DWORD dwOptions
)
250 CHECK_EXPECT(Terminate
);
251 ok(dwOptions
== 0, "dwOptions=%ld, expected 0\n", dwOptions
);
255 static HRESULT WINAPI
Protocol_Suspend(IInternetProtocol
*iface
)
257 ok(0, "unexpected call\n");
261 static HRESULT WINAPI
Protocol_Resume(IInternetProtocol
*iface
)
263 ok(0, "unexpected call\n");
267 static HRESULT WINAPI
Protocol_Read(IInternetProtocol
*iface
, void *pv
,
268 ULONG cb
, ULONG
*pcbRead
)
270 static const char data
[] = "<HTML></HTML>";
279 ok(pv
!= NULL
, "pv == NULL\n");
280 ok(cb
!= 0, "cb == 0\n");
281 ok(pcbRead
!= NULL
, "pcbRead == NULL\n");
283 ok(*pcbRead
== 0, "*pcbRead=%ld, expected 0\n", *pcbRead
);
288 memcpy(pv
, data
, sizeof(data
));
293 static HRESULT WINAPI
Protocol_Seek(IInternetProtocol
*iface
,
294 LARGE_INTEGER dlibMove
, DWORD dwOrigin
, ULARGE_INTEGER
*plibNewPosition
)
296 ok(0, "unexpected call\n");
300 static HRESULT WINAPI
Protocol_LockRequest(IInternetProtocol
*iface
, DWORD dwOptions
)
302 CHECK_EXPECT(LockRequest
);
306 static HRESULT WINAPI
Protocol_UnlockRequest(IInternetProtocol
*iface
)
308 CHECK_EXPECT(UnlockRequest
);
312 static const IInternetProtocolVtbl ProtocolVtbl
= {
313 Protocol_QueryInterface
,
324 Protocol_LockRequest
,
325 Protocol_UnlockRequest
328 static IInternetProtocol Protocol
= { &ProtocolVtbl
};
330 static HRESULT WINAPI
statusclb_QueryInterface(IBindStatusCallback
*iface
, REFIID riid
, void **ppv
)
332 if(IsEqualGUID(&IID_IInternetProtocol
, riid
)) {
333 if(emulate_protocol
) {
337 return E_NOINTERFACE
;
341 return E_NOINTERFACE
;
344 static ULONG WINAPI
statusclb_AddRef(IBindStatusCallback
*iface
)
349 static ULONG WINAPI
statusclb_Release(IBindStatusCallback
*iface
)
354 static HRESULT WINAPI
statusclb_OnStartBinding(IBindStatusCallback
*iface
, DWORD dwReserved
,
360 CHECK_EXPECT(OnStartBinding
);
362 ok(pib
!= NULL
, "pib should not be NULL\n");
364 hres
= IBinding_QueryInterface(pib
, &IID_IMoniker
, (void**)&mon
);
365 ok(hres
== E_NOINTERFACE
, "IBinding should not have IMoniker interface\n");
367 IMoniker_Release(mon
);
372 static HRESULT WINAPI
statusclb_GetPriority(IBindStatusCallback
*iface
, LONG
*pnPriority
)
374 ok(0, "unexpected call\n");
378 static HRESULT WINAPI
statusclb_OnLowResource(IBindStatusCallback
*iface
, DWORD reserved
)
380 ok(0, "unexpected call\n");
384 static HRESULT WINAPI
statusclb_OnProgress(IBindStatusCallback
*iface
, ULONG ulProgress
,
385 ULONG ulProgressMax
, ULONG ulStatusCode
, LPCWSTR szStatusText
)
387 switch(ulStatusCode
) {
388 case BINDSTATUS_FINDINGRESOURCE
:
389 CHECK_EXPECT(OnProgress_FINDINGRESOURCE
);
391 case BINDSTATUS_CONNECTING
:
392 CHECK_EXPECT(OnProgress_CONNECTING
);
394 case BINDSTATUS_SENDINGREQUEST
:
395 CHECK_EXPECT(OnProgress_SENDINGREQUEST
);
397 case BINDSTATUS_MIMETYPEAVAILABLE
:
398 CHECK_EXPECT(OnProgress_MIMETYPEAVAILABLE
);
400 case BINDSTATUS_BEGINDOWNLOADDATA
:
401 CHECK_EXPECT(OnProgress_BEGINDOWNLOADDATA
);
402 ok(szStatusText
!= NULL
, "szStatusText == NULL\n");
404 ok(!lstrcmpW(szStatusText
, urls
[test_protocol
]), "wrong szStatusText\n");
406 case BINDSTATUS_DOWNLOADINGDATA
:
407 CHECK_EXPECT2(OnProgress_DOWNLOADINGDATA
);
409 case BINDSTATUS_ENDDOWNLOADDATA
:
410 CHECK_EXPECT(OnProgress_ENDDOWNLOADDATA
);
411 ok(szStatusText
!= NULL
, "szStatusText == NULL\n");
413 ok(!lstrcmpW(szStatusText
, urls
[test_protocol
]), "wrong szStatusText\n");
415 case BINDSTATUS_CACHEFILENAMEAVAILABLE
:
416 ok(szStatusText
!= NULL
, "szStatusText == NULL\n");
417 if(szStatusText
&& test_protocol
== FILE_TEST
)
418 ok(!lstrcmpW(INDEX_HTML
+7, szStatusText
), "wrong szStatusText\n");
421 todo_wine
{ ok(0, "unexpexted code %ld\n", ulStatusCode
); }
426 static HRESULT WINAPI
statusclb_OnStopBinding(IBindStatusCallback
*iface
, HRESULT hresult
, LPCWSTR szError
)
428 CHECK_EXPECT(OnStopBinding
);
430 ok(SUCCEEDED(hresult
), "Download failed: %08lx\n", hresult
);
431 ok(szError
== NULL
, "szError should be NULL\n");
432 stopped_binding
= TRUE
;
437 static HRESULT WINAPI
statusclb_GetBindInfo(IBindStatusCallback
*iface
, DWORD
*grfBINDF
, BINDINFO
*pbindinfo
)
441 CHECK_EXPECT(GetBindInfo
);
443 *grfBINDF
= BINDF_ASYNCHRONOUS
| BINDF_ASYNCSTORAGE
| BINDF_PULLDATA
;
444 cbSize
= pbindinfo
->cbSize
;
445 memset(pbindinfo
, 0, cbSize
);
446 pbindinfo
->cbSize
= cbSize
;
451 static HRESULT WINAPI
statusclb_OnDataAvailable(IBindStatusCallback
*iface
, DWORD grfBSCF
,
452 DWORD dwSize
, FORMATETC
* pformatetc
, STGMEDIUM
* pstgmed
)
458 CHECK_EXPECT2(OnDataAvailable
);
460 if(U(*pstgmed
).pstm
) {
461 do hres
= IStream_Read(U(*pstgmed
).pstm
, buf
, 512, &readed
);
463 ok(hres
== S_FALSE
|| hres
== E_PENDING
, "IStream_Read returned %08lx\n", hres
);
469 static HRESULT WINAPI
statusclb_OnObjectAvailable(IBindStatusCallback
*iface
, REFIID riid
, IUnknown
*punk
)
471 ok(0, "unexpected call\n");
475 static const IBindStatusCallbackVtbl BindStatusCallbackVtbl
= {
476 statusclb_QueryInterface
,
479 statusclb_OnStartBinding
,
480 statusclb_GetPriority
,
481 statusclb_OnLowResource
,
482 statusclb_OnProgress
,
483 statusclb_OnStopBinding
,
484 statusclb_GetBindInfo
,
485 statusclb_OnDataAvailable
,
486 statusclb_OnObjectAvailable
489 static IBindStatusCallback bsc
= { &BindStatusCallbackVtbl
};
491 static void test_CreateAsyncBindCtx(void)
493 IBindCtx
*bctx
= (IBindCtx
*)0x0ff00ff0;
498 hres
= CreateAsyncBindCtx(0, NULL
, NULL
, &bctx
);
499 ok(hres
== E_INVALIDARG
, "CreateAsyncBindCtx failed. expected: E_INVALIDARG, got: %08lx\n", hres
);
500 ok(bctx
== (IBindCtx
*)0x0ff00ff0, "bctx should not be changed\n");
502 hres
= CreateAsyncBindCtx(0, NULL
, NULL
, NULL
);
503 ok(hres
== E_INVALIDARG
, "CreateAsyncBindCtx failed. expected: E_INVALIDARG, got: %08lx\n", hres
);
505 hres
= CreateAsyncBindCtx(0, &bsc
, NULL
, &bctx
);
506 ok(SUCCEEDED(hres
), "CreateAsyncBindCtx failed: %08lx\n", hres
);
508 bindopts
.cbStruct
= sizeof(bindopts
);
509 hres
= IBindCtx_GetBindOptions(bctx
, &bindopts
);
510 ok(SUCCEEDED(hres
), "IBindCtx_GetBindOptions failed: %08lx\n", hres
);
511 ok(bindopts
.grfFlags
== BIND_MAYBOTHERUSER
,
512 "bindopts.grfFlags = %08lx, expected: BIND_MAYBOTHERUSER\n", bindopts
.grfFlags
);
513 ok(bindopts
.grfMode
== (STGM_READWRITE
| STGM_SHARE_EXCLUSIVE
),
514 "bindopts.grfMode = %08lx, expected: STGM_READWRITE | STGM_SHARE_EXCLUSIVE\n",
516 ok(bindopts
.dwTickCountDeadline
== 0,
517 "bindopts.dwTickCountDeadline = %08lx, expected: 0\n", bindopts
.dwTickCountDeadline
);
519 ref
= IBindCtx_Release(bctx
);
520 ok(ref
== 0, "bctx should be destroyed here\n");
523 static void test_CreateAsyncBindCtxEx(void)
525 IBindCtx
*bctx
= NULL
, *bctx_arg
= NULL
;
529 hres
= CreateAsyncBindCtxEx(NULL
, 0, NULL
, NULL
, NULL
, 0);
530 ok(hres
== E_INVALIDARG
, "CreateAsyncBindCtx failed: %08lx, expected E_INVALIDARG\n", hres
);
532 hres
= CreateAsyncBindCtxEx(NULL
, 0, NULL
, NULL
, &bctx
, 0);
533 ok(hres
== S_OK
, "CreateAsyncBindCtxEx failed: %08lx\n", hres
);
535 if(SUCCEEDED(hres
)) {
536 bindopts
.cbStruct
= sizeof(bindopts
);
537 hres
= IBindCtx_GetBindOptions(bctx
, &bindopts
);
538 ok(SUCCEEDED(hres
), "IBindCtx_GetBindOptions failed: %08lx\n", hres
);
539 ok(bindopts
.grfFlags
== BIND_MAYBOTHERUSER
,
540 "bindopts.grfFlags = %08lx, expected: BIND_MAYBOTHERUSER\n", bindopts
.grfFlags
);
541 ok(bindopts
.grfMode
== (STGM_READWRITE
| STGM_SHARE_EXCLUSIVE
),
542 "bindopts.grfMode = %08lx, expected: STGM_READWRITE | STGM_SHARE_EXCLUSIVE\n",
544 ok(bindopts
.dwTickCountDeadline
== 0,
545 "bindopts.dwTickCountDeadline = %08lx, expected: 0\n", bindopts
.dwTickCountDeadline
);
547 IBindCtx_Release(bctx
);
550 CreateBindCtx(0, &bctx_arg
);
551 hres
= CreateAsyncBindCtxEx(NULL
, 0, NULL
, NULL
, &bctx
, 0);
552 ok(hres
== S_OK
, "CreateAsyncBindCtxEx failed: %08lx\n", hres
);
554 if(SUCCEEDED(hres
)) {
555 bindopts
.cbStruct
= sizeof(bindopts
);
556 hres
= IBindCtx_GetBindOptions(bctx
, &bindopts
);
557 ok(SUCCEEDED(hres
), "IBindCtx_GetBindOptions failed: %08lx\n", hres
);
558 ok(bindopts
.grfFlags
== BIND_MAYBOTHERUSER
,
559 "bindopts.grfFlags = %08lx, expected: BIND_MAYBOTHERUSER\n", bindopts
.grfFlags
);
560 ok(bindopts
.grfMode
== (STGM_READWRITE
| STGM_SHARE_EXCLUSIVE
),
561 "bindopts.grfMode = %08lx, expected: STGM_READWRITE | STGM_SHARE_EXCLUSIVE\n",
563 ok(bindopts
.dwTickCountDeadline
== 0,
564 "bindopts.dwTickCountDeadline = %08lx, expected: 0\n", bindopts
.dwTickCountDeadline
);
566 IBindCtx_Release(bctx
);
569 IBindCtx_Release(bctx_arg
);
571 hres
= CreateAsyncBindCtxEx(NULL
, 0, &bsc
, NULL
, &bctx
, 0);
572 ok(hres
== S_OK
, "CreateAsyncBindCtxEx failed: %08lx\n", hres
);
575 IBindCtx_Release(bctx
);
578 static void test_BindToStorage(void)
582 LPOLESTR display_name
;
585 IBindStatusCallback
*previousclb
;
586 IUnknown
*unk
= (IUnknown
*)0x00ff00ff;
589 hres
= CreateAsyncBindCtx(0, &bsc
, NULL
, &bctx
);
590 ok(SUCCEEDED(hres
), "CreateAsyncBindCtx failed: %08lx\n\n", hres
);
594 hres
= RegisterBindStatusCallback(bctx
, &bsc
, &previousclb
, 0);
595 ok(SUCCEEDED(hres
), "RegisterBindStatusCallback failed: %08lx\n", hres
);
596 ok(previousclb
== &bsc
, "previousclb(%p) != sclb(%p)\n", previousclb
, &bsc
);
598 IBindStatusCallback_Release(previousclb
);
600 hres
= CreateURLMoniker(NULL
, urls
[test_protocol
], &mon
);
601 ok(SUCCEEDED(hres
), "failed to create moniker: %08lx\n", hres
);
603 IBindCtx_Release(bctx
);
607 if(test_protocol
== FILE_TEST
&& INDEX_HTML
[7] == '/')
608 memmove(INDEX_HTML
+7, INDEX_HTML
+8, lstrlenW(INDEX_HTML
+7)*sizeof(WCHAR
));
610 hres
= IMoniker_QueryInterface(mon
, &IID_IBinding
, (void**)&bind
);
611 ok(hres
== E_NOINTERFACE
, "IMoniker should not have IBinding interface\n");
613 IBinding_Release(bind
);
615 hres
= IMoniker_GetDisplayName(mon
, bctx
, NULL
, &display_name
);
616 ok(hres
== S_OK
, "GetDisplayName failed %08lx\n", hres
);
617 ok(!lstrcmpW(display_name
, urls
[test_protocol
]), "GetDisplayName got wrong name\n");
619 SET_EXPECT(GetBindInfo
);
620 SET_EXPECT(OnStartBinding
);
621 if(emulate_protocol
) {
623 SET_EXPECT(Terminate
);
624 SET_EXPECT(UnlockRequest
);
626 if(test_protocol
== HTTP_TEST
) {
627 SET_EXPECT(OnProgress_FINDINGRESOURCE
);
628 SET_EXPECT(OnProgress_CONNECTING
);
630 if(test_protocol
== HTTP_TEST
|| test_protocol
== FILE_TEST
)
631 SET_EXPECT(OnProgress_SENDINGREQUEST
);
632 SET_EXPECT(OnProgress_MIMETYPEAVAILABLE
);
633 SET_EXPECT(OnProgress_BEGINDOWNLOADDATA
);
634 SET_EXPECT(OnDataAvailable
);
635 if(test_protocol
== HTTP_TEST
)
636 SET_EXPECT(OnProgress_DOWNLOADINGDATA
);
637 SET_EXPECT(OnProgress_ENDDOWNLOADDATA
);
638 SET_EXPECT(OnStopBinding
);
641 hres
= IMoniker_BindToStorage(mon
, bctx
, NULL
, &IID_IStream
, (void**)&unk
);
642 ok(SUCCEEDED(hres
), "IMoniker_BindToStorage failed: %08lx\n", hres
);
643 if (!SUCCEEDED(hres
)) return;
645 if(test_protocol
== HTTP_TEST
) {
647 ok(unk
== NULL
, "istr should be NULL\n");
650 ok(unk
!= NULL
, "unk == NULL\n");
653 IUnknown_Release(unk
);
655 while(!stopped_binding
&& GetMessage(&msg
,NULL
,0,0)) {
656 TranslateMessage(&msg
);
657 DispatchMessage(&msg
);
660 CHECK_CALLED(GetBindInfo
);
661 CHECK_CALLED(OnStartBinding
);
662 if(emulate_protocol
) {
664 CHECK_CALLED(Terminate
);
665 CHECK_CALLED(UnlockRequest
);
667 if(test_protocol
== HTTP_TEST
) {
668 CHECK_CALLED(OnProgress_FINDINGRESOURCE
);
669 CHECK_CALLED(OnProgress_CONNECTING
);
670 CHECK_CALLED(OnProgress_SENDINGREQUEST
);
671 todo_wine
{ CHECK_CALLED(OnProgress_MIMETYPEAVAILABLE
); }
673 CHECK_CALLED(OnProgress_MIMETYPEAVAILABLE
);
675 CHECK_CALLED(OnProgress_BEGINDOWNLOADDATA
);
676 CHECK_CALLED(OnDataAvailable
);
677 if(test_protocol
== HTTP_TEST
)
678 CHECK_CALLED(OnProgress_DOWNLOADINGDATA
);
679 CHECK_CALLED(OnProgress_ENDDOWNLOADDATA
);
680 CHECK_CALLED(OnStopBinding
);
683 ok(IMoniker_Release(mon
) == 0, "mon should be destroyed here\n");
684 ok(IBindCtx_Release(bctx
) == 0, "bctx should be destroyed here\n");
687 static void set_file_url(void)
691 static const WCHAR wszFile
[] = {'f','i','l','e',':','/','/'};
693 memcpy(INDEX_HTML
, wszFile
, sizeof(wszFile
));
694 len
= sizeof(wszFile
)/sizeof(WCHAR
);
695 INDEX_HTML
[len
++] = '/';
696 len
+= GetCurrentDirectoryW(sizeof(INDEX_HTML
)/sizeof(WCHAR
)-len
, INDEX_HTML
+len
);
697 INDEX_HTML
[len
++] = '\\';
698 memcpy(INDEX_HTML
+len
, wszIndexHtml
, sizeof(wszIndexHtml
));
701 static void create_file(void)
706 static const char html_doc
[] = "<HTML></HTML>";
708 file
= CreateFileW(wszIndexHtml
, GENERIC_WRITE
, 0, NULL
, CREATE_ALWAYS
,
709 FILE_ATTRIBUTE_NORMAL
, NULL
);
710 ok(file
!= INVALID_HANDLE_VALUE
, "CreateFile failed\n");
711 if(file
== INVALID_HANDLE_VALUE
)
714 WriteFile(file
, html_doc
, sizeof(html_doc
)-1, &size
, NULL
);
720 static void test_BindToStorage_fail(void)
722 IMoniker
*mon
= NULL
;
723 IBindCtx
*bctx
= NULL
;
727 hres
= CreateURLMoniker(NULL
, ABOUT_BLANK
, &mon
);
728 ok(hres
== S_OK
, "CreateURLMoniker failed: %08lx\n", hres
);
732 hres
= CreateAsyncBindCtxEx(NULL
, 0, NULL
, NULL
, &bctx
, 0);
733 ok(hres
== S_OK
, "CreateAsyncBindCtxEx failed: %08lx\n", hres
);
735 hres
= IMoniker_BindToStorage(mon
, bctx
, NULL
, &IID_IStream
, (void**)&unk
);
736 ok(hres
== MK_E_SYNTAX
, "hres=%08lx, expected INET_E_SYNTAX\n", hres
);
738 IBindCtx_Release(bctx
);
740 IMoniker_Release(mon
);
746 test_CreateAsyncBindCtx();
747 test_CreateAsyncBindCtxEx();
749 trace("http test...\n");
750 emulate_protocol
= FALSE
;
751 test_protocol
= HTTP_TEST
;
752 test_BindToStorage();
754 trace("about test...\n");
755 test_protocol
= ABOUT_TEST
;
756 test_BindToStorage();
758 trace("emulated about test...\n");
759 emulate_protocol
= TRUE
;
760 test_protocol
= ABOUT_TEST
;
761 test_BindToStorage();
763 trace("file test...\n");
765 emulate_protocol
= FALSE
;
766 test_protocol
= FILE_TEST
;
767 test_BindToStorage();
768 DeleteFileW(wszIndexHtml
);
770 trace("emulated file test...\n");
772 emulate_protocol
= TRUE
;
773 test_protocol
= FILE_TEST
;
774 test_BindToStorage();
776 test_BindToStorage_fail();