www/ecrire/genie/mail.php

   1 <?php
   2
   3 /***************************************************************************\
   4  *  SPIP, Systeme de publication pour l'internet                           *
   5  *                                                                         *
   6  *  Copyright (c) 2001-2016                                                *
   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 /**
  16  * Envoi du Mail des nouveautes
  17  * base sur le squelette nouveautes.html
  18  *
  19  * La meta dernier_envoi_neuf permet de marquer la date du dernier envoi
  20  * et de determiner les nouveautes publiees depuis cette date
  21  *
  22  * http://doc.spip.org/@genie_mail_dist
  23  *
  24  * @param int $t
  25  * @return int
  26  */
  27 function genie_mail_dist($t) {
  28         $adresse_neuf = $GLOBALS['meta']['adresse_neuf'];
  29         $jours_neuf = $GLOBALS['meta']['jours_neuf'];
  30
  31         $now = time();
  32         if (!isset($GLOBALS['meta']['dernier_envoi_neuf']))
  33                 ecrire_meta('dernier_envoi_neuf',date('Y-m-d H:i:s',$now - (3600 * 24 * $jours_neuf)));
  34
  35         $page = recuperer_fond('nouveautes',array('date'=>$GLOBALS['meta']['dernier_envoi_neuf'],'jours_neuf'=>$jours_neuf),array('raw'=>true));
  36
  37         if (strlen(trim($page['texte']))){
  38                 // recuperer les entetes envoyes par #HTTP_HEADER
  39                 $headers = "";
  40                 if (isset($page['entetes']) AND count($page['entetes'])){
  41                         foreach ($page['entetes'] as $k => $v)
  42                                 $headers .= (strlen($v)?"$k: $v":$k)."\n";
  43                 }
  44
  45                 include_spip("inc/notifications");
  46                 notifications_envoyer_mails($adresse_neuf,$page['texte'],"","",$headers);
  47                 ecrire_meta('dernier_envoi_neuf',date('Y-m-d H:i:s',$now));
  48         }
  49         else
  50                 spip_log("mail nouveautes : rien de neuf depuis $jours_neuf jours");
  51
  52         return 1;
  53 }
  54
  55 ?>