123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384 |
- <?php
- /**
- * GNU social - a federating social network
- *
- * utility functions for i18n
- *
- * LICENCE: 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 <http://www.gnu.org/licenses/>.
- *
- * @category I18n
- * @package GNU social
- * @author Matthew Gregg <matthew.gregg@gmail.com>
- * @author Ciaran Gultnieks <ciaran@ciarang.com>
- * @author Evan Prodromou <evan@status.net>
- * @license http://www.fsf.org/licensing/licenses/agpl-3.0.html GNU Affero General Public License version 3.0
- * @link http://status.net/
- */
- if (!defined('STATUSNET') && !defined('LACONICA')) {
- exit(1);
- }
- // Locale category constants are usually predefined, but may not be
- // on some systems such as Win32.
- $LC_CATEGORIES = ['LC_CTYPE',
- 'LC_NUMERIC',
- 'LC_TIME',
- 'LC_COLLATE',
- 'LC_MONETARY',
- 'LC_MESSAGES',
- 'LC_ALL'];
- foreach ($LC_CATEGORIES as $key => $name) {
- if (!defined($name)) {
- define($name, $key);
- }
- }
- if (!function_exists('dpgettext')) {
- /**
- * Context-aware dgettext wrapper; use when messages in different contexts
- * won't be distinguished from the English source but need different translations.
- * The context string will appear as msgctxt in the .po files.
- *
- * Not currently exposed in PHP's gettext module; implemented to be compat
- * with gettext.h's macros.
- *
- * @param string $domain domain identifier
- * @param string $context context identifier, should be some key like "menu|file"
- * @param string $msg English source text
- * @return string original or translated message
- */
- function dpgettext($domain, $context, $msg)
- {
- $msgid = $context . "\004" . $msg;
- $out = dcgettext($domain, $msgid, LC_MESSAGES);
- if ($out == $msgid) {
- return $msg;
- } else {
- return $out;
- }
- }
- }
- if (!function_exists('pgettext')) {
- /**
- * Context-aware gettext wrapper; use when messages in different contexts
- * won't be distinguished from the English source but need different translations.
- * The context string will appear as msgctxt in the .po files.
- *
- * Not currently exposed in PHP's gettext module; implemented to be compat
- * with gettext.h's macros.
- *
- * @param string $context context identifier, should be some key like "menu|file"
- * @param string $msgid English source text
- * @return string original or translated message
- */
- function pgettext($context, $msgid)
- {
- return dpgettext(textdomain(NULL), $context, $msgid);
- }
- }
- if (!function_exists('dnpgettext')) {
- /**
- * Context-aware dngettext wrapper; use when messages in different contexts
- * won't be distinguished from the English source but need different translations.
- * The context string will appear as msgctxt in the .po files.
- *
- * Not currently exposed in PHP's gettext module; implemented to be compat
- * with gettext.h's macros.
- *
- * @param string $domain domain identifier
- * @param string $context context identifier, should be some key like "menu|file"
- * @param string $msg singular English source text
- * @param string $plural plural English source text
- * @param int $n number of items to control plural selection
- * @return string original or translated message
- */
- function dnpgettext($domain, $context, $msg, $plural, $n)
- {
- $msgid = $context . "\004" . $msg;
- $out = dcngettext($domain, $msgid, $plural, $n, LC_MESSAGES);
- if ($out == $msgid) {
- return $msg;
- } else {
- return $out;
- }
- }
- }
- if (!function_exists('npgettext')) {
- /**
- * Context-aware ngettext wrapper; use when messages in different contexts
- * won't be distinguished from the English source but need different translations.
- * The context string will appear as msgctxt in the .po files.
- *
- * Not currently exposed in PHP's gettext module; implemented to be compat
- * with gettext.h's macros.
- *
- * @param string $context context identifier, should be some key like "menu|file"
- * @param string $msgid singular English source text
- * @param string $plural plural English source text
- * @param int $n number of items to control plural selection
- * @return string original or translated message
- */
- function npgettext($context, $msgid, $plural, $n)
- {
- return dnpgettext(textdomain(NULL), $msgid, $plural, $n, LC_MESSAGES);
- }
- }
- /**
- * Shortcut for *gettext functions with smart domain detection.
- *
- * If calling from a plugin, this function checks which plugin was
- * being called from and uses that as text domain, which will have
- * been set up during plugin initialization.
- *
- * Also handles plurals and contexts depending on what parameters
- * are passed to it:
- *
- * gettext -> _m($msg)
- * ngettext -> _m($msg1, $msg2, $n)
- * pgettext -> _m($ctx, $msg)
- * npgettext -> _m($ctx, $msg1, $msg2, $n)
- *
- * @fixme may not work properly in eval'd code
- *
- * @param string $msg
- * @return string
- * @throws Exception
- */
- function _m($msg/*, ...*/)
- {
- $domain = _mdomain(debug_backtrace());
- $args = func_get_args();
- switch (count($args)) {
- case 1:
- return dgettext($domain, $msg);
- case 2:
- return dpgettext($domain, $args[0], $args[1]);
- case 3:
- return dngettext($domain, $args[0], $args[1], $args[2]);
- case 4:
- return dnpgettext($domain, $args[0], $args[1], $args[2], $args[3]);
- default:
- throw new Exception("Bad parameter count to _m()");
- }
- }
- /**
- * Looks for which plugin we've been called from to set the gettext domain;
- * if not in a plugin subdirectory, we'll use the default 'statusnet'.
- *
- * Note: we can't return null for default domain since most of the PHP gettext
- * wrapper functions turn null into "" before passing to the backend library.
- *
- * @param array $backtrace debug_backtrace() output
- * @return string
- * @private
- * @fixme could explode if SN is under a 'plugins' folder or share name.
- */
- function _mdomain($backtrace)
- {
- /*
- 0 =>
- array
- 'file' => string '/var/www/mublog/plugins/FeedSub/FeedSubPlugin.php' (length=49)
- 'line' => int 77
- 'function' => string '_m' (length=2)
- 'args' =>
- array
- 0 => &string 'Feeds' (length=5)
- */
- static $cached;
- $path = $backtrace[0]['file'];
- if (!isset($cached[$path])) {
- if (DIRECTORY_SEPARATOR !== '/') {
- $path = strtr($path, DIRECTORY_SEPARATOR, '/');
- }
- $plug = strpos($path, '/plugins/');
- if ($plug === false) {
- // We're not in a plugin; return default domain.
- $final = 'statusnet';
- } else {
- $cut = $plug + 9;
- $cut2 = strpos($path, '/', $cut);
- if ($cut2) {
- $final = substr($path, $cut, $cut2 - $cut);
- } else {
- // We might be running directly from the plugins dir?
- // If so, there's no place to store locale info.
- $final = 'statusnet';
- }
- }
- $cached[$path] = $final;
- }
- return $cached[$path];
- }
- /**
- * Content negotiation for language codes
- *
- * @param $http_accept_lang_header string HTTP Accept-Language header
- * @return string language code for best language match, false otherwise
- */
- function client_preferred_language($http_accept_lang_header)
- {
- $client_langs = [];
- $all_languages = common_config('site', 'languages');
- preg_match_all('"(((\S\S)-?(\S\S)?)(;q=([0-9.]+))?)\s*(,\s*|$)"',
- strtolower($http_accept_lang_header), $http_langs);
- for ($i = 0; $i < count($http_langs); ++$i) {
- if (!empty($http_langs[2][$i])) {
- // if no q default to 1.0
- $client_langs[$http_langs[2][$i]] =
- ($http_langs[6][$i] ? (float)$http_langs[6][$i] : 1.0 - ($i * 0.01));
- }
- if (!empty($http_langs[3][$i]) && empty($client_langs[$http_langs[3][$i]])) {
- // if a catchall default 0.01 lower
- $client_langs[$http_langs[3][$i]] =
- ($http_langs[6][$i] ? (float)$http_langs[6][$i] - 0.01 : 0.99);
- }
- }
- // sort in descending q
- arsort($client_langs);
- foreach ($client_langs as $lang => $q) {
- if (isset($all_languages[$lang])) {
- return ($all_languages[$lang]['lang']);
- }
- }
- return false;
- }
- /**
- * returns a simple code -> name mapping for languages
- *
- * @return array map of available languages by code to language name.
- */
- function get_nice_language_list()
- {
- $nice_lang = [];
- $all_languages = common_config('site', 'languages');
- foreach ($all_languages as $lang) {
- $nice_lang = $nice_lang + array($lang['lang'] => $lang['name']);
- }
- return $nice_lang;
- }
- /*
- * Check whether a language is right-to-left
- *
- * @param string $lang language code of the language to check
- *
- * @return boolean true if language is rtl
- */
- function is_rtl($lang_value)
- {
- foreach (common_config('site', 'languages') as $code => $info) {
- if ($lang_value == $info['lang']) {
- return $info['direction'] == 'rtl';
- }
- }
- }
- /**
- * Get a list of all languages that are enabled in the default config
- *
- * This should ONLY be called when setting up the default config in common.php.
- * Any other attempt to get a list of languages should instead call
- * common_config('site','languages')
- *
- * @return array mapping of language codes to language info
- */
- function get_all_languages()
- {
- return [
- 'af' => ['q' => 0.8, 'lang' => 'af', 'name' => 'Afrikaans', 'direction' => 'ltr'],
- 'ar' => ['q' => 0.8, 'lang' => 'ar', 'name' => 'Arabic', 'direction' => 'rtl'],
- 'ast' => ['q' => 1, 'lang' => 'ast', 'name' => 'Asturian', 'direction' => 'ltr'],
- 'eu' => ['q' => 1, 'lang' => 'eu', 'name' => 'Basque', 'direction' => 'ltr'],
- 'be-tarask' => ['q' => 0.5, 'lang' => 'be-tarask', 'name' => 'Belarusian (Taraškievica orthography)', 'direction' => 'ltr'],
- 'br' => ['q' => 0.8, 'lang' => 'br', 'name' => 'Breton', 'direction' => 'ltr'],
- 'bg' => ['q' => 0.8, 'lang' => 'bg', 'name' => 'Bulgarian', 'direction' => 'ltr'],
- 'my' => ['q' => 1, 'lang' => 'my', 'name' => 'Burmese', 'direction' => 'ltr'],
- 'ca' => ['q' => 0.5, 'lang' => 'ca', 'name' => 'Catalan', 'direction' => 'ltr'],
- 'zh-cn' => ['q' => 0.9, 'lang' => 'zh_CN', 'name' => 'Chinese (Simplified)', 'direction' => 'ltr'],
- 'zh-hant' => ['q' => 0.2, 'lang' => 'zh_TW', 'name' => 'Chinese (Taiwanese)', 'direction' => 'ltr'],
- 'ksh' => ['q' => 1, 'lang' => 'ksh', 'name' => 'Colognian', 'direction' => 'ltr'],
- 'cs' => ['q' => 0.5, 'lang' => 'cs', 'name' => 'Czech', 'direction' => 'ltr'],
- 'da' => ['q' => 0.8, 'lang' => 'da', 'name' => 'Danish', 'direction' => 'ltr'],
- 'nl' => ['q' => 0.5, 'lang' => 'nl', 'name' => 'Dutch', 'direction' => 'ltr'],
- 'arz' => ['q' => 0.8, 'lang' => 'arz', 'name' => 'Egyptian Spoken Arabic', 'direction' => 'rtl'],
- 'en' => ['q' => 1, 'lang' => 'en', 'name' => 'English', 'direction' => 'ltr'],
- 'en-us' => ['q' => 1, 'lang' => 'en', 'name' => 'English (US)', 'direction' => 'ltr'],
- 'en-gb' => ['q' => 1, 'lang' => 'en_GB', 'name' => 'English (UK)', 'direction' => 'ltr'],
- 'eo' => ['q' => 0.8, 'lang' => 'eo', 'name' => 'Esperanto', 'direction' => 'ltr'],
- 'fi' => ['q' => 1, 'lang' => 'fi', 'name' => 'Finnish', 'direction' => 'ltr'],
- 'fr' => ['q' => 1, 'lang' => 'fr', 'name' => 'French', 'direction' => 'ltr'],
- 'fr-fr' => ['q' => 1, 'lang' => 'fr', 'name' => 'French (France)', 'direction' => 'ltr'],
- 'fur' => ['q' => 0.8, 'lang' => 'fur', 'name' => 'Friulian', 'direction' => 'ltr'],
- 'gl' => ['q' => 0.8, 'lang' => 'gl', 'name' => 'Galician', 'direction' => 'ltr'],
- 'ka' => ['q' => 0.8, 'lang' => 'ka', 'name' => 'Georgian', 'direction' => 'ltr'],
- 'de' => ['q' => 0.8, 'lang' => 'de', 'name' => 'German', 'direction' => 'ltr'],
- 'el' => ['q' => 0.1, 'lang' => 'el', 'name' => 'Greek', 'direction' => 'ltr'],
- 'he' => ['q' => 0.5, 'lang' => 'he', 'name' => 'Hebrew', 'direction' => 'rtl'],
- 'hu' => ['q' => 0.8, 'lang' => 'hu', 'name' => 'Hungarian', 'direction' => 'ltr'],
- 'is' => ['q' => 0.1, 'lang' => 'is', 'name' => 'Icelandic', 'direction' => 'ltr'],
- 'id' => ['q' => 1, 'lang' => 'id', 'name' => 'Indonesian', 'direction' => 'ltr'],
- 'ia' => ['q' => 0.8, 'lang' => 'ia', 'name' => 'Interlingua', 'direction' => 'ltr'],
- 'ga' => ['q' => 0.5, 'lang' => 'ga', 'name' => 'Irish', 'direction' => 'ltr'],
- 'it' => ['q' => 1, 'lang' => 'it', 'name' => 'Italian', 'direction' => 'ltr'],
- 'ja' => ['q' => 0.5, 'lang' => 'ja', 'name' => 'Japanese', 'direction' => 'ltr'],
- 'ko' => ['q' => 0.9, 'lang' => 'ko', 'name' => 'Korean', 'direction' => 'ltr'],
- 'lv' => ['q' => 1, 'lang' => 'lv', 'name' => 'Latvian', 'direction' => 'ltr'],
- 'lt' => ['q' => 1, 'lang' => 'lt', 'name' => 'Lithuanian', 'direction' => 'ltr'],
- 'lb' => ['q' => 1, 'lang' => 'lb', 'name' => 'Luxembourgish', 'direction' => 'ltr'],
- 'mk' => ['q' => 0.5, 'lang' => 'mk', 'name' => 'Macedonian', 'direction' => 'ltr'],
- 'mg' => ['q' => 1, 'lang' => 'mg', 'name' => 'Malagasy', 'direction' => 'ltr'],
- 'ms' => ['q' => 1, 'lang' => 'ms', 'name' => 'Malay', 'direction' => 'ltr'],
- 'ml' => ['q' => 0.5, 'lang' => 'ml', 'name' => 'Malayalam', 'direction' => 'ltr'],
- 'ne' => ['q' => 1, 'lang' => 'ne', 'name' => 'Nepali', 'direction' => 'ltr'],
- 'nb' => ['q' => 0.1, 'lang' => 'nb', 'name' => 'Norwegian (Bokmål)', 'direction' => 'ltr'],
- 'no' => ['q' => 0.1, 'lang' => 'nb', 'name' => 'Norwegian (Bokmål)', 'direction' => 'ltr'],
- 'nn' => ['q' => 1, 'lang' => 'nn', 'name' => 'Norwegian (Nynorsk)', 'direction' => 'ltr'],
- 'fa' => ['q' => 1, 'lang' => 'fa', 'name' => 'Persian', 'direction' => 'rtl'],
- 'pl' => ['q' => 0.5, 'lang' => 'pl', 'name' => 'Polish', 'direction' => 'ltr'],
- 'pt' => ['q' => 1, 'lang' => 'pt', 'name' => 'Portuguese', 'direction' => 'ltr'],
- 'pt-br' => ['q' => 0.9, 'lang' => 'pt_BR', 'name' => 'Brazilian Portuguese', 'direction' => 'ltr'],
- 'ru' => ['q' => 0.9, 'lang' => 'ru', 'name' => 'Russian', 'direction' => 'ltr'],
- 'sr-ec' => ['q' => 1, 'lang' => 'sr-ec', 'name' => 'Serbian', 'direction' => 'ltr'],
- 'es' => ['q' => 1, 'lang' => 'es', 'name' => 'Spanish', 'direction' => 'ltr'],
- 'sv' => ['q' => 0.8, 'lang' => 'sv', 'name' => 'Swedish', 'direction' => 'ltr'],
- 'tl' => ['q' => 0.8, 'lang' => 'tl', 'name' => 'Tagalog', 'direction' => 'ltr'],
- 'ta' => ['q' => 1, 'lang' => 'ta', 'name' => 'Tamil', 'direction' => 'ltr'],
- 'te' => ['q' => 0.3, 'lang' => 'te', 'name' => 'Telugu', 'direction' => 'ltr'],
- 'tr' => ['q' => 0.5, 'lang' => 'tr', 'name' => 'Turkish', 'direction' => 'ltr'],
- 'uk' => ['q' => 1, 'lang' => 'uk', 'name' => 'Ukrainian', 'direction' => 'ltr'],
- 'hsb' => ['q' => 0.8, 'lang' => 'hsb', 'name' => 'Upper Sorbian', 'direction' => 'ltr'],
- 'ur' => ['q' => 1, 'lang' => 'ur_PK', 'name' => 'Urdu (Pakistan)', 'direction' => 'rtl'],
- 'vi' => ['q' => 0.8, 'lang' => 'vi', 'name' => 'Vietnamese', 'direction' => 'ltr'],
- ];
- }
|