secur32: Implement RFC2104 (HMAC) with MD5 for NTLMv2.
[wine] / dlls / msxml3 / nodemap.c
1 /*
2  *    Node map implementation
3  *
4  * Copyright 2005 Mike McCormack
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 #include "config.h"
22
23 #define COBJMACROS
24
25 #include <stdarg.h>
26 #include "windef.h"
27 #include "winbase.h"
28 #include "winuser.h"
29 #include "winnls.h"
30 #include "ole2.h"
31 #include "msxml2.h"
32
33 #include "msxml_private.h"
34
35 #include "wine/debug.h"
36
37 WINE_DEFAULT_DEBUG_CHANNEL(msxml);
38
39 #ifdef HAVE_LIBXML2
40
41 typedef struct _xmlnodemap
42 {
43     const struct IXMLDOMNamedNodeMapVtbl *lpVtbl;
44     const struct ISupportErrorInfoVtbl *lpSEIVtbl;
45     LONG ref;
46     IXMLDOMNode *node;
47 } xmlnodemap;
48
49 static inline xmlnodemap *impl_from_IXMLDOMNamedNodeMap( IXMLDOMNamedNodeMap *iface )
50 {
51     return (xmlnodemap *)((char*)iface - FIELD_OFFSET(xmlnodemap, lpVtbl));
52 }
53
54 static inline xmlnodemap *impl_from_ISupportErrorInfo( ISupportErrorInfo *iface )
55 {
56     return (xmlnodemap *)((char*)iface - FIELD_OFFSET(xmlnodemap, lpSEIVtbl));
57 }
58
59 static HRESULT WINAPI xmlnodemap_QueryInterface(
60     IXMLDOMNamedNodeMap *iface,
61     REFIID riid, void** ppvObject )
62 {
63     xmlnodemap *This = impl_from_IXMLDOMNamedNodeMap( iface );
64     TRACE("%p %s %p\n", iface, debugstr_guid(riid), ppvObject);
65
66     if( IsEqualGUID( riid, &IID_IUnknown ) ||
67         IsEqualGUID( riid, &IID_IDispatch ) ||
68         IsEqualGUID( riid, &IID_IXMLDOMNamedNodeMap ) )
69     {
70         *ppvObject = iface;
71     }
72     else if( IsEqualGUID( riid, &IID_ISupportErrorInfo ))
73     {
74         *ppvObject = &This->lpSEIVtbl;
75     }
76     else
77     {
78         FIXME("interface %s not implemented\n", debugstr_guid(riid));
79         return E_NOINTERFACE;
80     }
81
82     IXMLDOMElement_AddRef( iface );
83
84     return S_OK;
85 }
86
87 static ULONG WINAPI xmlnodemap_AddRef(
88     IXMLDOMNamedNodeMap *iface )
89 {
90     xmlnodemap *This = impl_from_IXMLDOMNamedNodeMap( iface );
91     return InterlockedIncrement( &This->ref );
92 }
93
94 static ULONG WINAPI xmlnodemap_Release(
95     IXMLDOMNamedNodeMap *iface )
96 {
97     xmlnodemap *This = impl_from_IXMLDOMNamedNodeMap( iface );
98     ULONG ref;
99
100     ref = InterlockedDecrement( &This->ref );
101     if ( ref == 0 )
102     {
103         IXMLDOMNode_Release( This->node );
104         HeapFree( GetProcessHeap(), 0, This );
105     }
106
107     return ref;
108 }
109
110 static HRESULT WINAPI xmlnodemap_GetTypeInfoCount(
111     IXMLDOMNamedNodeMap *iface,
112     UINT* pctinfo )
113 {
114     FIXME("\n");
115     return E_NOTIMPL;
116 }
117
118 static HRESULT WINAPI xmlnodemap_GetTypeInfo(
119     IXMLDOMNamedNodeMap *iface,
120     UINT iTInfo, LCID lcid,
121     ITypeInfo** ppTInfo )
122 {
123     FIXME("\n");
124     return E_NOTIMPL;
125 }
126
127 static HRESULT WINAPI xmlnodemap_GetIDsOfNames(
128     IXMLDOMNamedNodeMap *iface,
129     REFIID riid, LPOLESTR* rgszNames,
130     UINT cNames, LCID lcid, DISPID* rgDispId )
131 {
132     FIXME("\n");
133     return E_NOTIMPL;
134 }
135
136 static HRESULT WINAPI xmlnodemap_Invoke(
137     IXMLDOMNamedNodeMap *iface,
138     DISPID dispIdMember, REFIID riid, LCID lcid,
139     WORD wFlags, DISPPARAMS* pDispParams, VARIANT* pVarResult,
140     EXCEPINFO* pExcepInfo, UINT* puArgErr )
141 {
142     FIXME("\n");
143     return E_NOTIMPL;
144 }
145
146 xmlChar *xmlChar_from_wchar( LPWSTR str )
147 {
148     DWORD len;
149     xmlChar *xmlstr;
150
151     len = WideCharToMultiByte( CP_UTF8, 0, str, -1, NULL, 0, NULL, NULL );
152     xmlstr = (xmlChar*) HeapAlloc( GetProcessHeap(), 0, len );
153     if ( xmlstr )
154         WideCharToMultiByte( CP_UTF8, 0, str, -1, (LPSTR) xmlstr, len, NULL, NULL );
155     return xmlstr;
156 }
157
158 static HRESULT WINAPI xmlnodemap_getNamedItem(
159     IXMLDOMNamedNodeMap *iface,
160     BSTR name,
161     IXMLDOMNode** namedItem)
162 {
163     xmlnodemap *This = impl_from_IXMLDOMNamedNodeMap( iface );
164     xmlChar *element_name;
165     xmlAttrPtr attr;
166     xmlNodePtr node;
167
168     TRACE("%p %s %p\n", This, debugstr_w(name), namedItem );
169
170     if ( !namedItem )
171         return E_INVALIDARG;
172
173     node = xmlNodePtr_from_domnode( This->node, 0 );
174     if ( !node )
175         return E_FAIL;
176
177     element_name = xmlChar_from_wchar( name );
178     attr = xmlHasNsProp( node, element_name, NULL );
179     HeapFree( GetProcessHeap(), 0, element_name );
180
181     if ( !attr )
182     {
183         *namedItem = NULL;
184         return S_FALSE;
185     }
186
187     *namedItem = create_node( (xmlNodePtr) attr );
188
189     return S_OK;
190 }
191
192 static HRESULT WINAPI xmlnodemap_setNamedItem(
193     IXMLDOMNamedNodeMap *iface,
194     IXMLDOMNode* newItem,
195     IXMLDOMNode** namedItem)
196 {
197     FIXME("\n");
198     return E_NOTIMPL;
199 }
200
201 static HRESULT WINAPI xmlnodemap_removeNamedItem(
202     IXMLDOMNamedNodeMap *iface,
203     BSTR name,
204     IXMLDOMNode** namedItem)
205 {
206     FIXME("\n");
207     return E_NOTIMPL;
208 }
209
210 static HRESULT WINAPI xmlnodemap_get_item(
211     IXMLDOMNamedNodeMap *iface,
212     long index,
213     IXMLDOMNode** listItem)
214 {
215     xmlnodemap *This = impl_from_IXMLDOMNamedNodeMap( iface );
216     xmlNodePtr node;
217     xmlAttrPtr curr;
218     long attrIndex;
219
220     TRACE("%p %ld\n", This, index);
221
222     *listItem = NULL;
223
224     if (index < 0)
225         return S_FALSE;
226
227     node = xmlNodePtr_from_domnode( This->node, 0 );
228     curr = node->properties;
229
230     for (attrIndex = 0; attrIndex < index; attrIndex++) {
231         if (curr->next == NULL)
232             return S_FALSE;
233         else
234             curr = curr->next;
235     }
236     
237     *listItem = create_node( (xmlNodePtr) curr );
238
239     return S_OK;
240 }
241
242 static HRESULT WINAPI xmlnodemap_get_length(
243     IXMLDOMNamedNodeMap *iface,
244     long* listLength)
245 {
246     xmlNodePtr node;
247     xmlAttrPtr first;
248     xmlAttrPtr curr;
249     long attrCount;
250
251     xmlnodemap *This = impl_from_IXMLDOMNamedNodeMap( iface );
252
253     TRACE("%p\n", This);
254
255     node = xmlNodePtr_from_domnode( This->node, 0 );
256     if ( !node )
257         return E_FAIL;
258
259     first = node->properties;
260     if (first == NULL) {
261         *listLength = 0;
262         return S_OK;
263     }
264
265     curr = first;
266     attrCount = 1;
267     while (curr->next != NULL) {
268         attrCount++;
269         curr = curr->next;
270     }
271     *listLength = attrCount;
272  
273     return S_OK;
274 }
275
276 static HRESULT WINAPI xmlnodemap_getQualifiedItem(
277     IXMLDOMNamedNodeMap *iface,
278     BSTR baseName,
279     BSTR namespaceURI,
280     IXMLDOMNode** qualifiedItem)
281 {
282     FIXME("\n");
283     return E_NOTIMPL;
284 }
285
286 static HRESULT WINAPI xmlnodemap_removeQualifiedItem(
287     IXMLDOMNamedNodeMap *iface,
288     BSTR baseName,
289     BSTR namespaceURI,
290     IXMLDOMNode** qualifiedItem)
291 {
292     FIXME("\n");
293     return E_NOTIMPL;
294 }
295
296 static HRESULT WINAPI xmlnodemap_nextNode(
297     IXMLDOMNamedNodeMap *iface,
298     IXMLDOMNode** nextItem)
299 {
300     FIXME("\n");
301     return E_NOTIMPL;
302 }
303
304 static HRESULT WINAPI xmlnodemap_reset(
305     IXMLDOMNamedNodeMap *iface )
306 {
307     FIXME("\n");
308     return E_NOTIMPL;
309 }
310
311 static HRESULT WINAPI xmlnodemap__newEnum(
312     IXMLDOMNamedNodeMap *iface,
313     IUnknown** ppUnk)
314 {
315     FIXME("\n");
316     return E_NOTIMPL;
317 }
318
319 static const struct IXMLDOMNamedNodeMapVtbl xmlnodemap_vtbl =
320 {
321     xmlnodemap_QueryInterface,
322     xmlnodemap_AddRef,
323     xmlnodemap_Release,
324     xmlnodemap_GetTypeInfoCount,
325     xmlnodemap_GetTypeInfo,
326     xmlnodemap_GetIDsOfNames,
327     xmlnodemap_Invoke,
328     xmlnodemap_getNamedItem,
329     xmlnodemap_setNamedItem,
330     xmlnodemap_removeNamedItem,
331     xmlnodemap_get_item,
332     xmlnodemap_get_length,
333     xmlnodemap_getQualifiedItem,
334     xmlnodemap_removeQualifiedItem,
335     xmlnodemap_nextNode,
336     xmlnodemap_reset,
337     xmlnodemap__newEnum,
338 };
339
340 static HRESULT WINAPI support_error_QueryInterface(
341     ISupportErrorInfo *iface,
342     REFIID riid, void** ppvObject )
343 {
344     xmlnodemap *This = impl_from_ISupportErrorInfo( iface );
345     TRACE("%p %s %p\n", iface, debugstr_guid(riid), ppvObject);
346
347     return IXMLDOMNamedNodeMap_QueryInterface((IXMLDOMNamedNodeMap*)&This->lpVtbl, riid, ppvObject);
348 }
349
350 static ULONG WINAPI support_error_AddRef(
351     ISupportErrorInfo *iface )
352 {
353     xmlnodemap *This = impl_from_ISupportErrorInfo( iface );
354     return IXMLDOMNamedNodeMap_AddRef((IXMLDOMNamedNodeMap*)&This->lpVtbl);
355 }
356
357 static ULONG WINAPI support_error_Release(
358     ISupportErrorInfo *iface )
359 {
360     xmlnodemap *This = impl_from_ISupportErrorInfo( iface );
361     return IXMLDOMNamedNodeMap_Release((IXMLDOMNamedNodeMap*)&This->lpVtbl);
362 }
363
364 static HRESULT WINAPI support_error_InterfaceSupportsErrorInfo(
365     ISupportErrorInfo *iface,
366     REFIID riid )
367 {
368     FIXME("(%p)->(%s)\n", iface, debugstr_guid(riid));
369     return S_FALSE;
370 }
371
372 static const struct ISupportErrorInfoVtbl support_error_vtbl =
373 {
374     support_error_QueryInterface,
375     support_error_AddRef,
376     support_error_Release,
377     support_error_InterfaceSupportsErrorInfo
378 };
379
380 IXMLDOMNamedNodeMap *create_nodemap( IXMLDOMNode *node )
381 {
382     xmlnodemap *nodemap;
383
384     nodemap = HeapAlloc( GetProcessHeap(), 0, sizeof *nodemap );
385     if ( !nodemap )
386         return NULL;
387
388     nodemap->lpVtbl = &xmlnodemap_vtbl;
389     nodemap->lpSEIVtbl = &support_error_vtbl;
390     nodemap->node = node;
391     nodemap->ref = 1;
392
393     IXMLDOMNode_AddRef( node );
394     /* Since we AddRef a node here, we don't need to call xmldoc_add_ref() */
395
396     return (IXMLDOMNamedNodeMap*) &nodemap->lpVtbl;
397 }
398
399 #endif