spip / SPIP

ecrire/inc/journal.php

Indentation +8 added lines, -8 removed lines

@@ -10,7 +10,7 @@ 
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 
@@ -23,11 +23,11 @@ 
  * @param array $opt
  */
 function inc_journal_dist($phrase, $opt = []) {
-	if (!strlen((string) $phrase)) {
-		return;
-	}
-	if ($opt) {
-		$phrase .= ' :: ' . str_replace("\n", ' ', implode(', ', $opt));
-	}
-	spip_log($phrase, 'journal');
+    if (!strlen((string) $phrase)) {
+        return;
+    }
+    if ($opt) {
+        $phrase .= ' :: ' . str_replace("\n", ' ', implode(', ', $opt));
+    }
+    spip_log($phrase, 'journal');
 }

ecrire/inc/envoyer_mail.php

Indentation +147 added lines, -147 removed lines

@@ -15,7 +15,7 @@ 
  * @package SPIP\Core\Mail
  **/
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 include_spip('inc/charsets');
@@ -31,7 +31,7 @@ 
  * @return string
  */
 function nettoyer_titre_email($titre) {
-	return str_replace("\n", ' ', nettoyer_caracteres_mail(textebrut(corriger_typo($titre))));
+    return str_replace("\n", ' ', nettoyer_caracteres_mail(textebrut(corriger_typo($titre))));
 }
 
 /**
@@ -47,21 +47,21 @@ 
  */
 function nettoyer_caracteres_mail($t) {
 
-	$t = filtrer_entites($t);
-
-	if ($GLOBALS['meta']['charset'] != 'utf-8') {
-		$t = str_replace(
-			['’', '“', '”'],
-			["'", '"', '"'],
-			$t
-		);
-	}
-
-	return str_replace(
-		['—', '&endash;'],
-		['--', '-'],
-		$t
-	);
+    $t = filtrer_entites($t);
+
+    if ($GLOBALS['meta']['charset'] != 'utf-8') {
+        $t = str_replace(
+            ['’', '“', '”'],
+            ["'", '"', '"'],
+            $t
+        );
+    }
+
+    return str_replace(
+        ['—', '&endash;'],
+        ['--', '-'],
+        $t
+    );
 }
 
 /**
@@ -94,87 +94,87 @@ 
  */
 function inc_envoyer_mail_dist($destinataire, $sujet, $corps, $from = '', $headers = '') {
 
-	if (!email_valide($destinataire)) {
-		return false;
-	}
-	if ($destinataire == _T('info_mail_fournisseur')) {
-		return false;
-	} // tres fort
-
-	// Fournir si possible un Message-Id: conforme au RFC1036,
-	// sinon SpamAssassin denoncera un MSGID_FROM_MTA_HEADER
-
-	$email_envoi = $GLOBALS['meta']['email_envoi'];
-	if (!email_valide($email_envoi)) {
-		spip_log('Meta email_envoi invalide. Le mail sera probablement vu comme spam.');
-		$email_envoi = $destinataire;
-	}
-
-	$parts = '';
-	if (is_array($corps)) {
-		$texte = $corps['texte'];
-		$from = ($corps['from'] ?? $from);
-		$headers = ($corps['headers'] ?? $headers);
-		if (is_array($headers)) {
-			$headers = implode("\n", $headers);
-		}
-		if (isset($corps['pieces_jointes']) && function_exists('mail_embarquer_pieces_jointes')) {
-			$parts = mail_embarquer_pieces_jointes($corps['pieces_jointes']);
-		}
-	} else {
-		$texte = $corps;
-	}
-
-	if (!$from) {
-		$from = $email_envoi;
-	}
-
-	// ceci est la RegExp NO_REAL_NAME faisant hurler SpamAssassin
-	if (preg_match('/^["\s]*\<?\S+\@\S+\>?\s*$/', (string) $from)) {
-		$from .= ' (' . str_replace(')', '', translitteration(str_replace('@', ' at ', (string) $from))) . ')';
-	}
-
-	// nettoyer les &eacute; &#8217, &emdash; etc...
-	// les 'cliquer ici' etc sont a eviter;  voir:
-	// http://mta.org.ua/spamassassin-2.55/stuff/wiki.CustomRulesets/20050914/rules/french_rules.cf
-	$texte = nettoyer_caracteres_mail($texte);
-	$sujet = nettoyer_caracteres_mail($sujet);
-
-	// encoder le sujet si possible selon la RFC
-	if (init_mb_string()) {
-		# un bug de mb_string casse mb_encode_mimeheader si l'encoding interne
-		# est UTF-8 et le charset iso-8859-1 (constate php5-mac ; php4.3-debian)
-		$charset = $GLOBALS['meta']['charset'];
-		mb_internal_encoding($charset);
-		$sujet = mb_encode_mimeheader($sujet, $charset, 'Q', "\n");
-		mb_internal_encoding('utf-8');
-	}
-
-	$headers ??= '';
-	if (function_exists('wordwrap') && (preg_match(',multipart/mixed,', (string) $headers) == 0)) {
-		$texte = wordwrap($texte);
-	}
-
-	[$headers, $texte] = mail_normaliser_headers($headers, $from, $destinataire, $texte, $parts);
-
-	if (_OS_SERVEUR == 'windows') {
-		$texte = preg_replace("@\r*\n@", "\r\n", (string) $texte);
-		$headers = preg_replace("@\r*\n@", "\r\n", (string) $headers);
-		$sujet = preg_replace("@\r*\n@", "\r\n", $sujet);
-	}
-
-	spip_log("mail $destinataire\n$sujet\n$headers", 'mails');
-	// mode TEST : forcer l'email
-	if (defined('_TEST_EMAIL_DEST')) {
-		if (!_TEST_EMAIL_DEST) {
-			return false;
-		} else {
-			$texte = "Dest : $destinataire\r\n" . $texte;
-			$destinataire = _TEST_EMAIL_DEST;
-		}
-	}
-
-	return @mail((string) $destinataire, $sujet, (string) $texte, $headers);
+    if (!email_valide($destinataire)) {
+        return false;
+    }
+    if ($destinataire == _T('info_mail_fournisseur')) {
+        return false;
+    } // tres fort
+
+    // Fournir si possible un Message-Id: conforme au RFC1036,
+    // sinon SpamAssassin denoncera un MSGID_FROM_MTA_HEADER
+
+    $email_envoi = $GLOBALS['meta']['email_envoi'];
+    if (!email_valide($email_envoi)) {
+        spip_log('Meta email_envoi invalide. Le mail sera probablement vu comme spam.');
+        $email_envoi = $destinataire;
+    }
+
+    $parts = '';
+    if (is_array($corps)) {
+        $texte = $corps['texte'];
+        $from = ($corps['from'] ?? $from);
+        $headers = ($corps['headers'] ?? $headers);
+        if (is_array($headers)) {
+            $headers = implode("\n", $headers);
+        }
+        if (isset($corps['pieces_jointes']) && function_exists('mail_embarquer_pieces_jointes')) {
+            $parts = mail_embarquer_pieces_jointes($corps['pieces_jointes']);
+        }
+    } else {
+        $texte = $corps;
+    }
+
+    if (!$from) {
+        $from = $email_envoi;
+    }
+
+    // ceci est la RegExp NO_REAL_NAME faisant hurler SpamAssassin
+    if (preg_match('/^["\s]*\<?\S+\@\S+\>?\s*$/', (string) $from)) {
+        $from .= ' (' . str_replace(')', '', translitteration(str_replace('@', ' at ', (string) $from))) . ')';
+    }
+
+    // nettoyer les &eacute; &#8217, &emdash; etc...
+    // les 'cliquer ici' etc sont a eviter;  voir:
+    // http://mta.org.ua/spamassassin-2.55/stuff/wiki.CustomRulesets/20050914/rules/french_rules.cf
+    $texte = nettoyer_caracteres_mail($texte);
+    $sujet = nettoyer_caracteres_mail($sujet);
+
+    // encoder le sujet si possible selon la RFC
+    if (init_mb_string()) {
+        # un bug de mb_string casse mb_encode_mimeheader si l'encoding interne
+        # est UTF-8 et le charset iso-8859-1 (constate php5-mac ; php4.3-debian)
+        $charset = $GLOBALS['meta']['charset'];
+        mb_internal_encoding($charset);
+        $sujet = mb_encode_mimeheader($sujet, $charset, 'Q', "\n");
+        mb_internal_encoding('utf-8');
+    }
+
+    $headers ??= '';
+    if (function_exists('wordwrap') && (preg_match(',multipart/mixed,', (string) $headers) == 0)) {
+        $texte = wordwrap($texte);
+    }
+
+    [$headers, $texte] = mail_normaliser_headers($headers, $from, $destinataire, $texte, $parts);
+
+    if (_OS_SERVEUR == 'windows') {
+        $texte = preg_replace("@\r*\n@", "\r\n", (string) $texte);
+        $headers = preg_replace("@\r*\n@", "\r\n", (string) $headers);
+        $sujet = preg_replace("@\r*\n@", "\r\n", $sujet);
+    }
+
+    spip_log("mail $destinataire\n$sujet\n$headers", 'mails');
+    // mode TEST : forcer l'email
+    if (defined('_TEST_EMAIL_DEST')) {
+        if (!_TEST_EMAIL_DEST) {
+            return false;
+        } else {
+            $texte = "Dest : $destinataire\r\n" . $texte;
+            $destinataire = _TEST_EMAIL_DEST;
+        }
+    }
+
+    return @mail((string) $destinataire, $sujet, (string) $texte, $headers);
 }
 
 /**
@@ -188,53 +188,53 @@ 
  * @return array
  */
 function mail_normaliser_headers($headers, $from, $to, $texte, $parts = '') {
-	$charset = $GLOBALS['meta']['charset'];
-
-	// Ajouter le Content-Type et consort s'il n'y est pas deja
-	if (!str_contains($headers, 'Content-Type: ')) {
-		$type =
-			"Content-Type: text/plain;charset=\"$charset\";\n" .
-			"Content-Transfer-Encoding: 8bit\n";
-	} else {
-		$type = '';
-	}
-
-	// calculer un identifiant unique
-	// Marie Toto <Marie@toto.com> => @toto.com
-	$domain = preg_match('/@[^\s>]+/', $from, $domain) ? $domain[0] : '@unknown-' . md5($from) . '.org';
-	$uniq = random_int(0, mt_getrandmax()) . '_' . md5($to . $texte) . $domain;
-
-	// Si multi-part, s'en servir comme borne ...
-	if ($parts) {
-		$texte = "--$uniq\n$type\n" . $texte . "\n";
-		foreach ($parts as $part) {
-			$n = strlen((string) $part[1]) . ($part[0] ? "\n" : '');
-			$e = implode("\n", $part[0]);
-			$texte .= "\n--$uniq\nContent-Length: $n$e\n\n" . $part[1];
-		}
-		$texte .= "\n\n--$uniq--\n";
-		// Si boundary n'est pas entre guillemets,
-		// elle est comprise mais le charset est ignoree !
-		$type = "Content-Type: multipart/mixed; boundary=\"$uniq\"\n";
-	}
-
-	// .. et s'en servir pour plaire a SpamAssassin
-
-	$mid = 'Message-Id: <' . $uniq . '>';
-
-	// indispensable pour les sites qui collent d'office From: serveur-http
-	// sauf si deja mis par l'envoyeur
-	$rep = (str_contains($headers, 'Reply-To:')) ? '' : "Reply-To: $from\n";
-
-	// Nettoyer les en-tetes envoyees
-	// Ajouter le \n final
-	if (strlen($headers = trim($headers))) {
-		$headers .= "\n";
-	}
-
-	// Et mentionner l'indeboulonable nomenclature ratee
-
-	$headers .= "From: $from\n$type$rep$mid\nMIME-Version: 1.0\n";
-
-	return [$headers, $texte];
+    $charset = $GLOBALS['meta']['charset'];
+
+    // Ajouter le Content-Type et consort s'il n'y est pas deja
+    if (!str_contains($headers, 'Content-Type: ')) {
+        $type =
+            "Content-Type: text/plain;charset=\"$charset\";\n" .
+            "Content-Transfer-Encoding: 8bit\n";
+    } else {
+        $type = '';
+    }
+
+    // calculer un identifiant unique
+    // Marie Toto <Marie@toto.com> => @toto.com
+    $domain = preg_match('/@[^\s>]+/', $from, $domain) ? $domain[0] : '@unknown-' . md5($from) . '.org';
+    $uniq = random_int(0, mt_getrandmax()) . '_' . md5($to . $texte) . $domain;
+
+    // Si multi-part, s'en servir comme borne ...
+    if ($parts) {
+        $texte = "--$uniq\n$type\n" . $texte . "\n";
+        foreach ($parts as $part) {
+            $n = strlen((string) $part[1]) . ($part[0] ? "\n" : '');
+            $e = implode("\n", $part[0]);
+            $texte .= "\n--$uniq\nContent-Length: $n$e\n\n" . $part[1];
+        }
+        $texte .= "\n\n--$uniq--\n";
+        // Si boundary n'est pas entre guillemets,
+        // elle est comprise mais le charset est ignoree !
+        $type = "Content-Type: multipart/mixed; boundary=\"$uniq\"\n";
+    }
+
+    // .. et s'en servir pour plaire a SpamAssassin
+
+    $mid = 'Message-Id: <' . $uniq . '>';
+
+    // indispensable pour les sites qui collent d'office From: serveur-http
+    // sauf si deja mis par l'envoyeur
+    $rep = (str_contains($headers, 'Reply-To:')) ? '' : "Reply-To: $from\n";
+
+    // Nettoyer les en-tetes envoyees
+    // Ajouter le \n final
+    if (strlen($headers = trim($headers))) {
+        $headers .= "\n";
+    }
+
+    // Et mentionner l'indeboulonable nomenclature ratee
+
+    $headers .= "From: $from\n$type$rep$mid\nMIME-Version: 1.0\n";
+
+    return [$headers, $texte];
 }

