spip / SPIP

ecrire/inc/math.php

Indentation +97 added lines, -97 removed lines

@@ -12,7 +12,7 @@ 
 
 //
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 //
@@ -21,54 +21,54 @@ 
 
 function produire_image_math($tex) {
 
-	switch ($GLOBALS['traiter_math']) {
-		// Attention: mathml desactiv'e pour l'instant
-		case 'mathml':
-			$ext = '.xhtml';
-			$server = $GLOBALS['mathml_server'];
-			break;
-		case 'tex':
-			$ext = '.png';
-			$server = $GLOBALS['tex_server'];
-			break;
-		default:
-			return $tex;
-	}
-
-	// Regarder dans le repertoire local des images TeX et blocs MathML
-	if (!@is_dir($dir_tex = _DIR_VAR . 'cache-TeX/')) {
-		@mkdir($dir_tex, _SPIP_CHMOD);
-	}
-	$fichier = $dir_tex . md5(trim($tex)) . $ext;
-
-
-	if (!@file_exists($fichier)) {
-		// Aller chercher l'image sur le serveur
-		if ($server) {
-			spip_log($url = $server . '?' . rawurlencode($tex));
-			include_spip('inc/distant');
-			recuperer_url($url, ['file' => $fichier]);
-		}
-	}
-
-
-	// Composer la reponse selon presence ou non de l'image
-	$tex = entites_html($tex);
-	if (@file_exists($fichier)) {
-		// MathML
-		if ($GLOBALS['traiter_math'] == 'mathml') {
-			return implode('', file($fichier));
-		} // TeX
-		else {
-			[, , , $size] = @spip_getimagesize($fichier);
-			$alt = "alt=\"$tex\" title=\"$tex\"";
-
-			return "<img src=\"$fichier\" style=\"vertical-align:middle;\" $size $alt />";
-		}
-	} else // pas de fichier
-	{
-		return "<tt><span class='spip_code' dir='ltr'>$tex</span></tt>";
-	}
+    switch ($GLOBALS['traiter_math']) {
+        // Attention: mathml desactiv'e pour l'instant
+        case 'mathml':
+            $ext = '.xhtml';
+            $server = $GLOBALS['mathml_server'];
+            break;
+        case 'tex':
+            $ext = '.png';
+            $server = $GLOBALS['tex_server'];
+            break;
+        default:
+            return $tex;
+    }
+
+    // Regarder dans le repertoire local des images TeX et blocs MathML
+    if (!@is_dir($dir_tex = _DIR_VAR . 'cache-TeX/')) {
+        @mkdir($dir_tex, _SPIP_CHMOD);
+    }
+    $fichier = $dir_tex . md5(trim($tex)) . $ext;
+
+
+    if (!@file_exists($fichier)) {
+        // Aller chercher l'image sur le serveur
+        if ($server) {
+            spip_log($url = $server . '?' . rawurlencode($tex));
+            include_spip('inc/distant');
+            recuperer_url($url, ['file' => $fichier]);
+        }
+    }
+
+
+    // Composer la reponse selon presence ou non de l'image
+    $tex = entites_html($tex);
+    if (@file_exists($fichier)) {
+        // MathML
+        if ($GLOBALS['traiter_math'] == 'mathml') {
+            return implode('', file($fichier));
+        } // TeX
+        else {
+            [, , , $size] = @spip_getimagesize($fichier);
+            $alt = "alt=\"$tex\" title=\"$tex\"";
+
+            return "<img src=\"$fichier\" style=\"vertical-align:middle;\" $size $alt />";
+        }
+    } else // pas de fichier
+    {
+        return "<tt><span class='spip_code' dir='ltr'>$tex</span></tt>";
+    }
 }
 
 
@@ -103,52 +103,52 @@ 
  */
 function traiter_math($letexte, $source = '', $defaire_amp = false) {
 
-	$texte_a_voir = $letexte;
-	while (($debut = strpos($texte_a_voir, '<math>')) !== false) {
-		if (!$fin = strpos($texte_a_voir, '</math>')) {
-			$fin = strlen($texte_a_voir);
-		}
-
-		$texte_debut = substr($texte_a_voir, 0, $debut);
-		$texte_milieu = substr(
-			$texte_a_voir,
-			$debut + strlen('<math>'),
-			$fin - $debut - strlen('<math>')
-		);
-		$texte_fin = substr(
-			$texte_a_voir,
-			$fin + strlen('</math>'),
-			strlen($texte_a_voir)
-		);
-
-		// Les doubles $$x^2$$ en mode 'div'
-		while ((preg_match(',[$][$]([^$]+)[$][$],', $texte_milieu, $regs))) {
-			$expression = $regs[1];
-			if ($defaire_amp) {
-				$expression = str_replace('&amp;', '&', $expression);
-			}
-			$echap = "\n<p class=\"spip\" style=\"text-align: center;\">" . produire_image_math($expression) . "</p>\n";
-			$pos = strpos($texte_milieu, (string) $regs[0]);
-			$texte_milieu = substr($texte_milieu, 0, $pos)
-				. code_echappement($echap, $source)
-				. substr($texte_milieu, $pos + strlen($regs[0]));
-		}
-
-		// Les simples $x^2$ en mode 'span'
-		while ((preg_match(',[$]([^$]+)[$],', $texte_milieu, $regs))) {
-			$expression = $regs[1];
-			if ($defaire_amp) {
-				$expression = str_replace('&amp;', '&', $expression);
-			}
-			$echap = produire_image_math($expression);
-			$pos = strpos($texte_milieu, (string) $regs[0]);
-			$texte_milieu = substr($texte_milieu, 0, $pos)
-				. code_echappement($echap, $source)
-				. substr($texte_milieu, $pos + strlen($regs[0]));
-		}
-
-		$texte_a_voir = $texte_debut . $texte_milieu . $texte_fin;
-	}
-
-	return $texte_a_voir;
+    $texte_a_voir = $letexte;
+    while (($debut = strpos($texte_a_voir, '<math>')) !== false) {
+        if (!$fin = strpos($texte_a_voir, '</math>')) {
+            $fin = strlen($texte_a_voir);
+        }
+
+        $texte_debut = substr($texte_a_voir, 0, $debut);
+        $texte_milieu = substr(
+            $texte_a_voir,
+            $debut + strlen('<math>'),
+            $fin - $debut - strlen('<math>')
+        );
+        $texte_fin = substr(
+            $texte_a_voir,
+            $fin + strlen('</math>'),
+            strlen($texte_a_voir)
+        );
+
+        // Les doubles $$x^2$$ en mode 'div'
+        while ((preg_match(',[$][$]([^$]+)[$][$],', $texte_milieu, $regs))) {
+            $expression = $regs[1];
+            if ($defaire_amp) {
+                $expression = str_replace('&amp;', '&', $expression);
+            }
+            $echap = "\n<p class=\"spip\" style=\"text-align: center;\">" . produire_image_math($expression) . "</p>\n";
+            $pos = strpos($texte_milieu, (string) $regs[0]);
+            $texte_milieu = substr($texte_milieu, 0, $pos)
+                . code_echappement($echap, $source)
+                . substr($texte_milieu, $pos + strlen($regs[0]));
+        }
+
+        // Les simples $x^2$ en mode 'span'
+        while ((preg_match(',[$]([^$]+)[$],', $texte_milieu, $regs))) {
+            $expression = $regs[1];
+            if ($defaire_amp) {
+                $expression = str_replace('&amp;', '&', $expression);
+            }
+            $echap = produire_image_math($expression);
+            $pos = strpos($texte_milieu, (string) $regs[0]);
+            $texte_milieu = substr($texte_milieu, 0, $pos)
+                . code_echappement($echap, $source)
+                . substr($texte_milieu, $pos + strlen($regs[0]));
+        }
+
+        $texte_a_voir = $texte_debut . $texte_milieu . $texte_fin;
+    }
+
+    return $texte_a_voir;
 }

ecrire/inc/layer.php

Indentation +109 added lines, -109 removed lines

@@ -11,7 +11,7 @@ 
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -26,70 +26,70 @@ 
  * @return string Code HTML du cadre dépliable
  **/
 function cadre_depliable($icone, $titre, $deplie, $contenu, $ids = '', $style_cadre = 'r') {
-	$bouton = bouton_block_depliable($titre, $deplie, $ids);
-
-	return
-		debut_cadre($style_cadre, $icone, '', $bouton, '', '', false)
-		. debut_block_depliable($deplie, $ids)
-		. "<div class='cadre_padding'>\n"
-		. $contenu
-		. "</div>\n"
-		. fin_block()
-		. fin_cadre();
+    $bouton = bouton_block_depliable($titre, $deplie, $ids);
+
+    return
+        debut_cadre($style_cadre, $icone, '', $bouton, '', '', false)
+        . debut_block_depliable($deplie, $ids)
+        . "<div class='cadre_padding'>\n"
+        . $contenu
+        . "</div>\n"
+        . fin_block()
+        . fin_cadre();
 }
 
 function block_parfois_visible($nom, $invite, $masque, $style = '', $visible = false) {
-	return "\n"
-	. bouton_block_depliable($invite, $visible, $nom)
-	. debut_block_depliable($visible, $nom)
-	. $masque
-	. fin_block();
+    return "\n"
+    . bouton_block_depliable($invite, $visible, $nom)
+    . debut_block_depliable($visible, $nom)
+    . $masque
+    . fin_block();
 }
 
 function debut_block_depliable($deplie, $id = '') {
-	$class = ' blocdeplie';
-	// si on n'accepte pas js, ne pas fermer
-	if (!$deplie) {
-		$class = ' blocreplie';
-	}
+    $class = ' blocdeplie';
+    // si on n'accepte pas js, ne pas fermer
+    if (!$deplie) {
+        $class = ' blocreplie';
+    }
 
-	return '<div ' . ($id ? "id='$id' " : '') . "class='bloc_depliable$class'>";
+    return '<div ' . ($id ? "id='$id' " : '') . "class='bloc_depliable$class'>";
 }
 
 function fin_block() {
-	return "<div class='nettoyeur'></div>\n</div>";
+    return "<div class='nettoyeur'></div>\n</div>";
 }
 
 // $texte : texte du bouton
 // $deplie : true (deplie) ou false (plie) ou -1 (inactif) ou 'incertain' pour que le bouton s'auto init au chargement de la page
 // $ids : id des div lies au bouton (facultatif, par defaut c'est le div.bloc_depliable qui suit)
 function bouton_block_depliable($texte, $deplie, $ids = '') {
-	$bouton_id = 'b' . substr(md5($texte . microtime()), 0, 8);
-
-	$class = ($deplie === true) ? ' deplie' : (($deplie == -1) ? ' impliable' : ' replie');
-	if (strlen($ids)) {
-		$cible = explode(',', $ids);
-		$cible = '#' . implode(',#', $cible);
-	} else {
-		$cible = "#$bouton_id + div.bloc_depliable";
-	}
-
-	$b = (strpos($texte, '<h') === false ? 'h3' : 'div');
-
-	return "<$b "
-	. ($bouton_id ? "id='$bouton_id' " : '')
-	. "class='titrem$class'"
-	. (($deplie === -1)
-		? ''
-		: " onmouseover=\"jQuery(this).depliant('$cible');\""
-	)
-	. '>'
-	// une ancre pour rendre accessible au clavier le depliage du sous bloc
-	. "<a href='#' onclick=\"return jQuery(this).depliant_clicancre('$cible');\" class='titremancre'></a>"
-	. "$texte</$b>"
-	. http_script(($deplie === 'incertain')
-		? "jQuery(function($){if ($('$cible').is(':visible')) { $('#$bouton_id').addClass('deplie').removeClass('replie'); }});"
-		: '');
+    $bouton_id = 'b' . substr(md5($texte . microtime()), 0, 8);
+
+    $class = ($deplie === true) ? ' deplie' : (($deplie == -1) ? ' impliable' : ' replie');
+    if (strlen($ids)) {
+        $cible = explode(',', $ids);
+        $cible = '#' . implode(',#', $cible);
+    } else {
+        $cible = "#$bouton_id + div.bloc_depliable";
+    }
+
+    $b = (strpos($texte, '<h') === false ? 'h3' : 'div');
+
+    return "<$b "
+    . ($bouton_id ? "id='$bouton_id' " : '')
+    . "class='titrem$class'"
+    . (($deplie === -1)
+        ? ''
+        : " onmouseover=\"jQuery(this).depliant('$cible');\""
+    )
+    . '>'
+    // une ancre pour rendre accessible au clavier le depliage du sous bloc
+    . "<a href='#' onclick=\"return jQuery(this).depliant_clicancre('$cible');\" class='titremancre'></a>"
+    . "$texte</$b>"
+    . http_script(($deplie === 'incertain')
+        ? "jQuery(function($){if ($('$cible').is(':visible')) { $('#$bouton_id').addClass('deplie').removeClass('replie'); }});"
+        : '');
 }
 
 //
