1 /* Copyright (c) 2016-2023. The SimGrid Team. All rights reserved. */
3 /* This program is free software; you can redistribute it and/or modify it
4 * under the terms of the license (GNU LGPL) which comes with this package. */
6 #include "src/mc/explo/Exploration.hpp"
7 #include "src/mc/mc_config.hpp"
8 #include "src/mc/mc_exit.hpp"
9 #include "src/mc/mc_private.hpp"
10 #include "src/mc/sosp/RemoteProcessMemory.hpp"
14 XBT_LOG_NEW_DEFAULT_SUBCATEGORY(mc_explo, mc, "Generic exploration algorithm of the model-checker");
16 namespace simgrid::mc {
18 static simgrid::config::Flag<std::string> cfg_dot_output_file{
19 "model-check/dot-output", "Name of dot output file corresponding to graph state", ""};
21 Exploration::Exploration(const std::vector<char*>& args) : remote_app_(std::make_unique<RemoteApp>(args))
23 mc_model_checker->set_exploration(this);
25 if (not cfg_dot_output_file.get().empty()) {
26 dot_output_ = fopen(cfg_dot_output_file.get().c_str(), "w");
27 xbt_assert(dot_output_ != nullptr, "Error open dot output file: %s", strerror(errno));
29 fprintf(dot_output_, "digraph graphname{\n fixedsize=true; rankdir=TB; ranksep=.25; edge [fontsize=12]; node "
30 "[fontsize=10, shape=circle,width=.5 ]; graph [resolution=20, fontsize=10];\n");
34 Exploration::~Exploration()
36 if (dot_output_ != nullptr)
40 void Exploration::dot_output(const char* fmt, ...)
42 if (dot_output_ != nullptr) {
45 vfprintf(dot_output_, fmt, ap);
51 void Exploration::log_state()
53 if (not cfg_dot_output_file.get().empty()) {
57 if (getenv("SIMGRID_MC_SYSTEM_STATISTICS")) {
58 int ret = system("free");
60 XBT_WARN("Call to system(free) did not return 0, but %d", ret);
64 void Exploration::report_crash(int status)
66 XBT_INFO("**************************");
67 XBT_INFO("** CRASH IN THE PROGRAM **");
68 XBT_INFO("**************************");
69 if (WIFSIGNALED(status))
70 XBT_INFO("From signal: %s", strsignal(WTERMSIG(status)));
71 else if (WIFEXITED(status))
72 XBT_INFO("From exit: %i", WEXITSTATUS(status));
73 if (not xbt_log_no_loc)
74 XBT_INFO("%s core dump was generated by the system.", WCOREDUMP(status) ? "A" : "No");
76 XBT_INFO("Counter-example execution trace:");
77 for (auto const& s : get_textual_trace())
78 XBT_INFO(" %s", s.c_str());
79 XBT_INFO("You can debug the problem (and see the whole details) by rerunning out of simgrid-mc with "
80 "--cfg=model-check/replay:'%s'",
81 get_record_trace().to_string().c_str());
84 XBT_INFO("Stack trace not displayed because you passed --log=no_loc");
86 XBT_INFO("Stack trace:");
87 get_remote_app().get_remote_process_memory().dump_stack();
90 get_remote_app().get_remote_process_memory().terminate();
91 system_exit(SIMGRID_MC_EXIT_PROGRAM_CRASH);
93 void Exploration::report_assertion_failure()
95 XBT_INFO("**************************");
96 XBT_INFO("*** PROPERTY NOT VALID ***");
97 XBT_INFO("**************************");
98 XBT_INFO("Counter-example execution trace:");
99 for (auto const& s : get_textual_trace())
100 XBT_INFO(" %s", s.c_str());
101 XBT_INFO("You can debug the problem (and see the whole details) by rerunning out of simgrid-mc with "
102 "--cfg=model-check/replay:'%s'",
103 get_record_trace().to_string().c_str());
105 system_exit(SIMGRID_MC_EXIT_SAFETY);
108 void Exploration::system_exit(int status)
110 get_remote_app().shutdown();
114 }; // namespace simgrid::mc