ILIAS  eassessment Revision 61809
 All Data Structures Namespaces Files Functions Variables Groups Pages
UtfNormalUtil.php
Go to the documentation of this file.
1 <?php
2 # Copyright (C) 2004 Brion Vibber <brion@pobox.com>
3 # http://www.mediawiki.org/
4 #
5 # This program is free software; you can redistribute it and/or modify
6 # it under the terms of the GNU General Public License as published by
7 # the Free Software Foundation; either version 2 of the License, or
8 # (at your option) any later version.
9 #
10 # This program is distributed in the hope that it will be useful,
11 # but WITHOUT ANY WARRANTY; without even the implied warranty of
12 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 # GNU General Public License for more details.
14 #
15 # You should have received a copy of the GNU General Public License along
16 # with this program; if not, write to the Free Software Foundation, Inc.,
17 # 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
18 # http://www.gnu.org/copyleft/gpl.html
19 
38 function codepointToUtf8( $codepoint ) {
39  if($codepoint < 0x80) return chr($codepoint);
40  if($codepoint < 0x800) return chr($codepoint >> 6 & 0x3f | 0xc0) .
41  chr($codepoint & 0x3f | 0x80);
42  if($codepoint < 0x10000) return chr($codepoint >> 12 & 0x0f | 0xe0) .
43  chr($codepoint >> 6 & 0x3f | 0x80) .
44  chr($codepoint & 0x3f | 0x80);
45  if($codepoint < 0x110000) return chr($codepoint >> 18 & 0x07 | 0xf0) .
46  chr($codepoint >> 12 & 0x3f | 0x80) .
47  chr($codepoint >> 6 & 0x3f | 0x80) .
48  chr($codepoint & 0x3f | 0x80);
49 
50  die("Asked for code outside of range ($codepoint)\n");
51 }
52 
62 function hexSequenceToUtf8( $sequence ) {
63  $utf = '';
64  foreach( explode( ' ', $sequence ) as $hex ) {
65  $n = hexdec( $hex );
66  $utf .= codepointToUtf8( $n );
67  }
68  return $utf;
69 }
70 
79 function utf8ToHexSequence( $str ) {
80  return rtrim( preg_replace( '/(.)/uSe',
81  'sprintf("%04x ", utf8ToCodepoint("$1"))',
82  $str ) );
83 }
84 
93 function utf8ToCodepoint( $char ) {
94  # Find the length
95  $z = ord( $char{0} );
96  if ( $z & 0x80 ) {
97  $length = 0;
98  while ( $z & 0x80 ) {
99  $length++;
100  $z <<= 1;
101  }
102  } else {
103  $length = 1;
104  }
105 
106  if ( $length != strlen( $char ) ) {
107  return false;
108  }
109  if ( $length == 1 ) {
110  return ord( $char );
111  }
112 
113  # Mask off the length-determining bits and shift back to the original location
114  $z &= 0xff;
115  $z >>= $length;
116 
117  # Add in the free bits from subsequent bytes
118  for ( $i=1; $i<$length; $i++ ) {
119  $z <<= 6;
120  $z |= ord( $char{$i} ) & 0x3f;
121  }
122 
123  return $z;
124 }
125 
133 function escapeSingleString( $string ) {
134  return strtr( $string,
135  array(
136  '\\' => '\\\\',
137  '\'' => '\\\''
138  ));
139 }
140 
141 ?>