fenglin/lib/str_process.inc.php

<?

function split_line($str,$prefix="",$width=76)
{
        if ($width<=0)
                return $str;
        
        $result = "";
        $len = mb_strlen($str,'UTF-8');
        $prefix_len = mb_strlen($prefix,'UTF-8');

        $line = $prefix;
        $line_len = $prefix_len;
        for($i=0;$i<$len;$i++)
        {
                $c = mb_substr($str,$i,1,'UTF-8');
                $line.=$c;

                // Each UTF-8 CJK character should use two character length for display
                $line_len += (strlen($c) <= 2 ? 1 : 2);

                if ($line_len >= $width)
                {
                        $result .= ($line . "\n");
                        $line = $prefix;
                        $line_len = $prefix_len;
                }
        }
        $result .= ($line . "\n");

        return $result;
}

function str_process($str,$prefix="",$width=76)
{
        $result = "";
        
        $lines = explode("\n",str_replace("\r\n","\n",$str));

        foreach($lines as $tmp => $line)
        {
                $result .= split_line($line,$prefix,$width);
        }
        
        return $result;
}

function str_b_lines($str,$max_line=1)
{
        $result = "";
        $l = 0;
        $lines = explode("\n",str_replace("\r\n","\n",$str));
        foreach($lines as $tmp => $line)
        {
                $result .= ($line."\n");
                $l += (mb_strlen($line,'UTF-8')/128 + 1);
                if ($l >= $max_line)
                        break;
        }

        return $result;
}

?>
1	sysadm	1.1	<?
2
3	sysadm	1.8	function split_line($str,$prefix="",$width=76)
4	sysadm	1.1	{
5			if ($width<=0)
6			return $str;
7
8	sysadm	1.9	$result = "";
9			$len = mb_strlen($str,'UTF-8');
10			$prefix_len = mb_strlen($prefix,'UTF-8');
11
12	sysadm	1.4	$line = $prefix;
13	sysadm	1.9	$line_len = $prefix_len;
14	sysadm	1.1	for($i=0;$i<$len;$i++)
15			{
16	sysadm	1.9	$c = mb_substr($str,$i,1,'UTF-8');
17			$line.=$c;
18
19			// Each UTF-8 CJK character should use two character length for display
20			$line_len += (strlen($c) <= 2 ? 1 : 2);
21
22			if ($line_len >= $width)
23	sysadm	1.3	{
24	sysadm	1.9	$result .= ($line . "\n");
25	sysadm	1.4	$line = $prefix;
26	sysadm	1.9	$line_len = $prefix_len;
27	sysadm	1.3	}
28	sysadm	1.1	}
29	sysadm	1.9	$result .= ($line . "\n");
30	sysadm	1.1
31			return $result;
32			}
33
34	sysadm	1.8	function str_process($str,$prefix="",$width=76)
35	sysadm	1.1	{
36			$result = "";
37
38			$lines = explode("\n",str_replace("\r\n","\n",$str));
39
40	sysadm	1.7	foreach($lines as $tmp => $line)
41	sysadm	1.1	{
42	sysadm	1.7	$result .= split_line($line,$prefix,$width);
43	sysadm	1.1	}
44
45			return $result;
46			}
47
48	sysadm	1.5	function str_b_lines($str,$max_line=1)
49			{
50			$result = "";
51			$l = 0;
52			$lines = explode("\n",str_replace("\r\n","\n",$str));
53	sysadm	1.7	foreach($lines as $tmp => $line)
54	sysadm	1.5	{
55	sysadm	1.9	$result .= ($line."\n");
56			$l += (mb_strlen($line,'UTF-8')/128 + 1);
57	sysadm	1.5	if ($l >= $max_line)
58			break;
59			}
60
61			return $result;
62			}
63
64	sysadm	1.1	?>
webmaster@leafok.com	ViewVC Help
Powered by ViewVC 1.3.0-beta1