3 * Gestion du formulaire de d'édition de souscription
7 * @author Olivier Tétard
9 * @package SPIP\Souscription\Formulaires
12 if (!defined('_ECRIRE_INC_VERSION')) return;
14 include_spip('inc/actions');
15 include_spip('inc/editer');
16 include_spip('inc/config');
20 * Chargement du formulaire d'édition de souscription
22 * Déclarer les champs postés et y intégrer les valeurs par défaut
24 * @uses formulaires_editer_objet_charger()
26 * @param int$id_souscription_campagne
27 * Identifiant de la campagne de souscription
29 * Environnement du formulaire
31 function formulaires_souscription_charger_dist($id_souscription_campagne){
33 if (!verifier_campagne($id_souscription_campagne))
36 /* Récupération des information à propos de la campagne */
37 $campagne = sql_fetsel(array("type_objectif", "configuration_specifique", "type_saisie", "montants"),
38 "spip_souscription_campagnes",
39 "id_souscription_campagne=$id_souscription_campagne");
41 $type = $campagne['type_objectif'];
44 if ($type=="adhesion")
47 if ($campagne['configuration_specifique']!=='on'){
48 $montant_type = lire_config("souscription/{$type}_type_saisie", 'input');
49 $montant_datas = lire_config("souscription/${type}_montants", array());
51 $montant_type = $campagne['type_saisie'];
52 $montant_datas = $campagne['montants'];
55 $montant_label = lire_config("souscription/${type}_montants_label", _T('souscription:label_montant'));
56 $montant_explication = nl2br(lire_config("souscription/${type}_montants_description"));
58 return array('montant' => '',
59 'montant_libre' => '',
61 'recu_fiscal' => $recu_fiscal,
62 'envoyer_info' => 'on',
63 'informer_comite_local' => 'on',
71 'id_souscription_campagne' => $id_souscription_campagne,
72 'type_souscription' => $type,
73 '_montant_datas' => montants_str2array($montant_datas),
74 'montant_type' => $montant_type,
75 'montant_label' => $montant_label,
76 'montant_explication' => $montant_explication
82 * Chargement du formulaire d'édition de souscription
84 * Déclarer les champs postés et y intégrer les valeurs par défaut
86 * @uses formulaires_editer_objet_charger()
88 * @param int$id_souscription_campagne
89 * Identifiant de la campagne de souscription
93 function formulaires_souscription_verifier_dist($id_souscription_campagne){
95 $erreurs = formulaires_editer_objet_verifier('souscription', 'new', array('courriel','montant'));
97 $campagne = sql_fetsel(array("type_objectif", "configuration_specifique", "type_saisie", "montants"),
98 "spip_souscription_campagnes", "id_souscription_campagne=".intval($id_souscription_campagne));
100 $type_campagne = $campagne['type_objectif'];
102 if (!verifier_campagne($id_souscription_campagne, $type_campagne)){
103 $erreurs['message_erreur'] = _T('souscription:erreur_souscription_campagne_invalide');
107 if (_request('recu_fiscal')==="on" || $type_campagne=="adhesion"){
108 foreach (array('prenom', 'nom', 'adresse', 'code_postal', 'ville', 'pays') as $obligatoire){
109 if (!_request($obligatoire)){
110 if ($type_campagne=="adhesion"){
111 $erreurs[$obligatoire] = _T('souscription:erreur_adhesion_champ_obligatoire');
113 $erreurs[$obligatoire] = _T('souscription:erreur_recu_fiscal_champ_obligatoire');
119 if ($e = _request('courriel') AND !email_valide($e))
120 $erreurs['courriel'] = _T('form_prop_indiquer_email');
122 if ($e = _request('pays')){
123 $ret = sql_select('nom', 'spip_pays', "code='${e}'");
125 if (sql_count($ret)!=1)
126 $erreurs['pays'] = _T('souscription:erreur_pays_invalide');
128 /* Le code postal n'est vérifié que si on est dans le cas de la France */
129 elseif ($e = _request('pays') AND $e=="FR") {
130 if ($e = _request('code_postal') AND !preg_match("/^(2[ABab]|0[1-9]|[1-9][0-9])[0-9]{3}$/", $e)){
131 $erreurs['code_postal'] = _T('souscription:erreur_code_postal_invalide');
136 if ($e = _request('telephone') AND !preg_match("/^[0-9\+ \.]+$/", $e)){
137 $erreurs['telephone'] = _T('souscription:erreur_telephone_invalide');
140 /* Vérification du montant. Si la campagne est configurée pour
141 * utiliser une configuration spécifique, alors, il faut vérifier
142 * avec les montants de la campagne. Autrement, il faut utiliser les
143 * paramètres globaux.
145 if ($e = _request('montant')){
148 $e = _request('montant_libre');
151 if (!(ctype_digit($e)))
152 $erreurs['montant'] = _T("souscription:erreur_montant_invalide");
154 if ($campagne['configuration_specifique']!=='on'){
155 $montant_type = lire_config("souscription/{$type_campagne}_type_saisie", 'input');
156 $montant_datas = lire_config("souscription/{$type_campagne}_montants", array());
158 $montant_type = $campagne['type_saisie'];
159 $montant_datas = $campagne['montants'];
162 /* On ne vérifie strictement la valeur du montant que si on
163 * n'utilise pas le type de saisie « entrée libre » (input) pour
165 if (($montant_type!=="input")
167 AND !array_key_exists($e, montants_str2array($montant_datas)))
168 $erreurs['montant'] = _T('souscription:erreur_montant_specifie_invalide');
172 if (count($erreurs)>0){
173 $erreurs['message_erreur'] = _T('souscription:erreur_formulaire');
180 * Chargement du formulaire d'édition de souscription
182 * Déclarer les champs postés et y intégrer les valeurs par défaut
184 * @uses formulaires_editer_objet_charger()
186 * @param int$id_souscription_campagne
187 * Identifiant de la campagne de souscription
189 * Retours des traitements
191 function formulaires_souscription_traiter_dist($id_souscription_campagne){
199 $campagne = sql_fetsel(array("type_objectif", "configuration_specifique", "type_saisie", "montants"),
200 "spip_souscription_campagnes", "id_souscription_campagne=".intval($id_souscription_campagne));
201 set_request("id_souscription_campagne",$id_souscription_campagne);
202 set_request('type_souscription',$campagne['type_objectif']);
204 // generer la transaction et l'associer a la souscription
205 $inserer_transaction = charger_fonction('inserer_transaction', 'bank');
206 $montant = _request('montant');
207 if ($montant=="libre")
208 $montant = _request('montant_libre');
210 $id_auteur = (isset($GLOBALS['visiteur_session']['id_auteur'])?$GLOBALS['visiteur_session']['id_auteur']:0);
211 $id_transaction = $inserer_transaction($montant,
212 $montant, /* montant_ht */
213 $id_auteur, /* id_auteur */
215 _request('courriel'));
217 if (!$id_transaction){
218 $ret['message_erreur'] = _T('souscription:erreur_technique_formulaire');
222 set_request("id_transaction",$id_transaction);
224 $ret = formulaires_editer_objet_traiter('souscription',
234 $row = sql_fetsel("transaction_hash,id_transaction",
235 "spip_transactions LEFT JOIN spip_souscriptions USING(id_transaction)",
236 "id_souscription=" . $ret['id_souscription']);
239 spip_log(sprintf("Erreur lors de la création de la transaction liée à la souscription [%s].", $ret['id_souscription']), "souscription");
240 $ret['message_erreur'] = _T('souscription:erreur_echec_creation_transaction');
242 spip_log(sprintf("La souscription [%s], associée à la transaction [%s] a bien été crée.", $ret['id_souscription'], $row['id_transaction']), "souscription");
243 $hash = $row['transaction_hash'];
244 $id_transaction = $row['id_transaction'];
245 $redirect = generer_url_public("payer-acte", "id_transaction=$id_transaction&transaction_hash=$hash", false, false);
246 $ret['redirect'] = $redirect;
252 function verifier_campagne($id_souscription_campagne, $type_souscription = null){
253 /* FIXME: vérifier que la campagne a bien le bon statut (ouverte, fermée, terminée, etc.) */
255 $campagne = sql_fetsel(array('type_objectif', 'objectif_initial', 'objectif', 'objectif_limiter'),
256 'spip_souscription_campagnes', 'id_souscription_campagne=' . sql_quote(intval($id_souscription_campagne)));
258 /* La campagne doit exister */
259 if (!count($campagne['type_objectif']))
262 elseif ($type_souscription!=null && $campagne['type_objectif']!=$type_souscription)
265 /* Si la campagne doit être fermée lorsque l'objectif est atteint,
266 * alors on bloque. */
267 elseif ($campagne['objectif_limiter'] == 'on' &&
268 calcul_avancement_campagne($id_souscription_campagne, $campagne['type_objectif'], $campagne['objectif_initial'])>=$campagne['objectif']