blob: d2ad76877efd5e4a02320e427cafe15cd3df8cc0 [file] [log] [blame]
/**************************************************************
*
* 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
*
* Unless required by applicable law or agreed to in writing,
* software distributed under the License is distributed on an
* "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
* KIND, either express or implied. See the License for the
* specific language governing permissions and limitations
* under the License.
*
*************************************************************/
#ifndef ASSIGN_HXX
#define ASSIGN_HXX
#include "prim.hxx"
#include "destr.hxx"
#include "constr.hxx"
#include "copy.hxx"
namespace cppu
{
//##################################################################################################
//#### assignment ##################################################################################
//##################################################################################################
//--------------------------------------------------------------------------------------------------
inline void _assignInterface(
void ** ppDest, void * pSource,
uno_AcquireFunc acquire, uno_ReleaseFunc release )
SAL_THROW( () )
{
_acquire( pSource, acquire );
void * const pToBeReleased = *ppDest;
*ppDest = pSource;
_release( pToBeReleased, release );
}
//--------------------------------------------------------------------------------------------------
inline void * _queryInterface(
void * pSource,
typelib_TypeDescriptionReference * pDestType,
uno_QueryInterfaceFunc queryInterface )
SAL_THROW( () )
{
if (pSource)
{
if (0 == queryInterface)
queryInterface = binuno_queryInterface;
pSource = (*queryInterface)( pSource, pDestType );
}
return pSource;
}
//==================================================================================================
sal_Bool assignStruct(
void * pDest, void * pSource,
typelib_CompoundTypeDescription * pTypeDescr,
uno_QueryInterfaceFunc queryInterface, uno_AcquireFunc acquire, uno_ReleaseFunc release )
SAL_THROW( () );
//--------------------------------------------------------------------------------------------------
inline sal_Bool _assignStruct(
void * pDest, void * pSource,
typelib_CompoundTypeDescription * pTypeDescr,
uno_QueryInterfaceFunc queryInterface, uno_AcquireFunc acquire, uno_ReleaseFunc release )
SAL_THROW( () )
{
if (pTypeDescr->pBaseTypeDescription)
{
// copy base value
if (! assignStruct( pDest, pSource, pTypeDescr->pBaseTypeDescription,
queryInterface, acquire, release ))
{
return sal_False;
}
}
// then copy members
typelib_TypeDescriptionReference ** ppTypeRefs = pTypeDescr->ppTypeRefs;
sal_Int32 * pMemberOffsets = pTypeDescr->pMemberOffsets;
sal_Int32 nDescr = pTypeDescr->nMembers;
while (nDescr--)
{
if (! ::uno_type_assignData( (char *)pDest + pMemberOffsets[nDescr],
ppTypeRefs[nDescr],
(char *)pSource + pMemberOffsets[nDescr],
ppTypeRefs[nDescr],
queryInterface, acquire, release ))
{
return sal_False;
}
}
return sal_True;
}
//--------------------------------------------------------------------------------------------------
inline sal_Bool _assignArray(
void * pDest, void * pSource,
typelib_ArrayTypeDescription * pTypeDescr,
uno_QueryInterfaceFunc queryInterface, uno_AcquireFunc acquire, uno_ReleaseFunc release )
{
typelib_TypeDescriptionReference * pElementTypeRef =
((typelib_IndirectTypeDescription *)pTypeDescr)->pType;
typelib_TypeDescription * pElementTypeDescr = NULL;
TYPELIB_DANGER_GET( &pElementTypeDescr, pElementTypeRef );
sal_Int32 nTotalElements = pTypeDescr->nTotalElements;
sal_Int32 nElementSize = pElementTypeDescr->nSize;
sal_Int32 i;
sal_Bool bRet = sal_False;
switch ( pElementTypeRef->eTypeClass )
{
case typelib_TypeClass_CHAR:
case typelib_TypeClass_BOOLEAN:
case typelib_TypeClass_BYTE:
case typelib_TypeClass_SHORT:
case typelib_TypeClass_UNSIGNED_SHORT:
case typelib_TypeClass_LONG:
case typelib_TypeClass_UNSIGNED_LONG:
case typelib_TypeClass_HYPER:
case typelib_TypeClass_UNSIGNED_HYPER:
case typelib_TypeClass_FLOAT:
case typelib_TypeClass_DOUBLE:
for (i=0; i < nTotalElements; i++)
{
::rtl_copyMemory((sal_Char *)pDest + i * nElementSize,
(sal_Char *)pSource + i * nElementSize,
nElementSize);
}
bRet = sal_True;
break;
case typelib_TypeClass_STRING:
for (i=0; i < nTotalElements; i++)
{
::rtl_uString_assign( (rtl_uString **)pDest + i,
((rtl_uString **)pSource)[i] );
}
bRet = sal_True;
break;
case typelib_TypeClass_TYPE:
for (i=0; i < nTotalElements; i++)
{
typelib_TypeDescriptionReference ** pp = (typelib_TypeDescriptionReference **)pDest + i;
::typelib_typedescriptionreference_release( *pp );
*pp = *((typelib_TypeDescriptionReference **)pSource + i);
TYPE_ACQUIRE( *pp );
}
bRet = sal_True;
break;
case typelib_TypeClass_ANY:
for (i=0; i < nTotalElements; i++)
{
_destructAny( (uno_Any *)pDest + i, release );
_copyConstructAny( (uno_Any *)pDest + i, (uno_Any *)pSource + i,
pElementTypeRef, pElementTypeDescr, acquire, 0 );
}
bRet = sal_True;
break;
case typelib_TypeClass_ENUM:
for (i=0; i < nTotalElements; i++)
{
*((sal_Int32 *)pDest + i) = *((sal_Int32 *)pSource + i);
}
bRet = sal_True;
break;
case typelib_TypeClass_STRUCT:
case typelib_TypeClass_EXCEPTION:
for (i=0; i < nTotalElements; i++)
{
bRet = _assignStruct( (sal_Char *)pDest + i * nElementSize,
(sal_Char *)pSource + i * nElementSize,
(typelib_CompoundTypeDescription *)pElementTypeDescr,
queryInterface, acquire, release );
if (! bRet)
break;
}
bRet = sal_True;
break;
case typelib_TypeClass_UNION:
for (i=0; i < nTotalElements; i++)
{
_destructUnion( (sal_Char*)pDest + i * nElementSize, pElementTypeDescr, release );
_copyConstructUnion( (sal_Char*)pDest + i * nElementSize,
(sal_Char*)pSource + i * nElementSize,
pElementTypeDescr, acquire, 0 );
}
bRet = sal_True;
break;
case typelib_TypeClass_SEQUENCE:
for (i=0; i < nTotalElements; i++)
{
::osl_incrementInterlockedCount(
&(*((uno_Sequence **)pSource + i))->nRefCount );
idestructSequence(
*((uno_Sequence **)pDest + i),
pElementTypeRef, pElementTypeDescr, release );
*((uno_Sequence **)pDest + i) = *((uno_Sequence **)pSource + i);
}
bRet = sal_True;
break;
case typelib_TypeClass_INTERFACE:
for (i=0; i < nTotalElements; i++)
{
_assignInterface(
(void **)((sal_Char*)pDest + i * nElementSize),
*(void **)((sal_Char*)pSource + i * nElementSize),
acquire, release );
}
bRet = sal_True;
break;
default:
OSL_ASSERT(false);
break;
}
TYPELIB_DANGER_RELEASE( pElementTypeDescr );
return bRet;
}
//--------------------------------------------------------------------------------------------------
inline sal_Bool _assignData(
void * pDest,
typelib_TypeDescriptionReference * pDestType, typelib_TypeDescription * pDestTypeDescr,
void * pSource,
typelib_TypeDescriptionReference * pSourceType, typelib_TypeDescription * pSourceTypeDescr,
uno_QueryInterfaceFunc queryInterface, uno_AcquireFunc acquire, uno_ReleaseFunc release )
SAL_THROW( () )
{
if (pDest == pSource)
return _type_equals( pDestType, pSourceType );
if (! pSource)
{
_destructData( pDest, pDestType, pDestTypeDescr, release );
_defaultConstructData( pDest, pDestType, pDestTypeDescr );
return sal_True;
}
while (typelib_TypeClass_ANY == pSourceType->eTypeClass)
{
pSourceTypeDescr = 0;
pSourceType = ((uno_Any *)pSource)->pType;
pSource = ((uno_Any *)pSource)->pData;
if (pDest == pSource)
return sal_True;
}
switch (pDestType->eTypeClass)
{
case typelib_TypeClass_VOID:
return pSourceType->eTypeClass == typelib_TypeClass_VOID;
case typelib_TypeClass_CHAR:
switch (pSourceType->eTypeClass)
{
case typelib_TypeClass_CHAR:
*(sal_Unicode *)pDest = *(sal_Unicode *)pSource;
return sal_True;
default:
return sal_False;
}
case typelib_TypeClass_BOOLEAN:
switch (pSourceType->eTypeClass)
{
case typelib_TypeClass_BOOLEAN:
*(sal_Bool *)pDest = (*(sal_Bool *)pSource != sal_False);
return sal_True;
default:
return sal_False;
}
case typelib_TypeClass_BYTE:
switch (pSourceType->eTypeClass)
{
case typelib_TypeClass_BYTE:
*(sal_Int8 *)pDest = *(sal_Int8 *)pSource;
return sal_True;
default:
return sal_False;
}
case typelib_TypeClass_SHORT:
switch (pSourceType->eTypeClass)
{
case typelib_TypeClass_BYTE:
*(sal_Int16 *)pDest = *(sal_Int8 *)pSource;
return sal_True;
case typelib_TypeClass_SHORT:
case typelib_TypeClass_UNSIGNED_SHORT:
*(sal_Int16 *)pDest = *(sal_Int16 *)pSource;
return sal_True;
default:
return sal_False;
}
case typelib_TypeClass_UNSIGNED_SHORT:
switch (pSourceType->eTypeClass)
{
case typelib_TypeClass_BYTE:
*(sal_uInt16 *)pDest = *(sal_Int8 *)pSource;
return sal_True;
case typelib_TypeClass_SHORT:
case typelib_TypeClass_UNSIGNED_SHORT:
*(sal_uInt16 *)pDest = *(sal_uInt16 *)pSource;
return sal_True;
default:
return sal_False;
}
case typelib_TypeClass_LONG:
switch (pSourceType->eTypeClass)
{
case typelib_TypeClass_BYTE:
*(sal_Int32 *)pDest = *(sal_Int8 *)pSource;
return sal_True;
case typelib_TypeClass_SHORT:
*(sal_Int32 *)pDest = *(sal_Int16 *)pSource;
return sal_True;
case typelib_TypeClass_UNSIGNED_SHORT:
*(sal_Int32 *)pDest = *(sal_uInt16 *)pSource;
return sal_True;
case typelib_TypeClass_LONG:
case typelib_TypeClass_UNSIGNED_LONG:
*(sal_Int32 *)pDest = *(sal_Int32 *)pSource;
return sal_True;
default:
return sal_False;
}
case typelib_TypeClass_UNSIGNED_LONG:
switch (pSourceType->eTypeClass)
{
case typelib_TypeClass_BYTE:
*(sal_uInt32 *)pDest = *(sal_Int8 *)pSource;
return sal_True;
case typelib_TypeClass_SHORT:
*(sal_uInt32 *)pDest = *(sal_Int16 *)pSource;
return sal_True;
case typelib_TypeClass_UNSIGNED_SHORT:
*(sal_uInt32 *)pDest = *(sal_uInt16 *)pSource;
return sal_True;
case typelib_TypeClass_LONG:
case typelib_TypeClass_UNSIGNED_LONG:
*(sal_uInt32 *)pDest = *(sal_uInt32 *)pSource;
return sal_True;
default:
return sal_False;
}
case typelib_TypeClass_HYPER:
switch (pSourceType->eTypeClass)
{
case typelib_TypeClass_BYTE:
*(sal_Int64 *)pDest = *(sal_Int8 *)pSource;
return sal_True;
case typelib_TypeClass_SHORT:
*(sal_Int64 *)pDest = *(sal_Int16 *)pSource;
return sal_True;
case typelib_TypeClass_UNSIGNED_SHORT:
*(sal_Int64 *)pDest = *(sal_uInt16 *)pSource;
return sal_True;
case typelib_TypeClass_LONG:
*(sal_Int64 *)pDest = *(sal_Int32 *)pSource;
return sal_True;
case typelib_TypeClass_UNSIGNED_LONG:
*(sal_Int64 *)pDest = *(sal_uInt32 *)pSource;
return sal_True;
case typelib_TypeClass_HYPER:
case typelib_TypeClass_UNSIGNED_HYPER:
*(sal_Int64 *)pDest = *(sal_Int64 *)pSource;
return sal_True;
default:
return sal_False;
}
case typelib_TypeClass_UNSIGNED_HYPER:
switch (pSourceType->eTypeClass)
{
case typelib_TypeClass_BYTE:
*(sal_uInt64 *)pDest = *(sal_Int8 *)pSource;
return sal_True;
case typelib_TypeClass_SHORT:
*(sal_uInt64 *)pDest = *(sal_Int16 *)pSource;
return sal_True;
case typelib_TypeClass_UNSIGNED_SHORT:
*(sal_uInt64 *)pDest = *(sal_uInt16 *)pSource;
return sal_True;
case typelib_TypeClass_LONG:
*(sal_uInt64 *)pDest = *(sal_Int32 *)pSource;
return sal_True;
case typelib_TypeClass_UNSIGNED_LONG:
*(sal_uInt64 *)pDest = *(sal_uInt32 *)pSource;
return sal_True;
case typelib_TypeClass_HYPER:
case typelib_TypeClass_UNSIGNED_HYPER:
*(sal_uInt64 *)pDest = *(sal_uInt64 *)pSource;
return sal_True;
default:
return sal_False;
}
case typelib_TypeClass_FLOAT:
switch (pSourceType->eTypeClass)
{
case typelib_TypeClass_BYTE:
*(float *)pDest = *(sal_Int8 *)pSource;
return sal_True;
case typelib_TypeClass_SHORT:
*(float *)pDest = *(sal_Int16 *)pSource;
return sal_True;
case typelib_TypeClass_UNSIGNED_SHORT:
*(float *)pDest = *(sal_uInt16 *)pSource;
return sal_True;
case typelib_TypeClass_FLOAT:
*(float *)pDest = *(float *)pSource;
return sal_True;
default:
return sal_False;
}
case typelib_TypeClass_DOUBLE:
switch (pSourceType->eTypeClass)
{
case typelib_TypeClass_BYTE:
*(double *)pDest = *(sal_Int8 *)pSource;
return sal_True;
case typelib_TypeClass_SHORT:
*(double *)pDest = *(sal_Int16 *)pSource;
return sal_True;
case typelib_TypeClass_UNSIGNED_SHORT:
*(double *)pDest = *(sal_uInt16 *)pSource;
return sal_True;
case typelib_TypeClass_LONG:
*(double *)pDest = *(sal_Int32 *)pSource;
return sal_True;
case typelib_TypeClass_UNSIGNED_LONG:
*(double *)pDest = *(sal_uInt32 *)pSource;
return sal_True;
case typelib_TypeClass_FLOAT:
*(double *)pDest = *(float *)pSource;
return sal_True;
case typelib_TypeClass_DOUBLE:
*(double *)pDest = *(double *)pSource;
return sal_True;
default:
return sal_False;
}
case typelib_TypeClass_STRING:
switch (pSourceType->eTypeClass)
{
case typelib_TypeClass_STRING:
::rtl_uString_assign( (rtl_uString **)pDest, *(rtl_uString **)pSource );
return sal_True;
default:
return sal_False;
}
case typelib_TypeClass_TYPE:
switch (pSourceType->eTypeClass)
{
case typelib_TypeClass_TYPE:
{
typelib_TypeDescriptionReference ** pp = (typelib_TypeDescriptionReference **)pDest;
::typelib_typedescriptionreference_release( *pp );
*pp = *(typelib_TypeDescriptionReference **)pSource;
TYPE_ACQUIRE( *pp );
return sal_True;
}
default:
return sal_False;
}
case typelib_TypeClass_ANY:
_destructAny( (uno_Any *)pDest, release );
_copyConstructAny( (uno_Any *)pDest, pSource, pSourceType, pSourceTypeDescr, acquire, 0 );
return sal_True;
case typelib_TypeClass_ENUM:
if (_type_equals( pDestType, pSourceType ))
{
*(sal_Int32 *)pDest = *(sal_Int32 *)pSource;
return sal_True;
}
return sal_False;
case typelib_TypeClass_STRUCT:
case typelib_TypeClass_EXCEPTION:
if (typelib_TypeClass_STRUCT == pSourceType->eTypeClass ||
typelib_TypeClass_EXCEPTION == pSourceType->eTypeClass)
{
sal_Bool bRet = sal_False;
if (pSourceTypeDescr)
{
typelib_CompoundTypeDescription * pTypeDescr =
(typelib_CompoundTypeDescription *)pSourceTypeDescr;
while (pTypeDescr &&
!_type_equals(
((typelib_TypeDescription *)pTypeDescr)->pWeakRef, pDestType ))
{
pTypeDescr = pTypeDescr->pBaseTypeDescription;
}
if (pTypeDescr)
{
bRet = _assignStruct(
pDest, pSource, pTypeDescr, queryInterface, acquire, release );
}
}
else
{
TYPELIB_DANGER_GET( &pSourceTypeDescr, pSourceType );
typelib_CompoundTypeDescription * pTypeDescr =
(typelib_CompoundTypeDescription *)pSourceTypeDescr;
while (pTypeDescr &&
!_type_equals(
((typelib_TypeDescription *)pTypeDescr)->pWeakRef, pDestType ))
{
pTypeDescr = pTypeDescr->pBaseTypeDescription;
}
if (pTypeDescr)
{
bRet = _assignStruct(
pDest, pSource, pTypeDescr, queryInterface, acquire, release );
}
TYPELIB_DANGER_RELEASE( pSourceTypeDescr );
}
return bRet;
}
return sal_False;
case typelib_TypeClass_ARRAY:
{
sal_Bool bRet = sal_False;
if (pSourceTypeDescr)
{
typelib_ArrayTypeDescription * pTypeDescr =
(typelib_ArrayTypeDescription *)pSourceTypeDescr;
bRet = _assignArray( pDest, pSource, pTypeDescr, queryInterface, acquire, release );
}
else
{
TYPELIB_DANGER_GET( &pSourceTypeDescr, pSourceType );
typelib_ArrayTypeDescription * pTypeDescr =
(typelib_ArrayTypeDescription *)pSourceTypeDescr;
if ( pTypeDescr )
{
bRet = _assignArray(
pDest, pSource, pTypeDescr, queryInterface, acquire, release );
}
TYPELIB_DANGER_RELEASE( pSourceTypeDescr );
}
return bRet;
}
case typelib_TypeClass_UNION:
if (_type_equals( pDestType, pSourceType ))
{
if (pDestTypeDescr)
{
_destructUnion( pDest, pDestTypeDescr, release );
_copyConstructUnion( pDest, pSource, pDestTypeDescr, acquire, 0 );
}
else
{
TYPELIB_DANGER_GET( &pDestTypeDescr, pDestType );
_destructUnion( pDest, pDestTypeDescr, release );
_copyConstructUnion( pDest, pSource, pDestTypeDescr, acquire, 0 );
TYPELIB_DANGER_RELEASE( pDestTypeDescr );
}
return sal_True;
}
return sal_False;
case typelib_TypeClass_SEQUENCE:
if (typelib_TypeClass_SEQUENCE != pSourceType->eTypeClass)
return sal_False;
// self assignment:
if (*(uno_Sequence **)pSource == *(uno_Sequence **)pDest)
return sal_True;
if (_type_equals( pDestType, pSourceType ))
{
::osl_incrementInterlockedCount(
&(*(uno_Sequence **)pSource)->nRefCount );
idestructSequence(
*(uno_Sequence **)pDest, pDestType, pDestTypeDescr, release );
*(uno_Sequence **)pDest = *(uno_Sequence **)pSource;
return sal_True;
}
return sal_False;
case typelib_TypeClass_INTERFACE:
if (typelib_TypeClass_INTERFACE != pSourceType->eTypeClass)
return sal_False;
if (_type_equals( pDestType, pSourceType ))
{
_assignInterface( (void **)pDest, *(void **)pSource, acquire, release );
return sal_True;
}
else if (*static_cast< void ** >(pSource) == 0)
{
// A null reference of any interface type can be converted to a null
// reference of any other interface type:
void * const pToBeReleased = *static_cast< void ** >(pDest);
*static_cast< void ** >(pDest) = 0;
_release( pToBeReleased, release );
return true;
}
else
{
if (pSourceTypeDescr)
{
typelib_TypeDescription * pTD = pSourceTypeDescr;
while (pTD && !_type_equals( pTD->pWeakRef, pDestType ))
{
pTD = (typelib_TypeDescription *)
((typelib_InterfaceTypeDescription *)pTD)->pBaseTypeDescription;
}
if (pTD) // is base of dest
{
_assignInterface( (void **)pDest, *(void **)pSource, acquire, release );
return true;
}
}
// query for interface:
void * pQueried = _queryInterface( *static_cast<void **>(pSource),
pDestType, queryInterface );
if (pQueried != 0) {
void * const pToBeReleased = *static_cast<void **>(pDest);
*static_cast<void **>(pDest) = pQueried;
_release( pToBeReleased, release );
}
return (pQueried != 0);
}
default:
OSL_ASSERT(false);
return sal_False;
}
}
}
#endif