2 * DOM Document implementation
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
33 #include "msxml_private.h"
35 #include "wine/debug.h"
37 WINE_DEFAULT_DEBUG_CHANNEL(msxml
);
41 typedef struct _domelem
43 const struct IXMLDOMElementVtbl
*lpVtbl
;
48 static inline domelem
*impl_from_IXMLDOMElement( IXMLDOMElement
*iface
)
50 return (domelem
*)((char*)iface
- FIELD_OFFSET(domelem
, lpVtbl
));
53 static inline xmlNodePtr
get_element( domelem
*This
)
55 return This
->node
->node
;
58 static HRESULT WINAPI
domelem_QueryInterface(
59 IXMLDOMElement
*iface
,
63 domelem
*This
= impl_from_IXMLDOMElement( iface
);
65 TRACE("%p %s %p\n", This
, debugstr_guid(riid
), ppvObject
);
67 if ( IsEqualGUID( riid
, &IID_IXMLDOMElement
) ||
68 IsEqualGUID( riid
, &IID_IDispatch
) ||
69 IsEqualGUID( riid
, &IID_IUnknown
) )
71 *ppvObject
= &This
->lpVtbl
;
73 else if ( IsEqualGUID( riid
, &IID_IXMLDOMNode
) )
75 *ppvObject
= IXMLDOMNode_from_impl(This
->node
);
79 FIXME("interface %s not implemented\n", debugstr_guid(riid
));
83 IUnknown_AddRef( (IUnknown
*)*ppvObject
);
87 static ULONG WINAPI
domelem_AddRef(
88 IXMLDOMElement
*iface
)
90 domelem
*This
= impl_from_IXMLDOMElement( iface
);
91 LONG ref
= InterlockedIncrement(&This
->ref
);
93 TRACE("(%p) ref=%d\n", This
, ref
);
98 static ULONG WINAPI
domelem_Release(
99 IXMLDOMElement
*iface
)
101 domelem
*This
= impl_from_IXMLDOMElement( iface
);
102 ULONG ref
= InterlockedDecrement(&This
->ref
);
104 TRACE("(%p) ref=%d\n", This
, ref
);
107 IXMLDOMNode_Release(IXMLDOMNode_from_impl(This
->node
));
114 static HRESULT WINAPI
domelem_GetTypeInfoCount(
115 IXMLDOMElement
*iface
,
118 domelem
*This
= impl_from_IXMLDOMElement( iface
);
120 TRACE("(%p)->(%p)\n", This
, pctinfo
);
127 static HRESULT WINAPI
domelem_GetTypeInfo(
128 IXMLDOMElement
*iface
,
129 UINT iTInfo
, LCID lcid
,
130 ITypeInfo
** ppTInfo
)
132 domelem
*This
= impl_from_IXMLDOMElement( iface
);
135 TRACE("(%p)->(%u %u %p)\n", This
, iTInfo
, lcid
, ppTInfo
);
137 hr
= get_typeinfo(IXMLDOMElement_tid
, ppTInfo
);
142 static HRESULT WINAPI
domelem_GetIDsOfNames(
143 IXMLDOMElement
*iface
,
144 REFIID riid
, LPOLESTR
* rgszNames
,
145 UINT cNames
, LCID lcid
, DISPID
* rgDispId
)
147 domelem
*This
= impl_from_IXMLDOMElement( iface
);
151 TRACE("(%p)->(%s %p %u %u %p)\n", This
, debugstr_guid(riid
), rgszNames
, cNames
,
154 if(!rgszNames
|| cNames
== 0 || !rgDispId
)
157 hr
= get_typeinfo(IXMLDOMElement_tid
, &typeinfo
);
160 hr
= ITypeInfo_GetIDsOfNames(typeinfo
, rgszNames
, cNames
, rgDispId
);
161 ITypeInfo_Release(typeinfo
);
167 static HRESULT WINAPI
domelem_Invoke(
168 IXMLDOMElement
*iface
,
169 DISPID dispIdMember
, REFIID riid
, LCID lcid
,
170 WORD wFlags
, DISPPARAMS
* pDispParams
, VARIANT
* pVarResult
,
171 EXCEPINFO
* pExcepInfo
, UINT
* puArgErr
)
173 domelem
*This
= impl_from_IXMLDOMElement( iface
);
177 TRACE("(%p)->(%d %s %d %d %p %p %p %p)\n", This
, dispIdMember
, debugstr_guid(riid
),
178 lcid
, wFlags
, pDispParams
, pVarResult
, pExcepInfo
, puArgErr
);
180 hr
= get_typeinfo(IXMLDOMElement_tid
, &typeinfo
);
183 hr
= ITypeInfo_Invoke(typeinfo
, &(This
->lpVtbl
), dispIdMember
, wFlags
, pDispParams
,
184 pVarResult
, pExcepInfo
, puArgErr
);
185 ITypeInfo_Release(typeinfo
);
191 static HRESULT WINAPI
domelem_get_nodeName(
192 IXMLDOMElement
*iface
,
195 domelem
*This
= impl_from_IXMLDOMElement( iface
);
196 return IXMLDOMNode_get_nodeName( IXMLDOMNode_from_impl(This
->node
), p
);
199 static HRESULT WINAPI
domelem_get_nodeValue(
200 IXMLDOMElement
*iface
,
203 domelem
*This
= impl_from_IXMLDOMElement( iface
);
204 return IXMLDOMNode_get_nodeValue( IXMLDOMNode_from_impl(This
->node
), var1
);
207 static HRESULT WINAPI
domelem_put_nodeValue(
208 IXMLDOMElement
*iface
,
211 domelem
*This
= impl_from_IXMLDOMElement( iface
);
212 return IXMLDOMNode_put_nodeValue( IXMLDOMNode_from_impl(This
->node
), var1
);
215 static HRESULT WINAPI
domelem_get_nodeType(
216 IXMLDOMElement
*iface
,
217 DOMNodeType
* domNodeType
)
219 domelem
*This
= impl_from_IXMLDOMElement( iface
);
220 return IXMLDOMNode_get_nodeType( IXMLDOMNode_from_impl(This
->node
), domNodeType
);
223 static HRESULT WINAPI
domelem_get_parentNode(
224 IXMLDOMElement
*iface
,
225 IXMLDOMNode
** parent
)
227 domelem
*This
= impl_from_IXMLDOMElement( iface
);
228 return IXMLDOMNode_get_parentNode( IXMLDOMNode_from_impl(This
->node
), parent
);
231 static HRESULT WINAPI
domelem_get_childNodes(
232 IXMLDOMElement
*iface
,
233 IXMLDOMNodeList
** outList
)
235 domelem
*This
= impl_from_IXMLDOMElement( iface
);
236 return IXMLDOMNode_get_childNodes( IXMLDOMNode_from_impl(This
->node
), outList
);
239 static HRESULT WINAPI
domelem_get_firstChild(
240 IXMLDOMElement
*iface
,
241 IXMLDOMNode
** domNode
)
243 domelem
*This
= impl_from_IXMLDOMElement( iface
);
244 return IXMLDOMNode_get_firstChild( IXMLDOMNode_from_impl(This
->node
), domNode
);
247 static HRESULT WINAPI
domelem_get_lastChild(
248 IXMLDOMElement
*iface
,
249 IXMLDOMNode
** domNode
)
251 domelem
*This
= impl_from_IXMLDOMElement( iface
);
252 return IXMLDOMNode_get_lastChild( IXMLDOMNode_from_impl(This
->node
), domNode
);
255 static HRESULT WINAPI
domelem_get_previousSibling(
256 IXMLDOMElement
*iface
,
257 IXMLDOMNode
** domNode
)
259 domelem
*This
= impl_from_IXMLDOMElement( iface
);
260 return IXMLDOMNode_get_previousSibling( IXMLDOMNode_from_impl(This
->node
), domNode
);
263 static HRESULT WINAPI
domelem_get_nextSibling(
264 IXMLDOMElement
*iface
,
265 IXMLDOMNode
** domNode
)
267 domelem
*This
= impl_from_IXMLDOMElement( iface
);
268 return IXMLDOMNode_get_nextSibling( IXMLDOMNode_from_impl(This
->node
), domNode
);
271 static HRESULT WINAPI
domelem_get_attributes(
272 IXMLDOMElement
*iface
,
273 IXMLDOMNamedNodeMap
** attributeMap
)
275 domelem
*This
= impl_from_IXMLDOMElement( iface
);
276 return IXMLDOMNode_get_attributes( IXMLDOMNode_from_impl(This
->node
), attributeMap
);
279 static HRESULT WINAPI
domelem_insertBefore(
280 IXMLDOMElement
*iface
,
281 IXMLDOMNode
* newNode
, VARIANT var1
,
282 IXMLDOMNode
** outOldNode
)
284 domelem
*This
= impl_from_IXMLDOMElement( iface
);
285 return IXMLDOMNode_insertBefore( IXMLDOMNode_from_impl(This
->node
), newNode
, var1
, outOldNode
);
288 static HRESULT WINAPI
domelem_replaceChild(
289 IXMLDOMElement
*iface
,
290 IXMLDOMNode
* newNode
,
291 IXMLDOMNode
* oldNode
,
292 IXMLDOMNode
** outOldNode
)
294 domelem
*This
= impl_from_IXMLDOMElement( iface
);
295 return IXMLDOMNode_replaceChild( IXMLDOMNode_from_impl(This
->node
), newNode
, oldNode
, outOldNode
);
298 static HRESULT WINAPI
domelem_removeChild(
299 IXMLDOMElement
*iface
,
300 IXMLDOMNode
* domNode
, IXMLDOMNode
** oldNode
)
302 domelem
*This
= impl_from_IXMLDOMElement( iface
);
303 return IXMLDOMNode_removeChild( IXMLDOMNode_from_impl(This
->node
), domNode
, oldNode
);
306 static HRESULT WINAPI
domelem_appendChild(
307 IXMLDOMElement
*iface
,
308 IXMLDOMNode
* newNode
, IXMLDOMNode
** outNewNode
)
310 domelem
*This
= impl_from_IXMLDOMElement( iface
);
311 return IXMLDOMNode_appendChild( IXMLDOMNode_from_impl(This
->node
), newNode
, outNewNode
);
314 static HRESULT WINAPI
domelem_hasChildNodes(
315 IXMLDOMElement
*iface
,
318 domelem
*This
= impl_from_IXMLDOMElement( iface
);
319 return IXMLDOMNode_hasChildNodes( IXMLDOMNode_from_impl(This
->node
), pbool
);
322 static HRESULT WINAPI
domelem_get_ownerDocument(
323 IXMLDOMElement
*iface
,
324 IXMLDOMDocument
** domDocument
)
326 domelem
*This
= impl_from_IXMLDOMElement( iface
);
327 return IXMLDOMNode_get_ownerDocument( IXMLDOMNode_from_impl(This
->node
), domDocument
);
330 static HRESULT WINAPI
domelem_cloneNode(
331 IXMLDOMElement
*iface
,
332 VARIANT_BOOL pbool
, IXMLDOMNode
** outNode
)
334 domelem
*This
= impl_from_IXMLDOMElement( iface
);
335 return IXMLDOMNode_cloneNode( IXMLDOMNode_from_impl(This
->node
), pbool
, outNode
);
338 static HRESULT WINAPI
domelem_get_nodeTypeString(
339 IXMLDOMElement
*iface
,
342 domelem
*This
= impl_from_IXMLDOMElement( iface
);
343 return IXMLDOMNode_get_nodeTypeString( IXMLDOMNode_from_impl(This
->node
), p
);
346 static HRESULT WINAPI
domelem_get_text(
347 IXMLDOMElement
*iface
,
350 domelem
*This
= impl_from_IXMLDOMElement( iface
);
351 return IXMLDOMNode_get_text( IXMLDOMNode_from_impl(This
->node
), p
);
354 static HRESULT WINAPI
domelem_put_text(
355 IXMLDOMElement
*iface
,
358 domelem
*This
= impl_from_IXMLDOMElement( iface
);
359 return IXMLDOMNode_put_text( IXMLDOMNode_from_impl(This
->node
), p
);
362 static HRESULT WINAPI
domelem_get_specified(
363 IXMLDOMElement
*iface
,
366 domelem
*This
= impl_from_IXMLDOMElement( iface
);
367 return IXMLDOMNode_get_specified( IXMLDOMNode_from_impl(This
->node
), pbool
);
370 static HRESULT WINAPI
domelem_get_definition(
371 IXMLDOMElement
*iface
,
372 IXMLDOMNode
** domNode
)
374 domelem
*This
= impl_from_IXMLDOMElement( iface
);
375 return IXMLDOMNode_get_definition( IXMLDOMNode_from_impl(This
->node
), domNode
);
378 static HRESULT WINAPI
domelem_get_nodeTypedValue(
379 IXMLDOMElement
*iface
,
382 domelem
*This
= impl_from_IXMLDOMElement( iface
);
383 return IXMLDOMNode_get_nodeTypedValue( IXMLDOMNode_from_impl(This
->node
), var1
);
386 static HRESULT WINAPI
domelem_put_nodeTypedValue(
387 IXMLDOMElement
*iface
,
390 domelem
*This
= impl_from_IXMLDOMElement( iface
);
391 return IXMLDOMNode_put_nodeTypedValue( IXMLDOMNode_from_impl(This
->node
), var1
);
394 static HRESULT WINAPI
domelem_get_dataType(
395 IXMLDOMElement
*iface
,
398 domelem
*This
= impl_from_IXMLDOMElement( iface
);
399 return IXMLDOMNode_get_dataType( IXMLDOMNode_from_impl(This
->node
), var1
);
402 static HRESULT WINAPI
domelem_put_dataType(
403 IXMLDOMElement
*iface
,
406 domelem
*This
= impl_from_IXMLDOMElement( iface
);
407 return IXMLDOMNode_put_dataType( IXMLDOMNode_from_impl(This
->node
), p
);
410 static HRESULT WINAPI
domelem_get_xml(
411 IXMLDOMElement
*iface
,
414 domelem
*This
= impl_from_IXMLDOMElement( iface
);
415 return IXMLDOMNode_get_xml( IXMLDOMNode_from_impl(This
->node
), p
);
418 static HRESULT WINAPI
domelem_transformNode(
419 IXMLDOMElement
*iface
,
420 IXMLDOMNode
* domNode
, BSTR
* p
)
422 domelem
*This
= impl_from_IXMLDOMElement( iface
);
423 return IXMLDOMNode_transformNode( IXMLDOMNode_from_impl(This
->node
), domNode
, p
);
426 static HRESULT WINAPI
domelem_selectNodes(
427 IXMLDOMElement
*iface
,
428 BSTR p
, IXMLDOMNodeList
** outList
)
430 domelem
*This
= impl_from_IXMLDOMElement( iface
);
431 return IXMLDOMNode_selectNodes( IXMLDOMNode_from_impl(This
->node
), p
, outList
);
434 static HRESULT WINAPI
domelem_selectSingleNode(
435 IXMLDOMElement
*iface
,
436 BSTR p
, IXMLDOMNode
** outNode
)
438 domelem
*This
= impl_from_IXMLDOMElement( iface
);
439 return IXMLDOMNode_selectSingleNode( IXMLDOMNode_from_impl(This
->node
), p
, outNode
);
442 static HRESULT WINAPI
domelem_get_parsed(
443 IXMLDOMElement
*iface
,
446 domelem
*This
= impl_from_IXMLDOMElement( iface
);
447 return IXMLDOMNode_get_parsed( IXMLDOMNode_from_impl(This
->node
), pbool
);
450 static HRESULT WINAPI
domelem_get_namespaceURI(
451 IXMLDOMElement
*iface
,
454 domelem
*This
= impl_from_IXMLDOMElement( iface
);
455 return IXMLDOMNode_get_namespaceURI( IXMLDOMNode_from_impl(This
->node
), p
);
458 static HRESULT WINAPI
domelem_get_prefix(
459 IXMLDOMElement
*iface
,
462 domelem
*This
= impl_from_IXMLDOMElement( iface
);
463 return IXMLDOMNode_get_prefix( IXMLDOMNode_from_impl(This
->node
), p
);
466 static HRESULT WINAPI
domelem_get_baseName(
467 IXMLDOMElement
*iface
,
470 domelem
*This
= impl_from_IXMLDOMElement( iface
);
471 return IXMLDOMNode_get_baseName( IXMLDOMNode_from_impl(This
->node
), p
);
474 static HRESULT WINAPI
domelem_transformNodeToObject(
475 IXMLDOMElement
*iface
,
476 IXMLDOMNode
* domNode
, VARIANT var1
)
478 domelem
*This
= impl_from_IXMLDOMElement( iface
);
479 return IXMLDOMNode_transformNodeToObject( IXMLDOMNode_from_impl(This
->node
), domNode
, var1
);
482 static HRESULT WINAPI
domelem_get_tagName(
483 IXMLDOMElement
*iface
,
486 domelem
*This
= impl_from_IXMLDOMElement( iface
);
492 TRACE("%p\n", This
);
497 element
= get_element( This
);
501 len
= MultiByteToWideChar( CP_UTF8
, 0, (LPCSTR
) element
->name
, -1, NULL
, 0 );
503 len
+= MultiByteToWideChar( CP_UTF8
, 0, (LPCSTR
) element
->ns
->prefix
, -1, NULL
, 0 );
504 str
= HeapAlloc( GetProcessHeap(), 0, len
* sizeof (WCHAR
) );
506 return E_OUTOFMEMORY
;
509 offset
= MultiByteToWideChar( CP_UTF8
, 0, (LPCSTR
) element
->ns
->prefix
, -1, str
, len
);
510 str
[offset
- 1] = ':';
512 MultiByteToWideChar( CP_UTF8
, 0, (LPCSTR
) element
->name
, -1, str
+ offset
, len
- offset
);
513 *p
= SysAllocString( str
);
514 HeapFree( GetProcessHeap(), 0, str
);
519 static HRESULT WINAPI
domelem_getAttribute(
520 IXMLDOMElement
*iface
,
521 BSTR name
, VARIANT
* value
)
523 domelem
*This
= impl_from_IXMLDOMElement( iface
);
525 xmlChar
*xml_name
, *xml_value
= NULL
;
526 HRESULT hr
= S_FALSE
;
528 TRACE("(%p)->(%s,%p)\n", This
, debugstr_w(name
), value
);
533 element
= get_element( This
);
537 V_BSTR(value
) = NULL
;
538 V_VT(value
) = VT_NULL
;
540 xml_name
= xmlChar_from_wchar( name
);
542 if(!xmlValidateNameValue(xml_name
))
545 xml_value
= xmlGetNsProp(element
, xml_name
, NULL
);
547 HeapFree(GetProcessHeap(), 0, xml_name
);
550 V_VT(value
) = VT_BSTR
;
551 V_BSTR(value
) = bstr_from_xmlChar( xml_value
);
559 static HRESULT WINAPI
domelem_setAttribute(
560 IXMLDOMElement
*iface
,
561 BSTR name
, VARIANT value
)
563 domelem
*This
= impl_from_IXMLDOMElement( iface
);
565 xmlChar
*xml_name
, *xml_value
;
569 TRACE("(%p)->(%s, var)\n", This
, debugstr_w(name
));
571 element
= get_element( This
);
576 hr
= VariantChangeType(&var
, &value
, 0, VT_BSTR
);
579 FIXME("VariantChangeType failed\n");
583 xml_name
= xmlChar_from_wchar( name
);
584 xml_value
= xmlChar_from_wchar( V_BSTR(&var
) );
586 if(!xmlSetNsProp(element
, NULL
, xml_name
, xml_value
))
589 HeapFree(GetProcessHeap(), 0, xml_value
);
590 HeapFree(GetProcessHeap(), 0, xml_name
);
596 static HRESULT WINAPI
domelem_removeAttribute(
597 IXMLDOMElement
*iface
,
604 static HRESULT WINAPI
domelem_getAttributeNode(
605 IXMLDOMElement
*iface
,
606 BSTR p
, IXMLDOMAttribute
** attributeNode
)
608 domelem
*This
= impl_from_IXMLDOMElement( iface
);
613 HRESULT hr
= S_FALSE
;
615 TRACE("(%p)->(%s %p)\n", This
, debugstr_w(p
), attributeNode
);
620 *attributeNode
= NULL
;
622 element
= get_element( This
);
626 xml_name
= xmlChar_from_wchar(p
);
628 if(!xmlValidateNameValue(xml_name
))
630 HeapFree(GetProcessHeap(), 0, xml_name
);
634 attr
= xmlHasProp(element
, xml_name
);
636 unk
= create_attribute((xmlNodePtr
)attr
);
637 hr
= IUnknown_QueryInterface(unk
, &IID_IXMLDOMAttribute
, (void**)attributeNode
);
638 IUnknown_Release(unk
);
641 HeapFree(GetProcessHeap(), 0, xml_name
);
646 static HRESULT WINAPI
domelem_setAttributeNode(
647 IXMLDOMElement
*iface
,
648 IXMLDOMAttribute
* domAttribute
,
649 IXMLDOMAttribute
** attributeNode
)
655 static HRESULT WINAPI
domelem_removeAttributeNode(
656 IXMLDOMElement
*iface
,
657 IXMLDOMAttribute
* domAttribute
,
658 IXMLDOMAttribute
** attributeNode
)
664 static HRESULT WINAPI
domelem_getElementsByTagName(
665 IXMLDOMElement
*iface
,
666 BSTR bstrName
, IXMLDOMNodeList
** resultList
)
668 domelem
*This
= impl_from_IXMLDOMElement( iface
);
673 TRACE("(%p)->(%s,%p)\n", This
, debugstr_w(bstrName
), resultList
);
675 szPattern
= HeapAlloc(GetProcessHeap(), 0, sizeof(WCHAR
)*(3+lstrlenW(bstrName
)+1));
677 szPattern
[1] = szPattern
[2] = '/';
678 lstrcpyW(szPattern
+3, bstrName
);
679 TRACE("%s\n", debugstr_w(szPattern
));
681 element
= get_element(This
);
685 hr
= queryresult_create(element
, szPattern
, resultList
);
686 HeapFree(GetProcessHeap(), 0, szPattern
);
691 static HRESULT WINAPI
domelem_normalize(
692 IXMLDOMElement
*iface
)
698 static const struct IXMLDOMElementVtbl domelem_vtbl
=
700 domelem_QueryInterface
,
703 domelem_GetTypeInfoCount
,
705 domelem_GetIDsOfNames
,
707 domelem_get_nodeName
,
708 domelem_get_nodeValue
,
709 domelem_put_nodeValue
,
710 domelem_get_nodeType
,
711 domelem_get_parentNode
,
712 domelem_get_childNodes
,
713 domelem_get_firstChild
,
714 domelem_get_lastChild
,
715 domelem_get_previousSibling
,
716 domelem_get_nextSibling
,
717 domelem_get_attributes
,
718 domelem_insertBefore
,
719 domelem_replaceChild
,
722 domelem_hasChildNodes
,
723 domelem_get_ownerDocument
,
725 domelem_get_nodeTypeString
,
728 domelem_get_specified
,
729 domelem_get_definition
,
730 domelem_get_nodeTypedValue
,
731 domelem_put_nodeTypedValue
,
732 domelem_get_dataType
,
733 domelem_put_dataType
,
735 domelem_transformNode
,
737 domelem_selectSingleNode
,
739 domelem_get_namespaceURI
,
741 domelem_get_baseName
,
742 domelem_transformNodeToObject
,
744 domelem_getAttribute
,
745 domelem_setAttribute
,
746 domelem_removeAttribute
,
747 domelem_getAttributeNode
,
748 domelem_setAttributeNode
,
749 domelem_removeAttributeNode
,
750 domelem_getElementsByTagName
,
754 IUnknown
* create_element( xmlNodePtr element
)
758 This
= HeapAlloc( GetProcessHeap(), 0, sizeof *This
);
762 This
->lpVtbl
= &domelem_vtbl
;
765 This
->node
= create_basic_node( element
, (IUnknown
*)&This
->lpVtbl
, NULL
);
768 HeapFree(GetProcessHeap(), 0, This
);
772 return (IUnknown
*) &This
->lpVtbl
;