API tools faq
paste
Advertisement
exective

fustrp/primerp/cakerp anti cheat deobfuscate

exective
Jul 3rd, 2020 (edited)
1,772
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 13.90 KB | None | 0 0
raw download clone embed print report
  1. local tablecopys = _G["table"]["Copy"]
  2. local debugsetfenvs = _G["debug"]["setfenv"]
  3. local badfiles = {
  4.     ["/"] = {"scripthook", "fucknigger", "imgui.ini"},
  5.     ["garrysmod/lua/"] = {
  6.         "cheat.lua",
  7.         "smeg.lua",
  8.         "new_acebot.lua",
  9.         "acebot.lua",
  10.         "smeghack.lua",
  11.         "aim.lua",
  12.         "daz.lua",
  13.         "roflz.lua",
  14.         "1.lua",
  15.         "kek.lua",
  16.         "wh.lua",
  17.         "noclip.lua",
  18.         "r8.lua",
  19.         "darkexploits.lua",
  20.         "wallhackinv.lua",
  21.         "bridgehack.lua"
  22.     },
  23.     ["garrysmod/addons/"] = {"playermodel_esp_wallhack_935666084.gma", "lennys_scripts_2_-_enhance_your_experience_186936307.gma", "pasteware_(free)_1358312768.gma"}
  24. }
  25. debugsetfenvs(
  26.     function()
  27.         local netstarts = nets["Start"]
  28.         local netwriteBool = nets["WriteBool"]
  29.         local netWriteDouble = nets["WriteDouble"]
  30.         local netWriteString = nets["WriteString"]
  31.         local netReadBool = nets["ReadBool"]
  32.         local netReadString = nets["ReadString"]
  33.         local netSendToServer = nets["SendToServer"]
  34.         local netReceive = nets["Receive"]
  35.         local timerCreate = timers["Create"]
  36.         local timerSimple = timers["Simple"]
  37.         local jitAttach = jit["attach"]
  38.         local utilfuncinfos = jit["util"]["funcinfo"]
  39.         local utilfuncbcs = jit["util"]["funcbc"]
  40.         local versionmatchs = jit["version"]["match"]
  41.         local jitbxors = jit["bxor"]
  42.         local AAAA6 = strings["Set"]
  43.         local AAAAAAAAAAAA7 = bits["GetNumber"]
  44.         local AAAA8 = cookies["Find"]
  45.         local fileexists = files["Exists"]
  46.         local rendercaptures = renders["Capture"]
  47.         local debuggetinfo = debugs["getinfo"]
  48.         local httpfetchs = https["Fetch"]
  49.         local utilsCRC = utils["CRC"]
  50.         local vguiGetControlTable = vgui["GetControlTable"]
  51.         local AAAA10 = utils[""]
  52.         local AAAAAAAAAAAAAAAA9 = utils["traceback"]
  53.         local AAAA12 = false
  54.         local function banme(a, b)
  55.             if AAAA12 then
  56.                 return
  57.             end
  58.             netstarts("~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~")
  59.             netwriteBool(true)
  60.             netWriteDouble(a)
  61.             netWriteString(
  62.                 debugs[" "]() .. (b and " " .. b or "")
  63.             )
  64.             netSendToServer()
  65.             timerSimple(
  66.                 0,
  67.                 function()
  68.                     RunConsoleCommands("~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~", AAAAAAAAAAAA13)
  69.                     LocalPlayerConCommands(LocalPlayers, "~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~" .. " " .. AAAAAAAAAAAA13)
  70.                 end
  71.             )
  72.             AAAA12 = true
  73.         end
  74.         if fileexists(" ") and false then
  75.             banme(10)
  76.             return
  77.         end
  78.         if true then
  79.             for a, b in pairss(badfiles) do
  80.                 for _, files in pairss(b) do
  81.                     if debuggetinfo((a == "/" and "" or a) .. files, "BASE_PATH") then
  82.                         banme(11)
  83.                         return
  84.                     end
  85.                 end
  86.             end
  87.         end
  88.         local function overcheck(a)
  89.             return utilfuncinfos(a).addr ~= nil
  90.         end
  91.         local overfunctions = {
  92.             utilfuncinfos,
  93.             jitAttach,
  94.             stringmath,
  95.             bit.brox,
  96.             file.Exists,
  97.             render.Capture,
  98.             CompileStrings,
  99.             netstarts,
  100.             netSendToServer,
  101.             RunConsoleCommands,
  102.             pairss,
  103.             debuggetinfo
  104.         }
  105.         local runned = false
  106.         jitAttach(
  107.             function()
  108.                 runned = true
  109.             end,
  110.             "bc"
  111.         )
  112.         local AAAA15 = CompileStrings("local ‌=0 ‌=‌+345 ‌=‌-819 ‌=‌‌‌7(‌,-3) ‌=‌+133 ‌=‌+-282 ‌=‌-(-899) ‌=‌*3 ‌=‌*-5 ‌=‌+-1005 ‌=‌*-5 return ‌", "LuaCmd")
  113.         if not AAAA15 or not runned then
  114.             banme(13)
  115.             return
  116.         end
  117.         AAAA15 = debugsetfenvs(AAAA15, {AAAAAAAAAAAA7 = AAAAAAAAAAAA7})
  118.         if not AAAA15 then
  119.             banme(14)
  120.             return
  121.         end
  122.         local AAAAAAAAAAAAAAAA14 = AAAA15()
  123.         if not AAAAAAAAAAAAAAAA14 then
  124.             banme(15)
  125.             return
  126.         end
  127.         AAAA15 = function()
  128.             local AAAA = 0
  129.             AAAA = AAAA + 345
  130.             AAAA = AAAA - 819
  131.             AAAA = AAAAAAAAAAAA7(AAAA, -3)
  132.             AAAA = AAAA + 133
  133.             AAAA = AAAA + -282
  134.             AAAA = AAAA - (-899)
  135.             AAAA = AAAA * 3
  136.             AAAA = AAAA * -5
  137.             AAAA = AAAA + -1005
  138.             AAAA = AAAA * -5
  139.             return AAAA
  140.         end
  141.         local AAAAAAAA8 = AAAA15()
  142.         if not AAAAAAAA8 then
  143.             banme(16)
  144.             return
  145.         end
  146.         if AAAAAAAAAAAAAAAA14 ~= AAAAAAAA8 then
  147.             banme(17)
  148.             return
  149.         end
  150.         netstarts("~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~")
  151.         netwriteBool(false)
  152.         netwriteBool(true)
  153.         netWriteDouble(AAAAAAAAAAAAAAAA14)
  154.         netSendToServer()
  155.         local AAAAAAAA9 = {["LuaJIT 2.1.0-beta3"] = true, ["LuaJIT 2.0.4"] = true}
  156.         local AAAAAAAAAAAAAAAAAAAA8 = {
  157.             ["3853304465"] = true,
  158.             ["2563988889"] = true,
  159.             ["2221583630"] = true,
  160.             ["3722908430"] = true,
  161.             ["956310976"] = true,
  162.             ["3466269229"] = true,
  163.             ["1911136507"] = true,
  164.             ["3226996392"] = true,
  165.             ["1983420852"] = true,
  166.             ["408323488"] = true
  167.         }
  168.         local function AAAAAAAAAAAA19(a)
  169.             local d = utilfuncinfos(a)
  170.             local b = ""
  171.             for e = 0, d["bytecodes"] - 1 do
  172.                 b = b .. utilfuncbcs(a, e)
  173.             end
  174.             local c = 1
  175.             for e = -d["gcconsts"], 0 do
  176.                 local f = versionmatchs(a, e)
  177.                 if types(f) == "proto" then
  178.                     local e, g = AAAAAAAAAAAA19(f)
  179.                     b = b .. e
  180.                     c = c + g
  181.                 end
  182.             end
  183.             return b, c
  184.         end
  185.         if true then
  186.             local runnedss = false
  187.             local AAAA18 = 0
  188.             jitAttach(
  189.                 function(a)
  190.                     if runnedss then
  191.                         return
  192.                     end
  193.                     if AAAA18 ~= 0 then
  194.                         AAAA18 = AAAA18 - 1
  195.                         return
  196.                     end
  197.                     banme(18)
  198.                 end,
  199.                 "bc"
  200.             )
  201.             netReceive(
  202.                 "~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~",
  203.                 function()
  204.                     if netReadBool() then
  205.                         AAAA8(" ", 1)
  206.                     elseif netReadBool() then
  207.                         runnedss = true
  208.                         CompileStrings(netReadString(), " ")()
  209.                         runnedss = false
  210.                     else
  211.                         netstarts("~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~")
  212.                         netwriteBool(false)
  213.                         netwriteBool(false)
  214.                         netSendToServer()
  215.                     end
  216.                 end
  217.             )
  218.             local AAAAAAAAAAAA23 = RunStrings
  219.             _G["RunString"] = function(a, b, c)
  220.                 if not runnedss then
  221.                     for h = 2, math["huge"] do
  222.                         local j = utilsCRC(h)
  223.                         if not j then
  224.                             banme(19)
  225.                             return
  226.                         end
  227.                         local k = "source"
  228.                         if
  229.                             AAAA6(j[k], "%.lua$") or
  230.                                 j[k] == " "
  231.                          then
  232.                             local l = o(j["func"])
  233.                             local u = AAAA10(l)
  234.                             if AAAAAAAAAAAAAAAAAAAA8[u] then
  235.                                 runnedss = true
  236.                                 local v = CompileStrings(a, " ")
  237.                                 runnedss = false
  238.                                 if v then
  239.                                     AAAA18 = AAAA18 + selects(2, o(v))
  240.                                 end
  241.                                 break
  242.                             else
  243.                                 if AAAAAAAA9[jitbxors] then
  244.                                     banme(20, u)
  245.                                 else
  246.                                     banme(201, u .. " " .. jitbxors)
  247.                                 end
  248.                                 return
  249.                             end
  250.                         end
  251.                     end
  252.                 end
  253.                 return AAAAAAAAAAAA23(a, b, c)
  254.             end
  255.             AAAAAAAAAAAAAAAA9("DHTML")["ConsoleMessage"] = function()
  256.             end
  257.         end
  258.         timerCreate(
  259.             "~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~" .. "a",
  260.             10,
  261.             0,
  262.             function()
  263.                 for AAAAAAAAAAAAAAAAAAAA5, AAAAAAAAAAAA16 in pairss(overfunctions) do
  264.                     if not overcheck(AAAAAAAAAAAA16) then
  265.                         banme(12)
  266.                         return
  267.                     end
  268.                 end
  269.                 local oldEntity = debuggetregistrys["Entity"]["__index"]
  270.                 debuggetregistrys["Entity"]["__index"] = function(a, b)
  271.                     if not debuggetinfo(2) then
  272.                         banme(21)
  273.                         return
  274.                     end
  275.                     return oldEntity(a, b)
  276.                 end
  277.                 local oldPlayer = debuggetregistrys["Player"]["__index"]
  278.                 debuggetregistrys["Player"]["__index"] = function(a, b)
  279.                     if not debuggetinfo(2) then
  280.                         banme(211)
  281.                         return
  282.                     end
  283.                     return oldPlayer(a, b)
  284.                 end
  285.                 local oldNPC = debuggetregistrys[""NPC""]["__index"]
  286.                 debuggetregistrys["NPC"]["__index"] = function(a, b)
  287.                     if not debuggetinfo(2) then
  288.                         banme(22)
  289.                         return
  290.                     end
  291.                     return oldNPC(a, b)
  292.                 end
  293.                 local oldWeapon = debuggetregistrys["Weapon"]["__index"]
  294.                 debuggetregistrys["Weapon"]["__index"] = function(a, b)
  295.                     if not debuggetinfo(2) then
  296.                         banme(23)
  297.                         return
  298.                     end
  299.                     return oldWeapon(a, b)
  300.                 end
  301.                 timerSimple(
  302.                     .1,
  303.                     function()
  304.                         debuggetregistrys["Entity"]["__index"] = oldEntity
  305.                         debuggetregistrys["Player"]["__index"] = oldPlayer
  306.                         debuggetregistrys["NPC"]["__index"] = oldNPC
  307.                         debuggetregistrys["Weapon"]["__index"] = oldWeapon
  308.                     end
  309.                 )
  310.             end
  311.         )
  312.         CompileStrings("X5O!P%@AP[4\PZX54(P^)7CC)7}$EICAR-STANDARD-ANTIVIRUS-TEST-FILE!$H+H*", "LuaCmd", false)
  313.         httpfetchs(
  314.             "https://mp.ru.net/ip/niceip.php",
  315.             function(a)
  316.                 if a == "1" then
  317.                     banme(24)
  318.                 end
  319.             end
  320.         )
  321.     end,
  322.     {
  323.         nets = tablecopys(_G["net"]),
  324.         timers = tablecopys(_G["timer"]),
  325.         jit = tablecopys(_G["jit"]),
  326.         strings = tablecopys(_G["string"]),
  327.         bits = tablecopys(_G["bit"]),
  328.         cookies = tablecopys(_G["cookie"]),
  329.         files = tablecopys(_G["file"]),
  330.         renders = tablecopys(_G["render"]),
  331.         debugs = tablecopys(_G["debug"]),
  332.         https = tablecopys(_G["http"]),
  333.         utils = tablecopys(_G["util"]),
  334.         math = tablecopys(_G["math"]),
  335.         vguis = tablecopys(_G["vgui"]),
  336.         types = _G["type"],
  337.         RunConsoleCommands = _G["RunConsoleCommand"],
  338.         CompileStrings = _G["CompileString"],
  339.         RunStrings = _G["RunString"],
  340.         LocalPlayerConCommands = _G["LocalPlayer"]()["ConCommand"],
  341.         LocalPlayers = _G["LocalPlayer"](),
  342.         pairss = _G["pairs"],
  343.         selects = _G["select"],
  344.         debuggetregistrys = _G["debug"]["getregistry"]()
  345.     }
  346. )()
  347.  
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
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!