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 *childList
= create_children_nodelist(This
->node
);
315 if (*childList
== NULL
)
316 return E_OUTOFMEMORY
;
321 static HRESULT WINAPI
xmlnode_get_firstChild(
323 IXMLDOMNode
** firstChild
)
325 xmlnode
*This
= impl_from_IXMLDOMNode( iface
);
326 return get_node( This
, "firstChild", This
->node
->children
, firstChild
);
329 static HRESULT WINAPI
xmlnode_get_lastChild(
331 IXMLDOMNode
** lastChild
)
333 xmlnode
*This
= impl_from_IXMLDOMNode( iface
);
334 return get_node( This
, "lastChild", This
->node
->last
, lastChild
);
337 static HRESULT WINAPI
xmlnode_get_previousSibling(
339 IXMLDOMNode
** previousSibling
)
341 xmlnode
*This
= impl_from_IXMLDOMNode( iface
);
342 return get_node( This
, "previous", This
->node
->prev
, previousSibling
);
345 static HRESULT WINAPI
xmlnode_get_nextSibling(
347 IXMLDOMNode
** nextSibling
)
349 xmlnode
*This
= impl_from_IXMLDOMNode( iface
);
350 return get_node( This
, "next", This
->node
->next
, nextSibling
);
353 static HRESULT WINAPI
xmlnode_get_attributes(
355 IXMLDOMNamedNodeMap
** attributeMap
)
357 xmlnode
*This
= impl_from_IXMLDOMNode( iface
);
359 *attributeMap
= create_nodemap( iface
);
363 static HRESULT WINAPI
xmlnode_insertBefore(
365 IXMLDOMNode
* newChild
,
367 IXMLDOMNode
** outNewChild
)
369 xmlnode
*This
= impl_from_IXMLDOMNode( iface
);
370 xmlNodePtr before_node
, new_child_node
;
371 IXMLDOMNode
*before
= NULL
, *new;
374 TRACE("(%p)->(%p,var,%p)\n",This
,newChild
,outNewChild
);
379 switch(V_VT(&refChild
))
386 hr
= IUnknown_QueryInterface(V_UNKNOWN(&refChild
), &IID_IXMLDOMNode
, (LPVOID
)&before
);
387 if(FAILED(hr
)) return hr
;
391 hr
= IDispatch_QueryInterface(V_DISPATCH(&refChild
), &IID_IXMLDOMNode
, (LPVOID
)&before
);
392 if(FAILED(hr
)) return hr
;
396 FIXME("refChild var type %x\n", V_VT(&refChild
));
400 IXMLDOMNode_QueryInterface(newChild
, &IID_IXMLDOMNode
, (LPVOID
)&new);
401 new_child_node
= impl_from_IXMLDOMNode(new)->node
;
402 TRACE("new_child_node %p This->node %p\n", new_child_node
, This
->node
);
406 before_node
= impl_from_IXMLDOMNode(before
)->node
;
407 xmlAddPrevSibling(before_node
, new_child_node
);
408 IXMLDOMNode_Release(before
);
412 xmlAddChild(This
->node
, new_child_node
);
415 IXMLDOMNode_Release(new);
416 IXMLDOMNode_AddRef(newChild
);
418 *outNewChild
= newChild
;
424 static HRESULT WINAPI
xmlnode_replaceChild(
426 IXMLDOMNode
* newChild
,
427 IXMLDOMNode
* oldChild
,
428 IXMLDOMNode
** outOldChild
)
434 static HRESULT WINAPI
xmlnode_removeChild(
436 IXMLDOMNode
* childNode
,
437 IXMLDOMNode
** oldChild
)
439 xmlnode
*This
= impl_from_IXMLDOMNode( iface
);
440 xmlNode
*ancestor
, *child_node_ptr
;
444 TRACE("%p->(%p, %p)\n", This
, childNode
, oldChild
);
448 if(!childNode
) return E_INVALIDARG
;
450 hr
= IXMLDOMNode_QueryInterface(childNode
, &IID_IXMLDOMNode
, (LPVOID
)&child
);
454 child_node_ptr
= ancestor
= impl_from_IXMLDOMNode(child
)->node
;
455 while(ancestor
->parent
)
457 if(ancestor
->parent
== This
->node
)
459 ancestor
= ancestor
->parent
;
461 if(!ancestor
->parent
)
463 WARN("childNode %p is not a child of %p\n", childNode
, iface
);
464 IXMLDOMNode_Release(child
);
468 xmlUnlinkNode(child_node_ptr
);
470 IXMLDOMNode_Release(child
);
471 IXMLDOMNode_AddRef(childNode
);
472 *oldChild
= childNode
;
476 static HRESULT WINAPI
xmlnode_appendChild(
478 IXMLDOMNode
* newChild
,
479 IXMLDOMNode
** outNewChild
)
481 xmlnode
*This
= impl_from_IXMLDOMNode( iface
);
484 TRACE("(%p)->(%p,%p)\n", This
, newChild
, outNewChild
);
486 return IXMLDOMNode_insertBefore(iface
, newChild
, var
, outNewChild
);
489 static HRESULT WINAPI
xmlnode_hasChildNodes(
491 VARIANT_BOOL
* hasChild
)
493 xmlnode
*This
= impl_from_IXMLDOMNode( iface
);
499 if (!This
->node
->children
)
501 *hasChild
= VARIANT_FALSE
;
505 *hasChild
= VARIANT_TRUE
;
509 static HRESULT WINAPI
xmlnode_get_ownerDocument(
511 IXMLDOMDocument
** DOMDocument
)
517 static HRESULT WINAPI
xmlnode_cloneNode(
520 IXMLDOMNode
** cloneRoot
)
522 xmlnode
*This
= impl_from_IXMLDOMNode( iface
);
523 xmlNodePtr pClone
= NULL
;
524 IXMLDOMNode
*pNode
= NULL
;
526 TRACE("%p (%d)\n", This
, deep
);
531 pClone
= xmlCopyNode(This
->node
, deep
? 1 : 2);
534 pClone
->doc
= This
->node
->doc
;
536 pNode
= create_node(pClone
);
539 ERR("Copy failed\n");
547 ERR("Copy failed\n");
554 static HRESULT WINAPI
xmlnode_get_nodeTypeString(
562 static HRESULT WINAPI
xmlnode_get_text(
566 xmlnode
*This
= impl_from_IXMLDOMNode( iface
);
574 switch(This
->node
->type
)
576 case XML_ELEMENT_NODE
:
577 case XML_ATTRIBUTE_NODE
:
579 xmlNodePtr child
= This
->node
->children
;
580 if ( child
&& child
->type
== XML_TEXT_NODE
)
581 str
= bstr_from_xmlChar( child
->content
);
586 case XML_CDATA_SECTION_NODE
:
588 case XML_COMMENT_NODE
:
589 str
= bstr_from_xmlChar( This
->node
->content
);
593 FIXME("Unhandled node type %d\n", This
->node
->type
);
596 /* Always return a string. */
597 if (!str
) str
= SysAllocStringLen( NULL
, 0 );
599 TRACE("%p %s\n", This
, debugstr_w(str
) );
605 static HRESULT WINAPI
xmlnode_put_text(
613 static HRESULT WINAPI
xmlnode_get_specified(
615 VARIANT_BOOL
* isSpecified
)
621 static HRESULT WINAPI
xmlnode_get_definition(
623 IXMLDOMNode
** definitionNode
)
629 static HRESULT WINAPI
xmlnode_get_nodeTypedValue(
633 FIXME("ignoring data type\n");
634 return xmlnode_get_nodeValue(iface
, typedValue
);
637 static HRESULT WINAPI
xmlnode_put_nodeTypedValue(
645 static HRESULT WINAPI
xmlnode_get_dataType(
647 VARIANT
* dataTypeName
)
653 static HRESULT WINAPI
xmlnode_put_dataType(
661 static HRESULT WINAPI
xmlnode_get_xml(
669 static HRESULT WINAPI
xmlnode_transformNode(
671 IXMLDOMNode
* styleSheet
,
678 static HRESULT WINAPI
xmlnode_selectNodes(
681 IXMLDOMNodeList
** resultList
)
683 xmlnode
*This
= impl_from_IXMLDOMNode( iface
);
685 TRACE("%p %s %p\n", This
, debugstr_w(queryString
), resultList
);
687 return queryresult_create( This
->node
, queryString
, resultList
);
690 static HRESULT WINAPI
xmlnode_selectSingleNode(
693 IXMLDOMNode
** resultNode
)
695 xmlnode
*This
= impl_from_IXMLDOMNode( iface
);
696 IXMLDOMNodeList
*list
;
699 TRACE("%p %s %p\n", This
, debugstr_w(queryString
), resultNode
);
702 r
= IXMLDOMNode_selectNodes(iface
, queryString
, &list
);
705 r
= IXMLDOMNodeList_nextNode(list
, resultNode
);
706 IXMLDOMNodeList_Release(list
);
711 static HRESULT WINAPI
xmlnode_get_parsed(
713 VARIANT_BOOL
* isParsed
)
719 static HRESULT WINAPI
xmlnode_get_namespaceURI(
727 static HRESULT WINAPI
xmlnode_get_prefix(
735 static HRESULT WINAPI
xmlnode_get_baseName(
739 xmlnode
*This
= impl_from_IXMLDOMNode( iface
);
743 TRACE("%p %p\n", This
, nameString
);
748 switch ( This
->node
->type
)
750 case XML_ELEMENT_NODE
:
751 case XML_ATTRIBUTE_NODE
:
752 str
= bstr_from_xmlChar( This
->node
->name
);
758 ERR("Unhandled type %d\n", This
->node
->type
);
762 TRACE("returning %08x str = %s\n", r
, debugstr_w( str
) );
768 static HRESULT WINAPI
xmlnode_transformNodeToObject(
770 IXMLDOMNode
* stylesheet
,
771 VARIANT outputObject
)
777 static const struct IXMLDOMNodeVtbl xmlnode_vtbl
=
779 xmlnode_QueryInterface
,
782 xmlnode_GetTypeInfoCount
,
784 xmlnode_GetIDsOfNames
,
786 xmlnode_get_nodeName
,
787 xmlnode_get_nodeValue
,
788 xmlnode_put_nodeValue
,
789 xmlnode_get_nodeType
,
790 xmlnode_get_parentNode
,
791 xmlnode_get_childNodes
,
792 xmlnode_get_firstChild
,
793 xmlnode_get_lastChild
,
794 xmlnode_get_previousSibling
,
795 xmlnode_get_nextSibling
,
796 xmlnode_get_attributes
,
797 xmlnode_insertBefore
,
798 xmlnode_replaceChild
,
801 xmlnode_hasChildNodes
,
802 xmlnode_get_ownerDocument
,
804 xmlnode_get_nodeTypeString
,
807 xmlnode_get_specified
,
808 xmlnode_get_definition
,
809 xmlnode_get_nodeTypedValue
,
810 xmlnode_put_nodeTypedValue
,
811 xmlnode_get_dataType
,
812 xmlnode_put_dataType
,
814 xmlnode_transformNode
,
816 xmlnode_selectSingleNode
,
818 xmlnode_get_namespaceURI
,
820 xmlnode_get_baseName
,
821 xmlnode_transformNodeToObject
,
824 static HRESULT WINAPI
Internal_QueryInterface(
829 xmlnode
*This
= impl_from_InternalUnknown( iface
);
831 TRACE("%p %s %p\n", iface
, debugstr_guid(riid
), ppvObject
);
834 if ( IsEqualGUID( riid
, &IID_IUnknown
))
836 else if ( IsEqualGUID( riid
, &IID_IDispatch
) ||
837 IsEqualGUID( riid
, &IID_IXMLDOMNode
) )
838 *ppvObject
= &This
->lpVtbl
;
841 FIXME("interface %s not implemented\n", debugstr_guid(riid
));
843 return E_NOINTERFACE
;
846 IUnknown_AddRef( (IUnknown
*)*ppvObject
);
851 static ULONG WINAPI
Internal_AddRef(
854 xmlnode
*This
= impl_from_InternalUnknown( iface
);
855 return InterlockedIncrement( &This
->ref
);
858 static ULONG WINAPI
Internal_Release(
861 xmlnode
*This
= impl_from_InternalUnknown( iface
);
864 ref
= InterlockedDecrement( &This
->ref
);
868 xmldoc_release( This
->node
->doc
);
869 HeapFree( GetProcessHeap(), 0, This
);
875 static const struct IUnknownVtbl internal_unk_vtbl
=
877 Internal_QueryInterface
,
882 IUnknown
*create_basic_node( xmlNodePtr node
, IUnknown
*pUnkOuter
)
886 This
= HeapAlloc( GetProcessHeap(), 0, sizeof *This
);
891 xmldoc_add_ref( node
->doc
);
893 This
->lpVtbl
= &xmlnode_vtbl
;
894 This
->lpInternalUnkVtbl
= &internal_unk_vtbl
;
897 This
->pUnkOuter
= pUnkOuter
; /* Don't take a ref on outer Unknown */
899 This
->pUnkOuter
= (IUnknown
*)&This
->lpInternalUnkVtbl
;
904 return (IUnknown
*)&This
->lpInternalUnkVtbl
;
907 IXMLDOMNode
*create_node( xmlNodePtr node
)
916 TRACE("type %d\n", node
->type
);
919 case XML_ELEMENT_NODE
:
920 pUnk
= create_element( node
, NULL
);
922 case XML_ATTRIBUTE_NODE
:
923 pUnk
= create_attribute( node
);
926 pUnk
= create_text( node
);
928 case XML_COMMENT_NODE
:
929 pUnk
= create_comment( node
);
931 case XML_DOCUMENT_NODE
:
932 ERR("shouldn't be here!\n");
935 FIXME("only creating basic node for type %d\n", node
->type
);
936 pUnk
= create_basic_node( node
, NULL
);
939 hr
= IUnknown_QueryInterface(pUnk
, &IID_IXMLDOMNode
, (LPVOID
*)&ret
);
940 IUnknown_Release(pUnk
);
941 if(FAILED(hr
)) return NULL
;