makefiles: Rename the SRCDIR, TOPSRCDIR and TOPOBJDIR variables to follow autoconf...
[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     return IXMLDOMNode_replaceChild( IXMLDOMNode_from_impl(&This->node), newNode, oldNode, outOldNode );
324 }
325
326 static HRESULT WINAPI entityref_removeChild(
327     IXMLDOMEntityReference *iface,
328     IXMLDOMNode* domNode, IXMLDOMNode** oldNode)
329 {
330     entityref *This = impl_from_IXMLDOMEntityReference( iface );
331     return IXMLDOMNode_removeChild( IXMLDOMNode_from_impl(&This->node), domNode, oldNode );
332 }
333
334 static HRESULT WINAPI entityref_appendChild(
335     IXMLDOMEntityReference *iface,
336     IXMLDOMNode* newNode, IXMLDOMNode** outNewNode)
337 {
338     entityref *This = impl_from_IXMLDOMEntityReference( iface );
339     return IXMLDOMNode_appendChild( IXMLDOMNode_from_impl(&This->node), newNode, outNewNode );
340 }
341
342 static HRESULT WINAPI entityref_hasChildNodes(
343     IXMLDOMEntityReference *iface,
344     VARIANT_BOOL* pbool)
345 {
346     entityref *This = impl_from_IXMLDOMEntityReference( iface );
347     return IXMLDOMNode_hasChildNodes( IXMLDOMNode_from_impl(&This->node), pbool );
348 }
349
350 static HRESULT WINAPI entityref_get_ownerDocument(
351     IXMLDOMEntityReference *iface,
352     IXMLDOMDocument** domDocument)
353 {
354     entityref *This = impl_from_IXMLDOMEntityReference( iface );
355     return IXMLDOMNode_get_ownerDocument( IXMLDOMNode_from_impl(&This->node), domDocument );
356 }
357
358 static HRESULT WINAPI entityref_cloneNode(
359     IXMLDOMEntityReference *iface,
360     VARIANT_BOOL pbool, IXMLDOMNode** outNode)
361 {
362     entityref *This = impl_from_IXMLDOMEntityReference( iface );
363     return IXMLDOMNode_cloneNode( IXMLDOMNode_from_impl(&This->node), pbool, outNode );
364 }
365
366 static HRESULT WINAPI entityref_get_nodeTypeString(
367     IXMLDOMEntityReference *iface,
368     BSTR* p)
369 {
370     entityref *This = impl_from_IXMLDOMEntityReference( iface );
371     return IXMLDOMNode_get_nodeTypeString( IXMLDOMNode_from_impl(&This->node), p );
372 }
373
374 static HRESULT WINAPI entityref_get_text(
375     IXMLDOMEntityReference *iface,
376     BSTR* p)
377 {
378     entityref *This = impl_from_IXMLDOMEntityReference( iface );
379     return IXMLDOMNode_get_text( IXMLDOMNode_from_impl(&This->node), p );
380 }
381
382 static HRESULT WINAPI entityref_put_text(
383     IXMLDOMEntityReference *iface,
384     BSTR p)
385 {
386     entityref *This = impl_from_IXMLDOMEntityReference( iface );
387     return IXMLDOMNode_put_text( IXMLDOMNode_from_impl(&This->node), p );
388 }
389
390 static HRESULT WINAPI entityref_get_specified(
391     IXMLDOMEntityReference *iface,
392     VARIANT_BOOL* pbool)
393 {
394     entityref *This = impl_from_IXMLDOMEntityReference( iface );
395     return IXMLDOMNode_get_specified( IXMLDOMNode_from_impl(&This->node), pbool );
396 }
397
398 static HRESULT WINAPI entityref_get_definition(
399     IXMLDOMEntityReference *iface,
400     IXMLDOMNode** domNode)
401 {
402     entityref *This = impl_from_IXMLDOMEntityReference( iface );
403     return IXMLDOMNode_get_definition( IXMLDOMNode_from_impl(&This->node), domNode );
404 }
405
406 static HRESULT WINAPI entityref_get_nodeTypedValue(
407     IXMLDOMEntityReference *iface,
408     VARIANT* var1)
409 {
410     entityref *This = impl_from_IXMLDOMEntityReference( iface );
411     return IXMLDOMNode_get_nodeTypedValue( IXMLDOMNode_from_impl(&This->node), var1 );
412 }
413
414 static HRESULT WINAPI entityref_put_nodeTypedValue(
415     IXMLDOMEntityReference *iface,
416     VARIANT var1)
417 {
418     entityref *This = impl_from_IXMLDOMEntityReference( iface );
419     return IXMLDOMNode_put_nodeTypedValue( IXMLDOMNode_from_impl(&This->node), var1 );
420 }
421
422 static HRESULT WINAPI entityref_get_dataType(
423     IXMLDOMEntityReference *iface,
424     VARIANT* var1)
425 {
426     entityref *This = impl_from_IXMLDOMEntityReference( iface );
427     return IXMLDOMNode_get_dataType( IXMLDOMNode_from_impl(&This->node), var1 );
428 }
429
430 static HRESULT WINAPI entityref_put_dataType(
431     IXMLDOMEntityReference *iface,
432     BSTR p)
433 {
434     entityref *This = impl_from_IXMLDOMEntityReference( iface );
435     return IXMLDOMNode_put_dataType( IXMLDOMNode_from_impl(&This->node), p );
436 }
437
438 static HRESULT WINAPI entityref_get_xml(
439     IXMLDOMEntityReference *iface,
440     BSTR* p)
441 {
442     entityref *This = impl_from_IXMLDOMEntityReference( iface );
443     return IXMLDOMNode_get_xml( IXMLDOMNode_from_impl(&This->node), p );
444 }
445
446 static HRESULT WINAPI entityref_transformNode(
447     IXMLDOMEntityReference *iface,
448     IXMLDOMNode* domNode, BSTR* p)
449 {
450     entityref *This = impl_from_IXMLDOMEntityReference( iface );
451     return IXMLDOMNode_transformNode( IXMLDOMNode_from_impl(&This->node), domNode, p );
452 }
453
454 static HRESULT WINAPI entityref_selectNodes(
455     IXMLDOMEntityReference *iface,
456     BSTR p, IXMLDOMNodeList** outList)
457 {
458     entityref *This = impl_from_IXMLDOMEntityReference( iface );
459     return IXMLDOMNode_selectNodes( IXMLDOMNode_from_impl(&This->node), p, outList );
460 }
461
462 static HRESULT WINAPI entityref_selectSingleNode(
463     IXMLDOMEntityReference *iface,
464     BSTR p, IXMLDOMNode** outNode)
465 {
466     entityref *This = impl_from_IXMLDOMEntityReference( iface );
467     return IXMLDOMNode_selectSingleNode( IXMLDOMNode_from_impl(&This->node), p, outNode );
468 }
469
470 static HRESULT WINAPI entityref_get_parsed(
471     IXMLDOMEntityReference *iface,
472     VARIANT_BOOL* pbool)
473 {
474     entityref *This = impl_from_IXMLDOMEntityReference( iface );
475     return IXMLDOMNode_get_parsed( IXMLDOMNode_from_impl(&This->node), pbool );
476 }
477
478 static HRESULT WINAPI entityref_get_namespaceURI(
479     IXMLDOMEntityReference *iface,
480     BSTR* p)
481 {
482     entityref *This = impl_from_IXMLDOMEntityReference( iface );
483     return IXMLDOMNode_get_namespaceURI( IXMLDOMNode_from_impl(&This->node), p );
484 }
485
486 static HRESULT WINAPI entityref_get_prefix(
487     IXMLDOMEntityReference *iface,
488     BSTR* p)
489 {
490     entityref *This = impl_from_IXMLDOMEntityReference( iface );
491     return IXMLDOMNode_get_prefix( IXMLDOMNode_from_impl(&This->node), p );
492 }
493
494 static HRESULT WINAPI entityref_get_baseName(
495     IXMLDOMEntityReference *iface,
496     BSTR* p)
497 {
498     entityref *This = impl_from_IXMLDOMEntityReference( iface );
499     return IXMLDOMNode_get_baseName( IXMLDOMNode_from_impl(&This->node), p );
500 }
501
502 static HRESULT WINAPI entityref_transformNodeToObject(
503     IXMLDOMEntityReference *iface,
504     IXMLDOMNode* domNode, VARIANT var1)
505 {
506     entityref *This = impl_from_IXMLDOMEntityReference( iface );
507     return IXMLDOMNode_transformNodeToObject( IXMLDOMNode_from_impl(&This->node), domNode, var1 );
508 }
509
510 static const struct IXMLDOMEntityReferenceVtbl entityref_vtbl =
511 {
512     entityref_QueryInterface,
513     entityref_AddRef,
514     entityref_Release,
515     entityref_GetTypeInfoCount,
516     entityref_GetTypeInfo,
517     entityref_GetIDsOfNames,
518     entityref_Invoke,
519     entityref_get_nodeName,
520     entityref_get_nodeValue,
521     entityref_put_nodeValue,
522     entityref_get_nodeType,
523     entityref_get_parentNode,
524     entityref_get_childNodes,
525     entityref_get_firstChild,
526     entityref_get_lastChild,
527     entityref_get_previousSibling,
528     entityref_get_nextSibling,
529     entityref_get_attributes,
530     entityref_insertBefore,
531     entityref_replaceChild,
532     entityref_removeChild,
533     entityref_appendChild,
534     entityref_hasChildNodes,
535     entityref_get_ownerDocument,
536     entityref_cloneNode,
537     entityref_get_nodeTypeString,
538     entityref_get_text,
539     entityref_put_text,
540     entityref_get_specified,
541     entityref_get_definition,
542     entityref_get_nodeTypedValue,
543     entityref_put_nodeTypedValue,
544     entityref_get_dataType,
545     entityref_put_dataType,
546     entityref_get_xml,
547     entityref_transformNode,
548     entityref_selectNodes,
549     entityref_selectSingleNode,
550     entityref_get_parsed,
551     entityref_get_namespaceURI,
552     entityref_get_prefix,
553     entityref_get_baseName,
554     entityref_transformNodeToObject,
555 };
556
557 IUnknown* create_doc_entity_ref( xmlNodePtr entity )
558 {
559     entityref *This;
560
561     This = heap_alloc( sizeof *This );
562     if ( !This )
563         return NULL;
564
565     This->lpVtbl = &entityref_vtbl;
566     This->ref = 1;
567
568     init_xmlnode(&This->node, entity, (IXMLDOMNode*)&This->lpVtbl, NULL);
569
570     return (IUnknown*) &This->lpVtbl;
571 }
572
573 #endif