harvey/sys/lib/backup/restore

#!/bin/rc
# restore arena# [dev] - load venti with arenas on dev, stored one per track
#	starting with arena#.  must have run fmtarenas before restoring
#	the first arena in the partition.
#	this must be run on the venti server, without venti running on the
#	affected arena partition(s).
rfork ne
if (test -e /sys/lib/backup/funcs)
	.   /sys/lib/backup/funcs
switch ($#*) {
case 1
case 2
	rdev=$2
case *
	echo usage: $0 arena-num '[dev]' >[1=2]
	exit usage
}
starena=$1
if (! ~ $starena [0-9] [0-9][0-9] [0-9][0-9][0-9]) {
	echo $0: bad starting arena: $starena >[1=2]
	exit bad-arena-num
}

# clear any dregs from a previous run
unmount /mnt/cd >[2]/dev/null
sleep 1
kill cdfs | rc
sleep 1
cdfs -d $rdev || exit
cd /mnt/cd

#for (track in d[0-9]*)
#	venti/wrarena $track	# slow; takes about 12½ mins. per GB

arena = $starena
# set arenabase for arenastart
arenabase = `{ venti/printarenapart $arenas | sed -e 's/.*arenabase=//' -e 1q }
kill printarenapart | rc		# printarenapart leaves a process behind
# echo arenabase $arenabase

skipping=yes
for (track in d[0-9]*) {
	if (~ track 'd[0-9]*') {
		echo $0: no tracks in /mnt/cd >[1=2]
		exit no-tracks
	}
	if (~ $skipping yes) {
		# verify that first track is the expected one
		type=`{file $track}
		switch ($"type) {
		case *': venti arena'
			name=`{ venti/printarena $track >[2=1] |
				sed -e 's/.*name=([^ =]+).*/\1/' -e 1q }
		case *
			name=NOT-A-VENTI-ARENA
		}
		kill printarena | rc	# printarena leaves a process behind

		echo -n first track is $"name'; is that right? '
		switch (`{read}) {
		case [yY]*
			skipping=no
		case skip
			skipping=yes
		case *
			echo aborting, arena is unchanged. >[1=2]
			exit 'wrong track'
		}
	}

	if (! ~ $skipping yes) {
		# copy each track into its slot in the arena partition
		venti/printarena $track >[2=1] | sed 1q | tr -d '\12'
		kill printarena | rc	# printarena leaves a process behind
	
		off = `{arenastart $arena}
		# echo -n writing $track to $arenas at 8K-block offset $off:
		sleep 3
		echo
		# argh!  something (cdfs?) appends 60K of *stuff* to each
		# arena on optical disc.  restrain dd.
		count=`{ echo $arenasize/$blocksize | bc }
		pump <$track | dd -quiet 1 -count $count -bs $blocksize \
			-of $arenas -oseek $off
		arena = `{hoc -e $arena+1}
	}
}
# when all done, must run venti/checkarenas, fmtisect, fmtbloom, fmtindex,
# and (the big one) venti/buildindex -b /cfg/pie/venti.conf