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

⟦8bc76e69f⟧ TextFile

    Length: 1214 (0x4be)
    Types: TextFile
    Notes: UNIX file
    Names: »lssystem«

Derivation

└─⟦50c223e0a⟧ Bits:30004042/network1.imd SW95705I 386/ix Multi-user Release 1.2
└─⟦50c223e0a⟧ UNIX Filesystem
    └─⟦this⟧ »bn/new/usr/admin/menu/packagemgmt/uucpmgmt/lssystem« 

TextFile

#ident	"@(#)bne.admin:lssystem	2.2"
#	This shell is used to list system entries from /usr/lib/uucp/Systems

PACKAGE="Basic Networking Utilities"
DEVICES=/usr/lib/uucp/Devices
INITTAB=/etc/inittab
PATH=:/bin:/usr/bin:/usr/lbin
POLL=/usr/lib/uucp/Poll
SYSTEMS=/usr/lib/uucp/Systems
XDIR=$MENUTOP/menu/packagemgmt/uucpmgmt
cd $XDIR


FIRST=true
flags="-qq -k$$"
trap 'exit 0' 1 2  15

if [ ! -r $SYSTEMS ]; then
	echo "There are no entries in the '$SYSTEMS' file
Use systemsmgmt to add entries.\n"
	exit
fi

syslist=`grep '^[^#]' $SYSTEMS  2>/dev/null | cut -d' ' -f1 $SYSTEMS \
	|  sort -u  |	grep '^[A-Za-z0-9]'`

if [ $? -ne 0 ]; then
	echo "There are no entries in the '$SYSTEMS' file
Use systemsmgmt to add entries.\n"
	exit
fi

while $FIRST || chkyn ${flags} -f '
Do you want to see another systems entry?' || break

do
FIRST=false
	echo "
This is the current list of systems known to the $PACKAGE:"
	echo "${syslist}"  |  pr -t -w80 -6
	systemname=`chkyn ${flags} -fec '
Enter system name you want to see in detail [q]:' \
		${syslist}`
	echo "\nHere is the Systems file entry(ies) for machine '${systemname}'."
	grep "^${systemname}[ 	]" $SYSTEMS |
		while read a
		    do /bin/sh _systemprint $a
		done
done