#!/bin/rc fn usage { echo 'usage: repl/scan repl' >[1=2] exit usage}if (~ $#1 0 || ~ $1 -*) usage if (test -x $1) . $1if 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
#!/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