alphebetized languages
[squirrelmail.git] / functions / i18n.php
index 238221936aef857c614a2fab3bd03ab2ee193e1b..56e09d1625f998a242447e986703582a0ec8380d 100644 (file)
 
    // This array specifies the available languages.
    $languages["en"]["NAME"]    = "English";
-   $languages["no"]["NAME"]    = "Norsk";
-   $languages["no"]["CHARSET"] = "iso-8859-1";
+   $languages["en"]["CHARSET"] = "iso-8859-1";
+   
+   $languages["ca"]["NAME"]    = "Catalan";
+   $languages["ca"]["CHARSET"] = "iso-8859-1";
+
+   $languages["cs_CZ"]["NAME"]    = "Czech";
+   $languages["cs_CZ"]["CHARSET"] = "iso-8859-2";
+   
+   $languages["da"]["NAME"]    = "Danish";
+   $languages["da"]["CHARSET"] = "iso-8859-1";
+   
    $languages["de"]["NAME"]    = "Deutsch";
    $languages["de"]["CHARSET"] = "iso-8859-1";
-   $languages["ru"]["NAME"]    = "Russian KOI8-R";
-   $languages["ru"]["CHARSET"] = "koi8-r";
+   
+   $languages["nl"]["NAME"]    = "Dutch";
+   $languages["nl"]["CHARSET"] = "iso-8859-1";
+   
+   $languages["fr"]["NAME"]    = "French";
+   $languages["fr"]["CHARSET"] = "iso-8859-1";
+   
+   $languages["fi"]["NAME"] = "Finnish";
+   $languages["fi"]["CHARSET"] = "iso-8859-1";
+
+   $languages["it"]["NAME"]    = "Italian";
+   $languages["it"]["CHARSET"] = "iso-8859-1";
+   
+   $languages["ko"]["NAME"]    = "Korean";
+   $languages["ko"]["CHARSET"] = "euc-KR";
+   
+   $languages["no"]["NAME"]    = "Norwegian (Bokmål)";
+   $languages["no"]["CHARSET"] = "iso-8859-1";
+   
+   $languages["no_NO_ny"]["NAME"] = "Norwegian (Nynorsk)";
+   $languages["no_NO_ny"]["CHARSET"] = "iso-8859-1";
+   
    $languages["pl"]["NAME"]    = "Polish";
    $languages["pl"]["CHARSET"] = "iso-8859-2";
