bart | f33ce89 | 2008-06-07 11:40:14 +0000 | [diff] [blame] | 1 | #!/bin/bash |
| 2 | |
| 3 | ######################## |
| 4 | # Function definitions # |
| 5 | ######################## |
| 6 | |
| 7 | ## Print the logarithm base 2 of $1 on stdout. |
| 8 | function log2 { |
| 9 | local i |
| 10 | |
| 11 | for ((i=0;i<64;i++)) |
| 12 | do |
| 13 | if [ $((2**i)) = $1 ]; then |
| 14 | echo $i |
| 15 | return 0 |
| 16 | fi |
| 17 | done |
| 18 | echo error |
| 19 | return 1 |
| 20 | } |
| 21 | |
| 22 | ## Print the size of the level 2 cache in bytes on stdout. |
| 23 | function get_cache_size { |
| 24 | local s |
bart | 3158c5d | 2008-06-21 08:07:40 +0000 | [diff] [blame] | 25 | if [ -e /sys/devices/system/cpu/cpu0/cache/index2/size ]; then |
| 26 | s="$(</sys/devices/system/cpu/cpu0/cache/index2/size)" |
| 27 | else |
| 28 | s="$(cat /proc/cpuinfo|while read a b c d e ; do if [ "$a" = cache -a "$b" = size ]; then echo $d $e; break; fi; done)" |
| 29 | s="${s%B}" |
| 30 | fi |
bart | f33ce89 | 2008-06-07 11:40:14 +0000 | [diff] [blame] | 31 | if [ "${s%M}" != "$s" ]; then |
| 32 | echo $((${s%M}*1024*1024)) |
| 33 | elif [ "${s%K}" != "$s" ]; then |
| 34 | echo $((${s%K}*1024)) |
| 35 | else |
| 36 | echo $s |
| 37 | fi |
| 38 | } |
| 39 | |
| 40 | ## Read a stream of numbers from stdin (one per line), and print the average |
| 41 | # and standard deviation. |
| 42 | function avgstddev { |
bart | 42438ac | 2008-07-10 13:57:56 +0000 | [diff] [blame^] | 43 | awk '{n++;m=NF;for(i=1;i<=NF;i++){sum[i]+=$i;sumsq[i]+=$i*$i}}END{for(i=1;i<=m;i++){d=sumsq[i]/n-sum[i]*sum[i]/n/n;printf "%.2f %.2f ",sum[i]/n,(d>0?sqrt(d):0.01)}}' |
bart | ee17ad6 | 2008-06-18 13:31:05 +0000 | [diff] [blame] | 44 | } |
| 45 | |
| 46 | ## Query the virtual memory size for the last invocation of command $1 from |
| 47 | # the information logged by the kernel (BSD process accounting). |
| 48 | function query_cmd_vsz { |
bart | c7eb591 | 2008-06-18 16:07:00 +0000 | [diff] [blame] | 49 | local pacct |
| 50 | |
bart | ee17ad6 | 2008-06-18 13:31:05 +0000 | [diff] [blame] | 51 | if [ ! -e /usr/sbin/dump-acct ]; then |
| 52 | echo "Error: userspace tools for BSD process accounting have not been" >&2 |
| 53 | echo "installed. Please install the acct package (Debian systems)." >&2 |
| 54 | return 1 |
| 55 | fi |
| 56 | |
bart | c7eb591 | 2008-06-18 16:07:00 +0000 | [diff] [blame] | 57 | if [ -e /var/log/account/pacct ]; then |
| 58 | pacct=/var/log/account/pacct |
| 59 | elif [ -e /var/account/pacct ]; then |
| 60 | pacct=/var/account/pacct |
| 61 | else |
| 62 | echo "Where is the pacct file ?" >&2 |
| 63 | return 1 |
| 64 | fi |
| 65 | /usr/sbin/dump-acct "${pacct}" | \ |
| 66 | grep -- "^$(basename "$1").*|v3|" | \ |
bart | ee17ad6 | 2008-06-18 13:31:05 +0000 | [diff] [blame] | 67 | cut -f8 -d'|' | \ |
| 68 | tail -n 1 |
| 69 | } |
| 70 | |
| 71 | ## Query the virtual memory size for the last invocation of command $1 from |
| 72 | # the information logged by the kernel (BSD process accounting). |
| 73 | function query_vsz { |
| 74 | local cmd tool |
| 75 | |
| 76 | cmd="$(basename "$1")" |
| 77 | if [ "${cmd}" = "vg-in-place" ]; then |
| 78 | tool="tool-not-found" |
| 79 | for arg in "${@}" |
| 80 | do |
| 81 | if [ "${arg#--tool=}" != "${arg}" ]; then |
| 82 | tool="${arg#--tool=}" |
| 83 | break |
| 84 | fi |
| 85 | done |
| 86 | vsz_tool="$(query_cmd_vsz "${tool}")" |
| 87 | awk "END{print $(query_cmd_vsz ${cmd}) + ${vsz_tool:-0}}" \ |
| 88 | </dev/null |
| 89 | else |
| 90 | query_cmd_vsz "${cmd}" |
| 91 | fi |
bart | f33ce89 | 2008-06-07 11:40:14 +0000 | [diff] [blame] | 92 | } |
| 93 | |
| 94 | ## Echo all arguments on stderr, run the command passed in $1 .. ${$#} three |
bart | 8a2cd9b | 2008-06-19 07:49:49 +0000 | [diff] [blame] | 95 | # times, pass the output of ${test_input} -p${p} to the command, write the |
bart | f33ce89 | 2008-06-07 11:40:14 +0000 | [diff] [blame] | 96 | # command output to the file specified in ${test_output}, and print the |
| 97 | # runtime of the command on stdout. |
| 98 | function measure_runtime { |
bart | ee17ad6 | 2008-06-18 13:31:05 +0000 | [diff] [blame] | 99 | local i |
| 100 | |
bart | f33ce89 | 2008-06-07 11:40:14 +0000 | [diff] [blame] | 101 | echo "$@" >&2 |
bart | 42438ac | 2008-07-10 13:57:56 +0000 | [diff] [blame^] | 102 | if [ "${test_output}" != "" ]; then |
| 103 | echo "$@" >"${test_output}" |
| 104 | fi |
bart | f33ce89 | 2008-06-07 11:40:14 +0000 | [diff] [blame] | 105 | for ((i=0;i<3;i++)) |
| 106 | do |
bart | 8a2cd9b | 2008-06-19 07:49:49 +0000 | [diff] [blame] | 107 | echo -n "$("${test_input:-true}" $p | \ |
bart | f33ce89 | 2008-06-07 11:40:14 +0000 | [diff] [blame] | 108 | /usr/bin/time --format="%e" "$@" 2>&1 | \ |
bart | 42438ac | 2008-07-10 13:57:56 +0000 | [diff] [blame^] | 109 | tee -a "${test_output:-/dev/null}" | \ |
bart | ee17ad6 | 2008-06-18 13:31:05 +0000 | [diff] [blame] | 110 | tail -n 1) " |
| 111 | query_vsz "$@" |
bart | f33ce89 | 2008-06-07 11:40:14 +0000 | [diff] [blame] | 112 | done |
| 113 | } |
| 114 | |
bart | ee17ad6 | 2008-06-18 13:31:05 +0000 | [diff] [blame] | 115 | ## Print the average runtime of the command passed in $5 .. ${$#}, the ratio |
| 116 | # of the runtime to $1 +/- $2 and the ratio of the VSZ to $3 +/- $4. |
bart | f33ce89 | 2008-06-07 11:40:14 +0000 | [diff] [blame] | 117 | function print_runtime_ratio { |
bart | ee17ad6 | 2008-06-18 13:31:05 +0000 | [diff] [blame] | 118 | local tmp avg1="$1" stddev1="$2" vsz1="$3" vszdev1="$4" |
| 119 | local avg2 stddev2 vsz2 vszdev2 |
bart | e7b5c27 | 2008-06-18 08:56:04 +0000 | [diff] [blame] | 120 | |
bart | ee17ad6 | 2008-06-18 13:31:05 +0000 | [diff] [blame] | 121 | if [ "${avg1}" = "" -o "${stddev1}" = "" -o "${vsz1}" = "" -o "${vszdev1}" = "" ]; then |
| 122 | echo "Error: invalid arguments ($@)." |
| 123 | exit 1 |
| 124 | fi |
| 125 | |
| 126 | shift |
| 127 | shift |
bart | e7b5c27 | 2008-06-18 08:56:04 +0000 | [diff] [blame] | 128 | shift |
| 129 | shift |
bart | f33ce89 | 2008-06-07 11:40:14 +0000 | [diff] [blame] | 130 | |
| 131 | tmp="/tmp/test-timing.$$" |
| 132 | rm -f "${tmp}" |
| 133 | |
| 134 | measure_runtime "$@" | avgstddev > "$tmp" |
bart | ee17ad6 | 2008-06-18 13:31:05 +0000 | [diff] [blame] | 135 | read avg2 stddev2 vsz2 vszdev2 < "$tmp" |
| 136 | echo "Average time: ${avg2} +/- ${stddev2} seconds / VSZ ${vsz2} +/- ${vszdev2} KB" |
bart | 838262f | 2008-06-18 14:14:03 +0000 | [diff] [blame] | 137 | awk "END{printf "'"'"Ratio = %.2f +/- %.2f; VSZ ratio: %.2f +/- %.2f\n"'"'", ${avg2}/${avg1}, ${avg2}/${avg1}*(${stddev1}/${avg1}+${stddev2}/${avg2}), ${vsz2}/${vsz1}, ${vsz2}/${vsz1}*(${vszdev1}/${vsz1}+${vszdev2}/${vsz2})}" </dev/null |
bart | f33ce89 | 2008-06-07 11:40:14 +0000 | [diff] [blame] | 138 | } |
| 139 | |