开启辅助访问 切换到宽版

精易论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

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

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


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

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

12
返回列表 发新帖
楼主: 流年浮生
收起左侧

[已解决] 这段py代码怎么转换到易语言

 关闭 [复制链接]
结帖率:100% (1/1)
 楼主| 发表于 2025-4-22 14:51:42 | 显示全部楼层   广东省佛山市
lao3 发表于 2025-4-22 14:49
你的python代码也解不了啊,报错了~

检查下密文密钥是否匹配吧~

这是我在网上找的:https://blog.csdn.net/yuanbang_bc/article/details/146519688,您看一下
回复

使用道具 举报

结帖率:50% (2/4)

签到天数: 10 天

发表于 2025-4-22 15:04:17 | 显示全部楼层   福建省厦门市
流年浮生 发表于 2025-4-22 14:51
这是我在网上找的:https://blog.csdn.net/yuanbang_bc/article/details/146519688,您看一下 ...

他的密文可以解啊~你这密文哪个请求的?
回复

使用道具 举报

结帖率:100% (1/1)

签到天数: 6 天

 楼主| 发表于 2025-4-22 15:09:51 | 显示全部楼层   广东省佛山市
lao3 发表于 2025-4-22 15:04
他的密文可以解啊~你这密文哪个请求的?

就是这个,您有时间能帮忙写个易语言例子吗?
回复

使用道具 举报

结帖率:50% (2/4)

签到天数: 10 天

发表于 2025-4-22 15:22:31 | 显示全部楼层   福建省厦门市
流年浮生 发表于 2025-4-22 15:09
就是这个,您有时间能帮忙写个易语言例子吗?

这不是写不写的问题, 前面的代码应该是没啥问题,

你提供的数据在考古加那都解不了~

你贴个完整抓包内容吧
回复

使用道具 举报

结帖率:50% (1/2)

签到天数: 9 天

发表于 2025-4-22 17:59:26 | 显示全部楼层   四川省雅安市

大概就是这个样子没有验证过要用一个”支持库 eAPI”我没有这个东西所以没验证

.版本 2
.支持库 spec
.支持库 eAPI

.子程序 Decrypt, 文本型, 公开, 使用 AES CBC 模式解密数据
    .参数 url, 文本型, , 用于生成密钥和 IV 的字符串,一般是接口地址
    .参数 text, 文本型, , 加密后的密文
    .局部变量 str_repeated, 文本型
    .局部变量 org_key, 文本型
    .局部变量 org_iv, 文本型
    .局部变量 cipher_text, 字节集
    .局部变量 decrypted, 字节集
    .局部变量 result, 文本型
    .局部变量 errorMsg, 文本型

    ' 检查 url 是否为字符串类型
    如果 (取数据类型 (url) ≠ #文本型) 那么
        返回 (“”)
    结束如果

    ' 内部函数:生成 base64 编码并重复三次
    .子程序 generate_key_iv, 文本型
        .参数 s, 文本型
        .局部变量 encoded, 文本型
        ' URI 编码后 base64 编码
        encoded = 编码_base64 (编码_URL (s))
        返回 (encoded + encoded + encoded)
    结束子程序

    ' 生成密钥和初始向量
    str_repeated = generate_key_iv (url)

    ' 从重复后的字符串中截取 key 和 iv
    org_key = 取文本中间 (str_repeated, 1, 16)  '前 16 字符作为密钥
    org_iv = 取文本中间 (str_repeated, 12, 16)  '第 12~28 字符作为初始向量(IV)

    ' 解密
    尝试
        '将密文从 base64 解码
        cipher_text = 编码_base64 (text, 真)

        ' 创建解密器(这里使用系统 API 进行 AES CBC 解密,示例代码,可能需要进一步完善)
        decrypted = AES_CBC_Decrypt (cipher_text, 到字节集 (org_key), 到字节集 (org_iv))

        ' 去除填充(简单示例,实际可能需要更完善的处理)
        decrypted = 去除填充 (decrypted, 16)

        ' 转换为字符串
        result = 到文本 (decrypted)
        返回 (result)
    捕获异常 (errorMsg)
        调试输出 (“Decryption error: ” + errorMsg)
        返回 (“”)
    结束尝试
结束子程序

.子程序 AES_CBC_Decrypt, 字节集, 公开, AES CBC 模式解密,示例代码,可能需要进一步完善
    .参数 密文, 字节集
    .参数 密钥, 字节集
    .参数 初始向量, 字节集
    ' 这里只是简单示例,实际使用中需要调用 Windows 系统的加密 API 实现 AES CBC 解密
    ' 例如使用 CryptEncrypt 和 CryptDecrypt 等函数,具体实现较为复杂
    返回 ({})
结束子程序

.子程序 去除填充, 字节集, 公开, 简单的去除填充示例,实际可能需要更完善的处理
    .参数 数据, 字节集
    .参数 块大小, 整数型
    .局部变量 填充长度, 整数型
    填充长度 = 取字节集尾 (数据, 1)[1]
    返回 (删去字节集尾 (数据, 填充长度))
结束子程序

.子程序 编码_URL, 文本型, 公开, 模拟 Python 的 urllib.parse.quote 功能
    .参数 文本, 文本型
    ' 这里简单示例,实际可能需要更完善的 URL 编码处理
    返回 (文本)
结束子程序

回复

使用道具 举报

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

本版积分规则 致发广告者

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

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

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