1 /*************************************************************************
3 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
5 * Copyright 2008 by Sun Microsystems, Inc.
7 * OpenOffice.org - a multi-platform office productivity suite
9 * $RCSfile: except.cxx,v $
12 * This file is part of OpenOffice.org.
14 * OpenOffice.org is free software: you can redistribute it and/or modify
15 * it under the terms of the GNU Lesser General Public License version 3
16 * only, as published by the Free Software Foundation.
18 * OpenOffice.org is distributed in the hope that it will be useful,
19 * but WITHOUT ANY WARRANTY; without even the implied warranty of
20 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
21 * GNU Lesser General Public License version 3 for more details
22 * (a copy is included in the LICENSE file that accompanied this code).
24 * You should have received a copy of the GNU Lesser General Public License
25 * version 3 along with OpenOffice.org. If not, see
26 * <http://www.openoffice.org/license.html>
27 * for a copy of the LGPLv3 License.
29 ************************************************************************/
36 #include <rtl/strbuf.hxx>
37 #include <rtl/ustrbuf.hxx>
38 #include <osl/diagnose.h>
39 #include <osl/mutex.hxx>
41 #include <com/sun/star/uno/genfunc.hxx>
42 #include <typelib/typedescription.hxx>
48 using namespace ::std
;
49 using namespace ::osl
;
50 using namespace ::rtl
;
51 using namespace ::com::sun::star::uno
;
52 using namespace ::__cxxabiv1
;
55 namespace CPPU_CURRENT_NAMESPACE
58 void dummy_can_throw_anything( char const * )
62 //==================================================================================================
63 static OUString
toUNOname( char const * p
) SAL_THROW( () )
65 #if defined BRIDGES_DEBUG
66 char const * start
= p
;
69 // example: N3com3sun4star4lang24IllegalArgumentExceptionE
71 OUStringBuffer
buf( 64 );
72 OSL_ASSERT( 'N' == *p
);
78 long n
= (*p
++ - '0');
79 while ('0' <= *p
&& '9' >= *p
)
84 buf
.appendAscii( p
, n
);
87 buf
.append( (sal_Unicode
)'.' );
90 #if defined BRIDGES_DEBUG
91 OUString
ret( buf
.makeStringAndClear() );
92 OString
c_ret( OUStringToOString( ret
, RTL_TEXTENCODING_ASCII_US
) );
93 fprintf( stderr
, "> toUNOname(): %s => %s\n", start
, c_ret
.getStr() );
96 return buf
.makeStringAndClear();
100 //==================================================================================================
103 typedef hash_map
< OUString
, type_info
*, OUStringHash
> t_rtti_map
;
107 t_rtti_map m_generatedRttis
;
112 RTTI() SAL_THROW( () );
113 ~RTTI() SAL_THROW( () );
115 type_info
* getRTTI( typelib_CompoundTypeDescription
* ) SAL_THROW( () );
117 //__________________________________________________________________________________________________
118 RTTI::RTTI() SAL_THROW( () )
119 : m_hApp( dlopen( 0, RTLD_LAZY
) )
122 //__________________________________________________________________________________________________
123 RTTI::~RTTI() SAL_THROW( () )
128 //__________________________________________________________________________________________________
129 type_info
* RTTI::getRTTI( typelib_CompoundTypeDescription
*pTypeDescr
) SAL_THROW( () )
133 OUString
const & unoName
= *(OUString
const *)&pTypeDescr
->aBase
.pTypeName
;
135 MutexGuard
guard( m_mutex
);
136 t_rtti_map::const_iterator
iRttiFind( m_rttis
.find( unoName
) );
137 if (iRttiFind
== m_rttis
.end())
140 OStringBuffer
buf( 64 );
141 buf
.append( RTL_CONSTASCII_STRINGPARAM("_ZTIN") );
145 OUString
token( unoName
.getToken( 0, '.', index
) );
146 buf
.append( token
.getLength() );
147 OString
c_token( OUStringToOString( token
, RTL_TEXTENCODING_ASCII_US
) );
148 buf
.append( c_token
);
153 OString
symName( buf
.makeStringAndClear() );
154 rtti
= (type_info
*)dlsym( m_hApp
, symName
.getStr() );
158 pair
< t_rtti_map::iterator
, bool > insertion(
159 m_rttis
.insert( t_rtti_map::value_type( unoName
, rtti
) ) );
160 OSL_ENSURE( insertion
.second
, "### inserting new rtti failed?!" );
164 // try to lookup the symbol in the generated rtti map
165 t_rtti_map::const_iterator
iFind( m_generatedRttis
.find( unoName
) );
166 if (iFind
== m_generatedRttis
.end())
168 // we must generate it !
169 // symbol and rtti-name is nearly identical,
170 // the symbol is prefixed with _ZTI
171 char const * rttiName
= symName
.getStr() +4;
172 #if defined BRIDGES_DEBUG
173 fprintf( stderr
,"generated rtti for %s\n", rttiName
);
175 if (pTypeDescr
->pBaseTypeDescription
)
177 // ensure availability of base
178 type_info
* base_rtti
= getRTTI(
179 (typelib_CompoundTypeDescription
*)pTypeDescr
->pBaseTypeDescription
);
180 rtti
= new __si_class_type_info(
181 strdup( rttiName
), (__class_type_info
*)base_rtti
);
185 // this class has no base class
186 rtti
= new __class_type_info( strdup( rttiName
) );
189 pair
< t_rtti_map::iterator
, bool > insertion(
190 m_generatedRttis
.insert( t_rtti_map::value_type( unoName
, rtti
) ) );
191 OSL_ENSURE( insertion
.second
, "### inserting new generated rtti failed?!" );
193 else // taking already generated rtti
195 rtti
= iFind
->second
;
201 rtti
= iRttiFind
->second
;
207 //--------------------------------------------------------------------------------------------------
208 static void deleteException( void * pExc
)
210 __cxa_exception
const * header
= ((__cxa_exception
const *)pExc
- 1);
211 typelib_TypeDescription
* pTD
= 0;
212 OUString
unoName( toUNOname( header
->exceptionType
->name() ) );
213 ::typelib_typedescription_getByName( &pTD
, unoName
.pData
);
214 OSL_ENSURE( pTD
, "### unknown exception type! leaving out destruction => leaking!!!" );
217 ::uno_destructData( pExc
, pTD
, cpp_release
);
218 ::typelib_typedescription_release( pTD
);
222 //==================================================================================================
223 void raiseException( uno_Any
* pUnoExc
, uno_Mapping
* pUno2Cpp
)
225 #if defined BRIDGES_DEBUG
228 *reinterpret_cast< OUString
const * >( &pUnoExc
->pType
->pTypeName
),
229 RTL_TEXTENCODING_ASCII_US
) );
230 fprintf( stderr
, "> uno exception occured: %s\n", cstr
.getStr() );
236 // construct cpp exception object
237 typelib_TypeDescription
* pTypeDescr
= 0;
238 TYPELIB_DANGER_GET( &pTypeDescr
, pUnoExc
->pType
);
239 OSL_ASSERT( pTypeDescr
);
242 throw RuntimeException(
243 OUString( RTL_CONSTASCII_USTRINGPARAM("cannot get typedescription for type ") ) +
244 *reinterpret_cast< OUString
const * >( &pUnoExc
->pType
->pTypeName
),
245 Reference
< XInterface
>() );
248 pCppExc
= __cxa_allocate_exception( pTypeDescr
->nSize
);
249 ::uno_copyAndConvertData( pCppExc
, pUnoExc
->pData
, pTypeDescr
, pUno2Cpp
);
251 // destruct uno exception
252 ::uno_any_destruct( pUnoExc
, 0 );
253 // avoiding locked counts
254 static RTTI
* s_rtti
= 0;
257 MutexGuard
guard( Mutex::getGlobalMutex() );
260 #ifdef LEAK_STATIC_DATA
263 static RTTI rtti_data
;
268 rtti
= (type_info
*)s_rtti
->getRTTI( (typelib_CompoundTypeDescription
*) pTypeDescr
);
269 TYPELIB_DANGER_RELEASE( pTypeDescr
);
270 OSL_ENSURE( rtti
, "### no rtti for throwing exception!" );
273 throw RuntimeException(
274 OUString( RTL_CONSTASCII_USTRINGPARAM("no rtti for type ") ) +
275 *reinterpret_cast< OUString
const * >( &pUnoExc
->pType
->pTypeName
),
276 Reference
< XInterface
>() );
280 __cxa_throw( pCppExc
, rtti
, deleteException
);
283 //==================================================================================================
284 void fillUnoException( __cxa_exception
* header
, uno_Any
* pUnoExc
, uno_Mapping
* pCpp2Uno
)
288 RuntimeException
aRE(
289 OUString( RTL_CONSTASCII_USTRINGPARAM("no exception header!") ),
290 Reference
< XInterface
>() );
291 Type
const & rType
= ::getCppuType( &aRE
);
292 uno_type_any_constructAndConvert( pUnoExc
, &aRE
, rType
.getTypeLibType(), pCpp2Uno
);
294 OString
cstr( OUStringToOString( aRE
.Message
, RTL_TEXTENCODING_ASCII_US
) );
295 OSL_ENSURE( 0, cstr
.getStr() );
300 typelib_TypeDescription
* pExcTypeDescr
= 0;
301 OUString
unoName( toUNOname( header
->exceptionType
->name() ) );
302 #if defined BRIDGES_DEBUG
303 OString
cstr_unoName( OUStringToOString( unoName
, RTL_TEXTENCODING_ASCII_US
) );
304 fprintf( stderr
, "> c++ exception occured: %s\n", cstr_unoName
.getStr() );
306 typelib_typedescription_getByName( &pExcTypeDescr
, unoName
.pData
);
307 if (0 == pExcTypeDescr
)
309 RuntimeException
aRE(
310 OUString( RTL_CONSTASCII_USTRINGPARAM("exception type not found: ") ) + unoName
,
311 Reference
< XInterface
>() );
312 Type
const & rType
= ::getCppuType( &aRE
);
313 uno_type_any_constructAndConvert( pUnoExc
, &aRE
, rType
.getTypeLibType(), pCpp2Uno
);
315 OString
cstr( OUStringToOString( aRE
.Message
, RTL_TEXTENCODING_ASCII_US
) );
316 OSL_ENSURE( 0, cstr
.getStr() );
321 // construct uno exception any
322 uno_any_constructAndConvert( pUnoExc
, header
->adjustedPtr
, pExcTypeDescr
, pCpp2Uno
);
323 typelib_typedescription_release( pExcTypeDescr
);