updated authors file
[squirrelmail.git] / functions / smtp.php
index 04e92bf0e050717688167f3e7977c327fcfbc0f0..a002d65834e8f26b095433bf801984ed2573cbcd 100644 (file)
@@ -1,4 +1,4 @@
-<?
+<?php
    /** smtp.php
     **
     ** This contains all the functions needed to send messages through
             $from = "<$from_addr>";
          else
             $from = $from . " <$from_addr>";
+
+         /* Encoding 8-bit characters */
+         $subject = encodeHeader($subject);
+         $from = encodeHeader($from);
          
          /* This creates an RFC 822 date */
          $date = date("D, j M Y H:i:s ", mktime()) . timezone();
 
       pclose($fp);
 
-      return ($headerlength + $bodylenght);
+      return ($headerlength + $bodylength);
    }
 
    function smtpReadData($smtpConnection) {
       }
 
       if ($status == 0) {
-         echo "<HTML><BODY BGCOLOR=ffffff>";
+         echo "<HTML><BODY BGCOLOR=#ffffff>";
          echo "<TT>";
          echo "<BR><B>ERROR</B><BR><BR>";
          echo "&nbsp;&nbsp;&nbsp;<B>Error Number: </B>$err_num<BR>";
       return $err_num;
    }
 
-   function sendMessage($t, $c, $b, $subject, $body) {
-      global $useSendmail;
+   function sendMessage($t, $c, $b, $subject, $body, $reply_id) {
+      global $useSendmail, $msg_id, $is_reply, $mailbox;
       global $data_dir, $username, $domain, $key, $version, $sent_folder, $imapServerAddress, $imapPort;
 
+      $imap_stream = sqimap_login($username, $key, $imapServerAddress, $imapPort, 1);
+      if ($reply_id) {
+         sqimap_mailbox_select ($imap_stream, $mailbox);
+         sqimap_messages_flag ($imap_stream, $reply_id, $reply_id, "Answered");
+      }
+      
       if ($useSendmail==true) {  
          $length = sendSendmail($t, $c, $b, $subject, $body);
       } else {
          $length = sendSMTP($t, $c, $b, $subject, $body);
       }
 
-      $imap_stream = sqimap_login($username, $key, $imapServerAddress, $imapPort, 1);
-      sqimap_append ($imap_stream, $sent_folder, $length);
-      write822Header ($imap_stream, $t, $c, $b, $subject);
-      writeBody ($imap_stream, $body); 
-      sqimap_append_done ($imap_stream);
-
+      if (sqimap_mailbox_exists ($imap_stream, $sent_folder)) {
+         sqimap_append ($imap_stream, $sent_folder, $length);
+         write822Header ($imap_stream, $t, $c, $b, $subject);
+         writeBody ($imap_stream, $body); 
+         sqimap_append_done ($imap_stream);
+      }   
 
       // Delete the files uploaded for attaching (if any).
       deleteAttachments();
-
    }
-
 ?>