[SPIP] ~maj v3.0.14-->v3.0.17
[ptitvelo/web/www.git] / www / ecrire / balise / formulaire_admin.php
1 <?php
2
3 /***************************************************************************\
4 * SPIP, Systeme de publication pour l'internet *
5 * *
6 * Copyright (c) 2001-2014 *
7 * Arnaud Martin, Antoine Pitrou, Philippe Riviere, Emmanuel Saint-James *
8 * *
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 \***************************************************************************/
12
13 if (!defined('_ECRIRE_INC_VERSION')) return;
14
15 // http://doc.spip.org/@balise_FORMULAIRE_ADMIN
16 function balise_FORMULAIRE_ADMIN ($p) {
17 return calculer_balise_dynamique($p,'FORMULAIRE_ADMIN', array());
18 }
19
20 # on ne peut rien dire au moment de l'execution du squelette
21
22 // http://doc.spip.org/@balise_FORMULAIRE_ADMIN_stat
23 function balise_FORMULAIRE_ADMIN_stat($args, $context_compil) {
24 return $args;
25 }
26
27 # les boutons admin sont mis d'autorite si absents
28 # donc une variable statique controle si FORMULAIRE_ADMIN a ete vu.
29 # Toutefois, si c'est le debuger qui appelle,
30 # il peut avoir recopie le code dans ses donnees et il faut le lui refounir.
31 # Pas question de recompiler: ca fait boucler !
32 # Le debuger transmet donc ses donnees, et cette balise y retrouve son petit.
33
34 // http://doc.spip.org/@balise_FORMULAIRE_ADMIN_dyn
35 function balise_FORMULAIRE_ADMIN_dyn($float='', $debug='') {
36
37 global $use_cache;
38 static $dejafait = false;
39
40 if (!@$_COOKIE['spip_admin'])
41 return '';
42
43 if (!is_array($debug)) {
44 if ($dejafait)
45 return '';
46 } else {
47 if ($dejafait) {
48 if (empty($debug['sourcefile'])) return '';
49 foreach($debug['sourcefile'] as $k => $v) {
50 if (strpos($v,'administration.') !== false)
51 return $debug['resultat'][$k . 'tout'];
52 }
53 return '';
54 }
55 }
56
57 include_spip('inc/autoriser');
58 include_spip('base/abstract_sql');
59
60
61 $dejafait = true;
62
63 // Preparer le #ENV des boutons
64
65 $env = admin_objet();
66
67 // Pas de "modifier ce..." ? -> donner "acces a l'espace prive"
68 if (!$env)
69 $env['ecrire'] = _DIR_RESTREINT_ABS;
70
71 $env['divclass'] = $float;
72 $env['lang'] = admin_lang();
73 $env['calcul'] = (_request('var_mode') ? 'recalcul' : 'calcul');
74 $env['debug'] = ((defined('_VAR_PREVIEW') AND _VAR_PREVIEW) ? "" : admin_debug());
75 $env['analyser'] = (!$env['debug'] AND !$GLOBALS['xhtml']) ? '' : admin_valider();
76 $env['inclure'] = ((defined('_VAR_INCLURE') AND _VAR_INCLURE)?'inclure':'');
77
78 if (!$use_cache)
79 $env['use_cache'] = ' *';
80
81 if (isset($debug['validation'])) {
82 $env['xhtml_error'] = $debug['validation'];
83 }
84
85 $env['_pipelines']['formulaire_admin']=array();
86
87 return array('formulaires/administration', 0, $env);
88 }
89
90 // Afficher le bouton 'Modifier ce...'
91 // s'il y a un $id_XXX defini globalement par spip_register_globals
92 // Attention a l'ordre dans la boucle:
93 // on ne veut pas la rubrique si un autre bouton est possible
94
95 // http://doc.spip.org/@admin_objet
96 function admin_objet()
97 {
98 include_spip('inc/urls');
99 $env = array();
100
101 $trouver_table = charger_fonction('trouver_table','base');
102 $objets = urls_liste_objets(false);
103 $objets = array_diff($objets, array('rubrique'));
104 $objets = array_reverse($objets);
105 array_unshift($objets, 'rubrique');
106 foreach ($objets as $obj) {
107 $type = $obj;
108 if ($type==objet_type($type,false)
109 AND $_id_type = id_table_objet($type)
110 AND isset($GLOBALS['contexte'][$_id_type])
111 AND $id = $GLOBALS['contexte'][$_id_type]
112 AND !is_array($id)
113 AND $id=intval($id)) {
114 $id = sql_getfetsel($_id_type, table_objet_sql($type), "$_id_type=".intval($id));
115 if ($id) {
116 $env[$_id_type] = $id;
117 $env['objet'] = $type;
118 $env['id_objet'] = $id;
119 $env['voir_'.$obj] =
120 str_replace('&amp;', '&', generer_url_entite($id,$obj,'','',false));
121 if ($desc = $trouver_table(table_objet_sql($type))
122 AND isset($desc['field']['id_rubrique'])
123 AND $type != 'rubrique') {
124 unset($env['id_rubrique']);
125 unset($env['voir_rubrique']);
126 if (admin_preview($type, $id, $desc))
127 $env['preview']=parametre_url(self(),'var_mode','preview','&');
128 }
129 }
130 }
131 }
132 return $env;
133 }
134
135
136 // http://doc.spip.org/@admin_preview
137 function admin_preview($type, $id, $desc=null)
138 {
139 if (defined('_VAR_PREVIEW') AND _VAR_PREVIEW) return '';
140
141 if (!$desc) {
142 $trouver_table = charger_fonction('trouver_table','base');
143 $desc = $trouver_table(table_objet_sql($type));
144 }
145 if (!$desc OR !isset($desc['field']['statut']))
146 return '';
147
148 include_spip('inc/autoriser');
149 if (!autoriser('previsualiser')) return '';
150
151 $notpub = sql_in("statut", array('prop', 'prive'));
152
153 if ($type == 'article' AND $GLOBALS['meta']['post_dates'] != 'oui')
154 $notpub .= " OR (statut='publie' AND date>".sql_quote(date('Y-m-d H:i:s')).")";
155
156 return sql_fetsel('1', table_objet_sql($type), id_table_objet($type)."=".$id." AND ($notpub)");
157 }
158
159 //
160 // Regler les boutons dans la langue de l'admin (sinon tant pis)
161 //
162
163 // http://doc.spip.org/@admin_lang
164 function admin_lang()
165 {
166 $alang = sql_getfetsel('lang', 'spip_auteurs', "login=" . sql_quote(preg_replace(',^@,','',@$_COOKIE['spip_admin'])));
167 if (!$alang) return '';
168
169 $l = lang_select($alang);
170 $alang = $GLOBALS['spip_lang'];
171 if ($l) lang_select();
172 return $alang;
173 }
174
175 // http://doc.spip.org/@admin_valider
176 function admin_valider()
177 {
178 global $xhtml;
179
180 return ((@$xhtml !== 'true') ?
181 (parametre_url(self(), 'var_mode', 'debug', '&')
182 .'&var_mode_affiche=validation') :
183 ('http://validator.w3.org/check?uri='
184 . rawurlencode("http://" . $_SERVER['HTTP_HOST'] . nettoyer_uri())));
185 }
186
187 // http://doc.spip.org/@admin_debug
188 function admin_debug()
189 {
190 return ((
191 (isset($GLOBALS['forcer_debug']) AND $GLOBALS['forcer_debug'])
192 OR (isset($GLOBALS['bouton_admin_debug']) AND $GLOBALS['bouton_admin_debug'])
193 OR (
194 defined('_VAR_MODE') AND _VAR_MODE == 'debug'
195 AND $_COOKIE['spip_debug']
196 )
197 ) AND autoriser('debug')
198 )
199 ? parametre_url(self(),'var_mode', 'debug', '&'): '';
200 }
201
202 ?>