ecrire/inc/lien_court.php

Indentation +7 added lines, -7 removed lines

@@ -10,7 +10,7 @@ 
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /*
@@ -21,12 +21,12 @@ 
  * http://zoumzamzouilam/truc/chose/machin..."
  */
 function inc_lien_court($url) {
-	$long_url = defined('_MAX_LONG_URL') ? _MAX_LONG_URL : 40;
-	$coupe_url = defined('_MAX_COUPE_URL') ? _MAX_COUPE_URL : 35;
+    $long_url = defined('_MAX_LONG_URL') ? _MAX_LONG_URL : 40;
+    $coupe_url = defined('_MAX_COUPE_URL') ? _MAX_COUPE_URL : 35;
 
-	if (strlen((string) $url) > $long_url) {
-		$url = substr((string) $url, 0, $coupe_url) . '...';
-	}
+    if (strlen((string) $url) > $long_url) {
+        $url = substr((string) $url, 0, $coupe_url) . '...';
+    }
 
-	return $url;
+    return $url;
 }

ecrire/inc/selectionner.php

Indentation +108 added lines, -108 removed lines

@@ -16,7 +16,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 include_spip('inc/filtres');
@@ -45,56 +45,56 @@ 
  **/
 function inc_selectionner_dist($sel, $idom = '', $exclus = 0, $aff_racine = false, $recur = true, $do = 'aff') {
 
-	if ($recur) {
-		$recur = mini_hier($sel);
-	} else {
-		$sel = 0;
-	}
-
-	if ($aff_racine) {
-		$info = generer_url_ecrire('informer', "type=rubrique&rac=$idom&do=$do&id=");
-		$idom3 = $idom . '_selection';
-
-		$onClick = "jQuery(this).parent().addClass('on');jQuery('#choix_parent_principal .on').removeClass('on'); aff_selection(0, '$idom3', '$info', event);return false;";
-
-		$ondbClick = strtr(
-			str_replace(
-				"'",
-				'’',
-				str_replace(
-					'"',
-					'"',
-					(string) textebrut(_T('info_racine_site'))
-				)
-			),
-			"\n\r",
-			'  '
-		);
-
-		$js_func = $do . '_selection_titre';
-		$ondbClick = "$js_func('$ondbClick',0,'selection_rubrique','id_parent');";
-
-		$aff_racine = "<div class='petit-item petite-racine item'>"
-			. "<a href='#'"
-			. 'onclick="'
-			. $onClick
-			. "\"\nondbclick=\""
-			. $ondbClick
-			. $onClick
-			. '">'
-			. _T('info_racine_site')
-			. '</a></div>';
-	}
-
-	$url_init = generer_url_ecrire('plonger', "rac=$idom&exclus=$exclus&id=0&col=1&do=$do");
-
-	$plonger = charger_fonction('plonger', 'inc');
-	$plonger_r = $plonger($sel, $idom, $recur, 1, $exclus, $do);
-
-	// url completee par la fonction JS onkeypress_rechercher
-	$url = generer_url_ecrire('rechercher', "exclus=$exclus&rac=$idom&do=$do&type=");
-
-	return construire_selectionner_hierarchie($idom, $plonger_r, $aff_racine, $url, 'id_parent', $url_init);
+    if ($recur) {
+        $recur = mini_hier($sel);
+    } else {
+        $sel = 0;
+    }
+
+    if ($aff_racine) {
+        $info = generer_url_ecrire('informer', "type=rubrique&rac=$idom&do=$do&id=");
+        $idom3 = $idom . '_selection';
+
+        $onClick = "jQuery(this).parent().addClass('on');jQuery('#choix_parent_principal .on').removeClass('on'); aff_selection(0, '$idom3', '$info', event);return false;";
+
+        $ondbClick = strtr(
+            str_replace(
+                "'",
+                '&#8217;',
+                str_replace(
+                    '"',
+                    '&#34;',
+                    (string) textebrut(_T('info_racine_site'))
+                )
+            ),
+            "\n\r",
+            '  '
+        );
+
+        $js_func = $do . '_selection_titre';
+        $ondbClick = "$js_func('$ondbClick',0,'selection_rubrique','id_parent');";
+
+        $aff_racine = "<div class='petit-item petite-racine item'>"
+            . "<a href='#'"
+            . 'onclick="'
+            . $onClick
+            . "\"\nondbclick=\""
+            . $ondbClick
+            . $onClick
+            . '">'
+            . _T('info_racine_site')
+            . '</a></div>';
+    }
+
+    $url_init = generer_url_ecrire('plonger', "rac=$idom&exclus=$exclus&id=0&col=1&do=$do");
+
+    $plonger = charger_fonction('plonger', 'inc');
+    $plonger_r = $plonger($sel, $idom, $recur, 1, $exclus, $do);
+
+    // url completee par la fonction JS onkeypress_rechercher
+    $url = generer_url_ecrire('rechercher', "exclus=$exclus&rac=$idom&do=$do&type=");
+
+    return construire_selectionner_hierarchie($idom, $plonger_r, $aff_racine, $url, 'id_parent', $url_init);
 }
 
 /**
@@ -112,58 +112,58 @@ 
  **/
 function construire_selectionner_hierarchie($idom, $liste, $racine, $url, $name, $url_init = '') {
 
-	$idom1 = $idom . '_champ_recherche';
-	$idom2 = $idom . '_principal';
-	$idom3 = $idom . '_selection';
-	$idom4 = $idom . '_col_1';
-	$idom5 = 'img_' . $idom4;
-	$idom6 = $idom . '_fonc';
-
-	return "<div id='$idom'>"
-	. "<a id='$idom6' style='visibility: hidden;'"
-	. ($url_init ? "\nhref='$url_init'" : '')
-	. '></a>'
-	. "<div class='recherche_rapide_parent formulaire_recherche'>"
-	. http_img_pack(
-		'loader.svg',
-		'',
-		"class='loader' style='visibility: hidden;float:" . $GLOBALS['spip_lang_right'] . "' id='$idom5'"
-	)
-	. ''
-	. "<input style='width: 10em;float:" . $GLOBALS['spip_lang_right'] . ";' type='text' class='text search' id='$idom1' placeholder='" . _T('info_rechercher') . "'"
-	// eliminer Return car il provoque la soumission (balise unique)
-	// et eliminer Tab pour la navigation au clavier
-	// ce serait encore mieux de ne le faire que s'il y a encore plusieurs
-	// resultats retournes par la recherche
-	. "\nonkeypress=\"k=event.keyCode;if (k==13 || k==3 || k==9){return false;}\""
-	// lancer la recherche apres le filtrage ci-dessus sauf sur le tab (navigation au clavier)
-	. "\nonkeyup=\"if(event.keyCode==9){return false;};return onkey_rechercher(this.value,"
-	// la destination de la recherche
-	. "'$idom4'"
+    $idom1 = $idom . '_champ_recherche';
+    $idom2 = $idom . '_principal';
+    $idom3 = $idom . '_selection';
+    $idom4 = $idom . '_col_1';
+    $idom5 = 'img_' . $idom4;
+    $idom6 = $idom . '_fonc';
+
+    return "<div id='$idom'>"
+    . "<a id='$idom6' style='visibility: hidden;'"
+    . ($url_init ? "\nhref='$url_init'" : '')
+    . '></a>'
+    . "<div class='recherche_rapide_parent formulaire_recherche'>"
+    . http_img_pack(
+        'loader.svg',
+        '',
+        "class='loader' style='visibility: hidden;float:" . $GLOBALS['spip_lang_right'] . "' id='$idom5'"
+    )
+    . ''
+    . "<input style='width: 10em;float:" . $GLOBALS['spip_lang_right'] . ";' type='text' class='text search' id='$idom1' placeholder='" . _T('info_rechercher') . "'"
+    // eliminer Return car il provoque la soumission (balise unique)
+    // et eliminer Tab pour la navigation au clavier
+    // ce serait encore mieux de ne le faire que s'il y a encore plusieurs
+    // resultats retournes par la recherche
+    . "\nonkeypress=\"k=event.keyCode;if (k==13 || k==3 || k==9){return false;}\""
+    // lancer la recherche apres le filtrage ci-dessus sauf sur le tab (navigation au clavier)
+    . "\nonkeyup=\"if(event.keyCode==9){return false;};return onkey_rechercher(this.value,"
+    // la destination de la recherche
+    . "'$idom4'"
 #	. "this.parentNode.parentNode.parentNode.parentNode.nextSibling.firstChild.id"
-	. ",'"
-	// l'url effectuant la recherche
-	. $url
-	. "',"
-	// le noeud contenant un gif anime
-	// . "'idom5'"
-	. 'this.parentNode.previousSibling.firstChild'
-	. ",'"
-	// la valeur de l'attribut Name a remplir
-	. $name
-	. "','"
-	// noeud invisible memorisant l'URL initiale (pour re-initialisation)
-	. $idom6
-	. "')\""
-	. ' />'
-	. "\n</div>"
-	. ($racine ? "<div>$racine</div>" : '')
-	. "<div id='"
-	. $idom2
-	. "'><div id='$idom4'"
-	. " class=''>"
-	. $liste
-	. "</div></div>\n<div id='$idom3'></div></div>\n";
+    . ",'"
+    // l'url effectuant la recherche
+    . $url
+    . "',"
+    // le noeud contenant un gif anime
+    // . "'idom5'"
+    . 'this.parentNode.previousSibling.firstChild'
+    . ",'"
+    // la valeur de l'attribut Name a remplir
+    . $name
+    . "','"
+    // noeud invisible memorisant l'URL initiale (pour re-initialisation)
+    . $idom6
+    . "')\""
+    . ' />'
+    . "\n</div>"
+    . ($racine ? "<div>$racine</div>" : '')
+    . "<div id='"
+    . $idom2
+    . "'><div id='$idom4'"
+    . " class=''>"
+    . $liste
+    . "</div></div>\n<div id='$idom3'></div></div>\n";
 }
 
 /**
@@ -175,11 +175,11 @@ 
  **/
 function mini_hier($id_rubrique) {
 
-	$liste = $id_rubrique;
-	$id_rubrique = (int) $id_rubrique;
-	while ($id_rubrique = sql_getfetsel('id_parent', 'spip_rubriques', 'id_rubrique = ' . $id_rubrique)) {
-		$liste = $id_rubrique . ",$liste";
-	}
+    $liste = $id_rubrique;
+    $id_rubrique = (int) $id_rubrique;
+    while ($id_rubrique = sql_getfetsel('id_parent', 'spip_rubriques', 'id_rubrique = ' . $id_rubrique)) {
+        $liste = $id_rubrique . ",$liste";
+    }
 
-	return explode(',', "0,$liste");
+    return explode(',', "0,$liste");
 }

