#include <stdio.h>
#include "model.h"
+#include "execution.h"
#include "action.h"
#include "cmodelint.h"
+#include "snapshot-interface.h"
#include "threads-model.h"
memory_order orders[6] = {
memory_order_release, memory_order_acq_rel, memory_order_seq_cst
};
+static void ensureModel(ModelAction * action) {
+ if (!model) {
+ if (!model_init) {
+ snapshot_system_init(10000, 1024, 1024, 40000);
+ model_init = new ModelChecker();
+ }
+ model_init->get_execution()->check_current_action(action);
+ } else {
+ model->switch_to_master(action);
+ }
+}
+
/** Performs a read action.*/
uint64_t model_read_action(void * obj, memory_order ord) {
return model->switch_to_master(new ModelAction(ATOMIC_READ, ord, obj));
// cds atomic inits
void cds_atomic_init8(void * obj, uint8_t val, const char * position) {
- model->switch_to_master(
+ ensureModel(
new ModelAction(ATOMIC_INIT, position, memory_order_relaxed, obj, (uint64_t) val)
);
}
void cds_atomic_init16(void * obj, uint16_t val, const char * position) {
- model->switch_to_master(
+ ensureModel(
new ModelAction(ATOMIC_INIT, position, memory_order_relaxed, obj, (uint64_t) val)
);
}
void cds_atomic_init32(void * obj, uint32_t val, const char * position) {
- model->switch_to_master(
+ ensureModel(
new ModelAction(ATOMIC_INIT, position, memory_order_relaxed, obj, (uint64_t) val)
);
}
void cds_atomic_init64(void * obj, uint64_t val, const char * position) {
- model->switch_to_master(
+ ensureModel(
new ModelAction(ATOMIC_INIT, position, memory_order_relaxed, obj, val)
);
}
// cds atomic stores
void cds_atomic_store8(void * obj, uint8_t val, int atomic_index, const char * position) {
- model->switch_to_master(
+ ensureModel(
new ModelAction(ATOMIC_WRITE, position, orders[atomic_index], obj, (uint64_t) val)
);
}
void cds_atomic_store16(void * obj, uint16_t val, int atomic_index, const char * position) {
- model->switch_to_master(
+ ensureModel(
new ModelAction(ATOMIC_WRITE, position, orders[atomic_index], obj, (uint64_t) val)
);
}
void cds_atomic_store32(void * obj, uint32_t val, int atomic_index, const char * position) {
- model->switch_to_master(
+ ensureModel(
new ModelAction(ATOMIC_WRITE, position, orders[atomic_index], obj, (uint64_t) val)
);
}
void cds_atomic_store64(void * obj, uint64_t val, int atomic_index, const char * position) {
- model->switch_to_master(
+ ensureModel(
new ModelAction(ATOMIC_WRITE, position, orders[atomic_index], obj, val)
);
}
/* Last SC fence in the current thread */
ModelAction *last_sc_fence_local = get_last_seq_cst_fence(curr->get_tid(), NULL);
- ModelAction *last_sc_write = NULL;
- if (curr->is_seqcst())
- last_sc_write = get_last_seq_cst_write(curr);
int tid = curr->get_tid();
ModelAction *prev_same_thread = NULL;
CycleGraph * const get_mo_graph() { return mo_graph; }
HashTable<pthread_cond_t *, cdsc::condition_variable *, uintptr_t, 4> * getCondMap() {return &cond_map;}
HashTable<pthread_mutex_t *, cdsc::mutex *, uintptr_t, 4> * getMutexMap() {return &mutex_map;}
+ ModelAction * check_current_action(ModelAction *curr);
SNAPSHOTALLOC
private:
modelclock_t get_next_seq_num();
bool next_execution();
- ModelAction * check_current_action(ModelAction *curr);
bool initialize_curr_action(ModelAction **curr);
void process_read(ModelAction *curr, SnapVector<const ModelAction *> * rf_set);
void process_write(ModelAction *curr);
#if __cplusplus
using std::memory_order;
extern "C" {
+#else
+typedef int bool;
#endif
+
uint64_t model_read_action(void * obj, memory_order ord);
void model_write_action(void * obj, memory_order ord, uint64_t val);
void model_init_action(void * obj, uint64_t val);
/** The model_main function contains the main model checking loop. */
static void model_main()
{
- struct model_params params;
-
- param_defaults(¶ms);
- register_plugins();
-
- parse_options(¶ms, main_argc, main_argv);
-
- //Initialize race detector
- initRaceDetector();
-
- snapshot_stack_init();
-
- if (!model)
- model = new ModelChecker();
- model->setParams(params);
- install_trace_analyses(model->get_execution());
-
snapshot_record(0);
model->run();
delete model;
/* Configure output redirection for the model-checker */
redirect_output();
- /* Let's jump in quickly and start running stuff */
- snapshot_system_init(10000, 1024, 1024, 40000, &model_main);
+ //Initialize snapshotting library
+ if (!model_init)
+ snapshot_system_init(10000, 1024, 1024, 40000);
+
+ struct model_params params;
+
+ param_defaults(¶ms);
+ register_plugins();
+ parse_options(¶ms, main_argc, main_argv);
+
+ //Initialize race detector
+ initRaceDetector();
+
+ snapshot_stack_init();
+
+ if (!model_init)
+ model = new ModelChecker();
+ else
+ model = model_init;
+
+ model->setParams(params);
+ install_trace_analyses(model->get_execution());
+
+ startExecution(&model_main);
}
#include "execution.h"
#include "bugmessage.h"
-ModelChecker *model;
+ModelChecker *model = NULL;
+ModelChecker *model_init = NULL;
+
+/** Wrapper to run the user's main function, with appropriate arguments */
+void user_main_wrapper(void *)
+{
+ user_main(model->params.argc, model->params.argv);
+}
/** @brief Constructor */
ModelChecker::ModelChecker() :
inspect_plugin(NULL)
{
memset(&stats,0,sizeof(struct execution_stats));
+ init_thread = new Thread(execution->get_next_id(), (thrd_t *) malloc(sizeof(thrd_t)), &user_main_wrapper, NULL, NULL); // L: user_main_wrapper passes the user program
+ execution->add_thread(init_thread);
+ scheduler->set_current_thread(init_thread);
}
/** @brief Destructor */
Thread *old = thread_current();
scheduler->set_current_thread(NULL);
ASSERT(!old->get_pending());
-/* W: No plugin
- if (inspect_plugin != NULL) {
- inspect_plugin->inspectModelAction(act);
- }*/
+
+ if (inspect_plugin != NULL) {
+ inspect_plugin->inspectModelAction(act);
+ }
+
old->set_pending(act);
if (Thread::swap(old, &system_context) < 0) {
perror("swap threads");
return old->get_return_value();
}
-/** Wrapper to run the user's main function, with appropriate arguments */
-void user_main_wrapper(void *)
-{
- user_main(model->params.argc, model->params.argv);
-}
-
bool ModelChecker::should_terminate_execution()
{
/* Infeasible -> don't take any more steps */
initstate(423121, random_state, sizeof(random_state));
for(int exec = 0;exec < params.maxexecutions;exec++) {
- thrd_t user_thread;
- Thread *t = new Thread(execution->get_next_id(), &user_thread, &user_main_wrapper, NULL, NULL); // L: user_main_wrapper passes the user program
- execution->add_thread(t);
- //Need to seed random number generator, otherwise its state gets reset
+ Thread * t = init_thread;
+
do {
/*
* Stash next pending action(s) for thread(s). There
Scheduler * const scheduler;
NodeStack * const node_stack;
ModelExecution *execution;
+ Thread * init_thread;
int execution_number;
};
extern ModelChecker *model;
+extern ModelChecker *model_init;
#endif /* __MODEL_H__ */
}
int pthread_mutex_init(pthread_mutex_t *p_mutex, const pthread_mutexattr_t *) {
- if (!model) {
- model = new ModelChecker();
- }
-
cdsc::mutex *m = new cdsc::mutex();
+ ModelExecution *execution;
- ModelExecution *execution = model->get_execution();
+ if (!model) {
+ if (!model_init) {
+ snapshot_system_init(10000, 1024, 1024, 40000);
+ model_init = new ModelChecker();
+ }
+ execution = model_init->get_execution();
+ } else
+ execution = model->get_execution();
execution->getMutexMap()->put(p_mutex, m);
+
return 0;
}
typedef void (*VoidFuncPtr)();
void snapshot_system_init(unsigned int numbackingpages,
unsigned int numsnapshots, unsigned int nummemoryregions,
- unsigned int numheappages, VoidFuncPtr entryPoint);
-
+ unsigned int numheappages);
+void startExecution(VoidFuncPtr entryPoint);
void snapshot_stack_init();
void snapshot_record(int seq_index);
int snapshot_backtrack_before(int seq_index);
static void mprot_snapshot_init(unsigned int numbackingpages,
unsigned int numsnapshots, unsigned int nummemoryregions,
- unsigned int numheappages, VoidFuncPtr entryPoint)
+ unsigned int numheappages)
{
/* Setup a stack for our signal handler.... */
stack_t ss;
pagealignedbase = PageAlignAddressUpward(base_model_snapshot_space);
model_snapshot_space = create_mspace_with_base(pagealignedbase, numheappages * PAGESIZE, 1);
snapshot_add_memory_region(pagealignedbase, numheappages);
+}
+
+static void mprot_startExecution(VoidFuncPtr entryPoint) {
entryPoint();
}
static void fork_snapshot_init(unsigned int numbackingpages,
unsigned int numsnapshots, unsigned int nummemoryregions,
- unsigned int numheappages, VoidFuncPtr entryPoint)
+ unsigned int numheappages)
{
if (!fork_snap)
createSharedMemory();
void *base_model_snapshot_space = malloc((numheappages + 1) * PAGESIZE);
void *pagealignedbase = PageAlignAddressUpward(base_model_snapshot_space);
model_snapshot_space = create_mspace_with_base(pagealignedbase, numheappages * PAGESIZE, 1);
+}
+static void fork_startExecution(VoidFuncPtr entryPoint) {
/* setup an "exiting" context */
char stack[128];
create_context(&exit_ctxt, stack, sizeof(stack), fork_exit);
*/
void snapshot_system_init(unsigned int numbackingpages,
unsigned int numsnapshots, unsigned int nummemoryregions,
- unsigned int numheappages, VoidFuncPtr entryPoint)
+ unsigned int numheappages)
+{
+#if USE_MPROTECT_SNAPSHOT
+ mprot_snapshot_init(numbackingpages, numsnapshots, nummemoryregions, numheappages);
+#else
+ fork_snapshot_init(numbackingpages, numsnapshots, nummemoryregions, numheappages);
+#endif
+}
+
+void startExecution(VoidFuncPtr entryPoint)
{
#if USE_MPROTECT_SNAPSHOT
- mprot_snapshot_init(numbackingpages, numsnapshots, nummemoryregions, numheappages, entryPoint);
+ mprot_startExecution(entryPoint);
#else
- fork_snapshot_init(numbackingpages, numsnapshots, nummemoryregions, numheappages, entryPoint);
+ fork_startExecution(entryPoint);
#endif
}
#include "threads.h"
#include "librace.h"
#include "stdatomic.h"
-#include <mutex>
+#include <mutex.h>
#include <condition_variable>
-std::mutex * m;
-std::condition_variable *v;
+cdsc::mutex * m;
+cdsc::condition_variable *v;
int shareddata;
static void a(void *obj)
{
thrd_t t1, t2;
store_32(&shareddata, (unsigned int) 0);
- m=new std::mutex();
- v=new std::condition_variable();
+ m=new cdsc::mutex();
+ v=new cdsc::condition_variable();
thrd_create(&t1, (thrd_start_t)&a, NULL);
thrd_create(&t2, (thrd_start_t)&b, NULL);