# Set up color-coded test output
#
if test -t 1 && type tput > /dev/null 2>&1 ; then
+ COLOR_END=`tput setaf 4` # blue
COLOR_FAIL=`tput setaf 1` # red
- COLOR_WARN=`tput setaf 3` # yellow
- COLOR_PASS=`tput setaf 2` # green
- COLOR_STEN=`tput setaf 4` # blue - for start/end messages
COLOR_INFO=`tput bold` # bold
COLOR_NONE=`tput sgr0`
+ COLOR_PASS=`tput setaf 2` # green
+ COLOR_START=`tput setaf 4` # blue
+ COLOR_WARN=`tput setaf 3` # yellow
else
# set to empty strings so printf succeeds
+ COLOR_END=''
COLOR_FAIL=''
- COLOR_WARN=''
- COLOR_PASS=''
- COLOR_STEN=''
COLOR_INFO=''
COLOR_NONE=''
+ COLOR_PASS=''
+ COLOR_START=''
+ COLOR_STEN=''
+ COLOR_WARN=''
fi
if type printf > /dev/null 2>&1
printf "${COLOR_PASS}%s${COLOR_NONE}\n" "$*"
}
echoinfo () {
- COLOR=$COLOR_INFO
- case "$1" in
- S:*|E:*) COLOR=${COLOR}${COLOR_STEN} ;; # Start/end messages
- esac
- printf "${COLOR}%s${COLOR_NONE}\n" "$*"
+ printf "${COLOR_INFO}%s${COLOR_NONE}\n" "$*"
+ }
+ echostart () {
+ printf "${COLOR_START}%s${COLOR_NONE}\n" "$*"
+ }
+ echoend () {
+ printf "${COLOR_END}%s${COLOR_NONE}\n" "$*"
}
else
echofail () {
echoinfo () {
echo "$*"
}
+ echostart () {
+ echo "$*"
+ }
+ echoend () {
+ echo "$*"
+ }
fi
TESTNAME="`basename $PWD`"
export HIGHPORT=`expr $baseport + $numport - 1`
-echoinfo "S:$test:`date $dateargs`"
-echoinfo "T:$test:1:A"
-echoinfo "A:$test:System test $test"
-echoinfo "I:$test:PORTRANGE:${LOWPORT} - ${HIGHPORT}"
+echostart "S:$test:`date $dateargs`"
+echoinfo "T:$test:1:A"
+echoinfo "A:$test:System test $test"
+echoinfo "I:$test:PORTRANGE:${LOWPORT} - ${HIGHPORT}"
if [ x${PERL:+set} = x ]
then
echowarn "I:$test:Perl not available. Skipping test."
echowarn "R:$test:UNTESTED"
- echoinfo "E:$test:`date $dateargs`"
+ echoend "E:$test:`date $dateargs`"
exit 0;
fi
else
echowarn "I:$test:Prerequisites missing, skipping test."
[ $result -eq 255 ] && echowarn "R:$test:SKIPPED" || echowarn "R:$test:UNTESTED"
- echoinfo "E:$test:`date $dateargs`" >&2
+ echoend "E:$test:`date $dateargs`" >&2
exit 0
fi
$PERL testsock.pl -p $PORT || {
echowarn "I:$test:Network interface aliases not set up. Skipping test."
echowarn "R:$test:UNTESTED"
- echoinfo "E:$test:`date $dateargs`"
+ echoend "E:$test:`date $dateargs`"
exit 0;
}
else
echowarn "I:$test:Need PKCS#11, skipping test."
echowarn "R:$test:PKCS11ONLY"
- echoinfo "E:$test:`date $dateargs`"
+ echoend "E:$test:`date $dateargs`"
exit 0
fi
fi
# Start name servers running
-$PERL start.pl --port $PORT $test || { echofail "R:$test:FAIL"; echoinfo "E:$test:`date $dateargs`"; exit 1; }
+$PERL start.pl --port $PORT $test || { echofail "R:$test:FAIL"; echoend "E:$test:`date $dateargs`"; exit 1; }
# Run the tests
( cd $test ; $SHELL tests.sh "$@" )
fi
fi
-echoinfo "E:$test:`date $dateargs`"
+echoend "E:$test:`date $dateargs`"
exit $status