X-Git-Url: https://vcs.fsf.org/?a=blobdiff_plain;f=functions%2Fsmtp.php;h=221ae0ec09e9a00690ffc763bb33296e40526350;hb=e697b6cc39af08f80d3ee3743c9d4088791af634;hp=52d554bb63e8e007e96d09a80dce7dda909e36e8;hpb=e9eca7fe297c8c9f87471791d607a2581cf5a807;p=squirrelmail.git diff --git a/functions/smtp.php b/functions/smtp.php index 52d554bb..221ae0ec 100644 --- a/functions/smtp.php +++ b/functions/smtp.php @@ -1,5 +1,9 @@ + // Adds @$domain if it wasn't in the address book and if it + // doesn't have an @ symbol in it + function expandRcptAddrs ($array) { + global $domain; + + // don't show errors -- kinda critical that we don't see + // them here since the redirect won't work if we do show them + $abook = addressbook_init(false); + for ($i=0; $i < count($array); $i++) { + $result = $abook->lookup($array[$i]); + $ret = ""; + if (isset($result['email'])) { + $ret = '<'.$result['email'].'>'; + $array[$i] = $ret; + } + else + { + if (strpos($array[$i], '@') === false) + $array[$i] .= '@' . $domain; + $array[$i] = '<' . $array[$i] . '>'; + } + } + return $array; + } + + // Attach the files that are due to be attached function attachFiles ($fp) { global $attachments, $attachment_dir; @@ -76,9 +106,6 @@ if (isMultipart()) { foreach ($attachments as $info) { -// echo "
Attachment Info:\n";
-//	    var_dump($info);
-//	    echo "\n
\n"; if (isset($info['type'])) $filetype = $info['type']; else @@ -90,7 +117,9 @@ $header .= "Content-Disposition: attachment; filename=\"" . $info['remotefilename'] . "\"\r\n"; - $file = fopen ($attachment_dir . $info['localfilename'], 'r'); + // Use 'rb' for NT systems -- read binary + // Unix doesn't care -- everything's binary! :-) + $file = fopen ($attachment_dir . $info['localfilename'], 'rb'); if (substr($filetype, 0, 5) == 'text/' || $filetype == 'message/rfc822') { $header .= "\r\n"; @@ -338,9 +367,13 @@ $envelopefrom = ereg_replace("[[:space:]]",'', $envelopefrom); $envelopefrom = ereg_replace("[[:cntrl:]]",'', $envelopefrom); - // open pipe to sendmail - $fp = popen (escapeshellcmd("$sendmail_path -t -f$envelopefrom"), 'w'); - + // open pipe to sendmail or qmail-inject (qmail-inject doesn't accept -t param) + if (strstr($sendmail_path, "qmail-inject")) { + $fp = popen (escapeshellcmd("$sendmail_path -f$envelopefrom"), "w"); + } else { + $fp = popen (escapeshellcmd("$sendmail_path -t -f$envelopefrom"), "w"); + } + $headerlength = write822Header ($fp, $t, $c, $b, $subject, $more_headers); $bodylength = writeBody($fp, $body); @@ -361,12 +394,13 @@ } function sendSMTP($t, $c, $b, $subject, $body, $more_headers) { - global $username, $popuser, $domain, $version, $smtpServerAddress, $smtpPort, - $data_dir, $color, $use_authenticated_smtp, $identity; + global $username, $popuser, $domain, $version, $smtpServerAddress, + $smtpPort, $data_dir, $color, $use_authenticated_smtp, $identity, + $key, $onetimepad; - $to = expandAddrs(parseAddrs($t)); - $cc = expandAddrs(parseAddrs($c)); - $bcc = expandAddrs(parseAddrs($b)); + $to = expandRcptAddrs(parseAddrs($t)); + $cc = expandRcptAddrs(parseAddrs($c)); + $bcc = expandRcptAddrs(parseAddrs($b)); if (isset($identity) && $identity != 'default') $from_addr = getPref($data_dir, $username, 'email_address' . $identity); else @@ -405,7 +439,7 @@ $tmp = fgets($smtpConnection, 1024); if (errorCheck($tmp, $smtpConnection)!=5) return(0); - fputs($smtpConnection, base64_encode ($OneTimePadDecrypt($key, $onetimepad)) . "\r\n"); + fputs($smtpConnection, base64_encode (OneTimePadDecrypt($key, $onetimepad)) . "\r\n"); $tmp = fgets($smtpConnection, 1024); if (errorCheck($tmp, $smtpConnection)!=5) return(0); } @@ -447,7 +481,7 @@ if ($num != 250) { $tmp = nl2br(htmlspecialchars($tmp)); displayPageHeader($color, 'None'); - include ("../functions/display_messages.php"); + include_once('../functions/display_messages.php'); $msg = "Message not sent!
\nReason given: $tmp"; plain_error_message($msg, $color); return(0); @@ -463,7 +497,6 @@ function errorCheck($line, $smtpConnection, $verbose = false) { global $color; - include '../functions/page_header.php'; // Read new lines on a multiline response $lines = $line; @@ -554,8 +587,9 @@ } if ($status == 0) { + include_once('../functions/page_header.php'); displayPageHeader($color, 'None'); - include ("../functions/display_messages.php"); + include_once('../functions/display_messages.php'); $lines = nl2br(htmlspecialchars($lines)); $msg = $message . "
\nServer replied: $lines"; plain_error_message($msg, $color); @@ -564,11 +598,15 @@ return $err_num; } - function sendMessage($t, $c, $b, $subject, $body, $reply_id) { + function sendMessage($t, $c, $b, $subject, $body, $reply_id, $prio = 3) { global $useSendmail, $msg_id, $is_reply, $mailbox, $onetimepad; global $data_dir, $username, $domain, $key, $version, $sent_folder, $imapServerAddress, $imapPort; + global $default_use_priority; + global $more_headers; $more_headers = Array(); + do_hook("smtp_send"); + $imap_stream = sqimap_login($username, $key, $imapServerAddress, $imapPort, 1); if (isset($reply_id) && $reply_id) { @@ -585,16 +623,19 @@ $more_headers['References'] = $hdr->message_id; } } + if ($default_use_priority) { + $more_headers = array_merge($more_headers, createPriorityHeaders($prio)); + } // In order to remove the problem of users not able to create - // messages with "." on a blank line, RFC821 has made provision - // in section 4.5.2 (Transparency). - $body = ereg_replace("\n\\.", "\n..", $body); - $body = ereg_replace("^\\.", "..", $body); + // messages with "." on a blank line, RFC821 has made provision + // in section 4.5.2 (Transparency). + $body = ereg_replace("\n\\.", "\n..", $body); + $body = ereg_replace("^\\.", "..", $body); // this is to catch all plain \n instances and - // replace them with \r\n. - $body = ereg_replace("\r\n", "\n", $body); + // replace them with \r\n. All newlines were converted + // into just \n inside the compose.php file. $body = ereg_replace("\n", "\r\n", $body); if ($useSendmail) { @@ -618,4 +659,24 @@ return $length; } + function createPriorityHeaders($prio) { + $prio_headers = Array(); + $prio_headers["X-Priority"] = $prio; + + switch($prio) { + case 1: $prio_headers["Importance"] = "High"; + $prio_headers["X-MSMail-Priority"] = "High"; + break; + + case 3: $prio_headers["Importance"] = "Normal"; + $prio_headers["X-MSMail-Priority"] = "Normal"; + break; + + case 5: + $prio_headers["Importance"] = "Low"; + $prio_headers["X-MSMail-Priority"] = "Low"; + break; + } + return $prio_headers; + } ?>