3 #include "mutableset.h"
10 #include "satencoder.h"
11 #include "sattranslator.h"
13 #include "orderencoder.h"
14 #include "polarityassignment.h"
16 CSolver::CSolver() : unsat(false) {
17 constraints = allocDefHashSetBoolean();
18 allBooleans = allocDefVectorBoolean();
19 allSets = allocDefVectorSet();
20 allElements = allocDefVectorElement();
21 allPredicates = allocDefVectorPredicate();
22 allTables = allocDefVectorTable();
23 allOrders = allocDefVectorOrder();
24 allFunctions = allocDefVectorFunction();
26 satEncoder = allocSATEncoder(this);
29 /** This function tears down the solver and the entire AST */
32 deleteHashSetBoolean(constraints);
34 uint size = getSizeVectorBoolean(allBooleans);
35 for (uint i = 0; i < size; i++) {
36 delete getVectorBoolean(allBooleans, i);
38 deleteVectorBoolean(allBooleans);
40 size = getSizeVectorSet(allSets);
41 for (uint i = 0; i < size; i++) {
42 delete getVectorSet(allSets, i);
44 deleteVectorSet(allSets);
46 size = getSizeVectorElement(allElements);
47 for (uint i = 0; i < size; i++) {
48 delete getVectorElement(allElements, i);
50 deleteVectorElement(allElements);
52 size = getSizeVectorTable(allTables);
53 for (uint i = 0; i < size; i++) {
54 delete getVectorTable(allTables, i);
56 deleteVectorTable(allTables);
58 size = getSizeVectorPredicate(allPredicates);
59 for (uint i = 0; i < size; i++) {
60 delete getVectorPredicate(allPredicates, i);
62 deleteVectorPredicate(allPredicates);
64 size = getSizeVectorOrder(allOrders);
65 for (uint i = 0; i < size; i++) {
66 delete getVectorOrder(allOrders, i);
68 deleteVectorOrder(allOrders);
70 size = getSizeVectorFunction(allFunctions);
71 for (uint i = 0; i < size; i++) {
72 delete getVectorFunction(allFunctions, i);
74 deleteVectorFunction(allFunctions);
75 deleteSATEncoder(satEncoder);
79 Set *CSolver::createSet(VarType type, uint64_t *elements, uint numelements) {
80 Set *set = new Set(type, elements, numelements);
81 pushVectorSet(allSets, set);
85 Set *CSolver::createRangeSet(VarType type, uint64_t lowrange, uint64_t highrange) {
86 Set *set = new Set(type, lowrange, highrange);
87 pushVectorSet(allSets, set);
91 MutableSet *CSolver::createMutableSet(VarType type) {
92 MutableSet *set = allocMutableSet(type);
93 pushVectorSet(allSets, set);
97 void CSolver::addItem(MutableSet *set, uint64_t element) {
98 addElementMSet(set, element);
101 uint64_t CSolver::createUniqueItem(MutableSet *set) {
102 uint64_t element = set->low++;
103 addElementMSet(set, element);
107 Element *CSolver::getElementVar(Set *set) {
108 Element *element = new ElementSet(set);
109 pushVectorElement(allElements, element);
113 Element *CSolver::getElementConst(VarType type, uint64_t value) {
114 Element *element = new ElementConst(value, type);
115 pushVectorElement(allElements, element);
119 Boolean *CSolver::getBooleanVar(VarType type) {
120 Boolean *boolean = new BooleanVar(type);
121 pushVectorBoolean(allBooleans, boolean);
125 Function *CSolver::createFunctionOperator(ArithOp op, Set **domain, uint numDomain, Set *range,OverFlowBehavior overflowbehavior) {
126 Function *function = new FunctionOperator(op, domain, numDomain, range, overflowbehavior);
127 pushVectorFunction(allFunctions, function);
131 Predicate *CSolver::createPredicateOperator(CompOp op, Set **domain, uint numDomain) {
132 Predicate *predicate = new PredicateOperator(op, domain,numDomain);
133 pushVectorPredicate(allPredicates, predicate);
137 Predicate *CSolver::createPredicateTable(Table *table, UndefinedBehavior behavior) {
138 Predicate *predicate = new PredicateTable(table, behavior);
139 pushVectorPredicate(allPredicates, predicate);
143 Table *CSolver::createTable(Set **domains, uint numDomain, Set *range) {
144 Table *table = new Table(domains,numDomain,range);
145 pushVectorTable(allTables, table);
149 Table *CSolver::createTableForPredicate(Set **domains, uint numDomain) {
150 return createTable(domains, numDomain, NULL);
153 void CSolver::addTableEntry(Table *table, uint64_t *inputs, uint inputSize, uint64_t result) {
154 table->addNewTableEntry(inputs, inputSize, result);
157 Function *CSolver::completeTable(Table *table, UndefinedBehavior behavior) {
158 Function *function = new FunctionTable(table, behavior);
159 pushVectorFunction(allFunctions,function);
163 Element *CSolver::applyFunction(Function *function, Element **array, uint numArrays, Boolean *overflowstatus) {
164 Element *element = new ElementFunction(function,array,numArrays,overflowstatus);
165 pushVectorElement(allElements, element);
169 Boolean *CSolver::applyPredicate(Predicate *predicate, Element **inputs, uint numInputs) {
170 return applyPredicateTable(predicate, inputs, numInputs, NULL);
173 Boolean *CSolver::applyPredicateTable(Predicate *predicate, Element **inputs, uint numInputs, Boolean *undefinedStatus) {
174 Boolean *boolean = new BooleanPredicate(predicate, inputs, numInputs, undefinedStatus);
175 pushVectorBoolean(allBooleans, boolean);
179 Boolean *CSolver::applyLogicalOperation(LogicOp op, Boolean **array, uint asize) {
180 return new BooleanLogic(this, op, array, asize);
183 void CSolver::addConstraint(Boolean *constraint) {
184 addHashSetBoolean(constraints, constraint);
187 Order *CSolver::createOrder(OrderType type, Set *set) {
188 Order *order = new Order(type, set);
189 pushVectorOrder(allOrders, order);
193 Boolean *CSolver::orderConstraint(Order *order, uint64_t first, uint64_t second) {
194 Boolean *constraint = new BooleanOrder(order, first, second);
195 pushVectorBoolean(allBooleans,constraint);
199 int CSolver::startEncoding() {
200 naiveEncodingDecision(this);
201 computePolarities(this);
203 encodeAllSATEncoder(this, satEncoder);
204 int result = solveCNF(satEncoder->cnf);
205 model_print("sat_solver's result:%d\tsolutionSize=%d\n", result, satEncoder->cnf->solver->solutionsize);
206 for (int i = 1; i <= satEncoder->cnf->solver->solutionsize; i++) {
207 model_print("%d, ", satEncoder->cnf->solver->solution[i]);
213 uint64_t CSolver::getElementValue(Element *element) {
214 switch (GETELEMENTTYPE(element)) {
218 return getElementValueSATTranslator(this, element);
225 bool CSolver::getBooleanValue(Boolean *boolean) {
226 switch (GETBOOLEANTYPE(boolean)) {
228 return getBooleanVariableValueSATTranslator(this, boolean);
235 HappenedBefore CSolver::getOrderConstraintValue(Order *order, uint64_t first, uint64_t second) {
236 return getOrderConstraintValueSATTranslator(this, order, first, second);