Déplacement et amélioration des fonctions montants_str2array().
[spip_souscriptions.git] / formulaires / souscription.php
1 <?php
2 /**
3  * Gestion du formulaire de d'édition de souscription
4  *
5  * @plugin     Souscription
6  * @copyright  2013
7  * @author     Olivier Tétard
8  * @licence    GNU/GPL
9  * @package    SPIP\Souscription\Formulaires
10  */
11
12 if (!defined('_ECRIRE_INC_VERSION')) return;
13
14 include_spip('inc/actions');
15 include_spip('inc/editer');
16 include_spip('inc/config');
17
18 /**
19  * Identifier le formulaire en faisant abstraction des paramètres qui ne représentent pas l'objet edité
20  *
21  * @param int|string $id_souscription
22  *     Identifiant du souscription. 'new' pour un nouveau souscription.
23  * @param string $retour
24  *     URL de redirection après le traitement
25  * @param int $lier_trad
26  *     Identifiant éventuel d'un souscription source d'une traduction
27  * @param string $config_fonc
28  *     Nom de la fonction ajoutant des configurations particulières au formulaire
29  * @param array $row
30  *     Valeurs de la ligne SQL du souscription, si connu
31  * @param string $hidden
32  *     Contenu HTML ajouté en même temps que les champs cachés du formulaire.
33  * @return string
34  *     Hash du formulaire
35  */
36 function formulaires_souscription_identifier_dist($id_souscription='new',
37                                                       $retour='',
38                                                       $lier_trad=0,
39                                                       $config_fonc='',
40                                                       $row=array(),
41                                                       $hidden='') {
42   return serialize(array(intval($id_souscription)));
43 }
44
45 /**
46  * Chargement du formulaire d'édition de souscription
47  *
48  * Déclarer les champs postés et y intégrer les valeurs par défaut
49  *
50  * @uses formulaires_editer_objet_charger()
51  *
52  * @param int|string $id_souscription
53  *     Identifiant du souscription. 'new' pour un nouveau souscription.
54  * @param string $retour
55  *     URL de redirection après le traitement
56  * @param int $lier_trad
57  *     Identifiant éventuel d'un souscription source d'une traduction
58  * @param string $config_fonc
59  *     Nom de la fonction ajoutant des configurations particulières au formulaire
60  * @param array $row
61  *     Valeurs de la ligne SQL du souscription, si connu
62  * @param string $hidden
63  *     Contenu HTML ajouté en même temps que les champs cachés du formulaire.
64  * @return array
65  *     Environnement du formulaire
66  */
67 function formulaires_souscription_charger_dist($id_souscription_campagne) {
68
69   if(!verifier_campagne($id_souscription_campagne))
70     return false;
71
72   /* Récupération des information à propos de la campagne */
73   $type = sql_getfetsel("type_objectif",
74                         "spip_souscription_campagnes",
75                         "id_souscription_campagne=$id_souscription_campagne");
76
77   $recu_fiscal = "";
78   if($type == "adhesion")
79     $recu_fiscal = "on";
80
81   $montant_type = lire_config("souscription/{$type}_type_saisie", 'input');
82   $montant_datas = lire_config("souscription/${type}_montants", array());
83   $montant_label = lire_config("souscription/${type}_montants_label", _T('souscription:label_montant'));
84   $montant_explication = nl2br(lire_config("souscription/${type}_montants_description"));
85
86   return array('montant' => '',
87                'courriel' => '',
88                'recu_fiscal' => $recu_fiscal,
89                'envoyer_info' => 'on',
90                'informer_comite_local' => 'on',
91                'prenom' => '',
92                'nom' => '',
93                'adresse' => '',
94                'code_postal' => '',
95                'ville' => '',
96                'pays' => 'FR',
97                'telephone' => '',
98                'id_souscription_campagne' => $id_souscription_campagne,
99                'type_souscription' => $type,
100                'montant_datas' => $montant_datas,
101                'montant_type' => $montant_type,
102                'montant_label' => $montant_label,
103                'montant_explication' => $montant_explication
104                );
105 }
106
107 /**
108  * Vérifications du formulaire d'édition de souscription
109  *
110  * Vérifier les champs postés et signaler d'éventuelles erreurs
111  *
112  * @uses formulaires_editer_objet_verifier()
113  *
114  * @param int|string $id_souscription
115  *     Identifiant du souscription. 'new' pour un nouveau souscription.
116  * @param string $retour
117  *     URL de redirection après le traitement
118  * @param int $lier_trad
119  *     Identifiant éventuel d'un souscription source d'une traduction
120  * @param string $config_fonc
121  *     Nom de la fonction ajoutant des configurations particulières au formulaire
122  * @param array $row
123  *     Valeurs de la ligne SQL du souscription, si connu
124  * @param string $hidden
125  *     Contenu HTML ajouté en même temps que les champs cachés du formulaire.
126  * @return array
127  *     Tableau des erreurs
128  */
129 function formulaires_souscription_verifier_dist($id_souscription_campagne) {
130   $campagne = _request('id_souscription_campagne');
131
132   $erreurs = formulaires_editer_objet_verifier('souscription', 'new',
133                                                array('courriel',
134                                                      'montant',
135                                                      'id_souscription_campagne'));
136
137   if(!verifier_campagne($id_souscription_campagne)) {
138     $erreurs['message_erreur'] = "La campagne à laquelle est associée cette souscription est invalide";
139   }
140
141   if(!$id_souscription_campagne || intval($id_souscription_campagne) != intval($campagne)) {
142       $erreurs['message_erreur'] = "Campagne invalide";
143   }
144
145   /* La campagne doit être valide (définie dans la base) et doit
146    * accepter les dons. */
147   $type = sql_getfetsel("type_objectif",
148                         "spip_souscription_campagnes",
149                         "id_souscription_campagne=$id_souscription_campagne");
150
151   if(!$type || !in_array($type, array("don", "adhesion")))
152     $erreurs['message_erreur'] = "Type de souscription invalide";
153
154   /* Le champ 'type' (hidden) doit être le même que celui défini dans
155    * la campagne. */
156   if(_request('type_souscription') != $type)
157     $erreurs['message_erreur'] = "Type de souscription invalide: " . _request('type_souscription');
158
159
160   if(_request('recu_fiscal') || $type == "adhesion") {
161     foreach(array('prenom', 'nom', 'adresse', 'code_postal', 'ville', 'pays') as $obligatoire) {
162       if(!_request($obligatoire)) {
163         if($type == "adhesion") {
164           $erreurs[$obligatoire] = "Ce champ est obligatoire pour les adhésions";
165         }
166         else {
167           $erreurs[$obligatoire] = 'Ce champ est obligatoire (reçu fiscal demandé)';
168         }
169       }
170     }
171   }
172
173   if ($e = _request('courriel') AND !email_valide($e))
174     $erreurs['courriel'] = _T('form_prop_indiquer_email');
175
176   if($e = _request('pays')) {
177     $ret = sql_select('nom', 'spip_pays', "code='${e}'");
178
179     if(sql_count($ret) != 1)
180       $erreurs['pays'] = "Pays invalide";
181
182     /* Le code postal n'est vérifié que si on est dans le cas de la France */
183     elseif($e = _request('pays') AND $e == "FR") {
184       if ($e = _request('code_postal') AND !preg_match("/^(2[ABab]|0[1-9]|[1-9][0-9])[0-9]{3}$/", $e)) {
185         $erreurs['code_postal'] = "Code postal invalide";
186       }
187     }
188   }
189
190   if ($e = _request('telephone') AND !preg_match("/^[0-9\+ \.]+$/", $e)) {
191     $erreurs['telephone'] = "Numéro de téléphone incorrect";
192   }
193
194
195   if ($e = _request('montant')) {
196     if(!(ctype_digit($e)))
197       $erreurs['montant'] = "Montant invalide";
198     else {
199       $type_saisie = lire_config("souscription/${type}_type_saisie");
200
201       /* On ne vérifie strictement la valeur du montant que si on
202        * n'utilise pas le type de saisie « entrée libre » (input) pour
203        * le montant. */
204       if(($type_saisie != "input") AND !array_key_exists($e, lire_config("souscription/${type}_montants")))
205         $erreurs['montant'] = "Le montant spécifié est invalide";
206     }
207   }
208
209   if(count($erreurs) > 0) {
210     $erreurs['message_erreur'] = "Le formulaire contient des erreurs";
211   }
212
213   return $erreurs;
214 }
215
216 /**
217  * Traitement du formulaire d'édition de souscription
218  *
219  * Traiter les champs postés
220  *
221  * @uses formulaires_editer_objet_traiter()
222  *
223  * @param int|string $id_souscription
224  *     Identifiant du souscription. 'new' pour un nouveau souscription.
225  * @param string $retour
226  *     URL de redirection après le traitement
227  * @param int $lier_trad
228  *     Identifiant éventuel d'un souscription source d'une traduction
229  * @param string $config_fonc
230  *     Nom de la fonction ajoutant des configurations particulières au formulaire
231  * @param array $row
232  *     Valeurs de la ligne SQL du souscription, si connu
233  * @param string $hidden
234  *     Contenu HTML ajouté en même temps que les champs cachés du formulaire.
235  * @return array
236  *     Retours des traitements
237  */
238 function formulaires_souscription_traiter_dist($id_souscription_campagne) {
239   $lier_trad=0;
240   $config_fonc='';
241   $row=array();
242   $hidden='';
243
244   $ret = formulaires_editer_objet_traiter('souscription',
245                                           'new',
246                                           '',
247                                           $lier_trad,
248                                           $retour,
249                                           $config_fonc,
250                                           $row,
251                                           $hidden);
252
253   $redirect = "";
254   $row = sql_fetsel("transaction_hash,id_transaction",
255                     "spip_transactions LEFT JOIN spip_souscriptions USING(id_transaction)",
256                     "id_souscription=".$ret['id_souscription']);
257
258   if(!$row) {
259     spip_log(sprintf("Erreur lors de la création de la transaction liée à la souscription [%s].", $ret['id_souscription']), "souscription");
260     $ret['message_erreur'] = "Echec creation de la transaction";
261   }
262   else {
263     spip_log(sprintf("La souscription [%s], associée à la transaction [%s] a bien été crée.", $ret['id_souscription'], $row['id_transaction']), "souscription");
264     $hash = $row['transaction_hash'];
265     $id_transaction = $row['id_transaction'];
266     $redirect = generer_url_public("payer-acte", "id_transaction=$id_transaction&transaction_hash=$hash", false, false);
267     $ret['redirect'] = $redirect;
268   }
269
270   return $ret;
271 }
272
273 function verifier_campagne($id_souscription_campagne) {
274   /* FIXME: vérifier que la campagne a bien le bon statut (ouverte, fermée, terminée, etc.) */
275
276   /* Vérification de l'existance de la *campagne*, de son *statut* et de la *concordance du type* */
277   if(intval($id_souscription_campagne)
278      AND $t = sql_getfetsel('type_objectif', 'spip_souscription_campagnes', 'id_souscription_campagne='.intval($id_souscription_campagne)))
279     {
280       return true;
281     }
282
283   return false;
284 }