/[LeafOK_CVS]/fenglin/lib/str_process.inc.php
ViewVC logotype

Diff of /fenglin/lib/str_process.inc.php

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

Revision 1.9 by sysadm, Sat Mar 1 09:02:28 2025 UTC Revision 1.15 by sysadm, Mon Apr 7 06:26:44 2025 UTC
# Line 1  Line 1 
1  <?  <?
2    function str_length(string $str) : string
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  function split_line($str,$prefix="",$width=76)          return $ret;
33    }
34    
35    function split_line(string $str, string $prefix = "", int $width = 76, int $lines_limit = PHP_INT_MAX, string $end_of_line = "\n") : string
36  {  {
37          if ($width<=0)          if ($width <= 0)
38            {
39                  return $str;                  return $str;
40            }
41                    
42          $result = "";          $result = "";
43          $len = mb_strlen($str,'UTF-8');          $len = strlen($str);
44          $prefix_len = mb_strlen($prefix,'UTF-8');          $prefix_len = str_length($prefix);
45    
46            $lines_count = 0;
47    
48          $line = $prefix;          $line = $prefix;
49          $line_len = $prefix_len;          $line_len = $prefix_len;
50          for($i=0;$i<$len;$i++)          for ($i = 0; $i < $len && $lines_count < $lines_limit; $i++)
51          {          {
52                  $c = mb_substr($str,$i,1,'UTF-8');                  $c = $str[$i];
                 $line.=$c;  
53    
54                  // Each UTF-8 CJK character should use two character length for display                  // Skip special characters
55                  $line_len += (strlen($c) <= 2 ? 1 : 2);                  if ($c == "\r" || $c == "\7")
56                    {
57                  if ($line_len >= $width)                          continue;
58                    }
59                                    
60                    if ($c == "\n")
61                  {                  {
62                          $result .= ($line . "\n");                          if ($lines_count + 1 >= $lines_limit)
63                            {
64                                    break;
65                            }
66    
67                            $result .= ($line . $end_of_line);
68                            $lines_count++;
69                          $line = $prefix;                          $line = $prefix;
70                          $line_len = $prefix_len;                          $line_len = $prefix_len;
71                            continue;
72                  }                  }
         }  
         $result .= ($line . "\n");  
73    
74          return $result;                  // Process UTF-8 Chinese characters
75  }                  $v1 = ord($c);
76                    if (($v1 & 0b10000000) == 0b10000000) //head of multi-byte character
77                    {
78                            $v2 = ($v1 & 0b01111000) << 1;
79                            while ($v2 & 0b10000000)
80                            {
81                                    $i++;
82                                    $v3 = $str[$i];
83                                    $c .= $v3;
84                                    $v2 = ($v2 & 0b01111111 ) << 1;
85                            }
86    
87                            // Each UTF-8 CJK character should use two character length for display
88                            if ($line_len + 2 > $width)
89                            {
90                                    if ($lines_count + 1 >= $lines_limit)
91                                    {
92                                            break;
93                                    }
94    
95                                    $result .= ($line . $end_of_line);
96                                    $lines_count++;
97                                    $line = $prefix;
98                                    $line_len = $prefix_len;
99                            }
100                            $line_len += 2;
101                    }
102                    else
103                    {
104                            $line_len++;
105                    }
106    
107  function str_process($str,$prefix="",$width=76)                  if ($line_len > $width)
108  {                  {
109          $result = "";                          if ($lines_count + 1 >= $lines_limit)
110                                    {
111          $lines = explode("\n",str_replace("\r\n","\n",$str));                                  break;
112                            }
113    
114          foreach($lines as $tmp => $line)                          $result .= ($line . $end_of_line);
115          {                          $lines_count++;
116                  $result .= split_line($line,$prefix,$width);                          $line = $prefix;
117                            $line_len = $prefix_len + 1;
118                    }
119    
120                    $line .= $c;
121          }          }
           
         return $result;  
 }  
122    
123  function str_b_lines($str,$max_line=1)          if ($lines_count < $lines_limit)
 {  
         $result = "";  
         $l = 0;  
         $lines = explode("\n",str_replace("\r\n","\n",$str));  
         foreach($lines as $tmp => $line)  
124          {          {
125                  $result .= ($line."\n");                  $result .= $line;
                 $l += (mb_strlen($line,'UTF-8')/128 + 1);  
                 if ($l >= $max_line)  
                         break;  
126          }          }
127    
128          return $result;          return $result;
129  }  }
   
130  ?>  ?>

Legend:
Removed lines/characters  
Changed lines/characters
  Added lines/characters
webmaster@leafok.com
 ViewVC Help
Powered by ViewVC 1.3.0-beta1