* @brief Entry point for the model checker.
*/
-#include "libthreads.h"
+#include <unistd.h>
+#include <getopt.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"
+#include "scanalysis.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->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_system_next function takes the next step in the execution, if
- * possible.
- * @return Returns 0 (success) if there is another step and non-zero 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);
+static void print_usage(const char *program_name, 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: %s [MODEL-CHECKER OPTIONS] -- [PROGRAM ARGS]\n"
+"\n"
+"MODLE-CHECKER OPTIONS can be any of the model-checker options listed below. Arguments\n"
+"provided after the `--' (the PROGRAM ARGS) are passed to the user program.\n"
+"\n"
+"Model-checker options:\n"
+"-h, --help Display this help message and exit\n"
+"-m, --liveness=NUM Maximum times a thread can read from the same write\n"
+" while other writes exist.\n"
+" Default: %d\n"
+"-M, --maxfv=NUM Maximum number of future values that can be sent to\n"
+" the same read.\n"
+" Default: %d\n"
+"-s, --maxfvdelay=NUM Maximum actions that the model checker will wait for\n"
+" a write from the future past the expected number\n"
+" of actions.\n"
+" Default: %d\n"
+"-S, --fvslop=NUM Future value expiration sloppiness.\n"
+" Default: %u\n"
+"-y, --yield Enable CHESS-like yield-based fairness support.\n"
+" Default: %s\n"
+"-Y, --yieldblock Prohibit an execution from running a yield.\n"
+" Default: %s\n"
+"-f, --fairness=WINDOW Specify a fairness window in which actions that are\n"
+" enabled sufficiently many times should receive\n"
+" priority for execution (not recommended).\n"
+" Default: %d\n"
+"-e, --enabled=COUNT Enabled count.\n"
+" Default: %d\n"
+"-b, --bound=MAX Upper length bound.\n"
+" Default: %d\n"
+"-v, --verbose Print verbose execution information.\n"
+"-u, --uninitialized=VALUE Return VALUE any load which may read from an\n"
+" uninitialized atomic.\n"
+" Default: %u\n"
+"-c, --analysis Use SC Trace Analysis.\n"
+" -- Program arguments follow.\n\n",
+ program_name,
+ params->maxreads,
+ params->maxfuturevalues,
+ params->maxfuturedelay,
+ params->expireslop,
+ params->yieldon ? "enabled" : "disabled",
+ params->yieldblock ? "enabled" : "disabled",
+ params->fairwindow,
+ params->enabledcount,
+ params->bound,
+ params->uninitvalue);
+ exit(EXIT_SUCCESS);
+}
+
+static void parse_options(struct model_params *params, int argc, char **argv)
+{
+ const char *shortopts = "hyYcm:M:s:S:f:e:b:u:v::";
+ const struct option longopts[] = {
+ {"help", no_argument, NULL, 'h'},
+ {"liveness", required_argument, NULL, 'm'},
+ {"maxfv", required_argument, NULL, 'M'},
+ {"maxfvdelay", required_argument, NULL, 's'},
+ {"fvslop", required_argument, NULL, 'S'},
+ {"fairness", required_argument, NULL, 'f'},
+ {"yield", no_argument, NULL, 'y'},
+ {"yieldblock", no_argument, NULL, 'Y'},
+ {"enabled", required_argument, NULL, 'e'},
+ {"bound", required_argument, NULL, 'b'},
+ {"verbose", optional_argument, NULL, 'v'},
+ {"uninitialized", optional_argument, NULL, 'u'},
+ {"analysis", optional_argument, NULL, 'c'},
+ {0, 0, 0, 0} /* Terminator */
+ };
+ int opt, longindex;
+ bool error = false;
+ while (!error && (opt = getopt_long(argc, argv, shortopts, longopts, &longindex)) != -1) {
+ switch (opt) {
+ case 'h':
+ print_usage(argv[0], 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 = optarg ? atoi(optarg) : 1;
+ break;
+ case 'u':
+ params->uninitvalue = atoi(optarg);
+ break;
+ case 'c':
+ params->sc_trace_analysis = true;
+ break;
+ case 'y':
+ params->yieldon = true;
+ break;
+ case 'Y':
+ params->yieldblock = true;
+ break;
+ default: /* '?' */
+ error = true;
+ break;
}
}
- next = model->scheduler->next_thread();
- /* Infeasible -> don't take any more steps */
- if (!model->isfeasible())
- return 1;
+ /* Pass remaining arguments to user program */
+ params->argc = argc - (optind - 1);
+ params->argv = argv + (optind - 1);
- if (next)
- next->set_state(THREAD_RUNNING);
- DEBUG("(%d, %d)\n", curr ? curr->get_id() : -1, next ? next->get_id() : -1);
+ /* Reset program name */
+ params->argv[0] = argv[0];
- /* next == NULL -> don't take any more steps */
- if (!next)
- return 1;
- /* Return non-zero only if swap fails with an error */
- return Thread::swap(model->get_system_context(), next);
+ /* Reset (global) optind for potential use by user program */
+ optind = 1;
+
+ if (error)
+ print_usage(argv[0], params);
}
-/** The thread_wait_finish method runs the current execution until we
- * have no more steps to take.
- */
-static void thread_wait_finish(void) {
- DBG();
+int main_argc;
+char **main_argv;
- while (!thread_system_next());
+static void install_trace_analyses(const ModelExecution *execution)
+{
+ if (model->params.sc_trace_analysis)
+ model->add_trace_analysis(new SCAnalysis(execution));
}
+/** The model_main function contains the main model checking loop. */
+static void model_main()
+{
+ struct model_params params;
-/** The real_main function contains the main model checking loop. */
-static void real_main() {
- thrd_t user_thread;
- ucontext_t main_context;
+ param_defaults(¶ms);
+
+ parse_options(¶ms, main_argc, main_argv);
//Initialize race detector
initRaceDetector();
- //Create the singleton SnapshotStack object
- snapshotObject = new SnapshotStack();
-
- model = new ModelChecker();
-
- if (getcontext(&main_context))
- return;
-
- model->set_system_context(&main_context);
+ snapshot_stack_init();
- snapshotObject->snapshotStep(0);
- do {
- /* Start user program */
- model->add_thread(new Thread(&user_thread, (void (*)(void *)) &user_main, NULL));
-
- /* 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);
}