2 * Copyright 2006 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
32 #include "wine/debug.h"
33 #include "wine/unicode.h"
35 #include "mshtml_private.h"
37 WINE_DEFAULT_DEBUG_CHANNEL(mshtml
);
39 #define CONTENT_LENGTH "Content-Length"
40 #define UTF16_STR "utf-16"
42 #define NSINSTREAM(x) ((nsIInputStream*) &(x)->lpInputStreamVtbl)
44 #define NSINSTREAM_THIS(iface) DEFINE_THIS(nsProtocolStream, InputStream, iface)
46 static nsresult NSAPI
nsInputStream_QueryInterface(nsIInputStream
*iface
, nsIIDRef riid
,
49 nsProtocolStream
*This
= NSINSTREAM_THIS(iface
);
53 if(IsEqualGUID(&IID_nsISupports
, riid
)) {
54 TRACE("(%p)->(IID_nsISupports %p)\n", This
, result
);
55 *result
= NSINSTREAM(This
);
56 }else if(IsEqualGUID(&IID_nsIInputStream
, riid
)) {
57 TRACE("(%p)->(IID_nsIInputStream %p)\n", This
, result
);
58 *result
= NSINSTREAM(This
);
62 nsIInputStream_AddRef(NSINSTREAM(This
));
66 WARN("unsupported interface %s\n", debugstr_guid(riid
));
67 return NS_NOINTERFACE
;
70 static nsrefcnt NSAPI
nsInputStream_AddRef(nsIInputStream
*iface
)
72 nsProtocolStream
*This
= NSINSTREAM_THIS(iface
);
73 LONG ref
= InterlockedIncrement(&This
->ref
);
75 TRACE("(%p) ref=%d\n", This
, ref
);
81 static nsrefcnt NSAPI
nsInputStream_Release(nsIInputStream
*iface
)
83 nsProtocolStream
*This
= NSINSTREAM_THIS(iface
);
84 LONG ref
= InterlockedDecrement(&This
->ref
);
86 TRACE("(%p) ref=%d\n", This
, ref
);
94 static nsresult NSAPI
nsInputStream_Close(nsIInputStream
*iface
)
96 nsProtocolStream
*This
= NSINSTREAM_THIS(iface
);
97 FIXME("(%p)\n", This
);
98 return NS_ERROR_NOT_IMPLEMENTED
;
101 static nsresult NSAPI
nsInputStream_Available(nsIInputStream
*iface
, PRUint32
*_retval
)
103 nsProtocolStream
*This
= NSINSTREAM_THIS(iface
);
104 FIXME("(%p)->(%p)\n", This
, _retval
);
105 return NS_ERROR_NOT_IMPLEMENTED
;
108 static nsresult NSAPI
nsInputStream_Read(nsIInputStream
*iface
, char *aBuf
, PRUint32 aCount
,
111 nsProtocolStream
*This
= NSINSTREAM_THIS(iface
);
113 TRACE("(%p)->(%p %d %p)\n", This
, aBuf
, aCount
, _retval
);
115 /* Gecko always calls Read with big enough buffer */
116 if(aCount
< This
->buf_size
)
117 FIXME("aCount < This->buf_size\n");
119 *_retval
= This
->buf_size
;
121 memcpy(aBuf
, This
->buf
, This
->buf_size
);
127 static nsresult NSAPI
nsInputStream_ReadSegments(nsIInputStream
*iface
,
128 nsresult (WINAPI
*aWriter
)(nsIInputStream
*,void*,const char*,PRUint32
,PRUint32
,PRUint32
*),
129 void *aClousure
, PRUint32 aCount
, PRUint32
*_retval
)
131 nsProtocolStream
*This
= NSINSTREAM_THIS(iface
);
132 PRUint32 written
= 0;
135 TRACE("(%p)->(%p %p %d %p)\n", This
, aWriter
, aClousure
, aCount
, _retval
);
140 if(This
->buf_size
> aCount
)
141 FIXME("buf_size > aCount\n");
143 nsres
= aWriter(NSINSTREAM(This
), aClousure
, This
->buf
, 0, This
->buf_size
, &written
);
145 TRACE("aWritter failed: %08x\n", nsres
);
146 else if(written
!= This
->buf_size
)
147 FIXME("written %d != buf_size %d\n", written
, This
->buf_size
);
149 This
->buf_size
-= written
;
155 static nsresult NSAPI
nsInputStream_IsNonBlocking(nsIInputStream
*iface
, PRBool
*_retval
)
157 nsProtocolStream
*This
= NSINSTREAM_THIS(iface
);
158 FIXME("(%p)->(%p)\n", This
, _retval
);
159 return NS_ERROR_NOT_IMPLEMENTED
;
162 #undef NSINSTREAM_THIS
164 static const nsIInputStreamVtbl nsInputStreamVtbl
= {
165 nsInputStream_QueryInterface
,
166 nsInputStream_AddRef
,
167 nsInputStream_Release
,
169 nsInputStream_Available
,
171 nsInputStream_ReadSegments
,
172 nsInputStream_IsNonBlocking
175 static nsProtocolStream
*create_nsprotocol_stream(void)
177 nsProtocolStream
*ret
= mshtml_alloc(sizeof(nsProtocolStream
));
179 ret
->lpInputStreamVtbl
= &nsInputStreamVtbl
;
186 static HRESULT
read_stream_data(BSCallback
*This
, IStream
*stream
)
191 if(!This
->nslistener
) {
197 hres
= IStream_Read(stream
, buf
, sizeof(buf
), &read
);
198 }while(hres
== S_OK
&& read
);
204 This
->nsstream
= create_nsprotocol_stream();
207 hres
= IStream_Read(stream
, This
->nsstream
->buf
, sizeof(This
->nsstream
->buf
),
208 &This
->nsstream
->buf_size
);
209 if(!This
->nsstream
->buf_size
)
212 if(!This
->readed
&& This
->nsstream
->buf_size
>= 2 && *(WORD
*)This
->nsstream
->buf
== 0xfeff) {
213 This
->nschannel
->charset
= mshtml_alloc(sizeof(UTF16_STR
));
214 memcpy(This
->nschannel
->charset
, UTF16_STR
, sizeof(UTF16_STR
));
218 nsres
= nsIStreamListener_OnStartRequest(This
->nslistener
,
219 (nsIRequest
*)NSCHANNEL(This
->nschannel
), This
->nscontext
);
221 FIXME("OnStartRequest failed: %08x\n", nsres
);
224 This
->readed
+= This
->nsstream
->buf_size
;
226 nsres
= nsIStreamListener_OnDataAvailable(This
->nslistener
,
227 (nsIRequest
*)NSCHANNEL(This
->nschannel
), This
->nscontext
,
228 NSINSTREAM(This
->nsstream
), This
->readed
-This
->nsstream
->buf_size
,
229 This
->nsstream
->buf_size
);
231 ERR("OnDataAvailable failed: %08x\n", nsres
);
233 if(This
->nsstream
->buf_size
)
234 FIXME("buffer is not empty!\n");
235 }while(hres
== S_OK
);
240 #define STATUSCLB_THIS(iface) DEFINE_THIS(BSCallback, BindStatusCallback, iface)
242 static HRESULT WINAPI
BindStatusCallback_QueryInterface(IBindStatusCallback
*iface
,
243 REFIID riid
, void **ppv
)
245 BSCallback
*This
= STATUSCLB_THIS(iface
);
248 if(IsEqualGUID(&IID_IUnknown
, riid
)) {
249 TRACE("(%p)->(IID_IUnknown, %p)\n", This
, ppv
);
250 *ppv
= STATUSCLB(This
);
251 }else if(IsEqualGUID(&IID_IBindStatusCallback
, riid
)) {
252 TRACE("(%p)->(IID_IBindStatusCallback, %p)\n", This
, ppv
);
253 *ppv
= STATUSCLB(This
);
254 }else if(IsEqualGUID(&IID_IServiceProvider
, riid
)) {
255 TRACE("(%p)->(IID_IServiceProvider %p)\n", This
, ppv
);
256 *ppv
= SERVPROV(This
);
257 }else if(IsEqualGUID(&IID_IHttpNegotiate
, riid
)) {
258 TRACE("(%p)->(IID_IHttpNegotiate %p)\n", This
, ppv
);
259 *ppv
= HTTPNEG(This
);
260 }else if(IsEqualGUID(&IID_IHttpNegotiate2
, riid
)) {
261 TRACE("(%p)->(IID_IHttpNegotiate2 %p)\n", This
, ppv
);
262 *ppv
= HTTPNEG(This
);
263 }else if(IsEqualGUID(&IID_IInternetBindInfo
, riid
)) {
264 TRACE("(%p)->(IID_IInternetBindInfo %p)\n", This
, ppv
);
265 *ppv
= BINDINFO(This
);
269 IBindStatusCallback_AddRef(STATUSCLB(This
));
273 TRACE("Unsupported riid = %s\n", debugstr_guid(riid
));
274 return E_NOINTERFACE
;
277 static ULONG WINAPI
BindStatusCallback_AddRef(IBindStatusCallback
*iface
)
279 BSCallback
*This
= STATUSCLB_THIS(iface
);
280 LONG ref
= InterlockedIncrement(&This
->ref
);
282 TRACE("(%p) ref = %d\n", This
, ref
);
287 static ULONG WINAPI
BindStatusCallback_Release(IBindStatusCallback
*iface
)
289 BSCallback
*This
= STATUSCLB_THIS(iface
);
290 LONG ref
= InterlockedDecrement(&This
->ref
);
292 TRACE("(%p) ref = %d\n", This
, ref
);
296 GlobalFree(This
->post_data
);
298 nsIChannel_Release(NSCHANNEL(This
->nschannel
));
300 nsIStreamListener_Release(This
->nslistener
);
302 nsISupports_Release(This
->nscontext
);
304 nsIInputStream_Release(NSINSTREAM(This
->nsstream
));
306 IMoniker_Release(This
->mon
);
308 IBinding_Release(This
->binding
);
309 mshtml_free(This
->headers
);
316 static HRESULT WINAPI
BindStatusCallback_OnStartBinding(IBindStatusCallback
*iface
,
317 DWORD dwReserved
, IBinding
*pbind
)
319 BSCallback
*This
= STATUSCLB_THIS(iface
);
321 TRACE("(%p)->(%d %p)\n", This
, dwReserved
, pbind
);
323 IBinding_AddRef(pbind
);
324 This
->binding
= pbind
;
326 if(This
->nschannel
&& This
->nschannel
->load_group
) {
327 nsresult nsres
= nsILoadGroup_AddRequest(This
->nschannel
->load_group
,
328 (nsIRequest
*)NSCHANNEL(This
->nschannel
), This
->nscontext
);
331 ERR("AddRequest failed:%08x\n", nsres
);
337 static HRESULT WINAPI
BindStatusCallback_GetPriority(IBindStatusCallback
*iface
, LONG
*pnPriority
)
339 BSCallback
*This
= STATUSCLB_THIS(iface
);
340 FIXME("(%p)->(%p)\n", This
, pnPriority
);
344 static HRESULT WINAPI
BindStatusCallback_OnLowResource(IBindStatusCallback
*iface
, DWORD reserved
)
346 BSCallback
*This
= STATUSCLB_THIS(iface
);
347 FIXME("(%p)->(%d)\n", This
, reserved
);
351 static HRESULT WINAPI
BindStatusCallback_OnProgress(IBindStatusCallback
*iface
, ULONG ulProgress
,
352 ULONG ulProgressMax
, ULONG ulStatusCode
, LPCWSTR szStatusText
)
354 BSCallback
*This
= STATUSCLB_THIS(iface
);
356 TRACE("%p)->(%u %u %u %s)\n", This
, ulProgress
, ulProgressMax
, ulStatusCode
,
357 debugstr_w(szStatusText
));
359 switch(ulStatusCode
) {
360 case BINDSTATUS_MIMETYPEAVAILABLE
: {
365 mshtml_free(This
->nschannel
->content
);
367 len
= WideCharToMultiByte(CP_ACP
, 0, szStatusText
, -1, NULL
, 0, NULL
, NULL
);
368 This
->nschannel
->content
= mshtml_alloc(len
*sizeof(WCHAR
));
369 WideCharToMultiByte(CP_ACP
, 0, szStatusText
, -1, This
->nschannel
->content
, -1, NULL
, NULL
);
376 static HRESULT WINAPI
BindStatusCallback_OnStopBinding(IBindStatusCallback
*iface
,
377 HRESULT hresult
, LPCWSTR szError
)
379 BSCallback
*This
= STATUSCLB_THIS(iface
);
381 TRACE("(%p)->(%08x %s)\n", This
, hresult
, debugstr_w(szError
));
384 IBinding_Release(This
->binding
);
385 This
->binding
= NULL
;
388 if(This
->nslistener
) {
389 nsIStreamListener_OnStopRequest(This
->nslistener
, (nsIRequest
*)NSCHANNEL(This
->nschannel
),
390 This
->nscontext
, NS_OK
);
392 if(This
->nschannel
->load_group
) {
395 nsres
= nsILoadGroup_RemoveRequest(This
->nschannel
->load_group
,
396 (nsIRequest
*)NSCHANNEL(This
->nschannel
), NULL
, NS_OK
);
398 ERR("RemoveRequest failed: %08x\n", nsres
);
403 task_t
*task
= mshtml_alloc(sizeof(task_t
));
405 task
->doc
= This
->doc
;
406 task
->task_id
= TASK_PARSECOMPLETE
;
410 * This should be done in the worker thread that parses HTML,
411 * but we don't have such thread (Gecko parses HTML for us).
419 static HRESULT WINAPI
BindStatusCallback_GetBindInfo(IBindStatusCallback
*iface
,
420 DWORD
*grfBINDF
, BINDINFO
*pbindinfo
)
422 BSCallback
*This
= STATUSCLB_THIS(iface
);
425 TRACE("(%p)->(%p %p)\n", This
, grfBINDF
, pbindinfo
);
427 *grfBINDF
= BINDF_ASYNCHRONOUS
| BINDF_ASYNCSTORAGE
| BINDF_PULLDATA
;
429 size
= pbindinfo
->cbSize
;
430 memset(pbindinfo
, 0, size
);
431 pbindinfo
->cbSize
= size
;
433 pbindinfo
->cbstgmedData
= This
->post_data_len
;
434 pbindinfo
->dwCodePage
= CP_UTF8
;
435 pbindinfo
->dwOptions
= 0x80000;
437 if(This
->post_data
) {
438 pbindinfo
->dwBindVerb
= BINDVERB_POST
;
440 pbindinfo
->stgmedData
.tymed
= TYMED_HGLOBAL
;
441 pbindinfo
->stgmedData
.u
.hGlobal
= This
->post_data
;
442 pbindinfo
->stgmedData
.pUnkForRelease
= (IUnknown
*)STATUSCLB(This
);
443 IBindStatusCallback_AddRef(STATUSCLB(This
));
449 static HRESULT WINAPI
BindStatusCallback_OnDataAvailable(IBindStatusCallback
*iface
,
450 DWORD grfBSCF
, DWORD dwSize
, FORMATETC
*pformatetc
, STGMEDIUM
*pstgmed
)
452 BSCallback
*This
= STATUSCLB_THIS(iface
);
454 TRACE("(%p)->(%08x %d %p %p)\n", This
, grfBSCF
, dwSize
, pformatetc
, pstgmed
);
456 return read_stream_data(This
, pstgmed
->u
.pstm
);
459 static HRESULT WINAPI
BindStatusCallback_OnObjectAvailable(IBindStatusCallback
*iface
,
460 REFIID riid
, IUnknown
*punk
)
462 BSCallback
*This
= STATUSCLB_THIS(iface
);
463 FIXME("(%p)->(%s %p)\n", This
, debugstr_guid(riid
), punk
);
467 #undef STATUSCLB_THIS
469 static const IBindStatusCallbackVtbl BindStatusCallbackVtbl
= {
470 BindStatusCallback_QueryInterface
,
471 BindStatusCallback_AddRef
,
472 BindStatusCallback_Release
,
473 BindStatusCallback_OnStartBinding
,
474 BindStatusCallback_GetPriority
,
475 BindStatusCallback_OnLowResource
,
476 BindStatusCallback_OnProgress
,
477 BindStatusCallback_OnStopBinding
,
478 BindStatusCallback_GetBindInfo
,
479 BindStatusCallback_OnDataAvailable
,
480 BindStatusCallback_OnObjectAvailable
483 #define HTTPNEG_THIS(iface) DEFINE_THIS(BSCallback, HttpNegotiate2, iface)
485 static HRESULT WINAPI
HttpNegotiate_QueryInterface(IHttpNegotiate2
*iface
,
486 REFIID riid
, void **ppv
)
488 BSCallback
*This
= HTTPNEG_THIS(iface
);
489 return IBindStatusCallback_QueryInterface(STATUSCLB(This
), riid
, ppv
);
492 static ULONG WINAPI
HttpNegotiate_AddRef(IHttpNegotiate2
*iface
)
494 BSCallback
*This
= HTTPNEG_THIS(iface
);
495 return IBindStatusCallback_AddRef(STATUSCLB(This
));
498 static ULONG WINAPI
HttpNegotiate_Release(IHttpNegotiate2
*iface
)
500 BSCallback
*This
= HTTPNEG_THIS(iface
);
501 return IBindStatusCallback_Release(STATUSCLB(This
));
504 static HRESULT WINAPI
HttpNegotiate_BeginningTransaction(IHttpNegotiate2
*iface
,
505 LPCWSTR szURL
, LPCWSTR szHeaders
, DWORD dwReserved
, LPWSTR
*pszAdditionalHeaders
)
507 BSCallback
*This
= HTTPNEG_THIS(iface
);
510 TRACE("(%p)->(%s %s %d %p)\n", This
, debugstr_w(szURL
), debugstr_w(szHeaders
),
511 dwReserved
, pszAdditionalHeaders
);
514 *pszAdditionalHeaders
= NULL
;
518 size
= (strlenW(This
->headers
)+1)*sizeof(WCHAR
);
519 *pszAdditionalHeaders
= CoTaskMemAlloc(size
);
520 memcpy(*pszAdditionalHeaders
, This
->headers
, size
);
525 static HRESULT WINAPI
HttpNegotiate_OnResponse(IHttpNegotiate2
*iface
, DWORD dwResponseCode
,
526 LPCWSTR szResponseHeaders
, LPCWSTR szRequestHeaders
, LPWSTR
*pszAdditionalRequestHeaders
)
528 BSCallback
*This
= HTTPNEG_THIS(iface
);
529 FIXME("(%p)->(%d %s %s %p)\n", This
, dwResponseCode
, debugstr_w(szResponseHeaders
),
530 debugstr_w(szRequestHeaders
), pszAdditionalRequestHeaders
);
534 static HRESULT WINAPI
HttpNegotiate_GetRootSecurityId(IHttpNegotiate2
*iface
,
535 BYTE
*pbSecurityId
, DWORD
*pcbSecurityId
, DWORD_PTR dwReserved
)
537 BSCallback
*This
= HTTPNEG_THIS(iface
);
538 FIXME("(%p)->(%p %p %ld)\n", This
, pbSecurityId
, pcbSecurityId
, dwReserved
);
544 static const IHttpNegotiate2Vtbl HttpNegotiate2Vtbl
= {
545 HttpNegotiate_QueryInterface
,
546 HttpNegotiate_AddRef
,
547 HttpNegotiate_Release
,
548 HttpNegotiate_BeginningTransaction
,
549 HttpNegotiate_OnResponse
,
550 HttpNegotiate_GetRootSecurityId
553 #define BINDINFO_THIS(iface) DEFINE_THIS(BSCallback, InternetBindInfo, iface)
555 static HRESULT WINAPI
InternetBindInfo_QueryInterface(IInternetBindInfo
*iface
,
556 REFIID riid
, void **ppv
)
558 BSCallback
*This
= BINDINFO_THIS(iface
);
559 return IBindStatusCallback_QueryInterface(STATUSCLB(This
), riid
, ppv
);
562 static ULONG WINAPI
InternetBindInfo_AddRef(IInternetBindInfo
*iface
)
564 BSCallback
*This
= BINDINFO_THIS(iface
);
565 return IBindStatusCallback_AddRef(STATUSCLB(This
));
568 static ULONG WINAPI
InternetBindInfo_Release(IInternetBindInfo
*iface
)
570 BSCallback
*This
= BINDINFO_THIS(iface
);
571 return IBindStatusCallback_Release(STATUSCLB(This
));
574 static HRESULT WINAPI
InternetBindInfo_GetBindInfo(IInternetBindInfo
*iface
,
575 DWORD
*grfBINDF
, BINDINFO
*pbindinfo
)
577 BSCallback
*This
= BINDINFO_THIS(iface
);
578 FIXME("(%p)->(%p %p)\n", This
, grfBINDF
, pbindinfo
);
582 static HRESULT WINAPI
InternetBindInfo_GetBindString(IInternetBindInfo
*iface
,
583 ULONG ulStringType
, LPOLESTR
*ppwzStr
, ULONG cEl
, ULONG
*pcElFetched
)
585 BSCallback
*This
= BINDINFO_THIS(iface
);
586 FIXME("(%p)->(%u %p %u %p)\n", This
, ulStringType
, ppwzStr
, cEl
, pcElFetched
);
592 static const IInternetBindInfoVtbl InternetBindInfoVtbl
= {
593 InternetBindInfo_QueryInterface
,
594 InternetBindInfo_AddRef
,
595 InternetBindInfo_Release
,
596 InternetBindInfo_GetBindInfo
,
597 InternetBindInfo_GetBindString
600 #define SERVPROV_THIS(iface) DEFINE_THIS(BSCallback, ServiceProvider, iface)
602 static HRESULT WINAPI
BSCServiceProvider_QueryInterface(IServiceProvider
*iface
,
603 REFIID riid
, void **ppv
)
605 BSCallback
*This
= SERVPROV_THIS(iface
);
606 return IBindStatusCallback_QueryInterface(STATUSCLB(This
), riid
, ppv
);
609 static ULONG WINAPI
BSCServiceProvider_AddRef(IServiceProvider
*iface
)
611 BSCallback
*This
= SERVPROV_THIS(iface
);
612 return IBindStatusCallback_AddRef(STATUSCLB(This
));
615 static ULONG WINAPI
BSCServiceProvider_Release(IServiceProvider
*iface
)
617 BSCallback
*This
= SERVPROV_THIS(iface
);
618 return IBindStatusCallback_Release(STATUSCLB(This
));
621 static HRESULT WINAPI
BSCServiceProvider_QueryService(IServiceProvider
*iface
,
622 REFGUID guidService
, REFIID riid
, void **ppv
)
624 BSCallback
*This
= SERVPROV_THIS(iface
);
625 FIXME("(%p)->(%s %s %p)\n", This
, debugstr_guid(guidService
), debugstr_guid(riid
), ppv
);
631 static const IServiceProviderVtbl ServiceProviderVtbl
= {
632 BSCServiceProvider_QueryInterface
,
633 BSCServiceProvider_AddRef
,
634 BSCServiceProvider_Release
,
635 BSCServiceProvider_QueryService
638 BSCallback
*create_bscallback(IMoniker
*mon
)
640 BSCallback
*ret
= mshtml_alloc(sizeof(BSCallback
));
642 ret
->lpBindStatusCallbackVtbl
= &BindStatusCallbackVtbl
;
643 ret
->lpServiceProviderVtbl
= &ServiceProviderVtbl
;
644 ret
->lpHttpNegotiate2Vtbl
= &HttpNegotiate2Vtbl
;
645 ret
->lpInternetBindInfoVtbl
= &InternetBindInfoVtbl
;
647 ret
->post_data
= NULL
;
649 ret
->post_data_len
= 0;
651 ret
->nschannel
= NULL
;
652 ret
->nslistener
= NULL
;
653 ret
->nscontext
= NULL
;
654 ret
->nsstream
= NULL
;
659 IMoniker_AddRef(mon
);
665 static void parse_post_data(nsIInputStream
*post_data_stream
, LPWSTR
*headers_ret
,
666 HGLOBAL
*post_data_ret
, ULONG
*post_data_len_ret
)
668 PRUint32 post_data_len
= 0, available
= 0;
669 HGLOBAL post_data
= NULL
;
670 LPWSTR headers
= NULL
;
671 DWORD headers_len
= 0, len
;
672 const char *ptr
, *ptr2
, *post_data_end
;
674 nsIInputStream_Available(post_data_stream
, &available
);
675 post_data
= GlobalAlloc(0, available
+1);
676 nsIInputStream_Read(post_data_stream
, post_data
, available
, &post_data_len
);
678 TRACE("post_data = %s\n", debugstr_an(post_data
, post_data_len
));
680 ptr
= ptr2
= post_data
;
681 post_data_end
= (const char*)post_data
+post_data_len
;
683 while(ptr
< post_data_end
&& (*ptr
!= '\r' || ptr
[1] != '\n')) {
684 while(ptr
< post_data_end
&& (*ptr
!= '\r' || ptr
[1] != '\n'))
694 if(ptr
-ptr2
>= sizeof(CONTENT_LENGTH
)
695 && CompareStringA(LOCALE_SYSTEM_DEFAULT
, NORM_IGNORECASE
,
696 CONTENT_LENGTH
, sizeof(CONTENT_LENGTH
)-1,
697 ptr2
, sizeof(CONTENT_LENGTH
)-1) == CSTR_EQUAL
) {
702 len
= MultiByteToWideChar(CP_ACP
, 0, ptr2
, ptr
-ptr2
, NULL
, 0);
705 headers
= mshtml_realloc(headers
,(headers_len
+len
+1)*sizeof(WCHAR
));
707 headers
= mshtml_alloc((len
+1)*sizeof(WCHAR
));
709 len
= MultiByteToWideChar(CP_ACP
, 0, ptr2
, ptr
-ptr2
, headers
+headers_len
, -1);
715 headers
[headers_len
] = 0;
716 *headers_ret
= headers
;
718 if(ptr
>= post_data_end
-2) {
719 GlobalFree(post_data
);
726 post_data_len
-= ptr
-(const char*)post_data
;
727 memmove(post_data
, ptr
, post_data_len
);
728 post_data
= GlobalReAlloc(post_data
, post_data_len
+1, 0);
731 *post_data_ret
= post_data
;
732 *post_data_len_ret
= post_data_len
;
735 void hlink_frame_navigate(HTMLDocument
*doc
, IHlinkFrame
*hlink_frame
,
736 LPCWSTR uri
, nsIInputStream
*post_data_stream
, DWORD hlnf
)
738 BSCallback
*callback
;
743 callback
= create_bscallback(NULL
);
745 if(post_data_stream
) {
746 parse_post_data(post_data_stream
, &callback
->headers
, &callback
->post_data
,
747 &callback
->post_data_len
);
748 TRACE("headers = %s post_data = %s\n", debugstr_w(callback
->headers
),
749 debugstr_an(callback
->post_data
, callback
->post_data_len
));
752 CreateAsyncBindCtx(0, STATUSCLB(callback
), NULL
, &bindctx
);
754 hlink
= Hlink_Create();
756 CreateURLMoniker(NULL
, uri
, &mon
);
757 IHlink_SetMonikerReference(hlink
, 0, mon
, NULL
);
759 if(hlnf
& HLNF_OPENINNEWWINDOW
) {
760 static const WCHAR wszBlank
[] = {'_','b','l','a','n','k',0};
761 IHlink_SetTargetFrameName(hlink
, wszBlank
); /* FIXME */
764 IHlinkFrame_Navigate(hlink_frame
, hlnf
, bindctx
, STATUSCLB(callback
), hlink
);
766 IBindCtx_Release(bindctx
);
767 IBindStatusCallback_Release(STATUSCLB(callback
));
768 IMoniker_Release(mon
);
772 HRESULT
start_binding(BSCallback
*bscallback
)
778 hres
= CreateAsyncBindCtx(0, STATUSCLB(bscallback
), NULL
, &bctx
);
780 WARN("CreateAsyncBindCtx failed: %08x\n", hres
);
784 hres
= IMoniker_BindToStorage(bscallback
->mon
, bctx
, NULL
, &IID_IStream
, (void**)&str
);
785 IBindCtx_Release(bctx
);
787 WARN("BindToStorage failed: %08x\n", hres
);
792 IStream_Release(str
);
794 IMoniker_Release(bscallback
->mon
);
795 bscallback
->mon
= NULL
;
799 void set_document_bscallback(HTMLDocument
*doc
, BSCallback
*callback
)
801 if(doc
->bscallback
) {
802 if(doc
->bscallback
->binding
)
803 IBinding_Abort(doc
->bscallback
->binding
);
804 doc
->bscallback
->doc
= NULL
;
805 IBindStatusCallback_Release(STATUSCLB(doc
->bscallback
));
808 doc
->bscallback
= callback
;
811 IBindStatusCallback_AddRef(STATUSCLB(callback
));