translation.php

Go to the documentation of this file.

<?php
/* Copyright (C) 2007-2020  Laurent Destailleur <eldy@users.sourceforge.net>
 * Copyright (C) 2009-2017  Regis Houssin   <regis.houssin@inodbox.com>
 * Copyright (C) 2017-2024  Frédéric France     <frederic.france@free.fr>
 * Copyright (C) 2024   MDW             <mdeweerd@users.noreply.github.com>
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 3 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program. If not, see <https://www.gnu.org/licenses/>.
 */
 
// Load Dolibarr environment
require '../main.inc.php';
require_once DOL_DOCUMENT_ROOT.'/core/lib/admin.lib.php';
require_once DOL_DOCUMENT_ROOT.'/core/lib/files.lib.php';
require_once DOL_DOCUMENT_ROOT.'/core/class/html.formadmin.class.php';
 
// Load translation files required by the page
$langs->loadLangs(array("companies", "products", "admin", "sms", "other", "errors"));
 
if (!$user->admin) {
  accessforbidden();
}
 
$id = GETPOSTINT('rowid');
$action = GETPOST('action', 'aZ09');
$optioncss = GETPOST('optionscss', 'aZ09');
$contextpage = GETPOST('contextpage', 'aZ09');
 
$mode = GETPOST('mode', 'aZ09') ? GETPOST('mode', 'aZ09') : 'searchkey';
 
$langcode = GETPOST('langcode', 'alphanohtml');
$transkey = GETPOST('transkey', 'alphanohtml');
if ($mode == 'searchkey') {
  $transvalue = GETPOST('transvalue', 'alphanohtml');
} else {
  $transvalue = GETPOST('transvalue', 'restricthtml');
}
 
$entity = $conf->entity;
if (isModEnabled('multicompany') && !$user->entity) {
  $entity = GETPOST('entity', 'int');
}
 
// Load variable for pagination
$limit = GETPOSTINT('limit') ? GETPOSTINT('limit') : $conf->liste_limit;
$sortfield = GETPOST('sortfield', 'aZ09comma');
$sortorder = GETPOST('sortorder', 'aZ09comma');
$page = GETPOSTISSET('pageplusone') ? (GETPOSTINT('pageplusone') - 1) : GETPOSTINT("page");
if (empty($page) || $page < 0 || GETPOST('button_search', 'alpha') || GETPOST('button_removefilter', 'alpha')) {
  // If $page is not defined, or '' or -1 or if we click on clear filters
  $page = 0;
}
$offset = $limit * $page;
$pageprev = $page - 1;
$pagenext = $page + 1;
if (!$sortfield) {
  $sortfield = 'lang,transkey';
}
if (!$sortorder) {
  $sortorder = 'ASC,ASC';
}
 
// Initialize a technical object to manage hooks of page. Note that conf->hooks_modules contains an array of hook context
$hookmanager->initHooks(array('admintranslation', 'globaladmin'));
 
 
/*
 * Actions
 */
$error = 0;
 
if (GETPOST('cancel', 'alpha')) {
  $action = 'list';
  $massaction = '';
}
if (!GETPOST('confirmmassaction', 'alpha') && !empty($massaction) && $massaction != 'presend' && $massaction != 'confirm_presend') {
  $massaction = '';
}
 
$parameters = array();
$reshook = $hookmanager->executeHooks('doActions', $parameters, $object, $action); // Note that $action and $object may have been modified by some hooks
if ($reshook < 0) {
  setEventMessages($hookmanager->error, $hookmanager->errors, 'errors');
}
 
include DOL_DOCUMENT_ROOT.'/core/actions_changeselectedfields.inc.php';
 
// Purge search criteria
if (GETPOST('button_removefilter_x', 'alpha') || GETPOST('button_removefilter.x', 'alpha') || GETPOST('button_removefilter', 'alpha')) { // All tests are required to be compatible with all browsers
  $transkey = '';
  $transvalue = '';
  $toselect = array();
  $search_array_options = array();
}
 
if ($action == 'setMAIN_ENABLE_OVERWRITE_TRANSLATION') {
  if (GETPOST('value')) {
    dolibarr_set_const($db, 'MAIN_ENABLE_OVERWRITE_TRANSLATION', 1, 'chaine', 0, '', $conf->entity);
  } else {
    dolibarr_set_const($db, 'MAIN_ENABLE_OVERWRITE_TRANSLATION', 0, 'chaine', 0, '', $conf->entity);
  }
}
 
