2 * Copyright 2006-2010 Jacek Caban for CodeWeavers
4 * This library is free software; you can redistribute it and/or
5 * modify it under the terms of the GNU Lesser General Public
6 * License as published by the Free Software Foundation; either
7 * version 2.1 of the License, or (at your option) any later version.
9 * This library is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12 * Lesser General Public License for more details.
14 * You should have received a copy of the GNU Lesser General Public
15 * License along with this library; if not, write to the Free Software
16 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
24 #define NONAMELESSUNION
25 #define NONAMELESSSTRUCT
37 #include "wine/debug.h"
38 #include "wine/unicode.h"
40 #include "mshtml_private.h"
42 WINE_DEFAULT_DEBUG_CHANNEL(mshtml
);
44 #define CONTENT_LENGTH "Content-Length"
45 #define UTF16_STR "utf-16"
48 nsIInputStream nsIInputStream_iface
;
57 void (*destroy
)(BSCallback
*);
58 HRESULT (*init_bindinfo
)(BSCallback
*);
59 HRESULT (*start_binding
)(BSCallback
*);
60 HRESULT (*stop_binding
)(BSCallback
*,HRESULT
);
61 HRESULT (*read_data
)(BSCallback
*,IStream
*);
62 HRESULT (*on_progress
)(BSCallback
*,ULONG
,LPCWSTR
);
63 HRESULT (*on_response
)(BSCallback
*,DWORD
,LPCWSTR
);
64 HRESULT (*beginning_transaction
)(BSCallback
*,WCHAR
**);
68 IBindStatusCallback IBindStatusCallback_iface
;
69 IServiceProvider IServiceProvider_iface
;
70 IHttpNegotiate2 IHttpNegotiate2_iface
;
71 IInternetBindInfo IInternetBindInfo_iface
;
73 const BSCallbackVtbl
*vtbl
;
87 HTMLDocumentNode
*doc
;
92 static inline nsProtocolStream
*impl_from_nsIInputStream(nsIInputStream
*iface
)
94 return CONTAINING_RECORD(iface
, nsProtocolStream
, nsIInputStream_iface
);
97 static nsresult NSAPI
nsInputStream_QueryInterface(nsIInputStream
*iface
, nsIIDRef riid
,
100 nsProtocolStream
*This
= impl_from_nsIInputStream(iface
);
104 if(IsEqualGUID(&IID_nsISupports
, riid
)) {
105 TRACE("(%p)->(IID_nsISupports %p)\n", This
, result
);
106 *result
= &This
->nsIInputStream_iface
;
107 }else if(IsEqualGUID(&IID_nsIInputStream
, riid
)) {
108 TRACE("(%p)->(IID_nsIInputStream %p)\n", This
, result
);
109 *result
= &This
->nsIInputStream_iface
;
113 nsIInputStream_AddRef(&This
->nsIInputStream_iface
);
117 WARN("unsupported interface %s\n", debugstr_guid(riid
));
118 return NS_NOINTERFACE
;
121 static nsrefcnt NSAPI
nsInputStream_AddRef(nsIInputStream
*iface
)
123 nsProtocolStream
*This
= impl_from_nsIInputStream(iface
);
124 LONG ref
= InterlockedIncrement(&This
->ref
);
126 TRACE("(%p) ref=%d\n", This
, ref
);
132 static nsrefcnt NSAPI
nsInputStream_Release(nsIInputStream
*iface
)
134 nsProtocolStream
*This
= impl_from_nsIInputStream(iface
);
135 LONG ref
= InterlockedDecrement(&This
->ref
);
137 TRACE("(%p) ref=%d\n", This
, ref
);
145 static nsresult NSAPI
nsInputStream_Close(nsIInputStream
*iface
)
147 nsProtocolStream
*This
= impl_from_nsIInputStream(iface
);
148 FIXME("(%p)\n", This
);
149 return NS_ERROR_NOT_IMPLEMENTED
;
152 static nsresult NSAPI
nsInputStream_Available(nsIInputStream
*iface
, PRUint32
*_retval
)
154 nsProtocolStream
*This
= impl_from_nsIInputStream(iface
);
155 FIXME("(%p)->(%p)\n", This
, _retval
);
156 return NS_ERROR_NOT_IMPLEMENTED
;
159 static nsresult NSAPI
nsInputStream_Read(nsIInputStream
*iface
, char *aBuf
, PRUint32 aCount
,
162 nsProtocolStream
*This
= impl_from_nsIInputStream(iface
);
165 TRACE("(%p)->(%p %d %p)\n", This
, aBuf
, aCount
, _retval
);
167 if(read
> This
->buf_size
)
168 read
= This
->buf_size
;
171 memcpy(aBuf
, This
->buf
, read
);
172 if(read
< This
->buf_size
)
173 memmove(This
->buf
, This
->buf
+read
, This
->buf_size
-read
);
174 This
->buf_size
-= read
;
181 static nsresult NSAPI
nsInputStream_ReadSegments(nsIInputStream
*iface
,
182 nsresult (WINAPI
*aWriter
)(nsIInputStream
*,void*,const char*,PRUint32
,PRUint32
,PRUint32
*),
183 void *aClousure
, PRUint32 aCount
, PRUint32
*_retval
)
185 nsProtocolStream
*This
= impl_from_nsIInputStream(iface
);
186 PRUint32 written
= 0;
189 TRACE("(%p)->(%p %p %d %p)\n", This
, aWriter
, aClousure
, aCount
, _retval
);
194 if(aCount
> This
->buf_size
)
195 aCount
= This
->buf_size
;
197 nsres
= aWriter(&This
->nsIInputStream_iface
, aClousure
, This
->buf
, 0, aCount
, &written
);
199 TRACE("aWritter failed: %08x\n", nsres
);
200 else if(written
!= This
->buf_size
)
201 FIXME("written %d != buf_size %d\n", written
, This
->buf_size
);
203 This
->buf_size
-= written
;
209 static nsresult NSAPI
nsInputStream_IsNonBlocking(nsIInputStream
*iface
, PRBool
*_retval
)
211 nsProtocolStream
*This
= impl_from_nsIInputStream(iface
);
212 FIXME("(%p)->(%p)\n", This
, _retval
);
213 return NS_ERROR_NOT_IMPLEMENTED
;
216 static const nsIInputStreamVtbl nsInputStreamVtbl
= {
217 nsInputStream_QueryInterface
,
218 nsInputStream_AddRef
,
219 nsInputStream_Release
,
221 nsInputStream_Available
,
223 nsInputStream_ReadSegments
,
224 nsInputStream_IsNonBlocking
227 static nsProtocolStream
*create_nsprotocol_stream(void)
229 nsProtocolStream
*ret
= heap_alloc(sizeof(nsProtocolStream
));
231 ret
->nsIInputStream_iface
.lpVtbl
= &nsInputStreamVtbl
;
238 static inline BSCallback
*impl_from_IBindStatusCallback(IBindStatusCallback
*iface
)
240 return CONTAINING_RECORD(iface
, BSCallback
, IBindStatusCallback_iface
);
243 static HRESULT WINAPI
BindStatusCallback_QueryInterface(IBindStatusCallback
*iface
,
244 REFIID riid
, void **ppv
)
246 BSCallback
*This
= impl_from_IBindStatusCallback(iface
);
249 if(IsEqualGUID(&IID_IUnknown
, riid
)) {
250 TRACE("(%p)->(IID_IUnknown, %p)\n", This
, ppv
);
251 *ppv
= &This
->IBindStatusCallback_iface
;
252 }else if(IsEqualGUID(&IID_IBindStatusCallback
, riid
)) {
253 TRACE("(%p)->(IID_IBindStatusCallback, %p)\n", This
, ppv
);
254 *ppv
= &This
->IBindStatusCallback_iface
;
255 }else if(IsEqualGUID(&IID_IServiceProvider
, riid
)) {
256 TRACE("(%p)->(IID_IServiceProvider %p)\n", This
, ppv
);
257 *ppv
= &This
->IServiceProvider_iface
;
258 }else if(IsEqualGUID(&IID_IHttpNegotiate
, riid
)) {
259 TRACE("(%p)->(IID_IHttpNegotiate %p)\n", This
, ppv
);
260 *ppv
= &This
->IHttpNegotiate2_iface
;
261 }else if(IsEqualGUID(&IID_IHttpNegotiate2
, riid
)) {
262 TRACE("(%p)->(IID_IHttpNegotiate2 %p)\n", This
, ppv
);
263 *ppv
= &This
->IHttpNegotiate2_iface
;
264 }else if(IsEqualGUID(&IID_IInternetBindInfo
, riid
)) {
265 TRACE("(%p)->(IID_IInternetBindInfo %p)\n", This
, ppv
);
266 *ppv
= &This
->IInternetBindInfo_iface
;
270 IBindStatusCallback_AddRef(&This
->IBindStatusCallback_iface
);
274 TRACE("Unsupported riid = %s\n", debugstr_guid(riid
));
275 return E_NOINTERFACE
;
278 static ULONG WINAPI
BindStatusCallback_AddRef(IBindStatusCallback
*iface
)
280 BSCallback
*This
= impl_from_IBindStatusCallback(iface
);
281 LONG ref
= InterlockedIncrement(&This
->ref
);
283 TRACE("(%p) ref = %d\n", This
, ref
);
288 static ULONG WINAPI
BindStatusCallback_Release(IBindStatusCallback
*iface
)
290 BSCallback
*This
= impl_from_IBindStatusCallback(iface
);
291 LONG ref
= InterlockedDecrement(&This
->ref
);
293 TRACE("(%p) ref = %d\n", This
, ref
);
297 GlobalFree(This
->post_data
);
299 IMoniker_Release(This
->mon
);
301 IBinding_Release(This
->binding
);
302 list_remove(&This
->entry
);
303 list_init(&This
->entry
);
304 heap_free(This
->headers
);
306 This
->vtbl
->destroy(This
);
312 static HRESULT WINAPI
BindStatusCallback_OnStartBinding(IBindStatusCallback
*iface
,
313 DWORD dwReserved
, IBinding
*pbind
)
315 BSCallback
*This
= impl_from_IBindStatusCallback(iface
);
317 TRACE("(%p)->(%d %p)\n", This
, dwReserved
, pbind
);
319 IBinding_AddRef(pbind
);
320 This
->binding
= pbind
;
323 list_add_head(&This
->doc
->bindings
, &This
->entry
);
325 return This
->vtbl
->start_binding(This
);
328 static HRESULT WINAPI
BindStatusCallback_GetPriority(IBindStatusCallback
*iface
, LONG
*pnPriority
)
330 BSCallback
*This
= impl_from_IBindStatusCallback(iface
);
331 FIXME("(%p)->(%p)\n", This
, pnPriority
);
335 static HRESULT WINAPI
BindStatusCallback_OnLowResource(IBindStatusCallback
*iface
, DWORD reserved
)
337 BSCallback
*This
= impl_from_IBindStatusCallback(iface
);
338 FIXME("(%p)->(%d)\n", This
, reserved
);
342 static HRESULT WINAPI
BindStatusCallback_OnProgress(IBindStatusCallback
*iface
, ULONG ulProgress
,
343 ULONG ulProgressMax
, ULONG ulStatusCode
, LPCWSTR szStatusText
)
345 BSCallback
*This
= impl_from_IBindStatusCallback(iface
);
347 TRACE("%p)->(%u %u %u %s)\n", This
, ulProgress
, ulProgressMax
, ulStatusCode
,
348 debugstr_w(szStatusText
));
350 return This
->vtbl
->on_progress(This
, ulStatusCode
, szStatusText
);
353 static HRESULT WINAPI
BindStatusCallback_OnStopBinding(IBindStatusCallback
*iface
,
354 HRESULT hresult
, LPCWSTR szError
)
356 BSCallback
*This
= impl_from_IBindStatusCallback(iface
);
359 TRACE("(%p)->(%08x %s)\n", This
, hresult
, debugstr_w(szError
));
361 /* NOTE: IE7 calls GetBindResult here */
363 hres
= This
->vtbl
->stop_binding(This
, hresult
);
366 IBinding_Release(This
->binding
);
367 This
->binding
= NULL
;
370 list_remove(&This
->entry
);
371 list_init(&This
->entry
);
377 static HRESULT WINAPI
BindStatusCallback_GetBindInfo(IBindStatusCallback
*iface
,
378 DWORD
*grfBINDF
, BINDINFO
*pbindinfo
)
380 BSCallback
*This
= impl_from_IBindStatusCallback(iface
);
383 TRACE("(%p)->(%p %p)\n", This
, grfBINDF
, pbindinfo
);
385 if(!This
->bindinfo_ready
) {
388 hres
= This
->vtbl
->init_bindinfo(This
);
392 This
->bindinfo_ready
= TRUE
;
395 *grfBINDF
= This
->bindf
;
397 size
= pbindinfo
->cbSize
;
398 memset(pbindinfo
, 0, size
);
399 pbindinfo
->cbSize
= size
;
401 pbindinfo
->cbstgmedData
= This
->post_data_len
;
402 pbindinfo
->dwCodePage
= CP_UTF8
;
403 pbindinfo
->dwOptions
= 0x80000;
405 if(This
->post_data
) {
406 pbindinfo
->dwBindVerb
= BINDVERB_POST
;
408 pbindinfo
->stgmedData
.tymed
= TYMED_HGLOBAL
;
409 pbindinfo
->stgmedData
.u
.hGlobal
= This
->post_data
;
410 pbindinfo
->stgmedData
.pUnkForRelease
= (IUnknown
*)&This
->IBindStatusCallback_iface
;
411 IBindStatusCallback_AddRef(&This
->IBindStatusCallback_iface
);
417 static HRESULT WINAPI
BindStatusCallback_OnDataAvailable(IBindStatusCallback
*iface
,
418 DWORD grfBSCF
, DWORD dwSize
, FORMATETC
*pformatetc
, STGMEDIUM
*pstgmed
)
420 BSCallback
*This
= impl_from_IBindStatusCallback(iface
);
422 TRACE("(%p)->(%08x %d %p %p)\n", This
, grfBSCF
, dwSize
, pformatetc
, pstgmed
);
424 return This
->vtbl
->read_data(This
, pstgmed
->u
.pstm
);
427 static HRESULT WINAPI
BindStatusCallback_OnObjectAvailable(IBindStatusCallback
*iface
,
428 REFIID riid
, IUnknown
*punk
)
430 BSCallback
*This
= impl_from_IBindStatusCallback(iface
);
431 FIXME("(%p)->(%s %p)\n", This
, debugstr_guid(riid
), punk
);
435 static const IBindStatusCallbackVtbl BindStatusCallbackVtbl
= {
436 BindStatusCallback_QueryInterface
,
437 BindStatusCallback_AddRef
,
438 BindStatusCallback_Release
,
439 BindStatusCallback_OnStartBinding
,
440 BindStatusCallback_GetPriority
,
441 BindStatusCallback_OnLowResource
,
442 BindStatusCallback_OnProgress
,
443 BindStatusCallback_OnStopBinding
,
444 BindStatusCallback_GetBindInfo
,
445 BindStatusCallback_OnDataAvailable
,
446 BindStatusCallback_OnObjectAvailable
449 static inline BSCallback
*impl_from_IHttpNegotiate2(IHttpNegotiate2
*iface
)
451 return CONTAINING_RECORD(iface
, BSCallback
, IHttpNegotiate2_iface
);
454 static HRESULT WINAPI
HttpNegotiate_QueryInterface(IHttpNegotiate2
*iface
,
455 REFIID riid
, void **ppv
)
457 BSCallback
*This
= impl_from_IHttpNegotiate2(iface
);
458 return IBindStatusCallback_QueryInterface(&This
->IBindStatusCallback_iface
, riid
, ppv
);
461 static ULONG WINAPI
HttpNegotiate_AddRef(IHttpNegotiate2
*iface
)
463 BSCallback
*This
= impl_from_IHttpNegotiate2(iface
);
464 return IBindStatusCallback_AddRef(&This
->IBindStatusCallback_iface
);
467 static ULONG WINAPI
HttpNegotiate_Release(IHttpNegotiate2
*iface
)
469 BSCallback
*This
= impl_from_IHttpNegotiate2(iface
);
470 return IBindStatusCallback_Release(&This
->IBindStatusCallback_iface
);
473 static HRESULT WINAPI
HttpNegotiate_BeginningTransaction(IHttpNegotiate2
*iface
,
474 LPCWSTR szURL
, LPCWSTR szHeaders
, DWORD dwReserved
, LPWSTR
*pszAdditionalHeaders
)
476 BSCallback
*This
= impl_from_IHttpNegotiate2(iface
);
479 TRACE("(%p)->(%s %s %d %p)\n", This
, debugstr_w(szURL
), debugstr_w(szHeaders
),
480 dwReserved
, pszAdditionalHeaders
);
482 *pszAdditionalHeaders
= NULL
;
484 hres
= This
->vtbl
->beginning_transaction(This
, pszAdditionalHeaders
);
491 size
= (strlenW(This
->headers
)+1)*sizeof(WCHAR
);
492 *pszAdditionalHeaders
= CoTaskMemAlloc(size
);
493 if(!*pszAdditionalHeaders
)
494 return E_OUTOFMEMORY
;
495 memcpy(*pszAdditionalHeaders
, This
->headers
, size
);
501 static HRESULT WINAPI
HttpNegotiate_OnResponse(IHttpNegotiate2
*iface
, DWORD dwResponseCode
,
502 LPCWSTR szResponseHeaders
, LPCWSTR szRequestHeaders
, LPWSTR
*pszAdditionalRequestHeaders
)
504 BSCallback
*This
= impl_from_IHttpNegotiate2(iface
);
506 TRACE("(%p)->(%d %s %s %p)\n", This
, dwResponseCode
, debugstr_w(szResponseHeaders
),
507 debugstr_w(szRequestHeaders
), pszAdditionalRequestHeaders
);
509 return This
->vtbl
->on_response(This
, dwResponseCode
, szResponseHeaders
);
512 static HRESULT WINAPI
HttpNegotiate_GetRootSecurityId(IHttpNegotiate2
*iface
,
513 BYTE
*pbSecurityId
, DWORD
*pcbSecurityId
, DWORD_PTR dwReserved
)
515 BSCallback
*This
= impl_from_IHttpNegotiate2(iface
);
516 FIXME("(%p)->(%p %p %ld)\n", This
, pbSecurityId
, pcbSecurityId
, dwReserved
);
520 static const IHttpNegotiate2Vtbl HttpNegotiate2Vtbl
= {
521 HttpNegotiate_QueryInterface
,
522 HttpNegotiate_AddRef
,
523 HttpNegotiate_Release
,
524 HttpNegotiate_BeginningTransaction
,
525 HttpNegotiate_OnResponse
,
526 HttpNegotiate_GetRootSecurityId
529 static inline BSCallback
*impl_from_IInternetBindInfo(IInternetBindInfo
*iface
)
531 return CONTAINING_RECORD(iface
, BSCallback
, IInternetBindInfo_iface
);
534 static HRESULT WINAPI
InternetBindInfo_QueryInterface(IInternetBindInfo
*iface
,
535 REFIID riid
, void **ppv
)
537 BSCallback
*This
= impl_from_IInternetBindInfo(iface
);
538 return IBindStatusCallback_QueryInterface(&This
->IBindStatusCallback_iface
, riid
, ppv
);
541 static ULONG WINAPI
InternetBindInfo_AddRef(IInternetBindInfo
*iface
)
543 BSCallback
*This
= impl_from_IInternetBindInfo(iface
);
544 return IBindStatusCallback_AddRef(&This
->IBindStatusCallback_iface
);
547 static ULONG WINAPI
InternetBindInfo_Release(IInternetBindInfo
*iface
)
549 BSCallback
*This
= impl_from_IInternetBindInfo(iface
);
550 return IBindStatusCallback_Release(&This
->IBindStatusCallback_iface
);
553 static HRESULT WINAPI
InternetBindInfo_GetBindInfo(IInternetBindInfo
*iface
,
554 DWORD
*grfBINDF
, BINDINFO
*pbindinfo
)
556 BSCallback
*This
= impl_from_IInternetBindInfo(iface
);
557 FIXME("(%p)->(%p %p)\n", This
, grfBINDF
, pbindinfo
);
561 static HRESULT WINAPI
InternetBindInfo_GetBindString(IInternetBindInfo
*iface
,
562 ULONG ulStringType
, LPOLESTR
*ppwzStr
, ULONG cEl
, ULONG
*pcElFetched
)
564 BSCallback
*This
= impl_from_IInternetBindInfo(iface
);
565 FIXME("(%p)->(%u %p %u %p)\n", This
, ulStringType
, ppwzStr
, cEl
, pcElFetched
);
569 static const IInternetBindInfoVtbl InternetBindInfoVtbl
= {
570 InternetBindInfo_QueryInterface
,
571 InternetBindInfo_AddRef
,
572 InternetBindInfo_Release
,
573 InternetBindInfo_GetBindInfo
,
574 InternetBindInfo_GetBindString
577 static inline BSCallback
*impl_from_IServiceProvider(IServiceProvider
*iface
)
579 return CONTAINING_RECORD(iface
, BSCallback
, IServiceProvider_iface
);
582 static HRESULT WINAPI
BSCServiceProvider_QueryInterface(IServiceProvider
*iface
,
583 REFIID riid
, void **ppv
)
585 BSCallback
*This
= impl_from_IServiceProvider(iface
);
586 return IBindStatusCallback_QueryInterface(&This
->IBindStatusCallback_iface
, riid
, ppv
);
589 static ULONG WINAPI
BSCServiceProvider_AddRef(IServiceProvider
*iface
)
591 BSCallback
*This
= impl_from_IServiceProvider(iface
);
592 return IBindStatusCallback_AddRef(&This
->IBindStatusCallback_iface
);
595 static ULONG WINAPI
BSCServiceProvider_Release(IServiceProvider
*iface
)
597 BSCallback
*This
= impl_from_IServiceProvider(iface
);
598 return IBindStatusCallback_Release(&This
->IBindStatusCallback_iface
);
601 static HRESULT WINAPI
BSCServiceProvider_QueryService(IServiceProvider
*iface
,
602 REFGUID guidService
, REFIID riid
, void **ppv
)
604 BSCallback
*This
= impl_from_IServiceProvider(iface
);
605 TRACE("(%p)->(%s %s %p)\n", This
, debugstr_guid(guidService
), debugstr_guid(riid
), ppv
);
606 return E_NOINTERFACE
;
609 static const IServiceProviderVtbl ServiceProviderVtbl
= {
610 BSCServiceProvider_QueryInterface
,
611 BSCServiceProvider_AddRef
,
612 BSCServiceProvider_Release
,
613 BSCServiceProvider_QueryService
616 static void init_bscallback(BSCallback
*This
, const BSCallbackVtbl
*vtbl
, IMoniker
*mon
, DWORD bindf
)
618 This
->IBindStatusCallback_iface
.lpVtbl
= &BindStatusCallbackVtbl
;
619 This
->IServiceProvider_iface
.lpVtbl
= &ServiceProviderVtbl
;
620 This
->IHttpNegotiate2_iface
.lpVtbl
= &HttpNegotiate2Vtbl
;
621 This
->IInternetBindInfo_iface
.lpVtbl
= &InternetBindInfoVtbl
;
626 list_init(&This
->entry
);
629 IMoniker_AddRef(mon
);
633 /* Calls undocumented 84 cmd of CGID_ShellDocView */
634 static void call_docview_84(HTMLDocumentObj
*doc
)
636 IOleCommandTarget
*olecmd
;
643 hres
= IOleClientSite_QueryInterface(doc
->client
, &IID_IOleCommandTarget
, (void**)&olecmd
);
648 hres
= IOleCommandTarget_Exec(olecmd
, &CGID_ShellDocView
, 84, 0, NULL
, &var
);
649 IOleCommandTarget_Release(olecmd
);
650 if(SUCCEEDED(hres
) && V_VT(&var
) != VT_NULL
)
651 FIXME("handle result\n");
654 static HRESULT
parse_headers(const WCHAR
*headers
, struct list
*headers_list
)
656 const WCHAR
*header
, *header_end
, *colon
, *value
;
661 if(header
[0] == '\r' && header
[1] == '\n' && !header
[2])
663 for(colon
= header
; *colon
&& *colon
!= ':' && *colon
!= '\r'; colon
++);
673 for(header_end
= value
+1; *header_end
&& *header_end
!= '\r'; header_end
++);
675 hres
= set_http_header(headers_list
, header
, colon
-header
, value
, header_end
-value
);
680 if(header
[0] == '\r' && header
[1] == '\n')
687 static HRESULT
read_post_data_stream(nsIInputStream
*stream
, HGLOBAL
*post_data
,
688 ULONG
*post_data_len
)
690 PRUint32 data_len
= 0, available
= 0;
694 nsres
= nsIInputStream_Available(stream
, &available
);
698 data
= GlobalAlloc(0, available
+1);
700 return E_OUTOFMEMORY
;
702 nsres
= nsIInputStream_Read(stream
, data
, available
, &data_len
);
703 if(NS_FAILED(nsres
)) {
710 *post_data_len
= data_len
;
714 HRESULT
start_binding(HTMLWindow
*window
, HTMLDocumentNode
*doc
, BSCallback
*bscallback
, IBindCtx
*bctx
)
719 bscallback
->doc
= doc
;
721 /* NOTE: IE7 calls IsSystemMoniker here*/
724 if(bscallback
->mon
!= window
->mon
)
725 set_current_mon(window
, bscallback
->mon
);
726 call_docview_84(window
->doc_obj
);
730 RegisterBindStatusCallback(bctx
, &bscallback
->IBindStatusCallback_iface
, NULL
, 0);
731 IBindCtx_AddRef(bctx
);
733 hres
= CreateAsyncBindCtx(0, &bscallback
->IBindStatusCallback_iface
, NULL
, &bctx
);
735 WARN("CreateAsyncBindCtx failed: %08x\n", hres
);
736 bscallback
->vtbl
->stop_binding(bscallback
, hres
);
741 hres
= IMoniker_BindToStorage(bscallback
->mon
, bctx
, NULL
, &IID_IStream
, (void**)&str
);
742 IBindCtx_Release(bctx
);
744 WARN("BindToStorage failed: %08x\n", hres
);
745 bscallback
->vtbl
->stop_binding(bscallback
, hres
);
750 IStream_Release(str
);
752 IMoniker_Release(bscallback
->mon
);
753 bscallback
->mon
= NULL
;
766 static inline BufferBSC
*BufferBSC_from_BSCallback(BSCallback
*iface
)
768 return CONTAINING_RECORD(iface
, BufferBSC
, bsc
);
771 static void BufferBSC_destroy(BSCallback
*bsc
)
773 BufferBSC
*This
= BufferBSC_from_BSCallback(bsc
);
775 heap_free(This
->buf
);
779 static HRESULT
BufferBSC_init_bindinfo(BSCallback
*bsc
)
784 static HRESULT
BufferBSC_start_binding(BSCallback
*bsc
)
789 static HRESULT
BufferBSC_stop_binding(BSCallback
*bsc
, HRESULT result
)
791 BufferBSC
*This
= BufferBSC_from_BSCallback(bsc
);
796 heap_free(This
->buf
);
804 static HRESULT
BufferBSC_read_data(BSCallback
*bsc
, IStream
*stream
)
806 BufferBSC
*This
= BufferBSC_from_BSCallback(bsc
);
812 This
->buf
= heap_alloc(This
->size
);
816 if(This
->bsc
.readed
== This
->size
) {
818 This
->buf
= heap_realloc(This
->buf
, This
->size
);
822 hres
= IStream_Read(stream
, This
->buf
+This
->bsc
.readed
, This
->size
-This
->bsc
.readed
, &readed
);
823 This
->bsc
.readed
+= readed
;
824 }while(hres
== S_OK
);
829 static HRESULT
BufferBSC_on_progress(BSCallback
*bsc
, ULONG status_code
, LPCWSTR status_text
)
834 static HRESULT
BufferBSC_on_response(BSCallback
*bsc
, DWORD response_code
,
835 LPCWSTR response_headers
)
840 static HRESULT
BufferBSC_beginning_transaction(BSCallback
*bsc
, WCHAR
**additional_headers
)
845 static const BSCallbackVtbl BufferBSCVtbl
= {
847 BufferBSC_init_bindinfo
,
848 BufferBSC_start_binding
,
849 BufferBSC_stop_binding
,
851 BufferBSC_on_progress
,
852 BufferBSC_on_response
,
853 BufferBSC_beginning_transaction
857 static BufferBSC
*create_bufferbsc(IMoniker
*mon
)
859 BufferBSC
*ret
= heap_alloc_zero(sizeof(*ret
));
861 init_bscallback(&ret
->bsc
, &BufferBSCVtbl
, mon
, 0);
867 HRESULT
bind_mon_to_buffer(HTMLDocumentNode
*doc
, IMoniker
*mon
, void **buf
, DWORD
*size
)
869 BufferBSC
*bsc
= create_bufferbsc(mon
);
874 hres
= start_binding(NULL
, doc
, &bsc
->bsc
, NULL
);
875 if(SUCCEEDED(hres
)) {
877 if(SUCCEEDED(hres
)) {
880 *size
= bsc
->bsc
.readed
;
885 IBindStatusCallback_Release(&bsc
->bsc
.IBindStatusCallback_iface
);
890 struct nsChannelBSC
{
895 nsChannel
*nschannel
;
896 nsIStreamListener
*nslistener
;
897 nsISupports
*nscontext
;
899 nsProtocolStream
*nsstream
;
902 static HRESULT
on_start_nsrequest(nsChannelBSC
*This
)
906 /* FIXME: it's needed for http connections from BindToObject. */
907 if(!This
->nschannel
->response_status
)
908 This
->nschannel
->response_status
= 200;
910 nsres
= nsIStreamListener_OnStartRequest(This
->nslistener
,
911 (nsIRequest
*)&This
->nschannel
->nsIHttpChannel_iface
, This
->nscontext
);
912 if(NS_FAILED(nsres
)) {
913 FIXME("OnStartRequest failed: %08x\n", nsres
);
918 update_window_doc(This
->window
);
919 if(This
->window
->doc
!= This
->bsc
.doc
)
920 This
->bsc
.doc
= This
->window
->doc
;
921 if(This
->window
->readystate
!= READYSTATE_LOADING
)
922 set_ready_state(This
->window
, READYSTATE_LOADING
);
928 static void on_stop_nsrequest(nsChannelBSC
*This
, HRESULT result
)
930 nsresult nsres
, request_result
;
934 request_result
= NS_OK
;
937 request_result
= NS_BINDING_ABORTED
;
940 request_result
= NS_ERROR_FAILURE
;
943 if(!This
->bsc
.readed
&& SUCCEEDED(result
)) {
944 TRACE("No data read! Calling OnStartRequest\n");
945 on_start_nsrequest(This
);
948 if(This
->nslistener
) {
949 nsres
= nsIStreamListener_OnStopRequest(This
->nslistener
,
950 (nsIRequest
*)&This
->nschannel
->nsIHttpChannel_iface
, This
->nscontext
,
953 WARN("OnStopRequet failed: %08x\n", nsres
);
956 if(This
->nschannel
->load_group
) {
957 nsres
= nsILoadGroup_RemoveRequest(This
->nschannel
->load_group
,
958 (nsIRequest
*)&This
->nschannel
->nsIHttpChannel_iface
, NULL
, request_result
);
960 ERR("RemoveRequest failed: %08x\n", nsres
);
964 static HRESULT
read_stream_data(nsChannelBSC
*This
, IStream
*stream
)
970 if(!This
->nslistener
) {
975 hres
= IStream_Read(stream
, buf
, sizeof(buf
), &read
);
976 }while(hres
== S_OK
&& read
);
982 This
->nsstream
= create_nsprotocol_stream();
986 hres
= IStream_Read(stream
, This
->nsstream
->buf
+This
->nsstream
->buf_size
,
987 sizeof(This
->nsstream
->buf
)-This
->nsstream
->buf_size
, &read
);
991 This
->nsstream
->buf_size
+= read
;
993 if(!This
->bsc
.readed
) {
994 if(This
->nsstream
->buf_size
>= 2
995 && (BYTE
)This
->nsstream
->buf
[0] == 0xff
996 && (BYTE
)This
->nsstream
->buf
[1] == 0xfe)
997 This
->nschannel
->charset
= heap_strdupA(UTF16_STR
);
999 if(!This
->nschannel
->content_type
) {
1002 hres
= FindMimeFromData(NULL
, NULL
, This
->nsstream
->buf
, This
->nsstream
->buf_size
, NULL
, 0, &mime
, 0);
1006 TRACE("Found MIME %s\n", debugstr_w(mime
));
1008 This
->nschannel
->content_type
= heap_strdupWtoA(mime
);
1009 CoTaskMemFree(mime
);
1010 if(!This
->nschannel
->content_type
)
1011 return E_OUTOFMEMORY
;
1014 on_start_nsrequest(This
);
1017 This
->bsc
.readed
+= This
->nsstream
->buf_size
;
1019 nsres
= nsIStreamListener_OnDataAvailable(This
->nslistener
,
1020 (nsIRequest
*)&This
->nschannel
->nsIHttpChannel_iface
, This
->nscontext
,
1021 &This
->nsstream
->nsIInputStream_iface
, This
->bsc
.readed
-This
->nsstream
->buf_size
,
1022 This
->nsstream
->buf_size
);
1023 if(NS_FAILED(nsres
))
1024 ERR("OnDataAvailable failed: %08x\n", nsres
);
1026 if(This
->nsstream
->buf_size
== sizeof(This
->nsstream
->buf
)) {
1027 ERR("buffer is full\n");
1030 }while(hres
== S_OK
);
1035 static inline nsChannelBSC
*nsChannelBSC_from_BSCallback(BSCallback
*iface
)
1037 return CONTAINING_RECORD(iface
, nsChannelBSC
, bsc
);
1040 static void nsChannelBSC_destroy(BSCallback
*bsc
)
1042 nsChannelBSC
*This
= nsChannelBSC_from_BSCallback(bsc
);
1045 nsIChannel_Release(&This
->nschannel
->nsIHttpChannel_iface
);
1046 if(This
->nslistener
)
1047 nsIStreamListener_Release(This
->nslistener
);
1049 nsISupports_Release(This
->nscontext
);
1051 nsIInputStream_Release(&This
->nsstream
->nsIInputStream_iface
);
1055 static HRESULT
nsChannelBSC_start_binding(BSCallback
*bsc
)
1057 nsChannelBSC
*This
= nsChannelBSC_from_BSCallback(bsc
);
1060 This
->window
->doc
->skip_mutation_notif
= FALSE
;
1065 static HRESULT
nsChannelBSC_init_bindinfo(BSCallback
*bsc
)
1067 nsChannelBSC
*This
= nsChannelBSC_from_BSCallback(bsc
);
1070 if(This
->nschannel
&& This
->nschannel
->post_data_stream
) {
1071 hres
= read_post_data_stream(This
->nschannel
->post_data_stream
,
1072 &This
->bsc
.post_data
, &This
->bsc
.post_data_len
);
1076 TRACE("post_data = %s\n", debugstr_an(This
->bsc
.post_data
, This
->bsc
.post_data_len
));
1085 } stop_request_task_t
;
1087 static void stop_request_proc(task_t
*_task
)
1089 stop_request_task_t
*task
= (stop_request_task_t
*)_task
;
1091 TRACE("(%p)\n", task
->bsc
);
1093 list_remove(&task
->bsc
->bsc
.entry
);
1094 list_init(&task
->bsc
->bsc
.entry
);
1095 on_stop_nsrequest(task
->bsc
, S_OK
);
1096 IBindStatusCallback_Release(&task
->bsc
->bsc
.IBindStatusCallback_iface
);
1099 static HRESULT
async_stop_request(nsChannelBSC
*This
)
1101 stop_request_task_t
*task
;
1103 task
= heap_alloc(sizeof(*task
));
1105 return E_OUTOFMEMORY
;
1107 IBindStatusCallback_AddRef(&This
->bsc
.IBindStatusCallback_iface
);
1109 push_task(&task
->header
, stop_request_proc
, This
->bsc
.doc
->basedoc
.doc_obj
->basedoc
.task_magic
);
1113 static HRESULT
nsChannelBSC_stop_binding(BSCallback
*bsc
, HRESULT result
)
1115 nsChannelBSC
*This
= nsChannelBSC_from_BSCallback(bsc
);
1117 if(This
->window
&& SUCCEEDED(result
)) {
1118 result
= async_stop_request(This
);
1119 if(SUCCEEDED(result
))
1123 on_stop_nsrequest(This
, result
);
1127 static HRESULT
nsChannelBSC_read_data(BSCallback
*bsc
, IStream
*stream
)
1129 nsChannelBSC
*This
= nsChannelBSC_from_BSCallback(bsc
);
1131 return read_stream_data(This
, stream
);
1134 static HRESULT
nsChannelBSC_on_progress(BSCallback
*bsc
, ULONG status_code
, LPCWSTR status_text
)
1136 nsChannelBSC
*This
= nsChannelBSC_from_BSCallback(bsc
);
1138 switch(status_code
) {
1139 case BINDSTATUS_MIMETYPEAVAILABLE
:
1140 if(!This
->nschannel
)
1143 heap_free(This
->nschannel
->content_type
);
1144 This
->nschannel
->content_type
= heap_strdupWtoA(status_text
);
1146 case BINDSTATUS_REDIRECTING
:
1147 TRACE("redirect to %s\n", debugstr_w(status_text
));
1149 /* FIXME: We should find a better way to handle this */
1150 set_wine_url(This
->nschannel
->uri
, status_text
);
1156 static HRESULT
nsChannelBSC_on_response(BSCallback
*bsc
, DWORD response_code
,
1157 LPCWSTR response_headers
)
1159 nsChannelBSC
*This
= nsChannelBSC_from_BSCallback(bsc
);
1162 This
->nschannel
->response_status
= response_code
;
1164 if(response_headers
) {
1165 const WCHAR
*headers
;
1167 headers
= strchrW(response_headers
, '\r');
1168 if(headers
&& headers
[1] == '\n') {
1170 hres
= parse_headers(headers
, &This
->nschannel
->response_headers
);
1172 WARN("parsing headers failed: %08x\n", hres
);
1181 static HRESULT
nsChannelBSC_beginning_transaction(BSCallback
*bsc
, WCHAR
**additional_headers
)
1183 nsChannelBSC
*This
= nsChannelBSC_from_BSCallback(bsc
);
1184 http_header_t
*iter
;
1188 static const WCHAR content_lengthW
[] =
1189 {'C','o','n','t','e','n','t','-','L','e','n','g','t','h',0};
1191 if(!This
->nschannel
)
1194 LIST_FOR_EACH_ENTRY(iter
, &This
->nschannel
->request_headers
, http_header_t
, entry
) {
1195 if(strcmpW(iter
->header
, content_lengthW
))
1196 len
+= strlenW(iter
->header
) + 2 /* ": " */ + strlenW(iter
->data
) + 2 /* "\r\n" */;
1202 *additional_headers
= ptr
= CoTaskMemAlloc((len
+1)*sizeof(WCHAR
));
1204 return E_OUTOFMEMORY
;
1206 LIST_FOR_EACH_ENTRY(iter
, &This
->nschannel
->request_headers
, http_header_t
, entry
) {
1207 if(!strcmpW(iter
->header
, content_lengthW
))
1210 len
= strlenW(iter
->header
);
1211 memcpy(ptr
, iter
->header
, len
*sizeof(WCHAR
));
1217 len
= strlenW(iter
->data
);
1218 memcpy(ptr
, iter
->data
, len
*sizeof(WCHAR
));
1230 static const BSCallbackVtbl nsChannelBSCVtbl
= {
1231 nsChannelBSC_destroy
,
1232 nsChannelBSC_init_bindinfo
,
1233 nsChannelBSC_start_binding
,
1234 nsChannelBSC_stop_binding
,
1235 nsChannelBSC_read_data
,
1236 nsChannelBSC_on_progress
,
1237 nsChannelBSC_on_response
,
1238 nsChannelBSC_beginning_transaction
1241 HRESULT
create_channelbsc(IMoniker
*mon
, WCHAR
*headers
, BYTE
*post_data
, DWORD post_data_size
, nsChannelBSC
**retval
)
1245 ret
= heap_alloc_zero(sizeof(*ret
));
1247 return E_OUTOFMEMORY
;
1249 init_bscallback(&ret
->bsc
, &nsChannelBSCVtbl
, mon
, BINDF_ASYNCHRONOUS
| BINDF_ASYNCSTORAGE
| BINDF_PULLDATA
);
1252 ret
->bsc
.headers
= heap_strdupW(headers
);
1253 if(!ret
->bsc
.headers
) {
1254 IBindStatusCallback_Release(&ret
->bsc
.IBindStatusCallback_iface
);
1255 return E_OUTOFMEMORY
;
1260 ret
->bsc
.post_data
= GlobalAlloc(0, post_data_size
);
1261 if(!ret
->bsc
.post_data
) {
1262 heap_free(ret
->bsc
.headers
);
1263 IBindStatusCallback_Release(&ret
->bsc
.IBindStatusCallback_iface
);
1264 return E_OUTOFMEMORY
;
1267 memcpy(ret
->bsc
.post_data
, post_data
, post_data_size
);
1268 ret
->bsc
.post_data_len
= post_data_size
;
1275 IMoniker
*get_channelbsc_mon(nsChannelBSC
*This
)
1278 IMoniker_AddRef(This
->bsc
.mon
);
1279 return This
->bsc
.mon
;
1282 void set_window_bscallback(HTMLWindow
*window
, nsChannelBSC
*callback
)
1284 if(window
->bscallback
) {
1285 if(window
->bscallback
->bsc
.binding
)
1286 IBinding_Abort(window
->bscallback
->bsc
.binding
);
1287 window
->bscallback
->bsc
.doc
= NULL
;
1288 window
->bscallback
->window
= NULL
;
1289 IBindStatusCallback_Release(&window
->bscallback
->bsc
.IBindStatusCallback_iface
);
1292 window
->bscallback
= callback
;
1295 callback
->window
= window
;
1296 IBindStatusCallback_AddRef(&callback
->bsc
.IBindStatusCallback_iface
);
1297 callback
->bsc
.doc
= window
->doc
;
1304 nsChannelBSC
*bscallback
;
1305 } start_doc_binding_task_t
;
1307 static void start_doc_binding_proc(task_t
*_task
)
1309 start_doc_binding_task_t
*task
= (start_doc_binding_task_t
*)_task
;
1311 start_binding(task
->window
, NULL
, (BSCallback
*)task
->bscallback
, NULL
);
1312 IBindStatusCallback_Release(&task
->bscallback
->bsc
.IBindStatusCallback_iface
);
1315 HRESULT
async_start_doc_binding(HTMLWindow
*window
, nsChannelBSC
*bscallback
)
1317 start_doc_binding_task_t
*task
;
1319 task
= heap_alloc(sizeof(start_doc_binding_task_t
));
1321 return E_OUTOFMEMORY
;
1323 task
->window
= window
;
1324 task
->bscallback
= bscallback
;
1325 IBindStatusCallback_AddRef(&bscallback
->bsc
.IBindStatusCallback_iface
);
1327 push_task(&task
->header
, start_doc_binding_proc
, window
->task_magic
);
1331 void abort_document_bindings(HTMLDocumentNode
*doc
)
1333 BSCallback
*iter
, *next
;
1335 LIST_FOR_EACH_ENTRY_SAFE(iter
, next
, &doc
->bindings
, BSCallback
, entry
) {
1337 remove_target_tasks(iter
->doc
->basedoc
.task_magic
);
1340 IBinding_Abort(iter
->binding
);
1342 list_remove(&iter
->entry
);
1343 list_init(&iter
->entry
);
1344 iter
->vtbl
->stop_binding(iter
, S_OK
);
1351 HRESULT
channelbsc_load_stream(nsChannelBSC
*bscallback
, IStream
*stream
)
1353 HRESULT hres
= S_OK
;
1355 if(!bscallback
->nschannel
) {
1356 ERR("NULL nschannel\n");
1360 bscallback
->nschannel
->content_type
= heap_strdupA("text/html");
1361 if(!bscallback
->nschannel
->content_type
)
1362 return E_OUTOFMEMORY
;
1364 list_add_head(&bscallback
->bsc
.doc
->bindings
, &bscallback
->bsc
.entry
);
1366 hres
= read_stream_data(bscallback
, stream
);
1368 hres
= async_stop_request(bscallback
);
1370 IBindStatusCallback_OnStopBinding(&bscallback
->bsc
.IBindStatusCallback_iface
, hres
,
1376 void channelbsc_set_channel(nsChannelBSC
*This
, nsChannel
*channel
, nsIStreamListener
*listener
, nsISupports
*context
)
1378 nsIChannel_AddRef(&channel
->nsIHttpChannel_iface
);
1379 This
->nschannel
= channel
;
1381 nsIStreamListener_AddRef(listener
);
1382 This
->nslistener
= listener
;
1385 nsISupports_AddRef(context
);
1386 This
->nscontext
= context
;
1389 if(This
->bsc
.headers
) {
1392 hres
= parse_headers(This
->bsc
.headers
, &channel
->request_headers
);
1393 heap_free(This
->bsc
.headers
);
1394 This
->bsc
.headers
= NULL
;
1396 WARN("parse_headers failed: %08x\n", hres
);
1400 HRESULT
hlink_frame_navigate(HTMLDocument
*doc
, LPCWSTR url
,
1401 nsIInputStream
*post_data_stream
, DWORD hlnf
, BOOL
*cancel
)
1403 IHlinkFrame
*hlink_frame
;
1404 nsChannelBSC
*callback
;
1405 IServiceProvider
*sp
;
1413 hres
= IOleClientSite_QueryInterface(doc
->doc_obj
->client
, &IID_IServiceProvider
,
1418 hres
= IServiceProvider_QueryService(sp
, &IID_IHlinkFrame
, &IID_IHlinkFrame
,
1419 (void**)&hlink_frame
);
1420 IServiceProvider_Release(sp
);
1424 hres
= create_channelbsc(NULL
, NULL
, NULL
, 0, &callback
);
1426 IHlinkFrame_Release(hlink_frame
);
1430 if(post_data_stream
) {
1431 read_post_data_stream(post_data_stream
, &callback
->bsc
.post_data
, &callback
->bsc
.post_data_len
);
1432 TRACE("post_data = %s\n", debugstr_an(callback
->bsc
.post_data
, callback
->bsc
.post_data_len
));
1435 hres
= CreateAsyncBindCtx(0, &callback
->bsc
.IBindStatusCallback_iface
, NULL
, &bindctx
);
1437 hres
= CoCreateInstance(&CLSID_StdHlink
, NULL
, CLSCTX_INPROC_SERVER
,
1438 &IID_IHlink
, (LPVOID
*)&hlink
);
1441 hres
= CreateURLMoniker(NULL
, url
, &mon
);
1443 if(SUCCEEDED(hres
)) {
1444 IHlink_SetMonikerReference(hlink
, HLINKSETF_TARGET
, mon
, NULL
);
1446 if(hlnf
& HLNF_OPENINNEWWINDOW
) {
1447 static const WCHAR wszBlank
[] = {'_','b','l','a','n','k',0};
1448 IHlink_SetTargetFrameName(hlink
, wszBlank
); /* FIXME */
1451 hres
= IHlinkFrame_Navigate(hlink_frame
, hlnf
, bindctx
,
1452 &callback
->bsc
.IBindStatusCallback_iface
, hlink
);
1453 IMoniker_Release(mon
);
1454 *cancel
= hres
== S_OK
;
1458 IHlinkFrame_Release(hlink_frame
);
1459 IBindCtx_Release(bindctx
);
1460 IBindStatusCallback_Release(&callback
->bsc
.IBindStatusCallback_iface
);
1464 HRESULT
navigate_url(HTMLWindow
*window
, const WCHAR
*new_url
, const WCHAR
*base_url
)
1466 WCHAR url
[INTERNET_MAX_URL_LENGTH
];
1472 }else if(base_url
) {
1475 hres
= CoInternetCombineUrl(base_url
, new_url
, URL_ESCAPE_SPACES_ONLY
|URL_DONT_ESCAPE_EXTRA_INFO
,
1476 url
, sizeof(url
)/sizeof(WCHAR
), &len
, 0);
1480 strcpyW(url
, new_url
);
1483 if(window
->doc_obj
&& window
->doc_obj
->hostui
) {
1484 OLECHAR
*translated_url
= NULL
;
1486 hres
= IDocHostUIHandler_TranslateUrl(window
->doc_obj
->hostui
, 0, url
,
1489 TRACE("%08x %s -> %s\n", hres
, debugstr_w(url
), debugstr_w(translated_url
));
1490 strcpyW(url
, translated_url
);
1491 CoTaskMemFree(translated_url
);
1495 if(window
->doc_obj
&& window
== window
->doc_obj
->basedoc
.window
) {
1498 hres
= hlink_frame_navigate(&window
->doc
->basedoc
, url
, NULL
, 0, &cancel
);
1503 TRACE("Navigation handled by hlink frame\n");
1508 hres
= create_doc_uri(window
, url
, &uri
);
1512 hres
= load_nsuri(window
, uri
, NULL
, LOAD_FLAGS_NONE
);
1513 nsISupports_Release((nsISupports
*)uri
);