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

⟦8389de99c⟧ TextFile

    Length: 495 (0x1ef)
    Types: TextFile
    Notes: UNIX file
    Names: »servers«

Derivation

└─⟦23f6ff13b⟧ Bits:30004042/rcadapt.imd SW95705I 386/ix Multi-user Release 1.2
└─⟦23f6ff13b⟧ UNIX Filesystem
    └─⟦this⟧ »AE/new/bin/servers« 

TextFile

:
if [ $# -lt 1 ]
then
    lan=1
elif [ $1 -ge 1 -a $1 -le 4 ]
then
    lan=$1
else
    echo "*** syntax error\n\nservers [<lan>]\n"
    exit 1
fi
/etc/getnames $lan | fgrep FTS | fgrep -v local > /tmp/.ftshosts$$
echo "FTS-machines connected to RcLAN now"
ed - /tmp/.ftshosts$$ > /dev/null <<\!
g/^/s/^...\(.*FTS\).*$/\1/
g/^/s/FTS$//
w
!
if [ -s /tmp/.ftshosts$$ ]
then
    cols=`expr \`wc -l < /tmp/.ftshosts$$\` / 12 + 1`
    sort /tmp/.ftshosts$$ | pr -$cols -o10 -t
fi
rm /tmp/.ftshosts$$