X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/d13b1659a0c2551ee41b287a269e391bb2d7bc8a..2807fde4fd1f59c230d69a934634c5dfb77905f2:/src/mc/mc_config.cpp diff --git a/src/mc/mc_config.cpp b/src/mc/mc_config.cpp index bf9eae8a34..bfee44943a 100644 --- a/src/mc/mc_config.cpp +++ b/src/mc/mc_config.cpp @@ -1,182 +1,183 @@ -/* Copyright (c) 2008-2014. The SimGrid Team. - * All rights reserved. */ +/* Copyright (c) 2008-2017. The SimGrid Team. All rights reserved. */ /* This program is free software; you can redistribute it and/or modify it * under the terms of the license (GNU LGPL) which comes with this package. */ -#include - -#include -#include +#include "xbt/config.h" +#include "xbt/log.h" +#include +#include "src/mc/mc_replay.hpp" #include -#include "mc/mc_replay.h" #include -#ifdef HAVE_MC -#include "mc_safety.h" -#include "mc_private.h" +#if SIMGRID_HAVE_MC +#include "src/mc/mc_private.hpp" +#include "src/mc/mc_safety.hpp" #endif -#include "mc_record.h" - -extern "C" { +#include "src/mc/mc_record.hpp" -XBT_LOG_NEW_DEFAULT_SUBCATEGORY(mc_config, mc, - "Configuration of MC"); +XBT_LOG_NEW_DEFAULT_SUBCATEGORY(mc_config, mc, "Configuration of the Model Checker"); -#ifdef HAVE_MC +#if SIMGRID_HAVE_MC +namespace simgrid { +namespace mc { /* Configuration support */ -e_mc_reduce_t mc_reduce_kind = e_mc_reduce_unset; +simgrid::mc::ReductionMode reduction_mode = simgrid::mc::ReductionMode::unset; +} +} #endif -#ifndef HAVE_MC +#if !SIMGRID_HAVE_MC #define _sg_do_model_check 0 #endif int _sg_mc_timeout = 0; -void _mc_cfg_cb_timeout(const char *name, int pos) +void _mc_cfg_cb_timeout(const char *name) { - if (_sg_cfg_init_status && !(_sg_do_model_check || MC_record_path)) { - xbt_die - ("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 --cfg=model-check:1). This won't work, sorry."); - } - _sg_mc_timeout = xbt_cfg_get_boolean(_sg_cfg_set, name); + if (_sg_cfg_init_status && not(_sg_do_model_check || not MC_record_path.empty())) + xbt_die("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."); + + _sg_mc_timeout = xbt_cfg_get_boolean(name); } -#ifdef HAVE_MC +#if SIMGRID_HAVE_MC int _sg_do_model_check = 0; int _sg_do_model_check_record = 0; int _sg_mc_checkpoint = 0; int _sg_mc_sparse_checkpoint = 0; -char *_sg_mc_property_file = NULL; +int _sg_mc_ksm = 0; +std::string _sg_mc_property_file; int _sg_mc_hash = 0; int _sg_mc_max_depth = 1000; -int _sg_mc_visited = 0; -char *_sg_mc_dot_output_file = NULL; +int _sg_mc_max_visited_states = 0; +std::string _sg_mc_dot_output_file; int _sg_mc_comms_determinism = 0; int _sg_mc_send_determinism = 0; -int _sg_mc_safety = 0; -int _sg_mc_liveness = 0; int _sg_mc_snapshot_fds = 0; int _sg_mc_termination = 0; -void _mc_cfg_cb_reduce(const char *name, int pos) +void _mc_cfg_cb_reduce(const char *name) { - if (_sg_cfg_init_status && !_sg_do_model_check) { + if (_sg_cfg_init_status && not _sg_do_model_check) xbt_die - ("You are specifying a reduction strategy 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."); - } - char *val = xbt_cfg_get_string(_sg_cfg_set, name); - if (!strcasecmp(val, "none")) { - mc_reduce_kind = e_mc_reduce_none; - } else if (!strcasecmp(val, "dpor")) { - mc_reduce_kind = e_mc_reduce_dpor; - } else { - xbt_die("configuration option %s can only take 'none' or 'dpor' as a value", - name); - } -} - -void _mc_cfg_cb_checkpoint(const char *name, int pos) + ("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."); + + std::string val = xbt_cfg_get_string(name); + if (val == "none") + simgrid::mc::reduction_mode = simgrid::mc::ReductionMode::none; + else if (val == "dpor") + simgrid::mc::reduction_mode = simgrid::mc::ReductionMode::dpor; + else + xbt_die("configuration option %s can only take 'none' or 'dpor' as a value", name); +} + +void _mc_cfg_cb_checkpoint(const char *name) { - if (_sg_cfg_init_status && !_sg_do_model_check) { + if (_sg_cfg_init_status && not _sg_do_model_check) xbt_die - ("You are specifying a checkpointing 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."); - } - _sg_mc_checkpoint = xbt_cfg_get_int(_sg_cfg_set, name); + ("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."); + + _sg_mc_checkpoint = xbt_cfg_get_int(name); } -void _mc_cfg_cb_sparse_checkpoint(const char *name, int pos) { - if (_sg_cfg_init_status && !_sg_do_model_check) { - xbt_die("You are specifying a checkpointing 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."); - } - _sg_mc_sparse_checkpoint = xbt_cfg_get_boolean(_sg_cfg_set, name); +void _mc_cfg_cb_sparse_checkpoint(const char *name) { + if (_sg_cfg_init_status && not _sg_do_model_check) + 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."); + + _sg_mc_sparse_checkpoint = xbt_cfg_get_boolean(name); } -void _mc_cfg_cb_property(const char *name, int pos) +void _mc_cfg_cb_ksm(const char *name) { - if (_sg_cfg_init_status && !_sg_do_model_check) { - xbt_die - ("You are specifying a property 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."); - } - _sg_mc_property_file = xbt_cfg_get_string(_sg_cfg_set, name); + if (_sg_cfg_init_status && not _sg_do_model_check) + 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."); + + _sg_mc_ksm = xbt_cfg_get_boolean(name); } -void _mc_cfg_cb_hash(const char *name, int pos) +void _mc_cfg_cb_property(const char *name) { - if (_sg_cfg_init_status && !_sg_do_model_check) { + if (_sg_cfg_init_status && not _sg_do_model_check) xbt_die - ("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 --cfg=model-check:1). This won't work, sorry."); - } - _sg_mc_hash = xbt_cfg_get_boolean(_sg_cfg_set, name); + ("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."); + + _sg_mc_property_file = xbt_cfg_get_string(name); } -void _mc_cfg_cb_snapshot_fds(const char *name, int pos) +void _mc_cfg_cb_hash(const char *name) { - if (_sg_cfg_init_status && !_sg_do_model_check) { + if (_sg_cfg_init_status && not _sg_do_model_check) xbt_die - ("You are specifying a value to enable/disable the use of FD snapshoting, but model-checking was not activated at config time (through --cfg=model-check:1). This won't work, sorry."); - } - _sg_mc_snapshot_fds = xbt_cfg_get_boolean(_sg_cfg_set, name); + ("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."); + + _sg_mc_hash = xbt_cfg_get_boolean(name); } -void _mc_cfg_cb_max_depth(const char *name, int pos) +void _mc_cfg_cb_snapshot_fds(const char *name) { - if (_sg_cfg_init_status && !_sg_do_model_check) { + if (_sg_cfg_init_status && not _sg_do_model_check) xbt_die - ("You are specifying a max depth 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."); - } - _sg_mc_max_depth = xbt_cfg_get_int(_sg_cfg_set, name); + ("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."); + + _sg_mc_snapshot_fds = xbt_cfg_get_boolean(name); } -void _mc_cfg_cb_visited(const char *name, int pos) +void _mc_cfg_cb_max_depth(const char *name) { - if (_sg_cfg_init_status && !_sg_do_model_check) { + if (_sg_cfg_init_status && not _sg_do_model_check) xbt_die - ("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 --cfg=model-check:1). This won't work, sorry."); - } - _sg_mc_visited = xbt_cfg_get_int(_sg_cfg_set, name); + ("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."); + + _sg_mc_max_depth = xbt_cfg_get_int(name); } -void _mc_cfg_cb_dot_output(const char *name, int pos) +void _mc_cfg_cb_visited(const char *name) { - if (_sg_cfg_init_status && !_sg_do_model_check) { + if (_sg_cfg_init_status && not _sg_do_model_check) xbt_die - ("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 --cfg=model-check:1). This won't work, sorry."); - } - _sg_mc_dot_output_file = xbt_cfg_get_string(_sg_cfg_set, name); + ("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."); + + _sg_mc_max_visited_states = xbt_cfg_get_int(name); } -void _mc_cfg_cb_comms_determinism(const char *name, int pos) +void _mc_cfg_cb_dot_output(const char *name) { - if (_sg_cfg_init_status && !_sg_do_model_check) { + if (_sg_cfg_init_status && not _sg_do_model_check) xbt_die - ("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 --cfg=model-check:1). This won't work, sorry."); - } - _sg_mc_comms_determinism = xbt_cfg_get_boolean(_sg_cfg_set, name); + ("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."); + + _sg_mc_dot_output_file = xbt_cfg_get_string(name); } -void _mc_cfg_cb_send_determinism(const char *name, int pos) +void _mc_cfg_cb_comms_determinism(const char *name) { - if (_sg_cfg_init_status && !_sg_do_model_check) { + if (_sg_cfg_init_status && not _sg_do_model_check) xbt_die - ("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 --cfg=model-check:1). This won't work, sorry."); - } - _sg_mc_send_determinism = xbt_cfg_get_boolean(_sg_cfg_set, name); + ("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."); + + _sg_mc_comms_determinism = xbt_cfg_get_boolean(name); } -void _mc_cfg_cb_termination(const char *name, int pos) +void _mc_cfg_cb_send_determinism(const char *name) { - if (_sg_cfg_init_status && !_sg_do_model_check) { + if (_sg_cfg_init_status && not _sg_do_model_check) xbt_die - ("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 --cfg=model-check:1). This won't work, sorry."); - } - _sg_mc_termination = xbt_cfg_get_boolean(_sg_cfg_set, name); + ("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."); + + _sg_mc_send_determinism = xbt_cfg_get_boolean(name); } -#endif +void _mc_cfg_cb_termination(const char *name) +{ + if (_sg_cfg_init_status && not _sg_do_model_check) + xbt_die + ("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."); + _sg_mc_termination = xbt_cfg_get_boolean(name); } + +#endif