开启辅助访问 切换到宽版

精易论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

用微信号发送消息登录论坛

新人指南 邀请好友注册 - 我关注人的新帖 教你赚取精币 - 每日签到


求职/招聘- 论坛接单- 开发者大厅

论坛版规 总版规 - 建议/投诉 - 应聘版主 - 精华帖总集 积分说明 - 禁言标准 - 有奖举报

查看: 104|回复: 1
收起左侧

[易语言] 解密成功但是只能解密短的

[复制链接]
结帖率:91% (166/183)
发表于 2025-7-12 20:33:19 | 显示全部楼层 |阅读模式   吉林省长春市
88精币
某个传奇的解密 ,这个可以解密一些短的数据
但是这样的就不行不知道为什么:4F 56 67 4B 5F 49 5F 54 72 49 5F 70 66 68 7A 48 58 58 6D 5A 5D 5A 6B 48 53 64 50 6E 5C 41 76 41 5F 64 52 41 5D 59 72 4A 5D 54 50 46 3F 62 4A 41 78 9C 6D 8E EB 52 83 30 10 46 5F AC 17 2E 19 22 11 28 20 E8 0A 41 A0 91 D2 52 88 58 24 03 F4 E5 0D ED 8C 8E B5 3F 76 E6 EC EE 37 67 97 E9 5B 35 71 0C 35 09 FC DB 22 7F FB A7 26 45 BE DA 7C 49 8E 16 4A 12 78 E3 3C 0F 7E 33 D3 00 11 B9 F5 B0 D9 EF 83 F2 DF EF 99 39 D6 8C 0B DB AB D9 CF 66 8E B7 F8 E8 79 E3 B2 0F A2 53 9C B5 E1 BA 7F 84 4B 26 A6 77 1C 7E 4A F7 0E BB 32 F9 71 30 67 E4 02 D9 9C E4 E5 E6 1C B7 6B 6C 3B 00 D5 9B 62 75 48 B8 89 E5 BA D9 33 C0 F6 95 93 03 E1 FB A2 E1 11 43 C2 CE 42 8D E9 68 33 E0 A6 86 B4 E0 F7 FE 00 99 B5 70 51 56 3B 55 BA DF D7 8B BE E1 5A B9 13 5D 7A 90 3D 72 7D 4A 00 F2 B0 38 9E 18 95 0E 87 E9 B8 1A CC BE 16 64 A5 80 62 72 42 C9 E4 52 53 DE 31 B4 CF 97 62 10 E6 B2 3E 3E 4C 49 55 9E 3B C4 E5 3E 37 00 F6 1F B4 D5 91 50 55 82 BF 01 F5 4C 8C BA


算法不一样?难道是AES-256-ECB?

我也是看论坛一个ID
130092934 他的贴子学的  在线等秒最佳








.版本 2
.支持库 spec

.程序集 窗口程序集_启动窗口

.子程序 解码, 文本型
.参数 文本, 文本型
.局部变量 掩码1, 字节集
.局部变量 掩码2, 字节集
.局部变量 内容, 字节集
.局部变量 量, 整数型
.局部变量 数, 整数型
.局部变量 字节, 字节型
.局部变量 值, 整数型
.局部变量 临时, 整数型
.局部变量 下标, 整数型
.局部变量 结果, 字节集

