|
@@ -0,0 +1,1090 @@
|
|
|
+<?php
|
|
|
+
|
|
|
+/**
|
|
|
+ * SquirrelMail internationalization functions
|
|
|
+ *
|
|
|
+ * This file contains variuos functions that are needed to do
|
|
|
+ * internationalization of SquirrelMail.
|
|
|
+ *
|
|
|
+ * Internally the output character set is used. Other characters are
|
|
|
+ * encoded using Unicode entities according to HTML 4.0.
|
|
|
+ *
|
|
|
+ * @copyright © 1999-2006 The SquirrelMail Project Team
|
|
|
+ * @license http://opensource.org/licenses/gpl-license.php GNU Public License
|
|
|
+ * @version $Id$
|
|
|
+ * @package squirrelmail
|
|
|
+ * @subpackage i18n
|
|
|
+ */
|
|
|
+
|
|
|
+
|
|
|
+/**
|
|
|
+ * Gettext bindtextdomain wrapper.
|
|
|
+ *
|
|
|
+ * Wrapper solves differences between php versions in order to provide
|
|
|
+ * ngettext support. Should be used if translation uses ngettext
|
|
|
+ * functions.
|
|
|
+ * @since 1.5.1
|
|
|
+ * @param string $domain gettext domain name
|
|
|
+ * @param string $dir directory that contains all translations
|
|
|
+ * @return string path to translation directory
|
|
|
+ */
|
|
|
+function sq_bindtextdomain($domain,$dir) {
|
|
|
+ global $l10n, $gettext_flags, $sm_notAlias;
|
|
|
+
|
|
|
+ if ($gettext_flags==7) {
|
|
|
+ // gettext extension without ngettext
|
|
|
+ if (substr($dir, -1) != '/') $dir .= '/';
|
|
|
+ $mofile=$dir . $sm_notAlias . '/LC_MESSAGES/' . $domain . '.mo';
|
|
|
+ $input = new FileReader($mofile);
|
|
|
+ $l10n[$domain] = new gettext_reader($input);
|
|
|
+ }
|
|
|
+
|
|
|
+ $dir=bindtextdomain($domain,$dir);
|
|
|
+
|
|
|
+ return $dir;
|
|
|
+}
|
|
|
+
|
|
|
+/**
|
|
|
+ * Gettext textdomain wrapper.
|
|
|
+ * Makes sure that gettext_domain global is modified.
|
|
|
+ * @since 1.5.1
|
|
|
+ * @param string $name gettext domain name
|
|
|
+ * @return string gettext domain name
|
|
|
+ */
|
|
|
+function sq_textdomain($domain) {
|
|
|
+ global $gettext_domain;
|
|
|
+ $gettext_domain=textdomain($domain);
|
|
|
+ return $gettext_domain;
|
|
|
+}
|
|
|
+
|
|
|
+/**
|
|
|
+ * php setlocale function wrapper
|
|
|
+ *
|
|
|
+ * From php 4.3.0 it is possible to use arrays in order to set locale.
|
|
|
+ * php gettext extension works only when locale is set. This wrapper
|
|
|
+ * function allows to use more than one locale name.
|
|
|
+ *
|
|
|
+ * @param int $category locale category name. Use php named constants
|
|
|
+ * (LC_ALL, LC_COLLATE, LC_CTYPE, LC_MONETARY, LC_NUMERIC, LC_TIME)
|
|
|
+ * @param mixed $locale option contains array with possible locales or string with one locale
|
|
|
+ * @return string name of set locale or false, if all locales fail.
|
|
|
+ * @since 1.5.1 and 1.4.5
|
|
|
+ * @see http://www.php.net/setlocale
|
|
|
+ */
|
|
|
+function sq_setlocale($category,$locale) {
|
|
|
+ // string with only one locale
|
|
|
+ if (is_string($locale))
|
|
|
+ return setlocale($category,$locale);
|
|
|
+
|
|
|
+ if (! check_php_version(4,3)) {
|
|
|
+ $ret=false;
|
|
|
+ $index=0;
|
|
|
+ while ( ! $ret && $index<count($locale)) {
|
|
|
+ $ret=setlocale($category,$locale[$index]);
|
|
|
+ $index++;
|
|
|
+ }
|
|
|
+ } else {
|
|
|
+ // php 4.3.0 or better, use entire array
|
|
|
+ $ret=setlocale($category,$locale);
|
|
|
+ }
|
|
|
+ return $ret;
|
|
|
+}
|
|
|
+
|
|
|
+/**
|
|
|
+ * Converts string from given charset to charset, that can be displayed by user translation.
|
|
|
+ *
|
|
|
+ * Function by default returns html encoded strings, if translation uses different encoding.
|
|
|
+ * If Japanese translation is used - function returns string converted to euc-jp
|
|
|
+ * If iconv or recode functions are enabled and translation uses utf-8 - function returns utf-8 encoded string.
|
|
|
+ * If $charset is not supported - function returns unconverted string.
|
|
|
+ *
|
|
|
+ * sanitizing of html tags is also done by this function.
|
|
|
+ *
|
|
|
+ * @param string $charset
|
|
|
+ * @param string $string Text to be decoded
|
|
|
+ * @param boolean $force_decode converts string to html without $charset!=$default_charset check.
|
|
|
+ * Argument is available since 1.5.1 and 1.4.5.
|
|
|
+ * @param boolean $save_html disables htmlspecialchars() in order to preserve
|
|
|
+ * html formating. Use with care. Available since 1.5.1
|
|
|
+ * @return string decoded string
|
|
|
+ */
|
|
|
+function charset_decode ($charset, $string, $force_decode=false, $save_html=false) {
|
|
|
+ global $languages, $squirrelmail_language, $default_charset;
|
|
|
+ global $use_php_recode, $use_php_iconv, $aggressive_decoding;
|
|
|
+
|
|
|
+ if (isset($languages[$squirrelmail_language]['XTRA_CODE']) &&
|
|
|
+ function_exists($languages[$squirrelmail_language]['XTRA_CODE'] . '_decode')) {
|
|
|
+ $string = call_user_func($languages[$squirrelmail_language]['XTRA_CODE'] . '_decode', $string);
|
|
|
+ }
|
|
|
+
|
|
|
+ $charset = strtolower($charset);
|
|
|
+
|
|
|
+ set_my_charset();
|
|
|
+
|
|
|
+ // Variables that allow to use functions without function_exist() calls
|
|
|
+ if (! isset($use_php_recode) || $use_php_recode=="" ) {
|
|
|
+ $use_php_recode=false; }
|
|
|
+ if (! isset($use_php_iconv) || $use_php_iconv=="" ) {
|
|
|
+ $use_php_iconv=false; }
|
|
|
+
|
|
|
+ // Don't do conversion if charset is the same.
|
|
|
+ if ( ! $force_decode && $charset == strtolower($default_charset) )
|
|
|
+ return ($save_html ? $string : htmlspecialchars($string));
|
|
|
+
|
|
|
+ // catch iso-8859-8-i thing
|
|
|
+ if ( $charset == "iso-8859-8-i" )
|
|
|
+ $charset = "iso-8859-8";
|
|
|
+
|
|
|
+ /*
|
|
|
+ * Recode converts html special characters automatically if you use
|
|
|
+ * 'charset..html' decoding. There is no documented way to put -d option
|
|
|
+ * into php recode function call.
|
|
|
+ */
|
|
|
+ if ( $use_php_recode ) {
|
|
|
+ if ( $default_charset == "utf-8" ) {
|
|
|
+ // other charsets can be converted to utf-8 without loss.
|
|
|
+ // and output string is smaller
|
|
|
+ $string = recode_string($charset . "..utf-8",$string);
|
|
|
+ return ($save_html ? $string : htmlspecialchars($string));
|
|
|
+ } else {
|
|
|
+ $string = recode_string($charset . "..html",$string);
|
|
|
+ // recode does not convert single quote, htmlspecialchars does.
|
|
|
+ $string = str_replace("'", ''', $string);
|
|
|
+ // undo html specialchars
|
|
|
+ if ($save_html)
|
|
|
+ $string=str_replace(array('&','"','<','>'),
|
|
|
+ array('&','"','<','>'),$string);
|
|
|
+ return $string;
|
|
|
+ }
|
|
|
+ }
|
|
|
+
|
|
|
+ // iconv functions does not have html target and can be used only with utf-8
|
|
|
+ if ( $use_php_iconv && $default_charset=='utf-8') {
|
|
|
+ $string = iconv($charset,$default_charset,$string);
|
|
|
+ return ($save_html ? $string : htmlspecialchars($string));
|
|
|
+ }
|
|
|
+
|
|
|
+ // If we don't use recode and iconv, we'll do it old way.
|
|
|
+
|
|
|
+ /* All HTML special characters are 7 bit and can be replaced first */
|
|
|
+ if (! $save_html) $string = htmlspecialchars ($string);
|
|
|
+
|
|
|
+ /* controls cpu and memory intensive decoding cycles */
|
|
|
+ if (! isset($aggressive_decoding) || $aggressive_decoding=="" ) {
|
|
|
+ $aggressive_decoding=false; }
|
|
|
+
|
|
|
+ $decode=fixcharset($charset);
|
|
|
+ $decodefile=SM_PATH . 'functions/decode/' . $decode . '.php';
|
|
|
+ if (file_exists($decodefile)) {
|
|
|
+ include_once($decodefile);
|
|
|
+ // send $save_html argument to decoding function. needed for iso-2022-xx decoding.
|
|
|
+ $ret = call_user_func('charset_decode_'.$decode, $string, $save_html);
|
|
|
+ } else {
|
|
|
+ $ret = $string;
|
|
|
+ }
|
|
|
+ return( $ret );
|
|
|
+}
|
|
|
+
|
|
|
+/**
|
|
|
+ * Converts html string to given charset
|
|
|
+ * @since 1.5.1 and 1.4.4
|
|
|
+ * @param string $string
|
|
|
+ * @param string $charset
|
|
|
+ * @param boolean $htmlencode keep htmlspecialchars encoding
|
|
|
+ * @param string
|
|
|
+ */
|
|
|
+function charset_encode($string,$charset,$htmlencode=true) {
|
|
|
+ global $default_charset;
|
|
|
+
|
|
|
+ $encode=fixcharset($charset);
|
|
|
+ $encodefile=SM_PATH . 'functions/encode/' . $encode . '.php';
|
|
|
+ if (file_exists($encodefile)) {
|
|
|
+ include_once($encodefile);
|
|
|
+ $ret = call_user_func('charset_encode_'.$encode, $string);
|
|
|
+ } elseif(file_exists(SM_PATH . 'functions/encode/us_ascii.php')) {
|
|
|
+ // function replaces all 8bit html entities with question marks.
|
|
|
+ // it is used when other encoding functions are unavailable
|
|
|
+ include_once(SM_PATH . 'functions/encode/us_ascii.php');
|
|
|
+ $ret = charset_encode_us_ascii($string);
|
|
|
+ } else {
|
|
|
+ /**
|
|
|
+ * fix for yahoo users that remove all us-ascii related things
|
|
|
+ */
|
|
|
+ $ret = $string;
|
|
|
+ }
|
|
|
+
|
|
|
+ /**
|
|
|
+ * Undo html special chars, some places (like compose form) have
|
|
|
+ * own sanitizing functions and don't need html symbols.
|
|
|
+ * Undo chars only after encoding in order to prevent conversion of
|
|
|
+ * html entities in plain text emails.
|
|
|
+ */
|
|
|
+ if (! $htmlencode ) {
|
|
|
+ $ret = str_replace(array('&','>','<','"'),array('&','>','<','"'),$ret);
|
|
|
+ }
|
|
|
+ return( $ret );
|
|
|
+}
|
|
|
+
|
|
|
+/**
|
|
|
+ * Combined decoding and encoding functions
|
|
|
+ *
|
|
|
+ * If conversion is done to charset different that utf-8, unsupported symbols
|
|
|
+ * will be replaced with question marks.
|
|
|
+ * @since 1.5.1 and 1.4.4
|
|
|
+ * @param string $in_charset initial charset
|
|
|
+ * @param string $string string that has to be converted
|
|
|
+ * @param string $out_charset final charset
|
|
|
+ * @param boolean $htmlencode keep htmlspecialchars encoding
|
|
|
+ * @return string converted string
|
|
|
+ */
|
|
|
+function charset_convert($in_charset,$string,$out_charset,$htmlencode=true) {
|
|
|
+ $string=charset_decode($in_charset,$string,true);
|
|
|
+ $string=sqi18n_convert_entities($string);
|
|
|
+ $string=charset_encode($string,$out_charset,$htmlencode);
|
|
|
+ return $string;
|
|
|
+}
|
|
|
+
|
|
|
+/**
|
|
|
+ * Makes charset name suitable for decoding cycles
|
|
|
+ *
|
|
|
+ * @since 1.5.0 and 1.4.4
|
|
|
+ * @param string $charset Name of charset
|
|
|
+ * @return string $charset Adjusted name of charset
|
|
|
+ */
|
|
|
+function fixcharset($charset) {
|
|
|
+ /* remove minus and characters that might be used in paths from charset
|
|
|
+ * name in order to be able to use it in function names and include calls.
|
|
|
+ */
|
|
|
+ $charset=preg_replace("/[-:.\/\\\]/",'_',$charset);
|
|
|
+
|
|
|
+ // OE ks_c_5601_1987 > cp949
|
|
|
+ $charset=str_replace('ks_c_5601_1987','cp949',$charset);
|
|
|
+ // Moz x-euc-tw > euc-tw
|
|
|
+ $charset=str_replace('x_euc','euc',$charset);
|
|
|
+ // Moz x-windows-949 > cp949
|
|
|
+ $charset=str_replace('x_windows_','cp',$charset);
|
|
|
+
|
|
|
+ // windows-125x and cp125x charsets
|
|
|
+ $charset=str_replace('windows_','cp',$charset);
|
|
|
+
|
|
|
+ // ibm > cp
|
|
|
+ $charset=str_replace('ibm','cp',$charset);
|
|
|
+
|
|
|
+ // iso-8859-8-i -> iso-8859-8
|
|
|
+ // use same cycle until I'll find differences
|
|
|
+ $charset=str_replace('iso_8859_8_i','iso_8859_8',$charset);
|
|
|
+
|
|
|
+ return $charset;
|
|
|
+}
|
|
|
+
|
|
|
+/**
|
|
|
+ * Set up the language to be output
|
|
|
+ * if $do_search is true, then scan the browser information
|
|
|
+ * for a possible language that we know
|
|
|
+ *
|
|
|
+ * Function sets system locale environment (LC_ALL, LANG, LANGUAGE),
|
|
|
+ * gettext translation bindings and html header information.
|
|
|
+ *
|
|
|
+ * Function returns error codes, if there is some fatal error.
|
|
|
+ * 0 = no error,
|
|
|
+ * 1 = mbstring support is not present,
|
|
|
+ * 2 = mbstring support is not present, user's translation reverted to en_US.
|
|
|
+ *
|
|
|
+ * @param string $sm_language translation used by user's interface
|
|
|
+ * @param bool $do_search use browser's preferred language detection functions. Defaults to false.
|
|
|
+ * @param bool $default set $sm_language to $squirrelmail_default_language if language detection fails or language is not set. Defaults to false.
|
|
|
+ * @return int function execution error codes.
|
|
|
+ */
|
|
|
+function set_up_language($sm_language, $do_search = false, $default = false) {
|
|
|
+
|
|
|
+ static $SetupAlready = 0;
|
|
|
+ global $use_gettext, $languages,
|
|
|
+ $squirrelmail_language, $squirrelmail_default_language, $default_charset,
|
|
|
+ $sm_notAlias, $username, $data_dir;
|
|
|
+
|
|
|
+ if ($SetupAlready) {
|
|
|
+ return;
|
|
|
+ }
|
|
|
+
|
|
|
+ $SetupAlready = TRUE;
|
|
|
+ sqgetGlobalVar('HTTP_ACCEPT_LANGUAGE', $accept_lang, SQ_SERVER);
|
|
|
+
|
|
|
+ /**
|
|
|
+ * If function is asked to detect preferred language
|
|
|
+ * OR squirrelmail default language is set to empty string
|
|
|
+ * AND
|
|
|
+ * squirrelmail language ($sm_language) is empty string
|
|
|
+ * (not set in user's prefs and no cookie with language info)
|
|
|
+ * AND
|
|
|
+ * browser provides list of preferred languages
|
|
|
+ * THEN
|
|
|
+ * get preferred language from HTTP_ACCEPT_LANGUAGE header
|
|
|
+ */
|
|
|
+ if (($do_search || empty($squirrelmail_default_language)) &&
|
|
|
+ ! $sm_language &&
|
|
|
+ isset($accept_lang)) {
|
|
|
+ // TODO: use more than one language, if first language is not available
|
|
|
+ // FIXME: function assumes that string contains two or more characters.
|
|
|
+ // FIXME: some languages use 5 chars
|
|
|
+ $sm_language = substr($accept_lang, 0, 2);
|
|
|
+ }
|
|
|
+
|
|
|
+ /**
|
|
|
+ * If language preference is not set OR script asks to use default language
|
|
|
+ * AND
|
|
|
+ * default squirrelmail language is not set to empty string
|
|
|
+ * THEN
|
|
|
+ * use default squirrelmail language value from configuration.
|
|
|
+ */
|
|
|
+ if ((!$sm_language||$default) &&
|
|
|
+ ! empty($squirrelmail_default_language)) {
|
|
|
+ $squirrelmail_language = $squirrelmail_default_language;
|
|
|
+ $sm_language = $squirrelmail_default_language;
|
|
|
+ }
|
|
|
+
|
|
|
+ /** provide failsafe language when detection fails */
|
|
|
+ if (! $sm_language) $sm_language='en_US';
|
|
|
+
|
|
|
+ $sm_notAlias = $sm_language;
|
|
|
+
|
|
|
+ // Catching removed translation
|
|
|
+ // System reverts to English translation if user prefs contain translation
|
|
|
+ // that is not available in $languages array
|
|
|
+ if (!isset($languages[$sm_notAlias])) {
|
|
|
+ $sm_notAlias="en_US";
|
|
|
+ }
|
|
|
+
|
|
|
+ while (isset($languages[$sm_notAlias]['ALIAS'])) {
|
|
|
+ $sm_notAlias = $languages[$sm_notAlias]['ALIAS'];
|
|
|
+ }
|
|
|
+
|
|
|
+ if ( isset($sm_language) &&
|
|
|
+ $use_gettext &&
|
|
|
+ $sm_language != '' &&
|
|
|
+ isset($languages[$sm_notAlias]['CHARSET']) ) {
|
|
|
+ sq_bindtextdomain( 'squirrelmail', SM_PATH . 'locale/' );
|
|
|
+ sq_textdomain( 'squirrelmail' );
|
|
|
+
|
|
|
+ // set codeset in order to avoid gettext charset conversions
|
|
|
+ if (function_exists('bind_textdomain_codeset')) {
|
|
|
+ // Japanese translation uses different internal charset
|
|
|
+ if ($sm_notAlias == 'ja_JP') {
|
|
|
+ bind_textdomain_codeset ('squirrelmail', 'EUC-JP');
|
|
|
+ } else {
|
|
|
+ bind_textdomain_codeset ('squirrelmail', $languages[$sm_notAlias]['CHARSET'] );
|
|
|
+ }
|
|
|
+ }
|
|
|
+
|
|
|
+ // Use LOCALE key, if it is set.
|
|
|
+ if (isset($languages[$sm_notAlias]['LOCALE'])){
|
|
|
+ $longlocale=$languages[$sm_notAlias]['LOCALE'];
|
|
|
+ } else {
|
|
|
+ $longlocale=$sm_notAlias;
|
|
|
+ }
|
|
|
+
|
|
|
+ // try setting locale
|
|
|
+ $retlocale=sq_setlocale(LC_ALL, $longlocale);
|
|
|
+
|
|
|
+ // check if locale is set and assign that locale to $longlocale
|
|
|
+ // in order to use it in putenv calls.
|
|
|
+ if (! is_bool($retlocale)) {
|
|
|
+ $longlocale=$retlocale;
|
|
|
+ } elseif (is_array($longlocale)) {
|
|
|
+ // setting of all locales failed.
|
|
|
+ // we need string instead of array used in LOCALE key.
|
|
|
+ $longlocale=$sm_notAlias;
|
|
|
+ }
|
|
|
+
|
|
|
+ if ( !((bool)ini_get('safe_mode')) &&
|
|
|
+ getenv( 'LC_ALL' ) != $longlocale ) {
|
|
|
+ putenv( "LC_ALL=$longlocale" );
|
|
|
+ putenv( "LANG=$longlocale" );
|
|
|
+ putenv( "LANGUAGE=$longlocale" );
|
|
|
+ putenv( "LC_NUMERIC=C" );
|
|
|
+ if ($sm_notAlias=='tr_TR') putenv( "LC_CTYPE=C" );
|
|
|
+ }
|
|
|
+ // Workaround for plugins that use numbers with floating point
|
|
|
+ // It might be removed if plugins use correct decimal delimiters
|
|
|
+ // according to locale settings.
|
|
|
+ setlocale(LC_NUMERIC, 'C');
|
|
|
+ // Workaround for specific Turkish strtolower/strtoupper rules.
|
|
|
+ // Many functions expect English conversion rules.
|
|
|
+ if ($sm_notAlias=='tr_TR') setlocale(LC_CTYPE,'C');
|
|
|
+
|
|
|
+ /**
|
|
|
+ * Set text direction/alignment variables
|
|
|
+ * When language environment is setup, scripts can use these globals
|
|
|
+ * without accessing $languages directly and making checks for optional
|
|
|
+ * array key.
|
|
|
+ */
|
|
|
+ global $text_direction, $left_align, $right_align;
|
|
|
+ if (isset($languages[$sm_notAlias]['DIR']) &&
|
|
|
+ $languages[$sm_notAlias]['DIR'] == 'rtl') {
|
|
|
+ /**
|
|
|
+ * Text direction
|
|
|
+ * @global string $text_direction
|
|
|
+ */
|
|
|
+ $text_direction='rtl';
|
|
|
+ /**
|
|
|
+ * Left alignment
|
|
|
+ * @global string $left_align
|
|
|
+ */
|
|
|
+ $left_align='right';
|
|
|
+ /**
|
|
|
+ * Right alignment
|
|
|
+ * @global string $right_align
|
|
|
+ */
|
|
|
+ $right_align='left';
|
|
|
+ } else {
|
|
|
+ $text_direction='ltr';
|
|
|
+ $left_align='left';
|
|
|
+ $right_align='right';
|
|
|
+ }
|
|
|
+
|
|
|
+ $squirrelmail_language = $sm_notAlias;
|
|
|
+ if ($squirrelmail_language == 'ja_JP') {
|
|
|
+ header ('Content-Type: text/html; charset=EUC-JP');
|
|
|
+ if (!function_exists('mb_internal_encoding')) {
|
|
|
+ // Error messages can't be displayed here
|
|
|
+ $error = 1;
|
|
|
+ // Revert to English if possible.
|
|
|
+ if (function_exists('setPref') && $username!='' && $data_dir!="") {
|
|
|
+ setPref($data_dir, $username, 'language', "en_US");
|
|
|
+ $error = 2;
|
|
|
+ }
|
|
|
+ // stop further execution in order not to get php errors on mb_internal_encoding().
|
|
|
+ return $error;
|
|
|
+ }
|
|
|
+ if (function_exists('mb_language')) {
|
|
|
+ mb_language('Japanese');
|
|
|
+ }
|
|
|
+ mb_internal_encoding('EUC-JP');
|
|
|
+ mb_http_output('pass');
|
|
|
+ } elseif ($squirrelmail_language == 'en_US') {
|
|
|
+ header( 'Content-Type: text/html; charset=' . $default_charset );
|
|
|
+ } else {
|
|
|
+ header( 'Content-Type: text/html; charset=' . $languages[$sm_notAlias]['CHARSET'] );
|
|
|
+ }
|
|
|
+ /**
|
|
|
+ * mbstring.func_overload fix (#929644).
|
|
|
+ *
|
|
|
+ * php mbstring extension can replace standard string functions with their multibyte
|
|
|
+ * equivalents. See http://www.php.net/ref.mbstring#mbstring.overload. This feature
|
|
|
+ * was added in php v.4.2.0
|
|
|
+ *
|
|
|
+ * Some SquirrelMail functions work with 8bit strings in bytes. If interface is forced
|
|
|
+ * to use mbstring functions and mbstring internal encoding is set to multibyte charset,
|
|
|
+ * interface can't trust regular string functions. Due to mbstring overloading design
|
|
|
+ * limits php scripts can't control this setting.
|
|
|
+ *
|
|
|
+ * This hack should fix some issues related to 8bit strings in passwords. Correct fix is
|
|
|
+ * to disable mbstring overloading. Japanese translation uses different internal encoding.
|
|
|
+ */
|
|
|
+ if ($squirrelmail_language != 'ja_JP' &&
|
|
|
+ function_exists('mb_internal_encoding') &&
|
|
|
+ check_php_version(4,2,0) &&
|
|
|
+ (int)ini_get('mbstring.func_overload')!=0) {
|
|
|
+ mb_internal_encoding('pass');
|
|
|
+ }
|
|
|
+ }
|
|
|
+ return 0;
|
|
|
+}
|
|
|
+
|
|
|
+/**
|
|
|
+ * Sets default_charset variable according to the one that is used by user's translations.
|
|
|
+ *
|
|
|
+ * Function changes global $default_charset variable in order to be sure, that it
|
|
|
+ * contains charset used by user's translation. Sanity of $squirrelmail_language
|
|
|
+ * and $default_charset combination is also tested.
|
|
|
+ *
|
|
|
+ * There can be a $default_charset setting in the
|
|
|
+ * config.php file, but the user may have a different language
|
|
|
+ * selected for a user interface. This function checks the
|
|
|
+ * language selected by the user and tags the outgoing messages
|
|
|
+ * with the appropriate charset corresponding to the language
|
|
|
+ * selection. This is "more right" (tm), than just stamping the
|
|
|
+ * message blindly with the system-wide $default_charset.
|
|
|
+ */
|
|
|
+function set_my_charset(){
|
|
|
+ global $data_dir, $username, $default_charset, $languages, $squirrelmail_language;
|
|
|
+
|
|
|
+ $my_language = getPref($data_dir, $username, 'language');
|
|
|
+ if (!$my_language) {
|
|
|
+ $my_language = $squirrelmail_language ;
|
|
|
+ }
|
|
|
+ // Catch removed translation
|
|
|
+ if (!isset($languages[$my_language])) {
|
|
|
+ $my_language="en_US";
|
|
|
+ }
|
|
|
+ while (isset($languages[$my_language]['ALIAS'])) {
|
|
|
+ $my_language = $languages[$my_language]['ALIAS'];
|
|
|
+ }
|
|
|
+ $my_charset = $languages[$my_language]['CHARSET'];
|
|
|
+ if ($my_language!='en_US') {
|
|
|
+ $default_charset = $my_charset;
|
|
|
+ }
|
|
|
+}
|
|
|
+
|
|
|
+/**
|
|
|
+ * Replaces non-braking spaces inserted by some browsers with regular space
|
|
|
+ *
|
|
|
+ * This function can be used to replace non-braking space symbols
|
|
|
+ * that are inserted in forms by some browsers instead of normal
|
|
|
+ * space symbol.
|
|
|
+ *
|
|
|
+ * @param string $string Text that needs to be cleaned
|
|
|
+ * @param string $charset Charset used in text
|
|
|
+ * @return string Cleaned text
|
|
|
+ */
|
|
|
+function cleanup_nbsp($string,$charset) {
|
|
|
+
|
|
|
+ // reduce number of case statements
|
|
|
+ if (stristr('iso-8859-',substr($charset,0,9))){
|
|
|
+ $output_charset="iso-8859-x";
|
|
|
+ }
|
|
|
+ if (stristr('windows-125',substr($charset,0,11))){
|
|
|
+ $output_charset="cp125x";
|
|
|
+ }
|
|
|
+ if (stristr('koi8',substr($charset,0,4))){
|
|
|
+ $output_charset="koi8-x";
|
|
|
+ }
|
|
|
+ if (! isset($output_charset)){
|
|
|
+ $output_charset=strtolower($charset);
|
|
|
+ }
|
|
|
+
|
|
|
+// where is non-braking space symbol
|
|
|
+switch($output_charset):
|
|
|
+ case "iso-8859-x":
|
|
|
+ case "cp125x":
|
|
|
+ case "iso-2022-jp":
|
|
|
+ $nbsp="\xA0";
|
|
|
+ break;
|
|
|
+ case "koi8-x":
|
|
|
+ $nbsp="\x9A";
|
|
|
+ break;
|
|
|
+ case "utf-8":
|
|
|
+ $nbsp="\xC2\xA0";
|
|
|
+ break;
|
|
|
+ default:
|
|
|
+ // don't change string if charset is unmatched
|
|
|
+ return $string;
|
|
|
+endswitch;
|
|
|
+
|
|
|
+// return space instead of non-braking space.
|
|
|
+ return str_replace($nbsp,' ',$string);
|
|
|
+}
|
|
|
+
|
|
|
+/**
|
|
|
+ * Function informs if it is safe to convert given charset to the one that is used by user.
|
|
|
+ *
|
|
|
+ * It is safe to use conversion only if user uses utf-8 encoding and when
|
|
|
+ * converted charset is similar to the one that is used by user.
|
|
|
+ *
|
|
|
+ * @param string $input_charset Charset of text that needs to be converted
|
|
|
+ * @return bool is it possible to convert to user's charset
|
|
|
+ */
|
|
|
+function is_conversion_safe($input_charset) {
|
|
|
+ global $languages, $sm_notAlias, $default_charset, $lossy_encoding;
|
|
|
+
|
|
|
+ if (isset($lossy_encoding) && $lossy_encoding )
|
|
|
+ return true;
|
|
|
+
|
|
|
+ // convert to lower case
|
|
|
+ $input_charset = strtolower($input_charset);
|
|
|
+
|
|
|
+ // Is user's locale Unicode based ?
|
|
|
+ if ( $default_charset == "utf-8" ) {
|
|
|
+ return true;
|
|
|
+ }
|
|
|
+
|
|
|
+ // Charsets that are similar
|
|
|
+ switch ($default_charset) {
|
|
|
+ case "windows-1251":
|
|
|
+ if ( $input_charset == "iso-8859-5" ||
|
|
|
+ $input_charset == "koi8-r" ||
|
|
|
+ $input_charset == "koi8-u" ) {
|
|
|
+ return true;
|
|
|
+ } else {
|
|
|
+ return false;
|
|
|
+ }
|
|
|
+ case "windows-1257":
|
|
|
+ if ( $input_charset == "iso-8859-13" ||
|
|
|
+ $input_charset == "iso-8859-4" ) {
|
|
|
+ return true;
|
|
|
+ } else {
|
|
|
+ return false;
|
|
|
+ }
|
|
|
+ case "iso-8859-4":
|
|
|
+ if ( $input_charset == "iso-8859-13" ||
|
|
|
+ $input_charset == "windows-1257" ) {
|
|
|
+ return true;
|
|
|
+ } else {
|
|
|
+ return false;
|
|
|
+ }
|
|
|
+ case "iso-8859-5":
|
|
|
+ if ( $input_charset == "windows-1251" ||
|
|
|
+ $input_charset == "koi8-r" ||
|
|
|
+ $input_charset == "koi8-u" ) {
|
|
|
+ return true;
|
|
|
+ } else {
|
|
|
+ return false;
|
|
|
+ }
|
|
|
+ case "iso-8859-13":
|
|
|
+ if ( $input_charset == "iso-8859-4" ||
|
|
|
+ $input_charset == "windows-1257" ) {
|
|
|
+ return true;
|
|
|
+ } else {
|
|
|
+ return false;
|
|
|
+ }
|
|
|
+ case "koi8-r":
|
|
|
+ if ( $input_charset == "windows-1251" ||
|
|
|
+ $input_charset == "iso-8859-5" ||
|
|
|
+ $input_charset == "koi8-u" ) {
|
|
|
+ return true;
|
|
|
+ } else {
|
|
|
+ return false;
|
|
|
+ }
|
|
|
+ case "koi8-u":
|
|
|
+ if ( $input_charset == "windows-1251" ||
|
|
|
+ $input_charset == "iso-8859-5" ||
|
|
|
+ $input_charset == "koi8-r" ) {
|
|
|
+ return true;
|
|
|
+ } else {
|
|
|
+ return false;
|
|
|
+ }
|
|
|
+ default:
|
|
|
+ return false;
|
|
|
+ }
|
|
|
+}
|
|
|
+
|
|
|
+/**
|
|
|
+ * Converts html character entities to numeric entities
|
|
|
+ *
|
|
|
+ * SquirrelMail encoding functions work only with numeric entities.
|
|
|
+ * This function fixes issues with decoding functions that might convert
|
|
|
+ * some symbols to character entities. Issue is specific to PHP recode
|
|
|
+ * extension decoding. Function is used internally in charset_convert()
|
|
|
+ * function.
|
|
|
+ * @param string $str string that might contain html character entities
|
|
|
+ * @return string string with character entities converted to decimals.
|
|
|
+ * @since 1.5.2
|
|
|
+ */
|
|
|
+function sqi18n_convert_entities($str) {
|
|
|
+
|
|
|
+ $entities = array(
|
|
|
+ // Latin 1
|
|
|
+ ' ' => ' ',
|
|
|
+ '¡' => '¡',
|
|
|
+ '¢' => '¢',
|
|
|
+ '£' => '£',
|
|
|
+ '¤' => '¤',
|
|
|
+ '¥' => '¥',
|
|
|
+ '¦' => '¦',
|
|
|
+ '§' => '§',
|
|
|
+ '¨' => '¨',
|
|
|
+ '©' => '©',
|
|
|
+ 'ª' => 'ª',
|
|
|
+ '«' => '«',
|
|
|
+ '¬' => '¬',
|
|
|
+ '­' => '­',
|
|
|
+ '®' => '®',
|
|
|
+ '¯' => '¯',
|
|
|
+ '°' => '°',
|
|
|
+ '±' => '±',
|
|
|
+ '²' => '²',
|
|
|
+ '³' => '³',
|
|
|
+ '´' => '´',
|
|
|
+ 'µ' => 'µ',
|
|
|
+ '¶' => '¶',
|
|
|
+ '·' => '·',
|
|
|
+ '¸' => '¸',
|
|
|
+ '¹' => '¹',
|
|
|
+ 'º' => 'º',
|
|
|
+ '»' => '»',
|
|
|
+ '¼' => '¼',
|
|
|
+ '½' => '½',
|
|
|
+ '¾' => '¾',
|
|
|
+ '¿' => '¿',
|
|
|
+ 'À' => 'À',
|
|
|
+ 'Á' => 'Á',
|
|
|
+ 'Â' => 'Â',
|
|
|
+ 'Ã' => 'Ã',
|
|
|
+ 'Ä' => 'Ä',
|
|
|
+ 'Å' => 'Å',
|
|
|
+ 'Æ' => 'Æ',
|
|
|
+ 'Ç' => 'Ç',
|
|
|
+ 'È' => 'È',
|
|
|
+ 'É' => 'É',
|
|
|
+ 'Ê' => 'Ê',
|
|
|
+ 'Ë' => 'Ë',
|
|
|
+ 'Ì' => 'Ì',
|
|
|
+ 'Í' => 'Í',
|
|
|
+ 'Î' => 'Î',
|
|
|
+ 'Ï' => 'Ï',
|
|
|
+ 'Ð' => 'Ð',
|
|
|
+ 'Ñ' => 'Ñ',
|
|
|
+ 'Ò' => 'Ò',
|
|
|
+ 'Ó' => 'Ó',
|
|
|
+ 'Ô' => 'Ô',
|
|
|
+ 'Õ' => 'Õ',
|
|
|
+ 'Ö' => 'Ö',
|
|
|
+ '×' => '×',
|
|
|
+ 'Ø' => 'Ø',
|
|
|
+ 'Ù' => 'Ù',
|
|
|
+ 'Ú' => 'Ú',
|
|
|
+ 'Û' => 'Û',
|
|
|
+ 'Ü' => 'Ü',
|
|
|
+ 'Ý' => 'Ý',
|
|
|
+ 'Þ' => 'Þ',
|
|
|
+ 'ß' => 'ß',
|
|
|
+ 'à' => 'à',
|
|
|
+ 'á' => 'á',
|
|
|
+ 'â' => 'â',
|
|
|
+ 'ã' => 'ã',
|
|
|
+ 'ä' => 'ä',
|
|
|
+ 'å' => 'å',
|
|
|
+ 'æ' => 'æ',
|
|
|
+ 'ç' => 'ç',
|
|
|
+ 'è' => 'è',
|
|
|
+ 'é' => 'é',
|
|
|
+ 'ê' => 'ê',
|
|
|
+ 'ë' => 'ë',
|
|
|
+ 'ì' => 'ì',
|
|
|
+ 'í' => 'í',
|
|
|
+ 'î' => 'î',
|
|
|
+ 'ï' => 'ï',
|
|
|
+ 'ð' => 'ð',
|
|
|
+ 'ñ' => 'ñ',
|
|
|
+ 'ò' => 'ò',
|
|
|
+ 'ó' => 'ó',
|
|
|
+ 'ô' => 'ô',
|
|
|
+ 'õ' => 'õ',
|
|
|
+ 'ö' => 'ö',
|
|
|
+ '÷' => '÷',
|
|
|
+ 'ø' => 'ø',
|
|
|
+ 'ù' => 'ù',
|
|
|
+ 'ú' => 'ú',
|
|
|
+ 'û' => 'û',
|
|
|
+ 'ü' => 'ü',
|
|
|
+ 'ý' => 'ý',
|
|
|
+ 'þ' => 'þ',
|
|
|
+ 'ÿ' => 'ÿ',
|
|
|
+ // Latin Extended-A
|
|
|
+ 'Œ' => 'Œ',
|
|
|
+ 'œ' => 'œ',
|
|
|
+ 'Š' => 'Š',
|
|
|
+ 'š' => 'š',
|
|
|
+ 'Ÿ' => 'Ÿ',
|
|
|
+ // Spacing Modifier Letters
|
|
|
+ 'ˆ' => 'ˆ',
|
|
|
+ '˜' => '˜',
|
|
|
+ // General Punctuation
|
|
|
+ ' ' => ' ',
|
|
|
+ ' ' => ' ',
|
|
|
+ ' ' => ' ',
|
|
|
+ '‌' => '‌',
|
|
|
+ '‍' => '‍',
|
|
|
+ '‎' => '‎',
|
|
|
+ '‏' => '‏',
|
|
|
+ '–' => '–',
|
|
|
+ '—' => '—',
|
|
|
+ '‘' => '‘',
|
|
|
+ '’' => '’',
|
|
|
+ '‚' => '‚',
|
|
|
+ '“' => '“',
|
|
|
+ '”' => '”',
|
|
|
+ '„' => '„',
|
|
|
+ '†' => '†',
|
|
|
+ '‡' => '‡',
|
|
|
+ '‰' => '‰',
|
|
|
+ '‹' => '‹',
|
|
|
+ '›' => '›',
|
|
|
+ '€' => '€',
|
|
|
+ // Latin Extended-B
|
|
|
+ 'ƒ' => 'ƒ',
|
|
|
+ // Greek
|
|
|
+ 'Α' => 'Α',
|
|
|
+ 'Β' => 'Β',
|
|
|
+ 'Γ' => 'Γ',
|
|
|
+ 'Δ' => 'Δ',
|
|
|
+ 'Ε' => 'Ε',
|
|
|
+ 'Ζ' => 'Ζ',
|
|
|
+ 'Η' => 'Η',
|
|
|
+ 'Θ' => 'Θ',
|
|
|
+ 'Ι' => 'Ι',
|
|
|
+ 'Κ' => 'Κ',
|
|
|
+ 'Λ' => 'Λ',
|
|
|
+ 'Μ' => 'Μ',
|
|
|
+ 'Ν' => 'Ν',
|
|
|
+ 'Ξ' => 'Ξ',
|
|
|
+ 'Ο' => 'Ο',
|
|
|
+ 'Π' => 'Π',
|
|
|
+ 'Ρ' => 'Ρ',
|
|
|
+ 'Σ' => 'Σ',
|
|
|
+ 'Τ' => 'Τ',
|
|
|
+ 'Υ' => 'Υ',
|
|
|
+ 'Φ' => 'Φ',
|
|
|
+ 'Χ' => 'Χ',
|
|
|
+ 'Ψ' => 'Ψ',
|
|
|
+ 'Ω' => 'Ω',
|
|
|
+ 'α' => 'α',
|
|
|
+ 'β' => 'β',
|
|
|
+ 'γ' => 'γ',
|
|
|
+ 'δ' => 'δ',
|
|
|
+ 'ε' => 'ε',
|
|
|
+ 'ζ' => 'ζ',
|
|
|
+ 'η' => 'η',
|
|
|
+ 'θ' => 'θ',
|
|
|
+ 'ι' => 'ι',
|
|
|
+ 'κ' => 'κ',
|
|
|
+ 'λ' => 'λ',
|
|
|
+ 'μ' => 'μ',
|
|
|
+ 'ν' => 'ν',
|
|
|
+ 'ξ' => 'ξ',
|
|
|
+ 'ο' => 'ο',
|
|
|
+ 'π' => 'π',
|
|
|
+ 'ρ' => 'ρ',
|
|
|
+ 'ς' => 'ς',
|
|
|
+ 'σ' => 'σ',
|
|
|
+ 'τ' => 'τ',
|
|
|
+ 'υ' => 'υ',
|
|
|
+ 'φ' => 'φ',
|
|
|
+ 'χ' => 'χ',
|
|
|
+ 'ψ' => 'ψ',
|
|
|
+ 'ω' => 'ω',
|
|
|
+ 'ϑ' => 'ϑ',
|
|
|
+ 'ϒ' => 'ϒ',
|
|
|
+ 'ϖ' => 'ϖ',
|
|
|
+ // General Punctuation
|
|
|
+ '•' => '•',
|
|
|
+ '…' => '…',
|
|
|
+ '′' => '′',
|
|
|
+ '″' => '″',
|
|
|
+ '‾' => '‾',
|
|
|
+ '⁄' => '⁄',
|
|
|
+ // Letterlike Symbols
|
|
|
+ '℘' => '℘',
|
|
|
+ 'ℑ' => 'ℑ',
|
|
|
+ 'ℜ' => 'ℜ',
|
|
|
+ '™' => '™',
|
|
|
+ 'ℵ' => 'ℵ',
|
|
|
+ // Arrows
|
|
|
+ '←' => '←',
|
|
|
+ '↑' => '↑',
|
|
|
+ '→' => '→',
|
|
|
+ '↓' => '↓',
|
|
|
+ '↔' => '↔',
|
|
|
+ '↵' => '↵',
|
|
|
+ '⇐' => '⇐',
|
|
|
+ '⇑' => '⇑',
|
|
|
+ '⇒' => '⇒',
|
|
|
+ '⇓' => '⇓',
|
|
|
+ '⇔' => '⇔',
|
|
|
+ // Mathematical Operators
|
|
|
+ '∀' => '∀',
|
|
|
+ '∂' => '∂',
|
|
|
+ '∃' => '∃',
|
|
|
+ '∅' => '∅',
|
|
|
+ '∇' => '∇',
|
|
|
+ '∈' => '∈',
|
|
|
+ '∉' => '∉',
|
|
|
+ '∋' => '∋',
|
|
|
+ '∏' => '∏',
|
|
|
+ '∑' => '∑',
|
|
|
+ '−' => '−',
|
|
|
+ '∗' => '∗',
|
|
|
+ '√' => '√',
|
|
|
+ '∝' => '∝',
|
|
|
+ '∞' => '∞',
|
|
|
+ '∠' => '∠',
|
|
|
+ '∧' => '∧',
|
|
|
+ '∨' => '∨',
|
|
|
+ '∩' => '∩',
|
|
|
+ '∪' => '∪',
|
|
|
+ '∫' => '∫',
|
|
|
+ '∴' => '∴',
|
|
|
+ '∼' => '∼',
|
|
|
+ '≅' => '≅',
|
|
|
+ '≈' => '≈',
|
|
|
+ '≠' => '≠',
|
|
|
+ '≡' => '≡',
|
|
|
+ '≤' => '≤',
|
|
|
+ '≥' => '≥',
|
|
|
+ '⊂' => '⊂',
|
|
|
+ '⊃' => '⊃',
|
|
|
+ '⊄' => '⊄',
|
|
|
+ '⊆' => '⊆',
|
|
|
+ '⊇' => '⊇',
|
|
|
+ '⊕' => '⊕',
|
|
|
+ '⊗' => '⊗',
|
|
|
+ '⊥' => '⊥',
|
|
|
+ '⋅' => '⋅',
|
|
|
+ // Miscellaneous Technical
|
|
|
+ '⌈' => '⌈',
|
|
|
+ '⌉' => '⌉',
|
|
|
+ '⌊' => '⌊',
|
|
|
+ '⌋' => '⌋',
|
|
|
+ '⟨' => '〈',
|
|
|
+ '⟩' => '〉',
|
|
|
+ // Geometric Shapes
|
|
|
+ '◊' => '◊',
|
|
|
+ // Miscellaneous Symbols
|
|
|
+ '♠' => '♠',
|
|
|
+ '♣' => '♣',
|
|
|
+ '♥' => '♥',
|
|
|
+ '♦' => '♦');
|
|
|
+
|
|
|
+ $str = str_replace(array_keys($entities), array_values($entities), $str);
|
|
|
+
|
|
|
+ return $str;
|
|
|
+}
|
|
|
+
|
|
|
+/* ------------------------------ main --------------------------- */
|
|
|
+
|
|
|
+global $squirrelmail_language, $languages, $use_gettext;
|
|
|
+
|
|
|
+if (! sqgetGlobalVar('squirrelmail_language',$squirrelmail_language,SQ_COOKIE)) {
|
|
|
+ $squirrelmail_language = '';
|
|
|
+}
|
|
|
+
|
|
|
+/**
|
|
|
+ * Array specifies the available translations.
|
|
|
+ *
|
|
|
+ * Structure of array:
|
|
|
+ * $languages['language']['variable'] = 'value'
|
|
|
+ *
|
|
|
+ * Possible 'variable' names:
|
|
|
+ * NAME - Translation name in English
|
|
|
+ * CHARSET - Encoding used by translation
|
|
|
+ * ALIAS - used when 'language' is only short name and 'value' should provide long language name
|
|
|
+ * ALTNAME - Native translation name. Any 8bit symbols must be html encoded.
|
|
|
+ * LOCALE - Full locale name (in xx_XX.charset format). It can use array with more than one locale name since 1.4.5 and 1.5.1
|
|
|
+ * DIR - Text direction. Used to define Right-to-Left languages. Possible values 'rtl' or 'ltr'. If undefined - defaults to 'ltr'
|
|
|
+ * XTRA_CODE - translation uses special functions. See doc/i18n.txt
|
|
|
+ *
|
|
|
+ * Each 'language' definition requires NAME+CHARSET or ALIAS variables.
|
|
|
+ *
|
|
|
+ * @name $languages
|
|
|
+ * @global array $languages
|
|
|
+ */
|
|
|
+$languages['en_US']['NAME'] = 'English';
|
|
|
+$languages['en_US']['CHARSET'] = 'iso-8859-1';
|
|
|
+$languages['en_US']['LOCALE'] = 'en_US.ISO8859-1';
|
|
|
+$languages['en']['ALIAS'] = 'en_US';
|
|
|
+
|
|
|
+/**
|
|
|
+ * Automatic translation loading from setup.php files.
|
|
|
+ * Solution for bug. 1240889.
|
|
|
+ * setup.php file can contain $languages array entries and XTRA_CODE functions.
|
|
|
+ */
|
|
|
+if (is_dir(SM_PATH . 'locale') &&
|
|
|
+ is_readable(SM_PATH . 'locale')) {
|
|
|
+ $localedir = dir(SM_PATH . 'locale');
|
|
|
+ while($lang_dir=$localedir->read()) {
|
|
|
+ // remove trailing slash, if present
|
|
|
+ if (substr($lang_dir,-1)=='/') {
|
|
|
+ $lang_dir = substr($lang_dir,0,-1);
|
|
|
+ }
|
|
|
+ if ($lang_dir != '..' && $lang_dir != '.' && $lang_dir != 'CVS' &&
|
|
|
+ is_dir(SM_PATH.'locale/'.$lang_dir) &&
|
|
|
+ file_exists(SM_PATH.'locale/'.$lang_dir.'/setup.php')) {
|
|
|
+ include_once(SM_PATH.'locale/'.$lang_dir.'/setup.php');
|
|
|
+ }
|
|
|
+ }
|
|
|
+ $localedir->close();
|
|
|
+}
|
|
|
+
|
|
|
+/* Detect whether gettext is installed. */
|
|
|
+$gettext_flags = 0;
|
|
|
+if (function_exists('_')) {
|
|
|
+ $gettext_flags += 1;
|
|
|
+}
|
|
|
+if (function_exists('bindtextdomain')) {
|
|
|
+ $gettext_flags += 2;
|
|
|
+}
|
|
|
+if (function_exists('textdomain')) {
|
|
|
+ $gettext_flags += 4;
|
|
|
+}
|
|
|
+if (function_exists('ngettext')) {
|
|
|
+ $gettext_flags += 8;
|
|
|
+}
|
|
|
+
|
|
|
+/* If gettext is fully loaded, cool */
|
|
|
+if ($gettext_flags == 15) {
|
|
|
+ $use_gettext = true;
|
|
|
+}
|
|
|
+
|
|
|
+/* If ngettext support is missing, load it */
|
|
|
+elseif ($gettext_flags == 7) {
|
|
|
+ $use_gettext = true;
|
|
|
+ // load internal ngettext functions
|
|
|
+ include_once(SM_PATH . 'class/l10n.class.php');
|
|
|
+ include_once(SM_PATH . 'functions/ngettext.php');
|
|
|
+}
|
|
|
+
|
|
|
+/* If we can fake gettext, try that */
|
|
|
+elseif ($gettext_flags == 0) {
|
|
|
+ $use_gettext = true;
|
|
|
+ include_once(SM_PATH . 'functions/gettext.php');
|
|
|
+} else {
|
|
|
+ /* Uh-ho. A weird install */
|
|
|
+ if (! $gettext_flags & 1) {
|
|
|
+ /**
|
|
|
+ * Function is used as replacement in broken installs
|
|
|
+ * @ignore
|
|
|
+ */
|
|
|
+ function _($str) {
|
|
|
+ return $str;
|
|
|
+ }
|
|
|
+ }
|
|
|
+ if (! $gettext_flags & 2) {
|
|
|
+ /**
|
|
|
+ * Function is used as replacement in broken installs
|
|
|
+ * @ignore
|
|
|
+ */
|
|
|
+ function bindtextdomain() {
|
|
|
+ return;
|
|
|
+ }
|
|
|
+ }
|
|
|
+ if (! $gettext_flags & 4) {
|
|
|
+ /**
|
|
|
+ * Function is used as replacemet in broken installs
|
|
|
+ * @ignore
|
|
|
+ */
|
|
|
+ function textdomain() {
|
|
|
+ return;
|
|
|
+ }
|
|
|
+ }
|
|
|
+ if (! $gettext_flags & 8) {
|
|
|
+ /**
|
|
|
+ * Function is used as replacemet in broken installs
|
|
|
+ * @ignore
|
|
|
+ */
|
|
|
+ function ngettext($str,$str2,$number) {
|
|
|
+ if ($number>1) {
|
|
|
+ return $str2;
|
|
|
+ } else {
|
|
|
+ return $str;
|
|
|
+ }
|
|
|
+ }
|
|
|
+ }
|
|
|
+ if (! function_exists('dgettext')) {
|
|
|
+ /**
|
|
|
+ * Replacement for broken setups.
|
|
|
+ * @ignore
|
|
|
+ */
|
|
|
+ function dgettext($domain,$str) {
|
|
|
+ return $str;
|
|
|
+ }
|
|
|
+ }
|
|
|
+ if (! function_exists('dngettext')) {
|
|
|
+ /**
|
|
|
+ * Replacement for broken setups
|
|
|
+ * @ignore
|
|
|
+ */
|
|
|
+ function dngettext($domain,$str1,$strn,$number) {
|
|
|
+ return ($number==1 ? $str1 : $strn);
|
|
|
+ }
|
|
|
+ }
|
|
|
+}
|
|
|
+?>
|