#
#	script to extract exec files from tape
#
if ("$1" == "") then
	echo "Usage: $0 tape - where tape is xxn (st0 st1 mt0 mt1 ...)"
	exit 1
else
	set tape = /dev/nr$1
endif

set k=(`cat toc`)
mt -f $tape rewind
mt -f $tape fsf $#k

tar xvf $tape
mt -f $tape rewind
