EliminateAutomaticallyAction.cpp

Go to the documentation of this file.

#include "EliminateAutomaticallyAction.h"
#include "EliminateAction.h"
 
#include "storm/exceptions/NotImplementedException.h"
 
namespace storm {
namespace jani {
namespace elimination_actions {
EliminateAutomaticallyAction::EliminateAutomaticallyAction(const std::string& automatonName, EliminateAutomaticallyAction::EliminationOrder order,
                                                           uint32_t transitionCountThreshold, bool restrictToUnnamedActions)
    : automatonName(automatonName),
      eliminationOrder(order),
      restrictToUnnamedActions(restrictToUnnamedActions),
      transitionCountThreshold(transitionCountThreshold) {}
 
std::string EliminateAutomaticallyAction::getDescription() {
    return "EliminateAutomaticallyAction";
}
 
void EliminateAutomaticallyAction::doAction(JaniLocalEliminator::Session& session) {
    Automaton* automaton = &session.getModel().getAutomaton(automatonName);
    switch (eliminationOrder) {
        case EliminationOrder::Arbitrary: {
            STORM_LOG_THROW(!restrictToUnnamedActions, storm::exceptions::NotImplementedException,
                            "Cannot perform automatic elimination if restrictToUnnamedActions is true and elimination order is arbitrary.");
 
            for (const auto& loc : automaton->getLocations()) {
                if (session.isEliminable(automatonName, loc.getName())) {
                    STORM_LOG_TRACE("Eliminating location " + loc.getName());
                    EliminateAction action = EliminateAction(automatonName, loc.getName());
                    action.doAction(session);
                }
            }
            break;
        }
        case EliminationOrder::NewTransitionCount: {
            // A location is uneliminable if
            // - it is initial
            // - it (potentially) satisfies the property
            // - it has already been eliminated
            // - it has a loop
            // After each elimination, this list is updated to account for new loops
            std::map<std::string, bool> uneliminable;
            STORM_LOG_TRACE("Elimination status of locations:");
            for (const auto& loc : automaton->getLocations()) {
                bool possiblyInitial = session.isPossiblyInitial(automatonName, loc.getName());
                bool partOfProp = session.isPartOfProp(automatonName, loc.getName());
                bool hasLoops = session.hasLoops(automatonName, loc.getName());
                bool isDeadlock = automaton->getEdgesFromLocation(loc.getName()).empty();
                bool hasNamedAction = restrictToUnnamedActions && session.hasNamedActions(automatonName, loc.getName());
 
                bool isUneliminable = possiblyInitial || partOfProp || hasLoops || isDeadlock || hasNamedAction;
                uneliminable.insert(std::pair<std::string, bool>(loc.getName(), isUneliminable));
                STORM_LOG_TRACE("\t" + loc.getName() + ": " << ([&] {
                                    std::string eliminationStatus = "";
                                    if (isUneliminable) {
                                        eliminationStatus += "Uneliminable (";
                                        if (possiblyInitial)
                                            eliminationStatus += "initial, ";
                                        if (partOfProp)
                                            eliminationStatus += "part of prop, ";
                                        if (hasLoops)
                                            eliminationStatus += "has loops, ";
                                        if (isDeadlock)
                                            eliminationStatus += "has no outgoing edges, ";
                                        if (hasNamedAction)
                                            eliminationStatus += "has named action, ";
                                        eliminationStatus = eliminationStatus.substr(0, eliminationStatus.size() - 2) + ")";
                                    } else {
                                        eliminationStatus += "Eliminable";
                                    }
                                    return eliminationStatus;
                                })());
            }
            STORM_LOG_TRACE("Performing elimination");
 
            bool done = false;
            while (!done) {
                uint64_t minNewEdges = 18446744073709551615U;  // max value of uint64
                int bestLocIndex = -1;
                for (const auto& loc : automaton->getLocations()) {
                    if (uneliminable[loc.getName()]) {
                        continue;
                    }
 
                    auto locIndex = automaton->getLocationIndex(loc.getName());
                    uint64_t outgoing = automaton->getEdgesFromLocation(locIndex).size();
                    uint64_t incoming = 0;
                    for (const auto& edge : automaton->getEdges()) {
                        uint64_t addedTransitions = 1;
                        for (const auto& dest : edge.getDestinations()) {
                            if (dest.getLocationIndex() == locIndex) {
                                addedTransitions *= outgoing;
                                // Stop once we hit the threshold -- otherwise there is a risk of causing
                                // an overflow due to the exponential growth of addedTransitions:
                                if (addedTransitions > transitionCountThreshold) {
                                    break;
                                }
                            }
                        }
                        incoming += addedTransitions - 1;
                    }
                    uint64_t newEdges = incoming * outgoing;
 
                    if (newEdges <= minNewEdges) {
                        minNewEdges = newEdges;
                        bestLocIndex = locIndex;
                    }
                }
 
                if (bestLocIndex == -1) {
                    done = true;
                    STORM_LOG_TRACE("Cannot eliminate more locations");
                } else if (minNewEdges > transitionCountThreshold) {
                    done = true;
                    STORM_LOG_TRACE("Cannot eliminate more locations without creating too many new transitions (best: " + std::to_string(minNewEdges) +
                                    " new transitions)");
                } else {
                    std::string locName = automaton->getLocation(bestLocIndex).getName();
                    STORM_LOG_TRACE("\tEliminating location " + locName + " (" + std::to_string(minNewEdges) + " new edges)");
                    EliminateAction action = EliminateAction(automatonName, locName);
                    action.doAction(session);
                    automaton = &session.getModel().getAutomaton(automatonName);
                    uneliminable[locName] = true;
 
                    // Update "uneliminable" to account for potential new loops
                    for (const auto& loc : automaton->getLocations()) {
                        if (!uneliminable[loc.getName()]) {
                            if (session.hasLoops(automatonName, loc.getName())) {
                                uneliminable[loc.getName()] = true;
                                STORM_LOG_TRACE("\t" + loc.getName() + " now has a loop");
                            }
                            if (restrictToUnnamedActions && session.hasNamedActions(automatonName, loc.getName())) {
                                uneliminable[loc.getName()] = true;
                                STORM_LOG_TRACE("\t" + loc.getName() + " now has a named action");
                            }
                        }
                    }
                }
            }
 
            break;
        }
        default: {
            STORM_LOG_THROW(false, storm::exceptions::NotImplementedException, "This elimination order is not yet implemented.");
            break;
        }
    }
}
}  // namespace elimination_actions
}  // namespace jani
}  // namespace storm