hlfw.ca

rc

ref: 156b135285622f6a2583072708a56f46f41a1137
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