mirror of
https://github.com/PDP-10/its.git
synced 2026-02-08 01:11:18 +00:00
88 lines
1.8 KiB
Bash
Executable File
88 lines
1.8 KiB
Bash
Executable File
#!/bin/sh
|
|
|
|
#Defaults.
|
|
VT52=${VT52:--B -b 9600}
|
|
TEK=${TEK:--b9600}
|
|
|
|
EXIT=:
|
|
trap "" QUIT INT TERM
|
|
|
|
started() {
|
|
EXIT="$EXIT;stop \"$1\" $2"
|
|
trap "$EXIT" EXIT
|
|
echo "$1 started, pid $2"
|
|
}
|
|
|
|
stop() {
|
|
echo -n "Stopping $1... "
|
|
kill "$2" 2> /dev/null
|
|
sleep 2
|
|
kill -9 "$2" 2> /dev/null
|
|
echo "OK"
|
|
}
|
|
|
|
vt52() {
|
|
(sleep 2; tools/vt05/vt52 $VT52 telnet localhost 10018 >vt52.log 2>&1) &
|
|
started "VT52" "$!"
|
|
}
|
|
|
|
tek() {
|
|
(sleep 2; tools/tek4010/tek4010 $TEK telnet localhost 10017 >tek.log 2>&1) &
|
|
started "Tektronix" "$!"
|
|
}
|
|
|
|
chaosnet() {
|
|
(sleep 2; tools/cbridge/cbridge -c build/cbridge.conf >cbridge.log 2>&1) &
|
|
started "Chaosnet bridge" "$!"
|
|
}
|
|
|
|
arpanet() {
|
|
sed -i.old \
|
|
-e 's/^#set imp ncp/set imp ncp/' \
|
|
-e 's/^#at -u imp 33/at -u imp 33/' \
|
|
-e 's/^set imp mac/#set imp mac/' \
|
|
-e 's/^set imp ip/#set imp ip/' \
|
|
-e 's/^set imp gw/#set imp gw/' \
|
|
-e 's/^set imp host/#set imp host/' \
|
|
-e 's/^at imp tap/#at imp tap/' \
|
|
out/pdp10-kl/run
|
|
|
|
(sleep 2; cd build/arpanet; ../../tools/simh/BIN/h316 imp62.simh >imp62.log 2>&1) &
|
|
started "Arpanet IMP" "$!"
|
|
}
|
|
|
|
help() {
|
|
cat <<EOF
|
|
This start script takes several command line arguments:
|
|
|
|
help - Display this help text.
|
|
vt52 - Start a VT52 emulator.
|
|
tek - Start a Tektronix 4010 emulator.
|
|
chaosnet - Start a local Chaosnet.
|
|
arpanet - Start ARPANET.
|
|
|
|
EOF
|
|
|
|
touch out/pdp10-kl/nohelp
|
|
}
|
|
|
|
sed -i.old \
|
|
-e 's/^set imp ncp/#set imp ncp/' \
|
|
-e 's/^at -u imp 33/#at -u imp 33/' \
|
|
-e 's/^#set imp mac/set imp mac/' \
|
|
-e 's/^#set imp ip/set imp ip/' \
|
|
-e 's/^#set imp gw/set imp gw/' \
|
|
-e 's/^#set imp host/set imp host/' \
|
|
-e 's/^#at imp tap/at imp tap/' \
|
|
out/pdp10-kl/run
|
|
|
|
test -f out/pdp10-kl/nohelp || help
|
|
|
|
while test -n "$1"; do
|
|
"$1"
|
|
shift
|
|
done
|
|
|
|
tools/sims/BIN/pdp10-kl out/pdp10-kl/run
|
|
exit 0
|