Revert "converting CRLF to LF"
[geo.git] / edit_wp5_web_folder / geo / curves / inc / phpmailer / class.smtp.php
diff --git a/edit_wp5_web_folder/geo/curves/inc/phpmailer/class.smtp.php b/edit_wp5_web_folder/geo/curves/inc/phpmailer/class.smtp.php
new file mode 100644 (file)
index 0000000..df3cfb5
--- /dev/null
@@ -0,0 +1,1045 @@
+<?php\r
+////////////////////////////////////////////////////\r
+// SMTP - PHP SMTP class\r
+//\r
+// Version 1.02\r
+//\r
+// Define an SMTP class that can be used to connect\r
+// and communicate with any SMTP server. It implements\r
+// all the SMTP functions defined in RFC821 except TURN.\r
+//\r
+// Author: Chris Ryan\r
+//\r
+// License: LGPL, see LICENSE\r
+////////////////////////////////////////////////////\r
+\r
+/**\r
+ * SMTP is rfc 821 compliant and implements all the rfc 821 SMTP\r
+ * commands except TURN which will always return a not implemented\r
+ * error. SMTP also provides some utility methods for sending mail\r
+ * to an SMTP server.\r
+ * @package PHPMailer\r
+ * @author Chris Ryan\r
+ */\r
+class SMTP\r
+{\r
+    /**\r
+     *  SMTP server port\r
+     *  @var int\r
+     */\r
+    var $SMTP_PORT = 25;\r
+    \r
+    /**\r
+     *  SMTP reply line ending\r
+     *  @var string\r
+     */\r
+    var $CRLF = "\r\n";\r
+    \r
+    /**\r
+     *  Sets whether debugging is turned on\r
+     *  @var bool\r
+     */\r
+    var $do_debug;       # the level of debug to perform\r
+\r
+    /**#@+\r
+     * @access private\r
+     */\r
+    var $smtp_conn;      # the socket to the server\r
+    var $error;          # error if any on the last call\r
+    var $helo_rply;      # the reply the server sent to us for HELO\r
+    /**#@-*/\r
+\r
+    /**\r
+     * Initialize the class so that the data is in a known state.\r
+     * @access public\r
+     * @return void\r
+     */\r
+    function SMTP() {\r
+        $this->smtp_conn = 0;\r
+        $this->error = null;\r
+        $this->helo_rply = null;\r
+\r
+        $this->do_debug = 0;\r
+    }\r
+\r
+    /*************************************************************\r
+     *                    CONNECTION FUNCTIONS                  *\r
+     ***********************************************************/\r
+\r
+    /**\r
+     * Connect to the server specified on the port specified.\r
+     * If the port is not specified use the default SMTP_PORT.\r
+     * If tval is specified then a connection will try and be\r
+     * established with the server for that number of seconds.\r
+     * If tval is not specified the default is 30 seconds to\r
+     * try on the connection.\r
+     *\r
+     * SMTP CODE SUCCESS: 220\r
+     * SMTP CODE FAILURE: 421\r
+     * @access public\r
+     * @return bool\r
+     */\r
+    function Connect($host,$port=0,$tval=30) {\r
+        # set the error val to null so there is no confusion\r
+        $this->error = null;\r
+\r
+        # make sure we are __not__ connected\r
+        if($this->connected()) {\r
+            # ok we are connected! what should we do?\r
+            # for now we will just give an error saying we\r
+            # are already connected\r
+            $this->error =\r
+                array("error" => "Already connected to a server");\r
+            return false;\r
+        }\r
+\r
+        if(empty($port)) {\r
+            $port = $this->SMTP_PORT;\r
+        }\r
+\r
+        #connect to the smtp server\r
+        $this->smtp_conn = fsockopen($host,    # the host of the server\r
+                                     $port,    # the port to use\r
+                                     $errno,   # error number if any\r
+                                     $errstr,  # error message if any\r
+                                     $tval);   # give up after ? secs\r
+        # verify we connected properly\r
+        if(empty($this->smtp_conn)) {\r
+            $this->error = array("error" => "Failed to connect to server",\r
+                                 "errno" => $errno,\r
+                                 "errstr" => $errstr);\r
+            if($this->do_debug >= 1) {\r
+                echo "SMTP -> ERROR: " . $this->error["error"] .\r
+                         ": $errstr ($errno)" . $this->CRLF;\r
+            }\r
+            return false;\r
+        }\r
+\r
+        # sometimes the SMTP server takes a little longer to respond\r
+        # so we will give it a longer timeout for the first read\r
+        // Windows still does not have support for this timeout function\r
+        if(substr(PHP_OS, 0, 3) != "WIN")\r
+           socket_set_timeout($this->smtp_conn, $tval, 0);\r
+\r
+        # get any announcement stuff\r
+        $announce = $this->get_lines();\r
+\r
+        # set the timeout  of any socket functions at 1/10 of a second\r
+        //if(function_exists("socket_set_timeout"))\r
+        //   socket_set_timeout($this->smtp_conn, 0, 100000);\r
+\r
+        if($this->do_debug >= 2) {\r
+            echo "SMTP -> FROM SERVER:" . $this->CRLF . $announce;\r
+        }\r
+\r
+        return true;\r
+    }\r
+\r
+    /**\r
+     * Performs SMTP authentication.  Must be run after running the\r
+     * Hello() method.  Returns true if successfully authenticated.\r
+     * @access public\r
+     * @return bool\r
+     */\r
+    function Authenticate($username, $password) {\r
+        // Start authentication\r
+        fputs($this->smtp_conn,"AUTH LOGIN" . $this->CRLF);\r
+\r
+        $rply = $this->get_lines();\r
+        $code = substr($rply,0,3);\r
+\r
+        if($code != 334) {\r
+            $this->error =\r
+                array("error" => "AUTH not accepted from server",\r
+                      "smtp_code" => $code,\r
+                      "smtp_msg" => substr($rply,4));\r
+            if($this->do_debug >= 1) {\r
+                echo "SMTP -> ERROR: " . $this->error["error"] .\r
+                         ": " . $rply . $this->CRLF;\r
+            }\r
+            return false;\r
+        }\r
+\r
+        // Send encoded username\r
+        fputs($this->smtp_conn, base64_encode($username) . $this->CRLF);\r
+\r
+        $rply = $this->get_lines();\r
+        $code = substr($rply,0,3);\r
+\r
+        if($code != 334) {\r
+            $this->error =\r
+                array("error" => "Username not accepted from server",\r
+                      "smtp_code" => $code,\r
+                      "smtp_msg" => substr($rply,4));\r
+            if($this->do_debug >= 1) {\r
+                echo "SMTP -> ERROR: " . $this->error["error"] .\r
+                         ": " . $rply . $this->CRLF;\r
+            }\r
+            return false;\r
+        }\r
+\r
+        // Send encoded password\r
+        fputs($this->smtp_conn, base64_encode($password) . $this->CRLF);\r
+\r
+        $rply = $this->get_lines();\r
+        $code = substr($rply,0,3);\r
+\r
+        if($code != 235) {\r
+            $this->error =\r
+                array("error" => "Password not accepted from server",\r
+                      "smtp_code" => $code,\r
+                      "smtp_msg" => substr($rply,4));\r
+            if($this->do_debug >= 1) {\r
+                echo "SMTP -> ERROR: " . $this->error["error"] .\r
+                         ": " . $rply . $this->CRLF;\r
+            }\r
+            return false;\r
+        }\r
+\r
+        return true;\r
+    }\r
+\r
+    /**\r
+     * Returns true if connected to a server otherwise false\r
+     * @access private\r
+     * @return bool\r
+     */\r
+    function Connected() {\r
+        if(!empty($this->smtp_conn)) {\r
+            $sock_status = socket_get_status($this->smtp_conn);\r
+            if($sock_status["eof"]) {\r
+                # hmm this is an odd situation... the socket is\r
+                # valid but we aren't connected anymore\r
+                if($this->do_debug >= 1) {\r
+                    echo "SMTP -> NOTICE:" . $this->CRLF .\r
+                         "EOF caught while checking if connected";\r
+                }\r
+                $this->Close();\r
+                return false;\r
+            }\r
+            return true; # everything looks good\r
+        }\r
+        return false;\r
+    }\r
+\r
+    /**\r
+     * Closes the socket and cleans up the state of the class.\r
+     * It is not considered good to use this function without\r
+     * first trying to use QUIT.\r
+     * @access public\r
+     * @return void\r
+     */\r
+    function Close() {\r
+        $this->error = null; # so there is no confusion\r
+        $this->helo_rply = null;\r
+        if(!empty($this->smtp_conn)) {\r
+            # close the connection and cleanup\r
+            fclose($this->smtp_conn);\r
+            $this->smtp_conn = 0;\r
+        }\r
+    }\r
+\r
+\r
+    /***************************************************************\r
+     *                        SMTP COMMANDS                       *\r
+     *************************************************************/\r
+\r
+    /**\r
+     * Issues a data command and sends the msg_data to the server\r
+     * finializing the mail transaction. $msg_data is the message\r
+     * that is to be send with the headers. Each header needs to be\r
+     * on a single line followed by a <CRLF> with the message headers\r
+     * and the message body being seperated by and additional <CRLF>.\r
+     *\r
+     * Implements rfc 821: DATA <CRLF>\r
+     *\r
+     * SMTP CODE INTERMEDIATE: 354\r
+     *     [data]\r
+     *     <CRLF>.<CRLF>\r
+     *     SMTP CODE SUCCESS: 250\r
+     *     SMTP CODE FAILURE: 552,554,451,452\r
+     * SMTP CODE FAILURE: 451,554\r
+     * SMTP CODE ERROR  : 500,501,503,421\r
+     * @access public\r
+     * @return bool\r
+     */\r
+    function Data($msg_data) {\r
+        $this->error = null; # so no confusion is caused\r
+\r
+        if(!$this->connected()) {\r
+            $this->error = array(\r
+                    "error" => "Called Data() without being connected");\r
+            return false;\r
+        }\r
+\r
+        fputs($this->smtp_conn,"DATA" . $this->CRLF);\r
+\r
+        $rply = $this->get_lines();\r
+        $code = substr($rply,0,3);\r
+\r
+        if($this->do_debug >= 2) {\r
+            echo "SMTP -> FROM SERVER:" . $this->CRLF . $rply;\r
+        }\r
+\r
+        if($code != 354) {\r
+            $this->error =\r
+                array("error" => "DATA command not accepted from server",\r
+                      "smtp_code" => $code,\r
+                      "smtp_msg" => substr($rply,4));\r
+            if($this->do_debug >= 1) {\r
+                echo "SMTP -> ERROR: " . $this->error["error"] .\r
+                         ": " . $rply . $this->CRLF;\r
+            }\r
+            return false;\r
+        }\r
+\r
+        # the server is ready to accept data!\r
+        # according to rfc 821 we should not send more than 1000\r
+        # including the CRLF\r
+        # characters on a single line so we will break the data up\r
+        # into lines by \r and/or \n then if needed we will break\r
+        # each of those into smaller lines to fit within the limit.\r
+        # in addition we will be looking for lines that start with\r
+        # a period '.' and append and additional period '.' to that\r
+        # line. NOTE: this does not count towards are limit.\r
+\r
+        # normalize the line breaks so we know the explode works\r
+        $msg_data = str_replace("\r\n","\n",$msg_data);\r
+        $msg_data = str_replace("\r","\n",$msg_data);\r
+        $lines = explode("\n",$msg_data);\r
+\r
+        # we need to find a good way to determine is headers are\r
+        # in the msg_data or if it is a straight msg body\r
+        # currently I'm assuming rfc 822 definitions of msg headers\r
+        # and if the first field of the first line (':' sperated)\r
+        # does not contain a space then it _should_ be a header\r
+        # and we can process all lines before a blank "" line as\r
+        # headers.\r
+        $field = substr($lines[0],0,strpos($lines[0],":"));\r
+        $in_headers = false;\r
+        if(!empty($field) && !strstr($field," ")) {\r
+            $in_headers = true;\r
+        }\r
+\r
+        $max_line_length = 998; # used below; set here for ease in change\r
+\r
+        while(list(,$line) = @each($lines)) {\r
+            $lines_out = null;\r
+            if($line == "" && $in_headers) {\r
+                $in_headers = false;\r
+            }\r
+            # ok we need to break this line up into several\r
+            # smaller lines\r
+            while(strlen($line) > $max_line_length) {\r
+                $pos = strrpos(substr($line,0,$max_line_length)," ");\r
+\r
+                # Patch to fix DOS attack\r
+                if(!$pos) {\r
+                    $pos = $max_line_length - 1;\r
+                }\r
+\r
+                $lines_out[] = substr($line,0,$pos);\r
+                $line = substr($line,$pos + 1);\r
+                # if we are processing headers we need to\r
+                # add a LWSP-char to the front of the new line\r
+                # rfc 822 on long msg headers\r
+                if($in_headers) {\r
+                    $line = "\t" . $line;\r
+                }\r
+            }\r
+            $lines_out[] = $line;\r
+\r
+            # now send the lines to the server\r
+            while(list(,$line_out) = @each($lines_out)) {\r
+                if(strlen($line_out) > 0)\r
+                {\r
+                    if(substr($line_out, 0, 1) == ".") {\r
+                        $line_out = "." . $line_out;\r
+                    }\r
+                }\r
+                fputs($this->smtp_conn,$line_out . $this->CRLF);\r
+            }\r
+        }\r
+\r
+        # ok all the message data has been sent so lets get this\r
+        # over with aleady\r
+        fputs($this->smtp_conn, $this->CRLF . "." . $this->CRLF);\r
+\r
+        $rply = $this->get_lines();\r
+        $code = substr($rply,0,3);\r
+\r
+        if($this->do_debug >= 2) {\r
+            echo "SMTP -> FROM SERVER:" . $this->CRLF . $rply;\r
+        }\r
+\r
+        if($code != 250) {\r
+            $this->error =\r
+                array("error" => "DATA not accepted from server",\r
+                      "smtp_code" => $code,\r
+                      "smtp_msg" => substr($rply,4));\r
+            if($this->do_debug >= 1) {\r
+                echo "SMTP -> ERROR: " . $this->error["error"] .\r
+                         ": " . $rply . $this->CRLF;\r
+            }\r
+            return false;\r
+        }\r
+        return true;\r
+    }\r
+\r
+    /**\r
+     * Expand takes the name and asks the server to list all the\r
+     * people who are members of the _list_. Expand will return\r
+     * back and array of the result or false if an error occurs.\r
+     * Each value in the array returned has the format of:\r
+     *     [ <full-name> <sp> ] <path>\r
+     * The definition of <path> is defined in rfc 821\r
+     *\r
+     * Implements rfc 821: EXPN <SP> <string> <CRLF>\r
+     *\r
+     * SMTP CODE SUCCESS: 250\r
+     * SMTP CODE FAILURE: 550\r
+     * SMTP CODE ERROR  : 500,501,502,504,421\r
+     * @access public\r
+     * @return string array\r
+     */\r
+    function Expand($name) {\r
+        $this->error = null; # so no confusion is caused\r
+\r
+        if(!$this->connected()) {\r
+            $this->error = array(\r
+                    "error" => "Called Expand() without being connected");\r
+            return false;\r
+        }\r
+\r
+        fputs($this->smtp_conn,"EXPN " . $name . $this->CRLF);\r
+\r
+        $rply = $this->get_lines();\r
+        $code = substr($rply,0,3);\r
+\r
+        if($this->do_debug >= 2) {\r
+            echo "SMTP -> FROM SERVER:" . $this->CRLF . $rply;\r
+        }\r
+\r
+        if($code != 250) {\r
+            $this->error =\r
+                array("error" => "EXPN not accepted from server",\r
+                      "smtp_code" => $code,\r
+                      "smtp_msg" => substr($rply,4));\r
+            if($this->do_debug >= 1) {\r
+                echo "SMTP -> ERROR: " . $this->error["error"] .\r
+                         ": " . $rply . $this->CRLF;\r
+            }\r
+            return false;\r
+        }\r
+\r
+        # parse the reply and place in our array to return to user\r
+        $entries = explode($this->CRLF,$rply);\r
+        while(list(,$l) = @each($entries)) {\r
+            $list[] = substr($l,4);\r
+        }\r
+\r
+        return $list;\r
+    }\r
+\r
+    /**\r
+     * Sends the HELO command to the smtp server.\r
+     * This makes sure that we and the server are in\r
+     * the same known state.\r
+     *\r
+     * Implements from rfc 821: HELO <SP> <domain> <CRLF>\r
+     *\r
+     * SMTP CODE SUCCESS: 250\r
+     * SMTP CODE ERROR  : 500, 501, 504, 421\r
+     * @access public\r
+     * @return bool\r
+     */\r
+    function Hello($host="") {\r
+        $this->error = null; # so no confusion is caused\r
+\r
+        if(!$this->connected()) {\r
+            $this->error = array(\r
+                    "error" => "Called Hello() without being connected");\r
+            return false;\r
+        }\r
+\r
+        # if a hostname for the HELO wasn't specified determine\r
+        # a suitable one to send\r
+        if(empty($host)) {\r
+            # we need to determine some sort of appopiate default\r
+            # to send to the server\r
+            $host = "localhost";\r
+        }\r
+\r
+        // Send extended hello first (RFC 2821)\r
+        if(!$this->SendHello("EHLO", $host))\r
+        {\r
+            if(!$this->SendHello("HELO", $host))\r
+                return false;\r
+        }\r
+\r
+        return true;\r
+    }\r
+\r
+    /**\r
+     * Sends a HELO/EHLO command.\r
+     * @access private\r
+     * @return bool\r
+     */\r
+    function SendHello($hello, $host) {\r
+        fputs($this->smtp_conn, $hello . " " . $host . $this->CRLF);\r
+\r
+        $rply = $this->get_lines();\r
+        $code = substr($rply,0,3);\r
+\r
+        if($this->do_debug >= 2) {\r
+            echo "SMTP -> FROM SERVER: " . $this->CRLF . $rply;\r
+        }\r
+\r
+        if($code != 250) {\r
+            $this->error =\r
+                array("error" => $hello . " not accepted from server",\r
+                      "smtp_code" => $code,\r
+                      "smtp_msg" => substr($rply,4));\r
+            if($this->do_debug >= 1) {\r
+                echo "SMTP -> ERROR: " . $this->error["error"] .\r
+                         ": " . $rply . $this->CRLF;\r
+            }\r
+            return false;\r
+        }\r
+\r
+        $this->helo_rply = $rply;\r
+        \r
+        return true;\r
+    }\r
+\r
+    /**\r
+     * Gets help information on the keyword specified. If the keyword\r
+     * is not specified then returns generic help, ussually contianing\r
+     * A list of keywords that help is available on. This function\r
+     * returns the results back to the user. It is up to the user to\r
+     * handle the returned data. If an error occurs then false is\r
+     * returned with $this->error set appropiately.\r
+     *\r
+     * Implements rfc 821: HELP [ <SP> <string> ] <CRLF>\r
+     *\r
+     * SMTP CODE SUCCESS: 211,214\r
+     * SMTP CODE ERROR  : 500,501,502,504,421\r
+     * @access public\r
+     * @return string\r
+     */\r
+    function Help($keyword="") {\r
+        $this->error = null; # to avoid confusion\r
+\r
+        if(!$this->connected()) {\r
+            $this->error = array(\r
+                    "error" => "Called Help() without being connected");\r
+            return false;\r
+        }\r
+\r
+        $extra = "";\r
+        if(!empty($keyword)) {\r
+            $extra = " " . $keyword;\r
+        }\r
+\r
+        fputs($this->smtp_conn,"HELP" . $extra . $this->CRLF);\r
+\r
+        $rply = $this->get_lines();\r
+        $code = substr($rply,0,3);\r
+\r
+        if($this->do_debug >= 2) {\r
+            echo "SMTP -> FROM SERVER:" . $this->CRLF . $rply;\r
+        }\r
+\r
+        if($code != 211 && $code != 214) {\r
+            $this->error =\r
+                array("error" => "HELP not accepted from server",\r
+                      "smtp_code" => $code,\r
+                      "smtp_msg" => substr($rply,4));\r
+            if($this->do_debug >= 1) {\r
+                echo "SMTP -> ERROR: " . $this->error["error"] .\r
+                         ": " . $rply . $this->CRLF;\r
+            }\r
+            return false;\r
+        }\r
+\r
+        return $rply;\r
+    }\r
+\r
+    /**\r
+     * Starts a mail transaction from the email address specified in\r
+     * $from. Returns true if successful or false otherwise. If True\r
+     * the mail transaction is started and then one or more Recipient\r
+     * commands may be called followed by a Data command.\r
+     *\r
+     * Implements rfc 821: MAIL <SP> FROM:<reverse-path> <CRLF>\r
+     *\r
+     * SMTP CODE SUCCESS: 250\r
+     * SMTP CODE SUCCESS: 552,451,452\r
+     * SMTP CODE SUCCESS: 500,501,421\r
+     * @access public\r
+     * @return bool\r
+     */\r
+    function Mail($from) {\r
+        $this->error = null; # so no confusion is caused\r
+\r
+        if(!$this->connected()) {\r
+            $this->error = array(\r
+                    "error" => "Called Mail() without being connected");\r
+            return false;\r
+        }\r
+\r
+        fputs($this->smtp_conn,"MAIL FROM:<" . $from . ">" . $this->CRLF);\r
+\r
+        $rply = $this->get_lines();\r
+        $code = substr($rply,0,3);\r
+\r
+        if($this->do_debug >= 2) {\r
+            echo "SMTP -> FROM SERVER:" . $this->CRLF . $rply;\r
+        }\r
+\r
+        if($code != 250) {\r
+            $this->error =\r
+                array("error" => "MAIL not accepted from server",\r
+                      "smtp_code" => $code,\r
+                      "smtp_msg" => substr($rply,4));\r
+            if($this->do_debug >= 1) {\r
+                echo "SMTP -> ERROR: " . $this->error["error"] .\r
+                         ": " . $rply . $this->CRLF;\r
+            }\r
+            return false;\r
+        }\r
+        return true;\r
+    }\r
+\r
+    /**\r
+     * Sends the command NOOP to the SMTP server.\r
+     *\r
+     * Implements from rfc 821: NOOP <CRLF>\r
+     *\r
+     * SMTP CODE SUCCESS: 250\r
+     * SMTP CODE ERROR  : 500, 421\r
+     * @access public\r
+     * @return bool\r
+     */\r
+    function Noop() {\r
+        $this->error = null; # so no confusion is caused\r
+\r
+        if(!$this->connected()) {\r
+            $this->error = array(\r
+                    "error" => "Called Noop() without being connected");\r
+            return false;\r
+        }\r
+\r
+        fputs($this->smtp_conn,"NOOP" . $this->CRLF);\r
+\r
+        $rply = $this->get_lines();\r
+        $code = substr($rply,0,3);\r
+\r
+        if($this->do_debug >= 2) {\r
+            echo "SMTP -> FROM SERVER:" . $this->CRLF . $rply;\r
+        }\r
+\r
+        if($code != 250) {\r
+            $this->error =\r
+                array("error" => "NOOP not accepted from server",\r
+                      "smtp_code" => $code,\r
+                      "smtp_msg" => substr($rply,4));\r
+            if($this->do_debug >= 1) {\r
+                echo "SMTP -> ERROR: " . $this->error["error"] .\r
+                         ": " . $rply . $this->CRLF;\r
+            }\r
+            return false;\r
+        }\r
+        return true;\r
+    }\r
+\r
+    /**\r
+     * Sends the quit command to the server and then closes the socket\r
+     * if there is no error or the $close_on_error argument is true.\r
+     *\r
+     * Implements from rfc 821: QUIT <CRLF>\r
+     *\r
+     * SMTP CODE SUCCESS: 221\r
+     * SMTP CODE ERROR  : 500\r
+     * @access public\r
+     * @return bool\r
+     */\r
+    function Quit($close_on_error=true) {\r
+        $this->error = null; # so there is no confusion\r
+\r
+        if(!$this->connected()) {\r
+            $this->error = array(\r
+                    "error" => "Called Quit() without being connected");\r
+            return false;\r
+        }\r
+\r
+        # send the quit command to the server\r
+        fputs($this->smtp_conn,"quit" . $this->CRLF);\r
+\r
+        # get any good-bye messages\r
+        $byemsg = $this->get_lines();\r
+\r
+        if($this->do_debug >= 2) {\r
+            echo "SMTP -> FROM SERVER:" . $this->CRLF . $byemsg;\r
+        }\r
+\r
+        $rval = true;\r
+        $e = null;\r
+\r
+        $code = substr($byemsg,0,3);\r
+        if($code != 221) {\r
+            # use e as a tmp var cause Close will overwrite $this->error\r
+            $e = array("error" => "SMTP server rejected quit command",\r
+                       "smtp_code" => $code,\r
+                       "smtp_rply" => substr($byemsg,4));\r
+            $rval = false;\r
+            if($this->do_debug >= 1) {\r
+                echo "SMTP -> ERROR: " . $e["error"] . ": " .\r
+                         $byemsg . $this->CRLF;\r
+            }\r
+        }\r
+\r
+        if(empty($e) || $close_on_error) {\r
+            $this->Close();\r
+        }\r
+\r
+        return $rval;\r
+    }\r
+\r
+    /**\r
+     * Sends the command RCPT to the SMTP server with the TO: argument of $to.\r
+     * Returns true if the recipient was accepted false if it was rejected.\r
+     *\r
+     * Implements from rfc 821: RCPT <SP> TO:<forward-path> <CRLF>\r
+     *\r
+     * SMTP CODE SUCCESS: 250,251\r
+     * SMTP CODE FAILURE: 550,551,552,553,450,451,452\r
+     * SMTP CODE ERROR  : 500,501,503,421\r
+     * @access public\r
+     * @return bool\r
+     */\r
+    function Recipient($to) {\r
+        $this->error = null; # so no confusion is caused\r
+\r
+        if(!$this->connected()) {\r
+            $this->error = array(\r
+                    "error" => "Called Recipient() without being connected");\r
+            return false;\r
+        }\r
+\r
+        fputs($this->smtp_conn,"RCPT TO:<" . $to . ">" . $this->CRLF);\r
+\r
+        $rply = $this->get_lines();\r
+        $code = substr($rply,0,3);\r
+\r
+        if($this->do_debug >= 2) {\r
+            echo "SMTP -> FROM SERVER:" . $this->CRLF . $rply;\r
+        }\r
+\r
+        if($code != 250 && $code != 251) {\r
+            $this->error =\r
+                array("error" => "RCPT not accepted from server",\r
+                      "smtp_code" => $code,\r
+                      "smtp_msg" => substr($rply,4));\r
+            if($this->do_debug >= 1) {\r
+                echo "SMTP -> ERROR: " . $this->error["error"] .\r
+                         ": " . $rply . $this->CRLF;\r
+            }\r
+            return false;\r
+        }\r
+        return true;\r
+    }\r
+\r
+    /**\r
+     * Sends the RSET command to abort and transaction that is\r
+     * currently in progress. Returns true if successful false\r
+     * otherwise.\r
+     *\r
+     * Implements rfc 821: RSET <CRLF>\r
+     *\r
+     * SMTP CODE SUCCESS: 250\r
+     * SMTP CODE ERROR  : 500,501,504,421\r
+     * @access public\r
+     * @return bool\r
+     */\r
+    function Reset() {\r
+        $this->error = null; # so no confusion is caused\r
+\r
+        if(!$this->connected()) {\r
+            $this->error = array(\r
+                    "error" => "Called Reset() without being connected");\r
+            return false;\r
+        }\r
+\r
+        fputs($this->smtp_conn,"RSET" . $this->CRLF);\r
+\r
+        $rply = $this->get_lines();\r
+        $code = substr($rply,0,3);\r
+\r
+        if($this->do_debug >= 2) {\r
+            echo "SMTP -> FROM SERVER:" . $this->CRLF . $rply;\r
+        }\r
+\r
+        if($code != 250) {\r
+            $this->error =\r
+                array("error" => "RSET failed",\r
+                      "smtp_code" => $code,\r
+                      "smtp_msg" => substr($rply,4));\r
+            if($this->do_debug >= 1) {\r
+                echo "SMTP -> ERROR: " . $this->error["error"] .\r
+                         ": " . $rply . $this->CRLF;\r
+            }\r
+            return false;\r
+        }\r
+\r
+        return true;\r
+    }\r
+\r
+    /**\r
+     * Starts a mail transaction from the email address specified in\r
+     * $from. Returns true if successful or false otherwise. If True\r
+     * the mail transaction is started and then one or more Recipient\r
+     * commands may be called followed by a Data command. This command\r
+     * will send the message to the users terminal if they are logged\r
+     * in.\r
+     *\r
+     * Implements rfc 821: SEND <SP> FROM:<reverse-path> <CRLF>\r
+     *\r
+     * SMTP CODE SUCCESS: 250\r
+     * SMTP CODE SUCCESS: 552,451,452\r
+     * SMTP CODE SUCCESS: 500,501,502,421\r
+     * @access public\r
+     * @return bool\r
+     */\r
+    function Send($from) {\r
+        $this->error = null; # so no confusion is caused\r
+\r
+        if(!$this->connected()) {\r
+            $this->error = array(\r
+                    "error" => "Called Send() without being connected");\r
+            return false;\r
+        }\r
+\r
+        fputs($this->smtp_conn,"SEND FROM:" . $from . $this->CRLF);\r
+\r
+        $rply = $this->get_lines();\r
+        $code = substr($rply,0,3);\r
+\r
+        if($this->do_debug >= 2) {\r
+            echo "SMTP -> FROM SERVER:" . $this->CRLF . $rply;\r
+        }\r
+\r
+        if($code != 250) {\r
+            $this->error =\r
+                array("error" => "SEND not accepted from server",\r
+                      "smtp_code" => $code,\r
+                      "smtp_msg" => substr($rply,4));\r
+            if($this->do_debug >= 1) {\r
+                echo "SMTP -> ERROR: " . $this->error["error"] .\r
+                         ": " . $rply . $this->CRLF;\r
+            }\r
+            return false;\r
+        }\r
+        return true;\r
+    }\r
+\r
+    /**\r
+     * Starts a mail transaction from the email address specified in\r
+     * $from. Returns true if successful or false otherwise. If True\r
+     * the mail transaction is started and then one or more Recipient\r
+     * commands may be called followed by a Data command. This command\r
+     * will send the message to the users terminal if they are logged\r
+     * in and send them an email.\r
+     *\r
+     * Implements rfc 821: SAML <SP> FROM:<reverse-path> <CRLF>\r
+     *\r
+     * SMTP CODE SUCCESS: 250\r
+     * SMTP CODE SUCCESS: 552,451,452\r
+     * SMTP CODE SUCCESS: 500,501,502,421\r
+     * @access public\r
+     * @return bool\r
+     */\r
+    function SendAndMail($from) {\r
+        $this->error = null; # so no confusion is caused\r
+\r
+        if(!$this->connected()) {\r
+            $this->error = array(\r
+                "error" => "Called SendAndMail() without being connected");\r
+            return false;\r
+        }\r
+\r
+        fputs($this->smtp_conn,"SAML FROM:" . $from . $this->CRLF);\r
+\r
+        $rply = $this->get_lines();\r
+        $code = substr($rply,0,3);\r
+\r
+        if($this->do_debug >= 2) {\r
+            echo "SMTP -> FROM SERVER:" . $this->CRLF . $rply;\r
+        }\r
+\r
+        if($code != 250) {\r
+            $this->error =\r
+                array("error" => "SAML not accepted from server",\r
+                      "smtp_code" => $code,\r
+                      "smtp_msg" => substr($rply,4));\r
+            if($this->do_debug >= 1) {\r
+                echo "SMTP -> ERROR: " . $this->error["error"] .\r
+                         ": " . $rply . $this->CRLF;\r
+            }\r
+            return false;\r
+        }\r
+        return true;\r
+    }\r
+\r
+    /**\r
+     * Starts a mail transaction from the email address specified in\r
+     * $from. Returns true if successful or false otherwise. If True\r
+     * the mail transaction is started and then one or more Recipient\r
+     * commands may be called followed by a Data command. This command\r
+     * will send the message to the users terminal if they are logged\r
+     * in or mail it to them if they are not.\r
+     *\r
+     * Implements rfc 821: SOML <SP> FROM:<reverse-path> <CRLF>\r
+     *\r
+     * SMTP CODE SUCCESS: 250\r
+     * SMTP CODE SUCCESS: 552,451,452\r
+     * SMTP CODE SUCCESS: 500,501,502,421\r
+     * @access public\r
+     * @return bool\r
+     */\r
+    function SendOrMail($from) {\r
+        $this->error = null; # so no confusion is caused\r
+\r
+        if(!$this->connected()) {\r
+            $this->error = array(\r
+                "error" => "Called SendOrMail() without being connected");\r
+            return false;\r
+        }\r
+\r
+        fputs($this->smtp_conn,"SOML FROM:" . $from . $this->CRLF);\r
+\r
+        $rply = $this->get_lines();\r
+        $code = substr($rply,0,3);\r
+\r
+        if($this->do_debug >= 2) {\r
+            echo "SMTP -> FROM SERVER:" . $this->CRLF . $rply;\r
+        }\r
+\r
+        if($code != 250) {\r
+            $this->error =\r
+                array("error" => "SOML not accepted from server",\r
+                      "smtp_code" => $code,\r
+                      "smtp_msg" => substr($rply,4));\r
+            if($this->do_debug >= 1) {\r
+                echo "SMTP -> ERROR: " . $this->error["error"] .\r
+                         ": " . $rply . $this->CRLF;\r
+            }\r
+            return false;\r
+        }\r
+        return true;\r
+    }\r
+\r
+    /**\r
+     * This is an optional command for SMTP that this class does not\r
+     * support. This method is here to make the RFC821 Definition\r
+     * complete for this class and __may__ be implimented in the future\r
+     *\r
+     * Implements from rfc 821: TURN <CRLF>\r
+     *\r
+     * SMTP CODE SUCCESS: 250\r
+     * SMTP CODE FAILURE: 502\r
+     * SMTP CODE ERROR  : 500, 503\r
+     * @access public\r
+     * @return bool\r
+     */\r
+    function Turn() {\r
+        $this->error = array("error" => "This method, TURN, of the SMTP ".\r
+                                        "is not implemented");\r
+        if($this->do_debug >= 1) {\r
+            echo "SMTP -> NOTICE: " . $this->error["error"] . $this->CRLF;\r
+        }\r
+        return false;\r
+    }\r
+\r
+    /**\r
+     * Verifies that the name is recognized by the server.\r
+     * Returns false if the name could not be verified otherwise\r
+     * the response from the server is returned.\r
+     *\r
+     * Implements rfc 821: VRFY <SP> <string> <CRLF>\r
+     *\r
+     * SMTP CODE SUCCESS: 250,251\r
+     * SMTP CODE FAILURE: 550,551,553\r
+     * SMTP CODE ERROR  : 500,501,502,421\r
+     * @access public\r
+     * @return int\r
+     */\r
+    function Verify($name) {\r
+        $this->error = null; # so no confusion is caused\r
+\r
+        if(!$this->connected()) {\r
+            $this->error = array(\r
+                    "error" => "Called Verify() without being connected");\r
+            return false;\r
+        }\r
+\r
+        fputs($this->smtp_conn,"VRFY " . $name . $this->CRLF);\r
+\r
+        $rply = $this->get_lines();\r
+        $code = substr($rply,0,3);\r
+\r
+        if($this->do_debug >= 2) {\r
+            echo "SMTP -> FROM SERVER:" . $this->CRLF . $rply;\r
+        }\r
+\r
+        if($code != 250 && $code != 251) {\r
+            $this->error =\r
+                array("error" => "VRFY failed on name '$name'",\r
+                      "smtp_code" => $code,\r
+                      "smtp_msg" => substr($rply,4));\r
+            if($this->do_debug >= 1) {\r
+                echo "SMTP -> ERROR: " . $this->error["error"] .\r
+                         ": " . $rply . $this->CRLF;\r
+            }\r
+            return false;\r
+        }\r
+        return $rply;\r
+    }\r
+\r
+    /*******************************************************************\r
+     *                       INTERNAL FUNCTIONS                       *\r
+     ******************************************************************/\r
+\r
+    /**\r
+     * Read in as many lines as possible\r
+     * either before eof or socket timeout occurs on the operation.\r
+     * With SMTP we can tell if we have more lines to read if the\r
+     * 4th character is '-' symbol. If it is a space then we don't\r
+     * need to read anything else.\r
+     * @access private\r
+     * @return string\r
+     */\r
+    function get_lines() {\r
+        $data = "";\r
+        while($str = fgets($this->smtp_conn,515)) {\r
+            if($this->do_debug >= 4) {\r
+                echo "SMTP -> get_lines(): \$data was \"$data\"" .\r
+                         $this->CRLF;\r
+                echo "SMTP -> get_lines(): \$str is \"$str\"" .\r
+                         $this->CRLF;\r
+            }\r
+            $data .= $str;\r
+            if($this->do_debug >= 4) {\r
+                echo "SMTP -> get_lines(): \$data is \"$data\"" . $this->CRLF;\r
+            }\r
+            # if the 4th character is a space then we are done reading\r
+            # so just break the loop\r
+            if(substr($str,3,1) == " ") { break; }\r
+        }\r
+        return $data;\r
+    }\r
+\r
+}\r
+\r
+\r
+ ?>\r