horok/libreoffice
1
0
Fork 0
Code Activity
libreoffice/dbaccess/source/core/dataaccess/databasedocument.cxx
Daniel Baumann 8e63e14cf6
Adding upstream version 4:25.2.3. 
Signed-off-by: Daniel Baumann <daniel.baumann@progress-linux.org>
2025-06-22 16:20:04 +02:00

2212 lines
81 KiB
C++
Raw Permalink Blame History

/* -*- 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 <core_resource.hxx>
#include <strings.hrc>
#include "databasedocument.hxx"
#include "documenteventexecutor.hxx"
#include <databasecontext.hxx>
#include "documentcontainer.hxx"
#include "commandcontainer.hxx"
#include <sdbcoretools.hxx>
#include <strings.hxx>
#include <recovery/dbdocrecovery.hxx>
#include <officecfg/Office/Common.hxx>
#include <com/sun/star/beans/PropertyAttribute.hpp>
#include <com/sun/star/document/XExporter.hpp>
#include <com/sun/star/document/XFilter.hpp>
#include <com/sun/star/document/XImporter.hpp>
#include <com/sun/star/document/XGraphicStorageHandler.hpp>
#include <com/sun/star/document/GraphicStorageHandler.hpp>
#include <com/sun/star/frame/Desktop.hpp>
#include <com/sun/star/frame/ModuleManager.hpp>
#include <com/sun/star/io/IOException.hpp>
#include <com/sun/star/io/XSeekable.hpp>
#include <com/sun/star/io/XOutputStream.hpp>
#include <com/sun/star/io/XTruncate.hpp>
#include <com/sun/star/lang/NoSupportException.hpp>
#include <com/sun/star/lang/WrappedTargetRuntimeException.hpp>
#include <com/sun/star/script/provider/theMasterScriptProviderFactory.hpp>
#include <com/sun/star/sdb/DatabaseContext.hpp>
#include <com/sun/star/sdb/application/XDatabaseDocumentUI.hpp>
#include <com/sun/star/task/XStatusIndicator.hpp>
#include <com/sun/star/ucb/SimpleFileAccess.hpp>
#include <com/sun/star/ui/UIConfigurationManager.hpp>
#include <com/sun/star/util/CloseVetoException.hpp>
#include <com/sun/star/view/XSelectionSupplier.hpp>
#include <com/sun/star/xml/sax/XDocumentHandler.hpp>
#include <com/sun/star/xml/sax/Writer.hpp>
#include <com/sun/star/script/XStorageBasedLibraryContainer.hpp>
#include <com/sun/star/awt/XControl.hpp>
#include <com/sun/star/awt/DialogProvider.hpp>
#include <comphelper/documentconstants.hxx>
#include <comphelper/enumhelper.hxx>
#include <comphelper/genericpropertyset.hxx>
#include <comphelper/namedvaluecollection.hxx>
#include <comphelper/numberedcollection.hxx>
#include <comphelper/servicehelper.hxx>
#include <comphelper/storagehelper.hxx>
#include <comphelper/propertysetinfo.hxx>
#include <comphelper/types.hxx>
#include <connectivity/dbtools.hxx>
#include <cppuhelper/exc_hlp.hxx>
#include <cppuhelper/supportsservice.hxx>
#include <framework/titlehelper.hxx>
#include <unotools/saveopt.hxx>
#include <comphelper/diagnose_ex.hxx>
#include <osl/diagnose.h>
#include <vcl/GraphicObject.hxx>
#include <tools/urlobj.hxx>
using namespace ::com::sun::star::uno;
using namespace ::com::sun::star::beans;
using namespace ::com::sun::star::frame;
using namespace ::com::sun::star::lang;
using namespace ::com::sun::star::container;
using namespace ::com::sun::star::document;
using namespace ::com::sun::star::io;
using namespace ::com::sun::star::util;
using namespace ::com::sun::star::embed;
using namespace ::com::sun::star::task;
using namespace ::com::sun::star::view;
using namespace ::com::sun::star::sdb;
using namespace ::com::sun::star::sdbc;
using namespace ::com::sun::star;
using namespace ::com::sun::star::xml::sax;
using namespace ::com::sun::star::script;
using namespace ::com::sun::star::script::provider;
using namespace ::com::sun::star::ui;
using namespace ::cppu;
namespace dbaccess
{
// ViewMonitor
bool ViewMonitor::onControllerConnected( const Reference< XController >& _rxController )
{
bool bFirstControllerEver = !m_bEverHadController;
m_bEverHadController = true;
m_xLastConnectedController = _rxController;
m_bLastIsFirstEverController = bFirstControllerEver;
return bFirstControllerEver;
}
bool ViewMonitor::onSetCurrentController( const Reference< XController >& _rxController )
{
// we interpret this as "loading the document (including UI) is finished",
// if and only if this is the controller which was last connected, and it was the
// first controller ever connected
bool bLoadFinished = ( _rxController == m_xLastConnectedController ) && m_bLastIsFirstEverController;
// notify the respective events
if ( bLoadFinished )
m_rEventNotifier.notifyDocumentEventAsync( m_bIsNewDocument ? u"OnNew"_ustr : u"OnLoad"_ustr, nullptr, Any() );
return bLoadFinished;
}
ODatabaseDocument::ODatabaseDocument(const ::rtl::Reference<ODatabaseModelImpl>& _pImpl )
:ModelDependentComponent( _pImpl )
,ODatabaseDocument_OfficeDocument( getMutex() )
,m_aModifyListeners( getMutex() )
,m_aCloseListener( getMutex() )
,m_aStorageListeners( getMutex() )
,m_pEventContainer( new DocumentEvents( *this, getMutex(), _pImpl->getDocumentEvents() ) )
,m_aEventNotifier( *this, getMutex() )
,m_aViewMonitor( m_aEventNotifier )
,m_eInitState( NotInitialized )
,m_bClosing( false )
,m_bAllowDocumentScripting( false )
,m_bHasBeenRecovered( false )
,m_bEmbedded(false)
{
osl_atomic_increment( &m_refCount );
{
impl_reparent_nothrow( m_xForms );
impl_reparent_nothrow( m_xReports );
if (auto xTableDef = m_pImpl->m_xTableDefinitions.get())
xTableDef->setParent(*this);
impl_reparent_nothrow( m_pImpl->m_xCommandDefinitions );
m_pEventExecutor = new DocumentEventExecutor( m_pImpl->m_aContext, this );
}
osl_atomic_decrement( &m_refCount );
// if there previously was a document instance for the same Impl which was already initialized,
// then consider ourself initialized, too.
// #i94840#
if ( !m_pImpl->hadInitializedDocument() )
return;
// Note we set our init-state to "Initializing", not "Initialized". We're created from inside the ModelImpl,
// which is expected to call attachResource in case there was a previous incarnation of the document,
// so we can properly finish our initialization then.
impl_setInitializing();
if ( !m_pImpl->getURL().isEmpty() )
{
// if the previous incarnation of the DatabaseDocument already had a URL, then creating this incarnation
// here is effectively loading the document.
// #i105505#
m_aViewMonitor.onLoadedDocument();
}
}
ODatabaseDocument::~ODatabaseDocument()
{
if ( !ODatabaseDocument_OfficeDocument::rBHelper.bInDispose && !ODatabaseDocument_OfficeDocument::rBHelper.bDisposed )
{
acquire();
dispose();
}
}
Any SAL_CALL ODatabaseDocument::queryInterface( const Type& _rType )
{
// strip XEmbeddedScripts and XScriptInvocationContext if we have any form/report
// which already contains macros. In this case, the database document itself is not
// allowed to contain macros, too.
if ( !m_bAllowDocumentScripting
&& ( _rType.equals( cppu::UnoType<XEmbeddedScripts>::get() )
|| _rType.equals( cppu::UnoType<XScriptInvocationContext>::get() )
)
)
return Any();
return ODatabaseDocument_OfficeDocument::queryInterface(_rType);
}
Sequence< Type > SAL_CALL ODatabaseDocument::getTypes( )
{
Sequence< Type > aTypes = ODatabaseDocument_OfficeDocument::getTypes();
// strip XEmbeddedScripts and XScriptInvocationContext if we have any form/report
// which already contains macros. In this case, the database document itself is not
// allowed to contain macros, too.
if ( !m_bAllowDocumentScripting )
{
auto [begin, end] = asNonConstRange(aTypes);
auto newEnd = std::remove_if( begin, end,
[](const Type& t)
{ return t == cppu::UnoType<XEmbeddedScripts>::get() ||
t == cppu::UnoType<XScriptInvocationContext>::get();} );
aTypes.realloc( std::distance(begin, newEnd) );
}
return aTypes;
}
Sequence< sal_Int8 > SAL_CALL ODatabaseDocument::getImplementationId( )
{
return css::uno::Sequence<sal_Int8>();
}
// local functions
namespace
{
Reference< XStatusIndicator > lcl_extractStatusIndicator( const ::comphelper::NamedValueCollection& _rArguments )
{
Reference< XStatusIndicator > xStatusIndicator;
return _rArguments.getOrDefault( u"StatusIndicator"_ustr, xStatusIndicator );
}
void lcl_triggerStatusIndicator_throw( const ::comphelper::NamedValueCollection& _rArguments, DocumentGuard& _rGuard, const bool _bStart )
{
Reference< XStatusIndicator > xStatusIndicator( lcl_extractStatusIndicator( _rArguments ) );
if ( !xStatusIndicator.is() )
return;
_rGuard.clear();
try
{
if ( _bStart )
xStatusIndicator->start( OUString(), sal_Int32(1000000) );
else
xStatusIndicator->end();
}
catch( const Exception& )
{
DBG_UNHANDLED_EXCEPTION("dbaccess");
}
_rGuard.reset();
// note that |reset| can throw a DisposedException
}
void lcl_extractStatusIndicator( const ::comphelper::NamedValueCollection& _rArguments, Sequence< Any >& _rCallArgs )
{
Reference< XStatusIndicator > xStatusIndicator( lcl_extractStatusIndicator( _rArguments ) );
if ( !xStatusIndicator.is() )
return;
sal_Int32 nLength = _rCallArgs.getLength();
_rCallArgs.realloc( nLength + 1 );
_rCallArgs.getArray()[ nLength ] <<= xStatusIndicator;
}
void lcl_extractAndStartStatusIndicator( const ::comphelper::NamedValueCollection& _rArguments, Reference< XStatusIndicator >& _rxStatusIndicator,
Sequence< Any >& _rCallArgs )
{
_rxStatusIndicator = lcl_extractStatusIndicator( _rArguments );
if ( !_rxStatusIndicator.is() )
return;
try
{
_rxStatusIndicator->start( OUString(), sal_Int32(1000000) );
sal_Int32 nLength = _rCallArgs.getLength();
_rCallArgs.realloc( nLength + 1 );
_rCallArgs.getArray()[ nLength ] <<= _rxStatusIndicator;
}
catch( const Exception& )
{
DBG_UNHANDLED_EXCEPTION("dbaccess");
}
}
Sequence< PropertyValue > lcl_appendFileNameToDescriptor( const ::comphelper::NamedValueCollection& _rDescriptor, const OUString& _rURL )
{
if ( _rURL.isEmpty() )
return _rDescriptor.getPropertyValues();
::comphelper::NamedValueCollection aMutableDescriptor( _rDescriptor );
aMutableDescriptor.put( u"FileName"_ustr, _rURL );
aMutableDescriptor.put( u"URL"_ustr, _rURL );
return aMutableDescriptor.getPropertyValues();
}
}
constexpr OUString sPictures = u"Pictures"_ustr;
// base documents seem to have a different behaviour to other documents, the
// root storage contents at least seem to be re-used over different saves, thus if there is a
// top level Picture directory it is never cleared.
// If we delete the 'Pictures' directory then the dialog library storage which does store
// any embed images will not work properly. ( this is due to the fact it will
// try to load the dialog which will try and access the embed images, if those images are not cached in
// memory it will try to read them from the Picture directory which is now gone, so... we have to use this
// inglorious hack below which basically will
//
// a) create a temp storage
//
// b) introspect any dialogs for any embed graphics and grab the associate URL(s)
//
// c) populate the temp storage with the associated embed images ( will be stored in a 'Pictures' folder )
//
// d) delete the 'Picture' element from the root storage
//
// e) copy the Pictures element of the temp storage to the root storage
//
// this assumes that we don't use the Pictures folder in the root of the base
// document for anything, I believe this is a valid assumption ( as much as
// I could check anyway )
/// @throws RuntimeException
static void lcl_uglyHackToStoreDialogeEmbedImages( const Reference< XStorageBasedLibraryContainer >& xDlgCont, const Reference< XStorage >& xStorage, const Reference< XModel >& rxModel, const Reference<XComponentContext >& rxContext )
{
const Sequence< OUString > sLibraries = xDlgCont->getElementNames();
Reference< XStorage > xTmpPic = xStorage->openStorageElement( u"tempPictures"_ustr, ElementModes::READWRITE );
std::vector<uno::Reference<graphic::XGraphic>> vxGraphicList;
for ( OUString const & sLibrary : sLibraries )
{
xDlgCont->loadLibrary( sLibrary );
Reference< XNameContainer > xLib;
xDlgCont->getByName( sLibrary ) >>= xLib;
if ( xLib.is() )
{
Sequence< OUString > sDialogs = xLib->getElementNames();
sal_Int32 nDialogs( sDialogs.getLength() );
for ( sal_Int32 j=0; j < nDialogs; ++j )
{
Reference < awt::XDialogProvider > xDlgPrv = awt::DialogProvider::createWithModel(rxContext, rxModel);
OUString sDialogUrl =
"vnd.sun.star.script:" + sLibrary + "." + sDialogs[j] + "?location=document";
Reference< css::awt::XControl > xDialog( xDlgPrv->createDialog( sDialogUrl ), UNO_QUERY );
Reference< XInterface > xModel( xDialog->getModel() );
vcl::graphic::SearchForGraphics(xModel, vxGraphicList);
}
}
}
// if we have any image urls, make sure we copy the associated images into tempPictures
if (!vxGraphicList.empty())
{
// Export the images to the storage
uno::Reference<document::XGraphicStorageHandler> xGraphicStorageHandler;
xGraphicStorageHandler.set(GraphicStorageHandler::createWithStorage(rxContext, xTmpPic));
if (xGraphicStorageHandler.is())
{
for (uno::Reference<graphic::XGraphic> const & rxGraphic : vxGraphicList)
{
xGraphicStorageHandler->saveGraphic(rxGraphic);
}
}
// delete old 'Pictures' storage and copy the contents of tempPictures into xStorage
xStorage->removeElement( sPictures );
xTmpPic->copyElementTo( sPictures, xStorage, sPictures );
}
else
{
// clean up an existing Pictures dir
if ( xStorage->isStorageElement( sPictures ) )
xStorage->removeElement( sPictures );
}
}
void ODatabaseDocument::impl_setInitialized()
{
m_eInitState = Initialized;
// start event notifications
m_aEventNotifier.onDocumentInitialized();
}
void ODatabaseDocument::impl_reset_nothrow()
{
try
{
m_pImpl->clearConnections();
m_pImpl->disposeStorages();
m_pImpl->resetRootStorage();
clearObjectContainer( m_xForms );
clearObjectContainer( m_xReports );
clearObjectContainer( m_pImpl->m_xTableDefinitions );
clearObjectContainer( m_pImpl->m_xCommandDefinitions );
m_eInitState = NotInitialized;
m_pImpl->reset();
}
catch(const Exception&)
{
DBG_UNHANDLED_EXCEPTION("dbaccess");
}
m_pImpl->m_bDocumentReadOnly = false;
}
namespace
{
/** property map for import/export info set */
comphelper::PropertyMapEntry const aExportInfoMap[] =
{
{ u"BaseURI"_ustr, 0, ::cppu::UnoType<OUString>::get(), beans::PropertyAttribute::MAYBEVOID, 0 },
{ u"StreamName"_ustr, 0, ::cppu::UnoType<OUString>::get(), beans::PropertyAttribute::MAYBEVOID, 0 },
{ u"UsePrettyPrinting"_ustr, 0, ::cppu::UnoType<sal_Bool>::get(), beans::PropertyAttribute::MAYBEVOID, 0},
{ u"TargetStorage"_ustr, 0, cppu::UnoType<embed::XStorage>::get(), beans::PropertyAttribute::MAYBEVOID, 0},
{ u"StreamRelPath"_ustr, 0, cppu::UnoType<OUString>::get(), beans::PropertyAttribute::MAYBEVOID, 0},
};
}
void ODatabaseDocument::impl_import_nolck_throw( const Reference< XComponentContext >& _rContext, const Reference< XInterface >& _rxTargetComponent,
const ::comphelper::NamedValueCollection& _rResource )
{
Sequence< Any > aFilterCreationArgs;
Reference< XStatusIndicator > xStatusIndicator;
lcl_extractAndStartStatusIndicator( _rResource, xStatusIndicator, aFilterCreationArgs );
uno::Reference< beans::XPropertySet > xInfoSet( comphelper::GenericPropertySet_CreateInstance( new comphelper::PropertySetInfo( aExportInfoMap ) ) );
OUString sBaseURI = _rResource.getOrDefault(u"BaseURI"_ustr, OUString());
if (sBaseURI.isEmpty())
sBaseURI = _rResource.getOrDefault(u"URL"_ustr,OUString());
assert(!sBaseURI.isEmpty()); // needed for relative URLs
xInfoSet->setPropertyValue(u"BaseURI"_ustr, uno::Any(sBaseURI));
xInfoSet->setPropertyValue(u"StreamName"_ustr, uno::Any(u"content.xml"_ustr));
const sal_Int32 nCount = aFilterCreationArgs.getLength();
aFilterCreationArgs.realloc(nCount + 1);
aFilterCreationArgs.getArray()[nCount] <<= xInfoSet;
Reference< XImporter > xImporter(
_rContext->getServiceManager()->createInstanceWithArgumentsAndContext(u"com.sun.star.comp.sdb.DBFilter"_ustr, aFilterCreationArgs, _rContext),
UNO_QUERY_THROW );
Reference< XComponent > xComponent( _rxTargetComponent, UNO_QUERY_THROW );
xImporter->setTargetDocument( xComponent );
Reference< XFilter > xFilter( xImporter, UNO_QUERY_THROW );
Sequence< PropertyValue > aFilterArgs( ODatabaseModelImpl::stripLoadArguments( _rResource ).getPropertyValues() );
xFilter->filter( aFilterArgs );
if ( xStatusIndicator.is() )
xStatusIndicator->end();
}
void SAL_CALL ODatabaseDocument::initNew( )
{
// SYNCHRONIZED ->
DocumentGuard aGuard( *this, DocumentGuard::InitMethod );
impl_reset_nothrow();
impl_setInitializing();
// create a temporary storage
Reference< XStorage > xTempStor( ::comphelper::OStorageHelper::GetTemporaryStorage( m_pImpl->m_aContext ) );
// store therein
impl_storeToStorage_throw( xTempStor, Sequence< PropertyValue >(), aGuard );
// let the impl know we're now based on this storage
m_pImpl->switchToStorage( xTempStor );
// for the newly created document, allow document-wide scripting
m_bAllowDocumentScripting = true;
impl_setInitialized();
m_aEventNotifier.notifyDocumentEventAsync( u"OnTitleChanged"_ustr, nullptr, Any() );
impl_setModified_nothrow( false, aGuard );
// <- SYNCHRONIZED
m_aEventNotifier.notifyDocumentEvent( u"OnCreate"_ustr, nullptr, Any() );
impl_notifyStorageChange_nolck_nothrow( xTempStor );
}
void SAL_CALL ODatabaseDocument::load( const Sequence< PropertyValue >& Arguments )
{
// SYNCHRONIZED ->
DocumentGuard aGuard( *this, DocumentGuard::InitMethod );
impl_reset_nothrow();
::comphelper::NamedValueCollection aResource( Arguments );
if ( aResource.has( u"FileName"_ustr ) && !aResource.has( u"URL"_ustr ) )
// FileName is the compatibility name for URL, so we might have clients passing
// a FileName only. However, some of our code works with the URL only, so ensure
// we have one.
aResource.put( u"URL"_ustr, aResource.get( u"FileName"_ustr ) );
if ( aResource.has( u"URL"_ustr ) && !aResource.has( u"FileName"_ustr ) )
// similar ... just in case there is legacy code which expects a FileName only
aResource.put( u"FileName"_ustr, aResource.get( u"URL"_ustr ) );
// now that somebody (perhaps) told us a macro execution mode, remember it as
// ImposedMacroExecMode
m_pImpl->setImposedMacroExecMode(
aResource.getOrDefault( u"MacroExecutionMode"_ustr, m_pImpl->getImposedMacroExecMode() ) );
impl_setInitializing();
try
{
aGuard.clear();
impl_import_nolck_throw( m_pImpl->m_aContext, *this, aResource );
aGuard.reset();
}
catch( const Exception& )
{
impl_reset_nothrow();
throw;
}
// tell our view monitor that the document has been loaded - this way it will fire the proper
// event (OnLoad instead of OnCreate) later on
m_aViewMonitor.onLoadedDocument();
// note that we do *not* call impl_setInitialized() here: The initialization is only complete
// when the XModel::attachResource has been called, not sooner.
// however, in case of embedding, XModel::attachResource is already called.
if (m_bEmbedded)
impl_setInitialized();
impl_setModified_nothrow( false, aGuard );
// <- SYNCHRONIZED
}
namespace
{
bool lcl_hasAnyModifiedSubComponent_throw( const Reference< XController >& i_rController )
{
Reference< css::sdb::application::XDatabaseDocumentUI > xDatabaseUI( i_rController, UNO_QUERY_THROW );
const Sequence< Reference< XComponent > > aComponents( xDatabaseUI->getSubComponents() );
bool isAnyModified = false;
for ( auto const & xComponent : aComponents )
{
Reference< XModifiable > xModify( xComponent, UNO_QUERY );
if ( xModify.is() )
{
isAnyModified = xModify->isModified();
continue;
}
// TODO: clarify: anything else to care for? Both the sub components with and without model
// should support the XModifiable interface, so I think nothing more is needed here.
OSL_FAIL( "lcl_hasAnyModifiedSubComponent_throw: anything left to do here?" );
}
return isAnyModified;
}
}
sal_Bool SAL_CALL ODatabaseDocument::wasModifiedSinceLastSave()
{
DocumentGuard aGuard(*this, DocumentGuard::DefaultMethod);
// The implementation here is somewhat sloppy, in that it returns whether *any* part of the whole
// database document, including opened sub components, is modified. This is more than what is requested:
// We need to return <TRUE/> if the doc itself, or any of the opened sub components, has been modified
// since the last call to any of the save* methods, or since the document has been loaded/created.
// However, the API definition explicitly allows to be that sloppy ...
if ( isModified() )
return true;
// auto recovery is an "UI feature", it is to restore the UI the user knows. Thus,
// we ask our connected controllers, not simply our existing form/report definitions.
// (There is some information which even cannot be obtained without asking the controller.
// For instance, newly created, but not yet saved, forms/reports are accessible via the
// controller only, but not via the model.)
try
{
for (auto const& controller : m_aControllers)
{
if ( lcl_hasAnyModifiedSubComponent_throw(controller) )
return true;
}
}
catch( const Exception& )
{
DBG_UNHANDLED_EXCEPTION("dbaccess");
}
return false;
}
void SAL_CALL ODatabaseDocument::storeToRecoveryFile( const OUString& i_TargetLocation, const Sequence< PropertyValue >& i_MediaDescriptor )
{
DocumentGuard aGuard(*this, DocumentGuard::DefaultMethod);
ModifyLock aLock( *this );
try
{
// create a storage for the target location
Reference< XStorage > xTargetStorage( impl_createStorageFor_throw( i_TargetLocation ) );
// first store the document as a whole into this storage
impl_storeToStorage_throw( xTargetStorage, i_MediaDescriptor, aGuard );
// save the sub components which need saving
DatabaseDocumentRecovery aDocRecovery( m_pImpl->m_aContext);
aDocRecovery.saveModifiedSubComponents( xTargetStorage, m_aControllers );
// commit the root storage
tools::stor::commitStorageIfWriteable( xTargetStorage );
}
catch( const IOException& )
{
throw;
}
catch( const RuntimeException& )
{
throw;
}
catch( const WrappedTargetException& )
{
throw;
}
catch( const Exception& )
{
Any aError = ::cppu::getCaughtException();
throw WrappedTargetException( OUString(), *this, aError );
}
}
void SAL_CALL ODatabaseDocument::recoverFromFile( const OUString& i_SourceLocation, const OUString& i_SalvagedFile, const Sequence< PropertyValue >& i_MediaDescriptor )
{
try
{
DocumentGuard aGuard( *this, DocumentGuard::InitMethod );
if ( i_SourceLocation.isEmpty() )
throw IllegalArgumentException( OUString(), *this, 1 );
// load the document itself, by simply delegating to our "load" method
// our load implementation expects the SalvagedFile and URL to be in the media descriptor
::comphelper::NamedValueCollection aMediaDescriptor( i_MediaDescriptor );
aMediaDescriptor.put( u"SalvagedFile"_ustr, i_SalvagedFile );
aMediaDescriptor.put( u"URL"_ustr, i_SourceLocation );
aGuard.clear(); // (load has an own guarding scheme)
load( aMediaDescriptor.getPropertyValues() );
aGuard.reset();
// Without a controller, we are unable to recover the sub components, as they're always tied to a controller.
// So, everything else is done when the first controller is connected.
m_bHasBeenRecovered = true;
// tell the impl that we've been loaded from the given location
m_pImpl->setDocFileLocation( i_SourceLocation );
// by definition (of XDocumentRecovery), we're responsible for delivering a fully-initialized document,
// which includes an attachResource call.
const OUString sLogicalDocumentURL( i_SalvagedFile.isEmpty() ? i_SourceLocation : i_SalvagedFile );
impl_attachResource( sLogicalDocumentURL, aMediaDescriptor.getPropertyValues(), aGuard );
// <- SYNCHRONIZED
}
catch( const IOException& )
{
throw;
}
catch( const RuntimeException& )
{
throw;
}
catch( const WrappedTargetException& )
{
throw;
}
catch( const Exception& )
{
Any aError = ::cppu::getCaughtException();
throw WrappedTargetException( OUString(), *this, aError );
}
}
// XModel
sal_Bool SAL_CALL ODatabaseDocument::attachResource( const OUString& _rURL, const Sequence< PropertyValue >& _rArguments )
{
if (_rURL.isEmpty() && _rArguments.getLength() == 1 && _rArguments[0].Name == "SetEmbedded")
{
m_bEmbedded = true;
return true;
}
DocumentGuard aGuard( *this, DocumentGuard::MethodUsedDuringInit );
bool bRet = false;
try
{
bRet = impl_attachResource( _rURL, _rArguments, aGuard );
}
catch( const RuntimeException& )
{
throw;
}
catch( const Exception& )
{
Any aError = ::cppu::getCaughtException();
throw WrappedTargetRuntimeException( OUString(), *this, aError );
}
return bRet;
}
bool ODatabaseDocument::impl_attachResource( const OUString& i_rLogicalDocumentURL,
const Sequence< PropertyValue >& i_rMediaDescriptor, DocumentGuard& _rDocGuard )
{
if (i_rLogicalDocumentURL == getURL())
{
::comphelper::NamedValueCollection aArgs(i_rMediaDescriptor);
// this misuse of attachresource is a hack of the Basic importer code
// repurposing existing interfaces for uses it probably wasn't intended
// for
// we do not support macro signatures, so we can ignore that request
aArgs.remove(u"BreakMacroSignature"_ustr);
bool bMacroEventRead = false;
if ((aArgs.get( u"MacroEventRead"_ustr ) >>= bMacroEventRead) && bMacroEventRead)
m_pImpl->m_bMacroCallsSeenWhileLoading = true;
aArgs.remove( u"MacroEventRead"_ustr );
if (aArgs.empty())
return false;
}
// if no URL has been provided, the caller was lazy enough to not call our getURL - which is not allowed anymore,
// now since getURL and getLocation both return the same, so calling one of those should be simple.
OUString sDocumentURL( i_rLogicalDocumentURL );
OSL_ENSURE( !sDocumentURL.isEmpty(), "ODatabaseDocument::impl_attachResource: invalid URL!" );
if ( sDocumentURL.isEmpty() )
sDocumentURL = getURL();
m_pImpl->setResource( sDocumentURL, i_rMediaDescriptor );
if ( impl_isInitializing() )
{ // this means we've just been loaded, and this is the attachResource call which follows
// the load call.
impl_setInitialized();
// determine whether the document as a whole, or sub documents, have macros. Especially the latter
// controls the availability of our XEmbeddedScripts and XScriptInvocationContext interfaces, and we
// should know this before anybody actually uses the object.
m_bAllowDocumentScripting = ( m_pImpl->determineEmbeddedMacros() != ODatabaseModelImpl::EmbeddedMacros::SubDocument );
_rDocGuard.clear();
// <- SYNCHRONIZED
m_aEventNotifier.notifyDocumentEvent( u"OnLoadFinished"_ustr, nullptr, Any() );
}
return true;
}
OUString SAL_CALL ODatabaseDocument::getURL( )
{
DocumentGuard aGuard( *this, DocumentGuard::MethodWithoutInit );
return m_pImpl->getURL();
}
Sequence< PropertyValue > SAL_CALL ODatabaseDocument::getArgs( )
{
DocumentGuard aGuard( *this, DocumentGuard::MethodWithoutInit );
return m_pImpl->getMediaDescriptor().getPropertyValues();
}
Sequence< PropertyValue > SAL_CALL ODatabaseDocument::getArgs2( const ::css::uno::Sequence< ::rtl::OUString >& requestedArgs )
{
DocumentGuard aGuard( *this, DocumentGuard::MethodWithoutInit );
std::vector<PropertyValue> aRet;
for (const auto & rArgName : requestedArgs)
aRet.push_back(PropertyValue(rArgName, 0, m_pImpl->getMediaDescriptor().get(rArgName), PropertyState_DIRECT_VALUE));
return comphelper::containerToSequence(aRet);
}
void SAL_CALL ODatabaseDocument::setArgs(const Sequence<beans::PropertyValue>& /* aArgs */)
{
throw NoSupportException();
}
void SAL_CALL ODatabaseDocument::connectController( const Reference< XController >& _xController )
{
DocumentGuard aGuard(*this, DocumentGuard::DefaultMethod);
#if OSL_DEBUG_LEVEL > 0
for (auto const& controller : m_aControllers)
{
OSL_ENSURE( controller != _xController, "ODatabaseDocument::connectController: this controller is already connected!" );
}
#endif
m_aControllers.push_back( _xController );
m_aEventNotifier.notifyDocumentEventAsync( u"OnViewCreated"_ustr, Reference< XController2 >( _xController, UNO_QUERY ), Any() );
bool bFirstControllerEver = m_aViewMonitor.onControllerConnected( _xController );
if ( !bFirstControllerEver )
return;
// check/adjust our macro mode.
m_pImpl->checkMacrosOnLoading();
}
void SAL_CALL ODatabaseDocument::disconnectController( const Reference< XController >& _xController )
{
bool bNotifyViewClosed = false;
bool bLastControllerGone = false;
bool bIsClosing = false;
// SYNCHRONIZED ->
{
DocumentGuard aGuard(*this, DocumentGuard::DefaultMethod);
Controllers::iterator pos = std::find( m_aControllers.begin(), m_aControllers.end(), _xController );
OSL_ENSURE( pos != m_aControllers.end(), "ODatabaseDocument::disconnectController: don't know this controller!" );
if ( pos != m_aControllers.end() )
{
m_aControllers.erase( pos );
bNotifyViewClosed = true;
}
if ( m_xCurrentController == _xController )
m_xCurrentController = nullptr;
bLastControllerGone = m_aControllers.empty();
bIsClosing = m_bClosing;
}
// <- SYNCHRONIZED
if ( bNotifyViewClosed )
m_aEventNotifier.notifyDocumentEvent( u"OnViewClosed"_ustr, Reference< XController2 >( _xController, UNO_QUERY ), Any() );
if ( !bLastControllerGone || bIsClosing )
return;
// if this was the last view, close the document as a whole
// #i51157#
try
{
close( true );
}
catch( const CloseVetoException& )
{
// okay, somebody vetoed and took ownership
}
}
void SAL_CALL ODatabaseDocument::lockControllers( )
{
DocumentGuard aGuard(*this, DocumentGuard::DefaultMethod);
++m_pImpl->m_nControllerLockCount;
}
void SAL_CALL ODatabaseDocument::unlockControllers( )
{
DocumentGuard aGuard(*this, DocumentGuard::DefaultMethod);
--m_pImpl->m_nControllerLockCount;
}
sal_Bool SAL_CALL ODatabaseDocument::hasControllersLocked( )
{
DocumentGuard aGuard(*this, DocumentGuard::DefaultMethod);
return m_pImpl->m_nControllerLockCount != 0;
}
Reference< XController > SAL_CALL ODatabaseDocument::getCurrentController()
{
DocumentGuard aGuard(*this, DocumentGuard::DefaultMethod);
return m_xCurrentController.is() ? m_xCurrentController : ( m_aControllers.empty() ? Reference< XController >() : *m_aControllers.begin() );
}
void SAL_CALL ODatabaseDocument::setCurrentController( const Reference< XController >& _xController )
{
DocumentGuard aGuard(*this, DocumentGuard::DefaultMethod);
m_xCurrentController = _xController;
if ( !m_aViewMonitor.onSetCurrentController( _xController ) )
return;
// check if there are sub components to recover from our document storage
bool bAttemptRecovery = m_bHasBeenRecovered;
if ( !bAttemptRecovery && m_pImpl->getMediaDescriptor().has( u"ForceRecovery"_ustr ) )
// do not use getOrDefault, it will throw for invalid types, which is not desired here
m_pImpl->getMediaDescriptor().get( u"ForceRecovery"_ustr ) >>= bAttemptRecovery;
if ( !bAttemptRecovery )
return;
try
{
DatabaseDocumentRecovery aDocRecovery( m_pImpl->m_aContext );
aDocRecovery.recoverSubDocuments( m_pImpl->getRootStorage(), _xController );
}
catch( const Exception& )
{
DBG_UNHANDLED_EXCEPTION("dbaccess");
}
}
Reference< XInterface > SAL_CALL ODatabaseDocument::getCurrentSelection( )
{
DocumentGuard aGuard(*this, DocumentGuard::DefaultMethod);
Reference< XInterface > xRet;
Reference< XSelectionSupplier > xDocView( getCurrentController(), UNO_QUERY );
if ( xDocView.is() )
xRet.set(xDocView->getSelection(),UNO_QUERY);
return xRet;
}
// XStorable
sal_Bool SAL_CALL ODatabaseDocument::hasLocation( )
{
return !getLocation().isEmpty();
}
OUString SAL_CALL ODatabaseDocument::getLocation( )
{
DocumentGuard aGuard( *this, DocumentGuard::MethodWithoutInit );
return m_pImpl->getURL();
// both XStorable::getLocation and XModel::getURL have to return the URL of the document, *not*
// the location of the file which the document was possibly recovered from (which would be getDocFileLocation)
}
sal_Bool SAL_CALL ODatabaseDocument::isReadonly( )
{
DocumentGuard aGuard( *this, DocumentGuard::MethodWithoutInit );
return m_pImpl->m_bDocumentReadOnly;
}
void SAL_CALL ODatabaseDocument::store( )
{
DocumentGuard aGuard(*this, DocumentGuard::DefaultMethod);
OUString sDocumentURL( m_pImpl->getURL() );
if ( !sDocumentURL.isEmpty() )
{
if ( m_pImpl->getDocFileLocation() == m_pImpl->getURL() )
if ( m_pImpl->m_bDocumentReadOnly )
throw IOException();
impl_storeAs_throw( m_pImpl->getURL(), m_pImpl->getMediaDescriptor(), SAVE, aGuard );
return;
}
// if we have no URL, but did survive the DocumentGuard above, then we've been inited via XLoadable::initNew,
// i.e. we're based on a temporary storage
OSL_ENSURE( m_pImpl->getDocFileLocation().isEmpty(), "ODatabaseDocument::store: unexpected URL inconsistency!" );
try
{
impl_storeToStorage_throw( m_pImpl->getRootStorage(), m_pImpl->getMediaDescriptor().getPropertyValues(), aGuard );
}
catch( const Exception& )
{
Any aError = ::cppu::getCaughtException();
if ( aError.isExtractableTo( ::cppu::UnoType< IOException >::get() )
|| aError.isExtractableTo( ::cppu::UnoType< RuntimeException >::get() )
)
{
// allowed to leave
throw;
}
impl_throwIOExceptionCausedBySave_throw( aError, {} );
}
}
void ODatabaseDocument::impl_throwIOExceptionCausedBySave_throw( const Any& i_rError, std::u16string_view i_rTargetURL ) const
{
OUString sErrorMessage = extractExceptionMessage( m_pImpl->m_aContext, i_rError );
sErrorMessage = ResourceManager::loadString(
RID_STR_ERROR_WHILE_SAVING,
u"$location$", i_rTargetURL,
u"$message$", sErrorMessage
);
throw IOException( sErrorMessage, *const_cast< ODatabaseDocument* >( this ) );
}
void ODatabaseDocument::impl_storeAs_throw( const OUString& _rURL, const ::comphelper::NamedValueCollection& _rArguments,
const StoreType _eType, DocumentGuard& _rGuard )
{
OSL_PRECOND( ( _eType == SAVE ) || ( _eType == SAVE_AS ),
"ODatabaseDocument::impl_storeAs_throw: you introduced a new type which cannot be handled here!" );
// if we're in the process of initializing the document (which effectively means it is an implicit
// initialization triggered in storeAsURL), the we do not notify events, since to an observer, the SaveAs
// should not be noticeable
bool bIsInitializationProcess = impl_isInitializing();
if ( !bIsInitializationProcess )
{
_rGuard.clear();
m_aEventNotifier.notifyDocumentEvent( _eType == SAVE ? u"OnSave"_ustr : u"OnSaveAs"_ustr, nullptr, Any( _rURL ) );
_rGuard.reset();
}
Reference< XStorage > xNewRootStorage;
// will be non-NULL if our storage changed
try
{
ModifyLock aLock( *this );
// ignore all changes of our "modified" state during storing
bool bLocationChanged = ( _rURL != m_pImpl->getDocFileLocation() );
if ( bLocationChanged )
{
// create storage for target URL
uno::Reference<embed::XStorage> xTargetStorage(
impl_GetStorageOrCreateFor_throw(_rArguments, _rURL));
if ( m_pImpl->isEmbeddedDatabase() )
m_pImpl->clearConnections();
// commit everything
m_pImpl->commitEmbeddedStorage();
m_pImpl->commitStorages();
// copy own storage to target storage
Reference< XStorage > xCurrentStorage( m_pImpl->getRootStorage() );
if ( xCurrentStorage.is() )
xCurrentStorage->copyToStorage( xTargetStorage );
m_pImpl->disposeStorages();
// each and every document definition obtained via m_xForms and m_xReports depends
// on the sub storages which we just disposed. So, dispose the forms/reports collections, too.
// This ensures that they're re-created when needed.
clearObjectContainer( m_xForms );
clearObjectContainer( m_xReports );
xNewRootStorage = m_pImpl->switchToStorage( xTargetStorage );
m_pImpl->m_bDocumentReadOnly = false;
}
// store to current storage
Reference< XStorage > xCurrentStorage( m_pImpl->getOrCreateRootStorage(), UNO_SET_THROW );
Sequence< PropertyValue > aMediaDescriptor( lcl_appendFileNameToDescriptor( _rArguments, _rURL ) );
impl_storeToStorage_throw( xCurrentStorage, aMediaDescriptor, _rGuard );
// success - tell our impl
m_pImpl->setDocFileLocation( _rURL );
m_pImpl->setResource( _rURL, aMediaDescriptor );
// if we are in an initialization process, then this is finished, now that we stored the document
if ( bIsInitializationProcess )
impl_setInitialized();
}
catch( const IOException& )
{
if ( !bIsInitializationProcess )
m_aEventNotifier.notifyDocumentEventAsync( _eType == SAVE ? u"OnSaveFailed"_ustr : u"OnSaveAsFailed"_ustr, nullptr, Any( _rURL ) );
throw;
}
catch( const RuntimeException& )
{
if ( !bIsInitializationProcess )
m_aEventNotifier.notifyDocumentEventAsync( _eType == SAVE ? u"OnSaveFailed"_ustr : u"OnSaveAsFailed"_ustr, nullptr, Any( _rURL ) );
throw;
}
catch( const Exception& )
{
Any aError = ::cppu::getCaughtException();
// notify the failure
if ( !bIsInitializationProcess )
m_aEventNotifier.notifyDocumentEventAsync( _eType == SAVE ? u"OnSaveFailed"_ustr : u"OnSaveAsFailed"_ustr, nullptr, Any( _rURL ) );
impl_throwIOExceptionCausedBySave_throw( aError, _rURL );
}
// notify the document event
if ( !bIsInitializationProcess )
m_aEventNotifier.notifyDocumentEventAsync( _eType == SAVE ? u"OnSaveDone"_ustr : u"OnSaveAsDone"_ustr, nullptr, Any( _rURL ) );
// reset our "modified" flag, and clear the guard
impl_setModified_nothrow( false, _rGuard );
// <- SYNCHRONIZED
// notify storage listeners
if ( xNewRootStorage.is() )
impl_notifyStorageChange_nolck_nothrow( xNewRootStorage );
}
Reference< XStorage > ODatabaseDocument::impl_createStorageFor_throw( const OUString& _rURL ) const
{
Reference< ucb::XSimpleFileAccess3 > xTempAccess(ucb::SimpleFileAccess::create(m_pImpl->m_aContext));
Reference< io::XStream > xStream = xTempAccess->openFileReadWrite( _rURL );
Reference< io::XTruncate > xTruncate(xStream,UNO_QUERY);
if ( xTruncate.is() )
{
xTruncate->truncate();
}
Sequence<Any> aParam{ Any(xStream), Any(ElementModes::READWRITE | ElementModes::TRUNCATE) };
Reference< XSingleServiceFactory > xStorageFactory( m_pImpl->createStorageFactory(), UNO_SET_THROW );
return Reference< XStorage >( xStorageFactory->createInstanceWithArguments( aParam ), UNO_QUERY_THROW );
}
css::uno::Reference<css::embed::XStorage> ODatabaseDocument::impl_GetStorageOrCreateFor_throw(
const ::comphelper::NamedValueCollection& _rArguments, const OUString& _rURL) const
{
// Try to get the storage from arguments, then create storage for target URL
uno::Reference<embed::XStorage> xTargetStorage;
_rArguments.get(u"TargetStorage"_ustr) >>= xTargetStorage;
if (!xTargetStorage.is())
xTargetStorage = impl_createStorageFor_throw(_rURL);
// In case we got a StreamRelPath, then xTargetStorage should reference that sub-storage.
OUString sStreamRelPath = _rArguments.getOrDefault(u"StreamRelPath"_ustr, OUString());
if (!sStreamRelPath.isEmpty())
xTargetStorage
= xTargetStorage->openStorageElement(sStreamRelPath, embed::ElementModes::READWRITE);
return xTargetStorage;
}
void SAL_CALL ODatabaseDocument::storeAsURL( const OUString& _rURL, const Sequence< PropertyValue >& _rArguments )
{
// SYNCHRONIZED ->
DocumentGuard aGuard( *this, DocumentGuard::MethodWithoutInit );
// Normally, a document initialization is done via XLoadable::load or XLoadable::initNew. For convenience
// reasons, and to not break existing API clients, it's allowed to call storeAsURL without having initialized
// the document, in which case the initialization will be done implicitly.
bool bImplicitInitialization = !impl_isInitialized();
// implicit initialization while another initialization is just running is not possible
if ( bImplicitInitialization && impl_isInitializing() )
throw RuntimeException();
if ( bImplicitInitialization )
impl_setInitializing();
try
{
impl_storeAs_throw( _rURL, _rArguments, SAVE_AS, aGuard );
// <- SYNCHRONIZED
// impl_storeAs_throw cleared the lock on our mutex, but the below lines need this lock
// SYNCHRONIZED ->
aGuard.reset();
// our title might have changed, potentially at least
// Sadly, we cannot check this: Calling getTitle here and now would not deliver
// an up-to-date result, as the call is delegated to our TitleHelper instance, which itself
// updates its title only if it gets the OnSaveAsDone event (which was sent asynchronously
// by impl_storeAs_throw). So, we simply notify always, and also asynchronously
m_aEventNotifier.notifyDocumentEventAsync( u"OnTitleChanged"_ustr, nullptr, Any() );
}
catch( const Exception& )
{
impl_reset_nothrow();
throw;
}
if ( bImplicitInitialization )
m_bAllowDocumentScripting = true;
aGuard.clear();
// <- SYNCHRONIZED
if ( bImplicitInitialization )
m_aEventNotifier.notifyDocumentEvent( u"OnCreate"_ustr, nullptr, Any() );
}
void ODatabaseDocument::impl_storeToStorage_throw( const Reference< XStorage >& _rxTargetStorage, const Sequence< PropertyValue >& _rMediaDescriptor,
DocumentGuard& _rDocGuard ) const
{
if ( !_rxTargetStorage.is() )
throw IllegalArgumentException( OUString(), *const_cast< ODatabaseDocument* >( this ), 1 );
if ( !m_pImpl.is() )
throw DisposedException( OUString(), *const_cast< ODatabaseDocument* >( this ) );
try
{
// commit everything
m_pImpl->commitEmbeddedStorage();
m_pImpl->commitStorages();
// copy own storage to target storage
if ( impl_isInitialized() )
{
Reference< XStorage > xCurrentStorage = m_pImpl->getOrCreateRootStorage();
// Root storage may be empty in case of embedding.
if ( xCurrentStorage.is() && xCurrentStorage != _rxTargetStorage )
xCurrentStorage->copyToStorage( _rxTargetStorage );
}
// write into target storage
::comphelper::NamedValueCollection aWriteArgs( _rMediaDescriptor );
lcl_triggerStatusIndicator_throw( aWriteArgs, _rDocGuard, true );
impl_writeStorage_throw( _rxTargetStorage, aWriteArgs );
lcl_triggerStatusIndicator_throw( aWriteArgs, _rDocGuard, false );
// commit target storage
m_pImpl->commitStorageIfWriteable_ignoreErrors(_rxTargetStorage);
}
catch( const IOException& ) { throw; }
catch( const RuntimeException& ) { throw; }
catch ( const Exception& e )
{
throw IOException( e.Message, *const_cast< ODatabaseDocument* >( this ) );
}
}
void SAL_CALL ODatabaseDocument::storeToURL( const OUString& _rURL, const Sequence< PropertyValue >& _rArguments )
{
DocumentGuard aGuard(*this, DocumentGuard::DefaultMethod);
ModifyLock aLock( *this );
{
aGuard.clear();
m_aEventNotifier.notifyDocumentEvent( u"OnSaveTo"_ustr, nullptr, Any( _rURL ) );
aGuard.reset();
}
try
{
const ::comphelper::NamedValueCollection aArguments(_rArguments);
// create storage for target URL
Reference<XStorage> xTargetStorage(impl_GetStorageOrCreateFor_throw(aArguments, _rURL));
// extend media descriptor with URL
Sequence<PropertyValue> aMediaDescriptor(lcl_appendFileNameToDescriptor(aArguments, _rURL));
// store to this storage
impl_storeToStorage_throw( xTargetStorage, aMediaDescriptor, aGuard );
}
catch( const Exception& )
{
Any aError = ::cppu::getCaughtException();
m_aEventNotifier.notifyDocumentEventAsync( u"OnSaveToFailed"_ustr, nullptr, aError );
if ( aError.isExtractableTo( ::cppu::UnoType< IOException >::get() )
|| aError.isExtractableTo( ::cppu::UnoType< RuntimeException >::get() )
)
{
// allowed to leave
throw;
}
impl_throwIOExceptionCausedBySave_throw( aError, _rURL );
}
m_aEventNotifier.notifyDocumentEventAsync( u"OnSaveToDone"_ustr, nullptr, Any( _rURL ) );
}
// XModifyBroadcaster
void SAL_CALL ODatabaseDocument::addModifyListener( const Reference< XModifyListener >& _xListener )
{
DocumentGuard aGuard(*this, DocumentGuard::DefaultMethod);
m_aModifyListeners.addInterface(_xListener);
}
void SAL_CALL ODatabaseDocument::removeModifyListener( const Reference< XModifyListener >& _xListener )
{
DocumentGuard aGuard(*this, DocumentGuard::DefaultMethod);
m_aModifyListeners.removeInterface(_xListener);
}
// XModifiable
sal_Bool SAL_CALL ODatabaseDocument::isModified( )
{
DocumentGuard aGuard(*this, DocumentGuard::DefaultMethod);
return m_pImpl->m_bModified;
}
void SAL_CALL ODatabaseDocument::setModified( sal_Bool _bModified )
{
DocumentGuard aGuard( *this, DocumentGuard::MethodWithoutInit );
if ( impl_isInitialized() )
impl_setModified_nothrow( _bModified, aGuard );
// it's allowed to call setModified without the document being initialized already. In this case,
// we simply ignore the call - when the initialization is finished, the respective code will set
// a proper "modified" flag
}
void ODatabaseDocument::impl_setModified_nothrow( bool _bModified, DocumentGuard& _rGuard )
{
// SYNCHRONIZED ->
bool bModifiedChanged = ( m_pImpl->m_bModified != _bModified ) && ( !m_pImpl->isModifyLocked() );
if ( bModifiedChanged )
{
m_pImpl->m_bModified = _bModified;
m_aEventNotifier.notifyDocumentEventAsync( u"OnModifyChanged"_ustr, nullptr, Any() );
}
_rGuard.clear();
// <- SYNCHRONIZED
if ( bModifiedChanged )
{
lang::EventObject aEvent( *this );
m_aModifyListeners.notifyEach( &XModifyListener::modified, aEvent );
}
}
// css::document::XEventBroadcaster
void SAL_CALL ODatabaseDocument::addEventListener(const uno::Reference< document::XEventListener >& Listener )
{
m_aEventNotifier.addLegacyEventListener( Listener );
}
void SAL_CALL ODatabaseDocument::removeEventListener( const uno::Reference< document::XEventListener >& Listener )
{
m_aEventNotifier.removeLegacyEventListener( Listener );
}
void SAL_CALL ODatabaseDocument::addDocumentEventListener( const Reference< XDocumentEventListener >& Listener )
{
m_aEventNotifier.addDocumentEventListener( Listener );
}
void SAL_CALL ODatabaseDocument::removeDocumentEventListener( const Reference< XDocumentEventListener >& Listener )
{
m_aEventNotifier.removeDocumentEventListener( Listener );
}
void SAL_CALL ODatabaseDocument::notifyDocumentEvent( const OUString& EventName, const Reference< XController2 >& ViewController, const Any& Supplement )
{
if ( EventName.isEmpty() )
throw IllegalArgumentException( OUString(), *this, 1 );
// SYNCHRONIZED ->
DocumentGuard aGuard(*this, DocumentGuard::DefaultMethod);
if ( !DocumentEvents::needsSynchronousNotification( EventName ) )
{
m_aEventNotifier.notifyDocumentEventAsync( EventName, ViewController, Supplement );
return;
}
aGuard.clear();
// <- SYNCHRONIZED
m_aEventNotifier.notifyDocumentEvent( EventName, ViewController, Supplement );
}
Sequence< PropertyValue > SAL_CALL ODatabaseDocument::getPrinter( )
{
OSL_FAIL( "ODatabaseDocument::getPrinter: not supported!" );
return Sequence< PropertyValue >();
}
void SAL_CALL ODatabaseDocument::setPrinter( const Sequence< PropertyValue >& /*aPrinter*/ )
{
OSL_FAIL( "ODatabaseDocument::setPrinter: not supported!" );
}
void SAL_CALL ODatabaseDocument::print( const Sequence< PropertyValue >& /*xOptions*/ )
{
OSL_FAIL( "ODatabaseDocument::print: not supported!" );
}
void ODatabaseDocument::impl_reparent_nothrow( const WeakReference< XNameAccess >& _rxContainer )
{
Reference< XChild > xChild( _rxContainer.get(), UNO_QUERY );
if ( xChild.is() )
xChild->setParent( *this );
}
void ODatabaseDocument::clearObjectContainer( WeakReference< XNameAccess >& _rxContainer)
{
Reference< XNameAccess > xContainer = _rxContainer;
::comphelper::disposeComponent( xContainer );
Reference< XChild > xChild( _rxContainer.get(),UNO_QUERY );
if ( xChild.is() )
xChild->setParent( nullptr );
_rxContainer.clear();
}
void ODatabaseDocument::clearObjectContainer( unotools::WeakReference< OCommandContainer >& _rxContainer)
{
rtl::Reference< OCommandContainer > xContainer = _rxContainer;
if ( xContainer.is() )
{
xContainer->dispose();
xContainer->setParent( nullptr );
}
_rxContainer.clear();
}
Reference< XNameAccess > ODatabaseDocument::impl_getDocumentContainer_throw( ODatabaseModelImpl::ObjectType _eType )
{
if ( ( _eType != ODatabaseModelImpl::ObjectType::Form ) && ( _eType != ODatabaseModelImpl::ObjectType::Report ) )
throw IllegalArgumentException();
bool bFormsContainer = _eType == ODatabaseModelImpl::ObjectType::Form;
WeakReference< XNameAccess >& rContainerRef( bFormsContainer ? m_xForms : m_xReports );
Reference< XNameAccess > xContainer = rContainerRef;
if ( !xContainer.is() )
{
Any aValue;
css::uno::Reference< css::uno::XInterface > xMy(*this);
if ( dbtools::getDataSourceSetting(xMy,bFormsContainer ? "Forms" : "Reports",aValue) )
{
OUString sSupportService;
aValue >>= sSupportService;
if ( !sSupportService.isEmpty() )
{
Sequence<Any> aArgs{ Any(NamedValue(u"DatabaseDocument"_ustr,Any(xMy))) };
xContainer.set(
m_pImpl->m_aContext->getServiceManager()->createInstanceWithArgumentsAndContext(sSupportService, aArgs, m_pImpl->m_aContext),
UNO_QUERY);
rContainerRef = xContainer;
}
}
if ( !xContainer.is() )
{
TContentPtr& rContainerData( m_pImpl->getObjectContainer( _eType ) );
rContainerRef = xContainer = new ODocumentContainer( m_pImpl->m_aContext, *this, rContainerData, bFormsContainer );
}
impl_reparent_nothrow( xContainer );
}
return xContainer;
}
void ODatabaseDocument::impl_closeControllerFrames_nolck_throw( bool _bDeliverOwnership )
{
Controllers aCopy = m_aControllers;
for (auto const& elem : aCopy)
{
if ( !elem.is() )
continue;
try
{
Reference< XCloseable> xFrame( elem->getFrame(), UNO_QUERY );
if ( xFrame.is() )
xFrame->close( _bDeliverOwnership );
}
catch( const CloseVetoException& ) { throw; }
catch( const Exception& )
{
DBG_UNHANDLED_EXCEPTION("dbaccess");
}
}
}
void ODatabaseDocument::impl_disposeControllerFrames_nothrow()
{
Controllers aCopy;
aCopy.swap( m_aControllers ); // ensure m_aControllers is empty afterwards
for( const auto& rController : aCopy )
{
try
{
if( rController.is() )
{
Reference< XFrame > xFrame( rController->getFrame() );
::comphelper::disposeComponent( xFrame );
}
}
catch( const Exception& )
{
DBG_UNHANDLED_EXCEPTION("dbaccess");
}
}
}
void SAL_CALL ODatabaseDocument::close(sal_Bool bDeliverOwnership)
{
// nearly everything below can/must be done without our mutex locked, the below is just for
// the checks for being disposed and the like
// SYNCHRONIZED ->
{
DocumentGuard aGuard(*this, DocumentGuard::DefaultMethod);
assert (!m_bClosing);
m_bClosing = true;
}
// <- SYNCHRONIZED
try
{
// allow listeners to veto
lang::EventObject aEvent( *this );
m_aCloseListener.forEach(
[&aEvent, &bDeliverOwnership] (uno::Reference<XCloseListener> const& xListener) {
return xListener->queryClosing(aEvent, bDeliverOwnership);
});
// notify that we're going to unload
m_aEventNotifier.notifyDocumentEvent( u"OnPrepareUnload"_ustr, nullptr, Any() );
impl_closeControllerFrames_nolck_throw( bDeliverOwnership );
m_aCloseListener.notifyEach( &XCloseListener::notifyClosing, const_cast<const lang::EventObject&>(aEvent) );
dispose();
}
catch ( const Exception& )
{
SolarMutexGuard g;
m_bClosing = false;
throw;
}
// SYNCHRONIZED ->
SolarMutexGuard g;
m_bClosing = false;
// <- SYNCHRONIZED
}
void SAL_CALL ODatabaseDocument::addCloseListener( const Reference< css::util::XCloseListener >& Listener )
{
DocumentGuard aGuard(*this, DocumentGuard::DefaultMethod);
m_aCloseListener.addInterface(Listener);
}
void SAL_CALL ODatabaseDocument::removeCloseListener( const Reference< css::util::XCloseListener >& Listener )
{
DocumentGuard aGuard(*this, DocumentGuard::DefaultMethod);
m_aCloseListener.removeInterface(Listener);
}
Reference< XNameAccess > SAL_CALL ODatabaseDocument::getFormDocuments( )
{
DocumentGuard aGuard( *this, DocumentGuard::MethodUsedDuringInit );
return impl_getDocumentContainer_throw( ODatabaseModelImpl::ObjectType::Form );
}
Reference< XNameAccess > SAL_CALL ODatabaseDocument::getReportDocuments( )
{
DocumentGuard aGuard( *this, DocumentGuard::MethodUsedDuringInit );
return impl_getDocumentContainer_throw( ODatabaseModelImpl::ObjectType::Report );
}
void ODatabaseDocument::WriteThroughComponent( const Reference< XComponent >& xComponent, const OUString& sStreamName,
const OUString & rServiceName, const Sequence< Any >& _rArguments, const Sequence< PropertyValue >& rMediaDesc,
const Reference<XStorage>& _xStorageToSaveTo ) const
{
// open stream
Reference< XStream > xStream = _xStorageToSaveTo->openStreamElement( sStreamName, ElementModes::READWRITE | ElementModes::TRUNCATE );
if ( !xStream.is() )
return;
Reference< XOutputStream > xOutputStream( xStream->getOutputStream() );
OSL_ENSURE( xOutputStream.is(), "Can't create output stream in package!" );
if ( !xOutputStream.is() )
return;
Reference< XSeekable > xSeek( xOutputStream, UNO_QUERY );
if ( xSeek.is() )
xSeek->seek(0);
Reference< XPropertySet > xStreamProp( xOutputStream, UNO_QUERY_THROW );
xStreamProp->setPropertyValue( INFO_MEDIATYPE, Any( u"text/xml"_ustr ) );
xStreamProp->setPropertyValue( u"Compressed"_ustr, Any( true ) );
// write the stuff
WriteThroughComponent( xOutputStream, xComponent, rServiceName, _rArguments, rMediaDesc );
}
void ODatabaseDocument::WriteThroughComponent( const Reference< XOutputStream >& xOutputStream,
const Reference< XComponent >& xComponent, const OUString& rServiceName, const Sequence< Any >& _rArguments,
const Sequence< PropertyValue >& rMediaDesc ) const
{
OSL_ENSURE( xOutputStream.is(), "I really need an output stream!" );
OSL_ENSURE( xComponent.is(), "Need component!" );
// get component
Reference< XWriter > xSaxWriter = xml::sax::Writer::create( m_pImpl->m_aContext );
// connect XML writer to output stream
xSaxWriter->setOutputStream( xOutputStream );
// prepare arguments (prepend doc handler to given arguments)
Sequence<Any> aArgs( 1 + _rArguments.getLength() );
auto pArgs = aArgs.getArray();
pArgs[0] <<= xSaxWriter;
for ( sal_Int32 i = 0; i < _rArguments.getLength(); ++i )
pArgs[ i+1 ] = _rArguments[i];
// get filter component
Reference< XExporter > xExporter( m_pImpl->m_aContext->getServiceManager()->createInstanceWithArgumentsAndContext(rServiceName, aArgs, m_pImpl->m_aContext), UNO_QUERY_THROW );
// connect model and filter
xExporter->setSourceDocument( xComponent );
// filter
Reference< XFilter > xFilter( xExporter, UNO_QUERY_THROW );
xFilter->filter( rMediaDesc );
}
void ODatabaseDocument::impl_writeStorage_throw( const Reference< XStorage >& _rxTargetStorage, const ::comphelper::NamedValueCollection& _rMediaDescriptor ) const
{
// extract status indicator
Sequence< Any > aDelegatorArguments;
lcl_extractStatusIndicator( _rMediaDescriptor, aDelegatorArguments );
uno::Reference< beans::XPropertySet > xInfoSet( comphelper::GenericPropertySet_CreateInstance( new comphelper::PropertySetInfo( aExportInfoMap ) ) );
xInfoSet->setPropertyValue(u"UsePrettyPrinting"_ustr, uno::Any(officecfg::Office::Common::Save::Document::PrettyPrinting::get()));
if ( officecfg::Office::Common::Save::URL::FileSystem::get() )
{
OUString sBaseURI = _rMediaDescriptor.getOrDefault(u"BaseURI"_ustr, OUString());
if (sBaseURI.isEmpty())
sBaseURI = _rMediaDescriptor.getOrDefault(u"URL"_ustr,OUString());
xInfoSet->setPropertyValue(u"BaseURI"_ustr, uno::Any(sBaseURI));
}
// Set TargetStorage, so it doesn't have to be re-constructed based on possibly empty URL.
xInfoSet->setPropertyValue(u"TargetStorage"_ustr, uno::Any(m_pImpl->getRootStorage()));
// Set StreamRelPath, in case this document is an embedded one.
OUString sStreamRelPath;
OUString sURL = _rMediaDescriptor.getOrDefault(u"URL"_ustr, OUString());
if (sURL.startsWithIgnoreAsciiCase("vnd.sun.star.pkg:"))
{
// In this case the host contains the real path, and the path is the embedded stream name.
INetURLObject aURL(sURL);
sStreamRelPath = aURL.GetURLPath(INetURLObject::DecodeMechanism::WithCharset);
if (sStreamRelPath.startsWith("/"))
sStreamRelPath = sStreamRelPath.copy(1);
}
if (!sStreamRelPath.isEmpty())
xInfoSet->setPropertyValue(u"StreamRelPath"_ustr, uno::Any(sStreamRelPath));
sal_Int32 nArgsLen = aDelegatorArguments.getLength();
aDelegatorArguments.realloc(nArgsLen+1);
aDelegatorArguments.getArray()[nArgsLen++] <<= xInfoSet;
Reference< XPropertySet > xProp( _rxTargetStorage, UNO_QUERY_THROW );
xProp->setPropertyValue( INFO_MEDIATYPE, Any( MIMETYPE_OASIS_OPENDOCUMENT_DATABASE_ASCII ) );
OUString aVersion;
SvtSaveOptions::ODFSaneDefaultVersion const nDefVersion =
GetODFSaneDefaultVersion();
// older versions can not have this property set,
// it exists only starting from ODF1.2
if (nDefVersion >= SvtSaveOptions::ODFSVER_014)
{
aVersion = ODFVER_014_TEXT;
}
else if (nDefVersion >= SvtSaveOptions::ODFSVER_013)
{
aVersion = ODFVER_013_TEXT;
}
else if (nDefVersion >= SvtSaveOptions::ODFSVER_012)
{
aVersion = ODFVER_012_TEXT;
}
if (!aVersion.isEmpty())
{
try
{
xProp->setPropertyValue(u"Version"_ustr , uno::Any(aVersion));
}
catch (const uno::Exception&)
{
TOOLS_WARN_EXCEPTION("dbaccess", "exception setting Version");
}
}
Reference< XComponent > xComponent( *const_cast< ODatabaseDocument* >( this ), UNO_QUERY_THROW );
Sequence< PropertyValue > aMediaDescriptor;
_rMediaDescriptor >>= aMediaDescriptor;
xInfoSet->setPropertyValue(u"StreamName"_ustr, uno::Any(u"settings.xml"_ustr));
WriteThroughComponent( xComponent, u"settings.xml"_ustr, u"com.sun.star.comp.sdb.XMLSettingsExporter"_ustr,
aDelegatorArguments, aMediaDescriptor, _rxTargetStorage );
xInfoSet->setPropertyValue(u"StreamName"_ustr, uno::Any(u"content.xml"_ustr));
WriteThroughComponent( xComponent, u"content.xml"_ustr, u"com.sun.star.comp.sdb.DBExportFilter"_ustr,
aDelegatorArguments, aMediaDescriptor, _rxTargetStorage );
if ( _rxTargetStorage->hasByName ( sPictures ) )
{
try
{
// Delete any previously existing Pictures folder and regenerate
// any needed content if needed
Reference< XStorageBasedLibraryContainer > xDlgs = m_pImpl->getLibraryContainer( false );
if ( xDlgs.is() )
{
Reference< XModel > xModel(const_cast< ODatabaseDocument*>(this));
lcl_uglyHackToStoreDialogeEmbedImages( m_pImpl->getLibraryContainer(false), _rxTargetStorage, xModel, m_pImpl->m_aContext );
}
}
catch ( const Exception& )
{
DBG_UNHANDLED_EXCEPTION("dbaccess");
}
}
m_pImpl->storeLibraryContainersTo( _rxTargetStorage );
}
Reference< XUIConfigurationManager > SAL_CALL ODatabaseDocument::getUIConfigurationManager( )
{
return Reference< XUIConfigurationManager >( getUIConfigurationManager2(), UNO_QUERY_THROW );
}
Reference< XUIConfigurationManager2 > const & ODatabaseDocument::getUIConfigurationManager2( )
{
DocumentGuard aGuard(*this, DocumentGuard::DefaultMethod);
if ( !m_xUIConfigurationManager.is() )
{
m_xUIConfigurationManager = UIConfigurationManager::create( m_pImpl->m_aContext );
OUString aUIConfigFolderName( u"Configurations2"_ustr );
// First try to open with READWRITE and then READ
Reference< XStorage > xConfigStorage = getDocumentSubStorage( aUIConfigFolderName, ElementModes::READWRITE );
if ( xConfigStorage.is() )
{
OUString aMediaType;
Reference< XPropertySet > xPropSet( xConfigStorage, UNO_QUERY );
Any a = xPropSet->getPropertyValue( INFO_MEDIATYPE );
if ( !( a >>= aMediaType ) || aMediaType.isEmpty() )
{
a <<= u"application/vnd.sun.xml.ui.configuration"_ustr;
xPropSet->setPropertyValue( INFO_MEDIATYPE, a );
}
}
else
xConfigStorage = getDocumentSubStorage( aUIConfigFolderName, ElementModes::READ );
// initialize ui configuration manager with document substorage
m_xUIConfigurationManager->setStorage( xConfigStorage );
}
return m_xUIConfigurationManager;
}
Reference< XStorage > SAL_CALL ODatabaseDocument::getDocumentSubStorage( const OUString& aStorageName, sal_Int32 nMode )
{
DocumentGuard aGuard(*this, DocumentGuard::DefaultMethod);
Reference< XDocumentSubStorageSupplier > xStorageAccess( m_pImpl->getDocumentSubStorageSupplier() );
return xStorageAccess->getDocumentSubStorage( aStorageName, nMode );
}
Sequence< OUString > SAL_CALL ODatabaseDocument::getDocumentSubStoragesNames( )
{
Reference< XDocumentSubStorageSupplier > xStorageAccess( m_pImpl->getDocumentSubStorageSupplier() );
return xStorageAccess->getDocumentSubStoragesNames();
}
void ODatabaseDocument::impl_notifyStorageChange_nolck_nothrow( const Reference< XStorage >& xNewRootStorage )
{
Reference< XInterface > xMe( *this );
m_aStorageListeners.forEach(
[&xMe, &xNewRootStorage] (uno::Reference<XStorageChangeListener> const& xListener) {
return xListener->notifyStorageChange(xMe, xNewRootStorage);
});
}
void ODatabaseDocument::disposing()
{
if ( !m_pImpl.is() )
{
// this means that we're already disposed
OSL_ENSURE( ODatabaseDocument_OfficeDocument::rBHelper.bDisposed, "ODatabaseDocument::disposing: no impl anymore, but not yet disposed!" );
return;
}
if ( impl_isInitialized() )
m_aEventNotifier.notifyDocumentEvent( u"OnUnload"_ustr, nullptr, Any() );
Reference< XModel > xHoldAlive( this );
m_aEventNotifier.disposing();
lang::EventObject aDisposeEvent(static_cast<XWeak*>(this));
m_aModifyListeners.disposeAndClear( aDisposeEvent );
m_aCloseListener.disposeAndClear( aDisposeEvent );
m_aStorageListeners.disposeAndClear( aDisposeEvent );
// this is the list of objects which we currently hold as member. Upon resetting
// those members, we can (potentially) release the last reference to them, in which
// case they will be deleted - if they're C++ implementations, that is :).
// Some of those implementations are offending enough to require the SolarMutex, which
// means we should not release the last reference while our own mutex is locked ...
std::vector< Reference< XInterface > > aKeepAlive;
// SYNCHRONIZED ->
{
SolarMutexGuard aGuard;
OSL_ENSURE(m_aControllers.empty(),
"ODatabaseDocument::disposing: there still are controllers!");
// normally, nobody should explicitly dispose, but only XCloseable::close
// the document. And upon closing, our controllers are closed, too
{
uno::Reference<uno::XInterface> xUIInterface(m_xUIConfigurationManager);
aKeepAlive.push_back(xUIInterface);
}
m_xUIConfigurationManager = nullptr;
clearObjectContainer(m_xForms);
clearObjectContainer(m_xReports);
// reset the macro mode: in case the our impl struct stays alive (e.g. because our DataSource
// object still exists), and somebody subsequently re-opens the document, we want to have
// the security warning, again.
m_pImpl->resetMacroExecutionMode();
// similar arguing for our ViewMonitor
m_aViewMonitor.reset();
// tell our Impl to forget us
m_pImpl->modelIsDisposing(impl_isInitialized(), ODatabaseModelImpl::ResetModelAccess());
// now, at the latest, the controller array should be empty. Controllers are
// expected to listen for our disposal, and disconnect then
OSL_ENSURE(m_aControllers.empty(),
"ODatabaseDocument::disposing: there still are controllers!");
impl_disposeControllerFrames_nothrow();
{
uno::Reference<uno::XInterface> xModuleInterface(m_xModuleManager);
aKeepAlive.push_back(xModuleInterface);
}
m_xModuleManager.clear();
{
uno::Reference<uno::XInterface> xTitleInterface(cppu::getXWeak(m_xTitleHelper.get()));
aKeepAlive.push_back(xTitleInterface);
}
m_xTitleHelper.clear();
m_pImpl.clear();
}
// <- SYNCHRONIZED
aKeepAlive.clear();
}
// XComponent
void SAL_CALL ODatabaseDocument::dispose( )
{
::cppu::WeakComponentImplHelperBase::dispose();
m_xTitleHelper.clear();
m_xModuleManager.clear();
m_pEventExecutor.clear();
m_xCurrentController.clear();
m_xUIConfigurationManager.clear();
}
void SAL_CALL ODatabaseDocument::addEventListener( const Reference< lang::XEventListener >& _xListener )
{
::cppu::WeakComponentImplHelperBase::addEventListener( _xListener );
}
void SAL_CALL ODatabaseDocument::removeEventListener( const Reference< lang::XEventListener >& _xListener )
{
::cppu::WeakComponentImplHelperBase::removeEventListener( _xListener );
}
// XServiceInfo
OUString ODatabaseDocument::getImplementationName()
{
return u"com.sun.star.comp.dba.ODatabaseDocument"_ustr;
}
Sequence< OUString > ODatabaseDocument::getSupportedServiceNames()
{
return { u"com.sun.star.sdb.OfficeDatabaseDocument"_ustr, u"com.sun.star.document.OfficeDocument"_ustr };
}
sal_Bool ODatabaseDocument::supportsService( const OUString& _rServiceName )
{
return cppu::supportsService(this, _rServiceName);
}
Reference< XDataSource > SAL_CALL ODatabaseDocument::getDataSource()
{
DocumentGuard aGuard( *this, DocumentGuard::MethodWithoutInit );
return m_pImpl->getOrCreateDataSource();
}
namespace
{
/// Property map for embedded import info set.
comphelper::PropertyMapEntry const aEmbeddedImportInfoMap[] =
{
{u"StreamRelPath"_ustr, 0, cppu::UnoType<OUString>::get(), beans::PropertyAttribute::MAYBEVOID, 0},
{u"StreamName"_ustr, 0, cppu::UnoType<OUString>::get(), beans::PropertyAttribute::MAYBEVOID, 0},
{u"SourceStorage"_ustr, 0, cppu::UnoType<embed::XStorage>::get(), beans::PropertyAttribute::MAYBEVOID, 0},
};
}
void SAL_CALL ODatabaseDocument::loadFromStorage(const Reference<XStorage>& xStorage, const Sequence<PropertyValue>& rMediaDescriptor)
{
DocumentGuard aGuard(*this, DocumentGuard::InitMethod);
uno::Reference<beans::XPropertySet> xInfoSet(comphelper::GenericPropertySet_CreateInstance(new comphelper::PropertySetInfo(aEmbeddedImportInfoMap)));
xInfoSet->setPropertyValue(u"StreamRelPath"_ustr, uno::Any(comphelper::NamedValueCollection::getOrDefault(rMediaDescriptor, u"HierarchicalDocumentName", OUString())));
xInfoSet->setPropertyValue(u"StreamName"_ustr, uno::Any(u"content.xml"_ustr));
xInfoSet->setPropertyValue(u"SourceStorage"_ustr, uno::Any(xStorage));
uno::Sequence<uno::Any> aFilterCreationArgs{ Any(xInfoSet) };
uno::Reference<document::XImporter> xImporter(m_pImpl->m_aContext->getServiceManager()->createInstanceWithArgumentsAndContext(u"com.sun.star.comp.sdb.DBFilter"_ustr, aFilterCreationArgs, m_pImpl->m_aContext), uno::UNO_QUERY_THROW);
uno::Reference<lang::XComponent> xComponent(*this, uno::UNO_QUERY_THROW);
xImporter->setTargetDocument(xComponent);
uno::Reference<document::XFilter> xFilter(xImporter, uno::UNO_QUERY_THROW);
uno::Sequence<beans::PropertyValue> aFilterArgs;
xFilter->filter(aFilterArgs);
// In case of embedding, XModel::attachResource is already called.
if (m_bEmbedded)
impl_setInitialized();
impl_setModified_nothrow(false, aGuard);
}
void SAL_CALL ODatabaseDocument::storeToStorage( const Reference< XStorage >& _rxStorage, const Sequence< PropertyValue >& _rMediaDescriptor )
{
DocumentGuard aGuard(*this, DocumentGuard::DefaultMethod);
impl_storeToStorage_throw( _rxStorage, _rMediaDescriptor, aGuard );
}
void SAL_CALL ODatabaseDocument::switchToStorage( const Reference< XStorage >& _rxNewRootStorage )
{
DocumentGuard aGuard(*this, DocumentGuard::DefaultMethod);
Reference< XStorage > xNewRootStorage( m_pImpl->switchToStorage( _rxNewRootStorage ) );
aGuard.clear();
impl_notifyStorageChange_nolck_nothrow( xNewRootStorage );
}
Reference< XStorage > SAL_CALL ODatabaseDocument::getDocumentStorage( )
{
DocumentGuard aGuard(*this, DocumentGuard::MethodUsedDuringInit);
return m_pImpl->getOrCreateRootStorage();
}
void SAL_CALL ODatabaseDocument::addStorageChangeListener( const Reference< XStorageChangeListener >& Listener )
{
DocumentGuard aGuard(*this, DocumentGuard::DefaultMethod);
m_aStorageListeners.addInterface( Listener );
}
void SAL_CALL ODatabaseDocument::removeStorageChangeListener( const Reference< XStorageChangeListener >& Listener )
{
DocumentGuard aGuard(*this, DocumentGuard::DefaultMethod);
m_aStorageListeners.removeInterface( Listener );
}
Reference< XStorageBasedLibraryContainer > SAL_CALL ODatabaseDocument::getBasicLibraries()
{
DocumentGuard aGuard( *this, DocumentGuard::MethodUsedDuringInit );
return m_pImpl->getLibraryContainer( true );
}
Reference< XStorageBasedLibraryContainer > SAL_CALL ODatabaseDocument::getDialogLibraries()
{
DocumentGuard aGuard(*this, DocumentGuard::DefaultMethod);
return m_pImpl->getLibraryContainer( false );
}
sal_Bool SAL_CALL ODatabaseDocument::getAllowMacroExecution()
{
DocumentGuard aGuard(*this, DocumentGuard::DefaultMethod);
return m_pImpl->adjustMacroMode_AutoReject();
}
Reference< XEmbeddedScripts > SAL_CALL ODatabaseDocument::getScriptContainer()
{
return this;
}
Reference< provider::XScriptProvider > SAL_CALL ODatabaseDocument::getScriptProvider( )
{
DocumentGuard aGuard(*this, DocumentGuard::DefaultMethod);
Reference< XScriptProvider > xScriptProvider( m_xScriptProvider );
if ( !xScriptProvider.is() )
{
Reference < XScriptProviderFactory > xFactory =
theMasterScriptProviderFactory::get( m_pImpl->m_aContext );
Any aScriptProviderContext;
if ( m_bAllowDocumentScripting )
aScriptProviderContext <<= Reference< XModel >( this );
xScriptProvider.set( xFactory->createScriptProvider( aScriptProviderContext ), UNO_SET_THROW );
m_xScriptProvider = xScriptProvider;
}
return xScriptProvider;
}
Reference< XNameReplace > SAL_CALL ODatabaseDocument::getEvents( )
{
DocumentGuard aGuard( *this, DocumentGuard::MethodUsedDuringInit );
return m_pEventContainer.get();
}
Reference< XInterface > ODatabaseDocument::getThis() const
{
return *const_cast< ODatabaseDocument* >( this );
}
namespace {
struct CreateAny
{
Any operator() (const Reference<XController>& lhs) const
{
return Any(lhs);
}
};
}
// XModel2
Reference< XEnumeration > SAL_CALL ODatabaseDocument::getControllers( )
{
DocumentGuard aGuard(*this, DocumentGuard::DefaultMethod);
uno::Sequence< Any> aController( m_aControllers.size() );
std::transform( m_aControllers.begin(), m_aControllers.end(), aController.getArray(), CreateAny() );
return new ::comphelper::OAnyEnumeration(aController);
}
Sequence< OUString > SAL_CALL ODatabaseDocument::getAvailableViewControllerNames( )
{
Sequence< OUString > aNames { SERVICE_SDB_APPLICATIONCONTROLLER };
return aNames;
}
Reference< XController2 > SAL_CALL ODatabaseDocument::createDefaultViewController( const Reference< XFrame >& Frame )
{
return createViewController( u"Default"_ustr, Sequence< PropertyValue >(), Frame);
}
Reference< XController2 > SAL_CALL ODatabaseDocument::createViewController( const OUString& ViewName, const Sequence< PropertyValue >& Arguments, const Reference< XFrame >& Frame )
{
if ( ViewName != "Default" && ViewName != "Preview" )
throw IllegalArgumentException( OUString(), *this, 1 );
if ( !Frame.is() )
throw IllegalArgumentException( OUString(), *this, 3 );
DocumentGuard aGuard(*this, DocumentGuard::DefaultMethod);
aGuard.clear();
Reference< XController2 > xController(
m_pImpl->m_aContext->getServiceManager()->createInstanceWithContext(u"org.openoffice.comp.dbu.OApplicationController"_ustr, m_pImpl->m_aContext),
UNO_QUERY_THROW );
::comphelper::NamedValueCollection aInitArgs( Arguments );
aInitArgs.put( u"Frame"_ustr, Frame );
if ( ViewName == "Preview" )
aInitArgs.put( u"Preview"_ustr, true );
Reference< XInitialization > xInitController( xController, UNO_QUERY_THROW );
xInitController->initialize( aInitArgs.getWrappedPropertyValues() );
return xController;
}
rtl::Reference< ::framework::TitleHelper > const & ODatabaseDocument::impl_getTitleHelper_throw()
{
if ( ! m_xTitleHelper.is ())
{
Reference< XUntitledNumbers > xDesktop(Desktop::create(m_pImpl->m_aContext), uno::UNO_QUERY_THROW);
Reference< frame::XModel > xThis (getThis(), uno::UNO_QUERY_THROW);
m_xTitleHelper = new ::framework::TitleHelper(m_pImpl->m_aContext, xThis, xDesktop);
}
return m_xTitleHelper;
}
uno::Reference< frame::XUntitledNumbers > ODatabaseDocument::impl_getUntitledHelper_throw(const uno::Reference< uno::XInterface >& _xComponent)
{
if ( !m_xModuleManager.is() )
m_xModuleManager.set( ModuleManager::create(m_pImpl->m_aContext) );
OUString sModuleId;
if (_xComponent.is())
sModuleId = m_xModuleManager->identify(_xComponent);
uno::Reference< frame::XUntitledNumbers > xNumberedControllers;
TNumberedController::const_iterator aFind = m_aNumberedControllers.find(sModuleId);
if ( aFind == m_aNumberedControllers.end() )
{
rtl::Reference<::comphelper::NumberedCollection> pHelper = new ::comphelper::NumberedCollection();
xNumberedControllers = pHelper;
pHelper->setOwner(uno::Reference< frame::XModel >(this));
m_aNumberedControllers.emplace( sModuleId,xNumberedControllers );
}
else
xNumberedControllers = aFind->second;
return xNumberedControllers;
}
// css.frame.XTitle
OUString SAL_CALL ODatabaseDocument::getTitle()
{
// SYNCHRONIZED ->
DocumentGuard aGuard( *this, DocumentGuard::MethodUsedDuringInit );
return impl_getTitleHelper_throw()->getTitle();
}
// css.frame.XTitle
void SAL_CALL ODatabaseDocument::setTitle( const OUString& sTitle )
{
// SYNCHRONIZED ->
DocumentGuard aGuard(*this, DocumentGuard::DefaultMethod);
impl_getTitleHelper_throw()->setTitle( sTitle );
m_aEventNotifier.notifyDocumentEventAsync( u"OnTitleChanged"_ustr, nullptr, Any() );
// <- SYNCHRONIZED
}
// css.frame.XTitleChangeBroadcaster
void SAL_CALL ODatabaseDocument::addTitleChangeListener( const uno::Reference< frame::XTitleChangeListener >& xListener )
{
// SYNCHRONIZED ->
DocumentGuard aGuard(*this, DocumentGuard::DefaultMethod);
rtl::Reference< ::framework::TitleHelper > xBroadcaster( impl_getTitleHelper_throw() );
xBroadcaster->addTitleChangeListener( xListener );
}
// css.frame.XTitleChangeBroadcaster
void SAL_CALL ODatabaseDocument::removeTitleChangeListener( const uno::Reference< frame::XTitleChangeListener >& xListener )
{
// SYNCHRONIZED ->
DocumentGuard aGuard(*this, DocumentGuard::DefaultMethod);
rtl::Reference< ::framework::TitleHelper > xBroadcaster( impl_getTitleHelper_throw() );
xBroadcaster->removeTitleChangeListener( xListener );
}
// css.frame.XUntitledNumbers
::sal_Int32 SAL_CALL ODatabaseDocument::leaseNumber( const uno::Reference< uno::XInterface >& xComponent )
{
DocumentGuard aGuard(*this, DocumentGuard::DefaultMethod);
return impl_getUntitledHelper_throw(xComponent)->leaseNumber (xComponent);
}
// css.frame.XUntitledNumbers
void SAL_CALL ODatabaseDocument::releaseNumber( ::sal_Int32 nNumber )
{
DocumentGuard aGuard(*this, DocumentGuard::DefaultMethod);
impl_getUntitledHelper_throw()->releaseNumber (nNumber);
}
// css.frame.XUntitledNumbers
void SAL_CALL ODatabaseDocument::releaseNumberForComponent( const uno::Reference< uno::XInterface >& xComponent )
{
DocumentGuard aGuard(*this, DocumentGuard::DefaultMethod);
impl_getUntitledHelper_throw(xComponent)->releaseNumberForComponent (xComponent);
}
// css.frame.XUntitledNumbers
OUString SAL_CALL ODatabaseDocument::getUntitledPrefix()
{
return OUString();
}
} // namespace dbaccess
extern "C" SAL_DLLPUBLIC_EXPORT css::uno::XInterface*
com_sun_star_comp_dba_ODatabaseDocument(css::uno::XComponentContext* context,
css::uno::Sequence<css::uno::Any> const &)
{
Reference<XInterface> xDBContextTunnel(DatabaseContext::create(context), UNO_QUERY_THROW);
rtl::Reference<dbaccess::ODatabaseContext> pContext
= dynamic_cast<dbaccess::ODatabaseContext*>(xDBContextTunnel.get());
assert(pContext);
rtl::Reference pImpl(
new dbaccess::ODatabaseModelImpl(context, *pContext));
rtl::Reference<dbaccess::ODatabaseDocument> inst(pImpl->createNewModel_deliverOwnership());
inst->acquire();
return cppu::getXWeak(inst.get());
}
/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
View git blame Copy permalink