shithub: riscv

ref: 6fa983a5b9f89346b25a8bacc57b2c21dab36300
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