spip / SPIP

ecrire/public/format_html.php

Indentation +90 added lines, -90 removed lines

@@ -11,127 +11,127 @@
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 function format_boucle_html($preaff, $avant, $nom, $type, $crit, $corps, $apres, $altern, $postaff, $prof) {
-	$preaff = $preaff ? "<BB$nom>$preaff" : '';
-	$avant = $avant ? "<B$nom>$avant" : '';
-	$apres = $apres ? "$apres</B$nom>" : '';
-	$altern = $altern ? "$altern<//B$nom>" : '';
-	$postaff = $postaff ? "$postaff</BB$nom>" : '';
-	if (!$corps) {
-		$corps = ' />';
-	} else {
-		$corps = ">$corps</BOUCLE$nom>";
-	}
-
-	return "$preaff$avant<BOUCLE$nom($type)$crit$corps$apres$altern$postaff";
+    $preaff = $preaff ? "<BB$nom>$preaff" : '';
+    $avant = $avant ? "<B$nom>$avant" : '';
+    $apres = $apres ? "$apres</B$nom>" : '';
+    $altern = $altern ? "$altern<//B$nom>" : '';
+    $postaff = $postaff ? "$postaff</BB$nom>" : '';
+    if (!$corps) {
+        $corps = ' />';
+    } else {
+        $corps = ">$corps</BOUCLE$nom>";
+    }
+
+    return "$preaff$avant<BOUCLE$nom($type)$crit$corps$apres$altern$postaff";
 }
 
 function format_inclure_html($file, $args, $prof) {
-	if (strpos($file, '#') === false) {
-		$t = $file ? ('(' . $file . ')') : '';
-	} else {
-		$t = '{fond=' . $file . '}';
-	}
-	$args = !$args ? '' : ('{' . join(', ', $args) . '}');
-
-	return ('<INCLURE' . $t . $args . '>');
+    if (strpos($file, '#') === false) {
+        $t = $file ? ('(' . $file . ')') : '';
+    } else {
+        $t = '{fond=' . $file . '}';
+    }
+    $args = !$args ? '' : ('{' . join(', ', $args) . '}');
+
+    return ('<INCLURE' . $t . $args . '>');
 }
 
 function format_polyglotte_html($args, $prof) {
-	$contenu = [];
-	foreach ($args as $l => $t) {
-		$contenu[] = ($l ? "[$l]" : '') . $t;
-	}
+    $contenu = [];
+    foreach ($args as $l => $t) {
+        $contenu[] = ($l ? "[$l]" : '') . $t;
+    }
 
-	return ('<multi>' . join(' ', $contenu) . '</multi>');
+    return ('<multi>' . join(' ', $contenu) . '</multi>');
 }
 
 function format_idiome_html($nom, $module, $args, $filtres, $prof) {
-	foreach ($args as $k => $v) {
-		$args[$k] = "$k=$v";
-	}
-	$args = (!$args ? '' : ('{' . join(',', $args) . '}'));
+    foreach ($args as $k => $v) {
+        $args[$k] = "$k=$v";
+    }
+    $args = (!$args ? '' : ('{' . join(',', $args) . '}'));
 
-	return ('<:' . ($module ? "$module:" : '') . $nom . $args . $filtres . ':>');
+    return ('<:' . ($module ? "$module:" : '') . $nom . $args . $filtres . ':>');
 }
 
 function format_champ_html($nom, $boucle, $etoile, $avant, $apres, $args, $filtres, $prof) {
-	$nom = '#'
-		. ($boucle ? ($boucle . ':') : '')
-		. $nom
-		. $etoile
-		. $args
-		. $filtres;
+    $nom = '#'
+        . ($boucle ? ($boucle . ':') : '')
+        . $nom
+        . $etoile
+        . $args
+        . $filtres;
 
-	// Determiner si c'est un champ etendu,
+    // Determiner si c'est un champ etendu,
 
-	$s = ($avant or $apres or $filtres
-		or (strpos($args, '(#') !== false));
+    $s = ($avant or $apres or $filtres
+        or (strpos($args, '(#') !== false));
 
-	return ($s ? "[$avant($nom)$apres]" : $nom);
+    return ($s ? "[$avant($nom)$apres]" : $nom);
 }
 
 function format_critere_html($critere) {
-	foreach ($critere as $k => $crit) {
-		$crit_s = '';
-		foreach ($crit as $operande) {
-			[$type, $valeur] = $operande;
-			if ($type == 'champ' and $valeur[0] == '[') {
-				$valeur = substr($valeur, 1, -1);
-				if (preg_match(',^[(](#[^|]*)[)]$,sS', $valeur)) {
-					$valeur = substr($valeur, 1, -1);
-				}
-			}
-			$crit_s .= $valeur;
-		}
-		$critere[$k] = $crit_s;
-	}
-
-	return (!$critere ? '' : ('{' . join(',', $critere) . '}'));
+    foreach ($critere as $k => $crit) {
+        $crit_s = '';
+        foreach ($crit as $operande) {
+            [$type, $valeur] = $operande;
+            if ($type == 'champ' and $valeur[0] == '[') {
+                $valeur = substr($valeur, 1, -1);
+                if (preg_match(',^[(](#[^|]*)[)]$,sS', $valeur)) {
+                    $valeur = substr($valeur, 1, -1);
+                }
+            }
+            $crit_s .= $valeur;
+        }
+        $critere[$k] = $crit_s;
+    }
+
+    return (!$critere ? '' : ('{' . join(',', $critere) . '}'));
 }
 
 function format_liste_html($fonc, $args, $prof) {
-	return ((($fonc !== '') ? "|$fonc" : $fonc)
-		. (!$args ? '' : ('{' . join(',', $args) . '}')));
+    return ((($fonc !== '') ? "|$fonc" : $fonc)
+        . (!$args ? '' : ('{' . join(',', $args) . '}')));
 }
 
 // Concatenation sans separateur: verifier qu'on ne cree pas de faux lexemes
 function format_suite_html($args) {
-	for ($i = 0; $i < (is_countable($args) ? count($args) : 0) - 1; $i++) {
-		[$texte, $type] = $args[$i];
-		[$texte2, $type2] = $args[$i + 1];
-		if (!$texte or !$texte2) {
-			continue;
-		}
-		$c1 = substr($texte, -1);
-		if ($type2 !== 'texte') {
-			// si un texte se termine par ( et est suivi d'un champ
-			// ou assimiles, forcer la notation pleine
-			if ($c1 == '(' and substr($texte2, 0, 1) == '#') {
-				$args[$i + 1][0] = '[(' . $texte2 . ')]';
-			}
-		} else {
-			if ($type == 'texte') {
-				continue;
-			}
-			// si un champ ou assimiles est suivi d'un texte
-			// et si celui-ci commence par un caractere de champ
-			// forcer la notation pleine
-			if (
-				($c1 == '}' and substr(ltrim($texte2), 0, 1) == '|')
-				or (preg_match('/[\w\d_*]/', $c1) and preg_match('/^[\w\d_*{|]/', $texte2))
-			) {
-				$args[$i][0] = '[(' . $texte . ')]';
-			}
-		}
-	}
-
-	return join('', array_map(fn($arg) => reset($arg), $args));
+    for ($i = 0; $i < (is_countable($args) ? count($args) : 0) - 1; $i++) {
+        [$texte, $type] = $args[$i];
+        [$texte2, $type2] = $args[$i + 1];
+        if (!$texte or !$texte2) {
+            continue;
+        }
+        $c1 = substr($texte, -1);
+        if ($type2 !== 'texte') {
+            // si un texte se termine par ( et est suivi d'un champ
+            // ou assimiles, forcer la notation pleine
+            if ($c1 == '(' and substr($texte2, 0, 1) == '#') {
+                $args[$i + 1][0] = '[(' . $texte2 . ')]';
+            }
+        } else {
+            if ($type == 'texte') {
+                continue;
+            }
+            // si un champ ou assimiles est suivi d'un texte
+            // et si celui-ci commence par un caractere de champ
+            // forcer la notation pleine
+            if (
+                ($c1 == '}' and substr(ltrim($texte2), 0, 1) == '|')
+                or (preg_match('/[\w\d_*]/', $c1) and preg_match('/^[\w\d_*{|]/', $texte2))
+            ) {
+                $args[$i][0] = '[(' . $texte . ')]';
+            }
+        }
+    }
+
+    return join('', array_map(fn($arg) => reset($arg), $args));
 }
 
 function format_texte_html($texte) {
-	return $texte;
+    return $texte;
 }

