databaseServer

--[[
FILENAME: databaseServer.lua(Startup.lua)
AUTHOR: Donald R. Valverde (Cavious)
VERSION: 1.0-BETA
--]]

rednet.open( "back" )
rsDoor = --Needs computerNumber

function logData(text)
    local nTime = os.time()
    local file = fs.open(".db_log", "a")
    file.writeLine(textutils.formatTime( nTime, false).."::"..text)
    file.close()
end

function pullDatabase(connectionID, password)
    local file = fs.open(".db_passwords", "r")
    local data = file.readAll()
    file.close()


    if (data:match(password)) then
        rednet.send(connectionID, ".successful")
        logData(connectionID..password.."SUCCESS")
    else
        rednet.send(connectionID, ".fail")
        logData(connectionID..password.."FAILED")
    end
end

function redNetData()
    while(true) do
        local id, message, protocol = rednet.receive("password")

        pullDatabase(id, message)

    end
end

function doorAccess()
    while(true) do
        term.clear()
        term.setCursorPos(1,1)
        term.setBackgroundColor(colors.gray)
        term.setTextColor(colors.yellow)
        term.write("DOOR(OPEN/CLOSE): ")
        term.setTextColor(colors.lightBlue)

        input = io.read()
        string.lower(input)

        if(input == "open") then
            rednet.send(rsDoor, ".open")
            logData("SERVER_COMMAND::OPEN")
            term.setCursorPos(1,2)
            term.write("DOOR OPEN!")
            os.sleep(10)
            rednet.send(rsDoor, ".close")
            logData("SERVER_COMMAND::CLOSE_TIMEDELAY")
        elseif(input == "close") then
            rednet.send(rsDoor, ".close")
            logData("SERVER_COMMAND::CLOSE")
        end

    end
end

term.clear()

while(true) do
    parallel.waitForAny(redNetData, doorAccess)
end