X-Git-Url: http://plrg.eecs.uci.edu/git/?p=cdsspec-compiler.git;a=blobdiff_plain;f=mymemory.cc;h=9e05c369235dadb077b6d09b1cfb7b2ece92180f;hp=4b393cb4a29fac98fdb7b912fef5991d7a7c458a;hb=299acd153fa357fbc31e2877a37d8eb9d64f309e;hpb=f01c21655bce58ff70b0e8936f2579a7beeafad4 diff --git a/mymemory.cc b/mymemory.cc index 4b393cb..9e05c36 100644 --- a/mymemory.cc +++ b/mymemory.cc @@ -1,12 +1,19 @@ -#include "mymemory.h" -#include "snapshot.h" -#include "snapshotimp.h" +#include #include #include #include -#include +#include +#include + +#include "mymemory.h" +#include "snapshot.h" +#include "common.h" +#include "threads-model.h" +#include "model.h" + #define REQUESTS_BEFORE_ALLOC 1024 -size_t allocatedReqs[ REQUESTS_BEFORE_ALLOC ] = { 0 }; + +size_t allocatedReqs[REQUESTS_BEFORE_ALLOC] = { 0 }; int nextRequest = 0; int howManyFreed = 0; #if !USE_MPROTECT_SNAPSHOT @@ -14,15 +21,16 @@ static mspace sStaticSpace = NULL; #endif /** Non-snapshotting calloc for our use. */ -void *MYCALLOC(size_t count, size_t size) { +void *model_calloc(size_t count, size_t size) +{ #if USE_MPROTECT_SNAPSHOT - static void *(*callocp)(size_t count, size_t size)=NULL; + static void *(*callocp)(size_t count, size_t size) = NULL; char *error; void *ptr; /* get address of libc malloc */ if (!callocp) { - callocp = ( void * ( * )( size_t, size_t ) )dlsym(RTLD_NEXT, "calloc"); + callocp = (void * (*)(size_t, size_t))dlsym(RTLD_NEXT, "calloc"); if ((error = dlerror()) != NULL) { fputs(error, stderr); exit(EXIT_FAILURE); @@ -31,25 +39,23 @@ void *MYCALLOC(size_t count, size_t size) { ptr = callocp(count, size); return ptr; #else - if( !snapshotrecord) { - createSharedMemory(); - } - if( NULL == sStaticSpace ) - sStaticSpace = create_mspace_with_base( ( void * )( snapshotrecord->mSharedMemoryBase ), SHARED_MEMORY_DEFAULT -sizeof( struct SnapShot ), 1 ); - return mspace_calloc( sStaticSpace, count, size ); + if (!sStaticSpace) + sStaticSpace = create_shared_mspace(); + return mspace_calloc(sStaticSpace, count, size); #endif } /** Non-snapshotting malloc for our use. */ -void *model_malloc(size_t size) { +void *model_malloc(size_t size) +{ #if USE_MPROTECT_SNAPSHOT - static void *(*mallocp)(size_t size)=NULL; + static void *(*mallocp)(size_t size) = NULL; char *error; void *ptr; /* get address of libc malloc */ if (!mallocp) { - mallocp = ( void * ( * )( size_t ) )dlsym(RTLD_NEXT, "malloc"); + mallocp = (void * (*)(size_t))dlsym(RTLD_NEXT, "malloc"); if ((error = dlerror()) != NULL) { fputs(error, stderr); exit(EXIT_FAILURE); @@ -58,56 +64,52 @@ void *model_malloc(size_t size) { ptr = mallocp(size); return ptr; #else - if( !snapshotrecord) { - createSharedMemory(); - } - if( NULL == sStaticSpace ) - sStaticSpace = create_mspace_with_base( ( void * )( snapshotrecord->mSharedMemoryBase ), SHARED_MEMORY_DEFAULT -sizeof( struct SnapShot ), 1 ); - return mspace_malloc( sStaticSpace, size ); + if (!sStaticSpace) + sStaticSpace = create_shared_mspace(); + return mspace_malloc(sStaticSpace, size); #endif } -void *system_malloc( size_t size ){ - static void *(*mallocp)(size_t size); - char *error; - void *ptr; +/** @brief Snapshotting malloc, for use by model-checker (not user progs) */ +void * snapshot_malloc(size_t size) +{ + void *tmp = mspace_malloc(model_snapshot_space, size); + ASSERT(tmp); + return tmp; +} - /* get address of libc malloc */ - if (!mallocp) { - mallocp = ( void * ( * )( size_t ) )dlsym(RTLD_NEXT, "malloc"); - if ((error = dlerror()) != NULL) { - fputs(error, stderr); - exit(EXIT_FAILURE); - } - } - ptr = mallocp(size); - return ptr; +/** @brief Snapshotting calloc, for use by model-checker (not user progs) */ +void * snapshot_calloc(size_t count, size_t size) +{ + void *tmp = mspace_calloc(model_snapshot_space, count, size); + ASSERT(tmp); + return tmp; } -void system_free( void * ptr ){ - static void (*freep)(void *); - char *error; +/** @brief Snapshotting realloc, for use by model-checker (not user progs) */ +void *snapshot_realloc(void *ptr, size_t size) +{ + void *tmp = mspace_realloc(model_snapshot_space, ptr, size); + ASSERT(tmp); + return tmp; +} - /* get address of libc free */ - if (!freep) { - freep = ( void ( * )( void * ) )dlsym(RTLD_NEXT, "free"); - if ((error = dlerror()) != NULL) { - fputs(error, stderr); - exit(EXIT_FAILURE); - } - } - freep(ptr); +/** @brief Snapshotting free, for use by model-checker (not user progs) */ +void snapshot_free(void *ptr) +{ + mspace_free(model_snapshot_space, ptr); } /** Non-snapshotting free for our use. */ -void MYFREE(void *ptr) { +void model_free(void *ptr) +{ #if USE_MPROTECT_SNAPSHOT static void (*freep)(void *); char *error; /* get address of libc free */ if (!freep) { - freep = ( void ( * )( void * ) )dlsym(RTLD_NEXT, "free"); + freep = (void (*)(void *))dlsym(RTLD_NEXT, "free"); if ((error = dlerror()) != NULL) { fputs(error, stderr); exit(EXIT_FAILURE); @@ -115,92 +117,152 @@ void MYFREE(void *ptr) { } freep(ptr); #else - mspace_free( sStaticSpace, ptr ); + mspace_free(sStaticSpace, ptr); #endif } - -/** This global references the mspace for the snapshotting heap */ -mspace mySpace = NULL; - -/** This global references the unaligned memory address that was malloced for the snapshotting heap */ -void * basemySpace = NULL; - -/** Bootstrap allocation. Problem is that the dynamic linker calls - * require calloc to work and calloc requires the dynamic linker to - * work. */ +/** 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; +size_t offset = 0; -void * HandleEarlyAllocationRequest( size_t sz ){ - /*Align to 8 byte boundary*/ - sz=(sz+7)&~7; +void * HandleEarlyAllocationRequest(size_t sz) +{ + /* Align to 8 byte boundary */ + sz = (sz + 7) & ~7; if (sz > (BOOTSTRAPBYTES-offset)) { - printf("OUT OF BOOTSTRAP MEMORY\n"); + model_print("OUT OF BOOTSTRAP MEMORY\n"); exit(EXIT_FAILURE); } - void * pointer= (void *) & bootstrapmemory[offset]; - offset+=sz; + void *pointer = (void *)&bootstrapmemory[offset]; + offset += sz; return pointer; } -/** Check whether this is bootstrapped memory that we should not - free. */ +/** @brief Global mspace reference for the model-checker's snapshotting heap */ +mspace model_snapshot_space = NULL; + +#if USE_MPROTECT_SNAPSHOT + +/** @brief Global mspace reference for the user's snapshotting heap */ +mspace user_snapshot_space = NULL; + +/** Check whether this is bootstrapped memory that we should not free */ +static bool DontFree(void *ptr) +{ + return (ptr >= (&bootstrapmemory[0]) && ptr < (&bootstrapmemory[BOOTSTRAPBYTES])); +} -bool DontFree( void * ptr ){ - return (ptr>=(&bootstrapmemory[0])&&ptr<(&bootstrapmemory[BOOTSTRAPBYTES])); +/** + * @brief The allocator function for "user" allocation + * + * Should only be used for allocations which will not disturb the allocation + * patterns of a user thread. + */ +static void * user_malloc(size_t size) +{ + void *tmp = mspace_malloc(user_snapshot_space, size); + ASSERT(tmp); + return tmp; } -/** Snapshotting malloc implementation for user programs. */ -void *malloc( size_t size ) { - if (mySpace) - return mspace_malloc( mySpace, size ); - else - return HandleEarlyAllocationRequest( size ); +/** + * @brief Snapshotting malloc implementation for user programs + * + * Do NOT call this function from a model-checker context. Doing so may disrupt + * the allocation patterns of a user thread. + */ +void *malloc(size_t size) +{ + if (user_snapshot_space) { + /* Only perform user allocations from user context */ + ASSERT(!model || thread_current()); + return user_malloc(size); + } else + return HandleEarlyAllocationRequest(size); } -/** Snapshotting free implementation for user programs. */ -void free( void * ptr ){ - if( DontFree( ptr ) ) return; - mspace_free( mySpace, ptr ); +/** @brief Snapshotting free implementation for user programs */ +void free(void * ptr) +{ + if (!DontFree(ptr)) + mspace_free(user_snapshot_space, ptr); } -/** Snapshotting realloc implementation for user programs. */ -void *realloc( void *ptr, size_t size ){ - return mspace_realloc( mySpace, ptr, size ); +/** @brief Snapshotting realloc implementation for user programs */ +void *realloc(void *ptr, size_t size) +{ + void *tmp = mspace_realloc(user_snapshot_space, ptr, size); + ASSERT(tmp); + return tmp; } -/** Snapshotting calloc implementation for user programs. */ -void * calloc( size_t num, size_t size ){ - if (mySpace) - return mspace_calloc( mySpace, num, size ); - else { - void *tmp=HandleEarlyAllocationRequest( size * num ); - std::memset( tmp, 0, size * num ); +/** @brief Snapshotting calloc implementation for user programs */ +void * calloc(size_t num, size_t size) +{ + if (user_snapshot_space) { + void *tmp = mspace_calloc(user_snapshot_space, num, size); + ASSERT(tmp); + return tmp; + } else { + void *tmp = HandleEarlyAllocationRequest(size * num); + memset(tmp, 0, size * num); return tmp; } } -/** Snapshotting new operator for user programs. */ -void * operator new(size_t size) throw(std::bad_alloc) { +/** @brief Snapshotting allocation function for use by the Thread class only */ +void * Thread_malloc(size_t size) +{ + return user_malloc(size); +} + +/** @brief Snapshotting free function for use by the Thread class only */ +void Thread_free(void *ptr) +{ + free(ptr); +} + +/** @brief Snapshotting new operator for user programs */ +void * operator new(size_t size) throw(std::bad_alloc) +{ return malloc(size); } -/** Snapshotting delete operator for user programs. */ -void operator delete(void *p) throw() { +/** @brief Snapshotting delete operator for user programs */ +void operator delete(void *p) throw() +{ free(p); } -/** Snapshotting new[] operator for user programs. */ -void * operator new[](size_t size) throw(std::bad_alloc) { +/** @brief Snapshotting new[] operator for user programs */ +void * operator new[](size_t size) throw(std::bad_alloc) +{ return malloc(size); } -/** Snapshotting delete[] operator for user programs. */ -void operator delete[](void *p, size_t size) { +/** @brief Snapshotting delete[] operator for user programs */ +void operator delete[](void *p, size_t size) +{ free(p); } + +#else /* !USE_MPROTECT_SNAPSHOT */ + +/** @brief Snapshotting allocation function for use by the Thread class only */ +void * Thread_malloc(size_t size) +{ + return malloc(size); +} + +/** @brief Snapshotting free function for use by the Thread class only */ +void Thread_free(void *ptr) +{ + free(ptr); +} + +#endif /* !USE_MPROTECT_SNAPSHOT */