* @brief Entry point for the model checker.
*/
-#include "libthreads.h"
+#include <unistd.h>
+
#include "common.h"
-#include "threads.h"
+#include "output.h"
#include "datarace.h"
/* global "model" object */
#include "model.h"
+#include "params.h"
#include "snapshot-interface.h"
-
-/** The thread_system_next function takes the next step in the
- * execution. @return Returns the 1 if there is another step and 0
- * otherwise.
- */
-
-static int thread_system_next(void) {
- Thread *curr, *next;
-
- curr = thread_current();
- if (curr) {
- if (curr->get_state() == THREAD_READY) {
- model->check_current_action();
- model->scheduler->add_thread(curr);
- } else if (curr->get_state() == THREAD_RUNNING)
- /* Stopped while running; i.e., completed */
- curr->complete();
- else
- ASSERT(false);
- }
- next = model->scheduler->next_thread();
- if (next)
- next->set_state(THREAD_RUNNING);
- DEBUG("(%d, %d)\n", curr ? curr->get_id() : -1, next ? next->get_id() : -1);
- if (!next)
- return 1;
- return Thread::swap(model->get_system_context(), next);
+#include "scanalysis.h"
+
+static void param_defaults(struct model_params *params)
+{
+ params->maxreads = 0;
+ params->maxfuturedelay = 6;
+ params->fairwindow = 0;
+ params->yieldon = false;
+ params->sc_trace_analysis = false;
+ params->enabledcount = 1;
+ params->bound = 0;
+ params->maxfuturevalues = 0;
+ params->expireslop = 4;
+ params->verbose = !!DBG_ENABLED();
+ params->uninitvalue = 0;
}
-/** The thread_wait_finish method runs the current execution until we
- * have no more steps to take.
- */
+static void print_usage(struct model_params *params)
+{
+ /* Reset defaults before printing */
+ param_defaults(params);
+
+ model_print(
+"Copyright (c) 2013 Regents of the University of California. All rights reserved.\n"
+"Distributed under the GPLv2\n"
+"Written by Brian Norris and Brian Demsky\n"
+"\n"
+"Usage: <program name> [MC_OPTIONS] -- [PROGRAM ARGUMENTS]\n"
+"\n"
+"Options:\n"
+"-h Display this help message and exit\n"
+"-m Maximum times a thread can read from the same write\n"
+" while other writes exist. Default: %d\n"
+"-M Maximum number of future values that can be sent to\n"
+" the same read. Default: %d\n"
+"-s Maximum actions that the model checker will wait for\n"
+" a write from the future past the expected number of\n"
+" actions. Default: %d\n"
+"-S Future value expiration sloppiness. Default: %u\n"
+"-f Specify a fairness window in which actions that are\n"
+" enabled sufficiently many times should receive\n"
+" priority for execution. Default: %d\n"
+"-y Turn on CHESS yield-based fairness support.\n"
+" Default: %d\n"
+"-e Enabled count. Default: %d\n"
+"-b Upper length bound. Default: %d\n"
+"-v Print verbose execution information.\n"
+"-u Value for uninitialized reads. Default: %u\n"
+"-c Use SC Trace Analysis.\n"
+"-- Program arguments follow.\n\n",
+params->maxreads, params->maxfuturevalues, params->maxfuturedelay, params->expireslop, params->fairwindow, params->yieldon, params->enabledcount, params->bound, params->uninitvalue);
+ exit(EXIT_SUCCESS);
+}
-static void thread_wait_finish(void) {
- DBG();
+static void parse_options(struct model_params *params, int argc, char **argv)
+{
+ const char *shortopts = "hycm:M:s:S:f:e:b:u:v";
+ int opt;
+ bool error = false;
+ while (!error && (opt = getopt(argc, argv, shortopts)) != -1) {
+ switch (opt) {
+ case 'h':
+ print_usage(params);
+ break;
+ case 's':
+ params->maxfuturedelay = atoi(optarg);
+ break;
+ case 'S':
+ params->expireslop = atoi(optarg);
+ break;
+ case 'f':
+ params->fairwindow = atoi(optarg);
+ break;
+ case 'e':
+ params->enabledcount = atoi(optarg);
+ break;
+ case 'b':
+ params->bound = atoi(optarg);
+ break;
+ case 'm':
+ params->maxreads = atoi(optarg);
+ break;
+ case 'M':
+ params->maxfuturevalues = atoi(optarg);
+ break;
+ case 'v':
+ params->verbose = 1;
+ break;
+ case 'u':
+ params->uninitvalue = atoi(optarg);
+ break;
+ case 'c':
+ params->sc_trace_analysis = true;
+ break;
+ case 'y':
+ params->yieldon = true;
+ break;
+ default: /* '?' */
+ error = true;
+ break;
+ }
+ }
- while (!thread_system_next());
-}
+ /* Pass remaining arguments to user program */
+ params->argc = argc - (optind - 1);
+ params->argv = argv + (optind - 1);
+ /* Reset program name */
+ params->argv[0] = argv[0];
-/** The real_main function contains the main model checking loop. */
+ /* Reset (global) optind for potential use by user program */
+ optind = 1;
-void real_main() {
- thrd_t user_thread;
- ucontext_t main_context;
+ if (error)
+ print_usage(params);
+}
- //Initialize race detector
- initRaceDetector();
+int main_argc;
+char **main_argv;
- //Create the singleton SnapshotStack object
- snapshotObject = new SnapshotStack();
+static void install_trace_analyses(const ModelExecution *execution)
+{
+ if (model->params.sc_trace_analysis)
+ model->add_trace_analysis(new SCAnalysis(execution));
+}
- model = new ModelChecker();
+/** The model_main function contains the main model checking loop. */
+static void model_main()
+{
+ struct model_params params;
- if (getcontext(&main_context))
- return;
+ param_defaults(¶ms);
- model->set_system_context(&main_context);
+ parse_options(¶ms, main_argc, main_argv);
- snapshotObject->snapshotStep(0);
+ //Initialize race detector
+ initRaceDetector();
- do {
- /* Start user program */
- model->add_thread(new Thread(&user_thread, (void (*)(void *)) &user_main, NULL));
+ snapshot_stack_init();
- /* Wait for all threads to complete */
- thread_wait_finish();
- } while (model->next_execution());
+ model = new ModelChecker(params);
+ install_trace_analyses(model->get_execution());
+ snapshot_record(0);
+ model->run();
delete model;
DEBUG("Exiting\n");
}
-int main_numargs;
-char ** main_args;
-
/**
* Main function. Just initializes snapshotting library and the
- * snapshotting library calls the real_main function.
+ * snapshotting library calls the model_main function.
*/
-int main(int numargs, char ** args) {
- /* Stash this stuff in case someone wants it eventually */
- main_numargs=numargs;
- main_args=args;
+int main(int argc, char **argv)
+{
+ main_argc = argc;
+ main_argv = argv;
+
+ /* Configure output redirection for the model-checker */
+ redirect_output();
/* Let's jump in quickly and start running stuff */
- initSnapShotLibrary(10000, 1024, 1024, 1000, &real_main);
+ snapshot_system_init(10000, 1024, 1024, 4000, &model_main);
}