git: 9front

ref: eee5cb15e7e014a6dda383d0482c43dca65b6336
dir: /sys/src/9/boot/tcp.rc/

View raw version 
#!/bin/rc

fn configtcp{
	# bind in an ip interface
	for(i in I l`{seq 0 3})
		bind -qa '#'$i /net

	must ip/ipconfig -p $*
	
	if(~ $#fs 0)
		fs=`{awk -F'=' '/fs=/{print $2; exit}' /net/ndb}
	if(~ $#auth 0)
		auth=`{awk -F'=' '/auth=/{print $2; exit}' /net/ndb}
	if(~ $#fs 0)
		ask fs ' ip is?' $auth
	if(~ $#auth 0)
		ask auth ' ip is?' $fs
	
	fsaddr=tcp!$fs!564
	authaddr=tcp!$auth!567
}

fn connecttcp{
	srv -q $"fsaddr boot 
}

mtcp=(configtcp connecttcp)
mt=(mtcp $mt)