995 lines
39 KiB
C++
995 lines
39 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_stoc.hxx"
|
|
|
|
#include <sal/config.h>
|
|
#ifdef SAL_UNX
|
|
#include <sal/alloca.h>
|
|
#endif
|
|
#if !(defined(MACOSX) || defined(FREEBSD))
|
|
#include <malloc.h>
|
|
#endif
|
|
#include <rtl/alloc.h>
|
|
#include <typelib/typedescription.hxx>
|
|
#include <uno/data.h>
|
|
|
|
#include "base.hxx"
|
|
|
|
#include "com/sun/star/lang/WrappedTargetRuntimeException.hpp"
|
|
#include "com/sun/star/uno/RuntimeException.hpp"
|
|
#include "cppuhelper/exc_hlp.hxx"
|
|
|
|
namespace stoc_corefl
|
|
{
|
|
|
|
//==================================================================================================
|
|
class IdlAttributeFieldImpl
|
|
: public IdlMemberImpl
|
|
, public XIdlField
|
|
, public XIdlField2
|
|
{
|
|
public:
|
|
typelib_InterfaceAttributeTypeDescription * getAttributeTypeDescr()
|
|
{ return (typelib_InterfaceAttributeTypeDescription *)getTypeDescr(); }
|
|
|
|
IdlAttributeFieldImpl( IdlReflectionServiceImpl * pReflection, const OUString & rName,
|
|
typelib_TypeDescription * pTypeDescr, typelib_TypeDescription * pDeclTypeDescr )
|
|
: IdlMemberImpl( pReflection, rName, pTypeDescr, pDeclTypeDescr )
|
|
{}
|
|
|
|
// XInterface
|
|
virtual Any SAL_CALL queryInterface( const Type & rType ) throw(::com::sun::star::uno::RuntimeException);
|
|
virtual void SAL_CALL acquire() throw();
|
|
virtual void SAL_CALL release() throw();
|
|
|
|
// XTypeProvider
|
|
virtual Sequence< Type > SAL_CALL getTypes() throw (::com::sun::star::uno::RuntimeException);
|
|
virtual Sequence< sal_Int8 > SAL_CALL getImplementationId() throw (::com::sun::star::uno::RuntimeException);
|
|
|
|
// XIdlMember
|
|
virtual Reference< XIdlClass > SAL_CALL getDeclaringClass() throw(::com::sun::star::uno::RuntimeException);
|
|
virtual OUString SAL_CALL getName() throw(::com::sun::star::uno::RuntimeException);
|
|
// XIdlField
|
|
virtual Reference< XIdlClass > SAL_CALL getType() throw(::com::sun::star::uno::RuntimeException);
|
|
virtual FieldAccessMode SAL_CALL getAccessMode() throw(::com::sun::star::uno::RuntimeException);
|
|
virtual Any SAL_CALL get( const Any & rObj ) throw(::com::sun::star::lang::IllegalArgumentException, ::com::sun::star::uno::RuntimeException);
|
|
virtual void SAL_CALL set( const Any & rObj, const Any & rValue ) throw(::com::sun::star::lang::IllegalArgumentException, ::com::sun::star::lang::IllegalAccessException, ::com::sun::star::uno::RuntimeException);
|
|
// XIdlField2: getType, getAccessMode and get are equal to XIdlField
|
|
virtual void SAL_CALL set( Any & rObj, const Any & rValue ) throw(::com::sun::star::lang::IllegalArgumentException, ::com::sun::star::lang::IllegalAccessException, ::com::sun::star::uno::RuntimeException);
|
|
|
|
private:
|
|
void checkException(
|
|
uno_Any * exception, Reference< XInterface > const & context);
|
|
};
|
|
|
|
// XInterface
|
|
//__________________________________________________________________________________________________
|
|
Any IdlAttributeFieldImpl::queryInterface( const Type & rType )
|
|
throw(::com::sun::star::uno::RuntimeException)
|
|
{
|
|
Any aRet( ::cppu::queryInterface( rType,
|
|
static_cast< XIdlField * >( this ),
|
|
static_cast< XIdlField2 * >( this ) ) );
|
|
return (aRet.hasValue() ? aRet : IdlMemberImpl::queryInterface( rType ));
|
|
}
|
|
//__________________________________________________________________________________________________
|
|
void IdlAttributeFieldImpl::acquire() throw()
|
|
{
|
|
IdlMemberImpl::acquire();
|
|
}
|
|
//__________________________________________________________________________________________________
|
|
void IdlAttributeFieldImpl::release() throw()
|
|
{
|
|
IdlMemberImpl::release();
|
|
}
|
|
|
|
// XTypeProvider
|
|
//__________________________________________________________________________________________________
|
|
Sequence< Type > IdlAttributeFieldImpl::getTypes()
|
|
throw (::com::sun::star::uno::RuntimeException)
|
|
{
|
|
static OTypeCollection * s_pTypes = 0;
|
|
if (! s_pTypes)
|
|
{
|
|
MutexGuard aGuard( getMutexAccess() );
|
|
if (! s_pTypes)
|
|
{
|
|
static OTypeCollection s_aTypes(
|
|
::getCppuType( (const Reference< XIdlField2 > *)0 ),
|
|
::getCppuType( (const Reference< XIdlField > *)0 ),
|
|
IdlMemberImpl::getTypes() );
|
|
s_pTypes = &s_aTypes;
|
|
}
|
|
}
|
|
return s_pTypes->getTypes();
|
|
}
|
|
//__________________________________________________________________________________________________
|
|
Sequence< sal_Int8 > IdlAttributeFieldImpl::getImplementationId()
|
|
throw (::com::sun::star::uno::RuntimeException)
|
|
{
|
|
static OImplementationId * s_pId = 0;
|
|
if (! s_pId)
|
|
{
|
|
MutexGuard aGuard( getMutexAccess() );
|
|
if (! s_pId)
|
|
{
|
|
static OImplementationId s_aId;
|
|
s_pId = &s_aId;
|
|
}
|
|
}
|
|
return s_pId->getImplementationId();
|
|
}
|
|
|
|
// XIdlMember
|
|
//__________________________________________________________________________________________________
|
|
Reference< XIdlClass > IdlAttributeFieldImpl::getDeclaringClass()
|
|
throw(::com::sun::star::uno::RuntimeException)
|
|
{
|
|
if (! _xDeclClass.is())
|
|
{
|
|
MutexGuard aGuard( getMutexAccess() );
|
|
if (! _xDeclClass.is())
|
|
{
|
|
rtl::OUString aName(getAttributeTypeDescr()->aBase.aBase.pTypeName);
|
|
sal_Int32 i = aName.indexOf(':');
|
|
OSL_ASSERT(i >= 0);
|
|
_xDeclClass = getReflection()->forName(aName.copy(0, i));
|
|
}
|
|
}
|
|
return _xDeclClass;
|
|
}
|
|
//__________________________________________________________________________________________________
|
|
OUString IdlAttributeFieldImpl::getName()
|
|
throw(::com::sun::star::uno::RuntimeException)
|
|
{
|
|
return IdlMemberImpl::getName();
|
|
}
|
|
|
|
// XIdlField
|
|
//__________________________________________________________________________________________________
|
|
Reference< XIdlClass > IdlAttributeFieldImpl::getType()
|
|
throw(::com::sun::star::uno::RuntimeException)
|
|
{
|
|
return getReflection()->forType(
|
|
getAttributeTypeDescr()->pAttributeTypeRef );
|
|
}
|
|
//__________________________________________________________________________________________________
|
|
FieldAccessMode IdlAttributeFieldImpl::getAccessMode()
|
|
throw(::com::sun::star::uno::RuntimeException)
|
|
{
|
|
return (((typelib_InterfaceAttributeTypeDescription *)getAttributeTypeDescr())->bReadOnly
|
|
? FieldAccessMode_READONLY : FieldAccessMode_READWRITE);
|
|
}
|
|
//__________________________________________________________________________________________________
|
|
Any IdlAttributeFieldImpl::get( const Any & rObj )
|
|
throw(::com::sun::star::lang::IllegalArgumentException, ::com::sun::star::uno::RuntimeException)
|
|
{
|
|
uno_Interface * pUnoI = getReflection()->mapToUno(
|
|
rObj, (typelib_InterfaceTypeDescription *)getDeclTypeDescr() );
|
|
OSL_ENSURE( pUnoI, "### illegal destination object given!" );
|
|
if (pUnoI)
|
|
{
|
|
TypeDescription aTD( getAttributeTypeDescr()->pAttributeTypeRef );
|
|
typelib_TypeDescription * pTD = aTD.get();
|
|
|
|
uno_Any aExc;
|
|
uno_Any * pExc = &aExc;
|
|
void * pReturn = alloca( pTD->nSize );
|
|
|
|
(*pUnoI->pDispatcher)( pUnoI, getTypeDescr(), pReturn, 0, &pExc );
|
|
(*pUnoI->release)( pUnoI );
|
|
|
|
checkException(
|
|
pExc,
|
|
*static_cast< Reference< XInterface > const * >(rObj.getValue()));
|
|
Any aRet;
|
|
uno_any_destruct(
|
|
&aRet, reinterpret_cast< uno_ReleaseFunc >(cpp_release) );
|
|
uno_any_constructAndConvert( &aRet, pReturn, pTD, getReflection()->getUno2Cpp().get() );
|
|
uno_destructData( pReturn, pTD, 0 );
|
|
return aRet;
|
|
}
|
|
throw IllegalArgumentException(
|
|
OUString( RTL_CONSTASCII_USTRINGPARAM("illegal object given!") ),
|
|
(XWeak *)(OWeakObject *)this, 0 );
|
|
}
|
|
//__________________________________________________________________________________________________
|
|
void IdlAttributeFieldImpl::set( Any & rObj, const Any & rValue )
|
|
throw(::com::sun::star::lang::IllegalArgumentException, ::com::sun::star::lang::IllegalAccessException, ::com::sun::star::uno::RuntimeException)
|
|
{
|
|
if (getAttributeTypeDescr()->bReadOnly)
|
|
{
|
|
throw IllegalAccessException(
|
|
OUString( RTL_CONSTASCII_USTRINGPARAM("cannot set readonly attribute!") ),
|
|
(XWeak *)(OWeakObject *)this );
|
|
}
|
|
|
|
uno_Interface * pUnoI = getReflection()->mapToUno(
|
|
rObj, (typelib_InterfaceTypeDescription *)getDeclTypeDescr() );
|
|
OSL_ENSURE( pUnoI, "### illegal destination object given!" );
|
|
if (pUnoI)
|
|
{
|
|
TypeDescription aTD( getAttributeTypeDescr()->pAttributeTypeRef );
|
|
typelib_TypeDescription * pTD = aTD.get();
|
|
|
|
// construct uno value to be set
|
|
void * pArgs[1];
|
|
void * pArg = pArgs[0] = alloca( pTD->nSize );
|
|
|
|
sal_Bool bAssign;
|
|
if (pTD->eTypeClass == typelib_TypeClass_ANY)
|
|
{
|
|
uno_copyAndConvertData( pArg, SAL_CONST_CAST( Any *, &rValue ),
|
|
pTD, getReflection()->getCpp2Uno().get() );
|
|
bAssign = sal_True;
|
|
}
|
|
else if (typelib_typedescriptionreference_equals( rValue.getValueTypeRef(), pTD->pWeakRef ))
|
|
{
|
|
uno_copyAndConvertData( pArg, SAL_CONST_CAST( void *, rValue.getValue() ),
|
|
pTD, getReflection()->getCpp2Uno().get() );
|
|
bAssign = sal_True;
|
|
}
|
|
else if (pTD->eTypeClass == typelib_TypeClass_INTERFACE)
|
|
{
|
|
Reference< XInterface > xObj;
|
|
bAssign = extract(
|
|
rValue, (typelib_InterfaceTypeDescription *)pTD, xObj,
|
|
getReflection() );
|
|
if (bAssign)
|
|
{
|
|
*(void **)pArg = getReflection()->getCpp2Uno().mapInterface(
|
|
xObj.get(), (typelib_InterfaceTypeDescription *)pTD );
|
|
}
|
|
}
|
|
else
|
|
{
|
|
typelib_TypeDescription * pValueTD = 0;
|
|
TYPELIB_DANGER_GET( &pValueTD, rValue.getValueTypeRef() );
|
|
// construct temp uno val to do proper assignment: todo opt
|
|
void * pTemp = alloca( pValueTD->nSize );
|
|
uno_copyAndConvertData(
|
|
pTemp, (void *)rValue.getValue(), pValueTD, getReflection()->getCpp2Uno().get() );
|
|
uno_constructData(
|
|
pArg, pTD );
|
|
// assignment does simple conversion
|
|
bAssign = uno_assignData(
|
|
pArg, pTD, pTemp, pValueTD, 0, 0, 0 );
|
|
uno_destructData(
|
|
pTemp, pValueTD, 0 );
|
|
TYPELIB_DANGER_RELEASE( pValueTD );
|
|
}
|
|
|
|
if (bAssign)
|
|
{
|
|
uno_Any aExc;
|
|
uno_Any * pExc = &aExc;
|
|
(*pUnoI->pDispatcher)( pUnoI, getTypeDescr(), 0, pArgs, &pExc );
|
|
(*pUnoI->release)( pUnoI );
|
|
|
|
uno_destructData( pArg, pTD, 0 );
|
|
checkException(
|
|
pExc,
|
|
*static_cast< Reference< XInterface > const * >(
|
|
rObj.getValue()));
|
|
return;
|
|
}
|
|
(*pUnoI->release)( pUnoI );
|
|
|
|
throw IllegalArgumentException(
|
|
OUString( RTL_CONSTASCII_USTRINGPARAM("illegal value given!") ),
|
|
*(const Reference< XInterface > *)rObj.getValue(), 1 );
|
|
}
|
|
throw IllegalArgumentException(
|
|
OUString( RTL_CONSTASCII_USTRINGPARAM("illegal destination object given!") ),
|
|
(XWeak *)(OWeakObject *)this, 0 );
|
|
}
|
|
//__________________________________________________________________________________________________
|
|
void IdlAttributeFieldImpl::set( const Any & rObj, const Any & rValue )
|
|
throw(::com::sun::star::lang::IllegalArgumentException, ::com::sun::star::lang::IllegalAccessException, ::com::sun::star::uno::RuntimeException)
|
|
{
|
|
IdlAttributeFieldImpl::set( const_cast< Any & >( rObj ), rValue );
|
|
}
|
|
|
|
void IdlAttributeFieldImpl::checkException(
|
|
uno_Any * exception, Reference< XInterface > const & context)
|
|
{
|
|
if (exception != 0) {
|
|
Any e;
|
|
uno_any_destruct(&e, reinterpret_cast< uno_ReleaseFunc >(cpp_release));
|
|
uno_type_any_constructAndConvert(
|
|
&e, exception->pData, exception->pType,
|
|
getReflection()->getUno2Cpp().get());
|
|
uno_any_destruct(exception, 0);
|
|
if (e.isExtractableTo(
|
|
getCppuType(static_cast< RuntimeException const * >(0))))
|
|
{
|
|
cppu::throwException(e);
|
|
} else {
|
|
throw WrappedTargetRuntimeException(
|
|
OUString(
|
|
RTL_CONSTASCII_USTRINGPARAM(
|
|
"non-RuntimeException occurred when accessing an"
|
|
" interface type attribute")),
|
|
context, e);
|
|
}
|
|
}
|
|
}
|
|
|
|
//##################################################################################################
|
|
//##################################################################################################
|
|
//##################################################################################################
|
|
|
|
|
|
//==================================================================================================
|
|
class IdlInterfaceMethodImpl
|
|
: public IdlMemberImpl
|
|
, public XIdlMethod
|
|
{
|
|
Sequence< Reference< XIdlClass > > * _pExceptionTypes;
|
|
Sequence< Reference< XIdlClass > > * _pParamTypes;
|
|
Sequence< ParamInfo > * _pParamInfos;
|
|
|
|
public:
|
|
typelib_InterfaceMethodTypeDescription * getMethodTypeDescr()
|
|
{ return (typelib_InterfaceMethodTypeDescription *)getTypeDescr(); }
|
|
|
|
IdlInterfaceMethodImpl( IdlReflectionServiceImpl * pReflection, const OUString & rName,
|
|
typelib_TypeDescription * pTypeDescr, typelib_TypeDescription * pDeclTypeDescr )
|
|
: IdlMemberImpl( pReflection, rName, pTypeDescr, pDeclTypeDescr )
|
|
, _pExceptionTypes( 0 )
|
|
, _pParamTypes( 0 )
|
|
, _pParamInfos( 0 )
|
|
{}
|
|
virtual ~IdlInterfaceMethodImpl();
|
|
|
|
// XInterface
|
|
virtual Any SAL_CALL queryInterface( const Type & rType ) throw(::com::sun::star::uno::RuntimeException);
|
|
virtual void SAL_CALL acquire() throw();
|
|
virtual void SAL_CALL release() throw();
|
|
|
|
// XTypeProvider
|
|
virtual Sequence< Type > SAL_CALL getTypes() throw (::com::sun::star::uno::RuntimeException);
|
|
virtual Sequence< sal_Int8 > SAL_CALL getImplementationId() throw (::com::sun::star::uno::RuntimeException);
|
|
|
|
// XIdlMember
|
|
virtual Reference< XIdlClass > SAL_CALL getDeclaringClass() throw(::com::sun::star::uno::RuntimeException);
|
|
virtual OUString SAL_CALL getName() throw(::com::sun::star::uno::RuntimeException);
|
|
// XIdlMethod
|
|
virtual Reference< XIdlClass > SAL_CALL getReturnType() throw(::com::sun::star::uno::RuntimeException);
|
|
virtual Sequence< Reference< XIdlClass > > SAL_CALL getParameterTypes() throw(::com::sun::star::uno::RuntimeException);
|
|
virtual Sequence< ParamInfo > SAL_CALL getParameterInfos() throw(::com::sun::star::uno::RuntimeException);
|
|
virtual Sequence< Reference< XIdlClass > > SAL_CALL getExceptionTypes() throw(::com::sun::star::uno::RuntimeException);
|
|
virtual MethodMode SAL_CALL getMode() throw(::com::sun::star::uno::RuntimeException);
|
|
virtual Any SAL_CALL invoke( const Any & rObj, Sequence< Any > & rArgs ) throw(::com::sun::star::lang::IllegalArgumentException, ::com::sun::star::reflection::InvocationTargetException, ::com::sun::star::uno::RuntimeException);
|
|
};
|
|
//__________________________________________________________________________________________________
|
|
IdlInterfaceMethodImpl::~IdlInterfaceMethodImpl()
|
|
{
|
|
delete _pParamInfos;
|
|
delete _pParamTypes;
|
|
delete _pExceptionTypes;
|
|
}
|
|
|
|
// XInterface
|
|
//__________________________________________________________________________________________________
|
|
Any IdlInterfaceMethodImpl::queryInterface( const Type & rType )
|
|
throw(::com::sun::star::uno::RuntimeException)
|
|
{
|
|
Any aRet( ::cppu::queryInterface( rType, static_cast< XIdlMethod * >( this ) ) );
|
|
return (aRet.hasValue() ? aRet : IdlMemberImpl::queryInterface( rType ));
|
|
}
|
|
//__________________________________________________________________________________________________
|
|
void IdlInterfaceMethodImpl::acquire() throw()
|
|
{
|
|
IdlMemberImpl::acquire();
|
|
}
|
|
//__________________________________________________________________________________________________
|
|
void IdlInterfaceMethodImpl::release() throw()
|
|
{
|
|
IdlMemberImpl::release();
|
|
}
|
|
|
|
// XTypeProvider
|
|
//__________________________________________________________________________________________________
|
|
Sequence< Type > IdlInterfaceMethodImpl::getTypes()
|
|
throw (::com::sun::star::uno::RuntimeException)
|
|
{
|
|
static OTypeCollection * s_pTypes = 0;
|
|
if (! s_pTypes)
|
|
{
|
|
MutexGuard aGuard( getMutexAccess() );
|
|
if (! s_pTypes)
|
|
{
|
|
static OTypeCollection s_aTypes(
|
|
::getCppuType( (const Reference< XIdlMethod > *)0 ),
|
|
IdlMemberImpl::getTypes() );
|
|
s_pTypes = &s_aTypes;
|
|
}
|
|
}
|
|
return s_pTypes->getTypes();
|
|
}
|
|
//__________________________________________________________________________________________________
|
|
Sequence< sal_Int8 > IdlInterfaceMethodImpl::getImplementationId()
|
|
throw (::com::sun::star::uno::RuntimeException)
|
|
{
|
|
static OImplementationId * s_pId = 0;
|
|
if (! s_pId)
|
|
{
|
|
MutexGuard aGuard( getMutexAccess() );
|
|
if (! s_pId)
|
|
{
|
|
static OImplementationId s_aId;
|
|
s_pId = &s_aId;
|
|
}
|
|
}
|
|
return s_pId->getImplementationId();
|
|
}
|
|
|
|
// XIdlMember
|
|
//__________________________________________________________________________________________________
|
|
Reference< XIdlClass > IdlInterfaceMethodImpl::getDeclaringClass()
|
|
throw(::com::sun::star::uno::RuntimeException)
|
|
{
|
|
if (! _xDeclClass.is())
|
|
{
|
|
MutexGuard aGuard( getMutexAccess() );
|
|
if (! _xDeclClass.is())
|
|
{
|
|
rtl::OUString aName(getMethodTypeDescr()->aBase.aBase.pTypeName);
|
|
sal_Int32 i = aName.indexOf(':');
|
|
OSL_ASSERT(i >= 0);
|
|
_xDeclClass = getReflection()->forName(aName.copy(0, i));
|
|
}
|
|
}
|
|
return _xDeclClass;
|
|
}
|
|
//__________________________________________________________________________________________________
|
|
OUString IdlInterfaceMethodImpl::getName()
|
|
throw(::com::sun::star::uno::RuntimeException)
|
|
{
|
|
return IdlMemberImpl::getName();
|
|
}
|
|
|
|
// XIdlMethod
|
|
//__________________________________________________________________________________________________
|
|
Reference< XIdlClass > SAL_CALL IdlInterfaceMethodImpl::getReturnType()
|
|
throw(::com::sun::star::uno::RuntimeException)
|
|
{
|
|
return getReflection()->forType( getMethodTypeDescr()->pReturnTypeRef );
|
|
}
|
|
//__________________________________________________________________________________________________
|
|
Sequence< Reference< XIdlClass > > IdlInterfaceMethodImpl::getExceptionTypes()
|
|
throw(::com::sun::star::uno::RuntimeException)
|
|
{
|
|
if (! _pExceptionTypes)
|
|
{
|
|
MutexGuard aGuard( getMutexAccess() );
|
|
if (! _pExceptionTypes)
|
|
{
|
|
sal_Int32 nExc = getMethodTypeDescr()->nExceptions;
|
|
Sequence< Reference< XIdlClass > > * pTempExceptionTypes =
|
|
new Sequence< Reference< XIdlClass > >( nExc );
|
|
Reference< XIdlClass > * pExceptionTypes = pTempExceptionTypes->getArray();
|
|
|
|
typelib_TypeDescriptionReference ** ppExc =
|
|
getMethodTypeDescr()->ppExceptions;
|
|
IdlReflectionServiceImpl * pRefl = getReflection();
|
|
|
|
while (nExc--)
|
|
pExceptionTypes[nExc] = pRefl->forType( ppExc[nExc] );
|
|
|
|
_pExceptionTypes = pTempExceptionTypes;
|
|
}
|
|
}
|
|
return *_pExceptionTypes;
|
|
}
|
|
//__________________________________________________________________________________________________
|
|
Sequence< Reference< XIdlClass > > IdlInterfaceMethodImpl::getParameterTypes()
|
|
throw(::com::sun::star::uno::RuntimeException)
|
|
{
|
|
if (! _pParamTypes)
|
|
{
|
|
MutexGuard aGuard( getMutexAccess() );
|
|
if (! _pParamTypes)
|
|
{
|
|
sal_Int32 nParams = getMethodTypeDescr()->nParams;
|
|
Sequence< Reference< XIdlClass > > * pTempParamTypes =
|
|
new Sequence< Reference< XIdlClass > >( nParams );
|
|
Reference< XIdlClass > * pParamTypes = pTempParamTypes->getArray();
|
|
|
|
typelib_MethodParameter * pTypelibParams =
|
|
getMethodTypeDescr()->pParams;
|
|
IdlReflectionServiceImpl * pRefl = getReflection();
|
|
|
|
while (nParams--)
|
|
pParamTypes[nParams] = pRefl->forType( pTypelibParams[nParams].pTypeRef );
|
|
|
|
_pParamTypes = pTempParamTypes;
|
|
}
|
|
}
|
|
return *_pParamTypes;
|
|
}
|
|
//__________________________________________________________________________________________________
|
|
Sequence< ParamInfo > IdlInterfaceMethodImpl::getParameterInfos()
|
|
throw(::com::sun::star::uno::RuntimeException)
|
|
{
|
|
if (! _pParamInfos)
|
|
{
|
|
MutexGuard aGuard( getMutexAccess() );
|
|
if (! _pParamInfos)
|
|
{
|
|
sal_Int32 nParams = getMethodTypeDescr()->nParams;
|
|
Sequence< ParamInfo > * pTempParamInfos = new Sequence< ParamInfo >( nParams );
|
|
ParamInfo * pParamInfos = pTempParamInfos->getArray();
|
|
|
|
typelib_MethodParameter * pTypelibParams =
|
|
getMethodTypeDescr()->pParams;
|
|
|
|
if (_pParamTypes) // use param types
|
|
{
|
|
const Reference< XIdlClass > * pParamTypes = _pParamTypes->getConstArray();
|
|
|
|
while (nParams--)
|
|
{
|
|
const typelib_MethodParameter & rParam = pTypelibParams[nParams];
|
|
ParamInfo & rInfo = pParamInfos[nParams];
|
|
rInfo.aName = rParam.pName;
|
|
if (rParam.bIn)
|
|
rInfo.aMode = (rParam.bOut ? ParamMode_INOUT : ParamMode_IN);
|
|
else
|
|
rInfo.aMode = ParamMode_OUT;
|
|
rInfo.aType = pParamTypes[nParams];
|
|
}
|
|
}
|
|
else // make also param types sequence if not already initialized
|
|
{
|
|
Sequence< Reference< XIdlClass > > * pTempParamTypes =
|
|
new Sequence< Reference< XIdlClass > >( nParams );
|
|
Reference< XIdlClass > * pParamTypes = pTempParamTypes->getArray();
|
|
|
|
IdlReflectionServiceImpl * pRefl = getReflection();
|
|
|
|
while (nParams--)
|
|
{
|
|
const typelib_MethodParameter & rParam = pTypelibParams[nParams];
|
|
ParamInfo & rInfo = pParamInfos[nParams];
|
|
rInfo.aName = rParam.pName;
|
|
if (rParam.bIn)
|
|
rInfo.aMode = (rParam.bOut ? ParamMode_INOUT : ParamMode_IN);
|
|
else
|
|
rInfo.aMode = ParamMode_OUT;
|
|
rInfo.aType = pParamTypes[nParams] = pRefl->forType( rParam.pTypeRef );
|
|
}
|
|
|
|
_pParamTypes = pTempParamTypes;
|
|
}
|
|
|
|
_pParamInfos = pTempParamInfos;
|
|
}
|
|
}
|
|
return *_pParamInfos;
|
|
}
|
|
//__________________________________________________________________________________________________
|
|
MethodMode SAL_CALL IdlInterfaceMethodImpl::getMode()
|
|
throw(::com::sun::star::uno::RuntimeException)
|
|
{
|
|
return
|
|
getMethodTypeDescr()->bOneWay ? MethodMode_ONEWAY : MethodMode_TWOWAY;
|
|
}
|
|
//__________________________________________________________________________________________________
|
|
Any SAL_CALL IdlInterfaceMethodImpl::invoke( const Any & rObj, Sequence< Any > & rArgs )
|
|
throw(::com::sun::star::lang::IllegalArgumentException,
|
|
::com::sun::star::reflection::InvocationTargetException,
|
|
::com::sun::star::uno::RuntimeException)
|
|
{
|
|
if (rObj.getValueTypeClass() == TypeClass_INTERFACE)
|
|
{
|
|
// acquire()/ release()
|
|
if (rtl_ustr_ascii_compare( getTypeDescr()->pTypeName->buffer,
|
|
"com.sun.star.uno.XInterface::acquire" ) == 0)
|
|
{
|
|
(*(const Reference< XInterface > *)rObj.getValue())->acquire();
|
|
return Any();
|
|
}
|
|
else if (rtl_ustr_ascii_compare( getTypeDescr()->pTypeName->buffer,
|
|
"com.sun.star.uno.XInterface::release" ) == 0)
|
|
{
|
|
(*(const Reference< XInterface > *)rObj.getValue())->release();
|
|
return Any();
|
|
}
|
|
}
|
|
|
|
uno_Interface * pUnoI = getReflection()->mapToUno(
|
|
rObj, (typelib_InterfaceTypeDescription *)getDeclTypeDescr() );
|
|
OSL_ENSURE( pUnoI, "### illegal destination object given!" );
|
|
if (pUnoI)
|
|
{
|
|
sal_Int32 nParams = getMethodTypeDescr()->nParams;
|
|
if (rArgs.getLength() != nParams)
|
|
{
|
|
(*pUnoI->release)( pUnoI );
|
|
throw IllegalArgumentException(
|
|
OUString( RTL_CONSTASCII_USTRINGPARAM("arguments len differ!") ),
|
|
*(const Reference< XInterface > *)rObj.getValue(), 1 );
|
|
}
|
|
|
|
Any * pCppArgs = rArgs.getArray();
|
|
typelib_MethodParameter * pParams = getMethodTypeDescr()->pParams;
|
|
typelib_TypeDescription * pReturnType = 0;
|
|
TYPELIB_DANGER_GET(
|
|
&pReturnType, getMethodTypeDescr()->pReturnTypeRef );
|
|
|
|
void * pUnoReturn = alloca( pReturnType->nSize );
|
|
void ** ppUnoArgs = (void **)alloca( sizeof(void *) * nParams *2 );
|
|
typelib_TypeDescription ** ppParamTypes = (typelib_TypeDescription **)(ppUnoArgs + nParams);
|
|
|
|
// convert arguments
|
|
for ( sal_Int32 nPos = 0; nPos < nParams; ++nPos )
|
|
{
|
|
ppParamTypes[nPos] = 0;
|
|
TYPELIB_DANGER_GET( ppParamTypes + nPos, pParams[nPos].pTypeRef );
|
|
typelib_TypeDescription * pTD = ppParamTypes[nPos];
|
|
|
|
ppUnoArgs[nPos] = alloca( pTD->nSize );
|
|
if (pParams[nPos].bIn)
|
|
{
|
|
sal_Bool bAssign;
|
|
if (typelib_typedescriptionreference_equals(
|
|
pCppArgs[nPos].getValueTypeRef(), pTD->pWeakRef ))
|
|
{
|
|
uno_type_copyAndConvertData(
|
|
ppUnoArgs[nPos], (void *)pCppArgs[nPos].getValue(),
|
|
pCppArgs[nPos].getValueTypeRef(), getReflection()->getCpp2Uno().get() );
|
|
bAssign = sal_True;
|
|
}
|
|
else if (pTD->eTypeClass == typelib_TypeClass_ANY)
|
|
{
|
|
uno_type_any_constructAndConvert(
|
|
(uno_Any *)ppUnoArgs[nPos], (void *)pCppArgs[nPos].getValue(),
|
|
pCppArgs[nPos].getValueTypeRef(), getReflection()->getCpp2Uno().get() );
|
|
bAssign = sal_True;
|
|
}
|
|
else if (pTD->eTypeClass == typelib_TypeClass_INTERFACE)
|
|
{
|
|
Reference< XInterface > xDest;
|
|
bAssign = extract(
|
|
pCppArgs[nPos], (typelib_InterfaceTypeDescription *)pTD,
|
|
xDest, getReflection() );
|
|
if (bAssign)
|
|
{
|
|
*(void **)ppUnoArgs[nPos] = getReflection()->getCpp2Uno().mapInterface(
|
|
xDest.get(), (typelib_InterfaceTypeDescription *)pTD );
|
|
}
|
|
}
|
|
else
|
|
{
|
|
typelib_TypeDescription * pValueTD = 0;
|
|
TYPELIB_DANGER_GET( &pValueTD, pCppArgs[nPos].getValueTypeRef() );
|
|
// construct temp uno val to do proper assignment: todo opt
|
|
void * pTemp = alloca( pValueTD->nSize );
|
|
uno_copyAndConvertData(
|
|
pTemp, (void *)pCppArgs[nPos].getValue(), pValueTD,
|
|
getReflection()->getCpp2Uno().get() );
|
|
uno_constructData(
|
|
ppUnoArgs[nPos], pTD );
|
|
// assignment does simple conversion
|
|
bAssign = uno_assignData(
|
|
ppUnoArgs[nPos], pTD, pTemp, pValueTD, 0, 0, 0 );
|
|
uno_destructData(
|
|
pTemp, pValueTD, 0 );
|
|
TYPELIB_DANGER_RELEASE( pValueTD );
|
|
}
|
|
|
|
if (! bAssign)
|
|
{
|
|
IllegalArgumentException aExc(
|
|
OUString( RTL_CONSTASCII_USTRINGPARAM("cannot coerce argument type during corereflection call!") ),
|
|
*(const Reference< XInterface > *)rObj.getValue(), (sal_Int16)nPos );
|
|
|
|
// cleanup
|
|
while (nPos--)
|
|
{
|
|
if (pParams[nPos].bIn)
|
|
uno_destructData( ppUnoArgs[nPos], ppParamTypes[nPos], 0 );
|
|
TYPELIB_DANGER_RELEASE( ppParamTypes[nPos] );
|
|
}
|
|
TYPELIB_DANGER_RELEASE( pReturnType );
|
|
(*pUnoI->release)( pUnoI );
|
|
|
|
throw aExc;
|
|
}
|
|
}
|
|
}
|
|
|
|
uno_Any aUnoExc;
|
|
uno_Any * pUnoExc = &aUnoExc;
|
|
|
|
(*pUnoI->pDispatcher)(
|
|
pUnoI, getTypeDescr(), pUnoReturn, ppUnoArgs, &pUnoExc );
|
|
(*pUnoI->release)( pUnoI );
|
|
|
|
Any aRet;
|
|
if (pUnoExc)
|
|
{
|
|
// cleanup
|
|
while (nParams--)
|
|
{
|
|
if (pParams[nParams].bIn)
|
|
uno_destructData( ppUnoArgs[nParams], ppParamTypes[nParams], 0 );
|
|
TYPELIB_DANGER_RELEASE( ppParamTypes[nParams] );
|
|
}
|
|
TYPELIB_DANGER_RELEASE( pReturnType );
|
|
|
|
InvocationTargetException aExc;
|
|
aExc.Context = *(const Reference< XInterface > *)rObj.getValue();
|
|
aExc.Message = OUString( RTL_CONSTASCII_USTRINGPARAM("exception occurred during invocation!") );
|
|
uno_any_destruct(
|
|
&aExc.TargetException,
|
|
reinterpret_cast< uno_ReleaseFunc >(cpp_release) );
|
|
uno_type_copyAndConvertData(
|
|
&aExc.TargetException, pUnoExc, ::getCppuType( (const Any *)0 ).getTypeLibType(),
|
|
getReflection()->getUno2Cpp().get() );
|
|
uno_any_destruct( pUnoExc, 0 );
|
|
throw aExc;
|
|
}
|
|
else
|
|
{
|
|
// reconvert arguments and cleanup
|
|
while (nParams--)
|
|
{
|
|
if (pParams[nParams].bOut) // write back
|
|
{
|
|
uno_any_destruct(
|
|
&pCppArgs[nParams],
|
|
reinterpret_cast< uno_ReleaseFunc >(cpp_release) );
|
|
uno_any_constructAndConvert(
|
|
&pCppArgs[nParams], ppUnoArgs[nParams], ppParamTypes[nParams],
|
|
getReflection()->getUno2Cpp().get() );
|
|
}
|
|
uno_destructData( ppUnoArgs[nParams], ppParamTypes[nParams], 0 );
|
|
TYPELIB_DANGER_RELEASE( ppParamTypes[nParams] );
|
|
}
|
|
uno_any_destruct(
|
|
&aRet, reinterpret_cast< uno_ReleaseFunc >(cpp_release) );
|
|
uno_any_constructAndConvert(
|
|
&aRet, pUnoReturn, pReturnType,
|
|
getReflection()->getUno2Cpp().get() );
|
|
uno_destructData( pUnoReturn, pReturnType, 0 );
|
|
TYPELIB_DANGER_RELEASE( pReturnType );
|
|
}
|
|
return aRet;
|
|
}
|
|
throw IllegalArgumentException(
|
|
OUString( RTL_CONSTASCII_USTRINGPARAM("illegal destination object given!") ),
|
|
(XWeak *)(OWeakObject *)this, 0 );
|
|
}
|
|
|
|
|
|
//##################################################################################################
|
|
//##################################################################################################
|
|
//##################################################################################################
|
|
|
|
|
|
//__________________________________________________________________________________________________
|
|
InterfaceIdlClassImpl::~InterfaceIdlClassImpl()
|
|
{
|
|
for ( sal_Int32 nPos = _nMethods + _nAttributes; nPos--; )
|
|
typelib_typedescription_release( _pSortedMemberInit[nPos].second );
|
|
|
|
delete [] _pSortedMemberInit;
|
|
}
|
|
|
|
//__________________________________________________________________________________________________
|
|
Sequence< Reference< XIdlClass > > InterfaceIdlClassImpl::getSuperclasses()
|
|
throw(::com::sun::star::uno::RuntimeException)
|
|
{
|
|
MutexGuard aGuard(getMutexAccess());
|
|
if (_xSuperClasses.getLength() == 0) {
|
|
typelib_InterfaceTypeDescription * pType = getTypeDescr();
|
|
_xSuperClasses.realloc(pType->nBaseTypes);
|
|
for (sal_Int32 i = 0; i < pType->nBaseTypes; ++i) {
|
|
_xSuperClasses[i] = getReflection()->forType(
|
|
&pType->ppBaseTypes[i]->aBase);
|
|
OSL_ASSERT(_xSuperClasses[i].is());
|
|
}
|
|
}
|
|
return Sequence< Reference< XIdlClass > >(_xSuperClasses);
|
|
}
|
|
//__________________________________________________________________________________________________
|
|
void InterfaceIdlClassImpl::initMembers()
|
|
{
|
|
sal_Int32 nAll = getTypeDescr()->nAllMembers;
|
|
MemberInit * pSortedMemberInit = new MemberInit[nAll];
|
|
typelib_TypeDescriptionReference ** ppAllMembers = getTypeDescr()->ppAllMembers;
|
|
|
|
for ( sal_Int32 nPos = 0; nPos < nAll; ++nPos )
|
|
{
|
|
sal_Int32 nIndex;
|
|
if (ppAllMembers[nPos]->eTypeClass == typelib_TypeClass_INTERFACE_METHOD)
|
|
{
|
|
// methods to front
|
|
nIndex = _nMethods;
|
|
++_nMethods;
|
|
}
|
|
else
|
|
{
|
|
++_nAttributes;
|
|
nIndex = (nAll - _nAttributes);
|
|
// attributes at the back
|
|
}
|
|
|
|
typelib_TypeDescription * pTD = 0;
|
|
typelib_typedescriptionreference_getDescription( &pTD, ppAllMembers[nPos] );
|
|
OSL_ENSURE( pTD, "### cannot get type description!" );
|
|
pSortedMemberInit[nIndex].first = ((typelib_InterfaceMemberTypeDescription *)pTD)->pMemberName;
|
|
pSortedMemberInit[nIndex].second = pTD;
|
|
}
|
|
|
|
_pSortedMemberInit = pSortedMemberInit;
|
|
}
|
|
//__________________________________________________________________________________________________
|
|
sal_Bool InterfaceIdlClassImpl::isAssignableFrom( const Reference< XIdlClass > & xType )
|
|
throw(::com::sun::star::uno::RuntimeException)
|
|
{
|
|
if (xType.is() && xType->getTypeClass() == TypeClass_INTERFACE)
|
|
{
|
|
if (equals( xType ))
|
|
return sal_True;
|
|
else
|
|
{
|
|
const Sequence< Reference< XIdlClass > > & rSeq = xType->getSuperclasses();
|
|
for (sal_Int32 i = 0; i < rSeq.getLength(); ++i) {
|
|
if (isAssignableFrom(rSeq[i])) {
|
|
return true;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
return sal_False;
|
|
}
|
|
//__________________________________________________________________________________________________
|
|
Uik InterfaceIdlClassImpl::getUik()
|
|
throw(::com::sun::star::uno::RuntimeException)
|
|
{
|
|
return Uik(0, 0, 0, 0, 0);
|
|
// Uiks are deprecated and this function must not be called
|
|
}
|
|
//__________________________________________________________________________________________________
|
|
Sequence< Reference< XIdlMethod > > InterfaceIdlClassImpl::getMethods()
|
|
throw(::com::sun::star::uno::RuntimeException)
|
|
{
|
|
MutexGuard aGuard( getMutexAccess() );
|
|
if (! _pSortedMemberInit)
|
|
initMembers();
|
|
|
|
// create methods sequence
|
|
Sequence< Reference< XIdlMethod > > aRet( _nMethods );
|
|
Reference< XIdlMethod > * pRet = aRet.getArray();
|
|
for ( sal_Int32 nPos = _nMethods; nPos--; )
|
|
{
|
|
|
|
/*_aName2Method[_pSortedMemberInit[nPos].first] = */pRet[nPos] = new IdlInterfaceMethodImpl(
|
|
getReflection(), _pSortedMemberInit[nPos].first,
|
|
_pSortedMemberInit[nPos].second, IdlClassImpl::getTypeDescr() );
|
|
}
|
|
return aRet;
|
|
}
|
|
//__________________________________________________________________________________________________
|
|
Sequence< Reference< XIdlField > > InterfaceIdlClassImpl::getFields()
|
|
throw(::com::sun::star::uno::RuntimeException)
|
|
{
|
|
MutexGuard aGuard( getMutexAccess() );
|
|
if (! _pSortedMemberInit)
|
|
initMembers();
|
|
|
|
// create fields sequence
|
|
Sequence< Reference< XIdlField > > aRet( _nAttributes );
|
|
Reference< XIdlField > * pRet = aRet.getArray();
|
|
for ( sal_Int32 nPos = _nAttributes; nPos--; )
|
|
{
|
|
/*_aName2Field[_pSortedMemberInit[_nMethods+nPos].first] = */pRet[_nAttributes-nPos-1] =
|
|
new IdlAttributeFieldImpl(
|
|
getReflection(), _pSortedMemberInit[_nMethods+nPos].first,
|
|
_pSortedMemberInit[_nMethods+nPos].second, IdlClassImpl::getTypeDescr() );
|
|
}
|
|
return aRet;
|
|
}
|
|
//__________________________________________________________________________________________________
|
|
Reference< XIdlMethod > InterfaceIdlClassImpl::getMethod( const OUString & rName )
|
|
throw(::com::sun::star::uno::RuntimeException)
|
|
{
|
|
MutexGuard aGuard( getMutexAccess() );
|
|
if (! _pSortedMemberInit)
|
|
initMembers();
|
|
|
|
Reference< XIdlMethod > xRet;
|
|
|
|
// try weak map
|
|
const OUString2Method::const_iterator iFind( _aName2Method.find( rName ) );
|
|
if (iFind != _aName2Method.end())
|
|
xRet = (*iFind).second; // harden ref
|
|
|
|
if (! xRet.is())
|
|
{
|
|
for ( sal_Int32 nPos = _nMethods; nPos--; )
|
|
{
|
|
if (_pSortedMemberInit[nPos].first == rName)
|
|
{
|
|
_aName2Method[rName] = xRet = new IdlInterfaceMethodImpl(
|
|
getReflection(), rName,
|
|
_pSortedMemberInit[nPos].second, IdlClassImpl::getTypeDescr() );
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
return xRet;
|
|
}
|
|
//__________________________________________________________________________________________________
|
|
Reference< XIdlField > InterfaceIdlClassImpl::getField( const OUString & rName )
|
|
throw(::com::sun::star::uno::RuntimeException)
|
|
{
|
|
MutexGuard aGuard( getMutexAccess() );
|
|
if (! _pSortedMemberInit)
|
|
initMembers();
|
|
|
|
Reference< XIdlField > xRet;
|
|
|
|
// try weak map
|
|
const OUString2Field::const_iterator iFind( _aName2Field.find( rName ) );
|
|
if (iFind != _aName2Field.end())
|
|
xRet = (*iFind).second; // harden ref
|
|
|
|
if (! xRet.is())
|
|
{
|
|
for ( sal_Int32 nPos = _nAttributes; nPos--; )
|
|
{
|
|
if (_pSortedMemberInit[_nMethods+nPos].first == rName)
|
|
{
|
|
_aName2Field[rName] = xRet = new IdlAttributeFieldImpl(
|
|
getReflection(), rName,
|
|
_pSortedMemberInit[_nMethods+nPos].second, IdlClassImpl::getTypeDescr() );
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
return xRet;
|
|
}
|
|
//__________________________________________________________________________________________________
|
|
void InterfaceIdlClassImpl::createObject( Any & rObj )
|
|
throw(::com::sun::star::uno::RuntimeException)
|
|
{
|
|
// interfaces cannot be constructed
|
|
rObj.clear();
|
|
}
|
|
|
|
}
|
|
|
|
|
|
/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
|