#!/bin/sh
# This command will take a tar file and slowly shove it into SVMS format.
if [ -w $1 ]
   then	echo "Saving $1 to $1.save"
	mv $1 $1.save
   fi
tar xf $1.tar
#Fix any time stamps that specify 1970
for i in `grep -l 1970 $1.t.*`
     do	echo $i has timestamp of `cat $i`
	cat $i | sed "s,1970,1989,g" > $i.tmp
	rm $i
	mv $i.tmp $i
   done
# Do everything in timestamp order:
touch $1.t.uncvt
echo 3: `grep GMT $1\.t\.* | sed "s,:19, 19,g" | sort +1`
ids=`grep GMT $1\.t\.* | sed "s,:19, 19,g" |\
    sort +1 | sed -e "s, .*$,,g" -e "s,$1\.t\.,,g"`
echo ids=$ids
first=1
for i in $ids
     do	echo -n "Unconverting $1.$i ... "
	if [ $first = "1" ]
	   then	rm -f $1
		cp $1.d.$i $1
		#echo svms create -T `cat $1.t.$i` $1
		if ! svms create -T `cat $1.t.$i` $1
		   then	echo "'svms create' failed"
			exit 1
		   fi
		first=0
	    else
		if ! svms open $1
		   then	echo "'svms open' failed"
			exit 1
		   fi
		cp $1.d.$i $1
		#echo svms close -T `cat $1.t.$i` $1
		if ! cat $1.c.$i | svms close -p -T `cat $1.t.$i` $1
		   then	echo "'svms close' failed"
			exit 1
		   fi
	    fi
	rm -f $1.?.$i
	echo "Done"
      done
if [ -f $1.save ]
   then	echo "Restoring $1.save to $1"
	if ! svms open $1
	   then	echo "'svms open' failed"
		exit 1
	   fi
	mv $1.save $1
   fi
rm -f $1.t.uncvt
exit 0