mirror of
https://github.com/atlanticbiomedical/portal-legacy.git
synced 2025-07-02 01:47:28 -04:00
467 lines
11 KiB
PHP
Executable File
467 lines
11 KiB
PHP
Executable File
<?php
|
|
|
|
/**
|
|
* sfMessageSource_gettext class file.
|
|
*
|
|
* This program is free software; you can redistribute it and/or modify
|
|
* it under the terms of the BSD License.
|
|
*
|
|
* Copyright(c) 2004 by Qiang Xue. All rights reserved.
|
|
*
|
|
* To contact the author write to {@link mailto:qiang.xue@gmail.com Qiang Xue}
|
|
* The latest version of PRADO can be obtained from:
|
|
* {@link http://prado.sourceforge.net/}
|
|
*
|
|
* @author Wei Zhuo <weizhuo[at]gmail[dot]com>
|
|
* @version $Id: sfMessageSource_gettext.class.php 4340 2007-06-23 06:47:05Z fabien $
|
|
* @package symfony
|
|
* @subpackage i18n
|
|
*/
|
|
|
|
/**
|
|
* sfMessageSource_gettext class.
|
|
*
|
|
* Using Gettext MO format as the message source for translation.
|
|
* The gettext classes are based on PEAR's gettext MO and PO classes.
|
|
*
|
|
* See the MessageSource::factory() method to instantiate this class.
|
|
*
|
|
* @author Xiang Wei Zhuo <weizhuo[at]gmail[dot]com>
|
|
* @version v1.0, last update on Fri Dec 24 16:18:44 EST 2004
|
|
* @package System.I18N.core
|
|
*/
|
|
class sfMessageSource_gettext extends sfMessageSource
|
|
{
|
|
/**
|
|
* Message data filename extension.
|
|
* @var string
|
|
*/
|
|
protected $dataExt = '.mo';
|
|
|
|
/**
|
|
* PO data filename extension
|
|
* @var string
|
|
*/
|
|
protected $poExt = '.po';
|
|
|
|
/**
|
|
* Separator between culture name and source.
|
|
* @var string
|
|
*/
|
|
protected $dataSeparator = '.';
|
|
|
|
function __construct($source)
|
|
{
|
|
$this->source = (string) $source;
|
|
}
|
|
|
|
/**
|
|
* Loads the messages from a MO file.
|
|
*
|
|
* @param string MO file.
|
|
* @return array of messages.
|
|
*/
|
|
protected function &loadData($filename)
|
|
{
|
|
$mo = TGettext::factory('MO',$filename);
|
|
$mo->load();
|
|
$result = $mo->toArray();
|
|
|
|
$results = array();
|
|
$count = 0;
|
|
foreach ($result['strings'] as $source => $target)
|
|
{
|
|
$results[$source][] = $target; //target
|
|
$results[$source][] = $count++; //id
|
|
$results[$source][] = ''; //comments
|
|
}
|
|
|
|
return $results;
|
|
}
|
|
|
|
/**
|
|
* Determines if the MO file source is valid.
|
|
*
|
|
* @param string MO file
|
|
* @return boolean true if valid, false otherwise.
|
|
*/
|
|
protected function isValidSource($filename)
|
|
{
|
|
return is_file($filename);
|
|
}
|
|
|
|
/**
|
|
* Gets the MO file for a specific message catalogue and cultural variant.
|
|
*
|
|
* @param string message catalogue
|
|
* @return string full path to the MO file.
|
|
*/
|
|
protected function getSource($variant)
|
|
{
|
|
return $this->source.'/'.$variant;
|
|
}
|
|
|
|
/**
|
|
* Gets the last modified unix-time for this particular catalogue+variant.
|
|
* Just use the file modified time.
|
|
*
|
|
* @param string catalogue+variant
|
|
* @return int last modified in unix-time format.
|
|
*/
|
|
protected function getLastModified($source)
|
|
{
|
|
return is_file($source) ? filemtime($source) : 0;
|
|
}
|
|
|
|
/**
|
|
* Gets all the variants of a particular catalogue.
|
|
*
|
|
* @param string catalogue name
|
|
* @return array list of all variants for this catalogue.
|
|
*/
|
|
protected function getCatalogueList($catalogue)
|
|
{
|
|
$variants = explode('_', $this->culture);
|
|
$source = $catalogue.$this->dataExt;
|
|
|
|
$catalogues = array($source);
|
|
|
|
$variant = null;
|
|
|
|
for ($i = 0, $max = count($variants); $i < $max; $i++)
|
|
{
|
|
if (strlen($variants[$i]) > 0)
|
|
{
|
|
$variant .= $variant ? '_'.$variants[$i] : $variants[$i];
|
|
$catalogues[] = $catalogue.$this->dataSeparator.$variant.$this->dataExt;
|
|
}
|
|
}
|
|
$byDir = $this->getCatalogueByDir($catalogue);
|
|
$catalogues = array_merge($byDir,array_reverse($catalogues));
|
|
|
|
return $catalogues;
|
|
}
|
|
|
|
/**
|
|
* Traverses through the directory structure to find the catalogues.
|
|
* This should only be called by getCatalogueList()
|
|
*
|
|
* @param string a particular catalogue.
|
|
* @return array a list of catalogues.
|
|
* @see getCatalogueList()
|
|
*/
|
|
protected function getCatalogueByDir($catalogue)
|
|
{
|
|
$variants = explode('_', $this->culture);
|
|
$catalogues = array();
|
|
|
|
$variant = null;
|
|
|
|
for($i = 0, $max = count($variants); $i < $max; $i++)
|
|
{
|
|
if (strlen($variants[$i]) > 0)
|
|
{
|
|
$variant .= $variant ? '_'.$variants[$i] : $variants[$i];
|
|
$catalogues[] = $variant.'/'.$catalogue.$this->dataExt;
|
|
}
|
|
}
|
|
|
|
return array_reverse($catalogues);
|
|
}
|
|
|
|
/**
|
|
* Gets the variant for a catalogue depending on the current culture.
|
|
*
|
|
* @param string catalogue
|
|
* @return string the variant.
|
|
* @see save()
|
|
* @see update()
|
|
* @see delete()
|
|
*/
|
|
protected function getVariants($catalogue = 'messages')
|
|
{
|
|
if (empty($catalogue))
|
|
{
|
|
$catalogue = 'messages';
|
|
}
|
|
|
|
foreach ($this->getCatalogueList($catalogue) as $variant)
|
|
{
|
|
$file = $this->getSource($variant);
|
|
$po = $this->getPOFile($file);
|
|
if (is_file($file) || is_file($po))
|
|
{
|
|
return array($variant, $file, $po);
|
|
}
|
|
}
|
|
|
|
return false;
|
|
}
|
|
|
|
protected function getPOFile($MOFile)
|
|
{
|
|
return substr($MOFile, 0, strlen($MOFile) - strlen($this->dataExt)).$this->poExt;
|
|
}
|
|
|
|
/**
|
|
* Saves the list of untranslated blocks to the translation source.
|
|
* If the translation was not found, you should add those
|
|
* strings to the translation source via the <b>append()</b> method.
|
|
*
|
|
* @param string the catalogue to add to
|
|
* @return boolean true if saved successfuly, false otherwise.
|
|
*/
|
|
function save($catalogue = 'messages')
|
|
{
|
|
$messages = $this->untranslated;
|
|
|
|
if (count($messages) <= 0)
|
|
{
|
|
return false;
|
|
}
|
|
|
|
$variants = $this->getVariants($catalogue);
|
|
|
|
if ($variants)
|
|
{
|
|
list($variant, $MOFile, $POFile) = $variants;
|
|
}
|
|
else
|
|
{
|
|
return false;
|
|
}
|
|
|
|
if (is_writable($MOFile) == false)
|
|
{
|
|
throw new sfException(sprintf("Unable to save to file %s, file must be writable.", $MOFile));
|
|
}
|
|
if (is_writable($POFile) == false)
|
|
{
|
|
throw new sfException(sprintf("Unable to save to file %s, file must be writable.", $POFile));
|
|
}
|
|
|
|
// set the strings as untranslated.
|
|
$strings = array();
|
|
foreach ($messages as $message)
|
|
{
|
|
$strings[$message] = '';
|
|
}
|
|
|
|
// load the PO
|
|
$po = TGettext::factory('PO',$POFile);
|
|
$po->load();
|
|
$result = $po->toArray();
|
|
|
|
$existing = count($result['strings']);
|
|
|
|
// add to strings to the existing message list
|
|
$result['strings'] = array_merge($result['strings'],$strings);
|
|
|
|
$new = count($result['strings']);
|
|
|
|
if ($new > $existing)
|
|
{
|
|
// change the date 2004-12-25 12:26
|
|
$result['meta']['PO-Revision-Date'] = @date('Y-m-d H:i:s');
|
|
|
|
$po->fromArray($result);
|
|
$mo = $po->toMO();
|
|
if ($po->save() && $mo->save($MOFile))
|
|
{
|
|
if (!empty($this->cache))
|
|
{
|
|
$this->cache->clean($variant, $this->culture);
|
|
}
|
|
|
|
return true;
|
|
}
|
|
else
|
|
{
|
|
return false;
|
|
}
|
|
}
|
|
|
|
return false;
|
|
}
|
|
|
|
/**
|
|
* Deletes a particular message from the specified catalogue.
|
|
*
|
|
* @param string the source message to delete.
|
|
* @param string the catalogue to delete from.
|
|
* @return boolean true if deleted, false otherwise.
|
|
*/
|
|
function delete($message, $catalogue = 'messages')
|
|
{
|
|
$variants = $this->getVariants($catalogue);
|
|
if ($variants)
|
|
{
|
|
list($variant, $MOFile, $POFile) = $variants;
|
|
}
|
|
else
|
|
{
|
|
return false;
|
|
}
|
|
|
|
if (is_writable($MOFile) == false)
|
|
{
|
|
throw new sfException(sprintf("Unable to modify file %s, file must be writable.", $MOFile));
|
|
}
|
|
|
|
if (is_writable($POFile) == false)
|
|
{
|
|
throw new sfException(sprintf("Unable to modify file %s, file must be writable.", $POFile));
|
|
}
|
|
|
|
$po = TGettext::factory('PO', $POFile);
|
|
$po->load();
|
|
$result = $po->toArray();
|
|
|
|
foreach ($result['strings'] as $string => $value)
|
|
{
|
|
if ($string == $message)
|
|
{
|
|
$result['meta']['PO-Revision-Date'] = @date('Y-m-d H:i:s');
|
|
unset($result['strings'][$string]);
|
|
|
|
$po->fromArray($result);
|
|
$mo = $po->toMO();
|
|
if ($po->save() && $mo->save($MOFile))
|
|
{
|
|
if (!empty($this->cache))
|
|
{
|
|
$this->cache->clean($variant, $this->culture);
|
|
}
|
|
|
|
return true;
|
|
}
|
|
else
|
|
{
|
|
return false;
|
|
}
|
|
}
|
|
}
|
|
|
|
return false;
|
|
}
|
|
|
|
/**
|
|
* Updates the translation.
|
|
*
|
|
* @param string the source string.
|
|
* @param string the new translation string.
|
|
* @param string comments
|
|
* @param string the catalogue of the translation.
|
|
* @return boolean true if translation was updated, false otherwise.
|
|
*/
|
|
function update($text, $target, $comments, $catalogue = 'messages')
|
|
{
|
|
$variants = $this->getVariants($catalogue);
|
|
if ($variants)
|
|
{
|
|
list($variant, $MOFile, $POFile) = $variants;
|
|
}
|
|
else
|
|
{
|
|
return false;
|
|
}
|
|
|
|
if (is_writable($MOFile) == false)
|
|
{
|
|
throw new sfException(sprintf("Unable to update file %s, file must be writable.", $MOFile));
|
|
}
|
|
|
|
if (is_writable($POFile) == false)
|
|
{
|
|
throw new sfException(sprintf("Unable to update file %s, file must be writable.", $POFile));
|
|
}
|
|
|
|
$po = TGettext::factory('PO',$POFile);
|
|
$po->load();
|
|
$result = $po->toArray();
|
|
|
|
foreach ($result['strings'] as $string => $value)
|
|
{
|
|
if ($string == $text)
|
|
{
|
|
$result['strings'][$string] = $target;
|
|
$result['meta']['PO-Revision-Date'] = @date('Y-m-d H:i:s');
|
|
|
|
$po->fromArray($result);
|
|
$mo = $po->toMO();
|
|
|
|
if ($po->save() && $mo->save($MOFile))
|
|
{
|
|
if (!empty($this->cache))
|
|
{
|
|
$this->cache->clean($variant, $this->culture);
|
|
}
|
|
|
|
return true;
|
|
}
|
|
else
|
|
{
|
|
return false;
|
|
}
|
|
}
|
|
}
|
|
|
|
return false;
|
|
}
|
|
|
|
/**
|
|
* Returns a list of catalogue as key and all it variants as value.
|
|
*
|
|
* @return array list of catalogues
|
|
*/
|
|
function catalogues()
|
|
{
|
|
return $this->getCatalogues();
|
|
}
|
|
|
|
/**
|
|
* Returns a list of catalogue and its culture ID. This takes care
|
|
* of directory structures.
|
|
* E.g. array('messages','en_AU')
|
|
*
|
|
* @return array list of catalogues
|
|
*/
|
|
protected function getCatalogues($dir = null, $variant = null)
|
|
{
|
|
$dir = $dir ? $dir : $this->source;
|
|
$files = scandir($dir);
|
|
|
|
$catalogue = array();
|
|
|
|
foreach ($files as $file)
|
|
{
|
|
if (is_dir($dir.'/'.$file) && preg_match('/^[a-z]{2}(_[A-Z]{2,3})?$/', $file))
|
|
{
|
|
$catalogue = array_merge($catalogue, $this->getCatalogues($dir.'/'.$file, $file));
|
|
}
|
|
|
|
$pos = strpos($file, $this->dataExt);
|
|
|
|
if ($pos > 0 && substr($file, -1 * strlen($this->dataExt)) == $this->dataExt)
|
|
{
|
|
$name = substr($file, 0, $pos);
|
|
$dot = strrpos($name, $this->dataSeparator);
|
|
$culture = $variant;
|
|
$cat = $name;
|
|
if (is_int($dot))
|
|
{
|
|
$culture = substr($name, $dot + 1, strlen($name));
|
|
$cat = substr($name, 0, $dot);
|
|
}
|
|
$details[0] = $cat;
|
|
$details[1] = $culture;
|
|
|
|
$catalogue[] = $details;
|
|
}
|
|
}
|
|
sort($catalogue);
|
|
|
|
return $catalogue;
|
|
}
|
|
}
|