这个Lua脚本我不会解密了，大佬教一下

sos120

Lua通常的加密是loadstring，但是这个加密方式它绕弯子绕得我看不懂了，希望大佬可以教一下，加密方式如下，大括号里面的“加密内容”我把他用汉字“加密内容”代替，因为这段太长了，看起来不方便，整段我上传到蓝奏云网盘里面：

https://lanzoux.com/i7dc1ib，对Lua编码感兴趣的一定要下载来分析一下，如果把被加密的部分用“加密内容”代替，就是如下：

1. local a=loadstring((function(b,c)function bxor(d,e)local f={{0,1},{1,0}}local g=1;local h=0;while d>0 or e>0 do h=h+f[d%2+1][e%2+1]*g;d=math.floor(d/2)e=math.floor(e/2)g=g*2 end;return h end;local i=function(b)local j={}local k=1;local l=b[k]while l>=0 do j[k]=b[l+1]k=k+1;l=b[k]end;return j end;local m=function(b,c)if#c<=0 then return{}end;local k=1;local n=1;for k=1,#b do b[k]=bxor(b[k],string.byte(c,n))n=n+1;if n>#c then n=1 end end;return b end;local o=function(b)local j=""for k=1,#b do j=j..string.char(b[k])end;return j end;return o(m(i(b),c))end)({加密内容},key))if a then a()else print("密码错误")end

复制代码

我把以上内容格式化了一下，变成了如下的样子：

1. local a =
   
2.     loadstring(
   
3.     (function(b, c)
   
4.         function bxor(d, e)
   
5.             local f = {{0, 1}, {1, 0}}
   
6.             local g = 1
   
7.             local h = 0
   
8.             while d > 0 or e > 0 do
   
9.                 h = h + f[d % 2 + 1][e % 2 + 1] * g
   
10.                 d = math.floor(d / 2)
    
11.                 e = math.floor(e / 2)
    
12.                 g = g * 2
    
13.             end
    
14.             return h
    
15.         end
    
16.         local i = function(b)
    
17.             local j = {}
    
18.             local k = 1
    
19.             local l = b[k]
    
20.             while l >= 0 do
    
21.                 j[k] = b[l + 1]
    
22.                 k = k + 1
    
23.                 l = b[k]
    
24.             end
    
25.             return j
    
26.         end
    
27.         local m = function(b, c)
    
28.             if #c <= 0 then
    
29.                 return {}
    
30.             end
    
31.             local k = 1
    
32.             local n = 1
    
33.             for k = 1, #b do
    
34.                 b[k] = bxor(b[k], string.byte(c, n))
    
35.                 n = n + 1
    
36.                 if n > #c then
    
37.                     n = 1
    
38.                 end
    
39.             end
    
40.             return b
    
41.         end
    
42.         local o = function(b)
    
43.             local j = ""
    
44.             for k = 1, #b do
    
45.                 j = j .. string.char(b[k])
    
46.             end
    
47.             return j
    
48.         end
    
49.         return o(m(i(b), c))
    
50.     end)({加密内容}, key)
    
51. )
    
52. if a then
    
53.     a()
    
54. else
    
55.     print("密码错误")
    
56. end
    

复制代码

希望大佬可以帮忙看看这个方式要怎么解密，希望可以给出解密思路，或者把它绕的弯子给它简化一下，希望可以跟大佬学习一些。

kdabiao

a -> lua脚本对象

loadstring(p_脚本文本) -> a


function 解密脚本 (p_加密后的脚本 , p_密码) -> p_脚本文本
        p_加密后的脚本 -> 已知
        p_密码 -> 变量key -> 未知[!!!][需要想办法知道这个值才能解出真正的脚本]



函数[解密脚本]需要下面几个功能函数:
function i(p_参数)
function m(p_参数1, p_参数2)
function o(p_参数)

解密脚本=o(m(i(p_加密后的脚本), p_密码))


















补充内容 (2019-11-15 22:45):
key是一个文本类型的  所以直接跳过用整数遍历尝试的方法

补充内容 (2019-11-15 23:10):
如果没用lua脚本文件完整性校验的话,直接这样改可以直接拿到key:

在return o(m(i(b), c))这一句之前加上print(c)

这个c就是key

补充内容 (2019-11-15 23:11):
bxor就是易语言的位异或()不需要自己翻译写

sos120

@kdabiao 大佬，这次实在不会了，自己研究了很久，需要点拨

sos120

@peid王思聪 有没有可以提供的线索

啊麟

这个不太懂

啊麟

要是说注入破J我还会点

kdabiao

看一下 等会给你附上原理

sos120

kdabiao 发表于 2019-11-15 22:43
a -> lua脚本对象

loadstring(p_脚本文本) -> a

我有key，在这段的上面有一个：

1. ky="57467042"
   
2. key="574670425AA"

复制代码

这个key="574670425AA"应该就是秘钥，上面的ky不知道是干嘛的，也许是掩人耳目的。
知道key的值是不是就可以成功解密了，要如何解密，如果写个工具专门解密这个加密的话加分感谢。
就是需要输入key的值，然后就可以解密，如下：

kdabiao

要不就去定制区 要不就自己动手 不懂得地方继续追问,等着被喂食貌似不是一个好的学习状态

sos120

kdabiao 发表于 2019-11-16 01:10
要不就去定制区 要不就自己动手 不懂得地方继续追问,等着被喂食貌似不是一个好的学习状态

感谢大佬教育，想问下那上面的那个ky是不是掩人耳目的，然后知道key的话大佬可否只帮忙解密此Lua呢？