TakeAction 2.0 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109
  1. case $# in
  2. 0) PAR=install ; CMD=Action ;;
  3. 1) PAR="$1" ; CMD=Action ;;
  4. 2) PAR="$1" ; CMD="$2" ;;
  5. *) echo Syntax: "$0" [param [file]] ; exit 1 ;;
  6. esac
  7. if test -r "$CMD"
  8. then :
  9. else
  10. case "$CMD" in
  11. Action) echo No Action file present ;;
  12. *) echo No Action file "($CMD)" present ;;
  13. esac
  14. fi
  15. THISFILE=`pwd`/$0
  16. SYS=
  17. RETC=0
  18. { while read LINE
  19. do
  20. eval set $LINE
  21. case x"$1" in
  22. x#*) ;;
  23. xname) SYS="$2"
  24. ACTION='make $PAR'
  25. DIR=.
  26. FM=no
  27. FAIL='Failed for $SYS, see $DIR/Out'
  28. SUCC='$SYS -- done'
  29. ATYPE=
  30. FATAL=no
  31. DOIT=yes
  32. ;;
  33. xfatal) FATAL=yes ;;
  34. xaction|xindir) case x$ATYPE in
  35. x) ACTION=$2 ; ATYPE=$1
  36. case $ATYPE$FM in
  37. indirno) FAIL='Failed for $SYS' ;;
  38. esac
  39. ;;
  40. *) echo Already specified an $ATYPE for this name
  41. RETC=65 ;;
  42. esac ;;
  43. xfailure) FM=yes
  44. FAIL="$2" ;;
  45. xsuccess) SUCC="$2" ;;
  46. xdir) DIR="$2" ;;
  47. xsystem) case `ack_sys` in
  48. $2) ;;
  49. *) echo "Sorry, $SYS can only be made on $2 systems"
  50. DOIT=no
  51. ;;
  52. esac ;;
  53. xend) case $DOIT in
  54. no) continue ;;
  55. esac
  56. case x$SYS in
  57. x) echo Missing name line; RETC=65 ;;
  58. *) if test -d $DIR
  59. then (
  60. cd $DIR
  61. X=
  62. case $ATYPE in
  63. indir)
  64. if sh $THISFILE $PAR $ACTION
  65. then eval echo $SUCC
  66. else RETC=2 ; eval echo $FAIL
  67. fi ;;
  68. *)
  69. if eval "$ACTION >Out 2>&1 </dev/null"
  70. then eval echo $SUCC
  71. else RETC=1 ; X=: ; eval echo $FAIL
  72. fi
  73. ;;
  74. esac
  75. (echo ------- `pwd`
  76. cat Out
  77. $X rm -f Out
  78. ) 2>/dev/null 1>&- 1>&3
  79. exit $RETC
  80. )
  81. case $? in
  82. 0) ;;
  83. *) case $RETC in
  84. 0) RETC=$? ;;
  85. esac ;;
  86. esac
  87. else
  88. echo Directory $DIR for $SYS is inaccessible
  89. RETC=66
  90. fi ;;
  91. esac
  92. case $FATAL$RETC in
  93. yes0) ;;
  94. yes*) echo Fatal error, installation stopped.
  95. exit $RETC ;;
  96. esac
  97. SYS=
  98. ;;
  99. *) echo Unknown keyword "$1"
  100. RETC=67 ;;
  101. esac
  102. done
  103. exit $RETC
  104. } <$CMD
  105. RETX=$?
  106. case $RETX in
  107. 0) exit $RETC ;;
  108. *) exit $RETX ;;
  109. esac