backup

--Get arguments
tArgs = {...}

local function backup(dir)
  local files = {}
  for fileNumber, fileName in ipairs(fs.list(dir)) do
    print("Backing up file "..fileNumber.." with name "..fileName)
    local myHandle = fs.open(fs.combine(dir, fileName), "r")
    local myData = myHandle.readAll()
    table.insert(files, myData)
    myHandle.close()
    local bstring = textutils.serialize(files)
    local servConfig = fs.open("system/serversettings", "r")
    local servID = tonumber(servConfig.readAll())
    servConfig.close()
    rednet.send(servID, bString)
  end
end

if #tArgs < 1 or #tArgs > 1 then
  print("Usage: backup <directory>")
  print("Usage: backup all")
end
if tArgs[1] == "test" then
  backup("system")
end