server

noJob=true
rednet.open("top")
Job=nil

while noJob==true do

event,ID,msg,d=os.pullEvent("rednet_message")

  if msg=="newProfile" then
  noJob=false
  job="newProfile"

  elseif msg=="testProfile" then
  noJob=false
  job="testProfile"


  elseif msg=="test" then
  rednet.send(ID,".")
  print("servertest von ID:",ID)
  print(" ")
  shell.run("server")
  error()
  end

print("new Job from ID:",ID,"   ",msg)

end



event,ID,msg,d=os.pullEvent("rednet_message")

senderID=ID
user=msg

event,ID,msg,d=os.pullEvent("rednet_message")

pass=msg
print("username: ",user,"  password: ",pass)


if job=="testProfile" then

file=fs.open("LoginData/latestID","r")
max=file.readLine()
file.close()

i=1
found=false
while found==false and i<=tonumber(max) do

file=fs.open("LoginData/"..i,"r")
readedUser=file.readLine()
readedPass=file.readLine()
file.close()

if user==readedUser and pass==readedPass then
found=true
else
i=i+1
end
end


if found==true then
rednet.send(senderID,tostring(found))
print("correct combination")
else
rednet.send(senderID,tostring(found))
print("incorrect combination")
end

end


if job=="newProfile" then

file=fs.open("LoginData/latestID","r")
latestID=file.readLine()
file.close()

file=fs.open("LoginData/latestID","w")
file.writeLine(latestID+1)
file.close()

file=fs.open("LoginData/"..latestID+1,"w")
file.writeLine(user)
file.writeLine(pass)
file.close()

sleep(1)
print("completed")

end
print(" ")
shell.run("server")
error()