if ($action == 'update') {
  if ($transkey == '') {
    setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("TranslationKey")), null, 'errors');
    $error++;
  }
  if ($transvalue == '') {
    setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("NewTranslationStringToShow")), null, 'errors');
    $error++;
  }
  if ($entity == '') {
    setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("Entity")), null, 'errors');
    $error++;
  }
  if (!$error) {
    $db->begin();
 
    $sql = "UPDATE " . MAIN_DB_PREFIX . "overwrite_trans set transkey = '" . $db->escape(
        $transkey
      ) . "', transvalue = '" . $db->escape($transvalue) . "', entity = '" . $db->escape(
        $entity
      ) . "' WHERE rowid = " . ((int) GETPOST('rowid', 'int'));
 
    $result = $db->query($sql);
    if ($result) {
      $db->commit();
      setEventMessages($langs->trans("RecordSaved"), null, 'mesgs');
      $action = "";
      $transkey = "";
      $transvalue = "";
    } else {
      $db->rollback();
      if ($db->lasterrno() == 'DB_ERROR_RECORD_ALREADY_EXISTS') {
        setEventMessages($langs->trans("WarningAnEntryAlreadyExistForTransKey"), null, 'warnings');
      } else {
        setEventMessages($db->lasterror(), null, 'errors');
      }
      $action = '';
    }
  }
}
 
if ($action == 'add') {
  $error = 0;
 
  if (empty($langcode)) {
    setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("Language")), null, 'errors');
    $error++;
  }
  if ($transkey == '') {
    setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("TranslationKey")), null, 'errors');
    $error++;
  }
  if ($transvalue == '') {
    setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("NewTranslationStringToShow")), null, 'errors');
    $error++;
  }
  if (!$error) {
    $db->begin();
 
    $sql = "INSERT INTO ".MAIN_DB_PREFIX."overwrite_trans(lang, transkey, transvalue, entity) VALUES ('".$db->escape($langcode)."','".$db->escape($transkey)."','".$db->escape($transvalue)."', ".((int) $conf->entity).")";
    $result = $db->query($sql);
    if ($result) {
      $db->commit();
      setEventMessages($langs->trans("RecordSaved"), null, 'mesgs');
      $action = "";
      $transkey = "";
      $transvalue = "";
    } else {
      $db->rollback();
      if ($db->lasterrno() == 'DB_ERROR_RECORD_ALREADY_EXISTS') {
        setEventMessages($langs->trans("WarningAnEntryAlreadyExistForTransKey"), null, 'warnings');
      } else {
        setEventMessages($db->lasterror(), null, 'errors');
      }
      $action = '';
    }
  }
}
 
// Delete line from delete picto
if ($action == 'delete') {
  $sql = "DELETE FROM ".MAIN_DB_PREFIX."overwrite_trans WHERE rowid = ".((int) $id);
  $result = $db->query($sql);
  if ($result) {
    setEventMessages($langs->trans("RecordDeleted"), null, 'mesgs');
  } else {
    dol_print_error($db);
  }
}
 
 
 
 
 
/*
 * View
 */
 
$form = new Form($db);
$formadmin = new FormAdmin($db);
 
$wikihelp = 'EN:Setup_Translation|FR:Paramétrage_Traduction|ES:Configuración_Traducción';
$title = $langs->trans("Translation");
llxHeader('', $title, $wikihelp, '', 0, 0, '', '', '', 'mod-admin page-translation');
 
$param = '&mode='.urlencode($mode);
 
$enabledisablehtml = '<span class="divfilteralone">';
if (!getDolGlobalString('MAIN_ENABLE_OVERWRITE_TRANSLATION')) {
  // Button off, click to enable
  $enabledisablehtml .= '<a class="reposition valignmiddle nounderlineimp" href="'.$_SERVER["PHP_SELF"].'?action=setMAIN_ENABLE_OVERWRITE_TRANSLATION&token='.newToken().'&value=1'.$param.'">';
} else {
  $enabledisablehtml .= '<a class="reposition valignmiddle nounderlineimp" href="'.$_SERVER["PHP_SELF"].'?action=setMAIN_ENABLE_OVERWRITE_TRANSLATION&token='.newToken().'&value=0'.$param.'">';
}
$enabledisablehtml .= $langs->trans("EnableOverwriteTranslation");
if (!getDolGlobalString('MAIN_ENABLE_OVERWRITE_TRANSLATION')) {
  // Button off, click to enable
  $enabledisablehtml .= img_picto($langs->trans("Disabled"), 'switch_off', 'class="paddingleft valignmiddle"');
} else {
  // Button on, click to disable
  $enabledisablehtml .= img_picto($langs->trans("Activated"), 'switch_on', 'class="paddingleft valignmiddle"');
}
$enabledisablehtml .= '</a>';
$enabledisablehtml .= '</span>';
 
