TAR=`cat /bkup/tar`
if test $TAR = "spar"
then
	sparset
fi

PDATE=`cat /bkup/partdate`
echo Last backup date = $PDATE
echo Using $TAR tape archive utility.
echo

NUMBER=`cat /bkup/partnumber`
echo Partial backup #$NUMBER
: echo "Put Partial #$NUMBER diskette in drive - press NEWLINE to continue"
: read ENTRY

: create tar header
/bkup/makehdr 'Daily backup.'
echo "Partial date =" $PDATE >>/bkup/header
echo "Backup # " $NUMBER >>/bkup/header


: do partial backup
echo "Scanning directories."
echo /bkup/header >/bkup/partlist$NUMBER
( cd / ; pls -d $PDATE >>/bkup/partlist$NUMBER )

: filter out some files
ex /bkup/partlist$NUMBER <<\!
1,$g/\.o$/p\
d
1,$g/\.bp$/p\
d
1,$g/\.pm$/p\
d
1,$g/^\/bkup\/part/p\
d
w
!

if test $TAR = "tbk"
then
	cat /bkup/partlist$NUMBER | tbk
else
	$TAR cvl `cat /bkup/partlist$NUMBER`
fi


echo `date` 'Partial #' $NUMBER >>/bkup/log

: Update backup number
NUMBER=`expr $NUMBER + 1`
MAXNUM=`cat /bkup/partmaxnum`
MAXNUM=`expr $MAXNUM + 1`
if test $NUMBER -eq $MAXNUM
then
	echo >&2 
	echo >&2 '*> Resetting partial number.'
	echo '}} Partial number reset - Full backup should be run.'
	NUMBER=1
fi
echo $NUMBER >/bkup/partnumber

pdt >/bkup/partdate

echo >&2 
echo >&2 '
}  Partial complete'
exit 0

-------------------------


: 08/22/83	waf	Create dedicated "partlist" for each partial.
: 10/06/83	waf	Use "spar" for floppy i/o.
: 10/10/83	waf	Use /bkup/partmaxnum.
:				Update /bkup/partdate with date of partial backup.
:				Add dates to start of floppy.
:				Use $TAR for tape archiver {tar/spar}.
: 10/11/83	waf	Do partial backup of FULL system.
: 10/17/83	waf	Allow tbk.
: 10/28/83	waf Filter out some obs.
: 11/16/83	waf	Do not show "insert diskette" prompt.
: 12/12/83	waf	Change backup mod filter.
: 05/10/84	waf	Return "0" on success.
