3 /***************************************************************************\
4 * SPIP, Systeme de publication pour l'internet *
6 * Copyright (c) 2001-2014 *
7 * Arnaud Martin, Antoine Pitrou, Philippe Riviere, Emmanuel Saint-James *
9 * Ce programme est un logiciel libre distribue sous licence GNU/GPL. *
10 * Pour plus de details voir le fichier COPYING.txt ou l'aide en ligne. *
11 \***************************************************************************/
13 if (!defined("_ECRIRE_INC_VERSION")) return;
15 function formulaires_signature_charger_dist($id_article) {
16 include_spip('base/abstract_sql');
17 // pas de petition, pas de signature
18 if (!$r = sql_fetsel('*','spip_petitions','id_article='.intval($id_article)))
20 // pas de signature sur une petition fermee (TODO) ou poubelle
21 if (isset($r['statut']) AND in_array($r['statut'],array('off','poubelle')))
23 $id_petition = $r['id_petition'];
26 'id_petition' => $id_petition,
27 'id_article' => $id_article, # pour compat
28 'session_nom' => sinon($GLOBALS['visiteur_session']['session_nom'],
29 $GLOBALS['visiteur_session']['nom']),
30 'session_email'=> sinon($GLOBALS['visiteur_session']['session_email'],
31 $GLOBALS['visiteur_session']['email']),
32 'signature_nom_site'=>'',
33 'signature_url_site'=>'http://',
34 '_texte'=>$r['texte'],
35 '_message'=>($r['message'] == 'oui') ?
' ':'',
37 'site_obli' => ($r['site_obli'] == 'oui'?
' ':''),
38 'debut_signatures'=>'' // pour le nettoyer de l'url d'action !
41 if ($c = _request('var_confirm')) {
42 $valeurs['_confirm'] = $c;
43 $valeurs['editable'] = false;
47 function affiche_reponse_confirmation($confirm) {
48 if (!$confirm) return '';
49 $confirmer_signature = charger_fonction('confirmer_signature','action');
50 return $confirmer_signature($confirm); # calculee plus tot: cf petitions_options
53 function formulaires_signature_verifier_dist($id_article) {
55 $oblis = array('session_nom','session_email');
56 include_spip('base/abstract_sql');
57 $row = sql_fetsel('*','spip_petitions','id_article='.intval($id_article));
59 $erreurs['message_erreur'] = _T('petitions:form_pet_probleme_technique');
60 $id_petition = $row['id_petition'];
62 if ($row['site_obli'] == 'oui'){
63 $oblis[] = 'signature_nom_site';
64 $oblis[] = 'signature_url_site';
65 set_request('signature_url_site', vider_url(_request('signature_url_site')));
67 foreach ($oblis as $obli)
69 $erreurs[$obli] = _T('info_obligatoire');
71 if ($nom = _request('session_nom') AND strlen($nom) < 2)
72 $erreurs['session_nom'] = _T('form_indiquer_nom');
74 include_spip('inc/filtres');
75 if (($mail=_request('session_email')) == _T('info_mail_fournisseur'))
76 $erreurs['session_email'] = _T('form_indiquer_email');
77 elseif ($mail AND !email_valide($mail))
78 $erreurs['session_email'] = _T('form_email_non_valide');
79 elseif (strlen(_request('nobot'))
80 OR (@preg_match_all
(',\bhref=[\'"]?http,i', // bug PHP
82 # , PREG_PATTERN_ORDER
85 #$envoyer_mail = charger_fonction('envoyer_mail','inc');
86 #envoyer_mail('email_moderateur@example.tld', 'spam intercepte', var_export($_POST,1));
87 $erreurs['message_erreur'] = _T('petitions:form_pet_probleme_liens');
89 if ($row['site_obli'] == 'oui'){
90 if (!vider_url($url_site = _request('signature_url_site'))) {
91 $erreurs['signature_url_site'] = _T('form_indiquer_nom_site');
93 elseif (!count($erreurs)) {
94 include_spip('inc/distant');
95 if (!recuperer_page($url_site, false, true, 0))
96 $erreurs['signature_url_site'] = _T('petitions:form_pet_url_invalide');
100 if (!count($erreurs)){
101 // tout le monde est la.
102 $email_unique = $row['email_unique'] == "oui";
103 $site_unique = $row['site_unique'] == "oui";
105 // Refuser si deja signe par le mail ou le site quand demande
106 // Il y a un acces concurrent potentiel,
107 // mais ca n'est qu'un cas particulier de qq n'ayant jamais confirme'.
108 // On traite donc le probleme a la confirmation.
111 $r = sql_countsel('spip_signatures', "id_petition=".intval($id_petition)." AND ad_email=" . sql_quote($mail) . " AND statut='publie'");
112 if ($r) $erreurs['message_erreur'] = _T('petitions:form_pet_deja_signe');
116 $r = sql_countsel('spip_signatures', "id_petition=".intval($id_petition)." AND url_site=" . sql_quote($url_site) . " AND (statut='publie' OR statut='poubelle')");
117 if ($r) $erreurs['message_erreur'] = _T('petitions:form_pet_site_deja_enregistre');
124 function formulaires_signature_traiter_dist($id_article) {
125 $reponse = _T('petitions:form_pet_probleme_technique');
126 include_spip('base/abstract_sql');
127 if (spip_connect()) {
128 $controler_signature = charger_fonction('controler_signature', 'inc');
129 $reponse = $controler_signature($id_article,
130 _request('session_nom'), _request('session_email'),
131 _request('message'), _request('signature_nom_site'),
132 _request('signature_url_site'), _request('url_page'));
135 return array('message_ok'=>$reponse);
139 // Recevabilite de la signature d'une petition
140 // les controles devraient mantenant etre faits dans formulaires_signature_verifier()
143 // http://code.spip.net/@inc_controler_signature_dist
144 function inc_controler_signature_dist($id_article, $nom, $mail, $message, $site, $url_site, $url_page) {
146 // tout le monde est la.
147 // cela a ete verifie en amont, dans formulaires_signature_verifier()
148 if (!$row = sql_fetsel('*', 'spip_petitions', "id_article=".intval($id_article)))
149 return _T('petitions:form_pet_probleme_technique');
152 if (!$ret = signature_a_confirmer($id_article, $url_page, $nom, $mail, $site, $url_site, $message, $lang, $statut))
153 return _T('petitions:form_pet_probleme_technique');
155 include_spip('action/editer_signature');
157 $id_signature = signature_inserer($row['id_petition']);
158 if (!$id_signature) return _T('petitions:form_pet_probleme_technique');
160 signature_modifier($id_signature,
165 'message' => $message,
167 'url_site' => $url_site
174 // http://code.spip.net/@signature_a_confirmer
175 function signature_a_confirmer($id_article, $url_page, $nom, $mail, $site, $url, $msg, $lang, &$statut)
177 include_spip('inc/texte');
178 include_spip('inc/filtres');
180 // Si on est deja connecte et que notre mail a ete valide d'une maniere
181 // ou d'une autre, on entre directement la signature dans la base, sans
182 // envoyer d'email. Sinon email de verification
184 // Cas 1: on est loge et on signe avec son vrai email
186 isset($GLOBALS['visiteur_session']['statut'])
187 AND $GLOBALS['visiteur_session']['session_email'] == $GLOBALS['visiteur_session']['email']
188 AND strlen($GLOBALS['visiteur_session']['email'])
191 // Cas 2: on a deja signe une petition, et on conserve le meme email
193 isset($GLOBALS['visiteur_session']['email_confirme'])
194 AND $GLOBALS['visiteur_session']['session_email'] == $GLOBALS['visiteur_session']['email_confirme']
195 AND strlen($GLOBALS['visiteur_session']['session_email'])
198 // Si on est en ajax on demande a reposter sans ajax, car il faut
199 // recharger toute la page pour afficher la signature
200 refuser_traiter_formulaire_ajax();
203 // invalider le cache !
204 include_spip('inc/invalideur');
205 suivre_invalideur("id='article/$id_article'");
207 // message de reussite
209 _T('petitions:form_pet_signature_validee');
214 // Cas normal : envoi d'une demande de confirmation
216 $row = sql_fetsel('titre,lang', 'spip_articles', "id_article=".intval($id_article));
217 $lang = lang_select($row['lang']);
218 $titre = textebrut(typo($row['titre']));
219 if ($lang) lang_select();
221 if (!strlen($statut))
222 $statut = signature_test_pass();
224 if ($lang != $GLOBALS['meta']['langue_site'])
225 $url_page = parametre_url($url_page, "lang", $lang,'&');
227 $url_page = parametre_url($url_page, 'var_confirm', $statut, '&')
230 $r = _T('petitions:form_pet_mail_confirmation',
231 array('titre' => $titre,
238 $titre = _T('petitions:form_pet_confirmation')." ". $titre;
239 $envoyer_mail = charger_fonction('envoyer_mail','inc');
240 if ($envoyer_mail($mail,$titre, $r))
241 return _T('petitions:form_pet_envoi_mail_confirmation',array('email'=>$mail));
243 return false; # erreur d'envoi de l'email
246 // Creer un mot de passe aleatoire et verifier qu'il est unique
247 // dans la table des signatures
248 // http://code.spip.net/@signature_test_pass
249 function signature_test_pass() {
250 include_spip('inc/acces');
252 $passw = creer_pass_aleatoire();
253 } while (sql_countsel('spip_signatures', "statut='$passw'") > 0);