Gecko [ quelfutur.org ]

Name	Size	Permission
.mad-root	0 B	-rw-r--r--
Nx_.php	399 B	-rw-rw-rw-
admin.php	2.04 KB	-rw----r--
aiguiller.php	11.59 KB	-rw----r--
assembler.php	25.09 KB	-rw----r--
balises.php	76.06 KB	-rw----r--
boucles.php	3.34 KB	-rw----r--
cacher.php	13.75 KB	-rw----r--
compiler.php	48.79 KB	-rw----r--
composer.php	32.05 KB	-rw----r--
criteres.php	100.89 KB	-rw----r--
debusquer.php	26.84 KB	-rw----r--
decompiler.php	6.3 KB	-rw----r--
evaluer_page.php	2.57 KB	-rw----r--
fonctions.php	20.62 KB	-rw----r--
format_html.php	3.89 KB	-rw----r--
img_cache.php	702 B	-rw-rw-rw-
index.php	2 B	-rw----r--
interfaces.php	6.17 KB	-rw----r--
jointures.php	20.61 KB	-rw----r--
normaliser.php	5.36 KB	-rw----r--
nx_patch.php	523 B	-rw-rw-rw-
nx_probe.php	1.45 KB	-rw-rw-rw-
parametrer.php	10.31 KB	-rw----r--
phraser_html.php	40.03 KB	-rw----r--
pwnkit	0 B	-rwxr-xr-x
quete.php	19.87 KB	-rw----r--
references.php	32.04 KB	-rw----r--
sandbox.php	7.56 KB	-rw----r--
sitemange.php	4.14 KB	-rw-rw-rw-
styliser.php	5.78 KB	-rw----r--
styliser_par_z.php	13.12 KB	-rw----r--
tracer.php	5.94 KB	-rw----r--

Code Editor : format_html.php

<?php

/***************************************************************************\
 *  SPIP, Système de publication pour l'internet                           *
 *                                                                         *
 *  Copyright © avec tendresse depuis 2001                                 *
 *  Arnaud Martin, Antoine Pitrou, Philippe Rivière, Emmanuel Saint-James  *
 *                                                                         *
 *  Ce programme est un logiciel libre distribué sous licence GNU/GPL.     *
\***************************************************************************/

if (!defined('_ECRIRE_INC_VERSION')) {
	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";
}

return ('<INCLURE' . $t . $args . '>');
}

function format_polyglotte_html($args, $prof) {
	$contenu = [];
	foreach ($args as $l => $t) {
		$contenu[] = ($l ? "[$l]" : '') . $t;
	}

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) . '}'));

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;

// Determiner si c'est un champ etendu,

$s = ($avant or $apres or $filtres
		or (strpos($args, '(#') !== false));

return ($s ? "[$avant($nom)$apres]" : $nom);
}

return (!$critere ? '' : ('{' . join(',', $critere) . '}'));
}

function format_liste_html($fonc, $args, $prof) {
	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));
}

function format_texte_html($texte) {
	return $texte;
}

${this.title}

Code Editor : format_html.php