www/plugins-dist/petitions/formulaires/signature.php

   1 <?php
   2
   3 /***************************************************************************\
   4  *  SPIP, Systeme de publication pour l'internet                           *
   5  *                                                                         *
   6  *  Copyright (c) 2001-2019                                                *
   7  *  Arnaud Martin, Antoine Pitrou, Philippe Riviere, Emmanuel Saint-James  *
   8  *                                                                         *
   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 \***************************************************************************/
  12
  13 if (!defined("_ECRIRE_INC_VERSION")) {
  14         return;
  15 }
  16
  17 function formulaires_signature_charger_dist($id_article) {
  18         include_spip('base/abstract_sql');
  19         // pas de petition, pas de signature
  20         if (!$r = sql_fetsel('*', 'spip_petitions', 'id_article=' . intval($id_article))) {
  21                 return false;
  22         }
  23         // pas de signature sur une petition fermee (TODO) ou poubelle
  24         if (isset($r['statut']) and in_array($r['statut'], array('off', 'poubelle'))) {
  25                 return false;
  26         }
  27         $id_petition = $r['id_petition'];
  28
  29         $valeurs = array(
  30                 'id_petition' => $id_petition,
  31                 'id_article' => $id_article, # pour compat
  32                 'session_nom' => isset($GLOBALS['visiteur_session']['session_nom']) ? $GLOBALS['visiteur_session']['session_nom'] : (isset($GLOBALS['visiteur_session']['nom']) ? $GLOBALS['visiteur_session']['nom'] : ''),
  33                 'session_email' => isset($GLOBALS['visiteur_session']['session_email']) ? $GLOBALS['visiteur_session']['session_email'] : (isset($GLOBALS['visiteur_session']['email']) ? $GLOBALS['visiteur_session']['email'] : ''),
  34                 'signature_nom_site' => '',
  35                 'signature_url_site' => 'http://',
  36                 '_texte' => $r['texte'],
  37                 '_message' => ($r['message'] == 'oui') ? ' ' : '',
  38                 'message' => '',
  39                 'site_obli' => ($r['site_obli'] == 'oui' ? ' ' : ''),
  40                 'debut_signatures' => '' // pour le nettoyer de l'url d'action !
  41         );
  42
  43         if ($c = _request('var_confirm')) {
  44                 $valeurs['_confirm'] = $c;
  45                 $valeurs['editable'] = false;
  46         }
  47
  48         return $valeurs;
  49 }
  50
  51 function affiche_reponse_confirmation($confirm) {
  52         if (!$confirm) {
  53                 return '';
  54         }
  55         $confirmer_signature = charger_fonction('confirmer_signature', 'action');
  56
  57         return $confirmer_signature($confirm);  # calculee plus tot: cf petitions_options
  58 }
  59
  60 function formulaires_signature_verifier_dist($id_article) {
  61         $erreurs = array();
  62         $oblis = array('session_nom', 'session_email');
  63         include_spip('base/abstract_sql');
  64         $row = sql_fetsel('*', 'spip_petitions', 'id_article=' . intval($id_article));
  65         if (!$row) {
  66                 $erreurs['message_erreur'] = _T('petitions:form_pet_probleme_technique');
  67         }
  68         $id_petition = $row['id_petition'];
  69
  70         if ($row['site_obli'] == 'oui') {
  71                 $oblis[] = 'signature_nom_site';
  72                 $oblis[] = 'signature_url_site';
  73                 set_request('signature_url_site', vider_url(_request('signature_url_site')));
  74         }
  75         foreach ($oblis as $obli) {
  76                 if (!_request($obli)) {
  77                         $erreurs[$obli] = _T('info_obligatoire');
  78                 }
  79         }
  80
  81         if ($nom = _request('session_nom') and strlen($nom) < 2) {
  82                 $erreurs['session_nom'] = _T('form_indiquer_nom');
  83         }
  84
  85         include_spip('inc/filtres');
  86         if (($mail = _request('session_email')) == _T('info_mail_fournisseur')) {
  87                 $erreurs['session_email'] = _T('form_indiquer_email');
  88         } elseif ($mail and !email_valide($mail)) {
  89                 $erreurs['session_email'] = _T('form_email_non_valide');
  90         } elseif (strlen(_request('nobot'))
  91                 or (@preg_match_all(',\bhref=[\'"]?http,i', // bug PHP
  92                                 _request('message')
  93                         # ,  PREG_PATTERN_ORDER
  94                         )
  95                         > 2)
  96         ) {
  97                 #$envoyer_mail = charger_fonction('envoyer_mail','inc');
  98                 #envoyer_mail('email_moderateur@example.tld', 'spam intercepte', var_export($_POST,1));
  99                 $erreurs['message_erreur'] = _T('petitions:form_pet_probleme_liens');
 100         }
 101         if ($row['site_obli'] == 'oui') {
 102                 if (!vider_url($url_site = _request('signature_url_site'))) {
 103                         $erreurs['signature_url_site'] = _T('form_indiquer_nom_site');
 104                 } elseif (!count($erreurs)) {
 105                         include_spip('inc/distant');
 106                         if (!recuperer_page($url_site, false, true, 0)) {
 107                                 $erreurs['signature_url_site'] = _T('petitions:form_pet_url_invalide');
 108                         }
 109                 }
 110         }
 111
 112         if (!count($erreurs)) {
 113                 // tout le monde est la.
 114                 $email_unique = $row['email_unique'] == "oui";
 115                 $site_unique = $row['site_unique'] == "oui";
 116
 117                 // Refuser si deja signe par le mail ou le site quand demande
 118                 // Il y a un acces concurrent potentiel,
 119                 // mais ca n'est qu'un cas particulier de qq n'ayant jamais confirme'.
 120                 // On traite donc le probleme a la confirmation.
 121
 122                 if ($email_unique) {
 123                         $r = sql_countsel('spip_signatures',
 124                                 "id_petition=" . intval($id_petition) . " AND ad_email=" . sql_quote($mail) . " AND statut='publie'");
 125                         if ($r) {
 126                                 $erreurs['message_erreur'] = _T('petitions:form_pet_deja_signe');
 127                         }
 128                 }
 129
 130                 if ($site_unique) {
 131                         $r = sql_countsel('spip_signatures',
 132                                 "id_petition=" . intval($id_petition) . " AND url_site=" . sql_quote($url_site) . " AND (statut='publie' OR statut='poubelle')");
 133                         if ($r) {
 134                                 $erreurs['message_erreur'] = _T('petitions:form_pet_site_deja_enregistre');
 135                         }
 136                 }
 137         }
 138
 139         return $erreurs;
 140 }
 141
 142 function formulaires_signature_traiter_dist($id_article) {
 143         $reponse = _T('petitions:form_pet_probleme_technique');
 144         include_spip('base/abstract_sql');
 145         if (spip_connect()) {
 146                 $controler_signature = charger_fonction('controler_signature', 'inc');
 147                 $reponse = $controler_signature($id_article,
 148                         _request('session_nom'), _request('session_email'),
 149                         _request('message'), _request('signature_nom_site'),
 150                         _request('signature_url_site'), _request('url_page'));
 151         }
 152
 153         return array('message_ok' => $reponse);
 154 }
 155
 156 //
 157 // Recevabilite de la signature d'une petition
 158 // les controles devraient mantenant etre faits dans formulaires_signature_verifier()
 159 //
 160
 161 // https://code.spip.net/@inc_controler_signature_dist
 162 function inc_controler_signature_dist($id_article, $nom, $mail, $message, $site, $url_site, $url_page) {
 163
 164         // tout le monde est la.
 165         // cela a ete verifie en amont, dans formulaires_signature_verifier()
 166         if (!$row = sql_fetsel('*', 'spip_petitions', "id_article=" . intval($id_article))) {
 167                 return _T('petitions:form_pet_probleme_technique');
 168         }
 169
 170         $statut = "";
 171         if (!$ret = signature_a_confirmer($id_article, $url_page, $nom, $mail, $site, $url_site, $message, 'fr'/*inutilise*/,
 172                 $statut)
 173         ) {
 174                 return _T('petitions:form_pet_probleme_technique');
 175         }
 176
 177         include_spip('action/editer_signature');
 178
 179         $id_signature = signature_inserer($row['id_petition']);
 180         if (!$id_signature) {
 181                 return _T('petitions:form_pet_probleme_technique');
 182         }
 183
 184         signature_modifier($id_signature,
 185                 array(
 186                         'statut' => $statut,
 187                         'nom_email' => $nom,
 188                         'ad_email' => $mail,
 189                         'message' => $message,
 190                         'nom_site' => $site,
 191                         'url_site' => $url_site
 192                 )
 193         );
 194
 195         return $ret;
 196 }
 197
 198 // https://code.spip.net/@signature_a_confirmer
 199 function signature_a_confirmer($id_article, $url_page, $nom, $mail, $site, $url, $msg, $lang, &$statut) {
 200         include_spip('inc/texte');
 201         include_spip('inc/filtres');
 202
 203         // Si on est deja connecte et que notre mail a ete valide d'une maniere
 204         // ou d'une autre, on entre directement la signature dans la base, sans
 205         // envoyer d'email. Sinon email de verification
 206         if (
 207                 // Cas 1: on est loge et on signe avec son vrai email
 208                 (
 209                         isset($GLOBALS['visiteur_session']['statut'])
 210                         and $GLOBALS['visiteur_session']['session_email'] == $GLOBALS['visiteur_session']['email']
 211                         and strlen($GLOBALS['visiteur_session']['email'])
 212                 )
 213
 214                 // Cas 2: on a deja signe une petition, et on conserve le meme email
 215                 or (
 216                         isset($GLOBALS['visiteur_session']['email_confirme'])
 217                         and $GLOBALS['visiteur_session']['session_email'] == $GLOBALS['visiteur_session']['email_confirme']
 218                         and strlen($GLOBALS['visiteur_session']['session_email'])
 219                 )
 220         ) {
 221                 // Si on est en ajax on demande a reposter sans ajax, car il faut
 222                 // recharger toute la page pour afficher la signature
 223                 refuser_traiter_formulaire_ajax();
 224
 225                 $statut = 'publie';
 226                 // invalider le cache !
 227                 include_spip('inc/invalideur');
 228                 suivre_invalideur("id='article/$id_article'");
 229
 230                 // message de reussite
 231                 return
 232                         _T('petitions:form_pet_signature_validee');
 233         }
 234
 235
 236         //
 237         // Cas normal : envoi d'une demande de confirmation
 238         //
 239         $row = sql_fetsel('titre,lang', 'spip_articles', "id_article=" . intval($id_article));
 240         $lang = lang_select($row['lang']);
 241         $titre = textebrut(typo($row['titre']));
 242         if ($lang) {
 243                 lang_select();
 244         }
 245
 246         if (!strlen($statut)) {
 247                 $statut = signature_test_pass();
 248         }
 249
 250         if ($lang != $GLOBALS['meta']['langue_site']) {
 251                 $url_page = parametre_url($url_page, "lang", $lang, '&');
 252         }
 253
 254         $url_page = parametre_url($url_page, 'var_confirm', $statut, '&')
 255                 . "#sp$id_article";
 256
 257         $r = _T('petitions:form_pet_mail_confirmation',
 258                 array(
 259                         'titre' => $titre,
 260                         'nom_email' => $nom,
 261                         'nom_site' => $site,
 262                         'url_site' => $url,
 263                         'url' => $url_page,
 264                         'message' => $msg
 265                 ));
 266
 267         $titre = _T('petitions:form_pet_confirmation') . " " . $titre;
 268         $envoyer_mail = charger_fonction('envoyer_mail', 'inc');
 269         if ($envoyer_mail($mail, $titre, $r)) {
 270                 return _T('petitions:form_pet_envoi_mail_confirmation', array('email' => $mail));
 271         }
 272
 273         return false; # erreur d'envoi de l'email
 274 }
 275
 276 // Creer un mot de passe aleatoire et verifier qu'il est unique
 277 // dans la table des signatures
 278 // https://code.spip.net/@signature_test_pass
 279 function signature_test_pass() {
 280         include_spip('inc/acces');
 281         do {
 282                 $passw = creer_pass_aleatoire();
 283         } while (sql_countsel('spip_signatures', "statut='$passw'") > 0);
 284
 285         return $passw;
 286 }