[Summary view] [Print] [Text view]

   1  <?php
   2  /***************************************************************************
   3   *                              smtp.php
   4   *                       -------------------
   5   *   begin                : Wed May 09 2001
   6   *   copyright            : (C) 2001 The phpBB Group
   7   *   email                : support@phpbb.com
   8   *
   9   *   $Id: smtp.php 5230 2005-09-27 20:24:35Z grahamje $
  10   *
  11   ***************************************************************************/
  12  
  13  /***************************************************************************
  14   *
  15   *   This program is free software; you can redistribute it and/or modify
  16   *   it under the terms of the GNU General Public License as published by
  17   *   the Free Software Foundation; either version 2 of the License, or
  18   *   (at your option) any later version.
  19   *
  20   ***************************************************************************/
  21  
  22  define('SMTP_INCLUDED', 1);
  23  
  24  //
  25  // This function has been modified as provided
  26  // by SirSir to allow multiline responses when 
  27  // using SMTP Extensions
  28  //
  29  function server_parse($socket, $response, $line = __LINE__) 
  30  {
  31      $server_response = '';
  32      while (substr($server_response, 3, 1) != ' ') 
  33      {
  34          if (!($server_response = fgets($socket, 256))) 
  35          { 
  36              message_die(GENERAL_ERROR, "Couldn't get mail server response codes", "", $line, __FILE__); 
  37          } 
  38      } 
  39  
  40      if (!(substr($server_response, 0, 3) == $response)) 
  41      { 
  42          message_die(GENERAL_ERROR, "Ran into problems sending Mail. Response: $server_response", "", $line, __FILE__); 
  43      } 
  44  }
  45  
  46  // Replacement or substitute for PHP's mail command
  47  function smtpmail($mail_to, $subject, $message, $headers = '')
  48  {
  49      global $board_config;
  50  
  51      // Fix any bare linefeeds in the message to make it RFC821 Compliant.
  52      $message = preg_replace("#(?<!\r)\n#si", "\r\n", $message);
  53  
  54      if ($headers != '')
  55      {
  56          if (is_array($headers))
  57          {
  58              if (sizeof($headers) > 1)
  59              {
  60                  $headers = join("\n", $headers);
  61              }
  62              else
  63              {
  64                  $headers = $headers[0];
  65              }
  66          }
  67          $headers = chop($headers);
  68  
  69          // Make sure there are no bare linefeeds in the headers
  70          $headers = preg_replace('#(?<!\r)\n#si', "\r\n", $headers);
  71  
  72          // Ok this is rather confusing all things considered,
  73          // but we have to grab bcc and cc headers and treat them differently
  74          // Something we really didn't take into consideration originally
  75          $header_array = explode("\r\n", $headers);
  76          @reset($header_array);
  77  
  78          $headers = '';
  79          while(list(, $header) = each($header_array))
  80          {
  81              if (preg_match('#^cc:#si', $header))
  82              {
  83                  $cc = preg_replace('#^cc:(.*)#si', '\1', $header);
  84              }
  85              else if (preg_match('#^bcc:#si', $header))
  86              {
  87                  $bcc = preg_replace('#^bcc:(.*)#si', '\1', $header);
  88                  $header = '';
  89              }
  90              $headers .= ($header != '') ? $header . "\r\n" : '';
  91          }
  92  
  93          $headers = chop($headers);
  94          $cc = explode(', ', $cc);
  95          $bcc = explode(', ', $bcc);
  96      }
  97  
  98      if (trim($subject) == '')
  99      {
 100          message_die(GENERAL_ERROR, "No email Subject specified", "", __LINE__, __FILE__);
 101      }
 102  
 103      if (trim($message) == '')
 104      {
 105          message_die(GENERAL_ERROR, "Email message was blank", "", __LINE__, __FILE__);
 106      }
 107  
 108      // Ok we have error checked as much as we can to this point let's get on
 109      // it already.
 110      if( !$socket = @fsockopen($board_config['smtp_host'], 25, $errno, $errstr, 20) )
 111      {
 112          message_die(GENERAL_ERROR, "Could not connect to smtp host : $errno : $errstr", "", __LINE__, __FILE__);
 113      }
 114  
 115      // Wait for reply
 116      server_parse($socket, "220", __LINE__);
 117  
 118      // Do we want to use AUTH?, send RFC2554 EHLO, else send RFC821 HELO
 119      // This improved as provided by SirSir to accomodate
 120      if( !empty($board_config['smtp_username']) && !empty($board_config['smtp_password']) )
 121      { 
 122          fputs($socket, "EHLO " . $board_config['smtp_host'] . "\r\n");
 123          server_parse($socket, "250", __LINE__);
 124  
 125          fputs($socket, "AUTH LOGIN\r\n");
 126          server_parse($socket, "334", __LINE__);
 127  
 128          fputs($socket, base64_encode($board_config['smtp_username']) . "\r\n");
 129          server_parse($socket, "334", __LINE__);
 130  
 131          fputs($socket, base64_encode($board_config['smtp_password']) . "\r\n");
 132          server_parse($socket, "235", __LINE__);
 133      }
 134      else
 135      {
 136          fputs($socket, "HELO " . $board_config['smtp_host'] . "\r\n");
 137          server_parse($socket, "250", __LINE__);
 138      }
 139  
 140      // From this point onward most server response codes should be 250
 141      // Specify who the mail is from....
 142      fputs($socket, "MAIL FROM: <" . $board_config['board_email'] . ">\r\n");
 143      server_parse($socket, "250", __LINE__);
 144  
 145      // Specify each user to send to and build to header.
 146      $to_header = '';
 147  
 148      // Add an additional bit of error checking to the To field.
 149      $mail_to = (trim($mail_to) == '') ? 'Undisclosed-recipients:;' : trim($mail_to);
 150      if (preg_match('#[^ ]+\@[^ ]+#', $mail_to))
 151      {
 152          fputs($socket, "RCPT TO: <$mail_to>\r\n");
 153          server_parse($socket, "250", __LINE__);
 154      }
 155  
 156      // Ok now do the CC and BCC fields...
 157      @reset($bcc);
 158      while(list(, $bcc_address) = each($bcc))
 159      {
 160          // Add an additional bit of error checking to bcc header...
 161          $bcc_address = trim($bcc_address);
 162          if (preg_match('#[^ ]+\@[^ ]+#', $bcc_address))
 163          {
 164              fputs($socket, "RCPT TO: <$bcc_address>\r\n");
 165              server_parse($socket, "250", __LINE__);
 166          }
 167      }
 168  
 169      @reset($cc);
 170      while(list(, $cc_address) = each($cc))
 171      {
 172          // Add an additional bit of error checking to cc header
 173          $cc_address = trim($cc_address);
 174          if (preg_match('#[^ ]+\@[^ ]+#', $cc_address))
 175          {
 176              fputs($socket, "RCPT TO: <$cc_address>\r\n");
 177              server_parse($socket, "250", __LINE__);
 178          }
 179      }
 180  
 181      // Ok now we tell the server we are ready to start sending data
 182      fputs($socket, "DATA\r\n");
 183  
 184      // This is the last response code we look for until the end of the message.
 185      server_parse($socket, "354", __LINE__);
 186  
 187      // Send the Subject Line...
 188      fputs($socket, "Subject: $subject\r\n");
 189  
 190      // Now the To Header.
 191      fputs($socket, "To: $mail_to\r\n");
 192  
 193      // Now any custom headers....
 194      fputs($socket, "$headers\r\n\r\n");
 195  
 196      // Ok now we are ready for the message...
 197      fputs($socket, "$message\r\n");
 198  
 199      // Ok the all the ingredients are mixed in let's cook this puppy...
 200      fputs($socket, ".\r\n");
 201      server_parse($socket, "250", __LINE__);
 202  
 203      // Now tell the server we are done and close the socket...
 204      fputs($socket, "QUIT\r\n");
 205      fclose($socket);
 206  
 207      return TRUE;
 208  }
 209  
 210  ?>