[SPIP Zone] r3639 - in /_contribs_/_formulaires_/recommander: envoyer.php recommander.php

Author: fil@rezo.net
Date: Sat Jun 24 00:35:26 2006
New Revision: 3639

Log:
recommander suite

Added:
    _contribs_/_formulaires_/recommander/recommander.php
      - copied unchanged from r3638, _contribs_/_formulaires_/recommander/envoyer.php
Removed:
    _contribs_/_formulaires_/recommander/envoyer.php

Removed: _contribs_/_formulaires_/recommander/envoyer.php

--- _contribs_/_formulaires_/recommander/envoyer.php (original)
+++ _contribs_/_formulaires_/recommander/envoyer.php (removed)
@@ -1,123 +0,0 @@
-<?php
-
-// Envoyer cet article par email
-//
-// On l'ajoute dans n'importe quel squelette en precisant
-// comme parametre d'inclusion :
-// - le titre de la page
-// - l'url de la page
-// - le texte a afficher
-//
-// <INCLURE(recommander.php) {titre=#TITRE} {url=#URL_ARTICLE}
-// {texte=#INTRODUCTION} {lang}>
-//
-// On peut ajouter {subject=xxxx} si on veut fixer le sujet,
-// sinon par defaut c'est "A lire sur #NOM_SITE -- #ENV{titre}"
-
-// TODO :
-// - internationalisation
-// - presentation (squelette ?)
-// - previsualisation et explications (on va envoyer ce message de votre part)
-
-if (!defined("_ECRIRE_INC_VERSION")) return;
-
-//
-// Fonction appelee des qu'il y a un $_POST avec le bouton 'recommander'
-//
-function recommander($contexte_inclus) {
- $retour = '';
-
- // verifier que le formulaire est bien rempli
- if (!email_valide(_request('recommander_from')))
- $retour = _T('pass_erreur_non_valide',
- array(
- 'email_oubli' => htmlspecialchars(_request('recommander_from'))
- )
- );
-
- if (!email_valide(_request('recommander_to')))
- $retour = _T('pass_erreur_non_valide',
- array(
- 'email_oubli' => htmlspecialchars(_request('recommander_to'))
- )
- );
-
- if ($retour)
- return $retour;
-
- // envoyer le mail
- include_spip('inc/filtres');
- include_spip('inc/mail');
-# var_dump($contexte_inclus);
-
-# i18n
-# _T('recommander_titre', array('nom_site' =>
-# supprimer_tags(extraire_multi($GLOBALS['meta']['nom_site'])))
- $subject = sinon ($contexte_inclus['subject'],
- _L("A lire sur ").lire_meta('nom_site')." -- "
- .$contexte_inclus['titre']
- );
-
-# i18n
-# _T('recommander_lecture', array('from' => _request('recommander_from')))
- $body = _request('recommander_from')
- . " vous recommande la lecture de cet article :\n\n"
- . $contexte_inclus['titre']."\n"
- . url_absolue(sinon ($contexte_inclus['url'], self()))
- . "\n\n"
- . _request('recommander_message')
- . "\n\n-- "._T('envoi_via_le_site')
- . " ".supprimer_tags(extraire_multi($GLOBALS['meta']['nom_site']))
- . " (".$GLOBALS['meta']['adresse_site']."/) --\n";
-
- if (!envoyer_mail(
- _request('recommander_to'),
- $subject,
- $body,
- _request('recommander_from'),
- "X-Originating-IP: ".$GLOBALS['ip']
- ))
- return "Erreur lors de l'envoi du message.";
-
-}
-
-
-//
-// Fonction de base de cet INCLURE
-//
-// Dans la variable $contexte_inclus on trouve les donnees de l'article
-// dans _request() les donnees du visiteur
-function main_recommander() {
- $erreur ='';
- lang_select($GLOBALS['contexte_inclus']['lang']);
- if (!_request('recommander_email')
- OR $erreur = recommander($GLOBALS['contexte_inclus'])) {
-
- $r = $erreur;
-
- // le formulaire normal
- $r .= "<form method='post' action='".self()."'>";
- $r .= _T('form_pet_votre_email')." <input type='text' name='recommander_from'
- value='".htmlspecialchars(_request('recommander_from'))."' />";
- $r .= "<br />"._L('destinataire :')." <input type='text' name='recommander_to'
- value='".htmlspecialchars(_request('recommander_to'))."' />";
- $r .= "<br />"._T('forum_texte')." <input type='text' name='recommander_message'
- value='".htmlspecialchars(_request('recommander_message'))."' />";
- $r .= "<input type='submit' name='recommander_email' value='"._T('recommander_message')."' />";
- $r .= "</form>";
-
- } else {
- $r .= _T('form_prop_message_envoye');
- }
- lang_dselect();
-
- return $r;
-}
-
-// main()
-echo #"<script type='text/javascript' src='../ahah/ahah.js'></script>\n",
- "<div id='recommander'>\n",
- main_recommander(),
- "</div>\n";
-
-?>