]> git.mxchange.org Git - friendica.git/blobdiff - src/Core/L10n.php
Merge pull request #12322 from annando/api-rules
[friendica.git] / src / Core / L10n.php
index 1eae16bca868352abaeea26c8b76368c5af6ae32..a74f18fa6bd45ae48827c44e91e2e4bc67d14b3c 100644 (file)
@@ -1,10 +1,30 @@
 <?php
 /**
- * @file src/Core/L10n.php
+ * @copyright Copyright (C) 2010-2022, the Friendica project
+ *
+ * @license GNU AGPL version 3 or any later version
+ *
+ * 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/>.
+ *
  */
+
 namespace Friendica\Core;
 
-use Friendica\Core\L10n\L10n as L10nClass;
+use Friendica\Core\Config\Capability\IManageConfigValues;
+use Friendica\Core\Session\Capability\IHandleSessions;
+use Friendica\Database\Database;
+use Friendica\Util\Strings;
 
 /**
  * Provide Language, Translation, and Localization functions to the application
@@ -12,19 +32,67 @@ use Friendica\Core\L10n\L10n as L10nClass;
  */
 class L10n
 {
+       /** @var string The default language */
+       const DEFAULT = 'en';
+       /** @var string[] The language names in their language */
+       const LANG_NAMES = [
+               'ar'    => 'العربية',
+               'bg'    => 'Български',
+               'ca'    => 'Català',
+               'cs'    => 'Česky',
+               'da-dk' => 'Dansk (Danmark)',
+               'de'    => 'Deutsch',
+               'en-gb' => 'English (United Kingdom)',
+               'en-us' => 'English (United States)',
+               'en'    => 'English (Default)',
+               'eo'    => 'Esperanto',
+               'es'    => 'Español',
+               'et'    => 'Eesti',
+               'fi-fi' => 'Suomi',
+               'fr'    => 'Français',
+               'gd'    => 'Gàidhlig',
+               'hu'    => 'Magyar',
+               'is'    => 'Íslenska',
+               'it'    => 'Italiano',
+               'ja'    => '日本語',
+               'nb-no' => 'Norsk bokmål',
+               'nl'    => 'Nederlands',
+               'pl'    => 'Polski',
+               'pt-br' => 'Português Brasileiro',
+               'ro'    => 'Română',
+               'ru'    => 'Русский',
+               'sv'    => 'Svenska',
+               'zh-cn' => '简体中文',
+       ];
+
        /**
-        * @var L10nClass
+        * A string indicating the current language used for translation:
+        * - Two-letter ISO 639-1 code.
+        * - Two-letter ISO 639-1 code + dash + Two-letter ISO 3166-1 alpha-2 country code.
+        *
+        * @var string
         */
-       private static $l10n;
+       private $lang = '';
 
        /**
-        * Initializes the L10n static wrapper with the instance
+        * An array of translation strings whose key is the neutral english message.
         *
-        * @param L10nClass $l10n The l10n class
+        * @var array
         */
-       public static function init(L10nClass $l10n)
+       private $strings = [];
+
+       /**
+        * @var Database
+        */
+       private $dba;
+
+       public function __construct(IManageConfigValues $config, Database $dba, IHandleSessions $session, array $server, array $get)
        {
-               self::$l10n = $l10n;
+               $this->dba    = $dba;
+
+               $this->loadTranslationTable(L10n::detectLanguage($server, $get, $config->get('system', 'language', self::DEFAULT)));
+               $this->setSessionVariable($session);
+               $this->setLangFromSession($session);
        }
 
        /**
@@ -32,60 +100,196 @@ class L10n
         *
         * @return string Language code
         */
-       public static function getCurrentLang()
+       public function getCurrentLang()
+       {
+               return $this->lang;
+       }
+
+       /**
+        * Sets the language session variable
+        */
+       private function setSessionVariable(IHandleSessions $session)
+       {
+               if ($session->get('authenticated') && !$session->get('language')) {
+                       $session->set('language', $this->lang);
+                       // we haven't loaded user data yet, but we need user language
+                       if ($session->get('uid')) {
+                               $user = $this->dba->selectFirst('user', ['language'], ['uid' => $_SESSION['uid']]);
+                               if ($this->dba->isResult($user)) {
+                                       $session->set('language', $user['language']);
+                               }
+                       }
+               }
+
+               if (isset($_GET['lang'])) {
+                       $session->set('language', $_GET['lang']);
+               }
+       }
+
+       private function setLangFromSession(IHandleSessions $session)
        {
-               return self::$l10n->getCurrentLang();
+               if ($session->get('language') !== $this->lang) {
+                       $this->loadTranslationTable($session->get('language') ?? $this->lang);
+               }
        }
 
        /**
-        * This function should be called before formatting messages in a specific target language
-        * different from the current user/system language.
+        * Loads string translation table
         *
-        * It saves the current translation strings in a separate variable and loads new translations strings.
+        * First addon strings are loaded, then globals
         *
-        * If called repeatedly, it won't save the translation strings again, just load the new ones.
+        * Uses an App object shim since all the strings files refer to $a->strings
         *
-        * @see   popLang()
-        * @brief Stores the current language strings and load a different language.
-        * @param string $lang Language code
+        * @param string $lang language code to load
+        * @return void
         * @throws \Exception
         */
-       public static function pushLang($lang)
+       private function loadTranslationTable(string $lang)
        {
-               self::$l10n->pushLang($lang);
+               $lang = Strings::sanitizeFilePathItem($lang);
+
+               // Don't override the language setting with empty languages
+               if (empty($lang)) {
+                       return;
+               }
+
+               $a          = new \stdClass();
+               $a->strings = [];
+
+               // load enabled addons strings
+               $addons = $this->dba->select('addon', ['name'], ['installed' => true]);
+               while ($p = $this->dba->fetch($addons)) {
+                       $name = Strings::sanitizeFilePathItem($p['name']);
+                       if (file_exists(__DIR__ . "/../../addon/$name/lang/$lang/strings.php")) {
+                               include __DIR__ . "/../../addon/$name/lang/$lang/strings.php";
+                       }
+               }
+
+               if (file_exists(__DIR__ . "/../../view/lang/$lang/strings.php")) {
+                       include __DIR__ . "/../../view/lang/$lang/strings.php";
+               }
+
+               $this->lang    = $lang;
+               $this->strings = $a->strings;
+
+               unset($a);
        }
 
        /**
-        * Restores the original user/system language after having used pushLang()
+        * Returns the preferred language from the HTTP_ACCEPT_LANGUAGE header
+        *
+        * @param string $sysLang The default fallback language
+        * @param array  $server  The $_SERVER array
+        * @param array  $get     The $_GET array
+        *
+        * @return string The two-letter language code
         */
-       public static function popLang()
+       public static function detectLanguage(array $server, array $get, string $sysLang = self::DEFAULT): string
        {
-               self::$l10n->popLang();
+               $lang_variable = $server['HTTP_ACCEPT_LANGUAGE'] ?? null;
+
+               if (empty($lang_variable)) {
+                       $acceptedLanguages = [];
+               } else {
+                       $acceptedLanguages = preg_split('/,\s*/', $lang_variable);
+               }
+
+               // Add get as absolute quality accepted language (except this language isn't valid)
+               if (!empty($get['lang'])) {
+                       $acceptedLanguages[] = $get['lang'];
+               }
+
+               // return the sys language in case there's nothing to do
+               if (empty($acceptedLanguages)) {
+                       return $sysLang;
+               }
+
+               // Set the syslang as default fallback
+               $current_lang = $sysLang;
+               // start with quality zero (every guessed language is more acceptable ..)
+               $current_q = 0;
+
+               foreach ($acceptedLanguages as $acceptedLanguage) {
+                       $res = preg_match(
+                               '/^([a-z]{1,8}(?:-[a-z]{1,8})*)(?:;\s*q=(0(?:\.[0-9]{1,3})?|1(?:\.0{1,3})?))?$/i',
+                               $acceptedLanguage,
+                               $matches
+                       );
+
+                       // Invalid language? -> skip
+                       if (!$res) {
+                               continue;
+                       }
+
+                       // split language codes based on it's "-"
+                       $lang_code = explode('-', $matches[1]);
+
+                       // determine the quality of the guess
+                       if (isset($matches[2])) {
+                               $lang_quality = (float)$matches[2];
+                       } else {
+                               // fallback so without a quality parameter, it's probably the best
+                               $lang_quality = 1;
+                       }
+
+                       // loop through each part of the code-parts
+                       while (count($lang_code)) {
+                               // try to mix them so we can get double-code parts too
+                               $match_lang = strtolower(join('-', $lang_code));
+                               if (file_exists(__DIR__ . "/../../view/lang/$match_lang") &&
+                                   is_dir(__DIR__ . "/../../view/lang/$match_lang")) {
+                                       if ($lang_quality > $current_q) {
+                                               $current_lang = $match_lang;
+                                               $current_q    = $lang_quality;
+                                               break;
+                                       }
+                               }
+
+                               // remove the most right code-part
+                               array_pop($lang_code);
+                       }
+               }
+
+               return $current_lang;
        }
 
        /**
-        * @brief Return the localized version of the provided string with optional string interpolation
+        * Return the localized version of the provided string with optional string interpolation
         *
         * This function takes a english string as parameter, and if a localized version
         * exists for the current language, substitutes it before performing an eventual
         * string interpolation (sprintf) with additional optional arguments.
         *
         * Usages:
-        * - L10n::t('This is an example')
-        * - L10n::t('URL %s returned no result', $url)
-        * - L10n::t('Current version: %s, new version: %s', $current_version, $new_version)
+        * - DI::l10n()->t('This is an example')
+        * - DI::l10n()->t('URL %s returned no result', $url)
+        * - DI::l10n()->t('Current version: %s, new version: %s', $current_version, $new_version)
         *
         * @param string $s
         * @param array  $vars Variables to interpolate in the translation string
+        *
         * @return string
         */
-       public static function t($s, ...$vars)
+       public function t(string $s, ...$vars): string
        {
-               return self::$l10n->t($s, $vars);
+               if (empty($s)) {
+                       return '';
+               }
+
+               if (!empty($this->strings[$s])) {
+                       $t = $this->strings[$s];
+                       $s = is_array($t) ? $t[0] : $t;
+               }
+
+               if (count($vars) > 0) {
+                       $s = sprintf($s, ...$vars);
+               }
+
+               return $s;
        }
 
        /**
-        * @brief Return the localized version of a singular/plural string with optional string interpolation
+        * Return the localized version of a singular/plural string with optional string interpolation
         *
         * This function takes two english strings as parameters, singular and plural, as
         * well as a count. If a localized version exists for the current language, they
@@ -94,55 +298,154 @@ class L10n
         * is performed using the count as parameter.
         *
         * Usages:
-        * - L10n::tt('Like', 'Likes', $count)
-        * - L10n::tt("%s user deleted", "%s users deleted", count($users))
+        * - DI::l10n()->tt('Like', 'Likes', $count)
+        * - DI::l10n()->tt("%s user deleted", "%s users deleted", count($users))
         *
         * @param string $singular
         * @param string $plural
         * @param int    $count
+        * @param array  $vars Variables to interpolate in the translation string
+        *
         * @return string
         * @throws \Exception
         */
-       public static function tt(string $singular, string $plural, int $count)
+       public function tt(string $singular, string $plural, int $count, ...$vars): string
+       {
+               $s = null;
+
+               if (!empty($this->strings[$singular])) {
+                       $t = $this->strings[$singular];
+                       if (is_array($t)) {
+                               $plural_function = 'string_plural_select_' . str_replace('-', '_', $this->lang);
+                               if (function_exists($plural_function)) {
+                                       $i = $plural_function($count);
+                               } else {
+                                       $i = $this->stringPluralSelectDefault($count);
+                               }
+
+                               if (isset($t[$i])) {
+                                       $s = $t[$i];
+                               } elseif (count($t) > 0) {
+                                       // for some languages there is only a single array item
+                                       $s = $t[0];
+                               }
+                               // if $t is empty, skip it, because empty strings array are indended
+                               // to make string file smaller when there's no translation
+                       } else {
+                               $s = $t;
+                       }
+               }
+
+               if (is_null($s) && $this->stringPluralSelectDefault($count)) {
+                       $s = $plural;
+               } elseif (is_null($s)) {
+                       $s = $singular;
+               }
+
+               // We mute errors here because the translation strings may not be referencing the count at all,
+               // but we still have to try the interpolation just in case it is indeed referenced.
+               $s = @sprintf($s, $count, ...$vars);
+
+               return $s;
+       }
+
+       /**
+        * Provide a fallback which will not collide with a function defined in any language file
+        *
+        * @param int $n
+        *
+        * @return bool
+        */
+       private function stringPluralSelectDefault(int $n): bool
        {
-               return self::$l10n->tt($singular, $plural, $count);
+               return $n != 1;
        }
 
        /**
-        * @brief Return installed languages codes as associative array
+        * Return installed languages codes as associative array
         *
         * Scans the view/lang directory for the existence of "strings.php" files, and
         * returns an alphabetical list of their folder names (@-char language codes).
-        * Adds the english language if it's missing from the list.
+        * Adds the english language if it's missing from the list. Folder names are
+        * replaced by nativ language names.
         *
-        * Ex: array('de' => 'de', 'en' => 'en', 'fr' => 'fr', ...)
+        * Ex: array('de' => 'Deutsch', 'en' => 'English', 'fr' => 'Français', ...)
         *
         * @return array
         */
-       public static function getAvailableLanguages()
+       public static function getAvailableLanguages(): array
        {
-               return self::$l10n::getAvailableLanguages();
+               $langs              = [];
+               $strings_file_paths = glob('view/lang/*/strings.php');
+
+               if (is_array($strings_file_paths) && count($strings_file_paths)) {
+                       if (!in_array('view/lang/en/strings.php', $strings_file_paths)) {
+                               $strings_file_paths[] = 'view/lang/en/strings.php';
+                       }
+                       asort($strings_file_paths);
+                       foreach ($strings_file_paths as $strings_file_path) {
+                               $path_array            = explode('/', $strings_file_path);
+                               $langs[$path_array[2]] = self::LANG_NAMES[$path_array[2]] ?? $path_array[2];
+                       }
+               }
+               return $langs;
        }
 
        /**
-        * @brief Translate days and months names.
+        * Translate days and months names.
         *
         * @param string $s String with day or month name.
         * @return string Translated string.
         */
-       public static function getDay($s)
+       public function getDay(string $s): string
        {
-               return self::$l10n->getDay($s);
+               $ret = str_replace(['Monday', 'Tuesday', 'Wednesday', 'Thursday', 'Friday', 'Saturday', 'Sunday'],
+                       [$this->t('Monday'), $this->t('Tuesday'), $this->t('Wednesday'), $this->t('Thursday'), $this->t('Friday'), $this->t('Saturday'), $this->t('Sunday')],
+                       $s);
+
+               $ret = str_replace(['January', 'February', 'March', 'April', 'May', 'June', 'July', 'August', 'September', 'October', 'November', 'December'],
+                       [$this->t('January'), $this->t('February'), $this->t('March'), $this->t('April'), $this->t('May'), $this->t('June'), $this->t('July'), $this->t('August'), $this->t('September'), $this->t('October'), $this->t('November'), $this->t('December')],
+                       $ret);
+
+               return $ret;
        }
 
        /**
-        * @brief Translate short days and months names.
+        * Translate short days and months names.
         *
         * @param string $s String with short day or month name.
         * @return string Translated string.
         */
-       public static function getDayShort($s)
+       public function getDayShort(string $s): string
        {
-               return self::$l10n->getDayShort($s);
+               $ret = str_replace(['Mon', 'Tue', 'Wed', 'Thu', 'Fri', 'Sat', 'Sun'],
+                       [$this->t('Mon'), $this->t('Tue'), $this->t('Wed'), $this->t('Thu'), $this->t('Fri'), $this->t('Sat'), $this->t('Sun')],
+                       $s);
+
+               $ret = str_replace(['Jan', 'Feb', 'Mar', 'Apr', 'May', 'Jun', 'Jul', 'Aug', 'Sep', 'Oct', 'Nov', 'Dec'],
+                       [$this->t('Jan'), $this->t('Feb'), $this->t('Mar'), $this->t('Apr'), $this->t('May'), $this->t('Jun'), $this->t('Jul'), $this->t('Aug'), $this->t('Sep'), $this->t('Oct'), $this->t('Nov'), $this->t('Dec')],
+                       $ret);
+
+               return $ret;
+       }
+
+       /**
+        * Creates a new L10n instance based on the given langauge
+        *
+        * @param string $lang The new language
+        *
+        * @return static A new L10n instance
+        * @throws \Exception
+        */
+       public function withLang(string $lang): L10n
+       {
+               // Don't create a new instance for same language
+               if ($lang === $this->lang) {
+                       return $this;
+               }
+
+               $newL10n = clone $this;
+               $newL10n->loadTranslationTable($lang);
+               return $newL10n;
        }
 }