@@ -97,66 +97,66 @@ 
 //
 function verif_butineur() {
 
-	preg_match(',^([A-Za-z]+)/([0-9]+\.[0-9]+) (.*)$,', $_SERVER['HTTP_USER_AGENT'], $match);
-	$GLOBALS['browser_name'] = $match[1];
-	$GLOBALS['browser_version'] = $match[2];
-	$GLOBALS['browser_description'] = $match[3];
-	$GLOBALS['browser_layer'] = ' '; // compat avec vieux scripts qui testent la valeur
-	$GLOBALS['browser_barre'] = '';
-
-	if (!preg_match(',opera,i', $GLOBALS['browser_description']) && preg_match(',opera,i', $GLOBALS['browser_name'])) {
-		$GLOBALS['browser_name'] = 'Opera';
-		$GLOBALS['browser_version'] = $match[2];
-		$GLOBALS['browser_barre'] = ($GLOBALS['browser_version'] >= 8.5);
-	} else {
-		if (preg_match(',opera,i', $GLOBALS['browser_description'])) {
-			preg_match(',Opera ([^\ ]*),i', $GLOBALS['browser_description'], $match);
-			$GLOBALS['browser_name'] = 'Opera';
-			$GLOBALS['browser_version'] = $match[1];
-			$GLOBALS['browser_barre'] = ($GLOBALS['browser_version'] >= 8.5);
-		} else {
-			if (preg_match(',msie,i', $GLOBALS['browser_description'])) {
-				preg_match(',MSIE ([^;]*),i', $GLOBALS['browser_description'], $match);
-				$GLOBALS['browser_name'] = 'MSIE';
-				$GLOBALS['browser_version'] = $match[1];
-				$GLOBALS['browser_barre'] = ($GLOBALS['browser_version'] >= 5.5);
-			} else {
-				if (
-					preg_match(',KHTML,i', $GLOBALS['browser_description']) &&
-					preg_match(',Safari/([^;]*),', $GLOBALS['browser_description'], $match)
-				) {
-					$GLOBALS['browser_name'] = 'Safari';
-					$GLOBALS['browser_version'] = $match[1];
-					$GLOBALS['browser_barre'] = ($GLOBALS['browser_version'] >= 5.0);
-				} else {
-					if (preg_match(',mozilla,i', $GLOBALS['browser_name']) and $GLOBALS['browser_version'] >= 5) {
-						// Numero de version pour Mozilla "authentique"
-						if (preg_match(',rv:([0-9]+\.[0-9]+),', $GLOBALS['browser_description'], $match)) {
-							$GLOBALS['browser_rev'] = doubleval($match[1]);
-						} // Autres Gecko => equivalents 1.4 par defaut (Galeon, etc.)
-						else {
-							if (
-								strpos($GLOBALS['browser_description'], 'Gecko') and !strpos(
-									$GLOBALS['browser_description'],
-									'KHTML'
-								)
-							) {
-								$GLOBALS['browser_rev'] = 1.4;
-							} // Machins quelconques => equivalents 1.0 par defaut (Konqueror, etc.)
-							else {
-								$GLOBALS['browser_rev'] = 1.0;
-							}
-						}
-						$GLOBALS['browser_barre'] = $GLOBALS['browser_rev'] >= 1.3;
-					}
-				}
-			}
-		}
-	}
-
-	if (!$GLOBALS['browser_name']) {
-		$GLOBALS['browser_name'] = 'Mozilla';
-	}
+    preg_match(',^([A-Za-z]+)/([0-9]+\.[0-9]+) (.*)$,', $_SERVER['HTTP_USER_AGENT'], $match);
+    $GLOBALS['browser_name'] = $match[1];
+    $GLOBALS['browser_version'] = $match[2];
+    $GLOBALS['browser_description'] = $match[3];
+    $GLOBALS['browser_layer'] = ' '; // compat avec vieux scripts qui testent la valeur
+    $GLOBALS['browser_barre'] = '';
+
+    if (!preg_match(',opera,i', $GLOBALS['browser_description']) && preg_match(',opera,i', $GLOBALS['browser_name'])) {
+        $GLOBALS['browser_name'] = 'Opera';
+        $GLOBALS['browser_version'] = $match[2];
+        $GLOBALS['browser_barre'] = ($GLOBALS['browser_version'] >= 8.5);
+    } else {
+        if (preg_match(',opera,i', $GLOBALS['browser_description'])) {
+            preg_match(',Opera ([^\ ]*),i', $GLOBALS['browser_description'], $match);
+            $GLOBALS['browser_name'] = 'Opera';
+            $GLOBALS['browser_version'] = $match[1];
+            $GLOBALS['browser_barre'] = ($GLOBALS['browser_version'] >= 8.5);
+        } else {
+            if (preg_match(',msie,i', $GLOBALS['browser_description'])) {
+                preg_match(',MSIE ([^;]*),i', $GLOBALS['browser_description'], $match);
+                $GLOBALS['browser_name'] = 'MSIE';
+                $GLOBALS['browser_version'] = $match[1];
+                $GLOBALS['browser_barre'] = ($GLOBALS['browser_version'] >= 5.5);
+            } else {
+                if (
+                    preg_match(',KHTML,i', $GLOBALS['browser_description']) &&
+                    preg_match(',Safari/([^;]*),', $GLOBALS['browser_description'], $match)
+                ) {
+                    $GLOBALS['browser_name'] = 'Safari';
+                    $GLOBALS['browser_version'] = $match[1];
+                    $GLOBALS['browser_barre'] = ($GLOBALS['browser_version'] >= 5.0);
+                } else {
+                    if (preg_match(',mozilla,i', $GLOBALS['browser_name']) and $GLOBALS['browser_version'] >= 5) {
+                        // Numero de version pour Mozilla "authentique"
+                        if (preg_match(',rv:([0-9]+\.[0-9]+),', $GLOBALS['browser_description'], $match)) {
+                            $GLOBALS['browser_rev'] = doubleval($match[1]);
+                        } // Autres Gecko => equivalents 1.4 par defaut (Galeon, etc.)
+                        else {
+                            if (
+                                strpos($GLOBALS['browser_description'], 'Gecko') and !strpos(
+                                    $GLOBALS['browser_description'],
+                                    'KHTML'
+                                )
+                            ) {
+                                $GLOBALS['browser_rev'] = 1.4;
+                            } // Machins quelconques => equivalents 1.0 par defaut (Konqueror, etc.)
+                            else {
+                                $GLOBALS['browser_rev'] = 1.0;
+                            }
+                        }
+                        $GLOBALS['browser_barre'] = $GLOBALS['browser_rev'] >= 1.3;
+                    }
+                }
+            }
+        }
+    }
+
+    if (!$GLOBALS['browser_name']) {
+        $GLOBALS['browser_name'] = 'Mozilla';
+    }
 }
 
 verif_butineur();

ecrire/inc/meta.php

Indentation +197 added lines, -197 removed lines

@@ -17,7 +17,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 // Les parametres generaux du site sont dans une table SQL;
@@ -27,51 +27,51 @@ 
 define('_META_CACHE_TIME', 1 << 24);
 
 function inc_meta_dist($table = 'meta') {
-	$new = null;
-	// Lire les meta, en cache si present, valide et lisible
-	// en cas d'install ne pas faire confiance au meta_cache eventuel
-	$cache = cache_meta($table);
+    $new = null;
+    // Lire les meta, en cache si present, valide et lisible
+    // en cas d'install ne pas faire confiance au meta_cache eventuel
+    $cache = cache_meta($table);
 
-	if (
-		(!$exec = _request('exec') or !autoriser_sans_cookie($exec))
-		and $new = jeune_fichier($cache, _META_CACHE_TIME)
-		and lire_fichier_securise($cache, $meta)
-		and $meta = @unserialize($meta)
-	) {
-		$GLOBALS[$table] = $meta;
-	}
+    if (
+        (!$exec = _request('exec') or !autoriser_sans_cookie($exec))
+        and $new = jeune_fichier($cache, _META_CACHE_TIME)
+        and lire_fichier_securise($cache, $meta)
+        and $meta = @unserialize($meta)
+    ) {
+        $GLOBALS[$table] = $meta;
+    }
 
-	if (
-		isset($GLOBALS[$table]['touch'])
-		and ($GLOBALS[$table]['touch'] < time() - _META_CACHE_TIME)
-	) {
-		$GLOBALS[$table] = [];
-	}
-	// sinon lire en base
-	if (!$GLOBALS[$table]) {
-		$new = !lire_metas($table);
-	}
+    if (
+        isset($GLOBALS[$table]['touch'])
+        and ($GLOBALS[$table]['touch'] < time() - _META_CACHE_TIME)
+    ) {
+        $GLOBALS[$table] = [];
+    }
+    // sinon lire en base
+    if (!$GLOBALS[$table]) {
+        $new = !lire_metas($table);
+    }
 
-	// renouveller l'alea general si trop vieux ou sur demande explicite
-	if (
-		(test_espace_prive() || isset($_GET['renouvelle_alea']))
-		and $GLOBALS[$table]
-		and (time() > _RENOUVELLE_ALEA + ($GLOBALS['meta']['alea_ephemere_date'] ?? 0))
-	) {
-		// si on n'a pas l'acces en ecriture sur le cache,
-		// ne pas renouveller l'alea sinon le cache devient faux
-		if (supprimer_fichier($cache)) {
-			include_spip('inc/acces');
-			renouvelle_alea();
-			$new = false;
-		} else {
-			spip_log("impossible d'ecrire dans " . $cache);
-		}
-	}
-	// et refaire le cache si on a du lire en base
-	if (!$new) {
-		touch_meta(false, $table);
-	}
+    // renouveller l'alea general si trop vieux ou sur demande explicite
+    if (
+        (test_espace_prive() || isset($_GET['renouvelle_alea']))
+        and $GLOBALS[$table]
+        and (time() > _RENOUVELLE_ALEA + ($GLOBALS['meta']['alea_ephemere_date'] ?? 0))
+    ) {
+        // si on n'a pas l'acces en ecriture sur le cache,
+        // ne pas renouveller l'alea sinon le cache devient faux
+        if (supprimer_fichier($cache)) {
+            include_spip('inc/acces');
+            renouvelle_alea();
+            $new = false;
+        } else {
+            spip_log("impossible d'ecrire dans " . $cache);
+        }
+    }
+    // et refaire le cache si on a du lire en base
+    if (!$new) {
+        touch_meta(false, $table);
+    }
 }
 
 // fonctions aussi appelees a l'install ==> spip_query en premiere requete
