Files
gallery3/modules/gallery/helpers/locales.php
Andy Staudacher 5c527513c6 Fix language preference block / language cookie reading.
The preference block must have been broken by a jquery update, and the cookie reading by a Kohana update.
2010-01-28 19:46:53 -08:00

257 lines
10 KiB
PHP

<?php defined("SYSPATH") or die("No direct script access.");
/**
* Gallery - a web based photo album viewer and editor
* Copyright (C) 2000-2009 Bharat Mediratta
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 2 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
* General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software
* Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston, MA 02110-1301, USA.
*/
/**
* This is the API for handling locales.
*/
class locales_Core {
private static $locales;
private static $language_subtag_to_locale;
/**
* Return the list of available locales.
*/
static function available() {
if (empty(self::$locales)) {
self::_init_language_data();
}
return self::$locales;
}
static function installed() {
$available = self::available();
$default = module::get_var("gallery", "default_locale");
$codes = explode("|", module::get_var("gallery", "installed_locales", $default));
foreach ($codes as $code) {
if (isset($available[$code])) {
$installed[$code] = $available[$code];
}
}
return $installed;
}
static function update_installed($locales) {
// Ensure that the default is included...
$default = module::get_var("gallery", "default_locale");
$locales = in_array($default, $locales)
? $locales
: array_merge($locales, array($default));
module::set_var("gallery", "installed_locales", join("|", $locales));
// Clear the cache
self::$locales = null;
}
// @todo Might want to add a localizable language name as well.
private static function _init_language_data() {
$l["af_ZA"] = "Afrikaans"; // Afrikaans
$l["ar_SA"] = "&#1575;&#1604;&#1593;&#1585;&#1576;&#1610;&#1577;"; // Arabic
$l["be_BY"] = "&#1041;&#1077;&#1083;&#1072;&#1088;&#1091;&#1089;&#1082;&#1110;"; // Belarusian
$l["bg_BG"] = "&#x0411;&#x044a;&#x043b;&#x0433;&#x0430;&#x0440;&#x0441;&#x043a;&#x0438;"; // Bulgarian
$l["ca_ES"] = "Catalan"; // Catalan
$l["cs_CZ"] = "&#x010c;esky"; // Czech
$l["da_DK"] = "Dansk"; // Danish
$l["de_DE"] = "Deutsch"; // German
$l["el_GR"] = "Greek"; // Greek
$l["en_GB"] = "English (UK)"; // English (UK)
$l["en_US"] = "English (US)"; // English (US)
$l["es_AR"] = "Espa&#241;ol (AR)"; // Spanish (AR)
$l["es_ES"] = "Espa&#241;ol"; // Spanish (ES)
$l["es_MX"] = "Espa&#241;ol (MX)"; // Spanish (MX)
$l["et_EE"] = "Eesti"; // Estonian
$l["eu_ES"] = "Euskara"; // Basque
$l["fa_IR"] = "&#1601;&#1575;&#1585;&#1587;&#1610;"; // Farsi
$l["fi_FI"] = "Suomi"; // Finnish
$l["fr_FR"] = "Fran&#231;ais"; // French
$l["ga_IE"] = "Gaeilge"; // Irish
$l["he_IL"] = "&#1506;&#1489;&#1512;&#1497;&#1514;"; // Hebrew
$l["hu_HU"] = "Magyar"; // Hungarian
$l["is_IS"] = "Icelandic"; // Icelandic
$l["it_IT"] = "Italiano"; // Italian
$l["ja_JP"] = "&#x65e5;&#x672c;&#x8a9e;"; // Japanese
$l["ko_KR"] = "&#xd55c;&#xad6d;&#xb9d0;"; // Korean
$l["lt_LT"] = "Lietuvi&#371;"; // Lithuanian
$l["lv_LV"] = "Latvie&#353;u"; // Latvian
$l["nl_NL"] = "Nederlands"; // Dutch
$l["no_NO"] = "Norsk bokm&#229;l"; // Norwegian
$l["pl_PL"] = "Polski"; // Polish
$l["pt_BR"] = "Portugu&#234;s Brasileiro"; // Portuguese (BR)
$l["pt_PT"] = "Portugu&#234;s"; // Portuguese (PT)
$l["ro_RO"] = "Rom&#226;n&#259;"; // Romanian
$l["ru_RU"] = "&#1056;&#1091;&#1089;&#1089;&#1082;&#1080;&#1081;"; // Russian
$l["sk_SK"] = "Sloven&#269;ina"; // Slovak
$l["sl_SI"] = "Sloven&#353;&#269;ina"; // Slovenian
$l["sr_CS"] = "Srpski"; // Serbian
$l["sv_SE"] = "Svenska"; // Swedish
$l["tr_TR"] = "T&#252;rk&#231;e"; // Turkish
$l["uk_UA"] = "Українська"; // Ukrainian
$l["vi_VN"] = "Ti&#7871;ng Vi&#7879;t"; // Vietnamese
$l["zh_CN"] = "&#31616;&#20307;&#20013;&#25991;"; // Chinese (CN)
$l["zh_TW"] = "&#32321;&#39636;&#20013;&#25991;"; // Chinese (TW)
asort($l, SORT_LOCALE_STRING);
self::$locales = $l;
// Language subtag to (default) locale mapping
foreach ($l as $locale => $name) {
list ($language) = explode("_", $locale . "_");
// The first one mentioned is the default
if (!isset($d[$language])) {
$d[$language] = $locale;
}
}
self::$language_subtag_to_locale = $d;
}
static function display_name($locale=null) {
if (empty(self::$locales)) {
self::_init_language_data();
}
$locale or $locale = Gallery_I18n::instance()->locale();
return self::$locales[$locale];
}
static function is_rtl($locale=null) {
$locale or $locale = Gallery_I18n::instance()->locale();
list ($language, $territory) = explode('_', $locale . "_");
return in_array($language, array("he", "fa", "ar"));
}
/**
* Returns the best match comparing the HTTP accept-language header
* with the installed locales.
* @todo replace this with request::accepts_language() when we upgrade to Kohana 2.4
*/
static function locale_from_http_request() {
$http_accept_language = Input::instance()->server("HTTP_ACCEPT_LANGUAGE");
if ($http_accept_language) {
// Parse the HTTP header and build a preference list
// Example value: "de,en-us;q=0.7,en-uk,fr-fr;q=0.2"
$locale_preferences = array();
foreach (explode(",", $http_accept_language) as $code) {
list ($requested_locale, $qvalue) = explode(";", $code . ";");
$requested_locale = trim($requested_locale);
$qvalue = trim($qvalue);
if (preg_match("/^([a-z]{2,3})(?:[_-]([a-zA-Z]{2}))?/", $requested_locale, $matches)) {
$requested_locale = strtolower($matches[1]);
if (!empty($matches[2])) {
$requested_locale .= "_" . strtoupper($matches[2]);
}
$requested_locale = trim(str_replace("-", "_", $requested_locale));
if (!strlen($qvalue)) {
// If not specified, default to 1.
$qvalue = 1;
} else {
// qvalue is expected to be something like "q=0.7"
list ($ignored, $qvalue) = explode("=", $qvalue . "==");
$qvalue = floatval($qvalue);
}
// Group by language to boost inexact same-language matches
list ($language) = explode("_", $requested_locale . "_");
if (!isset($locale_preferences[$language])) {
$locale_preferences[$language] = array();
}
$locale_preferences[$language][$requested_locale] = $qvalue;
}
}
// Compare and score requested locales with installed ones
$scored_locales = array();
foreach ($locale_preferences as $language => $requested_locales) {
// Inexact match adjustment (same language, different region)
$fallback_adjustment_factor = 0.95;
if (count($requested_locales) > 1) {
// Sort by qvalue, descending
$qvalues = array_values($requested_locales);
rsort($qvalues);
// Ensure inexact match scores worse than 2nd preference in same language.
$fallback_adjustment_factor *= $qvalues[1];
}
foreach ($requested_locales as $requested_locale => $qvalue) {
list ($matched_locale, $match_score) =
self::_locale_match_score($requested_locale, $qvalue, $fallback_adjustment_factor);
if ($matched_locale &&
(!isset($scored_locales[$matched_locale]) ||
$match_score > $scored_locales[$matched_locale])) {
$scored_locales[$matched_locale] = $match_score;
}
}
}
arsort($scored_locales);
list ($locale) = each($scored_locales);
return $locale;
}
return null;
}
private static function _locale_match_score($requested_locale, $qvalue, $adjustment_factor) {
$installed = self::installed();
if (isset($installed[$requested_locale])) {
return array($requested_locale, $qvalue);
}
list ($language) = explode("_", $requested_locale . "_");
if (isset(self::$language_subtag_to_locale[$language]) &&
isset($installed[self::$language_subtag_to_locale[$language]])) {
$score = $adjustment_factor * $qvalue;
return array(self::$language_subtag_to_locale[$language], $score);
}
return array(null, 0);
}
static function set_request_locale() {
// 1. Check the session specific preference (cookie)
$locale = self::cookie_locale();
// 2. Check the user's preference
if (!$locale) {
$locale = identity::active_user()->locale;
}
// 3. Check the browser's / OS' preference
if (!$locale) {
$locale = self::locale_from_http_request();
}
// If we have any preference, override the site's default locale
if ($locale) {
Gallery_I18n::instance()->locale($locale);
}
}
static function cookie_locale() {
// Can't use Input framework for client side cookies since
// they're not signed.
$cookie_data = isset($_COOKIE["g_locale"]) ? $_COOKIE["g_locale"] : null;
$locale = null;
if ($cookie_data) {
if (preg_match("/^([a-z]{2,3}(?:_[A-Z]{2})?)$/", trim($cookie_data), $matches)) {
$requested_locale = $matches[1];
$installed_locales = locales::installed();
if (isset($installed_locales[$requested_locale])) {
$locale = $requested_locale;
}
}
}
return $locale;
}
}