X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/bdef81fa4e3566ce31b435deb98fea7b8fe70e6e..b8df87e176f27b25534f27d7e240defa32ca35bc:/src/mc/checker/SafetyChecker.cpp diff --git a/src/mc/checker/SafetyChecker.cpp b/src/mc/checker/SafetyChecker.cpp index 68e667f00c..51c0a97f94 100644 --- a/src/mc/checker/SafetyChecker.cpp +++ b/src/mc/checker/SafetyChecker.cpp @@ -1,5 +1,4 @@ -/* Copyright (c) 2016. The SimGrid Team. - * All rights reserved. */ +/* Copyright (c) 2016-2019. 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. */ @@ -14,18 +13,15 @@ #include #include -#include "src/mc/mc_state.h" -#include "src/mc/mc_request.h" -#include "src/mc/mc_safety.h" -#include "src/mc/mc_private.h" -#include "src/mc/mc_record.h" -#include "src/mc/mc_smx.h" -#include "src/mc/Client.hpp" -#include "src/mc/mc_exit.h" -#include "src/mc/checker/SafetyChecker.hpp" -#include "src/mc/VisitedState.hpp" -#include "src/mc/Transition.hpp" #include "src/mc/Session.hpp" +#include "src/mc/Transition.hpp" +#include "src/mc/VisitedState.hpp" +#include "src/mc/checker/SafetyChecker.hpp" +#include "src/mc/mc_exit.hpp" +#include "src/mc/mc_private.hpp" +#include "src/mc/mc_record.hpp" +#include "src/mc/mc_request.hpp" +#include "src/mc/mc_smx.hpp" #include "src/xbt/mmalloc/mmprivate.h" @@ -34,17 +30,6 @@ XBT_LOG_NEW_DEFAULT_SUBCATEGORY(mc_safety, mc, namespace simgrid { namespace mc { -static void MC_show_non_termination(void) -{ - XBT_INFO("******************************************"); - XBT_INFO("*** NON-PROGRESSIVE CYCLE DETECTED ***"); - XBT_INFO("******************************************"); - XBT_INFO("Counter-example execution trace:"); - for (auto& s : mc_model_checker->getChecker()->getTextualTrace()) - XBT_INFO("%s", s.c_str()); - simgrid::mc::session->logState(); -} - static int snapshot_compare(simgrid::mc::State* state1, simgrid::mc::State* state2) { simgrid::mc::Snapshot* s1 = state1->system_state.get(); @@ -54,14 +39,21 @@ static int snapshot_compare(simgrid::mc::State* state1, simgrid::mc::State* stat return snapshot_compare(num1, s1, num2, s2); } -bool SafetyChecker::checkNonTermination(simgrid::mc::State* current_state) +void SafetyChecker::checkNonTermination(simgrid::mc::State* current_state) { for (auto state = stack_.rbegin(); state != stack_.rend(); ++state) if (snapshot_compare(state->get(), current_state) == 0) { XBT_INFO("Non-progressive cycle: state %d -> state %d", (*state)->num, current_state->num); - return true; + XBT_INFO("******************************************"); + XBT_INFO("*** NON-PROGRESSIVE CYCLE DETECTED ***"); + XBT_INFO("******************************************"); + XBT_INFO("Counter-example execution trace:"); + for (auto const& s : mc_model_checker->getChecker()->getTextualTrace()) + XBT_INFO("%s", s.c_str()); + simgrid::mc::session->logState(); + + throw simgrid::mc::TerminationError(); } - return false; } RecordTrace SafetyChecker::getRecordTrace() // override @@ -87,62 +79,55 @@ std::vector SafetyChecker::getTextualTrace() // override void SafetyChecker::logState() // override { - Checker::logState(); XBT_INFO("Expanded states = %lu", expandedStatesCount_); XBT_INFO("Visited states = %lu", mc_model_checker->visited_states); XBT_INFO("Executed transitions = %lu", mc_model_checker->executed_transitions); } -int SafetyChecker::run() +void SafetyChecker::run() { /* This function runs the DFS algorithm the state space. * We do so iteratively instead of recursively, dealing with the call stack manually. - * This allows to explore the call stack when we want to. */ + * This allows to explore the call stack at wish. */ - while (!stack_.empty()) { + while (not stack_.empty()) { /* Get current state */ simgrid::mc::State* state = stack_.back().get(); XBT_DEBUG("**************************************************"); - XBT_DEBUG("Exploration depth=%zi (state=%p, num %d)(%zu interleave)", - stack_.size(), state, state->num, state->interleaveSize()); + XBT_DEBUG("Exploration depth=%zu (state=%p, num %d)(%zu interleave)", stack_.size(), state, state->num, + state->interleaveSize()); mc_model_checker->visited_states++; // Backtrack if we reached the maximum depth if (stack_.size() > (std::size_t)_sg_mc_max_depth) { XBT_WARN("/!\\ Max depth reached ! /!\\ "); - int res = this->backtrack(); - if (res) - return res; - else - continue; + this->backtrack(); + continue; } // Backtrack if we are revisiting a state we saw previously if (visitedState_ != nullptr) { XBT_DEBUG("State already visited (equal to state %d), exploration stopped on this path.", - visitedState_->other_num == -1 ? visitedState_->num : visitedState_->other_num); + visitedState_->original_num == -1 ? visitedState_->num : visitedState_->original_num); visitedState_ = nullptr; - int res = this->backtrack(); - if (res) - return res; - else - continue; + this->backtrack(); + continue; } + // Search an enabled transition in the current state; backtrack if the interleave set is empty + // get_request also sets state.transition to be the one corresponding to the returned req smx_simcall_t req = MC_state_get_request(state); - // Backtrack if the interleave set is empty + // req is now the transition of the process that was selected to be executed + if (req == nullptr) { - XBT_DEBUG("There are no more processes to interleave. (depth %zi)", stack_.size() + 1); + XBT_DEBUG("There are no more processes to interleave. (depth %zu)", stack_.size() + 1); - int res = this->backtrack(); - if (res) - return res; - else - continue; + this->backtrack(); + continue; } // If there are processes to interleave and the maximum depth has not been @@ -157,58 +142,57 @@ int SafetyChecker::run() mc_model_checker->executed_transitions++; - /* Answer the request */ + /* Actually answer the request: let execute the selected request (MCed does one step) */ this->getSession().execute(state->transition); - /* Create the new expanded state */ + /* Create the new expanded state (copy the state of MCed into our MCer data) */ std::unique_ptr next_state = std::unique_ptr(new simgrid::mc::State(++expandedStatesCount_)); - if (_sg_mc_termination && this->checkNonTermination(next_state.get())) { - MC_show_non_termination(); - return SIMGRID_MC_EXIT_NON_TERMINATION; - } + if (_sg_mc_termination) + this->checkNonTermination(next_state.get()); /* Check whether we already explored next_state in the past (but only if interested in state-equality reduction) */ - if (_sg_mc_visited == true) + if (_sg_mc_max_visited_states > 0) visitedState_ = visitedStates_.addVisitedState(expandedStatesCount_, next_state.get(), true); /* If this is a new state (or if we don't care about state-equality reduction) */ - if (_sg_mc_visited == 0 || visitedState_ == nullptr) { + if (visitedState_ == nullptr) { /* Get an enabled process and insert it in the interleave set of the next state */ - for (auto& actor : mc_model_checker->process().actors()) - if (simgrid::mc::actor_is_enabled(actor.copy.getBuffer())) { - next_state->interleave(actor.copy.getBuffer()); + for (auto& remoteActor : mc_model_checker->process().actors()) { + auto actor = remoteActor.copy.getBuffer(); + if (simgrid::mc::actor_is_enabled(actor)) { + next_state->addInterleavingSet(actor); if (reductionMode_ == simgrid::mc::ReductionMode::dpor) - break; + break; // With DPOR, we take the first enabled transition } + } if (dot_output != nullptr) std::fprintf(dot_output, "\"%d\" -> \"%d\" [%s];\n", state->num, next_state->num, req_str.c_str()); } else if (dot_output != nullptr) - std::fprintf(dot_output, "\"%d\" -> \"%d\" [%s];\n", - state->num, - visitedState_->other_num == -1 ? visitedState_->num : visitedState_->other_num, req_str.c_str()); + std::fprintf(dot_output, "\"%d\" -> \"%d\" [%s];\n", state->num, + visitedState_->original_num == -1 ? visitedState_->num : visitedState_->original_num, + req_str.c_str()); stack_.push_back(std::move(next_state)); } XBT_INFO("No property violation found."); simgrid::mc::session->logState(); - return SIMGRID_MC_EXIT_SUCCESS; } -int SafetyChecker::backtrack() +void SafetyChecker::backtrack() { stack_.pop_back(); /* Check for deadlocks */ if (mc_model_checker->checkDeadlock()) { MC_show_deadlock(); - return SIMGRID_MC_EXIT_DEADLOCK; + throw simgrid::mc::DeadlockError(); } /* Traverse the stack backwards until a state with a non empty interleave @@ -218,14 +202,14 @@ int SafetyChecker::backtrack() executed before it. If it does then add it to the interleave set of the state that executed that previous request. */ - while (!stack_.empty()) { + while (not stack_.empty()) { std::unique_ptr state = std::move(stack_.back()); stack_.pop_back(); if (reductionMode_ == simgrid::mc::ReductionMode::dpor) { smx_simcall_t req = &state->internal_req; if (req->call == SIMCALL_MUTEX_LOCK || req->call == SIMCALL_MUTEX_TRYLOCK) - xbt_die("Mutex is currently not supported with DPOR, " - "use --cfg=model-check/reduction:none"); + xbt_die("Mutex is currently not supported with DPOR, use --cfg=model-check/reduction:none"); + const smx_actor_t issuer = MC_smx_simcall_get_issuer(req); for (auto i = stack_.rbegin(); i != stack_.rend(); ++i) { simgrid::mc::State* prev_state = i->get(); @@ -246,8 +230,8 @@ int SafetyChecker::backtrack() state->num); } - if (!prev_state->processStates[issuer->pid].isDone()) - prev_state->interleave(issuer); + if (not prev_state->actorStates[issuer->pid_].isDone()) + prev_state->addInterleavingSet(issuer); else XBT_DEBUG("Process %p is in done set", req->issuer); @@ -261,12 +245,9 @@ int SafetyChecker::backtrack() } else { const smx_actor_t previous_issuer = MC_smx_simcall_get_issuer(&prev_state->internal_req); - XBT_DEBUG("Simcall %d, process %lu (state %d) and simcall %d, process %lu (state %d) are independant", - req->call, issuer->pid, state->num, - prev_state->internal_req.call, - previous_issuer->pid, + XBT_DEBUG("Simcall %d, process %ld (state %d) and simcall %d, process %ld (state %d) are independent", + req->call, issuer->pid_, state->num, prev_state->internal_req.call, previous_issuer->pid_, prev_state->num); - } } } @@ -274,19 +255,15 @@ int SafetyChecker::backtrack() if (state->interleaveSize() && stack_.size() < (std::size_t) _sg_mc_max_depth) { /* We found a back-tracking point, let's loop */ - XBT_DEBUG("Back-tracking to state %d at depth %zi", - state->num, stack_.size() + 1); + XBT_DEBUG("Back-tracking to state %d at depth %zu", state->num, stack_.size() + 1); stack_.push_back(std::move(state)); this->restoreState(); - XBT_DEBUG("Back-tracking to state %d at depth %zi done", - stack_.back()->num, stack_.size()); + XBT_DEBUG("Back-tracking to state %d at depth %zu done", stack_.back()->num, stack_.size()); break; } else { - XBT_DEBUG("Delete state %d at depth %zi", - state->num, stack_.size() + 1); + XBT_DEBUG("Delete state %d at depth %zu", state->num, stack_.size() + 1); } } - return SIMGRID_MC_EXIT_SUCCESS; } void SafetyChecker::restoreState() @@ -323,7 +300,9 @@ SafetyChecker::SafetyChecker(Session& session) : Checker(session) if (_sg_mc_termination) XBT_INFO("Check non progressive cycles"); else - XBT_INFO("Check a safety property"); + XBT_INFO("Check a safety property. Reduction is: %s.", + (reductionMode_ == simgrid::mc::ReductionMode::none ? "none": + (reductionMode_ == simgrid::mc::ReductionMode::dpor ? "dpor": "unknown"))); simgrid::mc::session->initialize(); XBT_DEBUG("Starting the safety algorithm"); @@ -337,7 +316,7 @@ SafetyChecker::SafetyChecker(Session& session) : Checker(session) /* Get an enabled actor and insert it in the interleave set of the initial state */ for (auto& actor : mc_model_checker->process().actors()) if (simgrid::mc::actor_is_enabled(actor.copy.getBuffer())) { - initial_state->interleave(actor.copy.getBuffer()); + initial_state->addInterleavingSet(actor.copy.getBuffer()); if (reductionMode_ != simgrid::mc::ReductionMode::none) break; } @@ -345,14 +324,10 @@ SafetyChecker::SafetyChecker(Session& session) : Checker(session) stack_.push_back(std::move(initial_state)); } -SafetyChecker::~SafetyChecker() -{ -} - Checker* createSafetyChecker(Session& session) { return new SafetyChecker(session); } - + } }