@@ -79,39 +79,39 @@ 
 
 function lire_metas($table = 'meta') {
 
-	if ($result = spip_query("SELECT nom,valeur FROM spip_$table")) {
-		include_spip('base/abstract_sql');
-		$GLOBALS[$table] = [];
-		while ($row = sql_fetch($result)) {
-			$GLOBALS[$table][$row['nom']] = $row['valeur'];
-		}
-		sql_free($result);
+    if ($result = spip_query("SELECT nom,valeur FROM spip_$table")) {
+        include_spip('base/abstract_sql');
+        $GLOBALS[$table] = [];
+        while ($row = sql_fetch($result)) {
+            $GLOBALS[$table][$row['nom']] = $row['valeur'];
+        }
+        sql_free($result);
 
-		if (
-			!isset($GLOBALS[$table]['charset'])
-			or !$GLOBALS[$table]['charset']
-			or $GLOBALS[$table]['charset'] == '_DEFAULT_CHARSET' // hum, correction d'un bug ayant abime quelques install
-		) {
-			ecrire_meta('charset', _DEFAULT_CHARSET, null, $table);
-		}
+        if (
+            !isset($GLOBALS[$table]['charset'])
+            or !$GLOBALS[$table]['charset']
+            or $GLOBALS[$table]['charset'] == '_DEFAULT_CHARSET' // hum, correction d'un bug ayant abime quelques install
+        ) {
+            ecrire_meta('charset', _DEFAULT_CHARSET, null, $table);
+        }
 
-		// noter cette table de configuration dans les meta de SPIP
-		if ($table !== 'meta') {
-			$liste = [];
-			if (isset($GLOBALS['meta']['tables_config'])) {
-				$liste = unserialize($GLOBALS['meta']['tables_config']);
-			}
-			if (!$liste) {
-				$liste = [];
-			}
-			if (!in_array($table, $liste)) {
-				$liste[] = $table;
-				ecrire_meta('tables_config', serialize($liste));
-			}
-		}
-	}
+        // noter cette table de configuration dans les meta de SPIP
+        if ($table !== 'meta') {
+            $liste = [];
+            if (isset($GLOBALS['meta']['tables_config'])) {
+                $liste = unserialize($GLOBALS['meta']['tables_config']);
+            }
+            if (!$liste) {
+                $liste = [];
+            }
+            if (!in_array($table, $liste)) {
+                $liste[] = $table;
+                ecrire_meta('tables_config', serialize($liste));
+            }
+        }
+    }
 
-	return $GLOBALS[$table] ?? null;
+    return $GLOBALS[$table] ?? null;
 }
 
 
@@ -125,22 +125,22 @@ 
  *      Table SQL d'enregistrement des meta.
  **/
 function touch_meta($antidate = false, $table = 'meta') {
-	$file = cache_meta($table);
-	if (!$antidate or !@touch($file, $antidate)) {
-		$r = $GLOBALS[$table] ?? [];
-		if ($table == 'meta') {
-			unset($r['alea_ephemere']);
-			unset($r['alea_ephemere_ancien']);
-			// le secret du site est utilise pour encoder les contextes ajax que l'on considere fiables
-			// mais le sortir deu cache meta implique une requete sql des qu'on a un form dynamique
-			// meme si son squelette est en cache
-			//unset($r['secret_du_site']);
-			if ($antidate) {
-				$r['touch'] = $antidate;
-			}
-		}
-		ecrire_fichier_securise($file, serialize($r));
-	}
+    $file = cache_meta($table);
+    if (!$antidate or !@touch($file, $antidate)) {
+        $r = $GLOBALS[$table] ?? [];
+        if ($table == 'meta') {
+            unset($r['alea_ephemere']);
+            unset($r['alea_ephemere_ancien']);
+            // le secret du site est utilise pour encoder les contextes ajax que l'on considere fiables
+            // mais le sortir deu cache meta implique une requete sql des qu'on a un form dynamique
+            // meme si son squelette est en cache
+            //unset($r['secret_du_site']);
+            if ($antidate) {
+                $r['touch'] = $antidate;
+            }
+        }
+        ecrire_fichier_securise($file, serialize($r));
+    }
 }
 
 /**
@@ -156,21 +156,21 @@ 
  *     Table SQL d'enregistrement de la meta.
  **/
 function effacer_meta($nom, $table = 'meta') {
-	// section critique sur le cache:
-	// l'invalider avant et apres la MAJ de la BD
-	// c'est un peu moins bien qu'un vrai verrou mais ca suffira
-	// et utiliser une statique pour eviter des acces disques a repetition
-	static $touch = [];
-	$antidate = time() - (_META_CACHE_TIME << 4);
-	if (!isset($touch[$table])) {
-		touch_meta($antidate, $table);
-	}
-	sql_delete('spip_' . $table, "nom='$nom'", '', 'continue');
-	unset($GLOBALS[$table][$nom]);
-	if (!isset($touch[$table])) {
-		touch_meta($antidate, $table);
-		$touch[$table] = false;
-	}
+    // section critique sur le cache:
+    // l'invalider avant et apres la MAJ de la BD
+    // c'est un peu moins bien qu'un vrai verrou mais ca suffira
+    // et utiliser une statique pour eviter des acces disques a repetition
+    static $touch = [];
+    $antidate = time() - (_META_CACHE_TIME << 4);
+    if (!isset($touch[$table])) {
+        touch_meta($antidate, $table);
+    }
+    sql_delete('spip_' . $table, "nom='$nom'", '', 'continue');
+    unset($GLOBALS[$table][$nom]);
+    if (!isset($touch[$table])) {
+        touch_meta($antidate, $table);
+        $touch[$table] = false;
+    }
 }
 
 /**
@@ -191,53 +191,53 @@ 
  **/
 function ecrire_meta($nom, $valeur, $importable = null, $table = 'meta') {
 
-	static $touch = [];
-	if (!$nom) {
-		return;
-	}
-	include_spip('base/abstract_sql');
-	$res = sql_select('*', 'spip_' . $table, 'nom=' . sql_quote($nom), '', '', '', '', '', 'continue');
-	// table pas encore installee, travailler en php seulement
-	if (!$res) {
-		$GLOBALS[$table][$nom] = $valeur;
+    static $touch = [];
+    if (!$nom) {
+        return;
+    }
+    include_spip('base/abstract_sql');
+    $res = sql_select('*', 'spip_' . $table, 'nom=' . sql_quote($nom), '', '', '', '', '', 'continue');
+    // table pas encore installee, travailler en php seulement
+    if (!$res) {
+        $GLOBALS[$table][$nom] = $valeur;
 
-		return;
-	}
-	$row = sql_fetch($res);
-	sql_free($res);
+        return;
+    }
+    $row = sql_fetch($res);
+    sql_free($res);
 
-	// ne pas invalider le cache si affectation a l'identique
-	// (tant pis si impt aurait du changer)
-	if (
-		$row and $valeur == $row['valeur']
-		and isset($GLOBALS[$table][$nom])
-		and $GLOBALS[$table][$nom] == $valeur
-	) {
-		return;
-	}
+    // ne pas invalider le cache si affectation a l'identique
+    // (tant pis si impt aurait du changer)
+    if (
+        $row and $valeur == $row['valeur']
+        and isset($GLOBALS[$table][$nom])
+        and $GLOBALS[$table][$nom] == $valeur
+    ) {
+        return;
+    }
 
-	$GLOBALS[$table][$nom] = $valeur;
-	// cf effacer pour comprendre le double touch
-	$antidate = time() - (_META_CACHE_TIME << 1);
-	if (!isset($touch[$table])) {
-		touch_meta($antidate, $table);
-	}
-	$r = ['nom' => sql_quote($nom, '', 'text'), 'valeur' => sql_quote($valeur, '', 'text')];
-	// Gaffe aux tables sans impt (vieilles versions de SPIP notamment)
-	// ici on utilise pas sql_updateq et sql_insertq pour ne pas provoquer trop tot
-	// de lecture des descriptions des tables
-	if ($importable and isset($row['impt'])) {
-		$r['impt'] = sql_quote($importable, '', 'text');
-	}
-	if ($row) {
-		sql_update('spip_' . $table, $r, 'nom=' . sql_quote($nom));
-	} else {
-		sql_insert('spip_' . $table, '(' . join(',', array_keys($r)) . ')', '(' . join(',', array_values($r)) . ')');
-	}
-	if (!isset($touch[$table])) {
-		touch_meta($antidate, $table);
-		$touch[$table] = false;
-	}
+    $GLOBALS[$table][$nom] = $valeur;
+    // cf effacer pour comprendre le double touch
+    $antidate = time() - (_META_CACHE_TIME << 1);
+    if (!isset($touch[$table])) {
+        touch_meta($antidate, $table);
+    }
+    $r = ['nom' => sql_quote($nom, '', 'text'), 'valeur' => sql_quote($valeur, '', 'text')];
+    // Gaffe aux tables sans impt (vieilles versions de SPIP notamment)
+    // ici on utilise pas sql_updateq et sql_insertq pour ne pas provoquer trop tot
+    // de lecture des descriptions des tables
+    if ($importable and isset($row['impt'])) {
+        $r['impt'] = sql_quote($importable, '', 'text');
+    }
+    if ($row) {
+        sql_update('spip_' . $table, $r, 'nom=' . sql_quote($nom));
+    } else {
+        sql_insert('spip_' . $table, '(' . join(',', array_keys($r)) . ')', '(' . join(',', array_values($r)) . ')');
+    }
+    if (!isset($touch[$table])) {
+        touch_meta($antidate, $table);
+        $touch[$table] = false;
+    }
 }
 
 /**
@@ -249,7 +249,7 @@ 
  *     Nom du fichier cache
  **/
 function cache_meta($table = 'meta') {
-	return ($table == 'meta') ? _FILE_META : (_DIR_CACHE . $table . '.php');
+    return ($table == 'meta') ? _FILE_META : (_DIR_CACHE . $table . '.php');
 }
 
 /**
@@ -258,14 +258,14 @@ 
  * @param string $table
  */
 function installer_table_meta($table) {
-	$trouver_table = charger_fonction('trouver_table', 'base');
-	if (!$trouver_table("spip_$table")) {
-		include_spip('base/auxiliaires');
-		include_spip('base/create');
-		creer_ou_upgrader_table("spip_$table", $GLOBALS['tables_auxiliaires']['spip_meta'], false, false);
-		$trouver_table('');
-	}
-	lire_metas($table);
+    $trouver_table = charger_fonction('trouver_table', 'base');
+    if (!$trouver_table("spip_$table")) {
+        include_spip('base/auxiliaires');
+        include_spip('base/create');
+        creer_ou_upgrader_table("spip_$table", $GLOBALS['tables_auxiliaires']['spip_meta'], false, false);
+        $trouver_table('');
+    }
+    lire_metas($table);
 }
 
 /**
@@ -277,47 +277,47 @@ 
  * @param bool $force
  */
 function supprimer_table_meta($table, $force = false) {
-	if ($table !== 'meta') {
-		// Vérifier le contenu restant de la table
-		$nb_variables = sql_countsel("spip_$table");
+    if ($table !== 'meta') {
+        // Vérifier le contenu restant de la table
+        $nb_variables = sql_countsel("spip_$table");
 
-		// Supprimer si :
-		// - la table est vide
-		// - ou limitée à la variable charset
-		// - ou qu'on force la suppression
-		if (
-			$force
-			or !$nb_variables
-			or (
-				($nb_variables == 1)
-				and isset($GLOBALS[$table]['charset'])
-			)
-		) {
-			// Supprimer la table des globaleset de la base
-			unset($GLOBALS[$table]);
-			sql_drop_table("spip_$table");
-			// Supprimer le fichier cache
-			include_spip('inc/flock');
-			$cache = cache_meta($table);
-			supprimer_fichier($cache);
+        // Supprimer si :
+        // - la table est vide
+        // - ou limitée à la variable charset
+        // - ou qu'on force la suppression
+        if (
+            $force
+            or !$nb_variables
+            or (
+                ($nb_variables == 1)
+                and isset($GLOBALS[$table]['charset'])
+            )
+        ) {
+            // Supprimer la table des globaleset de la base
+            unset($GLOBALS[$table]);
+            sql_drop_table("spip_$table");
+            // Supprimer le fichier cache
+            include_spip('inc/flock');
+            $cache = cache_meta($table);
+            supprimer_fichier($cache);
 
-			// vider le cache des tables
-			$trouver_table = charger_fonction('trouver_table', 'base');
-			$trouver_table('');
+            // vider le cache des tables
+            $trouver_table = charger_fonction('trouver_table', 'base');
+            $trouver_table('');
 
-			// Supprimer la table de la liste des tables de configuration autres que spip_meta
-			if (isset($GLOBALS['meta']['tables_config'])) {
-				$liste = unserialize($GLOBALS['meta']['tables_config']);
-				$cle = array_search($table, $liste);
-				if ($cle !== false) {
-					unset($liste[$cle]);
-					if ($liste) {
-						ecrire_meta('tables_config', serialize($liste));
-					} else {
-						effacer_meta('tables_config');
-					}
-				}
-			}
-		}
-	}
+            // Supprimer la table de la liste des tables de configuration autres que spip_meta
+            if (isset($GLOBALS['meta']['tables_config'])) {
+                $liste = unserialize($GLOBALS['meta']['tables_config']);
+                $cle = array_search($table, $liste);
+                if ($cle !== false) {
+                    unset($liste[$cle]);
+                    if ($liste) {
+                        ecrire_meta('tables_config', serialize($liste));
+                    } else {
+                        effacer_meta('tables_config');
+                    }
+                }
+            }
+        }
+    }
 }

