-- ping v2.0.0
local PING_CHANNEL = 9;

local createNet = require('apis/net');
local net = createNet();

local args = table.pack(...);
local targetComputerId = tonumber(args[1]) or args[1];

local sourceId = os.getComputerID()
local sourceLabel = os.getComputerLabel();

-- gérer les pongs locales
if targetComputerId == nil or targetComputerId == sourceId or targetComputerId == sourceLabel then
  print("=> local pong from " .. tostring(sourceId)
    .. (sourceLabel and " (label=" .. tostring(sourceLabel) .. ")" or ""));
end

-- envoyer un message sur le canal 9 à la machine cible

local ok, results, packets = net.sendMultipleRequests(PING_CHANNEL, 'ping', 'ping', targetComputerId);

if not ok then
  error(results)
end

for k, message in ipairs(results) do
  if message == 'pong' then
    local packet = packets[k];

    -- if targetComputerId == nil or targetComputerId == packet.sourceId or targetComputerId == packet.sourceLabel then
    print("=> pong from " .. tostring(packet.sourceId)
      .. (packet.sourceLabel and " (label=" .. tostring(packet.sourceLabel) .. ")" or ""));
    -- end
  end
end