removing true nodes from the OrderGraph
[satune.git] / src / csolver.c
index 5ddaaeda13e13e79db6bb291f2705418217241c4..e9c9526e14d9861273c9793fda12f2d3e26a5756 100644 (file)
 #include "element.h"
 #include "boolean.h"
 #include "predicate.h"
-
-CSolver * allocCSolver() {
-       CSolver * tmp=(CSolver *) ourmalloc(sizeof(CSolver));
-       tmp->constraints=allocDefVectorBoolean();
-       tmp->sets=allocDefVectorSet();
-       tmp->elements=allocDefVectorElement();
-       return tmp;
+#include "order.h"
+#include "table.h"
+#include "function.h"
+#include "satencoder.h"
+#include "sattranslator.h"
+#include "tunable.h"
+#include "orderencoder.h"
+#include "polarityassignment.h"
+
+CSolver *allocCSolver() {
+       CSolver *This = (CSolver *) ourmalloc(sizeof(CSolver));
+       This->unsat = false;
+       This->constraints = allocDefHashSetBoolean();
+       This->allBooleans = allocDefVectorBoolean();
+       This->allSets = allocDefVectorSet();
+       This->allElements = allocDefVectorElement();
+       This->allPredicates = allocDefVectorPredicate();
+       This->allTables = allocDefVectorTable();
+       This->allOrders = allocDefVectorOrder();
+       This->allFunctions = allocDefVectorFunction();
+       This->tuner = allocTuner();
+       This->satEncoder = allocSATEncoder(This);
+       return This;
 }
 
 /** This function tears down the solver and the entire AST */
 
-void deleteSolver(CSolver *this) {
-       deleteVectorBoolean(this->constraints);
-       uint size=getSizeVectorSet(this->sets);
-       for(uint i=0;i<size;i++) {
-               deleteSet(getVectorSet(this->sets, i));
+void deleteSolver(CSolver *This) {
+       deleteHashSetBoolean(This->constraints);
+
+       uint size = getSizeVectorBoolean(This->allBooleans);
+       for (uint i = 0; i < size; i++) {
+               deleteBoolean(getVectorBoolean(This->allBooleans, i));
+       }
+       deleteVectorBoolean(This->allBooleans);
+
+       size = getSizeVectorSet(This->allSets);
+       for (uint i = 0; i < size; i++) {
+               deleteSet(getVectorSet(This->allSets, i));
+       }
+       deleteVectorSet(This->allSets);
+
+       size = getSizeVectorElement(This->allElements);
+       for (uint i = 0; i < size; i++) {
+               deleteElement(getVectorElement(This->allElements, i));
+       }
+       deleteVectorElement(This->allElements);
+
+       size = getSizeVectorTable(This->allTables);
+       for (uint i = 0; i < size; i++) {
+               deleteTable(getVectorTable(This->allTables, i));
        }
+       deleteVectorTable(This->allTables);
 
-       deleteVectorSet(this->sets);
+       size = getSizeVectorPredicate(This->allPredicates);
+       for (uint i = 0; i < size; i++) {
+               deletePredicate(getVectorPredicate(This->allPredicates, i));
+       }
+       deleteVectorPredicate(This->allPredicates);
 
-       size=getSizeVectorElement(this->elements);
-       for(uint i=0;i<size;i++) {
-               deleteElement(getVectorElement(this->elements, i));
+       size = getSizeVectorOrder(This->allOrders);
+       for (uint i = 0; i < size; i++) {
+               deleteOrder(getVectorOrder(This->allOrders, i));
        }
+       deleteVectorOrder(This->allOrders);
 
-       deleteVectorElement(this->elements);
-       ourfree(this);
+       size = getSizeVectorFunction(This->allFunctions);
+       for (uint i = 0; i < size; i++) {
+               deleteFunction(getVectorFunction(This->allFunctions, i));
+       }
+       deleteVectorFunction(This->allFunctions);
+       deleteSATEncoder(This->satEncoder);
+       deleteTuner(This->tuner);
+       ourfree(This);
 }
 
-Set * createSet(CSolver * this, VarType type, uint64_t * elements, uint numelements) {
-       Set * set=allocSet(type, elements, numelements);
-       pushVectorSet(this->sets, set);
+Set *createSet(CSolver *This, VarType type, uint64_t *elements, uint numelements) {
+       Set *set = allocSet(type, elements, numelements);
+       pushVectorSet(This->allSets, set);
        return set;
 }
 
-Set * createRangeSet(CSolver * this, VarType type, uint64_t lowrange, uint64_t highrange) {
-       Set * set=allocSetRange(type, lowrange, highrange);
-       pushVectorSet(this->sets, set);
+Set *createRangeSet(CSolver *This, VarType type, uint64_t lowrange, uint64_t highrange) {
+       Set *set = allocSetRange(type, lowrange, highrange);
+       pushVectorSet(This->allSets, set);
        return set;
 }
 
-MutableSet * createMutableSet(CSolver * this, VarType type) {
-       MutableSet * set=allocMutableSet(type);
-       pushVectorSet(this->sets, set);
+MutableSet *createMutableSet(CSolver *This, VarType type) {
+       MutableSet *set = allocMutableSet(type);
+       pushVectorSet(This->allSets, set);
        return set;
 }
 
-void addItem(CSolver *solver, MutableSet * set, uint64_t element) {
+void addItem(CSolver *This, MutableSet *set, uint64_t element) {
        addElementMSet(set, element);
 }
 
-uint64_t createUniqueItem(CSolver *solver, MutableSet * set) {
-       uint64_t element=set->low++;
+uint64_t createUniqueItem(CSolver *This, MutableSet *set) {
+       uint64_t element = set->low++;
        addElementMSet(set, element);
        return element;
 }
 
-Element * getElementVar(CSolver *this, Set * set) {
-       Element * element=allocElement(set);
-       pushVectorElement(this->elements, element);
+Element *getElementVar(CSolver *This, Set *set) {
+       Element *element = allocElementSet(set);
+       pushVectorElement(This->allElements, element);
        return element;
 }
 
-Boolean * getBooleanVar(CSolver *solver, VarType type) {
-    Boolean* boolean= allocBoolean(type);
-    pushVectorBoolean(solver->constraints, boolean);
-    return boolean;
+Element *getElementConst(CSolver *This, VarType type, uint64_t value) {
+       Element *element = allocElementConst(value, type);
+       pushVectorElement(This->allElements, element);
+       return element;
+}
+
+Boolean *getBooleanVar(CSolver *This, VarType type) {
+       Boolean *boolean = allocBooleanVar(type);
+       pushVectorBoolean(This->allBooleans, boolean);
+       return boolean;
+}
+
+Function *createFunctionOperator(CSolver *This, ArithOp op, Set **domain, uint numDomain, Set *range,OverFlowBehavior overflowbehavior) {
+       Function *function = allocFunctionOperator(op, domain, numDomain, range, overflowbehavior);
+       pushVectorFunction(This->allFunctions, function);
+       return function;
+}
+
+Predicate *createPredicateOperator(CSolver *This, CompOp op, Set **domain, uint numDomain) {
+       Predicate *predicate = allocPredicateOperator(op, domain,numDomain);
+       pushVectorPredicate(This->allPredicates, predicate);
+       return predicate;
+}
+
+Predicate *createPredicateTable(CSolver *This, Table *table, UndefinedBehavior behavior) {
+       Predicate *predicate = allocPredicateTable(table, behavior);
+       pushVectorPredicate(This->allPredicates, predicate);
+       return predicate;
+}
+
+Table *createTable(CSolver *This, Set **domains, uint numDomain, Set *range) {
+       Table *table = allocTable(domains,numDomain,range);
+       pushVectorTable(This->allTables, table);
+       return table;
 }
 
-Function * createFunctionOperator(CSolver *solver, enum ArithOp op, Set ** domain, uint numDomain, Set * range,
-        enum OverFlowBehavior overflowbehavior, Boolean * overflowstatus) {
-       return NULL;
+Table *createTableForPredicate(CSolver *solver, Set **domains, uint numDomain) {
+       return createTable(solver, domains, numDomain, NULL);
 }
 
-//Function * createFunctionOperatorPure(CSolver *solver, enum ArithOp op) {
-//     return NULL;
-//}
+void addTableEntry(CSolver *This, Table *table, uint64_t *inputs, uint inputSize, uint64_t result) {
+       addNewTableEntry(table,inputs, inputSize,result);
+}
 
-Predicate * createPredicateOperator(CSolver *solver, enum CompOp op, Set ** domain, uint numDomain) {
-    return allocPredicate(op, domain,numDomain);
+Function *completeTable(CSolver *This, Table *table, UndefinedBehavior behavior) {
+       Function *function = allocFunctionTable(table, behavior);
+       pushVectorFunction(This->allFunctions,function);
+       return function;
 }
 
-Table * createTable(CSolver *solver, Set **domains, uint numDomain, Set * range) {
-       return NULL;
+Element *applyFunction(CSolver *This, Function *function, Element **array, uint numArrays, Boolean *overflowstatus) {
+       Element *element = allocElementFunction(function,array,numArrays,overflowstatus);
+       pushVectorElement(This->allElements, element);
+       return element;
 }
 
-void addTableEntry(CSolver *solver, uint64_t* inputs, uint inputSize, uint64_t result) {
+Boolean *applyPredicate(CSolver *This, Predicate *predicate, Element **inputs, uint numInputs) {
+       return applyPredicateTable(This, predicate, inputs, numInputs, NULL);
+}
+Boolean *applyPredicateTable(CSolver *This, Predicate *predicate, Element **inputs, uint numInputs, Boolean *undefinedStatus) {
+       Boolean *boolean = allocBooleanPredicate(predicate, inputs, numInputs, undefinedStatus);
+       pushVectorBoolean(This->allBooleans, boolean);
+       return boolean;
 }
 
-Function * completeTable(CSolver *solver, Table * table) {
-       return NULL;
+Boolean *applyLogicalOperation(CSolver *This, LogicOp op, Boolean **array, uint asize) {
+       return allocBooleanLogicArray(This, op, array, asize);
 }
 
-Element * applyFunction(CSolver *solver, Function * function, Element ** array) {
-       return NULL;
+void addConstraint(CSolver *This, Boolean *constraint) {
+       addHashSetBoolean(This->constraints, constraint);
 }
 
-Boolean * applyPredicate(CSolver *solver, Predicate * predicate, Element ** inputs) {
-       return NULL;
+Order *createOrder(CSolver *This, OrderType type, Set *set) {
+       Order *order = allocOrder(type, set);
+       pushVectorOrder(This->allOrders, order);
+       return order;
 }
 
-Boolean * applyLogicalOperation(CSolver *solver, enum LogicOp op, Boolean ** array) {
-       return NULL;
+Boolean *orderConstraint(CSolver *This, Order *order, uint64_t first, uint64_t second) {
+       Boolean *constraint = allocBooleanOrder(order, first, second);
+       pushVectorBoolean(This->allBooleans,constraint);
+       return constraint;
 }
 
-void addBoolean(CSolver *this, Boolean * constraint) {
-       pushVectorBoolean(this->constraints, constraint);
+int startEncoding(CSolver *This) {
+       naiveEncodingDecision(This);
+       SATEncoder *satEncoder = This->satEncoder;
+       computePolarities(This);
+       orderAnalysis(This);
+       encodeAllSATEncoder(This, satEncoder);
+       int result = solveCNF(satEncoder->cnf);
+       model_print("sat_solver's result:%d\tsolutionSize=%d\n", result, satEncoder->cnf->solver->solutionsize);
+       for (uint i = 1; i <= satEncoder->cnf->solver->solutionsize; i++) {
+               model_print("%d, ", satEncoder->cnf->solver->solution[i]);
+       }
+       model_print("\n");
+       return result;
+}
+
+uint64_t getElementValue(CSolver *This, Element *element) {
+       switch (GETELEMENTTYPE(element)) {
+       case ELEMSET:
+       case ELEMCONST:
+       case ELEMFUNCRETURN:
+               return getElementValueSATTranslator(This, element);
+       default:
+               ASSERT(0);
+       }
+       exit(-1);
 }
 
-Order * createOrder(CSolver *solver, enum OrderType type, Set * set) {
-    return allocOrder(type, set);
+bool getBooleanValue( CSolver *This, Boolean *boolean) {
+       switch (GETBOOLEANTYPE(boolean)) {
+       case BOOLEANVAR:
+               return getBooleanVariableValueSATTranslator(This, boolean);
+       default:
+               ASSERT(0);
+       }
+       exit(-1);
 }
 
-Boolean * orderConstraint(CSolver *solver, Order * order, uint64_t first, uint64_t second) {
-    Boolean* constraint = allocBooleanOrder(order, first, second);
-    pushVectorBoolean(solver->constraints,constraint);
-    return constraint;
+HappenedBefore getOrderConstraintValue(CSolver *This, Order *order, uint64_t first, uint64_t second) {
+       return getOrderConstraintValueSATTranslator(This, order, first, second);
 }
+