掩码1 = { 42, 231, 24, 111, 99, 157, 72, 234, 57, 205, 56, 184, 160, 171, 224, 16, 53, 153, 55, 9, 192, 105, 178, 164, 103, 136, 80, 52, 127, 252, 11, 190, 12, 68, 89, 182, 91, 156, 101, 214, 148, 235, 196, 59, 3, 60, 201, 62, 107, 154, 212, 246, 195, 77, 17, 36, 170, 255, 74, 237, 149, 147, 217, 70, 95, 150, 135, 48, 186, 202, 203, 250, 138, 26, 104, 92, 172, 7, 64, 96, 41, 112, 87, 83, 65, 18, 222, 29, 100, 20, 151, 114, 251, 141, 43, 8, 207, 244, 58, 0, 197, 145, 86, 169, 158, 113, 188, 163, 175, 166, 85, 218, 121, 187, 51, 165, 37, 21, 125, 238, 193, 44, 199, 208, 25, 216, 90, 232, 133, 253, 47, 106, 120, 69, 219, 181, 245, 30, 4, 117, 176, 122, 32, 242, 223, 211, 131, 243, 84, 144, 162, 198, 15, 128, 54, 78, 200, 1, 130, 118, 161, 46, 132, 134, 14, 71, 143, 225, 249, 124, 194, 116, 220, 38, 34, 206, 45, 79, 191, 13, 115, 39, 33, 179, 152, 31, 137, 236, 254, 82, 10, 140, 159, 168, 229, 230, 6, 139, 204, 247, 94, 227, 123, 210, 5, 73, 19, 233, 102, 183, 173, 180, 248, 167, 28, 241, 2, 126, 110, 23, 98, 76, 119, 142, 221, 240, 67, 40, 109, 97, 185, 215, 189, 61, 155, 146, 22, 239, 81, 35, 226, 177, 129, 49, 50, 88, 209, 93, 213, 108, 75, 228, 174, 66, 27, 63 }
掩码2 = { 252, 248, 240, 224, 192 }
内容 = hex2bin (删全部空 (文本))


量 = 2
.计次循环首 (取字节集长度 (内容), 数)
    字节 = 内容 [数]
    .如果真 (字节 < 十六进制 (“3C”))
        跳出循环 ()
    .如果真结束
    字节 = 字节 - 十六进制 (“3C”)
    .如果真 (值 ≥ 2)
        值 = 0
        下标 = 位异或 (位或 (右移 (位与 (字节, 十六进制 (“3F”)), 6 - 量), 临时), 十六进制 (“9E”))
        结果 = 结果 + 到字节集 (到字节 (位异或 (掩码1 [下标 + 1], 十六进制 (“34”))))


        .如果真 (量 > 5)
            量 = 2
            到循环尾 ()
        .如果真结束
        量 = 量 + 2
    .如果真结束
    临时 = 位与 (掩码2 [量 - 2 + 1], 左移 (字节, 量))
    值 = 值 + 8 - 量
.计次循环尾 ()
' 调试输出 (1, 结果)
' 调试输出 (2, bin2hex (结果))

.如果 (取字节集长度 (结果) = 36)
    结果 = 取字节集右边 (内容, 取字节集长度 (内容) - 12)
.否则
    结果 = 取字节集右边 (结果, 取字节集长度 (结果) - 36)
.如果结束
' 调试输出 (1, 结果)
' 调试输出 (2, bin2hex (结果))



返回 (编码_Utf8到Ansi (结果))

.子程序 __启动窗口_创建完毕
.局部变量 文本, 文本型
.局部变量 加密文本, 文本型
.局部变量 测试, 文本型
.局部变量 内容, 字节集

' 这是加密的
文本 = “5D 54 52 41 5D 55 76 41 5D 54 52 41 5D 54 52 41 74 44 52 41 5D 54 52 41 5D 54 50 59 5D 54 52 41 5D 54 52 41 5D 57 76 41 5D 54 52 41 5D 54 52 41 47 73 45 77 4A 73 3E 5D 76 48 79 6E 4A 63 46 7A 6B 5D 4E 6E 52 61 47 4F 41 3D 4C 50 50 67 47 79 68 5C 48 3F 52 61 47 79 70 6D 4C 50 50 5D 4C 69 47 57 76 6E 7B 53 45 4F 5D 54 52 41 5D 54 76 41 5D 54 50 4C 5D 54 52 41 76 74 52 41 5D 52 72 41 5D 54 50 61 40 47 6C 40 5D 54 52 41 5D 53 42 41 5D 54 51 59 57 54 52 41 45 6E 65 50 51 48 79 5C 3C 70 54 3F 52 67 74 50 3C 71 46 6E 6B 61 44”
' 这是解密的
测试 = “00 00 00 00 1E 00 00 00 00 00 00 00 6E 00 00 00 00 00 00 00 5E 00 00 00 00 00 00 00 38 00 00 00 00 00 00 00 7B 22 55 73 65 72 49 44 22 3A 22 38 38 30 37 32 31 33 30 30 30 31 37 34 37 35 35 32 31 34 33 30 30 31 30 39 39 38 37 34 22 7D 00 00 00 00 01 00 00 00 14 00 00 00 21 00 00 00 05 00 00 00 D8 14 6D 02 00 00 00 00 17 00 00 00 D2 05 00 00 2B 47 4F 4F 44 2F 35 36 35 32 38 30 35 31 37 38 31 ”
调试输出 (解码 (文本))







