开启辅助访问 切换到宽版

精易论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

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

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


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

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

查看: 1490|回复: 11
收起左侧

[已解决] 一段易语言翻译成PHP源码

 关闭 [复制链接]
结帖率:70% (42/60)
发表于 2022-10-15 09:58:51 | 显示全部楼层 |阅读模式   山东省滨州市
30精币
  
子程序名返回值类型公开备 注
取sign文本型 原创:千雨
参数名类 型参考可空数组备 注
提交的信息文本型原创:千雨
变量名类 型静态数组备 注
a字节集 
b字节集 
i整数型 
MD5文本型 
sign文本型 
zd文本型 
Ls整数型0
MD5 = 校验_取md5_文本 (提交的信息, 真, 真, )
sign = “zzb”
a = { 21, 4, 9, 26, 16, 20, 27, 30 }
计次循环首 (取字节集长度 (a), i)
sign = sign + 取文本中间 (MD5, 取字节集数据 (取字节集中间 (a, i, 1), 3, 1) + 1, 1)
计次循环尾 ()
a = 字节集_十六进制到字节集 (“D42D5044C3A3A3CB9DDCFE5BCC4F6806”)
b = 字节集_十六进制到字节集 (MD5)
计次循环首 (取字节集长度 (a), i)
调试输出 (取字节集数据 (取字节集中间 (a, i, 1), 3, 1), 取字节集数据 (取字节集中间 (b, i, 1), 3, 1))
加入成员 (Ls, 位异或 (取字节集数据 (取字节集中间 (a, i, 1), 3, 1), 取字节集数据 (取字节集中间 (b, i, 1), 3, 1)))
计次循环尾 ()
zd = “ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789”
i = 0
计次循环首 (5, )
sign = sign + 取文本中间 (zd, 右移 (Ls [i + 1], 2) + 1, 1)
sign = sign + 取文本中间 (zd, 位或 (左移 (位与 (Ls [i + 1], 3), 4), 右移 (Ls [i + 2], 4)) + 1, 1)
sign = sign + 取文本中间 (zd, 位或 (左移 (位与 (Ls [i + 2], 15), 2), 右移 (Ls [i + 3], 6)) + 1, 1)
sign = sign + 取文本中间 (zd, 位与 (Ls [i + 3], 63) + 1, 1)
i = i + 3
计次循环尾 ()
sign = sign + 取文本中间 (zd, 右移 (Ls [i + 1], 2) + 1, 1)
sign = sign + 取文本中间 (zd, 左移 (位与 (Ls [i + 1], 3), 4) + 1, 1)
a = { 18, 11, 3, 2, 1, 7, 6, 25 }
计次循环首 (取字节集长度 (a), i)
sign = sign + 取文本中间 (MD5, 取字节集数据 (取字节集中间 (a, i, 1), 3, 1) + 1, 1)
计次循环尾 ()
返回 (到小写 (sign))


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



易语言翻译成PHP源码,谢谢了

参数    {"comm":{"ct":19,"cv":1873,"format":"json","inCharset":"utf-8","outCharset":"utf-8","notice":"0","platform":"yqq.json","needNewCode":"0","wid":"0"},"req":{"method":"CgiGetDownUrl","module":"music.vkey.GetDownUrl","param":{"guid":"3946173165","songmid":["004Fs2FP1EvZYc"],"songtype":[0],"platform":"20","checklimit":1,"ctx":1,"downloadfrom":1,"scene":0,"musicfile":["RS01004Fs2FP1EvZYc.flac"],"filename":["RS01003ttAAW2hrdlz.flac"]}}}

最佳答案

查看完整内容

下面是给你翻译后的代码, 转十六进制可以用 hexdec() 来实现, $zd 你可以换成字符串进行初始化:

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

