cover_goals.cpp

Go to the documentation of this file.

/*******************************************************************\
 
Module: Cover a set of goals incrementally
 
Author: Daniel Kroening, kroening@kroening.com
 
\*******************************************************************/

 
#include "cover_goals.h"
 
#include <util/message.h>
#include <util/std_expr.h>
 
cover_goalst::~cover_goalst()
{
}

void cover_goalst::mark()
{
  // notify observers
  for(const auto &o : observers)
    o->satisfying_assignment();
 
  for(auto &g : goals)
    if(
      g.status == goalt::statust::UNKNOWN &&
      decision_procedure.get(g.condition) == true)
    {
      g.status=goalt::statust::COVERED;
      _number_covered++;
 
      // notify observers
      for(const auto &o : observers)
        o->goal_covered(g);
    }
}

void cover_goalst::constraint()
{
  exprt::operandst disjuncts;
 
  // cover at least one unknown goal
 
  for(const auto &g : goals)
    if(g.status == goalt::statust::UNKNOWN && g.condition != false)
      disjuncts.push_back(g.condition);
 
  // this is 'false' if there are no disjuncts
  decision_procedure.set_to_true(disjunction(disjuncts));
}

decision_proceduret::resultt cover_goalst::
operator()(message_handlert &message_handler)
{
  _iterations=_number_covered=0;
 
  decision_proceduret::resultt dec_result;
 
  do
  {
    // We want (at least) one of the remaining goals, please!
    _iterations++;
 
    constraint();
    dec_result = decision_procedure();
 
    switch(dec_result)
    {
    case decision_proceduret::resultt::D_UNSATISFIABLE: // DONE
      return dec_result;
 
    case decision_proceduret::resultt::D_SATISFIABLE:
      // mark the goals we got, and notify observers
      mark();
      break;
 
    case decision_proceduret::resultt::D_ERROR:
    {
      messaget log(message_handler);
      log.error() << "decision procedure has failed" << messaget::eom;
      return dec_result;
    }
    }
  }
  while(dec_result==decision_proceduret::resultt::D_SATISFIABLE &&
        number_covered()<size());
 
  return decision_proceduret::resultt::D_SATISFIABLE;
}