ecrire/inc/json.php

Indentation +50 added lines, -50 removed lines

@@ -11,7 +11,7 @@ 
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 // Les fonctions de toggg pour faire du JSON
@@ -25,63 +25,63 @@ 
  */
 
 function var2js($var) {
-	$asso = false;
-	switch (true) {
-		case is_null($var):
-			return 'null';
-		case is_string($var):
-			return '"' . addcslashes($var, "\"\\\n\r/") . '"';
-		case is_bool($var):
-			return $var ? 'true' : 'false';
-		case is_scalar($var):
-			return (string)$var;
-		case is_object($var):// blam
-			$var = get_object_vars($var);
-			$asso = true;
-			// $var devient un array, on continue
-		case is_array($var):
-			$keys = array_keys($var);
-			$ikey = count($keys);
-			while (!$asso && $ikey--) {
-				$asso = $ikey !== $keys[$ikey];
-			}
-			$sep = '';
-			if ($asso) {
-				$ret = '{';
-				foreach ($var as $key => $elt) {
-					$ret .= $sep . '"' . $key . '":' . var2js($elt);
-					$sep = ',';
-				}
+    $asso = false;
+    switch (true) {
+        case is_null($var):
+            return 'null';
+        case is_string($var):
+            return '"' . addcslashes($var, "\"\\\n\r/") . '"';
+        case is_bool($var):
+            return $var ? 'true' : 'false';
+        case is_scalar($var):
+            return (string)$var;
+        case is_object($var):// blam
+            $var = get_object_vars($var);
+            $asso = true;
+            // $var devient un array, on continue
+        case is_array($var):
+            $keys = array_keys($var);
+            $ikey = count($keys);
+            while (!$asso && $ikey--) {
+                $asso = $ikey !== $keys[$ikey];
+            }
+            $sep = '';
+            if ($asso) {
+                $ret = '{';
+                foreach ($var as $key => $elt) {
+                    $ret .= $sep . '"' . $key . '":' . var2js($elt);
+                    $sep = ',';
+                }
 
-				return $ret . '}';
-			} else {
-				$ret = '[';
-				foreach ($var as $elt) {
-					$ret .= $sep . var2js($elt);
-					$sep = ',';
-				}
+                return $ret . '}';
+            } else {
+                $ret = '[';
+                foreach ($var as $elt) {
+                    $ret .= $sep . var2js($elt);
+                    $sep = ',';
+                }
 
-				return $ret . ']';
-			}
-	}
+                return $ret . ']';
+            }
+    }
 
-	return false;
+    return false;
 }
 
 if (!function_exists('json_encode')) {
-	function json_encode($v) {
-		return var2js($v);
-	}
+    function json_encode($v) {
+        return var2js($v);
+    }
 }
 
 function json_export($var) {
-	$var = json_encode($var, JSON_THROW_ON_ERROR);
+    $var = json_encode($var, JSON_THROW_ON_ERROR);
 
-	// flag indiquant qu'on est en iframe et qu'il faut proteger nos
-	// donnees dans un <textarea> ; attention $_FILES a ete vide par array_pop
-	if (defined('FILE_UPLOAD')) {
-		return '<textarea>' . spip_htmlspecialchars($var) . '</textarea>';
-	} else {
-		return $var;
-	}
+    // flag indiquant qu'on est en iframe et qu'il faut proteger nos
+    // donnees dans un <textarea> ; attention $_FILES a ete vide par array_pop
+    if (defined('FILE_UPLOAD')) {
+        return '<textarea>' . spip_htmlspecialchars($var) . '</textarea>';
+    } else {
+        return $var;
+    }
 }

ecrire/inc/genie.php

Indentation +88 added lines, -88 removed lines

@@ -11,7 +11,7 @@ 
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -75,28 +75,28 @@ 
  * @return
  **/
 function inc_genie_dist($taches = []) {
-	include_spip('inc/queue');
-
-	if (_request('exec') == 'job_queue') {
-		return false;
-	}
-
-	$force_jobs = [];
-	// l'ancienne facon de lancer une tache cron immediatement
-	// etait de la passer en parametre a ing_genie_dist
-	// on reroute en ajoutant simplement le job a la queue, ASAP
-	foreach ($taches as $function => $period) {
-		$force_jobs[] = queue_add_job(
-			$function,
-			_T('tache_cron_asap', ['function' => $function]),
-			[time() - abs($period)],
-			'genie/'
-		);
-	}
-
-	// et on passe la main a la gestion de la queue !
-	// en forcant eventuellement les jobs ajoute a l'instant
-	return queue_schedule(count($force_jobs) ? $force_jobs : null);
+    include_spip('inc/queue');
+
+    if (_request('exec') == 'job_queue') {
+        return false;
+    }
+
+    $force_jobs = [];
+    // l'ancienne facon de lancer une tache cron immediatement
+    // etait de la passer en parametre a ing_genie_dist
+    // on reroute en ajoutant simplement le job a la queue, ASAP
+    foreach ($taches as $function => $period) {
+        $force_jobs[] = queue_add_job(
+            $function,
+            _T('tache_cron_asap', ['function' => $function]),
+            [time() - abs($period)],
+            'genie/'
+        );
+    }
+
+    // et on passe la main a la gestion de la queue !
+    // en forcant eventuellement les jobs ajoute a l'instant
+    return queue_schedule(count($force_jobs) ? $force_jobs : null);
 }
 
 //
@@ -109,33 +109,33 @@ 
 //
 function taches_generales($taches_generales = []) {
 
-	// verifier que toutes les taches cron sont planifiees
-	// c'est une tache cron !
-	$taches_generales['queue_watch'] = 3600 * 24;
+    // verifier que toutes les taches cron sont planifiees
+    // c'est une tache cron !
+    $taches_generales['queue_watch'] = 3600 * 24;
 
-	// MAJ des rubriques publiques (cas de la publication post-datee)
-	// est fait au coup par coup a present
-	//	$taches_generales['rubriques'] = 3600;
+    // MAJ des rubriques publiques (cas de la publication post-datee)
+    // est fait au coup par coup a present
+    //	$taches_generales['rubriques'] = 3600;
 
-	// Optimisation de la base
-	$taches_generales['optimiser'] = 3600 * 48;
+    // Optimisation de la base
+    $taches_generales['optimiser'] = 3600 * 48;
 
-	// nouveautes
-	if (
-		isset($GLOBALS['meta']['adresse_neuf']) and $GLOBALS['meta']['adresse_neuf']
-		and $GLOBALS['meta']['jours_neuf']
-		and ($GLOBALS['meta']['quoi_de_neuf'] == 'oui')
-	) {
-		$taches_generales['mail'] = 3600 * 24 * $GLOBALS['meta']['jours_neuf'];
-	}
+    // nouveautes
+    if (
+        isset($GLOBALS['meta']['adresse_neuf']) and $GLOBALS['meta']['adresse_neuf']
+        and $GLOBALS['meta']['jours_neuf']
+        and ($GLOBALS['meta']['quoi_de_neuf'] == 'oui')
+    ) {
+        $taches_generales['mail'] = 3600 * 24 * $GLOBALS['meta']['jours_neuf'];
+    }
 
-	// maintenance (ajax, verifications diverses)
-	$taches_generales['maintenance'] = 3600 * 2;
+    // maintenance (ajax, verifications diverses)
+    $taches_generales['maintenance'] = 3600 * 2;
 
-	// verifier si une mise a jour de spip est disponible (2 fois par semaine suffit largement)
-	$taches_generales['mise_a_jour'] = 3 * 24 * 3600;
+    // verifier si une mise a jour de spip est disponible (2 fois par semaine suffit largement)
+    $taches_generales['mise_a_jour'] = 3 * 24 * 3600;
 
-	return pipeline('taches_generales_cron', $taches_generales);
+    return pipeline('taches_generales_cron', $taches_generales);
 }
 
 /**
@@ -151,22 +151,22 @@ 
  * @return int
  */
 function genie_queue_watch_dist() {
-	static $deja_la = false;
-	if ($deja_la) {
-		return;
-	} // re-entrance si l'insertion des jobs echoue (pas de table spip_jobs a l'upgrade par exemple)
-	$deja_la = true;
-	$taches = taches_generales();
-	$programmees = sql_allfetsel('fonction', 'spip_jobs', sql_in('fonction', array_keys($taches)));
-	$programmees = array_column($programmees, 'fonction');
-	foreach ($taches as $tache => $periode) {
-		if (!in_array($tache, $programmees)) {
-			queue_genie_replan_job($tache, $periode, time() - round(random_int(1, $periode)), 0);
-		}
-	}
-	$deja_la = false;
-
-	return 1;
+    static $deja_la = false;
+    if ($deja_la) {
+        return;
+    } // re-entrance si l'insertion des jobs echoue (pas de table spip_jobs a l'upgrade par exemple)
+    $deja_la = true;
+    $taches = taches_generales();
+    $programmees = sql_allfetsel('fonction', 'spip_jobs', sql_in('fonction', array_keys($taches)));
+    $programmees = array_column($programmees, 'fonction');
+    foreach ($taches as $tache => $periode) {
+        if (!in_array($tache, $programmees)) {
+            queue_genie_replan_job($tache, $periode, time() - round(random_int(1, $periode)), 0);
+        }
+    }
+    $deja_la = false;
+
+    return 1;
 }
 
 /**
@@ -187,32 +187,32 @@ 
  * @return void
  */
 function queue_genie_replan_job($function, $period, $last = 0, $time = null, $priority = 0) {
-	static $done = [];
-	if (isset($done[$function])) {
-		return;
-	}
-	$done[$function] = true;
-	if (is_null($time)) {
-		$time = time();
-		if ($last) {
-			$time = max($last + $period, $time);
-		}
-	}
-	if (!$last) {
-		$last = $time - $period;
-	}
-	spip_log("replan_job $function $period $last $time $priority", 'queue');
-	include_spip('inc/queue');
-	// on replanifie un job cron
-	// uniquement si il n'y en a pas deja un avec le meme nom
-	// independament de l'argument
-	queue_add_job(
-		$function,
-		_T('tache_cron_secondes', ['function' => $function, 'nb' => $period]),
-		[$last],
-		'genie/',
-		'function_only',
-		$time,
-		$priority
-	);
+    static $done = [];
+    if (isset($done[$function])) {
+        return;
+    }
+    $done[$function] = true;
+    if (is_null($time)) {
+        $time = time();
+        if ($last) {
+            $time = max($last + $period, $time);
+        }
+    }
+    if (!$last) {
+        $last = $time - $period;
+    }
+    spip_log("replan_job $function $period $last $time $priority", 'queue');
+    include_spip('inc/queue');
+    // on replanifie un job cron
+    // uniquement si il n'y en a pas deja un avec le meme nom
+    // independament de l'argument
+    queue_add_job(
+        $function,
+        _T('tache_cron_secondes', ['function' => $function, 'nb' => $period]),
+        [$last],
+        'genie/',
+        'function_only',
+        $time,
+        $priority
+    );
 }