结帖率:100% (1/1)
发表于 2022-10-15 09:58:52 | 显示全部楼层   浙江省温州市
下面是给你翻译后的代码, 转十六进制可以用 hexdec() 来实现, $zd 你可以换成字符串进行初始化:
<?php
        function getsign($str)
        {
                $MD5 = md5($str);
                $sign = "zzb";
                $a = [ 21, 4, 9, 26, 16, 20, 27, 30 ];
                for ($i = 0; $i < count($a); $i++)
                {
                        $sign = $sign . $MD5[$a[$i]];
                }
                $a = [ 212, 45, 80, 68, 195, 163, 163, 203, 157, 220, 254, 91, 204, 79, 104, 6 ];
                $b = array();
                for ($i = 0; $i < strlen($MD5); $i += 2)
                {
                        $b[$i / 2] = hexdec($MD5[$i] . $MD5[$i + 1]);
                }
                $Ls = array();
                for ($i = 0; $i < count($a); $i++)
                {
                        $Ls[$i] = $a[$i] ^ $b[$i];
                }
                $zd = [ 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 86,
                        87, 88, 89, 90, 97, 98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 111, 112,
                        113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57 ];
                $zd = vsprintf(str_repeat('%c', count($zd)), $zd);
                $i = 0;
                // echo $zd . "</br>";
                for ($t = array(); $i < 5; $i++)
                {
                        $t[0] = $Ls[$i * 3] >> 2;
                        $t[1] = (($Ls[$i * 3] & 3) << 4) | ($Ls[$i * 3 + 1] >> 4);
                        $t[2] = (($Ls[$i * 3 + 1] & 15) << 2) | ($Ls[$i * 3 + 2] >> 6);
                        $t[3] = $Ls[$i * 3 + 2] & 63;
                        for ($j = 0; $j < count($t); $j++)
                        {
                                if ($t[$j] >= 0 && $t[$j] < strlen($zd))
                                {
                                        $sign = $sign .        $zd[$t[$j]];
                                }
                        }
                }
                $t[0] = $Ls[$i * 3] >> 2;
                $t[1] = ($Ls[$i * 3] & 3) << 4;
                for ($j = 0; $j < 2; $j++)
                {
                        if ($t[$j] >= 0 && $t[$j] < strlen($zd))
                        {
                                $sign = $sign .        $zd[$t[$j]];
                        }
                }
                $a = [ 18, 11, 3, 2, 1, 7, 6, 25 ];
                for ($i = 0; $i < count($a); $i++)
                {
                        $sign = $sign . $MD5[$a[$i]];
                }
                return strtolower($sign);
        }
        $json = '{"comm":{"ct":19,"cv":1873,"format":"json","inCharset":"utf-8","outCharset":"utf-8","notice":"0","platform":"yqq.json","needNewCode":"0","wid":"0"},"req":{"method":"CgiGetDownUrl","module":"music.vkey.GetDownUrl","param":{"guid":"3946173165","songmid":["004Fs2FP1EvZYc"],"songtype":[0],"platform":"20","checklimit":1,"ctx":1,"downloadfrom":1,"scene":0,"musicfile":["RS01004Fs2FP1EvZYc.flac"],"filename":["RS01003ttAAW2hrdlz.flac"]}}}';
        echo getsign($json) . "</br></br>";
        echo getsign("test");
?>

评分

参与人数 1荣誉 +1 收起 理由
笨潴 + 1 热心帮助他人,荣誉+1,希望继续努力(*^__^*) 嘻嘻!

查看全部评分

回复

使用道具 举报

结帖率:100% (9/9)

签到天数: 7 天

发表于 2022-10-15 10:55:53 | 显示全部楼层   重庆市重庆市
这精币真值钱啊
回复

使用道具 举报

结帖率:93% (95/102)

签到天数: 8 天

发表于 2022-10-15 11:07:54 | 显示全部楼层   天津市天津市
mgut 发表于 2022-10-15 10:55
这精币真值钱啊

1精币≈5000比特币        
回复

使用道具 举报

结帖率:70% (42/60)
 楼主| 发表于 2022-10-15 11:37:40 | 显示全部楼层   山东省滨州市
mgut 发表于 2022-10-15 10:55
这精币真值钱啊

我就不知道 字节集_十六进制到字节集 (MD5) 怎么 翻译成PHP
回复

使用道具 举报

结帖率:70% (42/60)
 楼主| 发表于 2022-10-15 11:37:55 | 显示全部楼层   山东省滨州市
yq1431 发表于 2022-10-15 11:07
1精币≈5000比特币

我就不知道 字节集_十六进制到字节集 (MD5) 怎么 翻译成PHP
回复

使用道具 举报

结帖率:75% (3/4)
发表于 2022-10-15 15:08:50 | 显示全部楼层   广东省惠州市
这不是xx音乐的js吗/?
回复

使用道具 举报

结帖率:100% (1/1)

签到天数: 9 天

发表于 2022-10-15 15:38:36 | 显示全部楼层   广东省汕头市

PHP十六进制转字节集就是直接转为Array
[PHP] 纯文本查看 复制代码
<?php
function hexstr2Bytes($input)
{
    $i=0;
    $m=0;
    if (strlen($input)/2 <> (int)(strlen($input)/2)) {
        $input ="0".$input;
    }
    $m = strlen($input)/2;
    $abytes=array_fill(0,$m-1,0) ;
    for ($i=0; $i<=$m-1;$i++) {
        $raw=substr($input, $i * 2 , 2);
        $hexed=hexdec($raw);
        $abytes[$i]=$hexed;
    }
    return $abytes;
}
$str = 'D42D5044C3A3A3CB9DDCFE5BCC4F6806';
print_r(hexstr2Bytes($str));
?>
回复

使用道具 举报

结帖率:70% (42/60)
 楼主| 发表于 2022-10-15 18:51:21 | 显示全部楼层   山东省滨州市
祭祀雨人 发表于 2022-10-15 15:38
PHP十六进制转字节集就是直接转为Array

大神能不能把帖子里PHP代码完整的发出来啊,谢谢了,辛苦了
回复

使用道具 举报

结帖率:70% (42/60)
 楼主| 发表于 2022-10-15 18:52:46 | 显示全部楼层   山东省滨州市
huxian 发表于 2022-10-15 15:08
这不是xx音乐的js吗/?

是滴啊大佬,发个PHP源码可以吗
回复

使用道具 举报

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

本版积分规则 致发广告者

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

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

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