dlls/xmllite/tests/reader.c

   1 /*
   2  * IXmlReader tests
   3  *
   4  * Copyright 2010, 2012-2013 Nikolay Sivov
   5  *
   6  * This library is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU Lesser General Public
   8  * License as published by the Free Software Foundation; either
   9  * version 2.1 of the License, or (at your option) any later version.
  10  *
  11  * This library is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * Lesser General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Lesser General Public
  17  * License along with this library; if not, write to the Free Software
  18  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  19  */
  20
  21 #define COBJMACROS
  22 #define CONST_VTABLE
  23
  24 #include <stdarg.h>
  25 #include <stdio.h>
  26
  27 #include "windef.h"
  28 #include "winbase.h"
  29 #include "initguid.h"
  30 #include "ole2.h"
  31 #include "xmllite.h"
  32 #include "wine/test.h"
  33
  34 DEFINE_GUID(IID_IXmlReaderInput, 0x0b3ccc9b, 0x9214, 0x428b, 0xa2, 0xae, 0xef, 0x3a, 0xa8, 0x71, 0xaf, 0xda);
  35
  36 static WCHAR *a2w(const char *str)
  37 {
  38     int len = MultiByteToWideChar(CP_ACP, 0, str, -1, NULL, 0);
  39     WCHAR *ret = HeapAlloc(GetProcessHeap(), 0, len*sizeof(WCHAR));
  40     MultiByteToWideChar(CP_ACP, 0, str, -1, ret, len);
  41     return ret;
  42 }
  43
  44 static void free_str(WCHAR *str)
  45 {
  46     HeapFree(GetProcessHeap(), 0, str);
  47 }
  48
  49 static const char xmldecl_full[] = "\xef\xbb\xbf<?xml version=\"1.0\" encoding=\"UTF-8\" standalone=\"yes\"?>\n";
  50 static const char xmldecl_short[] = "<?xml version=\"1.0\"?><RegistrationInfo/>";
  51
  52 static IStream *create_stream_on_data(const void *data, unsigned int size)
  53 {
  54     IStream *stream = NULL;
  55     HGLOBAL hglobal;
  56     void *ptr;
  57     HRESULT hr;
  58
  59     hglobal = GlobalAlloc(GHND, size);
  60     ptr = GlobalLock(hglobal);
  61
  62     memcpy(ptr, data, size);
  63
  64     hr = CreateStreamOnHGlobal(hglobal, TRUE, &stream);
  65     ok(hr == S_OK, "Expected S_OK, got %08x\n", hr);
  66     ok(stream != NULL, "Expected non-NULL stream\n");
  67
  68     GlobalUnlock(hglobal);
  69
  70     return stream;
  71 }
  72
  73 static void ok_pos_(IXmlReader *reader, int line, int pos, int line_broken,
  74                                         int pos_broken, BOOL todo, int _line_)
  75 {
  76     UINT l, p;
  77     HRESULT hr;
  78     BOOL broken_state;
  79
  80     hr = IXmlReader_GetLineNumber(reader, &l);
  81     ok_(__FILE__, _line_)(hr == S_OK, "Expected S_OK, got %08x\n", hr);
  82     hr = IXmlReader_GetLinePosition(reader, &p);
  83     ok_(__FILE__, _line_)(hr == S_OK, "Expected S_OK, got %08x\n", hr);
  84
  85     if (line_broken == -1 && pos_broken == -1)
  86         broken_state = FALSE;
  87     else
  88         broken_state = broken((line_broken == -1 ? line : line_broken) == l &&
  89                               (pos_broken == -1 ? pos : pos_broken) == p);
  90
  91     todo_wine_if (todo)
  92         ok_(__FILE__, _line_)((l == line && pos == p) || broken_state,
  93                             "Expected (%d,%d), got (%d,%d)\n", line, pos, l, p);
  94 }
  95 #define ok_pos(reader, l, p, l_brk, p_brk, todo) ok_pos_(reader, l, p, l_brk, p_brk, todo, __LINE__)
  96
  97 typedef struct input_iids_t {
  98     IID iids[10];
  99     int count;
 100 } input_iids_t;
 101
 102 static const IID *setinput_full[] = {
 103     &IID_IXmlReaderInput,
 104     &IID_IStream,
 105     &IID_ISequentialStream,
 106     NULL
 107 };
 108
 109 /* this applies to early xmllite versions */
 110 static const IID *setinput_full_old[] = {
 111     &IID_IXmlReaderInput,
 112     &IID_ISequentialStream,
 113     &IID_IStream,
 114     NULL
 115 };
 116
 117 /* after ::SetInput(IXmlReaderInput*) */
 118 static const IID *setinput_readerinput[] = {
 119     &IID_IStream,
 120     &IID_ISequentialStream,
 121     NULL
 122 };
 123
 124 static const IID *empty_seq[] = {
 125     NULL
 126 };
 127
 128 static input_iids_t input_iids;
 129
 130 static void ok_iids_(const input_iids_t *iids, const IID **expected, const IID **exp_broken, BOOL todo, int line)
 131 {
 132     int i = 0, size = 0;
 133
 134     while (expected[i++]) size++;
 135
 136     todo_wine_if (todo)
 137         ok_(__FILE__, line)(iids->count == size, "Sequence size mismatch (%d), got (%d)\n", size, iids->count);
 138
 139     if (iids->count != size) return;
 140
 141     for (i = 0; i < size; i++) {
 142         ok_(__FILE__, line)(IsEqualGUID(&iids->iids[i], expected[i]) ||
 143             (exp_broken ? broken(IsEqualGUID(&iids->iids[i], exp_broken[i])) : FALSE),
 144             "Wrong IID(%d), got %s\n", i, wine_dbgstr_guid(&iids->iids[i]));
 145     }
 146 }
 147 #define ok_iids(got, exp, brk, todo) ok_iids_(got, exp, brk, todo, __LINE__)
 148
 149 static const char *state_to_str(XmlReadState state)
 150 {
 151     static const char* state_names[] = {
 152         "XmlReadState_Initial",
 153         "XmlReadState_Interactive",
 154         "XmlReadState_Error",
 155         "XmlReadState_EndOfFile",
 156         "XmlReadState_Closed"
 157     };
 158
 159     static const char unknown[] = "unknown";
 160
 161     switch (state)
 162     {
 163     case XmlReadState_Initial:
 164     case XmlReadState_Interactive:
 165     case XmlReadState_Error:
 166     case XmlReadState_EndOfFile:
 167     case XmlReadState_Closed:
 168         return state_names[state];
 169     default:
 170         return unknown;
 171     }
 172 }
 173
 174 static const char *type_to_str(XmlNodeType type)
 175 {
 176     static const char* type_names[] = {
 177         "XmlNodeType_None",
 178         "XmlNodeType_Element",
 179         "XmlNodeType_Attribute",
 180         "XmlNodeType_Text",
 181         "XmlNodeType_CDATA",
 182         "", "",
 183         "XmlNodeType_ProcessingInstruction",
 184         "XmlNodeType_Comment",
 185         "",
 186         "XmlNodeType_DocumentType",
 187         "", "",
 188         "XmlNodeType_Whitespace",
 189         "",
 190         "XmlNodeType_EndElement",
 191         "",
 192         "XmlNodeType_XmlDeclaration"
 193     };
 194
 195     static const char unknown[] = "unknown";
 196
 197     switch (type)
 198     {
 199     case XmlNodeType_None:
 200     case XmlNodeType_Element:
 201     case XmlNodeType_Attribute:
 202     case XmlNodeType_Text:
 203     case XmlNodeType_CDATA:
 204     case XmlNodeType_ProcessingInstruction:
 205     case XmlNodeType_Comment:
 206     case XmlNodeType_DocumentType:
 207     case XmlNodeType_Whitespace:
 208     case XmlNodeType_EndElement:
 209     case XmlNodeType_XmlDeclaration:
 210         return type_names[type];
 211     default:
 212         return unknown;
 213     }
 214 }
 215
 216 static void test_read_state_(IXmlReader *reader, XmlReadState expected,
 217                              XmlReadState exp_broken, BOOL todo, int line)
 218 {
 219     LONG_PTR state;
 220     HRESULT hr;
 221     BOOL broken_state;
 222
 223     state = -1; /* invalid value */
 224     hr = IXmlReader_GetProperty(reader, XmlReaderProperty_ReadState, &state);
 225     ok_(__FILE__, line)(hr == S_OK, "Expected S_OK, got %08x\n", hr);
 226
 227     if (exp_broken == -1)
 228         broken_state = FALSE;
 229     else
 230         broken_state = broken(exp_broken == state);
 231
 232     todo_wine_if (todo)
 233         ok_(__FILE__, line)(state == expected || broken_state, "Expected (%s), got (%s)\n",
 234                                    state_to_str(expected), state_to_str(state));
 235 }
 236
 237 #define test_read_state(reader, exp, brk, todo) test_read_state_(reader, exp, brk, todo, __LINE__)
 238
 239 typedef struct _testinput
 240 {
 241     IUnknown IUnknown_iface;
 242     LONG ref;
 243 } testinput;
 244
 245 static inline testinput *impl_from_IUnknown(IUnknown *iface)
 246 {
 247     return CONTAINING_RECORD(iface, testinput, IUnknown_iface);
 248 }
 249
 250 static HRESULT WINAPI testinput_QueryInterface(IUnknown *iface, REFIID riid, void** ppvObj)
 251 {
 252     if (IsEqualGUID( riid, &IID_IUnknown ))
 253     {
 254         *ppvObj = iface;
 255         IUnknown_AddRef(iface);
 256         return S_OK;
 257     }
 258
 259     input_iids.iids[input_iids.count++] = *riid;
 260
 261     *ppvObj = NULL;
 262
 263     return E_NOINTERFACE;
 264 }
 265
 266 static ULONG WINAPI testinput_AddRef(IUnknown *iface)
 267 {
 268     testinput *This = impl_from_IUnknown(iface);
 269     return InterlockedIncrement(&This->ref);
 270 }
 271
 272 static ULONG WINAPI testinput_Release(IUnknown *iface)
 273 {
 274     testinput *This = impl_from_IUnknown(iface);
 275     LONG ref;
 276
 277     ref = InterlockedDecrement(&This->ref);
 278     if (ref == 0)
 279     {
 280         HeapFree(GetProcessHeap(), 0, This);
 281     }
 282
 283     return ref;
 284 }
 285
 286 static const struct IUnknownVtbl testinput_vtbl =
 287 {
 288     testinput_QueryInterface,
 289     testinput_AddRef,
 290     testinput_Release
 291 };
 292
 293 static HRESULT testinput_createinstance(void **ppObj)
 294 {
 295     testinput *input;
 296
 297     input = HeapAlloc(GetProcessHeap(), 0, sizeof (*input));
 298     if(!input) return E_OUTOFMEMORY;
 299
 300     input->IUnknown_iface.lpVtbl = &testinput_vtbl;
 301     input->ref = 1;
 302
 303     *ppObj = &input->IUnknown_iface;
 304
 305     return S_OK;
 306 }
 307
 308 static HRESULT WINAPI teststream_QueryInterface(ISequentialStream *iface, REFIID riid, void **obj)
 309 {
 310     if (IsEqualIID(riid, &IID_IUnknown) || IsEqualIID(riid, &IID_ISequentialStream))
 311     {
 312         *obj = iface;
 313         return S_OK;
 314     }
 315
 316     *obj = NULL;
 317     return E_NOINTERFACE;
 318 }
 319
 320 static ULONG WINAPI teststream_AddRef(ISequentialStream *iface)
 321 {
 322     return 2;
 323 }
 324
 325 static ULONG WINAPI teststream_Release(ISequentialStream *iface)
 326 {
 327     return 1;
 328 }
 329
 330 static int stream_readcall;
 331
 332 static HRESULT WINAPI teststream_Read(ISequentialStream *iface, void *pv, ULONG cb, ULONG *pread)
 333 {
 334     static const char xml[] = "<!-- comment -->";
 335
 336     if (stream_readcall++)
 337     {
 338         *pread = 0;
 339         return E_PENDING;
 340     }
 341
 342     *pread = sizeof(xml) / 2;
 343     memcpy(pv, xml, *pread);
 344     return S_OK;
 345 }
 346
 347 static HRESULT WINAPI teststream_Write(ISequentialStream *iface, const void *pv, ULONG cb, ULONG *written)
 348 {
 349     ok(0, "unexpected call\n");
 350     return E_NOTIMPL;
 351 }
 352
 353 static const ISequentialStreamVtbl teststreamvtbl =
 354 {
 355     teststream_QueryInterface,
 356     teststream_AddRef,
 357     teststream_Release,
 358     teststream_Read,
 359     teststream_Write
 360 };
 361
 362 static HRESULT WINAPI resolver_QI(IXmlResolver *iface, REFIID riid, void **obj)
 363 {
 364     ok(0, "unexpected call, riid %s\n", wine_dbgstr_guid(riid));
 365
 366     if (IsEqualIID(riid, &IID_IXmlResolver) || IsEqualIID(riid, &IID_IUnknown))
 367     {
 368         *obj = iface;
 369         IXmlResolver_AddRef(iface);
 370         return S_OK;
 371     }
 372
 373     *obj = NULL;
 374     return E_NOINTERFACE;
 375 }
 376
 377 static ULONG WINAPI resolver_AddRef(IXmlResolver *iface)
 378 {
 379     return 2;
 380 }
 381
 382 static ULONG WINAPI resolver_Release(IXmlResolver *iface)
 383 {
 384     return 1;
 385 }
 386
 387 static HRESULT WINAPI resolver_ResolveUri(IXmlResolver *iface, const WCHAR *base_uri,
 388     const WCHAR *public_id, const WCHAR *system_id, IUnknown **input)
 389 {
 390     ok(0, "unexpected call\n");
 391     return E_NOTIMPL;
 392 }
 393
 394 static const IXmlResolverVtbl resolvervtbl =
 395 {
 396     resolver_QI,
 397     resolver_AddRef,
 398     resolver_Release,
 399     resolver_ResolveUri
 400 };
 401
 402 static IXmlResolver testresolver = { &resolvervtbl };
 403
 404 static void test_reader_create(void)
 405 {
 406     IXmlResolver *resolver;
 407     HRESULT hr;
 408     IXmlReader *reader;
 409     IUnknown *input;
 410     DtdProcessing dtd;
 411     XmlNodeType nodetype;
 412
 413     /* crashes native */
 414     if (0)
 415     {
 416         CreateXmlReader(&IID_IXmlReader, NULL, NULL);
 417         CreateXmlReader(NULL, (void**)&reader, NULL);
 418     }
 419
 420     hr = CreateXmlReader(&IID_IXmlReader, (void**)&reader, NULL);
 421     ok(hr == S_OK, "Expected S_OK, got %08x\n", hr);
 422
 423     test_read_state(reader, XmlReadState_Closed, -1, FALSE);
 424
 425     nodetype = XmlNodeType_Element;
 426     hr = IXmlReader_GetNodeType(reader, &nodetype);
 427     ok(hr == S_FALSE, "got %08x\n", hr);
 428     ok(nodetype == XmlNodeType_None, "got %d\n", nodetype);
 429
 430     /* crashes on XP, 2k3, works on newer versions */
 431     if (0)
 432     {
 433         hr = IXmlReader_GetNodeType(reader, NULL);
 434         ok(hr == E_INVALIDARG, "got %08x\n", hr);
 435     }
 436
 437     resolver = (void*)0xdeadbeef;
 438     hr = IXmlReader_GetProperty(reader, XmlReaderProperty_XmlResolver, (LONG_PTR*)&resolver);
 439     ok(hr == S_OK, "got 0x%08x\n", hr);
 440     ok(resolver == NULL, "got %p\n", resolver);
 441
 442     hr = IXmlReader_SetProperty(reader, XmlReaderProperty_XmlResolver, 0);
 443     ok(hr == S_OK, "got 0x%08x\n", hr);
 444
 445     hr = IXmlReader_SetProperty(reader, XmlReaderProperty_XmlResolver, (LONG_PTR)&testresolver);
 446     ok(hr == S_OK, "got 0x%08x\n", hr);
 447
 448     resolver = NULL;
 449     hr = IXmlReader_GetProperty(reader, XmlReaderProperty_XmlResolver, (LONG_PTR*)&resolver);
 450     ok(hr == S_OK, "got 0x%08x\n", hr);
 451     ok(resolver == &testresolver, "got %p\n", resolver);
 452     IXmlResolver_Release(resolver);
 453
 454     hr = IXmlReader_SetProperty(reader, XmlReaderProperty_XmlResolver, 0);
 455     ok(hr == S_OK, "got 0x%08x\n", hr);
 456
 457     dtd = 2;
 458     hr = IXmlReader_GetProperty(reader, XmlReaderProperty_DtdProcessing, (LONG_PTR*)&dtd);
 459     ok(hr == S_OK, "Expected S_OK, got %08x\n", hr);
 460     ok(dtd == DtdProcessing_Prohibit, "got %d\n", dtd);
 461
 462     dtd = 2;
 463     hr = IXmlReader_SetProperty(reader, XmlReaderProperty_DtdProcessing, dtd);
 464     ok(hr == E_INVALIDARG, "Expected E_INVALIDARG, got %08x\n", hr);
 465
 466     hr = IXmlReader_SetProperty(reader, XmlReaderProperty_DtdProcessing, -1);
 467     ok(hr == E_INVALIDARG, "Expected E_INVALIDARG, got %08x\n", hr);
 468
 469     /* Null input pointer, releases previous input */
 470     hr = IXmlReader_SetInput(reader, NULL);
 471     ok(hr == S_OK, "Expected S_OK, got %08x\n", hr);
 472
 473     test_read_state(reader, XmlReadState_Initial, XmlReadState_Closed, FALSE);
 474
 475     /* test input interface selection sequence */
 476     hr = testinput_createinstance((void**)&input);
 477     ok(hr == S_OK, "Expected S_OK, got %08x\n", hr);
 478
 479     if (hr == S_OK)
 480     {
 481         input_iids.count = 0;
 482         hr = IXmlReader_SetInput(reader, input);
 483         ok(hr == E_NOINTERFACE, "Expected E_NOINTERFACE, got %08x\n", hr);
 484         ok_iids(&input_iids, setinput_full, setinput_full_old, FALSE);
 485         IUnknown_Release(input);
 486     }
 487     IXmlReader_Release(reader);
 488 }
 489
 490 static void test_readerinput(void)
 491 {
 492     IXmlReaderInput *reader_input;
 493     IXmlReader *reader, *reader2;
 494     IUnknown *obj, *input;
 495     IStream *stream, *stream2;
 496     XmlNodeType nodetype;
 497     HRESULT hr;
 498     LONG ref;
 499
 500     hr = CreateXmlReaderInputWithEncodingName(NULL, NULL, NULL, FALSE, NULL, NULL);
 501     ok(hr == E_INVALIDARG, "Expected E_INVALIDARG, got %08x\n", hr);
 502     hr = CreateXmlReaderInputWithEncodingName(NULL, NULL, NULL, FALSE, NULL, &reader_input);
 503     ok(hr == E_INVALIDARG, "Expected E_INVALIDARG, got %08x\n", hr);
 504
 505     hr = CreateStreamOnHGlobal(NULL, TRUE, &stream);
 506     ok(hr == S_OK, "Expected S_OK, got %08x\n", hr);
 507
 508     ref = IStream_AddRef(stream);
 509     ok(ref == 2, "Expected 2, got %d\n", ref);
 510     IStream_Release(stream);
 511     hr = CreateXmlReaderInputWithEncodingName((IUnknown*)stream, NULL, NULL, FALSE, NULL, &reader_input);
 512     ok(hr == S_OK, "Expected S_OK, got %08x\n", hr);
 513
 514     hr = IUnknown_QueryInterface(reader_input, &IID_IStream, (void**)&stream2);
 515     ok(hr == E_NOINTERFACE, "Expected S_OK, got %08x\n", hr);
 516
 517     hr = IUnknown_QueryInterface(reader_input, &IID_ISequentialStream, (void**)&stream2);
 518     ok(hr == E_NOINTERFACE, "Expected S_OK, got %08x\n", hr);
 519
 520     /* IXmlReaderInput grabs a stream reference */
 521     ref = IStream_AddRef(stream);
 522     ok(ref == 3, "Expected 3, got %d\n", ref);
 523     IStream_Release(stream);
 524
 525     /* try ::SetInput() with valid IXmlReaderInput */
 526     hr = CreateXmlReader(&IID_IXmlReader, (void**)&reader, NULL);
 527     ok(hr == S_OK, "Expected S_OK, got %08x\n", hr);
 528
 529     ref = IUnknown_AddRef(reader_input);
 530     ok(ref == 2, "Expected 2, got %d\n", ref);
 531     IUnknown_Release(reader_input);
 532
 533     hr = IXmlReader_SetInput(reader, reader_input);
 534     ok(hr == S_OK, "Expected S_OK, got %08x\n", hr);
 535
 536     test_read_state(reader, XmlReadState_Initial, -1, FALSE);
 537
 538     nodetype = XmlNodeType_Element;
 539     hr = IXmlReader_GetNodeType(reader, &nodetype);
 540     ok(hr == S_OK, "got %08x\n", hr);
 541     ok(nodetype == XmlNodeType_None, "got %d\n", nodetype);
 542
 543     /* IXmlReader grabs a IXmlReaderInput reference */
 544     ref = IUnknown_AddRef(reader_input);
 545     ok(ref == 3, "Expected 3, got %d\n", ref);
 546     IUnknown_Release(reader_input);
 547
 548     ref = IStream_AddRef(stream);
 549     ok(ref == 4, "Expected 4, got %d\n", ref);
 550     IStream_Release(stream);
 551
 552     /* reset input and check state */
 553     hr = IXmlReader_SetInput(reader, NULL);
 554     ok(hr == S_OK, "Expected S_OK, got %08x\n", hr);
 555
 556     test_read_state(reader, XmlReadState_Initial, XmlReadState_Closed, FALSE);
 557
 558     IXmlReader_Release(reader);
 559
 560     ref = IStream_AddRef(stream);
 561     ok(ref == 3, "Expected 3, got %d\n", ref);
 562     IStream_Release(stream);
 563
 564     ref = IUnknown_AddRef(reader_input);
 565     ok(ref == 2, "Expected 2, got %d\n", ref);
 566     IUnknown_Release(reader_input);
 567
 568     /* IID_IXmlReaderInput */
 569     /* it returns a kind of private undocumented vtable incompatible with IUnknown,
 570        so it's not a COM interface actually.
 571        Such query will be used only to check if input is really IXmlReaderInput */
 572     obj = (IUnknown*)0xdeadbeef;
 573     hr = IUnknown_QueryInterface(reader_input, &IID_IXmlReaderInput, (void**)&obj);
 574     ok(hr == S_OK, "Expected S_OK, got %08x\n", hr);
 575     ref = IUnknown_AddRef(reader_input);
 576     ok(ref == 3, "Expected 3, got %d\n", ref);
 577     IUnknown_Release(reader_input);
 578
 579     IUnknown_Release(reader_input);
 580     IUnknown_Release(reader_input);
 581     IStream_Release(stream);
 582
 583     /* test input interface selection sequence */
 584     input = NULL;
 585     hr = testinput_createinstance((void**)&input);
 586     ok(hr == S_OK, "Expected S_OK, got %08x\n", hr);
 587
 588     input_iids.count = 0;
 589     ref = IUnknown_AddRef(input);
 590     ok(ref == 2, "Expected 2, got %d\n", ref);
 591     IUnknown_Release(input);
 592     hr = CreateXmlReaderInputWithEncodingName(input, NULL, NULL, FALSE, NULL, &reader_input);
 593     ok(hr == S_OK, "Expected S_OK, got %08x\n", hr);
 594     ok_iids(&input_iids, empty_seq, NULL, FALSE);
 595     /* IXmlReaderInput stores stream interface as IUnknown */
 596     ref = IUnknown_AddRef(input);
 597     ok(ref == 3, "Expected 3, got %d\n", ref);
 598     IUnknown_Release(input);
 599
 600     hr = CreateXmlReader(&IID_IXmlReader, (LPVOID*)&reader, NULL);
 601     ok(hr == S_OK, "Expected S_OK, got %08x\n", hr);
 602
 603     input_iids.count = 0;
 604     ref = IUnknown_AddRef(reader_input);
 605     ok(ref == 2, "Expected 2, got %d\n", ref);
 606     IUnknown_Release(reader_input);
 607     ref = IUnknown_AddRef(input);
 608     ok(ref == 3, "Expected 3, got %d\n", ref);
 609     IUnknown_Release(input);
 610     hr = IXmlReader_SetInput(reader, reader_input);
 611     ok(hr == E_NOINTERFACE, "Expected E_NOINTERFACE, got %08x\n", hr);
 612     ok_iids(&input_iids, setinput_readerinput, NULL, FALSE);
 613
 614     test_read_state(reader, XmlReadState_Closed, -1, FALSE);
 615
 616     ref = IUnknown_AddRef(input);
 617     ok(ref == 3, "Expected 3, got %d\n", ref);
 618     IUnknown_Release(input);
 619
 620     ref = IUnknown_AddRef(reader_input);
 621     ok(ref == 3 || broken(ref == 2) /* versions 1.0.x and 1.1.x - XP, Vista */,
 622           "Expected 3, got %d\n", ref);
 623     IUnknown_Release(reader_input);
 624     /* repeat another time, no check or caching here */
 625     input_iids.count = 0;
 626     hr = IXmlReader_SetInput(reader, reader_input);
 627     ok(hr == E_NOINTERFACE, "Expected E_NOINTERFACE, got %08x\n", hr);
 628     ok_iids(&input_iids, setinput_readerinput, NULL, FALSE);
 629
 630     /* another reader */
 631     hr = CreateXmlReader(&IID_IXmlReader, (LPVOID*)&reader2, NULL);
 632     ok(hr == S_OK, "Expected S_OK, got %08x\n", hr);
 633
 634     /* resolving from IXmlReaderInput to IStream/ISequentialStream is done at
 635        ::SetInput() level, each time it's called */
 636     input_iids.count = 0;
 637     hr = IXmlReader_SetInput(reader2, reader_input);
 638     ok(hr == E_NOINTERFACE, "Expected E_NOINTERFACE, got %08x\n", hr);
 639     ok_iids(&input_iids, setinput_readerinput, NULL, FALSE);
 640
 641     IXmlReader_Release(reader2);
 642     IXmlReader_Release(reader);
 643
 644     IUnknown_Release(reader_input);
 645     IUnknown_Release(input);
 646 }
 647
 648 static void test_reader_state(void)
 649 {
 650     XmlNodeType nodetype;
 651     IXmlReader *reader;
 652     IStream *stream;
 653     HRESULT hr;
 654
 655     hr = CreateXmlReader(&IID_IXmlReader, (void**)&reader, NULL);
 656     ok(hr == S_OK, "Expected S_OK, got %08x\n", hr);
 657
 658     /* invalid arguments */
 659     hr = IXmlReader_GetProperty(reader, XmlReaderProperty_ReadState, NULL);
 660     ok(hr == E_INVALIDARG, "Expected E_INVALIDARG, got %08x\n", hr);
 661
 662     /* attempt to read on closed reader */
 663     test_read_state(reader, XmlReadState_Closed, -1, FALSE);
 664 if (0)
 665 {
 666     /* newer versions crash here, probably because no input was set */
 667     hr = IXmlReader_Read(reader, &nodetype);
 668     ok(hr == S_FALSE, "got %08x\n", hr);
 669 }
 670
 671     stream = create_stream_on_data("xml", sizeof("xml"));
 672
 673     hr = IXmlReader_SetInput(reader, (IUnknown *)stream);
 674     ok(hr == S_OK, "Expected S_OK, got %08x\n", hr);
 675
 676     test_read_state(reader, XmlReadState_Initial, -1, FALSE);
 677
 678     nodetype = XmlNodeType_Element;
 679     hr = IXmlReader_Read(reader, &nodetype);
 680 todo_wine
 681     ok(FAILED(hr), "got %08x\n", hr);
 682     ok(nodetype == XmlNodeType_None, "Unexpected node type %d\n", nodetype);
 683
 684     test_read_state(reader, XmlReadState_Error, -1, TRUE);
 685
 686     nodetype = XmlNodeType_Element;
 687     hr = IXmlReader_Read(reader, &nodetype);
 688 todo_wine
 689     ok(FAILED(hr), "got %08x\n", hr);
 690     ok(nodetype == XmlNodeType_None, "Unexpected node type %d\n", nodetype);
 691
 692     IStream_Release(stream);
 693     IXmlReader_Release(reader);
 694 }
 695
 696 static void test_read_xmldeclaration(void)
 697 {
 698     static const WCHAR xmlW[] = {'x','m','l',0};
 699     static const WCHAR RegistrationInfoW[] = {'R','e','g','i','s','t','r','a','t','i','o','n','I','n','f','o',0};
 700     static const struct
 701     {
 702         WCHAR name[12];
 703         WCHAR val[12];
 704     } name_val[] =
 705     {
 706         { {'v','e','r','s','i','o','n',0}, {'1','.','0',0} },
 707         { {'e','n','c','o','d','i','n','g',0}, {'U','T','F','-','8',0} },
 708         { {'s','t','a','n','d','a','l','o','n','e',0}, {'y','e','s',0} }
 709     };
 710     IXmlReader *reader;
 711     IStream *stream;
 712     HRESULT hr;
 713     XmlNodeType type;
 714     UINT count = 0, len, i;
 715     BOOL ret;
 716     const WCHAR *val;
 717
 718     hr = CreateXmlReader(&IID_IXmlReader, (LPVOID*)&reader, NULL);
 719     ok(hr == S_OK, "Expected S_OK, got %08x\n", hr);
 720
 721     /* position methods with Null args */
 722     hr = IXmlReader_GetLineNumber(reader, NULL);
 723     ok(hr == E_INVALIDARG, "Expected E_INVALIDARG, got %08x\n", hr);
 724
 725     hr = IXmlReader_GetLinePosition(reader, NULL);
 726     ok(hr == E_INVALIDARG, "Expected E_INVALIDARG, got %08x\n", hr);
 727
 728     stream = create_stream_on_data(xmldecl_full, sizeof(xmldecl_full));
 729
 730     hr = IXmlReader_SetInput(reader, (IUnknown*)stream);
 731     ok(hr == S_OK, "Expected S_OK, got %08x\n", hr);
 732
 733     hr = IXmlReader_GetAttributeCount(reader, &count);
 734     ok(hr == S_OK, "got %08x\n", hr);
 735     ok(count == 0, "got %d\n", count);
 736
 737     /* try to move without attributes */
 738     hr = IXmlReader_MoveToElement(reader);
 739     ok(hr == S_FALSE, "got %08x\n", hr);
 740
 741     hr = IXmlReader_MoveToNextAttribute(reader);
 742     ok(hr == S_FALSE, "got %08x\n", hr);
 743
 744     hr = IXmlReader_MoveToFirstAttribute(reader);
 745     ok(hr == S_FALSE, "got %08x\n", hr);
 746
 747     ok_pos(reader, 0, 0, -1, -1, FALSE);
 748
 749     type = -1;
 750     hr = IXmlReader_Read(reader, &type);
 751     ok(hr == S_OK, "Expected S_OK, got %08x\n", hr);
 752     ok(type == XmlNodeType_XmlDeclaration,
 753                      "Expected XmlNodeType_XmlDeclaration, got %s\n", type_to_str(type));
 754     /* new version 1.2.x and 1.3.x properly update position for <?xml ?> */
 755     ok_pos(reader, 1, 3, -1, 55, TRUE);
 756     test_read_state(reader, XmlReadState_Interactive, -1, FALSE);
 757
 758     hr = IXmlReader_GetValue(reader, &val, NULL);
 759     ok(hr == S_OK, "got %08x\n", hr);
 760     ok(*val == 0, "got %s\n", wine_dbgstr_w(val));
 761
 762     /* check attributes */
 763     hr = IXmlReader_MoveToNextAttribute(reader);
 764     ok(hr == S_OK, "got %08x\n", hr);
 765
 766     type = XmlNodeType_None;
 767     hr = IXmlReader_GetNodeType(reader, &type);
 768     ok(hr == S_OK, "got %08x\n", hr);
 769     ok(type == XmlNodeType_Attribute, "got %d\n", type);
 770
 771     ok_pos(reader, 1, 7, -1, 55, TRUE);
 772
 773     /* try to move from last attribute */
 774     hr = IXmlReader_MoveToNextAttribute(reader);
 775     ok(hr == S_OK, "got %08x\n", hr);
 776     hr = IXmlReader_MoveToNextAttribute(reader);
 777     ok(hr == S_OK, "got %08x\n", hr);
 778     hr = IXmlReader_MoveToNextAttribute(reader);
 779     ok(hr == S_FALSE, "got %08x\n", hr);
 780
 781     type = XmlNodeType_None;
 782     hr = IXmlReader_GetNodeType(reader, &type);
 783     ok(hr == S_OK, "got %08x\n", hr);
 784     ok(type == XmlNodeType_Attribute, "got %d\n", type);
 785
 786     hr = IXmlReader_MoveToFirstAttribute(reader);
 787     ok(hr == S_OK, "got %08x\n", hr);
 788     ok_pos(reader, 1, 7, -1, 55, TRUE);
 789
 790     hr = IXmlReader_GetAttributeCount(reader, NULL);
 791     ok(hr == E_INVALIDARG, "got %08x\n", hr);
 792
 793     hr = IXmlReader_GetAttributeCount(reader, &count);
 794     ok(hr == S_OK, "got %08x\n", hr);
 795     ok(count == 3, "Expected 3, got %d\n", count);
 796
 797     for (i = 0; i < count; i++)
 798     {
 799         len = 0;
 800         hr = IXmlReader_GetLocalName(reader, &val, &len);
 801         ok(hr == S_OK, "got %08x\n", hr);
 802         ok(len == lstrlenW(name_val[i].name), "expected %u, got %u\n", lstrlenW(name_val[i].name), len);
 803         ok(!lstrcmpW(name_val[i].name, val), "expected %s, got %s\n", wine_dbgstr_w(name_val[i].name), wine_dbgstr_w(val));
 804
 805         len = 0;
 806         hr = IXmlReader_GetValue(reader, &val, &len);
 807         ok(hr == S_OK, "got %08x\n", hr);
 808         ok(len == lstrlenW(name_val[i].val), "expected %u, got %u\n", lstrlenW(name_val[i].val), len);
 809         ok(!lstrcmpW(name_val[i].val, val), "expected %s, got %s\n", wine_dbgstr_w(name_val[i].val), wine_dbgstr_w(val));
 810
 811         hr = IXmlReader_MoveToNextAttribute(reader);
 812         ok(hr == ((i < count - 1) ? S_OK : S_FALSE), "got %08x\n", hr);
 813     }
 814
 815     hr = IXmlReader_GetDepth(reader, &count);
 816     ok(hr == S_OK, "Expected S_OK, got %08x\n", hr);
 817     ok(count == 1, "Expected 1, got %d\n", count);
 818
 819     hr = IXmlReader_MoveToElement(reader);
 820     ok(hr == S_OK, "got %08x\n", hr);
 821
 822     type = XmlNodeType_None;
 823     hr = IXmlReader_GetNodeType(reader, &type);
 824     ok(hr == S_OK, "got %08x\n", hr);
 825     ok(type == XmlNodeType_XmlDeclaration, "got %d\n", type);
 826
 827     type = XmlNodeType_XmlDeclaration;
 828     hr = IXmlReader_Read(reader, &type);
 829     /* newer versions return syntax error here cause document is incomplete,
 830        it makes more sense than invalid char error */
 831 todo_wine {
 832     ok(hr == WC_E_SYNTAX || broken(hr == WC_E_XMLCHARACTER), "got 0x%08x\n", hr);
 833     ok(type == XmlNodeType_None, "got %d\n", type);
 834 }
 835     IStream_Release(stream);
 836
 837     /* test short variant */
 838     stream = create_stream_on_data(xmldecl_short, sizeof(xmldecl_short));
 839
 840     hr = IXmlReader_SetInput(reader, (IUnknown *)stream);
 841     ok(hr == S_OK, "expected S_OK, got %08x\n", hr);
 842
 843     type = -1;
 844     hr = IXmlReader_Read(reader, &type);
 845     ok(hr == S_OK, "expected S_OK, got %08x\n", hr);
 846     ok(type == XmlNodeType_XmlDeclaration, "expected XmlDeclaration, got %s\n", type_to_str(type));
 847     ok_pos(reader, 1, 3, 1, 21, TRUE);
 848     test_read_state(reader, XmlReadState_Interactive, -1, TRUE);
 849
 850     hr = IXmlReader_GetAttributeCount(reader, &count);
 851     ok(hr == S_OK, "expected S_OK, got %08x\n", hr);
 852     ok(count == 1, "expected 1, got %d\n", count);
 853
 854     ret = IXmlReader_IsEmptyElement(reader);
 855     ok(!ret, "element should not be empty\n");
 856
 857     hr = IXmlReader_GetValue(reader, &val, NULL);
 858     ok(hr == S_OK, "expected S_OK, got %08x\n", hr);
 859     ok(*val == 0, "got %s\n", wine_dbgstr_w(val));
 860
 861     hr = IXmlReader_GetLocalName(reader, &val, NULL);
 862     ok(hr == S_OK, "expected S_OK, got %08x\n", hr);
 863 todo_wine
 864     ok(!lstrcmpW(val, xmlW), "got %s\n", wine_dbgstr_w(val));
 865
 866     /* check attributes */
 867     hr = IXmlReader_MoveToNextAttribute(reader);
 868     ok(hr == S_OK, "expected S_OK, got %08x\n", hr);
 869
 870     type = -1;
 871     hr = IXmlReader_GetNodeType(reader, &type);
 872     ok(hr == S_OK, "expected S_OK, got %08x\n", hr);
 873     ok(type == XmlNodeType_Attribute, "got %d\n", type);
 874     ok_pos(reader, 1, 7, 1, 21, TRUE);
 875
 876     /* try to move from last attribute */
 877     hr = IXmlReader_MoveToNextAttribute(reader);
 878     ok(hr == S_FALSE, "expected S_FALSE, got %08x\n", hr);
 879
 880     type = -1;
 881     hr = IXmlReader_Read(reader, &type);
 882     ok(hr == S_OK, "expected S_OK, got %08x\n", hr);
 883     ok(type == XmlNodeType_Element, "expected Element, got %s\n", type_to_str(type));
 884     ok_pos(reader, 1, 23, 1, 40, TRUE);
 885     test_read_state(reader, XmlReadState_Interactive, -1, TRUE);
 886
 887     hr = IXmlReader_GetAttributeCount(reader, &count);
 888     ok(hr == S_OK, "expected S_OK, got %08x\n", hr);
 889     ok(count == 0, "expected 0, got %d\n", count);
 890
 891     ret = IXmlReader_IsEmptyElement(reader);
 892     ok(ret, "element should be empty\n");
 893
 894     hr = IXmlReader_GetValue(reader, &val, NULL);
 895     ok(hr == S_OK, "expected S_OK, got %08x\n", hr);
 896 todo_wine
 897     ok(*val == 0, "got %s\n", wine_dbgstr_w(val));
 898
 899     hr = IXmlReader_GetLocalName(reader, &val, NULL);
 900     ok(hr == S_OK, "expected S_OK, got %08x\n", hr);
 901     ok(!lstrcmpW(val, RegistrationInfoW), "got %s\n", wine_dbgstr_w(val));
 902
 903     type = -1;
 904     hr = IXmlReader_Read(reader, &type);
 905 todo_wine
 906     ok(hr == WC_E_SYNTAX || hr == WC_E_XMLCHARACTER /* XP */, "expected WC_E_SYNTAX, got %08x\n", hr);
 907     ok(type == XmlNodeType_None, "expected XmlNodeType_None, got %s\n", type_to_str(type));
 908     ok_pos(reader, 1, 41, -1, -1, TRUE);
 909     test_read_state(reader, XmlReadState_Error, -1, TRUE);
 910
 911     IStream_Release(stream);
 912     IXmlReader_Release(reader);
 913 }
 914
 915 struct test_entry {
 916     const char *xml;
 917     const char *name;
 918     const char *value;
 919     HRESULT hr;
 920     HRESULT hr_broken; /* this is set to older version results */
 921     BOOL todo;
 922 };
 923
 924 static struct test_entry comment_tests[] = {
 925     { "<!-- comment -->", "", " comment ", S_OK },
 926     { "<!-- - comment-->", "", " - comment", S_OK },
 927     { "<!-- -- comment-->", NULL, NULL, WC_E_COMMENT, WC_E_GREATERTHAN },
 928     { "<!-- -- comment--->", NULL, NULL, WC_E_COMMENT, WC_E_GREATERTHAN },
 929     { NULL }
 930 };
 931
 932 static void test_read_comment(void)
 933 {
 934     struct test_entry *test = comment_tests;
 935     IXmlReader *reader;
 936     HRESULT hr;
 937
 938     hr = CreateXmlReader(&IID_IXmlReader, (void**)&reader, NULL);
 939     ok(hr == S_OK, "S_OK, got %08x\n", hr);
 940
 941     while (test->xml)
 942     {
 943         XmlNodeType type;
 944         IStream *stream;
 945
 946         stream = create_stream_on_data(test->xml, strlen(test->xml)+1);
 947         hr = IXmlReader_SetInput(reader, (IUnknown*)stream);
 948         ok(hr == S_OK, "got %08x\n", hr);
 949
 950         type = XmlNodeType_None;
 951         hr = IXmlReader_Read(reader, &type);
 952         if (test->hr_broken)
 953             ok(hr == test->hr || broken(hr == test->hr_broken), "got %08x for %s\n", hr, test->xml);
 954         else
 955             ok(hr == test->hr, "got %08x for %s\n", hr, test->xml);
 956         if (hr == S_OK)
 957         {
 958             const WCHAR *str;
 959             WCHAR *str_exp;
 960             UINT len;
 961
 962             ok(type == XmlNodeType_Comment, "got %d for %s\n", type, test->xml);
 963
 964             len = 1;
 965             str = NULL;
 966             hr = IXmlReader_GetLocalName(reader, &str, &len);
 967             ok(hr == S_OK, "got 0x%08x\n", hr);
 968             ok(len == strlen(test->name), "got %u\n", len);
 969             str_exp = a2w(test->name);
 970             ok(!lstrcmpW(str, str_exp), "got %s\n", wine_dbgstr_w(str));
 971             free_str(str_exp);
 972
 973             len = 1;
 974             str = NULL;
 975             hr = IXmlReader_GetQualifiedName(reader, &str, &len);
 976             ok(hr == S_OK, "got 0x%08x\n", hr);
 977             ok(len == strlen(test->name), "got %u\n", len);
 978             str_exp = a2w(test->name);
 979             ok(!lstrcmpW(str, str_exp), "got %s\n", wine_dbgstr_w(str));
 980             free_str(str_exp);
 981
 982             /* value */
 983             len = 1;
 984             str = NULL;
 985             hr = IXmlReader_GetValue(reader, &str, &len);
 986             ok(hr == S_OK, "got 0x%08x\n", hr);
 987             ok(len == strlen(test->value), "got %u\n", len);
 988             str_exp = a2w(test->value);
 989             ok(!lstrcmpW(str, str_exp), "got %s\n", wine_dbgstr_w(str));
 990             free_str(str_exp);
 991         }
 992
 993         IStream_Release(stream);
 994         test++;
 995     }
 996
 997     IXmlReader_Release(reader);
 998 }
 999