ecrire/inc/xml.php

Indentation +157 added lines, -157 removed lines

@@ -17,7 +17,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 
@@ -47,24 +47,24 @@ 
  *     - false si l'arbre xml ne peut être créé ou est vide
  **/
 function spip_xml_load($fichier, $strict = true, $clean = true, $taille_max = 1_048_576, $datas = '', $profondeur = -1) {
-	$contenu = '';
-	if (tester_url_absolue($fichier)) {
-		include_spip('inc/distant');
-		$contenu = recuperer_url($fichier, ['taille_max' => $taille_max, 'datas' => $datas]);
-		$contenu = $contenu['page'] ?? '';
-	} else {
-		lire_fichier($fichier, $contenu);
-	}
-	$arbre = [];
-	if ($contenu) {
-		$arbre = spip_xml_parse($contenu, $strict, $clean, $profondeur);
-	}
+    $contenu = '';
+    if (tester_url_absolue($fichier)) {
+        include_spip('inc/distant');
+        $contenu = recuperer_url($fichier, ['taille_max' => $taille_max, 'datas' => $datas]);
+        $contenu = $contenu['page'] ?? '';
+    } else {
+        lire_fichier($fichier, $contenu);
+    }
+    $arbre = [];
+    if ($contenu) {
+        $arbre = spip_xml_parse($contenu, $strict, $clean, $profondeur);
+    }
 
-	return count($arbre) ? $arbre : false;
+    return count($arbre) ? $arbre : false;
 }
 
 if (!defined('_SPIP_XML_TAG_SPLIT')) {
-	define('_SPIP_XML_TAG_SPLIT', '{<([^:>][^>]*?)>}sS');
+    define('_SPIP_XML_TAG_SPLIT', '{<([^:>][^>]*?)>}sS');
 }
 
 /**
@@ -83,150 +83,150 @@ 
  *     - false si l'arbre xml ne peut être créé ou est vide
  **/
 function spip_xml_parse(&$texte, $strict = true, $clean = true, $profondeur = -1) {
-	$out = [];
-	// enlever les commentaires
-	$charset = 'AUTO';
-	if ($clean === true) {
-		if (preg_match(",<\?xml\s(.*?)encoding=['\"]?(.*?)['\"]?(\s(.*))?\?>,im", $texte, $regs)) {
-			$charset = $regs[2];
-		}
-		$texte = preg_replace(',<!--(.*?)-->,is', '', $texte);
-		$texte = preg_replace(',<\?(.*?)\?>,is', '', $texte);
-		include_spip('inc/charsets');
-		$clean = $charset;
-		//$texte = importer_charset($texte,$charset);
-	}
-	if (is_string($clean)) {
-		$charset = $clean;
-	}
-	$txt = $texte;
+    $out = [];
+    // enlever les commentaires
+    $charset = 'AUTO';
+    if ($clean === true) {
+        if (preg_match(",<\?xml\s(.*?)encoding=['\"]?(.*?)['\"]?(\s(.*))?\?>,im", $texte, $regs)) {
+            $charset = $regs[2];
+        }
+        $texte = preg_replace(',<!--(.*?)-->,is', '', $texte);
+        $texte = preg_replace(',<\?(.*?)\?>,is', '', $texte);
+        include_spip('inc/charsets');
+        $clean = $charset;
+        //$texte = importer_charset($texte,$charset);
+    }
+    if (is_string($clean)) {
+        $charset = $clean;
+    }
+    $txt = $texte;
 
-	// tant qu'il y a des tags
-	$chars = preg_split(_SPIP_XML_TAG_SPLIT, $txt, 2, PREG_SPLIT_DELIM_CAPTURE);
-	while ((is_countable($chars) ? count($chars) : 0) >= 2) {
-		// tag ouvrant
-		//$chars = preg_split("{<([^>]*?)>}s",$txt,2,PREG_SPLIT_DELIM_CAPTURE);
+    // tant qu'il y a des tags
+    $chars = preg_split(_SPIP_XML_TAG_SPLIT, $txt, 2, PREG_SPLIT_DELIM_CAPTURE);
+    while ((is_countable($chars) ? count($chars) : 0) >= 2) {
+        // tag ouvrant
+        //$chars = preg_split("{<([^>]*?)>}s",$txt,2,PREG_SPLIT_DELIM_CAPTURE);
 
-		// $before doit etre vide ou des espaces uniquements!
-		$before = trim($chars[0]);
+        // $before doit etre vide ou des espaces uniquements!
+        $before = trim($chars[0]);
 
-		if (strlen($before) > 0) {
-			return importer_charset($texte, $charset);
-		}//$texte; // before non vide, donc on est dans du texte
+        if (strlen($before) > 0) {
+            return importer_charset($texte, $charset);
+        }//$texte; // before non vide, donc on est dans du texte
 
-		$tag = rtrim($chars[1]);
-		$txt = $chars[2];
+        $tag = rtrim($chars[1]);
+        $txt = $chars[2];
 
-		if (strncmp($tag, '![CDATA[', 8) == 0) {
-			return importer_charset($texte, $charset);
-		}//$texte;
-		if (substr($tag, -1) == '/') { // self closing tag
-			$tag = rtrim(substr($tag, 0, strlen($tag) - 1));
-			$out[$tag][] = '';
-		} else {
-			$closing_tag = preg_split(",\s|\t|\n|\r,", trim($tag));
-			$closing_tag = reset($closing_tag);
-			// tag fermant
-			$ncclos = strlen("</$closing_tag>");
-			$p = strpos($txt, (string) "</$closing_tag>");
-			if ($p !== false and (strpos($txt, '<') < $p)) {
-				$nclose = 0;
-				$nopen = 0;
-				$d = 0;
-				while (
-					$p !== false
-					and ($morceau = substr($txt, $d, $p - $d))
-					and (($nopen += preg_match_all(
-						'{<' . preg_quote($closing_tag) . '(\s*>|\s[^>]*[^/>]>)}is',
-						$morceau,
-						$matches,
-						PREG_SET_ORDER
-					)) > $nclose)
-				) {
-					$nclose++;
-					$d = $p + $ncclos;
-					$p = strpos($txt, (string) "</$closing_tag>", $d);
-				}
-			}
-			if ($p === false) {
-				if ($strict) {
-					$out[$tag][] = "erreur : tag fermant $tag manquant::$txt";
+        if (strncmp($tag, '![CDATA[', 8) == 0) {
+            return importer_charset($texte, $charset);
+        }//$texte;
+        if (substr($tag, -1) == '/') { // self closing tag
+            $tag = rtrim(substr($tag, 0, strlen($tag) - 1));
+            $out[$tag][] = '';
+        } else {
+            $closing_tag = preg_split(",\s|\t|\n|\r,", trim($tag));
+            $closing_tag = reset($closing_tag);
+            // tag fermant
+            $ncclos = strlen("</$closing_tag>");
+            $p = strpos($txt, (string) "</$closing_tag>");
+            if ($p !== false and (strpos($txt, '<') < $p)) {
+                $nclose = 0;
+                $nopen = 0;
+                $d = 0;
+                while (
+                    $p !== false
+                    and ($morceau = substr($txt, $d, $p - $d))
+                    and (($nopen += preg_match_all(
+                        '{<' . preg_quote($closing_tag) . '(\s*>|\s[^>]*[^/>]>)}is',
+                        $morceau,
+                        $matches,
+                        PREG_SET_ORDER
+                    )) > $nclose)
+                ) {
+                    $nclose++;
+                    $d = $p + $ncclos;
+                    $p = strpos($txt, (string) "</$closing_tag>", $d);
+                }
+            }
+            if ($p === false) {
+                if ($strict) {
+                    $out[$tag][] = "erreur : tag fermant $tag manquant::$txt";
 
-					return $out;
-				} else {
-					return importer_charset($texte, $charset);
-				}//$texte // un tag qui constitue du texte a reporter dans $before
-			}
-			$content = substr($txt, 0, $p);
-			$txt = substr($txt, $p + $ncclos);
-			if ($profondeur == 0 or strpos($content, '<') === false) { // eviter une recursion si pas utile
-			$out[$tag][] = importer_charset($content, $charset);
-			}//$content;
-			else {
-				$out[$tag][] = spip_xml_parse($content, $strict, $clean, $profondeur - 1);
-			}
-		}
-		$chars = preg_split(_SPIP_XML_TAG_SPLIT, $txt, 2, PREG_SPLIT_DELIM_CAPTURE);
-	}
-	if (count($out) && (strlen(trim($txt)) == 0)) {
-		return $out;
-	} else {
-		return importer_charset($texte, $charset);
-	}//$texte;
+                    return $out;
+                } else {
+                    return importer_charset($texte, $charset);
+                }//$texte // un tag qui constitue du texte a reporter dans $before
+            }
+            $content = substr($txt, 0, $p);
+            $txt = substr($txt, $p + $ncclos);
+            if ($profondeur == 0 or strpos($content, '<') === false) { // eviter une recursion si pas utile
+            $out[$tag][] = importer_charset($content, $charset);
+            }//$content;
+            else {
+                $out[$tag][] = spip_xml_parse($content, $strict, $clean, $profondeur - 1);
+            }
+        }
+        $chars = preg_split(_SPIP_XML_TAG_SPLIT, $txt, 2, PREG_SPLIT_DELIM_CAPTURE);
+    }
+    if (count($out) && (strlen(trim($txt)) == 0)) {
+        return $out;
+    } else {
+        return importer_charset($texte, $charset);
+    }//$texte;
 }
 
 function spip_xml_aplatit($arbre, $separateur = ' ') {
-	$s = '';
-	if (is_array($arbre)) {
-		foreach ($arbre as $tag => $feuille) {
-			if (is_array($feuille)) {
-				if ($tag !== intval($tag)) {
-					$f = spip_xml_aplatit($feuille, $separateur);
-					if (strlen($f)) {
-						$tagf = explode(' ', $tag);
-						$tagf = $tagf[0];
-						$s .= "<$tag>$f</$tagf>";
-					} else {
-						$s .= "<$tag />";
-					}
-				} else {
-					$s .= spip_xml_aplatit($feuille);
-				}
-				$s .= $separateur;
-			} else {
-				$s .= "$feuille$separateur";
-			}
-		}
-	}
+    $s = '';
+    if (is_array($arbre)) {
+        foreach ($arbre as $tag => $feuille) {
+            if (is_array($feuille)) {
+                if ($tag !== intval($tag)) {
+                    $f = spip_xml_aplatit($feuille, $separateur);
+                    if (strlen($f)) {
+                        $tagf = explode(' ', $tag);
+                        $tagf = $tagf[0];
+                        $s .= "<$tag>$f</$tagf>";
+                    } else {
+                        $s .= "<$tag />";
+                    }
+                } else {
+                    $s .= spip_xml_aplatit($feuille);
+                }
+                $s .= $separateur;
+            } else {
+                $s .= "$feuille$separateur";
+            }
+        }
+    }
 
-	return strlen($separateur) ? substr($s, 0, -strlen($separateur)) : $s;
+    return strlen($separateur) ? substr($s, 0, -strlen($separateur)) : $s;
 }
 
 function spip_xml_tagname($tag) {
-	if (preg_match(',^([a-z][\w:]*),i', $tag, $reg)) {
-		return $reg[1];
-	}
+    if (preg_match(',^([a-z][\w:]*),i', $tag, $reg)) {
+        return $reg[1];
+    }
 
-	return '';
+    return '';
 }
 
 function spip_xml_decompose_tag($tag) {
-	$tagname = spip_xml_tagname($tag);
-	$liste = [];
-	$tag = ltrim(strpbrk($tag, " \n\t"));
-	$p = strpos($tag, '=');
-	while ($p !== false) {
-		$attr = trim(substr($tag, 0, $p));
-		$tag = ltrim(substr($tag, $p + 1));
-		$quote = $tag[0];
-		$p = strpos($tag, $quote, 1);
-		$cont = substr($tag, 1, $p - 1);
-		$liste[$attr] = $cont;
-		$tag = substr($tag, $p + 1);
-		$p = strpos($tag, '=');
-	}
+    $tagname = spip_xml_tagname($tag);
+    $liste = [];
+    $tag = ltrim(strpbrk($tag, " \n\t"));
+    $p = strpos($tag, '=');
+    while ($p !== false) {
+        $attr = trim(substr($tag, 0, $p));
+        $tag = ltrim(substr($tag, $p + 1));
+        $quote = $tag[0];
+        $p = strpos($tag, $quote, 1);
+        $cont = substr($tag, 1, $p - 1);
+        $liste[$attr] = $cont;
+        $tag = substr($tag, $p + 1);
+        $p = strpos($tag, '=');
+    }
 
-	return [$tagname, $liste];
+    return [$tagname, $liste];
 }
 
 /**
@@ -249,21 +249,21 @@ 
  *     false si aucun élément ne valide l'expression régulière, true sinon.
  **/
 function spip_xml_match_nodes($regexp, &$arbre, &$matches, $init = true) {
-	if ($init) {
-		$matches = [];
-	}
-	if (is_array($arbre) && count($arbre)) {
-		foreach (array_keys($arbre) as $tag) {
-			if (preg_match($regexp, $tag)) {
-				$matches[$tag] = &$arbre[$tag];
-			}
-			if (is_array($arbre[$tag])) {
-				foreach (array_keys($arbre[$tag]) as $occurences) {
-					spip_xml_match_nodes($regexp, $arbre[$tag][$occurences], $matches, false);
-				}
-			}
-		}
-	}
+    if ($init) {
+        $matches = [];
+    }
+    if (is_array($arbre) && count($arbre)) {
+        foreach (array_keys($arbre) as $tag) {
+            if (preg_match($regexp, $tag)) {
+                $matches[$tag] = &$arbre[$tag];
+            }
+            if (is_array($arbre[$tag])) {
+                foreach (array_keys($arbre[$tag]) as $occurences) {
+                    spip_xml_match_nodes($regexp, $arbre[$tag][$occurences], $matches, false);
+                }
+            }
+        }
+    }
 
-	return (is_countable($matches) ? count($matches) : 0);
+    return (is_countable($matches) ? count($matches) : 0);
 }

