From f1095f73fc790870beee7ce074b74fdca1aa3ad9 Mon Sep 17 00:00:00 2001
From: Lars Brinkhoff <lars@nocrew.org>
Date: Thu, 27 Apr 2023 07:46:57 +0200
Subject: [PATCH] Start the Chaosnet bridge.

---
 README.md            | 1 +
 build/cbridge.conf   | 9 +++++++++
 build/klh10/start    | 1 +
 build/pdp10-ka/start | 6 ++++++
 build/pdp10-kl/start | 1 +
 build/pdp10-ks/start | 1 +
 6 files changed, 19 insertions(+)
 create mode 100644 build/cbridge.conf

diff --git a/README.md b/README.md
index 9ff05b11..e6d02cfe 100644
--- a/README.md
+++ b/README.md
@@ -120,6 +120,7 @@ with all PDP-10 emulators by default.
 | datapoint | Datapoint 3300  | text   | no    | yes      | no       | no       | no
 | vt52    | VT52              | text   | no    | yes      | yes      | yes      | yes
 | tek     | Tektronix 4010    | vector | no    | yes      | yes      | no       | no
+| chaosnet | CHAOS network    | network | yes  | yes      | yes      | yes      | no
 
 ### Documentation
 
diff --git a/build/cbridge.conf b/build/cbridge.conf
new file mode 100644
index 00000000..51dc8c9e
--- /dev/null
+++ b/build/cbridge.conf
@@ -0,0 +1,9 @@
+; Chaosnet bridge
+chaddr 177040
+chudp 42042
+ncp enabled yes
+
+; Link to ITS
+link chudp localhost:42043 host 177001 myaddr 177040
+; Link to the CADR
+link chudp localhost:42044 host 177042 myaddr 177040
diff --git a/build/klh10/start b/build/klh10/start
index 2e1915ab..68f8a2a4 100755
--- a/build/klh10/start
+++ b/build/klh10/start
@@ -26,6 +26,7 @@ help() {
 This start script takes several command line arguments:
 
 help - Display this help text.
+chaosnet - Set up a local Chaosnet.
 
 EOF
 
diff --git a/build/pdp10-ka/start b/build/pdp10-ka/start
index cdbaa7f6..4ec63b42 100755
--- a/build/pdp10-ka/start
+++ b/build/pdp10-ka/start
@@ -73,6 +73,11 @@ simh_imlac() {
     started "Imlac" "$!"
 }
 
+chaosnet() {
+    (sleep 1; tools/cbridge/cbridge -vs -f build/cbridge.conf >cbridge.log 2>&1) &
+    started "Chaosnet" "$!"
+}
+
 help() {
     cat <<EOF
 This start script takes several command line arguments:
@@ -88,6 +93,7 @@ datapoint - Start a Datapoint 3300 emulator.
 vt52 - Start a VT52 emulator.
 tek - Start a Tektronix 4010 emulator.
 cscope - Enable the color scope.
+chaosnet - Set up a local Chaosnet.
 
 EOF
 
diff --git a/build/pdp10-kl/start b/build/pdp10-kl/start
index d922e92b..1af2702a 100755
--- a/build/pdp10-kl/start
+++ b/build/pdp10-kl/start
@@ -38,6 +38,7 @@ 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 - Set up a local Chaosnet.
 
 EOF
 
diff --git a/build/pdp10-ks/start b/build/pdp10-ks/start
index ee019a9a..cea5b4e4 100755
--- a/build/pdp10-ks/start
+++ b/build/pdp10-ks/start
@@ -37,6 +37,7 @@ This start script takes several command line arguments:
 help - Display this help text.
 gt40 - Start a GT40 emulator.
 vt52 - Start a VT52 emulator.
+chaosnet - Set up a local Chaosnet.
 
 EOF