回答提醒:如果本帖被关闭无法回复,您有更好的答案帮助楼主解决,请发表至 源码区 可获得加分喔。
友情提醒:本版被采纳的主题可在 申请荣誉值 页面申请荣誉值,获得 1点 荣誉值,荣誉值可兑换荣誉会员、终身vip用户组。
快捷通道:申请荣誉值无答案申请取消悬赏投诉有答案未采纳为最佳
结帖率:100% (47/47)

签到天数: 3 天

发表于 2025-7-23 20:40:00 | 显示全部楼层   河北省秦皇岛市
  
窗口程序集名保 留  保 留备 注
窗口程序集_启动窗口   
变量名类 型数组备 注
掩码1字节集  
掩码2字节集  

子程序名返回值类型公开备 注
__启动窗口_创建完毕  
' 初始化掩码数据
掩码1 = { 42, 231, 24, 111, 99, 157, 72, 234, 57, 205, 56, 184, 160, 171, 224, 16, 53, 153, 55, 9, 192, 105, 178, 164, 103, 136, 80, 52, 127, 252, 11, 190, 12, 68, 89, 182, 91, 156, 101, 214, 148, 235, 196, 59, 3, 60, 201, 62, 107, 154, 212, 246, 195, 77, 17, 36, 170, 255, 74, 237, 149, 147, 217, 70, 95, 150, 135, 48, 186, 202, 203, 250, 138, 26, 104, 92, 172, 7, 64, 96, 41, 112, 87, 83, 65, 18, 222, 29, 100, 20, 151, 114, 251, 141, 43, 8, 207, 244, 58, 0, 197, 145, 86, 169, 158, 113, 188, 163, 175, 166, 85, 218, 121, 187, 51, 165, 37, 21, 125, 238, 193, 44, 199, 208, 25, 216, 90, 232, 133, 253, 47, 106, 120, 69, 219, 181, 245, 30, 4, 117, 176, 122, 32, 242, 223, 211, 131, 243, 84, 144, 162, 198, 15, 128, 54, 78, 200, 1, 130, 118, 161, 46, 132, 134, 14, 71, 143, 225, 249, 124, 194, 116, 220, 38, 34, 206, 45, 79, 191, 13, 115, 39, 33, 179, 152, 31, 137, 236, 254, 82, 10, 140, 159, 168, 229, 230, 6, 139, 204, 247, 94, 227, 123, 210, 5, 73, 19, 233, 102, 183, 173, 180, 248, 167, 28, 241, 2, 126, 110, 23, 98, 76, 119, 142, 221, 240, 67, 40, 109, 97, 185, 215, 189, 61, 155, 146, 22, 239, 81, 35, 226, 177, 129, 49, 50, 88, 209, 93, 213, 108, 75, 228, 174, 66, 27, 63 }
掩码2 = { 252, 248, 240, 224, 192 }
' 测试解密
测试解密 ()
子程序名返回值类型公开备 注
测试解密  
.局部变量 加密数据, 文本型
.局部变量 解密结果, 文本型

