51 lines
1.2 KiB
Lua
51 lines
1.2 KiB
Lua
|
-- I, 20kdc, release this into the public domain.
|
||
|
|
-- No warranty is provided, implied or otherwise.
|
||
|
|
|
||
|
|
-- Copper Reliability Layer
|
||
|
|
-- Notably, this should be instantiated rather than the normal Copper instance.
|
||
|
|
|
||
|
|
local culib = require("culib")
|
||
|
|
|
||
|
|
-- onRReceive is now: (from, to, port, data, unreliablePacket)
|
||
|
|
-- where to can be anything for unreliable packets, but otherwise is the current hostname.
|
||
|
|
return function (hostname, transmit, onRReceive, time)
|
||
|
|
-- node.hostname should be used for hostname generally.
|
||
|
|
local node
|
||
|
|
local onReceive = function (nfrom, nto, data)
|
||
|
|
if data:len() < 6 then return end
|
||
|
|
local port = data:byte(2) + (data:byte(1) * 256)
|
||
|
|
if data:byte(7) == 0x0F then
|
||
|
|
onRReceive(nfrom, nto, port, data, true)
|
||
|
|
return
|
||
|
|
end
|
||
|
|
if nto ~= node.hostname then
|
||
|
|
return
|
||
|
|
end
|
||
|
|
end
|
||
|
|
node = culib(hostname, transmit, onReceive, time)
|
||
|
|
|
||
|
|
-- Just an array, no special index.
|
||
|
|
-- Contents : {
|
||
|
|
-- trigger = function(),
|
||
|
|
-- expiry = time,
|
||
|
|
-- }
|
||
|
|
local timers = {}
|
||
|
|
local relib = {}
|
||
|
|
relib.refresh = function ()
|
||
|
|
node.refresh()
|
||
|
|
local i = 1
|
||
|
|
local t = time()
|
||
|
|
while i <= #timers do
|
||
|
|
if timers[i].expiry < t then
|
||
|
|
table.remove(timers, i)
|
||
|
|
else
|
||
|
|
i = i + 1
|
||
|
|
end
|
||
|
|
end
|
||
|
|
end
|
||
|
|
relib.input = node.input
|
||
|
|
relib.output = function ()
|
||
|
|
|
||
|
|
end
|
||
|
|
end
|