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 #if 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 XBT_LOG_NEW_DEFAULT_SUBCATEGORY(mc_config, mc,
  24                                 "Configuration of MC");
  25
  26 #if HAVE_MC
  27 namespace simgrid {
  28 namespace mc {
  29 /* Configuration support */
  30 simgrid::mc::ReductionMode reduction_mode = simgrid::mc::ReductionMode::unset;
  31 }
  32 }
  33 #endif
  34
  35 #if !HAVE_MC
  36 #define _sg_do_model_check 0
  37 #endif
  38
  39 int _sg_mc_timeout = 0;
  40
  41 void _mc_cfg_cb_timeout(const char *name, int pos)
  42 {
  43   if (_sg_cfg_init_status && !(_sg_do_model_check || MC_record_path))
  44     xbt_die
  45         ("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.");
  46
  47   _sg_mc_timeout = xbt_cfg_get_boolean(_sg_cfg_set, name);
  48 }
  49
  50 #if HAVE_MC
  51 int _sg_do_model_check = 0;
  52 int _sg_do_model_check_record = 0;
  53 int _sg_mc_checkpoint = 0;
  54 int _sg_mc_sparse_checkpoint = 0;
  55 int _sg_mc_soft_dirty = 0;
  56 int _sg_mc_ksm = 0;
  57 char *_sg_mc_property_file = nullptr;
  58 int _sg_mc_hash = 0;
  59 int _sg_mc_max_depth = 1000;
  60 int _sg_mc_visited = 0;
  61 char *_sg_mc_dot_output_file = nullptr;
  62 int _sg_mc_comms_determinism = 0;
  63 int _sg_mc_send_determinism = 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     simgrid::mc::reduction_mode = simgrid::mc::ReductionMode::none;
  76   else if (!strcasecmp(val, "dpor"))
  77     simgrid::mc::reduction_mode = simgrid::mc::ReductionMode::dpor;
  78   else
  79     xbt_die("configuration option %s can only take 'none' or 'dpor' as a value",
  80             name);
  81 }
  82
  83 void _mc_cfg_cb_checkpoint(const char *name, int pos)
  84 {
  85   if (_sg_cfg_init_status && !_sg_do_model_check)
  86     xbt_die
  87         ("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.");
  88
  89   _sg_mc_checkpoint = xbt_cfg_get_int(_sg_cfg_set, name);
  90 }
  91
  92 void _mc_cfg_cb_sparse_checkpoint(const char *name, int pos) {
  93   if (_sg_cfg_init_status && !_sg_do_model_check)
  94     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.");
  95
  96   _sg_mc_sparse_checkpoint = xbt_cfg_get_boolean(_sg_cfg_set, name);
  97 }
  98
  99 void _mc_cfg_cb_soft_dirty(const char *name, int pos) {
 100   if (_sg_cfg_init_status && !_sg_do_model_check)
 101     xbt_die("You are specifying a soft dirty value after the initialization "
 102             "(through MSG_config?), but model-checking was not activated "
 103             "at config time (through --cfg=model-check:1). "
 104             "This won't work, sorry.");
 105
 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
 114   _sg_mc_ksm = xbt_cfg_get_boolean(_sg_cfg_set, name);
 115 }
 116
 117 void _mc_cfg_cb_property(const char *name, int pos)
 118 {
 119   if (_sg_cfg_init_status && !_sg_do_model_check)
 120     xbt_die
 121         ("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.");
 122
 123   _sg_mc_property_file = xbt_cfg_get_string(_sg_cfg_set, name);
 124 }
 125
 126 void _mc_cfg_cb_hash(const char *name, int pos)
 127 {
 128   if (_sg_cfg_init_status && !_sg_do_model_check)
 129     xbt_die
 130         ("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.");
 131
 132   _sg_mc_hash = xbt_cfg_get_boolean(_sg_cfg_set, name);
 133 }
 134
 135 void _mc_cfg_cb_snapshot_fds(const char *name, int pos)
 136 {
 137   if (_sg_cfg_init_status && !_sg_do_model_check)
 138     xbt_die
 139         ("You are specifying a value to enable/disable the use of FD snapshotting, 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.");
 140
 141   _sg_mc_snapshot_fds = xbt_cfg_get_boolean(_sg_cfg_set, name);
 142 }
 143
 144 void _mc_cfg_cb_max_depth(const char *name, int pos)
 145 {
 146   if (_sg_cfg_init_status && !_sg_do_model_check)
 147     xbt_die
 148         ("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.");
 149
 150   _sg_mc_max_depth = xbt_cfg_get_int(_sg_cfg_set, name);
 151 }
 152
 153 void _mc_cfg_cb_visited(const char *name, int pos)
 154 {
 155   if (_sg_cfg_init_status && !_sg_do_model_check)
 156     xbt_die
 157         ("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.");
 158
 159   _sg_mc_visited = xbt_cfg_get_int(_sg_cfg_set, name);
 160 }
 161
 162 void _mc_cfg_cb_dot_output(const char *name, int pos)
 163 {
 164   if (_sg_cfg_init_status && !_sg_do_model_check)
 165     xbt_die
 166         ("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.");
 167
 168   _sg_mc_dot_output_file = xbt_cfg_get_string(_sg_cfg_set, name);
 169 }
 170
 171 void _mc_cfg_cb_comms_determinism(const char *name, int pos)
 172 {
 173   if (_sg_cfg_init_status && !_sg_do_model_check)
 174     xbt_die
 175         ("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.");
 176
 177   _sg_mc_comms_determinism = xbt_cfg_get_boolean(_sg_cfg_set, name);
 178 }
 179
 180 void _mc_cfg_cb_send_determinism(const char *name, int pos)
 181 {
 182   if (_sg_cfg_init_status && !_sg_do_model_check)
 183     xbt_die
 184         ("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.");
 185
 186   _sg_mc_send_determinism = xbt_cfg_get_boolean(_sg_cfg_set, name);
 187 }
 188
 189 void _mc_cfg_cb_termination(const char *name, int pos)
 190 {
 191   if (_sg_cfg_init_status && !_sg_do_model_check)
 192     xbt_die
 193         ("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.");
 194
 195   _sg_mc_termination = xbt_cfg_get_boolean(_sg_cfg_set, name);
 196 }
 197
 198 #endif