home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 January / usenetsourcesnewsgroupsinfomagicjanuary1994.iso / sources / misc / volume25 / QBATCH / part01 / src / rcgen < prev    next >
Encoding:
Text File  |  1991-11-04  |  731 b   |  55 lines
  1. ech=A`echo -n ""`
  2. if  [ ${ech:-\c} = "A-n" ]
  3. then 
  4.     n=""
  5.     c=\\c
  6. else 
  7.     n=-n
  8.     c=""
  9. fi
  10. cat >rc.QBATCH <<EOFrc
  11. #!$1
  12. PATH=$PATH:$2
  13. export PATH
  14. pause()
  15. {
  16. #
  17. # pause for n seconds (multiples of 5 seconds) printing '.' every 5
  18. #
  19.     timer=0
  20.     echo $n ".$c"
  21.     while [ \$1 -gt \$timer ]
  22.     do
  23.     sleep 3
  24.     echo $n ".$c"
  25.     timer=\`expr \$timer + 3\`
  26.     done;
  27. }
  28. cd $3
  29. qt -v
  30. echo "Starting QBATCH Queues"
  31. echo " "
  32. set *
  33. for i in \$*
  34. do
  35. if \`qt -t \$i\`
  36. then
  37.     if [ \`qf -p \$i\` != "0" ]
  38.     then
  39.     echo $n "queue \$i restarted .. $c"
  40.     qp \$i
  41.     if [ \`qf -a \$i\` != "0" ]
  42.     then
  43.         echo $n "waiting for \$i to stabilise ..$c"
  44.         pause 20
  45.         echo ".. done"
  46.         fi
  47.     else
  48.     echo "queue \$i not started "
  49.     fi
  50. fi
  51. done
  52. exit 0
  53. EOFrc
  54. exit 0
  55.