diff --git a/htdocs/sql/libraries/kanji-encoding.lib.php b/htdocs/sql/libraries/kanji-encoding.lib.php new file mode 100755 --- /dev/null +++ b/htdocs/sql/libraries/kanji-encoding.lib.php @@ -0,0 +1,151 @@ + + * + * @version $Id: kanji-encoding.lib.php 11335 2008-06-21 14:01:54Z lem9 $ + */ +if (! defined('PHPMYADMIN')) { + exit; +} + +/** + * Gets the php internal encoding codes and sets the available encoding + * codes list + * 2002/1/4 by Y.Kawada + * + * @global string the current encoding code + * @global string the available encoding codes list + * + * @return boolean always true + */ +function PMA_internal_enc_check() { + global $internal_enc, $enc_list; + + $internal_enc = mb_internal_encoding(); + if ($internal_enc == 'EUC-JP') { + $enc_list = 'ASCII,EUC-JP,SJIS,JIS'; + } else { + $enc_list = 'ASCII,SJIS,EUC-JP,JIS'; + } + + return TRUE; +} // end of the 'PMA_internal_enc_check' function + + +/** + * Reverses SJIS & EUC-JP position in the encoding codes list + * 2002/1/4 by Y.Kawada + * + * @global string the available encoding codes list + * + * @return boolean always true + */ +function PMA_change_enc_order() { + global $enc_list; + + $p = explode(',', $enc_list); + if ($p[1] == 'EUC-JP') { + $enc_list = 'ASCII,SJIS,EUC-JP,JIS'; + } else { + $enc_list = 'ASCII,EUC-JP,SJIS,JIS'; + } + + return TRUE; +} // end of the 'PMA_change_enc_order' function + + +/** + * Kanji string encoding convert + * 2002/1/4 by Y.Kawada + * + * @param string the string to convert + * @param string the destinasion encoding code + * @param string set 'kana' convert to JIS-X208-kana + * + * @global string the available encoding codes list + * + * @return string the converted string + */ +function PMA_kanji_str_conv($str, $enc, $kana) { + global $enc_list; + + if ($enc == '' && $kana == '') { + return $str; + } + $nw = mb_detect_encoding($str, $enc_list); + + if ($kana == 'kana') { + $dist = mb_convert_kana($str, 'KV', $nw); + $str = $dist; + } + if ($nw != $enc && $enc != '') { + $dist = mb_convert_encoding($str, $enc, $nw); + } else { + $dist = $str; + } + return $dist; +} // end of the 'PMA_kanji_str_conv' function + + +/** + * Kanji file encoding convert + * 2002/1/4 by Y.Kawada + * + * @param string the name of the file to convert + * @param string the destinasion encoding code + * @param string set 'kana' convert to JIS-X208-kana + * + * @return string the name of the converted file + */ +function PMA_kanji_file_conv($file, $enc, $kana) { + if ($enc == '' && $kana == '') { + return $file; + } + + $tmpfname = tempnam('', $enc); + $fpd = fopen($tmpfname, 'wb'); + $fps = fopen($file, 'r'); + PMA_change_enc_order(); + while (!feof($fps)) { + $line = fgets($fps, 4096); + $dist = PMA_kanji_str_conv($line, $enc, $kana); + fputs($fpd, $dist); + } // end while + PMA_change_enc_order(); + fclose($fps); + fclose($fpd); + unlink($file); + + return $tmpfname; +} // end of the 'PMA_kanji_file_conv' function + + +/** + * Defines radio form fields to switch between encoding modes + * 2002/1/4 by Y.Kawada + * + * @param string spaces character to prepend the output with + * + * @return string xhtml code for the radio controls + */ +function PMA_set_enc_form($spaces) { + return "\n" + . $spaces . 'non' . "\n" + . $spaces . 'EUC' . "\n" + . $spaces . 'SJIS' . "\n" + . $spaces . ' ' . $GLOBALS['strEncto'] . '
' . "\n" + . $spaces . '' . "\n" + . $spaces . ' ' . $GLOBALS['strXkana'] . '
' . "\n"; +} // end of the 'PMA_set_enc_form' function + + +PMA_internal_enc_check(); + +?>