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