Files
libreoffice/xmlscript/source/xmlflat_imexp/xmlbas_export.cxx
Stephan Bergmann 6dce9c6757 Add missing #includes
...and remove some unncessary using directives/declarations, in preparation of
removing now-unnecessary #includes from cppumaker-generated files, post
e57ca02849 "Remove dynamic exception
specifications".

Change-Id: Iaf1f268871e2ee1d1c76cf90f03557527ebc9067
2017-02-06 17:21:16 +01:00

405 lines
16 KiB
C++

/* -*- 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 "xmlbas_export.hxx"
#include <sal/log.hxx>
#include <xmlscript/xmlns.h>
#include <xmlscript/xml_helper.hxx>
#include <com/sun/star/beans/XPropertySet.hpp>
#include <com/sun/star/lang/XMultiComponentFactory.hpp>
#include <com/sun/star/script/XLibraryContainer2.hpp>
#include <com/sun/star/script/XLibraryContainerPassword.hpp>
#include <com/sun/star/document/XEmbeddedScripts.hpp>
#include <com/sun/star/xml/sax/SAXException.hpp>
#include <cppuhelper/implementationentry.hxx>
#include <cppuhelper/supportsservice.hxx>
using namespace ::com::sun::star;
using namespace ::com::sun::star::lang;
using namespace ::com::sun::star::uno;
namespace xmlscript
{
// XMLBasicExporterBase
XMLBasicExporterBase::XMLBasicExporterBase( bool bOasis )
:m_bOasis( bOasis )
{
}
XMLBasicExporterBase::~XMLBasicExporterBase()
{
}
// XServiceInfo
sal_Bool XMLBasicExporterBase::supportsService( const OUString& rServiceName )
{
return cppu::supportsService(this, rServiceName);
}
// XInitialization
void XMLBasicExporterBase::initialize( const Sequence< Any >& aArguments )
{
::osl::MutexGuard aGuard( m_aMutex );
if ( aArguments.getLength() == 1 )
{
aArguments[0] >>= m_xHandler;
if ( !m_xHandler.is() )
{
throw RuntimeException( "XMLBasicExporterBase::initialize: invalid argument format!" );
}
}
else
{
throw RuntimeException( "XMLBasicExporterBase::initialize: invalid number of arguments!" );
}
}
// XExporter
void XMLBasicExporterBase::setSourceDocument( const Reference< XComponent >& rxDoc )
{
::osl::MutexGuard aGuard( m_aMutex );
m_xModel.set( rxDoc, UNO_QUERY );
if ( !m_xModel.is() )
{
throw IllegalArgumentException( "XMLBasicExporter::setSourceDocument: no document model!", Reference< XInterface >(), 1 );
}
}
// XFilter
sal_Bool XMLBasicExporterBase::filter( const Sequence< beans::PropertyValue >& /*aDescriptor*/ )
{
::osl::MutexGuard aGuard( m_aMutex );
bool bReturn = true;
try
{
if ( m_xHandler.is() )
{
m_xHandler->startDocument();
// ooo/script prefix and URI
OUString aPrefix;
OUString aURI;
if ( m_bOasis )
{
aPrefix = XMLNS_OOO_PREFIX;
aURI = XMLNS_OOO_URI;
}
else
{
aPrefix = XMLNS_SCRIPT_PREFIX;
aURI = XMLNS_SCRIPT_URI;
}
// ooo/script:libraries element
OUString aLibContElementName( aPrefix );
aLibContElementName += ":libraries";
XMLElement* pLibContElement = new XMLElement( aLibContElementName );
Reference< xml::sax::XAttributeList > xLibContAttribs( pLibContElement );
// ooo/script namespace attribute
pLibContElement->addAttribute( "xmlns:" + aPrefix, aURI );
// xlink namespace attribute
pLibContElement->addAttribute( "xmlns:" XMLNS_XLINK_PREFIX, XMLNS_XLINK_URI );
// <ooo/script:libraries...
m_xHandler->ignorableWhitespace( OUString() );
m_xHandler->startElement( aLibContElementName, xLibContAttribs );
Reference< script::XLibraryContainer2 > xLibContainer;
// try the XEmbeddedScripts interface
Reference< document::XEmbeddedScripts > xDocumentScripts( m_xModel, UNO_QUERY );
if ( xDocumentScripts.is() )
xLibContainer.set( xDocumentScripts->getBasicLibraries().get() );
if ( !xLibContainer.is() )
{
// try the "BasicLibraries" property (old-style, for compatibility)
Reference< beans::XPropertySet > xPSet( m_xModel, UNO_QUERY );
if ( xPSet.is() )
xPSet->getPropertyValue("BasicLibraries" ) >>= xLibContainer;
}
SAL_WARN_IF( !xLibContainer.is(), "xmlscript.xmlflat", "XMLBasicExporterBase::filter: nowhere to export to!" );
if ( xLibContainer.is() )
{
Sequence< OUString > aLibNames = xLibContainer->getElementNames();
sal_Int32 nLibCount = aLibNames.getLength();
const OUString* pLibNames = aLibNames.getConstArray();
for ( sal_Int32 i = 0 ; i < nLibCount ; ++i )
{
OUString aLibName( pLibNames[i] );
if ( xLibContainer->hasByName( aLibName ) )
{
OUString aTrueStr( "true" );
if ( xLibContainer->isLibraryLink( aLibName ) )
{
// ooo/script:library-linked element
OUString aLibElementName( aPrefix );
aLibElementName += ":library-linked";
XMLElement* pLibElement = new XMLElement( aLibElementName );
Reference< xml::sax::XAttributeList > xLibAttribs;
xLibAttribs = static_cast< xml::sax::XAttributeList* >( pLibElement );
// ooo/script:name attribute
pLibElement->addAttribute( aPrefix + ":name", aLibName );
OUString aLinkURL( xLibContainer->getLibraryLinkURL( aLibName ) );
if ( !aLinkURL.isEmpty() )
{
// xlink:href attribute
pLibElement->addAttribute( XMLNS_XLINK_PREFIX ":href", aLinkURL );
// xlink:type attribute
pLibElement->addAttribute( XMLNS_XLINK_PREFIX ":type", "simple" );
}
if ( xLibContainer->isLibraryReadOnly( aLibName ) )
{
// ooo/script:readonly attribute
pLibElement->addAttribute( aPrefix + ":readonly", aTrueStr );
}
// <ooo/script:library-linked...
m_xHandler->ignorableWhitespace( OUString() );
m_xHandler->startElement( aLibElementName, xLibAttribs );
// ...ooo/script:library-linked>
m_xHandler->ignorableWhitespace( OUString() );
m_xHandler->endElement( aLibElementName );
}
else
{
// ooo/script:library-embedded element
OUString aLibElementName( aPrefix );
aLibElementName += ":library-embedded";
XMLElement* pLibElement = new XMLElement( aLibElementName );
Reference< xml::sax::XAttributeList > xLibAttribs;
xLibAttribs = static_cast< xml::sax::XAttributeList* >( pLibElement );
// ooo/script:name attribute
pLibElement->addAttribute( aPrefix + ":name", aLibName );
if ( xLibContainer->isLibraryReadOnly( aLibName ) )
{
// ooo/script:readonly attribute
pLibElement->addAttribute( aPrefix + ":readonly", aTrueStr );
}
// TODO: password protected libraries
Reference< script::XLibraryContainerPassword > xPasswd( xLibContainer, UNO_QUERY );
if ( xPasswd.is() && xPasswd->isLibraryPasswordProtected( aLibName ) )
continue;
// <ooo/script:library-embedded...
m_xHandler->ignorableWhitespace( OUString() );
m_xHandler->startElement( aLibElementName, xLibAttribs );
if ( !xLibContainer->isLibraryLoaded( aLibName ) )
xLibContainer->loadLibrary( aLibName );
Reference< container::XNameContainer > xLib;
xLibContainer->getByName( aLibName ) >>= xLib;
if ( xLib.is() )
{
Sequence< OUString > aModNames = xLib->getElementNames();
sal_Int32 nModCount = aModNames.getLength();
const OUString* pModNames = aModNames.getConstArray();
for ( sal_Int32 j = 0 ; j < nModCount ; ++j )
{
OUString aModName( pModNames[j] );
if ( xLib->hasByName( aModName ) )
{
// ooo/script:module element
OUString aModElementName( aPrefix );
aModElementName += ":module";
XMLElement* pModElement = new XMLElement( aModElementName );
Reference< xml::sax::XAttributeList > xModAttribs;
xModAttribs = static_cast< xml::sax::XAttributeList* >( pModElement );
// ooo/script:name attribute
pModElement->addAttribute( aPrefix + ":name", aModName );
// <ooo/script:module...
m_xHandler->ignorableWhitespace( OUString() );
m_xHandler->startElement( aModElementName, xModAttribs );
// ooo/script:source-code element
OUString aSourceElementName( aPrefix );
aSourceElementName += ":source-code";
XMLElement* pSourceElement = new XMLElement( aSourceElementName );
Reference< xml::sax::XAttributeList > xSourceAttribs;
xSourceAttribs = static_cast< xml::sax::XAttributeList* >( pSourceElement );
// <ooo/script:source-code...
m_xHandler->ignorableWhitespace( OUString() );
m_xHandler->startElement( aSourceElementName, xSourceAttribs );
// module data
// TODO: write encrypted data for password protected libraries
OUString aSource;
xLib->getByName( aModName ) >>= aSource;
m_xHandler->characters( aSource );
// TODO: <ooo/script:byte-code>
// ...ooo/script:source-code>
m_xHandler->ignorableWhitespace( OUString() );
m_xHandler->endElement( aSourceElementName );
// ...ooo/script:module>
m_xHandler->ignorableWhitespace( OUString() );
m_xHandler->endElement( aModElementName );
}
}
}
// ...ooo/script:library-embedded>
m_xHandler->ignorableWhitespace( OUString() );
m_xHandler->endElement( aLibElementName );
}
}
}
}
// ...ooo/script:libraries>
m_xHandler->ignorableWhitespace( OUString() );
m_xHandler->endElement( aLibContElementName );
m_xHandler->endDocument();
}
}
catch ( const container::NoSuchElementException& e )
{
SAL_INFO("xmlscript.xmlflat", "XMLBasicExporterBase::filter: caught NoSuchElementException reason " << e.Message );
bReturn = false;
}
catch ( const lang::IllegalArgumentException& e )
{
SAL_INFO("xmlscript.xmlflat", "XMLBasicExporterBase::filter: caught IllegalArgumentException reason " << e.Message );
bReturn = false;
}
catch ( const lang::WrappedTargetException& e )
{
SAL_INFO("xmlscript.xmlflat", "XMLBasicExporterBase::filter: caught WrappedTargetException reason " << e.Message );
bReturn = false;
}
catch ( const xml::sax::SAXException& e )
{
SAL_INFO("xmlscript.xmlflat", "XMLBasicExporterBase::filter: caught SAXException reason " << e.Message );
bReturn = false;
}
return bReturn;
}
void XMLBasicExporterBase::cancel()
{
::osl::MutexGuard aGuard( m_aMutex );
// cancel export
}
// XMLBasicExporter
XMLBasicExporter::XMLBasicExporter()
:XMLBasicExporterBase( false )
{
}
XMLBasicExporter::~XMLBasicExporter()
{
}
// XServiceInfo
OUString XMLBasicExporter::getImplementationName( )
{
return OUString( "com.sun.star.comp.xmlscript.XMLBasicExporter" );
}
Sequence< OUString > XMLBasicExporter::getSupportedServiceNames( )
{
Sequence< OUString > aNames { "com.sun.star.document.XMLBasicExporter" };
return aNames;
}
// XMLOasisBasicExporter
XMLOasisBasicExporter::XMLOasisBasicExporter()
:XMLBasicExporterBase( true )
{
}
XMLOasisBasicExporter::~XMLOasisBasicExporter()
{
}
// XServiceInfo
OUString XMLOasisBasicExporter::getImplementationName( )
{
return OUString( "com.sun.star.comp.xmlscript.XMLOasisBasicExporter" );
}
Sequence< OUString > XMLOasisBasicExporter::getSupportedServiceNames( )
{
Sequence< OUString > aNames { "com.sun.star.document.XMLOasisBasicExporter" };
return aNames;
}
} // namespace xmlscript
extern "C" SAL_DLLPUBLIC_EXPORT css::uno::XInterface * SAL_CALL
com_sun_star_comp_xmlscript_XMLBasicExporter(
css::uno::XComponentContext *,
css::uno::Sequence<css::uno::Any> const &)
{
return cppu::acquire(new xmlscript::XMLBasicExporter());
}
extern "C" SAL_DLLPUBLIC_EXPORT css::uno::XInterface * SAL_CALL
com_sun_star_comp_xmlscript_XMLOasisBasicExporter(
css::uno::XComponentContext *,
css::uno::Sequence<css::uno::Any> const &)
{
return cppu::acquire(new xmlscript::XMLOasisBasicExporter());
}
/* vim:set shiftwidth=4 softtabstop=4 expandtab: */