src/compose.php

   1 <?php
   2    /**
   3     * compose.php
   4     *
   5     * Copyright (c) 1999-2000 The SquirrelMail development team
   6     * Licensed under the GNU GPL. For full terms see the file COPYING.
   7     *
   8     * This code sends a mail.
   9     *
  10     * There are 4 modes of operation:
  11     *    - Start new mail
  12     *    - Add an attachment
  13     *    - Send mail
  14     *    - Save As Draft
  15     *
  16     * $Id$
  17     **/
  18
  19    require_once('../src/validate.php');
  20    require_once('../functions/imap.php');
  21    require_once('../functions/date.php');
  22    require_once('../functions/mime.php');
  23    require_once('../functions/smtp.php');
  24    require_once('../functions/display_messages.php');
  25    require_once('../functions/plugin.php');
  26
  27    if (!isset($attachments))
  28    {
  29        $attachments = array();
  30        session_register('attachments');
  31    }
  32
  33
  34    // This function is used when not sending or adding attachments
  35    function newMail () {
  36       global $forward_id, $imapConnection, $msg, $ent_num, $body_ary, $body,
  37              $reply_id, $send_to, $send_to_cc, $mailbox, $send_to_bcc, $editor_size,
  38              $draft_id, $use_signature;
  39
  40       $send_to = decodeHeader($send_to);
  41       $send_to_cc = decodeHeader($send_to_cc);
  42       $send_to_bcc = decodeHeader($send_to_bcc);
  43
  44       if ($forward_id)
  45          $id = $forward_id;
  46       elseif ($reply_id)
  47          $id = $reply_id;
  48
  49       if ($draft_id){
  50          $id = $draft_id;
  51          $use_signature = FALSE;
  52       }
  53
  54       if (isset($id)) {
  55          sqimap_mailbox_select($imapConnection, $mailbox);
  56          $message = sqimap_get_message($imapConnection, $id, $mailbox);
  57          $orig_header = $message->header;
  58          if ($ent_num)
  59             $message = getEntity($message, $ent_num);
  60
  61          if ($message->header->type0 == 'text' || $message->header->type1 == 'message') {
  62             if ($ent_num)
  63                $body = decodeBody(mime_fetch_body($imapConnection, $id, $ent_num), $message->header->encoding);
  64             else
  65                $body = decodeBody(mime_fetch_body($imapConnection, $id, 1), $message->header->encoding);
  66          } else {
  67             $body = "";
  68          }
  69
  70          if ($message->header->type1 == "html")
  71             $body = strip_tags($body);
  72
  73          sqUnWordWrap($body);
  74          $body_ary = explode("\n", $body);
  75          $i = count($body_ary) - 1;
  76          while ($i >= 0 && ereg("^[>\\s]*$", $body_ary[$i])) {
  77             unset($body_ary[$i]);
  78             $i --;
  79          }
  80          $body = "";
  81          for ($i=0; isset($body_ary[$i]); $i++) {
  82             if ($reply_id)
  83             {
  84                 if (ereg('^[ >]+', $body_ary[$i]))
  85                 {
  86                     $body_ary[$i] = '>' . $body_ary[$i];
  87                 }
  88                 else
  89                 {
  90                     $body_ary[$i] = '> ' . $body_ary[$i];
  91                 }
  92             }
  93             if (!$draft_id) {
  94                sqWordWrap($body_ary[$i], $editor_size - 1);
  95             }
  96             $body .= $body_ary[$i] . "\n";
  97             unset($body_ary[$i]);
  98          }
  99          if ($forward_id)
 100          {
 101              $bodyTop =  "-------- " . _("Original Message") . " --------\n";
 102              $bodyTop .= _("Subject") . ": " . $orig_header->subject . "\n";
 103              $bodyTop .= _("From") . ": " . $orig_header->from . "\n";
 104              $bodyTop .= _("To") . ": " . $orig_header->to[0] . "\n";
 105              if (count($orig_header->to) > 1) {
 106                  for ($x=1; $x < count($orig_header->to); $x++) {
 107                      $bodyTop .= "         " . $orig_header->to[$x] . "\n";
 108                  }
 109              }
 110              $bodyTop .= "\n";
 111              $body = $bodyTop . $body;
 112          } else if ($reply_id) {
 113              $orig_from = decodeHeader($orig_header->from);
 114              $orig_from = trim(substr($orig_from,0,strpos($orig_from,'<')));
 115              $orig_from = str_replace('"','',$orig_from);
 116              $orig_from = str_replace("'",'',$orig_from);
 117              $body = getReplyCitation($orig_from) . $body;
 118          }
 119
 120          return;
 121       }
 122
 123       if (!$send_to) {
 124          $send_to = sqimap_find_email($send_to);
 125       }
 126
 127       /** This formats a CC string if they hit "reply all" **/
 128       if ($send_to_cc != "") {
 129          $send_to_cc = ereg_replace( '"[^"]*"', "", $send_to_cc);
 130          $send_to_cc = ereg_replace(";", ",", $send_to_cc);
 131          $sendcc = explode(",", $send_to_cc);
 132          $send_to_cc = "";
 133
 134          for ($i = 0; $i < count($sendcc); $i++) {
 135             $sendcc[$i] = trim($sendcc[$i]);
 136             if ($sendcc[$i] == "")
 137                continue;
 138
 139             $sendcc[$i] = sqimap_find_email($sendcc[$i]);
 140             $whofrom = sqimap_find_displayable_name($msg["HEADER"]["FROM"]);
 141             $whoreplyto = sqimap_find_email($msg["HEADER"]["REPLYTO"]);
 142
 143             if ((strtolower(trim($sendcc[$i])) != strtolower(trim($whofrom))) &&
 144                 (strtolower(trim($sendcc[$i])) != strtolower(trim($whoreplyto))) &&
 145                 (trim($sendcc[$i]) != "")) {
 146                $send_to_cc .= trim($sendcc[$i]) . ", ";
 147             }
 148          }
 149          $send_to_cc = trim($send_to_cc);
 150          if (substr($send_to_cc, -1) == ",") {
 151             $send_to_cc = substr($send_to_cc, 0, strlen($send_to_cc) - 1);
 152          }
 153       }
 154    } // function newMail()
 155
 156    function getAttachments($message) {
 157       global $mailbox, $attachments, $attachment_dir, $imapConnection,
 158              $ent_num, $forward_id, $draft_id;
 159
 160      if (isset($draft_id))
 161          $id = $draft_id;
 162       else
 163          $id = $forward_id;
 164
 165       if (!$message) {
 166            sqimap_mailbox_select($imapConnection, $mailbox);
 167            $message = sqimap_get_message($imapConnection, $id,
 168                $mailbox);
 169       }
 170
 171       if (count($message->entities) == 0) {
 172           if ($message->header->entity_id != $ent_num) {
 173               $filename = decodeHeader($message->header->filename);
 174
 175               if ($filename == "")
 176                   $filename = "untitled-".$message->header->entity_id;
 177
 178               $localfilename = GenerateRandomString(32, '', 7);
 179               while (file_exists($attachment_dir . $localfilename))
 180                   $localfilename = GenerateRandomString(32, '', 7);
 181
 182               $newAttachment = array();
 183               $newAttachment['localfilename'] = $localfilename;
 184               $newAttachment['remotefilename'] = $filename;
 185               $newAttachment['type'] = strtolower($message->header->type0 .
 186                  '/' . $message->header->type1);
 187
 188               // Write Attachment to file
 189               $fp = fopen ($attachment_dir.$localfilename, 'w');
 190               fputs ($fp, decodeBody(mime_fetch_body($imapConnection,
 191                   $id, $message->header->entity_id),
 192                   $message->header->encoding));
 193               fclose ($fp);
 194
 195               $attachments[] = $newAttachment;
 196           }
 197       } else {
 198           for ($i = 0; $i < count($message->entities); $i++) {
 199               getAttachments($message->entities[$i]);
 200           }
 201       }
 202       return;
 203    }
 204
 205    function showInputForm () {
 206       global $send_to, $send_to_cc, $reply_subj, $forward_subj, $body,
 207          $passed_body, $color, $use_signature, $signature, $prefix_sig,
 208          $editor_size, $attachments, $subject, $newmail,
 209          $use_javascript_addr_book, $send_to_bcc, $reply_id, $mailbox,
 210          $from_htmladdr_search, $location_of_buttons, $attachment_dir,
 211          $username, $data_dir, $identity, $draft_id, $delete_draft;
 212
 213       $subject = decodeHeader($subject);
 214       $reply_subj = decodeHeader($reply_subj);
 215       $forward_subj = decodeHeader($forward_subj);
 216
 217       if ($use_javascript_addr_book) {
 218          echo "\n<SCRIPT LANGUAGE=JavaScript><!--\n";
 219          echo "function open_abook() { \n";
 220          echo "  var nwin = window.open(\"addrbook_popup.php\",\"abookpopup\",";
 221          echo "\"width=670,height=300,resizable=yes,scrollbars=yes\");\n";
 222          echo "  if((!nwin.opener) && (document.windows != null))\n";
 223          echo "    nwin.opener = document.windows;\n";
 224          echo "}\n";
 225          echo "// --></SCRIPT>\n\n";
 226       }
 227
 228       echo "\n<FORM name=compose action=\"compose.php\" METHOD=POST ENCTYPE=\"multipart/form-data\"";
 229       do_hook("compose_form");
 230           echo ">\n";
 231
 232       if (isset($draft_id)) {
 233          echo "<input type=\"hidden\" name=\"delete_draft\" value=\"$draft_id\">\n";
 234       }
 235       if (isset($delete_draft)) {
 236          echo "<input type=\"hidden\" name=\"delete_draft\" value=\"$delete_draft\">\n";
 237       }
 238
 239       echo "<TABLE WIDTH=\"100%\" ALIGN=center CELLSPACING=0 BORDER=0>\n";
 240
 241       if ($location_of_buttons == 'top') showComposeButtonRow();
 242
 243       $idents = getPref($data_dir, $username, 'identities');
 244       if ($idents != '' && $idents > 1) {
 245          echo "   <TR>\n";
 246          echo "      <TD BGCOLOR=\"$color[4]\" WIDTH=\"10%\" ALIGN=RIGHT>\n";
 247          echo _("From:");
 248          echo "      </TD><TD BGCOLOR=\"$color[4]\" WIDTH=\"90%\">\n";
 249          echo "<select name=identity>\n";
 250          echo "<option value=default>" .
 251          htmlspecialchars(getPref($data_dir, $username, 'full_name'));
 252          $em = getPref($data_dir, $username, 'email_address');
 253          if ($em != '')
 254             echo htmlspecialchars(' <' . $em . '>') . "\n";
 255          for ($i = 1; $i < $idents; $i ++) {
 256             echo '<option value="' . $i . '"';
 257             if (isset($identity) && $identity == $i)
 258                echo ' SELECTED';
 259             echo '>';
 260             echo htmlspecialchars(getPref($data_dir, $username, 'full_name' .
 261                                         $i));
 262             $em = getPref($data_dir, $username, 'email_address' . $i);
 263             if ($em != '')
 264                echo htmlspecialchars(' <' . $em . '>') . "\n";
 265          }
 266          echo "</select>\n";
 267          echo "      </TD>\n";
 268          echo "   </TR>\n";
 269       }
 270       echo "   <TR>\n";
 271       echo "      <TD BGCOLOR=\"$color[4]\" WIDTH=\"10%\" ALIGN=RIGHT>\n";
 272       echo _("To:");
 273       echo "      </TD><TD BGCOLOR=\"$color[4]\" WIDTH=\"90%\">\n";
 274       printf("         <INPUT TYPE=text NAME=\"send_to\" VALUE=\"%s\" SIZE=60><BR>\n",
 275              htmlspecialchars($send_to));
 276       echo "      </TD>\n";
 277       echo "   </TR>\n";
 278       echo "   <TR>\n";
 279       echo "      <TD BGCOLOR=\"$color[4]\" ALIGN=RIGHT>\n";
 280       echo _("CC:");
 281       echo "      </TD><TD BGCOLOR=\"$color[4]\" ALIGN=LEFT>\n";
 282       printf("         <INPUT TYPE=text NAME=\"send_to_cc\" SIZE=60 VALUE=\"%s\"><BR>\n",
 283              htmlspecialchars($send_to_cc));
 284       echo "      </TD>\n";
 285       echo "   </TR>\n";
 286       echo "   <TR>\n";
 287       echo "      <TD BGCOLOR=\"$color[4]\" ALIGN=RIGHT>\n";
 288       echo _("BCC:");
 289       echo "      </TD><TD BGCOLOR=\"$color[4]\" ALIGN=LEFT>\n";
 290       printf("         <INPUT TYPE=text NAME=\"send_to_bcc\" VALUE=\"%s\" SIZE=60><BR>\n",
 291              htmlspecialchars($send_to_bcc));
 292       echo "</TD></TR>\n";
 293
 294       echo "   <TR>\n";
 295       echo "      <TD BGCOLOR=\"$color[4]\" ALIGN=RIGHT>\n";
 296       echo _("Subject:");
 297       echo "      </TD><TD BGCOLOR=\"$color[4]\" ALIGN=LEFT>\n";
 298       if ($reply_subj) {
 299          $reply_subj = str_replace("\"", "'", $reply_subj);
 300          $reply_subj = trim($reply_subj);
 301          if (substr(strtolower($reply_subj), 0, 3) != "re:")
 302             $reply_subj = "Re: $reply_subj";
 303          printf("         <INPUT TYPE=text NAME=subject SIZE=60 VALUE=\"%s\">",
 304                 htmlspecialchars($reply_subj));
 305       } else if ($forward_subj) {
 306          $forward_subj = trim($forward_subj);
 307          if ((substr(strtolower($forward_subj), 0, 4) != 'fwd:') &&
 308              (substr(strtolower($forward_subj), 0, 5) != '[fwd:') &&
 309              (substr(strtolower($forward_subj), 0, 6) != '[ fwd:'))
 310             $forward_subj = "[Fwd: $forward_subj]";
 311          printf("         <INPUT TYPE=text NAME=subject SIZE=60 VALUE=\"%s\">",
 312                 htmlspecialchars($forward_subj));
 313       } else {
 314           printf("         <INPUT TYPE=text NAME=subject SIZE=60 VALUE=\"%s\">",
 315                 htmlspecialchars($subject));
 316       }
 317       echo "</td></tr>\n\n";
 318
 319       if ($location_of_buttons == 'between') showComposeButtonRow();
 320
 321       echo "   <TR>\n";
 322       echo "      <TD BGCOLOR=\"$color[4]\" COLSPAN=2>\n";
 323       echo "         &nbsp;&nbsp;<TEXTAREA NAME=body ROWS=20 COLS=\"$editor_size\" WRAP=HARD>";
 324       echo htmlspecialchars($body);
 325       if ($use_signature == true && $newmail == true && !isset($from_htmladdr_search)) {
 326         if ( $prefix_sig == true )
 327           echo "\n\n-- \n" . htmlspecialchars($signature);
 328         else
 329           echo "\n\n" . htmlspecialchars($signature);
 330       }
 331       echo "</TEXTAREA><BR>\n";
 332       echo "      </TD>\n";
 333       echo "   </TR>\n";
 334
 335       if ($location_of_buttons == 'bottom')
 336          showComposeButtonRow();
 337       else {
 338          echo "   <TR><TD>&nbsp;</TD><TD ALIGN=LEFT><INPUT TYPE=SUBMIT NAME=send VALUE=\""._("Send")."\"></TD></TR>\n";
 339       }
 340
 341       // This code is for attachments
 342       echo "   <tr>\n";
 343       echo "     <TD BGCOLOR=\"$color[0]\" VALIGN=TOP ALIGN=RIGHT>\n";
 344       echo "      <SMALL><BR></SMALL>"._("Attach:");
 345       echo "      </td><td ALIGN=left BGCOLOR=\"$color[0]\">\n";
 346       echo "      <INPUT NAME=\"attachfile\" SIZE=48 TYPE=\"file\">\n";
 347       echo "      &nbsp;&nbsp;<input type=\"submit\" name=\"attach\"";
 348       echo " value=\"" . _("Add") ."\">\n";
 349       echo "     </td>\n";
 350       echo "   </tr>\n";
 351       if (count($attachments))
 352       {
 353          echo "<tr><td bgcolor=\"$color[0]\" align=right>\n";
 354          echo "&nbsp;";
 355          echo "</td><td align=left bgcolor=\"$color[0]\">";
 356          foreach ($attachments as $key => $info) {
 357             echo "<input type=\"checkbox\" name=\"delete[]\" value=\"$key\">\n";
 358             echo $info['remotefilename'] . " - " . $info['type'] . " (";
 359             echo show_readable_size(filesize($attachment_dir .
 360                 $info['localfilename'])) . ")<br>\n";
 361          }
 362
 363          echo "<input type=\"submit\" name=\"do_delete\" value=\""._("Delete selected attachments")."\">\n";
 364          echo "</td></tr>";
 365       }
 366       // End of attachment code
 367
 368       echo "</TABLE>\n";
 369       if ($reply_id) {
 370          echo "<input type=hidden name=reply_id value=$reply_id>\n";
 371       }
 372       printf("<INPUT TYPE=hidden NAME=mailbox VALUE=\"%s\">\n", htmlspecialchars($mailbox));
 373       echo "</FORM>";
 374       do_hook("compose_bottom");
 375    }
 376
 377    function showComposeButtonRow() {
 378       global $use_javascript_addr_book, $save_as_draft;
 379
 380       echo "   <TR><td>\n   </td><td>\n";
 381       if ($use_javascript_addr_book) {
 382          echo "      <SCRIPT LANGUAGE=JavaScript><!--\n document.write(\"";
 383          echo "         <input type=button value=\\\""._("Addresses")."\\\" onclick='javascript:open_abook();'>\");";
 384          echo "         // --></SCRIPT><NOSCRIPT>\n";
 385          echo "         <input type=submit name=\"html_addr_search\" value=\""._("Addresses")."\">";
 386          echo "      </NOSCRIPT>\n";
 387       } else {
 388          echo "      <input type=submit name=\"html_addr_search\" value=\""._("Addresses")."\">";
 389       }
 390       echo "\n    <INPUT TYPE=SUBMIT NAME=send VALUE=\"". _("Send") . "\">\n";
 391
 392       if ($save_as_draft) {
 393           echo "<input type=\"submit\" name =\"draft\" value=\"Save Draft\">\n";
 394       }
 395
 396       do_hook("compose_button_row");
 397
 398       echo "   </TD>\n";
 399       echo "   </TR>\n\n";
 400    }
 401
 402    function checkInput ($show) {
 403       /** I implemented the $show variable because the error messages
 404           were getting sent before the page header.  So, I check once
 405           using $show=false, and then when i'm ready to display the
 406           error message, show=true **/
 407       global $body, $send_to, $subject, $color;
 408
 409       if ($send_to == "") {
 410          if ($show)
 411             plain_error_message(_("You have not filled in the \"To:\" field."), $color);
 412          return false;
 413       }
 414       return true;
 415    } // function checkInput()
 416
 417
 418    // True if FAILURE
 419    function saveAttachedFiles() {
 420       global $HTTP_POST_FILES, $attachment_dir, $attachments;
 421
 422       $localfilename = GenerateRandomString(32, '', 7);
 423       while (file_exists($attachment_dir . $localfilename))
 424           $localfilename = GenerateRandomString(32, '', 7);
 425
 426       if (!@rename($HTTP_POST_FILES['attachfile']['tmp_name'], $attachment_dir.$localfilename)) {
 427          if (!@copy($HTTP_POST_FILES['attachfile']['tmp_name'], $attachment_dir.$localfilename)) {
 428             return true;
 429          }
 430       }
 431
 432       $newAttachment['localfilename'] = $localfilename;
 433       $newAttachment['remotefilename'] = $HTTP_POST_FILES['attachfile']['name'];
 434       $newAttachment['type'] =
 435          strtolower($HTTP_POST_FILES['attachfile']['type']);
 436
 437       if ($newAttachment['type'] == "")
 438          $newAttachment['type'] = 'application/octet-stream';
 439
 440       $attachments[] = $newAttachment;
 441     }
 442
 443    if (!isset($mailbox) || $mailbox == "" || ($mailbox == "None"))
 444       $mailbox = "INBOX";
 445
 446    if (isset($draft)) {
 447       require_once ('../src/draft_actions.php');
 448       if (!saveMessageAsDraft($send_to, $send_to_cc, $send_to_bcc, $subject, $body, $reply_id)) {
 449          showInputForm();
 450          exit();
 451       } else {
 452          $draft_message = _("Draft Email Saved");
 453          /* If this is a resumed draft, then delete the original */
 454          if(isset($delete_draft)) {
 455             Header("Location: delete_message.php?mailbox=$draft_folder&message=$delete_draft&sort=$sort&startMessage=1");
 456             exit();
 457          } else {
 458             Header("Location: right_main.php?mailbox=$draft_folder&sort=$sort&startMessage=1&note=$draft_message");
 459             exit();
 460          }
 461       }
 462    }
 463
 464    if (isset($send)) {
 465       if (isset($HTTP_POST_FILES['attachfile']) &&
 466           $HTTP_POST_FILES['attachfile']['tmp_name'] &&
 467           $HTTP_POST_FILES['attachfile']['tmp_name'] != 'none')
 468           $AttachFailure = saveAttachedFiles();
 469       if (checkInput(false) && !isset($AttachFailure)) {
 470          $urlMailbox = urlencode (trim($mailbox));
 471          if (! isset($reply_id))
 472              $reply_id = 0;
 473          // Set $default_charset to correspond with the user's selection
 474          // of language interface.
 475          set_my_charset();
 476
 477          // This is to change all newlines to \n
 478          // We'll change them to \r\n later (in the sendMessage function)
 479          $body = str_replace("\r\n", "\n", $body);
 480          $body = str_replace("\r", "\n", $body);
 481
 482          // Rewrap $body so that no line is bigger than $editor_size
 483          // This should only really kick in the sqWordWrap function
 484          // if the browser doesn't support "HARD" as the wrap type
 485          // Or, in Opera's case, something goes wrong.
 486          $body = explode("\n", $body);
 487          $newBody = '';
 488          foreach ($body as $line) {
 489             if( $line <> '-- ' )
 490                $line = rtrim($line);
 491             if (strlen($line) <= $editor_size + 1)
 492                $newBody .= $line . "\n";
 493             else {
 494                sqWordWrap($line, $editor_size) . "\n";
 495                $newBody .= $line;
 496             }
 497          }
 498          $body = $newBody;
 499
 500          do_hook("compose_send");
 501
 502          if (! sendMessage($send_to, $send_to_cc, $send_to_bcc, $subject, $body, $reply_id)) {
 503             showInputForm();
 504             exit();
 505          }
 506          if ( isset($delete_draft)) {
 507             Header("Location: delete_message.php?mailbox=$draft_folder&message=$delete_draft&sort=$sort&startMessage=1");
 508             exit();
 509          }
 510
 511          Header("Location: right_main.php?mailbox=$urlMailbox&sort=$sort&startMessage=1");
 512       } else {
 513          //$imapConnection = sqimap_login($username, $key, $imapServerAddress, $imapPort, 0);
 514          displayPageHeader($color, $mailbox);
 515
 516          if (isset($AttachFailure))
 517              plain_error_message(_("Could not move/copy file. File not attached"), $color);
 518
 519          checkInput(true);
 520
 521          showInputForm();
 522          //sqimap_logout($imapConnection);
 523       }
 524    } else if (isset($html_addr_search_done)) {
 525       displayPageHeader($color, $mailbox);
 526
 527       if (isset($send_to_search) && is_array($send_to_search)) {
 528          foreach ($send_to_search as $k => $v) {
 529        if (substr($k, 0, 1) == 'T') {
 530                if ($send_to)
 531                   $send_to .= ', ';
 532                $send_to .= $v;
 533        }
 534        elseif (substr($k, 0, 1) == 'C') {
 535           if ($send_to_cc)
 536              $send_to_cc .= ', ';
 537           $send_to_cc .= $v;
 538        }
 539        elseif (substr($k, 0, 1) == 'B') {
 540           if ($send_to_bcc)
 541              $send_to_bcc .= ', ';
 542           $send_to_bcc .= $v;
 543        }
 544          }
 545       }
 546
 547       showInputForm();
 548    } else if (isset($html_addr_search)) {
 549       if (isset($HTTP_POST_FILES['attachfile']) &&
 550           $HTTP_POST_FILES['attachfile']['tmp_name'] &&
 551           $HTTP_POST_FILES['attachfile']['tmp_name'] != 'none')
 552       {
 553           if (saveAttachedFiles())
 554                 plain_error_message(_("Could not move/copy file. File not attached"), $color);
 555       }
 556       // I am using an include so as to elminiate an extra unnecessary click.  If you
 557       // can think of a better way, please implement it.
 558       include_once('./addrbook_search_html.php');
 559    } else if (isset($attach)) {
 560       if (saveAttachedFiles())
 561             plain_error_message(_("Could not move/copy file. File not attached"), $color);
 562       displayPageHeader($color, $mailbox);
 563       showInputForm();
 564    } else if (isset($do_delete)) {
 565       displayPageHeader($color, $mailbox);
 566
 567       if (isset($delete) && is_array($delete))
 568       {
 569          foreach($delete as $index)
 570          {
 571             unlink ($attachment_dir.$attachments[$index]['localfilename']);
 572             unset ($attachments[$index]);
 573          }
 574       }
 575
 576       showInputForm();
 577    } else {
 578       // This handles the default case as well as the error case
 579       // (they had the same code) --> if (isset($smtpErrors))
 580       $imapConnection = sqimap_login($username, $key, $imapServerAddress,
 581           $imapPort, 0);
 582       displayPageHeader($color, $mailbox);
 583
 584       $newmail = true;
 585
 586       ClearAttachments();
 587
 588       if (isset($forward_id) && $forward_id && isset($ent_num) && $ent_num)
 589           getAttachments(0);
 590
 591       if (isset($draft_id) && $draft_id && isset($ent_num) && $ent_num)
 592           getAttachments(0);
 593
 594       newMail();
 595       showInputForm();
 596       sqimap_logout($imapConnection);
 597    }
 598
 599    function ClearAttachments() {
 600        global $attachments, $attachment_dir;
 601
 602        foreach ($attachments as $info) {
 603            if (file_exists($attachment_dir . $info['localfilename'])) {
 604                unlink($attachment_dir . $info['localfilename']);
 605            }
 606        }
 607
 608        $attachments = array();
 609    }
 610
 611    function getReplyCitation($orig_from) {
 612       global $reply_citation_style, $reply_citation_start, $reply_citation_end;
 613
 614       /* First, return an empty string when no citation style selected. */
 615       if (($reply_citation_style == '') || ($reply_citation_style == 'none')) {
 616          return ('');
 617       }
 618
 619       /* Otherwise, try to select the desired citation style. */
 620       switch ($reply_citation_style) {
 621          case 'author_said':
 622             $start = '';
 623             $end   = ' ' . _("said") . ':';
 624             break;
 625          case 'quote_who':
 626             $start = '<' . _("quote") . ' ' . _("who") . '="';
 627             $end   = '">';
 628             break;
 629          case 'user-defined':
 630             $start = $reply_citation_start;
 631             $end   = $reply_citation_end;
 632             break;
 633          default: return ('');
 634       }
 635
 636       /* Build and return the citation string. */
 637       return ($start . $orig_from . $end . "\n");
 638    }
 639 ?>