spip / SPIP

ecrire/auth/ldap.php

Indentation +176 added lines, -176 removed lines

@@ -17,7 +17,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 // Authentifie via LDAP et retourne la ligne SQL decrivant l'utilisateur si ok
@@ -25,12 +25,12 @@ 
 // Attributs LDAP correspondants a ceux de SPIP, notamment pour le login
 // ne pas ecraser une definition perso dans mes_options
 if (!isset($GLOBALS['ldap_attributes']) or !is_array($GLOBALS['ldap_attributes'])) {
-	$GLOBALS['ldap_attributes'] = [
-		'login' => ['sAMAccountName', 'uid', 'login', 'userid', 'cn', 'sn'],
-		'nom' => 'cn',
-		'email' => 'mail',
-		'bio' => 'description'
-	];
+    $GLOBALS['ldap_attributes'] = [
+        'login' => ['sAMAccountName', 'uid', 'login', 'userid', 'cn', 'sn'],
+        'nom' => 'cn',
+        'email' => 'mail',
+        'bio' => 'description'
+    ];
 }
 
 /**
@@ -56,50 +56,50 @@ 
  */
 function auth_ldap_dist($login, $pass, $serveur = '', $phpauth = false) {
 
-	#spip_log("ldap $login " . ($pass ? "mdp fourni" : "mdp absent"));
-
-	// Utilisateur connu ?
-	// si http auth, inutile de reauthentifier: cela
-	// ne marchera pas avec auth http autre que basic.
-	$checkpass = isset($_SERVER['REMOTE_USER']) ? false : true;
-	if (!($dn = auth_ldap_search($login, $pass, $checkpass, $serveur))) {
-		return [];
-	}
-	$credentials_ldap = ['ldap_dn' => $dn, 'ldap_password' => $pass];
-
-	// Si l'utilisateur figure deja dans la base, y recuperer les infos
-	$r = sql_fetsel('*', 'spip_auteurs', 'login=' . sql_quote($login) . " AND source='ldap'", '', '', '', '', $serveur);
-
-	if ($r) {
-		return array_merge($r, $credentials_ldap);
-	}
-
-	// sinon importer les infos depuis LDAP,
-
-	if (
-		$GLOBALS['meta']['ldap_statut_import']
-		and $desc = auth_ldap_retrouver($dn, [], $serveur)
-	) {
-		// rajouter le statut indique  a l'install
-		$desc['statut'] = $GLOBALS['meta']['ldap_statut_import'];
-		$desc['login'] = $login;
-		$desc['source'] = 'ldap';
-		$desc['pass'] = '';
-
-		$r = sql_insertq('spip_auteurs', $desc, '', $serveur);
-	}
-
-	if ($r) {
-		return array_merge(
-			$credentials_ldap,
-			sql_fetsel('*', 'spip_auteurs', 'id_auteur=' . intval($r), '', '', '', '', $serveur)
-		);
-	}
-
-	// sinon echec
-	spip_log("Creation de l'auteur '$login' impossible");
-
-	return [];
+    #spip_log("ldap $login " . ($pass ? "mdp fourni" : "mdp absent"));
+
+    // Utilisateur connu ?
+    // si http auth, inutile de reauthentifier: cela
+    // ne marchera pas avec auth http autre que basic.
+    $checkpass = isset($_SERVER['REMOTE_USER']) ? false : true;
+    if (!($dn = auth_ldap_search($login, $pass, $checkpass, $serveur))) {
+        return [];
+    }
+    $credentials_ldap = ['ldap_dn' => $dn, 'ldap_password' => $pass];
+
+    // Si l'utilisateur figure deja dans la base, y recuperer les infos
+    $r = sql_fetsel('*', 'spip_auteurs', 'login=' . sql_quote($login) . " AND source='ldap'", '', '', '', '', $serveur);
+
+    if ($r) {
+        return array_merge($r, $credentials_ldap);
+    }
+
+    // sinon importer les infos depuis LDAP,
+
+    if (
+        $GLOBALS['meta']['ldap_statut_import']
+        and $desc = auth_ldap_retrouver($dn, [], $serveur)
+    ) {
+        // rajouter le statut indique  a l'install
+        $desc['statut'] = $GLOBALS['meta']['ldap_statut_import'];
+        $desc['login'] = $login;
+        $desc['source'] = 'ldap';
+        $desc['pass'] = '';
+
+        $r = sql_insertq('spip_auteurs', $desc, '', $serveur);
+    }
+
+    if ($r) {
+        return array_merge(
+            $credentials_ldap,
+            sql_fetsel('*', 'spip_auteurs', 'id_auteur=' . intval($r), '', '', '', '', $serveur)
+        );
+    }
+
+    // sinon echec
+    spip_log("Creation de l'auteur '$login' impossible");
+
+    return [];
 }
 
 /**
@@ -113,36 +113,36 @@ 
  * @return array
  */
 function auth_ldap_connect($serveur = '') {
-	include_spip('base/connect_sql');
-	static $connexions_ldap = [];
-	if (isset($connexions_ldap[$serveur])) {
-		return $connexions_ldap[$serveur];
-	}
-	$connexion = spip_connect($serveur);
-	if (!is_array($connexion['ldap'])) {
-		if ($connexion['authentification']['ldap']) {
-			$f = _DIR_CONNECT . $connexion['authentification']['ldap'];
-			unset($GLOBALS['ldap_link']);
-			if (is_readable($f)) {
-				include_once($f);
-			};
-			if (isset($GLOBALS['ldap_link'])) {
-				$connexion['ldap'] = [
-					'link' => $GLOBALS['ldap_link'],
-					'base' => $GLOBALS['ldap_base']
-				];
-			} else {
-				spip_log("connection LDAP $serveur mal definie dans $f");
-			}
-			if (isset($GLOBALS['ldap_champs'])) {
-				$connexion['ldap']['attributes'] = $GLOBALS['ldap_champs'];
-			}
-		} else {
-			spip_log("connection LDAP $serveur inconnue");
-		}
-	}
-
-	return $connexions_ldap[$serveur] = $connexion['ldap'];
+    include_spip('base/connect_sql');
+    static $connexions_ldap = [];
+    if (isset($connexions_ldap[$serveur])) {
+        return $connexions_ldap[$serveur];
+    }
+    $connexion = spip_connect($serveur);
+    if (!is_array($connexion['ldap'])) {
+        if ($connexion['authentification']['ldap']) {
+            $f = _DIR_CONNECT . $connexion['authentification']['ldap'];
+            unset($GLOBALS['ldap_link']);
+            if (is_readable($f)) {
+                include_once($f);
+            };
+            if (isset($GLOBALS['ldap_link'])) {
+                $connexion['ldap'] = [
+                    'link' => $GLOBALS['ldap_link'],
+                    'base' => $GLOBALS['ldap_base']
+                ];
+            } else {
+                spip_log("connection LDAP $serveur mal definie dans $f");
+            }
+            if (isset($GLOBALS['ldap_champs'])) {
+                $connexion['ldap']['attributes'] = $GLOBALS['ldap_champs'];
+            }
+        } else {
+            spip_log("connection LDAP $serveur inconnue");
+        }
+    }
+
+    return $connexions_ldap[$serveur] = $connexion['ldap'];
 }
 
 /**
@@ -156,52 +156,52 @@ 
  *    Le login trouvé ou chaine vide si non trouvé
  */
 function auth_ldap_search($login, $pass, $checkpass = true, $serveur = '') {
-	// Securite anti-injection et contre un serveur LDAP laxiste
-	$login_search = preg_replace('/[^-@._\s\d\w]/', '', $login);
-	if (!strlen($login_search) or ($checkpass and !strlen($pass))) {
-		return '';
-	}
-
-	// verifier la connexion
-	if (!$ldap = auth_ldap_connect($serveur)) {
-		return '';
-	}
-
-	$ldap_link = $ldap['link'] ?? null;
-	$ldap_base = $ldap['base'] ?? null;
-	$desc = !empty($ldap['attributes']) ? $ldap['attributes'] : $GLOBALS['ldap_attributes'];
-
-	$logins = is_array($desc['login']) ? $desc['login'] : [$desc['login']];
-
-	// Tenter une recherche pour essayer de retrouver le DN
-	foreach ($logins as $att) {
-		$result = @ldap_search($ldap_link, $ldap_base, "$att=$login_search", ['dn']);
-		$info = @ldap_get_entries($ldap_link, $result);
-		// Ne pas accepter les resultats si plus d'une entree
-		// (on veut un attribut unique)
-
-		if (is_array($info) and $info['count'] == 1) {
-			$dn = $info[0]['dn'];
-			if (!$checkpass) {
-				return $dn;
-			}
-			if (@ldap_bind($ldap_link, $dn, $pass)) {
-				return $dn;
-			}
-		}
-	}
-
-	if ($checkpass and !isset($dn)) {
-		// Si echec, essayer de deviner le DN
-		foreach ($logins as $att) {
-			$dn = "$att=$login_search, $ldap_base";
-			if (@ldap_bind($ldap_link, $dn, $pass)) {
-				return "$att=$login_search, $ldap_base";
-			}
-		}
-	}
-
-	return '';
+    // Securite anti-injection et contre un serveur LDAP laxiste
+    $login_search = preg_replace('/[^-@._\s\d\w]/', '', $login);
+    if (!strlen($login_search) or ($checkpass and !strlen($pass))) {
+        return '';
+    }
+
+    // verifier la connexion
+    if (!$ldap = auth_ldap_connect($serveur)) {
+        return '';
+    }
+
+    $ldap_link = $ldap['link'] ?? null;
+    $ldap_base = $ldap['base'] ?? null;
+    $desc = !empty($ldap['attributes']) ? $ldap['attributes'] : $GLOBALS['ldap_attributes'];
+
+    $logins = is_array($desc['login']) ? $desc['login'] : [$desc['login']];
+
+    // Tenter une recherche pour essayer de retrouver le DN
+    foreach ($logins as $att) {
+        $result = @ldap_search($ldap_link, $ldap_base, "$att=$login_search", ['dn']);
+        $info = @ldap_get_entries($ldap_link, $result);
+        // Ne pas accepter les resultats si plus d'une entree
+        // (on veut un attribut unique)
+
+        if (is_array($info) and $info['count'] == 1) {
+            $dn = $info[0]['dn'];
+            if (!$checkpass) {
+                return $dn;
+            }
+            if (@ldap_bind($ldap_link, $dn, $pass)) {
+                return $dn;
+            }
+        }
+    }
+
+    if ($checkpass and !isset($dn)) {
+        // Si echec, essayer de deviner le DN
+        foreach ($logins as $att) {
+            $dn = "$att=$login_search, $ldap_base";
+            if (@ldap_bind($ldap_link, $dn, $pass)) {
+                return "$att=$login_search, $ldap_base";
+            }
+        }
+    }
+
+    return '';
 }
 
 /**
@@ -213,40 +213,40 @@ 
  * @return array
  */
 function auth_ldap_retrouver($dn, $desc = [], $serveur = '') {
-	// Lire les infos sur l'utilisateur a partir de son DN depuis LDAP
+    // Lire les infos sur l'utilisateur a partir de son DN depuis LDAP
 
-	if (!$ldap = spip_connect_ldap($serveur)) {
-		spip_log("ldap $serveur injoignable");
+    if (!$ldap = spip_connect_ldap($serveur)) {
+        spip_log("ldap $serveur injoignable");
 
-		return [];
-	}
+        return [];
+    }
 
-	$ldap_link = $ldap['link'];
-	if (!$desc) {
-		$desc = $ldap['attributes'] ?: $GLOBALS['ldap_attributes'];
-		unset($desc['login']);
-	}
-	$result = @ldap_read($ldap_link, $dn, 'objectClass=*', array_values($desc));
+    $ldap_link = $ldap['link'];
+    if (!$desc) {
+        $desc = $ldap['attributes'] ?: $GLOBALS['ldap_attributes'];
+        unset($desc['login']);
+    }
+    $result = @ldap_read($ldap_link, $dn, 'objectClass=*', array_values($desc));
 
-	if (!$result) {
-		return [];
-	}
+    if (!$result) {
+        return [];
+    }
 
-	// Recuperer les donnees du premier (unique?) compte de l'auteur
-	$val = @ldap_get_entries($ldap_link, $result);
-	if (!is_array($val) or !is_array($val[0])) {
-		return [];
-	}
-	$val = $val[0];
+    // Recuperer les donnees du premier (unique?) compte de l'auteur
+    $val = @ldap_get_entries($ldap_link, $result);
+    if (!is_array($val) or !is_array($val[0])) {
+        return [];
+    }
+    $val = $val[0];
 
-	// Convertir depuis UTF-8 (jeu de caracteres par defaut)
-	include_spip('inc/charsets');
+    // Convertir depuis UTF-8 (jeu de caracteres par defaut)
+    include_spip('inc/charsets');
 
-	foreach ($desc as $k => $v) {
-		$desc[$k] = importer_charset($val[strtolower($v)][0], 'utf-8');
-	}
+    foreach ($desc as $k => $v) {
+        $desc[$k] = importer_charset($val[strtolower($v)][0], 'utf-8');
+    }
 
-	return $desc;
+    return $desc;
 }
 
 
