libraries/kanji-encoding.lib.php

   1 <?php
   2 /* vim: set expandtab sw=4 ts=4 sts=4: */
   3 /**
   4  * Set of functions for kanji-encoding convert (available only with japanese
   5  * language)
   6  *
   7  * PHP4 configure requirements:
   8  *     --enable-mbstring --enable-mbstr-enc-trans --enable-mbregex
   9  *
  10  * 2002/2/22 - by Yukihiro Kawada <kawada@den.fujifilm.co.jp>
  11  *
  12  * @version $Id$
  13  * @package phpMyAdmin
  14  */
  15 if (! defined('PHPMYADMIN')) {
  16     exit;
  17 }
  18
  19 /**
  20  * Gets the php internal encoding codes and sets the available encoding
  21  * codes list
  22  * 2002/1/4 by Y.Kawada
  23  *
  24  * @global  string   the current encoding code
  25  * @global  string   the available encoding codes list
  26  *
  27  * @return  boolean  always true
  28  */
  29 function PMA_internal_enc_check() {
  30     global $internal_enc, $enc_list;
  31
  32     $internal_enc = mb_internal_encoding();
  33     if ($internal_enc == 'EUC-JP') {
  34         $enc_list = 'ASCII,EUC-JP,SJIS,JIS';
  35     } else {
  36         $enc_list = 'ASCII,SJIS,EUC-JP,JIS';
  37     }
  38
  39     return TRUE;
  40 } // end of the 'PMA_internal_enc_check' function
  41
  42
  43 /**
  44  * Reverses SJIS & EUC-JP position in the encoding codes list
  45  * 2002/1/4 by Y.Kawada
  46  *
  47  * @global  string   the available encoding codes list
  48  *
  49  * @return  boolean  always true
  50  */
  51 function PMA_change_enc_order() {
  52     global $enc_list;
  53
  54     $p            = explode(',', $enc_list);
  55     if ($p[1] == 'EUC-JP') {
  56         $enc_list = 'ASCII,SJIS,EUC-JP,JIS';
  57     } else {
  58         $enc_list = 'ASCII,EUC-JP,SJIS,JIS';
  59     }
  60
  61     return TRUE;
  62 } // end of the 'PMA_change_enc_order' function
  63
  64
  65 /**
  66  * Kanji string encoding convert
  67  * 2002/1/4 by Y.Kawada
  68  *
  69  * @param   string   the string to convert
  70  * @param   string   the destinasion encoding code
  71  * @param   string   set 'kana' convert to JIS-X208-kana
  72  *
  73  * @global  string   the available encoding codes list
  74  *
  75  * @return  string   the converted string
  76  */
  77 function PMA_kanji_str_conv($str, $enc, $kana) {
  78     global $enc_list;
  79
  80     if ($enc == '' && $kana == '') {
  81         return $str;
  82     }
  83     $nw       = mb_detect_encoding($str, $enc_list);
  84
  85     if ($kana == 'kana') {
  86         $dist = mb_convert_kana($str, 'KV', $nw);
  87         $str  = $dist;
  88     }
  89     if ($nw != $enc && $enc != '') {
  90         $dist = mb_convert_encoding($str, $enc, $nw);
  91     } else {
  92         $dist = $str;
  93     }
  94     return $dist;
  95 } // end of the 'PMA_kanji_str_conv' function
  96
  97
  98 /**
  99  * Kanji file encoding convert
 100  * 2002/1/4 by Y.Kawada
 101  *
 102  * @param   string   the name of the file to convert
 103  * @param   string   the destinasion encoding code
 104  * @param   string   set 'kana' convert to JIS-X208-kana
 105  *
 106  * @return  string   the name of the converted file
 107  */
 108 function PMA_kanji_file_conv($file, $enc, $kana) {
 109     if ($enc == '' && $kana == '') {
 110         return $file;
 111     }
 112
 113     $tmpfname = tempnam('', $enc);
 114     $fpd      = fopen($tmpfname, 'wb');
 115     $fps      = fopen($file, 'r');
 116     PMA_change_enc_order();
 117     while (!feof($fps)) {
 118         $line = fgets($fps, 4096);
 119         $dist = PMA_kanji_str_conv($line, $enc, $kana);
 120         fputs($fpd, $dist);
 121     } // end while
 122     PMA_change_enc_order();
 123     fclose($fps);
 124     fclose($fpd);
 125     unlink($file);
 126
 127     return $tmpfname;
 128 } // end of the 'PMA_kanji_file_conv' function
 129
 130
 131 /**
 132  * Defines radio form fields to switch between encoding modes
 133  * 2002/1/4 by Y.Kawada
 134  *
 135  * @param   string   spaces character to prepend the output with
 136  *
 137  * @return  string   xhtml code for the radio controls
 138  */
 139 function PMA_set_enc_form($spaces) {
 140     return "\n"
 141            . $spaces . '<input type="radio" name="knjenc" value="" checked="checked" />non' . "\n"
 142            . $spaces . '<input type="radio" name="knjenc" value="EUC-JP" />EUC' . "\n"
 143            . $spaces . '<input type="radio" name="knjenc" value="SJIS" />SJIS' . "\n"
 144            . $spaces . '&nbsp;' . $GLOBALS['strEncto'] . '<br />' . "\n"
 145            . $spaces . '<input type="checkbox" name="xkana" value="kana" />' . "\n"
 146            . $spaces . '&nbsp;' . $GLOBALS['strXkana'] . '<br />' . "\n";
 147 } // end of the 'PMA_set_enc_form' function
 148
 149
 150 PMA_internal_enc_check();
 151
 152 ?>