' 短数据测试
加密数据 = "5D 54 52 41 5D 55 76 41 5D 54 52 41 5D 54 52 41 74 44 52 41 5D 54 52 41 5D 54 50 59 5D 54 52 41 5D 54 52 41 5D 57 76 41 5D 54 52 41 5D 54 52 41 47 73 45 77 4A 73 3E 5D 76 48 79 6E 4A 63 46 7A 6B 5D 4E 6E 52 61 47 4F 41 3D 4C 50 50 67 47 79 68 5C 48 3F 52 61 47 79 70 6D 4C 50 50 5D 4C 69 47 57 76 6E 7B 53 45 4F 5D 54 52 41 5D 54 76 41 5D 54 50 4C 5D 54 52 41 76 74 52 41 5D 52 72 41 5D 54 50 61 40 47 6C 40 5D 54 52 41 5D 53 42 41 5D 54 51 59 57 54 52 41 45 6E 65 50 51 48 79 5C 3C 70 54 3F 52 67 74 50 3C 71 46 6E 6B 61 44"
解密结果 = 解密数据 (加密数据)
输出调试文本 ("短数据解密结果:" + 解密结果)

' 长数据测试
加密数据 = "4F 56 67 4B 5F 49 5F 54 72 49 5F 70 66 68 7A 48 58 58 6D 5A 5D 5A 6B 48 53 64 50 6E 5C 41 76 41 5F 64 52 41 5D 59 72 4A 5D 54 50 46 3F 62 4A 41 78 9C 6D 8E EB 52 83 30 10 46 5F AC 17 2E 19 22 11 28 20 E8 0A 41 A0 91 D2 52 88 58 24 03 F4 E5 0D ED 8C 8E B5 3F 76 E6 EC EE 37 67 97 E9 5B 35 71 0C 35 09 FC DB 22 7F FB A7 26 45 BE DA 7C 49 8E 16 4A 12 78 E3 3C 0F 7E 33 D3 00 11 B9 F5 B0 D9 EF 83 F2 DF EF 99 39 D6 8C 0B DB AB D9 CF 66 8E B7 F8 E8 79 E3 B2 0F A2 53 9C B5 E1 BA 7F 84 4B 26 A6 77 1C 7E 4A F7 0E BB 32 F9 71 30 67 E4 02 D9 9C E4 E5 E6 1C B7 6B 6C 3B 00 D5 9B 62 75 48 B8 89 E5 BA D9 33 C0 F6 95 93 03 E1 FB A2 E1 11 43 C2 CE 42 8D E9 68 33 E0 A6 86 B4 E0 F7 FE 00 99 B5 70 51 56 3B 55 BA DF D7 8B BE E1 5A B9 13 5D 7A 90 3D 72 7D 4A 00 F2 B0 38 9E 18 95 0E 87 E9 B8 1A CC BE 16 64 A5 80 62 72 42 C9 E4 52 53 DE 31 B4 CF 97 62 10 E6 B2 3E 3E 4C 49 55 9E 3B C4 E5 3E 37 00 F6 1F B4 D5 91 50 55 82 BF 01 F5 4C 8C BA"
解密结果 = 解密数据 (加密数据)
输出调试文本 ("长数据解密结果:" + 解密结果)
子程序名返回值类型公开备 注
解密数据文本型 
参数名类 型参考可空数组备 注
加密文本文本型
变量名类 型静态数组备 注
内容字节集 
整数型 
整数型 
字节字节型 
整数型 
临时整数型 
下标整数型 
结果字节集 
' 转换HEX文本为字节集
内容 = hex2bin (删全部空 (加密文本))
量 = 2
值 = 0
临时 = 0
结果 = { }
' 核心解密算法
计次循环首 (取字节集长度 (内容), 数)
字节 = 内容[]

' 跳过小于0x3C的字节
如果真 (字节 < 十六进制 ("3C"))
跳出循环 ()

字节 = 字节 - 十六进制 ("3C")

如果真 (值 ≥ 2)
值 = 0
下标 = 位异或 (位或 (右移 (位与 (字节, 十六进制 ("3F")), 6 - 量), 临时), 十六进制 ("9E"))

