You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
192 lines
6.9 KiB
192 lines
6.9 KiB
<?php
|
|
|
|
// (c) Copyright by authors of the Tiki Wiki CMS Groupware Project
|
|
//
|
|
// All Rights Reserved. See copyright.txt for details and a complete list of authors.
|
|
// Licensed under the GNU LESSER GENERAL PUBLIC LICENSE. See license.txt for details.
|
|
// $Id$
|
|
|
|
require_once('Language.php');
|
|
|
|
/**
|
|
* @package Tiki
|
|
* @subpackage Language
|
|
* Class to update language.php file with new
|
|
* collected strings.
|
|
*/
|
|
class Language_WriteFile
|
|
{
|
|
/**
|
|
* Representation of the language file.
|
|
* @var Language_File
|
|
*/
|
|
protected $parseFile;
|
|
|
|
/**
|
|
* Path to a language.php file
|
|
* @var string
|
|
*/
|
|
protected $filePath;
|
|
|
|
/**
|
|
* Path to temporary language file.
|
|
* @var string
|
|
*/
|
|
protected $tmpFilePath;
|
|
|
|
/**
|
|
* Current language translations.
|
|
* @var array
|
|
*/
|
|
protected $translations;
|
|
|
|
public function __construct(Language_File $parseFile)
|
|
{
|
|
$this->parseFile = $parseFile;
|
|
$this->filePath = $parseFile->filePath;
|
|
$this->tmpFilePath = $this->filePath . '.tmp';
|
|
|
|
if (! is_writable($this->filePath)) {
|
|
throw new Language_Exception("Can't write to file $this->filePath.");
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Update language.php file with new strings.
|
|
*
|
|
* @param array $strings English strings collected from source files
|
|
* @param bool $outputFiles whether file paths were string was found should be included or not in the output
|
|
* @param string $language current language being processed
|
|
* @return null
|
|
*/
|
|
public function writeStringsToFile(array $strings, $outputFiles = false, string $language = "")
|
|
{
|
|
if (empty($strings)) {
|
|
return false;
|
|
}
|
|
|
|
// backup original language file
|
|
copy($this->filePath, $this->filePath . '.old');
|
|
|
|
$this->translations = $this->parseFile->getTranslations();
|
|
|
|
$entries = [];
|
|
foreach ($strings as $string) {
|
|
if (isset($this->translations[$string['name']])) {
|
|
$string['translation'] = $this->translations[$string['name']];
|
|
} else {
|
|
// Handle punctuations at the end of the string (cf. comments in lib/init/tra.php)
|
|
// For example, if the string is 'Login:', we put 'Login' for translation instead
|
|
// (except if we already have an explicit translation for 'Login:', in which case we don't reach this else)
|
|
$stringLength = strlen($string['name']);
|
|
$stringLastChar = $string['name'][$stringLength - 1];
|
|
|
|
if (in_array($stringLastChar, Language::punctuations)) {
|
|
$trimmedString = substr($string['name'], 0, $stringLength - 1);
|
|
$string['name'] = $trimmedString;
|
|
if (isset($this->translations[$trimmedString])) {
|
|
$string['translation'] = $this->translations[$trimmedString];
|
|
}
|
|
}
|
|
}
|
|
$entries[$string['name']] = $string;
|
|
}
|
|
|
|
|
|
$handle = fopen($this->tmpFilePath, 'w');
|
|
|
|
if ($handle) {
|
|
fwrite($handle, "<?php\n");
|
|
fwrite($handle, $this->fileHeader());
|
|
if ($language != "en") {
|
|
fwrite($handle, "include('lang/en/language.php'); // Needed for providing a sensible default text for untranslated strings with context like : \"edit_C(verb)\"\n");
|
|
fwrite($handle, "\$lang_current = array(\n"); // do not use short array syntax here yet for Transifex.com translation resource import (till they add support for the PHP short array syntax)
|
|
} else {
|
|
fwrite($handle, "\$lang = array(\n"); // do not use short array syntax here yet for Transifex.com translation resource import (till they add support for the PHP short array syntax)
|
|
}
|
|
|
|
foreach ($entries as $entry) {
|
|
fwrite($handle, $this->formatString($entry, $outputFiles, $language));
|
|
}
|
|
|
|
fwrite($handle, ");\n");
|
|
if ($language != "en") {
|
|
fwrite($handle, "\$lang = array_replace(\$lang, \$lang_current);\n");
|
|
}
|
|
fclose($handle);
|
|
}
|
|
|
|
rename($this->tmpFilePath, $this->filePath);
|
|
}
|
|
|
|
/**
|
|
* Return the text used for language.php header
|
|
* @return string
|
|
*/
|
|
protected function fileHeader()
|
|
{
|
|
$header = <<<TXT
|
|
// (c) Copyright by authors of the Tiki Wiki CMS Groupware Project
|
|
//
|
|
// All Rights Reserved. See copyright.txt for details and a complete list of authors.
|
|
// Licensed under the GNU LESSER GENERAL PUBLIC LICENSE. See license.txt for details.
|
|
|
|
// The original strings (English) are case-sensitive.
|
|
|
|
/* Note for translators about translation of text ending with punctuation
|
|
*
|
|
* The current list of concerned punctuation can be found in 'lib/init/tra.php'
|
|
* On 2009-03-02, it is: (':', '!', ';', '.', ',', '?')
|
|
* For clarity, we explain here only for colons: ':' but it is the same for the rest
|
|
*
|
|
* Short version: it is not a problem that string "Login:" has no translation. Only "Login" needs to be translated.
|
|
*
|
|
* Technical justification:
|
|
* If a string ending with colon needs translating (like "{tr}Login:{/tr}")
|
|
* then Tiki tries to translate 'Login' and ':' separately.
|
|
* This allows to have only one translation for "{tr}Login{/tr}" and "{tr}Login:{/tr}"
|
|
* and it still allows to translate ":" as " :" for languages that
|
|
* need it (like French)
|
|
* Note: the difference is invisible but " :" has an UTF-8 non-breaking-space, not a regular space, but the UTF-8 equivalent of the HTML .
|
|
* This allows correctly displaying emails and JavaScript messages, not only web pages as would happen with .
|
|
*/
|
|
|
|
TXT;
|
|
|
|
return $header;
|
|
}
|
|
|
|
/**
|
|
* Format a pair source and translation as
|
|
* a string to be written to a language.php file
|
|
*
|
|
* @param array $entry an array with the English source string and the translation if any
|
|
* @param bool $outputFiles whether file paths were string was found should be included or not in the output
|
|
* @param string $language current language being processed
|
|
* @return string
|
|
*/
|
|
protected function formatString(array $entry, $outputFiles = false, string $language = "")
|
|
{
|
|
// final formated string
|
|
$string = '';
|
|
|
|
if ($outputFiles && (isset($entry['files']) && ! empty($entry['files']))) {
|
|
$string .= '/* ' . join(', ', $entry['files']) . " */\n";
|
|
}
|
|
|
|
if ($language == 'en' && ! isset($entry['translation']) && preg_match('/(.*)_C\(.*\)$/', $entry['name'], $match)) {
|
|
$entry['translation'] = $match[1];
|
|
}
|
|
|
|
$source = Language::addPhpSlashes($entry['name']);
|
|
|
|
if (isset($entry['translation'])) {
|
|
$trans = Language::addPhpSlashes($entry['translation']);
|
|
$string .= "\"$source\" => \"$trans\",\n";
|
|
} else {
|
|
$string .= "// \"$source\" => \"$source\",\n";
|
|
}
|
|
|
|
return $string;
|
|
}
|
|
}
|