zFile sender

local modem = peripheral.find "modem"
local id, file, filename, password_number = ...
local password_number = tonumber(password_number)
if not password_number then print "No password supplied. Brute-force mode enabled." end
local id = tonumber(id)

local f = fs.open(file, "r")
local d = f.readAll()
f.close()

local function send_packet(password_number)
    modem.transmit(2322, 2323, {
        id = id,
        senderId = 0,
        password = ("zf.%d"):format(password_number),
        fileName = filename,
        fileContents = d
    })
end

if password_number then send_packet(password_number)
else
    for i = 1000, 9999 do
        send_packet(i)
        if i % 100 == 0 then sleep() end
    end
end