home *** CD-ROM | disk | FTP | other *** search
/ Nebula 1 / Nebula One.iso / Utilities / Unix / top-v0_3 / Source / getans < prev    next >
Encoding:
Text File  |  1995-02-24  |  1.6 KB  |  87 lines
  1. #!/bin/csh -f
  2. set ny = (no yes)
  3. if ($2 == "yesno") then
  4.     @ i = $3 + 1
  5.     set pmpt = "$1 [$ny[$i]]: "
  6. else
  7.     if ("$3" == "") then
  8.         set pmpt = "${1}"
  9.     else
  10.         set pmpt = "$1 [$3]: "
  11.     endif
  12. endif
  13. rpt:
  14. echo -n "$pmpt"
  15. set input = $<
  16. switch ($2)
  17.     case number:
  18.     set tmp = `echo $input | tr -d 0123456789.`
  19.     if ("x$tmp" != x) then
  20.         echo "Invalid number.  Please try again."
  21.         goto rpt
  22.     endif
  23.     breaksw
  24.  
  25.     case integer:
  26.     set tmp = `echo $input | tr -d 0123456789`
  27.     if ("x$tmp" != x) then
  28.         echo "Invalid integer.  Please try again."
  29.         goto rpt
  30.     endif
  31.     breaksw
  32.  
  33.     case neginteger:
  34.     if ("x$input" != x-1) then
  35.         set tmp = `echo $input | tr -d 0123456789`
  36.         if ("x$tmp" != x) then
  37.             echo "Invalid integer.  Please try again."
  38.             goto rpt
  39.         endif
  40.     endif
  41.     breaksw
  42.  
  43.     case file:
  44.     if ("x$input" == "x") then
  45.         set input = $3
  46.     endif
  47.     if (! -e "$input") then
  48.         echo The file $input "does not exist.  Please try again."
  49.         goto rpt
  50.     endif
  51.     breaksw
  52.  
  53.     case path:
  54.     if ("x$input" == "x") then
  55.         set input = "$3"
  56.     endif
  57.     if (! -e "$input") then
  58.         foreach elt ($path)
  59.         if (-e "$elt/$input") breaksw
  60.         end
  61.         echo The command $input "was not found.  Please try again."
  62.         goto rpt
  63.     endif
  64.     breaksw
  65.  
  66.     case yesno:
  67.     if ("x$input" == xy || "x$input" == xyes) then
  68.        set input = 1
  69.     else if ("x$input" == xn || "x$input" == xno) then
  70.        set input = 0
  71.     else if ("x$input" != x) then
  72.        echo 'Please answer "yes" or "no".'
  73.        goto rpt
  74.     endif
  75.     breaksw
  76.  
  77.     default:
  78.     breaksw
  79.  
  80. endsw
  81.  
  82. if ("x$input" == x) then
  83.     set input = "$3"
  84. endif
  85.  
  86. echo $input > $4
  87.