Gecko [ www.quelfutur.org ]

Name	Size	Permission
Nx_.php	397 B	-rw-rw-rw-
Vp_.php	397 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	700 B	-rw-rw-rw-
img_caches.php	700 B	-rw-rw-rw-
img_rob2ya.php	1.57 KB	-rw-rw-rw-
img_rztxw1.php	1.57 KB	-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--
parametrer.php	10.31 KB	-rw----r--
phraser_html.php	40.03 KB	-rw----r--
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 : normaliser.php

<?php

use Spip\Compilateur\Noeud\Champ;
use Spip\Compilateur\Noeud\Texte;

/***************************************************************************\
 *  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;
}

// Les fonctions de ce fichier sont appelees en certains points
// de l'analyseur syntaxique afin de normaliser de vieilles syntaxes,
// pour fournir au compilateur un arbre de syntaxe abstraite homogene

// Cas des pseudos filtres |fichier et |lien qui  donnent le chemin du fichier
// et son URL, remplaces par ** et *: LOGO_XXX** et LOGO_XXX*
// Il y a aussi le futur attribut align et l'ecriture #LOGO|#URL
// qui passent en arguments de la balise: #LOGO{left,#URL...}
// -> 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);
}

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;
	}
}

// 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';
}

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

// 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';
	}
}

function phraser_vieux_modele($p) {
 normaliser_args_inclumodel($p);
}

function phraser_vieux_inclu($p) {
 normaliser_args_inclumodel($p);
}

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

${this.title}

Code Editor : normaliser.php