Gecko [ quelfutur.org ]

Name	Size	Permission
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--
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 : evaluer_page.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;
}

/**
 * Evaluer la page produite par un squelette
 *
 * Évalue une page pour la transformer en texte statique
 * Elle peut contenir un < ?xml a securiser avant eval
 * ou du php d'origine inconnue
 *
 * Attention cette partie eval() doit impérativement
 * être déclenchée dans l'espace des globales (donc pas
 * dans une fonction).
 *
 * @param array $page
 * @return void
 */

/** @var bool Évaluation réussie ? */
$res = true;

// Cas d'une page contenant du PHP :
if (empty($page['process_ins']) or $page['process_ins'] != 'html') {
	include_spip('inc/lang');

// restaurer l'etat des notes avant calcul
	if (
		isset($page['notes'])
		and $page['notes']
		and $notes = charger_fonction('notes', 'inc', true)
	) {
		$notes($page['notes'], 'restaurer_etat');
	}
	ob_start();
	if (strpos($page['texte'], '?xml') !== false) {
		$page['texte'] = str_replace('<' . '?xml', "<\1?xml", $page['texte']);
	}

try {
		$res = eval('?' . '>' . $page['texte']);
		$page['texte'] = ob_get_contents();
	} catch (\Throwable $e) {
		$code = $page['texte'];
		$GLOBALS['numero_ligne_php'] = 1;
		if (!function_exists('numerote_ligne_php')) {
			function numerote_ligne_php($match) {
				$GLOBALS['numero_ligne_php']++;
				return "\n/*" . str_pad($GLOBALS['numero_ligne_php'], 3, '0', STR_PAD_LEFT) . '*/';
			}
		}
		$code = '/*001*/' . preg_replace_callback(",\n,", 'numerote_ligne_php', $code);
		$code = trim(highlight_string($code, true));
		erreur_squelette('L' . $e->getLine() . ': ' . $e->getMessage() . '<br>' . $code, [$page['source'],'',$e->getFile(),'',$GLOBALS['spip_lang']]);
		$page['texte'] = '';
	}
	ob_end_clean();

$page['process_ins'] = 'html';

if (strpos($page['texte'], '?xml') !== false) {
		$page['texte'] = str_replace("<\1?xml", '<' . '?xml', $page['texte']);
	}
}

// le résultat de calcul d'un squelette est toujours de type string
$page['texte'] = strval($page['texte']);
page_base_href($page['texte']);

${this.title}

Code Editor : evaluer_page.php