#!/bin/rc
fn usage {
echo 'usage: repl/scan repl' >[1=2]
exit usage
}
if (~ $#1 0 || ~ $1 -*)
usage
if (test -x $1)
. $1
if not
if (test -x $home/lib/repl/$1)
. $home/lib/repl/$1
if not {
if (test -x /lib/repl/$1)
. /lib/repl/$1
if not {
echo 'no such replica: '^$1 >[1=2]
exit bad1
}
}
repl/scandb -v $excl $dir $db
|