$current_language_code = $langs->defaultlang;
$s = picto_from_langcode($current_language_code);
$infoOnCurrentLang = $form->textwithpicto('<span class="opacitymedium">'.$langs->trans("CurrentUserLanguage").':</span> <strong>'.$s.' '.$current_language_code.'</strong>', $langs->trans("TranslationDesc")).'</span><br>';
if (!empty($conf->dol_optimize_smallscreen)) {
  $infoOnCurrentLang = 1;
}
 
print load_fiche_titre($title, $enabledisablehtml, 'language', 0, '', '', $infoOnCurrentLang);
 
 
if (!empty($contextpage) && $contextpage != $_SERVER["PHP_SELF"]) {
  $param .= '&contextpage='.urlencode($contextpage);
}
if ($limit > 0 && $limit != $conf->liste_limit) {
  $param .= '&limit='.((int) $limit);
}
if (isset($optioncss) && $optioncss != '') {
  $param .= '&optioncss='.urlencode($optioncss);
}
if ($langcode) {
  $param .= '&langcode='.urlencode($langcode);
}
if ($transkey) {
  $param .= '&transkey='.urlencode($transkey);
}
if ($transvalue) {
  $param .= '&transvalue='.urlencode($transvalue);
}
 
 
print '<form action="'.$_SERVER["PHP_SELF"].'" method="POST">';
if ($optioncss != '') {
  print '<input type="hidden" name="optioncss" value="'.$optioncss.'">';
}
print '<input type="hidden" name="token" value="'.newToken().'">';
print '<input type="hidden" name="formfilteraction" id="formfilteraction" value="list">';
print '<input type="hidden" name="sortfield" value="'.$sortfield.'">';
print '<input type="hidden" name="sortorder" value="'.$sortorder.'">';
 
$head = translation_prepare_head();
 
print dol_get_fiche_head($head, $mode, '', -1, '');
 
 
$langcode = GETPOSTISSET('langcode') ? GETPOST('langcode') : $langs->defaultlang;
 
$newlang = new Translate('', $conf);
$newlang->setDefaultLang($langcode);
 
$langsenfileonly = new Translate('', $conf);
$langsenfileonly->setDefaultLang('en_US');
 
$newlangfileonly = new Translate('', $conf);
$newlangfileonly->setDefaultLang($langcode);
 
$recordtoshow = array();
 
// Search modules dirs
$modulesdir = dolGetModulesDirs();
 
$listoffiles = array();
$listoffilesexternalmodules = array();
 
// Search into dir of modules (the $modulesdir is already a list that loop on $conf->file->dol_document_root)
$i = 0;
foreach ($modulesdir as $keydir => $tmpsearchdir) {
  $searchdir = $tmpsearchdir; // $searchdir can be '.../htdocs/core/modules/' or '.../htdocs/custom/mymodule/core/modules/'
 
  // Directory of translation files
  $dir_lang = dirname(dirname($searchdir))."/langs/".$langcode; // The 2 dirname is to go up in dir for 2 levels
  $dir_lang_osencoded = dol_osencode($dir_lang);
 
  $filearray = dol_dir_list($dir_lang_osencoded, 'files', 0, '', '', "name", SORT_ASC, 1);
 
  foreach ($filearray as $file) {
    $tmpfile = preg_replace('/.lang/i', '', basename($file['name']));
    $moduledirname = (basename(dirname(dirname($dir_lang))));
 
    $langkey = $tmpfile;
    if ($i > 0) {
      $langkey .= '@'.$moduledirname;
    }
    //var_dump($i.' - '.$keydir.' - '.$dir_lang_osencoded.' -> '.$moduledirname . ' / ' . $tmpfile.' -> '.$langkey);
 
    // @phan-suppress-next-line PhanPluginSuspiciousParamPosition
    $result = $newlang->load($langkey, 0, 0, '', 0); // Load translation files + database overwrite
    // @phan-suppress-next-line PhanPluginSuspiciousParamPosition
    $result = $newlangfileonly->load($langkey, 0, 0, '', 1); // Load translation files only
    if ($result < 0) {
      print 'Failed to load language file '.$tmpfile.'<br>'."\n";
    } else {
      $listoffiles[$langkey] = $tmpfile;
      if (strpos($langkey, '@') !== false) {
        $listoffilesexternalmodules[$langkey] = $tmpfile;
      }
    }
    //print 'After loading lang '.$langkey.', newlang has '.count($newlang->tab_translate).' records<br>'."\n";
 
    // @phan-suppress-next-line PhanPluginSuspiciousParamPosition
    $result = $langsenfileonly->load($langkey, 0, 0, '', 1); // Load translation files only
  }
  $i++;
}
 
