classes/plmailer.php

   1 <?php
   2 /***************************************************************************
   3  *  Copyright (C) 2003-2008 Polytechnique.org                              *
   4  *  http://opensource.polytechnique.org/                                   *
   5  *                                                                         *
   6  *  This program is free software; you can redistribute it and/or modify   *
   7  *  it under the terms of the GNU General Public License as published by   *
   8  *  the Free Software Foundation; either version 2 of the License, or      *
   9  *  (at your option) any later version.                                    *
  10  *                                                                         *
  11  *  This program is distributed in the hope that it will be useful,        *
  12  *  but WITHOUT ANY WARRANTY; without even the implied warranty of         *
  13  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the          *
  14  *  GNU General Public License for more details.                           *
  15  *                                                                         *
  16  *  You should have received a copy of the GNU General Public License      *
  17  *  along with this program; if not, write to the Free Software            *
  18  *  Foundation, Inc.,                                                      *
  19  *  59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                *
  20  ***************************************************************************/
  21
  22 require_once('smarty/libs/Smarty.class.php');
  23
  24 /** Classe de mail avec corps en templates.
  25  */
  26 class PlMail extends Smarty
  27 {
  28     private $tpl;
  29     private $mailer = null;
  30
  31     function __construct($tpl)
  32     {
  33         global $globals;
  34         $this->tpl           = $tpl;
  35         $this->caching       = false;
  36         $this->compile_check = true;
  37
  38         $this->template_dir  = $globals->spoolroot . "/templates/";
  39         $this->compile_dir   = $globals->spoolroot . "/spool/mails_c/";
  40         $this->config_dir    = $globals->spoolroot . "/configs/";
  41         array_unshift($this->plugins_dir, $globals->spoolroot."/plugins/");
  42
  43         $this->register_outputfilter(Array($this, 'mail_format'));
  44         $this->register_function('from',    Array($this, 'setFrom'));
  45         $this->register_function('to',      Array($this, 'addTo'));
  46         $this->register_function('cc',      Array($this, 'addCc'));
  47         $this->register_function('bcc',     Array($this, 'addBcc'));
  48         $this->register_function('subject', Array($this, 'setSubject'));
  49         $this->register_function('add_header', Array($this, 'addHeader'));
  50         $this->assign_by_ref('globals', $globals);
  51     }
  52
  53     public static function &get(&$mailer, $tpl)
  54     {
  55         static $plmail;
  56         if (!isset($plmail) || $plmail->tpl != $tpl) {
  57             $plmail = new PlMail($tpl);
  58         }
  59         $plmail->mailer =& $mailer;
  60         return $plmail;
  61     }
  62
  63     public function run($version)
  64     {
  65         $this->assign('mail_part', $version);
  66         $text = $this->fetch($this->tpl);
  67         if ($version == 'text') {
  68             return wordwrap($text, 78);
  69         }
  70         return $text;
  71     }
  72
  73     /** used to remove the empty lines due to {from ...}, {to ...} ... functions */
  74     static public function mail_format($output, &$smarty)
  75     {
  76         return "\n".trim($output)."\n";
  77     }
  78
  79     static protected function format_addr(&$params)
  80     {
  81         if (isset($params['full'])) {
  82             return $params['full'];
  83         } elseif (empty($params['text'])) {
  84             return $params['addr'];
  85         } else {
  86             return $params['text'].' <'.$params['addr'].'>';
  87         }
  88     }
  89
  90     /** template function : from.
  91      * {from full=...} for an already formatted address
  92      * {from addr=... [text=...]} else
  93      */
  94     public function setFrom($params, &$smarty)
  95     {
  96         $smarty->mailer->setFrom(PlMail::format_addr($params));
  97     }
  98
  99     /** template function : to.
 100      * {to full=...} for an already formatted address
 101      * {to addr=... [text=...]} else
 102      */
 103     public function addTo($params, &$smarty)
 104     {
 105         $smarty->mailer->addTo(PlMail::format_addr($params));
 106     }
 107
 108     /** template function : cc.
 109      * {cc full=...} for an already formatted address
 110      * {cc addr=... [text=...]} else
 111      */
 112     public function addCc($params, &$smarty)
 113     {
 114         $smarty->mailer->addCc(PlMail::format_addr($params));
 115     }
 116
 117     /** template function : bcc.
 118      * {bcc full=...} for an already formatted address
 119      * {bcc addr=... [text=...]} else
 120      */
 121     public function addBcc($params, &$smarty)
 122     {
 123         $smarty->mailer->addBcc(PlMail::format_addr($params));
 124     }
 125
 126     /** template function : subject.
 127      * {subject text=...}
 128      */
 129     public function setSubject($params, &$smarty)
 130     {
 131         $smarty->mailer->setSubject($params['text']);
 132     }
 133
 134     /** template function : add_header.
 135      * {add_header name=... value=...}
 136      */
 137     public function addHeader($params, &$smarty)
 138     {
 139         $smarty->mailer->addHeader($params['name'], $params['value']);
 140     }
 141 }
 142
 143 require_once('Mail.php');
 144 require_once('Mail/mime.php');
 145
 146 /** Class for sending inline or multipart-emails.
 147  * Based on Diogenes' HermesMailer
 148  */
 149 class PlMailer extends Mail_Mime {
 150
 151     private $mail;
 152     private $page    = null;
 153     private $charset;
 154     private $wiki    = null;
 155
 156     function __construct($tpl = null, $charset = "UTF-8")
 157     {
 158         $this->charset = $charset;
 159         $this->Mail_Mime("\n");
 160         $this->mail = Mail::factory('sendmail', Array('sendmail_args' => '-oi'));
 161         if (!is_null($tpl)) {
 162             $this->page =& PlMail::get($this, $tpl);
 163         }
 164     }
 165
 166     /**
 167      * converts all : Foo Bar Baz <quux@foobar.org> into "Foo Bar Baz" <quux@foobar.org> which is RFC compliant
 168      */
 169     private function correct_emails($email)
 170     {
 171         return preg_replace('!(^|, *)([^<"]+?) *(<[^>]*>)!u', '\1"\2" \3', $email);
 172     }
 173
 174     public function addTo($email)
 175     {
 176         $email = $this->correct_emails($email);
 177         if (isset($this->_headers['To'])) {
 178             $this->_headers['To'] .= ", $email";
 179         } else {
 180             $this->_headers['To'] = $email;
 181         }
 182     }
 183
 184     public function addCc($email)
 185     {
 186         return parent::addCc($this->correct_emails($email));
 187     }
 188
 189     public function addBcc($email)
 190     {
 191         return parent::addBcc($this->correct_emails($email));
 192     }
 193
 194     public function setFrom($email)
 195     {
 196         return parent::setFrom($this->correct_emails($email));
 197     }
 198
 199     public function addHeader($hdr,$val)
 200     {
 201         switch($hdr) {
 202             case 'From':
 203                 $this->setFrom($val);
 204                 break;
 205
 206             case 'To':
 207                 unset($this->_headers[$hdr]);
 208                 $this->addTo($val);
 209                 break;
 210
 211             case 'Cc':
 212                 unset($this->_headers[$hdr]);
 213                 $this->addCc($val);
 214                 break;
 215
 216             case 'Bcc':
 217                 unset($this->_headers[$hdr]);
 218                 $this->addBcc($val);
 219                 break;
 220
 221             default:
 222                 $this->headers(Array($hdr=>$val));
 223         }
 224     }
 225
 226     public function addUploadAttachment(PlUpload &$upload, $name)
 227     {
 228         $encoding = $upload->isType('text') ? 'quoted-printable' : 'base64';
 229         $this->addAttachment($upload->getContents(), $upload->contentType(), $name, false, $encoding);
 230     }
 231
 232     public function assign($var, $value)
 233     {
 234         if (!is_null($this->page)) {
 235             $this->page->assign($var, $value);
 236         }
 237     }
 238
 239     public function assign_by_ref($var, &$value)
 240     {
 241         if (!is_null($this->page)) {
 242             $this->page->assign_by_ref($var, $value);
 243         }
 244     }
 245
 246     public function register_modifier($var, $callback)
 247     {
 248         if (!is_null($this->page)) {
 249             $this->page->register_modifier($var, $callback);
 250         }
 251     }
 252
 253     public function register_function($var, $callback)
 254     {
 255         if (!is_null($this->page)) {
 256             $this->page->register_function($var, $callback);
 257         }
 258     }
 259
 260     public function setWikiBody($wiki)
 261     {
 262         $this->wiki = $wiki;
 263     }
 264
 265     private function processPage($with_html = true)
 266     {
 267         if (!is_null($this->page)) {
 268             global $globals;
 269             if (!($globals->debug & DEBUG_SMARTY)) {
 270                 $level = error_reporting(0);
 271             }
 272             $this->page->run('head'); // process page headers
 273             $this->wiki = trim($this->page->run('wiki')); // get wiki
 274             if (!$this->wiki) {
 275                 $this->setTxtBody($this->page->run('text'));
 276                 if ($with_html) {
 277                     $html = trim($this->page->run('html'));
 278                     if (!empty($html)) {
 279                         $this->setHtmlBody($html);
 280                     }
 281                 }
 282             }
 283             if (!($globals->debug & DEBUG_SMARTY)) {
 284                 error_reporting($level);
 285             }
 286         }
 287         if ($this->wiki) {
 288             $this->setTxtBody(MiniWiki::WikiToText($this->wiki, false, 0, 78));
 289             if ($with_html) {
 290                 $this->setHtmlBody('<html><body>' . MiniWiki::WikiToHtml($this->wiki, true) . '</body></html>');
 291             }
 292         }
 293     }
 294
 295     public function send($with_html = true)
 296     {
 297         $this->processPage($with_html);
 298         if (S::v('forlife')) {
 299             global $globals;
 300             $this->addHeader('X-Org-Mail', S::v('forlife') . '@' . $globals->mail->domain);
 301         }
 302         $addrs = Array();
 303         foreach(Array('To', 'Cc', 'Bcc') as $hdr) {
 304             if(isset($this->_headers[$hdr])) {
 305                 require_once 'Mail/RFC822.php';
 306                 $parsed = @Mail_RFC822::parseAddressList($this->_headers[$hdr]);
 307                 if (is_array($parsed)) {
 308                     $addrs = array_merge($addrs, $parsed);
 309                 }
 310             }
 311         }
 312         if(empty($addrs)) {
 313             return false;
 314         }
 315
 316         $dests = Array();
 317         foreach($addrs as $a) {
 318             $dests[] = "{$a->mailbox}@{$a->host}";
 319         }
 320
 321         // very important to do it in THIS order very precisely.
 322         $body = $this->get(array('text_charset' => $this->charset,
 323                                  'text_encoding' => '8bit',
 324                                  'html_charset' => $this->charset,
 325                                  'head_charset' => $this->charset));
 326         $hdrs = $this->headers();
 327         if (empty($hdrs['From'])) {
 328             trigger_error('Empty "From", mail not sent', E_USER_WARNING);
 329             return false;
 330         }
 331         return $this->mail->send($dests, $hdrs, $body);
 332     }
 333 }
 334
 335 // vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8:
 336 ?>