* Copyright (C) 2006-2021 Regis Houssin * Copyright (C) 2024 William Mead * * 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 . */ /** * \file htdocs/user/ldap.php * \ingroup ldap * \brief Page fiche LDAP utilisateur */ // Load Dolibarr environment require '../main.inc.php'; require_once DOL_DOCUMENT_ROOT.'/core/lib/usergroups.lib.php'; require_once DOL_DOCUMENT_ROOT.'/core/class/ldap.class.php'; require_once DOL_DOCUMENT_ROOT.'/core/lib/ldap.lib.php'; // Load translation files required by page $langs->loadLangs(array('users', 'admin', 'companies', 'ldap')); $id = GETPOSTINT('id'); $action = GETPOST('action', 'aZ09'); $contextpage = GETPOST('contextpage', 'aZ') ?: 'userldap'; // To manage different context of search // Security check $socid = 0; if ($user->socid > 0) { $socid = $user->socid; } $feature2 = (($socid && $user->hasRight('user', 'self', 'creer')) ? '' : 'user'); // Initialize a technical object to manage hooks of page. Note that conf->hooks_modules contains an array of hook context $hookmanager->initHooks(array('usercard', 'userldap', 'globalcard')); $result = restrictedArea($user, 'user', $id, 'user&user', $feature2); $object = new User($db); $object->fetch($id, '', '', 1); $object->loadRights(); /* * Actions */ $parameters = array('id'=>$socid); $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'); } if (empty($reshook)) { if ($action == 'dolibarr2ldap') { $ldap = new Ldap(); $result = $ldap->connectBind(); if ($result > 0) { $info = $object->_load_ldap_info(); $dn = $object->_load_ldap_dn($info); $olddn = $dn; // We can say that old dn = dn as we force synchro $result = $ldap->update($dn, $info, $user, $olddn); } if ($result >= 0) { setEventMessages($langs->trans("UserSynchronized"), null, 'mesgs'); } else { setEventMessages($ldap->error, $ldap->errors, 'errors'); } } } /* * View */ $form = new Form($db); $person_name = !empty($object->firstname) ? $object->lastname.", ".$object->firstname : $object->lastname; $title = $person_name." - ".$langs->trans('LDAP'); $help_url = ''; llxHeader('', $title, $help_url, '', 0, 0, '', '', '', 'mod-user page-ldap'); $head = user_prepare_head($object); $title = $langs->trans("User"); print dol_get_fiche_head($head, 'ldap', $title, -1, 'user'); $linkback = ''; if ($user->hasRight('user', 'user', 'lire') || !empty($user->admin)) { $linkback = ''.$langs->trans("BackToList").''; } dol_banner_tab($object, 'id', $linkback, $user->hasRight('user', 'user', 'lire') || $user->admin); print '

'; print '

'; print ''; // Login print ''; if ($object->ldap_sid) { print ''; } else { print ''; } print ''; if (getDolGlobalString('LDAP_SERVER_TYPE') == "activedirectory") { $ldap = new Ldap(); $result = $ldap->connectBind(); $userSID = ''; if ($result > 0) { $userSID = $ldap->getObjectSid($object->login); } print ''; print ''; print "\n"; } // LDAP DN print '\n"; // LDAP Cle print '\n"; // LDAP Server print '\n"; print '\n"; print '\n"; print '\n"; print '\n"; print '

'.$langs->trans("Login").'	'.$langs->trans("LoginAccountDisableInDolibarr").'	'.$object->login.'
'.$langs->trans("SID").'	'.$userSID.'
LDAP '.$langs->trans("LDAPUserDn").'	'.getDolGlobalString('LDAP_USER_DN')."
LDAP '.$langs->trans("LDAPNamingAttribute").'	'.getDolGlobalString('LDAP_KEY_USERS')."
LDAP '.$langs->trans("Type").'	'.getDolGlobalString('LDAP_SERVER_TYPE')."
LDAP '.$langs->trans("Version").'	'.getDolGlobalString('LDAP_SERVER_PROTOCOLVERSION')."
LDAP '.$langs->trans("LDAPPrimaryServer").'	'.getDolGlobalString('LDAP_SERVER_HOST')."
LDAP '.$langs->trans("LDAPSecondaryServer").'	'.getDolGlobalString('LDAP_SERVER_HOST_SLAVE')."
LDAP '.$langs->trans("LDAPServerPort").'	'.getDolGlobalString('LDAP_SERVER_PORT')."

'; print '

'; print dol_get_fiche_end(); /* * Action bar */ print '

'; if (getDolGlobalInt('LDAP_SYNCHRO_ACTIVE') === Ldap::SYNCHRO_DOLIBARR_TO_LDAP) { print ''.$langs->trans("ForceSynchronize").''; } print "

\n"; if (getDolGlobalInt('LDAP_SYNCHRO_ACTIVE') === Ldap::SYNCHRO_DOLIBARR_TO_LDAP) { print "
\n"; } // Affichage attributes LDAP print load_fiche_titre($langs->trans("LDAPInformationsForThisUser")); print ''; print ''; print ''; print ''; print ''; // Lecture LDAP $ldap = new Ldap(); $result = $ldap->connectBind(); if ($result > 0) { $info = $object->_load_ldap_info(); $dn = $object->_load_ldap_dn($info, 1); $search = "(".$object->_load_ldap_dn($info, 2).")"; $records = $ldap->getAttribute($dn, $search); //print_r($records); // Affichage arbre if (((!is_numeric($records)) || $records != 0) && (!isset($records['count']) || $records['count'] > 0)) { if (!is_array($records)) { print ''; } else { $result = show_ldap_content($records, 0, $records['count'], true); } } else { print ''; } $ldap->unbind(); } else { print ''; setEventMessages($ldap->error, $ldap->errors, 'errors'); } print '

'.$langs->trans("LDAPAttributes").'	'.$langs->trans("Value").'
'.$langs->trans("ErrorFailedToReadLDAP").'
'.$langs->trans("LDAPRecordNotFound").' (dn='.dol_escape_htmltag($dn).' - search='.dol_escape_htmltag($search).')
'.$langs->trans("ErrorFailedToReadLDAP").'

'; // End of page llxFooter(); $db->close();