Add a module to distribute messages to many analysis modules
[lttv.git] / lttv / lttv / sync / event_analysis_eval.c
index 05a49acca39c9c1114245e53a9e2c6b6f87fd6cb..cfe387a9a9eee150063b39f177d44377c56ed53f 100644 (file)
@@ -17,6 +17,7 @@
  */
 
 #define _GNU_SOURCE
+#define _ISOC99_SOURCE
 
 #ifdef HAVE_CONFIG_H
 #include <config.h>
@@ -24,6 +25,7 @@
 
 #include <arpa/inet.h>
 #include <errno.h>
+#include <math.h>
 #include <netinet/in.h>
 #include <stddef.h>
 #include <stdlib.h>
@@ -59,6 +61,10 @@ static void gdnDestroyDouble(gpointer data);
 static void readRttInfo(GHashTable* rttInfo, FILE* rttFile);
 static void positionStream(FILE* stream);
 
+static void gfSum(gpointer data, gpointer userData);
+static void gfSumSquares(gpointer data, gpointer userData);
+static void ghfPrintExchangeRtt(gpointer key, gpointer value, gpointer user_data);
+
 
 static AnalysisModule analysisModuleEval= {
        .name= "eval",
@@ -133,16 +139,20 @@ static void initAnalysisEval(SyncState* const syncState)
 
        if (syncState->stats)
        {
-               analysisData->stats= malloc(sizeof(AnalysisStatsEval));
+               analysisData->stats= calloc(1, sizeof(AnalysisStatsEval));
                analysisData->stats->broadcastDiffSum= 0.;
 
-               analysisData->stats->allStats= malloc(syncState->traceNb *
-                       sizeof(TracePairStats*));
+               analysisData->stats->messageStats= malloc(syncState->traceNb *
+                       sizeof(MessageStats*));
                for (i= 0; i < syncState->traceNb; i++)
                {
-                       analysisData->stats->allStats[i]= calloc(syncState->traceNb,
-                               sizeof(TracePairStats));
+                       analysisData->stats->messageStats[i]= calloc(syncState->traceNb,
+                               sizeof(MessageStats));
                }
+
+               analysisData->stats->exchangeRtt=
+                       g_hash_table_new_full(&ghfRttKeyHash, &gefRttKeyEqual,
+                               &gdnDestroyRttKey, &gdnDestroyDouble);
        }
 }
 
@@ -174,9 +184,12 @@ static void destroyAnalysisEval(SyncState* const syncState)
        {
                for (i= 0; i < syncState->traceNb; i++)
                {
-                       free(analysisData->stats->allStats[i]);
+                       free(analysisData->stats->messageStats[i]);
                }
-               free(analysisData->stats->allStats);
+               free(analysisData->stats->messageStats);
+
+               g_hash_table_destroy(analysisData->stats->exchangeRtt);
+
                free(analysisData->stats);
        }
 
