1 /********************* */
2 /*! \file theory_strings.h
4 ** Original author: Tianyi Liang
5 ** Major contributors: none
6 ** Minor contributors (to current version): none
7 ** This file is part of the CVC4 project.
8 ** Copyright (c) 2009-2013 New York University and The University of Iowa
9 ** See the file COPYING in the top-level source directory for licensing
10 ** information.\endverbatim
12 ** \brief Theory of strings
17 #include "cvc4_private.h"
19 #ifndef __CVC4__THEORY__STRINGS__THEORY_STRINGS_H
20 #define __CVC4__THEORY__STRINGS__THEORY_STRINGS_H
22 #include "theory/theory.h"
23 #include "theory/uf/equality_engine.h"
24 #include "theory/strings/theory_strings_preprocess.h"
25 #include "theory/strings/regexp_operation.h"
27 #include "context/cdchunk_list.h"
28 #include "context/cdhashset.h"
35 * Decision procedure for strings.
39 class TheoryStrings
: public Theory
{
40 typedef context::CDChunkList
<Node
> NodeList
;
41 typedef context::CDHashMap
<Node
, NodeList
*, NodeHashFunction
> NodeListMap
;
42 typedef context::CDHashMap
<Node
, bool, NodeHashFunction
> NodeBoolMap
;
43 typedef context::CDHashMap
<Node
, int, NodeHashFunction
> NodeIntMap
;
44 typedef context::CDHashMap
<Node
, Node
, NodeHashFunction
> NodeNodeMap
;
45 typedef context::CDHashSet
<Node
, NodeHashFunction
> NodeSet
;
48 TheoryStrings(context::Context
* c
, context::UserContext
* u
, OutputChannel
& out
, Valuation valuation
, const LogicInfo
& logicInfo
);
51 void setMasterEqualityEngine(eq::EqualityEngine
* eq
);
53 std::string
identify() const { return std::string("TheoryStrings"); }
56 void propagate(Effort e
);
57 bool propagate(TNode literal
);
58 void explain( TNode literal
, std::vector
<TNode
>& assumptions
);
59 Node
explain( TNode literal
);
62 // NotifyClass for equality engine
63 class NotifyClass
: public eq::EqualityEngineNotify
{
66 NotifyClass(TheoryStrings
& t_str
): d_str(t_str
) {}
67 bool eqNotifyTriggerEquality(TNode equality
, bool value
) {
68 Debug("strings") << "NotifyClass::eqNotifyTriggerEquality(" << equality
<< ", " << (value
? "true" : "false" )<< ")" << std::endl
;
70 return d_str
.propagate(equality
);
72 // We use only literal triggers so taking not is safe
73 return d_str
.propagate(equality
.notNode());
76 bool eqNotifyTriggerPredicate(TNode predicate
, bool value
) {
77 Debug("strings") << "NotifyClass::eqNotifyTriggerPredicate(" << predicate
<< ", " << (value
? "true" : "false") << ")" << std::endl
;
79 return d_str
.propagate(predicate
);
81 return d_str
.propagate(predicate
.notNode());
84 bool eqNotifyTriggerTermEquality(TheoryId tag
, TNode t1
, TNode t2
, bool value
) {
85 Debug("strings") << "NotifyClass::eqNotifyTriggerTermMerge(" << tag
<< ", " << t1
<< ", " << t2
<< ")" << std::endl
;
87 return d_str
.propagate(t1
.eqNode(t2
));
89 return d_str
.propagate(t1
.eqNode(t2
).notNode());
92 void eqNotifyConstantTermMerge(TNode t1
, TNode t2
) {
93 Debug("strings") << "NotifyClass::eqNotifyConstantTermMerge(" << t1
<< ", " << t2
<< ")" << std::endl
;
94 d_str
.conflict(t1
, t2
);
96 void eqNotifyNewClass(TNode t
) {
97 Debug("strings") << "NotifyClass::eqNotifyNewClass(" << t
<< std::endl
;
98 d_str
.eqNotifyNewClass(t
);
100 void eqNotifyPreMerge(TNode t1
, TNode t2
) {
101 Debug("strings") << "NotifyClass::eqNotifyPreMerge(" << t1
<< ", " << t2
<< std::endl
;
102 d_str
.eqNotifyPreMerge(t1
, t2
);
104 void eqNotifyPostMerge(TNode t1
, TNode t2
) {
105 Debug("strings") << "NotifyClass::eqNotifyPostMerge(" << t1
<< ", " << t2
<< std::endl
;
106 d_str
.eqNotifyPostMerge(t1
, t2
);
108 void eqNotifyDisequal(TNode t1
, TNode t2
, TNode reason
) {
109 Debug("strings") << "NotifyClass::eqNotifyDisequal(" << t1
<< ", " << t2
<< ", " << reason
<< std::endl
;
110 d_str
.eqNotifyDisequal(t1
, t2
, reason
);
112 };/* class TheoryStrings::NotifyClass */
116 * Function symbol used to implement uninterpreted undefined string
117 * semantics. Needed to deal with partial charat/substr function.
130 bool d_opt_regexp_gcd
;
132 Node
getRepresentative( Node t
);
133 bool hasTerm( Node a
);
134 bool areEqual( Node a
, Node b
);
135 bool areDisequal( Node a
, Node b
);
136 Node
getLengthTerm( Node t
);
137 Node
getLength( Node t
);
140 /** The notify class */
141 NotifyClass d_notify
;
142 /** Equaltity engine */
143 eq::EqualityEngine d_equalityEngine
;
144 /** Are we in conflict */
145 context::CDO
<bool> d_conflict
;
146 //list of pairs of nodes to merge
147 std::map
< Node
, Node
> d_pending_exp
;
148 std::vector
< Node
> d_pending
;
149 std::vector
< Node
> d_lemma_cache
;
150 std::map
< Node
, bool > d_pending_req_phase
;
153 NodeList d_infer_exp
;
155 std::map
< Node
, Node
> d_normal_forms_base
;
156 std::map
< Node
, std::vector
< Node
> > d_normal_forms
;
157 std::map
< Node
, std::vector
< Node
> > d_normal_forms_exp
;
158 //map of pairs of terms that have the same normal form
159 NodeListMap d_nf_pairs
;
160 void addNormalFormPair( Node n1
, Node n2
);
161 bool isNormalFormPair( Node n1
, Node n2
);
162 bool isNormalFormPair2( Node n1
, Node n2
);
164 NodeSet d_loop_antec
;
165 NodeSet d_length_intro_vars
;
167 NodeSet d_prereg_cached
;
169 /////////////////////////////////////////////////////////////////////////////
171 /////////////////////////////////////////////////////////////////////////////
173 void collectModelInfo(TheoryModel
* m
, bool fullModel
);
175 /////////////////////////////////////////////////////////////////////////////
177 /////////////////////////////////////////////////////////////////////////////
182 /////////////////////////////////////////////////////////////////////////////
184 /////////////////////////////////////////////////////////////////////////////
186 void addSharedTerm(TNode n
);
187 EqualityStatus
getEqualityStatus(TNode a
, TNode b
);
192 EqcInfo( context::Context
* c
);
194 //constant in this eqc
195 context::CDO
< Node
> d_const_term
;
196 context::CDO
< Node
> d_length_term
;
197 context::CDO
< unsigned > d_cardinality_lem_k
;
198 // 1 = added length lemma
199 context::CDO
< Node
> d_normalized_length
;
201 /** map from representatives to information necessary for equivalence classes */
202 std::map
< Node
, EqcInfo
* > d_eqc_info
;
203 EqcInfo
* getOrMakeEqcInfo( Node eqc
, bool doMake
= true );
204 //maintain which concat terms have the length lemma instantiated
205 NodeSet d_length_nodes
;
206 NodeNodeMap d_length_inst
;
208 void mergeCstVec(std::vector
< Node
> &vec_strings
);
209 bool getNormalForms(Node
&eqc
, std::vector
< Node
> & visited
, std::vector
< Node
> & nf
,
210 std::vector
< std::vector
< Node
> > &normal_forms
,
211 std::vector
< std::vector
< Node
> > &normal_forms_exp
,
212 std::vector
< Node
> &normal_form_src
);
213 bool detectLoop(std::vector
< std::vector
< Node
> > &normal_forms
,
214 int i
, int j
, int index_i
, int index_j
,
215 int &loop_in_i
, int &loop_in_j
);
216 bool processLoop(std::vector
< Node
> &antec
,
217 std::vector
< std::vector
< Node
> > &normal_forms
,
218 std::vector
< Node
> &normal_form_src
,
219 int i
, int j
, int loop_n_index
, int other_n_index
,
220 int loop_index
, int index
, int other_index
);
221 bool processNEqc(std::vector
< std::vector
< Node
> > &normal_forms
,
222 std::vector
< std::vector
< Node
> > &normal_forms_exp
,
223 std::vector
< Node
> &normal_form_src
);
224 bool processReverseNEq(std::vector
< std::vector
< Node
> > &normal_forms
,
225 std::vector
< Node
> &normal_form_src
, std::vector
< Node
> &curr_exp
, unsigned i
, unsigned j
);
226 bool processSimpleNEq( std::vector
< std::vector
< Node
> > &normal_forms
,
227 std::vector
< Node
> &normal_form_src
, std::vector
< Node
> &curr_exp
, unsigned i
, unsigned j
,
228 unsigned& index_i
, unsigned& index_j
, bool isRev
);
229 bool normalizeEquivalenceClass( Node n
, std::vector
< Node
> & visited
, std::vector
< Node
> & nf
, std::vector
< Node
> & nf_exp
);
230 bool processDeq( Node n1
, Node n2
);
231 int processReverseDeq( std::vector
< Node
>& nfi
, std::vector
< Node
>& nfj
, Node ni
, Node nj
);
232 int processSimpleDeq( std::vector
< Node
>& nfi
, std::vector
< Node
>& nfj
, Node ni
, Node nj
, unsigned& index
, bool isRev
);
233 //bool unrollStar( Node atom );
234 Node
mkRegExpAntec(Node atom
, Node ant
);
237 bool checkNormalForms();
239 bool checkLengthsEqc();
240 bool checkCardinality();
241 bool checkInductiveEquations();
242 bool checkMemberships();
243 bool checkPDerivative(Node x
, Node r
, Node atom
, bool &addedLemma
,
244 std::vector
< Node
> &processed
, std::vector
< Node
> &cprocessed
,
245 std::vector
< Node
> &nf_exp
);
246 bool checkContains();
247 bool checkPosContains();
248 bool checkNegContains();
251 void preRegisterTerm(TNode n
);
252 Node
expandDefinition(LogicRequest
&logicRequest
, Node n
);
253 void check(Effort e
);
255 /** Conflict when merging two constants */
256 void conflict(TNode a
, TNode b
);
257 /** called when a new equivalence class is created */
258 void eqNotifyNewClass(TNode t
);
259 /** called when two equivalence classes will merge */
260 void eqNotifyPreMerge(TNode t1
, TNode t2
);
261 /** called when two equivalence classes have merged */
262 void eqNotifyPostMerge(TNode t1
, TNode t2
);
263 /** called when two equivalence classes are made disequal */
264 void eqNotifyDisequal(TNode t1
, TNode t2
, TNode reason
);
266 /** compute care graph */
267 void computeCareGraph();
270 void doPendingFacts();
271 void doPendingLemmas();
273 void sendLemma( Node ant
, Node conc
, const char * c
);
274 void sendInfer( Node eq_exp
, Node eq
, const char * c
);
275 void sendSplit( Node a
, Node b
, const char * c
, bool preq
= true );
277 inline Node
mkConcat( Node n1
, Node n2
);
278 inline Node
mkConcat( std::vector
< Node
>& c
);
280 Node
mkExplain( std::vector
< Node
>& a
);
281 Node
mkExplain( std::vector
< Node
>& a
, std::vector
< Node
>& an
);
283 Node
mkAnd( std::vector
< Node
>& a
);
284 /** get concat vector */
285 void getConcatVec( Node n
, std::vector
< Node
>& c
);
287 //get equivalence classes
288 void getEquivalenceClasses( std::vector
< Node
>& eqcs
);
289 //get final normal form
290 void getFinalNormalForm( Node n
, std::vector
< Node
>& nf
, std::vector
< Node
>& exp
);
292 //separate into collections with equal length
293 void separateByLength( std::vector
< Node
>& n
, std::vector
< std::vector
< Node
> >& col
, std::vector
< Node
>& lts
);
294 void printConcat( std::vector
< Node
>& n
, const char * c
);
297 Node
mkSplitEq( const char * c
, const char * info
, Node lhs
, Node rhs
, bool lgtZero
);
299 // Special String Functions
300 NodeList d_str_pos_ctn
;
301 NodeList d_str_neg_ctn
;
302 NodeSet d_neg_ctn_eqlen
;
303 NodeSet d_neg_ctn_ulen
;
304 NodeSet d_pos_ctn_cached
;
305 NodeSet d_neg_ctn_cached
;
307 // Symbolic Regular Expression
309 // regular expression memberships
310 NodeList d_regexp_memberships
;
311 NodeSet d_regexp_ucached
;
312 NodeSet d_regexp_ccached
;
314 NodeListMap d_str_re_map
;
315 NodeNodeMap d_inter_cache
;
316 NodeIntMap d_inter_index
;
317 // antecedant for why regexp membership must be true
318 NodeNodeMap d_regexp_ant
;
320 //std::map< Node, bool > d_membership_length;
321 // regular expression operations
322 RegExpOpr d_regexp_opr
;
324 CVC4::String
getHeadConst( Node x
);
325 bool deriveRegExp( Node x
, Node r
, Node ant
);
326 bool addMembershipLength(Node atom
);
327 void addMembership(Node assertion
);
328 Node
getNormalString(Node x
, std::vector
<Node
> &nf_exp
);
329 Node
getNormalSymRegExp(Node r
, std::vector
<Node
> &nf_exp
);
332 // Finite Model Finding
334 NodeSet d_input_vars
;
335 context::CDO
< Node
> d_input_var_lsum
;
336 context::CDHashMap
< int, Node
> d_cardinality_lits
;
337 context::CDO
< int > d_curr_cardinality
;
339 //for finite model finding
340 Node
getNextDecisionRequest();
341 void assertNode( Node lit
);
344 /** statistics class */
349 IntStat d_deq_splits
;
350 IntStat d_loop_lemmas
;
351 IntStat d_new_skolems
;
354 };/* class TheoryStrings::Statistics */
355 Statistics d_statistics
;
356 };/* class TheoryStrings */
358 }/* CVC4::theory::strings namespace */
359 }/* CVC4::theory namespace */
360 }/* CVC4 namespace */
362 #endif /* __CVC4__THEORY__STRINGS__THEORY_STRINGS_H */