/********************* */ /*! \file theory.h ** \verbatim ** Original author: mdeters ** Major contributors: dejan ** Minor contributors (to current version): taking, barrett ** This file is part of the CVC4 prototype. ** Copyright (c) 2009, 2010, 2011 The Analysis of Computer Systems Group (ACSys) ** Courant Institute of Mathematical Sciences ** New York University ** See the file COPYING in the top-level source directory for licensing ** information.\endverbatim ** ** \brief Base of the theory interface. ** ** Base of the theory interface. **/ #include "cvc4_private.h" #ifndef __CVC4__THEORY__THEORY_H #define __CVC4__THEORY__THEORY_H #include "expr/node.h" #include "expr/attribute.h" #include "expr/command.h" #include "theory/valuation.h" #include "theory/substitutions.h" #include "theory/output_channel.h" #include "theory/logic_info.h" #include "theory/theoryof_mode.h" #include "context/context.h" #include "context/cdlist.h" #include "context/cdo.h" #include "util/options.h" #include "util/stats.h" #include "util/dump.h" #include #include #include namespace CVC4 { class TheoryEngine; namespace theory { class Instantiator; class InstStrategy; class QuantifiersEngine; class TheoryModel; namespace rrinst{ class CandidateGenerator; } /** * Information about an assertion for the theories. */ struct Assertion { /** The assertion */ Node assertion; /** Has this assertion been preregistered with this theory */ bool isPreregistered; Assertion(TNode assertion, bool isPreregistered) : assertion(assertion), isPreregistered(isPreregistered) {} /** * Convert the assertion to a TNode. */ operator TNode () const { return assertion; } /** * Convert the assertion to a Node. */ operator Node () const { return assertion; } };/* struct Assertion */ /** * A (oredered) pair of terms a theory cares about. */ struct CarePair { TNode a, b; TheoryId theory; public: CarePair(TNode a, TNode b, TheoryId theory) : a(a < b ? a : b), b(a < b ? b : a), theory(theory) {} bool operator == (const CarePair& other) const { return (theory == other.theory) && (a == other.a) && (b == other.b); } bool operator < (const CarePair& other) const { if (theory < other.theory) return true; if (theory > other.theory) return false; if (a < other.a) return true; if (a > other.a) return false; return b < other.b; } };/* struct CarePair */ /** * A set of care pairs. */ typedef std::set CareGraph; /** * Base class for T-solvers. Abstract DPLL(T). * * This is essentially an interface class. The TheoryEngine has * pointers to Theory. Note that only one specific Theory type (e.g., * TheoryUF) can exist per NodeManager, because of how the * RegisteredAttr works. (If you need multiple instances of the same * theory, you'll have to write a multiplexed theory that dispatches * all calls to them.) */ class Theory { private: friend class ::CVC4::TheoryEngine; // Disallow default construction, copy, assignment. Theory() CVC4_UNUSED; Theory(const Theory&) CVC4_UNUSED; Theory& operator=(const Theory&) CVC4_UNUSED; /** * An integer identifying the type of the theory */ TheoryId d_id; /** * The SAT search context for the Theory. */ context::Context* d_satContext; /** * The user level assertion context for the Theory. */ context::UserContext* d_userContext; /** * Information about the logic we're operating within. */ const LogicInfo& d_logicInfo; /** * The assertFact() queue. * * These can not be TNodes as some atoms (such as equalities) are sent * across theories without being stored in a global map. */ context::CDList d_facts; /** Index into the head of the facts list */ context::CDO d_factsHead; /** * Add shared term to the theory. */ void addSharedTermInternal(TNode node); /** * Indices for splitting on the shared terms. */ context::CDO d_sharedTermsIndex; /** * The care graph the theory will use during combination. */ CareGraph* d_careGraph; /** * Reference to the quantifiers engine (or NULL, if quantifiers are * not supported or not enabled). */ QuantifiersEngine* d_quantEngine; /** * The instantiator for this theory, or NULL if quantifiers are not * supported or not enabled. */ Instantiator* d_inst; // === STATISTICS === /** time spent in theory combination */ TimerStat d_computeCareGraphTime; static std::string statName(TheoryId id, const char* statName) { std::stringstream ss; ss << "theory<" << id << ">::" << statName; return ss.str(); } /** * Construct and return the instantiator for the given theory. * If there is no instantiator class, NULL is returned. */ theory::Instantiator* makeInstantiator(context::Context* c, theory::QuantifiersEngine* qe); protected: /** * The only method to add suff to the care graph. */ void addCarePair(TNode t1, TNode t2) { if (d_careGraph) { d_careGraph->insert(CarePair(t1, t2, d_id)); } } /** * The function should compute the care graph over the shared terms. * The default function returns all the pairs among the shared variables. */ virtual void computeCareGraph(); /** * A list of shared terms that the theory has. */ context::CDList d_sharedTerms; /** * Construct a Theory. */ Theory(TheoryId id, context::Context* satContext, context::UserContext* userContext, OutputChannel& out, Valuation valuation, const LogicInfo& logicInfo, QuantifiersEngine* qe) throw() : d_id(id) , d_satContext(satContext) , d_userContext(userContext) , d_logicInfo(logicInfo) , d_facts(satContext) , d_factsHead(satContext, 0) , d_sharedTermsIndex(satContext, 0) , d_careGraph(0) , d_quantEngine(qe) , d_inst(makeInstantiator(satContext, qe)) , d_computeCareGraphTime(statName(id, "computeCareGraphTime")) , d_sharedTerms(satContext) , d_out(&out) , d_valuation(valuation) { StatisticsRegistry::registerStat(&d_computeCareGraphTime); } /** * This is called at shutdown time by the TheoryEngine, just before * destruction. It is important because there are destruction * ordering issues between PropEngine and Theory (based on what * hard-links to Nodes are outstanding). As the fact queue might be * nonempty, we ensure here that it's clear. If you overload this, * you must make an explicit call here to this->Theory::shutdown() * too. */ virtual void shutdown() { } /** * The output channel for the Theory. */ OutputChannel* d_out; /** * The valuation proxy for the Theory to communicate back with the * theory engine (and other theories). */ Valuation d_valuation; /** * Returns the next assertion in the assertFact() queue. * * @return the next assertion in the assertFact() queue */ inline Assertion get(); const LogicInfo& getLogicInfo() const { return d_logicInfo; } /** * The theory that owns the uninterpreted sort. */ static TheoryId s_uninterpretedSortOwner; void printFacts(std::ostream& os) const; void debugPrintFacts() const; /** Mode of the theoryOf operation */ static TheoryOfMode s_theoryOfMode; public: /** * Return the ID of the theory responsible for the given type. */ static inline TheoryId theoryOf(TypeNode typeNode) { Trace("theory::internal") << "theoryOf(" << typeNode << ")" << std::endl; TheoryId id; while (typeNode.isPredicateSubtype()) { typeNode = typeNode.getSubtypeBaseType(); } if (typeNode.getKind() == kind::TYPE_CONSTANT) { id = typeConstantToTheoryId(typeNode.getConst()); } else { id = kindToTheoryId(typeNode.getKind()); } if (id == THEORY_BUILTIN) { Trace("theory::internal") << "theoryOf(" << typeNode << ") == " << s_uninterpretedSortOwner << std::endl; return s_uninterpretedSortOwner; } return id; } /** * Returns the ID of the theory responsible for the given node. */ static TheoryId theoryOf(TheoryOfMode mode, TNode node); /** * Returns the ID of the theory responsible for the given node. */ static inline TheoryId theoryOf(TNode node) { return theoryOf(s_theoryOfMode, node); } /** Set the theoryOf mode */ static void setTheoryOfMode(TheoryOfMode mode) { s_theoryOfMode = mode; } /** * Set the owner of the uninterpreted sort. */ static void setUninterpretedSortOwner(TheoryId theory) { s_uninterpretedSortOwner = theory; } /** * Set the owner of the uninterpreted sort. */ static TheoryId getUninterpretedSortOwner() { return s_uninterpretedSortOwner; } /** * Checks if the node is a leaf node of this theory */ inline bool isLeaf(TNode node) const { return node.getNumChildren() == 0 || theoryOf(node) != d_id; } /** * Checks if the node is a leaf node of a theory. */ inline static bool isLeafOf(TNode node, TheoryId theoryId) { return node.getNumChildren() == 0 || theoryOf(node) != theoryId; } /** * Returns true if the assertFact queue is empty */ bool done() throw() { return d_factsHead == d_facts.size(); } /** * Destructs a Theory. */ virtual ~Theory(); /** * Subclasses of Theory may add additional efforts. DO NOT CHECK * equality with one of these values (e.g. if STANDARD xxx) but * rather use range checks (or use the helper functions below). * Normally we call QUICK_CHECK or STANDARD; at the leaves we call * with FULL_EFFORT. */ enum Effort { /** * Standard effort where theory need not do anything */ EFFORT_STANDARD = 50, /** * Full effort requires the theory make sure its assertions are satisfiable or not */ EFFORT_FULL = 100, /** * Combination effort means that the individual theories are already satisfied, and * it is time to put some effort into propagation of shared term equalities */ EFFORT_COMBINATION = 150, /** * Last call effort, reserved for quantifiers. */ EFFORT_LAST_CALL = 200 };/* enum Effort */ static inline bool standardEffortOrMore(Effort e) CVC4_CONST_FUNCTION { return e >= EFFORT_STANDARD; } static inline bool standardEffortOnly(Effort e) CVC4_CONST_FUNCTION { return e >= EFFORT_STANDARD && e < EFFORT_FULL; } static inline bool fullEffort(Effort e) CVC4_CONST_FUNCTION { return e == EFFORT_FULL; } static inline bool combination(Effort e) CVC4_CONST_FUNCTION { return e == EFFORT_COMBINATION; } /** * Get the id for this Theory. */ TheoryId getId() const { return d_id; } /** * Get the SAT context associated to this Theory. */ context::Context* getSatContext() const { return d_satContext; } /** * Get the context associated to this Theory. */ context::UserContext* getUserContext() const { return d_userContext; } /** * Set the output channel associated to this theory. */ void setOutputChannel(OutputChannel& out) { d_out = &out; } /** * Get the output channel associated to this theory. */ OutputChannel& getOutputChannel() { return *d_out; } /** * Get the valuation associated to this theory. */ Valuation& getValuation() { return d_valuation; } /** * Get the quantifiers engine associated to this theory. */ QuantifiersEngine* getQuantifiersEngine() { return d_quantEngine; } /** * Get the quantifiers engine associated to this theory (const version). */ const QuantifiersEngine* getQuantifiersEngine() const { return d_quantEngine; } /** * Get the theory instantiator. */ Instantiator* getInstantiator() { return d_inst; } /** * Get the theory instantiator (const version). */ const Instantiator* getInstantiator() const { return d_inst; } /** * Pre-register a term. Done one time for a Node, ever. */ virtual void preRegisterTerm(TNode) { } /** * Assert a fact in the current context. */ void assertFact(TNode assertion, bool isPreregistered) { Trace("theory") << "Theory<" << getId() << ">::assertFact[" << d_satContext->getLevel() << "](" << assertion << ", " << (isPreregistered ? "true" : "false") << ")" << std::endl; d_facts.push_back(Assertion(assertion, isPreregistered)); } /** * This method is called to notify a theory that the node n should * be considered a "shared term" by this theory */ virtual void addSharedTerm(TNode n) { } /** * Return the current theory care graph. Theories should overload computeCareGraph to do * the actual computation, and use addCarePair to add pairs to the care graph. */ void getCareGraph(CareGraph& careGraph) { Trace("sharing") << "Theory<" << getId() << ">::getCareGraph()" << std::endl; TimerStat::CodeTimer computeCareGraphTime(d_computeCareGraphTime); d_careGraph = &careGraph; computeCareGraph(); d_careGraph = NULL; } /** * Return the status of two terms in the current context. Should be implemented in * sub-theories to enable more efficient theory-combination. */ virtual EqualityStatus getEqualityStatus(TNode a, TNode b) { return EQUALITY_UNKNOWN; } /** * Check the current assignment's consistency. * * An implementation of check() is required to either: * - return a conflict on the output channel, * - be interrupted, * - throw an exception * - or call get() until done() is true. */ virtual void check(Effort level = EFFORT_FULL) { } /** * T-propagate new literal assignments in the current context. */ virtual void propagate(Effort level = EFFORT_FULL) { } /** * Return an explanation for the literal represented by parameter n * (which was previously propagated by this theory). */ virtual Node explain(TNode n) { Unimplemented("Theory %s propagated a node but doesn't implement the " "Theory::explain() interface!", identify().c_str()); } /** * Get all relevant information in this theory regarding the current * model. This should be called after a call to check( FULL_EFFORT ) * for all theories with no conflicts and no lemmas added. */ virtual void collectModelInfo( TheoryModel* m ){ Unimplemented("Theory %s doesn't support Theory::getModel interface", identify().c_str()); } /** * Statically learn from assertion "in," which has been asserted * true at the top level. The theory should only add (via * ::operator<< or ::append()) to the "learned" builder---it should * *never* clear it. It is a conjunction to add to the formula at * the top-level and may contain other theories' contributions. */ virtual void ppStaticLearn(TNode in, NodeBuilder<>& learned) { } enum PPAssertStatus { /** Atom has been solved */ PP_ASSERT_STATUS_SOLVED, /** Atom has not been solved */ PP_ASSERT_STATUS_UNSOLVED, /** Atom is inconsistent */ PP_ASSERT_STATUS_CONFLICT }; /** * Given a literal, add the solved substitutions to the map, if any. * The method should return true if the literal can be safely removed. */ virtual PPAssertStatus ppAssert(TNode in, SubstitutionMap& outSubstitutions) { if (in.getKind() == kind::EQUAL) { if (in[0].getMetaKind() == kind::metakind::VARIABLE && !in[1].hasSubterm(in[0])) { outSubstitutions.addSubstitution(in[0], in[1]); return PP_ASSERT_STATUS_SOLVED; } if (in[1].getMetaKind() == kind::metakind::VARIABLE && !in[0].hasSubterm(in[1])) { outSubstitutions.addSubstitution(in[1], in[0]); return PP_ASSERT_STATUS_SOLVED; } if (in[0].getMetaKind() == kind::metakind::CONSTANT && in[1].getMetaKind() == kind::metakind::CONSTANT) { if (in[0] != in[1]) { return PP_ASSERT_STATUS_CONFLICT; } } } return PP_ASSERT_STATUS_UNSOLVED; } /** * Given an atom of the theory coming from the input formula, this * method can be overridden in a theory implementation to rewrite * the atom into an equivalent form. This is only called just * before an input atom to the engine. */ virtual Node ppRewrite(TNode atom) { return atom; } /** * Don't preprocess subterm of this term */ virtual bool ppDontRewriteSubterm(TNode atom) { return false; } /** * A Theory is called with presolve exactly one time per user * check-sat. presolve() is called after preregistration, * rewriting, and Boolean propagation, (other theories' * propagation?), but the notified Theory has not yet had its * check() or propagate() method called. A Theory may empty its * assertFact() queue using get(). A Theory can raise conflicts, * add lemmas, and propagate literals during presolve(). */ virtual void presolve() { } /** * A Theory is called with postsolve exactly one time per user * check-sat. postsolve() is called after the query has completed * (regardless of whether sat, unsat, or unknown), and after any * model-querying related to the query has been performed. * After this call, the theory will not get another check() or * propagate() call until presolve() is called again. A Theory * cannot raise conflicts, add lemmas, or propagate literals during * postsolve(). */ virtual void postsolve() { } /** * Notification sent to the theory wheneven the search restarts. * Serves as a good time to do some clean-up work, and you can * assume you're at DL 0 for the purposes of Contexts. This function * should not use the output channel. */ virtual void notifyRestart() { } /** * Identify this theory (for debugging, dynamic configuration, * etc..) */ virtual std::string identify() const = 0; /** A set of theories */ typedef uint32_t Set; /** A set of all theories */ static const Set AllTheories = (1 << theory::THEORY_LAST) - 1; /** Pops a first theory off the set */ static inline TheoryId setPop(Set& set) { uint32_t i = ffs(set); // Find First Set (bit) if (i == 0) { return THEORY_LAST; } TheoryId id = (TheoryId)(i-1); set = setRemove(id, set); return id; } /** Returns the size of a set of theories */ static inline size_t setSize(Set set) { size_t count = 0; while (setPop(set) != THEORY_LAST) { ++ count; } return count; } /** Returns the index size of a set of theories */ static inline size_t setIndex(TheoryId id, Set set) { Assert (setContains(id, set)); size_t count = 0; while (setPop(set) != id) { ++ count; } return count; } /** Add the theory to the set. If no set specified, just returns a singleton set */ static inline Set setInsert(TheoryId theory, Set set = 0) { return set | (1 << theory); } /** Add the theory to the set. If no set specified, just returns a singleton set */ static inline Set setRemove(TheoryId theory, Set set = 0) { return setDifference(set, setInsert(theory)); } /** Check if the set contains the theory */ static inline bool setContains(TheoryId theory, Set set) { return set & (1 << theory); } static inline Set setComplement(Set a) { return (~a) & AllTheories; } static inline Set setIntersection(Set a, Set b) { return a & b; } static inline Set setUnion(Set a, Set b) { return a | b; } /** a - b */ static inline Set setDifference(Set a, Set b) { return (~b) & a; } static inline std::string setToString(theory::Theory::Set theorySet) { std::stringstream ss; ss << "["; for(unsigned theoryId = 0; theoryId < theory::THEORY_LAST; ++theoryId) { if (theory::Theory::setContains((theory::TheoryId)theoryId, theorySet)) { ss << (theory::TheoryId) theoryId << " "; } } ss << "]"; return ss.str(); } typedef context::CDList::const_iterator assertions_iterator; /** * Provides access to the facts queue, primarily intended for theory * debugging purposes. * * @return the iterator to the beginning of the fact queue */ assertions_iterator facts_begin() const { return d_facts.begin(); } /** * Provides access to the facts queue, primarily intended for theory * debugging purposes. * * @return the iterator to the end of the fact queue */ assertions_iterator facts_end() const { return d_facts.end(); } typedef context::CDList::const_iterator shared_terms_iterator; /** * Provides access to the shared terms, primarily intended for theory * debugging purposes. * * @return the iterator to the beginning of the shared terms list */ shared_terms_iterator shared_terms_begin() const { return d_sharedTerms.begin(); } /** * Provides access to the facts queue, primarily intended for theory * debugging purposes. * * @return the iterator to the end of the shared terms list */ shared_terms_iterator shared_terms_end() const { return d_sharedTerms.end(); } };/* class Theory */ std::ostream& operator<<(std::ostream& os, Theory::Effort level); namespace eq{ class EqualityEngine; } class Instantiator { friend class QuantifiersEngine; protected: /** reference to the quantifiers engine */ QuantifiersEngine* d_quantEngine; /** reference to the theory that it looks at */ Theory* d_th; /** instantiation strategies */ std::vector< InstStrategy* > d_instStrategies; /** instantiation strategies active */ std::map< InstStrategy*, bool > d_instStrategyActive; /** has constraints from quantifier */ std::map< Node, bool > d_hasConstraints; /** is instantiation strategy active */ bool isActiveStrategy( InstStrategy* is ) { return d_instStrategyActive.find( is )!=d_instStrategyActive.end() && d_instStrategyActive[is]; } /** add inst strategy */ void addInstStrategy( InstStrategy* is ){ d_instStrategies.push_back( is ); d_instStrategyActive[is] = true; } /** reset instantiation round */ virtual void processResetInstantiationRound( Theory::Effort effort ) = 0; /** process quantifier */ virtual int process( Node f, Theory::Effort effort, int e ) = 0; public: /** set has constraints from quantifier f */ void setHasConstraintsFrom( Node f ); /** has constraints from */ bool hasConstraintsFrom( Node f ); /** is full owner of quantifier f? */ bool isOwnerOf( Node f ); public: Instantiator(context::Context* c, QuantifiersEngine* qe, Theory* th); virtual ~Instantiator(); /** get quantifiers engine */ QuantifiersEngine* getQuantifiersEngine() { return d_quantEngine; } /** get corresponding theory for this instantiator */ Theory* getTheory() { return d_th; } /** Pre-register a term. */ virtual void preRegisterTerm( Node t ) { } /** assertNode function, assertion was asserted to theory */ virtual void assertNode( Node assertion ){} /** identify */ virtual std::string identify() const { return std::string("Unknown"); } /** print debug information */ virtual void debugPrint( const char* c ) {} public: /** reset instantiation round */ void resetInstantiationRound( Theory::Effort effort ); /** do instantiation method*/ int doInstantiation( Node f, Theory::Effort effort, int e ); public: /** general queries about equality */ virtual bool hasTerm( Node a ) { return false; } virtual bool areEqual( Node a, Node b ) { return false; } virtual bool areDisequal( Node a, Node b ) { return false; } virtual Node getRepresentative( Node a ) { return a; } virtual Node getInternalRepresentative( Node a ) { return getRepresentative( a ); } virtual eq::EqualityEngine* getEqualityEngine() { return NULL; } virtual void getEquivalenceClass( Node a, std::vector< Node >& eqc ) {} public: /** A Creator of CandidateGenerator for classes (one element in each equivalence class) and class (every element of one equivalence class) */ virtual rrinst::CandidateGenerator* getRRCanGenClasses(){ return NULL; }; virtual rrinst::CandidateGenerator* getRRCanGenClass(){ return NULL; }; };/* class Instantiator */ inline Assertion Theory::get() { Assert( !done(), "Theory::get() called with assertion queue empty!" ); // Get the assertion Assertion fact = d_facts[d_factsHead]; d_factsHead = d_factsHead + 1; Trace("theory") << "Theory::get() => " << fact << " (" << d_facts.size() - d_factsHead << " left)" << std::endl; if(Dump.isOn("state")) { Dump("state") << AssertCommand(fact.assertion.toExpr()); } // if quantifiers are turned on and we have an instantiator, notify it if(getLogicInfo().isQuantified() && getInstantiator() != NULL) { getInstantiator()->assertNode(fact); } return fact; } }/* CVC4::theory namespace */ inline std::ostream& operator<<(std::ostream& out, const CVC4::theory::Theory& theory) { return out << theory.identify(); } inline std::ostream& operator << (std::ostream& out, theory::Theory::PPAssertStatus status) { switch (status) { case theory::Theory::PP_ASSERT_STATUS_SOLVED: out << "SOLVE_STATUS_SOLVED"; break; case theory::Theory::PP_ASSERT_STATUS_UNSOLVED: out << "SOLVE_STATUS_UNSOLVED"; break; case theory::Theory::PP_ASSERT_STATUS_CONFLICT: out << "SOLVE_STATUS_CONFLICT"; break; default: Unhandled(); } return out; } }/* CVC4 namespace */ #endif /* __CVC4__THEORY__THEORY_H */