e107_admin/lancheck.php
<?php
/*
* e107 website system
*
* Copyright (C) 2008-2013 e107 Inc (e107.org)
* Released under the terms and conditions of the
* GNU General Public License (http://www.gnu.org/licenses/gpl.txt)
*
* Administration Area - Language check
* With code from Izydor and Lolo.
*
*/
if (!defined('e107_INIT'))
{
require_once(__DIR__.'/../class2.php');
}
e107::coreLan('lancheck', true);
$e_sub_cat = 'language';
// require_once("auth.php");
$frm = e107::getForm();
$mes = e107::getMessage();
// $lck = new lancheck;
/*
$qry = explode("|",e_QUERY);
$f = $qry[0];
$lan = $qry[1];
$mode = $qry[2];
// Write the language file.
if(isset($_POST['submit']))
{
unset($input);
$kom_start = chr(47)."*";
$kom_end = "*".chr(47);
if($_POST['root'])
{
$writeit = $_POST['root'];
}
$old_kom = "";
$in_kom=0;
$data = file($writeit);
foreach($data as $line)
{
if (strpos($line,$kom_start) !== False && $old_kom == "")
{
$in_kom=1;
}
if ($in_kom) { $old_kom.=$line; }
if (strpos($line,$kom_end) !== False && $in_kom) {$in_kom = 0;}
}
$message = "<div style='text-align:left'><br />";
$input .= chr(60)."?php\n";
if ($old_kom == "")
{
// create CVS compatible description.
$diz = chr(47)."*\n";
$diz .= " * e107 website system\n";
$diz .= " *\n";
$diz .= " * Copyright (C) 2008-2009 e107 Inc (e107.org)\n";
$diz .= " * Released under the terms and conditions of the\n";
$diz .= " * GNU General Public License (http://www.gnu.org/licenses/gpl.txt)\n";
$diz .= " *\n";
$diz .= " * Language File\n";
$diz .= " *\n";
$diz .= " * ".chr(36)."Source: ".str_replace(array(e_LANGUAGEDIR, e_PLUGIN), array(e_LANGUAGEDIR_ABS, e_PLUGIN_ABS), $writeit)." ".chr(36)."\n";
$diz .= " * ".chr(36)."Revision: 1.0 ".chr(36)."\n";
$diz .= " * ".chr(36)."Date: ".date("Y/m/d H:i:s")." ".chr(36)."\n";
$diz .= " * ".chr(36)."Author: ".USERNAME." ".chr(36)."\n";
$diz .= " *\n";
$diz .= "*".chr(47)."\n\n";
}
else
{
$diz = $old_kom;
}
$input .= $diz;
$message .= str_replace("\n","<br />",$diz);
for ($i=0; $i<count($_POST['newlang']); $i++)
{
$notdef_start = "";
$notdef_end = "\n";
$deflang = (MAGIC_QUOTES_GPC === TRUE) ? stripslashes($_POST['newlang'][$i]) : $_POST['newlang'][$i];
$func = "define";
$quote = chr(34);
if (strpos($_POST['newdef'][$i],"ndef++") !== FALSE )
{
$defvar = str_replace("ndef++","",$_POST['newdef'][$i]);
$notdef_start = "if (!defined(".chr(34).$defvar.chr(34).")) {";
$notdef_end = "}\n";
}
else
{
$defvar = $_POST['newdef'][$i];
}
if($_POST['newdef'][$i] == "LC_ALL" && isset($_POST['root']))
{
$message .= $notdef_start.'setlocale('.htmlentities($defvar).','.$deflang.');<br />'.$notdef_end;
$input .= $notdef_start."setlocale(".$defvar.",".$deflang.");".$notdef_end;
}
else
{
$message .= $notdef_start.$func.'('.$quote.htmlentities($defvar).$quote.',"'.$deflang.'");<br />'.$notdef_end;
$input .= $notdef_start.$func."(".$quote.$defvar.$quote.", ".chr(34).$deflang.chr(34).");".$notdef_end;
}
}
$message .="<br />";
$message .="</div>";
$input .= "\n\n?>";
// Write to file.
$fp = @fopen($writeit,"w");
if(!@fwrite($fp, $input))
{
$caption = LAN_CHECK_PAGE_TITLE.' - '.LAN_ERROR;
$message = '';
$mes->addError(LAN_CHECK_17);
}
else
{
$caption = LAN_CHECK_PAGE_TITLE.' - '.LAN_SUMMARY;
$mes->addSuccess(sprintXXX(str_replace("[x]", "%s", LAN_CHECK_23), basename($writeit)));
}
fclose($writeit);
$message .= "
<form method='post' action='".e_SELF."' id='core-lancheck-save-file-form'>
<div class='center'>
".$frm->admin_button('language_sel', LAN_BACK)."
".$frm->hidden('language', $lan)."
</div>
</form>";
$ns->tablerender($caption, $mes->render().$message);
// require_once(e_ADMIN."footer.php");
exit;
}
// ============================================================================
// Edit the Language File.
if($f != ""){
if (!$mode)
{
$dir1 = e_BASE.$LANGUAGES_DIRECTORY."English/";
$f1=$f;
$dir2 = e_BASE.$LANGUAGES_DIRECTORY.$lan."/";
$f2=$f;
}
else
{
$fullpath_orig = $f;
$fullpath_trans = str_replace("English",$lan,$f);
$f1 = basename($fullpath_orig);
$f2 = basename($fullpath_trans);
$dir1 = dirname($fullpath_orig)."/";
$dir2 = dirname($fullpath_trans)."/";
}
$lck->edit_lanfiles($dir1,$dir2,$f1,$f2);
}
// ===========================================================================
$core_plugins = array(
"alt_auth", "banner_menu", "blogcalendar_menu", "calendar_menu", "chatbox_menu",
"clock_menu", "comment_menu", "content", 'download', "featurebox", "forum",
"gsitemap", "links_page", "linkwords", "list_new", "log", "login_menu",
"newforumposts_main", "newsfeed", "newsletter", "online", "other_news_menu",
"pdf", "pm", "poll", "rss_menu", "search_menu", "siteinfo", "trackback",
"tree_menu", "user_menu"
);
$core_themes = array("bootstrap", $pref['sitetheme']);
if(isset($_POST['language_sel']) && isset($_POST['language']))
{
$text = $lck->check_core_lanfiles($_POST['language']).$lck->check_core_lanfiles($_POST['language'],"admin/");
$text .= "
<fieldset id='core-lancheck-plugin'>
<legend>".ADLAN_CL_7."</legend>
<table class='table adminlist'>
<colgroup>
<col style='width: 25%' />
<col style='width: 25%' />
<col style='width: 40%' />
<col style='width: 10%' />
</colgroup>
<thead>
<tr>
<th>".LAN_PLUGIN."</th>
<th>".LAN_CHECK_16."</th>
<th>".$_POST['language']."</th>
<th class='center last'>".LAN_OPTIONS."</th>
</tr>
</thead>
<tbody>
";
foreach($core_plugins as $plugs)
{
if(is_readable(e_PLUGIN.$plugs))
{
$text .= $lck->check_lanfiles('P',$plugs,"English",$_POST['language']);
}
}
$text .= "
</tbody>
</table>
</fieldset>
";
$text .= "
<fieldset id='core-lancheck-theme'>
<legend>".LAN_THEME."</legend>
<table class='table adminlist'>
<colgroup>
<col style='width: 25%' />
<col style='width: 25%' />
<col style='width: 40%' />
<col style='width: 10%' />
</colgroup>
<thead>
<tr>
<th>".LAN_CHECK_21."</th>
<th>".LAN_CHECK_16."</th>
<th>".$_POST['language']."</th>
<th class='center last'>".LAN_OPTIONS."</th>
</tr>
</thead>
<tbody>
";
foreach($core_themes as $them)
{
if(is_readable(e_THEME.$them))
{
$text .= $lck->check_lanfiles('T',$them,"English",$_POST['language']);
}
}
$text .= "
</tbody>
</table>
</fieldset>
";
$mes = e107::getMessage();
if($lck->error_count == 0)
{
e107::getConfig()->setPref('lancheck/'.$_POST['language'],1);
e107::getConfig()->save(FALSE);
$mes->addSuccess(LAN_CHECK_27.'<b>: '.$lck->error_count.'</b>');
}
else
{
$mes->addWarning(LAN_CHECK_27.'<b>: '.$lck->error_count.'</b>');
}
$ns->tablerender(LAN_THEMES, $mes->render(). $text);
require_once(e_ADMIN."footer.php");
exit;
}
*/
class lancheck
{
public $core_plugins = array();
public $core_themes = array("bootstrap3", "voux");
private $errorsOnly = false;
private $coreImage = array();
private $transLanguage = '';
private $thirdPartyPlugins = true;
private $deprecatedFiles = array('lan_download.php', 'lan_parser_functions.php', 'lan_prefs.php', 'admin/lan_download.php', 'admin/lan_modcomment.php');
private $installed_languages = array();
function __construct()
{
$this->core_plugins = e107::getPlugin()->getCorePlugins();
}
public function thirdPartyPlugins($val)
{
$this->thirdPartyPlugins = $val;
}
public function errorsOnly($val)
{
$this->errorsOnly = (bool) $val;
}
public function init()
{
$mode = varset($_GET['sub']);
$lan = varset($_GET['lan']);
$file = varset($_GET['file']);
$this->transLanguage = $lan;
$ns = e107::getRender();
$tp = e107::getParser();
$pref = e107::getPref();
// Check current theme also (but do NOT add to generated zip)
if(deftrue('e_DEBUG'))
{
$this->core_themes[] = $pref['sitetheme'];
$this->core_themes = array_unique($this->core_themes);
}/*
if(E107_DEBUG_LEVEL > 0)
{
print_a($this->core_plugins);
}*/
$acceptedLans = explode(",",e_LANLIST);
if(!empty($_POST['ziplang']))
{
$lang = key($_POST['ziplang']);
return $this->zipLang($lang);
}
// Verify
if($mode == 'verify' && !empty($lan))
{
// $_SESSION['lancheck-errors-only'] = ($_POST['errorsonly']==1 ) ? 1 : 0;
// $this->errorsOnly = ($_POST['errorsonly']==1) ? TRUE : FALSE;
return $this->check_all('render', $lan);
}
// Write the language file.
if(isset($_POST['saveLanguageFile']) && vartrue($_POST['lan']) && in_array($_POST['lan'],$acceptedLans))
{
$this->write_lanfile($_POST['lan']);
return true;
}
// Edit the Language File.
if($mode == 'edit' && vartrue($file) && !empty($lan) && in_array($lan, $acceptedLans))
{
if (empty($_GET['type']))
{
$dir1 = e_LANGUAGEDIR."English/";
$f1= $tp->toDB($file);
$dir2 = e_LANGUAGEDIR.$lan."/";
$f2= $tp->toDB($file);
}
else
{
$fullpath_orig = $tp->toDB($file);
$fullpath_trans = str_replace("English", $lan, $tp->toDB($file));
$f1 = basename($fullpath_orig);
$f2 = basename($fullpath_trans);
$dir1 = dirname($fullpath_orig)."/";
$dir2 = dirname($fullpath_trans)."/";
}
return $this->edit_lanfiles($dir1,$dir2,$f1,$f2,$lan, varset($_GET['type']));
// return true;
}
return false;
}
function countFiles($array)
{
foreach($array as $k=>$val)
{
if(is_array($val))
{
$key = key($val);
$this->coreImage[$key] = $val;
}
/* elseif($val)
{
$this->totalFiles++;
}
*/
}
}
/**
* @param $language
* @return array|string
*/
function zipLang($language)
{
$mes = e107::getMessage();
/* NO LONGER USED
$certVal = isset($_POST['contribute_pack']) ? 1 : 0;
if(!varset($_COOKIE['e107_certified']))
{
cookie('e107_certified',$certVal,(time() + 3600 * 24 * 30));
}
else
{
$_COOKIE['e107_certified'] = $certVal;
}*/
// $_POST['language'] = key($_POST['ziplang']);
// If no session data, scan before zipping.
if(!isset($_SESSION['lancheck'][$language]['total']) || $_SESSION['lancheck'][$language]['total']!='0')
{
$this->check_all('norender', $language);
}
$status = $this->makeLanguagePack($language);
//print_a($status);
if($status['error'] == FALSE)
{
$srch = array('[', ']');
$rpl = array("<a href='https://github.com/e107translations/Translator-Information' target='_blank'>", "</a>");
$text = str_replace($srch, $rpl, LANG_LAN_154);
$text .= "<br />";
$text .= $status['message'];
//$text .= $this->share($status['file']); // no longer notify by email, but only offer to download
$mes->addSuccess($text);
}
else
{
$mes->addError($status['error']);
}
return array('text'=> $mes->render(), 'caption'=>'');
}
/**
* Share Language File
*
* DEPRECATED - NO LONGER USED AS TRANSLATIONS ARE NOW MANAGED THROUGH GITHUB REPOSITORIES (https://github.com/e107translations)
*
* @param object $newfile
* Usage of e107 is granted to you provided that this function is not modified or removed in any way.
* @return
*/
private function share($newfile)
{
global $pref;
if(!$newfile || E107_DEBUG_LEVEL > 0)
{
return;
}
global $tp;
$full_link = $tp->createConstants($newfile);
$email_message = "<br />Site: <a href='".SITEURL."'>".SITENAME."</a>
<br />User: ".USERNAME."\n
<br />Email: ".USEREMAIL."\n
<br />Language: ".$_POST['language']."\n
<br />IP:".USERIP."
<br />...would like to contribute the following language pack for e107. (see attached)<br />:
<br />Missing Files: ".$_SESSION['lancheck'][$_POST['language']]['file']."
<br />Bom Errors : ".$_SESSION['lancheck'][$_POST['language']]['bom']."
<br />UTF Errors : ".$_SESSION['lancheck'][$_POST['language']]['utf']."
<br />Definition Errors : ".$_SESSION['lancheck'][$_POST['language']]['def']."
<br />Total Errors: ".$_SESSION['lancheck'][$_POST['language']]['total']."
<br />
<br />XML file: ".$_SESSION['lancheck'][$_POST['language']]['xml'];
require_once(e_HANDLER."mail.php");
$send_to = (!$_POST['contribute_pack']) ? "languagepacks@e107inc.org" : "certifiedpack@e107inc.org";
$to_name = "e107 Inc.";
$Cc = "";
$Bcc = "";
$returnpath='';
$returnreceipt='';
$inline ="";
$subject = (!$_POST['contribute_pack']) ? "[0.7 LanguagePack] " : "[0.7 Certified LanguagePack] ";
$subject .= basename($newfile);
if(!@sendemail($send_to, $subject, $email_message, $to_name, '', '', $newfile, $Cc, $Bcc, $returnpath, $returnreceipt,$inline))
{
$text = "<div style='padding:40px'>";
$text .= defined('LANG_LAN_EML') ? "<b>".LANG_LAN_EML."</b>" : "<b>There was a problem sending the language-pack. Please email your verified language pack to:</b>";
$text .= " <a href='mailto:".$send_to."?subject=".$subject."'>".$send_to."</a>";
$text .= "</div>";
return $text;
}
elseif($_POST['contribute_pack'])
{
return "<div style='padding:40px'>Pack Sent to e107 Inc. A confirmation email will be sent to ".$pref['siteadminemail']." once it is received.<br />Please also make sure that email coming from ".$send_to." is not blocked by your spam filter.</div>";
}
}
/**
* @param $language
* @return bool|string
*/
private function findLocale($language)
{
if(!is_readable(e_LANGUAGEDIR.$language."/".$language.".php"))
{
return FALSE;
}
$code = file_get_contents(e_LANGUAGEDIR.$language."/".$language.".php");
$tmp = explode("\n",$code);
$srch = array("define","'",'"',"(",")",";","CORE_LC2","CORE_LC",",");
foreach($tmp as $line)
{
if(strpos($line,"CORE_LC") !== FALSE && (strpos($line,"CORE_LC2") === FALSE))
{
$lc = trim(str_replace($srch,"",$line));
}
elseif(strpos($line,"CORE_LC2") !== FALSE)
{
$lc2 = trim(str_replace($srch,"",$line));
}
}
if(!isset($lc) || !isset($lc2) || $lc=="" || $lc2=="")
{
return FALSE;
}
return substr($lc,0,2)."_".strtoupper(substr($lc2,0,2));
//
}
/**
* @param $language
* @return array
*/
private function makeLanguagePack($language)
{
$tp = e107::getParser();
$ret = array();
$ret['file'] = "";
if($_SESSION['lancheck'][$language]['total'] > 0 && !E107_DEBUG_LEVEL)
{
$ret = array();
$ret['error'] = TRUE;
$message = LANG_LAN_115;
$ret['message'] = str_replace("[x]",$_SESSION['lancheck'][$language]['total'],$message);
return $ret;
}
if(!isset($_SESSION['lancheck'][$language]))
{
$ret = array();
$ret['error'] = TRUE;
$ret['message'] = LANG_LAN_116;
return $ret;
}
if(varset($_POST['contribute_pack']) && varset($_SESSION['lancheck'][$language]['total']) !='0')
{
$ret['error'] = TRUE;
$ret['message'] = LANG_LAN_117;
$ret['message'] .= "<br />";
$ret['message'] .= LANG_LAN_116;
return $ret;
}
require_once(e_HANDLER.'pclzip.lib.php');
list($ver, $tmp) = explode(" ", e_VERSION);
if(!$locale = $this->findLocale($language))
{
$ret['error'] = TRUE;
$file = "e107_languages/{$language}/{$language}.php";
$def = (defined('LANG_LAN_25')) ? LANG_LAN_25 : LANG_LAN_119;
$ret['message'] = str_replace("[x]",$file,$def); //
return $ret;
}
global $THEMES_DIRECTORY, $PLUGINS_DIRECTORY, $LANGUAGES_DIRECTORY, $HANDLERS_DIRECTORY, $HELP_DIRECTORY;
if(($HANDLERS_DIRECTORY != "e107_handlers/") || ( $LANGUAGES_DIRECTORY != "e107_languages/") || ($THEMES_DIRECTORY != "e107_themes/") || ($HELP_DIRECTORY != "e107_docs/help/") || ($PLUGINS_DIRECTORY != "e107_plugins/"))
{
$ret['error'] = TRUE;
$ret['message'] = (defined('LANG_LAN_26')) ? LANG_LAN_26 : LANG_LAN_120;
return $ret;
}
$newfile = e_MEDIA_FILE."e107_".$ver."_".$language."_".$locale."-utf8.zip";
$archive = new PclZip($newfile);
$file = $this->getFileList($language);
$data = implode(",", $file);
if ($archive->create($data,PCLZIP_OPT_REMOVE_PATH,e_BASE) == 0)
{
$ret['error'] = TRUE;
$ret['message'] = $archive->errorInfo(true);
return $ret;
}
else
{
$fileName = e_FILE."public/".$language.".xml";
if(is_readable($fileName))
{
@unlink($fileName);
}
$fileData = '<?xml version="1.0" encoding="utf-8"?>
<e107Language name="'.$language.'" compatibility="'.$ver.'" date="'.date("Y-m-d").'" >
<author name ="'.USERNAME.'" email="'.USEREMAIL.'" url="'.SITEURL.'" />
</e107Language>';
if(file_put_contents($fileName,$fileData))
{
$addTag = $archive->add($fileName, PCLZIP_OPT_ADD_PATH, 'e107_languages/'.$language, PCLZIP_OPT_REMOVE_PATH, e_FILE.'public/');
$_SESSION['lancheck'][$language]['xml'] = "Yes";
}
else
{
$_SESSION['lancheck'][$language]['xml'] = "No";
}
@unlink($fileName);
$ret['file'] = $newfile;
$ret['message'] = str_replace("../", "", e_MEDIA_FILE)."<a href='".$newfile."' >".basename($newfile)."</a>";
$ret['error'] = FALSE;
return $ret;
}
}
private function getFileList($language)
{
if(empty($language))
{
return false;
}
$PLUGINS_DIRECTORY = e107::getFolder('plugins');
$THEMES_DIRECTORY = e107::getFolder('themes');
$HELP_DIRECTORY = e107::getFolder('help');
$HANDLERS_DIRECTORY = e107::getFolder('handlers');
$core = $this->getFilePaths(e_LANGUAGEDIR.$language."/", $language,''); // includes admin area.
// $core_admin = $this->getFilePaths(e_BASE.$LANGUAGES_DIRECTORY.$language."/admin/", $language,'');
$core_admin = array();
$plugs = $this->getFilePaths(e_BASE.$PLUGINS_DIRECTORY, $language, $this->core_plugins); // standardized path.
$theme = $this->getFilePaths(e_BASE.$THEMES_DIRECTORY, $language, $this->core_themes);
$docs = $this->getFilePaths(e_BASE.$HELP_DIRECTORY,$language);
$handlers = $this->getFilePaths(e_BASE.$HANDLERS_DIRECTORY,$language); // standardized path.
$file = array_merge($core,$core_admin, $plugs, $theme, $docs, $handlers);
$file = array_unique($file);
return $file;
}
/** todo */
/*function removeLanguagePack($language)
{
$files = $this->getFileList($language);
}*/
/**
* @param $path
* @param $language
* @param string $filter
* @return array|bool
*/
public function getFilePaths($path, $language, $restrict=array())
{
$fl = e107::getFile();
if ($lanlist = $fl->get_files($path, "", "standard", 4)) // (\.php|\.xml)$
{
sort($lanlist);
}
else
{
return array();
}
$pzip = array();
foreach ($lanlist as $p)
{
$fullpath = $p['path'].$p['fname'];
if (strpos($fullpath, $language) !== false)
{
$pzip[] = $fullpath;
}
}
if(!empty($restrict)) // strip the list according to inclusion list.
{
$newlist = array();
foreach($pzip as $k=>$p)
{
foreach($restrict as $accept)
{
if(strpos($p, '/'.$accept.'/')!==false)
{
$newlist[] = $p;
}
}
}
$pzip = $newlist;
}
return $pzip;
}
/**
* Get Installed Language-Pack Meta Data.
* @return array
*/
function getLocalLanguagePacks()
{
$this->installed_languages = e107::getLanguage()->installed();
$xml = e107::getXml();
$arr = array();
foreach($this->installed_languages as $language)
{
if($language == "English")
{
continue;
}
$metaFile = e_LANGUAGEDIR.$language."/".$language.".xml";
if(is_readable($metaFile))
{
$rawData = $xml->loadXMLfile($metaFile,true);
if($rawData)
{
$value = $rawData['@attributes'];
}
else
{
$value = array(
'date' => " ",
'compatibility' => ' '
);
}
}
else
{
$value = array(
'date' => " ",
'compatibility' => ' '
);
}
$value['type'] = 'local';
$arr[$language] = $value;
}
return $arr;
}
/**
* Get Online Language-Pack Meta Data.
* @return array|bool
*/
public function getOnlineLanguagePacks()
{
$xml = e107::getXml();
$feed = 'https://e107.org/languagepacks.xml';
$version = e_VERSION;
if(!empty($version))
{
$tmp = explode("-", $version);
$ver = varset($tmp[0]);
$feed .= "?ver=". preg_replace('/[^\d\.]/','', $ver);
}
e107::getDebug()->log("Language Pack Feed: ".$feed);
$languages = array();
if($rawData = $xml -> loadXMLfile($feed, true))
{
if(empty($rawData['language']))
{
return false;
}
foreach($rawData['language'] as $key => $att)
{
// issue #3059 in case array @attributes is in $att
if (is_int($key) && is_array($att) && array_key_exists('@attributes', $att))
{
$att = $att['@attributes'];
}
// issue #3059 Language list didn't load
elseif ($key != '@attributes')
{
continue;
}
$id = $att['name'];
// fix github double url bug...
if (stripos($att['url'], 'https://github.comhttps://github.com') !== false)
{
$att['url'] = str_ireplace('https://github.comhttps://github.com', 'https://github.com', $att['url']);
}
if (stripos($att['infourl'], 'https://github.comhttps://github.com') !== false)
{
$att['infourl'] = str_ireplace('https://github.comhttps://github.com', 'https://github.com', $att['infourl']);
}
$languages[$id] = array(
'name' => $att['name'],
'author' => varset($att['author']),
'infoURL' => $att['infourl'],
'tag' => $att['tag'],
// 'folder' => $att['folder'],
'version' => $att['version'],
'date' => $att['date'],
'compatibility' => $att['compatibility'],
'url' => $att['url'],
'type' => 'online'
);
}
}
else
{
e107::getDebug()->log("Language Pack Feed Failed: ".$xml->getLastErrorMessage());
}
return $languages;
}
function check_all($mode='render', $lan=null)
{
// global $ns,$tp;
$mes = e107::getMessage();
$tp = e107::getParser();
if(empty($lan))
{
echo "debug: ".__METHOD__." missing \$lan";
return false;
}
// $lan = key($_POST['language_sel']);
$_SESSION['lancheck'][$lan] = array();
$_SESSION['lancheck'][$lan]['file'] = 0;
$_SESSION['lancheck'][$lan]['def'] = 0;
$_SESSION['lancheck'][$lan]['bom'] = 0;
$_SESSION['lancheck'][$lan]['utf'] = 0;
$_SESSION['lancheck'][$lan]['total'] = 0;
$core_text = $this->check_core_lanfiles($lan);
$core_admin = $this->check_core_lanfiles($lan,"admin/");
$plug_text = "";
$theme_text = "";
// Plugins -------------
$plug_header = "<table class='table table-striped'>
<tr>
<td class='fcaption'>".LAN_PLUGIN."</td>
<td class='fcaption'>".LAN_CHECK_16."</td>
<td class='fcaption'>".$lan."</td>
<td class='fcaption'>".LAN_OPTIONS."</td></tr>";
foreach($this->core_plugins as $plugs)
{
if(is_readable(e_PLUGIN.$plugs))
{
$plug_text .= $this->check_lanfiles('P',$plugs,"English",$lan);
}
}
$plug_footer = "</table>";
// Themes -------------
$theme_header = "<table class='table table-striped'>
<tr>
<td class='fcaption'>".LAN_THEME."</td>
<td class='fcaption'>".LAN_CHECK_16."</td>
<td class='fcaption'>".$lan."</td>
<td class='fcaption'>".LAN_OPTIONS."</td></tr>";
foreach($this->core_themes as $them)
{
if(is_readable(e_THEME.$them))
{
$theme_text .= $this->check_lanfiles('T',$them,"English",$lan);
}
}
$theme_footer = "</table>";
// -------------------------
if($mode != 'render')
{
return null;
}
$message = "
<form id='lancheck' method='post' action='".e_ADMIN."language.php?mode=main&action=tools'>
<div>\n";
// $icon = ($_SESSION['lancheck'][$lan]['total']>0) ? ADMIN_FALSE_ICON : ADMIN_TRUE_ICON;
$errors_diz = (deftrue('LAN_CHECK_23')) ? LAN_CHECK_23 : "Errors Found";
$message .= $errors_diz.": ".$_SESSION['lancheck'][$lan]['total'];
$just_go_diz = (deftrue('LAN_CHECK_20')) ? LAN_CHECK_20 : "Generate Language Pack";
$lang_sel_diz = (deftrue('LAN_CHECK_21')) ? LAN_CHECK_21 : "Verify Again";
$lan_pleasewait = (deftrue('LAN_PLEASEWAIT')) ? LAN_PLEASEWAIT : "Please Wait";
$message .= "
<br /><br />
<input type='hidden' name='language' value='".$lan."' />
<input type='hidden' name='errorsonly' value='".$_SESSION['lancheck-errors-only']."' />
<input class='btn btn-primary' type='submit' name='ziplang[".$lan."]' value=\"".$just_go_diz."\" onclick=\"this.value = '".$lan_pleasewait."'\" />
<a href='".e_REQUEST_URI."' class='btn btn-default'>".$lang_sel_diz."</a>
</div>
</form>
";
// print_a($_SESSION['lancheck'][$lan]);
$plug_text = ($plug_text) ? $plug_header.$plug_text.$plug_footer : "<div class='alert alert-success'>".LAN_OK."</div>";
$theme_text = ($theme_text) ? $theme_header.$theme_text.$theme_footer : "<div class='alert alert-success'>".LAN_OK."</div>";
$mesStatus = ($_SESSION['lancheck'][$lan]['total']>0) ? E_MESSAGE_INFO : E_MESSAGE_SUCCESS;
$mes->add($message, $mesStatus);
// $ns -> tablerender(LAN_SUMMARY.": ".$lan,$message);
$ret = array();
$ret['text'] = $mes->render();
$tabs = array(
'core' => array('caption'=> LAN_CHECK_26, 'text'=>$core_text),
'admin' => array('caption'=> LAN_ADMIN, 'text'=>$core_admin),
'plugin' => array('caption'=> ADLAN_CL_7, 'text'=>$plug_text),
'theme' => array('caption'=> LAN_THEMES, 'text'=>$theme_text),
);
$ret['text'] .= e107::getForm()->tabs($tabs);
$ret['caption'] = LAN_CHECK_2.SEP.$lan;
return $ret;
/*
$ns -> tablerender(LANG_LAN_21.SEP.$lan.SEP.LAN_CHECK_2, $core_text);
$ns -> tablerender(LAN_CHECK_3.": ".$lan."/admin", $core_admin);
$ns -> tablerender(ADLAN_CL_7, $plug_text);
$ns -> tablerender(LAN_THEMES, $theme_text); */
//TODO Add a return statement here.
}
function write_lanfile($lan='')
{
if(!$lan){ return; }
global $ns;
unset($input);
$kom_start = chr(47)."*";
$kom_end = "*".chr(47);
if(!empty($_SESSION['lancheck-edit-file']))
{
$writeit = $_SESSION['lancheck-edit-file'];
}
else
{
e107::getMessage()->addError("There is a problem with sessions");
return;
}
$old_kom = "";
$in_kom=0;
if(is_readable($writeit)) // File Exists;
{
$data = file($writeit);
foreach($data as $line)
{
if (strpos($line,$kom_start) !== False && $old_kom == "")
{
$in_kom=1;
}
if ($in_kom) { $old_kom .= $line; }
if (strpos($line,$kom_end) !== False && $in_kom) {$in_kom = 0;}
}
}
$message = "<div style='text-align:left'><br />";
$input = chr(60)."?php\n";
if ($old_kom == "")
{
// create CVS compatible description.
$diz = chr(47)."*\n";
$diz .= "+---------------------------------------------------------------+\n";
$diz .= "| e107 website content management system ".$lan." Language File\n";
$diz .= "| Released under the terms and conditions of the\n";
$diz .= "| GNU General Public License (http://gnu.org).\n";
$diz .= "| Last Modified: ".date("Y/m/d H:i:s")."\n";
$diz .= "|\n";
// $diz .= "| ".chr(36)."URL: $writeit ".chr(36)."\n";
// $diz .= "| ".chr(36)."Revision: 1.0 ".chr(36)."\n";
// $diz .= "| ".chr(36)."Id: ".date("Y/m/d H:i:s")." ".chr(36)."\n";
$diz .= "| ".chr(36)."Author: ".USERNAME." ".chr(36)."\n";
$diz .= "+---------------------------------------------------------------+\n";
$diz .= "*".chr(47)."\n\n";
}
else
{
$diz = $old_kom;
}
$input .= $diz;
$message .= str_replace("\n","<br />",$diz);
for ($i=0, $iMax = count($_POST['newlang']); $i< $iMax; $i++)
{
$notdef_start = "";
$notdef_end = "\n";
$deflang = (MAGIC_QUOTES_GPC === TRUE) ? stripslashes($_POST['newlang'][$i]) : $_POST['newlang'][$i];
$func = "define";
$quote = chr(34);
if (strpos($_POST['newdef'][$i],"ndef++") !== FALSE )
{
$defvar = str_replace("ndef++","",$_POST['newdef'][$i]);
$notdef_start = "if (!defined(".chr(34).$defvar.chr(34).")) {";
$notdef_end = "}\n";
}
else
{
$defvar = $_POST['newdef'][$i];
}
if(empty($deflang))
{
continue;
}
if($_POST['newdef'][$i] == "LC_ALL" && vartrue($_SESSION['lancheck-edit-file']))
{
$message .= $notdef_start.'setlocale('.htmlentities($defvar).','.$deflang.');<br />'.$notdef_end;
$input .= $notdef_start."setlocale(".$defvar.",".$deflang.");".$notdef_end;
}
else
{
$message .= $notdef_start.$func.'('.$quote.htmlentities($defvar).$quote.',"'.$deflang.'");<br />'.$notdef_end;
$input .= $notdef_start.$func."(".$quote.$defvar.$quote.", ".chr(34).$deflang.chr(34).");".$notdef_end;
}
}
$message .="<br />";
$message .="</div>";
/*
$input .= "\n\n?>";
*/
// Write to file.
$writeit = str_replace("//","/",$writeit); // Quick Fix.
$fp = @fopen($writeit,"w");
if(!@fwrite($fp, $input))
{
$caption = LAN_ERROR;
$message = LAN_CHECK_17;
$status = e107::getMessage()->addError($caption)->render();
}
else
{
// $caption = LAN_SAVED." <b>".$lan."/".$writeit."</b>";
$caption = LAN_SAVED." <b>".str_replace('..','',$writeit)."</b>";
$status = e107::getMessage()->addSuccess($caption)->render();
}
fclose($fp);
/*
$message .= "<form method='post' action='".e_SELF."?tools' id='select_lang'>
<div style='text-align:center'><br />";
$message .= "<br /><br /><input class='btn' type='submit' name='language_sel[".$lan."]' value=\"".LAN_BACK."\" />
</div></form>";*/
unset($_SESSION['lancheck-edit-file']);
$ns->tablerender($caption, $status. $message);
}
function check_core_lanfiles($checklan,$subdir='')
{
$tp = e107::getParser();
// $sql->db_Mark_Time('Start Get Core Lan Phrases English');
$English = $this->get_comp_lan_phrases(e_LANGUAGEDIR."English/".$subdir,"English");
// $sql->db_Mark_Time('End Get Core Lan Phrases English');
$check = $this->get_comp_lan_phrases(e_LANGUAGEDIR.$checklan."/".$subdir,$checklan);
// print_a($check);
// return;
$text = "";
$header = "<table class='table table-striped'>
<tr>
<th>".LAN_CHECK_16."</th>
<th>".$this->transLanguage." ".LAN_FILE."</th>
<th>".LAN_OPTIONS."</th></tr>";
$keys = array_keys($English);
sort($keys);
$er = "";
foreach($keys as $k)
{
if($k == 'bom')
{
continue;
}
$lnk = $k;
$k_check = str_replace("English",$checklan,$k);
if(array_key_exists($k,$check))
{
// $text .= "<tr><td class='forumheader3' style='width:45%'>{$lnk}</td>";
$subkeys = array_keys($English[$k]);
$er="";
$utf_error = "";
$bomkey = str_replace(".php","",$k_check);
if(!empty($check['bom'][$bomkey]))
{
$bom_error = "<i>".$tp->lanVars(LAN_CHECK_15,array("'<?php'","'?>'"))."</i><br />"; // illegal chars
$this->checkLog('bom',1);
}
else
{
$bom_error = "";
}
foreach($subkeys as $sk)
{
if($utf_error == "" && !empty($check[$k][$sk]) && !$this->is_utf8($check[$k][$sk]))
{
$utf_error = "<i>".LAN_CHECK_19."</i><br />";
$this->checkLog('utf',1);
}
if($sk == "LC_ALL"){
$check[$k][$sk] = str_replace(chr(34).chr(34),"",$check[$k][$sk]);
}
$er .= $this->check_lan_errors($English[$k],$check[$k],$sk);
}
if($this->errorsOnly == TRUE && !$er && !$utf_error && !$bom_error)
{
continue;
}
$text .= "<tr><td class='forumheader3' style='width:45%'>{$lnk}</td>";
$style = ($er) ? "forumheader2" : "forumheader3";
$text .= "<td class='{$style}' style='width:50%'><div class='smalltext'>";
$text .= $bom_error . $utf_error;
$text .= (!$er && !$bom_error && !$utf_error) ? defset('ADMIN_TRUE_ICON') : $er."<br />";
$text .= "</div></td>";
}
else
{
$this->checkLog('file',1);
// $this->newFile(e_LANGUAGEDIR.$checklan."/".$subdir.$lnk,$checklan);
$text .= "<tr>
<td class='forumheader3' style='width:45%'>{$lnk}</td>
<td class='forumheader' style='width:50%'>".LAN_CHECK_4."</td>"; // file missing.
}
// Leave in EDIT button for all entries - to allow re-translation of bad entries.
$subpath = ($subdir!='') ? $subdir.$k : $k;
$parms = $_GET;
$parms['sub'] = 'edit';
$parms['file'] = $subpath;
$parms['lan'] = $this->transLanguage;
$parms['iframe'] = 1;
$editUrl = e_REQUEST_SELF."?".http_build_query($parms,'&');
$text .="<td class='center' style='width:5%'>
<a href='".$editUrl."' data-modal-submit='true' data-modal-caption='".$subpath."' class='e-modal btn btn-primary' type='button'>".LAN_EDIT."</a>";
$text .="</td></tr>";
}
$footer = "</table>";
if($text)
{
return $header.$text.$footer;
}
else
{
return "<div>".LAN_OK."</div>";
}
}
function check_lan_errors($english,$translation,$def, $opts=array())
{
$eng_line = $english[$def];
$trans_line = !empty($translation[$def]) ? $translation[$def] : '';
// return $eng_line."<br />".$trans_line."<br /><br />";
$error = array();
$warning = array();
if((is_array($translation) && !array_key_exists($def,$translation) && $eng_line != "") || (trim($trans_line) == "" && $eng_line != ""))
{
$this->checkLog('def',1);
return $def.": ".LAN_CHECK_5."<br />";
}
if(empty($opts['no-warning']) && ($eng_line == $trans_line && !empty($eng_line)))
{
$warning[] = "<span class='text-warning'>".$def. ": ".LAN_CHECK_29."</span>";
}
if((strpos($eng_line,"[link=")!==FALSE && strpos($trans_line,"[link=")===FALSE) || (strpos($eng_line,"[b]")!==FALSE && strpos($trans_line,"[b]")===FALSE))
{
$error[] = $def. ": ".LAN_CHECK_30;
}
elseif((strpos($eng_line,"[")!==FALSE && strpos($trans_line,"[")===FALSE) || (strpos($eng_line,"]")!==FALSE && strpos($trans_line, "]")===FALSE))
{
$error[] = $def. ": ".LAN_CHECK_31;
}
if((strpos($eng_line,"--LINK--")!==false && strpos($trans_line,"--LINK--")===false))
{
$error[] = $def. ": Missing --LINK--";
}
if((strpos($eng_line,"e107.org")!==false && strpos($trans_line,"e107.org")===false))
{
$error[] = $def. ": Missing e107.org URL";
}
if((strpos($eng_line,"e107coders.org")!==FALSE && strpos($trans_line,"e107coders.org")===false))
{
$error[] = $def. ": Missing e107coders.org URL";
}
if(strip_tags($eng_line) != $eng_line)
{
$stripped = strip_tags($trans_line);
if(($stripped == $trans_line))
{
// echo "<br /><br />".$def. "<br />".$stripped."<br />".$trans_line;
$error[] = $def. ": ".LAN_CHECK_32;
}
}
$this->checkLog('def',count($error));
$text = ($error) ? implode("<br />",$error)."<br />" : "";
$text .= ($warning) ? implode("<br />",$warning)."<br />" : "";
if($text)
{
return $text;
}
}
function checkLog($type='error',$count=1)
{
$lan = $this->transLanguage;
$_SESSION['lancheck'][$lan][$type] += $count;
$_SESSION['lancheck'][$lan]['total'] += $count;
}
function get_lan_file_phrases($dir1,$dir2,$file1,$file2){
$ret = array();
$fname = $dir1.$file1;
$type='orig';
if(is_file($fname))
{
$data = file_get_contents($fname);
$ret= $ret + $this->fill_phrases_array($data,$type);
if(substr($data,0,5) != "<?php")
{
$key = str_replace(".php","",$fname);
$ret['bom'][$key] = $fname;
}
}
$fname = $dir2.$file2;
$type='tran';
if(is_file($fname))
{
$data = file_get_contents($fname);
$ret=$ret + $this->fill_phrases_array($data,$type);
if(substr($data,0,5) != "<?php")
{
$key = str_replace(".php","",$fname);
$ret['bom'][$key] = $fname;
}
}
elseif(substr($fname,-4) == ".php")
{
file_put_contents($fname,"<?php\n\n?>");
}
return $ret;
}
function get_comp_lan_phrases($comp_dir,$lang,$depth=0)
{
if(!is_dir($comp_dir))
{
return array();
}
$fl = e107::getFile();
$tp = e107::getParser();
$ret = array();
if($lang_array = $fl->get_files($comp_dir, ".php$","standard",$depth)){
sort($lang_array);
}
foreach($lang_array as $k=> $f)
{
$path = str_replace(e_LANGUAGEDIR.$lang."/", "", $f['path'].$f['fname']);
if(in_array($path, $this->deprecatedFiles))
{
unset($lang_array[$k]);
}
}
if(strpos($comp_dir,e_LANGUAGEDIR) !== false)
{
$regexp = "#.php#";
$mode = 'core';
}
elseif(strpos($comp_dir,e_THEME) !== false)
{
$regexp = "#".$lang."#";
$mode = 'themes';
// var_dump($lang_array);
}
else
{
$regexp = "#".$lang."#";
$mode = 'plugins';
}
// $regexp = (strpos($comp_dir,e_LANGUAGEDIR) !== FALSE) ? "#.php#" : "#".$lang."#";
foreach($lang_array as $f)
{
if($mode == 'plugins')
{
$tmpDir = str_replace($comp_dir,'',$f['path']);
// echo "<br />".$tmpDir;
list($pluginDirectory, $other) = explode("/",$tmpDir, 2);
if(($this->thirdPartyPlugins !== true) && !in_array($pluginDirectory, $this->core_plugins))
{
continue;
}
}
if($mode == 'themes')
{
$tmpDir = str_replace($comp_dir,'',$f['path']);
// echo "<br />".$tmpDir;
list($themeDirectory, $other) = explode("/",$tmpDir, 2);
if(($this->thirdPartyPlugins !== true) && !in_array($themeDirectory, $this->core_themes))
{
continue;
}
}
if(preg_match($regexp,$f['path'].$f['fname']) && is_file($f['path'].$f['fname']))
{
$allData = file_get_contents($f['path'].$f['fname']);
$data = explode("\n",$allData);
// $data = file($f['path'].$f['fname']);
$relpath = str_replace($comp_dir,"",$f['path']);
$key = str_replace(".php","",$relpath.$f['fname']);
if(substr($data[0],0,5) != "<?php")
{
$ret['bom'][$key] = $f['fname'];
}
$end_of_file = 0;
foreach($data as $line)
{
if($end_of_file == 1)
{
$ret['bom'][$key] = $f['fname'];
}
$line = trim($line);
if($line == "?>")
{
$end_of_file = 1;
}
}
if($f['path'].$f['fname'] == e_LANGUAGEDIR.$lang."/".$lang.".php")
{
$f['fname'] = "English.php"; // change the key for the main language file.
}
if($f['path'].$f['fname'] == e_LANGUAGEDIR.$lang."/".$lang."_custom.php")
{
$f['fname'] = "English_custom.php"; // change the key for the main language file.
}
$ret=$ret + $this->fill_phrases_array($allData,$relpath.$f['fname']);
}
}
return $ret;
}
// for plugins and themes - checkes what kind of language files directory structure we have
function check_lanfiles($mode,$comp_name,$base_lan="English",$target_lan=null)
{
if (empty($target_lan)) throw new RuntimeException(__METHOD__ . ' requires non-empty $target_lan');
$tp = e107::getParser();
$folder['P'] = e_PLUGIN.$comp_name;
$folder['T'] = e_THEME.$comp_name;
$comp_dir = $folder[$mode];
$baselang = $this->get_comp_lan_phrases($comp_dir."/languages/","English",1);
$check = $this->get_comp_lan_phrases($comp_dir."/languages/",$target_lan,1);
$text = "";
$keys = array_keys($baselang);
sort($keys);
foreach($keys as $k)
{
if($k == 'bom')
{
continue;
}
$lnk = $k;
//echo "klucz ".$k."<br />";
$k_check = str_replace("English",$target_lan,$k);
if(array_key_exists($k_check,$check))
{
$subkeys = array_keys($baselang[$k]);
$er="";
$utf_error = "";
$bomkey = str_replace(".php","",$k_check);
if($check['bom'][$bomkey])
{
$bom_error = "<i>".$tp->lanVars(LAN_CHECK_15,array("'<?php'","'?>'"))."</i><br />";
$this->checkLog('bom',1);
}
else
{
$bom_error = "";
}
// $bom_error = ($check['bom'][$bomkey]) ? "<i>".LAN_CHECK_15."</i><br />" : ""; // illegal chars
foreach($subkeys as $sk)
{
if($utf_error == "" && !empty($check[$k_check][$sk]) && !$this->is_utf8($check[$k_check][$sk]))
{
$utf_error = "<i>".LAN_CHECK_19."</i><br />";
$this->checkLog('utf',1);
}
/*
if(!array_key_exists($sk,$check[$k_check]) || (trim($check[$k_check][$sk]) == "" && $baselang[$k][$sk] != ""))
{
$er .= ($er) ? "<br />" : "";
$er .= $sk." ".LAN_CHECK_5;
}
*/
$er .= $this->check_lan_errors($baselang[$k],$check[$k_check],$sk);
}
if($this->errorsOnly == TRUE && !$er && !$utf_error && !$bom_error)
{
continue;
}
$text .= "<tr>
<td class='forumheader3' style='width:20%'>".$comp_name."</td>
<td class='forumheader3' style='width:25%'>".str_replace("English/","",$lnk)."</td>";
$style = ($er) ? "forumheader2" : "forumheader3";
$text .= "<td class='{$style}' style='width:50%'><div class='smalltext'>";
$text .= $bom_error . $utf_error;
$text .= (!$er && !$bom_error && !$utf_error) ? defset('ADMIN_TRUE_ICON') : $er."<br />";
$text .= "</div></td>";
}
else
{
$this->checkLog('file',1);
$this->newFile($comp_dir."/languages/".$lnk,$target_lan);
$text .= "<tr>
<td class='forumheader3' style='width:20%'>".$comp_name."</td>
<td class='forumheader3' style='width:25%'>".str_replace("English/","",$lnk)."</td>
<td class='forumheader' style='width:50%'><span style='cursor:pointer' title=\"".str_replace("English",$target_lan,$lnk)."\">".LAN_CHECK_4."</span></td>";
}
$text .="<td class='forumheader3' style='width:5%;text-align:center'>";
// $text .= "<input class='btn btn-primary' type='button' style='width:60px' name='but_$i' value=\"".LAN_EDIT."\" onclick=\"window.location='".e_SELF."?f=".$comp_dir."/languages/".$lnk."&lan=".$target_lan."&mode={$mode}'\" /> ";
$parms = $_GET;
$parms['sub'] = 'edit';
$parms['file'] = $comp_name."/languages/".$lnk;
$parms['lan'] = $this->transLanguage;
$parms['iframe'] = 1;
$parms['type'] = $mode;
$editUrl = e_REQUEST_SELF."?".http_build_query($parms,'&');
$text .= "<a href='".$editUrl."' class='e-modal btn btn-primary' data-modal-caption='".str_replace("../","",$comp_dir)."'>".LAN_EDIT."</a> "; // href='".e_REQUEST_URI."&f=".$comp_dir."/languages/".$lnk."&lan=".$target_lan."&type={$mode}'
// <a href='".$editUrl."' data-modal-caption='".$subpath."' class='e-modal btn btn-primary' type='button' style='width:60px'>".LAN_EDIT."</a>";
$text .="</td></tr>";
}
// if (!$known) {$text = LAN_CHECK_18." : --> ".$fname." :: ".$dname;}
return $text;
}
function newFile($lnk,$target_lan)
{
if($target_lan == 'English')
{
return;
}
$newfile = str_replace("English",$target_lan,$lnk);
$dir = dirname($newfile);
if($dir != '.' && !is_dir($dir))
{
// echo "<br />dir: ".$dir;
mkdir($dir,0755);
}
if(!file_exists($newfile))
{
// echo "<br />file: ".$newfile;
$data = chr(60)."?php\n\n// define(\"EXAMPLE\",\"Generated Empty Language File\");";
file_put_contents($newfile,$data);
}
}
function edit_lanfiles($dir1, $dir2, $f1, $f2, $lan, $type=null)
{
if($lan == '')
{
echo "Language selection was lost. ";
return null;
}
if($type === 'P')
{
$dir1 = e_PLUGIN.$dir1;
$dir2 = e_PLUGIN.$dir2;
}
if($type === 'T')
{
$dir1 = e_THEME.$dir1;
$dir2 = e_THEME.$dir2;
}
// $ns = e107::getRender();
$sql = e107::getDb();
/* echo "<br />dir1 = $dir1";
echo "<br />file1 = $f1";
echo "<br />dir2 = $dir2";
echo "<br />file2 = $f2";*/
if($dir2.$f2 == e_LANGUAGEDIR.$lan."/English.php") // it's a language config file.
{
$f2 = $lan.".php";
$root_file = e_LANGUAGEDIR.$lan."/".$lan.".php";
}
else
{
$root_file = $dir2.$f2;
}
if($dir2.$f2 == e_LANGUAGEDIR.$lan."/English_custom.php") // it's a language config file.
{
$f2 = $lan."_custom.php";
$root_file = e_LANGUAGEDIR.$lan."/".$lan."_custom.php";
}
$this->newFile($dir2.$f2,$lan);
$writable = is_writable($dir2);
$trans = $this->get_lan_file_phrases($dir1,$dir2,$f1,$f2);
if(empty($trans))
{
//return array('caption'=>"Error", 'text'=>"Unable to open file", 'mode'=>'edit', 'file'=>$capFile);
}
$keys = array_keys($trans);
sort($keys);
$text = "<div style='text-align:center'>
<form method='post' action='".e_SELF."?".e_QUERY."' id='transform'>
<table class='table table-striped'>
<thead>
<tr>
<th>LAN</th>
<th>English</th>
<th>".$lan."</th>
</tr>
</thead><tbody>";
$subkeys = array_keys($trans['orig']);
foreach($subkeys as $sk)
{
$rowamount = round(strlen($trans['orig'][$sk])/34)+1;
$hglt1=""; $hglt2="";
if(empty($trans['tran'][$sk]) && !empty($trans['orig'][$sk]))
{
$hglt1="<span class='label label-danger label-important e-tip' title='".LAN_MISSING."'>";//Missing
$hglt2="</span>";
}
elseif($trans['tran'][$sk] == $trans['orig'][$sk])
{
$hglt1="<span class='label label-warning e-tip' title='".LAN_CHECK_28."'>";//Identical
$hglt2="</span>";
}
$text .="<tr>
<td style='width:10%;vertical-align:top'>".$hglt1.htmlentities($sk).$hglt2."</td>
<td style='width:40%;vertical-align:top'>".htmlentities(str_replace("ndef++","",$trans['orig'][$sk])) ."</td>";
$text .= "<td class='forumheader3' style='width:50%;vertical-align:top'>";
$text .= ($writable) ? "<textarea class='input-xxlarge' name='newlang[]' rows='$rowamount' cols='45' style='height:100%'>" : "";
$text .= htmlentities(str_replace("ndef++","", varset($trans['tran'][$sk])));
$text .= ($writable) ? "</textarea>" : "";
//echo "orig --> ".$trans['orig'][$sk]."<br />";
if (strpos($trans['orig'][$sk],"ndef++") !== false)
{
//echo "+orig --> ".$trans['orig'][$sk]." <> ".strpos($trans['orig'][$sk],"ndef++")."<br />";
$text .= "<input type='hidden' name='newdef[]' value='ndef++".$sk."' />";
}
else
{
$text .= "<input type='hidden' name='newdef[]' value='".$sk."' />";
}
$text .="</td></tr>";
}
unset($_SESSION['lancheck-edit-file']);
//Check if directory is writable
$text .= "</tbody></table>";
if($writable)
{
$text .= '<div class="buttons-bar center">
<input type="hidden" name="lan" value="'.$lan.'" />
<button id="etrigger-submit" class="btn btn-warning" type="submit" name="saveLanguageFile" value="1" >'.LAN_SAVE.' '.str_replace($dir2,'',$root_file).'</button>
</div>';
if($root_file)
{
$_SESSION['lancheck-edit-file'] = $root_file;
}
}
$text .= "
</form>
</div>";
$text .= "<form method='post' action='".e_SELF."?tools' id='select_lang'>
<div style='text-align:center'><br />";
$text .= (!$writable) ? "<br />".$dir2.$f2.LAN_NOTWRITABLE : "";
// $text .= "<br /><br /><input class='btn' type='submit' name='language_sel[{$lan}]' value=\"".LAN_BACK."\" />";
$text .= "</div></form>";
$capFile = str_replace("../","",$dir2.$f2);
$caption = LANG_LAN_21.SEP.$lan.SEP.LAN_CHECK_2.SEP.LAN_EDIT.SEP.$capFile;
return array('caption'=>$caption, 'text'=>$text, 'mode'=>'edit', 'file'=>$capFile);
// $ns->tablerender($caption, $text);
}
function fill_phrases_array($data,$type)
{
$retloc = array();
if(preg_match_all('/(\/\*[\s\S]*?\*\/)/i',$data, $multiComment))
{
$data = str_replace($multiComment[1],'',$data); // strip multi-line comments.
}
if(preg_match('/^\s*?setlocale\s*?\(\s*?([\w]+)\s*?,\s*?(.+)\s*?\)\s*?;/im',$data,$locale)) // check for setlocale();
{
$retloc[$type][$locale[1]]= $locale[2];
}
if(preg_match_all('/^\s*?define\s*?\(\s*?(\'|\")([\w]+)(\'|\")\s*?,\s*?(\'|\")([\s\S]*?)\s*?(\'|\")\s*?\)\s*?;/imu',$data,$matches))
{
$def = $matches[2];
$values = $matches[5];
foreach($def as $k=>$d)
{
$retloc[$type][$d]= $values[$k];
}
}
return $retloc;
/*
echo "<h2>Raw Data ".$type."</h2><pre>";
echo htmlentities($data);
echo "</pre>";
*/
}
//--------------------------------------------------------------------
function is_utf8($str) {
/*
* @see http://hsivonen.iki.fi/php-utf8/ validation.php
*/
if(strtolower(CHARSET) != "utf-8" || $str == "")
{
return TRUE;
}
return (preg_match('/^./us',$str,$ar) == 1);
}
/**
* Clean-up definitions in a language file removed closing php tags and strip specific html..
* @param array $defKeys array of constants to comment out.
* @param string $path path to the language file to edit.
*/
function cleanFile($path, $defKeys=null)
{
if(empty($path) || !file_exists($path) || stripos($path,'English')!==false)
{
return null;
}
$content = file_get_contents($path);
$lines = explode("\n",$content);
$srch = array();
$repl = array();
$srch[] = '<b>';
$srch[] = '</b>';
$repl[] = '[b]';
$repl[] = '[/b]';
if(!empty($defKeys))
{
foreach($defKeys as $const)
{
$srch[] = "define('".$const."'";
$srch[] = 'define("'.$const.'"';
$repl[] = "// define('".$const."'";
$repl[] = '// define("'.$const.'"';
}
}
$new = '';
foreach($lines as $ln)
{
if(strpos($ln,'?>') !==false)
{ continue;
}
if(strpos($ln, '""') !== false || strpos($ln, "''") !== false) // empty
{
continue;
}
if(strpos($ln,'//') !==false)
{
$new .= $ln."\n";
continue;
}
if(!empty($srch))
{
$new .= str_replace($srch,$repl,$ln)."\n";
}
else
{
$new .= $ln."\n";
}
}
if(file_put_contents($path,$new))
{
return true;
}
return false;
}
}