/[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.21 by sysadm, Sat Oct 18 14:15:35 2025 UTC
# Line 1  Line 1 
1  <?  <?php
2    function str_length(string $str) : int
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 & 0x80) //head of multi-byte character
14                    {
15                            $v2 = ($v1 & 0x70) << 1;
16                            while ($v2 & 0x80)
17                            {
18                                    $i++;
19                                    $c .= $str[$i];
20                                    $v2 = ($v2 & 0x7f) << 1;
21                            }
22    
23                            $ret += 2;
24                    }
25                    else
26                    {
27                            $ret++;
28                    }
29            }
30    
31  function split_line($str,$prefix="",$width=76)          return $ret;
32    }
33    
34    function split_line(string $str, string $prefix = "", int $width = 76, int $lines_limit = PHP_INT_MAX, string $end_of_line = "\n") : string
35  {  {
36          if ($width<=0)          if ($width <= 0)
37            {
38                  return $str;                  return $str;
39                    }
40    
41          $result = "";          $result = "";
42          $len = mb_strlen($str,'UTF-8');          $len = strlen($str);
43          $prefix_len = mb_strlen($prefix,'UTF-8');          $prefix_len = str_length($prefix);
44    
45            $lines_count = 0;
46    
47          $line = $prefix;          $line = $prefix;
48          $line_len = $prefix_len;          $line_len = $prefix_len;
49          for($i=0;$i<$len;$i++)          for ($i = 0; $i < $len && $lines_count < $lines_limit; $i++)
50          {          {
51                  $c = mb_substr($str,$i,1,'UTF-8');                  $c = $str[$i];
                 $line.=$c;  
52    
53                  // Each UTF-8 CJK character should use two character length for display                  // Skip special characters
54                  $line_len += (strlen($c) <= 2 ? 1 : 2);                  if ($c == "\r" || $c == "\7")
55                    {
56                            continue;
57                    }
58    
59                  if ($line_len >= $width)                  if ($c == "\n")
60                  {                  {
61                          $result .= ($line . "\n");                          if ($lines_count + 1 >= $lines_limit)
62                            {
63                                    break;
64                            }
65    
66                            $result .= ($line . $end_of_line);
67                            $lines_count++;
68                          $line = $prefix;                          $line = $prefix;
69                          $line_len = $prefix_len;                          $line_len = $prefix_len;
70                            continue;
71                  }                  }
         }  
         $result .= ($line . "\n");  
72    
73          return $result;                  // Process UTF-8 Chinese characters
74  }                  $v1 = ord($c);
75                    if ($v1 & 0x80) //head of multi-byte character
76                    {
77                            $v2 = ($v1 & 0x70) << 1;
78                            while ($v2 & 0x80)
79                            {
80                                    $i++;
81                                    $c .= $str[$i];
82                                    $v2 = ($v2 & 0x7f) << 1;
83                            }
84    
85                            // Each UTF-8 CJK character should use two character length for display
86                            if ($line_len + 2 > $width)
87                            {
88                                    if ($lines_count + 1 >= $lines_limit)
89                                    {
90                                            break;
91                                    }
92    
93                                    $result .= ($line . $end_of_line);
94                                    $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  function str_process($str,$prefix="",$width=76)                  if ($line_len > $width)
106  {                  {
107          $result = "";                          if ($lines_count + 1 >= $lines_limit)
108                                    {
109          $lines = explode("\n",str_replace("\r\n","\n",$str));                                  break;
110                            }
111    
112          foreach($lines as $tmp => $line)                          $result .= ($line . $end_of_line);
113          {                          $lines_count++;
114                  $result .= split_line($line,$prefix,$width);                          $line = $prefix;
115                            $line_len = $prefix_len + 1;
116                    }
117    
118                    $line .= $c;
119          }          }
           
         return $result;  
 }  
120    
121  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)  
122          {          {
123                  $result .= ($line."\n");                  $result .= $line;
                 $l += (mb_strlen($line,'UTF-8')/128 + 1);  
                 if ($l >= $max_line)  
                         break;  
124          }          }
125    
126          return $result;          return $result;
127  }  }
   
 ?>  

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