+   
+   $languages["pt_BR"]["NAME"] = "Portuguese (Brazil)";
+   $languages["pt_BR"]["CHARSET"] = "iso-8859-1";
+   
+   $languages["ru"]["NAME"]    = "Russian KOI8-R";
+   $languages["ru"]["CHARSET"] = "koi8-r";
+   
+   $languages["sr"]["NAME"]     = "Serbian";
+   $languages["sr"]["CHARSET"] = "iso-8859-2";
+   
+   $languages["es"]["NAME"]    = "Spanish";
+   $languages["es"]["CHARSET"] = "iso-8859-1";
+   
+   $languages["sv"]["NAME"]    = "Swedish";
+   $languages["sv"]["CHARSET"] = "iso-8859-1";
+   
+   $languages["tw"]["NAME"]    = "Taiwan";
+   $languages["tw"]["CHARSET"] = "big5";
+   
 
    // Decodes a string to the internal encoding from the given charset
    function charset_decode ($charset, $string) {
+      global $debug_mime;
+
       // All HTML special characters are 7 bit and can be replaced first
       $string = htmlspecialchars ($string);
 
       $charset = strtolower($charset);
 
-      if (ereg("iso-8859-(.*)", $charset, $res)) {
+      if ($debug_mime) $string = $charset.":".$string;
+
+      if (ereg("iso-8859-([[:digit:]]+)", $charset, $res)) {
          if ($res[1] == "1")
             return charset_decode_iso_8859_1 ($string);
-         if ($res[1] == "7")
+         else if ($res[1] == "2")
+            return charset_decode_iso_8859_2 ($string);
+         else if ($res[1] == "7")
             return charset_decode_iso_8859_7 ($string);
          else if ($res[1] == "15")
             return charset_decode_iso_8859_15 ($string);
       return ($string);
    }
 
+   // iso-8859-2 is used for some eastern European languages
+   function charset_decode_iso_8859_2 ($string) {
+      global $default_charset;
+
+      if (strtolower($default_charset) == "iso-8859-2") {
+         return $string;
+      } else {
+         // Only do the slow convert if there are 8-bit characters
+         if (ereg("[\200-\377]", $string)) {
+            // NO-BREAK SPACE
+            $string = str_replace("\240", " ", $string);
+            // LATIN CAPITAL LETTER A WITH OGONEK
+            $string = str_replace("\241", "Ą", $string);
+            // BREVE
+            $string = str_replace("\242", "˘", $string);
+            // LATIN CAPITAL LETTER L WITH STROKE
+            $string = str_replace("\243", "Ł", $string);
+            // CURRENCY SIGN
+            $string = str_replace("\244", "¤", $string);
+            // LATIN CAPITAL LETTER L WITH CARON
+            $string = str_replace("\245", "Ľ", $string);
+            // LATIN CAPITAL LETTER S WITH ACUTE
+            $string = str_replace("\246", "Ś", $string);
+            // SECTION SIGN
+            $string = str_replace("\247", "§", $string);
+            // DIAERESIS
+            $string = str_replace("\250", "¨", $string);
+            // LATIN CAPITAL LETTER S WITH CARON
+            $string = str_replace("\251", "Š", $string);
+            // LATIN CAPITAL LETTER S WITH CEDILLA
+            $string = str_replace("\252", "Ş", $string);
+            // LATIN CAPITAL LETTER T WITH CARON
+            $string = str_replace("\253", "Ť", $string);
+            // LATIN CAPITAL LETTER Z WITH ACUTE
+            $string = str_replace("\254", "Ź", $string);
+            // SOFT HYPHEN
+            $string = str_replace("\255", "­", $string);
+            // LATIN CAPITAL LETTER Z WITH CARON
+            $string = str_replace("\256", "Ž", $string);
+            // LATIN CAPITAL LETTER Z WITH DOT ABOVE
+            $string = str_replace("\257", "Ż", $string);
+            // DEGREE SIGN
+            $string = str_replace("\260", "°", $string);
+            // LATIN SMALL LETTER A WITH OGONEK
+            $string = str_replace("\261", "ą", $string);
+            // OGONEK
+            $string = str_replace("\262", "˛", $string);
+            // LATIN SMALL LETTER L WITH STROKE
+            $string = str_replace("\263", "ł", $string);
+            // ACUTE ACCENT
+            $string = str_replace("\264", "´", $string);
+            // LATIN SMALL LETTER L WITH CARON
+            $string = str_replace("\265", "ľ", $string);
+            // LATIN SMALL LETTER S WITH ACUTE
+            $string = str_replace("\266", "ś", $string);
+            // CARON
+            $string = str_replace("\267", "ˇ", $string);
+            // CEDILLA
+            $string = str_replace("\270", "¸", $string);
+            // LATIN SMALL LETTER S WITH CARON
+            $string = str_replace("\271", "š", $string);
+            // LATIN SMALL LETTER S WITH CEDILLA
+            $string = str_replace("\272", "ş", $string);
+            // LATIN SMALL LETTER T WITH CARON
+            $string = str_replace("\273", "ť", $string);
+            // LATIN SMALL LETTER Z WITH ACUTE
+            $string = str_replace("\274", "ź", $string);
+            // DOUBLE ACUTE ACCENT
+            $string = str_replace("\275", "˝", $string);
+            // LATIN SMALL LETTER Z WITH CARON
+            $string = str_replace("\276", "ž", $string);
+            // LATIN SMALL LETTER Z WITH DOT ABOVE
+            $string = str_replace("\277", "ż", $string);
+            // LATIN CAPITAL LETTER R WITH ACUTE
+            $string = str_replace("\300", "Ŕ", $string);
+            // LATIN CAPITAL LETTER A WITH ACUTE
+            $string = str_replace("\301", "Á", $string);
+            // LATIN CAPITAL LETTER A WITH CIRCUMFLEX
+            $string = str_replace("\302", "Â", $string);
+            // LATIN CAPITAL LETTER A WITH BREVE
+            $string = str_replace("\303", "Ă", $string);
+            // LATIN CAPITAL LETTER A WITH DIAERESIS
+            $string = str_replace("\304", "Ä", $string);
+            // LATIN CAPITAL LETTER L WITH ACUTE
+            $string = str_replace("\305", "Ĺ", $string);
+            // LATIN CAPITAL LETTER C WITH ACUTE
+            $string = str_replace("\306", "Ć", $string);
+            // LATIN CAPITAL LETTER C WITH CEDILLA
+            $string = str_replace("\307", "Ç", $string);
+            // LATIN CAPITAL LETTER C WITH CARON
+            $string = str_replace("\310", "Č", $string);
+            // LATIN CAPITAL LETTER E WITH ACUTE
+            $string = str_replace("\311", "É", $string);
+            // LATIN CAPITAL LETTER E WITH OGONEK
+            $string = str_replace("\312", "Ę", $string);
+            // LATIN CAPITAL LETTER E WITH DIAERESIS
+            $string = str_replace("\313", "Ë", $string);
+            // LATIN CAPITAL LETTER E WITH CARON
+            $string = str_replace("\314", "Ě", $string);
+            // LATIN CAPITAL LETTER I WITH ACUTE
+            $string = str_replace("\315", "Í", $string);
+            // LATIN CAPITAL LETTER I WITH CIRCUMFLEX
+            $string = str_replace("\316", "Î", $string);
+            // LATIN CAPITAL LETTER D WITH CARON
+            $string = str_replace("\317", "Ď", $string);
+            // LATIN CAPITAL LETTER D WITH STROKE
+            $string = str_replace("\320", "Đ", $string);
+            // LATIN CAPITAL LETTER N WITH ACUTE
+            $string = str_replace("\321", "Ń", $string);
+            // LATIN CAPITAL LETTER N WITH CARON
+            $string = str_replace("\322", "Ň", $string);
+            // LATIN CAPITAL LETTER O WITH ACUTE
+            $string = str_replace("\323", "Ó", $string);
+            // LATIN CAPITAL LETTER O WITH CIRCUMFLEX
+            $string = str_replace("\324", "Ô", $string);
+            // LATIN CAPITAL LETTER O WITH DOUBLE ACUTE
+            $string = str_replace("\325", "Ő", $string);
+            // LATIN CAPITAL LETTER O WITH DIAERESIS
+            $string = str_replace("\326", "Ö", $string);
+            // MULTIPLICATION SIGN
+            $string = str_replace("\327", "×", $string);
+            // LATIN CAPITAL LETTER R WITH CARON
+            $string = str_replace("\330", "Ř", $string);
+            // LATIN CAPITAL LETTER U WITH RING ABOVE
+            $string = str_replace("\331", "Ů", $string);
+            // LATIN CAPITAL LETTER U WITH ACUTE
+            $string = str_replace("\332", "Ú", $string);
+            // LATIN CAPITAL LETTER U WITH DOUBLE ACUTE
+            $string = str_replace("\333", "Ű", $string);
+            // LATIN CAPITAL LETTER U WITH DIAERESIS
+            $string = str_replace("\334", "Ü", $string);
+            // LATIN CAPITAL LETTER Y WITH ACUTE
+            $string = str_replace("\335", "Ý", $string);
+            // LATIN CAPITAL LETTER T WITH CEDILLA
+            $string = str_replace("\336", "Ţ", $string);
+            // LATIN SMALL LETTER SHARP S
+            $string = str_replace("\337", "ß", $string);
+            // LATIN SMALL LETTER R WITH ACUTE
+            $string = str_replace("\340", "ŕ", $string);
+            // LATIN SMALL LETTER A WITH ACUTE
+            $string = str_replace("\341", "á", $string);
+            // LATIN SMALL LETTER A WITH CIRCUMFLEX
+            $string = str_replace("\342", "â", $string);
+            // LATIN SMALL LETTER A WITH BREVE
+            $string = str_replace("\343", "ă", $string);
+            // LATIN SMALL LETTER A WITH DIAERESIS
+            $string = str_replace("\344", "ä", $string);
+            // LATIN SMALL LETTER L WITH ACUTE
+            $string = str_replace("\345", "ĺ", $string);
+            // LATIN SMALL LETTER C WITH ACUTE
+            $string = str_replace("\346", "ć", $string);
+            // LATIN SMALL LETTER C WITH CEDILLA
+            $string = str_replace("\347", "ç", $string);
+            // LATIN SMALL LETTER C WITH CARON
+            $string = str_replace("\350", "č", $string);
+            // LATIN SMALL LETTER E WITH ACUTE
+            $string = str_replace("\351", "é", $string);
+            // LATIN SMALL LETTER E WITH OGONEK
+            $string = str_replace("\352", "ę", $string);
+            // LATIN SMALL LETTER E WITH DIAERESIS
+            $string = str_replace("\353", "ë", $string);
+            // LATIN SMALL LETTER E WITH CARON
+            $string = str_replace("\354", "ě", $string);
+            // LATIN SMALL LETTER I WITH ACUTE
+            $string = str_replace("\355", "í", $string);
+            // LATIN SMALL LETTER I WITH CIRCUMFLEX
+            $string = str_replace("\356", "î", $string);
+            // LATIN SMALL LETTER D WITH CARON
+            $string = str_replace("\357", "ď", $string);
+            // LATIN SMALL LETTER D WITH STROKE
+            $string = str_replace("\360", "đ", $string);
+            // LATIN SMALL LETTER N WITH ACUTE
+            $string = str_replace("\361", "ń", $string);
+            // LATIN SMALL LETTER N WITH CARON
+            $string = str_replace("\362", "ň", $string);
+            // LATIN SMALL LETTER O WITH ACUTE
+            $string = str_replace("\363", "ó", $string);
+            // LATIN SMALL LETTER O WITH CIRCUMFLEX
+            $string = str_replace("\364", "ô", $string);
+            // LATIN SMALL LETTER O WITH DOUBLE ACUTE
+            $string = str_replace("\365", "ő", $string);
+            // LATIN SMALL LETTER O WITH DIAERESIS
+            $string = str_replace("\366", "ö", $string);
+            // DIVISION SIGN
+            $string = str_replace("\367", "÷", $string);
+            // LATIN SMALL LETTER R WITH CARON
+            $string = str_replace("\370", "ř", $string);
+            // LATIN SMALL LETTER U WITH RING ABOVE
+            $string = str_replace("\371", "ů", $string);
+            // LATIN SMALL LETTER U WITH ACUTE
+            $string = str_replace("\372", "ú", $string);
+            // LATIN SMALL LETTER U WITH DOUBLE ACUTE
+            $string = str_replace("\373", "ű", $string);
+            // LATIN SMALL LETTER U WITH DIAERESIS
+            $string = str_replace("\374", "ü", $string);
+            // LATIN SMALL LETTER Y WITH ACUTE
+            $string = str_replace("\375", "ý", $string);
+            // LATIN SMALL LETTER T WITH CEDILLA
+            $string = str_replace("\376", "ţ", $string);
+            // DOT ABOVE
+            $string = str_replace("\377", "˙", $string);
+        }
+      }
+      return $string;
+   }
+
    // iso-8859-7 is Greek.
    function charset_decode_iso_8859_7 ($string) {
       global $default_charset;
       return $string;
    }
 
-   // iso-8859-15 is Latin 15 and has very much the same use as Latin 1
+   // iso-8859-15 is Latin 9 and has very much the same use as Latin 1
    // but has the Euro symbol and some characters needed for French.
    function charset_decode_iso_8859_15 ($string) {
       // Euro sign
       }
    }
 
+
+   global $use_gettext;
+   
+   // Detect whether gettext is installed.
+   // If it is, set the flag so we can use it.
+   if (! function_exists("_") || 
+       ! function_exists("bindtextdomain") ||
+       ! function_exists("textdomain"))
+       $use_gettext = false;
+   else
+       $use_gettext = true;
+          
+
+   // Avoid warnings/errors   
+   if (! function_exists("_")) {
+      function _($str) { return $str; };
+   }
+   if (! function_exists("bindtextdomain")) {
+      function bindtextdomain() { return; }
+   }
+   if (! function_exists("textdomain")) {
+      function textdomain() { return; }
+   }
+
+
+   // Set up the language to be output
+   // if $do_search is true, then scan the browser information
+   // for a possible language that we know
+   function set_up_language($sm_language, $do_search = false)
+   {
+      static $SetupAlready = 0;
+               global $HTTP_ACCEPT_LANGUAGE, $use_gettext, $languages, $squirrelmail_language;
+      
+      if ($SetupAlready)
+         return;
+      $SetupAlready = 1;
+     
+      if ($do_search && ! $sm_language && isset($HTTP_ACCEPT_LANGUAGE)) {
+         $sm_language = substr($HTTP_ACCEPT_LANGUAGE, 0, 2);
+      }
+
+      if (isset($sm_language) && $use_gettext &&
+         $squirrelmail_language != "" &&
+         $languages[$sm_language]["CHARSET"]) {
+         putenv("LC_ALL=".$sm_language);
+         setlocale("LC_ALL", $sm_language);
+         bindtextdomain("squirrelmail", "../locale/");
+         textdomain("squirrelmail");
+         header ("Content-Type: text/html; charset=".$languages[$sm_language]["CHARSET"]);
+      }
+   }
 ?>