Sample auto start/stop scripts.

build/mchn/PT/pidp10.screen

@@ -0,0 +1,15 @@
+# Make F9 the new command key.
+bindkey -k k9 command
+escape ""
+
+# F1 - F8 selects screen.
+bindkey -k k1 select 0
+bindkey -k k2 select 1
+bindkey -k k3 select 2
+bindkey -k k4 select 3
+bindkey -k k5 select 4
+bindkey -k k6 select 5
+bindkey -k k7 select 6
+bindkey -k k8 select 7
+
+screen -fn -t "SIMH control console" ./start chaosnet tv11

build/mchn/PT/pidp10.service

@@ -0,0 +1,16 @@
+[Unit]
+Description=PiDP-10
+Requires=network-online.target
+After=network-online.target
+
+[Service]
+Type=oneshot
+WorkingDirectory=/opt/pidp10
+ExecStart=/bin/sh ./pidp10.sh start
+ExecStop=/bin/sh ./pidp10.sh stop
+Restart=always
+RestartSec=10
+StartLimitIntervalSec=0
+
+[Install]
+WantedBy=multi-user.target

build/mchn/PT/pidp10.sh

@@ -0,0 +1,95 @@
+#!/bin/sh
+
+### BEGIN INIT INFO
+# Provides:		pidp10
+# Required-Start:	$syslog
+# Required-Stop:	$syslog
+# Default-Start:	2 3 4 5
+# Default-Stop:		0 1 6
+# Short-Description:	PiDP-10 emulator
+### END INIT INFO
+
+HOME="/home/lars/src/its2"
+MCHN="$HOME/build/mchn/PT"
+TOOLS="$HOME/tools"
+LOG="$HOME/automated.log"
+PID="$HOME/pidp10.pid"
+
+action="$1"
+
+fail() {
+    echo "$1" 1>&2
+    exit 1
+}
+
+expect() {
+    text="$1"
+    while :; do
+        grep -q "$text" "$LOG" && return
+        sleep 0.5
+    done
+}
+
+status_screen() {
+    screen -ls | grep -q pidp10
+}
+
+status_emulator() {
+    kill -CONT `cat "$PID"` 2>/dev/null
+}
+
+case "$action" in
+    status)
+        status_screen || fail "PiDP-10 is down."
+        status_emulator || fail "PiDP-10 is down."
+	echo "PiDP-10 is up." 1>&2
+        ;;
+    start)
+        cd "$HOME"
+        screen -c "$MCHN/pidp10.screen" -dmS pidp10
+        screen -S pidp10 -X logfile flush 1
+        screen -S pidp10 -X select 0
+        screen -S pidp10 -X title "SIMH control console"
+        sleep 3
+        screen -S pidp10 -X screen telnet localhost 1025
+        rm -f "$LOG"
+        screen -S pidp10 -X logfile "$LOG"
+        screen -S pidp10 -X log on
+        screen -S pidp10 -X title "KA10 console teletype"
+        expect "DSKDMP"
+        screen -S pidp10 -X log off
+        rm -f "$LOG"
+        screen -S pidp10 -X logfile "$HOME/ka10.log"
+        screen -S pidp10 -X log on
+	screen -S pidp10 -X stuff "ITS\r"
+	screen -S pidp10 -X stuff "\033G"
+        ;;
+    stop)
+        cd "$HOME"
+        screen -S pidp10 -X log off
+        rm -f "$LOG"
+        screen -S pidp10 -X select 1
+        screen -S pidp10 -X logfile "$LOG"
+        screen -S pidp10 -X log on
+        "$TOOLS/chaosnet-tools/shutdown" its
+        expect "NOT IN OPERATION"
+        expect "SHUTDOWN COMPLETE"
+        screen -S pidp10 -X log off
+        rm -f "$LOG"
+	screen -S pidp10 -p0 -X stuff "\034"; sleep 1
+	screen -S pidp10 -p0 -X stuff "quit\r"; sleep 1
+	screen -S pidp10 -X quit
+        if status_emulator; then
+            kill `cat "$PID"` 2>/dev/null; sleep 1
+            status_emulator && kill -9 `cat $PID` 2>/dev/null
+        fi
+        rm -f "$PID"
+        ;;
+    restart)
+        $MCHN/pidp10.sh stop
+        $MCHN/pidp10.sh start
+        ;;
+    *)
+        echo "Unknown action: $action" 1>&2
+        ;;
+esac