spip / SPIP

ecrire/inc/chercher_logo.php

Spacing +3 added lines, -3 removed lines

@@ -40,7 +40,7 @@ 
 	$mode = preg_replace(",\W,", '', $mode);
 	if ($mode) {
 		// chercher dans la base
-		$mode_document = 'logo' . $mode;
+		$mode_document = 'logo'.$mode;
 		$objet = objet_type($_id_objet);
 		$doc = sql_fetsel('D.*', 'spip_documents AS D JOIN spip_documents_liens AS L ON L.id_document=D.id_document', "D.mode=".sql_quote($mode_document)." AND L.objet=".sql_quote($objet)." AND id_objet=".intval($id));
 		if ($doc) {
@@ -52,10 +52,10 @@ 
 		if ($compat_old_logos) {
 			# attention au cas $id = '0' pour LOGO_SITE_SPIP : utiliser intval()
 			$type = type_du_logo($_id_objet);
-			$nom = $type . $mode . intval($id);
+			$nom = $type.$mode.intval($id);
 
 			foreach ($GLOBALS['formats_logos'] as $format) {
-				if (@file_exists($d = (_DIR_LOGOS . $nom . '.' . $format))) {
+				if (@file_exists($d = (_DIR_LOGOS.$nom.'.'.$format))) {
 					return array($d, _DIR_LOGOS, $nom, $format, @filemtime($d));
 				}
 			}

Indentation +33 added lines, -33 removed lines

@@ -16,7 +16,7 @@ 
  * @package SPIP\Core\Logos
  **/
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -37,34 +37,34 @@ 
  **/
 function inc_chercher_logo_dist($id, $_id_objet, $mode = 'on', $compat_old_logos = true) {
 
-	$mode = preg_replace(",\W,", '', $mode);
-	if ($mode) {
-		// chercher dans la base
-		$mode_document = 'logo' . $mode;
-		$objet = objet_type($_id_objet);
-		$doc = sql_fetsel('D.*', 'spip_documents AS D JOIN spip_documents_liens AS L ON L.id_document=D.id_document', "D.mode=".sql_quote($mode_document)." AND L.objet=".sql_quote($objet)." AND id_objet=".intval($id));
-		if ($doc) {
-			include_spip('inc/documents');
-			$d = get_spip_doc($doc['fichier']);
-			return array($d, _DIR_IMG, basename($d), $doc['extension'], @filemtime($d), $doc);
-		}
+    $mode = preg_replace(",\W,", '', $mode);
+    if ($mode) {
+        // chercher dans la base
+        $mode_document = 'logo' . $mode;
+        $objet = objet_type($_id_objet);
+        $doc = sql_fetsel('D.*', 'spip_documents AS D JOIN spip_documents_liens AS L ON L.id_document=D.id_document', "D.mode=".sql_quote($mode_document)." AND L.objet=".sql_quote($objet)." AND id_objet=".intval($id));
+        if ($doc) {
+            include_spip('inc/documents');
+            $d = get_spip_doc($doc['fichier']);
+            return array($d, _DIR_IMG, basename($d), $doc['extension'], @filemtime($d), $doc);
+        }
 
-		# deprecated TODO remove
-		if ($compat_old_logos) {
-			# attention au cas $id = '0' pour LOGO_SITE_SPIP : utiliser intval()
-			$type = type_du_logo($_id_objet);
-			$nom = $type . $mode . intval($id);
+        # deprecated TODO remove
+        if ($compat_old_logos) {
+            # attention au cas $id = '0' pour LOGO_SITE_SPIP : utiliser intval()
+            $type = type_du_logo($_id_objet);
+            $nom = $type . $mode . intval($id);
 
-			foreach ($GLOBALS['formats_logos'] as $format) {
-				if (@file_exists($d = (_DIR_LOGOS . $nom . '.' . $format))) {
-					return array($d, _DIR_LOGOS, $nom, $format, @filemtime($d));
-				}
-			}
-		}
-	}
+            foreach ($GLOBALS['formats_logos'] as $format) {
+                if (@file_exists($d = (_DIR_LOGOS . $nom . '.' . $format))) {
+                    return array($d, _DIR_LOGOS, $nom, $format, @filemtime($d));
+                }
+            }
+        }
+    }
 
-	# coherence de type pour servir comme filtre (formulaire_login)
-	return array();
+    # coherence de type pour servir comme filtre (formulaire_login)
+    return array();
 }
 
 /**
@@ -83,15 +83,15 @@ 
  * @deprecated MAIS NE PAS SUPPRIMER CAR SERT POUR L'UPGRADE des logos et leur mise en base
  **/
 function type_du_logo($_id_objet) {
-	return isset($GLOBALS['table_logos'][$_id_objet])
-		? $GLOBALS['table_logos'][$_id_objet]
-		: objet_type(preg_replace(',^id_,', '', $_id_objet));
+    return isset($GLOBALS['table_logos'][$_id_objet])
+        ? $GLOBALS['table_logos'][$_id_objet]
+        : objet_type(preg_replace(',^id_,', '', $_id_objet));
 }
 
 // Exceptions standards (historique)
 $GLOBALS['table_logos'] = array(
-	'id_article' => 'art',
-	'id_auteur' => 'aut',
-	'id_rubrique' => 'rub',
-	'id_groupe' => 'groupe',
+    'id_article' => 'art',
+    'id_auteur' => 'aut',
+    'id_rubrique' => 'rub',
+    'id_groupe' => 'groupe',
 );

ecrire/action/editer_logo.php

Braces +1 added lines, -2 removed lines

@@ -42,8 +42,7 @@
 		if (count($logo) < 6) {
 			spip_log("Supprimer ancien logo $logo", 'logo');
 			spip_unlink($logo[0]);
-		}
-		elseif ($doc = $logo[5]
+		} elseif ($doc = $logo[5]
 			and isset($doc['id_document'])
 		  and $id_document = $doc['id_document']) {
 

Spacing +11 added lines, -11 removed lines

@@ -81,14 +81,14 @@ 
 	include_spip('inc/chercher_logo');
 
 	$mode = preg_replace(",\W,", '', $etat);
-	if (!$mode){
+	if (!$mode) {
 		spip_log("logo_modifier : etat $etat invalide", 'logo');
 		$erreur = 'etat invalide';
 
 		return $erreur;
 	}
 	// chercher dans la base
-	$mode_document = 'logo' . $mode;
+	$mode_document = 'logo'.$mode;
 
 	include_spip('inc/documents');
 	$erreur = '';
@@ -105,7 +105,7 @@ 
 		$tmp_name = false;
 		if (file_exists($source)) {
 			$tmp_name = $source;
-		} elseif (file_exists($f = determine_upload() . $source)) {
+		} elseif (file_exists($f = determine_upload().$source)) {
 			$tmp_name = $f;
 		}
 		if (!$tmp_name) {
@@ -162,27 +162,27 @@ 
 	$type = type_du_logo($_id_objet);
 
 	foreach (['on', 'off'] as $mode) {
-		$nom_base = $type . $mode;
+		$nom_base = $type.$mode;
 		$dir = (defined('_DIR_LOGOS') ? _DIR_LOGOS : _DIR_IMG);
 
 		$deja = array();
-		$files = glob($dir . $nom_base . "*");
+		$files = glob($dir.$nom_base."*");
 
 		foreach ($files as $file) {
-			$logo = substr($file, strlen($dir . $nom_base));
+			$logo = substr($file, strlen($dir.$nom_base));
 			$logo = explode('.', $logo);
 			if (is_numeric($logo[0])
 			  and ($id_objet = intval($logo[0]) or in_array($objet, ['site', 'rubrique']))) {
 				if (!isset($deja[$id_objet])) {
 					$logo = $chercher_logo($id_objet, $_id_objet, $mode);
 					// if no logo in base
-					if (!$logo or count($logo)<6) {
+					if (!$logo or count($logo) < 6) {
 						foreach ($formats_logos as $format) {
-							if (@file_exists($d = ($dir . ($nom = $nom_base . intval($id_objet) . '.' . $format)))) {
+							if (@file_exists($d = ($dir.($nom = $nom_base.intval($id_objet).'.'.$format)))) {
 								// logo_modifier commence par supprimer le logo existant, donc on le deplace pour pas le perdre
-								@rename($d, $dir_logos . $nom);
+								@rename($d, $dir_logos.$nom);
 								// et on le declare comme nouveau logo
-								logo_modifier($objet, $id_objet, $mode, $dir_logos . $nom);
+								logo_modifier($objet, $id_objet, $mode, $dir_logos.$nom);
 								break;
 							}
 						}
@@ -192,7 +192,7 @@ 
 			}
 			// si le fichier est encore la on le move : rien a faire ici
 			if (file_exists($file)) {
-				@rename($file, $dir_logos_erreurs . basename($file));
+				@rename($file, $dir_logos_erreurs.basename($file));
 			}
 
 			if ($time_limit and time() > $time_limit) {

Indentation +154 added lines, -154 removed lines

@@ -17,7 +17,7 @@ 
  */
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 
@@ -30,35 +30,35 @@ 
  *     `on` ou `off`
  */
 function logo_supprimer($objet, $id_objet, $etat) {
-	$chercher_logo = charger_fonction('chercher_logo', 'inc');
-	$objet = objet_type($objet);
-	$primary = id_table_objet($objet);
-	include_spip('inc/chercher_logo');
-
-	// existe-t-il deja un logo ?
-	$logo = $chercher_logo($id_objet, $primary, $etat);
-	if ($logo) {
-		# TODO : deprecated, a supprimer -> anciens logos IMG/artonxx.png pas en base
-		if (count($logo) < 6) {
-			spip_log("Supprimer ancien logo $logo", 'logo');
-			spip_unlink($logo[0]);
-		}
-		elseif ($doc = $logo[5]
-			and isset($doc['id_document'])
-		  and $id_document = $doc['id_document']) {
-
-			include_spip('action/editer_liens');
-			// supprimer le lien dans la base
-			objet_dissocier(array('document' => $id_document), array($objet => $id_objet), array('role' => '*'));
-
-			// verifier si il reste des liens avec d'autres objets et sinon supprimer
-			$liens = objet_trouver_liens(array('document' => $id_document), '*');
-			if (!count($liens)) {
-				$supprimer_document = charger_fonction('supprimer_document', 'action');
-				$supprimer_document($doc['id_document']);
-			}
-		}
-	}
+    $chercher_logo = charger_fonction('chercher_logo', 'inc');
+    $objet = objet_type($objet);
+    $primary = id_table_objet($objet);
+    include_spip('inc/chercher_logo');
+
+    // existe-t-il deja un logo ?
+    $logo = $chercher_logo($id_objet, $primary, $etat);
+    if ($logo) {
+        # TODO : deprecated, a supprimer -> anciens logos IMG/artonxx.png pas en base
+        if (count($logo) < 6) {
+            spip_log("Supprimer ancien logo $logo", 'logo');
+            spip_unlink($logo[0]);
+        }
+        elseif ($doc = $logo[5]
+            and isset($doc['id_document'])
+          and $id_document = $doc['id_document']) {
+
+            include_spip('action/editer_liens');
+            // supprimer le lien dans la base
+            objet_dissocier(array('document' => $id_document), array($objet => $id_objet), array('role' => '*'));
+
+            // verifier si il reste des liens avec d'autres objets et sinon supprimer
+            $liens = objet_trouver_liens(array('document' => $id_document), '*');
+            if (!count($liens)) {
+                $supprimer_document = charger_fonction('supprimer_document', 'action');
+                $supprimer_document($doc['id_document']);
+            }
+        }
+    }
 }
 
 /**
@@ -75,133 +75,133 @@ 
  *     Erreur, sinon ''
  */
 function logo_modifier($objet, $id_objet, $etat, $source) {
-	$chercher_logo = charger_fonction('chercher_logo', 'inc');
-	$objet = objet_type($objet);
-	$primary = id_table_objet($objet);
-	include_spip('inc/chercher_logo');
-
-	$mode = preg_replace(",\W,", '', $etat);
-	if (!$mode){
-		spip_log("logo_modifier : etat $etat invalide", 'logo');
-		$erreur = 'etat invalide';
-
-		return $erreur;
-	}
-	// chercher dans la base
-	$mode_document = 'logo' . $mode;
-
-	include_spip('inc/documents');
-	$erreur = '';
-
-	if (!$source) {
-		spip_log('spip_image_ajouter : source inconnue', 'logo');
-		$erreur = 'source inconnue';
-
-		return $erreur;
-	}
-
-	// fichier dans upload/
-	if (is_string($source)) {
-		$tmp_name = false;
-		if (file_exists($source)) {
-			$tmp_name = $source;
-		} elseif (file_exists($f = determine_upload() . $source)) {
-			$tmp_name = $f;
-		}
-		if (!$tmp_name) {
-			spip_log('spip_image_ajouter : source inconnue', 'logo');
-			$erreur = 'source inconnue';
-
-			return $erreur;
-		}
-		$source = array(
-			'tmp_name' => $tmp_name,
-			'name' => basename($tmp_name),
-		);
-	} elseif ($erreur = check_upload_error($source['error'], '', true)) {
-		return $erreur;
-	}
-
-	// supprimer le logo eventueel existant
-	// TODO : si un logo existe, le modifier plutot que supprimer + reinserer (mais il faut gerer le cas ou il est utilise par plusieurs objets, donc pas si simple)
-	// mais de toute facon l'interface actuelle oblige a supprimer + reinserer
-	logo_supprimer($objet, $id_objet, $etat);
-
-
-	include_spip('inc/autoriser');
-	$source['mode'] = $mode_document;
-	$ajouter_documents = charger_fonction('ajouter_documents', 'action');
-	autoriser_exception('associerdocuments', $objet, $id_objet);
-	$ajoutes = $ajouter_documents('new', [$source], $objet, $id_objet, $mode_document);
-	autoriser_exception('associerdocuments', $objet, $id_objet, false);
-
-	$id_document = reset($ajoutes);
-
-	if (!is_numeric($id_document)) {
-		$erreur = ($id_document ? $id_document : 'Erreur inconnue');
-		spip_log("Erreur ajout logo : $erreur pour source=".json_encode($source), 'logo');
-		return $erreur;
-	}
-
-	return ''; // tout est bon, pas d'erreur
+    $chercher_logo = charger_fonction('chercher_logo', 'inc');
+    $objet = objet_type($objet);
+    $primary = id_table_objet($objet);
+    include_spip('inc/chercher_logo');
+
+    $mode = preg_replace(",\W,", '', $etat);
+    if (!$mode){
+        spip_log("logo_modifier : etat $etat invalide", 'logo');
+        $erreur = 'etat invalide';
+
+        return $erreur;
+    }
+    // chercher dans la base
+    $mode_document = 'logo' . $mode;
+
+    include_spip('inc/documents');
+    $erreur = '';
+
+    if (!$source) {
+        spip_log('spip_image_ajouter : source inconnue', 'logo');
+        $erreur = 'source inconnue';
+
+        return $erreur;
+    }
+
+    // fichier dans upload/
+    if (is_string($source)) {
+        $tmp_name = false;
+        if (file_exists($source)) {
+            $tmp_name = $source;
+        } elseif (file_exists($f = determine_upload() . $source)) {
+            $tmp_name = $f;
+        }
+        if (!$tmp_name) {
+            spip_log('spip_image_ajouter : source inconnue', 'logo');
+            $erreur = 'source inconnue';
+
+            return $erreur;
+        }
+        $source = array(
+            'tmp_name' => $tmp_name,
+            'name' => basename($tmp_name),
+        );
+    } elseif ($erreur = check_upload_error($source['error'], '', true)) {
+        return $erreur;
+    }
+
+    // supprimer le logo eventueel existant
+    // TODO : si un logo existe, le modifier plutot que supprimer + reinserer (mais il faut gerer le cas ou il est utilise par plusieurs objets, donc pas si simple)
+    // mais de toute facon l'interface actuelle oblige a supprimer + reinserer
+    logo_supprimer($objet, $id_objet, $etat);
+
+
+    include_spip('inc/autoriser');
+    $source['mode'] = $mode_document;
+    $ajouter_documents = charger_fonction('ajouter_documents', 'action');
+    autoriser_exception('associerdocuments', $objet, $id_objet);
+    $ajoutes = $ajouter_documents('new', [$source], $objet, $id_objet, $mode_document);
+    autoriser_exception('associerdocuments', $objet, $id_objet, false);
+
+    $id_document = reset($ajoutes);
+
+    if (!is_numeric($id_document)) {
+        $erreur = ($id_document ? $id_document : 'Erreur inconnue');
+        spip_log("Erreur ajout logo : $erreur pour source=".json_encode($source), 'logo');
+        return $erreur;
+    }
+
+    return ''; // tout est bon, pas d'erreur
 
 }
 
 function logo_migrer_en_base($objet, $time_limit) {
 
-	$dir_logos_erreurs = sous_repertoire(_DIR_IMG, 'logo_erreurs');
-	$dir_logos = sous_repertoire(_DIR_IMG, 'logo');
-	$formats_logos = array('jpg', 'png', 'svg', 'gif');
-	if (isset($GLOBALS['formats_logos'])) {
-		$formats_logos = $GLOBALS['formats_logos'];
-	}
-
-
-	$chercher_logo = charger_fonction('chercher_logo', 'inc');
-	include_spip('inc/chercher_logo');
-	$_id_objet = id_table_objet($objet);
-	$type = type_du_logo($_id_objet);
-
-	foreach (['on', 'off'] as $mode) {
-		$nom_base = $type . $mode;
-		$dir = (defined('_DIR_LOGOS') ? _DIR_LOGOS : _DIR_IMG);
-
-		$deja = array();
-		$files = glob($dir . $nom_base . "*");
-
-		foreach ($files as $file) {
-			$logo = substr($file, strlen($dir . $nom_base));
-			$logo = explode('.', $logo);
-			if (is_numeric($logo[0])
-			  and ($id_objet = intval($logo[0]) or in_array($objet, ['site', 'rubrique']))) {
-				if (!isset($deja[$id_objet])) {
-					$logo = $chercher_logo($id_objet, $_id_objet, $mode);
-					// if no logo in base
-					if (!$logo or count($logo)<6) {
-						foreach ($formats_logos as $format) {
-							if (@file_exists($d = ($dir . ($nom = $nom_base . intval($id_objet) . '.' . $format)))) {
-								// logo_modifier commence par supprimer le logo existant, donc on le deplace pour pas le perdre
-								@rename($d, $dir_logos . $nom);
-								// et on le declare comme nouveau logo
-								logo_modifier($objet, $id_objet, $mode, $dir_logos . $nom);
-								break;
-							}
-						}
-					}
-					$deja[$id_objet] = true;
-				}
-			}
-			// si le fichier est encore la on le move : rien a faire ici
-			if (file_exists($file)) {
-				@rename($file, $dir_logos_erreurs . basename($file));
-			}
-
-			if ($time_limit and time() > $time_limit) {
-				effacer_meta('drapeau_edition');
-				return;
-			}
-		}
-
-	}
-	effacer_meta('drapeau_edition');
+    $dir_logos_erreurs = sous_repertoire(_DIR_IMG, 'logo_erreurs');
+    $dir_logos = sous_repertoire(_DIR_IMG, 'logo');
+    $formats_logos = array('jpg', 'png', 'svg', 'gif');
+    if (isset($GLOBALS['formats_logos'])) {
+        $formats_logos = $GLOBALS['formats_logos'];
+    }
+
+
+    $chercher_logo = charger_fonction('chercher_logo', 'inc');
+    include_spip('inc/chercher_logo');
+    $_id_objet = id_table_objet($objet);
+    $type = type_du_logo($_id_objet);
+
+    foreach (['on', 'off'] as $mode) {
+        $nom_base = $type . $mode;
+        $dir = (defined('_DIR_LOGOS') ? _DIR_LOGOS : _DIR_IMG);
+
+        $deja = array();
+        $files = glob($dir . $nom_base . "*");
+
+        foreach ($files as $file) {
+            $logo = substr($file, strlen($dir . $nom_base));
+            $logo = explode('.', $logo);
+            if (is_numeric($logo[0])
+              and ($id_objet = intval($logo[0]) or in_array($objet, ['site', 'rubrique']))) {
+                if (!isset($deja[$id_objet])) {
+                    $logo = $chercher_logo($id_objet, $_id_objet, $mode);
+                    // if no logo in base
+                    if (!$logo or count($logo)<6) {
+                        foreach ($formats_logos as $format) {
+                            if (@file_exists($d = ($dir . ($nom = $nom_base . intval($id_objet) . '.' . $format)))) {
+                                // logo_modifier commence par supprimer le logo existant, donc on le deplace pour pas le perdre
+                                @rename($d, $dir_logos . $nom);
+                                // et on le declare comme nouveau logo
+                                logo_modifier($objet, $id_objet, $mode, $dir_logos . $nom);
+                                break;
+                            }
+                        }
+                    }
+                    $deja[$id_objet] = true;
+                }
+            }
+            // si le fichier est encore la on le move : rien a faire ici
+            if (file_exists($file)) {
+                @rename($file, $dir_logos_erreurs . basename($file));
+            }
+
+            if ($time_limit and time() > $time_limit) {
+                effacer_meta('drapeau_edition');
+                return;
+            }
+        }
+
+    }
+    effacer_meta('drapeau_edition');
 }
\ No newline at end of file

ecrire/public/assembler.php

Spacing +15 added lines, -15 removed lines

@@ -37,7 +37,7 @@ 
 
 	$GLOBALS['contexte'] = calculer_contexte();
 	$page = array('contexte_implicite' => calculer_contexte_implicite());
-	$page['contexte_implicite']['cache'] = $fond . preg_replace(',\.[a-zA-Z0-9]*$,', '',
+	$page['contexte_implicite']['cache'] = $fond.preg_replace(',\.[a-zA-Z0-9]*$,', '',
 			preg_replace('/[?].*$/', '', $GLOBALS['REQUEST_URI']));
 	// Cette fonction est utilisee deux fois
 	$cacher = charger_fonction('cacher', 'public', true);
@@ -118,7 +118,7 @@ 
 				$lastmodified, $connect);
 			if ($page === '') {
 				$erreur = _T('info_erreur_squelette2',
-					array('fichier' => spip_htmlspecialchars($fond) . '.' . _EXTENSION_SQUELETTES));
+					array('fichier' => spip_htmlspecialchars($fond).'.'._EXTENSION_SQUELETTES));
 				erreur_squelette($erreur);
 				// eviter des erreurs strictes ensuite sur $page['cle'] en PHP >= 5.4
 				$page = array('texte' => '', 'erreur' => $erreur);
@@ -160,7 +160,7 @@ 
 		and !isset($_SERVER['HTTP_IF_MODIFIED_SINCE'])
 		and !isset($page['entetes']["Last-Modified"])
 	) {
-		$page['entetes']["Last-Modified"] = gmdate("D, d M Y H:i:s", $lastmodified) . " GMT";
+		$page['entetes']["Last-Modified"] = gmdate("D, d M Y H:i:s", $lastmodified)." GMT";
 	}
 
 	// fermer la connexion apres les headers si requete HEAD
@@ -225,7 +225,7 @@ 
 		'spip_version_code' => $GLOBALS['spip_version_code'],
 	);
 	if (isset($_SERVER['HTTP_X_FORWARDED_HOST'])) {
-		$contexte_implicite['host'] .= "|" . $_SERVER['HTTP_X_FORWARDED_HOST'];
+		$contexte_implicite['host'] .= "|".$_SERVER['HTTP_X_FORWARDED_HOST'];
 	}
 
 	return $contexte_implicite;
@@ -497,7 +497,7 @@ 
  *   et il ne doit etre utilise que pour trouver le id_xx si pas de $id fourni (cas appel depuis styliser)
  * @return string
  */
-function styliser_modele($modele, $id, $contexte=null) {
+function styliser_modele($modele, $id, $contexte = null) {
 	static $styliseurs = null;
 	if (is_null($styliseurs)) {
 		$tables_objet = lister_tables_objets_sql();
@@ -523,7 +523,7 @@ 
 			}
 		}
 		if (is_null($id)) {
-			$msg = "modeles/$modele : " . _T('zbug_parametres_inclus_incorrects', array('param' => "id/$primary"));
+			$msg = "modeles/$modele : "._T('zbug_parametres_inclus_incorrects', array('param' => "id/$primary"));
 			erreur_squelette($msg);
 			// on passe id=0 au routeur pour tomber sur le modele par defaut et eviter une seconde erreur sur un modele inexistant
 			$id = 0;
@@ -570,7 +570,7 @@ 
 		}
 
 		if (preg_match(',^[a-z0-9_]+$,', $soustype)) {
-			if (!trouve_modele($fond = ($type . '_' . $soustype))) {
+			if (!trouve_modele($fond = ($type.'_'.$soustype))) {
 				$fond = '';
 				$class = $soustype;
 			}
@@ -585,7 +585,7 @@ 
 
 		return false;
 	}
-	$fond = 'modeles/' . $fond;
+	$fond = 'modeles/'.$fond;
 	// Creer le contexte
 	$contexte = $env;
 	$contexte['dir_racine'] = _DIR_RACINE; # eviter de mixer un cache racine et un cache ecrire (meme si pour l'instant les modeles ne sont pas caches, le resultat etant different il faut que le contexte en tienne compte
@@ -624,13 +624,13 @@ 
 	// Regarder si le modele tient compte des liens (il *doit* alors indiquer
 	// spip_lien_ok dans les classes de son conteneur de premier niveau ;
 	// sinon, s'il y a un lien, on l'ajoute classiquement
-	if (strstr(' ' . ($classes = extraire_attribut($retour, 'class')) . ' ',
+	if (strstr(' '.($classes = extraire_attribut($retour, 'class')).' ',
 		'spip_lien_ok')) {
 		$retour = inserer_attribut($retour, 'class',
 			trim(str_replace(' spip_lien_ok ', ' ', " $classes ")));
 	} else {
 		if ($lien) {
-			$retour = "<a href='" . $lien['href'] . "' class='" . $lien['class'] . "'>" . $retour . "</a>";
+			$retour = "<a href='".$lien['href']."' class='".$lien['class']."'>".$retour."</a>";
 		}
 	}
 
@@ -654,7 +654,7 @@ 
 		return $page;
 	}
 	// eval $page et affecte $res
-	include _ROOT_RESTREINT . "public/evaluer_page.php";
+	include _ROOT_RESTREINT."public/evaluer_page.php";
 
 	// Lever un drapeau (global) si le fond utilise #SESSION
 	// a destination de public/parametrer
@@ -717,14 +717,14 @@ 
 			if (($pos = strpos($head, '<head>')) !== false) {
 				$head = substr_replace($head, $bbase, $pos + 6, 0);
 			} elseif (preg_match(",<head[^>]*>,i", $head, $r)) {
-				$head = str_replace($r[0], $r[0] . $bbase, $head);
+				$head = str_replace($r[0], $r[0].$bbase, $head);
 			}
-			$texte = $head . substr($texte, $poshead);
+			$texte = $head.substr($texte, $poshead);
 			// gerer les ancres
 			$base = $_SERVER['REQUEST_URI'];
 			// pas de guillemets ni < dans l'URL qu'on insere dans le HTML
-			if (strpos($base,"'") or strpos($base,'"') or strpos($base,'<')) {
-				$base = str_replace(array("'",'"','<'),array("%27",'%22','%3C'), $base);
+			if (strpos($base, "'") or strpos($base, '"') or strpos($base, '<')) {
+				$base = str_replace(array("'", '"', '<'), array("%27", '%22', '%3C'), $base);
 			}
 			if (strpos($texte, "href='#") !== false) {
 				$texte = str_replace("href='#", "href='$base#", $texte);

Braces +9 added lines, -4 removed lines

@@ -471,9 +471,11 @@ 
 				$contexte[$var] = $val;
 			} else {
 				$args = explode('=', $val);
-				if (count($args) >= 2) // Flashvars=arg1=machin&arg2=truc genere plus de deux args
+				if (count($args) >= 2) {
+				    // Flashvars=arg1=machin&arg2=truc genere plus de deux args
 				{
 					$contexte[trim($args[0])] = substr($val, strlen($args[0]) + 1);
+				}
 				} else // notation abregee
 				{
 					$contexte[trim($val)] = trim($val);
@@ -676,8 +678,8 @@ 
 function page_base_href(&$texte) {
 	static $set_html_base = null;
 	if (is_null($set_html_base)) {
-		if (!defined('_SET_HTML_BASE'))
-			// si la profondeur est superieure a 1
+		if (!defined('_SET_HTML_BASE')) {
+					// si la profondeur est superieure a 1
 			// est que ce n'est pas une url page ni une url action
 			// activer par defaut
 		{
@@ -685,6 +687,7 @@ 
 				$GLOBALS['profondeur_url'] >= (_DIR_RESTREINT ? 1 : 2)
 				and _request(_SPIP_PAGE) !== 'login'
 				and !_request('action')) ? true : false);
+		}
 		} else {
 			$set_html_base = _SET_HTML_BASE;
 		}
@@ -742,8 +745,10 @@ 
 // et demarrent par X-Spip-...
 // https://code.spip.net/@envoyer_entetes
 function envoyer_entetes($entetes) {
-	foreach ($entetes as $k => $v) #	if (strncmp($k, 'X-Spip-', 7))
+	foreach ($entetes as $k => $v) {
+	    #	if (strncmp($k, 'X-Spip-', 7))
 	{
 		@header(strlen($v) ? "$k: $v" : $k);
 	}
+	}
 }

Doc Comments +1 added lines, -1 removed lines

@@ -467,7 +467,7 @@
  *
  * @param string|null $arg
  * @param string $operation
- * @return mixed
+ * @return null|string
  */
 function arguments_balise_dyn_depuis_modele($arg, $operation = 'set') {
 	static $balise_dyn_appellee_par_modele = null;

Indentation +582 added lines, -582 removed lines

@@ -20,155 +20,155 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 // En cas de modification, il faut aussi actualiser la regexp de nettoyer_uri_var() dans inc/utils.php
 if (!defined('_CONTEXTE_IGNORE_VARIABLES')) {
-	define('_CONTEXTE_IGNORE_VARIABLES', "/(^var_|^PHPSESSID$|^fbclid$|^utm_)/");
+    define('_CONTEXTE_IGNORE_VARIABLES', "/(^var_|^PHPSESSID$|^fbclid$|^utm_)/");
 }
 
 // https://code.spip.net/@assembler
 function assembler($fond, $connect = '') {
 
-	// flag_preserver est modifie ici, et utilise en globale
-	// use_cache sert a informer le bouton d'admin pr savoir s'il met un *
-	// contexte est utilise en globale dans le formulaire d'admin
-
-	$GLOBALS['contexte'] = calculer_contexte();
-	$page = array('contexte_implicite' => calculer_contexte_implicite());
-	$page['contexte_implicite']['cache'] = $fond . preg_replace(',\.[a-zA-Z0-9]*$,', '',
-			preg_replace('/[?].*$/', '', $GLOBALS['REQUEST_URI']));
-	// Cette fonction est utilisee deux fois
-	$cacher = charger_fonction('cacher', 'public', true);
-	// Les quatre derniers parametres sont modifies par la fonction:
-	// emplacement, validite, et, s'il est valide, contenu & age
-	if ($cacher) {
-		$res = $cacher($GLOBALS['contexte'], $GLOBALS['use_cache'], $chemin_cache, $page, $lastmodified);
-	} else {
-		$GLOBALS['use_cache'] = -1;
-	}
-	// Si un resultat est retourne, c'est un message d'impossibilite
-	if ($res) {
-		return array('texte' => $res);
-	}
-
-	if (!$chemin_cache || !$lastmodified) {
-		$lastmodified = time();
-	}
-
-	$headers_only = ($_SERVER['REQUEST_METHOD'] == 'HEAD');
-	$calculer_page = true;
-
-	// Pour les pages non-dynamiques (indiquees par #CACHE{duree,cache-client})
-	// une perennite valide a meme reponse qu'une requete HEAD (par defaut les
-	// pages sont dynamiques)
-	if (isset($_SERVER['HTTP_IF_MODIFIED_SINCE'])
-		and (!defined('_VAR_MODE') or !_VAR_MODE)
-		and $chemin_cache
-		and isset($page['entetes'])
-		and isset($page['entetes']['Cache-Control'])
-		and strstr($page['entetes']['Cache-Control'], 'max-age=')
-		and !strstr($_SERVER['SERVER_SOFTWARE'], 'IIS/')
-	) {
-		$since = preg_replace('/;.*/', '',
-			$_SERVER['HTTP_IF_MODIFIED_SINCE']);
-		$since = str_replace('GMT', '', $since);
-		if (trim($since) == gmdate("D, d M Y H:i:s", $lastmodified)) {
-			$page['status'] = 304;
-			$headers_only = true;
-			$calculer_page = false;
-		}
-	}
-
-	// Si requete HEAD ou Last-modified compatible, ignorer le texte
-	// et pas de content-type (pour contrer le bouton admin de inc-public)
-	if (!$calculer_page) {
-		$page['texte'] = "";
-	} else {
-		// si la page est prise dans le cache
-		if (!$GLOBALS['use_cache']) {
-			// Informer les boutons d'admin du contexte
-			// (fourni par urls_decoder_url ci-dessous lors de la mise en cache)
-			$GLOBALS['contexte'] = $page['contexte'];
-
-			// vider les globales url propres qui ne doivent plus etre utilisees en cas
-			// d'inversion url => objet
-			// plus necessaire si on utilise bien la fonction urls_decoder_url
-			#unset($_SERVER['REDIRECT_url_propre']);
-			#unset($_ENV['url_propre']);
-		} else {
-			// Compat ascendante :
-			// 1. $contexte est global
-			// (a evacuer car urls_decoder_url gere ce probleme ?)
-			// et calculer la page
-			if (!test_espace_prive()) {
-				include_spip('inc/urls');
-				list($fond, $GLOBALS['contexte'], $url_redirect) = urls_decoder_url(nettoyer_uri(), $fond, $GLOBALS['contexte'],
-					true);
-			}
-			// squelette par defaut
-			if (!strlen($fond)) {
-				$fond = 'sommaire';
-			}
-
-			// produire la page : peut mettre a jour $lastmodified
-			$produire_page = charger_fonction('produire_page', 'public');
-			$page = $produire_page($fond, $GLOBALS['contexte'], $GLOBALS['use_cache'], $chemin_cache, null, $page,
-				$lastmodified, $connect);
-			if ($page === '') {
-				$erreur = _T('info_erreur_squelette2',
-					array('fichier' => spip_htmlspecialchars($fond) . '.' . _EXTENSION_SQUELETTES));
-				erreur_squelette($erreur);
-				// eviter des erreurs strictes ensuite sur $page['cle'] en PHP >= 5.4
-				$page = array('texte' => '', 'erreur' => $erreur);
-			}
-		}
-
-		if ($page and $chemin_cache) {
-			$page['cache'] = $chemin_cache;
-		}
-
-		auto_content_type($page);
-
-		$GLOBALS['flag_preserver'] |= headers_sent();
-
-		// Definir les entetes si ce n'est fait 
-		if (!$GLOBALS['flag_preserver']) {
-			if ($GLOBALS['flag_ob']) {
-				// Si la page est vide, produire l'erreur 404 ou message d'erreur pour les inclusions
-				if (trim($page['texte']) === ''
-					and _VAR_MODE != 'debug'
-					and !isset($page['entetes']['Location']) // cette page realise une redirection, donc pas d'erreur
-				) {
-					$GLOBALS['contexte']['fond_erreur'] = $fond;
-					$page = message_page_indisponible($page, $GLOBALS['contexte']);
-				}
-				// pas de cache client en mode 'observation'
-				if (defined('_VAR_MODE') and _VAR_MODE) {
-					$page['entetes']["Cache-Control"] = "no-cache,must-revalidate";
-					$page['entetes']["Pragma"] = "no-cache";
-				}
-			}
-		}
-	}
-
-	// Entete Last-Modified:
-	// eviter d'etre incoherent en envoyant un lastmodified identique
-	// a celui qu'on a refuse d'honorer plus haut (cf. #655)
-	if ($lastmodified
-		and !isset($_SERVER['HTTP_IF_MODIFIED_SINCE'])
-		and !isset($page['entetes']["Last-Modified"])
-	) {
-		$page['entetes']["Last-Modified"] = gmdate("D, d M Y H:i:s", $lastmodified) . " GMT";
-	}
-
-	// fermer la connexion apres les headers si requete HEAD
-	if ($headers_only) {
-		$page['entetes']["Connection"] = "close";
-	}
-
-	return $page;
+    // flag_preserver est modifie ici, et utilise en globale
+    // use_cache sert a informer le bouton d'admin pr savoir s'il met un *
+    // contexte est utilise en globale dans le formulaire d'admin
+
+    $GLOBALS['contexte'] = calculer_contexte();
+    $page = array('contexte_implicite' => calculer_contexte_implicite());
+    $page['contexte_implicite']['cache'] = $fond . preg_replace(',\.[a-zA-Z0-9]*$,', '',
+            preg_replace('/[?].*$/', '', $GLOBALS['REQUEST_URI']));
+    // Cette fonction est utilisee deux fois
+    $cacher = charger_fonction('cacher', 'public', true);
+    // Les quatre derniers parametres sont modifies par la fonction:
+    // emplacement, validite, et, s'il est valide, contenu & age
+    if ($cacher) {
+        $res = $cacher($GLOBALS['contexte'], $GLOBALS['use_cache'], $chemin_cache, $page, $lastmodified);
+    } else {
+        $GLOBALS['use_cache'] = -1;
+    }
+    // Si un resultat est retourne, c'est un message d'impossibilite
+    if ($res) {
+        return array('texte' => $res);
+    }
+
+    if (!$chemin_cache || !$lastmodified) {
+        $lastmodified = time();
+    }
+
+    $headers_only = ($_SERVER['REQUEST_METHOD'] == 'HEAD');
+    $calculer_page = true;
+
+    // Pour les pages non-dynamiques (indiquees par #CACHE{duree,cache-client})
+    // une perennite valide a meme reponse qu'une requete HEAD (par defaut les
+    // pages sont dynamiques)
+    if (isset($_SERVER['HTTP_IF_MODIFIED_SINCE'])
+        and (!defined('_VAR_MODE') or !_VAR_MODE)
+        and $chemin_cache
+        and isset($page['entetes'])
+        and isset($page['entetes']['Cache-Control'])
+        and strstr($page['entetes']['Cache-Control'], 'max-age=')
+        and !strstr($_SERVER['SERVER_SOFTWARE'], 'IIS/')
+    ) {
+        $since = preg_replace('/;.*/', '',
+            $_SERVER['HTTP_IF_MODIFIED_SINCE']);
+        $since = str_replace('GMT', '', $since);
+        if (trim($since) == gmdate("D, d M Y H:i:s", $lastmodified)) {
+            $page['status'] = 304;
+            $headers_only = true;
+            $calculer_page = false;
+        }
+    }
+
+    // Si requete HEAD ou Last-modified compatible, ignorer le texte
+    // et pas de content-type (pour contrer le bouton admin de inc-public)
+    if (!$calculer_page) {
+        $page['texte'] = "";
+    } else {
+        // si la page est prise dans le cache
+        if (!$GLOBALS['use_cache']) {
+            // Informer les boutons d'admin du contexte
+            // (fourni par urls_decoder_url ci-dessous lors de la mise en cache)
+            $GLOBALS['contexte'] = $page['contexte'];
+
+            // vider les globales url propres qui ne doivent plus etre utilisees en cas
+            // d'inversion url => objet
+            // plus necessaire si on utilise bien la fonction urls_decoder_url
+            #unset($_SERVER['REDIRECT_url_propre']);
+            #unset($_ENV['url_propre']);
+        } else {
+            // Compat ascendante :
+            // 1. $contexte est global
+            // (a evacuer car urls_decoder_url gere ce probleme ?)
+            // et calculer la page
+            if (!test_espace_prive()) {
+                include_spip('inc/urls');
+                list($fond, $GLOBALS['contexte'], $url_redirect) = urls_decoder_url(nettoyer_uri(), $fond, $GLOBALS['contexte'],
+                    true);
+            }
+            // squelette par defaut
+            if (!strlen($fond)) {
+                $fond = 'sommaire';
+            }
+
+            // produire la page : peut mettre a jour $lastmodified
+            $produire_page = charger_fonction('produire_page', 'public');
+            $page = $produire_page($fond, $GLOBALS['contexte'], $GLOBALS['use_cache'], $chemin_cache, null, $page,
+                $lastmodified, $connect);
+            if ($page === '') {
+                $erreur = _T('info_erreur_squelette2',
+                    array('fichier' => spip_htmlspecialchars($fond) . '.' . _EXTENSION_SQUELETTES));
+                erreur_squelette($erreur);
+                // eviter des erreurs strictes ensuite sur $page['cle'] en PHP >= 5.4
+                $page = array('texte' => '', 'erreur' => $erreur);
+            }
+        }
+
+        if ($page and $chemin_cache) {
+            $page['cache'] = $chemin_cache;
+        }
+
+        auto_content_type($page);
+
+        $GLOBALS['flag_preserver'] |= headers_sent();
+
+        // Definir les entetes si ce n'est fait 
+        if (!$GLOBALS['flag_preserver']) {
+            if ($GLOBALS['flag_ob']) {
+                // Si la page est vide, produire l'erreur 404 ou message d'erreur pour les inclusions
+                if (trim($page['texte']) === ''
+                    and _VAR_MODE != 'debug'
+                    and !isset($page['entetes']['Location']) // cette page realise une redirection, donc pas d'erreur
+                ) {
+                    $GLOBALS['contexte']['fond_erreur'] = $fond;
+                    $page = message_page_indisponible($page, $GLOBALS['contexte']);
+                }
+                // pas de cache client en mode 'observation'
+                if (defined('_VAR_MODE') and _VAR_MODE) {
+                    $page['entetes']["Cache-Control"] = "no-cache,must-revalidate";
+                    $page['entetes']["Pragma"] = "no-cache";
+                }
+            }
+        }
+    }
+
+    // Entete Last-Modified:
+    // eviter d'etre incoherent en envoyant un lastmodified identique
+    // a celui qu'on a refuse d'honorer plus haut (cf. #655)
+    if ($lastmodified
+        and !isset($_SERVER['HTTP_IF_MODIFIED_SINCE'])
+        and !isset($page['entetes']["Last-Modified"])
+    ) {
+        $page['entetes']["Last-Modified"] = gmdate("D, d M Y H:i:s", $lastmodified) . " GMT";
+    }
+
+    // fermer la connexion apres les headers si requete HEAD
+    if ($headers_only) {
+        $page['entetes']["Connection"] = "close";
+    }
+
+    return $page;
 }
 
 /**
@@ -187,19 +187,19 @@ 
  */
 function calculer_contexte() {
 
-	$contexte = array();
-	foreach ($_GET as $var => $val) {
-		if (!preg_match(_CONTEXTE_IGNORE_VARIABLES, $var)) {
-			$contexte[$var] = $val;
-		}
-	}
-	foreach ($_POST as $var => $val) {
-		if (!preg_match(_CONTEXTE_IGNORE_VARIABLES, $var)) {
-			$contexte[$var] = $val;
-		}
-	}
-
-	return $contexte;
+    $contexte = array();
+    foreach ($_GET as $var => $val) {
+        if (!preg_match(_CONTEXTE_IGNORE_VARIABLES, $var)) {
+            $contexte[$var] = $val;
+        }
+    }
+    foreach ($_POST as $var => $val) {
+        if (!preg_match(_CONTEXTE_IGNORE_VARIABLES, $var)) {
+            $contexte[$var] = $val;
+        }
+    }
+
+    return $contexte;
 }
 
 /**
@@ -210,25 +210,25 @@ 
  * @return array
  */
 function calculer_contexte_implicite() {
-	static $notes = null;
-	if (is_null($notes)) {
-		$notes = charger_fonction('notes', 'inc', true);
-	}
-	$contexte_implicite = array(
-		'squelettes' => $GLOBALS['dossier_squelettes'], // devrait etre 'chemin' => $GLOBALS['path_sig'], ?
-		'host' => (isset($_SERVER['HTTP_HOST']) ? $_SERVER['HTTP_HOST'] : null),
-		'https' => (isset($_SERVER['HTTPS']) ? $_SERVER['HTTPS'] : ''),
-		'espace' => test_espace_prive(),
-		'marqueur' => (isset($GLOBALS['marqueur']) ? $GLOBALS['marqueur'] : ''),
-		'marqueur_skel' => (isset($GLOBALS['marqueur_skel']) ? $GLOBALS['marqueur_skel'] : ''),
-		'notes' => $notes ? $notes('', 'contexter_cache') : '',
-		'spip_version_code' => $GLOBALS['spip_version_code'],
-	);
-	if (isset($_SERVER['HTTP_X_FORWARDED_HOST'])) {
-		$contexte_implicite['host'] .= "|" . $_SERVER['HTTP_X_FORWARDED_HOST'];
-	}
-
-	return $contexte_implicite;
+    static $notes = null;
+    if (is_null($notes)) {
+        $notes = charger_fonction('notes', 'inc', true);
+    }
+    $contexte_implicite = array(
+        'squelettes' => $GLOBALS['dossier_squelettes'], // devrait etre 'chemin' => $GLOBALS['path_sig'], ?
+        'host' => (isset($_SERVER['HTTP_HOST']) ? $_SERVER['HTTP_HOST'] : null),
+        'https' => (isset($_SERVER['HTTPS']) ? $_SERVER['HTTPS'] : ''),
+        'espace' => test_espace_prive(),
+        'marqueur' => (isset($GLOBALS['marqueur']) ? $GLOBALS['marqueur'] : ''),
+        'marqueur_skel' => (isset($GLOBALS['marqueur_skel']) ? $GLOBALS['marqueur_skel'] : ''),
+        'notes' => $notes ? $notes('', 'contexter_cache') : '',
+        'spip_version_code' => $GLOBALS['spip_version_code'],
+    );
+    if (isset($_SERVER['HTTP_X_FORWARDED_HOST'])) {
+        $contexte_implicite['host'] .= "|" . $_SERVER['HTTP_X_FORWARDED_HOST'];
+    }
+
+    return $contexte_implicite;
 }
 
 //
@@ -238,50 +238,50 @@ 
 // https://code.spip.net/@auto_content_type
 function auto_content_type($page) {
 
-	if (!isset($GLOBALS['flag_preserver'])) {
-		$GLOBALS['flag_preserver'] = ($page && preg_match("/header\s*\(\s*.content\-type:/isx",
-				$page['texte']) || (isset($page['entetes']['Content-Type'])));
-	}
+    if (!isset($GLOBALS['flag_preserver'])) {
+        $GLOBALS['flag_preserver'] = ($page && preg_match("/header\s*\(\s*.content\-type:/isx",
+                $page['texte']) || (isset($page['entetes']['Content-Type'])));
+    }
 }
 
 // https://code.spip.net/@inclure_page
 function inclure_page($fond, $contexte, $connect = '') {
-	static $cacher, $produire_page;
-
-	// enlever le fond de contexte inclus car sinon il prend la main
-	// dans les sous inclusions -> boucle infinie d'inclusion identique
-	// (cette precaution n'est probablement plus utile)
-	unset($contexte['fond']);
-	$page = array('contexte_implicite' => calculer_contexte_implicite());
-	$page['contexte_implicite']['cache'] = $fond;
-	if (is_null($cacher)) {
-		$cacher = charger_fonction('cacher', 'public', true);
-	}
-	// Les quatre derniers parametres sont modifies par la fonction:
-	// emplacement, validite, et, s'il est valide, contenu & age
-	if ($cacher) {
-		$res = $cacher($contexte, $use_cache, $chemin_cache, $page, $lastinclude);
-	} else {
-		$use_cache = -1;
-	}
-	// $res = message d'erreur : on sort de la
-	if ($res) {
-		return array('texte' => $res);
-	}
-
-	// Si use_cache ne vaut pas 0, la page doit etre calculee
-	// produire la page : peut mettre a jour $lastinclude
-	// le contexte_cache envoye a cacher() a ete conserve et est passe a produire
-	if ($use_cache) {
-		if (is_null($produire_page)) {
-			$produire_page = charger_fonction('produire_page', 'public');
-		}
-		$page = $produire_page($fond, $contexte, $use_cache, $chemin_cache, $contexte, $page, $lastinclude, $connect);
-	}
-	// dans tous les cas, mettre a jour $GLOBALS['lastmodified']
-	$GLOBALS['lastmodified'] = max((isset($GLOBALS['lastmodified']) ? $GLOBALS['lastmodified'] : 0), $lastinclude);
-
-	return $page;
+    static $cacher, $produire_page;
+
+    // enlever le fond de contexte inclus car sinon il prend la main
+    // dans les sous inclusions -> boucle infinie d'inclusion identique
+    // (cette precaution n'est probablement plus utile)
+    unset($contexte['fond']);
+    $page = array('contexte_implicite' => calculer_contexte_implicite());
+    $page['contexte_implicite']['cache'] = $fond;
+    if (is_null($cacher)) {
+        $cacher = charger_fonction('cacher', 'public', true);
+    }
+    // Les quatre derniers parametres sont modifies par la fonction:
+    // emplacement, validite, et, s'il est valide, contenu & age
+    if ($cacher) {
+        $res = $cacher($contexte, $use_cache, $chemin_cache, $page, $lastinclude);
+    } else {
+        $use_cache = -1;
+    }
+    // $res = message d'erreur : on sort de la
+    if ($res) {
+        return array('texte' => $res);
+    }
+
+    // Si use_cache ne vaut pas 0, la page doit etre calculee
+    // produire la page : peut mettre a jour $lastinclude
+    // le contexte_cache envoye a cacher() a ete conserve et est passe a produire
+    if ($use_cache) {
+        if (is_null($produire_page)) {
+            $produire_page = charger_fonction('produire_page', 'public');
+        }
+        $page = $produire_page($fond, $contexte, $use_cache, $chemin_cache, $contexte, $page, $lastinclude, $connect);
+    }
+    // dans tous les cas, mettre a jour $GLOBALS['lastmodified']
+    $GLOBALS['lastmodified'] = max((isset($GLOBALS['lastmodified']) ? $GLOBALS['lastmodified'] : 0), $lastinclude);
+
+    return $page;
 }
 
 /**
@@ -299,40 +299,40 @@ 
  * @return array
  */
 function public_produire_page_dist(
-	$fond,
-	$contexte,
-	$use_cache,
-	$chemin_cache,
-	$contexte_cache,
-	&$page,
-	&$lastinclude,
-	$connect = ''
+    $fond,
+    $contexte,
+    $use_cache,
+    $chemin_cache,
+    $contexte_cache,
+    &$page,
+    &$lastinclude,
+    $connect = ''
 ) {
-	static $parametrer, $cacher;
-	if (!$parametrer) {
-		$parametrer = charger_fonction('parametrer', 'public');
-	}
-	$page = $parametrer($fond, $contexte, $chemin_cache, $connect);
-	// et on l'enregistre sur le disque
-	if ($chemin_cache
-		and $use_cache > -1
-		and is_array($page)
-		and count($page)
-		and isset($page['entetes']['X-Spip-Cache'])
-		and $page['entetes']['X-Spip-Cache'] > 0
-	) {
-		if (is_null($cacher)) {
-			$cacher = charger_fonction('cacher', 'public', true);
-		}
-		$lastinclude = time();
-		if ($cacher) {
-			$cacher($contexte_cache, $use_cache, $chemin_cache, $page, $lastinclude);
-		} else {
-			$use_cache = -1;
-		}
-	}
-
-	return $page;
+    static $parametrer, $cacher;
+    if (!$parametrer) {
+        $parametrer = charger_fonction('parametrer', 'public');
+    }
+    $page = $parametrer($fond, $contexte, $chemin_cache, $connect);
+    // et on l'enregistre sur le disque
+    if ($chemin_cache
+        and $use_cache > -1
+        and is_array($page)
+        and count($page)
+        and isset($page['entetes']['X-Spip-Cache'])
+        and $page['entetes']['X-Spip-Cache'] > 0
+    ) {
+        if (is_null($cacher)) {
+            $cacher = charger_fonction('cacher', 'public', true);
+        }
+        $lastinclude = time();
+        if ($cacher) {
+            $cacher($contexte_cache, $use_cache, $chemin_cache, $page, $lastinclude);
+        } else {
+            $use_cache = -1;
+        }
+    }
+
+    return $page;
 }
 
 // Fonction inseree par le compilateur dans le code compile.
@@ -346,14 +346,14 @@ 
 // 4: langue
 
 function inserer_balise_dynamique($contexte_exec, $contexte_compil) {
-	arguments_balise_dyn_depuis_modele(null, 'reset');
-
-	if (!is_array($contexte_exec)) {
-		echo $contexte_exec;
-	} // message d'erreur etc
-	else {
-		inclure_balise_dynamique($contexte_exec, true, $contexte_compil);
-	}
+    arguments_balise_dyn_depuis_modele(null, 'reset');
+
+    if (!is_array($contexte_exec)) {
+        echo $contexte_exec;
+    } // message d'erreur etc
+    else {
+        inclure_balise_dynamique($contexte_exec, true, $contexte_compil);
+    }
 }
 
 /**
@@ -368,97 +368,97 @@ 
  * @return string
  */
 function inclure_balise_dynamique($texte, $echo = true, $contexte_compil = array()) {
-	if (is_array($texte)) {
-
-		list($fond, $delainc, $contexte_inclus) = $texte;
-
-		// delais a l'ancienne, c'est pratiquement mort
-		$d = isset($GLOBALS['delais']) ? $GLOBALS['delais'] : null;
-		$GLOBALS['delais'] = $delainc;
-
-		$page = recuperer_fond($fond, $contexte_inclus,
-			array('trim' => false, 'raw' => true, 'compil' => $contexte_compil));
-
-		$texte = $page['texte'];
-
-		$GLOBALS['delais'] = $d;
-		// Faire remonter les entetes
-		if (is_array($page['entetes'])) {
-			// mais pas toutes
-			unset($page['entetes']['X-Spip-Cache']);
-			unset($page['entetes']['Content-Type']);
-			if (isset($GLOBALS['page']) and is_array($GLOBALS['page'])) {
-				if (!is_array($GLOBALS['page']['entetes'])) {
-					$GLOBALS['page']['entetes'] = array();
-				}
-				$GLOBALS['page']['entetes'] =
-					array_merge($GLOBALS['page']['entetes'], $page['entetes']);
-			}
-		}
-		// _pipelines au pluriel array('nom_pipeline' => $args...) avec une syntaxe permettant plusieurs pipelines
-		if (isset($page['contexte']['_pipelines'])
-			and is_array($page['contexte']['_pipelines'])
-			and count($page['contexte']['_pipelines'])
-		) {
-			foreach ($page['contexte']['_pipelines'] as $pipe => $args) {
-				$args['contexte'] = $page['contexte'];
-				unset($args['contexte']['_pipelines']); // par precaution, meme si le risque de boucle infinie est a priori nul
-				$texte = pipeline(
-					$pipe,
-					array(
-						'data' => $texte,
-						'args' => $args
-					),
-					false
-				);
-			}
-		}
-	}
-
-	if (defined('_VAR_MODE') and _VAR_MODE == 'debug') {
-		// compatibilite : avant on donnait le numero de ligne ou rien.
-		$ligne = intval(isset($contexte_compil[3]) ? $contexte_compil[3] : $contexte_compil);
-		$GLOBALS['debug_objets']['resultat'][$ligne] = $texte;
-	}
-	if ($echo) {
-		echo $texte;
-	} else {
-		return $texte;
-	}
+    if (is_array($texte)) {
+
+        list($fond, $delainc, $contexte_inclus) = $texte;
+
+        // delais a l'ancienne, c'est pratiquement mort
+        $d = isset($GLOBALS['delais']) ? $GLOBALS['delais'] : null;
+        $GLOBALS['delais'] = $delainc;
+
+        $page = recuperer_fond($fond, $contexte_inclus,
+            array('trim' => false, 'raw' => true, 'compil' => $contexte_compil));
+
+        $texte = $page['texte'];
+
+        $GLOBALS['delais'] = $d;
+        // Faire remonter les entetes
+        if (is_array($page['entetes'])) {
+            // mais pas toutes
+            unset($page['entetes']['X-Spip-Cache']);
+            unset($page['entetes']['Content-Type']);
+            if (isset($GLOBALS['page']) and is_array($GLOBALS['page'])) {
+                if (!is_array($GLOBALS['page']['entetes'])) {
+                    $GLOBALS['page']['entetes'] = array();
+                }
+                $GLOBALS['page']['entetes'] =
+                    array_merge($GLOBALS['page']['entetes'], $page['entetes']);
+            }
+        }
+        // _pipelines au pluriel array('nom_pipeline' => $args...) avec une syntaxe permettant plusieurs pipelines
+        if (isset($page['contexte']['_pipelines'])
+            and is_array($page['contexte']['_pipelines'])
+            and count($page['contexte']['_pipelines'])
+        ) {
+            foreach ($page['contexte']['_pipelines'] as $pipe => $args) {
+                $args['contexte'] = $page['contexte'];
+                unset($args['contexte']['_pipelines']); // par precaution, meme si le risque de boucle infinie est a priori nul
+                $texte = pipeline(
+                    $pipe,
+                    array(
+                        'data' => $texte,
+                        'args' => $args
+                    ),
+                    false
+                );
+            }
+        }
+    }
+
+    if (defined('_VAR_MODE') and _VAR_MODE == 'debug') {
+        // compatibilite : avant on donnait le numero de ligne ou rien.
+        $ligne = intval(isset($contexte_compil[3]) ? $contexte_compil[3] : $contexte_compil);
+        $GLOBALS['debug_objets']['resultat'][$ligne] = $texte;
+    }
+    if ($echo) {
+        echo $texte;
+    } else {
+        return $texte;
+    }
 }
 
 // https://code.spip.net/@message_page_indisponible
 function message_page_indisponible($page, $contexte) {
-	static $deja = false;
-	if ($deja) {
-		return "erreur";
-	}
-	$codes = array(
-		'404' => '404 Not Found',
-		'503' => '503 Service Unavailable',
-	);
-
-	$contexte['status'] = ($page !== false) ? '404' : '503';
-	$contexte['code'] = $codes[$contexte['status']];
-	$contexte['fond'] = '404'; // gere les 2 erreurs
-	if (!isset($contexte['lang'])) {
-		include_spip('inc/lang');
-		$contexte['lang'] = $GLOBALS['spip_lang'];
-	}
-
-	$deja = true;
-	// passer aux plugins qui peuvent decider d'une page d'erreur plus pertinent
-	// ex restriction d'acces => 401
-	$contexte = pipeline('page_indisponible', $contexte);
-
-	// produire la page d'erreur
-	$page = inclure_page($contexte['fond'], $contexte);
-	if (!$page) {
-		$page = inclure_page('404', $contexte);
-	}
-	$page['status'] = $contexte['status'];
-
-	return $page;
+    static $deja = false;
+    if ($deja) {
+        return "erreur";
+    }
+    $codes = array(
+        '404' => '404 Not Found',
+        '503' => '503 Service Unavailable',
+    );
+
+    $contexte['status'] = ($page !== false) ? '404' : '503';
+    $contexte['code'] = $codes[$contexte['status']];
+    $contexte['fond'] = '404'; // gere les 2 erreurs
+    if (!isset($contexte['lang'])) {
+        include_spip('inc/lang');
+        $contexte['lang'] = $GLOBALS['spip_lang'];
+    }
+
+    $deja = true;
+    // passer aux plugins qui peuvent decider d'une page d'erreur plus pertinent
+    // ex restriction d'acces => 401
+    $contexte = pipeline('page_indisponible', $contexte);
+
+    // produire la page d'erreur
+    $page = inclure_page($contexte['fond'], $contexte);
+    if (!$page) {
+        $page = inclure_page('404', $contexte);
+    }
+    $page['status'] = $contexte['status'];
+
+    return $page;
 }
 
 /**
@@ -470,46 +470,46 @@ 
  * @return mixed
  */
 function arguments_balise_dyn_depuis_modele($arg, $operation = 'set') {
-	static $balise_dyn_appellee_par_modele = null;
-	switch ($operation) {
-		case 'read':
-			return $balise_dyn_appellee_par_modele;
-		case 'reset':
-			$balise_dyn_appellee_par_modele = null;
-			return null;
-		case 'set':
-		default:
-			$balise_dyn_appellee_par_modele = $arg;
-			return $arg;
-	}
+    static $balise_dyn_appellee_par_modele = null;
+    switch ($operation) {
+        case 'read':
+            return $balise_dyn_appellee_par_modele;
+        case 'reset':
+            $balise_dyn_appellee_par_modele = null;
+            return null;
+        case 'set':
+        default:
+            $balise_dyn_appellee_par_modele = $arg;
+            return $arg;
+    }
 }
 
 // temporairement ici : a mettre dans le futur inc/modeles
 // creer_contexte_de_modele('left', 'autostart=true', ...) renvoie un array()
 // https://code.spip.net/@creer_contexte_de_modele
 function creer_contexte_de_modele($args) {
-	$contexte = array();
-	foreach ($args as $var => $val) {
-		if (is_int($var)) { // argument pas formate
-			if (in_array($val, array('left', 'right', 'center'))) {
-				$var = 'align';
-				$contexte[$var] = $val;
-			} else {
-				$args = explode('=', $val);
-				if (count($args) >= 2) // Flashvars=arg1=machin&arg2=truc genere plus de deux args
-				{
-					$contexte[trim($args[0])] = substr($val, strlen($args[0]) + 1);
-				} else // notation abregee
-				{
-					$contexte[trim($val)] = trim($val);
-				}
-			}
-		} else {
-			$contexte[$var] = $val;
-		}
-	}
-
-	return $contexte;
+    $contexte = array();
+    foreach ($args as $var => $val) {
+        if (is_int($var)) { // argument pas formate
+            if (in_array($val, array('left', 'right', 'center'))) {
+                $var = 'align';
+                $contexte[$var] = $val;
+            } else {
+                $args = explode('=', $val);
+                if (count($args) >= 2) // Flashvars=arg1=machin&arg2=truc genere plus de deux args
+                {
+                    $contexte[trim($args[0])] = substr($val, strlen($args[0]) + 1);
+                } else // notation abregee
+                {
+                    $contexte[trim($val)] = trim($val);
+                }
+            }
+        } else {
+            $contexte[$var] = $val;
+        }
+    }
+
+    return $contexte;
 }
 
 /**
@@ -524,40 +524,40 @@ 
  * @return string
  */
 function styliser_modele($modele, $id, $contexte=null) {
-	static $styliseurs = null;
-	if (is_null($styliseurs)) {
-		$tables_objet = lister_tables_objets_sql();
-		foreach ($tables_objet as $table => $desc) {
-			if (isset($desc['modeles']) and $desc['modeles']
-				and isset($desc['modeles_styliser']) and $desc['modeles_styliser']
-				and function_exists($desc['modeles_styliser'])) {
-				$primary = id_table_objet($table);
-				foreach ($desc['modeles'] as $m) {
-					$styliseurs[$m] = ['primary' => $primary, 'callback' => $desc['modeles_styliser']];
-				}
-			}
-		}
-	}
-
-	if (isset($styliseurs[$modele])) {
-		$styliseur = $styliseurs[$modele]['callback'];
-		if (is_null($id) and $contexte) {
-			if (isset($contexte['id'])) {
-				$id = $contexte['id'];
-			} elseif (isset($contexte[$primary])) {
-				$id = $contexte[$primary];
-			}
-		}
-		if (is_null($id)) {
-			$msg = "modeles/$modele : " . _T('zbug_parametres_inclus_incorrects', array('param' => "id/$primary"));
-			erreur_squelette($msg);
-			// on passe id=0 au routeur pour tomber sur le modele par defaut et eviter une seconde erreur sur un modele inexistant
-			$id = 0;
-		}
-		$modele = $styliseur($modele, $id);
-	}
-
-	return $modele;
+    static $styliseurs = null;
+    if (is_null($styliseurs)) {
+        $tables_objet = lister_tables_objets_sql();
+        foreach ($tables_objet as $table => $desc) {
+            if (isset($desc['modeles']) and $desc['modeles']
+                and isset($desc['modeles_styliser']) and $desc['modeles_styliser']
+                and function_exists($desc['modeles_styliser'])) {
+                $primary = id_table_objet($table);
+                foreach ($desc['modeles'] as $m) {
+                    $styliseurs[$m] = ['primary' => $primary, 'callback' => $desc['modeles_styliser']];
+                }
+            }
+        }
+    }
+
+    if (isset($styliseurs[$modele])) {
+        $styliseur = $styliseurs[$modele]['callback'];
+        if (is_null($id) and $contexte) {
+            if (isset($contexte['id'])) {
+                $id = $contexte['id'];
+            } elseif (isset($contexte[$primary])) {
+                $id = $contexte[$primary];
+            }
+        }
+        if (is_null($id)) {
+            $msg = "modeles/$modele : " . _T('zbug_parametres_inclus_incorrects', array('param' => "id/$primary"));
+            erreur_squelette($msg);
+            // on passe id=0 au routeur pour tomber sur le modele par defaut et eviter une seconde erreur sur un modele inexistant
+            $id = 0;
+        }
+        $modele = $styliseur($modele, $id);
+    }
+
+    return $modele;
 }
 
 /**
@@ -576,95 +576,95 @@ 
  */
 function inclure_modele($type, $id, $params, $lien, $connect = '', $env = array()) {
 
-	static $compteur;
-	if (++$compteur > 10) {
-		return '';
-	} # ne pas boucler indefiniment
-
-	$type = strtolower($type);
-	$type = styliser_modele($type, $id);
-
-	$fond = $class = '';
-
-	$params = array_filter(explode('|', $params));
-	if ($params) {
-		$soustype = current($params);
-		$soustype = strtolower(trim($soustype));
-		if (in_array($soustype, array('left', 'right', 'center', 'ajax'))) {
-			$soustype = next($params);
-			$soustype = strtolower($soustype);
-		}
-
-		if (preg_match(',^[a-z0-9_]+$,', $soustype)) {
-			if (!trouve_modele($fond = ($type . '_' . $soustype))) {
-				$fond = '';
-				$class = $soustype;
-			}
-			// enlever le sous type des params
-			$params = array_diff($params, array($soustype));
-		}
-	}
-
-	// Si ca marche pas en precisant le sous-type, prendre le type
-	if (!$fond and !trouve_modele($fond = $type)) {
-		spip_log("Modele $type introuvable", _LOG_INFO_IMPORTANTE);
-
-		return false;
-	}
-	$fond = 'modeles/' . $fond;
-	// Creer le contexte
-	$contexte = $env;
-	$contexte['dir_racine'] = _DIR_RACINE; # eviter de mixer un cache racine et un cache ecrire (meme si pour l'instant les modeles ne sont pas caches, le resultat etant different il faut que le contexte en tienne compte
-
-	// Le numero du modele est mis dans l'environnement
-	// d'une part sous l'identifiant "id"
-	// et d'autre part sous l'identifiant de la cle primaire
-	// par la fonction id_table_objet,
-	// (<article1> =>> article =>> id_article =>> id_article=1)
-	$_id = id_table_objet($type);
-	$contexte['id'] = $contexte[$_id] = $id;
-
-	if (isset($class)) {
-		$contexte['class'] = $class;
-	}
-
-	// Si un lien a ete passe en parametre, ex: [<modele1>->url] ou [<modele1|title_du_lien{hreflang}->url]
-	if ($lien) {
-		# un eventuel guillemet (") sera reechappe par #ENV
-		$contexte['lien'] = str_replace("&quot;", '"', $lien['href']);
-		$contexte['lien_class'] = $lien['class'];
-		$contexte['lien_mime'] = $lien['mime'];
-		$contexte['lien_title'] = $lien['title'];
-		$contexte['lien_hreflang'] = $lien['hreflang'];
-	}
-
-	// Traiter les parametres
-	// par exemple : <img1|center>, <emb12|autostart=true> ou <doc1|lang=en>
-	$arg_list = creer_contexte_de_modele($params);
-	$contexte['args'] = $arg_list; // on passe la liste des arguments du modeles dans une variable args
-	$contexte = array_merge($contexte, $arg_list);
-
-	// Appliquer le modele avec le contexte
-	$retour = recuperer_fond($fond, $contexte, array(), $connect);
-
-	// Regarder si le modele tient compte des liens (il *doit* alors indiquer
-	// spip_lien_ok dans les classes de son conteneur de premier niveau ;
-	// sinon, s'il y a un lien, on l'ajoute classiquement
-	if (strstr(' ' . ($classes = extraire_attribut($retour, 'class')) . ' ',
-		'spip_lien_ok')) {
-		$retour = inserer_attribut($retour, 'class',
-			trim(str_replace(' spip_lien_ok ', ' ', " $classes ")));
-	} else {
-		if ($lien) {
-			$retour = "<a href='" . $lien['href'] . "' class='" . $lien['class'] . "'>" . $retour . "</a>";
-		}
-	}
-
-	$compteur--;
-
-	return (isset($arg_list['ajax']) and $arg_list['ajax'] == 'ajax')
-		? encoder_contexte_ajax($contexte, '', $retour)
-		: $retour;
+    static $compteur;
+    if (++$compteur > 10) {
+        return '';
+    } # ne pas boucler indefiniment
+
+    $type = strtolower($type);
+    $type = styliser_modele($type, $id);
+
+    $fond = $class = '';
+
+    $params = array_filter(explode('|', $params));
+    if ($params) {
+        $soustype = current($params);
+        $soustype = strtolower(trim($soustype));
+        if (in_array($soustype, array('left', 'right', 'center', 'ajax'))) {
+            $soustype = next($params);
+            $soustype = strtolower($soustype);
+        }
+
+        if (preg_match(',^[a-z0-9_]+$,', $soustype)) {
+            if (!trouve_modele($fond = ($type . '_' . $soustype))) {
+                $fond = '';
+                $class = $soustype;
+            }
+            // enlever le sous type des params
+            $params = array_diff($params, array($soustype));
+        }
+    }
+
+    // Si ca marche pas en precisant le sous-type, prendre le type
+    if (!$fond and !trouve_modele($fond = $type)) {
+        spip_log("Modele $type introuvable", _LOG_INFO_IMPORTANTE);
+
+        return false;
+    }
+    $fond = 'modeles/' . $fond;
+    // Creer le contexte
+    $contexte = $env;
+    $contexte['dir_racine'] = _DIR_RACINE; # eviter de mixer un cache racine et un cache ecrire (meme si pour l'instant les modeles ne sont pas caches, le resultat etant different il faut que le contexte en tienne compte
+
+    // Le numero du modele est mis dans l'environnement
+    // d'une part sous l'identifiant "id"
+    // et d'autre part sous l'identifiant de la cle primaire
+    // par la fonction id_table_objet,
+    // (<article1> =>> article =>> id_article =>> id_article=1)
+    $_id = id_table_objet($type);
+    $contexte['id'] = $contexte[$_id] = $id;
+
+    if (isset($class)) {
+        $contexte['class'] = $class;
+    }
+
+    // Si un lien a ete passe en parametre, ex: [<modele1>->url] ou [<modele1|title_du_lien{hreflang}->url]
+    if ($lien) {
+        # un eventuel guillemet (") sera reechappe par #ENV
+        $contexte['lien'] = str_replace("&quot;", '"', $lien['href']);
+        $contexte['lien_class'] = $lien['class'];
+        $contexte['lien_mime'] = $lien['mime'];
+        $contexte['lien_title'] = $lien['title'];
+        $contexte['lien_hreflang'] = $lien['hreflang'];
+    }
+
+    // Traiter les parametres
+    // par exemple : <img1|center>, <emb12|autostart=true> ou <doc1|lang=en>
+    $arg_list = creer_contexte_de_modele($params);
+    $contexte['args'] = $arg_list; // on passe la liste des arguments du modeles dans une variable args
+    $contexte = array_merge($contexte, $arg_list);
+
+    // Appliquer le modele avec le contexte
+    $retour = recuperer_fond($fond, $contexte, array(), $connect);
+
+    // Regarder si le modele tient compte des liens (il *doit* alors indiquer
+    // spip_lien_ok dans les classes de son conteneur de premier niveau ;
+    // sinon, s'il y a un lien, on l'ajoute classiquement
+    if (strstr(' ' . ($classes = extraire_attribut($retour, 'class')) . ' ',
+        'spip_lien_ok')) {
+        $retour = inserer_attribut($retour, 'class',
+            trim(str_replace(' spip_lien_ok ', ' ', " $classes ")));
+    } else {
+        if ($lien) {
+            $retour = "<a href='" . $lien['href'] . "' class='" . $lien['class'] . "'>" . $retour . "</a>";
+        }
+    }
+
+    $compteur--;
+
+    return (isset($arg_list['ajax']) and $arg_list['ajax'] == 'ajax')
+        ? encoder_contexte_ajax($contexte, '', $retour)
+        : $retour;
 }
 
 // Un inclure_page qui marche aussi pour l'espace prive
@@ -674,92 +674,92 @@ 
 // https://code.spip.net/@evaluer_fond
 function evaluer_fond($fond, $contexte = array(), $connect = null) {
 
-	$page = inclure_page($fond, $contexte, $connect);
-
-	if (!$page) {
-		return $page;
-	}
-	// eval $page et affecte $res
-	include _ROOT_RESTREINT . "public/evaluer_page.php";
-
-	// Lever un drapeau (global) si le fond utilise #SESSION
-	// a destination de public/parametrer
-	// pour remonter vers les inclusions appelantes
-	// il faut bien lever ce drapeau apres avoir evalue le fond
-	// pour ne pas faire descendre le flag vers les inclusions appelees
-	if (isset($page['invalideurs'])
-		and isset($page['invalideurs']['session'])
-	) {
-		$GLOBALS['cache_utilise_session'] = $page['invalideurs']['session'];
-	}
-
-	return $page;
+    $page = inclure_page($fond, $contexte, $connect);
+
+    if (!$page) {
+        return $page;
+    }
+    // eval $page et affecte $res
+    include _ROOT_RESTREINT . "public/evaluer_page.php";
+
+    // Lever un drapeau (global) si le fond utilise #SESSION
+    // a destination de public/parametrer
+    // pour remonter vers les inclusions appelantes
+    // il faut bien lever ce drapeau apres avoir evalue le fond
+    // pour ne pas faire descendre le flag vers les inclusions appelees
+    if (isset($page['invalideurs'])
+        and isset($page['invalideurs']['session'])
+    ) {
+        $GLOBALS['cache_utilise_session'] = $page['invalideurs']['session'];
+    }
+
+    return $page;
 }
 
 
 // https://code.spip.net/@page_base_href
 function page_base_href(&$texte) {
-	static $set_html_base = null;
-	if (is_null($set_html_base)) {
-		if (!defined('_SET_HTML_BASE'))
-			// si la profondeur est superieure a 1
-			// est que ce n'est pas une url page ni une url action
-			// activer par defaut
-		{
-			$set_html_base = ((
-				$GLOBALS['profondeur_url'] >= (_DIR_RESTREINT ? 1 : 2)
-				and _request(_SPIP_PAGE) !== 'login'
-				and !_request('action')) ? true : false);
-		} else {
-			$set_html_base = _SET_HTML_BASE;
-		}
-	}
-
-	if ($set_html_base
-		and isset($GLOBALS['html']) and $GLOBALS['html']
-		and $GLOBALS['profondeur_url'] > 0
-		and ($poshead = strpos($texte, '</head>')) !== false
-	) {
-		$head = substr($texte, 0, $poshead);
-		$insert = false;
-		if (strpos($head, '<base') === false) {
-			$insert = true;
-		} else {
-			// si aucun <base ...> n'a de href c'est bon quand meme !
-			$insert = true;
-			include_spip('inc/filtres');
-			$bases = extraire_balises($head, 'base');
-			foreach ($bases as $base) {
-				if (extraire_attribut($base, 'href')) {
-					$insert = false;
-				}
-			}
-		}
-		if ($insert) {
-			include_spip('inc/filtres_mini');
-			// ajouter un base qui reglera tous les liens relatifs
-			$base = url_absolue('./');
-			$bbase = "\n<base href=\"$base\" />";
-			if (($pos = strpos($head, '<head>')) !== false) {
-				$head = substr_replace($head, $bbase, $pos + 6, 0);
-			} elseif (preg_match(",<head[^>]*>,i", $head, $r)) {
-				$head = str_replace($r[0], $r[0] . $bbase, $head);
-			}
-			$texte = $head . substr($texte, $poshead);
-			// gerer les ancres
-			$base = $_SERVER['REQUEST_URI'];
-			// pas de guillemets ni < dans l'URL qu'on insere dans le HTML
-			if (strpos($base,"'") or strpos($base,'"') or strpos($base,'<')) {
-				$base = str_replace(array("'",'"','<'),array("%27",'%22','%3C'), $base);
-			}
-			if (strpos($texte, "href='#") !== false) {
-				$texte = str_replace("href='#", "href='$base#", $texte);
-			}
-			if (strpos($texte, "href=\"#") !== false) {
-				$texte = str_replace("href=\"#", "href=\"$base#", $texte);
-			}
-		}
-	}
+    static $set_html_base = null;
+    if (is_null($set_html_base)) {
+        if (!defined('_SET_HTML_BASE'))
+            // si la profondeur est superieure a 1
+            // est que ce n'est pas une url page ni une url action
+            // activer par defaut
+        {
+            $set_html_base = ((
+                $GLOBALS['profondeur_url'] >= (_DIR_RESTREINT ? 1 : 2)
+                and _request(_SPIP_PAGE) !== 'login'
+                and !_request('action')) ? true : false);
+        } else {
+            $set_html_base = _SET_HTML_BASE;
+        }
+    }
+
+    if ($set_html_base
+        and isset($GLOBALS['html']) and $GLOBALS['html']
+        and $GLOBALS['profondeur_url'] > 0
+        and ($poshead = strpos($texte, '</head>')) !== false
+    ) {
+        $head = substr($texte, 0, $poshead);
+        $insert = false;
+        if (strpos($head, '<base') === false) {
+            $insert = true;
+        } else {
+            // si aucun <base ...> n'a de href c'est bon quand meme !
+            $insert = true;
+            include_spip('inc/filtres');
+            $bases = extraire_balises($head, 'base');
+            foreach ($bases as $base) {
+                if (extraire_attribut($base, 'href')) {
+                    $insert = false;
+                }
+            }
+        }
+        if ($insert) {
+            include_spip('inc/filtres_mini');
+            // ajouter un base qui reglera tous les liens relatifs
+            $base = url_absolue('./');
+            $bbase = "\n<base href=\"$base\" />";
+            if (($pos = strpos($head, '<head>')) !== false) {
+                $head = substr_replace($head, $bbase, $pos + 6, 0);
+            } elseif (preg_match(",<head[^>]*>,i", $head, $r)) {
+                $head = str_replace($r[0], $r[0] . $bbase, $head);
+            }
+            $texte = $head . substr($texte, $poshead);
+            // gerer les ancres
+            $base = $_SERVER['REQUEST_URI'];
+            // pas de guillemets ni < dans l'URL qu'on insere dans le HTML
+            if (strpos($base,"'") or strpos($base,'"') or strpos($base,'<')) {
+                $base = str_replace(array("'",'"','<'),array("%27",'%22','%3C'), $base);
+            }
+            if (strpos($texte, "href='#") !== false) {
+                $texte = str_replace("href='#", "href='$base#", $texte);
+            }
+            if (strpos($texte, "href=\"#") !== false) {
+                $texte = str_replace("href=\"#", "href=\"$base#", $texte);
+            }
+        }
+    }
 }
 
 
@@ -767,8 +767,8 @@ 
 // et demarrent par X-Spip-...
 // https://code.spip.net/@envoyer_entetes
 function envoyer_entetes($entetes) {
-	foreach ($entetes as $k => $v) #	if (strncmp($k, 'X-Spip-', 7))
-	{
-		@header(strlen($v) ? "$k: $v" : $k);
-	}
+    foreach ($entetes as $k => $v) #	if (strncmp($k, 'X-Spip-', 7))
+    {
+        @header(strlen($v) ? "$k: $v" : $k);
+    }
 }

ecrire/public/styliser.php

Indentation +124 added lines, -124 removed lines

@@ -20,7 +20,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 // Ce fichier doit imperativement definir la fonction ci-dessous:
@@ -39,59 +39,59 @@ 
  * @return array
  */
 function public_styliser_dist($fond, $contexte, $lang = '', $connect = '') {
-	static $styliser_par_z;
-
-	// s'assurer que le fond est licite
-	// car il peut etre construit a partir d'une variable d'environnement
-	if (strpos($fond, "../") !== false or strncmp($fond, '/', 1) == 0) {
-		$fond = "404";
-	}
-
-	if (strncmp($fond, 'modeles/', 8) == 0) {
-		$modele = substr($fond, 8);
-		$modele = styliser_modele($modele, null, $contexte);
-		$fond = "modeles/$modele";
-	}
-
-	// Choisir entre $fond-dist.html, $fond=7.html, etc?
-	$id_rubrique = 0;
-	// Chercher le fond qui va servir de squelette
-	if ($r = quete_rubrique_fond($contexte)) {
-		list($id_rubrique, $lang) = $r;
-	}
-
-	// trouver un squelette du nom demande
-	// ne rien dire si on ne trouve pas, 
-	// c'est l'appelant qui sait comment gerer la situation
-	// ou les plugins qui feront mieux dans le pipeline
-	$squelette = trouver_fond($fond, "", true);
-	$ext = $squelette['extension'];
-
-	$flux = array(
-		'args' => array(
-			'id_rubrique' => $id_rubrique,
-			'ext' => $ext,
-			'fond' => $fond,
-			'lang' => $lang,
-			'contexte' => $contexte, // le style d'un objet peut dependre de lui meme
-			'connect' => $connect
-		),
-		'data' => $squelette['fond'],
-	);
-
-	if (test_espace_prive() or defined('_ZPIP')) {
-		if (!$styliser_par_z) {
-			$styliser_par_z = charger_fonction('styliser_par_z', 'public');
-		}
-		$flux = $styliser_par_z($flux);
-	}
-
-	$flux = styliser_par_objets($flux);
-
-	// pipeline styliser
-	$squelette = pipeline('styliser', $flux);
-
-	return array($squelette, $ext, $ext, "$squelette.$ext");
+    static $styliser_par_z;
+
+    // s'assurer que le fond est licite
+    // car il peut etre construit a partir d'une variable d'environnement
+    if (strpos($fond, "../") !== false or strncmp($fond, '/', 1) == 0) {
+        $fond = "404";
+    }
+
+    if (strncmp($fond, 'modeles/', 8) == 0) {
+        $modele = substr($fond, 8);
+        $modele = styliser_modele($modele, null, $contexte);
+        $fond = "modeles/$modele";
+    }
+
+    // Choisir entre $fond-dist.html, $fond=7.html, etc?
+    $id_rubrique = 0;
+    // Chercher le fond qui va servir de squelette
+    if ($r = quete_rubrique_fond($contexte)) {
+        list($id_rubrique, $lang) = $r;
+    }
+
+    // trouver un squelette du nom demande
+    // ne rien dire si on ne trouve pas, 
+    // c'est l'appelant qui sait comment gerer la situation
+    // ou les plugins qui feront mieux dans le pipeline
+    $squelette = trouver_fond($fond, "", true);
+    $ext = $squelette['extension'];
+
+    $flux = array(
+        'args' => array(
+            'id_rubrique' => $id_rubrique,
+            'ext' => $ext,
+            'fond' => $fond,
+            'lang' => $lang,
+            'contexte' => $contexte, // le style d'un objet peut dependre de lui meme
+            'connect' => $connect
+        ),
+        'data' => $squelette['fond'],
+    );
+
+    if (test_espace_prive() or defined('_ZPIP')) {
+        if (!$styliser_par_z) {
+            $styliser_par_z = charger_fonction('styliser_par_z', 'public');
+        }
+        $flux = $styliser_par_z($flux);
+    }
+
+    $flux = styliser_par_objets($flux);
+
+    // pipeline styliser
+    $squelette = pipeline('styliser', $flux);
+
+    return array($squelette, $ext, $ext, "$squelette.$ext");
 }
 
 /**
@@ -110,31 +110,31 @@ 
  *     Données du pipeline styliser
  **/
 function styliser_par_objets($flux) {
-	if (test_espace_prive()
-		and !$squelette = $flux['data']
-		and strncmp($flux['args']['fond'], 'prive/objets/', 13) == 0
-		and $echafauder = charger_fonction('echafauder', 'prive', true)
-	) {
-		if (strncmp($flux['args']['fond'], 'prive/objets/liste/', 19) == 0) {
-			$table = table_objet(substr($flux['args']['fond'], 19));
-			$table_sql = table_objet_sql($table);
-			$objets = lister_tables_objets_sql();
-			if (isset($objets[$table_sql])) {
-				$flux['data'] = $echafauder($table, $table, $table_sql, "prive/objets/liste/objets", $flux['args']['ext']);
-			}
-		}
-		if (strncmp($flux['args']['fond'], 'prive/objets/contenu/', 21) == 0) {
-			$type = substr($flux['args']['fond'], 21);
-			$table = table_objet($type);
-			$table_sql = table_objet_sql($table);
-			$objets = lister_tables_objets_sql();
-			if (isset($objets[$table_sql])) {
-				$flux['data'] = $echafauder($type, $table, $table_sql, "prive/objets/contenu/objet", $flux['args']['ext']);
-			}
-		}
-	}
-
-	return $flux;
+    if (test_espace_prive()
+        and !$squelette = $flux['data']
+        and strncmp($flux['args']['fond'], 'prive/objets/', 13) == 0
+        and $echafauder = charger_fonction('echafauder', 'prive', true)
+    ) {
+        if (strncmp($flux['args']['fond'], 'prive/objets/liste/', 19) == 0) {
+            $table = table_objet(substr($flux['args']['fond'], 19));
+            $table_sql = table_objet_sql($table);
+            $objets = lister_tables_objets_sql();
+            if (isset($objets[$table_sql])) {
+                $flux['data'] = $echafauder($table, $table, $table_sql, "prive/objets/liste/objets", $flux['args']['ext']);
+            }
+        }
+        if (strncmp($flux['args']['fond'], 'prive/objets/contenu/', 21) == 0) {
+            $type = substr($flux['args']['fond'], 21);
+            $table = table_objet($type);
+            $table_sql = table_objet_sql($table);
+            $objets = lister_tables_objets_sql();
+            if (isset($objets[$table_sql])) {
+                $flux['data'] = $echafauder($type, $table, $table_sql, "prive/objets/contenu/objet", $flux['args']['ext']);
+            }
+        }
+    }
+
+    return $flux;
 }
 
 /**
@@ -150,49 +150,49 @@ 
  * @return array
  */
 function quete_rubrique_fond($contexte) {
-	static $liste_objets = null;
-	static $quete = array();
-	if (is_null($liste_objets)) {
-		$liste_objets = array();
-		include_spip('inc/urls');
-		include_spip('public/quete');
-		$l = urls_liste_objets(false);
-		// placer la rubrique en tete des objets
-		$l = array_diff($l, array('rubrique'));
-		array_unshift($l, 'rubrique');
-		foreach ($l as $objet) {
-			$id = id_table_objet($objet);
-			if (!isset($liste_objets[$id])) {
-				$liste_objets[$id] = objet_type($objet, false);
-			}
-		}
-	}
-	$c = array_intersect_key($contexte, $liste_objets);
-	if (!count($c)) {
-		return false;
-	}
-
-	$c = array_map('intval', $c);
-	$s = serialize($c);
-	if (isset($quete[$s])) {
-		return $quete[$s];
-	}
-
-	if (isset($c['id_rubrique']) and $r = $c['id_rubrique']) {
-		unset($c['id_rubrique']);
-		$c = array('id_rubrique' => $r) + $c;
-	}
-
-	foreach ($c as $_id => $id) {
-		if ($id
-			and $row = quete_parent_lang(table_objet_sql($liste_objets[$_id]), $id)
-		) {
-			$lang = isset($row['lang']) ? $row['lang'] : '';
-			if ($_id == 'id_rubrique' or (isset($row['id_rubrique']) and $id = $row['id_rubrique'])) {
-				return $quete[$s] = array($id, $lang);
-			}
-		}
-	}
-
-	return $quete[$s] = false;
+    static $liste_objets = null;
+    static $quete = array();
+    if (is_null($liste_objets)) {
+        $liste_objets = array();
+        include_spip('inc/urls');
+        include_spip('public/quete');
+        $l = urls_liste_objets(false);
+        // placer la rubrique en tete des objets
+        $l = array_diff($l, array('rubrique'));
+        array_unshift($l, 'rubrique');
+        foreach ($l as $objet) {
+            $id = id_table_objet($objet);
+            if (!isset($liste_objets[$id])) {
+                $liste_objets[$id] = objet_type($objet, false);
+            }
+        }
+    }
+    $c = array_intersect_key($contexte, $liste_objets);
+    if (!count($c)) {
+        return false;
+    }
+
+    $c = array_map('intval', $c);
+    $s = serialize($c);
+    if (isset($quete[$s])) {
+        return $quete[$s];
+    }
+
+    if (isset($c['id_rubrique']) and $r = $c['id_rubrique']) {
+        unset($c['id_rubrique']);
+        $c = array('id_rubrique' => $r) + $c;
+    }
+
+    foreach ($c as $_id => $id) {
+        if ($id
+            and $row = quete_parent_lang(table_objet_sql($liste_objets[$_id]), $id)
+        ) {
+            $lang = isset($row['lang']) ? $row['lang'] : '';
+            if ($_id == 'id_rubrique' or (isset($row['id_rubrique']) and $id = $row['id_rubrique'])) {
+                return $quete[$s] = array($id, $lang);
+            }
+        }
+    }
+
+    return $quete[$s] = false;
 }

ecrire/balise/logo_.php

Doc Comments +1 added lines, -1 removed lines

@@ -148,7 +148,7 @@
  * @param int $fichier
  *     - -1 pour retourner juste le chemin de l'image
  *     - 0 pour retourner le code HTML de l'image
- * @param string $lien
+ * @param string $_lien
  *     Lien pour encadrer l'image avec si présent
  * @param Champ $p
  *     Pile au niveau de la balise

Indentation +95 added lines, -95 removed lines

@@ -17,7 +17,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 
@@ -54,84 +54,84 @@ 
  */
 function balise_LOGO__dist($p) {
 
-	preg_match(',^LOGO_([A-Z_]+?)(|_NORMAL|_SURVOL|_RUBRIQUE)$,i', $p->nom_champ, $regs);
-	$type = strtolower($regs[1]);
-	$suite_logo = $regs[2];
-
-	// cas de #LOGO_SITE_SPIP
-	if ($type == 'site_spip') {
-		$type = 'site';
-		$_id_objet = "\"'0'\"";
-	}
-
-	$id_objet = id_table_objet($type);
-	if (!isset($_id_objet)) {
-		$_id_objet = champ_sql($id_objet, $p);
-	}
-
-	$fichier = ($p->etoile === '**') ? -1 : 0;
-	$coord = array();
-	$align = $lien = '';
-	$mode_logo = '';
-
-	if ($p->param and !$p->param[0][0]) {
-		$params = $p->param[0];
-		array_shift($params);
-		foreach ($params as $a) {
-			if ($a[0]->type === 'texte') {
-				$n = $a[0]->texte;
-				if (is_numeric($n)) {
-					$coord[] = $n;
-				} elseif (in_array($n, array('top', 'left', 'right', 'center', 'bottom'))) {
-					$align = $n;
-				} elseif (in_array($n, array('auto', 'icone', 'apercu', 'vignette'))) {
-					$mode_logo = $n;
-				}
-			} else {
-				$lien = calculer_liste($a, $p->descr, $p->boucles, $p->id_boucle);
-			}
-		}
-	}
-
-	$coord_x = !$coord ? 0 : intval(array_shift($coord));
-	$coord_y = !$coord ? 0 : intval(array_shift($coord));
-
-	if ($p->etoile === '*') {
-		include_spip('balise/url_');
-		$lien = generer_generer_url_arg($type, $p, $_id_objet);
-	}
-
-	$connect = $p->id_boucle ? $p->boucles[$p->id_boucle]->sql_serveur : '';
-	if ($type == 'document') {
-		$qconnect = _q($connect);
-		$doc = "quete_document($_id_objet, $qconnect)";
-		if ($fichier) {
-			$code = "quete_logo_file($doc, $qconnect)";
-		} else {
-			$code = "quete_logo_document($doc, " . ($lien ? $lien : "''") . ", '$align', '$mode_logo', $coord_x, $coord_y, $qconnect)";
-		}
-		// (x=non-faux ? y : '') pour affecter x en retournant y
-		if ($p->descr['documents']) {
-			$code = '(($doublons["documents"] .= ",". '
-				. $_id_objet
-				. ") ? $code : '')";
-		}
-	} elseif ($connect) {
-		$code = "''";
-		spip_log('Les logos distants ne sont pas prevus');
-	} else {
-		$code = logo_survol($id_objet, $_id_objet, $type, $align, $fichier, $lien, $p, $suite_logo);
-	}
-
-	// demande de reduction sur logo avec ecriture spip 2.1 : #LOGO_xxx{200, 0}
-	if ($coord_x or $coord_y) {
-		$code = "filtrer('image_graver',filtrer('image_reduire'," . $code . ", '$coord_x', '$coord_y'))";
-	}
-
-	$p->code = $code;
-	$p->interdire_scripts = false;
-
-	return $p;
+    preg_match(',^LOGO_([A-Z_]+?)(|_NORMAL|_SURVOL|_RUBRIQUE)$,i', $p->nom_champ, $regs);
+    $type = strtolower($regs[1]);
+    $suite_logo = $regs[2];
+
+    // cas de #LOGO_SITE_SPIP
+    if ($type == 'site_spip') {
+        $type = 'site';
+        $_id_objet = "\"'0'\"";
+    }
+
+    $id_objet = id_table_objet($type);
+    if (!isset($_id_objet)) {
+        $_id_objet = champ_sql($id_objet, $p);
+    }
+
+    $fichier = ($p->etoile === '**') ? -1 : 0;
+    $coord = array();
+    $align = $lien = '';
+    $mode_logo = '';
+
+    if ($p->param and !$p->param[0][0]) {
+        $params = $p->param[0];
+        array_shift($params);
+        foreach ($params as $a) {
+            if ($a[0]->type === 'texte') {
+                $n = $a[0]->texte;
+                if (is_numeric($n)) {
+                    $coord[] = $n;
+                } elseif (in_array($n, array('top', 'left', 'right', 'center', 'bottom'))) {
+                    $align = $n;
+                } elseif (in_array($n, array('auto', 'icone', 'apercu', 'vignette'))) {
+                    $mode_logo = $n;
+                }
+            } else {
+                $lien = calculer_liste($a, $p->descr, $p->boucles, $p->id_boucle);
+            }
+        }
+    }
+
+    $coord_x = !$coord ? 0 : intval(array_shift($coord));
+    $coord_y = !$coord ? 0 : intval(array_shift($coord));
+
+    if ($p->etoile === '*') {
+        include_spip('balise/url_');
+        $lien = generer_generer_url_arg($type, $p, $_id_objet);
+    }
+
+    $connect = $p->id_boucle ? $p->boucles[$p->id_boucle]->sql_serveur : '';
+    if ($type == 'document') {
+        $qconnect = _q($connect);
+        $doc = "quete_document($_id_objet, $qconnect)";
+        if ($fichier) {
+            $code = "quete_logo_file($doc, $qconnect)";
+        } else {
+            $code = "quete_logo_document($doc, " . ($lien ? $lien : "''") . ", '$align', '$mode_logo', $coord_x, $coord_y, $qconnect)";
+        }
+        // (x=non-faux ? y : '') pour affecter x en retournant y
+        if ($p->descr['documents']) {
+            $code = '(($doublons["documents"] .= ",". '
+                . $_id_objet
+                . ") ? $code : '')";
+        }
+    } elseif ($connect) {
+        $code = "''";
+        spip_log('Les logos distants ne sont pas prevus');
+    } else {
+        $code = logo_survol($id_objet, $_id_objet, $type, $align, $fichier, $lien, $p, $suite_logo);
+    }
+
+    // demande de reduction sur logo avec ecriture spip 2.1 : #LOGO_xxx{200, 0}
+    if ($coord_x or $coord_y) {
+        $code = "filtrer('image_graver',filtrer('image_reduire'," . $code . ", '$coord_x', '$coord_y'))";
+    }
+
+    $p->code = $code;
+    $p->interdire_scripts = false;
+
+    return $p;
 }
 
 /**
@@ -158,20 +158,20 @@ 
  *     Code compilé retournant le chemin du logo ou le code HTML du logo.
  **/
 function logo_survol($id_objet, $_id_objet, $type, $align, $fichier, $_lien, $p, $suite) {
-	$code = "quete_logo('$id_objet', '" .
-		(($suite == '_SURVOL') ? 'off' :
-			(($suite == '_NORMAL') ? 'on' : 'ON')) .
-		"', $_id_objet," .
-		(($suite == '_RUBRIQUE') ?
-			champ_sql('id_rubrique', $p) :
-			(($type == 'rubrique') ? "quete_parent($_id_objet)" : "''")) .
-		', ' . intval($fichier) . ')';
-
-	if ($fichier) {
-		return $code;
-	}
-
-	$align = preg_replace(",\W,", "", $align);
-
-	return "quete_html_logo($code, '$align', " .($_lien ? $_lien : "''") .")";
+    $code = "quete_logo('$id_objet', '" .
+        (($suite == '_SURVOL') ? 'off' :
+            (($suite == '_NORMAL') ? 'on' : 'ON')) .
+        "', $_id_objet," .
+        (($suite == '_RUBRIQUE') ?
+            champ_sql('id_rubrique', $p) :
+            (($type == 'rubrique') ? "quete_parent($_id_objet)" : "''")) .
+        ', ' . intval($fichier) . ')';
+
+    if ($fichier) {
+        return $code;
+    }
+
+    $align = preg_replace(",\W,", "", $align);
+
+    return "quete_html_logo($code, '$align', " .($_lien ? $_lien : "''") .")";
 }

Spacing +8 added lines, -10 removed lines

@@ -108,7 +108,7 @@ 
 		if ($fichier) {
 			$code = "quete_logo_file($doc, $qconnect)";
 		} else {
-			$code = "quete_logo_document($doc, " . ($lien ? $lien : "''") . ", '$align', '$mode_logo', $coord_x, $coord_y, $qconnect)";
+			$code = "quete_logo_document($doc, ".($lien ? $lien : "''").", '$align', '$mode_logo', $coord_x, $coord_y, $qconnect)";
 		}
 		// (x=non-faux ? y : '') pour affecter x en retournant y
 		if ($p->descr['documents']) {
@@ -125,7 +125,7 @@ 
 
 	// demande de reduction sur logo avec ecriture spip 2.1 : #LOGO_xxx{200, 0}
 	if ($coord_x or $coord_y) {
-		$code = "filtrer('image_graver',filtrer('image_reduire'," . $code . ", '$coord_x', '$coord_y'))";
+		$code = "filtrer('image_graver',filtrer('image_reduire',".$code.", '$coord_x', '$coord_y'))";
 	}
 
 	$p->code = $code;
@@ -158,14 +158,12 @@ 
  *     Code compilé retournant le chemin du logo ou le code HTML du logo.
  **/
 function logo_survol($id_objet, $_id_objet, $type, $align, $fichier, $_lien, $p, $suite) {
-	$code = "quete_logo('$id_objet', '" .
-		(($suite == '_SURVOL') ? 'off' :
-			(($suite == '_NORMAL') ? 'on' : 'ON')) .
-		"', $_id_objet," .
+	$code = "quete_logo('$id_objet', '".
+		(($suite == '_SURVOL') ? 'off' : (($suite == '_NORMAL') ? 'on' : 'ON')).
+		"', $_id_objet,".
 		(($suite == '_RUBRIQUE') ?
-			champ_sql('id_rubrique', $p) :
-			(($type == 'rubrique') ? "quete_parent($_id_objet)" : "''")) .
-		', ' . intval($fichier) . ')';
+			champ_sql('id_rubrique', $p) : (($type == 'rubrique') ? "quete_parent($_id_objet)" : "''")).
+		', '.intval($fichier).')';
 
 	if ($fichier) {
 		return $code;
@@ -173,5 +171,5 @@ 
 
 	$align = preg_replace(",\W,", "", $align);
 
-	return "quete_html_logo($code, '$align', " .($_lien ? $_lien : "''") .")";
+	return "quete_html_logo($code, '$align', ".($_lien ? $_lien : "''").")";
 }

ecrire/auth/spip.php

Indentation +260 added lines, -260 removed lines

@@ -17,7 +17,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -32,78 +32,78 @@ 
  */
 function auth_spip_dist($login, $pass, $serveur = '', $phpauth = false) {
 
-	// retrouver le login
-	$login = auth_spip_retrouver_login($login);
-	// login inconnu, n'allons pas plus loin
-	if (!$login) {
-		return array();
-	}
-
-	$md5pass = "";
-	$shapass = $shanext = "";
-
-	if (preg_match(",^\{([0-9a-f]{64});([0-9a-f]{64})\}$,i", $pass, $regs)) {
-		$shapass = $regs[1];
-		$shanext = $regs[2];
-	} // compat avec une base mixte md5/sha256 : le js a envoye les 2 hash
-	elseif (preg_match(",^\{([0-9a-f]{64});([0-9a-f]{64});([0-9a-f]{32});([0-9a-f]{32})\}$,i", $pass, $regs)) {
-		$shapass = $regs[1];
-		$shanext = $regs[2];
-		$md5pass = $regs[3];
-		//$md5next = $regs[4];
-	} // si envoi non crypte, crypter maintenant
-	elseif ($pass) {
-		$row = sql_fetsel("alea_actuel, alea_futur", "spip_auteurs", "login=" . sql_quote($login, $serveur, 'text'), '', '',
-			'', '', $serveur);
-
-		if ($row) {
-			include_spip('auth/sha256.inc');
-			$shapass = spip_sha256($row['alea_actuel'] . $pass);
-			$shanext = spip_sha256($row['alea_futur'] . $pass);
-			$md5pass = md5($row['alea_actuel'] . $pass);
-		}
-	}
-
-	// login inexistant ou mot de passe vide
-	if (!$shapass and !$md5pass) {
-		return array();
-	}
-
-	$row = sql_fetsel("*", "spip_auteurs",
-		"login=" . sql_quote($login, $serveur, 'text') . " AND pass=" . sql_quote($shapass, $serveur,
-			'text') . " AND statut<>'5poubelle'", '', '', '', '', $serveur);
-
-	// compat avec les anciennes bases en md5
-	if (!$row and $md5pass) {
-		$row = sql_fetsel("*", "spip_auteurs",
-			"login=" . sql_quote($login, $serveur, 'text') . " AND pass=" . sql_quote($md5pass, $serveur,
-				'text') . " AND statut<>'5poubelle'", '', '', '', '', $serveur);
-	}
-
-	// login/mot de passe incorrect
-	if (!$row) {
-		return array();
-	}
-
-	// fait tourner le codage du pass dans la base
-	// sauf si phpauth : cela reviendrait a changer l'alea a chaque hit, et aucune action verifiable par securiser_action()
-	if ($shanext and !$phpauth) {
-
-		include_spip('inc/acces'); // pour creer_uniqid
-		@sql_update('spip_auteurs', array(
-			'alea_actuel' => 'alea_futur',
-			'pass' => sql_quote($shanext, $serveur, 'text'),
-			'alea_futur' => sql_quote(creer_uniqid(), $serveur, 'text')
-		), "id_auteur=" . $row['id_auteur'] . ' AND pass IN (' . sql_quote($shapass, $serveur,
-				'text') . ', ' . sql_quote($md5pass, $serveur, 'text') . ')', '', $serveur);
-		// En profiter pour verifier la securite de tmp/
-		// Si elle ne fonctionne pas a l'installation, prevenir
-		if (!verifier_htaccess(_DIR_TMP) and defined('_ECRIRE_INSTALL')) {
-			return false;
-		}
-	}
-
-	return $row;
+    // retrouver le login
+    $login = auth_spip_retrouver_login($login);
+    // login inconnu, n'allons pas plus loin
+    if (!$login) {
+        return array();
+    }
+
+    $md5pass = "";
+    $shapass = $shanext = "";
+
+    if (preg_match(",^\{([0-9a-f]{64});([0-9a-f]{64})\}$,i", $pass, $regs)) {
+        $shapass = $regs[1];
+        $shanext = $regs[2];
+    } // compat avec une base mixte md5/sha256 : le js a envoye les 2 hash
+    elseif (preg_match(",^\{([0-9a-f]{64});([0-9a-f]{64});([0-9a-f]{32});([0-9a-f]{32})\}$,i", $pass, $regs)) {
+        $shapass = $regs[1];
+        $shanext = $regs[2];
+        $md5pass = $regs[3];
+        //$md5next = $regs[4];
+    } // si envoi non crypte, crypter maintenant
+    elseif ($pass) {
+        $row = sql_fetsel("alea_actuel, alea_futur", "spip_auteurs", "login=" . sql_quote($login, $serveur, 'text'), '', '',
+            '', '', $serveur);
+
+        if ($row) {
+            include_spip('auth/sha256.inc');
+            $shapass = spip_sha256($row['alea_actuel'] . $pass);
+            $shanext = spip_sha256($row['alea_futur'] . $pass);
+            $md5pass = md5($row['alea_actuel'] . $pass);
+        }
+    }
+
+    // login inexistant ou mot de passe vide
+    if (!$shapass and !$md5pass) {
+        return array();
+    }
+
+    $row = sql_fetsel("*", "spip_auteurs",
+        "login=" . sql_quote($login, $serveur, 'text') . " AND pass=" . sql_quote($shapass, $serveur,
+            'text') . " AND statut<>'5poubelle'", '', '', '', '', $serveur);
+
+    // compat avec les anciennes bases en md5
+    if (!$row and $md5pass) {
+        $row = sql_fetsel("*", "spip_auteurs",
+            "login=" . sql_quote($login, $serveur, 'text') . " AND pass=" . sql_quote($md5pass, $serveur,
+                'text') . " AND statut<>'5poubelle'", '', '', '', '', $serveur);
+    }
+
+    // login/mot de passe incorrect
+    if (!$row) {
+        return array();
+    }
+
+    // fait tourner le codage du pass dans la base
+    // sauf si phpauth : cela reviendrait a changer l'alea a chaque hit, et aucune action verifiable par securiser_action()
+    if ($shanext and !$phpauth) {
+
+        include_spip('inc/acces'); // pour creer_uniqid
+        @sql_update('spip_auteurs', array(
+            'alea_actuel' => 'alea_futur',
+            'pass' => sql_quote($shanext, $serveur, 'text'),
+            'alea_futur' => sql_quote(creer_uniqid(), $serveur, 'text')
+        ), "id_auteur=" . $row['id_auteur'] . ' AND pass IN (' . sql_quote($shapass, $serveur,
+                'text') . ', ' . sql_quote($md5pass, $serveur, 'text') . ')', '', $serveur);
+        // En profiter pour verifier la securite de tmp/
+        // Si elle ne fonctionne pas a l'installation, prevenir
+        if (!verifier_htaccess(_DIR_TMP) and defined('_ECRIRE_INSTALL')) {
+            return false;
+        }
+    }
+
+    return $row;
 }
 
 /**
@@ -113,41 +113,41 @@ 
  * @return array
  */
 function auth_spip_formulaire_login($flux) {
-	// faut il encore envoyer md5 ?
-	// on regarde si il reste des pass md5 en base pour des auteurs en statut pas poubelle
-	// les hash md5 ont une longueur 32, les sha 64
-	// en evitant une requete sql a chaque affichage du formulaire login sans session
-	// (perf issue pour les sites qui mettent le formulaire de login sur la home)
-	$compat_md5 = false;
-	if (!isset($GLOBALS['meta']['sha_256_only']) or _request('var_mode')) {
-		$compat_md5 = sql_countsel("spip_auteurs", "length(pass)=32 AND statut<>'poubelle'");
-		if ($compat_md5 and isset($GLOBALS['meta']['sha_256_only'])) {
-			effacer_meta('sha_256_only');
-		}
-		if (!$compat_md5) {
-			ecrire_meta('sha_256_only', 'oui');
-		}
-	}
-
-	// javascript qui gere la securite du login en evitant de faire circuler le pass en clair
-	$flux['data'] .=
-		($compat_md5 ? '<script type="text/javascript" src="' . _DIR_JAVASCRIPT . 'md5.js"></script>' : '')
-		. '<script type="text/javascript" src="' . _DIR_JAVASCRIPT . 'login-sha-min.js"></script>'
-		. '<script type="text/javascript">/*<![CDATA[*/'
-		. "var login_info={'alea_actuel':'" . $flux['args']['contexte']['_alea_actuel'] . "',"
-		. "'alea_futur':'" . $flux['args']['contexte']['_alea_futur'] . "',"
-		. "'login':'" . $flux['args']['contexte']['var_login'] . "',"
-		. "'page_auteur': '" . generer_url_public('informer_auteur') . "',"
-		. "'informe_auteur_en_cours':false,"
-		. "'attente_informe':0,"
-		. "'compat_md5':" . ($compat_md5 ? "true" : "false") . "};"
-		. "jQuery(function(){
+    // faut il encore envoyer md5 ?
+    // on regarde si il reste des pass md5 en base pour des auteurs en statut pas poubelle
+    // les hash md5 ont une longueur 32, les sha 64
+    // en evitant une requete sql a chaque affichage du formulaire login sans session
+    // (perf issue pour les sites qui mettent le formulaire de login sur la home)
+    $compat_md5 = false;
+    if (!isset($GLOBALS['meta']['sha_256_only']) or _request('var_mode')) {
+        $compat_md5 = sql_countsel("spip_auteurs", "length(pass)=32 AND statut<>'poubelle'");
+        if ($compat_md5 and isset($GLOBALS['meta']['sha_256_only'])) {
+            effacer_meta('sha_256_only');
+        }
+        if (!$compat_md5) {
+            ecrire_meta('sha_256_only', 'oui');
+        }
+    }
+
+    // javascript qui gere la securite du login en evitant de faire circuler le pass en clair
+    $flux['data'] .=
+        ($compat_md5 ? '<script type="text/javascript" src="' . _DIR_JAVASCRIPT . 'md5.js"></script>' : '')
+        . '<script type="text/javascript" src="' . _DIR_JAVASCRIPT . 'login-sha-min.js"></script>'
+        . '<script type="text/javascript">/*<![CDATA[*/'
+        . "var login_info={'alea_actuel':'" . $flux['args']['contexte']['_alea_actuel'] . "',"
+        . "'alea_futur':'" . $flux['args']['contexte']['_alea_futur'] . "',"
+        . "'login':'" . $flux['args']['contexte']['var_login'] . "',"
+        . "'page_auteur': '" . generer_url_public('informer_auteur') . "',"
+        . "'informe_auteur_en_cours':false,"
+        . "'attente_informe':0,"
+        . "'compat_md5':" . ($compat_md5 ? "true" : "false") . "};"
+        . "jQuery(function(){
 	jQuery('#var_login').change(actualise_auteur);
 	jQuery('form#formulaire_login').submit(login_submit);
 });"
-		. "/*]]>*/</script>";
+        . "/*]]>*/</script>";
 
-	return $flux;
+    return $flux;
 }
 
 
@@ -159,10 +159,10 @@ 
  *   toujours true pour un auteur cree dans SPIP
  */
 function auth_spip_autoriser_modifier_login($serveur = '') {
-	if (strlen($serveur)) {
-		return false;
-	} // les fonctions d'ecriture sur base distante sont encore incompletes
-	return true;
+    if (strlen($serveur)) {
+        return false;
+    } // les fonctions d'ecriture sur base distante sont encore incompletes
+    return true;
 }
 
 /**
@@ -176,21 +176,21 @@ 
  *  message d'erreur si login non valide, chaine vide sinon
  */
 function auth_spip_verifier_login($new_login, $id_auteur = 0, $serveur = '') {
-	// login et mot de passe
-	if (strlen($new_login)) {
-		if (strlen($new_login) < _LOGIN_TROP_COURT) {
-			return _T('info_login_trop_court_car_pluriel', array('nb' => _LOGIN_TROP_COURT));
-		} else {
-			$n = sql_countsel('spip_auteurs',
-				"login=" . sql_quote($new_login) . " AND id_auteur!=" . intval($id_auteur) . " AND statut!='5poubelle'", '', '',
-				$serveur);
-			if ($n) {
-				return _T('info_login_existant');
-			}
-		}
-	}
-
-	return '';
+    // login et mot de passe
+    if (strlen($new_login)) {
+        if (strlen($new_login) < _LOGIN_TROP_COURT) {
+            return _T('info_login_trop_court_car_pluriel', array('nb' => _LOGIN_TROP_COURT));
+        } else {
+            $n = sql_countsel('spip_auteurs',
+                "login=" . sql_quote($new_login) . " AND id_auteur!=" . intval($id_auteur) . " AND statut!='5poubelle'", '', '',
+                $serveur);
+            if ($n) {
+                return _T('info_login_existant');
+            }
+        }
+    }
+
+    return '';
 }
 
 /**
@@ -202,32 +202,32 @@ 
  * @return bool
  */
 function auth_spip_modifier_login($new_login, $id_auteur, $serveur = '') {
-	if (is_null($new_login) or auth_spip_verifier_login($new_login, $id_auteur, $serveur) != '') {
-		return false;
-	}
-	if (!$id_auteur = intval($id_auteur)
-		or !$auteur = sql_fetsel('login', 'spip_auteurs', 'id_auteur=' . intval($id_auteur), '', '', '', '', $serveur)
-	) {
-		return false;
-	}
-	if ($new_login == $auteur['login']) {
-		return true;
-	} // on a rien fait mais c'est bon !
-
-	include_spip('action/editer_auteur');
-
-	// vider le login des auteurs a la poubelle qui avaient ce meme login
-	if (strlen($new_login)) {
-		$anciens = sql_allfetsel('id_auteur', 'spip_auteurs',
-			'login=' . sql_quote($new_login, $serveur, 'text') . " AND statut='5poubelle'", '', '', '', '', $serveur);
-		while ($row = array_pop($anciens)) {
-			auteur_modifier($row['id_auteur'], array('login' => ''), true); // manque la gestion de $serveur
-		}
-	}
-
-	auteur_modifier($id_auteur, array('login' => $new_login), true); // manque la gestion de $serveur
-
-	return true;
+    if (is_null($new_login) or auth_spip_verifier_login($new_login, $id_auteur, $serveur) != '') {
+        return false;
+    }
+    if (!$id_auteur = intval($id_auteur)
+        or !$auteur = sql_fetsel('login', 'spip_auteurs', 'id_auteur=' . intval($id_auteur), '', '', '', '', $serveur)
+    ) {
+        return false;
+    }
+    if ($new_login == $auteur['login']) {
+        return true;
+    } // on a rien fait mais c'est bon !
+
+    include_spip('action/editer_auteur');
+
+    // vider le login des auteurs a la poubelle qui avaient ce meme login
+    if (strlen($new_login)) {
+        $anciens = sql_allfetsel('id_auteur', 'spip_auteurs',
+            'login=' . sql_quote($new_login, $serveur, 'text') . " AND statut='5poubelle'", '', '', '', '', $serveur);
+        while ($row = array_pop($anciens)) {
+            auteur_modifier($row['id_auteur'], array('login' => ''), true); // manque la gestion de $serveur
+        }
+    }
+
+    auteur_modifier($id_auteur, array('login' => $new_login), true); // manque la gestion de $serveur
+
+    return true;
 }
 
 /**
@@ -239,27 +239,27 @@ 
  * @return string
  */
 function auth_spip_retrouver_login($login, $serveur = '') {
-	if (!strlen($login)) {
-		return null;
-	} // pas la peine de requeter
-	$l = sql_quote($login, $serveur, 'text');
-	if ($r = sql_getfetsel('login', 'spip_auteurs',
-		"statut<>'5poubelle'" .
-		" AND (length(pass)>0)" .
-		" AND (login=$l)", '', '', '', '', $serveur)
-	) {
-		return $r;
-	}
-	// Si pas d'auteur avec ce login
-	// regarder s'il a saisi son nom ou son mail.
-	// Ne pas fusionner avec la requete precedente
-	// car un nom peut etre homonyme d'un autre login
-	else {
-		return sql_getfetsel('login', 'spip_auteurs',
-			"statut<>'5poubelle'" .
-			" AND (length(pass)>0)" .
-			" AND (login<>'' AND (nom=$l OR email=$l))", '', '', '', '', $serveur);
-	}
+    if (!strlen($login)) {
+        return null;
+    } // pas la peine de requeter
+    $l = sql_quote($login, $serveur, 'text');
+    if ($r = sql_getfetsel('login', 'spip_auteurs',
+        "statut<>'5poubelle'" .
+        " AND (length(pass)>0)" .
+        " AND (login=$l)", '', '', '', '', $serveur)
+    ) {
+        return $r;
+    }
+    // Si pas d'auteur avec ce login
+    // regarder s'il a saisi son nom ou son mail.
+    // Ne pas fusionner avec la requete precedente
+    // car un nom peut etre homonyme d'un autre login
+    else {
+        return sql_getfetsel('login', 'spip_auteurs',
+            "statut<>'5poubelle'" .
+            " AND (length(pass)>0)" .
+            " AND (login<>'' AND (nom=$l OR email=$l))", '', '', '', '', $serveur);
+    }
 }
 
 
@@ -277,11 +277,11 @@ 
  */
 function auth_spip_informer_login($infos, $row, $serveur = '') {
 
-	// pour la methode SPIP on a besoin des alea en plus pour encoder le pass avec
-	$infos['alea_actuel'] = $row['alea_actuel'];
-	$infos['alea_futur'] = $row['alea_futur'];
+    // pour la methode SPIP on a besoin des alea en plus pour encoder le pass avec
+    $infos['alea_actuel'] = $row['alea_actuel'];
+    $infos['alea_futur'] = $row['alea_futur'];
 
-	return $infos;
+    return $infos;
 }
 
 /**
@@ -292,10 +292,10 @@ 
  *  toujours true pour un auteur cree dans SPIP
  */
 function auth_spip_autoriser_modifier_pass($serveur = '') {
-	if (strlen($serveur)) {
-		return false;
-	} // les fonctions d'ecriture sur base distante sont encore incompletes
-	return true;
+    if (strlen($serveur)) {
+        return false;
+    } // les fonctions d'ecriture sur base distante sont encore incompletes
+    return true;
 }
 
 
@@ -316,12 +316,12 @@ 
  *  message d'erreur si login non valide, chaine vide sinon
  */
 function auth_spip_verifier_pass($login, $new_pass, $id_auteur = 0, $serveur = '') {
-	// login et mot de passe
-	if (strlen($new_pass) < _PASS_LONGUEUR_MINI) {
-		return _T('info_passe_trop_court_car_pluriel', array('nb' => _PASS_LONGUEUR_MINI));
-	}
+    // login et mot de passe
+    if (strlen($new_pass) < _PASS_LONGUEUR_MINI) {
+        return _T('info_passe_trop_court_car_pluriel', array('nb' => _PASS_LONGUEUR_MINI));
+    }
 
-	return '';
+    return '';
 }
 
 /**
@@ -335,33 +335,33 @@ 
  * @return bool
  */
 function auth_spip_modifier_pass($login, $new_pass, $id_auteur, $serveur = '') {
-	if (is_null($new_pass) or auth_spip_verifier_pass($login, $new_pass, $id_auteur, $serveur) != '') {
-		return false;
-	}
-
-	if (!$id_auteur = intval($id_auteur)
-		or !sql_fetsel('login', 'spip_auteurs', 'id_auteur=' . intval($id_auteur), '', '', '', '', $serveur)
-	) {
-		return false;
-	}
-
-	$c = array();
-	include_spip('inc/acces');
-	include_spip('auth/sha256.inc');
-	$htpass = generer_htpass($new_pass);
-	$alea_actuel = creer_uniqid();
-	$alea_futur = creer_uniqid();
-	$pass = spip_sha256($alea_actuel . $new_pass);
-	$c['pass'] = $pass;
-	$c['htpass'] = $htpass;
-	$c['alea_actuel'] = $alea_actuel;
-	$c['alea_futur'] = $alea_futur;
-	$c['low_sec'] = '';
-
-	include_spip('action/editer_auteur');
-	auteur_modifier($id_auteur, $c, true); // manque la gestion de $serveur
-
-	return true; // on a bien modifie le pass
+    if (is_null($new_pass) or auth_spip_verifier_pass($login, $new_pass, $id_auteur, $serveur) != '') {
+        return false;
+    }
+
+    if (!$id_auteur = intval($id_auteur)
+        or !sql_fetsel('login', 'spip_auteurs', 'id_auteur=' . intval($id_auteur), '', '', '', '', $serveur)
+    ) {
+        return false;
+    }
+
+    $c = array();
+    include_spip('inc/acces');
+    include_spip('auth/sha256.inc');
+    $htpass = generer_htpass($new_pass);
+    $alea_actuel = creer_uniqid();
+    $alea_futur = creer_uniqid();
+    $pass = spip_sha256($alea_actuel . $new_pass);
+    $c['pass'] = $pass;
+    $c['htpass'] = $htpass;
+    $c['alea_actuel'] = $alea_actuel;
+    $c['alea_futur'] = $alea_futur;
+    $c['low_sec'] = '';
+
+    include_spip('action/editer_auteur');
+    auteur_modifier($id_auteur, $c, true); // manque la gestion de $serveur
+
+    return true; // on a bien modifie le pass
 }
 
 /**
@@ -375,54 +375,54 @@ 
  * @return void
  */
 function auth_spip_synchroniser_distant($id_auteur, $champs, $options = array(), $serveur = '') {
-	// ne rien faire pour une base distante : on ne sait pas regenerer les htaccess
-	if (strlen($serveur)) {
-		return;
-	}
-	// si un login, pass ou statut a ete modifie
-	// regenerer les fichier htpass
-	if (isset($champs['login'])
-		or isset($champs['pass'])
-		or isset($champs['statut'])
-		or (isset($options['all']) and $options['all'])
-	) {
-
-		$htaccess = _DIR_RESTREINT . _ACCESS_FILE_NAME;
-		$htpasswd = _DIR_TMP . _AUTH_USER_FILE;
-
-		// Cette variable de configuration peut etre posee par un plugin
-		// par exemple acces_restreint ;
-		// si .htaccess existe, outrepasser spip_meta
-		if ((!isset($GLOBALS['meta']['creer_htpasswd']) or ($GLOBALS['meta']['creer_htpasswd'] != 'oui'))
-			and !@file_exists($htaccess)
-		) {
-			spip_unlink($htpasswd);
-			spip_unlink($htpasswd . "-admin");
-
-			return;
-		}
-
-		# remarque : ici on laisse passer les "nouveau" de maniere a leur permettre
-		# de devenir redacteur le cas echeant (auth http)... a nettoyer
-		// attention, il faut au prealable se connecter a la base (necessaire car utilise par install)
-
-		$p1 = ''; // login:htpass pour tous
-		$p2 = ''; // login:htpass pour les admins
-		$s = sql_select("login, htpass, statut", "spip_auteurs",
-			sql_in("statut", array('1comite', '0minirezo', 'nouveau')));
-		while ($t = sql_fetch($s)) {
-			if (strlen($t['login']) and strlen($t['htpass'])) {
-				$p1 .= $t['login'] . ':' . $t['htpass'] . "\n";
-				if ($t['statut'] == '0minirezo') {
-					$p2 .= $t['login'] . ':' . $t['htpass'] . "\n";
-				}
-			}
-		}
-		sql_free($s);
-		if ($p1) {
-			ecrire_fichier($htpasswd, $p1);
-			ecrire_fichier($htpasswd . '-admin', $p2);
-			spip_log("Ecriture de $htpasswd et $htpasswd-admin");
-		}
-	}
+    // ne rien faire pour une base distante : on ne sait pas regenerer les htaccess
+    if (strlen($serveur)) {
+        return;
+    }
+    // si un login, pass ou statut a ete modifie
+    // regenerer les fichier htpass
+    if (isset($champs['login'])
+        or isset($champs['pass'])
+        or isset($champs['statut'])
+        or (isset($options['all']) and $options['all'])
+    ) {
+
+        $htaccess = _DIR_RESTREINT . _ACCESS_FILE_NAME;
+        $htpasswd = _DIR_TMP . _AUTH_USER_FILE;
+
+        // Cette variable de configuration peut etre posee par un plugin
+        // par exemple acces_restreint ;
+        // si .htaccess existe, outrepasser spip_meta
+        if ((!isset($GLOBALS['meta']['creer_htpasswd']) or ($GLOBALS['meta']['creer_htpasswd'] != 'oui'))
+            and !@file_exists($htaccess)
+        ) {
+            spip_unlink($htpasswd);
+            spip_unlink($htpasswd . "-admin");
+
+            return;
+        }
+
+        # remarque : ici on laisse passer les "nouveau" de maniere a leur permettre
+        # de devenir redacteur le cas echeant (auth http)... a nettoyer
+        // attention, il faut au prealable se connecter a la base (necessaire car utilise par install)
+
+        $p1 = ''; // login:htpass pour tous
+        $p2 = ''; // login:htpass pour les admins
+        $s = sql_select("login, htpass, statut", "spip_auteurs",
+            sql_in("statut", array('1comite', '0minirezo', 'nouveau')));
+        while ($t = sql_fetch($s)) {
+            if (strlen($t['login']) and strlen($t['htpass'])) {
+                $p1 .= $t['login'] . ':' . $t['htpass'] . "\n";
+                if ($t['statut'] == '0minirezo') {
+                    $p2 .= $t['login'] . ':' . $t['htpass'] . "\n";
+                }
+            }
+        }
+        sql_free($s);
+        if ($p1) {
+            ecrire_fichier($htpasswd, $p1);
+            ecrire_fichier($htpasswd . '-admin', $p2);
+            spip_log("Ecriture de $htpasswd et $htpasswd-admin");
+        }
+    }
 }

Spacing +32 added lines, -32 removed lines

@@ -53,14 +53,14 @@ 
 		//$md5next = $regs[4];
 	} // si envoi non crypte, crypter maintenant
 	elseif ($pass) {
-		$row = sql_fetsel("alea_actuel, alea_futur", "spip_auteurs", "login=" . sql_quote($login, $serveur, 'text'), '', '',
+		$row = sql_fetsel("alea_actuel, alea_futur", "spip_auteurs", "login=".sql_quote($login, $serveur, 'text'), '', '',
 			'', '', $serveur);
 
 		if ($row) {
 			include_spip('auth/sha256.inc');
-			$shapass = spip_sha256($row['alea_actuel'] . $pass);
-			$shanext = spip_sha256($row['alea_futur'] . $pass);
-			$md5pass = md5($row['alea_actuel'] . $pass);
+			$shapass = spip_sha256($row['alea_actuel'].$pass);
+			$shanext = spip_sha256($row['alea_futur'].$pass);
+			$md5pass = md5($row['alea_actuel'].$pass);
 		}
 	}
 
@@ -70,14 +70,14 @@ 
 	}
 
 	$row = sql_fetsel("*", "spip_auteurs",
-		"login=" . sql_quote($login, $serveur, 'text') . " AND pass=" . sql_quote($shapass, $serveur,
-			'text') . " AND statut<>'5poubelle'", '', '', '', '', $serveur);
+		"login=".sql_quote($login, $serveur, 'text')." AND pass=".sql_quote($shapass, $serveur,
+			'text')." AND statut<>'5poubelle'", '', '', '', '', $serveur);
 
 	// compat avec les anciennes bases en md5
 	if (!$row and $md5pass) {
 		$row = sql_fetsel("*", "spip_auteurs",
-			"login=" . sql_quote($login, $serveur, 'text') . " AND pass=" . sql_quote($md5pass, $serveur,
-				'text') . " AND statut<>'5poubelle'", '', '', '', '', $serveur);
+			"login=".sql_quote($login, $serveur, 'text')." AND pass=".sql_quote($md5pass, $serveur,
+				'text')." AND statut<>'5poubelle'", '', '', '', '', $serveur);
 	}
 
 	// login/mot de passe incorrect
@@ -94,8 +94,8 @@ 
 			'alea_actuel' => 'alea_futur',
 			'pass' => sql_quote($shanext, $serveur, 'text'),
 			'alea_futur' => sql_quote(creer_uniqid(), $serveur, 'text')
-		), "id_auteur=" . $row['id_auteur'] . ' AND pass IN (' . sql_quote($shapass, $serveur,
-				'text') . ', ' . sql_quote($md5pass, $serveur, 'text') . ')', '', $serveur);
+		), "id_auteur=".$row['id_auteur'].' AND pass IN ('.sql_quote($shapass, $serveur,
+				'text').', '.sql_quote($md5pass, $serveur, 'text').')', '', $serveur);
 		// En profiter pour verifier la securite de tmp/
 		// Si elle ne fonctionne pas a l'installation, prevenir
 		if (!verifier_htaccess(_DIR_TMP) and defined('_ECRIRE_INSTALL')) {
@@ -131,16 +131,16 @@ 
 
 	// javascript qui gere la securite du login en evitant de faire circuler le pass en clair
 	$flux['data'] .=
-		($compat_md5 ? '<script type="text/javascript" src="' . _DIR_JAVASCRIPT . 'md5.js"></script>' : '')
-		. '<script type="text/javascript" src="' . _DIR_JAVASCRIPT . 'login-sha-min.js"></script>'
+		($compat_md5 ? '<script type="text/javascript" src="'._DIR_JAVASCRIPT.'md5.js"></script>' : '')
+		. '<script type="text/javascript" src="'._DIR_JAVASCRIPT.'login-sha-min.js"></script>'
 		. '<script type="text/javascript">/*<![CDATA[*/'
-		. "var login_info={'alea_actuel':'" . $flux['args']['contexte']['_alea_actuel'] . "',"
-		. "'alea_futur':'" . $flux['args']['contexte']['_alea_futur'] . "',"
-		. "'login':'" . $flux['args']['contexte']['var_login'] . "',"
-		. "'page_auteur': '" . generer_url_public('informer_auteur') . "',"
+		. "var login_info={'alea_actuel':'".$flux['args']['contexte']['_alea_actuel']."',"
+		. "'alea_futur':'".$flux['args']['contexte']['_alea_futur']."',"
+		. "'login':'".$flux['args']['contexte']['var_login']."',"
+		. "'page_auteur': '".generer_url_public('informer_auteur')."',"
 		. "'informe_auteur_en_cours':false,"
 		. "'attente_informe':0,"
-		. "'compat_md5':" . ($compat_md5 ? "true" : "false") . "};"
+		. "'compat_md5':".($compat_md5 ? "true" : "false")."};"
 		. "jQuery(function(){
 	jQuery('#var_login').change(actualise_auteur);
 	jQuery('form#formulaire_login').submit(login_submit);
@@ -182,7 +182,7 @@ 
 			return _T('info_login_trop_court_car_pluriel', array('nb' => _LOGIN_TROP_COURT));
 		} else {
 			$n = sql_countsel('spip_auteurs',
-				"login=" . sql_quote($new_login) . " AND id_auteur!=" . intval($id_auteur) . " AND statut!='5poubelle'", '', '',
+				"login=".sql_quote($new_login)." AND id_auteur!=".intval($id_auteur)." AND statut!='5poubelle'", '', '',
 				$serveur);
 			if ($n) {
 				return _T('info_login_existant');
@@ -206,7 +206,7 @@ 
 		return false;
 	}
 	if (!$id_auteur = intval($id_auteur)
-		or !$auteur = sql_fetsel('login', 'spip_auteurs', 'id_auteur=' . intval($id_auteur), '', '', '', '', $serveur)
+		or !$auteur = sql_fetsel('login', 'spip_auteurs', 'id_auteur='.intval($id_auteur), '', '', '', '', $serveur)
 	) {
 		return false;
 	}
@@ -219,7 +219,7 @@ 
 	// vider le login des auteurs a la poubelle qui avaient ce meme login
 	if (strlen($new_login)) {
 		$anciens = sql_allfetsel('id_auteur', 'spip_auteurs',
-			'login=' . sql_quote($new_login, $serveur, 'text') . " AND statut='5poubelle'", '', '', '', '', $serveur);
+			'login='.sql_quote($new_login, $serveur, 'text')." AND statut='5poubelle'", '', '', '', '', $serveur);
 		while ($row = array_pop($anciens)) {
 			auteur_modifier($row['id_auteur'], array('login' => ''), true); // manque la gestion de $serveur
 		}
@@ -244,8 +244,8 @@ 
 	} // pas la peine de requeter
 	$l = sql_quote($login, $serveur, 'text');
 	if ($r = sql_getfetsel('login', 'spip_auteurs',
-		"statut<>'5poubelle'" .
-		" AND (length(pass)>0)" .
+		"statut<>'5poubelle'".
+		" AND (length(pass)>0)".
 		" AND (login=$l)", '', '', '', '', $serveur)
 	) {
 		return $r;
@@ -256,8 +256,8 @@ 
 	// car un nom peut etre homonyme d'un autre login
 	else {
 		return sql_getfetsel('login', 'spip_auteurs',
-			"statut<>'5poubelle'" .
-			" AND (length(pass)>0)" .
+			"statut<>'5poubelle'".
+			" AND (length(pass)>0)".
 			" AND (login<>'' AND (nom=$l OR email=$l))", '', '', '', '', $serveur);
 	}
 }
@@ -340,7 +340,7 @@ 
 	}
 
 	if (!$id_auteur = intval($id_auteur)
-		or !sql_fetsel('login', 'spip_auteurs', 'id_auteur=' . intval($id_auteur), '', '', '', '', $serveur)
+		or !sql_fetsel('login', 'spip_auteurs', 'id_auteur='.intval($id_auteur), '', '', '', '', $serveur)
 	) {
 		return false;
 	}
@@ -351,7 +351,7 @@ 
 	$htpass = generer_htpass($new_pass);
 	$alea_actuel = creer_uniqid();
 	$alea_futur = creer_uniqid();
-	$pass = spip_sha256($alea_actuel . $new_pass);
+	$pass = spip_sha256($alea_actuel.$new_pass);
 	$c['pass'] = $pass;
 	$c['htpass'] = $htpass;
 	$c['alea_actuel'] = $alea_actuel;
@@ -387,8 +387,8 @@ 
 		or (isset($options['all']) and $options['all'])
 	) {
 
-		$htaccess = _DIR_RESTREINT . _ACCESS_FILE_NAME;
-		$htpasswd = _DIR_TMP . _AUTH_USER_FILE;
+		$htaccess = _DIR_RESTREINT._ACCESS_FILE_NAME;
+		$htpasswd = _DIR_TMP._AUTH_USER_FILE;
 
 		// Cette variable de configuration peut etre posee par un plugin
 		// par exemple acces_restreint ;
@@ -397,7 +397,7 @@ 
 			and !@file_exists($htaccess)
 		) {
 			spip_unlink($htpasswd);
-			spip_unlink($htpasswd . "-admin");
+			spip_unlink($htpasswd."-admin");
 
 			return;
 		}
@@ -412,16 +412,16 @@ 
 			sql_in("statut", array('1comite', '0minirezo', 'nouveau')));
 		while ($t = sql_fetch($s)) {
 			if (strlen($t['login']) and strlen($t['htpass'])) {
-				$p1 .= $t['login'] . ':' . $t['htpass'] . "\n";
+				$p1 .= $t['login'].':'.$t['htpass']."\n";
 				if ($t['statut'] == '0minirezo') {
-					$p2 .= $t['login'] . ':' . $t['htpass'] . "\n";
+					$p2 .= $t['login'].':'.$t['htpass']."\n";
 				}
 			}
 		}
 		sql_free($s);
 		if ($p1) {
 			ecrire_fichier($htpasswd, $p1);
-			ecrire_fichier($htpasswd . '-admin', $p2);
+			ecrire_fichier($htpasswd.'-admin', $p2);
 			spip_log("Ecriture de $htpasswd et $htpasswd-admin");
 		}
 	}

ecrire/auth/sha256.inc.php

Indentation +11 added lines, -11 removed lines

@@ -11,7 +11,7 @@ 
  * @return string Le SHA de la chaîne
  */
 function spip_sha256($str) {
-	return hash('sha256', $str);
+    return hash('sha256', $str);
 }
 
 /**
@@ -21,18 +21,18 @@ 
  * @deprecated
  */
 function _nano_sha256($str, $ig_func = true) {
-	return spip_sha256($str);
+    return spip_sha256($str);
 }
 
 // 2009-07-23: Added check for function as the Suhosin plugin adds this routine.
 if (!function_exists('sha256')) {
-	/**
-	 * Calcul du SHA256
-	 *
-	 * @param string $str Chaîne dont on veut calculer le SHA
-	 * @param bool $ig_func
-	 * @return string Le SHA de la chaîne
-	 * @deprecated
-	 */
-	function sha256($str, $ig_func = true) { return spip_sha256($str); }
+    /**
+     * Calcul du SHA256
+     *
+     * @param string $str Chaîne dont on veut calculer le SHA
+     * @param bool $ig_func
+     * @return string Le SHA de la chaîne
+     * @deprecated
+     */
+    function sha256($str, $ig_func = true) { return spip_sha256($str); }
 }
\ No newline at end of file

ecrire/install/etape_3b.php

Indentation +134 added lines, -134 removed lines

@@ -11,143 +11,143 @@
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 include_spip('inc/headers');
 
 function install_etape_3b_dist() {
-	$login = _request('login');
-	$email = _request('email');
-	$nom = _request('nom');
-	$pass = _request('pass');
-	$pass_verif = _request('pass_verif');
-
-	$server_db = defined('_INSTALL_SERVER_DB')
-		? _INSTALL_SERVER_DB
-		: _request('server_db');
-
-	if (!defined('_PASS_LONGUEUR_MINI')) {
-		define('_PASS_LONGUEUR_MINI', 6);
-	}
-	if (!defined('_LOGIN_TROP_COURT')) {
-		define('_LOGIN_TROP_COURT', 4);
-	}
-	if ($login) {
-		$echec = ($pass != $pass_verif) ?
-			_T('info_passes_identiques')
-			: ((strlen($pass) < _PASS_LONGUEUR_MINI) ?
-				_T('info_passe_trop_court_car_pluriel', array('nb' => _PASS_LONGUEUR_MINI))
-				: ((strlen($login) < _LOGIN_TROP_COURT) ?
-					_T('info_login_trop_court')
-					: ''));
-		include_spip('inc/filtres');
-		if (!$echec and $email and !email_valide($email)) {
-			$echec = _T('form_email_non_valide');
-		}
-		if ($echec) {
-			echo minipres(
-				'AUTO',
-				info_progression_etape(3, 'etape_', 'install/', true) .
-				"<div class='error'><h3>$echec</h3>\n" .
-				'<p>' . _T('avis_connexion_echec_2') . '</p>' .
-				'</div>'
-			);
-			exit;
-		}
-	}
-
-	if (@file_exists(_FILE_CHMOD_TMP)) {
-		include(_FILE_CHMOD_TMP);
-	} else {
-		redirige_url_ecrire('install');
-	}
-
-	if (!@file_exists(_FILE_CONNECT_TMP)) {
-		redirige_url_ecrire('install');
-	}
-
-	# maintenant on connait le vrai charset du site s'il est deja configure
-	# sinon par defaut lire_meta reglera _DEFAULT_CHARSET
-	# (les donnees arrivent de toute facon postees en _DEFAULT_CHARSET)
-
-	lire_metas();
-	if ($login) {
-		include_spip('inc/charsets');
-
-		$nom = (importer_charset($nom, _DEFAULT_CHARSET));
-		$login = (importer_charset($login, _DEFAULT_CHARSET));
-		$email = (importer_charset($email, _DEFAULT_CHARSET));
-		# pour le passwd, bizarrement il faut le convertir comme s'il avait
-		# ete tape en iso-8859-1 ; car c'est en fait ce que voit md5.js
-		$pass = unicode2charset(utf_8_to_unicode($pass), 'iso-8859-1');
-		include_spip('auth/sha256.inc');
-		include_spip('inc/acces');
-		$htpass = generer_htpass($pass);
-		$alea_actuel = creer_uniqid();
-		$alea_futur = creer_uniqid();
-		$shapass = spip_sha256($alea_actuel . $pass);
-		// prelablement, creer le champ webmestre si il n'existe pas (install neuve
-		// sur une vieille base
-		$t = sql_showtable('spip_auteurs', true);
-		if (!isset($t['field']['webmestre'])) {
-			@sql_alter("TABLE spip_auteurs ADD webmestre varchar(3)  DEFAULT 'non' NOT NULL");
-		}
-
-		$id_auteur = sql_getfetsel('id_auteur', 'spip_auteurs', 'login=' . sql_quote($login));
-		if ($id_auteur !== null) {
-			sql_updateq('spip_auteurs', array(
-				'nom' => $nom,
-				'email' => $email,
-				'login' => $login,
-				'pass' => $shapass,
-				'alea_actuel' => $alea_actuel,
-				'alea_futur' => $alea_futur,
-				'htpass' => $htpass,
-				'statut' => '0minirezo'
-			), "id_auteur=$id_auteur");
-		} else {
-			$id_auteur = sql_insertq('spip_auteurs', array(
-				'nom' => $nom,
-				'email' => $email,
-				'login' => $login,
-				'pass' => $shapass,
-				'htpass' => $htpass,
-				'alea_actuel' => $alea_actuel,
-				'alea_futur' => $alea_futur,
-				'statut' => '0minirezo'
-			));
-		}
-		// le passer webmestre separrement du reste, au cas ou l'alter n'aurait pas fonctionne
-		@sql_updateq('spip_auteurs', array('webmestre' => 'oui'), "id_auteur=$id_auteur");
-
-		// inserer email comme email webmaster principal
-		// (sauf s'il est vide: cas de la re-installation)
-		if ($email) {
-			ecrire_meta('email_webmaster', $email);
-		}
-
-		// Connecter directement celui qui vient de (re)donner son login
-		// mais sans cookie d'admin ni connexion longue
-		include_spip('inc/auth');
-		if (!$auteur = auth_identifier_login($login, $pass)
-			or !auth_loger($auteur, true)
-		) {
-			spip_log("login automatique impossible $auth_spip $session" . count($row));
-		}
-	}
-
-	// installer les metas
-	$config = charger_fonction('config', 'inc');
-	$config();
-
-	// activer les plugins
-	// leur installation ne peut pas se faire sur le meme hit, il faudra donc
-	// poursuivre au hit suivant
-	include_spip('inc/plugin');
-	actualise_plugins_actifs();
-
-
-	include_spip('inc/distant');
-	redirige_par_entete(parametre_url(self(), 'etape', '4', '&'));
+    $login = _request('login');
+    $email = _request('email');
+    $nom = _request('nom');
+    $pass = _request('pass');
+    $pass_verif = _request('pass_verif');
+
+    $server_db = defined('_INSTALL_SERVER_DB')
+        ? _INSTALL_SERVER_DB
+        : _request('server_db');
+
+    if (!defined('_PASS_LONGUEUR_MINI')) {
+        define('_PASS_LONGUEUR_MINI', 6);
+    }
+    if (!defined('_LOGIN_TROP_COURT')) {
+        define('_LOGIN_TROP_COURT', 4);
+    }
+    if ($login) {
+        $echec = ($pass != $pass_verif) ?
+            _T('info_passes_identiques')
+            : ((strlen($pass) < _PASS_LONGUEUR_MINI) ?
+                _T('info_passe_trop_court_car_pluriel', array('nb' => _PASS_LONGUEUR_MINI))
+                : ((strlen($login) < _LOGIN_TROP_COURT) ?
+                    _T('info_login_trop_court')
+                    : ''));
+        include_spip('inc/filtres');
+        if (!$echec and $email and !email_valide($email)) {
+            $echec = _T('form_email_non_valide');
+        }
+        if ($echec) {
+            echo minipres(
+                'AUTO',
+                info_progression_etape(3, 'etape_', 'install/', true) .
+                "<div class='error'><h3>$echec</h3>\n" .
+                '<p>' . _T('avis_connexion_echec_2') . '</p>' .
+                '</div>'
+            );
+            exit;
+        }
+    }
+
+    if (@file_exists(_FILE_CHMOD_TMP)) {
+        include(_FILE_CHMOD_TMP);
+    } else {
+        redirige_url_ecrire('install');
+    }
+
+    if (!@file_exists(_FILE_CONNECT_TMP)) {
+        redirige_url_ecrire('install');
+    }
+
+    # maintenant on connait le vrai charset du site s'il est deja configure
+    # sinon par defaut lire_meta reglera _DEFAULT_CHARSET
+    # (les donnees arrivent de toute facon postees en _DEFAULT_CHARSET)
+
+    lire_metas();
+    if ($login) {
+        include_spip('inc/charsets');
+
+        $nom = (importer_charset($nom, _DEFAULT_CHARSET));
+        $login = (importer_charset($login, _DEFAULT_CHARSET));
+        $email = (importer_charset($email, _DEFAULT_CHARSET));
+        # pour le passwd, bizarrement il faut le convertir comme s'il avait
+        # ete tape en iso-8859-1 ; car c'est en fait ce que voit md5.js
+        $pass = unicode2charset(utf_8_to_unicode($pass), 'iso-8859-1');
+        include_spip('auth/sha256.inc');
+        include_spip('inc/acces');
+        $htpass = generer_htpass($pass);
+        $alea_actuel = creer_uniqid();
+        $alea_futur = creer_uniqid();
+        $shapass = spip_sha256($alea_actuel . $pass);
+        // prelablement, creer le champ webmestre si il n'existe pas (install neuve
+        // sur une vieille base
+        $t = sql_showtable('spip_auteurs', true);
+        if (!isset($t['field']['webmestre'])) {
+            @sql_alter("TABLE spip_auteurs ADD webmestre varchar(3)  DEFAULT 'non' NOT NULL");
+        }
+
+        $id_auteur = sql_getfetsel('id_auteur', 'spip_auteurs', 'login=' . sql_quote($login));
+        if ($id_auteur !== null) {
+            sql_updateq('spip_auteurs', array(
+                'nom' => $nom,
+                'email' => $email,
+                'login' => $login,
+                'pass' => $shapass,
+                'alea_actuel' => $alea_actuel,
+                'alea_futur' => $alea_futur,
+                'htpass' => $htpass,
+                'statut' => '0minirezo'
+            ), "id_auteur=$id_auteur");
+        } else {
+            $id_auteur = sql_insertq('spip_auteurs', array(
+                'nom' => $nom,
+                'email' => $email,
+                'login' => $login,
+                'pass' => $shapass,
+                'htpass' => $htpass,
+                'alea_actuel' => $alea_actuel,
+                'alea_futur' => $alea_futur,
+                'statut' => '0minirezo'
+            ));
+        }
+        // le passer webmestre separrement du reste, au cas ou l'alter n'aurait pas fonctionne
+        @sql_updateq('spip_auteurs', array('webmestre' => 'oui'), "id_auteur=$id_auteur");
+
+        // inserer email comme email webmaster principal
+        // (sauf s'il est vide: cas de la re-installation)
+        if ($email) {
+            ecrire_meta('email_webmaster', $email);
+        }
+
+        // Connecter directement celui qui vient de (re)donner son login
+        // mais sans cookie d'admin ni connexion longue
+        include_spip('inc/auth');
+        if (!$auteur = auth_identifier_login($login, $pass)
+            or !auth_loger($auteur, true)
+        ) {
+            spip_log("login automatique impossible $auth_spip $session" . count($row));
+        }
+    }
+
+    // installer les metas
+    $config = charger_fonction('config', 'inc');
+    $config();
+
+    // activer les plugins
+    // leur installation ne peut pas se faire sur le meme hit, il faudra donc
+    // poursuivre au hit suivant
+    include_spip('inc/plugin');
+    actualise_plugins_actifs();
+
+
+    include_spip('inc/distant');
+    redirige_par_entete(parametre_url(self(), 'etape', '4', '&'));
 }

Spacing +6 added lines, -6 removed lines

@@ -48,9 +48,9 @@ 
 		if ($echec) {
 			echo minipres(
 				'AUTO',
-				info_progression_etape(3, 'etape_', 'install/', true) .
-				"<div class='error'><h3>$echec</h3>\n" .
-				'<p>' . _T('avis_connexion_echec_2') . '</p>' .
+				info_progression_etape(3, 'etape_', 'install/', true).
+				"<div class='error'><h3>$echec</h3>\n".
+				'<p>'._T('avis_connexion_echec_2').'</p>'.
 				'</div>'
 			);
 			exit;
@@ -86,7 +86,7 @@ 
 		$htpass = generer_htpass($pass);
 		$alea_actuel = creer_uniqid();
 		$alea_futur = creer_uniqid();
-		$shapass = spip_sha256($alea_actuel . $pass);
+		$shapass = spip_sha256($alea_actuel.$pass);
 		// prelablement, creer le champ webmestre si il n'existe pas (install neuve
 		// sur une vieille base
 		$t = sql_showtable('spip_auteurs', true);
@@ -94,7 +94,7 @@ 
 			@sql_alter("TABLE spip_auteurs ADD webmestre varchar(3)  DEFAULT 'non' NOT NULL");
 		}
 
-		$id_auteur = sql_getfetsel('id_auteur', 'spip_auteurs', 'login=' . sql_quote($login));
+		$id_auteur = sql_getfetsel('id_auteur', 'spip_auteurs', 'login='.sql_quote($login));
 		if ($id_auteur !== null) {
 			sql_updateq('spip_auteurs', array(
 				'nom' => $nom,
@@ -133,7 +133,7 @@ 
 		if (!$auteur = auth_identifier_login($login, $pass)
 			or !auth_loger($auteur, true)
 		) {
-			spip_log("login automatique impossible $auth_spip $session" . count($row));
+			spip_log("login automatique impossible $auth_spip $session".count($row));
 		}
 	}
 

ecrire/index.php

Spacing +8 added lines, -8 removed lines

@@ -35,7 +35,7 @@ 
 // Determiner l'action demandee
 //
 
-$exec = (string)_request('exec');
+$exec = (string) _request('exec');
 $reinstall = (!is_null(_request('reinstall'))) ? _request('reinstall') : ($exec == 'install' ? 'oui' : null);
 //
 // Les scripts d'insallation n'authentifient pas, forcement,
@@ -64,7 +64,7 @@ 
 
 
 if (_request('action') or _request('var_ajax') or _request('formulaire_action')) {
-	if (!autoriser_sans_cookie($exec)){
+	if (!autoriser_sans_cookie($exec)) {
 		// Charger l'aiguilleur qui va mettre sur la bonne voie les traitements derogatoires
 		include_spip('public/aiguiller');
 		if (
@@ -76,17 +76,17 @@ 
 			or
 			// cas des formulaires charger/verifier/traiter
 			traiter_formulaires_dynamiques()
-		){
+		) {
 			exit;
 		} // le hit est fini !
 	}
 }
 // securiser les redirect du back-office
 if (_request('redirect')) {
-	if (!function_exists('securiser_redirect_action')){
+	if (!function_exists('securiser_redirect_action')) {
 		include_spip('public/aiguiller');
 	}
-	set_request('redirect',securiser_redirect_action(_request('redirect')));
+	set_request('redirect', securiser_redirect_action(_request('redirect')));
 }
 
 
@@ -119,9 +119,9 @@ 
 			or (isset($GLOBALS['visiteur_session']) and $GLOBALS['visiteur_session']['statut'] == '0minirezo')
 		)
 	) {
-		spip_log("Quand la meta admin vaut " .
-			$GLOBALS['meta']["admin"] .
-			" seul un admin peut se connecter et sans AJAX." .
+		spip_log("Quand la meta admin vaut ".
+			$GLOBALS['meta']["admin"].
+			" seul un admin peut se connecter et sans AJAX.".
 			" En cas de probleme, detruire cette meta.");
 		die(_T('info_travaux_texte'));
 	}

Indentation +76 added lines, -76 removed lines

@@ -19,14 +19,14 @@ 
 /** Drapeau indiquant que l'on est dans l'espace privé */
 define('_ESPACE_PRIVE', true);
 if (!defined('_ECRIRE_INC_VERSION')) {
-	include 'inc_version.php';
+    include 'inc_version.php';
 }
 
 // Verification anti magic_quotes_sybase, pour qui addslashes("'") = "''"
 // On prefere la faire ici plutot que dans inc_version, c'est moins souvent et
 // si le reglage est modifie sur un site en prod, ca fait moins mal
 if (addslashes("'") !== "\\'") {
-	die('SPIP incompatible magic_quotes_sybase');
+    die('SPIP incompatible magic_quotes_sybase');
 }
 
 include_spip('inc/cookie');
@@ -42,18 +42,18 @@ 
 // alors il faut blinder les variables d'URL
 //
 if (autoriser_sans_cookie($exec, false)) {
-	if (!isset($reinstall)) {
-		$reinstall = 'non';
-	}
-	$var_auth = true;
+    if (!isset($reinstall)) {
+        $reinstall = 'non';
+    }
+    $var_auth = true;
 } else {
-	// Authentification, redefinissable
-	$auth = charger_fonction('auth', 'inc');
-	$var_auth = $auth();
-	if ($var_auth) {
-		echo auth_echec($var_auth);
-		exit;
-	}
+    // Authentification, redefinissable
+    $auth = charger_fonction('auth', 'inc');
+    $var_auth = $auth();
+    if ($var_auth) {
+        echo auth_echec($var_auth);
+        exit;
+    }
 }
 
 // initialiser a la langue par defaut
@@ -64,29 +64,29 @@ 
 
 
 if (_request('action') or _request('var_ajax') or _request('formulaire_action')) {
-	if (!autoriser_sans_cookie($exec)){
-		// Charger l'aiguilleur qui va mettre sur la bonne voie les traitements derogatoires
-		include_spip('public/aiguiller');
-		if (
-			// cas des appels actions ?action=xxx
-			traiter_appels_actions()
-			or
-			// cas des hits ajax sur les inclusions ajax
-			traiter_appels_inclusions_ajax()
-			or
-			// cas des formulaires charger/verifier/traiter
-			traiter_formulaires_dynamiques()
-		){
-			exit;
-		} // le hit est fini !
-	}
+    if (!autoriser_sans_cookie($exec)){
+        // Charger l'aiguilleur qui va mettre sur la bonne voie les traitements derogatoires
+        include_spip('public/aiguiller');
+        if (
+            // cas des appels actions ?action=xxx
+            traiter_appels_actions()
+            or
+            // cas des hits ajax sur les inclusions ajax
+            traiter_appels_inclusions_ajax()
+            or
+            // cas des formulaires charger/verifier/traiter
+            traiter_formulaires_dynamiques()
+        ){
+            exit;
+        } // le hit est fini !
+    }
 }
 // securiser les redirect du back-office
 if (_request('redirect')) {
-	if (!function_exists('securiser_redirect_action')){
-		include_spip('public/aiguiller');
-	}
-	set_request('redirect',securiser_redirect_action(_request('redirect')));
+    if (!function_exists('securiser_redirect_action')){
+        include_spip('public/aiguiller');
+    }
+    set_request('redirect',securiser_redirect_action(_request('redirect')));
 }
 
 
@@ -96,11 +96,11 @@ 
 
 // Controle de la version, sauf si on est deja en train de s'en occuper
 if (!$reinstall == 'oui'
-	and !_AJAX
-	and isset($GLOBALS['meta']['version_installee'])
-	and ($GLOBALS['spip_version_base'] != (str_replace(',', '.', $GLOBALS['meta']['version_installee'])))
+    and !_AJAX
+    and isset($GLOBALS['meta']['version_installee'])
+    and ($GLOBALS['spip_version_base'] != (str_replace(',', '.', $GLOBALS['meta']['version_installee'])))
 ) {
-	$exec = 'demande_mise_a_jour';
+    $exec = 'demande_mise_a_jour';
 }
 
 // Quand une action d'administration est en cours (meta "admin"),
@@ -110,44 +110,44 @@ 
 // sinon c'est qu'elle a ete interrompue et il faut la reprendre
 
 elseif (isset($GLOBALS['meta']["admin"])) {
-	if (preg_match('/^(.*)_(\d+)_/', $GLOBALS['meta']["admin"], $l)) {
-		list(, $var_f, $n) = $l;
-	}
-	if (_AJAX
-		or !(
-			isset($_COOKIE['spip_admin'])
-			or (isset($GLOBALS['visiteur_session']) and $GLOBALS['visiteur_session']['statut'] == '0minirezo')
-		)
-	) {
-		spip_log("Quand la meta admin vaut " .
-			$GLOBALS['meta']["admin"] .
-			" seul un admin peut se connecter et sans AJAX." .
-			" En cas de probleme, detruire cette meta.");
-		die(_T('info_travaux_texte'));
-	}
-	if ($n) {
-		list(, $var_f, $n) = $l;
-		if (tester_url_ecrire("base_$var_f")) {
-			$var_f = "base_$var_f";
-		}
-		if ($var_f != $exec) {
-			spip_log("Le script $var_f lance par auteur$n se substitue a l'exec $exec");
-			$exec = $var_f;
-			set_request('exec', $exec);
-		}
-	}
+    if (preg_match('/^(.*)_(\d+)_/', $GLOBALS['meta']["admin"], $l)) {
+        list(, $var_f, $n) = $l;
+    }
+    if (_AJAX
+        or !(
+            isset($_COOKIE['spip_admin'])
+            or (isset($GLOBALS['visiteur_session']) and $GLOBALS['visiteur_session']['statut'] == '0minirezo')
+        )
+    ) {
+        spip_log("Quand la meta admin vaut " .
+            $GLOBALS['meta']["admin"] .
+            " seul un admin peut se connecter et sans AJAX." .
+            " En cas de probleme, detruire cette meta.");
+        die(_T('info_travaux_texte'));
+    }
+    if ($n) {
+        list(, $var_f, $n) = $l;
+        if (tester_url_ecrire("base_$var_f")) {
+            $var_f = "base_$var_f";
+        }
+        if ($var_f != $exec) {
+            spip_log("Le script $var_f lance par auteur$n se substitue a l'exec $exec");
+            $exec = $var_f;
+            set_request('exec', $exec);
+        }
+    }
 }
 // si nom pas plausible, prendre le script par defaut
 // attention aux deux cas 404/403 qui commencent par un 4 !
 elseif (!preg_match(',^[a-z4_][0-9a-z_-]*$,i', $exec)) {
-	$exec = "accueil";
-	set_request('exec', $exec);
+    $exec = "accueil";
+    set_request('exec', $exec);
 }
 
 // compatibilite ascendante : obsolete, ne plus utiliser
 $GLOBALS['spip_display'] = isset($GLOBALS['visiteur_session']['prefs']['display'])
-	? (int) $GLOBALS['visiteur_session']['prefs']['display']
-	: 0;
+    ? (int) $GLOBALS['visiteur_session']['prefs']['display']
+    : 0;
 $GLOBALS['spip_ecran'] = isset($_COOKIE['spip_ecran']) ? preg_replace('/[^a-z0-9]/i', '', $_COOKIE['spip_ecran']) : "etroit";
 
 //  si la langue est specifiee par cookie et ne correspond pas
@@ -155,18 +155,18 @@ 
 // on appelle directement la fonction, car un appel d'action peut conduire a une boucle infinie
 // si le cookie n'est pas pose correctement dans l'action
 if (!$var_auth and isset($_COOKIE['spip_lang_ecrire'])
-	and $_COOKIE['spip_lang_ecrire'] <> $GLOBALS['visiteur_session']['lang']
+    and $_COOKIE['spip_lang_ecrire'] <> $GLOBALS['visiteur_session']['lang']
 ) {
-	include_spip('action/converser');
-	action_converser_post($GLOBALS['visiteur_session']['lang'], true);
+    include_spip('action/converser');
+    action_converser_post($GLOBALS['visiteur_session']['lang'], true);
 }
 
 if ($var_f = tester_url_ecrire($exec)) {
-	$var_f = charger_fonction($var_f);
-	$var_f(); // at last
+    $var_f = charger_fonction($var_f);
+    $var_f(); // at last
 } else {
-	// Rien de connu: rerouter vers exec=404 au lieu d'echouer
-	// ce qui permet de laisser la main a un plugin
-	$var_f = charger_fonction('404');
-	$var_f($exec);
+    // Rien de connu: rerouter vers exec=404 au lieu d'echouer
+    // ce qui permet de laisser la main a un plugin
+    $var_f = charger_fonction('404');
+    $var_f($exec);
 }