dlls/msxml3/doctype.c

   1 /*
   2  *    DOM DTD node implementation
   3  *
   4  * Copyright 2010 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
  23 #include "config.h"
  24
  25 #include <stdarg.h>
  26 #ifdef HAVE_LIBXML2
  27 # include <libxml/parser.h>
  28 # include <libxml/xmlerror.h>
  29 #endif
  30
  31 #include "windef.h"
  32 #include "winbase.h"
  33 #include "winuser.h"
  34 #include "winnls.h"
  35 #include "ole2.h"
  36 #include "msxml6.h"
  37
  38 #include "msxml_private.h"
  39
  40 #include "wine/debug.h"
  41
  42 WINE_DEFAULT_DEBUG_CHANNEL(msxml);
  43
  44 #ifdef HAVE_LIBXML2
  45
  46 typedef struct _domdoctype
  47 {
  48     xmlnode node;
  49     IXMLDOMDocumentType IXMLDOMDocumentType_iface;
  50     LONG ref;
  51 } domdoctype;
  52
  53 static inline domdoctype *impl_from_IXMLDOMDocumentType( IXMLDOMDocumentType *iface )
  54 {
  55     return CONTAINING_RECORD(iface, domdoctype, IXMLDOMDocumentType_iface);
  56 }
  57
  58 static HRESULT WINAPI domdoctype_QueryInterface(
  59     IXMLDOMDocumentType *iface,
  60     REFIID riid,
  61     void** ppvObject )
  62 {
  63     domdoctype *This = impl_from_IXMLDOMDocumentType( iface );
  64
  65     TRACE("(%p)->(%s %p)\n", This, debugstr_guid(riid), ppvObject);
  66
  67     if ( IsEqualGUID( riid, &IID_IXMLDOMDocumentType ) ||
  68          IsEqualGUID( riid, &IID_IXMLDOMNode ) ||
  69          IsEqualGUID( riid, &IID_IDispatch ) ||
  70          IsEqualGUID( riid, &IID_IUnknown ) )
  71     {
  72         *ppvObject = &This->IXMLDOMDocumentType_iface;
  73     }
  74     else if(node_query_interface(&This->node, riid, ppvObject))
  75     {
  76         return *ppvObject ? S_OK : E_NOINTERFACE;
  77     }
  78     else
  79     {
  80         TRACE("interface %s not implemented\n", debugstr_guid(riid));
  81         *ppvObject = NULL;
  82         return E_NOINTERFACE;
  83     }
  84
  85     IUnknown_AddRef( (IUnknown*)*ppvObject );
  86     return S_OK;
  87 }
  88
  89 static ULONG WINAPI domdoctype_AddRef(
  90     IXMLDOMDocumentType *iface )
  91 {
  92     domdoctype *This = impl_from_IXMLDOMDocumentType( iface );
  93     LONG ref = InterlockedIncrement(&This->ref);
  94     TRACE("(%p)->(%d)\n", This, ref);
  95     return ref;
  96 }
  97
  98 static ULONG WINAPI domdoctype_Release(
  99     IXMLDOMDocumentType *iface )
 100 {
 101     domdoctype *This = impl_from_IXMLDOMDocumentType( iface );
 102     ULONG ref = InterlockedDecrement(&This->ref);
 103
 104     TRACE("(%p)->(%d)\n", This, ref);
 105
 106     if(!ref) {
 107         destroy_xmlnode(&This->node);
 108         heap_free(This);
 109     }
 110
 111     return ref;
 112 }
 113
 114 static HRESULT WINAPI domdoctype_GetTypeInfoCount(
 115     IXMLDOMDocumentType *iface,
 116     UINT* pctinfo )
 117 {
 118     domdoctype *This = impl_from_IXMLDOMDocumentType( iface );
 119
 120     TRACE("(%p)->(%p)\n", This, pctinfo);
 121
 122     *pctinfo = 1;
 123
 124     return S_OK;
 125 }
 126
 127 static HRESULT WINAPI domdoctype_GetTypeInfo(
 128     IXMLDOMDocumentType *iface,
 129     UINT iTInfo, LCID lcid,
 130     ITypeInfo** ppTInfo )
 131 {
 132     domdoctype *This = impl_from_IXMLDOMDocumentType( iface );
 133     HRESULT hr;
 134
 135     TRACE("(%p)->(%u %u %p)\n", This, iTInfo, lcid, ppTInfo);
 136
 137     hr = get_typeinfo(IXMLDOMDocumentType_tid, ppTInfo);
 138
 139     return hr;
 140 }
 141
 142 static HRESULT WINAPI domdoctype_GetIDsOfNames(
 143     IXMLDOMDocumentType *iface,
 144     REFIID riid, LPOLESTR* rgszNames,
 145     UINT cNames, LCID lcid, DISPID* rgDispId )
 146 {
 147     domdoctype *This = impl_from_IXMLDOMDocumentType( iface );
 148     ITypeInfo *typeinfo;
 149     HRESULT hr;
 150
 151     TRACE("(%p)->(%s %p %u %u %p)\n", This, debugstr_guid(riid), rgszNames, cNames,
 152           lcid, rgDispId);
 153
 154     if(!rgszNames || cNames == 0 || !rgDispId)
 155         return E_INVALIDARG;
 156
 157     hr = get_typeinfo(IXMLDOMDocumentType_tid, &typeinfo);
 158     if(SUCCEEDED(hr))
 159     {
 160         hr = ITypeInfo_GetIDsOfNames(typeinfo, rgszNames, cNames, rgDispId);
 161         ITypeInfo_Release(typeinfo);
 162     }
 163
 164     return hr;
 165 }
 166
 167 static HRESULT WINAPI domdoctype_Invoke(
 168     IXMLDOMDocumentType *iface,
 169     DISPID dispIdMember, REFIID riid, LCID lcid,
 170     WORD wFlags, DISPPARAMS* pDispParams, VARIANT* pVarResult,
 171     EXCEPINFO* pExcepInfo, UINT* puArgErr )
 172 {
 173     domdoctype *This = impl_from_IXMLDOMDocumentType( iface );
 174     ITypeInfo *typeinfo;
 175     HRESULT hr;
 176
 177     TRACE("(%p)->(%d %s %d %d %p %p %p %p)\n", This, dispIdMember, debugstr_guid(riid),
 178           lcid, wFlags, pDispParams, pVarResult, pExcepInfo, puArgErr);
 179
 180     hr = get_typeinfo(IXMLDOMDocumentType_tid, &typeinfo);
 181     if(SUCCEEDED(hr))
 182     {
 183         hr = ITypeInfo_Invoke(typeinfo, &This->IXMLDOMDocumentType_iface, dispIdMember, wFlags,
 184                 pDispParams, pVarResult, pExcepInfo, puArgErr);
 185         ITypeInfo_Release(typeinfo);
 186     }
 187
 188     return hr;
 189 }
 190
 191 static HRESULT WINAPI domdoctype_get_nodeName(
 192     IXMLDOMDocumentType *iface,
 193     BSTR* p )
 194 {
 195     domdoctype *This = impl_from_IXMLDOMDocumentType( iface );
 196     FIXME("(%p)->(%p): stub\n", This, p);
 197     return E_NOTIMPL;
 198 }
 199
 200 static HRESULT WINAPI domdoctype_get_nodeValue(
 201     IXMLDOMDocumentType *iface,
 202     VARIANT* value)
 203 {
 204     domdoctype *This = impl_from_IXMLDOMDocumentType( iface );
 205     FIXME("(%p)->(%p): stub\n", This, value);
 206     return E_NOTIMPL;
 207 }
 208
 209 static HRESULT WINAPI domdoctype_put_nodeValue(
 210     IXMLDOMDocumentType *iface,
 211     VARIANT value)
 212 {
 213     domdoctype *This = impl_from_IXMLDOMDocumentType( iface );
 214     FIXME("(%p)->(%s): stub\n", This, debugstr_variant(&value));
 215     return E_NOTIMPL;
 216 }
 217
 218 static HRESULT WINAPI domdoctype_get_nodeType(
 219     IXMLDOMDocumentType *iface,
 220     DOMNodeType* domNodeType )
 221 {
 222     domdoctype *This = impl_from_IXMLDOMDocumentType( iface );
 223
 224     TRACE("(%p)->(%p)\n", This, domNodeType);
 225
 226     *domNodeType = NODE_DOCUMENT_TYPE;
 227     return S_OK;
 228 }
 229
 230 static HRESULT WINAPI domdoctype_get_parentNode(
 231     IXMLDOMDocumentType *iface,
 232     IXMLDOMNode** parent )
 233 {
 234     domdoctype *This = impl_from_IXMLDOMDocumentType( iface );
 235     FIXME("(%p)->(%p): stub\n", This, parent);
 236     return E_NOTIMPL;
 237 }
 238
 239 static HRESULT WINAPI domdoctype_get_childNodes(
 240     IXMLDOMDocumentType *iface,
 241     IXMLDOMNodeList** outList)
 242 {
 243     domdoctype *This = impl_from_IXMLDOMDocumentType( iface );
 244     FIXME("(%p)->(%p): stub\n", This, outList);
 245     return E_NOTIMPL;
 246 }
 247
 248 static HRESULT WINAPI domdoctype_get_firstChild(
 249     IXMLDOMDocumentType *iface,
 250     IXMLDOMNode** domNode)
 251 {
 252     domdoctype *This = impl_from_IXMLDOMDocumentType( iface );
 253     FIXME("(%p)->(%p): stub\n", This, domNode);
 254     return E_NOTIMPL;
 255 }
 256
 257 static HRESULT WINAPI domdoctype_get_lastChild(
 258     IXMLDOMDocumentType *iface,
 259     IXMLDOMNode** domNode)
 260 {
 261     domdoctype *This = impl_from_IXMLDOMDocumentType( iface );
 262     FIXME("(%p)->(%p): stub\n", This, domNode);
 263     return E_NOTIMPL;
 264 }
 265
 266 static HRESULT WINAPI domdoctype_get_previousSibling(
 267     IXMLDOMDocumentType *iface,
 268     IXMLDOMNode** domNode)
 269 {
 270     domdoctype *This = impl_from_IXMLDOMDocumentType( iface );
 271     FIXME("(%p)->(%p): stub\n", This, domNode);
 272     return E_NOTIMPL;
 273 }
 274
 275 static HRESULT WINAPI domdoctype_get_nextSibling(
 276     IXMLDOMDocumentType *iface,
 277     IXMLDOMNode** domNode)
 278 {
 279     domdoctype *This = impl_from_IXMLDOMDocumentType( iface );
 280     FIXME("(%p)->(%p): stub\n", This, domNode);
 281     return E_NOTIMPL;
 282 }
 283
 284 static HRESULT WINAPI domdoctype_get_attributes(
 285     IXMLDOMDocumentType *iface,
 286     IXMLDOMNamedNodeMap** attributeMap)
 287 {
 288     domdoctype *This = impl_from_IXMLDOMDocumentType( iface );
 289     FIXME("(%p)->(%p): stub\n", This, attributeMap);
 290     return E_NOTIMPL;
 291 }
 292
 293 static HRESULT WINAPI domdoctype_insertBefore(
 294     IXMLDOMDocumentType *iface,
 295     IXMLDOMNode* newNode, VARIANT refChild,
 296     IXMLDOMNode** outOldNode)
 297 {
 298     domdoctype *This = impl_from_IXMLDOMDocumentType( iface );
 299
 300     FIXME("(%p)->(%p %s %p): stub\n", This, newNode, debugstr_variant(&refChild), outOldNode);
 301
 302     return E_NOTIMPL;
 303 }
 304
 305 static HRESULT WINAPI domdoctype_replaceChild(
 306     IXMLDOMDocumentType *iface,
 307     IXMLDOMNode* newNode,
 308     IXMLDOMNode* oldNode,
 309     IXMLDOMNode** outOldNode)
 310 {
 311     domdoctype *This = impl_from_IXMLDOMDocumentType( iface );
 312
 313     FIXME("(%p)->(%p %p %p): stub\n", This, newNode, oldNode, outOldNode);
 314
 315     return E_NOTIMPL;
 316 }
 317
 318 static HRESULT WINAPI domdoctype_removeChild(
 319     IXMLDOMDocumentType *iface,
 320     IXMLDOMNode* domNode, IXMLDOMNode** oldNode)
 321 {
 322     domdoctype *This = impl_from_IXMLDOMDocumentType( iface );
 323     FIXME("(%p)->(%p %p): stub\n", This, domNode, oldNode);
 324     return E_NOTIMPL;
 325 }
 326
 327 static HRESULT WINAPI domdoctype_appendChild(
 328     IXMLDOMDocumentType *iface,
 329     IXMLDOMNode* newNode, IXMLDOMNode** outNewNode)
 330 {
 331     domdoctype *This = impl_from_IXMLDOMDocumentType( iface );
 332     FIXME("(%p)->(%p %p): stub\n", This, newNode, outNewNode);
 333     return E_NOTIMPL;
 334 }
 335
 336 static HRESULT WINAPI domdoctype_hasChildNodes(
 337     IXMLDOMDocumentType *iface,
 338     VARIANT_BOOL* pbool)
 339 {
 340     domdoctype *This = impl_from_IXMLDOMDocumentType( iface );
 341     FIXME("(%p)->(%p): stub\n", This, pbool);
 342     return E_NOTIMPL;
 343 }
 344
 345 static HRESULT WINAPI domdoctype_get_ownerDocument(
 346     IXMLDOMDocumentType *iface,
 347     IXMLDOMDocument** domDocument)
 348 {
 349     domdoctype *This = impl_from_IXMLDOMDocumentType( iface );
 350     FIXME("(%p)->(%p): stub\n", This, domDocument);
 351     return E_NOTIMPL;
 352 }
 353
 354 static HRESULT WINAPI domdoctype_cloneNode(
 355     IXMLDOMDocumentType *iface,
 356     VARIANT_BOOL deep, IXMLDOMNode** outNode)
 357 {
 358     domdoctype *This = impl_from_IXMLDOMDocumentType( iface );
 359     FIXME("(%p)->(%d %p): stub\n", This, deep, outNode);
 360     return E_NOTIMPL;
 361 }
 362
 363 static HRESULT WINAPI domdoctype_get_nodeTypeString(
 364     IXMLDOMDocumentType *iface,
 365     BSTR* p)
 366 {
 367     domdoctype *This = impl_from_IXMLDOMDocumentType( iface );
 368     FIXME("(%p)->(%p): stub\n", This, p);
 369     return E_NOTIMPL;
 370 }
 371
 372 static HRESULT WINAPI domdoctype_get_text(
 373     IXMLDOMDocumentType *iface,
 374     BSTR* p)
 375 {
 376     domdoctype *This = impl_from_IXMLDOMDocumentType( iface );
 377     FIXME("(%p)->(%p): stub\n", This, p);
 378     return E_NOTIMPL;
 379 }
 380
 381 static HRESULT WINAPI domdoctype_put_text(
 382     IXMLDOMDocumentType *iface,
 383     BSTR p)
 384 {
 385     domdoctype *This = impl_from_IXMLDOMDocumentType( iface );
 386     FIXME("(%p)->(%s): stub\n", This, debugstr_w(p));
 387     return E_NOTIMPL;
 388 }
 389
 390 static HRESULT WINAPI domdoctype_get_specified(
 391     IXMLDOMDocumentType *iface,
 392     VARIANT_BOOL* isSpecified)
 393 {
 394     domdoctype *This = impl_from_IXMLDOMDocumentType( iface );
 395     FIXME("(%p)->(%p): stub\n", This, isSpecified);
 396     return E_NOTIMPL;
 397 }
 398
 399 static HRESULT WINAPI domdoctype_get_definition(
 400     IXMLDOMDocumentType *iface,
 401     IXMLDOMNode** definitionNode)
 402 {
 403     domdoctype *This = impl_from_IXMLDOMDocumentType( iface );
 404     FIXME("(%p)->(%p)\n", This, definitionNode);
 405     return E_NOTIMPL;
 406 }
 407
 408 static HRESULT WINAPI domdoctype_get_nodeTypedValue(
 409     IXMLDOMDocumentType *iface,
 410     VARIANT* v)
 411 {
 412     domdoctype *This = impl_from_IXMLDOMDocumentType( iface );
 413     TRACE("(%p)->(%p)\n", This, v);
 414     return return_null_var(v);
 415 }
 416
 417 static HRESULT WINAPI domdoctype_put_nodeTypedValue(
 418     IXMLDOMDocumentType *iface,
 419     VARIANT value)
 420 {
 421     domdoctype *This = impl_from_IXMLDOMDocumentType( iface );
 422     FIXME("(%p)->(%s): stub\n", This, debugstr_variant(&value));
 423     return E_NOTIMPL;
 424 }
 425
 426 static HRESULT WINAPI domdoctype_get_dataType(
 427     IXMLDOMDocumentType *iface,
 428     VARIANT* typename)
 429 {
 430     domdoctype *This = impl_from_IXMLDOMDocumentType( iface );
 431     FIXME("(%p)->(%p): stub\n", This, typename);
 432     return E_NOTIMPL;
 433 }
 434
 435 static HRESULT WINAPI domdoctype_put_dataType(
 436     IXMLDOMDocumentType *iface,
 437     BSTR p)
 438 {
 439     domdoctype *This = impl_from_IXMLDOMDocumentType( iface );
 440     FIXME("(%p)->(%s): stub\n", This, debugstr_w(p));
 441     return E_NOTIMPL;
 442 }
 443
 444 static HRESULT WINAPI domdoctype_get_xml(
 445     IXMLDOMDocumentType *iface,
 446     BSTR* p)
 447 {
 448     domdoctype *This = impl_from_IXMLDOMDocumentType( iface );
 449     FIXME("(%p)->(%p): stub\n", This, p);
 450     return E_NOTIMPL;
 451 }
 452
 453 static HRESULT WINAPI domdoctype_transformNode(
 454     IXMLDOMDocumentType *iface,
 455     IXMLDOMNode* domNode, BSTR* p)
 456 {
 457     domdoctype *This = impl_from_IXMLDOMDocumentType( iface );
 458     FIXME("(%p)->(%p %p): stub\n", This, domNode, p);
 459     return E_NOTIMPL;
 460 }
 461
 462 static HRESULT WINAPI domdoctype_selectNodes(
 463     IXMLDOMDocumentType *iface,
 464     BSTR p, IXMLDOMNodeList** outList)
 465 {
 466     domdoctype *This = impl_from_IXMLDOMDocumentType( iface );
 467     FIXME("(%p)->(%s %p): stub\n", This, debugstr_w(p), outList);
 468     return E_NOTIMPL;
 469 }
 470
 471 static HRESULT WINAPI domdoctype_selectSingleNode(
 472     IXMLDOMDocumentType *iface,
 473     BSTR p, IXMLDOMNode** outNode)
 474 {
 475     domdoctype *This = impl_from_IXMLDOMDocumentType( iface );
 476     FIXME("(%p)->(%s %p): stub\n", This, debugstr_w(p), outNode);
 477     return E_NOTIMPL;
 478 }
 479
 480 static HRESULT WINAPI domdoctype_get_parsed(
 481     IXMLDOMDocumentType *iface,
 482     VARIANT_BOOL* isParsed)
 483 {
 484     domdoctype *This = impl_from_IXMLDOMDocumentType( iface );
 485     FIXME("(%p)->(%p): stub\n", This, isParsed);
 486     return E_NOTIMPL;
 487 }
 488
 489 static HRESULT WINAPI domdoctype_get_namespaceURI(
 490     IXMLDOMDocumentType *iface,
 491     BSTR* p)
 492 {
 493     domdoctype *This = impl_from_IXMLDOMDocumentType( iface );
 494     FIXME("(%p)->(%p): stub\n", This, p);
 495     return E_NOTIMPL;
 496 }
 497
 498 static HRESULT WINAPI domdoctype_get_prefix(
 499     IXMLDOMDocumentType *iface,
 500     BSTR* prefix)
 501 {
 502     domdoctype *This = impl_from_IXMLDOMDocumentType( iface );
 503     FIXME("(%p)->(%p): stub\n", This, prefix);
 504     return E_NOTIMPL;
 505 }
 506
 507 static HRESULT WINAPI domdoctype_get_baseName(
 508     IXMLDOMDocumentType *iface,
 509     BSTR* name)
 510 {
 511     domdoctype *This = impl_from_IXMLDOMDocumentType( iface );
 512     FIXME("(%p)->(%p): stub\n", This, name);
 513     return E_NOTIMPL;
 514 }
 515
 516 static HRESULT WINAPI domdoctype_transformNodeToObject(
 517     IXMLDOMDocumentType *iface,
 518     IXMLDOMNode* domNode, VARIANT var1)
 519 {
 520     domdoctype *This = impl_from_IXMLDOMDocumentType( iface );
 521     FIXME("(%p)->(%p %s): stub\n", This, domNode, debugstr_variant(&var1));
 522     return E_NOTIMPL;
 523 }
 524
 525 static HRESULT WINAPI domdoctype_get_name(
 526     IXMLDOMDocumentType *iface,
 527     BSTR *p)
 528 {
 529     domdoctype *This = impl_from_IXMLDOMDocumentType( iface );
 530     FIXME("(%p)->(%p): stub\n", This, p);
 531     return E_NOTIMPL;
 532 }
 533
 534 static HRESULT WINAPI domdoctype_get_entities(
 535     IXMLDOMDocumentType *iface,
 536     IXMLDOMNamedNodeMap **entityMap)
 537 {
 538     domdoctype *This = impl_from_IXMLDOMDocumentType( iface );
 539     FIXME("(%p)->(%p): stub\n", This, entityMap);
 540     return E_NOTIMPL;
 541 }
 542
 543 static HRESULT WINAPI domdoctype_get_notations(
 544     IXMLDOMDocumentType *iface,
 545     IXMLDOMNamedNodeMap **notationMap)
 546 {
 547     domdoctype *This = impl_from_IXMLDOMDocumentType( iface );
 548     FIXME("(%p)->(%p): stub\n", This, notationMap);
 549     return E_NOTIMPL;
 550 }
 551
 552 static const struct IXMLDOMDocumentTypeVtbl domdoctype_vtbl =
 553 {
 554     domdoctype_QueryInterface,
 555     domdoctype_AddRef,
 556     domdoctype_Release,
 557     domdoctype_GetTypeInfoCount,
 558     domdoctype_GetTypeInfo,
 559     domdoctype_GetIDsOfNames,
 560     domdoctype_Invoke,
 561     domdoctype_get_nodeName,
 562     domdoctype_get_nodeValue,
 563     domdoctype_put_nodeValue,
 564     domdoctype_get_nodeType,
 565     domdoctype_get_parentNode,
 566     domdoctype_get_childNodes,
 567     domdoctype_get_firstChild,
 568     domdoctype_get_lastChild,
 569     domdoctype_get_previousSibling,
 570     domdoctype_get_nextSibling,
 571     domdoctype_get_attributes,
 572     domdoctype_insertBefore,
 573     domdoctype_replaceChild,
 574     domdoctype_removeChild,
 575     domdoctype_appendChild,
 576     domdoctype_hasChildNodes,
 577     domdoctype_get_ownerDocument,
 578     domdoctype_cloneNode,
 579     domdoctype_get_nodeTypeString,
 580     domdoctype_get_text,
 581     domdoctype_put_text,
 582     domdoctype_get_specified,
 583     domdoctype_get_definition,
 584     domdoctype_get_nodeTypedValue,
 585     domdoctype_put_nodeTypedValue,
 586     domdoctype_get_dataType,
 587     domdoctype_put_dataType,
 588     domdoctype_get_xml,
 589     domdoctype_transformNode,
 590     domdoctype_selectNodes,
 591     domdoctype_selectSingleNode,
 592     domdoctype_get_parsed,
 593     domdoctype_get_namespaceURI,
 594     domdoctype_get_prefix,
 595     domdoctype_get_baseName,
 596     domdoctype_transformNodeToObject,
 597     domdoctype_get_name,
 598     domdoctype_get_entities,
 599     domdoctype_get_notations
 600 };
 601
 602 static const tid_t domdoctype_iface_tids[] = {
 603     IXMLDOMDocumentType_tid,
 604     0
 605 };
 606
 607 static dispex_static_data_t domdoctype_dispex = {
 608     NULL,
 609     IXMLDOMDocumentType_tid,
 610     NULL,
 611     domdoctype_iface_tids
 612 };
 613
 614 IUnknown* create_doc_type( xmlNodePtr doctype )
 615 {
 616     domdoctype *This;
 617
 618     This = heap_alloc( sizeof *This );
 619     if ( !This )
 620         return NULL;
 621
 622     This->IXMLDOMDocumentType_iface.lpVtbl = &domdoctype_vtbl;
 623     This->ref = 1;
 624
 625     init_xmlnode(&This->node, doctype, (IXMLDOMNode*)&This->IXMLDOMDocumentType_iface,
 626             &domdoctype_dispex);
 627
 628     return (IUnknown*)&This->IXMLDOMDocumentType_iface;
 629 }
 630
 631 #endif