williamr@2: /*
williamr@2:  * © Portions copyright (c) 2006-2007 Nokia Corporation.  All rights reserved.
williamr@2:  * Copyright (c) 1994
williamr@2:  * Hewlett-Packard Company
williamr@2:  *
williamr@2:  * Copyright (c) 1996,1997
williamr@2:  * Silicon Graphics Computer Systems, Inc.
williamr@2:  *
williamr@2:  * Copyright (c) 1997
williamr@2:  * Moscow Center for SPARC Technology
williamr@2:  *
williamr@2:  * Copyright (c) 1999 
williamr@2:  * Boris Fomitchev
williamr@2:  *
williamr@2:  * This material is provided "as is", with absolutely no warranty expressed
williamr@2:  * or implied. Any use is at your own risk.
williamr@2:  *
williamr@2:  * Permission to use or copy this software for any purpose is hereby granted 
williamr@2:  * without fee, provided the above notices are retained on all copies.
williamr@2:  * Permission to modify the code and to distribute modified code is granted,
williamr@2:  * provided the above notices are retained, and a notice that the code was
williamr@2:  * modified is included with the above copyright notice.
williamr@2:  *
williamr@2:  */
williamr@2: 
williamr@2: /* NOTE: This is an internal header file, included by other STL headers.
williamr@2:  *   You should not attempt to use it directly.
williamr@2:  */
williamr@2: 
williamr@2: #ifndef _STLP_INTERNAL_CONSTRUCT_H
williamr@2: #define _STLP_INTERNAL_CONSTRUCT_H
williamr@2: 
williamr@2: #ifdef _STLP_USE_TRAP_LEAVE
williamr@2: #include <e32base.h>
williamr@2: #endif // _STLP_USE_TRAP_LEAVE
williamr@2: 
williamr@2: # if defined (_STLP_DEBUG_UNINITIALIZED) && ! defined (_STLP_CSTRING)
williamr@2: # include <cstring>
williamr@2: # endif
williamr@2: 
williamr@2: # ifndef _STLP_INTERNAL_NEW_HEADER
williamr@2: #  include <stl/_new.h>
williamr@2: # endif
williamr@2: 
williamr@2: 
williamr@2: #ifndef _STLP_INTERNAL_ITERATOR_BASE_H
williamr@2: # include <stl/_iterator_base.h>
williamr@2: #endif
williamr@2: 
williamr@2: _STLP_BEGIN_NAMESPACE
williamr@2: 
williamr@2: # ifdef _STLP_TRIVIAL_DESTRUCTOR_BUG
williamr@2: template <class _Tp>
williamr@2: inline void __destroy_aux(_Tp* __pointer, const __false_type&) { __pointer->~_Tp(); }
williamr@2: template <class _Tp>
williamr@2: inline void __destroy_aux(_Tp* __pointer, const __true_type&) {}
williamr@2: # endif
williamr@2: 
williamr@2: template <class _Tp>
williamr@2: inline void _Destroy(_Tp* __pointer) {
williamr@2: # if _MSC_VER >= 1010
williamr@2:   __pointer;
williamr@2: # endif	// _MSC_VER >= 1000
williamr@2: # ifdef _STLP_TRIVIAL_DESTRUCTOR_BUG
williamr@2:   typedef typename __type_traits<_Tp>::has_trivial_destructor _Trivial_destructor;
williamr@2:   __destroy_aux(__pointer, _Trivial_destructor());
williamr@2: # else
williamr@2: #  if ( defined (__BORLANDC__) && ( __BORLANDC__ < 0x500 ) )
williamr@2:     __pointer->_Tp::~_Tp();
williamr@2: #  else
williamr@2:     __pointer->~_Tp();
williamr@2: #  endif
williamr@2: # endif
williamr@2: # ifdef _STLP_DEBUG_UNINITIALIZED
williamr@2: 	memset((char*)__pointer, _STLP_SHRED_BYTE, sizeof(_Tp));
williamr@2: # endif
williamr@2: }
williamr@2: 
williamr@2: # if defined (new)
williamr@2: #   define _STLP_NEW_REDEFINE new
williamr@2: #   undef new
williamr@2: # endif 
williamr@2: 
williamr@2: # ifdef _STLP_DEFAULT_CONSTRUCTOR_BUG
williamr@2: template <class _T1>
williamr@2: inline void _Construct_aux (_T1* __p, const __false_type&) {
williamr@2: _STLP_PLACEMENT_NEW (__p) _T1();
williamr@2: }
williamr@2: 
williamr@2: template <class _T1>
williamr@2: inline void _Construct_aux (_T1* __p, const __true_type&) {
williamr@2: _STLP_PLACEMENT_NEW (__p) _T1(0);
williamr@2: }
williamr@2: # endif
williamr@2: 
williamr@2: template <class _T1, class _T2>
williamr@2: inline void _Construct(_T1* __p, const _T2& __val) {
williamr@2: # ifdef _STLP_DEBUG_UNINITIALIZED
williamr@2: 	memset((char*)__p, _STLP_SHRED_BYTE, sizeof(_T1));
williamr@2: # endif
williamr@2:     _STLP_PLACEMENT_NEW (__p) _T1(__val);
williamr@2: }
williamr@2: 
williamr@2: template <class _T1>
williamr@2: inline void _Construct(_T1* __p) {
williamr@2: # ifdef _STLP_DEBUG_UNINITIALIZED
williamr@2:   memset((char*)__p, _STLP_SHRED_BYTE, sizeof(_T1));
williamr@2: # endif
williamr@2: # ifdef _STLP_DEFAULT_CONSTRUCTOR_BUG
williamr@2: typedef typename _Is_integer<_T1>::_Integral _Is_Integral;
williamr@2: _Construct_aux (__p, _Is_Integral() );
williamr@2: # else
williamr@2:   _STLP_PLACEMENT_NEW (__p) _T1();
williamr@2: # endif
williamr@2: }
williamr@2: 
williamr@2: # if defined(_STLP_NEW_REDEFINE)
williamr@2: # ifdef DEBUG_NEW
williamr@2: #  define new DEBUG_NEW
williamr@2: # endif
williamr@2: #  undef _STLP_NEW_REDEFINE
williamr@2: # endif 
williamr@2: 
williamr@2: template <class _ForwardIterator>
williamr@2: _STLP_INLINE_LOOP void
williamr@2: __destroy_aux(_ForwardIterator __first, _ForwardIterator __last, const __false_type&) {
williamr@2:   for ( ; __first != __last; ++__first)
williamr@2:     _STLP_STD::_Destroy(&*__first);
williamr@2: }
williamr@2: 
williamr@2: template <class _ForwardIterator> 
williamr@2: inline void __destroy_aux(_ForwardIterator, _ForwardIterator, const __true_type&) {}
williamr@2: 
williamr@2: template <class _ForwardIterator, class _Tp>
williamr@2: inline void 
williamr@2: __destroy(_ForwardIterator __first, _ForwardIterator __last, _Tp*) {
williamr@2:   typedef typename __type_traits<_Tp>::has_trivial_destructor _Trivial_destructor;
williamr@2:   __destroy_aux(__first, __last, _Trivial_destructor());
williamr@2: }
williamr@2: 
williamr@2: template <class _ForwardIterator>
williamr@2: inline void _Destroy(_ForwardIterator __first, _ForwardIterator __last) {
williamr@2:   __destroy(__first, __last, _STLP_VALUE_TYPE(__first, _ForwardIterator));
williamr@2: }
williamr@2: 
williamr@2: inline void _Destroy(char*, char*) {}
williamr@2: # ifdef _STLP_HAS_WCHAR_T // dwa 8/15/97
williamr@2: inline void _Destroy(wchar_t*, wchar_t*) {}
williamr@2: inline void _Destroy(const wchar_t*, const wchar_t*) {}
williamr@2: # endif
williamr@2: 
williamr@2: # ifndef _STLP_NO_ANACHRONISMS
williamr@2: // --------------------------------------------------
williamr@2: // Old names from the HP STL.
williamr@2: 
williamr@2: template <class _T1, class _T2>
williamr@2: inline void construct(_T1* __p, const _T2& __val) {_Construct(__p, __val); }
williamr@2: template <class _T1>
williamr@2: inline void construct(_T1* __p) { _Construct(__p); }
williamr@2: template <class _Tp>
williamr@2: inline void destroy(_Tp* __pointer) {  _STLP_STD::_Destroy(__pointer); }
williamr@2: template <class _ForwardIterator>
williamr@2: inline void destroy(_ForwardIterator __first, _ForwardIterator __last) { _STLP_STD::_Destroy(__first, __last); }
williamr@2: # endif
williamr@2: 
williamr@2: #ifdef _STLP_USE_TRAP_LEAVE
williamr@2: 
williamr@2: struct TCleanupOverlay
williamr@2: {
williamr@2:     TAny *vtable;
williamr@2:     TAny *iBase;
williamr@2:     TAny *iTop;
williamr@2:     TAny *iNext;
williamr@2: };
williamr@2: 
williamr@2: template <class _Tp>
williamr@2: struct _STLP_StackHelper {
williamr@2:   static unsigned int Check( void *ptr );
williamr@2:   static void* _NewLC (size_t __n);
williamr@2: };
williamr@2: 
williamr@2: struct _STLP_StackPopper {
williamr@2:   ~_STLP_StackPopper() { CleanupStack::Pop(); }
williamr@2: };
williamr@2: 
williamr@2: template <class _Tp>
williamr@2: struct _STLP_Cleanup {
williamr@2:   static void clear(TAny* __p);
williamr@2: };
williamr@2: 
williamr@2: # define _STLP_PUSH_CLEANUP_ITEM(_Tp, __p)  CleanupStack::PushL(TCleanupItem(&_STLP_Cleanup< _Tp >::clear, (TAny*)__p));
williamr@2: # define _STLP_PUSH_STACK_ITEM(_Tp, __p)  _STLP_PUSH_CLEANUP_ITEM(_Tp, __p)   _STLP_StackPopper __Popper; _STLP_no_unused_variable_warning( __Popper );
williamr@2: # define _STLP_POP_IF_CHECK if (_STLP_StackHelper<bool>::Check(this)) CleanupStack::Pop();
williamr@2: # define _STLP_POP_CLEANUP_ITEM CleanupStack::Pop(); _STLP_POP_IF_CHECK
williamr@2: 
williamr@2: # define _STLP_POP_ITEM CleanupStack::Pop();
williamr@2: 
williamr@2: // to be used in complex object constructors
williamr@2: template <class _Tp>
williamr@2: struct _STLP_StackPusher {
williamr@2:   _STLP_StackPusher(_Tp * __p) { _STLP_PUSH_CLEANUP_ITEM(_Tp, (void*)__p) }
williamr@2: };
williamr@2: 
williamr@2: template <class _Tp>
williamr@2: unsigned int _STLP_StackHelper<_Tp>::Check( void *ptr )
williamr@2: 
williamr@2: {
williamr@2:     TCleanupTrapHandler *handler =
williamr@2:         (TCleanupTrapHandler *)User::TrapHandler();
williamr@2: 
williamr@2:     CCleanup &cleanup = handler->Cleanup();
williamr@2: 
williamr@2:     TCleanupOverlay *overlay = (TCleanupOverlay *)( &cleanup );
williamr@2: 
williamr@2:     char *raw = (char *)(overlay->iNext) - 4;
williamr@2:     void *topptr = *( (void **)(raw) );
williamr@2: 
williamr@2:     return ( ptr == topptr );
williamr@2: } 
williamr@2: 
williamr@2: 
williamr@2: template <class _Tp>
williamr@2: void* _STLP_StackHelper<_Tp>::_NewLC(size_t __n) { 
williamr@2:   void* __p = ::operator new (__n, ELeave) ; 
williamr@2:   // constructor will pop it back
williamr@2:   CleanupStack::PushL(__p); 
williamr@2:   return __p;
williamr@2: }
williamr@2: 
williamr@2: template <class _Tp>
williamr@2: void _STLP_Cleanup<_Tp>::clear(TAny* __p)
williamr@2: {
williamr@2:   ((_Tp*)__p)->~_Tp();
williamr@2: }
williamr@2: 
williamr@2: 
williamr@2: #else
williamr@2: # define _STLP_PUSH_CLEANUP_ITEM(_Tp, __p)
williamr@2: # define _STLP_POP_CLEANUP_ITEM
williamr@2: # define _STLP_PUSH_STACK_ITEM(_Tp, p)
williamr@2: # define _STLP_POP_ITEM
williamr@2: # define _STLP_POP_IF_CHECK
williamr@2: # define TPush TLeave
williamr@2: #endif
williamr@2: 
williamr@2: _STLP_END_NAMESPACE
williamr@2: 
williamr@2: #endif /* _STLP_INTERNAL_CONSTRUCT_H */
williamr@2: 
williamr@2: // Local Variables:
williamr@2: // mode:C++
williamr@2: // End: