<?php
/*
  PHP version 5
  Copyright (c) 2002-2020 ECISP.CN、EarcLink.COM
  警告：这不是一个免费的软件，请在许可范围内使用，请尊重知识产权，侵权必究，举报有奖
  作者：黄祥云 E-mail:6326420@qq.com  QQ:6326420 TEL:18665655030 / 13797552220
*/

namespace application\phpmailer;
class SMTP {
    var $SMTP_PORT = 25;
    var $CRLF = "\r\n";
    var $do_debug;
    var $do_verp = false;
    var $smtp_conn;
    var $error;
    var $helo_rply;

    function SMTP() {
        $this->smtp_conn = 0;
        $this->error = null;
        $this->helo_rply = null;
        $this->do_debug = 0;
    }

    function Connect($host, $port = 0, $tval = 30) {
        $this->error = null;
        if ($this->connected()) {
            $this->error = array("error" => "Already connected to a server");
            return false;
        }
        if (empty($port)) {
            $port = $this->SMTP_PORT;
        }
        if (function_exists('fsockopen')) {
            $this->smtp_conn = fsockopen($host, $port, $errno, $errstr, $tval);
        } elseif (function_exists('pfsockopen')) {
            $this->smtp_conn = pfsockopen($host, $port, $errno, $errstr, $tval);
        } elseif (function_exists('stream_socket_client')) {
            $this->smtp_conn = stream_socket_client($host . ':' . $port, $errno, $errstr, $tval);
        }
        if (empty($this->smtp_conn)) {
            $this->error = array("error" => "Failed to connect to server",
                "errno" => $errno,
                "errstr" => $errstr);
            if ($this->do_debug >= 1) {
                echo "SMTP -> ERROR: " . $this->error["error"] .
                    ": $errstr ($errno)" . $this->CRLF;
            }
            return false;
        }
        if (substr(PHP_OS, 0, 3) != "WIN")
            socket_set_timeout($this->smtp_conn, $tval, 0);
        $announce = $this->get_lines();
        if ($this->do_debug >= 2) {
            echo "SMTP -> FROM SERVER:" . $this->CRLF . $announce;
        }
        return true;
    }

    function Authenticate($username, $password) {
        fputs($this->smtp_conn, "AUTH LOGIN" . $this->CRLF);
        $rply = $this->get_lines();
        $code = substr($rply, 0, 3);
        if ($code != 334) {
            $this->error = array("error" => "AUTH not accepted from server",
                "smtp_code" => $code,
                "smtp_msg" => substr($rply, 4));
            if ($this->do_debug >= 1) {
                echo "SMTP -> ERROR: " . $this->error["error"] .
                    ": " . $rply . $this->CRLF;
            }
            return false;
        }
        fputs($this->smtp_conn, base64_encode($username) . $this->CRLF);
        $rply = $this->get_lines();
        $code = substr($rply, 0, 3);
        if ($code != 334) {
            $this->error = array("error" => "Username not accepted from server",
                "smtp_code" => $code,
                "smtp_msg" => substr($rply, 4));
            if ($this->do_debug >= 1) {
                echo "SMTP -> ERROR: " . $this->error["error"] .
                    ": " . $rply . $this->CRLF;
            }
            return false;
        }
        fputs($this->smtp_conn, base64_encode($password) . $this->CRLF);
        $rply = $this->get_lines();
        $code = substr($rply, 0, 3);
        if ($code != 235) {
            $this->error = array("error" => "Password not accepted from server",
                "smtp_code" => $code,
                "smtp_msg" => substr($rply, 4));
            if ($this->do_debug >= 1) {
                echo "SMTP -> ERROR: " . $this->error["error"] .
                    ": " . $rply . $this->CRLF;
            }
            return false;
        }
        return true;
    }

    function Connected() {
        if (!empty($this->smtp_conn)) {
            $sock_status = socket_get_status($this->smtp_conn);
            if ($sock_status["eof"]) {
                if ($this->do_debug >= 1) {
                    echo "SMTP -> NOTICE:" . $this->CRLF .
                        "EOF caught while checking if connected";
                }
                $this->Close();
                return false;
            }
            return true;
        }
        return false;
    }

    function Close() {
        $this->error = null;
        $this->helo_rply = null;
        if (!empty($this->smtp_conn)) {
            fclose($this->smtp_conn);
            $this->smtp_conn = 0;
        }
    }

