WIP: Experimental new binary type.rdb format

Implement theTypeDescriptionManager directly on top of unoidl::Manager and
unoidl::Provider in cppuhelper instead of on top of css.reflection UNO
interfaces in stoc.  Adapt desktop/source/deployment/ accordingly.

There is no longer a com.sun.star.reflection.TypeDescriptionManager service
implementation now, only a com.sun.star.reflection.theTypeDescriptionManager
singleton one, which appears to not cause problems in practice.

Change-Id: I179501272f0712353b7d50d3eba2ec2bb79db373

9 files changed, 0 insertions, 1723 deletions

diff --git a/stoc/Library_bootstrap.mk b/stoc/Library_bootstrap.mk
index 01e086b4c1c9..ab97a98d56fb 100644
--- a/stoc/Library_bootstrap.mk
+++ b/stoc/Library_bootstrap.mk
@@ -85,9 +85,6 @@ $(eval $(call gb_Library_add_exception_objects,bootstrap,\
     stoc/source/security/permissions \
     stoc/source/servicemanager/servicemanager \
     stoc/source/simpleregistry/simpleregistry \
-    stoc/source/tdmanager/tdmgr \
-    stoc/source/tdmanager/tdmgr_check \
-    stoc/source/tdmanager/tdmgr_tdenumeration \
 ))
 
 # vim:set noet sw=4 ts=4:
diff --git a/stoc/inc/bootstrapservices.hxx b/stoc/inc/bootstrapservices.hxx
index fb25ade9cc93..f476b3e19e0c 100644
--- a/stoc/inc/bootstrapservices.hxx
+++ b/stoc/inc/bootstrapservices.hxx
@@ -91,13 +91,6 @@ namespace stoc_bootstrap
     throw(::com::sun::star::uno::Exception);
     ::com::sun::star::uno::Sequence< ::rtl::OUString > rdbtdp_getSupportedServiceNames();
     ::rtl::OUString rdbtdp_getImplementationName();
-
-    //tdmanager
-    ::com::sun::star::uno::Reference< ::com::sun::star::uno::XInterface > SAL_CALL ManagerImpl_create(
-        const ::com::sun::star::uno::Reference< ::com::sun::star::uno::XComponentContext >& )
-    SAL_THROW( (::com::sun::star::uno::Exception) );
-    ::com::sun::star::uno::Sequence< ::rtl::OUString > SAL_CALL tdmgr_getSupportedServiceNames();
-    ::rtl::OUString SAL_CALL tdmgr_getImplementationName();
 } // namespace
 
 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/stoc/source/bootstrap/services.cxx b/stoc/source/bootstrap/services.cxx
index 56bcd1c87e33..25fef5a2b1df 100644
--- a/stoc/source/bootstrap/services.cxx
+++ b/stoc/source/bootstrap/services.cxx
@@ -96,12 +96,6 @@ static struct ImplementationEntry g_entries[] =
     rdbtdp_getSupportedServiceNames, createSingleComponentFactory,
     &g_moduleCount.modCnt , 0
     },
-    //tdmanager
-    {
-    ManagerImpl_create, tdmgr_getImplementationName,
-    tdmgr_getSupportedServiceNames, createSingleComponentFactory,
-    &g_moduleCount.modCnt , 0
-    },
     //end
     { 0, 0, 0, 0, 0, 0 }
 };
