| /* |
| * DOM Document 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., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA |
| */ |
| |
| #define COBJMACROS |
| |
| #include "config.h" |
| |
| #include <stdarg.h> |
| #include "windef.h" |
| #include "winbase.h" |
| #include "winuser.h" |
| #include "ole2.h" |
| #include "msxml2.h" |
| |
| #include "msxml_private.h" |
| |
| #include "wine/debug.h" |
| |
| WINE_DEFAULT_DEBUG_CHANNEL(msxml); |
| |
| #ifdef HAVE_LIBXML2 |
| |
| typedef struct _domelem |
| { |
| const struct IXMLDOMElementVtbl *lpVtbl; |
| LONG ref; |
| IUnknown *node_unk; |
| IXMLDOMNode *node; |
| } domelem; |
| |
| static inline domelem *impl_from_IXMLDOMElement( IXMLDOMElement *iface ) |
| { |
| return (domelem *)((char*)iface - FIELD_OFFSET(domelem, lpVtbl)); |
| } |
| |
| static inline xmlNodePtr get_element( domelem *This ) |
| { |
| return xmlNodePtr_from_domnode( This->node, XML_ELEMENT_NODE ); |
| } |
| |
| static HRESULT WINAPI domelem_QueryInterface( |
| IXMLDOMElement *iface, |
| REFIID riid, |
| void** ppvObject ) |
| { |
| domelem *This = impl_from_IXMLDOMElement( iface ); |
| TRACE("%p %s %p\n", This, debugstr_guid(riid), ppvObject); |
| |
| if ( IsEqualGUID( riid, &IID_IXMLDOMElement ) || |
| IsEqualGUID( riid, &IID_IUnknown ) ) |
| { |
| *ppvObject = iface; |
| } |
| else if ( IsEqualGUID( riid, &IID_IDispatch ) || |
| IsEqualGUID( riid, &IID_IXMLDOMNode ) ) |
| { |
| return IUnknown_QueryInterface(This->node_unk, riid, ppvObject); |
| } |
| else |
| { |
| FIXME("interface %s not implemented\n", debugstr_guid(riid)); |
| return E_NOINTERFACE; |
| } |
| |
| IXMLDOMElement_AddRef( iface ); |
| |
| return S_OK; |
| } |
| |
| static ULONG WINAPI domelem_AddRef( |
| IXMLDOMElement *iface ) |
| { |
| domelem *This = impl_from_IXMLDOMElement( iface ); |
| return InterlockedIncrement( &This->ref ); |
| } |
| |
| static ULONG WINAPI domelem_Release( |
| IXMLDOMElement *iface ) |
| { |
| domelem *This = impl_from_IXMLDOMElement( iface ); |
| ULONG ref; |
| |
| ref = InterlockedDecrement( &This->ref ); |
| if ( ref == 0 ) |
| { |
| IUnknown_Release( This->node_unk ); |
| HeapFree( GetProcessHeap(), 0, This ); |
| } |
| |
| return ref; |
| } |
| |
| static HRESULT WINAPI domelem_GetTypeInfoCount( |
| IXMLDOMElement *iface, |
| UINT* pctinfo ) |
| { |
| FIXME("\n"); |
| return E_NOTIMPL; |
| } |
| |
| static HRESULT WINAPI domelem_GetTypeInfo( |
| IXMLDOMElement *iface, |
| UINT iTInfo, LCID lcid, |
| ITypeInfo** ppTInfo ) |
| { |
| FIXME("\n"); |
| return E_NOTIMPL; |
| } |
| |
| static HRESULT WINAPI domelem_GetIDsOfNames( |
| IXMLDOMElement *iface, |
| REFIID riid, LPOLESTR* rgszNames, |
| UINT cNames, LCID lcid, DISPID* rgDispId ) |
| { |
| FIXME("\n"); |
| return E_NOTIMPL; |
| } |
| |
| static HRESULT WINAPI domelem_Invoke( |
| IXMLDOMElement *iface, |
| DISPID dispIdMember, REFIID riid, LCID lcid, |
| WORD wFlags, DISPPARAMS* pDispParams, VARIANT* pVarResult, |
| EXCEPINFO* pExcepInfo, UINT* puArgErr ) |
| { |
| FIXME("\n"); |
| return E_NOTIMPL; |
| } |
| |
| static HRESULT WINAPI domelem_get_nodeName( |
| IXMLDOMElement *iface, |
| BSTR* p ) |
| { |
| domelem *This = impl_from_IXMLDOMElement( iface ); |
| return IXMLDOMNode_get_nodeName( This->node, p ); |
| } |
| |
| static HRESULT WINAPI domelem_get_nodeValue( |
| IXMLDOMElement *iface, |
| VARIANT* var1 ) |
| { |
| domelem *This = impl_from_IXMLDOMElement( iface ); |
| return IXMLDOMNode_get_nodeValue( This->node, var1 ); |
| } |
| |
| static HRESULT WINAPI domelem_put_nodeValue( |
| IXMLDOMElement *iface, |
| VARIANT var1 ) |
| { |
| domelem *This = impl_from_IXMLDOMElement( iface ); |
| return IXMLDOMNode_put_nodeValue( This->node, var1 ); |
| } |
| |
| static HRESULT WINAPI domelem_get_nodeType( |
| IXMLDOMElement *iface, |
| DOMNodeType* domNodeType ) |
| { |
| domelem *This = impl_from_IXMLDOMElement( iface ); |
| return IXMLDOMNode_get_nodeType( This->node, domNodeType ); |
| } |
| |
| static HRESULT WINAPI domelem_get_parentNode( |
| IXMLDOMElement *iface, |
| IXMLDOMNode** parent ) |
| { |
| domelem *This = impl_from_IXMLDOMElement( iface ); |
| return IXMLDOMNode_get_parentNode( This->node, parent ); |
| } |
| |
| static HRESULT WINAPI domelem_get_childNodes( |
| IXMLDOMElement *iface, |
| IXMLDOMNodeList** outList) |
| { |
| domelem *This = impl_from_IXMLDOMElement( iface ); |
| return IXMLDOMNode_get_childNodes( This->node, outList ); |
| } |
| |
| static HRESULT WINAPI domelem_get_firstChild( |
| IXMLDOMElement *iface, |
| IXMLDOMNode** domNode) |
| { |
| domelem *This = impl_from_IXMLDOMElement( iface ); |
| return IXMLDOMNode_get_firstChild( This->node, domNode ); |
| } |
| |
| static HRESULT WINAPI domelem_get_lastChild( |
| IXMLDOMElement *iface, |
| IXMLDOMNode** domNode) |
| { |
| domelem *This = impl_from_IXMLDOMElement( iface ); |
| return IXMLDOMNode_get_lastChild( This->node, domNode ); |
| } |
| |
| static HRESULT WINAPI domelem_get_previousSibling( |
| IXMLDOMElement *iface, |
| IXMLDOMNode** domNode) |
| { |
| domelem *This = impl_from_IXMLDOMElement( iface ); |
| return IXMLDOMNode_get_previousSibling( This->node, domNode ); |
| } |
| |
| static HRESULT WINAPI domelem_get_nextSibling( |
| IXMLDOMElement *iface, |
| IXMLDOMNode** domNode) |
| { |
| domelem *This = impl_from_IXMLDOMElement( iface ); |
| return IXMLDOMNode_get_nextSibling( This->node, domNode ); |
| } |
| |
| static HRESULT WINAPI domelem_get_attributes( |
| IXMLDOMElement *iface, |
| IXMLDOMNamedNodeMap** attributeMap) |
| { |
| domelem *This = impl_from_IXMLDOMElement( iface ); |
| return IXMLDOMNode_get_attributes( This->node, attributeMap ); |
| } |
| |
| static HRESULT WINAPI domelem_insertBefore( |
| IXMLDOMElement *iface, |
| IXMLDOMNode* newNode, VARIANT var1, |
| IXMLDOMNode** outOldNode) |
| { |
| domelem *This = impl_from_IXMLDOMElement( iface ); |
| return IXMLDOMNode_insertBefore( This->node, newNode, var1, outOldNode ); |
| } |
| |
| static HRESULT WINAPI domelem_replaceChild( |
| IXMLDOMElement *iface, |
| IXMLDOMNode* newNode, |
| IXMLDOMNode* oldNode, |
| IXMLDOMNode** outOldNode) |
| { |
| domelem *This = impl_from_IXMLDOMElement( iface ); |
| return IXMLDOMNode_replaceChild( This->node, newNode, oldNode, outOldNode ); |
| } |
| |
| static HRESULT WINAPI domelem_removeChild( |
| IXMLDOMElement *iface, |
| IXMLDOMNode* domNode, IXMLDOMNode** oldNode) |
| { |
| domelem *This = impl_from_IXMLDOMElement( iface ); |
| return IXMLDOMNode_removeChild( This->node, domNode, oldNode ); |
| } |
| |
| static HRESULT WINAPI domelem_appendChild( |
| IXMLDOMElement *iface, |
| IXMLDOMNode* newNode, IXMLDOMNode** outNewNode) |
| { |
| domelem *This = impl_from_IXMLDOMElement( iface ); |
| return IXMLDOMNode_appendChild( This->node, newNode, outNewNode ); |
| } |
| |
| static HRESULT WINAPI domelem_hasChildNodes( |
| IXMLDOMElement *iface, |
| VARIANT_BOOL* pbool) |
| { |
| domelem *This = impl_from_IXMLDOMElement( iface ); |
| return IXMLDOMNode_hasChildNodes( This->node, pbool ); |
| } |
| |
| static HRESULT WINAPI domelem_get_ownerDocument( |
| IXMLDOMElement *iface, |
| IXMLDOMDocument** domDocument) |
| { |
| domelem *This = impl_from_IXMLDOMElement( iface ); |
| return IXMLDOMNode_get_ownerDocument( This->node, domDocument ); |
| } |
| |
| static HRESULT WINAPI domelem_cloneNode( |
| IXMLDOMElement *iface, |
| VARIANT_BOOL pbool, IXMLDOMNode** outNode) |
| { |
| domelem *This = impl_from_IXMLDOMElement( iface ); |
| return IXMLDOMNode_cloneNode( This->node, pbool, outNode ); |
| } |
| |
| static HRESULT WINAPI domelem_get_nodeTypeString( |
| IXMLDOMElement *iface, |
| BSTR* p) |
| { |
| domelem *This = impl_from_IXMLDOMElement( iface ); |
| return IXMLDOMNode_get_nodeTypeString( This->node, p ); |
| } |
| |
| static HRESULT WINAPI domelem_get_text( |
| IXMLDOMElement *iface, |
| BSTR* p) |
| { |
| domelem *This = impl_from_IXMLDOMElement( iface ); |
| return IXMLDOMNode_get_text( This->node, p ); |
| } |
| |
| static HRESULT WINAPI domelem_put_text( |
| IXMLDOMElement *iface, |
| BSTR p) |
| { |
| domelem *This = impl_from_IXMLDOMElement( iface ); |
| return IXMLDOMNode_put_text( This->node, p ); |
| } |
| |
| static HRESULT WINAPI domelem_get_specified( |
| IXMLDOMElement *iface, |
| VARIANT_BOOL* pbool) |
| { |
| domelem *This = impl_from_IXMLDOMElement( iface ); |
| return IXMLDOMNode_get_specified( This->node, pbool ); |
| } |
| |
| static HRESULT WINAPI domelem_get_definition( |
| IXMLDOMElement *iface, |
| IXMLDOMNode** domNode) |
| { |
| domelem *This = impl_from_IXMLDOMElement( iface ); |
| return IXMLDOMNode_get_definition( This->node, domNode ); |
| } |
| |
| static HRESULT WINAPI domelem_get_nodeTypedValue( |
| IXMLDOMElement *iface, |
| VARIANT* var1) |
| { |
| domelem *This = impl_from_IXMLDOMElement( iface ); |
| return IXMLDOMNode_get_nodeTypedValue( This->node, var1 ); |
| } |
| |
| static HRESULT WINAPI domelem_put_nodeTypedValue( |
| IXMLDOMElement *iface, |
| VARIANT var1) |
| { |
| domelem *This = impl_from_IXMLDOMElement( iface ); |
| return IXMLDOMNode_put_nodeTypedValue( This->node, var1 ); |
| } |
| |
| static HRESULT WINAPI domelem_get_dataType( |
| IXMLDOMElement *iface, |
| VARIANT* var1) |
| { |
| domelem *This = impl_from_IXMLDOMElement( iface ); |
| return IXMLDOMNode_get_dataType( This->node, var1 ); |
| } |
| |
| static HRESULT WINAPI domelem_put_dataType( |
| IXMLDOMElement *iface, |
| BSTR p) |
| { |
| domelem *This = impl_from_IXMLDOMElement( iface ); |
| return IXMLDOMNode_put_dataType( This->node, p ); |
| } |
| |
| static HRESULT WINAPI domelem_get_xml( |
| IXMLDOMElement *iface, |
| BSTR* p) |
| { |
| domelem *This = impl_from_IXMLDOMElement( iface ); |
| return IXMLDOMNode_get_xml( This->node, p ); |
| } |
| |
| static HRESULT WINAPI domelem_transformNode( |
| IXMLDOMElement *iface, |
| IXMLDOMNode* domNode, BSTR* p) |
| { |
| domelem *This = impl_from_IXMLDOMElement( iface ); |
| return IXMLDOMNode_transformNode( This->node, domNode, p ); |
| } |
| |
| static HRESULT WINAPI domelem_selectNodes( |
| IXMLDOMElement *iface, |
| BSTR p, IXMLDOMNodeList** outList) |
| { |
| domelem *This = impl_from_IXMLDOMElement( iface ); |
| return IXMLDOMNode_selectNodes( This->node, p, outList ); |
| } |
| |
| static HRESULT WINAPI domelem_selectSingleNode( |
| IXMLDOMElement *iface, |
| BSTR p, IXMLDOMNode** outNode) |
| { |
| domelem *This = impl_from_IXMLDOMElement( iface ); |
| return IXMLDOMNode_selectSingleNode( This->node, p, outNode ); |
| } |
| |
| static HRESULT WINAPI domelem_get_parsed( |
| IXMLDOMElement *iface, |
| VARIANT_BOOL* pbool) |
| { |
| domelem *This = impl_from_IXMLDOMElement( iface ); |
| return IXMLDOMNode_get_parsed( This->node, pbool ); |
| } |
| |
| static HRESULT WINAPI domelem_get_namespaceURI( |
| IXMLDOMElement *iface, |
| BSTR* p) |
| { |
| domelem *This = impl_from_IXMLDOMElement( iface ); |
| return IXMLDOMNode_get_namespaceURI( This->node, p ); |
| } |
| |
| static HRESULT WINAPI domelem_get_prefix( |
| IXMLDOMElement *iface, |
| BSTR* p) |
| { |
| domelem *This = impl_from_IXMLDOMElement( iface ); |
| return IXMLDOMNode_get_prefix( This->node, p ); |
| } |
| |
| static HRESULT WINAPI domelem_get_baseName( |
| IXMLDOMElement *iface, |
| BSTR* p) |
| { |
| domelem *This = impl_from_IXMLDOMElement( iface ); |
| return IXMLDOMNode_get_baseName( This->node, p ); |
| } |
| |
| static HRESULT WINAPI domelem_transformNodeToObject( |
| IXMLDOMElement *iface, |
| IXMLDOMNode* domNode, VARIANT var1) |
| { |
| domelem *This = impl_from_IXMLDOMElement( iface ); |
| return IXMLDOMNode_transformNodeToObject( This->node, domNode, var1 ); |
| } |
| |
| static HRESULT WINAPI domelem_get_tagName( |
| IXMLDOMElement *iface, |
| BSTR* p) |
| { |
| domelem *This = impl_from_IXMLDOMElement( iface ); |
| xmlNodePtr element; |
| |
| TRACE("%p\n", This ); |
| |
| if ( !This->node ) |
| return E_FAIL; |
| |
| element = get_element( This ); |
| if ( !element ) |
| return E_FAIL; |
| |
| *p = bstr_from_xmlChar( element->name ); |
| |
| return S_OK; |
| } |
| |
| static HRESULT WINAPI domelem_getAttribute( |
| IXMLDOMElement *iface, |
| BSTR name, VARIANT* value) |
| { |
| domelem *This = impl_from_IXMLDOMElement( iface ); |
| xmlNodePtr element; |
| xmlChar *xml_name, *xml_value; |
| HRESULT hr = E_FAIL; |
| |
| TRACE("(%p)->(%s,%p)\n", This, debugstr_w(name), value); |
| |
| element = get_element( This ); |
| if ( !element ) |
| return E_FAIL; |
| |
| VariantInit(value); |
| xml_name = xmlChar_from_wchar( name ); |
| xml_value = xmlGetNsProp(element, xml_name, NULL); |
| HeapFree(GetProcessHeap(), 0, xml_name); |
| if(xml_value) |
| { |
| V_VT(value) = VT_BSTR; |
| V_BSTR(value) = bstr_from_xmlChar( xml_value ); |
| xmlFree(xml_value); |
| hr = S_OK; |
| } |
| |
| return hr; |
| } |
| |
| static HRESULT WINAPI domelem_setAttribute( |
| IXMLDOMElement *iface, |
| BSTR name, VARIANT value) |
| { |
| domelem *This = impl_from_IXMLDOMElement( iface ); |
| xmlNodePtr element; |
| xmlChar *xml_name, *xml_value; |
| HRESULT hr; |
| VARIANT var; |
| |
| TRACE("(%p)->(%s, var)\n", This, debugstr_w(name)); |
| |
| element = get_element( This ); |
| if ( !element ) |
| return E_FAIL; |
| |
| VariantInit(&var); |
| hr = VariantChangeType(&var, &value, 0, VT_BSTR); |
| if(hr != S_OK) |
| { |
| FIXME("VariantChangeType failed\n"); |
| return hr; |
| } |
| |
| xml_name = xmlChar_from_wchar( name ); |
| xml_value = xmlChar_from_wchar( V_BSTR(&var) ); |
| |
| if(!xmlSetNsProp(element, NULL, xml_name, xml_value)) |
| hr = E_FAIL; |
| |
| HeapFree(GetProcessHeap(), 0, xml_value); |
| HeapFree(GetProcessHeap(), 0, xml_name); |
| VariantClear(&var); |
| |
| return hr; |
| } |
| |
| static HRESULT WINAPI domelem_removeAttribute( |
| IXMLDOMElement *iface, |
| BSTR p) |
| { |
| FIXME("\n"); |
| return E_NOTIMPL; |
| } |
| |
| static HRESULT WINAPI domelem_getAttributeNode( |
| IXMLDOMElement *iface, |
| BSTR p, IXMLDOMAttribute** attributeNode ) |
| { |
| FIXME("\n"); |
| return E_NOTIMPL; |
| } |
| |
| static HRESULT WINAPI domelem_setAttributeNode( |
| IXMLDOMElement *iface, |
| IXMLDOMAttribute* domAttribute, |
| IXMLDOMAttribute** attributeNode) |
| { |
| FIXME("\n"); |
| return E_NOTIMPL; |
| } |
| |
| static HRESULT WINAPI domelem_removeAttributeNode( |
| IXMLDOMElement *iface, |
| IXMLDOMAttribute* domAttribute, |
| IXMLDOMAttribute** attributeNode) |
| { |
| FIXME("\n"); |
| return E_NOTIMPL; |
| } |
| |
| static HRESULT WINAPI domelem_getElementsByTagName( |
| IXMLDOMElement *iface, |
| BSTR p, IXMLDOMNodeList** resultList) |
| { |
| FIXME("\n"); |
| return E_NOTIMPL; |
| } |
| |
| static HRESULT WINAPI domelem_normalize( |
| IXMLDOMElement *iface ) |
| { |
| FIXME("\n"); |
| return E_NOTIMPL; |
| } |
| |
| static const struct IXMLDOMElementVtbl domelem_vtbl = |
| { |
| domelem_QueryInterface, |
| domelem_AddRef, |
| domelem_Release, |
| domelem_GetTypeInfoCount, |
| domelem_GetTypeInfo, |
| domelem_GetIDsOfNames, |
| domelem_Invoke, |
| domelem_get_nodeName, |
| domelem_get_nodeValue, |
| domelem_put_nodeValue, |
| domelem_get_nodeType, |
| domelem_get_parentNode, |
| domelem_get_childNodes, |
| domelem_get_firstChild, |
| domelem_get_lastChild, |
| domelem_get_previousSibling, |
| domelem_get_nextSibling, |
| domelem_get_attributes, |
| domelem_insertBefore, |
| domelem_replaceChild, |
| domelem_removeChild, |
| domelem_appendChild, |
| domelem_hasChildNodes, |
| domelem_get_ownerDocument, |
| domelem_cloneNode, |
| domelem_get_nodeTypeString, |
| domelem_get_text, |
| domelem_put_text, |
| domelem_get_specified, |
| domelem_get_definition, |
| domelem_get_nodeTypedValue, |
| domelem_put_nodeTypedValue, |
| domelem_get_dataType, |
| domelem_put_dataType, |
| domelem_get_xml, |
| domelem_transformNode, |
| domelem_selectNodes, |
| domelem_selectSingleNode, |
| domelem_get_parsed, |
| domelem_get_namespaceURI, |
| domelem_get_prefix, |
| domelem_get_baseName, |
| domelem_transformNodeToObject, |
| domelem_get_tagName, |
| domelem_getAttribute, |
| domelem_setAttribute, |
| domelem_removeAttribute, |
| domelem_getAttributeNode, |
| domelem_setAttributeNode, |
| domelem_removeAttributeNode, |
| domelem_getElementsByTagName, |
| domelem_normalize, |
| }; |
| |
| IUnknown* create_element( xmlNodePtr element ) |
| { |
| domelem *This; |
| HRESULT hr; |
| |
| This = HeapAlloc( GetProcessHeap(), 0, sizeof *This ); |
| if ( !This ) |
| return NULL; |
| |
| This->lpVtbl = &domelem_vtbl; |
| This->ref = 1; |
| |
| This->node_unk = create_basic_node( element, (IUnknown*)&This->lpVtbl ); |
| if(!This->node_unk) |
| { |
| HeapFree(GetProcessHeap(), 0, This); |
| return NULL; |
| } |
| |
| hr = IUnknown_QueryInterface(This->node_unk, &IID_IXMLDOMNode, (LPVOID*)&This->node); |
| if(FAILED(hr)) |
| { |
| IUnknown_Release(This->node_unk); |
| HeapFree( GetProcessHeap(), 0, This ); |
| return NULL; |
| } |
| /* The ref on This->node is actually looped back into this object, so release it */ |
| IXMLDOMNode_Release(This->node); |
| |
| return (IUnknown*) &This->lpVtbl; |
| } |
| |
| #endif |