msxml3: Get rid of ::get_dataType() forward to IXMLDOMNode interface.
[wine] / dlls / msxml3 / entityref.c
1 /*
2  *    DOM Entity Reference implementation
3  *
4  * Copyright 2007 Alistair Leslie-Hughes
5  *
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.
10  *
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.
15  *
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
19  */
20
21 #define COBJMACROS
22
23 #include "config.h"
24
25 #include <stdarg.h>
26 #include "windef.h"
27 #include "winbase.h"
28 #include "winuser.h"
29 #include "ole2.h"
30 #include "msxml6.h"
31
32 #include "msxml_private.h"
33
34 #include "wine/debug.h"
35
36 WINE_DEFAULT_DEBUG_CHANNEL(msxml);
37
38 #ifdef HAVE_LIBXML2
39
40 typedef struct _entityref
41 {
42     xmlnode node;
43     const struct IXMLDOMEntityReferenceVtbl *lpVtbl;
44     LONG ref;
45 } entityref;
46
47 static inline entityref *impl_from_IXMLDOMEntityReference( IXMLDOMEntityReference *iface )
48 {
49     return (entityref *)((char*)iface - FIELD_OFFSET(entityref, lpVtbl));
50 }
51
52 static HRESULT WINAPI entityref_QueryInterface(
53     IXMLDOMEntityReference *iface,
54     REFIID riid,
55     void** ppvObject )
56 {
57     entityref *This = impl_from_IXMLDOMEntityReference( iface );
58     TRACE("(%p)->(%s %p)\n", This, debugstr_guid(riid), ppvObject);
59
60     if ( IsEqualGUID( riid, &IID_IXMLDOMEntityReference ) ||
61          IsEqualGUID( riid, &IID_IXMLDOMNode ) ||
62          IsEqualGUID( riid, &IID_IDispatch ) ||
63          IsEqualGUID( riid, &IID_IUnknown ) )
64     {
65         *ppvObject = iface;
66     }
67     else if(node_query_interface(&This->node, riid, ppvObject))
68     {
69         return *ppvObject ? S_OK : E_NOINTERFACE;
70     }
71     else
72     {
73         FIXME("Unsupported interface %s\n", debugstr_guid(riid));
74         return E_NOINTERFACE;
75     }
76
77     IUnknown_AddRef((IUnknown*)*ppvObject);
78     return S_OK;
79 }
80
81 static ULONG WINAPI entityref_AddRef(
82     IXMLDOMEntityReference *iface )
83 {
84     entityref *This = impl_from_IXMLDOMEntityReference( iface );
85     return InterlockedIncrement( &This->ref );
86 }
87
88 static ULONG WINAPI entityref_Release(
89     IXMLDOMEntityReference *iface )
90 {
91     entityref *This = impl_from_IXMLDOMEntityReference( iface );
92     ULONG ref;
93
94     ref = InterlockedDecrement( &This->ref );
95     if ( ref == 0 )
96     {
97         destroy_xmlnode(&This->node);
98         heap_free( This );
99     }
100
101     return ref;
102 }
103
104 static HRESULT WINAPI entityref_GetTypeInfoCount(
105     IXMLDOMEntityReference *iface,
106     UINT* pctinfo )
107 {
108     entityref *This = impl_from_IXMLDOMEntityReference( iface );
109     TRACE("(%p)->(%p)\n", This, pctinfo);
110
111     *pctinfo = 1;
112
113     return S_OK;
114 }
115
116 static HRESULT WINAPI entityref_GetTypeInfo(
117     IXMLDOMEntityReference *iface,
118     UINT iTInfo, LCID lcid,
119     ITypeInfo** ppTInfo )
120 {
121     entityref *This = impl_from_IXMLDOMEntityReference( iface );
122     HRESULT hr;
123
124     TRACE("(%p)->(%u %u %p)\n", This, iTInfo, lcid, ppTInfo);
125
126     hr = get_typeinfo(IXMLDOMEntityReference_tid, ppTInfo);
127
128     return hr;
129 }
130
131 static HRESULT WINAPI entityref_GetIDsOfNames(
132     IXMLDOMEntityReference *iface,
133     REFIID riid, LPOLESTR* rgszNames,
134     UINT cNames, LCID lcid, DISPID* rgDispId )
135 {
136     entityref *This = impl_from_IXMLDOMEntityReference( iface );
137     ITypeInfo *typeinfo;
138     HRESULT hr;
139
140     TRACE("(%p)->(%s %p %u %u %p)\n", This, debugstr_guid(riid), rgszNames, cNames,
141           lcid, rgDispId);
142
143     if(!rgszNames || cNames == 0 || !rgDispId)
144         return E_INVALIDARG;
145
146     hr = get_typeinfo(IXMLDOMEntityReference_tid, &typeinfo);
147     if(SUCCEEDED(hr))
148     {
149         hr = ITypeInfo_GetIDsOfNames(typeinfo, rgszNames, cNames, rgDispId);
150         ITypeInfo_Release(typeinfo);
151     }
152
153     return hr;
154 }
155
156 static HRESULT WINAPI entityref_Invoke(
157     IXMLDOMEntityReference *iface,
158     DISPID dispIdMember, REFIID riid, LCID lcid,
159     WORD wFlags, DISPPARAMS* pDispParams, VARIANT* pVarResult,
160     EXCEPINFO* pExcepInfo, UINT* puArgErr )
161 {
162     entityref *This = impl_from_IXMLDOMEntityReference( iface );
163     ITypeInfo *typeinfo;
164     HRESULT hr;
165
166     TRACE("(%p)->(%d %s %d %d %p %p %p %p)\n", This, dispIdMember, debugstr_guid(riid),
167           lcid, wFlags, pDispParams, pVarResult, pExcepInfo, puArgErr);
168
169     hr = get_typeinfo(IXMLDOMEntityReference_tid, &typeinfo);
170     if(SUCCEEDED(hr))
171     {
172         hr = ITypeInfo_Invoke(typeinfo, &(This->lpVtbl), dispIdMember, wFlags, pDispParams,
173                 pVarResult, pExcepInfo, puArgErr);
174         ITypeInfo_Release(typeinfo);
175     }
176
177     return hr;
178 }
179
180 static HRESULT WINAPI entityref_get_nodeName(
181     IXMLDOMEntityReference *iface,
182     BSTR* p )
183 {
184     entityref *This = impl_from_IXMLDOMEntityReference( iface );
185
186     FIXME("(%p)->(%p)\n", This, p);
187
188     return node_get_nodeName(&This->node, p);
189 }
190
191 static HRESULT WINAPI entityref_get_nodeValue(
192     IXMLDOMEntityReference *iface,
193     VARIANT* value)
194 {
195     entityref *This = impl_from_IXMLDOMEntityReference( iface );
196
197     FIXME("(%p)->(%p)\n", This, value);
198
199     if(!value)
200         return E_INVALIDARG;
201
202     V_VT(value) = VT_NULL;
203     return S_FALSE;
204 }
205
206 static HRESULT WINAPI entityref_put_nodeValue(
207     IXMLDOMEntityReference *iface,
208     VARIANT value)
209 {
210     entityref *This = impl_from_IXMLDOMEntityReference( iface );
211     FIXME("(%p)->(v%d)\n", This, V_VT(&value));
212     return E_FAIL;
213 }
214
215 static HRESULT WINAPI entityref_get_nodeType(
216     IXMLDOMEntityReference *iface,
217     DOMNodeType* domNodeType )
218 {
219     entityref *This = impl_from_IXMLDOMEntityReference( iface );
220
221     TRACE("(%p)->(%p)\n", This, domNodeType);
222
223     *domNodeType = NODE_ENTITY_REFERENCE;
224     return S_OK;
225 }
226
227 static HRESULT WINAPI entityref_get_parentNode(
228     IXMLDOMEntityReference *iface,
229     IXMLDOMNode** parent )
230 {
231     entityref *This = impl_from_IXMLDOMEntityReference( iface );
232
233     TRACE("(%p)->(%p)\n", This, parent);
234
235     return node_get_parent(&This->node, parent);
236 }
237
238 static HRESULT WINAPI entityref_get_childNodes(
239     IXMLDOMEntityReference *iface,
240     IXMLDOMNodeList** outList)
241 {
242     entityref *This = impl_from_IXMLDOMEntityReference( iface );
243
244     TRACE("(%p)->(%p)\n", This, outList);
245
246     return node_get_child_nodes(&This->node, outList);
247 }
248
249 static HRESULT WINAPI entityref_get_firstChild(
250     IXMLDOMEntityReference *iface,
251     IXMLDOMNode** domNode)
252 {
253     entityref *This = impl_from_IXMLDOMEntityReference( iface );
254
255     TRACE("(%p)->(%p)\n", This, domNode);
256
257     return node_get_first_child(&This->node, domNode);
258 }
259
260 static HRESULT WINAPI entityref_get_lastChild(
261     IXMLDOMEntityReference *iface,
262     IXMLDOMNode** domNode)
263 {
264     entityref *This = impl_from_IXMLDOMEntityReference( iface );
265
266     TRACE("(%p)->(%p)\n", This, domNode);
267
268     return node_get_last_child(&This->node, domNode);
269 }
270
271 static HRESULT WINAPI entityref_get_previousSibling(
272     IXMLDOMEntityReference *iface,
273     IXMLDOMNode** domNode)
274 {
275     entityref *This = impl_from_IXMLDOMEntityReference( iface );
276
277     TRACE("(%p)->(%p)\n", This, domNode);
278
279     return node_get_previous_sibling(&This->node, domNode);
280 }
281
282 static HRESULT WINAPI entityref_get_nextSibling(
283     IXMLDOMEntityReference *iface,
284     IXMLDOMNode** domNode)
285 {
286     entityref *This = impl_from_IXMLDOMEntityReference( iface );
287
288     TRACE("(%p)->(%p)\n", This, domNode);
289
290     return node_get_next_sibling(&This->node, domNode);
291 }
292
293 static HRESULT WINAPI entityref_get_attributes(
294     IXMLDOMEntityReference *iface,
295     IXMLDOMNamedNodeMap** attributeMap)
296 {
297     entityref *This = impl_from_IXMLDOMEntityReference( iface );
298
299     TRACE("(%p)->(%p)\n", This, attributeMap);
300
301     return return_null_ptr((void**)attributeMap);
302 }
303
304 static HRESULT WINAPI entityref_insertBefore(
305     IXMLDOMEntityReference *iface,
306     IXMLDOMNode* newNode, VARIANT refChild,
307     IXMLDOMNode** outOldNode)
308 {
309     entityref *This = impl_from_IXMLDOMEntityReference( iface );
310
311     FIXME("(%p)->(%p x%d %p) needs test\n", This, newNode, V_VT(&refChild), outOldNode);
312
313     return node_insert_before(&This->node, newNode, &refChild, outOldNode);
314 }
315
316 static HRESULT WINAPI entityref_replaceChild(
317     IXMLDOMEntityReference *iface,
318     IXMLDOMNode* newNode,
319     IXMLDOMNode* oldNode,
320     IXMLDOMNode** outOldNode)
321 {
322     entityref *This = impl_from_IXMLDOMEntityReference( iface );
323
324     FIXME("(%p)->(%p %p %p) needs test\n", This, newNode, oldNode, outOldNode);
325
326     return node_replace_child(&This->node, newNode, oldNode, outOldNode);
327 }
328
329 static HRESULT WINAPI entityref_removeChild(
330     IXMLDOMEntityReference *iface,
331     IXMLDOMNode* domNode, IXMLDOMNode** oldNode)
332 {
333     entityref *This = impl_from_IXMLDOMEntityReference( iface );
334     return IXMLDOMNode_removeChild( IXMLDOMNode_from_impl(&This->node), domNode, oldNode );
335 }
336
337 static HRESULT WINAPI entityref_appendChild(
338     IXMLDOMEntityReference *iface,
339     IXMLDOMNode* newNode, IXMLDOMNode** outNewNode)
340 {
341     entityref *This = impl_from_IXMLDOMEntityReference( iface );
342     return IXMLDOMNode_appendChild( IXMLDOMNode_from_impl(&This->node), newNode, outNewNode );
343 }
344
345 static HRESULT WINAPI entityref_hasChildNodes(
346     IXMLDOMEntityReference *iface,
347     VARIANT_BOOL* pbool)
348 {
349     entityref *This = impl_from_IXMLDOMEntityReference( iface );
350     return IXMLDOMNode_hasChildNodes( IXMLDOMNode_from_impl(&This->node), pbool );
351 }
352
353 static HRESULT WINAPI entityref_get_ownerDocument(
354     IXMLDOMEntityReference *iface,
355     IXMLDOMDocument** domDocument)
356 {
357     entityref *This = impl_from_IXMLDOMEntityReference( iface );
358     return IXMLDOMNode_get_ownerDocument( IXMLDOMNode_from_impl(&This->node), domDocument );
359 }
360
361 static HRESULT WINAPI entityref_cloneNode(
362     IXMLDOMEntityReference *iface,
363     VARIANT_BOOL pbool, IXMLDOMNode** outNode)
364 {
365     entityref *This = impl_from_IXMLDOMEntityReference( iface );
366     return IXMLDOMNode_cloneNode( IXMLDOMNode_from_impl(&This->node), pbool, outNode );
367 }
368
369 static HRESULT WINAPI entityref_get_nodeTypeString(
370     IXMLDOMEntityReference *iface,
371     BSTR* p)
372 {
373     entityref *This = impl_from_IXMLDOMEntityReference( iface );
374     return IXMLDOMNode_get_nodeTypeString( IXMLDOMNode_from_impl(&This->node), p );
375 }
376
377 static HRESULT WINAPI entityref_get_text(
378     IXMLDOMEntityReference *iface,
379     BSTR* p)
380 {
381     entityref *This = impl_from_IXMLDOMEntityReference( iface );
382     return IXMLDOMNode_get_text( IXMLDOMNode_from_impl(&This->node), p );
383 }
384
385 static HRESULT WINAPI entityref_put_text(
386     IXMLDOMEntityReference *iface,
387     BSTR p)
388 {
389     entityref *This = impl_from_IXMLDOMEntityReference( iface );
390     return IXMLDOMNode_put_text( IXMLDOMNode_from_impl(&This->node), p );
391 }
392
393 static HRESULT WINAPI entityref_get_specified(
394     IXMLDOMEntityReference *iface,
395     VARIANT_BOOL* pbool)
396 {
397     entityref *This = impl_from_IXMLDOMEntityReference( iface );
398     return IXMLDOMNode_get_specified( IXMLDOMNode_from_impl(&This->node), pbool );
399 }
400
401 static HRESULT WINAPI entityref_get_definition(
402     IXMLDOMEntityReference *iface,
403     IXMLDOMNode** domNode)
404 {
405     entityref *This = impl_from_IXMLDOMEntityReference( iface );
406     return IXMLDOMNode_get_definition( IXMLDOMNode_from_impl(&This->node), domNode );
407 }
408
409 static HRESULT WINAPI entityref_get_nodeTypedValue(
410     IXMLDOMEntityReference *iface,
411     VARIANT* var1)
412 {
413     entityref *This = impl_from_IXMLDOMEntityReference( iface );
414     return IXMLDOMNode_get_nodeTypedValue( IXMLDOMNode_from_impl(&This->node), var1 );
415 }
416
417 static HRESULT WINAPI entityref_put_nodeTypedValue(
418     IXMLDOMEntityReference *iface,
419     VARIANT var1)
420 {
421     entityref *This = impl_from_IXMLDOMEntityReference( iface );
422     return IXMLDOMNode_put_nodeTypedValue( IXMLDOMNode_from_impl(&This->node), var1 );
423 }
424
425 static HRESULT WINAPI entityref_get_dataType(
426     IXMLDOMEntityReference *iface,
427     VARIANT* typename)
428 {
429     entityref *This = impl_from_IXMLDOMEntityReference( iface );
430     FIXME("(%p)->(%p): should return a valid value\n", This, typename);
431     return return_null_var( typename );
432 }
433
434 static HRESULT WINAPI entityref_put_dataType(
435     IXMLDOMEntityReference *iface,
436     BSTR p)
437 {
438     entityref *This = impl_from_IXMLDOMEntityReference( iface );
439     return IXMLDOMNode_put_dataType( IXMLDOMNode_from_impl(&This->node), p );
440 }
441
442 static HRESULT WINAPI entityref_get_xml(
443     IXMLDOMEntityReference *iface,
444     BSTR* p)
445 {
446     entityref *This = impl_from_IXMLDOMEntityReference( iface );
447     return IXMLDOMNode_get_xml( IXMLDOMNode_from_impl(&This->node), p );
448 }
449
450 static HRESULT WINAPI entityref_transformNode(
451     IXMLDOMEntityReference *iface,
452     IXMLDOMNode* domNode, BSTR* p)
453 {
454     entityref *This = impl_from_IXMLDOMEntityReference( iface );
455     return IXMLDOMNode_transformNode( IXMLDOMNode_from_impl(&This->node), domNode, p );
456 }
457
458 static HRESULT WINAPI entityref_selectNodes(
459     IXMLDOMEntityReference *iface,
460     BSTR p, IXMLDOMNodeList** outList)
461 {
462     entityref *This = impl_from_IXMLDOMEntityReference( iface );
463     return IXMLDOMNode_selectNodes( IXMLDOMNode_from_impl(&This->node), p, outList );
464 }
465
466 static HRESULT WINAPI entityref_selectSingleNode(
467     IXMLDOMEntityReference *iface,
468     BSTR p, IXMLDOMNode** outNode)
469 {
470     entityref *This = impl_from_IXMLDOMEntityReference( iface );
471     return IXMLDOMNode_selectSingleNode( IXMLDOMNode_from_impl(&This->node), p, outNode );
472 }
473
474 static HRESULT WINAPI entityref_get_parsed(
475     IXMLDOMEntityReference *iface,
476     VARIANT_BOOL* pbool)
477 {
478     entityref *This = impl_from_IXMLDOMEntityReference( iface );
479     return IXMLDOMNode_get_parsed( IXMLDOMNode_from_impl(&This->node), pbool );
480 }
481
482 static HRESULT WINAPI entityref_get_namespaceURI(
483     IXMLDOMEntityReference *iface,
484     BSTR* p)
485 {
486     entityref *This = impl_from_IXMLDOMEntityReference( iface );
487     return IXMLDOMNode_get_namespaceURI( IXMLDOMNode_from_impl(&This->node), p );
488 }
489
490 static HRESULT WINAPI entityref_get_prefix(
491     IXMLDOMEntityReference *iface,
492     BSTR* p)
493 {
494     entityref *This = impl_from_IXMLDOMEntityReference( iface );
495     return IXMLDOMNode_get_prefix( IXMLDOMNode_from_impl(&This->node), p );
496 }
497
498 static HRESULT WINAPI entityref_get_baseName(
499     IXMLDOMEntityReference *iface,
500     BSTR* p)
501 {
502     entityref *This = impl_from_IXMLDOMEntityReference( iface );
503     return IXMLDOMNode_get_baseName( IXMLDOMNode_from_impl(&This->node), p );
504 }
505
506 static HRESULT WINAPI entityref_transformNodeToObject(
507     IXMLDOMEntityReference *iface,
508     IXMLDOMNode* domNode, VARIANT var1)
509 {
510     entityref *This = impl_from_IXMLDOMEntityReference( iface );
511     return IXMLDOMNode_transformNodeToObject( IXMLDOMNode_from_impl(&This->node), domNode, var1 );
512 }
513
514 static const struct IXMLDOMEntityReferenceVtbl entityref_vtbl =
515 {
516     entityref_QueryInterface,
517     entityref_AddRef,
518     entityref_Release,
519     entityref_GetTypeInfoCount,
520     entityref_GetTypeInfo,
521     entityref_GetIDsOfNames,
522     entityref_Invoke,
523     entityref_get_nodeName,
524     entityref_get_nodeValue,
525     entityref_put_nodeValue,
526     entityref_get_nodeType,
527     entityref_get_parentNode,
528     entityref_get_childNodes,
529     entityref_get_firstChild,
530     entityref_get_lastChild,
531     entityref_get_previousSibling,
532     entityref_get_nextSibling,
533     entityref_get_attributes,
534     entityref_insertBefore,
535     entityref_replaceChild,
536     entityref_removeChild,
537     entityref_appendChild,
538     entityref_hasChildNodes,
539     entityref_get_ownerDocument,
540     entityref_cloneNode,
541     entityref_get_nodeTypeString,
542     entityref_get_text,
543     entityref_put_text,
544     entityref_get_specified,
545     entityref_get_definition,
546     entityref_get_nodeTypedValue,
547     entityref_put_nodeTypedValue,
548     entityref_get_dataType,
549     entityref_put_dataType,
550     entityref_get_xml,
551     entityref_transformNode,
552     entityref_selectNodes,
553     entityref_selectSingleNode,
554     entityref_get_parsed,
555     entityref_get_namespaceURI,
556     entityref_get_prefix,
557     entityref_get_baseName,
558     entityref_transformNodeToObject,
559 };
560
561 IUnknown* create_doc_entity_ref( xmlNodePtr entity )
562 {
563     entityref *This;
564
565     This = heap_alloc( sizeof *This );
566     if ( !This )
567         return NULL;
568
569     This->lpVtbl = &entityref_vtbl;
570     This->ref = 1;
571
572     init_xmlnode(&This->node, entity, (IXMLDOMNode*)&This->lpVtbl, NULL);
573
574     return (IUnknown*) &This->lpVtbl;
575 }
576
577 #endif