4 * Copyright 2005 Mike McCormack for CodeWeavers
5 * Copyright 2007-2008 Alistair Leslie-Hughes
7 * This library is free software; you can redistribute it and/or
8 * modify it under the terms of the GNU Lesser General Public
9 * License as published by the Free Software Foundation; either
10 * version 2.1 of the License, or (at your option) any later version.
12 * This library is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 * Lesser General Public License for more details.
17 * You should have received a copy of the GNU Lesser General Public
18 * License along with this library; if not, write to the Free Software
19 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
30 #include "msxml2did.h"
35 #include "wine/test.h"
39 DEFINE_GUID(IID_IObjectSafety, 0xcb5bdc81, 0x93c1, 0x11cf, 0x8f,0x20, 0x00,0x80,0x5f,0x2c,0xd0,0x64);
40 DEFINE_GUID(CLSID_DOMDocument60, 0x88d96a05, 0xf192, 0x11d4, 0xa6,0x5f, 0x00,0x40,0x96,0x32,0x51,0xe5);
42 static const WCHAR szEmpty[] = { 0 };
43 static const WCHAR szIncomplete[] = {
44 '<','?','x','m','l',' ',
45 'v','e','r','s','i','o','n','=','\'','1','.','0','\'','?','>','\n',0
47 static const WCHAR szComplete1[] = {
48 '<','?','x','m','l',' ',
49 'v','e','r','s','i','o','n','=','\'','1','.','0','\'','?','>','\n',
50 '<','o','p','e','n','>','<','/','o','p','e','n','>','\n',0
52 static const WCHAR szComplete2[] = {
53 '<','?','x','m','l',' ',
54 'v','e','r','s','i','o','n','=','\'','1','.','0','\'','?','>','\n',
55 '<','o','>','<','/','o','>','\n',0
57 static const WCHAR szComplete3[] = {
58 '<','?','x','m','l',' ',
59 'v','e','r','s','i','o','n','=','\'','1','.','0','\'','?','>','\n',
60 '<','a','>','<','/','a','>','\n',0
62 static const WCHAR szComplete4[] = {
63 '<','?','x','m','l',' ','v','e','r','s','i','o','n','=','\'','1','.','0','\'','?','>','\n',
64 '<','l','c',' ','d','l','=','\'','s','t','r','1','\'','>','\n',
65 '<','b','s',' ','v','r','=','\'','s','t','r','2','\'',' ','s','z','=','\'','1','2','3','4','\'','>',
66 'f','n','1','.','t','x','t','\n',
67 '<','/','b','s','>','\n',
68 '<','p','r',' ','i','d','=','\'','s','t','r','3','\'',' ','v','r','=','\'','1','.','2','.','3','\'',' ',
69 'p','n','=','\'','w','i','n','e',' ','2','0','0','5','0','8','0','4','\'','>','\n',
70 'f','n','2','.','t','x','t','\n',
71 '<','/','p','r','>','\n',
72 '<','e','m','p','t','y','>','<','/','e','m','p','t','y','>','\n',
76 '<','/','b','a','>','\n',
77 '<','/','f','o','>','\n',
78 '<','/','l','c','>','\n',0
80 static const WCHAR szComplete5[] = {
81 '<','S',':','s','e','a','r','c','h',' ','x','m','l','n','s',':','D','=','"','D','A','V',':','"',' ',
82 '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','"',
83 ' ','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','"','>',
84 '<','S',':','s','c','o','p','e','>',
85 '<','S',':','d','e','e','p','>','/','<','/','S',':','d','e','e','p','>',
86 '<','/','S',':','s','c','o','p','e','>',
87 '<','S',':','c','o','n','t','e','n','t','f','r','e','e','t','e','x','t','>',
88 '<','C',':','t','e','x','t','o','r','p','r','o','p','e','r','t','y','/','>',
89 'c','o','m','p','u','t','e','r',
90 '<','/','S',':','c','o','n','t','e','n','t','f','r','e','e','t','e','x','t','>',
91 '<','/','S',':','s','e','a','r','c','h','>',0
94 static const WCHAR szComplete6[] = {
95 '<','?','x','m','l',' ','v','e','r','s','i','o','n','=','\'','1','.','0','\'',' ',
96 'e','n','c','o','d','i','n','g','=','\'','W','i','n','d','o','w','s','-','1','2','5','2','\'','?','>','\n',
97 '<','o','p','e','n','>','<','/','o','p','e','n','>','\n',0
100 static const CHAR szNonUnicodeXML[] =
101 "<?xml version='1.0' encoding='Windows-1252'?>\n"
104 static const CHAR szExampleXML[] =
105 "<?xml version='1.0' encoding='utf-8'?>\n"
106 "<root xmlns:foo='urn:uuid:86B2F87F-ACB6-45cd-8B77-9BDB92A01A29'>\n"
111 " <description xmlns:foo='http://www.winehq.org' xmlns:bar='urn:uuid:86B2F87F-ACB6-45cd-8B77-9BDB92A01A29'>\n"
112 " <html xmlns='http://www.w3.org/1999/xhtml'>\n"
113 " This is <strong>a</strong> <i>description</i>. <bar:x/>\n"
121 " <c type=\"old\">C2 field</c>\n"
124 " <elem xmlns='urn:uuid:86B2F87F-ACB6-45cd-8B77-9BDB92A01A29'>\n"
133 " <foo:c>C4 field</foo:c>\n"
137 static const CHAR szTransformXML[] =
138 "<?xml version=\"1.0\"?>\n"
143 static const CHAR szTransformSSXML[] =
144 "<xsl:stylesheet xmlns:xsl=\"http://www.w3.org/1999/XSL/Transform\" version=\"1.0\">\n"
145 " <xsl:output method=\"html\"/>\n"
146 " <xsl:template match=\"/\">\n"
147 " <xsl:apply-templates select=\"greeting\"/>\n"
149 " <xsl:template match=\"greeting\">\n"
153 " <xsl:value-of select=\".\"/>\n"
160 static const CHAR szTransformOutput[] =
163 "</h1></body></html>";
165 static const CHAR szTypeValueXML[] =
166 "<?xml version=\"1.0\" encoding=\"utf-8\"?>\n"
167 "<root xmlns:dt=\"urn:schemas-microsoft-com:datatypes\">\n"
168 " <string>Wine</string>\n"
169 " <string2 dt:dt=\"string\">String</string2>\n"
170 " <number dt:dt=\"number\">12.44</number>\n"
171 " <number2 dt:dt=\"NUMbEr\">-3.71e3</number2>\n"
172 " <int dt:dt=\"int\">-13</int>\n"
173 " <fixed dt:dt=\"fixed.14.4\">7322.9371</fixed>\n"
174 " <bool dt:dt=\"boolean\">1</bool>\n"
175 " <datetime dt:dt=\"datetime\">2009-11-18T03:21:33.12</datetime>\n"
176 " <datetimetz dt:dt=\"datetime.tz\">2003-07-11T11:13:57+03:00</datetimetz>\n"
177 " <date dt:dt=\"date\">3721-11-01</date>\n"
178 " <time dt:dt=\"time\">13:57:12.31321</time>\n"
179 " <timetz dt:dt=\"time.tz\">23:21:01.13+03:21</timetz>\n"
180 " <i1 dt:dt=\"i1\">-13</i1>\n"
181 " <i2 dt:dt=\"i2\">31915</i2>\n"
182 " <i4 dt:dt=\"i4\">-312232</i4>\n"
183 " <ui1 dt:dt=\"ui1\">123</ui1>\n"
184 " <ui2 dt:dt=\"ui2\">48282</ui2>\n"
185 " <ui4 dt:dt=\"ui4\">949281</ui4>\n"
186 " <r4 dt:dt=\"r4\">213124.0</r4>\n"
187 " <r8 dt:dt=\"r8\">0.412</r8>\n"
188 " <float dt:dt=\"float\">41221.421</float>\n"
189 " <uuid dt:dt=\"uuid\">333C7BC4-460F-11D0-BC04-0080C7055a83</uuid>\n"
190 " <binhex dt:dt=\"bin.hex\">fffca012003c</binhex>\n"
191 " <binbase64 dt:dt=\"bin.base64\">YmFzZTY0IHRlc3Q=</binbase64>\n"
194 static const CHAR szBasicTransformSSXMLPart1[] =
195 "<?xml version=\"1.0\"?>"
196 "<xsl:stylesheet version=\"1.0\" xmlns:xsl=\"http://www.w3.org/1999/XSL/Transform\" >"
197 "<xsl:output method=\"html\"/>\n"
198 "<xsl:template match=\"/\">"
199 "<HTML><BODY><TABLE>"
200 " <xsl:apply-templates select='document(\"";
202 static const CHAR szBasicTransformSSXMLPart2[] =
204 " <xsl:sort select=\"cost\"/><xsl:sort select=\"name\"/>"
205 " </xsl:apply-templates>"
206 "</TABLE></BODY></HTML>"
208 "<xsl:template match=\"bottle\">"
209 " <TR><xsl:apply-templates select=\"name\" /><xsl:apply-templates select=\"cost\" /></TR>"
211 "<xsl:template match=\"name\">"
212 " <TD><xsl:apply-templates /></TD>"
214 "<xsl:template match=\"cost\">"
215 " <TD><xsl:apply-templates /></TD>"
219 static const CHAR szBasicTransformXML[] =
220 "<?xml version=\"1.0\"?><bottle><wine><name>Wine</name><cost>$25.00</cost></wine></bottle>";
222 static const CHAR szBasicTransformOutput[] =
223 "<HTML><BODY><TABLE><TD>Wine</TD><TD>$25.00</TD></TABLE></BODY></HTML>";
225 static const WCHAR szNonExistentFile[] = {
226 'c', ':', '\\', 'N', 'o', 'n', 'e', 'x', 'i', 's', 't', 'e', 'n', 't', '.', 'x', 'm', 'l', 0
228 static const WCHAR szNonExistentAttribute[] = {
229 'n','o','n','E','x','i','s','i','t','i','n','g','A','t','t','r','i','b','u','t','e',0
231 static const WCHAR szDocument[] = {
232 '#', 'd', 'o', 'c', 'u', 'm', 'e', 'n', 't', 0
235 static const WCHAR szOpen[] = { 'o','p','e','n',0 };
236 static WCHAR szdl[] = { 'd','l',0 };
237 static const WCHAR szvr[] = { 'v','r',0 };
238 static const WCHAR szlc[] = { 'l','c',0 };
239 static WCHAR szbs[] = { 'b','s',0 };
240 static const WCHAR szstr1[] = { 's','t','r','1',0 };
241 static const WCHAR szstr2[] = { 's','t','r','2',0 };
242 static const WCHAR szstar[] = { '*',0 };
243 static const WCHAR szfn1_txt[] = {'f','n','1','.','t','x','t',0};
245 static WCHAR szComment[] = {'A',' ','C','o','m','m','e','n','t',0 };
246 static WCHAR szCommentXML[] = {'<','!','-','-','A',' ','C','o','m','m','e','n','t','-','-','>',0 };
247 static WCHAR szCommentNodeText[] = {'#','c','o','m','m','e','n','t',0 };
249 static WCHAR szElement[] = {'E','l','e','T','e','s','t', 0 };
250 static WCHAR szElementXML[] = {'<','E','l','e','T','e','s','t','/','>',0 };
251 static WCHAR szElementXML2[] = {'<','E','l','e','T','e','s','t',' ','A','t','t','r','=','"','"','/','>',0 };
252 static WCHAR szElementXML3[] = {'<','E','l','e','T','e','s','t',' ','A','t','t','r','=','"','"','>',
253 'T','e','s','t','i','n','g','N','o','d','e','<','/','E','l','e','T','e','s','t','>',0 };
254 static WCHAR szElementXML4[] = {'<','E','l','e','T','e','s','t',' ','A','t','t','r','=','"','"','>',
255 '&','a','m','p',';','x',' ',0x2103,'<','/','E','l','e','T','e','s','t','>',0 };
257 static WCHAR szAttribute[] = {'A','t','t','r',0 };
258 static WCHAR szAttributeXML[] = {'A','t','t','r','=','"','"',0 };
260 static WCHAR szCData[] = {'[','1',']','*','2','=','3',';',' ','&','g','e','e',' ','t','h','a','t','s',
261 ' ','n','o','t',' ','r','i','g','h','t','!', 0};
262 static WCHAR szCDataXML[] = {'<','!','[','C','D','A','T','A','[','[','1',']','*','2','=','3',';',' ','&',
263 'g','e','e',' ','t','h','a','t','s',' ','n','o','t',' ','r','i','g','h','t',
265 static WCHAR szCDataNodeText[] = {'#','c','d','a','t','a','-','s','e','c','t','i','o','n',0 };
266 static WCHAR szDocFragmentText[] = {'#','d','o','c','u','m','e','n','t','-','f','r','a','g','m','e','n','t',0 };
268 static WCHAR szEntityRef[] = {'e','n','t','i','t','y','r','e','f',0 };
269 static WCHAR szEntityRefXML[] = {'&','e','n','t','i','t','y','r','e','f',';',0 };
270 static WCHAR szStrangeChars[] = {'&','x',' ',0x2103, 0};
272 #define expect_bstr_eq_and_free(bstr, expect) { \
273 BSTR bstrExp = alloc_str_from_narrow(expect); \
274 ok(lstrcmpW(bstr, bstrExp) == 0, "String differs\n"); \
275 SysFreeString(bstr); \
276 SysFreeString(bstrExp); \
279 #define expect_eq(expr, value, type, format) { type ret = (expr); ok((value) == ret, #expr " expected " format " got " format "\n", value, ret); }
281 #define ole_check(expr) { \
283 ok(r == S_OK, #expr " returned %x\n", r); \
286 #define ole_expect(expr, expect) { \
288 ok(r == (expect), #expr " returned %x, expected %x\n", r, expect); \
291 #define double_eq(x, y) ok((x)-(y)<=1e-14*(x) && (x)-(y)>=-1e-14*(x), "expected %.16g, got %.16g\n", x, y)
293 static void* _create_document(const IID *iid, int line)
298 hr = CoCreateInstance( &CLSID_DOMDocument, NULL, CLSCTX_INPROC_SERVER, iid, (void**)&doc );
299 ok_(__FILE__,line)( hr == S_OK, "failed to create CLSID_DOMDocument instance: 0x%08x\n", hr );
304 #define create_document(iid) _create_document(iid, __LINE__)
306 static BSTR alloc_str_from_narrow(const char *str)
308 int len = MultiByteToWideChar(CP_ACP, 0, str, -1, NULL, 0);
309 BSTR ret = SysAllocStringLen(NULL, len - 1); /* NUL character added automatically */
310 MultiByteToWideChar(CP_ACP, 0, str, -1, ret, len);
314 static BSTR alloced_bstrs[256];
315 static int alloced_bstrs_count;
317 static BSTR _bstr_(const char *str)
319 assert(alloced_bstrs_count < sizeof(alloced_bstrs)/sizeof(alloced_bstrs[0]));
320 alloced_bstrs[alloced_bstrs_count] = alloc_str_from_narrow(str);
321 return alloced_bstrs[alloced_bstrs_count++];
324 static void free_bstrs(void)
327 for (i = 0; i < alloced_bstrs_count; i++)
328 SysFreeString(alloced_bstrs[i]);
329 alloced_bstrs_count = 0;
332 static VARIANT _variantbstr_(const char *str)
336 V_BSTR(&v) = _bstr_(str);
340 static BOOL compareIgnoreReturns(BSTR sLeft, BSTR sRight)
344 while (*sLeft == '\r' || *sLeft == '\n') sLeft++;
345 while (*sRight == '\r' || *sRight == '\n') sRight++;
346 if (*sLeft != *sRight) return FALSE;
347 if (!*sLeft) return TRUE;
353 static BOOL compareIgnoreReturnsWhitespace(BSTR sLeft, BSTR sRight)
355 /* MSXML3 inserts whitespace where as libxml doesn't. */
358 while (*sLeft == '\r' || *sLeft == '\n' || *sLeft == ' ') sLeft++;
359 while (*sRight == '\r' || *sRight == '\n' || *sRight == ' ') sRight++;
360 if (*sLeft != *sRight) return FALSE;
361 if (!*sLeft) return TRUE;
367 static void get_str_for_type(DOMNodeType type, char *buf)
381 wsprintfA(buf, "[%d]", type);
385 #define test_disp(u) _test_disp(__LINE__,u)
386 static void _test_disp(unsigned line, IUnknown *unk)
388 DISPID dispid = DISPID_XMLDOM_NODELIST_RESET;
396 hres = IUnknown_QueryInterface(unk, &IID_IDispatchEx, (void**)&dispex);
397 ok_(__FILE__,line) (hres == S_OK, "Could not get IDispatch: %08x\n", hres);
402 hres = IDispatchEx_GetTypeInfoCount(dispex, &ticnt);
403 ok_(__FILE__,line) (hres == S_OK, "GetTypeInfoCount failed: %08x\n", hres);
404 ok_(__FILE__,line) (ticnt == 1, "ticnt=%u\n", ticnt);
406 sName = SysAllocString( szstar );
407 hres = IDispatchEx_DeleteMemberByName(dispex, sName, fdexNameCaseSensitive);
408 ok(hres == E_NOTIMPL, "expected E_NOTIMPL got %08x\n", hres);
409 SysFreeString( sName );
411 hres = IDispatchEx_DeleteMemberByDispID(dispex, dispid);
412 ok(hres == E_NOTIMPL, "expected E_NOTIMPL got %08x\n", hres);
414 hres = IDispatchEx_GetMemberProperties(dispex, dispid, grfdexPropCanAll, &dwProps);
415 ok(hres == E_NOTIMPL, "expected E_NOTIMPL got %08x\n", hres);
416 ok(dwProps == 0, "expected 0 got %d\n", dwProps);
418 hres = IDispatchEx_GetMemberName(dispex, dispid, &sName);
419 ok(hres == E_NOTIMPL, "expected E_NOTIMPL got %08x\n", hres);
421 SysFreeString(sName);
423 hres = IDispatchEx_GetNextDispID(dispex, fdexEnumDefault, DISPID_XMLDOM_NODELIST_RESET, &dispid);
424 ok(hres == E_NOTIMPL, "expected E_NOTIMPL got %08x\n", hres);
426 hres = IDispatchEx_GetNameSpaceParent(dispex, &pUnk);
427 ok(hres == E_NOTIMPL, "expected E_NOTIMPL got %08x\n", hres);
428 if(hres == S_OK && pUnk)
429 IUnknown_Release(pUnk);
431 IDispatchEx_Release(dispex);
434 static int get_node_position(IXMLDOMNode *node)
439 IXMLDOMNode_AddRef(node);
442 IXMLDOMNode *new_node;
445 r = IXMLDOMNode_get_previousSibling(node, &new_node);
446 ok(SUCCEEDED(r), "get_previousSibling failed\n");
447 IXMLDOMNode_Release(node);
453 static void node_to_string(IXMLDOMNode *node, char *buf)
460 lstrcpyA(buf, "(null)");
464 IXMLDOMNode_AddRef(node);
467 IXMLDOMNode *new_node;
469 ole_check(IXMLDOMNode_get_nodeType(node, &type));
470 get_str_for_type(type, buf);
473 if (type == NODE_ATTRIBUTE)
476 ole_check(IXMLDOMNode_get_nodeName(node, &bstr));
478 wsprintfA(buf, "%ws", bstr);
483 r = IXMLDOMNode_selectSingleNode(node, _bstr_(".."), &new_node);
487 r = IXMLDOMNode_get_parentNode(node, &new_node);
488 wsprintf(buf, "%d", get_node_position(node));
492 ok(SUCCEEDED(r), "get_parentNode failed (%08x)\n", r);
493 IXMLDOMNode_Release(node);
502 static char *list_to_string(IXMLDOMNodeList *list)
504 static char buf[4096];
511 lstrcpyA(buf, "(null)");
514 ole_check(IXMLDOMNodeList_get_length(list, &len));
515 for (i = 0; i < len; i++)
520 ole_check(IXMLDOMNodeList_nextNode(list, &node));
521 node_to_string(node, pos);
523 IXMLDOMNode_Release(node);
529 #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); }
530 #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); }
532 static void test_domdoc( void )
535 IXMLDOMDocument *doc;
536 IXMLDOMParseError *error;
537 IXMLDOMElement *element = NULL;
539 IXMLDOMText *nodetext = NULL;
540 IXMLDOMComment *node_comment = NULL;
541 IXMLDOMAttribute *node_attr = NULL;
542 IXMLDOMNode *nodeChild = NULL;
543 IXMLDOMProcessingInstruction *nodePI = NULL;
544 ISupportErrorInfo *support_error = NULL;
552 doc = create_document(&IID_IXMLDOMDocument);
555 test_disp((IUnknown*)doc);
559 /* crashes on native */
560 r = IXMLDOMDocument_loadXML( doc, (BSTR)0x1, NULL );
563 /* try some stupid things */
564 r = IXMLDOMDocument_loadXML( doc, NULL, NULL );
565 ok( r == S_FALSE, "loadXML succeeded\n");
568 r = IXMLDOMDocument_loadXML( doc, NULL, &b );
569 ok( r == S_FALSE, "loadXML succeeded\n");
570 ok( b == VARIANT_FALSE, "failed to load XML string\n");
572 /* try to load a document from a nonexistent file */
574 str = SysAllocString( szNonExistentFile );
576 V_VT(&var) = VT_BSTR;
579 r = IXMLDOMDocument_load( doc, var, &b);
580 ok( r == S_FALSE, "loadXML succeeded\n");
581 ok( b == VARIANT_FALSE, "succeeded in loading XML string\n");
582 SysFreeString( str );
584 /* try load an empty document */
586 str = SysAllocString( szEmpty );
587 r = IXMLDOMDocument_loadXML( doc, str, &b );
588 ok( r == S_FALSE, "loadXML succeeded\n");
589 ok( b == VARIANT_FALSE, "succeeded in loading XML string\n");
590 SysFreeString( str );
592 r = IXMLDOMDocument_get_async( doc, &b );
593 ok( r == S_OK, "get_async failed (%08x)\n", r);
594 ok( b == VARIANT_TRUE, "Wrong default value\n");
596 /* check that there's no document element */
598 r = IXMLDOMDocument_get_documentElement( doc, &element );
599 ok( r == S_FALSE, "should be no document element\n");
601 /* try finding a node */
603 str = SysAllocString( szstr1 );
604 r = IXMLDOMDocument_selectSingleNode( doc, str, &node );
605 ok( r == S_FALSE, "ret %08x\n", r );
606 SysFreeString( str );
609 str = SysAllocString( szIncomplete );
610 r = IXMLDOMDocument_loadXML( doc, str, &b );
611 ok( r == S_FALSE, "loadXML succeeded\n");
612 ok( b == VARIANT_FALSE, "succeeded in loading XML string\n");
613 SysFreeString( str );
615 /* check that there's no document element */
616 element = (IXMLDOMElement*)1;
617 r = IXMLDOMDocument_get_documentElement( doc, &element );
618 ok( r == S_FALSE, "should be no document element\n");
619 ok( element == NULL, "Element should be NULL\n");
621 /* test for BSTR handling, pass broken BSTR */
622 memcpy(&buff[2], szComplete1, sizeof(szComplete1));
623 /* just a big length */
624 *(DWORD*)buff = 0xf0f0;
626 r = IXMLDOMDocument_loadXML( doc, &buff[2], &b );
627 ok( r == S_OK, "loadXML failed\n");
628 ok( b == VARIANT_TRUE, "failed to load XML string\n");
630 /* loadXML ignores the encoding attribute and always expects Unicode */
632 str = SysAllocString( szComplete6 );
633 r = IXMLDOMDocument_loadXML( doc, str, &b );
634 ok( r == S_OK, "loadXML failed\n");
635 ok( b == VARIANT_TRUE, "failed to load XML string\n");
636 SysFreeString( str );
638 /* try a BSTR containing a Windows-1252 document */
640 str = SysAllocStringByteLen( szNonUnicodeXML, sizeof(szNonUnicodeXML) - 1 );
641 r = IXMLDOMDocument_loadXML( doc, str, &b );
642 ok( r == S_FALSE, "loadXML succeeded\n");
643 ok( b == VARIANT_FALSE, "succeeded in loading XML string\n");
644 SysFreeString( str );
646 /* try to load something valid */
648 str = SysAllocString( szComplete1 );
649 r = IXMLDOMDocument_loadXML( doc, str, &b );
650 ok( r == S_OK, "loadXML failed\n");
651 ok( b == VARIANT_TRUE, "failed to load XML string\n");
652 SysFreeString( str );
654 /* check if nodename is correct */
655 r = IXMLDOMDocument_get_nodeName( doc, NULL );
656 ok ( r == E_INVALIDARG, "get_nodeName (NULL) wrong code\n");
658 str = (BSTR)0xdeadbeef;
659 r = IXMLDOMDocument_get_baseName( doc, &str );
660 ok ( r == S_FALSE, "got 0x%08x\n", r);
661 ok (str == NULL, "got %p\n", str);
663 /* content doesn't matter here */
665 r = IXMLDOMDocument_get_nodeName( doc, &str );
666 ok ( r == S_OK, "get_nodeName wrong code\n");
667 ok ( str != NULL, "str is null\n");
668 ok( !lstrcmpW( str, szDocument ), "incorrect nodeName\n");
669 SysFreeString( str );
672 r = IXMLDOMDocument_put_text( doc, _bstr_("Should Fail") );
673 ok( r == E_FAIL, "ret %08x\n", r );
675 /* check that there's a document element */
677 r = IXMLDOMDocument_get_documentElement( doc, &element );
678 ok( r == S_OK, "should be a document element\n");
681 IObjectIdentity *ident;
684 test_disp((IUnknown*)element);
686 r = IXMLDOMElement_QueryInterface( element, &IID_IObjectIdentity, (void**)&ident );
687 ok( r == E_NOINTERFACE, "ret %08x\n", r);
689 r = IXMLDOMElement_get_tagName( element, NULL );
690 ok( r == E_INVALIDARG, "ret %08x\n", r);
692 /* check if the tag is correct */
693 r = IXMLDOMElement_get_tagName( element, &tag );
694 ok( r == S_OK, "couldn't get tag name\n");
695 ok( tag != NULL, "tag was null\n");
696 ok( !lstrcmpW( tag, szOpen ), "incorrect tag name\n");
697 SysFreeString( tag );
699 /* figure out what happens if we try to reload the document */
700 str = SysAllocString( szComplete2 );
701 r = IXMLDOMDocument_loadXML( doc, str, &b );
702 ok( r == S_OK, "loadXML failed\n");
703 ok( b == VARIANT_TRUE, "failed to load XML string\n");
704 SysFreeString( str );
706 /* check if the tag is still correct */
708 r = IXMLDOMElement_get_tagName( element, &tag );
709 ok( r == S_OK, "couldn't get tag name\n");
710 ok( tag != NULL, "tag was null\n");
711 ok( !lstrcmpW( tag, szOpen ), "incorrect tag name\n");
712 SysFreeString( tag );
714 IXMLDOMElement_Release( element );
718 /* as soon as we call loadXML again, the document element will disappear */
720 r = IXMLDOMDocument_loadXML( doc, NULL, NULL );
721 ok( r == S_FALSE, "loadXML failed\n");
722 ok( b == 2, "variant modified\n");
723 r = IXMLDOMDocument_get_documentElement( doc, &element );
724 ok( r == S_FALSE, "should be no document element\n");
726 /* try to load something else simple and valid */
728 str = SysAllocString( szComplete3 );
729 r = IXMLDOMDocument_loadXML( doc, str, &b );
730 ok( r == S_OK, "loadXML failed\n");
731 ok( b == VARIANT_TRUE, "failed to load XML string\n");
732 SysFreeString( str );
734 /* try something a little more complicated */
736 str = SysAllocString( szComplete4 );
737 r = IXMLDOMDocument_loadXML( doc, str, &b );
738 ok( r == S_OK, "loadXML failed\n");
739 ok( b == VARIANT_TRUE, "failed to load XML string\n");
740 SysFreeString( str );
742 r = IXMLDOMDocument_get_parseError( doc, &error );
743 ok( r == S_OK, "returns %08x\n", r );
745 r = IXMLDOMParseError_get_errorCode( error, &code );
746 ok( r == S_FALSE, "returns %08x\n", r );
747 ok( code == 0, "code %d\n", code );
748 IXMLDOMParseError_Release( error );
750 /* test createTextNode */
751 r = IXMLDOMDocument_createTextNode(doc, _bstr_(""), &nodetext);
752 ok( r == S_OK, "returns %08x\n", r );
753 IXMLDOMText_Release(nodetext);
755 str = SysAllocString( szOpen );
756 r = IXMLDOMDocument_createTextNode(doc, str, NULL);
757 ok( r == E_INVALIDARG, "returns %08x\n", r );
758 r = IXMLDOMDocument_createTextNode(doc, str, &nodetext);
759 ok( r == S_OK, "returns %08x\n", r );
760 SysFreeString( str );
763 IXMLDOMNamedNodeMap *pAttribs;
765 r = IXMLDOMText_QueryInterface(nodetext, &IID_IXMLDOMElement, (void**)&element);
766 ok(r == E_NOINTERFACE, "ret %08x\n", r );
768 /* Text Last Child Checks */
769 r = IXMLDOMText_get_lastChild(nodetext, NULL);
770 ok(r == E_INVALIDARG, "ret %08x\n", r );
772 nodeChild = (IXMLDOMNode*)0x1;
773 r = IXMLDOMText_get_lastChild(nodetext, &nodeChild);
774 ok(r == S_FALSE, "ret %08x\n", r );
775 ok(nodeChild == NULL, "nodeChild not NULL\n");
777 /* test get_attributes */
778 r = IXMLDOMText_get_attributes( nodetext, NULL );
779 ok( r == E_INVALIDARG, "get_attributes returned wrong code\n");
781 pAttribs = (IXMLDOMNamedNodeMap*)0x1;
782 r = IXMLDOMText_get_attributes( nodetext, &pAttribs);
783 ok(r == S_FALSE, "ret %08x\n", r );
784 ok( pAttribs == NULL, "pAttribs not NULL\n");
786 /* test get_dataType */
787 r = IXMLDOMText_get_dataType(nodetext, &var);
788 ok(r == S_FALSE, "ret %08x\n", r );
789 ok( V_VT(&var) == VT_NULL, "incorrect dataType type\n");
792 /* test length property */
793 r = IXMLDOMText_get_length(nodetext, NULL);
794 ok(r == E_INVALIDARG, "ret %08x\n", r );
796 r = IXMLDOMText_get_length(nodetext, &nLength);
797 ok(r == S_OK, "ret %08x\n", r );
798 ok(nLength == 4, "expected 4 got %d\n", nLength);
800 /* test nodeTypeString */
801 r = IXMLDOMText_get_nodeTypeString(nodetext, &str);
802 ok(r == S_OK, "ret %08x\n", r );
803 ok( !lstrcmpW( str, _bstr_("text") ), "incorrect nodeTypeString string\n");
807 r = IXMLDOMText_put_data(nodetext, _bstr_("This &is a ; test <>\\"));
808 ok(r == S_OK, "ret %08x\n", r );
811 r = IXMLDOMText_get_data(nodetext, &str);
812 ok(r == S_OK, "ret %08x\n", r );
813 ok( !lstrcmpW( str, _bstr_("This &is a ; test <>\\") ), "incorrect put_data string\n");
816 /* Confirm XML text is good */
817 r = IXMLDOMText_get_xml(nodetext, &str);
818 ok(r == S_OK, "ret %08x\n", r );
819 ok( !lstrcmpW( str, _bstr_("This &is a ; test <>\\") ), "incorrect xml string\n");
822 /* Confirm we get the put_data Text back */
823 r = IXMLDOMText_get_text(nodetext, &str);
824 ok(r == S_OK, "ret %08x\n", r );
825 ok( !lstrcmpW( str, _bstr_("This &is a ; test <>\\") ), "incorrect xml string\n");
828 /* test substringData */
829 r = IXMLDOMText_substringData(nodetext, 0, 4, NULL);
830 ok(r == E_INVALIDARG, "ret %08x\n", r );
832 /* test substringData - Invalid offset */
833 str = (BSTR)&szElement;
834 r = IXMLDOMText_substringData(nodetext, -1, 4, &str);
835 ok(r == E_INVALIDARG, "ret %08x\n", r );
836 ok( str == NULL, "incorrect string\n");
838 /* test substringData - Invalid offset */
839 str = (BSTR)&szElement;
840 r = IXMLDOMText_substringData(nodetext, 30, 0, &str);
841 ok(r == S_FALSE, "ret %08x\n", r );
842 ok( str == NULL, "incorrect string\n");
844 /* test substringData - Invalid size */
845 str = (BSTR)&szElement;
846 r = IXMLDOMText_substringData(nodetext, 0, -1, &str);
847 ok(r == E_INVALIDARG, "ret %08x\n", r );
848 ok( str == NULL, "incorrect string\n");
850 /* test substringData - Invalid size */
851 str = (BSTR)&szElement;
852 r = IXMLDOMText_substringData(nodetext, 2, 0, &str);
853 ok(r == S_FALSE, "ret %08x\n", r );
854 ok( str == NULL, "incorrect string\n");
856 /* test substringData - Start of string */
857 r = IXMLDOMText_substringData(nodetext, 0, 4, &str);
858 ok(r == S_OK, "ret %08x\n", r );
859 ok( !lstrcmpW( str, _bstr_("This") ), "incorrect substringData string\n");
862 /* test substringData - Middle of string */
863 r = IXMLDOMText_substringData(nodetext, 13, 4, &str);
864 ok(r == S_OK, "ret %08x\n", r );
865 ok( !lstrcmpW( str, _bstr_("test") ), "incorrect substringData string\n");
868 /* test substringData - End of string */
869 r = IXMLDOMText_substringData(nodetext, 20, 4, &str);
870 ok(r == S_OK, "ret %08x\n", r );
871 ok( !lstrcmpW( str, _bstr_("\\") ), "incorrect substringData string\n");
874 /* test appendData */
875 r = IXMLDOMText_appendData(nodetext, NULL);
876 ok(r == S_OK, "ret %08x\n", r );
878 r = IXMLDOMText_appendData(nodetext, _bstr_(""));
879 ok(r == S_OK, "ret %08x\n", r );
881 r = IXMLDOMText_appendData(nodetext, _bstr_("Append"));
882 ok(r == S_OK, "ret %08x\n", r );
884 r = IXMLDOMText_get_text(nodetext, &str);
885 ok(r == S_OK, "ret %08x\n", r );
886 ok( !lstrcmpW( str, _bstr_("This &is a ; test <>\\Append") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
889 /* test insertData */
890 str = SysAllocStringLen(NULL, 0);
891 r = IXMLDOMText_insertData(nodetext, -1, str);
892 ok(r == S_OK, "ret %08x\n", r );
894 r = IXMLDOMText_insertData(nodetext, -1, NULL);
895 ok(r == S_OK, "ret %08x\n", r );
897 r = IXMLDOMText_insertData(nodetext, 1000, str);
898 ok(r == S_OK, "ret %08x\n", r );
900 r = IXMLDOMText_insertData(nodetext, 1000, NULL);
901 ok(r == S_OK, "ret %08x\n", r );
903 r = IXMLDOMText_insertData(nodetext, 0, NULL);
904 ok(r == S_OK, "ret %08x\n", r );
906 r = IXMLDOMText_insertData(nodetext, 0, str);
907 ok(r == S_OK, "ret %08x\n", r );
910 r = IXMLDOMText_insertData(nodetext, -1, _bstr_("Inserting"));
911 ok(r == E_INVALIDARG, "ret %08x\n", r );
913 r = IXMLDOMText_insertData(nodetext, 1000, _bstr_("Inserting"));
914 ok(r == E_INVALIDARG, "ret %08x\n", r );
916 r = IXMLDOMText_insertData(nodetext, 0, _bstr_("Begin "));
917 ok(r == S_OK, "ret %08x\n", r );
919 r = IXMLDOMText_insertData(nodetext, 17, _bstr_("Middle"));
920 ok(r == S_OK, "ret %08x\n", r );
922 r = IXMLDOMText_insertData(nodetext, 39, _bstr_(" End"));
923 ok(r == S_OK, "ret %08x\n", r );
925 r = IXMLDOMText_get_text(nodetext, &str);
926 ok(r == S_OK, "ret %08x\n", r );
927 ok( !lstrcmpW( str, _bstr_("Begin This &is a Middle; test <>\\Append End") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
931 /* invalid arguments */
932 r = IXMLDOMText_deleteData(nodetext, -1, 1);
933 ok(r == E_INVALIDARG, "ret %08x\n", r );
935 r = IXMLDOMText_deleteData(nodetext, 0, 0);
936 ok(r == S_OK, "ret %08x\n", r );
938 r = IXMLDOMText_deleteData(nodetext, 0, -1);
939 ok(r == E_INVALIDARG, "ret %08x\n", r );
941 r = IXMLDOMText_get_length(nodetext, &nLength);
942 ok(r == S_OK, "ret %08x\n", r );
943 ok(nLength == 43, "expected 43 got %d\n", nLength);
945 r = IXMLDOMText_deleteData(nodetext, nLength, 1);
946 ok(r == S_OK, "ret %08x\n", r );
948 r = IXMLDOMText_deleteData(nodetext, nLength+1, 1);
949 ok(r == E_INVALIDARG, "ret %08x\n", r );
951 /* delete from start */
952 r = IXMLDOMText_deleteData(nodetext, 0, 5);
953 ok(r == S_OK, "ret %08x\n", r );
955 r = IXMLDOMText_get_length(nodetext, &nLength);
956 ok(r == S_OK, "ret %08x\n", r );
957 ok(nLength == 38, "expected 38 got %d\n", nLength);
959 r = IXMLDOMText_get_text(nodetext, &str);
960 ok(r == S_OK, "ret %08x\n", r );
961 /* whitespace preserving needs to be handled here */
962 todo_wine ok( !lstrcmpW( str, _bstr_("This &is a Middle; test <>\\Append End") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
965 /* delete from end */
966 r = IXMLDOMText_deleteData(nodetext, 35, 3);
967 ok(r == S_OK, "ret %08x\n", r );
969 r = IXMLDOMText_get_length(nodetext, &nLength);
970 ok(r == S_OK, "ret %08x\n", r );
971 ok(nLength == 35, "expected 35 got %d\n", nLength);
973 r = IXMLDOMText_get_text(nodetext, &str);
974 ok(r == S_OK, "ret %08x\n", r );
975 todo_wine ok( !lstrcmpW( str, _bstr_("This &is a Middle; test <>\\Append") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
978 /* delete from inside */
979 r = IXMLDOMText_deleteData(nodetext, 1, 33);
980 ok(r == S_OK, "ret %08x\n", r );
982 r = IXMLDOMText_get_length(nodetext, &nLength);
983 ok(r == S_OK, "ret %08x\n", r );
984 ok(nLength == 2, "expected 2 got %d\n", nLength);
986 r = IXMLDOMText_get_text(nodetext, &str);
987 ok(r == S_OK, "ret %08x\n", r );
988 todo_wine ok( !lstrcmpW( str, _bstr_("") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
991 /* delete whole data ... */
992 r = IXMLDOMText_get_length(nodetext, &nLength);
993 ok(r == S_OK, "ret %08x\n", r );
995 r = IXMLDOMText_deleteData(nodetext, 0, nLength);
996 ok(r == S_OK, "ret %08x\n", r );
997 /* ... and try again with empty string */
998 r = IXMLDOMText_deleteData(nodetext, 0, nLength);
999 ok(r == S_OK, "ret %08x\n", r );
1002 V_VT(&var) = VT_BSTR;
1003 V_BSTR(&var) = SysAllocString(szstr1);
1004 r = IXMLDOMText_put_nodeValue(nodetext, var);
1005 ok(r == S_OK, "ret %08x\n", r );
1008 r = IXMLDOMText_get_text(nodetext, &str);
1009 ok(r == S_OK, "ret %08x\n", r );
1010 ok( !lstrcmpW( str, szstr1 ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
1016 r = IXMLDOMText_put_nodeValue(nodetext, var);
1017 ok(r == S_OK, "ret %08x\n", r );
1020 r = IXMLDOMText_get_text(nodetext, &str);
1021 ok(r == S_OK, "ret %08x\n", r );
1022 ok( !lstrcmpW( str, _bstr_("99") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
1025 /* ::replaceData() */
1026 V_VT(&var) = VT_BSTR;
1027 V_BSTR(&var) = SysAllocString(szstr1);
1028 r = IXMLDOMText_put_nodeValue(nodetext, var);
1029 ok(r == S_OK, "ret %08x\n", r );
1032 r = IXMLDOMText_replaceData(nodetext, 6, 0, NULL);
1033 ok(r == E_INVALIDARG, "ret %08x\n", r );
1034 r = IXMLDOMText_get_text(nodetext, &str);
1035 ok(r == S_OK, "ret %08x\n", r );
1036 ok( !lstrcmpW( str, _bstr_("str1") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
1039 r = IXMLDOMText_replaceData(nodetext, 0, 0, NULL);
1040 ok(r == S_OK, "ret %08x\n", r );
1041 r = IXMLDOMText_get_text(nodetext, &str);
1042 ok(r == S_OK, "ret %08x\n", r );
1043 ok( !lstrcmpW( str, _bstr_("str1") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
1046 /* NULL pointer means delete */
1047 r = IXMLDOMText_replaceData(nodetext, 0, 1, NULL);
1048 ok(r == S_OK, "ret %08x\n", r );
1049 r = IXMLDOMText_get_text(nodetext, &str);
1050 ok(r == S_OK, "ret %08x\n", r );
1051 ok( !lstrcmpW( str, _bstr_("tr1") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
1054 /* empty string means delete */
1055 r = IXMLDOMText_replaceData(nodetext, 0, 1, _bstr_(""));
1056 ok(r == S_OK, "ret %08x\n", r );
1057 r = IXMLDOMText_get_text(nodetext, &str);
1058 ok(r == S_OK, "ret %08x\n", r );
1059 ok( !lstrcmpW( str, _bstr_("r1") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
1062 /* zero count means insert */
1063 r = IXMLDOMText_replaceData(nodetext, 0, 0, _bstr_("a"));
1064 ok(r == S_OK, "ret %08x\n", r );
1065 r = IXMLDOMText_get_text(nodetext, &str);
1066 ok(r == S_OK, "ret %08x\n", r );
1067 ok( !lstrcmpW( str, _bstr_("ar1") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
1070 r = IXMLDOMText_replaceData(nodetext, 0, 2, NULL);
1071 ok(r == S_OK, "ret %08x\n", r );
1073 r = IXMLDOMText_insertData(nodetext, 0, _bstr_("m"));
1074 ok(r == S_OK, "ret %08x\n", r );
1075 r = IXMLDOMText_get_text(nodetext, &str);
1076 ok(r == S_OK, "ret %08x\n", r );
1077 ok( !lstrcmpW( str, _bstr_("m1") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
1080 /* nonempty string, count greater than its length */
1081 r = IXMLDOMText_replaceData(nodetext, 0, 2, _bstr_("a1.2"));
1082 ok(r == S_OK, "ret %08x\n", r );
1083 r = IXMLDOMText_get_text(nodetext, &str);
1084 ok(r == S_OK, "ret %08x\n", r );
1085 ok( !lstrcmpW( str, _bstr_("a1.2") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
1088 /* nonempty string, count less than its length */
1089 r = IXMLDOMText_replaceData(nodetext, 0, 1, _bstr_("wine"));
1090 ok(r == S_OK, "ret %08x\n", r );
1091 r = IXMLDOMText_get_text(nodetext, &str);
1092 ok(r == S_OK, "ret %08x\n", r );
1093 ok( !lstrcmpW( str, _bstr_("wine1.2") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
1096 IXMLDOMText_Release( nodetext );
1099 /* test Create Comment */
1100 r = IXMLDOMDocument_createComment(doc, NULL, NULL);
1101 ok( r == E_INVALIDARG, "returns %08x\n", r );
1102 node_comment = (IXMLDOMComment*)0x1;
1105 r = IXMLDOMDocument_createComment(doc, _bstr_(""), &node_comment);
1106 ok( r == S_OK, "returns %08x\n", r );
1108 r = IXMLDOMComment_get_data(node_comment, &str);
1109 ok( r == S_OK, "returns %08x\n", r );
1110 ok( str && SysStringLen(str) == 0, "expected empty string data\n");
1111 IXMLDOMComment_Release(node_comment);
1114 r = IXMLDOMDocument_createComment(doc, NULL, &node_comment);
1115 ok( r == S_OK, "returns %08x\n", r );
1117 r = IXMLDOMComment_get_data(node_comment, &str);
1118 ok( r == S_OK, "returns %08x\n", r );
1119 ok( str && (SysStringLen(str) == 0), "expected empty string data\n");
1120 IXMLDOMComment_Release(node_comment);
1123 str = SysAllocString(szComment);
1124 r = IXMLDOMDocument_createComment(doc, str, &node_comment);
1126 ok( r == S_OK, "returns %08x\n", r );
1129 /* Last Child Checks */
1130 r = IXMLDOMComment_get_lastChild(node_comment, NULL);
1131 ok(r == E_INVALIDARG, "ret %08x\n", r );
1133 nodeChild = (IXMLDOMNode*)0x1;
1134 r = IXMLDOMComment_get_lastChild(node_comment, &nodeChild);
1135 ok(r == S_FALSE, "ret %08x\n", r );
1136 ok(nodeChild == NULL, "pLastChild not NULL\n");
1139 str = (BSTR)0xdeadbeef;
1140 IXMLDOMComment_get_baseName(node_comment, &str);
1141 ok(r == S_FALSE, "ret %08x\n", r );
1142 ok(str == NULL, "Expected NULL\n");
1144 IXMLDOMComment_Release( node_comment );
1147 /* test Create Attribute */
1148 str = SysAllocString(szAttribute);
1149 r = IXMLDOMDocument_createAttribute(doc, NULL, NULL);
1150 ok( r == E_INVALIDARG, "returns %08x\n", r );
1151 r = IXMLDOMDocument_createAttribute(doc, str, &node_attr);
1152 ok( r == S_OK, "returns %08x\n", r );
1153 IXMLDOMText_Release( node_attr);
1156 /* test Processing Instruction */
1157 str = SysAllocStringLen(NULL, 0);
1158 r = IXMLDOMDocument_createProcessingInstruction(doc, str, str, NULL);
1159 ok( r == E_INVALIDARG, "returns %08x\n", r );
1160 r = IXMLDOMDocument_createProcessingInstruction(doc, NULL, str, &nodePI);
1161 ok( r == E_FAIL, "returns %08x\n", r );
1162 r = IXMLDOMDocument_createProcessingInstruction(doc, str, str, &nodePI);
1163 ok( r == E_FAIL, "returns %08x\n", r );
1166 r = IXMLDOMDocument_createProcessingInstruction(doc, _bstr_("xml"), _bstr_("version=\"1.0\""), &nodePI);
1167 ok( r == S_OK, "returns %08x\n", r );
1170 /* Last Child Checks */
1171 r = IXMLDOMProcessingInstruction_get_lastChild(nodePI, NULL);
1172 ok(r == E_INVALIDARG, "ret %08x\n", r );
1174 nodeChild = (IXMLDOMNode*)0x1;
1175 r = IXMLDOMProcessingInstruction_get_lastChild(nodePI, &nodeChild);
1176 ok(r == S_FALSE, "ret %08x\n", r );
1177 ok(nodeChild == NULL, "nodeChild not NULL\n");
1179 r = IXMLDOMProcessingInstruction_get_dataType(nodePI, &var);
1180 ok(r == S_FALSE, "ret %08x\n", r );
1181 ok( V_VT(&var) == VT_NULL, "incorrect dataType type\n");
1185 r = IXMLDOMProcessingInstruction_get_nodeName(nodePI, &str);
1186 ok(r == S_OK, "ret %08x\n", r );
1187 ok( !lstrcmpW( str, _bstr_("xml") ), "incorrect nodeName string\n");
1192 r = IXMLDOMProcessingInstruction_get_baseName(nodePI, &str);
1193 ok(r == S_OK, "ret %08x\n", r );
1194 ok( !lstrcmpW( str, _bstr_("xml") ), "incorrect nodeName string\n");
1198 r = IXMLDOMProcessingInstruction_get_target(nodePI, &str);
1199 ok(r == S_OK, "ret %08x\n", r );
1200 ok( !lstrcmpW( str, _bstr_("xml") ), "incorrect target string\n");
1203 /* test nodeTypeString */
1204 r = IXMLDOMProcessingInstruction_get_nodeTypeString(nodePI, &str);
1205 ok(r == S_OK, "ret %08x\n", r );
1206 ok( !lstrcmpW( str, _bstr_("processinginstruction") ), "incorrect nodeTypeString string\n");
1209 /* test get_nodeValue */
1210 r = IXMLDOMProcessingInstruction_get_nodeValue(nodePI, &var);
1211 ok(r == S_OK, "ret %08x\n", r );
1212 ok( !lstrcmpW( V_BSTR(&var), _bstr_("version=\"1.0\"") ), "incorrect data string\n");
1216 r = IXMLDOMProcessingInstruction_get_data(nodePI, &str);
1217 ok(r == S_OK, "ret %08x\n", r );
1218 ok( !lstrcmpW( str, _bstr_("version=\"1.0\"") ), "incorrect data string\n");
1222 r = IXMLDOMProcessingInstruction_put_data(nodePI, _bstr_("version=\"1.0\" encoding=\"UTF-8\""));
1223 ok(r == E_FAIL, "ret %08x\n", r );
1226 V_VT(&var) = VT_BSTR;
1227 V_BSTR(&var) = SysAllocString(szOpen); /* Doesn't matter what the string is, cannot set an xml node. */
1228 r = IXMLDOMProcessingInstruction_put_nodeValue(nodePI, var);
1229 ok(r == E_FAIL, "ret %08x\n", r );
1232 /* test get nodeName */
1233 r = IXMLDOMProcessingInstruction_get_nodeName(nodePI, &str);
1234 ok( !lstrcmpW( str, _bstr_("xml") ), "incorrect nodeName string\n");
1235 ok(r == S_OK, "ret %08x\n", r );
1238 IXMLDOMProcessingInstruction_Release(nodePI);
1241 r = IXMLDOMDocument_QueryInterface( doc, &IID_ISupportErrorInfo, (void**)&support_error );
1242 ok( r == S_OK, "ret %08x\n", r );
1245 r = ISupportErrorInfo_InterfaceSupportsErrorInfo( support_error, &IID_IXMLDOMDocument );
1246 todo_wine ok( r == S_OK, "ret %08x\n", r );
1247 ISupportErrorInfo_Release( support_error );
1250 r = IXMLDOMDocument_Release( doc );
1251 ok( r == 0, "document ref count incorrect\n");
1256 static void test_persiststreaminit(void)
1258 IXMLDOMDocument *doc;
1259 IPersistStreamInit *streaminit;
1262 doc = create_document(&IID_IXMLDOMDocument);
1265 hr = IXMLDOMDocument_QueryInterface(doc, &IID_IPersistStreamInit, (void**)&streaminit);
1266 ok( hr == S_OK, "failed with 0x%08x\n", hr );
1268 hr = IPersistStreamInit_InitNew(streaminit);
1269 ok( hr == S_OK, "failed with 0x%08x\n", hr );
1271 IXMLDOMDocument_Release(doc);
1274 static void test_domnode( void )
1277 IXMLDOMDocument *doc, *owner = NULL;
1278 IXMLDOMElement *element = NULL;
1279 IXMLDOMNamedNodeMap *map = NULL;
1280 IXMLDOMNode *node = NULL, *next = NULL;
1281 IXMLDOMNodeList *list = NULL;
1282 IXMLDOMAttribute *attr = NULL;
1283 DOMNodeType type = NODE_INVALID;
1289 doc = create_document(&IID_IXMLDOMDocument);
1293 str = SysAllocString( szComplete4 );
1294 r = IXMLDOMDocument_loadXML( doc, str, &b );
1295 ok( r == S_OK, "loadXML failed\n");
1296 ok( b == VARIANT_TRUE, "failed to load XML string\n");
1297 SysFreeString( str );
1300 r = IXMLDOMNode_hasChildNodes( doc, &b );
1301 ok( r == S_OK, "hasChildNoes bad return\n");
1302 ok( b == VARIANT_TRUE, "hasChildNoes wrong result\n");
1304 r = IXMLDOMDocument_get_documentElement( doc, &element );
1305 ok( r == S_OK, "should be a document element\n");
1306 ok( element != NULL, "should be an element\n");
1309 ok( V_VT(&var) == VT_EMPTY, "variant init failed\n");
1311 r = IXMLDOMNode_get_nodeValue( doc, NULL );
1312 ok(r == E_INVALIDARG, "get_nodeValue ret %08x\n", r );
1314 r = IXMLDOMNode_get_nodeValue( doc, &var );
1315 ok( r == S_FALSE, "nextNode returned wrong code\n");
1316 ok( V_VT(&var) == VT_NULL, "variant wasn't empty\n");
1317 ok( V_BSTR(&var) == NULL, "variant value wasn't null\n");
1322 r = IXMLDOMNode_get_ownerDocument( element, &owner );
1323 ok( r == S_OK, "get_ownerDocument return code\n");
1324 ok( owner != doc, "get_ownerDocument return\n");
1325 IXMLDOMDocument_Release(owner);
1327 type = NODE_INVALID;
1328 r = IXMLDOMNode_get_nodeType( element, &type);
1329 ok( r == S_OK, "got %08x\n", r);
1330 ok( type == NODE_ELEMENT, "node not an element\n");
1333 r = IXMLDOMNode_get_baseName( element, &str );
1334 ok( r == S_OK, "get_baseName returned wrong code\n");
1335 ok( lstrcmpW(str,szlc) == 0, "basename was wrong\n");
1338 /* check if nodename is correct */
1339 r = IXMLDOMElement_get_nodeName( element, NULL );
1340 ok ( r == E_INVALIDARG, "get_nodeName (NULL) wrong code\n");
1342 /* content doesn't matter here */
1344 r = IXMLDOMElement_get_nodeName( element, &str );
1345 ok ( r == S_OK, "get_nodeName wrong code\n");
1346 ok ( str != NULL, "str is null\n");
1347 ok( !lstrcmpW( str, szlc ), "incorrect nodeName\n");
1348 SysFreeString( str );
1350 str = SysAllocString( szNonExistentFile );
1352 V_I4(&var) = 0x1234;
1353 r = IXMLDOMElement_getAttribute( element, str, &var );
1354 ok( r == E_FAIL, "getAttribute ret %08x\n", r );
1355 ok( V_VT(&var) == VT_NULL || V_VT(&var) == VT_EMPTY, "vt = %x\n", V_VT(&var));
1358 r = IXMLDOMElement_getAttributeNode( element, str, NULL);
1359 ok( r == E_FAIL, "getAttributeNode ret %08x\n", r );
1361 attr = (IXMLDOMAttribute*)0xdeadbeef;
1362 r = IXMLDOMElement_getAttributeNode( element, str, &attr);
1363 ok( r == E_FAIL, "getAttributeNode ret %08x\n", r );
1364 ok( attr == NULL, "getAttributeNode ret %p, expected NULL\n", attr );
1365 SysFreeString( str );
1367 attr = (IXMLDOMAttribute*)0xdeadbeef;
1368 str = SysAllocString( szNonExistentAttribute );
1369 r = IXMLDOMElement_getAttributeNode( element, str, &attr);
1370 ok( r == S_FALSE, "getAttributeNode ret %08x\n", r );
1371 ok( attr == NULL, "getAttributeNode ret %p, expected NULL\n", attr );
1372 SysFreeString( str );
1374 str = SysAllocString( szdl );
1376 V_I4(&var) = 0x1234;
1377 r = IXMLDOMElement_getAttribute( element, str, &var );
1378 ok( r == S_OK, "getAttribute ret %08x\n", r );
1379 ok( V_VT(&var) == VT_BSTR, "vt = %x\n", V_VT(&var));
1380 ok( !lstrcmpW(V_BSTR(&var), szstr1), "wrong attr value\n");
1381 VariantClear( &var );
1383 r = IXMLDOMElement_getAttribute( element, NULL, &var );
1384 ok( r == E_INVALIDARG, "getAttribute ret %08x\n", r );
1386 r = IXMLDOMElement_getAttribute( element, str, NULL );
1387 ok( r == E_INVALIDARG, "getAttribute ret %08x\n", r );
1390 r = IXMLDOMElement_getAttributeNode( element, str, &attr);
1391 ok( r == S_OK, "GetAttributeNode ret %08x\n", r );
1392 ok( attr != NULL, "getAttributeNode returned NULL\n" );
1395 r = IXMLDOMAttribute_get_parentNode( attr, NULL );
1396 ok( r == E_INVALIDARG, "Expected E_INVALIDARG, ret %08x\n", r );
1398 /* attribute doesn't have a parent in msxml interpretation */
1399 node = (IXMLDOMNode*)0xdeadbeef;
1400 r = IXMLDOMAttribute_get_parentNode( attr, &node );
1401 ok( r == S_FALSE, "Expected S_FALSE, ret %08x\n", r );
1402 ok( node == NULL, "Expected NULL, got %p\n", node );
1404 IXMLDOMAttribute_Release(attr);
1407 SysFreeString( str );
1409 r = IXMLDOMElement_get_attributes( element, &map );
1410 ok( r == S_OK, "get_attributes returned wrong code\n");
1411 ok( map != NULL, "should be attributes\n");
1414 r = IXMLDOMNode_hasChildNodes( element, &b );
1415 ok( r == S_OK, "hasChildNoes bad return\n");
1416 ok( b == VARIANT_TRUE, "hasChildNoes wrong result\n");
1419 ok( FALSE, "no element\n");
1423 ISupportErrorInfo *support_error;
1424 r = IXMLDOMNamedNodeMap_QueryInterface( map, &IID_ISupportErrorInfo, (void**)&support_error );
1425 ok( r == S_OK, "ret %08x\n", r );
1427 r = ISupportErrorInfo_InterfaceSupportsErrorInfo( support_error, &IID_IXMLDOMNamedNodeMap );
1430 ok( r == S_OK, "ret %08x\n", r );
1432 ISupportErrorInfo_Release( support_error );
1434 str = SysAllocString( szdl );
1435 r = IXMLDOMNamedNodeMap_getNamedItem( map, str, &node );
1436 ok( r == S_OK, "getNamedItem returned wrong code\n");
1437 ok( node != NULL, "should be attributes\n");
1438 IXMLDOMNode_Release(node);
1439 SysFreeString( str );
1441 str = SysAllocString( szdl );
1442 r = IXMLDOMNamedNodeMap_getNamedItem( map, str, NULL );
1443 ok( r == E_INVALIDARG, "getNamedItem should return E_INVALIDARG\n");
1444 SysFreeString( str );
1446 /* something that isn't in szComplete4 */
1447 str = SysAllocString( szOpen );
1448 node = (IXMLDOMNode *) 1;
1449 r = IXMLDOMNamedNodeMap_getNamedItem( map, str, &node );
1450 ok( r == S_FALSE, "getNamedItem found a node that wasn't there\n");
1451 ok( node == NULL, "getNamedItem should have returned NULL\n");
1452 SysFreeString( str );
1454 /* test indexed access of attributes */
1455 r = IXMLDOMNamedNodeMap_get_length( map, NULL );
1456 ok ( r == E_INVALIDARG, "get_length should return E_INVALIDARG\n");
1458 r = IXMLDOMNamedNodeMap_get_length( map, &count );
1459 ok ( r == S_OK, "get_length wrong code\n");
1460 ok ( count == 1, "get_length != 1\n");
1463 r = IXMLDOMNamedNodeMap_get_item( map, -1, &node);
1464 ok ( r == S_FALSE, "get_item (-1) wrong code\n");
1465 ok ( node == NULL, "there is no node\n");
1468 r = IXMLDOMNamedNodeMap_get_item( map, 1, &node);
1469 ok ( r == S_FALSE, "get_item (1) wrong code\n");
1470 ok ( node == NULL, "there is no attribute\n");
1473 r = IXMLDOMNamedNodeMap_get_item( map, 0, &node);
1474 ok ( r == S_OK, "get_item (0) wrong code\n");
1475 ok ( node != NULL, "should be attribute\n");
1477 r = IXMLDOMNode_get_nodeName( node, NULL );
1478 ok ( r == E_INVALIDARG, "get_nodeName (NULL) wrong code\n");
1480 /* content doesn't matter here */
1482 r = IXMLDOMNode_get_nodeName( node, &str );
1483 ok ( r == S_OK, "get_nodeName wrong code\n");
1484 ok ( str != NULL, "str is null\n");
1485 ok( !lstrcmpW( str, szdl ), "incorrect node name\n");
1486 SysFreeString( str );
1488 /* test sequential access of attributes */
1490 r = IXMLDOMNamedNodeMap_nextNode( map, &node );
1491 ok ( r == S_OK, "nextNode (first time) wrong code\n");
1492 ok ( node != NULL, "nextNode, should be attribute\n");
1494 r = IXMLDOMNamedNodeMap_nextNode( map, &node );
1495 ok ( r != S_OK, "nextNode (second time) wrong code\n");
1496 ok ( node == NULL, "nextNode, there is no attribute\n");
1498 r = IXMLDOMNamedNodeMap_reset( map );
1499 ok ( r == S_OK, "reset should return S_OK\n");
1501 r = IXMLDOMNamedNodeMap_nextNode( map, &node );
1502 ok ( r == S_OK, "nextNode (third time) wrong code\n");
1503 ok ( node != NULL, "nextNode, should be attribute\n");
1506 ok( FALSE, "no map\n");
1510 type = NODE_INVALID;
1511 r = IXMLDOMNode_get_nodeType( node, &type);
1512 ok( r == S_OK, "getNamedItem returned wrong code\n");
1513 ok( type == NODE_ATTRIBUTE, "node not an attribute\n");
1516 r = IXMLDOMNode_get_baseName( node, NULL );
1517 ok( r == E_INVALIDARG, "get_baseName returned wrong code\n");
1520 r = IXMLDOMNode_get_baseName( node, &str );
1521 ok( r == S_OK, "get_baseName returned wrong code\n");
1522 ok( lstrcmpW(str,szdl) == 0, "basename was wrong\n");
1523 SysFreeString( str );
1525 r = IXMLDOMNode_get_nodeValue( node, &var );
1526 ok( r == S_OK, "returns %08x\n", r );
1527 ok( V_VT(&var) == VT_BSTR, "vt %x\n", V_VT(&var));
1528 ok( !lstrcmpW(V_BSTR(&var), szstr1), "nodeValue incorrect\n");
1531 r = IXMLDOMNode_get_childNodes( node, NULL );
1532 ok( r == E_INVALIDARG, "get_childNodes returned wrong code\n");
1534 r = IXMLDOMNode_get_childNodes( node, &list );
1535 ok( r == S_OK, "get_childNodes returned wrong code\n");
1539 r = IXMLDOMNodeList_nextNode( list, &next );
1540 ok( r == S_OK, "nextNode returned wrong code\n");
1543 ok( FALSE, "no childlist\n");
1548 r = IXMLDOMNode_hasChildNodes( next, &b );
1549 ok( r == S_FALSE, "hasChildNoes bad return\n");
1550 ok( b == VARIANT_FALSE, "hasChildNoes wrong result\n");
1552 type = NODE_INVALID;
1553 r = IXMLDOMNode_get_nodeType( next, &type);
1554 ok( r == S_OK, "getNamedItem returned wrong code\n");
1555 ok( type == NODE_TEXT, "node not text\n");
1558 r = IXMLDOMNode_get_baseName( next, &str );
1559 ok( r == S_FALSE, "get_baseName returned wrong code\n");
1560 ok( str == NULL, "basename was wrong\n");
1564 ok( FALSE, "no next\n");
1567 IXMLDOMNode_Release( next );
1570 IXMLDOMNodeList_Release( list );
1573 IXMLDOMNode_Release( node );
1576 ok( FALSE, "no node\n");
1580 IXMLDOMNamedNodeMap_Release( map );
1582 /* now traverse the tree from the root element */
1585 r = IXMLDOMNode_get_childNodes( element, &list );
1586 ok( r == S_OK, "get_childNodes returned wrong code\n");
1588 /* using get_item for child list doesn't advance the position */
1589 ole_check(IXMLDOMNodeList_get_item(list, 1, &node));
1590 expect_node(node, "E2.E2.D1");
1591 IXMLDOMNode_Release(node);
1592 ole_check(IXMLDOMNodeList_nextNode(list, &node));
1593 expect_node(node, "E1.E2.D1");
1594 IXMLDOMNode_Release(node);
1595 ole_check(IXMLDOMNodeList_reset(list));
1597 IXMLDOMNodeList_AddRef(list);
1598 expect_list_and_release(list, "E1.E2.D1 E2.E2.D1 E3.E2.D1 E4.E2.D1");
1599 ole_check(IXMLDOMNodeList_reset(list));
1601 node = (void*)0xdeadbeef;
1602 str = SysAllocString(szdl);
1603 r = IXMLDOMNode_selectSingleNode( element, str, &node );
1605 ok( r == S_FALSE, "ret %08x\n", r );
1606 ok( node == NULL, "node %p\n", node );
1608 str = SysAllocString(szbs);
1609 r = IXMLDOMNode_selectSingleNode( element, str, &node );
1611 ok( r == S_OK, "ret %08x\n", r );
1612 r = IXMLDOMNode_Release( node );
1613 ok( r == 0, "ret %08x\n", r );
1616 ok( FALSE, "no element\n");
1620 r = IXMLDOMNodeList_QueryInterface(list, &IID_IDispatch, NULL);
1621 ok( r == E_INVALIDARG || r == E_POINTER, "ret %08x\n", r );
1623 r = IXMLDOMNodeList_get_item(list, 0, NULL);
1624 ok(r == E_INVALIDARG, "Exected E_INVALIDARG got %08x\n", r);
1626 r = IXMLDOMNodeList_get_length(list, NULL);
1627 ok(r == E_INVALIDARG, "Exected E_INVALIDARG got %08x\n", r);
1629 r = IXMLDOMNodeList_get_length( list, &count );
1630 ok( r == S_OK, "get_length returns %08x\n", r );
1631 ok( count == 4, "get_length got %d\n", count );
1633 r = IXMLDOMNodeList_nextNode(list, NULL);
1634 ok(r == E_INVALIDARG, "Exected E_INVALIDARG got %08x\n", r);
1636 r = IXMLDOMNodeList_nextNode( list, &node );
1637 ok( r == S_OK, "nextNode returned wrong code\n");
1640 ok( FALSE, "no list\n");
1644 type = NODE_INVALID;
1645 r = IXMLDOMNode_get_nodeType( node, &type);
1646 ok( r == S_OK, "getNamedItem returned wrong code\n");
1647 ok( type == NODE_ELEMENT, "node not text\n");
1650 ok( V_VT(&var) == VT_EMPTY, "variant init failed\n");
1651 r = IXMLDOMNode_get_nodeValue( node, &var );
1652 ok( r == S_FALSE, "nextNode returned wrong code\n");
1653 ok( V_VT(&var) == VT_NULL, "variant wasn't empty\n");
1654 ok( V_BSTR(&var) == NULL, "variant value wasn't null\n");
1656 r = IXMLDOMNode_hasChildNodes( node, NULL );
1657 ok( r == E_INVALIDARG, "hasChildNoes bad return\n");
1660 r = IXMLDOMNode_hasChildNodes( node, &b );
1661 ok( r == S_OK, "hasChildNoes bad return\n");
1662 ok( b == VARIANT_TRUE, "hasChildNoes wrong result\n");
1665 r = IXMLDOMNode_get_baseName( node, &str );
1666 ok( r == S_OK, "get_baseName returned wrong code\n");
1667 ok( lstrcmpW(str,szbs) == 0, "basename was wrong\n");
1671 ok( FALSE, "no node\n");
1674 IXMLDOMNode_Release( node );
1676 IXMLDOMNodeList_Release( list );
1678 IXMLDOMElement_Release( element );
1681 str = SysAllocString( szComplete5 );
1682 r = IXMLDOMDocument_loadXML( doc, str, &b );
1683 ok( r == S_OK, "loadXML failed\n");
1684 ok( b == VARIANT_TRUE, "failed to load XML string\n");
1685 SysFreeString( str );
1688 r = IXMLDOMNode_hasChildNodes( doc, &b );
1689 ok( r == S_OK, "hasChildNoes bad return\n");
1690 ok( b == VARIANT_TRUE, "hasChildNoes wrong result\n");
1692 r = IXMLDOMDocument_get_documentElement( doc, &element );
1693 ok( r == S_OK, "should be a document element\n");
1694 ok( element != NULL, "should be an element\n");
1698 static const WCHAR szSSearch[] = {'S',':','s','e','a','r','c','h',0};
1701 /* check if the tag is correct */
1702 r = IXMLDOMElement_get_tagName( element, &tag );
1703 ok( r == S_OK, "couldn't get tag name\n");
1704 ok( tag != NULL, "tag was null\n");
1705 ok( !lstrcmpW( tag, szSSearch ), "incorrect tag name\n");
1706 SysFreeString( tag );
1710 IXMLDOMElement_Release( element );
1711 ok(IXMLDOMDocument_Release( doc ) == 0, "document is not destroyed\n");
1714 static void test_refs(void)
1719 IXMLDOMDocument *doc;
1720 IXMLDOMElement *element = NULL;
1721 IXMLDOMNode *node = NULL, *node2;
1722 IXMLDOMNodeList *node_list = NULL;
1724 IUnknown *unk, *unk2;
1726 doc = create_document(&IID_IXMLDOMDocument);
1729 ref = IXMLDOMDocument_Release(doc);
1730 ok( ref == 0, "ref %d\n", ref);
1732 doc = create_document(&IID_IXMLDOMDocument);
1735 str = SysAllocString( szComplete4 );
1736 r = IXMLDOMDocument_loadXML( doc, str, &b );
1737 ok( r == S_OK, "loadXML failed\n");
1738 ok( b == VARIANT_TRUE, "failed to load XML string\n");
1739 SysFreeString( str );
1741 ref = IXMLDOMDocument_AddRef( doc );
1742 ok( ref == 2, "ref %d\n", ref );
1743 ref = IXMLDOMDocument_AddRef( doc );
1744 ok( ref == 3, "ref %d\n", ref );
1745 IXMLDOMDocument_Release( doc );
1746 IXMLDOMDocument_Release( doc );
1748 r = IXMLDOMDocument_get_documentElement( doc, &element );
1749 ok( r == S_OK, "should be a document element\n");
1750 ok( element != NULL, "should be an element\n");
1752 ref = IXMLDOMDocument_AddRef( doc );
1753 ok( ref == 2, "ref %d\n", ref );
1754 IXMLDOMDocument_Release( doc );
1756 r = IXMLDOMElement_get_childNodes( element, &node_list );
1757 ok( r == S_OK, "rets %08x\n", r);
1759 ref = IXMLDOMNodeList_AddRef( node_list );
1760 ok( ref == 2, "ref %d\n", ref );
1761 IXMLDOMNodeList_Release( node_list );
1763 IXMLDOMNodeList_get_item( node_list, 0, &node );
1764 ok( r == S_OK, "rets %08x\n", r);
1766 IXMLDOMNodeList_get_item( node_list, 0, &node2 );
1767 ok( r == S_OK, "rets %08x\n", r);
1769 ref = IXMLDOMNode_AddRef( node );
1770 ok( ref == 2, "ref %d\n", ref );
1771 IXMLDOMNode_Release( node );
1773 ref = IXMLDOMNode_Release( node );
1774 ok( ref == 0, "ref %d\n", ref );
1775 ref = IXMLDOMNode_Release( node2 );
1776 ok( ref == 0, "ref %d\n", ref );
1778 ref = IXMLDOMNodeList_Release( node_list );
1779 ok( ref == 0, "ref %d\n", ref );
1781 ok( node != node2, "node %p node2 %p\n", node, node2 );
1783 ref = IXMLDOMDocument_Release( doc );
1784 ok( ref == 0, "ref %d\n", ref );
1786 ref = IXMLDOMElement_AddRef( element );
1788 ok( ref == 3, "ref %d\n", ref );
1790 IXMLDOMElement_Release( element );
1792 /* IUnknown must be unique however we obtain it */
1793 r = IXMLDOMElement_QueryInterface( element, &IID_IUnknown, (void**)&unk );
1794 ok( r == S_OK, "rets %08x\n", r );
1795 r = IXMLDOMElement_QueryInterface( element, &IID_IXMLDOMNode, (void**)&node );
1796 ok( r == S_OK, "rets %08x\n", r );
1797 r = IXMLDOMNode_QueryInterface( node, &IID_IUnknown, (void**)&unk2 );
1798 ok( r == S_OK, "rets %08x\n", r );
1799 ok( unk == unk2, "unk %p unk2 %p\n", unk, unk2 );
1801 IUnknown_Release( unk2 );
1802 IUnknown_Release( unk );
1803 IXMLDOMNode_Release( node );
1805 IXMLDOMElement_Release( element );
1809 static void test_create(void)
1811 static const WCHAR szOne[] = {'1',0};
1812 static const WCHAR szOneGarbage[] = {'1','G','a','r','b','a','g','e',0};
1816 IXMLDOMDocument *doc;
1817 IXMLDOMElement *element;
1818 IXMLDOMComment *comment;
1820 IXMLDOMCDATASection *cdata;
1821 IXMLDOMNode *root, *node, *child;
1822 IXMLDOMNamedNodeMap *attr_map;
1827 doc = create_document(&IID_IXMLDOMDocument);
1830 /* types not supported for creation */
1832 V_I1(&var) = NODE_DOCUMENT;
1833 node = (IXMLDOMNode*)0x1;
1834 r = IXMLDOMDocument_createNode( doc, var, NULL, NULL, &node );
1835 ok( r == E_INVALIDARG, "returns %08x\n", r );
1836 ok( node == (void*)0x1, "expected same ptr, got %p\n", node);
1839 V_I1(&var) = NODE_DOCUMENT_TYPE;
1840 node = (IXMLDOMNode*)0x1;
1841 r = IXMLDOMDocument_createNode( doc, var, NULL, NULL, &node );
1842 ok( r == E_INVALIDARG, "returns %08x\n", r );
1843 ok( node == (void*)0x1, "expected same ptr, got %p\n", node);
1846 V_I1(&var) = NODE_ENTITY;
1847 node = (IXMLDOMNode*)0x1;
1848 r = IXMLDOMDocument_createNode( doc, var, NULL, NULL, &node );
1849 ok( r == E_INVALIDARG, "returns %08x\n", r );
1850 ok( node == (void*)0x1, "expected same ptr, got %p\n", node);
1853 V_I1(&var) = NODE_NOTATION;
1854 node = (IXMLDOMNode*)0x1;
1855 r = IXMLDOMDocument_createNode( doc, var, NULL, NULL, &node );
1856 ok( r == E_INVALIDARG, "returns %08x\n", r );
1857 ok( node == (void*)0x1, "expected same ptr, got %p\n", node);
1861 V_I1(&var) = NODE_COMMENT;
1863 r = IXMLDOMDocument_createNode( doc, var, NULL, NULL, &node );
1864 ok( r == S_OK, "returns %08x\n", r );
1865 ok( node != NULL, "\n");
1867 r = IXMLDOMNode_QueryInterface(node, &IID_IXMLDOMComment, (void**)&comment);
1868 ok( r == S_OK, "returns %08x\n", r );
1869 IXMLDOMNode_Release(node);
1872 r = IXMLDOMComment_get_data(comment, &str);
1873 ok( r == S_OK, "returns %08x\n", r );
1874 ok( str && SysStringLen(str) == 0, "expected empty comment, %p\n", str);
1875 IXMLDOMComment_Release(comment);
1878 node = (IXMLDOMNode*)0x1;
1879 r = IXMLDOMDocument_createNode( doc, var, _bstr_(""), NULL, &node );
1880 ok( r == S_OK, "returns %08x\n", r );
1882 r = IXMLDOMNode_QueryInterface(node, &IID_IXMLDOMComment, (void**)&comment);
1883 ok( r == S_OK, "returns %08x\n", r );
1884 IXMLDOMNode_Release(node);
1887 r = IXMLDOMComment_get_data(comment, &str);
1888 ok( r == S_OK, "returns %08x\n", r );
1889 ok( str && SysStringLen(str) == 0, "expected empty comment, %p\n", str);
1890 IXMLDOMComment_Release(comment);
1893 node = (IXMLDOMNode*)0x1;
1894 r = IXMLDOMDocument_createNode( doc, var, _bstr_("blah"), NULL, &node );
1895 ok( r == S_OK, "returns %08x\n", r );
1897 r = IXMLDOMNode_QueryInterface(node, &IID_IXMLDOMComment, (void**)&comment);
1898 ok( r == S_OK, "returns %08x\n", r );
1899 IXMLDOMNode_Release(node);
1902 r = IXMLDOMComment_get_data(comment, &str);
1903 ok( r == S_OK, "returns %08x\n", r );
1904 ok( str && SysStringLen(str) == 0, "expected empty comment, %p\n", str);
1905 IXMLDOMComment_Release(comment);
1910 V_I1(&var) = NODE_TEXT;
1912 r = IXMLDOMDocument_createNode( doc, var, NULL, NULL, &node );
1913 ok( r == S_OK, "returns %08x\n", r );
1914 ok( node != NULL, "\n");
1916 r = IXMLDOMNode_QueryInterface(node, &IID_IXMLDOMText, (void**)&text);
1917 ok( r == S_OK, "returns %08x\n", r );
1918 IXMLDOMNode_Release(node);
1921 r = IXMLDOMText_get_data(text, &str);
1922 ok( r == S_OK, "returns %08x\n", r );
1923 ok( str && SysStringLen(str) == 0, "expected empty comment, %p\n", str);
1924 IXMLDOMText_Release(text);
1927 node = (IXMLDOMNode*)0x1;
1928 r = IXMLDOMDocument_createNode( doc, var, _bstr_(""), NULL, &node );
1929 ok( r == S_OK, "returns %08x\n", r );
1931 r = IXMLDOMNode_QueryInterface(node, &IID_IXMLDOMText, (void**)&text);
1932 ok( r == S_OK, "returns %08x\n", r );
1933 IXMLDOMNode_Release(node);
1936 r = IXMLDOMText_get_data(text, &str);
1937 ok( r == S_OK, "returns %08x\n", r );
1938 ok( str && SysStringLen(str) == 0, "expected empty comment, %p\n", str);
1939 IXMLDOMText_Release(text);
1942 node = (IXMLDOMNode*)0x1;
1943 r = IXMLDOMDocument_createNode( doc, var, _bstr_("blah"), NULL, &node );
1944 ok( r == S_OK, "returns %08x\n", r );
1946 r = IXMLDOMNode_QueryInterface(node, &IID_IXMLDOMText, (void**)&text);
1947 ok( r == S_OK, "returns %08x\n", r );
1948 IXMLDOMNode_Release(node);
1951 r = IXMLDOMText_get_data(text, &str);
1952 ok( r == S_OK, "returns %08x\n", r );
1953 ok( str && SysStringLen(str) == 0, "expected empty comment, %p\n", str);
1954 IXMLDOMText_Release(text);
1957 /* NODE_CDATA_SECTION */
1959 V_I1(&var) = NODE_CDATA_SECTION;
1961 r = IXMLDOMDocument_createNode( doc, var, NULL, NULL, &node );
1962 ok( r == S_OK, "returns %08x\n", r );
1963 ok( node != NULL, "\n");
1965 r = IXMLDOMNode_QueryInterface(node, &IID_IXMLDOMCDATASection, (void**)&cdata);
1966 ok( r == S_OK, "returns %08x\n", r );
1967 IXMLDOMNode_Release(node);
1970 r = IXMLDOMCDATASection_get_data(cdata, &str);
1971 ok( r == S_OK, "returns %08x\n", r );
1972 ok( str && SysStringLen(str) == 0, "expected empty comment, %p\n", str);
1973 IXMLDOMCDATASection_Release(cdata);
1976 node = (IXMLDOMNode*)0x1;
1977 r = IXMLDOMDocument_createNode( doc, var, _bstr_(""), NULL, &node );
1978 ok( r == S_OK, "returns %08x\n", r );
1980 r = IXMLDOMNode_QueryInterface(node, &IID_IXMLDOMCDATASection, (void**)&cdata);
1981 ok( r == S_OK, "returns %08x\n", r );
1982 IXMLDOMNode_Release(node);
1985 r = IXMLDOMCDATASection_get_data(cdata, &str);
1986 ok( r == S_OK, "returns %08x\n", r );
1987 ok( str && SysStringLen(str) == 0, "expected empty comment, %p\n", str);
1988 IXMLDOMCDATASection_Release(cdata);
1991 node = (IXMLDOMNode*)0x1;
1992 r = IXMLDOMDocument_createNode( doc, var, _bstr_("blah"), NULL, &node );
1993 ok( r == S_OK, "returns %08x\n", r );
1995 r = IXMLDOMNode_QueryInterface(node, &IID_IXMLDOMCDATASection, (void**)&cdata);
1996 ok( r == S_OK, "returns %08x\n", r );
1997 IXMLDOMNode_Release(node);
2000 r = IXMLDOMCDATASection_get_data(cdata, &str);
2001 ok( r == S_OK, "returns %08x\n", r );
2002 ok( str && SysStringLen(str) == 0, "expected empty comment, %p\n", str);
2003 IXMLDOMCDATASection_Release(cdata);
2006 /* NODE_ATTRIBUTE */
2008 V_I1(&var) = NODE_ATTRIBUTE;
2009 node = (IXMLDOMNode*)0x1;
2010 r = IXMLDOMDocument_createNode( doc, var, NULL, NULL, &node );
2011 ok( r == E_FAIL, "returns %08x\n", r );
2012 ok( node == (void*)0x1, "expected same ptr, got %p\n", node);
2015 V_I1(&var) = NODE_ATTRIBUTE;
2016 node = (IXMLDOMNode*)0x1;
2017 r = IXMLDOMDocument_createNode( doc, var, _bstr_(""), NULL, &node );
2018 ok( r == E_FAIL, "returns %08x\n", r );
2019 ok( node == (void*)0x1, "expected same ptr, got %p\n", node);
2022 V_I1(&var) = NODE_ATTRIBUTE;
2023 str = SysAllocString( szlc );
2024 r = IXMLDOMDocument_createNode( doc, var, str, NULL, &node );
2025 ok( r == S_OK, "returns %08x\n", r );
2026 if( SUCCEEDED(r) ) IXMLDOMNode_Release( node );
2029 /* a name is required for attribute, try a BSTR with first null wchar */
2031 V_I1(&var) = NODE_ATTRIBUTE;
2032 str = SysAllocString( szstr1 );
2034 node = (IXMLDOMNode*)0x1;
2035 r = IXMLDOMDocument_createNode( doc, var, str, NULL, &node );
2036 ok( r == E_FAIL, "returns %08x\n", r );
2037 ok( node == (void*)0x1, "expected same ptr, got %p\n", node);
2040 /* NODE_PROCESSING_INSTRUCTION */
2042 V_I1(&var) = NODE_PROCESSING_INSTRUCTION;
2043 node = (IXMLDOMNode*)0x1;
2044 r = IXMLDOMDocument_createNode( doc, var, NULL, NULL, &node );
2045 ok( r == E_FAIL, "returns %08x\n", r );
2046 ok( node == (void*)0x1, "expected same ptr, got %p\n", node);
2049 V_I1(&var) = NODE_PROCESSING_INSTRUCTION;
2050 node = (IXMLDOMNode*)0x1;
2051 r = IXMLDOMDocument_createNode( doc, var, _bstr_(""), NULL, &node );
2052 ok( r == E_FAIL, "returns %08x\n", r );
2053 ok( node == (void*)0x1, "expected same ptr, got %p\n", node);
2056 V_I1(&var) = NODE_PROCESSING_INSTRUCTION;
2057 r = IXMLDOMDocument_createNode( doc, var, _bstr_("pi"), NULL, NULL );
2058 ok( r == E_INVALIDARG, "returns %08x\n", r );
2060 /* NODE_ENTITY_REFERENCE */
2062 V_I1(&var) = NODE_ENTITY_REFERENCE;
2063 node = (IXMLDOMNode*)0x1;
2064 r = IXMLDOMDocument_createNode( doc, var, NULL, NULL, &node );
2065 ok( r == E_FAIL, "returns %08x\n", r );
2066 ok( node == (void*)0x1, "expected same ptr, got %p\n", node);
2069 V_I1(&var) = NODE_ENTITY_REFERENCE;
2070 node = (IXMLDOMNode*)0x1;
2071 r = IXMLDOMDocument_createNode( doc, var, _bstr_(""), NULL, &node );
2072 ok( r == E_FAIL, "returns %08x\n", r );
2073 ok( node == (void*)0x1, "expected same ptr, got %p\n", node);
2077 V_I1(&var) = NODE_ELEMENT;
2078 node = (IXMLDOMNode*)0x1;
2079 r = IXMLDOMDocument_createNode( doc, var, NULL, NULL, &node );
2080 ok( r == E_FAIL, "returns %08x\n", r );
2081 ok( node == (void*)0x1, "expected same ptr, got %p\n", node);
2084 V_I1(&var) = NODE_ELEMENT;
2085 node = (IXMLDOMNode*)0x1;
2086 r = IXMLDOMDocument_createNode( doc, var, _bstr_(""), NULL, &node );
2087 ok( r == E_FAIL, "returns %08x\n", r );
2088 ok( node == (void*)0x1, "expected same ptr, got %p\n", node);
2091 V_I1(&var) = NODE_ELEMENT;
2092 str = SysAllocString( szlc );
2093 r = IXMLDOMDocument_createNode( doc, var, str, NULL, &node );
2094 ok( r == S_OK, "returns %08x\n", r );
2095 if( SUCCEEDED(r) ) IXMLDOMNode_Release( node );
2098 V_I1(&var) = NODE_ELEMENT;
2099 r = IXMLDOMDocument_createNode( doc, var, str, NULL, NULL );
2100 ok( r == E_INVALIDARG, "returns %08x\n", r );
2103 V_R4(&var) = NODE_ELEMENT;
2104 r = IXMLDOMDocument_createNode( doc, var, str, NULL, &node );
2105 ok( r == S_OK, "returns %08x\n", r );
2106 if( SUCCEEDED(r) ) IXMLDOMNode_Release( node );
2108 V_VT(&var) = VT_BSTR;
2109 V_BSTR(&var) = SysAllocString( szOne );
2110 r = IXMLDOMDocument_createNode( doc, var, str, NULL, &node );
2111 ok( r == S_OK, "returns %08x\n", r );
2112 if( SUCCEEDED(r) ) IXMLDOMNode_Release( node );
2115 V_VT(&var) = VT_BSTR;
2116 V_BSTR(&var) = SysAllocString( szOneGarbage );
2117 r = IXMLDOMDocument_createNode( doc, var, str, NULL, &node );
2118 ok( r == E_INVALIDARG, "returns %08x\n", r );
2119 if( SUCCEEDED(r) ) IXMLDOMNode_Release( node );
2123 V_I4(&var) = NODE_ELEMENT;
2124 r = IXMLDOMDocument_createNode( doc, var, str, NULL, &node );
2125 ok( r == S_OK, "returns %08x\n", r );
2126 r = IXMLDOMDocument_appendChild( doc, node, &root );
2127 ok( r == S_OK, "returns %08x\n", r );
2128 ok( node == root, "%p %p\n", node, root );
2130 ref = IXMLDOMNode_AddRef( node );
2131 ok(ref == 3, "ref %d\n", ref);
2132 IXMLDOMNode_Release( node );
2134 ref = IXMLDOMNode_Release( node );
2135 ok(ref == 1, "ref %d\n", ref);
2136 SysFreeString( str );
2139 V_I4(&var) = NODE_ELEMENT;
2140 str = SysAllocString( szbs );
2141 r = IXMLDOMDocument_createNode( doc, var, str, NULL, &node );
2142 ok( r == S_OK, "returns %08x\n", r );
2143 SysFreeString( str );
2145 ref = IXMLDOMNode_AddRef( node );
2146 ok(ref == 2, "ref = %d\n", ref);
2147 IXMLDOMNode_Release( node );
2149 r = IXMLDOMNode_QueryInterface( node, &IID_IUnknown, (void**)&unk );
2150 ok( r == S_OK, "returns %08x\n", r );
2152 ref = IXMLDOMNode_AddRef( unk );
2153 ok(ref == 3, "ref = %d\n", ref);
2154 IXMLDOMNode_Release( unk );
2156 V_VT(&var) = VT_EMPTY;
2157 r = IXMLDOMNode_insertBefore( root, (IXMLDOMNode*)unk, var, &child );
2158 ok( r == S_OK, "returns %08x\n", r );
2159 ok( unk == (IUnknown*)child, "%p %p\n", unk, child );
2160 IXMLDOMNode_Release( child );
2161 IUnknown_Release( unk );
2164 V_VT(&var) = VT_NULL;
2165 V_DISPATCH(&var) = (IDispatch*)node;
2166 r = IXMLDOMNode_insertBefore( root, node, var, &child );
2167 ok( r == S_OK, "returns %08x\n", r );
2168 ok( node == child, "%p %p\n", node, child );
2169 IXMLDOMNode_Release( child );
2172 V_VT(&var) = VT_NULL;
2173 V_DISPATCH(&var) = (IDispatch*)node;
2174 r = IXMLDOMNode_insertBefore( root, node, var, NULL );
2175 ok( r == S_OK, "returns %08x\n", r );
2176 IXMLDOMNode_Release( node );
2178 r = IXMLDOMNode_QueryInterface( root, &IID_IXMLDOMElement, (void**)&element );
2179 ok( r == S_OK, "returns %08x\n", r );
2181 r = IXMLDOMElement_get_attributes( element, &attr_map );
2182 ok( r == S_OK, "returns %08x\n", r );
2183 r = IXMLDOMNamedNodeMap_get_length( attr_map, &num );
2184 ok( r == S_OK, "returns %08x\n", r );
2185 ok( num == 0, "num %d\n", num );
2186 IXMLDOMNamedNodeMap_Release( attr_map );
2188 V_VT(&var) = VT_BSTR;
2189 V_BSTR(&var) = SysAllocString( szstr1 );
2190 name = SysAllocString( szdl );
2191 r = IXMLDOMElement_setAttribute( element, name, var );
2192 ok( r == S_OK, "returns %08x\n", r );
2193 r = IXMLDOMElement_get_attributes( element, &attr_map );
2194 ok( r == S_OK, "returns %08x\n", r );
2195 r = IXMLDOMNamedNodeMap_get_length( attr_map, &num );
2196 ok( r == S_OK, "returns %08x\n", r );
2197 ok( num == 1, "num %d\n", num );
2198 IXMLDOMNamedNodeMap_Release( attr_map );
2201 V_VT(&var) = VT_BSTR;
2202 V_BSTR(&var) = SysAllocString( szstr2 );
2203 r = IXMLDOMElement_setAttribute( element, name, var );
2204 ok( r == S_OK, "returns %08x\n", r );
2205 r = IXMLDOMElement_get_attributes( element, &attr_map );
2206 ok( r == S_OK, "returns %08x\n", r );
2207 r = IXMLDOMNamedNodeMap_get_length( attr_map, &num );
2208 ok( r == S_OK, "returns %08x\n", r );
2209 ok( num == 1, "num %d\n", num );
2210 IXMLDOMNamedNodeMap_Release( attr_map );
2212 r = IXMLDOMElement_getAttribute( element, name, &var );
2213 ok( r == S_OK, "returns %08x\n", r );
2214 ok( !lstrcmpW(V_BSTR(&var), szstr2), "wrong attr value\n");
2216 SysFreeString(name);
2218 V_VT(&var) = VT_BSTR;
2219 V_BSTR(&var) = SysAllocString( szstr1 );
2220 name = SysAllocString( szlc );
2221 r = IXMLDOMElement_setAttribute( element, name, var );
2222 ok( r == S_OK, "returns %08x\n", r );
2223 r = IXMLDOMElement_get_attributes( element, &attr_map );
2224 ok( r == S_OK, "returns %08x\n", r );
2225 r = IXMLDOMNamedNodeMap_get_length( attr_map, &num );
2226 ok( r == S_OK, "returns %08x\n", r );
2227 ok( num == 2, "num %d\n", num );
2228 IXMLDOMNamedNodeMap_Release( attr_map );
2230 SysFreeString(name);
2234 name = SysAllocString( szbs );
2235 r = IXMLDOMElement_setAttribute( element, name, var );
2236 ok( r == S_OK, "returns %08x\n", r );
2238 r = IXMLDOMElement_getAttribute( element, name, &var );
2239 ok( r == S_OK, "returns %08x\n", r );
2240 ok( V_VT(&var) == VT_BSTR, "variant type %x\n", V_VT(&var));
2242 SysFreeString(name);
2244 /* Create an Attribute */
2246 V_I4(&var) = NODE_ATTRIBUTE;
2247 str = SysAllocString( szAttribute );
2248 r = IXMLDOMDocument_createNode( doc, var, str, NULL, &node );
2249 ok( r == S_OK, "returns %08x\n", r );
2250 ok( node != NULL, "node was null\n");
2253 r = IXMLDOMNode_get_nodeTypeString(node, &str);
2254 ok( r == S_OK, "returns %08x\n", r );
2255 ok( !lstrcmpW( str, _bstr_("attribute") ), "incorrect nodeTypeString string\n");
2257 IXMLDOMNode_Release( node );
2259 IXMLDOMElement_Release( element );
2260 IXMLDOMNode_Release( root );
2261 IXMLDOMDocument_Release( doc );
2264 static void test_getElementsByTagName(void)
2266 IXMLDOMNodeList *node_list;
2267 IXMLDOMDocument *doc;
2268 IXMLDOMElement *elem;
2275 doc = create_document(&IID_IXMLDOMDocument);
2278 str = SysAllocString( szComplete4 );
2279 r = IXMLDOMDocument_loadXML( doc, str, &b );
2280 ok( r == S_OK, "loadXML failed\n");
2281 ok( b == VARIANT_TRUE, "failed to load XML string\n");
2282 SysFreeString( str );
2284 str = SysAllocString( szstar );
2286 /* null arguments cases */
2287 r = IXMLDOMDocument_getElementsByTagName(doc, NULL, &node_list);
2288 ok( r == E_INVALIDARG, "ret %08x\n", r );
2289 r = IXMLDOMDocument_getElementsByTagName(doc, str, NULL);
2290 ok( r == E_INVALIDARG, "ret %08x\n", r );
2292 r = IXMLDOMDocument_getElementsByTagName(doc, str, &node_list);
2293 ok( r == S_OK, "ret %08x\n", r );
2294 r = IXMLDOMNodeList_get_length( node_list, &len );
2295 ok( r == S_OK, "ret %08x\n", r );
2296 ok( len == 6, "len %d\n", len );
2298 test_disp((IUnknown*)node_list);
2300 IXMLDOMNodeList_Release( node_list );
2301 SysFreeString( str );
2303 /* broken query BSTR */
2304 memcpy(&buff[2], szstar, sizeof(szstar));
2305 /* just a big length */
2306 *(DWORD*)buff = 0xf0f0;
2307 r = IXMLDOMDocument_getElementsByTagName(doc, &buff[2], &node_list);
2308 ok( r == S_OK, "ret %08x\n", r );
2309 r = IXMLDOMNodeList_get_length( node_list, &len );
2310 ok( r == S_OK, "ret %08x\n", r );
2311 ok( len == 6, "len %d\n", len );
2312 IXMLDOMNodeList_Release( node_list );
2314 str = SysAllocString( szbs );
2315 r = IXMLDOMDocument_getElementsByTagName(doc, str, &node_list);
2316 ok( r == S_OK, "ret %08x\n", r );
2317 r = IXMLDOMNodeList_get_length( node_list, &len );
2318 ok( r == S_OK, "ret %08x\n", r );
2319 ok( len == 1, "len %d\n", len );
2320 IXMLDOMNodeList_Release( node_list );
2321 SysFreeString( str );
2323 str = SysAllocString( szdl );
2324 r = IXMLDOMDocument_getElementsByTagName(doc, str, &node_list);
2325 ok( r == S_OK, "ret %08x\n", r );
2326 r = IXMLDOMNodeList_get_length( node_list, &len );
2327 ok( r == S_OK, "ret %08x\n", r );
2328 ok( len == 0, "len %d\n", len );
2329 IXMLDOMNodeList_Release( node_list );
2330 SysFreeString( str );
2332 str = SysAllocString( szstr1 );
2333 r = IXMLDOMDocument_getElementsByTagName(doc, str, &node_list);
2334 ok( r == S_OK, "ret %08x\n", r );
2335 r = IXMLDOMNodeList_get_length( node_list, &len );
2336 ok( r == S_OK, "ret %08x\n", r );
2337 ok( len == 0, "len %d\n", len );
2338 IXMLDOMNodeList_Release( node_list );
2339 SysFreeString( str );
2341 /* test for element */
2342 r = IXMLDOMDocument_get_documentElement(doc, &elem);
2343 ok( r == S_OK, "ret %08x\n", r );
2345 str = SysAllocString( szstar );
2347 /* null arguments cases */
2348 r = IXMLDOMElement_getElementsByTagName(elem, NULL, &node_list);
2349 ok( r == E_INVALIDARG, "ret %08x\n", r );
2350 r = IXMLDOMElement_getElementsByTagName(elem, str, NULL);
2351 ok( r == E_INVALIDARG, "ret %08x\n", r );
2353 r = IXMLDOMElement_getElementsByTagName(elem, str, &node_list);
2354 ok( r == S_OK, "ret %08x\n", r );
2355 r = IXMLDOMNodeList_get_length( node_list, &len );
2356 ok( r == S_OK, "ret %08x\n", r );
2357 todo_wine ok( len == 5, "len %d\n", len );
2359 IXMLDOMNodeList_Release( node_list );
2360 SysFreeString( str );
2362 /* broken query BSTR */
2363 memcpy(&buff[2], szstar, sizeof(szstar));
2364 /* just a big length */
2365 *(DWORD*)buff = 0xf0f0;
2366 r = IXMLDOMElement_getElementsByTagName(elem, &buff[2], &node_list);
2367 ok( r == S_OK, "ret %08x\n", r );
2368 r = IXMLDOMNodeList_get_length( node_list, &len );
2369 ok( r == S_OK, "ret %08x\n", r );
2370 todo_wine ok( len == 5, "len %d\n", len );
2371 IXMLDOMNodeList_Release( node_list );
2373 IXMLDOMElement_Release(elem);
2375 IXMLDOMDocument_Release( doc );
2378 static void test_get_text(void)
2383 IXMLDOMDocument *doc;
2384 IXMLDOMNode *node, *node2, *node3;
2385 IXMLDOMNode *nodeRoot;
2386 IXMLDOMNodeList *node_list;
2387 IXMLDOMNamedNodeMap *node_map;
2390 doc = create_document(&IID_IXMLDOMDocument);
2393 str = SysAllocString( szComplete4 );
2394 r = IXMLDOMDocument_loadXML( doc, str, &b );
2395 ok( r == S_OK, "loadXML failed\n");
2396 ok( b == VARIANT_TRUE, "failed to load XML string\n");
2397 SysFreeString( str );
2399 str = SysAllocString( szbs );
2400 r = IXMLDOMDocument_getElementsByTagName( doc, str, &node_list );
2401 ok( r == S_OK, "ret %08x\n", r );
2404 /* Test to get all child node text. */
2405 r = IXMLDOMDocument_QueryInterface(doc, &IID_IXMLDOMNode, (void**)&nodeRoot);
2406 ok( r == S_OK, "ret %08x\n", r );
2409 r = IXMLDOMNode_get_text( nodeRoot, &str );
2410 ok( r == S_OK, "ret %08x\n", r );
2411 ok( compareIgnoreReturnsWhitespace(str, _bstr_("fn1.txt\n\n fn2.txt \n\nf1\n")), "wrong get_text\n");
2414 IXMLDOMNode_Release(nodeRoot);
2418 /* this test crashes on win9x */
2419 r = IXMLDOMNodeList_QueryInterface(node_list, &IID_IDispatch, NULL);
2420 ok( r == E_INVALIDARG, "ret %08x\n", r );
2423 r = IXMLDOMNodeList_get_length( node_list, NULL );
2424 ok( r == E_INVALIDARG, "ret %08x\n", r );
2426 r = IXMLDOMNodeList_get_length( node_list, &len );
2427 ok( r == S_OK, "ret %08x\n", r );
2428 ok( len == 1, "expect 1 got %d\n", len );
2430 r = IXMLDOMNodeList_get_item( node_list, 0, NULL );
2431 ok( r == E_INVALIDARG, "ret %08x\n", r );
2433 r = IXMLDOMNodeList_nextNode( node_list, NULL );
2434 ok( r == E_INVALIDARG, "ret %08x\n", r );
2436 r = IXMLDOMNodeList_get_item( node_list, 0, &node );
2437 ok( r == S_OK, "ret %08x\n", r );
2438 IXMLDOMNodeList_Release( node_list );
2440 /* Invalid output parameter*/
2441 r = IXMLDOMNode_get_text( node, NULL );
2442 ok( r == E_INVALIDARG, "ret %08x\n", r );
2444 r = IXMLDOMNode_get_text( node, &str );
2445 ok( r == S_OK, "ret %08x\n", r );
2446 ok( !memcmp(str, szfn1_txt, lstrlenW(szfn1_txt) ), "wrong string\n" );
2449 r = IXMLDOMNode_get_attributes( node, &node_map );
2450 ok( r == S_OK, "ret %08x\n", r );
2452 str = SysAllocString( szvr );
2453 r = IXMLDOMNamedNodeMap_getNamedItem( node_map, str, &node2 );
2454 ok( r == S_OK, "ret %08x\n", r );
2457 r = IXMLDOMNode_get_text( node2, &str );
2458 ok( r == S_OK, "ret %08x\n", r );
2459 ok( !memcmp(str, szstr2, sizeof(szstr2)), "wrong string\n" );
2462 r = IXMLDOMNode_get_firstChild( node2, &node3 );
2463 ok( r == S_OK, "ret %08x\n", r );
2465 r = IXMLDOMNode_get_text( node3, &str );
2466 ok( r == S_OK, "ret %08x\n", r );
2467 ok( !memcmp(str, szstr2, sizeof(szstr2)), "wrong string\n" );
2471 IXMLDOMNode_Release( node3 );
2472 IXMLDOMNode_Release( node2 );
2473 IXMLDOMNamedNodeMap_Release( node_map );
2474 IXMLDOMNode_Release( node );
2475 IXMLDOMDocument_Release( doc );
2478 static void test_get_childNodes(void)
2483 IXMLDOMDocument *doc;
2484 IXMLDOMElement *element;
2485 IXMLDOMNode *node, *node2;
2486 IXMLDOMNodeList *node_list, *node_list2;
2489 doc = create_document(&IID_IXMLDOMDocument);
2492 str = SysAllocString( szComplete4 );
2493 r = IXMLDOMDocument_loadXML( doc, str, &b );
2494 ok( r == S_OK, "loadXML failed\n");
2495 ok( b == VARIANT_TRUE, "failed to load XML string\n");
2496 SysFreeString( str );
2498 r = IXMLDOMDocument_get_documentElement( doc, &element );
2499 ok( r == S_OK, "ret %08x\n", r);
2501 r = IXMLDOMElement_get_childNodes( element, &node_list );
2502 ok( r == S_OK, "ret %08x\n", r);
2504 r = IXMLDOMNodeList_get_length( node_list, &len );
2505 ok( r == S_OK, "ret %08x\n", r);
2506 ok( len == 4, "len %d\n", len);
2508 r = IXMLDOMNodeList_get_item( node_list, 2, &node );
2509 ok( r == S_OK, "ret %08x\n", r);
2511 r = IXMLDOMNode_get_childNodes( node, &node_list2 );
2512 ok( r == S_OK, "ret %08x\n", r);
2514 r = IXMLDOMNodeList_get_length( node_list2, &len );
2515 ok( r == S_OK, "ret %08x\n", r);
2516 ok( len == 0, "len %d\n", len);
2518 r = IXMLDOMNodeList_get_item( node_list2, 0, &node2);
2519 ok( r == S_FALSE, "ret %08x\n", r);
2521 IXMLDOMNodeList_Release( node_list2 );
2522 IXMLDOMNode_Release( node );
2523 IXMLDOMNodeList_Release( node_list );
2524 IXMLDOMElement_Release( element );
2525 IXMLDOMDocument_Release( doc );
2528 static void test_get_firstChild(void)
2530 static WCHAR xmlW[] = {'x','m','l',0};
2531 IXMLDOMDocument *doc;
2537 doc = create_document(&IID_IXMLDOMDocument);
2540 str = SysAllocString( szComplete4 );
2541 r = IXMLDOMDocument_loadXML( doc, str, &b );
2542 ok( r == S_OK, "loadXML failed\n");
2543 ok( b == VARIANT_TRUE, "failed to load XML string\n");
2544 SysFreeString( str );
2546 r = IXMLDOMDocument_get_firstChild( doc, &node );
2547 ok( r == S_OK, "ret %08x\n", r);
2549 r = IXMLDOMNode_get_nodeName( node, &str );
2550 ok( r == S_OK, "ret %08x\n", r);
2552 ok(memcmp(str, xmlW, sizeof(xmlW)) == 0, "expected \"xml\" node name\n");
2555 IXMLDOMNode_Release( node );
2556 IXMLDOMDocument_Release( doc );
2559 static void test_get_lastChild(void)
2561 static WCHAR lcW[] = {'l','c',0};
2562 static WCHAR foW[] = {'f','o',0};
2563 IXMLDOMDocument *doc;
2564 IXMLDOMNode *node, *child;
2569 doc = create_document(&IID_IXMLDOMDocument);
2572 str = SysAllocString( szComplete4 );
2573 r = IXMLDOMDocument_loadXML( doc, str, &b );
2574 ok( r == S_OK, "loadXML failed\n");
2575 ok( b == VARIANT_TRUE, "failed to load XML string\n");
2576 SysFreeString( str );
2578 r = IXMLDOMDocument_get_lastChild( doc, &node );
2579 ok( r == S_OK, "ret %08x\n", r);
2581 r = IXMLDOMNode_get_nodeName( node, &str );
2582 ok( r == S_OK, "ret %08x\n", r);
2584 ok(memcmp(str, lcW, sizeof(lcW)) == 0, "expected \"lc\" node name\n");
2587 r = IXMLDOMNode_get_lastChild( node, &child );
2588 ok( r == S_OK, "ret %08x\n", r);
2590 r = IXMLDOMNode_get_nodeName( child, &str );
2591 ok( r == S_OK, "ret %08x\n", r);
2593 ok(memcmp(str, foW, sizeof(foW)) == 0, "expected \"fo\" node name\n");
2596 IXMLDOMNode_Release( child );
2597 IXMLDOMNode_Release( node );
2598 IXMLDOMDocument_Release( doc );
2601 static void test_removeChild(void)
2606 IXMLDOMDocument *doc;
2607 IXMLDOMElement *element, *lc_element;
2608 IXMLDOMNode *fo_node, *ba_node, *removed_node, *temp_node, *lc_node;
2609 IXMLDOMNodeList *root_list, *fo_list;
2611 doc = create_document(&IID_IXMLDOMDocument);
2614 str = SysAllocString( szComplete4 );
2615 r = IXMLDOMDocument_loadXML( doc, str, &b );
2616 ok( r == S_OK, "loadXML failed\n");
2617 ok( b == VARIANT_TRUE, "failed to load XML string\n");
2618 SysFreeString( str );
2620 r = IXMLDOMDocument_get_documentElement( doc, &element );
2621 ok( r == S_OK, "ret %08x\n", r);
2623 r = IXMLDOMElement_get_childNodes( element, &root_list );
2624 ok( r == S_OK, "ret %08x\n", r);
2626 r = IXMLDOMNodeList_get_item( root_list, 3, &fo_node );
2627 ok( r == S_OK, "ret %08x\n", r);
2629 r = IXMLDOMNode_get_childNodes( fo_node, &fo_list );
2630 ok( r == S_OK, "ret %08x\n", r);
2632 r = IXMLDOMNodeList_get_item( fo_list, 0, &ba_node );
2633 ok( r == S_OK, "ret %08x\n", r);
2635 /* invalid parameter: NULL ptr */
2636 removed_node = (void*)0xdeadbeef;
2637 r = IXMLDOMElement_removeChild( element, NULL, &removed_node );
2638 ok( r == E_INVALIDARG, "ret %08x\n", r );
2639 ok( removed_node == (void*)0xdeadbeef, "%p\n", removed_node );
2641 /* ba_node is a descendant of element, but not a direct child. */
2642 removed_node = (void*)0xdeadbeef;
2643 r = IXMLDOMElement_removeChild( element, ba_node, &removed_node );
2644 ok( r == E_INVALIDARG, "ret %08x\n", r );
2645 ok( removed_node == NULL, "%p\n", removed_node );
2647 r = IXMLDOMElement_removeChild( element, fo_node, &removed_node );
2648 ok( r == S_OK, "ret %08x\n", r);
2649 ok( fo_node == removed_node, "node %p node2 %p\n", fo_node, removed_node );
2651 /* try removing already removed child */
2652 temp_node = (void*)0xdeadbeef;
2653 r = IXMLDOMElement_removeChild( element, fo_node, &temp_node );
2654 ok( r == E_INVALIDARG, "ret %08x\n", r);
2655 ok( temp_node == NULL, "%p\n", temp_node );
2657 /* the removed node has no parent anymore */
2658 r = IXMLDOMNode_get_parentNode( removed_node, &temp_node );
2659 ok( r == S_FALSE, "ret %08x\n", r);
2660 ok( temp_node == NULL, "%p\n", temp_node );
2662 IXMLDOMNode_Release( removed_node );
2663 IXMLDOMNode_Release( ba_node );
2664 IXMLDOMNodeList_Release( fo_list );
2666 r = IXMLDOMNodeList_get_item( root_list, 0, &lc_node );
2667 ok( r == S_OK, "ret %08x\n", r);
2669 r = IXMLDOMElement_QueryInterface( lc_node, &IID_IXMLDOMElement, (void**)&lc_element );
2670 ok( r == S_OK, "ret %08x\n", r);
2672 /* MS quirk: passing wrong interface pointer works, too */
2673 r = IXMLDOMElement_removeChild( element, (IXMLDOMNode*)lc_element, NULL );
2674 ok( r == S_OK, "ret %08x\n", r);
2676 r = IXMLDOMNode_get_parentNode( lc_node, &temp_node );
2677 ok( r == S_FALSE, "ret %08x\n", r);
2678 ok( temp_node == NULL, "%p\n", temp_node );
2680 IXMLDOMNode_Release( lc_node );
2681 IXMLDOMNodeList_Release( root_list );
2682 IXMLDOMElement_Release( element );
2683 IXMLDOMDocument_Release( doc );
2686 static void test_replaceChild(void)
2691 IXMLDOMDocument *doc;
2692 IXMLDOMElement *element, *ba_element;
2693 IXMLDOMNode *fo_node, *ba_node, *lc_node, *removed_node, *temp_node;
2694 IXMLDOMNodeList *root_list, *fo_list;
2695 IUnknown * unk1, *unk2;
2698 doc = create_document(&IID_IXMLDOMDocument);
2701 str = SysAllocString( szComplete4 );
2702 r = IXMLDOMDocument_loadXML( doc, str, &b );
2703 ok( r == S_OK, "loadXML failed\n");
2704 ok( b == VARIANT_TRUE, "failed to load XML string\n");
2705 SysFreeString( str );
2707 r = IXMLDOMDocument_get_documentElement( doc, &element );
2708 ok( r == S_OK, "ret %08x\n", r);
2710 r = IXMLDOMElement_get_childNodes( element, &root_list );
2711 ok( r == S_OK, "ret %08x\n", r);
2713 r = IXMLDOMNodeList_get_item( root_list, 0, &lc_node );
2714 ok( r == S_OK, "ret %08x\n", r);
2716 r = IXMLDOMNodeList_get_item( root_list, 3, &fo_node );
2717 ok( r == S_OK, "ret %08x\n", r);
2719 r = IXMLDOMNode_get_childNodes( fo_node, &fo_list );
2720 ok( r == S_OK, "ret %08x\n", r);
2722 r = IXMLDOMNodeList_get_item( fo_list, 0, &ba_node );
2723 ok( r == S_OK, "ret %08x\n", r);
2725 IXMLDOMNodeList_Release( fo_list );
2727 /* invalid parameter: NULL ptr for element to remove */
2728 removed_node = (void*)0xdeadbeef;
2729 r = IXMLDOMElement_replaceChild( element, ba_node, NULL, &removed_node );
2730 ok( r == E_INVALIDARG, "ret %08x\n", r );
2731 ok( removed_node == (void*)0xdeadbeef, "%p\n", removed_node );
2733 /* invalid parameter: NULL for replacement element. (Sic!) */
2734 removed_node = (void*)0xdeadbeef;
2735 r = IXMLDOMElement_replaceChild( element, NULL, fo_node, &removed_node );
2736 ok( r == E_INVALIDARG, "ret %08x\n", r );
2737 ok( removed_node == (void*)0xdeadbeef, "%p\n", removed_node );
2739 /* invalid parameter: OldNode is not a child */
2740 removed_node = (void*)0xdeadbeef;
2741 r = IXMLDOMElement_replaceChild( element, lc_node, ba_node, &removed_node );
2742 ok( r == E_INVALIDARG, "ret %08x\n", r );
2743 ok( removed_node == NULL, "%p\n", removed_node );
2745 /* invalid parameter: would create loop */
2746 removed_node = (void*)0xdeadbeef;
2747 r = IXMLDOMNode_replaceChild( fo_node, fo_node, ba_node, &removed_node );
2748 ok( r == E_FAIL, "ret %08x\n", r );
2749 ok( removed_node == NULL, "%p\n", removed_node );
2751 r = IXMLDOMElement_replaceChild( element, ba_node, fo_node, NULL );
2752 ok( r == S_OK, "ret %08x\n", r );
2754 r = IXMLDOMNodeList_get_item( root_list, 3, &temp_node );
2755 ok( r == S_OK, "ret %08x\n", r );
2757 /* ba_node and temp_node refer to the same node, yet they
2758 are different interface pointers */
2759 ok( ba_node != temp_node, "ba_node %p temp_node %p\n", ba_node, temp_node);
2760 r = IXMLDOMNode_QueryInterface( temp_node, &IID_IUnknown, (void**)&unk1);
2761 ok( r == S_OK, "ret %08x\n", r );
2762 r = IXMLDOMNode_QueryInterface( ba_node, &IID_IUnknown, (void**)&unk2);
2763 ok( r == S_OK, "ret %08x\n", r );
2764 todo_wine ok( unk1 == unk2, "unk1 %p unk2 %p\n", unk1, unk2);
2766 IUnknown_Release( unk1 );
2767 IUnknown_Release( unk2 );
2769 /* ba_node should have been removed from below fo_node */
2770 r = IXMLDOMNode_get_childNodes( fo_node, &fo_list );
2771 ok( r == S_OK, "ret %08x\n", r );
2773 /* MS quirk: replaceChild also accepts elements instead of nodes */
2774 r = IXMLDOMNode_QueryInterface( ba_node, &IID_IXMLDOMElement, (void**)&ba_element);
2775 ok( r == S_OK, "ret %08x\n", r );
2777 r = IXMLDOMElement_replaceChild( element, ba_node, (IXMLDOMNode*)ba_element, &removed_node );
2778 ok( r == S_OK, "ret %08x\n", r );
2780 r = IXMLDOMNodeList_get_length( fo_list, &len);
2781 ok( r == S_OK, "ret %08x\n", r );
2782 ok( len == 0, "len %d\n", len);
2784 IXMLDOMNodeList_Release( fo_list );
2786 IXMLDOMNode_Release(ba_node);
2787 IXMLDOMNode_Release(fo_node);
2788 IXMLDOMNode_Release(temp_node);
2789 IXMLDOMNodeList_Release( root_list );
2790 IXMLDOMElement_Release( element );
2791 IXMLDOMDocument_Release( doc );
2794 static void test_removeNamedItem(void)
2796 IXMLDOMDocument *doc;
2797 IXMLDOMElement *element;
2798 IXMLDOMNode *pr_node, *removed_node, *removed_node2;
2799 IXMLDOMNodeList *root_list;
2800 IXMLDOMNamedNodeMap * pr_attrs;
2806 doc = create_document(&IID_IXMLDOMDocument);
2809 str = SysAllocString( szComplete4 );
2810 r = IXMLDOMDocument_loadXML( doc, str, &b );
2811 ok( r == S_OK, "loadXML failed\n");
2812 ok( b == VARIANT_TRUE, "failed to load XML string\n");
2813 SysFreeString( str );
2815 r = IXMLDOMDocument_get_documentElement( doc, &element );
2816 ok( r == S_OK, "ret %08x\n", r);
2818 r = IXMLDOMElement_get_childNodes( element, &root_list );
2819 ok( r == S_OK, "ret %08x\n", r);
2821 r = IXMLDOMNodeList_get_item( root_list, 1, &pr_node );
2822 ok( r == S_OK, "ret %08x\n", r);
2824 r = IXMLDOMNode_get_attributes( pr_node, &pr_attrs );
2825 ok( r == S_OK, "ret %08x\n", r);
2827 r = IXMLDOMNamedNodeMap_get_length( pr_attrs, &len );
2828 ok( r == S_OK, "ret %08x\n", r);
2829 ok( len == 3, "length %d\n", len);
2831 removed_node = (void*)0xdeadbeef;
2832 r = IXMLDOMNamedNodeMap_removeNamedItem( pr_attrs, NULL, &removed_node);
2833 ok ( r == E_INVALIDARG, "ret %08x\n", r);
2834 ok ( removed_node == (void*)0xdeadbeef, "got %p\n", removed_node);
2836 removed_node = (void*)0xdeadbeef;
2837 str = SysAllocString(szvr);
2838 r = IXMLDOMNamedNodeMap_removeNamedItem( pr_attrs, str, &removed_node);
2839 ok ( r == S_OK, "ret %08x\n", r);
2841 removed_node2 = (void*)0xdeadbeef;
2842 r = IXMLDOMNamedNodeMap_removeNamedItem( pr_attrs, str, &removed_node2);
2843 ok ( r == S_FALSE, "ret %08x\n", r);
2844 ok ( removed_node2 == NULL, "got %p\n", removed_node2 );
2846 r = IXMLDOMNamedNodeMap_get_length( pr_attrs, &len );
2847 ok( r == S_OK, "ret %08x\n", r);
2848 ok( len == 2, "length %d\n", len);
2850 r = IXMLDOMNamedNodeMap_setNamedItem( pr_attrs, removed_node, NULL);
2851 ok ( r == S_OK, "ret %08x\n", r);
2852 IXMLDOMNode_Release(removed_node);
2854 r = IXMLDOMNamedNodeMap_get_length( pr_attrs, &len );
2855 ok( r == S_OK, "ret %08x\n", r);
2856 ok( len == 3, "length %d\n", len);
2858 r = IXMLDOMNamedNodeMap_removeNamedItem( pr_attrs, str, NULL);
2859 ok ( r == S_OK, "ret %08x\n", r);
2861 r = IXMLDOMNamedNodeMap_get_length( pr_attrs, &len );
2862 ok( r == S_OK, "ret %08x\n", r);
2863 ok( len == 2, "length %d\n", len);
2865 r = IXMLDOMNamedNodeMap_removeNamedItem( pr_attrs, str, NULL);
2866 ok ( r == S_FALSE, "ret %08x\n", r);
2870 IXMLDOMNamedNodeMap_Release( pr_attrs );
2871 IXMLDOMNode_Release( pr_node );
2872 IXMLDOMNodeList_Release( root_list );
2873 IXMLDOMElement_Release( element );
2874 IXMLDOMDocument_Release( doc );
2877 static void test_XMLHTTP(void)
2879 static const WCHAR wszBody[] = {'m','o','d','e','=','T','e','s','t',0};
2880 static WCHAR wszPOST[] = {'P','O','S','T',0};
2881 static WCHAR wszUrl[] = {'h','t','t','p',':','/','/',
2882 'c','r','o','s','s','o','v','e','r','.','c','o','d','e','w','e','a','v','e','r','s','.','c','o','m','/',
2883 'p','o','s','t','t','e','s','t','.','p','h','p',0};
2884 static const WCHAR wszExpectedResponse[] = {'F','A','I','L','E','D',0};
2885 IXMLHttpRequest *pXMLHttpRequest;
2886 BSTR bstrResponse, method, url;
2891 HRESULT hr = CoCreateInstance(&CLSID_XMLHTTPRequest, NULL,
2892 CLSCTX_INPROC_SERVER, &IID_IXMLHttpRequest,
2893 (void **)&pXMLHttpRequest);
2896 win_skip("IXMLHTTPRequest is not available (0x%08x)\n", hr);
2900 VariantInit(&dummy);
2901 V_VT(&dummy) = VT_ERROR;
2902 V_ERROR(&dummy) = DISP_E_MEMBERNOTFOUND;
2903 VariantInit(&async);
2904 V_VT(&async) = VT_BOOL;
2905 V_BOOL(&async) = VARIANT_FALSE;
2906 V_VT(&varbody) = VT_BSTR;
2907 V_BSTR(&varbody) = SysAllocString(wszBody);
2909 method = SysAllocString(wszPOST);
2910 url = SysAllocString(wszUrl);
2912 /* invalid parameters */
2913 hr = IXMLHttpRequest_open(pXMLHttpRequest, NULL, NULL, async, dummy, dummy);
2914 ok(hr == E_INVALIDARG, "got 0x%08x\n", hr);
2916 hr = IXMLHttpRequest_open(pXMLHttpRequest, method, NULL, async, dummy, dummy);
2917 ok(hr == E_INVALIDARG, "got 0x%08x\n", hr);
2919 hr = IXMLHttpRequest_open(pXMLHttpRequest, NULL, url, async, dummy, dummy);
2920 ok(hr == E_INVALIDARG, "got 0x%08x\n", hr);
2922 hr = IXMLHttpRequest_setRequestHeader(pXMLHttpRequest, NULL, NULL);
2923 ok(hr == E_INVALIDARG, "got 0x%08x\n", hr);
2925 hr = IXMLHttpRequest_setRequestHeader(pXMLHttpRequest, _bstr_("header1"), NULL);
2926 ok(hr == E_FAIL || broken(hr == E_UNEXPECTED) /* win9x, win2k */, "got 0x%08x\n", hr);
2928 hr = IXMLHttpRequest_setRequestHeader(pXMLHttpRequest, NULL, _bstr_("value1"));
2929 ok(hr == E_INVALIDARG, "got 0x%08x\n", hr);
2931 hr = IXMLHttpRequest_setRequestHeader(pXMLHttpRequest, _bstr_("header1"), _bstr_("value1"));
2932 ok(hr == E_FAIL || broken(hr == E_UNEXPECTED) /* win9x, win2k */, "got 0x%08x\n", hr);
2934 hr = IXMLHttpRequest_get_readyState(pXMLHttpRequest, NULL);
2935 ok(hr == E_INVALIDARG, "got 0x%08x\n", hr);
2938 hr = IXMLHttpRequest_get_readyState(pXMLHttpRequest, &state);
2939 ok(hr == S_OK, "got 0x%08x\n", hr);
2940 ok(state == 0, "got %d, expected 0\n", state);
2942 hr = IXMLHttpRequest_open(pXMLHttpRequest, method, url, async, dummy, dummy);
2943 ok(hr == S_OK, "got 0x%08x\n", hr);
2946 hr = IXMLHttpRequest_get_readyState(pXMLHttpRequest, &state);
2947 ok(hr == S_OK, "got 0x%08x\n", hr);
2948 ok(state == 1, "got %d, expected 1\n", state);
2950 hr = IXMLHttpRequest_setRequestHeader(pXMLHttpRequest, _bstr_("header1"), _bstr_("value1"));
2951 ok(hr == S_OK, "got 0x%08x\n", hr);
2953 hr = IXMLHttpRequest_setRequestHeader(pXMLHttpRequest, NULL, _bstr_("value1"));
2954 ok(hr == E_INVALIDARG, "got 0x%08x\n", hr);
2956 hr = IXMLHttpRequest_setRequestHeader(pXMLHttpRequest, _bstr_(""), _bstr_("value1"));
2957 ok(hr == E_INVALIDARG, "got 0x%08x\n", hr);
2959 SysFreeString(method);
2962 hr = IXMLHttpRequest_send(pXMLHttpRequest, varbody);
2963 if (hr == INET_E_RESOURCE_NOT_FOUND)
2965 skip("No connection could be made with crossover.codeweavers.com\n");
2966 IXMLHttpRequest_Release(pXMLHttpRequest);
2969 todo_wine ok(hr == S_OK, "IXMLHttpRequest_send should have succeeded instead of failing with 0x%08x\n", hr);
2970 VariantClear(&varbody);
2972 hr = IXMLHttpRequest_get_responseText(pXMLHttpRequest, &bstrResponse);
2973 todo_wine ok(hr == S_OK, "IXMLHttpRequest_get_responseText should have succeeded instead of failing with 0x%08x\n", hr);
2974 /* the server currently returns "FAILED" because the Content-Type header is
2975 * not what the server expects */
2978 ok(!memcmp(bstrResponse, wszExpectedResponse, sizeof(wszExpectedResponse)), "bstrResponse differs from what was expected\n");
2979 SysFreeString(bstrResponse);
2982 IXMLHttpRequest_Release(pXMLHttpRequest);
2986 static void test_IXMLDOMDocument2(void)
2988 static const WCHAR emptyW[] = {0};
2989 IXMLDOMDocument2 *doc2;
2990 IXMLDOMDocument *doc;
2991 IDispatchEx *dispex;
2998 doc = create_document(&IID_IXMLDOMDocument);
3001 str = SysAllocString( szComplete4 );
3002 r = IXMLDOMDocument_loadXML( doc, str, &b );
3003 ok( r == S_OK, "loadXML failed\n");
3004 ok( b == VARIANT_TRUE, "failed to load XML string\n");
3005 SysFreeString( str );
3007 r = IXMLDOMDocument_QueryInterface( doc, &IID_IXMLDOMDocument2, (void**)&doc2 );
3008 ok( r == S_OK, "ret %08x\n", r );
3009 ok( doc == (IXMLDOMDocument*)doc2, "interfaces differ\n");
3011 r = IXMLDOMDocument_QueryInterface( doc, &IID_IDispatchEx, (void**)&dispex );
3012 ok( r == S_OK, "ret %08x\n", r );
3015 IDispatchEx_Release(dispex);
3018 /* we will check if the variant got cleared */
3019 ref = IXMLDOMDocument2_AddRef(doc2);
3020 expect_eq(ref, 3, int, "%d"); /* doc, doc2, AddRef*/
3021 V_VT(&var) = VT_UNKNOWN;
3022 V_UNKNOWN(&var) = (IUnknown *)doc2;
3025 ole_expect(IXMLDOMDocument2_getProperty(doc2, _bstr_("askldhfaklsdf"), &var), E_FAIL);
3026 expect_eq(V_VT(&var), VT_UNKNOWN, int, "%x");
3027 ole_expect(IXMLDOMDocument2_getProperty(doc2, _bstr_("SelectionLanguage"), NULL), E_INVALIDARG);
3030 ole_check(IXMLDOMDocument2_getProperty(doc2, _bstr_("SelectionLanguage"), &var));
3031 expect_eq(V_VT(&var), VT_BSTR, int, "%x");
3032 expect_bstr_eq_and_free(V_BSTR(&var), "XSLPattern");
3035 /* the variant didn't get cleared*/
3036 expect_eq(IXMLDOMDocument2_Release(doc2), 2, int, "%d");
3038 /* setProperty tests */
3039 ole_expect(IXMLDOMDocument2_setProperty(doc2, _bstr_("askldhfaklsdf"), var), E_FAIL);
3040 ole_expect(IXMLDOMDocument2_setProperty(doc2, _bstr_("SelectionLanguage"), var), E_FAIL);
3041 ole_expect(IXMLDOMDocument2_setProperty(doc2, _bstr_("SelectionLanguage"), _variantbstr_("alskjdh faklsjd hfk")), E_FAIL);
3042 ole_check(IXMLDOMDocument2_setProperty(doc2, _bstr_("SelectionLanguage"), _variantbstr_("XSLPattern")));
3043 ole_check(IXMLDOMDocument2_setProperty(doc2, _bstr_("SelectionLanguage"), _variantbstr_("XPath")));
3044 ole_check(IXMLDOMDocument2_setProperty(doc2, _bstr_("SelectionLanguage"), _variantbstr_("XSLPattern")));
3046 V_VT(&var) = VT_BSTR;
3047 V_BSTR(&var) = SysAllocString(emptyW);
3048 r = IXMLDOMDocument2_setProperty(doc2, _bstr_("SelectionNamespaces"), var);
3049 ok(r == S_OK, "got 0x%08x\n", r);
3054 r = IXMLDOMDocument2_setProperty(doc2, _bstr_("SelectionNamespaces"), var);
3055 ok(r == E_FAIL, "got 0x%08x\n", r);
3057 /* contrary to what MSDN claims you can switch back from XPath to XSLPattern */
3058 ole_check(IXMLDOMDocument2_getProperty(doc2, _bstr_("SelectionLanguage"), &var));
3059 expect_eq(V_VT(&var), VT_BSTR, int, "%x");
3060 expect_bstr_eq_and_free(V_BSTR(&var), "XSLPattern");
3062 IXMLDOMDocument2_Release( doc2 );
3063 IXMLDOMDocument_Release( doc );
3067 static void test_XPath(void)
3071 IXMLDOMDocument2 *doc;
3072 IXMLDOMNode *rootNode;
3073 IXMLDOMNode *elem1Node;
3075 IXMLDOMNodeList *list;
3077 doc = create_document(&IID_IXMLDOMDocument2);
3080 ole_check(IXMLDOMDocument_loadXML(doc, _bstr_(szExampleXML), &b));
3081 ok(b == VARIANT_TRUE, "failed to load XML string\n");
3083 /* switch to XPath */
3084 ole_check(IXMLDOMDocument2_setProperty(doc, _bstr_("SelectionLanguage"), _variantbstr_("XPath")));
3086 /* some simple queries*/
3087 ole_check(IXMLDOMDocument_selectNodes(doc, _bstr_("root"), &list));
3088 ole_check(IXMLDOMNodeList_get_item(list, 0, &rootNode));
3089 ole_check(IXMLDOMNodeList_reset(list));
3090 expect_list_and_release(list, "E2.D1");
3091 if (rootNode == NULL)
3094 ole_check(IXMLDOMDocument_selectNodes(doc, _bstr_("root//c"), &list));
3095 expect_list_and_release(list, "E3.E1.E2.D1 E3.E2.E2.D1");
3097 ole_check(IXMLDOMDocument_selectNodes(doc, _bstr_("//c[@type]"), &list));
3098 expect_list_and_release(list, "E3.E2.E2.D1");
3100 ole_check(IXMLDOMNode_selectNodes(rootNode, _bstr_("elem"), &list));
3101 /* using get_item for query results advances the position */
3102 ole_check(IXMLDOMNodeList_get_item(list, 1, &node));
3103 expect_node(node, "E2.E2.D1");
3104 IXMLDOMNode_Release(node);
3105 ole_check(IXMLDOMNodeList_nextNode(list, &node));
3106 expect_node(node, "E4.E2.D1");
3107 IXMLDOMNode_Release(node);
3108 ole_check(IXMLDOMNodeList_reset(list));
3109 expect_list_and_release(list, "E1.E2.D1 E2.E2.D1 E4.E2.D1");
3111 ole_check(IXMLDOMNode_selectNodes(rootNode, _bstr_("."), &list));
3112 expect_list_and_release(list, "E2.D1");
3114 ole_check(IXMLDOMNode_selectNodes(rootNode, _bstr_("elem[3]/preceding-sibling::*"), &list));
3115 ole_check(IXMLDOMNodeList_get_item(list, 0, &elem1Node));
3116 ole_check(IXMLDOMNodeList_reset(list));
3117 expect_list_and_release(list, "E1.E2.D1 E2.E2.D1 E3.E2.D1");
3119 /* select an attribute */
3120 ole_check(IXMLDOMNode_selectNodes(rootNode, _bstr_(".//@type"), &list));
3121 expect_list_and_release(list, "A'type'.E3.E2.E2.D1");
3123 /* would evaluate to a number */
3124 ole_expect(IXMLDOMNode_selectNodes(rootNode, _bstr_("count(*)"), &list), E_FAIL);
3125 /* would evaluate to a boolean */
3126 ole_expect(IXMLDOMNode_selectNodes(rootNode, _bstr_("position()>0"), &list), E_FAIL);
3127 /* would evaluate to a string */
3128 ole_expect(IXMLDOMNode_selectNodes(rootNode, _bstr_("name()"), &list), E_FAIL);
3131 ole_check(IXMLDOMNode_selectNodes(rootNode, _bstr_("c"), &list));
3132 expect_list_and_release(list, "");
3133 ole_check(IXMLDOMDocument_selectNodes(doc, _bstr_("elem//c"), &list));
3134 expect_list_and_release(list, "");
3135 ole_check(IXMLDOMDocument_selectNodes(doc, _bstr_("//elem[4]"), &list));
3136 expect_list_and_release(list, "");
3137 ole_check(IXMLDOMDocument_selectNodes(doc, _bstr_("root//elem[0]"), &list));
3138 expect_list_and_release(list, "");
3140 /* foo undeclared in document node */
3141 ole_expect(IXMLDOMDocument_selectNodes(doc, _bstr_("root//foo:c"), &list), E_FAIL);
3142 /* undeclared in <root> node */
3143 ole_expect(IXMLDOMNode_selectNodes(rootNode, _bstr_(".//foo:c"), &list), E_FAIL);
3144 /* undeclared in <elem> node */
3145 ole_expect(IXMLDOMNode_selectNodes(elem1Node, _bstr_("//foo:c"), &list), E_FAIL);
3146 /* but this trick can be used */
3147 ole_check(IXMLDOMNode_selectNodes(elem1Node, _bstr_("//*[name()='foo:c']"), &list));
3148 expect_list_and_release(list, "E3.E4.E2.D1");
3150 /* it has to be declared in SelectionNamespaces */
3151 ole_check(IXMLDOMDocument2_setProperty(doc, _bstr_("SelectionNamespaces"),
3152 _variantbstr_("xmlns:test='urn:uuid:86B2F87F-ACB6-45cd-8B77-9BDB92A01A29'")));
3154 /* now the namespace can be used */
3155 ole_check(IXMLDOMDocument_selectNodes(doc, _bstr_("root//test:c"), &list));
3156 expect_list_and_release(list, "E3.E3.E2.D1 E3.E4.E2.D1");
3157 ole_check(IXMLDOMNode_selectNodes(rootNode, _bstr_(".//test:c"), &list));
3158 expect_list_and_release(list, "E3.E3.E2.D1 E3.E4.E2.D1");
3159 ole_check(IXMLDOMNode_selectNodes(elem1Node, _bstr_("//test:c"), &list));
3160 expect_list_and_release(list, "E3.E3.E2.D1 E3.E4.E2.D1");
3161 ole_check(IXMLDOMNode_selectNodes(elem1Node, _bstr_(".//test:x"), &list));
3163 char *str = list_to_string(list);
3164 /* it's the correct node, just the wrong index due to whitespace-only nodes */
3165 todo_wine ok(strcmp(str, "E5.E1.E4.E1.E2.D1")==0, "Invalid node list: %s, expected %s\n", str, "E5.E1.E4.E1.E2.D1");
3167 IXMLDOMNodeList_Release(list);
3170 /* SelectionNamespaces syntax error - the namespaces doesn't work anymore but the value is stored */
3171 ole_expect(IXMLDOMDocument2_setProperty(doc, _bstr_("SelectionNamespaces"),
3172 _variantbstr_("xmlns:test='urn:uuid:86B2F87F-ACB6-45cd-8B77-9BDB92A01A29' xmlns:foo=###")), E_FAIL);
3174 ole_expect(IXMLDOMDocument_selectNodes(doc, _bstr_("root//foo:c"), &list), E_FAIL);
3177 ole_check(IXMLDOMDocument2_getProperty(doc, _bstr_("SelectionNamespaces"), &var));
3178 expect_eq(V_VT(&var), VT_BSTR, int, "%x");
3179 if (V_VT(&var) == VT_BSTR)
3180 expect_bstr_eq_and_free(V_BSTR(&var), "xmlns:test='urn:uuid:86B2F87F-ACB6-45cd-8B77-9BDB92A01A29' xmlns:foo=###");
3182 /* extra attributes - same thing*/
3183 ole_expect(IXMLDOMDocument2_setProperty(doc, _bstr_("SelectionNamespaces"),
3184 _variantbstr_("xmlns:test='urn:uuid:86B2F87F-ACB6-45cd-8B77-9BDB92A01A29' param='test'")), E_FAIL);
3185 ole_expect(IXMLDOMDocument_selectNodes(doc, _bstr_("root//foo:c"), &list), E_FAIL);
3187 IXMLDOMNode_Release(rootNode);
3188 IXMLDOMNode_Release(elem1Node);
3189 IXMLDOMDocument_Release(doc);
3193 static void test_cloneNode(void )
3195 IXMLDOMDocument *doc;
3197 IXMLDOMNodeList *pList;
3198 IXMLDOMNamedNodeMap *mapAttr;
3199 LONG nLength = 0, nLength1 = 0;
3200 LONG nAttrCnt = 0, nAttrCnt1 = 0;
3202 IXMLDOMNode *node_clone;
3203 IXMLDOMNode *node_first;
3206 static const WCHAR szSearch[] = { 'l', 'c', '/', 'p', 'r', 0 };
3208 doc = create_document(&IID_IXMLDOMDocument);
3211 str = SysAllocString( szComplete4 );
3212 ole_check(IXMLDOMDocument_loadXML(doc, str, &b));
3213 ok(b == VARIANT_TRUE, "failed to load XML string\n");
3219 str = SysAllocString( szSearch);
3220 r = IXMLDOMNode_selectSingleNode(doc, str, &node);
3221 ok( r == S_OK, "ret %08x\n", r );
3222 ok( node != NULL, "node %p\n", node );
3227 IXMLDOMDocument_Release(doc);
3231 /* Check invalid parameter */
3232 r = IXMLDOMNode_cloneNode(node, VARIANT_TRUE, NULL);
3233 ok( r == E_INVALIDARG, "ret %08x\n", r );
3236 r = IXMLDOMNode_cloneNode(node, VARIANT_TRUE, &node_clone);
3237 ok( r == S_OK, "ret %08x\n", r );
3238 ok( node_clone != NULL, "node %p\n", node );
3242 IXMLDOMDocument_Release(doc);
3243 IXMLDOMNode_Release(node);
3247 r = IXMLDOMNode_get_firstChild(node_clone, &node_first);
3248 ok( r == S_OK, "ret %08x\n", r );
3251 IXMLDOMDocument *doc2;
3253 r = IXMLDOMNode_get_ownerDocument(node_clone, &doc2);
3254 ok( r == S_OK, "ret %08x\n", r );
3256 IXMLDOMDocument_Release(doc2);
3258 IXMLDOMNode_Release(node_first);
3261 r = IXMLDOMNode_get_childNodes(node, &pList);
3262 ok( r == S_OK, "ret %08x\n", r );
3265 IXMLDOMNodeList_get_length(pList, &nLength);
3266 IXMLDOMNodeList_Release(pList);
3269 r = IXMLDOMNode_get_attributes(node, &mapAttr);
3270 ok( r == S_OK, "ret %08x\n", r );
3273 IXMLDOMNamedNodeMap_get_length(mapAttr, &nAttrCnt);
3274 IXMLDOMNamedNodeMap_Release(mapAttr);
3277 r = IXMLDOMNode_get_childNodes(node_clone, &pList);
3278 ok( r == S_OK, "ret %08x\n", r );
3281 IXMLDOMNodeList_get_length(pList, &nLength1);
3282 IXMLDOMNodeList_Release(pList);
3285 r = IXMLDOMNode_get_attributes(node_clone, &mapAttr);
3286 ok( r == S_OK, "ret %08x\n", r );
3289 IXMLDOMNamedNodeMap_get_length(mapAttr, &nAttrCnt1);
3290 IXMLDOMNamedNodeMap_Release(mapAttr);
3293 ok(nLength == nLength1, "wrong Child count (%d, %d)\n", nLength, nLength1);
3294 ok(nAttrCnt == nAttrCnt1, "wrong Attribute count (%d, %d)\n", nAttrCnt, nAttrCnt1);
3295 IXMLDOMNode_Release(node_clone);
3298 r = IXMLDOMNode_cloneNode(node, VARIANT_FALSE, &node_clone);
3299 ok( r == S_OK, "ret %08x\n", r );
3300 ok( node_clone != NULL, "node %p\n", node );
3304 IXMLDOMDocument_Release(doc);
3305 IXMLDOMNode_Release(node);
3309 r = IXMLDOMNode_get_firstChild(node_clone, &node_first);
3310 ok( r == S_FALSE, "ret %08x\n", r );
3313 IXMLDOMDocument *doc2;
3315 r = IXMLDOMNode_get_ownerDocument(node_clone, &doc2);
3316 ok( r == S_OK, "ret %08x\n", r );
3318 IXMLDOMDocument_Release(doc2);
3320 IXMLDOMNode_Release(node_first);
3323 r = IXMLDOMNode_get_childNodes(node_clone, &pList);
3324 ok( r == S_OK, "ret %08x\n", r );
3327 IXMLDOMNodeList_get_length(pList, &nLength1);
3328 ok( nLength1 == 0, "Length should be 0 (%d)\n", nLength1);
3329 IXMLDOMNodeList_Release(pList);
3332 r = IXMLDOMNode_get_attributes(node_clone, &mapAttr);
3333 ok( r == S_OK, "ret %08x\n", r );
3336 IXMLDOMNamedNodeMap_get_length(mapAttr, &nAttrCnt1);
3337 ok( nAttrCnt1 == 3, "Attribute count should be 3 (%d)\n", nAttrCnt1);
3338 IXMLDOMNamedNodeMap_Release(mapAttr);
3341 ok(nLength != nLength1, "wrong Child count (%d, %d)\n", nLength, nLength1);
3342 ok(nAttrCnt == nAttrCnt1, "wrong Attribute count (%d, %d)\n", nAttrCnt, nAttrCnt1);
3343 IXMLDOMNode_Release(node_clone);
3346 IXMLDOMNode_Release(node);
3347 IXMLDOMDocument_Release(doc);
3350 static void test_xmlTypes(void)
3352 IXMLDOMDocument *doc;
3353 IXMLDOMElement *pRoot;
3355 IXMLDOMComment *pComment;
3356 IXMLDOMElement *pElement;
3357 IXMLDOMAttribute *pAttribute;
3358 IXMLDOMNamedNodeMap *pAttribs;
3359 IXMLDOMCDATASection *pCDataSec;
3360 IXMLDOMImplementation *pIXMLDOMImplementation = NULL;
3361 IXMLDOMDocumentFragment *pDocFrag = NULL;
3362 IXMLDOMEntityReference *pEntityRef = NULL;
3364 IXMLDOMNode *pNextChild;
3368 doc = create_document(&IID_IXMLDOMDocument);
3371 pNextChild = (void*)0xdeadbeef;
3372 hr = IXMLDOMDocument_get_nextSibling(doc, NULL);
3373 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
3375 pNextChild = (void*)0xdeadbeef;
3376 hr = IXMLDOMDocument_get_nextSibling(doc, &pNextChild);
3377 ok(hr == S_FALSE, "ret %08x\n", hr );
3378 ok(pNextChild == NULL, "pDocChild not NULL\n");
3380 /* test previous Sibling */
3381 hr = IXMLDOMDocument_get_previousSibling(doc, NULL);
3382 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
3384 pNextChild = (void*)0xdeadbeef;
3385 hr = IXMLDOMDocument_get_previousSibling(doc, &pNextChild);
3386 ok(hr == S_FALSE, "ret %08x\n", hr );
3387 ok(pNextChild == NULL, "pNextChild not NULL\n");
3389 /* test get_attributes */
3390 hr = IXMLDOMDocument_get_attributes( doc, NULL );
3391 ok( hr == E_INVALIDARG, "get_attributes returned wrong code\n");
3393 pAttribs = (void*)0xdeadbeef;
3394 hr = IXMLDOMDocument_get_attributes( doc, &pAttribs);
3395 ok(hr == S_FALSE, "ret %08x\n", hr );
3396 ok( pAttribs == NULL, "pAttribs not NULL\n");
3398 /* test get_dataType */
3399 V_VT(&v) = VT_EMPTY;
3400 hr = IXMLDOMDocument_get_dataType(doc, &v);
3401 ok(hr == S_FALSE, "ret %08x\n", hr );
3402 ok( V_VT(&v) == VT_NULL, "incorrect dataType type\n");
3405 /* test nodeTypeString */
3407 hr = IXMLDOMDocument_get_nodeTypeString(doc, &str);
3408 ok(hr == S_OK, "ret %08x\n", hr );
3409 ok( !lstrcmpW( str, _bstr_("document") ), "incorrect nodeTypeString string\n");
3412 /* test implementation */
3413 hr = IXMLDOMDocument_get_implementation(doc, NULL);
3414 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
3416 hr = IXMLDOMDocument_get_implementation(doc, &pIXMLDOMImplementation);
3417 ok(hr == S_OK, "ret %08x\n", hr );
3420 VARIANT_BOOL hasFeature = VARIANT_TRUE;
3421 BSTR sEmpty = SysAllocStringLen(NULL, 0);
3423 hr = IXMLDOMImplementation_hasFeature(pIXMLDOMImplementation, NULL, sEmpty, &hasFeature);
3424 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
3426 hr = IXMLDOMImplementation_hasFeature(pIXMLDOMImplementation, sEmpty, sEmpty, NULL);
3427 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
3429 hr = IXMLDOMImplementation_hasFeature(pIXMLDOMImplementation, _bstr_("DOM"), sEmpty, &hasFeature);
3430 ok(hr == S_OK, "ret %08x\n", hr );
3431 ok(hasFeature == VARIANT_FALSE, "hasFeature returned false\n");
3433 hr = IXMLDOMImplementation_hasFeature(pIXMLDOMImplementation, sEmpty, sEmpty, &hasFeature);
3434 ok(hr == S_OK, "ret %08x\n", hr );
3435 ok(hasFeature == VARIANT_FALSE, "hasFeature returned true\n");
3437 hr = IXMLDOMImplementation_hasFeature(pIXMLDOMImplementation, _bstr_("DOM"), NULL, &hasFeature);
3438 ok(hr == S_OK, "ret %08x\n", hr );
3439 ok(hasFeature == VARIANT_TRUE, "hasFeature returned false\n");
3441 hr = IXMLDOMImplementation_hasFeature(pIXMLDOMImplementation, _bstr_("DOM"), sEmpty, &hasFeature);
3442 ok(hr == S_OK, "ret %08x\n", hr );
3443 ok(hasFeature == VARIANT_FALSE, "hasFeature returned false\n");
3445 hr = IXMLDOMImplementation_hasFeature(pIXMLDOMImplementation, _bstr_("DOM"), _bstr_("1.0"), &hasFeature);
3446 ok(hr == S_OK, "ret %08x\n", hr );
3447 ok(hasFeature == VARIANT_TRUE, "hasFeature returned true\n");
3449 hr = IXMLDOMImplementation_hasFeature(pIXMLDOMImplementation, _bstr_("XML"), _bstr_("1.0"), &hasFeature);
3450 ok(hr == S_OK, "ret %08x\n", hr );
3451 ok(hasFeature == VARIANT_TRUE, "hasFeature returned true\n");
3453 hr = IXMLDOMImplementation_hasFeature(pIXMLDOMImplementation, _bstr_("MS-DOM"), _bstr_("1.0"), &hasFeature);
3454 ok(hr == S_OK, "ret %08x\n", hr );
3455 ok(hasFeature == VARIANT_TRUE, "hasFeature returned true\n");
3457 hr = IXMLDOMImplementation_hasFeature(pIXMLDOMImplementation, _bstr_("SSS"), NULL, &hasFeature);
3458 ok(hr == S_OK, "ret %08x\n", hr );
3459 ok(hasFeature == VARIANT_FALSE, "hasFeature returned false\n");
3461 SysFreeString(sEmpty);
3462 IXMLDOMImplementation_Release(pIXMLDOMImplementation);
3465 pRoot = (IXMLDOMElement*)0x1;
3466 hr = IXMLDOMDocument_createElement(doc, NULL, &pRoot);
3467 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
3468 ok(pRoot == (void*)0x1, "Expect same ptr, got %p\n", pRoot);
3470 pRoot = (IXMLDOMElement*)0x1;
3471 hr = IXMLDOMDocument_createElement(doc, _bstr_(""), &pRoot);
3472 ok(hr == E_FAIL, "ret %08x\n", hr );
3473 ok(pRoot == (void*)0x1, "Expect same ptr, got %p\n", pRoot);
3475 hr = IXMLDOMDocument_createElement(doc, _bstr_("Testing"), &pRoot);
3476 ok(hr == S_OK, "ret %08x\n", hr );
3479 hr = IXMLDOMDocument_appendChild(doc, (IXMLDOMNode*)pRoot, NULL);
3480 ok(hr == S_OK, "ret %08x\n", hr );
3484 str = SysAllocString(szComment);
3485 hr = IXMLDOMDocument_createComment(doc, str, &pComment);
3487 ok(hr == S_OK, "ret %08x\n", hr );
3490 /* test get_attributes */
3491 hr = IXMLDOMComment_get_attributes( pComment, NULL );
3492 ok( hr == E_INVALIDARG, "get_attributes returned wrong code\n");
3494 pAttribs = (IXMLDOMNamedNodeMap*)0x1;
3495 hr = IXMLDOMComment_get_attributes( pComment, &pAttribs);
3496 ok(hr == S_FALSE, "ret %08x\n", hr );
3497 ok( pAttribs == NULL, "pAttribs not NULL\n");
3499 /* test nodeTypeString */
3500 hr = IXMLDOMComment_get_nodeTypeString(pComment, &str);
3501 ok(hr == S_OK, "ret %08x\n", hr );
3502 ok( !lstrcmpW( str, _bstr_("comment") ), "incorrect nodeTypeString string\n");
3505 hr = IXMLDOMElement_appendChild(pRoot, (IXMLDOMNode*)pComment, NULL);
3506 ok(hr == S_OK, "ret %08x\n", hr );
3508 hr = IXMLDOMComment_get_nodeName(pComment, &str);
3509 ok(hr == S_OK, "ret %08x\n", hr );
3510 ok( !lstrcmpW( str, szCommentNodeText ), "incorrect comment node Name\n");
3513 hr = IXMLDOMComment_get_xml(pComment, &str);
3514 ok(hr == S_OK, "ret %08x\n", hr );
3515 ok( !lstrcmpW( str, szCommentXML ), "incorrect comment xml\n");
3518 hr = IXMLDOMComment_get_dataType(pComment, &v);
3519 ok(hr == S_FALSE, "ret %08x\n", hr );
3520 ok( V_VT(&v) == VT_NULL, "incorrect dataType type\n");
3523 /* put data Tests */
3524 hr = IXMLDOMComment_put_data(pComment, _bstr_("This &is a ; test <>\\"));
3525 ok(hr == S_OK, "ret %08x\n", hr );
3527 /* get data Tests */
3528 hr = IXMLDOMComment_get_data(pComment, &str);
3529 ok(hr == S_OK, "ret %08x\n", hr );
3530 ok( !lstrcmpW( str, _bstr_("This &is a ; test <>\\") ), "incorrect get_data string\n");
3533 /* get data Tests */
3534 hr = IXMLDOMComment_get_nodeValue(pComment, &v);
3535 ok(hr == S_OK, "ret %08x\n", hr );
3536 ok( V_VT(&v) == VT_BSTR, "incorrect dataType type\n");
3537 ok( !lstrcmpW( V_BSTR(&v), _bstr_("This &is a ; test <>\\") ), "incorrect get_nodeValue string\n");
3540 /* Confirm XML text is good */
3541 hr = IXMLDOMComment_get_xml(pComment, &str);
3542 ok(hr == S_OK, "ret %08x\n", hr );
3543 ok( !lstrcmpW( str, _bstr_("<!--This &is a ; test <>\\-->") ), "incorrect xml string\n");
3546 /* Confirm we get the put_data Text back */
3547 hr = IXMLDOMComment_get_text(pComment, &str);
3548 ok(hr == S_OK, "ret %08x\n", hr );
3549 ok( !lstrcmpW( str, _bstr_("This &is a ; test <>\\") ), "incorrect xml string\n");
3552 /* test length property */
3553 hr = IXMLDOMComment_get_length(pComment, &len);
3554 ok(hr == S_OK, "ret %08x\n", hr );
3555 ok(len == 21, "expected 21 got %d\n", len);
3557 /* test substringData */
3558 hr = IXMLDOMComment_substringData(pComment, 0, 4, NULL);
3559 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
3561 /* test substringData - Invalid offset */
3562 str = (BSTR)&szElement;
3563 hr = IXMLDOMComment_substringData(pComment, -1, 4, &str);
3564 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
3565 ok( str == NULL, "incorrect string\n");
3567 /* test substringData - Invalid offset */
3568 str = (BSTR)&szElement;
3569 hr = IXMLDOMComment_substringData(pComment, 30, 0, &str);
3570 ok(hr == S_FALSE, "ret %08x\n", hr );
3571 ok( str == NULL, "incorrect string\n");
3573 /* test substringData - Invalid size */
3574 str = (BSTR)&szElement;
3575 hr = IXMLDOMComment_substringData(pComment, 0, -1, &str);
3576 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
3577 ok( str == NULL, "incorrect string\n");
3579 /* test substringData - Invalid size */
3580 str = (BSTR)&szElement;
3581 hr = IXMLDOMComment_substringData(pComment, 2, 0, &str);
3582 ok(hr == S_FALSE, "ret %08x\n", hr );
3583 ok( str == NULL, "incorrect string\n");
3585 /* test substringData - Start of string */
3586 hr = IXMLDOMComment_substringData(pComment, 0, 4, &str);
3587 ok(hr == S_OK, "ret %08x\n", hr );
3588 ok( !lstrcmpW( str, _bstr_("This") ), "incorrect substringData string\n");
3591 /* test substringData - Middle of string */
3592 hr = IXMLDOMComment_substringData(pComment, 13, 4, &str);
3593 ok(hr == S_OK, "ret %08x\n", hr );
3594 ok( !lstrcmpW( str, _bstr_("test") ), "incorrect substringData string\n");
3597 /* test substringData - End of string */
3598 hr = IXMLDOMComment_substringData(pComment, 20, 4, &str);
3599 ok(hr == S_OK, "ret %08x\n", hr );
3600 ok( !lstrcmpW( str, _bstr_("\\") ), "incorrect substringData string\n");
3603 /* test appendData */
3604 hr = IXMLDOMComment_appendData(pComment, NULL);
3605 ok(hr == S_OK, "ret %08x\n", hr );
3607 hr = IXMLDOMComment_appendData(pComment, _bstr_(""));
3608 ok(hr == S_OK, "ret %08x\n", hr );
3610 hr = IXMLDOMComment_appendData(pComment, _bstr_("Append"));
3611 ok(hr == S_OK, "ret %08x\n", hr );
3613 hr = IXMLDOMComment_get_text(pComment, &str);
3614 ok(hr == S_OK, "ret %08x\n", hr );
3615 ok( !lstrcmpW( str, _bstr_("This &is a ; test <>\\Append") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
3618 /* test insertData */
3619 str = SysAllocStringLen(NULL, 0);
3620 hr = IXMLDOMComment_insertData(pComment, -1, str);
3621 ok(hr == S_OK, "ret %08x\n", hr );
3623 hr = IXMLDOMComment_insertData(pComment, -1, NULL);
3624 ok(hr == S_OK, "ret %08x\n", hr );
3626 hr = IXMLDOMComment_insertData(pComment, 1000, str);
3627 ok(hr == S_OK, "ret %08x\n", hr );
3629 hr = IXMLDOMComment_insertData(pComment, 1000, NULL);
3630 ok(hr == S_OK, "ret %08x\n", hr );
3632 hr = IXMLDOMComment_insertData(pComment, 0, NULL);
3633 ok(hr == S_OK, "ret %08x\n", hr );
3635 hr = IXMLDOMComment_insertData(pComment, 0, str);
3636 ok(hr == S_OK, "ret %08x\n", hr );
3639 hr = IXMLDOMComment_insertData(pComment, -1, _bstr_("Inserting"));
3640 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
3642 hr = IXMLDOMComment_insertData(pComment, 1000, _bstr_("Inserting"));
3643 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
3645 hr = IXMLDOMComment_insertData(pComment, 0, _bstr_("Begin "));
3646 ok(hr == S_OK, "ret %08x\n", hr );
3648 hr = IXMLDOMComment_insertData(pComment, 17, _bstr_("Middle"));
3649 ok(hr == S_OK, "ret %08x\n", hr );
3651 hr = IXMLDOMComment_insertData(pComment, 39, _bstr_(" End"));
3652 ok(hr == S_OK, "ret %08x\n", hr );
3654 hr = IXMLDOMComment_get_text(pComment, &str);
3655 ok(hr == S_OK, "ret %08x\n", hr );
3656 ok( !lstrcmpW( str, _bstr_("Begin This &is a Middle; test <>\\Append End") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
3660 /* invalid arguments */
3661 hr = IXMLDOMComment_deleteData(pComment, -1, 1);
3662 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
3664 hr = IXMLDOMComment_deleteData(pComment, 0, 0);
3665 ok(hr == S_OK, "ret %08x\n", hr );
3667 hr = IXMLDOMComment_deleteData(pComment, 0, -1);
3668 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
3670 hr = IXMLDOMComment_get_length(pComment, &len);
3671 ok(hr == S_OK, "ret %08x\n", hr );
3672 ok(len == 43, "expected 43 got %d\n", len);
3674 hr = IXMLDOMComment_deleteData(pComment, len, 1);
3675 ok(hr == S_OK, "ret %08x\n", hr );
3677 hr = IXMLDOMComment_deleteData(pComment, len+1, 1);
3678 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
3680 /* delete from start */
3681 hr = IXMLDOMComment_deleteData(pComment, 0, 5);
3682 ok(hr == S_OK, "ret %08x\n", hr );
3684 hr = IXMLDOMComment_get_length(pComment, &len);
3685 ok(hr == S_OK, "ret %08x\n", hr );
3686 ok(len == 38, "expected 38 got %d\n", len);
3688 hr = IXMLDOMComment_get_text(pComment, &str);
3689 ok(hr == S_OK, "ret %08x\n", hr );
3690 ok( !lstrcmpW( str, _bstr_(" This &is a Middle; test <>\\Append End") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
3693 /* delete from end */
3694 hr = IXMLDOMComment_deleteData(pComment, 35, 3);
3695 ok(hr == S_OK, "ret %08x\n", hr );
3697 hr = IXMLDOMComment_get_length(pComment, &len);
3698 ok(hr == S_OK, "ret %08x\n", hr );
3699 ok(len == 35, "expected 35 got %d\n", len);
3701 hr = IXMLDOMComment_get_text(pComment, &str);
3702 ok(hr == S_OK, "ret %08x\n", hr );
3703 ok( !lstrcmpW( str, _bstr_(" This &is a Middle; test <>\\Append ") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
3706 /* delete from inside */
3707 hr = IXMLDOMComment_deleteData(pComment, 1, 33);
3708 ok(hr == S_OK, "ret %08x\n", hr );
3710 hr = IXMLDOMComment_get_length(pComment, &len);
3711 ok(hr == S_OK, "ret %08x\n", hr );
3712 ok(len == 2, "expected 2 got %d\n", len);
3714 hr = IXMLDOMComment_get_text(pComment, &str);
3715 ok(hr == S_OK, "ret %08x\n", hr );
3716 ok( !lstrcmpW( str, _bstr_(" ") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
3719 /* delete whole data ... */
3720 hr = IXMLDOMComment_get_length(pComment, &len);
3721 ok(hr == S_OK, "ret %08x\n", hr );
3723 hr = IXMLDOMComment_deleteData(pComment, 0, len);
3724 ok(hr == S_OK, "ret %08x\n", hr );
3725 /* ... and try again with empty string */
3726 hr = IXMLDOMComment_deleteData(pComment, 0, len);
3727 ok(hr == S_OK, "ret %08x\n", hr );
3729 /* ::replaceData() */
3731 V_BSTR(&v) = SysAllocString(szstr1);
3732 hr = IXMLDOMComment_put_nodeValue(pComment, v);
3733 ok(hr == S_OK, "ret %08x\n", hr );
3736 hr = IXMLDOMComment_replaceData(pComment, 6, 0, NULL);
3737 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
3738 hr = IXMLDOMComment_get_text(pComment, &str);
3739 ok(hr == S_OK, "ret %08x\n", hr );
3740 ok( !lstrcmpW( str, _bstr_("str1") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
3743 hr = IXMLDOMComment_replaceData(pComment, 0, 0, NULL);
3744 ok(hr == S_OK, "ret %08x\n", hr );
3745 hr = IXMLDOMComment_get_text(pComment, &str);
3746 ok(hr == S_OK, "ret %08x\n", hr );
3747 ok( !lstrcmpW( str, _bstr_("str1") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
3750 /* NULL pointer means delete */
3751 hr = IXMLDOMComment_replaceData(pComment, 0, 1, NULL);
3752 ok(hr == S_OK, "ret %08x\n", hr );
3753 hr = IXMLDOMComment_get_text(pComment, &str);
3754 ok(hr == S_OK, "ret %08x\n", hr );
3755 ok( !lstrcmpW( str, _bstr_("tr1") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
3758 /* empty string means delete */
3759 hr = IXMLDOMComment_replaceData(pComment, 0, 1, _bstr_(""));
3760 ok(hr == S_OK, "ret %08x\n", hr );
3761 hr = IXMLDOMComment_get_text(pComment, &str);
3762 ok(hr == S_OK, "ret %08x\n", hr );
3763 ok( !lstrcmpW( str, _bstr_("r1") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
3766 /* zero count means insert */
3767 hr = IXMLDOMComment_replaceData(pComment, 0, 0, _bstr_("a"));
3768 ok(hr == S_OK, "ret %08x\n", hr );
3769 hr = IXMLDOMComment_get_text(pComment, &str);
3770 ok(hr == S_OK, "ret %08x\n", hr );
3771 ok( !lstrcmpW( str, _bstr_("ar1") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
3774 hr = IXMLDOMComment_replaceData(pComment, 0, 2, NULL);
3775 ok(hr == S_OK, "ret %08x\n", hr );
3777 hr = IXMLDOMComment_insertData(pComment, 0, _bstr_("m"));
3778 ok(hr == S_OK, "ret %08x\n", hr );
3779 hr = IXMLDOMComment_get_text(pComment, &str);
3780 ok(hr == S_OK, "ret %08x\n", hr );
3781 ok( !lstrcmpW( str, _bstr_("m1") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
3784 /* nonempty string, count greater than its length */
3785 hr = IXMLDOMComment_replaceData(pComment, 0, 2, _bstr_("a1.2"));
3786 ok(hr == S_OK, "ret %08x\n", hr );
3787 hr = IXMLDOMComment_get_text(pComment, &str);
3788 ok(hr == S_OK, "ret %08x\n", hr );
3789 ok( !lstrcmpW( str, _bstr_("a1.2") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
3792 /* nonempty string, count less than its length */
3793 hr = IXMLDOMComment_replaceData(pComment, 0, 1, _bstr_("wine"));
3794 ok(hr == S_OK, "ret %08x\n", hr );
3795 hr = IXMLDOMComment_get_text(pComment, &str);
3796 ok(hr == S_OK, "ret %08x\n", hr );
3797 ok( !lstrcmpW( str, _bstr_("wine1.2") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
3800 IXMLDOMComment_Release(pComment);
3804 str = SysAllocString(szElement);
3805 hr = IXMLDOMDocument_createElement(doc, str, &pElement);
3807 ok(hr == S_OK, "ret %08x\n", hr );
3810 hr = IXMLDOMElement_appendChild(pRoot, (IXMLDOMNode*)pElement, NULL);
3811 ok(hr == S_OK, "ret %08x\n", hr );
3813 /* test nodeTypeString */
3814 hr = IXMLDOMDocument_get_nodeTypeString(pElement, &str);
3815 ok(hr == S_OK, "ret %08x\n", hr );
3816 ok( !lstrcmpW( str, _bstr_("element") ), "incorrect nodeTypeString string\n");
3819 hr = IXMLDOMElement_get_nodeName(pElement, &str);
3820 ok(hr == S_OK, "ret %08x\n", hr );
3821 ok( !lstrcmpW( str, szElement ), "incorrect element node Name\n");
3824 hr = IXMLDOMElement_get_xml(pElement, &str);
3825 ok(hr == S_OK, "ret %08x\n", hr );
3826 ok( !lstrcmpW( str, szElementXML ), "incorrect element xml\n");
3829 hr = IXMLDOMElement_get_dataType(pElement, &v);
3830 ok(hr == S_FALSE, "ret %08x\n", hr );
3831 ok( V_VT(&v) == VT_NULL, "incorrect dataType type\n");
3835 pAttribute = (IXMLDOMAttribute*)0x1;
3836 hr = IXMLDOMDocument_createAttribute(doc, NULL, &pAttribute);
3837 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
3838 ok(pAttribute == (void*)0x1, "Expect same ptr, got %p\n", pAttribute);
3840 pAttribute = (IXMLDOMAttribute*)0x1;
3841 hr = IXMLDOMDocument_createAttribute(doc, _bstr_(""), &pAttribute);
3842 ok(hr == E_FAIL, "ret %08x\n", hr );
3843 ok(pAttribute == (void*)0x1, "Expect same ptr, got %p\n", pAttribute);
3845 str = SysAllocString(szAttribute);
3846 hr = IXMLDOMDocument_createAttribute(doc, str, &pAttribute);
3848 ok(hr == S_OK, "ret %08x\n", hr );
3851 IXMLDOMNode *pNewChild = (IXMLDOMNode *)0x1;
3853 hr = IXMLDOMAttribute_get_nextSibling(pAttribute, NULL);
3854 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
3856 pNextChild = (IXMLDOMNode *)0x1;
3857 hr = IXMLDOMAttribute_get_nextSibling(pAttribute, &pNextChild);
3858 ok(hr == S_FALSE, "ret %08x\n", hr );
3859 ok(pNextChild == NULL, "pNextChild not NULL\n");
3861 /* test Previous Sibling*/
3862 hr = IXMLDOMAttribute_get_previousSibling(pAttribute, NULL);
3863 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
3865 pNextChild = (IXMLDOMNode *)0x1;
3866 hr = IXMLDOMAttribute_get_previousSibling(pAttribute, &pNextChild);
3867 ok(hr == S_FALSE, "ret %08x\n", hr );
3868 ok(pNextChild == NULL, "pNextChild not NULL\n");
3870 /* test get_attributes */
3871 hr = IXMLDOMAttribute_get_attributes( pAttribute, NULL );
3872 ok( hr == E_INVALIDARG, "get_attributes returned wrong code\n");
3874 pAttribs = (IXMLDOMNamedNodeMap*)0x1;
3875 hr = IXMLDOMAttribute_get_attributes( pAttribute, &pAttribs);
3876 ok(hr == S_FALSE, "ret %08x\n", hr );
3877 ok( pAttribs == NULL, "pAttribs not NULL\n");
3879 hr = IXMLDOMElement_appendChild(pElement, (IXMLDOMNode*)pAttribute, &pNewChild);
3880 ok(hr == E_FAIL, "ret %08x\n", hr );
3881 ok(pNewChild == NULL, "pNewChild not NULL\n");
3883 hr = IXMLDOMElement_get_attributes(pElement, &pAttribs);
3884 ok(hr == S_OK, "ret %08x\n", hr );
3887 hr = IXMLDOMNamedNodeMap_setNamedItem(pAttribs, (IXMLDOMNode*)pAttribute, NULL );
3888 ok(hr == S_OK, "ret %08x\n", hr );
3890 IXMLDOMNamedNodeMap_Release(pAttribs);
3893 hr = IXMLDOMAttribute_get_nodeName(pAttribute, &str);
3894 ok(hr == S_OK, "ret %08x\n", hr );
3895 ok( !lstrcmpW( str, szAttribute ), "incorrect attribute node Name\n");
3898 /* test nodeTypeString */
3899 hr = IXMLDOMAttribute_get_nodeTypeString(pAttribute, &str);
3900 ok(hr == S_OK, "ret %08x\n", hr );
3901 ok( !lstrcmpW( str, _bstr_("attribute") ), "incorrect nodeTypeString string\n");
3905 hr = IXMLDOMAttribute_get_nodeName(pAttribute, &str);
3906 ok(hr == S_OK, "ret %08x\n", hr );
3907 ok( !lstrcmpW( str, szAttribute ), "incorrect nodeName string\n");
3910 /* test name property */
3911 hr = IXMLDOMAttribute_get_name(pAttribute, &str);
3912 ok(hr == S_OK, "ret %08x\n", hr );
3913 ok( !lstrcmpW( str, szAttribute ), "incorrect name string\n");
3916 hr = IXMLDOMAttribute_get_xml(pAttribute, &str);
3917 ok(hr == S_OK, "ret %08x\n", hr );
3918 ok( !lstrcmpW( str, szAttributeXML ), "incorrect attribute xml\n");
3921 hr = IXMLDOMAttribute_get_dataType(pAttribute, &v);
3922 ok(hr == S_FALSE, "ret %08x\n", hr );
3923 ok( V_VT(&v) == VT_NULL, "incorrect dataType type\n");
3926 IXMLDOMAttribute_Release(pAttribute);
3928 /* Check Element again with the Add Attribute*/
3929 hr = IXMLDOMElement_get_xml(pElement, &str);
3930 ok(hr == S_OK, "ret %08x\n", hr );
3931 ok( !lstrcmpW( str, szElementXML2 ), "incorrect element xml\n");
3935 hr = IXMLDOMElement_put_text(pElement, _bstr_("TestingNode"));
3936 ok(hr == S_OK, "ret %08x\n", hr );
3938 hr = IXMLDOMElement_get_xml(pElement, &str);
3939 ok(hr == S_OK, "ret %08x\n", hr );
3940 ok( !lstrcmpW( str, szElementXML3 ), "incorrect element xml\n");
3943 /* Test for reversible escaping */
3944 str = SysAllocString( szStrangeChars );
3945 hr = IXMLDOMElement_put_text(pElement, str);
3946 ok(hr == S_OK, "ret %08x\n", hr );
3947 SysFreeString( str );
3949 hr = IXMLDOMElement_get_xml(pElement, &str);
3950 ok(hr == S_OK, "ret %08x\n", hr );
3951 ok( !lstrcmpW( str, szElementXML4 ), "incorrect element xml\n");
3954 hr = IXMLDOMElement_get_text(pElement, &str);
3955 ok(hr == S_OK, "ret %08x\n", hr );
3956 ok( !lstrcmpW( str, szStrangeChars ), "incorrect element text\n");
3959 IXMLDOMElement_Release(pElement);
3963 str = SysAllocString(szCData);
3964 hr = IXMLDOMDocument_createCDATASection(doc, str, NULL);
3965 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
3967 hr = IXMLDOMDocument_createCDATASection(doc, str, &pCDataSec);
3969 ok(hr == S_OK, "ret %08x\n", hr );
3972 IXMLDOMNode *pNextChild = (IXMLDOMNode *)0x1;
3977 hr = IXMLDOMCDATASection_QueryInterface(pCDataSec, &IID_IXMLDOMElement, (void**)&pElement);
3978 ok(hr == E_NOINTERFACE, "ret %08x\n", hr);
3980 hr = IXMLDOMElement_appendChild(pRoot, (IXMLDOMNode*)pCDataSec, NULL);
3981 ok(hr == S_OK, "ret %08x\n", hr );
3983 /* get Attribute Tests */
3984 hr = IXMLDOMCDATASection_get_attributes(pCDataSec, NULL);
3985 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
3987 pAttribs = (IXMLDOMNamedNodeMap*)0x1;
3988 hr = IXMLDOMCDATASection_get_attributes(pCDataSec, &pAttribs);
3989 ok(hr == S_FALSE, "ret %08x\n", hr );
3990 ok(pAttribs == NULL, "pAttribs != NULL\n");
3992 hr = IXMLDOMCDATASection_get_nodeName(pCDataSec, &str);
3993 ok(hr == S_OK, "ret %08x\n", hr );
3994 ok( !lstrcmpW( str, szCDataNodeText ), "incorrect cdata node Name\n");
3997 hr = IXMLDOMCDATASection_get_xml(pCDataSec, &str);
3998 ok(hr == S_OK, "ret %08x\n", hr );
3999 ok( !lstrcmpW( str, szCDataXML ), "incorrect cdata xml\n");
4002 /* test lastChild */
4003 pNextChild = (IXMLDOMNode*)0x1;
4004 hr = IXMLDOMCDATASection_get_lastChild(pCDataSec, &pNextChild);
4005 ok(hr == S_FALSE, "ret %08x\n", hr );
4006 ok(pNextChild == NULL, "pNextChild not NULL\n");
4008 /* test get_dataType */
4009 hr = IXMLDOMCDATASection_get_dataType(pCDataSec, NULL);
4010 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
4012 hr = IXMLDOMCDATASection_get_dataType(pCDataSec, &v);
4013 ok(hr == S_FALSE, "ret %08x\n", hr );
4014 ok( V_VT(&v) == VT_NULL, "incorrect dataType type\n");
4017 /* test nodeTypeString */
4018 hr = IXMLDOMCDATASection_get_nodeTypeString(pCDataSec, &str);
4019 ok(hr == S_OK, "ret %08x\n", hr );
4020 ok( !lstrcmpW( str, _bstr_("cdatasection") ), "incorrect nodeTypeString string\n");
4023 /* put data Tests */
4024 hr = IXMLDOMCDATASection_put_data(pCDataSec, _bstr_("This &is a ; test <>\\"));
4025 ok(hr == S_OK, "ret %08x\n", hr );
4027 /* Confirm XML text is good */
4028 hr = IXMLDOMCDATASection_get_xml(pCDataSec, &str);
4029 ok(hr == S_OK, "ret %08x\n", hr );
4030 ok( !lstrcmpW( str, _bstr_("<![CDATA[This &is a ; test <>\\]]>") ), "incorrect xml string\n");
4033 /* Confirm we get the put_data Text back */
4034 hr = IXMLDOMCDATASection_get_text(pCDataSec, &str);
4035 ok(hr == S_OK, "ret %08x\n", hr );
4036 ok( !lstrcmpW( str, _bstr_("This &is a ; test <>\\") ), "incorrect text string\n");
4039 /* test length property */
4040 hr = IXMLDOMCDATASection_get_length(pCDataSec, &len);
4041 ok(hr == S_OK, "ret %08x\n", hr );
4042 ok(len == 21, "expected 21 got %d\n", len);
4044 /* test get nodeValue */
4045 hr = IXMLDOMCDATASection_get_nodeValue(pCDataSec, &var);
4046 ok(hr == S_OK, "ret %08x\n", hr );
4047 ok(V_VT(&var) == VT_BSTR, "got vt %04x\n", V_VT(&var));
4048 ok( !lstrcmpW( V_BSTR(&var), _bstr_("This &is a ; test <>\\") ), "incorrect text string\n");
4052 hr = IXMLDOMCDATASection_get_data(pCDataSec, &str);
4053 ok(hr == S_OK, "ret %08x\n", hr );
4054 ok( !lstrcmpW( str, _bstr_("This &is a ; test <>\\") ), "incorrect text string\n");
4057 /* test substringData */
4058 hr = IXMLDOMCDATASection_substringData(pCDataSec, 0, 4, NULL);
4059 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
4061 /* test substringData - Invalid offset */
4062 str = (BSTR)&szElement;
4063 hr = IXMLDOMCDATASection_substringData(pCDataSec, -1, 4, &str);
4064 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
4065 ok( str == NULL, "incorrect string\n");
4067 /* test substringData - Invalid offset */
4068 str = (BSTR)&szElement;
4069 hr = IXMLDOMCDATASection_substringData(pCDataSec, 30, 0, &str);
4070 ok(hr == S_FALSE, "ret %08x\n", hr );
4071 ok( str == NULL, "incorrect string\n");
4073 /* test substringData - Invalid size */
4074 str = (BSTR)&szElement;
4075 hr = IXMLDOMCDATASection_substringData(pCDataSec, 0, -1, &str);
4076 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
4077 ok( str == NULL, "incorrect string\n");
4079 /* test substringData - Invalid size */
4080 str = (BSTR)&szElement;
4081 hr = IXMLDOMCDATASection_substringData(pCDataSec, 2, 0, &str);
4082 ok(hr == S_FALSE, "ret %08x\n", hr );
4083 ok( str == NULL, "incorrect string\n");
4085 /* test substringData - Start of string */
4086 hr = IXMLDOMCDATASection_substringData(pCDataSec, 0, 4, &str);
4087 ok(hr == S_OK, "ret %08x\n", hr );
4088 ok( !lstrcmpW( str, _bstr_("This") ), "incorrect substringData string\n");
4091 /* test substringData - Middle of string */
4092 hr = IXMLDOMCDATASection_substringData(pCDataSec, 13, 4, &str);
4093 ok(hr == S_OK, "ret %08x\n", hr );
4094 ok( !lstrcmpW( str, _bstr_("test") ), "incorrect substringData string\n");
4097 /* test substringData - End of string */
4098 hr = IXMLDOMCDATASection_substringData(pCDataSec, 20, 4, &str);
4099 ok(hr == S_OK, "ret %08x\n", hr );
4100 ok( !lstrcmpW( str, _bstr_("\\") ), "incorrect substringData string\n");
4103 /* test appendData */
4104 hr = IXMLDOMCDATASection_appendData(pCDataSec, NULL);
4105 ok(hr == S_OK, "ret %08x\n", hr );
4107 hr = IXMLDOMCDATASection_appendData(pCDataSec, _bstr_(""));
4108 ok(hr == S_OK, "ret %08x\n", hr );
4110 hr = IXMLDOMCDATASection_appendData(pCDataSec, _bstr_("Append"));
4111 ok(hr == S_OK, "ret %08x\n", hr );
4113 hr = IXMLDOMCDATASection_get_text(pCDataSec, &str);
4114 ok(hr == S_OK, "ret %08x\n", hr );
4115 ok( !lstrcmpW( str, _bstr_("This &is a ; test <>\\Append") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
4118 /* test insertData */
4119 str = SysAllocStringLen(NULL, 0);
4120 hr = IXMLDOMCDATASection_insertData(pCDataSec, -1, str);
4121 ok(hr == S_OK, "ret %08x\n", hr );
4123 hr = IXMLDOMCDATASection_insertData(pCDataSec, -1, NULL);
4124 ok(hr == S_OK, "ret %08x\n", hr );
4126 hr = IXMLDOMCDATASection_insertData(pCDataSec, 1000, str);
4127 ok(hr == S_OK, "ret %08x\n", hr );
4129 hr = IXMLDOMCDATASection_insertData(pCDataSec, 1000, NULL);
4130 ok(hr == S_OK, "ret %08x\n", hr );
4132 hr = IXMLDOMCDATASection_insertData(pCDataSec, 0, NULL);
4133 ok(hr == S_OK, "ret %08x\n", hr );
4135 hr = IXMLDOMCDATASection_insertData(pCDataSec, 0, str);
4136 ok(hr == S_OK, "ret %08x\n", hr );
4139 hr = IXMLDOMCDATASection_insertData(pCDataSec, -1, _bstr_("Inserting"));
4140 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
4142 hr = IXMLDOMCDATASection_insertData(pCDataSec, 1000, _bstr_("Inserting"));
4143 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
4145 hr = IXMLDOMCDATASection_insertData(pCDataSec, 0, _bstr_("Begin "));
4146 ok(hr == S_OK, "ret %08x\n", hr );
4148 hr = IXMLDOMCDATASection_insertData(pCDataSec, 17, _bstr_("Middle"));
4149 ok(hr == S_OK, "ret %08x\n", hr );
4151 hr = IXMLDOMCDATASection_insertData(pCDataSec, 39, _bstr_(" End"));
4152 ok(hr == S_OK, "ret %08x\n", hr );
4154 hr = IXMLDOMCDATASection_get_text(pCDataSec, &str);
4155 ok(hr == S_OK, "ret %08x\n", hr );
4156 ok( !lstrcmpW( str, _bstr_("Begin This &is a Middle; test <>\\Append End") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
4160 /* invalid arguments */
4161 hr = IXMLDOMCDATASection_deleteData(pCDataSec, -1, 1);
4162 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
4164 hr = IXMLDOMCDATASection_deleteData(pCDataSec, 0, 0);
4165 ok(hr == S_OK, "ret %08x\n", hr );
4167 hr = IXMLDOMCDATASection_deleteData(pCDataSec, 0, -1);
4168 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
4170 hr = IXMLDOMCDATASection_get_length(pCDataSec, &len);
4171 ok(hr == S_OK, "ret %08x\n", hr );
4172 ok(len == 43, "expected 43 got %d\n", len);
4174 hr = IXMLDOMCDATASection_deleteData(pCDataSec, len, 1);
4175 ok(hr == S_OK, "ret %08x\n", hr );
4177 hr = IXMLDOMCDATASection_deleteData(pCDataSec, len+1, 1);
4178 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
4180 /* delete from start */
4181 hr = IXMLDOMCDATASection_deleteData(pCDataSec, 0, 5);
4182 ok(hr == S_OK, "ret %08x\n", hr );
4184 hr = IXMLDOMCDATASection_get_length(pCDataSec, &len);
4185 ok(hr == S_OK, "ret %08x\n", hr );
4186 ok(len == 38, "expected 38 got %d\n", len);
4188 hr = IXMLDOMCDATASection_get_text(pCDataSec, &str);
4189 ok(hr == S_OK, "ret %08x\n", hr );
4190 ok( !lstrcmpW( str, _bstr_(" This &is a Middle; test <>\\Append End") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
4193 /* delete from end */
4194 hr = IXMLDOMCDATASection_deleteData(pCDataSec, 35, 3);
4195 ok(hr == S_OK, "ret %08x\n", hr );
4197 hr = IXMLDOMCDATASection_get_length(pCDataSec, &len);
4198 ok(hr == S_OK, "ret %08x\n", hr );
4199 ok(len == 35, "expected 35 got %d\n", len);
4201 hr = IXMLDOMCDATASection_get_text(pCDataSec, &str);
4202 ok(hr == S_OK, "ret %08x\n", hr );
4203 ok( !lstrcmpW( str, _bstr_(" This &is a Middle; test <>\\Append ") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
4206 /* delete from inside */
4207 hr = IXMLDOMCDATASection_deleteData(pCDataSec, 1, 33);
4208 ok(hr == S_OK, "ret %08x\n", hr );
4210 hr = IXMLDOMCDATASection_get_length(pCDataSec, &len);
4211 ok(hr == S_OK, "ret %08x\n", hr );
4212 ok(len == 2, "expected 2 got %d\n", len);
4214 hr = IXMLDOMCDATASection_get_text(pCDataSec, &str);
4215 ok(hr == S_OK, "ret %08x\n", hr );
4216 ok( !lstrcmpW( str, _bstr_(" ") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
4219 /* delete whole data ... */
4220 hr = IXMLDOMCDATASection_get_length(pCDataSec, &len);
4221 ok(hr == S_OK, "ret %08x\n", hr );
4223 hr = IXMLDOMCDATASection_deleteData(pCDataSec, 0, len);
4224 ok(hr == S_OK, "ret %08x\n", hr );
4226 /* ... and try again with empty string */
4227 hr = IXMLDOMCDATASection_deleteData(pCDataSec, 0, len);
4228 ok(hr == S_OK, "ret %08x\n", hr );
4230 /* ::replaceData() */
4232 V_BSTR(&v) = SysAllocString(szstr1);
4233 hr = IXMLDOMCDATASection_put_nodeValue(pCDataSec, v);
4234 ok(hr == S_OK, "ret %08x\n", hr );
4237 hr = IXMLDOMCDATASection_replaceData(pCDataSec, 6, 0, NULL);
4238 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
4239 hr = IXMLDOMCDATASection_get_text(pCDataSec, &str);
4240 ok(hr == S_OK, "ret %08x\n", hr );
4241 ok( !lstrcmpW( str, _bstr_("str1") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
4244 hr = IXMLDOMCDATASection_replaceData(pCDataSec, 0, 0, NULL);
4245 ok(hr == S_OK, "ret %08x\n", hr );
4246 hr = IXMLDOMCDATASection_get_text(pCDataSec, &str);
4247 ok(hr == S_OK, "ret %08x\n", hr );
4248 ok( !lstrcmpW( str, _bstr_("str1") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
4251 /* NULL pointer means delete */
4252 hr = IXMLDOMCDATASection_replaceData(pCDataSec, 0, 1, NULL);
4253 ok(hr == S_OK, "ret %08x\n", hr );
4254 hr = IXMLDOMCDATASection_get_text(pCDataSec, &str);
4255 ok(hr == S_OK, "ret %08x\n", hr );
4256 ok( !lstrcmpW( str, _bstr_("tr1") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
4259 /* empty string means delete */
4260 hr = IXMLDOMCDATASection_replaceData(pCDataSec, 0, 1, _bstr_(""));
4261 ok(hr == S_OK, "ret %08x\n", hr );
4262 hr = IXMLDOMCDATASection_get_text(pCDataSec, &str);
4263 ok(hr == S_OK, "ret %08x\n", hr );
4264 ok( !lstrcmpW( str, _bstr_("r1") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
4267 /* zero count means insert */
4268 hr = IXMLDOMCDATASection_replaceData(pCDataSec, 0, 0, _bstr_("a"));
4269 ok(hr == S_OK, "ret %08x\n", hr );
4270 hr = IXMLDOMCDATASection_get_text(pCDataSec, &str);
4271 ok(hr == S_OK, "ret %08x\n", hr );
4272 ok( !lstrcmpW( str, _bstr_("ar1") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
4275 hr = IXMLDOMCDATASection_replaceData(pCDataSec, 0, 2, NULL);
4276 ok(hr == S_OK, "ret %08x\n", hr );
4278 hr = IXMLDOMCDATASection_insertData(pCDataSec, 0, _bstr_("m"));
4279 ok(hr == S_OK, "ret %08x\n", hr );
4280 hr = IXMLDOMCDATASection_get_text(pCDataSec, &str);
4281 ok(hr == S_OK, "ret %08x\n", hr );
4282 ok( !lstrcmpW( str, _bstr_("m1") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
4285 /* nonempty string, count greater than its length */
4286 hr = IXMLDOMCDATASection_replaceData(pCDataSec, 0, 2, _bstr_("a1.2"));
4287 ok(hr == S_OK, "ret %08x\n", hr );
4288 hr = IXMLDOMCDATASection_get_text(pCDataSec, &str);
4289 ok(hr == S_OK, "ret %08x\n", hr );
4290 ok( !lstrcmpW( str, _bstr_("a1.2") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
4293 /* nonempty string, count less than its length */
4294 hr = IXMLDOMCDATASection_replaceData(pCDataSec, 0, 1, _bstr_("wine"));
4295 ok(hr == S_OK, "ret %08x\n", hr );
4296 hr = IXMLDOMCDATASection_get_text(pCDataSec, &str);
4297 ok(hr == S_OK, "ret %08x\n", hr );
4298 ok( !lstrcmpW( str, _bstr_("wine1.2") ), "incorrect get_text string, got '%s'\n", wine_dbgstr_w(str) );
4301 IXMLDOMCDATASection_Release(pCDataSec);
4304 /* Document Fragments */
4305 hr = IXMLDOMDocument_createDocumentFragment(doc, NULL);
4306 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
4308 hr = IXMLDOMDocument_createDocumentFragment(doc, &pDocFrag);
4309 ok(hr == S_OK, "ret %08x\n", hr );
4314 hr = IXMLDOMDocumentFragment_get_parentNode(pDocFrag, NULL);
4315 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
4317 node = (IXMLDOMNode *)0x1;
4318 hr = IXMLDOMDocumentFragment_get_parentNode(pDocFrag, &node);
4319 ok(hr == S_FALSE, "ret %08x\n", hr );
4320 ok(node == NULL, "expected NULL, got %p\n", node);
4322 hr = IXMLDOMElement_appendChild(pRoot, (IXMLDOMNode*)pDocFrag, NULL);
4323 ok(hr == S_OK, "ret %08x\n", hr );
4325 /* get Attribute Tests */
4326 hr = IXMLDOMDocumentFragment_get_attributes(pDocFrag, NULL);
4327 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
4329 pAttribs = (IXMLDOMNamedNodeMap*)0x1;
4330 hr = IXMLDOMDocumentFragment_get_attributes(pDocFrag, &pAttribs);
4331 ok(hr == S_FALSE, "ret %08x\n", hr );
4332 ok(pAttribs == NULL, "pAttribs != NULL\n");
4334 hr = IXMLDOMDocumentFragment_get_nodeName(pDocFrag, &str);
4335 ok(hr == S_OK, "ret %08x\n", hr );
4336 ok( !lstrcmpW( str, szDocFragmentText ), "incorrect docfragment node Name\n");
4339 /* test next Sibling*/
4340 hr = IXMLDOMDocumentFragment_get_nextSibling(pDocFrag, NULL);
4341 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
4343 node = (IXMLDOMNode *)0x1;
4344 hr = IXMLDOMDocumentFragment_get_nextSibling(pDocFrag, &node);
4345 ok(hr == S_FALSE, "ret %08x\n", hr );
4346 ok(node == NULL, "next sibling not NULL\n");
4348 /* test Previous Sibling*/
4349 hr = IXMLDOMDocumentFragment_get_previousSibling(pDocFrag, NULL);
4350 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
4352 node = (IXMLDOMNode *)0x1;
4353 hr = IXMLDOMDocumentFragment_get_previousSibling(pDocFrag, &node);
4354 ok(hr == S_FALSE, "ret %08x\n", hr );
4355 ok(node == NULL, "previous sibling not NULL\n");
4357 /* test get_dataType */
4358 hr = IXMLDOMDocumentFragment_get_dataType(pDocFrag, NULL);
4359 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
4361 hr = IXMLDOMDocumentFragment_get_dataType(pDocFrag, &v);
4362 ok(hr == S_FALSE, "ret %08x\n", hr );
4363 ok( V_VT(&v) == VT_NULL, "incorrect dataType type\n");
4366 /* test nodeTypeString */
4367 hr = IXMLDOMDocumentFragment_get_nodeTypeString(pDocFrag, &str);
4368 ok(hr == S_OK, "ret %08x\n", hr );
4369 ok( !lstrcmpW( str, _bstr_("documentfragment") ), "incorrect nodeTypeString string\n");
4372 IXMLDOMDocumentFragment_Release(pDocFrag);
4375 /* Entity References */
4376 hr = IXMLDOMDocument_createEntityReference(doc, NULL, &pEntityRef);
4377 ok(hr == E_FAIL, "ret %08x\n", hr );
4378 hr = IXMLDOMDocument_createEntityReference(doc, _bstr_(""), &pEntityRef);
4379 ok(hr == E_FAIL, "ret %08x\n", hr );
4381 str = SysAllocString(szEntityRef);
4382 hr = IXMLDOMDocument_createEntityReference(doc, str, NULL);
4383 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
4385 hr = IXMLDOMDocument_createEntityReference(doc, str, &pEntityRef);
4387 ok(hr == S_OK, "ret %08x\n", hr );
4390 hr = IXMLDOMElement_appendChild(pRoot, (IXMLDOMNode*)pEntityRef, NULL);
4391 ok(hr == S_OK, "ret %08x\n", hr );
4393 /* get Attribute Tests */
4394 hr = IXMLDOMEntityReference_get_attributes(pEntityRef, NULL);
4395 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
4397 pAttribs = (IXMLDOMNamedNodeMap*)0x1;
4398 hr = IXMLDOMEntityReference_get_attributes(pEntityRef, &pAttribs);
4399 ok(hr == S_FALSE, "ret %08x\n", hr );
4400 ok(pAttribs == NULL, "pAttribs != NULL\n");
4403 hr = IXMLDOMEntityReference_get_dataType(pEntityRef, &v);
4404 ok(hr == S_FALSE, "ret %08x\n", hr );
4405 ok( V_VT(&v) == VT_NULL, "incorrect dataType type\n");
4408 /* test nodeTypeString */
4409 hr = IXMLDOMEntityReference_get_nodeTypeString(pEntityRef, &str);
4410 ok(hr == S_OK, "ret %08x\n", hr );
4411 ok( !lstrcmpW( str, _bstr_("entityreference") ), "incorrect nodeTypeString string\n");
4415 hr = IXMLDOMEntityReference_get_xml(pEntityRef, &str);
4416 ok(hr == S_OK, "ret %08x\n", hr );
4417 ok( !lstrcmpW( str, szEntityRefXML ), "incorrect xml string\n");
4420 IXMLDOMEntityReference_Release(pEntityRef);
4423 IXMLDOMElement_Release( pRoot );
4427 IXMLDOMDocument_Release(doc);
4432 static void test_nodeTypeTests( void )
4434 IXMLDOMDocument *doc = NULL;
4435 IXMLDOMElement *pRoot;
4436 IXMLDOMElement *pElement;
4439 doc = create_document(&IID_IXMLDOMDocument);
4442 hr = IXMLDOMDocument_createElement(doc, _bstr_("Testing"), NULL);
4443 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
4445 hr = IXMLDOMDocument_createElement(doc, _bstr_("Testing"), &pRoot);
4446 ok(hr == S_OK, "ret %08x\n", hr );
4449 hr = IXMLDOMDocument_appendChild(doc, (IXMLDOMNode*)pRoot, NULL);
4450 ok(hr == S_OK, "ret %08x\n", hr );
4453 hr = IXMLDOMElement_put_dataType(pRoot, NULL);
4454 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
4457 hr = IXMLDOMElement_put_dataType(pRoot, _bstr_("abcdefg") );
4458 ok(hr == E_FAIL, "ret %08x\n", hr );
4461 * The name passed into put_dataType is case-insensitive. So many of the names
4462 * have been changed to reflect this.
4465 hr = IXMLDOMDocument_createElement(doc, _bstr_("Testing_Boolean"), &pElement);
4466 ok(hr == S_OK, "ret %08x\n", hr );
4469 IXMLDOMElement_appendChild(pRoot, (IXMLDOMNode*)pElement, NULL);
4471 hr = IXMLDOMElement_put_dataType(pElement, _bstr_("Boolean") );
4472 ok(hr == S_OK, "ret %08x\n", hr );
4474 IXMLDOMElement_Release(pElement);
4478 hr = IXMLDOMDocument_createElement(doc, _bstr_("Testing_String"), &pElement);
4479 ok(hr == S_OK, "ret %08x\n", hr );
4482 IXMLDOMElement_appendChild(pRoot, (IXMLDOMNode*)pElement, NULL);
4484 hr = IXMLDOMElement_put_dataType(pElement, _bstr_("String") );
4485 ok(hr == S_OK, "ret %08x\n", hr );
4487 IXMLDOMElement_Release(pElement);
4491 hr = IXMLDOMDocument_createElement(doc, _bstr_("Testing_Number"), &pElement);
4492 ok(hr == S_OK, "ret %08x\n", hr );
4495 IXMLDOMElement_appendChild(pRoot, (IXMLDOMNode*)pElement, NULL);
4497 hr = IXMLDOMElement_put_dataType(pElement, _bstr_("number") );
4498 ok(hr == S_OK, "ret %08x\n", hr );
4500 IXMLDOMElement_Release(pElement);
4504 hr = IXMLDOMDocument_createElement(doc, _bstr_("Testing_Int"), &pElement);
4505 ok(hr == S_OK, "ret %08x\n", hr );
4508 IXMLDOMElement_appendChild(pRoot, (IXMLDOMNode*)pElement, NULL);
4510 hr = IXMLDOMElement_put_dataType(pElement, _bstr_("InT") );
4511 ok(hr == S_OK, "ret %08x\n", hr );
4513 IXMLDOMElement_Release(pElement);
4517 hr = IXMLDOMDocument_createElement(doc, _bstr_("Testing_Fixed"), &pElement);
4518 ok(hr == S_OK, "ret %08x\n", hr );
4521 IXMLDOMElement_appendChild(pRoot, (IXMLDOMNode*)pElement, NULL);
4523 hr = IXMLDOMElement_put_dataType(pElement, _bstr_("fixed.14.4") );
4524 ok(hr == S_OK, "ret %08x\n", hr );
4526 IXMLDOMElement_Release(pElement);
4530 hr = IXMLDOMDocument_createElement(doc, _bstr_("Testing_DateTime"), &pElement);
4531 ok(hr == S_OK, "ret %08x\n", hr );
4534 IXMLDOMElement_appendChild(pRoot, (IXMLDOMNode*)pElement, NULL);
4536 hr = IXMLDOMElement_put_dataType(pElement, _bstr_("DateTime") );
4537 ok(hr == S_OK, "ret %08x\n", hr );
4539 IXMLDOMElement_Release(pElement);
4543 hr = IXMLDOMDocument_createElement(doc, _bstr_("Testing_DateTime_tz"), &pElement);
4544 ok(hr == S_OK, "ret %08x\n", hr );
4547 IXMLDOMElement_appendChild(pRoot, (IXMLDOMNode*)pElement, NULL);
4549 hr = IXMLDOMElement_put_dataType(pElement, _bstr_("DateTime.tz") );
4550 ok(hr == S_OK, "ret %08x\n", hr );
4552 IXMLDOMElement_Release(pElement);
4556 hr = IXMLDOMDocument_createElement(doc, _bstr_("Testing_Date"), &pElement);
4557 ok(hr == S_OK, "ret %08x\n", hr );
4560 IXMLDOMElement_appendChild(pRoot, (IXMLDOMNode*)pElement, NULL);
4562 hr = IXMLDOMElement_put_dataType(pElement, _bstr_("Date") );
4563 ok(hr == S_OK, "ret %08x\n", hr );
4565 IXMLDOMElement_Release(pElement);
4569 hr = IXMLDOMDocument_createElement(doc, _bstr_("Testing_Time"), &pElement);
4570 ok(hr == S_OK, "ret %08x\n", hr );
4573 IXMLDOMElement_appendChild(pRoot, (IXMLDOMNode*)pElement, NULL);
4575 hr = IXMLDOMElement_put_dataType(pElement, _bstr_("Time") );
4576 ok(hr == S_OK, "ret %08x\n", hr );
4578 IXMLDOMElement_Release(pElement);
4582 hr = IXMLDOMDocument_createElement(doc, _bstr_("Testing_Time_TZ"), &pElement);
4583 ok(hr == S_OK, "ret %08x\n", hr );
4586 IXMLDOMElement_appendChild(pRoot, (IXMLDOMNode*)pElement, NULL);
4588 hr = IXMLDOMElement_put_dataType(pElement, _bstr_("Time.tz") );
4589 ok(hr == S_OK, "ret %08x\n", hr );
4591 IXMLDOMElement_Release(pElement);
4595 hr = IXMLDOMDocument_createElement(doc, _bstr_("Testing_I1"), &pElement);
4596 ok(hr == S_OK, "ret %08x\n", hr );
4599 IXMLDOMElement_appendChild(pRoot, (IXMLDOMNode*)pElement, NULL);
4601 hr = IXMLDOMElement_put_dataType(pElement, _bstr_("I1") );
4602 ok(hr == S_OK, "ret %08x\n", hr );
4604 IXMLDOMElement_Release(pElement);
4608 hr = IXMLDOMDocument_createElement(doc, _bstr_("Testing_I2"), &pElement);
4609 ok(hr == S_OK, "ret %08x\n", hr );
4612 IXMLDOMElement_appendChild(pRoot, (IXMLDOMNode*)pElement, NULL);
4614 hr = IXMLDOMElement_put_dataType(pElement, _bstr_("I2") );
4615 ok(hr == S_OK, "ret %08x\n", hr );
4617 IXMLDOMElement_Release(pElement);
4621 hr = IXMLDOMDocument_createElement(doc, _bstr_("Testing_I4"), &pElement);
4622 ok(hr == S_OK, "ret %08x\n", hr );
4625 IXMLDOMElement_appendChild(pRoot, (IXMLDOMNode*)pElement, NULL);
4627 hr = IXMLDOMElement_put_dataType(pElement, _bstr_("I4") );
4628 ok(hr == S_OK, "ret %08x\n", hr );
4630 IXMLDOMElement_Release(pElement);
4634 hr = IXMLDOMDocument_createElement(doc, _bstr_("Testing_UI1"), &pElement);
4635 ok(hr == S_OK, "ret %08x\n", hr );
4638 IXMLDOMElement_appendChild(pRoot, (IXMLDOMNode*)pElement, NULL);
4640 hr = IXMLDOMElement_put_dataType(pElement, _bstr_("UI1") );
4641 ok(hr == S_OK, "ret %08x\n", hr );
4643 IXMLDOMElement_Release(pElement);
4647 hr = IXMLDOMDocument_createElement(doc, _bstr_("Testing_UI2"), &pElement);
4648 ok(hr == S_OK, "ret %08x\n", hr );
4651 IXMLDOMElement_appendChild(pRoot, (IXMLDOMNode*)pElement, NULL);
4653 hr = IXMLDOMElement_put_dataType(pElement, _bstr_("UI2") );
4654 ok(hr == S_OK, "ret %08x\n", hr );
4656 IXMLDOMElement_Release(pElement);
4660 hr = IXMLDOMDocument_createElement(doc, _bstr_("Testing_UI4"), &pElement);
4661 ok(hr == S_OK, "ret %08x\n", hr );
4664 IXMLDOMElement_appendChild(pRoot, (IXMLDOMNode*)pElement, NULL);
4666 hr = IXMLDOMElement_put_dataType(pElement, _bstr_("UI4") );
4667 ok(hr == S_OK, "ret %08x\n", hr );
4669 IXMLDOMElement_Release(pElement);
4673 hr = IXMLDOMDocument_createElement(doc, _bstr_("Testing_r4"), &pElement);
4674 ok(hr == S_OK, "ret %08x\n", hr );
4677 IXMLDOMElement_appendChild(pRoot, (IXMLDOMNode*)pElement, NULL);
4679 hr = IXMLDOMElement_put_dataType(pElement, _bstr_("r4") );
4680 ok(hr == S_OK, "ret %08x\n", hr );
4682 IXMLDOMElement_Release(pElement);
4686 hr = IXMLDOMDocument_createElement(doc, _bstr_("Testing_r8"), &pElement);
4687 ok(hr == S_OK, "ret %08x\n", hr );
4690 IXMLDOMElement_appendChild(pRoot, (IXMLDOMNode*)pElement, NULL);
4692 hr = IXMLDOMElement_put_dataType(pElement, _bstr_("r8") );
4693 ok(hr == S_OK, "ret %08x\n", hr );
4695 IXMLDOMElement_Release(pElement);
4699 hr = IXMLDOMDocument_createElement(doc, _bstr_("Testing_float"), &pElement);
4700 ok(hr == S_OK, "ret %08x\n", hr );
4703 IXMLDOMElement_appendChild(pRoot, (IXMLDOMNode*)pElement, NULL);
4705 hr = IXMLDOMElement_put_dataType(pElement, _bstr_("float") );
4706 ok(hr == S_OK, "ret %08x\n", hr );
4708 IXMLDOMElement_Release(pElement);
4712 hr = IXMLDOMDocument_createElement(doc, _bstr_("Testing_uuid"), &pElement);
4713 ok(hr == S_OK, "ret %08x\n", hr );
4716 IXMLDOMElement_appendChild(pRoot, (IXMLDOMNode*)pElement, NULL);
4718 hr = IXMLDOMElement_put_dataType(pElement, _bstr_("UuId") );
4719 ok(hr == S_OK, "ret %08x\n", hr );
4721 IXMLDOMElement_Release(pElement);
4725 hr = IXMLDOMDocument_createElement(doc, _bstr_("Testing_bin_hex"), &pElement);
4726 ok(hr == S_OK, "ret %08x\n", hr );
4729 IXMLDOMElement_appendChild(pRoot, (IXMLDOMNode*)pElement, NULL);
4731 hr = IXMLDOMElement_put_dataType(pElement, _bstr_("bin.hex") );
4732 ok(hr == S_OK, "ret %08x\n", hr );
4734 IXMLDOMElement_Release(pElement);
4738 hr = IXMLDOMDocument_createElement(doc, _bstr_("Testing_bin_base64"), &pElement);
4739 ok(hr == S_OK, "ret %08x\n", hr );
4742 IXMLDOMElement_appendChild(pRoot, (IXMLDOMNode*)pElement, NULL);
4744 hr = IXMLDOMElement_put_dataType(pElement, _bstr_("bin.base64") );
4745 ok(hr == S_OK, "ret %08x\n", hr );
4747 IXMLDOMElement_Release(pElement);
4750 /* Check changing types */
4751 hr = IXMLDOMDocument_createElement(doc, _bstr_("Testing_Change"), &pElement);
4752 ok(hr == S_OK, "ret %08x\n", hr );
4755 IXMLDOMElement_appendChild(pRoot, (IXMLDOMNode*)pElement, NULL);
4757 hr = IXMLDOMElement_put_dataType(pElement, _bstr_("DateTime.tz") );
4758 ok(hr == S_OK, "ret %08x\n", hr );
4760 hr = IXMLDOMElement_put_dataType(pElement, _bstr_("string") );
4761 ok(hr == S_OK, "ret %08x\n", hr );
4763 IXMLDOMElement_Release(pElement);
4766 IXMLDOMElement_Release(pRoot);
4770 IXMLDOMDocument_Release(doc);
4775 static void test_DocumentSaveToDocument(void)
4777 IXMLDOMDocument *doc, *doc2;
4778 IXMLDOMElement *pRoot;
4781 doc = create_document(&IID_IXMLDOMDocument);
4784 doc2 = create_document(&IID_IXMLDOMDocument);
4787 IXMLDOMDocument_Release(doc);
4791 hr = IXMLDOMDocument_createElement(doc, _bstr_("Testing"), &pRoot);
4792 ok(hr == S_OK, "ret %08x\n", hr );
4795 hr = IXMLDOMDocument_appendChild(doc, (IXMLDOMNode*)pRoot, NULL);
4796 ok(hr == S_OK, "ret %08x\n", hr );
4803 V_VT(&vDoc) = VT_UNKNOWN;
4804 V_UNKNOWN(&vDoc) = (IUnknown*)doc2;
4806 hr = IXMLDOMDocument_save(doc, vDoc);
4807 ok(hr == S_OK, "ret %08x\n", hr );
4809 hr = IXMLDOMDocument_get_xml(doc, &sOrig);
4810 ok(hr == S_OK, "ret %08x\n", hr );
4812 hr = IXMLDOMDocument_get_xml(doc2, &sNew);
4813 ok(hr == S_OK, "ret %08x\n", hr );
4815 ok( !lstrcmpW( sOrig, sNew ), "New document is not the same as origial\n");
4817 SysFreeString(sOrig);
4818 SysFreeString(sNew);
4822 IXMLDOMDocument_Release(doc2);
4823 IXMLDOMDocument_Release(doc);
4826 static void test_DocumentSaveToFile(void)
4828 IXMLDOMDocument *doc;
4829 IXMLDOMElement *pRoot;
4835 doc = create_document(&IID_IXMLDOMDocument);
4838 hr = IXMLDOMDocument_createElement(doc, _bstr_("Testing"), &pRoot);
4839 ok(hr == S_OK, "ret %08x\n", hr );
4842 hr = IXMLDOMDocument_appendChild(doc, (IXMLDOMNode*)pRoot, NULL);
4843 ok(hr == S_OK, "ret %08x\n", hr );
4848 V_VT(&vFile) = VT_BSTR;
4849 V_BSTR(&vFile) = _bstr_("test.xml");
4851 hr = IXMLDOMDocument_save(doc, vFile);
4852 ok(hr == S_OK, "ret %08x\n", hr );
4856 IXMLDOMElement_Release(pRoot);
4857 IXMLDOMDocument_Release(doc);
4859 file = CreateFile("test.xml", GENERIC_READ, 0, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, NULL );
4860 ok(file != INVALID_HANDLE_VALUE, "Could not open file: %u\n", GetLastError());
4861 if(file == INVALID_HANDLE_VALUE)
4864 ReadFile(file, buffer, sizeof(buffer), &read, NULL);
4865 ok(read != 0, "could not read file\n");
4866 ok(buffer[0] != '<' || buffer[1] != '?', "File contains processing instruction\n");
4869 DeleteFile("test.xml");
4872 static void test_testTransforms(void)
4874 IXMLDOMDocument *doc, *docSS;
4880 doc = create_document(&IID_IXMLDOMDocument);
4883 docSS = create_document(&IID_IXMLDOMDocument);
4886 IXMLDOMDocument_Release(doc);
4890 hr = IXMLDOMDocument_loadXML(doc, _bstr_(szTransformXML), &bSucc);
4891 ok(hr == S_OK, "ret %08x\n", hr );
4893 hr = IXMLDOMDocument_loadXML(docSS, _bstr_(szTransformSSXML), &bSucc);
4894 ok(hr == S_OK, "ret %08x\n", hr );
4896 hr = IXMLDOMDocument_QueryInterface(docSS, &IID_IXMLDOMNode, (void**)&pNode );
4897 ok(hr == S_OK, "ret %08x\n", hr );
4902 hr = IXMLDOMDocument_transformNode(doc, pNode, &bOut);
4903 ok(hr == S_OK, "ret %08x\n", hr );
4904 ok( compareIgnoreReturns( bOut, _bstr_(szTransformOutput)), "Stylesheet output not correct\n");
4905 SysFreeString(bOut);
4907 IXMLDOMNode_Release(pNode);
4910 IXMLDOMDocument_Release(docSS);
4911 IXMLDOMDocument_Release(doc);
4916 static void test_Namespaces(void)
4918 IXMLDOMDocument *doc;
4920 IXMLDOMNode *pNode2 = NULL;
4924 static const CHAR szNamespacesXML[] =
4925 "<?xml version=\"1.0\"?>\n"
4926 "<root xmlns:WEB='http://www.winehq.org'>\n"
4927 "<WEB:Site version=\"1.0\" />\n"
4930 doc = create_document(&IID_IXMLDOMDocument);
4933 hr = IXMLDOMDocument_loadXML(doc, _bstr_(szNamespacesXML), &bSucc);
4934 ok(hr == S_OK, "ret %08x\n", hr );
4935 ok(bSucc == VARIANT_TRUE, "Expected VARIANT_TRUE got VARIANT_FALSE\n");
4937 hr = IXMLDOMDocument_selectSingleNode(doc, _bstr_("root"), &pNode );
4938 ok(hr == S_OK, "ret %08x\n", hr );
4941 hr = IXMLDOMNode_get_firstChild( pNode, &pNode2 );
4942 ok( hr == S_OK, "ret %08x\n", hr );
4943 ok( pNode2 != NULL, "pNode2 == NULL\n");
4945 /* Test get_prefix */
4946 hr = IXMLDOMNode_get_prefix(pNode2, NULL);
4947 ok( hr == E_INVALIDARG, "ret %08x\n", hr );
4948 /* NOTE: Need to test that arg2 gets cleared on Error. */
4950 hr = IXMLDOMNode_get_prefix(pNode2, &str);
4951 ok( hr == S_OK, "ret %08x\n", hr );
4952 ok( !lstrcmpW( str, _bstr_("WEB")), "incorrect prefix string\n");
4955 /* Test get_namespaceURI */
4956 hr = IXMLDOMNode_get_namespaceURI(pNode2, NULL);
4957 ok( hr == E_INVALIDARG, "ret %08x\n", hr );
4958 /* NOTE: Need to test that arg2 gets cleared on Error. */
4960 hr = IXMLDOMNode_get_namespaceURI(pNode2, &str);
4961 ok( hr == S_OK, "ret %08x\n", hr );
4962 ok( !lstrcmpW( str, _bstr_("http://www.winehq.org")), "incorrect namespaceURI string\n");
4965 IXMLDOMNode_Release(pNode2);
4966 IXMLDOMNode_Release(pNode);
4969 IXMLDOMDocument_Release(doc);
4974 static void test_FormattingXML(void)
4976 IXMLDOMDocument *doc;
4977 IXMLDOMElement *pElement;
4981 static const CHAR szLinefeedXML[] = "<?xml version=\"1.0\"?>\n<Root>\n\t<Sub val=\"A\" />\n</Root>";
4982 static const CHAR szLinefeedRootXML[] = "<Root>\r\n\t<Sub val=\"A\"/>\r\n</Root>";
4984 doc = create_document(&IID_IXMLDOMDocument);
4987 hr = IXMLDOMDocument_loadXML(doc, _bstr_(szLinefeedXML), &bSucc);
4988 ok(hr == S_OK, "ret %08x\n", hr );
4989 ok(bSucc == VARIANT_TRUE, "Expected VARIANT_TRUE got VARIANT_FALSE\n");
4991 if(bSucc == VARIANT_TRUE)
4993 hr = IXMLDOMDocument_get_documentElement(doc, &pElement);
4994 ok(hr == S_OK, "ret %08x\n", hr );
4997 hr = IXMLDOMElement_get_xml(pElement, &str);
4998 ok(hr == S_OK, "ret %08x\n", hr );
4999 ok( !lstrcmpW( str, _bstr_(szLinefeedRootXML) ), "incorrect element xml\n");
5002 IXMLDOMElement_Release(pElement);
5006 IXMLDOMDocument_Release(doc);
5011 typedef struct _nodetypedvalue_t {
5014 const char *value; /* value in string format */
5017 static const nodetypedvalue_t get_nodetypedvalue[] = {
5018 { "root/string", VT_BSTR, "Wine" },
5019 { "root/string2", VT_BSTR, "String" },
5020 { "root/number", VT_BSTR, "12.44" },
5021 { "root/number2", VT_BSTR, "-3.71e3" },
5022 { "root/int", VT_I4, "-13" },
5023 { "root/fixed", VT_CY, "7322.9371" },
5024 { "root/bool", VT_BOOL, "-1" },
5025 { "root/datetime", VT_DATE, "40135.14" },
5026 { "root/datetimetz",VT_DATE, "37813.59" },
5027 { "root/date", VT_DATE, "665413" },
5028 { "root/time", VT_DATE, "0.5813889" },
5029 { "root/timetz", VT_DATE, "1.112512" },
5030 { "root/i1", VT_I1, "-13" },
5031 { "root/i2", VT_I2, "31915" },
5032 { "root/i4", VT_I4, "-312232" },
5033 { "root/ui1", VT_UI1, "123" },
5034 { "root/ui2", VT_UI2, "48282" },
5035 { "root/ui4", VT_UI4, "949281" },
5036 { "root/r4", VT_R4, "213124" },
5037 { "root/r8", VT_R8, "0.412" },
5038 { "root/float", VT_R8, "41221.421" },
5039 { "root/uuid", VT_BSTR, "333C7BC4-460F-11D0-BC04-0080C7055a83" },
5043 static void test_nodeTypedValue(void)
5045 const nodetypedvalue_t *entry = get_nodetypedvalue;
5046 IXMLDOMDocument *doc;
5052 doc = create_document(&IID_IXMLDOMDocument);
5056 hr = IXMLDOMDocument_loadXML(doc, _bstr_(szTypeValueXML), &b);
5057 ok(hr == S_OK, "ret %08x\n", hr );
5058 ok(b == VARIANT_TRUE, "got %d\n", b);
5060 hr = IXMLDOMDocument_get_nodeValue(doc, NULL);
5061 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
5063 V_VT(&value) = VT_BSTR;
5064 V_BSTR(&value) = NULL;
5065 hr = IXMLDOMDocument_get_nodeValue(doc, &value);
5066 ok(hr == S_FALSE, "ret %08x\n", hr );
5067 ok(V_VT(&value) == VT_NULL, "expect VT_NULL got %d\n", V_VT(&value));
5069 hr = IXMLDOMDocument_get_nodeTypedValue(doc, NULL);
5070 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
5072 hr = IXMLDOMDocument_get_nodeTypedValue(doc, &value);
5073 ok(hr == S_FALSE, "ret %08x\n", hr );
5075 hr = IXMLDOMDocument_selectSingleNode(doc, _bstr_("root/string"), &node);
5076 ok(hr == S_OK, "ret %08x\n", hr );
5078 V_VT(&value) = VT_BSTR;
5079 V_BSTR(&value) = NULL;
5080 hr = IXMLDOMNode_get_nodeValue(node, &value);
5081 ok(hr == S_FALSE, "ret %08x\n", hr );
5082 ok(V_VT(&value) == VT_NULL, "expect VT_NULL got %d\n", V_VT(&value));
5084 hr = IXMLDOMNode_get_nodeTypedValue(node, NULL);
5085 ok(hr == E_INVALIDARG, "ret %08x\n", hr );
5087 IXMLDOMNode_Release(node);
5089 hr = IXMLDOMDocument_selectSingleNode(doc, _bstr_("root/binhex"), &node);
5090 ok(hr == S_OK, "ret %08x\n", hr );
5092 BYTE bytes[] = {0xff,0xfc,0xa0,0x12,0x00,0x3c};
5094 hr = IXMLDOMNode_get_nodeTypedValue(node, &value);
5095 ok(hr == S_OK, "ret %08x\n", hr );
5096 ok(V_VT(&value) == (VT_ARRAY|VT_UI1), "incorrect type\n");
5097 ok(V_ARRAY(&value)->rgsabound[0].cElements == 6, "incorrect array size\n");
5098 if(V_ARRAY(&value)->rgsabound[0].cElements == 6)
5099 ok(!memcmp(bytes, V_ARRAY(&value)->pvData, sizeof(bytes)), "incorrect value\n");
5100 VariantClear(&value);
5101 IXMLDOMNode_Release(node);
5104 hr = IXMLDOMDocument_selectSingleNode(doc, _bstr_("root/binbase64"), &node);
5105 ok(hr == S_OK, "ret %08x\n", hr );
5107 BYTE bytes[] = {0x62,0x61,0x73,0x65,0x36,0x34,0x20,0x74,0x65,0x73,0x74};
5109 hr = IXMLDOMNode_get_nodeTypedValue(node, &value);
5110 ok(hr == S_OK, "ret %08x\n", hr );
5111 ok(V_VT(&value) == (VT_ARRAY|VT_UI1), "incorrect type\n");
5112 ok(V_ARRAY(&value)->rgsabound[0].cElements == 11, "incorrect array size\n");
5113 if(V_ARRAY(&value)->rgsabound[0].cElements == 11)
5114 ok(!memcmp(bytes, V_ARRAY(&value)->pvData, sizeof(bytes)), "incorrect value\n");
5115 VariantClear(&value);
5116 IXMLDOMNode_Release(node);
5121 hr = IXMLDOMDocument_selectSingleNode(doc, _bstr_(entry->name), &node);
5122 ok(hr == S_OK, "ret %08x\n", hr );
5124 hr = IXMLDOMNode_get_nodeTypedValue(node, &value);
5125 ok(hr == S_OK, "ret %08x\n", hr );
5126 ok(V_VT(&value) == entry->type, "incorrect type, expected %d, got %d\n", entry->type, V_VT(&value));
5128 if (entry->type != VT_BSTR)
5130 if (entry->type == VT_DATE ||
5131 entry->type == VT_R8 ||
5132 entry->type == VT_CY)
5134 if (entry->type == VT_DATE)
5136 hr = VariantChangeType(&value, &value, 0, VT_R4);
5137 ok(hr == S_OK, "ret %08x\n", hr );
5139 hr = VariantChangeTypeEx(&value, &value,
5140 MAKELCID(MAKELANGID(LANG_ENGLISH, SUBLANG_DEFAULT), SORT_DEFAULT),
5141 VARIANT_NOUSEROVERRIDE, VT_BSTR);
5142 ok(hr == S_OK, "ret %08x\n", hr );
5146 hr = VariantChangeType(&value, &value, 0, VT_BSTR);
5147 ok(hr == S_OK, "ret %08x\n", hr );
5150 ok(lstrcmpW( V_BSTR(&value), _bstr_(entry->value)) == 0,
5151 "expected %s, got %s\n", entry->value, wine_dbgstr_w(V_BSTR(&value)));
5154 ok(lstrcmpW( V_BSTR(&value), _bstr_(entry->value)) == 0,
5155 "expected %s, got %s\n", entry->value, wine_dbgstr_w(V_BSTR(&value)));
5157 VariantClear( &value );
5158 IXMLDOMNode_Release(node);
5163 IXMLDOMDocument_Release(doc);
5167 static void test_TransformWithLoadingLocalFile(void)
5169 IXMLDOMDocument *doc;
5170 IXMLDOMDocument *xsl;
5176 char lpPathBuffer[MAX_PATH];
5179 /* Create a Temp File. */
5180 GetTempPathA(MAX_PATH, lpPathBuffer);
5181 strcat(lpPathBuffer, "customers.xml" );
5183 file = CreateFile(lpPathBuffer, GENERIC_WRITE, 0, NULL, CREATE_ALWAYS, FILE_ATTRIBUTE_NORMAL, NULL );
5184 ok(file != INVALID_HANDLE_VALUE, "Could not create file: %u\n", GetLastError());
5185 if(file == INVALID_HANDLE_VALUE)
5188 WriteFile(file, szBasicTransformXML, strlen(szBasicTransformXML), &dwWritten, NULL);
5191 /* Correct path to not include a escape character. */
5192 for(i=0; i < strlen(lpPathBuffer); i++)
5194 if(lpPathBuffer[i] == '\\')
5195 lpPathBuffer[i] = '/';
5198 doc = create_document(&IID_IXMLDOMDocument);
5201 xsl = create_document(&IID_IXMLDOMDocument);
5204 IXMLDOMDocument2_Release(doc);
5208 hr = IXMLDOMDocument_loadXML(doc, _bstr_(szTypeValueXML), &bSucc);
5209 ok(hr == S_OK, "ret %08x\n", hr );
5210 ok(bSucc == VARIANT_TRUE, "Expected VARIANT_TRUE got VARIANT_FALSE\n");
5211 if(bSucc == VARIANT_TRUE)
5214 BSTR sPart1 = _bstr_(szBasicTransformSSXMLPart1);
5215 BSTR sPart2 = _bstr_(szBasicTransformSSXMLPart2);
5216 BSTR sFileName = _bstr_(lpPathBuffer);
5217 int nLegnth = lstrlenW(sPart1) + lstrlenW(sPart2) + lstrlenW(sFileName) + 1;
5219 sXSL = SysAllocStringLen(NULL, nLegnth);
5220 lstrcpyW(sXSL, sPart1);
5221 lstrcatW(sXSL, sFileName);
5222 lstrcatW(sXSL, sPart2);
5224 hr = IXMLDOMDocument_loadXML(xsl, sXSL, &bSucc);
5225 ok(hr == S_OK, "ret %08x\n", hr );
5226 ok(bSucc == VARIANT_TRUE, "Expected VARIANT_TRUE got VARIANT_FALSE\n");
5227 if(bSucc == VARIANT_TRUE)
5231 hr = IXMLDOMDocument_QueryInterface(xsl, &IID_IXMLDOMNode, (void**)&pNode );
5232 ok(hr == S_OK, "ret %08x\n", hr );
5235 /* This will load the temp file via the XSL */
5236 hr = IXMLDOMDocument_transformNode(doc, pNode, &sResult);
5237 ok(hr == S_OK, "ret %08x\n", hr );
5240 ok( compareIgnoreReturns( sResult, _bstr_(szBasicTransformOutput)), "Stylesheet output not correct\n");
5241 SysFreeString(sResult);
5244 IXMLDOMNode_Release(pNode);
5248 SysFreeString(sXSL);
5251 IXMLDOMDocument_Release(doc);
5252 IXMLDOMDocument_Release(xsl);
5254 DeleteFile(lpPathBuffer);
5258 static void test_put_nodeValue(void)
5260 IXMLDOMDocument *doc;
5261 IXMLDOMEntityReference *entityref;
5266 doc = create_document(&IID_IXMLDOMDocument);
5269 /* test for unsupported types */
5271 hr = IXMLDOMDocument_QueryInterface(doc, &IID_IXMLDOMNode, (void**)&node);
5272 ok(hr == S_OK, "ret %08x\n", hr );
5273 V_VT(&data) = VT_BSTR;
5274 V_BSTR(&data) = _bstr_("one two three");
5275 hr = IXMLDOMNode_put_nodeValue(node, data);
5276 ok(hr == E_FAIL, "ret %08x\n", hr );
5277 IXMLDOMNode_Release(node);
5279 /* NODE_DOCUMENT_FRAGMENT */
5280 V_VT(&type) = VT_I1;
5281 V_I1(&type) = NODE_DOCUMENT_FRAGMENT;
5282 hr = IXMLDOMDocument_createNode(doc, type, _bstr_("test"), NULL, &node);
5283 ok(hr == S_OK, "ret %08x\n", hr );
5284 V_VT(&data) = VT_BSTR;
5285 V_BSTR(&data) = _bstr_("one two three");
5286 hr = IXMLDOMNode_put_nodeValue(node, data);
5287 ok(hr == E_FAIL, "ret %08x\n", hr );
5288 IXMLDOMNode_Release(node);
5291 V_VT(&type) = VT_I1;
5292 V_I1(&type) = NODE_ELEMENT;
5293 hr = IXMLDOMDocument_createNode(doc, type, _bstr_("test"), NULL, &node);
5294 ok(hr == S_OK, "ret %08x\n", hr );
5295 V_VT(&data) = VT_BSTR;
5296 V_BSTR(&data) = _bstr_("one two three");
5297 hr = IXMLDOMNode_put_nodeValue(node, data);
5298 ok(hr == E_FAIL, "ret %08x\n", hr );
5299 IXMLDOMNode_Release(node);
5301 /* NODE_ENTITY_REFERENCE */
5302 hr = IXMLDOMDocument_createEntityReference(doc, _bstr_("ref"), &entityref);
5303 ok(hr == S_OK, "ret %08x\n", hr );
5305 V_VT(&data) = VT_BSTR;
5306 V_BSTR(&data) = _bstr_("one two three");
5307 hr = IXMLDOMEntityReference_put_nodeValue(entityref, data);
5308 ok(hr == E_FAIL, "ret %08x\n", hr );
5310 hr = IXMLDOMEntityReference_QueryInterface(entityref, &IID_IXMLDOMNode, (void**)&node);
5311 ok(hr == S_OK, "ret %08x\n", hr );
5312 V_VT(&data) = VT_BSTR;
5313 V_BSTR(&data) = _bstr_("one two three");
5314 hr = IXMLDOMNode_put_nodeValue(node, data);
5315 ok(hr == E_FAIL, "ret %08x\n", hr );
5316 IXMLDOMNode_Release(node);
5317 IXMLDOMEntityReference_Release(entityref);
5321 IXMLDOMDocument_Release(doc);
5324 static void test_IObjectSafety_set(IObjectSafety *safety, HRESULT result, HRESULT result2, DWORD set, DWORD mask, DWORD expected, DWORD expected2)
5326 DWORD enabled, supported;
5329 hr = IObjectSafety_SetInterfaceSafetyOptions(safety, NULL, set, mask);
5330 if (result == result2)
5331 ok(hr == result, "SetInterfaceSafetyOptions: expected %08x, returned %08x\n", result, hr );
5333 ok(broken(hr == result) || hr == result2,
5334 "SetInterfaceSafetyOptions: expected %08x, got %08x\n", result2, hr );
5336 supported = enabled = 0xCAFECAFE;
5337 hr = IObjectSafety_GetInterfaceSafetyOptions(safety, NULL, &supported, &enabled);
5338 ok(hr == S_OK, "ret %08x\n", hr );
5339 if (expected == expected2)
5340 ok(enabled == expected, "Expected %08x, got %08x\n", expected, enabled);
5342 ok(broken(enabled == expected) || enabled == expected2,
5343 "Expected %08x, got %08x\n", expected2, enabled);
5345 /* reset the safety options */
5347 hr = IObjectSafety_SetInterfaceSafetyOptions(safety, NULL,
5348 INTERFACESAFE_FOR_UNTRUSTED_CALLER|INTERFACESAFE_FOR_UNTRUSTED_DATA|INTERFACE_USES_SECURITY_MANAGER,
5350 ok(hr == S_OK, "ret %08x\n", hr );
5352 hr = IObjectSafety_GetInterfaceSafetyOptions(safety, NULL, &supported, &enabled);
5353 ok(hr == S_OK, "ret %08x\n", hr );
5354 ok(enabled == 0, "Expected 0, got %08x\n", enabled);
5357 static void test_document_IObjectSafety(void)
5359 IXMLDOMDocument *doc;
5360 IObjectSafety *safety;
5361 DWORD enabled = 0, supported = 0;
5364 doc = create_document(&IID_IXMLDOMDocument);
5367 hr = IXMLDOMDocument_QueryInterface(doc, &IID_IObjectSafety, (void**)&safety);
5368 ok(hr == S_OK, "ret %08x\n", hr );
5371 hr = IObjectSafety_GetInterfaceSafetyOptions(safety, NULL, NULL, &enabled);
5372 ok(hr == E_POINTER, "ret %08x\n", hr );
5373 hr = IObjectSafety_GetInterfaceSafetyOptions(safety, NULL, &supported, NULL);
5374 ok(hr == E_POINTER, "ret %08x\n", hr );
5376 hr = IObjectSafety_GetInterfaceSafetyOptions(safety, NULL, &supported, &enabled);
5377 ok(hr == S_OK, "ret %08x\n", hr );
5378 ok(broken(supported == (INTERFACESAFE_FOR_UNTRUSTED_CALLER | INTERFACESAFE_FOR_UNTRUSTED_DATA)) ||
5379 supported == (INTERFACESAFE_FOR_UNTRUSTED_CALLER | INTERFACESAFE_FOR_UNTRUSTED_DATA | INTERFACE_USES_SECURITY_MANAGER) /* msxml3 SP8+ */,
5380 "Expected (INTERFACESAFE_FOR_UNTRUSTED_CALLER | INTERFACESAFE_FOR_UNTRUSTED_DATA | INTERFACE_USES_SECURITY_MANAGER), "
5381 "got %08x\n", supported);
5382 ok(enabled == 0, "Expected 0, got %08x\n", enabled);
5384 /* set -- individual flags */
5386 test_IObjectSafety_set(safety, S_OK, S_OK,
5387 INTERFACESAFE_FOR_UNTRUSTED_CALLER, INTERFACESAFE_FOR_UNTRUSTED_CALLER,
5388 INTERFACESAFE_FOR_UNTRUSTED_CALLER, INTERFACESAFE_FOR_UNTRUSTED_CALLER);
5390 test_IObjectSafety_set(safety, S_OK, S_OK,
5391 INTERFACESAFE_FOR_UNTRUSTED_DATA, INTERFACESAFE_FOR_UNTRUSTED_DATA,
5392 INTERFACESAFE_FOR_UNTRUSTED_DATA, INTERFACESAFE_FOR_UNTRUSTED_DATA);
5394 test_IObjectSafety_set(safety, S_OK, S_OK,
5395 INTERFACE_USES_SECURITY_MANAGER, INTERFACE_USES_SECURITY_MANAGER,
5396 0, INTERFACE_USES_SECURITY_MANAGER /* msxml3 SP8+ */);
5398 /* set INTERFACE_USES_DISPEX */
5400 test_IObjectSafety_set(safety, S_OK, E_FAIL /* msxml3 SP8+ */,
5401 INTERFACE_USES_DISPEX, INTERFACE_USES_DISPEX,
5404 test_IObjectSafety_set(safety, S_OK, E_FAIL /* msxml3 SP8+ */,
5405 INTERFACE_USES_DISPEX, 0,
5408 test_IObjectSafety_set(safety, S_OK, S_OK /* msxml3 SP8+ */,
5409 0, INTERFACE_USES_DISPEX,
5412 /* set option masking */
5414 test_IObjectSafety_set(safety, S_OK, S_OK,
5415 INTERFACESAFE_FOR_UNTRUSTED_CALLER|INTERFACESAFE_FOR_UNTRUSTED_DATA,
5416 INTERFACESAFE_FOR_UNTRUSTED_CALLER,
5417 INTERFACESAFE_FOR_UNTRUSTED_CALLER,
5418 INTERFACESAFE_FOR_UNTRUSTED_CALLER);
5420 test_IObjectSafety_set(safety, S_OK, S_OK,
5421 INTERFACESAFE_FOR_UNTRUSTED_CALLER|INTERFACESAFE_FOR_UNTRUSTED_DATA,
5422 INTERFACESAFE_FOR_UNTRUSTED_DATA,
5423 INTERFACESAFE_FOR_UNTRUSTED_DATA,
5424 INTERFACESAFE_FOR_UNTRUSTED_DATA);
5426 test_IObjectSafety_set(safety, S_OK, S_OK,
5427 INTERFACESAFE_FOR_UNTRUSTED_CALLER|INTERFACESAFE_FOR_UNTRUSTED_DATA,
5428 INTERFACE_USES_SECURITY_MANAGER,
5432 /* set -- inheriting previous settings */
5434 hr = IObjectSafety_SetInterfaceSafetyOptions(safety, NULL,
5435 INTERFACESAFE_FOR_UNTRUSTED_CALLER,
5436 INTERFACESAFE_FOR_UNTRUSTED_CALLER);
5437 ok(hr == S_OK, "ret %08x\n", hr );
5438 hr = IObjectSafety_GetInterfaceSafetyOptions(safety, NULL, &supported, &enabled);
5439 ok(hr == S_OK, "ret %08x\n", hr );
5441 ok(broken(enabled == INTERFACESAFE_FOR_UNTRUSTED_CALLER) ||
5442 enabled == (INTERFACESAFE_FOR_UNTRUSTED_CALLER | INTERFACE_USES_SECURITY_MANAGER) /* msxml3 SP8+ */,
5443 "Expected (INTERFACESAFE_FOR_UNTRUSTED_CALLER | INTERFACE_USES_SECURITY_MANAGER), "
5444 "got %08x\n", enabled);
5446 hr = IObjectSafety_SetInterfaceSafetyOptions(safety, NULL,
5447 INTERFACESAFE_FOR_UNTRUSTED_DATA,
5448 INTERFACESAFE_FOR_UNTRUSTED_DATA);
5449 ok(hr == S_OK, "ret %08x\n", hr );
5450 hr = IObjectSafety_GetInterfaceSafetyOptions(safety, NULL, &supported, &enabled);
5451 ok(hr == S_OK, "ret %08x\n", hr );
5453 ok(broken(enabled == INTERFACESAFE_FOR_UNTRUSTED_DATA) ||
5454 enabled == (INTERFACESAFE_FOR_UNTRUSTED_CALLER | INTERFACESAFE_FOR_UNTRUSTED_DATA) /* msxml3 SP8+ */,
5455 "Expected (INTERFACESAFE_FOR_UNTRUSTED_CALLER | INTERFACESAFE_FOR_UNTRUSTED_DATA), "
5456 "got %08x\n", enabled);
5458 IObjectSafety_Release(safety);
5460 IXMLDOMDocument_Release(doc);
5463 typedef struct _property_test_t {
5466 const char *property;
5470 static const property_test_t properties_test_data[] = {
5471 { &CLSID_DOMDocument, "CLSID_DOMDocument" , "SelectionLanguage", "XSLPattern" },
5472 { &CLSID_DOMDocument2, "CLSID_DOMDocument2" , "SelectionLanguage", "XSLPattern" },
5473 { &CLSID_DOMDocument30, "CLSID_DOMDocument30", "SelectionLanguage", "XSLPattern" },
5474 { &CLSID_DOMDocument40, "CLSID_DOMDocument40", "SelectionLanguage", "XPath" },
5475 { &CLSID_DOMDocument60, "CLSID_DOMDocument60", "SelectionLanguage", "XPath" },
5479 static void test_default_properties(void)
5481 const property_test_t *entry = properties_test_data;
5482 IXMLDOMDocument2 *doc;
5488 hr = CoCreateInstance(entry->guid, NULL, CLSCTX_INPROC_SERVER, &IID_IXMLDOMDocument2, (void**)&doc);
5491 win_skip("can't create %s instance\n", entry->clsid);
5496 hr = IXMLDOMDocument2_getProperty(doc, _bstr_(entry->property), &var);
5497 ok(hr == S_OK, "got 0x%08x\n", hr);
5498 ok(lstrcmpW(V_BSTR(&var), _bstr_(entry->value)) == 0, "expected %s, for %s\n",
5499 entry->value, entry->clsid);
5502 IXMLDOMDocument2_Release(doc);
5508 static void test_XSLPattern(void)
5510 IXMLDOMDocument2 *doc;
5511 IXMLDOMNodeList *list;
5515 doc = create_document(&IID_IXMLDOMDocument2);
5518 ole_check(IXMLDOMDocument2_loadXML(doc, _bstr_(szExampleXML), &b));
5519 ok(b == VARIANT_TRUE, "failed to load XML string\n");
5521 /* switch to XSLPattern */
5522 ole_check(IXMLDOMDocument2_setProperty(doc, _bstr_("SelectionLanguage"), _variantbstr_("XSLPattern")));
5524 /* XPath doesn't select elements with non-null default namespace with unqualified selectors, XSLPattern does */
5525 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("//elem/c"), &list));
5527 ole_check(IXMLDOMNodeList_get_length(list, &len));
5528 /* should select <elem><c> and <elem xmlns='...'><c> but not <elem><foo:c> */
5529 todo_wine ok(len == 3, "expected 3 entries in list, got %d\n", len);
5530 IXMLDOMNodeList_Release(list);
5532 /* for XSLPattern start index is 0, for XPath it's 1 */
5533 ole_check(IXMLDOMDocument2_selectNodes(doc, _bstr_("root//elem[0]"), &list));
5535 ole_check(IXMLDOMNodeList_get_length(list, &len));
5536 todo_wine ok(len != 0, "expected filled list\n");
5538 todo_wine expect_list_and_release(list, "E1.E2.D1");
5540 IXMLDOMDocument2_Release(doc);
5544 static void test_splitText(void)
5546 IXMLDOMCDATASection *cdata;
5547 IXMLDOMElement *root;
5548 IXMLDOMDocument *doc;
5549 IXMLDOMText *text, *text2;
5552 VARIANT_BOOL success;
5556 doc = create_document(&IID_IXMLDOMDocument);
5559 hr = IXMLDOMDocument_loadXML(doc, _bstr_("<root></root>"), &success);
5560 ok(hr == S_OK, "got 0x%08x\n", hr);
5562 hr = IXMLDOMDocument_get_documentElement(doc, &root);
5563 ok(hr == S_OK, "got 0x%08x\n", hr);
5565 hr = IXMLDOMDocument_createCDATASection(doc, _bstr_("beautiful plumage"), &cdata);
5566 ok(hr == S_OK, "got 0x%08x\n", hr);
5568 V_VT(&var) = VT_EMPTY;
5569 hr = IXMLDOMElement_appendChild(root, (IXMLDOMNode*)cdata, NULL);
5570 ok(hr == S_OK, "got 0x%08x\n", hr);
5573 hr = IXMLDOMCDATASection_get_length(cdata, &length);
5574 ok(hr == S_OK, "got 0x%08x\n", hr);
5575 ok(length > 0, "got %d\n", length);
5577 hr = IXMLDOMCDATASection_splitText(cdata, 0, NULL);
5578 ok(hr == E_INVALIDARG, "got 0x%08x\n", hr);
5580 text = (void*)0xdeadbeef;
5581 /* negative offset */
5582 hr = IXMLDOMCDATASection_splitText(cdata, -1, &text);
5583 ok(hr == E_INVALIDARG, "got 0x%08x\n", hr);
5584 ok(text == (void*)0xdeadbeef, "got %p\n", text);
5586 text = (void*)0xdeadbeef;
5587 /* offset outside data */
5588 hr = IXMLDOMCDATASection_splitText(cdata, length + 1, &text);
5589 ok(hr == E_INVALIDARG, "got 0x%08x\n", hr);
5590 ok(text == 0, "got %p\n", text);
5592 text = (void*)0xdeadbeef;
5593 /* offset outside data */
5594 hr = IXMLDOMCDATASection_splitText(cdata, length, &text);
5595 ok(hr == S_FALSE, "got 0x%08x\n", hr);
5596 ok(text == 0, "got %p\n", text);
5598 /* no empty node created */
5599 node = (void*)0xdeadbeef;
5600 hr = IXMLDOMCDATASection_get_nextSibling(cdata, &node);
5601 ok(hr == S_FALSE, "got 0x%08x\n", hr);
5602 ok(node == 0, "got %p\n", text);
5604 hr = IXMLDOMCDATASection_splitText(cdata, 10, &text);
5605 ok(hr == S_OK, "got 0x%08x\n", hr);
5608 hr = IXMLDOMText_get_length(text, &length);
5609 ok(hr == S_OK, "got 0x%08x\n", hr);
5610 ok(length == 7, "got %d\n", length);
5612 hr = IXMLDOMCDATASection_get_nextSibling(cdata, &node);
5613 ok(hr == S_OK, "got 0x%08x\n", hr);
5614 IXMLDOMNode_Release(node);
5616 /* split new text node */
5617 hr = IXMLDOMText_get_length(text, &length);
5618 ok(hr == S_OK, "got 0x%08x\n", hr);
5620 node = (void*)0xdeadbeef;
5621 hr = IXMLDOMText_get_nextSibling(text, &node);
5622 ok(hr == S_FALSE, "got 0x%08x\n", hr);
5623 ok(node == 0, "got %p\n", text);
5625 hr = IXMLDOMText_splitText(text, 0, NULL);
5626 ok(hr == E_INVALIDARG, "got 0x%08x\n", hr);
5628 text2 = (void*)0xdeadbeef;
5629 /* negative offset */
5630 hr = IXMLDOMText_splitText(text, -1, &text2);
5631 ok(hr == E_INVALIDARG, "got 0x%08x\n", hr);
5632 ok(text2 == (void*)0xdeadbeef, "got %p\n", text2);
5634 text2 = (void*)0xdeadbeef;
5635 /* offset outside data */
5636 hr = IXMLDOMText_splitText(text, length + 1, &text2);
5637 ok(hr == E_INVALIDARG, "got 0x%08x\n", hr);
5638 ok(text2 == 0, "got %p\n", text2);
5640 text2 = (void*)0xdeadbeef;
5641 /* offset outside data */
5642 hr = IXMLDOMText_splitText(text, length, &text2);
5643 ok(hr == S_FALSE, "got 0x%08x\n", hr);
5644 ok(text2 == 0, "got %p\n", text);
5647 hr = IXMLDOMText_splitText(text, 4, &text2);
5648 todo_wine ok(hr == S_OK, "got 0x%08x\n", hr);
5649 if (text2) IXMLDOMText_Release(text2);
5652 hr = IXMLDOMText_get_nextSibling(text, &node);
5653 todo_wine ok(hr == S_OK, "got 0x%08x\n", hr);
5654 if (node) IXMLDOMNode_Release(node);
5656 IXMLDOMText_Release(text);
5657 IXMLDOMElement_Release(root);
5658 IXMLDOMCDATASection_Release(cdata);
5662 static void test_getQualifiedItem(void)
5664 IXMLDOMDocument *doc;
5665 IXMLDOMElement *element;
5666 IXMLDOMNode *pr_node, *node;
5667 IXMLDOMNodeList *root_list;
5668 IXMLDOMNamedNodeMap *map;
5674 doc = create_document(&IID_IXMLDOMDocument);
5677 str = SysAllocString( szComplete4 );
5678 hr = IXMLDOMDocument_loadXML( doc, str, &b );
5679 ok( hr == S_OK, "loadXML failed\n");
5680 ok( b == VARIANT_TRUE, "failed to load XML string\n");
5681 SysFreeString( str );
5683 hr = IXMLDOMDocument_get_documentElement(doc, &element);
5684 ok( hr == S_OK, "ret %08x\n", hr);
5686 hr = IXMLDOMElement_get_childNodes(element, &root_list);
5687 ok( hr == S_OK, "ret %08x\n", hr);
5689 hr = IXMLDOMNodeList_get_item(root_list, 1, &pr_node);
5690 ok( hr == S_OK, "ret %08x\n", hr);
5691 IXMLDOMNodeList_Release(root_list);
5693 hr = IXMLDOMNode_get_attributes(pr_node, &map);
5694 ok( hr == S_OK, "ret %08x\n", hr);
5695 IXMLDOMNode_Release(pr_node);
5697 hr = IXMLDOMNamedNodeMap_get_length(map, &len);
5698 ok( hr == S_OK, "ret %08x\n", hr);
5699 ok( len == 3, "length %d\n", len);
5701 hr = IXMLDOMNamedNodeMap_getQualifiedItem(map, NULL, NULL, NULL);
5702 ok( hr == E_INVALIDARG, "ret %08x\n", hr);
5704 node = (void*)0xdeadbeef;
5705 hr = IXMLDOMNamedNodeMap_getQualifiedItem(map, NULL, NULL, &node);
5706 ok( hr == E_INVALIDARG, "ret %08x\n", hr);
5707 ok( node == (void*)0xdeadbeef, "got %p\n", node);
5709 hr = IXMLDOMNamedNodeMap_getQualifiedItem(map, _bstr_("id"), NULL, NULL);
5710 ok( hr == E_INVALIDARG, "ret %08x\n", hr);
5712 hr = IXMLDOMNamedNodeMap_getQualifiedItem(map, _bstr_("id"), NULL, &node);
5713 ok( hr == S_OK, "ret %08x\n", hr);
5714 IXMLDOMNode_Release(node);
5716 IXMLDOMNamedNodeMap_Release( map );
5717 IXMLDOMElement_Release( element );
5718 IXMLDOMDocument_Release( doc );
5722 static void test_removeQualifiedItem(void)
5724 IXMLDOMDocument *doc;
5725 IXMLDOMElement *element;
5726 IXMLDOMNode *pr_node, *node;
5727 IXMLDOMNodeList *root_list;
5728 IXMLDOMNamedNodeMap *map;
5734 doc = create_document(&IID_IXMLDOMDocument);
5737 str = SysAllocString( szComplete4 );
5738 hr = IXMLDOMDocument_loadXML( doc, str, &b );
5739 ok( hr == S_OK, "loadXML failed\n");
5740 ok( b == VARIANT_TRUE, "failed to load XML string\n");
5741 SysFreeString( str );
5743 hr = IXMLDOMDocument_get_documentElement(doc, &element);
5744 ok( hr == S_OK, "ret %08x\n", hr);
5746 hr = IXMLDOMElement_get_childNodes(element, &root_list);
5747 ok( hr == S_OK, "ret %08x\n", hr);
5749 hr = IXMLDOMNodeList_get_item(root_list, 1, &pr_node);
5750 ok( hr == S_OK, "ret %08x\n", hr);
5751 IXMLDOMNodeList_Release(root_list);
5753 hr = IXMLDOMNode_get_attributes(pr_node, &map);
5754 ok( hr == S_OK, "ret %08x\n", hr);
5755 IXMLDOMNode_Release(pr_node);
5757 hr = IXMLDOMNamedNodeMap_get_length(map, &len);
5758 ok( hr == S_OK, "ret %08x\n", hr);
5759 ok( len == 3, "length %d\n", len);
5761 hr = IXMLDOMNamedNodeMap_removeQualifiedItem(map, NULL, NULL, NULL);
5762 ok( hr == E_INVALIDARG, "ret %08x\n", hr);
5764 node = (void*)0xdeadbeef;
5765 hr = IXMLDOMNamedNodeMap_removeQualifiedItem(map, NULL, NULL, &node);
5766 ok( hr == E_INVALIDARG, "ret %08x\n", hr);
5767 ok( node == (void*)0xdeadbeef, "got %p\n", node);
5769 /* out pointer is optional */
5770 hr = IXMLDOMNamedNodeMap_removeQualifiedItem(map, _bstr_("id"), NULL, NULL);
5771 ok( hr == S_OK, "ret %08x\n", hr);
5773 /* already removed */
5774 hr = IXMLDOMNamedNodeMap_removeQualifiedItem(map, _bstr_("id"), NULL, NULL);
5775 ok( hr == S_FALSE, "ret %08x\n", hr);
5777 hr = IXMLDOMNamedNodeMap_removeQualifiedItem(map, _bstr_("vr"), NULL, &node);
5778 ok( hr == S_OK, "ret %08x\n", hr);
5779 IXMLDOMNode_Release(node);
5781 IXMLDOMNamedNodeMap_Release( map );
5782 IXMLDOMElement_Release( element );
5783 IXMLDOMDocument_Release( doc );
5787 static void test_get_ownerDocument(void)
5789 IXMLDOMDocument *doc1, *doc2, *doc3;
5790 IXMLDOMDocument2 *doc, *doc_owner;
5797 doc = create_document(&IID_IXMLDOMDocument2);
5800 str = SysAllocString( szComplete4 );
5801 hr = IXMLDOMDocument_loadXML( doc, str, &b );
5802 ok( hr == S_OK, "loadXML failed\n");
5803 ok( b == VARIANT_TRUE, "failed to load XML string\n");
5804 SysFreeString( str );
5806 hr = IXMLDOMDocument2_getProperty(doc, _bstr_("SelectionLanguage"), &var);
5807 ok( hr == S_OK, "got 0x%08x\n", hr);
5808 ok( lstrcmpW(V_BSTR(&var), _bstr_("XSLPattern")) == 0, "expected XSLPattern\n");
5811 /* set to XPath and check that new instances use it */
5812 hr = IXMLDOMDocument2_setProperty(doc, _bstr_("SelectionLanguage"), _variantbstr_("XPath"));
5813 ok( hr == S_OK, "got 0x%08x\n", hr);
5815 hr = IXMLDOMDocument2_setProperty(doc, _bstr_("SelectionNamespaces"), _variantbstr_("xmlns:wi=\'www.winehq.org\'"));
5816 ok( hr == S_OK, "got 0x%08x\n", hr);
5818 hr = IXMLDOMDocument2_get_firstChild(doc, &node);
5819 ok( hr == S_OK, "got 0x%08x\n", hr);
5821 hr = IXMLDOMNode_get_ownerDocument(node, &doc1);
5822 ok( hr == S_OK, "got 0x%08x\n", hr);
5824 hr = IXMLDOMDocument_QueryInterface(doc1, &IID_IXMLDOMDocument2, (void**)&doc_owner);
5825 ok( hr == S_OK, "got 0x%08x\n", hr);
5826 ok( doc_owner != doc, "got %p, doc %p\n", doc_owner, doc);
5827 hr = IXMLDOMDocument2_getProperty(doc_owner, _bstr_("SelectionNamespaces"), &var);
5828 ok( hr == S_OK, "got 0x%08x\n", hr);
5829 ok( lstrcmpW(V_BSTR(&var), _bstr_("xmlns:wi=\'www.winehq.org\'")) == 0, "expected previously set value\n");
5832 hr = IXMLDOMDocument2_getProperty(doc_owner, _bstr_("SelectionLanguage"), &var);
5833 ok( hr == S_OK, "got 0x%08x\n", hr);
5834 ok( lstrcmpW(V_BSTR(&var), _bstr_("XPath")) == 0, "expected XPath\n");
5836 IXMLDOMDocument2_Release(doc_owner);
5838 hr = IXMLDOMNode_get_ownerDocument(node, &doc2);
5839 ok( hr == S_OK, "got 0x%08x\n", hr);
5840 IXMLDOMNode_Release(node);
5842 ok(doc1 != doc2, "got %p, expected %p. original %p\n", doc2, doc1, doc);
5845 str = SysAllocString( szComplete4 );
5846 hr = IXMLDOMDocument2_loadXML( doc, str, &b );
5847 ok( hr == S_OK, "got 0x%08x\n", hr);
5848 ok( b == VARIANT_TRUE, "failed to load XML string\n");
5849 SysFreeString( str );
5851 /* properties retained even after reload */
5852 hr = IXMLDOMDocument2_getProperty(doc, _bstr_("SelectionNamespaces"), &var);
5853 ok( hr == S_OK, "got 0x%08x\n", hr);
5854 ok( lstrcmpW(V_BSTR(&var), _bstr_("xmlns:wi=\'www.winehq.org\'")) == 0, "expected previously set value\n");
5857 hr = IXMLDOMDocument2_getProperty(doc, _bstr_("SelectionLanguage"), &var);
5858 ok( hr == S_OK, "got 0x%08x\n", hr);
5859 ok( lstrcmpW(V_BSTR(&var), _bstr_("XPath")) == 0, "expected XPath\n");
5862 hr = IXMLDOMDocument2_get_firstChild(doc, &node);
5863 ok( hr == S_OK, "got 0x%08x\n", hr);
5865 hr = IXMLDOMNode_get_ownerDocument(node, &doc3);
5866 ok( hr == S_OK, "got 0x%08x\n", hr);
5867 IXMLDOMNode_Release(node);
5869 hr = IXMLDOMDocument_QueryInterface(doc3, &IID_IXMLDOMDocument2, (void**)&doc_owner);
5870 ok( hr == S_OK, "got 0x%08x\n", hr);
5871 ok(doc3 != doc1 && doc3 != doc2 && doc_owner != doc, "got %p, (%p, %p, %p)\n", doc3, doc, doc1, doc2);
5873 IXMLDOMDocument_Release(doc1);
5874 IXMLDOMDocument_Release(doc2);
5875 IXMLDOMDocument_Release(doc3);
5876 IXMLDOMDocument2_Release(doc);
5880 static void test_setAttributeNode(void)
5882 IXMLDOMDocument *doc, *doc2;
5883 IXMLDOMElement *elem;
5884 IXMLDOMAttribute *attr, *attr2, *ret_attr;
5889 doc = create_document(&IID_IXMLDOMDocument);
5892 str = SysAllocString( szComplete4 );
5893 hr = IXMLDOMDocument2_loadXML( doc, str, &b );
5894 ok( hr == S_OK, "loadXML failed\n");
5895 ok( b == VARIANT_TRUE, "failed to load XML string\n");
5896 SysFreeString( str );
5898 hr = IXMLDOMDocument_get_documentElement(doc, &elem);
5899 ok( hr == S_OK, "got 0x%08x\n", hr);
5901 ret_attr = (void*)0xdeadbeef;
5902 hr = IXMLDOMElement_setAttributeNode(elem, NULL, &ret_attr);
5903 ok( hr == E_INVALIDARG, "got 0x%08x\n", hr);
5904 ok( ret_attr == (void*)0xdeadbeef, "got %p\n", ret_attr);
5906 hr = IXMLDOMDocument_createAttribute(doc, _bstr_("attr"), &attr);
5907 ok( hr == S_OK, "got 0x%08x\n", hr);
5909 ret_attr = (void*)0xdeadbeef;
5910 hr = IXMLDOMElement_setAttributeNode(elem, attr, &ret_attr);
5911 todo_wine ok( hr == S_OK, "got 0x%08x\n", hr);
5912 todo_wine ok( ret_attr == NULL, "got %p\n", ret_attr);
5915 hr = IXMLDOMElement_getAttributeNode(elem, _bstr_("attr"), &attr2);
5916 todo_wine ok( hr == S_OK, "got 0x%08x\n", hr);
5917 if (attr2) IXMLDOMAttribute_Release(attr2);
5919 /* try to add it another time */
5920 ret_attr = (void*)0xdeadbeef;
5921 hr = IXMLDOMElement_setAttributeNode(elem, attr, &ret_attr);
5922 todo_wine ok( hr == E_FAIL, "got 0x%08x\n", hr);
5923 ok( ret_attr == (void*)0xdeadbeef, "got %p\n", ret_attr);
5925 IXMLDOMElement_Release(elem);
5927 /* add attribute already attached to another document */
5928 doc2 = create_document(&IID_IXMLDOMDocument);
5930 str = SysAllocString( szComplete4 );
5931 hr = IXMLDOMDocument_loadXML( doc2, str, &b );
5932 ok( hr == S_OK, "loadXML failed\n");
5933 ok( b == VARIANT_TRUE, "failed to load XML string\n");
5934 SysFreeString( str );
5936 hr = IXMLDOMDocument_get_documentElement(doc2, &elem);
5937 ok( hr == S_OK, "got 0x%08x\n", hr);
5938 hr = IXMLDOMElement_setAttributeNode(elem, attr, NULL);
5939 todo_wine ok( hr == E_FAIL, "got 0x%08x\n", hr);
5940 IXMLDOMElement_Release(elem);
5942 IXMLDOMDocument_Release(doc2);
5944 IXMLDOMAttribute_Release(attr);
5945 IXMLDOMDocument_Release(doc);
5949 static void test_put_dataType(void)
5951 IXMLDOMCDATASection *cdata;
5952 IXMLDOMDocument *doc;
5957 doc = create_document(&IID_IXMLDOMDocument);
5960 str = SysAllocString( szComplete4 );
5961 hr = IXMLDOMDocument_loadXML( doc, str, &b );
5962 ok( hr == S_OK, "loadXML failed\n");
5963 ok( b == VARIANT_TRUE, "failed to load XML string\n");
5964 SysFreeString( str );
5966 hr = IXMLDOMDocument_createCDATASection(doc, _bstr_("test"), &cdata);
5967 ok( hr == S_OK, "got 0x%08x\n", hr);
5968 hr = IXMLDOMCDATASection_put_dataType(cdata, _bstr_("number"));
5969 ok( hr == E_FAIL, "got 0x%08x\n", hr);
5970 hr = IXMLDOMCDATASection_put_dataType(cdata, _bstr_("string"));
5971 ok( hr == E_FAIL, "got 0x%08x\n", hr);
5972 IXMLDOMCDATASection_Release(cdata);
5974 IXMLDOMDocument_Release(doc);
5978 static void test_createNode(void)
5980 IXMLDOMDocument *doc;
5981 IXMLDOMElement *elem;
5987 doc = create_document(&IID_IXMLDOMDocument);
5990 /* NODE_ELEMENT nodes */
5991 /* 1. specified namespace */
5993 V_I4(&v) = NODE_ELEMENT;
5995 hr = IXMLDOMDocument_createNode(doc, v, _bstr_("ns1:test"), _bstr_("http://winehq.org"), &node);
5996 ok( hr == S_OK, "got 0x%08x\n", hr);
5998 hr = IXMLDOMNode_get_prefix(node, &prefix);
5999 ok( hr == S_OK, "got 0x%08x\n", hr);
6000 ok(lstrcmpW(prefix, _bstr_("ns1")) == 0, "wrong prefix\n");
6001 SysFreeString(prefix);
6002 IXMLDOMNode_Release(node);
6004 /* 2. default namespace */
6005 hr = IXMLDOMDocument_createNode(doc, v, _bstr_("test"), _bstr_("http://winehq.org/default"), &node);
6006 ok( hr == S_OK, "got 0x%08x\n", hr);
6007 prefix = (void*)0xdeadbeef;
6008 hr = IXMLDOMNode_get_prefix(node, &prefix);
6009 ok( hr == S_FALSE, "got 0x%08x\n", hr);
6010 ok(prefix == 0, "expected empty prefix, got %p\n", prefix);
6012 hr = IXMLDOMNode_QueryInterface(node, &IID_IXMLDOMElement, (void**)&elem);
6013 ok( hr == S_OK, "got 0x%08x\n", hr);
6015 V_VT(&var) = VT_BSTR;
6016 hr = IXMLDOMElement_getAttribute(elem, _bstr_("xmlns"), &var);
6017 ok( hr == S_FALSE, "got 0x%08x\n", hr);
6018 ok( V_VT(&var) == VT_NULL, "got %d\n", V_VT(&var));
6021 hr = IXMLDOMElement_get_namespaceURI(elem, &str);
6022 ok( hr == S_OK, "got 0x%08x\n", hr);
6023 ok( lstrcmpW(str, _bstr_("http://winehq.org/default")) == 0, "expected default namespace\n");
6026 IXMLDOMElement_Release(elem);
6027 IXMLDOMNode_Release(node);
6029 IXMLDOMDocument_Release(doc);
6033 static void test_get_prefix(void)
6035 IXMLDOMDocument *doc;
6036 IXMLDOMElement *element;
6040 doc = create_document(&IID_IXMLDOMDocument);
6044 hr = IXMLDOMDocument_createElement(doc, _bstr_("elem"), &element);
6045 ok( hr == S_OK, "got 0x%08x\n", hr);
6047 hr = IXMLDOMElement_get_prefix(element, NULL);
6048 ok( hr == E_INVALIDARG, "got 0x%08x\n", hr);
6050 str = (void*)0xdeadbeef;
6051 hr = IXMLDOMElement_get_prefix(element, &str);
6052 ok( hr == S_FALSE, "got 0x%08x\n", hr);
6053 ok( str == 0, "got %p\n", str);
6055 IXMLDOMElement_Release(element);
6058 hr = IXMLDOMDocument_createElement(doc, _bstr_("a:elem"), &element);
6059 ok( hr == S_OK, "got 0x%08x\n", hr);
6061 str = (void*)0xdeadbeef;
6062 hr = IXMLDOMElement_get_prefix(element, &str);
6063 ok( hr == S_OK, "got 0x%08x\n", hr);
6064 ok( lstrcmpW(str, _bstr_("a")) == 0, "expected prefix \"a\"\n");
6067 str = (void*)0xdeadbeef;
6068 hr = IXMLDOMElement_get_namespaceURI(element, &str);
6069 ok( hr == S_FALSE, "got 0x%08x\n", hr);
6070 ok( str == 0, "got %p\n", str);
6072 IXMLDOMElement_Release(element);
6074 IXMLDOMDocument_Release(doc);
6078 static void test_selectSingleNode(void)
6080 IXMLDOMDocument *doc;
6081 IXMLDOMNodeList *list;
6088 doc = create_document(&IID_IXMLDOMDocument);
6091 hr = IXMLDOMDocument_selectSingleNode(doc, NULL, NULL);
6092 ok(hr == E_INVALIDARG, "got 0x%08x\n", hr);
6094 hr = IXMLDOMDocument_selectNodes(doc, NULL, NULL);
6095 ok(hr == E_INVALIDARG, "got 0x%08x\n", hr);
6097 str = SysAllocString( szComplete4 );
6098 hr = IXMLDOMDocument_loadXML( doc, str, &b );
6099 ok( hr == S_OK, "loadXML failed\n");
6100 ok( b == VARIANT_TRUE, "failed to load XML string\n");
6101 SysFreeString( str );
6103 hr = IXMLDOMDocument_selectSingleNode(doc, NULL, NULL);
6104 ok(hr == E_INVALIDARG, "got 0x%08x\n", hr);
6106 hr = IXMLDOMDocument_selectNodes(doc, NULL, NULL);
6107 ok(hr == E_INVALIDARG, "got 0x%08x\n", hr);
6109 hr = IXMLDOMDocument_selectSingleNode(doc, _bstr_("lc"), NULL);
6110 ok(hr == E_INVALIDARG, "got 0x%08x\n", hr);
6112 hr = IXMLDOMDocument_selectNodes(doc, _bstr_("lc"), NULL);
6113 ok(hr == E_INVALIDARG, "got 0x%08x\n", hr);
6115 hr = IXMLDOMDocument_selectSingleNode(doc, _bstr_("lc"), &node);
6116 ok(hr == S_OK, "got 0x%08x\n", hr);
6117 IXMLDOMNode_Release(node);
6119 hr = IXMLDOMDocument_selectNodes(doc, _bstr_("lc"), &list);
6120 ok(hr == S_OK, "got 0x%08x\n", hr);
6121 IXMLDOMNodeList_Release(list);
6123 list = (void*)0xdeadbeef;
6124 hr = IXMLDOMDocument_selectNodes(doc, NULL, &list);
6125 ok(hr == E_INVALIDARG, "got 0x%08x\n", hr);
6126 ok(list == (void*)0xdeadbeef, "got %p\n", list);
6128 node = (void*)0xdeadbeef;
6129 hr = IXMLDOMDocument_selectSingleNode(doc, _bstr_("nonexistent"), &node);
6130 ok(hr == S_FALSE, "got 0x%08x\n", hr);
6131 ok(node == 0, "got %p\n", node);
6133 list = (void*)0xdeadbeef;
6134 hr = IXMLDOMDocument_selectNodes(doc, _bstr_("nonexistent"), &list);
6135 ok(hr == S_OK, "got 0x%08x\n", hr);
6137 hr = IXMLDOMNodeList_get_length(list, &len);
6138 ok(hr == S_OK, "got 0x%08x\n", hr);
6139 ok(len == 0, "got %d\n", len);
6140 IXMLDOMNodeList_Release(list);
6142 IXMLDOMDocument_Release(doc);
6148 IXMLDOMDocument *doc;
6151 hr = CoInitialize( NULL );
6152 ok( hr == S_OK, "failed to init com\n");
6158 hr = CoCreateInstance( &CLSID_DOMDocument, NULL, CLSCTX_INPROC_SERVER, &IID_IXMLDOMDocument, (void**)&doc );
6161 win_skip("IXMLDOMDocument is not available (0x%08x)\n", hr);
6165 IXMLDOMDocument_Release(doc);
6168 test_persiststreaminit();
6172 test_getElementsByTagName();
6174 test_get_childNodes();
6175 test_get_firstChild();
6176 test_get_lastChild();
6178 test_replaceChild();
6179 test_removeNamedItem();
6180 test_IXMLDOMDocument2();
6185 test_nodeTypeTests();
6186 test_DocumentSaveToDocument();
6187 test_DocumentSaveToFile();
6188 test_testTransforms();
6190 test_FormattingXML();
6191 test_nodeTypedValue();
6192 test_TransformWithLoadingLocalFile();
6193 test_put_nodeValue();
6194 test_document_IObjectSafety();
6196 test_getQualifiedItem();
6197 test_removeQualifiedItem();
6198 test_get_ownerDocument();
6199 test_setAttributeNode();
6200 test_put_dataType();
6203 test_default_properties();
6204 test_selectSingleNode();