Server [Security]

do -- Installing sheepelibs due to dependancies
    if fs.exists("sheepelibs") then
        for _, api in pairs(fs.list("sheepelibs")) do
            local name = api:match("(%w+)%.lua")
            if name then
                os.unloadAPI("sheepelibs/"..api)
            end
        end

        fs.delete("sheepelibs")
        fs.delete("sheepelibs.lua")
        os.reboot()
    end

    local con = http.get("https://pastebin.com/raw/X43Ldruq")

    if con then
        local source = con.readAll()
        con.close()

        local func, err = load(source, "X43Ldruq", "t", _ENV)

        if not func then
            printError(err)
            return
        end

        local success, msg = pcall(func, "true")

        if not success then
            printError(msg)
            return
        end
    end
end

Encryption.DefineFactors({
    0x428a2f98, 0x71374491, 0xb5c0fbcf, 0xe9b5dba5,
    0x3956c25b, 0x59f111f1, 0x923f82a4, 0xab1c5ed5,
    0xd807aa98, 0x12835b01, 0x243185be, 0x550c7dc3,
    0x72be5d74, 0x80deb1fe, 0x9bdc06a7, 0xc19bf174,
    0xe49b69c1, 0xefbe4786, 0x0fc19dc6, 0x240ca1cc,
    0x2de92c6f, 0x4a7484aa, 0x5cb0a9dc, 0x76f988da,
    0x983e5152, 0xa831c66d, 0xb00327c8, 0xbf597fc7,
    0xc6e00bf3, 0xd5a79147, 0x06ca6351, 0x14292967,
    0x27b70a85, 0x2e1b2138, 0x4d2c6dfc, 0x53380d13,
    0x650a7354, 0x766a0abb, 0x81c2c92e, 0x92722c85,
    0xa2bfe8a1, 0xa81a664b, 0xc24b8b70, 0xc76c51a3,
    0xd192e819, 0xd6990624, 0xf40e3585, 0x106aa070,
    0x19a4c116, 0x1e376c08, 0x2748774c, 0x34b0bcb5,
    0x391c0cb3, 0x4ed8aa4a, 0x5b9cca4f, 0x682e6ff3,
    0x748f82ee, 0x78a5636f, 0x84c87814, 0x8cc70208,
    0x90befffa, 0xa4506ceb, 0xbef9a3f7, 0xc67178f2
})

local INTERNAL_KEY = "10279171dda627442404d64f68134c38fb130b33166e1a00230ba6bdc057a175"
local SERVER_KEY = "c071136ae9fc8b0ecbdb3534434192e9232675b3053f06d37aa8adb014916e63"
local LOCK_KEY = "ab73f7cc67ea1bc27f4667d6a29c44066045605069b468f3e42395cbae3eb31e"

local SEEDBASE = Encryption.SHA256(tostring(0x766a0abbf0fc19dc))
local MASTER_SEED = tonumber(SEEDBASE:gsub("%l", ""))

local DECODE_KEY = Encryption.Encrypt(SEEDBASE, INTERNAL_KEY)

math.randomseed(MASTER_SEED)

local BYTECODE = ""

for byteCount = 1, 2 ^ 12 do
    local byte = ""
    for bitCount = 1, 8 do
        byte = byte .. math.random(0, 1)
    end
    BYTECODE = BYTECODE .. byte
end

local INTERNAL_PASS = Encryption.SHA256(BYTECODE)
print(INTERNAL_PASS)

local modem = peripheral.find("modem")

local POCKET_TO = 10172
local SERVER_TO = 41718
local SERVER_FROM = 15133

modem.open(POCKET_TO)
modem.open(SERVER_TO)
modem.open(SERVER_FROM)

local KEY_DISTRIBUTION = os.startTimer(2)

while true do
    local event, arg0, arg1, arg2, arg3, arg4 = os.pullEvent()

    if event == "modem_message" then
        if arg1 == SERVER_TO and arg2 == SERVER_FROM and type(arg3) == "string" then
            local SERVER_CODE = arg3
            local LOCK_CODE = Encryption.Decrypt(SERVER_CODE, SERVER_KEY)
            local POCKET_PASS = Encryption.Decrypt(LOCK_CODE, LOCK_KEY)

            if POCKET_PASS == INTERNAL_PASS then -- AY SUCCESS
                print("YEET")
                modem.transmit(SERVER_FROM, SERVER_TO, Encryption.Encrypt(SERVER_KEY, SERVER_KEY)) -- REDO LATER, NOT SECURE
            end
        end
    elseif event == "timer" and arg0 == KEY_DISTRIBUTION then
        modem.transmit(POCKET_TO, SERVER_FROM, DECODE_KEY)
        KEY_DISTRIBUTION = os.startTimer(1)
    end
end