pool.h

Go to the documentation of this file.

#ifndef CTL_POOL_H
#define CTL_POOL_H

#define ctl_fp_decl(type,count, label )\
typedef type ppConcat(label,_type);\
struct ppConcat(label,_freenode)\
{\
    struct ppConcat(label,_freenode)* free;\
};\
typedef struct label\
{\
    struct ppConcat(label,_freenode)* free;\
    type    data[count];\
} label;

#define ctl_fp_init(label, instance )\
{\
    size_t fpicurr = countof((instance)->data);\
    (instance)->free = NULL;\
    while( fpicurr-- )\
    {\
        struct ppConcat(label,_freenode)* fpipCurr = (struct ppConcat(label,_freenode)*) ((instance)->data + fpicurr);\
        fpipCurr->free = (instance)->free;\
        (instance)->free = fpipCurr;\
    }\
}

#define ctl_fp_valid(label, instance, ptr )     memberof((instance)->data,(ppConcat(label,_type)*)(ptr))

#define ctl_fp_index(label, instance, ptr )     indexof((instance)->data,(ppConcat(label,_type)*)(ptr))

#define ctl_fp_lut(label, instance, index )     ( ((unsigned)(index) < sizeof(instance->data)) ? instance->data + (index) : NULL )

#define ctl_fp_alloc(label, instance, result )\
{\
    (result) = (ppConcat(label,_type)*)(instance)->free;\
    /* Assert: memory link damage? */\
    assert( NULL == (result) || ctl_fp_valid(label, instance, (result) ) );\
    if( (instance)->free )\
        (instance)->free = (instance)->free->free;\
}

#define ctl_fp_calloc(label, instance, result )\
{\
    ctl_fp_alloc(label, instance, result );\
    memset((result),0,sizeof(ppConcat(label,_type)));\
}

#define ctl_fp_free(label, instance, ptr )\
{\
    if( (ptr) )\
    {\
        struct ppConcat(label,_freenode)* fpipfree = (struct ppConcat(label,_freenode)*)(ptr);\
        /* Assert: Memory pointer must belong to this pool */\
        assert( ctl_fp_valid(label, instance, ptr ) );\
        fpipfree->free = (instance)->free;\
        (instance)->free = fpipfree;\
        (ptr) = NULL;\
    }\
}


#endif /* CTL_POOL_H */