X-Git-Url: https://git.p6c8.net/jirafeau.git/blobdiff_plain/ef06cd797d4f91e83b1e3e69d815ff3e6c773ace..de00b9d5e05a6740808d6c528b013b382fdf091c:/lib/lang.php?ds=sidebyside

diff --git a/lib/lang.php b/lib/lang.php
old mode 100755
new mode 100644
index fd67e2d..263afb0
--- a/lib/lang.php
+++ b/lib/lang.php
@@ -1,7 +1,7 @@
 <?php
 /*
  *  Jirafeau, your web file repository
- *  Copyright (C) 2012  Jerome Jutteau <j.jutteau@gmail.com>
+ *  Copyright (C) 2015  Jerome Jutteau <j.jutteau@gmail.com>
  *
  *  This program is free software: you can redistribute it and/or modify
  *  it under the terms of the GNU Affero General Public License as
@@ -17,10 +17,50 @@
  *  along with this program.  If not, see <http://www.gnu.org/licenses/>.
  */
 
-// Translation (TODO)
-function _($text)
+ global $languages_list;
+ $languages_list = array ('auto' => 'Automatic',
+                          'en' => 'English',
+                          'fr' => 'Français');
+
+/* Translation */
+function t ($text)
 {
-    return ("$text");
+    $cfg = $GLOBALS['cfg'];
+    $languages_list = $GLOBALS['languages_list'];
+
+    /* Detect user's langage if we are in automatic mode. */
+    if (strcmp ($cfg['lang'], 'auto') == 0)
+        $l = substr ($_SERVER['HTTP_ACCEPT_LANGUAGE'], 0, 2);
+    else
+        $l = $cfg['lang'];
+
+    /* Is the langage in the list ? */
+    $found = false;
+    foreach ($languages_list as $key => $v)
+        if (strcmp ($l, $key) == 0)
+            $found = true;
+
+    /* Don't translate english. */
+    if (!($found && strcmp ($l, "en")))
+        return $text;
+
+    /* Open translation file. */
+    $trans_j = file_get_contents (JIRAFEAU_ROOT . "lib/locales/$l.json");
+    if ($trans_j === FALSE)
+        return $text;
+
+    /* Decode JSON. */
+    $trans = json_decode ($trans_j, true);
+    error_log(print_r($trans, true));
+    if ($trans === NULL)
+        return $text;
+
+    /* Try to find translation. */
+    $translation = $trans[$text];
+    if (empty ($translation))
+        return $text;
+
+    return $translation;
 }
 
-?>
\ No newline at end of file
+?>