106 lines
2.0 KiB
Plaintext
106 lines
2.0 KiB
Plaintext
|
#!/bin/rc
|
||
|
|
# loadfossil - populate a fossil partition or file
|
||
|
|
#
|
||
|
|
# due to name clashes in /srv, will only work on a machine
|
||
|
|
# without a fossil named `fossil' already running.
|
||
|
|
|
||
|
|
rfork en
|
||
|
|
|
||
|
|
fn killfossil {
|
||
|
|
sleep 1
|
||
|
|
unmount /n/f &
|
||
|
|
sleep 1
|
||
|
|
rm -f /srv/^(fossil fossil.open fscons fscons.open)
|
||
|
|
kill fossil | rc
|
||
|
|
sleep 1
|
||
|
|
}
|
||
|
|
|
||
|
|
fn sendexpect { # send expect timeout
|
||
|
|
echo $1
|
||
|
|
if(! dial/expect -qt $3 $2)
|
||
|
|
echo -n 'no '^$"1^'...' > /dev/cons
|
||
|
|
}
|
||
|
|
|
||
|
|
fn usage {
|
||
|
|
echo usage: $argv0 partition root proto fossil.conf >[1=2]
|
||
|
|
exit usage
|
||
|
|
}
|
||
|
|
|
||
|
|
fn sigexit {
|
||
|
|
rm -f /tmp/fossil-no-list.conf
|
||
|
|
exit
|
||
|
|
}
|
||
|
|
fn sigint sighup sigterm {
|
||
|
|
rm -f /tmp/fossil-no-list.conf
|
||
|
|
killfossil
|
||
|
|
exit note
|
||
|
|
}
|
||
|
|
|
||
|
|
# process arguments
|
||
|
|
if (! ~ $#* 4)
|
||
|
|
usage
|
||
|
|
argv0=$0
|
||
|
|
fosspart=$1
|
||
|
|
srcroot=$2
|
||
|
|
proto=$3
|
||
|
|
fossconf=$4
|
||
|
|
|
||
|
|
if (test -e /srv/fossil -o -e /srv/fossil.open) {
|
||
|
|
echo $0: /srv/fossil* exists, not safe to start a new fossil >[1=2]
|
||
|
|
exit fossil-already-running
|
||
|
|
}
|
||
|
|
|
||
|
|
# initialise fossil
|
||
|
|
fossil/flfmt -y $fosspart
|
||
|
|
|
||
|
|
# install listen-less config for fossil creation
|
||
|
|
{
|
||
|
|
grep -v '^listen ' $fossconf
|
||
|
|
echo create /active/adm adm sys d775
|
||
|
|
echo create /active/adm/users adm sys 664
|
||
|
|
} >/tmp/fossil-no-list.conf
|
||
|
|
fossil/conf -w $fosspart /tmp/fossil-no-list.conf
|
||
|
|
|
||
|
|
# start fossil
|
||
|
|
fossil/fossil -f $fosspart
|
||
|
|
mount -cC /srv/fossil.open /n/f
|
||
|
|
|
||
|
|
# set up /adm/users
|
||
|
|
cp /adm/users /n/f/adm
|
||
|
|
{
|
||
|
|
echo
|
||
|
|
dial/drain &
|
||
|
|
sleep 2
|
||
|
|
sendexpect 'users -r /active/adm/users' ': ' 5
|
||
|
|
} </srv/fscons.open >>/srv/fscons.open
|
||
|
|
|
||
|
|
# remount with new users
|
||
|
|
unmount /n/f
|
||
|
|
mount -cC /srv/fossil.open /n/f
|
||
|
|
|
||
|
|
# populate fossil
|
||
|
|
@ {
|
||
|
|
# logs are boring, make them all appear empty
|
||
|
|
chmod +arw /tmp/empty-log >/tmp/empty-log
|
||
|
|
cd $srcroot/sys/log && {
|
||
|
|
for (f in [0-9a-z]* */*)
|
||
|
|
if (! ~ $f httpd mkfile smtpdb timesync.d vac year)
|
||
|
|
bind /tmp/empty-log $f
|
||
|
|
}
|
||
|
|
cd /tmp
|
||
|
|
disk/mkfs -u $srcroot/adm/users -U -d /n/f -s $srcroot $proto
|
||
|
|
}
|
||
|
|
|
||
|
|
# stop fossil gracefully
|
||
|
|
{
|
||
|
|
echo
|
||
|
|
dial/drain &
|
||
|
|
sleep 2
|
||
|
|
sendexpect 'fsys all sync' ': ' 120
|
||
|
|
sendexpect 'fsys all halt' ': ' 5
|
||
|
|
} </srv/fscons.open >>/srv/fscons.open
|
||
|
|
killfossil
|
||
|
|
|
||
|
|
# install permanent fossil configuration
|
||
|
|
fossil/conf -w $fosspart $fossconf
|