'English',
'zh-tw' => 'Chinese (BIG5)',
'zh-cn' => 'Chinese (GB)',
'unicode' => 'Unicode (UTF-8)' );
$lang_define = array( 'en' => 'language/englishinc.php',
'zh-tw' => 'language/chineseinc.php',
'zh-cn' => 'language/chinese_gbinc.php',
'unicode' => 'language/englishinc.php' );
$lang_coding = array( 'en' => 'us-ascii',
'zh-tw' => 'BIG5',
'zh-cn' => 'GB2312',
'unicode' => 'UTF-8' );
$charset_lang = array( 'big5' => 'zh-tw',
'gb' => 'zh-cn',
'gb2312' => 'zh-cn',
'utf-8' => 'unicode',
'iso-8859-1' => 'en',
'us-ascii' => 'en',
'ascii' => 'en' );
$charset_alias = array( 'big5' => 'big5',
'gb' => 'gb2312',
'gb2312' => 'gb2312',
'utf-8' => 'utf-8',
'iso-8859-1' => 'us-ascii',
'us-ascii' => 'us-ascii',
'ascii' => 'us-ascii' );
if( isset($_SESSION['session_charset']) )
$curr_charset = $_SESSION['session_charset'];
elseif( isset($_COOKIE['cookie_charset']) ) {
$curr_charset = $_COOKIE['cookie_charset'];
$_SESSION['session_charset'] = $_COOKIE['cookie_charset'];
}
else
$curr_charset = '';
if( $curr_charset == '' || $charset_lang[$curr_charset] == '' ) {
$curr_charset = $default_charset;
$_SESSION['session_charset'] = $default_charset;
}
setcookie( 'cookie_charset', $curr_charset, time()+86400*30 );
$curr_language = $charset_lang[$curr_charset];
/* Include the localized language definition resource */
include($lang_define[$curr_language]);
function b2g( $instr ) {
$fp = fopen( 'language/big5-gb.tab', 'r' );
$len = strlen($instr);
for( $i = 0 ; $i < $len ; $i++ ) {
$h = ord($instr[$i]);
if( $h >= 160 ) {
$l = ord($instr[$i+1]);
if( $h == 161 && $l == 64 )
$gb = ' ';
else {
fseek( $fp, ($h-160)*510+($l-1)*2 );
$gb = fread( $fp, 2 );
}
$instr[$i] = $gb[0];
$instr[$i+1] = $gb[1];
$i++;
}
}
fclose($fp);
return $instr;
}
function g2b( $instr ) {
$fp = fopen( 'language/gb-big5.tab', 'r' );
$len = strlen($instr);
for( $i = 0 ; $i < $len ; $i++ ) {
$h = ord($instr[$i]);
if( $h > 160 && $h < 248 ) {
$l = ord($instr[$i+1]);
if( $l > 160 && $l < 255 ) {
fseek( $fp, (($h-161)*94+$l-161)*2 );
$bg = fread( $fp, 2 );
}
else
$bg = ' ';
$instr[$i] = $bg[0];
$instr[$i+1] = $bg[1];
$i++;
}
}
fclose($fp);
return $instr;
}
function b2u( $instr ) {
$fp = fopen( 'language/big5-unicode.tab', 'r' );
$len = strlen($instr);
$outstr = '';
for( $i = $x = 0 ; $i < $len ; $i++ ) {
$h = ord($instr[$i]);
if( $h >= 160 ) {
$l = ord($instr[$i+1]);
if( $h == 161 && $l == 64 )
$uni = ' ';
else {
fseek( $fp, ($h-160)*510+($l-1)*2 );
$uni = fread( $fp, 2 );
}
$codenum = ord($uni[0])*256 + ord($uni[1]);
if( $codenum < 0x800 ) {
$outstr[$x++] = chr( 192 + $codenum / 64 );
$outstr[$x++] = chr( 128 + $codenum % 64 );
# printf("[%02X%02X]
\n", ord($outstr[$x-2]), ord($uni[$x-1]) );
}
else {
$outstr[$x++] = chr( 224 + $codenum / 4096 );
$codenum %= 4096;
$outstr[$x++] = chr( 128 + $codenum / 64 );
$outstr[$x++] = chr( 128 + ($codenum % 64) );
# printf("[%02X%02X%02X]
\n", ord($outstr[$x-3]), ord($outstr[$x-2]), ord($outstr[$x-1]) );
}
$i++;
}
else
$outstr[$x++] = $instr[$i];
}
fclose($fp);
if( $instr != '' )
return join( '', $outstr);
}
function u2b( $instr ) {
$fp = fopen( 'language/unicode-big5.tab', 'r' );
$len = strlen($instr);
$outstr = '';
for( $i = $x = 0 ; $i < $len ; $i++ ) {
$b1 = ord($instr[$i]);
if( $b1 < 0x80 ) {
$outstr[$x++] = chr($b1);
# printf( "[%02X]", $b1);
}
elseif( $b1 >= 224 ) { # 3 bytes UTF-8
$b1 -= 224;
$b2 = ord($instr[$i+1]) - 128;
$b3 = ord($instr[$i+2]) - 128;
$i += 2;
$uc = $b1 * 4096 + $b2 * 64 + $b3 ;
fseek( $fp, $uc * 2 );
$bg = fread( $fp, 2 );
$outstr[$x++] = $bg[0];
$outstr[$x++] = $bg[1];
# printf( "[%02X%02X]", ord($bg[0]), ord($bg[1]));
}
elseif( $b1 >= 192 ) { # 2 bytes UTF-8
printf( "[%02X%02X]", $b1, ord($instr[$i+1]) );
$b1 -= 192;
$b2 = ord($instr[$i]) - 128;
$i++;
$uc = $b1 * 64 + $b2 ;
fseek( $fp, $uc * 2 );
$bg = fread( $fp, 2 );
$outstr[$x++] = $bg[0];
$outstr[$x++] = $bg[1];
# printf( "[%02X%02X]", ord($bg[0]), ord($bg[1]));
}
}
fclose($fp);
if( $instr != '' ) {
# echo '##' . $instr . " becomes " . join( '', $outstr) . "
\n";
return join( '', $outstr);
}
}
function g2u( $instr ) {
$fp = fopen( 'language/gb-unicode.tab', 'r' );
$len = strlen($instr);
$outstr = '';
for( $i = $x = 0 ; $i < $len ; $i++ ) {
$h = ord($instr[$i]);
if( $h > 160 ) {
$l = ord($instr[$i+1]);
fseek( $fp, ($h-161)*188+($l-161)*2 );
$uni = fread( $fp, 2 );
$codenum = ord($uni[0])*256 + ord($uni[1]);
if( $codenum < 0x800 ) {
$outstr[$x++] = chr( 192 + $codenum / 64 );
$outstr[$x++] = chr( 128 + $codenum % 64 );
# printf("[%02X%02X]
\n", ord($outstr[$x-2]), ord($uni[$x-1]) );
}
else {
$outstr[$x++] = chr( 224 + $codenum / 4096 );
$codenum %= 4096;
$outstr[$x++] = chr( 128 + $codenum / 64 );
$outstr[$x++] = chr( 128 + ($codenum % 64) );
# printf("[%02X%02X%02X]
\n", ord($outstr[$x-3]), ord($outstr[$x-2]), ord($outstr[$x-1]) );
}
$i++;
}
else
$outstr[$x++] = $instr[$i];
}
fclose($fp);
if( $instr != '' )
return join( '', $outstr);
}
function u2g( $instr ) {
$fp = fopen( 'language/unicode-gb.tab', 'r' );
$len = strlen($instr);
$outstr = '';
for( $i = $x = 0 ; $i < $len ; $i++ ) {
$b1 = ord($instr[$i]);
if( $b1 < 0x80 ) {
$outstr[$x++] = chr($b1);
# printf( "[%02X]", $b1);
}
elseif( $b1 >= 224 ) { # 3 bytes UTF-8
$b1 -= 224;
$b2 = ord($instr[$i+1]) - 128;
$b3 = ord($instr[$i+2]) - 128;
$i += 2;
$uc = $b1 * 4096 + $b2 * 64 + $b3 ;
fseek( $fp, $uc * 2 );
$gb = fread( $fp, 2 );
$outstr[$x++] = $gb[0];
$outstr[$x++] = $gb[1];
# printf( "[%02X%02X]", ord($gb[0]), ord($gb[1]));
}
elseif( $b1 >= 192 ) { # 2 bytes UTF-8
printf( "[%02X%02X]", $b1, ord($instr[$i+1]) );
$b1 -= 192;
$b2 = ord($instr[$i]) - 128;
$i++;
$uc = $b1 * 64 + $b2 ;
fseek( $fp, $uc * 2 );
$gb = fread( $fp, 2 );
$outstr[$x++] = $gb[0];
$outstr[$x++] = $gb[1];
# printf( "[%02X%02X]", ord($gb[0]), ord($gb[1]));
}
}
fclose($fp);
if( $instr != '' ) {
# echo '##' . $instr . " becomes " . join( '', $outstr) . "
\n";
return join( '', $outstr);
}
}
function get_conversion( $original, $preferred ) {
global $charset_alias;
$original = $charset_alias[strtolower($original)];
$preferred = $charset_alias[strtolower($preferred)];
if ( ( $preferred == 'big5' ) && ( $original == 'gb2312' ) ) {
$convert['to'] = 'g2b';
$convert['back'] = 'b2g';
$convert['source'] = 'GB2312';
$convert['result'] = 'BIG5';
}
elseif ( ( $preferred == 'gb2312' ) && ( $original == 'big5' ) ) {
$convert['to'] = 'b2g';
$convert['back'] = 'g2b';
$convert['source'] = 'BIG5';
$convert['result'] = 'GB2312';
}
elseif ( ( $preferred == 'utf-8' ) && ( $original == 'big5' ) ) {
$convert['to'] = 'b2u';
$convert['back'] = 'u2b';
$convert['source'] = 'BIG5';
$convert['result'] = 'UTF-8';
}
elseif ( ( $preferred == 'big5' ) && ( $original == 'utf-8' ) ) {
$convert['to'] = 'u2b';
$convert['back'] = 'b2u';
$convert['source'] = 'UTF-8';
$convert['result'] = 'BIG5';
}
elseif ( ( $preferred == 'utf-8' ) && ( $original == 'gb2312' ) ) {
$convert['to'] = 'g2u';
$convert['back'] = 'u2g';
$convert['source'] = 'GB2312';
$convert['result'] = 'UTF-8';
}
elseif ( ( $preferred == 'gb2312' ) && ( $original == 'utf-8' ) ) {
$convert['to'] = 'u2g';
$convert['back'] = 'g2u';
$convert['source'] = 'UTF-8';
$convert['result'] = 'GB2312';
}
else {
$convert['to'] = null;
$convert['back'] = null;
}
return($convert);
}
?>