www/squelettes-dist/formulaires/ecrire_auteur.php

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