#include "autotuner.h"
#include "csolver.h"
+#include "searchtuner.h"
+#include <math.h>
+#include <stdlib.h>
+#include <float.h>
-void AutoTuner::tune(CSolver *base) {
-
+#define UNSETVALUE -1
+#define TIMEOUTSEC 5000
+AutoTuner::AutoTuner(uint _budget) :
+ budget(_budget), result(UNSETVALUE) {
+}
+
+void AutoTuner::addProblem(CSolver *solver) {
+ solvers.push(solver);
+}
+
+long long AutoTuner::evaluate(CSolver *problem, SearchTuner *tuner) {
+ CSolver *copy = problem->clone();
+ copy->setTuner(tuner);
+ copy->setSatSolverTimeout(TIMEOUTSEC);
+ model_print("**********************\n");
+ int sat = copy->solve();
+ if (result == UNSETVALUE && sat != IS_INDETER)
+ result = sat;
+ else if (result != sat && sat != IS_INDETER) {
+ model_print("&&&&&&&&&&&&&&&&&& Result has changed &&&&&&&&&&&&&\n");
+ copy->printConstraints();
+ }
+ long long metric = copy->getElapsedTime();
+ delete copy;
+ return metric;
+}
+
+double AutoTuner::evaluateAll(SearchTuner *tuner) {
+ double product = 1;
+ for (uint i = 0; i < solvers.getSize(); i++) {
+ CSolver *problem = solvers.get(i);
+ double score = evaluate(problem, tuner);
+ product *= score;
+ }
+ return pow(product, 1 / ((double)solvers.getSize()));
+}
+
+SearchTuner *AutoTuner::mutateTuner(SearchTuner *oldTuner, uint k) {
+ SearchTuner *newTuner = oldTuner->copyUsed();
+ uint numSettings = oldTuner->getSize();
+ uint settingsToMutate = (uint)(AUTOTUNERFACTOR * (((double)numSettings) * (budget - k)) / (budget));
+ if (settingsToMutate < 1)
+ settingsToMutate = 1;
+ model_print("Mutating %u settings\n", settingsToMutate);
+ while (settingsToMutate-- != 0) {
+ newTuner->randomMutate();
+ }
+ return newTuner;
+}
+
+#ifdef STATICENCGEN
+SearchTuner *AutoTuner::mutateTuner(SearchTuner *oldTuner) {
+ SearchTuner *newTuner = oldTuner->copyUsed();
+ result = newTuner->nextStaticTuner();
+ return result==EXIT_FAILURE? newTuner: NULL;
+}
+#endif
+
+void AutoTuner::tune() {
+ SearchTuner *bestTuner = NULL;
+ double bestScore = DBL_MAX;
+
+ SearchTuner *oldTuner = new SearchTuner();
+ double base_temperature = evaluateAll(oldTuner);
+ double oldScore = base_temperature;
+
+#ifdef STATICENCGEN
+ while(true){
+ SearchTuner *newTuner = mutateTuner(oldTuner);
+ if(newTuner == NULL)
+ return;
+ double newScore = evaluateAll(newTuner);
+ newTuner->printUsed();
+ model_print("Received score %f\n", newScore);
+ delete oldTuner;
+ oldScore = newScore;
+ oldTuner = newTuner;
+ }
+#endif
+ for (uint i = 0; i < budget; i++) {
+ SearchTuner *newTuner = mutateTuner(oldTuner, i);
+ double newScore = evaluateAll(newTuner);
+ newTuner->printUsed();
+ model_print("Received score %f\n", newScore);
+ double scoreDiff = newScore - oldScore; //smaller is better
+ if (newScore < bestScore) {
+ if (bestTuner != NULL)
+ delete bestTuner;
+ bestScore = newScore;
+ bestTuner = newTuner->copyUsed();
+ }
+
+ double acceptanceP;
+ if (scoreDiff < 0) {
+ acceptanceP = 1;
+ } else {
+ double currTemp = base_temperature * (((double)budget - i) / budget);
+ acceptanceP = exp(-scoreDiff / currTemp);
+ }
+ double ran = ((double)random()) / RAND_MAX;
+ if (ran <= acceptanceP) {
+ delete oldTuner;
+ oldScore = newScore;
+ oldTuner = newTuner;
+ } else {
+ delete newTuner;
+ }
+ }
+ model_print("Best tuner:\n");
+ bestTuner->print();
+ bestTuner->serialize();
+ model_print("Received score %f\n", bestScore);
+ if (bestTuner != NULL)
+ delete bestTuner;
+ delete oldTuner;
}