rickydaan

[Lua][CC] Company Server Build 1 <DONT DOWNLOAD>

Mar 2nd, 2012
89
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.45 KB | None | 0 0
  1. local tArgs = { ... }
  2. rednet.open(tArgs[1])
  3.  
  4. if fs.exists("db/") == false then
  5. shell.run("mkdir", "db")
  6. end
  7.  
  8. function register()
  9. registerStop = false
  10. while not registerStop do
  11. c, d = rednet.receive()
  12. if fs.exists(d) == false then
  13. file = io.open("db/" .. d, "w")
  14. e, f = rednet.receive(50000000)
  15. file : write(f)
  16. file : close()
  17. registerStop = true
  18. shell.run("Cserver", "back")
  19. else
  20. registerStop = true
  21. shell.run("Cserver", "back")
  22. end
  23. end
  24. end
  25.  
  26.  
  27. function login()
  28. stop = false
  29. while not stop do
  30. a, b = rednet.receive(5000)
  31. info("Received signal from: " .. a)
  32. sender = tonumber(a)
  33. if fs.exists("db/" .. b) == false then
  34. rednet.send(sender, "wrong")
  35. info("Username doesnt exists")
  36. stop = true
  37. shell.run("Cserver", "back")
  38. else
  39. info("Username exists")
  40. rednet.send(sender, "good")
  41. file = io.open("db/" .. b, "r")
  42. gpass = file : read()
  43. file : close()
  44. c, d = rednet.receive(5000)
  45. if d == gpass then
  46. rednet.send(sender, "good")
  47. stop = true
  48. shell.run("Cserver", "back")
  49. else
  50. rednet.send(sender, "wrong")
  51. stop = true
  52. mainServer()
  53. end
  54. end
  55. end
  56. end
  57.  
  58. function info(info)
  59. term.setCursorPos(1,2)
  60. term.clearLine()
  61. print("INFORMATION: " .. info)
  62. end
  63.  
  64. function mainServer()
  65. stop = false
  66. while not stop do
  67. info("Welcome to BuisnessCorp server by Rickydaan")
  68. a, b = rednet.receive()
  69. if b == "register" then
  70. info("Someone is registering")
  71. stop = true
  72. register()
  73. end
  74. if b == "login" then
  75. stop = true
  76. login()
  77. end
  78. end
  79. end
  80.  
  81. mainServer()
Add Comment
Please, Sign In to add comment