]> git.imager.perl.org - imager.git/commitdiff
Added memory pools to make clean up of temporary buffers simpler.
authorArnar Mar Hrafnkelsson <addi@cpan.org>
Fri, 28 Dec 2001 17:45:41 +0000 (17:45 +0000)
committerArnar Mar Hrafnkelsson <addi@cpan.org>
Fri, 28 Dec 2001 17:45:41 +0000 (17:45 +0000)
imio.h
io.c

diff --git a/imio.h b/imio.h
index 66e180dd15d1224d760ef810e42d716e7b417b27..5d746042034a1a56eb7f6721ba15639745a37277 100644 (file)
--- a/imio.h
+++ b/imio.h
@@ -36,6 +36,20 @@ void* myrealloc(void *p, size_t newsize);
 #endif /* IMAGER_MALLOC_DEBUG */
 
 
+
+typedef struct i_mempool {
+  void **p;
+  unsigned int alloc;
+  unsigned int used;
+} i_mempool;
+
+void  i_mempool_init(i_mempool *mp);
+void  i_mempool_extend(i_mempool *mp);
+void *i_mempool_alloc(i_mempool *mp, size_t size);
+void  i_mempool_destroy(i_mempool *mp);
+
+
+
 #ifdef _MSC_VER
 #undef min
 #undef max
diff --git a/io.c b/io.c
index 6661a3abc0216068a36e67bb616036c3c1134bb2..1936ee8a227b5f174fa8c60c23f00477aaea3675 100644 (file)
--- a/io.c
+++ b/io.c
@@ -260,6 +260,37 @@ myrealloc(void *block, size_t size) {
 
 
 
+/* memory pool implementation */
+
+void
+i_mempool_init(i_mempool *mp) {
+  mp->alloc = 10;
+  mp->used  = 0;
+  mp->p = mymalloc(sizeof(void*)*mp->alloc);
+}
+
+void
+i_mempool_extend(i_mempool *mp) {
+  mp->p = myrealloc(mp->p, mp->alloc * 2);
+  mp->alloc *=2;
+}
+
+void *
+i_mempool_alloc(i_mempool *mp, size_t size) {
+  if (mp->used == mp->alloc) i_mempool_extend(mp);
+  mp->p[mp->used] = mymalloc(size);
+  mp->used++;
+  return mp->p[mp->used-1];
+}
+
+
+void
+i_mempool_destroy(i_mempool *mp) {
+  unsigned int i;
+  for(i=0; i<mp->used; i++) myfree(mp->p[i]);
+  myfree(mp->p);
+}
+
 
 
 /* Should these really be here? */