escape 的结果,不能被正确unescape,这是什么问题,急呀。

Python/PHP/Perl 开发与设计
回复
zshdiy
帖子: 2
注册时间: 2007-11-18 20:51
送出感谢: 0
接收感谢: 0

escape 的结果,不能被正确unescape,这是什么问题,急呀。

#1

帖子 zshdiy » 2007-11-18 20:54

<?php
echo unescape(escape("中国"));
function escape($str){
$sublen=strlen($str);
$reString="";
for ($i=0;$i<$sublen;$i++){
if(ord($str[$i])>=127){
$tmpString=bin2hex(iconv("gb2312","ucs-2",substr($str,$i,2))); //此处GBK为目标代码的编码格式,请实际情况修改

if (!eregi("WIN",PHP_OS)){
$tmpString=substr($tmpString,2,2).substr($tmpString,0,2);
}
$reString.="%u".$tmpString;
$i++;
} else {
$reString.="%".dechex(ord($str[$i]));
}
}
return $reString;
}



function unescape($str) {
$str = rawurldecode($str);
preg_match_all("/%u.{4}|&#x.{4};|&#d+;|.+/U",$str,$r);
$ar = $r[0];
foreach($ar as $k=>$v) {
if(substr($v,0,2) == "%u")
$ar[$k] = iconv("UCS-2","gb2312",pack("H4",substr($v,-4)));
elseif(substr($v,0,3) == "&#x")
$ar[$k] = iconv("UCS-2","gb2312",pack("H4",substr($v,3,-1)));
elseif(substr($v,0,2) == "&#") {
$ar[$k] = iconv("UCS-2","gb2312",pack("n",substr($v,2,-1)));
}
}
return join("",$ar);
}

?>
zshdiy
帖子: 2
注册时间: 2007-11-18 20:51
送出感谢: 0
接收感谢: 0

#2

帖子 zshdiy » 2007-11-18 20:57

在windows xp下可以正确解析出来,
iconv版本为 1.9
iconv implementation "libiconv"

ubuntu 下
iconv版本为 下版本为 2.6.1
iconv implementation glibc

难道是版本不同引起的。如何解决呢。
回复

回到 “Python/Php/Perl”