#!/bin/sh

for robline in `tpconfig -l | awk ' $1 ~ /^robot$/ \
	{ print $2 ":" $4 ":" $NF }'`
do
	robnum=`echo $robline | awk -F: '{ print $1 }'`
	robtype[${robnum}]=`echo $robline | awk -F: '{ print $2 }'`
	robdev[${robnum}]=`echo $robline | awk -F: '{ print $3 }'`
done

function choose_robot {
	i=0
	while [ "${i}" -lt "${#robdev[*]}" ]
	do
		echo "${i} - ${robtype[${i}]}(${i}), ${robdev[${i}]}"
		i=$(( $i + 1 ))
	done
	printf "Which robot? "

	read ROBNUM
}

choose_robot
while [ "$ROBNUM" -lt 0 -o "$ROBNUM" = "-0" -o -z "${robdev[${ROBNUM}]}" ]
do
	echo "Robot number ${ROBNUM} doesn't seem to exist, try again."
	echo
	choose_robot
done

ROBOT=${robdev[${ROBNUM}]}
ROBTYPE=${robtype[${ROBNUM}]}
TEMPDIR=/tmp

PATH=${PATH}:/usr/openv/gr/bin:/usr/openv/netbackup/bin:/usr/openv/netbackup/bin/goodies:/usr/openv/netbackup/bin/admincmd:/usr/openv/volmgr/bin:/usr/openv/volmgr/bin/goodies

echo 's p' | tldtest -r $ROBOT | awk \
	'$1 ~ /^Barcode$/ { printf "%s", $NF } \
	 $1 ~ /^Address$/ { gsub(",", "") ; printf "\n%s %s - ", "Port address", $2 }'
printf "\n"