ref: acb46da94f5ae1612636f4e3d5386b16ac2f62e5
dir: /bin/mailrio/
#!/bin/rc -e
rfork n
if(! ~ $#* 2){
echo usage: $0 mbox upasname >[1=2]
exit usage
}
upas/fs -f $1 >>[2]/tmp/mailrio.log || exit
upasname=$2
wsz=`{read -c 48 /mnt/wsys/wctl}
facerect=( \
0 \
0 \
`{echo $wsz(3) - $wsz(1) | pc -n} \
116 \
)
unmount /mnt/plumb
plumbsrv=()
plumber
cat <<! >/tmp/mailrio.$pid
#!/bin/rc
window -r $facerect faces -i
!
chmod +x /tmp/mailrio.$pid
rio -i /tmp/mailrio.$pid
rm /tmp/mailrio.$pid
unmount /mail/fs
unmount /mnt/plumb
# fuck you rc
if(! ~ $#plumbsrv 0)
rm $plumbsrv
if not
die plumber $pid