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"
37 # ifdef HAVE_LIBXSLT_PATTERN_H
38 # include <libxslt/pattern.h>
40 # ifdef HAVE_LIBXSLT_TRANSFORM_H
41 # include <libxslt/transform.h>
43 # include <libxslt/xsltutils.h>
44 # include <libxslt/xsltInternals.h>
47 #include "wine/debug.h"
49 WINE_DEFAULT_DEBUG_CHANNEL(msxml
);
53 static const WCHAR szBinBase64
[] = {'b','i','n','.','b','a','s','e','6','4',0};
54 static const WCHAR szString
[] = {'s','t','r','i','n','g',0};
55 static const WCHAR szNumber
[] = {'n','u','m','b','e','r',0};
56 static const WCHAR szInt
[] = {'I','n','t',0};
57 static const WCHAR szFixed
[] = {'F','i','x','e','d','.','1','4','.','4',0};
58 static const WCHAR szBoolean
[] = {'B','o','o','l','e','a','n',0};
59 static const WCHAR szDateTime
[] = {'d','a','t','e','T','i','m','e',0};
60 static const WCHAR szDateTimeTZ
[] = {'d','a','t','e','T','i','m','e','.','t','z',0};
61 static const WCHAR szDate
[] = {'D','a','t','e',0};
62 static const WCHAR szTime
[] = {'T','i','m','e',0};
63 static const WCHAR szTimeTZ
[] = {'T','i','m','e','.','t','z',0};
64 static const WCHAR szI1
[] = {'i','1',0};
65 static const WCHAR szI2
[] = {'i','2',0};
66 static const WCHAR szI4
[] = {'i','4',0};
67 static const WCHAR szIU1
[] = {'u','i','1',0};
68 static const WCHAR szIU2
[] = {'u','i','2',0};
69 static const WCHAR szIU4
[] = {'u','i','4',0};
70 static const WCHAR szR4
[] = {'r','4',0};
71 static const WCHAR szR8
[] = {'r','8',0};
72 static const WCHAR szFloat
[] = {'f','l','o','a','t',0};
73 static const WCHAR szUUID
[] = {'u','u','i','d',0};
74 static const WCHAR szBinHex
[] = {'b','i','n','.','h','e','x',0};
76 static inline xmlnode
*impl_from_InternalUnknown( IUnknown
*iface
)
78 return (xmlnode
*)((char*)iface
- FIELD_OFFSET(xmlnode
, lpInternalUnkVtbl
));
81 xmlNodePtr
xmlNodePtr_from_domnode( IXMLDOMNode
*iface
, xmlElementType type
)
87 This
= impl_from_IXMLDOMNode( iface
);
90 if ( type
&& This
->node
->type
!= type
)
95 void attach_xmlnode( IXMLDOMNode
*node
, xmlNodePtr xml
)
97 xmlnode
*This
= impl_from_IXMLDOMNode( node
);
100 xmldoc_release(This
->node
->doc
);
104 xmldoc_add_ref(This
->node
->doc
);
109 static HRESULT WINAPI
xmlnode_QueryInterface(
114 xmlnode
*This
= impl_from_IXMLDOMNode( iface
);
115 TRACE("%p %s %p\n", This
, debugstr_guid(riid
), ppvObject
);
117 return IUnknown_QueryInterface(This
->pUnkOuter
, riid
, ppvObject
);
120 static ULONG WINAPI
xmlnode_AddRef(
123 xmlnode
*This
= impl_from_IXMLDOMNode( iface
);
124 return IUnknown_AddRef(This
->pUnkOuter
);
127 static ULONG WINAPI
xmlnode_Release(
130 xmlnode
*This
= impl_from_IXMLDOMNode( iface
);
131 return IUnknown_Release(This
->pUnkOuter
);
134 static HRESULT WINAPI
xmlnode_GetTypeInfoCount(
142 static HRESULT WINAPI
xmlnode_GetTypeInfo(
146 ITypeInfo
** ppTInfo
)
152 static HRESULT WINAPI
xmlnode_GetIDsOfNames(
164 static HRESULT WINAPI
xmlnode_Invoke(
170 DISPPARAMS
* pDispParams
,
172 EXCEPINFO
* pExcepInfo
,
179 static HRESULT WINAPI
xmlnode_get_nodeName(
183 xmlnode
*This
= impl_from_IXMLDOMNode( iface
);
186 TRACE("%p\n", This
);
194 switch( This
->node
->type
)
196 case XML_CDATA_SECTION_NODE
:
197 str
= (const xmlChar
*) "#cdata-section";
199 case XML_COMMENT_NODE
:
200 str
= (const xmlChar
*) "#comment";
202 case XML_DOCUMENT_FRAG_NODE
:
203 str
= (const xmlChar
*) "#document-fragment";
206 str
= (const xmlChar
*) "#text";
208 case XML_DOCUMENT_NODE
:
209 str
= (const xmlChar
*) "#document";
211 case XML_ATTRIBUTE_NODE
:
212 case XML_ELEMENT_NODE
:
214 str
= This
->node
->name
;
217 FIXME("nodeName not mapped correctly (%d)\n", This
->node
->type
);
218 str
= This
->node
->name
;
222 *name
= bstr_from_xmlChar( str
);
229 BSTR
bstr_from_xmlChar( const xmlChar
*buf
)
238 len
= MultiByteToWideChar( CP_UTF8
, 0, (LPCSTR
) buf
, -1, NULL
, 0 );
239 str
= (LPWSTR
) HeapAlloc( GetProcessHeap(), 0, len
* sizeof (WCHAR
) );
242 MultiByteToWideChar( CP_UTF8
, 0, (LPCSTR
) buf
, -1, str
, len
);
243 bstr
= SysAllocString( str
);
244 HeapFree( GetProcessHeap(), 0, str
);
248 static HRESULT WINAPI
xmlnode_get_nodeValue(
252 xmlnode
*This
= impl_from_IXMLDOMNode( iface
);
255 TRACE("%p %p\n", This
, value
);
260 V_BSTR(value
) = NULL
;
261 V_VT(value
) = VT_NULL
;
263 switch ( This
->node
->type
)
265 case XML_CDATA_SECTION_NODE
:
266 case XML_COMMENT_NODE
:
268 case XML_ATTRIBUTE_NODE
:
270 xmlChar
*content
= xmlNodeGetContent(This
->node
);
271 V_VT(value
) = VT_BSTR
;
272 V_BSTR(value
) = bstr_from_xmlChar( content
);
278 V_VT(value
) = VT_BSTR
;
279 V_BSTR(value
) = bstr_from_xmlChar( This
->node
->content
);
282 case XML_ELEMENT_NODE
:
283 case XML_DOCUMENT_NODE
:
284 /* these seem to return NULL */
288 FIXME("node %p type %d\n", This
, This
->node
->type
);
291 TRACE("%p returned %s\n", This
, debugstr_w( V_BSTR(value
) ) );
296 static HRESULT WINAPI
xmlnode_put_nodeValue(
300 xmlnode
*This
= impl_from_IXMLDOMNode( iface
);
301 HRESULT hr
= S_FALSE
;
304 TRACE("%p type(%d)\n", This
, This
->node
->type
);
306 /* Document, Document Fragment, Document Type, Element,
307 Entity, Entity Reference, Notation aren't supported. */
308 switch ( This
->node
->type
)
310 case XML_ATTRIBUTE_NODE
:
311 case XML_CDATA_SECTION_NODE
:
312 case XML_COMMENT_NODE
:
316 str
= xmlChar_from_wchar((WCHAR
*)V_BSTR(&value
));
318 xmlNodeSetContent(This
->node
, str
);
323 /* Do nothing for unsupported types. */
330 static HRESULT WINAPI
xmlnode_get_nodeType(
334 xmlnode
*This
= impl_from_IXMLDOMNode( iface
);
336 TRACE("%p %p\n", This
, type
);
338 assert( NODE_ELEMENT
== XML_ELEMENT_NODE
);
339 assert( NODE_NOTATION
== XML_NOTATION_NODE
);
341 *type
= This
->node
->type
;
346 static HRESULT
get_node(
352 TRACE("%p->%s %p\n", This
, name
, node
);
356 *out
= create_node( node
);
362 static HRESULT WINAPI
xmlnode_get_parentNode(
364 IXMLDOMNode
** parent
)
366 xmlnode
*This
= impl_from_IXMLDOMNode( iface
);
367 return get_node( This
, "parent", This
->node
->parent
, parent
);
370 static HRESULT WINAPI
xmlnode_get_childNodes(
372 IXMLDOMNodeList
** childList
)
374 xmlnode
*This
= impl_from_IXMLDOMNode( iface
);
376 TRACE("%p %p\n", This
, childList
);
381 *childList
= create_children_nodelist(This
->node
);
382 if (*childList
== NULL
)
383 return E_OUTOFMEMORY
;
388 static HRESULT WINAPI
xmlnode_get_firstChild(
390 IXMLDOMNode
** firstChild
)
392 xmlnode
*This
= impl_from_IXMLDOMNode( iface
);
393 return get_node( This
, "firstChild", This
->node
->children
, firstChild
);
396 static HRESULT WINAPI
xmlnode_get_lastChild(
398 IXMLDOMNode
** lastChild
)
400 xmlnode
*This
= impl_from_IXMLDOMNode( iface
);
402 TRACE("%p\n", This
);
407 switch( This
->node
->type
)
409 /* CDATASection, Comment, PI and Text Nodes do not support lastChild */
411 case XML_CDATA_SECTION_NODE
:
413 case XML_COMMENT_NODE
:
417 return get_node( This
, "lastChild", This
->node
->last
, lastChild
);
421 static HRESULT WINAPI
xmlnode_get_previousSibling(
423 IXMLDOMNode
** previousSibling
)
425 xmlnode
*This
= impl_from_IXMLDOMNode( iface
);
427 TRACE("%p\n", This
);
429 if (!previousSibling
)
432 switch( This
->node
->type
)
434 /* Attribute, Document and Document Fragment Nodes do not support previousSibling */
435 case XML_DOCUMENT_NODE
:
436 case XML_DOCUMENT_FRAG_NODE
:
437 case XML_ATTRIBUTE_NODE
:
438 *previousSibling
= NULL
;
441 return get_node( This
, "previous", This
->node
->prev
, previousSibling
);
445 static HRESULT WINAPI
xmlnode_get_nextSibling(
447 IXMLDOMNode
** nextSibling
)
449 xmlnode
*This
= impl_from_IXMLDOMNode( iface
);
451 TRACE("%p\n", This
);
456 switch( This
->node
->type
)
458 /* Attribute, Document and Document Fragment Nodes do not support nextSibling */
459 case XML_DOCUMENT_NODE
:
460 case XML_DOCUMENT_FRAG_NODE
:
461 case XML_ATTRIBUTE_NODE
:
465 return get_node( This
, "next", This
->node
->next
, nextSibling
);
469 static HRESULT WINAPI
xmlnode_get_attributes(
471 IXMLDOMNamedNodeMap
** attributeMap
)
473 xmlnode
*This
= impl_from_IXMLDOMNode( iface
);
479 switch( This
->node
->type
)
481 /* Attribute, CDataSection, Comment, Documents, Documents Fragments,
482 Entity and Text Nodes does not support get_attributes */
483 case XML_ATTRIBUTE_NODE
:
484 case XML_CDATA_SECTION_NODE
:
485 case XML_COMMENT_NODE
:
486 case XML_DOCUMENT_NODE
:
487 case XML_DOCUMENT_FRAG_NODE
:
488 case XML_ENTITY_NODE
:
489 case XML_ENTITY_REF_NODE
:
491 *attributeMap
= NULL
;
494 *attributeMap
= create_nodemap( iface
);
499 static HRESULT WINAPI
xmlnode_insertBefore(
501 IXMLDOMNode
* newChild
,
503 IXMLDOMNode
** outNewChild
)
505 xmlnode
*This
= impl_from_IXMLDOMNode( iface
);
506 xmlNodePtr before_node
, new_child_node
;
507 IXMLDOMNode
*before
= NULL
, *new;
510 TRACE("(%p)->(%p,var,%p)\n",This
,newChild
,outNewChild
);
515 switch(V_VT(&refChild
))
522 hr
= IUnknown_QueryInterface(V_UNKNOWN(&refChild
), &IID_IXMLDOMNode
, (LPVOID
)&before
);
523 if(FAILED(hr
)) return hr
;
527 hr
= IDispatch_QueryInterface(V_DISPATCH(&refChild
), &IID_IXMLDOMNode
, (LPVOID
)&before
);
528 if(FAILED(hr
)) return hr
;
532 FIXME("refChild var type %x\n", V_VT(&refChild
));
536 IXMLDOMNode_QueryInterface(newChild
, &IID_IXMLDOMNode
, (LPVOID
)&new);
537 new_child_node
= impl_from_IXMLDOMNode(new)->node
;
538 TRACE("new_child_node %p This->node %p\n", new_child_node
, This
->node
);
542 before_node
= impl_from_IXMLDOMNode(before
)->node
;
543 xmlAddPrevSibling(before_node
, new_child_node
);
544 IXMLDOMNode_Release(before
);
548 xmlAddChild(This
->node
, new_child_node
);
551 IXMLDOMNode_Release(new);
552 IXMLDOMNode_AddRef(newChild
);
554 *outNewChild
= newChild
;
560 static HRESULT WINAPI
xmlnode_replaceChild(
562 IXMLDOMNode
* newChild
,
563 IXMLDOMNode
* oldChild
,
564 IXMLDOMNode
** outOldChild
)
570 static HRESULT WINAPI
xmlnode_removeChild(
572 IXMLDOMNode
* childNode
,
573 IXMLDOMNode
** oldChild
)
575 xmlnode
*This
= impl_from_IXMLDOMNode( iface
);
576 xmlNode
*ancestor
, *child_node_ptr
;
580 TRACE("%p->(%p, %p)\n", This
, childNode
, oldChild
);
584 if(!childNode
) return E_INVALIDARG
;
586 hr
= IXMLDOMNode_QueryInterface(childNode
, &IID_IXMLDOMNode
, (LPVOID
)&child
);
590 child_node_ptr
= ancestor
= impl_from_IXMLDOMNode(child
)->node
;
591 while(ancestor
->parent
)
593 if(ancestor
->parent
== This
->node
)
595 ancestor
= ancestor
->parent
;
597 if(!ancestor
->parent
)
599 WARN("childNode %p is not a child of %p\n", childNode
, iface
);
600 IXMLDOMNode_Release(child
);
604 xmlUnlinkNode(child_node_ptr
);
606 IXMLDOMNode_Release(child
);
607 IXMLDOMNode_AddRef(childNode
);
608 *oldChild
= childNode
;
612 static HRESULT WINAPI
xmlnode_appendChild(
614 IXMLDOMNode
* newChild
,
615 IXMLDOMNode
** outNewChild
)
617 xmlnode
*This
= impl_from_IXMLDOMNode( iface
);
618 IXMLDOMNode
*pAttr
= NULL
;
621 TRACE("(%p)->(%p,%p)\n", This
, newChild
, outNewChild
);
623 /* Cannot Append an Attribute node. */
624 IUnknown_QueryInterface(newChild
, &IID_IXMLDOMNode
, (LPVOID
*)&pAttr
);
627 xmlnode
*ThisNew
= impl_from_IXMLDOMNode( pAttr
);
629 if(ThisNew
->node
->type
== XML_ATTRIBUTE_NODE
)
631 if(outNewChild
) *outNewChild
= NULL
;
633 IUnknown_Release(pAttr
);
638 IUnknown_Release(pAttr
);
642 return IXMLDOMNode_insertBefore(iface
, newChild
, var
, outNewChild
);
645 static HRESULT WINAPI
xmlnode_hasChildNodes(
647 VARIANT_BOOL
* hasChild
)
649 xmlnode
*This
= impl_from_IXMLDOMNode( iface
);
655 if (!This
->node
->children
)
657 *hasChild
= VARIANT_FALSE
;
661 *hasChild
= VARIANT_TRUE
;
665 static HRESULT WINAPI
xmlnode_get_ownerDocument(
667 IXMLDOMDocument
** DOMDocument
)
673 static HRESULT WINAPI
xmlnode_cloneNode(
676 IXMLDOMNode
** cloneRoot
)
678 xmlnode
*This
= impl_from_IXMLDOMNode( iface
);
679 xmlNodePtr pClone
= NULL
;
680 IXMLDOMNode
*pNode
= NULL
;
682 TRACE("%p (%d)\n", This
, deep
);
687 pClone
= xmlCopyNode(This
->node
, deep
? 1 : 2);
690 pClone
->doc
= This
->node
->doc
;
692 pNode
= create_node(pClone
);
695 ERR("Copy failed\n");
703 ERR("Copy failed\n");
710 static HRESULT WINAPI
xmlnode_get_nodeTypeString(
714 xmlnode
*This
= impl_from_IXMLDOMNode( iface
);
717 TRACE("%p\n", This
);
725 switch( This
->node
->type
)
727 case XML_ATTRIBUTE_NODE
:
728 str
= (const xmlChar
*) "attribute";
730 case XML_CDATA_SECTION_NODE
:
731 str
= (const xmlChar
*) "cdatasection";
733 case XML_COMMENT_NODE
:
734 str
= (const xmlChar
*) "comment";
736 case XML_DOCUMENT_NODE
:
737 str
= (const xmlChar
*) "document";
739 case XML_DOCUMENT_FRAG_NODE
:
740 str
= (const xmlChar
*) "documentfragment";
742 case XML_ELEMENT_NODE
:
743 str
= (const xmlChar
*) "element";
745 case XML_ENTITY_NODE
:
746 str
= (const xmlChar
*) "entity";
748 case XML_ENTITY_REF_NODE
:
749 str
= (const xmlChar
*) "entityreference";
751 case XML_NOTATION_NODE
:
752 str
= (const xmlChar
*) "notation";
755 str
= (const xmlChar
*) "processinginstruction";
758 str
= (const xmlChar
*) "text";
761 FIXME("nodeName not mapped correctly (%d)\n", This
->node
->type
);
762 str
= This
->node
->name
;
766 *xmlnodeType
= bstr_from_xmlChar( str
);
773 static HRESULT WINAPI
xmlnode_get_text(
777 xmlnode
*This
= impl_from_IXMLDOMNode( iface
);
785 switch(This
->node
->type
)
787 case XML_ELEMENT_NODE
:
788 case XML_ATTRIBUTE_NODE
:
790 xmlNodePtr child
= This
->node
->children
;
791 if ( child
&& child
->type
== XML_TEXT_NODE
)
792 str
= bstr_from_xmlChar( child
->content
);
797 case XML_CDATA_SECTION_NODE
:
799 case XML_COMMENT_NODE
:
800 str
= bstr_from_xmlChar( This
->node
->content
);
804 FIXME("Unhandled node type %d\n", This
->node
->type
);
807 /* Always return a string. */
808 if (!str
) str
= SysAllocStringLen( NULL
, 0 );
810 TRACE("%p %s\n", This
, debugstr_w(str
) );
816 static HRESULT WINAPI
xmlnode_put_text(
820 xmlnode
*This
= impl_from_IXMLDOMNode( iface
);
825 switch(This
->node
->type
)
827 case XML_DOCUMENT_NODE
:
833 str
= xmlChar_from_wchar((WCHAR
*)text
);
835 /* Escape the string. */
836 str
= xmlEncodeEntitiesReentrant(This
->node
->doc
, str
);
837 str
= xmlEncodeSpecialChars(This
->node
->doc
, str
);
839 xmlNodeSetContent(This
->node
, str
);
845 static HRESULT WINAPI
xmlnode_get_specified(
847 VARIANT_BOOL
* isSpecified
)
853 static HRESULT WINAPI
xmlnode_get_definition(
855 IXMLDOMNode
** definitionNode
)
861 static HRESULT WINAPI
xmlnode_get_nodeTypedValue(
865 FIXME("ignoring data type\n");
866 return xmlnode_get_nodeValue(iface
, typedValue
);
869 static HRESULT WINAPI
xmlnode_put_nodeTypedValue(
877 static HRESULT WINAPI
xmlnode_get_dataType(
879 VARIANT
* dataTypeName
)
881 xmlnode
*This
= impl_from_IXMLDOMNode( iface
);
884 TRACE("iface %p\n", iface
);
889 /* Attribute, CDATA Section, Comment, Document, Document Fragment,
890 Entity, Notation, PI, and Text Node are non-typed. */
891 V_BSTR(dataTypeName
) = NULL
;
892 V_VT(dataTypeName
) = VT_NULL
;
894 switch ( This
->node
->type
)
896 case XML_ELEMENT_NODE
:
897 pVal
= xmlGetNsProp(This
->node
, (xmlChar
*)"dt",
898 (xmlChar
*)"urn:schemas-microsoft-com:datatypes");
901 V_VT(dataTypeName
) = VT_BSTR
;
902 V_BSTR(dataTypeName
) = bstr_from_xmlChar( pVal
);
906 case XML_ENTITY_REF_NODE
:
907 FIXME("XML_ENTITY_REF_NODE should return a valid value.\n");
910 TRACE("Type %d returning NULL\n", This
->node
->type
);
913 /* non-typed nodes return S_FALSE */
914 if(V_VT(dataTypeName
) == VT_NULL
)
922 static HRESULT WINAPI
xmlnode_put_dataType(
926 xmlnode
*This
= impl_from_IXMLDOMNode( iface
);
929 TRACE("iface %p\n", iface
);
931 if(dataTypeName
== NULL
)
934 /* An example of this is. The Text in the node needs to be a 0 or 1 for a boolean type.
935 This applies to changing types (string->bool) or setting a new one
937 FIXME("Need to Validate the data before allowing a type to be set.\n");
939 /* Check all supported types. */
940 if(lstrcmpiW(dataTypeName
,szString
) == 0 ||
941 lstrcmpiW(dataTypeName
,szNumber
) == 0 ||
942 lstrcmpiW(dataTypeName
,szUUID
) == 0 ||
943 lstrcmpiW(dataTypeName
,szInt
) == 0 ||
944 lstrcmpiW(dataTypeName
,szI4
) == 0 ||
945 lstrcmpiW(dataTypeName
,szFixed
) == 0 ||
946 lstrcmpiW(dataTypeName
,szBoolean
) == 0 ||
947 lstrcmpiW(dataTypeName
,szDateTime
) == 0 ||
948 lstrcmpiW(dataTypeName
,szDateTimeTZ
) == 0 ||
949 lstrcmpiW(dataTypeName
,szDate
) == 0 ||
950 lstrcmpiW(dataTypeName
,szTime
) == 0 ||
951 lstrcmpiW(dataTypeName
,szTimeTZ
) == 0 ||
952 lstrcmpiW(dataTypeName
,szI1
) == 0 ||
953 lstrcmpiW(dataTypeName
,szI2
) == 0 ||
954 lstrcmpiW(dataTypeName
,szIU1
) == 0 ||
955 lstrcmpiW(dataTypeName
,szIU2
) == 0 ||
956 lstrcmpiW(dataTypeName
,szIU4
) == 0 ||
957 lstrcmpiW(dataTypeName
,szR4
) == 0 ||
958 lstrcmpiW(dataTypeName
,szR8
) == 0 ||
959 lstrcmpiW(dataTypeName
,szFloat
) == 0 ||
960 lstrcmpiW(dataTypeName
,szBinHex
) == 0 ||
961 lstrcmpiW(dataTypeName
,szBinBase64
) == 0)
964 xmlAttrPtr pAttr
= NULL
;
965 xmlChar
* str
= xmlChar_from_wchar((WCHAR
*)dataTypeName
);
967 pAttr
= xmlHasNsProp(This
->node
, (xmlChar
*)"dt",
968 (xmlChar
*)"urn:schemas-microsoft-com:datatypes");
971 pAttr
= xmlSetNsProp(This
->node
, pAttr
->ns
, (xmlChar
*)"dt", str
);
977 pNS
= xmlNewNs(This
->node
, (xmlChar
*)"urn:schemas-microsoft-com:datatypes", (xmlChar
*)"dt");
980 pAttr
= xmlNewNsProp(This
->node
, pNS
, (xmlChar
*)"dt", str
);
983 xmlAddChild(This
->node
, (xmlNodePtr
)pAttr
);
988 ERR("Failed to create Attribute\n");
991 ERR("Failed to Create Namepsace\n");
998 static HRESULT WINAPI
xmlnode_get_xml(
1002 xmlnode
*This
= impl_from_IXMLDOMNode( iface
);
1003 xmlBufferPtr pXmlBuf
;
1006 TRACE("iface %p\n", iface
);
1009 return E_INVALIDARG
;
1013 pXmlBuf
= xmlBufferCreate();
1016 nSize
= xmlNodeDump(pXmlBuf
, This
->node
->doc
, This
->node
, 0, 0);
1019 const xmlChar
*pContent
;
1021 /* Attribute Nodes return a space in front of their name */
1022 pContent
= xmlBufferContent(pXmlBuf
);
1023 if( ((char*)pContent
)[0] == ' ')
1024 *xmlString
= bstr_from_xmlChar(pContent
+1);
1026 *xmlString
= bstr_from_xmlChar(pContent
);
1029 xmlBufferFree(pXmlBuf
);
1033 /* Always returns a string. */
1034 if(*xmlString
== NULL
) *xmlString
= SysAllocStringLen( NULL
, 0 );
1039 static HRESULT WINAPI
xmlnode_transformNode(
1041 IXMLDOMNode
* styleSheet
,
1045 xmlnode
*This
= impl_from_IXMLDOMNode( iface
);
1046 xmlnode
*pStyleSheet
= NULL
;
1047 xsltStylesheetPtr xsltSS
= NULL
;
1048 xmlDocPtr result
= NULL
;
1051 TRACE("%p %p %p\n", This
, styleSheet
, xmlString
);
1053 if(!styleSheet
|| !xmlString
)
1054 return E_INVALIDARG
;
1058 if(IXMLDOMNode_QueryInterface(styleSheet
, &IID_IXMLDOMNode
, (LPVOID
)&ssNew
) == S_OK
)
1060 pStyleSheet
= impl_from_IXMLDOMNode( ssNew
);
1062 xsltSS
= xsltParseStylesheetDoc( pStyleSheet
->node
->doc
);
1065 result
= xsltApplyStylesheet(xsltSS
, This
->node
->doc
, NULL
);
1068 xmlBufferPtr pXmlBuf
;
1071 pXmlBuf
= xmlBufferCreate();
1074 nSize
= xmlNodeDump(pXmlBuf
, NULL
, (xmlNodePtr
)result
, 0, 0);
1077 const xmlChar
*pContent
;
1079 pContent
= xmlBufferContent(pXmlBuf
);
1080 *xmlString
= bstr_from_xmlChar(pContent
);
1082 xmlBufferFree(pXmlBuf
);
1088 IXMLDOMNode_Release(ssNew
);
1091 if(*xmlString
== NULL
)
1092 *xmlString
= SysAllocStringLen(NULL
, 0);
1096 FIXME("libxslt headers were not found at compile time\n");
1101 static HRESULT WINAPI
xmlnode_selectNodes(
1104 IXMLDOMNodeList
** resultList
)
1106 xmlnode
*This
= impl_from_IXMLDOMNode( iface
);
1108 TRACE("%p %s %p\n", This
, debugstr_w(queryString
), resultList
);
1110 return queryresult_create( This
->node
, queryString
, resultList
);
1113 static HRESULT WINAPI
xmlnode_selectSingleNode(
1116 IXMLDOMNode
** resultNode
)
1118 xmlnode
*This
= impl_from_IXMLDOMNode( iface
);
1119 IXMLDOMNodeList
*list
;
1122 TRACE("%p %s %p\n", This
, debugstr_w(queryString
), resultNode
);
1125 r
= IXMLDOMNode_selectNodes(iface
, queryString
, &list
);
1128 r
= IXMLDOMNodeList_nextNode(list
, resultNode
);
1129 IXMLDOMNodeList_Release(list
);
1134 static HRESULT WINAPI
xmlnode_get_parsed(
1136 VARIANT_BOOL
* isParsed
)
1142 static HRESULT WINAPI
xmlnode_get_namespaceURI(
1146 xmlnode
*This
= impl_from_IXMLDOMNode( iface
);
1147 HRESULT hr
= S_FALSE
;
1150 TRACE("%p %p\n", This
, namespaceURI
);
1153 return E_INVALIDARG
;
1155 *namespaceURI
= NULL
;
1157 pNSList
= xmlGetNsList(This
->node
->doc
, This
->node
);
1160 *namespaceURI
= bstr_from_xmlChar( pNSList
[0]->href
);
1168 static HRESULT WINAPI
xmlnode_get_prefix(
1172 xmlnode
*This
= impl_from_IXMLDOMNode( iface
);
1173 HRESULT hr
= S_FALSE
;
1176 TRACE("%p %p\n", This
, prefixString
);
1179 return E_INVALIDARG
;
1181 *prefixString
= NULL
;
1183 pNSList
= xmlGetNsList(This
->node
->doc
, This
->node
);
1186 *prefixString
= bstr_from_xmlChar( pNSList
[0]->prefix
);
1194 static HRESULT WINAPI
xmlnode_get_baseName(
1198 xmlnode
*This
= impl_from_IXMLDOMNode( iface
);
1200 HRESULT r
= S_FALSE
;
1202 TRACE("%p %p\n", This
, nameString
);
1205 return E_INVALIDARG
;
1207 switch ( This
->node
->type
)
1209 case XML_ELEMENT_NODE
:
1210 case XML_ATTRIBUTE_NODE
:
1211 str
= bstr_from_xmlChar( This
->node
->name
);
1217 ERR("Unhandled type %d\n", This
->node
->type
);
1221 TRACE("returning %08x str = %s\n", r
, debugstr_w( str
) );
1227 static HRESULT WINAPI
xmlnode_transformNodeToObject(
1229 IXMLDOMNode
* stylesheet
,
1230 VARIANT outputObject
)
1236 static const struct IXMLDOMNodeVtbl xmlnode_vtbl
=
1238 xmlnode_QueryInterface
,
1241 xmlnode_GetTypeInfoCount
,
1242 xmlnode_GetTypeInfo
,
1243 xmlnode_GetIDsOfNames
,
1245 xmlnode_get_nodeName
,
1246 xmlnode_get_nodeValue
,
1247 xmlnode_put_nodeValue
,
1248 xmlnode_get_nodeType
,
1249 xmlnode_get_parentNode
,
1250 xmlnode_get_childNodes
,
1251 xmlnode_get_firstChild
,
1252 xmlnode_get_lastChild
,
1253 xmlnode_get_previousSibling
,
1254 xmlnode_get_nextSibling
,
1255 xmlnode_get_attributes
,
1256 xmlnode_insertBefore
,
1257 xmlnode_replaceChild
,
1258 xmlnode_removeChild
,
1259 xmlnode_appendChild
,
1260 xmlnode_hasChildNodes
,
1261 xmlnode_get_ownerDocument
,
1263 xmlnode_get_nodeTypeString
,
1266 xmlnode_get_specified
,
1267 xmlnode_get_definition
,
1268 xmlnode_get_nodeTypedValue
,
1269 xmlnode_put_nodeTypedValue
,
1270 xmlnode_get_dataType
,
1271 xmlnode_put_dataType
,
1273 xmlnode_transformNode
,
1274 xmlnode_selectNodes
,
1275 xmlnode_selectSingleNode
,
1277 xmlnode_get_namespaceURI
,
1279 xmlnode_get_baseName
,
1280 xmlnode_transformNodeToObject
,
1283 static HRESULT WINAPI
Internal_QueryInterface(
1288 xmlnode
*This
= impl_from_InternalUnknown( iface
);
1290 TRACE("%p %s %p\n", iface
, debugstr_guid(riid
), ppvObject
);
1293 if ( IsEqualGUID( riid
, &IID_IUnknown
))
1295 else if ( IsEqualGUID( riid
, &IID_IDispatch
) ||
1296 IsEqualGUID( riid
, &IID_IXMLDOMNode
) )
1297 *ppvObject
= &This
->lpVtbl
;
1300 FIXME("interface %s not implemented\n", debugstr_guid(riid
));
1302 return E_NOINTERFACE
;
1305 IUnknown_AddRef( (IUnknown
*)*ppvObject
);
1310 static ULONG WINAPI
Internal_AddRef(
1313 xmlnode
*This
= impl_from_InternalUnknown( iface
);
1314 return InterlockedIncrement( &This
->ref
);
1317 static ULONG WINAPI
Internal_Release(
1320 xmlnode
*This
= impl_from_InternalUnknown( iface
);
1323 ref
= InterlockedDecrement( &This
->ref
);
1327 xmldoc_release( This
->node
->doc
);
1328 HeapFree( GetProcessHeap(), 0, This
);
1334 static const struct IUnknownVtbl internal_unk_vtbl
=
1336 Internal_QueryInterface
,
1341 IUnknown
*create_basic_node( xmlNodePtr node
, IUnknown
*pUnkOuter
)
1345 This
= HeapAlloc( GetProcessHeap(), 0, sizeof *This
);
1350 xmldoc_add_ref( node
->doc
);
1352 This
->lpVtbl
= &xmlnode_vtbl
;
1353 This
->lpInternalUnkVtbl
= &internal_unk_vtbl
;
1356 This
->pUnkOuter
= pUnkOuter
; /* Don't take a ref on outer Unknown */
1358 This
->pUnkOuter
= (IUnknown
*)&This
->lpInternalUnkVtbl
;
1363 return (IUnknown
*)&This
->lpInternalUnkVtbl
;
1366 IXMLDOMNode
*create_node( xmlNodePtr node
)
1375 TRACE("type %d\n", node
->type
);
1378 case XML_ELEMENT_NODE
:
1379 pUnk
= create_element( node
, NULL
);
1381 case XML_ATTRIBUTE_NODE
:
1382 pUnk
= create_attribute( node
);
1385 pUnk
= create_text( node
);
1387 case XML_COMMENT_NODE
:
1388 pUnk
= create_comment( node
);
1390 case XML_DOCUMENT_NODE
:
1391 ERR("shouldn't be here!\n");
1394 FIXME("only creating basic node for type %d\n", node
->type
);
1395 pUnk
= create_basic_node( node
, NULL
);
1398 hr
= IUnknown_QueryInterface(pUnk
, &IID_IXMLDOMNode
, (LPVOID
*)&ret
);
1399 IUnknown_Release(pUnk
);
1400 if(FAILED(hr
)) return NULL
;