123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257 |
- #include <stdlib.h>
- #include <string.h>
- #include <stdio.h>
- #include "mem.h"
- void * exit_if_null(void * ptr, char * message) {
- if(!ptr) {
- if(message) {
- fprintf(stderr, "%s\n", message);
- }
- exit(EXIT_FAILURE);
- }
- return ptr;
- }
- #define EXIT_ON_NOMEMORY(PTR) exit_if_null(PTR, "Out of memory!")
- void * mem_calloc(size_t amount, size_t size) {
- void * ptr = calloc(amount, size);
- return EXIT_ON_NOMEMORY(ptr);
- }
- void * mem_alloc(size_t size) {
- void * ptr = mem_calloc(1, size);
- return EXIT_ON_NOMEMORY(ptr);
- }
- void * mem_free(void * ptr) {
- free(ptr);
- return NULL;
- }
- void * mem_realloc(void *ptr, size_t newsize) {
- void * aid = realloc(ptr, newsize);
- return EXIT_ON_NOMEMORY(aid);
- }
- void * mem_resize(void ** ptr, size_t newsize) {
- if(*ptr) {
- void * res = mem_realloc((*ptr), newsize);
- if(res) {
- (*ptr) = res;
- return res;
- }
- }
- return NULL;
- }
- void * mem_move(void * dest, void * src, size_t size) {
- return memmove(dest , src, size);
- }
-
- typedef struct Memtree_ Memtree;
- struct Memtree_ {
- void * memory;
- size_t size;
- Memtree * next, * parent, * child;
- };
- #ifdef COMMENT_
- void * mem_tree_alloc(void * vparent, size_t size) {
- char * aid;
- Memtree * me, * next;
- Memtree * parent = vparent;
- aid = mem_calloc(1, size + sizeof(Memtree));
- if (!aid) return NULL;
- me = (Memtree *) aid;
- me->memory = aid + sizeof(Memtree);
- me->size = size;
- if (parent) {
- me->parent = parent;
- if (parent->child) {
- next = parent->child;
- } else {
- next = NULL
- }
-
- parent->child = me;
- me->next = next;
- } else {
- me->parent = NULL;
- me->next = NULL;
- me->child = NULL;
- }
- return me->memory;
- }
- void mem_tree_free(void * vparent) {
- char * aid;
- Memtree * me, * next;
- Memtree * parent = vparent;
- aid = vparent;
- if (!aid) return;
- me = (Memtree *) (aid + sizeof(Memtree));
- if (!me) return;
- me->memory = NULL;
- me->size = 0;
- if (me->child) {
- mem_tree_free(me->child);
- } else if (me->next) {
- for (next = me->next; next; next = next->next) {
-
- mem_tree_free(next);
- }
- } else {
- next = NULL
- }
-
- mem_free(me);
- }
- #endif
- typedef struct Memref_ Memref;
- struct Memref_ {
- void * pointer;
- Memref * next;
- Memref * previous;
- };
- Memref memref(void * pointer) {
- Memref ref = { pointer, 0, 0 };
- return ref;
- }
|