19720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block/* 29720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block * 39720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block * Copyright (c) 1996,1997 49720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block * Silicon Graphics Computer Systems, Inc. 59720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block * 69720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block * Copyright (c) 1997 79720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block * Moscow Center for SPARC Technology 89720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block * 99720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block * Copyright (c) 1999 109720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block * Boris Fomitchev 119720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block * 129720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block * This material is provided "as is", with absolutely no warranty expressed 139720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block * or implied. Any use is at your own risk. 149720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block * 159720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block * Permission to use or copy this software for any purpose is hereby granted 169720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block * without fee, provided the above notices are retained on all copies. 179720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block * Permission to modify the code and to distribute modified code is granted, 189720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block * provided the above notices are retained, and a notice that the code was 199720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block * modified is included with the above copyright notice. 209720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block * 219720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block */ 229720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block#ifndef _STLP_ALLOC_C 239720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block#define _STLP_ALLOC_C 249720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block 259720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block#ifndef _STLP_INTERNAL_ALLOC_H 269720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block# include <stl/_alloc.h> 279720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block#endif 289720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block 299720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block#if defined (__WATCOMC__) 309720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block# pragma warning 13 9 319720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block# pragma warning 367 9 329720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block# pragma warning 368 9 339720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block#endif 349720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block 359720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block_STLP_BEGIN_NAMESPACE 369720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block 379720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Blocktemplate <class _Alloc> 389720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Blockvoid * _STLP_CALL __debug_alloc<_Alloc>::allocate(size_t __n) { 399720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block size_t __total_extra = __extra_before_chunk() + __extra_after_chunk(); 409720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block size_t __real_n = __n + __total_extra; 419720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block if (__real_n < __n) { 42e46c9386c4f79aa40185f79a19fc5b2a7ef528b3Patrick Scott //It means that we rolled on size_t, __n must be very large: 43e46c9386c4f79aa40185f79a19fc5b2a7ef528b3Patrick Scott _STLP_THROW_BAD_ALLOC; 449720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block } 459720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block __alloc_header *__result = (__alloc_header *)__allocator_type::allocate(__real_n); 469720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block memset((char*)__result, __shred_byte, __real_n * sizeof(value_type)); 479720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block __result->__magic = __magic; 489720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block __result->__type_size = sizeof(value_type); 499720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block __result->_M_size = (_STLP_UINT32_T)__n; 509720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block return ((char*)__result) + (long)__extra_before; 519720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block} 529720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block 539720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Blocktemplate <class _Alloc> 549720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Blockvoid _STLP_CALL 559720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block__debug_alloc<_Alloc>::deallocate(void *__p, size_t __n) { 569720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block __alloc_header * __real_p = (__alloc_header*)((char *)__p -(long)__extra_before); 579720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block // check integrity 589720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block _STLP_VERBOSE_ASSERT(__real_p->__magic != __deleted_magic, _StlMsg_DBA_DELETED_TWICE) 599720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block _STLP_VERBOSE_ASSERT(__real_p->__magic == __magic, _StlMsg_DBA_NEVER_ALLOCATED) 609720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block _STLP_VERBOSE_ASSERT(__real_p->__type_size == 1,_StlMsg_DBA_TYPE_MISMATCH) 619720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block _STLP_VERBOSE_ASSERT(__real_p->_M_size == __n, _StlMsg_DBA_SIZE_MISMATCH) 629720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block // check pads on both sides 639720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block unsigned char* __tmp; 649720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block for (__tmp = (unsigned char*)(__real_p + 1); __tmp < (unsigned char*)__p; ++__tmp) { 659720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block _STLP_VERBOSE_ASSERT(*__tmp == __shred_byte, _StlMsg_DBA_UNDERRUN) 669720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block } 679720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block 689720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block size_t __real_n = __n + __extra_before_chunk() + __extra_after_chunk(); 699720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block 709720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block for (__tmp= ((unsigned char*)__p) + __n * sizeof(value_type); 719720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block __tmp < ((unsigned char*)__real_p) + __real_n ; ++__tmp) { 729720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block _STLP_VERBOSE_ASSERT(*__tmp == __shred_byte, _StlMsg_DBA_OVERRUN) 739720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block } 749720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block 759720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block // that may be unfortunate, just in case 769720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block __real_p->__magic = __deleted_magic; 779720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block memset((char*)__p, __shred_byte, __n * sizeof(value_type)); 789720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block __allocator_type::deallocate(__real_p, __real_n); 799720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block} 809720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block 819720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block_STLP_END_NAMESPACE 829720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block 839720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block#endif /* _STLP_ALLOC_C */ 849720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block 859720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block// Local Variables: 869720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block// mode:C++ 879720d5f59b9c1f5d1b9ecbc9173dbcb71bd557beSteve Block// End: 88