// Copyright (c) 2017-2024, Mudita Sp. z.o.o. All rights reserved.
// For licensing, see https://github.com/mudita/MuditaOS/blob/master/LICENSE.md

//
// Created by mati on 08.05.19.
//

#include <stddef.h>
#include <string.h>
#include <stdint.h>
#include <time.h>

#include "memory/usermem.h"

void free(void *pv)
{
#if PROJECT_CONFIG_MEM_LEAKS_CHECKS == 1
    uint32_t caller = (uint32_t)__builtin_return_address(0);
    memleaks_log_free((uint32_t)pv, caller);
#endif
    return userfree(pv);
}

void *malloc(size_t xWantedSize)
{
    void *ptr = usermalloc(xWantedSize);

#if PROJECT_CONFIG_MEM_LEAKS_CHECKS == 1
    uint32_t caller = (uint32_t)__builtin_return_address(0);
    memleaks_log_malloc((uint32_t)ptr, (uint32_t)caller, xWantedSize);
#endif

    return ptr;
}

void *_malloc_r(struct _reent *r, size_t sz)
{
    void *ptr = usermalloc(sz);

#if PROJECT_CONFIG_MEM_LEAKS_CHECKS == 1
    uint32_t caller = (uint32_t)__builtin_return_address(0);
    memleaks_log_malloc((uint32_t)ptr, (uint32_t)caller, sz);
#endif

    return ptr;
}

void *calloc(size_t num, size_t size)
{
    size_t total = num * size;
    void *p      = usermalloc(total);

#if PROJECT_CONFIG_MEM_LEAKS_CHECKS == 1
    uint32_t caller = (uint32_t)__builtin_return_address(0);
    memleaks_log_malloc((uint32_t)p, (uint32_t)caller, total);
#endif

    if (!p)
        return NULL;

    return memset(p, 0, total);
}

void *realloc(void *aptr, size_t nbytes)
{
    return userrealloc(aptr, nbytes);
}

void *_calloc_r(struct _reent *r, size_t a, size_t b)
{
    size_t total = a * b;
    void *p      = usermalloc(total);

#if PROJECT_CONFIG_MEM_LEAKS_CHECKS == 1
    uint32_t caller = (uint32_t)__builtin_return_address(0);
    memleaks_log_malloc((uint32_t)p, (uint32_t)caller, total);
#endif

    if (!p)
        return NULL;

    return memset(p, 0, total);
}

void _free_r(struct _reent *r, void *x)
{
#if PROJECT_CONFIG_MEM_LEAKS_CHECKS == 1
    uint32_t caller = (uint32_t)__builtin_return_address(0);
    memleaks_log_free((uint32_t)x, caller);
#endif
    return userfree(x);
}

void *_realloc_r(struct _reent *r, void *x, size_t sz)
{
    return realloc(x, sz);
}

void _putchar(char character)
{
    // Use of printf is banned
}