ecrire/inc/invalideur.php

Indentation +138 added lines, -138 removed lines

@@ -17,7 +17,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 include_spip('base/serial');
@@ -27,7 +27,7 @@ 
  * en droit de l'éliminer
  */
 if (!defined('_AGE_CACHE_ATIME')) {
-	define('_AGE_CACHE_ATIME', 3600);
+    define('_AGE_CACHE_ATIME', 3600);
 }
 
 
@@ -40,31 +40,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) and is_readable($dir) and $d = opendir($dir)) {
-			while (($f = readdir($d)) !== false) {
-				if (preg_match(',^[[0-9a-f]+\.cache$,S', $f) and $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 intval(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) and is_readable($dir) and $d = opendir($dir)) {
+            while (($f = readdir($d)) !== false) {
+                if (preg_match(',^[[0-9a-f]+\.cache$,S', $f) and $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 intval(256 * $t / (1 + $i));
+        }
+    }
+    return $t;
 }
 
 
@@ -91,30 +91,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());
+    }
 }
 
 
@@ -139,57 +139,57 @@ 
  *     Nombre de fichiers supprimés
  **/
 function purger_repertoire($dir, $options = []) {
-	if (!is_dir($dir) or !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] == '.' or $fichier == 'CACHEDIR.TAG') {
-			continue;
-		}
-		$chemin = "$dir/$fichier";
-		if (is_file($chemin)) {
-			if (
-				(!isset($options['atime']) or (@fileatime($chemin) < $options['atime']))
-				and (!isset($options['mtime']) or (@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']) and $total >= $options['limit']) {
-			break;
-		}
-	}
-	closedir($handle);
-
-	return $total;
+    if (!is_dir($dir) or !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] == '.' or $fichier == 'CACHEDIR.TAG') {
+            continue;
+        }
+        $chemin = "$dir/$fichier";
+        if (is_file($chemin)) {
+            if (
+                (!isset($options['atime']) or (@fileatime($chemin) < $options['atime']))
+                and (!isset($options['mtime']) or (@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']) and $total >= $options['limit']) {
+            break;
+        }
+    }
+    closedir($handle);
+
+    return $total;
 }
 
 
@@ -200,26 +200,26 @@ 
 // Securite : est sur que c'est un cache
 function retire_cache($cache) {
 
-	if (
-		preg_match(
-			',^([0-9a-f]/)?([0-9]+/)?[0-9a-f]+\.cache(\.gz)?$,i',
-			$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]/)?([0-9]+/)?[0-9a-f]+\.cache(\.gz)?$,i',
+            $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
 }
 
 #######################################################################
@@ -230,9 +230,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);
+    }
 }
 
 
@@ -240,10 +240,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;
 }
 
 
@@ -252,41 +252,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/xml/indenter.php

Indentation +37 added lines, -37 removed lines

@@ -11,55 +11,55 @@
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 class IndenteurXML {
 
-	public function debutElement($phraseur, $name, $attrs) {
-		xml_debutElement($this, $name, $attrs);
-	}
+    public function debutElement($phraseur, $name, $attrs) {
+        xml_debutElement($this, $name, $attrs);
+    }
 
-	public function finElement($phraseur, $name) {
-		xml_finElement($this, $name);
-	}
+    public function finElement($phraseur, $name) {
+        xml_finElement($this, $name);
+    }
 
-	public function textElement($phraseur, $data) {
-		xml_textElement($this, $data);
-	}
+    public function textElement($phraseur, $data) {
+        xml_textElement($this, $data);
+    }
 
-	public function piElement($phraseur, $target, $data) {
-		xml_PiElement($this, $target, $data);
-	}
+    public function piElement($phraseur, $target, $data) {
+        xml_PiElement($this, $target, $data);
+    }
 
-	public function defaultElement($phraseur, $data) {
-		xml_defaultElement($this, $data);
-	}
+    public function defaultElement($phraseur, $data) {
+        xml_defaultElement($this, $data);
+    }
 
-	public function phraserTout($phraseur, $data) {
-		xml_parsestring($this, $data);
-	}
+    public function phraserTout($phraseur, $data) {
+        xml_parsestring($this, $data);
+    }
 
-	public $depth = '';
-	public $res = '';
-	public $err = [];
-	public $contenu = [];
-	public $ouvrant = [];
-	public $reperes = [];
-	public $entete = '';
-	public $page = '';
-	public $dtc = null;
-	public $sax = null;
+    public $depth = '';
+    public $res = '';
+    public $err = [];
+    public $contenu = [];
+    public $ouvrant = [];
+    public $reperes = [];
+    public $entete = '';
+    public $page = '';
+    public $dtc = null;
+    public $sax = null;
 }
 
 function xml_indenter_dist($page, $apply = false) {
-	$sax = charger_fonction('sax', 'xml');
-	$f = new IndenteurXML();
-	$sax($page, $apply, $f);
-	if (!$f->err) {
-		return $f->entete . $f->res;
-	}
-	spip_log('indentation impossible ' . (is_countable($f->err) ? count($f->err) : 0) . ' erreurs de validation');
+    $sax = charger_fonction('sax', 'xml');
+    $f = new IndenteurXML();
+    $sax($page, $apply, $f);
+    if (!$f->err) {
+        return $f->entete . $f->res;
+    }
+    spip_log('indentation impossible ' . (is_countable($f->err) ? count($f->err) : 0) . ' erreurs de validation');
 
-	return $f->entete . $f->page;
+    return $f->entete . $f->page;
 }

ecrire/xml/analyser_dtd.php

Indentation +335 added lines, -335 removed lines

@@ -11,58 +11,58 @@ 
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 include_spip('xml/interfaces');
 
 function charger_dtd($grammaire, $avail, $rotlvl) {
-	$r = null;
-	static $dtd = []; # cache bien utile pour le validateur en boucle
-
-	if (isset($dtd[$grammaire])) {
-		return $dtd[$grammaire];
-	}
-
-	if ($avail == 'SYSTEM') {
-		$grammaire = find_in_path($grammaire);
-	}
-
-	$file = _DIR_CACHE_XML . preg_replace('/[^\w.]/', '_', $rotlvl) . '.gz';
-
-	if (lire_fichier($file, $r)) {
-		if (!$grammaire) {
-			return [];
-		}
-		if (($avail == 'SYSTEM') and filemtime($file) < filemtime($grammaire)) {
-			$r = false;
-		}
-	}
-
-	if ($r) {
-		$dtc = unserialize($r);
-	} else {
-		spip_timer('dtd');
-		$dtc = new DTC();
-		// L'analyseur retourne un booleen de reussite et modifie $dtc.
-		// Retourner vide en cas d'echec
-		if (!analyser_dtd($grammaire, $avail, $dtc)) {
-			$dtc = [];
-		} else {
-			// tri final pour presenter les suggestions de corrections
-			foreach ($dtc->peres as $k => $v) {
-				asort($v);
-				$dtc->peres[$k] = $v;
-			}
-
-			spip_log("Analyser DTD $avail $grammaire (" . spip_timer('dtd') . ') ' . (is_countable($dtc->macros) ? count($dtc->macros) : 0) . ' macros, ' . (is_countable($dtc->elements) ? count($dtc->elements) : 0) . ' elements, ' . (is_countable($dtc->attributs) ? count($dtc->attributs) : 0) . " listes d'attributs, " . (is_countable($dtc->entites) ? count($dtc->entites) : 0) . ' entites');
-			#	$r = $dtc->regles; ksort($r);foreach($r as $l => $v) {$t=array_keys($dtc->attributs[$l]);echo "<b>$l</b> '$v' ", count($t), " attributs: ", join (', ',$t);$t=$dtc->peres[$l];echo "<br />",count($t), " peres: ", @join (', ',$t), "<br />\n";}exit;
-			ecrire_fichier($file, serialize($dtc), true);
-		}
-	}
-	$dtd[$grammaire] = $dtc;
-
-	return $dtc;
+    $r = null;
+    static $dtd = []; # cache bien utile pour le validateur en boucle
+
+    if (isset($dtd[$grammaire])) {
+        return $dtd[$grammaire];
+    }
+
+    if ($avail == 'SYSTEM') {
+        $grammaire = find_in_path($grammaire);
+    }
+
+    $file = _DIR_CACHE_XML . preg_replace('/[^\w.]/', '_', $rotlvl) . '.gz';
+
+    if (lire_fichier($file, $r)) {
+        if (!$grammaire) {
+            return [];
+        }
+        if (($avail == 'SYSTEM') and filemtime($file) < filemtime($grammaire)) {
+            $r = false;
+        }
+    }
+
+    if ($r) {
+        $dtc = unserialize($r);
+    } else {
+        spip_timer('dtd');
+        $dtc = new DTC();
+        // L'analyseur retourne un booleen de reussite et modifie $dtc.
+        // Retourner vide en cas d'echec
+        if (!analyser_dtd($grammaire, $avail, $dtc)) {
+            $dtc = [];
+        } else {
+            // tri final pour presenter les suggestions de corrections
+            foreach ($dtc->peres as $k => $v) {
+                asort($v);
+                $dtc->peres[$k] = $v;
+            }
+
+            spip_log("Analyser DTD $avail $grammaire (" . spip_timer('dtd') . ') ' . (is_countable($dtc->macros) ? count($dtc->macros) : 0) . ' macros, ' . (is_countable($dtc->elements) ? count($dtc->elements) : 0) . ' elements, ' . (is_countable($dtc->attributs) ? count($dtc->attributs) : 0) . " listes d'attributs, " . (is_countable($dtc->entites) ? count($dtc->entites) : 0) . ' entites');
+            #	$r = $dtc->regles; ksort($r);foreach($r as $l => $v) {$t=array_keys($dtc->attributs[$l]);echo "<b>$l</b> '$v' ", count($t), " attributs: ", join (', ',$t);$t=$dtc->peres[$l];echo "<br />",count($t), " peres: ", @join (', ',$t), "<br />\n";}exit;
+            ecrire_fichier($file, serialize($dtc), true);
+        }
+    }
+    $dtd[$grammaire] = $dtc;
+
+    return $dtc;
 }
 
 // Compiler une regle de production en une Regexp qu'on appliquera sur la
