<?php

/* $Revision: 1.10 $ */

/* Steve Kitchen */

/* This code is really ugly ... */

$PageSecurity = 15;

include ('includes/session.inc');

$title = _('Edit Module');

include('includes/header.inc');

/* Your webserver user MUST have read/write access to here,

otherwise you'll be wasting your time */

$PathToLanguage = './locale/' . $_SESSION['Language'] . '/LC_MESSAGES/messages.po';

$PathToNewLanguage = './locale/' . $_SESSION['Language'] . '/LC_MESSAGES/messages.po.new';

echo "<br>&nbsp;<a href='" . $rootpath . "/Z_poAdmin.php'>" . _('Back to the translation menu') . "</a>";

echo '<br><br>&nbsp;' . _('Utility to edit a language file module');

echo '<br>&nbsp;' . _('Current language is') . ' ' . $_SESSION['Language'];

echo '<br><br>&nbsp;' . _('To change language click on the user name at the top left, change to language desired and click Modify');

echo '<br>&nbsp;' . _('Make sure you have selected the correct language to translate!');

if (isset($_POST['ReMergePO'])){

/*update the messages.po file with any new strings */

/*first rebuild the en_GB default with xgettext */

$PathToDefault = './locale/en_GB/LC_MESSAGES/messages.po';

$FilesToInclude = '*php includes/*.php includes/*.inc';

$xgettextCmd = 'xgettext --no-wrap -L php -o ' . $PathToDefault . ' ' . $FilesToInclude;

system($xgettextCmd);

/*now merge the translated file with the new template to get new strings*/

$msgMergeCmd = 'msgmerge --no-wrap --update ' . $PathToLanguage . ' ' . $PathToDefault;

system($msgMergeCmd);

//$Result = rename($PathToNewLanguage, $PathToLanguage);

exit;

}

