home *** CD-ROM | disk | FTP | other *** search
/ PC Advisor 2006 January / PCA126_DVD.iso / ADVISORS / phpBB-2.0.17 / phpBB2 / includes / smtp.php < prev    next >
Encoding:
PHP Script  |  2005-07-19  |  6.0 KB  |  209 lines
  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,v 1.16.2.10 2005/05/06 20:50:11 acydburn Exp $
  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.     while (substr($server_response, 3, 1) != ' ') 
  32.     {
  33.         if (!($server_response = fgets($socket, 256))) 
  34.         { 
  35.             message_die(GENERAL_ERROR, "Couldn't get mail server response codes", "", $line, __FILE__); 
  36.         } 
  37.     } 
  38.  
  39.     if (!(substr($server_response, 0, 3) == $response)) 
  40.     { 
  41.         message_die(GENERAL_ERROR, "Ran into problems sending Mail. Response: $server_response", "", $line, __FILE__); 
  42.     } 
  43. }
  44.  
  45. // Replacement or substitute for PHP's mail command
  46. function smtpmail($mail_to, $subject, $message, $headers = '')
  47. {
  48.     global $board_config;
  49.  
  50.     // Fix any bare linefeeds in the message to make it RFC821 Compliant.
  51.     $message = preg_replace("#(?<!\r)\n#si", "\r\n", $message);
  52.  
  53.     if ($headers != '')
  54.     {
  55.         if (is_array($headers))
  56.         {
  57.             if (sizeof($headers) > 1)
  58.             {
  59.                 $headers = join("\n", $headers);
  60.             }
  61.             else
  62.             {
  63.                 $headers = $headers[0];
  64.             }
  65.         }
  66.         $headers = chop($headers);
  67.  
  68.         // Make sure there are no bare linefeeds in the headers
  69.         $headers = preg_replace('#(?<!\r)\n#si', "\r\n", $headers);
  70.  
  71.         // Ok this is rather confusing all things considered,
  72.         // but we have to grab bcc and cc headers and treat them differently
  73.         // Something we really didn't take into consideration originally
  74.         $header_array = explode("\r\n", $headers);
  75.         @reset($header_array);
  76.  
  77.         $headers = '';
  78.         while(list(, $header) = each($header_array))
  79.         {
  80.             if (preg_match('#^cc:#si', $header))
  81.             {
  82.                 $cc = preg_replace('#^cc:(.*)#si', '\1', $header);
  83.             }
  84.             else if (preg_match('#^bcc:#si', $header))
  85.             {
  86.                 $bcc = preg_replace('#^bcc:(.*)#si', '\1', $header);
  87.                 $header = '';
  88.             }
  89.             $headers .= ($header != '') ? $header . "\r\n" : '';
  90.         }
  91.  
  92.         $headers = chop($headers);
  93.         $cc = explode(', ', $cc);
  94.         $bcc = explode(', ', $bcc);
  95.     }
  96.  
  97.     if (trim($subject) == '')
  98.     {
  99.         message_die(GENERAL_ERROR, "No email Subject specified", "", __LINE__, __FILE__);
  100.     }
  101.  
  102.     if (trim($message) == '')
  103.     {
  104.         message_die(GENERAL_ERROR, "Email message was blank", "", __LINE__, __FILE__);
  105.     }
  106.  
  107.     // Ok we have error checked as much as we can to this point let's get on
  108.     // it already.
  109.     if( !$socket = @fsockopen($board_config['smtp_host'], 25, $errno, $errstr, 20) )
  110.     {
  111.         message_die(GENERAL_ERROR, "Could not connect to smtp host : $errno : $errstr", "", __LINE__, __FILE__);
  112.     }
  113.  
  114.     // Wait for reply
  115.     server_parse($socket, "220", __LINE__);
  116.  
  117.     // Do we want to use AUTH?, send RFC2554 EHLO, else send RFC821 HELO
  118.     // This improved as provided by SirSir to accomodate
  119.     if( !empty($board_config['smtp_username']) && !empty($board_config['smtp_password']) )
  120.     { 
  121.         fputs($socket, "EHLO " . $board_config['smtp_host'] . "\r\n");
  122.         server_parse($socket, "250", __LINE__);
  123.  
  124.         fputs($socket, "AUTH LOGIN\r\n");
  125.         server_parse($socket, "334", __LINE__);
  126.  
  127.         fputs($socket, base64_encode($board_config['smtp_username']) . "\r\n");
  128.         server_parse($socket, "334", __LINE__);
  129.  
  130.         fputs($socket, base64_encode($board_config['smtp_password']) . "\r\n");
  131.         server_parse($socket, "235", __LINE__);
  132.     }
  133.     else
  134.     {
  135.         fputs($socket, "HELO " . $board_config['smtp_host'] . "\r\n");
  136.         server_parse($socket, "250", __LINE__);
  137.     }
  138.  
  139.     // From this point onward most server response codes should be 250
  140.     // Specify who the mail is from....
  141.     fputs($socket, "MAIL FROM: <" . $board_config['board_email'] . ">\r\n");
  142.     server_parse($socket, "250", __LINE__);
  143.  
  144.     // Specify each user to send to and build to header.
  145.     $to_header = '';
  146.  
  147.     // Add an additional bit of error checking to the To field.
  148.     $mail_to = (trim($mail_to) == '') ? 'Undisclosed-recipients:;' : trim($mail_to);
  149.     if (preg_match('#[^ ]+\@[^ ]+#', $mail_to))
  150.     {
  151.         fputs($socket, "RCPT TO: <$mail_to>\r\n");
  152.         server_parse($socket, "250", __LINE__);
  153.     }
  154.  
  155.     // Ok now do the CC and BCC fields...
  156.     @reset($bcc);
  157.     while(list(, $bcc_address) = each($bcc))
  158.     {
  159.         // Add an additional bit of error checking to bcc header...
  160.         $bcc_address = trim($bcc_address);
  161.         if (preg_match('#[^ ]+\@[^ ]+#', $bcc_address))
  162.         {
  163.             fputs($socket, "RCPT TO: <$bcc_address>\r\n");
  164.             server_parse($socket, "250", __LINE__);
  165.         }
  166.     }
  167.  
  168.     @reset($cc);
  169.     while(list(, $cc_address) = each($cc))
  170.     {
  171.         // Add an additional bit of error checking to cc header
  172.         $cc_address = trim($cc_address);
  173.         if (preg_match('#[^ ]+\@[^ ]+#', $cc_address))
  174.         {
  175.             fputs($socket, "RCPT TO: <$cc_address>\r\n");
  176.             server_parse($socket, "250", __LINE__);
  177.         }
  178.     }
  179.  
  180.     // Ok now we tell the server we are ready to start sending data
  181.     fputs($socket, "DATA\r\n");
  182.  
  183.     // This is the last response code we look for until the end of the message.
  184.     server_parse($socket, "354", __LINE__);
  185.  
  186.     // Send the Subject Line...
  187.     fputs($socket, "Subject: $subject\r\n");
  188.  
  189.     // Now the To Header.
  190.     fputs($socket, "To: $mail_to\r\n");
  191.  
  192.     // Now any custom headers....
  193.     fputs($socket, "$headers\r\n\r\n");
  194.  
  195.     // Ok now we are ready for the message...
  196.     fputs($socket, "$message\r\n");
  197.  
  198.     // Ok the all the ingredients are mixed in let's cook this puppy...
  199.     fputs($socket, ".\r\n");
  200.     server_parse($socket, "250", __LINE__);
  201.  
  202.     // Now tell the server we are done and close the socket...
  203.     fputs($socket, "QUIT\r\n");
  204.     fclose($socket);
  205.  
  206.     return TRUE;
  207. }
  208.  
  209. ?>