X-Git-Url: http://plrg.eecs.uci.edu/git/?p=c11tester.git;a=blobdiff_plain;f=pthread.cc;h=fecca66b738be3527a65bb2387f99c05f058d822;hp=723e60b578c161e1a42c78bb828cd4b95ddc494e;hb=bdb967ee6d3cdd02dda0e80f8b394f86e9753623;hpb=51d58655a9a674d5e4b04f2dfcb5204a4342ef6d diff --git a/pthread.cc b/pthread.cc index 723e60b5..fecca66b 100644 --- a/pthread.cc +++ b/pthread.cc @@ -1,166 +1,147 @@ #include "common.h" #include "threads-model.h" #include "action.h" -#include "pthread.h" +#include "mypthread.h" #include "snapshot-interface.h" #include "datarace.h" #include "mutex.h" #include -#include /* global "model" object */ #include "model.h" #include "execution.h" - -static void param_defaults(struct model_params *params) -{ - params->maxreads = 0; - params->maxfuturedelay = 6; - params->fairwindow = 0; - params->yieldon = false; - params->yieldblock = false; - params->enabledcount = 1; - params->bound = 0; - params->maxfuturevalues = 0; - params->expireslop = 4; - params->verbose = !!DBG_ENABLED(); - params->uninitvalue = 0; - params->maxexecutions = 0; -} - -static void model_main() -{ - struct model_params params; - - param_defaults(¶ms); - - //parse_options(¶ms, main_argc, main_argv); - - //Initialize race detector - initRaceDetector(); - - snapshot_stack_init(); - - model = new ModelChecker(params); // L: Model thread is created -// install_trace_analyses(model->get_execution()); L: disable plugin - - snapshot_record(0); - model->run(); - delete model; - - DEBUG("Exiting\n"); -} +#include int pthread_create(pthread_t *t, const pthread_attr_t * attr, - pthread_start_t start_routine, void * arg) { + pthread_start_t start_routine, void * arg) { + createModelIfNotExist(); struct pthread_params params = { start_routine, arg }; - ModelAction *act = new ModelAction(PTHREAD_CREATE, std::memory_order_seq_cst, t, (uint64_t)¶ms); - /* seq_cst is just a 'don't care' parameter */ - model->switch_to_master(act); + model->switch_thread(new ModelAction(PTHREAD_CREATE, std::memory_order_seq_cst, t, (uint64_t)¶ms)); return 0; } int pthread_join(pthread_t t, void **value_ptr) { -// Thread *th = model->get_pthread(t); ModelExecution *execution = model->get_execution(); Thread *th = execution->get_pthread(t); - model->switch_to_master(new ModelAction(PTHREAD_JOIN, std::memory_order_seq_cst, th, id_to_int(th->get_id()))); + model->switch_thread(new ModelAction(PTHREAD_JOIN, std::memory_order_seq_cst, th, id_to_int(th->get_id()))); if ( value_ptr ) { // store return value void *rtval = th->get_pthread_return(); *value_ptr = rtval; - } + } + return 0; +} + +int pthread_detach(pthread_t t) { + //Doesn't do anything + //Return success + return 0; +} + +/* Take care of both pthread_yield and c++ thread yield */ +int sched_yield() { + model->switch_thread(new ModelAction(THREAD_YIELD, std::memory_order_seq_cst, thread_current(), VALUE_NONE)); return 0; } void pthread_exit(void *value_ptr) { Thread * th = thread_current(); - model->switch_to_master(new ModelAction(THREAD_FINISH, std::memory_order_seq_cst, th)); + th->set_pthread_return(value_ptr); + model->switch_thread(new ModelAction(THREADONLY_FINISH, std::memory_order_seq_cst, th)); + //Need to exit so we don't return to the program + real_pthread_exit(NULL); } -int pthread_mutex_init(pthread_mutex_t *p_mutex, const pthread_mutexattr_t *) { - if (!model) { - snapshot_system_init(10000, 1024, 1024, 40000, &model_main); - } +int pthread_mutex_init(pthread_mutex_t *p_mutex, const pthread_mutexattr_t * attr) { + createModelIfNotExist(); + int mutex_type = PTHREAD_MUTEX_DEFAULT; + if (attr != NULL) + pthread_mutexattr_gettype(attr, &mutex_type); - cdsc::mutex *m = new cdsc::mutex(); + cdsc::snapmutex *m = new cdsc::snapmutex(mutex_type); ModelExecution *execution = model->get_execution(); execution->getMutexMap()->put(p_mutex, m); + return 0; } int pthread_mutex_lock(pthread_mutex_t *p_mutex) { + createModelIfNotExist(); ModelExecution *execution = model->get_execution(); - /* to protect the case where PTHREAD_MUTEX_INITIALIZER is used + /* to protect the case where PTHREAD_MUTEX_INITIALIZER is used instead of pthread_mutex_init, or where *p_mutex is not stored in the execution->mutex_map for some reason. */ - if (!execution->getMutexMap()->contains(p_mutex)) { + if (!execution->getMutexMap()->contains(p_mutex)) { pthread_mutex_init(p_mutex, NULL); } - cdsc::mutex *m = execution->getMutexMap()->get(p_mutex); + cdsc::snapmutex *m = execution->getMutexMap()->get(p_mutex); if (m != NULL) { m->lock(); } else { - printf("ah\n"); + return 1; } return 0; } int pthread_mutex_trylock(pthread_mutex_t *p_mutex) { + createModelIfNotExist(); ModelExecution *execution = model->get_execution(); - cdsc::mutex *m = execution->getMutexMap()->get(p_mutex); - return m->try_lock(); + cdsc::snapmutex *m = execution->getMutexMap()->get(p_mutex); + return m->try_lock() ? 0 : EBUSY; } -int pthread_mutex_unlock(pthread_mutex_t *p_mutex) { +int pthread_mutex_unlock(pthread_mutex_t *p_mutex) { ModelExecution *execution = model->get_execution(); - cdsc::mutex *m = execution->getMutexMap()->get(p_mutex); + cdsc::snapmutex *m = execution->getMutexMap()->get(p_mutex); if (m != NULL) { m->unlock(); } else { printf("try to unlock an untracked pthread_mutex\n"); + return 1; } return 0; } int pthread_mutex_timedlock (pthread_mutex_t *__restrict p_mutex, - const struct timespec *__restrict abstime) { + const struct timespec *__restrict abstime) { // timedlock just gives the option of giving up the lock, so return and let the scheduler decide which thread goes next - -/* + createModelIfNotExist(); ModelExecution *execution = model->get_execution(); - if (!execution->mutex_map.contains(p_mutex)) { + + /* to protect the case where PTHREAD_MUTEX_INITIALIZER is used + instead of pthread_mutex_init, or where *p_mutex is not stored + in the execution->mutex_map for some reason. */ + if (!execution->getMutexMap()->contains(p_mutex)) { pthread_mutex_init(p_mutex, NULL); } - cdsc::mutex *m = execution->mutex_map.get(p_mutex); + + cdsc::snapmutex *m = execution->getMutexMap()->get(p_mutex); if (m != NULL) { m->lock(); - } else { - printf("something is wrong with pthread_mutex_timedlock\n"); + return 0; } - printf("pthread_mutex_timedlock is called. It is currently implemented as a normal lock operation without no timeout\n"); -*/ - return 0; + return 1; } pthread_t pthread_self() { + createModelIfNotExist(); Thread* th = model->get_current_thread(); - return th->get_id(); + return (pthread_t)th->get_id(); } int pthread_key_delete(pthread_key_t) { @@ -169,7 +150,7 @@ int pthread_key_delete(pthread_key_t) { } int pthread_cond_init(pthread_cond_t *p_cond, const pthread_condattr_t *attr) { - cdsc::condition_variable *v = new cdsc::condition_variable(); + cdsc::snapcondition_variable *v = new cdsc::snapcondition_variable(); ModelExecution *execution = model->get_execution(); execution->getCondMap()->put(p_cond, v); @@ -180,30 +161,35 @@ int pthread_cond_wait(pthread_cond_t *p_cond, pthread_mutex_t *p_mutex) { ModelExecution *execution = model->get_execution(); if ( !execution->getCondMap()->contains(p_cond) ) pthread_cond_init(p_cond, NULL); + if ( !execution->getMutexMap()->contains(p_mutex) ) + pthread_mutex_init(p_mutex, NULL); - cdsc::condition_variable *v = execution->getCondMap()->get(p_cond); - cdsc::mutex *m = execution->getMutexMap()->get(p_mutex); + cdsc::snapcondition_variable *v = execution->getCondMap()->get(p_cond); + cdsc::snapmutex *m = execution->getMutexMap()->get(p_mutex); v->wait(*m); return 0; } -int pthread_cond_timedwait(pthread_cond_t *p_cond, - pthread_mutex_t *p_mutex, const struct timespec *abstime) { -// implement cond_timedwait as a noop and let the scheduler decide which thread goes next +int pthread_cond_timedwait(pthread_cond_t *p_cond, + pthread_mutex_t *p_mutex, const struct timespec *abstime) { ModelExecution *execution = model->get_execution(); - if ( !execution->getCondMap()->contains(p_cond) ) pthread_cond_init(p_cond, NULL); if ( !execution->getMutexMap()->contains(p_mutex) ) pthread_mutex_init(p_mutex, NULL); - cdsc::condition_variable *v = execution->getCondMap()->get(p_cond); - cdsc::mutex *m = execution->getMutexMap()->get(p_mutex); + cdsc::snapcondition_variable *v = execution->getCondMap()->get(p_cond); + cdsc::snapmutex *m = execution->getMutexMap()->get(p_mutex); - model->switch_to_master(new ModelAction(NOOP, std::memory_order_seq_cst, v, NULL)); -// v->wait(*m); -// printf("timed_wait called\n"); + uint64_t time = abstime->tv_sec * 1000000000 + abstime->tv_nsec; + ModelAction * timed_wait = new ModelAction(ATOMIC_TIMEDWAIT, std::memory_order_seq_cst, v, (uint64_t) m); + timed_wait->set_time(time); + if (model->switch_thread(timed_wait) == ETIMEDOUT) { + //model_print("thread %u wait timedout\n", thread_current_id()); + return ETIMEDOUT; + } + m->lock(); return 0; } @@ -213,8 +199,65 @@ int pthread_cond_signal(pthread_cond_t *p_cond) { if ( !execution->getCondMap()->contains(p_cond) ) pthread_cond_init(p_cond, NULL); - cdsc::condition_variable *v = execution->getCondMap()->get(p_cond); + cdsc::snapcondition_variable *v = execution->getCondMap()->get(p_cond); v->notify_one(); return 0; } + +int pthread_cond_broadcast(pthread_cond_t *p_cond) { + // notify all blocked threads + ModelExecution *execution = model->get_execution(); + if ( !execution->getCondMap()->contains(p_cond) ) + pthread_cond_init(p_cond, NULL); + + cdsc::snapcondition_variable *v = execution->getCondMap()->get(p_cond); + + v->notify_all(); + return 0; +} + +int pthread_cond_destroy(pthread_cond_t *p_cond) { + ModelExecution *execution = model->get_execution(); + + if (execution->getCondMap()->contains(p_cond)) { + cdsc::snapcondition_variable *v = execution->getCondMap()->get(p_cond); + delete v; + execution->getCondMap()->remove(p_cond); + } + return 0; +} + +/* https://github.com/lattera/glibc/blob/master/nptl/pthread_getattr_np.c */ +int pthread_getattr_np(pthread_t t, pthread_attr_t *attr) +{ + ModelExecution *execution = model->get_execution(); + Thread *th = execution->get_pthread(t); + + struct pthread_attr *iattr = (struct pthread_attr *) attr; + + /* The sizes are subject to alignment. */ + if (th != NULL) { +#if _STACK_GROWS_DOWN + ASSERT(false); +#else + iattr->stackaddr = (char *) th->get_stack_addr(); +#endif + + } else { + ASSERT(false); + } + + return 0; +} + +int pthread_setname_np(pthread_t t, const char *name) +{ + ModelExecution *execution = model->get_execution(); + Thread *th = execution->get_pthread(t); + + if (th != NULL) + return 0; + + return 1; +}