Added experimental windows-1255 and windows-1256 decoding support.
[squirrelmail.git] / functions / i18n.php
index 6ed513b7e5c8d054889c484192bc773f1b8870bf..061ad1ef9890b55f1337862e68cbbd1421c7dd2e 100644 (file)
@@ -15,6 +15,8 @@
  * $Id$
  */
 
+require_once(SM_PATH . 'functions/global.php');
+
 /* Decodes a string to the internal encoding from the given charset */
 function charset_decode ($charset, $string) {
     global $languages, $squirrelmail_language;
@@ -25,6 +27,7 @@ function charset_decode ($charset, $string) {
     }
 
     /* All HTML special characters are 7 bit and can be replaced first */
+    
     $string = htmlspecialchars ($string);
 
     $charset = strtolower($charset);
@@ -55,12 +58,18 @@ function charset_decode ($charset, $string) {
         $ret = charset_decode_ns_4551_1 ($string);
     } else if ($charset == 'koi8-r') {
         $ret = charset_decode_koi8r ($string);
+    } else if ($charset == 'koi8-u') {
+        $ret = charset_decode_koi8u ($string);
     } else if ($charset == 'windows-1251') {
         $ret = charset_decode_windows_1251 ($string);
     } else if ($charset == 'windows-1253') {
        $ret = charset_decode_windows_1253 ($string);
     } else if ($charset == 'windows-1254') {
        $ret = charset_decode_windows_1254 ($string);
+    } else if ($charset == 'windows-1255') {
+            $ret = charset_decode_windows_1255 ($string);
+    } else if ($charset == 'windows-1256') {
+            $ret = charset_decode_windows_1256 ($string);
     } else if ($charset == 'windows-1257') {
         $ret = charset_decode_windows_1257 ($string);
     } else if ($charset == 'utf-8') {
@@ -490,6 +499,40 @@ function charset_decode_iso_8859_4 ($string) {
     return (charset_decode_iso_8859_1($string));
 }
 
+/* ISO-8859-5 is Cyrillic */
+function charset_decode_iso_8859_5 ($string) {
+    global $default_charset;
+
+    if (strtolower($default_charset) == 'iso-8859-5') {
+        return $string;
+    }
+
+    /* Only do the slow convert if there are 8-bit characters */
+    if (! ereg("[\200-\377]", $string))
+        return $string;
+
+    // NO-BREAK SPACE
+    $string = str_replace("\240", ' ', $string);
+    // 161-172 -> 1025-1036 (+864)
+    $string = preg_replace("/([\241-\254])/e","'&#' . (ord('\\1')+864) . ';'",$string);
+    // SOFT HYPHEN
+    $string = str_replace("\255", '­', $string);
+    // 174-239 -> 1038-1103 (+864)
+    $string = preg_replace("/([\256-\357])/e","'&#' . (ord('\\1')+864) . ';'",$string);
+    // NUMERO SIGN
+    $string = str_replace("\360", '№', $string);
+    // 241-252 -> 1105-1116 (+864)
+    $string = preg_replace("/([\361-\374])/e","'&#' . (ord('\\1')+864) . ';'",$string);
+    // SECTION SIGN
+    $string = str_replace("\375", '§', $string);
+    // CYRILLIC SMALL LETTER SHORT U (Byelorussian)
+    $string = str_replace("\376", 'ў', $string);
+    // CYRILLIC SMALL LETTER DZHE
+    $string = str_replace("\377", 'џ', $string);
+
+    return $string;
+}
+
 /* iso-8859-7 is Greek. */
 function charset_decode_iso_8859_7 ($string) {
     global $default_charset;
@@ -553,6 +596,7 @@ function charset_decode_iso_8859_7 ($string) {
 
 /*
  ISOIEC 8859-9:1999 Latin Alphabet No. 5
+
 */
 function charset_decode_iso_8859_9 ($string) {
     global $default_charset;
@@ -681,12 +725,6 @@ function charset_decode_iso_8859_15 ($string) {
     return (charset_decode_iso_8859_1($string));
 }
 
-/* ISO-8859-5 is Cyrillic */
-function charset_decode_iso_8859_5 ($string) {
-    // Convert to KOI8-R, then return this decoded.
-    $string = convert_cyr_string($string, 'i', 'k');
-    return charset_decode_koi8r($string);
-}
 
 /* Remove all 8 bit characters from all other ISO-8859 character sets */
 function charset_decode_iso_8859_default ($string) {
@@ -871,6 +909,474 @@ function charset_decode_koi8r ($string) {
     return $string;
 }
 
+/*
+ * KOI8-U is used to encode Ukrainian mail (Cyrrilic). Defined in RFC
+ * 2319.
+ */
+function charset_decode_koi8u ($string) {
+    global $default_charset;
+
+    if (strtolower($default_charset) == 'koi8-u') {
+        return $string;
+    }
+
+    /* Only do the slow convert if there are 8-bit characters */
+    if (! ereg("[\200-\377]", $string))
+        return $string;
+
+    // BOX DRAWINGS LIGHT HORIZONTAL
+    $string = str_replace("\200", '─', $string);
+    // BOX DRAWINGS LIGHT VERTICAL
+    $string = str_replace("\201", '│', $string);
+    // BOX DRAWINGS LIGHT DOWN AND RIGHT
+    $string = str_replace("\202", '┌', $string);
+    // BOX DRAWINGS LIGHT DOWN AND LEFT
+    $string = str_replace("\203", '┐', $string);
+    // BOX DRAWINGS LIGHT UP AND RIGHT
+    $string = str_replace("\204", '└', $string);
+    // BOX DRAWINGS LIGHT UP AND LEFT
+    $string = str_replace("\205", '┘', $string);
+    // BOX DRAWINGS LIGHT VERTICAL AND RIGHT
+    $string = str_replace("\206", '├', $string);
+    // BOX DRAWINGS LIGHT VERTICAL AND LEFT
+    $string = str_replace("\207", '┤', $string);
+    // BOX DRAWINGS LIGHT DOWN AND HORIZONTAL
+    $string = str_replace("\210", '┬', $string);
+    // BOX DRAWINGS LIGHT UP AND HORIZONTAL
+    $string = str_replace("\211", '┴', $string);
+    // BOX DRAWINGS LIGHT VERTICAL AND HORIZONTAL
+    $string = str_replace("\212", '┼', $string);
+    // UPPER HALF BLOCK
+    $string = str_replace("\213", '▀', $string);
+    // LOWER HALF BLOCK
+    $string = str_replace("\214", '▄', $string);
+    // FULL BLOCK
+    $string = str_replace("\215", '█', $string);
+    // LEFT HALF BLOCK
+    $string = str_replace("\216", '▌', $string);
+    // RIGHT HALF BLOCK
+    $string = str_replace("\217", '▐', $string);
+    // LIGHT SHADE
+    $string = str_replace("\220", '░', $string);
+    // MEDIUM SHADE
+    $string = str_replace("\221", '▒', $string);
+    // DARK SHADE
+    $string = str_replace("\222", '▓', $string);
+    // TOP HALF INTEGRAL
+    $string = str_replace("\223", '⌠', $string);
+    // BLACK SQUARE
+    $string = str_replace("\224", '■', $string);
+    // BULLET OPERATOR
+    $string = str_replace("\225", '∙', $string);
+    // SQUARE ROOT
+    $string = str_replace("\226", '√', $string);
+    // ALMOST EQUAL TO
+    $string = str_replace("\227", '≈', $string);
+    // LESS THAN OR EQUAL TO
+    $string = str_replace("\230", '≤', $string);
+    // GREATER THAN OR EQUAL TO
+    $string = str_replace("\231", '≥', $string);
+    // NO-BREAK SPACE
+    $string = str_replace("\232", ' ', $string);
+    // BOTTOM HALF INTEGRAL
+    $string = str_replace("\233", '⌡', $string);
+    // DEGREE SIGN
+    $string = str_replace("\234", '°', $string);
+    // SUPERSCRIPT DIGIT TWO
+    $string = str_replace("\235", '²', $string);
+    // MIDDLE DOT
+    $string = str_replace("\236", '·', $string);
+    // DIVISION SIGN
+    $string = str_replace("\237", '÷', $string);
+    // BOX DRAWINGS DOUBLE HORIZONTAL
+    $string = str_replace("\240", '═', $string);
+    // BOX DRAWINGS DOUBLE VERTICAL
+    $string = str_replace("\241", '║', $string);
+    // BOX DRAWINGS DOWN SINGLE AND RIGHT DOUBLE
+    $string = str_replace("\242", '╒', $string);
+    // CYRILLIC SMALL LETTER IO
+    $string = str_replace("\243", 'ё', $string);
+    // CYRILLIC SMALL LETTER UKRAINIAN IE
+    $string = str_replace("\244", 'є', $string);
+    // BOX DRAWINGS DOUBLE DOWN AND RIGHT
+    $string = str_replace("\245", '╔', $string);
+    // CYRILLIC SMALL LETTER BYELORUSSIAN-UKRAINIAN I
+    $string = str_replace("\246", 'і', $string);
+    // CYRILLIC SMALL LETTER YI (Ukrainian)
+    $string = str_replace("\247", 'ї', $string);
+    // BOX DRAWINGS DOUBLE DOWN AND LEFT
+    $string = str_replace("\250", '╗', $string);
+    // BOX DRAWINGS UP SINGLE AND RIGHT DOUBLE
+    $string = str_replace("\251", '╘', $string);
+    // BOX DRAWINGS UP DOUBLE AND RIGHT SINGLE
+    $string = str_replace("\252", '╙', $string);
+    // BOX DRAWINGS DOUBLE UP AND RIGHT
+    $string = str_replace("\253", '╚', $string);
+    // BOX DRAWINGS UP SINGLE AND LEFT DOUBLE
+    $string = str_replace("\254", '╛', $string);
+    // CYRILLIC SMALL LETTER GHE WITH UPTURN
+    $string = str_replace("\255", 'ґ', $string);
+    // BOX DRAWINGS DOUBLE UP AND LEFT
+    $string = str_replace("\256", '╝', $string);
+    // BOX DRAWINGS VERTICAL SINGLE AND RIGHT DOUBLE
+    $string = str_replace("\257", '╞', $string);
+    // BOX DRAWINGS VERTICAL DOUBLE AND RIGHT SINGLE
+    $string = str_replace("\260", '╟', $string);
+    // BOX DRAWINGS DOUBLE VERTICAL AND RIGHT
+    $string = str_replace("\261", '╠', $string);
+    // BOX DRAWINGS VERTICAL SINGLE AND LEFT DOUBLE
+    $string = str_replace("\262", '╡', $string);
+    // CYRILLIC CAPITAL LETTER IO
+    $string = str_replace("\263", 'Ё', $string);
+    // CYRILLIC CAPITAL LETTER UKRAINIAN IE
+    $string = str_replace("\264", 'Є', $string);
+    // DOUBLE VERTICAL AND LEFT
+    $string = str_replace("\265", '╣', $string);
+    // CYRILLIC CAPITAL LETTER BYELORUSSIAN-UKRAINIAN I
+    $string = str_replace("\266", 'І', $string);
+    // CYRILLIC CAPITAL LETTER YI (Ukrainian)
+    $string = str_replace("\267", 'Ї', $string);
+    // BOX DRAWINGS DOUBLE DOWN AND HORIZONTAL
+    $string = str_replace("\270", '╦', $string);
+    // BOX DRAWINGS UP SINGLE AND HORIZONTAL DOUBLE
+    $string = str_replace("\271", '╧', $string);
+    // BOX DRAWINGS UP DOUBLE AND HORIZONTAL SINGLE
+    $string = str_replace("\272", '╨', $string);
+    // BOX DRAWINGS DOUBLE UP AND HORIZONTAL
+    $string = str_replace("\273", '╩', $string);
+    // BOX DRAWINGS VERTICAL SINGLE AND HORIZONTAL DOUBLE
+    $string = str_replace("\274", '╪', $string);
+    // CYRILLIC CAPITAL LETTER GHE WITH UPTURN
+    $string = str_replace("\275", 'Ґ', $string);
+    // BOX DRAWINGS DOUBLE VERTICAL AND HORIZONTAL
+    $string = str_replace("\276", '╬', $string);
+    // COPYRIGHT SIGN
+    $string = str_replace("\277", '©', $string);
+    // CYRILLIC SMALL LETTER YU
+    $string = str_replace("\300", 'ю', $string);
+    // CYRILLIC SMALL LETTER A
+    $string = str_replace("\301", 'а', $string);
+    // CYRILLIC SMALL LETTER BE
+    $string = str_replace("\302", 'б', $string);
+    // CYRILLIC SMALL LETTER TSE
+    $string = str_replace("\303", 'ц', $string);
+    // CYRILLIC SMALL LETTER DE
+    $string = str_replace("\304", 'д', $string);
+    // CYRILLIC SMALL LETTER IE
+    $string = str_replace("\305", 'е', $string);
+    // CYRILLIC SMALL LETTER EF
+    $string = str_replace("\306", 'ф', $string);
+    // CYRILLIC SMALL LETTER GHE
+    $string = str_replace("\307", 'г', $string);
+    // CYRILLIC SMALL LETTER HA
+    $string = str_replace("\310", 'х', $string);
+    // CYRILLIC SMALL LETTER I
+    $string = str_replace("\311", 'и', $string);
+    // CYRILLIC SMALL LETTER SHORT I
+    $string = str_replace("\312", 'й', $string);
+    // CYRILLIC SMALL LETTER KA
+    $string = str_replace("\313", 'к', $string);
+    // CYRILLIC SMALL LETTER EL
+    $string = str_replace("\314", 'л', $string);
+    // CYRILLIC SMALL LETTER EM
+    $string = str_replace("\315", 'м', $string);
+    // CYRILLIC SMALL LETTER EN
+    $string = str_replace("\316", 'н', $string);
+    // CYRILLIC SMALL LETTER O
+    $string = str_replace("\317", 'о', $string);
+    // CYRILLIC SMALL LETTER PE
+    $string = str_replace("\320", 'п', $string);
+    // CYRILLIC SMALL LETTER YA
+    $string = str_replace("\321", 'я', $string);
+    // CYRILLIC SMALL LETTER ER
+    $string = str_replace("\322", 'р', $string);
+    // CYRILLIC SMALL LETTER ES
+    $string = str_replace("\323", 'с', $string);
+    // CYRILLIC SMALL LETTER TE
+    $string = str_replace("\324", 'т', $string);
+    // CYRILLIC SMALL LETTER U
+    $string = str_replace("\325", 'у', $string);
+    // CYRILLIC SMALL LETTER ZHE
+    $string = str_replace("\326", 'ж', $string);
+    // CYRILLIC SMALL LETTER VE
+    $string = str_replace("\327", 'в', $string);
+    // CYRILLIC SMALL LETTER SOFT SIGN
+    $string = str_replace("\330", 'ь', $string);
+    // CYRILLIC SMALL LETTER YERU
+    $string = str_replace("\331", 'ы', $string);
+    // CYRILLIC SMALL LETTER ZE
+    $string = str_replace("\332", 'з', $string);
+    // CYRILLIC SMALL LETTER SHA
+    $string = str_replace("\333", 'ш', $string);
+    // CYRILLIC SMALL LETTER E
+    $string = str_replace("\334", 'э', $string);
+    // CYRILLIC SMALL LETTER SHCHA
+    $string = str_replace("\335", 'щ', $string);
+    // CYRILLIC SMALL LETTER CHE
+    $string = str_replace("\336", 'ч', $string);
+    // CYRILLIC SMALL LETTER HARD SIGN
+    $string = str_replace("\337", 'ъ', $string);
+    // CYRILLIC CAPITAL LETTER YU
+    $string = str_replace("\340", 'Ю', $string);
+    // CYRILLIC CAPITAL LETTER A
+    $string = str_replace("\341", 'А', $string);
+    // CYRILLIC CAPITAL LETTER BE
+    $string = str_replace("\342", 'Б', $string);
+    // CYRILLIC CAPITAL LETTER TSE
+    $string = str_replace("\343", 'Ц', $string);
+    // CYRILLIC CAPITAL LETTER DE
+    $string = str_replace("\344", 'Д', $string);
+    // CYRILLIC CAPITAL LETTER IE
+    $string = str_replace("\345", 'Е', $string);
+    // CYRILLIC CAPITAL LETTER EF
+    $string = str_replace("\346", 'Ф', $string);
+    // CYRILLIC CAPITAL LETTER GHE
+    $string = str_replace("\347", 'Г', $string);
+    // CYRILLIC CAPITAL LETTER HA
+    $string = str_replace("\350", 'Х', $string);
+    // CYRILLIC CAPITAL LETTER I
+    $string = str_replace("\351", 'И', $string);
+    // CYRILLIC CAPITAL LETTER SHORT I
+    $string = str_replace("\352", 'Й', $string);
+    // CYRILLIC CAPITAL LETTER KA
+    $string = str_replace("\353", 'К', $string);
+    // CYRILLIC CAPITAL LETTER EL
+    $string = str_replace("\354", 'Л', $string);
+    // CYRILLIC CAPITAL LETTER EM
+    $string = str_replace("\355", 'М', $string);
+    // CYRILLIC CAPITAL LETTER EN
+    $string = str_replace("\356", 'Н', $string);
+    // CYRILLIC CAPITAL LETTER O
+    $string = str_replace("\357", 'О', $string);
+    // CYRILLIC CAPITAL LETTER PE
+    $string = str_replace("\360", 'П', $string);
+    // CYRILLIC CAPITAL LETTER YA
+    $string = str_replace("\361", 'Я', $string);
+    // CYRILLIC CAPITAL LETTER ER
+    $string = str_replace("\362", 'Р', $string);
+    // CYRILLIC CAPITAL LETTER ES
+    $string = str_replace("\363", 'С', $string);
+    // CYRILLIC CAPITAL LETTER TE
+    $string = str_replace("\364", 'Т', $string);
+    // CYRILLIC CAPITAL LETTER U
+    $string = str_replace("\365", 'У', $string);
+    // CYRILLIC CAPITAL LETTER ZHE
+    $string = str_replace("\366", 'Ж', $string);
+    // CYRILLIC CAPITAL LETTER VE
+    $string = str_replace("\367", 'В', $string);
+    // CYRILLIC CAPITAL LETTER SOFT SIGN
+    $string = str_replace("\370", 'Ь', $string);
+    // CYRILLIC CAPITAL LETTER YERU
+    $string = str_replace("\371", 'Ы', $string);
+    // CYRILLIC CAPITAL LETTER ZE
+    $string = str_replace("\372", 'З', $string);
+    // CYRILLIC CAPITAL LETTER SHA
+    $string = str_replace("\373", 'Ш', $string);
+    // CYRILLIC CAPITAL LETTER E
+    $string = str_replace("\374", 'Э', $string);
+    // CYRILLIC CAPITAL LETTER SHCHA
+    $string = str_replace("\375", 'Щ', $string);
+    // CYRILLIC CAPITAL LETTER CHE
+    $string = str_replace("\376", 'Ч', $string);
+    // CYRILLIC CAPITAL LETTER HARD SIGN
+    $string = str_replace("\377", 'Ъ', $string);
+
+    return $string;
+}
+
+/*
+ * windows-1251 is used to encode Bulgarian mail (Cyrrilic). 
+ */
+function charset_decode_windows_1251 ($string) {
+    global $default_charset;
+
+    if (strtolower($default_charset) == 'windows-1251') {
+        return $string;
+    }
+
+    /* Only do the slow convert if there are 8-bit characters */
+    if (! ereg("[\200-\377]", $string))
+        return $string;
+
+    // CYRILLIC CAPITAL LETTER DJE (Serbocroatian)
+    $string = str_replace("\200", 'Ђ', $string);
+    // CYRILLIC CAPITAL LETTER GJE
+    $string = str_replace("\201", 'Ѓ', $string);
+    // SINGLE LOW-9 QUOTATION MARK
+    $string = str_replace("\202", '‚', $string);
+    // CYRILLIC SMALL LETTER GJE
+    $string = str_replace("\203", 'ѓ', $string);
+    // DOUBLE LOW-9 QUOTATION MARK
+    $string = str_replace("\204", '„', $string);
+    // HORIZONTAL ELLIPSIS
+    $string = str_replace("\205", '…', $string);
+    // DAGGER
+    $string = str_replace("\206", '†', $string);
+    // DOUBLE DAGGER
+    $string = str_replace("\207", '‡', $string);
+    // EURO SIGN
+    $string = str_replace("\210", '€', $string);
+    // PER MILLE SIGN
+    $string = str_replace("\211", '‰', $string);
+    // CYRILLIC CAPITAL LETTER LJE
+    $string = str_replace("\212", 'Љ', $string);
+    // SINGLE LEFT-POINTING ANGLE QUOTATION MARK
+    $string = str_replace("\213", '‹', $string);
+    // CYRILLIC CAPITAL LETTER NJE
+    $string = str_replace("\214", 'Њ', $string);
+    // CYRILLIC CAPITAL LETTER KJE
+    $string = str_replace("\215", 'Ќ', $string);
+    // CYRILLIC CAPITAL LETTER TSHE (Serbocroatian)
+    $string = str_replace("\216", 'Ћ', $string);
+    // CYRILLIC CAPITAL LETTER DZHE
+    $string = str_replace("\217", 'Џ', $string);
+    // CYRILLIC SMALL LETTER DJE (Serbocroatian)
+    $string = str_replace("\220", 'ђ', $string);
+    // LEFT SINGLE QUOTATION MARK
+    $string = str_replace("\221", '‘', $string);
+    // RIGHT SINGLE QUOTATION MARK
+    $string = str_replace("\222", '’', $string);
+    // LEFT DOUBLE QUOTATION MARK
+    $string = str_replace("\223", '“', $string);
+    // RIGHT DOUBLE QUOTATION MARK
+    $string = str_replace("\224", '”', $string);
+    // BULLET
+    $string = str_replace("\225", '•', $string);
+    // EN DASH
+    $string = str_replace("\226", '–', $string);
+    // EM DASH
+    $string = str_replace("\227", '—', $string);
+    // TRADE MARK SIGN
+    $string = str_replace("\231", '™', $string);
+    // CYRILLIC SMALL LETTER LJE
+    $string = str_replace("\232", 'љ', $string);
+    // SINGLE RIGHT-POINTING ANGLE QUOTATION MARK
+    $string = str_replace("\233", '›', $string);
+    // CYRILLIC SMALL LETTER NJE
+    $string = str_replace("\234", 'њ', $string);
+    // CYRILLIC SMALL LETTER KJE
+    $string = str_replace("\235", 'ќ', $string);
+    // CYRILLIC SMALL LETTER TSHE (Serbocroatian)
+    $string = str_replace("\236", 'ћ', $string);
+    // CYRILLIC SMALL LETTER DZHE
+    $string = str_replace("\237", 'џ', $string);
+    // NO-BREAK SPACE
+    $string = str_replace("\240", ' ', $string);
+    // CYRILLIC CAPITAL LETTER SHORT U (Byelorussian)
+    $string = str_replace("\241", 'Ў', $string);
+    // CYRILLIC SMALL LETTER SHORT U (Byelorussian)
+    $string = str_replace("\242", 'ў', $string);
+    // CYRILLIC CAPITAL LETTER JE
+    $string = str_replace("\243", 'Ј', $string);
+    // CURRENCY SIGN
+    $string = str_replace("\244", '¤', $string);
+    // CYRILLIC CAPITAL LETTER GHE WITH UPTURN
+    $string = str_replace("\245", 'Ґ', $string);
+    // BROKEN BAR
+    $string = str_replace("\246", '¦', $string);
+    // SECTION SIGN
+    $string = str_replace("\247", '§', $string);
+    // CYRILLIC CAPITAL LETTER IO
+    $string = str_replace("\250", 'Ё', $string);
+    // COPYRIGHT SIGN
+    $string = str_replace("\251", '©', $string);
+    // CYRILLIC CAPITAL LETTER UKRAINIAN IE
+    $string = str_replace("\252", 'Є', $string);
+    // LEFT-POINTING DOUBLE ANGLE QUOTATION MARK
+    $string = str_replace("\253", '«', $string);
+    // NOT SIGN
+    $string = str_replace("\254", '¬', $string);
+    // SOFT HYPHEN
+    $string = str_replace("\255", '­', $string);
+    // REGISTERED SIGN
+    $string = str_replace("\256", '®', $string);
+    // CYRILLIC CAPITAL LETTER YI (Ukrainian)
+    $string = str_replace("\257", 'Ї', $string);
+    // DEGREE SIGN
+    $string = str_replace("\260", '°', $string);
+    // PLUS-MINUS SIGN
+    $string = str_replace("\261", '±', $string);
+    // CYRILLIC CAPITAL LETTER BYELORUSSIAN-UKRAINIAN I
+    $string = str_replace("\262", 'І', $string);
+    // CYRILLIC SMALL LETTER BYELORUSSIAN-UKRAINIAN I
+    $string = str_replace("\263", 'і', $string);
+    // CYRILLIC SMALL LETTER GHE WITH UPTURN
+    $string = str_replace("\264", 'ґ', $string);
+    // MICRO SIGN
+    $string = str_replace("\265", 'µ', $string);
+    // PILCROW SIGN
+    $string = str_replace("\266", '¶', $string);
+    // MIDDLE DOT
+    $string = str_replace("\267", '·', $string);
+    // CYRILLIC SMALL LETTER IO
+    $string = str_replace("\270", 'ё', $string);
+    // NUMERO SIGN
+    $string = str_replace("\271", '№', $string);
+    // CYRILLIC SMALL LETTER UKRAINIAN IE
+    $string = str_replace("\272", 'є', $string);
+    // RIGHT-POINTING DOUBLE ANGLE QUOTATION MARK
+    $string = str_replace("\273", '»', $string);
+    // CYRILLIC SMALL LETTER JE
+    $string = str_replace("\274", 'ј', $string);
+    // CYRILLIC CAPITAL LETTER DZE
+    $string = str_replace("\275", 'Ѕ', $string);
+    // CYRILLIC SMALL LETTER DZE
+    $string = str_replace("\276", 'ѕ', $string);
+    // CYRILLIC SMALL LETTER YI (Ukrainian)
+    $string = str_replace("\277", 'ї', $string);
+
+    // 192-255 > 1040-1103 (+848)
+    $string = preg_replace("/([\300-\377])/e","'&#' . (ord('\\1')+848) . ';'",$string);
+
+    return $string;
+}
+
+/*
+ windows-1253 (Greek)
+ */
+function charset_decode_windows_1253 ($string) {
+    global $default_charset;
+
+    if (strtolower($default_charset) == 'windows-1253')
+        return $string;
+
+    /* Only do the slow convert if there are 8-bit characters */
+    if (! ereg("[\200-\377]", $string))
+        return $string;
+
+    $string = str_replace("\200", '€', $string);
+    $string = str_replace("\202", '‚', $string);
+    $string = str_replace("\203", 'ƒ', $string);
+    $string = str_replace("\204", '„', $string);
+    $string = str_replace("\205", '…', $string);
+    $string = str_replace("\206", '†', $string);
+    $string = str_replace("\207", '‡', $string);
+    $string = str_replace("\211", '‰', $string);
+    $string = str_replace("\213", '‹', $string);
+    $string = str_replace("\221", '‘', $string);
+    $string = str_replace("\222", '’', $string);
+    $string = str_replace("\223", '“', $string);
+    $string = str_replace("\224", '”', $string);
+    $string = str_replace("\225", '•', $string);
+    $string = str_replace("\226", '–', $string);
+    $string = str_replace("\227", '—', $string);
+    $string = str_replace("\231", '™', $string);
+    $string = str_replace("\233", '›', $string);
+    $string = str_replace("\241", '΅', $string);
+    $string = str_replace("\242", 'Ά', $string);
+    $string = str_replace ("\257", '―', $string);
+    $string = str_replace("\264", '΄', $string);
+    $string = str_replace("\270", 'Έ', $string);
+    $string = str_replace ("\271", 'Ή', $string);
+    $string = str_replace ("\272", 'Ί', $string);
+    $string = str_replace ("\274", 'Ό', $string);
+    // cycle for 190-254 symbols
+    $string = preg_replace("/([\274-\376])/e","'&#' . (ord('\\1')+720);",$string);
+
+    // Rest of charset is like iso-8859-1
+    return (charset_decode_iso_8859_1($string));
+}
+
 /*
  windows-1254 (Turks)
  */
@@ -952,12 +1458,12 @@ function charset_decode_windows_1254 ($string) {
 }
 
 /*
- windows-1253 (Greek)
+ windows-1255 (Hebr)
  */
-function charset_decode_windows_1253 ($string) {
+function charset_decode_windows_1255 ($string) {
     global $default_charset;
 
-    if (strtolower($default_charset) == 'windows-1253')
+    if (strtolower($default_charset) == 'windows-1255')
         return $string;
 
     /* Only do the slow convert if there are 8-bit characters */
@@ -966,7 +1472,7 @@ function charset_decode_windows_1253 ($string) {
 
     $string = str_replace("\200", '€', $string);
     $string = str_replace("\202", '‚', $string);
-    $string = str_replace("\203", 'ƒ', $string);
+    $string = str_replace("\203", 'ƒ',  $string);
     $string = str_replace("\204", '„', $string);
     $string = str_replace("\205", '…', $string);
     $string = str_replace("\206", '†', $string);
@@ -982,22 +1488,109 @@ function charset_decode_windows_1253 ($string) {
     $string = str_replace("\227", '—', $string);
     $string = str_replace("\231", '™', $string);
     $string = str_replace("\233", '›', $string);
-    $string = str_replace("\241", '΅', $string);
-    $string = str_replace("\242", 'Ά', $string);
-    $string = str_replace ("\257", '―', $string);
-    $string = str_replace("\264", '΄', $string);
-    $string = str_replace("\270", 'Έ', $string);
-    $string = str_replace ("\271", 'Ή', $string);
-    $string = str_replace ("\272", 'Ί', $string);
-    $string = str_replace ("\274", 'Ό', $string);
-    // cycle for 190-254 symbols
-    $string = preg_replace("/([\274-\376])/e","'&#' . (ord('\\1')+720);",$string);
+    $string = str_replace("\240", ' ', $string);
+    // 162-169
+    $string = preg_replace("/([\242-\251])/e","'&#' . ord('\\1') . ';'",$string);
+    $string = str_replace("\252", '×', $string);
+    // 171-174
+    $string = preg_replace("/([\253-\256])/e","'&#' . ord('\\1') . ';'",$string);
+    $string = str_replace ("\257", '̍', $string);
+    // 176-185
+    $string = preg_replace("/([\260-\271])/e","'&#' . ord('\\1') . ';'",$string);
+    $string = str_replace ("\272", '÷', $string);
+    // 187-190
+    $string = preg_replace("/([\273-\276])/e","'&#' . ord('\\1') . ';'",$string);
+    $string = str_replace ("\337", '‗', $string);
+    // 224-250  1488-1514 (+1264)
+    $string = preg_replace("/([\340-\372])/e","'&#' . (ord('\\1')+1264) . ';'",$string);
+
+    return ($string);
+}
+
+/*
+ windows-1256 (Arab)
+ */
+function charset_decode_windows_1256 ($string) {
+    global $default_charset;
+
+    if (strtolower($default_charset) == 'windows-1256')
+        return $string;
+
+    /* Only do the slow convert if there are 8-bit characters */
+    if (! ereg("[\200-\377]", $string))
+        return $string;
+
+    $string = str_replace("\200", '،', $string);
+    $string = str_replace("\202", '‚', $string);
+    $string = str_replace("\204", '„', $string);
+    $string = str_replace("\205", '…', $string);
+    $string = str_replace("\206", '†', $string);
+    $string = str_replace("\207", '‡', $string);
+    $string = str_replace("\211", '‰', $string);
+    $string = str_replace("\213", '‹', $string);
+    $string = str_replace("\221", '‘', $string);
+    $string = str_replace("\222", '’', $string);
+    $string = str_replace("\223", '“', $string);
+    $string = str_replace("\224", '”', $string);
+    $string = str_replace("\225", '•', $string);
+    $string = str_replace("\226", '–', $string);
+    $string = str_replace("\227", '—', $string);
+    $string = str_replace("\230", '؜', $string);
+    $string = str_replace("\231", '™', $string);
+    $string = str_replace("\232", '؟', $string);
+    $string = str_replace("\233", '›', $string);
+    $string = str_replace("\234", 'ء', $string);
+    $string = str_replace("\235", 'آ', $string);
+    $string = str_replace("\236", 'أ', $string);
+    $string = str_replace("\237", 'Ÿ', $string);
+    $string = str_replace("\241", 'ؤ', $string);
+    $string = str_replace("\242", 'إ', $string);
+    $string = str_replace("\245", 'ئ', $string);
+    $string = str_replace ("\250", 'ا', $string);
+    $string = str_replace ("\252", 'ب', $string);
+    $string = str_replace ("\262", 'ة', $string);
+    $string = str_replace ("\263", 'ت', $string);
+    $string = str_replace ("\264", 'ث', $string);
+    $string = str_replace ("\270", 'ج', $string);
+    $string = str_replace ("\272", 'ح', $string);
+    $string = str_replace ("\274", 'خ', $string);
+    $string = str_replace ("\275", 'د', $string);
+    $string = str_replace ("\276", 'ذ', $string);
+    $string = str_replace ("\277", 'ر', $string);
+    $string = str_replace ("\301", 'ز', $string);
+    $string = str_replace ("\304", 'س', $string);
+    $string = str_replace ("\305", 'ش', $string);
+    $string = str_replace ("\306", 'ص', $string);
+    $string = str_replace ("\314", 'ض', $string);
+    $string = str_replace ("\315", 'ط', $string);
+    $string = str_replace ("\320", 'ظ', $string);
+    $string = str_replace ("\321", 'ع', $string);
+    $string = str_replace ("\322", 'غ', $string);
+    $string = str_replace ("\323", 'ـ', $string);
+    $string = str_replace ("\325", 'ف', $string);
+    $string = str_replace ("\326", 'ق', $string);
+    $string = str_replace ("\330", 'ك', $string);
+    $string = str_replace ("\332", 'گ', $string);
+    $string = str_replace ("\335", 'ل', $string);
+    $string = str_replace ("\336", 'م', $string);
+    $string = str_replace ("\337", 'ن', $string);
+    $string = str_replace ("\341", 'ه', $string);
+    $string = str_replace ("\344", 'و', $string);
+    $string = str_replace ("\345", 'ى', $string);
+    $string = str_replace ("\346", 'ي', $string);
+    $string = str_replace ("\354", 'ً', $string);
+    $string = str_replace ("\355", 'ٌ', $string);
+    $string = str_replace ("\360", 'ٍ', $string);
+    $string = str_replace ("\361", 'َ', $string);
+    $string = str_replace ("\362", 'ُ', $string);
+    $string = str_replace ("\363", 'ِ', $string);
+    $string = str_replace ("\365", 'ّ', $string);
+    $string = str_replace ("\366", 'ْ', $string);
 
     // Rest of charset is like iso-8859-1
     return (charset_decode_iso_8859_1($string));
 }
 
-
 /*
  windows-1257 (BaltRim)
  */
@@ -1091,14 +1684,6 @@ function charset_decode_windows_1257 ($string) {
     return (charset_decode_iso_8859_1($string));
 }
 
-/* windows-1251 is Microsoft Cyrillic encoding */
-function charset_decode_windows_1251 ($string) {
-    // Convert to KOI8-R, then return this decoded.
-    $string = convert_cyr_string($string, 'w', 'k');
-    return charset_decode_koi8r($string);
-}
-
-
 
 /*
  * Set up the language to be output
@@ -1117,9 +1702,10 @@ function set_up_language($sm_language, $do_search = false) {
     }
 
     $SetupAlready = TRUE;
+    sqgetGlobalVar('HTTP_ACCEPT_LANGUAGE',  $accept_lang, SQ_SERVER);
 
-    if ($do_search && ! $sm_language && isset($_SERVER['HTTP_ACCEPT_LANGUAGE'])) {
-        $sm_language = substr($_SERVER['HTTP_ACCEPT_LANGUAGE'], 0, 2);
+    if ($do_search && ! $sm_language && isset($accept_lang)) {
+        $sm_language = substr($accept_lang, 0, 2);
     }
     
     if (!$sm_language && isset($squirrelmail_default_language)) {
@@ -1137,6 +1723,9 @@ function set_up_language($sm_language, $do_search = false) {
          isset($languages[$sm_notAlias]['CHARSET']) ) {
         bindtextdomain( 'squirrelmail', SM_PATH . 'locale/' );
         textdomain( 'squirrelmail' );
+       if (function_exists('bind_textdomain_codeset')) {
+            bind_textdomain_codeset ("squirrelmail", $languages[$sm_notAlias]['CHARSET'] );
+       }
         if ( !ini_get('safe_mode') &&
              getenv( 'LC_ALL' ) != $sm_notAlias ) {
             putenv( "LC_ALL=$sm_notAlias" );
@@ -1148,7 +1737,10 @@ function set_up_language($sm_language, $do_search = false) {
         if ($squirrelmail_language == 'ja_JP' && function_exists('mb_detect_encoding') ) {
             header ('Content-Type: text/html; charset=EUC-JP');
             if (!function_exists('mb_internal_encoding')) {
-                echo _("You need to have php4 installed with the multibyte string function enabled (using configure option --with-mbstring).");
+                echo _("You need to have php4 installed with the multibyte string function enabled (using configure option --enable-mbstring).");
+            }
+            if (function_exists('mb_language')) {
+                mb_language('Japanese');
             }
             mb_internal_encoding('EUC-JP');
             mb_http_output('pass');
@@ -1233,6 +1825,10 @@ $languages['et_EE']['NAME']    = 'Estonian';
 $languages['et_EE']['CHARSET'] = 'iso-8859-15';
 $languages['et']['ALIAS'] = 'et_EE';
 
+$languages['fo_FO']['NAME']    = 'Faroese';
+$languages['fo_FO']['CHARSET'] = 'iso-8859-1';
+$languages['fo']['ALIAS'] = 'fo_FO';
+
 $languages['fi_FI']['NAME']    = 'Finnish';
 $languages['fi_FI']['CHARSET'] = 'iso-8859-1';
 $languages['fi']['ALIAS'] = 'fi_FI';
@@ -1249,7 +1845,7 @@ $languages['hu_HU']['NAME']    = 'Hungarian';
 $languages['hu_HU']['CHARSET'] = 'iso-8859-2';
 $languages['hu']['ALIAS'] = 'hu_HU';
 
-$languages['id_ID']['NAME']    = 'Indonesian';
+$languages['id_ID']['NAME']    = 'Bahasa Indonesia';
 $languages['id_ID']['CHARSET'] = 'iso-8859-1';
 $languages['id']['ALIAS'] = 'id_ID';
 
@@ -1343,6 +1939,14 @@ $languages['uk_UA']['NAME']    = 'Ukrainian';
 $languages['uk_UA']['CHARSET'] = 'koi8-u';
 $languages['uk']['ALIAS'] = 'uk_UA';
 
+$languages['cy_GB']['NAME']    = 'Welsh';
+$languages['cy_GB']['CHARSET'] = 'iso-8859-1';
+$languages['cy']['ALIAS'] = 'cy_GB';
+
+$languages['vi_VN']['NAME']    = 'Vietnamese';
+$languages['vi_VN']['CHARSET'] = 'utf-8';
+$languages['vi']['ALIAS'] = 'vi_VN';
+
 // Right to left languages
 
 $languages['ar']['NAME']    = 'Arabic';
@@ -1354,10 +1958,6 @@ $languages['he_IL']['CHARSET'] = 'windows-1255';
 $languages['he_IL']['DIR']     = 'rtl';
 $languages['he']['ALIAS']      = 'he_IL';
 
-$languages['vi_VN']['NAME']    = 'Vietnamese';
-$languages['vi_VN']['CHARSET'] = 'utf-8';
-$languages['vi']['ALIAS'] = 'vi_VN';
-
 /* Detect whether gettext is installed. */
 $gettext_flags = 0;
 if (function_exists('_')) {
@@ -1440,21 +2040,23 @@ function japanese_charset_xtra() {
     if (function_exists('mb_detect_encoding')) {
         switch (func_get_arg(0)) { /* action */
         case 'decode':
-            $detect_encoding = mb_detect_encoding($ret);
+            $detect_encoding = @mb_detect_encoding($ret);
             if ($detect_encoding == 'JIS' ||
                 $detect_encoding == 'EUC-JP' ||
-                $detect_encoding == 'SJIS') {
+                $detect_encoding == 'SJIS' ||
+                $detect_encoding == 'UTF-8') {
                 
-                $ret = mb_convert_encoding($ret, 'EUC-JP', 'AUTO');
+                $ret = mb_convert_kana(mb_convert_encoding($ret, 'EUC-JP', 'AUTO'), "KV");
             }
             break;
         case 'encode':
-            $detect_encoding = mb_detect_encoding($ret);
+            $detect_encoding = @mb_detect_encoding($ret);
             if ($detect_encoding == 'JIS' ||
                 $detect_encoding == 'EUC-JP' ||
-                $detect_encoding == 'SJIS') {
+                $detect_encoding == 'SJIS' ||
+                $detect_encoding == 'UTF-8') {
                 
-                $ret = mb_convert_encoding($ret, 'JIS', 'AUTO');
+                $ret = mb_convert_encoding(mb_convert_kana($ret, "KV"), 'JIS', 'AUTO');
             }
             break;
         case 'strimwidth':
@@ -1474,7 +2076,8 @@ function japanese_charset_xtra() {
                         if ($prevcsize == 1) {
                             $result .= $tmpstr;
                         } else {
-                            $result .= mb_encode_mimeheader($tmpstr);
+                            $result .= str_replace(' ', '', 
+                                                   mb_encode_mimeheader($tmpstr,'iso-2022-jp','B',''));
                         }
                         $tmpstr = $tmp;
                         $prevcsize = strlen($tmp);
@@ -1484,17 +2087,17 @@ function japanese_charset_xtra() {
                     if (strlen(mb_substr($tmpstr, 0, 1)) == 1)
                         $result .= $tmpstr;
                     else
-                        $result .= mb_encode_mimeheader($tmpstr);
+                        $result .= str_replace(' ', '',
+                                               mb_encode_mimeheader($tmpstr,'iso-2022-jp','B',''));
                 }
             }
             $ret = $result;
-            //$ret = mb_encode_mimeheader($ret);
             break;
         case 'decodeheader':
             $ret = str_replace("\t", "", $ret);
             if (eregi('=\\?([^?]+)\\?(q|b)\\?([^?]+)\\?=', $ret))
-                $ret = mb_decode_mimeheader($ret);
-            $ret = mb_convert_encoding($ret, 'EUC-JP', 'AUTO');
+                $ret = @mb_decode_mimeheader($ret);
+            $ret = @mb_convert_encoding($ret, 'EUC-JP', 'AUTO');
             break;
         case 'downloadfilename':
             $useragent = func_get_arg(2);
@@ -1505,6 +2108,54 @@ function japanese_charset_xtra() {
                 $ret = mb_convert_encoding($ret, 'EUC-JP', 'AUTO');
 }
             break;
+        case 'wordwrap':
+            $no_begin = "\x21\x25\x29\x2c\x2e\x3a\x3b\x3f\x5d\x7d\xa1\xf1\xa1\xeb\xa1" .
+                "\xc7\xa1\xc9\xa2\xf3\xa1\xec\xa1\xed\xa1\xee\xa1\xa2\xa1\xa3\xa1\xb9" .
+                "\xa1\xd3\xa1\xd5\xa1\xd7\xa1\xd9\xa1\xdb\xa1\xcd\xa4\xa1\xa4\xa3\xa4" .
+                "\xa5\xa4\xa7\xa4\xa9\xa4\xc3\xa4\xe3\xa4\xe5\xa4\xe7\xa4\xee\xa1\xab" .
+                "\xa1\xac\xa1\xb5\xa1\xb6\xa5\xa1\xa5\xa3\xa5\xa5\xa5\xa7\xa5\xa9\xa5" .
+                "\xc3\xa5\xe3\xa5\xe5\xa5\xe7\xa5\xee\xa5\xf5\xa5\xf6\xa1\xa6\xa1\xbc" .
+                "\xa1\xb3\xa1\xb4\xa1\xaa\xa1\xf3\xa1\xcb\xa1\xa4\xa1\xa5\xa1\xa7\xa1" .
+                "\xa8\xa1\xa9\xa1\xcf\xa1\xd1";
+            $no_end = "\x5c\x24\x28\x5b\x7b\xa1\xf2\x5c\xa1\xc6\xa1\xc8\xa1\xd2\xa1" .
+                "\xd4\xa1\xd6\xa1\xd8\xa1\xda\xa1\xcc\xa1\xf0\xa1\xca\xa1\xce\xa1\xd0\xa1\xef";
+            $wrap = func_get_arg(2);
+            
+            if (strlen($ret) >= $wrap && 
+                substr($ret, 0, 1) != '>' &&
+                strpos($ret, 'http://') === FALSE &&
+                strpos($ret, 'https://') === FALSE &&
+                strpos($ret, 'ftp://') === FALSE) {
+                
+                $ret = mb_convert_kana($ret, "KV");
+
+                $line_new = '';
+                $ptr = 0;
+                
+                while ($ptr < strlen($ret) - 1) {
+                    $l = mb_strcut($ret, $ptr, $wrap);
+                    $ptr += strlen($l);
+                    $tmp = $l;
+                    
+                    $l = mb_strcut($ret, $ptr, 2);
+                    while (strlen($l) != 0 && mb_strpos($no_begin, $l) !== FALSE ) {
+                        $tmp .= $l;
+                        $ptr += strlen($l);
+                        $l = mb_strcut($ret, $ptr, 1);
+                    }
+                    $line_new .= $tmp;
+                    if ($ptr < strlen($ret) - 1)
+                        $line_new .= "\n";
+                }
+                $ret = $line_new;
+            }
+            break;
+        case 'utf7-imap_encode':
+            $ret = mb_convert_encoding($ret, 'UTF7-IMAP', 'EUC-JP');
+            break;
+        case 'utf7-imap_decode':
+            $ret = mb_convert_encoding($ret, 'EUC-JP', 'UTF7-IMAP');
+            break;
         }
     }
     return $ret;
@@ -1538,4 +2189,4 @@ function korean_charset_xtra() {
     return $ret;
 }
 
-?>
+?>
\ No newline at end of file