269 lines
9.7 KiB
C++
269 lines
9.7 KiB
C++
/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
|
|
/*************************************************************************
|
|
*
|
|
* DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
|
|
*
|
|
* Copyright 2000, 2010 Oracle and/or its affiliates.
|
|
*
|
|
* OpenOffice.org - a multi-platform office productivity suite
|
|
*
|
|
* This file is part of OpenOffice.org.
|
|
*
|
|
* OpenOffice.org is free software: you can redistribute it and/or modify
|
|
* it under the terms of the GNU Lesser General Public License version 3
|
|
* only, as published by the Free Software Foundation.
|
|
*
|
|
* OpenOffice.org is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
* GNU Lesser General Public License version 3 for more details
|
|
* (a copy is included in the LICENSE file that accompanied this code).
|
|
*
|
|
* You should have received a copy of the GNU Lesser General Public License
|
|
* version 3 along with OpenOffice.org. If not, see
|
|
* <http://www.openoffice.org/license.html>
|
|
* for a copy of the LGPLv3 License.
|
|
*
|
|
************************************************************************/
|
|
|
|
// MARKER(update_precomp.py): autogen include statement, do not remove
|
|
#include "precompiled_basic.hxx"
|
|
|
|
#include <basic/vbahelper.hxx>
|
|
|
|
#include <map>
|
|
#include <vector>
|
|
#include <com/sun/star/container/XEnumeration.hpp>
|
|
#include <com/sun/star/frame/XDesktop.hpp>
|
|
#include <com/sun/star/frame/XModel2.hpp>
|
|
#include <com/sun/star/frame/XModuleManager.hpp>
|
|
#include <com/sun/star/lang/XMultiServiceFactory.hpp>
|
|
#include <comphelper/processfactory.hxx>
|
|
#include <cppuhelper/implbase1.hxx>
|
|
#include <rtl/instance.hxx>
|
|
|
|
namespace basic {
|
|
namespace vba {
|
|
|
|
using namespace ::com::sun::star;
|
|
|
|
// ============================================================================
|
|
|
|
namespace {
|
|
|
|
/** Create an instance of a module manager.
|
|
*/
|
|
uno::Reference< frame::XModuleManager > lclCreateModuleManager()
|
|
{
|
|
uno::Reference< frame::XModuleManager > xModuleManager;
|
|
try
|
|
{
|
|
uno::Reference< lang::XMultiServiceFactory > xFactory( ::comphelper::getProcessServiceFactory(), uno::UNO_QUERY_THROW );
|
|
xModuleManager.set( xFactory->createInstance( ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "com.sun.star.frame.ModuleManager" ) ) ), uno::UNO_QUERY );
|
|
}
|
|
catch(const uno::Exception& )
|
|
{
|
|
}
|
|
return xModuleManager;
|
|
}
|
|
|
|
// ----------------------------------------------------------------------------
|
|
|
|
/** Implementation of an enumeration of all open documents of the same type.
|
|
*/
|
|
class DocumentsEnumeration : public ::cppu::WeakImplHelper1< container::XEnumeration >
|
|
{
|
|
public:
|
|
DocumentsEnumeration( const uno::Reference< frame::XModel >& rxModel );
|
|
virtual sal_Bool SAL_CALL hasMoreElements() throw (uno::RuntimeException);
|
|
virtual uno::Any SAL_CALL nextElement() throw (container::NoSuchElementException, lang::WrappedTargetException, uno::RuntimeException);
|
|
private:
|
|
typedef ::std::vector< uno::Reference< frame::XModel > > ModelVector;
|
|
ModelVector maModels;
|
|
ModelVector::iterator maModelIt;
|
|
};
|
|
|
|
DocumentsEnumeration::DocumentsEnumeration( const uno::Reference< frame::XModel >& rxModel )
|
|
{
|
|
try
|
|
{
|
|
uno::Reference< frame::XModuleManager > xModuleManager( lclCreateModuleManager(), uno::UNO_SET_THROW );
|
|
::rtl::OUString aIdentifier = xModuleManager->identify( rxModel );
|
|
uno::Reference< lang::XMultiServiceFactory > xFactory( ::comphelper::getProcessServiceFactory(), uno::UNO_QUERY_THROW );
|
|
uno::Reference< frame::XDesktop > xDesktop( xFactory->createInstance( ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "com.sun.star.frame.Desktop" ) ) ), uno::UNO_QUERY_THROW );
|
|
uno::Reference< container::XEnumerationAccess > xComponentsEA( xDesktop->getComponents(), uno::UNO_SET_THROW );
|
|
uno::Reference< container::XEnumeration > xEnumeration( xComponentsEA->createEnumeration(), uno::UNO_SET_THROW );
|
|
while( xEnumeration->hasMoreElements() )
|
|
{
|
|
uno::Reference< frame::XModel > xCurrModel( xEnumeration->nextElement(), uno::UNO_QUERY_THROW );
|
|
if( xModuleManager->identify( xCurrModel ) == aIdentifier )
|
|
maModels.push_back( xCurrModel );
|
|
}
|
|
}
|
|
catch(const uno::Exception& )
|
|
{
|
|
}
|
|
maModelIt = maModels.begin();
|
|
}
|
|
|
|
sal_Bool SAL_CALL DocumentsEnumeration::hasMoreElements() throw (uno::RuntimeException)
|
|
{
|
|
return maModelIt != maModels.end();
|
|
}
|
|
|
|
uno::Any SAL_CALL DocumentsEnumeration::nextElement() throw (container::NoSuchElementException, lang::WrappedTargetException, uno::RuntimeException)
|
|
{
|
|
if( maModelIt == maModels.end() )
|
|
throw container::NoSuchElementException();
|
|
return uno::Any( *maModelIt++ );
|
|
}
|
|
|
|
// ----------------------------------------------------------------------------
|
|
|
|
/** Locks or unlocks the controllers of the specified document model.
|
|
*/
|
|
void lclLockControllers( const uno::Reference< frame::XModel >& rxModel, sal_Bool bLockControllers )
|
|
{
|
|
if( rxModel.is() ) try
|
|
{
|
|
if( bLockControllers )
|
|
rxModel->lockControllers();
|
|
else
|
|
rxModel->unlockControllers();
|
|
}
|
|
catch(const uno::Exception& )
|
|
{
|
|
}
|
|
}
|
|
|
|
// ----------------------------------------------------------------------------
|
|
|
|
/** Enables or disables the container windows of all controllers of the
|
|
specified document model.
|
|
*/
|
|
void lclEnableContainerWindows( const uno::Reference< frame::XModel >& rxModel, sal_Bool bEnableWindows )
|
|
{
|
|
try
|
|
{
|
|
uno::Reference< frame::XModel2 > xModel2( rxModel, uno::UNO_QUERY_THROW );
|
|
uno::Reference< container::XEnumeration > xControllersEnum( xModel2->getControllers(), uno::UNO_SET_THROW );
|
|
// iterate over all controllers
|
|
while( xControllersEnum->hasMoreElements() )
|
|
{
|
|
try
|
|
{
|
|
uno::Reference< frame::XController > xController( xControllersEnum->nextElement(), uno::UNO_QUERY_THROW );
|
|
uno::Reference< frame::XFrame > xFrame( xController->getFrame(), uno::UNO_SET_THROW );
|
|
uno::Reference< awt::XWindow > xWindow( xFrame->getContainerWindow(), uno::UNO_SET_THROW );
|
|
xWindow->setEnable( bEnableWindows );
|
|
}
|
|
catch(const uno::Exception& )
|
|
{
|
|
}
|
|
}
|
|
}
|
|
catch(const uno::Exception& )
|
|
{
|
|
}
|
|
}
|
|
|
|
// ----------------------------------------------------------------------------
|
|
|
|
typedef void (*ModifyDocumentFunc)( const uno::Reference< frame::XModel >&, sal_Bool );
|
|
|
|
/** Implementation iterating over all documents that have the same type as the
|
|
specified model, and calling the passed functor.
|
|
*/
|
|
void lclIterateDocuments( ModifyDocumentFunc pModifyDocumentFunc, const uno::Reference< frame::XModel >& rxModel, sal_Bool bModificator )
|
|
{
|
|
uno::Reference< container::XEnumeration > xDocumentsEnum( new DocumentsEnumeration( rxModel ) );
|
|
// iterate over all open documents
|
|
while( xDocumentsEnum->hasMoreElements() ) try
|
|
{
|
|
uno::Reference< frame::XModel > xCurrModel( xDocumentsEnum->nextElement(), uno::UNO_QUERY_THROW );
|
|
pModifyDocumentFunc( xCurrModel, bModificator );
|
|
}
|
|
catch(const uno::Exception& )
|
|
{
|
|
}
|
|
}
|
|
|
|
// ----------------------------------------------------------------------------
|
|
|
|
struct CurrDirPool
|
|
{
|
|
::osl::Mutex maMutex;
|
|
::std::map< ::rtl::OUString, ::rtl::OUString > maCurrDirs;
|
|
};
|
|
|
|
struct StaticCurrDirPool : public ::rtl::Static< CurrDirPool, StaticCurrDirPool > {};
|
|
|
|
} // namespace
|
|
|
|
// ============================================================================
|
|
|
|
uno::Reference< container::XEnumeration > createDocumentsEnumeration( const uno::Reference< frame::XModel >& rxModel )
|
|
{
|
|
return new DocumentsEnumeration( rxModel );
|
|
}
|
|
|
|
// ============================================================================
|
|
|
|
void lockControllersOfAllDocuments( const uno::Reference< frame::XModel >& rxModel, sal_Bool bLockControllers )
|
|
{
|
|
lclIterateDocuments( &lclLockControllers, rxModel, bLockControllers );
|
|
}
|
|
|
|
// ============================================================================
|
|
|
|
void enableContainerWindowsOfAllDocuments( const uno::Reference< frame::XModel >& rxModel, sal_Bool bEnableWindows )
|
|
{
|
|
lclIterateDocuments( &lclEnableContainerWindows, rxModel, bEnableWindows );
|
|
}
|
|
|
|
// ============================================================================
|
|
|
|
void registerCurrentDirectory( const uno::Reference< frame::XModel >& rxModel, const ::rtl::OUString& rPath )
|
|
{
|
|
if( rPath.getLength() > 0 )
|
|
{
|
|
CurrDirPool& rPool = StaticCurrDirPool::get();
|
|
::osl::MutexGuard aGuard( rPool.maMutex );
|
|
try
|
|
{
|
|
uno::Reference< frame::XModuleManager > xModuleManager( lclCreateModuleManager(), uno::UNO_SET_THROW );
|
|
::rtl::OUString aIdentifier = xModuleManager->identify( rxModel );
|
|
if( aIdentifier.getLength() > 0 )
|
|
rPool.maCurrDirs[ aIdentifier ] = rPath;
|
|
}
|
|
catch(const uno::Exception& )
|
|
{
|
|
}
|
|
}
|
|
}
|
|
|
|
// ============================================================================
|
|
|
|
::rtl::OUString getCurrentDirectory( const uno::Reference< frame::XModel >& rxModel )
|
|
{
|
|
::rtl::OUString aPath;
|
|
CurrDirPool& rPool = StaticCurrDirPool::get();
|
|
::osl::MutexGuard aGuard( rPool.maMutex );
|
|
try
|
|
{
|
|
uno::Reference< frame::XModuleManager > xModuleManager( lclCreateModuleManager(), uno::UNO_SET_THROW );
|
|
::rtl::OUString aIdentifier = xModuleManager->identify( rxModel );
|
|
aPath = rPool.maCurrDirs[ aIdentifier ];
|
|
}
|
|
catch(const uno::Exception& )
|
|
{
|
|
}
|
|
return aPath;
|
|
}
|
|
|
|
// ============================================================================
|
|
|
|
} // namespace vba
|
|
} // namespace basic
|
|
|
|
/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
|