source: spip-zone/_plugins_/spip-bonux-3/public/spip_bonux_balises.php @ 65543

Last change on this file since 65543 was 65543, checked in by marcimat@…, 9 years ago

Notices PHP sur #SET_PUSH et #SET_MERGE lors de l'utilisation de Formidable.

  • corrections d'indéfinis et de array to string conversion
File size: 3.8 KB
Line 
1<?php
2/**
3 * Plugin Spip-Bonux
4 * Le plugin qui lave plus SPIP que SPIP
5 * (c) 2008 Mathieu Marcillaud, Cedric Morin, Romy Tetue
6 * Licence GPL
7 *
8 */
9
10if (!defined('_ECRIRE_INC_VERSION')) return;
11
12/**
13 * Empile un element dans un tableau declare par #SET{tableau,#ARRAY}
14 * #SET_PUSH{tableau,valeur}
15 *
16 * @param Champ $p : objet balise
17 * @return Champ
18 *     La balise ne retourne rien ("")
19**/
20function balise_SET_PUSH_dist($p){
21        $_nom = interprete_argument_balise(1,$p);
22        $_valeur = interprete_argument_balise(2,$p);
23
24        if ($_nom AND $_valeur)
25                // si le tableau n'existe pas encore, on le cree
26                // on ajoute la valeur ensuite (sans passer par array_push)
27                $p->code = "vide((\$cle=$_nom)
28                        . vide((!isset(\$Pile['vars'][\$cle]) OR !is_array(\$Pile['vars'][\$cle]))?\$Pile['vars'][\$cle]=array():'')
29                        . vide(\$Pile['vars'][\$cle][]=$_valeur))";
30        else
31                $p->code = "''";
32
33        $p->interdire_scripts = false; // la balise ne renvoie rien
34        return $p;
35}
36
37/**
38 * Si 3 arguments : Cree un tableau nom_tableau de t1 + t2
39 * #SET_MERGE{nom_tableau,t1,t2}
40 * #SET_MERGE{nom_tableau,#GET{tableau},#ARRAY{cle,valeur}}
41 *
42 * Si 2 arguments : Merge t1 dans nom_tableau
43 * #SET_MERGE{nom_tableau,t1}
44 * #SET_MERGE{nom_tableau,#GET{tableau}}
45 *
46 * @param Champ $p : objet balise
47 * @return Champ
48 *     La balise ne retourne rien ("")
49**/
50function balise_SET_MERGE_dist($p){
51        $_nom = interprete_argument_balise(1,$p);
52        $_t1 = interprete_argument_balise(2,$p);
53        $_t2 = interprete_argument_balise(3,$p);
54
55        if ($_nom AND $_t1 AND !$_t2)
56                // 2 arguments : merge de $_nom et $_t1 dans $_nom
57                // si le tableau n'existe pas encore, on le cree
58                $p->code = "vide((\$cle=$_nom)
59                        . vide((!isset(\$Pile['vars'][\$cle]) OR !is_array(\$Pile['vars'][\$cle]))?\$Pile['vars'][\$cle]=array():'')
60                        . vide(is_array(\$new=$_t1)?'':\$new=array(\$new))
61                        . vide(\$Pile['vars'][\$cle] = array_merge(\$Pile['vars'][\$cle],\$new)))";
62        elseif ($_nom AND $_t1 AND $_t2)
63                // 3 arguments : merge de $_t1 et $_t2 dans $_nom
64                // si le tableau n'existe pas encore, on le cree
65                $p->code = "vide((\$cle=$_nom)
66                        . vide((!isset(\$Pile['vars'][\$cle]) OR !is_array(\$Pile['vars'][\$cle]))?\$Pile['vars'][\$cle]=array():'')
67                        . vide(is_array(\$new1=$_t1)?'':\$new1=array(\$new1))
68                        . vide(is_array(\$new2=$_t2)?'':\$new2=array(\$new2))
69                        . vide(\$Pile['vars'][\$cle] = array_merge(\$new1,\$new2)))";
70        else
71                $p->code = "''";
72
73        $p->interdire_scripts = false; // la balise ne renvoie rien
74        return $p;
75}
76
77/**
78 * Balise #COMPTEUR associee au critere compteur
79 *
80 * @param Champ $p
81 * @return Champ
82 */
83function balise_COMPTEUR_dist($p) {
84        calculer_balise_criteres('compteur', $p);
85        if ($p->code=="''")
86                calculer_balise_criteres('compteur', $p, "compteur_left");
87        return $p;
88}
89
90/** Balise #SOMME associee au critere somme */
91function balise_SOMME_dist($p) {
92        return calculer_balise_criteres('somme', $p);
93}
94
95/** Balise #COMPTE associee au critere compte */
96function balise_COMPTE_dist($p) {
97        return calculer_balise_criteres('compte', $p);
98}
99
100/** Balise #MOYENNE associee au critere moyenne */
101function balise_MOYENNE_dist($p) {
102        return calculer_balise_criteres('moyenne', $p);
103}
104
105/** Balise #MINIMUM associee au critere moyenne */
106function balise_MINIMUM_dist($p) {
107        return calculer_balise_criteres('minimum', $p);
108}
109
110/** Balise #MAXIMUM associee au critere moyenne */
111function balise_MAXIMUM_dist($p) {
112        return calculer_balise_criteres('maximum', $p);
113}
114
115/** Balise #STATS associee au critere stats
116 * #STATS{id_article,moyenne}
117 */
118function balise_STATS_dist($p) {
119        if (isset($p->param[0][2][0])
120        AND $nom = ($p->param[0][2][0]->texte)) {
121                return calculer_balise_criteres($nom, $p, 'stats');
122        }
123        return $p;
124}
125
126function calculer_balise_criteres($nom, $p, $motif="") {
127        $p->code = "''";
128        $motif = $motif ? $motif : $nom;
129        if (isset($p->param[0][1][0])
130        AND $champ = ($p->param[0][1][0]->texte)) {
131                return rindex_pile($p, $nom."_$champ", $motif);
132        }
133  return $p;
134}
135
136?>
Note: See TracBrowser for help on using the repository browser.