4 * Copyright 2005 Mike McCormack
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.
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.
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
34 #include "msxml_private.h"
36 #include "wine/debug.h"
38 WINE_DEFAULT_DEBUG_CHANNEL(msxml);
42 typedef struct _xmlnode
44 const struct IXMLDOMNodeVtbl *lpVtbl;
45 const struct IUnknownVtbl *lpInternalUnkVtbl;
51 static inline xmlnode *impl_from_IXMLDOMNode( IXMLDOMNode *iface )
53 return (xmlnode *)((char*)iface - FIELD_OFFSET(xmlnode, lpVtbl));
56 static inline xmlnode *impl_from_InternalUnknown( IUnknown *iface )
58 return (xmlnode *)((char*)iface - FIELD_OFFSET(xmlnode, lpInternalUnkVtbl));
61 xmlNodePtr xmlNodePtr_from_domnode( IXMLDOMNode *iface, xmlElementType type )
67 This = impl_from_IXMLDOMNode( iface );
70 if ( type && This->node->type != type )
75 void attach_xmlnode( IXMLDOMNode *node, xmlNodePtr xml )
77 xmlnode *This = impl_from_IXMLDOMNode( node );
80 xmldoc_release(This->node->doc);
84 xmldoc_add_ref(This->node->doc);
89 static HRESULT WINAPI xmlnode_QueryInterface(
94 xmlnode *This = impl_from_IXMLDOMNode( iface );
95 TRACE("%p %s %p\n", This, debugstr_guid(riid), ppvObject);
97 return IUnknown_QueryInterface(This->pUnkOuter, riid, ppvObject);
100 static ULONG WINAPI xmlnode_AddRef(
103 xmlnode *This = impl_from_IXMLDOMNode( iface );
104 return IUnknown_AddRef(This->pUnkOuter);
107 static ULONG WINAPI xmlnode_Release(
110 xmlnode *This = impl_from_IXMLDOMNode( iface );
111 return IUnknown_Release(This->pUnkOuter);
114 static HRESULT WINAPI xmlnode_GetTypeInfoCount(
122 static HRESULT WINAPI xmlnode_GetTypeInfo(
126 ITypeInfo** ppTInfo )
132 static HRESULT WINAPI xmlnode_GetIDsOfNames(
144 static HRESULT WINAPI xmlnode_Invoke(
150 DISPPARAMS* pDispParams,
152 EXCEPINFO* pExcepInfo,
159 static HRESULT WINAPI xmlnode_get_nodeName(
163 xmlnode *This = impl_from_IXMLDOMNode( iface );
166 TRACE("%p\n", This );
174 switch( This->node->type )
177 str = (const xmlChar*) "#text";
179 case XML_DOCUMENT_NODE:
180 str = (const xmlChar*) "#document";
183 str = This->node->name;
187 *name = bstr_from_xmlChar( str );
194 BSTR bstr_from_xmlChar( const xmlChar *buf )
203 len = MultiByteToWideChar( CP_UTF8, 0, (LPCSTR) buf, -1, NULL, 0 );
204 str = (LPWSTR) HeapAlloc( GetProcessHeap(), 0, len * sizeof (WCHAR) );
207 MultiByteToWideChar( CP_UTF8, 0, (LPCSTR) buf, -1, str, len );
208 bstr = SysAllocString( str );
209 HeapFree( GetProcessHeap(), 0, str );
213 static HRESULT WINAPI xmlnode_get_nodeValue(
217 xmlnode *This = impl_from_IXMLDOMNode( iface );
220 TRACE("%p %p\n", This, value);
222 V_BSTR(value) = NULL;
223 V_VT(value) = VT_NULL;
225 switch ( This->node->type )
227 case XML_ATTRIBUTE_NODE:
229 xmlChar *content = xmlNodeGetContent(This->node);
230 V_VT(value) = VT_BSTR;
231 V_BSTR(value) = bstr_from_xmlChar( content );
237 V_VT(value) = VT_BSTR;
238 V_BSTR(value) = bstr_from_xmlChar( This->node->content );
241 case XML_ELEMENT_NODE:
242 case XML_DOCUMENT_NODE:
243 /* these seem to return NULL */
247 FIXME("node %p type %d\n", This, This->node->type);
250 TRACE("%p returned %s\n", This, debugstr_w( V_BSTR(value) ) );
255 static HRESULT WINAPI xmlnode_put_nodeValue(
263 static HRESULT WINAPI xmlnode_get_nodeType(
267 xmlnode *This = impl_from_IXMLDOMNode( iface );
269 TRACE("%p %p\n", This, type);
271 assert( NODE_ELEMENT == XML_ELEMENT_NODE );
272 assert( NODE_NOTATION == XML_NOTATION_NODE );
274 *type = This->node->type;
279 static HRESULT get_node(
285 TRACE("%p->%s %p\n", This, name, node );
289 *out = create_node( node );
295 static HRESULT WINAPI xmlnode_get_parentNode(
297 IXMLDOMNode** parent)
299 xmlnode *This = impl_from_IXMLDOMNode( iface );
300 return get_node( This, "parent", This->node->parent, parent );
303 static HRESULT WINAPI xmlnode_get_childNodes(
305 IXMLDOMNodeList** childList)
307 xmlnode *This = impl_from_IXMLDOMNode( iface );
309 TRACE("%p %p\n", This, childList );
314 switch(This->node->type)
316 case XML_ELEMENT_NODE:
317 *childList = create_filtered_nodelist( This->node->children, (const xmlChar *)"*", FALSE );
320 case XML_ATTRIBUTE_NODE:
321 *childList = create_filtered_nodelist( This->node->children, (const xmlChar *)"node()", FALSE );
325 FIXME("unhandled node type %d\n", This->node->type);
334 static HRESULT WINAPI xmlnode_get_firstChild(
336 IXMLDOMNode** firstChild)
338 xmlnode *This = impl_from_IXMLDOMNode( iface );
339 return get_node( This, "firstChild", This->node->children, firstChild );
342 static HRESULT WINAPI xmlnode_get_lastChild(
344 IXMLDOMNode** lastChild)
346 xmlnode *This = impl_from_IXMLDOMNode( iface );
347 return get_node( This, "lastChild", This->node->last, lastChild );
350 static HRESULT WINAPI xmlnode_get_previousSibling(
352 IXMLDOMNode** previousSibling)
354 xmlnode *This = impl_from_IXMLDOMNode( iface );
355 return get_node( This, "previous", This->node->prev, previousSibling );
358 static HRESULT WINAPI xmlnode_get_nextSibling(
360 IXMLDOMNode** nextSibling)
362 xmlnode *This = impl_from_IXMLDOMNode( iface );
363 return get_node( This, "next", This->node->next, nextSibling );
366 static HRESULT WINAPI xmlnode_get_attributes(
368 IXMLDOMNamedNodeMap** attributeMap)
370 xmlnode *This = impl_from_IXMLDOMNode( iface );
372 *attributeMap = create_nodemap( iface );
376 static HRESULT WINAPI xmlnode_insertBefore(
378 IXMLDOMNode* newChild,
380 IXMLDOMNode** outNewChild)
382 xmlnode *This = impl_from_IXMLDOMNode( iface );
383 xmlNodePtr before_node, new_child_node;
384 IXMLDOMNode *before = NULL, *new;
387 TRACE("(%p)->(%p,var,%p)\n",This,newChild,outNewChild);
389 if (!(newChild && outNewChild))
392 switch(V_VT(&refChild))
399 hr = IUnknown_QueryInterface(V_UNKNOWN(&refChild), &IID_IXMLDOMNode, (LPVOID)&before);
400 if(FAILED(hr)) return hr;
404 hr = IDispatch_QueryInterface(V_DISPATCH(&refChild), &IID_IXMLDOMNode, (LPVOID)&before);
405 if(FAILED(hr)) return hr;
409 FIXME("refChild var type %x\n", V_VT(&refChild));
413 IXMLDOMNode_QueryInterface(newChild, &IID_IXMLDOMNode, (LPVOID)&new);
414 new_child_node = impl_from_IXMLDOMNode(new)->node;
415 TRACE("new_child_node %p This->node %p\n", new_child_node, This->node);
419 before_node = impl_from_IXMLDOMNode(before)->node;
420 xmlAddPrevSibling(before_node, new_child_node);
421 IXMLDOMNode_Release(before);
425 xmlAddChild(This->node, new_child_node);
428 IXMLDOMNode_Release(new);
429 IXMLDOMNode_AddRef(newChild);
430 *outNewChild = newChild;
435 static HRESULT WINAPI xmlnode_replaceChild(
437 IXMLDOMNode* newChild,
438 IXMLDOMNode* oldChild,
439 IXMLDOMNode** outOldChild)
445 static HRESULT WINAPI xmlnode_removeChild(
447 IXMLDOMNode* childNode,
448 IXMLDOMNode** oldChild)
450 xmlnode *This = impl_from_IXMLDOMNode( iface );
451 xmlNode *ancestor, *child_node_ptr;
455 TRACE("%p->(%p, %p)\n", This, childNode, oldChild);
459 if(!childNode) return E_INVALIDARG;
461 hr = IXMLDOMNode_QueryInterface(childNode, &IID_IXMLDOMNode, (LPVOID)&child);
465 child_node_ptr = ancestor = impl_from_IXMLDOMNode(child)->node;
466 while(ancestor->parent)
468 if(ancestor->parent == This->node)
470 ancestor = ancestor->parent;
472 if(!ancestor->parent)
474 WARN("childNode %p is not a child of %p\n", childNode, iface);
475 IXMLDOMNode_Release(child);
479 xmlUnlinkNode(child_node_ptr);
481 IXMLDOMNode_Release(child);
482 IXMLDOMNode_AddRef(childNode);
483 *oldChild = childNode;
487 static HRESULT WINAPI xmlnode_appendChild(
489 IXMLDOMNode* newChild,
490 IXMLDOMNode** outNewChild)
492 xmlnode *This = impl_from_IXMLDOMNode( iface );
495 TRACE("(%p)->(%p,%p)\n", This, newChild, outNewChild);
497 return IXMLDOMNode_insertBefore(iface, newChild, var, outNewChild);
500 static HRESULT WINAPI xmlnode_hasChildNodes(
502 VARIANT_BOOL* hasChild)
504 xmlnode *This = impl_from_IXMLDOMNode( iface );
510 if (!This->node->children)
512 *hasChild = VARIANT_FALSE;
516 *hasChild = VARIANT_TRUE;
520 static HRESULT WINAPI xmlnode_get_ownerDocument(
522 IXMLDOMDocument** DOMDocument)
528 static HRESULT WINAPI xmlnode_cloneNode(
531 IXMLDOMNode** cloneRoot)
537 static HRESULT WINAPI xmlnode_get_nodeTypeString(
545 static HRESULT WINAPI xmlnode_get_text(
549 xmlnode *This = impl_from_IXMLDOMNode( iface );
557 switch(This->node->type)
559 case XML_ELEMENT_NODE:
560 case XML_ATTRIBUTE_NODE:
562 xmlNodePtr child = This->node->children;
563 if ( child && child->type == XML_TEXT_NODE )
564 str = bstr_from_xmlChar( child->content );
569 str = bstr_from_xmlChar( This->node->content );
573 FIXME("Unhandled node type %d\n", This->node->type);
576 TRACE("%p %s\n", This, debugstr_w(str) );
582 static HRESULT WINAPI xmlnode_put_text(
590 static HRESULT WINAPI xmlnode_get_specified(
592 VARIANT_BOOL* isSpecified)
598 static HRESULT WINAPI xmlnode_get_definition(
600 IXMLDOMNode** definitionNode)
606 static HRESULT WINAPI xmlnode_get_nodeTypedValue(
610 FIXME("ignoring data type\n");
611 return xmlnode_get_nodeValue(iface, typedValue);
614 static HRESULT WINAPI xmlnode_put_nodeTypedValue(
622 static HRESULT WINAPI xmlnode_get_dataType(
624 VARIANT* dataTypeName)
630 static HRESULT WINAPI xmlnode_put_dataType(
638 static HRESULT WINAPI xmlnode_get_xml(
646 static HRESULT WINAPI xmlnode_transformNode(
648 IXMLDOMNode* styleSheet,
655 static HRESULT WINAPI xmlnode_selectNodes(
658 IXMLDOMNodeList** resultList)
660 xmlnode *This = impl_from_IXMLDOMNode( iface );
664 TRACE("%p %s %p\n", This, debugstr_w(queryString), resultList );
666 str = xmlChar_from_wchar( queryString );
670 if( !This->node->children )
673 *resultList = create_filtered_nodelist( This->node->children, str, FALSE );
674 HeapFree( GetProcessHeap(), 0, str );
678 static HRESULT WINAPI xmlnode_selectSingleNode(
681 IXMLDOMNode** resultNode)
683 xmlnode *This = impl_from_IXMLDOMNode( iface );
684 IXMLDOMNodeList *list;
687 TRACE("%p %s %p\n", This, debugstr_w(queryString), resultNode );
689 r = IXMLDOMNode_selectNodes(iface, queryString, &list);
692 r = IXMLDOMNodeList_nextNode(list, resultNode);
693 IXMLDOMNodeList_Release(list);
698 static HRESULT WINAPI xmlnode_get_parsed(
700 VARIANT_BOOL* isParsed)
706 static HRESULT WINAPI xmlnode_get_namespaceURI(
714 static HRESULT WINAPI xmlnode_get_prefix(
722 static HRESULT WINAPI xmlnode_get_baseName(
726 xmlnode *This = impl_from_IXMLDOMNode( iface );
730 TRACE("%p %p\n", This, nameString );
735 switch ( This->node->type )
737 case XML_ELEMENT_NODE:
738 case XML_ATTRIBUTE_NODE:
739 str = bstr_from_xmlChar( This->node->name );
745 ERR("Unhandled type %d\n", This->node->type );
749 TRACE("returning %08x str = %s\n", r, debugstr_w( str ) );
755 static HRESULT WINAPI xmlnode_transformNodeToObject(
757 IXMLDOMNode* stylesheet,
758 VARIANT outputObject)
764 static const struct IXMLDOMNodeVtbl xmlnode_vtbl =
766 xmlnode_QueryInterface,
769 xmlnode_GetTypeInfoCount,
771 xmlnode_GetIDsOfNames,
773 xmlnode_get_nodeName,
774 xmlnode_get_nodeValue,
775 xmlnode_put_nodeValue,
776 xmlnode_get_nodeType,
777 xmlnode_get_parentNode,
778 xmlnode_get_childNodes,
779 xmlnode_get_firstChild,
780 xmlnode_get_lastChild,
781 xmlnode_get_previousSibling,
782 xmlnode_get_nextSibling,
783 xmlnode_get_attributes,
784 xmlnode_insertBefore,
785 xmlnode_replaceChild,
788 xmlnode_hasChildNodes,
789 xmlnode_get_ownerDocument,
791 xmlnode_get_nodeTypeString,
794 xmlnode_get_specified,
795 xmlnode_get_definition,
796 xmlnode_get_nodeTypedValue,
797 xmlnode_put_nodeTypedValue,
798 xmlnode_get_dataType,
799 xmlnode_put_dataType,
801 xmlnode_transformNode,
803 xmlnode_selectSingleNode,
805 xmlnode_get_namespaceURI,
807 xmlnode_get_baseName,
808 xmlnode_transformNodeToObject,
811 static HRESULT WINAPI Internal_QueryInterface(
816 xmlnode *This = impl_from_InternalUnknown( iface );
818 TRACE("%p %s %p\n", iface, debugstr_guid(riid), ppvObject);
821 if ( IsEqualGUID( riid, &IID_IUnknown ))
823 else if ( IsEqualGUID( riid, &IID_IDispatch ) ||
824 IsEqualGUID( riid, &IID_IXMLDOMNode ) )
825 *ppvObject = &This->lpVtbl;
828 FIXME("interface %s not implemented\n", debugstr_guid(riid));
830 return E_NOINTERFACE;
833 IUnknown_AddRef( (IUnknown*)*ppvObject );
838 static ULONG WINAPI Internal_AddRef(
841 xmlnode *This = impl_from_InternalUnknown( iface );
842 return InterlockedIncrement( &This->ref );
845 static ULONG WINAPI Internal_Release(
848 xmlnode *This = impl_from_InternalUnknown( iface );
851 ref = InterlockedDecrement( &This->ref );
855 xmldoc_release( This->node->doc );
856 HeapFree( GetProcessHeap(), 0, This );
862 static const struct IUnknownVtbl internal_unk_vtbl =
864 Internal_QueryInterface,
869 IUnknown *create_basic_node( xmlNodePtr node, IUnknown *pUnkOuter )
873 This = HeapAlloc( GetProcessHeap(), 0, sizeof *This );
878 xmldoc_add_ref( node->doc );
880 This->lpVtbl = &xmlnode_vtbl;
881 This->lpInternalUnkVtbl = &internal_unk_vtbl;
884 This->pUnkOuter = pUnkOuter; /* Don't take a ref on outer Unknown */
886 This->pUnkOuter = (IUnknown *)&This->lpInternalUnkVtbl;
891 return (IUnknown*)&This->lpInternalUnkVtbl;
894 IXMLDOMNode *create_node( xmlNodePtr node )
903 TRACE("type %d\n", node->type);
906 case XML_ELEMENT_NODE:
907 pUnk = create_element( node, NULL );
909 case XML_ATTRIBUTE_NODE:
910 pUnk = create_attribute( node );
913 pUnk = create_text( node );
915 case XML_COMMENT_NODE:
916 pUnk = create_comment( node );
918 case XML_DOCUMENT_NODE:
919 ERR("shouldn't be here!\n");
922 FIXME("only creating basic node for type %d\n", node->type);
923 pUnk = create_basic_node( node, NULL );
926 hr = IUnknown_QueryInterface(pUnk, &IID_IXMLDOMNode, (LPVOID*)&ret);
927 IUnknown_Release(pUnk);
928 if(FAILED(hr)) return NULL;