home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 January / usenetsourcesnewsgroupsinfomagicjanuary1994.iso / sources / unix / volume11 / musbus / part04 / mkcomp < prev    next >
Encoding:
Text File  |  1987-09-16  |  1.8 KB  |  100 lines
  1. #! /bin/sh
  2. # $Header: mkcomp,v 1.3 87/09/17 06:08:30 kenj Exp $
  3. # Make tbl source for pairwise machine comparison.
  4. prog=$0
  5. if test $# -ne 2
  6. then
  7.     echo "Usage: $prog machine compared-to"
  8.     exit 1
  9. fi
  10. out=$1-$2
  11. for x in 1 2
  12. do
  13.     init=`./mk1 $prog $1`
  14.     test $? != 0 && echo "$init" && exit 1
  15.     test $x = 1 && shift
  16.     init=`echo $init | sed "s/=/$x=/g"`
  17.     eval $init
  18. done
  19. cat >$out <<End-of-File-Grunt
  20. .\" \$Compile: typeset -me -t %f
  21. .nr tf 0
  22. .nr tp 10
  23. .nr pp 10
  24. .nr fp 10
  25. .ll 6.5i
  26. .sz 10
  27. .he 'MUSBUS'Monash UNIX Benchmarking Suite''
  28. .fo '$MC1 \- $MC2''\*(td'
  29. .(b
  30. .TS
  31. doublebox,center;
  32. l | c | c
  33. l | l | l.
  34.     This System    Relative To
  35. _
  36. Processor    $MC1    $MC2
  37.     $OPT1    $OPT2
  38. Memory    $MEM1    $MEM2
  39. UNIX Version    $UNIX1    $UNIX2
  40. Test Date    $D1    $D2
  41. MUSBUS Version    $V1    $V2
  42. .TE
  43. .)b
  44. End-of-File-Grunt
  45.  
  46. ./mk2 $log2 \
  47. | sed \
  48.     -e '/^_$/d' \
  49.     -e '/^\.so /d' \
  50.     -e '/^\.TE/d' \
  51.     -e '/^\.)b/d' \
  52.     -e 's/^\([^    ]*    \)\(.*\)/\/^\1\/s\/$\/    \2\//' \
  53.   > tmp.$$
  54.  
  55. echo "Disks    $DISKS1    $DISKS2" > disks
  56. ./mk2 $log1 \
  57. | sed -f tmp.$$ \
  58. | awk '
  59. BEGIN { FS="    " }
  60. /tbl.1/    { inv = 0 }
  61. /tbl.2/    { inv = 1 }
  62. /tbl.3/    { inv = 1 }
  63. /tbl.5/    { inv = 0 }
  64. /[0-9]\.[0-9]/ && NF==5 {
  65.     printf $1;
  66.     r2 = r1 = "\\*(if"
  67.     if (!inv) {
  68.         if ($2) r1 = $4/$2
  69.         if ($3) r2 = $5/$3
  70.     }
  71.     else {
  72.         if ($4) r1 = $2/$4
  73.         if ($5) r2 = $3/$5
  74.     }
  75.     printf "\t%.2f\t%.2f\t%.2f\t%.2f\n",$2,$3,r1,r2
  76.     next
  77. }
  78. /[0-9]\.[0-9]/ && NF==7 {
  79.     printf $1;
  80.     if (!inv) {
  81.         if ($2) r1 = $5/$2
  82.         if ($3) r2 = $6/$3
  83.         if ($4) r3 = $7/$4
  84.     }
  85.     else {
  86.         if ($5) r1 = $2/$5
  87.         if ($6) r2 = $3/$6
  88.         if ($7) r3 = $4/$7
  89.     }
  90.     printf "\t%.2f\t%.2f\t%.2f\t%.2f\t%.2f\t%.2f\n",$2,$3,$4,r1,r2,r3
  91.     next;
  92. }
  93. /[0-9]\.[0-9]/ { printf "%s\t?\t?\t?\t?\n",$1; next }
  94. { print }' \
  95. | sed \
  96.     -e 's/^\.so tbl\./.so comptbl./' \
  97.     -e 's/^\([1-9][0-9]*\)_Users/\1/' \
  98. | soelim >>$out
  99. rm -f disks tmp.$$
  100.