#include <stdlib.h>
#include <stdio.h>
-template<typename _Key, typename _Val>
+template<typename _Key, typename _Val, void * (* _malloc)(size_t), void * (* _calloc)(size_t, size_t), void (*_free)(void *)>
struct hashlistnode {
_Key key;
_Val val;
- struct hashlistnode<_Key,_Val> *next;
+ struct hashlistnode<_Key,_Val, _malloc, _calloc, _free> *next;
+
+ void * operator new(size_t size) {
+ return _malloc(size);
+ }
+
+ void operator delete(void *p, size_t size) {
+ _free(p);
+ }
+
+ void * operator new[](size_t size) {
+ return _malloc(size);
+ }
+
+ void operator delete[](void *p, size_t size) {
+ _free(p);
+ }
};
/** Hashtable class. By default it is snapshotting, but you can pass
public:
HashTable(unsigned int initialcapacity=1024, double factor=0.5) {
// Allocate space for the hash table
- table = (struct hashlistnode<_Key,_Val> **) _calloc(initialcapacity, sizeof(struct hashlistnode<_Key,_Val> *));
+ table = (struct hashlistnode<_Key,_Val, _malloc, _calloc,_free> **) _calloc(initialcapacity, sizeof(struct hashlistnode<_Key,_Val, _malloc, _calloc, _free> *));
loadfactor = factor;
capacity = initialcapacity;
threshold = (unsigned int) (initialcapacity*loadfactor);
~HashTable() {
for(unsigned int i=0;i<capacity;i++) {
- struct hashlistnode<_Key,_Val> * bin = table[i];
+ struct hashlistnode<_Key,_Val, _malloc, _calloc, _free> * bin = table[i];
while(bin!=NULL) {
- struct hashlistnode<_Key,_Val> * next=bin->next;
+ struct hashlistnode<_Key,_Val, _malloc, _calloc, _free> * next=bin->next;
delete bin;
bin=next;
}
return _malloc(size);
}
- void operator delete(void *p, size_t size) {
+ void operator delete(void *p, size_t size) {
_free(p);
}
return _malloc(size);
}
- void operator delete[](void *p, size_t size) {\
+ void operator delete[](void *p, size_t size) {
_free(p);
}
/** Reset the table to its initial state. */
void reset() {
for(int i=0;i<capacity;i++) {
- struct hashlistnode<_Key,_Val> * bin = table[i];
+ struct hashlistnode<_Key,_Val, _malloc, _calloc, _free> * bin = table[i];
while(bin!=NULL) {
- struct hashlistnode<_Key,_Val> * next=bin->next;
+ struct hashlistnode<_Key,_Val, _malloc, _calloc, _free> * next=bin->next;
delete bin;
bin=next;
}
}
- memset(table, 0, capacity*sizeof(struct hashlistnode<_Key, _Val> *));
+ memset(table, 0, capacity*sizeof(struct hashlistnode<_Key, _Val, _malloc, _calloc, _free> *));
size=0;
}
resize(newsize);
}
- struct hashlistnode<_Key,_Val> *ptr = table[(((_KeyInt)key) & mask)>>_Shift];
+ struct hashlistnode<_Key,_Val, _malloc, _calloc, _free> *ptr = table[(((_KeyInt)key) & mask)>>_Shift];
size++;
- struct hashlistnode<_Key,_Val> *search = ptr;
+ struct hashlistnode<_Key,_Val, _malloc, _calloc, _free> *search = ptr;
while(search!=NULL) {
if (search->key==key) {
search=search->next;
}
- struct hashlistnode<_Key,_Val> *newptr=(struct hashlistnode<_Key,_Val> *)new struct hashlistnode<_Key,_Val>;
+ struct hashlistnode<_Key,_Val, _malloc, _calloc, _free> *newptr=(struct hashlistnode<_Key,_Val,_malloc,_calloc,_free> *)new struct hashlistnode<_Key,_Val, _malloc, _calloc, _free>;
newptr->key=key;
newptr->val=val;
newptr->next=ptr;
resize(newsize);
}
- struct hashlistnode<_Key,_Val> *ptr = table[(((_KeyInt)key) & mask)>>_Shift];
+ struct hashlistnode<_Key,_Val, _malloc, _calloc, _free> *ptr = table[(((_KeyInt)key) & mask)>>_Shift];
size++;
- struct hashlistnode<_Key,_Val> *search = ptr;
+ struct hashlistnode<_Key,_Val, _malloc, _calloc, _free> *search = ptr;
while(search!=NULL) {
if (search->key==key) {
search=search->next;
}
- struct hashlistnode<_Key,_Val> *newptr=(struct hashlistnode<_Key,_Val> *)new struct hashlistnode<_Key,_Val>;
+ struct hashlistnode<_Key,_Val, _malloc, _calloc, _free> *newptr=(struct hashlistnode<_Key,_Val, _malloc, _calloc, _free> *)new struct hashlistnode<_Key,_Val, _malloc, _calloc, _free>;
newptr->key=key;
newptr->next=ptr;
table[(((_KeyInt)key)&mask)>>_Shift]=newptr;
/** Lookup the corresponding value for the given key. */
_Val get(_Key key) {
- struct hashlistnode<_Key,_Val> *search = table[(((_KeyInt)key) & mask)>>_Shift];
+ struct hashlistnode<_Key,_Val, _malloc, _calloc, _free> *search = table[(((_KeyInt)key) & mask)>>_Shift];
while(search!=NULL) {
if (search->key==key) {
/** Lookup the corresponding value for the given key. */
_Val * getptr(_Key key) {
- struct hashlistnode<_Key,_Val> *search = table[(((_KeyInt)key) & mask)>>_Shift];
+ struct hashlistnode<_Key,_Val, _malloc, _calloc, _free> *search = table[(((_KeyInt)key) & mask)>>_Shift];
while(search!=NULL) {
if (search->key==key) {
/** Check whether the table contains a value for the given key. */
bool contains(_Key key) {
- struct hashlistnode<_Key,_Val> *search = table[(((_KeyInt)key) & mask)>>_Shift];
+ struct hashlistnode<_Key,_Val, _malloc, _calloc, _free> *search = table[(((_KeyInt)key) & mask)>>_Shift];
while(search!=NULL) {
if (search->key==key) {
/** Resize the table. */
void resize(unsigned int newsize) {
- struct hashlistnode<_Key,_Val> ** oldtable = table;
- struct hashlistnode<_Key,_Val> ** newtable;
+ struct hashlistnode<_Key,_Val, _malloc, _calloc, _free> ** oldtable = table;
+ struct hashlistnode<_Key,_Val, _malloc, _calloc, _free> ** newtable;
unsigned int oldcapacity = capacity;
- if((newtable = (struct hashlistnode<_Key,_Val> **) _calloc(newsize, sizeof(struct hashlistnode<_Key,_Val> *))) == NULL) {
+ if((newtable = (struct hashlistnode<_Key,_Val, _malloc, _calloc, _free> **) _calloc(newsize, sizeof(struct hashlistnode<_Key,_Val, _malloc, _calloc, _free> *))) == NULL) {
printf("Calloc error %s %d\n", __FILE__, __LINE__);
exit(-1);
}
mask = (newsize << _Shift)-1;
for(unsigned int i = 0; i < oldcapacity; i++) {
- struct hashlistnode<_Key, _Val> * bin = oldtable[i];
+ struct hashlistnode<_Key, _Val, _malloc, _calloc, _free> * bin = oldtable[i];
while(bin!=NULL) {
_Key key=bin->key;
- struct hashlistnode<_Key, _Val> * next=bin->next;
+ struct hashlistnode<_Key, _Val, _malloc, _calloc, _free> * next=bin->next;
unsigned int index = (((_KeyInt)key) & mask) >>_Shift;
- struct hashlistnode<_Key, _Val> * tmp=newtable[index];
+ struct hashlistnode<_Key, _Val, _malloc, _calloc, _free> * tmp=newtable[index];
bin->next=tmp;
newtable[index]=bin;
bin = next;
}
private:
- struct hashlistnode<_Key,_Val> **table;
+ struct hashlistnode<_Key,_Val, _malloc, _calloc, _free> **table;
unsigned int capacity;
_KeyInt mask;
unsigned int size;
/** This global references the unaligned memory address that was malloced for the snapshotting heap */
void * basemySpace = NULL;
-/** Adding the fix for not able to allocate through a reimplemented calloc at the beginning before instantiating our allocator
-A bit circumspect about adding an sbrk. linux docs say to avoid using it... */
+/** Bootstrap allocation. Problem is that the dynamic linker calls
+ * require calloc to work and calloc requires the dynamic linker to
+ * work. */
+
+#define BOOTSTRAPBYTES 4096
+char bootstrapmemory[BOOTSTRAPBYTES];
+size_t offset=0;
+
void * HandleEarlyAllocationRequest( size_t sz ){
- if( 0 == mySpace ){
- void * returnAddress = sbrk( sz );
- if( nextRequest >= REQUESTS_BEFORE_ALLOC ){
- exit( EXIT_FAILURE );
- }
- allocatedReqs[ nextRequest++ ] = ( size_t )returnAddress;
- return returnAddress;
+ /*Align to 8 byte boundary*/
+ sz=(sz+7)&~7;
+
+ if (sz > (BOOTSTRAPBYTES-offset)) {
+ printf("OUT OF BOOTSTRAP MEMORY\n");
+ exit(EXIT_FAILURE);
}
- return NULL;
+
+ void * pointer= (void *) & bootstrapmemory[offset];
+ offset+=sz;
+ return pointer;
}
-/** The fact that I am not expecting more than a handful requests is implicit in my not using a binary search here*/
+/** Check whether this is bootstrapped memory that we should not
+ free. */
+
bool DontFree( void * ptr ){
- if( howManyFreed == nextRequest ) return false; //a minor optimization to reduce the number of instructions executed on each free call....
- if( NULL == ptr ) return true;
- for( int i = nextRequest - 1; i >= 0; --i ){
- if( allocatedReqs[ i ] == ( size_t )ptr ) {
- ++howManyFreed;
- return true;
- }
- }
- return false;
+ return (ptr>=(&bootstrapmemory[0])&&ptr<(&bootstrapmemory[BOOTSTRAPBYTES]));
}
/** Snapshotting malloc implementation for user programs. */
void *malloc( size_t size ) {
- void * earlyReq = HandleEarlyAllocationRequest( size );
- if( earlyReq ) return earlyReq;
- return mspace_malloc( mySpace, size );
+ if (mySpace)
+ return mspace_malloc( mySpace, size );
+ else
+ return HandleEarlyAllocationRequest( size );
}
/** Snapshotting free implementation for user programs. */
/** Snapshotting calloc implementation for user programs. */
void * calloc( size_t num, size_t size ){
- void * earlyReq = HandleEarlyAllocationRequest( size * num );
- if( earlyReq ) {
- std::memset( earlyReq, 0, size * num );
- return earlyReq;
+ if (mySpace)
+ return mspace_calloc( mySpace, num, size );
+ else {
+ void *tmp=HandleEarlyAllocationRequest( size * num );
+ std::memset( tmp, 0, size * num );
+ return tmp;
}
- return mspace_calloc( mySpace, num, size );
}
/** Snapshotting new operator for user programs. */