|
DataMuseum.dkPresents historical artifacts from the history of: DKUUG/EUUG Conference tapes |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about DKUUG/EUUG Conference tapes Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - downloadIndex: T f
Length: 1247 (0x4df) Types: TextFile Names: »fs.awk«
└─⟦db229ac7e⟧ Bits:30007240 EUUGD20: SSBA 1.2 / AFW Benchmarks └─⟦this⟧ »EUUGD20/AFUU-ssba1.21/ssba1.21E/musbus/fs.awk«
# # Script awk : fs.awk # # $Header: fs.awk,v 5.1 87/09/25 04:49:51 kenj Exp $ # # modified to be used with chrono - Philippe Dax - 15/6/88 # /^\t / { next } /^$/ { next } /^\.\/disktime/ { if (!fail) { w+=$5; w2+=$5*$5; r+=$6; r2+=$6*$6; c+=$7; c2+=$7*$7; ok++ } fail=0; iter++; next } { print "** Iteration ",iter+1," Failed: ",$0; fail=1; } END { if (fail) iter++ if (ok != iter) { printf "For %d successful iterations from %d attempts ...\n",ok,iter iter=ok } if (iter > 0) { printf "Write: %.1f Kbytes per second ",w/iter if (iter > 1) { var = (w2-2*w*w/iter+w*w/iter)/(iter-1) if ( var < 0. ) var = -var printf " (standard deviation %.1f Kb)",sqrt(var) } printf "\nRead: %.1f Kbytes per second ",r/iter if (iter > 1) { var = (r2-2*r*r/iter+r*r/iter)/(iter-1) if ( var < 0. ) var = -var printf " (standard deviation %.1f Kb)",sqrt(var) } printf "\nCopy: %.1f Kbytes per second ",c/iter if (iter > 1) { var = (c2-2*c*c/iter+c*c/iter)/(iter-1) if ( var < 0. ) var = -var printf " (standard deviation %.1f Kb)",sqrt(var) } print } else { print "Write: -- no measured results!!" print "Read: -- no measured results!!" print "Copy: -- no measured results!!" } }