ecrire/public/styliser_par_z.php

Indentation +319 added lines, -319 removed lines

@@ -19,7 +19,7 @@ 
  * @package SPIP\Core\Public\Styliser
  **/
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -29,193 +29,193 @@ 
  * @return array Données modifiées du pipeline
  */
 function public_styliser_par_z_dist($flux) {
-	static $prefix_path = null;
-	static $prefix_length;
-	static $z_blocs;
-	static $apl_constant;
-	static $page;
-	static $disponible = [];
-	static $echafauder;
-	static $prepend = '';
-
-	if (!isset($prefix_path)) {
-		$z_blocs = z_blocs(test_espace_prive());
-		if (test_espace_prive()) {
-			$prefix_path = 'prive/squelettes/';
-			$prefix_length = strlen($prefix_path);
-			$apl_constant = '_ECRIRE_AJAX_PARALLEL_LOAD';
-			$page = 'exec';
-			$echafauder = charger_fonction('echafauder', 'prive', true);
-			define('_ZCORE_EXCLURE_PATH', '');
-		} else {
-			$prefix_path = '';
-			$prefix_length = 0;
-			$apl_constant = '_Z_AJAX_PARALLEL_LOAD';
-			$page = _SPIP_PAGE;
-			$echafauder = charger_fonction('echafauder', 'public', true);
-			define('_ZCORE_EXCLURE_PATH', '\bprive|\bsquelettes-dist' . (defined('_DIR_PLUGIN_DIST') ? '|\b' . rtrim(
-				_DIR_PLUGIN_DIST,
-				'/'
-			) : ''));
-		}
-		$prepend = (defined('_Z_PREPEND_PATH') ? _Z_PREPEND_PATH : '');
-	}
-	$z_contenu = reset($z_blocs); // contenu par defaut
-
-	$fond = $flux['args']['fond'];
-
-	if ($prepend or strncmp($fond, $prefix_path, $prefix_length) == 0) {
-		$fond = substr($fond, $prefix_length);
-		$squelette = $flux['data'];
-		$ext = $flux['args']['ext'];
-		// Ajax Parallel loading : ne pas calculer le bloc, mais renvoyer un js qui le loadera en ajax
-		if (
-			defined('_Z_AJAX_PARALLEL_LOAD_OK')
-			and $dir = explode('/', $fond)
-			and count($dir) == 2 // pas un sous repertoire
-			and $dir = reset($dir)
-			and in_array($dir, $z_blocs) // verifier deja qu'on est dans un bloc Z
-			and defined($apl_constant)
-			and in_array($dir, explode(',', constant($apl_constant))) // et dans un demande en APL
-			and $pipe = z_trouver_bloc($prefix_path . $prepend, $dir, 'z_apl', $ext) // et qui contient le squelette APL
-		) {
-			$flux['data'] = $pipe;
-
-			return $flux;
-		}
-
-		// surcharger aussi les squelettes venant de squelettes-dist/
-		if ($squelette and !z_fond_valide($squelette)) {
-			$squelette = '';
-			$echafauder = '';
-		}
-		if ($prepend) {
-			$squelette = substr(find_in_path($prefix_path . $prepend . "$fond.$ext"), 0, -strlen(".$ext"));
-			if ($squelette) {
-				$flux['data'] = $squelette;
-			}
-		}
-
-		// gerer les squelettes non trouves
-		// -> router vers les /dist.html
-		// ou scaffolding ou page automatique les contenus
-		if (!$squelette) {
-			// si on est sur un ?page=XX non trouve
-			if (
-				(isset($flux['args']['contexte'][$page])
-					and $flux['args']['contexte'][$page] == $fond)
-				or (isset($flux['args']['contexte']['type-page'])
-					and $flux['args']['contexte']['type-page'] == $fond)
-				or ($fond == 'sommaire'
-					and (!isset($flux['args']['contexte'][$page]) or !$flux['args']['contexte'][$page]))
-			) {
-				// si on est sur un ?page=XX non trouve
-				// se brancher sur contenu/xx si il existe
-				// ou si c'est un objet spip, associe a une table, utiliser le fond homonyme
-				if (!isset($disponible[$fond])) {
-					$disponible[$fond] = z_contenu_disponible($prefix_path . $prepend, $z_contenu, $fond, $ext, $echafauder);
-				}
-
-				if ($disponible[$fond]) {
-					$flux['data'] = substr(find_in_path($prefix_path . "page.$ext"), 0, -strlen(".$ext"));
-				}
-			}
-
-			// echafaudage :
-			// si c'est un fond de contenu d'un objet en base
-			// generer un fond automatique a la volee pour les webmestres
-			elseif (strncmp($fond, "$z_contenu/", strlen($z_contenu) + 1) == 0) {
-				$type = substr($fond, strlen($z_contenu) + 1);
-				if (($type == 'page') and isset($flux['args']['contexte'][$page])) {
-					$type = $flux['args']['contexte'][$page];
-				}
-				if (!isset($disponible[$type])) {
-					$disponible[$type] = z_contenu_disponible($prefix_path . $prepend, $z_contenu, $type, $ext, $echafauder);
-				}
-				if (is_string($disponible[$type])) {
-					$flux['data'] = $disponible[$type];
-				} elseif (
-					$echafauder
-					and include_spip('inc/autoriser')
-					and isset($GLOBALS['visiteur_session']['statut']) // performance
-					and autoriser('echafauder', $type)
-					and $is = $disponible[$type]
-					and is_array($is)
-				) {
-					$flux['data'] = $echafauder($type, $is[0], $is[1], $is[2], $ext);
-				} else {
-					$flux['data'] = ($disponible['404'] = z_contenu_disponible(
-						$prefix_path . $prepend,
-						$z_contenu,
-						'404',
-						$ext,
-						$echafauder
-					));
-				}
-			}
-
-			// sinon, si on demande un fond non trouve dans un des autres blocs
-			// et si il y a bien un contenu correspondant ou echafaudable
-			// se rabbatre sur le dist.html du bloc concerne
-			else {
-				if (
-					$dir = explode('/', $fond)
-					and $dir = reset($dir)
-					and $dir !== $z_contenu
-					and in_array($dir, $z_blocs)
-				) {
-					$type = substr($fond, strlen("$dir/"));
-					if (($type == 'page') and isset($flux['args']['contexte'][$page])) {
-						$type = $flux['args']['contexte'][$page];
-					}
-					if ($type !== 'page' and !isset($disponible[$type])) {
-						$disponible[$type] = z_contenu_disponible($prefix_path . $prepend, $z_contenu, $type, $ext, $echafauder);
-					}
-					if ($type == 'page' or $disponible[$type]) {
-						$flux['data'] = z_trouver_bloc($prefix_path . $prepend, $dir, 'dist', $ext);
-					}
-				}
-			}
-			$squelette = $flux['data'];
-		}
-		// layout specifiques par type et compositions :
-		// body-article.html
-		// body-sommaire.html
-		// pour des raisons de perfo, les declinaisons doivent etre dans le
-		// meme dossier que body.html
-		if ($fond == 'body' and substr($squelette, -strlen($fond)) == $fond) {
-			if (
-				isset($flux['args']['contexte']['type-page'])
-				and (
-					(isset($flux['args']['contexte']['composition'])
-						and file_exists(($f = $squelette . '-' . $flux['args']['contexte']['type-page'] . '-' . $flux['args']['contexte']['composition']) . ".$ext"))
-					or
-					file_exists(($f = $squelette . '-' . $flux['args']['contexte']['type-page']) . ".$ext")
-				)
-			) {
-				$flux['data'] = $f;
-			}
-		} elseif (
-			$fond == 'structure'
-			and z_sanitize_var_zajax()
-			and $f = find_in_path($prefix_path . $prepend . 'ajax' . ".$ext")
-		) {
-			$flux['data'] = substr($f, 0, -strlen(".$ext"));
-		} // chercher le fond correspondant a la composition
-		elseif (
-			isset($flux['args']['contexte']['composition'])
-			and (basename($fond) == 'page' or ($squelette and substr($squelette, -strlen($fond)) == $fond))
-			and $dir = substr($fond, $prefix_length)
-			and $dir = explode('/', $dir)
-			and $dir = reset($dir)
-			and in_array($dir, $z_blocs)
-			and $f = find_in_path($prefix_path . $prepend . $fond . '-' . $flux['args']['contexte']['composition'] . ".$ext")
-		) {
-			$flux['data'] = substr($f, 0, -strlen(".$ext"));
-		}
-	}
-
-	return $flux;
+    static $prefix_path = null;
+    static $prefix_length;
+    static $z_blocs;
+    static $apl_constant;
+    static $page;
+    static $disponible = [];
+    static $echafauder;
+    static $prepend = '';
+
+    if (!isset($prefix_path)) {
+        $z_blocs = z_blocs(test_espace_prive());
+        if (test_espace_prive()) {
+            $prefix_path = 'prive/squelettes/';
+            $prefix_length = strlen($prefix_path);
+            $apl_constant = '_ECRIRE_AJAX_PARALLEL_LOAD';
+            $page = 'exec';
+            $echafauder = charger_fonction('echafauder', 'prive', true);
+            define('_ZCORE_EXCLURE_PATH', '');
+        } else {
+            $prefix_path = '';
+            $prefix_length = 0;
+            $apl_constant = '_Z_AJAX_PARALLEL_LOAD';
+            $page = _SPIP_PAGE;
+            $echafauder = charger_fonction('echafauder', 'public', true);
+            define('_ZCORE_EXCLURE_PATH', '\bprive|\bsquelettes-dist' . (defined('_DIR_PLUGIN_DIST') ? '|\b' . rtrim(
+                _DIR_PLUGIN_DIST,
+                '/'
+            ) : ''));
+        }
+        $prepend = (defined('_Z_PREPEND_PATH') ? _Z_PREPEND_PATH : '');
+    }
+    $z_contenu = reset($z_blocs); // contenu par defaut
+
+    $fond = $flux['args']['fond'];
+
+    if ($prepend or strncmp($fond, $prefix_path, $prefix_length) == 0) {
+        $fond = substr($fond, $prefix_length);
+        $squelette = $flux['data'];
+        $ext = $flux['args']['ext'];
+        // Ajax Parallel loading : ne pas calculer le bloc, mais renvoyer un js qui le loadera en ajax
+        if (
+            defined('_Z_AJAX_PARALLEL_LOAD_OK')
+            and $dir = explode('/', $fond)
+            and count($dir) == 2 // pas un sous repertoire
+            and $dir = reset($dir)
+            and in_array($dir, $z_blocs) // verifier deja qu'on est dans un bloc Z
+            and defined($apl_constant)
+            and in_array($dir, explode(',', constant($apl_constant))) // et dans un demande en APL
+            and $pipe = z_trouver_bloc($prefix_path . $prepend, $dir, 'z_apl', $ext) // et qui contient le squelette APL
+        ) {
+            $flux['data'] = $pipe;
+
+            return $flux;
+        }
+
+        // surcharger aussi les squelettes venant de squelettes-dist/
+        if ($squelette and !z_fond_valide($squelette)) {
+            $squelette = '';
+            $echafauder = '';
+        }
+        if ($prepend) {
+            $squelette = substr(find_in_path($prefix_path . $prepend . "$fond.$ext"), 0, -strlen(".$ext"));
+            if ($squelette) {
+                $flux['data'] = $squelette;
+            }
+        }
+
+        // gerer les squelettes non trouves
+        // -> router vers les /dist.html
+        // ou scaffolding ou page automatique les contenus
+        if (!$squelette) {
+            // si on est sur un ?page=XX non trouve
+            if (
+                (isset($flux['args']['contexte'][$page])
+                    and $flux['args']['contexte'][$page] == $fond)
+                or (isset($flux['args']['contexte']['type-page'])
+                    and $flux['args']['contexte']['type-page'] == $fond)
+                or ($fond == 'sommaire'
+                    and (!isset($flux['args']['contexte'][$page]) or !$flux['args']['contexte'][$page]))
+            ) {
+                // si on est sur un ?page=XX non trouve
+                // se brancher sur contenu/xx si il existe
+                // ou si c'est un objet spip, associe a une table, utiliser le fond homonyme
+                if (!isset($disponible[$fond])) {
+                    $disponible[$fond] = z_contenu_disponible($prefix_path . $prepend, $z_contenu, $fond, $ext, $echafauder);
+                }
+
+                if ($disponible[$fond]) {
+                    $flux['data'] = substr(find_in_path($prefix_path . "page.$ext"), 0, -strlen(".$ext"));
+                }
+            }
+
+            // echafaudage :
+            // si c'est un fond de contenu d'un objet en base
+            // generer un fond automatique a la volee pour les webmestres
+            elseif (strncmp($fond, "$z_contenu/", strlen($z_contenu) + 1) == 0) {
+                $type = substr($fond, strlen($z_contenu) + 1);
+                if (($type == 'page') and isset($flux['args']['contexte'][$page])) {
+                    $type = $flux['args']['contexte'][$page];
+                }
+                if (!isset($disponible[$type])) {
+                    $disponible[$type] = z_contenu_disponible($prefix_path . $prepend, $z_contenu, $type, $ext, $echafauder);
+                }
+                if (is_string($disponible[$type])) {
+                    $flux['data'] = $disponible[$type];
+                } elseif (
+                    $echafauder
+                    and include_spip('inc/autoriser')
+                    and isset($GLOBALS['visiteur_session']['statut']) // performance
+                    and autoriser('echafauder', $type)
+                    and $is = $disponible[$type]
+                    and is_array($is)
+                ) {
+                    $flux['data'] = $echafauder($type, $is[0], $is[1], $is[2], $ext);
+                } else {
+                    $flux['data'] = ($disponible['404'] = z_contenu_disponible(
+                        $prefix_path . $prepend,
+                        $z_contenu,
+                        '404',
+                        $ext,
+                        $echafauder
+                    ));
+                }
+            }
+
+            // sinon, si on demande un fond non trouve dans un des autres blocs
+            // et si il y a bien un contenu correspondant ou echafaudable
+            // se rabbatre sur le dist.html du bloc concerne
+            else {
+                if (
+                    $dir = explode('/', $fond)
+                    and $dir = reset($dir)
+                    and $dir !== $z_contenu
+                    and in_array($dir, $z_blocs)
+                ) {
+                    $type = substr($fond, strlen("$dir/"));
+                    if (($type == 'page') and isset($flux['args']['contexte'][$page])) {
+                        $type = $flux['args']['contexte'][$page];
+                    }
+                    if ($type !== 'page' and !isset($disponible[$type])) {
+                        $disponible[$type] = z_contenu_disponible($prefix_path . $prepend, $z_contenu, $type, $ext, $echafauder);
+                    }
+                    if ($type == 'page' or $disponible[$type]) {
+                        $flux['data'] = z_trouver_bloc($prefix_path . $prepend, $dir, 'dist', $ext);
+                    }
+                }
+            }
+            $squelette = $flux['data'];
+        }
+        // layout specifiques par type et compositions :
+        // body-article.html
+        // body-sommaire.html
+        // pour des raisons de perfo, les declinaisons doivent etre dans le
+        // meme dossier que body.html
+        if ($fond == 'body' and substr($squelette, -strlen($fond)) == $fond) {
+            if (
+                isset($flux['args']['contexte']['type-page'])
+                and (
+                    (isset($flux['args']['contexte']['composition'])
+                        and file_exists(($f = $squelette . '-' . $flux['args']['contexte']['type-page'] . '-' . $flux['args']['contexte']['composition']) . ".$ext"))
+                    or
+                    file_exists(($f = $squelette . '-' . $flux['args']['contexte']['type-page']) . ".$ext")
+                )
+            ) {
+                $flux['data'] = $f;
+            }
+        } elseif (
+            $fond == 'structure'
+            and z_sanitize_var_zajax()
+            and $f = find_in_path($prefix_path . $prepend . 'ajax' . ".$ext")
+        ) {
+            $flux['data'] = substr($f, 0, -strlen(".$ext"));
+        } // chercher le fond correspondant a la composition
+        elseif (
+            isset($flux['args']['contexte']['composition'])
+            and (basename($fond) == 'page' or ($squelette and substr($squelette, -strlen($fond)) == $fond))
+            and $dir = substr($fond, $prefix_length)
+            and $dir = explode('/', $dir)
+            and $dir = reset($dir)
+            and in_array($dir, $z_blocs)
+            and $f = find_in_path($prefix_path . $prepend . $fond . '-' . $flux['args']['contexte']['composition'] . ".$ext")
+        ) {
+            $flux['data'] = substr($f, 0, -strlen(".$ext"));
+        }
+    }
+
+    return $flux;
 }
 
 /**
@@ -225,18 +225,18 @@ 
  * @return array
  */
 function z_blocs($espace_prive = false) {
-	if ($espace_prive) {
-		return ($GLOBALS['z_blocs_ecrire'] ?? [
-			'contenu',
-			'navigation',
-			'extra',
-			'head',
-			'hierarchie',
-			'top'
-		]);
-	}
-
-	return ($GLOBALS['z_blocs'] ?? ['contenu']);
+    if ($espace_prive) {
+        return ($GLOBALS['z_blocs_ecrire'] ?? [
+            'contenu',
+            'navigation',
+            'extra',
+            'head',
+            'hierarchie',
+            'top'
+        ]);
+    }
+
+    return ($GLOBALS['z_blocs'] ?? ['contenu']);
 }
 
 /**
@@ -251,11 +251,11 @@ 
  * @return mixed
  */
 function z_contenu_disponible($prefix_path, $z_contenu, $type, $ext, $echafauder = true) {
-	if ($d = z_trouver_bloc($prefix_path, $z_contenu, $type, $ext)) {
-		return $d;
-	}
+    if ($d = z_trouver_bloc($prefix_path, $z_contenu, $type, $ext)) {
+        return $d;
+    }
 
-	return $echafauder ? z_echafaudable($type) : false;
+    return $echafauder ? z_echafaudable($type) : false;
 }
 
 /**
@@ -269,14 +269,14 @@ 
  *   `true` si on peut l'utiliser, `false` sinon.
  **/
 function z_fond_valide($squelette) {
-	if (
-		!_ZCORE_EXCLURE_PATH
-		or !preg_match(',(' . _ZCORE_EXCLURE_PATH . ')/,', $squelette)
-	) {
-		return true;
-	}
-
-	return false;
+    if (
+        !_ZCORE_EXCLURE_PATH
+        or !preg_match(',(' . _ZCORE_EXCLURE_PATH . ')/,', $squelette)
+    ) {
+        return true;
+    }
+
+    return false;
 }
 
 /**
@@ -294,14 +294,14 @@ 
  * @return string
  */
 function z_trouver_bloc($prefix_path, $bloc, $fond, $ext) {
-	if (
-		(defined('_ZCORE_BLOC_PREFIX_SKEL') and $f = find_in_path("$prefix_path$bloc/$bloc.$fond.$ext") and z_fond_valide($f))
-		or ($f = find_in_path("$prefix_path$bloc/$fond.$ext") and z_fond_valide($f))
-	) {
-		return substr($f, 0, -strlen(".$ext"));
-	}
-
-	return '';
+    if (
+        (defined('_ZCORE_BLOC_PREFIX_SKEL') and $f = find_in_path("$prefix_path$bloc/$bloc.$fond.$ext") and z_fond_valide($f))
+        or ($f = find_in_path("$prefix_path$bloc/$fond.$ext") and z_fond_valide($f))
+    ) {
+        return substr($f, 0, -strlen(".$ext"));
+    }
+
+    return '';
 }
 
 /**
@@ -313,52 +313,52 @@ 
  * @return bool
  */
 function z_echafaudable($type) {
-	static $pages = null;
-	static $echafaudable = [];
-	if (isset($echafaudable[$type])) {
-		return $echafaudable[$type];
-	}
-	if (preg_match(',[^\w],', $type)) {
-		return $echafaudable[$type] = false;
-	}
-
-	if (test_espace_prive()) {
-		if (!function_exists('trouver_objet_exec')) {
-			include_spip('inc/pipelines_ecrire');
-		}
-		if ($e = trouver_objet_exec($type)) {
-			return $echafaudable[$type] = [$e['table'], $e['table_objet_sql'], $e];
-		} else {
-			// peut etre c'est un exec=types qui liste tous les objets "type"
-			if (
-				($t = objet_type($type, false)) !== $type
-				and $e = trouver_objet_exec($t)
-			) {
-				return $echafaudable[$type] = [$e['table'], $e['table_objet_sql'], $t];
-			}
-		}
-	} else {
-		if (is_null($pages)) {
-			$pages = [];
-			$liste = lister_tables_objets_sql();
-			foreach ($liste as $t => $d) {
-				if ($d['page']) {
-					$pages[$d['page']] = [$d['table_objet'], $t];
-				}
-			}
-		}
-		if (!isset($pages[$type])) {
-			return $echafaudable[$type] = false;
-		}
-		if ((is_countable($pages[$type]) ? count($pages[$type]) : 0) == 2) {
-			$trouver_table = charger_fonction('trouver_table', 'base');
-			$pages[$type][] = $trouver_table(reset($pages[$type]));
-		}
-
-		return $echafaudable[$type] = $pages[$type];
-	}
-
-	return $echafaudable[$type] = false;
+    static $pages = null;
+    static $echafaudable = [];
+    if (isset($echafaudable[$type])) {
+        return $echafaudable[$type];
+    }
+    if (preg_match(',[^\w],', $type)) {
+        return $echafaudable[$type] = false;
+    }
+
+    if (test_espace_prive()) {
+        if (!function_exists('trouver_objet_exec')) {
+            include_spip('inc/pipelines_ecrire');
+        }
+        if ($e = trouver_objet_exec($type)) {
+            return $echafaudable[$type] = [$e['table'], $e['table_objet_sql'], $e];
+        } else {
+            // peut etre c'est un exec=types qui liste tous les objets "type"
+            if (
+                ($t = objet_type($type, false)) !== $type
+                and $e = trouver_objet_exec($t)
+            ) {
+                return $echafaudable[$type] = [$e['table'], $e['table_objet_sql'], $t];
+            }
+        }
+    } else {
+        if (is_null($pages)) {
+            $pages = [];
+            $liste = lister_tables_objets_sql();
+            foreach ($liste as $t => $d) {
+                if ($d['page']) {
+                    $pages[$d['page']] = [$d['table_objet'], $t];
+                }
+            }
+        }
+        if (!isset($pages[$type])) {
+            return $echafaudable[$type] = false;
+        }
+        if ((is_countable($pages[$type]) ? count($pages[$type]) : 0) == 2) {
+            $trouver_table = charger_fonction('trouver_table', 'base');
+            $pages[$type][] = $trouver_table(reset($pages[$type]));
+        }
+
+        return $echafaudable[$type] = $pages[$type];
+    }
+
+    return $echafaudable[$type] = false;
 }
 
 