@@ -74,153 +74,153 @@ 
 // et parentheser le tout pour que  | + * ? s'applique dessus.
 
 function compilerRegle($val) {
-	$x = str_replace(
-		'()',
-		'',
-		preg_replace(
-			'/\s*,\s*/',
-			'',
-			preg_replace(
-				'/(\w+)\s*/',
-				'(?:\1 )',
-				preg_replace(
-					'/\s*\)/',
-					')',
-					preg_replace(
-						'/\s*([(+*|?])\s*/',
-						'\1',
-						preg_replace('/\s*#\w+\s*[,|]?\s*/', '', $val)
-					)
-				)
-			)
-		)
-	);
-
-	return $x;
+    $x = str_replace(
+        '()',
+        '',
+        preg_replace(
+            '/\s*,\s*/',
+            '',
+            preg_replace(
+                '/(\w+)\s*/',
+                '(?:\1 )',
+                preg_replace(
+                    '/\s*\)/',
+                    ')',
+                    preg_replace(
+                        '/\s*([(+*|?])\s*/',
+                        '\1',
+                        preg_replace('/\s*#\w+\s*[,|]?\s*/', '', $val)
+                    )
+                )
+            )
+        )
+    );
+
+    return $x;
 }
 
 
 function analyser_dtd($loc, $avail, &$dtc) {
-	// creer le repertoire de cache si ce n'est fait
-	// (utile aussi pour le resultat de la compil)
-	$file = sous_repertoire(_DIR_CACHE_XML);
-	// si DTD locale, ignorer ce repertoire pour le moment
-	if ($avail == 'SYSTEM') {
-		$file = $loc;
-		if (_DIR_RACINE and strncmp($file, _DIR_RACINE, strlen(_DIR_RACINE)) == 0) {
-			$file = substr($file, strlen(_DIR_RACINE));
-		}
-		$file = find_in_path($file);
-	} else {
-		$file .= preg_replace('/[^\w.]/', '_', $loc);
-	}
-
-	$dtd = '';
-	if (@is_readable($file)) {
-		lire_fichier($file, $dtd);
-	} else {
-		if ($avail == 'PUBLIC') {
-			include_spip('inc/distant');
-			$dtd = recuperer_url($loc);
-			$dtd = trim($dtd['page'] ?? '');
-			if ($dtd) {
-				ecrire_fichier($file, $dtd, true);
-			}
-		}
-	}
-
-	$dtd = ltrim($dtd);
-	if (!$dtd) {
-		spip_log("DTD '$loc' ($file) inaccessible");
-
-		return false;
-	} else {
-		spip_log("analyse de la DTD $loc ");
-	}
-
-	while ($dtd) {
-		if ($dtd[0] != '<') {
-			$r = analyser_dtd_lexeme($dtd, $dtc, $loc);
-		} elseif ($dtd[1] != '!') {
-			$r = analyser_dtd_pi($dtd, $dtc, $loc);
-		} elseif ($dtd[2] == '[') {
-			$r = analyser_dtd_data($dtd, $dtc, $loc);
-		} else {
-			switch ($dtd[3]) {
-				case '%':
-					$r = analyser_dtd_data($dtd, $dtc, $loc);
-					break;
-				case 'T':
-					$r = analyser_dtd_attlist($dtd, $dtc, $loc);
-					break;
-				case 'L':
-					$r = analyser_dtd_element($dtd, $dtc, $loc);
-					break;
-				case 'N':
-					$r = analyser_dtd_entity($dtd, $dtc, $loc);
-					break;
-				case 'O':
-					$r = analyser_dtd_notation($dtd, $dtc, $loc);
-					break;
-				case '-':
-					$r = analyser_dtd_comment($dtd, $dtc, $loc);
-					break;
-				default:
-					$r = -1;
-			}
-		}
-		if (!is_string($r)) {
-			spip_log("erreur $r dans la DTD  " . substr($dtd, 0, 80) . '.....');
-
-			return false;
-		}
-		$dtd = $r;
-	}
-
-	return true;
+    // creer le repertoire de cache si ce n'est fait
+    // (utile aussi pour le resultat de la compil)
+    $file = sous_repertoire(_DIR_CACHE_XML);
+    // si DTD locale, ignorer ce repertoire pour le moment
+    if ($avail == 'SYSTEM') {
+        $file = $loc;
+        if (_DIR_RACINE and strncmp($file, _DIR_RACINE, strlen(_DIR_RACINE)) == 0) {
+            $file = substr($file, strlen(_DIR_RACINE));
+        }
+        $file = find_in_path($file);
+    } else {
+        $file .= preg_replace('/[^\w.]/', '_', $loc);
+    }
+
+    $dtd = '';
+    if (@is_readable($file)) {
+        lire_fichier($file, $dtd);
+    } else {
+        if ($avail == 'PUBLIC') {
+            include_spip('inc/distant');
+            $dtd = recuperer_url($loc);
+            $dtd = trim($dtd['page'] ?? '');
+            if ($dtd) {
+                ecrire_fichier($file, $dtd, true);
+            }
+        }
+    }
+
+    $dtd = ltrim($dtd);
+    if (!$dtd) {
+        spip_log("DTD '$loc' ($file) inaccessible");
+
+        return false;
+    } else {
+        spip_log("analyse de la DTD $loc ");
+    }
+
+    while ($dtd) {
+        if ($dtd[0] != '<') {
+            $r = analyser_dtd_lexeme($dtd, $dtc, $loc);
+        } elseif ($dtd[1] != '!') {
+            $r = analyser_dtd_pi($dtd, $dtc, $loc);
+        } elseif ($dtd[2] == '[') {
+            $r = analyser_dtd_data($dtd, $dtc, $loc);
+        } else {
+            switch ($dtd[3]) {
+                case '%':
+                    $r = analyser_dtd_data($dtd, $dtc, $loc);
+                    break;
+                case 'T':
+                    $r = analyser_dtd_attlist($dtd, $dtc, $loc);
+                    break;
+                case 'L':
+                    $r = analyser_dtd_element($dtd, $dtc, $loc);
+                    break;
+                case 'N':
+                    $r = analyser_dtd_entity($dtd, $dtc, $loc);
+                    break;
+                case 'O':
+                    $r = analyser_dtd_notation($dtd, $dtc, $loc);
+                    break;
+                case '-':
+                    $r = analyser_dtd_comment($dtd, $dtc, $loc);
+                    break;
+                default:
+                    $r = -1;
+            }
+        }
+        if (!is_string($r)) {
+            spip_log("erreur $r dans la DTD  " . substr($dtd, 0, 80) . '.....');
+
+            return false;
+        }
+        $dtd = $r;
+    }
+
+    return true;
 }
 
 function analyser_dtd_comment($dtd, &$dtc, $grammaire) {
-	// ejecter les commentaires, surtout quand ils contiennent du code.
-	// Option /s car sur plusieurs lignes parfois
+    // ejecter les commentaires, surtout quand ils contiennent du code.
+    // Option /s car sur plusieurs lignes parfois
 
-	if (!preg_match('/^<!--.*?-->\s*(.*)$/s', $dtd, $m)) {
-		return -6;
-	}
+    if (!preg_match('/^<!--.*?-->\s*(.*)$/s', $dtd, $m)) {
+        return -6;
+    }
 
-	return $m[1];
+    return $m[1];
 }
 
 function analyser_dtd_pi($dtd, &$dtc, $grammaire) {
-	if (!preg_match('/^<\?.*?>\s*(.*)$/s', $dtd, $m)) {
-		return -10;
-	}
+    if (!preg_match('/^<\?.*?>\s*(.*)$/s', $dtd, $m)) {
+        return -10;
+    }
 
-	return $m[1];
+    return $m[1];
 }
 
 function analyser_dtd_lexeme($dtd, &$dtc, $grammaire) {
 
-	if (!preg_match(_REGEXP_ENTITY_DEF, $dtd, $m)) {
-		return -9;
-	}
-
-	[, $s] = $m;
-	$n = $dtc->macros[$s];
-
-	if (is_array($n)) {
-		// en cas d'inclusion, l'espace de nom est le meme
-		// mais gaffe aux DTD dont l'URL est relative a l'engloblante
-		if (
-			($n[0] == 'PUBLIC')
-			and !tester_url_absolue($n[1])
-		) {
-			$n[1] = substr($grammaire, 0, strrpos($grammaire, '/') + 1) . $n[1];
-		}
-		analyser_dtd($n[1], $n[0], $dtc);
-	}
-
-	return ltrim(substr($dtd, strlen($m[0])));
+    if (!preg_match(_REGEXP_ENTITY_DEF, $dtd, $m)) {
+        return -9;
+    }
+
+    [, $s] = $m;
+    $n = $dtc->macros[$s];
+
+    if (is_array($n)) {
+        // en cas d'inclusion, l'espace de nom est le meme
+        // mais gaffe aux DTD dont l'URL est relative a l'engloblante
+        if (
+            ($n[0] == 'PUBLIC')
+            and !tester_url_absolue($n[1])
+        ) {
+            $n[1] = substr($grammaire, 0, strrpos($grammaire, '/') + 1) . $n[1];
+        }
+        analyser_dtd($n[1], $n[0], $dtc);
+    }
+
+    return ltrim(substr($dtd, strlen($m[0])));
 }
 
 // il faudrait gerer plus proprement les niveaux d'inclusion:
