src/mc/mc_config.cpp

   1 /* Copyright (c) 2008-2015. The SimGrid Team.
   2  * All rights reserved.                                                     */
   3
   4 /* This program is free software; you can redistribute it and/or modify it
   5  * under the terms of the license (GNU LGPL) which comes with this package. */
   6
   7 #include <xbt/str.h>
   8 #include <xbt/log.h>
   9 #include <xbt/config.h>
  10
  11 #include <mc/mc.h>
  12 #include "src/mc/mc_replay.h"
  13
  14 #include <simgrid/sg_config.h>
  15
  16 #ifdef HAVE_MC
  17 #include "src/mc/mc_safety.h"
  18 #include "src/mc/mc_private.h"
  19 #endif
  20
  21 #include "src/mc/mc_record.h"
  22
  23 extern "C" {
  24
  25 XBT_LOG_NEW_DEFAULT_SUBCATEGORY(mc_config, mc,
  26                                 "Configuration of MC");
  27
  28 #ifdef HAVE_MC
  29 /* Configuration support */
  30 e_mc_reduce_t mc_reduce_kind = e_mc_reduce_unset;
  31 #endif
  32
  33 #ifndef HAVE_MC
  34 #define _sg_do_model_check 0
  35 #endif
  36
  37 int _sg_mc_timeout = 0;
  38
  39 void _mc_cfg_cb_timeout(const char *name, int pos)
  40 {
  41   if (_sg_cfg_init_status && !(_sg_do_model_check || MC_record_path)) {
  42     xbt_die
  43         ("You are specifying a value to enable/disable timeout for wait requests after the initialization (through MSG_config?), but model-checking was not activated at config time (through bu the program was not runned under the model-checker (with simgrid-mc)). This won't work, sorry.");
  44   }
  45   _sg_mc_timeout = xbt_cfg_get_boolean(_sg_cfg_set, name);
  46 }
  47
  48 #ifdef HAVE_MC
  49 int _sg_do_model_check = 0;
  50 int _sg_do_model_check_record = 0;
  51 int _sg_mc_checkpoint = 0;
  52 int _sg_mc_sparse_checkpoint = 0;
  53 int _sg_mc_soft_dirty = 0;
  54 int _sg_mc_ksm = 0;
  55 char *_sg_mc_property_file = NULL;
  56 int _sg_mc_hash = 0;
  57 int _sg_mc_max_depth = 1000;
  58 int _sg_mc_visited = 0;
  59 char *_sg_mc_dot_output_file = NULL;
  60 int _sg_mc_comms_determinism = 0;
  61 int _sg_mc_send_determinism = 0;
  62 int _sg_mc_safety = 0;
  63 int _sg_mc_liveness = 0;
  64 int _sg_mc_snapshot_fds = 0;
  65 int _sg_mc_termination = 0;
  66
  67 void _mc_cfg_cb_reduce(const char *name, int pos)
  68 {
  69   if (_sg_cfg_init_status && !_sg_do_model_check) {
  70     xbt_die
  71         ("You are specifying a reduction strategy after the initialization (through MSG_config?), but model-checking was not activated at config time (through bu the program was not runned under the model-checker (with simgrid-mc)). This won't work, sorry.");
  72   }
  73   char *val = xbt_cfg_get_string(_sg_cfg_set, name);
  74   if (!strcasecmp(val, "none")) {
  75     mc_reduce_kind = e_mc_reduce_none;
  76   } else if (!strcasecmp(val, "dpor")) {
  77     mc_reduce_kind = e_mc_reduce_dpor;
  78   } else {
  79     xbt_die("configuration option %s can only take 'none' or 'dpor' as a value",
  80             name);
  81   }
  82 }
  83
  84 void _mc_cfg_cb_checkpoint(const char *name, int pos)
  85 {
  86   if (_sg_cfg_init_status && !_sg_do_model_check) {
  87     xbt_die
  88         ("You are specifying a checkpointing value after the initialization (through MSG_config?), but model-checking was not activated at config time (through bu the program was not runned under the model-checker (with simgrid-mc)). This won't work, sorry.");
  89   }
  90   _sg_mc_checkpoint = xbt_cfg_get_int(_sg_cfg_set, name);
  91 }
  92
  93 void _mc_cfg_cb_sparse_checkpoint(const char *name, int pos) {
  94   if (_sg_cfg_init_status && !_sg_do_model_check) {
  95     xbt_die("You are specifying a checkpointing value after the initialization (through MSG_config?), but model-checking was not activated at config time (through bu the program was not runned under the model-checker (with simgrid-mc)). This won't work, sorry.");
  96   }
  97   _sg_mc_sparse_checkpoint = xbt_cfg_get_boolean(_sg_cfg_set, name);
  98 }
  99
 100 void _mc_cfg_cb_soft_dirty(const char *name, int pos) {
 101   if (_sg_cfg_init_status && !_sg_do_model_check)
 102     xbt_die("You are specifying a soft dirty value after the initialization "
 103             "(through MSG_config?), but model-checking was not activated "
 104             "at config time (through --cfg=model-check:1). "
 105             "This won't work, sorry.");
 106   _sg_mc_soft_dirty = xbt_cfg_get_boolean(_sg_cfg_set, name);
 107 }
 108
 109 void _mc_cfg_cb_ksm(const char *name, int pos)
 110 {
 111   if (_sg_cfg_init_status && !_sg_do_model_check)
 112     xbt_die("You are specifying a KSM value after the initialization (through MSG_config?), but model-checking was not activated at config time (through --cfg=model-check:1). This won't work, sorry.");
 113   _sg_mc_ksm = xbt_cfg_get_boolean(_sg_cfg_set, name);
 114 }
 115
 116 void _mc_cfg_cb_property(const char *name, int pos)
 117 {
 118   if (_sg_cfg_init_status && !_sg_do_model_check) {
 119     xbt_die
 120         ("You are specifying a property after the initialization (through MSG_config?), but model-checking was not activated at config time (through bu the program was not runned under the model-checker (with simgrid-mc)). This won't work, sorry.");
 121   }
 122   _sg_mc_property_file = xbt_cfg_get_string(_sg_cfg_set, name);
 123 }
 124
 125 void _mc_cfg_cb_hash(const char *name, int pos)
 126 {
 127   if (_sg_cfg_init_status && !_sg_do_model_check) {
 128     xbt_die
 129         ("You are specifying a value to enable/disable the use of global hash to speedup state comparaison, but model-checking was not activated at config time (through bu the program was not runned under the model-checker (with simgrid-mc)). This won't work, sorry.");
 130   }
 131   _sg_mc_hash = xbt_cfg_get_boolean(_sg_cfg_set, name);
 132 }
 133
 134 void _mc_cfg_cb_snapshot_fds(const char *name, int pos)
 135 {
 136   if (_sg_cfg_init_status && !_sg_do_model_check) {
 137     xbt_die
 138         ("You are specifying a value to enable/disable the use of FD snapshoting, but model-checking was not activated at config time (through bu the program was not runned under the model-checker (with simgrid-mc)). This won't work, sorry.");
 139   }
 140   _sg_mc_snapshot_fds = xbt_cfg_get_boolean(_sg_cfg_set, name);
 141 }
 142
 143 void _mc_cfg_cb_max_depth(const char *name, int pos)
 144 {
 145   if (_sg_cfg_init_status && !_sg_do_model_check) {
 146     xbt_die
 147         ("You are specifying a max depth value after the initialization (through MSG_config?), but model-checking was not activated at config time (through bu the program was not runned under the model-checker (with simgrid-mc)). This won't work, sorry.");
 148   }
 149   _sg_mc_max_depth = xbt_cfg_get_int(_sg_cfg_set, name);
 150 }
 151
 152 void _mc_cfg_cb_visited(const char *name, int pos)
 153 {
 154   if (_sg_cfg_init_status && !_sg_do_model_check) {
 155     xbt_die
 156         ("You are specifying a number of stored visited states after the initialization (through MSG_config?), but model-checking was not activated at config time (through bu the program was not runned under the model-checker (with simgrid-mc)). This won't work, sorry.");
 157   }
 158   _sg_mc_visited = xbt_cfg_get_int(_sg_cfg_set, name);
 159 }
 160
 161 void _mc_cfg_cb_dot_output(const char *name, int pos)
 162 {
 163   if (_sg_cfg_init_status && !_sg_do_model_check) {
 164     xbt_die
 165         ("You are specifying a file name for a dot output of graph state after the initialization (through MSG_config?), but model-checking was not activated at config time (through bu the program was not runned under the model-checker (with simgrid-mc)). This won't work, sorry.");
 166   }
 167   _sg_mc_dot_output_file = xbt_cfg_get_string(_sg_cfg_set, name);
 168 }
 169
 170 void _mc_cfg_cb_comms_determinism(const char *name, int pos)
 171 {
 172   if (_sg_cfg_init_status && !_sg_do_model_check) {
 173     xbt_die
 174         ("You are specifying a value to enable/disable the detection of determinism in the communications schemes after the initialization (through MSG_config?), but model-checking was not activated at config time (through bu the program was not runned under the model-checker (with simgrid-mc)). This won't work, sorry.");
 175   }
 176   _sg_mc_comms_determinism = xbt_cfg_get_boolean(_sg_cfg_set, name);
 177 }
 178
 179 void _mc_cfg_cb_send_determinism(const char *name, int pos)
 180 {
 181   if (_sg_cfg_init_status && !_sg_do_model_check) {
 182     xbt_die
 183         ("You are specifying a value to enable/disable the detection of send-determinism in the communications schemes after the initialization (through MSG_config?), but model-checking was not activated at config time (through bu the program was not runned under the model-checker (with simgrid-mc)). This won't work, sorry.");
 184   }
 185   _sg_mc_send_determinism = xbt_cfg_get_boolean(_sg_cfg_set, name);
 186 }
 187
 188 void _mc_cfg_cb_termination(const char *name, int pos)
 189 {
 190   if (_sg_cfg_init_status && !_sg_do_model_check) {
 191     xbt_die
 192         ("You are specifying a value to enable/disable the detection of non progressive cycles after the initialization (through MSG_config?), but model-checking was not activated at config time (through bu the program was not runned under the model-checker (with simgrid-mc)). This won't work, sorry.");
 193   }
 194   _sg_mc_termination = xbt_cfg_get_boolean(_sg_cfg_set, name);
 195 }
 196
 197 #endif
 198
 199 }