ecrire/inc/lien.php

Indentation +186 added lines, -186 removed lines

@@ -10,7 +10,7 @@ 
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 include_spip('base/abstract_sql');
@@ -36,42 +36,42 @@ 
  * @return string
  */
 function inc_lien_dist(
-	$lien,
-	$texte = '',
-	$class = '',
-	$title = '',
-	$hlang = '',
-	$rel = '',
-	string $connect = '',
-	$env = []
+    $lien,
+    $texte = '',
+    $class = '',
+    $title = '',
+    $hlang = '',
+    $rel = '',
+    string $connect = '',
+    $env = []
 ) {
-	return $lien;
+    return $lien;
 }
 
 function expanser_liens($t, string $connect = '', $env = []) {
 
-	$t = pipeline('pre_liens', $t);
+    $t = pipeline('pre_liens', $t);
 
-	// on passe a traiter_modeles la liste des liens reperes pour lui permettre
-	// de remettre le texte d'origine dans les parametres du modele
-	$t = traiter_modeles($t, false, false, $connect);
+    // on passe a traiter_modeles la liste des liens reperes pour lui permettre
+    // de remettre le texte d'origine dans les parametres du modele
+    $t = traiter_modeles($t, false, false, $connect);
 
-	return $t;
+    return $t;
 }
 
 // Meme analyse mais pour eliminer les liens
 // et ne laisser que leur titre, a expliciter si ce n'est fait
 function nettoyer_raccourcis_typo($texte, string $connect = '') {
-	return $texte;
+    return $texte;
 }
 
 // Repere dans la partie texte d'un raccourci [texte->...]
 // la langue et la bulle eventuelles
 function traiter_raccourci_lien_atts($texte) {
-	$bulle = '';
-	$hlang = '';
+    $bulle = '';
+    $hlang = '';
 
-	return [trim((string) $texte), $bulle, $hlang];
+    return [trim((string) $texte), $bulle, $hlang];
 }
 
 define('_RACCOURCI_CHAPO', '/^(\W*)(\W*)(\w*\d+([?#].*)?)$/');
