Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
Merge branch 'master' of scm.gforge.inria.fr:/gitroot/simgrid/simgrid
[simgrid.git] / 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 = nullptr;
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 = nullptr;
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 }