@@ -188,6 +201,8 @@ static void destroyAnalysisEval(SyncState* const syncState)
 /*
  * Perform analysis on an event pair.
  *
+ * Check if there is message inversion or messages that are too fast.
+ *
  * Args:
  *   syncState     container for synchronization data
  *   message       structure containing the events
@@ -195,29 +210,109 @@ static void destroyAnalysisEval(SyncState* const syncState)
 static void analyzeMessageEval(SyncState* const syncState, Message* const message)
 {
        AnalysisDataEval* analysisData;
+       MessageStats* messageStats;
+       double* rtt;
+       double tt;
+       struct RttKey rttKey;
+
+       if (!syncState->stats)
+       {
+               return;
+       }
 
        analysisData= (AnalysisDataEval*) syncState->analysisData;
+       messageStats=
+               &analysisData->stats->messageStats[message->outE->traceNum][message->inE->traceNum];
+
+       messageStats->total++;
+
+       tt= wallTimeSub(&message->inE->wallTime, &message->outE->wallTime);
+       if (tt <= 0)
+       {
+               messageStats->inversionNb++;
+       }
+
+       g_assert(message->inE->type == TCP);
+       rttKey.saddr=
+               message->inE->event.tcpEvent->segmentKey->connectionKey.saddr;
+       rttKey.daddr=
+               message->inE->event.tcpEvent->segmentKey->connectionKey.daddr;
+       rtt= g_hash_table_lookup(analysisData->rttInfo, &rttKey);
+       g_debug("rttInfo, looking up (%u, %u)->(%f)", rttKey.saddr,
+               rttKey.daddr, rtt ? *rtt : NAN);
+
+       if (rtt)
+       {
+               g_debug("rttInfo, tt: %f rtt / 2: %f", tt, *rtt / 2.);
+               if (tt < *rtt / 2.)
+               {
+                       messageStats->tooFastNb++;
+               }
+       }
+       else
+       {
+               messageStats->noRTTInfoNb++;
+       }
 }
 
 
 /*
  * Perform analysis on multiple messages
  *
+ * Measure the RTT
+ *
  * Args:
  *   syncState     container for synchronization data
  *   exchange      structure containing the messages
  */
 static void analyzeExchangeEval(SyncState* const syncState, Exchange* const exchange)
 {
-       AnalysisDataEval* analysisData;
+       AnalysisDataEval* analysisData= syncState->analysisData;
+       Message* m1= g_queue_peek_tail(exchange->acks);
+       Message* m2= exchange->message;
+       struct RttKey* rttKey;
+       double* rtt, * exchangeRtt;
 
-       analysisData= (AnalysisDataEval*) syncState->analysisData;
+       if (!syncState->stats)
+       {
+               return;
+       }
+
+       // (T2 - T1) - (T3 - T4)
+       rtt= malloc(sizeof(double));
+       *rtt= wallTimeSub(&m1->inE->wallTime, &m1->outE->wallTime) -
+               wallTimeSub(&m2->outE->wallTime, &m2->inE->wallTime);
+
+       g_assert(m1->inE->type == TCP);
+       rttKey= malloc(sizeof(struct RttKey));
+       rttKey->saddr=
+               MIN(m1->inE->event.tcpEvent->segmentKey->connectionKey.saddr,
+                       m1->inE->event.tcpEvent->segmentKey->connectionKey.daddr);
+       rttKey->daddr=
+               MAX(m1->inE->event.tcpEvent->segmentKey->connectionKey.saddr,
+                       m1->inE->event.tcpEvent->segmentKey->connectionKey.daddr);
+       exchangeRtt= g_hash_table_lookup(analysisData->stats->exchangeRtt,
+               rttKey);
+
+       if (exchangeRtt)
+       {
+               if (*rtt < *exchangeRtt)
+               {
+                       g_hash_table_replace(analysisData->stats->exchangeRtt, rttKey, rtt);
+               }
+       }
+       else
+       {
+               g_hash_table_insert(analysisData->stats->exchangeRtt, rttKey, rtt);
+       }
 }
 
 
 /*
  * Perform analysis on muliple events
  *
+ * Sum the broadcast differential delays
+ *
  * Args:
  *   syncState     container for synchronization data
  *   broadcast     structure containing the events
@@ -225,8 +320,27 @@ static void analyzeExchangeEval(SyncState* const syncState, Exchange* const exch
 static void analyzeBroadcastEval(SyncState* const syncState, Broadcast* const broadcast)
 {
        AnalysisDataEval* analysisData;
+       double sum= 0, squaresSum= 0;
+       double y;
+
+       if (!syncState->stats)
+       {
+               return;
+       }
 
        analysisData= (AnalysisDataEval*) syncState->analysisData;
+
+       g_queue_foreach(broadcast->events, &gfSum, &sum);
+       g_queue_foreach(broadcast->events, &gfSumSquares, &squaresSum);
+
+       analysisData->stats->broadcastNb++;
+       // Because of numerical errors, this can at times be < 0
+       y= squaresSum / g_queue_get_length(broadcast->events) - pow(sum /
+               g_queue_get_length(broadcast->events), 2.);
+       if (y > 0)
+       {
+               analysisData->stats->broadcastDiffSum+= sqrt(y);
+       }
 }
 
 
@@ -240,7 +354,7 @@ static void analyzeBroadcastEval(SyncState* const syncState, Broadcast* const br
  *   syncState     container for synchronization data.
  *
  * Returns:
- *   Factors[traceNb] synchronization factors for each trace
+ *   Factors[traceNb] identity factors for each trace
  */
 static GArray* finalizeAnalysisEval(SyncState* const syncState)
 {
@@ -285,28 +399,83 @@ static void printAnalysisStatsEval(SyncState* const syncState)
        printf("Synchronization evaluation analysis stats:\n");
        printf("\tsum of broadcast differential delays: %g\n",
                analysisData->stats->broadcastDiffSum);
+       printf("\taverage broadcast differential delays: %g\n",
+               analysisData->stats->broadcastDiffSum /
+               analysisData->stats->broadcastNb);
 
        printf("\tIndividual evaluation:\n"
-               "\t\tTrace pair  Inversions  Too fast    (No RTT info)\n");
+               "\t\tTrace pair  Inversions Too fast   (No RTT info) Total\n");
 
        for (i= 0; i < syncState->traceNb; i++)
        {
                for (j= i + 1; j < syncState->traceNb; j++)
                {
-                       TracePairStats* tpStats;
-                       const char* format= "\t\t%3d - %-3d   %-10u  %-10u  %u\n";
+                       MessageStats* messageStats;
+                       const char* format= "\t\t%3d - %-3d   %-10u %-10u %-10u    %u\n";
 
-                       tpStats= &analysisData->stats->allStats[i][j];
+                       messageStats= &analysisData->stats->messageStats[i][j];
 
-                       printf(format, i, j, tpStats->inversionNb, tpStats->tooFastNb,
-                               tpStats->noRTTInfoNb);
+                       printf(format, i, j, messageStats->inversionNb, messageStats->tooFastNb,
+                               messageStats->noRTTInfoNb, messageStats->total);
 
-                       tpStats= &analysisData->stats->allStats[j][i];
+                       messageStats= &analysisData->stats->messageStats[j][i];
 
-                       printf(format, j, i, tpStats->inversionNb, tpStats->tooFastNb,
-                               tpStats->noRTTInfoNb);
+                       printf(format, j, i, messageStats->inversionNb, messageStats->tooFastNb,
+                               messageStats->noRTTInfoNb, messageStats->total);
                }
        }
