Function free_impl

examples/stdlib.c:2265–2297

}

static void free_impl(struct malloc_pool_s *pool, void *ptr, bool lock)
{
    if (ptr == NULL || ptr == MA_ZERO)
        return;

    pool = pool_init(pool);
    if ((uint8_t *)ptr < pool->base ||
            (uint8_t *)ptr >= pool->base + MA_UNIT * (size_t)pool->end)
        panic("bad free() detected");
    if ((uintptr_t)ptr % MA_UNIT != 0)
        panic("bad free() detected");
    off_t diff = (uint8_t *)ptr - pool->base - sizeof(struct malloc_node_s);
    uint32_t i = (uint32_t)(diff / MA_UNIT);

    if (lock && mutex_lock(&pool->mutex) < 0)
        panic("failed to acquire malloc() lock");

    uint32_t n = pool->root;
    while (true)
    {
        if (n == MA_NIL)
            panic("bad free() detected");
        if (n == i)
        {
            if (MA_MAGIC(pool, n) != MA_MAGIC_NUMBER)
                panic("bad free() detected");
            malloc_remove(pool, n);
            if (lock) mutex_unlock(&pool->mutex);
            return;
        }
        n = (i < n? MA_LEFT(pool, n): MA_RIGHT(pool, n));
    }
}

static void *calloc_impl(struct malloc_pool_s *pool, size_t nmemb,
    size_t size, bool lock)