home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 January / usenetsourcesnewsgroupsinfomagicjanuary1994.iso / sources / unix / volume11 / musbus / part04 / mkscript < prev    next >
Encoding:
Text File  |  1987-09-16  |  722 b   |  43 lines
  1. #! /bin/sh
  2. # $Header: mkscript,v 1.2 87/06/22 14:35:54 kjmcdonell Beta $
  3. # create script files by permuting the job steps ..
  4. # output files labelled script.n, n=1,2,...
  5.  
  6. if test $# -ne 2
  7. then
  8.     echo "Usage: mkscript n master-script"
  9.     exit 1
  10. fi
  11.  
  12. n=$1
  13. shift
  14.  
  15. if test ! -f $1
  16. then
  17.     echo "mkscript: cannot open \"$1\""
  18.     exit 1
  19. fi
  20.  
  21. ns=`grep '^%%' $1 | wc -l`
  22. ns=`expr $ns - 1`
  23.  
  24. k=1
  25. while test $k -le $n
  26. do
  27.     awk '
  28. BEGIN    { '"`./mkperm -s $k $ns | sed 's/[0-9][0-9]*/perm[i++] = &;/g`"' nj=0 }
  29. NR==1    { next }
  30. /^%%/    { nj++; next }
  31.     { if (job[nj] == "")
  32.         job[nj] = $0
  33.       else
  34.         job[nj] = job[nj] "\n" $0
  35.     }
  36. END    { print job[0]
  37.       for (i=0; i<'$ns'; i++)
  38.         print job[perm[i]]
  39.       print job[nj]
  40.     }' $1 > script.$k
  41.     k=`expr $k + 1`
  42. done
  43.