1 #include "satencoder.h"
8 #include "tableentry.h"
13 Edge SATEncoder::encodeOperatorPredicateSATEncoder(BooleanPredicate *constraint) {
14 switch (constraint->encoding.type) {
15 case ENUMERATEIMPLICATIONS:
16 return encodeEnumOperatorPredicateSATEncoder(constraint);
18 return encodeCircuitOperatorPredicateEncoder(constraint);
25 Edge SATEncoder::encodeEnumOperatorPredicateSATEncoder(BooleanPredicate *constraint) {
26 PredicateOperator *predicate = (PredicateOperator *)constraint->predicate;
27 uint numDomains = predicate->domains.getSize();
28 Polarity polarity = constraint->polarity;
29 FunctionEncodingType encType = constraint->encoding.type;
30 bool generateNegation = encType == ENUMERATEIMPLICATIONSNEGATE;
32 polarity = negatePolarity(polarity);
34 /* Call base encoders for children */
35 for (uint i = 0; i < numDomains; i++) {
36 Element *elem = constraint->inputs.get(i);
37 encodeElementSATEncoder(elem);
39 VectorEdge *clauses = vector;
41 uint indices[numDomains]; //setup indices
42 bzero(indices, sizeof(uint) * numDomains);
44 uint64_t vals[numDomains];//setup value array
45 for (uint i = 0; i < numDomains; i++) {
46 Set *set = predicate->domains.get(i);
47 vals[i] = set->getElement(indices[i]);
50 bool notfinished = true;
52 Edge carray[numDomains];
54 if (predicate->evalPredicateOperator(vals) != generateNegation) {
55 //Include this in the set of terms
56 for (uint i = 0; i < numDomains; i++) {
57 Element *elem = constraint->inputs.get(i);
58 carray[i] = getElementValueConstraint(elem, polarity, vals[i]);
60 Edge term = constraintAND(cnf, numDomains, carray);
61 pushVectorEdge(clauses, term);
62 ASSERT(getSizeVectorEdge(clauses) > 0);
66 for (uint i = 0; i < numDomains; i++) {
67 uint index = ++indices[i];
68 Set *set = predicate->domains.get(i);
70 if (index < set->getSize()) {
71 vals[i] = set->getElement(index);
76 vals[i] = set->getElement(0);
80 if (getSizeVectorEdge(clauses) == 0) {
83 Edge cor = constraintOR(cnf, getSizeVectorEdge(clauses), exposeArrayEdge(clauses));
84 clearVectorEdge(clauses);
85 return generateNegation ? constraintNegate(cor) : cor;
89 void SATEncoder::encodeOperatorElementFunctionSATEncoder(ElementFunction *func) {
91 model_print("Operator Function ...\n");
93 FunctionOperator *function = (FunctionOperator *) func->getFunction();
94 uint numDomains = func->inputs.getSize();
96 /* Call base encoders for children */
97 for (uint i = 0; i < numDomains; i++) {
98 Element *elem = func->inputs.get(i);
99 encodeElementSATEncoder(elem);
102 VectorEdge *clauses = allocDefVectorEdge(); // Setup array of clauses
104 uint indices[numDomains]; //setup indices
105 bzero(indices, sizeof(uint) * numDomains);
107 uint64_t vals[numDomains];//setup value array
108 for (uint i = 0; i < numDomains; i++) {
109 Set *set = func->inputs.get(i)->getRange();
110 vals[i] = set->getElement(indices[i]);
113 bool notfinished = true;
114 while (notfinished) {
115 Edge carray[numDomains + 1];
117 uint64_t result = function->applyFunctionOperator(numDomains, vals);
118 bool isInRange = ((FunctionOperator *)func->getFunction())->isInRangeFunction(result);
119 bool needClause = isInRange;
120 if (function->overflowbehavior == SATC_OVERFLOWSETSFLAG || function->overflowbehavior == SATC_FLAGIFFOVERFLOW) {
125 //Include this in the set of terms
126 for (uint i = 0; i < numDomains; i++) {
127 Element *elem = func->inputs.get(i);
128 carray[i] = getElementValueConstraint(elem, P_FALSE, vals[i]);
131 carray[numDomains] = getElementValueConstraint(func, P_TRUE, result);
135 switch (function->overflowbehavior) {
137 case SATC_NOOVERFLOW:
138 case SATC_WRAPAROUND: {
139 clause = constraintIMPLIES(cnf, constraintAND(cnf, numDomains, carray), carray[numDomains]);
142 case SATC_FLAGFORCESOVERFLOW: {
143 Edge overFlowConstraint = encodeConstraintSATEncoder(func->overflowstatus);
144 clause = constraintIMPLIES(cnf,constraintAND(cnf, numDomains, carray), constraintAND2(cnf, carray[numDomains], constraintNegate(overFlowConstraint)));
147 case SATC_OVERFLOWSETSFLAG: {
149 clause = constraintIMPLIES(cnf, constraintAND(cnf, numDomains, carray), carray[numDomains]);
151 Edge overFlowConstraint = encodeConstraintSATEncoder(func->overflowstatus);
152 clause = constraintIMPLIES(cnf,constraintAND(cnf, numDomains, carray), overFlowConstraint);
156 case SATC_FLAGIFFOVERFLOW: {
157 Edge overFlowConstraint = encodeConstraintSATEncoder(func->overflowstatus);
159 clause = constraintIMPLIES(cnf, constraintAND(cnf, numDomains, carray), constraintAND2(cnf, carray[numDomains], constraintNegate(overFlowConstraint)));
161 clause = constraintIMPLIES(cnf, constraintAND(cnf, numDomains, carray), overFlowConstraint);
169 model_print("added clause in operator function\n");
173 pushVectorEdge(clauses, clause);
177 for (uint i = 0; i < numDomains; i++) {
178 uint index = ++indices[i];
179 Set *set = func->inputs.get(i)->getRange();
181 if (index < set->getSize()) {
182 vals[i] = set->getElement(index);
187 vals[i] = set->getElement(0);
191 if (getSizeVectorEdge(clauses) == 0) {
192 deleteVectorEdge(clauses);
195 Edge cor = constraintAND(cnf, getSizeVectorEdge(clauses), exposeArrayEdge(clauses));
196 addConstraintCNF(cnf, cor);
197 deleteVectorEdge(clauses);
200 Edge SATEncoder::encodeCircuitOperatorPredicateEncoder(BooleanPredicate *constraint) {
201 PredicateOperator *predicate = (PredicateOperator *) constraint->predicate;
202 Element *elem0 = constraint->inputs.get(0);
203 encodeElementSATEncoder(elem0);
204 Element *elem1 = constraint->inputs.get(1);
205 encodeElementSATEncoder(elem1);
206 ElementEncoding *ee0 = elem0->getElementEncoding();
207 ElementEncoding *ee1 = elem1->getElementEncoding();
208 ASSERT(ee0->numVars == ee1->numVars);
209 uint numVars = ee0->numVars;
210 switch (predicate->getOp()) {
212 return generateEquivNVConstraint(cnf, numVars, ee0->variables, ee1->variables);
214 return generateLTConstraint(cnf, numVars, ee0->variables, ee1->variables);
216 return generateLTConstraint(cnf, numVars, ee1->variables, ee0->variables);