mirror of
https://github.com/MikaylaFischler/cc-mek-scada.git
synced 2024-08-30 18:22:34 +00:00
106 lines
3.1 KiB
Lua
106 lines
3.1 KiB
Lua
--
|
|
-- Nuclear Generation Facility SCADA Supervisor
|
|
--
|
|
|
|
os.loadAPI("scada-common/log.lua")
|
|
os.loadAPI("scada-common/util.lua")
|
|
os.loadAPI("scada-common/ppm.lua")
|
|
os.loadAPI("scada-common/comms.lua")
|
|
os.loadAPI("scada-common/modbus.lua")
|
|
|
|
os.loadAPI("config.lua")
|
|
os.loadAPI("mqueue.lua")
|
|
os.loadAPI("supervisor.lua")
|
|
|
|
os.loadAPI("session/rtu.lua")
|
|
os.loadAPI("session/plc.lua")
|
|
os.loadAPI("session/coordinator.lua")
|
|
os.loadAPI("session/svsessions.lua")
|
|
|
|
local SUPERVISOR_VERSION = "alpha-v0.1.1"
|
|
|
|
local print = util.print
|
|
local println = util.println
|
|
local print_ts = util.print_ts
|
|
local println_ts = util.println_ts
|
|
|
|
log._info("========================================")
|
|
log._info("BOOTING supervisor.startup " .. SUPERVISOR_VERSION)
|
|
log._info("========================================")
|
|
println(">> SCADA Supervisor " .. SUPERVISOR_VERSION .. " <<")
|
|
|
|
-- mount connected devices
|
|
ppm.mount_all()
|
|
|
|
local modem = ppm.get_wireless_modem()
|
|
if modem == nil then
|
|
println("boot> wireless modem not found")
|
|
log._warning("no wireless modem on startup")
|
|
return
|
|
end
|
|
|
|
-- determine active/backup mode
|
|
local mode = comms.SCADA_SV_MODES.BACKUP
|
|
if config.SYSTEM_TYPE == "active" then
|
|
mode = comms.SCADA_SV_MODES.ACTIVE
|
|
end
|
|
|
|
-- start comms, open all channels
|
|
local comms = supervisor.superv_comms(config.NUM_REACTORS, modem, config.SCADA_DEV_LISTEN, config.SCADA_FO_LOCAL, config.SCADA_FO_PEER,
|
|
config.SCADA_SV_CHANNEL)
|
|
|
|
-- base loop clock (4Hz, 5 ticks)
|
|
local loop_clock = os.startTimer(0.25)
|
|
|
|
-- event loop
|
|
while true do
|
|
local event, param1, param2, param3, param4, param5 = os.pullEventRaw()
|
|
|
|
-- handle event
|
|
if event == "peripheral_detach" then
|
|
local device = ppm.handle_unmount(param1)
|
|
|
|
if device.type == "modem" then
|
|
-- we only care if this is our wireless modem
|
|
if device.dev == modem then
|
|
println_ts("wireless modem disconnected!")
|
|
log._error("comms modem disconnected!")
|
|
else
|
|
log._warning("non-comms modem disconnected")
|
|
end
|
|
end
|
|
elseif event == "peripheral" then
|
|
local type, device = ppm.mount(param1)
|
|
|
|
if type == "modem" then
|
|
if device.isWireless() then
|
|
-- reconnected modem
|
|
modem = device
|
|
superv_comms.reconnect_modem(modem)
|
|
|
|
println_ts("wireless modem reconnected.")
|
|
log._info("comms modem reconnected.")
|
|
else
|
|
log._info("wired modem reconnected.")
|
|
end
|
|
end
|
|
elseif event == "timer" and param1 == loop_clock then
|
|
-- basic event tick, send keep-alives
|
|
loop_clock = os.startTimer(0.25)
|
|
elseif event == "modem_message" then
|
|
-- got a packet
|
|
local packet = superv_comms.parse_packet(p1, p2, p3, p4, p5)
|
|
superv_comms.handle_packet(packet)
|
|
end
|
|
|
|
-- check for termination request
|
|
if event == "terminate" or ppm.should_terminate() then
|
|
log._warning("terminate requested, exiting...")
|
|
-- @todo: attempt failover, alert hot backup
|
|
break
|
|
end
|
|
end
|
|
|
|
println_ts("exited")
|
|
log._info("exited")
|