3 #include "mutableset.h"
10 #include "satencoder.h"
11 #include "sattranslator.h"
13 #include "orderencoder.h"
14 #include "polarityassignment.h"
16 CSolver *allocCSolver() {
17 CSolver *This = (CSolver *) ourmalloc(sizeof(CSolver));
19 This->constraints = allocDefHashSetBoolean();
20 This->allBooleans = allocDefVectorBoolean();
21 This->allSets = allocDefVectorSet();
22 This->allElements = allocDefVectorElement();
23 This->allPredicates = allocDefVectorPredicate();
24 This->allTables = allocDefVectorTable();
25 This->allOrders = allocDefVectorOrder();
26 This->allFunctions = allocDefVectorFunction();
27 This->tuner = allocTuner();
28 This->satEncoder = allocSATEncoder(This);
32 /** This function tears down the solver and the entire AST */
34 void deleteSolver(CSolver *This) {
35 deleteHashSetBoolean(This->constraints);
37 uint size = getSizeVectorBoolean(This->allBooleans);
38 for (uint i = 0; i < size; i++) {
39 deleteBoolean(getVectorBoolean(This->allBooleans, i));
41 deleteVectorBoolean(This->allBooleans);
43 size = getSizeVectorSet(This->allSets);
44 for (uint i = 0; i < size; i++) {
45 deleteSet(getVectorSet(This->allSets, i));
47 deleteVectorSet(This->allSets);
49 size = getSizeVectorElement(This->allElements);
50 for (uint i = 0; i < size; i++) {
51 delete getVectorElement(This->allElements, i);
53 deleteVectorElement(This->allElements);
55 size = getSizeVectorTable(This->allTables);
56 for (uint i = 0; i < size; i++) {
57 deleteTable(getVectorTable(This->allTables, i));
59 deleteVectorTable(This->allTables);
61 size = getSizeVectorPredicate(This->allPredicates);
62 for (uint i = 0; i < size; i++) {
63 deletePredicate(getVectorPredicate(This->allPredicates, i));
65 deleteVectorPredicate(This->allPredicates);
67 size = getSizeVectorOrder(This->allOrders);
68 for (uint i = 0; i < size; i++) {
69 deleteOrder(getVectorOrder(This->allOrders, i));
71 deleteVectorOrder(This->allOrders);
73 size = getSizeVectorFunction(This->allFunctions);
74 for (uint i = 0; i < size; i++) {
75 deleteFunction(getVectorFunction(This->allFunctions, i));
77 deleteVectorFunction(This->allFunctions);
78 deleteSATEncoder(This->satEncoder);
79 deleteTuner(This->tuner);
83 Set *createSet(CSolver *This, VarType type, uint64_t *elements, uint numelements) {
84 Set *set = allocSet(type, elements, numelements);
85 pushVectorSet(This->allSets, set);
89 Set *createRangeSet(CSolver *This, VarType type, uint64_t lowrange, uint64_t highrange) {
90 Set *set = allocSetRange(type, lowrange, highrange);
91 pushVectorSet(This->allSets, set);
95 MutableSet *createMutableSet(CSolver *This, VarType type) {
96 MutableSet *set = allocMutableSet(type);
97 pushVectorSet(This->allSets, set);
101 void addItem(CSolver *This, MutableSet *set, uint64_t element) {
102 addElementMSet(set, element);
105 uint64_t createUniqueItem(CSolver *This, MutableSet *set) {
106 uint64_t element = set->low++;
107 addElementMSet(set, element);
111 Element *getElementVar(CSolver *This, Set *set) {
112 Element *element = new ElementSet(set);
113 pushVectorElement(This->allElements, element);
117 Element *getElementConst(CSolver *This, VarType type, uint64_t value) {
118 Element *element = new ElementConst(value, type);
119 pushVectorElement(This->allElements, element);
123 Boolean *getBooleanVar(CSolver *This, VarType type) {
124 Boolean *boolean = allocBooleanVar(type);
125 pushVectorBoolean(This->allBooleans, boolean);
129 Function *createFunctionOperator(CSolver *This, ArithOp op, Set **domain, uint numDomain, Set *range,OverFlowBehavior overflowbehavior) {
130 Function *function = allocFunctionOperator(op, domain, numDomain, range, overflowbehavior);
131 pushVectorFunction(This->allFunctions, function);
135 Predicate *createPredicateOperator(CSolver *This, CompOp op, Set **domain, uint numDomain) {
136 Predicate *predicate = allocPredicateOperator(op, domain,numDomain);
137 pushVectorPredicate(This->allPredicates, predicate);
141 Predicate *createPredicateTable(CSolver *This, Table *table, UndefinedBehavior behavior) {
142 Predicate *predicate = allocPredicateTable(table, behavior);
143 pushVectorPredicate(This->allPredicates, predicate);
147 Table *createTable(CSolver *This, Set **domains, uint numDomain, Set *range) {
148 Table *table = allocTable(domains,numDomain,range);
149 pushVectorTable(This->allTables, table);
153 Table *createTableForPredicate(CSolver *solver, Set **domains, uint numDomain) {
154 return createTable(solver, domains, numDomain, NULL);
157 void addTableEntry(CSolver *This, Table *table, uint64_t *inputs, uint inputSize, uint64_t result) {
158 addNewTableEntry(table,inputs, inputSize,result);
161 Function *completeTable(CSolver *This, Table *table, UndefinedBehavior behavior) {
162 Function *function = allocFunctionTable(table, behavior);
163 pushVectorFunction(This->allFunctions,function);
167 Element *applyFunction(CSolver *This, Function *function, Element **array, uint numArrays, Boolean *overflowstatus) {
168 Element *element = new ElementFunction(function,array,numArrays,overflowstatus);
169 pushVectorElement(This->allElements, element);
173 Boolean *applyPredicate(CSolver *This, Predicate *predicate, Element **inputs, uint numInputs) {
174 return applyPredicateTable(This, predicate, inputs, numInputs, NULL);
176 Boolean *applyPredicateTable(CSolver *This, Predicate *predicate, Element **inputs, uint numInputs, Boolean *undefinedStatus) {
177 Boolean *boolean = new BooleanPredicate(predicate, inputs, numInputs, undefinedStatus);
178 pushVectorBoolean(This->allBooleans, boolean);
182 Boolean *applyLogicalOperation(CSolver *This, LogicOp op, Boolean **array, uint asize) {
183 return new BooleanLogic(This, op, array, asize);
186 void addConstraint(CSolver *This, Boolean *constraint) {
187 addHashSetBoolean(This->constraints, constraint);
190 Order *createOrder(CSolver *This, OrderType type, Set *set) {
191 Order *order = allocOrder(type, set);
192 pushVectorOrder(This->allOrders, order);
196 Boolean *orderConstraint(CSolver *This, Order *order, uint64_t first, uint64_t second) {
197 Boolean *constraint = new BooleanOrder(order, first, second);
198 pushVectorBoolean(This->allBooleans,constraint);
202 int startEncoding(CSolver *This) {
203 naiveEncodingDecision(This);
204 SATEncoder *satEncoder = This->satEncoder;
205 computePolarities(This);
207 encodeAllSATEncoder(This, satEncoder);
208 int result = solveCNF(satEncoder->cnf);
209 model_print("sat_solver's result:%d\tsolutionSize=%d\n", result, satEncoder->cnf->solver->solutionsize);
210 for (int i = 1; i <= satEncoder->cnf->solver->solutionsize; i++) {
211 model_print("%d, ", satEncoder->cnf->solver->solution[i]);
217 uint64_t getElementValue(CSolver *This, Element *element) {
218 switch (GETELEMENTTYPE(element)) {
222 return getElementValueSATTranslator(This, element);
229 bool getBooleanValue( CSolver *This, Boolean *boolean) {
230 switch (GETBOOLEANTYPE(boolean)) {
232 return getBooleanVariableValueSATTranslator(This, boolean);
239 HappenedBefore getOrderConstraintValue(CSolver *This, Order *order, uint64_t first, uint64_t second) {
240 return getOrderConstraintValueSATTranslator(This, order, first, second);