#	bgdial - auto-redial till connect
#	written by bob best (bob@dhw68k.cts.com)
#
ZDIR="/usr/lib/zterm"
TTY="$1"
shift
for i
do
	set `grep "^${i}	" ${HOME}/dial.dir`
	lines="$lines $1 $2 $3"
done
while :
do
	set $lines
	while :
	do
		system=$1
		case $system in
		"")	#break # bug in shell! must use continue
			continue 2
			;;
		*)	shift
			telno=$1
			shift
			baud=$1
			shift
#			echo "dialing $system $telno $baud"
			${ZDIR}/dial $TTY $telno $baud
			case $? in
			0)	${ZDIR}/bell
				clr
				echo "CONNECTION ESTABLISHED TO $system $telno $baud"
				echo "Exit to shell and type 'zterm $baud' to enter terminal"
				cp $HOME/dial.dir $HOME/dial.dirbak
				sed  "s/^\\($system	.*	.*	\\)\\(.*\\)\\(	.*\\)/\\1`date|sed -f /tmp/sed.in`\\3/" $HOME/dial.dirbak >$HOME/dial.dir
				rm /tmp/dial.menu
				rm /tmp/sed.in
				exit 0
				;;
			*)	;;
			esac
		esac
	done
done
