| Line |  | 
|---|
| 1 | # | 
|---|
| 2 | # shprompt -- give a prompt and get an answer satisfying certain criteria | 
|---|
| 3 | # | 
|---|
| 4 | # shprompt [-dDfFsy] prompt | 
|---|
| 5 | #       s = prompt for string | 
|---|
| 6 | #       f = prompt for filename | 
|---|
| 7 | #       F = prompt for full pathname to a file or directory | 
|---|
| 8 | #       d = prompt for a directory name | 
|---|
| 9 | #       D = prompt for a full pathname to a directory | 
|---|
| 10 | #       y = prompt for y or n answer | 
|---|
| 11 | # | 
|---|
| 12 | # Chet Ramey | 
|---|
| 13 | # chet@ins.CWRU.Edu | 
|---|
| 14 |  | 
|---|
| 15 | type=file | 
|---|
| 16 |  | 
|---|
| 17 | OPTS=dDfFsy | 
|---|
| 18 |  | 
|---|
| 19 | succeed() | 
|---|
| 20 | { | 
|---|
| 21 | echo "$1" | 
|---|
| 22 | exit 0 | 
|---|
| 23 | } | 
|---|
| 24 |  | 
|---|
| 25 | while getopts "$OPTS" c | 
|---|
| 26 | do | 
|---|
| 27 | case "$c" in | 
|---|
| 28 | s)      type=string | 
|---|
| 29 | ;; | 
|---|
| 30 | f)      type=file | 
|---|
| 31 | ;; | 
|---|
| 32 | F)      type=path | 
|---|
| 33 | ;; | 
|---|
| 34 | d)      type=dir | 
|---|
| 35 | ;; | 
|---|
| 36 | D)      type=dirpath | 
|---|
| 37 | ;; | 
|---|
| 38 | y)      type=yesno | 
|---|
| 39 | ;; | 
|---|
| 40 | ?)      echo "usage: $0 [-$OPTS] prompt" 1>&2 | 
|---|
| 41 | exit 2 | 
|---|
| 42 | ;; | 
|---|
| 43 | esac | 
|---|
| 44 | done | 
|---|
| 45 |  | 
|---|
| 46 | if [ "$OPTIND" -gt 1 ] ; then | 
|---|
| 47 | shift $[$OPTIND - 1] | 
|---|
| 48 | fi | 
|---|
| 49 |  | 
|---|
| 50 | while : | 
|---|
| 51 | do | 
|---|
| 52 | case "$type" in | 
|---|
| 53 | string) | 
|---|
| 54 | echo -n "$1" 1>&2 | 
|---|
| 55 | read ans || exit 1 | 
|---|
| 56 | if [ -n "$ans" ] ; then | 
|---|
| 57 | succeed "$ans" | 
|---|
| 58 | fi | 
|---|
| 59 | ;; | 
|---|
| 60 | file|path) | 
|---|
| 61 | echo -n "$1" 1>&2 | 
|---|
| 62 | read ans || exit 1 | 
|---|
| 63 | # | 
|---|
| 64 | # use `fn' and eval so that bash will do tilde expansion for | 
|---|
| 65 | # me | 
|---|
| 66 | # | 
|---|
| 67 | eval fn="$ans" | 
|---|
| 68 | case "$fn" in | 
|---|
| 69 | /*)     if test -e "$fn" ; then | 
|---|
| 70 | succeed "$fn" | 
|---|
| 71 | else | 
|---|
| 72 | echo "$0: '$fn' does not exist" 1>&2 | 
|---|
| 73 | fi | 
|---|
| 74 | ;; | 
|---|
| 75 | *)      if [ "$type" = "path" ] ; then | 
|---|
| 76 | echo "$0: must give full pathname to file" 1>&2 | 
|---|
| 77 | else | 
|---|
| 78 | if test -e "$fn" ; then | 
|---|
| 79 | succeed "$fn" | 
|---|
| 80 | else | 
|---|
| 81 | echo "$0: '$fn' does not exist" 1>&2 | 
|---|
| 82 | fi | 
|---|
| 83 | fi | 
|---|
| 84 | ;; | 
|---|
| 85 | esac | 
|---|
| 86 | ;; | 
|---|
| 87 | dir|dirpath) | 
|---|
| 88 | echo -n "$1" 1>&2 | 
|---|
| 89 | read ans || exit 1 | 
|---|
| 90 | # | 
|---|
| 91 | # use `fn' and eval so that bash will do tilde expansion for | 
|---|
| 92 | # me | 
|---|
| 93 | # | 
|---|
| 94 | eval fn="$ans" | 
|---|
| 95 | case "$fn" in | 
|---|
| 96 | /*)     if test -d "$fn" ; then | 
|---|
| 97 | succeed "$fn" | 
|---|
| 98 | elif test -e "$fn" ; then | 
|---|
| 99 | echo "$0 '$fn' is not a directory" 1>&2 | 
|---|
| 100 | else | 
|---|
| 101 | echo "$0: '$fn' does not exist" 1>&2 | 
|---|
| 102 | fi | 
|---|
| 103 | ;; | 
|---|
| 104 | *)      if [ "$type" = "dirpath" ] ; then | 
|---|
| 105 | echo "$0: must give full pathname to directory" 1>&2 | 
|---|
| 106 | else | 
|---|
| 107 | if test -d "$fn" ; then | 
|---|
| 108 | succeed "$fn" | 
|---|
| 109 | elif test -e "$fn" ; then | 
|---|
| 110 | echo "$0 '$fn' is not a directory" 1>&2 | 
|---|
| 111 | else | 
|---|
| 112 | echo "$0: '$fn' does not exist" 1>&2 | 
|---|
| 113 | fi | 
|---|
| 114 | fi | 
|---|
| 115 | ;; | 
|---|
| 116 | esac | 
|---|
| 117 | ;; | 
|---|
| 118 | yesno) | 
|---|
| 119 | echo -n "$1" 1>&2 | 
|---|
| 120 | read ans || exit 1 | 
|---|
| 121 | case "$ans" in | 
|---|
| 122 | y|Y|[yY][eE][sS]) | 
|---|
| 123 | succeed "yes" | 
|---|
| 124 | ;; | 
|---|
| 125 | n|N|[nN][oO]) | 
|---|
| 126 | succeed "no" | 
|---|
| 127 | exit 0 | 
|---|
| 128 | ;; | 
|---|
| 129 | *) | 
|---|
| 130 | echo "$0: yes or no required" 1>&2 | 
|---|
| 131 | ;; | 
|---|
| 132 | esac | 
|---|
| 133 | ;; | 
|---|
| 134 | esac | 
|---|
| 135 | done | 
|---|
| 136 |  | 
|---|
| 137 | exit 1 | 
|---|
       
      
  Note:
 See   
TracBrowser
 for help on using the repository browser.