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

⟦6403fd3dd⟧ TextFile

    Length: 762 (0x2fa)
    Types: TextFile
    Notes: UNIX file
    Names: »_systemprint«

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/_systemprint« 

TextFile

#ident	"@(#)bne.admin:_systemprint	2.5"
#
#	This internal program prints system entries in
#	user readable form

if [ "$1" = "$3" ]; then
	TYPE="Direct"
else
	TYPE=$3
fi

echo "
SYSTEM NAME:	$1"

case $3 in
ACU)	echo "DEVICE TYPE:	$TYPE" ;;
Develcon|Micom|Sytek) echo "DEVICE TYPE:	$TYPE" ;;
DK)	echo "DEVICE TYPE:	$TYPE" ;;
*)	echo "NETWORK NAME:	$TYPE" ;;
esac

echo "SPEED:		$4"

case $3 in
ACU)	echo "PHONE NUMBER:	$5" ;;
Develcon|Micom|Sytek) echo "SWITCH TOKEN:	$5" ;;
DK)	echo "DK NUMBER:	$5" ;;
*)	echo "ADDRESS:	$5" ;;
esac

shift 5
while [ $# -gt 0 ]
do
	if [ `expr "$1" : '.*rd[:-]'`  -ne 0 ]; then
	    echo "PASSWORD:	$2"
	    shift 2
	    continue
	fi
	if [ `expr "$1" : '.*in[:-]'`  -ne 0 ]; then
	    echo "LOGIN:		$2"
	    shift
	fi
	shift
done