Merge branch 'master' of rtime.felk.cvut.cz:/can-benchmark
authorMichal Sojka <sojkam1@fel.cvut.cz>
Fri, 17 Dec 2010 15:01:27 +0000 (16:01 +0100)
committerMichal Sojka <sojkam1@fel.cvut.cz>
Fri, 17 Dec 2010 15:01:27 +0000 (16:01 +0100)
gw-tests/filterlen.sh [new file with mode: 0755]
gw-tests/filterlenshort.sh [new file with mode: 0755]
gw-tests/lib.sh

diff --git a/gw-tests/filterlen.sh b/gw-tests/filterlen.sh
new file mode 100755 (executable)
index 0000000..0fe9729
--- /dev/null
@@ -0,0 +1,41 @@
+#!/bin/bash
+
+. lib.sh
+
+ids="0 $(seq 127 128 2047)"
+
+
+main() {
+    lastid=0
+    for i in $ids; do
+       sshgw "for i in \$(seq $lastid $i); do cangw -A -s can0 -d can1 -f \$(printf %x \$i):7ff; done"
+       lastid=$((i+1))
+       latester -d can0 -d can1 -d can2 -c $COUNT -i 0 $(traffic_and_length 2) -n len-$i
+    done
+}
+
+ADDITIONAL_PLOTS=log
+
+plot_cmds() {
+    if [[ "$1" = "" ]]; then
+       range=0.08:0.8
+       echo "set logscale y"
+    else
+       range=0.05:100
+       echo "set logscale xy"
+    fi
+    cat <<EOF
+set title "Different lengths of filter list, only the last one matches"
+set grid xtics mxtics ytics mytics lw 1, lw 0.5
+set xlabel "Time [ms]"
+set ylabel "Latency profile [messages]"
+plot [$range] [1:$COUNT] \\
+EOF
+    lt=1
+    for i in $ids; do
+       echo_plot "\"len-$i-hist.txt\" with lp lt $lt title \"List length $((i+1))\""
+        lt=$((lt+1))
+    done
+}
+    
+test_end
diff --git a/gw-tests/filterlenshort.sh b/gw-tests/filterlenshort.sh
new file mode 100755 (executable)
index 0000000..05a1e5e
--- /dev/null
@@ -0,0 +1,41 @@
+#!/bin/bash
+
+. lib.sh
+
+ids="$(seq 0 20 300)"
+
+
+main() {
+    lastid=0
+    for i in $ids; do
+       sshgw "for i in \$(seq $lastid $i); do cangw -A -s can0 -d can1 -f \$(printf %x \$i):7ff; done"
+       lastid=$((i+1))
+       latester -d can0 -d can1 -d can2 -c $COUNT -i 0 $(traffic_and_length 2) -n len-$i
+    done
+}
+
+ADDITIONAL_PLOTS=log
+
+plot_cmds() {
+    if [[ "$1" = "" ]]; then
+       range=0.1:0.3
+       echo "set logscale y"
+    else
+       range=0.05:100
+       echo "set logscale xy"
+    fi
+    cat <<EOF
+set title "Different lengths of filter list, only the last one matches"
+set grid xtics mxtics ytics mytics lw 1, lw 0.5
+set xlabel "Time [ms]"
+set ylabel "Latency profile [messages]"
+plot [$range] [1:$COUNT] \\
+EOF
+    lt=1
+    for i in $ids; do
+       echo_plot "\"len-$i-hist.txt\" with lp lt $lt title \"List length $((i+1))\""
+        lt=$((lt+1))
+    done
+}
+    
+test_end
index 5afc021..8cf99e9 100644 (file)
@@ -55,13 +55,13 @@ _plot() {
        if [ -z "$OPT_NO_X11" ]; then
            echo "set terminal x11 enhanced; $(< plot.gp)" | gnuplot -persist
        fi
+       test "$(gnuplot --version)" = "gnuplot 4.2 patchlevel 5 " && continue
        echo "set terminal pdfcairo solid color enhanced; " \
             "set output \"graph$i.pdf\";" \
             "set pointsize 0.5;" \
            "$(< plot.gp)" | gnuplot
        echo 'set terminal pngcairo color enhanced size 750,525 font ",10" ;' \
            "$(< plot.gp)" | gnuplot > graph$i.png
-       mkdir -p thumb
        convert -resize 150x105 -gamma 0.5 -quality 90 -type Palette -depth 8 graph$i.png tgraph$i.png
 #     echo 'set terminal pngcairo color enhanced size 150,105 font ",1";' \
 #      "$(< plot.gp)" | gnuplot > thumb/${testname}$i.png