@@ -87,7 +87,7 @@ 
  * @return string
  */
 function virtuel_redirige($virtuel, $url = false) {
-	return $virtuel;
+    return $virtuel;
 }
 
 // Cherche un lien du type [->raccourci 123]
@@ -100,56 +100,56 @@ 
 // 'url':   seulement U  (i.e. generer_url_RACCOURCI)
 
 function calculer_url($ref, $texte = '', $pour = 'url', string $connect = '', $echappe_typo = true) {
-	$r = traiter_lien_implicite($ref, $texte, $pour, $connect);
+    $r = traiter_lien_implicite($ref, $texte, $pour, $connect);
 
-	return $r ?: traiter_lien_explicite($ref, $texte, $pour, $connect, $echappe_typo);
+    return $r ?: traiter_lien_explicite($ref, $texte, $pour, $connect, $echappe_typo);
 }
 
 define('_EXTRAIRE_LIEN', ',^\s*(?:' . _PROTOCOLES_STD . '):?/?/?\s*$,iS');
 
 function traiter_lien_explicite($ref, $texte = '', $pour = 'url', string $connect = '', $echappe_typo = true) {
-	if (preg_match(_EXTRAIRE_LIEN, (string) $ref)) {
-		return ($pour != 'tout') ? '' : ['', '', '', ''];
-	}
-
-	$lien = entites_html(trim((string) $ref));
-
-	// Liens explicites
-	if (!$texte) {
-		$texte = str_replace('"', '', (string) $lien);
-		// evite l'affichage de trops longues urls.
-		$lien_court = charger_fonction('lien_court', 'inc');
-		$texte = $lien_court($texte);
-		if ($echappe_typo) {
-			$texte = '<html>' . quote_amp($texte) . '</html>';
-		}
-	}
-
-	// petites corrections d'URL
-	if (preg_match('/^www\.[^@]+$/S', (string) $lien)) {
-		$lien = 'http://' . $lien;
-	} else {
-		if (strpos((string) $lien, '@') && email_valide($lien)) {
-			if (!$texte) {
-				$texte = $lien;
-			}
-			$lien = 'mailto:' . $lien;
-		}
-	}
-
-	if ($pour == 'url') {
-		return $lien;
-	}
-
-	if ($pour == 'titre') {
-		return $texte;
-	}
-
-	return ['url' => $lien, 'titre' => $texte];
+    if (preg_match(_EXTRAIRE_LIEN, (string) $ref)) {
+        return ($pour != 'tout') ? '' : ['', '', '', ''];
+    }
+
+    $lien = entites_html(trim((string) $ref));
+
+    // Liens explicites
+    if (!$texte) {
+        $texte = str_replace('"', '', (string) $lien);
+        // evite l'affichage de trops longues urls.
+        $lien_court = charger_fonction('lien_court', 'inc');
+        $texte = $lien_court($texte);
+        if ($echappe_typo) {
+            $texte = '<html>' . quote_amp($texte) . '</html>';
+        }
+    }
+
+    // petites corrections d'URL
+    if (preg_match('/^www\.[^@]+$/S', (string) $lien)) {
+        $lien = 'http://' . $lien;
+    } else {
+        if (strpos((string) $lien, '@') && email_valide($lien)) {
+            if (!$texte) {
+                $texte = $lien;
+            }
+            $lien = 'mailto:' . $lien;
+        }
+    }
+
+    if ($pour == 'url') {
+        return $lien;
+    }
+
+    if ($pour == 'titre') {
+        return $texte;
+    }
+
+    return ['url' => $lien, 'titre' => $texte];
 }
 
 function liens_implicite_glose_dist($texte, $id, $type, $args, $ancre, string $connect = '') {
-	return function_exists($f = 'glossaire_' . $ancre) ? $f($texte, $id) : glossaire_std($texte);
+    return function_exists($f = 'glossaire_' . $ancre) ? $f($texte, $id) : glossaire_std($texte);
 }
 
 /**
@@ -171,73 +171,73 @@ 
  * @return array|bool|string
  */
 function traiter_lien_implicite($ref, $texte = '', $pour = 'url', $connect = '') {
-	$cible = $GLOBALS['lien_implicite_cible_public'] ?? null;
-	if (!($match = typer_raccourci($ref))) {
-		return false;
-	}
-
-	[$type, , $id, , $args, , $ancre] = array_pad($match, 7, null);
-
-	# attention dans le cas des sites le lien doit pointer non pas sur
-	# la page locale du site, mais directement sur le site lui-meme
-	$url = '';
-	if ($f = charger_fonction("implicite_$type", 'liens', true)) {
-		$url = $f($texte, $id, $type, $args, $ancre, $connect);
-	}
-
-	if (!$url) {
-		$url = generer_objet_url($id, $type, $args ?? '', $ancre ?? '', $cible, '', $connect ?? '');
-	}
-
-	if (!$url) {
-		return false;
-	}
-
-	if (is_array($url)) {
-		[$type, $id] = array_pad($url, 2, null);
-		$url = generer_objet_url($id, $type, $args ?? '', $ancre ?? '', $cible, '', $connect ?? '');
-	}
-
-	if ($pour === 'url') {
-		return $url;
-	}
-
-	$r = traiter_raccourci_titre($id, $type, $connect);
-	if ($r) {
-		$r['class'] = ($type == 'site') ? 'spip_out' : 'spip_in';
-	}
-
-	if ($texte = trim($texte)) {
-		$r['titre'] = $texte;
-	}
-
-	if (!@$r['titre']) {
-		$r['titre'] = _T($type) . " $id";
-	}
-
-	if ($pour == 'titre') {
-		return $r['titre'];
-	}
-
-	$r['url'] = $url;
-
-	// dans le cas d'un lien vers un doc, ajouter le type='mime/type'
-	if (
-		$type == 'document' && ($mime = sql_getfetsel(
-			'mime_type',
-			'spip_types_documents',
-			'extension IN (' . sql_get_select('extension', 'spip_documents', 'id_document=' . sql_quote($id)) . ')',
-			'',
-			'',
-			'',
-			'',
-			$connect
-		))
-	) {
-		$r['mime'] = $mime;
-	}
-
-	return $r;
+    $cible = $GLOBALS['lien_implicite_cible_public'] ?? null;
+    if (!($match = typer_raccourci($ref))) {
+        return false;
+    }
+
+    [$type, , $id, , $args, , $ancre] = array_pad($match, 7, null);
+
+    # attention dans le cas des sites le lien doit pointer non pas sur
+    # la page locale du site, mais directement sur le site lui-meme
+    $url = '';
+    if ($f = charger_fonction("implicite_$type", 'liens', true)) {
+        $url = $f($texte, $id, $type, $args, $ancre, $connect);
+    }
+
+    if (!$url) {
+        $url = generer_objet_url($id, $type, $args ?? '', $ancre ?? '', $cible, '', $connect ?? '');
+    }
+
+    if (!$url) {
+        return false;
+    }
+
+    if (is_array($url)) {
+        [$type, $id] = array_pad($url, 2, null);
+        $url = generer_objet_url($id, $type, $args ?? '', $ancre ?? '', $cible, '', $connect ?? '');
+    }
+
+    if ($pour === 'url') {
+        return $url;
+    }
+
+    $r = traiter_raccourci_titre($id, $type, $connect);
+    if ($r) {
+        $r['class'] = ($type == 'site') ? 'spip_out' : 'spip_in';
+    }
+
+    if ($texte = trim($texte)) {
+        $r['titre'] = $texte;
+    }
+
+    if (!@$r['titre']) {
+        $r['titre'] = _T($type) . " $id";
+    }
+
+    if ($pour == 'titre') {
+        return $r['titre'];
+    }
+
+    $r['url'] = $url;
+
+    // dans le cas d'un lien vers un doc, ajouter le type='mime/type'
+    if (
+        $type == 'document' && ($mime = sql_getfetsel(
+            'mime_type',
+            'spip_types_documents',
+            'extension IN (' . sql_get_select('extension', 'spip_documents', 'id_document=' . sql_quote($id)) . ')',
+            '',
+            '',
+            '',
+            '',
+            $connect
+        ))
+    ) {
+        $r['mime'] = $mime;
+    }
+
+    return $r;
 }
 
 // analyse des raccourcis issus de [TITRE->RACCOURCInnn] et connexes
