shithub: riscv

ref: aa8af9c5a32b5f3afe0e612981fe4d9fada43d34
dir: /rc/bin/replica/scan/

View raw version 
#!/bin/rc

rfork en

fn usage {
	echo 'usage: replica/scan replica-name [paths]' >[1=2]
	exit usage
}

. /rc/bin/replica/defs $*

need serverroot serverexclude serverproto serverdb serverlog 

must servermount
replica/updatedb -r^$serverroot $serverexclude -p^$serverproto $serverdb >>$serverlog
ndb=`{echo $serverdb | sed 's;(.*)/(.*);\1/n\2;'}
odb=`{echo $serverdb | sed 's;(.*)/(.*);\1/_\2;'}
replica/compactdb $serverdb >$ndb && mv $serverdb $odb && mv $ndb $serverdb