3 /***************************************************************************\
4 * SPIP, Systeme de publication pour l'internet *
6 * Copyright (c) 2001-2014 *
7 * Arnaud Martin, Antoine Pitrou, Philippe Riviere, Emmanuel Saint-James *
9 * Ce programme est un logiciel libre distribue sous licence GNU/GPL. *
10 * Pour plus de details voir le fichier COPYING.txt ou l'aide en ligne. *
11 \***************************************************************************/
13 if (!defined('_ECRIRE_INC_VERSION')) return;
15 function formulaires_configurer_metas_charger_dist($form)
17 $f = charger_fonction('charger', "formulaires/$form", true);
21 $infos = formulaires_configurer_metas_infos($form);
22 if (!is_array($infos)) return $infos;
23 return $GLOBALS[$infos['meta']];
27 function formulaires_configurer_metas_verifier_dist($form)
29 $f = charger_fonction('verifier', "formulaires/$form", true);
30 return $f ?
$f($form) : array();
33 function formulaires_configurer_metas_traiter_dist($form)
35 $f = charger_fonction('traiter', "formulaires/$form", true);
39 $infos = formulaires_configurer_metas_infos($form);
40 if (!is_array($infos)) return $infos; // fait ci-dessus en fait
41 $vars = formulaires_configurer_metas_recense($infos['path'], PREG_PATTERN_ORDER
);
42 $meta = $infos['meta'];
43 foreach (array_unique($vars[2]) as $k) {
45 ecrire_meta($k, is_array($v) ?
serialise($v) : $v, 'oui', $meta);
47 return !isset($infos['prefix']) ?
array()
48 : array('redirect' => generer_url_ecrire($infos['prefix']));
52 // version amelioree de la RegExp de cfg_formulaire.
53 define('_EXTRAIRE_SAISIES',
54 '#<(select|textarea|input)[^>]*\sname=["\'](\w+)(\[\w*\])?["\'](?: class=["\']([^\'"]*)["\'])?( multiple=)?[^>]*?>#ims');
56 // determiner la liste des noms des saisies d'un formulaire
57 // (a refaire avec SAX)
58 function formulaires_configurer_metas_recense($form, $opt='')
60 if (!$opt) $opt = PREG_SET_ORDER
;
61 $f = file_get_contents($form);
62 if ($f AND preg_match_all(_EXTRAIRE_SAISIES
, $f, $r, $opt))
67 // Repertoires potentiels des plugins, ce serait bien d'avoir ça ailleurs
68 // ca n'est pas lie a cette balise
69 // Attention a l'ordre:
70 // si l'un des 3 est un sous-rep d'un autre, le mettre avant.
72 define('_EXTRAIRE_PLUGIN', '@(' . _DIR_PLUGINS_AUTO
. '|' . _DIR_PLUGINS
. '|' . _DIR_PLUGINS_DIST
.')/?([^/]+)/@');
74 // Recuperer la version compilee de plugin.xml et normaliser
75 // Si ce n'est pas un plugin, dire qu'il faut prendre la table std des meta.
76 function formulaires_configurer_metas_infos($form){
78 $path = find_in_path($form.'.' . _EXTENSION_SQUELETTES
, 'formulaires/');
79 if (!$path) return ''; // cas traite en amont normalement.
80 if (!preg_match(_EXTRAIRE_PLUGIN
, $path, $m))
81 return array('path' => $path, 'meta' => 'meta');
83 $get_infos = charger_fonction('get_infos','plugins');
84 $infos = $get_infos($plugin, false, $m[1]);
85 if (!is_array($infos)) return _T('erreur_plugin_nom_manquant');
86 if (isset($infos['erreur'])) return $infos['erreur'][0];
87 $prefix = $infos['prefix'];
88 $infos['path'] = $path;
89 if (!isset($infos['meta'])) $infos['meta'] = ($prefix . '_metas');