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 "mc/mc_replay.h"
  13
  14 #include <simgrid/sg_config.h>
  15
  16 #ifdef HAVE_MC
  17 #include "mc_safety.h"
  18 #include "mc_private.h"
  19 #endif
  20
  21 #include "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_ksm = 0;
  54 char *_sg_mc_property_file = NULL;
  55 int _sg_mc_hash = 0;
  56 int _sg_mc_max_depth = 1000;
  57 int _sg_mc_visited = 0;
  58 char *_sg_mc_dot_output_file = NULL;
  59 int _sg_mc_comms_determinism = 0;
  60 int _sg_mc_send_determinism = 0;
  61 int _sg_mc_safety = 0;
  62 int _sg_mc_liveness = 0;
  63 int _sg_mc_snapshot_fds = 0;
  64 int _sg_mc_termination = 0;
  65
  66 void _mc_cfg_cb_reduce(const char *name, int pos)
  67 {
  68   if (_sg_cfg_init_status && !_sg_do_model_check) {
  69     xbt_die
  70         ("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.");
  71   }
  72   char *val = xbt_cfg_get_string(_sg_cfg_set, name);
  73   if (!strcasecmp(val, "none")) {
  74     mc_reduce_kind = e_mc_reduce_none;
  75   } else if (!strcasecmp(val, "dpor")) {
  76     mc_reduce_kind = e_mc_reduce_dpor;
  77   } else {
  78     xbt_die("configuration option %s can only take 'none' or 'dpor' as a value",
  79             name);
  80   }
  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_ksm(const char *name, int pos)
 100 {
 101   if (_sg_cfg_init_status && !_sg_do_model_check)
 102     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.");
 103   _sg_mc_ksm = xbt_cfg_get_boolean(_sg_cfg_set, name);
 104 }
 105
 106 void _mc_cfg_cb_property(const char *name, int pos)
 107 {
 108   if (_sg_cfg_init_status && !_sg_do_model_check) {
 109     xbt_die
 110         ("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.");
 111   }
 112   _sg_mc_property_file = xbt_cfg_get_string(_sg_cfg_set, name);
 113 }
 114
 115 void _mc_cfg_cb_hash(const char *name, int pos)
 116 {
 117   if (_sg_cfg_init_status && !_sg_do_model_check) {
 118     xbt_die
 119         ("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.");
 120   }
 121   _sg_mc_hash = xbt_cfg_get_boolean(_sg_cfg_set, name);
 122 }
 123
 124 void _mc_cfg_cb_snapshot_fds(const char *name, int pos)
 125 {
 126   if (_sg_cfg_init_status && !_sg_do_model_check) {
 127     xbt_die
 128         ("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.");
 129   }
 130   _sg_mc_snapshot_fds = xbt_cfg_get_boolean(_sg_cfg_set, name);
 131 }
 132
 133 void _mc_cfg_cb_max_depth(const char *name, int pos)
 134 {
 135   if (_sg_cfg_init_status && !_sg_do_model_check) {
 136     xbt_die
 137         ("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.");
 138   }
 139   _sg_mc_max_depth = xbt_cfg_get_int(_sg_cfg_set, name);
 140 }
 141
 142 void _mc_cfg_cb_visited(const char *name, int pos)
 143 {
 144   if (_sg_cfg_init_status && !_sg_do_model_check) {
 145     xbt_die
 146         ("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.");
 147   }
 148   _sg_mc_visited = xbt_cfg_get_int(_sg_cfg_set, name);
 149 }
 150
 151 void _mc_cfg_cb_dot_output(const char *name, int pos)
 152 {
 153   if (_sg_cfg_init_status && !_sg_do_model_check) {
 154     xbt_die
 155         ("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.");
 156   }
 157   _sg_mc_dot_output_file = xbt_cfg_get_string(_sg_cfg_set, name);
 158 }
 159
 160 void _mc_cfg_cb_comms_determinism(const char *name, int pos)
 161 {
 162   if (_sg_cfg_init_status && !_sg_do_model_check) {
 163     xbt_die
 164         ("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.");
 165   }
 166   _sg_mc_comms_determinism = xbt_cfg_get_boolean(_sg_cfg_set, name);
 167 }
 168
 169 void _mc_cfg_cb_send_determinism(const char *name, int pos)
 170 {
 171   if (_sg_cfg_init_status && !_sg_do_model_check) {
 172     xbt_die
 173         ("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.");
 174   }
 175   _sg_mc_send_determinism = xbt_cfg_get_boolean(_sg_cfg_set, name);
 176 }
 177
 178 void _mc_cfg_cb_termination(const char *name, int pos)
 179 {
 180   if (_sg_cfg_init_status && !_sg_do_model_check) {
 181     xbt_die
 182         ("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.");
 183   }
 184   _sg_mc_termination = xbt_cfg_get_boolean(_sg_cfg_set, name);
 185 }
 186
 187 #endif
 188
 189 }