#!/bin/rc
rfork en
9fs boot
9fs sources
y=`{date | awk '{print $NF}'}
chg=/n/sources/extra/changes/$y
db=/n/boot/dist/replica/client/plan9.db
fn pretty {
awk '
$1 ~ "^[\[].*[\]]$" && NF == 11{
who=$1;
gsub("^[\[]", "", who);
gsub("[\]]$", "", who);
if ($0 ~ "^ .*")
printf(" %-8s %s %-2s %s /%s\n", who, $8, $9, $10, $11);
else
printf("%-8s %s %-2s %s %s\n", who, $8, $9, $10, $11);
next;
}
{
printf(" %s\n", $0);
}
'
}
ls -tlrm $chg/* $db |
sed '1,/plan9.db$/d' |
while(f=`{read}){
echo $f | pretty
grep -v '^ ' $f(11) | pretty
}
flags=()
while(! ~ $#* 0 && ~ $1 -*){
if(~ $1 -c -s){
flags=($flags $1)
shift
}
flags=($flags $1)
shift
}
replica/pull -v $flags /dist/replica/network $*
rm -f /srv/sources
yesterday -D /sys/games/lib/fortunes | sed -n 's/^> //p'
|