2 * SAX Reader implementation
4 * Copyright 2008 Alistair Leslie-Hughes
5 * Copyright 2008 Piotr Caban
7 * This library is free software; you can redistribute it and/or
8 * modify it under the terms of the GNU Lesser General Public
9 * License as published by the Free Software Foundation; either
10 * version 2.1 of the License, or (at your option) any later version.
12 * This library is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 * Lesser General Public License for more details.
17 * You should have received a copy of the GNU Lesser General Public
18 * License along with this library; if not, write to the Free Software
19 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
27 # include <libxml/parser.h>
28 # include <libxml/xmlerror.h>
29 # include <libxml/SAX2.h>
30 # include <libxml/parserInternals.h>
44 #include "wine/debug.h"
45 #include "wine/list.h"
47 #include "msxml_private.h"
49 WINE_DEFAULT_DEBUG_CHANNEL(msxml
);
56 ExhaustiveErrors
= 1 << 1,
57 ExternalGeneralEntities
= 1 << 2,
58 ExternalParameterEntities
= 1 << 3,
59 ForcedResync
= 1 << 4,
60 NamespacePrefixes
= 1 << 5,
62 ParameterEntities
= 1 << 7,
63 PreserveSystemIndentifiers
= 1 << 8,
65 SchemaValidation
= 1 << 10,
66 ServerHttpRequest
= 1 << 11,
67 SuppressValidationfatalError
= 1 << 12,
68 UseInlineSchema
= 1 << 13,
69 UseSchemaLocation
= 1 << 14,
70 LexicalHandlerParEntities
= 1 << 15
74 static const WCHAR FeatureExternalGeneralEntitiesW
[] = {
75 'h','t','t','p',':','/','/','x','m','l','.','o','r','g','/','s','a','x','/',
76 'f','e','a','t','u','r','e','s','/','e','x','t','e','r','n','a','l','-','g','e','n','e','r','a','l',
77 '-','e','n','t','i','t','i','e','s',0
80 static const WCHAR FeatureExternalParameterEntitiesW
[] = {
81 'h','t','t','p',':','/','/','x','m','l','.','o','r','g','/','s','a','x','/','f','e','a','t','u','r','e','s',
82 '/','e','x','t','e','r','n','a','l','-','p','a','r','a','m','e','t','e','r','-','e','n','t','i','t','i','e','s',0
85 static const WCHAR FeatureLexicalHandlerParEntitiesW
[] = {
86 'h','t','t','p',':','/','/','x','m','l','.','o','r','g','/','s','a','x','/','f','e','a','t','u','r','e','s',
87 '/','l','e','x','i','c','a','l','-','h','a','n','d','l','e','r','/','p','a','r','a','m','e','t','e','r','-','e','n','t','i','t','i','e','s',0
90 static const WCHAR FeatureProhibitDTDW
[] = {
91 'p','r','o','h','i','b','i','t','-','d','t','d',0
94 static const WCHAR FeatureNamespacesW
[] = {
95 'h','t','t','p',':','/','/','x','m','l','.','o','r','g','/','s','a','x','/','f','e','a','t','u','r','e','s',
96 '/','n','a','m','e','s','p','a','c','e','s',0
99 static const WCHAR FeatureNamespacePrefixesW
[] = {
100 'h','t','t','p',':','/','/','x','m','l','.','o','r','g','/','s','a','x','/','f','e','a','t','u','r','e','s',
101 '/','n','a','m','e','s','p','a','c','e','-','p','r','e','f','i','x','e','s',0
104 struct saxreader_feature_pair
106 saxreader_feature feature
;
110 static const struct saxreader_feature_pair saxreader_feature_map
[] = {
111 { ExternalGeneralEntities
, FeatureExternalGeneralEntitiesW
},
112 { ExternalParameterEntities
, FeatureExternalParameterEntitiesW
},
113 { LexicalHandlerParEntities
, FeatureLexicalHandlerParEntitiesW
},
114 { NamespacePrefixes
, FeatureNamespacePrefixesW
},
115 { Namespaces
, FeatureNamespacesW
},
116 { ProhibitDTD
, FeatureProhibitDTDW
}
119 static saxreader_feature
get_saxreader_feature(const WCHAR
*name
)
124 max
= sizeof(saxreader_feature_map
)/sizeof(struct saxreader_feature_pair
) - 1;
130 c
= strcmpW(saxreader_feature_map
[n
].name
, name
);
132 return saxreader_feature_map
[n
].feature
;
140 return FeatureUnknown
;
162 ns
*ns
; /* namespaces defined in this particular element */
169 IVBSAXXMLReader IVBSAXXMLReader_iface
;
170 ISAXXMLReader ISAXXMLReader_iface
;
172 ISAXContentHandler
*contentHandler
;
173 IVBSAXContentHandler
*vbcontentHandler
;
174 ISAXErrorHandler
*errorHandler
;
175 IVBSAXErrorHandler
*vberrorHandler
;
176 ISAXLexicalHandler
*lexicalHandler
;
177 IVBSAXLexicalHandler
*vblexicalHandler
;
178 ISAXDeclHandler
*declHandler
;
179 IVBSAXDeclHandler
*vbdeclHandler
;
182 struct bstrpool pool
;
183 saxreader_feature features
;
184 MSXML_VERSION version
;
189 IVBSAXLocator IVBSAXLocator_iface
;
190 ISAXLocator ISAXLocator_iface
;
191 IVBSAXAttributes IVBSAXAttributes_iface
;
192 ISAXAttributes ISAXAttributes_iface
;
194 saxreader
*saxreader
;
196 xmlParserCtxtPtr pParserCtxt
;
202 struct list elements
;
216 static inline saxreader
*impl_from_IVBSAXXMLReader( IVBSAXXMLReader
*iface
)
218 return CONTAINING_RECORD(iface
, saxreader
, IVBSAXXMLReader_iface
);
221 static inline saxreader
*impl_from_ISAXXMLReader( ISAXXMLReader
*iface
)
223 return CONTAINING_RECORD(iface
, saxreader
, ISAXXMLReader_iface
);
226 static inline saxlocator
*impl_from_IVBSAXLocator( IVBSAXLocator
*iface
)
228 return CONTAINING_RECORD(iface
, saxlocator
, IVBSAXLocator_iface
);
231 static inline saxlocator
*impl_from_ISAXLocator( ISAXLocator
*iface
)
233 return CONTAINING_RECORD(iface
, saxlocator
, ISAXLocator_iface
);
236 static inline saxlocator
*impl_from_IVBSAXAttributes( IVBSAXAttributes
*iface
)
238 return CONTAINING_RECORD(iface
, saxlocator
, IVBSAXAttributes_iface
);
241 static inline saxlocator
*impl_from_ISAXAttributes( ISAXAttributes
*iface
)
243 return CONTAINING_RECORD(iface
, saxlocator
, ISAXAttributes_iface
);
247 static const WCHAR PropertyCharsetW
[] = {
248 'c','h','a','r','s','e','t',0
250 static const WCHAR PropertyDeclHandlerW
[] = {
251 'h','t','t','p',':','/','/','x','m','l','.','o','r','g','/',
252 's','a','x','/','p','r','o','p','e','r','t','i','e','s','/',
253 'd','e','c','l','a','r','a','t','i','o','n',
254 '-','h','a','n','d','l','e','r',0
256 static const WCHAR PropertyDomNodeW
[] = {
257 'h','t','t','p',':','/','/','x','m','l','.','o','r','g','/',
258 's','a','x','/','p','r','o','p','e','r','t','i','e','s','/',
259 'd','o','m','-','n','o','d','e',0
261 static const WCHAR PropertyInputSourceW
[] = {
262 'i','n','p','u','t','-','s','o','u','r','c','e',0
264 static const WCHAR PropertyLexicalHandlerW
[] = {
265 'h','t','t','p',':','/','/','x','m','l','.','o','r','g','/',
266 's','a','x','/','p','r','o','p','e','r','t','i','e','s','/',
267 'l','e','x','i','c','a','l','-','h','a','n','d','l','e','r',0
269 static const WCHAR PropertyMaxElementDepthW
[] = {
270 'm','a','x','-','e','l','e','m','e','n','t','-','d','e','p','t','h',0
272 static const WCHAR PropertyMaxXMLSizeW
[] = {
273 'm','a','x','-','x','m','l','-','s','i','z','e',0
275 static const WCHAR PropertySchemaDeclHandlerW
[] = {
276 's','c','h','e','m','a','-','d','e','c','l','a','r','a','t','i','o','n','-',
277 'h','a','n','d','l','e','r',0
279 static const WCHAR PropertyXMLDeclEncodingW
[] = {
280 'x','m','l','d','e','c','l','-','e','n','c','o','d','i','n','g',0
282 static const WCHAR PropertyXMLDeclStandaloneW
[] = {
283 'x','m','l','d','e','c','l','-','s','t','a','n','d','a','l','o','n','e',0
285 static const WCHAR PropertyXMLDeclVersionW
[] = {
286 'x','m','l','d','e','c','l','-','v','e','r','s','i','o','n',0
289 static inline HRESULT
set_feature_value(saxreader
*reader
, saxreader_feature feature
, VARIANT_BOOL value
)
291 /* handling of non-VARIANT_* values is version dependent */
292 if ((reader
->version
< MSXML4
) && (value
!= VARIANT_TRUE
))
293 value
= VARIANT_FALSE
;
294 if ((reader
->version
>= MSXML4
) && (value
!= VARIANT_FALSE
))
295 value
= VARIANT_TRUE
;
297 if (value
== VARIANT_TRUE
)
298 reader
->features
|= feature
;
300 reader
->features
&= ~feature
;
305 static inline HRESULT
get_feature_value(const saxreader
*reader
, saxreader_feature feature
, VARIANT_BOOL
*value
)
307 *value
= reader
->features
& feature
? VARIANT_TRUE
: VARIANT_FALSE
;
311 static BOOL
is_namespaces_enabled(const saxreader
*reader
)
313 return (reader
->version
< MSXML4
) || (reader
->features
& Namespaces
);
316 static inline int has_content_handler(const saxlocator
*locator
)
318 return (locator
->vbInterface
&& locator
->saxreader
->vbcontentHandler
) ||
319 (!locator
->vbInterface
&& locator
->saxreader
->contentHandler
);
322 static inline int has_lexical_handler(const saxlocator
*locator
)
324 return (locator
->vbInterface
&& locator
->saxreader
->vblexicalHandler
) ||
325 (!locator
->vbInterface
&& locator
->saxreader
->lexicalHandler
);
328 static inline int has_error_handler(const saxlocator
*locator
)
330 return (locator
->vbInterface
&& locator
->saxreader
->vberrorHandler
) ||
331 (!locator
->vbInterface
&& locator
->saxreader
->errorHandler
);
334 static BSTR
build_qname(BSTR prefix
, BSTR local
)
336 if (prefix
&& *prefix
)
338 BSTR qname
= SysAllocStringLen(NULL
, SysStringLen(prefix
) + SysStringLen(local
) + 1);
342 strcpyW(ptr
, prefix
);
343 ptr
+= SysStringLen(prefix
);
349 return SysAllocString(local
);
352 static element_entry
* alloc_element_entry(const xmlChar
*local
, const xmlChar
*prefix
, int nb_ns
,
353 const xmlChar
**namespaces
)
358 ret
= heap_alloc(sizeof(*ret
));
359 if (!ret
) return ret
;
361 ret
->local
= bstr_from_xmlChar(local
);
362 ret
->prefix
= bstr_from_xmlChar(prefix
);
363 ret
->qname
= build_qname(ret
->prefix
, ret
->local
);
364 ret
->ns
= nb_ns
? heap_alloc(nb_ns
*sizeof(ns
)) : NULL
;
365 ret
->ns_count
= nb_ns
;
367 for (i
=0; i
< nb_ns
; i
++)
369 ret
->ns
[i
].prefix
= bstr_from_xmlChar(namespaces
[2*i
]);
370 ret
->ns
[i
].uri
= bstr_from_xmlChar(namespaces
[2*i
+1]);
376 static void free_element_entry(element_entry
*element
)
380 for (i
=0; i
<element
->ns_count
;i
++)
382 SysFreeString(element
->ns
[i
].prefix
);
383 SysFreeString(element
->ns
[i
].uri
);
386 SysFreeString(element
->prefix
);
387 SysFreeString(element
->local
);
389 heap_free(element
->ns
);
393 static void push_element_ns(saxlocator
*locator
, element_entry
*element
)
395 list_add_head(&locator
->elements
, &element
->entry
);
398 static element_entry
* pop_element_ns(saxlocator
*locator
)
400 element_entry
*element
= LIST_ENTRY(list_head(&locator
->elements
), element_entry
, entry
);
403 list_remove(&element
->entry
);
408 static BSTR
find_element_uri(saxlocator
*locator
, const xmlChar
*uri
)
410 element_entry
*element
;
414 if (!uri
) return NULL
;
416 uriW
= bstr_from_xmlChar(uri
);
418 LIST_FOR_EACH_ENTRY(element
, &locator
->elements
, element_entry
, entry
)
420 for (i
=0; i
< element
->ns_count
; i
++)
421 if (!strcmpW(uriW
, element
->ns
[i
].uri
))
424 return element
->ns
[i
].uri
;
429 ERR("namespace uri not found, %s\n", debugstr_a((char*)uri
));
433 /* used to localize version dependent error check behaviour */
434 static inline BOOL
sax_callback_failed(saxlocator
*This
, HRESULT hr
)
436 return This
->saxreader
->version
>= MSXML4
? FAILED(hr
) : hr
!= S_OK
;
439 /* index value -1 means it tries to loop for a first time */
440 static inline BOOL
iterate_endprefix_index(saxlocator
*This
, const element_entry
*element
, int *i
)
442 if (This
->saxreader
->version
>= MSXML4
)
444 if (*i
== -1) *i
= 0; else ++*i
;
445 return *i
< element
->ns_count
;
449 if (*i
== -1) *i
= element
->ns_count
-1; else --*i
;
454 static BOOL
bstr_pool_insert(struct bstrpool
*pool
, BSTR pool_entry
)
458 pool
->pool
= HeapAlloc(GetProcessHeap(), 0, 16 * sizeof(*pool
->pool
));
465 else if (pool
->index
== pool
->len
)
467 BSTR
*realloc
= HeapReAlloc(GetProcessHeap(), 0, pool
->pool
, pool
->len
* 2 * sizeof(*realloc
));
472 pool
->pool
= realloc
;
476 pool
->pool
[pool
->index
++] = pool_entry
;
480 static void free_bstr_pool(struct bstrpool
*pool
)
484 for (i
= 0; i
< pool
->index
; i
++)
485 SysFreeString(pool
->pool
[i
]);
487 HeapFree(GetProcessHeap(), 0, pool
->pool
);
490 pool
->index
= pool
->len
= 0;
493 static BSTR
bstr_from_xmlCharN(const xmlChar
*buf
, int len
)
501 dLen
= MultiByteToWideChar(CP_UTF8
, 0, (LPCSTR
)buf
, len
, NULL
, 0);
502 if(len
!= -1) dLen
++;
503 bstr
= SysAllocStringLen(NULL
, dLen
-1);
506 MultiByteToWideChar(CP_UTF8
, 0, (LPCSTR
)buf
, len
, bstr
, dLen
);
507 if(len
!= -1) bstr
[dLen
-1] = '\0';
512 static BSTR
QName_from_xmlChar(const xmlChar
*prefix
, const xmlChar
*name
)
517 if(!name
) return NULL
;
519 if(!prefix
|| !*prefix
)
520 return bstr_from_xmlChar(name
);
522 qname
= xmlBuildQName(name
, prefix
, NULL
, 0);
523 bstr
= bstr_from_xmlChar(qname
);
529 static BSTR
pooled_bstr_from_xmlChar(struct bstrpool
*pool
, const xmlChar
*buf
)
531 BSTR pool_entry
= bstr_from_xmlChar(buf
);
533 if (pool_entry
&& !bstr_pool_insert(pool
, pool_entry
))
535 SysFreeString(pool_entry
);
542 static BSTR
pooled_bstr_from_xmlCharN(struct bstrpool
*pool
, const xmlChar
*buf
, int len
)
544 BSTR pool_entry
= bstr_from_xmlCharN(buf
, len
);
546 if (pool_entry
&& !bstr_pool_insert(pool
, pool_entry
))
548 SysFreeString(pool_entry
);
555 static void format_error_message_from_id(saxlocator
*This
, HRESULT hr
)
557 xmlStopParser(This
->pParserCtxt
);
560 if(has_error_handler(This
))
563 if(!FormatMessageW(FORMAT_MESSAGE_FROM_SYSTEM
,
564 NULL
, hr
, 0, msg
, sizeof(msg
), NULL
))
566 FIXME("MSXML errors not yet supported.\n");
570 if(This
->vbInterface
)
572 BSTR bstrMsg
= SysAllocString(msg
);
573 IVBSAXErrorHandler_fatalError(This
->saxreader
->vberrorHandler
,
574 &This
->IVBSAXLocator_iface
, &bstrMsg
, hr
);
575 SysFreeString(bstrMsg
);
578 ISAXErrorHandler_fatalError(This
->saxreader
->errorHandler
,
579 &This
->ISAXLocator_iface
, msg
, hr
);
583 static void update_position(saxlocator
*This
, BOOL fix_column
)
585 const xmlChar
*p
= This
->pParserCtxt
->input
->cur
-1;
587 This
->line
= xmlSAX2GetLineNumber(This
->pParserCtxt
);
591 for(; *p
!='\n' && *p
!='\r' && p
>=This
->pParserCtxt
->input
->base
; p
--)
596 This
->column
= xmlSAX2GetColumnNumber(This
->pParserCtxt
);
600 /*** IVBSAXAttributes interface ***/
601 /*** IUnknown methods ***/
602 static HRESULT WINAPI
ivbsaxattributes_QueryInterface(
603 IVBSAXAttributes
* iface
,
607 saxlocator
*This
= impl_from_IVBSAXAttributes(iface
);
608 TRACE("%p %s %p\n", This
, debugstr_guid(riid
), ppvObject
);
609 return IVBSAXLocator_QueryInterface(&This
->IVBSAXLocator_iface
, riid
, ppvObject
);
612 static ULONG WINAPI
ivbsaxattributes_AddRef(IVBSAXAttributes
* iface
)
614 saxlocator
*This
= impl_from_IVBSAXAttributes(iface
);
615 return ISAXLocator_AddRef(&This
->ISAXLocator_iface
);
618 static ULONG WINAPI
ivbsaxattributes_Release(IVBSAXAttributes
* iface
)
620 saxlocator
*This
= impl_from_IVBSAXAttributes(iface
);
621 return ISAXLocator_Release(&This
->ISAXLocator_iface
);
624 /*** IDispatch methods ***/
625 static HRESULT WINAPI
ivbsaxattributes_GetTypeInfoCount( IVBSAXAttributes
*iface
, UINT
* pctinfo
)
627 saxlocator
*This
= impl_from_IVBSAXAttributes( iface
);
629 TRACE("(%p)->(%p)\n", This
, pctinfo
);
636 static HRESULT WINAPI
ivbsaxattributes_GetTypeInfo(
637 IVBSAXAttributes
*iface
,
638 UINT iTInfo
, LCID lcid
, ITypeInfo
** ppTInfo
)
640 saxlocator
*This
= impl_from_IVBSAXAttributes( iface
);
643 TRACE("(%p)->(%u %u %p)\n", This
, iTInfo
, lcid
, ppTInfo
);
645 hr
= get_typeinfo(IVBSAXAttributes_tid
, ppTInfo
);
650 static HRESULT WINAPI
ivbsaxattributes_GetIDsOfNames(
651 IVBSAXAttributes
*iface
,
658 saxlocator
*This
= impl_from_IVBSAXAttributes( iface
);
662 TRACE("(%p)->(%s %p %u %u %p)\n", This
, debugstr_guid(riid
), rgszNames
, cNames
,
665 if(!rgszNames
|| cNames
== 0 || !rgDispId
)
668 hr
= get_typeinfo(IVBSAXAttributes_tid
, &typeinfo
);
671 hr
= ITypeInfo_GetIDsOfNames(typeinfo
, rgszNames
, cNames
, rgDispId
);
672 ITypeInfo_Release(typeinfo
);
678 static HRESULT WINAPI
ivbsaxattributes_Invoke(
679 IVBSAXAttributes
*iface
,
684 DISPPARAMS
* pDispParams
,
686 EXCEPINFO
* pExcepInfo
,
689 saxlocator
*This
= impl_from_IVBSAXAttributes( iface
);
693 TRACE("(%p)->(%d %s %d %d %p %p %p %p)\n", This
, dispIdMember
, debugstr_guid(riid
),
694 lcid
, wFlags
, pDispParams
, pVarResult
, pExcepInfo
, puArgErr
);
696 hr
= get_typeinfo(IVBSAXAttributes_tid
, &typeinfo
);
699 hr
= ITypeInfo_Invoke(typeinfo
, &This
->IVBSAXAttributes_iface
, dispIdMember
, wFlags
,
700 pDispParams
, pVarResult
, pExcepInfo
, puArgErr
);
701 ITypeInfo_Release(typeinfo
);
707 /*** IVBSAXAttributes methods ***/
708 static HRESULT WINAPI
ivbsaxattributes_get_length(
709 IVBSAXAttributes
* iface
,
712 saxlocator
*This
= impl_from_IVBSAXAttributes( iface
);
713 return ISAXAttributes_getLength(&This
->ISAXAttributes_iface
, nLength
);
716 static HRESULT WINAPI
ivbsaxattributes_getURI(
717 IVBSAXAttributes
* iface
,
722 saxlocator
*This
= impl_from_IVBSAXAttributes( iface
);
723 return ISAXAttributes_getURI(&This
->ISAXAttributes_iface
, nIndex
, (const WCHAR
**)uri
, &len
);
726 static HRESULT WINAPI
ivbsaxattributes_getLocalName(
727 IVBSAXAttributes
* iface
,
732 saxlocator
*This
= impl_from_IVBSAXAttributes( iface
);
733 return ISAXAttributes_getLocalName(&This
->ISAXAttributes_iface
, nIndex
,
734 (const WCHAR
**)localName
, &len
);
737 static HRESULT WINAPI
ivbsaxattributes_getQName(
738 IVBSAXAttributes
* iface
,
743 saxlocator
*This
= impl_from_IVBSAXAttributes( iface
);
744 return ISAXAttributes_getQName(&This
->ISAXAttributes_iface
, nIndex
, (const WCHAR
**)QName
, &len
);
747 static HRESULT WINAPI
ivbsaxattributes_getIndexFromName(
748 IVBSAXAttributes
* iface
,
753 saxlocator
*This
= impl_from_IVBSAXAttributes( iface
);
754 return ISAXAttributes_getIndexFromName(&This
->ISAXAttributes_iface
, uri
, SysStringLen(uri
),
755 localName
, SysStringLen(localName
), index
);
758 static HRESULT WINAPI
ivbsaxattributes_getIndexFromQName(
759 IVBSAXAttributes
* iface
,
763 saxlocator
*This
= impl_from_IVBSAXAttributes( iface
);
764 return ISAXAttributes_getIndexFromQName(&This
->ISAXAttributes_iface
, QName
,
765 SysStringLen(QName
), index
);
768 static HRESULT WINAPI
ivbsaxattributes_getType(
769 IVBSAXAttributes
* iface
,
774 saxlocator
*This
= impl_from_IVBSAXAttributes( iface
);
775 return ISAXAttributes_getType(&This
->ISAXAttributes_iface
, nIndex
, (const WCHAR
**)type
, &len
);
778 static HRESULT WINAPI
ivbsaxattributes_getTypeFromName(
779 IVBSAXAttributes
* iface
,
785 saxlocator
*This
= impl_from_IVBSAXAttributes( iface
);
786 return ISAXAttributes_getTypeFromName(&This
->ISAXAttributes_iface
, uri
, SysStringLen(uri
),
787 localName
, SysStringLen(localName
), (const WCHAR
**)type
, &len
);
790 static HRESULT WINAPI
ivbsaxattributes_getTypeFromQName(
791 IVBSAXAttributes
* iface
,
796 saxlocator
*This
= impl_from_IVBSAXAttributes( iface
);
797 return ISAXAttributes_getTypeFromQName(&This
->ISAXAttributes_iface
, QName
, SysStringLen(QName
),
798 (const WCHAR
**)type
, &len
);
801 static HRESULT WINAPI
ivbsaxattributes_getValue(
802 IVBSAXAttributes
* iface
,
807 saxlocator
*This
= impl_from_IVBSAXAttributes( iface
);
808 return ISAXAttributes_getValue(&This
->ISAXAttributes_iface
, nIndex
, (const WCHAR
**)value
, &len
);
811 static HRESULT WINAPI
ivbsaxattributes_getValueFromName(
812 IVBSAXAttributes
* iface
,
818 saxlocator
*This
= impl_from_IVBSAXAttributes( iface
);
819 return ISAXAttributes_getValueFromName(&This
->ISAXAttributes_iface
, uri
, SysStringLen(uri
),
820 localName
, SysStringLen(localName
), (const WCHAR
**)value
, &len
);
823 static HRESULT WINAPI
ivbsaxattributes_getValueFromQName(
824 IVBSAXAttributes
* iface
,
829 saxlocator
*This
= impl_from_IVBSAXAttributes( iface
);
830 return ISAXAttributes_getValueFromQName(&This
->ISAXAttributes_iface
, QName
,
831 SysStringLen(QName
), (const WCHAR
**)value
, &len
);
834 static const struct IVBSAXAttributesVtbl ivbsaxattributes_vtbl
=
836 ivbsaxattributes_QueryInterface
,
837 ivbsaxattributes_AddRef
,
838 ivbsaxattributes_Release
,
839 ivbsaxattributes_GetTypeInfoCount
,
840 ivbsaxattributes_GetTypeInfo
,
841 ivbsaxattributes_GetIDsOfNames
,
842 ivbsaxattributes_Invoke
,
843 ivbsaxattributes_get_length
,
844 ivbsaxattributes_getURI
,
845 ivbsaxattributes_getLocalName
,
846 ivbsaxattributes_getQName
,
847 ivbsaxattributes_getIndexFromName
,
848 ivbsaxattributes_getIndexFromQName
,
849 ivbsaxattributes_getType
,
850 ivbsaxattributes_getTypeFromName
,
851 ivbsaxattributes_getTypeFromQName
,
852 ivbsaxattributes_getValue
,
853 ivbsaxattributes_getValueFromName
,
854 ivbsaxattributes_getValueFromQName
857 /*** ISAXAttributes interface ***/
858 /*** IUnknown methods ***/
859 static HRESULT WINAPI
isaxattributes_QueryInterface(
860 ISAXAttributes
* iface
,
864 saxlocator
*This
= impl_from_ISAXAttributes(iface
);
865 TRACE("%p %s %p\n", This
, debugstr_guid(riid
), ppvObject
);
866 return ISAXLocator_QueryInterface(&This
->ISAXLocator_iface
, riid
, ppvObject
);
869 static ULONG WINAPI
isaxattributes_AddRef(ISAXAttributes
* iface
)
871 saxlocator
*This
= impl_from_ISAXAttributes(iface
);
873 return ISAXLocator_AddRef(&This
->ISAXLocator_iface
);
876 static ULONG WINAPI
isaxattributes_Release(ISAXAttributes
* iface
)
878 saxlocator
*This
= impl_from_ISAXAttributes(iface
);
881 return ISAXLocator_Release(&This
->ISAXLocator_iface
);
884 /*** ISAXAttributes methods ***/
885 static HRESULT WINAPI
isaxattributes_getLength(
886 ISAXAttributes
* iface
,
889 saxlocator
*This
= impl_from_ISAXAttributes( iface
);
891 *length
= This
->nb_attributes
;
892 TRACE("Length set to %d\n", *length
);
896 static HRESULT WINAPI
isaxattributes_getURI(
897 ISAXAttributes
* iface
,
902 saxlocator
*This
= impl_from_ISAXAttributes( iface
);
903 TRACE("(%p)->(%d)\n", This
, index
);
905 if(index
>= This
->nb_attributes
|| index
< 0) return E_INVALIDARG
;
906 if(!url
|| !size
) return E_POINTER
;
908 *size
= SysStringLen(This
->attributes
[index
].szURI
);
909 *url
= This
->attributes
[index
].szURI
;
911 TRACE("(%s:%d)\n", debugstr_w(This
->attributes
[index
].szURI
), *size
);
916 static HRESULT WINAPI
isaxattributes_getLocalName(
917 ISAXAttributes
* iface
,
919 const WCHAR
**pLocalName
,
920 int *pLocalNameLength
)
922 saxlocator
*This
= impl_from_ISAXAttributes( iface
);
923 TRACE("(%p)->(%d)\n", This
, nIndex
);
925 if(nIndex
>=This
->nb_attributes
|| nIndex
<0) return E_INVALIDARG
;
926 if(!pLocalName
|| !pLocalNameLength
) return E_POINTER
;
928 *pLocalNameLength
= SysStringLen(This
->attributes
[nIndex
].szLocalname
);
929 *pLocalName
= This
->attributes
[nIndex
].szLocalname
;
934 static HRESULT WINAPI
isaxattributes_getQName(
935 ISAXAttributes
* iface
,
937 const WCHAR
**pQName
,
940 saxlocator
*This
= impl_from_ISAXAttributes( iface
);
941 TRACE("(%p)->(%d)\n", This
, nIndex
);
943 if(nIndex
>=This
->nb_attributes
|| nIndex
<0) return E_INVALIDARG
;
944 if(!pQName
|| !pQNameLength
) return E_POINTER
;
946 *pQNameLength
= SysStringLen(This
->attributes
[nIndex
].szQName
);
947 *pQName
= This
->attributes
[nIndex
].szQName
;
952 static HRESULT WINAPI
isaxattributes_getName(
953 ISAXAttributes
* iface
,
957 const WCHAR
**localName
,
962 saxlocator
*This
= impl_from_ISAXAttributes( iface
);
963 TRACE("(%p)->(%d)\n", This
, index
);
965 if(index
>=This
->nb_attributes
|| index
<0) return E_INVALIDARG
;
966 if(!uri
|| !pUriLength
|| !localName
|| !pLocalNameSize
967 || !QName
|| !pQNameLength
) return E_POINTER
;
969 *pUriLength
= SysStringLen(This
->attributes
[index
].szURI
);
970 *uri
= This
->attributes
[index
].szURI
;
971 *pLocalNameSize
= SysStringLen(This
->attributes
[index
].szLocalname
);
972 *localName
= This
->attributes
[index
].szLocalname
;
973 *pQNameLength
= SysStringLen(This
->attributes
[index
].szQName
);
974 *QName
= This
->attributes
[index
].szQName
;
976 TRACE("(%s, %s, %s)\n", debugstr_w(*uri
), debugstr_w(*localName
), debugstr_w(*QName
));
981 static HRESULT WINAPI
isaxattributes_getIndexFromName(
982 ISAXAttributes
* iface
,
985 const WCHAR
*pLocalName
,
989 saxlocator
*This
= impl_from_ISAXAttributes( iface
);
991 TRACE("(%p)->(%s, %d, %s, %d)\n", This
, debugstr_w(pUri
), cUriLength
,
992 debugstr_w(pLocalName
), cocalNameLength
);
994 if(!pUri
|| !pLocalName
|| !index
) return E_POINTER
;
996 for(i
=0; i
<This
->nb_attributes
; i
++)
998 if(cUriLength
!=SysStringLen(This
->attributes
[i
].szURI
)
999 || cocalNameLength
!=SysStringLen(This
->attributes
[i
].szLocalname
))
1001 if(cUriLength
&& memcmp(pUri
, This
->attributes
[i
].szURI
,
1002 sizeof(WCHAR
)*cUriLength
))
1004 if(cocalNameLength
&& memcmp(pLocalName
, This
->attributes
[i
].szLocalname
,
1005 sizeof(WCHAR
)*cocalNameLength
))
1012 return E_INVALIDARG
;
1015 static HRESULT WINAPI
isaxattributes_getIndexFromQName(
1016 ISAXAttributes
* iface
,
1017 const WCHAR
*pQName
,
1021 saxlocator
*This
= impl_from_ISAXAttributes( iface
);
1023 TRACE("(%p)->(%s, %d)\n", This
, debugstr_w(pQName
), nQNameLength
);
1025 if(!pQName
|| !index
) return E_POINTER
;
1026 if(!nQNameLength
) return E_INVALIDARG
;
1028 for(i
=0; i
<This
->nb_attributes
; i
++)
1030 if(nQNameLength
!=SysStringLen(This
->attributes
[i
].szQName
)) continue;
1031 if(memcmp(pQName
, This
->attributes
[i
].szQName
, sizeof(WCHAR
)*nQNameLength
)) continue;
1037 return E_INVALIDARG
;
1040 static HRESULT WINAPI
isaxattributes_getType(
1041 ISAXAttributes
* iface
,
1043 const WCHAR
**pType
,
1046 saxlocator
*This
= impl_from_ISAXAttributes( iface
);
1048 FIXME("(%p)->(%d) stub\n", This
, nIndex
);
1052 static HRESULT WINAPI
isaxattributes_getTypeFromName(
1053 ISAXAttributes
* iface
,
1056 const WCHAR
*pLocalName
,
1058 const WCHAR
**pType
,
1061 saxlocator
*This
= impl_from_ISAXAttributes( iface
);
1063 FIXME("(%p)->(%s, %d, %s, %d) stub\n", This
, debugstr_w(pUri
), nUri
,
1064 debugstr_w(pLocalName
), nLocalName
);
1068 static HRESULT WINAPI
isaxattributes_getTypeFromQName(
1069 ISAXAttributes
* iface
,
1070 const WCHAR
*pQName
,
1072 const WCHAR
**pType
,
1075 saxlocator
*This
= impl_from_ISAXAttributes( iface
);
1077 FIXME("(%p)->(%s, %d) stub\n", This
, debugstr_w(pQName
), nQName
);
1081 static HRESULT WINAPI
isaxattributes_getValue(
1082 ISAXAttributes
* iface
,
1084 const WCHAR
**value
,
1087 saxlocator
*This
= impl_from_ISAXAttributes( iface
);
1088 TRACE("(%p)->(%d)\n", This
, index
);
1090 if(index
>=This
->nb_attributes
|| index
<0) return E_INVALIDARG
;
1091 if(!value
|| !nValue
) return E_POINTER
;
1093 *nValue
= SysStringLen(This
->attributes
[index
].szValue
);
1094 *value
= This
->attributes
[index
].szValue
;
1096 TRACE("(%s:%d)\n", debugstr_w(*value
), *nValue
);
1101 static HRESULT WINAPI
isaxattributes_getValueFromName(
1102 ISAXAttributes
* iface
,
1105 const WCHAR
*pLocalName
,
1107 const WCHAR
**pValue
,
1112 saxlocator
*This
= impl_from_ISAXAttributes( iface
);
1113 TRACE("(%p)->(%s, %d, %s, %d)\n", This
, debugstr_w(pUri
), nUri
,
1114 debugstr_w(pLocalName
), nLocalName
);
1116 hr
= ISAXAttributes_getIndexFromName(iface
,
1117 pUri
, nUri
, pLocalName
, nLocalName
, &index
);
1118 if(hr
==S_OK
) hr
= ISAXAttributes_getValue(iface
, index
, pValue
, nValue
);
1123 static HRESULT WINAPI
isaxattributes_getValueFromQName(
1124 ISAXAttributes
* iface
,
1125 const WCHAR
*pQName
,
1127 const WCHAR
**pValue
,
1132 saxlocator
*This
= impl_from_ISAXAttributes( iface
);
1133 TRACE("(%p)->(%s, %d)\n", This
, debugstr_w(pQName
), nQName
);
1135 hr
= ISAXAttributes_getIndexFromQName(iface
, pQName
, nQName
, &index
);
1136 if(hr
==S_OK
) hr
= ISAXAttributes_getValue(iface
, index
, pValue
, nValue
);
1141 static const struct ISAXAttributesVtbl isaxattributes_vtbl
=
1143 isaxattributes_QueryInterface
,
1144 isaxattributes_AddRef
,
1145 isaxattributes_Release
,
1146 isaxattributes_getLength
,
1147 isaxattributes_getURI
,
1148 isaxattributes_getLocalName
,
1149 isaxattributes_getQName
,
1150 isaxattributes_getName
,
1151 isaxattributes_getIndexFromName
,
1152 isaxattributes_getIndexFromQName
,
1153 isaxattributes_getType
,
1154 isaxattributes_getTypeFromName
,
1155 isaxattributes_getTypeFromQName
,
1156 isaxattributes_getValue
,
1157 isaxattributes_getValueFromName
,
1158 isaxattributes_getValueFromQName
1161 static HRESULT
SAXAttributes_populate(saxlocator
*locator
,
1162 int nb_namespaces
, const xmlChar
**xmlNamespaces
,
1163 int nb_attributes
, const xmlChar
**xmlAttributes
)
1165 static const xmlChar xmlns
[] = "xmlns";
1166 static const WCHAR xmlnsW
[] = { 'x','m','l','n','s',0 };
1168 struct _attributes
*attrs
;
1171 /* skip namespace definitions */
1172 if ((locator
->saxreader
->features
& NamespacePrefixes
) == 0)
1175 locator
->nb_attributes
= nb_namespaces
+ nb_attributes
;
1176 if(locator
->nb_attributes
> locator
->attributesSize
)
1178 attrs
= heap_realloc(locator
->attributes
, sizeof(struct _attributes
)*locator
->nb_attributes
*2);
1181 locator
->nb_attributes
= 0;
1182 return E_OUTOFMEMORY
;
1184 locator
->attributes
= attrs
;
1188 attrs
= locator
->attributes
;
1191 for (i
= 0; i
< nb_namespaces
; i
++)
1193 attrs
[nb_attributes
+i
].szLocalname
= SysAllocStringLen(NULL
, 0);
1194 attrs
[nb_attributes
+i
].szURI
= locator
->namespaceUri
;
1195 attrs
[nb_attributes
+i
].szValue
= bstr_from_xmlChar(xmlNamespaces
[2*i
+1]);
1196 if(!xmlNamespaces
[2*i
])
1197 attrs
[nb_attributes
+i
].szQName
= SysAllocString(xmlnsW
);
1199 attrs
[nb_attributes
+i
].szQName
= QName_from_xmlChar(xmlns
, xmlNamespaces
[2*i
]);
1202 for (i
= 0; i
< nb_attributes
; i
++)
1204 static const xmlChar xmlA
[] = "xml";
1206 if (xmlStrEqual(xmlAttributes
[i
*5+1], xmlA
))
1207 attrs
[i
].szURI
= bstr_from_xmlChar(xmlAttributes
[i
*5+2]);
1209 /* that's an important feature to keep same uri pointer for every reported attribute */
1210 attrs
[i
].szURI
= find_element_uri(locator
, xmlAttributes
[i
*5+2]);
1212 attrs
[i
].szLocalname
= bstr_from_xmlChar(xmlAttributes
[i
*5]);
1213 attrs
[i
].szValue
= bstr_from_xmlCharN(xmlAttributes
[i
*5+3],
1214 xmlAttributes
[i
*5+4]-xmlAttributes
[i
*5+3]);
1215 attrs
[i
].szQName
= QName_from_xmlChar(xmlAttributes
[i
*5+1],
1216 xmlAttributes
[i
*5]);
1222 /*** LibXML callbacks ***/
1223 static void libxmlStartDocument(void *ctx
)
1225 saxlocator
*This
= ctx
;
1228 if (This
->saxreader
->version
>= MSXML4
)
1230 const xmlChar
*p
= This
->pParserCtxt
->input
->cur
-1;
1231 update_position(This
, FALSE
);
1232 while(p
>This
->pParserCtxt
->input
->base
&& *p
!='>')
1234 if(*p
=='\n' || (*p
=='\r' && *(p
+1)!='\n'))
1239 for(; p
>=This
->pParserCtxt
->input
->base
&& *p
!='\n' && *p
!='\r'; p
--)
1243 if(has_content_handler(This
))
1245 if(This
->vbInterface
)
1246 hr
= IVBSAXContentHandler_startDocument(This
->saxreader
->vbcontentHandler
);
1248 hr
= ISAXContentHandler_startDocument(This
->saxreader
->contentHandler
);
1250 if (sax_callback_failed(This
, hr
))
1251 format_error_message_from_id(This
, hr
);
1255 static void libxmlEndDocument(void *ctx
)
1257 saxlocator
*This
= ctx
;
1260 if (This
->saxreader
->version
>= MSXML4
) {
1261 update_position(This
, FALSE
);
1262 if(This
->column
> 1)
1270 if(This
->ret
!= S_OK
) return;
1272 if(has_content_handler(This
))
1274 if(This
->vbInterface
)
1275 hr
= IVBSAXContentHandler_endDocument(This
->saxreader
->vbcontentHandler
);
1277 hr
= ISAXContentHandler_endDocument(This
->saxreader
->contentHandler
);
1279 if (sax_callback_failed(This
, hr
))
1280 format_error_message_from_id(This
, hr
);
1284 static void libxmlStartElementNS(
1286 const xmlChar
*localname
,
1287 const xmlChar
*prefix
,
1290 const xmlChar
**namespaces
,
1293 const xmlChar
**attributes
)
1295 saxlocator
*This
= ctx
;
1296 element_entry
*element
;
1300 update_position(This
, TRUE
);
1301 if(*(This
->pParserCtxt
->input
->cur
) == '/')
1303 if(This
->saxreader
->version
< MSXML4
)
1306 element
= alloc_element_entry(localname
, prefix
, nb_namespaces
, namespaces
);
1307 push_element_ns(This
, element
);
1309 if (is_namespaces_enabled(This
->saxreader
))
1313 for (i
= 0; i
< nb_namespaces
&& has_content_handler(This
); i
++)
1315 if (This
->vbInterface
)
1316 hr
= IVBSAXContentHandler_startPrefixMapping(
1317 This
->saxreader
->vbcontentHandler
,
1318 &element
->ns
[i
].prefix
,
1319 &element
->ns
[i
].uri
);
1321 hr
= ISAXContentHandler_startPrefixMapping(
1322 This
->saxreader
->contentHandler
,
1323 element
->ns
[i
].prefix
,
1324 SysStringLen(element
->ns
[i
].prefix
),
1326 SysStringLen(element
->ns
[i
].uri
));
1328 if (sax_callback_failed(This
, hr
))
1330 format_error_message_from_id(This
, hr
);
1336 uri
= find_element_uri(This
, URI
);
1337 hr
= SAXAttributes_populate(This
, nb_namespaces
, namespaces
, nb_attributes
, attributes
);
1338 if (hr
== S_OK
&& has_content_handler(This
))
1342 if (is_namespaces_enabled(This
->saxreader
))
1343 local
= element
->local
;
1347 if (This
->vbInterface
)
1348 hr
= IVBSAXContentHandler_startElement(This
->saxreader
->vbcontentHandler
,
1349 &uri
, &local
, &element
->qname
, &This
->IVBSAXAttributes_iface
);
1351 hr
= ISAXContentHandler_startElement(This
->saxreader
->contentHandler
,
1352 uri
, SysStringLen(uri
),
1353 local
, SysStringLen(local
),
1354 element
->qname
, SysStringLen(element
->qname
),
1355 &This
->ISAXAttributes_iface
);
1357 if (sax_callback_failed(This
, hr
))
1358 format_error_message_from_id(This
, hr
);
1362 static void libxmlEndElementNS(
1364 const xmlChar
*localname
,
1365 const xmlChar
*prefix
,
1368 saxlocator
*This
= ctx
;
1369 element_entry
*element
;
1374 update_position(This
, FALSE
);
1375 p
= This
->pParserCtxt
->input
->cur
;
1377 if (This
->saxreader
->version
>= MSXML4
)
1380 while(p
>This
->pParserCtxt
->input
->base
&& *p
!='>')
1382 if(*p
=='\n' || (*p
=='\r' && *(p
+1)!='\n'))
1387 else if(*(p
-1)!='>' || *(p
-2)!='/')
1390 while(p
-2>=This
->pParserCtxt
->input
->base
1391 && *(p
-2)!='<' && *(p
-1)!='/')
1393 if(*p
=='\n' || (*p
=='\r' && *(p
+1)!='\n'))
1399 for(; p
>=This
->pParserCtxt
->input
->base
&& *p
!='\n' && *p
!='\r'; p
--)
1402 uri
= find_element_uri(This
, URI
);
1403 element
= pop_element_ns(This
);
1405 if (!has_content_handler(This
))
1407 This
->nb_attributes
= 0;
1408 free_element_entry(element
);
1412 if (is_namespaces_enabled(This
->saxreader
))
1413 local
= element
->local
;
1417 if (This
->vbInterface
)
1418 hr
= IVBSAXContentHandler_endElement(
1419 This
->saxreader
->vbcontentHandler
,
1420 &uri
, &local
, &element
->qname
);
1422 hr
= ISAXContentHandler_endElement(
1423 This
->saxreader
->contentHandler
,
1424 uri
, SysStringLen(uri
),
1425 local
, SysStringLen(local
),
1426 element
->qname
, SysStringLen(element
->qname
));
1428 This
->nb_attributes
= 0;
1430 if (sax_callback_failed(This
, hr
))
1432 format_error_message_from_id(This
, hr
);
1433 free_element_entry(element
);
1437 if (is_namespaces_enabled(This
->saxreader
))
1440 while (iterate_endprefix_index(This
, element
, &i
) && has_content_handler(This
))
1442 if (This
->vbInterface
)
1443 hr
= IVBSAXContentHandler_endPrefixMapping(
1444 This
->saxreader
->vbcontentHandler
, &element
->ns
[i
].prefix
);
1446 hr
= ISAXContentHandler_endPrefixMapping(
1447 This
->saxreader
->contentHandler
,
1448 element
->ns
[i
].prefix
, SysStringLen(element
->ns
[i
].prefix
));
1450 if (sax_callback_failed(This
, hr
)) break;
1453 if (sax_callback_failed(This
, hr
))
1454 format_error_message_from_id(This
, hr
);
1457 free_element_entry(element
);
1460 static void libxmlCharacters(
1465 saxlocator
*This
= ctx
;
1469 BOOL lastEvent
= FALSE
;
1471 if(!(has_content_handler(This
))) return;
1473 update_position(This
, FALSE
);
1474 cur
= (xmlChar
*)This
->pParserCtxt
->input
->cur
;
1475 while(cur
>=This
->pParserCtxt
->input
->base
&& *cur
!='>')
1477 if(*cur
=='\n' || (*cur
=='\r' && *(cur
+1)!='\n'))
1482 for(; cur
>=This
->pParserCtxt
->input
->base
&& *cur
!='\n' && *cur
!='\r'; cur
--)
1486 if(*(ch
-1)=='\r') cur
--;
1491 while(end
-ch
<len
&& *end
!='\r') end
++;
1502 if (This
->saxreader
->version
>= MSXML4
)
1506 for(p
=cur
; p
!=end
; p
++)
1523 Chars
= pooled_bstr_from_xmlCharN(&This
->saxreader
->pool
, cur
, end
-cur
);
1524 if(This
->vbInterface
)
1525 hr
= IVBSAXContentHandler_characters(
1526 This
->saxreader
->vbcontentHandler
, &Chars
);
1528 hr
= ISAXContentHandler_characters(
1529 This
->saxreader
->contentHandler
,
1530 Chars
, SysStringLen(Chars
));
1532 if (sax_callback_failed(This
, hr
))
1534 format_error_message_from_id(This
, hr
);
1538 if (This
->saxreader
->version
< MSXML4
)
1539 This
->column
+= end
-cur
;
1552 if(end
-ch
== len
) break;
1556 static void libxmlSetDocumentLocator(
1558 xmlSAXLocatorPtr loc
)
1560 saxlocator
*This
= ctx
;
1563 if(has_content_handler(This
))
1565 if(This
->vbInterface
)
1566 hr
= IVBSAXContentHandler_putref_documentLocator(This
->saxreader
->vbcontentHandler
,
1567 &This
->IVBSAXLocator_iface
);
1569 hr
= ISAXContentHandler_putDocumentLocator(This
->saxreader
->contentHandler
,
1570 &This
->ISAXLocator_iface
);
1574 format_error_message_from_id(This
, hr
);
1577 static void libxmlComment(void *ctx
, const xmlChar
*value
)
1579 saxlocator
*This
= ctx
;
1582 const xmlChar
*p
= This
->pParserCtxt
->input
->cur
;
1584 update_position(This
, FALSE
);
1585 while(p
-4>=This
->pParserCtxt
->input
->base
1586 && memcmp(p
-4, "<!--", sizeof(char[4])))
1588 if(*p
=='\n' || (*p
=='\r' && *(p
+1)!='\n'))
1594 for(; p
>=This
->pParserCtxt
->input
->base
&& *p
!='\n' && *p
!='\r'; p
--)
1597 if (!has_lexical_handler(This
)) return;
1599 bValue
= pooled_bstr_from_xmlChar(&This
->saxreader
->pool
, value
);
1601 if(This
->vbInterface
)
1602 hr
= IVBSAXLexicalHandler_comment(
1603 This
->saxreader
->vblexicalHandler
, &bValue
);
1605 hr
= ISAXLexicalHandler_comment(
1606 This
->saxreader
->lexicalHandler
,
1607 bValue
, SysStringLen(bValue
));
1610 format_error_message_from_id(This
, hr
);
1613 static void libxmlFatalError(void *ctx
, const char *msg
, ...)
1615 saxlocator
*This
= ctx
;
1621 if(This
->ret
!= S_OK
) {
1622 xmlStopParser(This
->pParserCtxt
);
1626 va_start(args
, msg
);
1627 vsprintf(message
, msg
, args
);
1630 len
= MultiByteToWideChar(CP_UNIXCP
, 0, message
, -1, NULL
, 0);
1631 error
= heap_alloc(sizeof(WCHAR
)*len
);
1634 MultiByteToWideChar(CP_UNIXCP
, 0, message
, -1, error
, len
);
1635 TRACE("fatal error for %p: %s\n", This
, debugstr_w(error
));
1638 if(!has_error_handler(This
))
1640 xmlStopParser(This
->pParserCtxt
);
1646 FIXME("Error handling is not compatible.\n");
1648 if(This
->vbInterface
)
1650 BSTR bstrError
= SysAllocString(error
);
1651 IVBSAXErrorHandler_fatalError(This
->saxreader
->vberrorHandler
, &This
->IVBSAXLocator_iface
,
1652 &bstrError
, E_FAIL
);
1653 SysFreeString(bstrError
);
1656 ISAXErrorHandler_fatalError(This
->saxreader
->errorHandler
, &This
->ISAXLocator_iface
,
1661 xmlStopParser(This
->pParserCtxt
);
1665 static void libxmlCDataBlock(void *ctx
, const xmlChar
*value
, int len
)
1667 saxlocator
*This
= ctx
;
1669 xmlChar
*beg
= (xmlChar
*)This
->pParserCtxt
->input
->cur
-len
;
1673 BOOL lastEvent
= FALSE
, change
;
1675 update_position(This
, FALSE
);
1676 while(beg
-9>=This
->pParserCtxt
->input
->base
1677 && memcmp(beg
-9, "<![CDATA[", sizeof(char[9])))
1679 if(*beg
=='\n' || (*beg
=='\r' && *(beg
+1)!='\n'))
1684 for(; beg
>=This
->pParserCtxt
->input
->base
&& *beg
!='\n' && *beg
!='\r'; beg
--)
1687 if (has_lexical_handler(This
))
1689 if (This
->vbInterface
)
1690 hr
= IVBSAXLexicalHandler_startCDATA(This
->saxreader
->vblexicalHandler
);
1692 hr
= ISAXLexicalHandler_startCDATA(This
->saxreader
->lexicalHandler
);
1697 format_error_message_from_id(This
, hr
);
1701 realLen
= This
->pParserCtxt
->input
->cur
-beg
-3;
1707 while(end
-beg
<realLen
&& *end
!='\r') end
++;
1708 if(end
-beg
==realLen
)
1713 else if(end
-beg
==realLen
-1 && *end
=='\r' && *(end
+1)=='\n')
1716 if(*end
== '\r') change
= TRUE
;
1717 else change
= FALSE
;
1719 if(change
) *end
= '\n';
1721 if(has_content_handler(This
))
1723 Chars
= pooled_bstr_from_xmlCharN(&This
->saxreader
->pool
, cur
, end
-cur
+1);
1724 if(This
->vbInterface
)
1725 hr
= IVBSAXContentHandler_characters(
1726 This
->saxreader
->vbcontentHandler
, &Chars
);
1728 hr
= ISAXContentHandler_characters(
1729 This
->saxreader
->contentHandler
,
1730 Chars
, SysStringLen(Chars
));
1733 if(change
) *end
= '\r';
1738 This
->column
+= end
-cur
+2;
1743 if (has_lexical_handler(This
))
1745 if (This
->vbInterface
)
1746 hr
= IVBSAXLexicalHandler_endCDATA(This
->saxreader
->vblexicalHandler
);
1748 hr
= ISAXLexicalHandler_endCDATA(This
->saxreader
->lexicalHandler
);
1752 format_error_message_from_id(This
, hr
);
1754 This
->column
+= 4+end
-cur
;
1757 /*** IVBSAXLocator interface ***/
1758 /*** IUnknown methods ***/
1759 static HRESULT WINAPI
ivbsaxlocator_QueryInterface(IVBSAXLocator
* iface
, REFIID riid
, void **ppvObject
)
1761 saxlocator
*This
= impl_from_IVBSAXLocator( iface
);
1763 TRACE("%p %s %p\n", This
, debugstr_guid( riid
), ppvObject
);
1767 if ( IsEqualGUID( riid
, &IID_IUnknown
) ||
1768 IsEqualGUID( riid
, &IID_IDispatch
) ||
1769 IsEqualGUID( riid
, &IID_IVBSAXLocator
))
1773 else if ( IsEqualGUID( riid
, &IID_IVBSAXAttributes
))
1775 *ppvObject
= &This
->IVBSAXAttributes_iface
;
1779 FIXME("interface %s not implemented\n", debugstr_guid(riid
));
1780 return E_NOINTERFACE
;
1783 IVBSAXLocator_AddRef( iface
);
1788 static ULONG WINAPI
ivbsaxlocator_AddRef(IVBSAXLocator
* iface
)
1790 saxlocator
*This
= impl_from_IVBSAXLocator( iface
);
1791 TRACE("%p\n", This
);
1792 return InterlockedIncrement( &This
->ref
);
1795 static ULONG WINAPI
ivbsaxlocator_Release(
1796 IVBSAXLocator
* iface
)
1798 saxlocator
*This
= impl_from_IVBSAXLocator( iface
);
1799 return ISAXLocator_Release((ISAXLocator
*)&This
->IVBSAXLocator_iface
);
1802 /*** IDispatch methods ***/
1803 static HRESULT WINAPI
ivbsaxlocator_GetTypeInfoCount( IVBSAXLocator
*iface
, UINT
* pctinfo
)
1805 saxlocator
*This
= impl_from_IVBSAXLocator( iface
);
1807 TRACE("(%p)->(%p)\n", This
, pctinfo
);
1814 static HRESULT WINAPI
ivbsaxlocator_GetTypeInfo(
1815 IVBSAXLocator
*iface
,
1816 UINT iTInfo
, LCID lcid
, ITypeInfo
** ppTInfo
)
1818 saxlocator
*This
= impl_from_IVBSAXLocator( iface
);
1821 TRACE("(%p)->(%u %u %p)\n", This
, iTInfo
, lcid
, ppTInfo
);
1823 hr
= get_typeinfo(IVBSAXLocator_tid
, ppTInfo
);
1828 static HRESULT WINAPI
ivbsaxlocator_GetIDsOfNames(
1829 IVBSAXLocator
*iface
,
1831 LPOLESTR
* rgszNames
,
1836 saxlocator
*This
= impl_from_IVBSAXLocator( iface
);
1837 ITypeInfo
*typeinfo
;
1840 TRACE("(%p)->(%s %p %u %u %p)\n", This
, debugstr_guid(riid
), rgszNames
, cNames
,
1843 if(!rgszNames
|| cNames
== 0 || !rgDispId
)
1844 return E_INVALIDARG
;
1846 hr
= get_typeinfo(IVBSAXLocator_tid
, &typeinfo
);
1849 hr
= ITypeInfo_GetIDsOfNames(typeinfo
, rgszNames
, cNames
, rgDispId
);
1850 ITypeInfo_Release(typeinfo
);
1856 static HRESULT WINAPI
ivbsaxlocator_Invoke(
1857 IVBSAXLocator
*iface
,
1858 DISPID dispIdMember
,
1862 DISPPARAMS
* pDispParams
,
1863 VARIANT
* pVarResult
,
1864 EXCEPINFO
* pExcepInfo
,
1867 saxlocator
*This
= impl_from_IVBSAXLocator( iface
);
1868 ITypeInfo
*typeinfo
;
1871 TRACE("(%p)->(%d %s %d %d %p %p %p %p)\n", This
, dispIdMember
, debugstr_guid(riid
),
1872 lcid
, wFlags
, pDispParams
, pVarResult
, pExcepInfo
, puArgErr
);
1874 hr
= get_typeinfo(IVBSAXLocator_tid
, &typeinfo
);
1877 hr
= ITypeInfo_Invoke(typeinfo
, &This
->IVBSAXLocator_iface
, dispIdMember
, wFlags
,
1878 pDispParams
, pVarResult
, pExcepInfo
, puArgErr
);
1879 ITypeInfo_Release(typeinfo
);
1885 /*** IVBSAXLocator methods ***/
1886 static HRESULT WINAPI
ivbsaxlocator_get_columnNumber(
1887 IVBSAXLocator
* iface
,
1890 saxlocator
*This
= impl_from_IVBSAXLocator( iface
);
1891 return ISAXLocator_getColumnNumber((ISAXLocator
*)&This
->IVBSAXLocator_iface
, pnColumn
);
1894 static HRESULT WINAPI
ivbsaxlocator_get_lineNumber(
1895 IVBSAXLocator
* iface
,
1898 saxlocator
*This
= impl_from_IVBSAXLocator( iface
);
1899 return ISAXLocator_getLineNumber((ISAXLocator
*)&This
->IVBSAXLocator_iface
, pnLine
);
1902 static HRESULT WINAPI
ivbsaxlocator_get_publicId(
1903 IVBSAXLocator
* iface
,
1906 saxlocator
*This
= impl_from_IVBSAXLocator( iface
);
1907 return ISAXLocator_getPublicId((ISAXLocator
*)&This
->IVBSAXLocator_iface
,
1908 (const WCHAR
**)publicId
);
1911 static HRESULT WINAPI
ivbsaxlocator_get_systemId(
1912 IVBSAXLocator
* iface
,
1915 saxlocator
*This
= impl_from_IVBSAXLocator( iface
);
1916 return ISAXLocator_getSystemId((ISAXLocator
*)&This
->IVBSAXLocator_iface
,
1917 (const WCHAR
**)systemId
);
1920 static const struct IVBSAXLocatorVtbl VBSAXLocatorVtbl
=
1922 ivbsaxlocator_QueryInterface
,
1923 ivbsaxlocator_AddRef
,
1924 ivbsaxlocator_Release
,
1925 ivbsaxlocator_GetTypeInfoCount
,
1926 ivbsaxlocator_GetTypeInfo
,
1927 ivbsaxlocator_GetIDsOfNames
,
1928 ivbsaxlocator_Invoke
,
1929 ivbsaxlocator_get_columnNumber
,
1930 ivbsaxlocator_get_lineNumber
,
1931 ivbsaxlocator_get_publicId
,
1932 ivbsaxlocator_get_systemId
1935 /*** ISAXLocator interface ***/
1936 /*** IUnknown methods ***/
1937 static HRESULT WINAPI
isaxlocator_QueryInterface(ISAXLocator
* iface
, REFIID riid
, void **ppvObject
)
1939 saxlocator
*This
= impl_from_ISAXLocator( iface
);
1941 TRACE("%p %s %p\n", This
, debugstr_guid( riid
), ppvObject
);
1945 if ( IsEqualGUID( riid
, &IID_IUnknown
) ||
1946 IsEqualGUID( riid
, &IID_ISAXLocator
))
1950 else if ( IsEqualGUID( riid
, &IID_ISAXAttributes
))
1952 *ppvObject
= &This
->ISAXAttributes_iface
;
1956 WARN("interface %s not implemented\n", debugstr_guid(riid
));
1957 return E_NOINTERFACE
;
1960 ISAXLocator_AddRef( iface
);
1965 static ULONG WINAPI
isaxlocator_AddRef(ISAXLocator
* iface
)
1967 saxlocator
*This
= impl_from_ISAXLocator( iface
);
1968 ULONG ref
= InterlockedIncrement( &This
->ref
);
1969 TRACE("(%p)->(%d)\n", This
, ref
);
1973 static ULONG WINAPI
isaxlocator_Release(
1976 saxlocator
*This
= impl_from_ISAXLocator( iface
);
1977 LONG ref
= InterlockedDecrement( &This
->ref
);
1979 TRACE("(%p)->(%d)\n", This
, ref
);
1983 element_entry
*element
, *element2
;
1986 SysFreeString(This
->publicId
);
1987 SysFreeString(This
->systemId
);
1988 SysFreeString(This
->namespaceUri
);
1990 for(index
=0; index
<This
->nb_attributes
; index
++)
1992 SysFreeString(This
->attributes
[index
].szLocalname
);
1993 SysFreeString(This
->attributes
[index
].szValue
);
1994 SysFreeString(This
->attributes
[index
].szQName
);
1996 heap_free(This
->attributes
);
1999 LIST_FOR_EACH_ENTRY_SAFE(element
, element2
, &This
->elements
, element_entry
, entry
)
2001 list_remove(&element
->entry
);
2002 free_element_entry(element
);
2005 ISAXXMLReader_Release(&This
->saxreader
->ISAXXMLReader_iface
);
2012 /*** ISAXLocator methods ***/
2013 static HRESULT WINAPI
isaxlocator_getColumnNumber(
2017 saxlocator
*This
= impl_from_ISAXLocator( iface
);
2019 *pnColumn
= This
->column
;
2023 static HRESULT WINAPI
isaxlocator_getLineNumber(
2027 saxlocator
*This
= impl_from_ISAXLocator( iface
);
2029 *pnLine
= This
->line
;
2033 static HRESULT WINAPI
isaxlocator_getPublicId(
2035 const WCHAR
** ppwchPublicId
)
2038 saxlocator
*This
= impl_from_ISAXLocator( iface
);
2040 SysFreeString(This
->publicId
);
2042 publicId
= bstr_from_xmlChar(xmlSAX2GetPublicId(This
->pParserCtxt
));
2043 if(SysStringLen(publicId
))
2044 This
->publicId
= (WCHAR
*)&publicId
;
2047 SysFreeString(publicId
);
2048 This
->publicId
= NULL
;
2051 *ppwchPublicId
= This
->publicId
;
2055 static HRESULT WINAPI
isaxlocator_getSystemId(
2057 const WCHAR
** ppwchSystemId
)
2060 saxlocator
*This
= impl_from_ISAXLocator( iface
);
2062 SysFreeString(This
->systemId
);
2064 systemId
= bstr_from_xmlChar(xmlSAX2GetSystemId(This
->pParserCtxt
));
2065 if(SysStringLen(systemId
))
2066 This
->systemId
= (WCHAR
*)&systemId
;
2069 SysFreeString(systemId
);
2070 This
->systemId
= NULL
;
2073 *ppwchSystemId
= This
->systemId
;
2077 static const struct ISAXLocatorVtbl SAXLocatorVtbl
=
2079 isaxlocator_QueryInterface
,
2081 isaxlocator_Release
,
2082 isaxlocator_getColumnNumber
,
2083 isaxlocator_getLineNumber
,
2084 isaxlocator_getPublicId
,
2085 isaxlocator_getSystemId
2088 static HRESULT
SAXLocator_create(saxreader
*reader
, saxlocator
**ppsaxlocator
, BOOL vbInterface
)
2090 static const WCHAR w3xmlns
[] = { 'h','t','t','p',':','/','/', 'w','w','w','.','w','3','.',
2091 'o','r','g','/','2','0','0','0','/','x','m','l','n','s','/',0 };
2093 saxlocator
*locator
;
2095 locator
= heap_alloc( sizeof (*locator
) );
2097 return E_OUTOFMEMORY
;
2099 locator
->IVBSAXLocator_iface
.lpVtbl
= &VBSAXLocatorVtbl
;
2100 locator
->ISAXLocator_iface
.lpVtbl
= &SAXLocatorVtbl
;
2101 locator
->IVBSAXAttributes_iface
.lpVtbl
= &ivbsaxattributes_vtbl
;
2102 locator
->ISAXAttributes_iface
.lpVtbl
= &isaxattributes_vtbl
;
2104 locator
->vbInterface
= vbInterface
;
2106 locator
->saxreader
= reader
;
2107 ISAXXMLReader_AddRef(&reader
->ISAXXMLReader_iface
);
2109 locator
->pParserCtxt
= NULL
;
2110 locator
->publicId
= NULL
;
2111 locator
->systemId
= NULL
;
2112 locator
->line
= reader
->version
< MSXML4
? 0 : 1;
2113 locator
->column
= 0;
2114 locator
->ret
= S_OK
;
2115 if (locator
->saxreader
->version
>= MSXML6
)
2116 locator
->namespaceUri
= SysAllocString(w3xmlns
);
2118 locator
->namespaceUri
= SysAllocStringLen(NULL
, 0);
2119 if(!locator
->namespaceUri
)
2121 ISAXXMLReader_Release(&reader
->ISAXXMLReader_iface
);
2123 return E_OUTOFMEMORY
;
2126 locator
->attributesSize
= 8;
2127 locator
->nb_attributes
= 0;
2128 locator
->attributes
= heap_alloc(sizeof(struct _attributes
)*locator
->attributesSize
);
2129 if(!locator
->attributes
)
2131 ISAXXMLReader_Release(&reader
->ISAXXMLReader_iface
);
2132 SysFreeString(locator
->namespaceUri
);
2134 return E_OUTOFMEMORY
;
2137 list_init(&locator
->elements
);
2139 *ppsaxlocator
= locator
;
2141 TRACE("returning %p\n", *ppsaxlocator
);
2146 /*** SAXXMLReader internal functions ***/
2147 static HRESULT
internal_parseBuffer(saxreader
*This
, const char *buffer
, int size
, BOOL vbInterface
)
2149 xmlCharEncoding encoding
= XML_CHAR_ENCODING_NONE
;
2150 xmlChar
*enc_name
= NULL
;
2151 saxlocator
*locator
;
2154 TRACE("(%p)->(%p %d)\n", This
, buffer
, size
);
2156 hr
= SAXLocator_create(This
, &locator
, vbInterface
);
2162 const unsigned char *buff
= (unsigned char*)buffer
;
2164 encoding
= xmlDetectCharEncoding((xmlChar
*)buffer
, 4);
2165 enc_name
= (xmlChar
*)xmlGetCharEncodingName(encoding
);
2166 TRACE("detected encoding: %s\n", enc_name
);
2167 /* skip BOM, parser won't switch encodings and so won't skip it on its own */
2168 if ((encoding
== XML_CHAR_ENCODING_UTF8
) &&
2169 buff
[0] == 0xEF && buff
[1] == 0xBB && buff
[2] == 0xBF)
2176 /* if libxml2 detection failed try to guess */
2177 if (encoding
== XML_CHAR_ENCODING_NONE
)
2179 const WCHAR
*ptr
= (WCHAR
*)buffer
;
2180 /* xml declaration with possibly specfied encoding will be still handled by parser */
2181 if ((size
>= 2) && *ptr
== '<' && ptr
[1] != '?')
2183 enc_name
= (xmlChar
*)xmlGetCharEncodingName(XML_CHAR_ENCODING_UTF16LE
);
2184 encoding
= XML_CHAR_ENCODING_UTF16LE
;
2187 else if (encoding
== XML_CHAR_ENCODING_UTF8
)
2188 enc_name
= (xmlChar
*)xmlGetCharEncodingName(encoding
);
2192 locator
->pParserCtxt
= xmlCreateMemoryParserCtxt(buffer
, size
);
2193 if (!locator
->pParserCtxt
)
2195 ISAXLocator_Release(&locator
->ISAXLocator_iface
);
2201 locator
->pParserCtxt
->encoding
= xmlStrdup(enc_name
);
2202 if (encoding
== XML_CHAR_ENCODING_UTF16LE
) {
2203 TRACE("switching to %s\n", enc_name
);
2204 xmlSwitchEncoding(locator
->pParserCtxt
, encoding
);
2208 xmlFree(locator
->pParserCtxt
->sax
);
2209 locator
->pParserCtxt
->sax
= &locator
->saxreader
->sax
;
2210 locator
->pParserCtxt
->userData
= locator
;
2212 This
->isParsing
= TRUE
;
2213 if(xmlParseDocument(locator
->pParserCtxt
) == -1 && locator
->ret
== S_OK
)
2217 This
->isParsing
= FALSE
;
2219 if(locator
->pParserCtxt
)
2221 locator
->pParserCtxt
->sax
= NULL
;
2222 xmlFreeParserCtxt(locator
->pParserCtxt
);
2223 locator
->pParserCtxt
= NULL
;
2226 ISAXLocator_Release(&locator
->ISAXLocator_iface
);
2230 static HRESULT
internal_parseStream(saxreader
*This
, IStream
*stream
, BOOL vbInterface
)
2232 saxlocator
*locator
;
2239 hr
= IStream_Read(stream
, data
, sizeof(data
), &dataRead
);
2240 if(FAILED(hr
)) return hr
;
2242 hr
= SAXLocator_create(This
, &locator
, vbInterface
);
2243 if(FAILED(hr
)) return hr
;
2245 locator
->pParserCtxt
= xmlCreatePushParserCtxt(
2246 &locator
->saxreader
->sax
, locator
,
2247 data
, dataRead
, NULL
);
2248 if(!locator
->pParserCtxt
)
2250 ISAXLocator_Release(&locator
->ISAXLocator_iface
);
2254 This
->isParsing
= TRUE
;
2256 if(dataRead
!= sizeof(data
))
2258 ret
= xmlParseChunk(locator
->pParserCtxt
, data
, 0, 1);
2259 hr
= ret
!=XML_ERR_OK
&& locator
->ret
==S_OK
? E_FAIL
: locator
->ret
;
2266 hr
= IStream_Read(stream
, data
, sizeof(data
), &dataRead
);
2267 if (FAILED(hr
)) break;
2269 ret
= xmlParseChunk(locator
->pParserCtxt
, data
, dataRead
, 0);
2270 hr
= ret
!=XML_ERR_OK
&& locator
->ret
==S_OK
? E_FAIL
: locator
->ret
;
2272 if (hr
!= S_OK
) break;
2274 if (dataRead
!= sizeof(data
))
2276 ret
= xmlParseChunk(locator
->pParserCtxt
, data
, 0, 1);
2277 hr
= ret
!=XML_ERR_OK
&& locator
->ret
==S_OK
? E_FAIL
: locator
->ret
;
2283 This
->isParsing
= FALSE
;
2285 xmlFreeParserCtxt(locator
->pParserCtxt
);
2286 locator
->pParserCtxt
= NULL
;
2287 ISAXLocator_Release(&locator
->ISAXLocator_iface
);
2291 static HRESULT
internal_getEntityResolver(
2293 void *pEntityResolver
,
2296 FIXME("(%p)->(%p) stub\n", This
, pEntityResolver
);
2300 static HRESULT
internal_putEntityResolver(
2302 void *pEntityResolver
,
2305 FIXME("(%p)->(%p) stub\n", This
, pEntityResolver
);
2309 static HRESULT
internal_getContentHandler(
2311 void *pContentHandler
,
2314 TRACE("(%p)->(%p)\n", This
, pContentHandler
);
2315 if(pContentHandler
== NULL
)
2317 if((vbInterface
&& This
->vbcontentHandler
)
2318 || (!vbInterface
&& This
->contentHandler
))
2321 IVBSAXContentHandler_AddRef(This
->vbcontentHandler
);
2323 ISAXContentHandler_AddRef(This
->contentHandler
);
2325 if(vbInterface
) *(IVBSAXContentHandler
**)pContentHandler
=
2326 This
->vbcontentHandler
;
2327 else *(ISAXContentHandler
**)pContentHandler
= This
->contentHandler
;
2332 static HRESULT
internal_putContentHandler(
2334 void *contentHandler
,
2337 TRACE("(%p)->(%p)\n", This
, contentHandler
);
2341 IVBSAXContentHandler_AddRef((IVBSAXContentHandler
*)contentHandler
);
2343 ISAXContentHandler_AddRef((ISAXContentHandler
*)contentHandler
);
2345 if((vbInterface
&& This
->vbcontentHandler
)
2346 || (!vbInterface
&& This
->contentHandler
))
2349 IVBSAXContentHandler_Release(This
->vbcontentHandler
);
2351 ISAXContentHandler_Release(This
->contentHandler
);
2354 This
->vbcontentHandler
= contentHandler
;
2356 This
->contentHandler
= contentHandler
;
2361 static HRESULT
internal_getDTDHandler(
2366 FIXME("(%p)->(%p) stub\n", This
, pDTDHandler
);
2370 static HRESULT
internal_putDTDHandler(
2375 FIXME("(%p)->(%p) stub\n", This
, pDTDHandler
);
2379 static HRESULT
internal_getErrorHandler(
2381 void *pErrorHandler
,
2384 TRACE("(%p)->(%p)\n", This
, pErrorHandler
);
2385 if(pErrorHandler
== NULL
)
2388 if(vbInterface
&& This
->vberrorHandler
)
2389 IVBSAXErrorHandler_AddRef(This
->vberrorHandler
);
2390 else if(!vbInterface
&& This
->errorHandler
)
2391 ISAXErrorHandler_AddRef(This
->errorHandler
);
2394 *(IVBSAXErrorHandler
**)pErrorHandler
= This
->vberrorHandler
;
2396 *(ISAXErrorHandler
**)pErrorHandler
= This
->errorHandler
;
2402 static HRESULT
internal_putErrorHandler(
2407 TRACE("(%p)->(%p)\n", This
, errorHandler
);
2411 IVBSAXErrorHandler_AddRef((IVBSAXErrorHandler
*)errorHandler
);
2413 ISAXErrorHandler_AddRef((ISAXErrorHandler
*)errorHandler
);
2416 if(vbInterface
&& This
->vberrorHandler
)
2417 IVBSAXErrorHandler_Release(This
->vberrorHandler
);
2418 else if(!vbInterface
&& This
->errorHandler
)
2419 ISAXErrorHandler_Release(This
->errorHandler
);
2422 This
->vberrorHandler
= errorHandler
;
2424 This
->errorHandler
= errorHandler
;
2430 static HRESULT
internal_parse(
2437 TRACE("(%p)->(%s)\n", This
, debugstr_variant(&varInput
));
2439 /* Dispose of the BSTRs in the pool from a prior run, if any. */
2440 free_bstr_pool(&This
->pool
);
2442 switch(V_VT(&varInput
))
2445 hr
= internal_parseBuffer(This
, (const char*)V_BSTR(&varInput
),
2446 strlenW(V_BSTR(&varInput
))*sizeof(WCHAR
), vbInterface
);
2448 case VT_ARRAY
|VT_UI1
: {
2450 LONG lBound
, uBound
;
2453 hr
= SafeArrayGetLBound(V_ARRAY(&varInput
), 1, &lBound
);
2454 if(hr
!= S_OK
) break;
2455 hr
= SafeArrayGetUBound(V_ARRAY(&varInput
), 1, &uBound
);
2456 if(hr
!= S_OK
) break;
2457 dataRead
= (uBound
-lBound
)*SafeArrayGetElemsize(V_ARRAY(&varInput
));
2458 hr
= SafeArrayAccessData(V_ARRAY(&varInput
), &pSAData
);
2459 if(hr
!= S_OK
) break;
2460 hr
= internal_parseBuffer(This
, pSAData
, dataRead
, vbInterface
);
2461 SafeArrayUnaccessData(V_ARRAY(&varInput
));
2466 IPersistStream
*persistStream
;
2467 IStream
*stream
= NULL
;
2468 IXMLDOMDocument
*xmlDoc
;
2470 if(IUnknown_QueryInterface(V_UNKNOWN(&varInput
),
2471 &IID_IXMLDOMDocument
, (void**)&xmlDoc
) == S_OK
)
2475 IXMLDOMDocument_get_xml(xmlDoc
, &bstrData
);
2476 hr
= internal_parseBuffer(This
, (const char*)bstrData
,
2477 SysStringByteLen(bstrData
), vbInterface
);
2478 IXMLDOMDocument_Release(xmlDoc
);
2479 SysFreeString(bstrData
);
2483 if(IUnknown_QueryInterface(V_UNKNOWN(&varInput
),
2484 &IID_IPersistStream
, (void**)&persistStream
) == S_OK
)
2486 hr
= CreateStreamOnHGlobal(NULL
, TRUE
, &stream
);
2489 IPersistStream_Release(persistStream
);
2493 hr
= IPersistStream_Save(persistStream
, stream
, TRUE
);
2494 IPersistStream_Release(persistStream
);
2497 IStream_Release(stream
);
2502 if(stream
|| IUnknown_QueryInterface(V_UNKNOWN(&varInput
),
2503 &IID_IStream
, (void**)&stream
) == S_OK
)
2505 hr
= internal_parseStream(This
, stream
, vbInterface
);
2506 IStream_Release(stream
);
2511 WARN("vt %d not implemented\n", V_VT(&varInput
));
2518 static HRESULT
internal_vbonDataAvailable(void *obj
, char *ptr
, DWORD len
)
2520 saxreader
*This
= obj
;
2522 return internal_parseBuffer(This
, ptr
, len
, TRUE
);
2525 static HRESULT
internal_onDataAvailable(void *obj
, char *ptr
, DWORD len
)
2527 saxreader
*This
= obj
;
2529 return internal_parseBuffer(This
, ptr
, len
, FALSE
);
2532 static HRESULT
internal_parseURL(
2541 TRACE("(%p)->(%s)\n", This
, debugstr_w(url
));
2543 hr
= create_moniker_from_url(url
, &mon
);
2547 if(vbInterface
) hr
= bind_url(mon
, internal_vbonDataAvailable
, This
, &bsc
);
2548 else hr
= bind_url(mon
, internal_onDataAvailable
, This
, &bsc
);
2549 IMoniker_Release(mon
);
2554 return detach_bsc(bsc
);
2557 static HRESULT
internal_putProperty(
2563 TRACE("(%p)->(%s %s)\n", This
, debugstr_w(prop
), debugstr_variant(&value
));
2565 if(!memcmp(prop
, PropertyDeclHandlerW
, sizeof(PropertyDeclHandlerW
)))
2567 if(This
->isParsing
) return E_FAIL
;
2569 switch (V_VT(&value
))
2574 if (This
->vbdeclHandler
)
2576 IVBSAXDeclHandler_Release(This
->vbdeclHandler
);
2577 This
->vbdeclHandler
= NULL
;
2581 if (This
->declHandler
)
2583 ISAXDeclHandler_Release(This
->declHandler
);
2584 This
->declHandler
= NULL
;
2588 if ((vbInterface
&& This
->vbdeclHandler
) ||
2589 (!vbInterface
&& This
->declHandler
))
2592 IVBSAXDeclHandler_Release(This
->vbdeclHandler
);
2594 ISAXDeclHandler_Release(This
->declHandler
);
2597 if (V_UNKNOWN(&value
))
2599 return vbInterface
?
2600 IVBSAXDeclHandler_QueryInterface(V_UNKNOWN(&value
), &IID_IVBSAXDeclHandler
, (void**)&This
->vbdeclHandler
) :
2601 ISAXDeclHandler_QueryInterface(V_UNKNOWN(&value
), &IID_ISAXDeclHandler
, (void**)&This
->declHandler
);
2605 This
->vbdeclHandler
= NULL
;
2606 This
->declHandler
= NULL
;
2610 return E_INVALIDARG
;
2616 if(!memcmp(prop
, PropertyLexicalHandlerW
, sizeof(PropertyLexicalHandlerW
)))
2618 if(This
->isParsing
) return E_FAIL
;
2620 switch (V_VT(&value
))
2625 if (This
->vblexicalHandler
)
2627 IVBSAXLexicalHandler_Release(This
->vblexicalHandler
);
2628 This
->vblexicalHandler
= NULL
;
2632 if (This
->lexicalHandler
)
2634 ISAXLexicalHandler_Release(This
->lexicalHandler
);
2635 This
->lexicalHandler
= NULL
;
2639 if ((vbInterface
&& This
->vblexicalHandler
) ||
2640 (!vbInterface
&& This
->lexicalHandler
))
2643 IVBSAXLexicalHandler_Release(This
->vblexicalHandler
);
2645 ISAXLexicalHandler_Release(This
->lexicalHandler
);
2648 if (V_UNKNOWN(&value
))
2650 return vbInterface
?
2651 IVBSAXLexicalHandler_QueryInterface(V_UNKNOWN(&value
), &IID_IVBSAXLexicalHandler
, (void**)&This
->vblexicalHandler
) :
2652 ISAXLexicalHandler_QueryInterface(V_UNKNOWN(&value
), &IID_ISAXLexicalHandler
, (void**)&This
->lexicalHandler
);
2656 This
->vblexicalHandler
= NULL
;
2657 This
->lexicalHandler
= NULL
;
2662 return E_INVALIDARG
;
2668 if(!memcmp(prop
, PropertyMaxXMLSizeW
, sizeof(PropertyMaxXMLSizeW
)))
2670 if (V_VT(&value
) == VT_I4
&& V_I4(&value
) == 0) return S_OK
;
2671 FIXME("(%p)->(%s): max-xml-size unsupported\n", This
, debugstr_variant(&value
));
2675 if(!memcmp(prop
, PropertyMaxElementDepthW
, sizeof(PropertyMaxElementDepthW
)))
2677 if (V_VT(&value
) == VT_I4
&& V_I4(&value
) == 0) return S_OK
;
2678 FIXME("(%p)->(%s): max-element-depth unsupported\n", This
, debugstr_variant(&value
));
2682 FIXME("(%p)->(%s:%s): unsupported property\n", This
, debugstr_w(prop
), debugstr_variant(&value
));
2684 if(!memcmp(prop
, PropertyCharsetW
, sizeof(PropertyCharsetW
)))
2687 if(!memcmp(prop
, PropertyDomNodeW
, sizeof(PropertyDomNodeW
)))
2690 if(!memcmp(prop
, PropertyInputSourceW
, sizeof(PropertyInputSourceW
)))
2693 if(!memcmp(prop
, PropertySchemaDeclHandlerW
, sizeof(PropertySchemaDeclHandlerW
)))
2696 if(!memcmp(prop
, PropertyXMLDeclEncodingW
, sizeof(PropertyXMLDeclEncodingW
)))
2699 if(!memcmp(prop
, PropertyXMLDeclStandaloneW
, sizeof(PropertyXMLDeclStandaloneW
)))
2702 if(!memcmp(prop
, PropertyXMLDeclVersionW
, sizeof(PropertyXMLDeclVersionW
)))
2705 return E_INVALIDARG
;
2708 static HRESULT
internal_getProperty(const saxreader
* This
, const WCHAR
*prop
, VARIANT
*value
, BOOL vb
)
2710 TRACE("(%p)->(%s)\n", This
, debugstr_w(prop
));
2712 if (!value
) return E_POINTER
;
2714 if (!memcmp(PropertyLexicalHandlerW
, prop
, sizeof(PropertyLexicalHandlerW
)))
2716 V_VT(value
) = VT_UNKNOWN
;
2717 V_UNKNOWN(value
) = vb
? (IUnknown
*)This
->vblexicalHandler
: (IUnknown
*)This
->lexicalHandler
;
2718 if (V_UNKNOWN(value
)) IUnknown_AddRef(V_UNKNOWN(value
));
2722 if (!memcmp(PropertyDeclHandlerW
, prop
, sizeof(PropertyDeclHandlerW
)))
2724 V_VT(value
) = VT_UNKNOWN
;
2725 V_UNKNOWN(value
) = vb
? (IUnknown
*)This
->vbdeclHandler
: (IUnknown
*)This
->declHandler
;
2726 if (V_UNKNOWN(value
)) IUnknown_AddRef(V_UNKNOWN(value
));
2730 FIXME("(%p)->(%s) unsupported property\n", This
, debugstr_w(prop
));
2735 /*** IVBSAXXMLReader interface ***/
2736 /*** IUnknown methods ***/
2737 static HRESULT WINAPI
saxxmlreader_QueryInterface(IVBSAXXMLReader
* iface
, REFIID riid
, void **ppvObject
)
2739 saxreader
*This
= impl_from_IVBSAXXMLReader( iface
);
2741 TRACE("%p %s %p\n", This
, debugstr_guid( riid
), ppvObject
);
2745 if ( IsEqualGUID( riid
, &IID_IUnknown
) ||
2746 IsEqualGUID( riid
, &IID_IDispatch
) ||
2747 IsEqualGUID( riid
, &IID_IVBSAXXMLReader
))
2751 else if( IsEqualGUID( riid
, &IID_ISAXXMLReader
))
2753 *ppvObject
= &This
->ISAXXMLReader_iface
;
2755 else if (dispex_query_interface(&This
->dispex
, riid
, ppvObject
))
2757 return *ppvObject
? S_OK
: E_NOINTERFACE
;
2761 FIXME("interface %s not implemented\n", debugstr_guid(riid
));
2762 return E_NOINTERFACE
;
2765 IVBSAXXMLReader_AddRef( iface
);
2770 static ULONG WINAPI
saxxmlreader_AddRef(IVBSAXXMLReader
* iface
)
2772 saxreader
*This
= impl_from_IVBSAXXMLReader( iface
);
2773 TRACE("%p\n", This
);
2774 return InterlockedIncrement( &This
->ref
);
2777 static ULONG WINAPI
saxxmlreader_Release(
2778 IVBSAXXMLReader
* iface
)
2780 saxreader
*This
= impl_from_IVBSAXXMLReader( iface
);
2783 TRACE("%p\n", This
);
2785 ref
= InterlockedDecrement( &This
->ref
);
2788 if(This
->contentHandler
)
2789 ISAXContentHandler_Release(This
->contentHandler
);
2791 if(This
->vbcontentHandler
)
2792 IVBSAXContentHandler_Release(This
->vbcontentHandler
);
2794 if(This
->errorHandler
)
2795 ISAXErrorHandler_Release(This
->errorHandler
);
2797 if(This
->vberrorHandler
)
2798 IVBSAXErrorHandler_Release(This
->vberrorHandler
);
2800 if(This
->lexicalHandler
)
2801 ISAXLexicalHandler_Release(This
->lexicalHandler
);
2803 if(This
->vblexicalHandler
)
2804 IVBSAXLexicalHandler_Release(This
->vblexicalHandler
);
2806 if(This
->declHandler
)
2807 ISAXDeclHandler_Release(This
->declHandler
);
2809 if(This
->vbdeclHandler
)
2810 IVBSAXDeclHandler_Release(This
->vbdeclHandler
);
2812 free_bstr_pool(&This
->pool
);
2814 release_dispex(&This
->dispex
);
2821 static HRESULT WINAPI
saxxmlreader_GetTypeInfoCount( IVBSAXXMLReader
*iface
, UINT
* pctinfo
)
2823 saxreader
*This
= impl_from_IVBSAXXMLReader( iface
);
2824 return IDispatchEx_GetTypeInfoCount(&This
->dispex
.IDispatchEx_iface
, pctinfo
);
2827 static HRESULT WINAPI
saxxmlreader_GetTypeInfo(
2828 IVBSAXXMLReader
*iface
,
2829 UINT iTInfo
, LCID lcid
, ITypeInfo
** ppTInfo
)
2831 saxreader
*This
= impl_from_IVBSAXXMLReader( iface
);
2832 return IDispatchEx_GetTypeInfo(&This
->dispex
.IDispatchEx_iface
,
2833 iTInfo
, lcid
, ppTInfo
);
2836 static HRESULT WINAPI
saxxmlreader_GetIDsOfNames(
2837 IVBSAXXMLReader
*iface
,
2839 LPOLESTR
* rgszNames
,
2844 saxreader
*This
= impl_from_IVBSAXXMLReader( iface
);
2845 return IDispatchEx_GetIDsOfNames(&This
->dispex
.IDispatchEx_iface
,
2846 riid
, rgszNames
, cNames
, lcid
, rgDispId
);
2849 static HRESULT WINAPI
saxxmlreader_Invoke(
2850 IVBSAXXMLReader
*iface
,
2851 DISPID dispIdMember
,
2855 DISPPARAMS
* pDispParams
,
2856 VARIANT
* pVarResult
,
2857 EXCEPINFO
* pExcepInfo
,
2860 saxreader
*This
= impl_from_IVBSAXXMLReader( iface
);
2861 return IDispatchEx_Invoke(&This
->dispex
.IDispatchEx_iface
,
2862 dispIdMember
, riid
, lcid
, wFlags
, pDispParams
, pVarResult
, pExcepInfo
, puArgErr
);
2865 /*** IVBSAXXMLReader methods ***/
2866 static HRESULT WINAPI
saxxmlreader_getFeature(
2867 IVBSAXXMLReader
* iface
,
2868 const WCHAR
*feature_name
,
2869 VARIANT_BOOL
*value
)
2871 saxreader
*This
= impl_from_IVBSAXXMLReader( iface
);
2872 saxreader_feature feature
;
2874 TRACE("(%p)->(%s %p)\n", This
, debugstr_w(feature_name
), value
);
2876 feature
= get_saxreader_feature(feature_name
);
2877 if (feature
== Namespaces
|| feature
== NamespacePrefixes
)
2878 return get_feature_value(This
, feature
, value
);
2880 FIXME("(%p)->(%s %p) stub\n", This
, debugstr_w(feature_name
), value
);
2884 static HRESULT WINAPI
saxxmlreader_putFeature(
2885 IVBSAXXMLReader
* iface
,
2886 const WCHAR
*feature_name
,
2889 saxreader
*This
= impl_from_IVBSAXXMLReader( iface
);
2890 saxreader_feature feature
;
2892 TRACE("(%p)->(%s %x)\n", This
, debugstr_w(feature_name
), value
);
2894 feature
= get_saxreader_feature(feature_name
);
2896 /* accepted cases */
2897 if ((feature
== ExternalGeneralEntities
&& value
== VARIANT_FALSE
) ||
2898 (feature
== ExternalParameterEntities
&& value
== VARIANT_FALSE
) ||
2899 feature
== Namespaces
||
2900 feature
== NamespacePrefixes
)
2902 return set_feature_value(This
, feature
, value
);
2905 if (feature
== LexicalHandlerParEntities
|| feature
== ProhibitDTD
)
2907 FIXME("(%p)->(%s %x) stub\n", This
, debugstr_w(feature_name
), value
);
2908 return set_feature_value(This
, feature
, value
);
2911 FIXME("(%p)->(%s %x) stub\n", This
, debugstr_w(feature_name
), value
);
2915 static HRESULT WINAPI
saxxmlreader_getProperty(
2916 IVBSAXXMLReader
* iface
,
2920 saxreader
*This
= impl_from_IVBSAXXMLReader( iface
);
2921 return internal_getProperty(This
, prop
, value
, TRUE
);
2924 static HRESULT WINAPI
saxxmlreader_putProperty(
2925 IVBSAXXMLReader
* iface
,
2929 saxreader
*This
= impl_from_IVBSAXXMLReader( iface
);
2930 return internal_putProperty(This
, pProp
, value
, TRUE
);
2933 static HRESULT WINAPI
saxxmlreader_get_entityResolver(
2934 IVBSAXXMLReader
* iface
,
2935 IVBSAXEntityResolver
**pEntityResolver
)
2937 saxreader
*This
= impl_from_IVBSAXXMLReader( iface
);
2938 return internal_getEntityResolver(This
, pEntityResolver
, TRUE
);
2941 static HRESULT WINAPI
saxxmlreader_put_entityResolver(
2942 IVBSAXXMLReader
* iface
,
2943 IVBSAXEntityResolver
*pEntityResolver
)
2945 saxreader
*This
= impl_from_IVBSAXXMLReader( iface
);
2946 return internal_putEntityResolver(This
, pEntityResolver
, TRUE
);
2949 static HRESULT WINAPI
saxxmlreader_get_contentHandler(
2950 IVBSAXXMLReader
* iface
,
2951 IVBSAXContentHandler
**ppContentHandler
)
2953 saxreader
*This
= impl_from_IVBSAXXMLReader( iface
);
2954 return internal_getContentHandler(This
, ppContentHandler
, TRUE
);
2957 static HRESULT WINAPI
saxxmlreader_put_contentHandler(
2958 IVBSAXXMLReader
* iface
,
2959 IVBSAXContentHandler
*contentHandler
)
2961 saxreader
*This
= impl_from_IVBSAXXMLReader( iface
);
2962 return internal_putContentHandler(This
, contentHandler
, TRUE
);
2965 static HRESULT WINAPI
saxxmlreader_get_dtdHandler(
2966 IVBSAXXMLReader
* iface
,
2967 IVBSAXDTDHandler
**pDTDHandler
)
2969 saxreader
*This
= impl_from_IVBSAXXMLReader( iface
);
2970 return internal_getDTDHandler(This
, pDTDHandler
, TRUE
);
2973 static HRESULT WINAPI
saxxmlreader_put_dtdHandler(
2974 IVBSAXXMLReader
* iface
,
2975 IVBSAXDTDHandler
*pDTDHandler
)
2977 saxreader
*This
= impl_from_IVBSAXXMLReader( iface
);
2978 return internal_putDTDHandler(This
, pDTDHandler
, TRUE
);
2981 static HRESULT WINAPI
saxxmlreader_get_errorHandler(
2982 IVBSAXXMLReader
* iface
,
2983 IVBSAXErrorHandler
**pErrorHandler
)
2985 saxreader
*This
= impl_from_IVBSAXXMLReader( iface
);
2986 return internal_getErrorHandler(This
, pErrorHandler
, TRUE
);
2989 static HRESULT WINAPI
saxxmlreader_put_errorHandler(
2990 IVBSAXXMLReader
* iface
,
2991 IVBSAXErrorHandler
*errorHandler
)
2993 saxreader
*This
= impl_from_IVBSAXXMLReader( iface
);
2994 return internal_putErrorHandler(This
, errorHandler
, TRUE
);
2997 static HRESULT WINAPI
saxxmlreader_get_baseURL(
2998 IVBSAXXMLReader
* iface
,
2999 const WCHAR
**pBaseUrl
)
3001 saxreader
*This
= impl_from_IVBSAXXMLReader( iface
);
3003 FIXME("(%p)->(%p) stub\n", This
, pBaseUrl
);
3007 static HRESULT WINAPI
saxxmlreader_put_baseURL(
3008 IVBSAXXMLReader
* iface
,
3009 const WCHAR
*pBaseUrl
)
3011 saxreader
*This
= impl_from_IVBSAXXMLReader( iface
);
3013 FIXME("(%p)->(%s) stub\n", This
, debugstr_w(pBaseUrl
));
3017 static HRESULT WINAPI
saxxmlreader_get_secureBaseURL(
3018 IVBSAXXMLReader
* iface
,
3019 const WCHAR
**pSecureBaseUrl
)
3021 saxreader
*This
= impl_from_IVBSAXXMLReader( iface
);
3023 FIXME("(%p)->(%p) stub\n", This
, pSecureBaseUrl
);
3028 static HRESULT WINAPI
saxxmlreader_put_secureBaseURL(
3029 IVBSAXXMLReader
* iface
,
3030 const WCHAR
*secureBaseUrl
)
3032 saxreader
*This
= impl_from_IVBSAXXMLReader( iface
);
3034 FIXME("(%p)->(%s) stub\n", This
, debugstr_w(secureBaseUrl
));
3038 static HRESULT WINAPI
saxxmlreader_parse(
3039 IVBSAXXMLReader
* iface
,
3042 saxreader
*This
= impl_from_IVBSAXXMLReader( iface
);
3043 return internal_parse(This
, varInput
, TRUE
);
3046 static HRESULT WINAPI
saxxmlreader_parseURL(
3047 IVBSAXXMLReader
* iface
,
3050 saxreader
*This
= impl_from_IVBSAXXMLReader( iface
);
3051 return internal_parseURL(This
, url
, TRUE
);
3054 static const struct IVBSAXXMLReaderVtbl VBSAXXMLReaderVtbl
=
3056 saxxmlreader_QueryInterface
,
3057 saxxmlreader_AddRef
,
3058 saxxmlreader_Release
,
3059 saxxmlreader_GetTypeInfoCount
,
3060 saxxmlreader_GetTypeInfo
,
3061 saxxmlreader_GetIDsOfNames
,
3062 saxxmlreader_Invoke
,
3063 saxxmlreader_getFeature
,
3064 saxxmlreader_putFeature
,
3065 saxxmlreader_getProperty
,
3066 saxxmlreader_putProperty
,
3067 saxxmlreader_get_entityResolver
,
3068 saxxmlreader_put_entityResolver
,
3069 saxxmlreader_get_contentHandler
,
3070 saxxmlreader_put_contentHandler
,
3071 saxxmlreader_get_dtdHandler
,
3072 saxxmlreader_put_dtdHandler
,
3073 saxxmlreader_get_errorHandler
,
3074 saxxmlreader_put_errorHandler
,
3075 saxxmlreader_get_baseURL
,
3076 saxxmlreader_put_baseURL
,
3077 saxxmlreader_get_secureBaseURL
,
3078 saxxmlreader_put_secureBaseURL
,
3080 saxxmlreader_parseURL
3083 /*** ISAXXMLReader interface ***/
3084 /*** IUnknown methods ***/
3085 static HRESULT WINAPI
isaxxmlreader_QueryInterface(ISAXXMLReader
* iface
, REFIID riid
, void **ppvObject
)
3087 saxreader
*This
= impl_from_ISAXXMLReader( iface
);
3088 return saxxmlreader_QueryInterface(&This
->IVBSAXXMLReader_iface
, riid
, ppvObject
);
3091 static ULONG WINAPI
isaxxmlreader_AddRef(ISAXXMLReader
* iface
)
3093 saxreader
*This
= impl_from_ISAXXMLReader( iface
);
3094 return saxxmlreader_AddRef(&This
->IVBSAXXMLReader_iface
);
3097 static ULONG WINAPI
isaxxmlreader_Release(ISAXXMLReader
* iface
)
3099 saxreader
*This
= impl_from_ISAXXMLReader( iface
);
3100 return saxxmlreader_Release(&This
->IVBSAXXMLReader_iface
);
3103 /*** ISAXXMLReader methods ***/
3104 static HRESULT WINAPI
isaxxmlreader_getFeature(
3105 ISAXXMLReader
* iface
,
3106 const WCHAR
*pFeature
,
3107 VARIANT_BOOL
*pValue
)
3109 saxreader
*This
= impl_from_ISAXXMLReader( iface
);
3110 return IVBSAXXMLReader_getFeature(&This
->IVBSAXXMLReader_iface
, pFeature
, pValue
);
3113 static HRESULT WINAPI
isaxxmlreader_putFeature(
3114 ISAXXMLReader
* iface
,
3115 const WCHAR
*pFeature
,
3116 VARIANT_BOOL vfValue
)
3118 saxreader
*This
= impl_from_ISAXXMLReader( iface
);
3119 return IVBSAXXMLReader_putFeature(&This
->IVBSAXXMLReader_iface
, pFeature
, vfValue
);
3122 static HRESULT WINAPI
isaxxmlreader_getProperty(
3123 ISAXXMLReader
* iface
,
3127 saxreader
*This
= impl_from_ISAXXMLReader( iface
);
3128 return internal_getProperty(This
, prop
, value
, FALSE
);
3131 static HRESULT WINAPI
isaxxmlreader_putProperty(
3132 ISAXXMLReader
* iface
,
3136 saxreader
*This
= impl_from_ISAXXMLReader( iface
);
3137 return internal_putProperty(This
, pProp
, value
, FALSE
);
3140 static HRESULT WINAPI
isaxxmlreader_getEntityResolver(
3141 ISAXXMLReader
* iface
,
3142 ISAXEntityResolver
**ppEntityResolver
)
3144 saxreader
*This
= impl_from_ISAXXMLReader( iface
);
3145 return internal_getEntityResolver(This
, ppEntityResolver
, FALSE
);
3148 static HRESULT WINAPI
isaxxmlreader_putEntityResolver(
3149 ISAXXMLReader
* iface
,
3150 ISAXEntityResolver
*pEntityResolver
)
3152 saxreader
*This
= impl_from_ISAXXMLReader( iface
);
3153 return internal_putEntityResolver(This
, pEntityResolver
, FALSE
);
3156 static HRESULT WINAPI
isaxxmlreader_getContentHandler(
3157 ISAXXMLReader
* iface
,
3158 ISAXContentHandler
**pContentHandler
)
3160 saxreader
*This
= impl_from_ISAXXMLReader( iface
);
3161 return internal_getContentHandler(This
, pContentHandler
, FALSE
);
3164 static HRESULT WINAPI
isaxxmlreader_putContentHandler(
3165 ISAXXMLReader
* iface
,
3166 ISAXContentHandler
*contentHandler
)
3168 saxreader
*This
= impl_from_ISAXXMLReader( iface
);
3169 return internal_putContentHandler(This
, contentHandler
, FALSE
);
3172 static HRESULT WINAPI
isaxxmlreader_getDTDHandler(
3173 ISAXXMLReader
* iface
,
3174 ISAXDTDHandler
**pDTDHandler
)
3176 saxreader
*This
= impl_from_ISAXXMLReader( iface
);
3177 return internal_getDTDHandler(This
, pDTDHandler
, FALSE
);
3180 static HRESULT WINAPI
isaxxmlreader_putDTDHandler(
3181 ISAXXMLReader
* iface
,
3182 ISAXDTDHandler
*pDTDHandler
)
3184 saxreader
*This
= impl_from_ISAXXMLReader( iface
);
3185 return internal_putDTDHandler(This
, pDTDHandler
, FALSE
);
3188 static HRESULT WINAPI
isaxxmlreader_getErrorHandler(
3189 ISAXXMLReader
* iface
,
3190 ISAXErrorHandler
**pErrorHandler
)
3192 saxreader
*This
= impl_from_ISAXXMLReader( iface
);
3193 return internal_getErrorHandler(This
, pErrorHandler
, FALSE
);
3196 static HRESULT WINAPI
isaxxmlreader_putErrorHandler(
3197 ISAXXMLReader
* iface
,
3198 ISAXErrorHandler
*errorHandler
)
3200 saxreader
*This
= impl_from_ISAXXMLReader( iface
);
3201 return internal_putErrorHandler(This
, errorHandler
, FALSE
);
3204 static HRESULT WINAPI
isaxxmlreader_getBaseURL(
3205 ISAXXMLReader
* iface
,
3206 const WCHAR
**pBaseUrl
)
3208 saxreader
*This
= impl_from_ISAXXMLReader( iface
);
3209 return IVBSAXXMLReader_get_baseURL(&This
->IVBSAXXMLReader_iface
, pBaseUrl
);
3212 static HRESULT WINAPI
isaxxmlreader_putBaseURL(
3213 ISAXXMLReader
* iface
,
3214 const WCHAR
*pBaseUrl
)
3216 saxreader
*This
= impl_from_ISAXXMLReader( iface
);
3217 return IVBSAXXMLReader_put_baseURL(&This
->IVBSAXXMLReader_iface
, pBaseUrl
);
3220 static HRESULT WINAPI
isaxxmlreader_getSecureBaseURL(
3221 ISAXXMLReader
* iface
,
3222 const WCHAR
**pSecureBaseUrl
)
3224 saxreader
*This
= impl_from_ISAXXMLReader( iface
);
3225 return IVBSAXXMLReader_get_secureBaseURL(&This
->IVBSAXXMLReader_iface
, pSecureBaseUrl
);
3228 static HRESULT WINAPI
isaxxmlreader_putSecureBaseURL(
3229 ISAXXMLReader
* iface
,
3230 const WCHAR
*secureBaseUrl
)
3232 saxreader
*This
= impl_from_ISAXXMLReader( iface
);
3233 return IVBSAXXMLReader_put_secureBaseURL(&This
->IVBSAXXMLReader_iface
, secureBaseUrl
);
3236 static HRESULT WINAPI
isaxxmlreader_parse(
3237 ISAXXMLReader
* iface
,
3240 saxreader
*This
= impl_from_ISAXXMLReader( iface
);
3241 return internal_parse(This
, varInput
, FALSE
);
3244 static HRESULT WINAPI
isaxxmlreader_parseURL(
3245 ISAXXMLReader
* iface
,
3248 saxreader
*This
= impl_from_ISAXXMLReader( iface
);
3249 return internal_parseURL(This
, url
, FALSE
);
3252 static const struct ISAXXMLReaderVtbl SAXXMLReaderVtbl
=
3254 isaxxmlreader_QueryInterface
,
3255 isaxxmlreader_AddRef
,
3256 isaxxmlreader_Release
,
3257 isaxxmlreader_getFeature
,
3258 isaxxmlreader_putFeature
,
3259 isaxxmlreader_getProperty
,
3260 isaxxmlreader_putProperty
,
3261 isaxxmlreader_getEntityResolver
,
3262 isaxxmlreader_putEntityResolver
,
3263 isaxxmlreader_getContentHandler
,
3264 isaxxmlreader_putContentHandler
,
3265 isaxxmlreader_getDTDHandler
,
3266 isaxxmlreader_putDTDHandler
,
3267 isaxxmlreader_getErrorHandler
,
3268 isaxxmlreader_putErrorHandler
,
3269 isaxxmlreader_getBaseURL
,
3270 isaxxmlreader_putBaseURL
,
3271 isaxxmlreader_getSecureBaseURL
,
3272 isaxxmlreader_putSecureBaseURL
,
3273 isaxxmlreader_parse
,
3274 isaxxmlreader_parseURL
3277 static const tid_t saxreader_iface_tids
[] = {
3278 IVBSAXXMLReader_tid
,
3281 static dispex_static_data_t saxreader_dispex
= {
3283 IVBSAXXMLReader_tid
,
3285 saxreader_iface_tids
3288 HRESULT
SAXXMLReader_create(MSXML_VERSION version
, IUnknown
*outer
, LPVOID
*ppObj
)
3292 TRACE("(%p, %p)\n", outer
, ppObj
);
3294 reader
= heap_alloc( sizeof (*reader
) );
3296 return E_OUTOFMEMORY
;
3298 reader
->IVBSAXXMLReader_iface
.lpVtbl
= &VBSAXXMLReaderVtbl
;
3299 reader
->ISAXXMLReader_iface
.lpVtbl
= &SAXXMLReaderVtbl
;
3301 reader
->contentHandler
= NULL
;
3302 reader
->vbcontentHandler
= NULL
;
3303 reader
->errorHandler
= NULL
;
3304 reader
->vberrorHandler
= NULL
;
3305 reader
->lexicalHandler
= NULL
;
3306 reader
->vblexicalHandler
= NULL
;
3307 reader
->declHandler
= NULL
;
3308 reader
->vbdeclHandler
= NULL
;
3309 reader
->isParsing
= FALSE
;
3310 reader
->pool
.pool
= NULL
;
3311 reader
->pool
.index
= 0;
3312 reader
->pool
.len
= 0;
3313 reader
->features
= Namespaces
| NamespacePrefixes
;
3314 reader
->version
= version
;
3316 init_dispex(&reader
->dispex
, (IUnknown
*)&reader
->IVBSAXXMLReader_iface
, &saxreader_dispex
);
3318 memset(&reader
->sax
, 0, sizeof(xmlSAXHandler
));
3319 reader
->sax
.initialized
= XML_SAX2_MAGIC
;
3320 reader
->sax
.startDocument
= libxmlStartDocument
;
3321 reader
->sax
.endDocument
= libxmlEndDocument
;
3322 reader
->sax
.startElementNs
= libxmlStartElementNS
;
3323 reader
->sax
.endElementNs
= libxmlEndElementNS
;
3324 reader
->sax
.characters
= libxmlCharacters
;
3325 reader
->sax
.setDocumentLocator
= libxmlSetDocumentLocator
;
3326 reader
->sax
.comment
= libxmlComment
;
3327 reader
->sax
.error
= libxmlFatalError
;
3328 reader
->sax
.fatalError
= libxmlFatalError
;
3329 reader
->sax
.cdataBlock
= libxmlCDataBlock
;
3331 *ppObj
= &reader
->IVBSAXXMLReader_iface
;
3333 TRACE("returning iface %p\n", *ppObj
);
3340 HRESULT
SAXXMLReader_create(MSXML_VERSION version
, IUnknown
*pUnkOuter
, LPVOID
*ppObj
)
3342 MESSAGE("This program tried to use a SAX XML Reader object, but\n"
3343 "libxml2 support was not present at compile time.\n");