libpredict_integration: init
This commit is contained in:
@@ -23,6 +23,7 @@
|
||||
#include "expr_transform.h"
|
||||
#include "../LoopAnalyzer/loop_analyzer.h"
|
||||
#include "CFGraph/CFGraph.h"
|
||||
#include "../Utils/utils.h"
|
||||
|
||||
#include "json.hpp"
|
||||
|
||||
@@ -36,6 +37,109 @@ using std::tuple;
|
||||
|
||||
using json = nlohmann::json;
|
||||
|
||||
void runPredictSchemeOld(SgProject &project,
|
||||
vector<vector<size_t>> &topologies,
|
||||
vector<ParallelRegion*> ¶llelRegions,
|
||||
map<string, vector<LoopGraph*>> loopGraph,
|
||||
map<string, vector<SpfInterval*>> intervals,
|
||||
map<string, vector<Messages>> &SPF_messages)
|
||||
{
|
||||
int maxSizeDist = 0;
|
||||
for (int z = 0; z < parallelRegions.size(); ++z)
|
||||
{
|
||||
const DataDirective &dataDirectives = parallelRegions[z]->GetDataDir();
|
||||
const vector<int> ¤tVariant = parallelRegions[z]->GetCurrentVariant();
|
||||
|
||||
auto &tmp = dataDirectives.distrRules;
|
||||
vector<pair<DIST::Array*, const DistrVariant*>> currentVar;
|
||||
for (int z1 = 0; z1 < currentVariant.size(); ++z1)
|
||||
currentVar.push_back(std::make_pair(tmp[z1].first, &tmp[z1].second[currentVariant[z1]]));
|
||||
|
||||
for (auto &elem : currentVar)
|
||||
{
|
||||
DIST::Array *array = elem.first;
|
||||
const DistrVariant *var = elem.second;
|
||||
|
||||
int countBlock = 0;
|
||||
for (int z = 0; z < var->distRule.size(); ++z)
|
||||
if (var->distRule[z] == dist::BLOCK)
|
||||
++countBlock;
|
||||
maxSizeDist = std::max(maxSizeDist, countBlock);
|
||||
}
|
||||
}
|
||||
|
||||
SpfInterval *mainIterval = getMainInterval(&project, intervals, SPF_messages);
|
||||
topologies.clear();
|
||||
if (maxSizeDist)
|
||||
{
|
||||
const int procNum = 8;
|
||||
//TODO:
|
||||
//topologies = getTopologies(procNum, maxSizeDist);
|
||||
throw -10;
|
||||
|
||||
const int countOfTop = topologies.size();
|
||||
if (countOfTop < 0)
|
||||
printInternalError(convertFileName(__FILE__).c_str(), __LINE__);
|
||||
|
||||
for (auto &inter : intervals)
|
||||
initTimeForIntervalTree(countOfTop, inter.second);
|
||||
|
||||
for (int z = 0; z < parallelRegions.size(); ++z)
|
||||
{
|
||||
const DataDirective &dataDirectives = parallelRegions[z]->GetDataDir();
|
||||
const vector<int> ¤tVariant = parallelRegions[z]->GetCurrentVariant();
|
||||
DIST::Arrays<int> &allArrays = parallelRegions[z]->GetAllArraysToModify();
|
||||
|
||||
auto &tmp = dataDirectives.distrRules;
|
||||
vector<pair<DIST::Array*, const DistrVariant*>> currentVar;
|
||||
for (int z1 = 0; z1 < currentVariant.size(); ++z1)
|
||||
currentVar.push_back(std::make_pair(tmp[z1].first, &tmp[z1].second[currentVariant[z1]]));
|
||||
|
||||
map<LoopGraph*, ParallelDirective*> parallelDirs;
|
||||
vector<std::tuple<DIST::Array*, vector<long>, pair<string, int>>> allSingleRemotes;
|
||||
for (int i = project.numberOfFiles() - 1; i >= 0; --i)
|
||||
{
|
||||
SgFile *file = &(project.file(i));
|
||||
auto fountInfo = findAllDirectives(file, getObjectForFileFromMap(file->filename(), loopGraph), parallelRegions[z]->GetId());
|
||||
parallelDirs.insert(fountInfo.begin(), fountInfo.end());
|
||||
|
||||
auto fountRem = findAllSingleRemotes(file, parallelRegions[z]->GetId(), parallelRegions);
|
||||
allSingleRemotes.insert(allSingleRemotes.end(), fountRem.begin(), fountRem.end());
|
||||
}
|
||||
//TODO!
|
||||
//int err = predictScheme(parallelRegions[z], currentVar, allArrays.GetArrays(), parallelDirs, intervals, SPF_messages, allSingleRemotes, maxSizeDist, procNum);
|
||||
/*if (err != 0)
|
||||
internalExit = err;*/
|
||||
}
|
||||
|
||||
vector<SpfInterval*> tmp = { mainIterval };
|
||||
aggregatePredictedTimes(tmp);
|
||||
|
||||
int idx = 0;
|
||||
int best = -1;
|
||||
double bestSpeedUp = 0;
|
||||
for (auto &top : topologies)
|
||||
{
|
||||
string outStr = "";
|
||||
for (auto &elem : top)
|
||||
outStr += std::to_string(elem) + " ";
|
||||
double currS = mainIterval->exec_time / mainIterval->predictedTimes[idx];
|
||||
__spf_print(1, "%d: speed up %f for top. %s\n", idx, currS, outStr.c_str());
|
||||
|
||||
if (best == -1 || bestSpeedUp < currS)
|
||||
{
|
||||
bestSpeedUp = currS;
|
||||
best = idx;
|
||||
}
|
||||
++idx;
|
||||
}
|
||||
__spf_print(1, "best topology %d with speed up %f\n", best, bestSpeedUp);
|
||||
}
|
||||
else
|
||||
for (auto &inter : intervals)
|
||||
initTimeForIntervalTree(0, inter.second);
|
||||
}
|
||||
|
||||
static void fillParallel(SgExpression *exp, ParallelStats &parStats, int &totalScoreComm)
|
||||
{
|
||||
if (exp)
|
||||
|
||||
Reference in New Issue
Block a user