$nbtotaloffiles = count($listoffiles);
$nbtotaloffilesexternal = count($listoffilesexternalmodules);
 
if ($mode == 'overwrite') {
  print '<input type="hidden" name="page" value="'.$page.'">';
 
  $disabled = '';
  if ($action == 'edit' || !getDolGlobalString('MAIN_ENABLE_OVERWRITE_TRANSLATION')) {
    $disabled = ' disabled="disabled"';
  }
  $disablededit = '';
  if ($action == 'edit' || !getDolGlobalString('MAIN_ENABLE_OVERWRITE_TRANSLATION')) {
    $disablededit = ' disabled';
  }
 
  $text = $langs->trans("SomeTranslationAreUncomplete");
  $urlwikitranslatordoc = 'https://wiki.dolibarr.org/index.php/Translator_documentation';
  $text .= ' - <a href="'.$urlwikitranslatordoc.'" target="_blank" rel="noopener noreferrer external">'.$langs->trans("SeeAlso", $langs->transnoentitiesnoconv("Here")).' '.img_picto('', 'url').'</a>.<br>';
  $infoOnTransProcess = info_admin($text);
 
  $infoOnTransProcess .= '<div class="justify info">';
  $infoOnTransProcess .= '<span class="">';
  $infoOnTransProcess .= $langs->trans("TranslationOverwriteDesc", $langs->transnoentitiesnoconv("Language"), $langs->transnoentitiesnoconv("TranslationKey"), $langs->transnoentitiesnoconv("NewTranslationStringToShow"))."\n";
  $infoOnTransProcess .= ' ('.$langs->trans("TranslationOverwriteDesc2").').'."<br>\n";
  $infoOnTransProcess .= '</span></div>';
 
  // If a cache for translation is on, show a warning.
  if (isModEnabled('memcached') || getDolGlobalInt('MAIN_USE_CACHE_FOR_TRANSLATION')) {
    $infoOnTransProcess .= info_admin($langs->trans("CacheForTranslationIsUsed"), 0, 0, '1', 'warning');
  }
 
  print $infoOnTransProcess;
 
  print '<br>';
 
 
  print '<input type="hidden" name="action" value="'.($action == 'edit' ? 'update' : 'add').'">';
  print '<input type="hidden" id="mode" name="mode" value="'.$mode.'">';
 
  print '<div class="div-table-responsive-no-min">';
  print '<table class="noborder centpercent">';
  print '<tr class="liste_titre">';
  print_liste_field_titre("Language_en_US_es_MX_etc", $_SERVER["PHP_SELF"], 'lang,transkey', '', $param, '', $sortfield, $sortorder);
  print_liste_field_titre("TranslationKey", $_SERVER["PHP_SELF"], 'transkey', '', $param, '', $sortfield, $sortorder);
  print_liste_field_titre("NewTranslationStringToShow", $_SERVER["PHP_SELF"], 'transvalue', '', $param, '', $sortfield, $sortorder);
  if (isModEnabled('multicompany') && !$user->entity) {
    print_liste_field_titre("Entity", $_SERVER["PHP_SELF"], 'Entity', '', $param, '', $sortfield, $sortorder, 'center ');
  }
  print '<td></td>';
  print "</tr>\n";
 
 
  // Line to add new record
  print "\n";
 
  print '<tr class="oddeven">';
 
  // Lang
  print '<td>';
  print $formadmin->select_language(GETPOST('langcode'), 'langcode', 0, array(), 1, 0, $disablededit ? 1 : 0, 'minwidth100 maxwidth250', 1);
  print '</td>'."\n";
 
  // Trans key
  print '<td>';
  print '<input type="text" class="flat maxwidthonsmartphone"'.$disablededit.' name="transkey" id="transkey" value="'.(!empty($transkey) ? $transkey : "").'">';
  print '</td>';
 
  // Value
  print '<td>';
  print '<input type="text" class="quatrevingtpercent"'.$disablededit.' name="transvalue" id="transvalue" value="'.(!empty($transvalue) ? $transvalue : "").'">';
  print '</td>';
 
  // Multi company
  if (isModEnabled('multicompany') && !$user->entity) {
    print '<td class="center">';
    print '<input type="text" class="width50 center"' . $disablededit . ' name="entity" id="entity" value="' . (!empty($entity) ? $entity : "") . '">';
    print '</td>';
  }
 
  print '<td class="center">';
  print '<input type="hidden" name="entity" value="'.$conf->entity.'">';
  print '<input type="submit" class="button"'.$disabled.' value="'.$langs->trans("Add").'" name="add" title="'.dol_escape_htmltag($langs->trans("YouMustEnableTranslationOverwriteBefore")).'">';
  print "</td>\n";
  print '</tr>';
 
  // Show constants
  $sql = "SELECT rowid, entity, lang, transkey, transvalue";
  $sql .= " FROM ".MAIN_DB_PREFIX."overwrite_trans";
  $sql .= " WHERE 1 = 1";
  $sql .= " AND entity IN (".getEntity('overwrite_trans').")";
  $sql .= $db->order($sortfield, $sortorder);
 
  dol_syslog("translation::select from table", LOG_DEBUG);
  $result = $db->query($sql);
  if ($result) {
    $num = $db->num_rows($result);
    $i = 0;
 
    while ($i < $num) {
      $obj = $db->fetch_object($result);
 
      print "\n";
 
      print '<tr class="oddeven">';
 
      // Lang
      print '<td>'.dol_escape_htmltag($obj->lang).'</td>'."\n";
 
      // Trans key
      print '<td>';
      if ($action == 'edit' && $obj->rowid == GETPOSTINT('rowid')) {
        print '<input type="text" class="quatrevingtpercent" name="transkey" value="'.dol_escape_htmltag($obj->transkey).'">';
      } else {
        print dol_escape_htmltag($obj->transkey);
      }
      print '</td>'."\n";
 
      // Value
      print '<td class="small">';
      /*print '<input type="hidden" name="const['.$i.'][rowid]" value="'.$obj->rowid.'">';
      print '<input type="hidden" name="const['.$i.'][lang]" value="'.$obj->lang.'">';
      print '<input type="hidden" name="const['.$i.'][name]" value="'.$obj->transkey.'">';
      print '<input type="text" id="value_'.$i.'" class="flat inputforupdate" size="30" name="const['.$i.'][value]" value="'.dol_escape_htmltag($obj->transvalue).'">';
      */
      if ($action == 'edit' && $obj->rowid == GETPOSTINT('rowid')) {
        print '<input type="text" class="quatrevingtpercent" name="transvalue" value="'.dol_escape_htmltag($obj->transvalue).'">';
      } else {
        //print $obj->transkey.' '.$langsenfileonly->tab_translate[$obj->transkey];
        $titleforvalue = $langs->trans("Translation").' en_US for key '.$obj->transkey.':<br>'.(!empty($langsenfileonly->tab_translate[$obj->transkey]) ? $langsenfileonly->trans($obj->transkey) : '<span class="opacitymedium">'.$langs->trans("None").'</span>');
        /*if ($obj->lang != 'en_US') {
          $titleforvalue .= '<br>'.$langs->trans("Translation").' '.$obj->lang.' '...;
        }*/
        print '<span title="'.dol_escape_htmltag($titleforvalue).'" class="classfortooltip">';
        print dol_escape_htmltag($obj->transvalue);
        print '</span>';
      }
      print '</td>';
 
      // Entity limit to superadmin
      if (isModEnabled('multicompany') && empty($user->entity)) {
        print '<td class="center">';
        if ($action == 'edit' && $obj->rowid == GETPOSTINT('rowid')) {
          print '<input type="text" class="flat" size="1" name="entity" value="' . ((int) $obj->entity) . '">';
        } else {
          print dol_escape_htmltag($obj->entity);
        }
        print '</td>';
      } else {
        print '<input type="hidden" name="const[' . $i . '][entity]" value="' . ((int) $obj->entity) . '">';
      }
 
      print '<td class="center">';
      if ($action == 'edit' && $obj->rowid == GETPOSTINT('rowid')) {
        print '<input type="hidden" class="button" name="rowid" value="'.$obj->rowid.'">';
        print '<input type="submit" class="button buttongen button-save" name="save" value="'.dol_escape_htmltag($langs->trans("Save")).'">';
        print ' &nbsp; ';
        print '<input type="submit" class="button buttongen button-cancel" name="cancel" value="'.dol_escape_htmltag($langs->trans("Cancel")).'">';
      } else {
        print '<a class="reposition editfielda paddingrightonly" href="'.$_SERVER['PHP_SELF'].'?rowid='.$obj->rowid.'&entity='.$obj->entity.'&mode='.urlencode($mode).'&action=edit&token='.newToken().'">'.img_edit().'</a>';
        print ' &nbsp; ';
        print '<a class="reposition" href="'.$_SERVER['PHP_SELF'].'?rowid='.$obj->rowid.'&entity='.$obj->entity.'&mode='.urlencode($mode).'&action=delete&token='.newToken().'">'.img_delete().'</a>';
      }
      print '</td>';
 
      print "</tr>\n";
      print "\n";
      $i++;
    }
  }
 
  print '</table>';
  print '</div>';
}
 