@@ -375,46 +375,46 @@ 
  * @return string
  */
 function prive_echafauder_dist($exec, $table, $table_sql, $desc_exec, $ext) {
-	$scaffold = '';
-
-	// page objet ou objet_edit
-	if (is_array($desc_exec)) {
-		$type = $desc_exec['type'];
-		$primary = $desc_exec['id_table_objet'];
-
-		if ($desc_exec['edition'] === false) {
-			$fond = 'objet';
-		} else {
-			$trouver_table = charger_fonction('trouver_table', 'base');
-			$desc = $trouver_table($table_sql);
-			if (isset($desc['field']['id_rubrique'])) {
-				$fond = 'objet_edit';
-			} else {
-				$fond = 'objet_edit.sans_rubrique';
-			}
-		}
-		$dir = z_blocs(test_espace_prive());
-		$dir = reset($dir);
-		$scaffold = "<INCLURE{fond=prive/echafaudage/$dir/" . $fond . ',objet=' . $type . ',id_objet=#' . strtoupper($primary) . ',env}>';
-	} // page objets
-	elseif ($type = $desc_exec and strpos($type, '/') === false) {
-		$dir = z_blocs(test_espace_prive());
-		$dir = reset($dir);
-		$scaffold = "<INCLURE{fond=prive/echafaudage/$dir/objets,objet=" . $type . ',env} />';
-	}
-	// morceau d'objet : on fournit le fond de sibstitution dans $desc_exec
-	// et objet et tire de $table
-	elseif ($fond = $desc_exec) {
-		$dir = md5(dirname($fond));
-		$scaffold = "<INCLURE{fond=$fond,objet=" . objet_type($table) . ',env} />';
-	}
-
-	$base_dir = sous_repertoire(_DIR_CACHE, 'scaffold', false);
-	$base_dir = sous_repertoire($base_dir, $dir, false);
-	$f = $base_dir . "$exec";
-	ecrire_fichier("$f.$ext", $scaffold);
-
-	return $f;
+    $scaffold = '';
+
+    // page objet ou objet_edit
+    if (is_array($desc_exec)) {
+        $type = $desc_exec['type'];
+        $primary = $desc_exec['id_table_objet'];
+
+        if ($desc_exec['edition'] === false) {
+            $fond = 'objet';
+        } else {
+            $trouver_table = charger_fonction('trouver_table', 'base');
+            $desc = $trouver_table($table_sql);
+            if (isset($desc['field']['id_rubrique'])) {
+                $fond = 'objet_edit';
+            } else {
+                $fond = 'objet_edit.sans_rubrique';
+            }
+        }
+        $dir = z_blocs(test_espace_prive());
+        $dir = reset($dir);
+        $scaffold = "<INCLURE{fond=prive/echafaudage/$dir/" . $fond . ',objet=' . $type . ',id_objet=#' . strtoupper($primary) . ',env}>';
+    } // page objets
+    elseif ($type = $desc_exec and strpos($type, '/') === false) {
+        $dir = z_blocs(test_espace_prive());
+        $dir = reset($dir);
+        $scaffold = "<INCLURE{fond=prive/echafaudage/$dir/objets,objet=" . $type . ',env} />';
+    }
+    // morceau d'objet : on fournit le fond de sibstitution dans $desc_exec
+    // et objet et tire de $table
+    elseif ($fond = $desc_exec) {
+        $dir = md5(dirname($fond));
+        $scaffold = "<INCLURE{fond=$fond,objet=" . objet_type($table) . ',env} />';
+    }
+
+    $base_dir = sous_repertoire(_DIR_CACHE, 'scaffold', false);
+    $base_dir = sous_repertoire($base_dir, $dir, false);
+    $f = $base_dir . "$exec";
+    ecrire_fichier("$f.$ext", $scaffold);
+
+    return $f;
 }
 
 /**
@@ -423,17 +423,17 @@ 
  * @return bool|string
  */
 function z_sanitize_var_zajax() {
-	$z_ajax = _request('var_zajax');
-	if (!$z_ajax) {
-		return false;
-	}
-	if (
-		!$z_blocs = z_blocs(test_espace_prive())
-		or !in_array($z_ajax, $z_blocs)
-	) {
-		set_request('var_zajax'); // enlever cette demande incongrue
-		$z_ajax = false;
-	}
-
-	return $z_ajax;
+    $z_ajax = _request('var_zajax');
+    if (!$z_ajax) {
+        return false;
+    }
+    if (
+        !$z_blocs = z_blocs(test_espace_prive())
+        or !in_array($z_ajax, $z_blocs)
+    ) {
+        set_request('var_zajax'); // enlever cette demande incongrue
+        $z_ajax = false;
+    }
+
+    return $z_ajax;
 }

