メール本文やBBS投稿文の指定文字幅での自動改行

質問

いつもお世話になっています＾＾
えっと、やりたいことは、日本語と英語を含む文字列を
指定文字幅で改行したいです。
例えば
----------------------
I'm going to use e-mail to keep in touch with my friends in New Zealand.
私はニュージーランドにいる友人達と疎遠にならないように、電子[mail]利用するつもりです
----------------------

を既に入っている改行は有効のままでオーバーするものを切断するものが欲しいです。

----------------------
I'm going to use e-mai
l to keep in touch wit
h my friends in New Ze
aland.
私はニュージーランドに
いる友人達と疎遠になら
ないように、電子[mail]
を利用するつもりです.
----------------------
みたいな感じにしたいのですが
２バイト文字?と１バイト文字が混ざってるとなんか？
大変な感じです。

いろいろネットでは探してみたのですが
[文字化け]
http://www.cubeworks.co.jp/article/index.php?/archives/2-unknown.html

なんてのも使ってみましたが、
日本語と英語が混ざっていると改行近辺で文字化けを起こしてしまった。

しょうがないので自分でなにか作ってみようとおもって、自分なりにつくってみました。

----作った関数------
function str_splits($text,$long,$br="\n",$encode="Shift_JIS"){
$data=explode("\n",$text);
foreach($data as $val){
$nagasa=mb_strwidth($val);
if($nagasa>$long){
$new[0]=mb_strcut($val,0,$long,Shift_JIS);
$new[1]=mb_strcut($val,$long+1,150,Shift_JIS);
$val=implode($br,$new);
}
$last[]=$val;
}
$mystr=implode("\n",$last);
return $mystr;
}
-------------------
なにが問題かというと
例えば１０バイト(半角１０文字で分割)で分割すると
--------------------------
123456789山田さん
--------------------------
を上の関数で分割すると
--------------------------
123456789
田さん
--------------------------

みたいになって「山」の字が消えてしまいます。
この山を消えないようにするには10-11バイトが日本語文字の時は
10バイトから-20バイトで分けないといけないというの思います。
しかし、具体的にどのようにすればスマートにそれができるのかが思いつきません。

是非、ご教授いただければ幸いです。
よろしくお願いいたします。

同様な機能を持つような関数が絶対ニーズがないとは思えないので
（でも探したのですが、なぜか無かったです）、そういうソースを公開されているサイトをご存知であれば是非教えていただきたいです。

回答No.2

gogo724275

自作したものです。

/********************************************************************************/
/* 引 数 1：[str]文字列 */
/* 2：[int]取得する文字列バイト数 */
/* 3：[str]末尾に付加する文字列('…'など/省略可) */
/* 4：[str]改行タグ(コード)置換文字列(省略可) */
/********************************************************************************/
/* 戻 り 値 ：[str]文字列 */
/********************************************************************************/
/* 機 能 ：マルチバイト対応。 */
/* 文字列(引数1)の先頭から引数2のバイト数だけ文字を取得してリターン。*/
/* 返す文字列長を視覚的にほぼ同じ長さになるようにする */
/********************************************************************************/
function mbLengthAdjustment($str, $len, $foot = '', $nl = ' ')
{
//int
$x;
//str
$ret = '';

$len = $len - strlen($foot);

$str = str_replace("\r\n", $nl, $str);
$str = str_replace("\r", $nl, $str);
$str = str_replace("\n", $nl, $str);

$str = eregi_replace('<BR>', $nl, $str);
$str = eregi_replace('<BR />', $nl, $str);

$str = eregi_replace('&lt;BR&gt;', $nl, $str);
$str = eregi_replace('&lt;br /&gt;', $nl, $str);

if( strlen($str) <= $len )
{
return $str;
}

for($x = 0; $x < mb_strlen($str); $x++)
{
$ret.= mb_substr($str, $x, 1);

if( $len <= strlen($ret) )
{
break;
}
}

return $ret . $foot;
}

お礼

３と４引数をいれて関数を使ってみましたが
なぜか（？）したあとが消えてしまいます。

$new[1]=mb_strcut($val,$long+1,150,Shift_JIS);
の$long+1を$longにしたら理由はよくわかりませんが
とりあえずうまくいったので自己解決しました。

ご返答いただき感謝しております。
ありがとうございます。

回答No.1

__LINE__

ためしてませんが、以下のサイトは参考になりますか

参考URL：

http://www.cubeworks.co.jp/article/index.php?/archives/2-unknown.html

お礼

ありがとうございます。
質問文にもかきましたが・・・
その関数は試しました。

ご返答には感謝しております。