Add Tektronix 4010 emulator.

.gitmodules

@@ -31,3 +31,6 @@
 [submodule "tools/vt05"]
 	path = tools/vt05
 	url = https://github.com/aap/vt05
+[submodule "tools/tek4010"]
+	path = tools/tek4010
+	url = https://github.com/rricharz/Tek4010

Makefile

@@ -48,7 +48,7 @@ BINIGNORE=-e '^(ka10|kl10|ks10|minsys)$$'
 # These are on the minsrc tape.
 SRCIGNORE=-e '^(system|midas)$$'
 
-SUBMODULES = dasm itstar klh10 mldev simh sims supdup tapeutils tv11 pdp6 vt05
+SUBMODULES = dasm itstar klh10 mldev simh sims supdup tapeutils tv11 pdp6 vt05 tek4010
 
 # These files are used to create bootable tape images.
 RAM = bin/ks10/boot/ram.262
@@ -68,6 +68,7 @@ PDP6=tools/pdp6/emu/pdp6
 KLFEDR=tools/dasm/klfedr
 DATAPOINT=tools/vt05/dp3300
 VT52=tools/vt05/vt52
+TEK=tools/tek4010/tek4010
 
 H3TEXT=$(shell cd build; ls h3text.*)
 DDT=$(shell cd src; ls sysen1/ddt.* syseng/lsrtns.* syseng/msgs.* syseng/datime.* syseng/ntsddt.*)
@@ -87,7 +88,7 @@ out/klh10/stamp: $(OUT)/rp0.dsk
 out/simh/stamp: $(OUT)/rp0.dsk $(GT40)
 	$(TOUCH) $@
 
-out/pdp10-ka/stamp: $(OUT)/rp03.2 $(OUT)/rp03.3 $(GT40) $(TV11) $(PDP6) $(DATAPOINT) $(VT52)
+out/pdp10-ka/stamp: $(OUT)/rp03.2 $(OUT)/rp03.3 $(GT40) $(TV11) $(PDP6) $(DATAPOINT) $(VT52) $(TEK)
 	$(TOUCH) $@
 
 out/pdp10-kl/stamp: $(OUT)/rp04.1
@@ -267,6 +268,12 @@ $(DATAPOINT):
 $(VT52):
 	$(MAKE) -C tools/vt05 vt52
 
+tek-hack:
+	rm $(TEK)
+
+$(TEK): tek-hack
+	$(MAKE) -C tools/tek4010 tek4010
+
 tools/supdup/supdup:
 	$(MAKE) -C tools/supdup
 

build/dependencies.sh

@@ -13,7 +13,8 @@ install_linux() {
         simh) sudo apt-get install -y simh;;
         pdp10-k?) sudo apt-get install -y libegl1-mesa-dev libgles2-mesa-dev
               sudo apt-get install -y libx11-dev libxt-dev libsdl2-dev
-              sudo apt-get install -y libsdl2-image-dev libpcap-dev;;
+              sudo apt-get install -y libsdl2-image-dev libpcap-dev
+              sudo apt-get install -y libgtk-3-dev;;
         klh10) sudo apt-get install -y libusb-1.0-0-dev;;
     esac
 }
@@ -22,7 +23,7 @@ install_freebsd() {
     pkg upgrade -y
     pkg install -y gmake git expect
     case "$EMULATOR" in
-        pdp10-ka) pkg install -y sdl2 sdl2_image pkgconf;;
+        pdp10-ka) pkg install -y sdl2 sdl2_image pkgconf gtk3;;
         pdp10-kl) pkg install -y autoconf;;
         klh10) pkg install -y pkgconf autotools;;
     esac

build/pdp10-ka/run

@@ -28,6 +28,7 @@ at dpk line=15,10020 speed=4800
 set mty enabled
 at mty 10003 speed=50000
 at mty line=15,10018 speed=9600
+at mty line=14,10017 speed=9600
 set ten11 enabled
 at ten11 10011
 set auxcpu enabled

build/pdp10-ka/start

@@ -48,6 +48,11 @@ vt52() {
     started "VT52" "$!"
 }
 
+tek() {
+    (sleep 2; tools/tek4010/tek4010 telnet localhost 10017 >tek.log 2>&1) &
+    started "Tektronix" "$!"
+}
+
 help() {
     cat <<EOF
 This start script takes several command line arguments:
@@ -59,6 +64,7 @@ tv11 - Start a TV-11 emulator.
 tvcon - Start a TV display.
 datapoint - Start a Datapoint 3300 emulator.
 vt52 - Start a VT52 emulator.
+tek - Start a Tektronix 4010 emulator.
 
 EOF
 

src/system/ttytyp.321

@@ -197,7 +197,7 @@ MCONDX KA,{				;;; KA
 	TTDAAA 54,SPEED=50000		;T54 Morton port 12
 	TTDAAA 55,SPEED=50000		;T55 Morton port 13
 	TTDAAA 56,SPEED=50000		;T56 Morton port 14
-	TTDAAA 57,SPEED=50000		;T57 Morton port 15
+	TTDTEK 57,SPEED=9600		;T57 Tektronix, port 15
 	TTDVT 60,SPEED=9600		;T60 VT52, port 16
 .ENDC ;}