AccessCardServerSecurity.exe

print("Connection a RedNet...")
rednet.open("top")

--Variable(s)--

print("En attente de requetes...")
local senderIP, request = rednet.receive()
local senderIPcard, dataKey = rednet.receive()
--local logsFile = fs.open("disk/Logs.txt", "w")

--Fonction(s)--

function writeInfo()

  print("--> Requete recu: ", os.day(), " ", os.time())
  print("    >>IPSource: ", senderIP)
  print("    >>AccessID: ", dataKey)
  print("    >>RequestLevel: ", request)

end

--Protocole--

writeInfo()
accessList = fs.open(request, "r")

for i = 1, 20 do

  if accessList.readLine(i) == dataKey then

    rednet.send(senderIP, "AccessGranted")
    print(i, " ID Match!")
    print("--Access Granted--")
    break

  else

    print(i, " ID doesn't match...")

  end

end

--New Instance/End Of Program--
rednet.close("top")
shell.openTab("security.exe")
sleep(120)
shell.exit()