xmloff/source/script/xmlbasici.cxx

   1 /*************************************************************************
   2  *
   3  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   4  *
   5  * Copyright 2008 by Sun Microsystems, Inc.
   6  *
   7  * OpenOffice.org - a multi-platform office productivity suite
   8  *
   9  * $RCSfile: xmlbasici.cxx,v $
  10  * $Revision: 1.7 $
  11  *
  12  * This file is part of OpenOffice.org.
  13  *
  14  * OpenOffice.org is free software: you can redistribute it and/or modify
  15  * it under the terms of the GNU Lesser General Public License version 3
  16  * only, as published by the Free Software Foundation.
  17  *
  18  * OpenOffice.org is distributed in the hope that it will be useful,
  19  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  20  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  21  * GNU Lesser General Public License version 3 for more details
  22  * (a copy is included in the LICENSE file that accompanied this code).
  23  *
  24  * You should have received a copy of the GNU Lesser General Public License
  25  * version 3 along with OpenOffice.org.  If not, see
  26  * <http://www.openoffice.org/license.html>
  27  * for a copy of the LGPLv3 License.
  28  *
  29  ************************************************************************/
  30
  31 // MARKER(update_precomp.py): autogen include statement, do not remove
  32 #include "precompiled_xmloff.hxx"
  33 #include "xmlbasici.hxx"
  34 #include <xmloff/attrlist.hxx>
  35 #include <xmloff/nmspmap.hxx>
  36 #include <xmloff/xmlimp.hxx>
  37
  38 using namespace ::com::sun::star;
  39 using namespace ::com::sun::star::uno;
  40
  41
  42 // =============================================================================
  43 // XMLBasicImportContext
  44 // =============================================================================
  45
  46 XMLBasicImportContext::XMLBasicImportContext( SvXMLImport& rImport, USHORT nPrfx, const ::rtl::OUString& rLName,
  47         const Reference< frame::XModel >& rxModel )
  48     :SvXMLImportContext( rImport, nPrfx, rLName )
  49     ,m_xModel( rxModel )
  50 {
  51     Reference< lang::XMultiServiceFactory > xMSF = GetImport().getServiceFactory();
  52     if ( xMSF.is() )
  53     {
  54         m_xHandler.set( xMSF->createInstance(
  55             ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "com.sun.star.document.XMLOasisBasicImporter" ) ) ),
  56             UNO_QUERY );
  57     }
  58
  59     if ( m_xHandler.is() )
  60     {
  61         Reference< document::XImporter > xImporter( m_xHandler, UNO_QUERY );
  62         if ( xImporter.is() )
  63         {
  64             Reference< lang::XComponent > xComp( m_xModel, UNO_QUERY );
  65             xImporter->setTargetDocument( xComp );
  66         }
  67     }
  68 }
  69
  70 // -----------------------------------------------------------------------------
  71
  72 XMLBasicImportContext::~XMLBasicImportContext()
  73 {
  74 }
  75
  76 // -----------------------------------------------------------------------------
  77
  78 SvXMLImportContext* XMLBasicImportContext::CreateChildContext(
  79     USHORT nPrefix, const ::rtl::OUString& rLocalName,
  80     const Reference< xml::sax::XAttributeList >& )
  81 {
  82     SvXMLImportContext* pContext = 0;
  83
  84     if ( m_xHandler.is() )
  85         pContext = new XMLBasicImportChildContext( GetImport(), nPrefix, rLocalName, m_xHandler );
  86
  87     if ( !pContext )
  88         pContext = new SvXMLImportContext( GetImport(), nPrefix, rLocalName );
  89
  90     return pContext;
  91 }
  92
  93 // -----------------------------------------------------------------------------
  94
  95 void XMLBasicImportContext::StartElement(
  96     const Reference< xml::sax::XAttributeList >& rxAttrList )
  97 {
  98     if ( m_xHandler.is() )
  99     {
 100         m_xHandler->startDocument();
 101
 102         // copy namespace declarations
 103         SvXMLAttributeList* pAttrList = new SvXMLAttributeList( rxAttrList );
 104         Reference< xml::sax::XAttributeList > xAttrList( pAttrList );
 105         const SvXMLNamespaceMap& rNamespaceMap = GetImport().GetNamespaceMap();
 106         sal_uInt16 nPos = rNamespaceMap.GetFirstKey();
 107         while ( nPos != USHRT_MAX )
 108         {
 109             ::rtl::OUString aAttrName( rNamespaceMap.GetAttrNameByKey( nPos ) );
 110             if ( xAttrList->getValueByName( aAttrName ).getLength() == 0 )
 111                 pAttrList->AddAttribute( aAttrName, rNamespaceMap.GetNameByKey( nPos ) );
 112             nPos = rNamespaceMap.GetNextKey( nPos );
 113         }
 114
 115         m_xHandler->startElement(
 116             GetImport().GetNamespaceMap().GetQNameByKey( GetPrefix(), GetLocalName() ),
 117             xAttrList );
 118     }
 119 }
 120
 121 // -----------------------------------------------------------------------------
 122
 123 void XMLBasicImportContext::EndElement()
 124 {
 125     if ( m_xHandler.is() )
 126     {
 127         m_xHandler->endElement(
 128             GetImport().GetNamespaceMap().GetQNameByKey( GetPrefix(), GetLocalName() ) );
 129         m_xHandler->endDocument();
 130     }
 131 }
 132
 133 // -----------------------------------------------------------------------------
 134
 135 void XMLBasicImportContext::Characters( const ::rtl::OUString& rChars )
 136 {
 137     if ( m_xHandler.is() )
 138         m_xHandler->characters( rChars );
 139 }
 140
 141
 142 // =============================================================================
 143 // XMLBasicImportChildContext
 144 // =============================================================================
 145
 146 XMLBasicImportChildContext::XMLBasicImportChildContext( SvXMLImport& rImport, USHORT nPrfx, const ::rtl::OUString& rLName,
 147         const Reference< xml::sax::XDocumentHandler >& rxHandler )
 148     :SvXMLImportContext( rImport, nPrfx, rLName )
 149     ,m_xHandler( rxHandler )
 150 {
 151 }
 152
 153 // -----------------------------------------------------------------------------
 154
 155 XMLBasicImportChildContext::~XMLBasicImportChildContext()
 156 {
 157 }
 158
 159 // -----------------------------------------------------------------------------
 160
 161 SvXMLImportContext* XMLBasicImportChildContext::CreateChildContext(
 162     USHORT nPrefix, const ::rtl::OUString& rLocalName,
 163     const Reference< xml::sax::XAttributeList >& )
 164 {
 165     return new XMLBasicImportChildContext( GetImport(), nPrefix, rLocalName, m_xHandler );
 166 }
 167
 168 // -----------------------------------------------------------------------------
 169
 170 void XMLBasicImportChildContext::StartElement(
 171     const Reference< xml::sax::XAttributeList >& xAttrList )
 172 {
 173     if ( m_xHandler.is() )
 174     {
 175         m_xHandler->startElement(
 176             GetImport().GetNamespaceMap().GetQNameByKey( GetPrefix(), GetLocalName() ),
 177             xAttrList );
 178     }
 179 }
 180
 181 // -----------------------------------------------------------------------------
 182
 183 void XMLBasicImportChildContext::EndElement()
 184 {
 185     if ( m_xHandler.is() )
 186     {
 187         m_xHandler->endElement(
 188             GetImport().GetNamespaceMap().GetQNameByKey( GetPrefix(), GetLocalName() ) );
 189     }
 190 }
 191
 192 // -----------------------------------------------------------------------------
 193
 194 void XMLBasicImportChildContext::Characters( const ::rtl::OUString& rChars )
 195 {
 196     if ( m_xHandler.is() )
 197         m_xHandler->characters( rChars );
 198 }
 199
 200 // -----------------------------------------------------------------------------