includes/UserMailer.php

   1 <?php
   2
   3 # This function will perform a direct (authenticated) login to
   4 # a SMTP Server to use for mail relaying if 'wgSMTP' specifies an
   5 # array of parameters. It requires PEAR:Mail to do that.
   6 # Otherwise it just uses the standard PHP 'mail' function.
   7 function userMailer( $to, $from, $subject, $body )
   8 {
   9         global $wgUser, $wgSMTP, $wgOutputEncoding, $wgErrorString;
  10
  11         $qto = wfQuotedPrintable( $to );
  12
  13         if (is_array( $wgSMTP ))
  14         {
  15                 require_once( "Mail.php" );
  16
  17                 $timestamp = time();
  18
  19                 $headers["From"] = $from;
  20 /* removing to: field as it should be set by the send() function below
  21    UNTESTED - Hashar */
  22 //              $headers["To"] = $qto;
  23                 $headers["Subject"] = $subject;
  24                 $headers["MIME-Version"] = "1.0";
  25                 $headers["Content-type"] = "text/plain; charset={$wgOutputEncoding}";
  26                 $headers["Content-transfer-encoding"] = "8bit";
  27                 $headers["Message-ID"] = "<{$timestamp}" . $wgUser->getName() . "@" . $wgSMTP["IDHost"] . ">";
  28                 $headers["X-Mailer"] = "MediaWiki interuser e-mailer";
  29
  30                 // Create the mail object using the Mail::factory method
  31                 $mail_object =& Mail::factory("smtp", $wgSMTP);
  32
  33                 $mailResult =& $mail_object->send($to, $headers, $body);
  34
  35                 # Based on the result return an error string,
  36                 if ($mailResult === true)
  37                         return "";
  38                 else if (is_object($mailResult))
  39                         return $mailResult->getMessage();
  40                 else
  41                         return "Mail object return unknown error.";
  42         }
  43
  44         else
  45         {
  46                 $headers =
  47                         "MIME-Version: 1.0\r\n" .
  48                         "Content-type: text/plain; charset={$wgOutputEncoding}\r\n" .
  49                         "Content-transfer-encoding: 8bit\r\n" .
  50                         "From: {$from}\r\n" .
  51                         "X-Mailer: MediaWiki interuser e-mailer";
  52
  53                 $wgErrorString = "";
  54                 set_error_handler( "mailErrorHandler" );
  55                 mail( $to, $subject, $body, $headers );
  56                 restore_error_handler();
  57
  58                 return $wgErrorString;
  59         }
  60 }
  61
  62 function mailErrorHandler( $code, $string ) {
  63         global $wgErrorString;
  64         $wgErrorString = preg_replace( "/^mail\(\): /", "", $string );
  65 }
  66
  67 ?>