* Copyright (C) 2006-2021 Regis Houssin * Copyright (C) 2024 Alexandre Spangaro * * 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/contact/ldap.php * \ingroup ldap * \brief Page fiche LDAP contact */ // Load Dolibarr environment require '../main.inc.php'; require_once DOL_DOCUMENT_ROOT.'/contact/class/contact.class.php'; require_once DOL_DOCUMENT_ROOT.'/core/lib/contact.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 the page $langs->loadLangs(array('companies', 'ldap')); $langs->load("admin"); $action = GETPOST('action', 'aZ09'); // Security check $id = GETPOSTINT('id'); if ($user->socid) { $socid = $user->socid; } $result = restrictedArea($user, 'contact', $id, 'socpeople&societe'); $object = new Contact($db); if ($id > 0) { $object->fetch($id, $user); } /* * Actions */ if ($action == 'dolibarr2ldap') { $db->begin(); $ldap = new Ldap(); $result = $ldap->connectBind(); $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("ContactSynchronized"), null, 'mesgs'); $db->commit(); } else { setEventMessages($ldap->error, $ldap->errors, 'errors'); $db->rollback(); } } /* * View */ $form = new Form($db); $title = (getDolGlobalString('SOCIETE_ADDRESSES_MANAGEMENT') ? $langs->trans("Contacts") : $langs->trans("ContactsAddresses")); $help_url = 'EN:Module_Third_Parties|FR:Module_Tiers|ES:Módulo_Empresas'; llxHeader('', $title, $help_url, '', 0, 0, '', '', '', 'mod-societe page-contact-card_ldap'); $head = contact_prepare_head($object); print dol_get_fiche_head($head, 'ldap', $title, -1, 'contact'); $linkback = ''.$langs->trans("BackToList").''; dol_banner_tab($object, 'id', $linkback, 1, 'rowid', 'ref', ''); print '

'; print '

'; print ''; // Company if ($object->socid > 0) { $thirdparty = new Societe($db); $thirdparty->fetch($object->socid); print ''; } else { print ''; } // Civility print ''; // LDAP DN print '\n"; // LDAP Cle print '\n"; // LDAP Server print '\n"; print '\n"; print '\n"; print '

'.$langs->trans("ThirdParty").'	'.$thirdparty->getNomUrl(1).'
'.$langs->trans("ThirdParty").'	'; print $langs->trans("ContactNotLinkedToCompany"); print '
'.$langs->trans("UserTitle").'	'; print $object->getCivilityLabel(); print '
LDAP '.$langs->trans("LDAPContactDn").'	'.getDolGlobalString('LDAP_CONTACT_DN')."
LDAP '.$langs->trans("LDAPNamingAttribute").'	'.getDolGlobalString('LDAP_KEY_CONTACTS')."
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 (getDolGlobalString('LDAP_CONTACT_ACTIVE') && getDolGlobalInt('LDAP_CONTACT_ACTIVE') != Ldap::SYNCHRO_LDAP_TO_DOLIBARR) { print ''.$langs->trans("ForceSynchronize").''; } print "

\n"; if (getDolGlobalString('LDAP_CONTACT_ACTIVE') && getDolGlobalInt('LDAP_CONTACT_ACTIVE') != Ldap::SYNCHRO_LDAP_TO_DOLIBARR) { print "
\n"; } // Affichage attributes LDAP print load_fiche_titre($langs->trans("LDAPInformationsForThisContact")); 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); //var_dump($records); // Show tree 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 { 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).')

'; llxFooter(); $db->close();