ecrire/public/normaliser.php

Indentation +159 added lines, -159 removed lines

@@ -11,7 +11,7 @@ 
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 // Les fonctions de ce fichier sont appelees en certains points
@@ -25,193 +25,193 @@ 
 // -> https://www.spip.net/fr_article901.html
 
 function phraser_vieux_logos(&$p) {
-	if ($p->param[0][0]) {
-		$args = [''];
-	} else {
-		$args = array_shift($p->param);
-	}
-
-	foreach ($p->param as $couple) {
-		$nom = trim($couple[0]);
-		if ($nom == '') {
-			array_shift($p->param);
-			break;
-		}
-		$r = phraser_logo_faux_filtres($nom);
-		if ($r === 0) {
-			$c = new Texte();
-			$c->texte = $nom;
-			$args[] = [$c];
-			array_shift($p->param);
-			spip_log("filtre de logo obsolete $nom", 'vieilles_defs');
-		} elseif ($r === 2) {
-			$p->etoile = '**';
-			array_shift($p->param);
-			spip_log("filtre de logo obsolete $nom", 'vieilles_defs');
-		} elseif ($r === 1) {
-			array_shift($p->param);
-			$p->etoile = '*';
-			spip_log("filtre de logo obsolete $nom", 'vieilles_defs');
-		} elseif (preg_match('/^' . NOM_DE_CHAMP . '(.*)$/sS', $nom, $m)) {
-			$champ = new Champ();
-			$champ->nom_boucle = $m[2];
-			$champ->nom_champ = $m[3];
-			$champ->etoile = $m[5];
-			$champ = [$champ];
-			if ($m[6]) {
-				$r = new Texte();
-				$r->texte = $m[6];
-				$champ[] = $r;
-			}
-			$args[] = $champ;
-			array_shift($p->param);
-			spip_log("filtre de logo obsolete $nom", 'vieilles_defs');
-		} // le cas else est la seule incompatibilite
-	}
-	array_unshift($p->param, $args);
+    if ($p->param[0][0]) {
+        $args = [''];
+    } else {
+        $args = array_shift($p->param);
+    }
+
+    foreach ($p->param as $couple) {
+        $nom = trim($couple[0]);
+        if ($nom == '') {
+            array_shift($p->param);
+            break;
+        }
+        $r = phraser_logo_faux_filtres($nom);
+        if ($r === 0) {
+            $c = new Texte();
+            $c->texte = $nom;
+            $args[] = [$c];
+            array_shift($p->param);
+            spip_log("filtre de logo obsolete $nom", 'vieilles_defs');
+        } elseif ($r === 2) {
+            $p->etoile = '**';
+            array_shift($p->param);
+            spip_log("filtre de logo obsolete $nom", 'vieilles_defs');
+        } elseif ($r === 1) {
+            array_shift($p->param);
+            $p->etoile = '*';
+            spip_log("filtre de logo obsolete $nom", 'vieilles_defs');
+        } elseif (preg_match('/^' . NOM_DE_CHAMP . '(.*)$/sS', $nom, $m)) {
+            $champ = new Champ();
+            $champ->nom_boucle = $m[2];
+            $champ->nom_champ = $m[3];
+            $champ->etoile = $m[5];
+            $champ = [$champ];
+            if ($m[6]) {
+                $r = new Texte();
+                $r->texte = $m[6];
+                $champ[] = $r;
+            }
+            $args[] = $champ;
+            array_shift($p->param);
+            spip_log("filtre de logo obsolete $nom", 'vieilles_defs');
+        } // le cas else est la seule incompatibilite
+    }
+    array_unshift($p->param, $args);
 }
 
 
 function phraser_logo_faux_filtres($nom) {
-	switch ($nom) {
-		case 'top':
-		case 'left':
-		case 'right':
-		case 'center':
-		case 'bottom':
-			return 0;
-		case 'lien':
-			return 1;
-		case 'fichier':
-			return 2;
-		default:
-			return $nom;
-	}
+    switch ($nom) {
+        case 'top':
+        case 'left':
+        case 'right':
+        case 'center':
+        case 'bottom':
+            return 0;
+        case 'lien':
+            return 1;
+        case 'fichier':
+            return 2;
+        default:
+            return $nom;
+    }
 }
 
 
 // La balise embed_document est a present le modele emb
 
 function phraser_vieux_emb(&$p) {
-	if (!is_array($p->param)) {
-		$p->param = [];
-	}
-
-	// Produire le premier argument {emb}
-	$texte = new Texte();
-	$texte->texte = 'emb';
-	$param = ['', [$texte]];
-
-	// Transformer les filtres en arguments
-	for ($i = 0; $i < (is_countable($p->param) ? count($p->param) : 0); $i++) {
-		if ($p->param[$i][0]) {
-			if (!strstr($p->param[$i][0], '=')) {
-				break;
-			}# on a rencontre un vrai filtre, c'est fini
-			$texte = new Texte();
-			$texte->texte = $p->param[$i][0];
-			$param[] = [$texte];
-		}
-		array_shift($p->param);
-	}
-	array_unshift($p->param, $param);
-	spip_log('balise EMBED_DOCUMENT obsolete', 'vieilles_defs');
-	$p->nom_champ = 'MODELE';
+    if (!is_array($p->param)) {
+        $p->param = [];
+    }
+
+    // Produire le premier argument {emb}
+    $texte = new Texte();
+    $texte->texte = 'emb';
+    $param = ['', [$texte]];
+
+    // Transformer les filtres en arguments
+    for ($i = 0; $i < (is_countable($p->param) ? count($p->param) : 0); $i++) {
+        if ($p->param[$i][0]) {
+            if (!strstr($p->param[$i][0], '=')) {
+                break;
+            }# on a rencontre un vrai filtre, c'est fini
+            $texte = new Texte();
+            $texte->texte = $p->param[$i][0];
+            $param[] = [$texte];
+        }
+        array_shift($p->param);
+    }
+    array_unshift($p->param, $param);
+    spip_log('balise EMBED_DOCUMENT obsolete', 'vieilles_defs');
+    $p->nom_champ = 'MODELE';
 }
 
 // Vieux formulaire de recherch
 
 function phraser_vieux_recherche($p) {
-	if ($p->param[0][0]) {
-		$c = new Texte();
-		$c->texte = $p->param[0][0];
-		$p->param[0][1] = [$c];
-		$p->param[0][0] = '';
-		$p->fonctions = [];
-		spip_log('FORMULAIRE_RECHERCHE avec filtre ' . $c->texte, 'vieilles_defs');
-	}
+    if ($p->param[0][0]) {
+        $c = new Texte();
+        $c->texte = $p->param[0][0];
+        $p->param[0][1] = [$c];
+        $p->param[0][0] = '';
+        $p->fonctions = [];
+        spip_log('FORMULAIRE_RECHERCHE avec filtre ' . $c->texte, 'vieilles_defs');
+    }
 }
 
 // Gerer la notation [(#EXPOSER|on,off)]
 function phraser_vieux_exposer($p) {
-	if ($a = $p->fonctions) {
-		preg_match('#([^,]*)(,(.*))?#', $a[0][0], $regs);
-		$args = [];
-		if ($regs[1]) {
-			$a = new Texte();
-			$a->texte = $regs[1];
-			$args = ['', [$a]];
-			if ($regs[3]) {
-				$a = new Texte();
-				$a->texte = $regs[3];
-				$args[] = [$a];
-			}
-		}
-		$p->param[0] = $args;
-		$p->fonctions = [];
-		$p->nom_champ = 'EXPOSE';
-	}
+    if ($a = $p->fonctions) {
+        preg_match('#([^,]*)(,(.*))?#', $a[0][0], $regs);
+        $args = [];
+        if ($regs[1]) {
+            $a = new Texte();
+            $a->texte = $regs[1];
+            $args = ['', [$a]];
+            if ($regs[3]) {
+                $a = new Texte();
+                $a->texte = $regs[3];
+                $args[] = [$a];
+            }
+        }
+        $p->param[0] = $args;
+        $p->fonctions = [];
+        $p->nom_champ = 'EXPOSE';
+    }
 }
 
 function phraser_vieux_modele($p) {
- normaliser_args_inclumodel($p);
+    normaliser_args_inclumodel($p);
 }
 
 function phraser_vieux_inclu($p) {
- normaliser_args_inclumodel($p);
+    normaliser_args_inclumodel($p);
 }
 
 function normaliser_args_inclumodel($p) {
-	$params = $p->param;
-	if (!$params) {
-		return;
-	}
-	$args = $params[0];
-	if ($args[0]) {
-		return;
-	} // filtre immediat
-	array_shift($p->param);
-	foreach ($p->param as $l) {
-		if (!array_shift($l)) {
-			$args = array_merge($args, $l);
-			array_shift($p->param);
-		} else {
-			break;
-		} // filtre
-	}
-	array_unshift($p->param, $args);
+    $params = $p->param;
+    if (!$params) {
+        return;
+    }
+    $args = $params[0];
+    if ($args[0]) {
+        return;
+    } // filtre immediat
+    array_shift($p->param);
+    foreach ($p->param as $l) {
+        if (!array_shift($l)) {
+            $args = array_merge($args, $l);
+            array_shift($p->param);
+        } else {
+            break;
+        } // filtre
+    }
+    array_unshift($p->param, $args);
 }
 
 function normaliser_inclure($champ) {
-	normaliser_args_inclumodel($champ);
-	$l = $champ->param[0];
-	if (is_array($l) and !$l[0]) {
-		foreach ($l as $k => $p) {
-			if ($p and $p[0]->type == 'texte' and !strpos($p[0]->texte, '=')) {
-				$p[0]->texte = trim($p[0]->texte);
-			}
-		}
-		foreach ($l as $k => $p) {
-			if (
-				!$p or $p[0]->type != 'texte' or
-				!preg_match('/^fond\s*=\s*(.*)$/', $p[0]->texte, $r)
-			) {
-				continue;
-			}
-
-			if ($r[1]) {
-				$p[0]->texte = $r[1];
-			} else {
-				unset($p[0]);
-			}
-			$champ->texte = $p;
-			unset($champ->param[0][$k]);
-			if ((is_countable($champ->param[0]) ? count($champ->param[0]) : 0) == 1) {
-				array_shift($champ->param);
-			}
-
-			return;
-		}
-	}
-	spip_log('inclure sans fond ni fichier');
+    normaliser_args_inclumodel($champ);
+    $l = $champ->param[0];
+    if (is_array($l) and !$l[0]) {
+        foreach ($l as $k => $p) {
+            if ($p and $p[0]->type == 'texte' and !strpos($p[0]->texte, '=')) {
+                $p[0]->texte = trim($p[0]->texte);
+            }
+        }
+        foreach ($l as $k => $p) {
+            if (
+                !$p or $p[0]->type != 'texte' or
+                !preg_match('/^fond\s*=\s*(.*)$/', $p[0]->texte, $r)
+            ) {
+                continue;
+            }
+
+            if ($r[1]) {
+                $p[0]->texte = $r[1];
+            } else {
+                unset($p[0]);
+            }
+            $champ->texte = $p;
+            unset($champ->param[0][$k]);
+            if ((is_countable($champ->param[0]) ? count($champ->param[0]) : 0) == 1) {
+                array_shift($champ->param);
+            }
+
+            return;
+        }
+    }
+    spip_log('inclure sans fond ni fichier');
 }

ecrire/exec/base_repair.php

Indentation +22 added lines, -22 removed lines

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

ecrire/exec/demande_mise_a_jour.php

Indentation +24 added lines, -24 removed lines

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

ecrire/exec/404.php

Indentation +16 added lines, -16 removed lines

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

ecrire/exec/403.php

Indentation +28 added lines, -28 removed lines

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

ecrire/inc/nfslock.php

Indentation +92 added lines, -92 removed lines

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

ecrire/inc/csv.php

Indentation +108 added lines, -108 removed lines

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