array( 'id' => 'translater_plugin_menu', 'value' => 0, 'type' => 'boolean', 'label' => 'Put an link in plugins page' ), 'theme_menu' => array( 'id' => 'translater_theme_menu', 'value' => 0, 'type' => 'boolean', 'label' => 'Put a link in themes page' ), 'backup_auto' => array( 'id' => 'translater_backup_auto', 'value' => 1, 'type' => 'boolean', 'label' => 'Make a backup of languages old files when there are modified' ), 'backup_limit' => array( 'id' => 'translater_backup_limit', 'value' => 20, 'type' => 'string', 'label' => 'Maximum backups per module' ), 'backup_folder' => array( 'id' => 'translater_backup_folder', 'value' => 'module', 'type' => 'string', 'label' => 'In which folder to store backups' ), 'start_page' => array( 'id' => 'translater_start_page', 'value' => 'setting', 'type' => 'string', 'label' => 'Page to start on' ), 'write_po' => array( 'id' => 'translater_write_po', 'value' => 1, 'type' => 'boolean', 'label' => 'Write .po languages files' ), 'write_langphp' => array( 'id' => 'translater_write_langphp', 'value' => 1, 'type' => 'boolean', 'label' => 'Write .lang.php languages files' ), 'scan_tpl' => array( 'id' => 'translater_scan_tpl', 'value' => 0, 'type' => 'boolean', 'label' => 'Translate strings of templates files' ), 'parse_nodc' => array( 'id' => 'translater_parse_nodc', 'value' => 1, 'type' => 'boolean', 'label' => 'Translate only untranslated strings of Dotclear', ), 'hide_default' => array( 'id' => 'translater_hide_default', 'value' => 1, 'type' => 'boolean', 'label' => 'Hide default modules of Dotclear', ), 'parse_comment' => array( 'id' => 'translater_parse_comment', 'value' => 1, 'type' => 'boolean', 'label' => 'Write comments and strings informations in lang files' ), 'parse_user' => array( 'id' => 'translater_parse_user', 'value' => 1, 'type' => 'boolean', 'label' => 'Write inforamtions about author in lang files' ), 'parse_userinfo' => array( 'id' => 'translater_parse_userinfo', 'value' => 'displayname, email', 'type' => 'string', 'label' => 'Type of informations about user to write' ), 'import_overwrite' => array( 'id' => 'translater_import_overwrite', 'value' => 0, 'type' => 'boolean', 'label' => 'Overwrite existing languages when import packages' ), 'export_filename' => array( 'id' => 'translater_export_filename', 'value' => 'type-module-l10n-timestamp', 'type' => 'string', 'label' => 'Name of files of exported package' ), 'proposal_tool' => array( 'id' => 'translater_proposal_tool', 'value' => 'google', 'type' => 'string', 'label' => 'Id of default tool for proposed translation' ), 'proposal_lang' => array( 'id' => 'translater_proposal_lang', 'value' => 'en', 'type' => 'string', 'label' => 'Default source language for proposed translation' ) ); # List of default modules of Dotclear public static $default_dotclear_modules = array( 'plugin' => array( 'aboutConfig', 'akismet', 'antispam', 'attachments', 'blogroll', 'blowupConfig', 'breadcrumb', 'dcCKEditor', 'dclegacy', 'dcLegacyEditor', 'fairTrackbacks', 'importExport', 'maintenance', 'pages', 'pings', 'simpleMenu', 'tags', 'themeEditor', 'userPref', 'widgets' ), 'theme' => array( 'default', 'berlin', 'blueSilence', 'customCSS', 'ductile' ) ); # List of modules (from plugins,thems, by dcModule::getModules) private $modules = array(); # Particular module private $module = array(); # Construtor function __construct($core) { $this->core =& $core; $core->blog->settings->addNamespace('translater'); $this->loadModules(); $this->proposal = new translaterProposals($core); } # Return array of default settings public function getDefaultSettings() { return $this->default_settings; } # Get settings for current blog public function getSettings($id = null) { $res = array(); foreach($this->default_settings AS $k => $v) { if ($k == $id) { return $this->core->blog->settings->translater->get( $this->default_settings[$k]['id'] ); } $res[$k] = $this->core->blog->settings->translater->get( $this->default_settings[$k]['id'] ); } return $res; } # Get a setting according to default settings list public function get($id) { if (isset($this->default_settings[$id])) { return $this->core->blog->settings->translater->get( $this->default_settings[$id]['id'] ); } return null; } # See get() public function __get($id) { return $this->get($id); } # Set a setting according to default settings list public function set($k, $v) { if (!isset($this->default_settings[$k])) { return false; } $this->dropOldSettings($this->default_settings[$k]['id']); $this->core->blog->settings->translater->put( $this->default_settings[$k]['id'], $v, $this->default_settings[$k]['type'], $this->default_settings[$k]['label'], true,true ); return true; } # See set() public function __set($k, $v) { return $this->set($k, $v); } # Drop old "per blog" settings (as of version 2013.05.11) private function dropOldSettings($id) { $this->core->blog->settings->translater->drop($id); } # Retrieve a particular info for a given module public function moduleInfo($id, $info) { if (isset($this->modules['plugin'][$id])) { $type = 'plugin'; } elseif (isset($this->modules['theme'][$id])) { $type = 'theme'; } else { return null; } if ($info == 'type') { return $type; } return isset($this->modules[$type][$id][$info]) ? $this->modules[$type][$id][$info] : null; } # Load array of modules infos by type of modules private function loadModules() { $themes = new dcThemes($this->core); $themes->loadModules($this->core->blog->themes_path, null); $this->modules['theme'] = $this->modules['plugin'] = array(); $m = $themes->getModules(); foreach($m AS $k => $v) { if (!$v['root_writable']) { continue; } $this->modules['theme'][$k] = $v; $this->modules['theme'][$k]['id'] = $k; $this->modules['theme'][$k]['type'] = 'theme'; } $m = $this->core->plugins->getModules(); foreach($m AS $k => $v) { if (!$v['root_writable']) { continue; } $this->modules['plugin'][$k] = $v; $this->modules['plugin'][$k]['id'] = $k; $this->modules['plugin'][$k]['type'] = 'plugin'; } } # Return array of modules infos by type of modules public function listModules($type='') { return in_array($type, array('plugin', 'theme')) ? $this->modules[$type] : array_merge($this->modules['theme'], $this->modules['plugin']); } # Return array object of a particular module for a given type of module public function getModule($module='',$type='') { $o = new ArrayObject(); # Load nothing? if (empty($module)) { return false; } # Unknow type? if (!in_array($type, array('plugin', 'theme'))) { $modules = array_merge($this->modules['theme'], $this->modules['plugin']); } else { $modules = $this->modules[$type]; } # Unknow module? if (!isset($modules[$module])) { throw new Exception(sprintf( __('Cannot find module %s'), $module )); return false; } # Module info foreach($modules[$module] as $a => $b) { $o->{$a} = $b; } $o->root = path::real($o->root); # Locales path $o->locales = $o->root . '/locales'; # Module exists $o->exists = true; # Module Basename $i = path::info($o->root); $o->basename = $i['basename']; return $o; } public function getBackupFolder($module, $throw = false) { $dir = false; switch($this->backup_folder) { case 'module': # plugin if (isset($this->modules['plugin'][$module]) && $this->modules['plugin'][$module]['root_writable']) { $dir = path::real($this->modules['plugin'][$module]['root']) . '/locales'; #theme } elseif (isset($this->modules['theme'][$module]) && $this->modules['theme'][$module]['root_writable']) { $dir = path::real($this->modules['theme'][$module]['root']) . '/locales'; } break; case 'plugin': $tmp = path::real(array_pop(explode(PATH_SEPARATOR, DC_PLUGINS_ROOT))); if ($tmp && is_writable($tmp)) { $dir = $tmp; } break; case 'public': $tmp = path::real($this->core->blog->public_path); if ($tmp && is_writable($tmp)) { $dir = $tmp; } break; case 'cache': $tmp = path::real(DC_TPL_CACHE); if ($tmp && is_writable($tmp)) { @mkDir($tmp . '/l10n'); $dir = $tmp . '/l10n'; } break; case 'translater': $tmp = path::real($this->modules['plugin']['translater']['root']); if ($tmp && is_writable($tmp)) { @mkDir($tmp . '/locales'); $dir = $tmp . '/locales'; } break; } if (!$dir && $throw) { throw new Exception(sprintf( __('Cannot find backups folder for module %s'), $module )); } return $dir; } public function getLangsFolder($module = '', $throw = false) { $dir = $module == 'dotclear' ? DC_ROOT : self::getModuleFolder($module, false); if (!$dir && $throw) { throw new Exception(sprintf( __('Cannot find languages folder for module %s'), $module )); } return !$dir ? false : $dir . '/locales'; } public function getModuleFolder($module = '', $throw = false) { $dir = false; if ((isset($this->modules['plugin'][$module]['root']) && ($tmp = path::real($this->modules['plugin'][$module]['root']))) || (isset($this->modules['theme'][$module]['root']) && ($tmp = path::real($this->modules['theme'][$module]['root'])))) { $dir = $tmp; } if (!$dir && $throw) { throw new Exception(sprintf( __('Cannot find root folder for module %s'), $module )); } return $dir; } public function isBackupLimit($module, $throw = false) { # Find folder of backups $backup = self::getBackupFolder($module, true); # Count backup files $count = 0; foreach(self::scandir($backup) AS $file) { if (!is_dir($backup . '/' . $file) && preg_match('/^(l10n-'. $module . '(.*?).bck.zip)$/', $backup)) { $count++; } } # Limite exceed if ($count >= $this->backup_limit) { if ($throw) { throw new Exception(sprintf( __('Limit of %s backups for module %s exceed'), $this->backup_limit, $module )); } return true; } else { return false; } } public function listBackups($module, $return_filename = false) { # Not a module installed self::getLangsFolder($module, true); # No backup folder for this module $backup = self::getBackupFolder($module, false); if (!$backup) { return array(); } # Scan files for backups $res = $sort = array(); $files = self::scandir($backup); foreach($files AS $file) { # Not a bakcup file $is_backup = preg_match( '/^(l10n-(' . $module . ')-(.*?)-([0-9]*?).bck.zip)$/', $file, $m ); if (is_dir($backup . '/' . $file) || !$is_backup || !self::isIsoCode($m[3])) { continue; } # Backup infos if ($return_filename) { $res[] = $file; } else { $res[$m[3]][$file] = path::info($backup . '/' . $file); $res[$m[3]][$file]['time']= filemtime($backup . '/' . $file); $res[$m[3]][$file]['size'] = filesize($backup . '/' . $file); $res[$m[3]][$file]['module'] = $module; } } return $res; } public function createBackup($module, $lang) { # Not a module installed $locales = self::getLangsFolder($module, true); # No backup folder for this module $backup = self::getBackupFolder($module, true); # Not an existing lang if (!is_dir($locales . '/' . $lang)) { throw new Exception(sprintf( __('Cannot find language folder %s for module %s') ,$lang, $module )); } # Scan files for a lang $res = array(); $files = self::scandir($locales . '/' . $lang); foreach($files as $file) { # Only lang file if (!is_dir($locales . '/' . $lang . '/' . $file) && (self::isLangphpFile($file) || self::isPoFile($file))) { $res[$locales . '/' . $lang . '/' . $file] = $module . '/locales/' . $lang . '/' . $file; } } # Do Zip if (!empty($res)) { self::isBackupLimit($module, true); @set_time_limit(300); $fp = fopen($backup . '/l10n-' . $module . '-' . $lang . '-' . time() . '.bck.zip', 'wb'); $zip = new fileZip($fp); foreach($res AS $src => $dest) { $zip->addFile($src, $dest); } $zip->write(); $zip->close(); unset($zip); } } public function deleteBackup($module, $file) { # Not a module installed self::getLangsFolder($module, true); # No backup folder for this module $backup = self::getBackupFolder($module, true); # Not a bakcup file $is_backup = preg_match('/^(l10n-(' . $module . ')-(.*?)-([0-9]*?).bck.zip)$/', $file, $m); if (is_dir($backup . '/' . $file) || !$is_backup || !self::isIsoCode($m[3])) { return; } if (!files::isDeletable($backup . '/' . $file)) { throw new Exception(sprintf( __('Cannot delete backup file %s'), $file )); } unlink($backup . '/' . $file); } public function restoreBackup($module, $file) { # Not a module installed $locales = self::getModuleFolder($module, true); # No backup folder for this module $backup = self::getBackupFolder($module, true); if (!file_exists($backup . '/' . $file)) { throw new Exception(sprintf( __('Cannot find backup file %s'), $file )); } $zip = new fileUnzip($backup . '/' . $file); $zip_files = $zip->getFilesList(); foreach($zip_files AS $zip_file) { $f = self::explodeZipFilename($zip_file, true); if ($module != $f['module']) { continue; } $zip->unzip($zip_file, $locales . '/locales/' . $f['lang'] . '/' . $f['group'] . $f['ext']); $done = true; } $zip->close(); unset($zip); } public function exportPack($modules, $langs) { # Not a query good formed if (!is_array($modules) || 1 > count($modules) || !is_array($langs) || 1 > count($langs)) { throw new Exception( __('Wrong export query') ); } # Filter default filename $filename = files::tidyFileName($this->export_filename); # Not a filename good formed if (empty($filename)) { throw new Exception(sprintf( __('Cannot use export mask %s'), $this->export_filename )); } # Modules folders $res = array(); $count = array(); foreach($modules AS $module) { # Not a module installed $locales = self::getLangsFolder($module, false); if (!$locales) { continue; } # Langs folders foreach($langs AS $lang) { # Not a lang folder if (!is_dir($locales . '/' . $lang)) { continue; } # Scan files for a lang $files = self::scandir($locales . '/' . $lang); foreach($files as $file) { # Not a lang file if (is_dir($locales . '/' . $lang . '/' . $file) || !self::isLangphpFile($file) && !self::isPoFile($file)) { continue; } # Add file to zip in format "module/locales/lang/filename" $res[$locales . '/' . $lang . '/' . $file] = $module . '/locales/' . $lang . '/' . $file; $count[$module] = 1; } } } # Nothing to do if (empty($res)) { throw new Exception('Nothing to export'); } # Prepare files to zip @set_time_limit(300); $fp = fopen('php://output', 'wb'); $zip = new fileZip($fp); foreach($res as $from => $to) { $zip->addFile($from,$to); } # Set filename $file_infos = 1 < count($count) ? array(time(), 'modules', 'multi', self::$dcTranslaterVersion) : array( time(), $modules[0], self::moduleInfo($modules[0], 'type'), self::moduleInfo($modules[0], 'version') ); $filename = files::tidyFileName( dt::str( str_replace( array('timestamp', 'module', 'type', 'version'), $file_infos, $this->export_filename ) ) ); # Send Zip header('Content-Disposition: attachment;filename=' . $filename . '.zip'); header('Content-Type: application/x-zip'); $zip->write(); unset($zip); exit; } public function importPack($modules, $zip_file) { # Not a file uploaded files::uploadStatus($zip_file); # No modules to update if (!is_array($modules) || 1 > count($modules)) { throw new Exception(__('Wrong import query')); } $done = false; $res = array(); # Load Unzip object $zip = new fileUnzip($zip_file['tmp_name']); $files = $zip->getFilesList(); # Scan zip foreach($files AS $file) { $f = self::explodeZipFilename($file, false); # Not a requested module if (!is_array($f) || !in_array($f['module'],$modules)) { continue; } # Get locales folder (even if "locales" is not set) if (!$dir = self::getModuleFolder($f['module'], false)) { continue; } $locales = $dir . '/locales'; # Not allow overwrite if (!$this->import_overwrite && file_exists($locales . '/' . $f['lang'] . '/' . $f['group'] . $f['ext'])) { continue; } $res[] = array( 'from' => $file, 'root' => $locales . '/' . $f['lang'], 'to' => $locales . '/' . $f['lang'] . '/' . $f['group'] . $f['ext'] ); } # Unzip files foreach ($res AS $rs) { if (!is_dir($rs['root'])) { files::makeDir($rs['root'], true); } $zip->unzip($rs['from'], $rs['to']); $done = true; } $zip->close(); unlink($zip_file['tmp_name']); # No file unzip if (!$done) { throw new Exception(sprintf( __('Nothing to import for these modules in pack %s'), $zip_file['name'] )); } } public function explodeZipFilename($file = '', $throw = false) { # module/locales/lang/group.ext $is_file = preg_match( '/^(.*?)\/locales\/(.*?)\/(.*?)(.po|.lang.php)$/', $file, $f ); # Explode file to infos if ($is_file) { $module = null !== self::moduleInfo($f[1], 'name') ? $f[1] : false; $lang = self::isIsoCode($f[2]) ? $f[2] : false; $group = in_array($f[3], self::$allowed_l10n_groups) ? $f[3] : false; $ext = self::isLangphpFile($f[4]) || self::isPoFile($f[4]) ? $f[4] : false; } # Not good formed if (!$is_file || !$module || !$lang || !$group || !$ext) { if ($throw) { throw new Exception(sprintf( __('Zip file %s is not in translater format'), $file )); } return false; } return array( 'module' => $module, 'lang' => $lang, 'group' => $group, 'ext' => $ext ); } public function listLangs($module, $return_path = false) { $res = array(); # Not a module installed $locales = self::getLangsFolder($module, true); # Add prefix "locales" as scandir remove it $prefix = preg_match('/(locales(.*))$/', $locales) ? 'locales' : ''; # Retrieve langs folders $files = self::scandir($locales); foreach($files as $file) { if (!preg_match( '/(.*?(locales\/)([^\/]*?)\/([^\/]*?)(.lang.php|.po))$/', $prefix . $file, $m)) { continue; } if (!self::isIsoCode($m[3])) { continue; } if ($return_path) { $res[$m[3]][] = $file; # Path } else { $res[$m[3]] = self::$iso[$m[3]]; # Lang name } } return $res; } public function addLang($module, $lang, $from_lang = '') { # Not a module installed $locales = self::getLangsFolder($module, true); # Path is right formed self::isIsoCode($lang, true); # Retrieve langs folders $langs = self::listLangs($module); # Lang folder is not present if (isset($langs[$lang])) { throw new Exception(sprintf( __('Language %s already exists for module %s'), $lang, $module )); } # Create new lang directory files::makeDir($locales . '/' . $lang, true); # Verify folder of other lang if (!empty($from_lang) && !isset($langs[$from_lang])) { throw new Exception(sprintf( __('Cannot copy file from language %s for module %s'), $from_lang, $module )); } # Copy files from other lang if (!empty($from_lang) && isset($langs[$from_lang])) { $files = self::scandir($locales . '/' . $from_lang); foreach($files as $file) { if (is_dir($locales . '/' . $from_lang . '/' . $file) || !self::isLangphpFile($file) && !self::isPoFile($file)) { continue; } files::putContent($locales . '/' . $lang . '/' . $file, file_get_contents($locales . '/' . $from_lang . '/' . $file) ); } } else { # Create basic empty lang file as translater need these files to be present self::setLangphpFile($module, $lang, 'main', array()); self::setPoFile($module, $lang, 'main', array()); } } public function updLang($module, $lang, $msgs) { # Not a module installed $locales = self::getLangsFolder($module, true); # Path is right formed self::isIsoCode($lang, true); # Retrieve langs folders $langs = self::listLangs($module); # Lang folder is not present if (!isset($langs[$lang])) { throw new Exception(sprintf( __('Cannot find language folder %s for module %s'), $lang, $module )); } # Sort msgids by groups $rs = array(); foreach($msgs as $msg) { $msg['group'] = isset($msg['group']) ? $msg['group'] : ''; $msg['msgid'] = isset($msg['msgid']) ? $msg['msgid'] : ''; $msg['msgstr'] = isset($msg['msgstr']) ? trim($msg['msgstr']) : ''; /* if (get_magic_quotes_gpc()) { $msg['msgid'] = stripcslashes($msg['msgid']); $msg['msgstr'] = stripcslashes($msg['msgstr']); } */ if ($msg['msgstr'] == '') { continue; } $rs[$msg['group']][$msg['msgid']] = $msg['msgstr']; } # Backup files if auto-backup is on if ($this->backup_auto) { self::createBackup($module, $lang); } # Delete empty files (files with no group) foreach(self::$allowed_l10n_groups AS $group) { if (isset($rs[$group])) { continue; } $po_file = $locales . '/' . $lang . '/' . $group . '.po'; $langphp_file = $locales . '/' . $lang . '/' . $group . '.lang.php'; if (file_exists($po_file)) { unlink($po_file); } if (file_exists($langphp_file)) { unlink($langphp_file); } } # No msgstr to write if (empty($rs)) { throw new Exception(sprintf( __('No string to write, language %s deleted for module %s'), $lang, $module )); } # Write .po and .lang.php files foreach($rs AS $group => $msgs) { self::setLangphpFile($module, $lang, $group, $msgs); self::setPoFile($module, $lang, $group, $msgs); } } public function delLang($module, $lang, $del_empty_dir = true) { # Not a module installed $locales = self::getLangsFolder($module, true); # Path is right formed self::isIsoCode($lang, true); # Retrieve langs folders $files = self::listLangs($module, true); # Lang folder is not present if (!isset($files[$lang])) { throw new Exception(sprintf( __('Cannot find language folder %s for module %s'), $lang, $module )); } # Delete .po and .lang.php files foreach($files[$lang] as $file) { unlink($locales . '/' . $file); } # Delete lang folder if empty $dir = self::scandir($locales . '/' . $lang); if (empty($dir)) { rmdir($locales . '/' . $lang); } # Delete locales folder if empty $loc = self::scandir($locales); if (empty($loc)) { rmdir($locales); } } public static function encodeMsg($str) { return text::toUTF8(stripslashes(trim($str))); } /* Scan a module folder to find all l10n strings in .php files */ public function getMsgIds($module) { $res = array(); # Not a module installed $dir = self::getModuleFolder($module, true); $files = self::scandir($dir); $scan_ext = array('php'); if ($this->scan_tpl) { $scan_ext[] = 'html'; } foreach($files AS $file) { if (is_dir($dir . '/' . $file) || !in_array(files::getExtension($file),$scan_ext)) { continue; } $contents = file($dir . '/' . $file); foreach($contents AS $line => $content) { # php files //if (preg_match_all("|__\((['\"]{1})(.*)([\"']{1})\)|U", $content, $matches)) if (preg_match_all("|__\((['\"]{1})(.*?)([\"']{1})\)|", $content, $matches)) { foreach($matches[2] as $id) { $res[] = array( 'msgid' => self::encodeMsg($id), 'file' => $file, 'line' => $line + 1 ); } } # tpl files if ($this->scan_tpl && preg_match_all('/\{\{tpl:lang\s([^}]+)\}\}/', $content, $matches)) { foreach($matches[1] as $id) { $res[] = array( 'msgid' => self::encodeMsg($id), 'file' => $file, 'line' => $line + 1 ); } } } unset($contents); } return $res; } /* Scan a lang folder to find l10n translations in files */ public function getMsgStrs($module, $requested_lang = '') { $res = array(); # Not a module installed $locales = self::getLangsFolder($module, true); $langs = self::listLangs($module, true); # Not an existing lang if (!isset($langs[$requested_lang])) { return $res; } # Lang files $exists = array(); foreach($langs[$requested_lang] as $file) { if (in_array($file,$exists)) { continue; } $exists[] = $file; $path = path::clean($locales . '/' . $file); # .po files if (self::isPoFile($file)) { $po = self::getPoFile($path); if (!is_array($po)) { continue; } foreach($po as $id => $str) { $is_po[$requested_lang][$id] = 1; $res[] = array( 'msgid' => self::encodeMsg($id), 'msgstr' => self::encodeMsg($str), 'lang' => $requested_lang, 'type' => 'po', 'path' => $path, 'file' => basename($file), 'group'=> str_replace('.po', '', basename($file)) ); } # .lang.php files } elseif (self::isLangphpFile($file)) { $php = self::getLangphpFile($path); foreach($php AS $id => $str) { # Don't overwrite .po if (isset($is_po[$requested_lang][$id])) { continue; } $res[] = array( 'msgid' => self::encodeMsg($id), 'msgstr' => self::encodeMsg($str), 'lang' => $requested_lang, 'type' => 'php', 'path' => $path, 'file' => basename($file), 'group'=> str_replace('.lang.php', '', basename($file)) ); } } } return $res; } public function getMsgs($module, $requested_lang = '') { # Get messages ids of a module $m_msgids = self::getMsgIds($module); # Get messages translations for a module $m_msgstrs = self::getMsgStrs($module, $requested_lang); # Get messages translations for others modules foreach(self::listModules() AS $o_module => $o_infos) { if ($o_module == $module) continue; $m_o_msgstrs[$o_module] = self::getMsgStrs($o_module, $requested_lang); } $m_o_msgstrs['dotclear'] = self::getMsgStrs('dotclear', $requested_lang); # Only one lang or all $langs = '' == $requested_lang ? self::listLangs($module) : array($requested_lang => self::isIsoCode($requested_lang)); # Let's go reorder the mixture $res = array(); foreach($langs AS $lang => $iso) { $res[$lang] = array(); # From id list foreach($m_msgids AS $rs) { $res[$lang][$rs['msgid']]['files'][] = array(trim($rs['file'],'/'), $rs['line']); $res[$lang][$rs['msgid']]['group'] = 'main'; $res[$lang][$rs['msgid']]['msgstr'] = ''; $res[$lang][$rs['msgid']]['in_dc'] = false; $res[$lang][$rs['msgid']]['o_msgstrs'] = array(); } # From str list foreach($m_msgstrs AS $rs) { if ($rs['lang'] != $lang) { continue; } if (!isset($res[$lang][$rs['msgid']])) { $res[$lang][$rs['msgid']]['files'][] = array(); $res[$lang][$rs['msgid']]['in_dc'] = false; $res[$lang][$rs['msgid']]['o_msgstrs'] = array(); } $res[$lang][$rs['msgid']]['group'] = $rs['group']; $res[$lang][$rs['msgid']]['msgstr'] = $rs['msgstr']; $res[$lang][$rs['msgid']]['in_dc'] = false; } # From others str list foreach($m_o_msgstrs AS $o_module => $o_msgstrs) { foreach($o_msgstrs AS $rs) { if ($rs['lang'] != $lang) { continue; } if (!isset($res[$lang][$rs['msgid']])) { continue; } $res[$lang][$rs['msgid']]['o_msgstrs'][] = array( 'msgstr' => $rs['msgstr'], 'module' => $o_module, 'file' => $rs['file'] ); if ($o_module == 'dotclear') { $res[$lang][$rs['msgid']]['in_dc'] = true; } } } } return '' == $requested_lang ? $res : $res[$requested_lang]; } /* Write a lang file */ private function writeLangFile($dir, $content, $throw) { $path = path::info($dir); if (is_dir($path['dirname']) && !is_writable($path['dirname']) || file_exists($dir) && !is_writable($dir)) { throw new Exception(sprintf( __('Cannot grant write acces on lang file %s'), $dir )); } # -- BEHAVIOR -- dcTranslaterBeforeWriteLangFile $this->core->callBehavior('dcTranslaterBeforeWriteLangFile', $dir, $content, $throw); $f = @files::putContent($dir,$content); if (!$f && $throw) { throw new Exception(sprintf( __('Cannot write lang file %s'), $dir )); } # -- BEHAVIOR -- dcTranslaterAfterWriteLangFile $this->core->callBehavior('dcTranslaterAfterWriteLangFile', $f, $dir, $content, $throw); return $f; } /* Try if a file is a .lang.php file */ public static function isLangphpFile($file) { return files::getExtension($file) == 'php' && stristr($file, '.lang.php'); } /* Get and parse a .lang.php file */ public static function getLangphpFile($file) { if (!file_exists($file)) { return array(); } $res = array(); $content = implode('',file($file)); $count = preg_match_all('/(\$GLOBALS\[\'__l10n\'\]\[\'(.*?)\'\]\s*\x3D\s*\'(.*?)\';)/', $content, $m); if (!$count) { return array(); } for ($i = 0; $i < $count; $i++) { $id = $m[2][$i]; $str = self::langphpString($m[3][$i]); if ($str) { $res[self::langphpString($id)] = $str; } } if (!empty($res[''])) { $res = array_diff_key($res,array(''=>1)); } return $res; } /* Construct and write a .lang.php file */ private function setLangphpFile($module, $lang, $group, $fields) { if (!$this->write_langphp) { return; } # Not a module installed $locales = self::getLangsFolder($module, true); # Path is right formed $lang_name = self::isIsoCode($lang, true); $l = "parse_comment) { $l .= '// Language: ' . $lang_name . " \n" . '// Module: ' . $module . " - " . self::moduleInfo($module, 'version') . "\n" . '// Date: ' . dt::str('%Y-%m-%d %H:%M:%S') . " \n"; if ($this->parse_user && !empty($this->parse_userinfo)) { $search = self::$allowed_user_informations; foreach($search AS $n) { $replace[] = $this->core->auth->getInfo('user_' . $n); } $info = trim(str_replace($search,$replace,$this->parse_userinfo)); if (!empty($info)) { $l .= '// Author: ' . html::escapeHTML($info) . "\n"; } } $l .= '// Translated with dcTranslater - ' . $this->core->plugins->moduleInfo('translater', 'version') . " \n\n"; } if ($this->parse_comment) { $infos = self::getMsgids($module); foreach($infos AS $info) { if (isset($fields[$info['msgid']])) { $comments[$info['msgid']] = (isset($comments[$info['msgid']]) ? $comments[$info['msgid']] : '') . '#'.trim($info['file'],'/') . ':' . $info['line'] . "\n"; } } } foreach($fields as $id => $str) { if ($this->parse_comment && isset($comments[$id])) { $l .= $comments[$id]; } $l .= '$GLOBALS[\'__l10n\'][\'' . addcslashes($id, "'") . '\'] = ' . '\'' . self::langphpString($str, true) . "';\n"; if ($this->parse_comment) { $l .= "\n"; } } $l .= ""; self::writeLangFile($locales . '/' . $lang . '/' . $group . '.lang.php', $l, true); } /* Parse a .lang.php string */ private static function langphpString($string, $reverse = false) { if ($reverse) { $smap = array('\'', "\n", "\t", "\r"); $rmap = array('\\\'', '\\n"' . "\n" . '"', '\\t', '\\r'); return trim((string) str_replace($smap, $rmap, $string)); } else { $smap = array('/\\\\n/', '/\\\\r/', '/\\\\t/', "/\\\'/"); $rmap = array("\n", "\r", "\t", "'"); return trim((string) preg_replace($smap, $rmap, $string)); } } /* Try if a file is a .po file */ public static function isPoFile($file) { return files::getExtension($file) == 'po'; } /* Get and parse a .po file */ public static function getPoFile($file) { if (!file_exists($file)) { return false; } $res = array(); $content = implode('',file($file)); $count = preg_match_all('/msgid\s(.*(?:\n".*")*)\nmsgstr\s(.*(?:\n".*")*)/', $content, $m); if (!$count) return false; for ($i = 0; $i < $count; $i++) { $id = preg_replace('/"(.*)"/s','\\1', $m[1][$i]); $str= preg_replace('/"(.*)"/s','\\1', $m[2][$i]); $str = self::poString($str); if ($str) { $res[self::poString($id)] = $str; } } if (!empty($res[''])) { $res = array_diff_key($res, array(''=>1)); } return $res; } /* Construct and parse a .po file */ private function setPoFile($module, $lang, $group, $fields) { if (!$this->write_po) { return; } # Not a module installed $locales = self::getLangsFolder($module, true); # Path is right formed self::isIsoCode($lang, true); $l = ''; if ($this->parse_comment) { $l .= '# Language: ' . self::$iso[$lang] . "\n" . '# Module: ' . $module . " - " . self::moduleInfo($module, 'version') . "\n" . '# Date: ' . dt::str('%Y-%m-%d %H:%M:%S') . "\n"; if ($this->parse_user && !empty($this->parse_userinfo)) { $search = self::$allowed_user_informations; foreach($search AS $n) { $replace[] = $this->core->auth->getInfo('user_' . $n); } $info = trim(str_replace($search, $replace, $this->parse_userinfo)); if (!empty($info)) { $l .= '# Author: ' . html::escapeHTML($info) . "\n"; } } $l .= '# Translated with translater ' . $this->core->plugins->moduleInfo('translater', 'version') . "\n"; } $l .= "\n". "msgid \"\"\n" . "msgstr \"\"\n" . '"Content-Type: text/plain; charset=UTF-8\n"' . "\n" . '"Project-Id-Version: ' . $module . ' ' . self::moduleInfo($module, 'version') . '\n"' . "\n" . '"POT-Creation-Date: \n"' . "\n" . '"PO-Revision-Date: ' . date('c') . '\n"' . "\n" . '"Last-Translator: ' . $this->core->auth->getInfo('user_cn') . '\n"' . "\n" . '"Language-Team: \n"' . "\n" . '"MIME-Version: 1.0\n"' . "\n" . '"Content-Transfer-Encoding: 8bit\n"' . "\n" . '"Plural-Forms: nplurals=2; plural=(n > 1);\n"' . "\n\n"; if ($this->parse_comment) { $infos = self::getMsgids($module); foreach($infos AS $info) { if (isset($fields[$info['msgid']])) { $comments[$info['msgid']] = (isset($comments[$info['msgid']]) ? $comments[$info['msgid']] : '') . '#: '.trim($info['file'],'/') . ':' . $info['line'] . "\n"; } } } foreach($fields as $id => $str) { if ($this->parse_comment && isset($comments[$id])) { $l .= $comments[$id]; } $l .= 'msgid "' . self::poString($id, true) . '"' . "\n" . 'msgstr "' . self::poString($str, true) . '"' . "\n\n"; } self::writeLangFile($locales . '/' . $lang . '/' . $group . '.po', $l, true); } /* Parse .po string */ private static function poString($string, $reverse = false) { if ($reverse) { $smap = array('"', "\n", "\t", "\r"); $rmap = array('\\"', '\\n"' . "\n" . '"', '\\t', '\\r'); return trim((string) str_replace($smap, $rmap, $string)); } else { $smap = array('/"\s+"/', '/\\\\n/', '/\\\\r/', '/\\\\t/', '/\\\"/'); $rmap = array('', "\n", "\r", "\t", '"'); return trim((string) preg_replace($smap, $rmap, $string)); } } /* Scan recursively a folder and return files and folders names */ public static function scandir($path, $dir = '', $res = array()) { $path = path::real($path); if (!is_dir($path) || !is_readable($path)) { return array(); } $files = files::scandir($path); foreach($files AS $file) { if ($file == '.' || $file == '..') { continue; } if (is_dir($path . '/' . $file)) { $res[] = $file; $res = self::scanDir($path . '/' . $file, $dir . '/' . $file, $res); } else { $res[] = empty($dir) ? $file : $dir . '/' . $file; } } return $res; } /* Return array of langs like in clearbreaks l10n */ public static function getIsoCodes($flip = false, $name_with_code = false) { if (empty(self::$iso)) { self::$iso = l10n::getISOcodes($flip, $name_with_code); } return self::$iso; } /* Find if lang code exists or lang name */ public static function isIsoCode($iso, $throw = false) { $codes = self::getIsoCodes(); $code = isset($codes[$iso]) ? $codes[$iso] : false; if (!$code && $throw) { throw new Exception(sprintf( __('Cannot find language for code %s'), $iso )); } return $code; } }