117 lines
3.3 KiB
Lua
117 lines
3.3 KiB
Lua
PROTOCOLS = {
|
|
MODBUS_TCP = 0, -- our "MODBUS TCP"-esque protocol
|
|
RPLC = 1, -- reactor PLC protocol
|
|
SCADA_MGMT = 2, -- SCADA supervisor intercommunication, device advertisements, etc
|
|
COORD_DATA = 3 -- data packets for coordinators to/from supervisory controller
|
|
}
|
|
|
|
SCADA_SV_MODES = {
|
|
ACTIVE = 0, -- supervisor running as primary
|
|
BACKUP = 1 -- supervisor running as hot backup
|
|
}
|
|
|
|
RPLC_TYPES = {
|
|
KEEP_ALIVE = 0, -- keep alive packets
|
|
LINK_REQ = 1, -- linking requests
|
|
STATUS = 2, -- reactor/system status
|
|
MEK_STRUCT = 3, -- mekanism build structure
|
|
MEK_SCRAM = 4, -- SCRAM reactor
|
|
MEK_ENABLE = 5, -- enable reactor
|
|
MEK_BURN_RATE = 6, -- set burn rate
|
|
ISS_ALARM = 7, -- ISS alarm broadcast
|
|
ISS_GET = 8, -- get ISS status
|
|
ISS_CLEAR = 9 -- clear ISS trip (if in bad state, will trip immediately)
|
|
}
|
|
|
|
RPLC_LINKING = {
|
|
ALLOW = 0, -- link approved
|
|
DENY = 1, -- link denied
|
|
COLLISION = 2 -- link denied due to existing active link
|
|
}
|
|
|
|
SCADA_MGMT_TYPES = {
|
|
PING = 0, -- generic ping
|
|
SV_HEARTBEAT = 1, -- supervisor heartbeat
|
|
REMOTE_LINKED = 2, -- remote device linked
|
|
RTU_ADVERT = 3, -- RTU capability advertisement
|
|
RTU_HEARTBEAT = 4, -- RTU heartbeat
|
|
}
|
|
|
|
RTU_ADVERT_TYPES = {
|
|
BOILER = 0, -- boiler
|
|
TURBINE = 1, -- turbine
|
|
IMATRIX = 2, -- induction matrix
|
|
REDSTONE = 3 -- redstone I/O
|
|
}
|
|
|
|
-- generic SCADA packet object
|
|
function scada_packet()
|
|
local self = {
|
|
modem_msg_in = nil,
|
|
valid = false,
|
|
seq_num = nil,
|
|
protocol = nil,
|
|
length = nil,
|
|
raw = nil
|
|
}
|
|
|
|
local make = function (seq_num, protocol, payload)
|
|
self.valid = true
|
|
self.seq_num = seq_num
|
|
self.protocol = protocol
|
|
self.length = #payload
|
|
self.raw = { self.seq_num, self.protocol, self.length, payload }
|
|
end
|
|
|
|
local receive = function (side, sender, reply_to, message, distance)
|
|
self.modem_msg_in = {
|
|
iface = side,
|
|
s_port = sender,
|
|
r_port = reply_to,
|
|
msg = message,
|
|
dist = distance
|
|
}
|
|
|
|
self.raw = self.modem_msg_in.msg
|
|
|
|
if #self.raw < 3 then
|
|
-- malformed
|
|
return false
|
|
else
|
|
self.valid = true
|
|
self.seq_num = self.raw[1]
|
|
self.protocol = self.raw[2]
|
|
self.length = self.raw[3]
|
|
end
|
|
end
|
|
|
|
local modem_event = function () return self.modem_msg_in end
|
|
local raw = function () return self.raw end
|
|
|
|
local is_valid = function () return self.valid end
|
|
|
|
local seq_num = function () return self.seq_num end
|
|
local protocol = function () return self.protocol end
|
|
local length = function () return self.length end
|
|
|
|
local data = function ()
|
|
local subset = nil
|
|
if self.valid then
|
|
subset = { table.unpack(self.raw, 4, 3 + self.length) }
|
|
end
|
|
return subset
|
|
end
|
|
|
|
return {
|
|
make = make,
|
|
receive = receive,
|
|
modem_event = modem_event,
|
|
raw = raw,
|
|
is_valid = is_valid,
|
|
seq_num = seq_num,
|
|
protocol = protocol,
|
|
length = length,
|
|
data = data
|
|
}
|
|
end
|