/* nsmalloc: Simple pooled malloc() thing. */
#include <stdlib.h>
+#include <string.h>
#include "nsmalloc.h"
-#include "../core/error.h"
+#define __NSMALLOC_C
+#undef __NSMALLOC_H
+#include "nsmalloc.h"
-void *nsmalloc(unsigned int poolid, size_t size);
-void nsfree(unsigned int poolid, void *ptr);
-void nsfreeall(unsigned int poolid);
+#include "../core/hooks.h"
+#include "../core/error.h"
-struct nsminfo {
- struct nsminfo *next;
- char data[1];
-};
+struct nsmpool nsmpools[MAXPOOL];
-struct nsminfo *pools[MAXPOOL];
+#ifndef USE_NSMALLOC_VALGRIND
void *nsmalloc(unsigned int poolid, size_t size) {
struct nsminfo *nsmp;
if (poolid >= MAXPOOL)
return NULL;
- /* Allocate enough for the structure and the required data - but subtract
- * 1 since the first byte lives in the structure */
- nsmp=(struct nsminfo *)malloc(sizeof(struct nsminfo)+(size-1));
+ /* Allocate enough for the structure and the required data */
+ nsmp=(struct nsminfo *)malloc(sizeof(struct nsminfo)+size);
if (!nsmp)
return NULL;
- nsmp->next=pools[poolid];
- pools[poolid]=nsmp;
-
+ nsmp->size=size;
+ nsmpools[poolid].size+=size;
+ nsmpools[poolid].count++;
+
+ nsmp->next=nsmpools[poolid].first.next;
+ nsmp->prev=&nsmpools[poolid].first;
+ if (nsmpools[poolid].first.next)
+ nsmpools[poolid].first.next->prev=nsmp;
+ nsmpools[poolid].first.next=nsmp;
+
return (void *)nsmp->data;
}
+void *nscalloc(unsigned int poolid, size_t nmemb, size_t size) {
+ size_t total = nmemb * size;
+ void *m;
+
+ m = nsmalloc(poolid, total);
+ if(!m)
+ return NULL;
+
+ memset(m, 0, total);
+
+ return m;
+}
+
+/* we dump core on ptr == NULL */
void nsfree(unsigned int poolid, void *ptr) {
- struct nsminfo *nsmp, **nsmh;
+ struct nsminfo *nsmp;
- if (poolid >= MAXPOOL)
+ if (!ptr || poolid >= MAXPOOL)
return;
-
- for (nsmh=&(pools[poolid]);*nsmh;nsmh=&((*nsmh)->next)) {
- if ((void *)&((*nsmh)->data) == ptr) {
- nsmp=*nsmh;
- *nsmh = nsmp->next;
- free(nsmp);
- return;
- }
+
+ /* evil */
+ nsmp=(struct nsminfo*)ptr - 1;
+
+ /* always set as we have a sentinel */
+ nsmp->prev->next=nsmp->next;
+ if (nsmp->next)
+ nsmp->next->prev=nsmp->prev;
+
+ nsmpools[poolid].size-=nsmp->size;
+ nsmpools[poolid].count--;
+
+ free(nsmp);
+ return;
+}
+
+void *nsrealloc(unsigned int poolid, void *ptr, size_t size) {
+ struct nsminfo *nsmp, *nsmpn;
+
+ if (ptr == NULL)
+ return nsmalloc(poolid, size);
+
+ if (size == 0) {
+ nsfree(poolid, ptr);
+ return NULL;
}
-
- Error("core",ERR_WARNING,"Attempt to free unknown pointer %p in pool %d\n",ptr,poolid);
+
+ if (poolid >= MAXPOOL)
+ return NULL;
+
+ /* evil */
+ nsmp=(struct nsminfo *)ptr - 1;
+
+ if (size == nsmp->size)
+ return (void *)nsmp->data;
+
+ nsmpn=(struct nsminfo *)realloc(nsmp, sizeof(struct nsminfo)+size);
+ if (!nsmpn)
+ return NULL;
+
+ nsmpools[poolid].size+=size-nsmpn->size;
+ nsmpn->size=size;
+
+ /* always set as we have a sentinel */
+ nsmpn->prev->next=nsmpn;
+
+ if (nsmpn->next)
+ nsmpn->next->prev=nsmpn;
+
+ return (void *)nsmpn->data;
}
void nsfreeall(unsigned int poolid) {
if (poolid >= MAXPOOL)
return;
- for (nsmp=pools[poolid];nsmp;nsmp=nnsmp) {
+ for (nsmp=nsmpools[poolid].first.next;nsmp;nsmp=nnsmp) {
nnsmp=nsmp->next;
free(nsmp);
}
- pools[poolid]=NULL;
+ nsmpools[poolid].first.next=NULL;
+ nsmpools[poolid].size=0;
+ nsmpools[poolid].count=0;
+}
+
+void nscheckfreeall(unsigned int poolid) {
+ if (poolid >= MAXPOOL)
+ return;
+
+ if (nsmpools[poolid].first.next) {
+ Error("core",ERR_INFO,"nsmalloc: Blocks still allocated in pool #%d (%s): %zub, %lu items",poolid,nsmpoolnames[poolid]?nsmpoolnames[poolid]:"??",nsmpools[poolid].size,nsmpools[poolid].count);
+ nsfreeall(poolid);
+ }
+}
+
+void nsexit(void) {
+ unsigned int i;
+
+ for (i=0;i<MAXPOOL;i++)
+ nsfreeall(i);
+}
+
+#else
+
+void *nsmalloc(unsigned int poolid, size_t size) {
+ return malloc(size);
}
+void *nscalloc(unsigned int poolid, size_t nmemb, size_t size) {
+ return calloc(nmemb, size);
+}
+
+void *nsrealloc(unsigned int poolid, void *ptr, size_t size) {
+ return realloc(ptr, size);
+}
+
+void nsfree(unsigned int poolid, void *ptr) {
+ if(ptr)
+ free(ptr);
+}
+
+void nsfreeall(unsigned int poolid) {
+}
+
+void nsexit(void) {
+}
+
+void nscheckfreeall(unsigned int poolid) {
+}
+
+#endif
+