返回信息流想了下,还是贴论坛来吧。
虽然在信安QQ群(AD:群号-118606062)里面也上传了,先放上部分代码。 具体内容都在附件里面、 板砖请轻拍 !
//QQ版的TEA加密
function qqencrypt($v,$k)
{
$k=str_replace(' ','',$k);
$v=str_replace(' ','',$v);
$rnd=rnd();
$v_1_1=$v_2_nadd2='';
//计算填充的个数$n
$n=(strlen($v)/2+10)%8;
if($n)
{
$n=8-$n;
$v_1_1=dechex((hexdec($rnd)&0xf8)|$n); //$v_n_m表示的意思为$v中的第n个字节到m个字节,下面的写法一样
for($i=1;$i<=$n+2;$i++)
{
$v_2_nadd2.=$rnd;
}
}
else
{$v_1_1=dechex((hexdec($rnd)&0xf8)|$n); //$v_n_m表示的意思为$v中的第n个字节到m个字节,下面的写法一样
for($i=1;$i<=$n+2;$i++)
{
$v_2_nadd2.=$rnd;
}}
$v=b0($v_1_1,1).$v_2_nadd2.$v.'00000000000000'; //这里就是我们要加密的数据了
$p=byte_8($v);
$c=array();$i=0;$tr=$to=0;$data='';
while($i<(strlen($v)/2)/8)
{
$c[$i]=cxor(encode(byte_4(b0(cxor($p[$i],$tr),8)),byte_4($k)),$to);
$to=cxor($p[$i],$tr);
$tr=$c[$i];
//$data.=$c[$i];
$data.=b0($c[$i],8);
$i++;
}
return $data;
}
//QQ版的TEA解密
function qqdecrypt($v,$k)
{
$k=str_replace(' ','',$k);
$v=str_replace(' ','',$v);
$instrlen=(strlen($v)/2);
/* at least 16 bytes and %8 == 0*/
if (($instrlen % 8) || ($instrlen < 16)) return 0;
$p=byte_8($v);
$i=0;$to=$tr=0;;$x=$data='';
while($i<$instrlen/8)
{
$x=cxor(decode(byte_4(b0(cxor($p[$i],$to),8)),byte_4($k)),$tr);
$x=b0($x,8);
$to=cxor($tr,$x);
$tr=$p[$i];
$i++;
$data.=$x;
}
//$data就是我们填充加密的东西
//取出第一个字节算$n
$n=hexdec(substr($data,0,2));
$n=$n&0x7;
$n=$n+2+1;
$m=2*(strlen($v)/2-$n-7); //这里的$n表示数据长度,也就是最终的数据长度
return substr($data,2*$n,$m);
}
附件(2.4KB) qqcrypt.rar
这是一条镜像帖。来源:北邮人论坛 / security / #33237同步于 2011/11/6
该镜像源已超过 30 天没有更新,可能在源站已被删除。
Security机器人发帖
QQ Crypt !
Xsetc
2011/11/6镜像同步5 回复
订阅后,新回复会通过你的通知中心匿名送达。
5 条回复
QQ群也不很靠谱,我去google建个group吧。
【 在 Xsetc (AntiSec) 的大作中提到: 】
: 我表示暂时不发布任何客户端、以免被河蟹 ! 就这个泄露的信息都很多了。
【 在 BookMoth 的大作中提到: 】
: QQ群也不很靠谱,我去google建个group吧。
: 【 在 Xsetc (AntiSec) 的大作中提到: 】
: : 我表示暂时不发布任何客户端、以免被河蟹 ! 就这个泄露的信息都很多了。
: ...................
那个.. 好吧· 还是用IRC吧...回头我把地址公布出来 ~