summaryrefslogtreecommitdiff
path: root/compat.php
blob: b2f6bd344657e60b8d3be4d94d4f0779f54faed3 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
<?php

if (!function_exists('mb_strlen')) 
{
  // from Typo3
  // author Martin Kutschker <[email protected]>
  function mb_strlen($str, $encoding="utf-8") 
    {
      if($encoding != "utf-8")
	{ return -1; }

      $n=0;

      for($i=0; isset($str{$i}); $i++) 
	{	  
	  $c = ord($str{$i});

	  if (!($c & 0x80)) // single-byte (0xxxxxx)
	    $n++;

	  elseif (($c & 0xC0) == 0xC0) // multi-byte starting byte (11xxxxxx)
	    $n++;
	}

      return $n;
    }
}

if (!function_exists('mb_substr'))
{
  // from Typo3
  // author Martin Kutschker <[email protected]>
  function mb_substr($str, $start, $len=null, $encoding="utf-8")
    {
      if($encoding != "utf-8")
	{ return -1; }

      $byte_start = utf8_char2byte_pos($str,$start);

      if ($byte_start === false) 
	return false; // $start outside string length 

      $str = substr($str,$byte_start); 

      if ($len != null) 
	{
	  $byte_end = utf8_char2byte_pos($str,$len);

	  if ($byte_end === false) // $len outside actual string length
	    return $str;
	  else	  
	    return substr($str,0,$byte_end);
	}

      else return $str;
    }

  function utf8_char2byte_pos($str,$pos) 
    {
      $n = 0;  // number of characters found     
      $p = abs($pos); // number of characters wanted 

      if ($pos >= 0) 
	{
	  $i = 0;
	  $d = 1;
	} else {       
	  $i = strlen($str)-1;
	  $d = -1;
	} 

      for( ; isset($str{$i}) && $n<$p; $i+=$d) 
	{
	  $c = (int)ord($str{$i});
	  
	  if (!($c & 0x80)) // single-byte (0xxxxxx)	    
	    $n++;
	  elseif (($c & 0xC0) == 0xC0) // multi-byte starting byte (11xxxxxx)
	    $n++;
	}

      if (!isset($str{$i})) 
	return false; // offset beyond string length 

      if ($pos >= 0) 
	{
	  // skip trailing multi-byte data bytes
	  while ((ord($str{$i}) & 0x80) && !(ord($str{$i}) & 0x40)) 
	    { $i++; }
	} else {	  
	  // correct offset
	  $i++;
	} 
          
      return $i;      
	 }

	if (!function_exists('mb_strtolower')) {
	  function mb_strtolower($msg, $encoding) {
		  return $msg;
		}
	}
}