msxml3: Implement schema_cache_get_namespaceURI().
[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     TRACE("(%p)->(%s)\n", This, debugstr_w(p));
391     return node_put_text( &This->node, p );
392 }
393
394 static HRESULT WINAPI entityref_get_specified(
395     IXMLDOMEntityReference *iface,
396     VARIANT_BOOL* pbool)
397 {
398     entityref *This = impl_from_IXMLDOMEntityReference( iface );
399     return IXMLDOMNode_get_specified( IXMLDOMNode_from_impl(&This->node), pbool );
400 }
401
402 static HRESULT WINAPI entityref_get_definition(
403     IXMLDOMEntityReference *iface,
404     IXMLDOMNode** domNode)
405 {
406     entityref *This = impl_from_IXMLDOMEntityReference( iface );
407     return IXMLDOMNode_get_definition( IXMLDOMNode_from_impl(&This->node), domNode );
408 }
409
410 static HRESULT WINAPI entityref_get_nodeTypedValue(
411     IXMLDOMEntityReference *iface,
412     VARIANT* var1)
413 {
414     entityref *This = impl_from_IXMLDOMEntityReference( iface );
415     return IXMLDOMNode_get_nodeTypedValue( IXMLDOMNode_from_impl(&This->node), var1 );
416 }
417
418 static HRESULT WINAPI entityref_put_nodeTypedValue(
419     IXMLDOMEntityReference *iface,
420     VARIANT var1)
421 {
422     entityref *This = impl_from_IXMLDOMEntityReference( iface );
423     return IXMLDOMNode_put_nodeTypedValue( IXMLDOMNode_from_impl(&This->node), var1 );
424 }
425
426 static HRESULT WINAPI entityref_get_dataType(
427     IXMLDOMEntityReference *iface,
428     VARIANT* typename)
429 {
430     entityref *This = impl_from_IXMLDOMEntityReference( iface );
431     FIXME("(%p)->(%p): should return a valid value\n", This, typename);
432     return return_null_var( typename );
433 }
434
435 static HRESULT WINAPI entityref_put_dataType(
436     IXMLDOMEntityReference *iface,
437     BSTR p)
438 {
439     entityref *This = impl_from_IXMLDOMEntityReference( iface );
440     return IXMLDOMNode_put_dataType( IXMLDOMNode_from_impl(&This->node), p );
441 }
442
443 static HRESULT WINAPI entityref_get_xml(
444     IXMLDOMEntityReference *iface,
445     BSTR* p)
446 {
447     entityref *This = impl_from_IXMLDOMEntityReference( iface );
448     return IXMLDOMNode_get_xml( IXMLDOMNode_from_impl(&This->node), p );
449 }
450
451 static HRESULT WINAPI entityref_transformNode(
452     IXMLDOMEntityReference *iface,
453     IXMLDOMNode* domNode, BSTR* p)
454 {
455     entityref *This = impl_from_IXMLDOMEntityReference( iface );
456     return IXMLDOMNode_transformNode( IXMLDOMNode_from_impl(&This->node), domNode, p );
457 }
458
459 static HRESULT WINAPI entityref_selectNodes(
460     IXMLDOMEntityReference *iface,
461     BSTR p, IXMLDOMNodeList** outList)
462 {
463     entityref *This = impl_from_IXMLDOMEntityReference( iface );
464     return IXMLDOMNode_selectNodes( IXMLDOMNode_from_impl(&This->node), p, outList );
465 }
466
467 static HRESULT WINAPI entityref_selectSingleNode(
468     IXMLDOMEntityReference *iface,
469     BSTR p, IXMLDOMNode** outNode)
470 {
471     entityref *This = impl_from_IXMLDOMEntityReference( iface );
472     return IXMLDOMNode_selectSingleNode( IXMLDOMNode_from_impl(&This->node), p, outNode );
473 }
474
475 static HRESULT WINAPI entityref_get_parsed(
476     IXMLDOMEntityReference *iface,
477     VARIANT_BOOL* pbool)
478 {
479     entityref *This = impl_from_IXMLDOMEntityReference( iface );
480     return IXMLDOMNode_get_parsed( IXMLDOMNode_from_impl(&This->node), pbool );
481 }
482
483 static HRESULT WINAPI entityref_get_namespaceURI(
484     IXMLDOMEntityReference *iface,
485     BSTR* p)
486 {
487     entityref *This = impl_from_IXMLDOMEntityReference( iface );
488     return IXMLDOMNode_get_namespaceURI( IXMLDOMNode_from_impl(&This->node), p );
489 }
490
491 static HRESULT WINAPI entityref_get_prefix(
492     IXMLDOMEntityReference *iface,
493     BSTR* p)
494 {
495     entityref *This = impl_from_IXMLDOMEntityReference( iface );
496     return IXMLDOMNode_get_prefix( IXMLDOMNode_from_impl(&This->node), p );
497 }
498
499 static HRESULT WINAPI entityref_get_baseName(
500     IXMLDOMEntityReference *iface,
501     BSTR* p)
502 {
503     entityref *This = impl_from_IXMLDOMEntityReference( iface );
504     return IXMLDOMNode_get_baseName( IXMLDOMNode_from_impl(&This->node), p );
505 }
506
507 static HRESULT WINAPI entityref_transformNodeToObject(
508     IXMLDOMEntityReference *iface,
509     IXMLDOMNode* domNode, VARIANT var1)
510 {
511     entityref *This = impl_from_IXMLDOMEntityReference( iface );
512     return IXMLDOMNode_transformNodeToObject( IXMLDOMNode_from_impl(&This->node), domNode, var1 );
513 }
514
515 static const struct IXMLDOMEntityReferenceVtbl entityref_vtbl =
516 {
517     entityref_QueryInterface,
518     entityref_AddRef,
519     entityref_Release,
520     entityref_GetTypeInfoCount,
521     entityref_GetTypeInfo,
522     entityref_GetIDsOfNames,
523     entityref_Invoke,
524     entityref_get_nodeName,
525     entityref_get_nodeValue,
526     entityref_put_nodeValue,
527     entityref_get_nodeType,
528     entityref_get_parentNode,
529     entityref_get_childNodes,
530     entityref_get_firstChild,
531     entityref_get_lastChild,
532     entityref_get_previousSibling,
533     entityref_get_nextSibling,
534     entityref_get_attributes,
535     entityref_insertBefore,
536     entityref_replaceChild,
537     entityref_removeChild,
538     entityref_appendChild,
539     entityref_hasChildNodes,
540     entityref_get_ownerDocument,
541     entityref_cloneNode,
542     entityref_get_nodeTypeString,
543     entityref_get_text,
544     entityref_put_text,
545     entityref_get_specified,
546     entityref_get_definition,
547     entityref_get_nodeTypedValue,
548     entityref_put_nodeTypedValue,
549     entityref_get_dataType,
550     entityref_put_dataType,
551     entityref_get_xml,
552     entityref_transformNode,
553     entityref_selectNodes,
554     entityref_selectSingleNode,
555     entityref_get_parsed,
556     entityref_get_namespaceURI,
557     entityref_get_prefix,
558     entityref_get_baseName,
559     entityref_transformNodeToObject,
560 };
561
562 IUnknown* create_doc_entity_ref( xmlNodePtr entity )
563 {
564     entityref *This;
565
566     This = heap_alloc( sizeof *This );
567     if ( !This )
568         return NULL;
569
570     This->lpVtbl = &entityref_vtbl;
571     This->ref = 1;
572
573     init_xmlnode(&This->node, entity, (IXMLDOMNode*)&This->lpVtbl, NULL);
574
575     return (IUnknown*) &This->lpVtbl;
576 }
577
578 #endif