24 if (!defined(
'NOREQUIREMENU')) {
25 define(
'NOREQUIREMENU',
'1');
27 if (!defined(
'NOTOKENRENEWAL')) {
28 define(
'NOTOKENRENEWAL',
'1');
32 require
'../main.inc.php';
33 require_once DOL_DOCUMENT_ROOT.
'/core/lib/admin.lib.php';
34 require_once DOL_DOCUMENT_ROOT.
'/core/lib/files.lib.php';
35 require_once DOL_DOCUMENT_ROOT.
'/core/lib/functions2.lib.php';
38 $langs->loadLangs(array(
'errors',
'admin',
'modulebuilder',
'exports'));
40 $mode =
GETPOST(
'mode',
'alpha');
41 $action =
GETPOST(
'action',
'aZ09');
66 $help_url =
'EN:First_setup|FR:Premiers_paramétrages|ES:Primeras_configuraciones';
69 print
'<!-- Force style container -->'.
"\n".
'<style>
78 $arrayofnatures = array(
'core'=>$langs->transnoentitiesnoconv(
"Core"),
'external'=>$langs->transnoentitiesnoconv(
"External").
' - '.$langs->trans(
"AllPublishers"));
91 $modNameLoaded = array();
93 foreach ($modulesdir as $dir) {
96 dol_syslog(
"Scan directory ".$dir.
" for module descriptor files (modXXX.class.php)");
97 $handle = @opendir($dir);
98 if (is_resource($handle)) {
99 while (($file = readdir($handle)) !==
false) {
101 if (is_readable($dir.$file) && substr($file, 0, 3) ==
'mod' && substr($file,
dol_strlen($file) - 10) ==
'.class.php') {
102 $modName = substr($file, 0,
dol_strlen($file) - 10);
105 if (!empty($modNameLoaded[$modName])) {
106 $mesg =
"Error: Module ".$modName.
" was found twice: Into ".$modNameLoaded[$modName].
" and ".$dir.
". You probably have an old file on your disk.<br>";
113 $res = include_once $dir.$file;
114 if (class_exists($modName)) {
116 $objMod =
new $modName($db);
117 $modNameLoaded[$modName] = $dir;
119 if (!$objMod->numero > 0 && $modName !=
'modUser') {
120 dol_syslog(
'The module descriptor '.$modName.
' must have a numero property', LOG_ERR);
122 $j = $objMod->numero;
124 $modulequalified = 1;
127 $const_name =
'MAIN_MODULE_'.strtoupper(preg_replace(
'/^mod/i',
'', get_class($objMod)));
128 if ($objMod->version ==
'development' && (empty($conf->global->$const_name) && ($conf->global->MAIN_FEATURES_LEVEL < 2))) {
129 $modulequalified = 0;
131 if ($objMod->version ==
'experimental' && (empty($conf->global->$const_name) && ($conf->global->MAIN_FEATURES_LEVEL < 1))) {
132 $modulequalified = 0;
134 if (preg_match(
'/deprecated/', $objMod->version) && (empty($conf->global->$const_name) && ($conf->global->MAIN_FEATURES_LEVEL >= 0))) {
135 $modulequalified = 0;
141 if ($modulequalified > 0) {
143 $external = ($objMod->isCoreOrExternalModule() ==
'external');
146 $arrayofnatures[
'external_'.$publisher] = $langs->trans(
"External").
' - '.$publisher;
148 $arrayofnatures[
'external_'] = $langs->trans(
"External").
' - '.$langs->trans(
"UnknownPublishers");
151 ksort($arrayofnatures);
155 if ($modulequalified > 0) {
156 $modules[$i] = $objMod;
157 $filename[$i] = $modName;
160 if (is_array($objMod->familyinfo) && !empty($objMod->familyinfo)) {
161 if (!is_array($familyinfo)) {
162 $familyinfo = array();
164 $familyinfo = array_merge($familyinfo, $objMod->familyinfo);
165 $familykey = key($objMod->familyinfo);
167 $familykey = $objMod->family;
170 $moduleposition = ($objMod->module_position ? $objMod->module_position :
'50');
171 if ($moduleposition ==
'50' && ($objMod->isCoreOrExternalModule() ==
'external')) {
172 $moduleposition =
'80';
175 if (empty($familyinfo[$familykey][
'position'])) {
176 $familyinfo[$familykey][
'position'] =
'0';
179 $orders[$i] = $familyinfo[$familykey][
'position'].
"_".$familykey.
"_".$moduleposition.
"_".$j;
183 $specialstring =
'unknown';
184 if ($objMod->version ==
'development' || $objMod->version ==
'experimental') {
185 $specialstring =
'expdev';
187 if (isset($categ[$specialstring])) {
188 $categ[$specialstring]++;
190 $categ[$specialstring] = 1;
195 dol_syslog(
"Module ".get_class($objMod).
" not qualified");
198 dol_syslog(
"Failed to load ".$dir.$file.
" ".$e->getMessage(), LOG_ERR);
201 print
"Warning bad descriptor file : ".$dir.$file.
" (Class ".$modName.
" not found into file)<br>";
204 dol_syslog(
"Failed to load ".$dir.$file.
" ".$e->getMessage(), LOG_ERR);
211 dol_syslog(
"htdocs/admin/modulehelp.php: Failed to open directory ".$dir.
". See permission and open_basedir option.", LOG_WARNING);
223 foreach ($orders as $tmpkey => $tmpvalue) {
224 $tmpMod = $modules[$tmpkey];
225 if ($tmpMod->numero == $id) {
227 $modName = $filename[$tmpkey];
228 $dirofmodule = $dirmod[$tmpkey];
234 $value = $orders[$key];
235 $tab = explode(
'_', $value);
236 $familyposition = $tab[0]; $familykey = $tab[1]; $module_position = $tab[2]; $numero = $tab[3];
243 $modulename = $objMod->getName();
244 $moduledesc = $objMod->getDesc();
245 $moduleauthor = $objMod->getPublisher();
246 $moduledir = strtolower(preg_replace(
'/^mod/i',
'', get_class($objMod)));
248 $const_name =
'MAIN_MODULE_'.strtoupper(preg_replace(
'/^mod/i',
'', get_class($objMod)));
250 $text =
'<span class="opacitymedium">'.$langs->trans(
"LastActivationDate").
':</span> ';
251 if (!empty($conf->global->$const_name)) {
252 $text .=
dol_print_date($objMod->getLastActivationDate(),
'dayhour');
254 $text .= $langs->trans(
"Disabled");
256 $tmp = $objMod->getLastActivationInfo();
257 $authorid = (empty($tmp[
'authorid']) ?
'' : $tmp[
'authorid']);
259 $tmpuser =
new User($db);
260 $tmpuser->fetch($authorid);
261 $text .=
'<br><span class="opacitymedium">'.$langs->trans(
"LastActivationAuthor").
':</span> ';
262 $text .= $tmpuser->getNomUrl(1);
264 $ip = (empty($tmp[
'ip']) ?
'' : $tmp[
'ip']);
266 $text .=
'<br><span class="opacitymedium">'.$langs->trans(
"LastActivationIP").
':</span> ';
269 $lastactivationversion = (empty($tmp[
'lastactivationversion']) ?
'' : $tmp[
'lastactivationversion']);
270 if ($lastactivationversion) {
271 $text .=
'<br><span class="opacitymedium">'.$langs->trans(
"LastActivationVersion").
':</span> ';
272 $text .= $lastactivationversion;
277 $title = ($modulename ? $modulename : $moduledesc);
279 print
'<div class="centpercent">';
281 $picto =
'object_'.$objMod->picto;
283 print
load_fiche_titre(($modulename ? $modulename : $moduledesc), $moreinfo, $picto, 0,
'',
'titlemodulehelp');
289 dol_syslog(
"Error for module ".$key.
" - Property name of module looks empty", LOG_WARNING);
293 if (isset($objMod->langfiles) && is_array($objMod->langfiles)) {
294 foreach ($objMod->langfiles as $domain) {
295 $langs->load($domain);
303 $version = $objMod->getVersion(0);
305 if (preg_match(
'/development/i', $version)) {
306 $versiontrans .=
img_warning($langs->trans(
"Development"),
'style="float: left"');
308 if (preg_match(
'/experimental/i', $version)) {
309 $versiontrans .=
img_warning($langs->trans(
"Experimental"),
'style="float: left"');
311 if (preg_match(
'/deprecated/i', $version)) {
312 $versiontrans .=
img_warning($langs->trans(
"Deprecated"),
'style="float: left"');
314 $versiontrans .= $objMod->getVersion(1);
318 if ($objMod->isCoreOrExternalModule() ==
'external') {
319 $imginfo =
"info_black";
325 if ($mode ==
'desc') {
327 $text .=
'<br>'.$moduledesc.
'<br><br><br>';
330 $text .=
'<span class="opacitymedium">'.$langs->trans(
"Version").
':</span> '.$version;
332 $moduledescriptorfile = get_class($objMod).
'.class.php';
333 $text .=
'<br><span class="opacitymedium">'.$langs->trans(
"DescriptorFile").
':</span> '.$moduledescriptorfile;
336 if ($objMod->isCoreOrExternalModule() ==
'external') {
337 $tmpdirofmoduletoshow = preg_replace(
'/^'.preg_quote(DOL_DOCUMENT_ROOT,
'/').
'/',
'', $dirofmodule);
338 $textexternal .=
'<br><span class="opacitymedium">'.$langs->trans(
"Origin").
':</span> '.$langs->trans(
"ExternalModule").
' - '.$langs->trans(
"InstalledInto", $tmpdirofmoduletoshow);
340 global $dolibarr_allow_download_external_modules;
341 if (!empty($dolibarr_allow_download_external_modules) && preg_match(
'/\/custom\//', $dirofmodule)) {
343 $textexternal .=
' <a href="'.DOL_URL_ROOT.
'/admin/tools/export_files.php?export_type=externalmodule&what='.urlencode($moduledir).
'&compression=zip&zipfilename_template=module_'.$moduledir.
'-'.$version.
'.notorig" target="_blank" rel="noopener">'.
img_picto(
'',
'download').
'</a>';
346 if ($objMod->editor_name !=
'dolibarr') {
347 $textexternal .=
'<br><span class="opacitymedium">'.$langs->trans(
"Publisher").
':</span> '.(empty($objMod->editor_name) ? $langs->trans(
"Unknown") : $objMod->editor_name);
349 $editor_url = $objMod->editor_url;
350 if (!preg_match(
'/^http/', $editor_url)) {
351 $editor_url =
'http://'.$editor_url;
353 if (!empty($objMod->editor_url) && !preg_match(
'/dolibarr\.org/i', $objMod->editor_url)) {
354 $textexternal .= ($objMod->editor_name !=
'dolibarr' ?
' - ' :
'').
img_picto(
'',
'globe').
' <a href="'.$editor_url.
'" target="_blank" rel="noopener noreferrer external">'.$objMod->editor_url.
'</a>';
356 $text .= $textexternal;
359 $text .=
'<br><span class="opacitymedium">'.$langs->trans(
"Origin").
':</span> '.$langs->trans(
"Core").
'<br>';
362 $moduledesclong = $objMod->getDescLong();
363 if ($moduledesclong) {
364 $text .=
'<br><hr><div class="moduledesclong">'.$moduledesclong.
'<div>';
368 if ($mode ==
'feature') {
369 $text .=
'<br><strong>'.$langs->trans(
"DependsOn").
':</strong> ';
370 if (count($objMod->depends)) {
371 $text .= join(
',', $objMod->depends);
373 $text .= $langs->trans(
"None");
375 $text .=
'<br><strong>'.$langs->trans(
"RequiredBy").
':</strong> ';
376 if (count($objMod->requiredby)) {
377 $text .= join(
',', $objMod->requiredby);
379 $text .= $langs->trans(
"None");
384 $text .=
'<br><strong>'.$langs->trans(
"AddDataTables").
':</strong> ';
385 $listofsqlfiles1 =
dol_dir_list(DOL_DOCUMENT_ROOT.
'/install/mysql/tables/',
'files', 0,
'llx.*-'.$moduledir.
'\.sql', array(
'\.key\.sql',
'\.sql\.back'));
386 $listofsqlfiles2 =
dol_dir_list(
dol_buildpath($moduledir.
'/sql/'),
'files', 0,
'llx.*\.sql', array(
'\.key\.sql',
'\.sql\.back'));
387 $sqlfiles = array_merge($listofsqlfiles1, $listofsqlfiles2);
389 if (count($sqlfiles) > 0) {
391 foreach ($sqlfiles as $val) {
392 $text .= ($i ?
', ' :
'').preg_replace(
'/\-'.$moduledir.
'$/',
'', preg_replace(
'/\.sql$/',
'', preg_replace(
'/llx_/',
'', $val[
'name'])));
396 $text .= $langs->trans(
"No");
401 $text .=
'<br><strong>'.$langs->trans(
"AddDictionaries").
':</strong> ';
402 if (isset($objMod->dictionaries) && isset($objMod->dictionaries[
'tablib']) && is_array($objMod->dictionaries[
'tablib']) && count($objMod->dictionaries[
'tablib'])) {
404 foreach ($objMod->dictionaries[
'tablib'] as $val) {
405 $text .= ($i ?
', ' :
'').$val;
409 $text .= $langs->trans(
"No");
414 $text .=
'<br><strong>'.$langs->trans(
"AddData").
':</strong> ';
417 $text .= $langs->trans(
"Yes").
' <span class="opacitymedium">('.$moduledir.
'/sql/data.sql)</span>';
419 $text .= $langs->trans(
"No");
424 $text .=
'<br><strong>'.$langs->trans(
"AddRemoveTabs").
':</strong> ';
425 if (isset($objMod->tabs) && is_array($objMod->tabs) && count($objMod->tabs)) {
427 foreach ($objMod->tabs as $val) {
428 if (is_array($val)) {
431 if (is_string($val)) {
432 $tmp = explode(
':', $val, 3);
433 $text .= ($i ?
', ' :
'').$tmp[0].
':'.$tmp[1];
438 $text .= $langs->trans(
"No");
443 $text .=
'<br><strong>'.$langs->trans(
"AddModels").
':</strong> ';
444 if (isset($objMod->module_parts) && isset($objMod->module_parts[
'models']) && $objMod->module_parts[
'models']) {
445 $text .= $langs->trans(
"Yes");
447 $text .= $langs->trans(
"No");
452 $text .=
'<br><strong>'.$langs->trans(
"AddSubstitutions").
':</strong> ';
453 if (isset($objMod->module_parts) && isset($objMod->module_parts[
'substitutions']) && $objMod->module_parts[
'substitutions']) {
454 $text .= $langs->trans(
"Yes");
456 $text .= $langs->trans(
"No");
461 $text .=
'<br><strong>'.$langs->trans(
"AddSheduledJobs").
':</strong> ';
462 if (isset($objMod->cronjobs) && is_array($objMod->cronjobs) && count($objMod->cronjobs)) {
464 foreach ($objMod->cronjobs as $val) {
465 $text .= ($i ?
', ' :
'').($val[
'label']);
469 $text .= $langs->trans(
"No");
474 $text .=
'<br><strong>'.$langs->trans(
"AddTriggers").
':</strong> ';
475 $moreinfoontriggerfile =
'';
476 if (isset($objMod->module_parts) && isset($objMod->module_parts[
'triggers']) && $objMod->module_parts[
'triggers']) {
481 require_once DOL_DOCUMENT_ROOT.
'/core/class/interfaces.class.php';
483 $triggers = $interfaces->getTriggersList(array((($objMod->isCoreOrExternalModule() ==
'external') ?
'/'.$moduledir :
'').
'/core/triggers'));
484 foreach ($triggers as $triggercursor) {
485 if ($triggercursor[
'module'] == $moduledir) {
487 $moreinfoontriggerfile =
' ('.$triggercursor[
'relpath'].
')';
491 $text .= $langs->trans($yesno).$moreinfoontriggerfile;
495 $text .=
'<br><strong>'.$langs->trans(
"AddBoxes").
':</strong> ';
496 if (isset($objMod->boxes) && is_array($objMod->boxes) && count($objMod->boxes)) {
498 foreach ($objMod->boxes as $val) {
499 $text .= ($i ?
', ' :
'').($val[
'file'] ? $val[
'file'] : $val[0]);
503 $text .= $langs->trans(
"No");
508 $text .=
'<br><strong>'.$langs->trans(
"AddHooks").
':</strong> ';
509 if (isset($objMod->module_parts) && is_array($objMod->module_parts[
'hooks']) && count($objMod->module_parts[
'hooks'])) {
511 foreach ($objMod->module_parts[
'hooks'] as $key => $val) {
512 if ($key ===
'entity') {
517 if ($key ===
'data') {
518 if (is_array($val)) {
519 foreach ($val as $value) {
520 $text .= ($i ?
', ' :
'').($value);
528 $text .= ($i ?
', ' :
'').($val);
532 $text .= $langs->trans(
"No");
537 $text .=
'<br><strong>'.$langs->trans(
"AddPermissions").
':</strong> ';
538 if (isset($objMod->rights) && is_array($objMod->rights) && count($objMod->rights)) {
540 foreach ($objMod->rights as $val) {
541 $text .= ($i ?
', ' :
'').($val[1]);
545 $text .= $langs->trans(
"No");
550 $text .=
'<br><strong>'.$langs->trans(
"AddMenus").
':</strong> ';
551 if (isset($objMod->menu) && !empty($objMod->menu)) {
552 $text .= $langs->trans(
"Yes");
554 $text .= $langs->trans(
"No");
559 $text .=
'<br><strong>'.$langs->trans(
"AddExportProfiles").
':</strong> ';
560 if (isset($objMod->export_label) && is_array($objMod->export_label) && count($objMod->export_label)) {
562 foreach ($objMod->export_label as $val) {
563 $text .= ($i ?
', ' :
'').($val);
567 $text .= $langs->trans(
"No");
572 $text .=
'<br><strong>'.$langs->trans(
"AddImportProfiles").
':</strong> ';
573 if (isset($objMod->import_label) && is_array($objMod->import_label) && count($objMod->import_label)) {
575 foreach ($objMod->import_label as $val) {
576 $text .= ($i ?
', ' :
'').($val);
580 $text .= $langs->trans(
"No");
585 $text .=
'<br><strong>'.$langs->trans(
"AddOtherPagesOrServices").
':</strong> ';
586 $text .= $langs->trans(
"DetectionNotPossible");
590 if ($mode ==
'changelog') {
591 $changelog = $objMod->getChangeLog();
593 $text .=
'<div class="moduledesclong">'.$changelog.
'<div>';
595 $text .=
'<div class="moduledesclong">'.$langs->trans(
"NotAvailable").
'</div>';