(100%结贴)求把这几行代码翻译成PHP的。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。
const<br /> <br /> XorKey:array[0..7] of Byte=($B2,$09,$AA,$55,$93,$6D,$84,$47); //字符串加密用<br /> <br />function Dec(Str:String):String;//字符解密函數<br />var<br />i,j:Integer;<br />begin<br />Result:='';<br />j:=0;<br />for i:=1 to Length(Str) div 2 do<br /> begin<br /> Result:=Result+Char(StrToInt('$'+Copy(Str,i*2-1,2)) xor XorKey[j]);<br /> j:=(j+1) mod 8;<br /> end;<br />end;
就上面几行代码，
求懂php的帮忙把这个函数翻译成php的，
我delphi加密，然后php解密，
我对php一点也不懂，但是懂调用。
——解决思路———————-
$XorKey = array(0xB2,0x09,0xAA,0x55,0x93,0x6D,0x84,0x47);<br /><br />echo $s = enc('Edit2', $XorKey), PHP_EOL;<br /><br />echo dec($s, $XorKey);<br /><br />function Enc($Str, $XorKey) { //:String;//字符加密函數 這是用的一個異或加密<br /> $Result = '';<br /> $j = 0;<br /> for($i=0; $i<strlen($Str); $i++) {<br /> $Result .= sprintf('%02X', ord($Str{$i}) ^ $XorKey[$j]);<br /> $j = ($j+1) % 8;<br /> }<br /> return $Result;<br />}<br /><br />function Dec($str, $XorKey){<br /> $result = "";<br /> for($i=0, $j=0; $i<strlen($str); $i+=2) {<br /> $result .= chr(hexdec($str{$i} . $str{$i+1}) ^ $XorKey[$j]);<br /> $j = ++$j % 8;<br /> }<br /> return $result;<br />}<br />
F76DC321A1
Edit2
——解决思路———————-
<br /><?php<br />$XorKey = array(0xB2,0x09,0xAA,0x55,0x93,0x6D,0x84,0x47);<br />function Dec($str){<br /> global $XorKey;<br /> $result = "";<br /> $j = 0;<br /> for ($i = 0; $i < strlen($str)/2; $i++)<br /> {<br /> $result = $result . chr(hexdec($str[$i*2] . $str[$i*2+1]) ^ $XorKey[$j]);<br /> $j = ++$j % 8;<br /> }<br /> return $result;<br />}<br /><br /><br />function E<em>/本2文来源[email protected]搞@^&代*@码2网</em><strong>搞gaodaima代码</strong>nc($str){<br /> global $XorKey;<br /> $result = "";<br /> $j = 0;<br /> for ($i = 0; $i < strlen($str); $i++)<br /> {<br /> $result = $result. dechex(ord($str[$i])^$XorKey[$j]);<br /> $j = ++$j % 8;<br /> }<br /> return $result;<br />}<br />echo Enc("Edit2")."\n";<br />echo Dec("F76DC321A1");
搞代码网（gaodaima.com）提供的所有资源部分来自互联网，如果有侵犯您的版权或其他权益，请说明详细缘由并提供版权或权益证明然后发送到邮箱[email protected]，我们会在看到邮件的第一时间内为您处理，或直接联系QQ：872152909。本网站采用BY-NC-SA协议进行授权
转载请注明原文链接：(100%结贴)求把这几行代码翻译成PHP的。解决方案
转载请注明原文链接：(100%结贴)求把这几行代码翻译成PHP的。解决方案
