rphbios.lua

local port = 8022
local respport = 8023

local modem = component.proxy(component.list("modem")())

modem.open(port)
modem.open(respport)

local function safeload(code)
  local f = load(code)
  local info = {pcall(f)}
  return info
end

while true do
  local ev = {computer.pullSignal()}
  if ev[1] == "modem_message" then
    if ev[4] == port then
      if ev[6] == "LOAD" then
        local resp = safeload(ev[7])
        modem.broadcast(respport, "LOAD_INFO", resp)
      end
    end
  end
end