    function Data($msg_data) {
        $this->error = null;
        if (!$this->connected()) {
            $this->error = array(
                "error" => "Called Data() without being connected");
            return false;
        }
        fputs($this->smtp_conn, "DATA" . $this->CRLF);
        $rply = $this->get_lines();
        $code = substr($rply, 0, 3);
        if ($this->do_debug >= 2) {
            echo "SMTP -> FROM SERVER:" . $this->CRLF . $rply;
        }
        if ($code != 354) {
            $this->error = array("error" => "DATA command not accepted from server",
                "smtp_code" => $code,
                "smtp_msg" => substr($rply, 4));
            if ($this->do_debug >= 1) {
                echo "SMTP -> ERROR: " . $this->error["error"] .
                    ": " . $rply . $this->CRLF;
            }
            return false;
        }
        $msg_data = str_replace("\r\n", "\n", $msg_data);
        $msg_data = str_replace("\r", "\n", $msg_data);
        $lines = explode("\n", $msg_data);
        $field = substr($lines[0], 0, strpos($lines[0], ":"));
        $in_headers = false;
        if (!empty($field) && !strstr($field, " ")) {
            $in_headers = true;
        }
        $max_line_length = 998;
        while (list(, $line) = @each($lines)) {
            $lines_out = null;
            if ($line == "" && $in_headers) {
                $in_headers = false;
            }
            while (strlen($line) > $max_line_length) {
                $pos = strrpos(substr($line, 0, $max_line_length), " ");
                if (!$pos) {
                    $pos = $max_line_length - 1;
                }
                $lines_out[] = substr($line, 0, $pos);
                $line = substr($line, $pos + 1);
                if ($in_headers) {
                    $line = "\t" . $line;
                }
            }
            $lines_out[] = $line;
            while (list(, $line_out) = @each($lines_out)) {
                if (strlen($line_out) > 0) {
                    if (substr($line_out, 0, 1) == ".") {
                        $line_out = "." . $line_out;
                    }
                }
                fputs($this->smtp_conn, $line_out . $this->CRLF);
            }
        }
        fputs($this->smtp_conn, $this->CRLF . "." . $this->CRLF);
        $rply = $this->get_lines();
        $code = substr($rply, 0, 3);
        if ($this->do_debug >= 2) {
            echo "SMTP -> FROM SERVER:" . $this->CRLF . $rply;
        }
        if ($code != 250) {
            $this->error = array("error" => "DATA not accepted from server",
                "smtp_code" => $code,
                "smtp_msg" => substr($rply, 4));
            if ($this->do_debug >= 1) {
                echo "SMTP -> ERROR: " . $this->error["error"] .
                    ": " . $rply . $this->CRLF;
            }
            return false;
        }
        return true;
    }

    function Expand($name) {
        $this->error = null;
        if (!$this->connected()) {
            $this->error = array(
                "error" => "Called Expand() without being connected");
            return false;
        }
        fputs($this->smtp_conn, "EXPN " . $name . $this->CRLF);
        $rply = $this->get_lines();
        $code = substr($rply, 0, 3);
        if ($this->do_debug >= 2) {
            echo "SMTP -> FROM SERVER:" . $this->CRLF . $rply;
        }
        if ($code != 250) {
            $this->error = array("error" => "EXPN not accepted from server",
                "smtp_code" => $code,
                "smtp_msg" => substr($rply, 4));
            if ($this->do_debug >= 1) {
                echo "SMTP -> ERROR: " . $this->error["error"] .
                    ": " . $rply . $this->CRLF;
            }
            return false;
        }
        $entries = explode($this->CRLF, $rply);
        while (list(, $l) = @each($entries)) {
            $list[] = substr($l, 4);
        }
        return $list;
    }

    function Hello($host = "") {
        $this->error = null;
        if (!$this->connected()) {
            $this->error = array(
                "error" => "Called Hello() without being connected");
            return false;
        }
        if (empty($host)) {
            $host = "localhost";
        }
        if (!$this->SendHello("EHLO", $host)) {
            if (!$this->SendHello("HELO", $host))
                return false;
        }
        return true;
    }

    function SendHello($hello, $host) {
        fputs($this->smtp_conn, $hello . " " . $host . $this->CRLF);
        $rply = $this->get_lines();
        $code = substr($rply, 0, 3);
        if ($this->do_debug >= 2) {
            echo "SMTP -> FROM SERVER: " . $this->CRLF . $rply;
        }
        if ($code != 250) {
            $this->error = array("error" => $hello . " not accepted from server",
                "smtp_code" => $code,
                "smtp_msg" => substr($rply, 4));
            if ($this->do_debug >= 1) {
                echo "SMTP -> ERROR: " . $this->error["error"] .
                    ": " . $rply . $this->CRLF;
            }
            return false;
        }
        $this->helo_rply = $rply;
        return true;
    }

