
#	ATT: ident	"sadmin:admin/menu/syssetup/nodename	1.4"

#ident	"@(#)src/cmd/sadmin/admin/menu/syssetup:node.S3000	25.1"

#menu# set the node name of this machine
#help#	This allows you to change the "node name" of this machine.  The
#help#	"node name" used by various communications networks to identify
#help#	this machine.

flags="-qq -k$$"	# flags for checkyn to implement [q] (quit)

trap 'exit 0' 1 2 15

uname=`uname -n`

checkyn ${flags} -f  -H '
	The "node name" is used by various communications networks to identify
	this machine.' \
	"This machine is currently called \"${uname}\".
Do you want to change it?"  ||  exit 0

name=`checkre ${flags} -fe "What name do you want to give it? [q]" \
	'.' 'There must be a name.' \
	'^[0-9a-zA-Z]\{1,\}$' 'Only letters and numbers are permitted.' \
	'^.\{1,8\}$' 'No more than 8 letters and numbers are permitted.'`

/local/bin/setnode -i -n ${name} /arix
ed /etc/system <<! >/dev/null
H
/system's node name on networks
c
NODE			"${name}"		# system's node name on networks
.
w /etc/system
