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