src/compose.php

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