Files
loongoffice/forms/source/misc/InterfaceContainer.cxx
Stephan Bergmann e57ca02849 Remove dynamic exception specifications
...(for now, from LIBO_INTERNAL_CODE only).  See the mail thread starting at
<https://lists.freedesktop.org/archives/libreoffice/2017-January/076665.html>
"Dynamic Exception Specifications" for details.

Most changes have been done automatically by the rewriting loplugin:dynexcspec
(after enabling the rewriting mode, to be committed shortly).  The way it only
removes exception specs from declarations if it also sees a definition, it
identified some dead declarations-w/o-definitions (that have been removed
manually) and some cases where a definition appeared in multiple include files
(which have also been cleaned up manually).  There's also been cases of macro
paramters (that were used to abstract over exception specs) that have become
unused now (and been removed).

Furthermore, some code needed to be cleaned up manually
(avmedia/source/quicktime/ and connectivity/source/drivers/kab/), as I had no
configurations available that would actually build that code.  Missing @throws
documentation has not been applied in such manual clean-up.

Change-Id: I3408691256c9b0c12bc5332de976743626e13960
Reviewed-on: https://gerrit.libreoffice.org/33574
Tested-by: Jenkins <ci@libreoffice.org>
Reviewed-by: Stephan Bergmann <sbergman@redhat.com>
2017-01-26 12:54:43 +00:00

1317 lines
41 KiB
C++