@@ -245,43 +245,43 @@ 
 define('_RACCOURCI_URL', '/^\s*(\w*?)\s*(\d+)(\?(.*?))?(#([^\s]*))?\s*$/S');
 
 function typer_raccourci($lien) {
-	if (!preg_match(_RACCOURCI_URL, (string) $lien, $match)) {
-		return [];
-	}
-
-	$f = $match[1];
-	// valeur par defaut et alias historiques
-	if (!$f) {
-		$f = 'article';
-	} else {
-		if ($f == 'art') {
-			$f = 'article';
-		} else {
-			if ($f == 'br') {
-				$f = 'breve';
-			} else {
-				if ($f == 'rub') {
-					$f = 'rubrique';
-				} else {
-					if ($f == 'aut') {
-						$f = 'auteur';
-					} else {
-						if ($f == 'doc' || $f == 'im' || $f == 'img' || $f == 'image' || $f == 'emb') {
-							$f = 'document';
-						} else {
-							if (preg_match('/^br..?ve$/S', $f)) {
-								$f = 'breve'; # accents :(
-							}
-						}
-					}
-				}
-			}
-		}
-	}
-
-	$match[0] = $f;
-
-	return $match;
+    if (!preg_match(_RACCOURCI_URL, (string) $lien, $match)) {
+        return [];
+    }
+
+    $f = $match[1];
+    // valeur par defaut et alias historiques
+    if (!$f) {
+        $f = 'article';
+    } else {
+        if ($f == 'art') {
+            $f = 'article';
+        } else {
+            if ($f == 'br') {
+                $f = 'breve';
+            } else {
+                if ($f == 'rub') {
+                    $f = 'rubrique';
+                } else {
+                    if ($f == 'aut') {
+                        $f = 'auteur';
+                    } else {
+                        if ($f == 'doc' || $f == 'im' || $f == 'img' || $f == 'image' || $f == 'emb') {
+                            $f = 'document';
+                        } else {
+                            if (preg_match('/^br..?ve$/S', $f)) {
+                                $f = 'breve'; # accents :(
+                            }
+                        }
+                    }
+                }
+            }
+        }
+    }
+
+    $match[0] = $f;
+
+    return $match;
 }
 
 /**
@@ -296,44 +296,44 @@ 
  * }
  **/
 function traiter_raccourci_titre($id, $type, $connect = null) {
-	$trouver_table = charger_fonction('trouver_table', 'base');
-	$desc = $trouver_table(table_objet($type));
+    $trouver_table = charger_fonction('trouver_table', 'base');
+    $desc = $trouver_table(table_objet($type));
 
-	if (!($desc && ($s = $desc['titre']))) {
-		return [];
-	}
+    if (!($desc && ($s = $desc['titre']))) {
+        return [];
+    }
 
-	$_id = $desc['key']['PRIMARY KEY'];
-	$r = sql_fetsel($s, $desc['table'], "$_id=$id", '', '', '', '', $connect);
+    $_id = $desc['key']['PRIMARY KEY'];
+    $r = sql_fetsel($s, $desc['table'], "$_id=$id", '', '', '', '', $connect);
 
-	if (!$r) {
-		return [];
-	}
+    if (!$r) {
+        return [];
+    }
 
-	$r['titre'] = supprimer_numero($r['titre']);
+    $r['titre'] = supprimer_numero($r['titre']);
 
-	if (!$r['titre'] && !empty($r['surnom'])) {
-		$r['titre'] = $r['surnom'];
-	}
+    if (!$r['titre'] && !empty($r['surnom'])) {
+        $r['titre'] = $r['surnom'];
+    }
 
-	if (!isset($r['lang'])) {
-		$r['lang'] = '';
-	}
+    if (!isset($r['lang'])) {
+        $r['lang'] = '';
+    }
 
-	return $r;
+    return $r;
 }
 
 //
 // Raccourcis ancre [#ancre<-]
 //
 function traiter_raccourci_ancre($letexte) {
-	return $letexte;
+    return $letexte;
 }
 
 function traiter_raccourci_glossaire($texte) {
-	return $texte;
+    return $texte;
 }
 
 function glossaire_std($terme) {
-	return $terme;
+    return $terme;
 }

ecrire/inc/boutons.php

Indentation +33 added lines, -33 removed lines

@@ -18,7 +18,7 @@ 
  */
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -34,35 +34,35 @@ 
  */
 function definir_barre_onglets($script) {
 
-	$onglets = [];
-	$liste_onglets = [];
+    $onglets = [];
+    $liste_onglets = [];
 
-	// ajouter les onglets issus des plugin via paquet.xml
-	if (function_exists('onglets_plugins')) {
-		$liste_onglets = onglets_plugins();
-	}
+    // ajouter les onglets issus des plugin via paquet.xml
+    if (function_exists('onglets_plugins')) {
+        $liste_onglets = onglets_plugins();
+    }
 
 
-	foreach ($liste_onglets as $id => $infos) {
-		if (
-			($parent = $infos['parent'])
-			&& $parent == $script
-			&& autoriser('onglet', "_$id")
-		) {
-			$onglets[$id] = new Bouton(
-				isset($infos['icone']) ? find_in_theme($infos['icone']) : '',  // icone
-				$infos['titre'],  // titre
-				(isset($infos['action']) && $infos['action'])
-					? generer_url_ecrire(
-						$infos['action'],
-						(isset($infos['parametres']) && $infos['parametres']) ? $infos['parametres'] : ''
-					)
-					: null
-			);
-		}
-	}
+    foreach ($liste_onglets as $id => $infos) {
+        if (
+            ($parent = $infos['parent'])
+            && $parent == $script
+            && autoriser('onglet', "_$id")
+        ) {
+            $onglets[$id] = new Bouton(
+                isset($infos['icone']) ? find_in_theme($infos['icone']) : '',  // icone
+                $infos['titre'],  // titre
+                (isset($infos['action']) && $infos['action'])
+                    ? generer_url_ecrire(
+                        $infos['action'],
+                        (isset($infos['parametres']) && $infos['parametres']) ? $infos['parametres'] : ''
+                    )
+                    : null
+            );
+        }
+    }
 
-	return pipeline('ajouter_onglets', ['data' => $onglets, 'args' => $script]);
+    return pipeline('ajouter_onglets', ['data' => $onglets, 'args' => $script]);
 }
 
 /**
@@ -80,14 +80,14 @@ 
  * @return string
  */
 function barre_onglets($rubrique, $ongletCourant, $class = 'barre_onglet') {
-	include_spip('inc/presentation');
+    include_spip('inc/presentation');
 
-	$res = '';
+    $res = '';
 
-	foreach (definir_barre_onglets($rubrique) as $exec => $onglet) {
-		$url = $onglet->url ?: generer_url_ecrire($exec);
-		$res .= onglet(_T($onglet->libelle), $url, $exec, $ongletCourant, $onglet->icone);
-	}
+    foreach (definir_barre_onglets($rubrique) as $exec => $onglet) {
+        $url = $onglet->url ?: generer_url_ecrire($exec);
+        $res .= onglet(_T($onglet->libelle), $url, $exec, $ongletCourant, $onglet->icone);
+    }
 
-	return $res ? debut_onglet($class) . $res . fin_onglet() : ('');
+    return $res ? debut_onglet($class) . $res . fin_onglet() : ('');
 }

ecrire/inc/invalideur.php

Indentation +137 added lines, -137 removed lines

