source: spip-zone/_squelettes_/zpip-dist/branches/zpip_v1/z_pipelines.php @ 104264

Last change on this file since 104264 was 104264, checked in by spip.franck@…, 3 years ago

code.spip.net est maintenant en https, j'ajoute donc le "s" à http

File size: 9.9 KB
Line 
1<?php
2/*
3 * Plugin Zpip
4 * (c) 2008-2010 Cedric MORIN Yterium.net
5 * Distribue sous licence GPL
6 *
7 */
8
9if (!defined("_ECRIRE_INC_VERSION")) return;
10
11// demander a SPIP de definir 'type' dans le contexte du premier squelette
12define('_DEFINIR_CONTEXTE_TYPE',true);
13// verifier une seule fois que l'on peut utiliser APL si demande
14if (defined('_Z_AJAX_PARALLEL_LOAD')) {
15        if (_request('var_zapl')=='non') {
16                include_spip('inc/cookie');
17                spip_setcookie('no_zapl',$_COOKIE['no_zapl']='no_zapl');
18        }
19        if (!isset($_COOKIE['no_zapl'])
20         AND !_IS_BOT
21         AND !_request('var_zajax')
22         AND _request('var_mode')!=="debug"
23         AND $_SERVER['REQUEST_METHOD'] == 'GET'
24         ) {
25                define('_Z_AJAX_PARALLEL_LOAD_OK',true);
26                $GLOBALS['marqueur'] .= ":Zapl";
27        }
28}
29
30/**
31 * Inutilise mais permet le chargement de ce fichier avant le decodage des urls
32 * et l'utilisation de _DEFINIR_CONTEXTE_TYPE
33 * @param array $flux
34 * @return array
35 */
36function Z_declarer_url_objets($flux){
37        return $flux;
38}
39
40/**
41 * Fonction Page automatique a partir de contenu/page-xx
42 *
43 * @param array $flux
44 * @return array
45 */
46function Z_styliser($flux){
47        $z_blocs = isset($GLOBALS['z_blocs'])?$GLOBALS['z_blocs']:array('contenu','navigation','extra','head');
48        $z_contenu = reset($z_blocs); // contenu par defaut
49
50        $squelette = $flux['data'];
51        $fond = $flux['args']['fond'];
52        $ext = $flux['args']['ext'];
53
54        // Ajax Parallel loading : ne pas calculer le bloc, mais renvoyer un js qui le loadera an ajax
55        if (defined('_Z_AJAX_PARALLEL_LOAD_OK')
56          AND $dir = explode('/',$fond)
57          AND count($dir)==2 // pas un sous repertoire
58          AND $dir = reset($dir)
59          AND in_array($dir,$z_blocs) // verifier deja qu'on est dans un bloc Z
60          AND in_array($dir,explode(',',_Z_AJAX_PARALLEL_LOAD)) // et dans un demande en APL
61          AND $pipe = find_in_path("$dir/z_apl.$ext") // et qui contient le squelette APL
62          ){
63                $flux['data'] = substr($pipe, 0, - strlen(".$ext"));
64                return $flux;
65        }
66
67        // gerer les squelettes non trouves
68        // -> router vers les /dist.html
69        // ou scaffolding ou page automatique les contenus
70        if (!$squelette){
71
72                // Cas de figure où on a déclaré type-composition.html dans un bloc, mais où type.html n'existe pas
73                if (isset($flux['args']['contexte']['composition'])
74                  AND $dir = explode('/',$fond)
75                  AND $dir = reset($dir)
76                  AND in_array($dir,$z_blocs)
77                  AND $f=find_in_path($fond."-".$flux['args']['contexte']['composition'].".$ext")){
78                        $flux['data'] = substr($f,0,-strlen(".$ext"));
79                }
80
81                // si on est sur un ?page=XX non trouve
82                elseif ((isset($flux['args']['contexte'][_SPIP_PAGE]) and $flux['args']['contexte'][_SPIP_PAGE] == $fond) OR (isset($flux['args']['contexte']['type']) and $flux['args']['contexte']['type'] == $fond)) {
83                        // si c'est un objet spip, associe a une table, utiliser le fond homonyme
84                        if (z_scaffoldable($fond)){
85                                $flux['data'] = substr(find_in_path("objet.$ext"), 0, - strlen(".$ext"));
86                        }
87                        // sinon, brancher sur contenu/page-xx si elle existe
88                        // si on est sur un ?page=XX non trouve
89                        elseif ($flux['args']['contexte'][_SPIP_PAGE] == $fond) {
90                                $base = "$z_contenu/page-".$fond.".".$ext;
91                                if ($base = find_in_path($base)){
92                                        $flux['data'] = substr(find_in_path("page.$ext"), 0, - strlen(".$ext"));
93                                }
94                        }
95                }
96
97                // scaffolding :
98                // si c'est un fond de contenu d'un objet en base
99                // generer un fond automatique a la volee pour les webmestres
100                elseif (strncmp($fond, "$z_contenu/", strlen($z_contenu)+1)==0
101                  AND include_spip('inc/autoriser')
102                  AND isset($GLOBALS['visiteur_session']['id_auteur']) // performance
103                  AND autoriser('webmestre')){
104                  $type = substr($fond,strlen($z_contenu)+1);
105                        if ($is = z_scaffoldable($type))
106                                $flux['data'] = z_scaffolding($type,$is[0],$is[1],$is[2],$ext);
107                }
108               
109                // sinon, si on demande un fond non trouve dans un des autres blocs
110                // et si il y a bien un contenu correspondant ou scaffoldable
111                // se rabbatre sur le dist.html du bloc concerne
112                else{
113                        if ( $dir = explode('/',$fond)
114                          AND $dir = reset($dir)
115                          AND $dir !== $z_contenu
116                          AND in_array($dir,$z_blocs)){
117                                $type = substr($fond,strlen("$dir/"));
118                                if (find_in_path("$z_contenu/$type.$ext") OR z_scaffoldable($type))
119                                        $flux['data'] = substr(find_in_path("$dir/dist.$ext"), 0, - strlen(".$ext"));
120                        }
121                }
122                $squelette = $flux['data'];
123        }
124        if ($fond=='body' AND substr($squelette,-strlen($fond))==$fond){
125                if (isset($flux['args']['contexte']['type'])
126                  AND (
127                        (isset($flux['args']['contexte']['composition'])
128                        AND file_exists(($f=$squelette."-".$flux['args']['contexte']['type']."-".$flux['args']['contexte']['composition']).".$ext"))
129                        OR
130                        file_exists(($f=$squelette."-".$flux['args']['contexte']['type']).".$ext")
131                  ))
132                        $flux['data'] = $f;
133        }
134        // chercher le fond correspondant a la composition
135        elseif (isset($flux['args']['contexte']['composition'])
136          AND substr($squelette,-strlen($fond))==$fond
137          AND $dir = explode('/',$fond)
138          AND $dir = reset($dir)
139          AND in_array($dir,$z_blocs)
140          AND $f=find_in_path($fond."-".$flux['args']['contexte']['composition'].".$ext")){
141                $flux['data'] = substr($f,0,-strlen(".$ext"));
142        }
143        return $flux;
144}
145
146
147/**
148 * Tester si un type est scaffoldable
149 * cad si il correspond bien a un objet en base
150 *
151 * @staticvar array $scaffoldable
152 * @param string $type
153 * @return bool
154 */
155function z_scaffoldable($type){
156        static $scaffoldable = array();
157        if (isset($scaffoldable[$type]))
158                return $scaffoldable[$type];
159        if (preg_match(',[^\w],',$type))
160                return $scaffoldable[$type] = false;
161        if ($table = table_objet($type)
162          AND $type == objet_type($table)
163          AND $trouver_table = charger_fonction('trouver_table','base')
164          AND
165                ($desc = $trouver_table($table)
166                OR $desc = $trouver_table($table_sql = $GLOBALS['table_prefix']."_$table"))
167                )
168                return $scaffoldable[$type] = array($table,$desc['table'],$desc);
169        else
170                return $scaffoldable[$type] = false;
171}
172
173
174/**
175 * Generer a la volee un fond a partir d'une table de contenu
176 *
177 * @param string $type
178 * @param string $table
179 * @param string $table_sql
180 * @param array $desc
181 * @param string $ext
182 * @return string
183 */
184function z_scaffolding($type,$table,$table_sql,$desc,$ext){
185        include_spip('public/interfaces');
186        $primary = id_table_objet($type);
187        if (!$primary AND isset($desc['key']["PRIMARY KEY"])){
188                $primary = $desc['key']["PRIMARY KEY"];
189        }
190
191        // reperer un titre
192        $titre = 'titre';
193        if (isset($GLOBALS['table_titre'][$table])){
194                $titre = explode(' ',$GLOBALS['table_titre'][$table]);
195                $titre = explode(',',reset($titre));
196                $titre = reset($titre);
197        }
198        if (isset($desc['field'][$titre])){
199                unset($desc['field'][$titre]);
200                $titre="<h1 class='h1 #EDIT{titre}'>#".strtoupper($titre)."</h1>";
201        }
202        else $titre="";
203
204        // reperer une date
205        $date = "date";
206        if (isset($GLOBALS['table_date'][$table]))
207                $date = $GLOBALS['table_date'][$table];
208        if (isset($desc['field'][$date])){
209                unset($desc['field'][$date]);
210                $date = strtoupper($date);
211                $date="<p class='info-publi'>[(#$date|nom_jour) ][(#$date|affdate)][, <span class='auteurs'><:par_auteur:> (#LESAUTEURS)</span>]</p>";
212        }
213        else $date = "";
214
215        $content = array();
216        foreach($desc['field'] as $champ=>$z){
217                if (!in_array($champ,array('maj','statut','idx',$primary))){
218                        $content[] = "[<div><strong>$champ</strong><div class='#EDIT{".$champ."} $champ'>(#".strtoupper($champ)."|image_reduire{500,0})</div></div>]";
219                }
220        }
221        $content = implode("\n\t",$content);
222
223        $scaffold = "#CACHE{0}
224<BOUCLE_contenu($table_sql){".$primary."}>
225[(#REM) Fil d'Ariane ]
226<p id='hierarchie'><a href='#URL_SITE_SPIP/'><:accueil_site:></a>[ &gt; <strong class='on'>(#TITRE|couper{80})</strong>]</p>
227
228<div class='contenu-principal'>
229        <div class='cartouche'>
230                $titre
231                $date
232        </div>
233
234        $content
235
236</div>
237
238[<div class='notes surlignable'><h2 class='h2 pas_surlignable'><:info_notes:></h2>(#NOTES)</div>]
239</BOUCLE_contenu>";
240
241        $dir = sous_repertoire(_DIR_CACHE,"scaffold",false);
242        $dir = sous_repertoire($dir,"contenu",false);
243        $f = $dir."$type";
244        ecrire_fichier("$f.$ext",$scaffold);
245        return $f;
246}
247
248
249
250/**
251 * Surcharger les intertires avant que le core ne les utilise
252 * pour y mettre la class h3
253 * une seule fois suffit !
254 *
255 * @param string $flux
256 * @return string
257 */
258function Z_pre_propre($flux){
259        static $init = false;
260        if (!$init){
261                if (isset($GLOBALS['debut_intertitre']) and $GLOBALS['debut_intertitre']){
262                        $intertitre = $GLOBALS['debut_intertitre'];
263                        $class = extraire_attribut($GLOBALS['debut_intertitre'],'class');
264                        $class = ($class ? " $class":"");
265                        $GLOBALS['debut_intertitre'] = inserer_attribut($GLOBALS['debut_intertitre'], 'class', "h3$class");
266                        foreach($GLOBALS['spip_raccourcis_typo'] as $k=>$v){
267                                $GLOBALS['spip_raccourcis_typo'][$k] = str_replace($intertitre,$GLOBALS['debut_intertitre'],$GLOBALS['spip_raccourcis_typo'][$k]);
268                        }
269                }
270                else {
271                        $GLOBALS['debut_intertitre'] = '<h3 class="h3 spip">';
272                        $GLOBALS['fin_intertitre'] = '</h3>';
273                }
274                $init = true;
275        }
276        return $flux;
277}
278
279/**
280 * Ajouter le inc-insert-head du theme si il existe
281 *
282 * @param string $flux
283 * @return string
284 */
285function Z_insert_head($flux){
286        if (find_in_path('inc-insert-head.html')){
287                $flux .= recuperer_fond('inc-insert-head',array());
288        }
289        return $flux;
290}
291
292//
293// fonction standard de calcul de la balise #INTRODUCTION
294// mais retourne toujours dans un <p> comme propre
295//
296// https://code.spip.net/@filtre_introduction_dist
297if (!function_exists('filtre_introduction')){ // securite
298function filtre_introduction($descriptif, $texte, $longueur, $connect) {
299        include_spip('public/composer');
300        $texte = filtre_introduction_dist($descriptif, $texte, $longueur, $connect);
301
302        if ($GLOBALS['toujours_paragrapher'] AND strpos($texte,"</p>")===FALSE)
303                // Fermer les paragraphes ; mais ne pas en creer si un seul
304                $texte = paragrapher($texte, $GLOBALS['toujours_paragrapher']);
305
306        return $texte;
307}
308}
309
310/**
311 * Tester la presence sur une page
312 * @param object $p
313 * @return object
314 */
315if (!function_exists('balise_SI_PAGE_dist')){
316function balise_SI_PAGE_dist($p) {
317        $_page = interprete_argument_balise(1,$p);
318        $p->code = "(((\$Pile[0][_SPIP_PAGE]==(\$zp=$_page)) OR (\$Pile[0]['composition']==\$zp AND \$Pile[0]['type']=='page'))?' ':'')";
319        $p->interdire_scripts = false;
320        return $p;
321}
322}
323?>
Note: See TracBrowser for help on using the repository browser.