Gecko [ www.quelfutur.org ]

Name	Size	Permission
.mad-root	0 B	-rw-r--r--
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--
pwnkit	0 B	-rwxr-xr-x
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 : cvt_configurer.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.     *
\***************************************************************************/

/**
 * Les formulaires CVT de configuration.
 *
 * Prendre en compte les `#FORMULAIRE_CONFIGURER_XX`
 * dans les squelettes de SPIP
 *
 * @package SPIP\Core\Formulaires\CVT\Configurer
 */

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

include_spip('inc/config');

/**
 * Proposer un chargement par defaut pour les #FORMULAIRE_CONFIGURER_XXX
 *
 * @param array $flux
 * @return array|false
 */
function cvtconf_formulaire_charger($flux) {
	if (
		$form = $flux['args']['form']
		and strncmp($form, 'configurer_', 11) == 0 // un #FORMULAIRE_CONFIGURER_XXX
	) {
		// Pour tous les formulaires CONFIGURER, ayant une fonction charger ou pas, on teste si autorisé
		include_spip('inc/autoriser');
		if (!autoriser('configurer', '_' . substr($form, 11))) {
			return false;
		}

// S'il n'y a pas de fonction charger(), on génère un contexte automatiquement
		if (!charger_fonction('charger', "formulaires/$form/", true)) {
			$flux['data'] = cvtconf_formulaires_configurer_recense($form);
			$flux['data']['editable'] = true;
			if (_request('var_mode') == 'configurer' and autoriser('webmestre')) {
				if (!_AJAX) {
					var_dump($flux['data']);
				}
				// reinjecter pour la trace au traitement
				$flux['data']['_hidden'] = "<input type='hidden' name='var_mode' value='configurer'>";
			}
		}
	}

return $flux;
}

/**
 * Proposer un traitement par defaut pour les #FORMULAIRE_CONFIGURER_XXX
 *
 * @param array $flux
 * @return array
 */
function cvtconf_formulaire_traiter($flux) {
	if (
		$form = $flux['args']['form']
		and strncmp($form, 'configurer_', 11) == 0 // un #FORMULAIRE_CONFIGURER_XXX
		and !charger_fonction('traiter', "formulaires/$form/", true) // sans fonction traiter()
	) {
		$trace = cvtconf_formulaires_configurer_enregistre($form, $flux['args']['args']);
		$flux['data'] = ['message_ok' => _T('config_info_enregistree') . $trace, 'editable' => true];
	}

return $flux;
}

/**
 * Enregistrer les donnees d'un formulaire $form appele avec les arguments $args
 * Cette fonction peut etre appellee manuellement et explicitement depuis la fonction traiter()
 * d'un formulaire configurer_xxx dont on veut personaliser le traitement
 * sans reecrire le stockage des donnees
 *
 * @param string $form
 *   nom du formulaire "configurer_xxx"
 * @param array $args
 *   arguments de l'appel de la fonction traiter ($args = func_get_args();)
 * @return string
 */
function cvtconf_formulaires_configurer_enregistre($form, $args) {
	$valeurs = [];
	// charger les valeurs
	// ce qui permet de prendre en charge une fonction charger() existante
	// qui prend alors la main sur l'auto detection
	if ($charger_valeurs = charger_fonction('charger', "formulaires/$form/", true)) {
		$valeurs = $charger_valeurs(...$args);
	}
	$valeurs = pipeline(
		'formulaire_charger',
		[
			'args' => ['form' => $form, 'args' => $args, 'je_suis_poste' => false],
			'data' => $valeurs
		]
	);
	// ne pas stocker editable !
	unset($valeurs['editable']);

// recuperer les valeurs postees
	$store = [];
	foreach ($valeurs as $k => $v) {
		if (substr($k, 0, 1) !== '_') {
			$store[$k] = _request($k);
		}
	}

return cvtconf_configurer_stocker($form, $valeurs, $store);
}

/**
 * Définir la règle de conteneur, en fonction de la présence de certaines données
 *
 * - `_meta_table` : nom de la table `spip_metas` ou stocker (par défaut 'meta')
 * - `_meta_casier` : nom du casier dans lequel sérialiser (par défaut xx de `formulaire_configurer_xx`)
 * - `_meta_prefixe` : préfixer les `meta` (alternative au casier) dans la table des meta (par defaur rien)
 * - `_meta_stockage` : Méthode externe de stockage. Aucune n'est fournie par le core.
 *
 * @param string $form
 * @param array $valeurs
 * @return array
 */
