Set gw txqueuelen to avoid ENOBUFS errors

[can-benchmark.git] / gw-tests / lib.sh

diff --git a/gw-tests/lib.sh b/gw-tests/lib.sh
index 46fc5c18ce5cb0fbc036a59604ff5f67c36e6c7a..c5492e886da4ccf11637bdefcd57605513e7accf 100644 (file)
--- a/gw-tests/lib.sh
+++ b/gw-tests/lib.sh
@@ -33,7 +33,11 @@ PATH=$PWD/../_compiled/bin/:$PATH
 sshgw() {
     local socket="$HOME/.ssh/cangw-connection"
 
-    if [[ "$NO_GW_NEEDED" ]]; then return; fi
+    if [[ "$1" = "-f" ]]; then
+           shift
+    else
+       if [[ "$NO_GW_NEEDED" ]]; then return; fi
+    fi
 
     if [[ ! -S $socket ]] || ! ssh -x -a -S $socket root@192.168.2.3 true; then
        # Create master connection to speed up subsequenct command.
@@ -124,6 +128,7 @@ _measure() {
        sshgw 'if pid=`pidof sirq-net-rx/0`; then chrt -p -f 49 $pid > /dev/null; fi'
        sshgw 'if pid=`pidof sirq-net-tx/0`; then chrt -p -f 49 $pid > /dev/null; fi'
        # Set the length of qdisc queue to avoid ENOBUFS errors
+       sshgw 'ifconfig can0 txqueuelen 1000; ifconfig can1 txqueuelen 1000'
        ifconfig can0 txqueuelen 200
        ifconfig can1 txqueuelen 200
        cleanupgw
@@ -138,9 +143,10 @@ _measure() {
        kill_load
     fi
 
-    # Create a plot script at the end to signalize that the
-    # measurement was successfully finished
-    cat > plot.sh <<-EOF
+    if [ ! "$SKIPPED" ]; then
+        # Create a plot script at the end to signalize that the
+        # measurement was successfully finished
+       cat > plot.sh <<-EOF
        #!/bin/bash
        export kvers=$kvers
        export hostkvers=$hostkvers
@@ -149,7 +155,8 @@ _measure() {
        cd \$(dirname \$0)/$(dirname $script)
        exec ./$(basename $script) --plot "\$@"
        EOF
-    chmod +x plot.sh
+       chmod +x plot.sh
+    fi
 }
 
 
@@ -163,7 +170,7 @@ _run() {
     else loads=${load:-$OPT_LOAD}
     fi
     hostkvers=${hostkvers:-host-$(uname -r)}
-    kvers=${kvers:-$(sshgw uname -r)}
+    kvers=${kvers:-$(sshgw -f uname -r)}
     test=$(basename $0 .sh)
     for load in $loads; do
     for traffic in $traffics; do