@@ -258,7 +258,7 @@ 
  * @return string
  */
 function auth_ldap_retrouver_login($login, $serveur = '') {
-	return auth_ldap_search($login, '', false, $serveur) ? $login : '';
+    return auth_ldap_search($login, '', false, $serveur) ? $login : '';
 }
 
 /**
@@ -278,9 +278,9 @@ 
  *   Message d'erreur si login non valide, chaîne vide sinon
  */
 function auth_ldap_verifier_pass($login, $new_pass, $id_auteur = 0, $serveur = '') {
-	include_spip('auth/spip');
+    include_spip('auth/spip');
 
-	return auth_spip_verifier_pass($login, $new_pass, $id_auteur, $serveur);
+    return auth_spip_verifier_pass($login, $new_pass, $id_auteur, $serveur);
 }
 
 /**
@@ -301,7 +301,7 @@ 
  *   ```
  */
 function auth_ldap_autoriser_modifier_pass($serveur = '') {
-	return true;
+    return true;
 }
 
 /**
@@ -319,23 +319,23 @@ 
  *    Informe du succès ou de l'echec du changement du mot de passe
  */
 function auth_ldap_modifier_pass($login, $new_pass, $id_auteur, $serveur = '') {
-	if (is_null($new_pass) or auth_ldap_verifier_pass($login, $new_pass, $id_auteur, $serveur) != '') {
-		return false;
-	}
-	if (!$ldap = auth_ldap_connect($serveur)) {
-		return '';
-	}
-	$link = $ldap['link'];
-	include_spip('inc/session');
-	$dn = session_get('ldap_dn');
-	if ('' == $dn) {
-		return false;
-	}
-	if (!ldap_bind($link, $dn, session_get('ldap_password'))) {
-		return false;
-	}
-	$encoded_pass = '{MD5}' . base64_encode(pack('H*', md5($new_pass)));
-	$success = ldap_mod_replace($link, $dn, ['userPassword' => $encoded_pass]);
-
-	return $success;
+    if (is_null($new_pass) or auth_ldap_verifier_pass($login, $new_pass, $id_auteur, $serveur) != '') {
+        return false;
+    }
+    if (!$ldap = auth_ldap_connect($serveur)) {
+        return '';
+    }
+    $link = $ldap['link'];
+    include_spip('inc/session');
+    $dn = session_get('ldap_dn');
+    if ('' == $dn) {
+        return false;
+    }
+    if (!ldap_bind($link, $dn, session_get('ldap_password'))) {
+        return false;
+    }
+    $encoded_pass = '{MD5}' . base64_encode(pack('H*', md5($new_pass)));
+    $success = ldap_mod_replace($link, $dn, ['userPassword' => $encoded_pass]);
+
+    return $success;
 }

ecrire/exec/base_repair.php

Indentation +22 added lines, -22 removed lines

@@ -23,7 +23,7 @@ 
  */
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 
@@ -31,25 +31,25 @@ 
  * Réparer la base de données
  */
 function exec_base_repair_dist() {
-	$action = null;
-	$ok = false;
-	if (!spip_connect()) {
-		$message = _T('titre_probleme_technique');
-	} else {
-		$version_sql = sql_version();
-		if (!$version_sql) {
-			$message = _T('avis_erreur_connexion_mysql');
-		} else {
-			$message = _T('texte_requetes_echouent');
-			$ok = true;
-		}
-		$action = _T('texte_tenter_reparation');
-	}
-	if ($ok) {
-		$admin = charger_fonction('admin', 'inc');
-		echo $admin('repair', $action, $message, true);
-	} else {
-		include_spip('inc/minipres');
-		echo minipres(_T('titre_reparation'), "<p>$message</p>");
-	}
+    $action = null;
+    $ok = false;
+    if (!spip_connect()) {
+        $message = _T('titre_probleme_technique');
+    } else {
+        $version_sql = sql_version();
+        if (!$version_sql) {
+            $message = _T('avis_erreur_connexion_mysql');
+        } else {
+            $message = _T('texte_requetes_echouent');
+            $ok = true;
+        }
+        $action = _T('texte_tenter_reparation');
+    }
+    if ($ok) {
+        $admin = charger_fonction('admin', 'inc');
+        echo $admin('repair', $action, $message, true);
+    } else {
+        include_spip('inc/minipres');
+        echo minipres(_T('titre_reparation'), "<p>$message</p>");
+    }
 }

ecrire/exec/admin_plugin.php

Indentation +203 added lines, -203 removed lines

