Plan 9 from Bell Labs’s /n/sources/contrib/nemo/sys/src/cmd/repl/prune

Copyright © 2009 Alcatel-Lucent.
Distributed under the Lucent Public License version 1.02.
Download the Plan 9 distribution.


#!/bin/rc

fn usage {
	echo 'repl/prune repl...'>[1=2]
	exit usage
}

fn random {
	awk 'BEGIN{srand(); printf("%d\n", 10000 * rand());}'
}

rid=`{random}

if (test  $#* -lt 1)
	usage

while (! ~ $#* 0){
	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
			}
		}
	echo pruning $1
	repl/scandb  -p $rid $dir $db
	shift
}
exit ''

(This is a user-contributed directory and
should not be interpreted as statement by Alcatel-Lucent.)

Bell Labs OSI certified Powered by Plan 9

(Return to Plan 9 Home Page)

Copyright © 2009 Alcatel-Lucent. All Rights Reserved.
Comments to webmaster@plan9.bell-labs.com.