www/squelettes-dist/formulaires/ecrire_auteur.php

   1 <?php
   2
   3 /***************************************************************************\
   4  *  SPIP, Systeme de publication pour l'internet                           *
   5  *                                                                         *
   6  *  Copyright (c) 2001-2013                                                *
   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
  14 if (!defined('_ECRIRE_INC_VERSION')) return;
  15
  16 function formulaires_ecrire_auteur_charger_dist($id_auteur, $id_article, $mail){
  17         include_spip('inc/texte');
  18         $puce = definir_puce();
  19         $valeurs = array(
  20                 'sujet_message_auteur'=>'',
  21                 'texte_message_auteur'=>'',
  22                 'email_message_auteur'=>isset($GLOBALS['visiteur_session']['email'])?$GLOBALS['visiteur_session']['email']:'',
  23         );
  24
  25         // id du formulaire (pour en avoir plusieurs sur une meme page)
  26         $valeurs['id'] = ($id_auteur ? '_'.$id_auteur : '_ar'.$id_article);
  27         // passer l'id_auteur au squelette
  28         $valeurs['id_auteur'] = $id_auteur;
  29         $valeurs['id_article'] = $id_article;
  30
  31         return $valeurs;
  32 }
  33
  34 function formulaires_ecrire_auteur_verifier_dist($id_auteur, $id_article, $mail){
  35         $erreurs = array();
  36         include_spip('inc/filtres');
  37
  38         if (!$adres = _request('email_message_auteur'))
  39                 $erreurs['email_message_auteur'] = _T("info_obligatoire");
  40         elseif(!email_valide($adres))
  41                 $erreurs['email_message_auteur'] = _T('form_prop_indiquer_email');
  42         else {
  43                 include_spip('inc/session');
  44                 session_set('email', $adres);
  45         }
  46
  47         $sujet=_request('sujet_message_auteur');
  48         if($sujet AND !(strlen($sujet)>3))
  49                 $erreurs['sujet_message_auteur'] = _T('forum_attention_trois_caracteres');
  50
  51         if (!$texte=_request('texte_message_auteur'))
  52                 $erreurs['texte_message_auteur'] = _T("info_obligatoire");
  53         elseif(!(strlen($texte)>10))
  54                 $erreurs['texte_message_auteur'] = _T('forum_attention_dix_caracteres');
  55
  56         if (!_request('confirmer') AND !count($erreurs))
  57                 $erreurs['previsu']=' ';
  58         return $erreurs;
  59 }
  60
  61 function formulaires_ecrire_auteur_traiter_dist($id_auteur, $id_article, $mail){
  62
  63         $adres = _request('email_message_auteur');
  64         $sujet = _request('sujet_message_auteur');
  65
  66         $sujet = "[".supprimer_tags(extraire_multi($GLOBALS['meta']['nom_site']))."] "
  67                 . _T('info_message_2')." "
  68           . $sujet;
  69         $texte=_request('texte_message_auteur');
  70
  71         $texte .= "\n\n-- "._T('envoi_via_le_site')." ".supprimer_tags(extraire_multi($GLOBALS['meta']['nom_site']))." (".$GLOBALS['meta']['adresse_site']."/) --\n";
  72         $envoyer_mail = charger_fonction('envoyer_mail','inc');
  73
  74         if ($envoyer_mail($mail, $sujet, $texte, $adres,
  75         "X-Originating-IP: ".$GLOBALS['ip']))
  76                 $message = _T('form_prop_message_envoye');
  77         else
  78                 $message = _T('pass_erreur_probleme_technique');
  79
  80         return array('message_ok'=>$message);
  81 }
  82
  83 ?>