#include "urlmon_main.h"
+#include <ole2.h>
+
HRESULT CALLBACK IWinInetHttpInfo_QueryInfo_Proxy(IWinInetHttpInfo* This,
DWORD dwOption, LPVOID pBuffer, DWORD *pcbBuf, DWORD *pdwFlags,
DWORD *pdwReserved)
}
HRESULT CALLBACK IBindHost_MonikerBindToStorage_Proxy(IBindHost* This,
- IMoniker *pMk, IBindCtx *pBC, IBindStatusCallback *pBSC,
- REFIID riid, void **ppvObj)
+ IMoniker *moniker, IBindCtx *bc, IBindStatusCallback *bsc,
+ REFIID riid, void **obj)
{
- FIXME("stub\n");
- return E_NOTIMPL;
+ TRACE("(%p %p %p %p %s %p)\n", This, moniker, bc, bsc, debugstr_guid(riid), obj);
+ return IBindHost_RemoteMonikerBindToStorage_Proxy(This, moniker, bc, bsc, riid, (IUnknown**)obj);
}
HRESULT __RPC_STUB IBindHost_MonikerBindToStorage_Stub(IBindHost* This,
- IMoniker *pMk, IBindCtx *pBC, IBindStatusCallback *pBSC,
- REFIID riid, IUnknown **ppvObj)
+ IMoniker *moniker, IBindCtx *bc, IBindStatusCallback *bsc,
+ REFIID riid, IUnknown **obj)
{
- FIXME("stub\n");
- return E_NOTIMPL;
+ TRACE("(%p %p %p %p %s %p)\n", This, moniker, bc, bsc, debugstr_guid(riid), obj);
+ return IBindHost_MonikerBindToStorage(This, moniker, bc, bsc, riid, (void**)obj);
}
HRESULT CALLBACK IBindHost_MonikerBindToObject_Proxy(IBindHost* This,
- IMoniker *pMk, IBindCtx *pBC, IBindStatusCallback *pBSC,
- REFIID riid, void **ppvObj)
+ IMoniker *moniker, IBindCtx *bc, IBindStatusCallback *bsc,
+ REFIID riid, void **obj)
{
- FIXME("stub\n");
- return E_NOTIMPL;
+ TRACE("(%p %p %p %p %s %p)\n", This, moniker, bc, bsc, debugstr_guid(riid), obj);
+ return IBindHost_RemoteMonikerBindToObject_Proxy(This, moniker, bc, bsc, riid, (IUnknown**)obj);
}
HRESULT __RPC_STUB IBindHost_MonikerBindToObject_Stub(IBindHost* This,
- IMoniker *pMk, IBindCtx *pBC, IBindStatusCallback *pBSC,
- REFIID riid, IUnknown **ppvObj)
+ IMoniker *moniker, IBindCtx *bc, IBindStatusCallback *bsc,
+ REFIID riid, IUnknown **obj)
{
- FIXME("stub\n");
- return E_NOTIMPL;
+ TRACE("(%p %p %p %p %s %p)\n", This, moniker, bc, bsc, debugstr_guid(riid), obj);
+ return IBindHost_MonikerBindToObject(This, moniker, bc, bsc, riid, (void**)obj);
+}
+
+static HRESULT marshal_stgmed(STGMEDIUM *stgmed, RemSTGMEDIUM **ret)
+{
+ RemSTGMEDIUM *rem_stgmed;
+ IStream *stream = NULL;
+ ULONG size = 0;
+ HRESULT hres = S_OK;
+
+ if((stgmed->tymed == TYMED_ISTREAM && stgmed->u.pstm) || stgmed->pUnkForRelease) {
+ hres = CreateStreamOnHGlobal(NULL, TRUE, &stream);
+ if(FAILED(hres))
+ return hres;
+ }
+
+ switch(stgmed->tymed) {
+ case TYMED_NULL:
+ break;
+ case TYMED_ISTREAM:
+ if(stgmed->u.pstm)
+ hres = CoMarshalInterface(stream, &IID_IStream, (IUnknown*)stgmed->u.pstm,
+ MSHCTX_LOCAL, NULL, MSHLFLAGS_NORMAL);
+ break;
+ default:
+ FIXME("unsupported tymed %u\n", stgmed->tymed);
+ break;
+ }
+
+ if(SUCCEEDED(hres) && stgmed->pUnkForRelease)
+ hres = CoMarshalInterface(stream, &IID_IUnknown, stgmed->pUnkForRelease,
+ MSHCTX_LOCAL, NULL, MSHLFLAGS_NORMAL);
+ if(FAILED(hres)) {
+ if(stream)
+ IStream_Release(stream);
+ return hres;
+ }
+
+ if(stream) {
+ LARGE_INTEGER zero;
+ ULARGE_INTEGER off;
+
+ zero.QuadPart = 0;
+ IStream_Seek(stream, zero, STREAM_SEEK_CUR, &off);
+ size = off.QuadPart;
+ IStream_Seek(stream, zero, STREAM_SEEK_SET, &off);
+ }
+
+ rem_stgmed = heap_alloc_zero(FIELD_OFFSET(RemSTGMEDIUM, data[size]));
+ if(!rem_stgmed) {
+ if(stream)
+ IStream_Release(stream);
+ return E_OUTOFMEMORY;
+ }
+
+ rem_stgmed->tymed = stgmed->tymed;
+ rem_stgmed->dwHandleType = 0;
+ rem_stgmed->pData = stgmed->u.pstm != NULL;
+ rem_stgmed->pUnkForRelease = stgmed->pUnkForRelease != NULL;
+ rem_stgmed->cbData = size;
+ if(stream) {
+ IStream_Read(stream, rem_stgmed->data, size, &size);
+ IStream_Release(stream);
+ }
+
+ *ret = rem_stgmed;
+ return S_OK;
}
+static HRESULT unmarshal_stgmed(RemSTGMEDIUM *rem_stgmed, STGMEDIUM *stgmed)
+{
+ IStream *stream = NULL;
+ HRESULT hres = S_OK;
+
+ stgmed->tymed = rem_stgmed->tymed;
+
+ if((stgmed->tymed == TYMED_ISTREAM && rem_stgmed->pData) || rem_stgmed->pUnkForRelease) {
+ LARGE_INTEGER zero;
+
+ hres = CreateStreamOnHGlobal(NULL, TRUE, &stream);
+ if(FAILED(hres))
+ return hres;
+
+ hres = IStream_Write(stream, rem_stgmed->data, rem_stgmed->cbData, NULL);
+ if(FAILED(hres)) {
+ IStream_Release(stream);
+ return hres;
+ }
+
+ zero.QuadPart = 0;
+ IStream_Seek(stream, zero, STREAM_SEEK_SET, NULL);
+ }
+
+ switch(stgmed->tymed) {
+ case TYMED_NULL:
+ break;
+ case TYMED_ISTREAM:
+ if(rem_stgmed->pData)
+ hres = CoUnmarshalInterface(stream, &IID_IStream, (void**)&stgmed->u.pstm);
+ break;
+ default:
+ FIXME("unsupported tymed %u\n", stgmed->tymed);
+ break;
+ }
+
+ if(SUCCEEDED(hres) && rem_stgmed->pUnkForRelease)
+ hres = CoUnmarshalInterface(stream, &IID_IUnknown, (void**)&stgmed->pUnkForRelease);
+ if(stream)
+ IStream_Release(stream);
+ return hres;
+}
+
+static void proxy_marshal_bindinfo(BINDINFO *bindinfo, RemBINDINFO *rem_bindinfo)
+{
+ rem_bindinfo->szExtraInfo = bindinfo->szExtraInfo;
+ rem_bindinfo->grfBindInfoF = bindinfo->grfBindInfoF;
+ rem_bindinfo->dwBindVerb = bindinfo->dwBindVerb;
+ rem_bindinfo->szCustomVerb = bindinfo->szCustomVerb;
+ rem_bindinfo->cbstgmedData = bindinfo->cbstgmedData;
+}
+
+static void proxy_unmarshal_bindinfo(RemBINDINFO *rem_bindinfo, BINDINFO *bindinfo)
+{
+ bindinfo->szExtraInfo = rem_bindinfo->szExtraInfo;
+ bindinfo->grfBindInfoF = rem_bindinfo->grfBindInfoF;
+ bindinfo->dwBindVerb = rem_bindinfo->dwBindVerb;
+ bindinfo->szCustomVerb = rem_bindinfo->szCustomVerb;
+ bindinfo->cbstgmedData = rem_bindinfo->cbstgmedData;
+ bindinfo->dwOptions = rem_bindinfo->dwOptions;
+ bindinfo->dwOptionsFlags = rem_bindinfo->dwOptionsFlags;
+ bindinfo->dwCodePage = rem_bindinfo->dwCodePage;
+ bindinfo->iid = IID_NULL;
+ bindinfo->pUnk = NULL;
+}
+
+static void stub_unmarshal_bindinfo(RemBINDINFO *rem_bindinfo, BINDINFO *bindinfo)
+{
+ bindinfo->szExtraInfo = rem_bindinfo->szExtraInfo;
+ bindinfo->grfBindInfoF = rem_bindinfo->grfBindInfoF;
+ bindinfo->dwBindVerb = rem_bindinfo->dwBindVerb;
+ bindinfo->szCustomVerb = rem_bindinfo->szCustomVerb;
+ bindinfo->cbstgmedData = rem_bindinfo->cbstgmedData;
+
+ if(bindinfo->stgmedData.tymed != TYMED_NULL)
+ WARN("stgmed data (tymed %u) will be lost!\n", bindinfo->stgmedData.tymed);
+}
+
+static void stub_marshal_bindinfo(BINDINFO *bindinfo, RemBINDINFO *rem_bindinfo)
+{
+ rem_bindinfo->cbSize = sizeof(*rem_bindinfo);
+ rem_bindinfo->szExtraInfo = bindinfo->szExtraInfo;
+ rem_bindinfo->grfBindInfoF = bindinfo->grfBindInfoF;
+ rem_bindinfo->dwBindVerb = bindinfo->dwBindVerb;
+ rem_bindinfo->szCustomVerb = bindinfo->szCustomVerb;
+ rem_bindinfo->cbstgmedData = bindinfo->cbstgmedData;
+ rem_bindinfo->dwOptions = bindinfo->dwOptions;
+ rem_bindinfo->dwOptionsFlags = bindinfo->dwOptionsFlags;
+ rem_bindinfo->dwCodePage = bindinfo->dwCodePage;
+ rem_bindinfo->pUnk = NULL;
+ rem_bindinfo->dwReserved = bindinfo->dwReserved;
+}
+
+
HRESULT CALLBACK IBindStatusCallbackEx_GetBindInfoEx_Proxy(
- IBindStatusCallbackEx* This, DWORD *grfBINDF, BINDINFO *pbindinfo,
+ IBindStatusCallbackEx* This, DWORD *grfBINDF, BINDINFO *bindinfo,
DWORD *grfBINDF2, DWORD *pdwReserved)
{
- FIXME("stub\n");
- return E_NOTIMPL;
+ RemBINDINFO rem_bindinfo = {sizeof(rem_bindinfo)};
+ RemSTGMEDIUM rem_stgmed = {0};
+ HRESULT hres;
+
+ TRACE("(%p)->(%p %p %p %p)\n", This, grfBINDF, bindinfo, grfBINDF2, pdwReserved);
+
+ proxy_marshal_bindinfo(bindinfo, &rem_bindinfo);
+ hres = IBindStatusCallbackEx_RemoteGetBindInfoEx_Proxy(This, grfBINDF, &rem_bindinfo,
+ &rem_stgmed, grfBINDF2, pdwReserved);
+ proxy_unmarshal_bindinfo(&rem_bindinfo, bindinfo);
+ return hres;
}
HRESULT __RPC_STUB IBindStatusCallbackEx_GetBindInfoEx_Stub(
- IBindStatusCallbackEx* This, DWORD *grfBINDF, RemBINDINFO *pbindinfo,
- RemSTGMEDIUM *pstgmed, DWORD *grfBINDF2, DWORD *pdwReserved)
+ IBindStatusCallbackEx* This, DWORD *grfBINDF, RemBINDINFO *rem_bindinfo,
+ RemSTGMEDIUM *rem_stgmed, DWORD *grfBINDF2, DWORD *pdwReserved)
{
- FIXME("stub\n");
- return E_NOTIMPL;
-}
+ BINDINFO bindinfo = {sizeof(bindinfo)};
+ HRESULT hres;
+ TRACE("(%p)->(%p %p %p %p %p)\n", This, grfBINDF, rem_bindinfo, rem_stgmed, grfBINDF2, pdwReserved);
+
+ /*
+ * Although arguments suggest support for STGMEDIUM from BINDINFO, tests show
+ * that it's not supported and returned data is lost.
+ */
+ stub_unmarshal_bindinfo(rem_bindinfo, &bindinfo);
+ hres = IBindStatusCallbackEx_GetBindInfoEx(This, grfBINDF, &bindinfo, grfBINDF2, pdwReserved);
+ stub_marshal_bindinfo(&bindinfo, rem_bindinfo);
+ return hres;
+}
HRESULT CALLBACK IBindStatusCallback_GetBindInfo_Proxy(
- IBindStatusCallback* This, DWORD *grfBINDF, BINDINFO *pbindinfo)
+ IBindStatusCallback* This, DWORD *grfBINDF, BINDINFO *bindinfo)
{
- FIXME("stub\n");
- return E_NOTIMPL;
+ RemBINDINFO rem_bindinfo = {sizeof(rem_bindinfo)};
+ RemSTGMEDIUM rem_stgmed = {0};
+ HRESULT hres;
+
+ TRACE("(%p)->(%p %p)\n", This, grfBINDF, bindinfo);
+
+ proxy_marshal_bindinfo(bindinfo, &rem_bindinfo);
+ hres = IBindStatusCallback_RemoteGetBindInfo_Proxy(This, grfBINDF, &rem_bindinfo, &rem_stgmed);
+ proxy_unmarshal_bindinfo(&rem_bindinfo, bindinfo);
+ return hres;
}
HRESULT __RPC_STUB IBindStatusCallback_GetBindInfo_Stub(
IBindStatusCallback* This, DWORD *grfBINDF,
- RemBINDINFO *pbindinfo, RemSTGMEDIUM *pstgmed)
+ RemBINDINFO *rem_bindinfo, RemSTGMEDIUM *rem_stgmed)
{
- FIXME("stub\n");
- return E_NOTIMPL;
+ BINDINFO bindinfo = {sizeof(bindinfo)};
+ HRESULT hres;
+
+ TRACE("(%p)->(%p %p %p)\n", This, grfBINDF, rem_bindinfo, rem_stgmed);
+
+ stub_unmarshal_bindinfo(rem_bindinfo, &bindinfo);
+ hres = IBindStatusCallback_GetBindInfo(This, grfBINDF, &bindinfo);
+ stub_marshal_bindinfo(&bindinfo, rem_bindinfo);
+ return hres;
}
HRESULT CALLBACK IBindStatusCallback_OnDataAvailable_Proxy(
IBindStatusCallback* This, DWORD grfBSCF, DWORD dwSize,
FORMATETC *pformatetc, STGMEDIUM *pstgmed)
{
- FIXME("stub\n");
- return E_NOTIMPL;
+ RemFORMATETC rem_formatetc;
+ RemSTGMEDIUM *rem_stgmed;
+ HRESULT hres;
+
+ TRACE("(%p)->(%x %u %p %p)\n", This, grfBSCF, dwSize, pformatetc, pstgmed);
+
+ hres = marshal_stgmed(pstgmed, &rem_stgmed);
+ if(FAILED(hres))
+ return hres;
+
+ rem_formatetc.cfFormat = pformatetc->cfFormat;
+ rem_formatetc.ptd = 0;
+ rem_formatetc.dwAspect = pformatetc->dwAspect;
+ rem_formatetc.lindex = pformatetc->lindex;
+ rem_formatetc.tymed = pformatetc->tymed;
+
+ hres = IBindStatusCallback_RemoteOnDataAvailable_Proxy(This, grfBSCF, dwSize, &rem_formatetc, rem_stgmed);
+
+ heap_free(rem_stgmed);
+ return hres;
}
HRESULT __RPC_STUB IBindStatusCallback_OnDataAvailable_Stub(
IBindStatusCallback* This, DWORD grfBSCF, DWORD dwSize,
RemFORMATETC *pformatetc, RemSTGMEDIUM *pstgmed)
{
- FIXME("stub\n");
- return E_NOTIMPL;
+ STGMEDIUM stgmed = { TYMED_NULL };
+ FORMATETC formatetc;
+ HRESULT hres;
+
+ TRACE("(%p)->(%x %u %p %p)\n", This, grfBSCF, dwSize, pformatetc, pstgmed);
+
+ hres = unmarshal_stgmed(pstgmed, &stgmed);
+ if(FAILED(hres))
+ return hres;
+
+ formatetc.cfFormat = pformatetc->cfFormat;
+ formatetc.ptd = NULL;
+ formatetc.dwAspect = pformatetc->dwAspect;
+ formatetc.lindex = pformatetc->lindex;
+ formatetc.tymed = pformatetc->tymed;
+
+ hres = IBindStatusCallback_OnDataAvailable(This, grfBSCF, dwSize, &formatetc, &stgmed);
+
+ ReleaseStgMedium(&stgmed);
+ return hres;
}
HRESULT CALLBACK IBinding_GetBindResult_Proxy(IBinding* This,