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 \***************************************************************************/
14 if (!defined('_ECRIRE_INC_VERSION')) return;
16 function formulaires_ecrire_auteur_charger_dist($id_auteur, $id_article, $mail){
17 include_spip('inc/texte');
18 $puce = definir_puce();
20 'sujet_message_auteur'=>'',
21 'texte_message_auteur'=>'',
22 'email_message_auteur'=>isset($GLOBALS['visiteur_session']['email'])?
$GLOBALS['visiteur_session']['email']:'',
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;
35 function formulaires_ecrire_auteur_verifier_dist($id_auteur, $id_article, $mail){
37 include_spip('inc/filtres');
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');
44 include_spip('inc/session');
45 session_set('email', $adres);
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');
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');
58 if (_request('nobot'))
59 $erreurs['message_erreur'] = _T('pass_rien_a_faire_ici');
61 if (!_request('confirmer') AND !count($erreurs))
62 $erreurs['previsu']=' ';
66 function formulaires_ecrire_auteur_traiter_dist($id_auteur, $id_article, $mail){
68 $adres = _request('email_message_auteur');
69 $sujet = _request('sujet_message_auteur');
71 $sujet = "[".supprimer_tags(extraire_multi($GLOBALS['meta']['nom_site']))."] "
72 . _T('info_message_2')." "
74 $texte=_request('texte_message_auteur');
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');
79 if ($envoyer_mail($mail, $sujet, $texte, $adres,
80 "X-Originating-IP: ".$GLOBALS['ip']))
81 $message = _T('form_prop_message_envoye');
83 $message = _T('pass_erreur_probleme_technique');
85 return array('message_ok'=>$message);