Method pool_init

src/microReticulum/Utilities/Memory.cpp:83–182

static*/

/*static*/ void Memory::pool_init(Memory::pool_info& pool_info) {
	if (pool_info.pool_init) {
		return;
	}
	pool_info.pool_init = true;
	printf("Initializing TLSF pool...\n");

#if defined(ESP32)
	heap_pool_info.contiguous_size = ESP.getMaxAllocHeap();
	psram_pool_info.contiguous_size = ESP.getMaxAllocPsram();
	altheap_pool_info.contiguous_size = ESP.getMaxAllocHeap();
	printf("TLSF: Heap contiguous_size: %u\n", ESP.getMaxAllocHeap());
	printf("TLSF: PSRAM contiguous_size: %u\n", ESP.getMaxAllocPsram());
	printf("TLSF: contiguous_size: %u\n", pool_info.contiguous_size);
	if (pool_info.buffer_size == 0) {
		// CBA NOTE Using fp mathhere somehow causes tlsf_create_with_pool() to fail.
		//pool_info.buffer_size = (size_t)(pool_info.contiguous_size * BUFFER_FRACTION);
		// Compute 80% exactly using integers
		pool_info.buffer_size = (pool_info.contiguous_size * 4) / 5;
	}
	// Round DOWN to TLSF alignment
	size_t align = tlsf_align_size();
	pool_info.buffer_size &= ~(align - 1);
	void* raw_buffer = nullptr;
	// If pool type is PSRAM then allocate pool buffer from PSRAM
	if (pool_info.type == RNS_PSRAM_POOL_ALLOCATOR) {
		raw_buffer = (void*)ps_malloc(pool_info.buffer_size);
	}
	// Otherwise just allocate from heap
	else {
		raw_buffer = (void*)aligned_alloc(align, pool_info.buffer_size);
	}
#elif defined(ARDUINO_ARCH_NRF52) || defined(ARDUINO_NRF52_ADAFRUIT)
	heap_pool_info.contiguous_size = dbgHeapFree();
	altheap_pool_info.contiguous_size = dbgHeapFree();
	TRACEF("TLSF: contiguous_size: %u", pool_info.contiguous_size);
	TRACEF("TLSF: buffer_size: %u", pool_info.buffer_size);
	// If buffer size is unset the set based on fraction of contiguous size
	if (pool_info.buffer_size == 0) {
		pool_info.buffer_size = (size_t)(pool_info.contiguous_size * BUFFER_FRACTION);
	}
	// CBA TODO: Check request buffer size against available SRAM and adjust down if necessary (never up)
	// For NRF52 round to kB
	pool_info.buffer_size = (size_t)(pool_info.buffer_size / 1024) * 1024;
	TRACEF("TLSF: buffer_size: %u", pool_info.buffer_size);
	void* raw_buffer = malloc(pool_info.buffer_size);
/*
	// CBA Try reducing allocation size until it succeeds
	void* raw_buffer = nullptr;
	for (uint8_t count = 0; raw_buffer == nullptr && count < 10; ++count) {
		// For NRF52 round to kB
		pool_info.buffer_size = (size_t)(pool_info.buffer_size / 1024) * 1024;
		TRACEF("TLSF: buffer_size: %u", pool_info.buffer_size);
		raw_buffer = malloc(pool_info.buffer_size);
		// If allocation fails then reduce size by 10%
		if (raw_buffer == nullptr) pool_info.buffer_size -= (size_t)(pool_info.buffer_size * 0.1);
	}
*/