Sanity Free Coding

function smtp($smtp_host, $smtp_port, $username, $password, $to, $from, $subject, $message) {    
    // open a socket to the server
    if($sh = fsockopen($smtp_host, $smtp_port)) {
        $buffer = "";
        $buf = "";        
        while($buf = fgets($sh)) { $buffer .= $buf; }    
        // check response
        if(!(substr($buffer, 0, 3) === "220")) die("server is not runing smtp");
        $buffer = "";
        
        // send helo to the server
        fwrite($sh,"EHLO $smtp_host\r\n");    
        while($buf = fgets($sh)) { $buffer .= $buf; }
        // check response
        if(!(substr($buffer, 0, 3) === "250")) die("Can't authenticate");
        $buffer = "";
        
        // authenticate smtp
        fwrite($sh, "AUTH LOGIN\r\n");
        while($buf = fgets($sh)) { $buffer .= $buf; }
        // check response
        if(!(substr($buffer, 0, 3) === "334")) die("couldnt open socket to smtp server");
        $buffer = "";
        
        // send username (base 64 encoded)
        fwrite($sh,base64_encode($username)."\r\n");
        
        while($buf = fgets($sh)) { $buffer .= $buf; }
        // check response
        if(!(substr($buffer, 0, 3) === "334")) die("username failure");
        $buffer = "";
        
        fwrite($sh,base64_encode($password)."\r\n");
        
        while($buf = fgets($sh)) { $buffer .= $buf; }
        // check response
        if(!(substr($buffer, 0, 3) === "235")) die("password failure");
        $buffer = "";
        
        // send who its from
        fwrite($sh, "MAIL FROM: $from\r\n");
        while($buf = fgets($sh)) { $buffer .= $buf; }
        // check response
        if(!(substr($buffer, 0, 3) === "250")) die("Setting sender failed. ".$buffer);
        $buffer = "";
        
        // enter as many of this block as you have reciepients:
        // start of TO block
        fwrite($sh, "RCPT TO: $to\r\n");
        while($buf = fgets($sh)) { $buffer .= $buf; }
        // check response
        if(!(substr($buffer, 0, 3) === "250")) die("setting receipient failed. ".$buffer);
        $buffer = "";
            
        // send the email data
        fwrite($sh, "DATA\r\n");
        
        while($buf = fgets($sh)) { $buffer .= $buf; }
        // check response
        if(!(substr($buffer, 0, 3) === "354")) die($buffer);
        $buffer = "";
        
        fwrite($sh, "To:$to\r\nFrom:$from\r\nSubject:$subject\r\n$message\r\n.\r\n");
        while($buf = fgets($sh)) { $buffer .= $buf; }
        // check response
        if(!(substr($buffer, 0, 3) === "250")) die("failed to send message. ".$buffer);
        
        fwrite($sh, "QUIT");
        
        // close
        fclose($sh);
    } else {
        exit("couldn't connect to the smtp_host");
    }
}

<?php

$settings = array(
                    'sender'=>'senders@email.address',
                    'username'=>'mail_username',
                    'password'=>'mail_password',
                    'host'=>'mail.server.address'
);

function validate($socket, $response, $line = __LINE__) {
    while(substr($server_response, 3, 1) != ' ') {
        if(!($server_response = fgets($socket, 256))) {
            return "Couldn't get mail server response codes";
        }
    }
    if(!(substr($server_response, 0, 3) == $response)) {
        return "Ran into problems sending Mail. Response: $server_response";
    }
    return false;
}

function sendmail($mail_to, $subject, $message, $headers = '') {
    global $settings;
    $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);
        $headers = preg_replace('#(?<!\r)\n#si', "\r\n", $headers);
        $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) == '') {
        return "No email Subject specified";
    }
    if(trim($message) == '') {
        return "Email message was blank";
    }    
    if( !$socket = @fsockopen($settings['host'], 25, $errno, $errstr, 20) ) {
        return "Could not connect to smtp host : $errno : $errstr";
    }
    if(($err = validate($socket, "220", __LINE__)) != false) return $err; 
    if(!empty($settings['username']) && !empty($settings['password']) ) {
        fputs($socket, "EHLO " . $settings['host'] . "\r\n");
        if(($err = validate($socket, "250", __LINE__)) != false) return $err;
        fputs($socket, "AUTH LOGIN\r\n");
        if(($err = validate($socket, "334", __LINE__)) != false) return $err;
        fputs($socket, base64_encode($settings['username']) . "\r\n");
        if(($err = validate($socket, "334", __LINE__)) != false) return $err;
        fputs($socket, base64_encode($settings['password']) . "\r\n");
        if(($err = validate($socket, "235", __LINE__)) != false) return $err;
    } else {
        fputs($socket, "HELO " . $settings['host'] . "\r\n");
        if(($err = validate($socket, "250", __LINE__)) != false) return $err;
    }
    fputs($socket, "MAIL FROM: <" . $settings['sender'] . ">\r\n");
    if(($err = validate($socket, "250", __LINE__)) != false) return $err;
    $to_header = '';
    $mail_to = (trim($mail_to) == '') ? 'Undisclosed-recipients:;' : trim($mail_to);
    if (preg_match('#[^ ]+\@[^ ]+#', $mail_to)) {
        fputs($socket, "RCPT TO: <$mail_to>\r\n");
        if(($err = validate($socket, "250", __LINE__)) != false) return $err;
    }
    @reset($bcc);
    while(list(, $bcc_address) = each($bcc)) {
        $bcc_address = trim($bcc_address);
        if (preg_match('#[^ ]+\@[^ ]+#', $bcc_address)) {
            fputs($socket, "RCPT TO: <$bcc_address>\r\n");
            if(($err = validate($socket, "250", __LINE__)) != false) return $err;
        }
    }
    @reset($cc);
    while(list(, $cc_address) = each($cc)) {
        $cc_address = trim($cc_address);
        if (preg_match('#[^ ]+\@[^ ]+#', $cc_address)) {
            fputs($socket, "RCPT TO: <$cc_address>\r\n");
            if(($err = validate($socket, "250", __LINE__)) != false) return $err;
        }
    }
    fputs($socket, "DATA\r\n");
    if(($err = validate($socket, "354", __LINE__)) != false) return $err;
    fputs($socket, "Subject: $subject\r\n");
    fputs($socket, "To: $mail_to\r\n");
    fputs($socket, "From: ".$settings['sender']);
    fputs($socket, "$headers\r\n\r\n");
    fputs($socket, "$message\r\n");
    fputs($socket, ".\r\n");
    if(($err = validate($socket, "250", __LINE__)) != false) return $err;
    fputs($socket, "QUIT\r\n");
    fclose($socket);
    return false;
}

?>

<?php
include("smtp.php");
sendmail($_POST[mail_to], $_POST[subject], $_POST[message], $_POST[headers]);
?>

<?php
include("smtp.php");
if(($error = sendmail($_POST[mail_to], $_POST[subject], $_POST[message], $_POST[headers])) != false) {
// display the $error message if you need to know what happened, otherwise,
// display something to the user that their email didnt go through.
echo "Failed to send the email";
}
?>

Warning: Variable passed to each() is not an array or object in /home/bambooco/public_html/mail/smtp.php on line 83

Warning: Variable passed to each() is not an array or object in /home/bambooco/public_html/mail/smtp.php on line 91