libgnunetchat

commit 9a8bf6a30e6e0696163141cf0c0088fb6ac61b4b
parent 1ceb6904458fe14bda8ae1f210c2b8c59455e137
Author: Jacki <jacki@thejackimonster.de>
Date:   Mon,  3 Mar 2025 21:49:59 +0100

Add scripts to convert log data from ping tool into csv tables

Signed-off-by: Jacki <jacki@thejackimonster.de>

Diffstat:
A
benchmark/tools/log2csv.sh
 | 
21
+++++++++++++++++++++
A
benchmark/tools/transpose.sh
 | 
17
+++++++++++++++++

2 files changed, 38 insertions(+), 0 deletions(-)
diff --git a/benchmark/tools/log2csv.sh b/benchmark/tools/log2csv.sh
@@ -0,0 +1,21 @@
+#!/bin/sh
+LOG_FILE=$1
+shift 1
+
+TRANSPOSE=$(dirname $0)/transpose.sh
+
+CSV_FILE="$LOG_FILE.csv"
+CSV_T_FILE="$CSV_FILE.T"
+
+echo "\"Iteration\" $(cat $LOG_FILE | grep mess | awk '{print NR}' | $TRANSPOSE)" > $CSV_T_FILE
+echo "\"Messages\" $(cat $LOG_FILE | grep mess | awk '{print $1}' | $TRANSPOSE)" >> $CSV_T_FILE
+echo "\"Receipients\" $(cat $LOG_FILE | grep mess | awk '{print $4}' | $TRANSPOSE)" >> $CSV_T_FILE
+echo "\"Duration_(in_ms)\" $(cat $LOG_FILE | grep mess | awk '{print $10}' | rev | cut -c3- | rev | $TRANSPOSE)" >> $CSV_T_FILE
+echo "\"Minimum_latency_(in_ms)\" $(cat $LOG_FILE | grep rtt | awk '{print $4}' | tr '/' ' ' | awk '{print $1}' | $TRANSPOSE)" >> $CSV_T_FILE
+echo "\"Average_latency_(in_ms)\" $(cat $LOG_FILE | grep rtt | awk '{print $4}' | tr '/' ' ' | awk '{print $2}' | $TRANSPOSE)" >> $CSV_T_FILE
+echo "\"Maximum_latency_(in_ms)\" $(cat $LOG_FILE | grep rtt | awk '{print $4}' | tr '/' ' ' | awk '{print $3}' | $TRANSPOSE)" >> $CSV_T_FILE
+echo "\"Variance_of_latency_(in_ms)\" $(cat $LOG_FILE | grep rtt | awk '{print $4}' | tr '/' ' ' | awk '{print $4}' | $TRANSPOSE)" >> $CSV_T_FILE
+
+cat $CSV_T_FILE | $TRANSPOSE | tr _ ' ' > $CSV_FILE
+rm $CSV_T_FILE
+
diff --git a/benchmark/tools/transpose.sh b/benchmark/tools/transpose.sh
@@ -0,0 +1,17 @@
+#!/bin/sh
+awk '
+{
+    for (i=1; i<=NF; i++)  {
+        a[NR,i] = $i
+    }
+}
+NF>p { p = NF }
+END {
+    for(j=1; j<=p; j++) {
+        str=a[1,j]
+        for(i=2; i<=NR; i++){
+            str=str" "a[i,j];
+        }
+        print str
+    }
+}' $@