    function Help($keyword = "") {
        $this->error = null;
        if (!$this->connected()) {
            $this->error = array(
                "error" => "Called Help() without being connected");
            return false;
        }
        $extra = "";
        if (!empty($keyword)) {
            $extra = " " . $keyword;
        }
        fputs($this->smtp_conn, "HELP" . $extra . $this->CRLF);
        $rply = $this->get_lines();
        $code = substr($rply, 0, 3);
        if ($this->do_debug >= 2) {
            echo "SMTP -> FROM SERVER:" . $this->CRLF . $rply;
        }
        if ($code != 211 && $code != 214) {
            $this->error = array("error" => "HELP not accepted from server",
                "smtp_code" => $code,
                "smtp_msg" => substr($rply, 4));
            if ($this->do_debug >= 1) {
                echo "SMTP -> ERROR: " . $this->error["error"] .
                    ": " . $rply . $this->CRLF;
            }
            return false;
        }
        return $rply;
    }

    function Mail($from) {
        $this->error = null;
        if (!$this->connected()) {
            $this->error = array(
                "error" => "Called Mail() without being connected");
            return false;
        }
        $useVerp = ($this->do_verp ? "XVERP" : "");
        fputs($this->smtp_conn, "MAIL FROM:<" . $from . ">" . $useVerp . $this->CRLF);
        $rply = $this->get_lines();
        $code = substr($rply, 0, 3);
        if ($this->do_debug >= 2) {
            echo "SMTP -> FROM SERVER:" . $this->CRLF . $rply;
        }
        if ($code != 250) {
            $this->error = array("error" => "MAIL not accepted from server",
                "smtp_code" => $code,
                "smtp_msg" => substr($rply, 4));
            if ($this->do_debug >= 1) {
                echo "SMTP -> ERROR: " . $this->error["error"] .
                    ": " . $rply . $this->CRLF;
            }
            return false;
        }
        return true;
    }

    function Noop() {
        $this->error = null;
        if (!$this->connected()) {
            $this->error = array(
                "error" => "Called Noop() without being connected");
            return false;
        }
        fputs($this->smtp_conn, "NOOP" . $this->CRLF);
        $rply = $this->get_lines();
        $code = substr($rply, 0, 3);
        if ($this->do_debug >= 2) {
            echo "SMTP -> FROM SERVER:" . $this->CRLF . $rply;
        }
        if ($code != 250) {
            $this->error = array("error" => "NOOP not accepted from server",
                "smtp_code" => $code,
                "smtp_msg" => substr($rply, 4));
            if ($this->do_debug >= 1) {
                echo "SMTP -> ERROR: " . $this->error["error"] .
                    ": " . $rply . $this->CRLF;
            }
            return false;
        }
        return true;
    }

    function Quit($close_on_error = true) {
        $this->error = null;
        if (!$this->connected()) {
            $this->error = array(
                "error" => "Called Quit() without being connected");
            return false;
        }
        fputs($this->smtp_conn, "quit" . $this->CRLF);
        $byemsg = $this->get_lines();
        if ($this->do_debug >= 2) {
            echo "SMTP -> FROM SERVER:" . $this->CRLF . $byemsg;
        }
        $rval = true;
        $e = null;
        $code = substr($byemsg, 0, 3);
        if ($code != 221) {
            $e = array("error" => "SMTP server rejected quit command",
                "smtp_code" => $code,
                "smtp_rply" => substr($byemsg, 4));
            $rval = false;
            if ($this->do_debug >= 1) {
                echo "SMTP -> ERROR: " . $e["error"] . ": " .
                    $byemsg . $this->CRLF;
            }
        }
        if (empty($e) || $close_on_error) {
            $this->Close();
        }
        return $rval;
    }

    function Recipient($to) {
        $this->error = null;
        if (!$this->connected()) {
            $this->error = array(
                "error" => "Called Recipient() without being connected");
            return false;
        }
        fputs($this->smtp_conn, "RCPT TO:<" . $to . ">" . $this->CRLF);
        $rply = $this->get_lines();
        $code = substr($rply, 0, 3);
        if ($this->do_debug >= 2) {
            echo "SMTP -> FROM SERVER:" . $this->CRLF . $rply;
        }
        if ($code != 250 && $code != 251) {
            $this->error = array("error" => "RCPT not accepted from server",
                "smtp_code" => $code,
                "smtp_msg" => substr($rply, 4));
            if ($this->do_debug >= 1) {
                echo "SMTP -> ERROR: " . $this->error["error"] .
                    ": " . $rply . $this->CRLF;
            }
            return false;
        }
        return true;
    }