+
+       printf("\tRound-trip times:\n"
+               "\t\tHost pair                          RTT from exchanges  RTTs from file (ms)\n");
+       g_hash_table_foreach(analysisData->stats->exchangeRtt,
+               &ghfPrintExchangeRtt, analysisData->rttInfo);
+}
+
+
+/*
+ * A GHFunc for g_hash_table_foreach()
+ *
+ * Args:
+ *   key:          RttKey* where saddr < daddr
+ *   value:        double*, RTT estimated from exchanges
+ *   user_data     GHashTable* rttInfo
+ */
+static void ghfPrintExchangeRtt(gpointer key, gpointer value, gpointer user_data)
+{
+       char addr1[16], addr2[16];
+       struct RttKey* rttKey1= key;
+       struct RttKey rttKey2= {rttKey1->daddr, rttKey1->saddr};
+       double* fileRtt1, *fileRtt2;
+       GHashTable* rttInfo= user_data;
+
+       convertIP(addr1, rttKey1->saddr);
+       convertIP(addr2, rttKey1->daddr);
+
+       fileRtt1= g_hash_table_lookup(rttInfo, rttKey1);
+       fileRtt2= g_hash_table_lookup(rttInfo, &rttKey2);
+
+       printf("\t\t(%15s, %-15s) %-18.3f  ", addr1, addr2, *(double*) value * 1e3);
+
+       if (fileRtt1 || fileRtt2)
+       {
+               if (fileRtt1)
+               {
+                       printf("%.3f", *fileRtt1 * 1e3);
+               }
+               if (fileRtt1 && fileRtt2)
+               {
+                       printf(", ");
+               }
+               if (fileRtt2)
+               {
+                       printf("%.3f", *fileRtt2 * 1e3);
+               }
+       }
+       else
+       {
+               printf("-");
+       }
+       printf("\n");
 }
 
 
@@ -451,6 +620,9 @@ static void readRttInfo(GHashTable* rttInfo, FILE* rttStream)
                                addr.s_addr;
                }
 
+               *rtt/= 1e3;
+               g_debug("rttInfo, Inserting (%u, %u)->(%f)", rttKey->saddr,
+                       rttKey->daddr, *rtt);
                g_hash_table_insert(rttInfo, rttKey, rtt);
 
                positionStream(rttStream);
@@ -520,3 +692,41 @@ outEof:
                free(line);
        }
 }
+
+
+/*
+ * A GFunc for g_queue_foreach()
+ *
+ * Args:
+ *   data          Event*, a UDP broadcast event
+ *   user_data     double*, the running sum
+ *
+ * Returns:
+ *   Adds the time of the event to the sum
+ */
+static void gfSum(gpointer data, gpointer userData)
+{
+       Event* event= (Event*) data;
+
+       *(double*) userData+= event->wallTime.seconds + event->wallTime.nanosec /
+               1e9;
+}
+
+
+/*
+ * A GFunc for g_queue_foreach()
+ *
+ * Args:
+ *   data          Event*, a UDP broadcast event
+ *   user_data     double*, the running sum
+ *
+ * Returns:
+ *   Adds the square of the time of the event to the sum
+ */
+static void gfSumSquares(gpointer data, gpointer userData)
+{
+       Event* event= (Event*) data;
+
+       *(double*) userData+= pow(event->wallTime.seconds + event->wallTime.nanosec
+               / 1e9, 2.);
+}
This page took 0.029369 seconds and 4 git commands to generate.