nice

term.clear()
term.setCursorPos(1,1)
print('^')
_1 = 'drive_1'
_2 = 'drive_2'
_3 = 'drive_3'
_4 = 'drive_4'
_5 = 'drive_5'
_6 = 'drive_6'
_7 = 'drive_7'
_8 = 'drive_8'
_9 = 'drive_9'
_10 = 'drive_10'
_11 = 'drive_11'
_12 = 'drive_12'
door_0 = peripheral.wrap('drive_0')
door_1 = peripheral.wrap('drive_13')
door_2 = peripheral.wrap('drive_15')
m = peripheral.wrap('back')

_func = {}
wrap = {}
disks = {
  cdunn = {authentication = 'password',authorization = {'*'}},
  user = {authentication = 'password', authorization = {_1,_2} --[[authorization = {cage #}]]}
}



for i=1,12 do
  wrap['drive_'..i] = peripheral.wrap('drive_'..i)
end



function _func.drive_0()
    commands.exec('setblock 0 4 -6 redstone_block 1 destroy')
    sleep(2)
    commands.exec('setblock 0 4 -6 stone 0 destroy')
end

function _func.drive_1()
    commands.exec('setblock 2 3 -27 redstone_block 1 destroy')
    sleep(2)
    commands.exec('setblock 2 3 -27 stained_glass 15 destroy')
end

function _func.drive_2()
    commands.exec('setblock -2 3 -27 redstone_block 1 destroy')
    sleep(2)
    commands.exec('setblock -2 3 -27 stained_glass 15 destroy')
end

function _func.drive_3()
    commands.exec('setblock 2 3 -37 redstone_block 1 destroy')
    sleep(2)
    commands.exec('setblock 2 3 -37 stained_glass 15 destroy')
end

function _func.drive_4()
    commands.exec('setblock -2 3 -37 redstone_block 1 destroy')
    sleep(2)
    commands.exec('setblock -2 3 -37 stained_glass 15 destroy')
end

function _func.drive_5()
    commands.exec('setblock 2 3 -47 redstone_block 1 destroy')
    sleep(2)
    commands.exec('setblock 2 3 -47 stained_glass 15 destroy')
end

function _func.drive_6()
    commands.exec('setblock -2 3 -47 redstone_block 1 destroy')
    sleep(2)
    commands.exec('setblock -2 3 -47 stained_glass 15 destroy')
end

function _func.drive_7()
    commands.exec('setblock 2 3 -54 redstone_block 1 destroy')
    sleep(2)
    commands.exec('setblock 2 3 -54 stained_glass 15 destroy')
end

function _func.drive_8()
    commands.exec('setblock -2 3 -54 redstone_block 1 destroy')
    sleep(2)
    commands.exec('setblock -2 3 -54 stained_glass 15 destroy')
end

function _func.drive_9()
    commands.exec('setblock 2 3 -64 redstone_block 1 destroy')
    sleep(2)
    commands.exec('setblock 2 3 -64 stained_glass 15 destroy')
end

function _func.drive_10()
    commands.exec('setblock -2 3 -64 redstone_block 1 destroy')
    sleep(2)
    commands.exec('setblock -2 3 -64 stained_glass 15 destroy')
end

function _func.drive_11()
    commands.exec('setblock 2 3 -72 redstone_block 1 destroy')
    sleep(2)
    commands.exec('setblock 2 3 -72 stained_glass 15 destroy')
end

function _func.drive_12()
    commands.exec('setblock -2 3 -72 redstone_block 1 destroy')
    sleep(2)
    commands.exec('setblock -2 3 -72 stained_glass 15 destroy')
end

function _func.drive_13()
    commands.exec('setblock 0 4 -14 redstone_block 1 destroy')
    sleep(2)
    commands.exec('setblock 0 4 -14 stone 0 destroy')
    sleep(2)
    commands.exec('setblock 0 4 -18 redstone_block 1 destroy')
    sleep(2)
    commands.exec('setblock 0 4 -18 stone 0 destroy')
end

function _func.drive_15()
    commands.exec('setblock 0 4 -18 redstone_block 1 destroy')
    sleep(2)
    commands.exec('setblock 0 4 -18 stone 0 destroy')
    sleep(2)
    commands.exec('setblock 0 4 -14 redstone_block 1 destroy')
    sleep(2)
    commands.exec('setblock 0 4 -14 stone 0 destroy')
end

function getLabel(side)
    local user = disk.getLabel(side)
    if user == 'cmdpwnd' then user = 'jacky500' end
    return user
end

function run()
    while true do
        local event, side = os.pullEvent()
        if event == 'disk' then
            --Read Access-Disk
            local mount = disk.getMountPath(side)
            print(mount)
            local ok, err = pcall(fs.open(mount..'/dc','r'))
            print(ok)
            if ok then
                commands.exec('tellraw'..getLabel(side)..'True')
                local f1 = fs.open(mount..'/dc','r')
                local contents = textutils.unserialize(f1.readAll())
                f1.close()
                --Authenticate
                if contents.authentication == disks[getLabel(side)].authentication then
                    if disks[getLabel(side)].authorization[1] == '*' then --Global Authorization
                        local f2 = fs.open('log','a')
                        f2.write(getLabel(side)..' @ '..side..' : true\n')
                        print(getLabel(side)..' @ '..side..' : true')
                        f2.close()
                        disk.eject(side) --Return Access-Disk
                        _func[side]() --Execute function to open door
                        run()
                    else --Non-Global Authorization
                        for i=1,#disks[getLabel(side)].authorization do
                            if disks[getLabel(side)].authorization[i] == side then
                                local f3 = fs.open('log','a')
                                f3.write(getLabel(side)..' @ '..side..' : true\n')
                                print(getLabel(side)..' @ '..side..' : true')
                                f3.close()
                                disk.eject(side)
                                _func[side]() --Execute function to open door
                            else
                                if i == #disks[getLabel(side)].authorization then
                                    local f3 = fs.open('log','a')
                                    f3.write(getLabel(side)..' @ '..side..' : false\n')
                                    print(getLabel(side)..' @ '..side..' : true\n')
                                    f3.close()
                                    disk.eject(side)
                                end
                            end
                        end
                    end
                else
                    local f3 = fs.open('log','a')
                    f3.write(getLabel(side)..' @ '..side..' : false\n')
                    print(getLabel(side)..' @ '..side..' : true')
                    f3.close()
                    disk.eject(side)
                    local com = 'tellraw '..getLabel(side)..' "Access Denied: Invalid Key"'
                    print(com)
                    commands.exec(com)
                end
            else
                print(err)
                disk.eject(side)
                local com = 'tellraw '..getLabel(side)..' "Access Denied: Null Key"'
                print(com)
                commands.exec(com)

            end
        end
    end
end

run()