#include <lttv/module.h>
#include <lttv/option.h>
#include <lttv/print.h>
-#include <lttv/sync/sync_chain_lttv.h>
+#include <lttv/sync/sync_chain.h>
#include <ltt/ltt.h>
#include <ltt/event.h>
#include <ltt/trace.h>
SyncState* syncState;
struct timeval startTime;
struct rusage startUsage;
- FILE* graphsStream;
};
static LttvHooks* before_traceset, * before_trace, * event_hook, * after_traceset;
"synchronization points", "none", LTTV_OPT_NONE, &optionEvalGraphs,
NULL, NULL);
- retval= snprintf(graphsDir, sizeof(graphsDir), "graphs-%d", getpid());
+ retval= snprintf(graphsDir, sizeof(graphsDir), "eval-graphs-%d", getpid());
if (retval > sizeof(graphsDir) - 1)
{
graphsDir[sizeof(graphsDir) - 1]= '\0';
struct TracesetChainState* tracesetChainState;
SyncState* syncState;
GList* result;
- int retval;
tracesetChainState= g_hash_table_lookup(tracesetChainStates, traceSetContext);
syncState= malloc(sizeof(SyncState));
tracesetChainState->syncState= syncState;
syncState->traceNb= lttv_traceset_number(traceSetContext->ts);
+ // Statistics are always on with eval
syncState->stats= true;
if (optionEvalGraphs)
{
- syncState->graphs= optionEvalGraphsDir;
+ // Create the graph directory right away in case the module initialization
+ // functions have something to write in it.
+ syncState->graphsDir= optionEvalGraphsDir;
+ syncState->graphsStream= createGraphsDir(syncState->graphsDir);
}
else
{
- syncState->graphs= NULL;
+ syncState->graphsStream= NULL;
+ syncState->graphsDir= NULL;
}
- syncState->processingData= NULL;
- result= g_queue_find_custom(&processingModules, "LTTV-standard",
- &gcfCompareProcessing);
- syncState->processingModule= (ProcessingModule*) result->data;
-
- tracesetChainState->graphsStream= NULL;
- if (syncState->graphs &&
- syncState->processingModule->writeProcessingGraphsPlots != NULL)
- {
- char* cwd;
- int graphsFp;
+ syncState->reductionData= NULL;
+ syncState->reductionModule= NULL;
- // Create the graph directory right away in case the module initialization
- // functions have something to write in it.
- cwd= changeToGraphDir(syncState->graphs);
-
- if ((graphsFp= open("graphs.gnu", O_WRONLY | O_CREAT | O_TRUNC, S_IRUSR |
- S_IWUSR | S_IXUSR | S_IRGRP | S_IWGRP | S_IXGRP | S_IROTH
- | S_IWOTH | S_IXOTH)) == -1)
- {
- g_error(strerror(errno));
- }
- if ((tracesetChainState->graphsStream= fdopen(graphsFp, "w")) == NULL)
- {
- g_error(strerror(errno));
- }
-
- retval= chdir(cwd);
- if (retval == -1)
- {
- g_error(strerror(errno));
- }
- free(cwd);
- }
+ syncState->analysisData= NULL;
+ result= g_queue_find_custom(&analysisModules, "eval",
+ &gcfCompareAnalysis);
+ syncState->analysisModule= (AnalysisModule*) result->data;
+ syncState->analysisModule->initAnalysis(syncState);
syncState->matchingData= NULL;
- result= g_queue_find_custom(&matchingModules, "TCP", &gcfCompareMatching);
+ result= g_queue_find_custom(&matchingModules, "distributor",
+ &gcfCompareMatching);
syncState->matchingModule= (MatchingModule*) result->data;
+ syncState->matchingModule->initMatching(syncState);
- syncState->analysisData= NULL;
- result= g_queue_find_custom(&analysisModules, "chull", &gcfCompareAnalysis);
- syncState->analysisModule= (AnalysisModule*) result->data;
-
+ syncState->processingData= NULL;
+ result= g_queue_find_custom(&processingModules, "LTTV-standard",
+ &gcfCompareProcessing);
+ syncState->processingModule= (ProcessingModule*) result->data;
syncState->processingModule->initProcessing(syncState, traceSetContext);
- syncState->matchingModule->initMatching(syncState);
- syncState->analysisModule->initAnalysis(syncState);
}
tracesetChainState= g_hash_table_lookup(tracesetChainStates, traceSetContext);
syncState= tracesetChainState->syncState;
- syncState->processingModule->finalizeProcessing(syncState);
+ freeAllFactors(syncState->processingModule->finalizeProcessing(syncState),
+ syncState->traceNb);
// Write graphs file
- if (tracesetChainState->graphsStream != NULL)
+ if (optionEvalGraphs)
{
- unsigned int i, j;
-
- fprintf(tracesetChainState->graphsStream,
- "#!/usr/bin/gnuplot\n\n"
- "set terminal postscript eps color size 8in,6in\n");
-
- // Cover the upper triangular matrix, i is the reference node.
- for (i= 0; i < syncState->traceNb; i++)
- {
- for (j= i + 1; j < syncState->traceNb; j++)
- {
- long pos;
-
- fprintf(tracesetChainState->graphsStream,
- "\nset output \"%03d-%03d.eps\"\n"
- "plot \\\n", i, j);
-
- syncState->processingModule->writeProcessingGraphsPlots(tracesetChainState->graphsStream,
- syncState, i, j);
-
- // Remove the ", \\\n" from the last graph plot line
- fflush(tracesetChainState->graphsStream);
- pos= ftell(tracesetChainState->graphsStream);
- if (ftruncate(fileno(tracesetChainState->graphsStream), pos - 4) == -1)
- {
- g_error(strerror(errno));
- }
- if (fseek(tracesetChainState->graphsStream, 0, SEEK_END) == -1)
- {
- g_error(strerror(errno));
- }
-
- fprintf(tracesetChainState->graphsStream,
- "\nset output \"%1$03d-%2$03d.eps\"\n"
- "set key inside right bottom\n"
- "set title \"\"\n"
- "set xlabel \"Clock %1$u\"\n"
- "set xtics nomirror\n"
- "set ylabel \"Clock %2$u\"\n"
- "set ytics nomirror\n", i, j);
-
- syncState->processingModule->writeProcessingGraphsOptions(tracesetChainState->graphsStream,
- syncState, i, j);
-
- fprintf(tracesetChainState->graphsStream,
- "replot\n");
- }
- }
+ writeGraphsScript(syncState);
- if (fclose(tracesetChainState->graphsStream) != 0)
+ if (fclose(syncState->graphsStream) != 0)
{
- g_error(strerror(errno));
+ g_error("%s", strerror(errno));
}
}
- if (syncState->processingModule->printProcessingStats != NULL)
- {
- syncState->processingModule->printProcessingStats(syncState);
- }
+ printStats(syncState);
syncState->processingModule->destroyProcessing(syncState);
if (syncState->matchingModule != NULL)
{
syncState->analysisModule->destroyAnalysis(syncState);
}
+ if (syncState->reductionModule != NULL)
+ {
+ syncState->reductionModule->destroyReduction(syncState);
+ }
free(syncState);