API tools faq
paste
Guest User

bankServer

a guest
May 4th, 2014
236
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 9.16 KB | None | 0 0
raw download clone embed print report
  1. --bankServer V: 0.2.1
  2.  
  3. local id = os.getComputerID()
  4. if fs.exists("server/id") then
  5.   local time = os.time()
  6.   local date = os.day()
  7.   local file = fs.open("backups/serverlog","a")
  8.   file.write(date..","..time.."("..id.."): Server started\n")
  9.   rednet.open("left")
  10.   local file = fs.open("backups/serverlog","a")
  11.   file.write(date..","..time.."("..id.."): RedNet activated\n")
  12.   file.close()
  13.   shell.run("clear")
  14.   print("Opening listening ports")
  15.   os.loadAPI("crypt")
  16.   sleep(2)
  17.   shell.run("clear")
  18.   print("Ports open, System online")
  19.   while true do
  20.     local id,msg = rednet.receive()
  21.     local data = textutils.unserialize(msg)
  22.     local cmd = data[1]
  23.     local acc = data[2]
  24.     local pwd = data[3]
  25.     local amt = data[4]
  26.     local toA = data[5]  
  27.     if cmd == "install" then
  28.       local file = fs.open("backups/serverlog","a")
  29.       file.write(date..","..time.."("..id.."): Attempting client install\n")
  30.       file.close()
  31.       print("("..id.."): Attempting Client Install")
  32.       if fs.exists("clients/")then
  33.         if fs.exists ("clients/"..id) then
  34.           rednet.send(id, " Client already installed")
  35.           local file = fs.open("backups/serverlog","a")
  36.           file.write(date..","..time..":"..id.."): Client already installed\n")
  37.           file.close()
  38.           print("("..id.."): Client already installed")
  39.         else
  40.           local file = fs.open("clients/"..id,"w")
  41.           file.close()
  42.           rednet.send(id, " Client installed")
  43.           local file = fs.open("backups/serverlog","a")
  44.           file.write(date..","..time.."("..id.."): Client installed\n")
  45.           file.close()
  46.           print("("..id.."): Client installed")
  47.         end
  48.       else
  49.         fs.makeDir("clients")
  50.         local file = fs.open("clients/"..id,"w")
  51.         file.close()
  52.         rednet.send(id, " Client installed")
  53.         local file = fs.open("backups/serverlog","a")
  54.         file.write(date..","..time.."("..id.."): Client installed\n")
  55.         file.close()
  56.         print("("..id.."):  Client installed")
  57.       end
  58.     elseif cmd == "create" then
  59.       if fs.exists("clients/"..id) then
  60.         if fs.exists("users/" ..acc)then
  61.           rednet.send(id, "used")
  62.           local file = fs.open("backups/serverlog","a")
  63.           file.write(date..","..time.."("..id.."): Account "..usr" already created\n")
  64.           file.close()
  65.           print("("..id.."): Account "..usr.." already created")
  66.         else
  67.           local file = fs.open("users/"..acc, "w")
  68.           file.write(textutils.serialize({name = acc, pass = pwd, bal = 1000}))
  69.           file.close()
  70.           rednet.send(id, "created")
  71.           local file = fs.open("backups/serverlog","a")
  72.           file.write(date..","..time.."("..id.."): Account "..acc.." created\n")
  73.           file.close()
  74.           print("("..id.."): Account "..acc.." created")
  75.         end
  76.     elseif cmd == "login" then
  77.       local file = fs.open("backups/serverlog","a")
  78.       file.write(date..","..time.."("..id.."): User: "..acc.." login\n")
  79.       file.close()
  80.       print("("..id.."): User "..acc.." authentication attempted")
  81.       if fs.exists("clients/"..id) then
  82.         if fs.exists("users/"..acc) then
  83.           local file = fs.open("users/"..acc, "r")
  84.           local data = file.readall()
  85.           file.close()
  86.           data = textutils.unserialize(data)
  87.           if data[pass] == pwd then
  88.             rednet.send(id, textutils.serialize({"confirm", data[name], data[bal]}))
  89.             local id,msg = rednet.receive()
  90.             local data = textutils.unserialize(msg)
  91.             if cmd == "withdraw" then
  92.               local file = fs.open("backups/serverlog","a")
  93.               file.write(date..","..time.."("..id.."): "..acc.." Withdraw attempt\n")
  94.               file.close()
  95.               print("("..id.."): User "..acc.." Withdrawal attempted")
  96.               newBal = math.floor(bal-amt)  
  97.               local file = fs.open("users/"..acc, "w")
  98.               file.write(textutils.serialize({name = acc, pass = pwd, bal = newBal}))
  99.               file.close()
  100.               local file = fs.open("backups/serverlog","a")
  101.               file.write(date..","..time.."("..id.."): "..acc.." Withdrew "..amt"\n")
  102.               file.close()
  103.               rednet.send(id, textutils.serialize({"confirm", acc, bal = newBal}))
  104.             elseif cmd == "deposit" then
  105.               local file = fs.open("backups/serverlog","a")
  106.               file.write(date..","..time.."("..id.."): "..acc.." Deposit attempt\n")
  107.               file.close()
  108.               print("("..id.."): User "..acc.." Deposit attempted")
  109.               newBal = math.floor(bal+amt)  
  110.               local file = fs.open("users/"..acc, "w")
  111.               file.write(textutils.serialize({name = acc, pass = pwd, bal = newBal}))
  112.               file.close()
  113.               local file = fs.open("backups/serverlog","a")
  114.               file.write(date..","..time.."("..id.."): "..acc.." Deposited "..amt"\n")
  115.               file.close()
  116.               rednet.send(id, textutils.serialize({"confirm", acc, bal = newBal}))
  117.             elseif cmd == "transfer" then
  118.               local file = fs.open("backups/serverlog","a")
  119.               file.write(date..","..time.."("..id.."): "..acc.." transfer attempt\n")
  120.               file.close()
  121.               print("("..id.."): User "..acc.." Transfer attempted")
  122.               newBal = math.floor(bal-amt)  
  123.               local file = fs.open("users/"..acc, "w")
  124.               file.write(textutils.serialize({name = acc, pass = pwd, bal = newBal}))
  125.               file.close()
  126.               rednet.send(id, textutils.serialize({"confirm", acc, bal = newBal}))
  127.               local file = fs.open("users/"..toA, "r")
  128.               local data = file.readall()
  129.               file.close()
  130.               newBal = math.floor(bal+amt)  
  131.               local file = fs.open("users/"..toA, "w")
  132.               file.write(textutils.serialize({name = acc, pass = pwd, bal = newBal}))
  133.               file.close()
  134.               local file = fs.open("backups/serverlog","a")
  135.               file.write(date..","..time.."("..id.."): "..acc.." transferred $"..amt.." to: "..toA"\n")
  136.               file.close()
  137.               print("("..id.."): User "..acc.." transferred $"..amt.." to: "..toA)
  138.             else
  139.               rednet.send(id, textutils.serialize({"declined"}))
  140.               local file = fs.open("backups/serverlog","a")
  141.               file.write(date..","..time.."("..id.."): Unknown command "..cmd.." entered\n")
  142.               file.close()
  143.               print("("..id.."): Unknown command "..cmd.." entered")
  144.             end
  145.           else
  146.             rednet.send(id, textutils.serialize({"declined"}))
  147.             local file = fs.open("backups/serverlog","a")
  148.             file.write(date..","..time.."("..id.."): "..acc.." Password incorrect\n")
  149.             file.close()
  150.             print("("..id.."): User "..acc.." entered an incorrect password")
  151.           end
  152.         else
  153.           rednet.send(id, textutils.serialize({"declined"}))
  154.           local file = fs.open("backups/serverlog","a")
  155.           file.write(date..","..time.."("..id.."): User "..acc.." doesn't exist\n")
  156.           file.close()
  157.           print("("..id.."): User "..acc.." doesn't exist")
  158.         end
  159.       else
  160.         rednet.send(id, textutils.serialize({"declined"}))
  161.         local file = fs.open("backups/serverlog","a")
  162.         file.write(date..","..time.."("..id.."):Unrecognised client\n")
  163.         file.close()
  164.         print("("..id.."): Unrecognised client, access denied")
  165.       end
  166.     elseif cmd == "eCharge" then
  167.       local file = fs.open("backups/serverlog","a")
  168.       file.write(date..","..time.."("..id.."): "..acc.." transfer attempt\n")
  169.       file.close()
  170.       print("("..id.."): User "..acc.." Transfer attempted")
  171.       local amt = 0.5
  172.       newBal = math.floor(bal-amt)  
  173.       local file = fs.open("users/"..acc, "w")
  174.       file.write(textutils.serialize({name = acc, pass = pwd, bal = newBal}))
  175.       file.close()
  176.       rednet.send(id, textutils.serialize({"confirm", acc, bal = newBal}))
  177.       local file = fs.open("users/"..toA, "r")
  178.       local data = file.readall()
  179.       file.close()
  180.       newBal = math.floor(bal+amt)  
  181.       local file = fs.open("users/"..toA, "w")
  182.       file.write(textutils.serialize({name = acc, pass = pwd, bal = newBal}))
  183.       file.close()
  184.       local file = fs.open("backups/serverlog","a")
  185.       file.write(date..","..time.."("..id.."): "..acc.." transferred $"..amt.." to: "..toA"\n")
  186.       file.close()
  187.       print("("..id.."): User "..acc.." transferred $"..amt.." to: "..toA)
  188.     else rednet.send(id, textutils.serialize({"declined"}))
  189.       local file = fs.open("backups/serverlog","a")
  190.       file.write(date..","..time.."("..id.."): Unknown command "..cmd.." entered\n")
  191.       file.close()
  192.       print("("..id.."): Unknown command "..cmd.." entered")
  193.     end
  194.   end
  195. end
  196. else
  197.   local id = os.getComputerID()
  198.   fs.makeDir("server")
  199.   local file = fs.open("server/id","w")
  200.   file.write(id)
  201.   file.close()
  202.   local file = fs.open("backups/serverlog","a")
  203.   file.write(date..","..time.."("..id.."): Server Created\n")
  204.   file.close()
  205.   print("This Server's ID is "..id)
  206.   sleep(5)
  207. end
Add Comment
Please, Sign In to add comment
Public Pastes
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!