spip / SPIP

ecrire/inc/precharger_objet.php

Spacing +4 added lines, -4 removed lines

@@ -64,7 +64,7 @@ 
 	// si demande de traduction
 	// on recupere les valeurs de la traduction
 	if ($lier_trad) {
-		if ($select = charger_fonction("precharger_traduction_" . $type, 'inc', true)) {
+		if ($select = charger_fonction("precharger_traduction_".$type, 'inc', true)) {
 			$row = $select($id_objet, $id_rubrique, $lier_trad);
 		} else {
 			$row = precharger_traduction_objet($type, $id_objet, $id_rubrique, $lier_trad, $champ_titre);
@@ -102,7 +102,7 @@ 
 	// recuperer le secteur, pour affecter les bons champs extras
 	if ($id_rubrique and $is_secteur) {
 		if (!$row['id_secteur']) {
-			$row_rub = sql_getfetsel("id_secteur", "spip_rubriques", "id_rubrique=" . sql_quote($id_rubrique));
+			$row_rub = sql_getfetsel("id_secteur", "spip_rubriques", "id_rubrique=".sql_quote($id_rubrique));
 			$row['id_secteur'] = $row_rub;
 		}
 	}
@@ -136,7 +136,7 @@ 
 	$row = sql_fetsel("*", $table, "$_id_objet=".intval($lier_trad));
 	if ($row) {
 		include_spip('inc/filtres');
-		$row[$champ_titre] = filtrer_entites(objet_T($type, 'info_nouvelle_traduction')) . ' ' . $row[$champ_titre];
+		$row[$champ_titre] = filtrer_entites(objet_T($type, 'info_nouvelle_traduction')).' '.$row[$champ_titre];
 	} else {
 		$row = array();
 	}
@@ -177,7 +177,7 @@ 
 				}
 
 				$row_rub = sql_fetsel("id_rubrique", "spip_rubriques",
-					"lang='" . $GLOBALS['spip_lang'] . "' AND id_parent=".intval($id_parent));
+					"lang='".$GLOBALS['spip_lang']."' AND id_parent=".intval($id_parent));
 				if ($row_rub) {
 					$row['id_rubrique'] = $row_rub['id_rubrique'];
 				}

Indentation +136 added lines, -136 removed lines

@@ -17,7 +17,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 include_spip('inc/autoriser'); // necessaire si appel de l'espace public
@@ -45,69 +45,69 @@ 
  **/
 function precharger_objet($type, $id_objet, $id_rubrique = 0, $lier_trad = 0, $champ_titre = 'titre') {
 
-	$table = table_objet_sql($type);
-	$_id_objet = id_table_objet($table);
-
-	// si l'objet existe deja, on retourne simplement ses valeurs
-	if (is_numeric($id_objet)) {
-		return sql_fetsel("*", $table, "$_id_objet=".intval($id_objet));
-	}
-
-	// ici, on demande une creation.
-	// on prerempli certains elements : les champs si traduction,
-	// les id_rubrique et id_secteur si l'objet a ces champs
-	$desc = lister_tables_objets_sql($table);
-	# il faudrait calculer $champ_titre ici
-	$is_rubrique = isset($desc['field']['id_rubrique']);
-	$is_secteur = isset($desc['field']['id_secteur']);
-
-	// si demande de traduction
-	// on recupere les valeurs de la traduction
-	if ($lier_trad) {
-		if ($select = charger_fonction("precharger_traduction_" . $type, 'inc', true)) {
-			$row = $select($id_objet, $id_rubrique, $lier_trad);
-		} else {
-			$row = precharger_traduction_objet($type, $id_objet, $id_rubrique, $lier_trad, $champ_titre);
-		}
-	} else {
-		$row[$champ_titre] = '';
-		if ($is_rubrique) {
-			$row['id_rubrique'] = $id_rubrique;
-		}
-	}
-
-	// calcul de la rubrique
-	# note : comment faire pour des traductions sur l'objet rubriques ?
-	if ($is_rubrique) {
-		// appel du script a la racine, faut choisir 
-		// admin restreint ==> sa premiere rubrique
-		// autre ==> la derniere rubrique cree
-		if (!$row['id_rubrique']) {
-			if ($GLOBALS['connect_id_rubrique']) {
-				$row['id_rubrique'] = $id_rubrique = current($GLOBALS['connect_id_rubrique']);
-			} else {
-				$row_rub = sql_fetsel("id_rubrique", "spip_rubriques", "", "", "id_rubrique DESC", 1);
-				$row['id_rubrique'] = $id_rubrique = $row_rub['id_rubrique'];
-			}
-			if (!autoriser('creerarticledans', 'rubrique', $row['id_rubrique'])) {
-				// manque de chance, la rubrique n'est pas autorisee, on cherche un des secteurs autorises
-				$res = sql_select("id_rubrique", "spip_rubriques", "id_parent=0");
-				while (!autoriser('creerarticledans', 'rubrique', $row['id_rubrique']) && $row_rub = sql_fetch($res)) {
-					$row['id_rubrique'] = $row_rub['id_rubrique'];
-				}
-			}
-		}
-	}
-
-	// recuperer le secteur, pour affecter les bons champs extras
-	if ($id_rubrique and $is_secteur) {
-		if (!$row['id_secteur']) {
-			$row_rub = sql_getfetsel("id_secteur", "spip_rubriques", "id_rubrique=" . sql_quote($id_rubrique));
-			$row['id_secteur'] = $row_rub;
-		}
-	}
-
-	return $row;
+    $table = table_objet_sql($type);
+    $_id_objet = id_table_objet($table);
+
+    // si l'objet existe deja, on retourne simplement ses valeurs
+    if (is_numeric($id_objet)) {
+        return sql_fetsel("*", $table, "$_id_objet=".intval($id_objet));
+    }
+
+    // ici, on demande une creation.
+    // on prerempli certains elements : les champs si traduction,
+    // les id_rubrique et id_secteur si l'objet a ces champs
+    $desc = lister_tables_objets_sql($table);
+    # il faudrait calculer $champ_titre ici
+    $is_rubrique = isset($desc['field']['id_rubrique']);
+    $is_secteur = isset($desc['field']['id_secteur']);
+
+    // si demande de traduction
+    // on recupere les valeurs de la traduction
+    if ($lier_trad) {
+        if ($select = charger_fonction("precharger_traduction_" . $type, 'inc', true)) {
+            $row = $select($id_objet, $id_rubrique, $lier_trad);
+        } else {
+            $row = precharger_traduction_objet($type, $id_objet, $id_rubrique, $lier_trad, $champ_titre);
+        }
+    } else {
+        $row[$champ_titre] = '';
+        if ($is_rubrique) {
+            $row['id_rubrique'] = $id_rubrique;
+        }
+    }
+
+    // calcul de la rubrique
+    # note : comment faire pour des traductions sur l'objet rubriques ?
+    if ($is_rubrique) {
+        // appel du script a la racine, faut choisir 
+        // admin restreint ==> sa premiere rubrique
+        // autre ==> la derniere rubrique cree
+        if (!$row['id_rubrique']) {
+            if ($GLOBALS['connect_id_rubrique']) {
+                $row['id_rubrique'] = $id_rubrique = current($GLOBALS['connect_id_rubrique']);
+            } else {
+                $row_rub = sql_fetsel("id_rubrique", "spip_rubriques", "", "", "id_rubrique DESC", 1);
+                $row['id_rubrique'] = $id_rubrique = $row_rub['id_rubrique'];
+            }
+            if (!autoriser('creerarticledans', 'rubrique', $row['id_rubrique'])) {
+                // manque de chance, la rubrique n'est pas autorisee, on cherche un des secteurs autorises
+                $res = sql_select("id_rubrique", "spip_rubriques", "id_parent=0");
+                while (!autoriser('creerarticledans', 'rubrique', $row['id_rubrique']) && $row_rub = sql_fetch($res)) {
+                    $row['id_rubrique'] = $row_rub['id_rubrique'];
+                }
+            }
+        }
+    }
+
+    // recuperer le secteur, pour affecter les bons champs extras
+    if ($id_rubrique and $is_secteur) {
+        if (!$row['id_secteur']) {
+            $row_rub = sql_getfetsel("id_secteur", "spip_rubriques", "id_rubrique=" . sql_quote($id_rubrique));
+            $row['id_secteur'] = $row_rub;
+        }
+    }
+
+    return $row;
 }
 
 
@@ -129,76 +129,76 @@ 
  *     Couples clés / valeurs des champs du formulaire à charger
  **/
 function precharger_traduction_objet($type, $id_objet, $id_rubrique = 0, $lier_trad = 0, $champ_titre = 'titre') {
-	$table = table_objet_sql($type);
-	$_id_objet = id_table_objet($table);
-
-	// Recuperer les donnees de l'objet original
-	$row = sql_fetsel("*", $table, "$_id_objet=".intval($lier_trad));
-	if ($row) {
-		include_spip('inc/filtres');
-		$row[$champ_titre] = filtrer_entites(objet_T($type, 'info_nouvelle_traduction')) . ' ' . $row[$champ_titre];
-	} else {
-		$row = array();
-	}
-
-	// on met l'objet dans une rubrique si l'objet le peut
-	$desc = lister_tables_objets_sql($table);
-	$is_rubrique = isset($desc['field']['id_rubrique']);
-
-	if ($is_rubrique) {
-		$langues_dispo = explode(',', $GLOBALS['meta']['langues_multilingue']);
-		// si le redacteur utilise une autre langue que celle de la source, on suppose que c'est pour traduire dans sa langue
-		if (in_array($GLOBALS['spip_lang'], $langues_dispo) and $GLOBALS['spip_lang'] !== $row['lang']) {
-			$row['lang'] = $GLOBALS['spip_lang'];
-		}
-		// sinon si il y a seulement 2 langues dispos, on bascule sur l'"autre"
-		elseif (count($langues_dispo) == 2) {
-			$autre_langue = array_diff($langues_dispo, [$row['lang']]);
-			if (count($autre_langue) == 1) {
-				$row['lang'] = reset($autre_langue);
-			}
-		}
-		else {
-			$row['lang'] = 'en';
-		}
-
-		if ($id_rubrique) {
-			$row['id_rubrique'] = $id_rubrique;
-
-			return $row;
-		}
-		$id_rubrique = $row['id_rubrique'];
-
-
-		// Regler la langue, si possible, sur celle du redacteur
-		// Cela implique souvent de choisir une rubrique ou un secteur
-		if (in_array($GLOBALS['spip_lang'], $langues_dispo)) {
-
-			// Si le menu de langues est autorise sur l'objet,
-			// on peut changer la langue quelle que soit la rubrique
-			// donc on reste dans la meme rubrique
-			if (in_array($table, explode(',', $GLOBALS['meta']['multi_objets']))) {
-				$row['id_rubrique'] = $row['id_rubrique']; # explicite :-)
-
-				// Sinon, chercher la rubrique la plus adaptee pour
-				// accueillir l'objet dans la langue du traducteur
-			} elseif ($is_rubrique and $GLOBALS['meta']['multi_rubriques'] == 'oui') {
-				if ($GLOBALS['meta']['multi_secteurs'] == 'oui') {
-					$id_parent = 0;
-				} else {
-					// on cherche une rubrique soeur dans la bonne langue
-					$row_rub = sql_fetsel("id_parent", "spip_rubriques", "id_rubrique=".intval($id_rubrique));
-					$id_parent = $row_rub['id_parent'];
-				}
-
-				$row_rub = sql_fetsel("id_rubrique", "spip_rubriques",
-					"lang='" . $GLOBALS['spip_lang'] . "' AND id_parent=".intval($id_parent));
-				if ($row_rub) {
-					$row['id_rubrique'] = $row_rub['id_rubrique'];
-				}
-			}
-		}
-	}
-
-	return $row;
+    $table = table_objet_sql($type);
+    $_id_objet = id_table_objet($table);
+
+    // Recuperer les donnees de l'objet original
+    $row = sql_fetsel("*", $table, "$_id_objet=".intval($lier_trad));
+    if ($row) {
+        include_spip('inc/filtres');
+        $row[$champ_titre] = filtrer_entites(objet_T($type, 'info_nouvelle_traduction')) . ' ' . $row[$champ_titre];
+    } else {
+        $row = array();
+    }
+
+    // on met l'objet dans une rubrique si l'objet le peut
+    $desc = lister_tables_objets_sql($table);
+    $is_rubrique = isset($desc['field']['id_rubrique']);
+
+    if ($is_rubrique) {
+        $langues_dispo = explode(',', $GLOBALS['meta']['langues_multilingue']);
+        // si le redacteur utilise une autre langue que celle de la source, on suppose que c'est pour traduire dans sa langue
+        if (in_array($GLOBALS['spip_lang'], $langues_dispo) and $GLOBALS['spip_lang'] !== $row['lang']) {
+            $row['lang'] = $GLOBALS['spip_lang'];
+        }
+        // sinon si il y a seulement 2 langues dispos, on bascule sur l'"autre"
+        elseif (count($langues_dispo) == 2) {
+            $autre_langue = array_diff($langues_dispo, [$row['lang']]);
+            if (count($autre_langue) == 1) {
+                $row['lang'] = reset($autre_langue);
+            }
+        }
+        else {
+            $row['lang'] = 'en';
+        }
+
+        if ($id_rubrique) {
+            $row['id_rubrique'] = $id_rubrique;
+
+            return $row;
+        }
+        $id_rubrique = $row['id_rubrique'];
+
+
+        // Regler la langue, si possible, sur celle du redacteur
+        // Cela implique souvent de choisir une rubrique ou un secteur
+        if (in_array($GLOBALS['spip_lang'], $langues_dispo)) {
+
+            // Si le menu de langues est autorise sur l'objet,
+            // on peut changer la langue quelle que soit la rubrique
+            // donc on reste dans la meme rubrique
+            if (in_array($table, explode(',', $GLOBALS['meta']['multi_objets']))) {
+                $row['id_rubrique'] = $row['id_rubrique']; # explicite :-)
+
+                // Sinon, chercher la rubrique la plus adaptee pour
+                // accueillir l'objet dans la langue du traducteur
+            } elseif ($is_rubrique and $GLOBALS['meta']['multi_rubriques'] == 'oui') {
+                if ($GLOBALS['meta']['multi_secteurs'] == 'oui') {
+                    $id_parent = 0;
+                } else {
+                    // on cherche une rubrique soeur dans la bonne langue
+                    $row_rub = sql_fetsel("id_parent", "spip_rubriques", "id_rubrique=".intval($id_rubrique));
+                    $id_parent = $row_rub['id_parent'];
+                }
+
+                $row_rub = sql_fetsel("id_rubrique", "spip_rubriques",
+                    "lang='" . $GLOBALS['spip_lang'] . "' AND id_parent=".intval($id_parent));
+                if ($row_rub) {
+                    $row['id_rubrique'] = $row_rub['id_rubrique'];
+                }
+            }
+        }
+    }
+
+    return $row;
 }

Braces +1 added lines, -2 removed lines

@@ -157,8 +157,7 @@
 			if (count($autre_langue) == 1) {
 				$row['lang'] = reset($autre_langue);
 			}
-		}
-		else {
+		} else {
 			$row['lang'] = 'en';
 		}
 

ecrire/inc/prepare_recherche.php

Indentation +124 added lines, -124 removed lines

@@ -17,12 +17,12 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 include_spip('inc/rechercher');
 if (!defined('_DELAI_CACHE_resultats')) {
-	define('_DELAI_CACHE_resultats', 600);
+    define('_DELAI_CACHE_resultats', 600);
 }
 
 /**
@@ -49,111 +49,111 @@ 
  * @return array
  */
 function inc_prepare_recherche_dist(
-	$recherche,
-	$table = 'articles',
-	$cond = false,
-	$serveur = '',
-	$modificateurs = array(),
-	$primary = ''
+    $recherche,
+    $table = 'articles',
+    $cond = false,
+    $serveur = '',
+    $modificateurs = array(),
+    $primary = ''
 ) {
-	static $cache = array();
-	$delai_fraicheur = min(_DELAI_CACHE_resultats,
-		time() - (isset($GLOBALS['meta']['derniere_modif']) ? $GLOBALS['meta']['derniere_modif'] : 0));
-
-	// si recherche n'est pas dans le contexte, on va prendre en globals
-	// ca permet de faire des inclure simple.
-	if (!isset($recherche) and isset($GLOBALS['recherche'])) {
-		$recherche = $GLOBALS['recherche'];
-	}
-
-	// traiter le cas {recherche?}
-	if ($cond and !strlen($recherche)) {
-		return array(
-			"0 as points" /* as points */, /* where */
-			''
-		);
-	}
-
-
-	$rechercher = false;
-
-	$where_resultat_recent = sql_date_proche('maj', (0 - ($delai_fraicheur + 100)), " SECOND");
-	if (!isset($cache[$serveur][$table][$recherche])) {
-		$hash_serv = ($serveur ? substr(md5($serveur), 0, 16) : '');
-		$hash = substr(md5($recherche . $table), 0, 16);
-		$where = "(resultats.recherche='$hash' AND resultats.table_objet=" . sql_quote($table) . " AND resultats.serveur='$hash_serv')";
-		$row = sql_fetsel('recherche', 'spip_resultats AS resultats',
-			$where . " AND $where_resultat_recent", '', '', '0,1');
-		if (!$row
-			or (defined('_VAR_MODE') and _VAR_MODE == 'recalcul')
-		) {
-			$rechercher = true;
-		}
-	}
-
-	// si on n'a pas encore traite les donnees dans une boucle precedente
-	if ($rechercher) {
-		//$tables = liste_des_champs();
-		$x = objet_type($table);
-		$points = recherche_en_base($recherche,
-			$x,
-			array(
-				'score' => true,
-				'toutvoir' => true,
-				'jointures' => true
-			),
-			$serveur);
-		// pas de résultat, pas de point
-		$points = isset($points[$x]) ? $points[$x] : array();
-
-		// permettre aux plugins de modifier le resultat
-		$points = pipeline('prepare_recherche', array(
-			'args' => array(
-				'type' => $x,
-				'recherche' => $recherche,
-				'serveur' => $serveur,
-				'modificateurs' => $modificateurs
-			),
-			'data' => $points
-		));
-
-		// supprimer les anciens resultats de cette recherche
-		// et les resultats trop vieux avec une marge
-		// pas de AS resultats dans un delete (mysql)
-		$whered = str_replace(array("resultats.recherche", "resultats.table_objet", "resultats.serveur"),
-			array("recherche", "table_objet", "serveur"), $where);
-
-		sql_delete('spip_resultats',
-			"NOT($where_resultat_recent) OR ($whered)");
-
-		// inserer les resultats dans la table de cache des resultats
-		if (count($points)) {
-			$tab_couples = array();
-			foreach ($points as $id => $p) {
-				$tab_couples[] = array(
-					'recherche' => $hash,
-					'id' => $id,
-					'points' => $p['score'],
-					'table_objet' => $table,
-					'serveur' => $hash_serv,
-				);
-			}
-			sql_insertq_multi('spip_resultats', $tab_couples, array());
-		}
-	}
-
-	if (!isset($cache[$serveur][$table][$recherche])) {
-		if (!$serveur) {
-			$cache[$serveur][$table][$recherche] = array("resultats.points AS points", $where);
-		} else {
-			if (sql_countsel('spip_resultats as resultats', $where)) {
-				$rows = sql_allfetsel('resultats.id,resultats.points', 'spip_resultats as resultats', $where);
-			}
-			$cache[$serveur][$table][$recherche] = generer_select_where_explicites($table, $primary, $rows, $serveur);
-		}
-	}
-
-	return $cache[$serveur][$table][$recherche];
+    static $cache = array();
+    $delai_fraicheur = min(_DELAI_CACHE_resultats,
+        time() - (isset($GLOBALS['meta']['derniere_modif']) ? $GLOBALS['meta']['derniere_modif'] : 0));
+
+    // si recherche n'est pas dans le contexte, on va prendre en globals
+    // ca permet de faire des inclure simple.
+    if (!isset($recherche) and isset($GLOBALS['recherche'])) {
+        $recherche = $GLOBALS['recherche'];
+    }
+
+    // traiter le cas {recherche?}
+    if ($cond and !strlen($recherche)) {
+        return array(
+            "0 as points" /* as points */, /* where */
+            ''
+        );
+    }
+
+
+    $rechercher = false;
+
+    $where_resultat_recent = sql_date_proche('maj', (0 - ($delai_fraicheur + 100)), " SECOND");
+    if (!isset($cache[$serveur][$table][$recherche])) {
+        $hash_serv = ($serveur ? substr(md5($serveur), 0, 16) : '');
+        $hash = substr(md5($recherche . $table), 0, 16);
+        $where = "(resultats.recherche='$hash' AND resultats.table_objet=" . sql_quote($table) . " AND resultats.serveur='$hash_serv')";
+        $row = sql_fetsel('recherche', 'spip_resultats AS resultats',
+            $where . " AND $where_resultat_recent", '', '', '0,1');
+        if (!$row
+            or (defined('_VAR_MODE') and _VAR_MODE == 'recalcul')
+        ) {
+            $rechercher = true;
+        }
+    }
+
+    // si on n'a pas encore traite les donnees dans une boucle precedente
+    if ($rechercher) {
+        //$tables = liste_des_champs();
+        $x = objet_type($table);
+        $points = recherche_en_base($recherche,
+            $x,
+            array(
+                'score' => true,
+                'toutvoir' => true,
+                'jointures' => true
+            ),
+            $serveur);
+        // pas de résultat, pas de point
+        $points = isset($points[$x]) ? $points[$x] : array();
+
+        // permettre aux plugins de modifier le resultat
+        $points = pipeline('prepare_recherche', array(
+            'args' => array(
+                'type' => $x,
+                'recherche' => $recherche,
+                'serveur' => $serveur,
+                'modificateurs' => $modificateurs
+            ),
+            'data' => $points
+        ));
+
+        // supprimer les anciens resultats de cette recherche
+        // et les resultats trop vieux avec une marge
+        // pas de AS resultats dans un delete (mysql)
+        $whered = str_replace(array("resultats.recherche", "resultats.table_objet", "resultats.serveur"),
+            array("recherche", "table_objet", "serveur"), $where);
+
+        sql_delete('spip_resultats',
+            "NOT($where_resultat_recent) OR ($whered)");
+
+        // inserer les resultats dans la table de cache des resultats
+        if (count($points)) {
+            $tab_couples = array();
+            foreach ($points as $id => $p) {
+                $tab_couples[] = array(
+                    'recherche' => $hash,
+                    'id' => $id,
+                    'points' => $p['score'],
+                    'table_objet' => $table,
+                    'serveur' => $hash_serv,
+                );
+            }
+            sql_insertq_multi('spip_resultats', $tab_couples, array());
+        }
+    }
+
+    if (!isset($cache[$serveur][$table][$recherche])) {
+        if (!$serveur) {
+            $cache[$serveur][$table][$recherche] = array("resultats.points AS points", $where);
+        } else {
+            if (sql_countsel('spip_resultats as resultats', $where)) {
+                $rows = sql_allfetsel('resultats.id,resultats.points', 'spip_resultats as resultats', $where);
+            }
+            $cache[$serveur][$table][$recherche] = generer_select_where_explicites($table, $primary, $rows, $serveur);
+        }
+    }
+
+    return $cache[$serveur][$table][$recherche];
 }
 
 