@@ -228,83 +228,83 @@ 
 
 function analyser_dtd_data($dtd, &$dtc, $grammaire) {
 
-	if (!preg_match(_REGEXP_INCLUDE_USE, $dtd, $m)) {
-		return -11;
-	}
-	if (
-		!preg_match(
-			'/^((\s*<!(\[\s*%\s*[^;]*;\s*\[([^]<]*<[^>]*>)*[^]<]*\]\]>)|([^]>]*>))*[^]<]*)\]\]>\s*/s',
-			$m[2],
-			$r
-		)
-	) {
-		return -12;
-	}
-
-	if ($dtc->macros[$m[1]] == 'INCLUDE') {
-		$retour = $r[1] . substr($m[2], strlen($r[0]));
-	} else {
-		$retour = substr($m[2], strlen($r[0]));
-	}
-
-	return $retour;
+    if (!preg_match(_REGEXP_INCLUDE_USE, $dtd, $m)) {
+        return -11;
+    }
+    if (
+        !preg_match(
+            '/^((\s*<!(\[\s*%\s*[^;]*;\s*\[([^]<]*<[^>]*>)*[^]<]*\]\]>)|([^]>]*>))*[^]<]*)\]\]>\s*/s',
+            $m[2],
+            $r
+        )
+    ) {
+        return -12;
+    }
+
+    if ($dtc->macros[$m[1]] == 'INCLUDE') {
+        $retour = $r[1] . substr($m[2], strlen($r[0]));
+    } else {
+        $retour = substr($m[2], strlen($r[0]));
+    }
+
+    return $retour;
 }
 
 function analyser_dtd_notation($dtd, &$dtc, $grammaire) {
-	if (!preg_match('/^<!NOTATION.*?>\s*(.*)$/s', $dtd, $m)) {
-		return -8;
-	}
-	spip_log('analyser_dtd_notation a ecrire');
+    if (!preg_match('/^<!NOTATION.*?>\s*(.*)$/s', $dtd, $m)) {
+        return -8;
+    }
+    spip_log('analyser_dtd_notation a ecrire');
 
-	return $m[1];
+    return $m[1];
 }
 
 function analyser_dtd_entity($dtd, &$dtc, $grammaire) {
-	if (!preg_match(_REGEXP_ENTITY_DECL, $dtd, $m)) {
-		return -2;
-	}
-
-	[$t, $term, $nom, $type, $k1, $k2, $k3, $k4, $k5, $k6, $c, $q, $alt, $dtd] = $m;
-
-	if (isset($dtc->macros[$nom]) and $dtc->macros[$nom]) {
-		return $dtd;
-	}
-	if (isset($dtc->entites[$nom])) {
-		spip_log("redefinition de l'entite $nom");
-	}
-	if ($k6) {
-		return $k6 . $dtd;
-	} // cas du synonyme complet
-	$val = expanserEntite(($k2 ? $k3 : ($k4 ? $k5 : $k6)), $dtc->macros);
-
-	// cas particulier double evaluation: 'PUBLIC "..." "...."'
-	if (preg_match('/(PUBLIC|SYSTEM)\s+"([^"]*)"\s*("([^"]*)")?\s*$/s', $val, $r)) {
-		[$t, $type, $val, $q, $alt] = $r;
-	}
-
-	if (!$term) {
-		$dtc->entites[$nom] = $val;
-	} elseif (!$type) {
-		$dtc->macros[$nom] = $val;
-	} else {
-		if (($type == 'SYSTEM') and !$alt) {
-			$alt = $val;
-		}
-		if (!$alt) {
-			$dtc->macros[$nom] = $val;
-		} else {
-			if (
-				($type == 'PUBLIC')
-				and (strpos($alt, '/') === false)
-			) {
-				$alt = preg_replace(',/[^/]+$,', '/', $grammaire)
-					. $alt;
-			}
-			$dtc->macros[$nom] = [$type, $alt];
-		}
-	}
-
-	return $dtd;
+    if (!preg_match(_REGEXP_ENTITY_DECL, $dtd, $m)) {
+        return -2;
+    }
+
+    [$t, $term, $nom, $type, $k1, $k2, $k3, $k4, $k5, $k6, $c, $q, $alt, $dtd] = $m;
+
+    if (isset($dtc->macros[$nom]) and $dtc->macros[$nom]) {
+        return $dtd;
+    }
+    if (isset($dtc->entites[$nom])) {
+        spip_log("redefinition de l'entite $nom");
+    }
+    if ($k6) {
+        return $k6 . $dtd;
+    } // cas du synonyme complet
+    $val = expanserEntite(($k2 ? $k3 : ($k4 ? $k5 : $k6)), $dtc->macros);
+
+    // cas particulier double evaluation: 'PUBLIC "..." "...."'
+    if (preg_match('/(PUBLIC|SYSTEM)\s+"([^"]*)"\s*("([^"]*)")?\s*$/s', $val, $r)) {
+        [$t, $type, $val, $q, $alt] = $r;
+    }
+
+    if (!$term) {
+        $dtc->entites[$nom] = $val;
+    } elseif (!$type) {
+        $dtc->macros[$nom] = $val;
+    } else {
+        if (($type == 'SYSTEM') and !$alt) {
+            $alt = $val;
+        }
+        if (!$alt) {
+            $dtc->macros[$nom] = $val;
+        } else {
+            if (
+                ($type == 'PUBLIC')
+                and (strpos($alt, '/') === false)
+            ) {
+                $alt = preg_replace(',/[^/]+$,', '/', $grammaire)
+                    . $alt;
+            }
+            $dtc->macros[$nom] = [$type, $alt];
+        }
+    }
+
+    return $dtd;
 }
 
 // Dresser le tableau des filles potentielles de l'element
@@ -317,76 +317,76 @@ 
 // Fin du controle en finElement
 
 function analyser_dtd_element($dtd, &$dtc, $grammaire) {
-	if (!preg_match('/^<!ELEMENT\s+([^>\s]+)([^>]*)>\s*(.*)$/s', $dtd, $m)) {
-		return -3;
-	}
-
-	[, $nom, $contenu, $dtd] = $m;
-	$nom = expanserEntite($nom, $dtc->macros);
-
-	if (isset($dtc->elements[$nom])) {
-		spip_log("redefinition de l'element $nom dans la DTD");
-
-		return -4;
-	}
-	$filles = [];
-	$contenu = expanserEntite($contenu, $dtc->macros);
-	$val = $contenu ? compilerRegle($contenu) : '(?:EMPTY )';
-	if ($val == '(?:EMPTY )') {
-		$dtc->regles[$nom] = 'EMPTY';
-	} elseif ($val == '(?:ANY )') {
-		$dtc->regles[$nom] = 'ANY';
-	} else {
-		$last = substr($val, -1);
-		if (
-			preg_match('/ \w/', $val)
-			or (!empty($last) and strpos('*+?', $last) === false)
-		) {
-			$dtc->regles[$nom] = "/^$val$/";
-		} else {
-			$dtc->regles[$nom] = $last;
-		}
-		$filles = array_values(preg_split('/\W+/', $val, -1, PREG_SPLIT_NO_EMPTY));
-
-		foreach ($filles as $k) {
-			if (!isset($dtc->peres[$k])) {
-				$dtc->peres[$k] = [];
-			}
-			if (!in_array($nom, $dtc->peres[$k])) {
-				$dtc->peres[$k][] = $nom;
-			}
-		}
-	}
-	$dtc->pcdata[$nom] = (strpos($contenu, '#PCDATA') === false);
-	$dtc->elements[$nom] = $filles;
-
-	return $dtd;
+    if (!preg_match('/^<!ELEMENT\s+([^>\s]+)([^>]*)>\s*(.*)$/s', $dtd, $m)) {
+        return -3;
+    }
+
+    [, $nom, $contenu, $dtd] = $m;
+    $nom = expanserEntite($nom, $dtc->macros);
+
+    if (isset($dtc->elements[$nom])) {
+        spip_log("redefinition de l'element $nom dans la DTD");
+
+        return -4;
+    }
+    $filles = [];
+    $contenu = expanserEntite($contenu, $dtc->macros);
+    $val = $contenu ? compilerRegle($contenu) : '(?:EMPTY )';
+    if ($val == '(?:EMPTY )') {
+        $dtc->regles[$nom] = 'EMPTY';
+    } elseif ($val == '(?:ANY )') {
+        $dtc->regles[$nom] = 'ANY';
+    } else {
+        $last = substr($val, -1);
+        if (
+            preg_match('/ \w/', $val)
+            or (!empty($last) and strpos('*+?', $last) === false)
+        ) {
+            $dtc->regles[$nom] = "/^$val$/";
+        } else {
+            $dtc->regles[$nom] = $last;
+        }
+        $filles = array_values(preg_split('/\W+/', $val, -1, PREG_SPLIT_NO_EMPTY));
+
+        foreach ($filles as $k) {
+            if (!isset($dtc->peres[$k])) {
+                $dtc->peres[$k] = [];
+            }
+            if (!in_array($nom, $dtc->peres[$k])) {
+                $dtc->peres[$k][] = $nom;
+            }
+        }
+    }
+    $dtc->pcdata[$nom] = (strpos($contenu, '#PCDATA') === false);
+    $dtc->elements[$nom] = $filles;
+
+    return $dtd;
 }
 
 
 function analyser_dtd_attlist($dtd, &$dtc, $grammaire) {
-	if (!preg_match('/^<!ATTLIST\s+(\S+)\s+([^>]*)>\s*(.*)/s', $dtd, $m)) {
-		return -5;
-	}
-
-	[, $nom, $val, $dtd] = $m;
-	$nom = expanserEntite($nom, $dtc->macros);
-	$val = expanserEntite($val, $dtc->macros);
-	if (!isset($dtc->attributs[$nom])) {
-		$dtc->attributs[$nom] = [];
-	}
-
-	if (preg_match_all("/\s*(\S+)\s+(([(][^)]*[)])|(\S+))\s+([^\s']*)(\s*'[^']*')?/", $val, $r2, PREG_SET_ORDER)) {
-		foreach ($r2 as $m2) {
-			$v = preg_match('/^\w+$/', $m2[2]) ? $m2[2]
-				: ('/^' . preg_replace('/\s+/', '', $m2[2]) . '$/');
-			$m21 = expanserEntite($m2[1], $dtc->macros);
-			$m25 = expanserEntite($m2[5], $dtc->macros);
-			$dtc->attributs[$nom][$m21] = [$v, $m25];
-		}
-	}
-
-	return $dtd;
+    if (!preg_match('/^<!ATTLIST\s+(\S+)\s+([^>]*)>\s*(.*)/s', $dtd, $m)) {
+        return -5;
+    }
+
+    [, $nom, $val, $dtd] = $m;
+    $nom = expanserEntite($nom, $dtc->macros);
+    $val = expanserEntite($val, $dtc->macros);
+    if (!isset($dtc->attributs[$nom])) {
+        $dtc->attributs[$nom] = [];
+    }
+
+    if (preg_match_all("/\s*(\S+)\s+(([(][^)]*[)])|(\S+))\s+([^\s']*)(\s*'[^']*')?/", $val, $r2, PREG_SET_ORDER)) {
+        foreach ($r2 as $m2) {
+            $v = preg_match('/^\w+$/', $m2[2]) ? $m2[2]
+                : ('/^' . preg_replace('/\s+/', '', $m2[2]) . '$/');
+            $m21 = expanserEntite($m2[1], $dtc->macros);
+            $m25 = expanserEntite($m2[5], $dtc->macros);
+            $dtc->attributs[$nom][$m21] = [$v, $m25];
+        }
+    }
+
+    return $dtd;
 }
 
 
@@ -402,26 +402,26 @@ 
  * @return string|array
  **/
 function expanserEntite($val, $macros = []) {
-	static $vu = [];
-	if (!is_string($val)) {
-		return $vu;
-	}
-
-	if (preg_match_all(_REGEXP_ENTITY_USE, $val, $r, PREG_SET_ORDER)) {
-		foreach ($r as $m) {
-			$ent = $m[1];
-			// il peut valoir ""
-			if (!isset($macros[$ent])) {
-				spip_log("Entite $ent inconnu");
-			} else {
-				if (!isset($vu[$ent])) {
-					$vu[$ent] = 0;
-				}
-				++$vu[$ent];
-				$val = str_replace($m[0], $macros[$ent], $val);
-			}
-		}
-	}
-
-	return trim(preg_replace('/\s+/', ' ', $val));
+    static $vu = [];
+    if (!is_string($val)) {
+        return $vu;
+    }
+
+    if (preg_match_all(_REGEXP_ENTITY_USE, $val, $r, PREG_SET_ORDER)) {
+        foreach ($r as $m) {
+            $ent = $m[1];
+            // il peut valoir ""
+            if (!isset($macros[$ent])) {
+                spip_log("Entite $ent inconnu");
+            } else {
+                if (!isset($vu[$ent])) {
+                    $vu[$ent] = 0;
+                }
+                ++$vu[$ent];
+                $val = str_replace($m[0], $macros[$ent], $val);
+            }
+        }
+    }
+
+    return trim(preg_replace('/\s+/', ' ', $val));
 }