ReactOS 0.4.16-dev-2207-geb15453
schema.c
Go to the documentation of this file.
1/*
2 * Schema test
3 *
4 * Copyright 2007 Huw Davies
5 * Copyright 2010 Adam Martinson for CodeWeavers
6 *
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.
11 *
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.
16 *
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
20 */
21
22#include <stdio.h>
23#include <assert.h>
24#define COBJMACROS
25
26#include "initguid.h"
27#include "windows.h"
28#include "ole2.h"
29#include "msxml2.h"
30#undef CLSID_DOMDocument
31#include "msxml2did.h"
32#include "dispex.h"
33#include "cguid.h"
34
35#include "wine/test.h"
36
37static const WCHAR xdr_schema1_uri[] = L"x-schema:test1.xdr";
38static const WCHAR xdr_schema1_xml[] =
39L"<?xml version='1.0'?>"
40"<Schema xmlns='urn:schemas-microsoft-com:xml-data'"
41" xmlns:dt='urn:schemas-microsoft-com:datatypes'"
42" name='test1.xdr'>"
43" <ElementType name='x' dt:type='boolean'/>"
44" <ElementType name='y'>"
45" <datatype dt:type='int'/>"
46" </ElementType>"
47" <ElementType name='z'/>"
48" <ElementType name='root' content='eltOnly' model='open' order='seq'>"
49" <element type='x'/>"
50" <element type='y'/>"
51" <element type='z'/>"
52" </ElementType>"
53"</Schema>";
54
55static const WCHAR xdr_schema2_uri[] = L"x-schema:test2.xdr";
56static const WCHAR xdr_schema2_xml[] =
57L"<?xml version='1.0'?>"
58"<Schema xmlns='urn:schemas-microsoft-com:xml-data'"
59" xmlns:dt='urn:schemas-microsoft-com:datatypes'"
60" name='test2.xdr'>"
61" <ElementType name='x' dt:type='bin.base64'/>"
62" <ElementType name='y' dt:type='uuid'/>"
63" <ElementType name='z'/>"
64" <ElementType name='root' content='eltOnly' model='closed' order='one'>"
65" <element type='x'/>"
66" <element type='y'/>"
67" <element type='z'/>"
68" </ElementType>"
69"</Schema>";
70
71static const WCHAR xdr_schema3_uri[] = L"x-schema:test3.xdr";
72static const WCHAR xdr_schema3_xml[] =
73L"<?xml version='1.0'?>"
74"<Schema xmlns='urn:schemas-microsoft-com:xml-data'"
75" xmlns:dt='urn:schemas-microsoft-com:datatypes'"
76" name='test3.xdr'>"
77" <ElementType name='root' content='textOnly' model='open'>"
78" <AttributeType name='x' dt:type='int'/>"
79" <AttributeType name='y' dt:type='enumeration' dt:values='a b c'/>"
80" <AttributeType name='z' dt:type='uuid'/>"
81" <attribute type='x'/>"
82" <attribute type='y'/>"
83" <attribute type='z'/>"
84" </ElementType>"
85"</Schema>";
86
87static const WCHAR xsd_schema1_uri[] = L"x-schema:test1.xsd";
88
89static const WCHAR szDatatypeXDR[] =
90L"<Schema xmlns='urn:schemas-microsoft-com:xml-data'\n"
91" xmlns:dt='urn:schemas-microsoft-com:datatypes'>\n"
92" <ElementType name='base64Data' content='textOnly' dt:type='bin.base64'/>\n"
93" <ElementType name='hexData' content='textOnly' dt:type='bin.hex'/>\n"
94" <ElementType name='boolData' content='textOnly' dt:type='boolean'/>\n"
95" <ElementType name='charData' content='textOnly' dt:type='char'/>\n"
96" <ElementType name='dateData' content='textOnly' dt:type='date'/>\n"
97" <ElementType name='dateTimeData' content='textOnly' dt:type='dateTime'/>\n"
98" <ElementType name='dateTimeTzData' content='textOnly' dt:type='dateTime.tz'/>\n"
99" <ElementType name='entityData' content='textOnly' dt:type='entity'/>\n"
100" <ElementType name='entitiesData' content='textOnly' dt:type='entities'/>\n"
101" <ElementType name='fixedData' content='textOnly' dt:type='fixed.14.4'/>\n"
102" <ElementType name='floatData' content='textOnly' dt:type='float'/>\n"
103" <ElementType name='i1Data' content='textOnly' dt:type='i1'/>\n"
104" <ElementType name='i2Data' content='textOnly' dt:type='i2'/>\n"
105" <ElementType name='i4Data' content='textOnly' dt:type='i4'/>\n"
106" <ElementType name='i8Data' content='textOnly' dt:type='i8'/>\n"
107" <ElementType name='intData' content='textOnly' dt:type='int'/>\n"
108" <ElementType name='nmtokData' content='textOnly' dt:type='nmtoken'/>\n"
109" <ElementType name='nmtoksData' content='textOnly' dt:type='nmtokens'/>\n"
110" <ElementType name='numData' content='textOnly' dt:type='number'/>\n"
111" <ElementType name='r4Data' content='textOnly' dt:type='r4'/>\n"
112" <ElementType name='r8Data' content='textOnly' dt:type='r8'/>\n"
113" <ElementType name='stringData' content='textOnly' dt:type='string'/>\n"
114" <ElementType name='timeData' content='textOnly' dt:type='time'/>\n"
115" <ElementType name='timeTzData' content='textOnly' dt:type='time.tz'/>\n"
116" <ElementType name='u1Data' content='textOnly' dt:type='ui1'/>\n"
117" <ElementType name='u2Data' content='textOnly' dt:type='ui2'/>\n"
118" <ElementType name='u4Data' content='textOnly' dt:type='ui4'/>\n"
119" <ElementType name='u8Data' content='textOnly' dt:type='ui8'/>\n"
120" <ElementType name='uriData' content='textOnly' dt:type='uri'/>\n"
121" <ElementType name='uuidData' content='textOnly' dt:type='uuid'/>\n"
122"\n"
123" <ElementType name='Name' content='textOnly' dt:type='nmtoken'/>\n"
124" <ElementType name='Value' content='eltOnly' order='many'>\n"
125" <element type='base64Data'/>\n"
126" <element type='hexData'/>\n"
127" <element type='boolData'/>\n"
128" <element type='charData'/>\n"
129" <element type='dateData'/>\n"
130" <element type='dateTimeData'/>\n"
131" <element type='dateTimeTzData'/>\n"
132" <element type='entityData'/>\n"
133" <element type='entitiesData'/>\n"
134" <element type='fixedData'/>\n"
135" <element type='floatData'/>\n"
136" <element type='i1Data'/>\n"
137" <element type='i2Data'/>\n"
138" <element type='i4Data'/>\n"
139" <element type='i8Data'/>\n"
140" <element type='intData'/>\n"
141" <element type='nmtokData'/>\n"
142" <element type='nmtoksData'/>\n"
143" <element type='numData'/>\n"
144" <element type='r4Data'/>\n"
145" <element type='r8Data'/>\n"
146" <element type='stringData'/>\n"
147" <element type='timeData'/>\n"
148" <element type='timeTzData'/>\n"
149" <element type='u1Data'/>\n"
150" <element type='u2Data'/>\n"
151" <element type='u4Data'/>\n"
152" <element type='u8Data'/>\n"
153" <element type='uriData'/>\n"
154" <element type='uuidData'/>\n"
155" </ElementType>\n"
156" <ElementType name='Property' content='eltOnly' order='seq'>\n"
157" <element type='Name'/>\n"
158" <element type='Value'/>\n"
159" </ElementType>\n"
160" <ElementType name='Properties' content='eltOnly'>\n"
161" <element type='Property' minOccurs='0' maxOccurs='*'/>\n"
162" </ElementType>\n"
163"</Schema>";
164
165static const WCHAR szDatatypeXML[] =
166L"<?xml version='1.0'?>\n"
167"<Properties xmlns='urn:x-schema:datatype-test-xdr'>\n"
168" <Property>\n"
169" <Name>testBase64</Name>\n"
170" <Value>\n"
171" <base64Data>+HugeNumber+</base64Data>\n"
172" </Value>\n"
173" </Property>\n"
174" <Property>\n"
175" <Name>testHex</Name>\n"
176" <Value>\n"
177" <hexData>deadbeef</hexData>\n"
178" </Value>\n"
179" </Property>\n"
180" <Property>\n"
181" <Name>testBool</Name>\n"
182" <Value>\n"
183" <boolData>1</boolData>\n"
184" </Value>\n"
185" </Property>\n"
186" <Property>\n"
187" <Name>testChar</Name>\n"
188" <Value>\n"
189" <charData>u</charData>\n"
190" </Value>\n"
191" </Property>\n"
192" <Property>\n"
193" <Name>testDate</Name>\n"
194" <Value>\n"
195" <dateData>1998-02-01</dateData>\n"
196" </Value>\n"
197" </Property>\n"
198" <Property>\n"
199" <Name>testDateTime</Name>\n"
200" <Value>\n"
201" <dateTimeData>1998-02-01T12:34:56</dateTimeData>\n"
202" </Value>\n"
203" </Property>\n"
204" <Property>\n"
205" <Name>testDateTimeTz</Name>\n"
206" <Value>\n"
207" <dateTimeTzData>1998-02-01T12:34:56-06:00</dateTimeTzData>\n"
208" </Value>\n"
209" </Property>\n"
210" <Property>\n"
211" <Name>testFixed</Name>\n"
212" <Value>\n"
213" <fixedData>3.1416</fixedData>\n"
214" </Value>\n"
215" </Property>\n"
216" <Property>\n"
217" <Name>testFloat</Name>\n"
218" <Value>\n"
219" <floatData>3.14159</floatData>\n"
220" </Value>\n"
221" </Property>\n"
222" <Property>\n"
223" <Name>testI1</Name>\n"
224" <Value>\n"
225" <i1Data>42</i1Data>\n"
226" </Value>\n"
227" </Property>\n"
228" <Property>\n"
229" <Name>testI2</Name>\n"
230" <Value>\n"
231" <i2Data>420</i2Data>\n"
232" </Value>\n"
233" </Property>\n"
234" <Property>\n"
235" <Name>testI4</Name>\n"
236" <Value>\n"
237" <i4Data>-420000000</i4Data>\n"
238" </Value>\n"
239" </Property>\n"
240" <Property>\n"
241" <Name>testI8</Name>\n"
242" <Value>\n"
243" <i8Data>-4200000000</i8Data>\n"
244" </Value>\n"
245" </Property>\n"
246" <Property>\n"
247" <Name>testInt</Name>\n"
248" <Value>\n"
249" <intData>42</intData>\n"
250" </Value>\n"
251" </Property>\n"
252" <Property>\n"
253" <Name>testNmtoken</Name>\n"
254" <Value>\n"
255" <nmtokData>tok1</nmtokData>\n"
256" </Value>\n"
257" </Property>\n"
258" <Property>\n"
259" <Name>testNmtokens</Name>\n"
260" <Value>\n"
261" <nmtoksData>tok1 tok2 tok3</nmtoksData>\n"
262" </Value>\n"
263" </Property>\n"
264" <Property>\n"
265" <Name>testNumber</Name>\n"
266" <Value>\n"
267" <numData>3.14159</numData>\n"
268" </Value>\n"
269" </Property>\n"
270" <Property>\n"
271" <Name>testR4</Name>\n"
272" <Value>\n"
273" <r4Data>3.14159265</r4Data>\n"
274" </Value>\n"
275" </Property>\n"
276" <Property>\n"
277" <Name>testR8</Name>\n"
278" <Value>\n"
279" <r8Data>3.14159265358979323846</r8Data>\n"
280" </Value>\n"
281" </Property>\n"
282" <Property>\n"
283" <Name>testString</Name>\n"
284" <Value>\n"
285" <stringData>foo bar</stringData>\n"
286" </Value>\n"
287" </Property>\n"
288" <Property>\n"
289" <Name>testTime</Name>\n"
290" <Value>\n"
291" <timeData>12:34:56</timeData>\n"
292" </Value>\n"
293" </Property>\n"
294" <Property>\n"
295" <Name>testTimeTz</Name>\n"
296" <Value>\n"
297" <timeTzData>12:34:56-06:00</timeTzData>\n"
298" </Value>\n"
299" </Property>\n"
300" <Property>\n"
301" <Name>testU1</Name>\n"
302" <Value>\n"
303" <u1Data>255</u1Data>\n"
304" </Value>\n"
305" </Property>\n"
306" <Property>\n"
307" <Name>testU2</Name>\n"
308" <Value>\n"
309" <u2Data>65535</u2Data>\n"
310" </Value>\n"
311" </Property>\n"
312" <Property>\n"
313" <Name>testU4</Name>\n"
314" <Value>\n"
315" <u4Data>4294967295</u4Data>\n"
316" </Value>\n"
317" </Property>\n"
318" <Property>\n"
319" <Name>testU8</Name>\n"
320" <Value>\n"
321" <u8Data>18446744073709551615</u8Data>\n"
322" </Value>\n"
323" </Property>\n"
324" <Property>\n"
325" <Name>testURI</Name>\n"
326" <Value>\n"
327" <uriData>urn:schemas-microsoft-com:datatypes</uriData>\n"
328" </Value>\n"
329" </Property>\n"
330" <Property>\n"
331" <Name>testUUID</Name>\n"
332" <Value>\n"
333" <uuidData>2933BF81-7B36-11D2-B20E-00C04F983E60</uuidData>\n"
334" </Value>\n"
335" </Property>\n"
336"</Properties>";
337
338static const WCHAR szOpenSeqXDR[] =
339L"<Schema xmlns='urn:schemas-microsoft-com:xml-data'>\n"
340" <ElementType name='w' content='empty' model='closed'/>\n"
341" <ElementType name='x' content='empty' model='closed'/>\n"
342" <ElementType name='y' content='empty' model='closed'/>\n"
343" <ElementType name='z' content='empty' model='closed'/>\n"
344" <ElementType name='test' content='eltOnly' model='open' order='seq'>\n"
345" <element type='x'/>\n"
346" <group order='seq'>\n"
347" <element type='x'/>\n"
348" <element type='y'/>\n"
349" <element type='z'/>\n"
350" </group>\n"
351" <element type='z'/>\n"
352" </ElementType>\n"
353"</Schema>";
354
355static const WCHAR szOpenSeqXML1[] = L"<test><x/><x/><y/><z/><z/></test>";
356static const WCHAR szOpenSeqXML2[] = L"<test><x/><x/><y/><z/><z/><w/></test>";
357static const WCHAR szOpenSeqXML3[] = L"<test><w/><x/><x/><y/><z/><z/></test>";
358static const WCHAR szOpenSeqXML4[] = L"<test><x/><x/><y/><z/><z/><v/></test>";
359
360static ULONG get_refcount(void *iface)
361{
362 IUnknown_AddRef((IUnknown *)iface);
363 return IUnknown_Release((IUnknown *)iface);
364}
365
366#define _expect64(expr, str, base, TYPE, CONV) { \
367 TYPE v1 = expr; \
368 TYPE v2 = CONV(str, NULL, base); \
369 ok(v1 == v2, #expr "returned %s, expected %s\n", \
370 wine_dbgstr_longlong(v1), wine_dbgstr_longlong(v2)); \
371}
372
373#define expect_int64(expr, x, base) _expect64(expr, #x, base, LONG64, strtoll)
374#define expect_uint64(expr, x, base) _expect64(expr, #x, base, ULONG64, strtoull)
375
376static BSTR alloced_bstrs[256];
377static int alloced_bstrs_count;
378
379static BSTR _bstr_(const WCHAR *str)
380{
381 assert(alloced_bstrs_count < ARRAY_SIZE(alloced_bstrs));
382 alloced_bstrs[alloced_bstrs_count] = SysAllocString(str);
383 return alloced_bstrs[alloced_bstrs_count++];
384}
385
386static void free_bstrs(void)
387{
388 int i;
389 for (i = 0; i < alloced_bstrs_count; i++)
390 SysFreeString(alloced_bstrs[i]);
391 alloced_bstrs_count = 0;
392}
393
394static VARIANT _variantdoc_(void* doc)
395{
396 VARIANT v;
397 V_VT(&v) = VT_DISPATCH;
398 V_DISPATCH(&v) = (IDispatch*)doc;
399 return v;
400}
401
402static void* _create_object(const GUID *clsid, const char *name, const IID *iid, int line)
403{
404 void *obj = NULL;
405 HRESULT hr;
406
407 hr = CoCreateInstance(clsid, NULL, CLSCTX_INPROC_SERVER, iid, &obj);
408 if (hr != S_OK)
409 win_skip_(__FILE__,line)("failed to create %s instance: hr %#lx.\n", name, hr);
410
411 return obj;
412}
413
414#define _create(cls) cls, #cls
415
416#define create_document(iid) _create_object(&_create(CLSID_DOMDocument), iid, __LINE__)
417
418#define create_document_version(v, iid) _create_object(&_create(CLSID_DOMDocument ## v), iid, __LINE__)
419
420#define create_cache(iid) _create_object(&_create(CLSID_XMLSchemaCache), iid, __LINE__)
421
422#define create_cache_version(v, iid) _create_object(&_create(CLSID_XMLSchemaCache ## v), iid, __LINE__)
423
424static void test_schema_refs(void)
425{
426 static const WCHAR xdr_schema_xml[] =
427 L"<Schema xmlns=\"urn:schemas-microsoft-com:xml-data\"\nxmlns:dt=\"urn:schemas-microsoft-com:datatypes\">\n</Schema>\n";
428 IXMLDOMDocument2 *doc;
429 IXMLDOMNode *node;
430 IXMLDOMSchemaCollection *cache;
431 LONG len, refcount;
432 VARIANT v;
433 VARIANT_BOOL b;
434 BSTR str;
435 HRESULT hr;
436
437 doc = create_document(&IID_IXMLDOMDocument2);
438 if (!doc)
439 return;
440
441 cache = create_cache(&IID_IXMLDOMSchemaCollection);
442 if(!cache)
443 {
444 IXMLDOMDocument2_Release(doc);
445 return;
446 }
447
448 VariantInit(&v);
449 str = SysAllocString(xdr_schema_xml);
450 hr = IXMLDOMDocument2_loadXML(doc, str, &b);
451 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
452 ok(b == VARIANT_TRUE, "b %04x\n", b);
453 SysFreeString(str);
454
455 node = (void*)0xdeadbeef;
456 hr = IXMLDOMSchemaCollection_get(cache, NULL, &node);
457 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
458 ok(node == NULL, "%p\n", node);
459
460 /* NULL uri pointer, still adds a document */
461 hr = IXMLDOMSchemaCollection_add(cache, NULL, _variantdoc_(doc));
462 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
463 len = -1;
464 hr = IXMLDOMSchemaCollection_get_length(cache, &len);
465 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
466 ok(len == 1, "Unexpected length %ld.\n", len);
467 /* read back - empty valid BSTR */
468 str = NULL;
469 hr = IXMLDOMSchemaCollection_get_namespaceURI(cache, 0, &str);
470 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
471 ok(str && *str == 0, "got %p\n", str);
472 SysFreeString(str);
473
474 node = NULL;
475 hr = IXMLDOMSchemaCollection_get(cache, NULL, &node);
476 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
477 ok(node != NULL, "%p\n", node);
478 IXMLDOMNode_Release(node);
479
480 node = NULL;
481 str = SysAllocString(L"");
482 hr = IXMLDOMSchemaCollection_get(cache, str, &node);
483 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
484 ok(node != NULL, "%p\n", node);
485 IXMLDOMNode_Release(node);
486 SysFreeString(str);
487
488 /* remove with NULL uri */
489 hr = IXMLDOMSchemaCollection_remove(cache, NULL);
490 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
491 len = -1;
492 hr = IXMLDOMSchemaCollection_get_length(cache, &len);
493 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
494 ok(len == 0, "Unexpected length %ld.\n", len);
495
496 /* same, but with VT_UNKNOWN type */
497 V_VT(&v) = VT_UNKNOWN;
498 V_UNKNOWN(&v) = (IUnknown*)doc;
499 hr = IXMLDOMSchemaCollection_add(cache, NULL, v);
500 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
501
502 len = -1;
503 hr = IXMLDOMSchemaCollection_get_length(cache, &len);
504 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
505 ok(len == 1, "Unexpected length %ld.\n", len);
506
507 hr = IXMLDOMSchemaCollection_remove(cache, NULL);
508 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
509 len = -1;
510 hr = IXMLDOMSchemaCollection_get_length(cache, &len);
511 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
512 ok(len == 0, "Unexpected length %ld.\n", len);
513
514 str = SysAllocString(L"x-schema:test.xml");
515 hr = IXMLDOMSchemaCollection_add(cache, str, _variantdoc_(doc));
516 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
517
518 /* IXMLDOMSchemaCollection_add doesn't add a ref on doc */
519 refcount = get_refcount(doc);
520 ok(refcount == 1, "Unexpected refcount %ld.\n", refcount);
521
522 SysFreeString(str);
523
524 V_VT(&v) = VT_INT;
525 hr = IXMLDOMDocument2_get_schemas(doc, &v);
526 ok(hr == S_FALSE, "Unexpected hr %#lx.\n", hr);
527 ok(V_VT(&v) == VT_NULL, "vt %x\n", V_VT(&v));
528
529 refcount = IXMLDOMSchemaCollection_AddRef(cache);
530 ok(refcount == 2, "Unexpected refcount %ld.\n", refcount);
531 V_VT(&v) = VT_DISPATCH;
532 V_DISPATCH(&v) = (IDispatch*)cache;
533
534 /* check that putref_schemas takes a ref */
535 hr = IXMLDOMDocument2_putref_schemas(doc, v);
536 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
537 refcount = get_refcount(cache);
538 ok(refcount == 3, "Unexpected refcount %ld.\n", refcount);
539
540 VariantClear(&v); /* refs now 2 */
541
542 V_VT(&v) = VT_INT;
543 /* check that get_schemas adds a ref */
544 hr = IXMLDOMDocument2_get_schemas(doc, &v);
545 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
546 ok(V_VT(&v) == VT_DISPATCH, "vt %x\n", V_VT(&v));
547 refcount = get_refcount(cache);
548 ok(refcount == 3, "Unexpected refcount %ld.\n", refcount);
549
550 /* get_schemas doesn't release a ref if passed VT_DISPATCH - ie it doesn't call VariantClear() */
551 hr = IXMLDOMDocument2_get_schemas(doc, &v);
552 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
553 ok(V_VT(&v) == VT_DISPATCH, "vt %x\n", V_VT(&v));
554 refcount = get_refcount(cache);
555 ok(refcount == 4, "Unexpected refcount %ld.\n", refcount);
556
557 /* release the two refs returned by get_schemas */
558 refcount = IXMLDOMSchemaCollection_Release(cache);
559 ok(refcount == 3, "Unexpected refcount %ld.\n", refcount);
560 refcount = IXMLDOMSchemaCollection_Release(cache);
561 ok(refcount == 2, "Unexpected refcount %ld.\n", refcount);
562
563 /* check that taking another ref on the document doesn't change the schema's ref count */
564 refcount = IXMLDOMDocument2_AddRef(doc);
565 ok(refcount == 2, "Unexpected refcount %ld.\n", refcount);
566 refcount = get_refcount(cache);
567 ok(refcount == 2, "Unexpected refcount %ld.\n", refcount);
568 refcount = IXMLDOMDocument2_Release(doc);
569 ok(refcount == 1, "Unexpected refcount %ld.\n", refcount);
570
571 /* call putref_schema with some odd variants */
572 V_VT(&v) = VT_INT;
573 hr = IXMLDOMDocument2_putref_schemas(doc, v);
574 ok(hr == E_FAIL, "Unexpected hr %#lx.\n", hr);
575 refcount = get_refcount(cache);
576 ok(refcount == 2, "Unexpected refcount %ld.\n", refcount);
577
578 /* calling with VT_EMPTY releases the schema */
579 V_VT(&v) = VT_EMPTY;
580 hr = IXMLDOMDocument2_putref_schemas(doc, v);
581 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
582 refcount = get_refcount(cache);
583 ok(refcount == 1, "Unexpected refcount %ld.\n", refcount);
584
585 /* try setting with VT_UNKNOWN */
586 refcount = IXMLDOMSchemaCollection_AddRef(cache);
587 ok(refcount == 2, "Unexpected refcount %ld.\n", refcount);
588 V_VT(&v) = VT_UNKNOWN;
589 V_UNKNOWN(&v) = (IUnknown*)cache;
590 hr = IXMLDOMDocument2_putref_schemas(doc, v);
591 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
592 refcount = get_refcount(cache);
593 ok(refcount == 3, "Unexpected refcount %ld.\n", refcount);
594
595 VariantClear(&v); /* refs now 2 */
596
597 /* calling with VT_NULL releases the schema */
598 V_VT(&v) = VT_NULL;
599 hr = IXMLDOMDocument2_putref_schemas(doc, v);
600 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
601 refcount = get_refcount(cache);
602 ok(refcount == 1, "Unexpected refcount %ld.\n", refcount);
603
604 /* refs now 1 */
605 /* set again */
606 refcount = IXMLDOMSchemaCollection_AddRef(cache);
607 ok(refcount == 2, "Unexpected refcount %ld.\n", refcount);
608 V_VT(&v) = VT_UNKNOWN;
609 V_UNKNOWN(&v) = (IUnknown*)cache;
610 hr = IXMLDOMDocument2_putref_schemas(doc, v);
611 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
612 refcount = get_refcount(cache);
613 ok(refcount == 3, "Unexpected refcount %ld.\n", refcount);
614
615 VariantClear(&v); /* refs now 2 */
616
617 /* release the final ref on the doc which should release its ref on the schema */
618 refcount = IXMLDOMDocument2_Release(doc);
619 ok(!refcount, "Unexpected refcount %ld.\n", refcount);
620
621 refcount = get_refcount(cache);
622 ok(refcount == 1, "Unexpected refcount %ld.\n", refcount);
623 refcount = IXMLDOMSchemaCollection_Release(cache);
624 ok(!refcount, "Unexpected refcount %ld.\n", refcount);
625}
626
627static void test_collection_refs(void)
628{
629 IXMLDOMDocument2 *schema1, *schema2, *schema3;
630 IXMLDOMSchemaCollection *cache1, *cache2, *cache3;
631 LONG refcount, length;
632 VARIANT_BOOL b;
633 HRESULT hr;
634
635 schema1 = create_document(&IID_IXMLDOMDocument2);
636 ok(schema1 != NULL, "Failed to create a document.\n");
637
638 cache1 = create_cache(&IID_IXMLDOMSchemaCollection);
639 ok(cache1 != NULL, "Failed to create schema collection.\n");
640
641 if (!schema1 || !cache1)
642 {
643 if (schema1)
644 IXMLDOMDocument2_Release(schema1);
645 if (cache1)
646 IXMLDOMSchemaCollection_Release(cache1);
647 return;
648 }
649
650 schema2 = create_document(&IID_IXMLDOMDocument2);
651 schema3 = create_document(&IID_IXMLDOMDocument2);
652
653 cache2 = create_cache(&IID_IXMLDOMSchemaCollection);
654 cache3 = create_cache(&IID_IXMLDOMSchemaCollection);
655
656 hr = IXMLDOMDocument2_loadXML(schema1, _bstr_(xdr_schema1_xml), &b);
657 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
658 ok(b == VARIANT_TRUE, "failed to load XML\n");
659
660 hr = IXMLDOMDocument2_loadXML(schema2, _bstr_(xdr_schema2_xml), &b);
661 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
662 ok(b == VARIANT_TRUE, "failed to load XML\n");
663
664 hr = IXMLDOMDocument2_loadXML(schema3, _bstr_(xdr_schema3_xml), &b);
665 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
666 ok(b == VARIANT_TRUE, "failed to load XML\n");
667
668 hr = IXMLDOMSchemaCollection_add(cache1, _bstr_(xdr_schema1_uri), _variantdoc_(schema1));
669 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
670 hr = IXMLDOMSchemaCollection_add(cache2, _bstr_(xdr_schema2_uri), _variantdoc_(schema2));
671 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
672 hr = IXMLDOMSchemaCollection_add(cache3, _bstr_(xdr_schema3_uri), _variantdoc_(schema3));
673 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
674
675 refcount = IXMLDOMDocument2_Release(schema1);
676 ok(!refcount, "Unexpected refcount %ld.\n", refcount);
677 refcount = IXMLDOMDocument2_Release(schema2);
678 ok(!refcount, "Unexpected refcount %ld.\n", refcount);
679 refcount = IXMLDOMDocument2_Release(schema3);
680 ok(!refcount, "Unexpected refcount %ld.\n", refcount);
681 schema1 = NULL;
682 schema2 = NULL;
683 schema3 = NULL;
684
685 /* releasing the original doc does not affect the schema cache */
686 hr = IXMLDOMSchemaCollection_get(cache1, _bstr_(xdr_schema1_uri), (IXMLDOMNode**)&schema1);
687 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
688 hr = IXMLDOMSchemaCollection_get(cache2, _bstr_(xdr_schema2_uri), (IXMLDOMNode**)&schema2);
689 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
690 hr = IXMLDOMSchemaCollection_get(cache3, _bstr_(xdr_schema3_uri), (IXMLDOMNode**)&schema3);
691 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
692
693 /* we get a read-only domdoc interface, created just for us */
694 if (schema1)
695 {
696 refcount = get_refcount(schema1);
697 ok(refcount == 1, "Unexpected refcount %ld.\n", refcount);
698 }
699
700 if (schema2)
701 {
702 refcount = get_refcount(schema2);
703 ok(refcount == 1, "Unexpected refcount %ld.\n", refcount);
704 }
705
706 if (schema3)
707 {
708 refcount = get_refcount(schema3);
709 ok(refcount == 1, "Unexpected refcount %ld.\n", refcount);
710 }
711
712 hr = IXMLDOMSchemaCollection_addCollection(cache1, NULL);
713 ok(hr == E_POINTER, "Unexpected hr %#lx.\n", hr);
714 hr = IXMLDOMSchemaCollection_addCollection(cache2, cache1);
715 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
716 hr = IXMLDOMSchemaCollection_addCollection(cache3, cache2);
717 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
718
719 length = -1;
720 hr = IXMLDOMSchemaCollection_get_length(cache1, &length);
721 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
722 ok(length == 1, "Unexpected length %ld.\n", length);
723
724 length = -1;
725 hr = IXMLDOMSchemaCollection_get_length(cache2, &length);
726 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
727 ok(length == 2, "Unexpected length %ld.\n", length);
728
729 length = -1;
730 hr = IXMLDOMSchemaCollection_get_length(cache3, &length);
731 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
732 ok(length == 3, "Unexpected length %ld.\n", length);
733
734 /* merging collections does not affect the ref count */
735 refcount = get_refcount(cache1);
736 ok(refcount == 1, "Unexpected refcount %ld.\n", refcount);
737 refcount = get_refcount(cache2);
738 ok(refcount == 1, "Unexpected refcount %ld.\n", refcount);
739 refcount = get_refcount(cache3);
740 ok(refcount == 1, "Unexpected refcount %ld.\n", refcount);
741
742 /* nor does it affect the domdoc instances */
743 if (schema1)
744 {
745 refcount = IXMLDOMDocument2_Release(schema1);
746 ok(!refcount, "Unexpected refcount %ld.\n", refcount);
747 }
748
749 if (schema2)
750 {
751 refcount = IXMLDOMDocument2_Release(schema2);
752 ok(!refcount, "Unexpected refcount %ld.\n", refcount);
753 }
754
755 if (schema3)
756 {
757 refcount = IXMLDOMDocument2_Release(schema3);
758 ok(!refcount, "Unexpected refcount %ld.\n", refcount);
759 }
760
761 schema1 = NULL;
762 schema2 = NULL;
763 schema3 = NULL;
764
765 /* releasing the domdoc instances doesn't change the cache */
766 hr = IXMLDOMSchemaCollection_get(cache1, _bstr_(xdr_schema1_uri), (IXMLDOMNode**)&schema1);
767 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
768 hr = IXMLDOMSchemaCollection_get(cache2, _bstr_(xdr_schema2_uri), (IXMLDOMNode**)&schema2);
769 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
770 hr = IXMLDOMSchemaCollection_get(cache3, _bstr_(xdr_schema3_uri), (IXMLDOMNode**)&schema3);
771 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
772
773 /* we can just get them again */
774 if (schema1)
775 {
776 refcount = get_refcount(schema1);
777 ok(refcount == 1, "Unexpected refcount %ld.\n", refcount);
778 }
779
780 if (schema2)
781 {
782 refcount = get_refcount(schema2);
783 ok(refcount == 1, "Unexpected refcount %ld.\n", refcount);
784 }
785
786 if (schema3)
787 {
788 refcount = get_refcount(schema3);
789 ok(refcount == 1, "Unexpected refcount %ld.\n", refcount);
790 }
791
792 /* releasing the caches does not affect the domdoc instances */
793 refcount = IXMLDOMSchemaCollection_Release(cache1);
794 ok(!refcount, "Unexpected refcount %ld.\n", refcount);
795 refcount = IXMLDOMSchemaCollection_Release(cache2);
796 ok(!refcount, "Unexpected refcount %ld.\n", refcount);
797 refcount = IXMLDOMSchemaCollection_Release(cache3);
798 ok(!refcount, "Unexpected refcount %ld.\n", refcount);
799
800 /* they're just for us */
801 if (schema1)
802 {
803 refcount = IXMLDOMDocument2_Release(schema1);
804 ok(!refcount, "Unexpected refcount %ld.\n", refcount);
805 }
806 if (schema2)
807 {
808 refcount = IXMLDOMDocument2_Release(schema2);
809 ok(!refcount, "Unexpected refcount %ld.\n", refcount);
810 }
811 if (schema3)
812 {
813 refcount = IXMLDOMDocument2_Release(schema3);
814 ok(!refcount, "Unexpected refcount %ld.\n", refcount);
815 }
816
817 free_bstrs();
818}
819
820static void test_length(void)
821{
822 IXMLDOMDocument2 *schema1, *schema2, *schema3;
823 IXMLDOMSchemaCollection *cache;
824 VARIANT_BOOL b;
825 HRESULT hr;
826 VARIANT v;
827 LONG length;
828
829 schema1 = create_document(&IID_IXMLDOMDocument2);
830 schema2 = create_document(&IID_IXMLDOMDocument2);
831 schema3 = create_document(&IID_IXMLDOMDocument2);
832
833 cache = create_cache(&IID_IXMLDOMSchemaCollection);
834
835 if (!schema1 || !schema2 || !schema3 || !cache)
836 {
837 if (schema1) IXMLDOMDocument2_Release(schema1);
838 if (schema2) IXMLDOMDocument2_Release(schema2);
839 if (schema3) IXMLDOMDocument2_Release(schema3);
840
841 if (cache) IXMLDOMSchemaCollection_Release(cache);
842
843 return;
844 }
845
846 VariantInit(&v);
847
848 hr = IXMLDOMDocument2_loadXML(schema1, _bstr_(xdr_schema1_xml), &b);
849 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
850 ok(b == VARIANT_TRUE, "failed to load XML\n");
851
852 hr = IXMLDOMDocument2_loadXML(schema2, _bstr_(xdr_schema2_xml), &b);
853 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
854 ok(b == VARIANT_TRUE, "failed to load XML\n");
855
856 hr = IXMLDOMDocument2_loadXML(schema3, _bstr_(xdr_schema3_xml), &b);
857 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
858 ok(b == VARIANT_TRUE, "failed to load XML\n");
859
860 hr = IXMLDOMSchemaCollection_get_length(cache, NULL);
861 ok(hr == E_POINTER, "Unexpected hr %#lx.\n", hr);
862
863 /* MSDN lies; removing a nonexistent entry produces no error */
864 hr = IXMLDOMSchemaCollection_remove(cache, NULL);
865 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
866 hr = IXMLDOMSchemaCollection_remove(cache, _bstr_(xdr_schema1_uri));
867 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
868
869 length = -1;
870 hr = IXMLDOMSchemaCollection_get_length(cache, &length);
871 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
872 ok(length == 0, "Unexpected length %ld.\n", length);
873
874 hr = IXMLDOMSchemaCollection_add(cache, _bstr_(xdr_schema1_uri), _variantdoc_(schema1));
875 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
876
877 length = -1;
878 hr = IXMLDOMSchemaCollection_get_length(cache, &length);
879 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
880 ok(length == 1, "Unexpected length %ld.\n", length);
881
882 hr = IXMLDOMSchemaCollection_add(cache, _bstr_(xdr_schema2_uri), _variantdoc_(schema2));
883 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
884
885 length = -1;
886 hr = IXMLDOMSchemaCollection_get_length(cache, &length);
887 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
888 ok(length == 2, "Unexpected length %ld.\n", length);
889
890 hr = IXMLDOMSchemaCollection_add(cache, _bstr_(xdr_schema3_uri), _variantdoc_(schema3));
891 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
892
893 length = -1;
894 hr = IXMLDOMSchemaCollection_get_length(cache, &length);
895 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
896 ok(length == 3, "Unexpected length %ld.\n", length);
897
898 /* adding with VT_NULL is the same as removing */
899 V_VT(&v) = VT_NULL;
900 hr = IXMLDOMSchemaCollection_add(cache, _bstr_(xdr_schema1_uri), v);
901 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
902
903 length = -1;
904 hr = IXMLDOMSchemaCollection_get_length(cache, &length);
905 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
906 ok(length == 2, "Unexpected length %ld.\n", length);
907
908 hr = IXMLDOMSchemaCollection_remove(cache, _bstr_(xdr_schema2_uri));
909 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
910
911 length = -1;
912 hr = IXMLDOMSchemaCollection_get_length(cache, &length);
913 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
914 ok(length == 1, "Unexpected length %ld.\n", length);
915
916 hr = IXMLDOMSchemaCollection_remove(cache, _bstr_(xdr_schema3_uri));
917 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
918
919 length = -1;
920 hr = IXMLDOMSchemaCollection_get_length(cache, &length);
921 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
922 ok(length == 0, "Unexpected length %ld.\n", length);
923
924 IXMLDOMDocument2_Release(schema1);
925 IXMLDOMDocument2_Release(schema2);
926 IXMLDOMDocument2_Release(schema3);
927 IXMLDOMSchemaCollection_Release(cache);
928
929 free_bstrs();
930}
931
932static void test_collection_content(void)
933{
934 IXMLDOMDocument2 *schema1, *schema2, *schema3;
935 BSTR content[5] = {NULL, NULL, NULL, NULL, NULL};
936 IXMLDOMSchemaCollection *cache1;
937 VARIANT_BOOL b;
938 LONG length;
939 HRESULT hr;
940 BSTR bstr;
941 int i, j;
942
943 schema1 = create_document_version(30, &IID_IXMLDOMDocument2);
944 schema2 = create_document_version(30, &IID_IXMLDOMDocument2);
945 schema3 = create_document_version(30, &IID_IXMLDOMDocument2);
946
947 cache1 = create_cache_version(30, &IID_IXMLDOMSchemaCollection);
948
949 if (!schema1 || !schema2 || !schema3 || !cache1)
950 {
951 if (schema1) IXMLDOMDocument2_Release(schema1);
952 if (schema2) IXMLDOMDocument2_Release(schema2);
953 if (schema3) IXMLDOMDocument2_Release(schema3);
954
955 if (cache1) IXMLDOMSchemaCollection_Release(cache1);
956
957 return;
958 }
959
960 hr = IXMLDOMDocument2_loadXML(schema1, _bstr_(xdr_schema1_xml), &b);
961 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
962 ok(b == VARIANT_TRUE, "failed to load XML\n");
963
964 hr = IXMLDOMDocument2_loadXML(schema2, _bstr_(xdr_schema2_xml), &b);
965 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
966 ok(b == VARIANT_TRUE, "failed to load XML\n");
967
968 hr = IXMLDOMDocument2_loadXML(schema3, _bstr_(xdr_schema3_xml), &b);
969 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
970 ok(b == VARIANT_TRUE, "failed to load XML\n");
971
972 hr = IXMLDOMSchemaCollection_add(cache1, _bstr_(xdr_schema1_uri), _variantdoc_(schema1));
973 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
974 hr = IXMLDOMSchemaCollection_add(cache1, _bstr_(xdr_schema2_uri), _variantdoc_(schema2));
975 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
976 hr = IXMLDOMSchemaCollection_add(cache1, _bstr_(xdr_schema3_uri), _variantdoc_(schema3));
977 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
978
979 length = -1;
980 hr = IXMLDOMSchemaCollection_get_length(cache1, &length);
981 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
982 ok(length == 3, "Unexpected length %ld.\n", length);
983
984 IXMLDOMDocument2_Release(schema1);
985 IXMLDOMDocument2_Release(schema2);
986 IXMLDOMDocument2_Release(schema3);
987
988 bstr = (void*)0xdeadbeef;
989 /* error if index is out of range */
990 hr = IXMLDOMSchemaCollection_get_namespaceURI(cache1, 3, &bstr);
991 ok(hr == E_FAIL, "Unexpected hr %#lx.\n", hr);
992 ok(bstr == (void*)0xdeadbeef, "got %p\n", bstr);
993 /* error if return pointer is NULL */
994 hr = IXMLDOMSchemaCollection_get_namespaceURI(cache1, 0, NULL);
995 ok(hr == E_POINTER, "Unexpected hr %#lx.\n", hr);
996 /* pointer is checked first */
997 hr = IXMLDOMSchemaCollection_get_namespaceURI(cache1, 3, NULL);
998 ok(hr == E_POINTER, "Unexpected hr %#lx.\n", hr);
999
1000 schema1 = NULL;
1001 /* no error if ns uri does not exist */
1002 hr = IXMLDOMSchemaCollection_get(cache1, _bstr_(xsd_schema1_uri), (IXMLDOMNode**)&schema1);
1003 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
1004 ok(!schema1, "expected NULL\n");
1005 /* a NULL bstr corresponds to no-uri ns */
1006 hr = IXMLDOMSchemaCollection_get(cache1, NULL, (IXMLDOMNode**)&schema1);
1007 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
1008 ok(!schema1, "expected NULL\n");
1009 /* error if return pointer is NULL */
1010 hr = IXMLDOMSchemaCollection_get(cache1, _bstr_(xdr_schema1_uri), NULL);
1011 ok(hr == E_POINTER, "Unexpected hr %#lx.\n", hr);
1012
1013 for (i = 0; i < 3; ++i)
1014 {
1015 bstr = NULL;
1016 hr = IXMLDOMSchemaCollection_get_namespaceURI(cache1, i, &bstr);
1017 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
1018 ok(bstr != NULL && *bstr, "expected non-empty string\n");
1019 content[i] = bstr;
1020
1021 for (j = 0; j < i; ++j)
1022 ok(wcscmp(content[j], bstr), "got duplicate entry\n");
1023 }
1024
1025 for (i = 0; i < 3; ++i)
1026 {
1027 SysFreeString(content[i]);
1028 content[i] = NULL;
1029 }
1030
1031 IXMLDOMSchemaCollection_Release(cache1);
1032 free_bstrs();
1033}
1034
1035static void test_XDR_schemas(void)
1036{
1037 IXMLDOMDocument2 *doc, *schema;
1038 IXMLDOMSchemaCollection* cache;
1039 IXMLDOMParseError* err;
1040 VARIANT_BOOL b;
1041 HRESULT hr;
1042 VARIANT v;
1043 BSTR bstr;
1044
1045 doc = create_document(&IID_IXMLDOMDocument2);
1046 schema = create_document(&IID_IXMLDOMDocument2);
1047 cache = create_cache(&IID_IXMLDOMSchemaCollection);
1048
1049 if (!doc || !schema || !cache)
1050 {
1051 if (doc) IXMLDOMDocument2_Release(doc);
1052 if (schema) IXMLDOMDocument2_Release(schema);
1053 if (cache) IXMLDOMSchemaCollection_Release(cache);
1054
1055 return;
1056 }
1057
1058 VariantInit(&v);
1059
1060 hr = IXMLDOMDocument2_loadXML(doc, _bstr_(szOpenSeqXML1), &b);
1061 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
1062 ok(b == VARIANT_TRUE, "failed to load XML string\n");
1063
1064 hr = IXMLDOMDocument2_loadXML(schema, _bstr_(szOpenSeqXDR), &b);
1065 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
1066 ok(b == VARIANT_TRUE, "failed to load XML string\n");
1067
1068 /* load the schema */
1069 V_VT(&v) = VT_DISPATCH;
1070 V_DISPATCH(&v) = NULL;
1071 hr = IXMLDOMDocument2_QueryInterface(schema, &IID_IDispatch, (void**)&V_DISPATCH(&v));
1072 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
1073 ok(V_DISPATCH(&v) != NULL, "failed to get IDispatch interface\n");
1074 hr = IXMLDOMSchemaCollection_add(cache, _bstr_(L""), v);
1075 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
1076 VariantClear(&v);
1077
1078 /* associate the cache to the doc */
1079 V_VT(&v) = VT_DISPATCH;
1080 V_DISPATCH(&v) = NULL;
1081 hr = IXMLDOMSchemaCollection_QueryInterface(cache, &IID_IDispatch, (void**)&V_DISPATCH(&v));
1082 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
1083 ok(V_DISPATCH(&v) != NULL, "failed to get IDispatch interface\n");
1084 hr = IXMLDOMDocument2_putref_schemas(doc, v);
1085 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
1086 VariantClear(&v);
1087
1088 /* validate the doc
1089 * only declared elements in the declared order
1090 * this is fine */
1091 err = NULL;
1092 bstr = NULL;
1093 hr = IXMLDOMDocument2_validate(doc, &err);
1094 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
1095 ok(err != NULL, "domdoc_validate() should always set err\n");
1096 hr = IXMLDOMParseError_get_reason(err, &bstr);
1097 ok(hr == S_FALSE, "Unexpected hr %#lx.\n", hr);
1098 ok(IXMLDOMParseError_get_reason(err, &bstr) == S_FALSE, "got error: %s\n", wine_dbgstr_w(bstr));
1099 SysFreeString(bstr);
1100 IXMLDOMParseError_Release(err);
1101
1102 /* load the next doc */
1103 IXMLDOMDocument2_Release(doc);
1104 doc = create_document(&IID_IXMLDOMDocument2);
1105 hr = IXMLDOMDocument2_loadXML(doc, _bstr_(szOpenSeqXML2), &b);
1106 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
1107 ok(b == VARIANT_TRUE, "failed to load XML string\n");
1108
1109 /* associate the cache to the doc */
1110 V_VT(&v) = VT_DISPATCH;
1111 V_DISPATCH(&v) = NULL;
1112 hr = IXMLDOMSchemaCollection_QueryInterface(cache, &IID_IDispatch, (void**)&V_DISPATCH(&v));
1113 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
1114 ok(V_DISPATCH(&v) != NULL, "failed to get IDispatch interface\n");
1115 hr = IXMLDOMDocument2_putref_schemas(doc, v);
1116 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
1117 VariantClear(&v);
1118
1119 /* validate the doc
1120 * declared elements in the declared order, with an extra declared element at the end
1121 * this is fine */
1122 err = NULL;
1123 bstr = NULL;
1124 hr = IXMLDOMDocument2_validate(doc, &err);
1125 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
1126 ok(err != NULL, "domdoc_validate() should always set err\n");
1127 hr = IXMLDOMParseError_get_reason(err, &bstr);
1128 ok(hr == S_FALSE, "Unexpected hr %#lx.\n", hr);
1129 ok(IXMLDOMParseError_get_reason(err, &bstr) == S_FALSE, "got error: %s\n", wine_dbgstr_w(bstr));
1130 SysFreeString(bstr);
1131 IXMLDOMParseError_Release(err);
1132
1133 /* load the next doc */
1134 IXMLDOMDocument2_Release(doc);
1135 doc = create_document(&IID_IXMLDOMDocument2);
1136 hr = IXMLDOMDocument2_loadXML(doc, _bstr_(szOpenSeqXML3), &b);
1137 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
1138 ok(b == VARIANT_TRUE, "failed to load XML string\n");
1139
1140 /* associate the cache to the doc */
1141 V_VT(&v) = VT_DISPATCH;
1142 V_DISPATCH(&v) = NULL;
1143 hr = IXMLDOMSchemaCollection_QueryInterface(cache, &IID_IDispatch, (void**)&V_DISPATCH(&v));
1144 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
1145 ok(V_DISPATCH(&v) != NULL, "failed to get IDispatch interface\n");
1146 hr = IXMLDOMDocument2_putref_schemas(doc, v);
1147 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
1148 VariantClear(&v);
1149
1150 /* validate the doc
1151 * fails, extra elements are only allowed at the end */
1152 err = NULL;
1153 bstr = NULL;
1154 hr = IXMLDOMDocument2_validate(doc, &err);
1155 ok(hr == S_FALSE, "Unexpected hr %#lx.\n", hr);
1156 ok(err != NULL, "domdoc_validate() should always set err\n");
1157 todo_wine ok(IXMLDOMParseError_get_reason(err, &bstr) == S_OK, "got error: %s\n", wine_dbgstr_w(bstr));
1158 SysFreeString(bstr);
1159 IXMLDOMParseError_Release(err);
1160
1161 /* load the next doc */
1162 IXMLDOMDocument2_Release(doc);
1163 doc = create_document(&IID_IXMLDOMDocument2);
1164 hr = IXMLDOMDocument2_loadXML(doc, _bstr_(szOpenSeqXML4), &b);
1165 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
1166 ok(b == VARIANT_TRUE, "failed to load XML string\n");
1167
1168 /* associate the cache to the doc */
1169 V_VT(&v) = VT_DISPATCH;
1170 V_DISPATCH(&v) = NULL;
1171 hr = IXMLDOMSchemaCollection_QueryInterface(cache, &IID_IDispatch, (void**)&V_DISPATCH(&v));
1172 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
1173 ok(V_DISPATCH(&v) != NULL, "failed to get IDispatch interface\n");
1174 hr = IXMLDOMDocument2_putref_schemas(doc, v);
1175 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
1176 VariantClear(&v);
1177
1178 /* validate the doc
1179 * fails, undeclared elements are not allowed */
1180 err = NULL;
1181 bstr = NULL;
1182 hr = IXMLDOMDocument2_validate(doc, &err);
1183 ok(hr == S_FALSE, "Unexpected hr %#lx.\n", hr);
1184 ok(err != NULL, "domdoc_validate() should always set err\n");
1185 todo_wine ok(IXMLDOMParseError_get_reason(err, &bstr) == S_OK, "got error: %s\n", wine_dbgstr_w(bstr));
1186 SysFreeString(bstr);
1187 IXMLDOMParseError_Release(err);
1188
1189 IXMLDOMDocument2_Release(doc);
1190 IXMLDOMDocument2_Release(schema);
1191 IXMLDOMSchemaCollection_Release(cache);
1192
1193 free_bstrs();
1194}
1195
1196typedef struct {
1197 const WCHAR *query;
1198 enum VARENUM type_schema;
1199 const WCHAR *typename;
1200 BOOL todo;
1201} xdr_datatypes;
1202
1203static const xdr_datatypes xdr_datatypes_data[] = {
1204 { L"//Property[Name!text()='testBase64']/Value/base64Data", VT_ARRAY|VT_UI1, L"bin.base64" },
1205 { L"//Property[Name!text()='testHex']/Value/hexData", VT_ARRAY|VT_UI1, L"bin.hex" },
1206 { L"//Property[Name!text()='testBool']/Value/boolData", VT_BOOL, L"boolean" },
1207 { L"//Property[Name!text()='testChar']/Value/charData", VT_I4, L"char", TRUE },
1208 { L"//Property[Name!text()='testDate']/Value/dateData", VT_DATE, L"date" },
1209 { L"//Property[Name!text()='testDateTime']/Value/dateTimeData", VT_DATE, L"dateTime" },
1210 { L"//Property[Name!text()='testDateTimeTz']/Value/dateTimeTzData", VT_DATE, L"dateTime.tz" },
1211 { L"//Property[Name!text()='testFixed']/Value/fixedData", VT_CY, L"fixed.14.4" },
1212 { L"//Property[Name!text()='testFloat']/Value/floatData", VT_R8, L"float" },
1213 { L"//Property[Name!text()='testI1']/Value/i1Data", VT_I1, L"i1" },
1214 { L"//Property[Name!text()='testI2']/Value/i2Data", VT_I2, L"i2" },
1215 { L"//Property[Name!text()='testI4']/Value/i4Data", VT_I4, L"i4" },
1216 { L"//Property[Name!text()='testI8']/Value/i8Data", VT_NULL, L"i8", TRUE },
1217 { L"//Property[Name!text()='testInt']/Value/intData", VT_I4, L"int" },
1218 { L"//Property[Name!text()='testNmtoken']/Value/nmtokData", VT_BSTR, NULL },
1219 { L"//Property[Name!text()='testNmtokens']/Value/nmtoksData", VT_BSTR, NULL },
1220 { L"//Property[Name!text()='testNumber']/Value/numData", VT_BSTR, L"number" },
1221 { L"//Property[Name!text()='testR4']/Value/r4Data", VT_R4, L"r4" },
1222 { L"//Property[Name!text()='testR8']/Value/r8Data", VT_R8, L"r8" },
1223 { L"//Property[Name!text()='testString']/Value/stringData", VT_BSTR, NULL },
1224 { L"//Property[Name!text()='testTime']/Value/timeData", VT_DATE, L"time" },
1225 { L"//Property[Name!text()='testTimeTz']/Value/timeTzData", VT_DATE, L"time.tz" },
1226 { L"//Property[Name!text()='testU1']/Value/u1Data", VT_UI1, L"ui1" },
1227 { L"//Property[Name!text()='testU2']/Value/u2Data", VT_UI2, L"ui2" },
1228 { L"//Property[Name!text()='testU4']/Value/u4Data", VT_UI4, L"ui4" },
1229 { L"//Property[Name!text()='testU8']/Value/u8Data", VT_NULL, L"ui8", TRUE },
1230 { L"//Property[Name!text()='testURI']/Value/uriData", VT_BSTR, L"uri" },
1231 { L"//Property[Name!text()='testUUID']/Value/uuidData", VT_BSTR, L"uuid" },
1232 { NULL }
1233};
1234
1235static void test_XDR_datatypes(void)
1236{
1237 IXMLDOMDocument2 *doc, *schema, *doc2;
1238 IXMLDOMSchemaCollection* cache;
1239 const xdr_datatypes *ptr;
1240 IXMLDOMParseError* err;
1241 VARIANT_BOOL b;
1242 HRESULT hr;
1243 VARIANT v;
1244 BSTR bstr;
1245 LONG l;
1246
1247 VariantInit(&v);
1248
1249 doc = create_document(&IID_IXMLDOMDocument2);
1250 doc2 = create_document(&IID_IXMLDOMDocument2);
1251 schema = create_document(&IID_IXMLDOMDocument2);
1252 cache = create_cache(&IID_IXMLDOMSchemaCollection);
1253
1254 if (!doc || !doc2 || !schema || !cache)
1255 {
1256 if (doc) IXMLDOMDocument2_Release(doc);
1257 if (doc2) IXMLDOMDocument2_Release(doc2);
1258 if (schema) IXMLDOMDocument2_Release(schema);
1259 if (cache) IXMLDOMSchemaCollection_Release(cache);
1260 return;
1261 }
1262
1263 hr = IXMLDOMDocument2_loadXML(doc, _bstr_(szDatatypeXML), &b);
1264 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
1265 ok(b == VARIANT_TRUE, "failed to load XML string\n");
1266
1267 hr = IXMLDOMDocument2_loadXML(doc2, _bstr_(szDatatypeXML), &b);
1268 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
1269 ok(b == VARIANT_TRUE, "failed to load XML string\n");
1270
1271 hr = IXMLDOMDocument2_loadXML(schema, _bstr_(szDatatypeXDR), &b);
1272 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
1273 ok(b == VARIANT_TRUE, "failed to load XML string\n");
1274
1275 err = NULL;
1276 hr = IXMLDOMDocument2_validate(doc, &err);
1277 ok(hr == S_FALSE, "Unexpected hr %#lx.\n", hr);
1278 ok(err != NULL, "domdoc_validate() should always set err\n");
1279 hr = IXMLDOMParseError_get_errorCode(err, &l);
1280 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
1281 ok(l == E_XML_NODTD, "Unexpected error code %#lx.\n", l);
1282 IXMLDOMParseError_Release(err);
1283
1284 err = NULL;
1285 hr = IXMLDOMDocument2_validate(doc2, &err);
1286 ok(hr == S_FALSE, "Unexpected hr %#lx.\n", hr);
1287 ok(err != NULL, "domdoc_validate() should always set err\n");
1288 hr = IXMLDOMParseError_get_errorCode(err, &l);
1289 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
1290 ok(l == E_XML_NODTD, "Unexpected error code %#lx.\n", l);
1291 IXMLDOMParseError_Release(err);
1292
1293 /* now load the schema */
1294 V_VT(&v) = VT_DISPATCH;
1295 V_DISPATCH(&v) = NULL;
1296 hr = IXMLDOMDocument2_QueryInterface(schema, &IID_IDispatch, (void**)&V_DISPATCH(&v));
1297 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
1298 ok(V_DISPATCH(&v) != NULL, "failed to get IDispatch interface\n");
1299 hr = IXMLDOMSchemaCollection_add(cache, _bstr_(L"urn:x-schema:datatype-test-xdr"), v);
1300 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
1301 VariantClear(&v);
1302
1303 /* associate the cache to the doc */
1304 V_VT(&v) = VT_DISPATCH;
1305 V_DISPATCH(&v) = NULL;
1306 hr = IXMLDOMSchemaCollection_QueryInterface(cache, &IID_IDispatch, (void**)&V_DISPATCH(&v));
1307 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
1308 ok(V_DISPATCH(&v) != NULL, "failed to get IDispatch interface\n");
1309 hr = IXMLDOMDocument2_putref_schemas(doc2, v);
1310 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
1311 VariantClear(&v);
1312
1313 /* validate the doc */
1314 err = NULL;
1315 l = 0;
1316 bstr = NULL;
1317 hr = IXMLDOMDocument2_validate(doc2, &err);
1318 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
1319 ok(err != NULL, "domdoc_validate() should always set err\n");
1320 hr = IXMLDOMParseError_get_errorCode(err, &l);
1321 ok(hr == S_FALSE, "Unexpected hr %#lx.\n", hr);
1322 hr = IXMLDOMParseError_get_reason(err, &bstr);
1323 ok(hr == S_FALSE, "Unexpected hr %#lx.\n", hr);
1324 ok(l == 0, "Unexpected value %lx : %s\n", l, wine_dbgstr_w(bstr));
1325 SysFreeString(bstr);
1326 IXMLDOMParseError_Release(err);
1327
1328 ptr = xdr_datatypes_data;
1329 while (ptr->query)
1330 {
1331 IXMLDOMNode* node = NULL;
1332 VARIANT type;
1333
1334 /* check data types without the schema */
1335 hr = IXMLDOMDocument2_selectSingleNode(doc, _bstr_(ptr->query), &node);
1336 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
1337 ok(node != NULL, "expected node\n");
1338
1339 V_VT(&type) = VT_EMPTY;
1340 V_BSTR(&type) = (void*)-1;
1341 hr = IXMLDOMNode_get_dataType(node, &type);
1342 ok(hr == S_FALSE, "Unexpected hr %#lx.\n", hr);
1343 ok(V_VT(&type) == VT_NULL, "got type %i\n", V_VT(&type));
1344 /* when returning VT_NULL, the pointer is set to NULL */
1345 ok(V_BSTR(&type) == NULL, "got %p\n", V_BSTR(&type));
1346
1347 VariantClear(&type);
1348 hr = IXMLDOMNode_get_nodeTypedValue(node, &type);
1349 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
1350 ok(V_VT(&type) == VT_BSTR, "got variant type %i\n", V_VT(&v));
1351 VariantClear(&type);
1352 IXMLDOMNode_Release(node);
1353
1354 /* check the data with schema */
1355 node = NULL;
1356 hr = IXMLDOMDocument2_selectSingleNode(doc2, _bstr_(ptr->query), &node);
1357 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
1358 ok(node != NULL, "expected node\n");
1359
1360 V_VT(&type) = VT_EMPTY;
1361 hr = IXMLDOMNode_get_dataType(node, &type);
1362 if (ptr->typename)
1363 {
1364 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
1365 ok(V_VT(&type) == VT_BSTR, "got type %i\n", V_VT(&type));
1366 ok(!lstrcmpW(V_BSTR(&type), _bstr_(ptr->typename)), "got %s\n", wine_dbgstr_w(V_BSTR(&type)));
1367 }
1368 else
1369 {
1370 ok(hr == S_FALSE, "Unexpected hr %#lx.\n", hr);
1371 ok(V_VT(&type) == VT_NULL, "%s: got type %i\n", wine_dbgstr_w(ptr->query), V_VT(&type));
1372 }
1373 VariantClear(&type);
1374
1375 VariantClear(&v);
1376 hr = IXMLDOMNode_get_nodeTypedValue(node, &v);
1377 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
1378
1379 todo_wine_if(ptr->todo)
1380 ok(V_VT(&v) == ptr->type_schema, "%s: got variant type %i\n", wine_dbgstr_w(ptr->query), V_VT(&v));
1381
1382 switch (ptr->type_schema)
1383 {
1384 case VT_BOOL:
1385 ok(V_BOOL(&v) == VARIANT_TRUE, "got %x\n", V_BOOL(&v));
1386 break;
1387 case VT_I1:
1388 ok(V_I1(&v) == 42, "got %i\n", V_I1(&v));
1389 break;
1390 case VT_I2:
1391 ok(V_I2(&v) == 420, "got %i\n", V_I2(&v));
1392 break;
1393 case VT_I4:
1394 if (!wcscmp(ptr->typename, L"int"))
1395 ok(V_I4(&v) == 42, "got %ld\n", V_I4(&v));
1396 else if (!wcscmp(ptr->typename, L"char"))
1397 todo_wine
1398 ok(V_I4(&v) == 'u', "got %lx\n", V_I4(&v));
1399 else
1400 ok(V_I4(&v) == -420000000, "got %ld\n", V_I4(&v));
1401 break;
1402 case VT_I8:
1403 expect_int64(V_I8(&v), -4200000000, 10);
1404 break;
1405 case VT_R4:
1406 ok(V_R4(&v) == (float)3.14159265, "got %f\n", V_R4(&v));
1407 break;
1408 case VT_R8:
1409 if (!wcscmp(ptr->typename, L"float"))
1410 ok(V_R8(&v) == 3.14159, "got %f\n", V_R8(&v));
1411 else
1412 todo_wine
1413 ok(V_R8(&v) == 3.14159265358979323846, "got %.20f\n", V_R8(&v));
1414 break;
1415 case VT_UI1:
1416 ok(V_UI1(&v) == 0xFF, "got %02x\n", V_UI1(&v));
1417 break;
1418 case VT_UI2:
1419 ok(V_UI2(&v) == 0xFFFF, "got %04x\n", V_UI2(&v));
1420 break;
1421 case VT_UI4:
1422 ok(V_UI4(&v) == 0xFFFFFFFF, "got %#lx\n", V_UI4(&v));
1423 break;
1424 case VT_UI8:
1425 expect_uint64(V_UI8(&v), 0xFFFFFFFFFFFFFFFF, 16);
1426 break;
1427 default:
1428 ;
1429 }
1430
1431 VariantClear(&v);
1432
1433 IXMLDOMNode_Release(node);
1434
1435 ptr++;
1436 }
1437
1438 IXMLDOMDocument2_Release(schema);
1439 IXMLDOMDocument2_Release(doc);
1440 IXMLDOMDocument2_Release(doc2);
1441 IXMLDOMSchemaCollection_Release(cache);
1442
1443 free_bstrs();
1444}
1445
1446static void test_obj_dispex(IUnknown *obj)
1447{
1448 DISPID dispid = DISPID_SAX_XMLREADER_GETFEATURE;
1449 IDispatchEx *dispex;
1450 IUnknown *unk;
1451 DWORD props;
1452 UINT ticnt;
1453 HRESULT hr;
1454 BSTR name;
1455
1456 hr = IUnknown_QueryInterface(obj, &IID_IDispatchEx, (void**)&dispex);
1457 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
1458 if (FAILED(hr)) return;
1459
1460 ticnt = 0;
1461 hr = IDispatchEx_GetTypeInfoCount(dispex, &ticnt);
1462 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
1463 ok(ticnt == 1, "ticnt=%u\n", ticnt);
1464
1465 name = SysAllocString(L"*");
1466 hr = IDispatchEx_DeleteMemberByName(dispex, name, fdexNameCaseSensitive);
1467 ok(hr == E_NOTIMPL, "Unexpected hr %#lx.\n", hr);
1468 SysFreeString(name);
1469
1470 hr = IDispatchEx_DeleteMemberByDispID(dispex, dispid);
1471 ok(hr == E_NOTIMPL, "Unexpected hr %#lx.\n", hr);
1472
1473 props = 0;
1474 hr = IDispatchEx_GetMemberProperties(dispex, dispid, grfdexPropCanAll, &props);
1475 ok(hr == E_NOTIMPL, "Unexpected hr %#lx.\n", hr);
1476 ok(props == 0, "expected 0 got %ld\n", props);
1477
1478 hr = IDispatchEx_GetMemberName(dispex, dispid, &name);
1479 ok(hr == E_NOTIMPL, "Unexpected hr %#lx.\n", hr);
1480 if (SUCCEEDED(hr)) SysFreeString(name);
1481
1482 hr = IDispatchEx_GetNextDispID(dispex, fdexEnumDefault, DISPID_XMLDOM_SCHEMACOLLECTION_ADD, &dispid);
1483 ok(hr == E_NOTIMPL, "Unexpected hr %#lx.\n", hr);
1484
1485 unk = (IUnknown*)0xdeadbeef;
1486 hr = IDispatchEx_GetNameSpaceParent(dispex, &unk);
1487 ok(hr == E_NOTIMPL, "Unexpected hr %#lx.\n", hr);
1488 ok(unk == (IUnknown*)0xdeadbeef, "got %p\n", unk);
1489
1490 name = SysAllocString(L"testprop");
1491 hr = IDispatchEx_GetDispID(dispex, name, fdexNameEnsure, &dispid);
1492 ok(hr == DISP_E_UNKNOWNNAME, "Unexpected hr %#lx.\n", hr);
1493 SysFreeString(name);
1494
1495 IDispatchEx_Release(dispex);
1496}
1497
1498static void test_dispex(void)
1499{
1500 IXMLDOMSchemaCollection *cache;
1501 IDispatchEx *dispex;
1502 IUnknown *unk;
1503 HRESULT hr;
1504 DISPPARAMS dispparams;
1505 VARIANT arg, ret;
1506
1507 cache = create_cache(&IID_IXMLDOMSchemaCollection);
1508 if (!cache) return;
1509
1510 hr = IXMLDOMSchemaCollection_QueryInterface(cache, &IID_IUnknown, (void**)&unk);
1511 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
1512 test_obj_dispex(unk);
1513 IUnknown_Release(unk);
1514
1515 hr = IXMLDOMSchemaCollection_QueryInterface(cache, &IID_IDispatchEx, (void**)&dispex);
1516 ok(hr == S_OK, "Unexpected hr %#lx.\n", hr);
1517
1518 V_VT(&arg) = VT_I4;
1519 V_I4(&arg) = 0;
1520 dispparams.cArgs = 1;
1521 dispparams.cNamedArgs = 0;
1522 dispparams.rgdispidNamedArgs = NULL;
1523 dispparams.rgvarg = &arg;
1524
1525 V_VT(&ret) = VT_EMPTY;
1526 V_DISPATCH(&ret) = (void*)0x1;
1527 hr = IDispatchEx_Invoke(dispex, DISPID_VALUE, &IID_NULL, 0, DISPATCH_METHOD, &dispparams, &ret, NULL, NULL);
1528 ok(hr == DISP_E_MEMBERNOTFOUND, "Unexpected hr %#lx.\n", hr);
1529 ok(V_VT(&ret) == VT_EMPTY, "got %d\n", V_VT(&ret));
1530 ok(V_DISPATCH(&ret) == (void*)0x1, "got %p\n", V_DISPATCH(&ret));
1531
1532 IDispatchEx_Release(dispex);
1533 IXMLDOMSchemaCollection_Release(cache);
1534}
1535
1536START_TEST(schema)
1537{
1538 HRESULT r;
1539
1540 r = CoInitialize( NULL );
1541 ok( r == S_OK, "failed to init com\n");
1542
1543 test_schema_refs();
1544 test_collection_refs();
1545 test_length();
1546 test_collection_content();
1547 test_XDR_schemas();
1548 test_XDR_datatypes();
1549 test_dispex();
1550
1551 CoUninitialize();
1552}
ok
#define ok(value,...)
Definition: atltest.h:57
START_TEST
#define START_TEST(x)
Definition: atltest.h:75
ARRAY_SIZE
#define ARRAY_SIZE(A)
Definition: main.h:20
IID_IUnknown
const GUID IID_IUnknown
Definition: classfactory.cpp:11
l
r l[0]
Definition: byte_order.h:168
E_NOTIMPL
#define E_NOTIMPL
Definition: ddrawi.h:99
E_FAIL
#define E_FAIL
Definition: ddrawi.h:102
NULL
#define NULL
Definition: types.h:112
TRUE
#define TRUE
Definition: types.h:120
content
content
Definition: atl_ax.c:994
BSTR
OLECHAR * BSTR
Definition: compat.h:2293
VARIANT_BOOL
short VARIANT_BOOL
Definition: compat.h:2290
VARENUM
VARENUM
Definition: compat.h:2294
VT_UI8
@ VT_UI8
Definition: compat.h:2315
VT_BSTR
@ VT_BSTR
Definition: compat.h:2303
VT_INT
@ VT_INT
Definition: compat.h:2316
VT_R4
@ VT_R4
Definition: compat.h:2299
VT_NULL
@ VT_NULL
Definition: compat.h:2296
VT_UNKNOWN
@ VT_UNKNOWN
Definition: compat.h:2308
VT_UI2
@ VT_UI2
Definition: compat.h:2312
VT_ARRAY
@ VT_ARRAY
Definition: compat.h:2341
VT_R8
@ VT_R8
Definition: compat.h:2300
VT_CY
@ VT_CY
Definition: compat.h:2301
VT_I8
@ VT_I8
Definition: compat.h:2314
VT_I1
@ VT_I1
Definition: compat.h:2310
VT_I4
@ VT_I4
Definition: compat.h:2298
VT_DATE
@ VT_DATE
Definition: compat.h:2302
VT_BOOL
@ VT_BOOL
Definition: compat.h:2306
VT_I2
@ VT_I2
Definition: compat.h:2297
VT_UI4
@ VT_UI4
Definition: compat.h:2313
VT_EMPTY
@ VT_EMPTY
Definition: compat.h:2295
VT_DISPATCH
@ VT_DISPATCH
Definition: compat.h:2304
VT_UI1
@ VT_UI1
Definition: compat.h:2311
lstrcmpW
int WINAPI lstrcmpW(LPCWSTR str1, LPCWSTR str2)
Definition: locale.c:4246
assert
#define assert(_expr)
Definition: assert.h:32
wcscmp
_ACRTIMP int __cdecl wcscmp(const wchar_t *, const wchar_t *)
Definition: wcs.c:1972
CoCreateInstance
HRESULT WINAPI DECLSPEC_HOTPATCH CoCreateInstance(REFCLSID rclsid, LPUNKNOWN pUnkOuter, DWORD dwClsContext, REFIID iid, LPVOID *ppv)
Definition: compobj.c:3325
CoInitialize
HRESULT WINAPI CoInitialize(LPVOID lpReserved)
Definition: compobj.c:1964
CoUninitialize
void WINAPI DECLSPEC_HOTPATCH CoUninitialize(void)
Definition: compobj.c:2067
ret
return ret
Definition: mutex.c:146
L
#define L(x)
Definition: resources.c:13
BOOL
unsigned int BOOL
Definition: ntddk_ex.h:94
DWORD
unsigned long DWORD
Definition: ntddk_ex.h:95
v
const GLdouble * v
Definition: gl.h:2040
type
GLuint GLuint GLsizei GLenum type
Definition: gl.h:1545
r
GLdouble GLdouble GLdouble r
Definition: gl.h:2055
b
GLboolean GLboolean GLboolean b
Definition: glext.h:6204
length
GLuint GLsizei GLsizei * length
Definition: glext.h:6040
len
GLenum GLsizei len
Definition: glext.h:6722
i
GLsizei GLenum const GLvoid GLsizei GLenum GLbyte GLbyte GLbyte GLdouble GLdouble GLdouble GLfloat GLfloat GLfloat GLint GLint GLint GLshort GLshort GLshort GLubyte GLubyte GLubyte GLuint GLuint GLuint GLushort GLushort GLushort GLbyte GLbyte GLbyte GLbyte GLdouble GLdouble GLdouble GLdouble GLfloat GLfloat GLfloat GLfloat GLint GLint GLint GLint GLshort GLshort GLshort GLshort GLubyte GLubyte GLubyte GLubyte GLuint GLuint GLuint GLuint GLushort GLushort GLushort GLushort GLboolean const GLdouble const GLfloat const GLint const GLshort const GLbyte const GLdouble const GLfloat const GLint const GLshort const GLdouble const GLfloat const GLint const GLshort const GLdouble const GLfloat const GLint const GLshort const GLdouble const GLfloat const GLint const GLshort const GLdouble const GLdouble const GLfloat const GLfloat const GLint const GLint const GLshort const GLshort const GLdouble const GLfloat const GLint const GLshort const GLdouble const GLfloat const GLint const GLshort const GLdouble const GLfloat const GLint const GLshort const GLdouble const GLfloat const GLint const GLshort const GLdouble const GLfloat const GLint const GLshort const GLdouble const GLfloat const GLint const GLshort const GLdouble const GLfloat const GLint const GLshort GLenum GLenum GLenum GLfloat GLenum GLint GLenum GLenum GLenum GLfloat GLenum GLenum GLint GLenum GLfloat GLenum GLint GLint GLushort GLenum GLenum GLfloat GLenum GLenum GLint GLfloat const GLubyte GLenum GLenum GLenum const GLfloat GLenum GLenum const GLint GLenum GLint GLint GLsizei GLsizei GLint GLenum GLenum const GLvoid GLenum GLenum const GLfloat GLenum GLenum const GLint GLenum GLenum const GLdouble GLenum GLenum const GLfloat GLenum GLenum const GLint GLsizei GLuint GLfloat GLuint GLbitfield GLfloat GLint GLuint GLboolean GLenum GLfloat GLenum GLbitfield GLenum GLfloat GLfloat GLint GLint const GLfloat GLenum GLfloat GLfloat GLint GLint GLfloat GLfloat GLint GLint const GLfloat GLint GLfloat GLfloat GLint GLfloat GLfloat GLint GLfloat GLfloat const GLdouble const GLfloat const GLdouble const GLfloat GLint i
Definition: glfuncs.h:248
j
GLsizei GLenum const GLvoid GLsizei GLenum GLbyte GLbyte GLbyte GLdouble GLdouble GLdouble GLfloat GLfloat GLfloat GLint GLint GLint GLshort GLshort GLshort GLubyte GLubyte GLubyte GLuint GLuint GLuint GLushort GLushort GLushort GLbyte GLbyte GLbyte GLbyte GLdouble GLdouble GLdouble GLdouble GLfloat GLfloat GLfloat GLfloat GLint GLint GLint GLint GLshort GLshort GLshort GLshort GLubyte GLubyte GLubyte GLubyte GLuint GLuint GLuint GLuint GLushort GLushort GLushort GLushort GLboolean const GLdouble const GLfloat const GLint const GLshort const GLbyte const GLdouble const GLfloat const GLint const GLshort const GLdouble const GLfloat const GLint const GLshort const GLdouble const GLfloat const GLint const GLshort const GLdouble const GLfloat const GLint const GLshort const GLdouble const GLdouble const GLfloat const GLfloat const GLint const GLint const GLshort const GLshort const GLdouble const GLfloat const GLint const GLshort const GLdouble const GLfloat const GLint const GLshort const GLdouble const GLfloat const GLint const GLshort const GLdouble const GLfloat const GLint const GLshort const GLdouble const GLfloat const GLint const GLshort const GLdouble const GLfloat const GLint const GLshort const GLdouble const GLfloat const GLint const GLshort GLenum GLenum GLenum GLfloat GLenum GLint GLenum GLenum GLenum GLfloat GLenum GLenum GLint GLenum GLfloat GLenum GLint GLint GLushort GLenum GLenum GLfloat GLenum GLenum GLint GLfloat const GLubyte GLenum GLenum GLenum const GLfloat GLenum GLenum const GLint GLenum GLint GLint GLsizei GLsizei GLint GLenum GLenum const GLvoid GLenum GLenum const GLfloat GLenum GLenum const GLint GLenum GLenum const GLdouble GLenum GLenum const GLfloat GLenum GLenum const GLint GLsizei GLuint GLfloat GLuint GLbitfield GLfloat GLint GLuint GLboolean GLenum GLfloat GLenum GLbitfield GLenum GLfloat GLfloat GLint GLint const GLfloat GLenum GLfloat GLfloat GLint GLint GLfloat GLfloat GLint GLint const GLfloat GLint GLfloat GLfloat GLint GLfloat GLfloat GLint GLfloat GLfloat const GLdouble const GLfloat const GLdouble const GLfloat GLint GLint GLint j
Definition: glfuncs.h:250
S_OK
#define S_OK
Definition: intsafe.h:52
SUCCEEDED
#define SUCCEEDED(hr)
Definition: intsafe.h:50
FAILED
#define FAILED(hr)
Definition: intsafe.h:51
b
#define b
Definition: ke_i.h:79
wine_dbgstr_w
#define wine_dbgstr_w
Definition: kernel32.h:34
schema
const WCHAR * schema
Definition: metadataquery.c:994
todo_wine_if
#define todo_wine_if(is_todo)
Definition: minitest.h:81
win_skip_
#define win_skip_(file, line)
Definition: minitest.h:61
todo_wine
#define todo_wine
Definition: minitest.h:80
ptr
static PVOID ptr
Definition: dispmode.c:27
create_cache
#define create_cache(iid)
Definition: schema.c:420
xdr_schema1_xml
static const WCHAR xdr_schema1_xml[]
Definition: schema.c:38
szOpenSeqXDR
static const WCHAR szOpenSeqXDR[]
Definition: schema.c:338
szOpenSeqXML1
static const WCHAR szOpenSeqXML1[]
Definition: schema.c:355
xdr_schema2_uri
static const WCHAR xdr_schema2_uri[]
Definition: schema.c:55
alloced_bstrs
static BSTR alloced_bstrs[256]
Definition: schema.c:376
szDatatypeXML
static const WCHAR szDatatypeXML[]
Definition: schema.c:165
test_XDR_schemas
static void test_XDR_schemas(void)
Definition: schema.c:1035
create_document_version
#define create_document_version(v, iid)
Definition: schema.c:418
szDatatypeXDR
static const WCHAR szDatatypeXDR[]
Definition: schema.c:89
xdr_datatypes_data
static const xdr_datatypes xdr_datatypes_data[]
Definition: schema.c:1203
test_collection_refs
static void test_collection_refs(void)
Definition: schema.c:627
test_XDR_datatypes
static void test_XDR_datatypes(void)
Definition: schema.c:1235
get_refcount
static ULONG get_refcount(void *iface)
Definition: schema.c:360
xdr_schema2_xml
static const WCHAR xdr_schema2_xml[]
Definition: schema.c:56
xdr_schema3_xml
static const WCHAR xdr_schema3_xml[]
Definition: schema.c:72
test_length
static void test_length(void)
Definition: schema.c:820
alloced_bstrs_count
static int alloced_bstrs_count
Definition: schema.c:377
free_bstrs
static void free_bstrs(void)
Definition: schema.c:386
xdr_schema3_uri
static const WCHAR xdr_schema3_uri[]
Definition: schema.c:71
expect_int64
#define expect_int64(expr, x, base)
Definition: schema.c:373
szOpenSeqXML4
static const WCHAR szOpenSeqXML4[]
Definition: schema.c:358
expect_uint64
#define expect_uint64(expr, x, base)
Definition: schema.c:374
_create_object
static void * _create_object(const GUID *clsid, const char *name, const IID *iid, int line)
Definition: schema.c:402
_bstr_
static BSTR _bstr_(const WCHAR *str)
Definition: schema.c:379
test_schema_refs
static void test_schema_refs(void)
Definition: schema.c:424
szOpenSeqXML2
static const WCHAR szOpenSeqXML2[]
Definition: schema.c:356
create_cache_version
#define create_cache_version(v, iid)
Definition: schema.c:422
create_document
#define create_document(iid)
Definition: schema.c:416
xdr_schema1_uri
static const WCHAR xdr_schema1_uri[]
Definition: schema.c:37
szOpenSeqXML3
static const WCHAR szOpenSeqXML3[]
Definition: schema.c:357
_variantdoc_
static VARIANT _variantdoc_(void *doc)
Definition: schema.c:394
test_obj_dispex
static void test_obj_dispex(IUnknown *obj)
Definition: schema.c:1446
test_collection_content
static void test_collection_content(void)
Definition: schema.c:932
test_dispex
static void test_dispex(void)
Definition: schema.c:1498
xsd_schema1_uri
static const WCHAR xsd_schema1_uri[]
Definition: schema.c:87
DISPID
static VARIANTARG static DISPID
Definition: ordinal.c:49
clsid
const CLSID * clsid
Definition: msctf.cpp:50
DISPID_XMLDOM_SCHEMACOLLECTION_ADD
#define DISPID_XMLDOM_SCHEMACOLLECTION_ADD
Definition: msxml2did.h:292
DISPID_SAX_XMLREADER_GETFEATURE
#define DISPID_SAX_XMLREADER_GETFEATURE
Definition: msxml2did.h:342
UINT
unsigned int UINT
Definition: ndis.h:50
SysAllocString
BSTR WINAPI SysAllocString(LPCOLESTR str)
Definition: oleaut.c:238
SysFreeString
void WINAPI DECLSPEC_HOTPATCH SysFreeString(BSTR str)
Definition: oleaut.c:271
V_UI1
#define V_UI1(A)
Definition: oleauto.h:266
V_I8
#define V_I8(A)
Definition: oleauto.h:249
V_BOOL
#define V_BOOL(A)
Definition: oleauto.h:224
V_UNKNOWN
#define V_UNKNOWN(A)
Definition: oleauto.h:281
V_UI2
#define V_UI2(A)
Definition: oleauto.h:268
V_I1
#define V_I1(A)
Definition: oleauto.h:243
DISPATCH_METHOD
#define DISPATCH_METHOD
Definition: oleauto.h:1006
V_VT
#define V_VT(A)
Definition: oleauto.h:211
V_BSTR
#define V_BSTR(A)
Definition: oleauto.h:226
V_I4
#define V_I4(A)
Definition: oleauto.h:247
V_R4
#define V_R4(A)
Definition: oleauto.h:260
V_UI4
#define V_UI4(A)
Definition: oleauto.h:270
V_DISPATCH
#define V_DISPATCH(A)
Definition: oleauto.h:239
V_R8
#define V_R8(A)
Definition: oleauto.h:262
V_UI8
#define V_UI8(A)
Definition: oleauto.h:272
V_I2
#define V_I2(A)
Definition: oleauto.h:245
IID_IDispatch
const GUID IID_IDispatch
LONG
long LONG
Definition: pedump.c:60
IID_NULL
#define IID_NULL
Definition: guiddef.h:98
err
#define err(...)
Definition: reactos_support_code.h:30
str
const WCHAR * str
Definition: rpc_transport.c:2696
hr
HRESULT hr
Definition: shlfolder.c:183
_IID
Definition: mstsclib_i.c:51
cache
Definition: cache.c:49
line
Definition: parser.c:49
name
Definition: name.c:39
xdr_datatypes
Definition: schema.c:1196
xdr_datatypes::todo
BOOL todo
Definition: schema.c:1200
xdr_datatypes::query
const WCHAR * query
Definition: schema.c:1197
xdr_datatypes::type_schema
enum VARENUM type_schema
Definition: schema.c:1198
ULONG
uint32_t ULONG
Definition: typedefs.h:59
node
Definition: dlist.c:348
VariantClear
HRESULT WINAPI DECLSPEC_HOTPATCH VariantClear(VARIANTARG *pVarg)
Definition: variant.c:648
VariantInit
void WINAPI VariantInit(VARIANTARG *pVarg)
Definition: variant.c:568
props
static const WCHAR props[]
Definition: wbemdisp.c:288
arg
void * arg
Definition: msvc.h:10
S_FALSE
#define S_FALSE
Definition: winerror.h:3451
DISP_E_MEMBERNOTFOUND
#define DISP_E_MEMBERNOTFOUND
Definition: winerror.h:3615
E_POINTER
#define E_POINTER
Definition: winerror.h:3480
DISP_E_UNKNOWNNAME
#define DISP_E_UNKNOWNNAME
Definition: winerror.h:3618
WCHAR
__wchar_t WCHAR
Definition: xmlstorage.h:180