diff options
Diffstat (limited to 'utils/buffer_size.sh')
-rwxr-xr-x | utils/buffer_size.sh | 32 |
1 files changed, 0 insertions, 32 deletions
diff --git a/utils/buffer_size.sh b/utils/buffer_size.sh deleted file mode 100755 index 02984b2..0000000 --- a/utils/buffer_size.sh +++ /dev/null @@ -1,32 +0,0 @@ -#!/bin/sh - -NO_ARGS=0 -OPTERROR=65 -if [ $# -eq "$NO_ARGS" ] # Script invoked with no command-line args? -then - echo "Usage: `basename $0` File.log" - exit $OPTERROR # Exit and explain usage, if no argument(s) given. -fi -logFile=$1 - -egrep 'Buffer has [0-9]* packets left' $logFile |\ - awk 'BEGIN {print " date sz"} {print s++ " " $1 "::" $2 " " $10}' > data - -R --vanilla --no-save --slave <<RSCRIPT -lst <- read.table("data") -attach(lst) -summary(sz) -png(filename="buffer.png", width=1024) -dates <- strptime(as.character(date), "%Y-%m-%d::%H:%M:%S") -plot(dates, sz, type='l', - main="Mauve server: Maximum buffer size per second", - xlab="Time", - ylab="Maximum number of packets waiting to be processed") -abline(h=1.05, col="red") -abline(h=mean(sz), col="blue") -RSCRIPT -img=`which qiv` -if [ $? != 0 ] -then echo "Cannot display image here" -else $img buffer.png -fi |