--- /dev/null
+<?php
+
+/***************************************************************************\
+ * SPIP, Systeme de publication pour l'internet *
+ * *
+ * Copyright (c) 2001-2011 *
+ * Arnaud Martin, Antoine Pitrou, Philippe Riviere, Emmanuel Saint-James *
+ * *
+ * Ce programme est un logiciel libre distribue sous licence GNU/GPL. *
+ * Pour plus de details voir le fichier COPYING.txt ou l'aide en ligne. *
+\***************************************************************************/
+
+if (!defined('_ECRIRE_INC_VERSION')) return;
+
+include_spip('auth/ldap');
+
+// http://doc.spip.org/@install_etape_ldap4_dist
+function install_etape_ldap4_dist()
+{
+ $adresse_ldap = _request('adresse_ldap');
+ $login_ldap = _request('login_ldap');
+ $pass_ldap = _request('pass_ldap');
+ $port_ldap = _request('port_ldap');
+ $base_ldap = _request('base_ldap');
+ $base_ldap_text = _request('base_ldap_text');
+ if (!$base_ldap) $base_ldap = $base_ldap_text;
+
+ echo install_debut_html();
+
+ $ldap_link = ldap_connect($adresse_ldap, $port_ldap);
+ @ldap_bind($ldap_link, $login_ldap, $pass_ldap);
+
+ // Essayer de verifier le chemin fourni
+ $r = @ldap_compare($ldap_link, $base_ldap, "objectClass", "");
+ $fail = (ldap_errno($ldap_link) == 32);
+
+ if ($fail) {
+ echo info_etape(_T('info_chemin_acces_annuaire')),
+ info_progression_etape(3,'etape_ldap','install/', true),
+ "<p class='resultat'><b>"._T('avis_operation_echec')."</b></p><p>"._T('avis_chemin_invalide_1'),
+ " (<tt>".htmlspecialchars($base_ldap)."</tt>) "._T('avis_chemin_invalide_2')."</p>";
+ }
+ else {
+ info_etape(_T('info_reglage_ldap'));
+ echo info_progression_etape(4,'etape_ldap','install/');
+
+ $statuts = liste_statuts_ldap();
+ $statut_ldap = defined('_INSTALL_STATUT_LDAP')
+ ? _INSTALL_STATUT_LDAP
+ : $GLOBALS['liste_des_statuts']['info_redacteurs'];
+
+
+ $res = install_propager(array('adresse_ldap','port_ldap','login_ldap','pass_ldap','protocole_ldap','tls_ldap'))
+ . "<input type='hidden' name='etape' value='ldap5' />"
+ . "<input type='hidden' name='base_ldap' value='" . htmlentities($base_ldap) . "' />"
+ . fieldset(_T('info_statut_utilisateurs_1'),
+ array(
+ 'statut_ldap' => array(
+ 'label' => _T('info_statut_utilisateurs_2').'<br />',
+ 'valeur' => $statut_ldap,
+ 'alternatives' => $statuts
+ )
+ )
+ )
+ . install_ldap_correspondances()
+ . bouton_suivant();
+
+ echo generer_form_ecrire('install', $res);
+ }
+
+ echo install_fin_html();
+}
+
+// http://doc.spip.org/@liste_statuts_ldap
+function liste_statuts_ldap() {
+ $recom = array("info_administrateurs" => ("<b>" ._T('info_administrateur_1')."</b> "._T('info_administrateur_2')."<br />"),
+ "info_redacteurs" => ("<b>"._T('info_redacteur_1')."</b> "._T('info_redacteur_2')."<br />"),
+ "info_visiteurs" => ("<b>"._T('info_visiteur_1')."</b> "._T('info_visiteur_2')."<br />"));
+
+ $res = array();
+ foreach($GLOBALS['liste_des_statuts'] as $k => $v) {
+ if (isset($recom[$k])) $res[$v] = $recom[$k];
+ }
+ return $res;
+}
+
+function install_ldap_correspondances()
+{
+ $champs = array();
+ foreach (is_array($GLOBALS['ldap_attributes']) ? $GLOBALS['ldap_attributes'] : array() as $champ => $v ) {
+ $nom = 'ldap_' . $champ;
+ $val = is_array($v) ? join(',', $v) : strval($v);
+ $champs[$nom]= array(
+ 'label' => _T('ldap_correspondance', array('champ' => "<tt>$champ</tt>")).'<br />',
+ 'valeur' => $val
+ );
+ }
+
+ return !$champs ? '' : fieldset(_T('ldap_correspondance_1'), $champs, '', _T('ldap_correspondance_2') . '<br /><br />');
+}
+?>