fwp-timing measures 95th and 99th percentile of communication delay

diff --git a/fwp/tests/timing/fwp-timing.c b/fwp/tests/timing/fwp-timing.c
index 953ac1f86ab4624e38ac2790601e63733ca8bb70..d2518a44392b25c6f84f063b5f034899ff9f3af4 100644 (file)
--- a/fwp/tests/timing/fwp-timing.c
+++ b/fwp/tests/timing/fwp-timing.c
@@ -447,9 +447,10 @@ void print_stat(bool final)
        printf("Sent: %5d  Received: %5d  Lost: %5d Max: %8.3f ms",
               stats.sent, stats.received, stats.lost, hist.max/1000.0);
        if (final) {
-               printf("  Packetloss: %7.3f %%  90%%: %8.3f ms\n",
+               printf("  Packetloss: %7.3f %%  95%%: %8.3f ms  99%%: %8.3f ms\n",
                       100.0*stats.lost/stats.sent,
-                      hist_get_percentile(&hist, 90)/1000.0);
+                      hist_get_percentile(&hist, 95)/1000.0,
+                      hist_get_percentile(&hist, 99)/1000.0);
        }
        else
                printf("\r");

diff --git a/fwp/tests/timing/fwp-timing.gnuplot b/fwp/tests/timing/fwp-timing.gnuplot
index 721a0500f97bc91a22f38c87b55adddda455b78e..c61d85c57fd61884512c38f3e011cc93e40b9dc2 100644 (file)
--- a/fwp/tests/timing/fwp-timing.gnuplot
+++ b/fwp/tests/timing/fwp-timing.gnuplot
@@ -1,3 +1,4 @@
+set key top left
 set xlabel "Number of simultaneous streams"
 set ylabel "Time [ms]
 set yrange [0:]
@@ -7,5 +8,6 @@ set y2tics
 set grid
 
 plot "./fwp-timing.dat" using 1:2 title "Maximal delay [ms]" with lp,\
-     "./fwp-timing.dat" using 1:4 title "90% [ms]" with lp,\
+     "./fwp-timing.dat" using 1:4 title "95th percentile [ms]" with lp,\
+     "./fwp-timing.dat" using 1:5 title "99th percentile [ms]" with lp,\
      "./fwp-timing.dat" using 1:3 title "Packet loss [%]" with lp axis x1y2

diff --git a/fwp/tests/timing/fwp-timing.pl b/fwp/tests/timing/fwp-timing.pl
index 2232f5305a649a629421aa7e56c4a7488ad23e46..009c72c2c03c4ee9e1affaec04576c99074acf9a 100755 (executable)
--- a/fwp/tests/timing/fwp-timing.pl
+++ b/fwp/tests/timing/fwp-timing.pl
@@ -46,7 +46,7 @@ for($i=1; $i<=$max; $i++) {
     print $out;
     my @result;
     if ($? == 0) {
-       @result = $out =~ /Max: *([0-9.]+).*Packetloss: *([0-9.]+).*90%: *([0-9.]+)/;
+       @result = $out =~ /Max: *([0-9.]+).*Packetloss: *([0-9.]+).*95%: *([0-9.]+).*99%: *([0-9.]+)/;
     } else {
        @result = ();
     }