Listing 4

#! /bin/sh -
#
#   A simple sh script to "newping" a list of important hosts.
#
#   Output goes to /dev/console
#

IMPHOSTS = polyslo phoenix blackbird zeus
TIMEOUT = 20

for HOST in $IMPHOSTS
do
newping $IMPHOSTS $TIMEOUT
CODE = $?

DATE = `date +"%m-%d-%y %H:%M"`

#
#   Determine the appropriate English response.
#

case $CODE in
0) PHRASE=""
STATUS=""
1) PHRASE="No connection in $TIMEOUT secs."
STATUS="down";;
2) PHRASE="No response in $TIMEOUT secs."
STATUS="hung";;
3) PHRASE="Connection refused. "
STATUS="rebooting";;
4) PHRASE="Network unreachable from `hostname`."
STATUS="unknown";;
5) PHRASE="Host unreachable from `hostname`."

STATUS="unknown";;
*) PHRASE="Internal error."
STATUS="unknown";;
esac

if [ "$PHRASE" != "" ]
then
echo "$DATE:$SITE $PHRASE  - ($STATUS)" > /dev/console
fi
done