# 判斷某個(gè)位置是中文字符的左還是右半部分，或不是中文 
# 返回值 -1 左 0 不是中文字符 1 右 
# 用法 
/* 
$a = 'this is 中文'; 
print is_chinese($a, 1); // 0 
print is_chinese($a,8); // -1 
print is_chinese($a,9); // 1 
*/ 
function is_chinese(&$str, $location) { 
$ch = true; 
$i = $location; 
while(ord($str[$i])>0xa0 && $i >= 0) { 
$ch = !$ch; 
$i --; 
} 

if($i != $location) { 
$f_str = $ch ? 1: -1; 
} 
else { 
$f_str = false; 
} 

return $f_str; 
} 


# 中文字符串倒置函數(shù) 
# 如果一個(gè)將一個(gè)有中文的字符串用strrev倒過(guò)來(lái)，就會(huì)產(chǎn)生亂碼 
/* 
print cstrrev('this is 中文'); // 文中 si siht 
*/ 

function cstrrev(&$str) { 
$long = strlen($str); 
for($f_str='', $chinese=false, $i=$long-1; $i>=0; $i--) { 
if(ord($str[$i]) > 0xa0) { 
$chinese = ! $chinese; 
if($chinese == false) { 
$f_str .= $str[$i].$str[$i+1]; 
} 
} 
else { 
$f_str .= $str[$i]; 
} 
} 
return $f_str; 
} 
/* 中文字符串截取函數(shù) 
一些中文字符串截取函數(shù)經(jīng)常有一些問(wèn)題，例如在一些自動(dòng)換行程序中 
$a=“1中2”； 
經(jīng)兩次截取后， 
csubstr($str,$a,0,2); 
csubstr($str, $a, 2,2) 
由于載取位置指向“中”的右字節(jié)，可能會(huì)是這樣的結(jié)果 
1, 2 
用本函數(shù)會(huì)產(chǎn)生正確的結(jié)果 
1中, 2 
*/ 
# start 開(kāi)始位置，從0開(kāi)始 
# long = 0 則從start 一直取到字符串尾 
# ltor = true 時(shí)從左到右取字符，false 時(shí)到右到左取字符 
# $cn_len 中文字符按字節(jié)取還是字?jǐn)?shù)取，如果按字?jǐn)?shù)取，則一個(gè)中文當(dāng)一個(gè)字節(jié)計(jì)算 

function csubstr(&$str, $start=0, $long=0, $ltor=true, $cn_len=2) { 
if($long == 0) $long = strlen($str); 
if($ltor == false) $str = cstrrev($str); 

if($cn_len == 1) { 

for($i=0, $fs=0; $i<$start; $fs++) 
$i += (ord($str[$fs]) <= 0xa0) ? 1 : 0.5; 
for($i=0, $fe=$fs; $i<$long; $fe++) 
$i += (ord($str[$fe]) <= 0xa0) ? 1 : 0.5; 
$long = $fe - $fs; 

} 
else { 

$fs = (is_chinese($str, $start) == 1) ? $start - 1 : $start; 
$fe = $long + $start - 1; 
$end = ( is_chinese($str, $fe) == -1 ) ? $fe -1 : $fe; 
$long = $end - $fs + 1; 
} 

$f_str = substr($str, $fs, $long); 
if($ltor == false) $f_str = cstrrev($f_str); 

return $f_str; 
} 

# 取左字符串 
# 當(dāng)cn_len == 2 時(shí) $long 取左邊多少個(gè)字,反之則取左邊多少個(gè)字節(jié) 
function cleft(&$str, $long, $cn_len=2) { 
$f_str = csubstr($str, 0, $long, true, $cn_len); 
return $f_str; 
} 

# 取右字符串 
function cright(&$str, $long, $cn_len=2) { 
$f_str = cstrrev($str); 
$f_str = csubstr($f_str, 0, $long, true, $cn_len); 
$f_str = cstrrev($f_str); 
return $f_str; 
} 
# 對(duì)含有中文字符的文章分行格式化 
# 再也不會(huì)發(fā)生因換行問(wèn)題而產(chǎn)生的種種問(wèn)題啦！??！ 
# 注：文章的每一行必須用 n （chr(13)）進(jìn)行分行 
# $width 每行多少字符 
# $br 將 每行用什么字符當(dāng)結(jié)束符 

function ctext_wrap(&$text, $width=60, $br="<BR>") { 
$lines = explode("n",$text); 
$rows = count($lines); 

for($i=0; $i<$rows; $i++) { 
$len = strlen($lines[$i]); 
for($j=0; $j<$len; $j+=$width) { 
$p = $j + $width - 1; 
$k = 0; 
if($p<$len) { 
while(!is_chinese($lines[$i], $p) && $lines[$i][$p] != ' ' && $p>$j) { 
$k ++; 
$p --; 
} 
if($p == $j) $k = 0; 
} 
$f_str .= csubstr($lines[$i], $j, $width-$k) . $br; 
$j -= $k; 
} 
} 
return $f_str; 
} 

最新評(píng)論