#include <stdlib.h>

#include "private.h"

/*--------------------------------------------------------- */
void *lub_dblockpool_alloc(lub_dblockpool_t * this)
{
	void *result = NULL;
	lub_dblockpool_chunk_t *chunk;
	unsigned chunk_count = 0;

	/* first find a chunk which can service this request */
	for (chunk = this->first_chunk; chunk; chunk = chunk->next) {
		chunk_count++;
		/* try and get a block from this chunk */
		result = lub_blockpool_alloc(&chunk->pool);
		if (NULL != result) {
			/* got some memory */
			break;
		}
	}
	if ((NULL == result)
	    && (!this->max_chunks || (chunk_count < this->max_chunks))) {
		/* dynamically allocate a new chunk */
		chunk =
		    malloc(sizeof(lub_dblockpool_chunk_t) +
			   (this->block_size * this->chunk_size));
		if (NULL != chunk) {
			/* configure the new chunk */
			chunk->next = this->first_chunk;
			lub_blockpool_init(&chunk->pool,
					   &chunk[1],
					   this->block_size, this->chunk_size);
			this->first_chunk = chunk;
			chunk->count = 0;

			/* now allocate the memory */
			result = lub_blockpool_alloc(&chunk->pool);
		}
	}
	if ((NULL != result) && (NULL != chunk)) {
		/* track the number of allocations */
		chunk->count++;
	}
	return result;
}

/*--------------------------------------------------------- */