BackdoorFinder.lua

--[[
▄▄▄▄    ▄▄▄       ▄████▄   ██ ▄█▀▓█████▄  ▒█████   ▒█████   ██▀███           █████▒██▓ ███▄    █ ▓█████▄ ▓█████  ██▀███
▓█████▄ ▒████▄    ▒██▀ ▀█   ██▄█▒ ▒██▀ ██▌▒██▒  ██▒▒██▒  ██▒▓██ ▒ ██▒       ▓██   ▒▓██▒ ██ ▀█   █ ▒██▀ ██▌▓█   ▀ ▓██ ▒ ██▒
▒██▒ ▄██▒██  ▀█▄  ▒▓█    ▄ ▓███▄░ ░██   █▌▒██░  ██▒▒██░  ██▒▓██ ░▄█ ▒       ▒████ ░▒██▒▓██  ▀█ ██▒░██   █▌▒███   ▓██ ░▄█ ▒
▒██░█▀  ░██▄▄▄▄██ ▒▓▓▄ ▄██▒▓██ █▄ ░▓█▄   ▌▒██   ██░▒██   ██░▒██▀▀█▄         ░▓█▒  ░░██░▓██▒  ▐▌██▒░▓█▄   ▌▒▓█  ▄ ▒██▀▀█▄
░▓█  ▀█▓ ▓█   ▓██▒▒ ▓███▀ ░▒██▒ █▄░▒████▓ ░ ████▓▒░░ ████▓▒░░██▓ ▒██▒       ░▒█░   ░██░▒██░   ▓██░░▒████▓ ░▒████▒░██▓ ▒██▒
░▒▓███▀▒ ▒▒   ▓▒█░░ ░▒ ▒  ░▒ ▒▒ ▓▒ ▒▒▓  ▒ ░ ▒░▒░▒░ ░ ▒░▒░▒░ ░ ▒▓ ░▒▓░        ▒ ░   ░▓  ░ ▒░   ▒ ▒  ▒▒▓  ▒ ░░ ▒░ ░░ ▒▓ ░▒▓░
▒░▒   ░   ▒   ▒▒ ░  ░  ▒   ░ ░▒ ▒░ ░ ▒  ▒   ░ ▒ ▒░   ░ ▒ ▒░   ░▒ ░ ▒░        ░      ▒ ░░ ░░   ░ ▒░ ░ ▒  ▒  ░ ░  ░  ░▒ ░ ▒░
░    ░   ░   ▒   ░        ░ ░░ ░  ░ ░  ░ ░ ░ ░ ▒  ░ ░ ░ ▒    ░░   ░         ░ ░    ▒ ░   ░   ░ ░  ░ ░  ░    ░     ░░   ░
░            ░  ░░ ░      ░  ░      ░        ░ ░      ░ ░     ░                    ░           ░    ░       ░  ░   ░
░           ░                ░                                                               ░
▄▄▄▄·  ▄· ▄▌    .▄▄ ·  ▄▄▄· ▄▄▄  ·▄▄▄▄         ▐ ▄  ▄· ▄▌▐▄• ▄
▐█ ▀█▪▐█▪██▌    ▐█ ▀. ▐█ ▀█ ▀▄ █·██▪ ██ ▪     •█▌▐█▐█▪██▌ █▌█▌▪
▐█▀▀█▄▐█▌▐█▪    ▄▀▀▀█▄▄█▀▀█ ▐▀▀▄ ▐█· ▐█▌ ▄█▀▄ ▐█▐▐▌▐█▌▐█▪ ·██·
██▄▪▐█ ▐█▀·.    ▐█▄▪▐█▐█ ▪▐▌▐█•█▌██. ██ ▐█▌.▐▌██▐█▌ ▐█▀·.▪▐█·█▌
·▀▀▀▀   ▀ •      ▀▀▀▀  ▀  ▀ .▀  ▀▀▀▀▀▀•  ▀█▄▀▪▀▀ █▪  ▀ • •▀▀ ▀▀
]]
-- We put here our identifiers that can pass the block
local allowedIdentifiers = {}

-- vv I took this part from sh https://scriptinghelpers.org/questions/78269/is-it-possible-to-generate-a-random-string-of-numbers-letters-and-symbols vv
local characterSet = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789"

local function randomString()
    local output = ""
    
    for i = 1, 7 do
        local rand = math.random(#characterSet)
        output = output .. string.sub(characterSet, rand, rand)
    end

    return output
end

-- ^^ I took this part from sh https://scriptinghelpers.org/questions/78269/is-it-possible-to-generate-a-random-string-of-numbers-letters-and-symbols ^^

local warnText = "\n\n!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!\n\n"

local function has(tab, val)
    for i, value in ipairs(tab) do
        if value == val then
            return true
        end
    end
    
    return false
end 

local rs = RunString

function RunString(code, identifier, handleError)
    local where = debug.getinfo(2)
    
    if (has(allowedIdentifiers, identifier)) then return rs(code, identifier, handleError) end
    
    local id = randomString()
    
    MsgC(Color(255, 0, 0), warnText .. "[BACKDOOR FINDER] BACKDOOR ATTEMPT AT " .. where.source .. ":" .. where.currentline .. " ( THE CODE THAT WAS ATTEMPTED TO RUN IT WAS SAVED IN data/backdoor-" .. id .. ".txt )" .. warnText)
    
    file.Write("backdoor-" .. id .. ".txt", code)
    
    return 0
end

local cs = CompileString

function CompileString(code, identifier, handleError)
    local where = debug.getinfo(2)
    
    if (has(allowedIdentifiers, identifier)) then return cs(code, identifier, handleError) end
    
    local id = randomString()
    
    MsgC(Color(255, 0, 0), warnText .. "[BACKDOOR FINDER] BACKDOOR ATTEMPT AT " .. where.source .. ":" .. where.currentline .. " ( THE CODE THAT WAS ATTEMPTED TO RUN IT WAS SAVED IN data/backdoor-" .. id .. ".txt )" .. warnText)
    
    file.Write("backdoor-" .. id .. ".txt", code)
    
    return function() return "no ❤" end
end

function RunStringEx()
    print("RunStringEx is deprecated please use RunString instead")
end