@@ -169,22 +169,22 @@ 
  * @return array
  */
 function generer_select_where_explicites($table, $primary, $rows, $serveur) {
-	# calculer le {id_article IN()} et le {... as points}
-	if (!count($rows)) {
-		return array("''", "0=1");
-	} else {
-		$listes_ids = array();
-		$select = '0';
-		foreach ($rows as $r) {
-			$listes_ids[$r['points']][] = $r['id'];
-		}
-
-		foreach ($listes_ids as $p => $ids) {
-			$select .= "+$p*(" .
-				sql_in("$table.$primary", $ids, '', $serveur)
-				. ") ";
-		}
-
-		return array("$select AS points ", sql_in("$table.$primary", array_map('reset', $rows), '', $serveur));
-	}
+    # calculer le {id_article IN()} et le {... as points}
+    if (!count($rows)) {
+        return array("''", "0=1");
+    } else {
+        $listes_ids = array();
+        $select = '0';
+        foreach ($rows as $r) {
+            $listes_ids[$r['points']][] = $r['id'];
+        }
+
+        foreach ($listes_ids as $p => $ids) {
+            $select .= "+$p*(" .
+                sql_in("$table.$primary", $ids, '', $serveur)
+                . ") ";
+        }
+
+        return array("$select AS points ", sql_in("$table.$primary", array_map('reset', $rows), '', $serveur));
+    }
 }

Spacing +4 added lines, -4 removed lines

@@ -80,10 +80,10 @@ 
 	$where_resultat_recent = sql_date_proche('maj', (0 - ($delai_fraicheur + 100)), " SECOND");
 	if (!isset($cache[$serveur][$table][$recherche])) {
 		$hash_serv = ($serveur ? substr(md5($serveur), 0, 16) : '');
-		$hash = substr(md5($recherche . $table), 0, 16);
-		$where = "(resultats.recherche='$hash' AND resultats.table_objet=" . sql_quote($table) . " AND resultats.serveur='$hash_serv')";
+		$hash = substr(md5($recherche.$table), 0, 16);
+		$where = "(resultats.recherche='$hash' AND resultats.table_objet=".sql_quote($table)." AND resultats.serveur='$hash_serv')";
 		$row = sql_fetsel('recherche', 'spip_resultats AS resultats',
-			$where . " AND $where_resultat_recent", '', '', '0,1');
+			$where." AND $where_resultat_recent", '', '', '0,1');
 		if (!$row
 			or (defined('_VAR_MODE') and _VAR_MODE == 'recalcul')
 		) {
@@ -180,7 +180,7 @@ 
 		}
 
 		foreach ($listes_ids as $p => $ids) {
-			$select .= "+$p*(" .
+			$select .= "+$p*(".
 				sql_in("$table.$primary", $ids, '', $serveur)
 				. ") ";
 		}

ecrire/inc/flock.php

Spacing +23 added lines, -23 removed lines

@@ -122,7 +122,7 @@ 
 		$contenu = @gzfile($fichier);
 	}
 
-	return is_array($contenu) ? join('', $contenu) : (string)$contenu;
+	return is_array($contenu) ? join('', $contenu) : (string) $contenu;
 }
 
 
@@ -315,9 +315,9 @@ 
  */
 function ecrire_fichier_securise($fichier, $contenu, $ecrire_quand_meme = false, $truncate = true) {
 	if (substr($fichier, -4) !== '.php') {
-		spip_log('Erreur de programmation: ' . $fichier . ' doit finir par .php');
+		spip_log('Erreur de programmation: '.$fichier.' doit finir par .php');
 	}
-	$contenu = "<" . "?php die ('Acces interdit'); ?" . ">\n" . $contenu;
+	$contenu = "<"."?php die ('Acces interdit'); ?".">\n".$contenu;
 
 	return ecrire_fichier($fichier, $contenu, $ecrire_quand_meme, $truncate);
 }
@@ -329,9 +329,9 @@ 
  * @param bool $force
  * @return bool
  */
