4 * Copyright 2005 Mike McCormack for CodeWeavers
5 * Copyright 2007-2008 Alistair Leslie-Hughes
6 * Copyright 2010-2011 Adam Martinson for CodeWeavers
7 * Copyright 2010-2011 Nikolay Sivov for CodeWeavers
9 * This library is free software; you can redistribute it and/or
10 * modify it under the terms of the GNU Lesser General Public
11 * License as published by the Free Software Foundation; either
12 * version 2.1 of the License, or (at your option) any later version.
14 * This library is distributed in the hope that it will be useful,
15 * but WITHOUT ANY WARRANTY; without even the implied warranty of
16 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
17 * Lesser General Public License for more details.
19 * You should have received a copy of the GNU Lesser General Public
20 * License along with this library; if not, write to the Free Software
21 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
34 #include "msxml2did.h"
42 #include "wine/test.h"
44 DEFINE_GUID(SID_SContainerDispatch, 0xb722be00, 0x4e68, 0x101b, 0xa2, 0xbc, 0x00, 0xaa, 0x00, 0x40, 0x47, 0x70);
45 DEFINE_GUID(SID_UnknownSID, 0x75dd09cb, 0x6c40, 0x11d5, 0x85, 0x43, 0x00, 0xc0, 0x4f, 0xa0, 0xfb, 0xa3);
47 #define DEFINE_EXPECT(func) \
48 static BOOL expect_ ## func = FALSE, called_ ## func = FALSE
50 #define SET_EXPECT(func) \
51 expect_ ## func = TRUE
53 #define CHECK_EXPECT2(func) \
55 ok(expect_ ##func, "unexpected call " #func "\n"); \
56 called_ ## func = TRUE; \
59 #define CHECK_CALLED(func) \
61 ok(called_ ## func, "expected " #func "\n"); \
62 expect_ ## func = called_ ## func = FALSE; \
65 static const char *debugstr_guid(REFIID riid)
72 sprintf(buf, "{%08X-%04X-%04X-%02X%02X-%02X%02X%02X%02X%02X%02X}",
73 riid->Data1, riid->Data2, riid->Data3, riid->Data4[0],
74 riid->Data4[1], riid->Data4[2], riid->Data4[3], riid->Data4[4],
75 riid->Data4[5], riid->Data4[6], riid->Data4[7]);
80 static int g_unexpectedcall, g_expectedcall;
84 IDispatch IDispatch_iface;
88 static inline dispevent *impl_from_IDispatch( IDispatch *iface )
90 return CONTAINING_RECORD(iface, dispevent, IDispatch_iface);
93 static HRESULT WINAPI dispevent_QueryInterface(IDispatch *iface, REFIID riid, void **ppvObject)
97 if ( IsEqualGUID( riid, &IID_IDispatch) ||
98 IsEqualGUID( riid, &IID_IUnknown) )
103 return E_NOINTERFACE;
105 IDispatch_AddRef( iface );
110 static ULONG WINAPI dispevent_AddRef(IDispatch *iface)
112 dispevent *This = impl_from_IDispatch( iface );
113 return InterlockedIncrement( &This->ref );
116 static ULONG WINAPI dispevent_Release(IDispatch *iface)
118 dispevent *This = impl_from_IDispatch( iface );
119 ULONG ref = InterlockedDecrement( &This->ref );
122 HeapFree(GetProcessHeap(), 0, This);
127 static HRESULT WINAPI dispevent_GetTypeInfoCount(IDispatch *iface, UINT *pctinfo)
134 static HRESULT WINAPI dispevent_GetTypeInfo(IDispatch *iface, UINT iTInfo,
135 LCID lcid, ITypeInfo **ppTInfo)
141 static HRESULT WINAPI dispevent_GetIDsOfNames(IDispatch *iface, REFIID riid,
142 LPOLESTR *rgszNames, UINT cNames, LCID lcid, DISPID *rgDispId)
148 static HRESULT WINAPI dispevent_Invoke(IDispatch *iface, DISPID member, REFIID riid,
149 LCID lcid, WORD flags, DISPPARAMS *params, VARIANT *result,
150 EXCEPINFO *excepInfo, UINT *argErr)
152 ok(member == 0, "expected 0 member, got %d\n", member);
153 ok(lcid == LOCALE_SYSTEM_DEFAULT, "expected LOCALE_SYSTEM_DEFAULT, got lcid %x\n", lcid);
154 ok(flags == DISPATCH_METHOD, "expected DISPATCH_METHOD, got %d\n", flags);
156 ok(params->cArgs == 0, "got %d\n", params->cArgs);
157 ok(params->cNamedArgs == 0, "got %d\n", params->cNamedArgs);
158 ok(params->rgvarg == NULL, "got %p\n", params->rgvarg);
159 ok(params->rgdispidNamedArgs == NULL, "got %p\n", params->rgdispidNamedArgs);
161 ok(result == NULL, "got %p\n", result);
162 ok(excepInfo == NULL, "got %p\n", excepInfo);
163 ok(argErr == NULL, "got %p\n", argErr);
169 static const IDispatchVtbl dispeventVtbl =
171 dispevent_QueryInterface,
174 dispevent_GetTypeInfoCount,
175 dispevent_GetTypeInfo,
176 dispevent_GetIDsOfNames,
180 static IDispatch* create_dispevent(void)
182 dispevent *event = HeapAlloc(GetProcessHeap(), 0, sizeof(*event));
184 event->IDispatch_iface.lpVtbl = &dispeventVtbl;
187 return (IDispatch*)&event->IDispatch_iface;
191 DEFINE_EXPECT(site_qi_IServiceProvider);
192 DEFINE_EXPECT(site_qi_IXMLDOMDocument);
193 DEFINE_EXPECT(site_qi_IOleClientSite);
195 DEFINE_EXPECT(sp_queryservice_SID_SBindHost);
196 DEFINE_EXPECT(sp_queryservice_SID_SContainerDispatch_htmldoc2);
197 DEFINE_EXPECT(sp_queryservice_SID_secmgr_htmldoc2);
198 DEFINE_EXPECT(sp_queryservice_SID_secmgr_xmldomdoc);
199 DEFINE_EXPECT(sp_queryservice_SID_secmgr_secmgr);
201 DEFINE_EXPECT(htmldoc2_get_all);
202 DEFINE_EXPECT(htmldoc2_get_url);
203 DEFINE_EXPECT(collection_get_length);
207 IServiceProvider IServiceProvider_iface;
212 static HRESULT WINAPI site_QueryInterface(IUnknown *iface, REFIID riid, void **ppvObject)
216 if (IsEqualGUID(riid, &IID_IServiceProvider))
217 CHECK_EXPECT2(site_qi_IServiceProvider);
219 if (IsEqualGUID(riid, &IID_IXMLDOMDocument))
220 CHECK_EXPECT2(site_qi_IXMLDOMDocument);
222 if (IsEqualGUID(riid, &IID_IOleClientSite))
223 CHECK_EXPECT2(site_qi_IOleClientSite);
225 if (IsEqualGUID(riid, &IID_IUnknown))
227 else if (IsEqualGUID(riid, &IID_IServiceProvider))
228 *ppvObject = &testprov.IServiceProvider_iface;
230 if (*ppvObject) IUnknown_AddRef(iface);
232 return *ppvObject ? S_OK : E_NOINTERFACE;
235 static ULONG WINAPI site_AddRef(IUnknown *iface)
240 static ULONG WINAPI site_Release(IUnknown *iface)
245 static const IUnknownVtbl testsiteVtbl =
254 IUnknown IUnknown_iface;
257 static testsite_t testsite = { { &testsiteVtbl } };
259 /* test IHTMLElementCollection */
260 static HRESULT WINAPI htmlecoll_QueryInterface(IHTMLElementCollection *iface, REFIID riid, void **ppvObject)
262 ok(0, "unexpected call\n");
264 return E_NOINTERFACE;
267 static ULONG WINAPI htmlecoll_AddRef(IHTMLElementCollection *iface)
272 static ULONG WINAPI htmlecoll_Release(IHTMLElementCollection *iface)
277 static HRESULT WINAPI htmlecoll_GetTypeInfoCount(IHTMLElementCollection *iface, UINT *pctinfo)
279 ok(0, "unexpected call\n");
283 static HRESULT WINAPI htmlecoll_GetTypeInfo(IHTMLElementCollection *iface, UINT iTInfo,
284 LCID lcid, ITypeInfo **ppTInfo)
286 ok(0, "unexpected call\n");
290 static HRESULT WINAPI htmlecoll_GetIDsOfNames(IHTMLElementCollection *iface, REFIID riid,
291 LPOLESTR *rgszNames, UINT cNames,
292 LCID lcid, DISPID *rgDispId)
294 ok(0, "unexpected call\n");
298 static HRESULT WINAPI htmlecoll_Invoke(IHTMLElementCollection *iface, DISPID dispIdMember,
299 REFIID riid, LCID lcid, WORD wFlags, DISPPARAMS *pDispParams,
300 VARIANT *pVarResult, EXCEPINFO *pExcepInfo, UINT *puArgErr)
302 ok(0, "unexpected call\n");
306 static HRESULT WINAPI htmlecoll_toString(IHTMLElementCollection *iface, BSTR *String)
308 ok(0, "unexpected call\n");
312 static HRESULT WINAPI htmlecoll_put_length(IHTMLElementCollection *iface, LONG v)
314 ok(0, "unexpected call\n");
318 static HRESULT WINAPI htmlecoll_get_length(IHTMLElementCollection *iface, LONG *v)
320 CHECK_EXPECT2(collection_get_length);
324 static HRESULT WINAPI htmlecoll_get__newEnum(IHTMLElementCollection *iface, IUnknown **p)
326 ok(0, "unexpected call\n");
330 static HRESULT WINAPI htmlecoll_item(IHTMLElementCollection *iface, VARIANT name, VARIANT index, IDispatch **pdisp)
332 ok(0, "unexpected call\n");
336 static HRESULT WINAPI htmlecoll_tags(IHTMLElementCollection *iface, VARIANT tagName, IDispatch **pdisp)
338 ok(0, "unexpected call\n");
342 static const IHTMLElementCollectionVtbl TestHTMLECollectionVtbl = {
343 htmlecoll_QueryInterface,
346 htmlecoll_GetTypeInfoCount,
347 htmlecoll_GetTypeInfo,
348 htmlecoll_GetIDsOfNames,
352 htmlecoll_put_length,
353 htmlecoll_get_length,
354 htmlecoll_get__newEnum,
361 IHTMLElementCollection IHTMLElementCollection_iface;
364 static testhtmlecoll_t htmlecoll = { { &TestHTMLECollectionVtbl } };
366 /* test IHTMLDocument2 */
367 static HRESULT WINAPI htmldoc2_QueryInterface(IHTMLDocument2 *iface, REFIID riid, void **ppvObject)
371 return E_NOINTERFACE;
374 static ULONG WINAPI htmldoc2_AddRef(IHTMLDocument2 *iface)
379 static ULONG WINAPI htmldoc2_Release(IHTMLDocument2 *iface)
384 static HRESULT WINAPI htmldoc2_GetTypeInfoCount(IHTMLDocument2 *iface, UINT *pctinfo)
386 ok(0, "unexpected call\n");
390 static HRESULT WINAPI htmldoc2_GetTypeInfo(IHTMLDocument2 *iface, UINT iTInfo,
391 LCID lcid, ITypeInfo **ppTInfo)
393 ok(0, "unexpected call\n");
397 static HRESULT WINAPI htmldoc2_GetIDsOfNames(IHTMLDocument2 *iface, REFIID riid,
398 LPOLESTR *rgszNames, UINT cNames,
399 LCID lcid, DISPID *rgDispId)
401 ok(0, "unexpected call\n");
405 static HRESULT WINAPI htmldoc2_Invoke(IHTMLDocument2 *iface, DISPID dispIdMember,
406 REFIID riid, LCID lcid, WORD wFlags, DISPPARAMS *pDispParams,
407 VARIANT *pVarResult, EXCEPINFO *pExcepInfo, UINT *puArgErr)
409 ok(0, "unexpected call\n");
413 static HRESULT WINAPI htmldoc2_get_Script(IHTMLDocument2 *iface, IDispatch **p)
415 ok(0, "unexpected call\n");
419 static HRESULT WINAPI htmldoc2_get_all(IHTMLDocument2 *iface, IHTMLElementCollection **p)
421 CHECK_EXPECT2(htmldoc2_get_all);
422 *p = &htmlecoll.IHTMLElementCollection_iface;
426 static HRESULT WINAPI htmldoc2_get_body(IHTMLDocument2 *iface, IHTMLElement **p)
428 ok(0, "unexpected call\n");
432 static HRESULT WINAPI htmldoc2_get_activeElement(IHTMLDocument2 *iface, IHTMLElement **p)
434 ok(0, "unexpected call\n");
438 static HRESULT WINAPI htmldoc2_get_images(IHTMLDocument2 *iface, IHTMLElementCollection **p)
440 ok(0, "unexpected call\n");
444 static HRESULT WINAPI htmldoc2_get_applets(IHTMLDocument2 *iface, IHTMLElementCollection **p)
446 ok(0, "unexpected call\n");
450 static HRESULT WINAPI htmldoc2_get_links(IHTMLDocument2 *iface, IHTMLElementCollection **p)
452 ok(0, "unexpected call\n");
456 static HRESULT WINAPI htmldoc2_get_forms(IHTMLDocument2 *iface, IHTMLElementCollection **p)
458 ok(0, "unexpected call\n");
462 static HRESULT WINAPI htmldoc2_get_anchors(IHTMLDocument2 *iface, IHTMLElementCollection **p)
464 ok(0, "unexpected call\n");
468 static HRESULT WINAPI htmldoc2_put_title(IHTMLDocument2 *iface, BSTR v)
470 ok(0, "unexpected call\n");
474 static HRESULT WINAPI htmldoc2_get_title(IHTMLDocument2 *iface, BSTR *p)
476 ok(0, "unexpected call\n");
480 static HRESULT WINAPI htmldoc2_get_scripts(IHTMLDocument2 *iface, IHTMLElementCollection **p)
482 ok(0, "unexpected call\n");
486 static HRESULT WINAPI htmldoc2_put_designMode(IHTMLDocument2 *iface, BSTR v)
488 ok(0, "unexpected call\n");
492 static HRESULT WINAPI htmldoc2_get_designMode(IHTMLDocument2 *iface, BSTR *p)
494 ok(0, "unexpected call\n");
498 static HRESULT WINAPI htmldoc2_get_selection(IHTMLDocument2 *iface, IHTMLSelectionObject **p)
500 ok(0, "unexpected call\n");
504 static HRESULT WINAPI htmldoc2_get_readyState(IHTMLDocument2 *iface, BSTR *p)
506 ok(0, "unexpected call\n");
510 static HRESULT WINAPI htmldoc2_get_frames(IHTMLDocument2 *iface, IHTMLFramesCollection2 **p)
512 ok(0, "unexpected call\n");
516 static HRESULT WINAPI htmldoc2_get_embeds(IHTMLDocument2 *iface, IHTMLElementCollection **p)
518 ok(0, "unexpected call\n");
522 static HRESULT WINAPI htmldoc2_get_plugins(IHTMLDocument2 *iface, IHTMLElementCollection **p)
524 ok(0, "unexpected call\n");
528 static HRESULT WINAPI htmldoc2_put_alinkColor(IHTMLDocument2 *iface, VARIANT v)
530 ok(0, "unexpected call\n");
534 static HRESULT WINAPI htmldoc2_get_alinkColor(IHTMLDocument2 *iface, VARIANT *p)
536 ok(0, "unexpected call\n");
540 static HRESULT WINAPI htmldoc2_put_bgColor(IHTMLDocument2 *iface, VARIANT v)
542 ok(0, "unexpected call\n");
546 static HRESULT WINAPI htmldoc2_get_bgColor(IHTMLDocument2 *iface, VARIANT *p)
548 ok(0, "unexpected call\n");
552 static HRESULT WINAPI htmldoc2_put_fgColor(IHTMLDocument2 *iface, VARIANT v)
554 ok(0, "unexpected call\n");
558 static HRESULT WINAPI htmldoc2_get_fgColor(IHTMLDocument2 *iface, VARIANT *p)
560 ok(0, "unexpected call\n");
564 static HRESULT WINAPI htmldoc2_put_linkColor(IHTMLDocument2 *iface, VARIANT v)
566 ok(0, "unexpected call\n");
570 static HRESULT WINAPI htmldoc2_get_linkColor(IHTMLDocument2 *iface, VARIANT *p)
572 ok(0, "unexpected call\n");
576 static HRESULT WINAPI htmldoc2_put_vlinkColor(IHTMLDocument2 *iface, VARIANT v)
578 ok(0, "unexpected call\n");
582 static HRESULT WINAPI htmldoc2_get_vlinkColor(IHTMLDocument2 *iface, VARIANT *p)
584 ok(0, "unexpected call\n");
588 static HRESULT WINAPI htmldoc2_get_referrer(IHTMLDocument2 *iface, BSTR *p)
590 ok(0, "unexpected call\n");
594 static HRESULT WINAPI htmldoc2_get_location(IHTMLDocument2 *iface, IHTMLLocation **p)
596 ok(0, "unexpected call\n");
600 static HRESULT WINAPI htmldoc2_get_lastModified(IHTMLDocument2 *iface, BSTR *p)
602 ok(0, "unexpected call\n");
606 static HRESULT WINAPI htmldoc2_put_URL(IHTMLDocument2 *iface, BSTR v)
608 ok(0, "unexpected call\n");
612 static HRESULT WINAPI htmldoc2_get_URL(IHTMLDocument2 *iface, BSTR *p)
614 CHECK_EXPECT2(htmldoc2_get_url);
615 *p = SysAllocString(NULL);
619 static HRESULT WINAPI htmldoc2_put_domain(IHTMLDocument2 *iface, BSTR v)
621 ok(0, "unexpected call\n");
625 static HRESULT WINAPI htmldoc2_get_domain(IHTMLDocument2 *iface, BSTR *p)
627 ok(0, "unexpected call\n");
631 static HRESULT WINAPI htmldoc2_put_cookie(IHTMLDocument2 *iface, BSTR v)
633 ok(0, "unexpected call\n");
637 static HRESULT WINAPI htmldoc2_get_cookie(IHTMLDocument2 *iface, BSTR *p)
639 ok(0, "unexpected call\n");
643 static HRESULT WINAPI htmldoc2_put_expando(IHTMLDocument2 *iface, VARIANT_BOOL v)
645 ok(0, "unexpected call\n");
649 static HRESULT WINAPI htmldoc2_get_expando(IHTMLDocument2 *iface, VARIANT_BOOL *p)
651 ok(0, "unexpected call\n");
655 static HRESULT WINAPI htmldoc2_put_charset(IHTMLDocument2 *iface, BSTR v)
657 ok(0, "unexpected call\n");
661 static HRESULT WINAPI htmldoc2_get_charset(IHTMLDocument2 *iface, BSTR *p)
663 ok(0, "unexpected call\n");
667 static HRESULT WINAPI htmldoc2_put_defaultCharset(IHTMLDocument2 *iface, BSTR v)
669 ok(0, "unexpected call\n");
673 static HRESULT WINAPI htmldoc2_get_defaultCharset(IHTMLDocument2 *iface, BSTR *p)
675 ok(0, "unexpected call\n");
679 static HRESULT WINAPI htmldoc2_get_mimeType(IHTMLDocument2 *iface, BSTR *p)
681 ok(0, "unexpected call\n");
685 static HRESULT WINAPI htmldoc2_get_fileSize(IHTMLDocument2 *iface, BSTR *p)
687 ok(0, "unexpected call\n");
691 static HRESULT WINAPI htmldoc2_get_fileCreatedDate(IHTMLDocument2 *iface, BSTR *p)
693 ok(0, "unexpected call\n");
697 static HRESULT WINAPI htmldoc2_get_fileModifiedDate(IHTMLDocument2 *iface, BSTR *p)
699 ok(0, "unexpected call\n");
703 static HRESULT WINAPI htmldoc2_get_fileUpdatedDate(IHTMLDocument2 *iface, BSTR *p)
705 ok(0, "unexpected call\n");
709 static HRESULT WINAPI htmldoc2_get_security(IHTMLDocument2 *iface, BSTR *p)
711 ok(0, "unexpected call\n");
715 static HRESULT WINAPI htmldoc2_get_protocol(IHTMLDocument2 *iface, BSTR *p)
717 ok(0, "unexpected call\n");
721 static HRESULT WINAPI htmldoc2_get_nameProp(IHTMLDocument2 *iface, BSTR *p)
723 ok(0, "unexpected call\n");
727 static HRESULT WINAPI htmldoc2_write(IHTMLDocument2 *iface, SAFEARRAY *psarray)
729 ok(0, "unexpected call\n");
733 static HRESULT WINAPI htmldoc2_writeln(IHTMLDocument2 *iface, SAFEARRAY *psarray)
735 ok(0, "unexpected call\n");
739 static HRESULT WINAPI htmldoc2_open(IHTMLDocument2 *iface, BSTR url, VARIANT name,
740 VARIANT features, VARIANT replace, IDispatch **pomWindowResult)
742 ok(0, "unexpected call\n");
746 static HRESULT WINAPI htmldoc2_close(IHTMLDocument2 *iface)
748 ok(0, "unexpected call\n");
752 static HRESULT WINAPI htmldoc2_clear(IHTMLDocument2 *iface)
754 ok(0, "unexpected call\n");
758 static HRESULT WINAPI htmldoc2_queryCommandSupported(IHTMLDocument2 *iface, BSTR cmdID,
761 ok(0, "unexpected call\n");
765 static HRESULT WINAPI htmldoc2_queryCommandEnabled(IHTMLDocument2 *iface, BSTR cmdID,
768 ok(0, "unexpected call\n");
772 static HRESULT WINAPI htmldoc2_queryCommandState(IHTMLDocument2 *iface, BSTR cmdID,
775 ok(0, "unexpected call\n");
779 static HRESULT WINAPI htmldoc2_queryCommandIndeterm(IHTMLDocument2 *iface, BSTR cmdID,
782 ok(0, "unexpected call\n");
786 static HRESULT WINAPI htmldoc2_queryCommandText(IHTMLDocument2 *iface, BSTR cmdID,
789 ok(0, "unexpected call\n");
793 static HRESULT WINAPI htmldoc2_queryCommandValue(IHTMLDocument2 *iface, BSTR cmdID,
796 ok(0, "unexpected call\n");
800 static HRESULT WINAPI htmldoc2_execCommand(IHTMLDocument2 *iface, BSTR cmdID,
801 VARIANT_BOOL showUI, VARIANT value, VARIANT_BOOL *pfRet)
803 ok(0, "unexpected call\n");
807 static HRESULT WINAPI htmldoc2_execCommandShowHelp(IHTMLDocument2 *iface, BSTR cmdID,
810 ok(0, "unexpected call\n");
814 static HRESULT WINAPI htmldoc2_createElement(IHTMLDocument2 *iface, BSTR eTag,
815 IHTMLElement **newElem)
817 ok(0, "unexpected call\n");
821 static HRESULT WINAPI htmldoc2_put_onhelp(IHTMLDocument2 *iface, VARIANT v)
823 ok(0, "unexpected call\n");
827 static HRESULT WINAPI htmldoc2_get_onhelp(IHTMLDocument2 *iface, VARIANT *p)
829 ok(0, "unexpected call\n");
833 static HRESULT WINAPI htmldoc2_put_onclick(IHTMLDocument2 *iface, VARIANT v)
835 ok(0, "unexpected call\n");
839 static HRESULT WINAPI htmldoc2_get_onclick(IHTMLDocument2 *iface, VARIANT *p)
841 ok(0, "unexpected call\n");
845 static HRESULT WINAPI htmldoc2_put_ondblclick(IHTMLDocument2 *iface, VARIANT v)
847 ok(0, "unexpected call\n");
851 static HRESULT WINAPI htmldoc2_get_ondblclick(IHTMLDocument2 *iface, VARIANT *p)
853 ok(0, "unexpected call\n");
857 static HRESULT WINAPI htmldoc2_put_onkeyup(IHTMLDocument2 *iface, VARIANT v)
859 ok(0, "unexpected call\n");
863 static HRESULT WINAPI htmldoc2_get_onkeyup(IHTMLDocument2 *iface, VARIANT *p)
865 ok(0, "unexpected call\n");
869 static HRESULT WINAPI htmldoc2_put_onkeydown(IHTMLDocument2 *iface, VARIANT v)
871 ok(0, "unexpected call\n");
875 static HRESULT WINAPI htmldoc2_get_onkeydown(IHTMLDocument2 *iface, VARIANT *p)
877 ok(0, "unexpected call\n");
881 static HRESULT WINAPI htmldoc2_put_onkeypress(IHTMLDocument2 *iface, VARIANT v)
883 ok(0, "unexpected call\n");
887 static HRESULT WINAPI htmldoc2_get_onkeypress(IHTMLDocument2 *iface, VARIANT *p)
889 ok(0, "unexpected call\n");
893 static HRESULT WINAPI htmldoc2_put_onmouseup(IHTMLDocument2 *iface, VARIANT v)
895 ok(0, "unexpected call\n");
899 static HRESULT WINAPI htmldoc2_get_onmouseup(IHTMLDocument2 *iface, VARIANT *p)
901 ok(0, "unexpected call\n");
905 static HRESULT WINAPI htmldoc2_put_onmousedown(IHTMLDocument2 *iface, VARIANT v)
907 ok(0, "unexpected call\n");
911 static HRESULT WINAPI htmldoc2_get_onmousedown(IHTMLDocument2 *iface, VARIANT *p)
913 ok(0, "unexpected call\n");
917 static HRESULT WINAPI htmldoc2_put_onmousemove(IHTMLDocument2 *iface, VARIANT v)
919 ok(0, "unexpected call\n");
923 static HRESULT WINAPI htmldoc2_get_onmousemove(IHTMLDocument2 *iface, VARIANT *p)
925 ok(0, "unexpected call\n");
929 static HRESULT WINAPI htmldoc2_put_onmouseout(IHTMLDocument2 *iface, VARIANT v)
931 ok(0, "unexpected call\n");
935 static HRESULT WINAPI htmldoc2_get_onmouseout(IHTMLDocument2 *iface, VARIANT *p)
937 ok(0, "unexpected call\n");
941 static HRESULT WINAPI htmldoc2_put_onmouseover(IHTMLDocument2 *iface, VARIANT v)
943 ok(0, "unexpected call\n");
947 static HRESULT WINAPI htmldoc2_get_onmouseover(IHTMLDocument2 *iface, VARIANT *p)
949 ok(0, "unexpected call\n");
953 static HRESULT WINAPI htmldoc2_put_onreadystatechange(IHTMLDocument2 *iface, VARIANT v)
955 ok(0, "unexpected call\n");
959 static HRESULT WINAPI htmldoc2_get_onreadystatechange(IHTMLDocument2 *iface, VARIANT *p)
961 ok(0, "unexpected call\n");
965 static HRESULT WINAPI htmldoc2_put_onafterupdate(IHTMLDocument2 *iface, VARIANT v)
967 ok(0, "unexpected call\n");
971 static HRESULT WINAPI htmldoc2_get_onafterupdate(IHTMLDocument2 *iface, VARIANT *p)
973 ok(0, "unexpected call\n");
977 static HRESULT WINAPI htmldoc2_put_onrowexit(IHTMLDocument2 *iface, VARIANT v)
979 ok(0, "unexpected call\n");
983 static HRESULT WINAPI htmldoc2_get_onrowexit(IHTMLDocument2 *iface, VARIANT *p)
985 ok(0, "unexpected call\n");
989 static HRESULT WINAPI htmldoc2_put_onrowenter(IHTMLDocument2 *iface, VARIANT v)
991 ok(0, "unexpected call\n");
995 static HRESULT WINAPI htmldoc2_get_onrowenter(IHTMLDocument2 *iface, VARIANT *p)
997 ok(0, "unexpected call\n");
1001 static HRESULT WINAPI htmldoc2_put_ondragstart(IHTMLDocument2 *iface, VARIANT v)
1003 ok(0, "unexpected call\n");
1007 static HRESULT WINAPI htmldoc2_get_ondragstart(IHTMLDocument2 *iface, VARIANT *p)
1009 ok(0, "unexpected call\n");
1013 static HRESULT WINAPI htmldoc2_put_onselectstart(IHTMLDocument2 *iface, VARIANT v)
1015 ok(0, "unexpected call\n");
1019 static HRESULT WINAPI htmldoc2_get_onselectstart(IHTMLDocument2 *iface, VARIANT *p)
1021 ok(0, "unexpected call\n");
1025 static HRESULT WINAPI htmldoc2_elementFromPoint(IHTMLDocument2 *iface, LONG x, LONG y,
1026 IHTMLElement **elementHit)
1028 ok(0, "unexpected call\n");
1032 static HRESULT WINAPI htmldoc2_get_parentWindow(IHTMLDocument2 *iface, IHTMLWindow2 **p)
1034 ok(0, "unexpected call\n");
1038 static HRESULT WINAPI htmldoc2_get_styleSheets(IHTMLDocument2 *iface,
1039 IHTMLStyleSheetsCollection **p)
1041 ok(0, "unexpected call\n");
1045 static HRESULT WINAPI htmldoc2_put_onbeforeupdate(IHTMLDocument2 *iface, VARIANT v)
1047 ok(0, "unexpected call\n");
1051 static HRESULT WINAPI htmldoc2_get_onbeforeupdate(IHTMLDocument2 *iface, VARIANT *p)
1053 ok(0, "unexpected call\n");
1057 static HRESULT WINAPI htmldoc2_put_onerrorupdate(IHTMLDocument2 *iface, VARIANT v)
1059 ok(0, "unexpected call\n");
1063 static HRESULT WINAPI htmldoc2_get_onerrorupdate(IHTMLDocument2 *iface, VARIANT *p)
1065 ok(0, "unexpected call\n");
1069 static HRESULT WINAPI htmldoc2_toString(IHTMLDocument2 *iface, BSTR *String)
1071 ok(0, "unexpected call\n");
1075 static HRESULT WINAPI htmldoc2_createStyleSheet(IHTMLDocument2 *iface, BSTR bstrHref,
1076 LONG lIndex, IHTMLStyleSheet **ppnewStyleSheet)
1078 ok(0, "unexpected call\n");
1082 static const IHTMLDocument2Vtbl TestHTMLDocumentVtbl = {
1083 htmldoc2_QueryInterface,
1086 htmldoc2_GetTypeInfoCount,
1087 htmldoc2_GetTypeInfo,
1088 htmldoc2_GetIDsOfNames,
1090 htmldoc2_get_Script,
1093 htmldoc2_get_activeElement,
1094 htmldoc2_get_images,
1095 htmldoc2_get_applets,
1098 htmldoc2_get_anchors,
1101 htmldoc2_get_scripts,
1102 htmldoc2_put_designMode,
1103 htmldoc2_get_designMode,
1104 htmldoc2_get_selection,
1105 htmldoc2_get_readyState,
1106 htmldoc2_get_frames,
1107 htmldoc2_get_embeds,
1108 htmldoc2_get_plugins,
1109 htmldoc2_put_alinkColor,
1110 htmldoc2_get_alinkColor,
1111 htmldoc2_put_bgColor,
1112 htmldoc2_get_bgColor,
1113 htmldoc2_put_fgColor,
1114 htmldoc2_get_fgColor,
1115 htmldoc2_put_linkColor,
1116 htmldoc2_get_linkColor,
1117 htmldoc2_put_vlinkColor,
1118 htmldoc2_get_vlinkColor,
1119 htmldoc2_get_referrer,
1120 htmldoc2_get_location,
1121 htmldoc2_get_lastModified,
1124 htmldoc2_put_domain,
1125 htmldoc2_get_domain,
1126 htmldoc2_put_cookie,
1127 htmldoc2_get_cookie,
1128 htmldoc2_put_expando,
1129 htmldoc2_get_expando,
1130 htmldoc2_put_charset,
1131 htmldoc2_get_charset,
1132 htmldoc2_put_defaultCharset,
1133 htmldoc2_get_defaultCharset,
1134 htmldoc2_get_mimeType,
1135 htmldoc2_get_fileSize,
1136 htmldoc2_get_fileCreatedDate,
1137 htmldoc2_get_fileModifiedDate,
1138 htmldoc2_get_fileUpdatedDate,
1139 htmldoc2_get_security,
1140 htmldoc2_get_protocol,
1141 htmldoc2_get_nameProp,
1147 htmldoc2_queryCommandSupported,
1148 htmldoc2_queryCommandEnabled,
1149 htmldoc2_queryCommandState,
1150 htmldoc2_queryCommandIndeterm,
1151 htmldoc2_queryCommandText,
1152 htmldoc2_queryCommandValue,
1153 htmldoc2_execCommand,
1154 htmldoc2_execCommandShowHelp,
1155 htmldoc2_createElement,
1156 htmldoc2_put_onhelp,
1157 htmldoc2_get_onhelp,
1158 htmldoc2_put_onclick,
1159 htmldoc2_get_onclick,
1160 htmldoc2_put_ondblclick,
1161 htmldoc2_get_ondblclick,
1162 htmldoc2_put_onkeyup,
1163 htmldoc2_get_onkeyup,
1164 htmldoc2_put_onkeydown,
1165 htmldoc2_get_onkeydown,
1166 htmldoc2_put_onkeypress,
1167 htmldoc2_get_onkeypress,
1168 htmldoc2_put_onmouseup,
1169 htmldoc2_get_onmouseup,
1170 htmldoc2_put_onmousedown,
1171 htmldoc2_get_onmousedown,
1172 htmldoc2_put_onmousemove,
1173 htmldoc2_get_onmousemove,
1174 htmldoc2_put_onmouseout,
1175 htmldoc2_get_onmouseout,
1176 htmldoc2_put_onmouseover,
1177 htmldoc2_get_onmouseover,
1178 htmldoc2_put_onreadystatechange,
1179 htmldoc2_get_onreadystatechange,
1180 htmldoc2_put_onafterupdate,
1181 htmldoc2_get_onafterupdate,
1182 htmldoc2_put_onrowexit,
1183 htmldoc2_get_onrowexit,
1184 htmldoc2_put_onrowenter,
1185 htmldoc2_get_onrowenter,
1186 htmldoc2_put_ondragstart,
1187 htmldoc2_get_ondragstart,
1188 htmldoc2_put_onselectstart,
1189 htmldoc2_get_onselectstart,
1190 htmldoc2_elementFromPoint,
1191 htmldoc2_get_parentWindow,
1192 htmldoc2_get_styleSheets,
1193 htmldoc2_put_onbeforeupdate,
1194 htmldoc2_get_onbeforeupdate,
1195 htmldoc2_put_onerrorupdate,
1196 htmldoc2_get_onerrorupdate,
1198 htmldoc2_createStyleSheet
1203 IHTMLDocument2 IHTMLDocument2_iface;
1206 static testhtmldoc2_t htmldoc2 = { { &TestHTMLDocumentVtbl } };
1208 static HRESULT WINAPI sp_QueryInterface(IServiceProvider *iface, REFIID riid, void **ppvObject)
1212 if (IsEqualGUID(riid, &IID_IUnknown) ||
1213 IsEqualGUID(riid, &IID_IServiceProvider))
1216 IServiceProvider_AddRef(iface);
1220 ok(0, "unexpected query interface: %s\n", debugstr_guid(riid));
1222 return E_NOINTERFACE;
1225 static ULONG WINAPI sp_AddRef(IServiceProvider *iface)
1230 static ULONG WINAPI sp_Release(IServiceProvider *iface)
1235 static HRESULT WINAPI sp_QueryService(IServiceProvider *iface, REFGUID service, REFIID riid, void **obj)
1239 if (IsEqualGUID(service, &SID_SBindHost) &&
1240 IsEqualGUID(riid, &IID_IBindHost))
1242 CHECK_EXPECT2(sp_queryservice_SID_SBindHost);
1244 else if (IsEqualGUID(service, &SID_SContainerDispatch) &&
1245 IsEqualGUID(riid, &IID_IHTMLDocument2))
1247 CHECK_EXPECT2(sp_queryservice_SID_SContainerDispatch_htmldoc2);
1249 else if (IsEqualGUID(service, &SID_SInternetHostSecurityManager) &&
1250 IsEqualGUID(riid, &IID_IHTMLDocument2))
1252 CHECK_EXPECT2(sp_queryservice_SID_secmgr_htmldoc2);
1253 *obj = &htmldoc2.IHTMLDocument2_iface;
1256 else if (IsEqualGUID(service, &SID_SInternetHostSecurityManager) &&
1257 IsEqualGUID(riid, &IID_IXMLDOMDocument))
1259 CHECK_EXPECT2(sp_queryservice_SID_secmgr_xmldomdoc);
1261 else if (IsEqualGUID(service, &SID_SInternetHostSecurityManager) &&
1262 IsEqualGUID(riid, &IID_IInternetHostSecurityManager))
1264 CHECK_EXPECT2(sp_queryservice_SID_secmgr_secmgr);
1266 else if (IsEqualGUID(service, &SID_UnknownSID) &&
1267 IsEqualGUID(riid, &IID_IStream))
1269 /* FIXME: unidentified service id */
1272 ok(0, "unexpected request: sid %s, riid %s\n", debugstr_guid(service), debugstr_guid(riid));
1277 static const IServiceProviderVtbl testprovVtbl =
1285 testprov_t testprov = { { &testprovVtbl } };
1287 #define EXPECT_CHILDREN(node) _expect_children((IXMLDOMNode*)node, __LINE__)
1288 static void _expect_children(IXMLDOMNode *node, int line)
1294 hr = IXMLDOMNode_hasChildNodes(node, &b);
1295 ok_(__FILE__,line)(hr == S_OK, "hasChildNodes() failed, 0x%08x\n", hr);
1296 ok_(__FILE__,line)(b == VARIANT_TRUE, "no children, %d\n", b);
1299 #define EXPECT_NO_CHILDREN(node) _expect_no_children((IXMLDOMNode*)node, __LINE__)
1300 static void _expect_no_children(IXMLDOMNode *node, int line)
1306 hr = IXMLDOMNode_hasChildNodes(node, &b);
1307 ok_(__FILE__,line)(hr == S_FALSE, "hasChildNodes() failed, 0x%08x\n", hr);
1308 ok_(__FILE__,line)(b == VARIANT_FALSE, "no children, %d\n", b);
1311 #define EXPECT_REF(node,ref) _expect_ref((IUnknown*)node, ref, __LINE__)
1312 static void _expect_ref(IUnknown* obj, ULONG ref, int line)
1314 ULONG rc = IUnknown_AddRef(obj);
1315 IUnknown_Release(obj);
1316 ok_(__FILE__,line)(rc-1 == ref, "expected refcount %d, got %d\n", ref, rc-1);
1319 #define EXPECT_LIST_LEN(list,len) _expect_list_len(list, len, __LINE__)
1320 static void _expect_list_len(IXMLDOMNodeList *list, LONG len, int line)
1326 hr = IXMLDOMNodeList_get_length(list, &length);
1327 ok_(__FILE__,line)(hr == S_OK, "got 0x%08x\n", hr);
1328 ok_(__FILE__,line)(length == len, "got %d, expected %d\n", length, len);
1331 #define EXPECT_HR(hr,hr_exp) \
1332 ok(hr == hr_exp, "got 0x%08x, expected 0x%08x\n", hr, hr_exp)
1334 static const WCHAR szEmpty[] = { 0 };
1335 static const WCHAR szIncomplete[] = {
1336 '<','?','x','m','l',' ',
1337 'v','e','r','s','i','o','n','=','\'','1','.','0','\'','?','>','\n',0
1339 static const WCHAR szComplete1[] = {
1340 '<','?','x','m','l',' ',
1341 'v','e','r','s','i','o','n','=','\'','1','.','0','\'','?','>','\n',
1342 '<','o','p','e','n','>','<','/','o','p','e','n','>','\n',0
1344 static const WCHAR szComplete2[] = {
1345 '<','?','x','m','l',' ',
1346 'v','e','r','s','i','o','n','=','\'','1','.','0','\'','?','>','\n',
1347 '<','o','>','<','/','o','>','\n',0
1349 static const WCHAR szComplete3[] = {
1350 '<','?','x','m','l',' ',
1351 'v','e','r','s','i','o','n','=','\'','1','.','0','\'','?','>','\n',
1352 '<','a','>','<','/','a','>','\n',0
1354 static const WCHAR szComplete4[] = {
1355 '<','?','x','m','l',' ','v','e','r','s','i','o','n','=','\'','1','.','0','\'','?','>','\n',
1356 '<','l','c',' ','d','l','=','\'','s','t','r','1','\'','>','\n',
1357 '<','b','s',' ','v','r','=','\'','s','t','r','2','\'',' ','s','z','=','\'','1','2','3','4','\'','>',
1358 'f','n','1','.','t','x','t','\n',
1359 '<','/','b','s','>','\n',
1360 '<','p','r',' ','i','d','=','\'','s','t','r','3','\'',' ','v','r','=','\'','1','.','2','.','3','\'',' ',
1361 'p','n','=','\'','w','i','n','e',' ','2','0','0','5','0','8','0','4','\'','>','\n',
1362 'f','n','2','.','t','x','t','\n',
1363 '<','/','p','r','>','\n',
1364 '<','e','m','p','t','y','>','<','/','e','m','p','t','y','>','\n',
1365 '<','f','o','>','\n',
1366 '<','b','a','>','\n',
1368 '<','/','b','a','>','\n',
1369 '<','/','f','o','>','\n',
1370 '<','/','l','c','>','\n',0
1372 static const WCHAR szComplete5[] = {
1373 '<','S',':','s','e','a','r','c','h',' ','x','m','l','n','s',':','D','=','"','D','A','V',':','"',' ',
1374 'x','m','l','n','s',':','C','=','"','u','r','n',':','s','c','h','e','m','a','s','-','m','i','c','r','o','s','o','f','t','-','c','o','m',':','o','f','f','i','c','e',':','c','l','i','p','g','a','l','l','e','r','y','"',
1375 ' ','x','m','l','n','s',':','S','=','"','u','r','n',':','s','c','h','e','m','a','s','-','m','i','c','r','o','s','o','f','t','-','c','o','m',':','o','f','f','i','c','e',':','c','l','i','p','g','a','l','l','e','r','y',':','s','e','a','r','c','h','"','>',
1376 '<','S',':','s','c','o','p','e','>',
1377 '<','S',':','d','e','e','p','>','/','<','/','S',':','d','e','e','p','>',
1378 '<','/','S',':','s','c','o','p','e','>',
1379 '<','S',':','c','o','n','t','e','n','t','f','r','e','e','t','e','x','t','>',
1380 '<','C',':','t','e','x','t','o','r','p','r','o','p','e','r','t','y','/','>',
1381 'c','o','m','p','u','t','e','r',
1382 '<','/','S',':','c','o','n','t','e','n','t','f','r','e','e','t','e','x','t','>',
1383 '<','/','S',':','s','e','a','r','c','h','>',0
1386 static const WCHAR szComplete6[] = {
1387 '<','?','x','m','l',' ','v','e','r','s','i','o','n','=','\'','1','.','0','\'',' ',
1388 'e','n','c','o','d','i','n','g','=','\'','W','i','n','d','o','w','s','-','1','2','5','2','\'','?','>','\n',
1389 '<','o','p','e','n','>','<','/','o','p','e','n','>','\n',0
1392 static const CHAR szNonUnicodeXML[] =
1393 "<?xml version='1.0' encoding='Windows-1252'?>\n"
1396 static const CHAR szExampleXML[] =
1397 "<?xml version='1.0' encoding='utf-8'?>\n"
1398 "<root xmlns:foo='urn:uuid:86B2F87F-ACB6-45cd-8B77-9BDB92A01A29'>\n"
1400 " <a>A1 field</a>\n"
1401 " <b>B1 field</b>\n"
1402 " <c>C1 field</c>\n"
1403 " <description xmlns:foo='http://www.winehq.org' xmlns:bar='urn:uuid:86B2F87F-ACB6-45cd-8B77-9BDB92A01A29'>\n"
1404 " <html xmlns='http://www.w3.org/1999/xhtml'>\n"
1405 " This is <strong>a</strong> <i>description</i>. <bar:x/>\n"
1407 " <html xml:space='preserve' xmlns='http://www.w3.org/1999/xhtml'>\n"
1408 " This is <strong>a</strong> <i>description</i> with preserved whitespace. <bar:x/>\n"
1414 " <a>A2 field</a>\n"
1415 " <b>B2 field</b>\n"
1416 " <c type=\"old\">C2 field</c>\n"
1419 " <elem xmlns='urn:uuid:86B2F87F-ACB6-45cd-8B77-9BDB92A01A29'>\n"
1420 " <a>A3 field</a>\n"
1421 " <b>B3 field</b>\n"
1422 " <c>C3 field</c>\n"
1426 " <a>A4 field</a>\n"
1427 " <b>B4 field</b>\n"
1428 " <foo:c>C4 field</foo:c>\n"
1432 static const CHAR szNodeTypesXML[] =
1433 "<?xml version='1.0'?>"
1434 "<!-- comment node 0 -->"
1435 "<root id='0' depth='0'>"
1436 " <!-- comment node 1 -->"
1438 " <x id='1' depth='1'>"
1439 " <?foo value='PI for x'?>"
1440 " <!-- comment node 2 -->"
1442 " <a id='3' depth='2'/>"
1443 " <b id='4' depth='2'/>"
1444 " <c id='5' depth='2'/>"
1446 " <y id='2' depth='1'>"
1447 " <?bar value='PI for y'?>"
1448 " <!-- comment node 3 -->"
1450 " <a id='6' depth='2'/>"
1451 " <b id='7' depth='2'/>"
1452 " <c id='8' depth='2'/>"
1456 static const CHAR szTransformXML[] =
1457 "<?xml version=\"1.0\"?>\n"
1462 static const CHAR szTransformSSXML[] =
1463 "<xsl:stylesheet xmlns:xsl=\"http://www.w3.org/1999/XSL/Transform\" version=\"1.0\">\n"
1464 " <xsl:output method=\"html\"/>\n"
1465 " <xsl:template match=\"/\">\n"
1466 " <xsl:apply-templates select=\"greeting\"/>\n"
1467 " </xsl:template>\n"
1468 " <xsl:template match=\"greeting\">\n"
1472 " <xsl:value-of select=\".\"/>\n"
1476 " </xsl:template>\n"
1477 "</xsl:stylesheet>";
1479 static const CHAR szTransformOutput[] =
1482 "</h1></body></html>";
1484 static const CHAR szTypeValueXML[] =
1485 "<?xml version=\"1.0\" encoding=\"utf-8\"?>\n"
1486 "<root xmlns:dt=\"urn:schemas-microsoft-com:datatypes\">\n"
1487 " <string>Wine</string>\n"
1488 " <string2 dt:dt=\"string\">String</string2>\n"
1489 " <number dt:dt=\"number\">12.44</number>\n"
1490 " <number2 dt:dt=\"NUMbEr\">-3.71e3</number2>\n"
1491 " <int dt:dt=\"int\">-13</int>\n"
1492 " <fixed dt:dt=\"fixed.14.4\">7322.9371</fixed>\n"
1493 " <bool dt:dt=\"boolean\">1</bool>\n"
1494 " <datetime dt:dt=\"datetime\">2009-11-18T03:21:33.12</datetime>\n"
1495 " <datetimetz dt:dt=\"datetime.tz\">2003-07-11T11:13:57+03:00</datetimetz>\n"
1496 " <date dt:dt=\"date\">3721-11-01</date>\n"
1497 " <time dt:dt=\"time\">13:57:12.31321</time>\n"
1498 " <timetz dt:dt=\"time.tz\">23:21:01.13+03:21</timetz>\n"
1499 " <i1 dt:dt=\"i1\">-13</i1>\n"
1500 " <i2 dt:dt=\"i2\">31915</i2>\n"
1501 " <i4 dt:dt=\"i4\">-312232</i4>\n"
1502 " <ui1 dt:dt=\"ui1\">123</ui1>\n"
1503 " <ui2 dt:dt=\"ui2\">48282</ui2>\n"
1504 " <ui4 dt:dt=\"ui4\">949281</ui4>\n"
1505 " <r4 dt:dt=\"r4\">213124.0</r4>\n"
1506 " <r8 dt:dt=\"r8\">0.412</r8>\n"
1507 " <float dt:dt=\"float\">41221.421</float>\n"
1508 " <uuid dt:dt=\"uuid\">333C7BC4-460F-11D0-BC04-0080C7055a83</uuid>\n"
1509 " <binhex dt:dt=\"bin.hex\">fffca012003c</binhex>\n"
1510 " <binbase64 dt:dt=\"bin.base64\">YmFzZTY0IHRlc3Q=</binbase64>\n"
1511 " <binbase64_1 dt:dt=\"bin.base64\">\nYmFzZTY0\nIHRlc3Q=\n</binbase64_1>\n"
1512 " <binbase64_2 dt:dt=\"bin.base64\">\nYmF\r\t z ZTY0\nIHRlc3Q=\n</binbase64_2>\n"
1515 static const CHAR szBasicTransformSSXMLPart1[] =
1516 "<?xml version=\"1.0\"?>"
1517 "<xsl:stylesheet version=\"1.0\" xmlns:xsl=\"http://www.w3.org/1999/XSL/Transform\" >"
1518 "<xsl:output method=\"html\"/>\n"
1519 "<xsl:template match=\"/\">"
1520 "<HTML><BODY><TABLE>"
1521 " <xsl:apply-templates select='document(\"";
1523 static const CHAR szBasicTransformSSXMLPart2[] =
1525 " <xsl:sort select=\"cost\"/><xsl:sort select=\"name\"/>"
1526 " </xsl:apply-templates>"
1527 "</TABLE></BODY></HTML>"
1529 "<xsl:template match=\"bottle\">"
1530 " <TR><xsl:apply-templates select=\"name\" /><xsl:apply-templates select=\"cost\" /></TR>"
1532 "<xsl:template match=\"name\">"
1533 " <TD><xsl:apply-templates /></TD>"
1535 "<xsl:template match=\"cost\">"
1536 " <TD><xsl:apply-templates /></TD>"
1538 "</xsl:stylesheet>";
1540 static const CHAR szBasicTransformXML[] =
1541 "<?xml version=\"1.0\"?><bottle><wine><name>Wine</name><cost>$25.00</cost></wine></bottle>";
1543 static const CHAR szBasicTransformOutput[] =
1544 "<HTML><BODY><TABLE><TD>Wine</TD><TD>$25.00</TD></TABLE></BODY></HTML>";
1546 #define SZ_EMAIL_DTD \
1547 "<!DOCTYPE email ["\
1548 " <!ELEMENT email (recipients,from,reply-to?,subject,body,attachment*)>"\
1549 " <!ATTLIST email attachments IDREFS #REQUIRED>"\
1550 " <!ATTLIST email sent (yes|no) \"no\">"\
1551 " <!ELEMENT recipients (to+,cc*)>"\
1552 " <!ELEMENT to (#PCDATA)>"\
1553 " <!ATTLIST to name CDATA #IMPLIED>"\
1554 " <!ELEMENT cc (#PCDATA)>"\
1555 " <!ATTLIST cc name CDATA #IMPLIED>"\
1556 " <!ELEMENT from (#PCDATA)>"\
1557 " <!ATTLIST from name CDATA #IMPLIED>"\
1558 " <!ELEMENT reply-to (#PCDATA)>"\
1559 " <!ATTLIST reply-to name CDATA #IMPLIED>"\
1560 " <!ELEMENT subject ANY>"\
1561 " <!ELEMENT body ANY>"\
1562 " <!ATTLIST body enc CDATA #FIXED \"UTF-8\">"\
1563 " <!ELEMENT attachment (#PCDATA)>"\
1564 " <!ATTLIST attachment id ID #REQUIRED>"\
1567 static const CHAR szEmailXML[] =
1568 "<?xml version=\"1.0\"?>"
1570 "<email attachments=\"patch1\">"
1572 " <to>wine-patches@winehq.org</to>"
1574 " <from name=\"Anonymous\">user@localhost</from>"
1575 " <subject>msxml3/tests: DTD validation (try 87)</subject>"
1577 " It no longer causes spontaneous combustion..."
1579 " <attachment id=\"patch1\">0001-msxml3-tests-DTD-validation.patch</attachment>"
1582 static const CHAR szEmailXML_0D[] =
1583 "<?xml version=\"1.0\"?>"
1585 "<email attachments=\"patch1\">"
1587 " <to>wine-patches@winehq.org</to>"
1589 " <from name=\"Anonymous\">user@localhost</from>"
1590 " <subject>msxml3/tests: DTD validation (try 88)</subject>"
1593 " XML_ELEMENT_UNDECLARED 0xC00CE00D"
1595 " <attachment id=\"patch1\">0001-msxml3-tests-DTD-validation.patch</attachment>"
1598 static const CHAR szEmailXML_0E[] =
1599 "<?xml version=\"1.0\"?>"
1601 "<email attachments=\"patch1\">"
1603 " <to>wine-patches@winehq.org</to>"
1605 " <from name=\"Anonymous\">user@localhost</from>"
1606 " <subject>msxml3/tests: DTD validation (try 89)</subject>"
1608 " XML_ELEMENT_ID_NOT_FOUND 0xC00CE00E"
1610 " <attachment id=\"patch\">0001-msxml3-tests-DTD-validation.patch</attachment>"
1613 static const CHAR szEmailXML_11[] =
1614 "<?xml version=\"1.0\"?>"
1616 "<email attachments=\"patch1\">"
1619 " <from name=\"Anonymous\">user@localhost</from>"
1620 " <subject>msxml3/tests: DTD validation (try 90)</subject>"
1622 " XML_EMPTY_NOT_ALLOWED 0xC00CE011"
1624 " <attachment id=\"patch1\">0001-msxml3-tests-DTD-validation.patch</attachment>"
1627 static const CHAR szEmailXML_13[] =
1628 "<?xml version=\"1.0\"?>"
1630 "<msg attachments=\"patch1\">"
1632 " <to>wine-patches@winehq.org</to>"
1634 " <from name=\"Anonymous\">user@localhost</from>"
1635 " <subject>msxml3/tests: DTD validation (try 91)</subject>"
1637 " XML_ROOT_NAME_MISMATCH 0xC00CE013"
1639 " <attachment id=\"patch1\">0001-msxml3-tests-DTD-validation.patch</attachment>"
1642 static const CHAR szEmailXML_14[] =
1643 "<?xml version=\"1.0\"?>"
1645 "<email attachments=\"patch1\">"
1646 " <to>wine-patches@winehq.org</to>"
1647 " <from name=\"Anonymous\">user@localhost</from>"
1648 " <subject>msxml3/tests: DTD validation (try 92)</subject>"
1650 " XML_INVALID_CONTENT 0xC00CE014"
1652 " <attachment id=\"patch1\">0001-msxml3-tests-DTD-validation.patch</attachment>"
1655 static const CHAR szEmailXML_15[] =
1656 "<?xml version=\"1.0\"?>"
1658 "<email attachments=\"patch1\" ip=\"127.0.0.1\">"
1660 " <to>wine-patches@winehq.org</to>"
1662 " <from name=\"Anonymous\">user@localhost</from>"
1663 " <subject>msxml3/tests: DTD validation (try 93)</subject>"
1665 " XML_ATTRIBUTE_NOT_DEFINED 0xC00CE015"
1667 " <attachment id=\"patch1\">0001-msxml3-tests-DTD-validation.patch</attachment>"
1670 static const CHAR szEmailXML_16[] =
1671 "<?xml version=\"1.0\"?>"
1673 "<email attachments=\"patch1\">"
1675 " <to>wine-patches@winehq.org</to>"
1677 " <from name=\"Anonymous\">user@localhost</from>"
1678 " <subject>msxml3/tests: DTD validation (try 94)</subject>"
1679 " <body enc=\"ASCII\">"
1680 " XML_ATTRIBUTE_FIXED 0xC00CE016"
1682 " <attachment id=\"patch1\">0001-msxml3-tests-DTD-validation.patch</attachment>"
1685 static const CHAR szEmailXML_17[] =
1686 "<?xml version=\"1.0\"?>"
1688 "<email attachments=\"patch1\" sent=\"true\">"
1690 " <to>wine-patches@winehq.org</to>"
1692 " <from name=\"Anonymous\">user@localhost</from>"
1693 " <subject>msxml3/tests: DTD validation (try 95)</subject>"
1695 " XML_ATTRIBUTE_VALUE 0xC00CE017"
1697 " <attachment id=\"patch1\">0001-msxml3-tests-DTD-validation.patch</attachment>"
1700 static const CHAR szEmailXML_18[] =
1701 "<?xml version=\"1.0\"?>"
1703 "<email attachments=\"patch1\">"
1706 " <to>wine-patches@winehq.org</to>"
1708 " <from name=\"Anonymous\">user@localhost</from>"
1709 " <subject>msxml3/tests: DTD validation (try 96)</subject>"
1711 " XML_ILLEGAL_TEXT 0xC00CE018"
1713 " <attachment id=\"patch1\">0001-msxml3-tests-DTD-validation.patch</attachment>"
1716 static const CHAR szEmailXML_20[] =
1717 "<?xml version=\"1.0\"?>"
1721 " <to>wine-patches@winehq.org</to>"
1723 " <from name=\"Anonymous\">user@localhost</from>"
1724 " <subject>msxml3/tests: DTD validation (try 97)</subject>"
1726 " XML_REQUIRED_ATTRIBUTE_MISSING 0xC00CE020"
1728 " <attachment id=\"patch1\">0001-msxml3-tests-DTD-validation.patch</attachment>"
1731 static const WCHAR szNonExistentFile[] = {
1732 'c', ':', '\\', 'N', 'o', 'n', 'e', 'x', 'i', 's', 't', 'e', 'n', 't', '.', 'x', 'm', 'l', 0
1734 static const WCHAR szNonExistentAttribute[] = {
1735 'n','o','n','E','x','i','s','i','t','i','n','g','A','t','t','r','i','b','u','t','e',0
1737 static const WCHAR szDocument[] = {
1738 '#', 'd', 'o', 'c', 'u', 'm', 'e', 'n', 't', 0
1741 static const WCHAR szOpen[] = { 'o','p','e','n',0 };
1742 static WCHAR szdl[] = { 'd','l',0 };
1743 static const WCHAR szvr[] = { 'v','r',0 };
1744 static const WCHAR szlc[] = { 'l','c',0 };
1745 static WCHAR szbs[] = { 'b','s',0 };
1746 static const WCHAR szstr1[] = { 's','t','r','1',0 };
1747 static const WCHAR szstr2[] = { 's','t','r','2',0 };
1748 static const WCHAR szstar[] = { '*',0 };
1749 static const WCHAR szfn1_txt[] = {'f','n','1','.','t','x','t',0};
1751 static WCHAR szComment[] = {'A',' ','C','o','m','m','e','n','t',0 };
1752 static WCHAR szCommentXML[] = {'<','!','-','-','A',' ','C','o','m','m','e','n','t','-','-','>',0 };
1753 static WCHAR szCommentNodeText[] = {'#','c','o','m','m','e','n','t',0 };
1755 static WCHAR szElement[] = {'E','l','e','T','e','s','t', 0 };
1756 static WCHAR szElementXML[] = {'<','E','l','e','T','e','s','t','/','>',0 };
1757 static WCHAR szElementXML2[] = {'<','E','l','e','T','e','s','t',' ','A','t','t','r','=','"','"','/','>',0 };
1758 static WCHAR szElementXML3[] = {'<','E','l','e','T','e','s','t',' ','A','t','t','r','=','"','"','>',
1759 'T','e','s','t','i','n','g','N','o','d','e','<','/','E','l','e','T','e','s','t','>',0 };
1760 static WCHAR szElementXML4[] = {'<','E','l','e','T','e','s','t',' ','A','t','t','r','=','"','"','>',
1761 '&','a','m','p',';','x',' ',0x2103,'<','/','E','l','e','T','e','s','t','>',0 };
1763 static WCHAR szAttribute[] = {'A','t','t','r',0 };
1764 static WCHAR szAttributeXML[] = {'A','t','t','r','=','"','"',0 };
1766 static WCHAR szCData[] = {'[','1',']','*','2','=','3',';',' ','&','g','e','e',' ','t','h','a','t','s',
1767 ' ','n','o','t',' ','r','i','g','h','t','!', 0};
1768 static WCHAR szCDataXML[] = {'<','!','[','C','D','A','T','A','[','[','1',']','*','2','=','3',';',' ','&',
1769 'g','e','e',' ','t','h','a','t','s',' ','n','o','t',' ','r','i','g','h','t',
1771 static WCHAR szCDataNodeText[] = {'#','c','d','a','t','a','-','s','e','c','t','i','o','n',0 };
1772 static WCHAR szDocFragmentText[] = {'#','d','o','c','u','m','e','n','t','-','f','r','a','g','m','e','n','t',0 };
1774 static WCHAR szEntityRef[] = {'e','n','t','i','t','y','r','e','f',0 };
1775 static WCHAR szEntityRefXML[] = {'&','e','n','t','i','t','y','r','e','f',';',0 };
1776 static WCHAR szStrangeChars[] = {'&','x',' ',0x2103, 0};
1778 #define expect_bstr_eq_and_free(bstr, expect) { \
1779 BSTR bstrExp = alloc_str_from_narrow(expect); \
1780 ok(lstrcmpW(bstr, bstrExp) == 0, "String differs\n"); \
1781 SysFreeString(bstr); \
1782 SysFreeString(bstrExp); \
1785 #define expect_eq(expr, value, type, format) { type ret = (expr); ok((value) == ret, #expr " expected " format " got " format "\n", value, ret); }
1787 #define ole_check(expr) { \
1789 ok(r == S_OK, #expr " returned %x\n", r); \
1792 #define ole_expect(expr, expect) { \
1794 ok(r == (expect), #expr " returned %x, expected %x\n", r, expect); \
1797 #define double_eq(x, y) ok((x)-(y)<=1e-14*(x) && (x)-(y)>=-1e-14*(x), "expected %.16g, got %.16g\n", x, y)
1799 static void* _create_object(const GUID *clsid, const char *name, const IID *iid, int line)
1804 hr = CoCreateInstance(clsid, NULL, CLSCTX_INPROC_SERVER, iid, &obj);
1806 win_skip_(__FILE__,line)("failed to create %s instance: 0x%08x\n", name, hr);
1811 #define _create(cls) cls, #cls
1813 #define create_document(iid) _create_object(&_create(CLSID_DOMDocument), iid, __LINE__)
1814 #define create_document_version(v, iid) _create_object(&_create(CLSID_DOMDocument ## v), iid, __LINE__)
1815 #define create_cache(iid) _create_object(&_create(CLSID_XMLSchemaCache), iid, __LINE__)
1816 #define create_cache_version(v, iid) _create_object(&_create(CLSID_XMLSchemaCache ## v), iid, __LINE__)
1817 #define create_xsltemplate(iid) _create_object(&_create(CLSID_XSLTemplate), iid, __LINE__)
1819 static BSTR alloc_str_from_narrow(const char *str)
1821 int len = MultiByteToWideChar(CP_ACP, 0, str, -1, NULL, 0);
1822 BSTR ret = SysAllocStringLen(NULL, len - 1); /* NUL character added automatically */
1823 MultiByteToWideChar(CP_ACP, 0, str, -1, ret, len);
1827 static BSTR alloced_bstrs[256];
1828 static int alloced_bstrs_count;
1830 static BSTR _bstr_(const char *str)
1832 assert(alloced_bstrs_count < sizeof(alloced_bstrs)/sizeof(alloced_bstrs[0]));
1833 alloced_bstrs[alloced_bstrs_count] = alloc_str_from_narrow(str);
1834 return alloced_bstrs[alloced_bstrs_count++];
1837 static void free_bstrs(void)
1840 for (i = 0; i < alloced_bstrs_count; i++)
1841 SysFreeString(alloced_bstrs[i]);
1842 alloced_bstrs_count = 0;
1845 static VARIANT _variantbstr_(const char *str)
1849 V_BSTR(&v) = _bstr_(str);
1853 static BOOL compareIgnoreReturns(BSTR sLeft, BSTR sRight)
1857 while (*sLeft == '\r' || *sLeft == '\n') sLeft++;
1858 while (*sRight == '\r' || *sRight == '\n') sRight++;
1859 if (*sLeft != *sRight) return FALSE;
1860 if (!*sLeft) return TRUE;
1866 static void get_str_for_type(DOMNodeType type, char *buf)
1870 case NODE_ATTRIBUTE:
1885 case NODE_PROCESSING_INSTRUCTION:
1889 wsprintfA(buf, "[%d]", type);
1893 #define test_disp(u) _test_disp(__LINE__,u)
1894 static void _test_disp(unsigned line, IUnknown *unk)
1896 DISPID dispid = DISPID_XMLDOM_NODELIST_RESET;
1897 IDispatchEx *dispex;
1904 hres = IUnknown_QueryInterface(unk, &IID_IDispatchEx, (void**)&dispex);
1905 ok_(__FILE__,line) (hres == S_OK, "Could not get IDispatch: %08x\n", hres);
1910 hres = IDispatchEx_GetTypeInfoCount(dispex, &ticnt);
1911 ok_(__FILE__,line) (hres == S_OK, "GetTypeInfoCount failed: %08x\n", hres);
1912 ok_(__FILE__,line) (ticnt == 1, "ticnt=%u\n", ticnt);
1914 sName = SysAllocString( szstar );
1915 hres = IDispatchEx_DeleteMemberByName(dispex, sName, fdexNameCaseSensitive);
1916 ok(hres == E_NOTIMPL, "expected E_NOTIMPL got %08x\n", hres);
1917 SysFreeString( sName );
1919 hres = IDispatchEx_DeleteMemberByDispID(dispex, dispid);
1920 ok(hres == E_NOTIMPL, "expected E_NOTIMPL got %08x\n", hres);
1922 hres = IDispatchEx_GetMemberProperties(dispex, dispid, grfdexPropCanAll, &dwProps);
1923 ok(hres == E_NOTIMPL, "expected E_NOTIMPL got %08x\n", hres);
1924 ok(dwProps == 0, "expected 0 got %d\n", dwProps);
1926 hres = IDispatchEx_GetMemberName(dispex, dispid, &sName);
1927 ok(hres == E_NOTIMPL, "expected E_NOTIMPL got %08x\n", hres);
1929 SysFreeString(sName);
1931 hres = IDispatchEx_GetNextDispID(dispex, fdexEnumDefault, DISPID_XMLDOM_NODELIST_RESET, &dispid);
1932 ok(hres == E_NOTIMPL, "expected E_NOTIMPL got %08x\n", hres);
1934 hres = IDispatchEx_GetNameSpaceParent(dispex, &pUnk);
1935 ok(hres == E_NOTIMPL, "expected E_NOTIMPL got %08x\n", hres);
1936 if(hres == S_OK && pUnk)
1937 IUnknown_Release(pUnk);
1939 IDispatchEx_Release(dispex);
1942 static int get_node_position(IXMLDOMNode *node)
1947 IXMLDOMNode_AddRef(node);
1950 IXMLDOMNode *new_node;
1953 r = IXMLDOMNode_get_previousSibling(node, &new_node);
1954 ok(SUCCEEDED(r), "get_previousSibling failed\n");
1955 IXMLDOMNode_Release(node);
1957 } while (r == S_OK);
1961 static void node_to_string(IXMLDOMNode *node, char *buf)
1968 lstrcpyA(buf, "(null)");
1972 IXMLDOMNode_AddRef(node);
1975 IXMLDOMNode *new_node;
1977 ole_check(IXMLDOMNode_get_nodeType(node, &type));
1978 get_str_for_type(type, buf);
1981 if (type == NODE_ATTRIBUTE)
1984 ole_check(IXMLDOMNode_get_nodeName(node, &bstr));
1986 wsprintfA(buf, "%ws", bstr);
1989 SysFreeString(bstr);
1991 r = IXMLDOMNode_selectSingleNode(node, _bstr_(".."), &new_node);
1995 r = IXMLDOMNode_get_parentNode(node, &new_node);
1996 wsprintf(buf, "%d", get_node_position(node));
2000 ok(SUCCEEDED(r), "get_parentNode failed (%08x)\n", r);
2001 IXMLDOMNode_Release(node);
2010 static char *list_to_string(IXMLDOMNodeList *list)
2012 static char buf[4096];
2019 lstrcpyA(buf, "(null)");
2022 ole_check(IXMLDOMNodeList_get_length(list, &len));
2023 for (i = 0; i < len; i++)
2028 ole_check(IXMLDOMNodeList_nextNode(list, &node));
2029 node_to_string(node, pos);
2031 IXMLDOMNode_Release(node);
2037 #define expect_node(node, expstr) { char str[4096]; node_to_string(node, str); ok(strcmp(str, expstr)==0, "Invalid node: %s, expected %s\n", str, expstr); }
2038 #define expect_list_and_release(list, expstr) { char *str = list_to_string(list); ok(strcmp(str, expstr)==0, "Invalid node list: %s, expected %s\n", str, expstr); if (list) IXMLDOMNodeList_Release(list); }
2040 static void test_domdoc( void )
2043 IXMLDOMDocument *doc;
2044 IXMLDOMParseError *error;
2045 IXMLDOMElement *element = NULL;
2047 IXMLDOMText *nodetext = NULL;
2048 IXMLDOMComment *node_comment = NULL;
2049 IXMLDOMAttribute *node_attr = NULL;
2050 IXMLDOMNode *nodeChild = NULL;
2051 IXMLDOMProcessingInstruction *nodePI = NULL;
2052 ISupportErrorInfo *support_error = NULL;
2060 doc = create_document(&IID_IXMLDOMDocument);
2063 test_disp((IUnknown*)doc);
2067 /* crashes on native */
2068 IXMLDOMDocument_loadXML( doc, (BSTR)0x1, NULL );
2071 /* try some stupid things */
2072 r = IXMLDOMDocument_loadXML( doc, NULL, NULL );
2073 ok( r == S_FALSE, "loadXML succeeded\n");
2076 r = IXMLDOMDocument_loadXML( doc, NULL, &b );
2077 ok( r == S_FALSE, "loadXML succeeded\n");
2078 ok( b == VARIANT_FALSE, "failed to load XML string\n");
2080 /* try to load a document from a nonexistent file */
2082 str = SysAllocString( szNonExistentFile );
2084 V_VT(&var) = VT_BSTR;
2087 r = IXMLDOMDocument_load( doc, var, &b);
2088 ok( r == S_FALSE, "loadXML succeeded\n");
2089 ok( b == VARIANT_FALSE, "succeeded in loading XML string\n");
2090 SysFreeString( str );
2092 /* try load an empty document */
2094 str = SysAllocString( szEmpty );
2095 r = IXMLDOMDocument_loadXML( doc, str, &b );
2096 ok( r == S_FALSE, "loadXML succeeded\n");
2097 ok( b == VARIANT_FALSE, "succeeded in loading XML string\n");
2098 SysFreeString( str );
2100 r = IXMLDOMDocument_get_async( doc, &b );
2101 ok( r == S_OK, "get_async failed (%08x)\n", r);
2102 ok( b == VARIANT_TRUE, "Wrong default value\n");
2104 /* check that there's no document element */
2106 r = IXMLDOMDocument_get_documentElement( doc, &element );
2107 ok( r == S_FALSE, "should be no document element\n");
2109 /* try finding a node */
2111 str = SysAllocString( szstr1 );
2112 r = IXMLDOMDocument_selectSingleNode( doc, str, &node );
2113 ok( r == S_FALSE, "ret %08x\n", r );
2114 SysFreeString( str );
2117 str = SysAllocString( szIncomplete );
2118 r = IXMLDOMDocument_loadXML( doc, str, &b );
2119 ok( r == S_FALSE, "loadXML succeeded\n");
2120 ok( b == VARIANT_FALSE, "succeeded in loading XML string\n");
2121 SysFreeString( str );
2123 /* check that there's no document element */
2124 element = (IXMLDOMElement*)1;
2125 r = IXMLDOMDocument_get_documentElement( doc, &element );
2126 ok( r == S_FALSE, "should be no document element\n");
2127 ok( element == NULL, "Element should be NULL\n");
2129 /* test for BSTR handling, pass broken BSTR */
2130 memcpy(&buff[2], szComplete1, sizeof(szComplete1));
2131 /* just a big length */
2132 *(DWORD*)buff = 0xf0f0;
2134 r = IXMLDOMDocument_loadXML( doc, &buff[2], &b );
2135 ok( r == S_OK, "loadXML failed\n");
2136 ok( b == VARIANT_TRUE, "failed to load XML string\n");
2138 /* loadXML ignores the encoding attribute and always expects Unicode */
2140 str = SysAllocString( szComplete6 );
2141 r = IXMLDOMDocument_loadXML( doc, str, &b );
2142 ok( r == S_OK, "loadXML failed\n");
2143 ok( b == VARIANT_TRUE, "failed to load XML string\n");
2144 SysFreeString( str );
2146 /* try a BSTR containing a Windows-1252 document */
2148 str = SysAllocStringByteLen( szNonUnicodeXML, sizeof(szNonUnicodeXML) - 1 );
2149 r = IXMLDOMDocument_loadXML( doc, str, &b );
2150 ok( r == S_FALSE, "loadXML succeeded\n");
2151 ok( b == VARIANT_FALSE, "succeeded in loading XML string\n");
2152 SysFreeString( str );
2154 /* try to load something valid */
2156 str = SysAllocString( szComplete1 );
2157 r = IXMLDOMDocument_loadXML( doc, str, &b );
2158 ok( r == S_OK, "loadXML failed\n");
2159 ok( b == VARIANT_TRUE, "failed to load XML string\n");
2160 SysFreeString( str );
2162 /* check if nodename is correct */
2163 r = IXMLDOMDocument_get_nodeName( doc, NULL );
2164 ok ( r == E_INVALIDARG, "get_nodeName (NULL) wrong code\n");
2166 str = (BSTR)0xdeadbeef;
2167 r = IXMLDOMDocument_get_baseName( doc, &str );
2168 ok ( r == S_FALSE, "got 0x%08x\n", r);
2169 ok (str == NULL, "got %p\n", str);
2171 /* content doesn't matter here */
2173 r = IXMLDOMDocument_get_nodeName( doc, &str );
2174 ok ( r == S_OK, "get_nodeName wrong code\n");
2175 ok ( str != NULL, "str is null\n");
2176 ok( !lstrcmpW( str, szDocument ), "incorrect nodeName\n");
2177 SysFreeString( str );
2180 r = IXMLDOMDocument_put_text( doc, _bstr_("Should Fail") );
2181 ok( r == E_FAIL, "ret %08x\n", r );
2183 /* check that there's a document element */
2185 r = IXMLDOMDocument_get_documentElement( doc, &element );
2186 ok( r == S_OK, "should be a document element\n");
2189 IObjectIdentity *ident;
2191 test_disp((IUnknown*)element);
2193 r = IXMLDOMElement_QueryInterface( element, &IID_IObjectIdentity, (void**)&ident );
2194 ok( r == E_NOINTERFACE, "ret %08x\n", r);
2196 IXMLDOMElement_Release( element );
2200 /* as soon as we call loadXML again, the document element will disappear */
2202 r = IXMLDOMDocument_loadXML( doc, NULL, NULL );
2203 ok( r == S_FALSE, "loadXML failed\n");
2204 ok( b == 2, "variant modified\n");
2205 r = IXMLDOMDocument_get_documentElement( doc, &element );
2206 ok( r == S_FALSE, "should be no document element\n");
2208 /* try to load something else simple and valid */
2210 str = SysAllocString( szComplete3 );
2211 r = IXMLDOMDocument_loadXML( doc, str, &b );
2212 ok( r == S_OK, "loadXML failed\n");
2213 ok( b == VARIANT_TRUE, "failed to load XML string\n");
2214 SysFreeString( str );
2216 /* try something a little more complicated */
2218 str = SysAllocString( szComplete4 );
2219 r = IXMLDOMDocument_loadXML( doc, str, &b );
2220 ok( r == S_OK, "loadXML failed\n");
2221 ok( b == VARIANT_TRUE, "failed to load XML string\n");
2222 SysFreeString( str );
2224 r = IXMLDOMDocument_get_parseError( doc, &error );
2225 ok( r == S_OK, "returns %08x\n", r );
2227 r = IXMLDOMParseError_get_errorCode( error, &code );
2228 ok( r == S_FALSE, "returns %08x\n", r );
2229 ok( code == 0, "code %d\n", code );
2230 IXMLDOMParseError_Release( error );
2232 /* test createTextNode */
2233 r = IXMLDOMDocument_createTextNode(doc, _bstr_(""), &nodetext);
2234 ok( r == S_OK, "returns %08x\n", r );
2235 IXMLDOMText_Release(nodetext);
2237 str = SysAllocString( szOpen );
2238 r = IXMLDOMDocument_createTextNode(doc, str, NULL);
2239 ok( r == E_INVALIDARG, "returns %08x\n", r );
2240 r = IXMLDOMDocument_createTextNode(doc, str, &nodetext);
2241 ok( r == S_OK, "returns %08x\n", r );
2242 SysFreeString( str );
2245 r = IXMLDOMText_QueryInterface(nodetext, &IID_IXMLDOMElement, (void**)&element);
2246 ok(r == E_NOINTERFACE, "ret %08x\n", r );
2248 /* Text Last Child Checks */
2249 r = IXMLDOMText_get_lastChild(nodetext, NULL);
2250 ok(r == E_INVALIDARG, "ret %08x\n", r );
2252 nodeChild = (IXMLDOMNode*)0x1;
2253 r = IXMLDOMText_get_lastChild(nodetext, &nodeChild);
2254 ok(r == S_FALSE, "ret %08x\n", r );
2255 ok(nodeChild == NULL, "nodeChild not NULL\n");
2257 /* test length property */
2258 r = IXMLDOMText_get_length(nodetext, NULL);
2259 ok(r == E_INVALIDARG, "ret %08x\n", r );
2261 r = IXMLDOMText_get_length(nodetext, &nLength);
2262 ok(r == S_OK, "ret %08x\n", r );
2263 ok(nLength == 4, "expected 4 got %d\n", nLength);
2265 /* put data Tests */
2266 r = IXMLDOMText_put_data(nodetext, _bstr_("This &is a ; test <>\\"));
2267 ok(r == S_OK, "ret %08x\n", r );
2269 /* get data Tests */
2270 r = IXMLDOMText_get_data(nodetext, &str);
2271 ok(r == S_OK, "ret %08x\n", r );
2272 ok( !lstrcmpW( str, _bstr_("This &is a ; test <>\\") ), "incorrect put_data string\n");
2275 /* Confirm XML text is good */
2276 r = IXMLDOMText_get_xml(nodetext, &str);
2277 ok(r == S_OK, "ret %08x\n", r );
2278 ok( !lstrcmpW( str, _bstr_("This &is a ; test <>\\") ), "incorrect xml string\n");
2281 /* Confirm we get the put_data Text back */
2282 r = IXMLDOMText_get_text(nodetext, &str);
2283 ok(r == S_OK, "ret %08x\n", r );
2284 ok( !lstrcmpW( str, _bstr_("This &is a ; test <>\\") ), "incorrect xml string\n");
2287 /* test substringData */
2288 r = IXMLDOMText_substringData(nodetext, 0, 4, NULL);
2289 ok(r == E_INVALIDARG, "ret %08x\n", r );
2291 /* test substringData - Invalid offset */
2292 str = (BSTR)&szElement;
2293 r = IXMLDOMText_substringData(nodetext, -1, 4, &str);
2294 ok(r == E_INVALIDARG, "ret %08x\n", r );
2295 ok( str == NULL, "incorrect string\n");
2297 /* test substringData - Invalid offset */
2298 str = (BSTR)&szElement;
2299 r = IXMLDOMText_substringData(nodetext, 30, 0, &str);
2300 ok(r == S_FALSE, "ret %08x\n", r );
2301 ok( str == NULL, "incorrect string\n");
2303 /* test substringData - Invalid size */
2304 str = (BSTR)&szElement;
2305 r = IXMLDOMText_substringData(nodetext, 0, -1, &str);
2306 ok(r == E_INVALIDARG, "ret %08x\n", r );
2307 ok( str == NULL, "incorrect string\n");
2309 /* test substringData - Invalid size */
2310 str = (BSTR)&szElement;
2311 r = IXMLDOMText_substringData(nodetext, 2, 0, &str);
2312 ok(r == S_FALSE, "ret %08x\n", r );
2313 ok( str == NULL, "incorrect string\n");
2315 /* test substringData - Start of string */
2316 r = IXMLDOMText_substringData(nodetext, 0, 4, &str);
2317 ok(r == S_OK, "ret %08x\n", r );
2318 ok( !lstrcmpW( str, _bstr_("This") ), "incorrect substringData string\n");
2321 /* test substringData - Middle of string */
2322 r = IXMLDOMText_substringData(nodetext, 13, 4, &str);
2323 ok(r == S_OK, "ret %08x\n", r );
2324 ok( !lstrcmpW( str, _bstr_("test") ), "incorrect substringData string\n");
2327 /* test substringData - End of string */
2328 r = IXMLDOMText_substringData(nodetext, 20, 4, &str);
2329 ok(r == S_OK, "ret %08x\n", r );
2330 ok( !lstrcmpW( str, _bstr_("\\") ), "incorrect substringData string\n");
2333 /* test appendData */
2334 r = IXMLDOMText_appendData(nodetext, NULL);
2335 ok(r == S_OK, "ret %08x\n", r );
2337 r = IXMLDOMText_appendData(nodetext, _bstr_(""));
2338 ok(r == S_OK, "ret %08x\n", r );
2340 r = IXMLDOMText_appendData(nodetext, _bstr_("Append"));
2341 ok(r == S_OK, "ret %08x\n", r );
2343 r = IXMLDOMText_get_text(nodetext, &str);
2344 ok(r == S_OK, "ret %08x\n", r );
2345 ok( !lstrcmpW( str, _bstr_("This &is a ; test <>\\Append") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
2348 /* test insertData */
2349 str = SysAllocStringLen(NULL, 0);
2350 r = IXMLDOMText_insertData(nodetext, -1, str);
2351 ok(r == S_OK, "ret %08x\n", r );
2353 r = IXMLDOMText_insertData(nodetext, -1, NULL);
2354 ok(r == S_OK, "ret %08x\n", r );
2356 r = IXMLDOMText_insertData(nodetext, 1000, str);
2357 ok(r == S_OK, "ret %08x\n", r );
2359 r = IXMLDOMText_insertData(nodetext, 1000, NULL);
2360 ok(r == S_OK, "ret %08x\n", r );
2362 r = IXMLDOMText_insertData(nodetext, 0, NULL);
2363 ok(r == S_OK, "ret %08x\n", r );
2365 r = IXMLDOMText_insertData(nodetext, 0, str);
2366 ok(r == S_OK, "ret %08x\n", r );
2369 r = IXMLDOMText_insertData(nodetext, -1, _bstr_("Inserting"));
2370 ok(r == E_INVALIDARG, "ret %08x\n", r );
2372 r = IXMLDOMText_insertData(nodetext, 1000, _bstr_("Inserting"));
2373 ok(r == E_INVALIDARG, "ret %08x\n", r );
2375 r = IXMLDOMText_insertData(nodetext, 0, _bstr_("Begin "));
2376 ok(r == S_OK, "ret %08x\n", r );
2378 r = IXMLDOMText_insertData(nodetext, 17, _bstr_("Middle"));
2379 ok(r == S_OK, "ret %08x\n", r );
2381 r = IXMLDOMText_insertData(nodetext, 39, _bstr_(" End"));
2382 ok(r == S_OK, "ret %08x\n", r );
2384 r = IXMLDOMText_get_text(nodetext, &str);
2385 ok(r == S_OK, "ret %08x\n", r );
2386 ok( !lstrcmpW( str, _bstr_("Begin This &is a Middle; test <>\\Append End") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
2390 /* invalid arguments */
2391 r = IXMLDOMText_deleteData(nodetext, -1, 1);
2392 ok(r == E_INVALIDARG, "ret %08x\n", r );
2394 r = IXMLDOMText_deleteData(nodetext, 0, 0);
2395 ok(r == S_OK, "ret %08x\n", r );
2397 r = IXMLDOMText_deleteData(nodetext, 0, -1);
2398 ok(r == E_INVALIDARG, "ret %08x\n", r );
2400 r = IXMLDOMText_get_length(nodetext, &nLength);
2401 ok(r == S_OK, "ret %08x\n", r );
2402 ok(nLength == 43, "expected 43 got %d\n", nLength);
2404 r = IXMLDOMText_deleteData(nodetext, nLength, 1);
2405 ok(r == S_OK, "ret %08x\n", r );
2407 r = IXMLDOMText_deleteData(nodetext, nLength+1, 1);
2408 ok(r == E_INVALIDARG, "ret %08x\n", r );
2410 /* delete from start */
2411 r = IXMLDOMText_deleteData(nodetext, 0, 5);
2412 ok(r == S_OK, "ret %08x\n", r );
2414 r = IXMLDOMText_get_length(nodetext, &nLength);
2415 ok(r == S_OK, "ret %08x\n", r );
2416 ok(nLength == 38, "expected 38 got %d\n", nLength);
2418 r = IXMLDOMText_get_text(nodetext, &str);
2419 ok(r == S_OK, "ret %08x\n", r );
2420 ok( !lstrcmpW( str, _bstr_("This &is a Middle; test <>\\Append End") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
2423 /* delete from end */
2424 r = IXMLDOMText_deleteData(nodetext, 35, 3);
2425 ok(r == S_OK, "ret %08x\n", r );
2427 r = IXMLDOMText_get_length(nodetext, &nLength);
2428 ok(r == S_OK, "ret %08x\n", r );
2429 ok(nLength == 35, "expected 35 got %d\n", nLength);
2431 r = IXMLDOMText_get_text(nodetext, &str);
2432 ok(r == S_OK, "ret %08x\n", r );
2433 ok( !lstrcmpW( str, _bstr_("This &is a Middle; test <>\\Append") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
2436 /* delete from inside */
2437 r = IXMLDOMText_deleteData(nodetext, 1, 33);
2438 ok(r == S_OK, "ret %08x\n", r );
2440 r = IXMLDOMText_get_length(nodetext, &nLength);
2441 ok(r == S_OK, "ret %08x\n", r );
2442 ok(nLength == 2, "expected 2 got %d\n", nLength);
2444 r = IXMLDOMText_get_text(nodetext, &str);
2445 ok(r == S_OK, "ret %08x\n", r );
2446 ok( !lstrcmpW( str, _bstr_("") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
2449 /* delete whole data ... */
2450 r = IXMLDOMText_get_length(nodetext, &nLength);
2451 ok(r == S_OK, "ret %08x\n", r );
2453 r = IXMLDOMText_deleteData(nodetext, 0, nLength);
2454 ok(r == S_OK, "ret %08x\n", r );
2455 /* ... and try again with empty string */
2456 r = IXMLDOMText_deleteData(nodetext, 0, nLength);
2457 ok(r == S_OK, "ret %08x\n", r );
2460 V_VT(&var) = VT_BSTR;
2461 V_BSTR(&var) = SysAllocString(szstr1);
2462 r = IXMLDOMText_put_nodeValue(nodetext, var);
2463 ok(r == S_OK, "ret %08x\n", r );
2466 r = IXMLDOMText_get_text(nodetext, &str);
2467 ok(r == S_OK, "ret %08x\n", r );
2468 ok( !lstrcmpW( str, szstr1 ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
2474 r = IXMLDOMText_put_nodeValue(nodetext, var);
2475 ok(r == S_OK, "ret %08x\n", r );
2478 r = IXMLDOMText_get_text(nodetext, &str);
2479 ok(r == S_OK, "ret %08x\n", r );
2480 ok( !lstrcmpW( str, _bstr_("99") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
2483 /* ::replaceData() */
2484 V_VT(&var) = VT_BSTR;
2485 V_BSTR(&var) = SysAllocString(szstr1);
2486 r = IXMLDOMText_put_nodeValue(nodetext, var);
2487 ok(r == S_OK, "ret %08x\n", r );
2490 r = IXMLDOMText_replaceData(nodetext, 6, 0, NULL);
2491 ok(r == E_INVALIDARG, "ret %08x\n", r );
2492 r = IXMLDOMText_get_text(nodetext, &str);
2493 ok(r == S_OK, "ret %08x\n", r );
2494 ok( !lstrcmpW( str, _bstr_("str1") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
2497 r = IXMLDOMText_replaceData(nodetext, 0, 0, NULL);
2498 ok(r == S_OK, "ret %08x\n", r );
2499 r = IXMLDOMText_get_text(nodetext, &str);
2500 ok(r == S_OK, "ret %08x\n", r );
2501 ok( !lstrcmpW( str, _bstr_("str1") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
2504 /* NULL pointer means delete */
2505 r = IXMLDOMText_replaceData(nodetext, 0, 1, NULL);
2506 ok(r == S_OK, "ret %08x\n", r );
2507 r = IXMLDOMText_get_text(nodetext, &str);
2508 ok(r == S_OK, "ret %08x\n", r );
2509 ok( !lstrcmpW( str, _bstr_("tr1") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
2512 /* empty string means delete */
2513 r = IXMLDOMText_replaceData(nodetext, 0, 1, _bstr_(""));
2514 ok(r == S_OK, "ret %08x\n", r );
2515 r = IXMLDOMText_get_text(nodetext, &str);
2516 ok(r == S_OK, "ret %08x\n", r );
2517 ok( !lstrcmpW( str, _bstr_("r1") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
2520 /* zero count means insert */
2521 r = IXMLDOMText_replaceData(nodetext, 0, 0, _bstr_("a"));
2522 ok(r == S_OK, "ret %08x\n", r );
2523 r = IXMLDOMText_get_text(nodetext, &str);
2524 ok(r == S_OK, "ret %08x\n", r );
2525 ok( !lstrcmpW( str, _bstr_("ar1") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
2528 r = IXMLDOMText_replaceData(nodetext, 0, 2, NULL);
2529 ok(r == S_OK, "ret %08x\n", r );
2531 r = IXMLDOMText_insertData(nodetext, 0, _bstr_("m"));
2532 ok(r == S_OK, "ret %08x\n", r );
2533 r = IXMLDOMText_get_text(nodetext, &str);
2534 ok(r == S_OK, "ret %08x\n", r );
2535 ok( !lstrcmpW( str, _bstr_("m1") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
2538 /* nonempty string, count greater than its length */
2539 r = IXMLDOMText_replaceData(nodetext, 0, 2, _bstr_("a1.2"));
2540 ok(r == S_OK, "ret %08x\n", r );
2541 r = IXMLDOMText_get_text(nodetext, &str);
2542 ok(r == S_OK, "ret %08x\n", r );
2543 ok( !lstrcmpW( str, _bstr_("a1.2") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
2546 /* nonempty string, count less than its length */
2547 r = IXMLDOMText_replaceData(nodetext, 0, 1, _bstr_("wine"));
2548 ok(r == S_OK, "ret %08x\n", r );
2549 r = IXMLDOMText_get_text(nodetext, &str);
2550 ok(r == S_OK, "ret %08x\n", r );
2551 ok( !lstrcmpW( str, _bstr_("wine1.2") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
2554 IXMLDOMText_Release( nodetext );
2557 /* test Create Comment */
2558 r = IXMLDOMDocument_createComment(doc, NULL, NULL);
2559 ok( r == E_INVALIDARG, "returns %08x\n", r );
2560 node_comment = (IXMLDOMComment*)0x1;
2563 r = IXMLDOMDocument_createComment(doc, _bstr_(""), &node_comment);
2564 ok( r == S_OK, "returns %08x\n", r );
2566 r = IXMLDOMComment_get_data(node_comment, &str);
2567 ok( r == S_OK, "returns %08x\n", r );
2568 ok( str && SysStringLen(str) == 0, "expected empty string data\n");
2569 IXMLDOMComment_Release(node_comment);
2572 r = IXMLDOMDocument_createComment(doc, NULL, &node_comment);
2573 ok( r == S_OK, "returns %08x\n", r );
2575 r = IXMLDOMComment_get_data(node_comment, &str);
2576 ok( r == S_OK, "returns %08x\n", r );
2577 ok( str && (SysStringLen(str) == 0), "expected empty string data\n");
2578 IXMLDOMComment_Release(node_comment);
2581 str = SysAllocString(szComment);
2582 r = IXMLDOMDocument_createComment(doc, str, &node_comment);
2584 ok( r == S_OK, "returns %08x\n", r );
2587 /* Last Child Checks */
2588 r = IXMLDOMComment_get_lastChild(node_comment, NULL);
2589 ok(r == E_INVALIDARG, "ret %08x\n", r );
2591 nodeChild = (IXMLDOMNode*)0x1;
2592 r = IXMLDOMComment_get_lastChild(node_comment, &nodeChild);
2593 ok(r == S_FALSE, "ret %08x\n", r );
2594 ok(nodeChild == NULL, "pLastChild not NULL\n");
2597 str = (BSTR)0xdeadbeef;
2598 IXMLDOMComment_get_baseName(node_comment, &str);
2599 ok(r == S_FALSE, "ret %08x\n", r );
2600 ok(str == NULL, "Expected NULL\n");
2602 IXMLDOMComment_Release( node_comment );
2605 /* test Create Attribute */
2606 str = SysAllocString(szAttribute);
2607 r = IXMLDOMDocument_createAttribute(doc, NULL, NULL);
2608 ok( r == E_INVALIDARG, "returns %08x\n", r );
2609 r = IXMLDOMDocument_createAttribute(doc, str, &node_attr);
2610 ok( r == S_OK, "returns %08x\n", r );
2611 IXMLDOMText_Release( node_attr);
2614 /* test Processing Instruction */
2615 str = SysAllocStringLen(NULL, 0);
2616 r = IXMLDOMDocument_createProcessingInstruction(doc, str, str, NULL);
2617 ok( r == E_INVALIDARG, "returns %08x\n", r );
2618 r = IXMLDOMDocument_createProcessingInstruction(doc, NULL, str, &nodePI);
2619 ok( r == E_FAIL, "returns %08x\n", r );
2620 r = IXMLDOMDocument_createProcessingInstruction(doc, str, str, &nodePI);
2621 ok( r == E_FAIL, "returns %08x\n", r );
2624 r = IXMLDOMDocument_createProcessingInstruction(doc, _bstr_("xml"), _bstr_("version=\"1.0\""), &nodePI);
2625 ok( r == S_OK, "returns %08x\n", r );
2628 /* Last Child Checks */
2629 r = IXMLDOMProcessingInstruction_get_lastChild(nodePI, NULL);
2630 ok(r == E_INVALIDARG, "ret %08x\n", r );
2632 nodeChild = (IXMLDOMNode*)0x1;
2633 r = IXMLDOMProcessingInstruction_get_lastChild(nodePI, &nodeChild);
2634 ok(r == S_FALSE, "ret %08x\n", r );
2635 ok(nodeChild == NULL, "nodeChild not NULL\n");
2638 r = IXMLDOMProcessingInstruction_get_nodeName(nodePI, &str);
2639 ok(r == S_OK, "ret %08x\n", r );
2640 ok( !lstrcmpW( str, _bstr_("xml") ), "incorrect nodeName string\n");
2645 r = IXMLDOMProcessingInstruction_get_baseName(nodePI, &str);
2646 ok(r == S_OK, "ret %08x\n", r );
2647 ok( !lstrcmpW( str, _bstr_("xml") ), "incorrect nodeName string\n");
2651 r = IXMLDOMProcessingInstruction_get_target(nodePI, &str);
2652 ok(r == S_OK, "ret %08x\n", r );
2653 ok( !lstrcmpW( str, _bstr_("xml") ), "incorrect target string\n");
2656 /* test get_nodeValue */
2657 r = IXMLDOMProcessingInstruction_get_nodeValue(nodePI, &var);
2658 ok(r == S_OK, "ret %08x\n", r );
2659 ok( !lstrcmpW( V_BSTR(&var), _bstr_("version=\"1.0\"") ), "incorrect data string\n");
2663 r = IXMLDOMProcessingInstruction_get_data(nodePI, &str);
2664 ok(r == S_OK, "ret %08x\n", r );
2665 ok( !lstrcmpW( str, _bstr_("version=\"1.0\"") ), "incorrect data string\n");
2669 r = IXMLDOMProcessingInstruction_put_data(nodePI, _bstr_("version=\"1.0\" encoding=\"UTF-8\""));
2670 ok(r == E_FAIL, "ret %08x\n", r );
2673 V_VT(&var) = VT_BSTR;
2674 V_BSTR(&var) = SysAllocString(szOpen); /* Doesn't matter what the string is, cannot set an xml node. */
2675 r = IXMLDOMProcessingInstruction_put_nodeValue(nodePI, var);
2676 ok(r == E_FAIL, "ret %08x\n", r );
2679 /* test get nodeName */
2680 r = IXMLDOMProcessingInstruction_get_nodeName(nodePI, &str);
2681 ok( !lstrcmpW( str, _bstr_("xml") ), "incorrect nodeName string\n");
2682 ok(r == S_OK, "ret %08x\n", r );
2685 IXMLDOMProcessingInstruction_Release(nodePI);
2688 r = IXMLDOMDocument_QueryInterface( doc, &IID_ISupportErrorInfo, (void**)&support_error );
2689 ok( r == S_OK, "ret %08x\n", r );
2692 r = ISupportErrorInfo_InterfaceSupportsErrorInfo( support_error, &IID_IXMLDOMDocument );
2693 todo_wine ok( r == S_OK, "ret %08x\n", r );
2694 ISupportErrorInfo_Release( support_error );
2697 r = IXMLDOMDocument_Release( doc );
2698 ok( r == 0, "document ref count incorrect\n");
2703 static void test_persiststreaminit(void)
2705 IXMLDOMDocument *doc;
2706 IPersistStreamInit *streaminit;
2709 doc = create_document(&IID_IXMLDOMDocument);
2712 hr = IXMLDOMDocument_QueryInterface(doc, &IID_IPersistStreamInit, (void**)&streaminit);
2713 ok( hr == S_OK, "failed with 0x%08x\n", hr );
2715 hr = IPersistStreamInit_InitNew(streaminit);
2716 ok( hr == S_OK, "failed with 0x%08x\n", hr );
2718 IXMLDOMDocument_Release(doc);
2721 static void test_domnode( void )
2724 IXMLDOMDocument *doc, *owner = NULL;
2725 IXMLDOMElement *element = NULL;
2726 IXMLDOMNamedNodeMap *map = NULL;
2727 IXMLDOMNode *node = NULL, *next = NULL;
2728 IXMLDOMNodeList *list = NULL;
2729 IXMLDOMAttribute *attr = NULL;
2730 DOMNodeType type = NODE_INVALID;
2736 doc = create_document(&IID_IXMLDOMDocument);
2740 str = SysAllocString( szComplete4 );
2741 r = IXMLDOMDocument_loadXML( doc, str, &b );
2742 ok( r == S_OK, "loadXML failed\n");
2743 ok( b == VARIANT_TRUE, "failed to load XML string\n");
2744 SysFreeString( str );
2746 EXPECT_CHILDREN(doc);
2748 r = IXMLDOMDocument_get_documentElement( doc, &element );
2749 ok( r == S_OK, "should be a document element\n");
2750 ok( element != NULL, "should be an element\n");
2753 ok( V_VT(&var) == VT_EMPTY, "variant init failed\n");
2755 r = IXMLDOMNode_get_nodeValue( doc, NULL );
2756 ok(r == E_INVALIDARG, "get_nodeValue ret %08x\n", r );
2758 r = IXMLDOMNode_get_nodeValue( doc, &var );
2759 ok( r == S_FALSE, "nextNode returned wrong code\n");
2760 ok( V_VT(&var) == VT_NULL, "variant wasn't empty\n");
2761 ok( V_BSTR(&var) == NULL, "variant value wasn't null\n");
2766 r = IXMLDOMNode_get_ownerDocument( element, &owner );
2767 ok( r == S_OK, "get_ownerDocument return code\n");
2768 ok( owner != doc, "get_ownerDocument return\n");
2769 IXMLDOMDocument_Release(owner);
2771 type = NODE_INVALID;
2772 r = IXMLDOMNode_get_nodeType( element, &type);
2773 ok( r == S_OK, "got %08x\n", r);
2774 ok( type == NODE_ELEMENT, "node not an element\n");
2777 r = IXMLDOMNode_get_baseName( element, &str );
2778 ok( r == S_OK, "get_baseName returned wrong code\n");
2779 ok( lstrcmpW(str,szlc) == 0, "basename was wrong\n");
2782 /* check if nodename is correct */
2783 r = IXMLDOMElement_get_nodeName( element, NULL );
2784 ok ( r == E_INVALIDARG, "get_nodeName (NULL) wrong code\n");
2786 /* content doesn't matter here */
2788 r = IXMLDOMElement_get_nodeName( element, &str );
2789 ok ( r == S_OK, "get_nodeName wrong code\n");
2790 ok ( str != NULL, "str is null\n");
2791 ok( !lstrcmpW( str, szlc ), "incorrect nodeName\n");
2792 SysFreeString( str );
2794 str = SysAllocString( szNonExistentFile );
2796 V_I4(&var) = 0x1234;
2797 r = IXMLDOMElement_getAttribute( element, str, &var );
2798 ok( r == E_FAIL, "getAttribute ret %08x\n", r );
2799 ok( V_VT(&var) == VT_NULL || V_VT(&var) == VT_EMPTY, "vt = %x\n", V_VT(&var));
2802 r = IXMLDOMElement_getAttributeNode( element, str, NULL);
2803 ok( r == E_FAIL, "getAttributeNode ret %08x\n", r );
2805 attr = (IXMLDOMAttribute*)0xdeadbeef;
2806 r = IXMLDOMElement_getAttributeNode( element, str, &attr);
2807 ok( r == E_FAIL, "getAttributeNode ret %08x\n", r );
2808 ok( attr == NULL, "getAttributeNode ret %p, expected NULL\n", attr );
2809 SysFreeString( str );
2811 attr = (IXMLDOMAttribute*)0xdeadbeef;
2812 str = SysAllocString( szNonExistentAttribute );
2813 r = IXMLDOMElement_getAttributeNode( element, str, &attr);
2814 ok( r == S_FALSE, "getAttributeNode ret %08x\n", r );
2815 ok( attr == NULL, "getAttributeNode ret %p, expected NULL\n", attr );
2816 SysFreeString( str );
2818 str = SysAllocString( szdl );
2820 V_I4(&var) = 0x1234;
2821 r = IXMLDOMElement_getAttribute( element, str, &var );
2822 ok( r == S_OK, "getAttribute ret %08x\n", r );
2823 ok( V_VT(&var) == VT_BSTR, "vt = %x\n", V_VT(&var));
2824 ok( !lstrcmpW(V_BSTR(&var), szstr1), "wrong attr value\n");
2825 VariantClear( &var );
2827 r = IXMLDOMElement_getAttribute( element, NULL, &var );
2828 ok( r == E_INVALIDARG, "getAttribute ret %08x\n", r );
2830 r = IXMLDOMElement_getAttribute( element, str, NULL );
2831 ok( r == E_INVALIDARG, "getAttribute ret %08x\n", r );
2834 r = IXMLDOMElement_getAttributeNode( element, str, &attr);
2835 ok( r == S_OK, "GetAttributeNode ret %08x\n", r );
2836 ok( attr != NULL, "getAttributeNode returned NULL\n" );
2839 r = IXMLDOMAttribute_get_parentNode( attr, NULL );
2840 ok( r == E_INVALIDARG, "Expected E_INVALIDARG, ret %08x\n", r );
2842 /* attribute doesn't have a parent in msxml interpretation */
2843 node = (IXMLDOMNode*)0xdeadbeef;
2844 r = IXMLDOMAttribute_get_parentNode( attr, &node );
2845 ok( r == S_FALSE, "Expected S_FALSE, ret %08x\n", r );
2846 ok( node == NULL, "Expected NULL, got %p\n", node );
2848 IXMLDOMAttribute_Release(attr);
2851 SysFreeString( str );
2853 r = IXMLDOMElement_get_attributes( element, &map );
2854 ok( r == S_OK, "get_attributes returned wrong code\n");
2855 ok( map != NULL, "should be attributes\n");
2857 EXPECT_CHILDREN(element);
2860 ok( FALSE, "no element\n");
2864 ISupportErrorInfo *support_error;
2865 r = IXMLDOMNamedNodeMap_QueryInterface( map, &IID_ISupportErrorInfo, (void**)&support_error );
2866 ok( r == S_OK, "ret %08x\n", r );
2868 r = ISupportErrorInfo_InterfaceSupportsErrorInfo( support_error, &IID_IXMLDOMNamedNodeMap );
2871 ok( r == S_OK, "ret %08x\n", r );
2873 ISupportErrorInfo_Release( support_error );
2875 str = SysAllocString( szdl );
2876 r = IXMLDOMNamedNodeMap_getNamedItem( map, str, &node );
2877 ok( r == S_OK, "getNamedItem returned wrong code\n");
2878 ok( node != NULL, "should be attributes\n");
2879 IXMLDOMNode_Release(node);
2880 SysFreeString( str );
2882 str = SysAllocString( szdl );
2883 r = IXMLDOMNamedNodeMap_getNamedItem( map, str, NULL );
2884 ok( r == E_INVALIDARG, "getNamedItem should return E_INVALIDARG\n");
2885 SysFreeString( str );
2887 /* something that isn't in szComplete4 */
2888 str = SysAllocString( szOpen );
2889 node = (IXMLDOMNode *) 1;
2890 r = IXMLDOMNamedNodeMap_getNamedItem( map, str, &node );
2891 ok( r == S_FALSE, "getNamedItem found a node that wasn't there\n");
2892 ok( node == NULL, "getNamedItem should have returned NULL\n");
2893 SysFreeString( str );
2895 /* test indexed access of attributes */
2896 r = IXMLDOMNamedNodeMap_get_length( map, NULL );
2897 ok ( r == E_INVALIDARG, "get_length should return E_INVALIDARG\n");
2899 r = IXMLDOMNamedNodeMap_get_length( map, &count );
2900 ok ( r == S_OK, "get_length wrong code\n");
2901 ok ( count == 1, "get_length != 1\n");
2904 r = IXMLDOMNamedNodeMap_get_item( map, -1, &node);
2905 ok ( r == S_FALSE, "get_item (-1) wrong code\n");
2906 ok ( node == NULL, "there is no node\n");
2909 r = IXMLDOMNamedNodeMap_get_item( map, 1, &node);
2910 ok ( r == S_FALSE, "get_item (1) wrong code\n");
2911 ok ( node == NULL, "there is no attribute\n");
2914 r = IXMLDOMNamedNodeMap_get_item( map, 0, &node);
2915 ok ( r == S_OK, "get_item (0) wrong code\n");
2916 ok ( node != NULL, "should be attribute\n");
2918 r = IXMLDOMNode_get_nodeName( node, NULL );
2919 ok ( r == E_INVALIDARG, "get_nodeName (NULL) wrong code\n");
2921 /* content doesn't matter here */
2923 r = IXMLDOMNode_get_nodeName( node, &str );
2924 ok ( r == S_OK, "get_nodeName wrong code\n");
2925 ok ( str != NULL, "str is null\n");
2926 ok( !lstrcmpW( str, szdl ), "incorrect node name\n");
2927 SysFreeString( str );
2928 IXMLDOMNode_Release( node );
2930 /* test sequential access of attributes */
2932 r = IXMLDOMNamedNodeMap_nextNode( map, &node );
2933 ok ( r == S_OK, "nextNode (first time) wrong code\n");
2934 ok ( node != NULL, "nextNode, should be attribute\n");
2935 IXMLDOMNode_Release( node );
2937 r = IXMLDOMNamedNodeMap_nextNode( map, &node );
2938 ok ( r != S_OK, "nextNode (second time) wrong code\n");
2939 ok ( node == NULL, "nextNode, there is no attribute\n");
2941 r = IXMLDOMNamedNodeMap_reset( map );
2942 ok ( r == S_OK, "reset should return S_OK\n");
2944 r = IXMLDOMNamedNodeMap_nextNode( map, &node );
2945 ok ( r == S_OK, "nextNode (third time) wrong code\n");
2946 ok ( node != NULL, "nextNode, should be attribute\n");
2949 ok( FALSE, "no map\n");
2953 type = NODE_INVALID;
2954 r = IXMLDOMNode_get_nodeType( node, &type);
2955 ok( r == S_OK, "getNamedItem returned wrong code\n");
2956 ok( type == NODE_ATTRIBUTE, "node not an attribute\n");
2959 r = IXMLDOMNode_get_baseName( node, NULL );
2960 ok( r == E_INVALIDARG, "get_baseName returned wrong code\n");
2963 r = IXMLDOMNode_get_baseName( node, &str );
2964 ok( r == S_OK, "get_baseName returned wrong code\n");
2965 ok( lstrcmpW(str,szdl) == 0, "basename was wrong\n");
2966 SysFreeString( str );
2968 r = IXMLDOMNode_get_nodeValue( node, &var );
2969 ok( r == S_OK, "returns %08x\n", r );
2970 ok( V_VT(&var) == VT_BSTR, "vt %x\n", V_VT(&var));
2971 ok( !lstrcmpW(V_BSTR(&var), szstr1), "nodeValue incorrect\n");
2974 r = IXMLDOMNode_get_childNodes( node, NULL );
2975 ok( r == E_INVALIDARG, "get_childNodes returned wrong code\n");
2977 r = IXMLDOMNode_get_childNodes( node, &list );
2978 ok( r == S_OK, "get_childNodes returned wrong code\n");
2982 r = IXMLDOMNodeList_nextNode( list, &next );
2983 ok( r == S_OK, "nextNode returned wrong code\n");
2986 ok( FALSE, "no childlist\n");
2990 EXPECT_NO_CHILDREN(next);
2992 type = NODE_INVALID;
2993 r = IXMLDOMNode_get_nodeType( next, &type);
2994 ok( r == S_OK, "getNamedItem returned wrong code\n");
2995 ok( type == NODE_TEXT, "node not text\n");
2998 r = IXMLDOMNode_get_baseName( next, &str );
2999 ok( r == S_FALSE, "get_baseName returned wrong code\n");
3000 ok( str == NULL, "basename was wrong\n");
3004 ok( FALSE, "no next\n");
3007 IXMLDOMNode_Release( next );
3010 IXMLDOMNodeList_Release( list );
3013 IXMLDOMNode_Release( node );
3016 ok( FALSE, "no node\n");
3020 IXMLDOMNamedNodeMap_Release( map );
3022 /* now traverse the tree from the root element */
3025 r = IXMLDOMNode_get_childNodes( element, &list );
3026 ok( r == S_OK, "get_childNodes returned wrong code\n");
3028 /* using get_item for child list doesn't advance the position */
3029 ole_check(IXMLDOMNodeList_get_item(list, 1, &node));
3030 expect_node(node, "E2.E2.D1");
3031 IXMLDOMNode_Release(node);
3032 ole_check(IXMLDOMNodeList_nextNode(list, &node));
3033 expect_node(node, "E1.E2.D1");
3034 IXMLDOMNode_Release(node);
3035 ole_check(IXMLDOMNodeList_reset(list));
3037 IXMLDOMNodeList_AddRef(list);
3038 expect_list_and_release(list, "E1.E2.D1 E2.E2.D1 E3.E2.D1 E4.E2.D1");
3039 ole_check(IXMLDOMNodeList_reset(list));
3041 node = (void*)0xdeadbeef;
3042 str = SysAllocString(szdl);
3043 r = IXMLDOMNode_selectSingleNode( element, str, &node );
3045 ok( r == S_FALSE, "ret %08x\n", r );
3046 ok( node == NULL, "node %p\n", node );
3048 str = SysAllocString(szbs);
3049 r = IXMLDOMNode_selectSingleNode( element, str, &node );
3051 ok( r == S_OK, "ret %08x\n", r );
3052 r = IXMLDOMNode_Release( node );
3053 ok( r == 0, "ret %08x\n", r );
3056 ok( FALSE, "no element\n");
3060 r = IXMLDOMNodeList_get_item(list, 0, NULL);
3061 ok(r == E_INVALIDARG, "Expected E_INVALIDARG got %08x\n", r);
3063 r = IXMLDOMNodeList_get_length(list, NULL);
3064 ok(r == E_INVALIDARG, "Expected E_INVALIDARG got %08x\n", r);
3066 r = IXMLDOMNodeList_get_length( list, &count );
3067 ok( r == S_OK, "get_length returns %08x\n", r );
3068 ok( count == 4, "get_length got %d\n", count );
3070 r = IXMLDOMNodeList_nextNode(list, NULL);
3071 ok(r == E_INVALIDARG, "Expected E_INVALIDARG got %08x\n", r);
3073 r = IXMLDOMNodeList_nextNode( list, &node );
3074 ok( r == S_OK, "nextNode returned wrong code\n");
3077 ok( FALSE, "no list\n");
3081 type = NODE_INVALID;
3082 r = IXMLDOMNode_get_nodeType( node, &type);
3083 ok( r == S_OK, "getNamedItem returned wrong code\n");
3084 ok( type == NODE_ELEMENT, "node not text\n");
3087 ok( V_VT(&var) == VT_EMPTY, "variant init failed\n");
3088 r = IXMLDOMNode_get_nodeValue( node, &var );
3089 ok( r == S_FALSE, "nextNode returned wrong code\n");
3090 ok( V_VT(&var) == VT_NULL, "variant wasn't empty\n");
3091 ok( V_BSTR(&var) == NULL, "variant value wasn't null\n");
3093 r = IXMLDOMNode_hasChildNodes( node, NULL );
3094 ok( r == E_INVALIDARG, "hasChildNodes bad return\n");
3096 EXPECT_CHILDREN(node);
3099 r = IXMLDOMNode_get_baseName( node, &str );
3100 ok( r == S_OK, "get_baseName returned wrong code\n");
3101 ok( lstrcmpW(str,szbs) == 0, "basename was wrong\n");
3105 ok( FALSE, "no node\n");
3108 IXMLDOMNode_Release( node );
3110 IXMLDOMNodeList_Release( list );
3112 IXMLDOMElement_Release( element );
3115 str = SysAllocString( szComplete5 );
3116 r = IXMLDOMDocument_loadXML( doc, str, &b );
3117 ok( r == S_OK, "loadXML failed\n");
3118 ok( b == VARIANT_TRUE, "failed to load XML string\n");
3119 SysFreeString( str );
3121 EXPECT_CHILDREN(doc);
3123 r = IXMLDOMDocument_get_documentElement( doc, &element );
3124 ok( r == S_OK, "should be a document element\n");
3125 ok( element != NULL, "should be an element\n");
3129 static const WCHAR szSSearch[] = {'S',':','s','e','a','r','c','h',0};
3132 /* check if the tag is correct */
3133 r = IXMLDOMElement_get_tagName( element, &tag );
3134 ok( r == S_OK, "couldn't get tag name\n");
3135 ok( tag != NULL, "tag was null\n");
3136 ok( !lstrcmpW( tag, szSSearch ), "incorrect tag name\n");
3137 SysFreeString( tag );
3141 IXMLDOMElement_Release( element );
3142 ok(IXMLDOMDocument_Release( doc ) == 0, "document is not destroyed\n");
3145 static void test_refs(void)
3150 IXMLDOMDocument *doc;
3151 IXMLDOMElement *element = NULL;
3152 IXMLDOMNode *node = NULL, *node2;
3153 IXMLDOMNodeList *node_list = NULL;
3155 IUnknown *unk, *unk2;
3157 doc = create_document(&IID_IXMLDOMDocument);
3161 ref = IXMLDOMDocument_Release(doc);
3162 ok( ref == 0, "ref %d\n", ref);
3164 doc = create_document(&IID_IXMLDOMDocument);
3167 str = SysAllocString( szComplete4 );
3168 r = IXMLDOMDocument_loadXML( doc, str, &b );
3169 ok( r == S_OK, "loadXML failed\n");
3170 ok( b == VARIANT_TRUE, "failed to load XML string\n");
3171 SysFreeString( str );
3174 IXMLDOMDocument_AddRef( doc );
3176 IXMLDOMDocument_AddRef( doc );
3179 IXMLDOMDocument_Release( doc );
3180 IXMLDOMDocument_Release( doc );
3182 r = IXMLDOMDocument_get_documentElement( doc, &element );
3183 ok( r == S_OK, "should be a document element\n");
3184 ok( element != NULL, "should be an element\n");
3187 todo_wine EXPECT_REF(element, 2);
3189 IXMLDOMElement_AddRef(element);
3190 todo_wine EXPECT_REF(element, 3);
3191 IXMLDOMElement_Release(element);
3193 r = IXMLDOMElement_get_childNodes( element, &node_list );
3194 ok( r == S_OK, "rets %08x\n", r);
3196 todo_wine EXPECT_REF(element, 2);
3197 EXPECT_REF(node_list, 1);
3199 IXMLDOMNodeList_get_item( node_list, 0, &node );
3200 ok( r == S_OK, "rets %08x\n", r);
3201 EXPECT_REF(node_list, 1);
3202 EXPECT_REF(node, 1);
3204 IXMLDOMNodeList_get_item( node_list, 0, &node2 );
3205 ok( r == S_OK, "rets %08x\n", r);
3206 EXPECT_REF(node_list, 1);
3207 EXPECT_REF(node2, 1);
3209 ref = IXMLDOMNode_Release( node );
3210 ok( ref == 0, "ref %d\n", ref );
3211 ref = IXMLDOMNode_Release( node2 );
3212 ok( ref == 0, "ref %d\n", ref );
3214 ref = IXMLDOMNodeList_Release( node_list );
3215 ok( ref == 0, "ref %d\n", ref );
3217 ok( node != node2, "node %p node2 %p\n", node, node2 );
3219 ref = IXMLDOMDocument_Release( doc );
3220 ok( ref == 0, "ref %d\n", ref );
3222 todo_wine EXPECT_REF(element, 2);
3224 /* IUnknown must be unique however we obtain it */
3225 r = IXMLDOMElement_QueryInterface( element, &IID_IUnknown, (void**)&unk );
3226 ok( r == S_OK, "rets %08x\n", r );
3227 EXPECT_REF(element, 2);
3228 r = IXMLDOMElement_QueryInterface( element, &IID_IXMLDOMNode, (void**)&node );
3229 ok( r == S_OK, "rets %08x\n", r );
3230 todo_wine EXPECT_REF(element, 2);
3231 r = IXMLDOMNode_QueryInterface( node, &IID_IUnknown, (void**)&unk2 );
3232 ok( r == S_OK, "rets %08x\n", r );
3233 todo_wine EXPECT_REF(element, 2);
3234 ok( unk == unk2, "unk %p unk2 %p\n", unk, unk2 );
3235 todo_wine ok( element != (void*)node, "node %p element %p\n", node, element );
3237 IUnknown_Release( unk2 );
3238 IUnknown_Release( unk );
3239 IXMLDOMNode_Release( node );
3240 todo_wine EXPECT_REF(element, 2);
3242 IXMLDOMElement_Release( element );
3245 static void test_create(void)
3247 static const WCHAR szOne[] = {'1',0};
3248 static const WCHAR szOneGarbage[] = {'1','G','a','r','b','a','g','e',0};
3252 IXMLDOMDocument *doc;
3253 IXMLDOMElement *element;
3254 IXMLDOMComment *comment;
3256 IXMLDOMCDATASection *cdata;
3257 IXMLDOMNode *root, *node, *child;
3258 IXMLDOMNamedNodeMap *attr_map;
3263 doc = create_document(&IID_IXMLDOMDocument);
3268 /* types not supported for creation */
3270 V_I1(&var) = NODE_DOCUMENT;
3271 node = (IXMLDOMNode*)0x1;
3272 r = IXMLDOMDocument_createNode( doc, var, NULL, NULL, &node );
3273 ok( r == E_INVALIDARG, "returns %08x\n", r );
3274 ok( node == (void*)0x1, "expected same ptr, got %p\n", node);
3277 V_I1(&var) = NODE_DOCUMENT_TYPE;
3278 node = (IXMLDOMNode*)0x1;
3279 r = IXMLDOMDocument_createNode( doc, var, NULL, NULL, &node );
3280 ok( r == E_INVALIDARG, "returns %08x\n", r );
3281 ok( node == (void*)0x1, "expected same ptr, got %p\n", node);
3284 V_I1(&var) = NODE_ENTITY;
3285 node = (IXMLDOMNode*)0x1;
3286 r = IXMLDOMDocument_createNode( doc, var, NULL, NULL, &node );
3287 ok( r == E_INVALIDARG, "returns %08x\n", r );
3288 ok( node == (void*)0x1, "expected same ptr, got %p\n", node);
3291 V_I1(&var) = NODE_NOTATION;
3292 node = (IXMLDOMNode*)0x1;
3293 r = IXMLDOMDocument_createNode( doc, var, NULL, NULL, &node );
3294 ok( r == E_INVALIDARG, "returns %08x\n", r );
3295 ok( node == (void*)0x1, "expected same ptr, got %p\n", node);
3299 V_I1(&var) = NODE_COMMENT;
3301 r = IXMLDOMDocument_createNode( doc, var, NULL, NULL, &node );
3302 ok( r == S_OK, "returns %08x\n", r );
3303 ok( node != NULL, "\n");
3305 r = IXMLDOMNode_QueryInterface(node, &IID_IXMLDOMComment, (void**)&comment);
3306 ok( r == S_OK, "returns %08x\n", r );
3307 IXMLDOMNode_Release(node);
3310 r = IXMLDOMComment_get_data(comment, &str);
3311 ok( r == S_OK, "returns %08x\n", r );
3312 ok( str && SysStringLen(str) == 0, "expected empty comment, %p\n", str);
3313 IXMLDOMComment_Release(comment);
3316 node = (IXMLDOMNode*)0x1;
3317 r = IXMLDOMDocument_createNode( doc, var, _bstr_(""), NULL, &node );
3318 ok( r == S_OK, "returns %08x\n", r );
3320 r = IXMLDOMNode_QueryInterface(node, &IID_IXMLDOMComment, (void**)&comment);
3321 ok( r == S_OK, "returns %08x\n", r );
3322 IXMLDOMNode_Release(node);
3325 r = IXMLDOMComment_get_data(comment, &str);
3326 ok( r == S_OK, "returns %08x\n", r );
3327 ok( str && SysStringLen(str) == 0, "expected empty comment, %p\n", str);
3328 IXMLDOMComment_Release(comment);
3331 node = (IXMLDOMNode*)0x1;
3332 r = IXMLDOMDocument_createNode( doc, var, _bstr_("blah"), NULL, &node );
3333 ok( r == S_OK, "returns %08x\n", r );
3335 r = IXMLDOMNode_QueryInterface(node, &IID_IXMLDOMComment, (void**)&comment);
3336 ok( r == S_OK, "returns %08x\n", r );
3337 IXMLDOMNode_Release(node);
3340 r = IXMLDOMComment_get_data(comment, &str);
3341 ok( r == S_OK, "returns %08x\n", r );
3342 ok( str && SysStringLen(str) == 0, "expected empty comment, %p\n", str);
3343 IXMLDOMComment_Release(comment);
3348 V_I1(&var) = NODE_TEXT;
3350 r = IXMLDOMDocument_createNode( doc, var, NULL, NULL, &node );
3351 ok( r == S_OK, "returns %08x\n", r );
3352 ok( node != NULL, "\n");
3354 r = IXMLDOMNode_QueryInterface(node, &IID_IXMLDOMText, (void**)&text);
3355 ok( r == S_OK, "returns %08x\n", r );
3356 IXMLDOMNode_Release(node);
3359 r = IXMLDOMText_get_data(text, &str);
3360 ok( r == S_OK, "returns %08x\n", r );
3361 ok( str && SysStringLen(str) == 0, "expected empty comment, %p\n", str);
3362 IXMLDOMText_Release(text);
3365 node = (IXMLDOMNode*)0x1;
3366 r = IXMLDOMDocument_createNode( doc, var, _bstr_(""), NULL, &node );
3367 ok( r == S_OK, "returns %08x\n", r );
3369 r = IXMLDOMNode_QueryInterface(node, &IID_IXMLDOMText, (void**)&text);
3370 ok( r == S_OK, "returns %08x\n", r );
3371 IXMLDOMNode_Release(node);
3374 r = IXMLDOMText_get_data(text, &str);
3375 ok( r == S_OK, "returns %08x\n", r );
3376 ok( str && SysStringLen(str) == 0, "expected empty comment, %p\n", str);
3377 IXMLDOMText_Release(text);
3380 node = (IXMLDOMNode*)0x1;
3381 r = IXMLDOMDocument_createNode( doc, var, _bstr_("blah"), NULL, &node );
3382 ok( r == S_OK, "returns %08x\n", r );
3384 r = IXMLDOMNode_QueryInterface(node, &IID_IXMLDOMText, (void**)&text);
3385 ok( r == S_OK, "returns %08x\n", r );
3386 IXMLDOMNode_Release(node);
3389 r = IXMLDOMText_get_data(text, &str);
3390 ok( r == S_OK, "returns %08x\n", r );
3391 ok( str && SysStringLen(str) == 0, "expected empty comment, %p\n", str);
3392 IXMLDOMText_Release(text);
3395 /* NODE_CDATA_SECTION */
3397 V_I1(&var) = NODE_CDATA_SECTION;
3399 r = IXMLDOMDocument_createNode( doc, var, NULL, NULL, &node );
3400 ok( r == S_OK, "returns %08x\n", r );
3401 ok( node != NULL, "\n");
3403 r = IXMLDOMNode_QueryInterface(node, &IID_IXMLDOMCDATASection, (void**)&cdata);
3404 ok( r == S_OK, "returns %08x\n", r );
3405 IXMLDOMNode_Release(node);
3408 r = IXMLDOMCDATASection_get_data(cdata, &str);
3409 ok( r == S_OK, "returns %08x\n", r );
3410 ok( str && SysStringLen(str) == 0, "expected empty comment, %p\n", str);
3411 IXMLDOMCDATASection_Release(cdata);
3414 node = (IXMLDOMNode*)0x1;
3415 r = IXMLDOMDocument_createNode( doc, var, _bstr_(""), NULL, &node );
3416 ok( r == S_OK, "returns %08x\n", r );
3418 r = IXMLDOMNode_QueryInterface(node, &IID_IXMLDOMCDATASection, (void**)&cdata);
3419 ok( r == S_OK, "returns %08x\n", r );
3420 IXMLDOMNode_Release(node);
3423 r = IXMLDOMCDATASection_get_data(cdata, &str);
3424 ok( r == S_OK, "returns %08x\n", r );
3425 ok( str && SysStringLen(str) == 0, "expected empty comment, %p\n", str);
3426 IXMLDOMCDATASection_Release(cdata);
3429 node = (IXMLDOMNode*)0x1;
3430 r = IXMLDOMDocument_createNode( doc, var, _bstr_("blah"), NULL, &node );
3431 ok( r == S_OK, "returns %08x\n", r );
3433 r = IXMLDOMNode_QueryInterface(node, &IID_IXMLDOMCDATASection, (void**)&cdata);
3434 ok( r == S_OK, "returns %08x\n", r );
3435 IXMLDOMNode_Release(node);
3438 r = IXMLDOMCDATASection_get_data(cdata, &str);
3439 ok( r == S_OK, "returns %08x\n", r );
3440 ok( str && SysStringLen(str) == 0, "expected empty comment, %p\n", str);
3441 IXMLDOMCDATASection_Release(cdata);
3444 /* NODE_ATTRIBUTE */
3446 V_I1(&var) = NODE_ATTRIBUTE;
3447 node = (IXMLDOMNode*)0x1;
3448 r = IXMLDOMDocument_createNode( doc, var, NULL, NULL, &node );
3449 ok( r == E_FAIL, "returns %08x\n", r );
3450 ok( node == (void*)0x1, "expected same ptr, got %p\n", node);
3453 V_I1(&var) = NODE_ATTRIBUTE;
3454 node = (IXMLDOMNode*)0x1;
3455 r = IXMLDOMDocument_createNode( doc, var, _bstr_(""), NULL, &node );
3456 ok( r == E_FAIL, "returns %08x\n", r );
3457 ok( node == (void*)0x1, "expected same ptr, got %p\n", node);
3460 V_I1(&var) = NODE_ATTRIBUTE;
3461 str = SysAllocString( szlc );
3462 r = IXMLDOMDocument_createNode( doc, var, str, NULL, &node );
3463 ok( r == S_OK, "returns %08x\n", r );
3464 if( SUCCEEDED(r) ) IXMLDOMNode_Release( node );
3467 /* a name is required for attribute, try a BSTR with first null wchar */
3469 V_I1(&var) = NODE_ATTRIBUTE;
3470 str = SysAllocString( szstr1 );
3472 node = (IXMLDOMNode*)0x1;
3473 r = IXMLDOMDocument_createNode( doc, var, str, NULL, &node );
3474 ok( r == E_FAIL, "returns %08x\n", r );
3475 ok( node == (void*)0x1, "expected same ptr, got %p\n", node);
3478 /* NODE_PROCESSING_INSTRUCTION */
3480 V_I1(&var) = NODE_PROCESSING_INSTRUCTION;
3481 node = (IXMLDOMNode*)0x1;
3482 r = IXMLDOMDocument_createNode( doc, var, NULL, NULL, &node );
3483 ok( r == E_FAIL, "returns %08x\n", r );
3484 ok( node == (void*)0x1, "expected same ptr, got %p\n", node);
3487 V_I1(&var) = NODE_PROCESSING_INSTRUCTION;
3488 node = (IXMLDOMNode*)0x1;
3489 r = IXMLDOMDocument_createNode( doc, var, _bstr_(""), NULL, &node );
3490 ok( r == E_FAIL, "returns %08x\n", r );
3491 ok( node == (void*)0x1, "expected same ptr, got %p\n", node);
3494 V_I1(&var) = NODE_PROCESSING_INSTRUCTION;
3495 r = IXMLDOMDocument_createNode( doc, var, _bstr_("pi"), NULL, NULL );
3496 ok( r == E_INVALIDARG, "returns %08x\n", r );
3498 /* NODE_ENTITY_REFERENCE */
3500 V_I1(&var) = NODE_ENTITY_REFERENCE;
3501 node = (IXMLDOMNode*)0x1;
3502 r = IXMLDOMDocument_createNode( doc, var, NULL, NULL, &node );
3503 ok( r == E_FAIL, "returns %08x\n", r );
3504 ok( node == (void*)0x1, "expected same ptr, got %p\n", node);
3507 V_I1(&var) = NODE_ENTITY_REFERENCE;
3508 node = (IXMLDOMNode*)0x1;
3509 r = IXMLDOMDocument_createNode( doc, var, _bstr_(""), NULL, &node );
3510 ok( r == E_FAIL, "returns %08x\n", r );
3511 ok( node == (void*)0x1, "expected same ptr, got %p\n", node);
3515 V_I1(&var) = NODE_ELEMENT;
3516 node = (IXMLDOMNode*)0x1;
3517 r = IXMLDOMDocument_createNode( doc, var, NULL, NULL, &node );
3518 ok( r == E_FAIL, "returns %08x\n", r );
3519 ok( node == (void*)0x1, "expected same ptr, got %p\n", node);
3522 V_I1(&var) = NODE_ELEMENT;
3523 node = (IXMLDOMNode*)0x1;
3524 r = IXMLDOMDocument_createNode( doc, var, _bstr_(""), NULL, &node );
3525 ok( r == E_FAIL, "returns %08x\n", r );
3526 ok( node == (void*)0x1, "expected same ptr, got %p\n", node);
3529 V_I1(&var) = NODE_ELEMENT;
3530 str = SysAllocString( szlc );
3531 r = IXMLDOMDocument_createNode( doc, var, str, NULL, &node );
3532 ok( r == S_OK, "returns %08x\n", r );
3533 if( SUCCEEDED(r) ) IXMLDOMNode_Release( node );
3536 V_I1(&var) = NODE_ELEMENT;
3537 r = IXMLDOMDocument_createNode( doc, var, str, NULL, NULL );
3538 ok( r == E_INVALIDARG, "returns %08x\n", r );
3541 V_R4(&var) = NODE_ELEMENT;
3542 r = IXMLDOMDocument_createNode( doc, var, str, NULL, &node );
3543 ok( r == S_OK, "returns %08x\n", r );
3544 if( SUCCEEDED(r) ) IXMLDOMNode_Release( node );
3546 V_VT(&var) = VT_BSTR;
3547 V_BSTR(&var) = SysAllocString( szOne );
3548 r = IXMLDOMDocument_createNode( doc, var, str, NULL, &node );
3549 ok( r == S_OK, "returns %08x\n", r );
3550 if( SUCCEEDED(r) ) IXMLDOMNode_Release( node );
3553 V_VT(&var) = VT_BSTR;
3554 V_BSTR(&var) = SysAllocString( szOneGarbage );
3555 r = IXMLDOMDocument_createNode( doc, var, str, NULL, &node );
3556 ok( r == E_INVALIDARG, "returns %08x\n", r );
3557 if( SUCCEEDED(r) ) IXMLDOMNode_Release( node );
3561 V_I4(&var) = NODE_ELEMENT;
3562 r = IXMLDOMDocument_createNode( doc, var, str, NULL, &node );
3563 ok( r == S_OK, "returns %08x\n", r );
3566 r = IXMLDOMDocument_appendChild( doc, node, &root );
3567 ok( r == S_OK, "returns %08x\n", r );
3568 ok( node == root, "%p %p\n", node, root );
3571 EXPECT_REF(node, 2);
3573 ref = IXMLDOMNode_Release( node );
3574 ok(ref == 1, "ref %d\n", ref);
3575 SysFreeString( str );
3578 V_I4(&var) = NODE_ELEMENT;
3579 str = SysAllocString( szbs );
3580 r = IXMLDOMDocument_createNode( doc, var, str, NULL, &node );
3581 ok( r == S_OK, "returns %08x\n", r );
3582 SysFreeString( str );
3584 EXPECT_REF(node, 1);
3586 r = IXMLDOMNode_QueryInterface( node, &IID_IUnknown, (void**)&unk );
3587 ok( r == S_OK, "returns %08x\n", r );
3591 V_VT(&var) = VT_EMPTY;
3593 r = IXMLDOMNode_insertBefore( root, (IXMLDOMNode*)unk, var, &child );
3594 ok( r == S_OK, "returns %08x\n", r );
3595 ok( unk == (IUnknown*)child, "%p %p\n", unk, child );
3597 todo_wine EXPECT_REF(unk, 4);
3599 IXMLDOMNode_Release( child );
3600 IUnknown_Release( unk );
3602 V_VT(&var) = VT_NULL;
3603 V_DISPATCH(&var) = (IDispatch*)node;
3604 r = IXMLDOMNode_insertBefore( root, node, var, &child );
3605 ok( r == S_OK, "returns %08x\n", r );
3606 ok( node == child, "%p %p\n", node, child );
3607 IXMLDOMNode_Release( child );
3609 V_VT(&var) = VT_NULL;
3610 V_DISPATCH(&var) = (IDispatch*)node;
3611 r = IXMLDOMNode_insertBefore( root, node, var, NULL );
3612 ok( r == S_OK, "returns %08x\n", r );
3613 IXMLDOMNode_Release( node );
3615 r = IXMLDOMNode_QueryInterface( root, &IID_IXMLDOMElement, (void**)&element );
3616 ok( r == S_OK, "returns %08x\n", r );
3618 r = IXMLDOMElement_get_attributes( element, &attr_map );
3619 ok( r == S_OK, "returns %08x\n", r );
3620 r = IXMLDOMNamedNodeMap_get_length( attr_map, &num );
3621 ok( r == S_OK, "returns %08x\n", r );
3622 ok( num == 0, "num %d\n", num );
3623 IXMLDOMNamedNodeMap_Release( attr_map );
3625 V_VT(&var) = VT_BSTR;
3626 V_BSTR(&var) = SysAllocString( szstr1 );
3627 name = SysAllocString( szdl );
3628 r = IXMLDOMElement_setAttribute( element, name, var );
3629 ok( r == S_OK, "returns %08x\n", r );
3630 r = IXMLDOMElement_get_attributes( element, &attr_map );
3631 ok( r == S_OK, "returns %08x\n", r );
3632 r = IXMLDOMNamedNodeMap_get_length( attr_map, &num );
3633 ok( r == S_OK, "returns %08x\n", r );
3634 ok( num == 1, "num %d\n", num );
3635 IXMLDOMNamedNodeMap_Release( attr_map );
3638 V_VT(&var) = VT_BSTR;
3639 V_BSTR(&var) = SysAllocString( szstr2 );
3640 r = IXMLDOMElement_setAttribute( element, name, var );
3641 ok( r == S_OK, "returns %08x\n", r );
3642 r = IXMLDOMElement_get_attributes( element, &attr_map );
3643 ok( r == S_OK, "returns %08x\n", r );
3644 r = IXMLDOMNamedNodeMap_get_length( attr_map, &num );
3645 ok( r == S_OK, "returns %08x\n", r );
3646 ok( num == 1, "num %d\n", num );
3647 IXMLDOMNamedNodeMap_Release( attr_map );
3649 r = IXMLDOMElement_getAttribute( element, name, &var );
3650 ok( r == S_OK, "returns %08x\n", r );
3651 ok( !lstrcmpW(V_BSTR(&var), szstr2), "wrong attr value\n");
3653 SysFreeString(name);
3655 V_VT(&var) = VT_BSTR;
3656 V_BSTR(&var) = SysAllocString( szstr1 );
3657 name = SysAllocString( szlc );
3658 r = IXMLDOMElement_setAttribute( element, name, var );
3659 ok( r == S_OK, "returns %08x\n", r );
3660 r = IXMLDOMElement_get_attributes( element, &attr_map );
3661 ok( r == S_OK, "returns %08x\n", r );
3662 r = IXMLDOMNamedNodeMap_get_length( attr_map, &num );
3663 ok( r == S_OK, "returns %08x\n", r );
3664 ok( num == 2, "num %d\n", num );
3665 IXMLDOMNamedNodeMap_Release( attr_map );
3667 SysFreeString(name);
3671 name = SysAllocString( szbs );
3672 r = IXMLDOMElement_setAttribute( element, name, var );
3673 ok( r == S_OK, "returns %08x\n", r );
3675 r = IXMLDOMElement_getAttribute( element, name, &var );
3676 ok( r == S_OK, "returns %08x\n", r );
3677 ok( V_VT(&var) == VT_BSTR, "variant type %x\n", V_VT(&var));
3679 SysFreeString(name);
3681 /* Create an Attribute */
3683 V_I4(&var) = NODE_ATTRIBUTE;
3684 str = SysAllocString( szAttribute );
3685 r = IXMLDOMDocument_createNode( doc, var, str, NULL, &node );
3686 ok( r == S_OK, "returns %08x\n", r );
3687 ok( node != NULL, "node was null\n");
3690 IXMLDOMElement_Release( element );
3691 IXMLDOMNode_Release( root );
3692 IXMLDOMDocument_Release( doc );
3695 static void test_getElementsByTagName(void)
3697 IXMLDOMNodeList *node_list;
3698 IXMLDOMDocument *doc;
3699 IXMLDOMElement *elem;
3706 doc = create_document(&IID_IXMLDOMDocument);
3709 str = SysAllocString( szComplete4 );
3710 r = IXMLDOMDocument_loadXML( doc, str, &b );
3711 ok( r == S_OK, "loadXML failed\n");
3712 ok( b == VARIANT_TRUE, "failed to load XML string\n");
3713 SysFreeString( str );
3715 str = SysAllocString( szstar );
3717 /* null arguments cases */
3718 r = IXMLDOMDocument_getElementsByTagName(doc, NULL, &node_list);
3719 ok( r == E_INVALIDARG, "ret %08x\n", r );
3720 r = IXMLDOMDocument_getElementsByTagName(doc, str, NULL);
3721 ok( r == E_INVALIDARG, "ret %08x\n", r );
3723 r = IXMLDOMDocument_getElementsByTagName(doc, str, &node_list);
3724 ok( r == S_OK, "ret %08x\n", r );
3725 r = IXMLDOMNodeList_get_length( node_list, &len );
3726 ok( r == S_OK, "ret %08x\n", r );
3727 ok( len == 6, "len %d\n", len );
3729 test_disp((IUnknown*)node_list);
3731 IXMLDOMNodeList_Release( node_list );
3732 SysFreeString( str );
3734 /* broken query BSTR */
3735 memcpy(&buff[2], szstar, sizeof(szstar));
3736 /* just a big length */
3737 *(DWORD*)buff = 0xf0f0;
3738 r = IXMLDOMDocument_getElementsByTagName(doc, &buff[2], &node_list);
3739 ok( r == S_OK, "ret %08x\n", r );
3740 r = IXMLDOMNodeList_get_length( node_list, &len );
3741 ok( r == S_OK, "ret %08x\n", r );
3742 ok( len == 6, "len %d\n", len );
3743 IXMLDOMNodeList_Release( node_list );
3745 str = SysAllocString( szbs );
3746 r = IXMLDOMDocument_getElementsByTagName(doc, str, &node_list);
3747 ok( r == S_OK, "ret %08x\n", r );
3748 r = IXMLDOMNodeList_get_length( node_list, &len );
3749 ok( r == S_OK, "ret %08x\n", r );
3750 ok( len == 1, "len %d\n", len );
3751 IXMLDOMNodeList_Release( node_list );
3752 SysFreeString( str );
3754 str = SysAllocString( szdl );
3755 r = IXMLDOMDocument_getElementsByTagName(doc, str, &node_list);
3756 ok( r == S_OK, "ret %08x\n", r );
3757 r = IXMLDOMNodeList_get_length( node_list, &len );
3758 ok( r == S_OK, "ret %08x\n", r );
3759 ok( len == 0, "len %d\n", len );
3760 IXMLDOMNodeList_Release( node_list );
3761 SysFreeString( str );
3763 str = SysAllocString( szstr1 );
3764 r = IXMLDOMDocument_getElementsByTagName(doc, str, &node_list);
3765 ok( r == S_OK, "ret %08x\n", r );
3766 r = IXMLDOMNodeList_get_length( node_list, &len );
3767 ok( r == S_OK, "ret %08x\n", r );
3768 ok( len == 0, "len %d\n", len );
3769 IXMLDOMNodeList_Release( node_list );
3770 SysFreeString( str );
3772 /* test for element */
3773 r = IXMLDOMDocument_get_documentElement(doc, &elem);
3774 ok( r == S_OK, "ret %08x\n", r );
3776 str = SysAllocString( szstar );
3778 /* null arguments cases */
3779 r = IXMLDOMElement_getElementsByTagName(elem, NULL, &node_list);
3780 ok( r == E_INVALIDARG, "ret %08x\n", r );
3781 r = IXMLDOMElement_getElementsByTagName(elem, str, NULL);
3782 ok( r == E_INVALIDARG, "ret %08x\n", r );
3784 r = IXMLDOMElement_getElementsByTagName(elem, str, &node_list);
3785 ok( r == S_OK, "ret %08x\n", r );
3786 r = IXMLDOMNodeList_get_length( node_list, &len );
3787 ok( r == S_OK, "ret %08x\n", r );
3788 ok( len == 5, "len %d\n", len );
3789 expect_list_and_release(node_list, "E1.E2.D1 E2.E2.D1 E3.E2.D1 E4.E2.D1 E1.E4.E2.D1");
3790 SysFreeString( str );
3792 /* broken query BSTR */
3793 memcpy(&buff[2], szstar, sizeof(szstar));
3794 /* just a big length */
3795 *(DWORD*)buff = 0xf0f0;
3796 r = IXMLDOMElement_getElementsByTagName(elem, &buff[2], &node_list);
3797 ok( r == S_OK, "ret %08x\n", r );
3798 r = IXMLDOMNodeList_get_length( node_list, &len );
3799 ok( r == S_OK, "ret %08x\n", r );
3800 ok( len == 5, "len %d\n", len );
3801 IXMLDOMNodeList_Release( node_list );
3803 IXMLDOMElement_Release(elem);
3805 IXMLDOMDocument_Release( doc );
3808 static void test_get_text(void)
3813 IXMLDOMDocument *doc;
3814 IXMLDOMNode *node, *node2, *node3;
3815 IXMLDOMNode *nodeRoot;
3816 IXMLDOMNodeList *node_list;
3817 IXMLDOMNamedNodeMap *node_map;
3820 doc = create_document(&IID_IXMLDOMDocument);
3823 str = SysAllocString( szComplete4 );
3824 r = IXMLDOMDocument_loadXML( doc, str, &b );
3825 ok( r == S_OK, "loadXML failed\n");
3826 ok( b == VARIANT_TRUE, "failed to load XML string\n");
3827 SysFreeString( str );
3829 str = SysAllocString( szbs );
3830 r = IXMLDOMDocument_getElementsByTagName( doc, str, &node_list );
3831 ok( r == S_OK, "ret %08x\n", r );
3834 /* Test to get all child node text. */
3835 r = IXMLDOMDocument_QueryInterface(doc, &IID_IXMLDOMNode, (void**)&nodeRoot);
3836 ok( r == S_OK, "ret %08x\n", r );
3839 r = IXMLDOMNode_get_text( nodeRoot, &str );
3840 ok( r == S_OK, "ret %08x\n", r );
3841 ok( compareIgnoreReturns(str, _bstr_("fn1.txt\n\n fn2.txt \n\nf1\n")), "wrong get_text: %s\n", wine_dbgstr_w(str));
3844 IXMLDOMNode_Release(nodeRoot);
3847 r = IXMLDOMNodeList_get_length( node_list, NULL );
3848 ok( r == E_INVALIDARG, "ret %08x\n", r );
3850 r = IXMLDOMNodeList_get_length( node_list, &len );
3851 ok( r == S_OK, "ret %08x\n", r );
3852 ok( len == 1, "expect 1 got %d\n", len );
3854 r = IXMLDOMNodeList_get_item( node_list, 0, NULL );
3855 ok( r == E_INVALIDARG, "ret %08x\n", r );
3857 r = IXMLDOMNodeList_nextNode( node_list, NULL );
3858 ok( r == E_INVALIDARG, "ret %08x\n", r );
3860 r = IXMLDOMNodeList_get_item( node_list, 0, &node );
3861 ok( r == S_OK, "ret %08x\n", r );
3862 IXMLDOMNodeList_Release( node_list );
3864 /* Invalid output parameter*/
3865 r = IXMLDOMNode_get_text( node, NULL );
3866 ok( r == E_INVALIDARG, "ret %08x\n", r );
3868 r = IXMLDOMNode_get_text( node, &str );
3869 ok( r == S_OK, "ret %08x\n", r );
3870 ok( !memcmp(str, szfn1_txt, lstrlenW(szfn1_txt) ), "wrong string\n" );
3873 r = IXMLDOMNode_get_attributes( node, &node_map );
3874 ok( r == S_OK, "ret %08x\n", r );
3876 str = SysAllocString( szvr );
3877 r = IXMLDOMNamedNodeMap_getNamedItem( node_map, str, &node2 );
3878 ok( r == S_OK, "ret %08x\n", r );
3881 r = IXMLDOMNode_get_text( node2, &str );
3882 ok( r == S_OK, "ret %08x\n", r );
3883 ok( !memcmp(str, szstr2, sizeof(szstr2)), "wrong string\n" );
3886 r = IXMLDOMNode_get_firstChild( node2, &node3 );
3887 ok( r == S_OK, "ret %08x\n", r );
3889 r = IXMLDOMNode_get_text( node3, &str );
3890 ok( r == S_OK, "ret %08x\n", r );
3891 ok( !memcmp(str, szstr2, sizeof(szstr2)), "wrong string\n" );
3895 IXMLDOMNode_Release( node3 );
3896 IXMLDOMNode_Release( node2 );
3897 IXMLDOMNamedNodeMap_Release( node_map );
3898 IXMLDOMNode_Release( node );
3899 IXMLDOMDocument_Release( doc );
3902 static void test_get_childNodes(void)
3906 IXMLDOMDocument *doc;
3907 IXMLDOMElement *element;
3908 IXMLDOMNode *node, *node2;
3909 IXMLDOMNodeList *node_list, *node_list2;
3913 doc = create_document(&IID_IXMLDOMDocument);
3916 str = SysAllocString( szComplete4 );
3917 hr = IXMLDOMDocument_loadXML( doc, str, &b );
3918 EXPECT_HR(hr, S_OK);
3919 ok( b == VARIANT_TRUE, "failed to load XML string\n");
3920 SysFreeString( str );
3922 hr = IXMLDOMDocument_get_documentElement( doc, &element );
3923 EXPECT_HR(hr, S_OK);
3925 hr = IXMLDOMElement_get_childNodes( element, &node_list );
3926 EXPECT_HR(hr, S_OK);
3928 hr = IXMLDOMNodeList_get_length( node_list, &len );
3929 EXPECT_HR(hr, S_OK);
3930 ok( len == 4, "len %d\n", len);
3932 hr = IXMLDOMNodeList_get_item( node_list, 2, &node );
3933 EXPECT_HR(hr, S_OK);
3935 hr = IXMLDOMNode_get_childNodes( node, &node_list2 );
3936 EXPECT_HR(hr, S_OK);
3938 hr = IXMLDOMNodeList_get_length( node_list2, &len );
3939 EXPECT_HR(hr, S_OK);
3940 ok( len == 0, "len %d\n", len);
3942 hr = IXMLDOMNodeList_get_item( node_list2, 0, &node2);
3943 EXPECT_HR(hr, S_FALSE);
3945 IXMLDOMNodeList_Release( node_list2 );
3946 IXMLDOMNode_Release( node );
3947 IXMLDOMNodeList_Release( node_list );
3948 IXMLDOMElement_Release( element );
3950 /* test for children of <?xml ..?> node */
3951 hr = IXMLDOMDocument_get_firstChild(doc, &node);
3952 EXPECT_HR(hr, S_OK);
3955 hr = IXMLDOMNode_get_nodeName(node, &str);
3956 EXPECT_HR(hr, S_OK);
3957 ok(!lstrcmpW(str, _bstr_("xml")), "got %s\n", wine_dbgstr_w(str));
3960 /* it returns empty but valid node list */
3961 node_list = (void*)0xdeadbeef;
3962 hr = IXMLDOMNode_get_childNodes(node, &node_list);
3963 EXPECT_HR(hr, S_OK);
3966 hr = IXMLDOMNodeList_get_length(node_list, &len);
3967 EXPECT_HR(hr, S_OK);
3968 ok(len == 0, "got %d\n", len);
3970 IXMLDOMNodeList_Release( node_list );
3971 IXMLDOMNode_Release(node);
3973 IXMLDOMDocument_Release( doc );
3977 static void test_get_firstChild(void)
3979 static WCHAR xmlW[] = {'x','m','l',0};
3980 IXMLDOMDocument *doc;
3986 doc = create_document(&IID_IXMLDOMDocument);
3989 str = SysAllocString( szComplete4 );
3990 r = IXMLDOMDocument_loadXML( doc, str, &b );
3991 ok( r == S_OK, "loadXML failed\n");
3992 ok( b == VARIANT_TRUE, "failed to load XML string\n");
3993 SysFreeString( str );
3995 r = IXMLDOMDocument_get_firstChild( doc, &node );
3996 ok( r == S_OK, "ret %08x\n", r);
3998 r = IXMLDOMNode_get_nodeName( node, &str );
3999 ok( r == S_OK, "ret %08x\n", r);
4001 ok(!lstrcmpW(str, xmlW), "expected \"xml\" node name, got %s\n", wine_dbgstr_w(str));
4004 IXMLDOMNode_Release( node );
4005 IXMLDOMDocument_Release( doc );
4008 static void test_get_lastChild(void)
4010 static WCHAR lcW[] = {'l','c',0};
4011 static WCHAR foW[] = {'f','o',0};
4012 IXMLDOMDocument *doc;
4013 IXMLDOMNode *node, *child;
4018 doc = create_document(&IID_IXMLDOMDocument);
4021 str = SysAllocString( szComplete4 );
4022 r = IXMLDOMDocument_loadXML( doc, str, &b );
4023 ok( r == S_OK, "loadXML failed\n");
4024 ok( b == VARIANT_TRUE, "failed to load XML string\n");
4025 SysFreeString( str );
4027 r = IXMLDOMDocument_get_lastChild( doc, &node );
4028 ok( r == S_OK, "ret %08x\n", r);
4030 r = IXMLDOMNode_get_nodeName( node, &str );
4031 ok( r == S_OK, "ret %08x\n", r);
4033 ok(memcmp(str, lcW, sizeof(lcW)) == 0, "expected \"lc\" node name\n");
4036 r = IXMLDOMNode_get_lastChild( node, &child );
4037 ok( r == S_OK, "ret %08x\n", r);
4039 r = IXMLDOMNode_get_nodeName( child, &str );
4040 ok( r == S_OK, "ret %08x\n", r);
4042 ok(memcmp(str, foW, sizeof(foW)) == 0, "expected \"fo\" node name\n");
4045 IXMLDOMNode_Release( child );
4046 IXMLDOMNode_Release( node );
4047 IXMLDOMDocument_Release( doc );
4050 static void test_removeChild(void)
4055 IXMLDOMDocument *doc;
4056 IXMLDOMElement *element, *lc_element;
4057 IXMLDOMNode *fo_node, *ba_node, *removed_node, *temp_node, *lc_node;
4058 IXMLDOMNodeList *root_list, *fo_list;
4060 doc = create_document(&IID_IXMLDOMDocument);
4063 str = SysAllocString( szComplete4 );
4064 r = IXMLDOMDocument_loadXML( doc, str, &b );
4065 ok( r == S_OK, "loadXML failed\n");
4066 ok( b == VARIANT_TRUE, "failed to load XML string\n");
4067 SysFreeString( str );
4069 r = IXMLDOMDocument_get_documentElement( doc, &element );
4070 ok( r == S_OK, "ret %08x\n", r);
4071 todo_wine EXPECT_REF(element, 2);
4073 r = IXMLDOMElement_get_childNodes( element, &root_list );
4074 ok( r == S_OK, "ret %08x\n", r);
4075 EXPECT_REF(root_list, 1);
4077 r = IXMLDOMNodeList_get_item( root_list, 3, &fo_node );
4078 ok( r == S_OK, "ret %08x\n", r);
4079 EXPECT_REF(fo_node, 1);
4081 r = IXMLDOMNode_get_childNodes( fo_node, &fo_list );
4082 ok( r == S_OK, "ret %08x\n", r);
4083 EXPECT_REF(fo_list, 1);
4085 r = IXMLDOMNodeList_get_item( fo_list, 0, &ba_node );
4086 ok( r == S_OK, "ret %08x\n", r);
4087 EXPECT_REF(ba_node, 1);
4089 /* invalid parameter: NULL ptr */
4090 removed_node = (void*)0xdeadbeef;
4091 r = IXMLDOMElement_removeChild( element, NULL, &removed_node );
4092 ok( r == E_INVALIDARG, "ret %08x\n", r );
4093 ok( removed_node == (void*)0xdeadbeef, "%p\n", removed_node );
4095 /* ba_node is a descendant of element, but not a direct child. */
4096 removed_node = (void*)0xdeadbeef;
4097 EXPECT_REF(ba_node, 1);
4098 EXPECT_CHILDREN(fo_node);
4099 r = IXMLDOMElement_removeChild( element, ba_node, &removed_node );
4100 ok( r == E_INVALIDARG, "ret %08x\n", r );
4101 ok( removed_node == NULL, "%p\n", removed_node );
4102 EXPECT_REF(ba_node, 1);
4103 EXPECT_CHILDREN(fo_node);
4105 EXPECT_REF(ba_node, 1);
4106 EXPECT_REF(fo_node, 1);
4107 r = IXMLDOMElement_removeChild( element, fo_node, &removed_node );
4108 ok( r == S_OK, "ret %08x\n", r);
4109 ok( fo_node == removed_node, "node %p node2 %p\n", fo_node, removed_node );
4110 EXPECT_REF(fo_node, 2);
4111 EXPECT_REF(ba_node, 1);
4113 /* try removing already removed child */
4114 temp_node = (void*)0xdeadbeef;
4115 r = IXMLDOMElement_removeChild( element, fo_node, &temp_node );
4116 ok( r == E_INVALIDARG, "ret %08x\n", r);
4117 ok( temp_node == NULL, "%p\n", temp_node );
4118 IXMLDOMNode_Release( fo_node );
4120 /* the removed node has no parent anymore */
4121 r = IXMLDOMNode_get_parentNode( removed_node, &temp_node );
4122 ok( r == S_FALSE, "ret %08x\n", r);
4123 ok( temp_node == NULL, "%p\n", temp_node );
4125 IXMLDOMNode_Release( removed_node );
4126 IXMLDOMNode_Release( ba_node );
4127 IXMLDOMNodeList_Release( fo_list );
4129 r = IXMLDOMNodeList_get_item( root_list, 0, &lc_node );
4130 ok( r == S_OK, "ret %08x\n", r);
4132 r = IXMLDOMElement_QueryInterface( lc_node, &IID_IXMLDOMElement, (void**)&lc_element );
4133 ok( r == S_OK, "ret %08x\n", r);
4135 /* MS quirk: passing wrong interface pointer works, too */
4136 r = IXMLDOMElement_removeChild( element, (IXMLDOMNode*)lc_element, NULL );
4137 ok( r == S_OK, "ret %08x\n", r);
4138 IXMLDOMElement_Release( lc_element );
4140 temp_node = (void*)0xdeadbeef;
4141 r = IXMLDOMNode_get_parentNode( lc_node, &temp_node );
4142 ok( r == S_FALSE, "ret %08x\n", r);
4143 ok( temp_node == NULL, "%p\n", temp_node );
4145 IXMLDOMNode_Release( lc_node );
4146 IXMLDOMNodeList_Release( root_list );
4147 IXMLDOMElement_Release( element );
4148 IXMLDOMDocument_Release( doc );
4151 static void test_replaceChild(void)
4156 IXMLDOMDocument *doc;
4157 IXMLDOMElement *element, *ba_element;
4158 IXMLDOMNode *fo_node, *ba_node, *lc_node, *removed_node, *temp_node;
4159 IXMLDOMNodeList *root_list, *fo_list;
4160 IUnknown * unk1, *unk2;
4163 doc = create_document(&IID_IXMLDOMDocument);
4166 str = SysAllocString( szComplete4 );
4167 r = IXMLDOMDocument_loadXML( doc, str, &b );
4168 ok( r == S_OK, "loadXML failed\n");
4169 ok( b == VARIANT_TRUE, "failed to load XML string\n");
4170 SysFreeString( str );
4172 r = IXMLDOMDocument_get_documentElement( doc, &element );
4173 ok( r == S_OK, "ret %08x\n", r);
4175 r = IXMLDOMElement_get_childNodes( element, &root_list );
4176 ok( r == S_OK, "ret %08x\n", r);
4178 r = IXMLDOMNodeList_get_item( root_list, 0, &lc_node );
4179 ok( r == S_OK, "ret %08x\n", r);
4181 r = IXMLDOMNodeList_get_item( root_list, 3, &fo_node );
4182 ok( r == S_OK, "ret %08x\n", r);
4184 r = IXMLDOMNode_get_childNodes( fo_node, &fo_list );
4185 ok( r == S_OK, "ret %08x\n", r);
4187 r = IXMLDOMNodeList_get_item( fo_list, 0, &ba_node );
4188 ok( r == S_OK, "ret %08x\n", r);
4190 IXMLDOMNodeList_Release( fo_list );
4192 /* invalid parameter: NULL ptr for element to remove */
4193 removed_node = (void*)0xdeadbeef;
4194 r = IXMLDOMElement_replaceChild( element, ba_node, NULL, &removed_node );
4195 ok( r == E_INVALIDARG, "ret %08x\n", r );
4196 ok( removed_node == (void*)0xdeadbeef, "%p\n", removed_node );
4198 /* invalid parameter: NULL for replacement element. (Sic!) */
4199 removed_node = (void*)0xdeadbeef;
4200 r = IXMLDOMElement_replaceChild( element, NULL, fo_node, &removed_node );
4201 ok( r == E_INVALIDARG, "ret %08x\n", r );
4202 ok( removed_node == (void*)0xdeadbeef, "%p\n", removed_node );
4204 /* invalid parameter: OldNode is not a child */
4205 removed_node = (void*)0xdeadbeef;
4206 r = IXMLDOMElement_replaceChild( element, lc_node, ba_node, &removed_node );
4207 ok( r == E_INVALIDARG, "ret %08x\n", r );
4208 ok( removed_node == NULL, "%p\n", removed_node );
4209 IXMLDOMNode_Release( lc_node );
4211 /* invalid parameter: would create loop */
4212 removed_node = (void*)0xdeadbeef;
4213 r = IXMLDOMNode_replaceChild( fo_node, fo_node, ba_node, &removed_node );
4214 ok( r == E_FAIL, "ret %08x\n", r );
4215 ok( removed_node == NULL, "%p\n", removed_node );
4217 r = IXMLDOMElement_replaceChild( element, ba_node, fo_node, NULL );
4218 ok( r == S_OK, "ret %08x\n", r );
4220 r = IXMLDOMNodeList_get_item( root_list, 3, &temp_node );
4221 ok( r == S_OK, "ret %08x\n", r );
4223 /* ba_node and temp_node refer to the same node, yet they
4224 are different interface pointers */
4225 ok( ba_node != temp_node, "ba_node %p temp_node %p\n", ba_node, temp_node);
4226 r = IXMLDOMNode_QueryInterface( temp_node, &IID_IUnknown, (void**)&unk1);
4227 ok( r == S_OK, "ret %08x\n", r );
4228 r = IXMLDOMNode_QueryInterface( ba_node, &IID_IUnknown, (void**)&unk2);
4229 ok( r == S_OK, "ret %08x\n", r );
4230 todo_wine ok( unk1 == unk2, "unk1 %p unk2 %p\n", unk1, unk2);
4232 IUnknown_Release( unk1 );
4233 IUnknown_Release( unk2 );
4235 /* ba_node should have been removed from below fo_node */
4236 r = IXMLDOMNode_get_childNodes( fo_node, &fo_list );
4237 ok( r == S_OK, "ret %08x\n", r );
4239 /* MS quirk: replaceChild also accepts elements instead of nodes */
4240 r = IXMLDOMNode_QueryInterface( ba_node, &IID_IXMLDOMElement, (void**)&ba_element);
4241 ok( r == S_OK, "ret %08x\n", r );
4242 EXPECT_REF(ba_element, 2);
4244 removed_node = NULL;
4245 r = IXMLDOMElement_replaceChild( element, ba_node, (IXMLDOMNode*)ba_element, &removed_node );
4246 ok( r == S_OK, "ret %08x\n", r );
4247 ok( removed_node != NULL, "got %p\n", removed_node);
4248 EXPECT_REF(ba_element, 3);
4249 IXMLDOMElement_Release( ba_element );
4251 r = IXMLDOMNodeList_get_length( fo_list, &len);
4252 ok( r == S_OK, "ret %08x\n", r );
4253 ok( len == 0, "len %d\n", len);
4255 IXMLDOMNodeList_Release( fo_list );
4257 IXMLDOMNode_Release(ba_node);
4258 IXMLDOMNode_Release(fo_node);
4259 IXMLDOMNode_Release(temp_node);
4260 IXMLDOMNodeList_Release( root_list );
4261 IXMLDOMElement_Release( element );
4262 IXMLDOMDocument_Release( doc );
4265 static void test_removeNamedItem(void)
4267 IXMLDOMDocument *doc;
4268 IXMLDOMElement *element;
4269 IXMLDOMNode *pr_node, *removed_node, *removed_node2;
4270 IXMLDOMNodeList *root_list;
4271 IXMLDOMNamedNodeMap * pr_attrs;
4277 doc = create_document(&IID_IXMLDOMDocument);
4280 str = SysAllocString( szComplete4 );
4281 r = IXMLDOMDocument_loadXML( doc, str, &b );
4282 ok( r == S_OK, "loadXML failed\n");
4283 ok( b == VARIANT_TRUE, "failed to load XML string\n");
4284 SysFreeString( str );
4286 r = IXMLDOMDocument_get_documentElement( doc, &element );
4287 ok( r == S_OK, "ret %08x\n", r);
4289 r = IXMLDOMElement_get_childNodes( element, &root_list );
4290 ok( r == S_OK, "ret %08x\n", r);
4292 r = IXMLDOMNodeList_get_item( root_list, 1, &pr_node );
4293 ok( r == S_OK, "ret %08x\n", r);
4295 r = IXMLDOMNode_get_attributes( pr_node, &pr_attrs );
4296 ok( r == S_OK, "ret %08x\n", r);
4298 r = IXMLDOMNamedNodeMap_get_length( pr_attrs, &len );
4299 ok( r == S_OK, "ret %08x\n", r);
4300 ok( len == 3, "length %d\n", len);
4302 removed_node = (void*)0xdeadbeef;
4303 r = IXMLDOMNamedNodeMap_removeNamedItem( pr_attrs, NULL, &removed_node);
4304 ok ( r == E_INVALIDARG, "ret %08x\n", r);
4305 ok ( removed_node == (void*)0xdeadbeef, "got %p\n", removed_node);
4307 removed_node = (void*)0xdeadbeef;
4308 str = SysAllocString(szvr);
4309 r = IXMLDOMNamedNodeMap_removeNamedItem( pr_attrs, str, &removed_node);
4310 ok ( r == S_OK, "ret %08x\n", r);
4312 removed_node2 = (void*)0xdeadbeef;
4313 r = IXMLDOMNamedNodeMap_removeNamedItem( pr_attrs, str, &removed_node2);
4314 ok ( r == S_FALSE, "ret %08x\n", r);
4315 ok ( removed_node2 == NULL, "got %p\n", removed_node2 );
4317 r = IXMLDOMNamedNodeMap_get_length( pr_attrs, &len );
4318 ok( r == S_OK, "ret %08x\n", r);
4319 ok( len == 2, "length %d\n", len);
4321 r = IXMLDOMNamedNodeMap_setNamedItem( pr_attrs, removed_node, NULL);
4322 ok ( r == S_OK, "ret %08x\n", r);
4323 IXMLDOMNode_Release(removed_node);
4325 r = IXMLDOMNamedNodeMap_get_length( pr_attrs, &len );
4326 ok( r == S_OK, "ret %08x\n", r);
4327 ok( len == 3, "length %d\n", len);
4329 r = IXMLDOMNamedNodeMap_removeNamedItem( pr_attrs, str, NULL);
4330 ok ( r == S_OK, "ret %08x\n", r);
4332 r = IXMLDOMNamedNodeMap_get_length( pr_attrs, &len );
4333 ok( r == S_OK, "ret %08x\n", r);
4334 ok( len == 2, "length %d\n", len);
4336 r = IXMLDOMNamedNodeMap_removeNamedItem( pr_attrs, str, NULL);
4337 ok ( r == S_FALSE, "ret %08x\n", r);
4341 IXMLDOMNamedNodeMap_Release( pr_attrs );
4342 IXMLDOMNode_Release( pr_node );
4343 IXMLDOMNodeList_Release( root_list );
4344 IXMLDOMElement_Release( element );
4345 IXMLDOMDocument_Release( doc );
4348 #define test_IObjectSafety_set(p, r, r2, s, m, e, e2) _test_IObjectSafety_set(__LINE__,p, r, r2, s, m, e, e2)
4349 static void _test_IObjectSafety_set(unsigned line, IObjectSafety *safety, HRESULT result,
4350 HRESULT result2, DWORD set, DWORD mask, DWORD expected,
4353 DWORD enabled, supported;
4356 hr = IObjectSafety_SetInterfaceSafetyOptions(safety, NULL, set, mask);
4357 if (result == result2)
4358 ok_(__FILE__,line)(hr == result, "SetInterfaceSafetyOptions: expected %08x, returned %08x\n", result, hr );
4360 ok_(__FILE__,line)(broken(hr == result) || hr == result2,
4361 "SetInterfaceSafetyOptions: expected %08x, got %08x\n", result2, hr );
4363 supported = enabled = 0xCAFECAFE;
4364 hr = IObjectSafety_GetInterfaceSafetyOptions(safety, NULL, &supported, &enabled);
4365 ok(hr == S_OK, "ret %08x\n", hr );
4366 if (expected == expected2)
4367 ok_(__FILE__,line)(enabled == expected, "Expected %08x, got %08x\n", expected, enabled);
4369 ok_(__FILE__,line)(broken(enabled == expected) || enabled == expected2,
4370 "Expected %08x, got %08x\n", expected2, enabled);
4372 /* reset the safety options */
4374 hr = IObjectSafety_SetInterfaceSafetyOptions(safety, NULL,
4375 INTERFACESAFE_FOR_UNTRUSTED_CALLER|INTERFACESAFE_FOR_UNTRUSTED_DATA|INTERFACE_USES_SECURITY_MANAGER,
4377 ok_(__FILE__,line)(hr == S_OK, "ret %08x\n", hr );
4379 hr = IObjectSafety_GetInterfaceSafetyOptions(safety, NULL, &supported, &enabled);
4380 ok_(__FILE__,line)(hr == S_OK, "ret %08x\n", hr );
4381 ok_(__FILE__,line)(enabled == 0, "Expected 0, got %08x\n", enabled);
4384 #define test_IObjectSafety_common(s) _test_IObjectSafety_common(__LINE__,s)
4385 static void _test_IObjectSafety_common(unsigned line, IObjectSafety *safety)
4387 DWORD enabled = 0, supported = 0;
4391 hr = IObjectSafety_GetInterfaceSafetyOptions(safety, NULL, NULL, &enabled);
4392 ok_(__FILE__,line)(hr == E_POINTER, "ret %08x\n", hr );
4393 hr = IObjectSafety_GetInterfaceSafetyOptions(safety, NULL, &supported, NULL);
4394 ok_(__FILE__,line)(hr == E_POINTER, "ret %08x\n", hr );
4396 hr = IObjectSafety_GetInterfaceSafetyOptions(safety, NULL, &supported, &enabled);
4397 ok_(__FILE__,line)(hr == S_OK, "ret %08x\n", hr );
4398 ok_(__FILE__,line)(broken(supported == (INTERFACESAFE_FOR_UNTRUSTED_CALLER | INTERFACESAFE_FOR_UNTRUSTED_DATA)) ||
4399 supported == (INTERFACESAFE_FOR_UNTRUSTED_CALLER | INTERFACESAFE_FOR_UNTRUSTED_DATA | INTERFACE_USES_SECURITY_MANAGER) /* msxml3 SP8+ */,
4400 "Expected (INTERFACESAFE_FOR_UNTRUSTED_CALLER | INTERFACESAFE_FOR_UNTRUSTED_DATA | INTERFACE_USES_SECURITY_MANAGER), "
4401 "got %08x\n", supported);
4402 ok_(__FILE__,line)(enabled == 0, "Expected 0, got %08x\n", enabled);
4404 /* set -- individual flags */
4406 test_IObjectSafety_set(safety, S_OK, S_OK,
4407 INTERFACESAFE_FOR_UNTRUSTED_CALLER, INTERFACESAFE_FOR_UNTRUSTED_CALLER,
4408 INTERFACESAFE_FOR_UNTRUSTED_CALLER, INTERFACESAFE_FOR_UNTRUSTED_CALLER);
4410 test_IObjectSafety_set(safety, S_OK, S_OK,
4411 INTERFACESAFE_FOR_UNTRUSTED_DATA, INTERFACESAFE_FOR_UNTRUSTED_DATA,
4412 INTERFACESAFE_FOR_UNTRUSTED_DATA, INTERFACESAFE_FOR_UNTRUSTED_DATA);
4414 test_IObjectSafety_set(safety, S_OK, S_OK,
4415 INTERFACE_USES_SECURITY_MANAGER, INTERFACE_USES_SECURITY_MANAGER,
4416 0, INTERFACE_USES_SECURITY_MANAGER /* msxml3 SP8+ */);
4418 /* set INTERFACE_USES_DISPEX */
4420 test_IObjectSafety_set(safety, S_OK, E_FAIL /* msxml3 SP8+ */,
4421 INTERFACE_USES_DISPEX, INTERFACE_USES_DISPEX,
4424 test_IObjectSafety_set(safety, S_OK, E_FAIL /* msxml3 SP8+ */,
4425 INTERFACE_USES_DISPEX, 0,
4428 test_IObjectSafety_set(safety, S_OK, S_OK /* msxml3 SP8+ */,
4429 0, INTERFACE_USES_DISPEX,
4432 /* set option masking */
4434 test_IObjectSafety_set(safety, S_OK, S_OK,
4435 INTERFACESAFE_FOR_UNTRUSTED_CALLER|INTERFACESAFE_FOR_UNTRUSTED_DATA,
4436 INTERFACESAFE_FOR_UNTRUSTED_CALLER,
4437 INTERFACESAFE_FOR_UNTRUSTED_CALLER,
4438 INTERFACESAFE_FOR_UNTRUSTED_CALLER);
4440 test_IObjectSafety_set(safety, S_OK, S_OK,
4441 INTERFACESAFE_FOR_UNTRUSTED_CALLER|INTERFACESAFE_FOR_UNTRUSTED_DATA,
4442 INTERFACESAFE_FOR_UNTRUSTED_DATA,
4443 INTERFACESAFE_FOR_UNTRUSTED_DATA,
4444 INTERFACESAFE_FOR_UNTRUSTED_DATA);
4446 test_IObjectSafety_set(safety, S_OK, S_OK,
4447 INTERFACESAFE_FOR_UNTRUSTED_CALLER|INTERFACESAFE_FOR_UNTRUSTED_DATA,
4448 INTERFACE_USES_SECURITY_MANAGER,
4452 /* set -- inheriting previous settings */
4454 hr = IObjectSafety_SetInterfaceSafetyOptions(safety, NULL,
4455 INTERFACESAFE_FOR_UNTRUSTED_CALLER,
4456 INTERFACESAFE_FOR_UNTRUSTED_CALLER);
4457 ok_(__FILE__,line)(hr == S_OK, "ret %08x\n", hr );
4458 hr = IObjectSafety_GetInterfaceSafetyOptions(safety, NULL, &supported, &enabled);
4459 ok_(__FILE__,line)(hr == S_OK, "ret %08x\n", hr );
4460 ok_(__FILE__,line)(enabled == INTERFACESAFE_FOR_UNTRUSTED_CALLER, "Expected INTERFACESAFE_FOR_UNTRUSTED_CALLER got %08x\n", enabled);
4461 ok_(__FILE__,line)(broken(supported == INTERFACESAFE_FOR_UNTRUSTED_CALLER) ||
4462 supported == (INTERFACESAFE_FOR_UNTRUSTED_CALLER | INTERFACESAFE_FOR_UNTRUSTED_DATA | INTERFACE_USES_SECURITY_MANAGER) /* msxml3 SP8+ */,
4463 "Expected (INTERFACESAFE_FOR_UNTRUSTED_CALLER | INTERFACESAFE_FOR_UNTRUSTED_DATA | INTERFACE_USES_SECURITY_MANAGER), "
4464 "got %08x\n", supported);
4466 hr = IObjectSafety_SetInterfaceSafetyOptions(safety, NULL,
4467 INTERFACESAFE_FOR_UNTRUSTED_DATA,
4468 INTERFACESAFE_FOR_UNTRUSTED_DATA);
4469 ok_(__FILE__,line)(hr == S_OK, "ret %08x\n", hr );
4470 hr = IObjectSafety_GetInterfaceSafetyOptions(safety, NULL, &supported, &enabled);
4471 ok_(__FILE__,line)(hr == S_OK, "ret %08x\n", hr );
4472 ok_(__FILE__,line)(enabled == (INTERFACESAFE_FOR_UNTRUSTED_CALLER | INTERFACESAFE_FOR_UNTRUSTED_DATA),
4473 "expected INTERFACESAFE_FOR_UNTRUSTED_CALLER | INTERFACESAFE_FOR_UNTRUSTED_DATA got %08x\n", enabled);
4474 ok_(__FILE__,line)(broken(supported == INTERFACESAFE_FOR_UNTRUSTED_DATA) ||
4475 supported == (INTERFACESAFE_FOR_UNTRUSTED_CALLER | INTERFACESAFE_FOR_UNTRUSTED_DATA | INTERFACE_USES_SECURITY_MANAGER) /* msxml3 SP8+ */,
4476 "Expected (INTERFACESAFE_FOR_UNTRUSTED_CALLER | INTERFACESAFE_FOR_UNTRUSTED_DATA | INTERFACE_USES_SECURITY_MANAGER), "
4477 "got %08x\n", supported);
4480 static void test_XMLHTTP(void)
4482 static const WCHAR wszBody[] = {'m','o','d','e','=','T','e','s','t',0};
4483 static const WCHAR wszUrl[] = {'h','t','t','p',':','/','/',
4484 'c','r','o','s','s','o','v','e','r','.','c','o','d','e','w','e','a','v','e','r','s','.','c','o','m','/',
4485 'p','o','s','t','t','e','s','t','.','p','h','p',0};
4486 static const WCHAR xmltestW[] = {'h','t','t','p',':','/','/',
4487 'c','r','o','s','s','o','v','e','r','.','c','o','d','e','w','e','a','v','e','r','s','.','c','o','m','/',
4488 'x','m','l','t','e','s','t','.','x','m','l',0};
4489 static const WCHAR wszExpectedResponse[] = {'F','A','I','L','E','D',0};
4490 static const CHAR xmltestbodyA[] = "<?xml version=\"1.0\" encoding=\"utf-8\"?>\n<a>TEST</a>\n";
4492 IXMLHttpRequest *xhr;
4493 IObjectSafety *safety;
4494 IObjectWithSite *obj_site, *obj_site2;
4495 BSTR bstrResponse, url;
4499 LONG state, status, bound;
4504 hr = CoCreateInstance(&CLSID_XMLHTTPRequest, NULL, CLSCTX_INPROC_SERVER,
4505 &IID_IXMLHttpRequest, (void**)&xhr);
4508 win_skip("IXMLHTTPRequest is not available (0x%08x)\n", hr);
4512 VariantInit(&dummy);
4513 V_VT(&dummy) = VT_ERROR;
4514 V_ERROR(&dummy) = DISP_E_MEMBERNOTFOUND;
4515 VariantInit(&async);
4516 V_VT(&async) = VT_BOOL;
4517 V_BOOL(&async) = VARIANT_FALSE;
4518 V_VT(&varbody) = VT_BSTR;
4519 V_BSTR(&varbody) = SysAllocString(wszBody);
4521 url = SysAllocString(wszUrl);
4523 hr = IXMLHttpRequest_put_onreadystatechange(xhr, NULL);
4524 EXPECT_HR(hr, S_OK);
4526 hr = IXMLHttpRequest_abort(xhr);
4527 EXPECT_HR(hr, S_OK);
4529 /* send before open */
4530 hr = IXMLHttpRequest_send(xhr, dummy);
4531 ok(hr == E_FAIL || broken(hr == E_UNEXPECTED) /* win2k */, "got 0x%08x\n", hr);
4533 /* initial status code */
4534 hr = IXMLHttpRequest_get_status(xhr, NULL);
4535 EXPECT_HR(hr, E_INVALIDARG);
4537 status = 0xdeadbeef;
4538 hr = IXMLHttpRequest_get_status(xhr, &status);
4539 ok(hr == E_FAIL || broken(hr == E_UNEXPECTED) /* win2k */, "got 0x%08x\n", hr);
4540 ok(status == 0xdeadbeef, "got %d\n", status);
4542 /* invalid parameters */
4543 hr = IXMLHttpRequest_open(xhr, NULL, NULL, async, dummy, dummy);
4544 EXPECT_HR(hr, E_INVALIDARG);
4546 hr = IXMLHttpRequest_open(xhr, _bstr_("POST"), NULL, async, dummy, dummy);
4547 EXPECT_HR(hr, E_INVALIDARG);
4549 hr = IXMLHttpRequest_open(xhr, NULL, url, async, dummy, dummy);
4550 EXPECT_HR(hr, E_INVALIDARG);
4552 hr = IXMLHttpRequest_setRequestHeader(xhr, NULL, NULL);
4553 EXPECT_HR(hr, E_INVALIDARG);
4555 hr = IXMLHttpRequest_setRequestHeader(xhr, _bstr_("header1"), NULL);
4556 ok(hr == E_FAIL || broken(hr == E_UNEXPECTED) /* win2k */, "got 0x%08x\n", hr);
4558 hr = IXMLHttpRequest_setRequestHeader(xhr, NULL, _bstr_("value1"));
4559 EXPECT_HR(hr, E_INVALIDARG);
4561 hr = IXMLHttpRequest_setRequestHeader(xhr, _bstr_("header1"), _bstr_("value1"));
4562 ok(hr == E_FAIL || broken(hr == E_UNEXPECTED) /* win2k */, "got 0x%08x\n", hr);
4564 hr = IXMLHttpRequest_get_readyState(xhr, NULL);
4565 EXPECT_HR(hr, E_INVALIDARG);
4568 hr = IXMLHttpRequest_get_readyState(xhr, &state);
4569 EXPECT_HR(hr, S_OK);
4570 ok(state == READYSTATE_UNINITIALIZED, "got %d, expected READYSTATE_UNINITIALIZED\n", state);
4572 event = create_dispevent();
4574 EXPECT_REF(event, 1);
4575 hr = IXMLHttpRequest_put_onreadystatechange(xhr, event);
4576 EXPECT_HR(hr, S_OK);
4577 EXPECT_REF(event, 2);
4579 g_unexpectedcall = g_expectedcall = 0;
4581 hr = IXMLHttpRequest_open(xhr, _bstr_("POST"), url, async, dummy, dummy);
4582 EXPECT_HR(hr, S_OK);
4584 ok(g_unexpectedcall == 0, "unexpected disp event call\n");
4585 ok(g_expectedcall == 1 || broken(g_expectedcall == 0) /* win2k */, "no expected disp event call\n");
4587 /* status code after ::open() */
4588 status = 0xdeadbeef;
4589 hr = IXMLHttpRequest_get_status(xhr, &status);
4590 ok(hr == E_FAIL || broken(hr == E_UNEXPECTED) /* win2k */, "got 0x%08x\n", hr);
4591 ok(status == 0xdeadbeef, "got %d\n", status);
4594 hr = IXMLHttpRequest_get_readyState(xhr, &state);
4595 EXPECT_HR(hr, S_OK);
4596 ok(state == READYSTATE_LOADING, "got %d, expected READYSTATE_LOADING\n", state);
4598 hr = IXMLHttpRequest_abort(xhr);
4599 EXPECT_HR(hr, S_OK);
4602 hr = IXMLHttpRequest_get_readyState(xhr, &state);
4603 EXPECT_HR(hr, S_OK);
4604 ok(state == READYSTATE_UNINITIALIZED || broken(state == READYSTATE_LOADING) /* win2k */,
4605 "got %d, expected READYSTATE_UNINITIALIZED\n", state);
4607 hr = IXMLHttpRequest_open(xhr, _bstr_("POST"), url, async, dummy, dummy);
4608 EXPECT_HR(hr, S_OK);
4610 hr = IXMLHttpRequest_setRequestHeader(xhr, _bstr_("header1"), _bstr_("value1"));
4611 EXPECT_HR(hr, S_OK);
4613 hr = IXMLHttpRequest_setRequestHeader(xhr, NULL, _bstr_("value1"));
4614 EXPECT_HR(hr, E_INVALIDARG);
4616 hr = IXMLHttpRequest_setRequestHeader(xhr, _bstr_(""), _bstr_("value1"));
4617 EXPECT_HR(hr, E_INVALIDARG);
4621 hr = IXMLHttpRequest_send(xhr, varbody);
4622 if (hr == INET_E_RESOURCE_NOT_FOUND)
4624 skip("No connection could be made with crossover.codeweavers.com\n");
4625 IXMLHttpRequest_Release(xhr);
4628 EXPECT_HR(hr, S_OK);
4630 /* status code after ::send() */
4631 status = 0xdeadbeef;
4632 hr = IXMLHttpRequest_get_status(xhr, &status);
4633 EXPECT_HR(hr, S_OK);
4634 ok(status == 200, "got %d\n", status);
4636 /* another ::send() after completed request */
4637 hr = IXMLHttpRequest_send(xhr, varbody);
4638 ok(hr == E_FAIL || broken(hr == E_UNEXPECTED) /* win2k */, "got 0x%08x\n", hr);
4640 VariantClear(&varbody);
4642 hr = IXMLHttpRequest_get_responseText(xhr, &bstrResponse);
4643 EXPECT_HR(hr, S_OK);
4644 /* the server currently returns "FAILED" because the Content-Type header is
4645 * not what the server expects */
4648 ok(!memcmp(bstrResponse, wszExpectedResponse, sizeof(wszExpectedResponse)),
4649 "expected %s, got %s\n", wine_dbgstr_w(wszExpectedResponse), wine_dbgstr_w(bstrResponse));
4650 SysFreeString(bstrResponse);
4654 url = SysAllocString(xmltestW);
4656 hr = IXMLHttpRequest_open(xhr, _bstr_("GET"), url, async, dummy, dummy);
4657 EXPECT_HR(hr, S_OK);
4659 V_VT(&varbody) = VT_EMPTY;
4661 hr = IXMLHttpRequest_send(xhr, varbody);
4662 if (hr == INET_E_RESOURCE_NOT_FOUND)
4664 skip("No connection could be made with crossover.codeweavers.com\n");
4665 IXMLHttpRequest_Release(xhr);
4668 EXPECT_HR(hr, S_OK);
4670 hr = IXMLHttpRequest_get_responseText(xhr, NULL);
4671 EXPECT_HR(hr, E_INVALIDARG);
4673 hr = IXMLHttpRequest_get_responseText(xhr, &bstrResponse);
4674 EXPECT_HR(hr, S_OK);
4675 ok(!memcmp(bstrResponse, _bstr_(xmltestbodyA), sizeof(xmltestbodyA)*sizeof(WCHAR)),
4676 "expected %s, got %s\n", xmltestbodyA, wine_dbgstr_w(bstrResponse));
4677 SysFreeString(bstrResponse);
4679 hr = IXMLHttpRequest_get_responseBody(xhr, NULL);
4680 EXPECT_HR(hr, E_INVALIDARG);
4682 V_VT(&varbody) = VT_EMPTY;
4683 hr = IXMLHttpRequest_get_responseBody(xhr, &varbody);
4684 EXPECT_HR(hr, S_OK);
4685 ok(V_VT(&varbody) == (VT_ARRAY|VT_UI1), "got type %d, expected %d\n", V_VT(&varbody), VT_ARRAY|VT_UI1);
4686 ok(SafeArrayGetDim(V_ARRAY(&varbody)) == 1, "got %d, expected one dimension\n", SafeArrayGetDim(V_ARRAY(&varbody)));
4689 hr = SafeArrayGetLBound(V_ARRAY(&varbody), 1, &bound);
4690 EXPECT_HR(hr, S_OK);
4691 ok(bound == 0, "got %d, expected zero bound\n", bound);
4693 hr = SafeArrayAccessData(V_ARRAY(&varbody), &ptr);
4694 EXPECT_HR(hr, S_OK);
4695 ok(memcmp(ptr, xmltestbodyA, sizeof(xmltestbodyA)-1) == 0, "got wrong body data\n");
4696 SafeArrayUnaccessData(V_ARRAY(&varbody));
4698 VariantClear(&varbody);
4702 hr = IXMLHttpRequest_QueryInterface(xhr, &IID_IObjectSafety, (void**)&safety);
4703 EXPECT_HR(hr, S_OK);
4706 test_IObjectSafety_common(safety);
4707 IObjectSafety_Release(safety);
4710 IDispatch_Release(event);
4712 /* interaction with object site */
4714 hr = IXMLHttpRequest_QueryInterface(xhr, &IID_IObjectWithSite, (void**)&obj_site);
4715 EXPECT_HR(hr, S_OK);
4718 EXPECT_REF(obj_site, 1);
4721 IObjectWithSite_AddRef(obj_site);
4723 EXPECT_REF(obj_site, 2);
4726 IObjectWithSite_Release(obj_site);
4728 hr = IXMLHttpRequest_QueryInterface(xhr, &IID_IObjectWithSite, (void**)&obj_site2);
4729 EXPECT_HR(hr, S_OK);
4732 EXPECT_REF(obj_site, 1);
4733 EXPECT_REF(obj_site2, 1);
4734 ok(obj_site != obj_site2, "expected new instance\n");
4736 SET_EXPECT(site_qi_IServiceProvider);
4737 SET_EXPECT(sp_queryservice_SID_SBindHost);
4738 SET_EXPECT(sp_queryservice_SID_SContainerDispatch_htmldoc2);
4739 SET_EXPECT(sp_queryservice_SID_secmgr_htmldoc2);
4740 SET_EXPECT(sp_queryservice_SID_secmgr_xmldomdoc);
4741 SET_EXPECT(sp_queryservice_SID_secmgr_secmgr);
4743 /* calls to IHTMLDocument2 */
4744 SET_EXPECT(htmldoc2_get_all);
4745 SET_EXPECT(collection_get_length);
4746 SET_EXPECT(htmldoc2_get_url);
4748 SET_EXPECT(site_qi_IXMLDOMDocument);
4749 SET_EXPECT(site_qi_IOleClientSite);
4751 hr = IObjectWithSite_SetSite(obj_site, &testsite.IUnknown_iface);
4752 EXPECT_HR(hr, S_OK);
4755 CHECK_CALLED(site_qi_IServiceProvider);
4757 CHECK_CALLED(sp_queryservice_SID_SBindHost);
4758 CHECK_CALLED(sp_queryservice_SID_SContainerDispatch_htmldoc2);
4759 CHECK_CALLED(sp_queryservice_SID_secmgr_htmldoc2);
4760 CHECK_CALLED(sp_queryservice_SID_secmgr_xmldomdoc);
4761 /* this one isn't very reliable
4762 CHECK_CALLED(sp_queryservice_SID_secmgr_secmgr); */
4764 CHECK_CALLED(htmldoc2_get_all);
4765 CHECK_CALLED(collection_get_length);
4766 CHECK_CALLED(htmldoc2_get_url);
4768 CHECK_CALLED(site_qi_IXMLDOMDocument);
4769 CHECK_CALLED(site_qi_IOleClientSite);
4771 IObjectWithSite_Release(obj_site);
4773 todo_wine EXPECT_REF(xhr, 1);
4774 IXMLHttpRequest_Release(xhr);
4776 /* still works after request is released */
4777 SET_EXPECT(site_qi_IServiceProvider);
4779 hr = IObjectWithSite_SetSite(obj_site2, &testsite.IUnknown_iface);
4780 EXPECT_HR(hr, S_OK);
4781 IObjectWithSite_Release(obj_site2);
4786 static void test_IXMLDOMDocument2(void)
4788 static const WCHAR emptyW[] = {0};
4789 IXMLDOMDocument2 *doc2, *dtddoc2;
4790 IXMLDOMDocument *doc;
4791 IXMLDOMParseError* err;
4792 IDispatchEx *dispex;
4799 doc = create_document(&IID_IXMLDOMDocument);
4802 dtddoc2 = create_document(&IID_IXMLDOMDocument2);
4805 IXMLDOMDocument_Release(doc);
4809 r = IXMLDOMDocument_QueryInterface( doc, &IID_IXMLDOMDocument2, (void**)&doc2 );
4810 ok( r == S_OK, "ret %08x\n", r );
4811 ok( doc == (IXMLDOMDocument*)doc2, "interfaces differ\n");
4813 ole_expect(IXMLDOMDocument2_get_readyState(doc2, NULL), E_INVALIDARG);
4814 ole_check(IXMLDOMDocument2_get_readyState(doc2, &res));
4815 ok(res == READYSTATE_COMPLETE, "expected READYSTATE_COMPLETE (4), got %i\n", res);
4818 ole_expect(IXMLDOMDocument2_validate(doc2, NULL), S_FALSE);
4819 ole_expect(IXMLDOMDocument2_validate(doc2, &err), S_FALSE);
4820 ok(err != NULL, "expected a pointer\n");
4824 ole_check(IXMLDOMParseError_get_errorCode(err, &res));
4826 ok(res == E_XML_NOTWF, "got %08x\n", res);
4827 IXMLDOMParseError_Release(err);
4830 str = SysAllocString( szComplete4 );
4831 r = IXMLDOMDocument_loadXML( doc2, str, &b );
4832 ok( r == S_OK, "loadXML failed\n");
4833 ok( b == VARIANT_TRUE, "failed to load XML string\n");
4834 SysFreeString( str );
4836 ole_check(IXMLDOMDocument2_get_readyState(doc, &res));
4837 ok(res == READYSTATE_COMPLETE, "expected READYSTATE_COMPLETE (4), got %i\n", res);
4840 ole_expect(IXMLDOMDocument2_validate(doc2, &err), S_FALSE);
4841 ok(err != NULL, "expected a pointer\n");
4845 ole_check(IXMLDOMParseError_get_errorCode(err, &res));
4847 ok(res == E_XML_NODTD, "got %08x\n", res);
4848 IXMLDOMParseError_Release(err);
4851 r = IXMLDOMDocument_QueryInterface( doc, &IID_IDispatchEx, (void**)&dispex );
4852 ok( r == S_OK, "ret %08x\n", r );
4855 IDispatchEx_Release(dispex);
4858 /* we will check if the variant got cleared */
4859 IXMLDOMDocument2_AddRef(doc2);
4860 EXPECT_REF(doc2, 3); /* doc, doc2, AddRef*/
4862 V_VT(&var) = VT_UNKNOWN;
4863 V_UNKNOWN(&var) = (IUnknown *)doc2;
4866 ole_expect(IXMLDOMDocument2_getProperty(doc2, _bstr_("askldhfaklsdf"), &var), E_FAIL);
4867 expect_eq(V_VT(&var), VT_UNKNOWN, int, "%x");
4868 ole_expect(IXMLDOMDocument2_getProperty(doc2, _bstr_("SelectionLanguage"), NULL), E_INVALIDARG);
4871 ole_check(IXMLDOMDocument2_getProperty(doc2, _bstr_("SelectionLanguage"), &var));
4872 expect_eq(V_VT(&var), VT_BSTR, int, "%x");
4873 expect_bstr_eq_and_free(V_BSTR(&var), "XSLPattern");
4876 /* the variant didn't get cleared*/
4877 expect_eq(IXMLDOMDocument2_Release(doc2), 2, int, "%d");
4879 /* setProperty tests */
4880 ole_expect(IXMLDOMDocument2_setProperty(doc2, _bstr_("askldhfaklsdf"), var), E_FAIL);
4881 ole_expect(IXMLDOMDocument2_setProperty(doc2, _bstr_("SelectionLanguage"), var), E_FAIL);
4882 ole_expect(IXMLDOMDocument2_setProperty(doc2, _bstr_("SelectionLanguage"), _variantbstr_("alskjdh faklsjd hfk")), E_FAIL);
4883 ole_check(IXMLDOMDocument2_setProperty(doc2, _bstr_("SelectionLanguage"), _variantbstr_("XSLPattern")));
4884 ole_check(IXMLDOMDocument2_setProperty(doc2, _bstr_("SelectionLanguage"), _variantbstr_("XPath")));
4885 ole_check(IXMLDOMDocument2_setProperty(doc2, _bstr_("SelectionLanguage"), _variantbstr_("XSLPattern")));
4887 V_VT(&var) = VT_BSTR;
4888 V_BSTR(&var) = SysAllocString(emptyW);
4889 r = IXMLDOMDocument2_setProperty(doc2, _bstr_("SelectionNamespaces"), var);
4890 ok(r == S_OK, "got 0x%08x\n", r);
4895 r = IXMLDOMDocument2_setProperty(doc2, _bstr_("SelectionNamespaces"), var);
4896 ok(r == E_FAIL, "got 0x%08x\n", r);
4898 /* contrary to what MSDN claims you can switch back from XPath to XSLPattern */
4899 ole_check(IXMLDOMDocument2_getProperty(doc2, _bstr_("SelectionLanguage"), &var));
4900 expect_eq(V_VT(&var), VT_BSTR, int, "%x");
4901 expect_bstr_eq_and_free(V_BSTR(&var), "XSLPattern");
4903 IXMLDOMDocument2_Release( doc2 );
4904 IXMLDOMDocument_Release( doc );
4906 /* DTD validation */
4907 ole_check(IXMLDOMDocument2_put_validateOnParse(dtddoc2, VARIANT_FALSE));
4908 ole_check(IXMLDOMDocument2_loadXML(dtddoc2, _bstr_(szEmailXML), &b));
4909 ok( b == VARIANT_TRUE, "failed to load XML string\n");
4911 ole_check(IXMLDOMDocument2_validate(dtddoc2, &err));
4912 ok(err != NULL, "expected pointer\n");
4916 ole_expect(IXMLDOMParseError_get_errorCode(err, &res), S_FALSE);
4917 ok(res == 0, "got %08x\n", res);
4918 IXMLDOMParseError_Release(err);
4921 ole_check(IXMLDOMDocument2_loadXML(dtddoc2, _bstr_(szEmailXML_0D), &b));
4922 ok( b == VARIANT_TRUE, "failed to load XML string\n");
4924 ole_expect(IXMLDOMDocument2_validate(dtddoc2, &err), S_FALSE);
4925 ok(err != NULL, "expected pointer\n");
4929 ole_check(IXMLDOMParseError_get_errorCode(err, &res));
4930 /* XML_ELEMENT_UNDECLARED */
4931 todo_wine ok(res == 0xC00CE00D, "got %08x\n", res);
4932 IXMLDOMParseError_Release(err);
4935 ole_check(IXMLDOMDocument2_loadXML(dtddoc2, _bstr_(szEmailXML_0E), &b));
4936 ok( b == VARIANT_TRUE, "failed to load XML string\n");
4938 ole_expect(IXMLDOMDocument2_validate(dtddoc2, &err), S_FALSE);
4939 ok(err != NULL, "expected pointer\n");
4943 ole_check(IXMLDOMParseError_get_errorCode(err, &res));
4944 /* XML_ELEMENT_ID_NOT_FOUND */
4945 todo_wine ok(res == 0xC00CE00E, "got %08x\n", res);
4946 IXMLDOMParseError_Release(err);
4949 ole_check(IXMLDOMDocument2_loadXML(dtddoc2, _bstr_(szEmailXML_11), &b));
4950 ok( b == VARIANT_TRUE, "failed to load XML string\n");
4952 ole_expect(IXMLDOMDocument2_validate(dtddoc2, &err), S_FALSE);
4953 ok(err != NULL, "expected pointer\n");
4957 ole_check(IXMLDOMParseError_get_errorCode(err, &res));
4958 /* XML_EMPTY_NOT_ALLOWED */
4959 todo_wine ok(res == 0xC00CE011, "got %08x\n", res);
4960 IXMLDOMParseError_Release(err);
4963 ole_check(IXMLDOMDocument2_loadXML(dtddoc2, _bstr_(szEmailXML_13), &b));
4964 ok( b == VARIANT_TRUE, "failed to load XML string\n");
4966 ole_expect(IXMLDOMDocument2_validate(dtddoc2, &err), S_FALSE);
4967 ok(err != NULL, "expected pointer\n");
4971 ole_check(IXMLDOMParseError_get_errorCode(err, &res));
4972 /* XML_ROOT_NAME_MISMATCH */
4973 todo_wine ok(res == 0xC00CE013, "got %08x\n", res);
4974 IXMLDOMParseError_Release(err);
4977 ole_check(IXMLDOMDocument2_loadXML(dtddoc2, _bstr_(szEmailXML_14), &b));
4978 ok( b == VARIANT_TRUE, "failed to load XML string\n");
4980 ole_expect(IXMLDOMDocument2_validate(dtddoc2, &err), S_FALSE);
4981 ok(err != NULL, "expected pointer\n");
4985 ole_check(IXMLDOMParseError_get_errorCode(err, &res));
4986 /* XML_INVALID_CONTENT */
4987 todo_wine ok(res == 0xC00CE014, "got %08x\n", res);
4988 IXMLDOMParseError_Release(err);
4991 ole_check(IXMLDOMDocument2_loadXML(dtddoc2, _bstr_(szEmailXML_15), &b));
4992 ok( b == VARIANT_TRUE, "failed to load XML string\n");
4994 ole_expect(IXMLDOMDocument2_validate(dtddoc2, &err), S_FALSE);
4995 ok(err != NULL, "expected pointer\n");
4999 ole_check(IXMLDOMParseError_get_errorCode(err, &res));
5000 /* XML_ATTRIBUTE_NOT_DEFINED */
5001 todo_wine ok(res == 0xC00CE015, "got %08x\n", res);
5002 IXMLDOMParseError_Release(err);
5005 ole_check(IXMLDOMDocument2_loadXML(dtddoc2, _bstr_(szEmailXML_16), &b));
5006 ok( b == VARIANT_TRUE, "failed to load XML string\n");
5008 ole_expect(IXMLDOMDocument2_validate(dtddoc2, &err), S_FALSE);
5009 ok(err != NULL, "expected pointer\n");
5013 ole_check(IXMLDOMParseError_get_errorCode(err, &res));
5014 /* XML_ATTRIBUTE_FIXED */
5015 todo_wine ok(res == 0xC00CE016, "got %08x\n", res);
5016 IXMLDOMParseError_Release(err);
5019 ole_check(IXMLDOMDocument2_loadXML(dtddoc2, _bstr_(szEmailXML_17), &b));
5020 ok( b == VARIANT_TRUE, "failed to load XML string\n");
5022 ole_expect(IXMLDOMDocument2_validate(dtddoc2, &err), S_FALSE);
5023 ok(err != NULL, "expected pointer\n");
5027 ole_check(IXMLDOMParseError_get_errorCode(err, &res));
5028 /* XML_ATTRIBUTE_VALUE */
5029 todo_wine ok(res == 0xC00CE017, "got %08x\n", res);
5030 IXMLDOMParseError_Release(err);
5033 ole_check(IXMLDOMDocument2_loadXML(dtddoc2, _bstr_(szEmailXML_18), &b));
5034 ok( b == VARIANT_TRUE, "failed to load XML string\n");
5036 ole_expect(IXMLDOMDocument2_validate(dtddoc2, &err), S_FALSE);
5037 ok(err != NULL, "expected pointer\n");
5041 ole_check(IXMLDOMParseError_get_errorCode(err, &res));
5042 /* XML_ILLEGAL_TEXT */
5043 todo_wine ok(res == 0xC00CE018, "got %08x\n", res);
5044 IXMLDOMParseError_Release(err);
5047 ole_check(IXMLDOMDocument2_loadXML(dtddoc2, _bstr_(szEmailXML_20), &b));
5048 ok( b == VARIANT_TRUE, "failed to load XML string\n");
5050 ole_expect(IXMLDOMDocument2_validate(dtddoc2, &err), S_FALSE);
5051 ok(err != NULL, "expected pointer\n");
5055 ole_check(IXMLDOMParseError_get_errorCode(err, &res));
5056 /* XML_REQUIRED_ATTRIBUTE_MISSING */
5057 todo_wine ok(res == 0xC00CE020, "got %08x\n", res);
5058 IXMLDOMParseError_Release(err);
5061 IXMLDOMDocument2_Release( dtddoc2 );
5065 #define helper_ole_check(expr) { \
5067 ok_(__FILE__, line)(r == S_OK, "=> %i: " #expr " returned %08x\n", __LINE__, r); \
5070 #define helper_expect_list_and_release(list, expstr) { \
5071 char *str = list_to_string(list); \
5072 ok_(__FILE__, line)(strcmp(str, expstr)==0, "=> %i: Invalid node list: %s, expected %s\n", __LINE__, str, expstr); \
5073 if (list) IXMLDOMNodeList_Release(list); \
5076 #define helper_expect_bstr_and_release(bstr, str) { \
5077 ok_(__FILE__, line)(lstrcmpW(bstr, _bstr_(str)) == 0, \
5078 "=> %i: got %s\n", __LINE__, wine_dbgstr_w(bstr)); \
5079 SysFreeString(bstr); \
5082 #define check_ws_ignored(doc, str) _check_ws_ignored(__LINE__, doc, str)
5083 static inline void _check_ws_ignored(int line, IXMLDOMDocument2* doc, char const* str)
5085 IXMLDOMNode *node1, *node2;
5086 IXMLDOMNodeList *list;
5089 helper_ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("//*[local-name()='html']"), &list));
5090 helper_ole_check(IXMLDOMNodeList_get_item(list, 0, &node1));
5091 helper_ole_check(IXMLDOMNodeList_get_item(list, 1, &node2));
5092 helper_ole_check(IXMLDOMNodeList_reset(list));
5093 helper_expect_list_and_release(list, "E1.E4.E1.E2.D1 E2.E4.E1.E2.D1");
5095 helper_ole_check(IXMLDOMNode_get_childNodes(node1, &list));
5096 helper_expect_list_and_release(list, "T1.E1.E4.E1.E2.D1 E2.E1.E4.E1.E2.D1 E3.E1.E4.E1.E2.D1 T4.E1.E4.E1.E2.D1 E5.E1.E4.E1.E2.D1");
5097 helper_ole_check(IXMLDOMNode_get_text(node1, &bstr));
5100 helper_expect_bstr_and_release(bstr, str);
5104 helper_expect_bstr_and_release(bstr, "This is a description.");
5106 IXMLDOMNode_Release(node1);
5108 helper_ole_check(IXMLDOMNode_get_childNodes(node2, &list));
5109 helper_expect_list_and_release(list, "T1.E2.E4.E1.E2.D1 E2.E2.E4.E1.E2.D1 T3.E2.E4.E1.E2.D1 E4.E2.E4.E1.E2.D1 T5.E2.E4.E1.E2.D1 E6.E2.E4.E1.E2.D1 T7.E2.E4.E1.E2.D1");
5110 helper_ole_check(IXMLDOMNode_get_text(node2, &bstr));
5111 helper_expect_bstr_and_release(bstr, "\n This is a description with preserved whitespace. \n ");
5112 IXMLDOMNode_Release(node2);
5115 #define check_ws_preserved(doc, str) _check_ws_preserved(__LINE__, doc, str)
5116 static inline void _check_ws_preserved(int line, IXMLDOMDocument2* doc, char const* str)
5118 IXMLDOMNode *node1, *node2;
5119 IXMLDOMNodeList *list;
5122 helper_ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("//*[local-name()='html']"), &list));
5123 helper_ole_check(IXMLDOMNodeList_get_item(list, 0, &node1));
5124 helper_ole_check(IXMLDOMNodeList_get_item(list, 1, &node2));
5125 helper_ole_check(IXMLDOMNodeList_reset(list));
5126 helper_expect_list_and_release(list, "E2.E8.E2.E2.D1 E4.E8.E2.E2.D1");
5128 helper_ole_check(IXMLDOMNode_get_childNodes(node1, &list));
5129 helper_expect_list_and_release(list, "T1.E2.E8.E2.E2.D1 E2.E2.E8.E2.E2.D1 T3.E2.E8.E2.E2.D1 E4.E2.E8.E2.E2.D1 T5.E2.E8.E2.E2.D1 E6.E2.E8.E2.E2.D1 T7.E2.E8.E2.E2.D1");
5130 helper_ole_check(IXMLDOMNode_get_text(node1, &bstr));
5133 helper_expect_bstr_and_release(bstr, str);
5137 helper_expect_bstr_and_release(bstr, "\n This is a description. \n ");
5139 IXMLDOMNode_Release(node1);
5141 helper_ole_check(IXMLDOMNode_get_childNodes(node2, &list));
5142 helper_expect_list_and_release(list, "T1.E4.E8.E2.E2.D1 E2.E4.E8.E2.E2.D1 T3.E4.E8.E2.E2.D1 E4.E4.E8.E2.E2.D1 T5.E4.E8.E2.E2.D1 E6.E4.E8.E2.E2.D1 T7.E4.E8.E2.E2.D1");
5143 helper_ole_check(IXMLDOMNode_get_text(node2, &bstr));
5144 helper_expect_bstr_and_release(bstr, "\n This is a description with preserved whitespace. \n ");
5145 IXMLDOMNode_Release(node2);
5148 static void test_whitespace(void)
5151 IXMLDOMDocument2 *doc1, *doc2, *doc3, *doc4;
5153 doc1 = create_document(&IID_IXMLDOMDocument2);
5154 doc2 = create_document(&IID_IXMLDOMDocument2);
5155 if (!doc1 || !doc2) return;
5157 ole_check(IXMLDOMDocument2_put_preserveWhiteSpace(doc2, VARIANT_TRUE));
5158 ole_check(IXMLDOMDocument2_get_preserveWhiteSpace(doc1, &b));
5159 ok(b == VARIANT_FALSE, "expected false\n");
5160 ole_check(IXMLDOMDocument2_get_preserveWhiteSpace(doc2, &b));
5161 ok(b == VARIANT_TRUE, "expected true\n");
5163 ole_check(IXMLDOMDocument2_loadXML(doc1, _bstr_(szExampleXML), &b));
5164 ok(b == VARIANT_TRUE, "failed to load XML string\n");
5165 ole_check(IXMLDOMDocument2_loadXML(doc2, _bstr_(szExampleXML), &b));
5166 ok(b == VARIANT_TRUE, "failed to load XML string\n");
5168 /* switch to XPath */
5169 ole_check(IXMLDOMDocument2_setProperty(doc1, _bstr_("SelectionLanguage"), _variantbstr_("XPath")));
5170 ole_check(IXMLDOMDocument2_setProperty(doc2, _bstr_("SelectionLanguage"), _variantbstr_("XPath")));
5172 check_ws_ignored(doc1, NULL);
5173 check_ws_preserved(doc2, NULL);
5175 /* new instances copy the property */
5176 ole_check(IXMLDOMDocument2_QueryInterface(doc1, &IID_IXMLDOMDocument2, (void**) &doc3));
5177 ole_check(IXMLDOMDocument2_QueryInterface(doc2, &IID_IXMLDOMDocument2, (void**) &doc4));
5179 ole_check(IXMLDOMDocument2_get_preserveWhiteSpace(doc3, &b));
5180 ok(b == VARIANT_FALSE, "expected false\n");
5181 ole_check(IXMLDOMDocument2_get_preserveWhiteSpace(doc4, &b));
5182 ok(b == VARIANT_TRUE, "expected true\n");
5184 check_ws_ignored(doc3, NULL);
5185 check_ws_preserved(doc4, NULL);
5187 /* setting after loading xml affects trimming of leading/trailing ws only */
5188 ole_check(IXMLDOMDocument2_put_preserveWhiteSpace(doc1, VARIANT_TRUE));
5189 ole_check(IXMLDOMDocument2_put_preserveWhiteSpace(doc2, VARIANT_FALSE));
5191 /* the trailing "\n " isn't there, because it was ws-only node */
5192 check_ws_ignored(doc1, "\n This is a description. ");
5193 check_ws_preserved(doc2, "This is a description.");
5195 /* it takes effect on reload */
5196 ole_check(IXMLDOMDocument2_get_preserveWhiteSpace(doc1, &b));
5197 ok(b == VARIANT_TRUE, "expected true\n");
5198 ole_check(IXMLDOMDocument2_get_preserveWhiteSpace(doc2, &b));
5199 ok(b == VARIANT_FALSE, "expected false\n");
5201 ole_check(IXMLDOMDocument2_loadXML(doc1, _bstr_(szExampleXML), &b));
5202 ok(b == VARIANT_TRUE, "failed to load XML string\n");
5203 ole_check(IXMLDOMDocument2_loadXML(doc2, _bstr_(szExampleXML), &b));
5204 ok(b == VARIANT_TRUE, "failed to load XML string\n");
5206 check_ws_preserved(doc1, NULL);
5207 check_ws_ignored(doc2, NULL);
5209 /* other instances follow suit */
5210 ole_check(IXMLDOMDocument2_get_preserveWhiteSpace(doc3, &b));
5211 ok(b == VARIANT_TRUE, "expected true\n");
5212 ole_check(IXMLDOMDocument2_get_preserveWhiteSpace(doc4, &b));
5213 ok(b == VARIANT_FALSE, "expected false\n");
5215 check_ws_preserved(doc3, NULL);
5216 check_ws_ignored(doc4, NULL);
5218 IXMLDOMDocument_Release(doc1);
5219 IXMLDOMDocument_Release(doc2);
5220 IXMLDOMDocument_Release(doc3);
5221 IXMLDOMDocument_Release(doc4);
5225 static void test_XPath(void)
5229 IXMLDOMDocument2 *doc;
5230 IXMLDOMDocument *doc2;
5231 IXMLDOMNode *rootNode;
5232 IXMLDOMNode *elem1Node;
5234 IXMLDOMNodeList *list;
5235 IXMLDOMElement *elem;
5236 IXMLDOMAttribute *attr;
5240 doc = create_document(&IID_IXMLDOMDocument2);
5243 ole_check(IXMLDOMDocument2_loadXML(doc, _bstr_(szExampleXML), &b));
5244 ok(b == VARIANT_TRUE, "failed to load XML string\n");
5246 /* switch to XPath */
5247 ole_check(IXMLDOMDocument2_setProperty(doc, _bstr_("SelectionLanguage"), _variantbstr_("XPath")));
5249 /* some simple queries*/
5251 hr = IXMLDOMDocument2_selectNodes(doc, _bstr_("root"), &list);
5252 EXPECT_HR(hr, S_OK);
5254 EXPECT_LIST_LEN(list, 1);
5256 EXPECT_REF(list, 1);
5257 hr = IXMLDOMNodeList_get_item(list, 0, &rootNode);
5258 EXPECT_HR(hr, S_OK);
5259 EXPECT_REF(list, 1);
5260 EXPECT_REF(rootNode, 1);
5262 hr = IXMLDOMNodeList_reset(list);
5263 EXPECT_HR(hr, S_OK);
5264 expect_list_and_release(list, "E2.D1");
5266 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("root//c"), &list));
5267 expect_list_and_release(list, "E3.E1.E2.D1 E3.E2.E2.D1");
5269 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("//c[@type]"), &list));
5270 expect_list_and_release(list, "E3.E2.E2.D1");
5272 ole_check(IXMLDOMNode_selectNodes(rootNode, _bstr_("elem"), &list));
5273 /* using get_item for query results advances the position */
5274 ole_check(IXMLDOMNodeList_get_item(list, 1, &node));
5275 expect_node(node, "E2.E2.D1");
5276 IXMLDOMNode_Release(node);
5277 ole_check(IXMLDOMNodeList_nextNode(list, &node));
5278 expect_node(node, "E4.E2.D1");
5279 IXMLDOMNode_Release(node);
5280 ole_check(IXMLDOMNodeList_reset(list));
5281 expect_list_and_release(list, "E1.E2.D1 E2.E2.D1 E4.E2.D1");
5283 ole_check(IXMLDOMNode_selectNodes(rootNode, _bstr_("."), &list));
5284 expect_list_and_release(list, "E2.D1");
5286 ole_check(IXMLDOMNode_selectNodes(rootNode, _bstr_("elem[3]/preceding-sibling::*"), &list));
5287 ole_check(IXMLDOMNodeList_get_item(list, 0, &elem1Node));
5288 ole_check(IXMLDOMNodeList_reset(list));
5289 expect_list_and_release(list, "E1.E2.D1 E2.E2.D1 E3.E2.D1");
5291 /* select an attribute */
5292 ole_check(IXMLDOMNode_selectNodes(rootNode, _bstr_(".//@type"), &list));
5293 expect_list_and_release(list, "A'type'.E3.E2.E2.D1");
5295 /* would evaluate to a number */
5296 ole_expect(IXMLDOMNode_selectNodes(rootNode, _bstr_("count(*)"), &list), E_FAIL);
5297 /* would evaluate to a boolean */
5298 ole_expect(IXMLDOMNode_selectNodes(rootNode, _bstr_("position()>0"), &list), E_FAIL);
5299 /* would evaluate to a string */
5300 ole_expect(IXMLDOMNode_selectNodes(rootNode, _bstr_("name()"), &list), E_FAIL);
5303 ole_check(IXMLDOMNode_selectNodes(rootNode, _bstr_("c"), &list));
5304 expect_list_and_release(list, "");
5305 ole_check(IXMLDOMDocument_selectNodes(doc, _bstr_("elem//c"), &list));
5306 expect_list_and_release(list, "");
5307 ole_check(IXMLDOMDocument_selectNodes(doc, _bstr_("//elem[4]"), &list));
5308 expect_list_and_release(list, "");
5309 ole_check(IXMLDOMDocument_selectNodes(doc, _bstr_("root//elem[0]"), &list));
5310 expect_list_and_release(list, "");
5312 /* foo undeclared in document node */
5313 ole_expect(IXMLDOMDocument2_selectNodes(doc, _bstr_("root//foo:c"), &list), E_FAIL);
5314 /* undeclared in <root> node */
5315 ole_expect(IXMLDOMNode_selectNodes(rootNode, _bstr_(".//foo:c"), &list), E_FAIL);
5316 /* undeclared in <elem> node */
5317 ole_expect(IXMLDOMNode_selectNodes(elem1Node, _bstr_("//foo:c"), &list), E_FAIL);
5318 /* but this trick can be used */
5319 ole_check(IXMLDOMNode_selectNodes(elem1Node, _bstr_("//*[name()='foo:c']"), &list));
5320 expect_list_and_release(list, "E3.E4.E2.D1");
5322 /* it has to be declared in SelectionNamespaces */
5323 ole_check(IXMLDOMDocument2_setProperty(doc, _bstr_("SelectionNamespaces"),
5324 _variantbstr_("xmlns:test='urn:uuid:86B2F87F-ACB6-45cd-8B77-9BDB92A01A29'")));
5326 /* now the namespace can be used */
5327 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("root//test:c"), &list));
5328 expect_list_and_release(list, "E3.E3.E2.D1 E3.E4.E2.D1");
5329 ole_check(IXMLDOMNode_selectNodes(rootNode, _bstr_(".//test:c"), &list));
5330 expect_list_and_release(list, "E3.E3.E2.D1 E3.E4.E2.D1");
5331 ole_check(IXMLDOMNode_selectNodes(elem1Node, _bstr_("//test:c"), &list));
5332 expect_list_and_release(list, "E3.E3.E2.D1 E3.E4.E2.D1");
5333 ole_check(IXMLDOMNode_selectNodes(elem1Node, _bstr_(".//test:x"), &list));
5334 expect_list_and_release(list, "E5.E1.E4.E1.E2.D1 E6.E2.E4.E1.E2.D1");
5336 /* SelectionNamespaces syntax error - the namespaces doesn't work anymore but the value is stored */
5337 ole_expect(IXMLDOMDocument2_setProperty(doc, _bstr_("SelectionNamespaces"),
5338 _variantbstr_("xmlns:test='urn:uuid:86B2F87F-ACB6-45cd-8B77-9BDB92A01A29' xmlns:foo=###")), E_FAIL);
5340 ole_expect(IXMLDOMDocument2_selectNodes(doc, _bstr_("root//foo:c"), &list), E_FAIL);
5343 ole_check(IXMLDOMDocument2_getProperty(doc, _bstr_("SelectionNamespaces"), &var));
5344 expect_eq(V_VT(&var), VT_BSTR, int, "%x");
5345 if (V_VT(&var) == VT_BSTR)
5346 expect_bstr_eq_and_free(V_BSTR(&var), "xmlns:test='urn:uuid:86B2F87F-ACB6-45cd-8B77-9BDB92A01A29' xmlns:foo=###");
5348 /* extra attributes - same thing*/
5349 ole_expect(IXMLDOMDocument2_setProperty(doc, _bstr_("SelectionNamespaces"),
5350 _variantbstr_("xmlns:test='urn:uuid:86B2F87F-ACB6-45cd-8B77-9BDB92A01A29' param='test'")), E_FAIL);
5351 ole_expect(IXMLDOMDocument_selectNodes(doc, _bstr_("root//foo:c"), &list), E_FAIL);
5353 IXMLDOMNode_Release(rootNode);
5354 IXMLDOMNode_Release(elem1Node);
5356 /* alter document with already built list */
5357 hr = IXMLDOMDocument2_selectNodes(doc, _bstr_("root"), &list);
5358 EXPECT_HR(hr, S_OK);
5359 EXPECT_LIST_LEN(list, 1);
5361 hr = IXMLDOMDocument2_get_lastChild(doc, &rootNode);
5362 EXPECT_HR(hr, S_OK);
5363 EXPECT_REF(rootNode, 1);
5366 hr = IXMLDOMDocument2_removeChild(doc, rootNode, NULL);
5367 EXPECT_HR(hr, S_OK);
5368 IXMLDOMNode_Release(rootNode);
5370 EXPECT_LIST_LEN(list, 1);
5372 hr = IXMLDOMNodeList_get_item(list, 0, &rootNode);
5373 EXPECT_HR(hr, S_OK);
5374 EXPECT_REF(rootNode, 1);
5376 IXMLDOMNodeList_Release(list);
5378 hr = IXMLDOMNode_get_nodeName(rootNode, &str);
5379 EXPECT_HR(hr, S_OK);
5380 ok(!lstrcmpW(str, _bstr_("root")), "got %s\n", wine_dbgstr_w(str));
5382 IXMLDOMNode_Release(rootNode);
5384 /* alter node from list and get it another time */
5385 hr = IXMLDOMDocument2_loadXML(doc, _bstr_(szExampleXML), &b);
5386 EXPECT_HR(hr, S_OK);
5387 ok(b == VARIANT_TRUE, "failed to load XML string\n");
5389 hr = IXMLDOMDocument2_selectNodes(doc, _bstr_("root"), &list);
5390 EXPECT_HR(hr, S_OK);
5391 EXPECT_LIST_LEN(list, 1);
5393 hr = IXMLDOMNodeList_get_item(list, 0, &rootNode);
5394 EXPECT_HR(hr, S_OK);
5396 hr = IXMLDOMNode_QueryInterface(rootNode, &IID_IXMLDOMElement, (void**)&elem);
5397 EXPECT_HR(hr, S_OK);
5401 hr = IXMLDOMElement_setAttribute(elem, _bstr_("attrtest"), var);
5402 EXPECT_HR(hr, S_OK);
5403 IXMLDOMElement_Release(elem);
5404 IXMLDOMNode_Release(rootNode);
5406 /* now check attribute to be present */
5407 hr = IXMLDOMNodeList_get_item(list, 0, &rootNode);
5408 EXPECT_HR(hr, S_OK);
5410 hr = IXMLDOMNode_QueryInterface(rootNode, &IID_IXMLDOMElement, (void**)&elem);
5411 EXPECT_HR(hr, S_OK);
5413 hr = IXMLDOMElement_getAttributeNode(elem, _bstr_("attrtest"), &attr);
5414 EXPECT_HR(hr, S_OK);
5415 IXMLDOMAttribute_Release(attr);
5417 IXMLDOMElement_Release(elem);
5418 IXMLDOMNode_Release(rootNode);
5420 /* and now check for attribute in original document */
5421 hr = IXMLDOMDocument_get_documentElement(doc, &elem);
5422 EXPECT_HR(hr, S_OK);
5424 hr = IXMLDOMElement_getAttributeNode(elem, _bstr_("attrtest"), &attr);
5425 EXPECT_HR(hr, S_OK);
5426 IXMLDOMAttribute_Release(attr);
5428 IXMLDOMElement_Release(elem);
5430 /* attach node from list to another document */
5431 doc2 = create_document(&IID_IXMLDOMDocument);
5433 hr = IXMLDOMDocument2_loadXML(doc, _bstr_(szExampleXML), &b);
5434 EXPECT_HR(hr, S_OK);
5435 ok(b == VARIANT_TRUE, "failed to load XML string\n");
5437 hr = IXMLDOMDocument2_selectNodes(doc, _bstr_("root"), &list);
5438 EXPECT_HR(hr, S_OK);
5439 EXPECT_LIST_LEN(list, 1);
5441 hr = IXMLDOMNodeList_get_item(list, 0, &rootNode);
5442 EXPECT_HR(hr, S_OK);
5443 EXPECT_REF(rootNode, 1);
5445 hr = IXMLDOMDocument_appendChild(doc2, rootNode, NULL);
5446 EXPECT_HR(hr, S_OK);
5447 EXPECT_REF(rootNode, 1);
5448 EXPECT_REF(doc2, 1);
5449 EXPECT_REF(list, 1);
5451 EXPECT_LIST_LEN(list, 1);
5453 IXMLDOMNode_Release(rootNode);
5454 IXMLDOMNodeList_Release(list);
5455 IXMLDOMDocument_Release(doc2);
5457 IXMLDOMDocument2_Release(doc);
5461 static void test_cloneNode(void )
5463 IXMLDOMDocument *doc, *doc2;
5465 IXMLDOMNodeList *pList;
5466 IXMLDOMNamedNodeMap *mapAttr;
5467 LONG length, length1;
5468 LONG attr_cnt, attr_cnt1;
5470 IXMLDOMNode *node_clone;
5471 IXMLDOMNode *node_first;
5475 doc = create_document(&IID_IXMLDOMDocument);
5478 str = SysAllocString( szComplete4 );
5479 ole_check(IXMLDOMDocument_loadXML(doc, str, &b));
5480 ok(b == VARIANT_TRUE, "failed to load XML string\n");
5483 hr = IXMLDOMNode_selectSingleNode(doc, _bstr_("lc/pr"), &node);
5484 ok( hr == S_OK, "ret %08x\n", hr );
5485 ok( node != NULL, "node %p\n", node );
5487 /* Check invalid parameter */
5488 hr = IXMLDOMNode_cloneNode(node, VARIANT_TRUE, NULL);
5489 ok( hr == E_INVALIDARG, "ret %08x\n", hr );
5492 hr = IXMLDOMNode_cloneNode(node, VARIANT_TRUE, &node_clone);
5493 ok( hr == S_OK, "ret %08x\n", hr );
5494 ok( node_clone != NULL, "node %p\n", node );
5496 hr = IXMLDOMNode_get_firstChild(node_clone, &node_first);
5497 ok( hr == S_OK, "ret %08x\n", hr );
5498 hr = IXMLDOMNode_get_ownerDocument(node_clone, &doc2);
5499 ok( hr == S_OK, "ret %08x\n", hr );
5500 IXMLDOMDocument_Release(doc2);
5501 IXMLDOMNode_Release(node_first);
5503 hr = IXMLDOMNode_get_childNodes(node, &pList);
5504 ok( hr == S_OK, "ret %08x\n", hr );
5506 hr = IXMLDOMNodeList_get_length(pList, &length);
5507 ok( hr == S_OK, "ret %08x\n", hr );
5508 ok(length == 1, "got %d\n", length);
5509 IXMLDOMNodeList_Release(pList);
5511 hr = IXMLDOMNode_get_attributes(node, &mapAttr);
5512 ok( hr == S_OK, "ret %08x\n", hr );
5514 hr = IXMLDOMNamedNodeMap_get_length(mapAttr, &attr_cnt);
5515 ok( hr == S_OK, "ret %08x\n", hr );
5516 ok(attr_cnt == 3, "got %d\n", attr_cnt);
5517 IXMLDOMNamedNodeMap_Release(mapAttr);
5519 hr = IXMLDOMNode_get_childNodes(node_clone, &pList);
5520 ok( hr == S_OK, "ret %08x\n", hr );
5522 hr = IXMLDOMNodeList_get_length(pList, &length1);
5523 ok(length1 == 1, "got %d\n", length1);
5524 ok( hr == S_OK, "ret %08x\n", hr );
5525 IXMLDOMNodeList_Release(pList);
5527 hr = IXMLDOMNode_get_attributes(node_clone, &mapAttr);
5528 ok( hr == S_OK, "ret %08x\n", hr );
5530 hr = IXMLDOMNamedNodeMap_get_length(mapAttr, &attr_cnt1);
5531 ok( hr == S_OK, "ret %08x\n", hr );
5532 ok(attr_cnt1 == 3, "got %d\n", attr_cnt1);
5533 IXMLDOMNamedNodeMap_Release(mapAttr);
5535 ok(length == length1, "wrong Child count (%d, %d)\n", length, length1);
5536 ok(attr_cnt == attr_cnt1, "wrong Attribute count (%d, %d)\n", attr_cnt, attr_cnt1);
5537 IXMLDOMNode_Release(node_clone);
5540 hr = IXMLDOMNode_cloneNode(node, VARIANT_FALSE, &node_clone);
5541 ok( hr == S_OK, "ret %08x\n", hr );
5542 ok( node_clone != NULL, "node %p\n", node );
5544 hr = IXMLDOMNode_get_firstChild(node_clone, &node_first);
5545 ok(hr == S_FALSE, "ret %08x\n", hr );
5547 hr = IXMLDOMNode_get_childNodes(node_clone, &pList);
5548 ok(hr == S_OK, "ret %08x\n", hr );
5549 hr = IXMLDOMNodeList_get_length(pList, &length1);
5550 ok(hr == S_OK, "ret %08x\n", hr );
5551 ok( length1 == 0, "Length should be 0 (%d)\n", length1);
5552 IXMLDOMNodeList_Release(pList);
5554 hr = IXMLDOMNode_get_attributes(node_clone, &mapAttr);
5555 ok(hr == S_OK, "ret %08x\n", hr );
5556 hr = IXMLDOMNamedNodeMap_get_length(mapAttr, &attr_cnt1);
5557 ok(hr == S_OK, "ret %08x\n", hr );
5558 ok(attr_cnt1 == 3, "Attribute count should be 3 (%d)\n", attr_cnt1);
5559 IXMLDOMNamedNodeMap_Release(mapAttr);
5561 ok(length != length1, "wrong Child count (%d, %d)\n", length, length1);
5562 ok(attr_cnt == attr_cnt1, "wrong Attribute count (%d, %d)\n", attr_cnt, attr_cnt1);
5563 IXMLDOMNode_Release(node_clone);
5565 IXMLDOMNode_Release(node);
5566 IXMLDOMDocument_Release(doc);
5570 static void test_xmlTypes(void)
5572 IXMLDOMDocument *doc;
5573 IXMLDOMElement *pRoot;
5575 IXMLDOMComment *pComment;
5576 IXMLDOMElement *pElement;
5577 IXMLDOMAttribute *pAttribute;
5578 IXMLDOMNamedNodeMap *pAttribs;
5579 IXMLDOMCDATASection *pCDataSec;
5580 IXMLDOMImplementation *pIXMLDOMImplementation = NULL;
5581 IXMLDOMDocumentFragment *pDocFrag = NULL;
5582 IXMLDOMEntityReference *pEntityRef = NULL;
5584 IXMLDOMNode *pNextChild;
5588 doc = create_document(&IID_IXMLDOMDocument);
5591 pNextChild = (void*)0xdeadbeef;
5592 hr = IXMLDOMDocument_get_nextSibling(doc, NULL);
5593 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
5595 pNextChild = (void*)0xdeadbeef;
5596 hr = IXMLDOMDocument_get_nextSibling(doc, &pNextChild);
5597 ok(hr == S_FALSE, "ret %08x\n", hr );
5598 ok(pNextChild == NULL, "pDocChild not NULL\n");
5600 /* test previous Sibling */
5601 hr = IXMLDOMDocument_get_previousSibling(doc, NULL);
5602 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
5604 pNextChild = (void*)0xdeadbeef;
5605 hr = IXMLDOMDocument_get_previousSibling(doc, &pNextChild);
5606 ok(hr == S_FALSE, "ret %08x\n", hr );
5607 ok(pNextChild == NULL, "pNextChild not NULL\n");
5609 /* test get_dataType */
5610 V_VT(&v) = VT_EMPTY;
5611 hr = IXMLDOMDocument_get_dataType(doc, &v);
5612 ok(hr == S_FALSE, "ret %08x\n", hr );
5613 ok( V_VT(&v) == VT_NULL, "incorrect dataType type\n");
5616 /* test implementation */
5617 hr = IXMLDOMDocument_get_implementation(doc, NULL);
5618 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
5620 hr = IXMLDOMDocument_get_implementation(doc, &pIXMLDOMImplementation);
5621 ok(hr == S_OK, "ret %08x\n", hr );
5624 VARIANT_BOOL hasFeature = VARIANT_TRUE;
5625 BSTR sEmpty = SysAllocStringLen(NULL, 0);
5627 hr = IXMLDOMImplementation_hasFeature(pIXMLDOMImplementation, NULL, sEmpty, &hasFeature);
5628 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
5630 hr = IXMLDOMImplementation_hasFeature(pIXMLDOMImplementation, sEmpty, sEmpty, NULL);
5631 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
5633 hr = IXMLDOMImplementation_hasFeature(pIXMLDOMImplementation, _bstr_("DOM"), sEmpty, &hasFeature);
5634 ok(hr == S_OK, "ret %08x\n", hr );
5635 ok(hasFeature == VARIANT_FALSE, "hasFeature returned false\n");
5637 hr = IXMLDOMImplementation_hasFeature(pIXMLDOMImplementation, sEmpty, sEmpty, &hasFeature);
5638 ok(hr == S_OK, "ret %08x\n", hr );
5639 ok(hasFeature == VARIANT_FALSE, "hasFeature returned true\n");
5641 hr = IXMLDOMImplementation_hasFeature(pIXMLDOMImplementation, _bstr_("DOM"), NULL, &hasFeature);
5642 ok(hr == S_OK, "ret %08x\n", hr );
5643 ok(hasFeature == VARIANT_TRUE, "hasFeature returned false\n");
5645 hr = IXMLDOMImplementation_hasFeature(pIXMLDOMImplementation, _bstr_("DOM"), sEmpty, &hasFeature);
5646 ok(hr == S_OK, "ret %08x\n", hr );
5647 ok(hasFeature == VARIANT_FALSE, "hasFeature returned false\n");
5649 hr = IXMLDOMImplementation_hasFeature(pIXMLDOMImplementation, _bstr_("DOM"), _bstr_("1.0"), &hasFeature);
5650 ok(hr == S_OK, "ret %08x\n", hr );
5651 ok(hasFeature == VARIANT_TRUE, "hasFeature returned true\n");
5653 hr = IXMLDOMImplementation_hasFeature(pIXMLDOMImplementation, _bstr_("XML"), _bstr_("1.0"), &hasFeature);
5654 ok(hr == S_OK, "ret %08x\n", hr );
5655 ok(hasFeature == VARIANT_TRUE, "hasFeature returned true\n");
5657 hr = IXMLDOMImplementation_hasFeature(pIXMLDOMImplementation, _bstr_("MS-DOM"), _bstr_("1.0"), &hasFeature);
5658 ok(hr == S_OK, "ret %08x\n", hr );
5659 ok(hasFeature == VARIANT_TRUE, "hasFeature returned true\n");
5661 hr = IXMLDOMImplementation_hasFeature(pIXMLDOMImplementation, _bstr_("SSS"), NULL, &hasFeature);
5662 ok(hr == S_OK, "ret %08x\n", hr );
5663 ok(hasFeature == VARIANT_FALSE, "hasFeature returned false\n");
5665 SysFreeString(sEmpty);
5666 IXMLDOMImplementation_Release(pIXMLDOMImplementation);
5669 pRoot = (IXMLDOMElement*)0x1;
5670 hr = IXMLDOMDocument_createElement(doc, NULL, &pRoot);
5671 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
5672 ok(pRoot == (void*)0x1, "Expect same ptr, got %p\n", pRoot);
5674 pRoot = (IXMLDOMElement*)0x1;
5675 hr = IXMLDOMDocument_createElement(doc, _bstr_(""), &pRoot);
5676 ok(hr == E_FAIL, "ret %08x\n", hr );
5677 ok(pRoot == (void*)0x1, "Expect same ptr, got %p\n", pRoot);
5679 hr = IXMLDOMDocument_createElement(doc, _bstr_("Testing"), &pRoot);
5680 ok(hr == S_OK, "ret %08x\n", hr );
5683 hr = IXMLDOMDocument_appendChild(doc, (IXMLDOMNode*)pRoot, NULL);
5684 ok(hr == S_OK, "ret %08x\n", hr );
5688 str = SysAllocString(szComment);
5689 hr = IXMLDOMDocument_createComment(doc, str, &pComment);
5691 ok(hr == S_OK, "ret %08x\n", hr );
5694 hr = IXMLDOMElement_appendChild(pRoot, (IXMLDOMNode*)pComment, NULL);
5695 ok(hr == S_OK, "ret %08x\n", hr );
5697 hr = IXMLDOMComment_get_nodeName(pComment, &str);
5698 ok(hr == S_OK, "ret %08x\n", hr );
5699 ok( !lstrcmpW( str, szCommentNodeText ), "incorrect comment node Name\n");
5702 hr = IXMLDOMComment_get_xml(pComment, &str);
5703 ok(hr == S_OK, "ret %08x\n", hr );
5704 ok( !lstrcmpW( str, szCommentXML ), "incorrect comment xml\n");
5707 /* put data Tests */
5708 hr = IXMLDOMComment_put_data(pComment, _bstr_("This &is a ; test <>\\"));
5709 ok(hr == S_OK, "ret %08x\n", hr );
5711 /* get data Tests */
5712 hr = IXMLDOMComment_get_data(pComment, &str);
5713 ok(hr == S_OK, "ret %08x\n", hr );
5714 ok( !lstrcmpW( str, _bstr_("This &is a ; test <>\\") ), "incorrect get_data string\n");
5717 /* get data Tests */
5718 hr = IXMLDOMComment_get_nodeValue(pComment, &v);
5719 ok(hr == S_OK, "ret %08x\n", hr );
5720 ok( V_VT(&v) == VT_BSTR, "incorrect dataType type\n");
5721 ok( !lstrcmpW( V_BSTR(&v), _bstr_("This &is a ; test <>\\") ), "incorrect get_nodeValue string\n");
5724 /* Confirm XML text is good */
5725 hr = IXMLDOMComment_get_xml(pComment, &str);
5726 ok(hr == S_OK, "ret %08x\n", hr );
5727 ok( !lstrcmpW( str, _bstr_("<!--This &is a ; test <>\\-->") ), "incorrect xml string\n");
5730 /* Confirm we get the put_data Text back */
5731 hr = IXMLDOMComment_get_text(pComment, &str);
5732 ok(hr == S_OK, "ret %08x\n", hr );
5733 ok( !lstrcmpW( str, _bstr_("This &is a ; test <>\\") ), "incorrect xml string\n");
5736 /* test length property */
5737 hr = IXMLDOMComment_get_length(pComment, &len);
5738 ok(hr == S_OK, "ret %08x\n", hr );
5739 ok(len == 21, "expected 21 got %d\n", len);
5741 /* test substringData */
5742 hr = IXMLDOMComment_substringData(pComment, 0, 4, NULL);
5743 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
5745 /* test substringData - Invalid offset */
5746 str = (BSTR)&szElement;
5747 hr = IXMLDOMComment_substringData(pComment, -1, 4, &str);
5748 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
5749 ok( str == NULL, "incorrect string\n");
5751 /* test substringData - Invalid offset */
5752 str = (BSTR)&szElement;
5753 hr = IXMLDOMComment_substringData(pComment, 30, 0, &str);
5754 ok(hr == S_FALSE, "ret %08x\n", hr );
5755 ok( str == NULL, "incorrect string\n");
5757 /* test substringData - Invalid size */
5758 str = (BSTR)&szElement;
5759 hr = IXMLDOMComment_substringData(pComment, 0, -1, &str);
5760 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
5761 ok( str == NULL, "incorrect string\n");
5763 /* test substringData - Invalid size */
5764 str = (BSTR)&szElement;
5765 hr = IXMLDOMComment_substringData(pComment, 2, 0, &str);
5766 ok(hr == S_FALSE, "ret %08x\n", hr );
5767 ok( str == NULL, "incorrect string\n");
5769 /* test substringData - Start of string */
5770 hr = IXMLDOMComment_substringData(pComment, 0, 4, &str);
5771 ok(hr == S_OK, "ret %08x\n", hr );
5772 ok( !lstrcmpW( str, _bstr_("This") ), "incorrect substringData string\n");
5775 /* test substringData - Middle of string */
5776 hr = IXMLDOMComment_substringData(pComment, 13, 4, &str);
5777 ok(hr == S_OK, "ret %08x\n", hr );
5778 ok( !lstrcmpW( str, _bstr_("test") ), "incorrect substringData string\n");
5781 /* test substringData - End of string */
5782 hr = IXMLDOMComment_substringData(pComment, 20, 4, &str);
5783 ok(hr == S_OK, "ret %08x\n", hr );
5784 ok( !lstrcmpW( str, _bstr_("\\") ), "incorrect substringData string\n");
5787 /* test appendData */
5788 hr = IXMLDOMComment_appendData(pComment, NULL);
5789 ok(hr == S_OK, "ret %08x\n", hr );
5791 hr = IXMLDOMComment_appendData(pComment, _bstr_(""));
5792 ok(hr == S_OK, "ret %08x\n", hr );
5794 hr = IXMLDOMComment_appendData(pComment, _bstr_("Append"));
5795 ok(hr == S_OK, "ret %08x\n", hr );
5797 hr = IXMLDOMComment_get_text(pComment, &str);
5798 ok(hr == S_OK, "ret %08x\n", hr );
5799 ok( !lstrcmpW( str, _bstr_("This &is a ; test <>\\Append") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
5802 /* test insertData */
5803 str = SysAllocStringLen(NULL, 0);
5804 hr = IXMLDOMComment_insertData(pComment, -1, str);
5805 ok(hr == S_OK, "ret %08x\n", hr );
5807 hr = IXMLDOMComment_insertData(pComment, -1, NULL);
5808 ok(hr == S_OK, "ret %08x\n", hr );
5810 hr = IXMLDOMComment_insertData(pComment, 1000, str);
5811 ok(hr == S_OK, "ret %08x\n", hr );
5813 hr = IXMLDOMComment_insertData(pComment, 1000, NULL);
5814 ok(hr == S_OK, "ret %08x\n", hr );
5816 hr = IXMLDOMComment_insertData(pComment, 0, NULL);
5817 ok(hr == S_OK, "ret %08x\n", hr );
5819 hr = IXMLDOMComment_insertData(pComment, 0, str);
5820 ok(hr == S_OK, "ret %08x\n", hr );
5823 hr = IXMLDOMComment_insertData(pComment, -1, _bstr_("Inserting"));
5824 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
5826 hr = IXMLDOMComment_insertData(pComment, 1000, _bstr_("Inserting"));
5827 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
5829 hr = IXMLDOMComment_insertData(pComment, 0, _bstr_("Begin "));
5830 ok(hr == S_OK, "ret %08x\n", hr );
5832 hr = IXMLDOMComment_insertData(pComment, 17, _bstr_("Middle"));
5833 ok(hr == S_OK, "ret %08x\n", hr );
5835 hr = IXMLDOMComment_insertData(pComment, 39, _bstr_(" End"));
5836 ok(hr == S_OK, "ret %08x\n", hr );
5838 hr = IXMLDOMComment_get_text(pComment, &str);
5839 ok(hr == S_OK, "ret %08x\n", hr );
5840 ok( !lstrcmpW( str, _bstr_("Begin This &is a Middle; test <>\\Append End") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
5844 /* invalid arguments */
5845 hr = IXMLDOMComment_deleteData(pComment, -1, 1);
5846 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
5848 hr = IXMLDOMComment_deleteData(pComment, 0, 0);
5849 ok(hr == S_OK, "ret %08x\n", hr );
5851 hr = IXMLDOMComment_deleteData(pComment, 0, -1);
5852 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
5854 hr = IXMLDOMComment_get_length(pComment, &len);
5855 ok(hr == S_OK, "ret %08x\n", hr );
5856 ok(len == 43, "expected 43 got %d\n", len);
5858 hr = IXMLDOMComment_deleteData(pComment, len, 1);
5859 ok(hr == S_OK, "ret %08x\n", hr );
5861 hr = IXMLDOMComment_deleteData(pComment, len+1, 1);
5862 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
5864 /* delete from start */
5865 hr = IXMLDOMComment_deleteData(pComment, 0, 5);
5866 ok(hr == S_OK, "ret %08x\n", hr );
5868 hr = IXMLDOMComment_get_length(pComment, &len);
5869 ok(hr == S_OK, "ret %08x\n", hr );
5870 ok(len == 38, "expected 38 got %d\n", len);
5872 hr = IXMLDOMComment_get_text(pComment, &str);
5873 ok(hr == S_OK, "ret %08x\n", hr );
5874 ok( !lstrcmpW( str, _bstr_(" This &is a Middle; test <>\\Append End") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
5877 /* delete from end */
5878 hr = IXMLDOMComment_deleteData(pComment, 35, 3);
5879 ok(hr == S_OK, "ret %08x\n", hr );
5881 hr = IXMLDOMComment_get_length(pComment, &len);
5882 ok(hr == S_OK, "ret %08x\n", hr );
5883 ok(len == 35, "expected 35 got %d\n", len);
5885 hr = IXMLDOMComment_get_text(pComment, &str);
5886 ok(hr == S_OK, "ret %08x\n", hr );
5887 ok( !lstrcmpW( str, _bstr_(" This &is a Middle; test <>\\Append ") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
5890 /* delete from inside */
5891 hr = IXMLDOMComment_deleteData(pComment, 1, 33);
5892 ok(hr == S_OK, "ret %08x\n", hr );
5894 hr = IXMLDOMComment_get_length(pComment, &len);
5895 ok(hr == S_OK, "ret %08x\n", hr );
5896 ok(len == 2, "expected 2 got %d\n", len);
5898 hr = IXMLDOMComment_get_text(pComment, &str);
5899 ok(hr == S_OK, "ret %08x\n", hr );
5900 ok( !lstrcmpW( str, _bstr_(" ") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
5903 /* delete whole data ... */
5904 hr = IXMLDOMComment_get_length(pComment, &len);
5905 ok(hr == S_OK, "ret %08x\n", hr );
5907 hr = IXMLDOMComment_deleteData(pComment, 0, len);
5908 ok(hr == S_OK, "ret %08x\n", hr );
5909 /* ... and try again with empty string */
5910 hr = IXMLDOMComment_deleteData(pComment, 0, len);
5911 ok(hr == S_OK, "ret %08x\n", hr );
5913 /* ::replaceData() */
5915 V_BSTR(&v) = SysAllocString(szstr1);
5916 hr = IXMLDOMComment_put_nodeValue(pComment, v);
5917 ok(hr == S_OK, "ret %08x\n", hr );
5920 hr = IXMLDOMComment_replaceData(pComment, 6, 0, NULL);
5921 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
5922 hr = IXMLDOMComment_get_text(pComment, &str);
5923 ok(hr == S_OK, "ret %08x\n", hr );
5924 ok( !lstrcmpW( str, _bstr_("str1") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
5927 hr = IXMLDOMComment_replaceData(pComment, 0, 0, NULL);
5928 ok(hr == S_OK, "ret %08x\n", hr );
5929 hr = IXMLDOMComment_get_text(pComment, &str);
5930 ok(hr == S_OK, "ret %08x\n", hr );
5931 ok( !lstrcmpW( str, _bstr_("str1") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
5934 /* NULL pointer means delete */
5935 hr = IXMLDOMComment_replaceData(pComment, 0, 1, NULL);
5936 ok(hr == S_OK, "ret %08x\n", hr );
5937 hr = IXMLDOMComment_get_text(pComment, &str);
5938 ok(hr == S_OK, "ret %08x\n", hr );
5939 ok( !lstrcmpW( str, _bstr_("tr1") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
5942 /* empty string means delete */
5943 hr = IXMLDOMComment_replaceData(pComment, 0, 1, _bstr_(""));
5944 ok(hr == S_OK, "ret %08x\n", hr );
5945 hr = IXMLDOMComment_get_text(pComment, &str);
5946 ok(hr == S_OK, "ret %08x\n", hr );
5947 ok( !lstrcmpW( str, _bstr_("r1") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
5950 /* zero count means insert */
5951 hr = IXMLDOMComment_replaceData(pComment, 0, 0, _bstr_("a"));
5952 ok(hr == S_OK, "ret %08x\n", hr );
5953 hr = IXMLDOMComment_get_text(pComment, &str);
5954 ok(hr == S_OK, "ret %08x\n", hr );
5955 ok( !lstrcmpW( str, _bstr_("ar1") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
5958 hr = IXMLDOMComment_replaceData(pComment, 0, 2, NULL);
5959 ok(hr == S_OK, "ret %08x\n", hr );
5961 hr = IXMLDOMComment_insertData(pComment, 0, _bstr_("m"));
5962 ok(hr == S_OK, "ret %08x\n", hr );
5963 hr = IXMLDOMComment_get_text(pComment, &str);
5964 ok(hr == S_OK, "ret %08x\n", hr );
5965 ok( !lstrcmpW( str, _bstr_("m1") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
5968 /* nonempty string, count greater than its length */
5969 hr = IXMLDOMComment_replaceData(pComment, 0, 2, _bstr_("a1.2"));
5970 ok(hr == S_OK, "ret %08x\n", hr );
5971 hr = IXMLDOMComment_get_text(pComment, &str);
5972 ok(hr == S_OK, "ret %08x\n", hr );
5973 ok( !lstrcmpW( str, _bstr_("a1.2") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
5976 /* nonempty string, count less than its length */
5977 hr = IXMLDOMComment_replaceData(pComment, 0, 1, _bstr_("wine"));
5978 ok(hr == S_OK, "ret %08x\n", hr );
5979 hr = IXMLDOMComment_get_text(pComment, &str);
5980 ok(hr == S_OK, "ret %08x\n", hr );
5981 ok( !lstrcmpW( str, _bstr_("wine1.2") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
5984 IXMLDOMComment_Release(pComment);
5988 str = SysAllocString(szElement);
5989 hr = IXMLDOMDocument_createElement(doc, str, &pElement);
5991 ok(hr == S_OK, "ret %08x\n", hr );
5994 hr = IXMLDOMElement_appendChild(pRoot, (IXMLDOMNode*)pElement, NULL);
5995 ok(hr == S_OK, "ret %08x\n", hr );
5997 hr = IXMLDOMElement_get_nodeName(pElement, &str);
5998 ok(hr == S_OK, "ret %08x\n", hr );
5999 ok( !lstrcmpW( str, szElement ), "incorrect element node Name\n");
6002 hr = IXMLDOMElement_get_xml(pElement, &str);
6003 ok(hr == S_OK, "ret %08x\n", hr );
6004 ok( !lstrcmpW( str, szElementXML ), "incorrect element xml\n");
6008 pAttribute = (IXMLDOMAttribute*)0x1;
6009 hr = IXMLDOMDocument_createAttribute(doc, NULL, &pAttribute);
6010 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
6011 ok(pAttribute == (void*)0x1, "Expect same ptr, got %p\n", pAttribute);
6013 pAttribute = (IXMLDOMAttribute*)0x1;
6014 hr = IXMLDOMDocument_createAttribute(doc, _bstr_(""), &pAttribute);
6015 ok(hr == E_FAIL, "ret %08x\n", hr );
6016 ok(pAttribute == (void*)0x1, "Expect same ptr, got %p\n", pAttribute);
6018 str = SysAllocString(szAttribute);
6019 hr = IXMLDOMDocument_createAttribute(doc, str, &pAttribute);
6021 ok(hr == S_OK, "ret %08x\n", hr );
6024 IXMLDOMNode *pNewChild = (IXMLDOMNode *)0x1;
6026 hr = IXMLDOMAttribute_get_nextSibling(pAttribute, NULL);
6027 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
6029 pNextChild = (IXMLDOMNode *)0x1;
6030 hr = IXMLDOMAttribute_get_nextSibling(pAttribute, &pNextChild);
6031 ok(hr == S_FALSE, "ret %08x\n", hr );
6032 ok(pNextChild == NULL, "pNextChild not NULL\n");
6034 /* test Previous Sibling*/
6035 hr = IXMLDOMAttribute_get_previousSibling(pAttribute, NULL);
6036 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
6038 pNextChild = (IXMLDOMNode *)0x1;
6039 hr = IXMLDOMAttribute_get_previousSibling(pAttribute, &pNextChild);
6040 ok(hr == S_FALSE, "ret %08x\n", hr );
6041 ok(pNextChild == NULL, "pNextChild not NULL\n");
6043 hr = IXMLDOMElement_appendChild(pElement, (IXMLDOMNode*)pAttribute, &pNewChild);
6044 ok(hr == E_FAIL, "ret %08x\n", hr );
6045 ok(pNewChild == NULL, "pNewChild not NULL\n");
6047 hr = IXMLDOMElement_get_attributes(pElement, &pAttribs);
6048 ok(hr == S_OK, "ret %08x\n", hr );
6051 hr = IXMLDOMNamedNodeMap_setNamedItem(pAttribs, (IXMLDOMNode*)pAttribute, NULL );
6052 ok(hr == S_OK, "ret %08x\n", hr );
6054 IXMLDOMNamedNodeMap_Release(pAttribs);
6057 hr = IXMLDOMAttribute_get_nodeName(pAttribute, &str);
6058 ok(hr == S_OK, "ret %08x\n", hr );
6059 ok( !lstrcmpW( str, szAttribute ), "incorrect attribute node Name\n");
6063 hr = IXMLDOMAttribute_get_nodeName(pAttribute, &str);
6064 ok(hr == S_OK, "ret %08x\n", hr );
6065 ok( !lstrcmpW( str, szAttribute ), "incorrect nodeName string\n");
6068 /* test name property */
6069 hr = IXMLDOMAttribute_get_name(pAttribute, &str);
6070 ok(hr == S_OK, "ret %08x\n", hr );
6071 ok( !lstrcmpW( str, szAttribute ), "incorrect name string\n");
6074 hr = IXMLDOMAttribute_get_xml(pAttribute, &str);
6075 ok(hr == S_OK, "ret %08x\n", hr );
6076 ok( !lstrcmpW( str, szAttributeXML ), "incorrect attribute xml\n");
6079 IXMLDOMAttribute_Release(pAttribute);
6081 /* Check Element again with the Add Attribute*/
6082 hr = IXMLDOMElement_get_xml(pElement, &str);
6083 ok(hr == S_OK, "ret %08x\n", hr );
6084 ok( !lstrcmpW( str, szElementXML2 ), "incorrect element xml\n");
6088 hr = IXMLDOMElement_put_text(pElement, _bstr_("TestingNode"));
6089 ok(hr == S_OK, "ret %08x\n", hr );
6091 hr = IXMLDOMElement_get_xml(pElement, &str);
6092 ok(hr == S_OK, "ret %08x\n", hr );
6093 ok( !lstrcmpW( str, szElementXML3 ), "incorrect element xml\n");
6096 /* Test for reversible escaping */
6097 str = SysAllocString( szStrangeChars );
6098 hr = IXMLDOMElement_put_text(pElement, str);
6099 ok(hr == S_OK, "ret %08x\n", hr );
6100 SysFreeString( str );
6102 hr = IXMLDOMElement_get_xml(pElement, &str);
6103 ok(hr == S_OK, "ret %08x\n", hr );
6104 ok( !lstrcmpW( str, szElementXML4 ), "incorrect element xml\n");
6107 hr = IXMLDOMElement_get_text(pElement, &str);
6108 ok(hr == S_OK, "ret %08x\n", hr );
6109 ok( !lstrcmpW( str, szStrangeChars ), "incorrect element text\n");
6112 IXMLDOMElement_Release(pElement);
6116 str = SysAllocString(szCData);
6117 hr = IXMLDOMDocument_createCDATASection(doc, str, NULL);
6118 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
6120 hr = IXMLDOMDocument_createCDATASection(doc, str, &pCDataSec);
6122 ok(hr == S_OK, "ret %08x\n", hr );
6125 IXMLDOMNode *pNextChild = (IXMLDOMNode *)0x1;
6130 hr = IXMLDOMCDATASection_QueryInterface(pCDataSec, &IID_IXMLDOMElement, (void**)&pElement);
6131 ok(hr == E_NOINTERFACE, "ret %08x\n", hr);
6133 hr = IXMLDOMElement_appendChild(pRoot, (IXMLDOMNode*)pCDataSec, NULL);
6134 ok(hr == S_OK, "ret %08x\n", hr );
6136 hr = IXMLDOMCDATASection_get_nodeName(pCDataSec, &str);
6137 ok(hr == S_OK, "ret %08x\n", hr );
6138 ok( !lstrcmpW( str, szCDataNodeText ), "incorrect cdata node Name\n");
6141 hr = IXMLDOMCDATASection_get_xml(pCDataSec, &str);
6142 ok(hr == S_OK, "ret %08x\n", hr );
6143 ok( !lstrcmpW( str, szCDataXML ), "incorrect cdata xml\n");
6146 /* test lastChild */
6147 pNextChild = (IXMLDOMNode*)0x1;
6148 hr = IXMLDOMCDATASection_get_lastChild(pCDataSec, &pNextChild);
6149 ok(hr == S_FALSE, "ret %08x\n", hr );
6150 ok(pNextChild == NULL, "pNextChild not NULL\n");
6152 /* put data Tests */
6153 hr = IXMLDOMCDATASection_put_data(pCDataSec, _bstr_("This &is a ; test <>\\"));
6154 ok(hr == S_OK, "ret %08x\n", hr );
6156 /* Confirm XML text is good */
6157 hr = IXMLDOMCDATASection_get_xml(pCDataSec, &str);
6158 ok(hr == S_OK, "ret %08x\n", hr );
6159 ok( !lstrcmpW( str, _bstr_("<![CDATA[This &is a ; test <>\\]]>") ), "incorrect xml string\n");
6162 /* Confirm we get the put_data Text back */
6163 hr = IXMLDOMCDATASection_get_text(pCDataSec, &str);
6164 ok(hr == S_OK, "ret %08x\n", hr );
6165 ok( !lstrcmpW( str, _bstr_("This &is a ; test <>\\") ), "incorrect text string\n");
6168 /* test length property */
6169 hr = IXMLDOMCDATASection_get_length(pCDataSec, &len);
6170 ok(hr == S_OK, "ret %08x\n", hr );
6171 ok(len == 21, "expected 21 got %d\n", len);
6173 /* test get nodeValue */
6174 hr = IXMLDOMCDATASection_get_nodeValue(pCDataSec, &var);
6175 ok(hr == S_OK, "ret %08x\n", hr );
6176 ok(V_VT(&var) == VT_BSTR, "got vt %04x\n", V_VT(&var));
6177 ok( !lstrcmpW( V_BSTR(&var), _bstr_("This &is a ; test <>\\") ), "incorrect text string\n");
6181 hr = IXMLDOMCDATASection_get_data(pCDataSec, &str);
6182 ok(hr == S_OK, "ret %08x\n", hr );
6183 ok( !lstrcmpW( str, _bstr_("This &is a ; test <>\\") ), "incorrect text string\n");
6186 /* test substringData */
6187 hr = IXMLDOMCDATASection_substringData(pCDataSec, 0, 4, NULL);
6188 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
6190 /* test substringData - Invalid offset */
6191 str = (BSTR)&szElement;
6192 hr = IXMLDOMCDATASection_substringData(pCDataSec, -1, 4, &str);
6193 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
6194 ok( str == NULL, "incorrect string\n");
6196 /* test substringData - Invalid offset */
6197 str = (BSTR)&szElement;
6198 hr = IXMLDOMCDATASection_substringData(pCDataSec, 30, 0, &str);
6199 ok(hr == S_FALSE, "ret %08x\n", hr );
6200 ok( str == NULL, "incorrect string\n");
6202 /* test substringData - Invalid size */
6203 str = (BSTR)&szElement;
6204 hr = IXMLDOMCDATASection_substringData(pCDataSec, 0, -1, &str);
6205 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
6206 ok( str == NULL, "incorrect string\n");
6208 /* test substringData - Invalid size */
6209 str = (BSTR)&szElement;
6210 hr = IXMLDOMCDATASection_substringData(pCDataSec, 2, 0, &str);
6211 ok(hr == S_FALSE, "ret %08x\n", hr );
6212 ok( str == NULL, "incorrect string\n");
6214 /* test substringData - Start of string */
6215 hr = IXMLDOMCDATASection_substringData(pCDataSec, 0, 4, &str);
6216 ok(hr == S_OK, "ret %08x\n", hr );
6217 ok( !lstrcmpW( str, _bstr_("This") ), "incorrect substringData string\n");
6220 /* test substringData - Middle of string */
6221 hr = IXMLDOMCDATASection_substringData(pCDataSec, 13, 4, &str);
6222 ok(hr == S_OK, "ret %08x\n", hr );
6223 ok( !lstrcmpW( str, _bstr_("test") ), "incorrect substringData string\n");
6226 /* test substringData - End of string */
6227 hr = IXMLDOMCDATASection_substringData(pCDataSec, 20, 4, &str);
6228 ok(hr == S_OK, "ret %08x\n", hr );
6229 ok( !lstrcmpW( str, _bstr_("\\") ), "incorrect substringData string\n");
6232 /* test appendData */
6233 hr = IXMLDOMCDATASection_appendData(pCDataSec, NULL);
6234 ok(hr == S_OK, "ret %08x\n", hr );
6236 hr = IXMLDOMCDATASection_appendData(pCDataSec, _bstr_(""));
6237 ok(hr == S_OK, "ret %08x\n", hr );
6239 hr = IXMLDOMCDATASection_appendData(pCDataSec, _bstr_("Append"));
6240 ok(hr == S_OK, "ret %08x\n", hr );
6242 hr = IXMLDOMCDATASection_get_text(pCDataSec, &str);
6243 ok(hr == S_OK, "ret %08x\n", hr );
6244 ok( !lstrcmpW( str, _bstr_("This &is a ; test <>\\Append") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
6247 /* test insertData */
6248 str = SysAllocStringLen(NULL, 0);
6249 hr = IXMLDOMCDATASection_insertData(pCDataSec, -1, str);
6250 ok(hr == S_OK, "ret %08x\n", hr );
6252 hr = IXMLDOMCDATASection_insertData(pCDataSec, -1, NULL);
6253 ok(hr == S_OK, "ret %08x\n", hr );
6255 hr = IXMLDOMCDATASection_insertData(pCDataSec, 1000, str);
6256 ok(hr == S_OK, "ret %08x\n", hr );
6258 hr = IXMLDOMCDATASection_insertData(pCDataSec, 1000, NULL);
6259 ok(hr == S_OK, "ret %08x\n", hr );
6261 hr = IXMLDOMCDATASection_insertData(pCDataSec, 0, NULL);
6262 ok(hr == S_OK, "ret %08x\n", hr );
6264 hr = IXMLDOMCDATASection_insertData(pCDataSec, 0, str);
6265 ok(hr == S_OK, "ret %08x\n", hr );
6268 hr = IXMLDOMCDATASection_insertData(pCDataSec, -1, _bstr_("Inserting"));
6269 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
6271 hr = IXMLDOMCDATASection_insertData(pCDataSec, 1000, _bstr_("Inserting"));
6272 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
6274 hr = IXMLDOMCDATASection_insertData(pCDataSec, 0, _bstr_("Begin "));
6275 ok(hr == S_OK, "ret %08x\n", hr );
6277 hr = IXMLDOMCDATASection_insertData(pCDataSec, 17, _bstr_("Middle"));
6278 ok(hr == S_OK, "ret %08x\n", hr );
6280 hr = IXMLDOMCDATASection_insertData(pCDataSec, 39, _bstr_(" End"));
6281 ok(hr == S_OK, "ret %08x\n", hr );
6283 hr = IXMLDOMCDATASection_get_text(pCDataSec, &str);
6284 ok(hr == S_OK, "ret %08x\n", hr );
6285 ok( !lstrcmpW( str, _bstr_("Begin This &is a Middle; test <>\\Append End") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
6289 /* invalid arguments */
6290 hr = IXMLDOMCDATASection_deleteData(pCDataSec, -1, 1);
6291 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
6293 hr = IXMLDOMCDATASection_deleteData(pCDataSec, 0, 0);
6294 ok(hr == S_OK, "ret %08x\n", hr );
6296 hr = IXMLDOMCDATASection_deleteData(pCDataSec, 0, -1);
6297 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
6299 hr = IXMLDOMCDATASection_get_length(pCDataSec, &len);
6300 ok(hr == S_OK, "ret %08x\n", hr );
6301 ok(len == 43, "expected 43 got %d\n", len);
6303 hr = IXMLDOMCDATASection_deleteData(pCDataSec, len, 1);
6304 ok(hr == S_OK, "ret %08x\n", hr );
6306 hr = IXMLDOMCDATASection_deleteData(pCDataSec, len+1, 1);
6307 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
6309 /* delete from start */
6310 hr = IXMLDOMCDATASection_deleteData(pCDataSec, 0, 5);
6311 ok(hr == S_OK, "ret %08x\n", hr );
6313 hr = IXMLDOMCDATASection_get_length(pCDataSec, &len);
6314 ok(hr == S_OK, "ret %08x\n", hr );
6315 ok(len == 38, "expected 38 got %d\n", len);
6317 hr = IXMLDOMCDATASection_get_text(pCDataSec, &str);
6318 ok(hr == S_OK, "ret %08x\n", hr );
6319 ok( !lstrcmpW( str, _bstr_(" This &is a Middle; test <>\\Append End") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
6322 /* delete from end */
6323 hr = IXMLDOMCDATASection_deleteData(pCDataSec, 35, 3);
6324 ok(hr == S_OK, "ret %08x\n", hr );
6326 hr = IXMLDOMCDATASection_get_length(pCDataSec, &len);
6327 ok(hr == S_OK, "ret %08x\n", hr );
6328 ok(len == 35, "expected 35 got %d\n", len);
6330 hr = IXMLDOMCDATASection_get_text(pCDataSec, &str);
6331 ok(hr == S_OK, "ret %08x\n", hr );
6332 ok( !lstrcmpW( str, _bstr_(" This &is a Middle; test <>\\Append ") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
6335 /* delete from inside */
6336 hr = IXMLDOMCDATASection_deleteData(pCDataSec, 1, 33);
6337 ok(hr == S_OK, "ret %08x\n", hr );
6339 hr = IXMLDOMCDATASection_get_length(pCDataSec, &len);
6340 ok(hr == S_OK, "ret %08x\n", hr );
6341 ok(len == 2, "expected 2 got %d\n", len);
6343 hr = IXMLDOMCDATASection_get_text(pCDataSec, &str);
6344 ok(hr == S_OK, "ret %08x\n", hr );
6345 ok( !lstrcmpW( str, _bstr_(" ") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
6348 /* delete whole data ... */
6349 hr = IXMLDOMCDATASection_get_length(pCDataSec, &len);
6350 ok(hr == S_OK, "ret %08x\n", hr );
6352 hr = IXMLDOMCDATASection_deleteData(pCDataSec, 0, len);
6353 ok(hr == S_OK, "ret %08x\n", hr );
6355 /* ... and try again with empty string */
6356 hr = IXMLDOMCDATASection_deleteData(pCDataSec, 0, len);
6357 ok(hr == S_OK, "ret %08x\n", hr );
6359 /* ::replaceData() */
6361 V_BSTR(&v) = SysAllocString(szstr1);
6362 hr = IXMLDOMCDATASection_put_nodeValue(pCDataSec, v);
6363 ok(hr == S_OK, "ret %08x\n", hr );
6366 hr = IXMLDOMCDATASection_replaceData(pCDataSec, 6, 0, NULL);
6367 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
6368 hr = IXMLDOMCDATASection_get_text(pCDataSec, &str);
6369 ok(hr == S_OK, "ret %08x\n", hr );
6370 ok( !lstrcmpW( str, _bstr_("str1") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
6373 hr = IXMLDOMCDATASection_replaceData(pCDataSec, 0, 0, NULL);
6374 ok(hr == S_OK, "ret %08x\n", hr );
6375 hr = IXMLDOMCDATASection_get_text(pCDataSec, &str);
6376 ok(hr == S_OK, "ret %08x\n", hr );
6377 ok( !lstrcmpW( str, _bstr_("str1") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
6380 /* NULL pointer means delete */
6381 hr = IXMLDOMCDATASection_replaceData(pCDataSec, 0, 1, NULL);
6382 ok(hr == S_OK, "ret %08x\n", hr );
6383 hr = IXMLDOMCDATASection_get_text(pCDataSec, &str);
6384 ok(hr == S_OK, "ret %08x\n", hr );
6385 ok( !lstrcmpW( str, _bstr_("tr1") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
6388 /* empty string means delete */
6389 hr = IXMLDOMCDATASection_replaceData(pCDataSec, 0, 1, _bstr_(""));
6390 ok(hr == S_OK, "ret %08x\n", hr );
6391 hr = IXMLDOMCDATASection_get_text(pCDataSec, &str);
6392 ok(hr == S_OK, "ret %08x\n", hr );
6393 ok( !lstrcmpW( str, _bstr_("r1") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
6396 /* zero count means insert */
6397 hr = IXMLDOMCDATASection_replaceData(pCDataSec, 0, 0, _bstr_("a"));
6398 ok(hr == S_OK, "ret %08x\n", hr );
6399 hr = IXMLDOMCDATASection_get_text(pCDataSec, &str);
6400 ok(hr == S_OK, "ret %08x\n", hr );
6401 ok( !lstrcmpW( str, _bstr_("ar1") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
6404 hr = IXMLDOMCDATASection_replaceData(pCDataSec, 0, 2, NULL);
6405 ok(hr == S_OK, "ret %08x\n", hr );
6407 hr = IXMLDOMCDATASection_insertData(pCDataSec, 0, _bstr_("m"));
6408 ok(hr == S_OK, "ret %08x\n", hr );
6409 hr = IXMLDOMCDATASection_get_text(pCDataSec, &str);
6410 ok(hr == S_OK, "ret %08x\n", hr );
6411 ok( !lstrcmpW( str, _bstr_("m1") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
6414 /* nonempty string, count greater than its length */
6415 hr = IXMLDOMCDATASection_replaceData(pCDataSec, 0, 2, _bstr_("a1.2"));
6416 ok(hr == S_OK, "ret %08x\n", hr );
6417 hr = IXMLDOMCDATASection_get_text(pCDataSec, &str);
6418 ok(hr == S_OK, "ret %08x\n", hr );
6419 ok( !lstrcmpW( str, _bstr_("a1.2") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
6422 /* nonempty string, count less than its length */
6423 hr = IXMLDOMCDATASection_replaceData(pCDataSec, 0, 1, _bstr_("wine"));
6424 ok(hr == S_OK, "ret %08x\n", hr );
6425 hr = IXMLDOMCDATASection_get_text(pCDataSec, &str);
6426 ok(hr == S_OK, "ret %08x\n", hr );
6427 ok( !lstrcmpW( str, _bstr_("wine1.2") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
6430 IXMLDOMCDATASection_Release(pCDataSec);
6433 /* Document Fragments */
6434 hr = IXMLDOMDocument_createDocumentFragment(doc, NULL);
6435 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
6437 hr = IXMLDOMDocument_createDocumentFragment(doc, &pDocFrag);
6438 ok(hr == S_OK, "ret %08x\n", hr );
6443 hr = IXMLDOMDocumentFragment_get_parentNode(pDocFrag, NULL);
6444 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
6446 node = (IXMLDOMNode *)0x1;
6447 hr = IXMLDOMDocumentFragment_get_parentNode(pDocFrag, &node);
6448 ok(hr == S_FALSE, "ret %08x\n", hr );
6449 ok(node == NULL, "expected NULL, got %p\n", node);
6451 hr = IXMLDOMElement_appendChild(pRoot, (IXMLDOMNode*)pDocFrag, NULL);
6452 ok(hr == S_OK, "ret %08x\n", hr );
6454 hr = IXMLDOMDocumentFragment_get_nodeName(pDocFrag, &str);
6455 ok(hr == S_OK, "ret %08x\n", hr );
6456 ok( !lstrcmpW( str, szDocFragmentText ), "incorrect docfragment node Name\n");
6459 /* test next Sibling*/
6460 hr = IXMLDOMDocumentFragment_get_nextSibling(pDocFrag, NULL);
6461 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
6463 node = (IXMLDOMNode *)0x1;
6464 hr = IXMLDOMDocumentFragment_get_nextSibling(pDocFrag, &node);
6465 ok(hr == S_FALSE, "ret %08x\n", hr );
6466 ok(node == NULL, "next sibling not NULL\n");
6468 /* test Previous Sibling*/
6469 hr = IXMLDOMDocumentFragment_get_previousSibling(pDocFrag, NULL);
6470 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
6472 node = (IXMLDOMNode *)0x1;
6473 hr = IXMLDOMDocumentFragment_get_previousSibling(pDocFrag, &node);
6474 ok(hr == S_FALSE, "ret %08x\n", hr );
6475 ok(node == NULL, "previous sibling not NULL\n");
6477 IXMLDOMDocumentFragment_Release(pDocFrag);
6480 /* Entity References */
6481 hr = IXMLDOMDocument_createEntityReference(doc, NULL, &pEntityRef);
6482 ok(hr == E_FAIL, "ret %08x\n", hr );
6483 hr = IXMLDOMDocument_createEntityReference(doc, _bstr_(""), &pEntityRef);
6484 ok(hr == E_FAIL, "ret %08x\n", hr );
6486 str = SysAllocString(szEntityRef);
6487 hr = IXMLDOMDocument_createEntityReference(doc, str, NULL);
6488 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
6490 hr = IXMLDOMDocument_createEntityReference(doc, str, &pEntityRef);
6492 ok(hr == S_OK, "ret %08x\n", hr );
6495 hr = IXMLDOMElement_appendChild(pRoot, (IXMLDOMNode*)pEntityRef, NULL);
6496 ok(hr == S_OK, "ret %08x\n", hr );
6499 hr = IXMLDOMEntityReference_get_xml(pEntityRef, &str);
6500 ok(hr == S_OK, "ret %08x\n", hr );
6501 ok( !lstrcmpW( str, szEntityRefXML ), "incorrect xml string\n");
6504 IXMLDOMEntityReference_Release(pEntityRef);
6507 IXMLDOMElement_Release( pRoot );
6511 IXMLDOMDocument_Release(doc);
6516 static void test_nodeTypeTests( void )
6518 IXMLDOMDocument *doc = NULL;
6519 IXMLDOMElement *pRoot;
6520 IXMLDOMElement *pElement;
6523 doc = create_document(&IID_IXMLDOMDocument);
6526 hr = IXMLDOMDocument_createElement(doc, _bstr_("Testing"), NULL);
6527 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
6529 hr = IXMLDOMDocument_createElement(doc, _bstr_("Testing"), &pRoot);
6530 ok(hr == S_OK, "ret %08x\n", hr );
6533 hr = IXMLDOMDocument_appendChild(doc, (IXMLDOMNode*)pRoot, NULL);
6534 ok(hr == S_OK, "ret %08x\n", hr );
6537 hr = IXMLDOMElement_put_dataType(pRoot, NULL);
6538 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
6541 hr = IXMLDOMElement_put_dataType(pRoot, _bstr_("abcdefg") );
6542 ok(hr == E_FAIL, "ret %08x\n", hr );
6545 * The name passed into put_dataType is case-insensitive. So many of the names
6546 * have been changed to reflect this.
6549 hr = IXMLDOMDocument_createElement(doc, _bstr_("Testing_Boolean"), &pElement);
6550 ok(hr == S_OK, "ret %08x\n", hr );
6553 IXMLDOMElement_appendChild(pRoot, (IXMLDOMNode*)pElement, NULL);
6555 hr = IXMLDOMElement_put_dataType(pElement, _bstr_("Boolean") );
6556 ok(hr == S_OK, "ret %08x\n", hr );
6558 IXMLDOMElement_Release(pElement);
6562 hr = IXMLDOMDocument_createElement(doc, _bstr_("Testing_String"), &pElement);
6563 ok(hr == S_OK, "ret %08x\n", hr );
6566 IXMLDOMElement_appendChild(pRoot, (IXMLDOMNode*)pElement, NULL);
6568 hr = IXMLDOMElement_put_dataType(pElement, _bstr_("String") );
6569 ok(hr == S_OK, "ret %08x\n", hr );
6571 IXMLDOMElement_Release(pElement);
6575 hr = IXMLDOMDocument_createElement(doc, _bstr_("Testing_Number"), &pElement);
6576 ok(hr == S_OK, "ret %08x\n", hr );
6579 IXMLDOMElement_appendChild(pRoot, (IXMLDOMNode*)pElement, NULL);
6581 hr = IXMLDOMElement_put_dataType(pElement, _bstr_("number") );
6582 ok(hr == S_OK, "ret %08x\n", hr );
6584 IXMLDOMElement_Release(pElement);
6588 hr = IXMLDOMDocument_createElement(doc, _bstr_("Testing_Int"), &pElement);
6589 ok(hr == S_OK, "ret %08x\n", hr );
6592 IXMLDOMElement_appendChild(pRoot, (IXMLDOMNode*)pElement, NULL);
6594 hr = IXMLDOMElement_put_dataType(pElement, _bstr_("InT") );
6595 ok(hr == S_OK, "ret %08x\n", hr );
6597 IXMLDOMElement_Release(pElement);
6601 hr = IXMLDOMDocument_createElement(doc, _bstr_("Testing_Fixed"), &pElement);
6602 ok(hr == S_OK, "ret %08x\n", hr );
6605 IXMLDOMElement_appendChild(pRoot, (IXMLDOMNode*)pElement, NULL);
6607 hr = IXMLDOMElement_put_dataType(pElement, _bstr_("fixed.14.4") );
6608 ok(hr == S_OK, "ret %08x\n", hr );
6610 IXMLDOMElement_Release(pElement);
6614 hr = IXMLDOMDocument_createElement(doc, _bstr_("Testing_DateTime"), &pElement);
6615 ok(hr == S_OK, "ret %08x\n", hr );
6618 IXMLDOMElement_appendChild(pRoot, (IXMLDOMNode*)pElement, NULL);
6620 hr = IXMLDOMElement_put_dataType(pElement, _bstr_("DateTime") );
6621 ok(hr == S_OK, "ret %08x\n", hr );
6623 IXMLDOMElement_Release(pElement);
6627 hr = IXMLDOMDocument_createElement(doc, _bstr_("Testing_DateTime_tz"), &pElement);
6628 ok(hr == S_OK, "ret %08x\n", hr );
6631 IXMLDOMElement_appendChild(pRoot, (IXMLDOMNode*)pElement, NULL);
6633 hr = IXMLDOMElement_put_dataType(pElement, _bstr_("DateTime.tz") );
6634 ok(hr == S_OK, "ret %08x\n", hr );
6636 IXMLDOMElement_Release(pElement);
6640 hr = IXMLDOMDocument_createElement(doc, _bstr_("Testing_Date"), &pElement);
6641 ok(hr == S_OK, "ret %08x\n", hr );
6644 IXMLDOMElement_appendChild(pRoot, (IXMLDOMNode*)pElement, NULL);
6646 hr = IXMLDOMElement_put_dataType(pElement, _bstr_("Date") );
6647 ok(hr == S_OK, "ret %08x\n", hr );
6649 IXMLDOMElement_Release(pElement);
6653 hr = IXMLDOMDocument_createElement(doc, _bstr_("Testing_Time"), &pElement);
6654 ok(hr == S_OK, "ret %08x\n", hr );
6657 IXMLDOMElement_appendChild(pRoot, (IXMLDOMNode*)pElement, NULL);
6659 hr = IXMLDOMElement_put_dataType(pElement, _bstr_("Time") );
6660 ok(hr == S_OK, "ret %08x\n", hr );
6662 IXMLDOMElement_Release(pElement);
6666 hr = IXMLDOMDocument_createElement(doc, _bstr_("Testing_Time_TZ"), &pElement);
6667 ok(hr == S_OK, "ret %08x\n", hr );
6670 IXMLDOMElement_appendChild(pRoot, (IXMLDOMNode*)pElement, NULL);
6672 hr = IXMLDOMElement_put_dataType(pElement, _bstr_("Time.tz") );
6673 ok(hr == S_OK, "ret %08x\n", hr );
6675 IXMLDOMElement_Release(pElement);
6679 hr = IXMLDOMDocument_createElement(doc, _bstr_("Testing_I1"), &pElement);
6680 ok(hr == S_OK, "ret %08x\n", hr );
6683 IXMLDOMElement_appendChild(pRoot, (IXMLDOMNode*)pElement, NULL);
6685 hr = IXMLDOMElement_put_dataType(pElement, _bstr_("I1") );
6686 ok(hr == S_OK, "ret %08x\n", hr );
6688 IXMLDOMElement_Release(pElement);
6692 hr = IXMLDOMDocument_createElement(doc, _bstr_("Testing_I2"), &pElement);
6693 ok(hr == S_OK, "ret %08x\n", hr );
6696 IXMLDOMElement_appendChild(pRoot, (IXMLDOMNode*)pElement, NULL);
6698 hr = IXMLDOMElement_put_dataType(pElement, _bstr_("I2") );
6699 ok(hr == S_OK, "ret %08x\n", hr );
6701 IXMLDOMElement_Release(pElement);
6705 hr = IXMLDOMDocument_createElement(doc, _bstr_("Testing_I4"), &pElement);
6706 ok(hr == S_OK, "ret %08x\n", hr );
6709 IXMLDOMElement_appendChild(pRoot, (IXMLDOMNode*)pElement, NULL);
6711 hr = IXMLDOMElement_put_dataType(pElement, _bstr_("I4") );
6712 ok(hr == S_OK, "ret %08x\n", hr );
6714 IXMLDOMElement_Release(pElement);
6718 hr = IXMLDOMDocument_createElement(doc, _bstr_("Testing_UI1"), &pElement);
6719 ok(hr == S_OK, "ret %08x\n", hr );
6722 IXMLDOMElement_appendChild(pRoot, (IXMLDOMNode*)pElement, NULL);
6724 hr = IXMLDOMElement_put_dataType(pElement, _bstr_("UI1") );
6725 ok(hr == S_OK, "ret %08x\n", hr );
6727 IXMLDOMElement_Release(pElement);
6731 hr = IXMLDOMDocument_createElement(doc, _bstr_("Testing_UI2"), &pElement);
6732 ok(hr == S_OK, "ret %08x\n", hr );
6735 IXMLDOMElement_appendChild(pRoot, (IXMLDOMNode*)pElement, NULL);
6737 hr = IXMLDOMElement_put_dataType(pElement, _bstr_("UI2") );
6738 ok(hr == S_OK, "ret %08x\n", hr );
6740 IXMLDOMElement_Release(pElement);
6744 hr = IXMLDOMDocument_createElement(doc, _bstr_("Testing_UI4"), &pElement);
6745 ok(hr == S_OK, "ret %08x\n", hr );
6748 IXMLDOMElement_appendChild(pRoot, (IXMLDOMNode*)pElement, NULL);
6750 hr = IXMLDOMElement_put_dataType(pElement, _bstr_("UI4") );
6751 ok(hr == S_OK, "ret %08x\n", hr );
6753 IXMLDOMElement_Release(pElement);
6757 hr = IXMLDOMDocument_createElement(doc, _bstr_("Testing_r4"), &pElement);
6758 ok(hr == S_OK, "ret %08x\n", hr );
6761 IXMLDOMElement_appendChild(pRoot, (IXMLDOMNode*)pElement, NULL);
6763 hr = IXMLDOMElement_put_dataType(pElement, _bstr_("r4") );
6764 ok(hr == S_OK, "ret %08x\n", hr );
6766 IXMLDOMElement_Release(pElement);
6770 hr = IXMLDOMDocument_createElement(doc, _bstr_("Testing_r8"), &pElement);
6771 ok(hr == S_OK, "ret %08x\n", hr );
6774 IXMLDOMElement_appendChild(pRoot, (IXMLDOMNode*)pElement, NULL);
6776 hr = IXMLDOMElement_put_dataType(pElement, _bstr_("r8") );
6777 ok(hr == S_OK, "ret %08x\n", hr );
6779 IXMLDOMElement_Release(pElement);
6783 hr = IXMLDOMDocument_createElement(doc, _bstr_("Testing_float"), &pElement);
6784 ok(hr == S_OK, "ret %08x\n", hr );
6787 IXMLDOMElement_appendChild(pRoot, (IXMLDOMNode*)pElement, NULL);
6789 hr = IXMLDOMElement_put_dataType(pElement, _bstr_("float") );
6790 ok(hr == S_OK, "ret %08x\n", hr );
6792 IXMLDOMElement_Release(pElement);
6796 hr = IXMLDOMDocument_createElement(doc, _bstr_("Testing_uuid"), &pElement);
6797 ok(hr == S_OK, "ret %08x\n", hr );
6800 IXMLDOMElement_appendChild(pRoot, (IXMLDOMNode*)pElement, NULL);
6802 hr = IXMLDOMElement_put_dataType(pElement, _bstr_("UuId") );
6803 ok(hr == S_OK, "ret %08x\n", hr );
6805 IXMLDOMElement_Release(pElement);
6809 hr = IXMLDOMDocument_createElement(doc, _bstr_("Testing_bin_hex"), &pElement);
6810 ok(hr == S_OK, "ret %08x\n", hr );
6813 IXMLDOMElement_appendChild(pRoot, (IXMLDOMNode*)pElement, NULL);
6815 hr = IXMLDOMElement_put_dataType(pElement, _bstr_("bin.hex") );
6816 ok(hr == S_OK, "ret %08x\n", hr );
6818 IXMLDOMElement_Release(pElement);
6822 hr = IXMLDOMDocument_createElement(doc, _bstr_("Testing_bin_base64"), &pElement);
6823 ok(hr == S_OK, "ret %08x\n", hr );
6826 IXMLDOMElement_appendChild(pRoot, (IXMLDOMNode*)pElement, NULL);
6828 hr = IXMLDOMElement_put_dataType(pElement, _bstr_("bin.base64") );
6829 ok(hr == S_OK, "ret %08x\n", hr );
6831 IXMLDOMElement_Release(pElement);
6834 /* Check changing types */
6835 hr = IXMLDOMDocument_createElement(doc, _bstr_("Testing_Change"), &pElement);
6836 ok(hr == S_OK, "ret %08x\n", hr );
6839 IXMLDOMElement_appendChild(pRoot, (IXMLDOMNode*)pElement, NULL);
6841 hr = IXMLDOMElement_put_dataType(pElement, _bstr_("DateTime.tz") );
6842 ok(hr == S_OK, "ret %08x\n", hr );
6844 hr = IXMLDOMElement_put_dataType(pElement, _bstr_("string") );
6845 ok(hr == S_OK, "ret %08x\n", hr );
6847 IXMLDOMElement_Release(pElement);
6850 IXMLDOMElement_Release(pRoot);
6854 IXMLDOMDocument_Release(doc);
6859 static void test_save(void)
6861 IXMLDOMDocument *doc, *doc2;
6862 IXMLDOMElement *root;
6864 BSTR sOrig, sNew, filename;
6870 doc = create_document(&IID_IXMLDOMDocument);
6873 doc2 = create_document(&IID_IXMLDOMDocument);
6876 IXMLDOMDocument_Release(doc);
6880 /* save to IXMLDOMDocument */
6881 hr = IXMLDOMDocument_createElement(doc, _bstr_("Testing"), &root);
6882 EXPECT_HR(hr, S_OK);
6884 hr = IXMLDOMDocument_appendChild(doc, (IXMLDOMNode*)root, NULL);
6885 EXPECT_HR(hr, S_OK);
6887 V_VT(&vDoc) = VT_UNKNOWN;
6888 V_UNKNOWN(&vDoc) = (IUnknown*)doc2;
6890 hr = IXMLDOMDocument_save(doc, vDoc);
6891 EXPECT_HR(hr, S_OK);
6893 hr = IXMLDOMDocument_get_xml(doc, &sOrig);
6894 EXPECT_HR(hr, S_OK);
6896 hr = IXMLDOMDocument_get_xml(doc2, &sNew);
6897 EXPECT_HR(hr, S_OK);
6899 ok( !lstrcmpW( sOrig, sNew ), "New document is not the same as original\n");
6901 SysFreeString(sOrig);
6902 SysFreeString(sNew);
6904 IXMLDOMElement_Release(root);
6905 IXMLDOMDocument_Release(doc2);
6908 V_VT(&file) = VT_BSTR;
6909 V_BSTR(&file) = _bstr_("test.xml");
6911 hr = IXMLDOMDocument_save(doc, file);
6912 EXPECT_HR(hr, S_OK);
6914 hfile = CreateFileA("test.xml", GENERIC_READ, 0, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, NULL );
6915 ok(hfile != INVALID_HANDLE_VALUE, "Could not open file: %u\n", GetLastError());
6916 if(hfile == INVALID_HANDLE_VALUE) return;
6918 ReadFile(hfile, buffer, sizeof(buffer), &read, NULL);
6919 ok(read != 0, "could not read file\n");
6920 ok(buffer[0] != '<' || buffer[1] != '?', "File contains processing instruction\n");
6923 DeleteFile("test.xml");
6925 /* save to path VT_BSTR | VT_BYREF */
6926 filename = _bstr_("test.xml");
6927 V_VT(&file) = VT_BSTR | VT_BYREF;
6928 V_BSTRREF(&file) = &filename;
6930 hr = IXMLDOMDocument_save(doc, file);
6931 EXPECT_HR(hr, S_OK);
6933 IXMLDOMDocument_Release(doc);
6935 hfile = CreateFileA("test.xml", GENERIC_READ, 0, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, NULL );
6936 ok(hfile != INVALID_HANDLE_VALUE, "Could not open file: %u\n", GetLastError());
6937 if(hfile == INVALID_HANDLE_VALUE) return;
6939 ReadFile(hfile, buffer, sizeof(buffer), &read, NULL);
6940 ok(read != 0, "could not read file\n");
6941 ok(buffer[0] != '<' || buffer[1] != '?', "File contains processing instruction\n");
6944 DeleteFile("test.xml");
6948 static void test_testTransforms(void)
6950 IXMLDOMDocument *doc, *docSS;
6956 doc = create_document(&IID_IXMLDOMDocument);
6959 docSS = create_document(&IID_IXMLDOMDocument);
6962 IXMLDOMDocument_Release(doc);
6966 hr = IXMLDOMDocument_loadXML(doc, _bstr_(szTransformXML), &bSucc);
6967 ok(hr == S_OK, "ret %08x\n", hr );
6969 hr = IXMLDOMDocument_loadXML(docSS, _bstr_(szTransformSSXML), &bSucc);
6970 ok(hr == S_OK, "ret %08x\n", hr );
6972 hr = IXMLDOMDocument_QueryInterface(docSS, &IID_IXMLDOMNode, (void**)&pNode );
6973 ok(hr == S_OK, "ret %08x\n", hr );
6978 hr = IXMLDOMDocument_transformNode(doc, pNode, &bOut);
6979 ok(hr == S_OK, "ret %08x\n", hr );
6980 ok( compareIgnoreReturns( bOut, _bstr_(szTransformOutput)), "Stylesheet output not correct\n");
6981 SysFreeString(bOut);
6983 IXMLDOMNode_Release(pNode);
6986 IXMLDOMDocument_Release(docSS);
6987 IXMLDOMDocument_Release(doc);
6992 static void test_Namespaces(void)
6994 IXMLDOMDocument *doc;
6996 IXMLDOMNode *pNode2 = NULL;
7000 static const CHAR szNamespacesXML[] =
7001 "<?xml version=\"1.0\"?>\n"
7002 "<XMI xmi.version=\"1.1\" xmlns:Model=\"http://omg.org/mof.Model/1.3\">"
7004 " <Model:Package name=\"WinePackage\" />"
7008 doc = create_document(&IID_IXMLDOMDocument);
7011 hr = IXMLDOMDocument_loadXML(doc, _bstr_(szNamespacesXML), &bSucc);
7012 ok(hr == S_OK, "ret %08x\n", hr );
7013 ok(bSucc == VARIANT_TRUE, "Expected VARIANT_TRUE got VARIANT_FALSE\n");
7015 hr = IXMLDOMDocument_selectSingleNode(doc, _bstr_("//XMI.content"), &pNode );
7016 ok(hr == S_OK, "ret %08x\n", hr );
7019 hr = IXMLDOMNode_get_firstChild( pNode, &pNode2 );
7020 ok( hr == S_OK, "ret %08x\n", hr );
7021 ok( pNode2 != NULL, "pNode2 == NULL\n");
7023 /* Test get_prefix */
7024 hr = IXMLDOMNode_get_prefix(pNode2, NULL);
7025 ok( hr == E_INVALIDARG, "ret %08x\n", hr );
7026 /* NOTE: Need to test that arg2 gets cleared on Error. */
7028 hr = IXMLDOMNode_get_prefix(pNode2, &str);
7029 ok( hr == S_OK, "ret %08x\n", hr );
7030 ok( !lstrcmpW( str, _bstr_("Model")), "incorrect prefix string\n");
7033 hr = IXMLDOMNode_get_nodeName(pNode2, &str);
7034 ok( hr == S_OK, "ret %08x\n", hr );
7035 todo_wine ok( !lstrcmpW( str, _bstr_("Model:Package")), "incorrect nodeName string\n");
7038 /* Test get_namespaceURI */
7039 hr = IXMLDOMNode_get_namespaceURI(pNode2, NULL);
7040 ok( hr == E_INVALIDARG, "ret %08x\n", hr );
7041 /* NOTE: Need to test that arg2 gets cleared on Error. */
7043 hr = IXMLDOMNode_get_namespaceURI(pNode2, &str);
7044 ok( hr == S_OK, "ret %08x\n", hr );
7045 ok( !lstrcmpW( str, _bstr_("http://omg.org/mof.Model/1.3")), "incorrect namespaceURI string\n");
7048 IXMLDOMNode_Release(pNode2);
7049 IXMLDOMNode_Release(pNode);
7052 IXMLDOMDocument_Release(doc);
7057 static void test_FormattingXML(void)
7059 IXMLDOMDocument *doc;
7060 IXMLDOMElement *pElement;
7064 static const CHAR szLinefeedXML[] = "<?xml version=\"1.0\"?>\n<Root>\n\t<Sub val=\"A\" />\n</Root>";
7065 static const CHAR szLinefeedRootXML[] = "<Root>\r\n\t<Sub val=\"A\"/>\r\n</Root>";
7067 doc = create_document(&IID_IXMLDOMDocument);
7070 hr = IXMLDOMDocument_loadXML(doc, _bstr_(szLinefeedXML), &bSucc);
7071 ok(hr == S_OK, "ret %08x\n", hr );
7072 ok(bSucc == VARIANT_TRUE, "Expected VARIANT_TRUE got VARIANT_FALSE\n");
7074 if(bSucc == VARIANT_TRUE)
7076 hr = IXMLDOMDocument_get_documentElement(doc, &pElement);
7077 ok(hr == S_OK, "ret %08x\n", hr );
7080 hr = IXMLDOMElement_get_xml(pElement, &str);
7081 ok(hr == S_OK, "ret %08x\n", hr );
7082 ok( !lstrcmpW( str, _bstr_(szLinefeedRootXML) ), "incorrect element xml\n");
7085 IXMLDOMElement_Release(pElement);
7089 IXMLDOMDocument_Release(doc);
7094 typedef struct _nodetypedvalue_t {
7097 const char *value; /* value in string format */
7100 static const nodetypedvalue_t get_nodetypedvalue[] = {
7101 { "root/string", VT_BSTR, "Wine" },
7102 { "root/string2", VT_BSTR, "String" },
7103 { "root/number", VT_BSTR, "12.44" },
7104 { "root/number2", VT_BSTR, "-3.71e3" },
7105 { "root/int", VT_I4, "-13" },
7106 { "root/fixed", VT_CY, "7322.9371" },
7107 { "root/bool", VT_BOOL, "-1" },
7108 { "root/datetime", VT_DATE, "40135.14" },
7109 { "root/datetimetz",VT_DATE, "37813.59" },
7110 { "root/date", VT_DATE, "665413" },
7111 { "root/time", VT_DATE, "0.5813889" },
7112 { "root/timetz", VT_DATE, "1.112512" },
7113 { "root/i1", VT_I1, "-13" },
7114 { "root/i2", VT_I2, "31915" },
7115 { "root/i4", VT_I4, "-312232" },
7116 { "root/ui1", VT_UI1, "123" },
7117 { "root/ui2", VT_UI2, "48282" },
7118 { "root/ui4", VT_UI4, "949281" },
7119 { "root/r4", VT_R4, "213124" },
7120 { "root/r8", VT_R8, "0.412" },
7121 { "root/float", VT_R8, "41221.421" },
7122 { "root/uuid", VT_BSTR, "333C7BC4-460F-11D0-BC04-0080C7055a83" },
7123 { "root/binbase64", VT_ARRAY|VT_UI1, "base64 test" },
7124 { "root/binbase64_1", VT_ARRAY|VT_UI1, "base64 test" },
7125 { "root/binbase64_2", VT_ARRAY|VT_UI1, "base64 test" },
7129 static void test_nodeTypedValue(void)
7131 const nodetypedvalue_t *entry = get_nodetypedvalue;
7132 IXMLDOMDocumentType *doctype, *doctype2;
7133 IXMLDOMProcessingInstruction *pi;
7134 IXMLDOMDocumentFragment *frag;
7135 IXMLDOMDocument *doc, *doc2;
7136 IXMLDOMCDATASection *cdata;
7137 IXMLDOMComment *comment;
7143 doc = create_document(&IID_IXMLDOMDocument);
7147 hr = IXMLDOMDocument_loadXML(doc, _bstr_(szTypeValueXML), &b);
7148 ok(hr == S_OK, "ret %08x\n", hr );
7149 ok(b == VARIANT_TRUE, "got %d\n", b);
7151 hr = IXMLDOMDocument_get_nodeValue(doc, NULL);
7152 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
7154 V_VT(&value) = VT_BSTR;
7155 V_BSTR(&value) = NULL;
7156 hr = IXMLDOMDocument_get_nodeValue(doc, &value);
7157 ok(hr == S_FALSE, "ret %08x\n", hr );
7158 ok(V_VT(&value) == VT_NULL, "expect VT_NULL got %d\n", V_VT(&value));
7160 hr = IXMLDOMDocument_get_nodeTypedValue(doc, NULL);
7161 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
7163 V_VT(&value) = VT_EMPTY;
7164 hr = IXMLDOMDocument_get_nodeTypedValue(doc, &value);
7165 ok(hr == S_FALSE, "ret %08x\n", hr );
7166 ok(V_VT(&value) == VT_NULL, "got %d\n", V_VT(&value));
7168 hr = IXMLDOMDocument_selectSingleNode(doc, _bstr_("root/string"), &node);
7169 ok(hr == S_OK, "ret %08x\n", hr );
7171 V_VT(&value) = VT_BSTR;
7172 V_BSTR(&value) = NULL;
7173 hr = IXMLDOMNode_get_nodeValue(node, &value);
7174 ok(hr == S_FALSE, "ret %08x\n", hr );
7175 ok(V_VT(&value) == VT_NULL, "expect VT_NULL got %d\n", V_VT(&value));
7177 hr = IXMLDOMNode_get_nodeTypedValue(node, NULL);
7178 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
7180 IXMLDOMNode_Release(node);
7182 hr = IXMLDOMDocument_selectSingleNode(doc, _bstr_("root/binhex"), &node);
7183 ok(hr == S_OK, "ret %08x\n", hr );
7185 BYTE bytes[] = {0xff,0xfc,0xa0,0x12,0x00,0x3c};
7187 hr = IXMLDOMNode_get_nodeTypedValue(node, &value);
7188 ok(hr == S_OK, "ret %08x\n", hr );
7189 ok(V_VT(&value) == (VT_ARRAY|VT_UI1), "incorrect type\n");
7190 ok(V_ARRAY(&value)->rgsabound[0].cElements == 6, "incorrect array size\n");
7191 if(V_ARRAY(&value)->rgsabound[0].cElements == 6)
7192 ok(!memcmp(bytes, V_ARRAY(&value)->pvData, sizeof(bytes)), "incorrect value\n");
7193 VariantClear(&value);
7194 IXMLDOMNode_Release(node);
7197 hr = IXMLDOMDocument_createProcessingInstruction(doc, _bstr_("foo"), _bstr_("value"), &pi);
7198 ok(hr == S_OK, "ret %08x\n", hr );
7200 V_VT(&value) = VT_NULL;
7201 V_BSTR(&value) = (void*)0xdeadbeef;
7202 hr = IXMLDOMProcessingInstruction_get_nodeTypedValue(pi, &value);
7203 ok(hr == S_OK, "ret %08x\n", hr );
7204 ok(V_VT(&value) == VT_BSTR, "got %d\n", V_VT(&value));
7205 ok(!lstrcmpW(V_BSTR(&value), _bstr_("value")), "got wrong value\n");
7206 IXMLDOMProcessingInstruction_Release(pi);
7207 VariantClear(&value);
7210 hr = IXMLDOMDocument_createCDATASection(doc, _bstr_("[1]*2=3; &gee that's not right!"), &cdata);
7211 ok(hr == S_OK, "ret %08x\n", hr );
7213 V_VT(&value) = VT_NULL;
7214 V_BSTR(&value) = (void*)0xdeadbeef;
7215 hr = IXMLDOMCDATASection_get_nodeTypedValue(cdata, &value);
7216 ok(hr == S_OK, "ret %08x\n", hr );
7217 ok(V_VT(&value) == VT_BSTR, "got %d\n", V_VT(&value));
7218 ok(!lstrcmpW(V_BSTR(&value), _bstr_("[1]*2=3; &gee that's not right!")), "got wrong value\n");
7219 IXMLDOMCDATASection_Release(cdata);
7220 VariantClear(&value);
7223 hr = IXMLDOMDocument_createComment(doc, _bstr_("comment"), &comment);
7224 ok(hr == S_OK, "ret %08x\n", hr );
7226 V_VT(&value) = VT_NULL;
7227 V_BSTR(&value) = (void*)0xdeadbeef;
7228 hr = IXMLDOMComment_get_nodeTypedValue(comment, &value);
7229 ok(hr == S_OK, "ret %08x\n", hr );
7230 ok(V_VT(&value) == VT_BSTR, "got %d\n", V_VT(&value));
7231 ok(!lstrcmpW(V_BSTR(&value), _bstr_("comment")), "got wrong value\n");
7232 IXMLDOMComment_Release(comment);
7233 VariantClear(&value);
7236 hr = IXMLDOMDocument_createDocumentFragment(doc, &frag);
7237 ok(hr == S_OK, "ret %08x\n", hr );
7239 V_VT(&value) = VT_EMPTY;
7240 hr = IXMLDOMDocumentFragment_get_nodeTypedValue(frag, &value);
7241 ok(hr == S_FALSE, "ret %08x\n", hr );
7242 ok(V_VT(&value) == VT_NULL, "got %d\n", V_VT(&value));
7243 IXMLDOMDocumentFragment_Release(frag);
7246 doc2 = create_document(&IID_IXMLDOMDocument);
7249 hr = IXMLDOMDocument_loadXML(doc2, _bstr_(szEmailXML), &b);
7250 ok(hr == S_OK, "ret %08x\n", hr );
7251 ok(b == VARIANT_TRUE, "got %d\n", b);
7253 EXPECT_REF(doc2, 1);
7255 hr = IXMLDOMDocument_get_doctype(doc2, &doctype);
7256 ok(hr == S_OK, "ret %08x\n", hr );
7258 EXPECT_REF(doc2, 1);
7259 todo_wine EXPECT_REF(doctype, 2);
7262 V_VT(&value) = VT_EMPTY;
7263 hr = IXMLDOMDocumentType_get_nodeTypedValue(doctype, &value);
7264 ok(hr == S_FALSE, "ret %08x\n", hr );
7265 ok(V_VT(&value) == VT_NULL, "got %d\n", V_VT(&value));
7268 hr = IXMLDOMDocument_get_doctype(doc2, &doctype2);
7269 ok(hr == S_OK, "ret %08x\n", hr );
7270 ok(doctype != doctype2, "got %p, was %p\n", doctype2, doctype);
7272 IXMLDOMDocumentType_Release(doctype2);
7273 IXMLDOMDocumentType_Release(doctype);
7275 IXMLDOMDocument_Release(doc2);
7279 hr = IXMLDOMDocument_selectSingleNode(doc, _bstr_(entry->name), &node);
7280 ok(hr == S_OK, "ret %08x\n", hr );
7282 hr = IXMLDOMNode_get_nodeTypedValue(node, &value);
7283 ok(hr == S_OK, "ret %08x\n", hr );
7284 ok(V_VT(&value) == entry->type, "incorrect type, expected %d, got %d\n", entry->type, V_VT(&value));
7286 if (entry->type == (VT_ARRAY|VT_UI1))
7288 ok(V_ARRAY(&value)->rgsabound[0].cElements == strlen(entry->value),
7289 "incorrect array size %d\n", V_ARRAY(&value)->rgsabound[0].cElements);
7292 if (entry->type != VT_BSTR)
7294 if (entry->type == VT_DATE ||
7295 entry->type == VT_R8 ||
7296 entry->type == VT_CY)
7298 if (entry->type == VT_DATE)
7300 hr = VariantChangeType(&value, &value, 0, VT_R4);
7301 ok(hr == S_OK, "ret %08x\n", hr );
7303 hr = VariantChangeTypeEx(&value, &value,
7304 MAKELCID(MAKELANGID(LANG_ENGLISH, SUBLANG_DEFAULT), SORT_DEFAULT),
7305 VARIANT_NOUSEROVERRIDE, VT_BSTR);
7306 ok(hr == S_OK, "ret %08x\n", hr );
7310 hr = VariantChangeType(&value, &value, 0, VT_BSTR);
7311 ok(hr == S_OK, "ret %08x\n", hr );
7314 /* for byte array from VT_ARRAY|VT_UI1 it's not a WCHAR buffer */
7315 if (entry->type == (VT_ARRAY|VT_UI1))
7317 ok(!memcmp( V_BSTR(&value), entry->value, strlen(entry->value)),
7318 "expected %s\n", entry->value);
7321 ok(lstrcmpW( V_BSTR(&value), _bstr_(entry->value)) == 0,
7322 "expected %s, got %s\n", entry->value, wine_dbgstr_w(V_BSTR(&value)));
7325 ok(lstrcmpW( V_BSTR(&value), _bstr_(entry->value)) == 0,
7326 "expected %s, got %s\n", entry->value, wine_dbgstr_w(V_BSTR(&value)));
7328 VariantClear( &value );
7329 IXMLDOMNode_Release(node);
7334 IXMLDOMDocument_Release(doc);
7338 static void test_TransformWithLoadingLocalFile(void)
7340 IXMLDOMDocument *doc;
7341 IXMLDOMDocument *xsl;
7347 char lpPathBuffer[MAX_PATH];
7350 /* Create a Temp File. */
7351 GetTempPathA(MAX_PATH, lpPathBuffer);
7352 strcat(lpPathBuffer, "customers.xml" );
7354 file = CreateFileA(lpPathBuffer, GENERIC_WRITE, 0, NULL, CREATE_ALWAYS, FILE_ATTRIBUTE_NORMAL, NULL );
7355 ok(file != INVALID_HANDLE_VALUE, "Could not create file: %u\n", GetLastError());
7356 if(file == INVALID_HANDLE_VALUE)
7359 WriteFile(file, szBasicTransformXML, strlen(szBasicTransformXML), &dwWritten, NULL);
7362 /* Correct path to not include a escape character. */
7363 for(i=0; i < strlen(lpPathBuffer); i++)
7365 if(lpPathBuffer[i] == '\\')
7366 lpPathBuffer[i] = '/';
7369 doc = create_document(&IID_IXMLDOMDocument);
7372 xsl = create_document(&IID_IXMLDOMDocument);
7375 IXMLDOMDocument2_Release(doc);
7379 hr = IXMLDOMDocument_loadXML(doc, _bstr_(szTypeValueXML), &bSucc);
7380 ok(hr == S_OK, "ret %08x\n", hr );
7381 ok(bSucc == VARIANT_TRUE, "Expected VARIANT_TRUE got VARIANT_FALSE\n");
7382 if(bSucc == VARIANT_TRUE)
7385 BSTR sPart1 = _bstr_(szBasicTransformSSXMLPart1);
7386 BSTR sPart2 = _bstr_(szBasicTransformSSXMLPart2);
7387 BSTR sFileName = _bstr_(lpPathBuffer);
7388 int nLegnth = lstrlenW(sPart1) + lstrlenW(sPart2) + lstrlenW(sFileName) + 1;
7390 sXSL = SysAllocStringLen(NULL, nLegnth);
7391 lstrcpyW(sXSL, sPart1);
7392 lstrcatW(sXSL, sFileName);
7393 lstrcatW(sXSL, sPart2);
7395 hr = IXMLDOMDocument_loadXML(xsl, sXSL, &bSucc);
7396 ok(hr == S_OK, "ret %08x\n", hr );
7397 ok(bSucc == VARIANT_TRUE, "Expected VARIANT_TRUE got VARIANT_FALSE\n");
7398 if(bSucc == VARIANT_TRUE)
7402 hr = IXMLDOMDocument_QueryInterface(xsl, &IID_IXMLDOMNode, (void**)&pNode );
7403 ok(hr == S_OK, "ret %08x\n", hr );
7406 /* This will load the temp file via the XSL */
7407 hr = IXMLDOMDocument_transformNode(doc, pNode, &sResult);
7408 ok(hr == S_OK, "ret %08x\n", hr );
7411 ok( compareIgnoreReturns( sResult, _bstr_(szBasicTransformOutput)), "Stylesheet output not correct\n");
7412 SysFreeString(sResult);
7415 IXMLDOMNode_Release(pNode);
7419 SysFreeString(sXSL);
7422 IXMLDOMDocument_Release(doc);
7423 IXMLDOMDocument_Release(xsl);
7425 DeleteFile(lpPathBuffer);
7429 static void test_put_nodeValue(void)
7431 static const WCHAR jeevesW[] = {'J','e','e','v','e','s',' ','&',' ','W','o','o','s','t','e','r',0};
7432 IXMLDOMDocument *doc;
7434 IXMLDOMEntityReference *entityref;
7435 IXMLDOMAttribute *attr;
7440 doc = create_document(&IID_IXMLDOMDocument);
7443 /* test for unsupported types */
7445 hr = IXMLDOMDocument_QueryInterface(doc, &IID_IXMLDOMNode, (void**)&node);
7446 ok(hr == S_OK, "ret %08x\n", hr );
7447 V_VT(&data) = VT_BSTR;
7448 V_BSTR(&data) = _bstr_("one two three");
7449 hr = IXMLDOMNode_put_nodeValue(node, data);
7450 ok(hr == E_FAIL, "ret %08x\n", hr );
7451 IXMLDOMNode_Release(node);
7453 /* NODE_DOCUMENT_FRAGMENT */
7454 V_VT(&type) = VT_I1;
7455 V_I1(&type) = NODE_DOCUMENT_FRAGMENT;
7456 hr = IXMLDOMDocument_createNode(doc, type, _bstr_("test"), NULL, &node);
7457 ok(hr == S_OK, "ret %08x\n", hr );
7458 V_VT(&data) = VT_BSTR;
7459 V_BSTR(&data) = _bstr_("one two three");
7460 hr = IXMLDOMNode_put_nodeValue(node, data);
7461 ok(hr == E_FAIL, "ret %08x\n", hr );
7462 IXMLDOMNode_Release(node);
7465 V_VT(&type) = VT_I1;
7466 V_I1(&type) = NODE_ELEMENT;
7467 hr = IXMLDOMDocument_createNode(doc, type, _bstr_("test"), NULL, &node);
7468 ok(hr == S_OK, "ret %08x\n", hr );
7469 V_VT(&data) = VT_BSTR;
7470 V_BSTR(&data) = _bstr_("one two three");
7471 hr = IXMLDOMNode_put_nodeValue(node, data);
7472 ok(hr == E_FAIL, "ret %08x\n", hr );
7473 IXMLDOMNode_Release(node);
7475 /* NODE_ENTITY_REFERENCE */
7476 hr = IXMLDOMDocument_createEntityReference(doc, _bstr_("ref"), &entityref);
7477 ok(hr == S_OK, "ret %08x\n", hr );
7479 V_VT(&data) = VT_BSTR;
7480 V_BSTR(&data) = _bstr_("one two three");
7481 hr = IXMLDOMEntityReference_put_nodeValue(entityref, data);
7482 ok(hr == E_FAIL, "ret %08x\n", hr );
7484 hr = IXMLDOMEntityReference_QueryInterface(entityref, &IID_IXMLDOMNode, (void**)&node);
7485 ok(hr == S_OK, "ret %08x\n", hr );
7486 V_VT(&data) = VT_BSTR;
7487 V_BSTR(&data) = _bstr_("one two three");
7488 hr = IXMLDOMNode_put_nodeValue(node, data);
7489 ok(hr == E_FAIL, "ret %08x\n", hr );
7490 IXMLDOMNode_Release(node);
7491 IXMLDOMEntityReference_Release(entityref);
7493 /* supported types */
7494 hr = IXMLDOMDocument_createTextNode(doc, _bstr_(""), &text);
7495 ok(hr == S_OK, "ret %08x\n", hr );
7496 V_VT(&data) = VT_BSTR;
7497 V_BSTR(&data) = _bstr_("Jeeves & Wooster");
7498 hr = IXMLDOMText_put_nodeValue(text, data);
7499 ok(hr == S_OK, "ret %08x\n", hr );
7500 IXMLDOMText_Release(text);
7502 hr = IXMLDOMDocument_createAttribute(doc, _bstr_("attr"), &attr);
7503 ok(hr == S_OK, "ret %08x\n", hr );
7504 V_VT(&data) = VT_BSTR;
7505 V_BSTR(&data) = _bstr_("Jeeves & Wooster");
7506 hr = IXMLDOMAttribute_put_nodeValue(attr, data);
7507 ok(hr == S_OK, "ret %08x\n", hr );
7508 hr = IXMLDOMAttribute_get_nodeValue(attr, &data);
7509 ok(hr == S_OK, "ret %08x\n", hr );
7510 ok(memcmp(V_BSTR(&data), jeevesW, sizeof(jeevesW)) == 0, "got %s\n",
7511 wine_dbgstr_w(V_BSTR(&data)));
7512 VariantClear(&data);
7513 IXMLDOMAttribute_Release(attr);
7517 IXMLDOMDocument_Release(doc);
7520 static void test_document_IObjectSafety(void)
7522 IXMLDOMDocument *doc;
7523 IObjectSafety *safety;
7526 doc = create_document(&IID_IXMLDOMDocument);
7529 hr = IXMLDOMDocument_QueryInterface(doc, &IID_IObjectSafety, (void**)&safety);
7530 ok(hr == S_OK, "ret %08x\n", hr );
7532 test_IObjectSafety_common(safety);
7534 IObjectSafety_Release(safety);
7536 IXMLDOMDocument_Release(doc);
7539 typedef struct _property_test_t {
7542 const char *property;
7546 static const property_test_t properties_test_data[] = {
7547 { &CLSID_DOMDocument, "CLSID_DOMDocument" , "SelectionLanguage", "XSLPattern" },
7548 { &CLSID_DOMDocument2, "CLSID_DOMDocument2" , "SelectionLanguage", "XSLPattern" },
7549 { &CLSID_DOMDocument30, "CLSID_DOMDocument30", "SelectionLanguage", "XSLPattern" },
7550 { &CLSID_DOMDocument40, "CLSID_DOMDocument40", "SelectionLanguage", "XPath" },
7551 { &CLSID_DOMDocument60, "CLSID_DOMDocument60", "SelectionLanguage", "XPath" },
7555 static void test_default_properties(void)
7557 const property_test_t *entry = properties_test_data;
7558 IXMLDOMDocument2 *doc;
7564 hr = CoCreateInstance(entry->guid, NULL, CLSCTX_INPROC_SERVER, &IID_IXMLDOMDocument2, (void**)&doc);
7567 win_skip("can't create %s instance\n", entry->clsid);
7572 hr = IXMLDOMDocument2_getProperty(doc, _bstr_(entry->property), &var);
7573 ok(hr == S_OK, "got 0x%08x\n", hr);
7574 ok(lstrcmpW(V_BSTR(&var), _bstr_(entry->value)) == 0, "expected %s, for %s\n",
7575 entry->value, entry->clsid);
7578 IXMLDOMDocument2_Release(doc);
7584 static void test_XSLPattern(void)
7586 IXMLDOMDocument2 *doc;
7587 IXMLDOMNodeList *list;
7591 doc = create_document(&IID_IXMLDOMDocument2);
7594 ole_check(IXMLDOMDocument2_loadXML(doc, _bstr_(szExampleXML), &b));
7595 ok(b == VARIANT_TRUE, "failed to load XML string\n");
7597 /* switch to XSLPattern */
7598 ole_check(IXMLDOMDocument2_setProperty(doc, _bstr_("SelectionLanguage"), _variantbstr_("XSLPattern")));
7600 /* XPath doesn't select elements with non-null default namespace with unqualified selectors, XSLPattern does */
7601 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("//elem/c"), &list));
7603 ole_check(IXMLDOMNodeList_get_length(list, &len));
7604 /* should select <elem><c> and <elem xmlns='...'><c> but not <elem><foo:c> */
7605 ok(len == 3, "expected 3 entries in list, got %d\n", len);
7606 IXMLDOMNodeList_Release(list);
7608 /* for XSLPattern start index is 0, for XPath it's 1 */
7609 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("root//elem[0]"), &list));
7611 ole_check(IXMLDOMNodeList_get_length(list, &len));
7612 ok(len != 0, "expected filled list\n");
7614 expect_list_and_release(list, "E1.E2.D1");
7617 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("root//elem[index()=1]"), &list));
7619 ole_check(IXMLDOMNodeList_get_length(list, &len));
7620 ok(len != 0, "expected filled list\n");
7622 expect_list_and_release(list, "E2.E2.D1");
7625 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("root//elem[index() $eq$ 1]"), &list));
7627 ole_check(IXMLDOMNodeList_get_length(list, &len));
7628 ok(len != 0, "expected filled list\n");
7630 expect_list_and_release(list, "E2.E2.D1");
7633 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("root//elem[end()]"), &list));
7635 ole_check(IXMLDOMNodeList_get_length(list, &len));
7636 ok(len != 0, "expected filled list\n");
7638 expect_list_and_release(list, "E4.E2.D1");
7641 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("root//elem[$not$ end()]"), &list));
7643 ole_check(IXMLDOMNodeList_get_length(list, &len));
7644 ok(len != 0, "expected filled list\n");
7646 expect_list_and_release(list, "E1.E2.D1 E2.E2.D1 E3.E2.D1");
7649 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("root//elem[index() != 0]"), &list));
7651 ole_check(IXMLDOMNodeList_get_length(list, &len));
7652 ok(len != 0, "expected filled list\n");
7654 expect_list_and_release(list, "E2.E2.D1 E3.E2.D1 E4.E2.D1");
7655 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("root//elem[index() $ne$ 0]"), &list));
7657 ole_check(IXMLDOMNodeList_get_length(list, &len));
7658 ok(len != 0, "expected filled list\n");
7660 expect_list_and_release(list, "E2.E2.D1 E3.E2.D1 E4.E2.D1");
7663 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("root//elem[index() < 2]"), &list));
7665 ole_check(IXMLDOMNodeList_get_length(list, &len));
7666 ok(len != 0, "expected filled list\n");
7668 expect_list_and_release(list, "E1.E2.D1 E2.E2.D1");
7669 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("root//elem[index() $lt$ 2]"), &list));
7671 ole_check(IXMLDOMNodeList_get_length(list, &len));
7672 ok(len != 0, "expected filled list\n");
7674 expect_list_and_release(list, "E1.E2.D1 E2.E2.D1");
7677 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("root//elem[index() <= 1]"), &list));
7679 ole_check(IXMLDOMNodeList_get_length(list, &len));
7680 ok(len != 0, "expected filled list\n");
7682 expect_list_and_release(list, "E1.E2.D1 E2.E2.D1");
7683 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("root//elem[index() $le$ 1]"), &list));
7685 ole_check(IXMLDOMNodeList_get_length(list, &len));
7686 ok(len != 0, "expected filled list\n");
7688 expect_list_and_release(list, "E1.E2.D1 E2.E2.D1");
7691 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("root//elem[index() > 1]"), &list));
7693 ole_check(IXMLDOMNodeList_get_length(list, &len));
7694 ok(len != 0, "expected filled list\n");
7696 expect_list_and_release(list, "E3.E2.D1 E4.E2.D1");
7697 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("root//elem[index() $gt$ 1]"), &list));
7699 ole_check(IXMLDOMNodeList_get_length(list, &len));
7700 ok(len != 0, "expected filled list\n");
7702 expect_list_and_release(list, "E3.E2.D1 E4.E2.D1");
7705 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("root//elem[index() >= 2]"), &list));
7707 ole_check(IXMLDOMNodeList_get_length(list, &len));
7708 ok(len != 0, "expected filled list\n");
7710 expect_list_and_release(list, "E3.E2.D1 E4.E2.D1");
7711 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("root//elem[index() $ge$ 2]"), &list));
7713 ole_check(IXMLDOMNodeList_get_length(list, &len));
7714 ok(len != 0, "expected filled list\n");
7716 expect_list_and_release(list, "E3.E2.D1 E4.E2.D1");
7719 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("root//elem[a $ieq$ 'a2 field']"), &list));
7721 ole_check(IXMLDOMNodeList_get_length(list, &len));
7722 ok(len != 0, "expected filled list\n");
7724 expect_list_and_release(list, "E2.E2.D1");
7727 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("root//elem[a $ine$ 'a2 field']"), &list));
7729 ole_check(IXMLDOMNodeList_get_length(list, &len));
7730 ok(len != 0, "expected filled list\n");
7732 expect_list_and_release(list, "E1.E2.D1 E3.E2.D1 E4.E2.D1");
7735 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("root//elem[a $ilt$ 'a3 field']"), &list));
7737 ole_check(IXMLDOMNodeList_get_length(list, &len));
7738 ok(len != 0, "expected filled list\n");
7740 expect_list_and_release(list, "E1.E2.D1 E2.E2.D1");
7743 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("root//elem[a $ile$ 'a2 field']"), &list));
7745 ole_check(IXMLDOMNodeList_get_length(list, &len));
7746 ok(len != 0, "expected filled list\n");
7748 expect_list_and_release(list, "E1.E2.D1 E2.E2.D1");
7751 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("root//elem[a $igt$ 'a2 field']"), &list));
7753 ole_check(IXMLDOMNodeList_get_length(list, &len));
7754 ok(len != 0, "expected filled list\n");
7756 expect_list_and_release(list, "E3.E2.D1 E4.E2.D1");
7759 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("root//elem[a $ige$ 'a3 field']"), &list));
7761 ole_check(IXMLDOMNodeList_get_length(list, &len));
7762 ok(len != 0, "expected filled list\n");
7764 expect_list_and_release(list, "E3.E2.D1 E4.E2.D1");
7767 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("root//elem[$any$ *='B2 field']"), &list));
7769 ole_check(IXMLDOMNodeList_get_length(list, &len));
7770 ok(len != 0, "expected filled list\n");
7772 expect_list_and_release(list, "E2.E2.D1");
7775 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("root//elem[$all$ *!='B2 field']"), &list));
7777 ole_check(IXMLDOMNodeList_get_length(list, &len));
7778 ok(len != 0, "expected filled list\n");
7780 expect_list_and_release(list, "E1.E2.D1 E3.E2.D1 E4.E2.D1");
7783 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("root//elem[index()=0 or end()]"), &list));
7785 ole_check(IXMLDOMNodeList_get_length(list, &len));
7786 ok(len != 0, "expected filled list\n");
7788 expect_list_and_release(list, "E1.E2.D1 E4.E2.D1");
7789 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("root//elem[index()=0 $or$ end()]"), &list));
7791 ole_check(IXMLDOMNodeList_get_length(list, &len));
7792 ok(len != 0, "expected filled list\n");
7794 expect_list_and_release(list, "E1.E2.D1 E4.E2.D1");
7795 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("root//elem[index()=0 || end()]"), &list));
7797 ole_check(IXMLDOMNodeList_get_length(list, &len));
7798 ok(len != 0, "expected filled list\n");
7800 expect_list_and_release(list, "E1.E2.D1 E4.E2.D1");
7803 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("root//elem[index()>0 and $not$ end()]"), &list));
7805 ole_check(IXMLDOMNodeList_get_length(list, &len));
7806 ok(len != 0, "expected filled list\n");
7808 expect_list_and_release(list, "E2.E2.D1 E3.E2.D1");
7809 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("root//elem[index()>0 $and$ $not$ end()]"), &list));
7811 ole_check(IXMLDOMNodeList_get_length(list, &len));
7812 ok(len != 0, "expected filled list\n");
7814 expect_list_and_release(list, "E2.E2.D1 E3.E2.D1");
7815 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("root//elem[index()>0 && $not$ end()]"), &list));
7817 ole_check(IXMLDOMNodeList_get_length(list, &len));
7818 ok(len != 0, "expected filled list\n");
7820 expect_list_and_release(list, "E2.E2.D1 E3.E2.D1");
7822 /* namespace handling */
7823 /* no registered namespaces */
7824 ole_check(IXMLDOMDocument2_setProperty(doc, _bstr_("SelectionNamespaces"), _variantbstr_("")));
7827 /* prefixes don't need to be registered, you may use them as they are in the doc */
7828 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("//bar:x"), &list));
7830 ole_check(IXMLDOMNodeList_get_length(list, &len));
7831 ok(len != 0, "expected filled list\n");
7833 expect_list_and_release(list, "E5.E1.E4.E1.E2.D1 E6.E2.E4.E1.E2.D1");
7835 /* prefixes must be explicitly specified in the name */
7836 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("//foo:elem"), &list));
7838 ole_check(IXMLDOMNodeList_get_length(list, &len));
7839 ok(len == 0, "expected empty list\n");
7840 IXMLDOMNodeList_Release(list);
7842 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("//foo:c"), &list));
7844 ole_check(IXMLDOMNodeList_get_length(list, &len));
7845 ok(len != 0, "expected filled list\n");
7847 expect_list_and_release(list, "E3.E4.E2.D1");
7849 /* explicitly register prefix foo */
7850 ole_check(IXMLDOMDocument2_setProperty(doc, _bstr_("SelectionNamespaces"), _variantbstr_("xmlns:foo='urn:uuid:86B2F87F-ACB6-45cd-8B77-9BDB92A01A29'")));
7852 /* now we get the same behavior as XPath */
7853 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("//foo:c"), &list));
7855 ole_check(IXMLDOMNodeList_get_length(list, &len));
7856 ok(len != 0, "expected filled list\n");
7858 expect_list_and_release(list, "E3.E3.E2.D1 E3.E4.E2.D1");
7860 /* set prefix foo to some nonexistent namespace */
7861 ole_check(IXMLDOMDocument2_setProperty(doc, _bstr_("SelectionNamespaces"), _variantbstr_("xmlns:foo='urn:nonexistent-foo'")));
7863 /* the registered prefix takes precedence */
7864 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("//foo:c"), &list));
7866 ole_check(IXMLDOMNodeList_get_length(list, &len));
7867 ok(len == 0, "expected empty list\n");
7868 IXMLDOMNodeList_Release(list);
7870 IXMLDOMDocument2_Release(doc);
7872 doc = create_document(&IID_IXMLDOMDocument2);
7875 ole_check(IXMLDOMDocument2_loadXML(doc, _bstr_(szNodeTypesXML), &b));
7876 ok(b == VARIANT_TRUE, "failed to load XML string\n");
7880 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("attribute()"), &list));
7882 ole_check(IXMLDOMNodeList_get_length(list, &len));
7883 ok(len == 0, "expected empty list\n");
7884 IXMLDOMNodeList_Release(list);
7886 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("attribute('depth')"), &list));
7888 ole_check(IXMLDOMNodeList_get_length(list, &len));
7889 ok(len == 0, "expected empty list\n");
7890 IXMLDOMNodeList_Release(list);
7892 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("root/attribute('depth')"), &list));
7894 ole_check(IXMLDOMNodeList_get_length(list, &len));
7895 ok(len != 0, "expected filled list\n");
7896 expect_list_and_release(list, "A'depth'.E3.D1");
7898 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("//x/attribute()"), &list));
7900 ole_check(IXMLDOMNodeList_get_length(list, &len));
7901 ok(len != 0, "expected filled list\n");
7902 expect_list_and_release(list, "A'id'.E3.E3.D1 A'depth'.E3.E3.D1");
7905 ole_expect(IXMLDOMDocument2_selectNodes(doc, _bstr_("//x//attribute(id)"), &list), E_FAIL);
7907 IXMLDOMNodeList_Release(list);
7908 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("//x//attribute('id')"), &list));
7910 ole_check(IXMLDOMNodeList_get_length(list, &len));
7911 ok(len != 0, "expected filled list\n");
7913 expect_list_and_release(list, "A'id'.E3.E3.D1 A'id'.E4.E3.E3.D1 A'id'.E5.E3.E3.D1 A'id'.E6.E3.E3.D1");
7916 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("comment()"), &list));
7918 ole_check(IXMLDOMNodeList_get_length(list, &len));
7919 ok(len != 0, "expected filled list\n");
7921 expect_list_and_release(list, "C2.D1");
7923 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("//comment()"), &list));
7925 ole_check(IXMLDOMNodeList_get_length(list, &len));
7926 ok(len != 0, "expected filled list\n");
7928 expect_list_and_release(list, "C2.D1 C1.E3.D1 C2.E3.E3.D1 C2.E4.E3.D1");
7931 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("element()"), &list));
7933 ole_check(IXMLDOMNodeList_get_length(list, &len));
7934 ok(len != 0, "expected filled list\n");
7936 expect_list_and_release(list, "E3.D1");
7938 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("root/y/element()"), &list));
7940 ole_check(IXMLDOMNodeList_get_length(list, &len));
7941 ok(len != 0, "expected filled list\n");
7943 expect_list_and_release(list, "E4.E4.E3.D1 E5.E4.E3.D1 E6.E4.E3.D1");
7946 ole_expect(IXMLDOMDocument2_selectNodes(doc, _bstr_("//element(a)"), &list), E_FAIL);
7948 IXMLDOMNodeList_Release(list);
7949 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("//element('a')"), &list));
7951 ole_check(IXMLDOMNodeList_get_length(list, &len));
7952 ok(len != 0, "expected filled list\n");
7954 expect_list_and_release(list, "E4.E3.E3.D1 E4.E4.E3.D1");
7957 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("node()"), &list));
7959 ole_check(IXMLDOMNodeList_get_length(list, &len));
7960 ok(len != 0, "expected filled list\n");
7962 expect_list_and_release(list, "P1.D1 C2.D1 E3.D1");
7964 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("//x/node()"), &list));
7966 ole_check(IXMLDOMNodeList_get_length(list, &len));
7967 ok(len != 0, "expected filled list\n");
7969 expect_list_and_release(list, "P1.E3.E3.D1 C2.E3.E3.D1 T3.E3.E3.D1 E4.E3.E3.D1 E5.E3.E3.D1 E6.E3.E3.D1");
7972 /* XML_ELEMENT_NODE */
7973 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("//x/node()[nodeType()=1]"), &list));
7975 ole_check(IXMLDOMNodeList_get_length(list, &len));
7976 ok(len != 0, "expected filled list\n");
7978 expect_list_and_release(list, "E4.E3.E3.D1 E5.E3.E3.D1 E6.E3.E3.D1");
7980 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("//x/node()[nodeType()=3]"), &list));
7982 ole_check(IXMLDOMNodeList_get_length(list, &len));
7983 ok(len != 0, "expected filled list\n");
7985 expect_list_and_release(list, "T3.E3.E3.D1");
7987 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("//x/node()[nodeType()=7]"), &list));
7989 ole_check(IXMLDOMNodeList_get_length(list, &len));
7990 ok(len != 0, "expected filled list\n");
7992 expect_list_and_release(list, "P1.E3.E3.D1");
7993 /* XML_COMMENT_NODE */
7994 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("//x/node()[nodeType()=8]"), &list));
7996 ole_check(IXMLDOMNodeList_get_length(list, &len));
7997 ok(len != 0, "expected filled list\n");
7999 expect_list_and_release(list, "C2.E3.E3.D1");
8002 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("pi()"), &list));
8006 ole_check(IXMLDOMNodeList_get_length(list, &len));
8007 ok(len != 0, "expected filled list\n");
8009 expect_list_and_release(list, "P1.D1");
8012 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("//y/pi()"), &list));
8014 ole_check(IXMLDOMNodeList_get_length(list, &len));
8015 ok(len != 0, "expected filled list\n");
8017 expect_list_and_release(list, "P1.E4.E3.D1");
8020 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("root/textnode()"), &list));
8022 ole_check(IXMLDOMNodeList_get_length(list, &len));
8023 ok(len != 0, "expected filled list\n");
8025 expect_list_and_release(list, "T2.E3.D1");
8027 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("root/element()/textnode()"), &list));
8029 ole_check(IXMLDOMNodeList_get_length(list, &len));
8030 ok(len != 0, "expected filled list\n");
8032 expect_list_and_release(list, "T3.E3.E3.D1 T3.E4.E3.D1");
8034 IXMLDOMDocument2_Release(doc);
8038 static void test_splitText(void)
8040 IXMLDOMCDATASection *cdata;
8041 IXMLDOMElement *root;
8042 IXMLDOMDocument *doc;
8043 IXMLDOMText *text, *text2;
8046 VARIANT_BOOL success;
8050 doc = create_document(&IID_IXMLDOMDocument);
8053 hr = IXMLDOMDocument_loadXML(doc, _bstr_("<root></root>"), &success);
8054 ok(hr == S_OK, "got 0x%08x\n", hr);
8056 hr = IXMLDOMDocument_get_documentElement(doc, &root);
8057 ok(hr == S_OK, "got 0x%08x\n", hr);
8059 hr = IXMLDOMDocument_createCDATASection(doc, _bstr_("beautiful plumage"), &cdata);
8060 ok(hr == S_OK, "got 0x%08x\n", hr);
8062 V_VT(&var) = VT_EMPTY;
8063 hr = IXMLDOMElement_appendChild(root, (IXMLDOMNode*)cdata, NULL);
8064 ok(hr == S_OK, "got 0x%08x\n", hr);
8067 hr = IXMLDOMCDATASection_get_length(cdata, &length);
8068 ok(hr == S_OK, "got 0x%08x\n", hr);
8069 ok(length > 0, "got %d\n", length);
8071 hr = IXMLDOMCDATASection_splitText(cdata, 0, NULL);
8072 ok(hr == E_INVALIDARG, "got 0x%08x\n", hr);
8074 text = (void*)0xdeadbeef;
8075 /* negative offset */
8076 hr = IXMLDOMCDATASection_splitText(cdata, -1, &text);
8077 ok(hr == E_INVALIDARG, "got 0x%08x\n", hr);
8078 ok(text == (void*)0xdeadbeef, "got %p\n", text);
8080 text = (void*)0xdeadbeef;
8081 /* offset outside data */
8082 hr = IXMLDOMCDATASection_splitText(cdata, length + 1, &text);
8083 ok(hr == E_INVALIDARG, "got 0x%08x\n", hr);
8084 ok(text == 0, "got %p\n", text);
8086 text = (void*)0xdeadbeef;
8087 /* offset outside data */
8088 hr = IXMLDOMCDATASection_splitText(cdata, length, &text);
8089 ok(hr == S_FALSE, "got 0x%08x\n", hr);
8090 ok(text == 0, "got %p\n", text);
8092 /* no empty node created */
8093 node = (void*)0xdeadbeef;
8094 hr = IXMLDOMCDATASection_get_nextSibling(cdata, &node);
8095 ok(hr == S_FALSE, "got 0x%08x\n", hr);
8096 ok(node == 0, "got %p\n", text);
8098 hr = IXMLDOMCDATASection_splitText(cdata, 10, &text);
8099 ok(hr == S_OK, "got 0x%08x\n", hr);
8102 hr = IXMLDOMText_get_length(text, &length);
8103 ok(hr == S_OK, "got 0x%08x\n", hr);
8104 ok(length == 7, "got %d\n", length);
8106 hr = IXMLDOMCDATASection_get_nextSibling(cdata, &node);
8107 ok(hr == S_OK, "got 0x%08x\n", hr);
8108 IXMLDOMNode_Release(node);
8110 /* split new text node */
8111 hr = IXMLDOMText_get_length(text, &length);
8112 ok(hr == S_OK, "got 0x%08x\n", hr);
8114 node = (void*)0xdeadbeef;
8115 hr = IXMLDOMText_get_nextSibling(text, &node);
8116 ok(hr == S_FALSE, "got 0x%08x\n", hr);
8117 ok(node == 0, "got %p\n", text);
8119 hr = IXMLDOMText_splitText(text, 0, NULL);
8120 ok(hr == E_INVALIDARG, "got 0x%08x\n", hr);
8122 text2 = (void*)0xdeadbeef;
8123 /* negative offset */
8124 hr = IXMLDOMText_splitText(text, -1, &text2);
8125 ok(hr == E_INVALIDARG, "got 0x%08x\n", hr);
8126 ok(text2 == (void*)0xdeadbeef, "got %p\n", text2);
8128 text2 = (void*)0xdeadbeef;
8129 /* offset outside data */
8130 hr = IXMLDOMText_splitText(text, length + 1, &text2);
8131 ok(hr == E_INVALIDARG, "got 0x%08x\n", hr);
8132 ok(text2 == 0, "got %p\n", text2);
8134 text2 = (void*)0xdeadbeef;
8135 /* offset outside data */
8136 hr = IXMLDOMText_splitText(text, length, &text2);
8137 ok(hr == S_FALSE, "got 0x%08x\n", hr);
8138 ok(text2 == 0, "got %p\n", text);
8141 hr = IXMLDOMText_splitText(text, 4, &text2);
8142 todo_wine ok(hr == S_OK, "got 0x%08x\n", hr);
8143 if (text2) IXMLDOMText_Release(text2);
8146 hr = IXMLDOMText_get_nextSibling(text, &node);
8147 todo_wine ok(hr == S_OK, "got 0x%08x\n", hr);
8148 if (node) IXMLDOMNode_Release(node);
8150 IXMLDOMText_Release(text);
8151 IXMLDOMElement_Release(root);
8152 IXMLDOMCDATASection_Release(cdata);
8156 static void test_getQualifiedItem(void)
8158 IXMLDOMDocument *doc;
8159 IXMLDOMElement *element;
8160 IXMLDOMNode *pr_node, *node;
8161 IXMLDOMNodeList *root_list;
8162 IXMLDOMNamedNodeMap *map;
8168 doc = create_document(&IID_IXMLDOMDocument);
8171 str = SysAllocString( szComplete4 );
8172 hr = IXMLDOMDocument_loadXML( doc, str, &b );
8173 ok( hr == S_OK, "loadXML failed\n");
8174 ok( b == VARIANT_TRUE, "failed to load XML string\n");
8175 SysFreeString( str );
8177 hr = IXMLDOMDocument_get_documentElement(doc, &element);
8178 ok( hr == S_OK, "ret %08x\n", hr);
8180 hr = IXMLDOMElement_get_childNodes(element, &root_list);
8181 ok( hr == S_OK, "ret %08x\n", hr);
8183 hr = IXMLDOMNodeList_get_item(root_list, 1, &pr_node);
8184 ok( hr == S_OK, "ret %08x\n", hr);
8185 IXMLDOMNodeList_Release(root_list);
8187 hr = IXMLDOMNode_get_attributes(pr_node, &map);
8188 ok( hr == S_OK, "ret %08x\n", hr);
8189 IXMLDOMNode_Release(pr_node);
8191 hr = IXMLDOMNamedNodeMap_get_length(map, &len);
8192 ok( hr == S_OK, "ret %08x\n", hr);
8193 ok( len == 3, "length %d\n", len);
8195 hr = IXMLDOMNamedNodeMap_getQualifiedItem(map, NULL, NULL, NULL);
8196 ok( hr == E_INVALIDARG, "ret %08x\n", hr);
8198 node = (void*)0xdeadbeef;
8199 hr = IXMLDOMNamedNodeMap_getQualifiedItem(map, NULL, NULL, &node);
8200 ok( hr == E_INVALIDARG, "ret %08x\n", hr);
8201 ok( node == (void*)0xdeadbeef, "got %p\n", node);
8203 hr = IXMLDOMNamedNodeMap_getQualifiedItem(map, _bstr_("id"), NULL, NULL);
8204 ok( hr == E_INVALIDARG, "ret %08x\n", hr);
8206 hr = IXMLDOMNamedNodeMap_getQualifiedItem(map, _bstr_("id"), NULL, &node);
8207 ok( hr == S_OK, "ret %08x\n", hr);
8208 IXMLDOMNode_Release(node);
8210 IXMLDOMNamedNodeMap_Release( map );
8211 IXMLDOMElement_Release( element );
8212 IXMLDOMDocument_Release( doc );
8216 static void test_removeQualifiedItem(void)
8218 IXMLDOMDocument *doc;
8219 IXMLDOMElement *element;
8220 IXMLDOMNode *pr_node, *node;
8221 IXMLDOMNodeList *root_list;
8222 IXMLDOMNamedNodeMap *map;
8228 doc = create_document(&IID_IXMLDOMDocument);
8231 str = SysAllocString( szComplete4 );
8232 hr = IXMLDOMDocument_loadXML( doc, str, &b );
8233 ok( hr == S_OK, "loadXML failed\n");
8234 ok( b == VARIANT_TRUE, "failed to load XML string\n");
8235 SysFreeString( str );
8237 hr = IXMLDOMDocument_get_documentElement(doc, &element);
8238 ok( hr == S_OK, "ret %08x\n", hr);
8240 hr = IXMLDOMElement_get_childNodes(element, &root_list);
8241 ok( hr == S_OK, "ret %08x\n", hr);
8243 hr = IXMLDOMNodeList_get_item(root_list, 1, &pr_node);
8244 ok( hr == S_OK, "ret %08x\n", hr);
8245 IXMLDOMNodeList_Release(root_list);
8247 hr = IXMLDOMNode_get_attributes(pr_node, &map);
8248 ok( hr == S_OK, "ret %08x\n", hr);
8249 IXMLDOMNode_Release(pr_node);
8251 hr = IXMLDOMNamedNodeMap_get_length(map, &len);
8252 ok( hr == S_OK, "ret %08x\n", hr);
8253 ok( len == 3, "length %d\n", len);
8255 hr = IXMLDOMNamedNodeMap_removeQualifiedItem(map, NULL, NULL, NULL);
8256 ok( hr == E_INVALIDARG, "ret %08x\n", hr);
8258 node = (void*)0xdeadbeef;
8259 hr = IXMLDOMNamedNodeMap_removeQualifiedItem(map, NULL, NULL, &node);
8260 ok( hr == E_INVALIDARG, "ret %08x\n", hr);
8261 ok( node == (void*)0xdeadbeef, "got %p\n", node);
8263 /* out pointer is optional */
8264 hr = IXMLDOMNamedNodeMap_removeQualifiedItem(map, _bstr_("id"), NULL, NULL);
8265 ok( hr == S_OK, "ret %08x\n", hr);
8267 /* already removed */
8268 hr = IXMLDOMNamedNodeMap_removeQualifiedItem(map, _bstr_("id"), NULL, NULL);
8269 ok( hr == S_FALSE, "ret %08x\n", hr);
8271 hr = IXMLDOMNamedNodeMap_removeQualifiedItem(map, _bstr_("vr"), NULL, &node);
8272 ok( hr == S_OK, "ret %08x\n", hr);
8273 IXMLDOMNode_Release(node);
8275 IXMLDOMNamedNodeMap_Release( map );
8276 IXMLDOMElement_Release( element );
8277 IXMLDOMDocument_Release( doc );
8281 #define check_default_props(doc) _check_default_props(__LINE__, doc)
8282 static inline void _check_default_props(int line, IXMLDOMDocument2* doc)
8289 helper_ole_check(IXMLDOMDocument2_getProperty(doc, _bstr_("SelectionLanguage"), &var));
8290 ok_(__FILE__, line)(lstrcmpW(V_BSTR(&var), _bstr_("XSLPattern")) == 0, "expected XSLPattern\n");
8293 helper_ole_check(IXMLDOMDocument2_getProperty(doc, _bstr_("SelectionNamespaces"), &var));
8294 ok_(__FILE__, line)(lstrcmpW(V_BSTR(&var), _bstr_("")) == 0, "expected empty string\n");
8297 helper_ole_check(IXMLDOMDocument2_get_preserveWhiteSpace(doc, &b));
8298 ok_(__FILE__, line)(b == VARIANT_FALSE, "expected FALSE\n");
8300 hr = IXMLDOMDocument2_get_schemas(doc, &var);
8301 ok_(__FILE__, line)(hr == S_FALSE, "got %08x\n", hr);
8305 #define check_set_props(doc) _check_set_props(__LINE__, doc)
8306 static inline void _check_set_props(int line, IXMLDOMDocument2* doc)
8312 helper_ole_check(IXMLDOMDocument2_getProperty(doc, _bstr_("SelectionLanguage"), &var));
8313 ok_(__FILE__, line)(lstrcmpW(V_BSTR(&var), _bstr_("XPath")) == 0, "expected XPath\n");
8316 helper_ole_check(IXMLDOMDocument2_getProperty(doc, _bstr_("SelectionNamespaces"), &var));
8317 ok_(__FILE__, line)(lstrcmpW(V_BSTR(&var), _bstr_("xmlns:wi=\'www.winehq.org\'")) == 0, "got %s\n", wine_dbgstr_w(V_BSTR(&var)));
8320 helper_ole_check(IXMLDOMDocument2_get_preserveWhiteSpace(doc, &b));
8321 ok_(__FILE__, line)(b == VARIANT_TRUE, "expected TRUE\n");
8323 helper_ole_check(IXMLDOMDocument2_get_schemas(doc, &var));
8324 ok_(__FILE__, line)(V_VT(&var) != VT_NULL, "expected pointer\n");
8328 #define set_props(doc, cache) _set_props(__LINE__, doc, cache)
8329 static inline void _set_props(int line, IXMLDOMDocument2* doc, IXMLDOMSchemaCollection* cache)
8334 helper_ole_check(IXMLDOMDocument2_setProperty(doc, _bstr_("SelectionLanguage"), _variantbstr_("XPath")));
8335 helper_ole_check(IXMLDOMDocument2_setProperty(doc, _bstr_("SelectionNamespaces"), _variantbstr_("xmlns:wi=\'www.winehq.org\'")));
8336 helper_ole_check(IXMLDOMDocument2_put_preserveWhiteSpace(doc, VARIANT_TRUE));
8337 V_VT(&var) = VT_DISPATCH;
8338 V_DISPATCH(&var) = NULL;
8339 helper_ole_check(IXMLDOMSchemaCollection_QueryInterface(cache, &IID_IDispatch, (void**)&V_DISPATCH(&var)));
8340 ok_(__FILE__, line)(V_DISPATCH(&var) != NULL, "expected pointer\n");
8341 helper_ole_check(IXMLDOMDocument2_putref_schemas(doc, var));
8345 #define unset_props(doc) _unset_props(__LINE__, doc)
8346 static inline void _unset_props(int line, IXMLDOMDocument2* doc)
8351 helper_ole_check(IXMLDOMDocument2_setProperty(doc, _bstr_("SelectionLanguage"), _variantbstr_("XSLPattern")));
8352 helper_ole_check(IXMLDOMDocument2_setProperty(doc, _bstr_("SelectionNamespaces"), _variantbstr_("")));
8353 helper_ole_check(IXMLDOMDocument2_put_preserveWhiteSpace(doc, VARIANT_FALSE));
8354 V_VT(&var) = VT_NULL;
8355 helper_ole_check(IXMLDOMDocument2_putref_schemas(doc, var));
8359 static void test_get_ownerDocument(void)
8361 IXMLDOMDocument *doc1, *doc2, *doc3;
8362 IXMLDOMDocument2 *doc, *doc_owner;
8364 IXMLDOMSchemaCollection *cache;
8369 doc = create_document(&IID_IXMLDOMDocument2);
8370 cache = create_cache(&IID_IXMLDOMSchemaCollection);
8373 if (doc) IXMLDOMDocument2_Release(doc);
8374 if (cache) IXMLDOMSchemaCollection_Release(cache);
8380 str = SysAllocString(szComplete4);
8381 ole_check(IXMLDOMDocument_loadXML(doc, str, &b));
8382 ok(b == VARIANT_TRUE, "failed to load XML string\n");
8385 check_default_props(doc);
8387 /* set properties and check that new instances use them */
8388 set_props(doc, cache);
8389 check_set_props(doc);
8391 ole_check(IXMLDOMDocument2_get_firstChild(doc, &node));
8392 ole_check(IXMLDOMNode_get_ownerDocument(node, &doc1));
8394 /* new interface keeps props */
8395 ole_check(IXMLDOMDocument_QueryInterface(doc1, &IID_IXMLDOMDocument2, (void**)&doc_owner));
8396 ok( doc_owner != doc, "got %p, doc %p\n", doc_owner, doc);
8397 check_set_props(doc_owner);
8398 IXMLDOMDocument2_Release(doc_owner);
8400 ole_check(IXMLDOMNode_get_ownerDocument(node, &doc2));
8401 IXMLDOMNode_Release(node);
8403 ok(doc1 != doc2, "got %p, expected %p. original %p\n", doc2, doc1, doc);
8406 str = SysAllocString(szComplete4);
8407 ole_check(IXMLDOMDocument2_loadXML(doc, str, &b));
8408 ok(b == VARIANT_TRUE, "failed to load XML string\n");
8411 /* properties retained even after reload */
8412 check_set_props(doc);
8414 ole_check(IXMLDOMDocument2_get_firstChild(doc, &node));
8415 ole_check(IXMLDOMNode_get_ownerDocument(node, &doc3));
8416 IXMLDOMNode_Release(node);
8418 ole_check(IXMLDOMDocument_QueryInterface(doc3, &IID_IXMLDOMDocument2, (void**)&doc_owner));
8419 ok(doc3 != doc1 && doc3 != doc2 && doc_owner != doc, "got %p, (%p, %p, %p)\n", doc3, doc, doc1, doc2);
8420 check_set_props(doc_owner);
8422 /* changing properties for one instance changes them for all */
8423 unset_props(doc_owner);
8424 check_default_props(doc_owner);
8425 check_default_props(doc);
8427 IXMLDOMSchemaCollection_Release(cache);
8428 IXMLDOMDocument_Release(doc1);
8429 IXMLDOMDocument_Release(doc2);
8430 IXMLDOMDocument_Release(doc3);
8431 IXMLDOMDocument2_Release(doc);
8432 IXMLDOMDocument2_Release(doc_owner);
8436 static void test_setAttributeNode(void)
8438 IXMLDOMDocument *doc, *doc2;
8439 IXMLDOMElement *elem, *elem2;
8440 IXMLDOMAttribute *attr, *attr2, *ret_attr;
8447 doc = create_document(&IID_IXMLDOMDocument);
8450 str = SysAllocString( szComplete4 );
8451 hr = IXMLDOMDocument2_loadXML( doc, str, &b );
8452 ok( hr == S_OK, "loadXML failed\n");
8453 ok( b == VARIANT_TRUE, "failed to load XML string\n");
8454 SysFreeString( str );
8456 hr = IXMLDOMDocument_get_documentElement(doc, &elem);
8457 ok( hr == S_OK, "got 0x%08x\n", hr);
8459 hr = IXMLDOMDocument_get_documentElement(doc, &elem2);
8460 ok( hr == S_OK, "got 0x%08x\n", hr);
8461 ok( elem2 != elem, "got same instance\n");
8463 ret_attr = (void*)0xdeadbeef;
8464 hr = IXMLDOMElement_setAttributeNode(elem, NULL, &ret_attr);
8465 ok( hr == E_INVALIDARG, "got 0x%08x\n", hr);
8466 ok( ret_attr == (void*)0xdeadbeef, "got %p\n", ret_attr);
8468 hr = IXMLDOMDocument_createAttribute(doc, _bstr_("attr"), &attr);
8469 ok( hr == S_OK, "got 0x%08x\n", hr);
8471 ref1 = IXMLDOMElement_AddRef(elem);
8472 IXMLDOMElement_Release(elem);
8474 ret_attr = (void*)0xdeadbeef;
8475 hr = IXMLDOMElement_setAttributeNode(elem, attr, &ret_attr);
8476 ok( hr == S_OK, "got 0x%08x\n", hr);
8477 ok( ret_attr == NULL, "got %p\n", ret_attr);
8479 /* no reference added */
8480 ref2 = IXMLDOMElement_AddRef(elem);
8481 IXMLDOMElement_Release(elem);
8482 ok(ref2 == ref1, "got %d, expected %d\n", ref2, ref1);
8484 EXPECT_CHILDREN(elem);
8485 EXPECT_CHILDREN(elem2);
8487 IXMLDOMElement_Release(elem2);
8490 hr = IXMLDOMElement_getAttributeNode(elem, _bstr_("attr"), &attr2);
8491 ok( hr == S_OK, "got 0x%08x\n", hr);
8492 ok( attr2 != attr, "got same instance %p\n", attr2);
8493 IXMLDOMAttribute_Release(attr2);
8495 /* try to add it another time */
8496 ret_attr = (void*)0xdeadbeef;
8497 hr = IXMLDOMElement_setAttributeNode(elem, attr, &ret_attr);
8498 ok( hr == E_FAIL, "got 0x%08x\n", hr);
8499 ok( ret_attr == (void*)0xdeadbeef, "got %p\n", ret_attr);
8501 IXMLDOMElement_Release(elem);
8503 /* initially used element is released, attribute still 'has' a container */
8504 hr = IXMLDOMDocument_get_documentElement(doc, &elem);
8505 ok( hr == S_OK, "got 0x%08x\n", hr);
8506 ret_attr = (void*)0xdeadbeef;
8507 hr = IXMLDOMElement_setAttributeNode(elem, attr, &ret_attr);
8508 ok( hr == E_FAIL, "got 0x%08x\n", hr);
8509 ok( ret_attr == (void*)0xdeadbeef, "got %p\n", ret_attr);
8510 IXMLDOMElement_Release(elem);
8512 /* add attribute already attached to another document */
8513 doc2 = create_document(&IID_IXMLDOMDocument);
8515 str = SysAllocString( szComplete4 );
8516 hr = IXMLDOMDocument_loadXML( doc2, str, &b );
8517 ok( hr == S_OK, "loadXML failed\n");
8518 ok( b == VARIANT_TRUE, "failed to load XML string\n");
8519 SysFreeString( str );
8521 hr = IXMLDOMDocument_get_documentElement(doc2, &elem);
8522 ok( hr == S_OK, "got 0x%08x\n", hr);
8523 hr = IXMLDOMElement_setAttributeNode(elem, attr, NULL);
8524 ok( hr == E_FAIL, "got 0x%08x\n", hr);
8525 IXMLDOMElement_Release(elem);
8527 IXMLDOMAttribute_Release(attr);
8529 /* create element, add attribute, see if it's copied or linked */
8530 hr = IXMLDOMDocument_createElement(doc, _bstr_("test"), &elem);
8531 ok( hr == S_OK, "got 0x%08x\n", hr);
8534 hr = IXMLDOMDocument_createAttribute(doc, _bstr_("attr"), &attr);
8535 ok(hr == S_OK, "got 0x%08x\n", hr);
8536 ok(attr != NULL, "got %p\n", attr);
8538 ref1 = IXMLDOMAttribute_AddRef(attr);
8539 IXMLDOMAttribute_Release(attr);
8542 V_BSTR(&v) = _bstr_("attrvalue1");
8543 hr = IXMLDOMAttribute_put_nodeValue(attr, v);
8544 ok( hr == S_OK, "got 0x%08x\n", hr);
8547 hr = IXMLDOMAttribute_get_xml(attr, &str);
8548 ok( hr == S_OK, "got 0x%08x\n", hr);
8549 ok( lstrcmpW(str, _bstr_("attr=\"attrvalue1\"")) == 0,
8550 "got %s\n", wine_dbgstr_w(str));
8553 ret_attr = (void*)0xdeadbeef;
8554 hr = IXMLDOMElement_setAttributeNode(elem, attr, &ret_attr);
8555 ok(hr == S_OK, "got 0x%08x\n", hr);
8556 ok(ret_attr == NULL, "got %p\n", ret_attr);
8558 /* attribute reference increased */
8559 ref2 = IXMLDOMAttribute_AddRef(attr);
8560 IXMLDOMAttribute_Release(attr);
8561 ok(ref1 == ref2, "got %d, expected %d\n", ref2, ref1);
8563 hr = IXMLDOMElement_get_xml(elem, &str);
8564 ok( hr == S_OK, "got 0x%08x\n", hr);
8565 ok( lstrcmpW(str, _bstr_("<test attr=\"attrvalue1\"/>")) == 0,
8566 "got %s\n", wine_dbgstr_w(str));
8570 V_BSTR(&v) = _bstr_("attrvalue2");
8571 hr = IXMLDOMAttribute_put_nodeValue(attr, v);
8572 ok( hr == S_OK, "got 0x%08x\n", hr);
8574 hr = IXMLDOMElement_get_xml(elem, &str);
8575 ok( hr == S_OK, "got 0x%08x\n", hr);
8576 todo_wine ok( lstrcmpW(str, _bstr_("<test attr=\"attrvalue2\"/>")) == 0,
8577 "got %s\n", wine_dbgstr_w(str));
8580 IXMLDOMElement_Release(elem);
8581 IXMLDOMAttribute_Release(attr);
8582 IXMLDOMDocument_Release(doc2);
8583 IXMLDOMDocument_Release(doc);
8586 static void test_put_dataType(void)
8588 IXMLDOMCDATASection *cdata;
8589 IXMLDOMDocument *doc;
8594 doc = create_document(&IID_IXMLDOMDocument);
8597 str = SysAllocString( szComplete4 );
8598 hr = IXMLDOMDocument_loadXML( doc, str, &b );
8599 ok( hr == S_OK, "loadXML failed\n");
8600 ok( b == VARIANT_TRUE, "failed to load XML string\n");
8601 SysFreeString( str );
8603 hr = IXMLDOMDocument_createCDATASection(doc, _bstr_("test"), &cdata);
8604 ok( hr == S_OK, "got 0x%08x\n", hr);
8605 hr = IXMLDOMCDATASection_put_dataType(cdata, _bstr_("number"));
8606 ok( hr == E_FAIL, "got 0x%08x\n", hr);
8607 hr = IXMLDOMCDATASection_put_dataType(cdata, _bstr_("string"));
8608 ok( hr == E_FAIL, "got 0x%08x\n", hr);
8609 IXMLDOMCDATASection_Release(cdata);
8611 IXMLDOMDocument_Release(doc);
8615 static void test_createNode(void)
8617 IXMLDOMDocument *doc;
8618 IXMLDOMElement *elem;
8625 doc = create_document(&IID_IXMLDOMDocument);
8630 /* reference count tests */
8631 hr = IXMLDOMDocument_createElement(doc, _bstr_("elem"), &elem);
8632 ok( hr == S_OK, "got 0x%08x\n", hr);
8634 /* initial reference is 2 */
8636 EXPECT_REF(elem, 2);
8637 ref = IXMLDOMElement_Release(elem);
8638 ok(ref == 1, "got %d\n", ref);
8639 /* it's released already, attempt to release now will crash it */
8642 hr = IXMLDOMDocument_createElement(doc, _bstr_("elem"), &elem);
8643 ok( hr == S_OK, "got 0x%08x\n", hr);
8644 todo_wine EXPECT_REF(elem, 2);
8645 IXMLDOMDocument_Release(doc);
8646 todo_wine EXPECT_REF(elem, 2);
8647 IXMLDOMElement_Release(elem);
8649 doc = create_document(&IID_IXMLDOMDocument);
8651 /* NODE_ELEMENT nodes */
8652 /* 1. specified namespace */
8654 V_I4(&v) = NODE_ELEMENT;
8656 hr = IXMLDOMDocument_createNode(doc, v, _bstr_("ns1:test"), _bstr_("http://winehq.org"), &node);
8657 ok( hr == S_OK, "got 0x%08x\n", hr);
8659 hr = IXMLDOMNode_get_prefix(node, &prefix);
8660 ok( hr == S_OK, "got 0x%08x\n", hr);
8661 ok(lstrcmpW(prefix, _bstr_("ns1")) == 0, "wrong prefix\n");
8662 SysFreeString(prefix);
8663 IXMLDOMNode_Release(node);
8665 /* 2. default namespace */
8666 hr = IXMLDOMDocument_createNode(doc, v, _bstr_("test"), _bstr_("http://winehq.org/default"), &node);
8667 ok( hr == S_OK, "got 0x%08x\n", hr);
8668 prefix = (void*)0xdeadbeef;
8669 hr = IXMLDOMNode_get_prefix(node, &prefix);
8670 ok( hr == S_FALSE, "got 0x%08x\n", hr);
8671 ok(prefix == 0, "expected empty prefix, got %p\n", prefix);
8673 hr = IXMLDOMNode_get_xml(node, &str);
8674 ok( hr == S_OK, "got 0x%08x\n", hr);
8675 ok( lstrcmpW(str, _bstr_("<test xmlns=\"http://winehq.org/default\"/>")) == 0,
8676 "got %s\n", wine_dbgstr_w(str));
8679 hr = IXMLDOMNode_QueryInterface(node, &IID_IXMLDOMElement, (void**)&elem);
8680 ok( hr == S_OK, "got 0x%08x\n", hr);
8682 V_VT(&var) = VT_BSTR;
8683 hr = IXMLDOMElement_getAttribute(elem, _bstr_("xmlns"), &var);
8684 ok( hr == S_FALSE, "got 0x%08x\n", hr);
8685 ok( V_VT(&var) == VT_NULL, "got %d\n", V_VT(&var));
8688 hr = IXMLDOMElement_get_namespaceURI(elem, &str);
8689 ok( hr == S_OK, "got 0x%08x\n", hr);
8690 ok( lstrcmpW(str, _bstr_("http://winehq.org/default")) == 0, "expected default namespace\n");
8693 IXMLDOMElement_Release(elem);
8694 IXMLDOMNode_Release(node);
8696 IXMLDOMDocument_Release(doc);
8700 static void test_get_prefix(void)
8702 IXMLDOMDocumentFragment *fragment;
8703 IXMLDOMCDATASection *cdata;
8704 IXMLDOMElement *element;
8705 IXMLDOMComment *comment;
8706 IXMLDOMDocument *doc;
8710 doc = create_document(&IID_IXMLDOMDocument);
8713 /* nodes that can't support prefix */
8715 str = (void*)0xdeadbeef;
8716 hr = IXMLDOMDocument_get_prefix(doc, &str);
8717 ok( hr == S_FALSE, "got 0x%08x\n", hr);
8718 ok( str == 0, "got %p\n", str);
8720 hr = IXMLDOMDocument_get_prefix(doc, NULL);
8721 ok( hr == E_INVALIDARG, "got 0x%08x\n", hr);
8724 hr = IXMLDOMDocument_createCDATASection(doc, NULL, &cdata);
8725 ok(hr == S_OK, "got %08x\n", hr );
8727 str = (void*)0xdeadbeef;
8728 hr = IXMLDOMCDATASection_get_prefix(cdata, &str);
8729 ok(hr == S_FALSE, "got %08x\n", hr);
8730 ok( str == 0, "got %p\n", str);
8732 hr = IXMLDOMCDATASection_get_prefix(cdata, NULL);
8733 ok(hr == E_INVALIDARG, "got %08x\n", hr);
8734 IXMLDOMCDATASection_Release(cdata);
8737 hr = IXMLDOMDocument_createComment(doc, NULL, &comment);
8738 ok(hr == S_OK, "got %08x\n", hr );
8740 str = (void*)0xdeadbeef;
8741 hr = IXMLDOMComment_get_prefix(comment, &str);
8742 ok(hr == S_FALSE, "got %08x\n", hr);
8743 ok( str == 0, "got %p\n", str);
8745 hr = IXMLDOMComment_get_prefix(comment, NULL);
8746 ok(hr == E_INVALIDARG, "got %08x\n", hr);
8747 IXMLDOMComment_Release(comment);
8750 hr = IXMLDOMDocument_createDocumentFragment(doc, &fragment);
8751 ok(hr == S_OK, "got %08x\n", hr );
8753 str = (void*)0xdeadbeef;
8754 hr = IXMLDOMDocumentFragment_get_prefix(fragment, &str);
8755 ok(hr == S_FALSE, "got %08x\n", hr);
8756 ok( str == 0, "got %p\n", str);
8758 hr = IXMLDOMDocumentFragment_get_prefix(fragment, NULL);
8759 ok(hr == E_INVALIDARG, "got %08x\n", hr);
8760 IXMLDOMDocumentFragment_Release(fragment);
8763 hr = IXMLDOMDocument_createElement(doc, _bstr_("elem"), &element);
8764 ok( hr == S_OK, "got 0x%08x\n", hr);
8766 hr = IXMLDOMElement_get_prefix(element, NULL);
8767 ok( hr == E_INVALIDARG, "got 0x%08x\n", hr);
8769 str = (void*)0xdeadbeef;
8770 hr = IXMLDOMElement_get_prefix(element, &str);
8771 ok( hr == S_FALSE, "got 0x%08x\n", hr);
8772 ok( str == 0, "got %p\n", str);
8774 IXMLDOMElement_Release(element);
8777 hr = IXMLDOMDocument_createElement(doc, _bstr_("a:elem"), &element);
8778 ok( hr == S_OK, "got 0x%08x\n", hr);
8780 str = (void*)0xdeadbeef;
8781 hr = IXMLDOMElement_get_prefix(element, &str);
8782 ok( hr == S_OK, "got 0x%08x\n", hr);
8783 ok( lstrcmpW(str, _bstr_("a")) == 0, "expected prefix \"a\"\n");
8786 str = (void*)0xdeadbeef;
8787 hr = IXMLDOMElement_get_namespaceURI(element, &str);
8788 ok( hr == S_FALSE, "got 0x%08x\n", hr);
8789 ok( str == 0, "got %p\n", str);
8791 IXMLDOMElement_Release(element);
8793 IXMLDOMDocument_Release(doc);
8797 static void test_selectSingleNode(void)
8799 IXMLDOMDocument *doc;
8800 IXMLDOMNodeList *list;
8807 doc = create_document(&IID_IXMLDOMDocument);
8810 hr = IXMLDOMDocument_selectSingleNode(doc, NULL, NULL);
8811 ok(hr == E_INVALIDARG, "got 0x%08x\n", hr);
8813 hr = IXMLDOMDocument_selectNodes(doc, NULL, NULL);
8814 ok(hr == E_INVALIDARG, "got 0x%08x\n", hr);
8816 str = SysAllocString( szComplete4 );
8817 hr = IXMLDOMDocument_loadXML( doc, str, &b );
8818 ok( hr == S_OK, "loadXML failed\n");
8819 ok( b == VARIANT_TRUE, "failed to load XML string\n");
8820 SysFreeString( str );
8822 hr = IXMLDOMDocument_selectSingleNode(doc, NULL, NULL);
8823 ok(hr == E_INVALIDARG, "got 0x%08x\n", hr);
8825 hr = IXMLDOMDocument_selectNodes(doc, NULL, NULL);
8826 ok(hr == E_INVALIDARG, "got 0x%08x\n", hr);
8828 hr = IXMLDOMDocument_selectSingleNode(doc, _bstr_("lc"), NULL);
8829 ok(hr == E_INVALIDARG, "got 0x%08x\n", hr);
8831 hr = IXMLDOMDocument_selectNodes(doc, _bstr_("lc"), NULL);
8832 ok(hr == E_INVALIDARG, "got 0x%08x\n", hr);
8834 hr = IXMLDOMDocument_selectSingleNode(doc, _bstr_("lc"), &node);
8835 ok(hr == S_OK, "got 0x%08x\n", hr);
8836 IXMLDOMNode_Release(node);
8838 hr = IXMLDOMDocument_selectNodes(doc, _bstr_("lc"), &list);
8839 ok(hr == S_OK, "got 0x%08x\n", hr);
8840 IXMLDOMNodeList_Release(list);
8842 list = (void*)0xdeadbeef;
8843 hr = IXMLDOMDocument_selectNodes(doc, NULL, &list);
8844 ok(hr == E_INVALIDARG, "got 0x%08x\n", hr);
8845 ok(list == (void*)0xdeadbeef, "got %p\n", list);
8847 node = (void*)0xdeadbeef;
8848 hr = IXMLDOMDocument_selectSingleNode(doc, _bstr_("nonexistent"), &node);
8849 ok(hr == S_FALSE, "got 0x%08x\n", hr);
8850 ok(node == 0, "got %p\n", node);
8852 list = (void*)0xdeadbeef;
8853 hr = IXMLDOMDocument_selectNodes(doc, _bstr_("nonexistent"), &list);
8854 ok(hr == S_OK, "got 0x%08x\n", hr);
8856 hr = IXMLDOMNodeList_get_length(list, &len);
8857 ok(hr == S_OK, "got 0x%08x\n", hr);
8858 ok(len == 0, "got %d\n", len);
8859 IXMLDOMNodeList_Release(list);
8861 IXMLDOMDocument_Release(doc);
8865 static void test_events(void)
8867 IConnectionPointContainer *conn;
8868 IConnectionPoint *point;
8869 IXMLDOMDocument *doc;
8874 doc = create_document(&IID_IXMLDOMDocument);
8877 hr = IXMLDOMDocument_QueryInterface(doc, &IID_IConnectionPointContainer, (void**)&conn);
8878 ok(hr == S_OK, "got 0x%08x\n", hr);
8880 hr = IConnectionPointContainer_FindConnectionPoint(conn, &IID_IDispatch, &point);
8881 ok(hr == S_OK, "got 0x%08x\n", hr);
8882 IConnectionPoint_Release(point);
8883 hr = IConnectionPointContainer_FindConnectionPoint(conn, &IID_IPropertyNotifySink, &point);
8884 ok(hr == S_OK, "got 0x%08x\n", hr);
8885 IConnectionPoint_Release(point);
8886 hr = IConnectionPointContainer_FindConnectionPoint(conn, &DIID_XMLDOMDocumentEvents, &point);
8887 ok(hr == S_OK, "got 0x%08x\n", hr);
8888 IConnectionPoint_Release(point);
8890 IConnectionPointContainer_Release(conn);
8892 /* ready state callback */
8894 hr = IXMLDOMDocument_put_onreadystatechange(doc, v);
8895 ok(hr == DISP_E_TYPEMISMATCH, "got 0x%08x\n", hr);
8897 event = create_dispevent();
8898 V_VT(&v) = VT_UNKNOWN;
8899 V_UNKNOWN(&v) = (IUnknown*)event;
8901 hr = IXMLDOMDocument_put_onreadystatechange(doc, v);
8902 ok(hr == S_OK, "got 0x%08x\n", hr);
8903 EXPECT_REF(event, 2);
8905 V_VT(&v) = VT_DISPATCH;
8906 V_DISPATCH(&v) = event;
8908 hr = IXMLDOMDocument_put_onreadystatechange(doc, v);
8909 ok(hr == S_OK, "got 0x%08x\n", hr);
8910 EXPECT_REF(event, 2);
8912 /* VT_NULL doesn't reset event handler */
8914 hr = IXMLDOMDocument_put_onreadystatechange(doc, v);
8915 ok(hr == DISP_E_TYPEMISMATCH, "got 0x%08x\n", hr);
8916 EXPECT_REF(event, 2);
8918 V_VT(&v) = VT_DISPATCH;
8919 V_DISPATCH(&v) = NULL;
8921 hr = IXMLDOMDocument_put_onreadystatechange(doc, v);
8922 ok(hr == S_OK, "got 0x%08x\n", hr);
8923 EXPECT_REF(event, 1);
8925 V_VT(&v) = VT_UNKNOWN;
8926 V_DISPATCH(&v) = NULL;
8927 hr = IXMLDOMDocument_put_onreadystatechange(doc, v);
8928 ok(hr == S_OK, "got 0x%08x\n", hr);
8930 IDispatch_Release(event);
8932 IXMLDOMDocument_Release(doc);
8935 static void test_createProcessingInstruction(void)
8937 static const WCHAR bodyW[] = {'t','e','s','t',0};
8938 IXMLDOMProcessingInstruction *pi;
8939 IXMLDOMDocument *doc;
8943 doc = create_document(&IID_IXMLDOMDocument);
8946 /* test for BSTR handling, pass broken BSTR */
8947 memcpy(&buff[2], bodyW, sizeof(bodyW));
8948 /* just a big length */
8949 *(DWORD*)buff = 0xf0f0;
8950 hr = IXMLDOMDocument_createProcessingInstruction(doc, _bstr_("test"), &buff[2], &pi);
8951 ok(hr == S_OK, "got 0x%08x\n", hr);
8953 IXMLDOMProcessingInstruction_Release(pi);
8954 IXMLDOMDocument_Release(doc);
8957 static void test_put_nodeTypedValue(void)
8959 IXMLDOMDocument *doc;
8960 IXMLDOMElement *elem;
8964 doc = create_document(&IID_IXMLDOMDocument);
8967 hr = IXMLDOMDocument_createElement(doc, _bstr_("Element"), &elem);
8968 ok(hr == S_OK, "got 0x%08x\n", hr);
8970 V_VT(&type) = VT_EMPTY;
8971 hr = IXMLDOMElement_get_dataType(elem, &type);
8972 ok(hr == S_FALSE, "got 0x%08x\n", hr);
8973 ok(V_VT(&type) == VT_NULL, "got %d, expected VT_NULL\n", V_VT(&type));
8975 /* set typed value for untyped node */
8976 V_VT(&type) = VT_I1;
8978 hr = IXMLDOMElement_put_nodeTypedValue(elem, type);
8979 ok(hr == S_OK, "got 0x%08x\n", hr);
8981 V_VT(&type) = VT_EMPTY;
8982 hr = IXMLDOMElement_get_dataType(elem, &type);
8983 ok(hr == S_FALSE, "got 0x%08x\n", hr);
8984 ok(V_VT(&type) == VT_NULL, "got %d, expected VT_NULL\n", V_VT(&type));
8986 /* no type info stored */
8987 V_VT(&type) = VT_EMPTY;
8988 hr = IXMLDOMElement_get_nodeTypedValue(elem, &type);
8989 ok(hr == S_OK, "got 0x%08x\n", hr);
8990 ok(V_VT(&type) == VT_BSTR, "got %d, expected VT_BSTR\n", V_VT(&type));
8991 ok(memcmp(V_BSTR(&type), _bstr_("1"), 2*sizeof(WCHAR)) == 0,
8992 "got %s, expected \"1\"\n", wine_dbgstr_w(V_BSTR(&type)));
8993 VariantClear(&type);
8995 IXMLDOMElement_Release(elem);
8996 IXMLDOMDocument_Release(doc);
9000 static void test_get_xml(void)
9002 static const char xmlA[] = "<?xml version=\"1.0\" encoding=\"UTF-16\"?>\r\n<a>test</a>\r\n";
9003 static const char fooA[] = "<foo/>";
9004 IXMLDOMProcessingInstruction *pi;
9006 IXMLDOMElement *elem = NULL;
9007 IXMLDOMDocument *doc;
9013 doc = create_document(&IID_IXMLDOMDocument);
9017 hr = IXMLDOMDocument_loadXML( doc, _bstr_("<a>test</a>"), &b );
9018 ok(hr == S_OK, "got 0x%08x\n", hr);
9019 ok( b == VARIANT_TRUE, "got %d\n", b);
9021 hr = IXMLDOMDocument_createProcessingInstruction(doc, _bstr_("xml"),
9022 _bstr_("version=\"1.0\" encoding=\"UTF-16\""), &pi);
9023 ok(hr == S_OK, "got 0x%08x\n", hr);
9025 hr = IXMLDOMDocument_get_firstChild(doc, &first);
9026 ok(hr == S_OK, "got 0x%08x\n", hr);
9028 V_UNKNOWN(&v) = (IUnknown*)first;
9029 V_VT(&v) = VT_UNKNOWN;
9031 hr = IXMLDOMDocument_insertBefore(doc, (IXMLDOMNode*)pi, v, NULL);
9032 ok(hr == S_OK, "got 0x%08x\n", hr);
9034 IXMLDOMProcessingInstruction_Release(pi);
9035 IXMLDOMNode_Release(first);
9037 hr = IXMLDOMDocument_get_xml(doc, &xml);
9038 ok(hr == S_OK, "got 0x%08x\n", hr);
9040 ok(memcmp(xml, _bstr_(xmlA), sizeof(xmlA)*sizeof(WCHAR)) == 0,
9041 "got %s, expected %s\n", wine_dbgstr_w(xml), xmlA);
9044 IXMLDOMDocument_Release(doc);
9046 doc = create_document(&IID_IXMLDOMDocument);
9048 hr = IXMLDOMDocument_createElement(doc, _bstr_("foo"), &elem);
9049 ok(hr == S_OK, "got 0x%08x\n", hr);
9051 hr = IXMLDOMDocument_putref_documentElement(doc, elem);
9052 ok(hr == S_OK, "got 0x%08x\n", hr);
9054 hr = IXMLDOMDocument_get_xml(doc, &xml);
9055 ok(hr == S_OK, "got 0x%08x\n", hr);
9057 ok(memcmp(xml, _bstr_(fooA), (sizeof(fooA)-1)*sizeof(WCHAR)) == 0,
9058 "got %s, expected %s\n", wine_dbgstr_w(xml), fooA);
9061 IXMLDOMElement_Release(elem);
9062 IXMLDOMDocument_Release(doc);
9067 static void test_xsltemplate(void)
9069 IXSLTemplate *template;
9070 IXSLProcessor *processor;
9071 IXMLDOMDocument *doc, *doc2;
9078 template = create_xsltemplate(&IID_IXSLTemplate);
9079 if (!template) return;
9081 /* works as reset */
9082 hr = IXSLTemplate_putref_stylesheet(template, NULL);
9083 ok(hr == S_OK, "got 0x%08x\n", hr);
9085 doc = create_document(&IID_IXMLDOMDocument);
9088 hr = IXMLDOMDocument_loadXML( doc, _bstr_("<a>test</a>"), &b );
9089 ok(hr == S_OK, "got 0x%08x\n", hr);
9090 ok( b == VARIANT_TRUE, "got %d\n", b);
9092 /* putref with non-xsl document */
9093 hr = IXSLTemplate_putref_stylesheet(template, (IXMLDOMNode*)doc);
9094 todo_wine ok(hr == E_FAIL, "got 0x%08x\n", hr);
9097 hr = IXMLDOMDocument_loadXML( doc, _bstr_(szTransformSSXML), &b );
9098 ok(hr == S_OK, "got 0x%08x\n", hr);
9099 ok( b == VARIANT_TRUE, "got %d\n", b);
9101 /* not a freethreaded document */
9102 hr = IXSLTemplate_putref_stylesheet(template, (IXMLDOMNode*)doc);
9103 todo_wine ok(hr == E_FAIL, "got 0x%08x\n", hr);
9105 IXMLDOMDocument_Release(doc);
9107 hr = CoCreateInstance(&CLSID_FreeThreadedDOMDocument, NULL, CLSCTX_INPROC_SERVER, &IID_IXMLDOMDocument, (void**)&doc);
9110 win_skip("failed to create free threaded document instance: 0x%08x\n", hr);
9111 IXSLTemplate_Release(template);
9116 hr = IXMLDOMDocument_loadXML( doc, _bstr_(szTransformSSXML), &b );
9117 ok(hr == S_OK, "got 0x%08x\n", hr);
9118 ok( b == VARIANT_TRUE, "got %d\n", b);
9120 /* freethreaded document */
9121 ref1 = IXMLDOMDocument_AddRef(doc);
9122 IXMLDOMDocument_Release(doc);
9123 hr = IXSLTemplate_putref_stylesheet(template, (IXMLDOMNode*)doc);
9124 ok(hr == S_OK, "got 0x%08x\n", hr);
9125 ref2 = IXMLDOMDocument_AddRef(doc);
9126 IXMLDOMDocument_Release(doc);
9127 ok(ref2 > ref1, "got %d\n", ref2);
9130 hr = IXSLTemplate_createProcessor(template, NULL);
9131 ok(hr == E_INVALIDARG, "got 0x%08x\n", hr);
9133 EXPECT_REF(template, 1);
9134 hr = IXSLTemplate_createProcessor(template, &processor);
9135 ok(hr == S_OK, "got 0x%08x\n", hr);
9136 EXPECT_REF(template, 2);
9138 /* input no set yet */
9141 hr = IXSLProcessor_get_input(processor, &v);
9143 ok(hr == S_OK, "got 0x%08x\n", hr);
9144 ok(V_VT(&v) == VT_EMPTY, "got %d\n", V_VT(&v));
9147 hr = IXSLProcessor_get_output(processor, NULL);
9148 ok(hr == E_INVALIDARG, "got 0x%08x\n", hr);
9150 /* reset before it was set */
9151 V_VT(&v) = VT_EMPTY;
9152 hr = IXSLProcessor_put_output(processor, v);
9153 ok(hr == S_OK, "got 0x%08x\n", hr);
9155 CreateStreamOnHGlobal(NULL, TRUE, &stream);
9156 EXPECT_REF(stream, 1);
9158 V_VT(&v) = VT_UNKNOWN;
9159 V_UNKNOWN(&v) = (IUnknown*)stream;
9160 hr = IXSLProcessor_put_output(processor, v);
9161 ok(hr == S_OK, "got 0x%08x\n", hr);
9163 /* it seems processor grabs 2 references */
9164 todo_wine EXPECT_REF(stream, 3);
9166 V_VT(&v) = VT_EMPTY;
9167 hr = IXSLProcessor_get_output(processor, &v);
9168 ok(hr == S_OK, "got 0x%08x\n", hr);
9169 ok(V_VT(&v) == VT_UNKNOWN, "got type %d\n", V_VT(&v));
9170 ok(V_UNKNOWN(&v) == (IUnknown*)stream, "got %p\n", V_UNKNOWN(&v));
9172 todo_wine EXPECT_REF(stream, 4);
9175 hr = IXSLProcessor_transform(processor, NULL);
9176 ok(hr == E_INVALIDARG, "got 0x%08x\n", hr);
9178 /* reset and check stream refcount */
9179 V_VT(&v) = VT_EMPTY;
9180 hr = IXSLProcessor_put_output(processor, v);
9181 ok(hr == S_OK, "got 0x%08x\n", hr);
9183 EXPECT_REF(stream, 1);
9185 IStream_Release(stream);
9187 /* no output interface set, check output */
9188 doc2 = create_document(&IID_IXMLDOMDocument);
9191 hr = IXMLDOMDocument_loadXML( doc2, _bstr_("<a>test</a>"), &b );
9192 ok(hr == S_OK, "got 0x%08x\n", hr);
9193 ok( b == VARIANT_TRUE, "got %d\n", b);
9195 V_VT(&v) = VT_UNKNOWN;
9196 V_UNKNOWN(&v) = (IUnknown*)doc2;
9197 hr = IXSLProcessor_put_input(processor, v);
9198 ok(hr == S_OK, "got 0x%08x\n", hr);
9200 hr = IXSLProcessor_transform(processor, &b);
9201 ok(hr == S_OK, "got 0x%08x\n", hr);
9203 V_VT(&v) = VT_EMPTY;
9204 hr = IXSLProcessor_get_output(processor, &v);
9205 ok(hr == S_OK, "got 0x%08x\n", hr);
9206 ok(V_VT(&v) == VT_BSTR, "got type %d\n", V_VT(&v));
9207 /* we currently output one '\n' instead of empty string */
9208 todo_wine ok(lstrcmpW(V_BSTR(&v), _bstr_("")) == 0, "got %s\n", wine_dbgstr_w(V_BSTR(&v)));
9209 IXMLDOMDocument_Release(doc2);
9212 IXSLProcessor_Release(processor);
9214 /* drop reference */
9215 hr = IXSLTemplate_putref_stylesheet(template, NULL);
9216 ok(hr == S_OK, "got 0x%08x\n", hr);
9217 ref2 = IXMLDOMDocument_AddRef(doc);
9218 IXMLDOMDocument_Release(doc);
9219 ok(ref2 == ref1, "got %d\n", ref2);
9221 IXMLDOMDocument_Release(doc);
9222 IXSLTemplate_Release(template);
9226 static void test_insertBefore(void)
9228 IXMLDOMDocument *doc, *doc2;
9229 IXMLDOMAttribute *attr;
9230 IXMLDOMElement *elem1, *elem2, *elem3, *elem4, *elem5;
9231 IXMLDOMNode *node, *newnode;
9236 doc = create_document(&IID_IXMLDOMDocument);
9238 /* insertBefore behaviour for attribute node */
9240 V_I4(&v) = NODE_ATTRIBUTE;
9243 hr = IXMLDOMDocument_createNode(doc, v, _bstr_("attr"), NULL, (IXMLDOMNode**)&attr);
9244 ok(hr == S_OK, "got 0x%08x\n", hr);
9245 ok(attr != NULL, "got %p\n", attr);
9247 /* attribute to attribute */
9249 V_I4(&v) = NODE_ATTRIBUTE;
9251 hr = IXMLDOMDocument_createNode(doc, v, _bstr_("attr2"), NULL, &newnode);
9252 ok(hr == S_OK, "got 0x%08x\n", hr);
9253 ok(newnode != NULL, "got %p\n", newnode);
9256 node = (void*)0xdeadbeef;
9257 hr = IXMLDOMAttribute_insertBefore(attr, newnode, v, &node);
9258 ok(hr == E_FAIL, "got 0x%08x\n", hr);
9259 ok(node == NULL, "got %p\n", node);
9261 V_VT(&v) = VT_UNKNOWN;
9262 V_UNKNOWN(&v) = (IUnknown*)attr;
9263 node = (void*)0xdeadbeef;
9264 hr = IXMLDOMAttribute_insertBefore(attr, newnode, v, &node);
9265 todo_wine ok(hr == E_INVALIDARG, "got 0x%08x\n", hr);
9266 ok(node == NULL, "got %p\n", node);
9267 IXMLDOMNode_Release(newnode);
9269 /* cdata to attribute */
9271 V_I4(&v) = NODE_CDATA_SECTION;
9273 hr = IXMLDOMDocument_createNode(doc, v, _bstr_("cdata"), NULL, &newnode);
9274 ok(hr == S_OK, "got 0x%08x\n", hr);
9275 ok(newnode != NULL, "got %p\n", newnode);
9278 node = (void*)0xdeadbeef;
9279 hr = IXMLDOMAttribute_insertBefore(attr, newnode, v, &node);
9280 ok(hr == E_FAIL, "got 0x%08x\n", hr);
9281 ok(node == NULL, "got %p\n", node);
9282 IXMLDOMNode_Release(newnode);
9284 /* comment to attribute */
9286 V_I4(&v) = NODE_COMMENT;
9288 hr = IXMLDOMDocument_createNode(doc, v, _bstr_("cdata"), NULL, &newnode);
9289 ok(hr == S_OK, "got 0x%08x\n", hr);
9290 ok(newnode != NULL, "got %p\n", newnode);
9293 node = (void*)0xdeadbeef;
9294 hr = IXMLDOMAttribute_insertBefore(attr, newnode, v, &node);
9295 ok(hr == E_FAIL, "got 0x%08x\n", hr);
9296 ok(node == NULL, "got %p\n", node);
9297 IXMLDOMNode_Release(newnode);
9299 /* element to attribute */
9301 V_I4(&v) = NODE_ELEMENT;
9303 hr = IXMLDOMDocument_createNode(doc, v, _bstr_("cdata"), NULL, &newnode);
9304 ok(hr == S_OK, "got 0x%08x\n", hr);
9305 ok(newnode != NULL, "got %p\n", newnode);
9308 node = (void*)0xdeadbeef;
9309 hr = IXMLDOMAttribute_insertBefore(attr, newnode, v, &node);
9310 ok(hr == E_FAIL, "got 0x%08x\n", hr);
9311 ok(node == NULL, "got %p\n", node);
9312 IXMLDOMNode_Release(newnode);
9314 /* pi to attribute */
9316 V_I4(&v) = NODE_PROCESSING_INSTRUCTION;
9318 hr = IXMLDOMDocument_createNode(doc, v, _bstr_("cdata"), NULL, &newnode);
9319 ok(hr == S_OK, "got 0x%08x\n", hr);
9320 ok(newnode != NULL, "got %p\n", newnode);
9323 node = (void*)0xdeadbeef;
9324 hr = IXMLDOMAttribute_insertBefore(attr, newnode, v, &node);
9325 ok(hr == E_FAIL, "got 0x%08x\n", hr);
9326 ok(node == NULL, "got %p\n", node);
9327 IXMLDOMNode_Release(newnode);
9328 IXMLDOMAttribute_Release(attr);
9330 /* insertBefore for elements */
9331 hr = IXMLDOMDocument_createElement(doc, _bstr_("elem"), &elem1);
9332 ok(hr == S_OK, "got 0x%08x\n", hr);
9334 hr = IXMLDOMDocument_createElement(doc, _bstr_("elem2"), &elem2);
9335 ok(hr == S_OK, "got 0x%08x\n", hr);
9337 hr = IXMLDOMDocument_createElement(doc, _bstr_("elem3"), &elem3);
9338 ok(hr == S_OK, "got 0x%08x\n", hr);
9340 EXPECT_NO_CHILDREN(elem1);
9341 EXPECT_NO_CHILDREN(elem2);
9342 EXPECT_NO_CHILDREN(elem3);
9344 todo_wine EXPECT_REF(elem2, 2);
9348 hr = IXMLDOMElement_insertBefore(elem1, (IXMLDOMNode*)elem2, v, &node);
9349 ok(hr == S_OK, "got 0x%08x\n", hr);
9350 ok(node == (void*)elem2, "got %p\n", node);
9352 EXPECT_CHILDREN(elem1);
9353 todo_wine EXPECT_REF(elem2, 3);
9354 IXMLDOMNode_Release(node);
9356 /* again for already linked node */
9359 hr = IXMLDOMElement_insertBefore(elem1, (IXMLDOMNode*)elem2, v, &node);
9360 ok(hr == S_OK, "got 0x%08x\n", hr);
9361 ok(node == (void*)elem2, "got %p\n", node);
9363 EXPECT_CHILDREN(elem1);
9365 /* increments each time */
9366 todo_wine EXPECT_REF(elem2, 3);
9367 IXMLDOMNode_Release(node);
9369 /* try to add to another element */
9371 node = (void*)0xdeadbeef;
9372 hr = IXMLDOMElement_insertBefore(elem3, (IXMLDOMNode*)elem2, v, &node);
9373 ok(hr == S_OK, "got 0x%08x\n", hr);
9374 ok(node == (void*)elem2, "got %p\n", node);
9376 EXPECT_CHILDREN(elem3);
9377 EXPECT_NO_CHILDREN(elem1);
9379 IXMLDOMNode_Release(node);
9381 /* cross document case - try to add as child to a node created with other doc */
9382 doc2 = create_document(&IID_IXMLDOMDocument);
9384 hr = IXMLDOMDocument_createElement(doc2, _bstr_("elem4"), &elem4);
9385 ok(hr == S_OK, "got 0x%08x\n", hr);
9386 todo_wine EXPECT_REF(elem4, 2);
9388 /* same name, another instance */
9389 hr = IXMLDOMDocument_createElement(doc2, _bstr_("elem4"), &elem5);
9390 ok(hr == S_OK, "got 0x%08x\n", hr);
9391 todo_wine EXPECT_REF(elem5, 2);
9393 todo_wine EXPECT_REF(elem3, 2);
9396 hr = IXMLDOMElement_insertBefore(elem3, (IXMLDOMNode*)elem4, v, &node);
9397 ok(hr == S_OK, "got 0x%08x\n", hr);
9398 ok(node == (void*)elem4, "got %p\n", node);
9399 todo_wine EXPECT_REF(elem4, 3);
9400 todo_wine EXPECT_REF(elem3, 2);
9401 IXMLDOMNode_Release(node);
9405 hr = IXMLDOMElement_insertBefore(elem3, (IXMLDOMNode*)elem5, v, &node);
9406 ok(hr == S_OK, "got 0x%08x\n", hr);
9407 ok(node == (void*)elem5, "got %p\n", node);
9408 todo_wine EXPECT_REF(elem4, 2);
9409 todo_wine EXPECT_REF(elem5, 3);
9410 IXMLDOMNode_Release(node);
9412 IXMLDOMDocument_Release(doc2);
9414 IXMLDOMElement_Release(elem1);
9415 IXMLDOMElement_Release(elem2);
9416 IXMLDOMElement_Release(elem3);
9417 IXMLDOMElement_Release(elem4);
9418 IXMLDOMElement_Release(elem5);
9420 /* elements with same default namespace */
9422 V_I4(&v) = NODE_ELEMENT;
9424 hr = IXMLDOMDocument_createNode(doc, v, _bstr_("elem1"), _bstr_("http://winehq.org/default"), (IXMLDOMNode**)&elem1);
9425 ok(hr == S_OK, "got 0x%08x\n", hr);
9426 ok(elem1 != NULL, "got %p\n", elem1);
9429 V_I4(&v) = NODE_ELEMENT;
9431 hr = IXMLDOMDocument_createNode(doc, v, _bstr_("elem2"), _bstr_("http://winehq.org/default"), (IXMLDOMNode**)&elem2);
9432 ok(hr == S_OK, "got 0x%08x\n", hr);
9433 ok(elem2 != NULL, "got %p\n", elem2);
9435 /* check contents so far */
9437 hr = IXMLDOMElement_get_xml(elem1, &p);
9438 ok(hr == S_OK, "got 0x%08x\n", hr);
9439 ok(!lstrcmpW(p, _bstr_("<elem1 xmlns=\"http://winehq.org/default\"/>")), "got %s\n", wine_dbgstr_w(p));
9443 hr = IXMLDOMElement_get_xml(elem2, &p);
9444 ok(hr == S_OK, "got 0x%08x\n", hr);
9445 ok(!lstrcmpW(p, _bstr_("<elem2 xmlns=\"http://winehq.org/default\"/>")), "got %s\n", wine_dbgstr_w(p));
9449 hr = IXMLDOMElement_insertBefore(elem1, (IXMLDOMNode*)elem2, v, NULL);
9450 ok(hr == S_OK, "got 0x%08x\n", hr);
9452 /* get_xml depends on context, for top node it omits child namespace attribute,
9453 but at child level it's still returned */
9455 hr = IXMLDOMElement_get_xml(elem1, &p);
9456 ok(hr == S_OK, "got 0x%08x\n", hr);
9457 todo_wine ok(!lstrcmpW(p, _bstr_("<elem1 xmlns=\"http://winehq.org/default\"><elem2/></elem1>")),
9458 "got %s\n", wine_dbgstr_w(p));
9462 hr = IXMLDOMElement_get_xml(elem2, &p);
9463 ok(hr == S_OK, "got 0x%08x\n", hr);
9464 ok(!lstrcmpW(p, _bstr_("<elem2 xmlns=\"http://winehq.org/default\"/>")), "got %s\n", wine_dbgstr_w(p));
9467 IXMLDOMElement_Release(elem1);
9468 IXMLDOMElement_Release(elem2);
9470 /* child without default namespace added to node with default namespace */
9472 V_I4(&v) = NODE_ELEMENT;
9474 hr = IXMLDOMDocument_createNode(doc, v, _bstr_("elem1"), _bstr_("http://winehq.org/default"), (IXMLDOMNode**)&elem1);
9475 ok(hr == S_OK, "got 0x%08x\n", hr);
9476 ok(elem1 != NULL, "got %p\n", elem1);
9479 V_I4(&v) = NODE_ELEMENT;
9481 hr = IXMLDOMDocument_createNode(doc, v, _bstr_("elem2"), NULL, (IXMLDOMNode**)&elem2);
9482 ok(hr == S_OK, "got 0x%08x\n", hr);
9483 ok(elem2 != NULL, "got %p\n", elem2);
9485 EXPECT_REF(elem2, 1);
9487 hr = IXMLDOMElement_insertBefore(elem1, (IXMLDOMNode*)elem2, v, NULL);
9488 ok(hr == S_OK, "got 0x%08x\n", hr);
9489 EXPECT_REF(elem2, 1);
9492 hr = IXMLDOMElement_get_xml(elem2, &p);
9493 ok(hr == S_OK, "got 0x%08x\n", hr);
9494 ok(!lstrcmpW(p, _bstr_("<elem2/>")), "got %s\n", wine_dbgstr_w(p));
9497 hr = IXMLDOMElement_removeChild(elem1, (IXMLDOMNode*)elem2, NULL);
9498 ok(hr == S_OK, "got 0x%08x\n", hr);
9501 hr = IXMLDOMElement_get_xml(elem2, &p);
9502 ok(hr == S_OK, "got 0x%08x\n", hr);
9503 ok(!lstrcmpW(p, _bstr_("<elem2/>")), "got %s\n", wine_dbgstr_w(p));
9506 IXMLDOMElement_Release(elem1);
9507 IXMLDOMElement_Release(elem2);
9508 IXMLDOMDocument_Release(doc);
9511 static void test_appendChild(void)
9513 IXMLDOMDocument *doc, *doc2;
9514 IXMLDOMElement *elem, *elem2;
9517 doc = create_document(&IID_IXMLDOMDocument);
9518 doc2 = create_document(&IID_IXMLDOMDocument);
9520 hr = IXMLDOMDocument_createElement(doc, _bstr_("elem"), &elem);
9521 ok(hr == S_OK, "got 0x%08x\n", hr);
9523 hr = IXMLDOMDocument_createElement(doc2, _bstr_("elem2"), &elem2);
9524 ok(hr == S_OK, "got 0x%08x\n", hr);
9527 todo_wine EXPECT_REF(elem, 2);
9528 EXPECT_REF(doc2, 1);
9529 todo_wine EXPECT_REF(elem2, 2);
9530 EXPECT_NO_CHILDREN(doc);
9531 EXPECT_NO_CHILDREN(doc2);
9533 /* append from another document */
9534 hr = IXMLDOMDocument_appendChild(doc2, (IXMLDOMNode*)elem, NULL);
9535 ok(hr == S_OK, "got 0x%08x\n", hr);
9538 todo_wine EXPECT_REF(elem, 2);
9539 EXPECT_REF(doc2, 1);
9540 todo_wine EXPECT_REF(elem2, 2);
9541 EXPECT_NO_CHILDREN(doc);
9542 EXPECT_CHILDREN(doc2);
9544 IXMLDOMElement_Release(elem);
9545 IXMLDOMElement_Release(elem2);
9546 IXMLDOMDocument_Release(doc);
9547 IXMLDOMDocument_Release(doc2);
9550 static void test_get_doctype(void)
9552 IXMLDOMDocumentType *doctype;
9553 IXMLDOMDocument *doc;
9556 doc = create_document(&IID_IXMLDOMDocument);
9558 hr = IXMLDOMDocument_get_doctype(doc, NULL);
9559 ok(hr == E_INVALIDARG, "got 0x%08x\n", hr);
9561 doctype = (void*)0xdeadbeef;
9562 hr = IXMLDOMDocument_get_doctype(doc, &doctype);
9563 ok(hr == S_FALSE, "got 0x%08x\n", hr);
9564 ok(doctype == NULL, "got %p\n", doctype);
9566 IXMLDOMDocument_Release(doc);
9569 static void test_get_tagName(void)
9571 IXMLDOMDocument *doc;
9572 IXMLDOMElement *elem, *elem2;
9576 doc = create_document(&IID_IXMLDOMDocument);
9578 hr = IXMLDOMDocument_createElement(doc, _bstr_("element"), &elem);
9579 ok(hr == S_OK, "got 0x%08x\n", hr);
9581 hr = IXMLDOMElement_get_tagName(elem, NULL);
9582 ok(hr == E_INVALIDARG, "got 0x%08x\n", hr);
9585 hr = IXMLDOMElement_get_tagName(elem, &str);
9586 ok(hr == S_OK, "got 0x%08x\n", hr);
9587 ok(!lstrcmpW(str, _bstr_("element")), "got %s\n", wine_dbgstr_w(str));
9590 hr = IXMLDOMDocument_createElement(doc, _bstr_("s:element"), &elem2);
9591 ok(hr == S_OK, "got 0x%08x\n", hr);
9594 hr = IXMLDOMElement_get_tagName(elem2, &str);
9595 ok(hr == S_OK, "got 0x%08x\n", hr);
9596 ok(!lstrcmpW(str, _bstr_("s:element")), "got %s\n", wine_dbgstr_w(str));
9599 IXMLDOMDocument_Release(elem);
9600 IXMLDOMDocument_Release(elem2);
9601 IXMLDOMDocument_Release(doc);
9605 typedef struct _get_datatype_t {
9612 static const get_datatype_t get_datatype[] = {
9613 { NODE_ELEMENT, "element", VT_NULL, S_FALSE },
9614 { NODE_ATTRIBUTE, "attr", VT_NULL, S_FALSE },
9615 { NODE_TEXT, "text", VT_NULL, S_FALSE },
9616 { NODE_CDATA_SECTION , "cdata", VT_NULL, S_FALSE },
9617 { NODE_ENTITY_REFERENCE, "entityref", VT_NULL, S_FALSE },
9618 { NODE_PROCESSING_INSTRUCTION, "pi", VT_NULL, S_FALSE },
9619 { NODE_COMMENT, "comment", VT_NULL, S_FALSE },
9620 { NODE_DOCUMENT_FRAGMENT, "docfrag", VT_NULL, S_FALSE },
9624 static void test_get_dataType(void)
9626 IXMLDOMDocument *doc;
9627 const get_datatype_t *entry = get_datatype;
9629 doc = create_document(&IID_IXMLDOMDocument);
9633 IXMLDOMNode *node = NULL;
9638 V_I4(&var) = entry->type;
9639 hr = IXMLDOMDocument_createNode(doc, var, _bstr_(entry->name), NULL, &node);
9640 ok(hr == S_OK, "failed to create node, type %d\n", entry->type);
9642 hr = IXMLDOMNode_get_dataType(node, NULL);
9643 ok(hr == E_INVALIDARG, "got 0x%08x\n", hr);
9646 hr = IXMLDOMNode_get_dataType(node, &type);
9647 ok(hr == entry->hr, "got 0x%08x, expected 0x%08x. node type %d\n",
9648 hr, entry->hr, entry->type);
9649 ok(V_VT(&type) == entry->vt, "got %d, expected %d. node type %d\n",
9650 V_VT(&type), entry->vt, entry->type);
9651 VariantClear(&type);
9653 IXMLDOMNode_Release(node);
9658 IXMLDOMDocument_Release(doc);
9662 typedef struct _get_node_typestring_t {
9665 } get_node_typestring_t;
9667 static const get_node_typestring_t get_node_typestring[] = {
9668 { NODE_ELEMENT, "element" },
9669 { NODE_ATTRIBUTE, "attribute" },
9670 { NODE_TEXT, "text" },
9671 { NODE_CDATA_SECTION , "cdatasection" },
9672 { NODE_ENTITY_REFERENCE, "entityreference" },
9673 { NODE_PROCESSING_INSTRUCTION, "processinginstruction" },
9674 { NODE_COMMENT, "comment" },
9675 { NODE_DOCUMENT_FRAGMENT, "documentfragment" },
9679 static void test_get_nodeTypeString(void)
9681 const get_node_typestring_t *entry = get_node_typestring;
9682 IXMLDOMDocument *doc;
9686 doc = create_document(&IID_IXMLDOMDocument);
9688 hr = IXMLDOMDocument_get_nodeTypeString(doc, &str);
9689 ok(hr == S_OK, "got 0x%08x\n", hr);
9690 ok(!lstrcmpW(str, _bstr_("document")), "got string %s\n", wine_dbgstr_w(str));
9695 IXMLDOMNode *node = NULL;
9699 V_I4(&var) = entry->type;
9700 hr = IXMLDOMDocument_createNode(doc, var, _bstr_("node"), NULL, &node);
9701 ok(hr == S_OK, "failed to create node, type %d\n", entry->type);
9703 hr = IXMLDOMNode_get_nodeTypeString(node, NULL);
9704 ok(hr == E_INVALIDARG, "got 0x%08x\n", hr);
9706 hr = IXMLDOMNode_get_nodeTypeString(node, &str);
9707 ok(hr == S_OK, "got 0x%08x\n", hr);
9708 ok(!lstrcmpW(str, _bstr_(entry->string)), "got string %s, expected %s. node type %d\n",
9709 wine_dbgstr_w(str), entry->string, entry->type);
9711 IXMLDOMNode_Release(node);
9716 IXMLDOMDocument_Release(doc);
9720 typedef struct _get_attributes_t {
9725 static const get_attributes_t get_attributes[] = {
9726 { NODE_ATTRIBUTE, S_FALSE },
9727 { NODE_TEXT, S_FALSE },
9728 { NODE_CDATA_SECTION , S_FALSE },
9729 { NODE_ENTITY_REFERENCE, S_FALSE },
9730 { NODE_PROCESSING_INSTRUCTION, S_FALSE },
9731 { NODE_COMMENT, S_FALSE },
9732 { NODE_DOCUMENT_FRAGMENT, S_FALSE },
9736 static void test_get_attributes(void)
9738 const get_attributes_t *entry = get_attributes;
9739 IXMLDOMNamedNodeMap *map;
9740 IXMLDOMDocument *doc;
9741 IXMLDOMNode *node, *node2;
9747 doc = create_document(&IID_IXMLDOMDocument);
9749 str = SysAllocString( szComplete4 );
9750 hr = IXMLDOMDocument_loadXML(doc, str, &b);
9751 ok(hr == S_OK, "got %08x\n", hr);
9754 hr = IXMLDOMDocument_get_attributes(doc, NULL);
9755 ok(hr == E_INVALIDARG, "got %08x\n", hr);
9757 map = (void*)0xdeadbeef;
9758 hr = IXMLDOMDocument_get_attributes(doc, &map);
9759 ok(hr == S_FALSE, "got %08x\n", hr);
9760 ok(map == NULL, "got %p\n", map);
9762 /* first child is <?xml ?> */
9763 hr = IXMLDOMDocument_get_firstChild(doc, &node);
9764 ok(hr == S_OK, "got %08x\n", hr);
9766 hr = IXMLDOMNode_get_attributes(node, &map);
9767 ok(hr == S_OK, "got %08x\n", hr);
9770 hr = IXMLDOMNamedNodeMap_get_length(map, &length);
9771 EXPECT_HR(hr, S_OK);
9772 todo_wine ok(length == 1, "got %d\n", length);
9774 if (hr == S_OK && length == 1)
9776 IXMLDOMAttribute *attr;
9781 hr = IXMLDOMNamedNodeMap_get_item(map, 0, &node2);
9782 EXPECT_HR(hr, S_OK);
9783 ok(node != NULL, "got %p\n", node2);
9785 hr = IXMLDOMNode_get_nodeName(node2, &str);
9786 EXPECT_HR(hr, S_OK);
9787 ok(!lstrcmpW(str, _bstr_("version")), "got %s\n", wine_dbgstr_w(str));
9791 hr = IXMLDOMNamedNodeMap_get_length(map, &length);
9792 EXPECT_HR(hr, S_OK);
9793 ok(length == 1, "got %d\n", length);
9796 hr = IXMLDOMNode_get_nodeType(node2, &type);
9797 EXPECT_HR(hr, S_OK);
9798 ok(type == NODE_ATTRIBUTE, "got %d\n", type);
9800 hr = IXMLDOMNode_get_xml(node, &str);
9801 EXPECT_HR(hr, S_OK);
9802 ok(!lstrcmpW(str, _bstr_("<?xml version=\"1.0\"?>")), "got %s\n", wine_dbgstr_w(str));
9805 hr = IXMLDOMNode_get_text(node, &str);
9806 EXPECT_HR(hr, S_OK);
9807 ok(!lstrcmpW(str, _bstr_("version=\"1.0\"")), "got %s\n", wine_dbgstr_w(str));
9810 hr = IXMLDOMNamedNodeMap_removeNamedItem(map, _bstr_("version"), NULL);
9811 EXPECT_HR(hr, S_OK);
9814 hr = IXMLDOMNamedNodeMap_get_length(map, &length);
9815 EXPECT_HR(hr, S_OK);
9816 ok(length == 0, "got %d\n", length);
9818 hr = IXMLDOMNode_get_xml(node, &str);
9819 EXPECT_HR(hr, S_OK);
9820 ok(!lstrcmpW(str, _bstr_("<?xml version=\"1.0\"?>")), "got %s\n", wine_dbgstr_w(str));
9823 hr = IXMLDOMNode_get_text(node, &str);
9824 EXPECT_HR(hr, S_OK);
9825 ok(!lstrcmpW(str, _bstr_("")), "got %s\n", wine_dbgstr_w(str));
9828 IXMLDOMNamedNodeMap_Release(map);
9830 hr = IXMLDOMNode_get_attributes(node, &map);
9831 ok(hr == S_OK, "got %08x\n", hr);
9834 hr = IXMLDOMNamedNodeMap_get_length(map, &length);
9835 EXPECT_HR(hr, S_OK);
9836 ok(length == 0, "got %d\n", length);
9838 hr = IXMLDOMDocument_createAttribute(doc, _bstr_("encoding"), &attr);
9839 EXPECT_HR(hr, S_OK);
9842 V_BSTR(&v) = _bstr_("UTF-8");
9843 hr = IXMLDOMAttribute_put_nodeValue(attr, v);
9844 EXPECT_HR(hr, S_OK);
9846 EXPECT_REF(attr, 2);
9847 hr = IXMLDOMNamedNodeMap_setNamedItem(map, (IXMLDOMNode*)attr, NULL);
9848 EXPECT_HR(hr, S_OK);
9849 EXPECT_REF(attr, 2);
9851 hr = IXMLDOMNode_get_attributes(node, &map);
9852 ok(hr == S_OK, "got %08x\n", hr);
9855 hr = IXMLDOMNamedNodeMap_get_length(map, &length);
9856 EXPECT_HR(hr, S_OK);
9857 ok(length == 1, "got %d\n", length);
9859 hr = IXMLDOMNode_get_xml(node, &str);
9860 EXPECT_HR(hr, S_OK);
9861 ok(!lstrcmpW(str, _bstr_("<?xml version=\"1.0\"?>")), "got %s\n", wine_dbgstr_w(str));
9864 hr = IXMLDOMNode_get_text(node, &str);
9865 EXPECT_HR(hr, S_OK);
9866 ok(!lstrcmpW(str, _bstr_("encoding=\"UTF-8\"")), "got %s\n", wine_dbgstr_w(str));
9869 IXMLDOMNamedNodeMap_Release(map);
9870 IXMLDOMNode_Release(node2);
9873 IXMLDOMNode_Release(node);
9875 /* last child is element */
9877 hr = IXMLDOMDocument_get_lastChild(doc, &node);
9878 ok(hr == S_OK, "got %08x\n", hr);
9881 EXPECT_REF(node, 1);
9882 hr = IXMLDOMNode_get_attributes(node, &map);
9883 ok(hr == S_OK, "got %08x\n", hr);
9884 EXPECT_REF(node, 1);
9888 hr = IXMLDOMNamedNodeMap_get_item(map, 0, &node2);
9889 ok(hr == S_OK, "got %08x\n", hr);
9890 EXPECT_REF(node, 1);
9891 EXPECT_REF(node2, 1);
9894 IXMLDOMNode_Release(node2);
9896 /* release node before map release, map still works */
9897 IXMLDOMNode_Release(node);
9900 hr = IXMLDOMNamedNodeMap_get_length(map, &length);
9901 ok(hr == S_OK, "got %08x\n", hr);
9902 ok(length == 1, "got %d\n", length);
9905 hr = IXMLDOMNamedNodeMap_get_item(map, 0, &node2);
9906 ok(hr == S_OK, "got %08x\n", hr);
9907 EXPECT_REF(node2, 1);
9908 IXMLDOMNode_Release(node2);
9910 IXMLDOMNamedNodeMap_Release(map);
9919 V_I4(&var) = entry->type;
9920 hr = IXMLDOMDocument_createNode(doc, var, _bstr_("node"), NULL, &node);
9921 ok(hr == S_OK, "failed to create node, type %d\n", entry->type);
9923 hr = IXMLDOMNode_get_attributes(node, NULL);
9924 ok(hr == E_INVALIDARG, "got 0x%08x\n", hr);
9926 map = (void*)0xdeadbeef;
9927 hr = IXMLDOMNode_get_attributes(node, &map);
9928 ok(hr == entry->hr, "got 0x%08x, expected 0x%08x. node type %d\n",
9929 hr, entry->hr, entry->type);
9930 ok(map == NULL, "got %p\n", map);
9932 IXMLDOMNode_Release(node);
9937 IXMLDOMDocument_Release(doc);
9941 static void test_selection(void)
9943 IXMLDOMSelection *selection;
9944 IXMLDOMNodeList *list;
9945 IXMLDOMDocument *doc;
9949 doc = create_document(&IID_IXMLDOMDocument);
9951 hr = IXMLDOMDocument2_loadXML(doc, _bstr_(szExampleXML), &b);
9952 EXPECT_HR(hr, S_OK);
9954 hr = IXMLDOMDocument_selectNodes(doc, _bstr_("root"), &list);
9955 EXPECT_HR(hr, S_OK);
9957 hr = IXMLDOMNodeList_QueryInterface(list, &IID_IXMLDOMSelection, (void**)&selection);
9958 EXPECT_HR(hr, S_OK);
9959 IXMLDOMSelection_Release(selection);
9961 IXMLDOMNodeList_Release(list);
9963 hr = IXMLDOMDocument_get_childNodes(doc, &list);
9964 EXPECT_HR(hr, S_OK);
9966 hr = IXMLDOMNodeList_QueryInterface(list, &IID_IXMLDOMSelection, (void**)&selection);
9967 EXPECT_HR(hr, E_NOINTERFACE);
9969 IXMLDOMNodeList_Release(list);
9971 IXMLDOMDocument_Release(doc);
9975 static void test_load(void)
9977 IXMLDOMDocument *doc;
9978 IXMLDOMNodeList *list;
9984 BSTR path, bstr1, bstr2;
9988 /* prepare a file */
9989 hfile = CreateFileA("test.xml", GENERIC_WRITE|GENERIC_READ, 0, NULL, CREATE_ALWAYS, FILE_ATTRIBUTE_NORMAL, NULL );
9990 ok(hfile != INVALID_HANDLE_VALUE, "failed to create test file\n");
9991 if(hfile == INVALID_HANDLE_VALUE) return;
9993 ret = WriteFile(hfile, szNonUnicodeXML, sizeof(szNonUnicodeXML)-1, &written, NULL);
9994 ok(ret, "WriteFile failed\n");
9998 doc = create_document(&IID_IXMLDOMDocument);
10000 path = _bstr_("test.xml");
10002 /* load from path: VT_BSTR */
10003 V_VT(&src) = VT_BSTR;
10004 V_BSTR(&src) = path;
10005 hr = IXMLDOMDocument_load(doc, src, &b);
10006 EXPECT_HR(hr, S_OK);
10007 ok(b == VARIANT_TRUE, "got %d\n", b);
10009 /* load from a path: VT_BSTR|VT_BYREF */
10010 V_VT(&src) = VT_BSTR | VT_BYREF;
10011 V_BSTRREF(&src) = &path;
10012 hr = IXMLDOMDocument_load(doc, src, &b);
10013 EXPECT_HR(hr, S_OK);
10014 ok(b == VARIANT_TRUE, "got %d\n", b);
10016 /* load from a path: VT_BSTR|VT_BYREF, null ptr */
10017 V_VT(&src) = VT_BSTR | VT_BYREF;
10018 V_BSTRREF(&src) = NULL;
10019 hr = IXMLDOMDocument_load(doc, src, &b);
10020 EXPECT_HR(hr, E_INVALIDARG);
10021 ok(b == VARIANT_FALSE, "got %d\n", b);
10023 IXMLDOMDocument_Release(doc);
10025 DeleteFileA("test.xml");
10027 doc = create_document(&IID_IXMLDOMDocument);
10029 hr = IXMLDOMDocument_loadXML(doc, _bstr_(szExampleXML), &b);
10030 EXPECT_HR(hr, S_OK);
10031 ok(b == VARIANT_TRUE, "got %d\n", b);
10033 hr = IXMLDOMDocument_selectNodes(doc, _bstr_("//*"), &list);
10034 EXPECT_HR(hr, S_OK);
10035 bstr1 = _bstr_(list_to_string(list));
10037 hr = IXMLDOMNodeList_reset(list);
10038 EXPECT_HR(hr, S_OK);
10040 IXMLDOMDocument_Release(doc);
10042 doc = create_document(&IID_IXMLDOMDocument);
10045 V_ARRAY(&src) = SafeArrayCreateVector(VT_UI1, 0, lstrlenA(szExampleXML));
10046 V_VT(&src) = VT_ARRAY|VT_UI1;
10047 ok(V_ARRAY(&src) != NULL, "SafeArrayCreateVector() returned NULL\n");
10049 hr = SafeArrayAccessData(V_ARRAY(&src), &ptr);
10050 EXPECT_HR(hr, S_OK);
10051 ok(ptr != NULL, "SafeArrayAccessData() returned NULL\n");
10053 memcpy(ptr, szExampleXML, lstrlenA(szExampleXML));
10054 hr = SafeArrayUnlock(V_ARRAY(&src));
10055 EXPECT_HR(hr, S_OK);
10057 hr = IXMLDOMDocument_load(doc, src, &b);
10058 EXPECT_HR(hr, S_OK);
10059 ok(b == VARIANT_TRUE, "got %d\n", b);
10061 hr = IXMLDOMDocument_selectNodes(doc, _bstr_("//*"), &list);
10062 EXPECT_HR(hr, S_OK);
10063 bstr2 = _bstr_(list_to_string(list));
10065 hr = IXMLDOMNodeList_reset(list);
10066 EXPECT_HR(hr, S_OK);
10068 ok(lstrcmpW(bstr1, bstr2) == 0, "strings not equal: %s : %s\n",
10069 wine_dbgstr_w(bstr1), wine_dbgstr_w(bstr2));
10071 IXMLDOMDocument_Release(doc);
10072 IXMLDOMNodeList_Release(list);
10073 VariantClear(&src);
10075 /* UTF-16 isn't accepted */
10076 doc = create_document(&IID_IXMLDOMDocument);
10078 V_ARRAY(&src) = SafeArrayCreateVector(VT_UI1, 0, lstrlenW(szComplete1) * sizeof(WCHAR));
10079 V_VT(&src) = VT_ARRAY|VT_UI1;
10080 ok(V_ARRAY(&src) != NULL, "SafeArrayCreateVector() returned NULL\n");
10082 hr = SafeArrayAccessData(V_ARRAY(&src), &ptr);
10083 EXPECT_HR(hr, S_OK);
10084 ok(ptr != NULL, "SafeArrayAccessData() returned NULL\n");
10086 memcpy(ptr, szComplete1, lstrlenW(szComplete1) * sizeof(WCHAR));
10087 hr = SafeArrayUnlock(V_ARRAY(&src));
10088 EXPECT_HR(hr, S_OK);
10090 hr = IXMLDOMDocument_load(doc, src, &b);
10091 todo_wine EXPECT_HR(hr, S_FALSE);
10092 todo_wine ok(b == VARIANT_FALSE, "got %d\n", b);
10094 VariantClear(&src);
10096 /* it doesn't like it as a VT_ARRAY|VT_UI2 either */
10097 V_ARRAY(&src) = SafeArrayCreateVector(VT_UI2, 0, lstrlenW(szComplete1));
10098 V_VT(&src) = VT_ARRAY|VT_UI2;
10099 ok(V_ARRAY(&src) != NULL, "SafeArrayCreateVector() returned NULL\n");
10101 hr = SafeArrayAccessData(V_ARRAY(&src), &ptr);
10102 EXPECT_HR(hr, S_OK);
10103 ok(ptr != NULL, "SafeArrayAccessData() returned NULL\n");
10105 memcpy(ptr, szComplete1, lstrlenW(szComplete1) * sizeof(WCHAR));
10106 hr = SafeArrayUnlock(V_ARRAY(&src));
10107 EXPECT_HR(hr, S_OK);
10109 hr = IXMLDOMDocument_load(doc, src, &b);
10110 todo_wine EXPECT_HR(hr, E_INVALIDARG);
10111 ok(b == VARIANT_FALSE, "got %d\n", b);
10113 VariantClear(&src);
10114 IXMLDOMDocument_Release(doc);
10119 static void test_nsnamespacemanager(void)
10121 static const char xmluriA[] = "http://www.w3.org/XML/1998/namespace";
10122 IMXNamespaceManager *nsmgr;
10123 IVBMXNamespaceManager *mgr2;
10129 hr = CoCreateInstance(&CLSID_MXNamespaceManager40, NULL, CLSCTX_INPROC_SERVER,
10130 &IID_IMXNamespaceManager, (void**)&nsmgr);
10133 win_skip("MXNamespaceManager is not available\n");
10137 /* IMXNamespaceManager inherits from IUnknown */
10138 hr = IMXNamespaceManager_QueryInterface(nsmgr, &IID_IDispatch, (void**)&disp);
10139 EXPECT_HR(hr, S_OK);
10140 IDispatch_Release(disp);
10142 hr = IMXNamespaceManager_QueryInterface(nsmgr, &IID_IVBMXNamespaceManager, (void**)&mgr2);
10143 EXPECT_HR(hr, S_OK);
10144 IVBMXNamespaceManager_Release(mgr2);
10146 hr = IMXNamespaceManager_declarePrefix(nsmgr, NULL, NULL);
10147 EXPECT_HR(hr, S_OK);
10149 /* prefix already added */
10150 hr = IMXNamespaceManager_declarePrefix(nsmgr, NULL, _bstr_("ns0 uri"));
10151 EXPECT_HR(hr, S_FALSE);
10153 hr = IMXNamespaceManager_declarePrefix(nsmgr, _bstr_("ns0"), NULL);
10154 EXPECT_HR(hr, E_INVALIDARG);
10156 /* "xml" and "xmlns" are not allowed here */
10157 hr = IMXNamespaceManager_declarePrefix(nsmgr, _bstr_("xml"), _bstr_("uri1"));
10158 EXPECT_HR(hr, E_INVALIDARG);
10160 hr = IMXNamespaceManager_declarePrefix(nsmgr, _bstr_("xmlns"), _bstr_("uri1"));
10161 EXPECT_HR(hr, E_INVALIDARG);
10163 hr = IMXNamespaceManager_getDeclaredPrefix(nsmgr, -1, NULL, NULL);
10164 EXPECT_HR(hr, E_FAIL);
10166 hr = IMXNamespaceManager_getDeclaredPrefix(nsmgr, 0, NULL, NULL);
10167 EXPECT_HR(hr, E_POINTER);
10170 hr = IMXNamespaceManager_getDeclaredPrefix(nsmgr, 0, NULL, &len);
10171 EXPECT_HR(hr, S_OK);
10172 ok(len == 3, "got %d\n", len);
10176 hr = IMXNamespaceManager_getDeclaredPrefix(nsmgr, 0, buffW, &len);
10177 EXPECT_HR(hr, E_XML_BUFFERTOOSMALL);
10178 ok(len == -1, "got %d\n", len);
10179 ok(buffW[0] == 0x1, "got %x\n", buffW[0]);
10183 hr = IMXNamespaceManager_getDeclaredPrefix(nsmgr, 0, buffW, &len);
10184 EXPECT_HR(hr, S_OK);
10185 ok(len == 3, "got %d\n", len);
10186 ok(!lstrcmpW(buffW, _bstr_("xml")), "got prefix %s\n", wine_dbgstr_w(buffW));
10189 hr = IMXNamespaceManager_getURI(nsmgr, NULL, NULL, NULL, NULL);
10190 EXPECT_HR(hr, E_INVALIDARG);
10193 hr = IMXNamespaceManager_getURI(nsmgr, NULL, NULL, NULL, &len);
10194 EXPECT_HR(hr, E_INVALIDARG);
10195 ok(len == -1, "got %d\n", len);
10197 hr = IMXNamespaceManager_getURI(nsmgr, _bstr_("xml"), NULL, NULL, NULL);
10198 EXPECT_HR(hr, E_POINTER);
10201 hr = IMXNamespaceManager_getURI(nsmgr, _bstr_("xml"), NULL, NULL, &len);
10202 EXPECT_HR(hr, S_OK);
10203 /* length of "xml" uri is constant */
10204 ok(len == strlen(xmluriA), "got %d\n", len);
10207 hr = IMXNamespaceManager_getURI(nsmgr, _bstr_("xml"), NULL, buffW, &len);
10208 EXPECT_HR(hr, S_OK);
10209 ok(len == strlen(xmluriA), "got %d\n", len);
10210 ok(!lstrcmpW(buffW, _bstr_(xmluriA)), "got prefix %s\n", wine_dbgstr_w(buffW));
10212 len = strlen(xmluriA)-1;
10214 hr = IMXNamespaceManager_getURI(nsmgr, _bstr_("xml"), NULL, buffW, &len);
10215 EXPECT_HR(hr, E_XML_BUFFERTOOSMALL);
10216 ok(len == strlen(xmluriA)-1, "got %d\n", len);
10217 ok(buffW[0] == 0x1, "got %x\n", buffW[0]);
10219 /* prefix xml1 not defined */
10221 hr = IMXNamespaceManager_getURI(nsmgr, _bstr_("xml1"), NULL, NULL, &len);
10222 EXPECT_HR(hr, S_FALSE);
10223 ok(len == 0, "got %d\n", len);
10227 hr = IMXNamespaceManager_getURI(nsmgr, _bstr_("xml1"), NULL, buffW, &len);
10228 EXPECT_HR(hr, S_FALSE);
10229 ok(buffW[0] == 0, "got %x\n", buffW[0]);
10230 ok(len == 0, "got %d\n", len);
10232 IMXNamespaceManager_Release(nsmgr);
10237 static void test_nsnamespacemanager_override(void)
10239 IMXNamespaceManager *nsmgr;
10245 hr = CoCreateInstance(&CLSID_MXNamespaceManager40, NULL, CLSCTX_INPROC_SERVER,
10246 &IID_IMXNamespaceManager, (void**)&nsmgr);
10249 win_skip("MXNamespaceManager is not available\n");
10253 len = sizeof(buffW)/sizeof(WCHAR);
10255 hr = IMXNamespaceManager_getDeclaredPrefix(nsmgr, 0, buffW, &len);
10256 EXPECT_HR(hr, S_OK);
10257 ok(!lstrcmpW(buffW, _bstr_("xml")), "got prefix %s\n", wine_dbgstr_w(buffW));
10259 len = sizeof(buffW)/sizeof(WCHAR);
10261 hr = IMXNamespaceManager_getDeclaredPrefix(nsmgr, 1, buffW, &len);
10262 EXPECT_HR(hr, E_FAIL);
10264 hr = IMXNamespaceManager_getAllowOverride(nsmgr, NULL);
10265 EXPECT_HR(hr, E_POINTER);
10268 hr = IMXNamespaceManager_getAllowOverride(nsmgr, &b);
10269 EXPECT_HR(hr, S_OK);
10270 ok(b == VARIANT_TRUE, "got %d\n", b);
10272 hr = IMXNamespaceManager_putAllowOverride(nsmgr, VARIANT_FALSE);
10273 EXPECT_HR(hr, S_OK);
10275 hr = IMXNamespaceManager_declarePrefix(nsmgr, NULL, _bstr_("ns0 uri"));
10276 EXPECT_HR(hr, S_OK);
10278 len = sizeof(buffW)/sizeof(WCHAR);
10280 hr = IMXNamespaceManager_getURI(nsmgr, _bstr_(""), NULL, buffW, &len);
10281 EXPECT_HR(hr, S_OK);
10282 ok(!lstrcmpW(buffW, _bstr_("ns0 uri")), "got uri %s\n", wine_dbgstr_w(buffW));
10284 hr = IMXNamespaceManager_declarePrefix(nsmgr, _bstr_("ns0"), _bstr_("ns0 uri"));
10285 EXPECT_HR(hr, S_OK);
10287 len = sizeof(buffW)/sizeof(WCHAR);
10289 hr = IMXNamespaceManager_getDeclaredPrefix(nsmgr, 0, buffW, &len);
10290 EXPECT_HR(hr, S_OK);
10291 ok(!lstrcmpW(buffW, _bstr_("xml")), "got prefix %s\n", wine_dbgstr_w(buffW));
10293 len = sizeof(buffW)/sizeof(WCHAR);
10295 hr = IMXNamespaceManager_getDeclaredPrefix(nsmgr, 1, buffW, &len);
10296 EXPECT_HR(hr, S_OK);
10297 ok(!lstrcmpW(buffW, _bstr_("ns0")), "got prefix %s\n", wine_dbgstr_w(buffW));
10299 len = sizeof(buffW)/sizeof(WCHAR);
10301 hr = IMXNamespaceManager_getDeclaredPrefix(nsmgr, 2, buffW, &len);
10302 EXPECT_HR(hr, S_OK);
10303 ok(!lstrcmpW(buffW, _bstr_("")), "got prefix %s\n", wine_dbgstr_w(buffW));
10305 /* new prefix placed at index 1 always */
10306 hr = IMXNamespaceManager_declarePrefix(nsmgr, _bstr_("ns1"), _bstr_("ns1 uri"));
10307 EXPECT_HR(hr, S_OK);
10309 len = sizeof(buffW)/sizeof(WCHAR);
10311 hr = IMXNamespaceManager_getDeclaredPrefix(nsmgr, 1, buffW, &len);
10312 EXPECT_HR(hr, S_OK);
10313 ok(!lstrcmpW(buffW, _bstr_("ns1")), "got prefix %s\n", wine_dbgstr_w(buffW));
10315 hr = IMXNamespaceManager_declarePrefix(nsmgr, _bstr_(""), NULL);
10316 todo_wine EXPECT_HR(hr, E_FAIL);
10318 hr = IMXNamespaceManager_declarePrefix(nsmgr, NULL, NULL);
10319 EXPECT_HR(hr, E_FAIL);
10321 hr = IMXNamespaceManager_declarePrefix(nsmgr, NULL, _bstr_("ns0 uri"));
10322 EXPECT_HR(hr, E_FAIL);
10324 hr = IMXNamespaceManager_putAllowOverride(nsmgr, VARIANT_TRUE);
10325 EXPECT_HR(hr, S_OK);
10327 hr = IMXNamespaceManager_declarePrefix(nsmgr, NULL, _bstr_("ns0 uri override"));
10328 EXPECT_HR(hr, S_FALSE);
10330 len = sizeof(buffW)/sizeof(WCHAR);
10332 hr = IMXNamespaceManager_getURI(nsmgr, _bstr_(""), NULL, buffW, &len);
10333 EXPECT_HR(hr, S_OK);
10334 ok(!lstrcmpW(buffW, _bstr_("ns0 uri override")), "got uri %s\n", wine_dbgstr_w(buffW));
10336 len = sizeof(buffW)/sizeof(WCHAR);
10338 hr = IMXNamespaceManager_getDeclaredPrefix(nsmgr, 3, buffW, &len);
10339 EXPECT_HR(hr, S_OK);
10340 ok(!lstrcmpW(buffW, _bstr_("")), "got prefix %s\n", wine_dbgstr_w(buffW));
10342 IMXNamespaceManager_Release(nsmgr);
10349 IXMLDOMDocument *doc;
10352 hr = CoInitialize( NULL );
10353 ok( hr == S_OK, "failed to init com\n");
10354 if (hr != S_OK) return;
10358 hr = CoCreateInstance( &CLSID_DOMDocument, NULL, CLSCTX_INPROC_SERVER, &IID_IXMLDOMDocument, (void**)&doc );
10361 win_skip("IXMLDOMDocument is not available (0x%08x)\n", hr);
10365 IXMLDOMDocument_Release(doc);
10368 test_persiststreaminit();
10372 test_getElementsByTagName();
10374 test_get_childNodes();
10375 test_get_firstChild();
10376 test_get_lastChild();
10377 test_removeChild();
10378 test_replaceChild();
10379 test_removeNamedItem();
10380 test_IXMLDOMDocument2();
10386 test_nodeTypeTests();
10388 test_testTransforms();
10390 test_FormattingXML();
10391 test_nodeTypedValue();
10392 test_TransformWithLoadingLocalFile();
10393 test_put_nodeValue();
10394 test_document_IObjectSafety();
10396 test_getQualifiedItem();
10397 test_removeQualifiedItem();
10398 test_get_ownerDocument();
10399 test_setAttributeNode();
10400 test_put_dataType();
10403 test_default_properties();
10404 test_selectSingleNode();
10406 test_createProcessingInstruction();
10407 test_put_nodeTypedValue();
10409 test_insertBefore();
10410 test_appendChild();
10411 test_get_doctype();
10412 test_get_tagName();
10413 test_get_dataType();
10414 test_get_nodeTypeString();
10415 test_get_attributes();
10419 test_xsltemplate();
10421 test_nsnamespacemanager();
10422 test_nsnamespacemanager_override();