mirror of
https://github.com/richb-hanover/OpenWrtScripts.git
synced 2026-03-30 10:44:32 +02:00
Copy betterspeedtest.sh from CeroWrtScripts (fixes a couple parameter passing problems)
This commit is contained in:
Rich Brown
parent
b461a94047
commit
52f0c9e2c5
1 changed files with 109 additions and 107 deletions
|
|
@ -21,135 +21,137 @@
|
|||
# GPLv2
|
||||
|
||||
# Summarize the contents of the ping's output file to show min, avg, median, max, etc.
|
||||
# input parameter ($1) file contains the output of the ping command
|
||||
# input parameter ($1) file contains the output of the ping command
|
||||
|
||||
summarize_pings() {
|
||||
|
||||
# Process the ping times, and summarize the results
|
||||
# grep to keep lines that have "time=", then sed to isolate the time stamps, and sort them
|
||||
# awk builds an array of those values, and prints first & last (which are min, max)
|
||||
# and computes average.
|
||||
# If the number of samples is >= 10, also computes median, and 10th and 90th percentile readings
|
||||
sed 's/^.*time=\([^ ]*\) ms/\1/' < $1 | grep -v "PING" | sort -n | \
|
||||
awk 'BEGIN {numdrops=0; numrows=0;} \
|
||||
{ \
|
||||
if ( $0 ~ /timeout/ ) { \
|
||||
numdrops += 1; \
|
||||
} else { \
|
||||
numrows += 1; \
|
||||
arr[numrows]=$1; sum+=$1; \
|
||||
} \
|
||||
} \
|
||||
END { \
|
||||
pc10="-"; pc90="-"; med="-"; \
|
||||
if (numrows == 0) {numrows=1} \
|
||||
if (numrows>=10) \
|
||||
{ ix=int(numrows/10); pc10=arr[ix]; ix=int(numrows*9/10);pc90=arr[ix]; \
|
||||
if (numrows%2==1) med=arr[(numrows+1)/2]; else med=(arr[numrows/2]); \
|
||||
}; \
|
||||
pktloss = numdrops/(numdrops+numrows) * 100; \
|
||||
printf(" Latency: (in msec, %d pings, %4.2f%% packet loss)\n Min: %4.3f \n 10pct: %4.3f \n Median: %4.3f \n Avg: %4.3f \n 90pct: %4.3f \n Max: %4.3f\n", numrows, pktloss, arr[1], pc10, med, sum/numrows, pc90, arr[numrows] )\
|
||||
}'
|
||||
summarize_pings() {
|
||||
|
||||
# Process the ping times, and summarize the results
|
||||
# grep to keep lines that have "time=", then sed to isolate the time stamps, and sort them
|
||||
# awk builds an array of those values, and prints first & last (which are min, max)
|
||||
# and computes average.
|
||||
# If the number of samples is >= 10, also computes median, and 10th and 90th percentile readings
|
||||
sed 's/^.*time=\([^ ]*\) ms/\1/' < $1 | grep -v "PING" | sort -n | \
|
||||
awk 'BEGIN {numdrops=0; numrows=0;} \
|
||||
{ \
|
||||
if ( $0 ~ /timeout/ ) { \
|
||||
numdrops += 1; \
|
||||
} else { \
|
||||
numrows += 1; \
|
||||
arr[numrows]=$1; sum+=$1; \
|
||||
} \
|
||||
} \
|
||||
END { \
|
||||
pc10="-"; pc90="-"; med="-"; \
|
||||
if (numrows == 0) {numrows=1} \
|
||||
if (numrows>=10) \
|
||||
{ ix=int(numrows/10); pc10=arr[ix]; ix=int(numrows*9/10);pc90=arr[ix]; \
|
||||
if (numrows%2==1) med=arr[(numrows+1)/2]; else med=(arr[numrows/2]); \
|
||||
}; \
|
||||
pktloss = numdrops/(numdrops+numrows) * 100; \
|
||||
printf(" Latency: (in msec, %d pings, %4.2f%% packet loss)\n Min: %4.3f \n 10pct: %4.3f \n Median: %4.3f \n Avg: %4.3f \n 90pct: %4.3f \n Max: %4.3f\n", numrows, pktloss, arr[1], pc10, med, sum/numrows, pc90, arr[numrows] )\
|
||||
}'
|
||||
}
|
||||
|
||||
# Print a line of dots as a progress indicator.
|
||||
|
||||
print_dots() {
|
||||
while : ; do
|
||||
printf "."
|
||||
sleep 1s
|
||||
done
|
||||
while : ; do
|
||||
printf "."
|
||||
sleep 1s
|
||||
done
|
||||
}
|
||||
|
||||
# Stop the current print_dots() process
|
||||
|
||||
kill_dots() {
|
||||
# echo "Pings: $ping_pid Dots: $dots_pid"
|
||||
kill -9 $dots_pid
|
||||
wait $dots_pid 2>/dev/null
|
||||
dots_pid=0
|
||||
# echo "Pings: $ping_pid Dots: $dots_pid"
|
||||
kill -9 $dots_pid
|
||||
wait $dots_pid 2>/dev/null
|
||||
dots_pid=0
|
||||
}
|
||||
|
||||
# Stop the current ping process
|
||||
|
||||
kill_pings() {
|
||||
# echo "Pings: $ping_pid Dots: $dots_pid"
|
||||
kill -9 $ping_pid
|
||||
wait $ping_pid 2>/dev/null
|
||||
ping_pid=0
|
||||
# echo "Pings: $ping_pid Dots: $dots_pid"
|
||||
kill -9 $ping_pid
|
||||
wait $ping_pid 2>/dev/null
|
||||
ping_pid=0
|
||||
}
|
||||
|
||||
# Stop the current pings and dots, and exit
|
||||
# ping command catches (and handles) first Ctrl-C, so you have to hit it again...
|
||||
kill_pings_and_dots_and_exit() {
|
||||
kill_dots
|
||||
echo "\nStopped"
|
||||
exit 1
|
||||
kill_dots
|
||||
echo "\nStopped"
|
||||
exit 1
|
||||
}
|
||||
|
||||
# ------------ Measure speed and ping latency for one direction ----------------
|
||||
#
|
||||
# Called with measure_direction "Download" $TESTHOST $TESTDUR $PINGHOST
|
||||
# Call measure_direction() with single parameter - "Download" or " Upload"
|
||||
# The function gets other info from globals determined from command-line arguments
|
||||
|
||||
measure_direction() {
|
||||
|
||||
# Create temp files
|
||||
PINGFILE=`mktemp /tmp/measurepings.XXXXXX` || exit 1
|
||||
SPEEDFILE=`mktemp /tmp/netperfUL.XXXXXX` || exit 1
|
||||
|
||||
# Start dots
|
||||
print_dots &
|
||||
dots_pid=$!
|
||||
# echo "Dots PID: $dots_pid"
|
||||
# Create temp files
|
||||
PINGFILE=`mktemp /tmp/measurepings.XXXXXX` || exit 1
|
||||
SPEEDFILE=`mktemp /tmp/netperfUL.XXXXXX` || exit 1
|
||||
DIRECTION=$1
|
||||
|
||||
# Start Ping
|
||||
if [ $TESTPROTO -eq "-4" ]
|
||||
then
|
||||
ping $4 > $PINGFILE &
|
||||
else
|
||||
ping6 $4 > $PINGFILE &
|
||||
fi
|
||||
ping_pid=$!
|
||||
# echo "Ping PID: $ping_pid"
|
||||
|
||||
# Start netperf with the proper direction
|
||||
if [ $1 = "Download" ]; then
|
||||
dir="TCP_MAERTS"
|
||||
else
|
||||
dir="TCP_STREAM"
|
||||
fi
|
||||
|
||||
# Start $MAXSESSIONS datastreams between netperf client and the netperf server
|
||||
# netperf writes the sole output value (in Mbps) to stdout when completed
|
||||
for i in $( seq $MAXSESSIONS )
|
||||
do
|
||||
netperf $TESTPROTO -H $TESTHOST -t $dir -l $TESTDUR -v 0 -P 0 >> $SPEEDFILE &
|
||||
#echo "Starting $!"
|
||||
done
|
||||
|
||||
# Wait until each of the background netperf processes completes
|
||||
# echo "Process is $$"
|
||||
# echo `pgrep -P $$ netperf `
|
||||
# Start dots
|
||||
print_dots &
|
||||
dots_pid=$!
|
||||
# echo "Dots PID: $dots_pid"
|
||||
|
||||
for i in `pgrep -P $$ netperf ` # gets a list of PIDs for child processes named 'netperf'
|
||||
do
|
||||
#echo "Waiting for $i"
|
||||
wait $i
|
||||
done
|
||||
# Start Ping
|
||||
if [ $TESTPROTO -eq "-4" ]
|
||||
then
|
||||
ping $PINGHOST > $PINGFILE &
|
||||
else
|
||||
ping6 $PINGHOST > $PINGFILE &
|
||||
fi
|
||||
ping_pid=$!
|
||||
# echo "Ping PID: $ping_pid"
|
||||
|
||||
# Start netperf with the proper direction
|
||||
if [ $DIRECTION = "Download" ]; then
|
||||
dir="TCP_MAERTS"
|
||||
else
|
||||
dir="TCP_STREAM"
|
||||
fi
|
||||
|
||||
# Start $MAXSESSIONS datastreams between netperf client and the netperf server
|
||||
# netperf writes the sole output value (in Mbps) to stdout when completed
|
||||
for i in $( seq $MAXSESSIONS )
|
||||
do
|
||||
netperf $TESTPROTO -H $TESTHOST -t $dir -l $TESTDUR -v 0 -P 0 >> $SPEEDFILE &
|
||||
# echo "Starting PID $! params: $TESTPROTO -H $TESTHOST -t $dir -l $TESTDUR -v 0 -P 0 >> $SPEEDFILE"
|
||||
done
|
||||
|
||||
# Wait until each of the background netperf processes completes
|
||||
# echo "Process is $$"
|
||||
# echo `pgrep -P $$ netperf `
|
||||
|
||||
# Print TCP Download speed
|
||||
echo ""
|
||||
echo " $1: " `awk '{s+=$1} END {print s}' $SPEEDFILE` Mbps
|
||||
for i in `pgrep -P $$ netperf ` # gets a list of PIDs for child processes named 'netperf'
|
||||
do
|
||||
#echo "Waiting for $i"
|
||||
wait $i
|
||||
done
|
||||
|
||||
# When netperf completes, stop the dots and the pings
|
||||
kill_pings
|
||||
kill_dots
|
||||
# Print TCP Download speed
|
||||
echo ""
|
||||
echo " $1: " `awk '{s+=$1} END {print s}' $SPEEDFILE` Mbps
|
||||
|
||||
# Summarize the ping data
|
||||
summarize_pings $PINGFILE
|
||||
# When netperf completes, stop the dots and the pings
|
||||
kill_pings
|
||||
kill_dots
|
||||
|
||||
rm $PINGFILE
|
||||
rm $SPEEDFILE
|
||||
# Summarize the ping data
|
||||
summarize_pings $PINGFILE
|
||||
|
||||
rm $PINGFILE
|
||||
rm $SPEEDFILE
|
||||
}
|
||||
|
||||
# ------- Start of the main routine --------
|
||||
|
|
@ -167,7 +169,7 @@ TESTHOST="netperf.bufferbloat.net"
|
|||
TESTDUR="60"
|
||||
PINGHOST="gstatic.com"
|
||||
MAXSESSIONS="5"
|
||||
TESTPROTO=-4
|
||||
TESTPROTO="-4"
|
||||
|
||||
# read the options
|
||||
|
||||
|
|
@ -175,15 +177,15 @@ TESTPROTO=-4
|
|||
while [ $# -gt 0 ]
|
||||
do
|
||||
case "$1" in
|
||||
-4|-6) TESTPROTO=$1 ; shift 1 ;;
|
||||
-4|-6) TESTPROTO=$1 ; shift 1 ;;
|
||||
-H|--host)
|
||||
case "$2" in
|
||||
"") echo "Missing hostname" ; exit 1 ;;
|
||||
*) TESTHOST=$2 ; shift 2 ;;
|
||||
esac ;;
|
||||
-t|--time)
|
||||
case "$2" in
|
||||
"") echo "Missing duration" ; exit 1 ;;
|
||||
case "$2" in
|
||||
"") echo "Missing duration" ; exit 1 ;;
|
||||
*) TESTDUR=$2 ; shift 2 ;;
|
||||
esac ;;
|
||||
-p|--ping)
|
||||
|
|
@ -192,10 +194,10 @@ do
|
|||
*) PINGHOST=$2 ; shift 2 ;;
|
||||
esac ;;
|
||||
-n|--number)
|
||||
case "$2" in
|
||||
"") echo "Missing number of simultaneous sessions" ; exit 1 ;;
|
||||
*) MAXSESSIONS=$2 ; shift 2 ;;
|
||||
esac ;;
|
||||
case "$2" in
|
||||
"") echo "Missing number of simultaneous sessions" ; exit 1 ;;
|
||||
*) MAXSESSIONS=$2 ; shift 2 ;;
|
||||
esac ;;
|
||||
--) shift ; break ;;
|
||||
*) echo "Usage: sh betterspeedtest.sh [-4 -6] [ -H netperf-server ] [ -t duration ] [ -p host-to-ping ] [ -n simultaneous-sessions ]" ; exit 1 ;;
|
||||
esac
|
||||
|
|
@ -205,9 +207,9 @@ done
|
|||
|
||||
if [ $TESTPROTO -eq "-4" ]
|
||||
then
|
||||
PROTO="ipv4"
|
||||
PROTO="ipv4"
|
||||
else
|
||||
PROTO="ipv6"
|
||||
PROTO="ipv6"
|
||||
fi
|
||||
DATE=`date "+%Y-%m-%d %H:%M:%S"`
|
||||
echo "$DATE Testing against $TESTHOST ($PROTO) with $MAXSESSIONS simultaneous sessions while pinging $PINGHOST ($TESTDUR seconds in each direction)"
|
||||
|
|
@ -215,6 +217,6 @@ echo "$DATE Testing against $TESTHOST ($PROTO) with $MAXSESSIONS simultaneous se
|
|||
# Catch a Ctl-C and stop the pinging and the print_dots
|
||||
trap kill_pings_and_dots_and_exit HUP INT TERM
|
||||
|
||||
measure_direction "Download" $TESTHOST $TESTDUR $PINGHOST $MAXSESSIONS
|
||||
measure_direction " Upload" $TESTHOST $TESTDUR $PINGHOST $MAXSESSIONS
|
||||
measure_direction "Download"
|
||||
measure_direction " Upload"
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue