1 #!/bin/bash 2 # description: system-wide r/w top 3 # args: [interval] 4 n_args=0 5 for i in "$@" 6 do 7 if expr match "$i" "-" > /dev/null ; then 8 break 9 fi 10 n_args=$(( $n_args + 1 )) 11 done 12 if [ "$n_args" -gt 1 ] ; then 13 echo "usage: rwtop-report [interval]" 14 exit 15 fi 16 if [ "$n_args" -gt 0 ] ; then 17 interval=$1 18 shift 19 fi 20 perf script $@ -s "$PERF_EXEC_PATH"/scripts/perl/rwtop.pl $interval 21