Subversion Repositories planix.SVN

Rev

Blame | Last modification | View Log | RSS feed

#!/bin/rc

rfork e
cd /usr/rsc
. bkup.info
fn x {
        echo x $*
        y=$1
        if(~ $#$y 0){
                $y=0
        }
        echo venti/wrarena -o $2 $3 $$y
        end=`{venti/wrarena -o $2 $3 $$y | grep '^end offset ' | sed 's/^end offset //'}
        if(~ $#end 1 && ! ~ $$y $end){
                $y=$end
                echo '#' `{date} >>bkup.info
                whatis $y >>bkup.info
        }
}
hget http://127.1:8000/index | 
awk '
/^index=/ { blockSize=0+substr($3, 11); }
/^arena=/ { arena=substr($1, 7); }
/^      arena=/ { start=0+substr($5, 2)-blockSize; printf("x %s %d %s\n", arena, start, $3); }
' |rc