/include/utf8/ord.php
PHP | 78 lines | 51 code | 14 blank | 13 comment | 19 complexity | 7c069cacd55436bef46a0868e07d6ac8 MD5 | raw file
Possible License(s): GPL-2.0
- <?php
- /**
- * @version $Id: ord.php,v 1.4 2006/09/11 15:22:54 harryf Exp $
- * @package utf8
- * @subpackage strings
- */
- /**
- * UTF-8 aware alternative to ord
- * Returns the unicode ordinal for a character
- * @param string UTF-8 encoded character
- * @return int unicode ordinal for the character
- * @see http://www.php.net/ord
- * @see http://www.php.net/manual/en/function.ord.php#46267
- */
- function utf8_ord($chr)
- {
- $ord0 = ord($chr);
- if ($ord0 >= 0 && $ord0 <= 127)
- return $ord0;
- if (!isset($chr{1}))
- {
- trigger_error('Short sequence - at least 2 bytes expected, only 1 seen');
- return false;
- }
- $ord1 = ord($chr{1});
- if ($ord0 >= 192 && $ord0 <= 223)
- return ($ord0 - 192) * 64 + ($ord1 - 128);
- if (!isset($chr{2}))
- {
- trigger_error('Short sequence - at least 3 bytes expected, only 2 seen');
- return false;
- }
- $ord2 = ord($chr{2});
- if ($ord0 >= 224 && $ord0 <= 239)
- return ($ord0-224)*4096 + ($ord1-128)*64 + ($ord2-128);
- if (!isset($chr{3}))
- {
- trigger_error('Short sequence - at least 4 bytes expected, only 3 seen');
- return false;
- }
- $ord3 = ord($chr{3});
- if ($ord0>=240 && $ord0<=247)
- return ($ord0-240)*262144 + ($ord1-128)*4096 + ($ord2-128)*64 + ($ord3-128);
- if (!isset($chr{4}))
- {
- trigger_error('Short sequence - at least 5 bytes expected, only 4 seen');
- return false;
- }
- $ord4 = ord($chr{4});
- if ($ord0>=248 && $ord0<=251)
- return ($ord0-248)*16777216 + ($ord1-128)*262144 + ($ord2-128)*4096 + ($ord3-128)*64 + ($ord4-128);
- if (!isset($chr{5}))
- {
- trigger_error('Short sequence - at least 6 bytes expected, only 5 seen');
- return false;
- }
- if ($ord0>=252 && $ord0<=253)
- return ($ord0-252) * 1073741824 + ($ord1-128)*16777216 + ($ord2-128)*262144 + ($ord3-128)*4096 + ($ord4-128)*64 + (ord($c{5})-128);
- if ($ord0 >= 254 && $ord0 <= 255)
- {
- trigger_error('Invalid UTF-8 with surrogate ordinal '.$ord0);
- return false;
- }
- }