[SPIP] +spip v3.0.17

[lhc/web/clavette_www.git] / www / plugins-dist / petitions / petitions_fonctions.php

diff --git a/www/plugins-dist/petitions/petitions_fonctions.php b/www/plugins-dist/petitions/petitions_fonctions.php
new file mode 100644 (file)
index 0000000..a3a9356
--- /dev/null
+++ b/www/plugins-dist/petitions/petitions_fonctions.php
@@ -0,0 +1,63 @@
+<?php
+
+/***************************************************************************\
+ *  SPIP, Systeme de publication pour l'internet                           *
+ *                                                                         *
+ *  Copyright (c) 2001-2014                                                *
+ *  Arnaud Martin, Antoine Pitrou, Philippe Riviere, Emmanuel Saint-James  *
+ *                                                                         *
+ *  Ce programme est un logiciel libre distribue sous licence GNU/GPL.     *
+ *  Pour plus de details voir le fichier COPYING.txt ou l'aide en ligne.   *
+\***************************************************************************/
+
+if (!defined('_ECRIRE_INC_VERSION')) return;
+
+/**
+ * #PETITION
+ * retourne '' si l'article courant n'a pas de petition
+ * le texte de celle-ci sinon (et ' ' si il est vide)
+ * cf FORMULAIRE_PETITION
+ *
+ * http://doc.spip.org/@balise_PETITION_dist
+ *
+ * @param $p
+ * @return
+ */
+function balise_PETITION_dist ($p) {
+       $nom = $p->id_boucle;
+       $p->code = "quete_petitions(" .
+                       champ_sql('id_article', $p) .
+                       ",'" .
+                       $p->boucles[$nom]->type_requete .
+                       "','" .
+                       $nom .
+                       "','" .
+                       $p->boucles[$nom]->sql_serveur .
+                       "', \$Cache)";
+       $p->interdire_scripts = false;
+       return $p;
+}
+
+if(!function_exists('quete_petitions')) {
+/**
+ * retourne le champ 'texte' d'une petition
+ *
+ * @param int $id_article
+ * @param string $table
+ * @param string $id_boucle
+ * @param string $serveur
+ * @param array $cache
+ * @return array|bool|null|string
+ */
+function quete_petitions($id_article, $table, $id_boucle, $serveur, &$cache) {
+       $retour = sql_getfetsel('texte', 'spip_petitions',("id_article=".intval($id_article)),'',array(),'','', $serveur);
+
+       if ($retour === NULL) return '';
+       # cette page est invalidee par toute petition
+       $cache['varia']['pet'.$id_article] = 1;
+       # ne pas retourner '' car le texte sert aussi de presence
+       return $retour ? $retour : ' ';
+}
+}
+
+?>
\ No newline at end of file