Gecko [ www.quelfutur.org ]

Name	Size	Permission
acces.php	13.5 KB	-rw----r--
actions.php	5.36 KB	-rw----r--
admin.php	9.46 KB	-rw----r--
auth.php	22.43 KB	-rw----r--
auth_handler.php	300 B	-rw-r--r--
autoriser.php	64.83 KB	-rw----r--
bandeau.php	8.42 KB	-rw----r--
boutons.php	2.49 KB	-rw----r--
charsets.php	28.17 KB	-rw----r--
chercher_logo.php	3.3 KB	-rw----r--
chercher_rubrique.php	11.33 KB	-rw----r--
commencer_page.php	4.49 KB	-rw----r--
completer_traduction.php	2.43 KB	-rw----r--
config.php	13.96 KB	-rw----r--
cookie.php	6.21 KB	-rw----r--
couleurs.php	3.24 KB	-rw----r--
csv.php	3.76 KB	-rw----r--
cvt_autosave.php	4.26 KB	-rw----r--
cvt_configurer.php	7.92 KB	-rw----r--
cvt_multietapes.php	10.15 KB	-rw----r--
definir_menus_favoris.php	1.08 KB	-rw----r--
distant.php	43.91 KB	-rw----r--
documents.php	8.84 KB	-rw----r--
drapeau_edition.php	6.82 KB	-rw----r--
editer.php	22.05 KB	-rw----r--
email_valide.php	1.74 KB	-rw----r--
envoyer_mail.php	7.67 KB	-rw----r--
exporter_csv.php	7.37 KB	-rw----r--
filtres.php	162.08 KB	-rw----r--
filtres_alertes.php	8.29 KB	-rw----r--
filtres_boites.php	4.79 KB	-rw----r--
filtres_dates.php	34.68 KB	-rw----r--
filtres_ecrire.php	17.33 KB	-rw----r--
filtres_images_lib_mini.php	59.89 KB	-rw----r--
filtres_images_mini.php	16.78 KB	-rw----r--
filtres_mime.php	4.72 KB	-rw----r--
filtres_mini.php	6.9 KB	-rw----r--
filtres_selecteur_generique.ph...	8.25 KB	-rw----r--
flock.php	20.88 KB	-rw----r--
genie.php	6.86 KB	-rw----r--
headers.php	7.77 KB	-rw----r--
icone_renommer.php	2.12 KB	-rw----r--
iconifier.php	1.37 KB	-rw----r--
importer_csv.php	4.8 KB	-rw----r--
index.php	2 B	-rw----r--
informer.php	2.95 KB	-rw----r--
install.php	15.69 KB	-rw----r--
invalideur.php	7.99 KB	-rw----r--
journal.php	1.11 KB	-rw----r--
json.php	2.2 KB	-rw----r--
lang.php	14.59 KB	-rw----r--
lang_liste.php	7.23 KB	-rw----r--
layer.php	5.93 KB	-rw----r--
lien.php	8.43 KB	-rw----r--
lien_court.php	1.17 KB	-rw----r--
liens.php	680 B	-rw----r--
lister_objets.php	2.13 KB	-rw----r--
livrer_fichier.php	7.7 KB	-rw----r--
log.php	3.43 KB	-rw----r--
math.php	4.42 KB	-rw----r--
meta.php	9.09 KB	-rw----r--
minipres.php	3.7 KB	-rw----r--
modeles.php	1.42 KB	-rw----r--
modifier.php	11.09 KB	-rw----r--
nfslock.php	11.47 KB	-rw----r--
notifications.php	5.76 KB	-rw----r--
pipelines.php	7.83 KB	-rw----r--
pipelines_ecrire.php	12.04 KB	-rw----r--
plonger.php	3.98 KB	-rw----r--
plugin.php	47.39 KB	-rw----r--
precharger_article.php	2.26 KB	-rw----r--
precharger_objet.php	7.2 KB	-rw----r--
prepare_recherche.php	5.72 KB	-rw----r--
preselectionner_parent_nouvel_...	2.19 KB	-rw----r--
presentation.php	8.63 KB	-rw----r--
presentation_mini.php	8.28 KB	-rw----r--
presenter_enfants.php	6.75 KB	-rw----r--
puce_statut.php	11.94 KB	-rw----r--
queue.php	20.62 KB	-rw----r--
recherche_to_array.php	8.15 KB	-rw----r--
rechercher.php	11.05 KB	-rw----r--
roles.php	12.12 KB	-rw----r--
rubriques.php	28.48 KB	-rw----r--
securiser_action.php	11.99 KB	-rw----r--
selectionner.php	5.27 KB	-rw----r--
session.php	21.59 KB	-rw----r--
simplexml_to_array.php	2.84 KB	-rw----r--
surligne.php	4.14 KB	-rw----r--
svg.php	19.55 KB	-rw----r--
texte.php	11.82 KB	-rw----r--
texte_mini.php	23.49 KB	-rw----r--
traduire.php	11.26 KB	-rw----r--
urls.php	11.05 KB	-rw----r--
utils.php	107.33 KB	-rw----r--
xml.php	7.47 KB	-rw----r--

Code Editor : meta.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.     *
\***************************************************************************/

/**
 * Gestion des meta de configuration
 *
 * @package SPIP\Core\Configuration
 **/

if (!defined('_ECRIRE_INC_VERSION')) {
	return;
}

// Les parametres generaux du site sont dans une table SQL;
// Recopie dans le tableau PHP global meta, car on en a souvent besoin

// duree maximale du cache. Le double pour l'antidater
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);

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

// 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
// pour eviter l'erreur fatale (serveur non encore configure)

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 (
			!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));
			}
		}
	}

return $GLOBALS[$table] ?? null;
}

/**
 * Mettre en cache la liste des meta, sauf les valeurs sensibles
 * pour qu'elles ne soient pas visibiles dans un fichier (souvent en 777)
 *
 * @param bool|int $antidate
 *      Date de modification du fichier à appliquer si indiqué (timestamp)
 * @param string $table
 *      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));
	}
}

/**
 * Supprime une meta
 *
 * @see ecrire_config()
 * @see effacer_config()
 * @see lire_config()
 *
 * @param string $nom
 *     Nom de la meta
 * @param string $table
 *     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;
	}
}

/**
 * Met à jour ou crée une meta avec la clé et la valeur indiquée
 *
 * @see ecrire_config()
 * @see effacer_config()
 * @see lire_config()
 *
 * @param string $nom
 *     Nom de la meta
 * @param string $valeur
 *     Valeur à enregistrer
 * @param string|null $importable
 *     Cette meta s'importe-elle avec une restauration de sauvegarde ?
 *     'oui' ou 'non'
 * @param string $table
 *     Table SQL d'enregistrement de la meta.
 **/
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;

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

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

/**
 * Retourne le nom du fichier cache d'une table SQL de meta
 *
 * @param string $table
 *     Table SQL d'enregistrement des meta.
 * @return string
 *     Nom du fichier cache
 **/
function cache_meta($table = 'meta') {
	return ($table == 'meta') ? _FILE_META : (_DIR_CACHE . $table . '.php');
}

/**
 * Installer une table de configuration supplementaire
 *
 * @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);
}

/**
 * Supprimer une table de configuration supplémentaire
 *
 * Si $force=true, on ne verifie pas qu'elle est bien vide
 *
 * @param string $table
 * @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");

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

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

${this.title}

Code Editor : meta.php