找回密码
 注册
搜索
[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
查看: 15450|回复: 0

[原创代码] 解密 m3u8 加密地址

[复制链接]
发表于 2021-4-26 18:31:58 | 显示全部楼层 |阅读模式
若本贴有违某些XXX东西,可删除,想看的尽快看。

这段时间看视频时发现有些 链接加密成了一种新样式。‘JTXX’ 这样的混淆形式。 下面是解密方法(未出变种前有效):

  1. $row = 'wxyz012345BCDEFG';
  2. $col = 'ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz';

  3. $encryptWords = -join(@(for ($i = 32; $i -le 122; $i++) { [char]$i }));

  4. function GetDecryptWord([string]$str){
  5.         if($str.Length -ne 4) { return '';}
  6.         $char1 = $str[2];
  7.         $char2 = $str[3];
  8.         [int]$index1 = $col.IndexOf($char1);
  9.         [int]$index2 = $row.IndexOf($char2);
  10.         [int]$id = ($index1 - 8) * 4 + $index2;
  11.         if($char2 -cmatch "[BCDEFG]"){$id -= 4;}
  12.         return $encryptWords[$id];
  13. }

  14. # 加密的链接
  15. $url = 'JTY4JTc0JTc0JTcwJTczJTNBJTJGJTJGJTc2JTZGJTY0JTMyJTJFJTYyJTc1JTc5JTYzJTYxJTcyJTM1JTJFJTYzJTZFJTJGJTMyJTMwJTMyJTMwJTMxJTMyJTMxJTM5JTJGJTQ1JTM1JTc4JTQxJTY1JTUzJTZEJTY3JTJGJTY5JTZFJTY0JTY1JTc4JTJFJTZEJTMzJTc1JTM4';

  16. # 解密输出
  17. $result = [regex]::Replace($url, '(?:JT\w\w)',{GetDecryptWord -str $args.value});
复制代码

评分

参与人数 1技术 +1 收起 理由
老刘1号 + 1 感谢分享

查看全部评分

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

本版积分规则

Archiver|手机版|小黑屋|批处理之家 ( 渝ICP备10000708号 )

GMT+8, 2026-3-16 23:50 , Processed in 0.017615 second(s), 9 queries , File On.

Powered by Discuz! X3.5

© 2001-2026 Discuz! Team.

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