forked from extern/egroupware
442 lines
10 KiB
PHP
442 lines
10 KiB
PHP
<?php
|
|
/**
|
|
* EGroupware - TranslationTools
|
|
*
|
|
* @link http://www.egroupware.org
|
|
* @author Miles Lott <milos(at)groupwhere.org>
|
|
* @author Ralf Becker <RalfBecker(at)outdoor-training.de>
|
|
* @license http://opensource.org/licenses/gpl-license.php GPL - GNU General Public License
|
|
* @package etemplate
|
|
* @subpackage translationtools
|
|
* @version $Id$
|
|
*/
|
|
|
|
class solangfile
|
|
{
|
|
var $total;
|
|
var $debug = False;
|
|
|
|
var $langarray; // Currently loaded translations
|
|
// array of missing phrases.
|
|
var $missingarray;
|
|
var $src_file;
|
|
var $tgt_file;
|
|
var $loaded_apps = array(); // Loaded app langs
|
|
|
|
var $functions = array( // functions containing phrases to translate and param#
|
|
'lang' => array(1),
|
|
'create_input_box' => array(1,3),
|
|
'create_check_box' => array(1,3),
|
|
'create_select_box' => array(1,4),
|
|
'create_text_area' => array(1,5),
|
|
'create_notify' => array(1,5),
|
|
'create_password_box' => array(1,3)
|
|
);
|
|
var $files = array(
|
|
'config.tpl' => 'config',
|
|
'hook_admin.inc.php' => 'file_admin',
|
|
'hook_preferences.inc.php' => 'file_preferences',
|
|
'hook_settings.inc.php' => 'file',
|
|
'hook_sidebox_menu.inc.php' => 'file',
|
|
'hook_acl_manager.inc.php' => 'acl_manager'
|
|
);
|
|
/**
|
|
* Reference to global db-object
|
|
*
|
|
* @var egw_db
|
|
*/
|
|
var $db;
|
|
|
|
function __construct()
|
|
{
|
|
$this->db = $GLOBALS['egw']->db;
|
|
}
|
|
|
|
function fetch_keys($app,$arr)
|
|
{
|
|
if (!is_array($arr))
|
|
{
|
|
return;
|
|
}
|
|
foreach($arr as $key => $val)
|
|
{
|
|
$this->plist[$key] = $app;
|
|
}
|
|
}
|
|
|
|
function config_file($app,$fname)
|
|
{
|
|
//echo "<p>solangfile::config_file(app='$app',fname='$fname')</p>\n";
|
|
$lines = file($fname);
|
|
|
|
if ($app != 'setup')
|
|
{
|
|
$app = 'admin';
|
|
}
|
|
foreach($lines as $n => $line)
|
|
{
|
|
while (preg_match('/\{lang_([^}]+)\}(.*)/',$line,$found))
|
|
{
|
|
$lang = str_replace('_',' ',$found[1]);
|
|
$this->plist[$lang] = $app;
|
|
|
|
$line = $found[2];
|
|
}
|
|
}
|
|
}
|
|
|
|
function special_file($app,$fname,$langs_in)
|
|
{
|
|
//echo "<p>solangfile::special_file(app='$app',fname='$fname',langs_in='$langs_in')</p>\n";
|
|
$app_in = $app;
|
|
switch ($langs_in)
|
|
{
|
|
case 'config':
|
|
$this->config_file($app,$fname);
|
|
return;
|
|
case 'file_admin':
|
|
case 'file_preferences':
|
|
$app = substr($langs_in,5);
|
|
break;
|
|
case 'phpgwapi':
|
|
$app = 'common';
|
|
break;
|
|
}
|
|
$GLOBALS['file'] = $GLOBALS['settings'] = array();
|
|
unset($GLOBALS['acl_manager']);
|
|
|
|
ob_start(); // suppress all output
|
|
// call the hooks and not the files direct, as it works for both files and method hooks
|
|
switch(basename($fname))
|
|
{
|
|
case 'hook_settings.inc.php':
|
|
$settings = $GLOBALS['egw']->hooks->single('settings',$app_in,true);
|
|
if (!is_array($settings) || !$settings)
|
|
{
|
|
$settings =& $GLOBALS['settings']; // old method of setting GLOBALS[settings], instead returning the settings
|
|
unset($GLOBALS['settings']);
|
|
}
|
|
break;
|
|
|
|
case 'hook_admin.inc.php':
|
|
$GLOBALS['egw']->hooks->single('admin',$app_in,true);
|
|
break;
|
|
|
|
case 'hook_preferences.inc.php':
|
|
$GLOBALS['egw']->hooks->single('preferences',$app_in,true);
|
|
break;
|
|
|
|
case 'hook_acl_manager.inc.php':
|
|
$GLOBALS['egw']->hooks->single('acl_manager',$app_in,true);
|
|
break;
|
|
|
|
default:
|
|
include($fname);
|
|
break;
|
|
}
|
|
ob_end_clean();
|
|
|
|
if (isset($GLOBALS['acl_manager'])) // hook_acl_manager
|
|
{
|
|
foreach($GLOBALS['acl_manager'] as $app => $data)
|
|
{
|
|
foreach ($data as $item => $arr)
|
|
{
|
|
foreach ($arr as $key => $val)
|
|
{
|
|
switch ($key)
|
|
{
|
|
case 'name':
|
|
$this->plist[$val] = $app;
|
|
break;
|
|
case 'rights':
|
|
foreach($val as $lang => $right)
|
|
{
|
|
$this->plist[$lang] = $app;
|
|
}
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
if (count($GLOBALS['file'])) // hook_{admin|preferences|sidebox_menu}
|
|
{
|
|
foreach ($GLOBALS['file'] as $lang => $link)
|
|
{
|
|
$this->plist[$lang] = $app;
|
|
}
|
|
}
|
|
foreach((array)$settings as $data)
|
|
{
|
|
foreach(array('label','help') as $key)
|
|
{
|
|
if (isset($data[$key]) && !empty($data[$key]))
|
|
{
|
|
// run_lang: NULL, true --> help + label, false --> help only, -1 => none
|
|
if (!isset($data['run_lang']) || !$data['run_lang'] && $key == 'help' || $data['run_lang'] != -1)
|
|
{
|
|
$this->plist[$data[$key]] = $app;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
function parse_php_app($app,$fd)
|
|
{
|
|
$reg_expr = '/('.implode('|',array_keys($this->functions)).")[ \t]*\([ \t]*(.*)$/i";
|
|
define('SEP',filesystem_separator());
|
|
if (!($d=dir($fd))) return;
|
|
while ($fn=$d->read())
|
|
{
|
|
if (@is_dir($fd.$fn.SEP))
|
|
{
|
|
if (($fn!='.')&&($fn!='..')&&($fn!='CVS') && $fn != '.svn')
|
|
{
|
|
$this->parse_php_app($app,$fd.$fn.SEP);
|
|
}
|
|
if ($fn == 'inc')
|
|
{
|
|
// make sure all hooks get called, even if they dont exist as hooks
|
|
foreach($this->files as $f => $type)
|
|
{
|
|
if (substr($f,0,5) == 'hook_' && !file_exists($f = $fd.'inc/'.$f))
|
|
{
|
|
$this->special_file($app,$f,$this->files[$type]);
|
|
}
|
|
}
|
|
}
|
|
}
|
|
elseif (is_readable($fd.$fn))
|
|
{
|
|
if (isset($this->files[$fn]))
|
|
{
|
|
$this->special_file($app,$fd.$fn,$this->files[$fn]);
|
|
}
|
|
if (strpos($fn,'.php') === False && strpos($fn,'.js') === False)
|
|
{
|
|
continue;
|
|
}
|
|
$lines = file($fd.$fn);
|
|
|
|
foreach($lines as $n => $line)
|
|
{
|
|
//echo "line='$line', lines[1+$n]='".$lines[1+$n]."'<br>\n";
|
|
while (preg_match($reg_expr,$line,$parts))
|
|
{
|
|
//echo "***func='$parts[1]', rest='$parts[2]'<br>\n";
|
|
$args = $this->functions[$parts[1]];
|
|
$rest = $parts[2];
|
|
for($i = 1; $i <= $args[0]; ++$i)
|
|
{
|
|
$next = 1;
|
|
if (!$rest || empty($del) || strpos($rest,$del,1) === False)
|
|
{
|
|
$rest .= trim($lines[++$n]);
|
|
}
|
|
$del = $rest[0];
|
|
if ($del == '"' || $del == "'")
|
|
{
|
|
//echo "rest='$rest'<br>\n";
|
|
while (($next = strpos($rest,$del,$next)) !== False && $rest[$next-1] == '\\')
|
|
{
|
|
$rest = substr($rest,0,$next-1).substr($rest,$next);
|
|
}
|
|
if ($next === False)
|
|
{
|
|
break;
|
|
}
|
|
$phrase = str_replace('\\\\','\\',substr($rest,1,$next-1));
|
|
//echo "next2=$next, phrase='$phrase'<br>\n";
|
|
if ($args[0] == $i)
|
|
{
|
|
//if (!isset($this->plist[$phrase])) echo ">>>$phrase<<<<br>\n";
|
|
$this->plist[$phrase] = $app;
|
|
array_shift($args);
|
|
if (!count($args))
|
|
{
|
|
break; // no more args needed
|
|
}
|
|
}
|
|
$rest = substr($rest,$next+1);
|
|
}
|
|
if(!preg_match('/'."[ \t\n]*,[ \t\n]*(.*)$".'/',$rest,$parts))
|
|
{
|
|
break; // nothing found
|
|
}
|
|
$rest = $parts[1];
|
|
}
|
|
$line = $rest;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
$d->close();
|
|
}
|
|
|
|
function missing_app($app,$userlang=en)
|
|
{
|
|
$cur_lang=$this->load_app($app,$userlang);
|
|
define('SEP',filesystem_separator());
|
|
$fd = EGW_SERVER_ROOT . SEP . $app . SEP;
|
|
$this->plist = array();
|
|
$this->parse_php_app($app == 'phpgwapi' ? 'common' : $app,$fd);
|
|
|
|
reset($this->plist);
|
|
return($this->plist);
|
|
}
|
|
|
|
/**
|
|
* loads all app phrases into langarray
|
|
*
|
|
* @param $lang user lang variable (defaults to en)
|
|
*/
|
|
function load_app($app,$userlang='en',$target=True)
|
|
{
|
|
define('SEP',filesystem_separator());
|
|
|
|
$langarray = array();
|
|
$fn = translation::get_lang_file($app,$userlang);
|
|
$fd = dirname($fn);
|
|
|
|
if (@is_writeable($fn) || is_writeable($fd))
|
|
{
|
|
$wr = True;
|
|
}
|
|
if (!$target) $this->src_apps = array();
|
|
|
|
$from = translation::charset($userlang);
|
|
$to = translation::charset();
|
|
//echo "<p>solangfile::load_app('$app','$userlang') converting from charset('$userlang')='$from' to '$to'</p>\n";
|
|
|
|
if (file_exists($fn))
|
|
{
|
|
if ($fp = @fopen($fn,'rb'))
|
|
{
|
|
while ($data = fgets($fp,8000))
|
|
{
|
|
list($message_id,$app_name,,$content) = explode("\t",$data);
|
|
if(!$message_id)
|
|
{
|
|
continue;
|
|
}
|
|
if (empty($app_name))
|
|
{
|
|
$app_name = $app; // fix missing app_name
|
|
}
|
|
//echo '<br>load_app(): adding phrase: $this->langarray["'.$message_id.'"]=' . trim($content)."' for $app_name";
|
|
$_mess_id = strtolower(trim($message_id));
|
|
$langarray[$_mess_id]['message_id'] = $_mess_id;
|
|
$app_name = trim($app_name);
|
|
$langarray[$_mess_id]['app_name'] = $app_name;
|
|
if (!$target)
|
|
{
|
|
$this->src_apps[$app_name] = $app_name;
|
|
}
|
|
$langarray[$_mess_id]['content'] =
|
|
translation::convert(trim($content),$from,$to);
|
|
}
|
|
fclose($fp);
|
|
}
|
|
}
|
|
if ($target)
|
|
{
|
|
$this->tgt_file = $fn;
|
|
}
|
|
else
|
|
{
|
|
$this->src_file = $fn;
|
|
}
|
|
// stuff class array listing apps that are included already
|
|
$this->loaded_apps[$userlang]['filename'] = $fn;
|
|
$this->loaded_apps[$userlang]['writeable'] = $wr;
|
|
|
|
if (!$target) ksort($this->src_apps);
|
|
|
|
if($this->debug) { _debug_array($langarray); }
|
|
@ksort($langarray);
|
|
return $langarray;
|
|
}
|
|
|
|
function write_file($app_name,$langarray,$userlang,$which='target')
|
|
{
|
|
$to = translation::charset($userlang);
|
|
$from = translation::charset();
|
|
//echo "<p>solangfile::write_file('$app_name',,'$userlang') converting from '$from' to charset('$userlang')='$to'</p>\n";
|
|
|
|
$fn = translation::get_lang_file($app_name,$userlang);
|
|
if (file_exists($fn))
|
|
{
|
|
$backup = $fn . '.old';
|
|
@unlink($backup);
|
|
@rename($fn,$backup);
|
|
}
|
|
$fp = fopen($fn,'wb');
|
|
while(list($mess_id,$data) = @each($langarray))
|
|
{
|
|
$data['content'] = translation::convert(trim($data['content']),$from,$to);
|
|
|
|
// dont write empty content
|
|
if (!empty($data['content']))
|
|
{
|
|
fwrite($fp,$mess_id . "\t" . $data['app_name'] . "\t" . $userlang . "\t" . $data['content'] . "\n");
|
|
}
|
|
}
|
|
fclose($fp);
|
|
|
|
translation::invalidate_lang_file($app_name, $userlang);
|
|
|
|
if ($which == 'source')
|
|
{
|
|
$this->src_file = $fn;
|
|
}
|
|
else
|
|
{
|
|
$this->tgt_file = $fn;
|
|
}
|
|
return $fn;
|
|
}
|
|
}
|
|
|
|
/*
|
|
* Helper functions for searching new phrases in sidebox, preferences or admin menus
|
|
*/
|
|
if (!function_exists('display_sidebox') && $_GET['menuaction'] == 'developer_tools.uilangfile.missingphrase')
|
|
{
|
|
function display_sidebox($appname,$menu_title,$file) // hook_sidebox_menu
|
|
{
|
|
if (!is_array($file)) return;
|
|
|
|
unset($file['_NewLine_']);
|
|
if (is_array($GLOBALS['file']))
|
|
{
|
|
$GLOBALS['file'] = $file;
|
|
}
|
|
else
|
|
{
|
|
$GLOBALS['file'] += $file;
|
|
}
|
|
}
|
|
}
|
|
if (!function_exists('display_section') && $_GET['menuaction'] == 'developer_tools.uilangfile.missingphrase')
|
|
{
|
|
function display_section($appname,$file,$file2='') // hook_preferences, hook_admin
|
|
{
|
|
if (is_array($file2))
|
|
{
|
|
$file = $file2;
|
|
}
|
|
if (!is_array($file)) return;
|
|
|
|
if (is_array($GLOBALS['file']))
|
|
{
|
|
$GLOBALS['file'] = $file;
|
|
}
|
|
else
|
|
{
|
|
$GLOBALS['file'] += $file;
|
|
}
|
|
}
|
|
}
|