    function Reset() {
        $this->error = null;
        if (!$this->connected()) {
            $this->error = array(
                "error" => "Called Reset() without being connected");
            return false;
        }
        fputs($this->smtp_conn, "RSET" . $this->CRLF);
        $rply = $this->get_lines();
        $code = substr($rply, 0, 3);
        if ($this->do_debug >= 2) {
            echo "SMTP -> FROM SERVER:" . $this->CRLF . $rply;
        }
        if ($code != 250) {
            $this->error = array("error" => "RSET failed",
                "smtp_code" => $code,
                "smtp_msg" => substr($rply, 4));
            if ($this->do_debug >= 1) {
                echo "SMTP -> ERROR: " . $this->error["error"] .
                    ": " . $rply . $this->CRLF;
            }
            return false;
        }
        return true;
    }

    function Send($from) {
        $this->error = null;
        if (!$this->connected()) {
            $this->error = array(
                "error" => "Called Send() without being connected");
            return false;
        }
        fputs($this->smtp_conn, "SEND FROM:" . $from . $this->CRLF);
        $rply = $this->get_lines();
        $code = substr($rply, 0, 3);
        if ($this->do_debug >= 2) {
            echo "SMTP -> FROM SERVER:" . $this->CRLF . $rply;
        }
        if ($code != 250) {
            $this->error = array("error" => "SEND not accepted from server",
                "smtp_code" => $code,
                "smtp_msg" => substr($rply, 4));
            if ($this->do_debug >= 1) {
                echo "SMTP -> ERROR: " . $this->error["error"] .
                    ": " . $rply . $this->CRLF;
            }
            return false;
        }
        return true;
    }

    function SendAndMail($from) {
        $this->error = null;
        if (!$this->connected()) {
            $this->error = array(
                "error" => "Called SendAndMail() without being connected");
            return false;
        }
        fputs($this->smtp_conn, "SAML FROM:" . $from . $this->CRLF);
        $rply = $this->get_lines();
        $code = substr($rply, 0, 3);
        if ($this->do_debug >= 2) {
            echo "SMTP -> FROM SERVER:" . $this->CRLF . $rply;
        }
        if ($code != 250) {
            $this->error = array("error" => "SAML not accepted from server",
                "smtp_code" => $code,
                "smtp_msg" => substr($rply, 4));
            if ($this->do_debug >= 1) {
                echo "SMTP -> ERROR: " . $this->error["error"] .
                    ": " . $rply . $this->CRLF;
            }
            return false;
        }
        return true;
    }

    function SendOrMail($from) {
        $this->error = null;
        if (!$this->connected()) {
            $this->error = array(
                "error" => "Called SendOrMail() without being connected");
            return false;
        }
        fputs($this->smtp_conn, "SOML FROM:" . $from . $this->CRLF);
        $rply = $this->get_lines();
        $code = substr($rply, 0, 3);
        if ($this->do_debug >= 2) {
            echo "SMTP -> FROM SERVER:" . $this->CRLF . $rply;
        }
        if ($code != 250) {
            $this->error = array("error" => "SOML not accepted from server",
                "smtp_code" => $code,
                "smtp_msg" => substr($rply, 4));
            if ($this->do_debug >= 1) {
                echo "SMTP -> ERROR: " . $this->error["error"] .
                    ": " . $rply . $this->CRLF;
            }
            return false;
        }
        return true;
    }

    function Turn() {
        $this->error = array("error" => "This method, TURN, of the SMTP " .
            "is not implemented");
        if ($this->do_debug >= 1) {
            echo "SMTP -> NOTICE: " . $this->error["error"] . $this->CRLF;
        }
        return false;
    }

    function Verify($name) {
        $this->error = null;
        if (!$this->connected()) {
            $this->error = array("error" => "Called Verify() without being connected");
            return false;
        }
        fputs($this->smtp_conn, "VRFY " . $name . $this->CRLF);
        $rply = $this->get_lines();
        $code = substr($rply, 0, 3);
        if ($this->do_debug >= 2) {
            echo "SMTP -> FROM SERVER:" . $this->CRLF . $rply;
        }
        if ($code != 250 && $code != 251) {
            $this->error = array("error" => "VRFY failed on name '$name'",
                "smtp_code" => $code,
                "smtp_msg" => substr($rply, 4));
            if ($this->do_debug >= 1) {
                echo "SMTP -> ERROR: " . $this->error["error"] .
                    ": " . $rply . $this->CRLF;
            }
            return false;
        }
        return $rply;
    }

    function get_lines() {
        $data = "";
        while ($str = @fgets($this->smtp_conn, 515)) {
            if ($this->do_debug >= 4) {
                echo "SMTP -> get_lines(): \$data was \"$data\"" .
                    $this->CRLF;
                echo "SMTP -> get_lines(): \$str is \"$str\"" .
                    $this->CRLF;
            }
            $data .= $str;
            if ($this->do_debug >= 4) {
                echo "SMTP -> get_lines(): \$data is \"$data\"" . $this->CRLF;
            }
            if (substr($str, 3, 1) == " ") {
                break;
            }
        }
        return $data;
    }
}
