arr.h

Go to the documentation of this file.

#ifndef CSNIP_ARR_H
#define CSNIP_ARR_H
 
#include <stddef.h>
 
#include <csnip/err.h>
#include <csnip/mem.h>
#include <csnip/util.h>
#include <csnip/preproc.h>
 
#define csnip_arr_Init(a, n, cap, initial_cap, err) \
        do { \
            (n) = 0; \
            if (((cap) = (initial_cap)) > 0) { \
                csnip_mem_Alloc(initial_cap, a, err); \
            } else { \
                (a) = NULL; \
            } \
        } while(0)
 
#define csnip_arr_Reserve(a, n, cap, least_cap, err) \
    csnip_arr__Reserve((a), (n), (cap), (least_cap), (err), \
                csnip__i, csnip__err2)
 
#define csnip_arr__Reserve(a, n, cap, least_cap, err,       i, err2) \
    do { \
        size_t i = csnip_next_pow_of_2(csnip_Max(least_cap, n)); \
        if(i != (size_t)cap) { \
            int err2 = 0; \
            csnip_mem_Realloc(i, a, err2); \
            if (err2) { \
                csnip_err_Raise(err2, err); \
                break; \
            } \
            cap = i; \
        } \
    } while(0)
#define csnip_arr_Push(a, n, cap, value, err) \
        do { \
            int csnip_err = 0; \
            csnip_arr_Reserve(a, n, cap, (n) + 1, csnip_err); \
            if (csnip_err) { \
                csnip_err_Raise(csnip_err, err); \
                break; \
            } \
            (a)[(n)++] = (value); \
        } while(0)
 
#define csnip_arr_Pop(a, n, cap, err) \
        do { \
            if ((n) <= 0) { \
                csnip_err_Raise(csnip_err_UNDERFLOW, err); \
                break; \
            } \
            --(n); \
        } while(0);
 
 
#define csnip_arr_InsertAt(a, n, cap, index, val, err) \
        do { \
            int csnip_err = 0; \
            csnip_arr_Reserve(a, n, cap, (n) + 1, csnip_err); \
            if (csnip_err) { \
                csnip_err_Raise(csnip_err, err); \
                break; \
            } \
            for (int csnip_i = (n); csnip_i > (index); --csnip_i)\
            { \
                (a)[csnip_i] = (a)[csnip_i - 1]; \
            } \
            (a)[(index)] = (val); \
        } while(0)
 
#define csnip_arr_DeleteAt(a, n, cap, index, err) \
        do { \
            int csnip_i; \
            --(n); \
            for (csnip_i = (index); csnip_i < (n); ++csnip_i) \
            { \
                (a)[csnip_i] = (a)[csnip_i + 1]; \
            } \
        } while(0)
 
#define csnip_arr_Free(a, n, cap) \
        do { \
            csnip_mem_Free(a); \
            (n) = 0; \
            (cap) = 0; \
        } while(0)
 
#define CSNIP_ARR_DECL_FUNCS(scope, prefix, val_type, gen_args) \
        scope void prefix ## init(csnip_pp_prepend_##gen_args \
                    size_t cs); \
        scope void prefix ## reserve(csnip_pp_prepend_##gen_args \
                    size_t least_cap); \
        scope void prefix ## push(csnip_pp_prepend_##gen_args \
                    val_type v); \
        scope void prefix ## pop(csnip_pp_list_##gen_args); \
        scope void prefix ## insert_at(csnip_pp_prepend_##gen_args \
                    size_t i, val_type v); \
        scope void prefix ## delete_at(csnip_pp_prepend_##gen_args \
                    size_t i); \
        scope void prefix ## free(csnip_pp_list_##gen_args);
 
#define CSNIP_ARR_DEF_FUNCS(scope, prefix, val_type, gen_args, a, n, cap, err) \
        scope void prefix ## init(csnip_pp_prepend_##gen_args \
                    size_t cs) \
        { \
            csnip_arr_Init(a, n, cap, cs, err); \
        } \
        \
        scope void prefix ## reserve(csnip_pp_prepend_##gen_args \
                    size_t least_cap) \
        { \
            csnip_arr_Reserve(a, n, cap, least_cap, err); \
        } \
        \
        scope void prefix ## push(csnip_pp_prepend_##gen_args \
                    val_type v) \
        { \
            csnip_arr_Push(a, n, cap, v, err); \
        } \
        \
        scope void prefix ## pop(csnip_pp_list_##gen_args) \
        { \
            csnip_arr_Pop(a, n, cap, err); \
        } \
        \
        scope void prefix ## insert_at(csnip_pp_prepend_##gen_args \
            size_t i, val_type v) \
        { \
            csnip_arr_InsertAt(a, n, cap, i, v, err); \
        } \
        \
        scope void prefix ## delete_at(csnip_pp_prepend_##gen_args \
            size_t i) \
        { \
            csnip_arr_DeleteAt(a, n, cap, i, err); \
        } \
        scope void prefix ## free(csnip_pp_list_##gen_args) \
        { \
            csnip_arr_Free(a, n, cap); \
        }
#endif /* CSNIP_ARR_H */
 
#if defined(CSNIP_SHORT_NAMES) && !defined(CSNIP_ARR_HAVE_SHORT_NAMES)
#define arr_Init        csnip_arr_Init
#define arr_Reserve     csnip_arr_Reserve
#define arr_Push        csnip_arr_Push
#define arr_Pop         csnip_arr_Pop
#define arr_InsertAt        csnip_arr_InsertAt
#define arr_DeleteAt        csnip_arr_DeleteAt
#define arr_Free        csnip_arr_Free
#define CSNIP_ARR_HAVE_SHORT_NAMES
#endif /* CSNIP_SHORT_NAMES && !CSNIP_ARR_HAVE_SHORT_NAMES */