DataMuseum.dk

Presents historical artifacts from the history of:

Regnecentalen RC-900

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about Regnecentalen RC-900

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - metrics - download
Index: T u

⟦680a1c597⟧ TextFile

    Length: 889 (0x379)
    Types: TextFile
    Names: »usr/admin/menu/syssetup/nodename «

Derivation

└─⟦3d8f416b2⟧ Bits:30004042/core2.imd SW95705I 386/ix Multi-user Release 1.2
    └─⟦this⟧ »usr/admin/menu/syssetup/nodename « 

TextFile

#ident	"@(#)sadmin:admin/menu/syssetup/nodename	1.4"
#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.'`

uname -S ${name}
date +"#	Node name changed %D %T.
uname -S ${name}" >/etc/rc.d/nodename