source: spip-zone/_plugins_/recommander/formulaires/recommander.php @ 40008

Last change on this file since 40008 was 40008, checked in by cedric@…, 10 years ago

modernisation du plugin recommander (CVT)

File size: 2.1 KB
Line 
1<?php
2/*
3 * Plugin Recommander a un ami
4 * (c) 2006-2010 Fil
5 * Distribue sous licence GPL
6 *
7 */
8
9include_spip('inc/filtres');
10
11/**
12 * Charger les valeurs du formulaire recommander
13 * @param string $titre
14 * @param string $url
15 * @param string $texte
16 * @param string $subject
17 * @return string
18 */
19function formulaire_recommander_charger_dist($titre, $url='', $texte='', $subject=''){
20        $valeurs = array(
21                'recommander_from'=> '',
22                'recommander_to'=> '',
23                'recommander_message'=> ''
24        );
25
26        return $valeurs;
27}
28
29/**
30 * Verifier les valeurs du formulaire recommander
31 * @param string $titre
32 * @param string $url
33 * @param string $texte
34 * @param string $subject
35 * @return string
36 */
37function formulaire_recommander_verifier_dist($titre, $url='', $texte='', $subject=''){
38        $erreurs = array();
39
40        foreach(array('recommander_from','recommander_to') as $c) {
41                if (!$email = trim(_request($c)))
42                        $erreurs[$c] = _T('form_prop_indiquer_email');
43                elseif (!email_valide($email))
44                        $erreurs[$c] = _T('pass_erreur_non_valide', array(
45                                'email_oubli' => htmlspecialchars($email)
46                                )
47                        );
48        }
49
50        return $erreurs;
51}
52
53
54/**
55 * Envoyer le mail
56 * @param string $titre
57 * @param string $url
58 * @param string $texte
59 * @param string $subject
60 * @return string
61 */
62function formulaire_recommander_traiter_dist($titre, $url='', $texte='', $subject=''){
63
64        $subject = sinon ($subject,
65                _L("A lire sur ").$GLOBALS['meta']['nom_site']." -- "
66                .sinon($titre, _request('recommander_titre'))
67        );
68
69        $contexte = array(
70                'titre'=>$titre,
71                'texte'=>$texte,
72                'url'=>$url ? $url : self(),
73                'recommander_from'=>_request('recommander_from'),
74                'recommander_to'=>_request('recommander_to'),
75                'recommander_message'=>_request('recommander_message'),
76        );
77        $body = recuperer_fond('modeles/recommander_email',$contexte);
78
79        $envoyer_mail = charger_fonction('envoyer_mail','inc');
80        if (!$envoyer_mail(
81                _request('recommander_to'),
82                $subject,
83                $body,
84                _request('recommander_from'),
85                "X-Originating-IP: ".$GLOBALS['ip']
86        ))
87                return array('message_erreur' => _L("Erreur lors de l'envoi du message."));
88        else
89                return array('message_ok' => recuperer_fond('modeles/recommander_envoye',$contexte));
90}
91
92?>
Note: See TracBrowser for help on using the repository browser.