SICS-587 Setup hostport dictionary based configuration for Lyrebird.

site_ansto/instrument/lyrebird/hostport_config.tcl

@@ -0,0 +1,30 @@
+# MOTOR HOST AND PORT
+foreach {mc host port} {
+  MC1 mc1-lyrebird pmc1-lyrebird
+  MC2 mc2-lyrebird pmc2-lyrebird
+  MC3 mc3-lyrebird pmc3-lyrebird
+  MC4 mc4-lyrebird pmc4-lyrebird
+  MC6 mc6-lyrebird pmc6-lyrebird
+} {
+  dict set MOTOR_HOSTPORT $mc HOST $host
+  dict set MOTOR_HOSTPORT $mc PORT $port
+}
+
+# BEAM MONITOR HOST AND PORT
+foreach {bm host port} {
+  MONITOR_1 das1-lyrebird 30000
+  MONITOR_2 das1-lyrebird 30001
+  MONITOR_3 das1-lyrebird 30002
+} {
+  dict set MONITOR_HOSTPORT $bm HOST $host
+  dict set MONITOR_HOSTPORT $bm PORT $port
+}
+
+# HISTOGRAM SERVER HOST AND PORT
+foreach {key host port} {
+  HMM das1-lyrebird.nbi.ansto.gov.au 8080
+  HMSTAT das1-lyrebird.nbi.ansto.gov.au 8081
+} {
+  dict set HISTMEM_HOSTPORT $key HOST $host
+  dict set HISTMEM_HOSTPORT $key PORT $port
+}