fenglin/lib/str_process.inc.php

<?
function str_length($str)
{
        $len = strlen($str);
        $ret = 0;

        for ($i = 0; $i < $len; $i++)
        {
                $c = $str[$i];

                // Process UTF-8 Chinese characters
                $v1 = ord($c);
                if (($v1 & 0b10000000) == 0b10000000) //head of multi-byte character
                {
                        $v2 = ($v1 & 0b01111000) << 1;
                        while ($v2 & 0b10000000)
                        {
                                $i++;
                                $v3 = $str[$i];
                                $c .= $v3;
                                $v2 = ($v2 & 0b01111111 ) << 1;
                        }

                        $ret += 2;
                }
                else
                {
                        $ret++;
                }
        }

        return $ret;
}

function split_line($str, $prefix = "", $width = 76, $lines_limit = PHP_INT_MAX, $end_of_line = "\n")
{
        if ($width <= 0)
                return $str;
        
        $result = "";
        $len = strlen($str);
        $prefix_len = str_length($prefix);

        $lines_count = 0;

        $line = $prefix;
        $line_len = $prefix_len;
        for ($i = 0; $i < $len && $lines_count < $lines_limit; $i++)
        {
                $c = $str[$i];

                // Skip special characters
                if ($c == "\r" || $c == "\7")
                {
                        continue;
                }
                                
                if ($c == "\n")
                {
                        if ($lines_count + 1 >= $lines_limit)
                        {
                                break;
                        }

                        $result .= ($line . $end_of_line);
                        $lines_count++;
                        $line = $prefix;
                        $line_len = $prefix_len;
                        continue;
                }

                // Process UTF-8 Chinese characters
                $v1 = ord($c);
                if (($v1 & 0b10000000) == 0b10000000) //head of multi-byte character
                {
                        $v2 = ($v1 & 0b01111000) << 1;
                        while ($v2 & 0b10000000)
                        {
                                $i++;
                                $v3 = $str[$i];
                                $c .= $v3;
                                $v2 = ($v2 & 0b01111111 ) << 1;
                        }

                        // Each UTF-8 CJK character should use two character length for display
                        if ($line_len + 2 > $width)
                        {
                                if ($lines_count + 1 >= $lines_limit)
                                {
                                        break;
                                }

                                $result .= ($line . $end_of_line);
                                $lines_count++;
                                $line = $prefix;
                                $line_len = $prefix_len;
                        }
                        $line_len += 2;
                }
                else
                {
                        $line_len++;
                }

                $line .= $c;

                if ($line_len >= $width)
                {
                        if ($lines_count + 1 >= $lines_limit)
                        {
                                break;
                        }

                        $result .= ($line . $end_of_line);
                        $lines_count++;
                        $line = $prefix;
                        $line_len = $prefix_len;
                }
        }

        if ($lines_count < $lines_limit)
        {
                $result .= $line;
        }

        return $result;
}
?>
1	sysadm	1.1	<?
2	sysadm	1.12	function str_length($str)
3			{
4			$len = strlen($str);
5			$ret = 0;
6
7			for ($i = 0; $i < $len; $i++)
8			{
9			$c = $str[$i];
10
11			// Process UTF-8 Chinese characters
12			$v1 = ord($c);
13			if (($v1 & 0b10000000) == 0b10000000) //head of multi-byte character
14			{
15			$v2 = ($v1 & 0b01111000) << 1;
16			while ($v2 & 0b10000000)
17			{
18			$i++;
19			$v3 = $str[$i];
20			$c .= $v3;
21			$v2 = ($v2 & 0b01111111 ) << 1;
22			}
23
24			$ret += 2;
25			}
26			else
27			{
28			$ret++;
29			}
30			}
31
32			return $ret;
33			}
34
35	sysadm	1.13	function split_line($str, $prefix = "", $width = 76, $lines_limit = PHP_INT_MAX, $end_of_line = "\n")
36	sysadm	1.1	{
37	sysadm	1.10	if ($width <= 0)
38	sysadm	1.1	return $str;
39
40	sysadm	1.9	$result = "";
41	sysadm	1.10	$len = strlen($str);
42	sysadm	1.12	$prefix_len = str_length($prefix);
43	sysadm	1.10
44			$lines_count = 0;
45	sysadm	1.9
46	sysadm	1.4	$line = $prefix;
47	sysadm	1.9	$line_len = $prefix_len;
48	sysadm	1.11	for ($i = 0; $i < $len && $lines_count < $lines_limit; $i++)
49	sysadm	1.1	{
50	sysadm	1.10	$c = $str[$i];
51	sysadm	1.9
52	sysadm	1.10	// Skip special characters
53			if ($c == "\r" \|\| $c == "\7")
54			{
55			continue;
56			}
57
58			if ($c == "\n")
59			{
60	sysadm	1.13	if ($lines_count + 1 >= $lines_limit)
61			{
62			break;
63			}
64
65			$result .= ($line . $end_of_line);
66	sysadm	1.10	$lines_count++;
67			$line = $prefix;
68			$line_len = $prefix_len;
69			continue;
70			}
71
72			// Process UTF-8 Chinese characters
73			$v1 = ord($c);
74			if (($v1 & 0b10000000) == 0b10000000) //head of multi-byte character
75			{
76			$v2 = ($v1 & 0b01111000) << 1;
77			while ($v2 & 0b10000000)
78			{
79			$i++;
80			$v3 = $str[$i];
81			$c .= $v3;
82			$v2 = ($v2 & 0b01111111 ) << 1;
83			}
84
85			// Each UTF-8 CJK character should use two character length for display
86			if ($line_len + 2 > $width)
87			{
88	sysadm	1.12	if ($lines_count + 1 >= $lines_limit)
89			{
90			break;
91			}
92
93	sysadm	1.13	$result .= ($line . $end_of_line);
94	sysadm	1.10	$lines_count++;
95			$line = $prefix;
96			$line_len = $prefix_len;
97			}
98			$line_len += 2;
99			}
100			else
101			{
102			$line_len++;
103			}
104
105			$line .= $c;
106	sysadm	1.9
107			if ($line_len >= $width)
108	sysadm	1.3	{
109	sysadm	1.12	if ($lines_count + 1 >= $lines_limit)
110			{
111			break;
112			}
113
114	sysadm	1.13	$result .= ($line . $end_of_line);
115	sysadm	1.10	$lines_count++;
116	sysadm	1.4	$line = $prefix;
117	sysadm	1.9	$line_len = $prefix_len;
118	sysadm	1.3	}
119	sysadm	1.1	}
120	sysadm	1.11
121			if ($lines_count < $lines_limit)
122			{
123			$result .= $line;
124			}
125	sysadm	1.1
126			return $result;
127			}
128			?>
webmaster@leafok.com	ViewVC Help
Powered by ViewVC 1.3.0-beta1