* Copyright (C) 2006 Regis Houssin * * 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/adherents/ldap.php * \ingroup ldap member * \brief Page fiche LDAP adherent */ require '../main.inc.php'; require_once DOL_DOCUMENT_ROOT.'/core/lib/member.lib.php'; require_once DOL_DOCUMENT_ROOT.'/core/lib/ldap.lib.php'; require_once DOL_DOCUMENT_ROOT.'/core/class/ldap.class.php'; require_once DOL_DOCUMENT_ROOT.'/adherents/class/adherent.class.php'; require_once DOL_DOCUMENT_ROOT.'/adherents/class/adherent_type.class.php'; $langs->load("companies"); $langs->load("members"); $langs->load("ldap"); $langs->load("admin"); $rowid = GETPOST('id','int'); $action = GETPOST('action'); // Protection $socid=0; if ($user->societe_id > 0) { $socid = $user->societe_id; } $adh = new Adherent($db); $adh->id = $rowid; $result=$adh->fetch($rowid); if (! $result) { dol_print_error($db,"Failed to get adherent: ".$adh->error); exit; } /* * Actions */ if ($action == 'dolibarr2ldap') { $db->begin(); $ldap=new Ldap(); $result=$ldap->connect_bind(); $info=$adh->_load_ldap_info(); $dn=$adh->_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) { setEventMessage($langs->trans("MemberSynchronized")); $db->commit(); } else { setEventMessage($ldap->error, 'errors'); $db->rollback(); } } /* * View */ llxHeader('',$langs->trans("Member"),'EN:Module_Foundations|FR:Module_Adhérents|ES:Módulo_Miembros'); $form = new Form($db); $head = member_prepare_head($adh); dol_fiche_head($head, 'ldap', $langs->trans("Member"), 0, 'user'); print ''; // Ref print ''; print ''; // Lastname print ''; print ''; // Firstname print ''; print ''; // Login print ''; // Password not crypted if (! empty($conf->global->LDAP_MEMBER_FIELD_PASSWORD)) { print ''; print ''; print "\n"; } // Password crypted if (! empty($conf->global->LDAP_MEMBER_FIELD_PASSWORD_CRYPTED)) { print ''; print ''; print "\n"; } // Type print '\n"; $langs->load("admin"); // LDAP DN print '\n"; // LDAP Cle print '\n"; // LDAP Server print '\n"; print '\n"; print '\n"; print '\n"; print '\n"; print '
'.$langs->trans("Ref").''; print $form->showrefnav($adh,'id'); print '
'.$langs->trans("Lastname").''.$adh->lastname.' 
'.$langs->trans("Firstname").''.$adh->firstname.' 
'.$langs->trans("Login").''.$adh->login.' 
'.$langs->trans("LDAPFieldPasswordNotCrypted").''.$adh->pass.'
'.$langs->trans("LDAPFieldPasswordCrypted").''.$adh->pass_crypted.'
'.$langs->trans("Type").''.$adh->type."
LDAP '.$langs->trans("LDAPMemberDn").''.$conf->global->LDAP_MEMBER_DN."
LDAP '.$langs->trans("LDAPNamingAttribute").''.$conf->global->LDAP_KEY_MEMBERS."
LDAP '.$langs->trans("Type").''.$conf->global->LDAP_SERVER_TYPE."
LDAP '.$langs->trans("Version").''.$conf->global->LDAP_SERVER_PROTOCOLVERSION."
LDAP '.$langs->trans("LDAPPrimaryServer").''.$conf->global->LDAP_SERVER_HOST."
LDAP '.$langs->trans("LDAPSecondaryServer").''.$conf->global->LDAP_SERVER_HOST_SLAVE."
LDAP '.$langs->trans("LDAPServerPort").''.$conf->global->LDAP_SERVER_PORT."
'; print ''; /* * Barre d'actions */ print '
'; if (! empty($conf->global->LDAP_MEMBER_ACTIVE) && $conf->global->LDAP_MEMBER_ACTIVE != 'ldap2dolibarr') { print ''; } print "
\n"; if (! empty($conf->global->LDAP_MEMBER_ACTIVE) && $conf->global->LDAP_MEMBER_ACTIVE != 'ldap2dolibarr') print "
\n"; // Affichage attributs LDAP print_titre($langs->trans("LDAPInformationsForThisMember")); print ''; print ''; print ''; print ''; print ''; // Lecture LDAP $ldap=new Ldap(); $result=$ldap->connect_bind(); if ($result > 0) { $info=$adh->_load_ldap_info(); $dn=$adh->_load_ldap_dn($info,1); $search = "(".$adh->_load_ldap_dn($info,2).")"; if (empty($dn)) { $langs->load("errors"); print ''; } else { $records=$ldap->getAttribute($dn,$search); //print_r($records); // Affichage arbre if (count($records) && $records != false && (! 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(); $ldap->close(); } else { dol_print_error('',$ldap->error); } print '
'.$langs->trans("LDAPAttributes").''.$langs->trans("Value").'
'.$langs->trans("ErrorModuleSetupNotComplete").'
'.$langs->trans("ErrorFailedToReadLDAP").'
'.$langs->trans("LDAPRecordNotFound").' (dn='.$dn.' - search='.$search.')
'; llxFooter(); $db->close();