diff --git a/stoc/source/tdmanager/lrucache.hxx b/stoc/source/tdmanager/lrucache.hxx
deleted file mode 100644
index b7a6895a5808..000000000000
--- a/stoc/source/tdmanager/lrucache.hxx
+++ /dev/null
@@ -1,242 +0,0 @@
-/* -*- 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 .
- */
-#ifndef _LRU_CACHE_HXX_
-#define _LRU_CACHE_HXX_
-
-// __CACHE_DIAGNOSE forces cache size to 4 and works only for OUString keys
-//  #define __CACHE_DIAGNOSE 1
-
-#include <osl/mutex.hxx>
-#include "rtl/ustring.hxx"
-#include "sal/log.hxx"
-
-#include <boost/unordered_map.hpp>
-
-
-/** Implementation of a least recently used (lru) cache.
-    <br>
-    @author Daniel Boelzle
-*/
-template< class t_Key, class t_Val, class t_KeyHash, class t_KeyEqual >
-class LRU_Cache
-{
-    struct CacheEntry
-    {
-        t_Key               aKey;
-        t_Val               aVal;
-        CacheEntry *        pPred;
-        CacheEntry *        pSucc;
-    };
-    typedef ::boost::unordered_map< t_Key, CacheEntry *, t_KeyHash, t_KeyEqual > t_Key2Element;
-
-    mutable ::osl::Mutex        _aCacheMutex;
-    sal_Int32                   _nCachedElements;
-    t_Key2Element               _aKey2Element;
-
-    CacheEntry *                _pBlock;
-    mutable CacheEntry *        _pHead;
-    mutable CacheEntry *        _pTail;
-    inline void toFront( CacheEntry * pEntry ) const;
-
-public:
-    /** Constructor:
-        <br>
-        @param nCachedElements number of elements to be cached; default param set to 128
-    */
-    inline LRU_Cache( sal_Int32 nCachedElements = 128 );
-    /** Destructor: releases all cached elements and keys.
-        <br>
-    */
-    inline ~LRU_Cache();
-
-    /** Retrieves a value from the cache. Returns default constructed value,
-        if none was found.
-        <br>
-        @param rKey a key
-        @return value
-    */
-    inline t_Val getValue( t_Key const & rKey ) const;
-    /** Sets a value to be cached for given key.
-        <br>
-        @param rKey a key
-        @param rValue a value
-    */
-    inline void setValue( t_Key const & rKey, t_Val const & rValue );
-    /** Tests whether a value is cached for given key.
-        <br>
-        @param rKey a key
-        @return true, if value is cached
-    */
-    inline sal_Bool hasValue( t_Key const & rKey ) const;
-    /** Clears the cache, thus releasing all cached elements and keys.
-        <br>
-    */
-    inline void clear();
-};
-//__________________________________________________________________________________________________
-template< class t_Key, class t_Val, class t_KeyHash, class t_KeyEqual >
-inline LRU_Cache< t_Key, t_Val, t_KeyHash, t_KeyEqual >::LRU_Cache( sal_Int32 nCachedElements )
-#ifdef __CACHE_DIAGNOSE
-    : _nCachedElements( 4 )
-#else
-    : _nCachedElements( nCachedElements )
-#endif
-    , _pBlock( 0 )
-{
-    if (_nCachedElements > 0)
-    {
-        _pBlock = new CacheEntry[_nCachedElements];
-        _pHead  = _pBlock;
-        _pTail  = _pBlock + _nCachedElements -1;
-        for ( sal_Int32 nPos = _nCachedElements; nPos--; )
-        {
-            _pBlock[nPos].pPred = _pBlock + nPos -1;
-            _pBlock[nPos].pSucc = _pBlock + nPos +1;
-        }
-    }
-}
-//__________________________________________________________________________________________________
-template< class t_Key, class t_Val, class t_KeyHash, class t_KeyEqual >
-inline LRU_Cache< t_Key, t_Val, t_KeyHash, t_KeyEqual >::~LRU_Cache()
-{
-    delete [] _pBlock;
-}
-//__________________________________________________________________________________________________
-template< class t_Key, class t_Val, class t_KeyHash, class t_KeyEqual >
-inline void LRU_Cache< t_Key, t_Val, t_KeyHash, t_KeyEqual >::toFront(
-    CacheEntry * pEntry ) const
-{
-    if (pEntry != _pHead)
-    {
-        // cut out element
-        if (pEntry == _pTail)
-        {
-            _pTail = pEntry->pPred;
-        }
-        else
-        {
-            pEntry->pSucc->pPred = pEntry->pPred;
-            pEntry->pPred->pSucc = pEntry->pSucc;
-        }
-        // push to front
-        _pHead->pPred = pEntry;
-        pEntry->pSucc = _pHead;
-        _pHead        = pEntry;
-    }
-}
-//__________________________________________________________________________________________________
-template< class t_Key, class t_Val, class t_KeyHash, class t_KeyEqual >
-inline sal_Bool LRU_Cache< t_Key, t_Val, t_KeyHash, t_KeyEqual >::hasValue(
-    t_Key const & rKey ) const
-{
-    ::osl::MutexGuard aGuard( _aCacheMutex );
-    typename t_Key2Element::const_iterator const iFind( _aKey2Element.find( rKey ) );
-    return (iFind != _aKey2Element.end());
-}
-//__________________________________________________________________________________________________
-template< class t_Key, class t_Val, class t_KeyHash, class t_KeyEqual >
-inline t_Val LRU_Cache< t_Key, t_Val, t_KeyHash, t_KeyEqual >::getValue(
-    t_Key const & rKey ) const
-{
-    ::osl::MutexGuard aGuard( _aCacheMutex );
-    const typename t_Key2Element::const_iterator iFind( _aKey2Element.find( rKey ) );
-    if (iFind != _aKey2Element.end())
-    {
-        CacheEntry * pEntry = (*iFind).second;
-        toFront( pEntry );
-#ifdef __CACHE_DIAGNOSE
-        SAL_INFO("stoc.tdmanager", "> retrieved element \"" );
-        SAL_INFO("stoc.tdmanager", "" << pEntry->aKey);
-        SAL_INFO("stoc.tdmanager", "\" from cache <" );
-#endif
-        return pEntry->aVal;
-    }
-    return t_Val();
-}
-//__________________________________________________________________________________________________
-template< class t_Key, class t_Val, class t_KeyHash, class t_KeyEqual >
-inline void LRU_Cache< t_Key, t_Val, t_KeyHash, t_KeyEqual >::setValue(
-    t_Key const & rKey, t_Val const & rValue )
-{
-    if (_nCachedElements > 0)
-    {
-        ::osl::MutexGuard aGuard( _aCacheMutex );
-        typename t_Key2Element::const_iterator const iFind( _aKey2Element.find( rKey ) );
-
-        CacheEntry * pEntry;
-        if (iFind == _aKey2Element.end())
-        {
-            pEntry = _pTail; // erase last element
-#ifdef __CACHE_DIAGNOSE
-            if (pEntry->aKey.getLength())
-            {
-                SAL_INFO("stoc.tdmanager", "> kicking element \"" );
-                SAL_INFO("stoc.tdmanager", "" << pEntry->aKey);
-                SAL_INFO("stoc.tdmanager", "\" from cache <" );
-            }
-#endif
-            _aKey2Element.erase( pEntry->aKey );
-            _aKey2Element[ pEntry->aKey = rKey ] = pEntry;
-        }
-        else
-        {
-            pEntry = (*iFind).second;
-#ifdef __CACHE_DIAGNOSE
-            SAL_INFO("stoc.tdmanager", "> replacing element \"" );
-            SAL_INFO("stoc.tdmanager", "" << pEntry->aKey);
-            SAL_INFO("stoc.tdmanager", "\" in cache <" );
-#endif
-        }
-        pEntry->aVal = rValue;
-        toFront( pEntry );
-    }
-}
-//__________________________________________________________________________________________________
-template< class t_Key, class t_Val, class t_KeyHash, class t_KeyEqual >
-inline void LRU_Cache< t_Key, t_Val, t_KeyHash, t_KeyEqual >::clear()
-{
-    ::osl::MutexGuard aGuard( _aCacheMutex );
-    _aKey2Element.clear();
-    for ( sal_Int32 nPos = _nCachedElements; nPos--; )
-    {
-        _pBlock[nPos].aKey = t_Key();
-        _pBlock[nPos].aVal = t_Val();
-    }
-#ifdef __CACHE_DIAGNOSE
-    SAL_INFO("stoc.tdmanager", "> cleared cache <" );
-#endif
-}
-
-//==================================================================================================
-struct FctHashOUString : public ::std::unary_function< ::rtl::OUString const &, size_t >
-{
-    size_t operator()( ::rtl::OUString const & rKey ) const
-        { return (size_t)rKey.hashCode(); }
-};
-
-/** Template instance for OUString keys, Any values.<br>
-*/
-typedef LRU_Cache< ::rtl::OUString, ::com::sun::star::uno::Any,
-                   FctHashOUString, ::std::equal_to< ::rtl::OUString > >
-    LRU_CacheAnyByOUString;
-
-
-#endif
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/stoc/source/tdmanager/tdmgr.cxx b/stoc/source/tdmanager/tdmgr.cxx
deleted file mode 100644
index 51af243c0c62..000000000000
--- a/stoc/source/tdmanager/tdmgr.cxx
+++ /dev/null
@@ -1,1152 +0,0 @@
-/* -*- 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 <osl/diagnose.h>
-#include <osl/mutex.hxx>
-#include "rtl/ustrbuf.hxx"
-#include <cppuhelper/factory.hxx>
-#include <cppuhelper/compbase5.hxx>
-#include <cppuhelper/implbase1.hxx>
-#include <cppuhelper/implementationentry.hxx>
-#include "tdmgr_common.hxx"
-#include "tdmgr_tdenumeration.hxx"
-#include "lrucache.hxx"
-
-#include <com/sun/star/lang/XServiceInfo.hpp>
-#include <com/sun/star/lang/XSingleServiceFactory.hpp>
-#include <com/sun/star/lang/XEventListener.hpp>
-#include <com/sun/star/lang/XTypeProvider.hpp>
-#include <com/sun/star/lang/XComponent.hpp>
-#include <com/sun/star/lang/XInitialization.hpp>
-#include <com/sun/star/container/XHierarchicalNameAccess.hpp>
-#include <com/sun/star/container/XSet.hpp>
-#include <com/sun/star/container/XContentEnumerationAccess.hpp>
-#include <com/sun/star/reflection/XTypeDescription.hpp>
-#include <com/sun/star/reflection/XArrayTypeDescription.hpp>
-#include <com/sun/star/reflection/XIndirectTypeDescription.hpp>
-#include <com/sun/star/reflection/XInterfaceTypeDescription.hpp>
-#include "com/sun/star/reflection/XStructTypeDescription.hpp"
-#include <com/sun/star/reflection/XTypeDescriptionEnumerationAccess.hpp>
-#include <com/sun/star/registry/XRegistryKey.hpp>
-#include "com/sun/star/uno/RuntimeException.hpp"
-
-#include <algorithm>
-#include <vector>
-
-using namespace std;
-using namespace cppu;
-using namespace osl;
-using namespace com::sun::star;
-using namespace com::sun::star::uno;
-using namespace com::sun::star::lang;
-using namespace com::sun::star::reflection;
-using namespace com::sun::star::container;
-using namespace com::sun::star::registry;
-
-using ::rtl::OUString;
-using ::rtl::OUStringBuffer;
-
-static const sal_Int32 CACHE_SIZE = 512;
-
-#define SERVICENAME "com.sun.star.reflection.TypeDescriptionManager"
-#define IMPLNAME    "com.sun.star.comp.stoc.TypeDescriptionManager"
-
-//--------------------------------------------------------------------------------------------------
-// exported via tdmgr_common.hxx
-extern rtl_StandardModuleCount g_moduleCount;
-
-namespace stoc_bootstrap
-{
-Sequence< OUString > SAL_CALL tdmgr_getSupportedServiceNames()
-{
-    Sequence< OUString > seqNames(1);
-    seqNames.getArray()[0] = OUString(RTL_CONSTASCII_USTRINGPARAM(SERVICENAME));
-    return seqNames;
-}
-
-OUString SAL_CALL tdmgr_getImplementationName()
-{
-    return OUString(RTL_CONSTASCII_USTRINGPARAM(IMPLNAME));
-}
-}
-
-namespace stoc_tdmgr
-{
-typedef vector< Reference< XHierarchicalNameAccess > > ProviderVector;
-
-class EnumerationImpl;
-class ManagerImpl;
-
-//==================================================================================================
-class EventListenerImpl : public ImplHelper1< XEventListener >
-{
-    ManagerImpl *       _pMgr;
-
-public:
-    EventListenerImpl( ManagerImpl * pMgr )
-        : _pMgr( pMgr )
-        {
-            ::g_moduleCount.modCnt.acquire( &::g_moduleCount.modCnt );
-        }
-    virtual ~EventListenerImpl();
-
-    // lifetime delegated to manager
-    virtual void SAL_CALL acquire() throw();
-    virtual void SAL_CALL release() throw();
-
-    // XEventListener
-    virtual void SAL_CALL disposing( const EventObject & rEvt ) throw(::com::sun::star::uno::RuntimeException);
-};
-
-EventListenerImpl::~EventListenerImpl()
-{
-    ::g_moduleCount.modCnt.release( &::g_moduleCount.modCnt );
-}
-
-//==================================================================================================
-class ManagerImpl
-    : public WeakComponentImplHelper5< XServiceInfo,
-                                       XSet,
-                                       XHierarchicalNameAccess,
-                                       XTypeDescriptionEnumerationAccess,
-                                       XInitialization >
-{
-    friend class EnumerationImpl;
-    friend class EventListenerImpl;
-
-    Mutex                               _aComponentMutex;
-    Reference< XComponentContext >      _xContext;
-    EventListenerImpl                   _aEventListener;
-
-    // elements
-    sal_Bool                            _bCaching;
-    LRU_CacheAnyByOUString              _aElements;
-    // provider chain
-    ProviderVector                      _aProviders;
-
-    inline Any getSimpleType( const OUString & rName );
-
-    Reference< XTypeDescription > getInstantiatedStruct(OUString const & name);
-
-protected:
-    virtual void SAL_CALL disposing();
-
-public:
-    ManagerImpl( Reference< XComponentContext > const & xContext, sal_Int32 nCacheSize );
-    virtual ~ManagerImpl();
-
-    // XInitialization
-    virtual void SAL_CALL initialize( const Sequence< Any > & args ) throw (Exception, RuntimeException);
-
-    // XServiceInfo
-    virtual OUString SAL_CALL getImplementationName() throw(::com::sun::star::uno::RuntimeException);
-    virtual sal_Bool SAL_CALL supportsService( const OUString & rServiceName ) throw(::com::sun::star::uno::RuntimeException);
-    virtual Sequence< OUString > SAL_CALL getSupportedServiceNames() throw(::com::sun::star::uno::RuntimeException);
-
-    // XElementAccess
-    virtual Type SAL_CALL getElementType() throw(::com::sun::star::uno::RuntimeException);
-    virtual sal_Bool SAL_CALL hasElements() throw(::com::sun::star::uno::RuntimeException);
-
-    // XEnumerationAccess
-    virtual Reference< XEnumeration > SAL_CALL createEnumeration() throw(::com::sun::star::uno::RuntimeException);
-
-    // XSet
-    virtual sal_Bool SAL_CALL has( const Any & rElement ) throw(::com::sun::star::uno::RuntimeException);
-    virtual void SAL_CALL insert( const Any & rElement ) throw(::com::sun::star::lang::IllegalArgumentException, ::com::sun::star::container::ElementExistException, ::com::sun::star::uno::RuntimeException);
-    virtual void SAL_CALL remove( const Any & rElement ) throw(::com::sun::star::lang::IllegalArgumentException, ::com::sun::star::container::NoSuchElementException, ::com::sun::star::uno::RuntimeException);
-
-    // XHierarchicalNameAccess
-    virtual Any SAL_CALL getByHierarchicalName( const OUString & rName ) throw(::com::sun::star::container::NoSuchElementException, ::com::sun::star::uno::RuntimeException);
-    virtual sal_Bool SAL_CALL hasByHierarchicalName( const OUString & rName ) throw(::com::sun::star::uno::RuntimeException);
-
-    // XTypeDescriptionEnumerationAccess
-    virtual ::com::sun::star::uno::Reference<
-        ::com::sun::star::reflection::XTypeDescriptionEnumeration > SAL_CALL
-    createTypeDescriptionEnumeration(
-        const ::rtl::OUString& moduleName,
-        const ::com::sun::star::uno::Sequence<
-            ::com::sun::star::uno::TypeClass >& types,
-        ::com::sun::star::reflection::TypeDescriptionSearchDepth depth )
-            throw ( ::com::sun::star::reflection::NoSuchTypeNameException,
-                    ::com::sun::star::reflection::InvalidTypeNameException,
-                    ::com::sun::star::uno::RuntimeException );
-};
-
-//==================================================================================================
-class EnumerationImpl
-    : public WeakImplHelper1< XEnumeration >
-{
-    ManagerImpl *       _pMgr;
-    size_t              _nPos;
-
-public:
-    EnumerationImpl( ManagerImpl * pManager );
-    virtual ~EnumerationImpl();
-
-    // XEnumeration
-    virtual sal_Bool SAL_CALL hasMoreElements() throw(::com::sun::star::uno::RuntimeException);
-    virtual Any SAL_CALL nextElement() throw(::com::sun::star::container::NoSuchElementException, ::com::sun::star::lang::WrappedTargetException, ::com::sun::star::uno::RuntimeException);
-};
-
-//##################################################################################################
-
-// lifetime delegated to manager
-//__________________________________________________________________________________________________
-void EventListenerImpl::acquire() throw()
-{
-    _pMgr->acquire();
-}
-//__________________________________________________________________________________________________
-void EventListenerImpl::release() throw()
-{
-    _pMgr->release();
-}
-
-// XEventListener
-//__________________________________________________________________________________________________
-void EventListenerImpl::disposing( const EventObject & rEvt )
-    throw(::com::sun::star::uno::RuntimeException)
-{
-    _pMgr->remove( makeAny( rEvt.Source ) );
-}
-
-//##################################################################################################
-
-//__________________________________________________________________________________________________
-EnumerationImpl::EnumerationImpl( ManagerImpl * pManager )
-    : _pMgr( pManager )
-    , _nPos( 0 )
-{
-    _pMgr->acquire();
-}
-//__________________________________________________________________________________________________
-EnumerationImpl::~EnumerationImpl()
-{
-    _pMgr->release();
-}
-
-// XEnumeration
-//__________________________________________________________________________________________________
-sal_Bool EnumerationImpl::hasMoreElements()
-    throw(::com::sun::star::uno::RuntimeException)
-{
-    MutexGuard aGuard( _pMgr->_aComponentMutex );
-    return (_nPos < _pMgr->_aProviders.size());
-}
-//__________________________________________________________________________________________________
-Any EnumerationImpl::nextElement()
-    throw(::com::sun::star::container::NoSuchElementException, ::com::sun::star::lang::WrappedTargetException, ::com::sun::star::uno::RuntimeException)
-{
-    MutexGuard aGuard( _pMgr->_aComponentMutex );
-    if (_nPos >= _pMgr->_aProviders.size())
-    {
-        throw NoSuchElementException(
-            OUString( RTL_CONSTASCII_USTRINGPARAM("there is no further element!") ),
-            (XWeak *)(OWeakObject *)this );
-    }
-    return makeAny( _pMgr->_aProviders[_nPos++] );
-}
-
-//##################################################################################################
-
-//__________________________________________________________________________________________________
-ManagerImpl::ManagerImpl(
-    Reference< XComponentContext > const & xContext, sal_Int32 nCacheSize )
-    : WeakComponentImplHelper5<
-        XServiceInfo, XSet, XHierarchicalNameAccess,
-        XTypeDescriptionEnumerationAccess, XInitialization >( _aComponentMutex )
-    , _xContext( xContext )
-    , _aEventListener( this )
-    , _bCaching( sal_True )
-    , _aElements( nCacheSize )
-{
-    ::g_moduleCount.modCnt.acquire( &::g_moduleCount.modCnt );
-}
-//__________________________________________________________________________________________________
-ManagerImpl::~ManagerImpl()
-{
-    OSL_ENSURE( _aProviders.empty(), "### still providers left!" );
-    OSL_TRACE( "> TypeDescriptionManager shut down. <" );
-    ::g_moduleCount.modCnt.release( &::g_moduleCount.modCnt );
-}
-//__________________________________________________________________________________________________
-void ManagerImpl::disposing()
-{
-    // called on disposing the tdmgr instance (supposedly from context)
-    _bCaching = sal_False;
-    _aElements.clear();
-    _xContext.clear();
-    _aProviders.clear();
-}
-
-// XInitialization
-//__________________________________________________________________________________________________
-void ManagerImpl::initialize(
-    const Sequence< Any > & args )
-    throw (Exception, RuntimeException)
-{
-    // additional providers
-    Any const * pProviders = args.getConstArray();
-    for ( sal_Int32 nPos = 0; nPos < args.getLength(); ++nPos )
-    {
-        Reference< XHierarchicalNameAccess > xHA( pProviders[ nPos ], UNO_QUERY );
-        OSL_ENSURE( xHA.is(), "### no td provider!" );
-
-        if (xHA.is())
-        {
-            try
-            {
-                insert( makeAny( xHA ) );
-            }
-            catch (const IllegalArgumentException &)
-            {
-            }
-            catch (const ElementExistException &)
-            {
-            }
-        }
-    }
-}
-
-// XServiceInfo
-//__________________________________________________________________________________________________
-OUString ManagerImpl::getImplementationName()
-    throw(::com::sun::star::uno::RuntimeException)
-{
-    return stoc_bootstrap::tdmgr_getImplementationName();
-}
-//__________________________________________________________________________________________________
-sal_Bool ManagerImpl::supportsService( const OUString & rServiceName )
-    throw(::com::sun::star::uno::RuntimeException)
-{
-    const Sequence< OUString > & rSNL = getSupportedServiceNames();
-    const OUString * pArray = rSNL.getConstArray();
-    for ( sal_Int32 nPos = rSNL.getLength(); nPos--; )
-    {
-        if (pArray[nPos] == rServiceName)
-            return sal_True;
-    }
-    return sal_False;
-}
-//__________________________________________________________________________________________________
-Sequence< OUString > ManagerImpl::getSupportedServiceNames()
-    throw(::com::sun::star::uno::RuntimeException)
-{
-    return stoc_bootstrap::tdmgr_getSupportedServiceNames();
-}
-
-// XElementAccess
-//__________________________________________________________________________________________________
-Type ManagerImpl::getElementType()
-    throw(::com::sun::star::uno::RuntimeException)
-{
-    return ::getCppuType( (const Reference< XHierarchicalNameAccess > *)0 );
-}
-//__________________________________________________________________________________________________
-sal_Bool ManagerImpl::hasElements()
-    throw(::com::sun::star::uno::RuntimeException)
-{
-    MutexGuard aGuard( _aComponentMutex );
-    return (!_aProviders.empty());
-}
-
-// XEnumerationAccess
-//__________________________________________________________________________________________________
-Reference< XEnumeration > ManagerImpl::createEnumeration()
-    throw(::com::sun::star::uno::RuntimeException)
-{
-    return new EnumerationImpl( this );
-}
-
-// XSet
-//__________________________________________________________________________________________________
-sal_Bool SAL_CALL ManagerImpl::has( const Any & rElement )
-    throw(::com::sun::star::uno::RuntimeException)
-{
-    Reference< XHierarchicalNameAccess > xElem;
-    if (rElement >>= xElem)
-    {
-        MutexGuard aGuard( _aComponentMutex );
-        return (find( _aProviders.begin(), _aProviders.end(), xElem ) != _aProviders.end());
-    }
-    return sal_False;
-}
-
-//__________________________________________________________________________________________________
-void SAL_CALL ManagerImpl::insert( const Any & rElement )
-    throw(::com::sun::star::lang::IllegalArgumentException, ::com::sun::star::container::ElementExistException, ::com::sun::star::uno::RuntimeException)
-{
-    // Passing in a sequence of type providers instead of a single one bypasses
-    // the consistency checks; it is used during bootstrap:
-    bool doCheck = false;
-    css::uno::Sequence<
-        css::uno::Reference< css::container::XHierarchicalNameAccess > > provs;
-    if (!(rElement >>= provs)) {
-        css::uno::Reference< css::container::XHierarchicalNameAccess > prov;
-        if (!(rElement >>= prov)) {
-            throw css::lang::IllegalArgumentException(
-                "no type description provider (or sequence thereof)",
-                static_cast< cppu::OWeakObject * >(this), 0);
-        }
-        doCheck = true;
-        provs.realloc(1);
-        provs[0] = prov;
-    }
-
-    MutexGuard aGuard( _aComponentMutex );
-    ProviderVector newProvs(_aProviders);
-    for (sal_Int32 i = 0; i != provs.getLength(); ++i) {
-        Reference< XHierarchicalNameAccess > xElem(provs[i]);
-        if (!xElem.is()) {
-            throw css::lang::IllegalArgumentException(
-                "null type description provider",
-                static_cast< cppu::OWeakObject * >(this), 0);
-        }
-
-        if (doCheck) {
-            if (find( newProvs.begin(), newProvs.end(), xElem ) != newProvs.end())
-            {
-                throw ElementExistException(
-                    OUString( RTL_CONSTASCII_USTRINGPARAM("provider already inserted!") ),
-                    (XWeak *)(OWeakObject *)this );
-            }
-
-            // check whether all types are compatible, if possible:
-            Reference<reflection::XTypeDescriptionEnumerationAccess> xTDEnumAccess(
-                xElem, UNO_QUERY );
-            OSL_ENSURE( xTDEnumAccess.is(),
-                        "### providers ought to implement "
-                        "reflection::XTypeDescriptionEnumerationAccess!" );
-            if (xTDEnumAccess.is())
-            {
-                try
-                {
-                    TypeClass ar [] = {
-                        TypeClass_ENUM, TypeClass_TYPEDEF, TypeClass_SEQUENCE,
-                        TypeClass_STRUCT, TypeClass_EXCEPTION,
-                        /* TypeClass_UNION, TypeClass_ARRAY not supported */
-                        TypeClass_INTERFACE,
-                        TypeClass_SERVICE,
-                        TypeClass_INTERFACE_METHOD, TypeClass_INTERFACE_ATTRIBUTE,
-                        TypeClass_PROPERTY, TypeClass_CONSTANT, TypeClass_CONSTANTS,
-                        TypeClass_SINGLETON
-                    };
-                    Reference<reflection::XTypeDescriptionEnumeration> xTDEnum(
-                        xTDEnumAccess->createTypeDescriptionEnumeration(
-                            OUString() /* all modules */,
-                            Sequence<TypeClass>( ar, ARLEN(ar) ),
-                            reflection::TypeDescriptionSearchDepth_INFINITE ) );
-
-                    while (xTDEnum->hasMoreElements())
-                    {
-                        Reference<reflection::XTypeDescription> xNewTD;
-                        try
-                        {
-                            xNewTD = xTDEnum->nextTypeDescription();
-                        }
-                        catch (const container::NoSuchElementException & exc)
-                        {
-                            throw lang::IllegalArgumentException(
-                                "NoSuchElementException occurred: " +
-                                exc.Message, static_cast<OWeakObject *>(this),
-                                -1 /* unknown */ );
-                        }
-
-                        try
-                        {
-                            OUString newName( xNewTD->getName() );
-                            Reference<reflection::XTypeDescription> xExistingTD(
-                                getByHierarchicalName( newName ), UNO_QUERY );
-                            OSL_ASSERT( xExistingTD.is() );
-                            // existing, check whether compatible:
-                            if (xExistingTD.is())
-                            {
-                                try
-                                {
-                                    check( xNewTD, xExistingTD );
-                                }
-                                catch (const IncompatibleTypeException & exc)
-                                {
-                                    throw lang::IllegalArgumentException(
-                                        "Rejecting types due to "
-                                              "incompatibility!  " + exc.m_cause,
-                                        static_cast<OWeakObject *>(this), 0 );
-                                }
-                            }
-                        }
-                        catch (const container::NoSuchElementException &)
-                        {
-                            // type not in: ok
-                        }
-                    }
-                }
-                catch (const reflection::NoSuchTypeNameException & exc)
-                {
-                    throw lang::IllegalArgumentException(
-                        "NoSuchTypeNameException occurred: " + exc.Message,
-                        static_cast<OWeakObject *>(this), -1 /* unknown */ );
-            }
-                catch (const reflection::InvalidTypeNameException & exc)
-                {
-                    throw lang::IllegalArgumentException(
-                        "InvalidTypeNameException occurred: " + exc.Message,
-                        static_cast<OWeakObject *>(this), -1 /* unknown */ );
-                }
-            }
-        }
-        newProvs.push_back( xElem );
-    }
-
-    _aProviders = newProvs;
-    for (sal_Int32 i = 0; i != provs.getLength(); ++i) {
-        Reference< XComponent > xComp( provs[i], UNO_QUERY );
-        if (xComp.is())
-            xComp->addEventListener( &_aEventListener );
-    }
-}
-//__________________________________________________________________________________________________
-void SAL_CALL ManagerImpl::remove( const Any & rElement )
-    throw(::com::sun::star::lang::IllegalArgumentException, ::com::sun::star::container::NoSuchElementException, ::com::sun::star::uno::RuntimeException)
-{
-    if (!rBHelper.bDisposed && !rBHelper.bInDispose)
-    {
-        Reference< XHierarchicalNameAccess > xElem;
-        if (! (rElement >>= xElem))
-        {
-            throw IllegalArgumentException(
-                OUString( RTL_CONSTASCII_USTRINGPARAM("no type description provider given!") ),
-                (XWeak *)(OWeakObject *)this, 0 );
-        }
-
-        MutexGuard aGuard( _aComponentMutex );
-        ProviderVector::iterator iFind( find( _aProviders.begin(), _aProviders.end(), xElem ) );
-        if (iFind == _aProviders.end())
-        {
-            throw NoSuchElementException(
-                OUString( RTL_CONSTASCII_USTRINGPARAM("provider not found!") ),
-                (XWeak *)(OWeakObject *)this );
-        }
-        _aProviders.erase( iFind );
-    }
-
-    Reference< XComponent > xComp;
-    if (rElement >>= xComp)
-        xComp->removeEventListener( &_aEventListener );
-}
-
-// XTypeDescriptionEnumerationAccess
-//__________________________________________________________________________________________________
-// virtual
-Reference< XTypeDescriptionEnumeration > SAL_CALL
-ManagerImpl::createTypeDescriptionEnumeration(
-        const OUString & moduleName,
-        const Sequence< TypeClass > & types,
-        TypeDescriptionSearchDepth depth )
-    throw ( NoSuchTypeNameException,
-            InvalidTypeNameException,
-            RuntimeException )
-{
-    MutexGuard aGuard( _aComponentMutex );
-
-    TDEnumerationAccessStack aStack;
-    ProviderVector::const_iterator it = _aProviders.begin();
-    const ProviderVector::const_iterator end = _aProviders.end();
-    while ( it != end )
-    {
-        Reference< XTypeDescriptionEnumerationAccess >xEnumAccess(
-            (*it), UNO_QUERY );
-        OSL_ENSURE( xEnumAccess.is(),
-                    "### no XTypeDescriptionEnumerationAccess!" );
-        if ( xEnumAccess.is() )
-            aStack.push( xEnumAccess );
-
-        ++it;
-    }
-
-    return Reference< XTypeDescriptionEnumeration >(
-        new TypeDescriptionEnumerationImpl( moduleName,
-                                            types,
-                                            depth,
-                                            aStack ) );
-}
-
-
-//##################################################################################################
-//##################################################################################################
-//##################################################################################################
-
-
-//==================================================================================================
-class SimpleTypeDescriptionImpl
-    : public WeakImplHelper1< XTypeDescription >
-{
-    TypeClass _eTC;
-    OUString  _aName;
-
-public:
-    SimpleTypeDescriptionImpl( TypeClass eTC, const OUString & rName )
-        : _eTC( eTC )
-        , _aName( rName )
-        {}
-
-    // XTypeDescription
-    virtual TypeClass SAL_CALL getTypeClass() throw(::com::sun::star::uno::RuntimeException);
-    virtual OUString SAL_CALL getName() throw(::com::sun::star::uno::RuntimeException);
-};
-
-// XTypeDescription
-//__________________________________________________________________________________________________
-TypeClass SimpleTypeDescriptionImpl::getTypeClass()
-    throw(::com::sun::star::uno::RuntimeException)
-{
-    return _eTC;
-}
-//__________________________________________________________________________________________________
-OUString SimpleTypeDescriptionImpl::getName()
-    throw(::com::sun::star::uno::RuntimeException)
-{
-    return _aName;
-}
-
-//==================================================================================================
-class SequenceTypeDescriptionImpl
-    : public WeakImplHelper1< XIndirectTypeDescription >
-{
-    Reference< XTypeDescription > _xElementTD;
-
-public:
-    SequenceTypeDescriptionImpl( const Reference< XTypeDescription > & xElementTD )
-        : _xElementTD( xElementTD )
-        {}
-
-    // XTypeDescription
-    virtual TypeClass SAL_CALL getTypeClass() throw(::com::sun::star::uno::RuntimeException);
-    virtual OUString SAL_CALL getName() throw(::com::sun::star::uno::RuntimeException);
-
-    // XIndirectTypeDescription
-    virtual Reference< XTypeDescription > SAL_CALL getReferencedType() throw(::com::sun::star::uno::RuntimeException);
-};
-
-// XTypeDescription
-//__________________________________________________________________________________________________
-TypeClass SequenceTypeDescriptionImpl::getTypeClass()
-    throw(::com::sun::star::uno::RuntimeException)
-{
-    return TypeClass_SEQUENCE;
-}
-//__________________________________________________________________________________________________
-OUString SequenceTypeDescriptionImpl::getName()
-    throw(::com::sun::star::uno::RuntimeException)
-{
-    return (OUString( RTL_CONSTASCII_USTRINGPARAM("[]") ) + _xElementTD->getName());
-}
-
-// XIndirectTypeDescription
-//__________________________________________________________________________________________________
-Reference< XTypeDescription > SequenceTypeDescriptionImpl::getReferencedType()
-    throw(::com::sun::star::uno::RuntimeException)
-{
-    return _xElementTD;
-}
-
-//==================================================================================================
-class ArrayTypeDescriptionImpl
-    : public WeakImplHelper1< XArrayTypeDescription >
-{
-    Reference< XTypeDescription > _xElementTD;
-    Mutex                         _aDimensionMutex;
-    sal_Int32                     _nDimensions;
-    Sequence< sal_Int32 >         _seqDimensions;
-    OUString                      _sDimensions;
-
-    void initDimensions(const OUString& rSDimensions);
-public:
-    ArrayTypeDescriptionImpl( const Reference< XTypeDescription > & xElementTD,
-                              sal_Int32 nDimensions, const OUString& rSDimensions )
-        : _xElementTD( xElementTD )
-        , _nDimensions( nDimensions )
-        , _seqDimensions( Sequence< sal_Int32 >(nDimensions) )
-        , _sDimensions( rSDimensions )
-        {
-            initDimensions( rSDimensions );
-        }
-    virtual ~ArrayTypeDescriptionImpl() {}
-
-    // XTypeDescription
-    virtual TypeClass SAL_CALL getTypeClass() throw(::com::sun::star::uno::RuntimeException);
-    virtual OUString SAL_CALL getName() throw(::com::sun::star::uno::RuntimeException);
-
-    // XArrayTypeDescription
-    virtual Reference< XTypeDescription > SAL_CALL getType() throw(::com::sun::star::uno::RuntimeException);
-    virtual sal_Int32 SAL_CALL getNumberOfDimensions() throw(::com::sun::star::uno::RuntimeException);
-    virtual Sequence< sal_Int32 > SAL_CALL getDimensions() throw(::com::sun::star::uno::RuntimeException);
-};
-//__________________________________________________________________________________________________
-static sal_Int32 unicodeToInteger( sal_Int8 base, const sal_Unicode *s )
-{
-    sal_Int32    r = 0;
-    sal_Int32    negative = 0;
-
-    if (*s == '-')
-       {
-        negative = 1;
-          s++;
-       }
-       if (base == 8 && *s == '0')
-        s++;
-       else if (base == 16 && *s == '0' && (*(s + 1) == 'x' || *(s + 1) == 'X'))
-        s += 2;
-
-       for (; *s; s++)
-       {
-           if (*s <= '9' && *s >= '0')
-            r = (r * base) + (*s - '0');
-          else if (base > 10 && *s <= 'f' && *s >= 'a')
-            r = (r * base) + (*s - 'a' + 10);
-          else if (base > 10 && *s <= 'F' && *s >= 'A')
-            r = (r * base) + (*s - 'A' + 10);
-           else
-            break;
-    }
-       if (negative) r *= -1;
-    return r;
-}
-//__________________________________________________________________________________________________
-void ArrayTypeDescriptionImpl::initDimensions(const OUString& rSDimensions)
-{
-    MutexGuard aGuard( _aDimensionMutex );
-
-    sal_Int32 *  pDimensions = _seqDimensions.getArray();
-    OUString tmp(rSDimensions);
-    sal_Unicode* p = (sal_Unicode*)tmp.getStr()+1;
-    sal_Unicode* pOffset = p;
-    sal_Int32 len = tmp.getLength() - 1 ;
-    sal_Int32 i = 0;
-
-    while ( len > 0)
-    {
-        pOffset++;
-        if (*pOffset == ']')
-        {
-            *pOffset = '\0';
-            pOffset += 2;
-            len -= 3;
-            pDimensions[i++] = unicodeToInteger(10, p);
-            p = pOffset;
-        } else
-            len--;
-    }
-}
-
-// XTypeDescription
-//__________________________________________________________________________________________________
-TypeClass ArrayTypeDescriptionImpl::getTypeClass()
-    throw(::com::sun::star::uno::RuntimeException)
-{
-    return TypeClass_ARRAY;
-}
-//__________________________________________________________________________________________________
-OUString ArrayTypeDescriptionImpl::getName()
-    throw(::com::sun::star::uno::RuntimeException)
-{
-    return (_xElementTD->getName() + _sDimensions);
-}
-
-// XArrayTypeDescription
-//__________________________________________________________________________________________________
-Reference< XTypeDescription > ArrayTypeDescriptionImpl::getType()
-    throw(::com::sun::star::uno::RuntimeException)
-{
-    return _xElementTD;
-}
-
-//__________________________________________________________________________________________________
-sal_Int32 ArrayTypeDescriptionImpl::getNumberOfDimensions()
-    throw(::com::sun::star::uno::RuntimeException)
-{
-    return _nDimensions;
-}
-
-//__________________________________________________________________________________________________
-Sequence< sal_Int32 > ArrayTypeDescriptionImpl::getDimensions()
-    throw(::com::sun::star::uno::RuntimeException)
-{
-    return _seqDimensions;
-}
-
-//##################################################################################################
-//##################################################################################################
-//##################################################################################################
-
-
-//__________________________________________________________________________________________________
-inline Any ManagerImpl::getSimpleType( const OUString & rName )
-{
-    Any aRet;
-
-    if ( rName == "string" )
-        aRet <<= Reference< XTypeDescription >( new SimpleTypeDescriptionImpl( TypeClass_STRING, rName ) );
-    else if ( rName == "long" )
-        aRet <<= Reference< XTypeDescription >( new SimpleTypeDescriptionImpl( TypeClass_LONG, rName ) );
-    else if ( rName == "unsigned long" )
-        aRet <<= Reference< XTypeDescription >( new SimpleTypeDescriptionImpl( TypeClass_UNSIGNED_LONG, rName ) );
-    else if ( rName == "boolean" )
-        aRet <<= Reference< XTypeDescription >( new SimpleTypeDescriptionImpl( TypeClass_BOOLEAN, rName ) );
-    else if ( rName == "char" )
-        aRet <<= Reference< XTypeDescription >( new SimpleTypeDescriptionImpl( TypeClass_CHAR, rName ) );
-    else if ( rName == "byte" )
-        aRet <<= Reference< XTypeDescription >( new SimpleTypeDescriptionImpl( TypeClass_BYTE, rName ) );
-    else if ( rName == "short" )
-        aRet <<= Reference< XTypeDescription >( new SimpleTypeDescriptionImpl( TypeClass_SHORT, rName ) );
-    else if ( rName == "unsigned short" )
-        aRet <<= Reference< XTypeDescription >( new SimpleTypeDescriptionImpl( TypeClass_UNSIGNED_SHORT, rName ) );
-    else if ( rName == "hyper" )
-        aRet <<= Reference< XTypeDescription >( new SimpleTypeDescriptionImpl( TypeClass_HYPER, rName ) );
-    else if ( rName == "unsigned hyper" )
-        aRet <<= Reference< XTypeDescription >( new SimpleTypeDescriptionImpl( TypeClass_UNSIGNED_HYPER, rName ) );
-    else if ( rName == "float" )
-        aRet <<= Reference< XTypeDescription >( new SimpleTypeDescriptionImpl( TypeClass_FLOAT, rName ) );
-    else if ( rName == "double" )
-        aRet <<= Reference< XTypeDescription >( new SimpleTypeDescriptionImpl( TypeClass_DOUBLE, rName ) );
-    else if ( rName == "any" )
-        aRet <<= Reference< XTypeDescription >( new SimpleTypeDescriptionImpl( TypeClass_ANY, rName ) );
-    else if ( rName == "void" )
-        aRet <<= Reference< XTypeDescription >( new SimpleTypeDescriptionImpl( TypeClass_VOID, rName ) );
-    else if ( rName == "type" )
-        aRet <<= Reference< XTypeDescription >( new SimpleTypeDescriptionImpl( TypeClass_TYPE, rName ) );
-
-    return aRet;
-}
-
-namespace {
-
-Reference< XTypeDescription > resolveTypedefs(
-    Reference< XTypeDescription > const & type)
-{
-    Reference< XTypeDescription > resolved(type);
-    while (resolved->getTypeClass() == TypeClass_TYPEDEF) {
-        resolved = Reference< XIndirectTypeDescription >(
-            type, UNO_QUERY_THROW)->getReferencedType();
-    }
-    return resolved;
-}
-
-bool isNonVoidNonExceptionType(Reference< XTypeDescription > const & type) {
-    switch (type->getTypeClass()) {
-    case TypeClass_BOOLEAN:
-    case TypeClass_BYTE:
-    case TypeClass_SHORT:
-    case TypeClass_UNSIGNED_SHORT:
-    case TypeClass_LONG:
-    case TypeClass_UNSIGNED_LONG:
-    case TypeClass_HYPER:
-    case TypeClass_UNSIGNED_HYPER:
-    case TypeClass_FLOAT:
-    case TypeClass_DOUBLE:
-    case TypeClass_CHAR:
-    case TypeClass_STRING:
-    case TypeClass_TYPE:
-    case TypeClass_ANY:
-    case TypeClass_SEQUENCE:
-    case TypeClass_ENUM:
-    case TypeClass_STRUCT:
-    case TypeClass_INTERFACE:
-        return true;
-
-    default:
-        return false;
-    }
-}
-
-class InstantiatedStruct: public WeakImplHelper1< XStructTypeDescription > {
-public:
-    InstantiatedStruct(
-        Reference< XStructTypeDescription > const & structType,
-        std::vector< Reference< XTypeDescription > > const & arguments);
-
-    virtual TypeClass SAL_CALL getTypeClass() throw (RuntimeException)
-    { return TypeClass_STRUCT; }
-
-    virtual OUString SAL_CALL getName() throw (RuntimeException);
-
-    virtual Reference< XTypeDescription > SAL_CALL getBaseType()
-        throw (RuntimeException)
-    { return m_struct->getBaseType(); }
-
-    virtual Sequence< Reference< XTypeDescription > > SAL_CALL getMemberTypes()
-        throw (RuntimeException);
-
-    virtual Sequence< OUString > SAL_CALL getMemberNames()
-        throw (RuntimeException)
-    { return m_struct->getMemberNames(); }
-
-    virtual Sequence< OUString > SAL_CALL getTypeParameters()
-        throw (RuntimeException)
-    { return Sequence< OUString >(); }
-
-    virtual Sequence< Reference< XTypeDescription > > SAL_CALL
-    getTypeArguments() throw (RuntimeException)
-    { return m_arguments; }
-
-private:
-    Reference< XStructTypeDescription > m_struct;
-    Sequence< Reference< XTypeDescription > > m_arguments;
-};
-
-InstantiatedStruct::InstantiatedStruct(
-    Reference< XStructTypeDescription > const & structType,
-    std::vector< Reference< XTypeDescription > > const & arguments):
-    m_struct(structType),
-    m_arguments(static_cast< sal_Int32 >(arguments.size()))
-{
-    for (std::vector< Reference< XTypeDescription > >::size_type i = 0;
-         i < arguments.size(); ++i)
-    {
-        m_arguments[static_cast< sal_Int32 >(i)] = arguments[i];
-    }
-}
-
-OUString InstantiatedStruct::getName() throw (RuntimeException) {
-    OUStringBuffer buf(m_struct->getName());
-    buf.append(static_cast< sal_Unicode >('<'));
-    for (sal_Int32 i = 0; i < m_arguments.getLength(); ++i) {
-        if (i != 0) {
-            buf.append(static_cast< sal_Unicode >(','));
-        }
-        buf.append(m_arguments[i]->getName());
-    }
-    buf.append(static_cast< sal_Unicode >('>'));
-    return buf.makeStringAndClear();
-}
-
-Sequence< Reference< XTypeDescription > > InstantiatedStruct::getMemberTypes()
-    throw (RuntimeException)
-{
-    Sequence< Reference< XTypeDescription > > types(m_struct->getMemberTypes());
-    for (sal_Int32 i = 0; i < types.getLength(); ++i) {
-        if (types[i]->getTypeClass() == TypeClass_UNKNOWN) {
-            Sequence< OUString > parameters(m_struct->getTypeParameters());
-            OSL_ASSERT(parameters.getLength() == m_arguments.getLength());
-            for (sal_Int32 j = 0; j < parameters.getLength(); ++j) {
-                if (parameters[j] == types[i]->getName()) {
-                    types[i] = m_arguments[j];
-                    break;
-                }
-            }
-        }
-    }
-    return types;
-}
-
-}
-
-Reference< XTypeDescription > ManagerImpl::getInstantiatedStruct(
-    OUString const & name)
-{
-    sal_Int32 i = name.indexOf('<');
-    OSL_ASSERT(i >= 0);
-    Reference< XStructTypeDescription > structType(
-        getByHierarchicalName(name.copy(0, i)), UNO_QUERY);
-    std::vector< Reference< XTypeDescription > > args;
-    bool good = structType.is();
-    if (good) {
-        do {
-            ++i; // skip '<' or ','
-            sal_Int32 j = i;
-            for (sal_Int32 level = 0; j != name.getLength(); ++j) {
-                sal_Unicode c = name[j];
-                if (c == ',') {
-                    if (level == 0) {
-                        break;
-                    }
-                } else if (c == '<') {
-                    ++level;
-                } else if (c == '>') {
-                    if (level == 0) {
-                        break;
-                    }
-                    --level;
-                }
-            }
-            if (j != name.getLength()) {
-                Reference< XTypeDescription > type(
-                    getByHierarchicalName(name.copy(i, j - i)), UNO_QUERY);
-                if (isNonVoidNonExceptionType(resolveTypedefs(type))) {
-                    args.push_back(type);
-                } else {
-                    good = false;
-                    break;
-                }
-            }
-            i = j;
-        } while (i != name.getLength() && name[i] != '>');
-        good = good && i == name.getLength() - 1
-            && name[i] == '>' && !args.empty();
-    }
-    // args.size() cannot exceed SAL_MAX_INT32, as each argument consumes at
-    // least one position within an rtl::OUString (which is no longer than
-    // SAL_MAX_INT32):
-    if (!good
-        || (args.size()
-            != sal::static_int_cast< sal_uInt32 >(
-                structType->getTypeParameters().getLength())))
-    {
-        throw NoSuchElementException(name, static_cast< OWeakObject * >(this));
-    }
-    return new InstantiatedStruct(structType, args);
-}
-
-// XHierarchicalNameAccess
-//__________________________________________________________________________________________________
-Any ManagerImpl::getByHierarchicalName( const OUString & rName )
-    throw(::com::sun::star::container::NoSuchElementException, ::com::sun::star::uno::RuntimeException)
-{
-    Any aRet;
-    if (_bCaching)
-        aRet = _aElements.getValue( rName );
-    if (!rName.isEmpty() && !aRet.hasValue())
-    {
-        sal_Int32 nIndex;
-        if (rName[0] == '[') // test for sequence
-        {
-            Reference< XTypeDescription > xElemType(
-                getByHierarchicalName( rName.copy( 2 ) ),
-                UNO_QUERY_THROW );
-            aRet <<= Reference< XTypeDescription >(
-                new SequenceTypeDescriptionImpl( xElemType ) );
-        }
-        else if (rName[rName.getLength()-1] == ']') // test for array
-        {
-            sal_Int32 nIndex2 = 0, nTokens = 0;
-            do { rName.getToken( 0, '[', nIndex2 ); nTokens++; } while( nIndex2 != -1 );
-            sal_Int32 nDims = nTokens - 1;
-            sal_Int32 dimOffset = rName.indexOf('[');
-            Reference< XTypeDescription > xElemType(
-                getByHierarchicalName( rName.copy( 0, dimOffset ) ),
-                UNO_QUERY_THROW );
-            aRet <<= Reference< XTypeDescription >(
-                new ArrayTypeDescriptionImpl(
-                    xElemType, nDims, rName.copy(dimOffset) ) );
-        }
-        // test for interface member names:
-        else if ((nIndex = rName.indexOf( ':' )) >= 0)
-        {
-            Reference< XInterfaceTypeDescription > xIfaceTD(
-                getByHierarchicalName( rName.copy( 0, nIndex ) ),
-                UNO_QUERY_THROW );
-            const Sequence< Reference< XInterfaceMemberTypeDescription > > &
-                rMembers = xIfaceTD->getMembers();
-            const Reference< XInterfaceMemberTypeDescription > * pMembers =
-                rMembers.getConstArray();
-
-            for ( sal_Int32 nPos = rMembers.getLength(); nPos--; )
-            {
-                if (rName == pMembers[nPos]->getName())
-                {
-                    aRet <<= Reference< XTypeDescription >(
-                        pMembers[nPos], UNO_QUERY_THROW );
-                    break;
-                }
-            }
-            if (! aRet.hasValue())
-            {
-                // member not found:
-                throw NoSuchElementException(
-                    rName, static_cast< OWeakObject * >(this) );
-            }
-        }
-        // test for instantiated polymorphic struct types:
-        else if (rName.indexOf('<') >= 0)
-        {
-            aRet <<= getInstantiatedStruct(rName);
-        }
-        else if (rName.indexOf( '.' ) < 0) // test for simple/ build in types
-        {
-            aRet = getSimpleType( rName );
-        }
-
-        if (! aRet.hasValue())
-        {
-            // last, try callback chain
-            for ( ProviderVector::const_iterator iPos( _aProviders.begin() );
-                  iPos != _aProviders.end(); ++iPos )
-            {
-                try
-                {
-                    if ((aRet = (*iPos)->getByHierarchicalName(
-                             rName )).hasValue())
-                    {
-                        break;
-                    }
-                }
-                catch (const NoSuchElementException &)
-                {
-                }
-            }
-        }
-
-        // update cache
-        if (_bCaching && aRet.hasValue())
-            _aElements.setValue( rName, aRet );
-    }
-
-    if (! aRet.hasValue())
-    {
-        throw NoSuchElementException(
-            rName, static_cast< OWeakObject * >(this) );
-    }
-    return aRet;
-}
-//__________________________________________________________________________________________________
-sal_Bool ManagerImpl::hasByHierarchicalName( const OUString & rName )
-    throw(::com::sun::star::uno::RuntimeException)
-{
-    try
-    {
-        return getByHierarchicalName( rName ).hasValue();
-    }
-    catch (const NoSuchElementException &)
-    {
-    }
-    return sal_False;
-}
-}
-
-namespace stoc_bootstrap
-{
-//==================================================================================================
-Reference< XInterface > SAL_CALL ManagerImpl_create(
-    Reference< XComponentContext > const & xContext )
-    SAL_THROW( (::com::sun::star::uno::Exception) )
-{
-    sal_Int32 nCacheSize = CACHE_SIZE;
-    if (xContext.is()) {
-        xContext->getValueByName(
-            OUString(
-                RTL_CONSTASCII_USTRINGPARAM(
-                    "/implementations/" IMPLNAME "/CacheSize"))) >>=
-            nCacheSize;
-    }
-
-    return Reference< XInterface >( *new stoc_tdmgr::ManagerImpl( xContext, nCacheSize ) );
-}
-
-}
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/stoc/source/tdmanager/tdmgr_common.hxx b/stoc/source/tdmanager/tdmgr_common.hxx
deleted file mode 100644
index 33f1a2ad307b..000000000000
--- a/stoc/source/tdmanager/tdmgr_common.hxx
+++ /dev/null
@@ -1,51 +0,0 @@
-/* -*- 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 .
- */
-
-#ifndef _STOC_TDMGR_COMMON_HXX
-#define _STOC_TDMGR_COMMON_HXX
-
-#include <rtl/unload.h>
-
-#include "com/sun/star/reflection/XTypeDescription.hpp"
-
-#define ARLEN(x) (sizeof (x) / sizeof *(x))
-
-
-namespace stoc_tdmgr
-{
-    extern rtl_StandardModuleCount g_moduleCount;
-
-struct IncompatibleTypeException
-{
-    ::rtl::OUString m_cause;
-    IncompatibleTypeException( ::rtl::OUString const & cause )
-        : m_cause( cause ) {}
-};
-
-void check(
-    css::uno::Reference<css::reflection::XTypeDescription> const & xNewTD,
-    css::uno::Reference<css::reflection::XTypeDescription> const & xExistingTD,
-    ::rtl::OUString const & context = ::rtl::OUString() );
-/* throw (css::uno::RuntimeException, IncompatibleTypeException) */
-
-} // namespace stoc_tdmgr
-
-#endif /* _STOC_TDMGR_COMMON_HXX */
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/stoc/source/tdmanager/tdmgr_tdenumeration.cxx b/stoc/source/tdmanager/tdmgr_tdenumeration.cxx
deleted file mode 100644
index 7433d11b84cc..000000000000
--- a/stoc/source/tdmanager/tdmgr_tdenumeration.cxx
+++ /dev/null
@@ -1,176 +0,0 @@
-/* -*- 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 <osl/diagnose.h>
-#include "tdmgr_common.hxx"
-#include "tdmgr_tdenumeration.hxx"
-
-using namespace com::sun::star;
-
-extern rtl_StandardModuleCount g_moduleCount;
-
-namespace stoc_tdmgr
-{
-
-//=========================================================================
-//=========================================================================
-//
-// TypeDescriptionEnumerationImpl Implementation.
-//
-//=========================================================================
-//=========================================================================
-
-TypeDescriptionEnumerationImpl::TypeDescriptionEnumerationImpl(
-        const rtl::OUString & rModuleName,
-        const com::sun::star::uno::Sequence<
-            com::sun::star::uno::TypeClass > & rTypes,
-        com::sun::star::reflection::TypeDescriptionSearchDepth eDepth,
-        const TDEnumerationAccessStack & rTDEAS )
-: m_aModuleName( rModuleName ),
-  m_aTypes( rTypes ),
-  m_eDepth( eDepth ),
-  m_aChildren( rTDEAS )
-{
-    ::g_moduleCount.modCnt.acquire( &::g_moduleCount.modCnt );
-}
-
-//=========================================================================
-// virtual
-TypeDescriptionEnumerationImpl::~TypeDescriptionEnumerationImpl()
-{
-    ::g_moduleCount.modCnt.release( &::g_moduleCount.modCnt );
-}
-
-//=========================================================================
-//
-// XEnumeration (base of XTypeDescriptionEnumeration) methods
-//
-//=========================================================================
-
-// virtual
-sal_Bool SAL_CALL TypeDescriptionEnumerationImpl::hasMoreElements()
-    throw ( uno::RuntimeException )
-{
-    uno::Reference< reflection::XTypeDescriptionEnumeration > xEnum
-        = queryCurrentChildEnumeration();
-    if ( xEnum.is() )
-        return xEnum->hasMoreElements();
-
-    return sal_False;
-}
-
-//=========================================================================
-// virtual
-uno::Any SAL_CALL TypeDescriptionEnumerationImpl::nextElement()
-    throw ( container::NoSuchElementException,
-            lang::WrappedTargetException,
-            uno::RuntimeException )
-{
-    uno::Reference< reflection::XTypeDescriptionEnumeration > xEnum
-        = queryCurrentChildEnumeration();
-    if ( xEnum.is() )
-        return xEnum->nextElement();
-
-    throw container::NoSuchElementException(
-        rtl::OUString(
-            RTL_CONSTASCII_USTRINGPARAM("No further elements in enumeration!") ),
-        static_cast< cppu::OWeakObject * >( this  ) );
-}
-
-//=========================================================================
-//
-// XTypeDescriptionEnumeration methods
-//
-//=========================================================================
-
-// virtual
-uno::Reference< reflection::XTypeDescription > SAL_CALL
-TypeDescriptionEnumerationImpl::nextTypeDescription()
-    throw ( container::NoSuchElementException,
-            uno::RuntimeException )
-{
-    uno::Reference< reflection::XTypeDescriptionEnumeration > xEnum
-        = queryCurrentChildEnumeration();
-    if ( xEnum.is() )
-        return xEnum->nextTypeDescription();
-
-    throw container::NoSuchElementException(
-        rtl::OUString(
-            RTL_CONSTASCII_USTRINGPARAM("No further elements in enumeration!") ),
-        static_cast< cppu::OWeakObject * >( this  ) );
-}
-
-//=========================================================================
-uno::Reference< reflection::XTypeDescriptionEnumeration >
-TypeDescriptionEnumerationImpl::queryCurrentChildEnumeration()
-{
-    osl::MutexGuard aGuard( m_aMutex );
-
-    for (;;)
-    {
-        if ( m_xEnum.is() )
-        {
-            if ( m_xEnum->hasMoreElements() )
-            {
-                return m_xEnum;
-            }
-            else
-            {
-                // Forget about enumeration without further elements. Try next.
-                m_xEnum.clear();
-            }
-        }
-
-        // Note: m_xEnum is always null here.
-
-        if ( m_aChildren.empty() )
-        {
-            // No child enumerations left.
-            return m_xEnum;
-        }
-
-        try
-        {
-            m_xEnum =
-                m_aChildren.top()->createTypeDescriptionEnumeration(
-                    m_aModuleName, m_aTypes, m_eDepth );
-        }
-        catch ( reflection::NoSuchTypeNameException const & )
-        {
-            OSL_FAIL( "TypeDescriptionEnumerationImpl::queryCurrentChildEnumeration "
-               "- Caught NoSuchTypeNameException!" );
-        }
-        catch ( reflection::InvalidTypeNameException const & )
-        {
-            OSL_FAIL( "TypeDescriptionEnumerationImpl::queryCurrentChildEnumeration "
-               "- Caught InvalidTypeNameException!" );
-        }
-
-        // We're done with this enumeration access in any case (Either
-        // enumeration was successfully created or creation failed for some
-        // reason).
-        m_aChildren.pop();
-    }
-
-    // unreachable
-}
-
-} // namespace stoc_tdmgr
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/stoc/source/tdmanager/tdmgr_tdenumeration.hxx b/stoc/source/tdmanager/tdmgr_tdenumeration.hxx
deleted file mode 100644
index d8ad3ffffb7b..000000000000
--- a/stoc/source/tdmanager/tdmgr_tdenumeration.hxx
+++ /dev/null
@@ -1,82 +0,0 @@
-/* -*- 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 .
- */
-
-#ifndef _STOC_TDMGR_TDENUMERATION_HXX
-#define _STOC_TDMGR_TDENUMERATION_HXX
-
-#include <stack>
-#include <osl/mutex.hxx>
-#include <com/sun/star/reflection/XTypeDescriptionEnumeration.hpp>
-#include <com/sun/star/reflection/XTypeDescriptionEnumerationAccess.hpp>
-#include <cppuhelper/implbase1.hxx>
-
-namespace stoc_tdmgr
-{
-
-typedef std::stack< com::sun::star::uno::Reference<
-            com::sun::star::reflection::XTypeDescriptionEnumerationAccess > >
-                TDEnumerationAccessStack;
-
-class TypeDescriptionEnumerationImpl
-    : public cppu::WeakImplHelper1<
-                com::sun::star::reflection::XTypeDescriptionEnumeration >
-{
-public:
-    TypeDescriptionEnumerationImpl(
-        const rtl::OUString & rModuleName,
-        const com::sun::star::uno::Sequence<
-            com::sun::star::uno::TypeClass > & rTypes,
-        com::sun::star::reflection::TypeDescriptionSearchDepth eDepth,
-        const TDEnumerationAccessStack & rTDEAS );
-    virtual ~TypeDescriptionEnumerationImpl();
-
-    // XEnumeration (base of XTypeDescriptionEnumeration)
-    virtual sal_Bool SAL_CALL hasMoreElements()
-        throw ( ::com::sun::star::uno::RuntimeException );
-    virtual ::com::sun::star::uno::Any SAL_CALL nextElement()
-        throw ( ::com::sun::star::container::NoSuchElementException,
-                ::com::sun::star::lang::WrappedTargetException,
-                ::com::sun::star::uno::RuntimeException );
-
-    // XTypeDescriptionEnumeration
-    virtual ::com::sun::star::uno::Reference<
-        ::com::sun::star::reflection::XTypeDescription > SAL_CALL
-    nextTypeDescription()
-        throw ( ::com::sun::star::container::NoSuchElementException,
-                ::com::sun::star::uno::RuntimeException );
-
-private:
-    com::sun::star::uno::Reference<
-        com::sun::star::reflection::XTypeDescriptionEnumeration >
-    queryCurrentChildEnumeration();
-
-    osl::Mutex m_aMutex;
-    rtl::OUString m_aModuleName;
-    com::sun::star::uno::Sequence< com::sun::star::uno::TypeClass > m_aTypes;
-    com::sun::star::reflection::TypeDescriptionSearchDepth m_eDepth;
-    TDEnumerationAccessStack m_aChildren;
-    com::sun::star::uno::Reference<
-        com::sun::star::reflection::XTypeDescriptionEnumeration > m_xEnum;
-};
-
-} // namespace stoc_tdmgr
-
-#endif /* _STOC_TDMGR_TDENUMERATION_HXX */
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/stoc/util/bootstrap.component b/stoc/util/bootstrap.component
index d6e9b0c4f03f..6642ebdead26 100644
--- a/stoc/util/bootstrap.component
+++ b/stoc/util/bootstrap.component
@@ -41,10 +41,6 @@
   <implementation name="com.sun.star.comp.stoc.SimpleRegistry">
     <service name="com.sun.star.registry.SimpleRegistry"/>
   </implementation>
-  <implementation name="com.sun.star.comp.stoc.TypeDescriptionManager">
-    <service name="com.sun.star.reflection.TypeDescriptionManager"/>
-    <singleton name="com.sun.star.reflection.theTypeDescriptionManager"/>
-  </implementation>
   <implementation name="com.sun.star.security.comp.stoc.AccessController">
     <service name="com.sun.star.security.AccessController"/>
   </implementation>