/* * Node list implementation * * Copyright 2005 Mike McCormack * * This library is free software; you can redistribute it and/or * modify it under the terms of the GNU Lesser General Public * License as published by the Free Software Foundation; either * version 2.1 of the License, or (at your option) any later version. * * This library is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU * Lesser General Public License for more details. * * You should have received a copy of the GNU Lesser General Public * License along with this library; if not, write to the Free Software * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA */ #define COBJMACROS #include "config.h" #include <stdarg.h> #ifdef HAVE_LIBXML2 # include <libxml/parser.h> # include <libxml/xmlerror.h> #endif #include "windef.h" #include "winbase.h" #include "winuser.h" #include "ole2.h" #include "msxml6.h" #include "msxml2did.h" #include "msxml_private.h" #include "wine/debug.h" /* This file implements the object returned by childNodes property. Note that this is * not the IXMLDOMNodeList returned by XPath queries - it's implemented in selection.c. * They are different because the list returned by childNodes: * - is "live" - changes to the XML tree are automatically reflected in the list * - doesn't supports IXMLDOMSelection * - note that an attribute node have a text child in DOM but not in the XPath data model * thus the child is inaccessible by an XPath query */ WINE_DEFAULT_DEBUG_CHANNEL(msxml); #ifdef HAVE_LIBXML2 typedef struct { DispatchEx dispex; IXMLDOMNodeList IXMLDOMNodeList_iface; LONG ref; xmlNodePtr parent; xmlNodePtr current; IEnumVARIANT *enumvariant; } xmlnodelist; static HRESULT nodelist_get_item(IUnknown *iface, LONG index, VARIANT *item) { V_VT(item) = VT_DISPATCH; return IXMLDOMNodeList_get_item((IXMLDOMNodeList*)iface, index, (IXMLDOMNode**)&V_DISPATCH(item)); } static const struct enumvariant_funcs nodelist_enumvariant = { nodelist_get_item, NULL }; static inline xmlnodelist *impl_from_IXMLDOMNodeList( IXMLDOMNodeList *iface ) { return CONTAINING_RECORD(iface, xmlnodelist, IXMLDOMNodeList_iface); } static HRESULT WINAPI xmlnodelist_QueryInterface( IXMLDOMNodeList *iface, REFIID riid, void** ppvObject ) { xmlnodelist *This = impl_from_IXMLDOMNodeList( iface ); TRACE("(%p)->(%s %p)\n", This, debugstr_guid(riid), ppvObject); if ( IsEqualGUID( riid, &IID_IUnknown ) || IsEqualGUID( riid, &IID_IDispatch ) || IsEqualGUID( riid, &IID_IXMLDOMNodeList ) ) { *ppvObject = iface; } else if (IsEqualGUID( riid, &IID_IEnumVARIANT )) { if (!This->enumvariant) { HRESULT hr = create_enumvariant((IUnknown*)iface, FALSE, &nodelist_enumvariant, &This->enumvariant); if (FAILED(hr)) return hr; } return IEnumVARIANT_QueryInterface(This->enumvariant, &IID_IEnumVARIANT, ppvObject); } else if (dispex_query_interface(&This->dispex, riid, ppvObject)) { return *ppvObject ? S_OK : E_NOINTERFACE; } else { TRACE("interface %s not implemented\n", debugstr_guid(riid)); *ppvObject = NULL; return E_NOINTERFACE; } IXMLDOMNodeList_AddRef( iface ); return S_OK; } static ULONG WINAPI xmlnodelist_AddRef( IXMLDOMNodeList *iface ) { xmlnodelist *This = impl_from_IXMLDOMNodeList( iface ); ULONG ref = InterlockedIncrement( &This->ref ); TRACE("(%p)->(%d)\n", This, ref); return ref; } static ULONG WINAPI xmlnodelist_Release( IXMLDOMNodeList *iface ) { xmlnodelist *This = impl_from_IXMLDOMNodeList( iface ); ULONG ref = InterlockedDecrement( &This->ref ); TRACE("(%p)->(%d)\n", This, ref); if ( ref == 0 ) { xmldoc_release( This->parent->doc ); if (This->enumvariant) IEnumVARIANT_Release(This->enumvariant); heap_free( This ); } return ref; } static HRESULT WINAPI xmlnodelist_GetTypeInfoCount( IXMLDOMNodeList *iface, UINT* pctinfo ) { xmlnodelist *This = impl_from_IXMLDOMNodeList( iface ); return IDispatchEx_GetTypeInfoCount(&This->dispex.IDispatchEx_iface, pctinfo); } static HRESULT WINAPI xmlnodelist_GetTypeInfo( IXMLDOMNodeList *iface, UINT iTInfo, LCID lcid, ITypeInfo** ppTInfo ) { xmlnodelist *This = impl_from_IXMLDOMNodeList( iface ); return IDispatchEx_GetTypeInfo(&This->dispex.IDispatchEx_iface, iTInfo, lcid, ppTInfo); } static HRESULT WINAPI xmlnodelist_GetIDsOfNames( IXMLDOMNodeList *iface, REFIID riid, LPOLESTR* rgszNames, UINT cNames, LCID lcid, DISPID* rgDispId ) { xmlnodelist *This = impl_from_IXMLDOMNodeList( iface ); return IDispatchEx_GetIDsOfNames(&This->dispex.IDispatchEx_iface, riid, rgszNames, cNames, lcid, rgDispId); } static HRESULT WINAPI xmlnodelist_Invoke( IXMLDOMNodeList *iface, DISPID dispIdMember, REFIID riid, LCID lcid, WORD wFlags, DISPPARAMS* pDispParams, VARIANT* pVarResult, EXCEPINFO* pExcepInfo, UINT* puArgErr ) { xmlnodelist *This = impl_from_IXMLDOMNodeList( iface ); return IDispatchEx_Invoke(&This->dispex.IDispatchEx_iface, dispIdMember, riid, lcid, wFlags, pDispParams, pVarResult, pExcepInfo, puArgErr); } static HRESULT WINAPI xmlnodelist_get_item( IXMLDOMNodeList* iface, LONG index, IXMLDOMNode** listItem) { xmlnodelist *This = impl_from_IXMLDOMNodeList( iface ); xmlNodePtr curr; LONG nodeIndex = 0; TRACE("(%p)->(%d %p)\n", This, index, listItem); if(!listItem) return E_INVALIDARG; *listItem = NULL; if (index < 0) return S_FALSE; curr = This->parent->children; while(curr) { if(nodeIndex++ == index) break; curr = curr->next; } if(!curr) return S_FALSE; *listItem = create_node( curr ); return S_OK; } static HRESULT WINAPI xmlnodelist_get_length( IXMLDOMNodeList* iface, LONG* listLength) { xmlNodePtr curr; LONG nodeCount = 0; xmlnodelist *This = impl_from_IXMLDOMNodeList( iface ); TRACE("(%p)->(%p)\n", This, listLength); if(!listLength) return E_INVALIDARG; curr = This->parent->children; while (curr) { nodeCount++; curr = curr->next; } *listLength = nodeCount; return S_OK; } static HRESULT WINAPI xmlnodelist_nextNode( IXMLDOMNodeList* iface, IXMLDOMNode** nextItem) { xmlnodelist *This = impl_from_IXMLDOMNodeList( iface ); TRACE("(%p)->(%p)\n", This, nextItem ); if(!nextItem) return E_INVALIDARG; *nextItem = NULL; if (!This->current) return S_FALSE; *nextItem = create_node( This->current ); This->current = This->current->next; return S_OK; } static HRESULT WINAPI xmlnodelist_reset( IXMLDOMNodeList* iface) { xmlnodelist *This = impl_from_IXMLDOMNodeList( iface ); TRACE("%p\n", This); This->current = This->parent->children; return S_OK; } static HRESULT WINAPI xmlnodelist__newEnum( IXMLDOMNodeList* iface, IUnknown** enumv) { xmlnodelist *This = impl_from_IXMLDOMNodeList( iface ); TRACE("(%p)->(%p)\n", This, enumv); return create_enumvariant((IUnknown*)iface, TRUE, &nodelist_enumvariant, (IEnumVARIANT**)enumv); } static const struct IXMLDOMNodeListVtbl xmlnodelist_vtbl = { xmlnodelist_QueryInterface, xmlnodelist_AddRef, xmlnodelist_Release, xmlnodelist_GetTypeInfoCount, xmlnodelist_GetTypeInfo, xmlnodelist_GetIDsOfNames, xmlnodelist_Invoke, xmlnodelist_get_item, xmlnodelist_get_length, xmlnodelist_nextNode, xmlnodelist_reset, xmlnodelist__newEnum, }; static HRESULT xmlnodelist_get_dispid(IUnknown *iface, BSTR name, DWORD flags, DISPID *dispid) { WCHAR *ptr; int idx = 0; for(ptr = name; *ptr && isdigitW(*ptr); ptr++) idx = idx*10 + (*ptr-'0'); if(*ptr) return DISP_E_UNKNOWNNAME; *dispid = DISPID_DOM_COLLECTION_BASE + idx; TRACE("ret %x\n", *dispid); return S_OK; } static HRESULT xmlnodelist_invoke(IUnknown *iface, DISPID id, LCID lcid, WORD flags, DISPPARAMS *params, VARIANT *res, EXCEPINFO *ei) { xmlnodelist *This = impl_from_IXMLDOMNodeList( (IXMLDOMNodeList*)iface ); TRACE("(%p)->(%x %x %x %p %p %p)\n", This, id, lcid, flags, params, res, ei); V_VT(res) = VT_DISPATCH; V_DISPATCH(res) = NULL; if (id < DISPID_DOM_COLLECTION_BASE || id > DISPID_DOM_COLLECTION_MAX) return DISP_E_UNKNOWNNAME; switch(flags) { case INVOKE_PROPERTYGET: { IXMLDOMNode *disp = NULL; IXMLDOMNodeList_get_item(&This->IXMLDOMNodeList_iface, id - DISPID_DOM_COLLECTION_BASE, &disp); V_DISPATCH(res) = (IDispatch*)disp; break; } default: { FIXME("unimplemented flags %x\n", flags); break; } } TRACE("ret %p\n", V_DISPATCH(res)); return S_OK; } static const dispex_static_data_vtbl_t xmlnodelist_dispex_vtbl = { xmlnodelist_get_dispid, xmlnodelist_invoke }; static const tid_t xmlnodelist_iface_tids[] = { IXMLDOMNodeList_tid, 0 }; static dispex_static_data_t xmlnodelist_dispex = { &xmlnodelist_dispex_vtbl, IXMLDOMNodeList_tid, NULL, xmlnodelist_iface_tids }; IXMLDOMNodeList* create_children_nodelist( xmlNodePtr node ) { xmlnodelist *This; This = heap_alloc( sizeof *This ); if ( !This ) return NULL; This->IXMLDOMNodeList_iface.lpVtbl = &xmlnodelist_vtbl; This->ref = 1; This->parent = node; This->current = node->children; This->enumvariant = NULL; xmldoc_add_ref( node->doc ); init_dispex(&This->dispex, (IUnknown*)&This->IXMLDOMNodeList_iface, &xmlnodelist_dispex); return &This->IXMLDOMNodeList_iface; } #endif