/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
/*
* This file is part of the LibreOffice project.
*
* This Source Code Form is subject to the terms of the Mozilla Public
* License, v. 2.0. If a copy of the MPL was not distributed with this
* file, You can obtain one at http://mozilla.org/MPL/2.0/.
*
* This file incorporates work covered by the following license notice:
*
* Licensed to the Apache Software Foundation (ASF) under one or more
* contributor license agreements. See the NOTICE file distributed
* with this work for additional information regarding copyright
* ownership. The ASF licenses this file to you under the Apache
* License, Version 2.0 (the "License"); you may not use this file
* except in compliance with the License. You may obtain a copy of
* the License at http://www.apache.org/licenses/LICENSE-2.0 .
*/
#include "frm_resource.hrc"
#include "frm_resource.hxx"
#include "InterfaceContainer.hxx"
#include "componenttools.hxx"
#include "property.hrc"
#include "services.hxx"
#include <com/sun/star/beans/XPropertySet.hpp>
#include <com/sun/star/container/XNamed.hpp>
#include <com/sun/star/io/WrongFormatException.hpp>
#include <com/sun/star/io/XMarkableStream.hpp>
#include <com/sun/star/lang/WrappedTargetRuntimeException.hpp>
#include <com/sun/star/lang/XComponent.hpp>
#include <com/sun/star/util/XCloneable.hpp>
#include <com/sun/star/form/XForm.hpp>
#include <comphelper/container.hxx>
#include <comphelper/enumhelper.hxx>
#include <comphelper/eventattachermgr.hxx>
#include <comphelper/property.hxx>
#include <comphelper/sequence.hxx>
#include <cppuhelper/exc_hlp.hxx>
#include <cppuhelper/queryinterface.hxx>
#include <tools/debug.hxx>
#include <tools/diagnose_ex.h>
#include <algorithm>
#include <memory>
#include <com/sun/star/frame/XModel.hpp>
#include <com/sun/star/document/XCodeNameQuery.hpp>
#include <ooo/vba/XVBAToOOEventDescGen.hpp>
#include <comphelper/processfactory.hxx>
namespace frm
{
using namespace ::com::sun::star::frame;
using namespace ::com::sun::star::lang;
using namespace ::com::sun::star::uno;
using namespace ::com::sun::star::beans;
using namespace ::com::sun::star::document;
using namespace ::com::sun::star::container;
using namespace ::com::sun::star::script;
using namespace ::com::sun::star::io;
using namespace ::com::sun::star::form;
using namespace ::com::sun::star::util;
namespace
{
void lcl_throwIllegalArgumentException()
{
throw IllegalArgumentException();
}
}
bool
lcl_hasVbaEvents( const Sequence< ScriptEventDescriptor >& sEvents )
{
const ScriptEventDescriptor* pDesc = sEvents.getConstArray();
const ScriptEventDescriptor* pEnd = ( pDesc + sEvents.getLength() );
for ( ; pDesc != pEnd; ++pDesc )
{
if ( pDesc->ScriptType == "VBAInterop" )
return true;
}
return false;
}
Sequence< ScriptEventDescriptor >
lcl_stripVbaEvents( const Sequence< ScriptEventDescriptor >& sEvents )
{
Sequence< ScriptEventDescriptor > sStripped( sEvents.getLength() );
const ScriptEventDescriptor* pDesc = sEvents.getConstArray();
const ScriptEventDescriptor* pEnd = ( pDesc + sEvents.getLength() );
sal_Int32 nCopied = 0;
for ( ; pDesc != pEnd; ++pDesc )
{
if ( pDesc->ScriptType != "VBAInterop" )
{
sStripped[ nCopied++ ] = *pDesc;
}
}
if ( nCopied )
sStripped.realloc( nCopied );
return sStripped;
}
void OInterfaceContainer::impl_addVbEvents_nolck_nothrow( const sal_Int32 i_nIndex )
{
// we are dealing with form controls
try
{
do
{
Reference< XModel > xDoc( getXModel( static_cast< XContainer *> ( this ) ) );
if ( !xDoc.is() )
break;
Reference< XMultiServiceFactory > xDocFac( xDoc, UNO_QUERY_THROW );
Reference< XCodeNameQuery > xNameQuery( xDocFac->createInstance("ooo.vba.VBACodeNameProvider"), UNO_QUERY );
if ( !xNameQuery.is() )
break;
::osl::MutexGuard aGuard( m_rMutex );
bool hasVBABindings = lcl_hasVbaEvents( m_xEventAttacher->getScriptEvents( i_nIndex ) );
if ( hasVBABindings )
break;
Reference< XInterface > xElement( getByIndex( i_nIndex ) , UNO_QUERY_THROW );
Reference< XForm > xElementAsForm( xElement, UNO_QUERY );
if ( xElementAsForm.is() )
break;
// Try getting the code name from the container first (faster),
// then from the element if that fails (slower).
Reference<XInterface> xThis = static_cast<XContainer*>(this);
OUString sCodeName = xNameQuery->getCodeNameForContainer(xThis);
if (sCodeName.isEmpty())
sCodeName = xNameQuery->getCodeNameForObject(xElement);
Reference< XPropertySet > xProps( xElement, UNO_QUERY_THROW );
OUString sServiceName;
xProps->getPropertyValue("DefaultControl") >>= sServiceName;
Reference< ooo::vba::XVBAToOOEventDescGen > xDescSupplier( m_xContext->getServiceManager()->createInstanceWithContext("ooo.vba.VBAToOOEventDesc", m_xContext), UNO_QUERY_THROW );
Sequence< ScriptEventDescriptor > vbaEvents = xDescSupplier->getEventDescriptions( sServiceName , sCodeName );
// register the vba script events
m_xEventAttacher->registerScriptEvents( i_nIndex, vbaEvents );
}
while ( false );
}
catch ( const ServiceNotRegisteredException& )
{
// silence this, not all document types support the ooo.vba.VBACodeNameProvider service
}
catch( const Exception& )
{
DBG_UNHANDLED_EXCEPTION();
}
}
ElementDescription::ElementDescription( )
{
}
ElementDescription::~ElementDescription()
{
}
OInterfaceContainer::OInterfaceContainer(
const Reference<XComponentContext>& _rxContext,
::osl::Mutex& _rMutex,
const Type& _rElementType)
:OInterfaceContainer_BASE()
,m_rMutex(_rMutex)
,m_aContainerListeners(_rMutex)
,m_aElementType(_rElementType)
,m_xContext(_rxContext)
{
impl_createEventAttacher_nothrow();
}
OInterfaceContainer::OInterfaceContainer( ::osl::Mutex& _rMutex, const OInterfaceContainer& _cloneSource )
:OInterfaceContainer_BASE()
,m_rMutex( _rMutex )
,m_aContainerListeners( _rMutex )
,m_aElementType( _cloneSource.m_aElementType )
,m_xContext( _cloneSource.m_xContext )
{
impl_createEventAttacher_nothrow();
}
void OInterfaceContainer::clonedFrom(const OInterfaceContainer& _cloneSource)
{
try
{
const Reference< XIndexAccess > xSourceHierarchy( const_cast< OInterfaceContainer* >( &_cloneSource ) );
const sal_Int32 nCount = xSourceHierarchy->getCount();
for ( sal_Int32 i=0; i<nCount; ++i )
{
Reference< XCloneable > xCloneable( xSourceHierarchy->getByIndex( i ), UNO_QUERY_THROW );
Reference< XInterface > xClone( xCloneable->createClone() );
insertByIndex( i, makeAny( xClone ) );
}
}
catch (const RuntimeException&)
{
throw;
}
catch (const Exception&)
{
throw WrappedTargetRuntimeException(
"Could not clone the given interface hierarchy.",
static_cast< XIndexContainer* >( const_cast< OInterfaceContainer* >( &_cloneSource ) ),
::cppu::getCaughtException()
);
}
}
void OInterfaceContainer::impl_createEventAttacher_nothrow()
{
try
{
m_xEventAttacher.set( ::comphelper::createEventAttacherManager( m_xContext ), UNO_SET_THROW );
}
catch( const Exception& )
{
DBG_UNHANDLED_EXCEPTION();
}
}
OInterfaceContainer::~OInterfaceContainer()
{
}
void OInterfaceContainer::disposing()
{
// dispose all elements
for (sal_Int32 i = m_aItems.size(); i > 0; --i)
{
Reference<XPropertySet> xSet(m_aItems[i - 1], UNO_QUERY);
if (xSet.is())
xSet->removePropertyChangeListener(PROPERTY_NAME, this);
// revoke event knittings
if ( m_xEventAttacher.is() )
{
m_xEventAttacher->detach( i - 1, Reference<XInterface>(xSet, UNO_QUERY) );
m_xEventAttacher->removeEntry( i - 1 );
}
Reference<XComponent> xComponent(xSet, UNO_QUERY);
if (xComponent.is())
xComponent->dispose();
}
m_aMap.clear();
m_aItems.clear();
css::lang::EventObject aEvt(static_cast<XContainer*>(this));
m_aContainerListeners.disposeAndClear(aEvt);
}
// XPersistObject
namespace
{
void lcl_saveEvents( ::std::vector< Sequence< ScriptEventDescriptor > >& _rSave,
const Reference< XEventAttacherManager >& _rxManager, const sal_Int32 _nItemCount )
{
OSL_ENSURE( _rxManager.is(), "lcl_saveEvents: invalid event attacher manager!" );
if ( !_rxManager.is() )
return;
// reserve the space needed
_rSave.reserve( _nItemCount );
// copy the events
for (sal_Int32 i=0; i<_nItemCount; ++i)
_rSave.push_back(_rxManager->getScriptEvents( i ));
}
void lcl_restoreEvents( const ::std::vector< Sequence< ScriptEventDescriptor > >& _rSave,
const Reference< XEventAttacherManager >& _rxManager )
{
OSL_ENSURE( _rxManager.is(), "lcl_restoreEvents: invalid event attacher manager!" );
if ( !_rxManager.is() )
return;
::std::vector< Sequence< ScriptEventDescriptor > >::const_iterator aLoop = _rSave.begin();
::std::vector< Sequence< ScriptEventDescriptor > >::const_iterator aEnd = _rSave.end();
for ( sal_Int32 i=0; aLoop != aEnd; ++aLoop, ++i )
{
_rxManager->revokeScriptEvents( i );
_rxManager->registerScriptEvents( i, *aLoop );
}
}
}
void SAL_CALL OInterfaceContainer::writeEvents(const Reference<XObjectOutputStream>& _rxOutStream)
{
// We're writing a document in SO 5.2 format (or even from earlier versions)
// -> convert the events from the new runtime format to the format of the 5.2 files
// but before, remember the current script events set for our children
::std::vector< Sequence< ScriptEventDescriptor > > aSave;
if ( m_xEventAttacher.is() )
lcl_saveEvents( aSave, m_xEventAttacher, m_aItems.size() );
transformEvents();
try
{
Reference<XMarkableStream> xMark(_rxOutStream, UNO_QUERY);
sal_Int32 nMark = xMark->createMark();
sal_Int32 nObjLen = 0;
_rxOutStream->writeLong(nObjLen);
Reference<XPersistObject> xScripts(m_xEventAttacher, UNO_QUERY);
if (xScripts.is())
xScripts->write(_rxOutStream);
// Determine length
nObjLen = xMark->offsetToMark(nMark) - 4;
xMark->jumpToMark(nMark);
_rxOutStream->writeLong(nObjLen);
xMark->jumpToFurthest();
xMark->deleteMark(nMark);
}
catch( const Exception& )
{
// restore the events
if ( m_xEventAttacher.is() )
lcl_restoreEvents( aSave, m_xEventAttacher );
throw;
}
// restore the events
if ( m_xEventAttacher.is() )
lcl_restoreEvents( aSave, m_xEventAttacher );
}
struct TransformEventTo52Format : public ::std::unary_function< ScriptEventDescriptor, void >
{
void operator()( ScriptEventDescriptor& _rDescriptor )
{
if ( _rDescriptor.ScriptType == "StarBasic" )
{ // it's a starbasic macro
sal_Int32 nPrefixLength = _rDescriptor.ScriptCode.indexOf( ':' );
if ( 0 <= nPrefixLength )
{ // the macro name does not already contain a :
#ifdef DBG_UTIL
const OUString sPrefix = _rDescriptor.ScriptCode.copy( 0, nPrefixLength );
DBG_ASSERT( sPrefix == "document"
|| sPrefix == "application",
"TransformEventTo52Format: invalid (unknown) prefix!" );
#endif
// cut the prefix
_rDescriptor.ScriptCode = _rDescriptor.ScriptCode.copy( nPrefixLength + 1 );
}
}
}
};
void OInterfaceContainer::transformEvents()
{
OSL_ENSURE( m_xEventAttacher.is(), "OInterfaceContainer::transformEvents: no event attacher manager!" );
if ( !m_xEventAttacher.is() )
return;
try
{
// loop through all our children
sal_Int32 nItems = m_aItems.size();
Sequence< ScriptEventDescriptor > aChildEvents;
for (sal_Int32 i=0; i<nItems; ++i)
{
// get the script events for this object
aChildEvents = m_xEventAttacher->getScriptEvents( i );
if ( aChildEvents.getLength() )
{
// the "iterators" for the events for this child
ScriptEventDescriptor* pChildEvents = aChildEvents.getArray();
ScriptEventDescriptor* pChildEventsEnd = pChildEvents + aChildEvents.getLength();
// do the transformation
::std::for_each( pChildEvents, pChildEventsEnd, TransformEventTo52Format() );
// revoke the script events
m_xEventAttacher->revokeScriptEvents( i );
// and re-register them
m_xEventAttacher->registerScriptEvents( i, aChildEvents );
}
}
}
catch( const Exception& )
{
DBG_UNHANDLED_EXCEPTION();
}
}
void SAL_CALL OInterfaceContainer::readEvents(const Reference<XObjectInputStream>& _rxInStream)
{
::osl::MutexGuard aGuard( m_rMutex );
// Read scripting info
Reference<XMarkableStream> xMark(_rxInStream, UNO_QUERY);
sal_Int32 nObjLen = _rxInStream->readLong();
if (nObjLen)
{
sal_Int32 nMark = xMark->createMark();
Reference<XPersistObject> xObj(m_xEventAttacher, UNO_QUERY);
if (xObj.is())
xObj->read(_rxInStream);
xMark->jumpToMark(nMark);
_rxInStream->skipBytes(nObjLen);
xMark->deleteMark(nMark);
}
// Read Attachment
if ( m_xEventAttacher.is() )
{
OInterfaceArray::const_iterator aAttach = m_aItems.begin();
OInterfaceArray::const_iterator aAttachEnd = m_aItems.end();
for ( sal_Int32 i=0; aAttach != aAttachEnd; ++aAttach, ++i )
{
Reference< XInterface > xAsIFace( *aAttach, UNO_QUERY ); // important to normalize this ....
Reference< XPropertySet > xAsSet( xAsIFace, UNO_QUERY );
m_xEventAttacher->attach( i, xAsIFace, makeAny( xAsSet ) );
}
}
}
void SAL_CALL OInterfaceContainer::write( const Reference< XObjectOutputStream >& _rxOutStream )
{
::osl::MutexGuard aGuard( m_rMutex );
sal_Int32 nLen = m_aItems.size();
// Write length
_rxOutStream->writeLong(nLen);
if (nLen)
{
// 1. Version
_rxOutStream->writeShort(0x0001);
// 2. Objects
for (sal_Int32 i = 0; i < nLen; i++)
{
Reference<XPersistObject> xObj(m_aItems[i], UNO_QUERY);
if (xObj.is())
_rxOutStream->writeObject(xObj);
else
{
// Error
}
}
// 3. Scripts
writeEvents(_rxOutStream);
}
}
namespace
{
Reference< XPersistObject > lcl_createPlaceHolder( const Reference< XComponentContext >& _rxORB )
{
Reference< XPersistObject > xObject( _rxORB->getServiceManager()->createInstanceWithContext(FRM_COMPONENT_HIDDENCONTROL, _rxORB), UNO_QUERY );
DBG_ASSERT( xObject.is(), "lcl_createPlaceHolder: could not create a substitute for the unknown object!" );
if ( xObject.is() )
{
// set some properties describing what we did
Reference< XPropertySet > xObjProps( xObject, UNO_QUERY );
if ( xObject.is() )
{
try
{
xObjProps->setPropertyValue( PROPERTY_NAME, makeAny( FRM_RES_STRING( RID_STR_CONTROL_SUBSTITUTED_NAME ) ) );
xObjProps->setPropertyValue( PROPERTY_TAG, makeAny( FRM_RES_STRING( RID_STR_CONTROL_SUBSTITUTED_EPXPLAIN ) ) );
}
catch(const Exception&)
{
}
}
}
return xObject;
}
}
void SAL_CALL OInterfaceContainer::read( const Reference< XObjectInputStream >& _rxInStream )
{
::osl::MutexGuard aGuard( m_rMutex );
// after ::read the object is expected to be in the state it was when ::write was called, so we have
// to empty ourself here
while (getCount())
removeByIndex(0);
// Only writes depending on the length
sal_Int32 nLen = _rxInStream->readLong();
if (nLen)
{
// 1. Version
sal_uInt16 nVersion = _rxInStream->readShort(); (void)nVersion;
// 2. Objects
for (sal_Int32 i = 0; i < nLen; i++)
{
Reference<XPersistObject> xObj;
try
{
xObj = _rxInStream->readObject();
}
catch(const WrongFormatException&)
{
// the object could not be read
// create a object (so the readEvents below will assign the events to the right controls)
xObj = lcl_createPlaceHolder( m_xContext );
if ( !xObj.is() )
// couldn't handle it
throw;
}
catch(const Exception&)
{
// Clear the map
while (!m_aItems.empty())
removeElementsNoEvents();
// Rethrow the exception
throw;
}
if ( xObj.is() )
{
Reference< XPropertySet > xElement( xObj, UNO_QUERY );
try
{
implInsert(
m_aItems.size(), // position
xElement, // element to insert
false, // no event attacher manager handling
nullptr, // not yet approved - let implInsert do it
true // fire the event
);
}
catch( const Exception& )
{
SAL_WARN("forms.misc", "OInterfaceContainerHelper2::read: reading succeeded, but not inserting!" );
// create a placeholder
xElement.set(lcl_createPlaceHolder( m_xContext ), css::uno::UNO_QUERY);
if ( !xElement.is() )
// couldn't handle it
throw;
// insert the placeholder
implInsert( m_aItems.size(), xElement, false, nullptr, true );
}
}
}
readEvents(_rxInStream);
}
else
{
try
{
m_xEventAttacher = ::comphelper::createEventAttacherManager( m_xContext );
OSL_ENSURE( m_xEventAttacher.is(), "OInterfaceContainer::read: could not create an event attacher manager!" );
}
catch( const Exception& )
{
DBG_UNHANDLED_EXCEPTION();
}
}
}
// XContainer
void SAL_CALL OInterfaceContainer::addContainerListener(const Reference<XContainerListener>& _rxListener)
{
m_aContainerListeners.addInterface(_rxListener);
}
void SAL_CALL OInterfaceContainer::removeContainerListener(const Reference<XContainerListener>& _rxListener)
{
m_aContainerListeners.removeInterface(_rxListener);
}
// XEventListener
void SAL_CALL OInterfaceContainer::disposing(const css::lang::EventObject& _rSource)
{
::osl::MutexGuard aGuard( m_rMutex );
Reference< XInterface > xSource( _rSource.Source, UNO_QUERY );
// normalized source
OInterfaceArray::iterator j;
for ( j = m_aItems.begin(); j != m_aItems.end(); ++j )
{
DBG_ASSERT( j->get() == Reference< XInterface >( *j, UNO_QUERY ).get(),
"OInterfaceContainer::disposing: vector element not normalized!" );
if ( xSource.get() == j->get() )
// found the element
break;
}
if ( m_aItems.end() != j )
{
m_aItems.erase(j);
// look up in, and erase from, m_aMap, too
OInterfaceMap::iterator i = m_aMap.begin();
while ( i != m_aMap.end() )
{
DBG_ASSERT( i->second.get() == Reference< XInterface >( i->second, UNO_QUERY ).get(),
"OInterfaceContainer::disposing: map element not normalized!" );
if ( i->second.get() == xSource.get() )
{
// found it
m_aMap.erase(i);
break;
}
++i;
DBG_ASSERT( i != m_aMap.end(), "OInterfaceContainer::disposing: inconsistency: the element was in m_aItems, but not in m_aMap!" );
}
}
}
// XPropertyChangeListener
void OInterfaceContainer::propertyChange(const PropertyChangeEvent& evt) {
if (evt.PropertyName == PROPERTY_NAME)
{
::osl::MutexGuard aGuard( m_rMutex );
OInterfaceMap::iterator i = m_aMap.find(::comphelper::getString(evt.OldValue));
if (i != m_aMap.end() && (*i).second != evt.Source)
{
css::uno::Reference<css::uno::XInterface> xCorrectType((*i).second);
m_aMap.erase(i);
m_aMap.insert(::std::pair<const OUString, css::uno::Reference<css::uno::XInterface> >(::comphelper::getString(evt.NewValue),xCorrectType));
}
}
}
// XElementAccess
sal_Bool SAL_CALL OInterfaceContainer::hasElements()
{
return !m_aMap.empty();
}
Type SAL_CALL OInterfaceContainer::getElementType()
{
return m_aElementType;
}
// XEnumerationAccess
Reference<XEnumeration> SAL_CALL OInterfaceContainer::createEnumeration()
{
::osl::MutexGuard aGuard( m_rMutex );
return new ::comphelper::OEnumerationByIndex(static_cast<XIndexAccess*>(this));
}
// XNameAccess
Any SAL_CALL OInterfaceContainer::getByName( const OUString& _rName )
{
::std::pair <OInterfaceMap::iterator,
OInterfaceMap::iterator> aPair = m_aMap.equal_range(_rName);
if (aPair.first == aPair.second)
throw NoSuchElementException();
return (*aPair.first).second->queryInterface( m_aElementType );
}
css::uno::Sequence<OUString> SAL_CALL OInterfaceContainer::getElementNames()
{
return comphelper::mapKeysToSequence(m_aMap);
}
sal_Bool SAL_CALL OInterfaceContainer::hasByName( const OUString& _rName )
{
::std::pair <OInterfaceMap::iterator,
OInterfaceMap::iterator> aPair = m_aMap.equal_range(_rName);
return aPair.first != aPair.second;
}
// XIndexAccess
sal_Int32 OInterfaceContainer::getCount()
{
return m_aItems.size();
}
Any OInterfaceContainer::getByIndex(sal_Int32 _nIndex)
{
if (_nIndex < 0 || (_nIndex >= (sal_Int32)m_aItems.size()))
throw IndexOutOfBoundsException();
return m_aItems[_nIndex]->queryInterface( m_aElementType );
}
void OInterfaceContainer::approveNewElement( const Reference< XPropertySet >& _rxObject, ElementDescription* _pElement )
{
// it has to be non-NULL
if ( !_rxObject.is() )
throw IllegalArgumentException(FRM_RES_STRING(RID_STR_NEED_NON_NULL_OBJECT), static_cast<XContainer*>(this), 1);
// it has to support our element type interface
Any aCorrectType = _rxObject->queryInterface( m_aElementType );
if ( !aCorrectType.hasValue() )
lcl_throwIllegalArgumentException();
// it has to have a "Name" property
if ( !hasProperty( PROPERTY_NAME, _rxObject ) )
lcl_throwIllegalArgumentException();
// it has to be a child, and it must not have a parent already
Reference< XChild > xChild( _rxObject, UNO_QUERY );
if ( !xChild.is() || xChild->getParent().is() )
{
lcl_throwIllegalArgumentException();
}
// passed all tests. cache the information we have so far
DBG_ASSERT( _pElement, "OInterfaceContainer::approveNewElement: invalid event descriptor!" );
if ( _pElement )
{
_pElement->xPropertySet = _rxObject;
_pElement->xChild = xChild;
_pElement->aElementTypeInterface = aCorrectType;
_pElement->xInterface = Reference< XInterface >( _rxObject, UNO_QUERY ); // normalized XInterface
}
}
void OInterfaceContainer::implInsert(sal_Int32 _nIndex, const Reference< XPropertySet >& _rxElement,
bool _bEvents, ElementDescription* _pApprovalResult, bool _bFire )
{
const bool bHandleEvents = _bEvents && m_xEventAttacher.is();
// SYNCHRONIZED ----->
::osl::ClearableMutexGuard aGuard( m_rMutex );
std::unique_ptr< ElementDescription > aAutoDeleteMetaData;
ElementDescription* pElementMetaData = _pApprovalResult;
if ( !pElementMetaData )
{ // not yet approved by the caller -> do ourself
pElementMetaData = createElementMetaData();
DBG_ASSERT( pElementMetaData, "OInterfaceContainer::implInsert: createElementMetaData returned nonsense!" );
// ensure that the meta data structure will be deleted later on
aAutoDeleteMetaData.reset( pElementMetaData );
// will throw an exception if necessary
approveNewElement( _rxElement, pElementMetaData );
}
// approveNewElement (no matter if called here or outside) has ensure that all relevant interfaces
// exist
// set the name, and add as change listener for the name
OUString sName;
_rxElement->getPropertyValue(PROPERTY_NAME) >>= sName;
_rxElement->addPropertyChangeListener(PROPERTY_NAME, this);
// insert the object into our internal structures
if (_nIndex > (sal_Int32)m_aItems.size()) // Calculate the actual index
{
_nIndex = m_aItems.size();
m_aItems.push_back( pElementMetaData->xInterface );
}
else
m_aItems.insert( m_aItems.begin() + _nIndex, pElementMetaData->xInterface );
m_aMap.insert( ::std::pair< const OUString, css::uno::Reference<css::uno::XInterface> >( sName, pElementMetaData->xInterface ) );
// announce ourself as parent to the new element
pElementMetaData->xChild->setParent(static_cast<XContainer*>(this));
// handle the events
if ( bHandleEvents )
{
m_xEventAttacher->insertEntry(_nIndex);
m_xEventAttacher->attach( _nIndex, pElementMetaData->xInterface, makeAny( _rxElement ) );
}
// notify derived classes
implInserted( pElementMetaData );
aGuard.clear();
// <----- SYNCHRONIZED
// insert faked VBA events?
bool bHandleVbaEvents = false;
try
{
_rxElement->getPropertyValue("GenerateVbaEvents") >>= bHandleVbaEvents;
}
catch( const Exception& )
{
}
if ( bHandleVbaEvents )
{
Reference< XEventAttacherManager > xMgr ( pElementMetaData->xInterface, UNO_QUERY );
OInterfaceContainer* pIfcMgr = xMgr.is() ? dynamic_cast<OInterfaceContainer*>(xMgr.get()) : nullptr;
if (pIfcMgr)
{
sal_Int32 nLen = pIfcMgr->getCount();
for (sal_Int32 i = 0; i < nLen; ++i)
{
// add fake events to the control at index i
pIfcMgr->impl_addVbEvents_nolck_nothrow( i );
}
}
else
{
// add fake events to the control at index i
impl_addVbEvents_nolck_nothrow( _nIndex );
}
}
// fire the notification about the change
if ( _bFire )
{
// notify listeners
ContainerEvent aEvt;
aEvt.Source = static_cast<XContainer*>(this);
aEvt.Accessor <<= _nIndex;
aEvt.Element = pElementMetaData->aElementTypeInterface;
aGuard.clear();
m_aContainerListeners.notifyEach( &XContainerListener::elementInserted, aEvt );
}
}
void OInterfaceContainer::removeElementsNoEvents()
{
OInterfaceArray::iterator i = m_aItems.begin();
css::uno::Reference<css::uno::XInterface> xElement(*i);
OInterfaceMap::iterator j = m_aMap.begin();
while (j != m_aMap.end() && (*j).second != xElement) ++j;
m_aItems.erase(i);
m_aMap.erase(j);
Reference<XPropertySet> xSet(xElement, UNO_QUERY);
if (xSet.is())
xSet->removePropertyChangeListener(PROPERTY_NAME, this);
Reference<XChild> xChild(xElement, UNO_QUERY);
if (xChild.is())
xChild->setParent(css::uno::Reference<css::uno::XInterface> ());
}
void OInterfaceContainer::implInserted( const ElementDescription* /*_pElement*/ )
{
// not inrerested in
}
void OInterfaceContainer::implRemoved( const css::uno::Reference<css::uno::XInterface>& /*_rxObject*/ )
{
// not inrerested in
}
void OInterfaceContainer::impl_replacedElement( const ContainerEvent& _rEvent, ::osl::ClearableMutexGuard& _rInstanceLock )
{
_rInstanceLock.clear();
m_aContainerListeners.notifyEach( &XContainerListener::elementReplaced, _rEvent );
}
// XIndexContainer
void SAL_CALL OInterfaceContainer::insertByIndex( sal_Int32 _nIndex, const Any& _rElement )
{
Reference< XPropertySet > xElement;
_rElement >>= xElement;
implInsert( _nIndex, xElement, true /* event handling */ , nullptr /* not yet approved */ , true /* notification */ );
}
void OInterfaceContainer::implReplaceByIndex( const sal_Int32 _nIndex, const Any& _rNewElement, ::osl::ClearableMutexGuard& _rClearBeforeNotify )
{
OSL_PRECOND( ( _nIndex >= 0 ) && ( _nIndex < (sal_Int32)m_aItems.size() ), "OInterfaceContainer::implReplaceByIndex: precondition not met (index)!" );
// approve the new object
std::unique_ptr< ElementDescription > aElementMetaData( createElementMetaData() );
DBG_ASSERT( aElementMetaData.get(), "OInterfaceContainer::implReplaceByIndex: createElementMetaData returned nonsense!" );
{
Reference< XPropertySet > xElementProps;
_rNewElement >>= xElementProps;
approveNewElement( xElementProps, aElementMetaData.get() );
}
// get the old element
css::uno::Reference<css::uno::XInterface> xOldElement( m_aItems[ _nIndex ] );
DBG_ASSERT( xOldElement.get() == Reference< XInterface >( xOldElement, UNO_QUERY ).get(),
"OInterfaceContainer::implReplaceByIndex: elements should be held normalized!" );
// locate the old element in the map
OInterfaceMap::iterator j = m_aMap.begin();
while ( ( j != m_aMap.end() ) && ( j->second.get() != xOldElement.get() ) )
++j;
// remove event knittings
if ( m_xEventAttacher.is() )
{
css::uno::Reference<css::uno::XInterface> xNormalized( xOldElement, UNO_QUERY );
m_xEventAttacher->detach( _nIndex, xNormalized );
m_xEventAttacher->removeEntry( _nIndex );
}
// don't listen for property changes anymore
Reference<XPropertySet> xSet( xOldElement, UNO_QUERY );
if (xSet.is())
xSet->removePropertyChangeListener(PROPERTY_NAME, this);
// give the old element a new (void) parent
Reference<XChild> xChild(xOldElement, UNO_QUERY);
if (xChild.is())
xChild->setParent(css::uno::Reference<css::uno::XInterface> ());
// remove the old one
m_aMap.erase(j);
// examine the new element
OUString sName;
DBG_ASSERT( aElementMetaData.get()->xPropertySet.is(), "OInterfaceContainer::implReplaceByIndex: what did approveNewElement do?" );
aElementMetaData.get()->xPropertySet->getPropertyValue(PROPERTY_NAME) >>= sName;
aElementMetaData.get()->xPropertySet->addPropertyChangeListener(PROPERTY_NAME, this);
// insert the new one
m_aMap.insert( ::std::pair<const OUString, css::uno::Reference<css::uno::XInterface> >( sName, aElementMetaData.get()->xInterface ) );
m_aItems[ _nIndex ] = aElementMetaData.get()->xInterface;
aElementMetaData.get()->xChild->setParent(static_cast<XContainer*>(this));
if ( m_xEventAttacher.is() )
{
m_xEventAttacher->insertEntry( _nIndex );
m_xEventAttacher->attach( _nIndex, aElementMetaData.get()->xInterface, makeAny( aElementMetaData.get()->xPropertySet ) );
}
ContainerEvent aReplaceEvent;
aReplaceEvent.Source = static_cast< XContainer* >( this );
aReplaceEvent.Accessor <<= _nIndex;
aReplaceEvent.Element = aElementMetaData.get()->xInterface->queryInterface( m_aElementType );
aReplaceEvent.ReplacedElement = xOldElement->queryInterface( m_aElementType );
impl_replacedElement( aReplaceEvent, _rClearBeforeNotify );
}
void OInterfaceContainer::implCheckIndex( const sal_Int32 _nIndex )
{
if (_nIndex < 0 || _nIndex >= (sal_Int32)m_aItems.size())
throw IndexOutOfBoundsException();
}
void SAL_CALL OInterfaceContainer::replaceByIndex(sal_Int32 _nIndex, const Any& Element)
{
::osl::ClearableMutexGuard aGuard( m_rMutex );
// check the index
implCheckIndex( _nIndex );
// do the replace
implReplaceByIndex( _nIndex, Element, aGuard );
}
void OInterfaceContainer::implRemoveByIndex( const sal_Int32 _nIndex, ::osl::ClearableMutexGuard& _rClearBeforeNotify )
{
OSL_PRECOND( ( _nIndex >= 0 ) && ( _nIndex < (sal_Int32)m_aItems.size() ), "OInterfaceContainer::implRemoveByIndex: precondition not met (index)!" );
OInterfaceArray::iterator i = m_aItems.begin() + _nIndex;
css::uno::Reference<css::uno::XInterface> xElement(*i);
OInterfaceMap::iterator j = m_aMap.begin();
while (j != m_aMap.end() && (*j).second != xElement) ++j;
m_aItems.erase(i);
m_aMap.erase(j);
// remove event knittings
if ( m_xEventAttacher.is() )
{
css::uno::Reference<css::uno::XInterface> xNormalized( xElement, UNO_QUERY );
m_xEventAttacher->detach( _nIndex, xNormalized );
m_xEventAttacher->removeEntry( _nIndex );
}
Reference<XPropertySet> xSet(xElement, UNO_QUERY);
if (xSet.is())
xSet->removePropertyChangeListener(PROPERTY_NAME, this);
Reference<XChild> xChild(xElement, UNO_QUERY);
if (xChild.is())
xChild->setParent(css::uno::Reference<css::uno::XInterface> ());
// notify derived classes
implRemoved(xElement);
// notify listeners
ContainerEvent aEvt;
aEvt.Source = static_cast<XContainer*>(this);
aEvt.Element = xElement->queryInterface( m_aElementType );
aEvt.Accessor <<= _nIndex;
_rClearBeforeNotify.clear();
m_aContainerListeners.notifyEach( &XContainerListener::elementRemoved, aEvt );
}
void SAL_CALL OInterfaceContainer::removeByIndex(sal_Int32 _nIndex)
{
::osl::ClearableMutexGuard aGuard( m_rMutex );
// check the index
implCheckIndex( _nIndex );
// do the removal
implRemoveByIndex( _nIndex, aGuard );
}
ElementDescription* OInterfaceContainer::createElementMetaData( )
{
return new ElementDescription;
}
void SAL_CALL OInterfaceContainer::insertByName(const OUString& _rName, const Any& _rElement)
{
Reference< XPropertySet > xElementProps;
std::unique_ptr< ElementDescription > aElementMetaData( createElementMetaData() );
DBG_ASSERT( aElementMetaData.get(), "OInterfaceContainer::insertByName: createElementMetaData returned nonsense!" );
// ensure the correct name of the element
try
{
_rElement >>= xElementProps;
approveNewElement( xElementProps, aElementMetaData.get() );
xElementProps->setPropertyValue( PROPERTY_NAME, makeAny( _rName ) );
}
catch( const IllegalArgumentException& )
{
throw; // allowed to leave
}
catch( const ElementExistException& )
{
throw; // allowed to leave
}
catch( const Exception& )
{
SAL_WARN("forms.misc", "OInterfaceContainer::insertByName: caught an exception!" );
}
implInsert( m_aItems.size(), xElementProps, true, aElementMetaData.get(), true );
}
void SAL_CALL OInterfaceContainer::replaceByName(const OUString& Name, const Any& Element)
{
::osl::ClearableMutexGuard aGuard( m_rMutex );
::std::pair <OInterfaceMap::iterator,
OInterfaceMap::iterator> aPair = m_aMap.equal_range(Name);
if (aPair.first == aPair.second)
throw NoSuchElementException();
if (Element.getValueType().getTypeClass() != TypeClass_INTERFACE)
lcl_throwIllegalArgumentException();
Reference<XPropertySet> xSet;
Element >>= xSet;
if (xSet.is())
{
if (!hasProperty(PROPERTY_NAME, xSet))
lcl_throwIllegalArgumentException();
xSet->setPropertyValue(PROPERTY_NAME, makeAny(Name));
}
// determine the element pos
sal_Int32 nPos = ::std::find(m_aItems.begin(), m_aItems.end(), (*aPair.first).second) - m_aItems.begin();
implReplaceByIndex( nPos, Element, aGuard );
}
void SAL_CALL OInterfaceContainer::removeByName(const OUString& Name)
{
::osl::MutexGuard aGuard( m_rMutex );
::std::pair <OInterfaceMap::iterator,
OInterfaceMap::iterator> aPair = m_aMap.equal_range(Name);
if (aPair.first == aPair.second)
throw NoSuchElementException();
sal_Int32 nPos = ::std::find(m_aItems.begin(), m_aItems.end(), (*aPair.first).second) - m_aItems.begin();
removeByIndex(nPos);
}
// XEventAttacherManager
void SAL_CALL OInterfaceContainer::registerScriptEvent( sal_Int32 nIndex, const ScriptEventDescriptor& aScriptEvent )
{
::osl::ClearableMutexGuard aGuard( m_rMutex );
if ( m_xEventAttacher.is() )
{
m_xEventAttacher->registerScriptEvent( nIndex, aScriptEvent );
aGuard.clear();
impl_addVbEvents_nolck_nothrow( nIndex ); // add fake vba events
}
}
void SAL_CALL OInterfaceContainer::registerScriptEvents( sal_Int32 nIndex, const Sequence< ScriptEventDescriptor >& aScriptEvents )
{
::osl::ClearableMutexGuard aGuard( m_rMutex );
if ( m_xEventAttacher.is() )
{
m_xEventAttacher->registerScriptEvents( nIndex, aScriptEvents );
aGuard.clear();
impl_addVbEvents_nolck_nothrow( nIndex ); // add fake vba events
}
}
void SAL_CALL OInterfaceContainer::revokeScriptEvent( sal_Int32 nIndex, const OUString& aListenerType, const OUString& aEventMethod, const OUString& aRemoveListenerParam )
{
if ( m_xEventAttacher.is() )
m_xEventAttacher->revokeScriptEvent( nIndex, aListenerType, aEventMethod, aRemoveListenerParam );
}
void SAL_CALL OInterfaceContainer::revokeScriptEvents( sal_Int32 nIndex )
{
if ( m_xEventAttacher.is() )
m_xEventAttacher->revokeScriptEvents( nIndex );
}
void SAL_CALL OInterfaceContainer::insertEntry( sal_Int32 nIndex )
{
if ( m_xEventAttacher.is() )
m_xEventAttacher->insertEntry( nIndex );
}
void SAL_CALL OInterfaceContainer::removeEntry( sal_Int32 nIndex )
{
if ( m_xEventAttacher.is() )
m_xEventAttacher->removeEntry( nIndex );
}
Sequence< ScriptEventDescriptor > SAL_CALL OInterfaceContainer::getScriptEvents( sal_Int32 nIndex )
{
Sequence< ScriptEventDescriptor > aReturn;
if ( m_xEventAttacher.is() )
{
aReturn = m_xEventAttacher->getScriptEvents( nIndex );
if ( lcl_hasVbaEvents( aReturn ) )
{
aReturn = lcl_stripVbaEvents( aReturn );
}
}
return aReturn;
}
void SAL_CALL OInterfaceContainer::attach( sal_Int32 nIndex, const Reference< XInterface >& xObject, const Any& aHelper )
{
if ( m_xEventAttacher.is() )
m_xEventAttacher->attach( nIndex, xObject, aHelper );
}
void SAL_CALL OInterfaceContainer::detach( sal_Int32 nIndex, const Reference< XInterface >& xObject )
{
if ( m_xEventAttacher.is() )
m_xEventAttacher->detach( nIndex, xObject );
}
void SAL_CALL OInterfaceContainer::addScriptListener( const Reference< XScriptListener >& xListener )
{
if ( m_xEventAttacher.is() )
m_xEventAttacher->addScriptListener( xListener );
}
void SAL_CALL OInterfaceContainer::removeScriptListener( const Reference< XScriptListener >& xListener )
{
if ( m_xEventAttacher.is() )
m_xEventAttacher->removeScriptListener( xListener );
}
//= OFormComponents
Any SAL_CALL OFormComponents::queryAggregation(const Type& _rType)
{
Any aReturn = OFormComponents_BASE::queryInterface(_rType);
if (!aReturn.hasValue())
{
aReturn = OInterfaceContainer::queryInterface(_rType);
if (!aReturn.hasValue())
aReturn = FormComponentsBase::queryAggregation(_rType);
}
return aReturn;
}
Sequence<Type> SAL_CALL OFormComponents::getTypes()
{
return ::comphelper::concatSequences(OInterfaceContainer::getTypes(), FormComponentsBase::getTypes(), OFormComponents_BASE::getTypes());
}
OFormComponents::OFormComponents(const Reference<XComponentContext>& _rxFactory)
:FormComponentsBase( m_aMutex )
,OInterfaceContainer( _rxFactory, m_aMutex, cppu::UnoType<XFormComponent>::get() )
,OFormComponents_BASE()
{
}
OFormComponents::OFormComponents( const OFormComponents& _cloneSource )
:FormComponentsBase( m_aMutex )
,OInterfaceContainer( m_aMutex, _cloneSource )
,OFormComponents_BASE()
{
}
OFormComponents::~OFormComponents()
{
if (!FormComponentsBase::rBHelper.bDisposed)
{
acquire();
dispose();
}
}
// OComponentHelper
void OFormComponents::disposing()
{
OInterfaceContainer::disposing();
FormComponentsBase::disposing();
m_xParent = nullptr;
}
//XChild
void OFormComponents::setParent(const css::uno::Reference<css::uno::XInterface>& Parent)
{
::osl::MutexGuard aGuard( m_aMutex );
m_xParent = Parent;
}
css::uno::Reference<css::uno::XInterface> OFormComponents::getParent()
{
return m_xParent;
}
} // namespace frm
/* vim:set shiftwidth=4 softtabstop=4 expandtab: */