extrafields.php

Go to the documentation of this file.

<?php
/* Copyright (C) 2026  Frédéric France  <frederic.france@free.fr>
 *
 * 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/class/extrafields.class.php';
require_once DOL_DOCUMENT_ROOT.'/core/lib/admin_extrafields.lib.php';
 
if (!$user->admin) {
  accessforbidden();
}
 
// Load modules that declared the 'extrafieldsadmin' or 'globaladmin' hook context, so their
// 'getExtrafieldsAdminMap' hook (fired inside getExtrafieldsAdminMap() below) can contribute
// additional whitelist entries — see the docblock on getExtrafieldsAdminMap() for the shape.
$hookmanager->initHooks(array('extrafieldsadmin', 'globaladmin'));
 
$elementtype = GETPOST('elementtype', 'aZ09');
 
$extrafieldsadminmap = getExtrafieldsAdminMap();
if ($elementtype === '' || !array_key_exists($elementtype, $extrafieldsadminmap)) {
  accessforbidden('Bad or missing value for parameter elementtype');
}
$pagedef = $extrafieldsadminmap[$elementtype];
 
// $pagekey is the whitelisted map key from the request, before any override below — it must
// be used for every self-referencing URL/redirect/hidden-field so navigation and post-save
// redirects return to the SAME registry entry the user started on (see $elementtype override
// just below, which can make $elementtype diverge from $pagekey for one registry entry).
$pagekey = $elementtype;
 
// A registry entry may present a different, developer-authored real elementtype than its
// own map key (e.g. two entries with two different tab-bar presentations both operating on
// the same underlying table). The whitelist check above already gated on the untrusted
// $elementtype from GETPOST(); this override can only ever come from a hardcoded registry
// value, never from user input, so it cannot be used to smuggle an unvalidated elementtype
// into core/actions_extrafields.inc.php / the ExtraFields class below.
if (isset($pagedef['elementtype'])) {
  $elementtype = $pagedef['elementtype'];
}
 
$langs->loadLangs($pagedef['langs']);
 
$extrafields = new ExtraFields($db);
$form = new Form($db);
 
// List of supported format
$type2label = ExtraFields::getListOfTypesLabels();
 
$action = GETPOST('action', 'aZ09');
$attrname = GETPOST('attrname', 'alpha');
 
 
/*
 * Actions
 */
 
require DOL_DOCUMENT_ROOT.'/core/actions_extrafields.inc.php';
 
 
/*
 * View
 */
 
$title = $pagedef['title'] instanceof Closure ? $pagedef['title']() : $langs->trans($pagedef['title']);
$headlabel = $pagedef['headlabel'] instanceof Closure ? $pagedef['headlabel']() : $langs->trans($pagedef['headlabel']);
if (isset($pagedef['textobject'])) {
  $textobject = $pagedef['textobject'] instanceof Closure ? $pagedef['textobject']() : $langs->transnoentitiesnoconv($pagedef['textobject']);
} else {
  $textobject = $headlabel;
}
 
$help_url = $pagedef['helpurl'];
llxHeader('', $title, $help_url, '', 0, 0, '', '', '', 'mod-admin page-extrafields');
 
$linkback = '<a href="'.dolBuildUrl(DOL_URL_ROOT.'/admin/modules.php', ['restore_lastsearch_values' => 1]).'">'.img_picto($langs->trans("BackToModuleList"), 'back', 'class="pictofixedwidth"').'<span class="hideonsmartphone">'.$langs->trans("BackToModuleList").'</span></a>';
 
print load_fiche_titre($title, $linkback, 'title_setup');
 
dol_include_once($pagedef['headfile']);
$head = call_user_func($pagedef['headfunction']);
 
print dol_get_fiche_head($head, $pagedef['tabid'], $headlabel, -1, $pagedef['headpicto']);
 
require DOL_DOCUMENT_ROOT.'/core/tpl/admin_extrafields_view.tpl.php';
 
print dol_get_fiche_end();
 
 
// Creation of an optional field
if ($action == 'create') {
  print '<br><div id="newattrib"></div>';
  print load_fiche_titre($langs->trans('NewAttribute'));
 
  require DOL_DOCUMENT_ROOT.'/core/tpl/admin_extrafields_add.tpl.php';
}
 
// Edition of an optional field
if ($action == 'edit' && !empty($attrname)) {
  print '<br><div id="editattrib"></div>';
  print load_fiche_titre($langs->trans("FieldEdition", $attrname));
 
  require DOL_DOCUMENT_ROOT.'/core/tpl/admin_extrafields_edit.tpl.php';
}
 
// End of page
llxFooter();
$db->close();