Adding upstream version 1:7.0.4.upstream/1%7.0.4upstream

Signed-off-by: Daniel Baumann <daniel.baumann@progress-linux.org>

3 files changed, 998 insertions, 0 deletions

diff --git a/xmlscript/source/xml_helper/xml_byteseq.cxx b/xmlscript/source/xml_helper/xml_byteseq.cxx
new file mode 100644
index 000000000..693ef3013
--- /dev/null
+++ b/xmlscript/source/xml_helper/xml_byteseq.cxx
@@ -0,0 +1,158 @@
+/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
+/*
+ * This file is part of the LibreOffice project.
+ *
+ * This Source Code Form is subject to the terms of the Mozilla Public
+ * License, v. 2.0. If a copy of the MPL was not distributed with this
+ * file, You can obtain one at http://mozilla.org/MPL/2.0/.
+ *
+ * This file incorporates work covered by the following license notice:
+ *
+ *   Licensed to the Apache Software Foundation (ASF) under one or more
+ *   contributor license agreements. See the NOTICE file distributed
+ *   with this work for additional information regarding copyright
+ *   ownership. The ASF licenses this file to you under the Apache
+ *   License, Version 2.0 (the "License"); you may not use this file
+ *   except in compliance with the License. You may obtain a copy of
+ *   the License at http://www.apache.org/licenses/LICENSE-2.0 .
+ */
+
+#include <string.h>
+
+#include <cppuhelper/implbase.hxx>
+#include <xmlscript/xml_helper.hxx>
+#include <com/sun/star/io/XInputStream.hpp>
+#include <com/sun/star/io/XOutputStream.hpp>
+
+using namespace osl;
+using namespace com::sun::star;
+using namespace com::sun::star::uno;
+
+
+namespace xmlscript
+{
+
+namespace {
+
+class BSeqInputStream
+    : public ::cppu::WeakImplHelper< io::XInputStream >
+{
+    std::vector<sal_Int8> _seq;
+    sal_Int32 _nPos;
+
+public:
+    explicit BSeqInputStream( std::vector<sal_Int8> const & rSeq )
+        : _seq( rSeq )
+        , _nPos( 0 )
+        {}
+
+    // XInputStream
+    virtual sal_Int32 SAL_CALL readBytes(
+        Sequence< sal_Int8 > & rData, sal_Int32 nBytesToRead ) override;
+    virtual sal_Int32 SAL_CALL readSomeBytes(
+        Sequence< sal_Int8 > & rData, sal_Int32 nMaxBytesToRead ) override;
+    virtual void SAL_CALL skipBytes(
+        sal_Int32 nBytesToSkip ) override;
+    virtual sal_Int32 SAL_CALL available() override;
+    virtual void SAL_CALL closeInput() override;
+};
+
+}
+
+sal_Int32 BSeqInputStream::readBytes(
+    Sequence< sal_Int8 > & rData, sal_Int32 nBytesToRead )
+{
+    nBytesToRead = ((nBytesToRead > static_cast<sal_Int32>(_seq.size()) - _nPos)
+                    ? _seq.size() - _nPos
+                    : nBytesToRead);
+
+    if (rData.getLength() != nBytesToRead)
+        rData.realloc( nBytesToRead );
+    if (nBytesToRead != 0) {
+        memcpy(rData.getArray(), &_seq[_nPos], nBytesToRead);
+    }
+    _nPos += nBytesToRead;
+    return nBytesToRead;
+}
+
+sal_Int32 BSeqInputStream::readSomeBytes(
+    Sequence< sal_Int8 > & rData, sal_Int32 nMaxBytesToRead )
+{
+    return readBytes( rData, nMaxBytesToRead );
+}
+
+void BSeqInputStream::skipBytes(
+    sal_Int32 /*nBytesToSkip*/ )
+{
+}
+
+sal_Int32 BSeqInputStream::available()
+{
+    return _seq.size() - _nPos;
+}
+
+void BSeqInputStream::closeInput()
+{
+}
+
+namespace {
+
+class BSeqOutputStream
+    : public ::cppu::WeakImplHelper< io::XOutputStream >
+{
+    std::vector<sal_Int8> * _seq;
+
+public:
+    explicit BSeqOutputStream( std::vector<sal_Int8> * seq )
+        : _seq( seq )
+        {}
+
+    // XOutputStream
+    virtual void SAL_CALL writeBytes(
+        Sequence< sal_Int8 > const & rData ) override;
+    virtual void SAL_CALL flush() override;
+    virtual void SAL_CALL closeOutput() override;
+};
+
+}
+
+void BSeqOutputStream::writeBytes( Sequence< sal_Int8 > const & rData )
+{
+    sal_Int32 nPos = _seq->size();
+    _seq->resize( nPos + rData.getLength() );
+    if (rData.getLength() != 0) {
+        memcpy( _seq->data() + nPos,
+                rData.getConstArray(),
+                rData.getLength() );
+    }
+}
+void BSeqOutputStream::flush()
+{
+}
+
+void BSeqOutputStream::closeOutput()
+{
+}
+
+Reference< io::XInputStream > createInputStream( std::vector<sal_Int8> const & rInData )
+{
+    return new BSeqInputStream( rInData );
+}
+
+Reference< io::XInputStream > createInputStream( const sal_Int8* pData, int len )
+{
+    std::vector<sal_Int8> rInData(len);
+    if (len != 0) {
+        memcpy( rInData.data(), pData, len);
+    }
+    return new BSeqInputStream( rInData );
+}
+
+Reference< io::XOutputStream > createOutputStream( std::vector<sal_Int8> * pOutData )
+{
+    return new BSeqOutputStream( pOutData );
+}
+
+}
+
+/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/xmlscript/source/xml_helper/xml_element.cxx b/xmlscript/source/xml_helper/xml_element.cxx
new file mode 100644
index 000000000..2c7c71c58
--- /dev/null
+++ b/xmlscript/source/xml_helper/xml_element.cxx
@@ -0,0 +1,111 @@
+/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
+/*
+ * This file is part of the LibreOffice project.
+ *
+ * This Source Code Form is subject to the terms of the Mozilla Public
+ * License, v. 2.0. If a copy of the MPL was not distributed with this
+ * file, You can obtain one at http://mozilla.org/MPL/2.0/.
+ *
+ * This file incorporates work covered by the following license notice:
+ *
+ *   Licensed to the Apache Software Foundation (ASF) under one or more
+ *   contributor license agreements. See the NOTICE file distributed
+ *   with this work for additional information regarding copyright
+ *   ownership. The ASF licenses this file to you under the Apache
+ *   License, Version 2.0 (the "License"); you may not use this file
+ *   except in compliance with the License. You may obtain a copy of
+ *   the License at http://www.apache.org/licenses/LICENSE-2.0 .
+ */
+
+#include <xmlscript/xml_helper.hxx>
+#include <o3tl/safeint.hxx>
+#include <osl/diagnose.h>
+#include <com/sun/star/xml/sax/XDocumentHandler.hpp>
+
+using namespace com::sun::star;
+using namespace com::sun::star::uno;
+
+namespace xmlscript
+{
+
+void XMLElement::addAttribute( OUString const & rAttrName, OUString const & rValue )
+{
+    _attrNames.push_back( rAttrName );
+    _attrValues.push_back( rValue );
+}
+
+void XMLElement::addSubElement( Reference< xml::sax::XAttributeList > const & xElem )
+{
+    _subElems.push_back( xElem );
+}
+
+Reference< xml::sax::XAttributeList > const & XMLElement::getSubElement( sal_Int32 nIndex )
+{
+    return _subElems[ static_cast<size_t>(nIndex) ];
+}
+
+void XMLElement::dumpSubElements( Reference< xml::sax::XDocumentHandler > const & xOut )
+{
+    for (const Reference<XAttributeList> & _subElem : _subElems)
+    {
+        XMLElement * pElem = static_cast< XMLElement * >( _subElem.get() );
+        pElem->dump( xOut );
+    }
+}
+
+void XMLElement::dump( Reference< xml::sax::XDocumentHandler > const & xOut )
+{
+    xOut->ignorableWhitespace( OUString() );
+    xOut->startElement( _name, static_cast< xml::sax::XAttributeList * >( this ) );
+    // write sub elements
+    dumpSubElements( xOut );
+    xOut->ignorableWhitespace( OUString() );
+    xOut->endElement( _name );
+}
+
+// XAttributeList
+sal_Int16 XMLElement::getLength()
+{
+    return static_cast<sal_Int16>(_attrNames.size());
+}
+
+OUString XMLElement::getNameByIndex( sal_Int16 nPos )
+{
+    OSL_ASSERT( nPos >= 0 && o3tl::make_unsigned(nPos) < _attrNames.size() );
+    return _attrNames[ nPos ];
+}
+
+OUString XMLElement::getTypeByIndex( sal_Int16 nPos )
+{
+    OSL_ASSERT( nPos >= 0 && o3tl::make_unsigned(nPos) < _attrNames.size() );
+    // xxx todo
+    return OUString();
+}
+
+OUString XMLElement::getTypeByName( OUString const & /*rName*/ )
+{
+    // xxx todo
+    return OUString();
+}
+
+OUString XMLElement::getValueByIndex( sal_Int16 nPos )
+{
+    OSL_ASSERT( nPos >= 0 && o3tl::make_unsigned(nPos) < _attrNames.size() );
+    return _attrValues[ nPos ];
+}
+
+OUString XMLElement::getValueByName( OUString const & rName )
+{
+    for ( size_t nPos = 0; nPos < _attrNames.size(); ++nPos )
+    {
+        if (_attrNames[ nPos ] == rName)
+        {
+            return _attrValues[ nPos ];
+        }
+    }
+    return OUString();
+}
+
+}
+
+/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/xmlscript/source/xml_helper/xml_impctx.cxx b/xmlscript/source/xml_helper/xml_impctx.cxx
new file mode 100644
index 000000000..b696577b9
--- /dev/null
+++ b/xmlscript/source/xml_helper/xml_impctx.cxx
@@ -0,0 +1,729 @@
+/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
+/*
+ * This file is part of the LibreOffice project.
+ *
+ * This Source Code Form is subject to the terms of the Mozilla Public
+ * License, v. 2.0. If a copy of the MPL was not distributed with this
+ * file, You can obtain one at http://mozilla.org/MPL/2.0/.
+ *
+ * This file incorporates work covered by the following license notice:
+ *
+ *   Licensed to the Apache Software Foundation (ASF) under one or more
+ *   contributor license agreements. See the NOTICE file distributed
+ *   with this work for additional information regarding copyright
+ *   ownership. The ASF licenses this file to you under the Apache
+ *   License, Version 2.0 (the "License"); you may not use this file
+ *   except in compliance with the License. You may obtain a copy of
+ *   the License at http://www.apache.org/licenses/LICENSE-2.0 .
+ */
+
+#include <sal/config.h>
+
+#include <unoservices.hxx>
+#include <xml_import.hxx>
+
+#include <cppuhelper/implbase.hxx>
+#include <cppuhelper/supportsservice.hxx>
+#include <com/sun/star/container/NoSuchElementException.hpp>
+#include <com/sun/star/xml/input/XAttributes.hpp>
+#include <com/sun/star/lang/XInitialization.hpp>
+#include <com/sun/star/uno/XComponentContext.hpp>
+#include <com/sun/star/lang/XServiceInfo.hpp>
+#include <sal/log.hxx>
+
+#include <memory>
+#include <unordered_map>
+#include <vector>
+
+using namespace ::osl;
+using namespace ::com::sun::star;
+using namespace ::com::sun::star::uno;
+
+namespace xmlscript
+{
+
+const sal_Int32 UID_UNKNOWN = -1;
+
+Sequence< OUString > getSupportedServiceNames_DocumentHandlerImpl()
+{
+    return Sequence< OUString > { "com.sun.star.xml.input.SaxDocumentHandler" };
+}
+
+OUString getImplementationName_DocumentHandlerImpl()
+{
+    return "com.sun.star.comp.xml.input.SaxDocumentHandler";
+}
+
+typedef std::unordered_map< OUString, sal_Int32 > t_OUString2LongMap;
+
+namespace {
+
+struct PrefixEntry
+{
+    ::std::vector< sal_Int32 > m_Uids;
+
+    PrefixEntry()
+        { m_Uids.reserve( 4 ); }
+};
+
+}
+
+typedef std::unordered_map<
+    OUString, std::unique_ptr<PrefixEntry> > t_OUString2PrefixMap;
+
+namespace {
+
+struct ElementEntry
+{
+    Reference< xml::input::XElement > m_xElement;
+    ::std::vector< OUString > m_prefixes;
+
+    ElementEntry()
+        { m_prefixes.reserve( 2 ); }
+};
+
+class ExtendedAttributes;
+
+class MGuard
+{
+    Mutex * m_pMutex;
+public:
+    explicit MGuard( std::unique_ptr<Mutex> const & pMutex )
+        : m_pMutex( pMutex.get() )
+        { if (m_pMutex) m_pMutex->acquire(); }
+    ~MGuard() throw ()
+        { if (m_pMutex) m_pMutex->release(); }
+};
+
+class DocumentHandlerImpl :
+    public ::cppu::WeakImplHelper< xml::sax::XDocumentHandler,
+                                    xml::input::XNamespaceMapping,
+                                    lang::XInitialization,
+                                    css::lang::XServiceInfo >
+{
+    friend class ExtendedAttributes;
+
+    Reference< xml::input::XRoot > m_xRoot;
+
+    t_OUString2LongMap m_URI2Uid;
+    sal_Int32 m_uid_count;
+
+    sal_Int32 m_nLastURI_lookup;
+    OUString m_aLastURI_lookup;
+
+    t_OUString2PrefixMap m_prefixes;
+    sal_Int32 m_nLastPrefix_lookup;
+    OUString m_aLastPrefix_lookup;
+
+    std::vector< ElementEntry > m_elements;
+    sal_Int32 m_nSkipElements;
+
+    std::unique_ptr<Mutex> m_pMutex;
+
+    inline Reference< xml::input::XElement > getCurrentElement() const;
+
+    inline sal_Int32 getUidByURI( OUString const & rURI );
+    inline sal_Int32 getUidByPrefix( OUString const & rPrefix );
+
+    inline void pushPrefix(
+        OUString const & rPrefix, OUString const & rURI );
+    inline void popPrefix( OUString const & rPrefix );
+
+    inline void getElementName(
+        OUString const & rQName, sal_Int32 * pUid, OUString * pLocalName );
+
+public:
+    DocumentHandlerImpl(
+        Reference< xml::input::XRoot > const & xRoot,
+        bool bSingleThreadedUse );
+
+    // XServiceInfo
+    virtual OUString SAL_CALL getImplementationName() override;
+    virtual sal_Bool SAL_CALL supportsService(
+        OUString const & servicename ) override;
+    virtual Sequence< OUString > SAL_CALL getSupportedServiceNames() override;
+
+    // XInitialization
+    virtual void SAL_CALL initialize(
+        Sequence< Any > const & arguments ) override;
+
+    // XDocumentHandler
+    virtual void SAL_CALL startDocument() override;
+    virtual void SAL_CALL endDocument() override;
+    virtual void SAL_CALL startElement(
+        OUString const & rQElementName,
+        Reference< xml::sax::XAttributeList > const & xAttribs ) override;
+    virtual void SAL_CALL endElement(
+        OUString const & rQElementName ) override;
+    virtual void SAL_CALL characters(
+        OUString const & rChars ) override;
+    virtual void SAL_CALL ignorableWhitespace(
+        OUString const & rWhitespaces ) override;
+    virtual void SAL_CALL processingInstruction(
+        OUString const & rTarget, OUString const & rData ) override;
+    virtual void SAL_CALL setDocumentLocator(
+        Reference< xml::sax::XLocator > const & xLocator ) override;
+
+    // XNamespaceMapping
+    virtual sal_Int32 SAL_CALL getUidByUri( OUString const & Uri ) override;
+    virtual OUString SAL_CALL getUriByUid( sal_Int32 Uid ) override;
+};
+
+}
+
+static OUString const g_sXMLNS_PREFIX_UNKNOWN( "<<< unknown prefix >>>" );
+static OUString const g_sXMLNS( "xmlns" );
+
+
+DocumentHandlerImpl::DocumentHandlerImpl(
+    Reference< xml::input::XRoot > const & xRoot,
+    bool bSingleThreadedUse )
+    : m_xRoot( xRoot ),
+      m_uid_count( 0 ),
+      m_nLastURI_lookup( UID_UNKNOWN ),
+      m_aLastURI_lookup( "<<< unknown URI >>>" ),
+      m_nLastPrefix_lookup( UID_UNKNOWN ),
+      m_aLastPrefix_lookup( "<<< unknown URI >>>" ),
+      m_nSkipElements( 0 )
+{
+    m_elements.reserve( 10 );
+
+    if (! bSingleThreadedUse)
+        m_pMutex.reset(new Mutex);
+}
+
+inline Reference< xml::input::XElement >
+DocumentHandlerImpl::getCurrentElement() const
+{
+    MGuard aGuard( m_pMutex );
+    if (m_elements.empty())
+        return Reference< xml::input::XElement >();
+    else
+        return m_elements.back().m_xElement;
+}
+
+inline sal_Int32 DocumentHandlerImpl::getUidByURI( OUString const & rURI )
+{
+    MGuard guard( m_pMutex );
+    if (m_nLastURI_lookup == UID_UNKNOWN || m_aLastURI_lookup != rURI)
+    {
+        t_OUString2LongMap::const_iterator iFind( m_URI2Uid.find( rURI ) );
+        if (iFind != m_URI2Uid.end()) // id found
+        {
+            m_nLastURI_lookup = iFind->second;
+            m_aLastURI_lookup = rURI;
+        }
+        else
+        {
+            m_nLastURI_lookup = m_uid_count;
+            ++m_uid_count;
+            m_URI2Uid[ rURI ] = m_nLastURI_lookup;
+            m_aLastURI_lookup = rURI;
+        }
+    }
+    return m_nLastURI_lookup;
+}
+
+inline sal_Int32 DocumentHandlerImpl::getUidByPrefix(
+    OUString const & rPrefix )
+{
+    // commonly the last added prefix is used often for several tags...
+    // good guess
+    if (m_nLastPrefix_lookup == UID_UNKNOWN || m_aLastPrefix_lookup != rPrefix)
+    {
+        t_OUString2PrefixMap::const_iterator iFind(
+            m_prefixes.find( rPrefix ) );
+        if (iFind != m_prefixes.end())
+        {
+            const PrefixEntry & rPrefixEntry = *iFind->second;
+            SAL_WARN_IF( rPrefixEntry.m_Uids.empty(), "xmlscript.xmlhelper", "rPrefixEntry.m_Uids is empty" );
+            m_nLastPrefix_lookup = rPrefixEntry.m_Uids.back();
+            m_aLastPrefix_lookup = rPrefix;
+        }
+        else
+        {
+            m_nLastPrefix_lookup = UID_UNKNOWN;
+            m_aLastPrefix_lookup = g_sXMLNS_PREFIX_UNKNOWN;
+        }
+    }
+    return m_nLastPrefix_lookup;
+}
+
+inline void DocumentHandlerImpl::pushPrefix(
+    OUString const & rPrefix, OUString const & rURI )
+{
+    // lookup id for URI
+    sal_Int32 nUid = getUidByURI( rURI );
+
+    // mark prefix with id
+    t_OUString2PrefixMap::const_iterator iFind( m_prefixes.find( rPrefix ) );
+    if (iFind == m_prefixes.end()) // unused prefix
+    {
+        PrefixEntry * pEntry = new PrefixEntry();
+        pEntry->m_Uids.push_back( nUid ); // latest id for prefix
+        m_prefixes[rPrefix].reset(pEntry);
+    }
+    else
+    {
+        PrefixEntry& rEntry = *iFind->second;
+        SAL_WARN_IF(rEntry.m_Uids.empty(), "xmlscript.xmlhelper", "pEntry->m_Uids is empty");
+        rEntry.m_Uids.push_back(nUid);
+    }
+
+    m_aLastPrefix_lookup = rPrefix;
+    m_nLastPrefix_lookup = nUid;
+}
+
+inline void DocumentHandlerImpl::popPrefix(
+    OUString const & rPrefix )
+{
+    t_OUString2PrefixMap::iterator iFind( m_prefixes.find( rPrefix ) );
+    if (iFind != m_prefixes.end()) // unused prefix
+    {
+        PrefixEntry& rEntry = *iFind->second;
+        rEntry.m_Uids.pop_back(); // pop last id for prefix
+        if (rEntry.m_Uids.empty()) // erase prefix key
+        {
+            m_prefixes.erase(iFind);
+        }
+    }
+
+    m_nLastPrefix_lookup = UID_UNKNOWN;
+    m_aLastPrefix_lookup = g_sXMLNS_PREFIX_UNKNOWN;
+}
+
+inline void DocumentHandlerImpl::getElementName(
+    OUString const & rQName, sal_Int32 * pUid, OUString * pLocalName )
+{
+    sal_Int32 nColonPos = rQName.indexOf( ':' );
+    *pLocalName = (nColonPos >= 0 ? rQName.copy( nColonPos +1 ) : rQName);
+    *pUid = getUidByPrefix(
+        nColonPos >= 0 ? rQName.copy( 0, nColonPos ) : OUString() );
+}
+
+namespace {
+
+class ExtendedAttributes :
+    public ::cppu::WeakImplHelper< xml::input::XAttributes >
+{
+    sal_Int32 const m_nAttributes;
+    std::unique_ptr<sal_Int32[]> m_pUids;
+    std::unique_ptr<OUString[]>  m_pLocalNames;
+    std::unique_ptr<OUString[]>  m_pQNames;
+    std::unique_ptr<OUString[]>  m_pValues;
+
+public:
+    inline ExtendedAttributes(
+        sal_Int32 nAttributes,
+        std::unique_ptr<sal_Int32[]> pUids,
+        std::unique_ptr<OUString[]> pLocalNames,
+        std::unique_ptr<OUString[]> pQNames,
+        Reference< xml::sax::XAttributeList > const & xAttributeList );
+
+    // XAttributes
+    virtual sal_Int32 SAL_CALL getLength() override;
+    virtual sal_Int32 SAL_CALL getIndexByQName(
+        OUString const & rQName ) override;
+    virtual sal_Int32 SAL_CALL getIndexByUidName(
+        sal_Int32 nUid, OUString const & rLocalName ) override;
+    virtual OUString SAL_CALL getQNameByIndex(
+        sal_Int32 nIndex ) override;
+    virtual sal_Int32 SAL_CALL getUidByIndex(
+        sal_Int32 nIndex ) override;
+    virtual OUString SAL_CALL getLocalNameByIndex(
+        sal_Int32 nIndex ) override;
+    virtual OUString SAL_CALL getValueByIndex(
+        sal_Int32 nIndex ) override;
+    virtual OUString SAL_CALL getValueByUidName(
+        sal_Int32 nUid, OUString const & rLocalName ) override;
+    virtual OUString SAL_CALL getTypeByIndex(
+        sal_Int32 nIndex ) override;
+};
+
+}
+
+inline ExtendedAttributes::ExtendedAttributes(
+    sal_Int32 nAttributes,
+    std::unique_ptr<sal_Int32[]> pUids,
+    std::unique_ptr<OUString[]> pLocalNames, std::unique_ptr<OUString[]> pQNames,
+    Reference< xml::sax::XAttributeList > const & xAttributeList )
+    : m_nAttributes( nAttributes )
+    , m_pUids( std::move(pUids) )
+    , m_pLocalNames( std::move(pLocalNames) )
+    , m_pQNames( std::move(pQNames) )
+    , m_pValues( new OUString[ nAttributes ] )
+{
+    for ( sal_Int32 nPos = 0; nPos < nAttributes; ++nPos )
+    {
+        m_pValues[ nPos ] = xAttributeList->getValueByIndex( nPos );
+    }
+}
+
+// XServiceInfo
+
+OUString DocumentHandlerImpl::getImplementationName()
+{
+    return getImplementationName_DocumentHandlerImpl();
+}
+
+sal_Bool DocumentHandlerImpl::supportsService( OUString const & servicename )
+{
+    return cppu::supportsService(this, servicename);
+}
+
+Sequence< OUString > DocumentHandlerImpl::getSupportedServiceNames()
+{
+    return getSupportedServiceNames_DocumentHandlerImpl();
+}
+
+// XInitialization
+
+void DocumentHandlerImpl::initialize(
+    Sequence< Any > const & arguments )
+{
+    MGuard guard( m_pMutex );
+    Reference< xml::input::XRoot > xRoot;
+    if (arguments.getLength() != 1 ||
+        !(arguments[ 0 ] >>= xRoot) ||
+        !xRoot.is())
+    {
+        throw RuntimeException( "missing root instance!" );
+    }
+    m_xRoot = xRoot;
+}
+
+// XNamespaceMapping
+
+sal_Int32 DocumentHandlerImpl::getUidByUri( OUString const & Uri )
+{
+    sal_Int32 uid = getUidByURI( Uri );
+    SAL_WARN_IF( uid == UID_UNKNOWN, "xmlscript.xmlhelper", "uid UNKNOWN");
+    return uid;
+}
+
+OUString DocumentHandlerImpl::getUriByUid( sal_Int32 Uid )
+{
+    MGuard guard( m_pMutex );
+    for (const auto& rURIUid : m_URI2Uid)
+    {
+        if (rURIUid.second == Uid)
+            return rURIUid.first;
+    }
+    throw container::NoSuchElementException( "no such xmlns uid!" , static_cast< OWeakObject * >(this) );
+}
+
+// XDocumentHandler
+
+void DocumentHandlerImpl::startDocument()
+{
+    m_xRoot->startDocument( static_cast< xml::input::XNamespaceMapping * >( this ) );
+}
+
+void DocumentHandlerImpl::endDocument()
+{
+    m_xRoot->endDocument();
+}
+
+void DocumentHandlerImpl::startElement(
+    OUString const & rQElementName,
+    Reference< xml::sax::XAttributeList > const & xAttribs )
+{
+    Reference< xml::input::XElement > xCurrentElement;
+    Reference< xml::input::XAttributes > xAttributes;
+    sal_Int32 nUid;
+    OUString aLocalName;
+    ElementEntry elementEntry;
+
+    { // guard start:
+    MGuard aGuard( m_pMutex );
+    // currently skipping elements and waiting for end tags?
+    if (m_nSkipElements > 0)
+    {
+        ++m_nSkipElements; // wait for another end tag
+        SAL_INFO("xmlscript.xmlhelper", " no context given on createChildElement() => ignoring element \"" << rQElementName << "\" ...");
+        return;
+    }
+
+    sal_Int16 nAttribs = xAttribs->getLength();
+
+    // save all namespace ids
+    std::unique_ptr<sal_Int32[]> pUids(new sal_Int32[ nAttribs ]);
+    std::unique_ptr<OUString[]> pPrefixes(new OUString[ nAttribs ]);
+    std::unique_ptr<OUString[]> pLocalNames(new OUString[ nAttribs ]);
+    std::unique_ptr<OUString[]> pQNames(new OUString[ nAttribs ]);
+
+    // first recognize all xmlns attributes
+    sal_Int16 nPos;
+    for ( nPos = 0; nPos < nAttribs; ++nPos )
+    {
+        // mark attribute to be collected further
+        // on with attribute's uid and current prefix
+        pUids[ nPos ] = 0; // modified
+
+        pQNames[ nPos ] = xAttribs->getNameByIndex( nPos );
+        OUString const & rQAttributeName = pQNames[ nPos ];
+
+        if (rQAttributeName.startsWith( g_sXMLNS ))
+        {
+            if (rQAttributeName.getLength() == 5) // set default namespace
+            {
+                OUString aDefNamespacePrefix;
+                pushPrefix(
+                    aDefNamespacePrefix,
+                    xAttribs->getValueByIndex( nPos ) );
+                elementEntry.m_prefixes.push_back( aDefNamespacePrefix );
+                pUids[ nPos ]          = UID_UNKNOWN;
+                pPrefixes[ nPos ]      = g_sXMLNS;
+                pLocalNames[ nPos ]    = aDefNamespacePrefix;
+            }
+            else if (':' == rQAttributeName[ 5 ]) // set prefix
+            {
+                OUString aPrefix( rQAttributeName.copy( 6 ) );
+                pushPrefix( aPrefix, xAttribs->getValueByIndex( nPos ) );
+                elementEntry.m_prefixes.push_back( aPrefix );
+                pUids[ nPos ]          = UID_UNKNOWN;
+                pPrefixes[ nPos ]      = g_sXMLNS;
+                pLocalNames[ nPos ]    = aPrefix;
+            }
+            // else just a name starting with xmlns, but no prefix
+        }
+    }
+
+    // now read out attribute prefixes (all namespace prefixes have been set)
+    for ( nPos = 0; nPos < nAttribs; ++nPos )
+    {
+        if (pUids[ nPos ] >= 0) // no xmlns: attribute
+        {
+            OUString const & rQAttributeName = pQNames[ nPos ];
+            SAL_WARN_IF(rQAttributeName.startsWith( "xmlns:" ), "xmlscript.xmlhelper", "### unexpected xmlns!" );
+
+            // collect attribute's uid and current prefix
+            sal_Int32 nColonPos = rQAttributeName.indexOf( ':' );
+            if (nColonPos >= 0)
+            {
+                pPrefixes[ nPos ] = rQAttributeName.copy( 0, nColonPos );
+                pLocalNames[ nPos ] = rQAttributeName.copy( nColonPos +1 );
+            }
+            else
+            {
+                pPrefixes[ nPos ].clear();
+                pLocalNames[ nPos ] = rQAttributeName;
+                // leave local names unmodified
+            }
+            pUids[ nPos ] = getUidByPrefix( pPrefixes[ nPos ] );
+        }
+    }
+    pPrefixes.reset();
+    // ownership of arrays belongs to attribute list
+    xAttributes = new ExtendedAttributes(nAttribs, std::move(pUids), std::move(pLocalNames),
+                                         std::move(pQNames), xAttribs);
+
+    getElementName( rQElementName, &nUid, &aLocalName );
+
+    // create new child context and append to list
+    if (! m_elements.empty())
+        xCurrentElement = m_elements.back().m_xElement;
+    } // :guard end
+
+    if (xCurrentElement.is())
+    {
+        elementEntry.m_xElement =
+            xCurrentElement->startChildElement( nUid, aLocalName, xAttributes );
+    }
+    else
+    {
+        elementEntry.m_xElement =
+            m_xRoot->startRootElement( nUid, aLocalName, xAttributes );
+    }
+
+    {
+    MGuard aGuard( m_pMutex );
+    if (elementEntry.m_xElement.is())
+    {
+        m_elements.push_back( std::move(elementEntry) );
+    }
+    else
+    {
+        ++m_nSkipElements;
+
+        // pop prefixes
+        for (sal_Int32 nPos = elementEntry.m_prefixes.size(); nPos--;)
+            popPrefix(elementEntry.m_prefixes[nPos]);
+
+        SAL_INFO("xmlscript.xmlhelper", " no context given on createChildElement() => ignoring element \"" << rQElementName << "\" ...");
+    }
+    }
+}
+
+void DocumentHandlerImpl::endElement(
+    OUString const & rQElementName )
+{
+    Reference< xml::input::XElement > xCurrentElement;
+    {
+        MGuard aGuard( m_pMutex );
+        if (m_nSkipElements)
+        {
+            --m_nSkipElements;
+            SAL_INFO("xmlscript.xmlhelper", "### received endElement() for \"" << rQElementName << "\".");
+            return;
+        }
+
+        // popping context
+        SAL_WARN_IF( m_elements.empty(), "xmlscript.xmlhelper", "m_elements is empty" );
+        ElementEntry& rEntry = m_elements.back();
+        xCurrentElement = rEntry.m_xElement;
+
+#if OSL_DEBUG_LEVEL > 0
+        sal_Int32 nUid;
+        OUString aLocalName;
+        getElementName( rQElementName, &nUid, &aLocalName );
+        SAL_WARN_IF( xCurrentElement->getLocalName() != aLocalName, "xmlscript.xmlhelper", "xCurrentElement->getLocalName() != aLocalName" );
+        SAL_WARN_IF( xCurrentElement->getUid() != nUid, "xmlscript.xmlhelper", "xCurrentElement->getUid() != nUid" );
+#endif
+
+        // pop prefixes
+        for ( sal_Int32 nPos = rEntry.m_prefixes.size(); nPos--; )
+        {
+            popPrefix( rEntry.m_prefixes[ nPos ] );
+        }
+        m_elements.pop_back();
+    }
+    xCurrentElement->endElement();
+}
+
+void DocumentHandlerImpl::characters( OUString const & rChars )
+{
+    Reference< xml::input::XElement > xCurrentElement( getCurrentElement() );
+    if (xCurrentElement.is())
+        xCurrentElement->characters( rChars );
+}
+
+void DocumentHandlerImpl::ignorableWhitespace(
+    OUString const & rWhitespaces )
+{
+    Reference< xml::input::XElement > xCurrentElement( getCurrentElement() );
+    if (xCurrentElement.is())
+        xCurrentElement->ignorableWhitespace( rWhitespaces );
+}
+
+void DocumentHandlerImpl::processingInstruction(
+    OUString const & rTarget, OUString const & rData )
+{
+    Reference< xml::input::XElement > xCurrentElement( getCurrentElement() );
+    if (xCurrentElement.is())
+        xCurrentElement->processingInstruction( rTarget, rData );
+    else
+        m_xRoot->processingInstruction( rTarget, rData );
+}
+
+void DocumentHandlerImpl::setDocumentLocator(
+    Reference< xml::sax::XLocator > const & xLocator )
+{
+    m_xRoot->setDocumentLocator( xLocator );
+}
+
+// XAttributes
+
+sal_Int32 ExtendedAttributes::getIndexByQName( OUString const & rQName )
+{
+    for ( sal_Int32 nPos = m_nAttributes; nPos--; )
+    {
+        if (m_pQNames[ nPos ] == rQName)
+        {
+            return nPos;
+        }
+    }
+    return -1;
+}
+
+sal_Int32 ExtendedAttributes::getLength()
+{
+    return m_nAttributes;
+}
+
+OUString ExtendedAttributes::getLocalNameByIndex( sal_Int32 nIndex )
+{
+    if (nIndex < m_nAttributes)
+        return m_pLocalNames[ nIndex ];
+    else
+        return OUString();
+}
+
+OUString ExtendedAttributes::getQNameByIndex( sal_Int32 nIndex )
+{
+    if (nIndex < m_nAttributes)
+        return m_pQNames[ nIndex ];
+    else
+        return OUString();
+}
+
+OUString ExtendedAttributes::getTypeByIndex( sal_Int32 nIndex )
+{
+    SAL_WARN_IF( nIndex >= m_nAttributes , "xmlscript.xmlhelper", "nIndex is bigger then m_nAttributes");
+    return OUString(); // unsupported
+}
+
+OUString ExtendedAttributes::getValueByIndex( sal_Int32 nIndex )
+{
+    if (nIndex < m_nAttributes)
+        return m_pValues[ nIndex ];
+    else
+        return OUString();
+}
+
+sal_Int32 ExtendedAttributes::getIndexByUidName(
+    sal_Int32 nUid, OUString const & rLocalName )
+{
+    for ( sal_Int32 nPos = m_nAttributes; nPos--; )
+    {
+        if (m_pUids[ nPos ] == nUid && m_pLocalNames[ nPos ] == rLocalName)
+        {
+            return nPos;
+        }
+    }
+    return -1;
+}
+
+sal_Int32 ExtendedAttributes::getUidByIndex( sal_Int32 nIndex )
+{
+    if (nIndex < m_nAttributes)
+        return m_pUids[ nIndex ];
+    else
+        return -1;
+}
+
+OUString ExtendedAttributes::getValueByUidName(
+    sal_Int32 nUid, OUString const & rLocalName )
+{
+    for ( sal_Int32 nPos = m_nAttributes; nPos--; )
+    {
+        if (m_pUids[ nPos ] == nUid && m_pLocalNames[ nPos ] == rLocalName)
+        {
+            return m_pValues[ nPos ];
+        }
+    }
+    return OUString();
+}
+
+Reference< xml::sax::XDocumentHandler > createDocumentHandler(
+    Reference< xml::input::XRoot > const & xRoot )
+{
+    SAL_WARN_IF( !xRoot.is(), "xmlscript.xmlhelper", "xRoot is NULL" );
+    if (xRoot.is())
+    {
+        return new DocumentHandlerImpl(xRoot, true /* mt use */);
+    }
+    return Reference< xml::sax::XDocumentHandler >();
+}
+
+Reference< XInterface > create_DocumentHandlerImpl(
+    SAL_UNUSED_PARAMETER Reference< XComponentContext > const & )
+{
+    return static_cast< ::cppu::OWeakObject * >(
+        new DocumentHandlerImpl(
+            Reference< xml::input::XRoot >(), false /* mt use */ ) );
+}
+
+}
+
+/* vim:set shiftwidth=4 softtabstop=4 expandtab: */