-function ecrire_fichier_calcule_si_modifie($fichier, $contenu, $force=false, $use_copy=false) {
-	$fichier_tmp = $fichier . '.last';
-	if (!ecrire_fichier($fichier_tmp, $contenu, true)){
+function ecrire_fichier_calcule_si_modifie($fichier, $contenu, $force = false, $use_copy = false) {
+	$fichier_tmp = $fichier.'.last';
+	if (!ecrire_fichier($fichier_tmp, $contenu, true)) {
 		return false;
 	}
 	if ($force
@@ -368,7 +368,7 @@ 
  */
 function lire_fichier_securise($fichier, &$contenu, $options = array()) {
 	if ($res = lire_fichier($fichier, $contenu, $options)) {
-		$contenu = substr($contenu, strlen("<" . "?php die ('Acces interdit'); ?" . ">\n"));
+		$contenu = substr($contenu, strlen("<"."?php die ('Acces interdit'); ?".">\n"));
 	}
 
 	return $res;
@@ -488,11 +488,11 @@ 
 		$invalidate = @opcache_invalidate($filepath, true);
 		// si l'invalidation a echoue lever un flag
 		if (!$invalidate and !defined('_spip_attend_invalidation_opcode_cache')) {
-			define('_spip_attend_invalidation_opcode_cache',true);
+			define('_spip_attend_invalidation_opcode_cache', true);
 		}
 	} elseif (!defined('_spip_attend_invalidation_opcode_cache')) {
 		// n'agira que si opcache est effectivement actif (il semble qu'on a pas toujours la fonction opcache_invalidate)
-		define('_spip_attend_invalidation_opcode_cache',true);
+		define('_spip_attend_invalidation_opcode_cache', true);
 	}
 	// APC.
 	if (function_exists('apc_delete_file')) {
@@ -532,11 +532,11 @@ 
 		$wait = $duree + 1;
 		if ($timestamp) {
 			$wait -= (time() - $timestamp);
-			if ($wait<0) {
+			if ($wait < 0) {
 				$wait = 0;
 			}
 		}
-		spip_log('Probleme de configuration opcache.revalidate_freq '. $duree .'s : on attend '.$wait.'s', _LOG_INFO_IMPORTANTE);
+		spip_log('Probleme de configuration opcache.revalidate_freq '.$duree.'s : on attend '.$wait.'s', _LOG_INFO_IMPORTANTE);
 		if ($wait) {
 			sleep($duree + 1);
 		}
@@ -564,9 +564,9 @@ 
 		if ($item == '.' || $item == '..') {
 			continue;
 		}
-		if (!supprimer_repertoire($dir . "/" . $item)) {
-			@chmod($dir . "/" . $item, 0777);
-			if (!supprimer_repertoire($dir . "/" . $item)) {
+		if (!supprimer_repertoire($dir."/".$item)) {
+			@chmod($dir."/".$item, 0777);
+			if (!supprimer_repertoire($dir."/".$item)) {
 				return false;
 			}
 		};
@@ -611,7 +611,7 @@ 
 	if (!strlen($subdir)) {
 		$n = strrpos($base, "/");
 		if ($n === false) {
-			return $nobase ? '' : ($base . '/');
+			return $nobase ? '' : ($base.'/');
 		}
 		$subdir = substr($base, $n + 1);
 		$base = substr($base, 0, $n + 1);
@@ -621,14 +621,14 @@ 
 	}
 
 	$baseaff = $nobase ? '' : $base;
-	if (isset($dirs[$base . $subdir])) {
-		return $baseaff . $dirs[$base . $subdir];
+	if (isset($dirs[$base.$subdir])) {
+		return $baseaff.$dirs[$base.$subdir];
 	}
 
-	$path = $base . $subdir; # $path = 'IMG/distant/pdf' ou 'IMG/distant_pdf'
+	$path = $base.$subdir; # $path = 'IMG/distant/pdf' ou 'IMG/distant_pdf'
 
 	if (file_exists("$path/.ok")) {
-		return $baseaff . ($dirs[$base . $subdir] = "$subdir/");
+		return $baseaff.($dirs[$base.$subdir] = "$subdir/");
 	}
 
 	@mkdir($path, _SPIP_CHMOD);
@@ -638,7 +638,7 @@ 
 		@touch("$path/.ok");
 		spip_log("creation $base$subdir/");
 
-		return $baseaff . ($dirs[$base . $subdir] = "$subdir/");
+		return $baseaff.($dirs[$base.$subdir] = "$subdir/");
 	}
 
 	// en cas d'echec c'est peut etre tout simplement que le disque est plein :
@@ -648,10 +648,10 @@ 
 		return '';
 	}
 	if (!_DIR_RESTREINT) {
-		$base = preg_replace(',^' . _DIR_RACINE . ',', '', $base);
+		$base = preg_replace(',^'._DIR_RACINE.',', '', $base);
 	}
 	$base .= $subdir;
-	raler_fichier($base . '/.ok');
+	raler_fichier($base.'/.ok');
 }
 
 
@@ -719,7 +719,7 @@ 
 							$beginning = $fichiers;
 							$end = preg_files("$f/", $pattern,
 								$maxfiles - $nbfiles, $recurs);
-							$fichiers = array_merge((array)$beginning, (array)$end);
+							$fichiers = array_merge((array) $beginning, (array) $end);
 							$nbfiles = count($fichiers);
 						}
 					}

Braces +1 added lines, -2 removed lines

@@ -339,8 +339,7 @@
 		or md5_file($fichier) != md5_file($fichier_tmp)) {
 		if ($use_copy) {
 			@copy($fichier_tmp, $fichier);
-		}
-		else {
+		} else {
 			@rename($fichier_tmp, $fichier);
 		}
 		// eviter que PHP ne reserve le vieux timestamp

Indentation +394 added lines, -394 removed lines

@@ -17,12 +17,12 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 if (!defined('_TEST_FILE_EXISTS')) {
-	/** Permettre d'éviter des tests file_exists sur certains hébergeurs */
-	define('_TEST_FILE_EXISTS', preg_match(',(online|free)[.]fr$,', isset($_ENV["HTTP_HOST"]) ? $_ENV["HTTP_HOST"] : ""));
+    /** Permettre d'éviter des tests file_exists sur certains hébergeurs */
+    define('_TEST_FILE_EXISTS', preg_match(',(online|free)[.]fr$,', isset($_ENV["HTTP_HOST"]) ? $_ENV["HTTP_HOST"] : ""));
 }
 
 #define('_SPIP_LOCK_MODE',0); // ne pas utiliser de lock (deconseille)
@@ -30,7 +30,7 @@ 
 #define('_SPIP_LOCK_MODE',2); // utiliser le nfslock de spip
 
 if (_SPIP_LOCK_MODE == 2) {
-	include_spip('inc/nfslock');
+    include_spip('inc/nfslock');
 }
 
 $GLOBALS['liste_verrous'] = array();
@@ -53,24 +53,24 @@ 
  *     Ressource sur le fichier ouvert, sinon false.
  **/
 function spip_fopen_lock($fichier, $mode, $verrou) {
-	if (_SPIP_LOCK_MODE == 1) {
-		if ($fl = @fopen($fichier, $mode)) {
-			// verrou
-			@flock($fl, $verrou);
-		}
-
-		return $fl;
-	} elseif (_SPIP_LOCK_MODE == 2) {
-		if (($verrou = spip_nfslock($fichier)) && ($fl = @fopen($fichier, $mode))) {
-			$GLOBALS['liste_verrous'][$fl] = array($fichier, $verrou);
-
-			return $fl;
-		} else {
-			return false;
-		}
-	}
-
-	return @fopen($fichier, $mode);
+    if (_SPIP_LOCK_MODE == 1) {
+        if ($fl = @fopen($fichier, $mode)) {
+            // verrou
+            @flock($fl, $verrou);
+        }
+
+        return $fl;
+    } elseif (_SPIP_LOCK_MODE == 2) {
+        if (($verrou = spip_nfslock($fichier)) && ($fl = @fopen($fichier, $mode))) {
+            $GLOBALS['liste_verrous'][$fl] = array($fichier, $verrou);
+
+            return $fl;
+        } else {
+            return false;
+        }
+    }
+
+    return @fopen($fichier, $mode);
 }
 
 /**
@@ -85,14 +85,14 @@ 
  *     true si succès, false sinon.
  **/
 function spip_fclose_unlock($handle) {
-	if (_SPIP_LOCK_MODE == 1) {
-		@flock($handle, LOCK_UN);
-	} elseif (_SPIP_LOCK_MODE == 2) {
-		spip_nfsunlock(reset($GLOBALS['liste_verrous'][$handle]), end($GLOBALS['liste_verrous'][$handle]));
-		unset($GLOBALS['liste_verrous'][$handle]);
-	}
-
-	return @fclose($handle);
+    if (_SPIP_LOCK_MODE == 1) {
+        @flock($handle, LOCK_UN);
+    } elseif (_SPIP_LOCK_MODE == 2) {
+        spip_nfsunlock(reset($GLOBALS['liste_verrous'][$handle]), end($GLOBALS['liste_verrous'][$handle]));
+        unset($GLOBALS['liste_verrous'][$handle]);
+    }
+
+    return @fclose($handle);
 }
 
 
@@ -106,23 +106,23 @@ 
  *     Contenu du fichier
  **/
 function spip_file_get_contents($fichier) {
-	if (substr($fichier, -3) != '.gz') {
-		if (function_exists('file_get_contents')) {
-			// quand on est sous windows on ne sait pas si file_get_contents marche
-			// on essaye : si ca retourne du contenu alors c'est bon
-			// sinon on fait un file() pour avoir le coeur net
-			$contenu = @file_get_contents($fichier);
-			if (!$contenu and _OS_SERVEUR == 'windows') {
-				$contenu = @file($fichier);
-			}
-		} else {
-			$contenu = @file($fichier);
-		}
-	} else {
-		$contenu = @gzfile($fichier);
-	}
-
-	return is_array($contenu) ? join('', $contenu) : (string)$contenu;
+    if (substr($fichier, -3) != '.gz') {
+        if (function_exists('file_get_contents')) {
+            // quand on est sous windows on ne sait pas si file_get_contents marche
+            // on essaye : si ca retourne du contenu alors c'est bon
+            // sinon on fait un file() pour avoir le coeur net
+            $contenu = @file_get_contents($fichier);
+            if (!$contenu and _OS_SERVEUR == 'windows') {
+                $contenu = @file($fichier);
+            }
+        } else {
+            $contenu = @file($fichier);
+        }
+    } else {
+        $contenu = @gzfile($fichier);
+    }
+
+    return is_array($contenu) ? join('', $contenu) : (string)$contenu;
 }
 
 
@@ -147,48 +147,48 @@ 
  *     true si l'opération a réussie, false sinon.
  **/
 function lire_fichier($fichier, &$contenu, $options = array()) {
-	$contenu = '';
-	// inutile car si le fichier n'existe pas, le lock va renvoyer false juste apres
-	// economisons donc les acces disque, sauf chez free qui rale pour un rien
-	if (_TEST_FILE_EXISTS and !@file_exists($fichier)) {
-		return false;
-	}
-
-	#spip_timer('lire_fichier');
-
-	// pas de @ sur spip_fopen_lock qui est silencieux de toute facon
-	if ($fl = spip_fopen_lock($fichier, 'r', LOCK_SH)) {
-		// lire le fichier avant tout
-		$contenu = spip_file_get_contents($fichier);
-
-		// le fichier a-t-il ete supprime par le locker ?
-		// on ne verifie que si la tentative de lecture a echoue
-		// pour discriminer un contenu vide d'un fichier absent
-		// et eviter un acces disque
-		if (!$contenu and !@file_exists($fichier)) {
-			spip_fclose_unlock($fl);
-
-			return false;
-		}
-
-		// liberer le verrou
-		spip_fclose_unlock($fl);
-
-		// Verifications
-		$ok = true;
-		if (isset($options['phpcheck']) and $options['phpcheck'] == 'oui') {
-			$ok &= (preg_match(",[?]>\n?$,", $contenu));
-		}
-
-		#spip_log("$fread $fichier ".spip_timer('lire_fichier'));
-		if (!$ok) {
-			spip_log("echec lecture $fichier");
-		}
-
-		return $ok;
-	}
-
-	return false;
+    $contenu = '';
+    // inutile car si le fichier n'existe pas, le lock va renvoyer false juste apres
+    // economisons donc les acces disque, sauf chez free qui rale pour un rien
+    if (_TEST_FILE_EXISTS and !@file_exists($fichier)) {
+        return false;
+    }
+
+    #spip_timer('lire_fichier');
+
+    // pas de @ sur spip_fopen_lock qui est silencieux de toute facon
+    if ($fl = spip_fopen_lock($fichier, 'r', LOCK_SH)) {
+        // lire le fichier avant tout
+        $contenu = spip_file_get_contents($fichier);
+
+        // le fichier a-t-il ete supprime par le locker ?
+        // on ne verifie que si la tentative de lecture a echoue
+        // pour discriminer un contenu vide d'un fichier absent
+        // et eviter un acces disque
+        if (!$contenu and !@file_exists($fichier)) {
+            spip_fclose_unlock($fl);
+
+            return false;
+        }
+
+        // liberer le verrou
+        spip_fclose_unlock($fl);
+
+        // Verifications
+        $ok = true;
+        if (isset($options['phpcheck']) and $options['phpcheck'] == 'oui') {
+            $ok &= (preg_match(",[?]>\n?$,", $contenu));
+        }
+
+        #spip_log("$fread $fichier ".spip_timer('lire_fichier'));
+        if (!$ok) {
+            spip_log("echec lecture $fichier");
+        }
+
+        return $ok;
+    }
+
+    return false;
 }
 
 
@@ -216,85 +216,85 @@ 
  **/
 function ecrire_fichier($fichier, $contenu, $ignorer_echec = false, $truncate = true) {
 
-	#spip_timer('ecrire_fichier');
-
-	// verrouiller le fichier destination
-	if ($fp = spip_fopen_lock($fichier, 'a', LOCK_EX)) {
-		// ecrire les donnees, compressees le cas echeant
-		// (on ouvre un nouveau pointeur sur le fichier, ce qui a l'avantage
-		// de le recreer si le locker qui nous precede l'avait supprime...)
-		if (substr($fichier, -3) == '.gz') {
-			$contenu = gzencode($contenu);
-		}
-		// si c'est une ecriture avec troncation , on fait plutot une ecriture complete a cote suivie unlink+rename
-		// pour etre sur d'avoir une operation atomique
-		// y compris en NFS : http://www.ietf.org/rfc/rfc1094.txt
-		// sauf sous wintruc ou ca ne marche pas
-		$ok = false;
-		if ($truncate and _OS_SERVEUR != 'windows') {
-			if (!function_exists('creer_uniqid')) {
-				include_spip('inc/acces');
-			}
-			$id = creer_uniqid();
-			// on ouvre un pointeur sur un fichier temporaire en ecriture +raz
-			if ($fp2 = spip_fopen_lock("$fichier.$id", 'w', LOCK_EX)) {
-				$s = @fputs($fp2, $contenu, $a = strlen($contenu));
-				$ok = ($s == $a);
-				spip_fclose_unlock($fp2);
-				spip_fclose_unlock($fp);
-				// unlink direct et pas spip_unlink car on avait deja le verrou
-				// a priori pas besoin car rename ecrase la cible
-				// @unlink($fichier);
-				// le rename aussitot, atomique quand on est pas sous windows
-				// au pire on arrive en second en cas de concourance, et le rename echoue
-				// --> on a la version de l'autre process qui doit etre identique
-				@rename("$fichier.$id", $fichier);
-				// precaution en cas d'echec du rename
-				if (!_TEST_FILE_EXISTS or @file_exists("$fichier.$id")) {
-					@unlink("$fichier.$id");
-				}
-				if ($ok) {
-					$ok = file_exists($fichier);
-				}
-			} else // echec mais penser a fermer ..
-			{
-				spip_fclose_unlock($fp);
-			}
-		}
-		// sinon ou si methode precedente a echoueee
-		// on se rabat sur la methode ancienne
-		if (!$ok) {
-			// ici on est en ajout ou sous windows, cas desespere
-			if ($truncate) {
-				@ftruncate($fp, 0);
-			}
-			$s = @fputs($fp, $contenu, $a = strlen($contenu));
-
-			$ok = ($s == $a);
-			spip_fclose_unlock($fp);
-		}
-
-		// liberer le verrou et fermer le fichier
-		@chmod($fichier, _SPIP_CHMOD & 0666);
-		if ($ok) {
-			if (strpos($fichier, ".php") !== false) {
-				spip_clear_opcode_cache(realpath($fichier));
-			}
-
-			return $ok;
-		}
-	}
-
-	if (!$ignorer_echec) {
-		include_spip('inc/autoriser');
-		if (autoriser('chargerftp')) {
-			raler_fichier($fichier);
-		}
-		spip_unlink($fichier);
-	}
-	spip_log("Ecriture fichier $fichier impossible", _LOG_INFO_IMPORTANTE);
-
-	return false;
+    #spip_timer('ecrire_fichier');
+
+    // verrouiller le fichier destination
+    if ($fp = spip_fopen_lock($fichier, 'a', LOCK_EX)) {
+        // ecrire les donnees, compressees le cas echeant
+        // (on ouvre un nouveau pointeur sur le fichier, ce qui a l'avantage
+        // de le recreer si le locker qui nous precede l'avait supprime...)
+        if (substr($fichier, -3) == '.gz') {
+            $contenu = gzencode($contenu);
+        }
+        // si c'est une ecriture avec troncation , on fait plutot une ecriture complete a cote suivie unlink+rename
+        // pour etre sur d'avoir une operation atomique
+        // y compris en NFS : http://www.ietf.org/rfc/rfc1094.txt
+        // sauf sous wintruc ou ca ne marche pas
+        $ok = false;
+        if ($truncate and _OS_SERVEUR != 'windows') {
+            if (!function_exists('creer_uniqid')) {
+                include_spip('inc/acces');
+            }
+            $id = creer_uniqid();
+            // on ouvre un pointeur sur un fichier temporaire en ecriture +raz
+            if ($fp2 = spip_fopen_lock("$fichier.$id", 'w', LOCK_EX)) {
+                $s = @fputs($fp2, $contenu, $a = strlen($contenu));
+                $ok = ($s == $a);
+                spip_fclose_unlock($fp2);
+                spip_fclose_unlock($fp);
+                // unlink direct et pas spip_unlink car on avait deja le verrou
+                // a priori pas besoin car rename ecrase la cible
+                // @unlink($fichier);
+                // le rename aussitot, atomique quand on est pas sous windows
+                // au pire on arrive en second en cas de concourance, et le rename echoue
+                // --> on a la version de l'autre process qui doit etre identique
+                @rename("$fichier.$id", $fichier);
+                // precaution en cas d'echec du rename
+                if (!_TEST_FILE_EXISTS or @file_exists("$fichier.$id")) {
+                    @unlink("$fichier.$id");
+                }
+                if ($ok) {
+                    $ok = file_exists($fichier);
+                }
+            } else // echec mais penser a fermer ..
+            {
+                spip_fclose_unlock($fp);
+            }
+        }
+        // sinon ou si methode precedente a echoueee
+        // on se rabat sur la methode ancienne
+        if (!$ok) {
+            // ici on est en ajout ou sous windows, cas desespere
+            if ($truncate) {
+                @ftruncate($fp, 0);
+            }
+            $s = @fputs($fp, $contenu, $a = strlen($contenu));
+
+            $ok = ($s == $a);
+            spip_fclose_unlock($fp);
+        }
+
+        // liberer le verrou et fermer le fichier
+        @chmod($fichier, _SPIP_CHMOD & 0666);
+        if ($ok) {
+            if (strpos($fichier, ".php") !== false) {
+                spip_clear_opcode_cache(realpath($fichier));
+            }
+
+            return $ok;
+        }
+    }
+
+    if (!$ignorer_echec) {
+        include_spip('inc/autoriser');
+        if (autoriser('chargerftp')) {
+            raler_fichier($fichier);
+        }
+        spip_unlink($fichier);
+    }
+    spip_log("Ecriture fichier $fichier impossible", _LOG_INFO_IMPORTANTE);
+
+    return false;
 }
 
 /**
@@ -314,12 +314,12 @@ 
  *     Écriture avec troncation ?
  */
 function ecrire_fichier_securise($fichier, $contenu, $ecrire_quand_meme = false, $truncate = true) {
-	if (substr($fichier, -4) !== '.php') {
-		spip_log('Erreur de programmation: ' . $fichier . ' doit finir par .php');
-	}
-	$contenu = "<" . "?php die ('Acces interdit'); ?" . ">\n" . $contenu;
+    if (substr($fichier, -4) !== '.php') {
+        spip_log('Erreur de programmation: ' . $fichier . ' doit finir par .php');
+    }
+    $contenu = "<" . "?php die ('Acces interdit'); ?" . ">\n" . $contenu;
 
-	return ecrire_fichier($fichier, $contenu, $ecrire_quand_meme, $truncate);
+    return ecrire_fichier($fichier, $contenu, $ecrire_quand_meme, $truncate);
 }
 
 
@@ -330,23 +330,23 @@ 
  * @return bool
  */
 function ecrire_fichier_calcule_si_modifie($fichier, $contenu, $force=false, $use_copy=false) {
-	$fichier_tmp = $fichier . '.last';
-	if (!ecrire_fichier($fichier_tmp, $contenu, true)){
-		return false;
-	}
-	if ($force
-	  or !file_exists($fichier)
-		or md5_file($fichier) != md5_file($fichier_tmp)) {
-		if ($use_copy) {
-			@copy($fichier_tmp, $fichier);
-		}
-		else {
-			@rename($fichier_tmp, $fichier);
-		}
-		// eviter que PHP ne reserve le vieux timestamp
-		clearstatcache(true, $fichier);
-	}
-	return true;
+    $fichier_tmp = $fichier . '.last';
+    if (!ecrire_fichier($fichier_tmp, $contenu, true)){
+        return false;
+    }
+    if ($force
+      or !file_exists($fichier)
+        or md5_file($fichier) != md5_file($fichier_tmp)) {
+        if ($use_copy) {
+            @copy($fichier_tmp, $fichier);
+        }
+        else {
+            @rename($fichier_tmp, $fichier);
+        }
+        // eviter que PHP ne reserve le vieux timestamp
+        clearstatcache(true, $fichier);
+    }
+    return true;
 }
 
 
@@ -367,11 +367,11 @@ 
  *     true si l'opération a réussie, false sinon.
  */
 function lire_fichier_securise($fichier, &$contenu, $options = array()) {
-	if ($res = lire_fichier($fichier, $contenu, $options)) {
-		$contenu = substr($contenu, strlen("<" . "?php die ('Acces interdit'); ?" . ">\n"));
-	}
+    if ($res = lire_fichier($fichier, $contenu, $options)) {
+        $contenu = substr($contenu, strlen("<" . "?php die ('Acces interdit'); ?" . ">\n"));
+    }
 
-	return $res;
+    return $res;
 }
 
 /**
@@ -386,20 +386,20 @@ 
  *     Chemin du fichier
  **/
 function raler_fichier($fichier) {
-	include_spip('inc/minipres');
-	$dir = dirname($fichier);
-	http_status(401);
-	echo minipres(_T('texte_inc_meta_2'), "<h4 style='color: red'>"
-		. _T('texte_inc_meta_1', array('fichier' => $fichier))
-		. " <a href='"
-		. generer_url_ecrire('install', "etape=chmod&test_dir=$dir")
-		. "'>"
-		. _T('texte_inc_meta_2')
-		. "</a> "
-		. _T('texte_inc_meta_3',
-			array('repertoire' => joli_repertoire($dir)))
-		. "</h4>\n");
-	exit;
+    include_spip('inc/minipres');
+    $dir = dirname($fichier);
+    http_status(401);
+    echo minipres(_T('texte_inc_meta_2'), "<h4 style='color: red'>"
+        . _T('texte_inc_meta_1', array('fichier' => $fichier))
+        . " <a href='"
+        . generer_url_ecrire('install', "etape=chmod&test_dir=$dir")
+        . "'>"
+        . _T('texte_inc_meta_2')
+        . "</a> "
+        . _T('texte_inc_meta_3',
+            array('repertoire' => joli_repertoire($dir)))
+        . "</h4>\n");
+    exit;
 }
 
 
@@ -414,14 +414,14 @@ 
  *     - true si récent, false sinon
  */
 function jeune_fichier($fichier, $n) {
-	if (!file_exists($fichier)) {
-		return false;
-	}
-	if (!$c = @filemtime($fichier)) {
-		return false;
-	}
-
-	return (time() - $n <= $c);
+    if (!file_exists($fichier)) {
+        return false;
+    }
+    if (!$c = @filemtime($fichier)) {
+        return false;
+    }
+
+    return (time() - $n <= $c);
 }
 
 /**
@@ -436,22 +436,22 @@ 
  *     - false si on n'arrive pas poser le verrou ou si la suppression échoue
  */
 function supprimer_fichier($fichier, $lock = true) {
-	if (!@file_exists($fichier)) {
-		return true;
-	}
-
-	if ($lock) {
-		// verrouiller le fichier destination
-		if (!$fp = spip_fopen_lock($fichier, 'a', LOCK_EX)) {
-			return false;
-		}
-
-		// liberer le verrou
-		spip_fclose_unlock($fp);
-	}
-
-	// supprimer
-	return @unlink($fichier);
+    if (!@file_exists($fichier)) {
+        return true;
+    }
+
+    if ($lock) {
+        // verrouiller le fichier destination
+        if (!$fp = spip_fopen_lock($fichier, 'a', LOCK_EX)) {
+            return false;
+        }
+
+        // liberer le verrou
+        spip_fclose_unlock($fp);
+    }
+
+    // supprimer
+    return @unlink($fichier);
 }
 
 /**
@@ -461,12 +461,12 @@ 
  *     Chemin du fichier
  */
 function spip_unlink($f) {
-	if (!is_dir($f)) {
-		supprimer_fichier($f, false);
-	} else {
-		@unlink("$f/.ok");
-		@rmdir($f);
-	}
+    if (!is_dir($f)) {
+        supprimer_fichier($f, false);
+    } else {
+        @unlink("$f/.ok");
+        @rmdir($f);
+    }
 }
 
 /**
@@ -480,26 +480,26 @@ 
  *   The absolute path of the PHP file to invalidate.
  */
 function spip_clear_opcode_cache($filepath) {
-	clearstatcache(true, $filepath);
-
-	// Zend OPcache
-	if (function_exists('opcache_invalidate')) {
-		$invalidate = @opcache_invalidate($filepath, true);
-		// si l'invalidation a echoue lever un flag
-		if (!$invalidate and !defined('_spip_attend_invalidation_opcode_cache')) {
-			define('_spip_attend_invalidation_opcode_cache',true);
-		}
-	} elseif (!defined('_spip_attend_invalidation_opcode_cache')) {
-		// n'agira que si opcache est effectivement actif (il semble qu'on a pas toujours la fonction opcache_invalidate)
-		define('_spip_attend_invalidation_opcode_cache',true);
-	}
-	// APC.
-	if (function_exists('apc_delete_file')) {
-		// apc_delete_file() throws a PHP warning in case the specified file was
-		// not compiled yet.
-		// @see http://php.net/apc-delete-file
-		@apc_delete_file($filepath);
-	}
+    clearstatcache(true, $filepath);
+
+    // Zend OPcache
+    if (function_exists('opcache_invalidate')) {
+        $invalidate = @opcache_invalidate($filepath, true);
+        // si l'invalidation a echoue lever un flag
+        if (!$invalidate and !defined('_spip_attend_invalidation_opcode_cache')) {
+            define('_spip_attend_invalidation_opcode_cache',true);
+        }
+    } elseif (!defined('_spip_attend_invalidation_opcode_cache')) {
+        // n'agira que si opcache est effectivement actif (il semble qu'on a pas toujours la fonction opcache_invalidate)
+        define('_spip_attend_invalidation_opcode_cache',true);
+    }
+    // APC.
+    if (function_exists('apc_delete_file')) {
+        // apc_delete_file() throws a PHP warning in case the specified file was
+        // not compiled yet.
+        // @see http://php.net/apc-delete-file
+        @apc_delete_file($filepath);
+    }
 }
 
 /**
@@ -522,24 +522,24 @@ 
  *
  */
 function spip_attend_invalidation_opcode_cache($timestamp = null) {
-	if (function_exists('opcache_get_configuration')
-		and @ini_get('opcache.enable')
-		and @ini_get('opcache.validate_timestamps')
-		and ($duree = intval(@ini_get('opcache.revalidate_freq')) or $duree = 2)
-		and defined('_spip_attend_invalidation_opcode_cache') // des invalidations ont echouees
-	) {
-		$wait = $duree + 1;
-		if ($timestamp) {
-			$wait -= (time() - $timestamp);
-			if ($wait<0) {
-				$wait = 0;
-			}
-		}
-		spip_log('Probleme de configuration opcache.revalidate_freq '. $duree .'s : on attend '.$wait.'s', _LOG_INFO_IMPORTANTE);
-		if ($wait) {
-			sleep($duree + 1);
-		}
-	}
+    if (function_exists('opcache_get_configuration')
+        and @ini_get('opcache.enable')
+        and @ini_get('opcache.validate_timestamps')
+        and ($duree = intval(@ini_get('opcache.revalidate_freq')) or $duree = 2)
+        and defined('_spip_attend_invalidation_opcode_cache') // des invalidations ont echouees
+    ) {
+        $wait = $duree + 1;
+        if ($timestamp) {
+            $wait -= (time() - $timestamp);
+            if ($wait<0) {
+                $wait = 0;
+            }
+        }
+        spip_log('Probleme de configuration opcache.revalidate_freq '. $duree .'s : on attend '.$wait.'s', _LOG_INFO_IMPORTANTE);
+        if ($wait) {
+            sleep($duree + 1);
+        }
+    }
 }
 
 
@@ -552,26 +552,26 @@ 
  * @return bool Suppression reussie.
  */
 function supprimer_repertoire($dir) {
-	if (!file_exists($dir)) {
-		return true;
-	}
-	if (!is_dir($dir) || is_link($dir)) {
-		return @unlink($dir);
-	}
-
-	foreach (scandir($dir) as $item) {
-		if ($item == '.' || $item == '..') {
-			continue;
-		}
-		if (!supprimer_repertoire($dir . "/" . $item)) {
-			@chmod($dir . "/" . $item, 0777);
-			if (!supprimer_repertoire($dir . "/" . $item)) {
-				return false;
-			}
-		};
-	}
-
-	return @rmdir($dir);
+    if (!file_exists($dir)) {
+        return true;
+    }
+    if (!is_dir($dir) || is_link($dir)) {
+        return @unlink($dir);
+    }
+
+    foreach (scandir($dir) as $item) {
+        if ($item == '.' || $item == '..') {
+            continue;
+        }
+        if (!supprimer_repertoire($dir . "/" . $item)) {
+            @chmod($dir . "/" . $item, 0777);
+            if (!supprimer_repertoire($dir . "/" . $item)) {
+                return false;
+            }
+        };
+    }
+
+    return @rmdir($dir);
 }
 
 
@@ -600,57 +600,57 @@ 
  *     Chemin du répertoire créé.
  **/
 function sous_repertoire($base, $subdir = '', $nobase = false, $tantpis = false) {
-	static $dirs = array();
-
-	$base = str_replace("//", "/", $base);
-
-	# suppr le dernier caractere si c'est un /
-	$base = rtrim($base, '/');
-
-	if (!strlen($subdir)) {
-		$n = strrpos($base, "/");
-		if ($n === false) {
-			return $nobase ? '' : ($base . '/');
-		}
-		$subdir = substr($base, $n + 1);
-		$base = substr($base, 0, $n + 1);
-	} else {
-		$base .= '/';
-		$subdir = str_replace("/", "", $subdir);
-	}
-
-	$baseaff = $nobase ? '' : $base;
-	if (isset($dirs[$base . $subdir])) {
-		return $baseaff . $dirs[$base . $subdir];
-	}
-
-	$path = $base . $subdir; # $path = 'IMG/distant/pdf' ou 'IMG/distant_pdf'
-
-	if (file_exists("$path/.ok")) {
-		return $baseaff . ($dirs[$base . $subdir] = "$subdir/");
-	}
-
-	@mkdir($path, _SPIP_CHMOD);
-	@chmod($path, _SPIP_CHMOD);
-
-	if (is_dir($path) && is_writable($path)) {
-		@touch("$path/.ok");
-		spip_log("creation $base$subdir/");
-
-		return $baseaff . ($dirs[$base . $subdir] = "$subdir/");
-	}
-
-	// en cas d'echec c'est peut etre tout simplement que le disque est plein :
-	// l'inode du fichier dir_test existe, mais impossible d'y mettre du contenu
-	spip_log("echec creation $base${subdir}");
-	if ($tantpis) {
-		return '';
-	}
-	if (!_DIR_RESTREINT) {
-		$base = preg_replace(',^' . _DIR_RACINE . ',', '', $base);
-	}
-	$base .= $subdir;
-	raler_fichier($base . '/.ok');
+    static $dirs = array();
+
+    $base = str_replace("//", "/", $base);
+
+    # suppr le dernier caractere si c'est un /
+    $base = rtrim($base, '/');
+
+    if (!strlen($subdir)) {
+        $n = strrpos($base, "/");
+        if ($n === false) {
+            return $nobase ? '' : ($base . '/');
+        }
+        $subdir = substr($base, $n + 1);
+        $base = substr($base, 0, $n + 1);
+    } else {
+        $base .= '/';
+        $subdir = str_replace("/", "", $subdir);
+    }
+
+    $baseaff = $nobase ? '' : $base;
+    if (isset($dirs[$base . $subdir])) {
+        return $baseaff . $dirs[$base . $subdir];
+    }
+
+    $path = $base . $subdir; # $path = 'IMG/distant/pdf' ou 'IMG/distant_pdf'
+
+    if (file_exists("$path/.ok")) {
+        return $baseaff . ($dirs[$base . $subdir] = "$subdir/");
+    }
+
+    @mkdir($path, _SPIP_CHMOD);
+    @chmod($path, _SPIP_CHMOD);
+
+    if (is_dir($path) && is_writable($path)) {
+        @touch("$path/.ok");
+        spip_log("creation $base$subdir/");
+
+        return $baseaff . ($dirs[$base . $subdir] = "$subdir/");
+    }
+
+    // en cas d'echec c'est peut etre tout simplement que le disque est plein :
+    // l'inode du fichier dir_test existe, mais impossible d'y mettre du contenu
+    spip_log("echec creation $base${subdir}");
+    if ($tantpis) {
+        return '';
+    }
+    if (!_DIR_RESTREINT) {
+        $base = preg_replace(',^' . _DIR_RACINE . ',', '', $base);
+    }
+    $base .= $subdir;
+    raler_fichier($base . '/.ok');
 }
 
 
@@ -683,51 +683,51 @@ 
  *     Chemins des fichiers trouvés.
  **/
 function preg_files($dir, $pattern = -1 /* AUTO */, $maxfiles = 10000, $recurs = array()) {
-	$nbfiles = 0;
-	if ($pattern == -1) {
-		$pattern = "^$dir";
-	}
-	$fichiers = array();
-	// revenir au repertoire racine si on a recu dossier/truc
-	// pour regarder dossier/truc/ ne pas oublier le / final
-	$dir = preg_replace(',/[^/]*$,', '', $dir);
-	if ($dir == '') {
-		$dir = '.';
-	}
-
-	if (@is_dir($dir) and is_readable($dir) and $d = opendir($dir)) {
-		while (($f = readdir($d)) !== false && ($nbfiles < $maxfiles)) {
-			if ($f[0] != '.' # ignorer . .. .svn etc
-				and $f != 'CVS'
-				and $f != 'remove.txt'
-				and is_readable($f = "$dir/$f")
-			) {
-				if (is_file($f)) {
-					if (preg_match(";$pattern;iS", $f)) {
-						$fichiers[] = $f;
-						$nbfiles++;
-					}
-				} else {
-					if (is_dir($f) and is_array($recurs)) {
-						$rp = @realpath($f);
-						if (!is_string($rp) or !strlen($rp)) {
-							$rp = $f;
-						} # realpath n'est peut etre pas autorise
-						if (!isset($recurs[$rp])) {
-							$recurs[$rp] = true;
-							$beginning = $fichiers;
-							$end = preg_files("$f/", $pattern,
-								$maxfiles - $nbfiles, $recurs);
-							$fichiers = array_merge((array)$beginning, (array)$end);
-							$nbfiles = count($fichiers);
-						}
-					}
-				}
-			}
-		}
-		closedir($d);
-	}
-	sort($fichiers);
-
-	return $fichiers;
+    $nbfiles = 0;
+    if ($pattern == -1) {
+        $pattern = "^$dir";
+    }
+    $fichiers = array();
+    // revenir au repertoire racine si on a recu dossier/truc
+    // pour regarder dossier/truc/ ne pas oublier le / final
+    $dir = preg_replace(',/[^/]*$,', '', $dir);
+    if ($dir == '') {
+        $dir = '.';
+    }
+
+    if (@is_dir($dir) and is_readable($dir) and $d = opendir($dir)) {
+        while (($f = readdir($d)) !== false && ($nbfiles < $maxfiles)) {
+            if ($f[0] != '.' # ignorer . .. .svn etc
+                and $f != 'CVS'
+                and $f != 'remove.txt'
+                and is_readable($f = "$dir/$f")
+            ) {
+                if (is_file($f)) {
+                    if (preg_match(";$pattern;iS", $f)) {
+                        $fichiers[] = $f;
+                        $nbfiles++;
+                    }
+                } else {
+                    if (is_dir($f) and is_array($recurs)) {
+                        $rp = @realpath($f);
+                        if (!is_string($rp) or !strlen($rp)) {
+                            $rp = $f;
+                        } # realpath n'est peut etre pas autorise
+                        if (!isset($recurs[$rp])) {
+                            $recurs[$rp] = true;
+                            $beginning = $fichiers;
+                            $end = preg_files("$f/", $pattern,
+                                $maxfiles - $nbfiles, $recurs);
+                            $fichiers = array_merge((array)$beginning, (array)$end);
+                            $nbfiles = count($fichiers);
+                        }
+                    }
+                }
+            }
+        }
+        closedir($d);
+    }
+    sort($fichiers);
+
+    return $fichiers;
 }

ecrire/plugins/installer.php

Spacing +5 added lines, -5 removed lines

@@ -68,7 +68,7 @@ 
 	}
 	$dir = constant($dir);
 	foreach ($infos['install'] as $file) {
-		$file = $dir . $plug . "/" . trim($file);
+		$file = $dir.$plug."/".trim($file);
 		if (file_exists($file)) {
 			include_once($file);
 		}
@@ -81,10 +81,10 @@ 
 		// S'assurer que les metas de la table spécifique sont bien accessibles dans la globale
 		lire_metas($table);
 	}
-	$nom_meta = $infos['prefix'] . '_base_version';
+	$nom_meta = $infos['prefix'].'_base_version';
 
 	// Détermination de la fonction à appeler et de ses arguments
-	$f = $infos['prefix'] . "_install";
+	$f = $infos['prefix']."_install";
 	if (!function_exists($f)) {
 		$f = isset($infos['schema']) ? 'spip_plugin_install' : '';
 		$arg = $infos;
@@ -168,12 +168,12 @@ 
 				and spip_version_compare($GLOBALS[$table][$nom_meta], $version_cible, '>='));
 			break;
 		case 'install':
-			if (function_exists($upgrade = $infos['prefix'] . '_upgrade')) {
+			if (function_exists($upgrade = $infos['prefix'].'_upgrade')) {
 				$upgrade($nom_meta, $version_cible, $table);
 			}
 			break;
 		case 'uninstall':
-			if (function_exists($vider_tables = $infos['prefix'] . '_vider_tables')) {
+			if (function_exists($vider_tables = $infos['prefix'].'_vider_tables')) {
 				$vider_tables($nom_meta, $table);
 			}
 			break;

Indentation +135 added lines, -135 removed lines

@@ -18,7 +18,7 @@ 
 
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -54,96 +54,96 @@ 
  */
 function plugins_installer_dist($plug, $action, $dir_type = '_DIR_PLUGINS') {
 
-	// Charger les informations du XML du plugin et vérification de l'existence d'une installation
-	$get_infos = charger_fonction('get_infos', 'plugins');
-	$infos = $get_infos($plug, false, constant($dir_type));
-	if (!isset($infos['install']) or !$infos['install']) {
-		return false;
-	}
-
-	// Passer en chemin absolu si possible, c'est plus efficace
-	$dir = str_replace('_DIR_', '_ROOT_', $dir_type);
-	if (!defined($dir)) {
-		$dir = $dir_type;
-	}
-	$dir = constant($dir);
-	foreach ($infos['install'] as $file) {
-		$file = $dir . $plug . "/" . trim($file);
-		if (file_exists($file)) {
-			include_once($file);
-		}
-	}
-
-	// Détermination de la table meta et du nom de la meta plugin
-	$table = 'meta';
-	if (isset($infos['meta']) and ($infos['meta'] !== 'meta')) {
-		$table = $infos['meta'];
-		// S'assurer que les metas de la table spécifique sont bien accessibles dans la globale
-		lire_metas($table);
-	}
-	$nom_meta = $infos['prefix'] . '_base_version';
-
-	// Détermination de la fonction à appeler et de ses arguments
-	$f = $infos['prefix'] . "_install";
-	if (!function_exists($f)) {
-		$f = isset($infos['schema']) ? 'spip_plugin_install' : '';
-		$arg = $infos;
-		// On passe la table et la meta pour éviter de les recalculer dans la fonction appelée
-		$arg['meta'] = $table;
-		$arg['nom_meta'] = $nom_meta;
-	} else {
-		// Ancienne méthode d'installation - TODO à supprimer à terme
-		// stupide: info deja dans le nom
-		$arg = $infos['prefix'];
-	}
-	$version = isset($infos['schema']) ? $infos['schema'] : '';
-
-	if (!$f) {
-		// installation sans operation particuliere
-		$infos['install_test'] = array(true, '');
-		return $infos;
-	}
-
-	// Tester si l'action demandée est nécessaire ou pas.
-	$test = $f('test', $arg, $version);
-	if ($action == 'uninstall') {
-		$test = !$test;
-	}
-	// Si deja fait, on ne fait rien et on ne dit rien
-	if ($test) {
-		return true;
-	}
-
-	// Si install et que l'on a la meta d'installation, c'est un upgrade. On le consigne dans $infos
-	// pour renvoyer le bon message en retour de la fonction.
-	if ($action == 'install' && !empty($GLOBALS[$table][$nom_meta])) {
-		$infos['upgrade'] = true;
-	}
-
-	// executer l'installation ou l'inverse
-	// et renvoyer la trace (mais il faudrait passer en AJAX plutot)
-	ob_start();
-	$f($action, $arg, $version);
-	$aff = ob_get_contents();
-	ob_end_clean();
-
-	// vider le cache des descriptions de tables a chaque (de)installation
-	$trouver_table = charger_fonction('trouver_table', 'base');
-	$trouver_table('');
-	$infos['install_test'] = array($f('test', $arg, $version), $aff);
-
-	// Si la table meta n'est pas spip_meta et qu'on est dans la première installation du plugin
-	// on force la création du fichier cache à la date du moment.
-	// On relit les metas de la table pour être sur que la globale soit à jour pour touch_meta.
-	if (
-		($table !== 'meta')
-		and ($action == 'install')
-		and empty($infos['upgrade'])
-	) {
-		touch_meta(false, $table);
-	}
-
-	return $infos;
+    // Charger les informations du XML du plugin et vérification de l'existence d'une installation
+    $get_infos = charger_fonction('get_infos', 'plugins');
+    $infos = $get_infos($plug, false, constant($dir_type));
+    if (!isset($infos['install']) or !$infos['install']) {
+        return false;
+    }
+
+    // Passer en chemin absolu si possible, c'est plus efficace
+    $dir = str_replace('_DIR_', '_ROOT_', $dir_type);
+    if (!defined($dir)) {
+        $dir = $dir_type;
+    }
+    $dir = constant($dir);
+    foreach ($infos['install'] as $file) {
+        $file = $dir . $plug . "/" . trim($file);
+        if (file_exists($file)) {
+            include_once($file);
+        }
+    }
+
+    // Détermination de la table meta et du nom de la meta plugin
+    $table = 'meta';
+    if (isset($infos['meta']) and ($infos['meta'] !== 'meta')) {
+        $table = $infos['meta'];
+        // S'assurer que les metas de la table spécifique sont bien accessibles dans la globale
+        lire_metas($table);
+    }
+    $nom_meta = $infos['prefix'] . '_base_version';
+
+    // Détermination de la fonction à appeler et de ses arguments
+    $f = $infos['prefix'] . "_install";
+    if (!function_exists($f)) {
+        $f = isset($infos['schema']) ? 'spip_plugin_install' : '';
+        $arg = $infos;
+        // On passe la table et la meta pour éviter de les recalculer dans la fonction appelée
+        $arg['meta'] = $table;
+        $arg['nom_meta'] = $nom_meta;
+    } else {
+        // Ancienne méthode d'installation - TODO à supprimer à terme
+        // stupide: info deja dans le nom
+        $arg = $infos['prefix'];
+    }
+    $version = isset($infos['schema']) ? $infos['schema'] : '';
+
+    if (!$f) {
+        // installation sans operation particuliere
+        $infos['install_test'] = array(true, '');
+        return $infos;
+    }
+
+    // Tester si l'action demandée est nécessaire ou pas.
+    $test = $f('test', $arg, $version);
+    if ($action == 'uninstall') {
+        $test = !$test;
+    }
+    // Si deja fait, on ne fait rien et on ne dit rien
+    if ($test) {
+        return true;
+    }
+
+    // Si install et que l'on a la meta d'installation, c'est un upgrade. On le consigne dans $infos
+    // pour renvoyer le bon message en retour de la fonction.
+    if ($action == 'install' && !empty($GLOBALS[$table][$nom_meta])) {
+        $infos['upgrade'] = true;
+    }
+
+    // executer l'installation ou l'inverse
+    // et renvoyer la trace (mais il faudrait passer en AJAX plutot)
+    ob_start();
+    $f($action, $arg, $version);
+    $aff = ob_get_contents();
+    ob_end_clean();
+
+    // vider le cache des descriptions de tables a chaque (de)installation
+    $trouver_table = charger_fonction('trouver_table', 'base');
+    $trouver_table('');
+    $infos['install_test'] = array($f('test', $arg, $version), $aff);
+
+    // Si la table meta n'est pas spip_meta et qu'on est dans la première installation du plugin
+    // on force la création du fichier cache à la date du moment.
+    // On relit les metas de la table pour être sur que la globale soit à jour pour touch_meta.
+    if (
+        ($table !== 'meta')
+        and ($action == 'install')
+        and empty($infos['upgrade'])
+    ) {
+        touch_meta(false, $table);
+    }
+
+    return $infos;
 }
 
 /**
@@ -159,25 +159,25 @@ 
  * @return bool|void
  */
 function spip_plugin_install($action, $infos, $version_cible) {
-	$nom_meta = $infos['nom_meta'];
-	$table = $infos['meta'];
-	switch ($action) {
-		case 'test':
-			return (isset($GLOBALS[$table])
-				and isset($GLOBALS[$table][$nom_meta])
-				and spip_version_compare($GLOBALS[$table][$nom_meta], $version_cible, '>='));
-			break;
-		case 'install':
-			if (function_exists($upgrade = $infos['prefix'] . '_upgrade')) {
-				$upgrade($nom_meta, $version_cible, $table);
-			}
-			break;
-		case 'uninstall':
-			if (function_exists($vider_tables = $infos['prefix'] . '_vider_tables')) {
-				$vider_tables($nom_meta, $table);
-			}
-			break;
-	}
+    $nom_meta = $infos['nom_meta'];
+    $table = $infos['meta'];
+    switch ($action) {
+        case 'test':
+            return (isset($GLOBALS[$table])
+                and isset($GLOBALS[$table][$nom_meta])
+                and spip_version_compare($GLOBALS[$table][$nom_meta], $version_cible, '>='));
+            break;
+        case 'install':
+            if (function_exists($upgrade = $infos['prefix'] . '_upgrade')) {
+                $upgrade($nom_meta, $version_cible, $table);
+            }
+            break;
+        case 'uninstall':
+            if (function_exists($vider_tables = $infos['prefix'] . '_vider_tables')) {
+                $vider_tables($nom_meta, $table);
+            }
+            break;
+    }
 }
 
 
@@ -196,29 +196,29 @@ 
  * @return array Tableau des plugins actifs
  **/
 function liste_plugin_actifs() {
-	$liste = isset($GLOBALS['meta']['plugin']) ? $GLOBALS['meta']['plugin'] : '';
-	if (!$liste) {
-		return array();
-	}
-	if (!is_array($liste = unserialize($liste))) {
-		// compatibilite pre 1.9.2, mettre a jour la meta
-		spip_log("MAJ meta plugin vieille version : $liste", "plugin");
-		$new = true;
-		list(, $liste) = liste_plugin_valides(explode(",", $liste));
-	} else {
-		$new = false;
-		// compat au moment d'une migration depuis version anterieure
-		// si pas de dir_type, alors c'est _DIR_PLUGINS
-		foreach ($liste as $prefix => $infos) {
-			if (!isset($infos['dir_type'])) {
-				$liste[$prefix]['dir_type'] = "_DIR_PLUGINS";
-				$new = true;
-			}
-		}
-	}
-	if ($new) {
-		ecrire_meta('plugin', serialize($liste));
-	}
-
-	return $liste;
+    $liste = isset($GLOBALS['meta']['plugin']) ? $GLOBALS['meta']['plugin'] : '';
+    if (!$liste) {
+        return array();
+    }
+    if (!is_array($liste = unserialize($liste))) {
+        // compatibilite pre 1.9.2, mettre a jour la meta
+        spip_log("MAJ meta plugin vieille version : $liste", "plugin");
+        $new = true;
+        list(, $liste) = liste_plugin_valides(explode(",", $liste));
+    } else {
+        $new = false;
+        // compat au moment d'une migration depuis version anterieure
+        // si pas de dir_type, alors c'est _DIR_PLUGINS
+        foreach ($liste as $prefix => $infos) {
+            if (!isset($infos['dir_type'])) {
+                $liste[$prefix]['dir_type'] = "_DIR_PLUGINS";
+                $new = true;
+            }
+        }
+    }
+    if ($new) {
+        ecrire_meta('plugin', serialize($liste));
+    }
+
+    return $liste;
 }

ecrire/base/trouver_table.php

Indentation +138 added lines, -138 removed lines

@@ -16,7 +16,7 @@ 
  * @package SPIP\Core\SQL\Tables
  **/
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 include_spip('base/objets');
 
@@ -64,141 +64,141 @@ 
  *
  **/
 function base_trouver_table_dist($nom, $serveur = '', $table_spip = true) {
-	static $nom_cache_desc_sql = array();
-
-	if (!spip_connect($serveur)
-		or !preg_match('/^[a-zA-Z0-9._-]*/', $nom)
-	) {
-		return null;
-	}
-
-	$connexion = &$GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
-	$objets_sql = lister_tables_objets_sql("::md5");
-
-	// le nom du cache depend du serveur mais aussi du nom de la db et du prefixe
-	// ce qui permet une auto invalidation en cas de modif manuelle du fichier
-	// de connexion, et tout risque d'ambiguite
-	if (!isset($nom_cache_desc_sql[$serveur][$objets_sql])) {
-		$nom_cache_desc_sql[$serveur][$objets_sql] =
-			_DIR_CACHE . 'sql_desc_'
-			. ($serveur ? "{$serveur}_" : "")
-			. substr(md5($connexion['db'] . ":" . $connexion['prefixe'] . ":$objets_sql"), 0, 8)
-			. '.txt';
-		// nouveau nom de cache = nouvelle version en memoire
-		unset($connexion['tables']);
-	}
-
-	// un appel avec $nom vide est une demande explicite de vidange du cache des descriptions
-	if (!$nom) {
-		spip_unlink($nom_cache_desc_sql[$serveur][$objets_sql]);
-		$connexion['tables'] = array();
-
-		return null;
-	}
-
-	$nom_sql = $nom;
-	if (preg_match('/\.(.*)$/', $nom, $s)) {
-		$nom_sql = $s[1];
-	} else {
-		$nom_sql = $nom;
-	}
-
-	$fdesc = $desc = '';
-	$connexion = &$GLOBALS['connexions'][$serveur ? $serveur : 0];
-
-	// base sous SPIP: gerer les abreviations explicites des noms de table
-	if ($connexion['spip_connect_version']) {
-		if ($table_spip and isset($GLOBALS['table_des_tables'][$nom])) {
-			$nom = $GLOBALS['table_des_tables'][$nom];
-			$nom_sql = 'spip_' . $nom;
-		}
-	}
-
-	// si c'est la premiere table qu'on cherche
-	// et si on est pas explicitement en recalcul
-	// on essaye de recharger le cache des decriptions de ce serveur
-	// dans le fichier cache
-	if (!isset($connexion['tables'][$nom_sql])
-		and defined('_VAR_MODE') and _VAR_MODE !== 'recalcul'
-		and (!isset($connexion['tables']) or !$connexion['tables'])
-	) {
-		if (lire_fichier($nom_cache_desc_sql[$serveur][$objets_sql], $desc_cache)
-			and $desc_cache = unserialize($desc_cache)
-		) {
-			$connexion['tables'] = $desc_cache;
-		}
-	}
-	if ($table_spip and !isset($connexion['tables'][$nom_sql])) {
-
-		if (isset($GLOBALS['tables_principales'][$nom_sql])) {
-			$fdesc = $GLOBALS['tables_principales'][$nom_sql];
-		}
-		// meme si pas d'abreviation declaree, trouver la table spip_$nom
-		// si c'est une table principale,
-		// puisqu'on le fait aussi pour les tables auxiliaires
-		elseif ($nom_sql == $nom and isset($GLOBALS['tables_principales']['spip_' . $nom])) {
-			$nom_sql = 'spip_' . $nom;
-			$fdesc = &$GLOBALS['tables_principales'][$nom_sql];
-		} elseif (isset($GLOBALS['tables_auxiliaires'][$n = $nom])
-			or isset($GLOBALS['tables_auxiliaires'][$n = 'spip_' . $nom])
-		) {
-			$nom_sql = $n;
-			$fdesc = &$GLOBALS['tables_auxiliaires'][$n];
-		}  # table locale a cote de SPIP, comme non SPIP:
-	}
-	if (!isset($connexion['tables'][$nom_sql])) {
-
-		// La *vraie* base a la priorite
-		$desc = sql_showtable($nom_sql, $table_spip, $serveur);
-		if (!$desc or !$desc['field']) {
-			if (!$fdesc) {
-				spip_log("trouver_table: table inconnue '$serveur' '$nom'", 'base' . _LOG_INFO_IMPORTANTE);
-
-				return null;
-			}
-			// on ne sait pas lire la structure de la table :
-			// on retombe sur la description donnee dans les fichiers spip
-			$desc = $fdesc;
-			$desc['exist'] = false;
-		} else {
-			$desc['exist'] = true;
-			// gerer le cas des cles vides (echec de l'analyse sur une vue par exemple)
-			// pour recuperer la declaration de lister_tables_objets_sql() si il y en a une
-			if (! $desc['key']) {
-				spip_log("trouver_table: table sans cle '$serveur' '$nom'", 'base');
-				unset($desc['key']);
-			}
-		}
-
-		$desc['table'] = $desc['table_sql'] = $nom_sql;
-		$desc['connexion'] = $serveur;
-
-		// charger les infos declarees pour cette table
-		// en lui passant les infos connues
-		// $desc est prioritaire pour la description de la table
-		$desc = array_merge(lister_tables_objets_sql($nom_sql, $desc), $desc);
-		// s'assurer qu'on a toujours un 'key'
-		if (!isset($desc['key']) && !empty($fdesc['key'])){
-			$desc['key'] = $fdesc['key'];
-		}
-		if (! isset($desc['key'])) {
-			$desc['key'] = array();
-		}
-
-		// si tables_objets_sql est bien fini d'init, on peut cacher
-		$connexion['tables'][$nom_sql] = $desc;
-		$res = &$connexion['tables'][$nom_sql];
-		// une nouvelle table a ete decrite
-		// mettons donc a jour le cache des descriptions de ce serveur
-		if (is_writeable(_DIR_CACHE)) {
-			ecrire_fichier($nom_cache_desc_sql[$serveur][$objets_sql], serialize($connexion['tables']), true);
-		}
-	} else {
-		$res = &$connexion['tables'][$nom_sql];
-	}
-
-	// toujours retourner $nom dans id_table
-	$res['id_table'] = $nom;
-
-	return $res;
+    static $nom_cache_desc_sql = array();
+
+    if (!spip_connect($serveur)
+        or !preg_match('/^[a-zA-Z0-9._-]*/', $nom)
+    ) {
+        return null;
+    }
+
+    $connexion = &$GLOBALS['connexions'][$serveur ? strtolower($serveur) : 0];
+    $objets_sql = lister_tables_objets_sql("::md5");
+
+    // le nom du cache depend du serveur mais aussi du nom de la db et du prefixe
+    // ce qui permet une auto invalidation en cas de modif manuelle du fichier
+    // de connexion, et tout risque d'ambiguite
+    if (!isset($nom_cache_desc_sql[$serveur][$objets_sql])) {
+        $nom_cache_desc_sql[$serveur][$objets_sql] =
+            _DIR_CACHE . 'sql_desc_'
+            . ($serveur ? "{$serveur}_" : "")
+            . substr(md5($connexion['db'] . ":" . $connexion['prefixe'] . ":$objets_sql"), 0, 8)
+            . '.txt';
+        // nouveau nom de cache = nouvelle version en memoire
+        unset($connexion['tables']);
+    }
+
+    // un appel avec $nom vide est une demande explicite de vidange du cache des descriptions
+    if (!$nom) {
+        spip_unlink($nom_cache_desc_sql[$serveur][$objets_sql]);
+        $connexion['tables'] = array();
+
+        return null;
+    }
+
+    $nom_sql = $nom;
+    if (preg_match('/\.(.*)$/', $nom, $s)) {
+        $nom_sql = $s[1];
+    } else {
+        $nom_sql = $nom;
+    }
+
+    $fdesc = $desc = '';
+    $connexion = &$GLOBALS['connexions'][$serveur ? $serveur : 0];
+
+    // base sous SPIP: gerer les abreviations explicites des noms de table
+    if ($connexion['spip_connect_version']) {
+        if ($table_spip and isset($GLOBALS['table_des_tables'][$nom])) {
+            $nom = $GLOBALS['table_des_tables'][$nom];
+            $nom_sql = 'spip_' . $nom;
+        }
+    }
+
+    // si c'est la premiere table qu'on cherche
+    // et si on est pas explicitement en recalcul
+    // on essaye de recharger le cache des decriptions de ce serveur
+    // dans le fichier cache
+    if (!isset($connexion['tables'][$nom_sql])
+        and defined('_VAR_MODE') and _VAR_MODE !== 'recalcul'
+        and (!isset($connexion['tables']) or !$connexion['tables'])
+    ) {
+        if (lire_fichier($nom_cache_desc_sql[$serveur][$objets_sql], $desc_cache)
+            and $desc_cache = unserialize($desc_cache)
+        ) {
+            $connexion['tables'] = $desc_cache;
+        }
+    }
+    if ($table_spip and !isset($connexion['tables'][$nom_sql])) {
+
+        if (isset($GLOBALS['tables_principales'][$nom_sql])) {
+            $fdesc = $GLOBALS['tables_principales'][$nom_sql];
+        }
+        // meme si pas d'abreviation declaree, trouver la table spip_$nom
+        // si c'est une table principale,
+        // puisqu'on le fait aussi pour les tables auxiliaires
+        elseif ($nom_sql == $nom and isset($GLOBALS['tables_principales']['spip_' . $nom])) {
+            $nom_sql = 'spip_' . $nom;
+            $fdesc = &$GLOBALS['tables_principales'][$nom_sql];
+        } elseif (isset($GLOBALS['tables_auxiliaires'][$n = $nom])
+            or isset($GLOBALS['tables_auxiliaires'][$n = 'spip_' . $nom])
+        ) {
+            $nom_sql = $n;
+            $fdesc = &$GLOBALS['tables_auxiliaires'][$n];
+        }  # table locale a cote de SPIP, comme non SPIP:
+    }
+    if (!isset($connexion['tables'][$nom_sql])) {
+
+        // La *vraie* base a la priorite
+        $desc = sql_showtable($nom_sql, $table_spip, $serveur);
+        if (!$desc or !$desc['field']) {
+            if (!$fdesc) {
+                spip_log("trouver_table: table inconnue '$serveur' '$nom'", 'base' . _LOG_INFO_IMPORTANTE);
+
+                return null;
+            }
+            // on ne sait pas lire la structure de la table :
+            // on retombe sur la description donnee dans les fichiers spip
+            $desc = $fdesc;
+            $desc['exist'] = false;
+        } else {
+            $desc['exist'] = true;
+            // gerer le cas des cles vides (echec de l'analyse sur une vue par exemple)
+            // pour recuperer la declaration de lister_tables_objets_sql() si il y en a une
+            if (! $desc['key']) {
+                spip_log("trouver_table: table sans cle '$serveur' '$nom'", 'base');
+                unset($desc['key']);
+            }
+        }
+
+        $desc['table'] = $desc['table_sql'] = $nom_sql;
+        $desc['connexion'] = $serveur;
+
+        // charger les infos declarees pour cette table
+        // en lui passant les infos connues
+        // $desc est prioritaire pour la description de la table
+        $desc = array_merge(lister_tables_objets_sql($nom_sql, $desc), $desc);
+        // s'assurer qu'on a toujours un 'key'
+        if (!isset($desc['key']) && !empty($fdesc['key'])){
+            $desc['key'] = $fdesc['key'];
+        }
+        if (! isset($desc['key'])) {
+            $desc['key'] = array();
+        }
+
+        // si tables_objets_sql est bien fini d'init, on peut cacher
+        $connexion['tables'][$nom_sql] = $desc;
+        $res = &$connexion['tables'][$nom_sql];
+        // une nouvelle table a ete decrite
+        // mettons donc a jour le cache des descriptions de ce serveur
+        if (is_writeable(_DIR_CACHE)) {
+            ecrire_fichier($nom_cache_desc_sql[$serveur][$objets_sql], serialize($connexion['tables']), true);
+        }
+    } else {
+        $res = &$connexion['tables'][$nom_sql];
+    }
+
+    // toujours retourner $nom dans id_table
+    $res['id_table'] = $nom;
+
+    return $res;
 }

Spacing +10 added lines, -10 removed lines

@@ -80,9 +80,9 @@ 
 	// de connexion, et tout risque d'ambiguite
 	if (!isset($nom_cache_desc_sql[$serveur][$objets_sql])) {
 		$nom_cache_desc_sql[$serveur][$objets_sql] =
-			_DIR_CACHE . 'sql_desc_'
+			_DIR_CACHE.'sql_desc_'
 			. ($serveur ? "{$serveur}_" : "")
-			. substr(md5($connexion['db'] . ":" . $connexion['prefixe'] . ":$objets_sql"), 0, 8)
+			. substr(md5($connexion['db'].":".$connexion['prefixe'].":$objets_sql"), 0, 8)
 			. '.txt';
 		// nouveau nom de cache = nouvelle version en memoire
 		unset($connexion['tables']);
@@ -110,7 +110,7 @@ 
 	if ($connexion['spip_connect_version']) {
 		if ($table_spip and isset($GLOBALS['table_des_tables'][$nom])) {
 			$nom = $GLOBALS['table_des_tables'][$nom];
-			$nom_sql = 'spip_' . $nom;
+			$nom_sql = 'spip_'.$nom;
 		}
 	}
 
@@ -136,11 +136,11 @@ 
 		// meme si pas d'abreviation declaree, trouver la table spip_$nom
 		// si c'est une table principale,
 		// puisqu'on le fait aussi pour les tables auxiliaires
-		elseif ($nom_sql == $nom and isset($GLOBALS['tables_principales']['spip_' . $nom])) {
-			$nom_sql = 'spip_' . $nom;
+		elseif ($nom_sql == $nom and isset($GLOBALS['tables_principales']['spip_'.$nom])) {
+			$nom_sql = 'spip_'.$nom;
 			$fdesc = &$GLOBALS['tables_principales'][$nom_sql];
 		} elseif (isset($GLOBALS['tables_auxiliaires'][$n = $nom])
-			or isset($GLOBALS['tables_auxiliaires'][$n = 'spip_' . $nom])
+			or isset($GLOBALS['tables_auxiliaires'][$n = 'spip_'.$nom])
 		) {
 			$nom_sql = $n;
 			$fdesc = &$GLOBALS['tables_auxiliaires'][$n];
@@ -152,7 +152,7 @@ 
 		$desc = sql_showtable($nom_sql, $table_spip, $serveur);
 		if (!$desc or !$desc['field']) {
 			if (!$fdesc) {
-				spip_log("trouver_table: table inconnue '$serveur' '$nom'", 'base' . _LOG_INFO_IMPORTANTE);
+				spip_log("trouver_table: table inconnue '$serveur' '$nom'", 'base'._LOG_INFO_IMPORTANTE);
 
 				return null;
 			}
@@ -164,7 +164,7 @@ 
 			$desc['exist'] = true;
 			// gerer le cas des cles vides (echec de l'analyse sur une vue par exemple)
 			// pour recuperer la declaration de lister_tables_objets_sql() si il y en a une
-			if (! $desc['key']) {
+			if (!$desc['key']) {
 				spip_log("trouver_table: table sans cle '$serveur' '$nom'", 'base');
 				unset($desc['key']);
 			}
@@ -178,10 +178,10 @@ 
 		// $desc est prioritaire pour la description de la table
 		$desc = array_merge(lister_tables_objets_sql($nom_sql, $desc), $desc);
 		// s'assurer qu'on a toujours un 'key'
-		if (!isset($desc['key']) && !empty($fdesc['key'])){
+		if (!isset($desc['key']) && !empty($fdesc['key'])) {
 			$desc['key'] = $fdesc['key'];
 		}
-		if (! isset($desc['key'])) {
+		if (!isset($desc['key'])) {
 			$desc['key'] = array();
 		}
 

ecrire/public/decompiler.php

Indentation +174 added lines, -174 removed lines

@@ -11,129 +11,129 @@ 
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 // Decompilation de l'arbre de syntaxe abstraite d'un squelette SPIP
 
 function decompiler_boucle($struct, $fmt = '', $prof = 0) {
-	$nom = $struct->id_boucle;
-	$preaff = decompiler_($struct->preaff, $fmt, $prof);
-	$avant = decompiler_($struct->avant, $fmt, $prof);
-	$apres = decompiler_($struct->apres, $fmt, $prof);
-	$altern = decompiler_($struct->altern, $fmt, $prof);
-	$milieu = decompiler_($struct->milieu, $fmt, $prof);
-	$postaff = decompiler_($struct->postaff, $fmt, $prof);
-
-	$type = $struct->sql_serveur ? "$struct->sql_serveur:" : '';
-	$type .= ($struct->type_requete ? $struct->type_requete :
-		$struct->table_optionnelle);
-
-	if ($struct->jointures_explicites) {
-		$type .= " " . $struct->jointures_explicites;
-	}
-	if ($struct->table_optionnelle) {
-		$type .= "?";
-	}
-	// Revoir le cas de la boucle recursive
-
-	$crit = $struct->param;
-	if ($crit and !is_array($crit[0])) {
-		$type = strtolower($type) . array_shift($crit);
-	}
-	$crit = decompiler_criteres($struct, $fmt, $prof);
-
-	$f = 'format_boucle_' . $fmt;
-
-	return $f($preaff, $avant, $nom, $type, $crit, $milieu, $apres, $altern, $postaff, $prof);
+    $nom = $struct->id_boucle;
+    $preaff = decompiler_($struct->preaff, $fmt, $prof);
+    $avant = decompiler_($struct->avant, $fmt, $prof);
+    $apres = decompiler_($struct->apres, $fmt, $prof);
+    $altern = decompiler_($struct->altern, $fmt, $prof);
+    $milieu = decompiler_($struct->milieu, $fmt, $prof);
+    $postaff = decompiler_($struct->postaff, $fmt, $prof);
+
+    $type = $struct->sql_serveur ? "$struct->sql_serveur:" : '';
+    $type .= ($struct->type_requete ? $struct->type_requete :
+        $struct->table_optionnelle);
+
+    if ($struct->jointures_explicites) {
+        $type .= " " . $struct->jointures_explicites;
+    }
+    if ($struct->table_optionnelle) {
+        $type .= "?";
+    }
+    // Revoir le cas de la boucle recursive
+
+    $crit = $struct->param;
+    if ($crit and !is_array($crit[0])) {
+        $type = strtolower($type) . array_shift($crit);
+    }
+    $crit = decompiler_criteres($struct, $fmt, $prof);
+
+    $f = 'format_boucle_' . $fmt;
+
+    return $f($preaff, $avant, $nom, $type, $crit, $milieu, $apres, $altern, $postaff, $prof);
 }
 
 function decompiler_include($struct, $fmt = '', $prof = 0) {
-	$res = array();
-	foreach ($struct->param ? $struct->param : array() as $couple) {
-		array_shift($couple);
-		foreach ($couple as $v) {
-			$res[] = decompiler_($v, $fmt, $prof);
-		}
-	}
-	$file = is_string($struct->texte) ? $struct->texte :
-		decompiler_($struct->texte, $fmt, $prof);
-	$f = 'format_inclure_' . $fmt;
-
-	return $f($file, $res, $prof);
+    $res = array();
+    foreach ($struct->param ? $struct->param : array() as $couple) {
+        array_shift($couple);
+        foreach ($couple as $v) {
+            $res[] = decompiler_($v, $fmt, $prof);
+        }
+    }
+    $file = is_string($struct->texte) ? $struct->texte :
+        decompiler_($struct->texte, $fmt, $prof);
+    $f = 'format_inclure_' . $fmt;
+
+    return $f($file, $res, $prof);
 }
 
 function decompiler_texte($struct, $fmt = '', $prof = 0) {
-	$f = 'format_texte_' . $fmt;
+    $f = 'format_texte_' . $fmt;
 
-	return strlen($struct->texte) ? $f($struct->texte, $prof) : '';
+    return strlen($struct->texte) ? $f($struct->texte, $prof) : '';
 }
 
 function decompiler_polyglotte($struct, $fmt = '', $prof = 0) {
-	$f = 'format_polyglotte_' . $fmt;
+    $f = 'format_polyglotte_' . $fmt;
 
-	return $f($struct->traductions, $prof);
+    return $f($struct->traductions, $prof);
 }
 
 function decompiler_idiome($struct, $fmt = '', $prof = 0) {
-	$args = array();
-	foreach ($struct->arg as $k => $v) {
-		$args[$k] = public_decompiler($v, $fmt, $prof);
-	}
+    $args = array();
+    foreach ($struct->arg as $k => $v) {
+        $args[$k] = public_decompiler($v, $fmt, $prof);
+    }
 
-	$filtres = decompiler_liste($struct->param, $fmt, $prof);
+    $filtres = decompiler_liste($struct->param, $fmt, $prof);
 
-	$f = 'format_idiome_' . $fmt;
+    $f = 'format_idiome_' . $fmt;
 
-	return $f($struct->nom_champ, $struct->module, $args, $filtres, $prof);
+    return $f($struct->nom_champ, $struct->module, $args, $filtres, $prof);
 }
 
 function decompiler_champ($struct, $fmt = '', $prof = 0) {
-	$avant = decompiler_($struct->avant, $fmt, $prof);
-	$apres = decompiler_($struct->apres, $fmt, $prof);
-	$args = $filtres = '';
-	if ($p = $struct->param) {
-		if ($p[0][0] === '') {
-			$args = decompiler_liste(array(array_shift($p)), $fmt, $prof);
-		}
-		$filtres = decompiler_liste($p, $fmt, $prof);
-	}
-	$f = 'format_champ_' . $fmt;
-
-	return $f($struct->nom_champ, $struct->nom_boucle, $struct->etoile, $avant, $apres, $args, $filtres, $prof);
+    $avant = decompiler_($struct->avant, $fmt, $prof);
+    $apres = decompiler_($struct->apres, $fmt, $prof);
+    $args = $filtres = '';
+    if ($p = $struct->param) {
+        if ($p[0][0] === '') {
+            $args = decompiler_liste(array(array_shift($p)), $fmt, $prof);
+        }
+        $filtres = decompiler_liste($p, $fmt, $prof);
+    }
+    $f = 'format_champ_' . $fmt;
+
+    return $f($struct->nom_champ, $struct->nom_boucle, $struct->etoile, $avant, $apres, $args, $filtres, $prof);
 }
 
 function decompiler_liste($sources, $fmt = '', $prof = 0) {
-	if (!is_array($sources)) {
-		return '';
-	}
-	$f = 'format_liste_' . $fmt;
-	$res = '';
-	foreach ($sources as $arg) {
-		if (!is_array($arg)) {
-			continue; // ne devrait pas arriver.
-		} else {
-			$r = array_shift($arg);
-		}
-		$args = array();
-		foreach ($arg as $v) {
-			// cas des arguments entoures de ' ou "
-			if ((count($v) == 1)
-				and $v[0]->type == 'texte'
-				and (strlen($v[0]->apres) == 1)
-				and $v[0]->apres == $v[0]->avant
-			) {
-				$args[] = $v[0]->avant . $v[0]->texte . $v[0]->apres;
-			} else {
-				$args[] = decompiler_($v, $fmt, 0 - $prof);
-			}
-		}
-		if (($r !== '') or $args) {
-			$res .= $f($r, $args, $prof);
-		}
-	}
-
-	return $res;
+    if (!is_array($sources)) {
+        return '';
+    }
+    $f = 'format_liste_' . $fmt;
+    $res = '';
+    foreach ($sources as $arg) {
+        if (!is_array($arg)) {
+            continue; // ne devrait pas arriver.
+        } else {
+            $r = array_shift($arg);
+        }
+        $args = array();
+        foreach ($arg as $v) {
+            // cas des arguments entoures de ' ou "
+            if ((count($v) == 1)
+                and $v[0]->type == 'texte'
+                and (strlen($v[0]->apres) == 1)
+                and $v[0]->apres == $v[0]->avant
+            ) {
+                $args[] = $v[0]->avant . $v[0]->texte . $v[0]->apres;
+            } else {
+                $args[] = decompiler_($v, $fmt, 0 - $prof);
+            }
+        }
+        if (($r !== '') or $args) {
+            $res .= $f($r, $args, $prof);
+        }
+    }
+
+    return $res;
 }
 
 // Decompilation des criteres: on triche et on deroge:
@@ -141,91 +141,91 @@ 
 // - le champ apres signale le critere {"separateur"} ou {'separateur'}
 // - les champs sont implicitement etendus (crochets implicites mais interdits)
 function decompiler_criteres($boucle, $fmt = '', $prof = 0) {
-	$sources = $boucle->param;
-	if (!is_array($sources)) {
-		return '';
-	}
-	$res = '';
-	$f = 'format_critere_' . $fmt;
-	foreach ($sources as $crit) {
-		if (!is_array($crit)) {
-			continue;
-		} // boucle recursive
-		array_shift($crit);
-		$args = array();
-		foreach ($crit as $i => $v) {
-			if ((count($v) == 1)
-				and $v[0]->type == 'texte'
-				and $v[0]->apres
-			) {
-				$args[] = array(array('texte', ($v[0]->apres . $v[0]->texte . $v[0]->apres)));
-			} else {
-				$res2 = array();
-				foreach ($v as $k => $p) {
-					if (isset($p->type)
-						and function_exists($d = 'decompiler_' . $p->type)
-					) {
-						$r = $d($p, $fmt, (0 - $prof), @$v[$k + 1]);
-						$res2[] = array($p->type, $r);
-					} else {
-						spip_log("critere $i / $k mal forme");
-					}
-				}
-				$args[] = $res2;
-			}
-		}
-		$res .= $f($args);
-	}
-
-	return $res;
+    $sources = $boucle->param;
+    if (!is_array($sources)) {
+        return '';
+    }
+    $res = '';
+    $f = 'format_critere_' . $fmt;
+    foreach ($sources as $crit) {
+        if (!is_array($crit)) {
+            continue;
+        } // boucle recursive
+        array_shift($crit);
+        $args = array();
+        foreach ($crit as $i => $v) {
+            if ((count($v) == 1)
+                and $v[0]->type == 'texte'
+                and $v[0]->apres
+            ) {
+                $args[] = array(array('texte', ($v[0]->apres . $v[0]->texte . $v[0]->apres)));
+            } else {
+                $res2 = array();
+                foreach ($v as $k => $p) {
+                    if (isset($p->type)
+                        and function_exists($d = 'decompiler_' . $p->type)
+                    ) {
+                        $r = $d($p, $fmt, (0 - $prof), @$v[$k + 1]);
+                        $res2[] = array($p->type, $r);
+                    } else {
+                        spip_log("critere $i / $k mal forme");
+                    }
+                }
+                $args[] = $res2;
+            }
+        }
+        $res .= $f($args);
+    }
+
+    return $res;
 }
 
 
 function decompiler_($liste, $fmt = '', $prof = 0) {
-	if (!is_array($liste)) {
-		return '';
-	}
-	$prof2 = ($prof < 0) ? ($prof - 1) : ($prof + 1);
-	$contenu = array();
-	foreach ($liste as $k => $p) {
-		if (!isset($p->type)) {
-			continue;
-		} #??????
-		$d = 'decompiler_' . $p->type;
-		$next = isset($liste[$k + 1]) ? $liste[$k + 1] : false;
-		// Forcer le champ etendu si son source (pas les reecritures)
-		// contenait des args et s'il est suivi d'espaces,
-		// le champ simple les eliminant est un bug helas perenne.
-
-		if ($next
-			and ($next->type == 'texte')
-			and $p->type == 'champ'
-			and !$p->apres
-			and !$p->avant
-			and $p->fonctions
-		) {
-			$n = strlen($next->texte) - strlen(ltrim($next->texte));
-			if ($n) {
-				$champ = new Texte;
-				$champ->texte = substr($next->texte, 0, $n);
-				$champ->ligne = $p->ligne;
-				$p->apres = array($champ);
-				$next->texte = substr($next->texte, $n);
-			}
-		}
-		$contenu[] = array($d($p, $fmt, $prof2), $p->type);
-
-	}
-	$f = 'format_suite_' . $fmt;
-
-	return $f($contenu);
+    if (!is_array($liste)) {
+        return '';
+    }
+    $prof2 = ($prof < 0) ? ($prof - 1) : ($prof + 1);
+    $contenu = array();
+    foreach ($liste as $k => $p) {
+        if (!isset($p->type)) {
+            continue;
+        } #??????
+        $d = 'decompiler_' . $p->type;
+        $next = isset($liste[$k + 1]) ? $liste[$k + 1] : false;
+        // Forcer le champ etendu si son source (pas les reecritures)
+        // contenait des args et s'il est suivi d'espaces,
+        // le champ simple les eliminant est un bug helas perenne.
+
+        if ($next
+            and ($next->type == 'texte')
+            and $p->type == 'champ'
+            and !$p->apres
+            and !$p->avant
+            and $p->fonctions
+        ) {
+            $n = strlen($next->texte) - strlen(ltrim($next->texte));
+            if ($n) {
+                $champ = new Texte;
+                $champ->texte = substr($next->texte, 0, $n);
+                $champ->ligne = $p->ligne;
+                $p->apres = array($champ);
+                $next->texte = substr($next->texte, $n);
+            }
+        }
+        $contenu[] = array($d($p, $fmt, $prof2), $p->type);
+
+    }
+    $f = 'format_suite_' . $fmt;
+
+    return $f($contenu);
 }
 
 function public_decompiler($liste, $fmt = '', $prof = 0, $quoi = '') {
-	if (!include_spip('public/format_' . $fmt)) {
-		return "'$fmt'?";
-	}
-	$f = 'decompiler_' . $quoi;
+    if (!include_spip('public/format_' . $fmt)) {
+        return "'$fmt'?";
+    }
+    $f = 'decompiler_' . $quoi;
 
-	return $f($liste, $fmt, $prof);
+    return $f($liste, $fmt, $prof);
 }

Spacing +19 added lines, -21 removed lines

@@ -26,11 +26,10 @@ 
 	$postaff = decompiler_($struct->postaff, $fmt, $prof);
 
 	$type = $struct->sql_serveur ? "$struct->sql_serveur:" : '';
-	$type .= ($struct->type_requete ? $struct->type_requete :
-		$struct->table_optionnelle);
+	$type .= ($struct->type_requete ? $struct->type_requete : $struct->table_optionnelle);
 
 	if ($struct->jointures_explicites) {
-		$type .= " " . $struct->jointures_explicites;
+		$type .= " ".$struct->jointures_explicites;
 	}
 	if ($struct->table_optionnelle) {
 		$type .= "?";
@@ -39,11 +38,11 @@ 
 
 	$crit = $struct->param;
 	if ($crit and !is_array($crit[0])) {
-		$type = strtolower($type) . array_shift($crit);
+		$type = strtolower($type).array_shift($crit);
 	}
 	$crit = decompiler_criteres($struct, $fmt, $prof);
 
-	$f = 'format_boucle_' . $fmt;
+	$f = 'format_boucle_'.$fmt;
 
 	return $f($preaff, $avant, $nom, $type, $crit, $milieu, $apres, $altern, $postaff, $prof);
 }
@@ -56,21 +55,20 @@ 
 			$res[] = decompiler_($v, $fmt, $prof);
 		}
 	}
-	$file = is_string($struct->texte) ? $struct->texte :
-		decompiler_($struct->texte, $fmt, $prof);
-	$f = 'format_inclure_' . $fmt;
+	$file = is_string($struct->texte) ? $struct->texte : decompiler_($struct->texte, $fmt, $prof);
+	$f = 'format_inclure_'.$fmt;
 
 	return $f($file, $res, $prof);
 }
 
 function decompiler_texte($struct, $fmt = '', $prof = 0) {
-	$f = 'format_texte_' . $fmt;
+	$f = 'format_texte_'.$fmt;
 
 	return strlen($struct->texte) ? $f($struct->texte, $prof) : '';
 }
 
 function decompiler_polyglotte($struct, $fmt = '', $prof = 0) {
-	$f = 'format_polyglotte_' . $fmt;
+	$f = 'format_polyglotte_'.$fmt;
 
 	return $f($struct->traductions, $prof);
 }
@@ -83,7 +81,7 @@ 
 
 	$filtres = decompiler_liste($struct->param, $fmt, $prof);
 
-	$f = 'format_idiome_' . $fmt;
+	$f = 'format_idiome_'.$fmt;
 
 	return $f($struct->nom_champ, $struct->module, $args, $filtres, $prof);
 }
@@ -98,7 +96,7 @@ 
 		}
 		$filtres = decompiler_liste($p, $fmt, $prof);
 	}
-	$f = 'format_champ_' . $fmt;
+	$f = 'format_champ_'.$fmt;
 
 	return $f($struct->nom_champ, $struct->nom_boucle, $struct->etoile, $avant, $apres, $args, $filtres, $prof);
 }
@@ -107,7 +105,7 @@ 
 	if (!is_array($sources)) {
 		return '';
 	}
-	$f = 'format_liste_' . $fmt;
+	$f = 'format_liste_'.$fmt;
 	$res = '';
 	foreach ($sources as $arg) {
 		if (!is_array($arg)) {
@@ -123,7 +121,7 @@ 
 				and (strlen($v[0]->apres) == 1)
 				and $v[0]->apres == $v[0]->avant
 			) {
-				$args[] = $v[0]->avant . $v[0]->texte . $v[0]->apres;
+				$args[] = $v[0]->avant.$v[0]->texte.$v[0]->apres;
 			} else {
 				$args[] = decompiler_($v, $fmt, 0 - $prof);
 			}
@@ -146,7 +144,7 @@ 
 		return '';
 	}
 	$res = '';
-	$f = 'format_critere_' . $fmt;
+	$f = 'format_critere_'.$fmt;
 	foreach ($sources as $crit) {
 		if (!is_array($crit)) {
 			continue;
@@ -158,12 +156,12 @@ 
 				and $v[0]->type == 'texte'
 				and $v[0]->apres
 			) {
-				$args[] = array(array('texte', ($v[0]->apres . $v[0]->texte . $v[0]->apres)));
+				$args[] = array(array('texte', ($v[0]->apres.$v[0]->texte.$v[0]->apres)));
 			} else {
 				$res2 = array();
 				foreach ($v as $k => $p) {
 					if (isset($p->type)
-						and function_exists($d = 'decompiler_' . $p->type)
+						and function_exists($d = 'decompiler_'.$p->type)
 					) {
 						$r = $d($p, $fmt, (0 - $prof), @$v[$k + 1]);
 						$res2[] = array($p->type, $r);
@@ -191,7 +189,7 @@ 
 		if (!isset($p->type)) {
 			continue;
 		} #??????
-		$d = 'decompiler_' . $p->type;
+		$d = 'decompiler_'.$p->type;
 		$next = isset($liste[$k + 1]) ? $liste[$k + 1] : false;
 		// Forcer le champ etendu si son source (pas les reecritures)
 		// contenait des args et s'il est suivi d'espaces,
@@ -216,16 +214,16 @@ 
 		$contenu[] = array($d($p, $fmt, $prof2), $p->type);
 
 	}
-	$f = 'format_suite_' . $fmt;
+	$f = 'format_suite_'.$fmt;
 
 	return $f($contenu);
 }
 
 function public_decompiler($liste, $fmt = '', $prof = 0, $quoi = '') {
-	if (!include_spip('public/format_' . $fmt)) {
+	if (!include_spip('public/format_'.$fmt)) {
 		return "'$fmt'?";
 	}
-	$f = 'decompiler_' . $quoi;
+	$f = 'decompiler_'.$quoi;
 
 	return $f($liste, $fmt, $prof);
 }

ecrire/prive.php

Indentation +14 added lines, -14 removed lines

@@ -20,20 +20,20 @@
 $var_auth = $auth();
 
 if ($var_auth !== '') {
-	if (!is_int($var_auth)) {
-		// si l'authentifie' n'a pas acces a l'espace de redac
-		// c'est qu'on voulait forcer sa reconnaissance en tant que visiteur.
-		// On reexecute pour deboucher sur le include public.
-		// autrement on insiste
-		if (is_array($var_auth)) {
-			$var_auth = '../?' . $_SERVER['QUERY_STRING'];
-			spip_setcookie('spip_session', $_COOKIE['spip_session'], [
-				'expires' => time() + 3600 * 24 * 14
-			]);
-		}
-		include_spip('inc/headers');
-		redirige_formulaire($var_auth);
-	}
+    if (!is_int($var_auth)) {
+        // si l'authentifie' n'a pas acces a l'espace de redac
+        // c'est qu'on voulait forcer sa reconnaissance en tant que visiteur.
+        // On reexecute pour deboucher sur le include public.
+        // autrement on insiste
+        if (is_array($var_auth)) {
+            $var_auth = '../?' . $_SERVER['QUERY_STRING'];
+            spip_setcookie('spip_session', $_COOKIE['spip_session'], [
+                'expires' => time() + 3600 * 24 * 14
+            ]);
+        }
+        include_spip('inc/headers');
+        redirige_formulaire($var_auth);
+    }
 }
 
 // En somme, est prive' ce qui est publiquement nomme'...

Spacing +1 added lines, -1 removed lines

@@ -26,7 +26,7 @@
 		// On reexecute pour deboucher sur le include public.
 		// autrement on insiste
 		if (is_array($var_auth)) {
-			$var_auth = '../?' . $_SERVER['QUERY_STRING'];
+			$var_auth = '../?'.$_SERVER['QUERY_STRING'];
 			spip_setcookie('spip_session', $_COOKIE['spip_session'], [
 				'expires' => time() + 3600 * 24 * 14
 			]);

ecrire/inc/session.php

Indentation +455 added lines, -455 removed lines

@@ -19,7 +19,7 @@ 
  */
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 
@@ -40,15 +40,15 @@ 
  * @return bool|null|void
  */
 function inc_session_dist($auteur = false) {
-	if (is_numeric($auteur)) {
-		return supprimer_sessions($auteur, $auteur > 0);
-	} else {
-		if (is_array($auteur)) {
-			return ajouter_session($auteur);
-		} else {
-			return verifier_session($auteur);
-		}
-	}
+    if (is_numeric($auteur)) {
+        return supprimer_sessions($auteur, $auteur > 0);
+    } else {
+        if (is_array($auteur)) {
+            return ajouter_session($auteur);
+        } else {
+            return verifier_session($auteur);
+        }
+    }
 }
 
 
@@ -77,36 +77,36 @@ 
  */
 function supprimer_sessions($id_auteur, $toutes = true, $actives = true) {
 
-	$nb_files = 0;
-	$nb_max_files = (defined('_MAX_NB_SESSIONS_OUVERTES') ? _MAX_NB_SESSIONS_OUVERTES : 1000);
-	spip_log("supprimer sessions auteur $id_auteur", "session");
-	if ($toutes or $id_auteur !== $GLOBALS['visiteur_session']['id_auteur']) {
-		if ($dir = opendir(_DIR_SESSIONS)) {
-			$t = $_SERVER['REQUEST_TIME']  - (4*_RENOUVELLE_ALEA); // 48h par defaut
-			$t_short = $_SERVER['REQUEST_TIME']  - max(_RENOUVELLE_ALEA/4,3*3600); // 3h par defaut
-			$t = time() - (4 * _RENOUVELLE_ALEA);
-			while (($f = readdir($dir)) !== false) {
-				$nb_files++;
-				if (preg_match(",^[^\d-]*(-?\d+)_\w{32}\.php[3]?$,", $f, $regs)) {
-					$f = _DIR_SESSIONS . $f;
-					if (($actives and $regs[1] == $id_auteur) or ($t > filemtime($f))) {
-						spip_unlink($f);
-					}
-					// si il y a trop de sessions ouvertes, on purge les sessions anonymes de plus de 3H
-					// cf http://core.spip.org/issues/3276
-					elseif ($nb_files>$nb_max_files and !intval($regs[1]) and ($t_short > filemtime($f))) {
-						spip_unlink($f);
-					}
-				}
-			}
-		}
-	} else {
-		verifier_session();
-		spip_unlink(fichier_session('alea_ephemere', true));
-	}
-
-	// forcer le recalcul de la session courante
-	spip_session(true);
+    $nb_files = 0;
+    $nb_max_files = (defined('_MAX_NB_SESSIONS_OUVERTES') ? _MAX_NB_SESSIONS_OUVERTES : 1000);
+    spip_log("supprimer sessions auteur $id_auteur", "session");
+    if ($toutes or $id_auteur !== $GLOBALS['visiteur_session']['id_auteur']) {
+        if ($dir = opendir(_DIR_SESSIONS)) {
+            $t = $_SERVER['REQUEST_TIME']  - (4*_RENOUVELLE_ALEA); // 48h par defaut
+            $t_short = $_SERVER['REQUEST_TIME']  - max(_RENOUVELLE_ALEA/4,3*3600); // 3h par defaut
+            $t = time() - (4 * _RENOUVELLE_ALEA);
+            while (($f = readdir($dir)) !== false) {
+                $nb_files++;
+                if (preg_match(",^[^\d-]*(-?\d+)_\w{32}\.php[3]?$,", $f, $regs)) {
+                    $f = _DIR_SESSIONS . $f;
+                    if (($actives and $regs[1] == $id_auteur) or ($t > filemtime($f))) {
+                        spip_unlink($f);
+                    }
+                    // si il y a trop de sessions ouvertes, on purge les sessions anonymes de plus de 3H
+                    // cf http://core.spip.org/issues/3276
+                    elseif ($nb_files>$nb_max_files and !intval($regs[1]) and ($t_short > filemtime($f))) {
+                        spip_unlink($f);
+                    }
+                }
+            }
+        }
+    } else {
+        verifier_session();
+        spip_unlink(fichier_session('alea_ephemere', true));
+    }
+
+    // forcer le recalcul de la session courante
+    spip_session(true);
 }
 
 /**
@@ -124,122 +124,122 @@ 
  * @return bool|string
  */
 function ajouter_session($auteur) {
-	// Si le client a deja une session valide pour son id_auteur
-	// on conserve le meme fichier
-
-	// Attention un visiteur peut avoir une session et un id=0,
-	// => ne pas melanger les sessions des differents visiteurs
-	$id_auteur = isset($auteur['id_auteur']) ? intval($auteur['id_auteur']) : 0;
-
-	// Si ce n'est pas un inscrit (les inscrits ont toujours des choses en session)
-	// on va vérifier s'il y a vraiment des choses à écrire
-	if (!$id_auteur) {
-		// On supprime les données de base pour voir le contenu réel de la session
-		$auteur_verif = $auteur;
-		if (isset($auteur_verif['id_auteur'])) {
-			unset($auteur_verif['id_auteur']);
-		}
-		if (isset($auteur_verif['hash_env'])) {
-			unset($auteur_verif['hash_env']);
-		}
-		if (isset($auteur_verif['ip_change'])) {
-			unset($auteur_verif['ip_change']);
-		}
-		if (isset($auteur_verif['date_session'])) {
-			unset($auteur_verif['date_session']);
-		}
-
-		// Les variables vraiment nulle ne sont pas à prendre en compte non plus
-		foreach ($auteur_verif as $variable => $valeur) {
-			if ($valeur === null) {
-				unset($auteur_verif[$variable]);
-			}
-		}
-
-		// Si après ça la session est vide alors on supprime l'éventuel fichier et on arrête là
-		if (!$auteur_verif) {
-			if (isset($_COOKIE['spip_session']) and isset($_SESSION[$_COOKIE['spip_session']])) {
-				unset($_SESSION[$_COOKIE['spip_session']]);
-			}
-			if (isset($_COOKIE['spip_session'])) {
-				unset($_COOKIE['spip_session']);
-			}
-
-			return false;
-		}
-	}
-
-	if (!isset($_COOKIE['spip_session'])
-		or !preg_match(',^' . $id_auteur . '_,', $_COOKIE['spip_session'])
-	) {
-		$_COOKIE['spip_session'] = $id_auteur . '_' . md5(uniqid(rand(), true));
-	}
-
-	// Maintenant on sait qu'on a des choses à écrire
-	// On s'assure d'avoir au moins ces valeurs
-	$auteur['id_auteur'] = $id_auteur;
-	if (!isset($auteur['hash_env'])) {
-		$auteur['hash_env'] = hash_env();
-	}
-	if (!isset($auteur['ip_change'])) {
-		$auteur['ip_change'] = false;
-	}
-
-	if (!isset($auteur['date_session'])) {
-		$auteur['date_session'] = time();
-	}
-	if (isset($auteur['prefs'])
-		and is_string($auteur['prefs'])
-	  and $prefs = @unserialize($auteur['prefs'])) {
-		$auteur['prefs'] = $prefs;
-	}
-
-	$fichier_session = "";
-
-	// les sessions anonymes sont stockees dans $_SESSION
-	if (!$id_auteur) {
-		spip_php_session_start();
-		$_SESSION[$_COOKIE['spip_session']] = preparer_ecriture_session($auteur);
-	} else {
-		$fichier_session = fichier_session('alea_ephemere');
-		if (!ecrire_fichier_session($fichier_session, $auteur)) {
-			spip_log('Echec ecriture fichier session ' . $fichier_session, "session" . _LOG_HS);
-			include_spip('inc/minipres');
-			echo minipres();
-			exit;
-		}
-		// verifier et limiter le nombre maxi de sessions
-		// https://core.spip.net/issues/3807
-		lister_sessions_auteur($id_auteur);
-	}
-
-	// poser le cookie de session SPIP
-	include_spip('inc/cookie');
-	$duree = definir_duree_cookie_session($auteur);
-	spip_setcookie( 'spip_session', $_COOKIE['spip_session'], [
-		'expires' => time() + $duree
-	]);
-	spip_log("ajoute session $fichier_session cookie $duree", "session");
-
-	// Si on est admin, poser le cookie de correspondance
-	if (!function_exists('autoriser')) {
-		include_spip('inc/autoriser');
-	}
-	if (autoriser('ecrire','','',$auteur) and _DUREE_COOKIE_ADMIN) {
-		spip_setcookie('spip_admin', '@' . ($auteur['email'] ?: $auteur['login']), [
-			'expires' => time() + max(_DUREE_COOKIE_ADMIN, $duree)
-		]);
-	} // sinon le supprimer ...
-	else {
-		spip_setcookie('spip_admin', '', [
-			'expires' => 1
-		]);
-	}
-
-	# on en profite pour purger les vieilles sessions anonymes abandonnees
-	# supprimer_sessions(0, true, false);
-
-	return $_COOKIE['spip_session'];
+    // Si le client a deja une session valide pour son id_auteur
+    // on conserve le meme fichier
+
+    // Attention un visiteur peut avoir une session et un id=0,
+    // => ne pas melanger les sessions des differents visiteurs
+    $id_auteur = isset($auteur['id_auteur']) ? intval($auteur['id_auteur']) : 0;
+
+    // Si ce n'est pas un inscrit (les inscrits ont toujours des choses en session)
+    // on va vérifier s'il y a vraiment des choses à écrire
+    if (!$id_auteur) {
+        // On supprime les données de base pour voir le contenu réel de la session
+        $auteur_verif = $auteur;
+        if (isset($auteur_verif['id_auteur'])) {
+            unset($auteur_verif['id_auteur']);
+        }
+        if (isset($auteur_verif['hash_env'])) {
+            unset($auteur_verif['hash_env']);
+        }
+        if (isset($auteur_verif['ip_change'])) {
+            unset($auteur_verif['ip_change']);
+        }
+        if (isset($auteur_verif['date_session'])) {
+            unset($auteur_verif['date_session']);
+        }
+
+        // Les variables vraiment nulle ne sont pas à prendre en compte non plus
+        foreach ($auteur_verif as $variable => $valeur) {
+            if ($valeur === null) {
+                unset($auteur_verif[$variable]);
+            }
+        }
+
+        // Si après ça la session est vide alors on supprime l'éventuel fichier et on arrête là
+        if (!$auteur_verif) {
+            if (isset($_COOKIE['spip_session']) and isset($_SESSION[$_COOKIE['spip_session']])) {
+                unset($_SESSION[$_COOKIE['spip_session']]);
+            }
+            if (isset($_COOKIE['spip_session'])) {
+                unset($_COOKIE['spip_session']);
+            }
+
+            return false;
+        }
+    }
+
+    if (!isset($_COOKIE['spip_session'])
+        or !preg_match(',^' . $id_auteur . '_,', $_COOKIE['spip_session'])
+    ) {
+        $_COOKIE['spip_session'] = $id_auteur . '_' . md5(uniqid(rand(), true));
+    }
+
+    // Maintenant on sait qu'on a des choses à écrire
+    // On s'assure d'avoir au moins ces valeurs
+    $auteur['id_auteur'] = $id_auteur;
+    if (!isset($auteur['hash_env'])) {
+        $auteur['hash_env'] = hash_env();
+    }
+    if (!isset($auteur['ip_change'])) {
+        $auteur['ip_change'] = false;
+    }
+
+    if (!isset($auteur['date_session'])) {
+        $auteur['date_session'] = time();
+    }
+    if (isset($auteur['prefs'])
+        and is_string($auteur['prefs'])
+      and $prefs = @unserialize($auteur['prefs'])) {
+        $auteur['prefs'] = $prefs;
+    }
+
+    $fichier_session = "";
+
+    // les sessions anonymes sont stockees dans $_SESSION
+    if (!$id_auteur) {
+        spip_php_session_start();
+        $_SESSION[$_COOKIE['spip_session']] = preparer_ecriture_session($auteur);
+    } else {
+        $fichier_session = fichier_session('alea_ephemere');
+        if (!ecrire_fichier_session($fichier_session, $auteur)) {
+            spip_log('Echec ecriture fichier session ' . $fichier_session, "session" . _LOG_HS);
+            include_spip('inc/minipres');
+            echo minipres();
+            exit;
+        }
+        // verifier et limiter le nombre maxi de sessions
+        // https://core.spip.net/issues/3807
+        lister_sessions_auteur($id_auteur);
+    }
+
+    // poser le cookie de session SPIP
+    include_spip('inc/cookie');
+    $duree = definir_duree_cookie_session($auteur);
+    spip_setcookie( 'spip_session', $_COOKIE['spip_session'], [
+        'expires' => time() + $duree
+    ]);
+    spip_log("ajoute session $fichier_session cookie $duree", "session");
+
+    // Si on est admin, poser le cookie de correspondance
+    if (!function_exists('autoriser')) {
+        include_spip('inc/autoriser');
+    }
+    if (autoriser('ecrire','','',$auteur) and _DUREE_COOKIE_ADMIN) {
+        spip_setcookie('spip_admin', '@' . ($auteur['email'] ?: $auteur['login']), [
+            'expires' => time() + max(_DUREE_COOKIE_ADMIN, $duree)
+        ]);
+    } // sinon le supprimer ...
+    else {
+        spip_setcookie('spip_admin', '', [
+            'expires' => 1
+        ]);
+    }
+
+    # on en profite pour purger les vieilles sessions anonymes abandonnees
+    # supprimer_sessions(0, true, false);
+
+    return $_COOKIE['spip_session'];
 }
 
 /**
@@ -259,15 +259,15 @@ 
  *     Durée en secondes
 **/
 function definir_duree_cookie_session($auteur) {
-	$coef = 2;
-	if (isset($auteur['cookie'])) {
-		if (is_numeric($auteur['cookie'])) {
-			$coef = $auteur['cookie'];
-		} else {
-			$coef = 20;
-		}
-	}
-	return (int)(_RENOUVELLE_ALEA * $coef);
+    $coef = 2;
+    if (isset($auteur['cookie'])) {
+        if (is_numeric($auteur['cookie'])) {
+            $coef = $auteur['cookie'];
+        } else {
+            $coef = 20;
+        }
+    }
+    return (int)(_RENOUVELLE_ALEA * $coef);
 }
 
 /**
@@ -287,90 +287,90 @@ 
  * @return bool|int|null
  */
 function verifier_session($change = false) {
-	// si pas de cookie, c'est fichu
-	if (!isset($_COOKIE['spip_session'])) {
-		return false;
-	}
-
-	$fichier_session = "";
-
-	// est-ce une session anonyme ?
-	if (!intval($_COOKIE['spip_session'])) {
-		spip_php_session_start();
-		if (!isset($_SESSION[$_COOKIE['spip_session']]) or !is_array($_SESSION[$_COOKIE['spip_session']])) {
-			return false;
-		}
-		$GLOBALS['visiteur_session'] = $_SESSION[$_COOKIE['spip_session']];
-	} else {
-		// Tester avec alea courant
-		$fichier_session = fichier_session('alea_ephemere', true);
-		if ($fichier_session and @file_exists($fichier_session)) {
-			include($fichier_session);
-		} else {
-			// Sinon, tester avec alea precedent
-			$fichier_session = fichier_session('alea_ephemere_ancien', true);
-			if (!$fichier_session or !@file_exists($fichier_session)) {
-				return false;
-			}
-
-			// Renouveler la session avec l'alea courant
-			include($fichier_session);
-			spip_log('renouvelle session ' . $GLOBALS['visiteur_session']['id_auteur'], "session");
-			spip_unlink($fichier_session);
-			ajouter_session($GLOBALS['visiteur_session']);
-		}
-	}
-
-	// Compatibilite ascendante : auteur_session est visiteur_session si
-	// c'est un auteur SPIP authentifie (tandis qu'un visiteur_session peut
-	// n'etre qu'identifie, sans aucune authentification).
-
-	if (isset($GLOBALS['visiteur_session']['id_auteur']) and $GLOBALS['visiteur_session']['id_auteur']) {
-		$GLOBALS['auteur_session'] = &$GLOBALS['visiteur_session'];
-	}
-
-
-	// Si l'adresse IP change, inc/presentation mettra une balise image
-	// avec un URL de rappel demandant a changer le nom de la session.
-	// Seul celui qui a l'IP d'origine est rejoue
-	// ainsi un eventuel voleur de cookie ne pourrait pas deconnecter
-	// sa victime, mais se ferait deconnecter par elle.
-	if (hash_env() != $GLOBALS['visiteur_session']['hash_env']) {
-		if (!$GLOBALS['visiteur_session']['ip_change']) {
-			define('_SESSION_REJOUER', true);
-			$GLOBALS['visiteur_session']['ip_change'] = true;
-			ajouter_session($GLOBALS['visiteur_session']);
-		} else {
-			if ($change) {
-				spip_log("session non rejouee, vol de cookie ?", "session");
-			}
-		}
-	} else {
-		if ($change) {
-			spip_log("rejoue session $fichier_session " . $_COOKIE['spip_session'], "session");
-			if ($fichier_session) {
-				spip_unlink($fichier_session);
-			}
-			$GLOBALS['visiteur_session']['ip_change'] = false;
-			unset($_COOKIE['spip_session']);
-			ajouter_session($GLOBALS['visiteur_session']);
-		}
-	}
-
-	// Si la session a ete initiee il y a trop longtemps, elle est annulee
-	if (isset($GLOBALS['visiteur_session'])
-		and defined('_AGE_SESSION_MAX')
-		and _AGE_SESSION_MAX > 0
-		and time() - @$GLOBALS['visiteur_session']['date_session'] > _AGE_SESSION_MAX
-	) {
-		unset($GLOBALS['visiteur_session']);
-
-		return false;
-	}
-
-	return is_numeric($GLOBALS['visiteur_session']['id_auteur'])
-		? $GLOBALS['visiteur_session']['id_auteur']
-		: null;
+    // si pas de cookie, c'est fichu
+    if (!isset($_COOKIE['spip_session'])) {
+        return false;
+    }
+
+    $fichier_session = "";
+
+    // est-ce une session anonyme ?
+    if (!intval($_COOKIE['spip_session'])) {
+        spip_php_session_start();
+        if (!isset($_SESSION[$_COOKIE['spip_session']]) or !is_array($_SESSION[$_COOKIE['spip_session']])) {
+            return false;
+        }
+        $GLOBALS['visiteur_session'] = $_SESSION[$_COOKIE['spip_session']];
+    } else {
+        // Tester avec alea courant
+        $fichier_session = fichier_session('alea_ephemere', true);
+        if ($fichier_session and @file_exists($fichier_session)) {
+            include($fichier_session);
+        } else {
+            // Sinon, tester avec alea precedent
+            $fichier_session = fichier_session('alea_ephemere_ancien', true);
+            if (!$fichier_session or !@file_exists($fichier_session)) {
+                return false;
+            }
+
+            // Renouveler la session avec l'alea courant
+            include($fichier_session);
+            spip_log('renouvelle session ' . $GLOBALS['visiteur_session']['id_auteur'], "session");
+            spip_unlink($fichier_session);
+            ajouter_session($GLOBALS['visiteur_session']);
+        }
+    }
+
+    // Compatibilite ascendante : auteur_session est visiteur_session si
+    // c'est un auteur SPIP authentifie (tandis qu'un visiteur_session peut
+    // n'etre qu'identifie, sans aucune authentification).
+
+    if (isset($GLOBALS['visiteur_session']['id_auteur']) and $GLOBALS['visiteur_session']['id_auteur']) {
+        $GLOBALS['auteur_session'] = &$GLOBALS['visiteur_session'];
+    }
+
+
+    // Si l'adresse IP change, inc/presentation mettra une balise image
+    // avec un URL de rappel demandant a changer le nom de la session.
+    // Seul celui qui a l'IP d'origine est rejoue
+    // ainsi un eventuel voleur de cookie ne pourrait pas deconnecter
+    // sa victime, mais se ferait deconnecter par elle.
+    if (hash_env() != $GLOBALS['visiteur_session']['hash_env']) {
+        if (!$GLOBALS['visiteur_session']['ip_change']) {
+            define('_SESSION_REJOUER', true);
+            $GLOBALS['visiteur_session']['ip_change'] = true;
+            ajouter_session($GLOBALS['visiteur_session']);
+        } else {
+            if ($change) {
+                spip_log("session non rejouee, vol de cookie ?", "session");
+            }
+        }
+    } else {
+        if ($change) {
+            spip_log("rejoue session $fichier_session " . $_COOKIE['spip_session'], "session");
+            if ($fichier_session) {
+                spip_unlink($fichier_session);
+            }
+            $GLOBALS['visiteur_session']['ip_change'] = false;
+            unset($_COOKIE['spip_session']);
+            ajouter_session($GLOBALS['visiteur_session']);
+        }
+    }
+
+    // Si la session a ete initiee il y a trop longtemps, elle est annulee
+    if (isset($GLOBALS['visiteur_session'])
+        and defined('_AGE_SESSION_MAX')
+        and _AGE_SESSION_MAX > 0
+        and time() - @$GLOBALS['visiteur_session']['date_session'] > _AGE_SESSION_MAX
+    ) {
+        unset($GLOBALS['visiteur_session']);
+
+        return false;
+    }
+
+    return is_numeric($GLOBALS['visiteur_session']['id_auteur'])
+        ? $GLOBALS['visiteur_session']['id_auteur']
+        : null;
 }
 
 /**
@@ -385,7 +385,7 @@ 
  *     Valeur, si trouvée, `null` sinon.
  */
 function session_get($nom) {
-	return isset($GLOBALS['visiteur_session'][$nom]) ? $GLOBALS['visiteur_session'][$nom] : null;
+    return isset($GLOBALS['visiteur_session'][$nom]) ? $GLOBALS['visiteur_session'][$nom] : null;
 }
 
 
@@ -401,32 +401,32 @@ 
  * @return void|array
  */
 function session_set($nom, $val = null) {
-	static $remove = array();
-	static $actualiser_sessions = false;
-	if ($nom === false) {
-		return $remove;
-	}
-	if (is_null($val)) {
-		// rien a faire
-		if (!isset($GLOBALS['visiteur_session'][$nom])) {
-			return;
-		}
-		unset($GLOBALS['visiteur_session'][$nom]);
-		$remove[] = $nom;
-	} else {
-		// On ajoute la valeur dans la globale
-		$GLOBALS['visiteur_session'][$nom] = $val;
-		if ($remove) {
-			$remove = array_diff($remove, array($nom));
-		}
-	}
-	if (!$actualiser_sessions) {
-		// il faut creer la session si on en a pas, la premiere fois
-		ajouter_session($GLOBALS['visiteur_session']);
-		// in register la fonction qui mettra a jour toutes les sessions en fin de hit
-		register_shutdown_function('terminer_actualiser_sessions');
-		$actualiser_sessions = true;
-	}
+    static $remove = array();
+    static $actualiser_sessions = false;
+    if ($nom === false) {
+        return $remove;
+    }
+    if (is_null($val)) {
+        // rien a faire
+        if (!isset($GLOBALS['visiteur_session'][$nom])) {
+            return;
+        }
+        unset($GLOBALS['visiteur_session'][$nom]);
+        $remove[] = $nom;
+    } else {
+        // On ajoute la valeur dans la globale
+        $GLOBALS['visiteur_session'][$nom] = $val;
+        if ($remove) {
+            $remove = array_diff($remove, array($nom));
+        }
+    }
+    if (!$actualiser_sessions) {
+        // il faut creer la session si on en a pas, la premiere fois
+        ajouter_session($GLOBALS['visiteur_session']);
+        // in register la fonction qui mettra a jour toutes les sessions en fin de hit
+        register_shutdown_function('terminer_actualiser_sessions');
+        $actualiser_sessions = true;
+    }
 }
 
 /**
@@ -435,12 +435,12 @@ 
  * @uses actualiser_sessions()
  */
 function terminer_actualiser_sessions() {
-	// se remettre dans le dossier de travail au cas ou Apache a change
-	chdir(_ROOT_CWD);
-	// recuperer les variables a effacer
-	$remove = session_set(false);
-	// mettre a jour toutes les sessions
-	actualiser_sessions($GLOBALS['visiteur_session'], $remove);
+    // se remettre dans le dossier de travail au cas ou Apache a change
+    chdir(_ROOT_CWD);
+    // recuperer les variables a effacer
+    $remove = session_set(false);
+    // mettre a jour toutes les sessions
+    actualiser_sessions($GLOBALS['visiteur_session'], $remove);
 }
 
 
@@ -465,82 +465,82 @@ 
  */
 function actualiser_sessions($auteur, $supprimer_cles = array()) {
 
-	$id_auteur = isset($auteur['id_auteur']) ? intval($auteur['id_auteur']) : 0;
-	$id_auteur_courant = isset($GLOBALS['visiteur_session']['id_auteur']) ? intval($GLOBALS['visiteur_session']['id_auteur']) : 0;
-
-	// si l'auteur est celui de la session courante, verifier/creer la session si besoin
-	$fichier_session_courante = "";
-	if ($id_auteur == $id_auteur_courant) {
-		$auteur = array_merge($GLOBALS['visiteur_session'], $auteur);
-		ajouter_session($auteur);
-		if ($id_auteur) {
-			$fichier_session_courante = fichier_session('alea_ephemere');
-		}
-	}
-
-	// si session anonyme on ne fait rien d'autre ici : les sessions anonymes sont non partagees
-	if (!$id_auteur) {
-		return;
-	}
-
-	// les préférences sont désérialisées, toujours.
-	// [fixme] Le champ 'prefs' sert aussi à l’inscription
-	if (isset($auteur['prefs']) and is_string($auteur['prefs'])) {
-		$auteur['prefs'] = @unserialize($auteur['prefs']);
-		if (!is_array($auteur['prefs'])) {
-			$auteur['prefs'] = [];
-		}
-	}
-
-	// memoriser l'auteur courant (celui qui modifie la fiche)
-	$sauve = $GLOBALS['visiteur_session'];
-
-	// .. mettre a jour les sessions de l'auteur cible
-	// attention au $ final pour ne pas risquer d'embarquer un .php.jeton temporaire
-	// cree par une ecriture concurente d'une session (fichier atomique temporaire)
-	$sessions = lister_sessions_auteur($id_auteur);
-
-	// 1ere passe : lire et fusionner les sessions
-	foreach ($sessions as $session) {
-		$GLOBALS['visiteur_session'] = array();
-		// a pu etre supprime entre le preg initial et le moment ou l'on arrive la (concurrence)
-		if ($session !== $fichier_session_courante
-			and @file_exists($session)
-		) {
-			include $session; # $GLOBALS['visiteur_session'] est alors l'auteur cible
-
-			$auteur = array_merge($GLOBALS['visiteur_session'], $auteur);
-		}
-	}
-
-	// supprimer les eventuelles cles dont on ne veut plus
-	foreach ($supprimer_cles as $cle) {
-		unset($auteur[$cle]);
-	}
-
-	$auteur_session = preparer_ecriture_session($auteur);
-
-	// seconde passe : ecrire les sessions qui ne sont pas a jour
-	foreach ($sessions as $session) {
-		$GLOBALS['visiteur_session'] = array();
-		// a pu etre supprime entre le preg initial et le moment ou l'on arrive la (concurrence)
-		if (@file_exists($session)) {
-			include $session; # $GLOBALS['visiteur_session'] est alors l'auteur cible
-
-			// est-ce que cette session est a mettre a jour ?
-			if ($auteur_session != $GLOBALS['visiteur_session']) {
-				ecrire_fichier_session($session, $auteur);
-			}
-		}
-	}
-
-	if ($id_auteur == $id_auteur_courant) {
-		$GLOBALS['visiteur_session'] = $auteur;
-		$GLOBALS['auteur_session'] = &$GLOBALS['visiteur_session'];
-	} else {
-		// restaurer l'auteur courant
-		$GLOBALS['visiteur_session'] = $sauve;
-	}
+    $id_auteur = isset($auteur['id_auteur']) ? intval($auteur['id_auteur']) : 0;
+    $id_auteur_courant = isset($GLOBALS['visiteur_session']['id_auteur']) ? intval($GLOBALS['visiteur_session']['id_auteur']) : 0;
+
+    // si l'auteur est celui de la session courante, verifier/creer la session si besoin
+    $fichier_session_courante = "";
+    if ($id_auteur == $id_auteur_courant) {
+        $auteur = array_merge($GLOBALS['visiteur_session'], $auteur);
+        ajouter_session($auteur);
+        if ($id_auteur) {
+            $fichier_session_courante = fichier_session('alea_ephemere');
+        }
+    }
+
+    // si session anonyme on ne fait rien d'autre ici : les sessions anonymes sont non partagees
+    if (!$id_auteur) {
+        return;
+    }
+
+    // les préférences sont désérialisées, toujours.
+    // [fixme] Le champ 'prefs' sert aussi à l’inscription
+    if (isset($auteur['prefs']) and is_string($auteur['prefs'])) {
+        $auteur['prefs'] = @unserialize($auteur['prefs']);
+        if (!is_array($auteur['prefs'])) {
+            $auteur['prefs'] = [];
+        }
+    }
+
+    // memoriser l'auteur courant (celui qui modifie la fiche)
+    $sauve = $GLOBALS['visiteur_session'];
+
+    // .. mettre a jour les sessions de l'auteur cible
+    // attention au $ final pour ne pas risquer d'embarquer un .php.jeton temporaire
+    // cree par une ecriture concurente d'une session (fichier atomique temporaire)
+    $sessions = lister_sessions_auteur($id_auteur);
+
+    // 1ere passe : lire et fusionner les sessions
+    foreach ($sessions as $session) {
+        $GLOBALS['visiteur_session'] = array();
+        // a pu etre supprime entre le preg initial et le moment ou l'on arrive la (concurrence)
+        if ($session !== $fichier_session_courante
+            and @file_exists($session)
+        ) {
+            include $session; # $GLOBALS['visiteur_session'] est alors l'auteur cible
+
+            $auteur = array_merge($GLOBALS['visiteur_session'], $auteur);
+        }
+    }
+
+    // supprimer les eventuelles cles dont on ne veut plus
+    foreach ($supprimer_cles as $cle) {
+        unset($auteur[$cle]);
+    }
+
+    $auteur_session = preparer_ecriture_session($auteur);
+
+    // seconde passe : ecrire les sessions qui ne sont pas a jour
+    foreach ($sessions as $session) {
+        $GLOBALS['visiteur_session'] = array();
+        // a pu etre supprime entre le preg initial et le moment ou l'on arrive la (concurrence)
+        if (@file_exists($session)) {
+            include $session; # $GLOBALS['visiteur_session'] est alors l'auteur cible
+
+            // est-ce que cette session est a mettre a jour ?
+            if ($auteur_session != $GLOBALS['visiteur_session']) {
+                ecrire_fichier_session($session, $auteur);
+            }
+        }
+    }
+
+    if ($id_auteur == $id_auteur_courant) {
+        $GLOBALS['visiteur_session'] = $auteur;
+        $GLOBALS['auteur_session'] = &$GLOBALS['visiteur_session'];
+    } else {
+        // restaurer l'auteur courant
+        $GLOBALS['visiteur_session'] = $sauve;
+    }
 
 }
 
@@ -555,46 +555,46 @@ 
  */
 function lister_sessions_auteur($id_auteur, $nb_max = null) {
 
-	if (is_null($nb_max)) {
-		if (!defined('_NB_SESSIONS_MAX')) {
-			define('_NB_SESSIONS_MAX', 100);
-		}
-		$nb_max = _NB_SESSIONS_MAX;
-	}
-
-	// liste des sessions
-	$sessions = preg_files(_DIR_SESSIONS, '/' . $id_auteur . '_.*\.php$');
-
-	// si on en a plus que la limite, supprimer les plus vieilles
-	// si ce ne sont pas des sessions anonymes car elles sont alors chacune differentes
-	if ($id_auteur
-		and count($sessions) > $nb_max) {
-
-		// limiter le nombre de sessions ouvertes par un auteur
-		// filemtime sur les sessions
-		$sessions = array_flip($sessions);
-
-		// 1ere passe : lire les filemtime
-		foreach ($sessions as $session => $z) {
-			if ($d = @filemtime($session)
-			) {
-				$sessions[$session] = $d;
-			} else {
-				$sessions[$session] = 0;
-			}
-		}
-
-		// les plus anciennes en premier
-		asort($sessions);
-
-		$sessions = array_keys($sessions);
-		while (count($sessions) > $nb_max) {
-			$session = array_shift($sessions);
-			@unlink($session);
-		}
-	}
-
-	return $sessions;
+    if (is_null($nb_max)) {
+        if (!defined('_NB_SESSIONS_MAX')) {
+            define('_NB_SESSIONS_MAX', 100);
+        }
+        $nb_max = _NB_SESSIONS_MAX;
+    }
+
+    // liste des sessions
+    $sessions = preg_files(_DIR_SESSIONS, '/' . $id_auteur . '_.*\.php$');
+
+    // si on en a plus que la limite, supprimer les plus vieilles
+    // si ce ne sont pas des sessions anonymes car elles sont alors chacune differentes
+    if ($id_auteur
+        and count($sessions) > $nb_max) {
+
+        // limiter le nombre de sessions ouvertes par un auteur
+        // filemtime sur les sessions
+        $sessions = array_flip($sessions);
+
+        // 1ere passe : lire les filemtime
+        foreach ($sessions as $session => $z) {
+            if ($d = @filemtime($session)
+            ) {
+                $sessions[$session] = $d;
+            } else {
+                $sessions[$session] = 0;
+            }
+        }
+
+        // les plus anciennes en premier
+        asort($sessions);
+
+        $sessions = array_keys($sessions);
+        while (count($sessions) > $nb_max) {
+            $session = array_shift($sessions);
+            @unlink($session);
+        }
+    }
+
+    return $sessions;
 }
 
 
@@ -608,26 +608,26 @@ 
  * @return array
  */
 function preparer_ecriture_session($auteur) {
-	$row = $auteur;
-
-	// ne pas enregistrer ces elements de securite
-	// dans le fichier de session
-	unset($auteur['pass']);
-	unset($auteur['htpass']);
-	unset($auteur['low_sec']);
-	unset($auteur['alea_actuel']);
-	unset($auteur['alea_futur']);
-
-	$auteur = pipeline('preparer_fichier_session', array('args' => array('row' => $row), 'data' => $auteur));
-
-	// ne pas enregistrer les valeurs vraiment nulle dans le fichier
-	foreach ($auteur as $variable => $valeur) {
-		if ($valeur === null) {
-			unset($auteur[$variable]);
-		}
-	}
-
-	return $auteur;
+    $row = $auteur;
+
+    // ne pas enregistrer ces elements de securite
+    // dans le fichier de session
+    unset($auteur['pass']);
+    unset($auteur['htpass']);
+    unset($auteur['low_sec']);
+    unset($auteur['alea_actuel']);
+    unset($auteur['alea_futur']);
+
+    $auteur = pipeline('preparer_fichier_session', array('args' => array('row' => $row), 'data' => $auteur));
+
+    // ne pas enregistrer les valeurs vraiment nulle dans le fichier
+    foreach ($auteur as $variable => $valeur) {
+        if ($valeur === null) {
+            unset($auteur[$variable]);
+        }
+    }
+
+    return $auteur;
 }
 
 /**
@@ -639,17 +639,17 @@ 
  */
 function ecrire_fichier_session($fichier, $auteur) {
 
-	$auteur = preparer_ecriture_session($auteur);
+    $auteur = preparer_ecriture_session($auteur);
 
-	// enregistrer les autres donnees du visiteur
-	$texte = "<" . "?php\n";
-	foreach ($auteur as $var => $val) {
-		$texte .= '$GLOBALS[\'visiteur_session\'][' . var_export($var, true) . '] = '
-			. var_export($val, true) . ";\n";
-	}
-	$texte .= "?" . ">\n";
+    // enregistrer les autres donnees du visiteur
+    $texte = "<" . "?php\n";
+    foreach ($auteur as $var => $val) {
+        $texte .= '$GLOBALS[\'visiteur_session\'][' . var_export($var, true) . '] = '
+            . var_export($val, true) . ";\n";
+    }
+    $texte .= "?" . ">\n";
 
-	return ecrire_fichier($fichier, $texte);
+    return ecrire_fichier($fichier, $texte);
 }
 
 
@@ -662,23 +662,23 @@ 
  */
 function fichier_session($alea, $tantpis = false) {
 
-	include_spip('inc/acces');
-	charger_aleas();
+    include_spip('inc/acces');
+    charger_aleas();
 
-	if (empty($GLOBALS['meta'][$alea])) {
-		if (!$tantpis) {
-			spip_log("fichier session ($tantpis): $alea indisponible", "session");
-			include_spip('inc/minipres');
-			echo minipres();
-		}
+    if (empty($GLOBALS['meta'][$alea])) {
+        if (!$tantpis) {
+            spip_log("fichier session ($tantpis): $alea indisponible", "session");
+            include_spip('inc/minipres');
+            echo minipres();
+        }
 
-		return ''; // echec mais $tanpis
-	} else {
-		$repertoire = sous_repertoire(_DIR_SESSIONS, '', false, $tantpis);
-		$c = $_COOKIE['spip_session'];
+        return ''; // echec mais $tanpis
+    } else {
+        $repertoire = sous_repertoire(_DIR_SESSIONS, '', false, $tantpis);
+        $c = $_COOKIE['spip_session'];
 
-		return $repertoire . intval($c) . '_' . md5($c . ' ' . $GLOBALS['meta'][$alea]) . '.php';
-	}
+        return $repertoire . intval($c) . '_' . md5($c . ' ' . $GLOBALS['meta'][$alea]) . '.php';
+    }
 }
 
 
@@ -695,7 +695,7 @@ 
  * @return string
  */
 function rejouer_session() {
-	return '<img src="' . generer_url_action('cookie', 'change_session=oui', true) . '" width="0" height="0" alt="" />';
+    return '<img src="' . generer_url_action('cookie', 'change_session=oui', true) . '" width="0" height="0" alt="" />';
 }
 
 
@@ -705,12 +705,12 @@ 
  * @return string
  */
 function hash_env() {
-	static $res = '';
-	if ($res) {
-		return $res;
-	}
+    static $res = '';
+    if ($res) {
+        return $res;
+    }
 
-	return $res = md5($GLOBALS['ip'] . (isset($_SERVER['HTTP_USER_AGENT']) ? $_SERVER['HTTP_USER_AGENT'] : ''));
+    return $res = md5($GLOBALS['ip'] . (isset($_SERVER['HTTP_USER_AGENT']) ? $_SERVER['HTTP_USER_AGENT'] : ''));
 }
 
 
@@ -722,11 +722,11 @@ 
  * @return bool True si une session PHP est ouverte.
  **/
 function spip_php_session_start() {
-	if (!is_php_session_started()) {
-		return session_start();
-	}
+    if (!is_php_session_started()) {
+        return session_start();
+    }
 
-	return true;
+    return true;
 }
 
 /**
@@ -736,9 +736,9 @@ 
  * @return bool true si une session PHP est active
  **/
 function is_php_session_started() {
-	if (php_sapi_name() !== 'cli') {
-		return session_status() === PHP_SESSION_ACTIVE ? true : false;
-	}
+    if (php_sapi_name() !== 'cli') {
+        return session_status() === PHP_SESSION_ACTIVE ? true : false;
+    }
 
-	return false;
+    return false;
 }

Spacing +21 added lines, -21 removed lines

@@ -82,19 +82,19 @@ 
 	spip_log("supprimer sessions auteur $id_auteur", "session");
 	if ($toutes or $id_auteur !== $GLOBALS['visiteur_session']['id_auteur']) {
 		if ($dir = opendir(_DIR_SESSIONS)) {
-			$t = $_SERVER['REQUEST_TIME']  - (4*_RENOUVELLE_ALEA); // 48h par defaut
-			$t_short = $_SERVER['REQUEST_TIME']  - max(_RENOUVELLE_ALEA/4,3*3600); // 3h par defaut
+			$t = $_SERVER['REQUEST_TIME'] - (4 * _RENOUVELLE_ALEA); // 48h par defaut
+			$t_short = $_SERVER['REQUEST_TIME'] - max(_RENOUVELLE_ALEA / 4, 3 * 3600); // 3h par defaut
 			$t = time() - (4 * _RENOUVELLE_ALEA);
 			while (($f = readdir($dir)) !== false) {
 				$nb_files++;
 				if (preg_match(",^[^\d-]*(-?\d+)_\w{32}\.php[3]?$,", $f, $regs)) {
-					$f = _DIR_SESSIONS . $f;
+					$f = _DIR_SESSIONS.$f;
 					if (($actives and $regs[1] == $id_auteur) or ($t > filemtime($f))) {
 						spip_unlink($f);
 					}
 					// si il y a trop de sessions ouvertes, on purge les sessions anonymes de plus de 3H
 					// cf http://core.spip.org/issues/3276
-					elseif ($nb_files>$nb_max_files and !intval($regs[1]) and ($t_short > filemtime($f))) {
+					elseif ($nb_files > $nb_max_files and !intval($regs[1]) and ($t_short > filemtime($f))) {
 						spip_unlink($f);
 					}
 				}
@@ -170,9 +170,9 @@ 
 	}
 
 	if (!isset($_COOKIE['spip_session'])
-		or !preg_match(',^' . $id_auteur . '_,', $_COOKIE['spip_session'])
+		or !preg_match(',^'.$id_auteur.'_,', $_COOKIE['spip_session'])
 	) {
-		$_COOKIE['spip_session'] = $id_auteur . '_' . md5(uniqid(rand(), true));
+		$_COOKIE['spip_session'] = $id_auteur.'_'.md5(uniqid(rand(), true));
 	}
 
 	// Maintenant on sait qu'on a des choses à écrire
@@ -203,7 +203,7 @@ 
 	} else {
 		$fichier_session = fichier_session('alea_ephemere');
 		if (!ecrire_fichier_session($fichier_session, $auteur)) {
-			spip_log('Echec ecriture fichier session ' . $fichier_session, "session" . _LOG_HS);
+			spip_log('Echec ecriture fichier session '.$fichier_session, "session"._LOG_HS);
 			include_spip('inc/minipres');
 			echo minipres();
 			exit;
@@ -216,7 +216,7 @@ 
 	// poser le cookie de session SPIP
 	include_spip('inc/cookie');
 	$duree = definir_duree_cookie_session($auteur);
-	spip_setcookie( 'spip_session', $_COOKIE['spip_session'], [
+	spip_setcookie('spip_session', $_COOKIE['spip_session'], [
 		'expires' => time() + $duree
 	]);
 	spip_log("ajoute session $fichier_session cookie $duree", "session");
@@ -225,8 +225,8 @@ 
 	if (!function_exists('autoriser')) {
 		include_spip('inc/autoriser');
 	}
-	if (autoriser('ecrire','','',$auteur) and _DUREE_COOKIE_ADMIN) {
-		spip_setcookie('spip_admin', '@' . ($auteur['email'] ?: $auteur['login']), [
+	if (autoriser('ecrire', '', '', $auteur) and _DUREE_COOKIE_ADMIN) {
+		spip_setcookie('spip_admin', '@'.($auteur['email'] ?: $auteur['login']), [
 			'expires' => time() + max(_DUREE_COOKIE_ADMIN, $duree)
 		]);
 	} // sinon le supprimer ...
@@ -267,7 +267,7 @@ 
 			$coef = 20;
 		}
 	}
-	return (int)(_RENOUVELLE_ALEA * $coef);
+	return (int) (_RENOUVELLE_ALEA * $coef);
 }
 
 /**
@@ -315,7 +315,7 @@ 
 
 			// Renouveler la session avec l'alea courant
 			include($fichier_session);
-			spip_log('renouvelle session ' . $GLOBALS['visiteur_session']['id_auteur'], "session");
+			spip_log('renouvelle session '.$GLOBALS['visiteur_session']['id_auteur'], "session");
 			spip_unlink($fichier_session);
 			ajouter_session($GLOBALS['visiteur_session']);
 		}
@@ -347,7 +347,7 @@ 
 		}
 	} else {
 		if ($change) {
-			spip_log("rejoue session $fichier_session " . $_COOKIE['spip_session'], "session");
+			spip_log("rejoue session $fichier_session ".$_COOKIE['spip_session'], "session");
 			if ($fichier_session) {
 				spip_unlink($fichier_session);
 			}
@@ -563,7 +563,7 @@ 
 	}
 
 	// liste des sessions
-	$sessions = preg_files(_DIR_SESSIONS, '/' . $id_auteur . '_.*\.php$');
+	$sessions = preg_files(_DIR_SESSIONS, '/'.$id_auteur.'_.*\.php$');
 
 	// si on en a plus que la limite, supprimer les plus vieilles
 	// si ce ne sont pas des sessions anonymes car elles sont alors chacune differentes
@@ -642,12 +642,12 @@ 
 	$auteur = preparer_ecriture_session($auteur);
 
 	// enregistrer les autres donnees du visiteur
-	$texte = "<" . "?php\n";
+	$texte = "<"."?php\n";
 	foreach ($auteur as $var => $val) {
-		$texte .= '$GLOBALS[\'visiteur_session\'][' . var_export($var, true) . '] = '
-			. var_export($val, true) . ";\n";
+		$texte .= '$GLOBALS[\'visiteur_session\']['.var_export($var, true).'] = '
+			. var_export($val, true).";\n";
 	}
-	$texte .= "?" . ">\n";
+	$texte .= "?".">\n";
 
 	return ecrire_fichier($fichier, $texte);
 }
@@ -677,7 +677,7 @@ 
 		$repertoire = sous_repertoire(_DIR_SESSIONS, '', false, $tantpis);
 		$c = $_COOKIE['spip_session'];
 
-		return $repertoire . intval($c) . '_' . md5($c . ' ' . $GLOBALS['meta'][$alea]) . '.php';
+		return $repertoire.intval($c).'_'.md5($c.' '.$GLOBALS['meta'][$alea]).'.php';
 	}
 }
 
@@ -695,7 +695,7 @@ 
  * @return string
  */
 function rejouer_session() {
-	return '<img src="' . generer_url_action('cookie', 'change_session=oui', true) . '" width="0" height="0" alt="" />';
+	return '<img src="'.generer_url_action('cookie', 'change_session=oui', true).'" width="0" height="0" alt="" />';
 }
 
 
@@ -710,7 +710,7 @@ 
 		return $res;
 	}
 
-	return $res = md5($GLOBALS['ip'] . (isset($_SERVER['HTTP_USER_AGENT']) ? $_SERVER['HTTP_USER_AGENT'] : ''));
+	return $res = md5($GLOBALS['ip'].(isset($_SERVER['HTTP_USER_AGENT']) ? $_SERVER['HTTP_USER_AGENT'] : ''));
 }
 
 

ecrire/inc/cookie.php

Spacing +2 added lines, -2 removed lines

@@ -74,7 +74,7 @@ 
 		}
 	}
 
-	$name = preg_replace('/^spip_/', $GLOBALS['cookie_prefix'] . '_', $name);
+	$name = preg_replace('/^spip_/', $GLOBALS['cookie_prefix'].'_', $name);
 
 	// expires
 	if (!isset($options['expires'])) {
@@ -157,7 +157,7 @@ 
 	}
 	foreach ($_COOKIE as $name => $value) {
 		if (substr($name, 0, $prefix_long) == $cookie_prefix) {
-			$spipname = preg_replace('/^' . $cookie_prefix . '_/', 'spip_', $name);
+			$spipname = preg_replace('/^'.$cookie_prefix.'_/', 'spip_', $name);
 			$_COOKIE[$spipname] = $value;
 			$GLOBALS[$spipname] = $value;
 		}

Indentation +91 added lines, -91 removed lines

@@ -17,7 +17,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 
@@ -52,62 +52,62 @@ 
  *     cookie sécurisé ou non ?
  **/
 function spip_setcookie($name = '', $value = '', $options = []) {
-	static $to_secure_list = ['spip_session'];
-
-	if (!is_array($options)) {
-		// anciens paramètres :
-		# spip_setcookie($name = '', $value = '', $expire = 0, $path = 'AUTO', $domain = '', $secure = '')
-		$opt = func_get_args();
-		$opt = array_slice($opt, 2);
-		$options = []; # /!\ après le func_get_args (sinon $opt[0] référence la nouvelle valeur de $options !);
-		if (isset($opt[0])) {
-			$options['expires'] = $opt[0];
-		}
-		if (isset($opt[1])) {
-			$options['path'] = $opt[1];
-		}
-		if (isset($opt[2])) {
-			$options['domain'] = $opt[2];
-		}
-		if (isset($opt[3])) {
-			$options['secure'] = $opt[3];
-		}
-	}
-
-	$name = preg_replace('/^spip_/', $GLOBALS['cookie_prefix'] . '_', $name);
-
-	// expires
-	if (!isset($options['expires'])) {
-		$options['expires'] = 0;
-	}
-	if (!isset($options['path']) or $options['path'] === 'AUTO') {
-		if (defined('_COOKIE_PATH')) {
-			$options['path'] = _COOKIE_PATH;
-		} else {
-			$options['path'] = preg_replace(',^\w+://[^/]*,', '', url_de_base());
-		}
-	}
-	if (empty($options['domain']) and defined('_COOKIE_DOMAIN') and _COOKIE_DOMAIN) {
-		$options['domain'] = _COOKIE_DOMAIN;
-	}
-	if (in_array($name, $to_secure_list)) {
-		if (empty($options['secure']) and defined('_COOKIE_SECURE') and _COOKIE_SECURE) {
-			$options['secure'] = true;
-		}
-		if (empty($options['httponly'])) {
-			$options['httponly'] = true;
-		}
-	}
-	if (empty($options['samesite'])) {
-		$options['samesite'] = 'Lax';
-	}
-
-	#spip_log("cookie('$name', '$value', " . json_encode($options, true) . ")", "cookies");
-	$a = @setcookie($name, $value, $options);
-
-	spip_cookie_envoye(true);
-
-	return $a;
+    static $to_secure_list = ['spip_session'];
+
+    if (!is_array($options)) {
+        // anciens paramètres :
+        # spip_setcookie($name = '', $value = '', $expire = 0, $path = 'AUTO', $domain = '', $secure = '')
+        $opt = func_get_args();
+        $opt = array_slice($opt, 2);
+        $options = []; # /!\ après le func_get_args (sinon $opt[0] référence la nouvelle valeur de $options !);
+        if (isset($opt[0])) {
+            $options['expires'] = $opt[0];
+        }
+        if (isset($opt[1])) {
+            $options['path'] = $opt[1];
+        }
+        if (isset($opt[2])) {
+            $options['domain'] = $opt[2];
+        }
+        if (isset($opt[3])) {
+            $options['secure'] = $opt[3];
+        }
+    }
+
+    $name = preg_replace('/^spip_/', $GLOBALS['cookie_prefix'] . '_', $name);
+
+    // expires
+    if (!isset($options['expires'])) {
+        $options['expires'] = 0;
+    }
+    if (!isset($options['path']) or $options['path'] === 'AUTO') {
+        if (defined('_COOKIE_PATH')) {
+            $options['path'] = _COOKIE_PATH;
+        } else {
+            $options['path'] = preg_replace(',^\w+://[^/]*,', '', url_de_base());
+        }
+    }
+    if (empty($options['domain']) and defined('_COOKIE_DOMAIN') and _COOKIE_DOMAIN) {
+        $options['domain'] = _COOKIE_DOMAIN;
+    }
+    if (in_array($name, $to_secure_list)) {
+        if (empty($options['secure']) and defined('_COOKIE_SECURE') and _COOKIE_SECURE) {
+            $options['secure'] = true;
+        }
+        if (empty($options['httponly'])) {
+            $options['httponly'] = true;
+        }
+    }
+    if (empty($options['samesite'])) {
+        $options['samesite'] = 'Lax';
+    }
+
+    #spip_log("cookie('$name', '$value', " . json_encode($options, true) . ")", "cookies");
+    $a = @setcookie($name, $value, $options);
+
+    spip_cookie_envoye(true);
+
+    return $a;
 }
 
 /**
@@ -123,12 +123,12 @@ 
  * @return bool
  **/
 function spip_cookie_envoye($set = '') {
-	static $envoye = false;
-	if ($set) {
-		$envoye = true;
-	}
+    static $envoye = false;
+    if ($set) {
+        $envoye = true;
+    }
 
-	return $envoye;
+    return $envoye;
 }
 
 /**
@@ -147,21 +147,21 @@ 
  *     Préfixe des cookies de SPIP
  **/
 function recuperer_cookies_spip($cookie_prefix) {
-	$prefix_long = strlen($cookie_prefix);
-
-	foreach ($_COOKIE as $name => $value) {
-		if (substr($name, 0, 5) == 'spip_' && substr($name, 0, $prefix_long) != $cookie_prefix) {
-			unset($_COOKIE[$name]);
-			unset($GLOBALS[$name]);
-		}
-	}
-	foreach ($_COOKIE as $name => $value) {
-		if (substr($name, 0, $prefix_long) == $cookie_prefix) {
-			$spipname = preg_replace('/^' . $cookie_prefix . '_/', 'spip_', $name);
-			$_COOKIE[$spipname] = $value;
-			$GLOBALS[$spipname] = $value;
-		}
-	}
+    $prefix_long = strlen($cookie_prefix);
+
+    foreach ($_COOKIE as $name => $value) {
+        if (substr($name, 0, 5) == 'spip_' && substr($name, 0, $prefix_long) != $cookie_prefix) {
+            unset($_COOKIE[$name]);
+            unset($GLOBALS[$name]);
+        }
+    }
+    foreach ($_COOKIE as $name => $value) {
+        if (substr($name, 0, $prefix_long) == $cookie_prefix) {
+            $spipname = preg_replace('/^' . $cookie_prefix . '_/', 'spip_', $name);
+            $_COOKIE[$spipname] = $value;
+            $GLOBALS[$spipname] = $value;
+        }
+    }
 
 }
 
@@ -181,18 +181,18 @@ 
  *
  **/
 function exec_test_ajax_dist() {
-	switch (_request('js')) {
-		// on est appele par <noscript>
-		case -1:
-			spip_setcookie('spip_accepte_ajax', -1);
-			include_spip('inc/headers');
-			redirige_par_entete(chemin_image('erreur-xx.svg'));
-			break;
-
-		// ou par ajax
-		case 1:
-		default:
-			spip_setcookie('spip_accepte_ajax', 1);
-			break;
-	}
+    switch (_request('js')) {
+        // on est appele par <noscript>
+        case -1:
+            spip_setcookie('spip_accepte_ajax', -1);
+            include_spip('inc/headers');
+            redirige_par_entete(chemin_image('erreur-xx.svg'));
+            break;
+
+        // ou par ajax
+        case 1:
+        default:
+            spip_setcookie('spip_accepte_ajax', 1);
+            break;
+    }
 }