@@ -16,7 +16,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 include_spip('base/serial');
@@ -26,7 +26,7 @@ 
  * en droit de l'éliminer
  */
 if (!defined('_AGE_CACHE_ATIME')) {
-	define('_AGE_CACHE_ATIME', 3600);
+    define('_AGE_CACHE_ATIME', 3600);
 }
 
 
@@ -39,31 +39,31 @@ 
  * @return int Taille approximative en octets
  **/
 function taille_du_cache() {
-	# check dirs until we reach > 500 files
-	$t = 0;
-	$n = 0;
-	$time = $GLOBALS['meta']['cache_mark'] ?? 0;
-	for ($i = 0; $i < 256; $i++) {
-		$dir = _DIR_CACHE . sprintf('%02s', dechex($i));
-		if (@is_dir($dir) && is_readable($dir) && ($d = opendir($dir))) {
-			while (($f = readdir($d)) !== false) {
-				if (preg_match(',^[[0-9a-f]+\.cache$,S', $f) && ($a = stat("$dir/$f"))) {
-					$n++;
-					if ($a['mtime'] >= $time) {
-						if ($a['blocks'] > 0) {
-							$t += 512 * $a['blocks'];
-						} else {
-							$t += $a['size'];
-						}
-					}
-				}
-			}
-		}
-		if ($n > 500) {
-			return (int) (256 * $t / (1 + $i));
-		}
-	}
-	return $t;
+    # check dirs until we reach > 500 files
+    $t = 0;
+    $n = 0;
+    $time = $GLOBALS['meta']['cache_mark'] ?? 0;
+    for ($i = 0; $i < 256; $i++) {
+        $dir = _DIR_CACHE . sprintf('%02s', dechex($i));
+        if (@is_dir($dir) && is_readable($dir) && ($d = opendir($dir))) {
+            while (($f = readdir($d)) !== false) {
+                if (preg_match(',^[[0-9a-f]+\.cache$,S', $f) && ($a = stat("$dir/$f"))) {
+                    $n++;
+                    if ($a['mtime'] >= $time) {
+                        if ($a['blocks'] > 0) {
+                            $t += 512 * $a['blocks'];
+                        } else {
+                            $t += $a['size'];
+                        }
+                    }
+                }
+            }
+        }
+        if ($n > 500) {
+            return (int) (256 * $t / (1 + $i));
+        }
+    }
+    return $t;
 }
 
 
@@ -90,30 +90,30 @@ 
  *     Inutilisé
  **/
 function inc_suivre_invalideur_dist($cond, $modif = true) {
-	if (!$modif) {
-		return;
-	}
-
-	// determiner l'objet modifie : forum, article, etc
-	if (preg_match(',["\']([a-z_]+)[/"\'],', $cond, $r)) {
-		$objet = objet_type($r[1]);
-	}
-
-	// stocker la date_modif_$objet (ne sert a rien pour le moment)
-	if (isset($objet)) {
-		ecrire_meta('derniere_modif_' . $objet, time());
-	}
-
-	// si $derniere_modif_invalide est un array('article', 'rubrique')
-	// n'affecter la meta que si un de ces objets est modifie
-	if (is_array($GLOBALS['derniere_modif_invalide'])) {
-		if (in_array($objet, $GLOBALS['derniere_modif_invalide'])) {
-			ecrire_meta('derniere_modif', time());
-		}
-	} // sinon, cas standard, toujours affecter la meta
-	else {
-		ecrire_meta('derniere_modif', time());
-	}
+    if (!$modif) {
+        return;
+    }
+
+    // determiner l'objet modifie : forum, article, etc
+    if (preg_match(',["\']([a-z_]+)[/"\'],', $cond, $r)) {
+        $objet = objet_type($r[1]);
+    }
+
+    // stocker la date_modif_$objet (ne sert a rien pour le moment)
+    if (isset($objet)) {
+        ecrire_meta('derniere_modif_' . $objet, time());
+    }
+
+    // si $derniere_modif_invalide est un array('article', 'rubrique')
+    // n'affecter la meta que si un de ces objets est modifie
+    if (is_array($GLOBALS['derniere_modif_invalide'])) {
+        if (in_array($objet, $GLOBALS['derniere_modif_invalide'])) {
+            ecrire_meta('derniere_modif', time());
+        }
+    } // sinon, cas standard, toujours affecter la meta
+    else {
+        ecrire_meta('derniere_modif', time());
+    }
 }
 
 
@@ -138,56 +138,56 @@ 
  *     Nombre de fichiers supprimés
  **/
 function purger_repertoire($dir, $options = []) {
-	if (!is_dir($dir) || !is_readable($dir)) {
-		return 0;
-	}
-
-	// sur certains sites on veut absolument garder certains caches référencés dans un CDN
-	// on peut donc inhiber la purge de ces répertoires pour eviter tout probleme
-	if (file_exists(rtrim($dir, '/') . '/inhib_purger_repertoire.txt')) {
-		return 0;
-	}
-
-	$handle = opendir($dir);
-	if (!$handle) {
-		return 0;
-	}
-
-	$total = 0;
-
-	while (($fichier = @readdir($handle)) !== false) {
-		// Eviter ".", "..", ".htaccess", ".svn" etc & CACHEDIR.TAG
-		if ($fichier[0] == '.' || $fichier == 'CACHEDIR.TAG') {
-			continue;
-		}
-		$chemin = "$dir/$fichier";
-		if (is_file($chemin)) {
-			if (
-				(!isset($options['atime']) || @fileatime($chemin) < $options['atime']) && (!isset($options['mtime']) || @filemtime($chemin) < $options['mtime'])
-			) {
-				supprimer_fichier($chemin);
-				$total++;
-			}
-		} else {
-			if (is_dir($chemin)) {
-				$opts = $options;
-				if (isset($options['limit'])) {
-					$opts['limit'] = $options['limit'] - $total;
-				}
-				$total += purger_repertoire($chemin, $opts);
-				if (isset($options['subdir']) && $options['subdir']) {
-					spip_unlink($chemin);
-				}
-			}
-		}
-
-		if (isset($options['limit']) && $total >= $options['limit']) {
-			break;
-		}
-	}
-	closedir($handle);
-
-	return $total;
+    if (!is_dir($dir) || !is_readable($dir)) {
+        return 0;
+    }
+
+    // sur certains sites on veut absolument garder certains caches référencés dans un CDN
+    // on peut donc inhiber la purge de ces répertoires pour eviter tout probleme
+    if (file_exists(rtrim($dir, '/') . '/inhib_purger_repertoire.txt')) {
+        return 0;
+    }
+
+    $handle = opendir($dir);
+    if (!$handle) {
+        return 0;
+    }
+
+    $total = 0;
+
+    while (($fichier = @readdir($handle)) !== false) {
+        // Eviter ".", "..", ".htaccess", ".svn" etc & CACHEDIR.TAG
+        if ($fichier[0] == '.' || $fichier == 'CACHEDIR.TAG') {
+            continue;
+        }
+        $chemin = "$dir/$fichier";
+        if (is_file($chemin)) {
+            if (
+                (!isset($options['atime']) || @fileatime($chemin) < $options['atime']) && (!isset($options['mtime']) || @filemtime($chemin) < $options['mtime'])
+            ) {
+                supprimer_fichier($chemin);
+                $total++;
+            }
+        } else {
+            if (is_dir($chemin)) {
+                $opts = $options;
+                if (isset($options['limit'])) {
+                    $opts['limit'] = $options['limit'] - $total;
+                }
+                $total += purger_repertoire($chemin, $opts);
+                if (isset($options['subdir']) && $options['subdir']) {
+                    spip_unlink($chemin);
+                }
+            }
+        }
+
+        if (isset($options['limit']) && $total >= $options['limit']) {
+            break;
+        }
+    }
+    closedir($handle);
+
+    return $total;
 }
 
 
