www.gusucode.com > ShopEx481 & PHPWind 整合版码程序 > core/lib/smtpmail/sm.php
<?php $ARR_CONTENT_TYPE['zh'] = "GBK"; $ARR_CONTENT_TYPE['big5'] = "big5"; $ARR_CONTENT_TYPE['en'] = "iso-8859-1"; class smtp { /* Public Variables */ var $smtp_port; var $time_out; var $host_name; var $log_file; var $relay_host; var $debug; var $auth; var $user; var $pass; var $times; var $encode = "utf8"; var $lang = "zh"; var $sendway ="SMTP"; var $uencodingtable = array(); var $boundary = array(); var $LE = "\n"; var $Encoding = "base64"; var $CharSet = "UTF-8"; /* Private Variables */ var $sock; //var $attfile; /* Constractor */ function smtp($user,$pass,$relay_host = "", $smtp_port = 25,$auth = false) { $this->debug = FALSE; $this->smtp_port = $smtp_port; $this->relay_host = $relay_host; $this->time_out = 30; //is used in fsockopen() # $this->auth = $auth;//auth $this->user = $user; $this->pass = $pass; # $this->host_name = "localhost"; //is used in HELO command $this->log_file = ""; $this->sock = FALSE; } /* Main Function ($attachment=>附件的编码,$hasfile=>是否含有附件,$file_name=>附件的名称,$content_type=>附件的类型)*/ function sendmail($to, $from, $subject = "", $body = "", $mailtype, $mailmaster="Webmaster", $cc = "", $bcc = "", $additional_headers = "",$tmpfile="",$iffile=false,$tmpname="",$tmptype="") { global $SITE_EODING,$ARR_CONTENT_TYPE,$MAIL_SEND_METHOD; if(isset($MAIL_SEND_METHOD)){ if($MAIL_SEND_METHOD!=""){ $this->sendway = $MAIL_SEND_METHOD; } } if(!isset($SITE_EODING)){ $charset = "gbk"; }else{ if($SITE_EODING=="UTF-8") { if($this->encode=="utf8") { $charset = "UTF-8"; $subject = "=?".$charset."?B?".base64_encode($subject)."?="; $mailmaster = "=?".$charset."?B?".base64_encode($mailmaster)."?="; }else{ //使用本地编码发送MAIL $charset = $ARR_CONTENT_TYPE[$this->lang]; if($charset !='iso-8859-1') { $subject = utf2local($subject,$this->lang); $mailmaster = utf2local($mailmaster,$this->lang); $body = utf2local($body,$this->lang); } } } else { $charset = $ARR_CONTENT_TYPE[$this->lang]; } } $mail_from = $this->get_address($this->strip_comment($from)); $body = ereg_replace("(^|(\r\n))(\\.)", "\\1.\\3", $body); if($this->sendway=="SMTP") //SMTP方式发送MAIL { if (trim($this->smtp_port) == "" || trim($this->relay_host) == "" ||trim($to) == "" ||trim($from) == "") return ; } else { if (trim($to) == "" ||trim($from) == "") return ; } $header .= "From: $mailmaster<$from>\r\n"; $header .= "Reply-To: $mailmaster<$from>\r\n"; if($this->sendway=="SMTP") //SMTP方式发送MAIL { $header .= "To: ".$to."\r\n"; if ($cc != "") { $header .= "Cc: ".$cc."\r\n"; } $header .= "Subject: ".$subject."\r\n"; } $header .= $additional_headers; $header .= "MIME-Version:1.0\r\n"; if($iffile){ $header.= "Content-Type: multipart/mixed; boundary=\"----=_Part_12038_5896801.1067927729644\"\r\n"; $header .= "Content-Transfer-Encoding: 8bit\r\n"; } else { $header .= "Content-Type: multipart/alternative; boundary=\"----=_Part_12038_5896801.1067927729644\"\r\n"; } if($this->sendway=="SMTP") //SMTP方式发送MAIL { $header .= "Date: ".date("r")."\r\n"; } else { $header .= "Date: ".date("r"); } list($msec, $sec) = explode(" ", microtime()); $TO = explode(",", $this->strip_comment($to)); if ($cc != "") { $TO = array_merge($TO, explode(",", $this->strip_comment($cc))); } if ($bcc != "") { $TO = array_merge($TO, explode(",", $this->strip_comment($bcc))); } $sent = TRUE; if($iffile){ $body="------=_Part_12038_5896801.1067927729644\r\nContent-Type: text/html; charset=\"$charset\"\r\nContent-Transfer-Encoding: quoted-printable\r\n\r\n".$body; $body.="\r\n------=_Part_12038_5896801.1067927729644\r\nContent-Type: ".$tmptype."; name=".$tmpname."\r\nContent-Transfer-Encoding: base64\r\nContent-Disposition: attachment; filename=".$tmpname."\r\n\r\n".$tmpfile; $body.="------=_Part_12038_5896801.1067927729644--"; } else { $bodytxt = str_replace("\r","",$body); $bodytxt = str_replace("\n","",$bodytxt); $bodytxt = strip_tags(preg_replace("/<br>/i","\r\n",$bodytxt)); $bodytxt = str_replace(" "," ",$bodytxt); $bodyhtml = $body; $body="------=_Part_12038_5896801.1067927729644\r\nContent-Type: text/plain; charset=\"$charset\"\r\nContent-Transfer-Encoding: 8bit\r\n\r\n".$bodytxt."\r\n------=_Part_12038_5896801.1067927729644\r\nContent-Type:text/html;charset=\"$charset\"\r\nContent-Transfer-Encoding: 8bit\r\n\r\n".$bodyhtml; $body.="\r\n------=_Part_12038_5896801.1067927729644--"; } /****************************/ if($this->sendway=="SMTP") //SMTP方式发送MAIL { //$body.=$tmpfile.$tmpname.$tmptype; foreach ($TO as $rcpt_to) { $rcpt_to = $this->get_address($rcpt_to); if (!$this->smtp_sockopen($rcpt_to)) { $this->log_write("Error: Cannot send email to ".$rcpt_to."\n"); $sent = FALSE; continue; } if ($this->smtp_send($this->host_name, $mail_from, $rcpt_to, $header, $body)) { $this->log_write("E-mail has been sent to <".$rcpt_to.">\n"); //echo("发送成功!"); $sent = true; } else { $this->log_write("Error: Cannot send email to <".$rcpt_to.">\n"); $sent = FALSE; } fclose($this->sock); $this->log_write("Disconnected from remote host\n"); } return $sent; } elseif($this->sendway=="MAIL") { $body = str_replace("\r","",$body); $header = str_replace("\r","",$header); foreach ($TO as $rcpt_to) { $sent = mail($rcpt_to, $subject, $body,$header); } return $sent; }elseif($this->sendway=="JMAIL") { $jmail = new COM("JMail.Message"); com_set ( $jmail, "MailServerUserName", $this->user); com_set ( $jmail, "MailServerUserName", $this->user); com_set ( $jmail, "ContentTransferEncoding","base64"); com_set ( $jmail, "EnableCharsetTranslation",false); foreach ($TO as $rcpt_to) { com_invoke ( $jmail, "AddRecipient", $rcpt_to); } com_set ( $jmail, "Charset", $charset); com_set ( $jmail, "From", $from); com_set ( $jmail, "FromName",$mailmaster); com_set ( $jmail, "Subject", $subject); com_set ( $jmail, "Priority", 1); com_set ( $jmail, "Silent", true); com_set ( $jmail, "HTMLBody", $bodyhtml); com_set ( $jmail, "Body", $bodytxt); com_invoke ( $jmail, "Send", $this->relay_host.":".$this->smtp_port); com_invoke ( $jmail, "Close"); $sent =true; return $sent; } } /* Private Functions */ function smtp_send($helo, $from, $to, $header, $body = "") { if($this->auth){ if (!$this->smtp_putcmd("EHLO", $helo)) { return $this->smtp_error("sending HELO command"); } if (!$this->smtp_putcmd("AUTH LOGIN")) { return $this->smtp_error("sending HELO command"); } if (!$this->smtp_putcmd("",base64_encode($this->user))) { return $this->smtp_error("sending HELO command"); } if (!$this->smtp_putcmd("", base64_encode($this->pass))) { return $this->smtp_error("sending HELO command"); } }else{ if (!$this->smtp_putcmd("HELO", $helo)) { return $this->smtp_error("sending HELO command"); } } if (!$this->smtp_putcmd("MAIL", "FROM:<".$from.">")) { return $this->smtp_error("sending MAIL FROM command"); } if (!$this->smtp_putcmd("RCPT", "TO:<".$to.">")) { return $this->smtp_error("sending RCPT TO command"); } if (!$this->smtp_putcmd("DATA")) { return $this->smtp_error("sending DATA command"); } if (!$this->smtp_message($header, $body)) { return $this->smtp_error("sending message"); } if (!$this->smtp_eom()) { return $this->smtp_error("sending <CR><LF>.<CR><LF> [EOM]"); } if (!$this->smtp_putcmd("QUIT")) { return $this->smtp_error("sending QUIT command"); } return TRUE; } function smtp_sockopen($address) { if ($this->relay_host == "") { return $this->smtp_sockopen_mx($address); } else { return $this->smtp_sockopen_relay(); } } function smtp_sockopen_relay() { $this->log_write("Trying to ".$this->relay_host.":".$this->smtp_port."\n"); $this->sock = @fsockopen($this->relay_host, $this->smtp_port, $errno, $errstr, $this->time_out); if (!($this->sock && $this->smtp_ok())) { $this->log_write("Error: Cannot connenct to relay host ".$this->relay_host."\n"); $this->log_write("Error: ".$errstr." (".$errno.")\n"); return FALSE; } $this->log_write("Connected to relay host ".$this->relay_host."\n"); return TRUE; } function smtp_sockopen_mx($address) { $domain = ereg_replace("^.+@([^@]+)$", "\\1", $address); if (!@getmxrr($domain, $MXHOSTS)) { $this->log_write("Error: Cannot resolve MX \"".$domain."\"\n"); return FALSE; } foreach ($MXHOSTS as $host) { $this->log_write("Trying to ".$host.":".$this->smtp_port."\n"); $this->sock = @fsockopen($host, $this->smtp_port, $errno, $errstr, $this->time_out); if (!($this->sock && $this->smtp_ok())) { $this->log_write("Warning: Cannot connect to mx host ".$host."\n"); $this->log_write("Error: ".$errstr." (".$errno.")\n"); continue; } $this->log_write("Connected to mx host ".$host."\n"); return TRUE; } $this->log_write("Error: Cannot connect to any mx hosts (".implode(", ", $MXHOSTS).")\n"); return FALSE; } function smtp_message($header, $body) { # the server is ready to accept data! # according to rfc 821 we should not send more than 1000 # including the CRLF # characters on a single line so we will break the data up # into lines by \r and/or \n then if needed we will break # each of those into smaller lines to fit within the limit. # in addition we will be looking for lines that start with # a period '.' and append and additional period '.' to that # line. NOTE: this does not count towards are limit. # normalize the line breaks so we know the explode works $msg_data = $header.$body; $msg_data = str_replace("\r\n","\n",$msg_data); $msg_data = str_replace("\r","\n",$msg_data); $lines = explode("\n",$msg_data); # we need to find a good way to determine is headers are # in the msg_data or if it is a straight msg body # currently I'm assuming rfc 822 definitions of msg headers # and if the first field of the first line (':' sperated) # does not contain a space then it _should_ be a header # and we can process all lines before a blank "" line as # headers. $field = substr($lines[0],0,strpos($lines[0],":")); $in_headers = false; if(!empty($field) && !strstr($field," ")) { $in_headers = true; } $max_line_length = 998; # used below; set here for ease in change while(list(,$line) = @each($lines)) { $lines_out = null; if($line == "" && $in_headers) { $in_headers = false; } # ok we need to break this line up into several # smaller lines while(strlen($line) > $max_line_length) { $pos = strrpos(substr($line,0,$max_line_length)," "); # Patch to fix DOS attack if(!$pos) { $pos = $max_line_length - 1; } $lines_out[] = substr($line,0,$pos); $line = substr($line,$pos + 1); # if we are processing headers we need to # add a LWSP-char to the front of the new line # rfc 822 on long msg headers if($in_headers) { $line = "\t" . $line; } } $lines_out[] = $line; # now send the lines to the server while(list(,$line_out) = @each($lines_out)) { if(strlen($line_out) > 0) { if(substr($line_out, 0, 1) == ".") { $line_out = "." . $line_out; } } fputs($this->sock,$line_out . "\r\n"); } } # ok all the message data has been sent so lets get this # over with aleady $this->smtp_debug("> ".str_replace("\r\n", "\n"."> ", $header."\n> ".$body."\n> ")); return TRUE; } function smtp_eom() { fputs($this->sock, "\r\n.\r\n"); $this->smtp_debug(". [EOM]\n"); return $this->smtp_ok(); } function smtp_ok() { $response = str_replace("\r\n", "", fgets($this->sock, 512)); $this->smtp_debug($response."\n"); if (!ereg("^[23]", $response)) { fputs($this->sock, "QUIT\r\n"); fgets($this->sock, 512); $this->log_write("Error: Remote host returned \"".$response."\"\n"); return FALSE; } return TRUE; } function smtp_putcmd($cmd, $arg = "") { if ($arg != "") { if($cmd=="") $cmd = $arg; else $cmd = $cmd." ".$arg; } fputs($this->sock, $cmd."\r\n"); $this->smtp_debug("> ".$cmd."\n"); return $this->smtp_ok(); } function smtp_error($string) { $this->log_write("Error: Error occurred while ".$string.".\n"); return FALSE; } function log_write($message) { $this->smtp_debug($message); if ($this->log_file == "") { return TRUE; } $message = date("M d H:i:s ").get_current_user()."[".getmypid()."]: ".$message; if (!@file_exists($this->log_file) || !($fp = @fopen($this->log_file, "a"))) { $this->smtp_debug("Warning: Cannot open log file \"".$this->log_file."\"\n"); return FALSE; } flock($fp, LOCK_EX); fputs($fp, $message); fclose($fp); return TRUE; } function strip_comment($address) { $comment = "\\([^()]*\\)"; while (ereg($comment, $address)) { $address = ereg_replace($comment, "", $address); } return $address; } function get_address($address) { $address = ereg_replace("([ \t\r\n])+", "", $address); $address = ereg_replace("^.*<(.+)>.*$", "\\1", $address); return $address; } function smtp_debug($message) { if ($this->debug) { echo $message; } } } ?>