[PLUGINS] +abomailman
[ptitvelo/web/www.git] / www / plugins / facteur / phpmailer-php5 / class.smtp.php
diff --git a/www/plugins/facteur/phpmailer-php5/class.smtp.php b/www/plugins/facteur/phpmailer-php5/class.smtp.php
new file mode 100755 (executable)
index 0000000..c2ca1cb
--- /dev/null
@@ -0,0 +1,814 @@
+<?php\r
+/*~ class.smtp.php\r
+.---------------------------------------------------------------------------.\r
+|  Software: PHPMailer - PHP email class                                    |\r
+|   Version: 5.1                                                            |\r
+|   Contact: via sourceforge.net support pages (also www.codeworxtech.com)  |\r
+|      Info: http://phpmailer.sourceforge.net                               |\r
+|   Support: http://sourceforge.net/projects/phpmailer/                     |\r
+| ------------------------------------------------------------------------- |\r
+|     Admin: Andy Prevost (project admininistrator)                         |\r
+|   Authors: Andy Prevost (codeworxtech) codeworxtech@users.sourceforge.net |\r
+|          : Marcus Bointon (coolbru) coolbru@users.sourceforge.net         |\r
+|   Founder: Brent R. Matzelle (original founder)                           |\r
+| Copyright (c) 2004-2009, Andy Prevost. All Rights Reserved.               |\r
+| Copyright (c) 2001-2003, Brent R. Matzelle                                |\r
+| ------------------------------------------------------------------------- |\r
+|   License: Distributed under the Lesser General Public License (LGPL)     |\r
+|            http://www.gnu.org/copyleft/lesser.html                        |\r
+| This program is distributed in the hope that it will be useful - WITHOUT  |\r
+| ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or     |\r
+| FITNESS FOR A PARTICULAR PURPOSE.                                         |\r
+| ------------------------------------------------------------------------- |\r
+| We offer a number of paid services (www.codeworxtech.com):                |\r
+| - Web Hosting on highly optimized fast and secure servers                 |\r
+| - Technology Consulting                                                   |\r
+| - Oursourcing (highly qualified programmers and graphic designers)        |\r
+'---------------------------------------------------------------------------'\r
+*/\r
+\r
+/**\r
+ * PHPMailer - PHP SMTP email transport class\r
+ * NOTE: Designed for use with PHP version 5 and up\r
+ * @package PHPMailer\r
+ * @author Andy Prevost\r
+ * @author Marcus Bointon\r
+ * @copyright 2004 - 2008 Andy Prevost\r
+ * @license http://www.gnu.org/copyleft/lesser.html Distributed under the Lesser General Public License (LGPL)\r
+ * @version $Id: class.smtp.php 444 2009-05-05 11:22:26Z coolbru $\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
+ * original author: Chris Ryan\r
+ */\r
+\r
+class SMTP {\r
+  /**\r
+   *  SMTP server port\r
+   *  @var int\r
+   */\r
+  public $SMTP_PORT = 25;\r
+\r
+  /**\r
+   *  SMTP reply line ending\r
+   *  @var string\r
+   */\r
+  public $CRLF = "\r\n";\r
+\r
+  /**\r
+   *  Sets whether debugging is turned on\r
+   *  @var bool\r
+   */\r
+  public $do_debug;       // the level of debug to perform\r
+\r
+  /**\r
+   *  Sets VERP use on/off (default is off)\r
+   *  @var bool\r
+   */\r
+  public $do_verp = false;\r
+\r
+  /////////////////////////////////////////////////\r
+  // PROPERTIES, PRIVATE AND PROTECTED\r
+  /////////////////////////////////////////////////\r
+\r
+  private $smtp_conn; // the socket to the server\r
+  private $error;     // error if any on the last call\r
+  private $helo_rply; // the reply the server sent to us for HELO\r
+\r
+  /**\r
+   * Initialize the class so that the data is in a known state.\r
+   * @access public\r
+   * @return void\r
+   */\r
+  public function __construct() {\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
+  public 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
+      // already connected, generate error\r
+      $this->error = 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"] . ": $errstr ($errno)" . $this->CRLF . '<br />';\r
+      }\r
+      return false;\r
+    }\r
+\r
+    // SMTP server can take longer to respond, give longer timeout for first read\r
+    // Windows 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\r
+    $announce = $this->get_lines();\r
+\r
+    if($this->do_debug >= 2) {\r
+      echo "SMTP -> FROM SERVER:" . $announce . $this->CRLF . '<br />';\r
+    }\r
+\r
+    return true;\r
+  }\r
+\r
+  /**\r
+   * Initiate a TLS communication with the server.\r
+   *\r
+   * SMTP CODE 220 Ready to start TLS\r
+   * SMTP CODE 501 Syntax error (no parameters allowed)\r
+   * SMTP CODE 454 TLS not available due to temporary reason\r
+   * @access public\r
+   * @return bool success\r
+   */\r
+  public function StartTLS() {\r
+    $this->error = null; # to avoid confusion\r
+\r
+    if(!$this->connected()) {\r
+      $this->error = array("error" => "Called StartTLS() without being connected");\r
+      return false;\r
+    }\r
+\r
+    fputs($this->smtp_conn,"STARTTLS" . $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:" . $rply . $this->CRLF . '<br />';\r
+    }\r
+\r
+    if($code != 220) {\r
+      $this->error =\r
+         array("error"     => "STARTTLS 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"] . ": " . $rply . $this->CRLF . '<br />';\r
+      }\r
+      return false;\r
+    }\r
+\r
+    // Begin encrypted connection\r
+    if(!stream_socket_enable_crypto($this->smtp_conn, true, STREAM_CRYPTO_METHOD_TLS_CLIENT)) {\r
+      return false;\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
+  public 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"] . ": " . $rply . $this->CRLF . '<br />';\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"] . ": " . $rply . $this->CRLF . '<br />';\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"] . ": " . $rply . $this->CRLF . '<br />';\r
+      }\r
+      return false;\r
+    }\r
+\r
+    return true;\r
+  }\r
+\r
+  /**\r
+   * Returns true if connected to a server otherwise false\r
+   * @access public\r
+   * @return bool\r
+   */\r
+  public function Connected() {\r
+    if(!empty($this->smtp_conn)) {\r
+      $sock_status = socket_get_status($this->smtp_conn);\r
+      if($sock_status["eof"]) {\r
+        // the socket is valid but we are not connected\r
+        if($this->do_debug >= 1) {\r
+            echo "SMTP -> NOTICE:" . $this->CRLF . "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
+  public 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
+  // 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
+  public 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:" . $rply . $this->CRLF . '<br />';\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"] . ": " . $rply . $this->CRLF . '<br />';\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 limit.\r
+     */\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 am 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
+     */\r
+\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 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
+          $lines_out[] = substr($line,0,$pos);\r
+          $line = substr($line,$pos);\r
+        } else {\r
+          $lines_out[] = substr($line,0,$pos);\r
+          $line = substr($line,$pos + 1);\r
+        }\r
+\r
+        /* if processing headers add a LWSP-char to the front of new line\r
+         * rfc 822 on long msg headers\r
+         */\r
+        if($in_headers) {\r
+          $line = "\t" . $line;\r
+        }\r
+      }\r
+      $lines_out[] = $line;\r
+\r
+      // 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
+    // message data has been sent\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:" . $rply . $this->CRLF . '<br />';\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"] . ": " . $rply . $this->CRLF . '<br />';\r
+      }\r
+      return false;\r
+    }\r
+    return true;\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
+  public 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 hostname for HELO was not specified send default\r
+    if(empty($host)) {\r
+      // determine appropriate default to send to server\r
+      $host = "localhost";\r
+    }\r
+\r
+    // Send extended hello first (RFC 2821)\r
+    if(!$this->SendHello("EHLO", $host)) {\r
+      if(!$this->SendHello("HELO", $host)) {\r
+        return false;\r
+      }\r
+    }\r
+\r
+    return true;\r
+  }\r
+\r
+  /**\r
+   * Sends a HELO/EHLO command.\r
+   * @access private\r
+   * @return bool\r
+   */\r
+  private 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: " . $rply . $this->CRLF . '<br />';\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"] . ": " . $rply . $this->CRLF . '<br />';\r
+      }\r
+      return false;\r
+    }\r
+\r
+    $this->helo_rply = $rply;\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.\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
+  public 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
+    $useVerp = ($this->do_verp ? "XVERP" : "");\r
+    fputs($this->smtp_conn,"MAIL FROM:<" . $from . ">" . $useVerp . $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:" . $rply . $this->CRLF . '<br />';\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"] . ": " . $rply . $this->CRLF . '<br />';\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
+  public 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:" . $byemsg . $this->CRLF . '<br />';\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"] . ": " . $byemsg . $this->CRLF . '<br />';\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
+  public 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:" . $rply . $this->CRLF . '<br />';\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"] . ": " . $rply . $this->CRLF . '<br />';\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
+  public 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:" . $rply . $this->CRLF . '<br />';\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"] . ": " . $rply . $this->CRLF . '<br />';\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 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
+  public 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:" . $rply . $this->CRLF . '<br />';\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"] . ": " . $rply . $this->CRLF . '<br />';\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
+  public 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 . '<br />';\r
+    }\r
+    return false;\r
+  }\r
+\r
+  /**\r
+  * Get the current error\r
+  * @access public\r
+  * @return array\r
+  */\r
+  public function getError() {\r
+    return $this->error;\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
+  private 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\"" . $this->CRLF . '<br />';\r
+        echo "SMTP -> get_lines(): \$str is \"$str\"" . $this->CRLF . '<br />';\r
+      }\r
+      $data .= $str;\r
+      if($this->do_debug >= 4) {\r
+        echo "SMTP -> get_lines(): \$data is \"$data\"" . $this->CRLF . '<br />';\r
+      }\r
+      // if 4th character is a space, we are done reading, break the loop\r
+      if(substr($str,3,1) == " ") { break; }\r
+    }\r
+    return $data;\r
+  }\r
+\r
+}\r
+\r
+?>
\ No newline at end of file