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"
46 #include "msxml_private.h"
48 WINE_DEFAULT_DEBUG_CHANNEL(msxml
);
54 ExhaustiveErrors
= 1 << 1,
55 ExternalGeneralEntities
= 1 << 2,
56 ExternalParameterEntities
= 1 << 3,
57 ForcedResync
= 1 << 4,
58 NamespacePrefixes
= 1 << 5,
60 ParameterEntities
= 1 << 7,
61 PreserveSystemIndentifiers
= 1 << 8,
63 SchemaValidation
= 1 << 10,
64 ServerHttpRequest
= 1 << 11,
65 SuppressValidationfatalError
= 1 << 12,
66 UseInlineSchema
= 1 << 13,
67 UseSchemaLocation
= 1 << 14,
68 LexicalHandlerParEntities
= 1 << 15
78 typedef struct _saxreader
80 IVBSAXXMLReader IVBSAXXMLReader_iface
;
81 ISAXXMLReader ISAXXMLReader_iface
;
83 struct ISAXContentHandler
*contentHandler
;
84 struct IVBSAXContentHandler
*vbcontentHandler
;
85 struct ISAXErrorHandler
*errorHandler
;
86 struct IVBSAXErrorHandler
*vberrorHandler
;
87 struct ISAXLexicalHandler
*lexicalHandler
;
88 struct IVBSAXLexicalHandler
*vblexicalHandler
;
89 struct ISAXDeclHandler
*declHandler
;
90 struct IVBSAXDeclHandler
*vbdeclHandler
;
94 enum ReaderFeatures features
;
95 MSXML_VERSION version
;
98 typedef struct _saxlocator
100 IVBSAXLocator IVBSAXLocator_iface
;
101 ISAXLocator ISAXLocator_iface
;
102 IVBSAXAttributes IVBSAXAttributes_iface
;
103 ISAXAttributes ISAXAttributes_iface
;
105 saxreader
*saxreader
;
107 xmlParserCtxtPtr pParserCtxt
;
137 static inline saxreader
*impl_from_IVBSAXXMLReader( IVBSAXXMLReader
*iface
)
139 return CONTAINING_RECORD(iface
, saxreader
, IVBSAXXMLReader_iface
);
142 static inline saxreader
*impl_from_ISAXXMLReader( ISAXXMLReader
*iface
)
144 return CONTAINING_RECORD(iface
, saxreader
, ISAXXMLReader_iface
);
147 static inline saxlocator
*impl_from_IVBSAXLocator( IVBSAXLocator
*iface
)
149 return CONTAINING_RECORD(iface
, saxlocator
, IVBSAXLocator_iface
);
152 static inline saxlocator
*impl_from_ISAXLocator( ISAXLocator
*iface
)
154 return CONTAINING_RECORD(iface
, saxlocator
, ISAXLocator_iface
);
157 static inline saxlocator
*impl_from_IVBSAXAttributes( IVBSAXAttributes
*iface
)
159 return CONTAINING_RECORD(iface
, saxlocator
, IVBSAXAttributes_iface
);
162 static inline saxlocator
*impl_from_ISAXAttributes( ISAXAttributes
*iface
)
164 return CONTAINING_RECORD(iface
, saxlocator
, ISAXAttributes_iface
);
168 static const WCHAR PropertyCharsetW
[] = {
169 'c','h','a','r','s','e','t',0
171 static const WCHAR PropertyDeclHandlerW
[] = {
172 'h','t','t','p',':','/','/','x','m','l','.','o','r','g','/',
173 's','a','x','/','p','r','o','p','e','r','t','i','e','s','/',
174 'd','e','c','l','a','r','a','t','i','o','n',
175 '-','h','a','n','d','l','e','r',0
177 static const WCHAR PropertyDomNodeW
[] = {
178 'h','t','t','p',':','/','/','x','m','l','.','o','r','g','/',
179 's','a','x','/','p','r','o','p','e','r','t','i','e','s','/',
180 'd','o','m','-','n','o','d','e',0
182 static const WCHAR PropertyInputSourceW
[] = {
183 'i','n','p','u','t','-','s','o','u','r','c','e',0
185 static const WCHAR PropertyLexicalHandlerW
[] = {
186 'h','t','t','p',':','/','/','x','m','l','.','o','r','g','/',
187 's','a','x','/','p','r','o','p','e','r','t','i','e','s','/',
188 'l','e','x','i','c','a','l','-','h','a','n','d','l','e','r',0
190 static const WCHAR PropertyMaxElementDepthW
[] = {
191 'm','a','x','-','e','l','e','m','e','n','t','-','d','e','p','t','h',0
193 static const WCHAR PropertyMaxXMLSizeW
[] = {
194 'm','a','x','-','x','m','l','-','s','i','z','e',0
196 static const WCHAR PropertySchemaDeclHandlerW
[] = {
197 's','c','h','e','m','a','-','d','e','c','l','a','r','a','t','i','o','n','-',
198 'h','a','n','d','l','e','r',0
200 static const WCHAR PropertyXMLDeclEncodingW
[] = {
201 'x','m','l','d','e','c','l','-','e','n','c','o','d','i','n','g',0
203 static const WCHAR PropertyXMLDeclStandaloneW
[] = {
204 'x','m','l','d','e','c','l','-','s','t','a','n','d','a','l','o','n','e',0
206 static const WCHAR PropertyXMLDeclVersionW
[] = {
207 'x','m','l','d','e','c','l','-','v','e','r','s','i','o','n',0
211 static const WCHAR FeatureExternalGeneralEntitiesW
[] = {
212 'h','t','t','p',':','/','/','x','m','l','.','o','r','g','/','s','a','x','/',
213 'f','e','a','t','u','r','e','s','/','e','x','t','e','r','n','a','l','-','g','e','n','e','r','a','l',
214 '-','e','n','t','i','t','i','e','s',0
217 static const WCHAR FeatureExternalParameterEntitiesW
[] = {
218 'h','t','t','p',':','/','/','x','m','l','.','o','r','g','/','s','a','x','/','f','e','a','t','u','r','e','s',
219 '/','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
222 static const WCHAR FeatureLexicalHandlerParEntitiesW
[] = {
223 'h','t','t','p',':','/','/','x','m','l','.','o','r','g','/','s','a','x','/','f','e','a','t','u','r','e','s',
224 '/','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
227 static const WCHAR FeatureProhibitDTDW
[] = {
228 'p','r','o','h','i','b','i','t','-','d','t','d',0
231 static const WCHAR FeatureNamespacesW
[] = {
232 'h','t','t','p',':','/','/','x','m','l','.','o','r','g','/','s','a','x','/','f','e','a','t','u','r','e','s',
233 '/','n','a','m','e','s','p','a','c','e','s',0
236 static inline HRESULT
set_feature_value(saxreader
*reader
, enum ReaderFeatures feature
, VARIANT_BOOL value
)
238 if (value
== VARIANT_TRUE
)
239 reader
->features
|= feature
;
241 reader
->features
&= ~feature
;
246 static inline HRESULT
get_feature_value(const saxreader
*reader
, enum ReaderFeatures feature
, VARIANT_BOOL
*value
)
248 *value
= reader
->features
& feature
? VARIANT_TRUE
: VARIANT_FALSE
;
252 static inline BOOL
has_content_handler(const saxlocator
*locator
)
254 return (locator
->vbInterface
&& locator
->saxreader
->vbcontentHandler
) ||
255 (!locator
->vbInterface
&& locator
->saxreader
->contentHandler
);
258 static inline BOOL
has_error_handler(const saxlocator
*locator
)
260 return (locator
->vbInterface
&& locator
->saxreader
->vberrorHandler
) ||
261 (!locator
->vbInterface
&& locator
->saxreader
->errorHandler
);
264 static HRESULT
namespacePush(saxlocator
*locator
, const xmlChar
*prefix
,
267 if(locator
->nsStackLast
>=locator
->nsStackSize
)
269 struct nsstack
*new_stack
;
271 new_stack
= HeapReAlloc(GetProcessHeap(), 0,
272 locator
->nsStack
, sizeof(struct nsstack
)*locator
->nsStackSize
*2);
273 if(!new_stack
) return E_OUTOFMEMORY
;
274 locator
->nsStack
= new_stack
;
275 locator
->nsStackSize
*= 2;
278 locator
->nsStack
[locator
->nsStackLast
].ptr
= uri
;
281 locator
->nsStack
[locator
->nsStackLast
].prefix
= bstr_from_xmlChar(prefix
);
282 if(!locator
->nsStack
[locator
->nsStackLast
].prefix
)
283 return E_OUTOFMEMORY
;
284 locator
->nsStack
[locator
->nsStackLast
].uri
= bstr_from_xmlChar(uri
);
285 if(!locator
->nsStack
[locator
->nsStackLast
].uri
)
287 SysFreeString(locator
->nsStack
[locator
->nsStackLast
].prefix
);
288 return E_OUTOFMEMORY
;
293 locator
->nsStack
[locator
->nsStackLast
].prefix
= NULL
;
294 locator
->nsStack
[locator
->nsStackLast
].uri
= NULL
;
297 locator
->nsStackLast
++;
302 static HRESULT
namespacePop(saxlocator
*locator
)
304 if(locator
->nsStackLast
== 0)
306 ERR("namespace stack is empty\n");
310 SysFreeString(locator
->nsStack
[--locator
->nsStackLast
].prefix
);
311 SysFreeString(locator
->nsStack
[locator
->nsStackLast
].uri
);
312 locator
->nsStack
[locator
->nsStackLast
].prefix
= NULL
;
313 locator
->nsStack
[locator
->nsStackLast
].uri
= NULL
;
317 static BSTR
namespaceFind(saxlocator
*locator
, const xmlChar
*ptr
)
321 for(i
=locator
->nsStackLast
-1; i
>=0; i
--)
323 if(ptr
== locator
->nsStack
[i
].ptr
)
324 return locator
->nsStack
[i
].uri
;
327 ERR("namespace not found\n");
331 static BOOL
bstr_pool_insert(struct bstrpool
*pool
, BSTR pool_entry
)
335 pool
->pool
= HeapAlloc(GetProcessHeap(), 0, 16 * sizeof(*pool
->pool
));
342 else if (pool
->index
== pool
->len
)
344 BSTR
*realloc
= HeapReAlloc(GetProcessHeap(), 0, pool
->pool
, pool
->len
* 2 * sizeof(*realloc
));
349 pool
->pool
= realloc
;
353 pool
->pool
[pool
->index
++] = pool_entry
;
357 static void free_bstr_pool(struct bstrpool
*pool
)
361 for (i
= 0; i
< pool
->index
; i
++)
362 SysFreeString(pool
->pool
[i
]);
364 HeapFree(GetProcessHeap(), 0, pool
->pool
);
367 pool
->index
= pool
->len
= 0;
370 static BSTR
bstr_from_xmlCharN(const xmlChar
*buf
, int len
)
378 dLen
= MultiByteToWideChar(CP_UTF8
, 0, (LPCSTR
)buf
, len
, NULL
, 0);
379 if(len
!= -1) dLen
++;
380 bstr
= SysAllocStringLen(NULL
, dLen
-1);
383 MultiByteToWideChar(CP_UTF8
, 0, (LPCSTR
)buf
, len
, bstr
, dLen
);
384 if(len
!= -1) bstr
[dLen
-1] = '\0';
389 static BSTR
QName_from_xmlChar(const xmlChar
*prefix
, const xmlChar
*name
)
394 if(!name
) return NULL
;
396 if(!prefix
|| !*prefix
)
397 return bstr_from_xmlChar(name
);
399 qname
= xmlBuildQName(name
, prefix
, NULL
, 0);
400 bstr
= bstr_from_xmlChar(qname
);
406 static BSTR
pooled_bstr_from_xmlChar(struct bstrpool
*pool
, const xmlChar
*buf
)
408 BSTR pool_entry
= bstr_from_xmlChar(buf
);
410 if (pool_entry
&& !bstr_pool_insert(pool
, pool_entry
))
412 SysFreeString(pool_entry
);
419 static BSTR
pooled_bstr_from_xmlCharN(struct bstrpool
*pool
, const xmlChar
*buf
, int len
)
421 BSTR pool_entry
= bstr_from_xmlCharN(buf
, len
);
423 if (pool_entry
&& !bstr_pool_insert(pool
, pool_entry
))
425 SysFreeString(pool_entry
);
432 static BSTR
pooled_QName_from_xmlChar(struct bstrpool
*pool
, const xmlChar
*prefix
, const xmlChar
*name
)
434 BSTR pool_entry
= QName_from_xmlChar(prefix
, name
);
436 if (pool_entry
&& !bstr_pool_insert(pool
, pool_entry
))
438 SysFreeString(pool_entry
);
445 static void format_error_message_from_id(saxlocator
*This
, HRESULT hr
)
447 xmlStopParser(This
->pParserCtxt
);
450 if(has_error_handler(This
))
453 if(!FormatMessageW(FORMAT_MESSAGE_FROM_SYSTEM
,
454 NULL
, hr
, 0, msg
, sizeof(msg
), NULL
))
456 FIXME("MSXML errors not yet supported.\n");
460 if(This
->vbInterface
)
462 BSTR bstrMsg
= SysAllocString(msg
);
463 IVBSAXErrorHandler_fatalError(This
->saxreader
->vberrorHandler
,
464 &This
->IVBSAXLocator_iface
, &bstrMsg
, hr
);
465 SysFreeString(bstrMsg
);
468 ISAXErrorHandler_fatalError(This
->saxreader
->errorHandler
,
469 &This
->ISAXLocator_iface
, msg
, hr
);
473 static void update_position(saxlocator
*This
, xmlChar
*end
)
475 if(This
->lastCur
== NULL
)
477 This
->lastCur
= (xmlChar
*)This
->pParserCtxt
->input
->base
;
479 This
->realColumn
= 1;
481 else if(This
->lastCur
< This
->pParserCtxt
->input
->base
)
483 This
->lastCur
= (xmlChar
*)This
->pParserCtxt
->input
->base
;
485 This
->realColumn
= 1;
488 if(This
->pParserCtxt
->input
->cur
<This
->lastCur
)
490 This
->lastCur
= (xmlChar
*)This
->pParserCtxt
->input
->base
;
492 This
->realColumn
= 1;
495 if(!end
) end
= (xmlChar
*)This
->pParserCtxt
->input
->cur
;
497 while(This
->lastCur
< end
)
499 if(*(This
->lastCur
) == '\n')
502 This
->realColumn
= 1;
504 else if(*(This
->lastCur
) == '\r' &&
505 (This
->lastCur
==This
->pParserCtxt
->input
->end
||
506 *(This
->lastCur
+1)!='\n'))
509 This
->realColumn
= 1;
511 else This
->realColumn
++;
515 /* Count multibyte UTF8 encoded characters once */
516 while((*(This
->lastCur
)&0xC0) == 0x80) This
->lastCur
++;
519 This
->line
= This
->realLine
;
520 This
->column
= This
->realColumn
;
523 /*** IVBSAXAttributes interface ***/
524 /*** IUnknown methods ***/
525 static HRESULT WINAPI
ivbsaxattributes_QueryInterface(
526 IVBSAXAttributes
* iface
,
530 saxlocator
*This
= impl_from_IVBSAXAttributes(iface
);
531 TRACE("%p %s %p\n", This
, debugstr_guid(riid
), ppvObject
);
532 return IVBSAXLocator_QueryInterface(&This
->IVBSAXLocator_iface
, riid
, ppvObject
);
535 static ULONG WINAPI
ivbsaxattributes_AddRef(IVBSAXAttributes
* iface
)
537 saxlocator
*This
= impl_from_IVBSAXAttributes(iface
);
538 return ISAXLocator_AddRef(&This
->ISAXLocator_iface
);
541 static ULONG WINAPI
ivbsaxattributes_Release(IVBSAXAttributes
* iface
)
543 saxlocator
*This
= impl_from_IVBSAXAttributes(iface
);
544 return ISAXLocator_Release(&This
->ISAXLocator_iface
);
547 /*** IDispatch methods ***/
548 static HRESULT WINAPI
ivbsaxattributes_GetTypeInfoCount( IVBSAXAttributes
*iface
, UINT
* pctinfo
)
550 saxlocator
*This
= impl_from_IVBSAXAttributes( iface
);
552 TRACE("(%p)->(%p)\n", This
, pctinfo
);
559 static HRESULT WINAPI
ivbsaxattributes_GetTypeInfo(
560 IVBSAXAttributes
*iface
,
561 UINT iTInfo
, LCID lcid
, ITypeInfo
** ppTInfo
)
563 saxlocator
*This
= impl_from_IVBSAXAttributes( iface
);
566 TRACE("(%p)->(%u %u %p)\n", This
, iTInfo
, lcid
, ppTInfo
);
568 hr
= get_typeinfo(IVBSAXAttributes_tid
, ppTInfo
);
573 static HRESULT WINAPI
ivbsaxattributes_GetIDsOfNames(
574 IVBSAXAttributes
*iface
,
581 saxlocator
*This
= impl_from_IVBSAXAttributes( iface
);
585 TRACE("(%p)->(%s %p %u %u %p)\n", This
, debugstr_guid(riid
), rgszNames
, cNames
,
588 if(!rgszNames
|| cNames
== 0 || !rgDispId
)
591 hr
= get_typeinfo(IVBSAXAttributes_tid
, &typeinfo
);
594 hr
= ITypeInfo_GetIDsOfNames(typeinfo
, rgszNames
, cNames
, rgDispId
);
595 ITypeInfo_Release(typeinfo
);
601 static HRESULT WINAPI
ivbsaxattributes_Invoke(
602 IVBSAXAttributes
*iface
,
607 DISPPARAMS
* pDispParams
,
609 EXCEPINFO
* pExcepInfo
,
612 saxlocator
*This
= impl_from_IVBSAXAttributes( iface
);
616 TRACE("(%p)->(%d %s %d %d %p %p %p %p)\n", This
, dispIdMember
, debugstr_guid(riid
),
617 lcid
, wFlags
, pDispParams
, pVarResult
, pExcepInfo
, puArgErr
);
619 hr
= get_typeinfo(IVBSAXAttributes_tid
, &typeinfo
);
622 hr
= ITypeInfo_Invoke(typeinfo
, &This
->IVBSAXAttributes_iface
, dispIdMember
, wFlags
,
623 pDispParams
, pVarResult
, pExcepInfo
, puArgErr
);
624 ITypeInfo_Release(typeinfo
);
630 /*** IVBSAXAttributes methods ***/
631 static HRESULT WINAPI
ivbsaxattributes_get_length(
632 IVBSAXAttributes
* iface
,
635 saxlocator
*This
= impl_from_IVBSAXAttributes( iface
);
636 return ISAXAttributes_getLength(&This
->ISAXAttributes_iface
, nLength
);
639 static HRESULT WINAPI
ivbsaxattributes_getURI(
640 IVBSAXAttributes
* iface
,
645 saxlocator
*This
= impl_from_IVBSAXAttributes( iface
);
646 return ISAXAttributes_getURI(&This
->ISAXAttributes_iface
, nIndex
, (const WCHAR
**)uri
, &len
);
649 static HRESULT WINAPI
ivbsaxattributes_getLocalName(
650 IVBSAXAttributes
* iface
,
655 saxlocator
*This
= impl_from_IVBSAXAttributes( iface
);
656 return ISAXAttributes_getLocalName(&This
->ISAXAttributes_iface
, nIndex
,
657 (const WCHAR
**)localName
, &len
);
660 static HRESULT WINAPI
ivbsaxattributes_getQName(
661 IVBSAXAttributes
* iface
,
666 saxlocator
*This
= impl_from_IVBSAXAttributes( iface
);
667 return ISAXAttributes_getQName(&This
->ISAXAttributes_iface
, nIndex
, (const WCHAR
**)QName
, &len
);
670 static HRESULT WINAPI
ivbsaxattributes_getIndexFromName(
671 IVBSAXAttributes
* iface
,
676 saxlocator
*This
= impl_from_IVBSAXAttributes( iface
);
677 return ISAXAttributes_getIndexFromName(&This
->ISAXAttributes_iface
, uri
, SysStringLen(uri
),
678 localName
, SysStringLen(localName
), index
);
681 static HRESULT WINAPI
ivbsaxattributes_getIndexFromQName(
682 IVBSAXAttributes
* iface
,
686 saxlocator
*This
= impl_from_IVBSAXAttributes( iface
);
687 return ISAXAttributes_getIndexFromQName(&This
->ISAXAttributes_iface
, QName
,
688 SysStringLen(QName
), index
);
691 static HRESULT WINAPI
ivbsaxattributes_getType(
692 IVBSAXAttributes
* iface
,
697 saxlocator
*This
= impl_from_IVBSAXAttributes( iface
);
698 return ISAXAttributes_getType(&This
->ISAXAttributes_iface
, nIndex
, (const WCHAR
**)type
, &len
);
701 static HRESULT WINAPI
ivbsaxattributes_getTypeFromName(
702 IVBSAXAttributes
* iface
,
708 saxlocator
*This
= impl_from_IVBSAXAttributes( iface
);
709 return ISAXAttributes_getTypeFromName(&This
->ISAXAttributes_iface
, uri
, SysStringLen(uri
),
710 localName
, SysStringLen(localName
), (const WCHAR
**)type
, &len
);
713 static HRESULT WINAPI
ivbsaxattributes_getTypeFromQName(
714 IVBSAXAttributes
* iface
,
719 saxlocator
*This
= impl_from_IVBSAXAttributes( iface
);
720 return ISAXAttributes_getTypeFromQName(&This
->ISAXAttributes_iface
, QName
, SysStringLen(QName
),
721 (const WCHAR
**)type
, &len
);
724 static HRESULT WINAPI
ivbsaxattributes_getValue(
725 IVBSAXAttributes
* iface
,
730 saxlocator
*This
= impl_from_IVBSAXAttributes( iface
);
731 return ISAXAttributes_getValue(&This
->ISAXAttributes_iface
, nIndex
, (const WCHAR
**)value
, &len
);
734 static HRESULT WINAPI
ivbsaxattributes_getValueFromName(
735 IVBSAXAttributes
* iface
,
741 saxlocator
*This
= impl_from_IVBSAXAttributes( iface
);
742 return ISAXAttributes_getValueFromName(&This
->ISAXAttributes_iface
, uri
, SysStringLen(uri
),
743 localName
, SysStringLen(localName
), (const WCHAR
**)value
, &len
);
746 static HRESULT WINAPI
ivbsaxattributes_getValueFromQName(
747 IVBSAXAttributes
* iface
,
752 saxlocator
*This
= impl_from_IVBSAXAttributes( iface
);
753 return ISAXAttributes_getValueFromQName(&This
->ISAXAttributes_iface
, QName
,
754 SysStringLen(QName
), (const WCHAR
**)value
, &len
);
757 static const struct IVBSAXAttributesVtbl ivbsaxattributes_vtbl
=
759 ivbsaxattributes_QueryInterface
,
760 ivbsaxattributes_AddRef
,
761 ivbsaxattributes_Release
,
762 ivbsaxattributes_GetTypeInfoCount
,
763 ivbsaxattributes_GetTypeInfo
,
764 ivbsaxattributes_GetIDsOfNames
,
765 ivbsaxattributes_Invoke
,
766 ivbsaxattributes_get_length
,
767 ivbsaxattributes_getURI
,
768 ivbsaxattributes_getLocalName
,
769 ivbsaxattributes_getQName
,
770 ivbsaxattributes_getIndexFromName
,
771 ivbsaxattributes_getIndexFromQName
,
772 ivbsaxattributes_getType
,
773 ivbsaxattributes_getTypeFromName
,
774 ivbsaxattributes_getTypeFromQName
,
775 ivbsaxattributes_getValue
,
776 ivbsaxattributes_getValueFromName
,
777 ivbsaxattributes_getValueFromQName
780 /*** ISAXAttributes interface ***/
781 /*** IUnknown methods ***/
782 static HRESULT WINAPI
isaxattributes_QueryInterface(
783 ISAXAttributes
* iface
,
787 saxlocator
*This
= impl_from_ISAXAttributes(iface
);
788 TRACE("%p %s %p\n", This
, debugstr_guid(riid
), ppvObject
);
789 return ISAXLocator_QueryInterface(&This
->ISAXLocator_iface
, riid
, ppvObject
);
792 static ULONG WINAPI
isaxattributes_AddRef(ISAXAttributes
* iface
)
794 saxlocator
*This
= impl_from_ISAXAttributes(iface
);
796 return ISAXLocator_AddRef(&This
->ISAXLocator_iface
);
799 static ULONG WINAPI
isaxattributes_Release(ISAXAttributes
* iface
)
801 saxlocator
*This
= impl_from_ISAXAttributes(iface
);
804 return ISAXLocator_Release(&This
->ISAXLocator_iface
);
807 /*** ISAXAttributes methods ***/
808 static HRESULT WINAPI
isaxattributes_getLength(
809 ISAXAttributes
* iface
,
812 saxlocator
*This
= impl_from_ISAXAttributes( iface
);
814 *length
= This
->nb_attributes
;
815 TRACE("Length set to %d\n", *length
);
819 static HRESULT WINAPI
isaxattributes_getURI(
820 ISAXAttributes
* iface
,
825 saxlocator
*This
= impl_from_ISAXAttributes( iface
);
826 TRACE("(%p)->(%d)\n", This
, index
);
828 if(index
>= This
->nb_attributes
|| index
< 0) return E_INVALIDARG
;
829 if(!url
|| !size
) return E_POINTER
;
831 *size
= SysStringLen(This
->attributes
[index
].szURI
);
832 *url
= This
->attributes
[index
].szURI
;
834 TRACE("(%s:%d)\n", debugstr_w(This
->attributes
[index
].szURI
), *size
);
839 static HRESULT WINAPI
isaxattributes_getLocalName(
840 ISAXAttributes
* iface
,
842 const WCHAR
**pLocalName
,
843 int *pLocalNameLength
)
845 saxlocator
*This
= impl_from_ISAXAttributes( iface
);
846 TRACE("(%p)->(%d)\n", This
, nIndex
);
848 if(nIndex
>=This
->nb_attributes
|| nIndex
<0) return E_INVALIDARG
;
849 if(!pLocalName
|| !pLocalNameLength
) return E_POINTER
;
851 *pLocalNameLength
= SysStringLen(This
->attributes
[nIndex
].szLocalname
);
852 *pLocalName
= This
->attributes
[nIndex
].szLocalname
;
857 static HRESULT WINAPI
isaxattributes_getQName(
858 ISAXAttributes
* iface
,
860 const WCHAR
**pQName
,
863 saxlocator
*This
= impl_from_ISAXAttributes( iface
);
864 TRACE("(%p)->(%d)\n", This
, nIndex
);
866 if(nIndex
>=This
->nb_attributes
|| nIndex
<0) return E_INVALIDARG
;
867 if(!pQName
|| !pQNameLength
) return E_POINTER
;
869 *pQNameLength
= SysStringLen(This
->attributes
[nIndex
].szQName
);
870 *pQName
= This
->attributes
[nIndex
].szQName
;
875 static HRESULT WINAPI
isaxattributes_getName(
876 ISAXAttributes
* iface
,
880 const WCHAR
**localName
,
885 saxlocator
*This
= impl_from_ISAXAttributes( iface
);
886 TRACE("(%p)->(%d)\n", This
, index
);
888 if(index
>=This
->nb_attributes
|| index
<0) return E_INVALIDARG
;
889 if(!uri
|| !pUriLength
|| !localName
|| !pLocalNameSize
890 || !QName
|| !pQNameLength
) return E_POINTER
;
892 *pUriLength
= SysStringLen(This
->attributes
[index
].szURI
);
893 *uri
= This
->attributes
[index
].szURI
;
894 *pLocalNameSize
= SysStringLen(This
->attributes
[index
].szLocalname
);
895 *localName
= This
->attributes
[index
].szLocalname
;
896 *pQNameLength
= SysStringLen(This
->attributes
[index
].szQName
);
897 *QName
= This
->attributes
[index
].szQName
;
899 TRACE("(%s, %s, %s)\n", debugstr_w(*uri
), debugstr_w(*localName
), debugstr_w(*QName
));
904 static HRESULT WINAPI
isaxattributes_getIndexFromName(
905 ISAXAttributes
* iface
,
908 const WCHAR
*pLocalName
,
912 saxlocator
*This
= impl_from_ISAXAttributes( iface
);
914 TRACE("(%p)->(%s, %d, %s, %d)\n", This
, debugstr_w(pUri
), cUriLength
,
915 debugstr_w(pLocalName
), cocalNameLength
);
917 if(!pUri
|| !pLocalName
|| !index
) return E_POINTER
;
919 for(i
=0; i
<This
->nb_attributes
; i
++)
921 if(cUriLength
!=SysStringLen(This
->attributes
[i
].szURI
)
922 || cocalNameLength
!=SysStringLen(This
->attributes
[i
].szLocalname
))
924 if(cUriLength
&& memcmp(pUri
, This
->attributes
[i
].szURI
,
925 sizeof(WCHAR
)*cUriLength
))
927 if(cocalNameLength
&& memcmp(pLocalName
, This
->attributes
[i
].szLocalname
,
928 sizeof(WCHAR
)*cocalNameLength
))
938 static HRESULT WINAPI
isaxattributes_getIndexFromQName(
939 ISAXAttributes
* iface
,
944 saxlocator
*This
= impl_from_ISAXAttributes( iface
);
946 TRACE("(%p)->(%s, %d)\n", This
, debugstr_w(pQName
), nQNameLength
);
948 if(!pQName
|| !index
) return E_POINTER
;
949 if(!nQNameLength
) return E_INVALIDARG
;
951 for(i
=0; i
<This
->nb_attributes
; i
++)
953 if(nQNameLength
!=SysStringLen(This
->attributes
[i
].szQName
)) continue;
954 if(memcmp(pQName
, This
->attributes
[i
].szQName
, sizeof(WCHAR
)*nQNameLength
)) continue;
963 static HRESULT WINAPI
isaxattributes_getType(
964 ISAXAttributes
* iface
,
969 saxlocator
*This
= impl_from_ISAXAttributes( iface
);
971 FIXME("(%p)->(%d) stub\n", This
, nIndex
);
975 static HRESULT WINAPI
isaxattributes_getTypeFromName(
976 ISAXAttributes
* iface
,
979 const WCHAR
*pLocalName
,
984 saxlocator
*This
= impl_from_ISAXAttributes( iface
);
986 FIXME("(%p)->(%s, %d, %s, %d) stub\n", This
, debugstr_w(pUri
), nUri
,
987 debugstr_w(pLocalName
), nLocalName
);
991 static HRESULT WINAPI
isaxattributes_getTypeFromQName(
992 ISAXAttributes
* iface
,
998 saxlocator
*This
= impl_from_ISAXAttributes( iface
);
1000 FIXME("(%p)->(%s, %d) stub\n", This
, debugstr_w(pQName
), nQName
);
1004 static HRESULT WINAPI
isaxattributes_getValue(
1005 ISAXAttributes
* iface
,
1007 const WCHAR
**value
,
1010 saxlocator
*This
= impl_from_ISAXAttributes( iface
);
1011 TRACE("(%p)->(%d)\n", This
, index
);
1013 if(index
>=This
->nb_attributes
|| index
<0) return E_INVALIDARG
;
1014 if(!value
|| !nValue
) return E_POINTER
;
1016 *nValue
= SysStringLen(This
->attributes
[index
].szValue
);
1017 *value
= This
->attributes
[index
].szValue
;
1019 TRACE("(%s:%d)\n", debugstr_w(*value
), *nValue
);
1024 static HRESULT WINAPI
isaxattributes_getValueFromName(
1025 ISAXAttributes
* iface
,
1028 const WCHAR
*pLocalName
,
1030 const WCHAR
**pValue
,
1035 saxlocator
*This
= impl_from_ISAXAttributes( iface
);
1036 TRACE("(%p)->(%s, %d, %s, %d)\n", This
, debugstr_w(pUri
), nUri
,
1037 debugstr_w(pLocalName
), nLocalName
);
1039 hr
= ISAXAttributes_getIndexFromName(iface
,
1040 pUri
, nUri
, pLocalName
, nLocalName
, &index
);
1041 if(hr
==S_OK
) hr
= ISAXAttributes_getValue(iface
, index
, pValue
, nValue
);
1046 static HRESULT WINAPI
isaxattributes_getValueFromQName(
1047 ISAXAttributes
* iface
,
1048 const WCHAR
*pQName
,
1050 const WCHAR
**pValue
,
1055 saxlocator
*This
= impl_from_ISAXAttributes( iface
);
1056 TRACE("(%p)->(%s, %d)\n", This
, debugstr_w(pQName
), nQName
);
1058 hr
= ISAXAttributes_getIndexFromQName(iface
, pQName
, nQName
, &index
);
1059 if(hr
==S_OK
) hr
= ISAXAttributes_getValue(iface
, index
, pValue
, nValue
);
1064 static const struct ISAXAttributesVtbl isaxattributes_vtbl
=
1066 isaxattributes_QueryInterface
,
1067 isaxattributes_AddRef
,
1068 isaxattributes_Release
,
1069 isaxattributes_getLength
,
1070 isaxattributes_getURI
,
1071 isaxattributes_getLocalName
,
1072 isaxattributes_getQName
,
1073 isaxattributes_getName
,
1074 isaxattributes_getIndexFromName
,
1075 isaxattributes_getIndexFromQName
,
1076 isaxattributes_getType
,
1077 isaxattributes_getTypeFromName
,
1078 isaxattributes_getTypeFromQName
,
1079 isaxattributes_getValue
,
1080 isaxattributes_getValueFromName
,
1081 isaxattributes_getValueFromQName
1084 static HRESULT
SAXAttributes_populate(saxlocator
*locator
,
1085 int nb_namespaces
, const xmlChar
**xmlNamespaces
,
1086 int nb_attributes
, const xmlChar
**xmlAttributes
)
1088 static const xmlChar xmlns
[] = "xmlns";
1089 static const WCHAR xmlnsW
[] = { 'x','m','l','n','s',0 };
1091 struct _attributes
*attrs
;
1094 locator
->nb_attributes
= nb_namespaces
+nb_attributes
;
1095 if(locator
->nb_attributes
> locator
->attributesSize
)
1097 attrs
= heap_realloc(locator
->attributes
, sizeof(struct _attributes
)*locator
->nb_attributes
*2);
1100 locator
->nb_attributes
= 0;
1101 return E_OUTOFMEMORY
;
1103 locator
->attributes
= attrs
;
1107 attrs
= locator
->attributes
;
1110 for(index
=0; index
<nb_namespaces
; index
++)
1112 attrs
[nb_attributes
+index
].szLocalname
= SysAllocStringLen(NULL
, 0);
1113 attrs
[nb_attributes
+index
].szURI
= locator
->namespaceUri
;
1114 attrs
[nb_attributes
+index
].szValue
= bstr_from_xmlChar(xmlNamespaces
[2*index
+1]);
1115 if(!xmlNamespaces
[2*index
])
1116 attrs
[nb_attributes
+index
].szQName
= SysAllocString(xmlnsW
);
1118 attrs
[nb_attributes
+index
].szQName
= QName_from_xmlChar(xmlns
, xmlNamespaces
[2*index
]);
1121 for(index
=0; index
<nb_attributes
; index
++)
1123 attrs
[index
].szLocalname
= bstr_from_xmlChar(xmlAttributes
[index
*5]);
1124 attrs
[index
].szURI
= namespaceFind(locator
, xmlAttributes
[index
*5+2]);
1125 attrs
[index
].szValue
= bstr_from_xmlCharN(xmlAttributes
[index
*5+3],
1126 xmlAttributes
[index
*5+4]-xmlAttributes
[index
*5+3]);
1127 attrs
[index
].szQName
= QName_from_xmlChar(xmlAttributes
[index
*5+1],
1128 xmlAttributes
[index
*5]);
1134 /*** LibXML callbacks ***/
1135 static void libxmlStartDocument(void *ctx
)
1137 saxlocator
*This
= ctx
;
1140 if(This
->saxreader
->version
>= MSXML6
) {
1141 xmlChar
*end
= (xmlChar
*)This
->pParserCtxt
->input
->cur
;
1142 while(end
>This
->pParserCtxt
->input
->base
&& *end
!='>')
1144 update_position(This
, end
);
1147 if(has_content_handler(This
))
1149 if(This
->vbInterface
)
1150 hr
= IVBSAXContentHandler_startDocument(This
->saxreader
->vbcontentHandler
);
1152 hr
= ISAXContentHandler_startDocument(This
->saxreader
->contentHandler
);
1154 if(This
->saxreader
->version
>=MSXML6
? FAILED(hr
) : hr
!=S_OK
)
1155 format_error_message_from_id(This
, hr
);
1158 update_position(This
, NULL
);
1161 static void libxmlEndDocument(void *ctx
)
1163 saxlocator
*This
= ctx
;
1166 if(This
->saxreader
->version
>= MSXML6
) {
1167 update_position(This
, NULL
);
1168 if(This
->column
> 1)
1176 if(This
->ret
!= S_OK
) return;
1178 if(has_content_handler(This
))
1180 if(This
->vbInterface
)
1181 hr
= IVBSAXContentHandler_endDocument(This
->saxreader
->vbcontentHandler
);
1183 hr
= ISAXContentHandler_endDocument(This
->saxreader
->contentHandler
);
1185 if(This
->saxreader
->version
>=MSXML6
? FAILED(hr
) : hr
!=S_OK
)
1186 format_error_message_from_id(This
, hr
);
1190 static void libxmlStartElementNS(
1192 const xmlChar
*localname
,
1193 const xmlChar
*prefix
,
1196 const xmlChar
**namespaces
,
1199 const xmlChar
**attributes
)
1201 BSTR NamespaceUri
, LocalName
, QName
;
1202 saxlocator
*This
= ctx
;
1207 if(*(This
->pParserCtxt
->input
->cur
) == '/')
1209 if(This
->saxreader
->version
< MSXML6
)
1211 update_position(This
, (xmlChar
*)This
->pParserCtxt
->input
->cur
+index
);
1213 hr
= namespacePush(This
, NULL
, NULL
);
1214 for(index
=0; hr
==S_OK
&& index
<nb_namespaces
; index
++)
1215 hr
= namespacePush(This
, namespaces
[2*index
], namespaces
[2*index
+1]);
1218 for(; index
>=0; index
--)
1223 if(hr
==S_OK
&& has_content_handler(This
))
1225 for(index
=0; index
<nb_namespaces
; index
++)
1227 if(This
->vbInterface
)
1228 hr
= IVBSAXContentHandler_startPrefixMapping(
1229 This
->saxreader
->vbcontentHandler
,
1230 &This
->nsStack
[This
->nsStackLast
-nb_namespaces
+index
].prefix
,
1231 &This
->nsStack
[This
->nsStackLast
-nb_namespaces
+index
].uri
);
1233 hr
= ISAXContentHandler_startPrefixMapping(
1234 This
->saxreader
->contentHandler
,
1235 This
->nsStack
[This
->nsStackLast
-nb_namespaces
+index
].prefix
,
1236 SysStringLen(This
->nsStack
[This
->nsStackLast
-nb_namespaces
+index
].prefix
),
1237 This
->nsStack
[This
->nsStackLast
-nb_namespaces
+index
].uri
,
1238 SysStringLen(This
->nsStack
[This
->nsStackLast
-nb_namespaces
+index
].uri
));
1240 if(This
->saxreader
->version
>=MSXML6
? FAILED(hr
) : hr
!=S_OK
)
1242 format_error_message_from_id(This
, hr
);
1247 NamespaceUri
= namespaceFind(This
, URI
);
1248 LocalName
= pooled_bstr_from_xmlChar(&This
->saxreader
->pool
, localname
);
1249 QName
= pooled_QName_from_xmlChar(&This
->saxreader
->pool
, prefix
, localname
);
1251 hr
= SAXAttributes_populate(This
, nb_namespaces
, namespaces
, nb_attributes
, attributes
);
1254 if(This
->vbInterface
)
1255 hr
= IVBSAXContentHandler_startElement(This
->saxreader
->vbcontentHandler
,
1256 &NamespaceUri
, &LocalName
, &QName
, &This
->IVBSAXAttributes_iface
);
1258 hr
= ISAXContentHandler_startElement(This
->saxreader
->contentHandler
, NamespaceUri
,
1259 SysStringLen(NamespaceUri
), LocalName
, SysStringLen(LocalName
), QName
,
1260 SysStringLen(QName
), &This
->ISAXAttributes_iface
);
1264 if(This
->saxreader
->version
>=MSXML6
? FAILED(hr
) : hr
!=S_OK
)
1265 format_error_message_from_id(This
, hr
);
1268 static void libxmlEndElementNS(
1270 const xmlChar
*localname
,
1271 const xmlChar
*prefix
,
1274 BSTR NamespaceUri
, LocalName
, QName
;
1275 saxlocator
*This
= ctx
;
1278 struct nsstack
*elem
= &This
->nsStack
[This
->nsStackLast
-1];
1280 end
= (xmlChar
*)This
->pParserCtxt
->input
->cur
;
1281 if(This
->saxreader
->version
>= MSXML6
) {
1282 while(end
>This
->pParserCtxt
->input
->base
&& *end
!='>')
1284 } else if(*(end
-1) != '>' || *(end
-2) != '/') {
1285 while(end
-2>=This
->pParserCtxt
->input
->base
1286 && *(end
-2)!='<' && *(end
-1)!='/') end
--;
1289 update_position(This
, end
);
1291 if(has_content_handler(This
))
1293 NamespaceUri
= namespaceFind(This
, URI
);
1294 LocalName
= pooled_bstr_from_xmlChar(&This
->saxreader
->pool
, localname
);
1295 QName
= pooled_QName_from_xmlChar(&This
->saxreader
->pool
, prefix
, localname
);
1297 if(This
->vbInterface
)
1298 hr
= IVBSAXContentHandler_endElement(
1299 This
->saxreader
->vbcontentHandler
,
1300 &NamespaceUri
, &LocalName
, &QName
);
1302 hr
= ISAXContentHandler_endElement(
1303 This
->saxreader
->contentHandler
,
1304 NamespaceUri
, SysStringLen(NamespaceUri
),
1305 LocalName
, SysStringLen(LocalName
),
1306 QName
, SysStringLen(QName
));
1308 This
->nb_attributes
= 0;
1310 if(This
->saxreader
->version
>=MSXML6
? FAILED(hr
) : hr
!=S_OK
)
1312 format_error_message_from_id(This
, hr
);
1316 if(This
->saxreader
->version
>= MSXML6
)
1323 while(elem
< &This
->nsStack
[This
->nsStackLast
]) {
1324 if(This
->vbInterface
)
1325 hr
= IVBSAXContentHandler_endPrefixMapping(
1326 This
->saxreader
->vbcontentHandler
, &elem
->prefix
);
1328 hr
= ISAXContentHandler_endPrefixMapping(
1329 This
->saxreader
->contentHandler
,
1330 elem
->prefix
, SysStringLen(elem
->prefix
));
1334 format_error_message_from_id(This
, hr
);
1353 if(This
->vbInterface
)
1354 hr
= IVBSAXContentHandler_endPrefixMapping(
1355 This
->saxreader
->vbcontentHandler
, &elem
->prefix
);
1357 hr
= ISAXContentHandler_endPrefixMapping(
1358 This
->saxreader
->contentHandler
,
1359 elem
->prefix
, SysStringLen(elem
->prefix
));
1363 format_error_message_from_id(This
, hr
);
1374 This
->nb_attributes
= 0;
1382 update_position(This
, NULL
);
1385 static void libxmlCharacters(
1390 saxlocator
*This
= ctx
;
1395 BOOL lastEvent
= FALSE
;
1397 if(!(has_content_handler(This
))) return;
1400 if(*(ch
-1)=='\r') cur
--;
1403 if(ch
<This
->pParserCtxt
->input
->base
|| ch
>This
->pParserCtxt
->input
->end
)
1408 while(end
-ch
<len
&& *end
!='\r') end
++;
1415 if(!lastEvent
) *end
= '\n';
1417 if(This
->saxreader
->version
>= MSXML6
) {
1418 update_position(This
, end
);
1429 Chars
= pooled_bstr_from_xmlCharN(&This
->saxreader
->pool
, cur
, end
-cur
+1);
1430 if(This
->vbInterface
)
1431 hr
= IVBSAXContentHandler_characters(
1432 This
->saxreader
->vbcontentHandler
, &Chars
);
1434 hr
= ISAXContentHandler_characters(
1435 This
->saxreader
->contentHandler
,
1436 Chars
, SysStringLen(Chars
));
1438 if(This
->saxreader
->version
>=MSXML6
? FAILED(hr
) : hr
!=S_OK
)
1440 format_error_message_from_id(This
, hr
);
1444 This
->column
+= end
-cur
+1;
1458 if(end
-ch
== len
) break;
1461 if(ch
<This
->pParserCtxt
->input
->base
|| ch
>This
->pParserCtxt
->input
->end
)
1462 This
->column
= This
->realColumn
1463 +This
->pParserCtxt
->input
->cur
-This
->lastCur
;
1466 static void libxmlSetDocumentLocator(
1468 xmlSAXLocatorPtr loc
)
1470 saxlocator
*This
= ctx
;
1473 if(has_content_handler(This
))
1475 if(This
->vbInterface
)
1476 hr
= IVBSAXContentHandler_putref_documentLocator(This
->saxreader
->vbcontentHandler
,
1477 &This
->IVBSAXLocator_iface
);
1479 hr
= ISAXContentHandler_putDocumentLocator(This
->saxreader
->contentHandler
,
1480 &This
->ISAXLocator_iface
);
1484 format_error_message_from_id(This
, hr
);
1487 static void libxmlComment(void *ctx
, const xmlChar
*value
)
1489 saxlocator
*This
= ctx
;
1492 xmlChar
*beg
= (xmlChar
*)This
->pParserCtxt
->input
->cur
;
1494 while(beg
-4>=This
->pParserCtxt
->input
->base
1495 && memcmp(beg
-4, "<!--", sizeof(char[4]))) beg
--;
1496 update_position(This
, beg
);
1498 if(!This
->vbInterface
&& !This
->saxreader
->lexicalHandler
) return;
1499 if(This
->vbInterface
&& !This
->saxreader
->vblexicalHandler
) return;
1501 bValue
= pooled_bstr_from_xmlChar(&This
->saxreader
->pool
, value
);
1503 if(This
->vbInterface
)
1504 hr
= IVBSAXLexicalHandler_comment(
1505 This
->saxreader
->vblexicalHandler
, &bValue
);
1507 hr
= ISAXLexicalHandler_comment(
1508 This
->saxreader
->lexicalHandler
,
1509 bValue
, SysStringLen(bValue
));
1512 format_error_message_from_id(This
, hr
);
1514 update_position(This
, NULL
);
1517 static void libxmlFatalError(void *ctx
, const char *msg
, ...)
1519 saxlocator
*This
= ctx
;
1525 if(This
->ret
!= S_OK
) {
1526 xmlStopParser(This
->pParserCtxt
);
1530 va_start(args
, msg
);
1531 vsprintf(message
, msg
, args
);
1534 len
= MultiByteToWideChar(CP_UNIXCP
, 0, message
, -1, NULL
, 0);
1535 error
= heap_alloc(sizeof(WCHAR
)*len
);
1538 MultiByteToWideChar(CP_UNIXCP
, 0, message
, -1, error
, len
);
1539 TRACE("fatal error for %p: %s\n", This
, debugstr_w(error
));
1542 if(!has_error_handler(This
))
1544 xmlStopParser(This
->pParserCtxt
);
1550 FIXME("Error handling is not compatible.\n");
1552 if(This
->vbInterface
)
1554 BSTR bstrError
= SysAllocString(error
);
1555 IVBSAXErrorHandler_fatalError(This
->saxreader
->vberrorHandler
, &This
->IVBSAXLocator_iface
,
1556 &bstrError
, E_FAIL
);
1557 SysFreeString(bstrError
);
1560 ISAXErrorHandler_fatalError(This
->saxreader
->errorHandler
, &This
->ISAXLocator_iface
,
1565 xmlStopParser(This
->pParserCtxt
);
1569 static void libxmlCDataBlock(void *ctx
, const xmlChar
*value
, int len
)
1571 saxlocator
*This
= ctx
;
1573 xmlChar
*beg
= (xmlChar
*)This
->pParserCtxt
->input
->cur
-len
;
1577 BOOL lastEvent
= FALSE
, change
;
1579 while(beg
-9>=This
->pParserCtxt
->input
->base
1580 && memcmp(beg
-9, "<![CDATA[", sizeof(char[9]))) beg
--;
1581 update_position(This
, beg
);
1583 if(This
->vbInterface
&& This
->saxreader
->vblexicalHandler
)
1584 hr
= IVBSAXLexicalHandler_startCDATA(This
->saxreader
->vblexicalHandler
);
1585 if(!This
->vbInterface
&& This
->saxreader
->lexicalHandler
)
1586 hr
= ISAXLexicalHandler_startCDATA(This
->saxreader
->lexicalHandler
);
1590 format_error_message_from_id(This
, hr
);
1594 realLen
= This
->pParserCtxt
->input
->cur
-beg
-3;
1600 while(end
-beg
<realLen
&& *end
!='\r') end
++;
1601 if(end
-beg
==realLen
)
1606 else if(end
-beg
==realLen
-1 && *end
=='\r' && *(end
+1)=='\n')
1609 if(*end
== '\r') change
= TRUE
;
1610 else change
= FALSE
;
1612 if(change
) *end
= '\n';
1614 if(has_content_handler(This
))
1616 Chars
= pooled_bstr_from_xmlCharN(&This
->saxreader
->pool
, cur
, end
-cur
+1);
1617 if(This
->vbInterface
)
1618 hr
= IVBSAXContentHandler_characters(
1619 This
->saxreader
->vbcontentHandler
, &Chars
);
1621 hr
= ISAXContentHandler_characters(
1622 This
->saxreader
->contentHandler
,
1623 Chars
, SysStringLen(Chars
));
1626 if(change
) *end
= '\r';
1631 This
->column
+= end
-cur
+2;
1636 if(This
->vbInterface
&& This
->saxreader
->vblexicalHandler
)
1637 hr
= IVBSAXLexicalHandler_endCDATA(This
->saxreader
->vblexicalHandler
);
1638 if(!This
->vbInterface
&& This
->saxreader
->lexicalHandler
)
1639 hr
= ISAXLexicalHandler_endCDATA(This
->saxreader
->lexicalHandler
);
1642 format_error_message_from_id(This
, hr
);
1644 This
->column
+= 4+end
-cur
;
1647 /*** IVBSAXLocator interface ***/
1648 /*** IUnknown methods ***/
1649 static HRESULT WINAPI
ivbsaxlocator_QueryInterface(IVBSAXLocator
* iface
, REFIID riid
, void **ppvObject
)
1651 saxlocator
*This
= impl_from_IVBSAXLocator( iface
);
1653 TRACE("%p %s %p\n", This
, debugstr_guid( riid
), ppvObject
);
1657 if ( IsEqualGUID( riid
, &IID_IUnknown
) ||
1658 IsEqualGUID( riid
, &IID_IDispatch
) ||
1659 IsEqualGUID( riid
, &IID_IVBSAXLocator
))
1663 else if ( IsEqualGUID( riid
, &IID_IVBSAXAttributes
))
1665 *ppvObject
= &This
->IVBSAXAttributes_iface
;
1669 FIXME("interface %s not implemented\n", debugstr_guid(riid
));
1670 return E_NOINTERFACE
;
1673 IVBSAXLocator_AddRef( iface
);
1678 static ULONG WINAPI
ivbsaxlocator_AddRef(IVBSAXLocator
* iface
)
1680 saxlocator
*This
= impl_from_IVBSAXLocator( iface
);
1681 TRACE("%p\n", This
);
1682 return InterlockedIncrement( &This
->ref
);
1685 static ULONG WINAPI
ivbsaxlocator_Release(
1686 IVBSAXLocator
* iface
)
1688 saxlocator
*This
= impl_from_IVBSAXLocator( iface
);
1689 return ISAXLocator_Release((ISAXLocator
*)&This
->IVBSAXLocator_iface
);
1692 /*** IDispatch methods ***/
1693 static HRESULT WINAPI
ivbsaxlocator_GetTypeInfoCount( IVBSAXLocator
*iface
, UINT
* pctinfo
)
1695 saxlocator
*This
= impl_from_IVBSAXLocator( iface
);
1697 TRACE("(%p)->(%p)\n", This
, pctinfo
);
1704 static HRESULT WINAPI
ivbsaxlocator_GetTypeInfo(
1705 IVBSAXLocator
*iface
,
1706 UINT iTInfo
, LCID lcid
, ITypeInfo
** ppTInfo
)
1708 saxlocator
*This
= impl_from_IVBSAXLocator( iface
);
1711 TRACE("(%p)->(%u %u %p)\n", This
, iTInfo
, lcid
, ppTInfo
);
1713 hr
= get_typeinfo(IVBSAXLocator_tid
, ppTInfo
);
1718 static HRESULT WINAPI
ivbsaxlocator_GetIDsOfNames(
1719 IVBSAXLocator
*iface
,
1721 LPOLESTR
* rgszNames
,
1726 saxlocator
*This
= impl_from_IVBSAXLocator( iface
);
1727 ITypeInfo
*typeinfo
;
1730 TRACE("(%p)->(%s %p %u %u %p)\n", This
, debugstr_guid(riid
), rgszNames
, cNames
,
1733 if(!rgszNames
|| cNames
== 0 || !rgDispId
)
1734 return E_INVALIDARG
;
1736 hr
= get_typeinfo(IVBSAXLocator_tid
, &typeinfo
);
1739 hr
= ITypeInfo_GetIDsOfNames(typeinfo
, rgszNames
, cNames
, rgDispId
);
1740 ITypeInfo_Release(typeinfo
);
1746 static HRESULT WINAPI
ivbsaxlocator_Invoke(
1747 IVBSAXLocator
*iface
,
1748 DISPID dispIdMember
,
1752 DISPPARAMS
* pDispParams
,
1753 VARIANT
* pVarResult
,
1754 EXCEPINFO
* pExcepInfo
,
1757 saxlocator
*This
= impl_from_IVBSAXLocator( iface
);
1758 ITypeInfo
*typeinfo
;
1761 TRACE("(%p)->(%d %s %d %d %p %p %p %p)\n", This
, dispIdMember
, debugstr_guid(riid
),
1762 lcid
, wFlags
, pDispParams
, pVarResult
, pExcepInfo
, puArgErr
);
1764 hr
= get_typeinfo(IVBSAXLocator_tid
, &typeinfo
);
1767 hr
= ITypeInfo_Invoke(typeinfo
, &This
->IVBSAXLocator_iface
, dispIdMember
, wFlags
,
1768 pDispParams
, pVarResult
, pExcepInfo
, puArgErr
);
1769 ITypeInfo_Release(typeinfo
);
1775 /*** IVBSAXLocator methods ***/
1776 static HRESULT WINAPI
ivbsaxlocator_get_columnNumber(
1777 IVBSAXLocator
* iface
,
1780 saxlocator
*This
= impl_from_IVBSAXLocator( iface
);
1781 return ISAXLocator_getColumnNumber((ISAXLocator
*)&This
->IVBSAXLocator_iface
, pnColumn
);
1784 static HRESULT WINAPI
ivbsaxlocator_get_lineNumber(
1785 IVBSAXLocator
* iface
,
1788 saxlocator
*This
= impl_from_IVBSAXLocator( iface
);
1789 return ISAXLocator_getLineNumber((ISAXLocator
*)&This
->IVBSAXLocator_iface
, pnLine
);
1792 static HRESULT WINAPI
ivbsaxlocator_get_publicId(
1793 IVBSAXLocator
* iface
,
1796 saxlocator
*This
= impl_from_IVBSAXLocator( iface
);
1797 return ISAXLocator_getPublicId((ISAXLocator
*)&This
->IVBSAXLocator_iface
,
1798 (const WCHAR
**)publicId
);
1801 static HRESULT WINAPI
ivbsaxlocator_get_systemId(
1802 IVBSAXLocator
* iface
,
1805 saxlocator
*This
= impl_from_IVBSAXLocator( iface
);
1806 return ISAXLocator_getSystemId((ISAXLocator
*)&This
->IVBSAXLocator_iface
,
1807 (const WCHAR
**)systemId
);
1810 static const struct IVBSAXLocatorVtbl ivbsaxlocator_vtbl
=
1812 ivbsaxlocator_QueryInterface
,
1813 ivbsaxlocator_AddRef
,
1814 ivbsaxlocator_Release
,
1815 ivbsaxlocator_GetTypeInfoCount
,
1816 ivbsaxlocator_GetTypeInfo
,
1817 ivbsaxlocator_GetIDsOfNames
,
1818 ivbsaxlocator_Invoke
,
1819 ivbsaxlocator_get_columnNumber
,
1820 ivbsaxlocator_get_lineNumber
,
1821 ivbsaxlocator_get_publicId
,
1822 ivbsaxlocator_get_systemId
1825 /*** ISAXLocator interface ***/
1826 /*** IUnknown methods ***/
1827 static HRESULT WINAPI
isaxlocator_QueryInterface(ISAXLocator
* iface
, REFIID riid
, void **ppvObject
)
1829 saxlocator
*This
= impl_from_ISAXLocator( iface
);
1831 TRACE("%p %s %p\n", This
, debugstr_guid( riid
), ppvObject
);
1835 if ( IsEqualGUID( riid
, &IID_IUnknown
) ||
1836 IsEqualGUID( riid
, &IID_ISAXLocator
))
1840 else if ( IsEqualGUID( riid
, &IID_ISAXAttributes
))
1842 *ppvObject
= &This
->ISAXAttributes_iface
;
1846 FIXME("interface %s not implemented\n", debugstr_guid(riid
));
1847 return E_NOINTERFACE
;
1850 ISAXLocator_AddRef( iface
);
1855 static ULONG WINAPI
isaxlocator_AddRef(ISAXLocator
* iface
)
1857 saxlocator
*This
= impl_from_ISAXLocator( iface
);
1858 TRACE("%p\n", This
);
1859 return InterlockedIncrement( &This
->ref
);
1862 static ULONG WINAPI
isaxlocator_Release(
1865 saxlocator
*This
= impl_from_ISAXLocator( iface
);
1868 TRACE("%p\n", This
);
1870 ref
= InterlockedDecrement( &This
->ref
);
1875 SysFreeString(This
->publicId
);
1876 SysFreeString(This
->systemId
);
1877 SysFreeString(This
->namespaceUri
);
1878 while(This
->nsStackLast
)
1880 heap_free(This
->nsStack
);
1882 for(index
=0; index
<This
->nb_attributes
; index
++)
1884 SysFreeString(This
->attributes
[index
].szLocalname
);
1885 SysFreeString(This
->attributes
[index
].szValue
);
1886 SysFreeString(This
->attributes
[index
].szQName
);
1888 heap_free(This
->attributes
);
1890 ISAXXMLReader_Release(&This
->saxreader
->ISAXXMLReader_iface
);
1897 /*** ISAXLocator methods ***/
1898 static HRESULT WINAPI
isaxlocator_getColumnNumber(
1902 saxlocator
*This
= impl_from_ISAXLocator( iface
);
1904 *pnColumn
= This
->column
;
1908 static HRESULT WINAPI
isaxlocator_getLineNumber(
1912 saxlocator
*This
= impl_from_ISAXLocator( iface
);
1914 *pnLine
= This
->line
;
1918 static HRESULT WINAPI
isaxlocator_getPublicId(
1920 const WCHAR
** ppwchPublicId
)
1923 saxlocator
*This
= impl_from_ISAXLocator( iface
);
1925 SysFreeString(This
->publicId
);
1927 publicId
= bstr_from_xmlChar(xmlSAX2GetPublicId(This
->pParserCtxt
));
1928 if(SysStringLen(publicId
))
1929 This
->publicId
= (WCHAR
*)&publicId
;
1932 SysFreeString(publicId
);
1933 This
->publicId
= NULL
;
1936 *ppwchPublicId
= This
->publicId
;
1940 static HRESULT WINAPI
isaxlocator_getSystemId(
1942 const WCHAR
** ppwchSystemId
)
1945 saxlocator
*This
= impl_from_ISAXLocator( iface
);
1947 SysFreeString(This
->systemId
);
1949 systemId
= bstr_from_xmlChar(xmlSAX2GetSystemId(This
->pParserCtxt
));
1950 if(SysStringLen(systemId
))
1951 This
->systemId
= (WCHAR
*)&systemId
;
1954 SysFreeString(systemId
);
1955 This
->systemId
= NULL
;
1958 *ppwchSystemId
= This
->systemId
;
1962 static const struct ISAXLocatorVtbl isaxlocator_vtbl
=
1964 isaxlocator_QueryInterface
,
1966 isaxlocator_Release
,
1967 isaxlocator_getColumnNumber
,
1968 isaxlocator_getLineNumber
,
1969 isaxlocator_getPublicId
,
1970 isaxlocator_getSystemId
1973 static HRESULT
SAXLocator_create(saxreader
*reader
, saxlocator
**ppsaxlocator
, BOOL vbInterface
)
1975 static const WCHAR w3xmlns
[] = { 'h','t','t','p',':','/','/', 'w','w','w','.','w','3','.',
1976 'o','r','g','/','2','0','0','0','/','x','m','l','n','s','/',0 };
1978 saxlocator
*locator
;
1980 locator
= heap_alloc( sizeof (*locator
) );
1982 return E_OUTOFMEMORY
;
1984 locator
->IVBSAXLocator_iface
.lpVtbl
= &ivbsaxlocator_vtbl
;
1985 locator
->ISAXLocator_iface
.lpVtbl
= &isaxlocator_vtbl
;
1986 locator
->IVBSAXAttributes_iface
.lpVtbl
= &ivbsaxattributes_vtbl
;
1987 locator
->ISAXAttributes_iface
.lpVtbl
= &isaxattributes_vtbl
;
1989 locator
->vbInterface
= vbInterface
;
1991 locator
->saxreader
= reader
;
1992 ISAXXMLReader_AddRef(&reader
->ISAXXMLReader_iface
);
1994 locator
->pParserCtxt
= NULL
;
1995 locator
->publicId
= NULL
;
1996 locator
->systemId
= NULL
;
1997 locator
->lastCur
= NULL
;
1998 locator
->line
= (reader
->version
>=MSXML6
? 1 : 0);
1999 locator
->column
= 0;
2000 locator
->ret
= S_OK
;
2001 if(locator
->saxreader
->version
>= MSXML6
)
2002 locator
->namespaceUri
= SysAllocString(w3xmlns
);
2004 locator
->namespaceUri
= SysAllocStringLen(NULL
, 0);
2005 if(!locator
->namespaceUri
)
2007 ISAXXMLReader_Release(&reader
->ISAXXMLReader_iface
);
2009 return E_OUTOFMEMORY
;
2011 locator
->nsStackSize
= 8;
2012 locator
->nsStackLast
= 0;
2013 locator
->nsStack
= heap_alloc(sizeof(struct nsstack
)*locator
->nsStackSize
);
2014 if(!locator
->nsStack
)
2016 ISAXXMLReader_Release(&reader
->ISAXXMLReader_iface
);
2017 SysFreeString(locator
->namespaceUri
);
2019 return E_OUTOFMEMORY
;
2022 locator
->attributesSize
= 8;
2023 locator
->nb_attributes
= 0;
2024 locator
->attributes
= heap_alloc(sizeof(struct _attributes
)*locator
->attributesSize
);
2025 if(!locator
->attributes
)
2027 ISAXXMLReader_Release(&reader
->ISAXXMLReader_iface
);
2028 SysFreeString(locator
->namespaceUri
);
2029 heap_free(locator
->nsStack
);
2031 return E_OUTOFMEMORY
;
2034 *ppsaxlocator
= locator
;
2036 TRACE("returning %p\n", *ppsaxlocator
);
2041 /*** SAXXMLReader internal functions ***/
2042 static HRESULT
internal_parseBuffer(saxreader
*This
, const char *buffer
, int size
, BOOL vbInterface
)
2044 xmlCharEncoding encoding
= XML_CHAR_ENCODING_NONE
;
2045 xmlChar
*enc_name
= NULL
;
2046 saxlocator
*locator
;
2049 hr
= SAXLocator_create(This
, &locator
, vbInterface
);
2055 const unsigned char *buff
= (unsigned char*)buffer
;
2057 encoding
= xmlDetectCharEncoding((xmlChar
*)buffer
, 4);
2058 enc_name
= (xmlChar
*)xmlGetCharEncodingName(encoding
);
2059 TRACE("detected encoding: %s\n", enc_name
);
2060 /* skip BOM, parser won't switch encodings and so won't skip it on its own */
2061 if ((encoding
== XML_CHAR_ENCODING_UTF8
) &&
2062 buff
[0] == 0xEF && buff
[1] == 0xBB && buff
[2] == 0xBF)
2069 locator
->pParserCtxt
= xmlCreateMemoryParserCtxt(buffer
, size
);
2070 if(!locator
->pParserCtxt
)
2072 ISAXLocator_Release(&locator
->ISAXLocator_iface
);
2076 if (encoding
== XML_CHAR_ENCODING_UTF8
)
2077 locator
->pParserCtxt
->encoding
= xmlStrdup(enc_name
);
2079 xmlFree(locator
->pParserCtxt
->sax
);
2080 locator
->pParserCtxt
->sax
= &locator
->saxreader
->sax
;
2081 locator
->pParserCtxt
->userData
= locator
;
2083 This
->isParsing
= TRUE
;
2084 if(xmlParseDocument(locator
->pParserCtxt
)==-1 && locator
->ret
==S_OK
)
2088 This
->isParsing
= FALSE
;
2090 if(locator
->pParserCtxt
)
2092 locator
->pParserCtxt
->sax
= NULL
;
2093 xmlFreeParserCtxt(locator
->pParserCtxt
);
2094 locator
->pParserCtxt
= NULL
;
2097 ISAXLocator_Release(&locator
->ISAXLocator_iface
);
2101 static HRESULT
internal_parseStream(saxreader
*This
, IStream
*stream
, BOOL vbInterface
)
2103 saxlocator
*locator
;
2110 hr
= IStream_Read(stream
, data
, sizeof(data
), &dataRead
);
2111 if(FAILED(hr
)) return hr
;
2113 hr
= SAXLocator_create(This
, &locator
, vbInterface
);
2114 if(FAILED(hr
)) return hr
;
2116 locator
->pParserCtxt
= xmlCreatePushParserCtxt(
2117 &locator
->saxreader
->sax
, locator
,
2118 data
, dataRead
, NULL
);
2119 if(!locator
->pParserCtxt
)
2121 ISAXLocator_Release(&locator
->ISAXLocator_iface
);
2125 This
->isParsing
= TRUE
;
2127 if(dataRead
!= sizeof(data
))
2129 ret
= xmlParseChunk(locator
->pParserCtxt
, data
, 0, 1);
2130 hr
= ret
!=XML_ERR_OK
&& locator
->ret
==S_OK
? E_FAIL
: locator
->ret
;
2137 hr
= IStream_Read(stream
, data
, sizeof(data
), &dataRead
);
2138 if (FAILED(hr
)) break;
2140 ret
= xmlParseChunk(locator
->pParserCtxt
, data
, dataRead
, 0);
2141 hr
= ret
!=XML_ERR_OK
&& locator
->ret
==S_OK
? E_FAIL
: locator
->ret
;
2143 if (hr
!= S_OK
) break;
2145 if (dataRead
!= sizeof(data
))
2147 ret
= xmlParseChunk(locator
->pParserCtxt
, data
, 0, 1);
2148 hr
= ret
!=XML_ERR_OK
&& locator
->ret
==S_OK
? E_FAIL
: locator
->ret
;
2154 This
->isParsing
= FALSE
;
2156 xmlFreeParserCtxt(locator
->pParserCtxt
);
2157 locator
->pParserCtxt
= NULL
;
2158 ISAXLocator_Release(&locator
->ISAXLocator_iface
);
2162 static HRESULT
internal_getEntityResolver(
2164 void *pEntityResolver
,
2167 FIXME("(%p)->(%p) stub\n", This
, pEntityResolver
);
2171 static HRESULT
internal_putEntityResolver(
2173 void *pEntityResolver
,
2176 FIXME("(%p)->(%p) stub\n", This
, pEntityResolver
);
2180 static HRESULT
internal_getContentHandler(
2182 void *pContentHandler
,
2185 TRACE("(%p)->(%p)\n", This
, pContentHandler
);
2186 if(pContentHandler
== NULL
)
2188 if((vbInterface
&& This
->vbcontentHandler
)
2189 || (!vbInterface
&& This
->contentHandler
))
2192 IVBSAXContentHandler_AddRef(This
->vbcontentHandler
);
2194 ISAXContentHandler_AddRef(This
->contentHandler
);
2196 if(vbInterface
) *(IVBSAXContentHandler
**)pContentHandler
=
2197 This
->vbcontentHandler
;
2198 else *(ISAXContentHandler
**)pContentHandler
= This
->contentHandler
;
2203 static HRESULT
internal_putContentHandler(
2205 void *contentHandler
,
2208 TRACE("(%p)->(%p)\n", This
, contentHandler
);
2212 IVBSAXContentHandler_AddRef((IVBSAXContentHandler
*)contentHandler
);
2214 ISAXContentHandler_AddRef((ISAXContentHandler
*)contentHandler
);
2216 if((vbInterface
&& This
->vbcontentHandler
)
2217 || (!vbInterface
&& This
->contentHandler
))
2220 IVBSAXContentHandler_Release(This
->vbcontentHandler
);
2222 ISAXContentHandler_Release(This
->contentHandler
);
2225 This
->vbcontentHandler
= contentHandler
;
2227 This
->contentHandler
= contentHandler
;
2232 static HRESULT
internal_getDTDHandler(
2237 FIXME("(%p)->(%p) stub\n", This
, pDTDHandler
);
2241 static HRESULT
internal_putDTDHandler(
2246 FIXME("(%p)->(%p) stub\n", This
, pDTDHandler
);
2250 static HRESULT
internal_getErrorHandler(
2252 void *pErrorHandler
,
2255 TRACE("(%p)->(%p)\n", This
, pErrorHandler
);
2256 if(pErrorHandler
== NULL
)
2259 if(vbInterface
&& This
->vberrorHandler
)
2260 IVBSAXErrorHandler_AddRef(This
->vberrorHandler
);
2261 else if(!vbInterface
&& This
->errorHandler
)
2262 ISAXErrorHandler_AddRef(This
->errorHandler
);
2265 *(IVBSAXErrorHandler
**)pErrorHandler
= This
->vberrorHandler
;
2267 *(ISAXErrorHandler
**)pErrorHandler
= This
->errorHandler
;
2273 static HRESULT
internal_putErrorHandler(
2278 TRACE("(%p)->(%p)\n", This
, errorHandler
);
2282 IVBSAXErrorHandler_AddRef((IVBSAXErrorHandler
*)errorHandler
);
2284 ISAXErrorHandler_AddRef((ISAXErrorHandler
*)errorHandler
);
2287 if(vbInterface
&& This
->vberrorHandler
)
2288 IVBSAXErrorHandler_Release(This
->vberrorHandler
);
2289 else if(!vbInterface
&& This
->errorHandler
)
2290 ISAXErrorHandler_Release(This
->errorHandler
);
2293 This
->vberrorHandler
= errorHandler
;
2295 This
->errorHandler
= errorHandler
;
2301 static HRESULT
internal_parse(
2308 TRACE("(%p)->(%s)\n", This
, debugstr_variant(&varInput
));
2310 /* Dispose of the BSTRs in the pool from a prior run, if any. */
2311 free_bstr_pool(&This
->pool
);
2313 switch(V_VT(&varInput
))
2316 hr
= internal_parseBuffer(This
, (const char*)V_BSTR(&varInput
),
2317 SysStringByteLen(V_BSTR(&varInput
)), vbInterface
);
2319 case VT_ARRAY
|VT_UI1
: {
2321 LONG lBound
, uBound
;
2324 hr
= SafeArrayGetLBound(V_ARRAY(&varInput
), 1, &lBound
);
2325 if(hr
!= S_OK
) break;
2326 hr
= SafeArrayGetUBound(V_ARRAY(&varInput
), 1, &uBound
);
2327 if(hr
!= S_OK
) break;
2328 dataRead
= (uBound
-lBound
)*SafeArrayGetElemsize(V_ARRAY(&varInput
));
2329 hr
= SafeArrayAccessData(V_ARRAY(&varInput
), &pSAData
);
2330 if(hr
!= S_OK
) break;
2331 hr
= internal_parseBuffer(This
, pSAData
, dataRead
, vbInterface
);
2332 SafeArrayUnaccessData(V_ARRAY(&varInput
));
2337 IPersistStream
*persistStream
;
2338 IStream
*stream
= NULL
;
2339 IXMLDOMDocument
*xmlDoc
;
2341 if(IUnknown_QueryInterface(V_UNKNOWN(&varInput
),
2342 &IID_IXMLDOMDocument
, (void**)&xmlDoc
) == S_OK
)
2346 IXMLDOMDocument_get_xml(xmlDoc
, &bstrData
);
2347 hr
= internal_parseBuffer(This
, (const char*)bstrData
,
2348 SysStringByteLen(bstrData
), vbInterface
);
2349 IXMLDOMDocument_Release(xmlDoc
);
2350 SysFreeString(bstrData
);
2354 if(IUnknown_QueryInterface(V_UNKNOWN(&varInput
),
2355 &IID_IPersistStream
, (void**)&persistStream
) == S_OK
)
2357 hr
= CreateStreamOnHGlobal(NULL
, TRUE
, &stream
);
2360 IPersistStream_Release(persistStream
);
2364 hr
= IPersistStream_Save(persistStream
, stream
, TRUE
);
2365 IPersistStream_Release(persistStream
);
2368 IStream_Release(stream
);
2372 if(stream
|| IUnknown_QueryInterface(V_UNKNOWN(&varInput
),
2373 &IID_IStream
, (void**)&stream
) == S_OK
)
2375 hr
= internal_parseStream(This
, stream
, vbInterface
);
2376 IStream_Release(stream
);
2381 WARN("vt %d not implemented\n", V_VT(&varInput
));
2388 static HRESULT
internal_vbonDataAvailable(void *obj
, char *ptr
, DWORD len
)
2390 saxreader
*This
= obj
;
2392 return internal_parseBuffer(This
, ptr
, len
, TRUE
);
2395 static HRESULT
internal_onDataAvailable(void *obj
, char *ptr
, DWORD len
)
2397 saxreader
*This
= obj
;
2399 return internal_parseBuffer(This
, ptr
, len
, FALSE
);
2402 static HRESULT
internal_parseURL(
2410 TRACE("(%p)->(%s)\n", This
, debugstr_w(url
));
2412 if(vbInterface
) hr
= bind_url(url
, internal_vbonDataAvailable
, This
, &bsc
);
2413 else hr
= bind_url(url
, internal_onDataAvailable
, This
, &bsc
);
2418 return detach_bsc(bsc
);
2421 static HRESULT
internal_putProperty(
2427 TRACE("(%p)->(%s %s)\n", This
, debugstr_w(prop
), debugstr_variant(&value
));
2429 if(!memcmp(prop
, PropertyDeclHandlerW
, sizeof(PropertyDeclHandlerW
)))
2431 if(This
->isParsing
) return E_FAIL
;
2433 switch (V_VT(&value
))
2438 if (This
->vbdeclHandler
)
2440 IVBSAXDeclHandler_Release(This
->vbdeclHandler
);
2441 This
->vbdeclHandler
= NULL
;
2445 if (This
->declHandler
)
2447 ISAXDeclHandler_Release(This
->declHandler
);
2448 This
->declHandler
= NULL
;
2452 if (V_UNKNOWN(&value
)) IUnknown_AddRef(V_UNKNOWN(&value
));
2454 if ((vbInterface
&& This
->vbdeclHandler
) ||
2455 (!vbInterface
&& This
->declHandler
))
2458 IVBSAXDeclHandler_Release(This
->vbdeclHandler
);
2460 ISAXDeclHandler_Release(This
->declHandler
);
2464 This
->vbdeclHandler
= (IVBSAXDeclHandler
*)V_UNKNOWN(&value
);
2466 This
->declHandler
= (ISAXDeclHandler
*)V_UNKNOWN(&value
);
2469 return E_INVALIDARG
;
2475 if(!memcmp(prop
, PropertyLexicalHandlerW
, sizeof(PropertyLexicalHandlerW
)))
2477 if(This
->isParsing
) return E_FAIL
;
2479 switch (V_VT(&value
))
2484 if (This
->vblexicalHandler
)
2486 IVBSAXLexicalHandler_Release(This
->vblexicalHandler
);
2487 This
->vblexicalHandler
= NULL
;
2491 if (This
->lexicalHandler
)
2493 ISAXLexicalHandler_Release(This
->lexicalHandler
);
2494 This
->lexicalHandler
= NULL
;
2498 if (V_UNKNOWN(&value
)) IUnknown_AddRef(V_UNKNOWN(&value
));
2500 if ((vbInterface
&& This
->vblexicalHandler
) ||
2501 (!vbInterface
&& This
->lexicalHandler
))
2504 IVBSAXLexicalHandler_Release(This
->vblexicalHandler
);
2506 ISAXLexicalHandler_Release(This
->lexicalHandler
);
2510 This
->vblexicalHandler
= (IVBSAXLexicalHandler
*)V_UNKNOWN(&value
);
2512 This
->lexicalHandler
= (ISAXLexicalHandler
*)V_UNKNOWN(&value
);
2515 return E_INVALIDARG
;
2521 if(!memcmp(prop
, PropertyMaxXMLSizeW
, sizeof(PropertyMaxXMLSizeW
)))
2523 if (V_VT(&value
) == VT_I4
&& V_I4(&value
) == 0) return S_OK
;
2524 FIXME("(%p)->(%s): max-xml-size unsupported\n", This
, debugstr_variant(&value
));
2528 if(!memcmp(prop
, PropertyMaxElementDepthW
, sizeof(PropertyMaxElementDepthW
)))
2530 if (V_VT(&value
) == VT_I4
&& V_I4(&value
) == 0) return S_OK
;
2531 FIXME("(%p)->(%s): max-element-depth unsupported\n", This
, debugstr_variant(&value
));
2535 FIXME("(%p)->(%s:%s): unsupported property\n", This
, debugstr_w(prop
), debugstr_variant(&value
));
2537 if(!memcmp(prop
, PropertyCharsetW
, sizeof(PropertyCharsetW
)))
2540 if(!memcmp(prop
, PropertyDomNodeW
, sizeof(PropertyDomNodeW
)))
2543 if(!memcmp(prop
, PropertyInputSourceW
, sizeof(PropertyInputSourceW
)))
2546 if(!memcmp(prop
, PropertySchemaDeclHandlerW
, sizeof(PropertySchemaDeclHandlerW
)))
2549 if(!memcmp(prop
, PropertyXMLDeclEncodingW
, sizeof(PropertyXMLDeclEncodingW
)))
2552 if(!memcmp(prop
, PropertyXMLDeclStandaloneW
, sizeof(PropertyXMLDeclStandaloneW
)))
2555 if(!memcmp(prop
, PropertyXMLDeclVersionW
, sizeof(PropertyXMLDeclVersionW
)))
2558 return E_INVALIDARG
;
2561 static HRESULT
internal_getProperty(const saxreader
* This
, const WCHAR
*prop
, VARIANT
*value
, BOOL vb
)
2563 TRACE("(%p)->(%s)\n", This
, debugstr_w(prop
));
2565 if (!value
) return E_POINTER
;
2567 if (!memcmp(PropertyLexicalHandlerW
, prop
, sizeof(PropertyLexicalHandlerW
)))
2569 V_VT(value
) = VT_UNKNOWN
;
2570 V_UNKNOWN(value
) = vb
? (IUnknown
*)This
->vblexicalHandler
: (IUnknown
*)This
->lexicalHandler
;
2571 if (V_UNKNOWN(value
)) IUnknown_AddRef(V_UNKNOWN(value
));
2575 if (!memcmp(PropertyDeclHandlerW
, prop
, sizeof(PropertyDeclHandlerW
)))
2577 V_VT(value
) = VT_UNKNOWN
;
2578 V_UNKNOWN(value
) = vb
? (IUnknown
*)This
->vbdeclHandler
: (IUnknown
*)This
->declHandler
;
2579 if (V_UNKNOWN(value
)) IUnknown_AddRef(V_UNKNOWN(value
));
2583 FIXME("(%p)->(%s) unsupported property\n", This
, debugstr_w(prop
));
2588 /*** IVBSAXXMLReader interface ***/
2589 /*** IUnknown methods ***/
2590 static HRESULT WINAPI
saxxmlreader_QueryInterface(IVBSAXXMLReader
* iface
, REFIID riid
, void **ppvObject
)
2592 saxreader
*This
= impl_from_IVBSAXXMLReader( iface
);
2594 TRACE("%p %s %p\n", This
, debugstr_guid( riid
), ppvObject
);
2598 if ( IsEqualGUID( riid
, &IID_IUnknown
) ||
2599 IsEqualGUID( riid
, &IID_IDispatch
) ||
2600 IsEqualGUID( riid
, &IID_IVBSAXXMLReader
))
2604 else if( IsEqualGUID( riid
, &IID_ISAXXMLReader
))
2606 *ppvObject
= &This
->ISAXXMLReader_iface
;
2610 FIXME("interface %s not implemented\n", debugstr_guid(riid
));
2611 return E_NOINTERFACE
;
2614 IVBSAXXMLReader_AddRef( iface
);
2619 static ULONG WINAPI
saxxmlreader_AddRef(IVBSAXXMLReader
* iface
)
2621 saxreader
*This
= impl_from_IVBSAXXMLReader( iface
);
2622 TRACE("%p\n", This
);
2623 return InterlockedIncrement( &This
->ref
);
2626 static ULONG WINAPI
saxxmlreader_Release(
2627 IVBSAXXMLReader
* iface
)
2629 saxreader
*This
= impl_from_IVBSAXXMLReader( iface
);
2632 TRACE("%p\n", This
);
2634 ref
= InterlockedDecrement( &This
->ref
);
2637 if(This
->contentHandler
)
2638 ISAXContentHandler_Release(This
->contentHandler
);
2640 if(This
->vbcontentHandler
)
2641 IVBSAXContentHandler_Release(This
->vbcontentHandler
);
2643 if(This
->errorHandler
)
2644 ISAXErrorHandler_Release(This
->errorHandler
);
2646 if(This
->vberrorHandler
)
2647 IVBSAXErrorHandler_Release(This
->vberrorHandler
);
2649 if(This
->lexicalHandler
)
2650 ISAXLexicalHandler_Release(This
->lexicalHandler
);
2652 if(This
->vblexicalHandler
)
2653 IVBSAXLexicalHandler_Release(This
->vblexicalHandler
);
2655 if(This
->declHandler
)
2656 ISAXDeclHandler_Release(This
->declHandler
);
2658 if(This
->vbdeclHandler
)
2659 IVBSAXDeclHandler_Release(This
->vbdeclHandler
);
2661 free_bstr_pool(&This
->pool
);
2669 static HRESULT WINAPI
saxxmlreader_GetTypeInfoCount( IVBSAXXMLReader
*iface
, UINT
* pctinfo
)
2671 saxreader
*This
= impl_from_IVBSAXXMLReader( iface
);
2673 TRACE("(%p)->(%p)\n", This
, pctinfo
);
2680 static HRESULT WINAPI
saxxmlreader_GetTypeInfo(
2681 IVBSAXXMLReader
*iface
,
2682 UINT iTInfo
, LCID lcid
, ITypeInfo
** ppTInfo
)
2684 saxreader
*This
= impl_from_IVBSAXXMLReader( iface
);
2687 TRACE("(%p)->(%u %u %p)\n", This
, iTInfo
, lcid
, ppTInfo
);
2689 hr
= get_typeinfo(IVBSAXXMLReader_tid
, ppTInfo
);
2694 static HRESULT WINAPI
saxxmlreader_GetIDsOfNames(
2695 IVBSAXXMLReader
*iface
,
2697 LPOLESTR
* rgszNames
,
2702 saxreader
*This
= impl_from_IVBSAXXMLReader( iface
);
2703 ITypeInfo
*typeinfo
;
2706 TRACE("(%p)->(%s %p %u %u %p)\n", This
, debugstr_guid(riid
), rgszNames
, cNames
,
2709 if(!rgszNames
|| cNames
== 0 || !rgDispId
)
2710 return E_INVALIDARG
;
2712 hr
= get_typeinfo(IVBSAXXMLReader_tid
, &typeinfo
);
2715 hr
= ITypeInfo_GetIDsOfNames(typeinfo
, rgszNames
, cNames
, rgDispId
);
2716 ITypeInfo_Release(typeinfo
);
2722 static HRESULT WINAPI
saxxmlreader_Invoke(
2723 IVBSAXXMLReader
*iface
,
2724 DISPID dispIdMember
,
2728 DISPPARAMS
* pDispParams
,
2729 VARIANT
* pVarResult
,
2730 EXCEPINFO
* pExcepInfo
,
2733 saxreader
*This
= impl_from_IVBSAXXMLReader( iface
);
2734 ITypeInfo
*typeinfo
;
2737 TRACE("(%p)->(%d %s %d %d %p %p %p %p)\n", This
, dispIdMember
, debugstr_guid(riid
),
2738 lcid
, wFlags
, pDispParams
, pVarResult
, pExcepInfo
, puArgErr
);
2740 hr
= get_typeinfo(IVBSAXXMLReader_tid
, &typeinfo
);
2743 hr
= ITypeInfo_Invoke(typeinfo
, &This
->IVBSAXXMLReader_iface
, dispIdMember
, wFlags
,
2744 pDispParams
, pVarResult
, pExcepInfo
, puArgErr
);
2745 ITypeInfo_Release(typeinfo
);
2751 /*** IVBSAXXMLReader methods ***/
2752 static HRESULT WINAPI
saxxmlreader_getFeature(
2753 IVBSAXXMLReader
* iface
,
2754 const WCHAR
*feature
,
2755 VARIANT_BOOL
*value
)
2757 saxreader
*This
= impl_from_IVBSAXXMLReader( iface
);
2759 if (!strcmpW(FeatureNamespacesW
, feature
))
2760 return get_feature_value(This
, Namespaces
, value
);
2762 FIXME("(%p)->(%s %p) stub\n", This
, debugstr_w(feature
), value
);
2766 static HRESULT WINAPI
saxxmlreader_putFeature(
2767 IVBSAXXMLReader
* iface
,
2768 const WCHAR
*feature
,
2771 saxreader
*This
= impl_from_IVBSAXXMLReader( iface
);
2773 TRACE("(%p)->(%s %x)\n", This
, debugstr_w(feature
), value
);
2775 if (!strcmpW(FeatureExternalGeneralEntitiesW
, feature
) && value
== VARIANT_FALSE
)
2776 return set_feature_value(This
, ExternalGeneralEntities
, value
);
2778 if (!strcmpW(FeatureExternalParameterEntitiesW
, feature
) && value
== VARIANT_FALSE
)
2779 return set_feature_value(This
, ExternalParameterEntities
, value
);
2781 if (!strcmpW(FeatureLexicalHandlerParEntitiesW
, feature
))
2783 FIXME("(%p)->(%s %x) stub\n", This
, debugstr_w(feature
), value
);
2784 return set_feature_value(This
, LexicalHandlerParEntities
, value
);
2787 if (!strcmpW(FeatureProhibitDTDW
, feature
))
2789 FIXME("(%p)->(%s %x) stub\n", This
, debugstr_w(feature
), value
);
2790 return set_feature_value(This
, ProhibitDTD
, value
);
2793 if (!strcmpW(FeatureNamespacesW
, feature
) && value
== VARIANT_TRUE
)
2794 return set_feature_value(This
, Namespaces
, value
);
2796 FIXME("(%p)->(%s %x) stub\n", This
, debugstr_w(feature
), value
);
2800 static HRESULT WINAPI
saxxmlreader_getProperty(
2801 IVBSAXXMLReader
* iface
,
2805 saxreader
*This
= impl_from_IVBSAXXMLReader( iface
);
2806 return internal_getProperty(This
, prop
, value
, TRUE
);
2809 static HRESULT WINAPI
saxxmlreader_putProperty(
2810 IVBSAXXMLReader
* iface
,
2814 saxreader
*This
= impl_from_IVBSAXXMLReader( iface
);
2815 return internal_putProperty(This
, pProp
, value
, TRUE
);
2818 static HRESULT WINAPI
saxxmlreader_get_entityResolver(
2819 IVBSAXXMLReader
* iface
,
2820 IVBSAXEntityResolver
**pEntityResolver
)
2822 saxreader
*This
= impl_from_IVBSAXXMLReader( iface
);
2823 return internal_getEntityResolver(This
, pEntityResolver
, TRUE
);
2826 static HRESULT WINAPI
saxxmlreader_put_entityResolver(
2827 IVBSAXXMLReader
* iface
,
2828 IVBSAXEntityResolver
*pEntityResolver
)
2830 saxreader
*This
= impl_from_IVBSAXXMLReader( iface
);
2831 return internal_putEntityResolver(This
, pEntityResolver
, TRUE
);
2834 static HRESULT WINAPI
saxxmlreader_get_contentHandler(
2835 IVBSAXXMLReader
* iface
,
2836 IVBSAXContentHandler
**ppContentHandler
)
2838 saxreader
*This
= impl_from_IVBSAXXMLReader( iface
);
2839 return internal_getContentHandler(This
, ppContentHandler
, TRUE
);
2842 static HRESULT WINAPI
saxxmlreader_put_contentHandler(
2843 IVBSAXXMLReader
* iface
,
2844 IVBSAXContentHandler
*contentHandler
)
2846 saxreader
*This
= impl_from_IVBSAXXMLReader( iface
);
2847 return internal_putContentHandler(This
, contentHandler
, TRUE
);
2850 static HRESULT WINAPI
saxxmlreader_get_dtdHandler(
2851 IVBSAXXMLReader
* iface
,
2852 IVBSAXDTDHandler
**pDTDHandler
)
2854 saxreader
*This
= impl_from_IVBSAXXMLReader( iface
);
2855 return internal_getDTDHandler(This
, pDTDHandler
, TRUE
);
2858 static HRESULT WINAPI
saxxmlreader_put_dtdHandler(
2859 IVBSAXXMLReader
* iface
,
2860 IVBSAXDTDHandler
*pDTDHandler
)
2862 saxreader
*This
= impl_from_IVBSAXXMLReader( iface
);
2863 return internal_putDTDHandler(This
, pDTDHandler
, TRUE
);
2866 static HRESULT WINAPI
saxxmlreader_get_errorHandler(
2867 IVBSAXXMLReader
* iface
,
2868 IVBSAXErrorHandler
**pErrorHandler
)
2870 saxreader
*This
= impl_from_IVBSAXXMLReader( iface
);
2871 return internal_getErrorHandler(This
, pErrorHandler
, TRUE
);
2874 static HRESULT WINAPI
saxxmlreader_put_errorHandler(
2875 IVBSAXXMLReader
* iface
,
2876 IVBSAXErrorHandler
*errorHandler
)
2878 saxreader
*This
= impl_from_IVBSAXXMLReader( iface
);
2879 return internal_putErrorHandler(This
, errorHandler
, TRUE
);
2882 static HRESULT WINAPI
saxxmlreader_get_baseURL(
2883 IVBSAXXMLReader
* iface
,
2884 const WCHAR
**pBaseUrl
)
2886 saxreader
*This
= impl_from_IVBSAXXMLReader( iface
);
2888 FIXME("(%p)->(%p) stub\n", This
, pBaseUrl
);
2892 static HRESULT WINAPI
saxxmlreader_put_baseURL(
2893 IVBSAXXMLReader
* iface
,
2894 const WCHAR
*pBaseUrl
)
2896 saxreader
*This
= impl_from_IVBSAXXMLReader( iface
);
2898 FIXME("(%p)->(%s) stub\n", This
, debugstr_w(pBaseUrl
));
2902 static HRESULT WINAPI
saxxmlreader_get_secureBaseURL(
2903 IVBSAXXMLReader
* iface
,
2904 const WCHAR
**pSecureBaseUrl
)
2906 saxreader
*This
= impl_from_IVBSAXXMLReader( iface
);
2908 FIXME("(%p)->(%p) stub\n", This
, pSecureBaseUrl
);
2913 static HRESULT WINAPI
saxxmlreader_put_secureBaseURL(
2914 IVBSAXXMLReader
* iface
,
2915 const WCHAR
*secureBaseUrl
)
2917 saxreader
*This
= impl_from_IVBSAXXMLReader( iface
);
2919 FIXME("(%p)->(%s) stub\n", This
, debugstr_w(secureBaseUrl
));
2923 static HRESULT WINAPI
saxxmlreader_parse(
2924 IVBSAXXMLReader
* iface
,
2927 saxreader
*This
= impl_from_IVBSAXXMLReader( iface
);
2928 return internal_parse(This
, varInput
, TRUE
);
2931 static HRESULT WINAPI
saxxmlreader_parseURL(
2932 IVBSAXXMLReader
* iface
,
2935 saxreader
*This
= impl_from_IVBSAXXMLReader( iface
);
2936 return internal_parseURL(This
, url
, TRUE
);
2939 static const struct IVBSAXXMLReaderVtbl saxreader_vtbl
=
2941 saxxmlreader_QueryInterface
,
2942 saxxmlreader_AddRef
,
2943 saxxmlreader_Release
,
2944 saxxmlreader_GetTypeInfoCount
,
2945 saxxmlreader_GetTypeInfo
,
2946 saxxmlreader_GetIDsOfNames
,
2947 saxxmlreader_Invoke
,
2948 saxxmlreader_getFeature
,
2949 saxxmlreader_putFeature
,
2950 saxxmlreader_getProperty
,
2951 saxxmlreader_putProperty
,
2952 saxxmlreader_get_entityResolver
,
2953 saxxmlreader_put_entityResolver
,
2954 saxxmlreader_get_contentHandler
,
2955 saxxmlreader_put_contentHandler
,
2956 saxxmlreader_get_dtdHandler
,
2957 saxxmlreader_put_dtdHandler
,
2958 saxxmlreader_get_errorHandler
,
2959 saxxmlreader_put_errorHandler
,
2960 saxxmlreader_get_baseURL
,
2961 saxxmlreader_put_baseURL
,
2962 saxxmlreader_get_secureBaseURL
,
2963 saxxmlreader_put_secureBaseURL
,
2965 saxxmlreader_parseURL
2968 /*** ISAXXMLReader interface ***/
2969 /*** IUnknown methods ***/
2970 static HRESULT WINAPI
isaxxmlreader_QueryInterface(ISAXXMLReader
* iface
, REFIID riid
, void **ppvObject
)
2972 saxreader
*This
= impl_from_ISAXXMLReader( iface
);
2973 return saxxmlreader_QueryInterface(&This
->IVBSAXXMLReader_iface
, riid
, ppvObject
);
2976 static ULONG WINAPI
isaxxmlreader_AddRef(ISAXXMLReader
* iface
)
2978 saxreader
*This
= impl_from_ISAXXMLReader( iface
);
2979 return saxxmlreader_AddRef(&This
->IVBSAXXMLReader_iface
);
2982 static ULONG WINAPI
isaxxmlreader_Release(ISAXXMLReader
* iface
)
2984 saxreader
*This
= impl_from_ISAXXMLReader( iface
);
2985 return saxxmlreader_Release(&This
->IVBSAXXMLReader_iface
);
2988 /*** ISAXXMLReader methods ***/
2989 static HRESULT WINAPI
isaxxmlreader_getFeature(
2990 ISAXXMLReader
* iface
,
2991 const WCHAR
*pFeature
,
2992 VARIANT_BOOL
*pValue
)
2994 saxreader
*This
= impl_from_ISAXXMLReader( iface
);
2995 return IVBSAXXMLReader_getFeature(&This
->IVBSAXXMLReader_iface
, pFeature
, pValue
);
2998 static HRESULT WINAPI
isaxxmlreader_putFeature(
2999 ISAXXMLReader
* iface
,
3000 const WCHAR
*pFeature
,
3001 VARIANT_BOOL vfValue
)
3003 saxreader
*This
= impl_from_ISAXXMLReader( iface
);
3004 return IVBSAXXMLReader_putFeature(&This
->IVBSAXXMLReader_iface
, pFeature
, vfValue
);
3007 static HRESULT WINAPI
isaxxmlreader_getProperty(
3008 ISAXXMLReader
* iface
,
3012 saxreader
*This
= impl_from_ISAXXMLReader( iface
);
3013 return internal_getProperty(This
, prop
, value
, FALSE
);
3016 static HRESULT WINAPI
isaxxmlreader_putProperty(
3017 ISAXXMLReader
* iface
,
3021 saxreader
*This
= impl_from_ISAXXMLReader( iface
);
3022 return internal_putProperty(This
, pProp
, value
, FALSE
);
3025 static HRESULT WINAPI
isaxxmlreader_getEntityResolver(
3026 ISAXXMLReader
* iface
,
3027 ISAXEntityResolver
**ppEntityResolver
)
3029 saxreader
*This
= impl_from_ISAXXMLReader( iface
);
3030 return internal_getEntityResolver(This
, ppEntityResolver
, FALSE
);
3033 static HRESULT WINAPI
isaxxmlreader_putEntityResolver(
3034 ISAXXMLReader
* iface
,
3035 ISAXEntityResolver
*pEntityResolver
)
3037 saxreader
*This
= impl_from_ISAXXMLReader( iface
);
3038 return internal_putEntityResolver(This
, pEntityResolver
, FALSE
);
3041 static HRESULT WINAPI
isaxxmlreader_getContentHandler(
3042 ISAXXMLReader
* iface
,
3043 ISAXContentHandler
**pContentHandler
)
3045 saxreader
*This
= impl_from_ISAXXMLReader( iface
);
3046 return internal_getContentHandler(This
, pContentHandler
, FALSE
);
3049 static HRESULT WINAPI
isaxxmlreader_putContentHandler(
3050 ISAXXMLReader
* iface
,
3051 ISAXContentHandler
*contentHandler
)
3053 saxreader
*This
= impl_from_ISAXXMLReader( iface
);
3054 return internal_putContentHandler(This
, contentHandler
, FALSE
);
3057 static HRESULT WINAPI
isaxxmlreader_getDTDHandler(
3058 ISAXXMLReader
* iface
,
3059 ISAXDTDHandler
**pDTDHandler
)
3061 saxreader
*This
= impl_from_ISAXXMLReader( iface
);
3062 return internal_getDTDHandler(This
, pDTDHandler
, FALSE
);
3065 static HRESULT WINAPI
isaxxmlreader_putDTDHandler(
3066 ISAXXMLReader
* iface
,
3067 ISAXDTDHandler
*pDTDHandler
)
3069 saxreader
*This
= impl_from_ISAXXMLReader( iface
);
3070 return internal_putDTDHandler(This
, pDTDHandler
, FALSE
);
3073 static HRESULT WINAPI
isaxxmlreader_getErrorHandler(
3074 ISAXXMLReader
* iface
,
3075 ISAXErrorHandler
**pErrorHandler
)
3077 saxreader
*This
= impl_from_ISAXXMLReader( iface
);
3078 return internal_getErrorHandler(This
, pErrorHandler
, FALSE
);
3081 static HRESULT WINAPI
isaxxmlreader_putErrorHandler(
3082 ISAXXMLReader
* iface
,
3083 ISAXErrorHandler
*errorHandler
)
3085 saxreader
*This
= impl_from_ISAXXMLReader( iface
);
3086 return internal_putErrorHandler(This
, errorHandler
, FALSE
);
3089 static HRESULT WINAPI
isaxxmlreader_getBaseURL(
3090 ISAXXMLReader
* iface
,
3091 const WCHAR
**pBaseUrl
)
3093 saxreader
*This
= impl_from_ISAXXMLReader( iface
);
3094 return IVBSAXXMLReader_get_baseURL(&This
->IVBSAXXMLReader_iface
, pBaseUrl
);
3097 static HRESULT WINAPI
isaxxmlreader_putBaseURL(
3098 ISAXXMLReader
* iface
,
3099 const WCHAR
*pBaseUrl
)
3101 saxreader
*This
= impl_from_ISAXXMLReader( iface
);
3102 return IVBSAXXMLReader_put_baseURL(&This
->IVBSAXXMLReader_iface
, pBaseUrl
);
3105 static HRESULT WINAPI
isaxxmlreader_getSecureBaseURL(
3106 ISAXXMLReader
* iface
,
3107 const WCHAR
**pSecureBaseUrl
)
3109 saxreader
*This
= impl_from_ISAXXMLReader( iface
);
3110 return IVBSAXXMLReader_get_secureBaseURL(&This
->IVBSAXXMLReader_iface
, pSecureBaseUrl
);
3113 static HRESULT WINAPI
isaxxmlreader_putSecureBaseURL(
3114 ISAXXMLReader
* iface
,
3115 const WCHAR
*secureBaseUrl
)
3117 saxreader
*This
= impl_from_ISAXXMLReader( iface
);
3118 return IVBSAXXMLReader_put_secureBaseURL(&This
->IVBSAXXMLReader_iface
, secureBaseUrl
);
3121 static HRESULT WINAPI
isaxxmlreader_parse(
3122 ISAXXMLReader
* iface
,
3125 saxreader
*This
= impl_from_ISAXXMLReader( iface
);
3126 return internal_parse(This
, varInput
, FALSE
);
3129 static HRESULT WINAPI
isaxxmlreader_parseURL(
3130 ISAXXMLReader
* iface
,
3133 saxreader
*This
= impl_from_ISAXXMLReader( iface
);
3134 return internal_parseURL(This
, url
, FALSE
);
3137 static const struct ISAXXMLReaderVtbl isaxreader_vtbl
=
3139 isaxxmlreader_QueryInterface
,
3140 isaxxmlreader_AddRef
,
3141 isaxxmlreader_Release
,
3142 isaxxmlreader_getFeature
,
3143 isaxxmlreader_putFeature
,
3144 isaxxmlreader_getProperty
,
3145 isaxxmlreader_putProperty
,
3146 isaxxmlreader_getEntityResolver
,
3147 isaxxmlreader_putEntityResolver
,
3148 isaxxmlreader_getContentHandler
,
3149 isaxxmlreader_putContentHandler
,
3150 isaxxmlreader_getDTDHandler
,
3151 isaxxmlreader_putDTDHandler
,
3152 isaxxmlreader_getErrorHandler
,
3153 isaxxmlreader_putErrorHandler
,
3154 isaxxmlreader_getBaseURL
,
3155 isaxxmlreader_putBaseURL
,
3156 isaxxmlreader_getSecureBaseURL
,
3157 isaxxmlreader_putSecureBaseURL
,
3158 isaxxmlreader_parse
,
3159 isaxxmlreader_parseURL
3162 HRESULT
SAXXMLReader_create(MSXML_VERSION version
, IUnknown
*pUnkOuter
, LPVOID
*ppObj
)
3166 TRACE("(%p,%p)\n", pUnkOuter
, ppObj
);
3168 reader
= heap_alloc( sizeof (*reader
) );
3170 return E_OUTOFMEMORY
;
3172 reader
->IVBSAXXMLReader_iface
.lpVtbl
= &saxreader_vtbl
;
3173 reader
->ISAXXMLReader_iface
.lpVtbl
= &isaxreader_vtbl
;
3175 reader
->contentHandler
= NULL
;
3176 reader
->vbcontentHandler
= NULL
;
3177 reader
->errorHandler
= NULL
;
3178 reader
->vberrorHandler
= NULL
;
3179 reader
->lexicalHandler
= NULL
;
3180 reader
->vblexicalHandler
= NULL
;
3181 reader
->declHandler
= NULL
;
3182 reader
->vbdeclHandler
= NULL
;
3183 reader
->isParsing
= FALSE
;
3184 reader
->pool
.pool
= NULL
;
3185 reader
->pool
.index
= 0;
3186 reader
->pool
.len
= 0;
3187 reader
->features
= Namespaces
;
3188 reader
->version
= version
;
3190 memset(&reader
->sax
, 0, sizeof(xmlSAXHandler
));
3191 reader
->sax
.initialized
= XML_SAX2_MAGIC
;
3192 reader
->sax
.startDocument
= libxmlStartDocument
;
3193 reader
->sax
.endDocument
= libxmlEndDocument
;
3194 reader
->sax
.startElementNs
= libxmlStartElementNS
;
3195 reader
->sax
.endElementNs
= libxmlEndElementNS
;
3196 reader
->sax
.characters
= libxmlCharacters
;
3197 reader
->sax
.setDocumentLocator
= libxmlSetDocumentLocator
;
3198 reader
->sax
.comment
= libxmlComment
;
3199 reader
->sax
.error
= libxmlFatalError
;
3200 reader
->sax
.fatalError
= libxmlFatalError
;
3201 reader
->sax
.cdataBlock
= libxmlCDataBlock
;
3203 *ppObj
= &reader
->IVBSAXXMLReader_iface
;
3205 TRACE("returning iface %p\n", *ppObj
);
3212 HRESULT
SAXXMLReader_create(MSXML_VERSION version
, IUnknown
*pUnkOuter
, LPVOID
*ppObj
)
3214 MESSAGE("This program tried to use a SAX XML Reader object, but\n"
3215 "libxml2 support was not present at compile time.\n");