xxtea加解密源码,带dll

chencong5025

taizhong 发表于 2020-7-28 16:25
.版本 2

.计次循环首 (111, )

  

data ＝ 到字节集 (“password=123123”)
Res_my ＝ encode (data, “qweq”)
调试输出 (data)
Res_my ＝ encode (data, “qweq”)
调试输出 (data)
调试输出 (Res_my)

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> data ＝ 到字节集 (“password=123123”)<br /> Res_my ＝ encode (data, “qweq”)<br /> 调试输出 (data)<br /> Res_my ＝ encode (data, “qweq”)<br /> 调试输出 (data)<br /> <br /> 调试输出 (Res_my)

你看下 问题出在 估计操作了 data 的指针导致 data膨胀 导致加密后数据膨胀

taizhong

chencong5025 发表于 2020-7-28 17:03
[e=0].版本 2

.计次循环首 (100, i)

encode 封装问题,
因为是传入地址
encode和decode 易语言源码里面,你可以生成一个局部变量 bin =data
操作bin,就不会出现这个问题了

chencong5025

taizhong 发表于 2020-7-28 18:12
encode 封装问题,
因为是传入地址
encode和decode 易语言源码里面,你可以生成一个局部变量 bin =data

  

子程序名	返回值类型	公开	备 注
encode	字节集
参数名	类 型	参考	可空	数组	备 注
data	字节集
key	文本型

变量名	类 型	静态	数组	备 注
ret	整数型
len	整数型
bin	字节集

bin ＝ data
ret ＝ xxtea_encrypt (取变量数据地址 (bin), 取字节集长度 (bin), 取变量数据地址 (key), 取变量数据地址 (len))
data ＝ 指针到字节集 (ret, len) ' 问题出在这里。。。没看到  没有问题了
' 调试输出 (data)
返回 (data)
data ＝ 到字节集 (“password=123123”)
调试输出 (“原始数据”, data)
Res_my ＝ encode (data, “qweq”)
调试输出 (“加密过一次后”, data, Res_my)
Res_my ＝ encode (data, “qweq”)
调试输出 (“加密过2次后”, data, Res_my)
Res_my ＝ encode (data, “qweq”)
调试输出 (“加密过3次后”, data, Res_my)

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 encode, 字节集<br /> .参数 data, 字节集<br /> .参数 key, 文本型<br /> .局部变量 ret, 整数型<br /> .局部变量 len, 整数型<br /> .局部变量 bin, 字节集<br /> <br /> bin ＝ data<br /> ret ＝ xxtea_encrypt (取变量数据地址 (bin), 取字节集长度 (bin), 取变量数据地址 (key), 取变量数据地址 (len))<br /> data ＝ 指针到字节集 (ret, len) '问题出在这里。。。没看到  没有问题了<br /> ' 调试输出 (data)<br /> 返回 (data)<br /> <br /> <br /> data ＝ 到字节集 (“password=123123”)<br /> 调试输出 (“原始数据”, data)<br /> Res_my ＝ encode (data, “qweq”)<br /> 调试输出 (“加密过一次后”, data, Res_my)<br /> Res_my ＝ encode (data, “qweq”)<br /> 调试输出 (“加密过2次后”, data, Res_my)<br /> Res_my ＝ encode (data, “qweq”)<br /> 调试输出 (“加密过3次后”, data, Res_my)

不行滴。
输出值：
* “原始数据” | 字节集:15{112,97,115,115,119,111,114,100,61,49,50,51,49,50,51}
* “加密过一次后” | 字节集:20{215,54,195,218,126,164,219,192,181,99,158,24,214,106,143,230,164,242,192,137} | 字节集:20{215,54,195,218,126,164,219,192,181,99,158,24,214,106,143,230,164,242,192,137}
* “加密过2次后” | 字节集:24{110,234,231,249,53,137,10,32,202,121,176,91,161,41,71,245,228,51,178,253,5,60,173,226} | 字节集:24{110,234,231,249,53,137,10,32,202,121,176,91,161,41,71,245,228,51,178,253,5,60,173,226}
* “加密过3次后” | 字节集:28{9,251,126,60,23,235,196,178,244,190,214,209,230,37,28,188,143,136,3,167,97,157,162,93,19,132,148,200} | 字节集:28{9,251,126,60,23,235,196,178,244,190,214,209,230,37,28,188,143,136,3,167,97,157,162,93,19,132,148,200}

chencong5025

taizhong 发表于 2020-7-28 18:12
encode 封装问题,
因为是传入地址
encode和decode 易语言源码里面,你可以生成一个局部变量 bin =data

收回后续   你居然操作了参数 并且返回了参数。。。。我看错了

djmy2018

看看

taizhong

chencong5025 发表于 2020-7-28 18:20
[e=0].版本 2
.支持库 spec

你这,,,
返回(bin)

taizhong

chencong5025 发表于 2020-7-28 17:09
[e=0].版本 2
.支持库 spec

,这样改才对

.版本 2
.支持库 spec

.子程序 encode, 字节集
.参数 data, 字节集
.参数 key, 文本型
.局部变量 ret, 整数型
.局部变量 len, 整数型
.局部变量 bin, 字节集

bin ＝ data
ret ＝ xxtea_encrypt (取变量数据地址 (bin), 取字节集长度 (bin), 取变量数据地址 (key), 取变量数据地址 (len))
bin ＝ 指针到字节集 (ret, len) '问题出在这里。。。没看到  没有问题了
' 调试输出 (data)
返回 (bin)

chencong5025

taizhong 发表于 2020-7-28 20:34
你这,,,
返回(bin)

我看错了。你是直接操作了参数返回 这奇葩的写法 是万万没想到。。。

胖虎O

看一下是什么

tian89

不是开源不要在开源贴中DLL那门子开源?又想给别人用又怕别人知道源代码.你真心情好纠结,目的还是名气