dlls/msxml3/nodelist.c

   1 /*
   2  *    Node list 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 #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 "ole2.h"
  35 #include "msxml6.h"
  36 #include "msxml2did.h"
  37
  38 #include "msxml_private.h"
  39
  40 #include "wine/debug.h"
  41
  42 /* This file implements the object returned by childNodes property. Note that this is
  43  * not the IXMLDOMNodeList returned by XPath querites - it's implemented in queryresult.c.
  44  * They are different because the list returned by childNodes:
  45  *  - is "live" - changes to the XML tree are automatically reflected in the list
  46  *  - doesn't supports IXMLDOMSelection
  47  *  - note that an attribute node have a text child in DOM but not in the XPath data model
  48  *    thus the child is inaccessible by an XPath query
  49  */
  50
  51 WINE_DEFAULT_DEBUG_CHANNEL(msxml);
  52
  53 #ifdef HAVE_LIBXML2
  54
  55 typedef struct _xmlnodelist
  56 {
  57     DispatchEx dispex;
  58     IXMLDOMNodeList IXMLDOMNodeList_iface;
  59     LONG ref;
  60     xmlNodePtr parent;
  61     xmlNodePtr current;
  62 } xmlnodelist;
  63
  64 static inline xmlnodelist *impl_from_IXMLDOMNodeList( IXMLDOMNodeList *iface )
  65 {
  66     return CONTAINING_RECORD(iface, xmlnodelist, IXMLDOMNodeList_iface);
  67 }
  68
  69 static HRESULT WINAPI xmlnodelist_QueryInterface(
  70     IXMLDOMNodeList *iface,
  71     REFIID riid,
  72     void** ppvObject )
  73 {
  74     xmlnodelist *This = impl_from_IXMLDOMNodeList( iface );
  75
  76     TRACE("(%p)->(%s %p)\n", This, debugstr_guid(riid), ppvObject);
  77
  78     if ( IsEqualGUID( riid, &IID_IUnknown ) ||
  79          IsEqualGUID( riid, &IID_IDispatch ) ||
  80          IsEqualGUID( riid, &IID_IXMLDOMNodeList ) )
  81     {
  82         *ppvObject = iface;
  83     }
  84     else if (dispex_query_interface(&This->dispex, riid, ppvObject))
  85     {
  86         return *ppvObject ? S_OK : E_NOINTERFACE;
  87     }
  88     else
  89     {
  90         TRACE("interface %s not implemented\n", debugstr_guid(riid));
  91         *ppvObject = NULL;
  92         return E_NOINTERFACE;
  93     }
  94
  95     IXMLDOMNodeList_AddRef( iface );
  96
  97     return S_OK;
  98 }
  99
 100 static ULONG WINAPI xmlnodelist_AddRef(
 101     IXMLDOMNodeList *iface )
 102 {
 103     xmlnodelist *This = impl_from_IXMLDOMNodeList( iface );
 104     ULONG ref = InterlockedIncrement( &This->ref );
 105     TRACE("(%p)->(%d)\n", This, ref);
 106     return ref;
 107 }
 108
 109 static ULONG WINAPI xmlnodelist_Release(
 110     IXMLDOMNodeList *iface )
 111 {
 112     xmlnodelist *This = impl_from_IXMLDOMNodeList( iface );
 113     ULONG ref = InterlockedDecrement( &This->ref );
 114
 115     TRACE("(%p)->(%d)\n", This, ref);
 116     if ( ref == 0 )
 117     {
 118         xmldoc_release( This->parent->doc );
 119         heap_free( This );
 120     }
 121
 122     return ref;
 123 }
 124
 125 static HRESULT WINAPI xmlnodelist_GetTypeInfoCount(
 126     IXMLDOMNodeList *iface,
 127     UINT* pctinfo )
 128 {
 129     xmlnodelist *This = impl_from_IXMLDOMNodeList( iface );
 130     return IDispatchEx_GetTypeInfoCount(&This->dispex.IDispatchEx_iface, pctinfo);
 131 }
 132
 133 static HRESULT WINAPI xmlnodelist_GetTypeInfo(
 134     IXMLDOMNodeList *iface,
 135     UINT iTInfo,
 136     LCID lcid,
 137     ITypeInfo** ppTInfo )
 138 {
 139     xmlnodelist *This = impl_from_IXMLDOMNodeList( iface );
 140     return IDispatchEx_GetTypeInfo(&This->dispex.IDispatchEx_iface,
 141         iTInfo, lcid, ppTInfo);
 142 }
 143
 144 static HRESULT WINAPI xmlnodelist_GetIDsOfNames(
 145     IXMLDOMNodeList *iface,
 146     REFIID riid,
 147     LPOLESTR* rgszNames,
 148     UINT cNames,
 149     LCID lcid,
 150     DISPID* rgDispId )
 151 {
 152     xmlnodelist *This = impl_from_IXMLDOMNodeList( iface );
 153     return IDispatchEx_GetIDsOfNames(&This->dispex.IDispatchEx_iface,
 154         riid, rgszNames, cNames, lcid, rgDispId);
 155 }
 156
 157 static HRESULT WINAPI xmlnodelist_Invoke(
 158     IXMLDOMNodeList *iface,
 159     DISPID dispIdMember,
 160     REFIID riid,
 161     LCID lcid,
 162     WORD wFlags,
 163     DISPPARAMS* pDispParams,
 164     VARIANT* pVarResult,
 165     EXCEPINFO* pExcepInfo,
 166     UINT* puArgErr )
 167 {
 168     xmlnodelist *This = impl_from_IXMLDOMNodeList( iface );
 169     return IDispatchEx_Invoke(&This->dispex.IDispatchEx_iface,
 170         dispIdMember, riid, lcid, wFlags, pDispParams, pVarResult, pExcepInfo, puArgErr);
 171 }
 172
 173 static HRESULT WINAPI xmlnodelist_get_item(
 174         IXMLDOMNodeList* iface,
 175         LONG index,
 176         IXMLDOMNode** listItem)
 177 {
 178     xmlnodelist *This = impl_from_IXMLDOMNodeList( iface );
 179     xmlNodePtr curr;
 180     LONG nodeIndex = 0;
 181
 182     TRACE("(%p)->(%d %p)\n", This, index, listItem);
 183
 184     if(!listItem)
 185         return E_INVALIDARG;
 186
 187     *listItem = NULL;
 188
 189     if (index < 0)
 190         return S_FALSE;
 191
 192     curr = This->parent->children;
 193     while(curr)
 194     {
 195         if(nodeIndex++ == index) break;
 196         curr = curr->next;
 197     }
 198     if(!curr) return S_FALSE;
 199
 200     *listItem = create_node( curr );
 201
 202     return S_OK;
 203 }
 204
 205 static HRESULT WINAPI xmlnodelist_get_length(
 206         IXMLDOMNodeList* iface,
 207         LONG* listLength)
 208 {
 209
 210     xmlNodePtr curr;
 211     LONG nodeCount = 0;
 212
 213     xmlnodelist *This = impl_from_IXMLDOMNodeList( iface );
 214
 215     TRACE("(%p)->(%p)\n", This, listLength);
 216
 217     if(!listLength)
 218         return E_INVALIDARG;
 219
 220     curr = This->parent->children;
 221     while (curr)
 222     {
 223         nodeCount++;
 224         curr = curr->next;
 225     }
 226
 227     *listLength = nodeCount;
 228     return S_OK;
 229 }
 230
 231 static HRESULT WINAPI xmlnodelist_nextNode(
 232         IXMLDOMNodeList* iface,
 233         IXMLDOMNode** nextItem)
 234 {
 235     xmlnodelist *This = impl_from_IXMLDOMNodeList( iface );
 236
 237     TRACE("(%p)->(%p)\n", This, nextItem );
 238
 239     if(!nextItem)
 240         return E_INVALIDARG;
 241
 242     *nextItem = NULL;
 243
 244     if (!This->current)
 245         return S_FALSE;
 246
 247     *nextItem = create_node( This->current );
 248     This->current = This->current->next;
 249     return S_OK;
 250 }
 251
 252 static HRESULT WINAPI xmlnodelist_reset(
 253         IXMLDOMNodeList* iface)
 254 {
 255     xmlnodelist *This = impl_from_IXMLDOMNodeList( iface );
 256
 257     TRACE("%p\n", This);
 258     This->current = This->parent->children;
 259     return S_OK;
 260 }
 261
 262 static HRESULT WINAPI xmlnodelist__newEnum(
 263         IXMLDOMNodeList* iface,
 264         IUnknown** ppUnk)
 265 {
 266     xmlnodelist *This = impl_from_IXMLDOMNodeList( iface );
 267     FIXME("(%p)->(%p)\n", This, ppUnk);
 268     return E_NOTIMPL;
 269 }
 270
 271 static const struct IXMLDOMNodeListVtbl xmlnodelist_vtbl =
 272 {
 273     xmlnodelist_QueryInterface,
 274     xmlnodelist_AddRef,
 275     xmlnodelist_Release,
 276     xmlnodelist_GetTypeInfoCount,
 277     xmlnodelist_GetTypeInfo,
 278     xmlnodelist_GetIDsOfNames,
 279     xmlnodelist_Invoke,
 280     xmlnodelist_get_item,
 281     xmlnodelist_get_length,
 282     xmlnodelist_nextNode,
 283     xmlnodelist_reset,
 284     xmlnodelist__newEnum,
 285 };
 286
 287 static HRESULT xmlnodelist_get_dispid(IUnknown *iface, BSTR name, DWORD flags, DISPID *dispid)
 288 {
 289     WCHAR *ptr;
 290     int idx = 0;
 291
 292     for(ptr = name; *ptr && isdigitW(*ptr); ptr++)
 293         idx = idx*10 + (*ptr-'0');
 294     if(*ptr)
 295         return DISP_E_UNKNOWNNAME;
 296
 297     *dispid = DISPID_DOM_COLLECTION_BASE + idx;
 298     TRACE("ret %x\n", *dispid);
 299     return S_OK;
 300 }
 301
 302 static HRESULT xmlnodelist_invoke(IUnknown *iface, DISPID id, LCID lcid, WORD flags, DISPPARAMS *params,
 303         VARIANT *res, EXCEPINFO *ei)
 304 {
 305     xmlnodelist *This = impl_from_IXMLDOMNodeList( (IXMLDOMNodeList*)iface );
 306
 307     TRACE("(%p)->(%x %x %x %p %p %p)\n", This, id, lcid, flags, params, res, ei);
 308
 309     V_VT(res) = VT_DISPATCH;
 310     V_DISPATCH(res) = NULL;
 311
 312     if (id < DISPID_DOM_COLLECTION_BASE || id > DISPID_DOM_COLLECTION_MAX)
 313         return DISP_E_UNKNOWNNAME;
 314
 315     switch(flags)
 316     {
 317         case INVOKE_PROPERTYGET:
 318         {
 319             IXMLDOMNode *disp = NULL;
 320
 321             IXMLDOMNodeList_get_item(&This->IXMLDOMNodeList_iface, id - DISPID_DOM_COLLECTION_BASE, &disp);
 322             V_DISPATCH(res) = (IDispatch*)disp;
 323             break;
 324         }
 325         default:
 326         {
 327             FIXME("unimplemented flags %x\n", flags);
 328             break;
 329         }
 330     }
 331
 332     TRACE("ret %p\n", V_DISPATCH(res));
 333
 334     return S_OK;
 335 }
 336
 337 static const dispex_static_data_vtbl_t xmlnodelist_dispex_vtbl = {
 338     xmlnodelist_get_dispid,
 339     xmlnodelist_invoke
 340 };
 341
 342 static const tid_t xmlnodelist_iface_tids[] = {
 343     IXMLDOMNodeList_tid,
 344     0
 345 };
 346 static dispex_static_data_t xmlnodelist_dispex = {
 347     &xmlnodelist_dispex_vtbl,
 348     IXMLDOMNodeList_tid,
 349     NULL,
 350     xmlnodelist_iface_tids
 351 };
 352
 353 IXMLDOMNodeList* create_children_nodelist( xmlNodePtr node )
 354 {
 355     xmlnodelist *This;
 356
 357     This = heap_alloc( sizeof *This );
 358     if ( !This )
 359         return NULL;
 360
 361     This->IXMLDOMNodeList_iface.lpVtbl = &xmlnodelist_vtbl;
 362     This->ref = 1;
 363     This->parent = node;
 364     This->current = node->children;
 365     xmldoc_add_ref( node->doc );
 366
 367     init_dispex(&This->dispex, (IUnknown*)&This->IXMLDOMNodeList_iface, &xmlnodelist_dispex);
 368
 369     return &This->IXMLDOMNodeList_iface;
 370 }
 371
 372 #endif