if (isset($_POST['module'])) {

// a module has been selected and is being modified

$PathToLanguage_mo = substr($PathToLanguage,0,strrpos($PathToLanguage,'.')) . '.mo';

/* now read in the language file */

$LangFile = file($PathToLanguage);

$LangFileEntries = sizeof($LangFile);

if (isset($_POST['submit'])) {

// save the modifications

echo '<br><table><tr><td>';

echo '<form method="post" action=' . $_SERVER['PHP_SELF'] . '?' . SID . '>';

/* write the new language file */

prnMsg (_('Writing the language file') . '.....<br>', 'info', ' ');

for ($i=17; $i<=$LangFileEntries; $i++) {

if (isset($_POST['msgstr_'.$i])) {

$LangFile[$i] = 'msgstr "' . htmlentities($_POST['moduletext_'.$i]) . '"' . "\n";

}

}

$fpOut = fopen($PathToNewLanguage, 'w');

for ($i=0; $i<=$LangFileEntries; $i++) {

$Result = fputs($fpOut, $LangFile[$i]);

}

$Result = fclose($fpOut);

/* Done writing, now move the original file to a .old */

/* and the new one to the default */

if (file_exists($PathToLanguage . '.old')) {

$Result = rename($PathToLanguage . '.old', $PathToLanguage . '.bak');

}

$Result = rename($PathToLanguage, $PathToLanguage . '.old');

$Result = rename($PathToNewLanguage, $PathToLanguage);

if (file_exists($PathToLanguage . '.bak')) {

$Result = unlink($PathToLanguage . '.bak');

}

/*now need to create the .mo file from the .po file */

$msgfmtCommand = 'msgfmt ' . $PathToLanguage . ' -o ' . $PathToLanguage_mo;

system($msgfmtCommand);

prnMsg (_('Done') . '<br>', 'info', ' ');

echo '</form>';

echo '</td></tr></table>';

/* End of Submit block */

} else {

/* now we need to parse the resulting array into something we can show the user */

$j = 1;

for ($i=17; $i<=$LangFileEntries; $i++) { /* start at line 18 to skip the header */

if (substr($LangFile[$i], 0, 2) == '#:') { /* it's a module reference */

$AlsoIn[$j] .= str_replace(' ','<br>', substr($LangFile[$i],3)) . '<br>';

} elseif (substr($LangFile[$i], 0 , 5) == 'msgid') {

$DefaultText[$j] = substr($LangFile[$i], 7, strlen($LangFile[$i])-9);

} elseif (substr($LangFile[$i], 0 , 6) == 'msgstr') {

$ModuleText[$j] = substr($LangFile[$i], 8, strlen($LangFile[$i])-10);

$msgstr[$j] = $i;

$j++;

}

}

$TotalLines = $j - 1;

/* stick it on the screen */

echo '<br>&nbsp;' . _('When finished modifying you must click on Modify at the bottom in order to save changes');

echo '<div class="centre">';

echo '<br>';

prnMsg (_('Your existing translation file (messages.po) will be saved as messages.po.old') . '<br>', 'info', _('PLEASE NOTE'));

echo '<br>';

echo '<form method="post" action=' . $_SERVER['PHP_SELF'] . '?' . SID . '>';

echo '</div';

echo '<table>';

echo '<tr><th ALIGN="center">' . _('Language File for') . ' "' . $_POST['language'] . '"</th></tr>';

echo '<tr><td ALIGN="center">' . _('Module') . ' "' . $_POST['module'] . '"</td></tr>';

echo '<tr><td></td></tr>';

echo '<tr><td>';

echo '<table WIDTH="100%">';

echo '<tr>';

echo '<th>' . _('Default text') . '</th>';

echo '<th>' . _('Translation') . '</th>';

echo '<th>' . _('Exists in') . '</th>';

echo '</tr>' . "\n";

for ($i=1; $i<=$TotalLines; $i++) {

$b = strpos($AlsoIn[$i], $_POST['module']);

if ($b === False) {

/* skip it */

} else {

echo '<tr>';

echo '<td VALIGN="top"><I>' . $DefaultText[$i] . '</I></td>';

echo '<td VALIGN="top"><input type="text" size="60" name="moduletext_' . $msgstr[$i] . '" VALUE="' . $ModuleText[$i] . '"></td>';

echo '<td VALIGN="top">' . $AlsoIn[$i] . '<input type="hidden" name="msgstr_' . $msgstr[$i] . '" VALUE="' . $msgstr[$i] . '"></td>';

echo '</tr>';

echo '<tr><th colspan="3"></th></tr>';

}

}

echo '</table>';

echo '</td></tr>';

echo '</table>';

echo '<br><div class="centre">';

echo '<input type="Submit" name="submit" VALUE="' . _('Modify') . '">&nbsp;&nbsp;';

echo '<input type="hidden" name="module" VALUE="' . $_POST['module'] . '">';

echo '</form>';

echo '</div>';

}

} else {

/* get available modules */

/* This is a messy way of producing a directory listing of ./locale to fish out */

/* the language directories that have been set up */

/* The other option would be to define an array of the languages you want */

/* and check for the existance of the directory */

/* $ListDirCmd should probably be defined in config.php as a global value */

/* You'll need to change it if you are running a Windows server - sorry !! */

if ($handle = opendir('.')) {

$i=0;

while (false !== ($file = readdir($handle))) {

if ((substr($file, 0, 1) != ".") && (!is_dir($file))) {

$AvailableModules[$i] = $file;

$i += 1;

}

}

closedir($handle);

}

if ($handle = opendir(".//includes")) {

while (false !== ($file = readdir($handle))) {

if ((substr($file, 0, 1) != ".") && (!is_dir($file))) {

$AvailableModules[$i] = $file;

$i += 1;

}

}

closedir($handle);

}

sort($AvailableModules);

$NumberOfModules = sizeof($AvailableModules) - 1;

if (!is_writable('./locale/' . $_SESSION['Language'])) {

prnMsg(_('You do not have write access to the required files please contact your system administrator'),'error');

}

else

{

echo '<br><table><tr><td>';

echo '<form method="post" action=' . $_SERVER['PHP_SELF'] . '?' . SID . '>';

echo '<table>';

echo '<tr><td>' . _('Select the module to edit') . '</td>';

echo '<td><select name="module">';

for ($i=0; $i<$NumberOfModules; $i++) {

echo '<option>' . $AvailableModules[$i] . '</option>';

}

echo '</select></td>';

echo '</tr></table>';

echo '<br>';

echo '<div class="centre">';

echo '<input type="Submit" name="proceed" VALUE="' . _('Proceed') . '">&nbsp;&nbsp;';

echo '<br><br><input type="Submit" name="ReMergePO" VALUE="' . _('Refresh messages with latest strings') . '">';

echo '</div>';

echo '</form>';

echo '</td></tr></table>';

}

}

include('includes/footer.inc');

?>