SICS-587 (in progress) Put IP and PORT configurations in a single file.

Pelican DONE motor, counter, chopper. TODO hmm, environment.

site_ansto/instrument/pelican/hostport_config_test.tcl

@@ -0,0 +1,38 @@
+# Specify NONE for HOST and PORT if there is no fake device to talk to.
+
+# TEST MOTOR HOST AND PORT
+foreach {key host port} {
+  MC1 localhost 62530
+  MC2 localhost 62531
+  MC3 localhost 62532
+  MC4 localhost 62533
+} {
+  dict set MOTOR_HOSTPORT $key HOST $host
+  dict set MOTOR_HOSTPORT $key PORT $port
+}
+
+# TEST BEAM MONITOR HOST AND PORT
+foreach {key host port} {
+  MONITOR_1 localhost 33000
+  MONITOR_2 localhost 33001
+  MONITOR_3 localhost 33002
+} {
+  dict set MONITOR_HOSTPORT $key HOST $host
+  dict set MONITOR_HOSTPORT $key PORT $port
+}
+
+# TEST HISTOGRAM SERVER HOST AND PORT
+foreach {key host port} {
+  HMM das1-test.nbi.ansto.gov.au 8080
+} {
+  dict set HISTMEM_HOSTPORT $key HOST $host
+  dict set HISTMEM_HOSTPORT $key PORT $port
+}
+
+# TEST CHOPPER HOST AND PORT
+foreach {key host port} {
+  MB350PC localhost 502
+} {
+  dict set CHOPPER_HOSTPORT $key HOST $host
+  dict set CHOPPER_HOSTPORT $key PORT $port
+}