function cvtconf_definir_configurer_conteneur($form, $valeurs) {
	// stocker en base
	// par defaut, dans un casier serialize dans spip_meta (idem CFG)
	$casier = substr($form, 11);
	$table = 'meta';
	$prefixe = '';
	$stockage = '';

if (isset($valeurs['_meta_casier'])) {
		$casier = $valeurs['_meta_casier'];
	}
	if (isset($valeurs['_meta_prefixe'])) {
		$prefixe = $valeurs['_meta_prefixe'];
	}
	if (isset($valeurs['_meta_stockage'])) {
		$stockage = $valeurs['_meta_stockage'] . '::';
	}

// si on indique juste une table, il faut vider les autres proprietes
	// car par defaut on utilise ni casier ni prefixe dans ce cas
	if (isset($valeurs['_meta_table'])) {
		$table = $valeurs['_meta_table'];
		$casier = ($valeurs['_meta_casier'] ?? '');
	}

return [$table, $casier, $prefixe, $stockage];
}

/**
 * Retrouver les champs d'un formulaire en parcourant son squelette
 * et en extrayant les balises input, textarea, select
 *
 * @param string $form
 * @return array
 */
function cvtconf_formulaires_configurer_recense($form) {
	$valeurs = ['editable' => ' '];

// sinon cas analyse du squelette
	if (
		$f = find_in_path($form . '.' . _EXTENSION_SQUELETTES, 'formulaires/')
		and lire_fichier($f, $contenu)
	) {
		for ($i = 0; $i < 2; $i++) {
			// a la seconde iteration, evaluer le fond avec les valeurs deja trouvees
			// permet de trouver aussi les name="#GET{truc}"
			if ($i == 1) {
				$contenu = recuperer_fond("formulaires/$form", $valeurs);
			}

$balises = array_merge(
				extraire_balises($contenu, 'input'),
				extraire_balises($contenu, 'textarea'),
				extraire_balises($contenu, 'select')
			);

foreach ($balises as $b) {
				if (
					$n = extraire_attribut($b, 'name')
					and preg_match(',^([\w\-]+)(\[\w*\])?$,', $n, $r)
					and !in_array($n, ['formulaire_action', 'formulaire_action_args', 'formulaire_action_sign'])
					and extraire_attribut($b, 'type') !== 'submit'
				) {
					$valeurs[$r[1]] = '';
					// recuperer les valeurs _meta_xx qui peuvent etre fournies
					// en input hidden dans le squelette
					if (strncmp($r[1], '_meta_', 6) == 0) {
						$valeurs[$r[1]] = extraire_attribut($b, 'value');
					}
				}
			}
		}
	}

cvtconf_configurer_lire_meta($form, $valeurs);

return $valeurs;
}

/**
 * Stocker les metas
 *
 * @param string $form
 * @param array $valeurs
 * @param array $store
 * @return string
 */
function cvtconf_configurer_stocker($form, $valeurs, $store) {
	$trace = '';
	[$table, $casier, $prefixe, $stockage] = cvtconf_definir_configurer_conteneur($form, $valeurs);
	// stocker en base
	// par defaut, dans un casier serialize dans spip_meta (idem CFG)
	if (!isset($GLOBALS[$table])) {
		lire_metas($table);
	}

$prefixe = ($prefixe ? $prefixe . '_' : '');
	$table = ($table) ? "/$table/" : '';
	$casier = ($casier) ? rtrim($casier, '/') . '/' : ''; // slash final, sinon rien

foreach ($store as $k => $v) {
		ecrire_config("$stockage$table$prefixe$casier$k", $v);
		if (_request('var_mode') == 'configurer' and autoriser('webmestre')) {
			$trace .= "<br>table $table : " . $prefixe . $k . " = $v;";
		}
	}

return $trace;
}

/**
 * Lecture en base des metas d'un form
 *
 * @param string $form
 * @param array $valeurs
 */
function cvtconf_configurer_lire_meta($form, &$valeurs) {
	[$table, $casier, $prefixe, $stockage] = cvtconf_definir_configurer_conteneur($form, $valeurs);

$table = ($table) ? "/$table/" : '';
	$prefixe = ($prefixe ? $prefixe . '_' : '');
	if ($casier) {
		$meta = lire_config("$stockage$table$prefixe$casier");
		$prefixe = '';
	} else {
		$table = rtrim($table, '/');
		$meta = lire_config("$stockage$table");
	}

foreach ($valeurs as $k => $v) {
		if (substr($k, 0, 1) !== '_') {
			$valeurs[$k] = ($meta[$prefixe . $k] ?? null);
		}
	}
}

${this.title}

Code Editor : cvt_configurer.php