' 防止下标越界
如果 (下标 ≥ 0 下标 < 取字节集长度 (掩码1))
结果 = 结果 + 到字节集 (到字节 (位异或 (掩码1[下标 + 1], 十六进制 ("34"))))
输出调试文本 ("下标越界:" + 到文本 (下标))

如果真 (量 > 5)
量 = 2
到循环尾 ()
量 = 量 + 2

临时 = 位与 (掩码2[量 - 2 + 1], 左移 (字节, 量))
值 = 值 + 8 - 量
计次循环尾 ()
' 处理结果字节集
如果 (取字节集长度 (结果) = 36)
结果 = 取字节集右边 (内容, 取字节集长度 (内容) - 12)
如果 (取字节集长度 (结果) > 36)
结果 = 取字节集右边 (结果, 取字节集长度 (结果) - 36)
输出调试文本 ("结果长度异常:" + 到文本 (取字节集长度 (结果)))


返回 (编码_Utf8到Ansi (结果))
子程序名返回值类型公开备 注
hex2bin字节集 
参数名类 型参考可空数组备 注
hex文本文本型
变量名类 型静态数组备 注
字节集字节集 
i整数型 
hex字节文本型 
字节集 = { }
变量循环首 1, 取文本长度 (hex文本), 2
hex字节 = 取文本中间 (hex文本, i, 2)
加入成员 (字节集, 到字节 (十六进制 (hex字节)))
变量循环尾
返回 (字节集)
子程序名返回值类型公开备 注
bin2hex文本型 
参数名类 型参考可空数组备 注
字节数据字节集
变量名类 型静态数组备 注
hex文本文本型 
i整数型 
hex文本 = ""
计次循环首 (取字节集长度 (字节数据), i)
hex文本 = hex文本 + 取十六进制文本 (字节数据[i]) + " "
计次循环尾
返回 (删首尾空 (hex文本))


i支持库列表   支持库注释   
spec特殊功能支持库
dp1数据操作支持库一


  
子程序名返回值类型公开备 注
_按钮_解密_被单击  
.局部变量 加密数据, 文本型
.局部变量 解密结果, 文本型

加密数据 = 编辑框_输入.内容
解密结果 = 解密数据 (加密数据)
编辑框_结果.内容 = 解密结果

  
子程序名返回值类型公开备 注
智能解密  
参数名类 型参考可空数组备 注
加密文本文本型
变量名类 型静态数组备 注
结果文本型 
' 尝试原始算法
结果 = 解密数据 (加密文本)
如果 (结果 ≠ "" 寻找文本 (结果, "{", , ) > 0)
返回 (结果)

' 尝试AES解密
变量名类 型静态数组备 注
字节数据字节集 
字节数据 = hex2bin (删全部空 (加密文本))
结果 = 尝试AES解密 (字节数据)
如果 (结果 ≠ "")
返回 (结果)

' 尝试分段处理
返回 (分段解密处理 (加密文本))





回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则 致发广告者

发布主题 收藏帖子 返回列表

sitemap| 易语言源码| 易语言教程| 易语言论坛| 易语言模块| 手机版| 广告投放| 精易论坛
拒绝任何人以任何形式在本论坛发表与中华人民共和国法律相抵触的言论,本站内容均为会员发表,并不代表精易立场!
论坛帖子内容仅用于技术交流学习和研究的目的,严禁用于非法目的,否则造成一切后果自负!如帖子内容侵害到你的权益,请联系我们!
防范网络诈骗,远离网络犯罪 违法和不良信息举报QQ: 793400750,邮箱:wp@125.la
网站简介:精易论坛成立于2009年,是一个程序设计学习交流技术论坛,隶属于揭阳市揭东区精易科技有限公司所有。
Powered by Discuz! X3.4 揭阳市揭东区精易科技有限公司 ( 粤ICP备2025452707号) 粤公网安备 44522102000125 增值电信业务经营许可证 粤B2-20192173

快速回复 返回顶部 返回列表