DataMuseum.dk

top - download

    Length: 2023 (0x7e7)
    Types: TextFile
    Names: »ask«

└─⟦50656ff4a⟧ Bits:30010538 TX 3.1 Coldstart
    └─⟦bbf173f5c⟧ »0004« 
        └─⟦this⟧ »./usr/lib/cmplrs/cc2.11/ask« 

TextFile

#!/bin/sh
# -------------------------------------------------------------
# |         RESTRICTED RIGHTS LEGEND                          |
# | Use, duplication, or disclosure by the Government is      |
# | subject to restrictions as set forth in subparagraph      |
# | (c)(1)(ii) of the Rights in Technical Data and Computer   |
# | Software Clause at DFARS 252.227-7013.                    |
# |         MIPS Computer Systems, Inc.                       |
# |         928 Arques Avenue                                 |
# |         Sunnyvale, CA 94086                               |
# -------------------------------------------------------------
# ---------------------------------------------------------
# | Copyright (c) 1986, 1989 MIPS Computer Systems, Inc.  |
# | All Rights Reserved.                                  |
# ---------------------------------------------------------
# $Header: ask,v 2010.2.1.10 90/02/22 19:49:05 bettina Exp $
#
# This function provides a standard way of prompting the user for
# a choice, either from a fixed set of valid responses or not.
#

ask ()
{

if [ $# -lt 2 ]
  then
    echo "$0: usage: $0 prompt default choice ..."
    exit 1
  fi

case $# in

  2) Prompt=$1
     Default=$2
     echo $Dn "$Prompt [$Default]? $Sc"
     read Ans </dev/tty
     case "$Ans" in
       "") Ans=$Default ;;
       esac
     ;;

  *) Prompt=$1
     shift
     Default=$1
     shift
     Choices=$*
     
     Asking=Y
     
     while [ "$Asking" = "Y" ]
       do
     
         echo $Dn "$Prompt ($Choices) [$Default]? $Sc"
         read Ans </dev/tty
     
         case $Ans in
           "") Ans=$Default ;;
           esac
         
         Ans=`echo $Ans | tr [A-Z] [a-z]`
         
         for C in $*
           do
     	     if [ "$Ans" = "$C" ]
               then
     	         Asking=N
     	       fi
           done
         
         if [ "$Asking" = "Y" ]
           then
     	     echo $Dn "What? $Sc"
           fi
     
       done
     
     ;;
  esac           

}