poolallocator.t.inl

Go to the documentation of this file.

//==================================================================================================
/// \file
/// This implementation file is part of module \alib_monomem of the \aliblong.
/// It may be used to instantiate custom versions of \alib{monomem;TPoolAllocator}, working with
/// different alignments or a different \ref alib_contmono_chaining "chained" allocator.
///
/// @see Manual section \ref alib_manual_appendix_t_inl_files about the nature of ".t.inl"-files.
///
/// \emoji :copyright: 2013-2025 A-Worx GmbH, Germany.
/// Published under \ref mainpage_license "Boost Software License".
//==================================================================================================
#if !DOXYGEN
 
namespace alib::monomem {
 
//================================ Construction/Destruction/Deletion ===============================
template<typename TAllocator, size_t TAlignment>
TPoolAllocator<TAllocator,TAlignment>::TPoolAllocator   ( TAllocator& pAllocator )
: allocMember(pAllocator)
#if ALIB_DEBUG_CRITICAL_SECTIONS
,lang::DbgCriticalSections("PoolAllocator")
#endif
ALIB_DBG(,DbgName(pAllocator.DbgName))
{
    #if defined(_WIN32) // otherwise statically asserted in header
    ALIB_ASSERT_ERROR(lang::BitCount(TAlignment) == 1, "MONOMEM",
            "The fixed alignment {} of the pool allocator is not a power of 2. "
            "Adjust template parameter TAlignment.", TAlignment )
    #endif
 
    // allocate and initialize hook array
    hooks= allocMember::AI().template AllocArray<void*>(qtyHooks() );
    std::memset( hooks, 0, sizeof( void*[qtyHooks()] ) );
    #if ALIB_DEBUG_ALLOCATIONS
        dbgOpenAllocations= allocMember::AI().template AllocArray<int>(qtyHooks() );
        std::memset( dbgOpenAllocations, 0, sizeof( int[qtyHooks()] ) );
    #endif
    #if ALIB_DEBUG_MEMORY
        dbgStatAllocCounter= allocMember::AI().template AllocArray<uinteger>(qtyHooks() );
        std::memset( dbgStatAllocCounter, 0, sizeof( uinteger[qtyHooks()] ) );
    #endif
}
 
template<typename TAllocator, size_t TAlignment>
TPoolAllocator<TAllocator,TAlignment>::~TPoolAllocator   () {
    if ( hooks == nullptr )
        return;
 
    deletePool();
    allocMember::AI().template FreeArray<void*>(hooks, qtyHooks());
    ALIB_DBG( hooks= nullptr; )
 
    #if ALIB_DEBUG_ALLOCATIONS
        for (short i = 0; i < qtyHooks(); ++i) {
            if ( dbgOpenAllocations[i] > 0)
                ALIB_WARNING( "MONOMEM",
                      "PoolAllocator '{}' destructor: There are still {} objects of size {}"
                      " not freed.\n This indicates a potential memory leak.",
                      DbgName, dbgOpenAllocations[i], GetAllocationSize(i)  )
        }
        allocMember::AI().template FreeArray<int>(dbgOpenAllocations, qtyHooks() );
    #endif
    #if ALIB_DEBUG_MEMORY
        allocMember::AI().template DeleteArray<uinteger>(dbgStatAllocCounter, qtyHooks() );
    #endif
 
}
 
 
template<typename TAllocator, size_t TAlignment>
void TPoolAllocator<TAllocator,TAlignment>::deletePool() {
    for (int idx = 0; idx < qtyHooks(); ++idx) {
        size_t allocSize= lang::DbgAlloc::extSize( size_t(1) <<  (idx + minimumHookIndex()) );
        void* elem= hooks[idx];
        while( elem ) {
            void* next= *reinterpret_cast<void**>( elem );
            allocMember::GetAllocator().free( elem, allocSize );
            elem= next;
}   }   }
 
 
//============================================ Allocation ==========================================
template<typename TAllocator, size_t TAlignment>
void* TPoolAllocator<TAllocator,TAlignment>::reallocate( void*   mem,
                                                         size_t  oldSize,
                                                         size_t& newSize,
                                                         size_t  pAlignment ) {
    short oldSizeIdx;
    short newSizeIdx;
 
    {ALIB_DCS
 
        ALIB_ASSERT_ERROR(pAlignment <= TAlignment, "MONOMEM",
           "The requested alignment is higher than what was specified with "
           "template parameter TAlignment: {} >= {}", pAlignment, TAlignment )
        (void) pAlignment;
 
        oldSizeIdx=   hookIndex(oldSize);
        newSizeIdx=   hookIndex(newSize);
        if(  newSizeIdx == oldSizeIdx )
            return mem;
 
        newSize=  GetAllocationSize(newSizeIdx);
    }
 
    auto newMem= AllocateByAllocationInfo( newSizeIdx );
    std::memcpy( newMem, mem, oldSize );
    #if ALIB_DEBUG_ALLOCATIONS
    dbgLastRequestedSize= oldSize;
    #endif
    FreeByAllocationInfo( oldSizeIdx, mem );
    return newMem;
}
 
template<typename TAllocator, size_t TAlignment>
void*    TPoolAllocator<TAllocator,TAlignment>::AllocateByAllocationInfo(int allocInfo)    {ALIB_DCS
    #if ALIB_DEBUG_ALLOCATIONS
        // if not set, then this method had been called directly from outside and we store
        // the hook index instead of the true requested size.
        if( dbgLastRequestedSize == 0 )
            dbgLastRequestedSize= size_t(allocInfo);
    #endif
 
    #if ALIB_DEBUG_ALLOCATIONS
        ++dbgOpenAllocations[allocInfo];
    #endif
    #if ALIB_DEBUG_MEMORY
        ++dbgStatAllocCounter[allocInfo];
    #endif
 
    void** hook= &hooks[allocInfo];
 
    // found a recyclable?
    if( *hook ) {
        void* mem= *hook;
        *hook= *reinterpret_cast<void**>(mem);
 
        #if ALIB_DEBUG_ALLOCATIONS
            lang::DbgAlloc::annotate( mem, dbgLastRequestedSize, MAGIC );
            dbgLastRequestedSize= 0;
        #endif
        return mem;
    }
 
    // create a new object, as no recyclable is available
    size_t allocSize= lang::DbgAlloc::extSize( size_t(1) <<  (allocInfo + minimumHookIndex()) );
    auto* mem= allocMember::AI().Alloc( allocSize, TAlignment );
 
    #if ALIB_DEBUG_ALLOCATIONS
        lang::DbgAlloc::annotate( mem, dbgLastRequestedSize, MAGIC );
        dbgLastRequestedSize= 0;
    #endif
 
    return mem;
}
 
//============================================== Other =============================================
 
template<typename TAllocator, size_t TAlignment>
integer TPoolAllocator<TAllocator,TAlignment>::TPoolAllocator::GetPoolSize(size_t size) {
    integer result= 0;
    void* node= hooks[hookIndex(size)];
    while( node ) {
        node= *reinterpret_cast<void**>(node);
        ++result;
    }
    return result;
}
 
} // namespace [alib::monomem]
 
#endif //  !DOXYGEN