www/plugins/formidable_1_0/formulaires/formidable.php

   1 <?php
   2
   3 /**
   4  * Gestion de l'affichage et traitement d'un formulaire Formidable
   5  *
   6  * @package SPIP\Formidable\Formulaires
   7 **/
   8
   9 // Sécurité
  10 if (!defined("_ECRIRE_INC_VERSION")) return;
  11
  12 include_spip('inc/formidable');
  13 include_spip('inc/saisies');
  14 include_spip('base/abstract_sql');
  15 include_spip('inc/autoriser');
  16
  17 /**
  18  * Chargement du formulaire CVT de Formidable.
  19  *
  20  * Genere le formulaire dont l'identifiant (numerique ou texte est indique)
  21  *
  22  * @param int|string $id_formulaire
  23  *     Identifiant numerique ou textuel du formulaire formidable
  24  * @param array $valeurs
  25  *     Valeurs par défauts passées au contexte du formulaire
  26  *     Exemple : array('hidden_1' => 3) pour que champ identifie "@hidden_1@" soit prerempli
  27  * @param int|bool $id_formulaires_reponse
  28  *     Identifiant d'une réponse pour forcer la reedition de cette reponse spécifique
  29  *
  30  * @return array
  31  *     Contexte envoyé au squelette HTML du formulaire.
  32 **/
  33 function formulaires_formidable_charger($id_formulaire, $valeurs=array(), $id_formulaires_reponse=false){
  34     $contexte = array();
  35
  36     // On peut donner soit un id soit un identifiant
  37     if (intval($id_formulaire) > 0)
  38         $where = 'id_formulaire = '.intval($id_formulaire);
  39     elseif (is_string($id_formulaire))
  40         $where = 'identifiant = '.sql_quote($id_formulaire);
  41     else
  42         return;
  43
  44     // On cherche si le formulaire existe
  45     if ($formulaire = sql_fetsel('*', 'spip_formulaires', $where)) {
  46         // On ajoute un point d'entrée avec les infos de ce formulaire
  47         // pour d'eventuels plugins qui en ont l'utilité
  48         $contexte['_formidable'] = $formulaire;
  49
  50         // Est-ce que la personne a le droit de répondre ?
  51         if (autoriser('repondre', 'formulaire', $formulaire['id_formulaire'], null, array('formulaire'=>$formulaire))){
  52             $saisies = unserialize($formulaire['saisies']);
  53             $traitements = unserialize($formulaire['traitements']);
  54
  55             // On déclare les champs avec les valeurs par défaut
  56             $contexte = array_merge(saisies_lister_valeurs_defaut($saisies), $contexte);
  57             $contexte['mechantrobot'] = '';
  58             // On ajoute le formulaire complet
  59             $contexte['_saisies'] = $saisies;
  60
  61             $contexte['id'] = $formulaire['id_formulaire'];
  62             $contexte['_hidden'] = '<input type="hidden" name="id_formulaire" value="'.$contexte['id'].'"/>';
  63
  64             // S'il y a des valeurs par défaut dans l'appel, alors on pré-remplit
  65             if ($valeurs){
  66                 // Si c'est une chaine on essaye de la parser
  67                 if (is_string($valeurs)){
  68                     $liste = explode(',', $valeurs);
  69                     $liste = array_map('trim', $liste);
  70                     $valeurs = array();
  71                     foreach ($liste as $i=>$cle_ou_valeur){
  72                         if ($i % 2 == 0)
  73                             $valeurs[$liste[$i]] = $liste[$i+1];
  74                     }
  75                 }
  76
  77                 // Si on a un tableau, alors on écrase avec les valeurs données depuis l'appel
  78                 if ($valeurs and is_array($valeurs)){
  79                     $contexte = array_merge($contexte, $valeurs);
  80                 }
  81             }
  82
  83             // Si on passe un identifiant de reponse, on edite cette reponse si elle existe
  84             if ($id_formulaires_reponse = intval($id_formulaires_reponse)) {
  85                 $contexte = formidable_definir_contexte_avec_reponse($contexte, $id_formulaires_reponse, $ok);
  86                 if ($ok) {
  87                     // On ajoute un hidden pour dire que c'est une modif
  88                     $contexte['_hidden'] .= "\n".'<input type="hidden" name="deja_enregistre_'.$formulaire['id_formulaire'].'" value="'.$id_formulaires_reponse.'"/>';
  89                 } else {
  90                     $contexte['editable'] = false;
  91                     $contexte['message_erreur'] = _T('formidable:traiter_enregistrement_erreur_edition_reponse_inexistante');
  92                 }
  93             } else {
  94
  95                 // calcul des paramètres d'anonymisation
  96                                 $options = isset($traitements['enregistrement']) ? $traitements['enregistrement'] : null;
  97
  98                 $anonymisation = (isset($options['anonymiser']) && $options['anonymiser'] == true)
  99                     ? isset($options['anonymiser_variable']) ? $options['anonymiser_variable'] : ''
 100                     : '';
 101
 102                 // Si multiple = non mais que c'est modifiable, alors on va chercher
 103                 // la dernière réponse si elle existe
 104                 if ($options
 105                     and !$options['multiple']
 106                     and $options['modifiable']
 107                     and $reponses = formidable_verifier_reponse_formulaire($formulaire['id_formulaire'], $options['identification'], $anonymisation)
 108                 ){
 109                     $id_formulaires_reponse = array_pop($reponses);
 110                     $contexte = formidable_definir_contexte_avec_reponse($contexte, $id_formulaires_reponse, $ok);
 111
 112                     // On ajoute un hidden pour dire que c'est une modif
 113                     $contexte['_hidden'] .= "\n".'<input type="hidden" name="deja_enregistre_'.$formulaire['id_formulaire'].'" value="'.$id_formulaires_reponse.'"/>';
 114                 }
 115
 116             }
 117         }
 118         else{
 119             $contexte['editable'] = false;
 120             // le formulaire a déjà été répondu.
 121             // peut être faut il afficher les statistiques des réponses
 122             if ($formulaire['apres'] == 'stats') {
 123                 // Nous sommes face à un sondage auquel on a déjà répondu !
 124                 // On remplace complètement l'affichage du formulaire
 125                 // par un affichage du résultat de sondage !
 126                 $contexte['_remplacer_formulaire'] = recuperer_fond('modeles/formulaire_analyse', array(
 127                     'id_formulaire' => $formulaire['id_formulaire'],
 128                 ));
 129             } else {
 130                 $contexte['message_erreur'] = _T('formidable:traiter_enregistrement_erreur_deja_repondu');
 131             }
 132         }
 133     }
 134     else{
 135         $contexte['editable'] = false;
 136         $contexte['message_erreur'] = _T('formidable:erreur_inexistant');
 137     }
 138     if (!isset($contexte['_hidden'])) {
 139         $contexte['_hidden'] = '';
 140     }
 141     $contexte['_hidden'] .= "\n".'<input type="hidden" name="formidable_afficher_apres'/*.$formulaire['id_formulaire']*/.'" value="'.$formulaire['apres'].'"/>';// marche pas
 142
 143     $contexte['formidable_afficher_apres']=$formulaire['apres'];
 144
 145     return $contexte;
 146 }
 147
 148
 149 /**
 150  * Vérification du formulaire CVT de Formidable.
 151  *
 152  * Pour chaque champ posté, effectue les vérifications demandées par
 153  * les saisies et retourne éventuellement les erreurs de saisie.
 154  *
 155  * @param int|string $id_formulaire
 156  *     Identifiant numerique ou textuel du formulaire formidable
 157  * @param array $valeurs
 158  *     Valeurs par défauts passées au contexte du formulaire
 159  *     Exemple : array('hidden_1' => 3) pour que champ identifie "@hidden_1@" soit prerempli
 160  * @param int|bool $id_formulaires_reponse
 161  *     Identifiant d'une réponse pour forcer la reedition de cette reponse spécifique
 162  *
 163  * @return array
 164  *     Tableau des erreurs
 165 **/
 166 function formulaires_formidable_verifier($id_formulaire, $valeurs=array(), $id_formulaires_reponse=false){
 167     $erreurs = array();
 168
 169     // Sale bête !
 170     if (_request('mechantrobot') != ''){
 171         $erreurs['hahahaha'] = 'hahahaha';
 172         return $erreurs;
 173     }
 174
 175     $id_formulaire = intval(_request('id_formulaire'));
 176     $formulaire = sql_fetsel('*', 'spip_formulaires', 'id_formulaire = '.$id_formulaire);
 177     $saisies = unserialize($formulaire['saisies']);
 178
 179     $erreurs = saisies_verifier($saisies);
 180
 181     if ($erreurs and !isset($erreurs['message_erreur']))
 182         $erreurs['message_erreur'] = _T('formidable:erreur_generique');
 183
 184     return $erreurs;
 185 }
 186
 187
 188 /**
 189  * Traitement du formulaire CVT de Formidable.
 190  *
 191  * Exécute les traitements qui sont indiqués dans la configuration des
 192  * traitements de ce formulaire formidable.
 193  *
 194  * Une fois fait, gère le retour après traitements des saisies en fonction
 195  * de ce qui a été configuré dans le formulaire, par exemple :
 196  * - faire réafficher le formulaire,
 197  * - faire afficher les saisies
 198  * - rediriger sur une autre page...
 199  *
 200  * @param int|string $id_formulaire
 201  *     Identifiant numerique ou textuel du formulaire formidable
 202  * @param array $valeurs
 203  *     Valeurs par défauts passées au contexte du formulaire
 204  *     Exemple : array('hidden_1' => 3) pour que champ identifie "@hidden_1@" soit prerempli
 205  * @param int|bool $id_formulaires_reponse
 206  *     Identifiant d'une réponse pour forcer la reedition de cette reponse spécifique
 207  *
 208  * @return array
 209  *     Tableau des erreurs
 210 **/
 211 function formulaires_formidable_traiter($id_formulaire, $valeurs=array(), $id_formulaires_reponse=false){
 212         $retours = array();
 213     $id_formulaire = intval(_request('id_formulaire'));
 214     $formulaire = sql_fetsel('*', 'spip_formulaires', 'id_formulaire = '.$id_formulaire);
 215     $traitements = unserialize($formulaire['traitements']);
 216
 217     // selon le choix, le formulaire se remet en route à la fin ou non
 218     $retours['editable'] = ($formulaire['apres']=='formulaire');
 219     $retours['formidable_afficher_apres'] = $formulaire['apres'];
 220
 221     // Si on a une redirection valide
 222     if (($formulaire['apres']== "redirige") AND ($formulaire['url_redirect']!="")) {
 223         refuser_traiter_formulaire_ajax();
 224         // traiter les raccourcis artX, brX
 225         include_spip("inc/lien");
 226         $url_redirect = typer_raccourci($formulaire['url_redirect']);
 227         if (count($url_redirect)>2) {
 228             $url_redirect = $url_redirect[0].$url_redirect[2];
 229         } else {
 230             $url_redirect = $formulaire['url_redirect'];      // URL classique
 231         }
 232
 233         $retours['redirect'] = $url_redirect;
 234     }
 235
 236     // Si on a des traitements
 237     if (is_array($traitements) and !empty($traitements)) {
 238         foreach($traitements as $type_traitement=>$options){
 239             if ($appliquer_traitement = charger_fonction($type_traitement, 'traiter/', true)) {
 240                 $retours = $appliquer_traitement(
 241                     array(
 242                         'formulaire' => $formulaire,
 243                         'options' => $options
 244                     ),
 245                     $retours
 246                 );
 247             }
 248         }
 249
 250         // Si on a personnalisé le message de retour, c'est lui qui est affiché uniquement
 251         if ($formulaire['message_retour']) {
 252             $retours['message_ok'] = _T_ou_typo($formulaire['message_retour']);
 253         }
 254     }
 255     else{
 256         $retours['message_ok'] = _T('formidable:retour_aucun_traitement');
 257     }
 258
 259     return $retours;
 260 }
 261
 262
 263 /**
 264  * Ajoute dans le contexte les elements
 265  * donnés par une reponse de formulaire indiquée
 266  *
 267  * @param array $contexte
 268  *     Contexte pour le squelette HTML du formulaire
 269  * @param int $id_formulaires_reponse
 270  *     Identifiant de réponse
 271  * @param bool $ok
 272  *     La reponse existe bien ?
 273  * @return array $contexte
 274  *     Contexte complète des nouvelles informations
 275  *
 276 **/
 277 function formidable_definir_contexte_avec_reponse($contexte, $id_formulaires_reponse, &$ok) {
 278     // On va chercher tous les champs
 279     $champs = sql_allfetsel(
 280         'nom, valeur',
 281         'spip_formulaires_reponses_champs',
 282         'id_formulaires_reponse = '.$id_formulaires_reponse
 283     );
 284     $ok = count($champs) ? true : false;
 285
 286     // On remplit le contexte avec
 287     foreach ($champs as $champ){
 288         $test_array = unserialize($champ['valeur']);
 289         $contexte[$champ['nom']] = is_array($test_array) ? $test_array : $champ['valeur'];
 290     }
 291
 292     return $contexte;
 293 }
 294
 295 ?>