/* -*- 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 <vcl/errinf.hxx>
#include <svl/style.hxx>
#include <sfx2/docfile.hxx>
#include <sfx2/objsh.hxx>
#include <sot/storage.hxx>
#include <osl/diagnose.h>
#include <comphelper/fileformat.h>
#include <comphelper/processfactory.hxx>
#include <comphelper/propertysequence.hxx>
#include <unotools/streamwrap.hxx>
#include <svx/dialmgr.hxx>
#include <svx/strings.hrc>
#include <svx/xmlgrhlp.hxx>
#include <svtools/sfxecode.hxx>
#include <sfx2/frame.hxx>
#include <svl/itemset.hxx>
#include <svl/stritem.hxx>
#include <sfx2/sfxsids.hrc>
#include <com/sun/star/container/XChild.hpp>
#include <com/sun/star/beans/XPropertySetInfo.hpp>
#include <com/sun/star/xml/sax/InputSource.hpp>
#include <com/sun/star/xml/sax/Parser.hpp>
#include <com/sun/star/xml/sax/XFastParser.hpp>
#include <com/sun/star/xml/sax/Writer.hpp>
#include <com/sun/star/frame/XModel.hpp>
#include <com/sun/star/beans/PropertyAttribute.hpp>
#include <comphelper/propertysetinfo.hxx>
#include <comphelper/genericpropertyset.hxx>
#include <com/sun/star/packages/WrongPasswordException.hpp>
#include <com/sun/star/packages/zip/ZipIOException.hpp>
#include <com/sun/star/embed/ElementModes.hpp>
#include <com/sun/star/script/vba/XVBACompatibility.hpp>
#include <com/sun/star/rdf/XDocumentMetadataAccess.hpp>
#include <com/sun/star/ucb/InteractiveAugmentedIOException.hpp>
#include <sfx2/DocumentMetadataAccess.hxx>
#include <comphelper/documentconstants.hxx>
#include <svx/xmleohlp.hxx>
#include <rtl/strbuf.hxx>
#include <sal/log.hxx>
#include <unotools/saveopt.hxx>
#include <document.hxx>
#include <xmlwrap.hxx>
#include "xmlimprt.hxx"
#include "xmlexprt.hxx"
#include <global.hxx>
#include <globstr.hrc>
#include <scresid.hxx>
#include <scerrors.hxx>
#include "XMLExportSharedData.hxx"
#include <docuno.hxx>
#include <drwlayer.hxx>
#include <sheetdata.hxx>
#include "XMLCodeNameProvider.hxx"
#include <docsh.hxx>
#include <unonames.hxx>
using namespace com::sun::star;
ScXMLImportWrapper::ScXMLImportWrapper( ScDocShell& rDocSh, SfxMedium* pM, const uno::Reference < embed::XStorage >& xStor ) :
mrDocShell(rDocSh),
rDoc(rDocSh.GetDocument()),
pMedium(pM),
xStorage(xStor)
{
OSL_ENSURE( pMedium || xStorage.is(), "ScXMLImportWrapper: Medium or Storage must be set" );
}
uno::Reference <task::XStatusIndicator> ScXMLImportWrapper::GetStatusIndicator()
{
uno::Reference<task::XStatusIndicator> xStatusIndicator;
if (pMedium)
{
SfxItemSet* pSet = pMedium->GetItemSet();
if (pSet)
{
const SfxUnoAnyItem* pItem = pSet->GetItem<SfxUnoAnyItem>(SID_PROGRESS_STATUSBAR_CONTROL);
if (pItem)
xStatusIndicator.set(pItem->GetValue(), uno::UNO_QUERY);
}
}
return xStatusIndicator;
}
ErrCode ScXMLImportWrapper::ImportFromComponent(const uno::Reference<uno::XComponentContext>& xContext,
const uno::Reference<frame::XModel>& xModel, const uno::Reference<xml::sax::XParser>& xParser,
xml::sax::InputSource& aParserInput,
const OUString& sComponentName, const OUString& sDocName,
const OUString& sOldDocName, const uno::Sequence<uno::Any>& aArgs,
bool bMustBeSuccessfull)
{
uno::Reference < io::XStream > xDocStream;
if ( !xStorage.is() && pMedium )
xStorage = pMedium->GetStorage();
bool bEncrypted = false;
OUString sStream(sDocName);
if( xStorage.is() )
{
try
{
uno::Reference < container::XNameAccess > xAccess( xStorage, uno::UNO_QUERY );
if ( xAccess->hasByName(sDocName) && xStorage->isStreamElement( sDocName) )
xDocStream = xStorage->openStreamElement( sDocName, embed::ElementModes::READ );
else if (!sOldDocName.isEmpty() && xAccess->hasByName(sOldDocName) && xStorage->isStreamElement( sOldDocName) )
{
xDocStream = xStorage->openStreamElement( sOldDocName, embed::ElementModes::READ );
sStream = sOldDocName;
}
else
return ERRCODE_NONE;
aParserInput.aInputStream = xDocStream->getInputStream();
uno::Reference < beans::XPropertySet > xSet( xDocStream, uno::UNO_QUERY );
uno::Any aAny = xSet->getPropertyValue("Encrypted");
aAny >>= bEncrypted;
}
catch( const packages::WrongPasswordException& )
{
return ERRCODE_SFX_WRONGPASSWORD;
}
catch( const packages::zip::ZipIOException& )
{
return ERRCODE_IO_BROKENPACKAGE;
}
catch( const uno::Exception& )
{
return SCERR_IMPORT_UNKNOWN;
}
}
else
return SCERR_IMPORT_UNKNOWN;
// set Base URL
uno::Reference< beans::XPropertySet > xInfoSet;
if( aArgs.getLength() > 0 )
aArgs.getConstArray()[0] >>= xInfoSet;
OSL_ENSURE( xInfoSet.is(), "missing property set" );
if( xInfoSet.is() )
{
xInfoSet->setPropertyValue( "StreamName", uno::makeAny( sStream ) );
}
ErrCode nReturn = ERRCODE_NONE;
rDoc.SetRangeOverflowType(ERRCODE_NONE); // is modified by the importer if limits are exceeded
uno::Reference<xml::sax::XDocumentHandler> xDocHandler(
xContext->getServiceManager()->createInstanceWithArgumentsAndContext(
sComponentName, aArgs, xContext ),
uno::UNO_QUERY );
OSL_ENSURE( xDocHandler.is(), "can't get Calc importer" );
uno::Reference<document::XImporter> xImporter( xDocHandler, uno::UNO_QUERY );
uno::Reference<lang::XComponent> xComponent( xModel, uno::UNO_QUERY );
if (xImporter.is())
xImporter->setTargetDocument( xComponent );
ScXMLImport* pImporterImpl = dynamic_cast<ScXMLImport*>(xImporter.get());
if (pImporterImpl)
pImporterImpl->SetPostProcessData(&maPostProcessData);
// connect parser and filter
uno::Reference< xml::sax::XFastParser > xFastParser = dynamic_cast<
xml::sax::XFastParser* >( xDocHandler.get() );
xParser->setDocumentHandler( xDocHandler );
try
{
if( xFastParser.is() )
xFastParser->parseStream( aParserInput );
else
xParser->parseStream( aParserInput );
}
catch( const xml::sax::SAXParseException& r )
{
// sax parser sends wrapped exceptions,
// try to find the original one
xml::sax::SAXException aSaxEx = *static_cast<xml::sax::SAXException const *>(&r);
bool bTryChild = true;
while( bTryChild )
{
xml::sax::SAXException aTmp;
if ( aSaxEx.WrappedException >>= aTmp )
aSaxEx = aTmp;
else
bTryChild = false;
}
packages::zip::ZipIOException aBrokenPackage;
if ( aSaxEx.WrappedException >>= aBrokenPackage )
return ERRCODE_IO_BROKENPACKAGE;
else if( bEncrypted )
nReturn = ERRCODE_SFX_WRONGPASSWORD;
else
{
SAL_WARN("sc.filter", "SAX parse exception caught while importing: " << r);
OUString sErr = OUString::number( r.LineNumber ) +
"," +
OUString::number( r.ColumnNumber );
if( !sDocName.isEmpty() )
{
nReturn = *new TwoStringErrorInfo(
(bMustBeSuccessfull ? SCERR_IMPORT_FILE_ROWCOL
: SCWARN_IMPORT_FILE_ROWCOL),
sDocName, sErr,
DialogMask::ButtonsOk | DialogMask::MessageError );
}
else
{
OSL_ENSURE( bMustBeSuccessfull, "Warnings are not supported" );
nReturn = *new StringErrorInfo( SCERR_IMPORT_FORMAT_ROWCOL, sErr,
DialogMask::ButtonsOk | DialogMask::MessageError );
}
}
}
catch( const xml::sax::SAXException& r )
{
packages::zip::ZipIOException aBrokenPackage;
if ( r.WrappedException >>= aBrokenPackage )
return ERRCODE_IO_BROKENPACKAGE;
else if( bEncrypted )
nReturn = ERRCODE_SFX_WRONGPASSWORD;
else
{
SAL_WARN("sc.filter", "SAX exception caught while importing: " << r);
nReturn = SCERR_IMPORT_FORMAT;
}
}
catch( const packages::zip::ZipIOException& r )
{
SAL_WARN("sc.filter", "Zip exception caught while importing: " << r);
nReturn = ERRCODE_IO_BROKENPACKAGE;
}
catch( const io::IOException& r )
{
SAL_WARN("sc.filter", "IO exception caught while importing: " << r);
nReturn = SCERR_IMPORT_OPEN;
}
catch( const uno::Exception& r )
{
SAL_WARN("sc.filter", "uno exception caught while importing: " << r);
nReturn = SCERR_IMPORT_UNKNOWN;
}
// #i31130# Can't use getImplementation here to get the ScXMLImport from xDocHandler,
// because when OOo 1.x files are loaded, xDocHandler is the OOo2OasisTransformer.
// So the overflow warning ErrorCode is now stored in the document.
// Export works differently, there getImplementation still works.
if (rDoc.HasRangeOverflow() && !nReturn)
nReturn = rDoc.GetRangeOverflowType();
// free the component
xParser->setDocumentHandler( nullptr );
// success!
return nReturn;
}
bool ScXMLImportWrapper::Import( ImportFlags nMode, ErrCode& rError )
{
uno::Reference<uno::XComponentContext> xContext = comphelper::getProcessComponentContext();
xml::sax::InputSource aParserInput;
if (pMedium)
aParserInput.sSystemId = pMedium->GetName();
if ( !xStorage.is() && pMedium )
xStorage = pMedium->GetStorage();
// get parser
uno::Reference<xml::sax::XParser> xXMLParser = xml::sax::Parser::create(xContext);
// get filter
uno::Reference<frame::XModel> xModel = mrDocShell.GetModel();
/** property map for export info set */
comphelper::PropertyMapEntry const aImportInfoMap[] =
{
{ OUString("ProgressRange"), 0, ::cppu::UnoType<sal_Int32>::get(), css::beans::PropertyAttribute::MAYBEVOID, 0},
{ OUString("ProgressMax"), 0, ::cppu::UnoType<sal_Int32>::get(), css::beans::PropertyAttribute::MAYBEVOID, 0},
{ OUString("ProgressCurrent"), 0, ::cppu::UnoType<sal_Int32>::get(), css::beans::PropertyAttribute::MAYBEVOID, 0},
{ OUString("NumberStyles"), 0, cppu::UnoType<container::XNameAccess>::get(), css::beans::PropertyAttribute::MAYBEVOID, 0},
{ OUString("PrivateData"), 0, cppu::UnoType<uno::XInterface>::get(), css::beans::PropertyAttribute::MAYBEVOID, 0 },
{ OUString("BaseURI"), 0, ::cppu::UnoType<OUString>::get(), css::beans::PropertyAttribute::MAYBEVOID, 0 },
{ OUString("StreamRelPath"), 0, ::cppu::UnoType<OUString>::get(), css::beans::PropertyAttribute::MAYBEVOID, 0 },
{ OUString("StreamName"), 0, ::cppu::UnoType<OUString>::get(), css::beans::PropertyAttribute::MAYBEVOID, 0 },
{ OUString("BuildId"), 0, ::cppu::UnoType<OUString>::get(), css::beans::PropertyAttribute::MAYBEVOID, 0 },
{ OUString("VBACompatibilityMode"), 0, cppu::UnoType<bool>::get(), css::beans::PropertyAttribute::MAYBEVOID, 0 },
{ OUString("ScriptConfiguration"), 0, cppu::UnoType<container::XNameAccess>::get(), css::beans::PropertyAttribute::MAYBEVOID, 0},
{ OUString("OrganizerMode"), 0, cppu::UnoType<bool>::get(), css::beans::PropertyAttribute::MAYBEVOID, 0 },
{ OUString("SourceStorage"), 0, cppu::UnoType<embed::XStorage>::get(), css::beans::PropertyAttribute::MAYBEVOID, 0 },
{ OUString(SC_UNO_ODS_LOCK_SOLAR_MUTEX), 0, cppu::UnoType<bool>::get(), css::beans::PropertyAttribute::MAYBEVOID, 0 },
{ OUString(SC_UNO_ODS_IMPORT_STYLES), 0, cppu::UnoType<bool>::get(), css::beans::PropertyAttribute::MAYBEVOID, 0 },
{ OUString(), 0, css::uno::Type(), 0, 0 }
};
uno::Reference< beans::XPropertySet > xInfoSet( comphelper::GenericPropertySet_CreateInstance( new comphelper::PropertySetInfo( aImportInfoMap ) ) );
// No need to lock solar mutex when calling from the wrapper.
xInfoSet->setPropertyValue(SC_UNO_ODS_LOCK_SOLAR_MUTEX, uno::makeAny(false));
// ---- get BuildId from parent container if available
uno::Reference< container::XChild > xChild( xModel, uno::UNO_QUERY );
if( xChild.is() )
{
uno::Reference< beans::XPropertySet > xParentSet( xChild->getParent(), uno::UNO_QUERY );
if( xParentSet.is() )
{
uno::Reference< beans::XPropertySetInfo > xPropSetInfo( xParentSet->getPropertySetInfo() );
OUString sPropName("BuildId" );
if( xPropSetInfo.is() && xPropSetInfo->hasPropertyByName(sPropName) )
{
xInfoSet->setPropertyValue( sPropName, xParentSet->getPropertyValue(sPropName) );
}
}
}
uno::Reference<task::XStatusIndicator> xStatusIndicator = GetStatusIndicator();
if (xStatusIndicator.is())
{
sal_Int32 nProgressRange(1000000);
xStatusIndicator->start(SvxResId(RID_SVXSTR_DOC_LOAD), nProgressRange);
xInfoSet->setPropertyValue("ProgressRange", uno::makeAny(nProgressRange));
}
// Set base URI
OSL_ENSURE( pMedium, "There is no medium to get MediaDescriptor from!" );
OUString aBaseURL = pMedium ? pMedium->GetBaseURL() : OUString();
// needed for relative URLs, but in clipboard copy/paste there may be none
SAL_INFO_IF(aBaseURL.isEmpty(), "sc.filter", "ScXMLImportWrapper: no base URL");
OUString sPropName("BaseURI");
xInfoSet->setPropertyValue( sPropName, uno::makeAny( aBaseURL ) );
// TODO/LATER: do not do it for embedded links
OUString aName;
if (SfxObjectCreateMode::EMBEDDED == mrDocShell.GetCreateMode())
{
if ( pMedium && pMedium->GetItemSet() )
{
const SfxStringItem* pDocHierarchItem = static_cast<const SfxStringItem*>(
pMedium->GetItemSet()->GetItem(SID_DOC_HIERARCHICALNAME) );
if ( pDocHierarchItem )
aName = pDocHierarchItem->GetValue();
}
else
aName = "dummyObjectName";
if( !aName.isEmpty() )
{
sPropName = "StreamRelPath";
xInfoSet->setPropertyValue( sPropName, uno::makeAny( aName ) );
}
}
if (mrDocShell.GetCreateMode() == SfxObjectCreateMode::ORGANIZER)
xInfoSet->setPropertyValue("OrganizerMode", uno::makeAny(true));
xInfoSet->setPropertyValue( "SourceStorage", uno::Any( xStorage ) );
bool bOasis = ( SotStorage::GetVersion( xStorage ) > SOFFICE_FILEFORMAT_60 );
if ((nMode & ImportFlags::Metadata) && bOasis)
{
// RDF metadata: ODF >= 1.2
try
{
const uno::Reference< rdf::XDocumentMetadataAccess > xDMA(
xModel, uno::UNO_QUERY_THROW );
const uno::Reference< rdf::XURI > xBaseURI(
::sfx2::createBaseURI( xContext, xStorage, aBaseURL, aName ) );
uno::Reference<task::XInteractionHandler> xHandler =
mrDocShell.GetMedium()->GetInteractionHandler();
xDMA->loadMetadataFromStorage( xStorage, xBaseURI, xHandler );
}
catch ( const lang::WrappedTargetException & e)
{
ucb::InteractiveAugmentedIOException iaioe;
if ( e.TargetException >>= iaioe )
{
rError = SCERR_IMPORT_UNKNOWN;
}
else
{
rError = SCWARN_IMPORT_FEATURES_LOST;
}
}
catch ( const uno::Exception &)
{
rError = SCWARN_IMPORT_FEATURES_LOST;
}
}
// #i103539#: always read meta.xml for generator
ErrCode nMetaRetval(ERRCODE_NONE);
if (nMode & ImportFlags::Metadata)
{
uno::Sequence<uno::Any> aMetaArgs(1);
uno::Any* pMetaArgs = aMetaArgs.getArray();
pMetaArgs[0] <<= xInfoSet;
SAL_INFO( "sc.filter", "meta import start" );
nMetaRetval = ImportFromComponent(
xContext, xModel, xXMLParser, aParserInput,
bOasis ? OUString("com.sun.star.comp.Calc.XMLOasisMetaImporter")
: OUString("com.sun.star.comp.Calc.XMLMetaImporter"),
"meta.xml", "Meta.xml", aMetaArgs, false);
SAL_INFO( "sc.filter", "meta import end" );
}
rtl::Reference<SvXMLGraphicHelper> xGraphicHelper;
uno::Reference<document::XGraphicStorageHandler> xGraphicStorageHandler;
uno::Reference< document::XEmbeddedObjectResolver > xObjectResolver;
rtl::Reference<SvXMLEmbeddedObjectHelper> xObjectHelper;
if( xStorage.is() )
{
xGraphicHelper = SvXMLGraphicHelper::Create( xStorage, SvXMLGraphicHelperMode::Read );
xGraphicStorageHandler = xGraphicHelper.get();
xObjectHelper = SvXMLEmbeddedObjectHelper::Create(xStorage, mrDocShell, SvXMLEmbeddedObjectHelperMode::Read);
xObjectResolver = xObjectHelper.get();
}
uno::Sequence<uno::Any> aStylesArgs(4);
uno::Any* pStylesArgs = aStylesArgs.getArray();
pStylesArgs[0] <<= xInfoSet;
pStylesArgs[1] <<= xGraphicStorageHandler;
pStylesArgs[2] <<= xStatusIndicator;
pStylesArgs[3] <<= xObjectResolver;
ErrCode nSettingsRetval(ERRCODE_NONE);
if (nMode & ImportFlags::Settings)
{
// Settings must be loaded first because of the printer setting,
// which is needed in the page styles (paper tray).
uno::Sequence<uno::Any> aSettingsArgs(1);
uno::Any* pSettingsArgs = aSettingsArgs.getArray();
pSettingsArgs[0] <<= xInfoSet;
SAL_INFO( "sc.filter", "settings import start" );
nSettingsRetval = ImportFromComponent(
xContext, xModel, xXMLParser, aParserInput,
bOasis ? OUString("com.sun.star.comp.Calc.XMLOasisSettingsImporter")
: OUString("com.sun.star.comp.Calc.XMLSettingsImporter"),
"settings.xml", "", aSettingsArgs, false);
SAL_INFO( "sc.filter", "settings import end" );
}
ErrCode nStylesRetval(ERRCODE_NONE);
if (nMode & ImportFlags::Styles)
{
SAL_INFO( "sc.filter", "styles import start" );
nStylesRetval = ImportFromComponent(xContext, xModel, xXMLParser, aParserInput,
bOasis ? OUString("com.sun.star.comp.Calc.XMLOasisStylesImporter")
: OUString("com.sun.star.comp.Calc.XMLStylesImporter"),
"styles.xml",
"", aStylesArgs, true);
SAL_INFO( "sc.filter", "styles import end" );
}
ErrCode nDocRetval(ERRCODE_NONE);
if (nMode & ImportFlags::Content)
{
if (mrDocShell.GetCreateMode() == SfxObjectCreateMode::INTERNAL)
// We only need to import content for external link cache document.
xInfoSet->setPropertyValue(SC_UNO_ODS_IMPORT_STYLES, uno::makeAny(false));
uno::Sequence<uno::Any> aDocArgs(4);
uno::Any* pDocArgs = aDocArgs.getArray();
pDocArgs[0] <<= xInfoSet;
pDocArgs[1] <<= xGraphicStorageHandler;
pDocArgs[2] <<= xStatusIndicator;
pDocArgs[3] <<= xObjectResolver;
SAL_INFO( "sc.filter", "content import start" );
nDocRetval = ImportFromComponent(xContext, xModel, xXMLParser, aParserInput,
bOasis ? OUString("com.sun.star.comp.Calc.XMLOasisContentImporter")
: OUString("com.sun.star.comp.Calc.XMLContentImporter"),
"content.xml",
"Content.xml", aDocArgs,
true);
SAL_INFO( "sc.filter", "content import end" );
}
if( xGraphicHelper.is() )
xGraphicHelper->dispose();
xGraphicHelper.clear();
if( xObjectHelper.is() )
xObjectHelper->dispose();
xObjectHelper.clear();
if (xStatusIndicator.is())
xStatusIndicator->end();
bool bRet = false;
if (nDocRetval)
{
rError = nDocRetval;
if (nDocRetval == SCWARN_IMPORT_RANGE_OVERFLOW ||
nDocRetval == SCWARN_IMPORT_ROW_OVERFLOW ||
nDocRetval == SCWARN_IMPORT_COLUMN_OVERFLOW ||
nDocRetval == SCWARN_IMPORT_SHEET_OVERFLOW)
bRet = true;
}
else if (nStylesRetval)
rError = nStylesRetval;
else if (nMetaRetval)
rError = nMetaRetval;
else if (nSettingsRetval)
rError = nSettingsRetval;
else
bRet = true;
// set BuildId on XModel for later OLE object loading
if( xInfoSet.is() )
{
uno::Reference< beans::XPropertySet > xModelSet( xModel, uno::UNO_QUERY );
if( xModelSet.is() )
{
uno::Reference< beans::XPropertySetInfo > xModelSetInfo( xModelSet->getPropertySetInfo() );
OUString sBuildPropName("BuildId" );
if( xModelSetInfo.is() && xModelSetInfo->hasPropertyByName(sBuildPropName) )
{
xModelSet->setPropertyValue( sBuildPropName, xInfoSet->getPropertyValue(sBuildPropName) );
}
}
// Set Code Names
uno::Any aAny = xInfoSet->getPropertyValue("ScriptConfiguration");
uno::Reference <container::XNameAccess> xCodeNameAccess;
if( aAny >>= xCodeNameAccess )
XMLCodeNameProvider::set( xCodeNameAccess, &rDoc );
// VBA compatibility
bool bVBACompat = false;
if ( (xInfoSet->getPropertyValue("VBACompatibilityMode") >>= bVBACompat) && bVBACompat )
{
/* Set library container to VBA compatibility mode, this
forces loading the Basic project, which in turn creates the
VBA Globals object and does all related initialization. */
if ( xModelSet.is() ) try
{
uno::Reference< script::vba::XVBACompatibility > xVBACompat( xModelSet->getPropertyValue(
"BasicLibraries" ), uno::UNO_QUERY_THROW );
xVBACompat->setVBACompatibilityMode( true );
}
catch( const uno::Exception& )
{
}
}
}
// Don't test bStylesRetval and bMetaRetval, because it could be an older file which not contain such streams
return bRet;//!bStylesOnly ? bDocRetval : bStylesRetval;
}
static bool lcl_HasValidStream(const ScDocument& rDoc)
{
SfxObjectShell* pObjSh = rDoc.GetDocumentShell();
if ( pObjSh->IsDocShared() )
return false; // never copy stream from shared file
// don't read remote file again
// (could instead re-use medium directly in that case)
SfxMedium* pSrcMed = rDoc.GetDocumentShell()->GetMedium();
if ( !pSrcMed || pSrcMed->IsRemote() )
return false;
SCTAB nTabCount = rDoc.GetTableCount();
for (SCTAB nTab=0; nTab<nTabCount; ++nTab)
if (rDoc.IsStreamValid(nTab))
return true;
return false;
}
bool ScXMLImportWrapper::ExportToComponent(const uno::Reference<uno::XComponentContext>& xContext,
const uno::Reference<frame::XModel>& xModel, const uno::Reference<xml::sax::XWriter>& xWriter,
const uno::Sequence<beans::PropertyValue>& aDescriptor, const OUString& sName,
const OUString& sMediaType, const OUString& sComponentName,
const uno::Sequence<uno::Any>& aArgs, ScMySharedData*& pSharedData)
{
bool bRet(false);
uno::Reference<io::XOutputStream> xOut;
uno::Reference<io::XStream> xStream;
if ( !xStorage.is() && pMedium )
xStorage = pMedium->GetOutputStorage();
if( xStorage.is() )
{
// #96807#; trunc stream before use, because it could be an existing stream
// and the new content could be shorter than the old content. In this case
// would not all be over written by the new content and the xml file
// would not be valid.
xStream = xStorage->openStreamElement( sName, embed::ElementModes::READWRITE | embed::ElementModes::TRUNCATE );
uno::Reference < beans::XPropertySet > xSet( xStream, uno::UNO_QUERY );
if (xSet.is())
{
xSet->setPropertyValue("MediaType", uno::makeAny(sMediaType));
// advise storage impl to use common encryption
xSet->setPropertyValue( "UseCommonStoragePasswordEncryption", uno::makeAny(true) );
}
xOut = xStream->getOutputStream();
}
// set Base URL
uno::Reference< beans::XPropertySet > xInfoSet;
if( aArgs.getLength() > 0 )
aArgs.getConstArray()[0] >>= xInfoSet;
OSL_ENSURE( xInfoSet.is(), "missing property set" );
if( xInfoSet.is() )
{
xInfoSet->setPropertyValue( "StreamName", uno::makeAny( sName ) );
}
xWriter->setOutputStream( xOut );
uno::Reference<document::XFilter> xFilter(
xContext->getServiceManager()->createInstanceWithArgumentsAndContext(
sComponentName , aArgs, xContext ),
uno::UNO_QUERY );
OSL_ENSURE( xFilter.is(), "can't get exporter" );
uno::Reference<document::XExporter> xExporter( xFilter, uno::UNO_QUERY );
uno::Reference<lang::XComponent> xComponent( xModel, uno::UNO_QUERY );
if (xExporter.is())
xExporter->setSourceDocument( xComponent );
if ( xFilter.is() )
{
ScXMLExport* pExport = static_cast<ScXMLExport*>(SvXMLExport::getImplementation(xFilter));
pExport->SetSharedData(pSharedData);
// if there are sheets to copy, get the source stream
if ( sName == "content.xml" && lcl_HasValidStream(rDoc) && ( pExport->getExportFlags() & SvXMLExportFlags::OASIS ) )
{
// old stream is still in this file's storage - open read-only
// #i106854# use the document's storage directly, without a temporary SfxMedium
uno::Reference<embed::XStorage> xTmpStorage = rDoc.GetDocumentShell()->GetStorage();
uno::Reference<io::XStream> xSrcStream;
uno::Reference<io::XInputStream> xSrcInput;
// #i108978# If an embedded object is saved and no events are notified, don't use the stream
// because without the ...DONE events, stream positions aren't updated.
ScSheetSaveData* pSheetData = ScModelObj::getImplementation(xModel)->GetSheetSaveData();
if (pSheetData && pSheetData->IsInSupportedSave())
{
try
{
if (xTmpStorage.is())
xSrcStream = xTmpStorage->openStreamElement( sName, embed::ElementModes::READ );
if (xSrcStream.is())
xSrcInput = xSrcStream->getInputStream();
}
catch ( const uno::Exception&)
{
// stream not available (for example, password protected) - save normally (xSrcInput is null)
}
}
pExport->SetSourceStream( xSrcInput );
bRet = xFilter->filter( aDescriptor );
pExport->SetSourceStream( uno::Reference<io::XInputStream>() );
// If there was an error, reset all stream flags, so the next save attempt will use normal saving.
// #i110692# For embedded objects, the stream may be unavailable for one save operation (m_pAntiImpl)
// and become available again later. But after saving normally once, the stream positions aren't
// valid anymore, so the flags also have to be reset if the stream wasn't available.
if ( !bRet || !xSrcInput.is() )
{
SCTAB nTabCount = rDoc.GetTableCount();
for (SCTAB nTab=0; nTab<nTabCount; nTab++)
rDoc.SetStreamValid(nTab, false);
}
}
else
bRet = xFilter->filter( aDescriptor );
pSharedData = pExport->GetSharedData();
}
return bRet;
}
bool ScXMLImportWrapper::Export(bool bStylesOnly)
{
// Prevent all broadcasting and repaints and notification of accessibility
// during mass creation of captions, which is a major bottleneck and not
// needed during Save.
ScDrawLayer* pDrawLayer = rDoc.GetDrawLayer();
bool bOldLock = bool();
if (pDrawLayer)
{
bOldLock = pDrawLayer->isLocked();
pDrawLayer->setLock(true);
}
rDoc.CreateAllNoteCaptions();
if (pDrawLayer)
pDrawLayer->setLock(bOldLock);
uno::Reference<uno::XComponentContext> xContext(comphelper::getProcessComponentContext());
uno::Reference<xml::sax::XWriter> xWriter = xml::sax::Writer::create(xContext);
if ( !xStorage.is() && pMedium )
xStorage = pMedium->GetOutputStorage();
OUString sFileName;
OUString sTextMediaType("text/xml");
if (pMedium)
sFileName = pMedium->GetName();
SfxObjectShell* pObjSh = rDoc.GetDocumentShell();
uno::Sequence<beans::PropertyValue> aDescriptor( comphelper::InitPropertySequence({
{ "FileName", uno::Any(sFileName) }
}));
/** property map for export info set */
comphelper::PropertyMapEntry const aExportInfoMap[] =
{
{ OUString("ProgressRange"), 0, ::cppu::UnoType<sal_Int32>::get(), css::beans::PropertyAttribute::MAYBEVOID, 0},
{ OUString("ProgressMax"), 0, ::cppu::UnoType<sal_Int32>::get(), css::beans::PropertyAttribute::MAYBEVOID, 0},
{ OUString("ProgressCurrent"), 0, ::cppu::UnoType<sal_Int32>::get(), css::beans::PropertyAttribute::MAYBEVOID, 0},
{ OUString("WrittenNumberStyles"), 0, cppu::UnoType<uno::Sequence<sal_Int32>>::get(), css::beans::PropertyAttribute::MAYBEVOID, 0},
{ OUString("UsePrettyPrinting"), 0, ::cppu::UnoType<sal_Bool>::get(), css::beans::PropertyAttribute::MAYBEVOID, 0},
{ OUString("BaseURI"), 0, ::cppu::UnoType<OUString>::get(), css::beans::PropertyAttribute::MAYBEVOID, 0 },
{ OUString("StreamRelPath"), 0, ::cppu::UnoType<OUString>::get(), css::beans::PropertyAttribute::MAYBEVOID, 0 },
{ OUString("StreamName"), 0, ::cppu::UnoType<OUString>::get(), css::beans::PropertyAttribute::MAYBEVOID, 0 },
{ OUString("StyleNames"), 0, cppu::UnoType<uno::Sequence<OUString>>::get(), css::beans::PropertyAttribute::MAYBEVOID, 0 },
{ OUString("StyleFamilies"), 0, cppu::UnoType<uno::Sequence<sal_Int32>>::get(), css::beans::PropertyAttribute::MAYBEVOID, 0 },
{ OUString("TargetStorage"), 0, cppu::UnoType<embed::XStorage>::get(), css::beans::PropertyAttribute::MAYBEVOID, 0 },
{ OUString(), 0, css::uno::Type(), 0, 0 }
};
uno::Reference< beans::XPropertySet > xInfoSet( comphelper::GenericPropertySet_CreateInstance( new comphelper::PropertySetInfo( aExportInfoMap ) ) );
if ( pObjSh && xStorage.is() )
{
uno::Reference<frame::XModel> xModel(pObjSh->GetModel());
uno::Reference<task::XStatusIndicator> xStatusIndicator(GetStatusIndicator());
sal_Int32 nProgressRange(1000000);
if(xStatusIndicator.is())
xStatusIndicator->start(ScResId(STR_SAVE_DOC), nProgressRange);
xInfoSet->setPropertyValue("ProgressRange", uno::makeAny(nProgressRange));
SvtSaveOptions aSaveOpt;
bool bUsePrettyPrinting(aSaveOpt.IsPrettyPrinting());
xInfoSet->setPropertyValue("UsePrettyPrinting", uno::makeAny(bUsePrettyPrinting));
const OUString sTargetStorage("TargetStorage");
xInfoSet->setPropertyValue( sTargetStorage, uno::Any( xStorage ) );
OSL_ENSURE( pMedium, "There is no medium to get MediaDescriptor from!" );
OUString aBaseURL = pMedium ? pMedium->GetBaseURL( true ) : OUString();
OUString sPropName("BaseURI");
xInfoSet->setPropertyValue( sPropName, uno::makeAny( aBaseURL ) );
// TODO/LATER: do not do it for embedded links
if( SfxObjectCreateMode::EMBEDDED == pObjSh->GetCreateMode() )
{
OUString aName("dummyObjectName");
if ( pMedium && pMedium->GetItemSet() )
{
const SfxStringItem* pDocHierarchItem = static_cast<const SfxStringItem*>(
pMedium->GetItemSet()->GetItem(SID_DOC_HIERARCHICALNAME) );
if ( pDocHierarchItem )
aName = pDocHierarchItem->GetValue();
}
if( !aName.isEmpty() )
{
sPropName = "StreamRelPath";
xInfoSet->setPropertyValue( sPropName, uno::makeAny( aName ) );
}
}
bool bMetaRet(pObjSh->GetCreateMode() == SfxObjectCreateMode::EMBEDDED);
bool bStylesRet (false);
bool bDocRet(false);
bool bSettingsRet(false);
ScMySharedData* pSharedData = nullptr;
bool bOasis = ( SotStorage::GetVersion( xStorage ) > SOFFICE_FILEFORMAT_60 );
// RDF metadata: ODF >= 1.2
if ( !bStylesOnly && bOasis )
{
const uno::Reference< beans::XPropertySet > xPropSet( xStorage, uno::UNO_QUERY_THROW );
try
{
OUString aVersion;
if (( xPropSet->getPropertyValue("Version") >>= aVersion )
&& aVersion != ODFVER_010_TEXT
&& aVersion != ODFVER_011_TEXT )
{
const uno::Reference< rdf::XDocumentMetadataAccess > xDMA(
xModel, uno::UNO_QUERY_THROW );
xDMA->storeMetadataToStorage( xStorage );
}
}
catch ( const beans::UnknownPropertyException &)
{
}
catch ( const uno::Exception &)
{
}
}
// meta export
if (!bStylesOnly && !bMetaRet)
{
uno::Sequence<uno::Any> aMetaArgs(3);
uno::Any* pMetaArgs = aMetaArgs.getArray();
pMetaArgs[0] <<= xInfoSet;
pMetaArgs[1] <<= xWriter;
pMetaArgs[2] <<= xStatusIndicator;
SAL_INFO( "sc.filter", "meta export start" );
bMetaRet = ExportToComponent(xContext, xModel, xWriter, aDescriptor,
"meta.xml",
sTextMediaType,
bOasis ? OUString("com.sun.star.comp.Calc.XMLOasisMetaExporter")
: OUString("com.sun.star.comp.Calc.XMLMetaExporter"),
aMetaArgs, pSharedData);
SAL_INFO( "sc.filter", "meta export end" );
}
uno::Reference< document::XEmbeddedObjectResolver > xObjectResolver;
rtl::Reference<SvXMLEmbeddedObjectHelper> xObjectHelper;
uno::Reference<document::XGraphicStorageHandler> xGraphicStorageHandler;
rtl::Reference<SvXMLGraphicHelper> xGraphicHelper;
if( xStorage.is() )
{
xGraphicHelper = SvXMLGraphicHelper::Create( xStorage, SvXMLGraphicHelperMode::Write );
xGraphicStorageHandler = xGraphicHelper.get();
}
if( pObjSh )
{
xObjectHelper = SvXMLEmbeddedObjectHelper::Create( xStorage, *pObjSh, SvXMLEmbeddedObjectHelperMode::Write );
xObjectResolver = xObjectHelper.get();
}
// styles export
{
uno::Sequence<uno::Any> aStylesArgs(5);
uno::Any* pStylesArgs = aStylesArgs.getArray();
pStylesArgs[0] <<= xInfoSet;
pStylesArgs[1] <<= xGraphicStorageHandler;
pStylesArgs[2] <<= xStatusIndicator;
pStylesArgs[3] <<= xWriter;
pStylesArgs[4] <<= xObjectResolver;
SAL_INFO( "sc.filter", "styles export start" );
bStylesRet = ExportToComponent(xContext, xModel, xWriter, aDescriptor,
"styles.xml",
sTextMediaType,
bOasis ? OUString("com.sun.star.comp.Calc.XMLOasisStylesExporter")
: OUString("com.sun.star.comp.Calc.XMLStylesExporter"),
aStylesArgs, pSharedData);
SAL_INFO( "sc.filter", "styles export end" );
}
// content export
if (!bStylesOnly)
{
uno::Sequence<uno::Any> aDocArgs(5);
uno::Any* pDocArgs = aDocArgs.getArray();
pDocArgs[0] <<= xInfoSet;
pDocArgs[1] <<= xGraphicStorageHandler;
pDocArgs[2] <<= xStatusIndicator;
pDocArgs[3] <<= xWriter;
pDocArgs[4] <<= xObjectResolver;
SAL_INFO( "sc.filter", "content export start" );
bDocRet = ExportToComponent(xContext, xModel, xWriter, aDescriptor,
"content.xml",
sTextMediaType,
bOasis ? OUString("com.sun.star.comp.Calc.XMLOasisContentExporter")
: OUString("com.sun.star.comp.Calc.XMLContentExporter"),
aDocArgs, pSharedData);
SAL_INFO( "sc.filter", "content export end" );
}
if( xGraphicHelper )
xGraphicHelper->dispose();
xGraphicHelper.clear();
if( xObjectHelper )
xObjectHelper->dispose();
xObjectHelper.clear();
// settings export
if (!bStylesOnly)
{
uno::Sequence<uno::Any> aSettingsArgs(3);
uno::Any* pSettingsArgs = aSettingsArgs.getArray();
pSettingsArgs[0] <<= xInfoSet;
pSettingsArgs[1] <<= xWriter;
pSettingsArgs[2] <<= xStatusIndicator;
SAL_INFO( "sc.filter", "settings export start" );
bSettingsRet = ExportToComponent(xContext, xModel, xWriter, aDescriptor,
"settings.xml",
sTextMediaType,
bOasis ? OUString("com.sun.star.comp.Calc.XMLOasisSettingsExporter")
: OUString("com.sun.star.comp.Calc.XMLSettingsExporter"),
aSettingsArgs, pSharedData);
SAL_INFO( "sc.filter", "settings export end" );
}
delete pSharedData;
if (xStatusIndicator.is())
xStatusIndicator->end();
return bStylesRet && ((!bStylesOnly && bDocRet && bMetaRet && bSettingsRet) || bStylesOnly);
}
// later: give string descriptor as parameter for doc type
return false;
}
/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
↑ V547 Expression 'pObjSh' is always true.