# SccsId[] = "%W% (USL function) %G%"
RK_name="READKEY"
if [ ".${SECONDS}" = "." ]; then # Bourne function already loaded?
[ ."`set|egrep '^$RK_name\(\)\{$'`" != . ] && RK_loaded=1
else # Korn or Bash shell and function already loaded?
if [ `expr "\`uname -s\`" : "[Ll][Ii][Nn][Uu][Xx]"` -eq 0 ]; then
[ ."`typeset +f|awk '/^'$RK_name'[=\(]?/'`" != . ] && RK_loaded=1
else # Linux
[ ."`typeset -F|awk '/^'$RK_name'[=\(]?/'`" != . ] && RK_loaded=1
fi
fi
if [ 0${RK_loaded} -eq 0 ]; then
#----------------------------------------------------------------------#
READKEY()
#----------------------------------------------------------------------#
{
if [ .$TERM != . ]; then # If running interactively, prompt user.
#------------------------------------------------------------#
# If the following variables are not set, use these defaults.#
#------------------------------------------------------------#
: ${OZ:=`uname -s 2> /dev/null|tr '[A-Z]' '[a-z]' 2> /dev/null`}
: ${script_name:=`basename $0`}
RK_ID="$script_name($RK_name)"
RK_oldstty=`/bin/stty -g`
RK_stty_status=$?
if [ $RK_stty_status -ne 0 ]; then
echo "$RK_ID" \
"Problems saving original terminal settings." 1>&2
return $RK_stty_status
fi
#---------------------------------------------------------------#
# Just in case the user ^C's out of this, we'll restore their #
# stty settings before exiting. (TRAP_EXIT is a shell library #
# function that may or may not be set. To ensure a gracious #
# exit, we follow the trap call to it with the "exit 1". This #
# way, one way or the other, we exit cleanly. #
#---------------------------------------------------------------#
trap "/bin/stty $RK_oldstty; TRAP_EXIT; exit 1" 1 2 3 9 15
if [ ."$OZ" = ."sunos" -o ."$OZ" = ."linux" ]; then
/bin/stty -icanon -isig -echo min 1 time 0
else
/bin/stty -icanon -echo min 1 time 0
fi
RK_stty_status=$?
if [ $RK_stty_status -ne 0 ]; then
echo "$RK_ID" \
"Problems setting stty to terminal mode." 1>&2
return $RK_stty_status
fi
/bin/dd bs=1 count=1 <&0 2> /dev/null
RK_dd_status=$?
/bin/stty $RK_oldstty
RK_stty_status=$?
if [ $RK_stty_status -ne 0 ]; then
echo "$RK_ID" \
"Problems resetting original stty to '$RK_oldstty'." 1>&2
return $RK_stty_status
fi
#---------------------------------------------------#
# Restore traps to something a bit more civilized. #
#---------------------------------------------------#
trap "TRAP_EXIT: exit 1" 1 2 3 9 15
if [ $RK_dd_status -ne 0 ]; then
echo "$RK_ID" \
"Problems with 'dd' command obtaining the character." 1>&2
return $RK_dd_status
fi
echo "$RK_string"|tr -d "\015"
return 0 # Ah, the sweet smell of success.
else
return 1
fi
} # "RK_" prefix identifies this function's variables
fi
#======================================================================#
# D O C U M E N T A T I O N #
#======================================================================#
# #
# Author: Bob Orlando #
# #
# Date: March 17, 1997 #
# #
# Program ID: readkey.sh #
# #
# Usage: READKEY <no arguments> #
# Example: key=`READKEY` #
# #
# Purpose: Read a single key from the keyboard without having to #
# press carriage return. #
# #
# Globals: No global variables are assigned in this function. #
# "RK_" prefix identifies local function variables. #
# #
# Exit_status: Returns success or non-zero for failure. #
# #
# Calls: None. #
# #
# Notes: If running in batch mode (e.g. from cron), then the #
# function simply returns a null and exit status of 1. #
# #
# Origins: The code for this function based on Ed Schaefer's #
# "Returning a Single Character in a UNIX Shell Script" #
# (Sys Admin magazine, April, 1997, pp. 53-55). #
# #
# Modified: 2004-03-03 Bob Orlando #
# v1.7 * Change set|egrep|awk to just set|egrep. #
# #
#----------------------------------------------------------------------#
|