if ($mode == 'searchkey') {
  $nbempty = 0;
  //var_dump($langcode);
  //var_dump($transkey);
  //var_dump($transvalue);
  if (empty($langcode) || $langcode == '-1') {
    $nbempty++;
  }
  if (empty($transkey)) {
    $nbempty++;
  }
  if (empty($transvalue)) {
    $nbempty++;
  }
 
  if ($action == 'search' && ($nbempty > 999)) {    // 999 to disable this @phpstan-ignore-line
    setEventMessages($langs->trans("WarningAtLeastKeyOrTranslationRequired"), null, 'warnings');
  } else {
    // Now search into translation array
    foreach ($newlang->tab_translate as $key => $val) {
      $newtranskey = preg_replace('/\$$/', '', preg_replace('/^\^/', '', $transkey));
      $newtranskeystart = preg_match('/^\^/', $transkey);
      $newtranskeyend = preg_match('/\$$/', $transkey);
      $regexstring = ($newtranskeystart ? '^' : '').preg_quote($newtranskey, '/').($newtranskeyend ? '$' : '');
      if ($transkey && !preg_match('/'.$regexstring.'/i', $key)) {
        continue;
      }
      if ($transvalue && !preg_match('/'.preg_quote($transvalue, '/').'/i', $val)) {
        continue;
      }
      $recordtoshow[$key] = $val;
    }
  }
 
  //print '<br>';
  $nbtotalofrecordswithoutfilters = count($newlang->tab_translate);
  $nbtotalofrecords = count($recordtoshow);
  $num = $limit + 1;
  if (($offset + $num) > $nbtotalofrecords) {
    $num = $limit;
  }
 
  //print 'param='.$param.' $_SERVER["PHP_SELF"]='.$_SERVER["PHP_SELF"].' num='.$num.' page='.$page.' nbtotalofrecords='.$nbtotalofrecords." sortfield=".$sortfield." sortorder=".$sortorder;
  $title = $langs->trans("Translation");
  if ($nbtotalofrecords > 0) {
    $title .= ' <span class="opacitymedium colorblack paddingleft small">('.$nbtotalofrecords.' / '.$nbtotalofrecordswithoutfilters.' - <span title="'.dol_escape_htmltag(($nbtotaloffiles - $nbtotaloffilesexternal).' core - '.($nbtotaloffilesexternal).' external').'">'.$nbtotaloffiles.' '.$langs->trans("Files").'</span>)</span>';
  }
  print_barre_liste($title, $page, $_SERVER["PHP_SELF"], $param, $sortfield, $sortorder, '', $num, -1 * $nbtotalofrecords, '', 0, '', '', $limit, 0, 0, 1);
 
  $massactionbutton = '';
 
  print '<input type="hidden" id="action" name="action" value="search">';
  print '<input type="hidden" id="mode" name="mode" value="'.$mode.'">';
 
  print '<div class="div-table-responsive-no-min">';
  print '<table class="noborder centpercent">';
 
  print '<tr class="liste_titre liste_titre_filter">';
  // Action column
  if ($conf->main_checkbox_left_column) {
    print '<td class="center nowraponall">';
    $searchpicto = $form->showFilterAndCheckAddButtons(!empty($massactionbutton) ? 1 : 0, 'checkforselect', 1);
    print $searchpicto;
    print '</td>';
  }
  print '<td>';
  print $formadmin->select_language($langcode, 'langcode', 0, array(), 0, 0, 0, 'minwidth100 maxwidth250', 1);
  print '</td>'."\n";
  print '<td>';
  print '<input type="text" class="flat maxwidthonsmartphone" name="transkey" value="'.dol_escape_htmltag($transkey).'">';
  print '</td><td>';
  print '<input type="text" class="quatrevingtpercent" name="transvalue" value="'.dol_escape_htmltag($transvalue).'">';
  print '<input type="hidden" name="entitysearch" value="'.$conf->entity.'">';
  print '</td>';
  print '<td></td>';
  // Action column
  if (!$conf->main_checkbox_left_column) {
    print '<td class="right nowraponall">';
    $searchpicto = $form->showFilterAndCheckAddButtons(!empty($massactionbutton) ? 1 : 0, 'checkforselect', 1);
    print $searchpicto;
    print '</td>';
  }
  print '</tr>';
 
  print '<tr class="liste_titre">';
  // Action column
  if ($conf->main_checkbox_left_column) {
    print_liste_field_titre("");
  }
  print_liste_field_titre("Language_en_US_es_MX_etc", $_SERVER["PHP_SELF"], 'lang,transkey', '', $param, '', $sortfield, $sortorder);
  print_liste_field_titre("TranslationKey", $_SERVER["PHP_SELF"], 'transkey', '', $param, '', $sortfield, $sortorder);
  print_liste_field_titre("CurrentTranslationString", $_SERVER["PHP_SELF"], 'transvalue', '', $param, '', $sortfield, $sortorder);
  print_liste_field_titre("");
  // Action column
  if (!$conf->main_checkbox_left_column) {
    print_liste_field_titre("");
  }
  print "</tr>\n";
 
 
  if ($sortfield == 'transkey' && strtolower($sortorder) == 'asc') {
    ksort($recordtoshow);
  }
  if ($sortfield == 'transkey' && strtolower($sortorder) == 'desc') {
    krsort($recordtoshow);
  }
  if ($sortfield == 'transvalue' && strtolower($sortorder) == 'asc') {
    asort($recordtoshow);
  }
  if ($sortfield == 'transvalue' && strtolower($sortorder) == 'desc') {
    arsort($recordtoshow);
  }
 
  // Show result
  $i = 0;
  foreach ($recordtoshow as $key => $val) {
    $i++;
    if ($i <= $offset) {
      continue;
    }
    if ($limit && $i > ($offset + $limit)) {
      break;
    }
 
    print '<tr class="oddeven">';
    // Action column
    if ($conf->main_checkbox_left_column) {
      print '<td class="center nowraponall">';
      print '</td>';
    }
    // Code lang
    print '<td>'.dolPrintHTML($langcode).'</td>';
    // Key
    print '<td class="" title="'.dolPrintHTMLForAttribute($key).'">'.dolPrintHTML($key).'</td>';
    print '<td class="tdoverflowmax300 small">';
    $titleforvalue = $langs->trans("Translation").' en_US for key '.$key.':<br>';
    if (!empty($langsenfileonly->tab_translate[$key])) {
      if (substr_count($langsenfileonly->tab_translate[$key], '%s') <= 4) { // To avoid errors when more than 4 %s.
        $titleforvalue .= $langsenfileonly->trans($key);
      }
    } else {
      $titleforvalue .= '<span class="opacitymedium">'.$langs->trans("None").'</span>';
    }
    print '<span title="'.dolPrintHTMLForAttribute($titleforvalue).'" class="classfortooltip">';
    print dolPrintHTML($val);
    if (substr_count($langsenfileonly->tab_translate[$key] ?? '', '%s') > 5) {
      print '<br><div class="warning">Error, more than 5 %s in the source</div>';
    }
    print '</span>';
    print '</td>';
 
    print '<td class="right nowraponall">';
    if (!empty($newlangfileonly->tab_translate[$key])) {
      if ($val != $newlangfileonly->tab_translate[$key]) {
        // retrieve rowid
        $sql = "SELECT rowid";
        $sql .= " FROM ".MAIN_DB_PREFIX."overwrite_trans";
        $sql .= " WHERE entity IN (".getEntity('overwrite_trans').")";
        $sql .= " AND transkey = '".$db->escape($key)."'";
        dol_syslog("translation::select from table", LOG_DEBUG);
        $result = $db->query($sql);
        $obj = null;
        if ($result) {
          $obj = $db->fetch_object($result);
        }
        if (is_object($obj)) {
          print '<a class="editfielda reposition marginrightonly" href="'.$_SERVER['PHP_SELF'].'?rowid='.$obj->rowid.'&entity='.$conf->entity.'&mode=overwrite&action=edit&token='.newToken().'">'.img_edit().'</a>';
          print ' ';
          print '<a class="marginleftonly marginrightonly" href="'.$_SERVER['PHP_SELF'].'?rowid='.$obj->rowid.'&entity='.$conf->entity.'&mode='.urlencode($mode).'&action=delete&token='.newToken().'&mode='.urlencode($mode).'">'.img_delete().'</a>';
          print '&nbsp;&nbsp;';
          $htmltext = $langs->trans("OriginalValueWas", '<i>'.$newlangfileonly->tab_translate[$key].'</i>');
          print $form->textwithpicto('', $htmltext, 1, 'info');
        }
      } elseif (getDolGlobalString('MAIN_ENABLE_OVERWRITE_TRANSLATION')) {
        //print $key.'-'.$val;
        print '<a class="reposition paddingrightonly" href="'.$_SERVER['PHP_SELF'].'?mode=overwrite&langcode='.urlencode($langcode).'&transkey='.urlencode($key).'">'.img_edit_add($langs->trans("TranslationOverwriteKey")).'</a>';
      }
 
      if (getDolGlobalInt('MAIN_FEATURES_LEVEL')) {
        $transifexlangfile = '$'; // $ means 'All'
        //$transifexurl = 'https://www.transifex.com/dolibarr-association/dolibarr/translate/#'.$langcode.'/'.$transifexlangfile.'?key='.$key;
        $transifexurl = 'https://app.transifex.com/dolibarr-association/dolibarr/translate/#'.$langcode.'/'.$transifexlangfile.'?q=key%3A'.$key;
 
        print ' &nbsp; <a href="'.$transifexurl.'" target="transifex">'.img_picto($langs->trans('FixOnTransifex'), 'globe').'</a>';
      }
    } else {
      // retrieve rowid
      $sql = "SELECT rowid";
      $sql .= " FROM ".MAIN_DB_PREFIX."overwrite_trans";
      $sql .= " WHERE entity IN (".getEntity('overwrite_trans').")";
      $sql .= " AND transkey = '".$db->escape($key)."'";
      dol_syslog("translation::select from table", LOG_DEBUG);
      $result = $db->query($sql);
      $obj = null;
      if ($result) {
        $obj = $db->fetch_object($result);
      }
      if (is_object($obj)) {
        print '<a class="editfielda reposition marginrightonly" href="'.$_SERVER['PHP_SELF'].'?rowid='.$obj->rowid.'&entity='.$conf->entity.'&mode=overwrite&action=edit&token='.newToken().'">'.img_edit().'</a>';
        print ' ';
        print '<a class="marginleftonly marginrightonly" href="'.$_SERVER['PHP_SELF'].'?rowid='.$obj->rowid.'&entity='.$conf->entity.'&mode='.urlencode($mode).'&action=delete&token='.newToken().'&mode='.urlencode($mode).'">'.img_delete().'</a>';
        print '&nbsp;&nbsp;';
 
        // @phan-suppress-next-line PhanPluginSuspiciousParamPosition
        $htmltext = $langs->trans("TransKeyWithoutOriginalValue", $key);
        print $form->textwithpicto('', $htmltext, 1, 'warning');
      }
    }
    print '</td>';
 
    // Action column
    if (!$conf->main_checkbox_left_column) {
      print'<td></td>';
    }
    print '</tr>'."\n";
  }
 
  if (empty($recordtoshow)) {
    print '<tr><td colspan="4"><span class="opacitymedium">'.$langs->trans("NoRecordFound").'</span></td></tr>';
  }
 
  print '</table>';
  print '</div>';
}
 
print dol_get_fiche_end();
 
print "</form>\n";
 
if (!empty($langcode)) {
  dol_set_focus('#transvalue');
}
 
// End of page
llxFooter();
$db->close();