cakephp2-php8/cake/libs/i18n.php
phpnut 3eac55449e Adding function to basics.php to allow specifying a catalog to use for translation.
This should be used when LC_MESSAGES does not contain the translation strings.
Added doc comments to I18n and I10n classes.
Refactored I18n class

git-svn-id: https://svn.cakephp.org/repo/branches/1.2.x.x@4188 3807eeeb-6ff5-0310-8944-8be069107fe0
2006-12-25 04:42:47 +00:00

499 lines
No EOL
13 KiB
PHP

<?php
/* SVN FILE: $Id$ */
/**
* Short description for file.
*
* Long description for file
*
* PHP versions 4 and 5
*
* CakePHP : Rapid Development Framework <http://www.cakephp.org/>
* Copyright (c) 2006, Cake Software Foundation, Inc.
* 1785 E. Sahara Avenue, Suite 490-204
* Las Vegas, Nevada 89104
*
* Licensed under The MIT License
* Redistributions of files must retain the above copyright notice.
*
* @filesource
* @copyright Copyright (c) 2006, Cake Software Foundation, Inc.
* @link http://www.cakefoundation.org/projects/info/cakephp CakePHP Project
* @package cake
* @subpackage cake.cake.libs
* @since CakePHP v 1.2.0.4116
* @version $Revision$
* @modifiedby $LastChangedBy$
* @lastmodified $Date$
* @license http://www.opensource.org/licenses/mit-license.php The MIT License
*/
/**
* Included libraries.
*/
uses('l10n');
/**
* Short description for file.
*
* Long description for file
*
* @package cake
* @subpackage cake.cake.libs
*/
class I18n extends Object {
/**
* Instance of the I10n class for localization
*
* @var object
* @access private
*/
var $__l10n = null;
/**
* The locale for current translation
*
* @var string
* @access public
*/
var $locale = null;
/**
* Translation strings for a specific domain read from the .mo or .po files
*
* @var array
* @access private
*/
var $__domains = array();
/**
* Set to true when I18N::__bindTextDomain() is called for the first time.
* If a translation file is found it is set to false again
*
* @var boolean
* @access private
*/
var $__noLocale = false;
/**
* Set to true when I18N::__bindTextDomain() is called for the first time.
* If a translation file is found it is set to false again
*
* @var array
* @access private
*/
var $__categories = array('LC_CTYPE', 'LC_NUMERIC', 'LC_TIME', 'LC_COLLATE', 'LC_MONETARY', 'LC_MESSAGES', 'LC_ALL');
/**
* Return a static instance of the I18n class
*
* @return object I18n
* @access public
*/
function &getInstance() {
static $instance = array();
if (!$instance) {
$instance[0] =& new I18n();
$instance[0]->__l10n =& new L10n();
}
return $instance[0];
}
/**
*
* Used by the translation functions in basics.php
* Can also be used like I18n::translate(); but only if the uses('i18n'); has been used to load the class.
*
* @param string $singular
* @param string $plural
* @param string $domain
* @param string $category
* @param integer $count
* @param string $directory
* @return translated strings.
* @access public
*/
function translate($singular, $plural = null, $domain = null, $category, $count = null, $directory) {
$_this =& I18n::getInstance();
$_this->category = $_this->__categories[$category];
if(is_null($domain) && $_this->__l10n->found === false) {
$language = Configure::read('Config.language');
if($language === null && !empty($_SESSION['Config']['language'])) {
$language = $_SESSION['Config']['language'];
}
$_this->__l10n->get($language);
$_this->locale = $_this->__l10n->locale;
}
if(is_null($domain)) {
if (preg_match('/views{0,1}\\'.DS.'([^\/]*)/', $directory, $regs)) {
$domain = $regs[1];
$directory = null;
} elseif (preg_match('/controllers{0,1}\\'.DS.'([^\/]*)/', $directory, $regs)) {
$domain = ($regs[1]);
$directory = null;
}
if(isset($domain) && $domain == 'templates') {
if (preg_match('/templates{0,1}\\'.DS.'([^\/]*)/', $directory, $regs)) {
$domain = ($regs[1]);
$directory = null;
}
}
}
if(!isset($_this->__domains[$_this->category][$domain])) {
$_this->__bindTextDomain($domain, $directory);
}
if (!isset($count)) {
$pli = 0;
} elseif (!empty($_this->__domains[$_this->category][$domain]["%plural-c"]) && $_this->__noLocale === false) {
$ph = $_this->__domains[$_this->category][$domain]["%plural-c"];
$pli = $_this->__pluralGuess($ph, $count);
} else {
if ($count != 1) {
$pli = 1;
} else {
$pli = 0;
}
}
if(!empty($_this->__domains[$_this->category][$domain][$singular])) {
if (($trans = $_this->__domains[$_this->category][$domain][$singular]) || ($pli) && ($trans = $_this->__domains[$_this->category][$domain][$plural])) {
if (is_array($trans)) {
if (!isset($trans[$pli])) {
$pli = 0;
}
$trans = $trans[$pli];
}
if (strlen($trans)) {
$singular = $trans;
return $singular;
}
}
}
if(!empty($pli)) {
return($plural);
}
return($singular);
}
/**
* Attempts to find the plural form of a string.
*
* @param string $type
* @param integrer $n
* @return plural match
* @access private
*/
function __pluralGuess(&$type, $n) {
if (is_string($type)) {
if (($type == "nplurals=1;plural=0;") || !strlen($type)) {
$type = -1;
} elseif ($type == "nplurals=2;plural=n!=1;") {
$type = 1;
} elseif ($type == "nplurals=2;plural=n>1;") {
$type = 2;
} elseif (strpos($type, "n%100!=11")) {
if (strpos($type, "n!=0")) {
$type = 21;
}
if (strpos($type, "n%10<=4")) {
$type = 22;
}
if (strpos($type, "n%10>=2")) {
$type = 23;
}
} elseif (strpos($type, "n<=4")) {
$type = 25;
} elseif (strpos($type, "n==2")) {
$type = 31;
} elseif (strpos($type, "n%10>=2")) {
$type = 26;
} elseif (strpos($type, "n%100==3")) {
$type = 28;
} elseif (strpos($type, ";plural=n;")) {
$type = 7;
} else {
$type = 0;
}
}
switch ($type) {
case -1:
return (0);
case 1:
if ($n != 1) {
return (1);
}
return (0);
case 2:
if ($n > 1) {
return (1);
}
return (0);
case 7:
return ($n);
case 21:
if (($n % 10 == 1) && ($n % 100 != 11)) {
return (0);
}
if ($n != 0 ) {
return (1);
}
return (2);
case 22:
if (($n % 10 == 1) && ($n % 100 != 11)) {
return (0);
}
if (($n % 10 >= 2) && ($n % 10 <= 4) && ($n % 100 < 10 || $n % 100 >= 20)) {
return (1);
}
return (2);
case 23:
if (($n % 10 == 1) && ($n % 100 != 11)) {
return (0);
}
if (($n %10 >= 2) && ($n % 100 < 10 || $n % 100 >= 20)) {
return (1);
}
return (2);
case 25:
if ($n==1) {
return (0);
}
if ($n >= 2 && $n <= 4) {
return (1);
}
return (2);
case 26:
if ($n==1) {
return (0);
}
if ($n % 10 >= 2 && $n % 10 <= 4 && ($n % 100 < 10 || $n % 100 >= 20)) {
return (1);
}
return (2);
case 28:
if ($n % 100 == 1) {
return (0);
}
if ($n % 100 == 2 || $n % 100 == 3 || $n % 100 == 4) {
return (2);
}
return (3);
case 31:
if ($n == 1) {
return (0);
}
if ($n == 2) {
return (1);
}
return (2);
default:
$type = -1;
}
return(0);
}
/**
* Binds the given domain to a file in the specified directory.
* If directory is null, will attempt to search default locations.
*
* @param string $domain
* @return string
* @access private
*/
function __bindTextDomain($domain, $directory = null) {
$_this =& I18n::getInstance();
$_this->__noLocale = true;
if(is_null($directory)) {
$searchPath[] = APP . 'locale';
$searchPath[] = CAKE_CORE_INCLUDE_PATH . DS . 'cake' . DS . 'locale';
} else {
$searchPath[] = $directory;
}
foreach ($searchPath as $directory) {
foreach ($_this->__l10n->languagePath as $lang) {
$file = $directory . DS . $lang . DS . $_this->category . DS . $domain;
$default = APP . 'locale'. DS . $lang . DS . $_this->category . DS . 'default';
$core = CAKE_CORE_INCLUDE_PATH . DS . 'cake' . DS . 'locale'. DS . $lang . DS . $_this->category . DS . 'core';
if (file_exists($fn = "$file.mo") && ($f = fopen($fn, "rb"))) {
$_this->__loadMo($f, $domain);
$_this->__noLocale = false;
break 2;
} elseif (file_exists($fn = "$default.mo") && ($f = fopen($fn, "rb"))) {
$_this->__loadMo($f, $domain);
$_this->__noLocale = false;
break 2;
} elseif (file_exists($fn = "$file.po") && ($f = fopen($fn, "r"))) {
$_this->__loadPo($f, $domain);
$_this->__noLocale = false;
break 2;
} elseif (file_exists($fn = "$default.po") && ($f = fopen($fn, "r"))) {
$_this->__loadPo($f, $domain);
$_this->__noLocale = false;
break 2;
} elseif (file_exists($fn = "$core.mo") && ($f = fopen($fn, "rb"))) {
$_this->__loadMo($f, $domain);
$_this->__noLocale = false;
break 2;
} elseif (file_exists($fn = "$core.po") && ($f = fopen($fn, "r"))) {
$_this->__loadPo($f, $domain);
$_this->__noLocale = false;
break 2;
}
}
}
if(empty($_this->__domains[$_this->category][$domain])) {
return($domain);
}
if ($head = $_this->__domains[$_this->category][$domain][""]) {
foreach (explode("\n", $head) as $line) {
$header = strtok($line,":");
$line = trim(strtok("\n"));
$_this->__domains[$_this->category][$domain]["%po-header"][strtolower($header)] = $line;
}
if(isset($_this->__domains[$_this->category][$domain]["%po-header"]["plural-forms"])) {
$switch = preg_replace("/[(){}\\[\\]^\\s*\\]]+/", "", $_this->__domains[$_this->category][$domain]["%po-header"]["plural-forms"]);
$_this->__domains[$_this->category][$domain]["%plural-c"] = $switch;
}
}
return($domain);
}
/**
*
* Loads the binary .mo file for translation and sets the values for this translation in the var I18n::__domains
*
* @param resource $file
* @param string $domain
* @access private
*/
function __loadMo($file, $domain) {
$_this =& I18n::getInstance();
$data = fread($file, 1<<20);
fclose($file);
if ($data) {
$header = substr($data, 0, 20);
$header = unpack("L1magic/L1version/L1count/L1o_msg/L1o_trn", $header);
extract($header);
if ((dechex($magic) == "950412de") && ($version == 0)) {
for ($n = 0; $n < $count; $n++) {
$r = unpack("L1len/L1offs", substr($data, $o_msg + $n * 8, 8));
$msgid = substr($data, $r["offs"], $r["len"]);
unset($msgid_plural);
if (strpos($msgid, "\000")) {
list($msgid, $msgid_plural) = explode("\000", $msgid);
}
$r = unpack("L1len/L1offs", substr($data, $o_trn + $n * 8, 8));
$msgstr = substr($data, $r["offs"], $r["len"]);
if (strpos($msgstr, "\000")) {
$msgstr = explode("\000", $msgstr);
}
$_this->__domains[$_this->category][$domain][$msgid] = $msgstr;
if (isset($msgid_plural)) {
$_this->__domains[$_this->category][$domain][$msgid_plural] = &$_this->__domains[$_this->category][$domain][$msgid];
}
}
}
}
}
/**
* Loads the text .po file for translation and sets the values for this translation in the var I18n::__domains
*
* @param resource $file
* @param string $domain
* @return unknown
* @access private
*/
function __loadPo($file, $domain) {
$_this =& I18n::getInstance();
$type = 0;
$translations = array();
$translationKey = "";
$plural = 0;
$header = "";
do {
$line = trim(fgets($file, 1024));
if ($line == "" || $line[0] == "#") {
continue;
}
if (preg_match("/msgid[[:space:]]+\"(.+)\"$/i", $line, $regs)) {
$type = 1;
$translationKey = stripcslashes($regs[1]);
} elseif (preg_match("/msgid[[:space:]]+\"\"$/i", $line, $regs)) {
$type = 2;
$translationKey = "";
} elseif (preg_match("/^\"(.*)\"$/i", $line, $regs) && ($type == 1 || $type == 2 || $type == 3)) {
$type = 3;
$translationKey .= stripcslashes($regs[1]);
} elseif (preg_match("/msgstr[[:space:]]+\"(.+)\"$/i", $line, $regs) && ($type == 1 || $type == 3) && $translationKey) {
$translations[$translationKey] = stripcslashes($regs[1]);
$type = 4;
} elseif (preg_match("/msgstr[[:space:]]+\"\"$/i", $line, $regs) && ($type == 1 || $type == 3) && $translationKey) {
$type = 4;
$translations[$translationKey] = "";
} elseif (preg_match("/^\"(.*)\"$/i", $line, $regs) && $type == 4 && $translationKey) {
$translations[$translationKey] .= stripcslashes($regs[1]);
} elseif (preg_match("/msgid_plural[[:space:]]+\".*\"$/i", $line, $regs)) {
$type = 6;
} elseif (preg_match("/msgstr\[(\d+)\][[:space:]]+\"(.+)\"$/i", $line, $regs) && ($type == 6) && $translationKey) {
$plural = $regs[1];
$translations[$translationKey][$plural] = stripcslashes($regs[2]);
$type = 6;
} elseif (preg_match("/msgstr\[(\d+)\][[:space:]]+\"\"$/i", $line, $regs) && ($type == 6) && $translationKey) {
$plural = $regs[1];
$translations[$translationKey][$plural] = "";
$type = 6;
} elseif (preg_match("/^\"(.*)\"$/i", $line, $regs) && $type == 6 && $translationKey) {
$translations[$translationKey][$plural] .= stripcslashes($regs[1]);
} elseif (preg_match("/msgstr[[:space:]]+\"(.+)\"$/i", $line, $regs) && $type == 2 && !$translationKey) {
$header = stripcslashes($regs[1]);
$type = 5;
} elseif (preg_match("/msgstr[[:space:]]+\"\"$/i", $line, $regs) && !$translationKey) {
$header = "";
$type = 5;
} elseif (preg_match("/^\"(.*)\"$/i", $line, $regs) && $type == 5) {
$header .= stripcslashes($regs[1]);
} else {
unset($translations[$translationKey]);
$type = 0;
$translationKey = "";
$plural = 0;
}
} while (!feof($file));
fclose($file);
$merge[""] = $header;
return $_this->__domains[$_this->category][$domain] = array_merge($merge ,$translations);
}
/**
* Not implemented
*
* @param string $domain
* @param string $codeset
* @return unknown
* @access private
* @todo Not implemented
*/
function __bindTextDomainCodeset($domain, $codeset = null) {
return($domain);
}
}
?>