ref: db8efd2ef8a27770b0296b58aef98b66765403c9
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