ref: dbe11bbe99e7a405ce78b7ebf963b684ca3891bf
dir: /barrier/
#!/bin/rc
fn sysnames {
for(sys in `{ndb/query -a authdom 9front sys}){
netscan $sys 24800 | grep -s open && echo $sys
}
}
fn waitforconn {
while(){
sleep 1
echo Connecting to $sysname...
netstat | grep 24800 | grep -s Established && echo Ready && exit
}
}
sysname=`{sysnames | fm -p}
if(~ $#sysname 0)
exit
waitforconn &
tlsclient tcp!macky!24800 barrera