@@ -17,7 +17,7 @@ 
  */
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 include_spip('inc/config');
@@ -37,26 +37,26 @@ 
  */
 function exec_admin_plugin_dist($retour = '') {
 
-	if (!autoriser('configurer', '_plugins')) {
-		include_spip('inc/minipres');
-		echo minipres();
-	} else {
-		// on fait la verif du path avant tout,
-		// et l'installation des qu'on est dans la colonne principale
-		// si jamais la liste des plugins actifs change, il faut faire un refresh du hit
-		// pour etre sur que les bons fichiers seront charges lors de l'install
-		$new = actualise_plugins_actifs();
-		if ($new and _request('actualise') < 2) {
-			include_spip('inc/headers');
-			if (isset($GLOBALS['fichier_php_compile_recent'])) {
-				// attendre eventuellement l'invalidation du cache opcode
-				spip_attend_invalidation_opcode_cache($GLOBALS['fichier_php_compile_recent']);
-			}
-			redirige_par_entete(parametre_url(self(), 'actualise', _request('actualise') + 1, '&'));
-		} else {
-			admin_plug_args(_request('voir'), _request('erreur'), _request('format'));
-		}
-	}
+    if (!autoriser('configurer', '_plugins')) {
+        include_spip('inc/minipres');
+        echo minipres();
+    } else {
+        // on fait la verif du path avant tout,
+        // et l'installation des qu'on est dans la colonne principale
+        // si jamais la liste des plugins actifs change, il faut faire un refresh du hit
+        // pour etre sur que les bons fichiers seront charges lors de l'install
+        $new = actualise_plugins_actifs();
+        if ($new and _request('actualise') < 2) {
+            include_spip('inc/headers');
+            if (isset($GLOBALS['fichier_php_compile_recent'])) {
+                // attendre eventuellement l'invalidation du cache opcode
+                spip_attend_invalidation_opcode_cache($GLOBALS['fichier_php_compile_recent']);
+            }
+            redirige_par_entete(parametre_url(self(), 'actualise', _request('actualise') + 1, '&'));
+        } else {
+            admin_plug_args(_request('voir'), _request('erreur'), _request('format'));
+        }
+    }
 }
 
 /**
@@ -81,132 +81,132 @@ 
  *     Format d'affichage (liste ou arborescence)
  **/
 function admin_plug_args($quoi, $erreur, $format) {
-	$lpf = null;
-	$lcpas = null;
-	$lcpaffichesup = null;
-	if (!$quoi) {
-		$quoi = 'actifs';
-	}
-	// empecher l'affichage des erreurs dans le bandeau, on le donne ensuite
-	// format brut par plugin
-	$GLOBALS['erreurs_activation_raw'] = plugin_donne_erreurs(true, false);
-	// format resume mis en forme
-	$erreur_activation = plugin_donne_erreurs();
-	$commencer_page = charger_fonction('commencer_page', 'inc');
-	echo $commencer_page(_T('icone_admin_plugin'), 'configuration', 'plugin');
-
-	echo debut_gauche();
-	echo recuperer_fond('prive/squelettes/navigation/configurer', ['exec' => 'admin_plugin']);
-
-	echo pipeline(
-		'affiche_gauche',
-		[
-			'args' => ['exec' => 'admin_plugin'],
-			'data' => afficher_librairies()
-		]
-	);
-
-	echo debut_droite();
-	echo gros_titre(_T('icone_admin_plugin'), '');
-
-	// Barre d'onglets de premier niveau
-	echo barre_onglets('plugins', 'plugins_actifs');
-	// Barre d'onglets de second niveau
-	$onglet2 = $quoi == 'actifs' ? 'plugins_actifs' : 'admin_plugin';
-	echo debut_onglet('onglets_simple second');
-	echo onglet(_T('plugins_tous_liste'), generer_url_ecrire('admin_plugin', 'voir=tous'), 'admin_plugin', $onglet2);
-	echo onglet(_T('plugins_actifs_liste'), generer_url_ecrire('admin_plugin'), 'plugins_actifs', $onglet2);
-	echo fin_onglet();
-
-	// message d'erreur au retour d'une operation
-	if ($erreur) {
-		echo "<div class='error'>$erreur</div>";
-	}
-	if ($erreur_activation) {
-		echo "<div class='error'>$erreur_activation</div>";
-	}
-
-	// la mise a jour de cette meta a ete faite par ecrire_plugin_actifs
-	$actifs = unserialize($GLOBALS['meta']['plugin']);
-	$lcpa = $actifs + unserialize($GLOBALS['meta']['plugin_attente']);
-
-	// Les affichages se basent sur le repertoire, pas sur le nom
-	$actifs = liste_chemin_plugin($actifs, '');
-	if (defined('_DIR_PLUGINS_SUPPL')) {
-		$lcpas = liste_chemin_plugin($lcpa, _DIR_PLUGINS_SUPPL);
-	}
-	$lcpa = liste_chemin_plugin($lcpa);
-
-	// on installe les plugins maintenant,
-	// cela permet aux scripts d'install de faire des affichages (moches...)
-	plugin_installes_meta();
-
-	echo "<div class='liste-plugins formulaire_spip'>";
-	echo debut_cadre_trait_couleur('plugin-24.png', true, '', _T('plugins_liste'), 'plugins');
-
-	if ($quoi !== 'actifs') {
-		$lpf = liste_plugin_files();
-		if ($lpf) {
-			echo '<p>' . _T('texte_presente_plugin') . '</p>';
-		} else {
-			if (!@is_dir(_DIR_PLUGINS)) {
-				echo '<p>' . _T('plugin_info_automatique_ftp', ['rep' => joli_repertoire(_DIR_PLUGINS)])
-					. ' &mdash; ' . _T('plugin_info_automatique_creer') . '</p>';
-			}
-		}
-		$lcpaffiche = $lpf;
-		if (defined('_DIR_PLUGINS_SUPPL')) {
-			$lcpaffichesup = liste_plugin_files(_DIR_PLUGINS_SUPPL);
-		}
-	} else {
-		// la liste
-		// $quoi=='actifs'
-		$lcpaffiche = $lcpa;
-		if (defined('_DIR_PLUGINS_SUPPL')) {
-			$lcpaffichesup = $lcpas;
-		}
-	}
-
-	if ($quoi == 'actifs' or $lpf) {
-		$nb = is_countable($lcpa) ? count($lcpa) : 0;
-		if (defined('_DIR_PLUGINS_SUPPL')) {
-			$nb += is_countable($lcpas) ? count($lcpas) : 0;
-		}
-		echo '<h3>' . sinon(
-			singulier_ou_pluriel($nb, 'plugins_actif_un', 'plugins_actifs', 'count'),
-			_T('plugins_actif_aucun')
-		) . '</h3>';
-	}
-
-	if (empty($format)) {
-		$format = 'liste';
-	} elseif (!in_array($format, ['liste', 'repertoires'])) {
-		$format = 'repertoires';
-	}
-
-	$afficher = charger_fonction("afficher_$format", 'plugins');
-	$corps = $afficher(self(), $lcpaffiche, $lcpa, $actifs);
-	if (defined('_DIR_PLUGINS_SUPPL')) {
-		$corps .= $afficher(self(), $lcpaffichesup, $lcpas, $actifs, _DIR_PLUGINS_SUPPL);
-	}
-
-	if ($corps) {
-		$corps .= "\n<div class='boutons' style='display:none;'>"
-			. "<input type='submit' class='submit save' value='" . _T('bouton_enregistrer')
-			. "' />"
-			. '</div>';
-	}
-
-	echo redirige_action_post('activer_plugins', 'activer', 'admin_plugin', '', $corps);
-
-	echo fin_cadre_trait_couleur();
-
-	if ($quoi == 'actifs') {
-		echo affiche_les_plugins_verrouilles($actifs);
-	}
-	echo '</div>';
-
-	echo http_script("
+    $lpf = null;
+    $lcpas = null;
+    $lcpaffichesup = null;
+    if (!$quoi) {
+        $quoi = 'actifs';
+    }
+    // empecher l'affichage des erreurs dans le bandeau, on le donne ensuite
+    // format brut par plugin
+    $GLOBALS['erreurs_activation_raw'] = plugin_donne_erreurs(true, false);
+    // format resume mis en forme
+    $erreur_activation = plugin_donne_erreurs();
+    $commencer_page = charger_fonction('commencer_page', 'inc');
+    echo $commencer_page(_T('icone_admin_plugin'), 'configuration', 'plugin');
+
+    echo debut_gauche();
+    echo recuperer_fond('prive/squelettes/navigation/configurer', ['exec' => 'admin_plugin']);
+
+    echo pipeline(
+        'affiche_gauche',
+        [
+            'args' => ['exec' => 'admin_plugin'],
+            'data' => afficher_librairies()
+        ]
+    );
+
+    echo debut_droite();
+    echo gros_titre(_T('icone_admin_plugin'), '');
+
+    // Barre d'onglets de premier niveau
+    echo barre_onglets('plugins', 'plugins_actifs');
+    // Barre d'onglets de second niveau
+    $onglet2 = $quoi == 'actifs' ? 'plugins_actifs' : 'admin_plugin';
+    echo debut_onglet('onglets_simple second');
+    echo onglet(_T('plugins_tous_liste'), generer_url_ecrire('admin_plugin', 'voir=tous'), 'admin_plugin', $onglet2);
+    echo onglet(_T('plugins_actifs_liste'), generer_url_ecrire('admin_plugin'), 'plugins_actifs', $onglet2);
+    echo fin_onglet();
+
+    // message d'erreur au retour d'une operation
+    if ($erreur) {
+        echo "<div class='error'>$erreur</div>";
+    }
+    if ($erreur_activation) {
+        echo "<div class='error'>$erreur_activation</div>";
+    }
+
+    // la mise a jour de cette meta a ete faite par ecrire_plugin_actifs
+    $actifs = unserialize($GLOBALS['meta']['plugin']);
+    $lcpa = $actifs + unserialize($GLOBALS['meta']['plugin_attente']);
+
+    // Les affichages se basent sur le repertoire, pas sur le nom
+    $actifs = liste_chemin_plugin($actifs, '');
+    if (defined('_DIR_PLUGINS_SUPPL')) {
+        $lcpas = liste_chemin_plugin($lcpa, _DIR_PLUGINS_SUPPL);
+    }
+    $lcpa = liste_chemin_plugin($lcpa);
+
+    // on installe les plugins maintenant,
+    // cela permet aux scripts d'install de faire des affichages (moches...)
+    plugin_installes_meta();
+
+    echo "<div class='liste-plugins formulaire_spip'>";
+    echo debut_cadre_trait_couleur('plugin-24.png', true, '', _T('plugins_liste'), 'plugins');
+
+    if ($quoi !== 'actifs') {
+        $lpf = liste_plugin_files();
+        if ($lpf) {
+            echo '<p>' . _T('texte_presente_plugin') . '</p>';
+        } else {
+            if (!@is_dir(_DIR_PLUGINS)) {
+                echo '<p>' . _T('plugin_info_automatique_ftp', ['rep' => joli_repertoire(_DIR_PLUGINS)])
+                    . ' &mdash; ' . _T('plugin_info_automatique_creer') . '</p>';
+            }
+        }
+        $lcpaffiche = $lpf;
+        if (defined('_DIR_PLUGINS_SUPPL')) {
+            $lcpaffichesup = liste_plugin_files(_DIR_PLUGINS_SUPPL);
+        }
+    } else {
+        // la liste
+        // $quoi=='actifs'
+        $lcpaffiche = $lcpa;
+        if (defined('_DIR_PLUGINS_SUPPL')) {
+            $lcpaffichesup = $lcpas;
+        }
+    }
+
+    if ($quoi == 'actifs' or $lpf) {
+        $nb = is_countable($lcpa) ? count($lcpa) : 0;
+        if (defined('_DIR_PLUGINS_SUPPL')) {
+            $nb += is_countable($lcpas) ? count($lcpas) : 0;
+        }
+        echo '<h3>' . sinon(
+            singulier_ou_pluriel($nb, 'plugins_actif_un', 'plugins_actifs', 'count'),
+            _T('plugins_actif_aucun')
+        ) . '</h3>';
+    }
+
+    if (empty($format)) {
+        $format = 'liste';
+    } elseif (!in_array($format, ['liste', 'repertoires'])) {
+        $format = 'repertoires';
+    }
+
+    $afficher = charger_fonction("afficher_$format", 'plugins');
+    $corps = $afficher(self(), $lcpaffiche, $lcpa, $actifs);
+    if (defined('_DIR_PLUGINS_SUPPL')) {
+        $corps .= $afficher(self(), $lcpaffichesup, $lcpas, $actifs, _DIR_PLUGINS_SUPPL);
+    }
+
+    if ($corps) {
+        $corps .= "\n<div class='boutons' style='display:none;'>"
+            . "<input type='submit' class='submit save' value='" . _T('bouton_enregistrer')
+            . "' />"
+            . '</div>';
+    }
+
+    echo redirige_action_post('activer_plugins', 'activer', 'admin_plugin', '', $corps);
+
+    echo fin_cadre_trait_couleur();
+
+    if ($quoi == 'actifs') {
+        echo affiche_les_plugins_verrouilles($actifs);
+    }
+    echo '</div>';
+
+    echo http_script("
 	jQuery(function(){
 		jQuery('.plugins li.item a[rel=info]').click(function(){
 			var li = jQuery(this).parents('li').eq(0);
@@ -232,15 +232,15 @@ 
 	});
 	");
 
-	echo pipeline(
-		'affiche_milieu',
-		[
-			'args' => ['exec' => 'admin_plugin'],
-			'data' => ''
-		]
-	);
+    echo pipeline(
+        'affiche_milieu',
+        [
+            'args' => ['exec' => 'admin_plugin'],
+            'data' => ''
+        ]
+    );
 
-	echo fin_gauche(), fin_page();
+    echo fin_gauche(), fin_page();
 }
 
 /**
@@ -254,23 +254,23 @@ 
  *     Code HTML
  **/
 function affiche_les_plugins_verrouilles($actifs) {
-	if ((!$liste = liste_plugin_files(_DIR_PLUGINS_DIST))) {
-		return '';
-	}
-
-	$afficher = charger_fonction('afficher_liste', 'plugins');
-	$liste = $afficher(self(), $liste, [], $actifs, _DIR_PLUGINS_DIST);
-
-	return
-		"<div id='plugins_dist'>"
-		. debut_cadre_trait_couleur('', true, '', _T('plugins_liste_dist'), 'liste_plugins_dist')
-		. '<p>'
-		. _T('plugin_info_plugins_dist_1', ['plugins_dist' => joli_repertoire(_DIR_PLUGINS_DIST)])
-		. '<br />' . _T('plugin_info_plugins_dist_2')
-		. '</p>'
-		. $liste
-		. fin_cadre_trait_couleur()
-		. "</div>\n";
+    if ((!$liste = liste_plugin_files(_DIR_PLUGINS_DIST))) {
+        return '';
+    }
+
+    $afficher = charger_fonction('afficher_liste', 'plugins');
+    $liste = $afficher(self(), $liste, [], $actifs, _DIR_PLUGINS_DIST);
+
+    return
+        "<div id='plugins_dist'>"
+        . debut_cadre_trait_couleur('', true, '', _T('plugins_liste_dist'), 'liste_plugins_dist')
+        . '<p>'
+        . _T('plugin_info_plugins_dist_1', ['plugins_dist' => joli_repertoire(_DIR_PLUGINS_DIST)])
+        . '<br />' . _T('plugin_info_plugins_dist_2')
+        . '</p>'
+        . $liste
+        . fin_cadre_trait_couleur()
+        . "</div>\n";
 }
 
 /**
@@ -282,19 +282,19 @@ 
  */
 function afficher_librairies() {
 
-	if (!$libs = liste_librairies()) {
-		return '';
-	}
-	ksort($libs);
-	$res = debut_cadre_enfonce('', true, '', _T('plugin_librairies_installees'));
-	$res .= '<dl>';
-	foreach ($libs as $lib => $rep) {
-		$res .= "<dt>$lib</dt><dd>" . joli_repertoire($rep) . "</dd>\n";
-	}
-	$res .= '</dl>';
-	$res .= fin_cadre_enfonce();
-
-	return $res;
+    if (!$libs = liste_librairies()) {
+        return '';
+    }
+    ksort($libs);
+    $res = debut_cadre_enfonce('', true, '', _T('plugin_librairies_installees'));
+    $res .= '<dl>';
+    foreach ($libs as $lib => $rep) {
+        $res .= "<dt>$lib</dt><dd>" . joli_repertoire($rep) . "</dd>\n";
+    }
+    $res .= '</dl>';
+    $res .= fin_cadre_enfonce();
+
+    return $res;
 }
 
 
@@ -305,22 +305,22 @@ 
  *     Tableau (nom de la lib => repertoire , ...)
  */
 function liste_librairies() {
-	$libs = [];
-	foreach (array_reverse(creer_chemin()) as $d) {
-		if (
-			is_dir($dir = $d . 'lib/')
-			and $t = opendir($dir)
-		) {
-			while (($f = readdir($t)) !== false) {
-				if (
-					$f[0] != '.'
-					and is_dir("$dir/$f")
-				) {
-					$libs[$f] = $dir;
-				}
-			}
-		}
-	}
-
-	return $libs;
+    $libs = [];
+    foreach (array_reverse(creer_chemin()) as $d) {
+        if (
+            is_dir($dir = $d . 'lib/')
+            and $t = opendir($dir)
+        ) {
+            while (($f = readdir($t)) !== false) {
+                if (
+                    $f[0] != '.'
+                    and is_dir("$dir/$f")
+                ) {
+                    $libs[$f] = $dir;
+                }
+            }
+        }
+    }
+
+    return $libs;
 }

ecrire/exec/demande_mise_a_jour.php

Indentation +24 added lines, -24 removed lines

@@ -20,7 +20,7 @@ 
  */
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 
@@ -28,29 +28,29 @@ 
  * Demander à mettre à jour la base de données
  */
 function exec_demande_mise_a_jour_dist() {
-	// on fait la verif du path avant tout,
-	// et l'installation des qu'on est dans la colonne principale
-	// si jamais la liste des plugins actifs change, il faut faire un refresh du hit
-	// pour etre sur que les bons fichiers seront charges lors de l'install
-	include_spip('inc/plugin');
-	if (actualise_plugins_actifs()) {
-		include_spip('inc/headers');
-		redirige_par_entete(self());
-	}
+    // on fait la verif du path avant tout,
+    // et l'installation des qu'on est dans la colonne principale
+    // si jamais la liste des plugins actifs change, il faut faire un refresh du hit
+    // pour etre sur que les bons fichiers seront charges lors de l'install
+    include_spip('inc/plugin');
+    if (actualise_plugins_actifs()) {
+        include_spip('inc/headers');
+        redirige_par_entete(self());
+    }
 
-	include_spip('inc/presentation');
-	include_spip('inc/filtres_boites');
-	$commencer_page = charger_fonction('commencer_page', 'inc');
-	echo $commencer_page('', '', '', '', true, false, false);
+    include_spip('inc/presentation');
+    include_spip('inc/filtres_boites');
+    $commencer_page = charger_fonction('commencer_page', 'inc');
+    echo $commencer_page('', '', '', '', true, false, false);
 
-	echo debut_grand_cadre();
-	echo boite_ouvrir(_T('info_message_technique'), 'notice');
-	echo '<p>' . _T('info_procedure_maj_version') . '</p>',
-		'<p>' . _T('info_administrateur_site_01') . '</p>';
-	echo bouton_action(_T('bouton_mettre_a_jour_base'), generer_url_ecrire('upgrade', 'reinstall=non'));
-	echo boite_fermer();
-	// masquer les erreurs sql sur cette page car proviennent de la base pas a jour !
-	echo '<style type="text/css">#debug-nav {display: none;}</style>';
-	echo fin_grand_cadre();
-	echo fin_page();
+    echo debut_grand_cadre();
+    echo boite_ouvrir(_T('info_message_technique'), 'notice');
+    echo '<p>' . _T('info_procedure_maj_version') . '</p>',
+        '<p>' . _T('info_administrateur_site_01') . '</p>';
+    echo bouton_action(_T('bouton_mettre_a_jour_base'), generer_url_ecrire('upgrade', 'reinstall=non'));
+    echo boite_fermer();
+    // masquer les erreurs sql sur cette page car proviennent de la base pas a jour !
+    echo '<style type="text/css">#debug-nav {display: none;}</style>';
+    echo fin_grand_cadre();
+    echo fin_page();
 }

ecrire/exec/404.php

Indentation +16 added lines, -16 removed lines

@@ -17,7 +17,7 @@ 
  */
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -25,25 +25,25 @@ 
  */
 function exec_404_dist() {
 
-	$exec = _request('exec');
+    $exec = _request('exec');
 
-	$titre = "exec_$exec";
-	$navigation = '';
-	$extra = '';
+    $titre = "exec_$exec";
+    $navigation = '';
+    $extra = '';
 
-	include_spip('inc/presentation'); // alleger les inclusions avec un inc/presentation_mini
-	$commencer_page = charger_fonction('commencer_page', 'inc');
-	echo $commencer_page($titre);
+    include_spip('inc/presentation'); // alleger les inclusions avec un inc/presentation_mini
+    $commencer_page = charger_fonction('commencer_page', 'inc');
+    echo $commencer_page($titre);
 
-	echo debut_gauche();
-	echo pipeline('affiche_gauche', ['args' => ['exec' => '404', 'exec_erreur' => $exec], 'data' => '']);
+    echo debut_gauche();
+    echo pipeline('affiche_gauche', ['args' => ['exec' => '404', 'exec_erreur' => $exec], 'data' => '']);
 
-	echo creer_colonne_droite();
-	echo pipeline('affiche_droite', ['args' => ['exec' => '404', 'exec_erreur' => $exec], 'data' => '']);
+    echo creer_colonne_droite();
+    echo pipeline('affiche_droite', ['args' => ['exec' => '404', 'exec_erreur' => $exec], 'data' => '']);
 
-	echo debut_droite();
-	echo "<h1 class='grostitre'>" . _T('fichier_introuvable', ['fichier' => $exec]) . '</h1>';
-	echo pipeline('affiche_milieu', ['args' => ['exec' => '404', 'exec_erreur' => $exec], 'data' => '']);
+    echo debut_droite();
+    echo "<h1 class='grostitre'>" . _T('fichier_introuvable', ['fichier' => $exec]) . '</h1>';
+    echo pipeline('affiche_milieu', ['args' => ['exec' => '404', 'exec_erreur' => $exec], 'data' => '']);
 
-	echo fin_gauche(), fin_page();
+    echo fin_gauche(), fin_page();
 }

ecrire/exec/403.php

Indentation +28 added lines, -28 removed lines

@@ -17,7 +17,7 @@ 
  */
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -27,40 +27,40 @@ 
  */
 function exec_403_dist($message = '') {
 
-	$exec = _request('exec');
+    $exec = _request('exec');
 
-	$titre = "exec_$exec";
-	$navigation = '';
-	$extra = '';
+    $titre = "exec_$exec";
+    $navigation = '';
+    $extra = '';
 
-	if (!$message) {
-		$message = _T('avis_acces_interdit_prive', ['exec' => _request('exec')]);
-	}
+    if (!$message) {
+        $message = _T('avis_acces_interdit_prive', ['exec' => _request('exec')]);
+    }
 
-	$contenu = "<h1 class='grostitre'>" . _T('info_acces_interdit') . '</h1>' . $message;
+    $contenu = "<h1 class='grostitre'>" . _T('info_acces_interdit') . '</h1>' . $message;
 
-	if (_request('var_zajax')) {
-		include_spip('inc/actions');
-		ajax_retour($contenu);
-	} else {
-		include_spip('inc/presentation'); // alleger les inclusions avec un inc/presentation_mini
+    if (_request('var_zajax')) {
+        include_spip('inc/actions');
+        ajax_retour($contenu);
+    } else {
+        include_spip('inc/presentation'); // alleger les inclusions avec un inc/presentation_mini
 
-		$commencer_page = charger_fonction('commencer_page', 'inc');
-		echo $commencer_page($titre);
+        $commencer_page = charger_fonction('commencer_page', 'inc');
+        echo $commencer_page($titre);
 
-		echo debut_gauche();
-		echo recuperer_fond('prive/squelettes/navigation/dist', []);
-		echo pipeline('affiche_gauche', ['args' => ['exec' => '403', 'exec_erreur' => $exec], 'data' => '']);
+        echo debut_gauche();
+        echo recuperer_fond('prive/squelettes/navigation/dist', []);
+        echo pipeline('affiche_gauche', ['args' => ['exec' => '403', 'exec_erreur' => $exec], 'data' => '']);
 
-		echo creer_colonne_droite();
-		echo pipeline('affiche_droite', ['args' => ['exec' => '403', 'exec_erreur' => $exec], 'data' => '']);
+        echo creer_colonne_droite();
+        echo pipeline('affiche_droite', ['args' => ['exec' => '403', 'exec_erreur' => $exec], 'data' => '']);
 
-		echo debut_droite();
-		echo pipeline(
-			'affiche_milieu',
-			['args' => ['exec' => '403', 'exec_erreur' => $exec], 'data' => $contenu]
-		);
+        echo debut_droite();
+        echo pipeline(
+            'affiche_milieu',
+            ['args' => ['exec' => '403', 'exec_erreur' => $exec], 'data' => $contenu]
+        );
 
-		echo fin_gauche(), fin_page();
-	}
+        echo fin_gauche(), fin_page();
+    }
 }

ecrire/inc/minipres.php

Indentation +127 added lines, -127 removed lines

@@ -16,7 +16,7 @@ 
  * @package SPIP\Core\Minipres
  **/
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 include_spip('inc/headers');
@@ -46,61 +46,61 @@ 
  */
 function install_debut_html($titre = 'AUTO', $onLoad = '', $all_inline = false) {
 
-	utiliser_langue_visiteur();
-
-	http_no_cache();
-
-	if ($titre == 'AUTO') {
-		$titre = _T('info_installation_systeme_publication');
-	}
-
-	# le charset est en utf-8, pour recuperer le nom comme il faut
-	# lors de l'installation
-	if (!headers_sent()) {
-		header('Content-Type: text/html; charset=utf-8');
-	}
-
-	$css = '';
-	$files = ['reset.css', 'clear.css', 'minipres.css'];
-	if ($all_inline) {
-		// inliner les CSS (optimisation de la page minipres qui passe en un seul hit a la demande)
-		foreach ($files as $name) {
-			$file = direction_css(find_in_theme($name));
-			if (function_exists('compacte')) {
-				$file = compacte($file);
-			} else {
-				$file = url_absolue_css($file); // precaution
-			}
-			lire_fichier($file, $c);
-			$css .= $c;
-		}
-		$css = "<style type='text/css'>" . $css . '</style>';
-	} else {
-		foreach ($files as $name) {
-			$file = direction_css(find_in_theme($name));
-			$css .= "<link rel='stylesheet' href='$file' type='text/css' />\n";
-		}
-	}
-
-	// au cas ou minipres() est appele avant spip_initialisation_suite()
-	if (!defined('_DOCTYPE_ECRIRE')) {
-		define('_DOCTYPE_ECRIRE', '');
-	}
-
-	return _DOCTYPE_ECRIRE .
-	html_lang_attributes() .
-	"<head>\n" .
-	'<title>' .
-	textebrut($titre) .
-	"</title>\n" .
-	"<meta name='viewport' content='width=device-width' />\n" .
-	$css .
-	'</head>
+    utiliser_langue_visiteur();
+
+    http_no_cache();
+
+    if ($titre == 'AUTO') {
+        $titre = _T('info_installation_systeme_publication');
+    }
+
+    # le charset est en utf-8, pour recuperer le nom comme il faut
+    # lors de l'installation
+    if (!headers_sent()) {
+        header('Content-Type: text/html; charset=utf-8');
+    }
+
+    $css = '';
+    $files = ['reset.css', 'clear.css', 'minipres.css'];
+    if ($all_inline) {
+        // inliner les CSS (optimisation de la page minipres qui passe en un seul hit a la demande)
+        foreach ($files as $name) {
+            $file = direction_css(find_in_theme($name));
+            if (function_exists('compacte')) {
+                $file = compacte($file);
+            } else {
+                $file = url_absolue_css($file); // precaution
+            }
+            lire_fichier($file, $c);
+            $css .= $c;
+        }
+        $css = "<style type='text/css'>" . $css . '</style>';
+    } else {
+        foreach ($files as $name) {
+            $file = direction_css(find_in_theme($name));
+            $css .= "<link rel='stylesheet' href='$file' type='text/css' />\n";
+        }
+    }
+
+    // au cas ou minipres() est appele avant spip_initialisation_suite()
+    if (!defined('_DOCTYPE_ECRIRE')) {
+        define('_DOCTYPE_ECRIRE', '');
+    }
+
+    return _DOCTYPE_ECRIRE .
+    html_lang_attributes() .
+    "<head>\n" .
+    '<title>' .
+    textebrut($titre) .
+    "</title>\n" .
+    "<meta name='viewport' content='width=device-width' />\n" .
+    $css .
+    '</head>
 <body' . $onLoad . " class='minipres'>
 	<div id='minipres'>
 	<h1>" .
-	$titre .
-	"</h1>
+    $titre .
+    "</h1>
 	<div>\n";
 }
 
@@ -110,7 +110,7 @@ 
  * @return string Code HTML
  */
 function install_fin_html() {
-	return "\n\t</div>\n\t</div>\n</body>\n</html>";
+    return "\n\t</div>\n\t</div>\n</body>\n</html>";
 }
 
 
@@ -148,77 +148,77 @@ 
  */
 function minipres($titre = '', $corps = '', $options = []) {
 
-	// compat signature old
-	// minipres($titre='', $corps="", $onload='', $all_inline = false)
-	$args = func_get_args();
-	if (isset($args[2]) and is_string($args[2])) {
-		$options = ['onload' => $args[2]];
-	}
-	if (isset($args[3])) {
-		$options['all_inline'] = $args[3];
-	}
-
-	$options = array_merge([
-		'onload' => '',
-		'all_inline' => false,
-	], $options);
-
-	if (!defined('_AJAX')) {
-		define('_AJAX', false);
-	} // par securite
-	if (!$titre) {
-		if (!isset($options['status'])) {
-			$options['status'] = 403;
-		}
-		if (
-			!$titre = _request('action')
-			and !$titre = _request('exec')
-			and !$titre = _request('page')
-		) {
-			$titre = '?';
-		}
-
-		$titre = spip_htmlspecialchars($titre);
-
-		$titre = ($titre == 'install')
-			? _T('avis_espace_interdit')
-			: $titre . '&nbsp;: ' . _T('info_acces_interdit');
-
-		$statut = $GLOBALS['visiteur_session']['statut'] ?? '';
-		$nom = $GLOBALS['visiteur_session']['nom'] ?? '';
-
-		if ($statut != '0minirezo') {
-			$titre = _T('info_acces_interdit');
-		}
-
-		if ($statut and test_espace_prive()) {
-			$corps = bouton_action(_T('public:accueil_site'), generer_url_ecrire('accueil'));
-		}
-		elseif (!empty($_COOKIE['spip_admin'])) {
-			$corps = bouton_action(_T('public:lien_connecter'), generer_url_public('login'));
-		}
-		else {
-			$corps = bouton_action(_T('public:accueil_site'), $GLOBALS['meta']['adresse_site']);
-		}
-		$corps = "<div class='boutons'>$corps</div>";
-		spip_log($nom . " $titre " . $_SERVER['REQUEST_URI']);
-	}
-
-	if (!_AJAX) {
-		if (isset($options['status'])) {
-			http_response_code($options['status']);
-		}
-
-		return install_debut_html($titre, $options['onload'], $options['all_inline'])
-		. $corps
-		. install_fin_html();
-	} else {
-		include_spip('inc/headers');
-		include_spip('inc/actions');
-		$url = self('&', true);
-		foreach ($_POST as $v => $c) {
-			$url = parametre_url($url, $v, $c, '&');
-		}
-		ajax_retour('<div>' . $titre . redirige_formulaire($url) . '</div>', false);
-	}
+    // compat signature old
+    // minipres($titre='', $corps="", $onload='', $all_inline = false)
+    $args = func_get_args();
+    if (isset($args[2]) and is_string($args[2])) {
+        $options = ['onload' => $args[2]];
+    }
+    if (isset($args[3])) {
+        $options['all_inline'] = $args[3];
+    }
+
+    $options = array_merge([
+        'onload' => '',
+        'all_inline' => false,
+    ], $options);
+
+    if (!defined('_AJAX')) {
+        define('_AJAX', false);
+    } // par securite
+    if (!$titre) {
+        if (!isset($options['status'])) {
+            $options['status'] = 403;
+        }
+        if (
+            !$titre = _request('action')
+            and !$titre = _request('exec')
+            and !$titre = _request('page')
+        ) {
+            $titre = '?';
+        }
+
+        $titre = spip_htmlspecialchars($titre);
+
+        $titre = ($titre == 'install')
+            ? _T('avis_espace_interdit')
+            : $titre . '&nbsp;: ' . _T('info_acces_interdit');
+
+        $statut = $GLOBALS['visiteur_session']['statut'] ?? '';
+        $nom = $GLOBALS['visiteur_session']['nom'] ?? '';
+
+        if ($statut != '0minirezo') {
+            $titre = _T('info_acces_interdit');
+        }
+
+        if ($statut and test_espace_prive()) {
+            $corps = bouton_action(_T('public:accueil_site'), generer_url_ecrire('accueil'));
+        }
+        elseif (!empty($_COOKIE['spip_admin'])) {
+            $corps = bouton_action(_T('public:lien_connecter'), generer_url_public('login'));
+        }
+        else {
+            $corps = bouton_action(_T('public:accueil_site'), $GLOBALS['meta']['adresse_site']);
+        }
+        $corps = "<div class='boutons'>$corps</div>";
+        spip_log($nom . " $titre " . $_SERVER['REQUEST_URI']);
+    }
+
+    if (!_AJAX) {
+        if (isset($options['status'])) {
+            http_response_code($options['status']);
+        }
+
+        return install_debut_html($titre, $options['onload'], $options['all_inline'])
+        . $corps
+        . install_fin_html();
+    } else {
+        include_spip('inc/headers');
+        include_spip('inc/actions');
+        $url = self('&', true);
+        foreach ($_POST as $v => $c) {
+            $url = parametre_url($url, $v, $c, '&');
+        }
+        ajax_retour('<div>' . $titre . redirige_formulaire($url) . '</div>', false);
+    }
 }

ecrire/inc/nfslock.php

Indentation +92 added lines, -92 removed lines

@@ -7,7 +7,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 include_spip('inc/acces');
@@ -101,93 +101,93 @@ 
  * @return int|bool Timestamp du verrou, false si erreur
  */
 function spip_nfslock($fichier, $max_age = 0) {
-	$tries = 0;
+    $tries = 0;
 
-	if (!$max_age) {
-		$max_age = _DEFAULT_LOCKTIME;
-	}
-	$lock_file = _DIR_TMP . _NAME_LOCK . '-' . substr(md5($fichier), 0, 8);
+    if (!$max_age) {
+        $max_age = _DEFAULT_LOCKTIME;
+    }
+    $lock_file = _DIR_TMP . _NAME_LOCK . '-' . substr(md5($fichier), 0, 8);
 
 
-	/*
+    /*
 	 * 1. create a tmp file with a psuedo random file name. we also make
 	 *    tpath which is a buffer to store the full pathname of the tmp file.
 	 */
 
-	$id = creer_uniqid();
-	$tpath = _DIR_TMP . "slock.$id";
-	$tmpfd = @fopen($tpath, 'w'); // hum, le 'x' necessite php4,3,2 ...
-	if (!$tmpfd) {  /* open failed */
-		@fclose($tmpfd);
-		spip_unlink($tpath);
+    $id = creer_uniqid();
+    $tpath = _DIR_TMP . "slock.$id";
+    $tmpfd = @fopen($tpath, 'w'); // hum, le 'x' necessite php4,3,2 ...
+    if (!$tmpfd) {  /* open failed */
+        @fclose($tmpfd);
+        spip_unlink($tpath);
 
-		return false; //NFSL_SYSF
-	}
+        return false; //NFSL_SYSF
+    }
 
-	/*
+    /*
 	 * 2. make fullpath, a buffer for the full pathname of the lock file.
 	 *    then start looping trying to lock it
 	 */
 
-	while ($tries < 10) {
-		/*
+    while ($tries < 10) {
+        /*
 		 * 3. link tmp file to lock file.  if it goes, we win and we clean
 		 *    up and return the st_ctime of the lock file.
 		 */
 
-		if (link($tpath, $lock_file) == 1) {
-			spip_unlink($tpath); /* got it! */
-			@fclose($tmpfd);
-			if (($our_tmp = lstat($lock_file)) == false) {  /* stat failed... shouldn't happen */
-				spip_unlink($lock_file);
+        if (link($tpath, $lock_file) == 1) {
+            spip_unlink($tpath); /* got it! */
+            @fclose($tmpfd);
+            if (($our_tmp = lstat($lock_file)) == false) {  /* stat failed... shouldn't happen */
+                spip_unlink($lock_file);
 
-				return false; // (NFSL_SYSF);
-			}
+                return false; // (NFSL_SYSF);
+            }
 
-			return ($our_tmp['ctime']);
-		}
+            return ($our_tmp['ctime']);
+        }
 
-		/*
+        /*
 		 * 4. the lock failed.  check for a stale lock file, being mindful
 		 *    of NFS and the fact the time is set from the NFS server.  we
 		 *    do a write on the tmp file to update its time to the server's
 		 *    idea of "now."
 		 */
 
-		$old_stat = lstat($lock_file);
-		if (@fputs($tmpfd, 'zz', 2) != 2 || !$our_tmp = fstat($tmpfd)) {
-			break;
-		} /* something bogus is going on */
+        $old_stat = lstat($lock_file);
+        if (@fputs($tmpfd, 'zz', 2) != 2 || !$our_tmp = fstat($tmpfd)) {
+            break;
+        } /* something bogus is going on */
 
 
-		if ($old_stat != false && (($old_stat['ctime'] + $max_age) < $our_tmp['ctime'])) {
-			spip_unlink($lock_file); /* break the stale lock */
-			$tries++;
-			/* It is CRITICAL that we sleep after breaking
+        if ($old_stat != false && (($old_stat['ctime'] + $max_age) < $our_tmp['ctime'])) {
+            spip_unlink($lock_file); /* break the stale lock */
+            $tries++;
+            /* It is CRITICAL that we sleep after breaking
 			 * the lock. Otherwise, we could race with
 			 * another process and unlink it's newly-
 			 * created file.
 			 */
-			sleep(1 + random_int(0, 4));
-			continue;
-		}
+            sleep(1 + random_int(0, 4));
+            continue;
+        }
 
-		/*
+        /*
 		 * 5. try again
 		 */
 
-		$tries++;
-		sleep(1 + random_int(0, 4));
-	}
+        $tries++;
+        sleep(1 + random_int(0, 4));
+    }
 
-	/*
+    /*
 	 * 6. give up, failure.
 	 */
 
-	spip_unlink($tpath);
-	@fclose($tmpfd);
+    spip_unlink($tpath);
+    @fclose($tmpfd);
 
-	return false; //(NFSL_LOCKED);
+    return false; //(NFSL_LOCKED);
 }
 
 /**
@@ -231,75 +231,75 @@ 
  * return bool true si déverrouillé, false sinon
  */
 function spip_nfsunlock($fichier, $birth, $max_age = 0, $test = false) {
-	$id = creer_uniqid();
-	if (!$max_age) {
-		$max_age = _DEFAULT_LOCKTIME;
-	}
+    $id = creer_uniqid();
+    if (!$max_age) {
+        $max_age = _DEFAULT_LOCKTIME;
+    }
 
-	/*
+    /*
 	 * 1. Build a temp file and stat that to get an idea of what the server
 	 *    thinks the current time is (our_tmp.st_ctime)..
 	 */
 
-	$tpath = _DIR_TMP . "stime.$id";
-	$tmpfd = @fopen($tpath, 'w');
-	if (
-		(!$tmpfd)
-		or (@fputs($tmpfd, 'zz', 2) != 2)
-		or !($our_tmp = fstat($tmpfd))
-	) {
-		/* The open failed, or we can't write the file, or we can't stat it */
-		@fclose($tmpfd);
-		spip_unlink($tpath);
+    $tpath = _DIR_TMP . "stime.$id";
+    $tmpfd = @fopen($tpath, 'w');
+    if (
+        (!$tmpfd)
+        or (@fputs($tmpfd, 'zz', 2) != 2)
+        or !($our_tmp = fstat($tmpfd))
+    ) {
+        /* The open failed, or we can't write the file, or we can't stat it */
+        @fclose($tmpfd);
+        spip_unlink($tpath);
 
-		return false; //(NFSL_SYSF);
-	}
+        return false; //(NFSL_SYSF);
+    }
 
-	@fclose($tmpfd);    /* We don't need this once we have our_tmp.st_ctime. */
-	spip_unlink($tpath);
+    @fclose($tmpfd);    /* We don't need this once we have our_tmp.st_ctime. */
+    spip_unlink($tpath);
 
-	/*
+    /*
 	 * 2. make fullpath, a buffer for the full pathname of the lock file
 	 */
 
-	$lock_file = _DIR_TMP . _NAME_LOCK . '-' . substr(md5($fichier), 0, 8);
+    $lock_file = _DIR_TMP . _NAME_LOCK . '-' . substr(md5($fichier), 0, 8);
 
-	/*
+    /*
 	 * 3. If the ctime hasn't been modified, unlink the file and return. If the
 	 *    lock has expired, sleep the usual random interval before returning.
 	 *    If we didn't sleep, there could be a race if the caller immediately
 	 *    tries to relock the file.
 	 */
 
-	if (
-		($old_stat = @lstat($lock_file))  /* stat succeeds so file is there */
-		&& ($old_stat['ctime'] == $birth)
-	) {  /* hasn't been modified since birth */
-		if (!$test) {
-			spip_unlink($lock_file);
-		}      /* so the lock is ours to remove */
-		if ($our_tmp['ctime'] >= $birth + $max_age) {  /* the lock has expired */
-			if (!$test) {
-				return false;
-			} //(NFSL_LOST);
-			sleep(1 + (random_int(0, 4)));    /* so sleep a bit */
-		}
-
-		return true;//(NFSL_OK);			/* success */
-	}
-
-	/*
+    if (
+        ($old_stat = @lstat($lock_file))  /* stat succeeds so file is there */
+        && ($old_stat['ctime'] == $birth)
+    ) {  /* hasn't been modified since birth */
+        if (!$test) {
+            spip_unlink($lock_file);
+        }      /* so the lock is ours to remove */
+        if ($our_tmp['ctime'] >= $birth + $max_age) {  /* the lock has expired */
+            if (!$test) {
+                return false;
+            } //(NFSL_LOST);
+            sleep(1 + (random_int(0, 4)));    /* so sleep a bit */
+        }
+
+        return true;//(NFSL_OK);			/* success */
+    }
+
+    /*
 	 * 4. Either ctime has been modified, or the entire lock file is missing.
 	 *    If the lock should still be ours, based on the ctime of the temp
 	 *    file, return with NFSL_STOLEN. If not, then our lock is expired and
 	 *    someone else has grabbed the file, so return NFSL_LOST.
 	 */
 
-	if ($our_tmp['ctime'] < $birth + $max_age) { /* lock was stolen */
-		return false;
-	} //(NFSL_STOLEN);
+    if ($our_tmp['ctime'] < $birth + $max_age) { /* lock was stolen */
+        return false;
+    } //(NFSL_STOLEN);
 
-	return false; //(NFSL_LOST);	/* The lock must have expired first. */
+    return false; //(NFSL_LOST);	/* The lock must have expired first. */
 }
 
 
@@ -323,5 +323,5 @@ 
  * return bool true si déverrouillé, false sinon
  */
 function spip_nfslock_test($fichier, $birth, $max_age = 0) {
-	return spip_nfsunlock($fichier, $birth, $max_age, true);
+    return spip_nfsunlock($fichier, $birth, $max_age, true);
 }

ecrire/inc/csv.php

Indentation +108 added lines, -108 removed lines

@@ -17,7 +17,7 @@ 
  */
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -33,118 +33,118 @@ 
  **/
 function analyse_csv($t) {
 
-	// Quel est le séparateur ?
-	$virg = substr_count($t, ',');
-	$pvirg = substr_count($t, ';');
-	$tab = substr_count($t, "\t");
-	if ($virg > $pvirg) {
-		$sep = ',';
-		$hs = ',';
-	} else {
-		$sep = ';';
-		$hs = '&#59;';
-		$virg = $pvirg;
-	}
-	// un certain nombre de tab => le séparateur est tab
-	if ($tab > $virg / 10) {
-		$sep = "\t";
-		$hs = "\t";
-	}
+    // Quel est le séparateur ?
+    $virg = substr_count($t, ',');
+    $pvirg = substr_count($t, ';');
+    $tab = substr_count($t, "\t");
+    if ($virg > $pvirg) {
+        $sep = ',';
+        $hs = ',';
+    } else {
+        $sep = ';';
+        $hs = '&#59;';
+        $virg = $pvirg;
+    }
+    // un certain nombre de tab => le séparateur est tab
+    if ($tab > $virg / 10) {
+        $sep = "\t";
+        $hs = "\t";
+    }
 
-	// un separateur suivi de 3 guillemets attention !
-	// attention au ; ou , suceptible d'etre confondu avec un separateur
-	// on substitue un # et on remplacera a la fin
-	$t = preg_replace("/([\n$sep])\"\"\"/", '\\1"&#34#', $t);
-	$t = str_replace('""', '&#34#', $t);
-	preg_match_all('/"[^"]*"/', $t, $r);
-	foreach ($r[0] as $cell) {
-		$t = str_replace(
-			$cell,
-			str_replace(
-				$sep,
-				$hs,
-				str_replace(
-					"\n",
-					'``**``', // échapper les saut de lignes, on les remettra après.
-					substr($cell, 1, -1)
-				)
-			),
-			$t
-		);
-	}
+    // un separateur suivi de 3 guillemets attention !
+    // attention au ; ou , suceptible d'etre confondu avec un separateur
+    // on substitue un # et on remplacera a la fin
+    $t = preg_replace("/([\n$sep])\"\"\"/", '\\1"&#34#', $t);
+    $t = str_replace('""', '&#34#', $t);
+    preg_match_all('/"[^"]*"/', $t, $r);
+    foreach ($r[0] as $cell) {
+        $t = str_replace(
+            $cell,
+            str_replace(
+                $sep,
+                $hs,
+                str_replace(
+                    "\n",
+                    '``**``', // échapper les saut de lignes, on les remettra après.
+                    substr($cell, 1, -1)
+                )
+            ),
+            $t
+        );
+    }
 
-	$t = preg_replace(
-		'/\r?\n/',
-		"\n",
-		preg_replace('/[\r\n]+/', "\n", $t)
-	);
+    $t = preg_replace(
+        '/\r?\n/',
+        "\n",
+        preg_replace('/[\r\n]+/', "\n", $t)
+    );
 
-	[$entete, $corps] = explode("\n", $t, 2);
-	$caption = '';
-	// sauter la ligne de tete formee seulement de separateurs
-	if (substr_count($entete, $sep) == strlen($entete)) {
-		[$entete, $corps] = explode("\n", $corps, 2);
-	}
-	// si une seule colonne, en faire le titre
-	if (preg_match("/^([^$sep]+)$sep+\$/", $entete, $l)) {
-		$caption = "\n||" . $l[1] . '|';
-		[$entete, $corps] = explode("\n", $corps, 2);
-	}
-	// si premiere colonne vide, le raccourci doit quand meme produire <th...
-	if ($entete[0] == $sep) {
-		$entete = ' ' . $entete;
-	}
+    [$entete, $corps] = explode("\n", $t, 2);
+    $caption = '';
+    // sauter la ligne de tete formee seulement de separateurs
+    if (substr_count($entete, $sep) == strlen($entete)) {
+        [$entete, $corps] = explode("\n", $corps, 2);
+    }
+    // si une seule colonne, en faire le titre
+    if (preg_match("/^([^$sep]+)$sep+\$/", $entete, $l)) {
+        $caption = "\n||" . $l[1] . '|';
+        [$entete, $corps] = explode("\n", $corps, 2);
+    }
+    // si premiere colonne vide, le raccourci doit quand meme produire <th...
+    if ($entete[0] == $sep) {
+        $entete = ' ' . $entete;
+    }
 
-	$lignes = explode("\n", $corps);
+    $lignes = explode("\n", $corps);
 
-	// retrait des lignes vides finales
-	while (
-		count($lignes) > 0
-		and preg_match("/^$sep*$/", $lignes[count($lignes) - 1])
-	) {
-		unset($lignes[count($lignes) - 1]);
-	}
-	//  calcul du  nombre de colonne a chaque ligne
-	$nbcols = [];
-	$max = $mil = substr_count($entete, $sep);
-	foreach ($lignes as $k => $v) {
-		if ($max <> ($nbcols[$k] = substr_count($v, $sep))) {
-			if ($max > $nbcols[$k]) {
-				$mil = $nbcols[$k];
-			} else {
-				$mil = $max;
-				$max = $nbcols[$k];
-			}
-		}
-	}
-	// Si pas le meme nombre, cadrer au nombre max
-	if ($mil <> $max) {
-		foreach ($nbcols as $k => $v) {
-			if ($v < $max) {
-				$lignes[$k] .= str_repeat($sep, $max - $v);
-			}
-		}
-	}
-	// et retirer les colonnes integralement vides
-	while (true) {
-		$nbcols = ($entete[strlen($entete) - 1] === $sep);
-		foreach ($lignes as $v) {
-			$nbcols &= ($v[strlen($v) - 1] === $sep);
-		}
-		if (!$nbcols) {
-			break;
-		}
-		$entete = substr($entete, 0, -1);
-		foreach ($lignes as $k => $v) {
-			$lignes[$k] = substr($v, 0, -1);
-		}
-	}
+    // retrait des lignes vides finales
+    while (
+        count($lignes) > 0
+        and preg_match("/^$sep*$/", $lignes[count($lignes) - 1])
+    ) {
+        unset($lignes[count($lignes) - 1]);
+    }
+    //  calcul du  nombre de colonne a chaque ligne
+    $nbcols = [];
+    $max = $mil = substr_count($entete, $sep);
+    foreach ($lignes as $k => $v) {
+        if ($max <> ($nbcols[$k] = substr_count($v, $sep))) {
+            if ($max > $nbcols[$k]) {
+                $mil = $nbcols[$k];
+            } else {
+                $mil = $max;
+                $max = $nbcols[$k];
+            }
+        }
+    }
+    // Si pas le meme nombre, cadrer au nombre max
+    if ($mil <> $max) {
+        foreach ($nbcols as $k => $v) {
+            if ($v < $max) {
+                $lignes[$k] .= str_repeat($sep, $max - $v);
+            }
+        }
+    }
+    // et retirer les colonnes integralement vides
+    while (true) {
+        $nbcols = ($entete[strlen($entete) - 1] === $sep);
+        foreach ($lignes as $v) {
+            $nbcols &= ($v[strlen($v) - 1] === $sep);
+        }
+        if (!$nbcols) {
+            break;
+        }
+        $entete = substr($entete, 0, -1);
+        foreach ($lignes as $k => $v) {
+            $lignes[$k] = substr($v, 0, -1);
+        }
+    }
 
-	foreach ($lignes as &$l) {
-		$l = str_replace('&#34#', '"', $l);
-		$l = str_replace('``**``', "\n", $l);
-		$l = explode($sep, $l);
-	}
+    foreach ($lignes as &$l) {
+        $l = str_replace('&#34#', '"', $l);
+        $l = str_replace('``**``', "\n", $l);
+        $l = explode($sep, $l);
+    }
 
-	return [explode($sep, $entete), $lignes, $caption];
+    return [explode($sep, $entete), $lignes, $caption];
 }