reactos/dll/win32/msxml3/nodemap.c

   1 /*
   2  *    Node map implementation
   3  *
   4  * Copyright 2005 Mike McCormack
   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 #include "precomp.h"
  22
  23 #include <msxml2did.h>
  24
  25 #ifdef HAVE_LIBXML2
  26
  27 typedef struct
  28 {
  29     DispatchEx dispex;
  30     IXMLDOMNamedNodeMap IXMLDOMNamedNodeMap_iface;
  31     ISupportErrorInfo ISupportErrorInfo_iface;
  32     LONG ref;
  33
  34     xmlNodePtr node;
  35     LONG iterator;
  36     IEnumVARIANT *enumvariant;
  37
  38     const struct nodemap_funcs *funcs;
  39 } xmlnodemap;
  40
  41 static HRESULT nodemap_get_item(IUnknown *iface, LONG index, VARIANT *item)
  42 {
  43     V_VT(item) = VT_DISPATCH;
  44     return IXMLDOMNamedNodeMap_get_item((IXMLDOMNamedNodeMap*)iface, index, (IXMLDOMNode**)&V_DISPATCH(item));
  45 }
  46
  47 static const struct enumvariant_funcs nodemap_enumvariant = {
  48     nodemap_get_item,
  49     NULL
  50 };
  51
  52 static inline xmlnodemap *impl_from_IXMLDOMNamedNodeMap( IXMLDOMNamedNodeMap *iface )
  53 {
  54     return CONTAINING_RECORD(iface, xmlnodemap, IXMLDOMNamedNodeMap_iface);
  55 }
  56
  57 static inline xmlnodemap *impl_from_ISupportErrorInfo( ISupportErrorInfo *iface )
  58 {
  59     return CONTAINING_RECORD(iface, xmlnodemap, ISupportErrorInfo_iface);
  60 }
  61
  62 static HRESULT WINAPI xmlnodemap_QueryInterface(
  63     IXMLDOMNamedNodeMap *iface,
  64     REFIID riid, void** ppvObject )
  65 {
  66     xmlnodemap *This = impl_from_IXMLDOMNamedNodeMap( iface );
  67     TRACE("(%p)->(%s %p)\n", iface, debugstr_guid(riid), ppvObject);
  68
  69     if( IsEqualGUID( riid, &IID_IUnknown ) ||
  70         IsEqualGUID( riid, &IID_IDispatch ) ||
  71         IsEqualGUID( riid, &IID_IXMLDOMNamedNodeMap ) )
  72     {
  73         *ppvObject = iface;
  74     }
  75     else if (IsEqualGUID( riid, &IID_IEnumVARIANT ))
  76     {
  77         if (!This->enumvariant)
  78         {
  79             HRESULT hr = create_enumvariant((IUnknown*)iface, FALSE, &nodemap_enumvariant, &This->enumvariant);
  80             if (FAILED(hr)) return hr;
  81         }
  82
  83         return IEnumVARIANT_QueryInterface(This->enumvariant, &IID_IEnumVARIANT, ppvObject);
  84     }
  85     else if (dispex_query_interface(&This->dispex, riid, ppvObject))
  86     {
  87         return *ppvObject ? S_OK : E_NOINTERFACE;
  88     }
  89     else if( IsEqualGUID( riid, &IID_ISupportErrorInfo ))
  90     {
  91         *ppvObject = &This->ISupportErrorInfo_iface;
  92     }
  93     else
  94     {
  95         TRACE("interface %s not implemented\n", debugstr_guid(riid));
  96         *ppvObject = NULL;
  97         return E_NOINTERFACE;
  98     }
  99
 100     IXMLDOMNamedNodeMap_AddRef( iface );
 101
 102     return S_OK;
 103 }
 104
 105 static ULONG WINAPI xmlnodemap_AddRef(
 106     IXMLDOMNamedNodeMap *iface )
 107 {
 108     xmlnodemap *This = impl_from_IXMLDOMNamedNodeMap( iface );
 109     ULONG ref = InterlockedIncrement( &This->ref );
 110     TRACE("(%p)->(%d)\n", This, ref);
 111     return ref;
 112 }
 113
 114 static ULONG WINAPI xmlnodemap_Release(
 115     IXMLDOMNamedNodeMap *iface )
 116 {
 117     xmlnodemap *This = impl_from_IXMLDOMNamedNodeMap( iface );
 118     ULONG ref = InterlockedDecrement( &This->ref );
 119
 120     TRACE("(%p)->(%d)\n", This, ref);
 121     if ( ref == 0 )
 122     {
 123         xmldoc_release( This->node->doc );
 124         if (This->enumvariant) IEnumVARIANT_Release(This->enumvariant);
 125         release_dispex(&This->dispex);
 126         heap_free( This );
 127     }
 128
 129     return ref;
 130 }
 131
 132 static HRESULT WINAPI xmlnodemap_GetTypeInfoCount(
 133     IXMLDOMNamedNodeMap *iface,
 134     UINT* pctinfo )
 135 {
 136     xmlnodemap *This = impl_from_IXMLDOMNamedNodeMap( iface );
 137     return IDispatchEx_GetTypeInfoCount(&This->dispex.IDispatchEx_iface, pctinfo);
 138 }
 139
 140 static HRESULT WINAPI xmlnodemap_GetTypeInfo(
 141     IXMLDOMNamedNodeMap *iface,
 142     UINT iTInfo, LCID lcid,
 143     ITypeInfo** ppTInfo )
 144 {
 145     xmlnodemap *This = impl_from_IXMLDOMNamedNodeMap( iface );
 146     return IDispatchEx_GetTypeInfo(&This->dispex.IDispatchEx_iface,
 147         iTInfo, lcid, ppTInfo);
 148 }
 149
 150 static HRESULT WINAPI xmlnodemap_GetIDsOfNames(
 151     IXMLDOMNamedNodeMap *iface,
 152     REFIID riid, LPOLESTR* rgszNames,
 153     UINT cNames, LCID lcid, DISPID* rgDispId )
 154 {
 155     xmlnodemap *This = impl_from_IXMLDOMNamedNodeMap( iface );
 156     return IDispatchEx_GetIDsOfNames(&This->dispex.IDispatchEx_iface,
 157         riid, rgszNames, cNames, lcid, rgDispId);
 158 }
 159
 160 static HRESULT WINAPI xmlnodemap_Invoke(
 161     IXMLDOMNamedNodeMap *iface,
 162     DISPID dispIdMember, REFIID riid, LCID lcid,
 163     WORD wFlags, DISPPARAMS* pDispParams, VARIANT* pVarResult,
 164     EXCEPINFO* pExcepInfo, UINT* puArgErr )
 165 {
 166     xmlnodemap *This = impl_from_IXMLDOMNamedNodeMap( iface );
 167     return IDispatchEx_Invoke(&This->dispex.IDispatchEx_iface,
 168         dispIdMember, riid, lcid, wFlags, pDispParams, pVarResult, pExcepInfo, puArgErr);
 169 }
 170
 171 static HRESULT WINAPI xmlnodemap_getNamedItem(
 172     IXMLDOMNamedNodeMap *iface,
 173     BSTR name,
 174     IXMLDOMNode** item)
 175 {
 176     xmlnodemap *This = impl_from_IXMLDOMNamedNodeMap( iface );
 177
 178     TRACE("(%p)->(%s %p)\n", This, debugstr_w(name), item );
 179
 180     return This->funcs->get_named_item(This->node, name, item);
 181 }
 182
 183 static HRESULT WINAPI xmlnodemap_setNamedItem(
 184     IXMLDOMNamedNodeMap *iface,
 185     IXMLDOMNode* newItem,
 186     IXMLDOMNode** namedItem)
 187 {
 188     xmlnodemap *This = impl_from_IXMLDOMNamedNodeMap( iface );
 189
 190     TRACE("(%p)->(%p %p)\n", This, newItem, namedItem );
 191
 192     return This->funcs->set_named_item(This->node, newItem, namedItem);
 193 }
 194
 195 static HRESULT WINAPI xmlnodemap_removeNamedItem(
 196     IXMLDOMNamedNodeMap *iface,
 197     BSTR name,
 198     IXMLDOMNode** namedItem)
 199 {
 200     xmlnodemap *This = impl_from_IXMLDOMNamedNodeMap( iface );
 201
 202     TRACE("(%p)->(%s %p)\n", This, debugstr_w(name), namedItem );
 203
 204     return This->funcs->remove_named_item(This->node, name, namedItem);
 205 }
 206
 207 static HRESULT WINAPI xmlnodemap_get_item(
 208     IXMLDOMNamedNodeMap *iface,
 209     LONG index,
 210     IXMLDOMNode** item)
 211 {
 212     xmlnodemap *This = impl_from_IXMLDOMNamedNodeMap( iface );
 213
 214     TRACE("(%p)->(%d %p)\n", This, index, item);
 215
 216     return This->funcs->get_item(This->node, index, item);
 217 }
 218
 219 static HRESULT WINAPI xmlnodemap_get_length(
 220     IXMLDOMNamedNodeMap *iface,
 221     LONG *length)
 222 {
 223     xmlnodemap *This = impl_from_IXMLDOMNamedNodeMap( iface );
 224
 225     TRACE("(%p)->(%p)\n", This, length);
 226
 227     return This->funcs->get_length(This->node, length);
 228 }
 229
 230 static HRESULT WINAPI xmlnodemap_getQualifiedItem(
 231     IXMLDOMNamedNodeMap *iface,
 232     BSTR baseName,
 233     BSTR namespaceURI,
 234     IXMLDOMNode** item)
 235 {
 236     xmlnodemap *This = impl_from_IXMLDOMNamedNodeMap( iface );
 237
 238     TRACE("(%p)->(%s %s %p)\n", This, debugstr_w(baseName), debugstr_w(namespaceURI), item);
 239
 240     return This->funcs->get_qualified_item(This->node, baseName, namespaceURI, item);
 241 }
 242
 243 static HRESULT WINAPI xmlnodemap_removeQualifiedItem(
 244     IXMLDOMNamedNodeMap *iface,
 245     BSTR baseName,
 246     BSTR namespaceURI,
 247     IXMLDOMNode** item)
 248 {
 249     xmlnodemap *This = impl_from_IXMLDOMNamedNodeMap( iface );
 250
 251     TRACE("(%p)->(%s %s %p)\n", This, debugstr_w(baseName), debugstr_w(namespaceURI), item);
 252
 253     return This->funcs->remove_qualified_item(This->node, baseName, namespaceURI, item);
 254 }
 255
 256 static HRESULT WINAPI xmlnodemap_nextNode(
 257     IXMLDOMNamedNodeMap *iface,
 258     IXMLDOMNode** nextItem)
 259 {
 260     xmlnodemap *This = impl_from_IXMLDOMNamedNodeMap( iface );
 261
 262     TRACE("(%p)->(%p: %d)\n", This, nextItem, This->iterator);
 263
 264     return This->funcs->next_node(This->node, &This->iterator, nextItem);
 265 }
 266
 267 static HRESULT WINAPI xmlnodemap_reset(
 268     IXMLDOMNamedNodeMap *iface )
 269 {
 270     xmlnodemap *This = impl_from_IXMLDOMNamedNodeMap( iface );
 271
 272     TRACE("(%p)->(%d)\n", This, This->iterator);
 273
 274     This->iterator = 0;
 275
 276     return S_OK;
 277 }
 278
 279 static HRESULT WINAPI xmlnodemap__newEnum(
 280     IXMLDOMNamedNodeMap *iface,
 281     IUnknown** enumv)
 282 {
 283     xmlnodemap *This = impl_from_IXMLDOMNamedNodeMap( iface );
 284     TRACE("(%p)->(%p)\n", This, enumv);
 285     return create_enumvariant((IUnknown*)iface, TRUE, &nodemap_enumvariant, (IEnumVARIANT**)enumv);
 286 }
 287
 288 static const struct IXMLDOMNamedNodeMapVtbl XMLDOMNamedNodeMapVtbl =
 289 {
 290     xmlnodemap_QueryInterface,
 291     xmlnodemap_AddRef,
 292     xmlnodemap_Release,
 293     xmlnodemap_GetTypeInfoCount,
 294     xmlnodemap_GetTypeInfo,
 295     xmlnodemap_GetIDsOfNames,
 296     xmlnodemap_Invoke,
 297     xmlnodemap_getNamedItem,
 298     xmlnodemap_setNamedItem,
 299     xmlnodemap_removeNamedItem,
 300     xmlnodemap_get_item,
 301     xmlnodemap_get_length,
 302     xmlnodemap_getQualifiedItem,
 303     xmlnodemap_removeQualifiedItem,
 304     xmlnodemap_nextNode,
 305     xmlnodemap_reset,
 306     xmlnodemap__newEnum,
 307 };
 308
 309 static HRESULT WINAPI support_error_QueryInterface(
 310     ISupportErrorInfo *iface,
 311     REFIID riid, void** ppvObject )
 312 {
 313     xmlnodemap *This = impl_from_ISupportErrorInfo( iface );
 314     TRACE("(%p)->(%s %p)\n", This, debugstr_guid(riid), ppvObject);
 315     return IXMLDOMNamedNodeMap_QueryInterface(&This->IXMLDOMNamedNodeMap_iface, riid, ppvObject);
 316 }
 317
 318 static ULONG WINAPI support_error_AddRef(
 319     ISupportErrorInfo *iface )
 320 {
 321     xmlnodemap *This = impl_from_ISupportErrorInfo( iface );
 322     return IXMLDOMNamedNodeMap_AddRef(&This->IXMLDOMNamedNodeMap_iface);
 323 }
 324
 325 static ULONG WINAPI support_error_Release(
 326     ISupportErrorInfo *iface )
 327 {
 328     xmlnodemap *This = impl_from_ISupportErrorInfo( iface );
 329     return IXMLDOMNamedNodeMap_Release(&This->IXMLDOMNamedNodeMap_iface);
 330 }
 331
 332 static HRESULT WINAPI support_error_InterfaceSupportsErrorInfo(
 333     ISupportErrorInfo *iface,
 334     REFIID riid )
 335 {
 336     xmlnodemap *This = impl_from_ISupportErrorInfo( iface );
 337     TRACE("(%p)->(%s)\n", This, debugstr_guid(riid));
 338     return IsEqualGUID(riid, &IID_IXMLDOMNamedNodeMap) ? S_OK : S_FALSE;
 339 }
 340
 341 static const struct ISupportErrorInfoVtbl SupportErrorInfoVtbl =
 342 {
 343     support_error_QueryInterface,
 344     support_error_AddRef,
 345     support_error_Release,
 346     support_error_InterfaceSupportsErrorInfo
 347 };
 348
 349 static HRESULT xmlnodemap_get_dispid(IUnknown *iface, BSTR name, DWORD flags, DISPID *dispid)
 350 {
 351     WCHAR *ptr;
 352     int idx = 0;
 353
 354     for(ptr = name; *ptr && isdigitW(*ptr); ptr++)
 355         idx = idx*10 + (*ptr-'0');
 356     if(*ptr)
 357         return DISP_E_UNKNOWNNAME;
 358
 359     *dispid = DISPID_DOM_COLLECTION_BASE + idx;
 360     TRACE("ret %x\n", *dispid);
 361     return S_OK;
 362 }
 363
 364 static HRESULT xmlnodemap_invoke(IUnknown *iface, DISPID id, LCID lcid, WORD flags, DISPPARAMS *params,
 365         VARIANT *res, EXCEPINFO *ei)
 366 {
 367     xmlnodemap *This = impl_from_IXMLDOMNamedNodeMap( (IXMLDOMNamedNodeMap*)iface );
 368
 369     TRACE("(%p)->(%x %x %x %p %p %p)\n", This, id, lcid, flags, params, res, ei);
 370
 371     V_VT(res) = VT_DISPATCH;
 372     V_DISPATCH(res) = NULL;
 373
 374     if (id < DISPID_DOM_COLLECTION_BASE || id > DISPID_DOM_COLLECTION_MAX)
 375         return DISP_E_UNKNOWNNAME;
 376
 377     switch(flags)
 378     {
 379         case INVOKE_PROPERTYGET:
 380         {
 381             IXMLDOMNode *disp = NULL;
 382
 383             IXMLDOMNamedNodeMap_get_item(&This->IXMLDOMNamedNodeMap_iface, id - DISPID_DOM_COLLECTION_BASE, &disp);
 384             V_DISPATCH(res) = (IDispatch*)disp;
 385             break;
 386         }
 387         default:
 388         {
 389             FIXME("unimplemented flags %x\n", flags);
 390             break;
 391         }
 392     }
 393
 394     TRACE("ret %p\n", V_DISPATCH(res));
 395
 396     return S_OK;
 397 }
 398
 399 static const dispex_static_data_vtbl_t xmlnodemap_dispex_vtbl = {
 400     xmlnodemap_get_dispid,
 401     xmlnodemap_invoke
 402 };
 403
 404 static const tid_t xmlnodemap_iface_tids[] = {
 405     IXMLDOMNamedNodeMap_tid,
 406     0
 407 };
 408
 409 static dispex_static_data_t xmlnodemap_dispex = {
 410     &xmlnodemap_dispex_vtbl,
 411     IXMLDOMNamedNodeMap_tid,
 412     NULL,
 413     xmlnodemap_iface_tids
 414 };
 415
 416 IXMLDOMNamedNodeMap *create_nodemap(xmlNodePtr node, const struct nodemap_funcs *funcs)
 417 {
 418     xmlnodemap *This;
 419
 420     This = heap_alloc( sizeof *This );
 421     if ( !This )
 422         return NULL;
 423
 424     This->IXMLDOMNamedNodeMap_iface.lpVtbl = &XMLDOMNamedNodeMapVtbl;
 425     This->ISupportErrorInfo_iface.lpVtbl = &SupportErrorInfoVtbl;
 426     This->node = node;
 427     This->ref = 1;
 428     This->iterator = 0;
 429     This->enumvariant = NULL;
 430     This->funcs = funcs;
 431
 432     init_dispex(&This->dispex, (IUnknown*)&This->IXMLDOMNamedNodeMap_iface, &xmlnodemap_dispex);
 433
 434     xmldoc_add_ref(node->doc);
 435
 436     return &This->IXMLDOMNamedNodeMap_iface;
 437 }
 438
 439 #endif