php的漢字轉換：Unicode(UTF8)至GBK

php的漢字轉換一直是比較麻煩的事

該類別內建了四個過濾"[dec];","[hex];","%u[hex]","utf8轉換"
方便使用者的使用，同時也可自訂過濾進行自己喜歡的操作

qswhU.php 從這裡下載
http://www.blueidea.com/user/qswh/qswhU.zip

class qswhU{
 var $qswhData;
 function qswhU($filename="qswhU.php"){
  $this->qswhData=file($filename);
 }
 
 function decode($,str. arr=array("/(w+);/iU","/((%ww)+)/i","/%u(w{4,5})/iU");
  if(is_integer ($pattern)){
    if($pattern>=count($arr))die("Invalid Function");
    $pattern=$arr[$pattern];
  }
  return preg_replace_callback($ this,"u2gb"),$str);
 }
 
 function u2gb($arr){
  /******(qiushuiwuhen 2002-8-15)******/
  $ret="";$str=$arr[1];
 preg_match_all("/%w{2}/",$str,$matches)){
   for($i=0;$i    $chr1=hexdec( substr($matches[0][$i],1));
    $arr=array("f0","e0","c0","0");
    for($j=0;$jhexdec($arr[$j]))break;
    $chr=hexdec(substr($matches[0][$i],1))-hexdec( $arr[$j]);
    while(++$j    $str=dechex($chr);
    if(strlen($str)==4){
     $p=hexdec(substr($str,0,2))-0x4d; (substr($str,2))*4;
     $ret.=chr(hexdec(substr($this->qswhData[$p],$q,2)));
     $ret.=chr(hexdec( substr($this->qswhData[$p],$q+2,2)));
    }else
     $ret.=chr(hexdec($str));
   }🎝 ($str[0])=="x")
    $str=substr($str,1);
   else
    if(strlen($str)!=4)$str if(strlen($str)==4){
    $p=hexdec(substr($str,0,2))-0x4d;
    $q=hexdec(substr($str,2))*4; ret.=chr(hexdec(substr($this->qswhData[$p],$q,2)));
    $ret.=chr(hexdec(substr($this->qswhData[$p],$q +2,2)));
   }else
    $ret.=chr(hexdec($str));
  }
  return $ret;
 } ("qswhU.php");//如果檔案名稱是qswhU.php,可省參數
echo "

不含參數(預設過濾為：[num];):";<br>echo "n" .$qswh->decode("中文Abc");<br>echo "n".$qswh->decode("中文Abc");<br>echo "n呼叫內建過濾(UTF轉碼):".$qswh-> decode("%E4%B8%AD%E6%96%87%20!%22%23%24%25%26'()*%2B%2C%2F%3A%3B%3C%3D%3E%3F %40%5B%5D%5E%60%7B%7C%7D~%25Abc",1);<br>echo "n呼叫內建過濾unescape(%u[num]):".$qswh->decode("% u4E2D%u6587Abc",2);<br>echo "n自訂過濾([x+num]):".$qswh->decode("[x4E2D][x6587][x41][x62][x63]"," /[(w+)]/");<br><br>效果如下：<br>不帶參數(預設濾波為：[num];):<br>中文Abc<br>中文Abc呼叫內建過濾(UTF轉碼):中文! "#$%&'()*+,/:;?@[]^`{|}~%Abc<p>呼叫內建過濾unescape(%u[num]):中文Abc<br>自訂篩選([ x+num]):中文Abc</p> <p><br><br></p>