xref: /plan9/sys/src/cmd/venti/words/backup.example (revision 42d82305fbcd839fd6b81940f0fae5a107fcfc96)
1*42d82305SDavid du Colombier#!/bin/rc
2*42d82305SDavid du Colombier
3*42d82305SDavid du Colombierrfork e
4*42d82305SDavid du Colombiercd /usr/rsc
5*42d82305SDavid du Colombier. bkup.info
6*42d82305SDavid du Colombierfn x {
7*42d82305SDavid du Colombier	echo x $*
8*42d82305SDavid du Colombier	y=$1
9*42d82305SDavid du Colombier	if(~ $#$y 0){
10*42d82305SDavid du Colombier		$y=0
11*42d82305SDavid du Colombier	}
12*42d82305SDavid du Colombier	echo venti/wrarena -o $2 $3 $$y
13*42d82305SDavid du Colombier	end=`{venti/wrarena -o $2 $3 $$y | grep '^end offset ' | sed 's/^end offset //'}
14*42d82305SDavid du Colombier	if(~ $#end 1 && ! ~ $$y $end){
15*42d82305SDavid du Colombier		$y=$end
16*42d82305SDavid du Colombier		echo '#' `{date} >>bkup.info
17*42d82305SDavid du Colombier		whatis $y >>bkup.info
18*42d82305SDavid du Colombier	}
19*42d82305SDavid du Colombier}
20*42d82305SDavid du Colombierhget http://127.1:8000/index |
21*42d82305SDavid du Colombierawk '
22*42d82305SDavid du Colombier/^index=/ { blockSize=0+substr($3, 11); }
23*42d82305SDavid du Colombier/^arena=/ { arena=substr($1, 7); }
24*42d82305SDavid du Colombier/^	arena=/ { start=0+substr($5, 2)-blockSize; printf("x %s %d %s\n", arena, start, $3); }
25*42d82305SDavid du Colombier' |rc
26*42d82305SDavid du Colombier
27