mirror of
https://github.com/Mibew/mibew.git
synced 2025-04-04 15:37:07 +03:00
467 lines
14 KiB
PHP
467 lines
14 KiB
PHP
<?php
|
|
/*
|
|
* Copyright 2005-2014 the original author or authors.
|
|
*
|
|
* Licensed under the Apache License, Version 2.0 (the "License");
|
|
* you may not use this file except in compliance with the License.
|
|
* You may obtain a copy of the License at
|
|
*
|
|
* http://www.apache.org/licenses/LICENSE-2.0
|
|
*
|
|
* Unless required by applicable law or agreed to in writing, software
|
|
* distributed under the License is distributed on an "AS IS" BASIS,
|
|
* WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
|
|
* See the License for the specific language governing permissions and
|
|
* limitations under the License.
|
|
*/
|
|
|
|
// Import namespaces and classes of the core
|
|
use Mibew\Plugin\Manager as PluginManager;
|
|
|
|
/**
|
|
* Name for the cookie to store locale code in use
|
|
*/
|
|
define('LOCALE_COOKIE_NAME', 'mibew_locale');
|
|
|
|
// Test and set default locales
|
|
|
|
/**
|
|
* Verified value of the $default_locale configuration parameter (see
|
|
* "libs/default_config.php" for details)
|
|
*/
|
|
define(
|
|
'DEFAULT_LOCALE',
|
|
locale_pattern_check($default_locale) && locale_exists($default_locale) ? $default_locale : 'en'
|
|
);
|
|
|
|
/**
|
|
* Verified value of the $home_locale configuration parameter (see
|
|
* "libs/default_config.php" for details)
|
|
*/
|
|
define(
|
|
'HOME_LOCALE',
|
|
locale_pattern_check($home_locale) && locale_exists($home_locale) ? $home_locale : 'en'
|
|
);
|
|
|
|
/**
|
|
* Code of the current system locale
|
|
*/
|
|
define('CURRENT_LOCALE', get_locale());
|
|
|
|
function myiconv($in_enc, $out_enc, $string)
|
|
{
|
|
global $_utf8win1251, $_win1251utf8;
|
|
if ($in_enc == $out_enc) {
|
|
return $string;
|
|
}
|
|
if (function_exists('iconv')) {
|
|
$converted = @iconv($in_enc, $out_enc, $string);
|
|
if ($converted !== false) {
|
|
return $converted;
|
|
}
|
|
}
|
|
if ($in_enc == "cp1251" && $out_enc == "utf-8") {
|
|
return strtr($string, $_win1251utf8);
|
|
}
|
|
if ($in_enc == "utf-8" && $out_enc == "cp1251") {
|
|
return strtr($string, $_utf8win1251);
|
|
}
|
|
|
|
return $string; // do not know how to convert
|
|
}
|
|
|
|
function locale_exists($locale)
|
|
{
|
|
return file_exists(MIBEW_FS_ROOT . "/locales/$locale/properties");
|
|
}
|
|
|
|
function locale_pattern_check($locale)
|
|
{
|
|
$locale_pattern = "/^[\w-]{2,5}$/";
|
|
|
|
return preg_match($locale_pattern, $locale) && $locale != 'names';
|
|
}
|
|
|
|
function get_available_locales()
|
|
{
|
|
$list = array();
|
|
$folder = MIBEW_FS_ROOT . '/locales';
|
|
if ($handle = opendir($folder)) {
|
|
while (false !== ($file = readdir($handle))) {
|
|
if (locale_pattern_check($file) && is_dir("$folder/$file")) {
|
|
$list[] = $file;
|
|
}
|
|
}
|
|
closedir($handle);
|
|
}
|
|
sort($list);
|
|
|
|
return $list;
|
|
}
|
|
|
|
function get_user_locale()
|
|
{
|
|
if (isset($_COOKIE[LOCALE_COOKIE_NAME])) {
|
|
$requested_lang = $_COOKIE[LOCALE_COOKIE_NAME];
|
|
if (locale_pattern_check($requested_lang) && locale_exists($requested_lang)) {
|
|
return $requested_lang;
|
|
}
|
|
}
|
|
|
|
if (isset($_SERVER['HTTP_ACCEPT_LANGUAGE'])) {
|
|
$requested_langs = explode(",", $_SERVER['HTTP_ACCEPT_LANGUAGE']);
|
|
foreach ($requested_langs as $requested_lang) {
|
|
if (strlen($requested_lang) > 2) {
|
|
$requested_lang = substr($requested_lang, 0, 2);
|
|
}
|
|
|
|
if (locale_pattern_check($requested_lang) && locale_exists($requested_lang)) {
|
|
return $requested_lang;
|
|
}
|
|
}
|
|
}
|
|
|
|
if (locale_pattern_check(DEFAULT_LOCALE) && locale_exists(DEFAULT_LOCALE)) {
|
|
return DEFAULT_LOCALE;
|
|
}
|
|
|
|
return 'en';
|
|
}
|
|
|
|
function get_locale()
|
|
{
|
|
$locale = verify_param("locale", "/./", "");
|
|
|
|
// Check if locale code passed in as a param is valid
|
|
$locale_param_valid = $locale
|
|
&& locale_pattern_check($locale)
|
|
&& locale_exists($locale);
|
|
|
|
// Check if locale code stored in session data is valid
|
|
$session_locale_valid = isset($_SESSION['locale'])
|
|
&& locale_pattern_check($_SESSION['locale'])
|
|
&& locale_exists($_SESSION['locale']);
|
|
|
|
if ($locale_param_valid) {
|
|
$_SESSION['locale'] = $locale;
|
|
} elseif ($session_locale_valid) {
|
|
$locale = $_SESSION['locale'];
|
|
} else {
|
|
$locale = get_user_locale();
|
|
}
|
|
|
|
setcookie(LOCALE_COOKIE_NAME, $locale, time() + 60 * 60 * 24 * 1000, MIBEW_WEB_ROOT . "/");
|
|
|
|
return $locale;
|
|
}
|
|
|
|
function get_locale_links($href)
|
|
{
|
|
$locale_links = array();
|
|
$all_locales = get_available_locales();
|
|
if (count($all_locales) < 2) {
|
|
return null;
|
|
}
|
|
foreach ($all_locales as $k) {
|
|
$locale_links[$k] = getlocal_($k, "names");
|
|
}
|
|
|
|
return $locale_links;
|
|
}
|
|
|
|
/**
|
|
* Load localized messages id some service locale info.
|
|
*
|
|
* @global array $messages Localized messages array
|
|
* @global array $output_encoding Array of mapping locales to output encodings
|
|
*
|
|
* @param string $locale Name of a locale whose messages should be loaded.
|
|
*/
|
|
function load_messages($locale)
|
|
{
|
|
global $messages, $output_encoding;
|
|
|
|
// Load core localization
|
|
$locale_file = MIBEW_FS_ROOT . "/locales/{$locale}/properties";
|
|
$locale_data = read_locale_file($locale_file);
|
|
|
|
if (!is_null($locale_data['output_encoding'])) {
|
|
$output_encoding[$locale] = $locale_data['output_encoding'];
|
|
}
|
|
|
|
$messages[$locale] = $locale_data['messages'];
|
|
|
|
// Plugins are unavailable on system installation
|
|
if (!installation_in_progress()) {
|
|
// Load active plugins localization
|
|
$plugins_list = array_keys(PluginManager::getAllPlugins());
|
|
|
|
foreach ($plugins_list as $plugin_name) {
|
|
// Build plugin path
|
|
list($vendor_name, $plugin_short_name) = explode(':', $plugin_name, 2);
|
|
$plugin_name_parts = explode('_', $plugin_short_name);
|
|
$locale_file = MIBEW_FS_ROOT
|
|
. "/plugins/" . ucfirst($vendor_name) . "/Mibew/Plugin/"
|
|
. implode('', array_map('ucfirst', $plugin_name_parts))
|
|
. "/locales/{$locale}/properties";
|
|
|
|
// Get localized strings
|
|
if (is_readable($locale_file)) {
|
|
$locale_data = read_locale_file($locale_file);
|
|
// array_merge used to provide an ability for plugins to override
|
|
// localized strings
|
|
$messages[$locale] = array_merge(
|
|
$messages[$locale],
|
|
$locale_data['messages']
|
|
);
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Read and parse locale file.
|
|
*
|
|
* @param string $path Locale file path
|
|
* @return array Associative array with following keys:
|
|
* - 'encoding': string, one of service field from locale file, determines
|
|
* encoding of strings in the locale file. If there is no 'encoding' field in
|
|
* the locale file, this variable will be equal to $mibew_encoding.
|
|
*
|
|
* - 'output_encoding': string, one of service field from locale file,
|
|
* determines in what encoding document should be output for this locale.
|
|
* If there is no 'output_encoding' field in the locale file, this variable
|
|
* will bew equal to NULL.
|
|
*
|
|
* - 'messages': associative array of localized strings. The keys of the array
|
|
* are localization keys and the values of the array are localized strings.
|
|
* All localized strings have internal Mibew encoding(see $mibew_encoding
|
|
* value in libs/config.php).
|
|
*/
|
|
function read_locale_file($path)
|
|
{
|
|
// Set default values
|
|
$current_encoding = MIBEW_ENCODING;
|
|
$output_encoding = null;
|
|
$messages = array();
|
|
|
|
$fp = fopen($path, "r");
|
|
if ($fp === false) {
|
|
die("unable to read locale file $path");
|
|
}
|
|
while (!feof($fp)) {
|
|
$line = fgets($fp, 4096);
|
|
// Try to get key and value from locale file line
|
|
$line_parts = preg_split("/=/", $line, 2);
|
|
if (count($line_parts) == 2) {
|
|
$key = $line_parts[0];
|
|
$value = $line_parts[1];
|
|
// Check if key is service field and treat it as
|
|
// localized string otherwise
|
|
if ($key == 'encoding') {
|
|
$current_encoding = trim($value);
|
|
} elseif ($key == 'output_encoding') {
|
|
$output_encoding = trim($value);
|
|
} elseif ($current_encoding == MIBEW_ENCODING) {
|
|
$messages[$key] = str_replace("\\n", "\n", trim($value));
|
|
} else {
|
|
$messages[$key] = myiconv(
|
|
$current_encoding,
|
|
MIBEW_ENCODING,
|
|
str_replace("\\n", "\n", trim($value))
|
|
);
|
|
}
|
|
}
|
|
}
|
|
fclose($fp);
|
|
|
|
return array(
|
|
'encoding' => $current_encoding,
|
|
'output_encoding' => $output_encoding,
|
|
'messages' => $messages
|
|
);
|
|
}
|
|
|
|
function getoutputenc()
|
|
{
|
|
global $output_encoding, $messages;
|
|
if (!isset($messages[CURRENT_LOCALE])) {
|
|
load_messages(CURRENT_LOCALE);
|
|
}
|
|
|
|
return isset($output_encoding[CURRENT_LOCALE])
|
|
? $output_encoding[CURRENT_LOCALE]
|
|
: MIBEW_ENCODING;
|
|
}
|
|
|
|
function getstring_($text, $locale, $raw = false)
|
|
{
|
|
global $messages;
|
|
if (!isset($messages[$locale])) {
|
|
load_messages($locale);
|
|
}
|
|
|
|
$localized = $messages[$locale];
|
|
if (isset($localized[$text])) {
|
|
return $raw
|
|
? $localized[$text]
|
|
: sanitize_string($localized[$text], 'low', 'moderate');
|
|
}
|
|
if ($locale != 'en') {
|
|
return getstring_($text, 'en', $raw);
|
|
}
|
|
|
|
return "!" . ($raw ? $text : sanitize_string($text, 'low', 'moderate'));
|
|
}
|
|
|
|
function getstring($text, $raw = false)
|
|
{
|
|
return getstring_($text, CURRENT_LOCALE, $raw);
|
|
}
|
|
|
|
function getlocal($text, $raw = false)
|
|
{
|
|
return getlocal_($text, CURRENT_LOCALE, $raw);
|
|
}
|
|
|
|
function getlocal_($text, $locale, $raw = false)
|
|
{
|
|
$string = myiconv(
|
|
MIBEW_ENCODING,
|
|
getoutputenc(),
|
|
getstring_($text, $locale, true)
|
|
);
|
|
|
|
return $raw ? $string : sanitize_string($string, 'low', 'moderate');
|
|
}
|
|
|
|
function getstring2_($text, $params, $locale, $raw = false)
|
|
{
|
|
$string = getstring_($text, $locale, true);
|
|
for ($i = 0; $i < count($params); $i++) {
|
|
$string = str_replace("{" . $i . "}", $params[$i], $string);
|
|
}
|
|
|
|
return $raw ? $string : sanitize_string($string, 'low', 'moderate');
|
|
}
|
|
|
|
function getstring2($text, $params, $raw = false)
|
|
{
|
|
return getstring2_($text, $params, CURRENT_LOCALE, $raw);
|
|
}
|
|
|
|
function getlocal2($text, $params, $raw = false)
|
|
{
|
|
$string = myiconv(
|
|
MIBEW_ENCODING,
|
|
getoutputenc(),
|
|
getstring_($text, CURRENT_LOCALE, true)
|
|
);
|
|
|
|
for ($i = 0; $i < count($params); $i++) {
|
|
$string = str_replace("{" . $i . "}", $params[$i], $string);
|
|
}
|
|
|
|
return $raw ? $string : sanitize_string($string, 'low', 'moderate');
|
|
}
|
|
|
|
/* prepares for Javascript string */
|
|
function get_local_for_js($text, $params)
|
|
{
|
|
$string = myiconv(MIBEW_ENCODING, getoutputenc(), getstring_($text, CURRENT_LOCALE));
|
|
$string = str_replace("\"", "\\\"", str_replace("\n", "\\n", $string));
|
|
for ($i = 0; $i < count($params); $i++) {
|
|
$string = str_replace("{" . $i . "}", $params[$i], $string);
|
|
}
|
|
|
|
return sanitize_string($string, 'low', 'moderate');
|
|
}
|
|
|
|
function locale_load_id_list($name)
|
|
{
|
|
$result = array();
|
|
$fp = @fopen(MIBEW_FS_ROOT . "/locales/names/$name", "r");
|
|
if ($fp !== false) {
|
|
while (!feof($fp)) {
|
|
$line = trim(fgets($fp, 4096));
|
|
if ($line && preg_match("/^[\w_\.]+$/", $line)) {
|
|
$result[] = $line;
|
|
}
|
|
}
|
|
fclose($fp);
|
|
}
|
|
|
|
return $result;
|
|
}
|
|
|
|
function save_message($locale, $key, $value)
|
|
{
|
|
$result = "";
|
|
$added = false;
|
|
$current_encoding = MIBEW_ENCODING;
|
|
$fp = fopen(MIBEW_FS_ROOT . "/locales/$locale/properties", "r");
|
|
if ($fp === false) {
|
|
die("unable to open properties for locale $locale");
|
|
}
|
|
while (!feof($fp)) {
|
|
$line = fgets($fp, 4096);
|
|
$key_val = preg_split("/=/", $line, 2);
|
|
if (isset($key_val[1])) {
|
|
if ($key_val[0] == 'encoding') {
|
|
$current_encoding = trim($key_val[1]);
|
|
} elseif (!$added && $key_val[0] == $key) {
|
|
$line = "$key="
|
|
. myiconv(
|
|
MIBEW_ENCODING,
|
|
$current_encoding,
|
|
str_replace("\r", "", str_replace("\n", "\\n", trim($value)))
|
|
) . "\n";
|
|
$added = true;
|
|
}
|
|
}
|
|
$result .= $line;
|
|
}
|
|
fclose($fp);
|
|
if (!$added) {
|
|
$result .= "$key="
|
|
. myiconv(
|
|
MIBEW_ENCODING,
|
|
$current_encoding,
|
|
str_replace("\r", "", str_replace("\n", "\\n", trim($value)))
|
|
) . "\n";
|
|
}
|
|
$fp = @fopen(MIBEW_FS_ROOT . "/locales/$locale/properties", "w");
|
|
if ($fp !== false) {
|
|
fwrite($fp, $result);
|
|
fclose($fp);
|
|
} else {
|
|
die("cannot write /locales/$locale/properties, please check file permissions on your server");
|
|
}
|
|
$fp = @fopen(MIBEW_FS_ROOT . "/locales/$locale/properties.log", "a");
|
|
if ($fp !== false) {
|
|
$ext_addr = $_SERVER['REMOTE_ADDR'];
|
|
if (isset($_SERVER['HTTP_X_FORWARDED_FOR']) &&
|
|
$_SERVER['HTTP_X_FORWARDED_FOR'] != $_SERVER['REMOTE_ADDR']) {
|
|
$ext_addr = $_SERVER['REMOTE_ADDR'] . ' (' . $_SERVER['HTTP_X_FORWARDED_FOR'] . ')';
|
|
}
|
|
$user_browser = $_SERVER['HTTP_USER_AGENT'];
|
|
$remote_host = isset($_SERVER['REMOTE_HOST']) ? $_SERVER['REMOTE_HOST'] : $ext_addr;
|
|
|
|
fwrite($fp, "# " . date(DATE_RFC822) . " by $remote_host using $user_browser\n");
|
|
fwrite(
|
|
$fp,
|
|
("$key="
|
|
. myiconv(
|
|
MIBEW_ENCODING,
|
|
$current_encoding,
|
|
str_replace("\r", "", str_replace("\n", "\\n", trim($value)))
|
|
)
|
|
. "\n")
|
|
);
|
|
fclose($fp);
|
|
}
|
|
}
|
|
|
|
$messages = array();
|
|
$output_encoding = array();
|