| /* |
| * Copyright 2015 Zhenbo Li |
| * |
| * This library is free software; you can redistribute it and/or |
| * modify it under the terms of the GNU Lesser General Public |
| * License as published by the Free Software Foundation; either |
| * version 2.1 of the License, or (at your option) any later version. |
| * |
| * This library is distributed in the hope that it will be useful, |
| * but WITHOUT ANY WARRANTY; without even the implied warranty of |
| * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU |
| * Lesser General Public License for more details. |
| * |
| * You should have received a copy of the GNU Lesser General Public |
| * License along with this library; if not, write to the Free Software |
| * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA |
| */ |
| |
| #define COBJMACROS |
| |
| #include <wine/test.h> |
| #include <stdarg.h> |
| |
| #include "windef.h" |
| #include "winbase.h" |
| #include "ole2.h" |
| #include "mshtml.h" |
| |
| static BSTR a2bstr(const char *str) |
| { |
| BSTR ret; |
| int len; |
| |
| len = MultiByteToWideChar(CP_ACP, 0, str, -1, NULL, 0); |
| ret = SysAllocStringLen(NULL, len); |
| MultiByteToWideChar(CP_ACP, 0, str, -1, ret, len); |
| |
| return ret; |
| } |
| |
| static int strcmp_wa(LPCWSTR strw, const char *stra) |
| { |
| CHAR buf[512]; |
| WideCharToMultiByte(CP_ACP, 0, strw, -1, buf, sizeof(buf), NULL, NULL); |
| return lstrcmpA(stra, buf); |
| } |
| |
| #define DEFINE_EXPECT(func) \ |
| static BOOL expect_ ## func = FALSE, called_ ## func = FALSE |
| |
| #define SET_EXPECT(func) \ |
| do { called_ ## func = FALSE; expect_ ## func = TRUE; } while(0) |
| |
| #define CHECK_EXPECT2(func) \ |
| do { \ |
| trace(#func "\n"); \ |
| ok(expect_ ##func, "unexpected call " #func "\n"); \ |
| called_ ## func = TRUE; \ |
| }while(0) |
| |
| #define CHECK_EXPECT(func) \ |
| do { \ |
| CHECK_EXPECT2(func); \ |
| expect_ ## func = FALSE; \ |
| }while(0) |
| |
| #define CHECK_CALLED(func) \ |
| do { \ |
| ok(called_ ## func, "expected " #func "\n"); \ |
| expect_ ## func = called_ ## func = FALSE; \ |
| }while(0) |
| |
| static IHTMLXMLHttpRequest *xhr = NULL; |
| static BSTR content_type = NULL; |
| static int loading_cnt = 0; |
| static int readystatechange_cnt = 0; |
| |
| DEFINE_EXPECT(xmlhttprequest_onreadystatechange_opened); |
| DEFINE_EXPECT(xmlhttprequest_onreadystatechange_headers_received); |
| DEFINE_EXPECT(xmlhttprequest_onreadystatechange_loading); |
| DEFINE_EXPECT(xmlhttprequest_onreadystatechange_done); |
| |
| #define test_disp(u,id) _test_disp(__LINE__,u,id) |
| static void _test_disp(unsigned line, IUnknown *unk, const IID *diid) |
| { |
| IDispatchEx *dispex; |
| ITypeInfo *typeinfo; |
| UINT ticnt; |
| HRESULT hres; |
| |
| hres = IUnknown_QueryInterface(unk, &IID_IDispatchEx, (void**)&dispex); |
| ok_(__FILE__,line) (hres == S_OK, "Could not get IDispatch: %08x\n", hres); |
| if(FAILED(hres)) |
| return; |
| |
| ticnt = 0xdeadbeef; |
| hres = IDispatchEx_GetTypeInfoCount(dispex, &ticnt); |
| ok_(__FILE__,line) (hres == S_OK, "GetTypeInfoCount failed: %08x\n", hres); |
| ok_(__FILE__,line) (ticnt == 1, "ticnt=%u\n", ticnt); |
| |
| hres = IDispatchEx_GetTypeInfo(dispex, 0, 0, &typeinfo); |
| ok_(__FILE__,line) (hres == S_OK, "GetTypeInfo failed: %08x\n", hres); |
| |
| if(SUCCEEDED(hres)) { |
| TYPEATTR *type_attr; |
| |
| hres = ITypeInfo_GetTypeAttr(typeinfo, &type_attr); |
| ok_(__FILE__,line) (hres == S_OK, "GetTypeAttr failed: %08x\n", hres); |
| ok_(__FILE__,line) (IsEqualGUID(&type_attr->guid, diid), "unexpected guid %s\n", |
| wine_dbgstr_guid(&type_attr->guid)); |
| |
| ITypeInfo_ReleaseTypeAttr(typeinfo, type_attr); |
| ITypeInfo_Release(typeinfo); |
| } |
| |
| IDispatchEx_Release(dispex); |
| } |
| |
| #define test_event_args(a,b,c,d,e,f,g) _test_event_args(__LINE__,a,b,c,d,e,f,g) |
| static void _test_event_args(unsigned line, const IID *dispiid, DISPID id, WORD wFlags, DISPPARAMS *pdp, |
| VARIANT *pvarRes, EXCEPINFO *pei, IServiceProvider *pspCaller) |
| { |
| ok_(__FILE__,line) (id == DISPID_VALUE, "id = %d\n", id); |
| ok_(__FILE__,line) (wFlags == DISPATCH_METHOD, "wFlags = %x\n", wFlags); |
| ok_(__FILE__,line) (pdp != NULL, "pdp == NULL\n"); |
| ok_(__FILE__,line) (pdp->cArgs == 1, "pdp->cArgs = %d\n", pdp->cArgs); |
| ok_(__FILE__,line) (pdp->cNamedArgs == 1, "pdp->cNamedArgs = %d\n", pdp->cNamedArgs); |
| ok_(__FILE__,line) (pdp->rgdispidNamedArgs[0] == DISPID_THIS, "pdp->rgdispidNamedArgs[0] = %d\n", |
| pdp->rgdispidNamedArgs[0]); |
| ok_(__FILE__,line) (V_VT(pdp->rgvarg) == VT_DISPATCH, "V_VT(rgvarg) = %d\n", V_VT(pdp->rgvarg)); |
| ok_(__FILE__,line) (pvarRes != NULL, "pvarRes == NULL\n"); |
| ok_(__FILE__,line) (pei != NULL, "pei == NULL"); |
| ok_(__FILE__,line) (!pspCaller, "pspCaller != NULL\n"); |
| |
| if(dispiid) |
| _test_disp(line, (IUnknown*)V_DISPATCH(pdp->rgvarg), dispiid); |
| } |
| |
| static HRESULT WINAPI DispatchEx_QueryInterface(IDispatchEx *iface, REFIID riid, void **ppv) |
| { |
| *ppv = NULL; |
| |
| if(IsEqualGUID(riid, &IID_IUnknown) |
| || IsEqualGUID(riid, &IID_IDispatch) |
| || IsEqualGUID(riid, &IID_IDispatchEx)) |
| *ppv = iface; |
| else { |
| ok(0, "unexpected riid %s\n", wine_dbgstr_guid(riid)); |
| return E_NOINTERFACE; |
| } |
| |
| return S_OK; |
| } |
| |
| static ULONG WINAPI DispatchEx_AddRef(IDispatchEx *iface) |
| { |
| return 2; |
| } |
| |
| static ULONG WINAPI DispatchEx_Release(IDispatchEx *iface) |
| { |
| return 1; |
| } |
| |
| static HRESULT WINAPI DispatchEx_GetTypeInfoCount(IDispatchEx *iface, UINT *pctinfo) |
| { |
| ok(0, "unexpected call\n"); |
| return E_NOTIMPL; |
| } |
| |
| static HRESULT WINAPI DispatchEx_GetTypeInfo(IDispatchEx *iface, UINT iTInfo, |
| LCID lcid, ITypeInfo **ppTInfo) |
| { |
| ok(0, "unexpected call\n"); |
| return E_NOTIMPL; |
| } |
| |
| static HRESULT WINAPI DispatchEx_GetIDsOfNames(IDispatchEx *iface, REFIID riid, |
| LPOLESTR *rgszNames, UINT cNames, |
| LCID lcid, DISPID *rgDispId) |
| { |
| ok(0, "unexpected call\n"); |
| return E_NOTIMPL; |
| } |
| |
| static HRESULT WINAPI DispatchEx_Invoke(IDispatchEx *iface, DISPID dispIdMember, |
| REFIID riid, LCID lcid, WORD wFlags, DISPPARAMS *pDispParams, |
| VARIANT *pVarResult, EXCEPINFO *pExcepInfo, UINT *puArgErr) |
| { |
| ok(0, "unexpected call\n"); |
| return E_NOTIMPL; |
| } |
| |
| static HRESULT WINAPI DispatchEx_GetDispID(IDispatchEx *iface, BSTR bstrName, DWORD grfdex, DISPID *pid) |
| { |
| ok(0, "unexpected call\n"); |
| return E_NOTIMPL; |
| } |
| |
| static HRESULT WINAPI DispatchEx_DeleteMemberByName(IDispatchEx *iface, BSTR bstrName, DWORD grfdex) |
| { |
| ok(0, "unexpected call %s %x\n", wine_dbgstr_w(bstrName), grfdex); |
| return E_NOTIMPL; |
| } |
| |
| static HRESULT WINAPI DispatchEx_DeleteMemberByDispID(IDispatchEx *iface, DISPID id) |
| { |
| ok(0, "unexpected call\n"); |
| return E_NOTIMPL; |
| } |
| |
| static HRESULT WINAPI DispatchEx_GetMemberProperties(IDispatchEx *iface, DISPID id, DWORD grfdexFetch, DWORD *pgrfdex) |
| { |
| ok(0, "unexpected call\n"); |
| return E_NOTIMPL; |
| } |
| |
| static HRESULT WINAPI DispatchEx_GetMemberName(IDispatchEx *iface, DISPID id, BSTR *pbstrName) |
| { |
| ok(0, "unexpected call\n"); |
| return E_NOTIMPL; |
| } |
| |
| static HRESULT WINAPI DispatchEx_GetNextDispID(IDispatchEx *iface, DWORD grfdex, DISPID id, DISPID *pid) |
| { |
| ok(0, "unexpected call\n"); |
| return E_NOTIMPL; |
| } |
| |
| static HRESULT WINAPI DispatchEx_GetNameSpaceParent(IDispatchEx *iface, IUnknown **ppunk) |
| { |
| ok(0, "unexpected call\n"); |
| return E_NOTIMPL; |
| } |
| |
| static HRESULT WINAPI xmlhttprequest_onreadystatechange(IDispatchEx *iface, DISPID id, LCID lcid, WORD wFlags, DISPPARAMS *pdp, |
| VARIANT *pvarRes, EXCEPINFO *pei, IServiceProvider *pspCaller) |
| { |
| LONG val; |
| HRESULT hres; |
| |
| test_event_args(&DIID_DispHTMLXMLHttpRequest, id, wFlags, pdp, pvarRes, pei, pspCaller); |
| |
| hres = IHTMLXMLHttpRequest_get_readyState(xhr, &val); |
| ok(hres == S_OK, "get_readyState failed: %08x\n", hres); |
| readystatechange_cnt++; |
| |
| switch(val) { |
| case 1: |
| CHECK_EXPECT(xmlhttprequest_onreadystatechange_opened); |
| break; |
| case 2: |
| CHECK_EXPECT(xmlhttprequest_onreadystatechange_headers_received); |
| break; |
| case 3: |
| loading_cnt++; |
| CHECK_EXPECT2(xmlhttprequest_onreadystatechange_loading); |
| break; |
| case 4: |
| CHECK_EXPECT(xmlhttprequest_onreadystatechange_done); |
| break; |
| default: |
| ok(0, "unexpected readyState: %d\n", val); |
| } |
| return S_OK; |
| } |
| |
| static IDispatchExVtbl xmlhttprequest_onreadystatechangeFuncVtbl = { |
| DispatchEx_QueryInterface, |
| DispatchEx_AddRef, |
| DispatchEx_Release, |
| DispatchEx_GetTypeInfoCount, |
| DispatchEx_GetTypeInfo, |
| DispatchEx_GetIDsOfNames, |
| DispatchEx_Invoke, |
| DispatchEx_GetDispID, |
| xmlhttprequest_onreadystatechange, |
| DispatchEx_DeleteMemberByName, |
| DispatchEx_DeleteMemberByDispID, |
| DispatchEx_GetMemberProperties, |
| DispatchEx_GetMemberName, |
| DispatchEx_GetNextDispID, |
| DispatchEx_GetNameSpaceParent |
| }; |
| static IDispatchEx xmlhttprequest_onreadystatechange_obj = { &xmlhttprequest_onreadystatechangeFuncVtbl }; |
| |
| static BOOL doc_complete; |
| static IHTMLDocument2 *notif_doc; |
| |
| static HRESULT WINAPI PropertyNotifySink_QueryInterface(IPropertyNotifySink *iface, |
| REFIID riid, void**ppv) |
| { |
| if(IsEqualGUID(&IID_IPropertyNotifySink, riid)) { |
| *ppv = iface; |
| return S_OK; |
| } |
| |
| ok(0, "unexpected call\n"); |
| return E_NOINTERFACE; |
| } |
| |
| static ULONG WINAPI PropertyNotifySink_AddRef(IPropertyNotifySink *iface) |
| { |
| return 2; |
| } |
| |
| static ULONG WINAPI PropertyNotifySink_Release(IPropertyNotifySink *iface) |
| { |
| return 1; |
| } |
| |
| static HRESULT WINAPI PropertyNotifySink_OnChanged(IPropertyNotifySink *iface, DISPID dispID) |
| { |
| if(dispID == DISPID_READYSTATE){ |
| BSTR state; |
| HRESULT hres; |
| |
| hres = IHTMLDocument2_get_readyState(notif_doc, &state); |
| ok(hres == S_OK, "get_readyState failed: %08x\n", hres); |
| |
| if(!strcmp_wa(state, "complete")) |
| doc_complete = TRUE; |
| |
| SysFreeString(state); |
| } |
| |
| return S_OK; |
| } |
| |
| static HRESULT WINAPI PropertyNotifySink_OnRequestEdit(IPropertyNotifySink *iface, DISPID dispID) |
| { |
| ok(0, "unexpected call\n"); |
| return E_NOTIMPL; |
| } |
| |
| static IPropertyNotifySinkVtbl PropertyNotifySinkVtbl = { |
| PropertyNotifySink_QueryInterface, |
| PropertyNotifySink_AddRef, |
| PropertyNotifySink_Release, |
| PropertyNotifySink_OnChanged, |
| PropertyNotifySink_OnRequestEdit |
| }; |
| |
| static IPropertyNotifySink PropertyNotifySink = { &PropertyNotifySinkVtbl }; |
| |
| static void do_advise(IUnknown *unk, REFIID riid, IUnknown *unk_advise) |
| { |
| IConnectionPointContainer *container; |
| IConnectionPoint *cp; |
| DWORD cookie; |
| HRESULT hres; |
| |
| hres = IUnknown_QueryInterface(unk, &IID_IConnectionPointContainer, (void**)&container); |
| ok(hres == S_OK, "QueryInterface(IID_IConnectionPointContainer) failed: %08x\n", hres); |
| |
| hres = IConnectionPointContainer_FindConnectionPoint(container, riid, &cp); |
| IConnectionPointContainer_Release(container); |
| ok(hres == S_OK, "FindConnectionPoint failed: %08x\n", hres); |
| |
| hres = IConnectionPoint_Advise(cp, unk_advise, &cookie); |
| IConnectionPoint_Release(cp); |
| ok(hres == S_OK, "Advise failed: %08x\n", hres); |
| } |
| |
| static void pump_msgs(BOOL *b) |
| { |
| MSG msg; |
| |
| if(b) { |
| while(!*b && GetMessageW(&msg, NULL, 0, 0)) { |
| TranslateMessage(&msg); |
| DispatchMessageW(&msg); |
| } |
| }else { |
| while(PeekMessageW(&msg, NULL, 0, 0, PM_REMOVE)) { |
| TranslateMessage(&msg); |
| DispatchMessageW(&msg); |
| } |
| } |
| } |
| |
| |
| struct HEADER_TYPE { |
| const char *key; |
| const char *value; |
| }; |
| |
| static void create_xmlhttprequest(IHTMLDocument2 *doc) |
| { |
| IHTMLWindow2 *window; |
| IHTMLWindow5 *window5; |
| VARIANT var; |
| IHTMLXMLHttpRequestFactory *factory; |
| HRESULT hres; |
| |
| hres = IHTMLDocument2_get_parentWindow(doc, &window); |
| ok(hres == S_OK, "get_parentWindow failed: %08x\n", hres); |
| ok(window != NULL, "window == NULL\n"); |
| |
| hres = IHTMLWindow2_QueryInterface(window, &IID_IHTMLWindow5, (void**)&window5); |
| IHTMLWindow2_Release(window); |
| if(FAILED(hres)) { |
| win_skip("IHTMLWindow5 not supported\n"); |
| return; |
| } |
| |
| VariantInit(&var); |
| hres = IHTMLWindow5_get_XMLHttpRequest(window5, &var); |
| IHTMLWindow5_Release(window5); |
| ok(hres == S_OK, "get_XMLHttpRequest failed: %08x\n", hres); |
| ok(V_VT(&var) == VT_DISPATCH, "V_VT(&var) is %08x, expected VT_DISPATCH\n", V_VT(&var)); |
| |
| hres = IDispatch_QueryInterface(V_DISPATCH(&var), &IID_IHTMLXMLHttpRequestFactory, (void**)&factory); |
| VariantClear(&var); |
| ok(hres == S_OK, "QueryInterface(IID_IHTMLXMLHttpRequestFactory) failed: %08x\n", hres); |
| ok(factory != NULL, "factory == NULL\n"); |
| |
| hres = IHTMLXMLHttpRequestFactory_create(factory, &xhr); |
| IHTMLXMLHttpRequestFactory_Release(factory); |
| ok(hres == S_OK, "create failed: %08x\n", hres); |
| ok(xhr != NULL, "xhr == NULL\n"); |
| } |
| |
| static void test_header(const struct HEADER_TYPE expect[], int num) |
| { |
| int i; |
| BSTR key, text, all_header; |
| HRESULT hres; |
| char all[4096], buf[512]; |
| |
| all_header = NULL; |
| hres = IHTMLXMLHttpRequest_getAllResponseHeaders(xhr, &all_header); |
| ok(hres == S_OK, "getAllResponseHeader failed: %08x\n", hres); |
| ok(all_header != NULL, "all_header == NULL\n"); |
| |
| WideCharToMultiByte(CP_UTF8, 0, all_header, -1, all, sizeof(all), NULL, NULL); |
| SysFreeString(all_header); |
| |
| for(i = 0; i < num; ++i) { |
| text = NULL; |
| key = a2bstr(expect[i].key); |
| hres = IHTMLXMLHttpRequest_getResponseHeader(xhr, key, &text); |
| ok(hres == S_OK, "getResponseHeader failed, got %08x\n", hres); |
| ok(text != NULL, "text == NULL\n"); |
| ok(!strcmp_wa(text, expect[i].value), |
| "Expect %s: %s, got %s\n", expect[i].key, expect[i].value, wine_dbgstr_w(text)); |
| SysFreeString(key); |
| SysFreeString(text); |
| |
| strcpy(buf, expect[i].key); |
| strcat(buf, ": "); |
| strcat(buf, expect[i].value); |
| ok(strstr(all, buf) != NULL, "AllResponseHeaders(%s) don't have expected substr(%s)\n", all, buf); |
| } |
| } |
| |
| static void test_sync_xhr(IHTMLDocument2 *doc, const char *xml_url, const char *expect_text) |
| { |
| VARIANT vbool, vempty, var; |
| BSTR method, url; |
| BSTR text; |
| LONG val; |
| HRESULT hres; |
| static const struct HEADER_TYPE expect_headers[] = { |
| {"Server", "Apache"}, |
| {"Accept-Ranges", "bytes"}, |
| {"Content-Length", "51"}, |
| {"Content-Type", "application/xml"} |
| }; |
| |
| create_xmlhttprequest(doc); |
| if(!xhr) |
| return; |
| |
| V_VT(&var) = VT_EMPTY; |
| hres = IHTMLXMLHttpRequest_get_onreadystatechange(xhr, &var); |
| ok(hres == S_OK, "get_onreadystatechange failed: %08x\n", hres); |
| ok(V_VT(&var) == VT_NULL, "V_VT(onreadystatechange) = %d\n", V_VT(&var)); |
| |
| V_VT(&var) = VT_DISPATCH; |
| V_DISPATCH(&var) = (IDispatch*)&xmlhttprequest_onreadystatechange_obj; |
| hres = IHTMLXMLHttpRequest_put_onreadystatechange(xhr, var); |
| ok(hres == S_OK, "put_onreadystatechange failed: %08x\n", hres); |
| |
| V_VT(&var) = VT_EMPTY; |
| hres = IHTMLXMLHttpRequest_get_onreadystatechange(xhr, &var); |
| ok(hres == S_OK, "get_onreadystatechange failed: %08x\n", hres); |
| ok(V_VT(&var) == VT_DISPATCH, "V_VT(onreadystatechange) = %d\n", V_VT(&var)); |
| ok(V_DISPATCH(&var) == (IDispatch*)&xmlhttprequest_onreadystatechange_obj, "unexpected onreadystatechange value\n"); |
| |
| hres = IHTMLXMLHttpRequest_get_readyState(xhr, NULL); |
| ok(hres == E_POINTER, "Expect E_POINTER, got %08x\n", hres); |
| |
| val = 0xdeadbeef; |
| hres = IHTMLXMLHttpRequest_get_readyState(xhr, &val); |
| ok(hres == S_OK, "get_readyState failed: %08x\n", hres); |
| ok(val == 0, "Expect UNSENT, got %d\n", val); |
| |
| hres = IHTMLXMLHttpRequest_get_status(xhr, NULL); |
| ok(hres == E_POINTER, "Expect E_POINTER, got %08x\n", hres); |
| |
| val = 0xdeadbeef; |
| hres = IHTMLXMLHttpRequest_get_status(xhr, &val); |
| ok(hres == E_FAIL, "Expect E_FAIL, got: %08x\n", hres); |
| ok(val == 0, "Expect 0, got %d\n", val); |
| |
| hres = IHTMLXMLHttpRequest_get_statusText(xhr, NULL); |
| ok(hres == E_POINTER, "Expect E_POINTER, got %08x\n", hres); |
| |
| hres = IHTMLXMLHttpRequest_get_statusText(xhr, &text); |
| ok(hres == E_FAIL, "Expect E_FAIL, got: %08x\n", hres); |
| ok(text == NULL, "Expect NULL, got %p\n", text); |
| |
| text = (BSTR)0xdeadbeef; |
| hres = IHTMLXMLHttpRequest_getAllResponseHeaders(xhr, &text); |
| ok(hres == E_FAIL, "got %08x\n", hres); |
| ok(text == NULL, "text = %p\n", text); |
| |
| text = (BSTR)0xdeadbeef; |
| hres = IHTMLXMLHttpRequest_getResponseHeader(xhr, content_type, &text); |
| ok(hres == E_FAIL, "got %08x\n", hres); |
| ok(text == NULL, "text = %p\n", text); |
| |
| method = a2bstr("GET"); |
| url = a2bstr(xml_url); |
| V_VT(&vbool) = VT_BOOL; |
| V_BOOL(&vbool) = VARIANT_FALSE; |
| V_VT(&vempty) = VT_EMPTY; |
| |
| SET_EXPECT(xmlhttprequest_onreadystatechange_opened); |
| hres = IHTMLXMLHttpRequest_open(xhr, method, url, vbool, vempty, vempty); |
| todo_wine ok(hres == S_OK, "open failed: %08x\n", hres); /* Gecko 30+ only supports async */ |
| todo_wine CHECK_CALLED(xmlhttprequest_onreadystatechange_opened); |
| |
| SysFreeString(method); |
| SysFreeString(url); |
| |
| if(FAILED(hres)) { |
| IHTMLXMLHttpRequest_Release(xhr); |
| xhr = NULL; |
| return; |
| } |
| |
| text = (BSTR)0xdeadbeef; |
| hres = IHTMLXMLHttpRequest_getAllResponseHeaders(xhr, &text); |
| ok(hres == E_FAIL, "got %08x\n", hres); |
| ok(text == NULL, "text = %p\n", text); |
| |
| text = (BSTR)0xdeadbeef; |
| hres = IHTMLXMLHttpRequest_getResponseHeader(xhr, content_type, &text); |
| ok(hres == E_FAIL, "got %08x\n", hres); |
| ok(text == NULL, "text = %p\n", text); |
| |
| val = 0xdeadbeef; |
| hres = IHTMLXMLHttpRequest_get_status(xhr, &val); |
| ok(hres == E_FAIL, "Expect E_FAIL, got: %08x\n", hres); |
| ok(val == 0, "Expect 0, got %d\n", val); |
| |
| hres = IHTMLXMLHttpRequest_get_statusText(xhr, &text); |
| ok(hres == E_FAIL, "Expect E_FAIL, got: %08x\n", hres); |
| ok(text == NULL, "Expect NULL, got %p\n", text); |
| |
| val = 0xdeadbeef; |
| hres = IHTMLXMLHttpRequest_get_readyState(xhr, &val); |
| ok(hres == S_OK, "get_readyState failed: %08x\n", hres); |
| ok(val == 1, "Expect OPENED, got %d\n", val); |
| |
| SET_EXPECT(xmlhttprequest_onreadystatechange_opened); |
| SET_EXPECT(xmlhttprequest_onreadystatechange_headers_received); |
| SET_EXPECT(xmlhttprequest_onreadystatechange_loading); |
| SET_EXPECT(xmlhttprequest_onreadystatechange_done); |
| loading_cnt = 0; |
| hres = IHTMLXMLHttpRequest_send(xhr, vempty); |
| ok(hres == S_OK, "send failed: %08x\n", hres); |
| CHECK_CALLED(xmlhttprequest_onreadystatechange_opened); |
| CHECK_CALLED(xmlhttprequest_onreadystatechange_headers_received); |
| CHECK_CALLED(xmlhttprequest_onreadystatechange_loading); |
| CHECK_CALLED(xmlhttprequest_onreadystatechange_done); |
| ok(loading_cnt == 1, "loading_cnt = %d\n", loading_cnt); |
| |
| text = NULL; |
| hres = IHTMLXMLHttpRequest_getResponseHeader(xhr, content_type, &text); |
| ok(hres == S_OK, "getResponseHeader failed, got %08x\n", hres); |
| ok(text != NULL, "text == NULL\n"); |
| SysFreeString(text); |
| |
| if(expect_text) |
| test_header(expect_headers, sizeof(expect_headers)/sizeof(expect_headers[0])); |
| |
| val = 0xdeadbeef; |
| hres = IHTMLXMLHttpRequest_get_status(xhr, &val); |
| ok(hres == S_OK, "get_status failed: %08x\n", hres); |
| ok(val == 200, "Expect 200, got %d\n", val); |
| |
| hres = IHTMLXMLHttpRequest_get_statusText(xhr, &text); |
| ok(hres == S_OK, "get_statusText failed: %08x\n", hres); |
| ok(text != NULL, "text == NULL\n"); |
| ok(!strcmp_wa(text, "OK"), |
| "Expected \"OK\", got %s\n", wine_dbgstr_w(text)); |
| SysFreeString(text); |
| |
| val = 0xdeadbeef; |
| hres = IHTMLXMLHttpRequest_get_readyState(xhr, &val); |
| ok(hres == S_OK, "get_readyState failed: %08x\n", hres); |
| ok(val == 4, "Expect DONE, got %d\n", val); |
| |
| hres = IHTMLXMLHttpRequest_get_responseText(xhr, &text); |
| ok(hres == S_OK, "get_responseText failed: %08x\n", hres); |
| ok(text != NULL, "test == NULL\n"); |
| if(expect_text) |
| ok(!strcmp_wa(text, expect_text), "expect %s, got %s\n", |
| expect_text, wine_dbgstr_w(text)); |
| SysFreeString(text); |
| |
| IHTMLXMLHttpRequest_Release(xhr); |
| xhr = NULL; |
| } |
| |
| static void test_async_xhr(IHTMLDocument2 *doc, const char *xml_url, const char *expect_text) |
| { |
| VARIANT vbool, vempty, var; |
| BSTR method, url; |
| BSTR text; |
| LONG val; |
| HRESULT hres; |
| static const struct HEADER_TYPE expect_headers[] = { |
| {"Content-Length", "51"}, |
| {"Content-Type", "application/xml"} |
| }; |
| |
| create_xmlhttprequest(doc); |
| if(!xhr) |
| return; |
| |
| V_VT(&var) = VT_DISPATCH; |
| V_DISPATCH(&var) = (IDispatch*)&xmlhttprequest_onreadystatechange_obj; |
| hres = IHTMLXMLHttpRequest_put_onreadystatechange(xhr, var); |
| ok(hres == S_OK, "put_onreadystatechange failed: %08x\n", hres); |
| |
| V_VT(&var) = VT_EMPTY; |
| hres = IHTMLXMLHttpRequest_get_onreadystatechange(xhr, &var); |
| ok(hres == S_OK, "get_onreadystatechange failed: %08x\n", hres); |
| ok(V_VT(&var) == VT_DISPATCH, "V_VT(onreadystatechange) = %d\n", V_VT(&var)); |
| ok(V_DISPATCH(&var) == (IDispatch*)&xmlhttprequest_onreadystatechange_obj, "unexpected onreadystatechange value\n"); |
| |
| hres = IHTMLXMLHttpRequest_getResponseHeader(xhr, NULL, &text); |
| ok(hres == E_INVALIDARG, "Expect E_INVALIDARG, got %08x\n", hres); |
| |
| hres = IHTMLXMLHttpRequest_getResponseHeader(xhr, content_type, NULL); |
| ok(hres == E_POINTER, "Expect E_POINTER, got %08x\n", hres); |
| |
| hres = IHTMLXMLHttpRequest_getResponseHeader(xhr, NULL, NULL); |
| ok(hres == E_POINTER || broken(hres == E_INVALIDARG), /* Vista and before */ |
| "Expect E_POINTER, got %08x\n", hres); |
| |
| text = (BSTR)0xdeadbeef; |
| hres = IHTMLXMLHttpRequest_getResponseHeader(xhr, content_type, &text); |
| ok(hres == E_FAIL, "got %08x\n", hres); |
| ok(text == NULL, "text = %p\n", text); |
| |
| hres = IHTMLXMLHttpRequest_getAllResponseHeaders(xhr, NULL); |
| ok(hres == E_POINTER, "Expect E_POINTER, got %08x\n", hres); |
| |
| text = (BSTR)0xdeadbeef; |
| hres = IHTMLXMLHttpRequest_getAllResponseHeaders(xhr, &text); |
| ok(hres == E_FAIL, "got %08x\n", hres); |
| ok(text == NULL, "text = %p\n", text); |
| |
| val = 0xdeadbeef; |
| hres = IHTMLXMLHttpRequest_get_status(xhr, &val); |
| ok(hres == E_FAIL, "Expect E_FAIL, got: %08x\n", hres); |
| ok(val == 0, "Expect 0, got %d\n", val); |
| |
| text = (BSTR)0xdeadbeef; |
| hres = IHTMLXMLHttpRequest_get_statusText(xhr, &text); |
| ok(hres == E_FAIL, "Expect E_FAIL, got: %08x\n", hres); |
| ok(text == NULL, "Expect NULL, got %p\n", text); |
| |
| val = 0xdeadbeef; |
| hres = IHTMLXMLHttpRequest_get_readyState(xhr, &val); |
| ok(hres == S_OK, "get_readyState failed: %08x\n", hres); |
| ok(val == 0, "Expect UNSENT, got %d\n", val); |
| |
| method = a2bstr("GET"); |
| url = a2bstr(xml_url); |
| V_VT(&vbool) = VT_BOOL; |
| V_BOOL(&vbool) = VARIANT_TRUE; |
| V_VT(&vempty) = VT_EMPTY; |
| |
| SET_EXPECT(xmlhttprequest_onreadystatechange_opened); |
| hres = IHTMLXMLHttpRequest_open(xhr, method, url, vbool, vempty, vempty); |
| ok(hres == S_OK, "open failed: %08x\n", hres); |
| CHECK_CALLED(xmlhttprequest_onreadystatechange_opened); |
| |
| SysFreeString(method); |
| SysFreeString(url); |
| |
| if(FAILED(hres)) { |
| IHTMLXMLHttpRequest_Release(xhr); |
| xhr = NULL; |
| return; |
| } |
| |
| text = (BSTR)0xdeadbeef; |
| hres = IHTMLXMLHttpRequest_getAllResponseHeaders(xhr, &text); |
| ok(hres == E_FAIL, "got %08x\n", hres); |
| ok(text == NULL, "text = %p\n", text); |
| |
| text = (BSTR)0xdeadbeef; |
| hres = IHTMLXMLHttpRequest_getResponseHeader(xhr, content_type, &text); |
| ok(hres == E_FAIL, "got %08x\n", hres); |
| ok(text == NULL, "text = %p\n", text); |
| |
| val = 0xdeadbeef; |
| hres = IHTMLXMLHttpRequest_get_status(xhr, &val); |
| ok(hres == E_FAIL, "Expect E_FAIL, got: %08x\n", hres); |
| ok(val == 0, "Expect 0, got %d\n", val); |
| |
| hres = IHTMLXMLHttpRequest_get_statusText(xhr, &text); |
| ok(hres == E_FAIL, "Expect E_FAIL, got: %08x\n", hres); |
| ok(text == NULL, "Expect NULL, got %p\n", text); |
| |
| val = 0xdeadbeef; |
| hres = IHTMLXMLHttpRequest_get_readyState(xhr, &val); |
| ok(hres == S_OK, "get_readyState failed: %08x\n", hres); |
| ok(val == 1, "Expect OPENED, got %d\n", val); |
| |
| SET_EXPECT(xmlhttprequest_onreadystatechange_opened); |
| SET_EXPECT(xmlhttprequest_onreadystatechange_headers_received); |
| SET_EXPECT(xmlhttprequest_onreadystatechange_loading); |
| SET_EXPECT(xmlhttprequest_onreadystatechange_done); |
| loading_cnt = 0; |
| hres = IHTMLXMLHttpRequest_send(xhr, vempty); |
| |
| ok(hres == S_OK, "send failed: %08x\n", hres); |
| if(SUCCEEDED(hres)) |
| pump_msgs(&called_xmlhttprequest_onreadystatechange_done); |
| todo_wine CHECK_CALLED(xmlhttprequest_onreadystatechange_opened); |
| CHECK_CALLED(xmlhttprequest_onreadystatechange_headers_received); |
| CHECK_CALLED(xmlhttprequest_onreadystatechange_loading); |
| CHECK_CALLED(xmlhttprequest_onreadystatechange_done); |
| /* Workaround for loading large files */ |
| if(expect_text) |
| ok(loading_cnt == 1, "loading_cnt = %d\n", loading_cnt); |
| else |
| todo_wine ok(loading_cnt == 1, "loading_cnt = %d\n", loading_cnt); |
| |
| if(FAILED(hres)) { |
| IHTMLXMLHttpRequest_Release(xhr); |
| xhr = NULL; |
| return; |
| } |
| |
| text = NULL; |
| hres = IHTMLXMLHttpRequest_getAllResponseHeaders(xhr, &text); |
| ok(hres == S_OK, "getAllResponseHeader failed, got %08x\n", hres); |
| ok(text != NULL, "text == NULL\n"); |
| SysFreeString(text); |
| |
| if(expect_text) |
| test_header(expect_headers, sizeof(expect_headers)/sizeof(expect_headers[0])); |
| |
| val = 0xdeadbeef; |
| hres = IHTMLXMLHttpRequest_get_status(xhr, &val); |
| ok(hres == S_OK, "get_status failed: %08x\n", hres); |
| ok(val == 200, "Expect 200, got %d\n", val); |
| |
| text = NULL; |
| hres = IHTMLXMLHttpRequest_get_statusText(xhr, &text); |
| ok(hres == S_OK, "get_statusText failed: %08x\n", hres); |
| ok(text != NULL, "text == NULL\n"); |
| ok(!strcmp_wa(text, "OK"), "Expected \"OK\", got %s\n", wine_dbgstr_w(text)); |
| SysFreeString(text); |
| |
| val = 0xdeadbeef; |
| hres = IHTMLXMLHttpRequest_get_readyState(xhr, &val); |
| ok(hres == S_OK, "get_readyState failed: %08x\n", hres); |
| ok(val == 4, "Expect DONE, got %d\n", val); |
| |
| text = NULL; |
| hres = IHTMLXMLHttpRequest_get_responseText(xhr, &text); |
| ok(hres == S_OK, "get_responseText failed: %08x\n", hres); |
| ok(text != NULL, "test == NULL\n"); |
| if(expect_text) |
| ok(!strcmp_wa(text, expect_text), "expect %s, got %s\n", |
| expect_text, wine_dbgstr_w(text)); |
| SysFreeString(text); |
| |
| IHTMLXMLHttpRequest_Release(xhr); |
| xhr = NULL; |
| } |
| |
| static void test_async_xhr_abort(IHTMLDocument2 *doc, const char *xml_url) |
| { |
| VARIANT vbool, vempty, var; |
| BSTR method, url; |
| LONG val; |
| HRESULT hres; |
| |
| method = a2bstr("GET"); |
| url = a2bstr(xml_url); |
| V_VT(&vbool) = VT_BOOL; |
| V_BOOL(&vbool) = VARIANT_TRUE; |
| V_VT(&vempty) = VT_EMPTY; |
| |
| trace("abort before send() is fired\n"); |
| create_xmlhttprequest(doc); |
| if(!xhr) |
| return; |
| |
| V_VT(&var) = VT_DISPATCH; |
| V_DISPATCH(&var) = (IDispatch*)&xmlhttprequest_onreadystatechange_obj; |
| hres = IHTMLXMLHttpRequest_put_onreadystatechange(xhr, var); |
| |
| SET_EXPECT(xmlhttprequest_onreadystatechange_opened); |
| hres = IHTMLXMLHttpRequest_open(xhr, method, url, vbool, vempty, vempty); |
| ok(hres == S_OK, "open failed: %08x\n", hres); |
| CHECK_CALLED(xmlhttprequest_onreadystatechange_opened); |
| |
| hres = IHTMLXMLHttpRequest_abort(xhr); |
| ok(hres == S_OK, "abort failed: %08x\n", hres); |
| |
| hres = IHTMLXMLHttpRequest_get_status(xhr, &val); |
| ok(hres == E_FAIL, "Expect E_FAIL, got: %08x\n", hres); |
| ok(val == 0, "Expect 0, got %d\n", val); |
| |
| hres = IHTMLXMLHttpRequest_get_readyState(xhr, &val); |
| ok(hres == S_OK, "get_readyState failed: %08x\n", hres); |
| ok(val == 0, "Expect UNSENT, got %d\n", val); |
| |
| IHTMLXMLHttpRequest_Release(xhr); |
| xhr = NULL; |
| |
| trace("abort after send() is fired\n"); |
| create_xmlhttprequest(doc); |
| V_VT(&var) = VT_DISPATCH; |
| V_DISPATCH(&var) = (IDispatch*)&xmlhttprequest_onreadystatechange_obj; |
| hres = IHTMLXMLHttpRequest_put_onreadystatechange(xhr, var); |
| |
| SET_EXPECT(xmlhttprequest_onreadystatechange_opened); |
| hres = IHTMLXMLHttpRequest_open(xhr, method, url, vbool, vempty, vempty); |
| ok(hres == S_OK, "open failed: %08x\n", hres); |
| CHECK_CALLED(xmlhttprequest_onreadystatechange_opened); |
| |
| loading_cnt = 0; |
| readystatechange_cnt = 0; |
| SET_EXPECT(xmlhttprequest_onreadystatechange_opened); |
| SET_EXPECT(xmlhttprequest_onreadystatechange_done); |
| hres = IHTMLXMLHttpRequest_send(xhr, vempty); |
| ok(hres == S_OK, "send failed: %08x\n", hres); |
| todo_wine CHECK_CALLED(xmlhttprequest_onreadystatechange_opened); |
| |
| hres = IHTMLXMLHttpRequest_abort(xhr); |
| ok(hres == S_OK, "abort failed: %08x\n", hres); |
| CHECK_CALLED(xmlhttprequest_onreadystatechange_done); |
| |
| hres = IHTMLXMLHttpRequest_get_readyState(xhr, &val); |
| ok(hres == S_OK, "get_readyState failed: %08x\n", hres); |
| ok(val == 0, "Expect UNSENT, got %d\n", val); |
| |
| hres = IHTMLXMLHttpRequest_get_status(xhr, &val); |
| ok(hres == E_FAIL, "Expect E_FAIL, got: %08x\n", hres); |
| ok(val == 0, "Expect 0, got %d\n", val); |
| |
| ok(loading_cnt == 0, "loading_cnt = %d, expect 0, loading_cnt\n", loading_cnt); |
| todo_wine ok(readystatechange_cnt == 2, "readystatechange_cnt = %d, expect 2\n", readystatechange_cnt); |
| |
| IHTMLXMLHttpRequest_Release(xhr); |
| xhr = NULL; |
| |
| SysFreeString(method); |
| SysFreeString(url); |
| } |
| |
| static IHTMLDocument2 *create_doc_from_url(const char *start_url) |
| { |
| BSTR url; |
| IBindCtx *bc; |
| IMoniker *url_mon; |
| IPersistMoniker *persist_mon; |
| IHTMLDocument2 *doc; |
| HRESULT hres; |
| |
| hres = CreateBindCtx(0, &bc); |
| ok(hres == S_OK, "CreateBindCtx failed: 0x%08x\n", hres); |
| |
| url = a2bstr(start_url); |
| hres = CreateURLMoniker(NULL, url, &url_mon); |
| ok(hres == S_OK, "CreateURLMoniker failed: 0x%08x\n", hres); |
| |
| hres = CoCreateInstance(&CLSID_HTMLDocument, NULL, |
| CLSCTX_INPROC_SERVER | CLSCTX_INPROC_HANDLER, &IID_IHTMLDocument2, |
| (void**)&doc); |
| ok(hres == S_OK, "CoCreateInstance failed: 0x%08x\n", hres); |
| |
| hres = IHTMLDocument2_QueryInterface(doc, &IID_IPersistMoniker, |
| (void**)&persist_mon); |
| ok(hres == S_OK, "IHTMLDocument2_QueryInterface failed: 0x%08x\n", hres); |
| |
| hres = IPersistMoniker_Load(persist_mon, FALSE, url_mon, bc, |
| STGM_SHARE_EXCLUSIVE | STGM_READWRITE); |
| ok(hres == S_OK, "IPersistMoniker_Load failed: 0x%08x\n", hres); |
| |
| IPersistMoniker_Release(persist_mon); |
| IMoniker_Release(url_mon); |
| IBindCtx_Release(bc); |
| SysFreeString(url); |
| |
| doc_complete = FALSE; |
| notif_doc = doc; |
| do_advise((IUnknown*)doc, &IID_IPropertyNotifySink, (IUnknown*)&PropertyNotifySink); |
| pump_msgs(&doc_complete); |
| |
| return doc; |
| } |
| |
| START_TEST(xmlhttprequest) |
| { |
| IHTMLDocument2 *doc; |
| static const char start_url[] = "http://test.winehq.org/tests/hello.html"; |
| static const char xml_url[] = "http://test.winehq.org/tests/xmltest.xml"; |
| static const char large_page_url[] = "http://test.winehq.org/tests/data.php"; |
| static const char expect_response_text[] = "<?xml version=\"1.0\" encoding=\"utf-8\"?>\n<a>TEST</a>\n"; |
| |
| CoInitialize(NULL); |
| |
| content_type = a2bstr("Content-Type"); |
| doc = create_doc_from_url(start_url); |
| if(doc) { |
| test_sync_xhr(doc, xml_url, expect_response_text); |
| test_sync_xhr(doc, large_page_url, NULL); |
| test_async_xhr(doc, xml_url, expect_response_text); |
| test_async_xhr(doc, large_page_url, NULL); |
| test_async_xhr_abort(doc, large_page_url); |
| IHTMLDocument2_Release(doc); |
| } |
| SysFreeString(content_type); |
| |
| CoUninitialize(); |
| } |