@@ -198,26 +198,26 @@ 
 // Securite : est sur que c'est un cache
 function retire_cache($cache) {
 
-	if (
-		preg_match(
-			',^([0-9a-f]/)?(\d+/)?[0-9a-f]+\.cache(\.gz)?$,i',
-			(string) $cache
-		)
-	) {
-		// supprimer le fichier (de facon propre)
-		supprimer_fichier(_DIR_CACHE . $cache);
-	} else {
-		spip_log("Nom de fichier cache incorrect : $cache");
-	}
+    if (
+        preg_match(
+            ',^([0-9a-f]/)?(\d+/)?[0-9a-f]+\.cache(\.gz)?$,i',
+            (string) $cache
+        )
+    ) {
+        // supprimer le fichier (de facon propre)
+        supprimer_fichier(_DIR_CACHE . $cache);
+    } else {
+        spip_log("Nom de fichier cache incorrect : $cache");
+    }
 }
 
 // Supprimer les caches marques "x"
 // A priori dans cette version la fonction ne sera pas appelee, car
 // la meta est toujours false ; mais evitons un bug si elle est appellee
 function inc_retire_caches_dist($chemin = '') {
-	if (isset($GLOBALS['meta']['invalider_caches'])) {
-		effacer_meta('invalider_caches');
-	} # concurrence
+    if (isset($GLOBALS['meta']['invalider_caches'])) {
+        effacer_meta('invalider_caches');
+    } # concurrence
 }
 
 #######################################################################
@@ -228,9 +228,9 @@ 
 ##
 
 function retire_caches($chemin = '') {
-	if ($retire_caches = charger_fonction('retire_caches', 'inc', true)) {
-		return $retire_caches($chemin);
-	}
+    if ($retire_caches = charger_fonction('retire_caches', 'inc', true)) {
+        return $retire_caches($chemin);
+    }
 }
 
 
@@ -238,10 +238,10 @@ 
 // (note: si absente, n'est pas appellee)
 
 function calcul_invalideurs($corps, $primary, &$boucles, $id_boucle) {
-	if ($calcul_invalideurs = charger_fonction('calcul_invalideurs', 'inc', true)) {
-		return $calcul_invalideurs($corps, $primary, $boucles, $id_boucle);
-	}
-	return $corps;
+    if ($calcul_invalideurs = charger_fonction('calcul_invalideurs', 'inc', true)) {
+        return $calcul_invalideurs($corps, $primary, $boucles, $id_boucle);
+    }
+    return $corps;
 }
 
 
@@ -250,41 +250,41 @@ 
 // invoquee quand on vide tout le cache en bloc (action/purger)
 //
 function supprime_invalideurs() {
-	if ($supprime_invalideurs = charger_fonction('supprime_invalideurs', 'inc', true)) {
-		return $supprime_invalideurs();
-	}
+    if ($supprime_invalideurs = charger_fonction('supprime_invalideurs', 'inc', true)) {
+        return $supprime_invalideurs();
+    }
 }
 
 
 // Calcul des pages : noter dans la base les liens d'invalidation
 function maj_invalideurs($fichier, &$page) {
-	if ($maj_invalideurs = charger_fonction('maj_invalideurs', 'inc', true)) {
-		return $maj_invalideurs($fichier, $page);
-	}
+    if ($maj_invalideurs = charger_fonction('maj_invalideurs', 'inc', true)) {
+        return $maj_invalideurs($fichier, $page);
+    }
 }
 
 
 // les invalideurs sont de la forme "objet/id_objet"
 function insere_invalideur($inval, $fichier) {
-	if ($insere_invalideur = charger_fonction('insere_invalideur', 'inc', true)) {
-		return $insere_invalideur($inval, $fichier);
-	}
+    if ($insere_invalideur = charger_fonction('insere_invalideur', 'inc', true)) {
+        return $insere_invalideur($inval, $fichier);
+    }
 }
 
 //
 // Marquer les fichiers caches invalides comme etant a supprimer
 //
 function applique_invalideur($depart) {
-	if ($applique_invalideur = charger_fonction('applique_invalideur', 'inc', true)) {
-		return $applique_invalideur($depart);
-	}
+    if ($applique_invalideur = charger_fonction('applique_invalideur', 'inc', true)) {
+        return $applique_invalideur($depart);
+    }
 }
 
 //
 // Invalider les caches liés à telle condition
 //
 function suivre_invalideur($cond, $modif = true) {
-	if ($suivre_invalideur = charger_fonction('suivre_invalideur', 'inc', true)) {
-		return $suivre_invalideur($cond, $modif);
-	}
+    if ($suivre_invalideur = charger_fonction('suivre_invalideur', 'inc', true)) {
+        return $suivre_invalideur($cond, $modif);
+    }
 }

ecrire/inc/filtres_boites.php

Indentation +37 added lines, -37 removed lines

@@ -17,7 +17,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 
@@ -43,18 +43,18 @@ 
  *     Pile complétée par le code à générer
  */
 function balise_BOITE_OUVRIR_dist($p) {
-	$_titre = interprete_argument_balise(1, $p);
-	$_class = interprete_argument_balise(2, $p);
-	$_head_class = interprete_argument_balise(3, $p);
-	$_titre = ($_titre ?: "''");
-	$_class = ($_class ? ", $_class" : ", 'simple'");
-	$_head_class = ($_head_class ? ", $_head_class" : '');
-
-	$f = chercher_filtre('boite_ouvrir');
-	$p->code = "$f($_titre$_class$_head_class)";
-	$p->interdire_scripts = false;
-
-	return $p;
+    $_titre = interprete_argument_balise(1, $p);
+    $_class = interprete_argument_balise(2, $p);
+    $_head_class = interprete_argument_balise(3, $p);
+    $_titre = ($_titre ?: "''");
+    $_class = ($_class ? ", $_class" : ", 'simple'");
+    $_head_class = ($_head_class ? ", $_head_class" : '');
+
+    $f = chercher_filtre('boite_ouvrir');
+    $p->code = "$f($_titre$_class$_head_class)";
+    $p->interdire_scripts = false;
+
+    return $p;
 }
 
 /**
@@ -74,14 +74,14 @@ 
  *     Pile complétée par le code à générer
  */
 function balise_BOITE_PIED_dist($p) {
-	$_class = interprete_argument_balise(1, $p);
-	$_class = ($_class ? "$_class" : '');
+    $_class = interprete_argument_balise(1, $p);
+    $_class = ($_class ? "$_class" : '');
 
-	$f = chercher_filtre('boite_pied');
-	$p->code = "$f($_class)";
-	$p->interdire_scripts = false;
+    $f = chercher_filtre('boite_pied');
+    $p->code = "$f($_class)";
+    $p->interdire_scripts = false;
 
-	return $p;
+    return $p;
 }
 
 
@@ -101,11 +101,11 @@ 
  *     Pile complétée par le code à générer
  */
 function balise_BOITE_FERMER_dist($p) {
-	$f = chercher_filtre('boite_fermer');
-	$p->code = "$f()";
-	$p->interdire_scripts = false;
+    $f = chercher_filtre('boite_fermer');
+    $p->code = "$f()";
+    $p->interdire_scripts = false;
 
-	return $p;
+    return $p;
 }
 
 /**
@@ -127,16 +127,16 @@ 
  *     HTML du début de la boîte
  */
 function boite_ouvrir($titre, $class = '', $head_class = '', $id = '') {
-	$class = "box $class";
-	$head_class = "box__header $head_class clearfix";
-	// dans l'espace prive, titrer en h3 si pas de balise <hn>
-	if (test_espace_prive() && strlen($titre) && !str_contains($titre, '<h')) {
-		$titre = "<h3>$titre</h3>";
-	}
-
-	return '<div class="' . $class . ($id ? "\" id=\"$id" : '') . '">'
-	. ($titre ? "<div class=\"$head_class\">$titre<!--/hd--></div>" : '')
-	. '<div class="box__body clearfix">';
+    $class = "box $class";
+    $head_class = "box__header $head_class clearfix";
+    // dans l'espace prive, titrer en h3 si pas de balise <hn>
+    if (test_espace_prive() && strlen($titre) && !str_contains($titre, '<h')) {
+        $titre = "<h3>$titre</h3>";
+    }
+
+    return '<div class="' . $class . ($id ? "\" id=\"$id" : '') . '">'
+    . ($titre ? "<div class=\"$head_class\">$titre<!--/hd--></div>" : '')
+    . '<div class="box__body clearfix">';
 }
 
 
@@ -153,10 +153,10 @@ 
  *     HTML de transition vers le pied de la boîte
  */
 function boite_pied($class = 'act') {
-	$class = "box__footer $class";
+    $class = "box__footer $class";
 
-	return '</div>'
-	. "<div class=\"$class clearfix\">";
+    return '</div>'
+    . "<div class=\"$class clearfix\">";
 }
 
 
@@ -171,5 +171,5 @@ 
  *     HTML de fin de la boîte
  */
 function boite_fermer() {
-	return '</div></div>';
+    return '</div></div>';
 }

ecrire/inc/filtres_alertes.php

Indentation +78 added lines, -78 removed lines