1000 static struct test_entry pi_tests[] = {
1001     { "<?pi?>", "pi", "", S_OK },
1002     { "<?pi ?>", "pi", "", S_OK },
1003     { "<?pi  ?>", "pi", "", S_OK },
1004     { "<?pi pi data?>", "pi", "pi data", S_OK },
1005     { "<?pi pi data  ?>", "pi", "pi data  ", S_OK },
1006     { "<?pi    data  ?>", "pi", "data  ", S_OK },
1007     { "<?pi:pi?>", NULL, NULL, NC_E_NAMECOLON, WC_E_NAMECHARACTER },
1008     { "<?:pi ?>", NULL, NULL, WC_E_PI, WC_E_NAMECHARACTER },
1009     { "<?-pi ?>", NULL, NULL, WC_E_PI, WC_E_NAMECHARACTER },
1010     { "<?xml-stylesheet ?>", "xml-stylesheet", "", S_OK },
1011     { NULL }
1012 };
1013
1014 static void test_read_pi(void)
1015 {
1016     struct test_entry *test = pi_tests;
1017     IXmlReader *reader;
1018     HRESULT hr;
1019
1020     hr = CreateXmlReader(&IID_IXmlReader, (void**)&reader, NULL);
1021     ok(hr == S_OK, "S_OK, got %08x\n", hr);
1022
1023     while (test->xml)
1024     {
1025         XmlNodeType type;
1026         IStream *stream;
1027
1028         stream = create_stream_on_data(test->xml, strlen(test->xml)+1);
1029         hr = IXmlReader_SetInput(reader, (IUnknown*)stream);
1030         ok(hr == S_OK, "got %08x\n", hr);
1031
1032         type = XmlNodeType_None;
1033         hr = IXmlReader_Read(reader, &type);
1034         if (test->hr_broken)
1035             ok(hr == test->hr || broken(hr == test->hr_broken), "got %08x for %s\n", hr, test->xml);
1036         else
1037             ok(hr == test->hr, "got %08x for %s\n", hr, test->xml);
1038         if (hr == S_OK)
1039         {
1040             const WCHAR *str;
1041             WCHAR *str_exp;
1042             UINT len;
1043
1044             ok(type == XmlNodeType_ProcessingInstruction, "got %d for %s\n", type, test->xml);
1045
1046             len = 0;
1047             str = NULL;
1048             hr = IXmlReader_GetLocalName(reader, &str, &len);
1049             ok(hr == S_OK, "got 0x%08x\n", hr);
1050             ok(len == strlen(test->name), "got %u\n", len);
1051             str_exp = a2w(test->name);
1052             ok(!lstrcmpW(str, str_exp), "got %s\n", wine_dbgstr_w(str));
1053             free_str(str_exp);
1054
1055             len = 0;
1056             str = NULL;
1057             hr = IXmlReader_GetQualifiedName(reader, &str, &len);
1058             ok(hr == S_OK, "got 0x%08x\n", hr);
1059             ok(len == strlen(test->name), "got %u\n", len);
1060             str_exp = a2w(test->name);
1061             ok(!lstrcmpW(str, str_exp), "got %s\n", wine_dbgstr_w(str));
1062             free_str(str_exp);
1063
1064             /* value */
1065             len = !strlen(test->value);
1066             str = NULL;
1067             hr = IXmlReader_GetValue(reader, &str, &len);
1068             ok(hr == S_OK, "got 0x%08x\n", hr);
1069             ok(len == strlen(test->value), "got %u\n", len);
1070             str_exp = a2w(test->value);
1071             ok(!lstrcmpW(str, str_exp), "got %s\n", wine_dbgstr_w(str));
1072             free_str(str_exp);
1073         }
1074
1075         IStream_Release(stream);
1076         test++;
1077     }
1078
1079     IXmlReader_Release(reader);
1080 }
1081
1082 struct nodes_test {
1083     const char *xml;
1084     XmlNodeType types[20];
1085 };
1086
1087 static const char misc_test_xml[] =
1088     "<!-- comment1 -->"
1089     "<!-- comment2 -->"
1090     "<?pi1 pi1body ?>"
1091     "<!-- comment3 -->"
1092     " \t \r \n"
1093     "<!-- comment4 -->"
1094     "<a>"
1095     "\r\n\t"
1096     "<b/>"
1097     "text"
1098     "<!-- comment -->"
1099     "text2"
1100     "<?pi pibody ?>"
1101     "\r\n"
1102     "</a>"
1103 ;
1104
1105 static struct nodes_test misc_test = {
1106     misc_test_xml,
1107     {
1108         XmlNodeType_Comment,
1109         XmlNodeType_Comment,
1110         XmlNodeType_ProcessingInstruction,
1111         XmlNodeType_Comment,
1112         XmlNodeType_Whitespace,
1113         XmlNodeType_Comment,
1114         XmlNodeType_Element,
1115         XmlNodeType_Whitespace,
1116         XmlNodeType_Element,
1117         XmlNodeType_Text,
1118         XmlNodeType_Comment,
1119         XmlNodeType_Text,
1120         XmlNodeType_ProcessingInstruction,
1121         XmlNodeType_Whitespace,
1122         XmlNodeType_EndElement,
1123         XmlNodeType_None
1124     }
1125 };
1126
1127 static void test_read_full(void)
1128 {
1129     struct nodes_test *test = &misc_test;
1130     IXmlReader *reader;
1131     XmlNodeType type;
1132     IStream *stream;
1133     HRESULT hr;
1134     int i;
1135
1136     hr = CreateXmlReader(&IID_IXmlReader, (void**)&reader, NULL);
1137     ok(hr == S_OK, "S_OK, got %08x\n", hr);
1138
1139     stream = create_stream_on_data(test->xml, strlen(test->xml)+1);
1140     hr = IXmlReader_SetInput(reader, (IUnknown*)stream);
1141     ok(hr == S_OK, "got %08x\n", hr);
1142
1143     i = 0;
1144     type = ~0u;
1145     while (IXmlReader_Read(reader, &type) == S_OK)
1146     {
1147         ok(test->types[i] != XmlNodeType_None, "%d: unexpected end of test data\n", i);
1148         if (test->types[i] == XmlNodeType_None) break;
1149         ok(type == test->types[i], "%d: got wrong type %d, expected %d\n", i, type, test->types[i]);
1150         if (type == XmlNodeType_Whitespace)
1151         {
1152             const WCHAR *ptr;
1153             UINT len = 0;
1154
1155             hr = IXmlReader_GetValue(reader, &ptr, &len);
1156             ok(hr == S_OK, "%d: GetValue failed 0x%08x\n", i, hr);
1157             ok(len > 0, "%d: wrong value length %d\n", i, len);
1158         }
1159         i++;
1160     }
1161     ok(test->types[i] == XmlNodeType_None, "incomplete sequence, got %d\n", test->types[i]);
1162
1163     IStream_Release(stream);
1164     IXmlReader_Release(reader);
1165 }
1166
1167 static const char test_public_dtd[] =
1168     "<!DOCTYPE testdtd PUBLIC \"pubid\" \"externalid uri\" >";
1169
1170 static void test_read_public_dtd(void)
1171 {
1172     static const WCHAR sysvalW[] = {'e','x','t','e','r','n','a','l','i','d',' ','u','r','i',0};
1173     static const WCHAR pubvalW[] = {'p','u','b','i','d',0};
1174     static const WCHAR dtdnameW[] = {'t','e','s','t','d','t','d',0};
1175     static const WCHAR sysW[] = {'S','Y','S','T','E','M',0};
1176     static const WCHAR pubW[] = {'P','U','B','L','I','C',0};
1177     IXmlReader *reader;
1178     const WCHAR *str;
1179     XmlNodeType type;
1180     IStream *stream;
1181     UINT len, count;
1182     HRESULT hr;
1183
1184     hr = CreateXmlReader(&IID_IXmlReader, (void**)&reader, NULL);
1185     ok(hr == S_OK, "S_OK, got %08x\n", hr);
1186
1187     hr = IXmlReader_SetProperty(reader, XmlReaderProperty_DtdProcessing, DtdProcessing_Parse);
1188     ok(hr == S_OK, "got 0x%8x\n", hr);
1189
1190     stream = create_stream_on_data(test_public_dtd, sizeof(test_public_dtd));
1191     hr = IXmlReader_SetInput(reader, (IUnknown*)stream);
1192     ok(hr == S_OK, "got %08x\n", hr);
1193
1194     type = XmlNodeType_None;
1195     hr = IXmlReader_Read(reader, &type);
1196     ok(hr == S_OK, "got 0x%8x\n", hr);
1197     ok(type == XmlNodeType_DocumentType, "got type %d\n", type);
1198
1199     count = 0;
1200     hr = IXmlReader_GetAttributeCount(reader, &count);
1201     ok(hr == S_OK, "got %08x\n", hr);
1202     ok(count == 2, "got %d\n", count);
1203
1204     hr = IXmlReader_MoveToFirstAttribute(reader);
1205     ok(hr == S_OK, "got %08x\n", hr);
1206
1207     type = XmlNodeType_None;
1208     hr = IXmlReader_GetNodeType(reader, &type);
1209     ok(hr == S_OK, "got %08x\n", hr);
1210     ok(type == XmlNodeType_Attribute, "got %d\n", type);
1211
1212     len = 0;
1213     str = NULL;
1214     hr = IXmlReader_GetLocalName(reader, &str, &len);
1215     ok(hr == S_OK, "got 0x%08x\n", hr);
1216     ok(len == lstrlenW(pubW), "got %u\n", len);
1217     ok(!lstrcmpW(str, pubW), "got %s\n", wine_dbgstr_w(str));
1218
1219     len = 0;
1220     str = NULL;
1221     hr = IXmlReader_GetValue(reader, &str, &len);
1222     ok(hr == S_OK, "got 0x%08x\n", hr);
1223     ok(len == lstrlenW(pubvalW), "got %u\n", len);
1224     ok(!lstrcmpW(str, pubvalW), "got %s\n", wine_dbgstr_w(str));
1225
1226     hr = IXmlReader_MoveToNextAttribute(reader);
1227     ok(hr == S_OK, "got %08x\n", hr);
1228
1229     type = XmlNodeType_None;
1230     hr = IXmlReader_GetNodeType(reader, &type);
1231     ok(hr == S_OK, "got %08x\n", hr);
1232     ok(type == XmlNodeType_Attribute, "got %d\n", type);
1233
1234     len = 0;
1235     str = NULL;
1236     hr = IXmlReader_GetLocalName(reader, &str, &len);
1237     ok(hr == S_OK, "got 0x%08x\n", hr);
1238     ok(len == lstrlenW(sysW), "got %u\n", len);
1239     ok(!lstrcmpW(str, sysW), "got %s\n", wine_dbgstr_w(str));
1240
1241     len = 0;
1242     str = NULL;
1243     hr = IXmlReader_GetValue(reader, &str, &len);
1244     ok(hr == S_OK, "got 0x%08x\n", hr);
1245     ok(len == lstrlenW(sysvalW), "got %u\n", len);
1246     ok(!lstrcmpW(str, sysvalW), "got %s\n", wine_dbgstr_w(str));
1247
1248     hr = IXmlReader_MoveToElement(reader);
1249     ok(hr == S_OK, "got 0x%08x\n", hr);
1250
1251     len = 0;
1252     str = NULL;
1253     hr = IXmlReader_GetLocalName(reader, &str, &len);
1254     ok(hr == S_OK, "got 0x%08x\n", hr);
1255 todo_wine {
1256     ok(len == lstrlenW(dtdnameW), "got %u\n", len);
1257     ok(!lstrcmpW(str, dtdnameW), "got %s\n", wine_dbgstr_w(str));
1258 }
1259     len = 0;
1260     str = NULL;
1261     hr = IXmlReader_GetQualifiedName(reader, &str, &len);
1262     ok(hr == S_OK, "got 0x%08x\n", hr);
1263     ok(len == lstrlenW(dtdnameW), "got %u\n", len);
1264     ok(!lstrcmpW(str, dtdnameW), "got %s\n", wine_dbgstr_w(str));
1265
1266     IStream_Release(stream);
1267     IXmlReader_Release(reader);
1268 }
1269
1270 static const char test_system_dtd[] =
1271     "<!DOCTYPE testdtd SYSTEM \"externalid uri\" >"
1272     "<!-- comment -->";
1273
1274 static void test_read_system_dtd(void)
1275 {
1276     static const WCHAR sysvalW[] = {'e','x','t','e','r','n','a','l','i','d',' ','u','r','i',0};
1277     static const WCHAR dtdnameW[] = {'t','e','s','t','d','t','d',0};
1278     static const WCHAR sysW[] = {'S','Y','S','T','E','M',0};
1279     IXmlReader *reader;
1280     const WCHAR *str;
1281     XmlNodeType type;
1282     IStream *stream;
1283     UINT len, count;
1284     HRESULT hr;
1285
1286     hr = CreateXmlReader(&IID_IXmlReader, (void**)&reader, NULL);
1287     ok(hr == S_OK, "S_OK, got %08x\n", hr);
1288
1289     hr = IXmlReader_SetProperty(reader, XmlReaderProperty_DtdProcessing, DtdProcessing_Parse);
1290     ok(hr == S_OK, "got 0x%8x\n", hr);
1291
1292     stream = create_stream_on_data(test_system_dtd, sizeof(test_system_dtd));
1293     hr = IXmlReader_SetInput(reader, (IUnknown*)stream);
1294     ok(hr == S_OK, "got %08x\n", hr);
1295
1296     type = XmlNodeType_None;
1297     hr = IXmlReader_Read(reader, &type);
1298     ok(hr == S_OK, "got 0x%8x\n", hr);
1299     ok(type == XmlNodeType_DocumentType, "got type %d\n", type);
1300
1301     count = 0;
1302     hr = IXmlReader_GetAttributeCount(reader, &count);
1303     ok(hr == S_OK, "got %08x\n", hr);
1304     ok(count == 1, "got %d\n", count);
1305
1306     hr = IXmlReader_MoveToFirstAttribute(reader);
1307     ok(hr == S_OK, "got %08x\n", hr);
1308
1309     type = XmlNodeType_None;
1310     hr = IXmlReader_GetNodeType(reader, &type);
1311     ok(hr == S_OK, "got %08x\n", hr);
1312     ok(type == XmlNodeType_Attribute, "got %d\n", type);
1313
1314     len = 0;
1315     str = NULL;
1316     hr = IXmlReader_GetLocalName(reader, &str, &len);
1317     ok(hr == S_OK, "got 0x%08x\n", hr);
1318     ok(len == lstrlenW(sysW), "got %u\n", len);
1319     ok(!lstrcmpW(str, sysW), "got %s\n", wine_dbgstr_w(str));
1320
1321     len = 0;
1322     str = NULL;
1323     hr = IXmlReader_GetValue(reader, &str, &len);
1324     ok(hr == S_OK, "got 0x%08x\n", hr);
1325     ok(len == lstrlenW(sysvalW), "got %u\n", len);
1326     ok(!lstrcmpW(str, sysvalW), "got %s\n", wine_dbgstr_w(str));
1327
1328     hr = IXmlReader_MoveToElement(reader);
1329     ok(hr == S_OK, "got 0x%08x\n", hr);
1330
1331     len = 0;
1332     str = NULL;
1333     hr = IXmlReader_GetLocalName(reader, &str, &len);
1334     ok(hr == S_OK, "got 0x%08x\n", hr);
1335 todo_wine {
1336     ok(len == lstrlenW(dtdnameW), "got %u\n", len);
1337     ok(!lstrcmpW(str, dtdnameW), "got %s\n", wine_dbgstr_w(str));
1338 }
1339     len = 0;
1340     str = NULL;
1341     hr = IXmlReader_GetQualifiedName(reader, &str, &len);
1342     ok(hr == S_OK, "got 0x%08x\n", hr);
1343     ok(len == lstrlenW(dtdnameW), "got %u\n", len);
1344     ok(!lstrcmpW(str, dtdnameW), "got %s\n", wine_dbgstr_w(str));
1345
1346     type = XmlNodeType_None;
1347     hr = IXmlReader_Read(reader, &type);
1348     ok(hr == S_OK, "got 0x%8x\n", hr);
1349     ok(type == XmlNodeType_Comment, "got type %d\n", type);
1350
1351     IStream_Release(stream);
1352     IXmlReader_Release(reader);
1353 }
1354
1355 static struct test_entry element_tests[] = {
1356     { "<a/>", "a", "", S_OK },
1357     { "<a />", "a", "", S_OK },
1358     { "<a:b/>", "a:b", "", NC_E_UNDECLAREDPREFIX },
1359     { "<:a/>", NULL, NULL, NC_E_QNAMECHARACTER },
1360     { "< a/>", NULL, NULL, NC_E_QNAMECHARACTER },
1361     { "<a>", "a", "", S_OK },
1362     { "<a >", "a", "", S_OK },
1363     { "<a \r \t\n>", "a", "", S_OK },
1364     { "</a>", NULL, NULL, NC_E_QNAMECHARACTER },
1365     { NULL }
1366 };
1367
1368 static void test_read_element(void)
1369 {
1370     struct test_entry *test = element_tests;
1371     static const char stag[] = "<a><b></b></a>";
1372     static const char mismatch[] = "<a></b>";
1373     IXmlReader *reader;
1374     XmlNodeType type;
1375     IStream *stream;
1376     UINT depth;
1377     HRESULT hr;
1378
1379     hr = CreateXmlReader(&IID_IXmlReader, (void**)&reader, NULL);
1380     ok(hr == S_OK, "S_OK, got %08x\n", hr);
1381
1382     while (test->xml)
1383     {
1384         stream = create_stream_on_data(test->xml, strlen(test->xml)+1);
1385         hr = IXmlReader_SetInput(reader, (IUnknown*)stream);
1386         ok(hr == S_OK, "got %08x\n", hr);
1387
1388         type = XmlNodeType_None;
1389         hr = IXmlReader_Read(reader, &type);
1390         if (test->hr_broken)
1391             ok(hr == test->hr || broken(hr == test->hr_broken), "got %08x for %s\n", hr, test->xml);
1392         else
1393             todo_wine_if(test->hr == NC_E_UNDECLAREDPREFIX)
1394                 ok(hr == test->hr, "got %08x for %s\n", hr, test->xml);
1395         if (hr == S_OK)
1396         {
1397             const WCHAR *str;
1398             WCHAR *str_exp;
1399             UINT len;
1400
1401             ok(type == XmlNodeType_Element, "got %d for %s\n", type, test->xml);
1402
1403             len = 0;
1404             str = NULL;
1405             hr = IXmlReader_GetQualifiedName(reader, &str, &len);
1406             ok(hr == S_OK, "got 0x%08x\n", hr);
1407             ok(len == strlen(test->name), "got %u\n", len);
1408             str_exp = a2w(test->name);
1409             ok(!lstrcmpW(str, str_exp), "got %s\n", wine_dbgstr_w(str));
1410             free_str(str_exp);
1411
1412             /* value */
1413             len = 1;
1414             str = NULL;
1415             hr = IXmlReader_GetValue(reader, &str, &len);
1416             ok(hr == S_OK, "got 0x%08x\n", hr);
1417             ok(len == 0, "got %u\n", len);
1418             ok(*str == 0, "got %s\n", wine_dbgstr_w(str));
1419         }
1420
1421         IStream_Release(stream);
1422         test++;
1423     }
1424
1425     /* test reader depth increment */
1426     stream = create_stream_on_data(stag, sizeof(stag));
1427     hr = IXmlReader_SetInput(reader, (IUnknown*)stream);
1428     ok(hr == S_OK, "got %08x\n", hr);
1429
1430     depth = 1;
1431     hr = IXmlReader_GetDepth(reader, &depth);
1432     ok(hr == S_OK, "got %08x\n", hr);
1433     ok(depth == 0, "got %d\n", depth);
1434
1435     type = XmlNodeType_None;
1436     hr = IXmlReader_Read(reader, &type);
1437     ok(hr == S_OK, "got %08x\n", hr);
1438     ok(type == XmlNodeType_Element, "got %d\n", type);
1439
1440     depth = 1;
1441     hr = IXmlReader_GetDepth(reader, &depth);
1442     ok(hr == S_OK, "got %08x\n", hr);
1443     ok(depth == 0, "got %d\n", depth);
1444
1445     type = XmlNodeType_None;
1446     hr = IXmlReader_Read(reader, &type);
1447     ok(hr == S_OK, "got %08x\n", hr);
1448     ok(type == XmlNodeType_Element, "got %d\n", type);
1449
1450     depth = 0;
1451     hr = IXmlReader_GetDepth(reader, &depth);
1452     ok(hr == S_OK, "got %08x\n", hr);
1453     ok(depth == 1, "got %d\n", depth);
1454
1455     /* read end tag for inner element */
1456     type = XmlNodeType_None;
1457     hr = IXmlReader_Read(reader, &type);
1458     ok(hr == S_OK, "got %08x\n", hr);
1459     ok(type == XmlNodeType_EndElement, "got %d\n", type);
1460
1461     depth = 0;
1462     hr = IXmlReader_GetDepth(reader, &depth);
1463     ok(hr == S_OK, "got %08x\n", hr);
1464 todo_wine
1465     ok(depth == 2, "got %d\n", depth);
1466
1467     /* read end tag for container element */
1468     type = XmlNodeType_None;
1469     hr = IXmlReader_Read(reader, &type);
1470     ok(hr == S_OK, "got %08x\n", hr);
1471     ok(type == XmlNodeType_EndElement, "got %d\n", type);
1472
1473     depth = 0;
1474     hr = IXmlReader_GetDepth(reader, &depth);
1475     ok(hr == S_OK, "got %08x\n", hr);
1476     ok(depth == 1, "got %d\n", depth);
1477
1478     IStream_Release(stream);
1479
1480     /* start/end tag mismatch */
1481     stream = create_stream_on_data(mismatch, sizeof(mismatch));
1482     hr = IXmlReader_SetInput(reader, (IUnknown*)stream);
1483     ok(hr == S_OK, "got %08x\n", hr);
1484
1485     type = XmlNodeType_None;
1486     hr = IXmlReader_Read(reader, &type);
1487     ok(hr == S_OK, "got %08x\n", hr);
1488     ok(type == XmlNodeType_Element, "got %d\n", type);
1489
1490     type = XmlNodeType_Element;
1491     hr = IXmlReader_Read(reader, &type);
1492     ok(hr == WC_E_ELEMENTMATCH, "got %08x\n", hr);
1493 todo_wine
1494     ok(type == XmlNodeType_None, "got %d\n", type);
1495
1496     IStream_Release(stream);
1497
1498     IXmlReader_Release(reader);
1499 }
1500
1501 static ISequentialStream teststream = { &teststreamvtbl };
1502
1503 static void test_read_pending(void)
1504 {
1505     IXmlReader *reader;
1506     const WCHAR *value;
1507     XmlNodeType type;
1508     HRESULT hr;
1509     int c;
1510
1511     hr = CreateXmlReader(&IID_IXmlReader, (void**)&reader, NULL);
1512     ok(hr == S_OK, "S_OK, got 0x%08x\n", hr);
1513
1514     hr = IXmlReader_SetInput(reader, (IUnknown*)&teststream);
1515     ok(hr == S_OK, "got 0x%08x\n", hr);
1516
1517     /* first read call returns incomplete node, second attempt fails with E_PENDING */
1518     stream_readcall = 0;
1519     type = XmlNodeType_Element;
1520     hr = IXmlReader_Read(reader, &type);
1521     ok(hr == S_OK || broken(hr == E_PENDING), "got 0x%08x\n", hr);
1522     /* newer versions are happy when it's enough data to detect node type,
1523        older versions keep reading until it fails to read more */
1524     ok(stream_readcall == 1 || broken(stream_readcall > 1), "got %d\n", stream_readcall);
1525     ok(type == XmlNodeType_Comment || broken(type == XmlNodeType_None), "got %d\n", type);
1526
1527     /* newer versions' GetValue() makes an attempt to read more */
1528     c = stream_readcall;
1529     value = (void*)0xdeadbeef;
1530     hr = IXmlReader_GetValue(reader, &value, NULL);
1531     ok(hr == E_PENDING, "got 0x%08x\n", hr);
1532     ok(value == NULL || broken(value == (void*)0xdeadbeef) /* Win8 sets it to NULL */, "got %p\n", value);
1533     ok(c < stream_readcall || broken(c == stream_readcall), "got %d, expected %d\n", stream_readcall, c+1);
1534
1535     IXmlReader_Release(reader);
1536 }
1537
1538 static void test_readvaluechunk(void)
1539 {
1540     static const char testA[] = "<!-- comment1 -->";
1541     IXmlReader *reader;
1542     XmlNodeType type;
1543     IStream *stream;
1544     const WCHAR *value;
1545     WCHAR b;
1546     HRESULT hr;
1547     UINT c;
1548
1549     hr = CreateXmlReader(&IID_IXmlReader, (void**)&reader, NULL);
1550     ok(hr == S_OK, "S_OK, got %08x\n", hr);
1551
1552     stream = create_stream_on_data(testA, sizeof(testA));
1553     hr = IXmlReader_SetInput(reader, (IUnknown*)stream);
1554     ok(hr == S_OK, "got %08x\n", hr);
1555
1556     hr = IXmlReader_Read(reader, &type);
1557     ok(hr == S_OK, "got %08x\n", hr);
1558
1559     c = 0;
1560     b = 0;
1561     hr = IXmlReader_ReadValueChunk(reader, &b, 1, &c);
1562     ok(hr == S_OK, "got %08x\n", hr);
1563     ok(c == 1, "got %u\n", c);
1564     ok(b == ' ', "got %x\n", b);
1565
1566     /* portion read as chunk is skipped from resulting node value */
1567     value = NULL;
1568     hr = IXmlReader_GetValue(reader, &value, NULL);
1569     ok(hr == S_OK, "got %08x\n", hr);
1570     ok(value[0] == 'c', "got %s\n", wine_dbgstr_w(value));
1571
1572     /* once value is returned/allocated it's not possible to read by chunk */
1573     c = 0;
1574     b = 0;
1575     hr = IXmlReader_ReadValueChunk(reader, &b, 1, &c);
1576     ok(hr == S_FALSE, "got %08x\n", hr);
1577     ok(c == 0, "got %u\n", c);
1578     ok(b == 0, "got %x\n", b);
1579
1580     value = NULL;
1581     hr = IXmlReader_GetValue(reader, &value, NULL);
1582     ok(hr == S_OK, "got %08x\n", hr);
1583     ok(value[0] == 'c', "got %s\n", wine_dbgstr_w(value));
1584
1585     IXmlReader_Release(reader);
1586     IStream_Release(stream);
1587 }
1588
1589 static struct test_entry cdata_tests[] = {
1590     { "<a><![CDATA[ ]]data ]]></a>", "", " ]]data ", S_OK },
1591     { "<a><![CDATA[<![CDATA[ data ]]]]></a>", "", "<![CDATA[ data ]]", S_OK },
1592     { "<a><![CDATA[\n \r\n \n\n ]]></a>", "", "\n \n \n\n ", S_OK, S_OK, TRUE },
1593     { "<a><![CDATA[\r \r\r\n \n\n ]]></a>", "", "\n \n\n \n\n ", S_OK, S_OK, TRUE },
1594     { "<a><![CDATA[\r\r \n\r \r \n\n ]]></a>", "", "\n\n \n\n \n \n\n ", S_OK },
1595     { NULL }
1596 };
1597
1598 static void test_read_cdata(void)
1599 {
1600     struct test_entry *test = cdata_tests;
1601     IXmlReader *reader;
1602     HRESULT hr;
1603
1604     hr = CreateXmlReader(&IID_IXmlReader, (void**)&reader, NULL);
1605     ok(hr == S_OK, "S_OK, got %08x\n", hr);
1606
1607     while (test->xml)
1608     {
1609         XmlNodeType type;
1610         IStream *stream;
1611
1612         stream = create_stream_on_data(test->xml, strlen(test->xml)+1);
1613         hr = IXmlReader_SetInput(reader, (IUnknown*)stream);
1614         ok(hr == S_OK, "got %08x\n", hr);
1615
1616         type = XmlNodeType_None;
1617         hr = IXmlReader_Read(reader, &type);
1618
1619         /* read one more to get to CDATA */
1620         if (type == XmlNodeType_Element)
1621         {
1622             type = XmlNodeType_None;
1623             hr = IXmlReader_Read(reader, &type);
1624         }
1625
1626         if (test->hr_broken)
1627             ok(hr == test->hr || broken(hr == test->hr_broken), "got %08x for %s\n", hr, test->xml);
1628         else
1629             ok(hr == test->hr, "got %08x for %s\n", hr, test->xml);
1630         if (hr == S_OK)
1631         {
1632             const WCHAR *str;
1633             WCHAR *str_exp;
1634             UINT len;
1635
1636             ok(type == XmlNodeType_CDATA, "got %d for %s\n", type, test->xml);
1637
1638             str_exp = a2w(test->name);
1639
1640             len = 1;
1641             str = NULL;
1642             hr = IXmlReader_GetLocalName(reader, &str, &len);
1643             ok(hr == S_OK, "got 0x%08x\n", hr);
1644             ok(len == strlen(test->name), "got %u\n", len);
1645             ok(!lstrcmpW(str, str_exp), "got %s\n", wine_dbgstr_w(str));
1646
1647             str = NULL;
1648             hr = IXmlReader_GetLocalName(reader, &str, NULL);
1649             ok(hr == S_OK, "got 0x%08x\n", hr);
1650             ok(!lstrcmpW(str, str_exp), "got %s\n", wine_dbgstr_w(str));
1651
1652             free_str(str_exp);
1653
1654             len = 1;
1655             str = NULL;
1656             hr = IXmlReader_GetQualifiedName(reader, &str, &len);
1657             ok(hr == S_OK, "got 0x%08x\n", hr);
1658             ok(len == strlen(test->name), "got %u\n", len);
1659             str_exp = a2w(test->name);
1660             ok(!lstrcmpW(str, str_exp), "got %s\n", wine_dbgstr_w(str));
1661             free_str(str_exp);
1662
1663             /* value */
1664             len = 1;
1665             str = NULL;
1666             hr = IXmlReader_GetValue(reader, &str, &len);
1667             ok(hr == S_OK, "got 0x%08x\n", hr);
1668
1669             str_exp = a2w(test->value);
1670             todo_wine_if (test->todo)
1671             {
1672                 ok(len == strlen(test->value), "got %u\n", len);
1673                 ok(!lstrcmpW(str, str_exp), "got %s\n", wine_dbgstr_w(str));
1674             }
1675             free_str(str_exp);
1676         }
1677
1678         IStream_Release(stream);
1679         test++;
1680     }
1681
1682     IXmlReader_Release(reader);
1683 }
1684
1685 static struct test_entry text_tests[] = {
1686     { "<a>simple text</a>", "", "simple text", S_OK },
1687     { "<a>text ]]> text</a>", "", "", WC_E_CDSECTEND },
1688     { NULL }
1689 };
1690
1691 static void test_read_text(void)
1692 {
1693     struct test_entry *test = text_tests;
1694     IXmlReader *reader;
1695     HRESULT hr;
1696
1697     hr = CreateXmlReader(&IID_IXmlReader, (void**)&reader, NULL);
1698     ok(hr == S_OK, "S_OK, got %08x\n", hr);
1699
1700     while (test->xml)
1701     {
1702         XmlNodeType type;
1703         IStream *stream;
1704
1705         stream = create_stream_on_data(test->xml, strlen(test->xml)+1);
1706         hr = IXmlReader_SetInput(reader, (IUnknown*)stream);
1707         ok(hr == S_OK, "got %08x\n", hr);
1708
1709         type = XmlNodeType_None;
1710         hr = IXmlReader_Read(reader, &type);
1711
1712         /* read one more to get to CDATA */
1713         if (type == XmlNodeType_Element)
1714         {
1715             type = XmlNodeType_None;
1716             hr = IXmlReader_Read(reader, &type);
1717         }
1718
1719         if (test->hr_broken)
1720             ok(hr == test->hr || broken(hr == test->hr_broken), "got %08x for %s\n", hr, test->xml);
1721         else
1722             ok(hr == test->hr, "got %08x for %s\n", hr, test->xml);
1723         if (hr == S_OK)
1724         {
1725             const WCHAR *str;
1726             WCHAR *str_exp;
1727             UINT len;
1728
1729             ok(type == XmlNodeType_Text, "got %d for %s\n", type, test->xml);
1730
1731             str_exp = a2w(test->name);
1732
1733             len = 1;
1734             str = NULL;
1735             hr = IXmlReader_GetLocalName(reader, &str, &len);
1736             ok(hr == S_OK, "got 0x%08x\n", hr);
1737             ok(len == strlen(test->name), "got %u\n", len);
1738             ok(!lstrcmpW(str, str_exp), "got %s\n", wine_dbgstr_w(str));
1739
1740             str = NULL;
1741             hr = IXmlReader_GetLocalName(reader, &str, NULL);
1742             ok(hr == S_OK, "got 0x%08x\n", hr);
1743             ok(!lstrcmpW(str, str_exp), "got %s\n", wine_dbgstr_w(str));
1744
1745             free_str(str_exp);
1746
1747             len = 1;
1748             str = NULL;
1749             hr = IXmlReader_GetQualifiedName(reader, &str, &len);
1750             ok(hr == S_OK, "got 0x%08x\n", hr);
1751             ok(len == strlen(test->name), "got %u\n", len);
1752             str_exp = a2w(test->name);
1753             ok(!lstrcmpW(str, str_exp), "got %s\n", wine_dbgstr_w(str));
1754             free_str(str_exp);
1755
1756             /* value */
1757             len = 1;
1758             str = NULL;
1759             hr = IXmlReader_GetValue(reader, &str, &len);
1760             ok(hr == S_OK, "got 0x%08x\n", hr);
1761
1762             str_exp = a2w(test->value);
1763             todo_wine_if (test->todo)
1764             {
1765                 ok(len == strlen(test->value), "got %u\n", len);
1766                 ok(!lstrcmpW(str, str_exp), "got %s\n", wine_dbgstr_w(str));
1767             }
1768             free_str(str_exp);
1769         }
1770
1771         IStream_Release(stream);
1772         test++;
1773     }
1774
1775     IXmlReader_Release(reader);
1776 }
1777
1778 struct test_entry_empty {
1779     const char *xml;
1780     BOOL empty;
1781 };
1782
1783 static struct test_entry_empty empty_element_tests[] = {
1784     { "<a></a>", FALSE },
1785     { "<a/>", TRUE },
1786     { NULL }
1787 };
1788
1789 static void test_isemptyelement(void)
1790 {
1791     struct test_entry_empty *test = empty_element_tests;
1792     IXmlReader *reader;
1793     HRESULT hr;
1794
1795     hr = CreateXmlReader(&IID_IXmlReader, (void**)&reader, NULL);
1796     ok(hr == S_OK, "S_OK, got %08x\n", hr);
1797
1798     while (test->xml)
1799     {
1800         XmlNodeType type;
1801         IStream *stream;
1802         BOOL ret;
1803
1804         stream = create_stream_on_data(test->xml, strlen(test->xml)+1);
1805         hr = IXmlReader_SetInput(reader, (IUnknown*)stream);
1806         ok(hr == S_OK, "got %08x\n", hr);
1807
1808         type = XmlNodeType_None;
1809         hr = IXmlReader_Read(reader, &type);
1810         ok(hr == S_OK, "got 0x%08x\n", hr);
1811         ok(type == XmlNodeType_Element, "got %d\n", type);
1812
1813         ret = IXmlReader_IsEmptyElement(reader);
1814         ok(ret == test->empty, "got %d, expected %d. xml=%s\n", ret, test->empty, test->xml);
1815
1816         IStream_Release(stream);
1817         test++;
1818     }
1819
1820     IXmlReader_Release(reader);
1821 }
1822
1823 static struct test_entry attributes_tests[] = {
1824     { "<a attr1=\"attrvalue\"/>", "attr1", "attrvalue", S_OK },
1825     { "<a attr1=\"a\'\'ttrvalue\"/>", "attr1", "a\'\'ttrvalue", S_OK },
1826     { "<a attr1=\'a\"ttrvalue\'/>", "attr1", "a\"ttrvalue", S_OK },
1827     { "<a attr1=\' \'/>", "attr1", " ", S_OK },
1828     { "<a attr1=\" \"/>", "attr1", " ", S_OK },
1829     { "<a attr1=\"\r\n \r \n \t\n\r\"/>", "attr1", "         ", S_OK },
1830     { "<a attr1=\" val \"/>", "attr1", " val ", S_OK },
1831     { "<a attr1=\"\r\n\tval\n\"/>", "attr1", "  val ", S_OK },
1832     { "<a attr1=\"val&#32;\"/>", "attr1", "val ", S_OK },
1833     { "<a attr1=\"val&#x20;\"/>", "attr1", "val ", S_OK },
1834     { "<a attr1=\"&lt;&gt;&amp;&apos;&quot;\"/>", "attr1", "<>&\'\"", S_OK },
1835     { "<a attr1=\"&entname;\"/>", NULL, NULL, WC_E_UNDECLAREDENTITY },
1836     { "<a attr1=\"val&#xfffe;\"/>", NULL, NULL, WC_E_XMLCHARACTER },
1837     { "<a attr1=\"val &#a;\"/>", NULL, NULL, WC_E_DIGIT, WC_E_SEMICOLON },
1838     { "<a attr1=\"val &#12a;\"/>", NULL, NULL, WC_E_SEMICOLON },
1839     { "<a attr1=\"val &#x12g;\"/>", NULL, NULL, WC_E_SEMICOLON },
1840     { "<a attr1=\"val &#xg;\"/>", NULL, NULL, WC_E_HEXDIGIT, WC_E_SEMICOLON },
1841     { "<a attr1=attrvalue/>", NULL, NULL, WC_E_QUOTE },
1842     { "<a attr1=\"attr<value\"/>", NULL, NULL, WC_E_LESSTHAN },
1843     { "<a attr1=\"&entname\"/>", NULL, NULL, WC_E_SEMICOLON },
1844     { NULL }
1845 };
1846
1847 static void test_read_attribute(void)
1848 {
1849     struct test_entry *test = attributes_tests;
1850     IXmlReader *reader;
1851     HRESULT hr;
1852
1853     hr = CreateXmlReader(&IID_IXmlReader, (void**)&reader, NULL);
1854     ok(hr == S_OK, "S_OK, got %08x\n", hr);
1855
1856     while (test->xml)
1857     {
1858         XmlNodeType type;
1859         IStream *stream;
1860
1861         stream = create_stream_on_data(test->xml, strlen(test->xml)+1);
1862         hr = IXmlReader_SetInput(reader, (IUnknown*)stream);
1863         ok(hr == S_OK, "got %08x\n", hr);
1864
1865         hr = IXmlReader_Read(reader, NULL);
1866
1867         if (test->hr_broken)
1868             ok(hr == test->hr || broken(hr == test->hr_broken), "got %08x for %s\n", hr, test->xml);
1869         else
1870             ok(hr == test->hr, "got %08x for %s\n", hr, test->xml);
1871         if (hr == S_OK)
1872         {
1873             const WCHAR *str;
1874             WCHAR *str_exp;
1875             UINT len;
1876
1877             type = XmlNodeType_None;
1878             hr = IXmlReader_GetNodeType(reader, &type);
1879             ok(hr == S_OK, "Failed to get node type, %#x\n", hr);
1880
1881             ok(type == XmlNodeType_Element, "got %d for %s\n", type, test->xml);
1882
1883             hr = IXmlReader_MoveToFirstAttribute(reader);
1884             ok(hr == S_OK, "got 0x%08x\n", hr);
1885
1886             len = 1;
1887             str = NULL;
1888             hr = IXmlReader_GetLocalName(reader, &str, &len);
1889             ok(hr == S_OK, "got 0x%08x\n", hr);
1890             ok(len == strlen(test->name), "got %u\n", len);
1891             str_exp = a2w(test->name);
1892             ok(!lstrcmpW(str, str_exp), "got %s\n", wine_dbgstr_w(str));
1893             free_str(str_exp);
1894
1895             len = 1;
1896             str = NULL;
1897             hr = IXmlReader_GetQualifiedName(reader, &str, &len);
1898             ok(hr == S_OK, "got 0x%08x\n", hr);
1899         todo_wine {
1900             ok(len == strlen(test->name), "got %u\n", len);
1901             str_exp = a2w(test->name);
1902             ok(!lstrcmpW(str, str_exp), "got %s\n", wine_dbgstr_w(str));
1903             free_str(str_exp);
1904         }
1905             /* value */
1906             len = 1;
1907             str = NULL;
1908             hr = IXmlReader_GetValue(reader, &str, &len);
1909             ok(hr == S_OK, "got 0x%08x\n", hr);
1910             ok(len == strlen(test->value), "got %u\n", len);
1911             str_exp = a2w(test->value);
1912             ok(!lstrcmpW(str, str_exp), "got %s\n", wine_dbgstr_w(str));
1913             free_str(str_exp);
1914         }
1915
1916         IStream_Release(stream);
1917         test++;
1918     }
1919
1920     IXmlReader_Release(reader);
1921 }
1922
1923 static void test_reader_properties(void)
1924 {
1925     IXmlReader *reader;
1926     HRESULT hr;
1927
1928     hr = CreateXmlReader(&IID_IXmlReader, (void**)&reader, NULL);
1929     ok(hr == S_OK, "S_OK, got %08x\n", hr);
1930
1931     hr = IXmlReader_SetProperty(reader, XmlReaderProperty_MultiLanguage, 0);
1932     ok(hr == S_OK, "SetProperty failed: %08x\n", hr);
1933
1934     hr = IXmlReader_SetProperty(reader, XmlReaderProperty_MaxElementDepth, 0);
1935     ok(hr == S_OK, "SetProperty failed: %08x\n", hr);
1936
1937     IXmlReader_Release(reader);
1938 }
1939
1940 static void test_prefix(void)
1941 {
1942     static const struct
1943     {
1944         const char *xml;
1945         const char *prefix1;
1946         const char *prefix2;
1947         const char *prefix3;
1948     } prefix_tests[] =
1949     {
1950         { "<b xmlns=\"defns\" xml:a=\"a ns\"/>", "", "", "xml" },
1951     };
1952     IXmlReader *reader;
1953     unsigned int i;
1954     HRESULT hr;
1955
1956     hr = CreateXmlReader(&IID_IXmlReader, (void**)&reader, NULL);
1957     ok(hr == S_OK, "S_OK, got %08x\n", hr);
1958
1959     for (i = 0; i < sizeof(prefix_tests)/sizeof(prefix_tests[0]); i++) {
1960         const WCHAR *prefix;
1961         XmlNodeType type;
1962         WCHAR *expected;
1963         IStream *stream;
1964
1965         stream = create_stream_on_data(prefix_tests[i].xml, strlen(prefix_tests[i].xml) + 1);
1966         hr = IXmlReader_SetInput(reader, (IUnknown *)stream);
1967         ok(hr == S_OK, "got %08x\n", hr);
1968
1969         hr = IXmlReader_Read(reader, &type);
1970         ok(hr == S_OK, "Read() failed, %#x\n", hr);
1971         ok(type == XmlNodeType_Element, "Unexpected node type %d.\n", type);
1972
1973         expected = a2w(prefix_tests[i].prefix1);
1974         hr = IXmlReader_GetPrefix(reader, &prefix, NULL);
1975         ok(hr == S_OK, "GetPrefix() failed, %#x.\n", hr);
1976         ok(!lstrcmpW(prefix, expected), "Unexpected prefix %s, expected %s.\n", wine_dbgstr_w(prefix),
1977             wine_dbgstr_w(expected));
1978         free_str(expected);
1979
1980         hr = IXmlReader_MoveToFirstAttribute(reader);
1981         ok(hr == S_OK, "MoveToFirstAttribute() failed, %#x.\n", hr);
1982
1983         hr = IXmlReader_GetNodeType(reader, &type);
1984         ok(hr == S_OK, "GetNodeType() failed, %#x.\n", hr);
1985         ok(type == XmlNodeType_Attribute, "Unexpected node type %d.\n", type);
1986
1987         expected = a2w(prefix_tests[i].prefix2);
1988         hr = IXmlReader_GetPrefix(reader, &prefix, NULL);
1989         ok(hr == S_OK, "GetPrefix() failed, %#x.\n", hr);
1990         ok(!lstrcmpW(prefix, expected), "Unexpected prefix %s, expected %s.\n", wine_dbgstr_w(prefix),
1991             wine_dbgstr_w(expected));
1992         free_str(expected);
1993
1994         hr = IXmlReader_MoveToNextAttribute(reader);
1995         ok(hr == S_OK, "MoveToNextAttribute() failed, %#x.\n", hr);
1996
1997         hr = IXmlReader_GetNodeType(reader, &type);
1998         ok(hr == S_OK, "GetNodeType() failed, %#x.\n", hr);
1999         ok(type == XmlNodeType_Attribute, "Unexpected node type %d.\n", type);
2000
2001         expected = a2w(prefix_tests[i].prefix3);
2002         hr = IXmlReader_GetPrefix(reader, &prefix, NULL);
2003         ok(hr == S_OK, "GetPrefix() failed, %#x.\n", hr);
2004         ok(!lstrcmpW(prefix, expected), "Unexpected prefix %s, expected %s.\n", wine_dbgstr_w(prefix),
2005             wine_dbgstr_w(expected));
2006         free_str(expected);
2007
2008         IStream_Release(stream);
2009     }
2010
2011     IXmlReader_Release(reader);
2012 }
2013
2014 static void test_namespaceuri(void)
2015 {
2016     struct uri_test
2017     {
2018         const char *xml;
2019         const char *uri[5];
2020     } uri_tests[] =
2021     {
2022         { "<a xmlns=\"defns a\"><b xmlns=\"defns b\"><c xmlns=\"defns c\"/></b></a>",
2023                 { "defns a", "defns b", "defns c", "defns b", "defns a" }},
2024         { "<r:a xmlns=\"defns a\" xmlns:r=\"ns r\"/>",
2025                 { "ns r" }},
2026         { "<r:a xmlns=\"defns a\" xmlns:r=\"ns r\"><b/></r:a>",
2027                 { "ns r", "defns a", "ns r" }},
2028         { "<a xmlns=\"defns a\" xmlns:r=\"ns r\"><r:b/></a>",
2029                 { "defns a", "ns r", "defns a" }},
2030         { "<a><b><c/></b></a>",
2031                 { "", "", "", "", "" }},
2032     };
2033     IXmlReader *reader;
2034     XmlNodeType type;
2035     unsigned int i;
2036     HRESULT hr;
2037
2038     hr = CreateXmlReader(&IID_IXmlReader, (void**)&reader, NULL);
2039     ok(hr == S_OK, "S_OK, got %08x\n", hr);
2040
2041     for (i = 0; i < sizeof(uri_tests)/sizeof(uri_tests[0]); i++) {
2042         IStream *stream = create_stream_on_data(uri_tests[i].xml, strlen(uri_tests[i].xml) + 1);
2043         unsigned int j = 0;
2044
2045         hr = IXmlReader_SetInput(reader, (IUnknown *)stream);
2046         ok(hr == S_OK, "got %08x\n", hr);
2047
2048         type = ~0u;
2049         while (IXmlReader_Read(reader, &type) == S_OK) {
2050             const WCHAR *uri, *local;
2051             WCHAR *uriW;
2052
2053             ok(type == XmlNodeType_Element || type == XmlNodeType_EndElement, "Unexpected node type %d.\n", type);
2054
2055             hr = IXmlReader_GetLocalName(reader, &local, NULL);
2056             ok(hr == S_OK, "S_OK, got %08x\n", hr);
2057
2058             hr = IXmlReader_GetNamespaceUri(reader, &uri, NULL);
2059             ok(hr == S_OK, "S_OK, got %08x\n", hr);
2060
2061             uriW = a2w(uri_tests[i].uri[j]);
2062             ok(!lstrcmpW(uriW, uri), "%s: uri %s\n", wine_dbgstr_w(local), wine_dbgstr_w(uri));
2063             free_str(uriW);
2064
2065             j++;
2066         }
2067         ok(type == XmlNodeType_None, "Unexpected node type %d\n", type);
2068
2069         IStream_Release(stream);
2070     }
2071
2072     IXmlReader_Release(reader);
2073 }
2074
2075 static void test_read_charref(void)
2076 {
2077     static const char testA[] = "<a b=\"c\">&#x1f3;&#x103;</a>";
2078     static const WCHAR chardataW[] = {0x01f3,0x0103,0};
2079     const WCHAR *value;
2080     IXmlReader *reader;
2081     XmlNodeType type;
2082     IStream *stream;
2083     HRESULT hr;
2084
2085     hr = CreateXmlReader(&IID_IXmlReader, (void **)&reader, NULL);
2086     ok(hr == S_OK, "S_OK, got %08x\n", hr);
2087
2088     stream = create_stream_on_data(testA, sizeof(testA));
2089     hr = IXmlReader_SetInput(reader, (IUnknown *)stream);
2090     ok(hr == S_OK, "got %08x\n", hr);
2091
2092     hr = IXmlReader_Read(reader, &type);
2093     ok(hr == S_OK, "got %08x\n", hr);
2094     ok(type == XmlNodeType_Element, "Unexpected node type %d\n", type);
2095
2096     hr = IXmlReader_Read(reader, &type);
2097     ok(hr == S_OK, "got %08x\n", hr);
2098     ok(type == XmlNodeType_Text, "Unexpected node type %d\n", type);
2099
2100     hr = IXmlReader_GetValue(reader, &value, NULL);
2101     ok(hr == S_OK, "got %08x\n", hr);
2102     ok(!lstrcmpW(value, chardataW), "Text value : %s\n", wine_dbgstr_w(value));
2103
2104     hr = IXmlReader_Read(reader, &type);
2105     ok(hr == S_OK, "got %08x\n", hr);
2106     ok(type == XmlNodeType_EndElement, "Unexpected node type %d\n", type);
2107
2108     IXmlReader_Release(reader);
2109     IStream_Release(stream);
2110 }
2111
2112 static void test_encoding_detection(void)
2113 {
2114     static const struct encoding_testW
2115     {
2116         WCHAR text[16];
2117     }
2118     encoding_testsW[] =
2119     {
2120         { { '<','?','p','i',' ','?','>',0 } },
2121         { { '<','!','-','-',' ','c','-','-','>',0 } },
2122         { { 0xfeff,'<','a','/','>',0 } },
2123         { { '<','a','/','>',0 } },
2124     };
2125     static const char *encoding_testsA[] =
2126     {
2127         "<?pi ?>",
2128         "<!-- comment -->",
2129         "\xef\xbb\xbf<a/>", /* UTF-8 BOM */
2130         "<a/>",
2131     };
2132     IXmlReader *reader;
2133     XmlNodeType type;
2134     IStream *stream;
2135     unsigned int i;
2136     HRESULT hr;
2137
2138     hr = CreateXmlReader(&IID_IXmlReader, (void **)&reader, NULL);
2139     ok(hr == S_OK, "S_OK, got %08x\n", hr);
2140
2141     /* there's no way to query detected encoding back, so just verify that document is browsable */
2142
2143     for (i = 0; i < sizeof(encoding_testsA)/sizeof(encoding_testsA[0]); i++)
2144     {
2145         stream = create_stream_on_data(encoding_testsA[i], strlen(encoding_testsA[i]));
2146
2147         hr = IXmlReader_SetInput(reader, (IUnknown *)stream);
2148         ok(hr == S_OK, "got %08x\n", hr);
2149
2150         type = XmlNodeType_None;
2151         hr = IXmlReader_Read(reader, &type);
2152         ok(hr == S_OK, "got %08x\n", hr);
2153         ok(type != XmlNodeType_None, "Unexpected node type %d\n", type);
2154
2155         IStream_Release(stream);
2156     }
2157
2158     for (i = 0; i < sizeof(encoding_testsW)/sizeof(encoding_testsW[0]); i++)
2159     {
2160         stream = create_stream_on_data(encoding_testsW[i].text, lstrlenW(encoding_testsW[i].text) * sizeof(WCHAR));
2161
2162         hr = IXmlReader_SetInput(reader, (IUnknown *)stream);
2163         ok(hr == S_OK, "got %08x\n", hr);
2164
2165         type = XmlNodeType_None;
2166         hr = IXmlReader_Read(reader, &type);
2167         ok(hr == S_OK, "%u: got %08x\n", i, hr);
2168         ok(type != XmlNodeType_None, "%u: unexpected node type %d\n", i, type);
2169
2170         IStream_Release(stream);
2171     }
2172
2173     IXmlReader_Release(reader);
2174 }
2175
2176 START_TEST(reader)
2177 {
2178     test_reader_create();
2179     test_readerinput();
2180     test_reader_state();
2181     test_read_attribute();
2182     test_read_cdata();
2183     test_read_comment();
2184     test_read_pi();
2185     test_read_system_dtd();
2186     test_read_public_dtd();
2187     test_read_element();
2188     test_isemptyelement();
2189     test_read_text();
2190     test_read_full();
2191     test_read_pending();
2192     test_readvaluechunk();
2193     test_read_xmldeclaration();
2194     test_reader_properties();
2195     test_prefix();
2196     test_namespaceuri();
2197     test_read_charref();
2198     test_encoding_detection();
2199 }