154359Sroberto# program to scan peer_summary file and produce summary of daily summaries 254359Sroberto# 354359Sroberto# usage: awk -f psummary.awk peer_summary 454359Sroberto# 554359Sroberto# format of input records 654359Sroberto# peerstats.19960706 754359Sroberto# ident cnt mean rms max delay dist disp 854359Sroberto# ========================================================================== 954359Sroberto# 140.173.112.2 85 -0.509 1.345 4.606 80.417 49.260 1.092 1054359Sroberto# 128.4.1.20 1364 0.058 0.364 4.465 3.712 10.540 1.101 1154359Sroberto# ... 1254359Sroberto# 1354359Sroberto# format of output records (actual data from rackety.udel.edu) 1454359Sroberto# host days mean rms max >1 >5 >10 >50 1554359Sroberto# ================================================================== 1654359Sroberto# 127.127.22.1 1090 0.001 0.401 99.800 19 14 13 10 1754359Sroberto# 127.0.0.1 1188 0.060 1.622 105.004 78 65 51 32 1854359Sroberto# 127.127.4.1 586 0.000 0.000 0.000 0 0 0 0 1954359Sroberto# 140.173.64.1 975 -0.010 2.552 257.595 399 192 114 8 2054359Sroberto# 128.175.1.3 1121 0.447 8.637 204.123 479 460 397 147 2154359Sroberto# 140.173.16.1 1106 0.027 1.014 267.857 242 38 31 23 2254359Sroberto# 128.4.1.4 1119 0.023 1.037 267.748 223 41 34 23 2354359Sroberto# 128.4.1.2 850 1.202 1.654 267.704 196 53 45 34 2454359Sroberto# 128.4.1.20 1101 0.088 1.139 268.322 430 111 83 16 2554359Sroberto# 140.173.32.1 979 -0.949 2.344 257.671 396 217 136 7 2654359Sroberto# 140.173.112.2 1066 0.040 2.111 152.969 442 315 152 16 2754359Sroberto# 140.173.80.1 1059 0.019 1.858 87.690 438 348 150 9 2854359Sroberto# 140.173.96.1 1015 0.110 2.007 266.744 399 314 170 17 2954359Sroberto# 140.173.128.1 1103 -0.002 2.600 257.672 465 262 132 13 3054359Sroberto# 140.222.135.1 347 -4.626 8.804 196.394 135 135 134 95 3154359Sroberto# 140.173.128.2 1081 -0.046 2.967 261.448 463 342 172 17 3254359Sroberto# 140.222.141.1 354 0.820 8.809 195.333 142 141 139 100 3354359Sroberto# 140.173.144.2 1058 -0.107 2.805 270.498 448 341 163 17 3454359Sroberto# 140.222.134.1 354 -0.056 8.479 172.458 142 141 141 100 3554359Sroberto# 140.222.144.1 415 -1.456 9.964 191.684 161 161 161 123 3654359Sroberto# 140.222.136.1 234 0.902 7.707 182.431 62 62 62 48 3754359Sroberto# 128.175.1.1 774 0.890 4.838 266.799 358 291 200 83 3854359Sroberto# 127.127.10.1 1086 -0.002 1.462 231.128 240 239 60 57 3954359Sroberto# 140.173.48.2 576 0.016 4.092 350.512 213 126 88 16 4054359Sroberto# 128.4.1.11 3 0.000 0.000 0.000 0 0 0 0 4154359Sroberto# 128.4.1.26 386 -1.363 20.251 341.284 164 164 161 132 4254359Sroberto# 4354359Sroberto# select table beginning with "ident" 4454359Sroberto{ 4554359Sroberto if (NF < 8 || $1 == "ident") 4654359Sroberto continue 4754359Sroberto i = n 4854359Sroberto for (j = 0; j < n; j++) { 4954359Sroberto if ($1 == peer_ident[j]) 5054359Sroberto i = j 5154359Sroberto } 5254359Sroberto if (i == n) { 5354359Sroberto peer_ident[i] = $1 5454359Sroberto n++ 5554359Sroberto } 5654359Sroberto peer_count[i]++ 5754359Sroberto if (($7 - $6 / 2) < 400) { 5854359Sroberto peer_count[i]++ 5954359Sroberto peer_mean[i] += $3 6054359Sroberto peer_var[i] += $4 * $4 6154359Sroberto if ($5 > peer_max[i]) 6254359Sroberto peer_max[i] = $5 6354359Sroberto if ($5 > 1) 6454359Sroberto peer_1[i]++ 6554359Sroberto if ($5 > 5) 6654359Sroberto peer_2[i]++ 6754359Sroberto if ($5 > 10) 6854359Sroberto peer_3[i]++ 6954359Sroberto if ($5 > 50) 7054359Sroberto peer_4[i]++ 7154359Sroberto } 7254359Sroberto} END { 7354359Sroberto printf " host days mean rms max >1 >5 >10 >50\n" 7454359Sroberto printf "==================================================================\n" 7554359Sroberto for (i = 0; i < n; i++) { 7654359Sroberto if (peer_count[i] <= 0) 7754359Sroberto continue 7854359Sroberto peer_mean[i] /= peer_count[i] 7954359Sroberto peer_var[i] = sqrt(peer_var[i] / peer_count[i]) 8054359Sroberto printf "%-15s%4d%10.3f%10.3f%10.3f%4d%4d%4d%4d\n", peer_ident[i], peer_count[i], peer_mean[i], peer_var[i], peer_max[i], peer_1[i], peer_2[i], peer_3[i], peer_4[i] 8154359Sroberto } 8254359Sroberto} 83