@@ -17,7 +17,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -42,22 +42,22 @@ 
  *     Pile complétée par le code à générer
  */
 function balise_ALERTE_MESSAGE_dist($p) {
-	$_texte = interprete_argument_balise(1, $p);
-	$_titre = interprete_argument_balise(2, $p);
-	$_class = interprete_argument_balise(3, $p);
-	$_role  = interprete_argument_balise(4, $p);
-	$_id    = interprete_argument_balise(5, $p);
-	$_texte = ($_texte ?: "''");
-	$_titre = ($_titre ? ", $_titre" : ', null');
-	$_class = ($_class ? ", $_class" : ', null');
-	$_role  = ($_role  ? ", $_role"  : ', null');
-	$_id    = ($_id    ? ", $_id"    : ', null');
+    $_texte = interprete_argument_balise(1, $p);
+    $_titre = interprete_argument_balise(2, $p);
+    $_class = interprete_argument_balise(3, $p);
+    $_role  = interprete_argument_balise(4, $p);
+    $_id    = interprete_argument_balise(5, $p);
+    $_texte = ($_texte ?: "''");
+    $_titre = ($_titre ? ", $_titre" : ', null');
+    $_class = ($_class ? ", $_class" : ', null');
+    $_role  = ($_role  ? ", $_role"  : ', null');
+    $_id    = ($_id    ? ", $_id"    : ', null');
 
-	$f = chercher_filtre('message_alerte');
-	$p->code = "$f($_texte$_titre$_class$_role$_id)";
-	$p->interdire_scripts = false;
+    $f = chercher_filtre('message_alerte');
+    $p->code = "$f($_texte$_titre$_class$_role$_id)";
+    $p->interdire_scripts = false;
 
-	return $p;
+    return $p;
 }
 
 /**
@@ -85,20 +85,20 @@ 
  *     Pile complétée par le code à générer
  */
 function balise_ALERTE_OUVRIR_dist($p) {
-	$_titre = interprete_argument_balise(1, $p);
-	$_class = interprete_argument_balise(2, $p);
-	$_role  = interprete_argument_balise(3, $p);
-	$_id    = interprete_argument_balise(4, $p);
-	$_titre = ($_titre ? "$_titre"   : 'null');
-	$_class = ($_class ? ", $_class" : ', null');
-	$_role  = ($_role  ? ", $_role"  : ', null');
-	$_id    = ($_id    ? ", $_id"    : ', null');
+    $_titre = interprete_argument_balise(1, $p);
+    $_class = interprete_argument_balise(2, $p);
+    $_role  = interprete_argument_balise(3, $p);
+    $_id    = interprete_argument_balise(4, $p);
+    $_titre = ($_titre ? "$_titre"   : 'null');
+    $_class = ($_class ? ", $_class" : ', null');
+    $_role  = ($_role  ? ", $_role"  : ', null');
+    $_id    = ($_id    ? ", $_id"    : ', null');
 
-	$f = chercher_filtre('message_alerte_ouvrir');
-	$p->code = "$f($_titre$_class$_role$_id)";
-	$p->interdire_scripts = false;
+    $f = chercher_filtre('message_alerte_ouvrir');
+    $p->code = "$f($_titre$_class$_role$_id)";
+    $p->interdire_scripts = false;
 
-	return $p;
+    return $p;
 }
 
 /**
@@ -120,11 +120,11 @@ 
  *     Pile complétée par le code à générer
  */
 function balise_ALERTE_FERMER_dist($p) {
-	$f = chercher_filtre('message_alerte_fermer');
-	$p->code = "$f()";
-	$p->interdire_scripts = false;
+    $f = chercher_filtre('message_alerte_fermer');
+    $p->code = "$f()";
+    $p->interdire_scripts = false;
 
-	return $p;
+    return $p;
 }
 
 /**
@@ -159,12 +159,12 @@ 
  */
 function message_alerte(string $texte, ?string $titre = null, ?string $class = null, ?string $role = null, ?string $id = null): string {
 
-	$message_alerte_ouvrir = chercher_filtre('message_alerte_ouvrir');
-	$message_alerte_fermer = chercher_filtre('message_alerte_fermer');
+    $message_alerte_ouvrir = chercher_filtre('message_alerte_ouvrir');
+    $message_alerte_fermer = chercher_filtre('message_alerte_fermer');
 
-	return $message_alerte_ouvrir($titre, $class, $role, $id) .
-		$texte .
-		$message_alerte_fermer();
+    return $message_alerte_ouvrir($titre, $class, $role, $id) .
+        $texte .
+        $message_alerte_fermer();
 }
 
 /**
@@ -195,53 +195,53 @@ 
  */
 function message_alerte_ouvrir(?string $titre = null, ?string $class = null, ?string $role = null, ?string $id = null): string {
 
-	$prive = test_espace_prive();
+    $prive = test_espace_prive();
 
-	// Valeurs par défaut
-	$titre = trim($titre ?? '');
-	$role ??= 'alert'; // fallback uniquement si null
-	$class ??= 'notice'; // fallback uniquement si null
+    // Valeurs par défaut
+    $titre = trim($titre ?? '');
+    $role ??= 'alert'; // fallback uniquement si null
+    $class ??= 'notice'; // fallback uniquement si null
 
-	// Type d'alerte : le chercher dans les classes, nettoyer celles-ci, puis le réinjecter
-	$types = [
-		'notice',
-		'error',
-		'success',
-		'info',
-	];
-	$type  = array_intersect(explode(' ', $class), $types);
-	$type  = reset($type);
-	$class = trim(str_replace($types, '', $class) . " $type");
+    // Type d'alerte : le chercher dans les classes, nettoyer celles-ci, puis le réinjecter
+    $types = [
+        'notice',
+        'error',
+        'success',
+        'info',
+    ];
+    $type  = array_intersect(explode(' ', $class), $types);
+    $type  = reset($type);
+    $class = trim(str_replace($types, '', $class) . " $type");
 
-	// Classes
-	$class_racine = 'msg-alert';
-	$clearfix     = ($prive ? 'clearfix' : '');
-	$class_alerte = "$class_racine $class";
-	$class_texte  = "{$class_racine}__text $clearfix";
-	$class_titre  = "{$class_racine}__heading";
+    // Classes
+    $class_racine = 'msg-alert';
+    $clearfix     = ($prive ? 'clearfix' : '');
+    $class_alerte = "$class_racine $class";
+    $class_texte  = "{$class_racine}__text $clearfix";
+    $class_titre  = "{$class_racine}__heading";
 
-	// Titre : markup
-	$titre = trim($titre);
-	if (strlen($titre)) {
-		include_spip('inc/filtres');
-		// Si besoin on encapsule le titre : un h3 dans le privé, un simple div sinon.
-		$cherche_tag = ($prive ? '<h' : '<');
-		$wrap_tag    = ($prive ? '<h3>' : '<div>');
-		if (!str_starts_with($titre, $cherche_tag)) {
-			$titre = wrap($titre, $wrap_tag);
-		}
-		// puis on ajoute la classe
-		$titre = ajouter_class($titre, $class_titre);
-	}
+    // Titre : markup
+    $titre = trim($titre);
+    if (strlen($titre)) {
+        include_spip('inc/filtres');
+        // Si besoin on encapsule le titre : un h3 dans le privé, un simple div sinon.
+        $cherche_tag = ($prive ? '<h' : '<');
+        $wrap_tag    = ($prive ? '<h3>' : '<div>');
+        if (!str_starts_with($titre, $cherche_tag)) {
+            $titre = wrap($titre, $wrap_tag);
+        }
+        // puis on ajoute la classe
+        $titre = ajouter_class($titre, $class_titre);
+    }
 
-	// Attributs
-	$attr_role = ($role ? "role=\"$role\"" : '');
-	$attr_id   = ($id   ? "id=\"$id\"" : '');
-	$attr_data = ($type ? "data-alert=\"$type\"" : '');
+    // Attributs
+    $attr_role = ($role ? "role=\"$role\"" : '');
+    $attr_id   = ($id   ? "id=\"$id\"" : '');
+    $attr_data = ($type ? "data-alert=\"$type\"" : '');
 
-	return "<div class=\"$class_alerte\" $attr_role $attr_id $attr_data>"
-			. $titre
-			. "<div class=\"$class_texte\">";
+    return "<div class=\"$class_alerte\" $attr_role $attr_id $attr_data>"
+            . $titre
+            . "<div class=\"$class_texte\">";
 }
 
 /**
@@ -255,5 +255,5 @@ 
  *     HTML de fin de l'alerte
  */
 function message_alerte_fermer(): string {
-	return '</div></div>';
+    return '</div></div>';
 }