Fix for mcrypt error, when encrypting files of size = X*1024 bytes

[jirafeau_mojo42.git] / lib / lang.php

diff --git a/lib/lang.php b/lib/lang.php
old mode 100755 (executable)
new mode 100644 (file)
index bf74e8d..cfb8f80
--- a/lib/lang.php
+++ b/lib/lang.php
@@ -1,57 +1,126 @@
-<?php\r
-/*\r
- *  Jirafeau, your web file repository\r
- *  Copyright (C) 2012  Jerome Jutteau <j.jutteau@gmail.com>\r
- *\r
- *  This program is free software: you can redistribute it and/or modify\r
- *  it under the terms of the GNU Affero General Public License as\r
- *  published by the Free Software Foundation, either version 3 of the\r
- *  License, or (at your option) any later version.\r
- *\r
- *  This program is distributed in the hope that it will be useful,\r
- *  but WITHOUT ANY WARRANTY; without even the implied warranty of\r
- *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the\r
- *  GNU Affero General Public License for more details.\r
- *\r
- *  You should have received a copy of the GNU Affero General Public License\r
- *  along with this program.  If not, see <http://www.gnu.org/licenses/>.\r
- */\r
-\r
- global $languages_list;\r
- $languages_list = array ('auto' => 'Automatic',\r
-                          'en' => 'English',\r
-                          'fr' => 'Français');\r
-\r
-/* Translation */\r
-function t ($text)\r
-{\r
-    $cfg = $GLOBALS['cfg'];\r
-    $languages_list = $GLOBALS['languages_list'];\r
-\r
-    /* Detect user's langage if we are in automatic mode. */\r
-    if (strcmp ($cfg['lang'], 'auto') == 0)\r
-        $l = substr ($_SERVER['HTTP_ACCEPT_LANGUAGE'], 0, 2);\r
-    else\r
-        $l = $cfg['lang'];\r
-\r
-    /* Is the langage in the list ? */\r
-    $found = false;\r
-    foreach ($languages_list as $key => $v)\r
-        if (strcmp ($l, $key) == 0)\r
-            $found = true;\r
-\r
-    /* Get translation execpt for english. */\r
-    if ($found && strcmp ($l, "en"))\r
-    {\r
-        /* $tr is defined in this requirement. */\r
-        require (JIRAFEAU_ROOT . "lib/lang/$l.php");\r
-\r
-        foreach ($tr as $o => $t)\r
-            if (strcmp ($text, $o) == 0)\r
-                return "$t";\r
-    }\r
-    /* Return original text if no translation is found or already in english. */\r
-    return ($text);\r
-}\r
-\r
-?>\r
+<?php
+/*
+ *  Jirafeau, your web file repository
+ *  Copyright (C) 2015  Jerome Jutteau <jerome@jutteau.fr>
+ *
+ *  This program is free software: you can redistribute it and/or modify
+ *  it under the terms of the GNU Affero General Public License as
+ *  published by the Free Software Foundation, either version 3 of the
+ *  License, or (at your option) any later version.
+ *
+ *  This program is distributed in the hope that it will be useful,
+ *  but WITHOUT ANY WARRANTY; without even the implied warranty of
+ *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ *  GNU Affero General Public License for more details.
+ *
+ *  You should have received a copy of the GNU Affero General Public License
+ *  along with this program.  If not, see <https://www.gnu.org/licenses/>.
+ */
+
+function t($string_id)
+{
+    $lang_config = $GLOBALS['cfg']['lang'];
+    if ($lang_config != "auto") {
+        $r = t_in($string_id, $lang_config);
+        if ($r === false || $r === "") {
+            return "FIX ME";
+        }
+        return $r;
+    }
+
+    $visitor_langs = t_visitor_langs();
+    foreach ($visitor_langs as $lang) {
+        $r = t_in($string_id, $lang);
+        if ($r === false || $r === "") {
+            continue;
+        } else {
+            return $r;
+        }
+    }
+    return "FIX ME";
+}
+
+function t_visitor_langs()
+{
+    $visitor_langs = t_parse_accept_language();
+    array_push($visitor_langs, "en");
+    return $visitor_langs;
+}
+
+function t_parse_accept_language()
+{
+    if (!isset($_SERVER['HTTP_ACCEPT_LANGUAGE'])) {
+        return [];
+    }
+    // Example: fr-CH, fr;q=0.9, en;q=0.8, de;q=0.7, *;q=0.5
+    $langs = [];
+    $cols = explode(',', $_SERVER['HTTP_ACCEPT_LANGUAGE']);
+    foreach ($cols as $i => $semicols) {
+        $lang = explode(';', $semicols);
+        if (count($lang) === 0) {
+            continue;
+        }
+        array_push($langs, $lang[0]);
+    }
+    return $langs;
+}
+
+function t_in($string_id, $lang)
+{
+    $trans = t_get_json($lang);
+    if ($trans === false) {
+        return false;
+    }
+    if (!array_key_exists($string_id, $trans)) {
+        return false;
+    }
+    return $trans[$string_id];
+}
+
+function t_get_raw_json($lang)
+{
+    $filename = str_replace("-", "_", $lang);
+    if (preg_match('/[^A-Za-z_\w]/', $filename)) {
+        return false;
+    }
+    $p = JIRAFEAU_ROOT . "lib/locales/$filename.json";
+    if (!file_exists($p)) {
+        return false;
+    }
+    $json = file_get_contents($p);
+    if ($json === false) {
+        return false;
+    }
+    return $json;
+}
+
+function t_get_json($lang)
+{
+    $raw_j = t_get_raw_json($lang);
+    $array = json_decode($raw_j, true);
+    if ($array === null) {
+        return false;
+    }
+    return $array;
+}
+
+function json_lang_generator($lang)
+{
+    $r = false;
+    if ($lang === null) {
+        $lang_config = $GLOBALS['cfg']['lang'];
+        if ($lang_config != "auto") {
+            $r = t_get_raw_json($lang_config);
+        } else {
+            foreach (t_visitor_langs() as $lang) {
+                $r = t_get_raw_json($lang);
+                if (!($r === false)) {
+                    break;
+                }
+            }
+        }
+    } else {
+        $r = t_get_raw_json($lang);
+    }
+    return $r === false ? "{}" : $r;
+}