1 /************************************************************** 2 * 3 * Licensed to the Apache Software Foundation (ASF) under one 4 * or more contributor license agreements. See the NOTICE file 5 * distributed with this work for additional information 6 * regarding copyright ownership. The ASF licenses this file 7 * to you under the Apache License, Version 2.0 (the 8 * "License"); you may not use this file except in compliance 9 * with the License. You may obtain a copy of the License at 10 * 11 * http://www.apache.org/licenses/LICENSE-2.0 12 * 13 * Unless required by applicable law or agreed to in writing, 14 * software distributed under the License is distributed on an 15 * "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY 16 * KIND, either express or implied. See the License for the 17 * specific language governing permissions and limitations 18 * under the License. 19 * 20 *************************************************************/ 21 22 23 #ifndef PRIM_HXX 24 #define PRIM_HXX 25 26 #include "typelib/typedescription.h" 27 #ifndef _typelib_TypeClass_H_ 28 #include "typelib/typeclass.h" 29 #endif 30 #include "uno/sequence2.h" 31 #include "uno/any2.h" 32 #include "uno/data.h" 33 #include "uno/mapping.h" 34 #include "uno/dispatcher.h" 35 36 #ifndef _OSL_INTERLCK_H 37 #include "osl/interlck.h" 38 #endif 39 #include "osl/diagnose.h" 40 #ifndef _RTL_USTRING_HXX 41 #include "rtl/ustring.hxx" 42 #endif 43 #include "rtl/alloc.h" 44 45 #if OSL_DEBUG_LEVEL > 1 46 #include "rtl/ustrbuf.hxx" 47 #include "rtl/string.hxx" 48 #endif 49 50 51 namespace cppu 52 { 53 54 extern uno_Sequence g_emptySeq; 55 extern typelib_TypeDescriptionReference * g_pVoidType; 56 57 //-------------------------------------------------------------------------------------------------- 58 inline void * _map( 59 void * p, 60 typelib_TypeDescriptionReference * pType, typelib_TypeDescription * pTypeDescr, 61 uno_Mapping * mapping ) 62 SAL_THROW( () ) 63 { 64 void * pRet = 0; 65 if (p) 66 { 67 if (pTypeDescr) 68 { 69 (*mapping->mapInterface)( 70 mapping, &pRet, p, (typelib_InterfaceTypeDescription *)pTypeDescr ); 71 } 72 else 73 { 74 TYPELIB_DANGER_GET( &pTypeDescr, pType ); 75 (*mapping->mapInterface)( 76 mapping, &pRet, p, (typelib_InterfaceTypeDescription *)pTypeDescr ); 77 TYPELIB_DANGER_RELEASE( pTypeDescr ); 78 } 79 } 80 return pRet; 81 } 82 //-------------------------------------------------------------------------------------------------- 83 inline void _acquire( void * p, uno_AcquireFunc acquire ) SAL_THROW( () ) 84 { 85 if (p) 86 { 87 if (acquire) 88 { 89 (*acquire)( p ); 90 } 91 else 92 { 93 (*((uno_Interface *)p)->acquire)( (uno_Interface *)p ); 94 } 95 } 96 } 97 //-------------------------------------------------------------------------------------------------- 98 inline void _release( void * p, uno_ReleaseFunc release ) SAL_THROW( () ) 99 { 100 if (p) 101 { 102 if (release) 103 { 104 (*release)( p ); 105 } 106 else 107 { 108 (*((uno_Interface *)p)->release)( (uno_Interface *)p ); 109 } 110 } 111 } 112 113 //------------------------------------------------------------------------------ 114 inline sal_uInt32 calcSeqMemSize( 115 sal_Int32 nElementSize, sal_Int32 nElements ) 116 { 117 sal_uInt64 nSize = 118 (sal_uInt64) SAL_SEQUENCE_HEADER_SIZE + 119 ((sal_uInt64) nElementSize * (sal_uInt64) nElements); 120 if (nSize > 0xffffffffU) 121 return 0; 122 else 123 return (sal_uInt32) nSize; 124 } 125 126 //-------------------------------------------------------------------------------------------------- 127 inline uno_Sequence * createEmptySequence() SAL_THROW( () ) 128 { 129 ::osl_incrementInterlockedCount( &g_emptySeq.nRefCount ); 130 return &g_emptySeq; 131 } 132 //-------------------------------------------------------------------------------------------------- 133 inline typelib_TypeDescriptionReference * _getVoidType() 134 SAL_THROW( () ) 135 { 136 if (! g_pVoidType) 137 { 138 g_pVoidType = * ::typelib_static_type_getByTypeClass( typelib_TypeClass_VOID ); 139 } 140 ::typelib_typedescriptionreference_acquire( g_pVoidType ); 141 return g_pVoidType; 142 } 143 144 //-------------------------------------------------------------------------------------------------- 145 #if OSL_DEBUG_LEVEL > 0 146 #define CONSTRUCT_EMPTY_ANY( pAny ) \ 147 (pAny)->pType = _getVoidType(); \ 148 (pAny)->pData = (void *)0xdeadbeef; 149 #else 150 #define CONSTRUCT_EMPTY_ANY( pAny ) \ 151 (pAny)->pType = _getVoidType(); \ 152 (pAny)->pData = (pAny); 153 #endif 154 155 //-------------------------------------------------------------------------------------------------- 156 #define TYPE_ACQUIRE( pType ) \ 157 ::osl_incrementInterlockedCount( &(pType)->nRefCount ); 158 159 //-------------------------------------------------------------------------------------------------- 160 extern "C" void * binuno_queryInterface( 161 void * pUnoI, typelib_TypeDescriptionReference * pDestType ); 162 163 //-------------------------------------------------------------------------------------------------- 164 inline typelib_TypeDescriptionReference * _unionGetSetType( 165 void * pUnion, typelib_TypeDescription * pTD ) 166 SAL_THROW( () ) 167 { 168 typelib_TypeDescriptionReference * pRet = 0; 169 sal_Int32 nPos; 170 171 sal_Int64 * pDiscr = ((typelib_UnionTypeDescription *)pTD)->pDiscriminants; 172 sal_Int64 nDiscr = *(sal_Int64 *)pUnion; 173 for ( nPos = ((typelib_UnionTypeDescription *)pTD)->nMembers; nPos--; ) 174 { 175 if (pDiscr[nPos] == nDiscr) 176 { 177 pRet = ((typelib_UnionTypeDescription *)pTD)->ppTypeRefs[nPos]; 178 break; 179 } 180 } 181 if (nPos >= 0) 182 { 183 // default 184 pRet = ((typelib_UnionTypeDescription *)pTD)->pDefaultTypeRef; 185 } 186 typelib_typedescriptionreference_acquire( pRet ); 187 return pRet; 188 } 189 //-------------------------------------------------------------------------------------------------- 190 inline sal_Bool _type_equals( 191 typelib_TypeDescriptionReference * pType1, typelib_TypeDescriptionReference * pType2 ) 192 SAL_THROW( () ) 193 { 194 return (pType1 == pType2 || 195 (pType1->eTypeClass == pType2->eTypeClass && 196 pType1->pTypeName->length == pType2->pTypeName->length && 197 ::rtl_ustr_compare( pType1->pTypeName->buffer, pType2->pTypeName->buffer ) == 0)); 198 } 199 200 } 201 202 #endif 203