/prolabBeta/includes/smtp.php
PHP | 248 lines | 129 code | 32 blank | 87 comment | 22 complexity | 0d3f4dcfbaff80224492a7fc5d45ab76 MD5 | raw file
- <?php
- /***************************************************************************
- * smtp.php
- * -------------------
- * begin : Wed May 09 2001
- * copyright : (C) 2001 The phpBB Group
- * email : support@phpbb.com
- *
- * $Id: smtp.php,v 1.16.2.5 2003/06/12 19:20:20 acydburn Exp $
- *
- ***************************************************************************/
- /***************************************************************************
- * phpbb2 forums port version 2.0.5 (c) 2003 - Nuke Cops (http://nukecops.com)
- *
- * Ported by Nuke Cops to phpbb2 standalone 2.0.5 Test
- * and debugging completed by the Elite Nukers and site members.
- *
- * You run this package at your sole risk. Nuke Cops and affiliates cannot
- * be held liable if anything goes wrong. You are advised to test this
- * package on a development system. Backup everything before implementing
- * in a production environment. If something goes wrong, you can always
- * backout and restore your backups.
- *
- * Installing and running this also means you agree to the terms of the AUP
- * found at Nuke Cops.
- *
- * This is version 2.0.5 of the phpbb2 forum port for PHP-Nuke. Work is based
- * on Tom Nitzschner's forum port version 2.0.6. Tom's 2.0.6 port was based
- * on the phpbb2 standalone version 2.0.3. Our version 2.0.5 from Nuke Cops is
- * now reflecting phpbb2 standalone 2.0.5 that fixes some bugs and the
- * invalid_session error message.
- ***************************************************************************/
- /***************************************************************************
- * This file is part of the phpBB2 port to Nuke 6.0 (c) copyright 2002
- * by Tom Nitzschner (tom@toms-home.com)
- * http://bbtonuke.sourceforge.net (or http://www.toms-home.com)
- *
- * As always, make a backup before messing with anything. All code
- * release by me is considered sample code only. It may be fully
- * functual, but you use it at your own risk, if you break it,
- * you get to fix it too. No waranty is given or implied.
- *
- * Please post all questions/request about this port on http://bbtonuke.sourceforge.net first,
- * then on my site. All original header code and copyright messages will be maintained
- * to give credit where credit is due. If you modify this, the only requirement is
- * that you also maintain all original copyright messages. All my work is released
- * under the GNU GENERAL PUBLIC LICENSE. Please see the README for more information.
- *
- ***************************************************************************/
- /***************************************************************************
- *
- * This program is free software; you can redistribute it and/or modify
- * it under the terms of the GNU General Public License as published by
- * the Free Software Foundation; either version 2 of the License, or
- * (at your option) any later version.
- *
- ***************************************************************************/
- define('SMTP_INCLUDED', 1);
- //
- // This function has been modified as provided
- // by SirSir to allow multiline responses when
- // using SMTP Extensions
- //
- function server_parse($socket, $response, $line = __LINE__)
- {
- while (substr($server_response, 3, 1) != ' ')
- {
- if (!($server_response = fgets($socket, 256)))
- {
- message_die(GENERAL_ERROR, "Couldn't get mail server response codes", "", $line, __FILE__);
- }
- }
- if (!(substr($server_response, 0, 3) == $response))
- {
- message_die(GENERAL_ERROR, "Ran into problems sending Mail. Response: $server_response", "", $line, __FILE__);
- }
- }
- // Replacement or substitute for PHP's mail command
- function smtpmail($mail_to, $subject, $message, $headers = '')
- {
- global $board_config;
- // Fix any bare linefeeds in the message to make it RFC821 Compliant.
- $message = preg_replace("#(?<!\r)\n#si", "\r\n", $message);
- if ($headers != '')
- {
- if (is_array($headers))
- {
- if (sizeof($headers) > 1)
- {
- $headers = join("\n", $headers);
- }
- else
- {
- $headers = $headers[0];
- }
- }
- $headers = chop($headers);
- // Make sure there are no bare linefeeds in the headers
- $headers = preg_replace('#(?<!\r)\n#si', "\r\n", $headers);
- // Ok this is rather confusing all things considered,
- // but we have to grab bcc and cc headers and treat them differently
- // Something we really didn't take into consideration originally
- $header_array = explode("\r\n", $headers);
- @reset($header_array);
- $headers = '';
- while(list(, $header) = each($header_array))
- {
- if (preg_match('#^cc:#si', $header))
- {
- $cc = preg_replace('#^cc:(.*)#si', '\1', $header);
- }
- else if (preg_match('#^bcc:#si', $header))
- {
- $bcc = preg_replace('#^bcc:(.*)#si', '\1', $header);
- $header = '';
- }
- $headers .= ($header != '') ? $header . "\r\n" : '';
- }
- $headers = chop($headers);
- $cc = explode(', ', $cc);
- $bcc = explode(', ', $bcc);
- }
- if (trim($subject) == '')
- {
- message_die(GENERAL_ERROR, "No email Subject specified", "", __LINE__, __FILE__);
- }
- if (trim($message) == '')
- {
- message_die(GENERAL_ERROR, "Email message was blank", "", __LINE__, __FILE__);
- }
- // some code was removed here for 2.0.6
- // Ok we have error checked as much as we can to this point let's get on
- // it already.
- if( !$socket = fsockopen($board_config['smtp_host'], 25, $errno, $errstr, 20) )
- {
- message_die(GENERAL_ERROR, "Could not connect to smtp host : $errno : $errstr", "", __LINE__, __FILE__);
- }
- // Wait for reply
- server_parse($socket, "220", __LINE__);
- // Do we want to use AUTH?, send RFC2554 EHLO, else send RFC821 HELO
- // This improved as provided by SirSir to accomodate
- if( !empty($board_config['smtp_username']) && !empty($board_config['smtp_password']) )
- {
- fputs($socket, "EHLO " . $board_config['smtp_host'] . "\r\n");
- server_parse($socket, "250", __LINE__);
- fputs($socket, "AUTH LOGIN\r\n");
- server_parse($socket, "334", __LINE__);
- fputs($socket, base64_encode($board_config['smtp_username']) . "\r\n");
- server_parse($socket, "334", __LINE__);
- fputs($socket, base64_encode($board_config['smtp_password']) . "\r\n");
- server_parse($socket, "235", __LINE__);
- }
- else
- {
- fputs($socket, "HELO " . $board_config['smtp_host'] . "\r\n");
- server_parse($socket, "250", __LINE__);
- }
- // From this point onward most server response codes should be 250
- // Specify who the mail is from....
- fputs($socket, "MAIL FROM: <" . $board_config['board_email'] . ">\r\n");
- server_parse($socket, "250", __LINE__);
- // Specify each user to send to and build to header.
- $to_header = '';
- // Add an additional bit of error checking to the To field.
- $mail_to = (trim($mail_to) == '') ? 'Undisclosed-recipients:;' : trim($mail_to);
- if (preg_match('#[^ ]+\@[^ ]+#', $mail_to))
- {
- fputs($socket, "RCPT TO: <$mail_to>\r\n");
- server_parse($socket, "250", __LINE__);
- }
- // Ok now do the CC and BCC fields...
- @reset($bcc);
- while(list(, $bcc_address) = each($bcc))
- {
- // Add an additional bit of error checking to bcc header...
- $bcc_address = trim($bcc_address);
- if (preg_match('#[^ ]+\@[^ ]+#', $bcc_address))
- {
- fputs($socket, "RCPT TO: <$bcc_address>\r\n");
- server_parse($socket, "250", __LINE__);
- }
- }
- @reset($cc);
- while(list(, $cc_address) = each($cc))
- {
- // Add an additional bit of error checking to cc header
- $cc_address = trim($cc_address);
- if (preg_match('#[^ ]+\@[^ ]+#', $cc_address))
- {
- fputs($socket, "RCPT TO: <$cc_address>\r\n");
- server_parse($socket, "250", __LINE__);
- }
- }
- // Ok now we tell the server we are ready to start sending data
- fputs($socket, "DATA\r\n");
- // This is the last response code we look for until the end of the message.
- server_parse($socket, "354", __LINE__);
- // Send the Subject Line...
- fputs($socket, "Subject: $subject\r\n");
- // Now the To Header.
- fputs($socket, "To: $mail_to\r\n");
- // Now any custom headers....
- fputs($socket, "$headers\r\n\r\n");
- // Ok now we are ready for the message...
- fputs($socket, "$message\r\n");
- // Ok the all the ingredients are mixed in let's cook this puppy...
- fputs($socket, ".\r\n");
- server_parse($socket, "250", __LINE__);
- // Now tell the server we are done and close the socket...
- fputs($socket, "QUIT\r\n");
- fclose($socket);
- return TRUE;
- }
- ?>