#include <global.h>

ListAlloc* ListAlloc_Init(ListAlloc* this)
{
    this->prev = NULL;
    this->next = NULL;
    return this;
}

void* ListAlloc_Alloc(ListAlloc* this, u32 size)
{
    ListAlloc* ptr;
    ListAlloc* next;
    
    ptr = SystemArena_MallocDebug(size + sizeof(ListAlloc), "../listalloc.c", 40);
    if (!ptr)
        return NULL;

    next = this->next;

    if (next)
        next->next = ptr;
    
    ptr->prev = next;
    ptr->next = NULL;
    this->next = ptr;

    if (!this->prev)
        this->prev = ptr;

    return (u8*)ptr + sizeof(ListAlloc);
}

void ListAlloc_Free(ListAlloc* this, void* data)
{
    ListAlloc* ptr;

    ptr = &((ListAlloc*)data)[-1];

    if (ptr->prev)
        ptr->prev->next = ptr->next;

    if (ptr->next)
        ptr->next->prev = ptr->prev;

    if (this->prev == ptr)
        this->prev = ptr->next;

    if (this->next == ptr)
        this->next = ptr->prev;

    SystemArena_FreeDebug(ptr, "../listalloc.c", 72);
}

void ListAlloc_FreeAll(ListAlloc* this)
{
    ListAlloc* iter;

    iter = this->prev;
    while (iter)
    {
        ListAlloc_Free(this, (u8*)iter + sizeof(ListAlloc));
        iter = this->prev;
    }
}