split mailbox_display in functions. Added UID support, adapt it to make is
[squirrelmail.git] / functions / mailbox_display.php
index 7561459217670a20f278078ab5383c96121489e5..a98d9d4597215aaa2f87ebdcf009d3a69e30375f 100644 (file)
 <?php
 
-   /**
-    **  mailbox_display.php
-    **
-    **  This contains functions that display mailbox information, such as the
-    **  table row that has sender, date, subject, etc...
-    **
-    **  $Id$
-    **/
-
-   if (defined('mailbox_display_php'))
-       return;
-   define('mailbox_display_php', true);
-
-   define('PG_SEL_MAX', 10);  /* Default value for page_selector_max. */
-
-   function printMessageInfo($imapConnection, $t, $i, $key, $mailbox, $sort, $startMessage, $where, $what) {
-      global $checkall;
-      global $color, $msgs, $msort;
-      global $sent_folder, $draft_folder;
-      global $message_highlight_list;
-      global $index_order;
-
-      $color_string = $color[4];
-      if ($GLOBALS['alt_index_colors']) {
-          if (!isset($GLOBALS["row_count"])) {
-            $GLOBALS["row_count"] = 0;
-          }
-          $GLOBALS["row_count"]++;
-          if ($GLOBALS["row_count"] % 2) {
-          if (!isset($color[12])) $color[12] = '#EAEAEA';
+/**
+ * mailbox_display.php
+ *
+ * Copyright (c) 1999-2002 The SquirrelMail Project Team
+ * Licensed under the GNU GPL. For full terms see the file COPYING.
+ *
+ * This contains functions that display mailbox information, such as the
+ * table row that has sender, date, subject, etc...
+ *
+ * $Id$
+ */
+
+require_once('../functions/strings.php');
+require_once('../functions/html.php');
+require_once('../functions/imap_utf7_decode_local.php');
+
+/* Default value for page_selector_max. */
+define('PG_SEL_MAX', 10);
+
+function printMessageInfo($imapConnection, $t, $i, $key, $mailbox, $sort,
+                          $start_msg, $where, $what){
+    global $checkall,
+           $color, $msgs, $msort,
+           $sent_folder, $draft_folder,
+           $default_use_priority,
+           $message_highlight_list,
+           $index_order,
+           $indent_array,   /* indent subject by */
+           $pos,            /* Search postion (if any)  */
+           $thread_sort_messages, /* thread sorting on/off */
+           $server_sort_order, /* sort value when using server-sorting */
+           $row_count,
+           $allow_server_sort; /* enable/disable server-side sorting */
+           $color_string = $color[4];
+
+    if ($GLOBALS['alt_index_colors']) {
+        if (!isset($row_count)) {
+            $row_count = 0;
+        }
+        $row_count++;
+        if ($row_count % 2) {
+            if (!isset($color[12])) {
+                $color[12] = '#EAEAEA';
+            }
             $color_string = $color[12];
-          }
-      }
-      $msg = $msgs[$key];
-
-      $senderName = sqimap_find_displayable_name($msg['FROM']);
-      if( $mailbox == _("None") ) {
-         // $imapConnection = sqimap_login($username, $key, $imapServerAddress, $imapPort, 0);
-         $boxes = sqimap_mailbox_list($imapConnection);
-         // sqimap_logout($imapConnection);
-         $mailbox = $boxes[0]['unformatted'];
-         unset( $boxes );
-      }
-      $urlMailbox = urlencode($mailbox);
-      $subject = processSubject($msg['SUBJECT']);
-      echo "<TR>\n";
-
-      if (isset($msg['FLAG_FLAGGED']) && ($msg['FLAG_FLAGGED'] == true)) {
-         $flag = "<font color=$color[2]>";
-         $flag_end = '</font>';
-      } else {
-         $flag = '';
-         $flag_end = '';
-      }
-      if (!isset($msg['FLAG_SEEN']) || ($msg['FLAG_SEEN'] == false)) {
-         $bold = '<b>';
-         $bold_end = '</b>';
-      } else {
-         $bold = '';
-         $bold_end = '';
-      }
-
-      if (($mailbox == $sent_folder) || ($mailbox == $draft_folder)) {
-         $italic = '<i>';
-         $italic_end = '</i>';
-      } else {
-         $italic = '';
-         $italic_end = '';
-      }
+        }
+    }
+    $msg = $msgs[$key];
 
-      if (isset($msg['FLAG_DELETED']) && $msg['FLAG_DELETED']) {
-         $fontstr = "<font color=\"$color[9]\">";
-         $fontstr_end = '</font>';
-      } else {
-         $fontstr = '';
-         $fontstr_end = '';
-      }
-
-      for ($i=0; $i < count($message_highlight_list); $i++) {
-         if (trim($message_highlight_list[$i]['value']) != '') {
-            if ($message_highlight_list[$i]['match_type'] == 'to_cc') {
-               if (strpos('^^'.strtolower($msg['TO']), strtolower($message_highlight_list[$i]['value'])) || strpos('^^'.strtolower($msg['CC']), strtolower($message_highlight_list[$i]['value']))) {
-                  $hlt_color = $message_highlight_list[$i]['color'];
-                  continue;
-               }
-            } else if (strpos('^^'.strtolower($msg[strtoupper($message_highlight_list[$i]['match_type'])]),strtolower($message_highlight_list[$i]['value']))) {
-               $hlt_color = $message_highlight_list[$i]['color'];
-               continue;
+    /*
+    * This is done in case you're looking into Sent folders,
+    * because you can have multiple receivers.
+    */
+    $senderNames = explode(',', $msg['FROM']);
+    $senderName = '';
+    if (sizeof($senderNames)){
+        foreach ($senderNames as $senderNames_part) {
+            if ($senderName != '') {
+                $senderName .= ', ';
             }
-         }
-      }
-
-      if (!isset($hlt_color)) {
-          $hlt_color = $color_string;
-      }
-
-      if ($where && $what) {
-         $search_stuff = '&where='.urlencode($where).'&what='.urlencode($what);
-      }
-
-      $checked = ($checkall == 1 ?' checked' : '');
-
-      for ($i=1; $i <= count($index_order); $i++) {
-         switch ($index_order[$i]) {
+            $senderName .= sqimap_find_displayable_name($senderNames_part);
+        }
+    }
+
+    if( $mailbox == 'None' ) {
+        $boxes = sqimap_mailbox_list($imapConnection);
+        $mailbox = $boxes[0]['unformatted'];
+        unset( $boxes );
+    }
+    $urlMailbox = urlencode($mailbox);
+    $subject = processSubject($msg['SUBJECT']);
+    echo html_tag( 'tr' ) . "\n";
+
+    if (isset($msg['FLAG_FLAGGED']) && ($msg['FLAG_FLAGGED'] == true)) {
+        $flag = "<font color=\"$color[2]\">";
+        $flag_end = '</font>';
+    } else {
+        $flag = '';
+        $flag_end = '';
+    }
+    if (!isset($msg['FLAG_SEEN']) || ($msg['FLAG_SEEN'] == false)) {
+        $bold = '<b>';
+        $bold_end = '</b>';
+    } else {
+        $bold = '';
+        $bold_end = '';
+    }
+    if (handleAsSent($mailbox)) {
+        $italic = '<i>';
+        $italic_end = '</i>';
+    } else {
+        $italic = '';
+        $italic_end = '';
+    }
+    if (isset($msg['FLAG_DELETED']) && $msg['FLAG_DELETED']) {
+        $fontstr = "<font color=\"$color[9]\">";
+        $fontstr_end = '</font>';
+    } else {
+        $fontstr = '';
+        $fontstr_end = '';
+    }
+
+    /**
+    * AAAAH! Make my eyes stop bleeding!
+    * Who wrote this?!
+    */
+    if (sizeof($message_highlight_list)){
+        foreach ($message_highlight_list as $message_highlight_list_part) {
+            if (trim($message_highlight_list_part['value']) != '') {
+                if ($message_highlight_list_part['match_type'] == 'to_cc') {
+                    if (strstr('^^' . strtolower($msg['TO']),
+                    strtolower($message_highlight_list_part['value']))
+                    || strstr('^^'.strtolower($msg['CC']),
+                    strtolower($message_highlight_list_part['value']))) {
+                        $hlt_color = $message_highlight_list_part['color'];
+                        continue;
+                    }
+                } else
+                if (strstr('^^' . strtolower($msg[strtoupper($message_highlight_list_part['match_type'])]),
+                strtolower($message_highlight_list_part['value']))) {
+                    $hlt_color = $message_highlight_list_part['color'];
+                    continue;
+                }
+            }
+        }
+    }
+
+    if (!isset($hlt_color)) {
+        $hlt_color = $color_string;
+    }
+
+    if ($where && $what) {
+        if(!isset($pos) || $pos == '') {
+            $pos = '0';
+        }
+        $search_stuff = "&amp;pos=" . urlencode($pos)
+        . "&amp;where=" . urlencode($where) . '&amp;what=' . urlencode($what);
+    } else {
+        $search_stuff = '';
+    }
+
+    $checked = ($checkall == 1) ? ' checked' : '';
+
+    if (sizeof($index_order)){
+        foreach ($index_order as $index_order_part) {
+            switch ($index_order_part) {
             case 1: /* checkbox */
-               echo "   <td bgcolor=$hlt_color align=center><input type=checkbox name=\"msg[$t]\" value=".$msg["ID"]."$checked></TD>\n";
-               break;
+                echo html_tag( 'td',
+                               "<input type=checkbox name=\"msg[$t]\" value=\"".$msg['ID']."\"$checked>",
+                               'center', 
+                               $hlt_color );
+                break;
             case 2: /* from */
-               echo "   <td bgcolor=$hlt_color>$italic$bold$flag$fontstr$senderName$fontstr_end$flag_end$bold_end$italic_end</td>\n";
-               break;
+                echo html_tag( 'td',
+                               $italic . $bold . $flag . $fontstr . $senderName . 
+                               $fontstr_end . $flag_end . $bold_end . $italic_end,
+                               'left',
+                               $hlt_color );
+                break;
             case 3: /* date */
-               echo "   <td nowrap bgcolor=$hlt_color><center>$bold$flag$fontstr".$msg["DATE_STRING"]."$fontstr_end$flag_end$bold_end</center></td>\n";
-               break;
+                echo html_tag( 'td',
+                               $bold . $flag . $fontstr . $msg['DATE_STRING'] .
+                               $fontstr_end . $flag_end . $bold_end,
+                               'center',
+                               $hlt_color,
+                               'nowrap' );
+                break;
             case 4: /* subject */
-               echo "   <td bgcolor=$hlt_color>$bold";
-                   if (! isset($search_stuff)) { $search_stuff = ''; }
-               echo "<a href=\"read_body.php?mailbox=$urlMailbox&passed_id=".$msg["ID"]."&startMessage=$startMessage&show_more=0$search_stuff\"";
-               do_hook("subject_link");
-
-               if ($subject != $msg['SUBJECT']) {
-                  $title = get_html_translation_table(HTML_SPECIALCHARS);
-                  $title = array_flip($title);
-                  $title = strtr($msg['SUBJECT'], $title);
-                  $title = str_replace('"', "''", $title);
-                  echo " title=\"$title\"";
-               }
-               echo ">$flag$subject$flag_end</a>$bold_end</td>\n";
-               break;
+                $td_str = $bold;
+                if ($thread_sort_messages == 1) {
+                    if (isset($indent_array[$msg["ID"]])) {
+                        $td_str .= str_repeat("&nbsp;&nbsp;&nbsp;&nbsp;",$indent_array[$msg['ID']]);
+                    }
+                }
+                $td_str .= "<a href=\"read_body.php?mailbox=$urlMailbox&amp;passed_id="
+                           . $msg["ID"]
+                           . "&amp;startMessage=$start_msg&amp;show_more=0\"";
+                do_hook("subject_link");
+                if ($subject != $msg['SUBJECT']) {
+                    $title = get_html_translation_table(HTML_SPECIALCHARS);
+                    $title = array_flip($title);
+                    $title = strtr($msg['SUBJECT'], $title);
+                    $title = str_replace('"', "''", $title);
+                    $td_str .= " title=\"$title\"";
+                }
+                $td_str .= ">$flag$subject$flag_end</a>$bold_end";
+                echo html_tag( 'td', $td_str, 'left', $hlt_color );
+                break;
             case 5: /* flags */
-               $stuff = false;
-               echo "   <td bgcolor=$hlt_color align=center nowrap><b><small>\n";
-               if (isset($msg['FLAG_ANSWERED']) &&
-                   $msg['FLAG_ANSWERED'] == true) {
-                  echo "A\n";
-                  $stuff = true;
-               }
-               if (ereg('(5)',substr($msg['PRIORITY'],0,1))) {
-                  echo "<font color=$color[8]>v</font>\n";
-                  $stuff = true;
-               }
-               if ($msg['TYPE0'] == 'multipart') {
-                  echo "+\n";
-                  $stuff = true;
-               }
-               if (ereg('(1|2)',substr($msg['PRIORITY'],0,1))) {
-                  echo "<font color=$color[1]>!</font>\n";
-                  $stuff = true;
-               }
-               if (isset($msg['FLAG_DELETED']) && $msg['FLAG_DELETED']) {
-                  echo "<font color=\"$color[1]\">D</font>\n";
-                  $stuff = true;
-               }
-
-               if (!$stuff) echo "&nbsp;\n";
-               echo "</small></b></td>\n";
-               break;
+                $stuff = false;
+                $td_str = "<b><small>";
+                
+                if (isset($msg['FLAG_ANSWERED']) && $msg['FLAG_ANSWERED'] == true) {
+                    $td_str .= _("A");
+                    $stuff = true;
+                }
+                if ($msg['TYPE0'] == 'multipart') {
+                    $td_str .= '+';
+                    $stuff = true;
+                }
+                if ($default_use_priority) {
+                    if ( ($msg['PRIORITY'] == 1) || ($msg['PRIORITY'] == 2) ) {
+                        $td_str .= "<font color=\"$color[1]\">!</font>";
+                        $stuff = true;
+                    }
+                    if ($msg['PRIORITY'] == 5) {
+                        $td_str .= "<font color=\"$color[8]\">?</font>";
+                        $stuff = true;
+                    }
+                }
+                if (isset($msg['FLAG_DELETED']) && $msg['FLAG_DELETED'] == true) {
+                    $td_str .= "<font color=\"$color[1]\">D</font>";
+                    $stuff = true;
+                }
+                if (!$stuff) {
+                    $td_str .= '&nbsp;';
+                }
+                $td_str .= '</small></b>';
+                echo html_tag( 'td',
+                               $td_str,
+                               'center',
+                               $hlt_color,
+                               'nowrap' );
+                break;
             case 6: /* size */
-               echo "   <td bgcolor=$hlt_color>$bold$fontstr".show_readable_size($msg['SIZE'])."$fontstr_end$bold_end</td>\n";
-               break;
-         }
-      }
-      echo "</tr>\n";
-   }
-
-   /**
-    * This function loops through a group of messages in the mailbox
-    * and shows them to the user.
-    */
-   function showMessagesForMailbox
-        ($imapConnection, $mailbox, $numMessages, $startMessage,
-         $sort, $color,$show_num, $use_cache) {
-      global $msgs, $msort;
-      global $sent_folder, $draft_folder;
-      global $message_highlight_list;
-      global $auto_expunge;
-
-      /* If autoexpunge is turned on, then do it now. */
-      if ($auto_expunge == true) {
-          sqimap_mailbox_expunge($imapConnection, $mailbox, false);
-      }
-      sqimap_mailbox_select($imapConnection, $mailbox);
-
-      $issent = (($mailbox == $sent_folder) || ($mailbox == $draft_folder));
-      if (!$use_cache) {
-         /* If it is sorted... */
-         if ($numMessages >= 1) {
-            if ($sort < 6) {
-               $id = range(1, $numMessages);
-            } else {
-               // if it's not sorted
-               if ($startMessage + ($show_num - 1) < $numMessages) {
-                  $endMessage = $startMessage + ($show_num-1);
-               } else {
-                  $endMessage = $numMessages;
-               }
-
-               if ($endMessage < $startMessage) {
-                  $startMessage = $startMessage - $show_num;
-                  if ($startMessage < 1) {
-                      $startMessage = 1;
-                  }
-               }
-
-               $real_startMessage = $numMessages - $startMessage + 1;
-               $real_endMessage = $numMessages - $startMessage - $show_num + 2;
-               if ($real_endMessage <= 0) {
-                   $real_endMessage = 1;
-               }
-               $id = array_reverse(range($real_endMessage, $real_startMessage));
-            }
-
-            $msgs_list = sqimap_get_small_header_list($imapConnection, $id, $issent);
-            $flags = sqimap_get_flags_list($imapConnection, $id, $issent);
-            foreach ($msgs_list as $hdr) {
-               $from[] = $hdr->from;
-               $date[] = $hdr->date;
-               $subject[] = $hdr->subject;
-               $to[] = $hdr->to;
-               $priority[] = $hdr->priority;
-               $cc[] = $hdr->cc;
-               $size[] = $hdr->size;
-               $type[] = $hdr->type0;
-            }
-         }
-
-         $j = 0;
-         if ($sort == 6) {
-             $end = $startMessage + $show_num - 1;
-             if ($numMessages < $show_num) {
-                 $end_loop = $numMessages;
-             } else if ($end > $numMessages) {
-                 $end_loop = $numMessages - $startMessage + 1;
-             } else {
-                 $end_loop = $show_num;
-             }
-         } else {
-            $end = $numMessages;
-            $end_loop = $end;
-         }
-
-         while ($j < $end_loop) {
-            if (isset($date[$j])) {
-                $date[$j] = ereg_replace('  ', ' ', $date[$j]);
-                $tmpdate = explode(' ', trim($date[$j]));
-            } else {
-                $tmpdate = $date = array("","","","","","");
-            }
 
-            $messages[$j]['TIME_STAMP'] = getTimeStamp($tmpdate);
-            $messages[$j]['DATE_STRING'] = getDateString($messages[$j]['TIME_STAMP']);
-            $messages[$j]['ID'] = $id[$j];
-            $messages[$j]['FROM'] = decodeHeader($from[$j]);
-            $messages[$j]['FROM-SORT'] = strtolower(sqimap_find_displayable_name(decodeHeader($from[$j])));
-            $messages[$j]['SUBJECT'] = decodeHeader($subject[$j]);
-            $messages[$j]['SUBJECT-SORT'] = strtolower(decodeHeader($subject[$j]));
-            $messages[$j]['TO'] = decodeHeader($to[$j]);
-            $messages[$j]['PRIORITY'] = $priority[$j];
-            $messages[$j]['CC'] = $cc[$j];
-            $messages[$j]['SIZE'] = $size[$j];
-            $messages[$j]['TYPE0'] = $type[$j];
-
-            # fix SUBJECT-SORT to remove Re:
-            $re_abbr = # Add more here!
-               'vedr|sv|' .    # Danish
-               're|aw';        # English
-
-            if (eregi( "^($re_abbr):[ ]*(.*)$", $messages[$j]['SUBJECT-SORT'], $regs))
-               $messages[$j]['SUBJECT-SORT'] = $regs[2];
-
-            $num = 0;
-            while ($num < count($flags[$j])) {
-               if ($flags[$j][$num] == 'Deleted') {
-                   $messages[$j]['FLAG_DELETED'] = true;
-               } else if ($flags[$j][$num] == 'Answered') {
-                   $messages[$j]['FLAG_ANSWERED'] = true;
-               } else if ($flags[$j][$num] == 'Seen') {
-                   $messages[$j]['FLAG_SEEN'] = true;
-               } else if ($flags[$j][$num] == 'Flagged') {
-                   $messages[$j]['FLAG_FLAGGED'] = true;
-               }
-               $num++;
+                echo html_tag( 'td',
+                               $bold . $fontstr . show_readable_size($msg['SIZE']) .  
+                               $fontstr_end . $bold_end,
+                               'right',
+                               $hlt_color );
+                break;
             }
-            $j++;
-         }
-
-         /* Only ignore messages flagged as deleted if we are using a
-          * trash folder or auto_expunge */
-         if (((isset($move_to_trash) && $move_to_trash)
-              || (isset($auto_expunge) && $auto_expunge)) && $sort != 6) {
-
-            /** Find and remove the ones that are deleted */
-            $i = 0;
-            $j = 0;
-
-            while ($j < $numMessages) {
-               if (isset($messages[$j]['FLAG_DELETED']) && $messages[$j]['FLAG_DELETED'] == true) {
-                  $j++;
-                  continue;
-               }
-               $msgs[$i] = $messages[$j];
-
-               $i++;
-               $j++;
-            }
-            $numMessages = $i;
+        }
+    }
+    echo "</tr>\n";
+}
+
+/*
+ * This function loops through a group of messages in the mailbox
+ * and shows them to the user.
+ */
+function showMessagesForMailbox($imapConnection, $mailbox, $num_msgs, 
+                               $start_msg, $sort, $color, $show_num, 
+                               $use_cache) {
+global $msgs, $msort,
+ $sent_folder, $draft_folder,
+ $message_highlight_list, 
+ $auto_expunge, $thread_sort_messages, $allow_server_sort,
+ $data_dir, $username, $server_sort_order, $php_sort_order;
+
+
+ /* If autoexpunge is turned on, then do it now. */
+
+ $mbxresponse = sqimap_mailbox_select($imapConnection, $mailbox);
+ $issent = handleAsSent($mailbox);
+
+ /* If autoexpunge is turned on, then do it now. */
+ if ($auto_expunge == true) {
+    $exp_cnt = sqimap_mailbox_expunge($imapConnection, $mailbox, false, '');
+    $mbxresponse['EXISTS'] = $mbxresponse['EXISTS'] - $exp_cnt;
+ }
+
+
+ if ($mbxresponse['EXISTS']>0) {
+
+    /* if $start_msg is lower than $num_msgs, we probably deleted all messages
+     * in the last page. We need to re-adjust the start_msg
+     */
+
+    if($start_msg > $num_msgs) {
+       $start_msg -= $show_num;
+       if($start_msg < 1) {
+         $start_msg = 1;
+       }
+    }
+
+    /* This code and the next if() block check for
+     * server-side sorting methods. The $id array is
+     * formatted and $sort is set to 6 to disable 
+     * SM internal sorting
+     */
+     if ($thread_sort_messages == 1) {
+        $id = get_thread_sort($imapConnection);
+        if ($id == 'no') {
+            echo '<b><small><center><font color=red>' . 
+                 _("Thread sorting is not supported by your IMAP server.<br>Please report this to the system administrator.").
+                 '</center></small></b>';
+           $thread_sort_messages = 0; 
+           $id = array();
+       } else {
+          $sort = 6;
+          if ($start_msg + ($show_num - 1) < $num_msgs) {
+             $end_msg = $start_msg + ($show_num-1);
+          } else {
+             $end_msg = $num_msgs;
+          }
+          $id = array_slice($id, ($start_msg-1), ($end_msg));
+       }
+    }
+
+    if ($allow_server_sort == TRUE && $thread_sort_messages != 1) {
+       $server_sort_order = $sort;
+       $id = sqimap_get_sort_order($imapConnection, $server_sort_order,$mbxresponse);
+       if ($id == 'no') {
+            echo '<b><small><center><font color=red>' .
+                 _( "Server-side sorting is not supported by your IMAP server.<br>Please report this to the system administrator.").
+                 '</center></small></b>';
+          $sort = $server_sort_order;
+         $allow_server_sort = FALSE;
+         $id = array();
+       } else {
+         $sort = 6;
+         if ($start_msg + ($show_num - 1) < $num_msgs) {
+            $end_msg = $start_msg + ($show_num-1);
          } else {
-             if (!isset($messages)) {
-                 $messages = array();
-             }
-             $msgs = $messages;
+            $end_msg = $num_msgs;
          }
+         $id = array_slice($id, ($start_msg-1), ($end_msg));
+       }
+    }
+
+    if (!$use_cache) {
+      /* If it is sorted... */
+      if ($num_msgs >= 1) {
+        if ($sort < 6 ) {
+           $id = sqimap_get_php_sort_order ($imapConnection, $mbxresponse);
+        } elseif ($thread_sort_messages != 1 && $allow_server_sort != TRUE && $sort == 6) {
+          /* if it's not sorted */
+           $id = sqimap_get_php_sort_order ($imapConnection, $mbxresponse);
+          if ($start_msg + ($show_num - 1) < $num_msgs) {
+             $end_msg = $start_msg + ($show_num - 1);
+          } else {
+             $end_msg = $num_msgs;
+          }
+          if ($end_msg < $start_msg) {
+             $start_msg = $start_msg - $show_num;
+             if ($start_msg < 1) {
+                $start_msg = 1;
+             }
+          }
+
+          $real_startMessage = $num_msgs - $start_msg + 1;
+          $real_endMessage = $num_msgs - $start_msg - $show_num + 2;
+          if ($real_endMessage <= 0) {
+             $real_endMessage = 1;
+          }
+           $id = array_slice(array_reverse($id), ($start_msg-1), ($end_msg));
+        }
       }
-
-      // There's gotta be messages in the array for it to sort them.
-      if ($numMessages > 0 && ! $use_cache) {
-         /** 0 = Date (up)      4 = Subject (up)
-          ** 1 = Date (dn)      5 = Subject (dn)
-          ** 2 = Name (up)
-          ** 3 = Name (dn)
-          **/
-         session_unregister("msgs");
-         if (($sort == 0) || ($sort == 1))
-            $msort = array_cleave ($msgs, 'TIME_STAMP');
-         elseif (($sort == 2) || ($sort == 3))
-            $msort = array_cleave ($msgs, 'FROM-SORT');
-         elseif (($sort == 4) || ($sort == 5))
-            $msort = array_cleave ($msgs, 'SUBJECT-SORT');
-         else // ($sort == 6)
-            $msort = $msgs;
-
-         if ($sort < 6) {
-            if ($sort % 2) {
-               asort($msort);
-            } else {
-               arsort($msort);
-            }
+      if ($sort == 6) {
+         $end = $start_msg + $show_num - 1;
+         if ($num_msgs < $show_num) {
+           $end_loop = $num_msgs;
+         } else if ($end > $num_msgs) {
+           $end_loop = $num_msgs - $start_msg + 1;
+         } else {
+           $end_loop = $show_num;
          }
-         session_register('msort');
-      }
-      displayMessageArray($imapConnection, $numMessages, $startMessage, $msgs, $msort, $mailbox, $sort, $color,$show_num);
-      session_register('msgs');
-   }
-
-   /******************************************************************/
-   /* Generic function to convert the msgs array into an HTML table. */
-   /******************************************************************/
-   function displayMessageArray($imapConnection, $numMessages, $startMessage, &$msgs, $msort, $mailbox, $sort, $color,$show_num) {
-      global $folder_prefix, $sent_folder;
-      global $imapServerAddress, $data_dir, $username, $use_mailbox_cache;
-      global $index_order, $real_endMessage, $real_startMessage, $checkall;
-
-      /* If cache isn't already set, do it now. */
-      if (!session_is_registered('msgs')) { session_register('msgs'); }
-      if (!session_is_registered('msort')) { session_register('msort'); }
-
-      if ($startMessage + ($show_num - 1) < $numMessages) {
-         $endMessage = $startMessage + ($show_num-1);
       } else {
-         $endMessage = $numMessages;
+         $end = $num_msgs;
+         $end_loop = $end;
       }
 
-      if ($endMessage < $startMessage) {
-         $startMessage = $startMessage - $show_num;
-         if ($startMessage < 1) { $startMessage = 1; }
+      $messages = fillMessageArray($imapConnection,$id,$issent,$end_loop);
+      if (!isset($messages)) {
+         $messages = array();
       }
-
-      $nextGroup = $startMessage + $show_num;
-      $prevGroup = $startMessage - $show_num;
-      $urlMailbox = urlencode($mailbox);
-
-      do_hook('mailbox_index_before');
-
-      $Message = '';
-      if ($startMessage < $endMessage) {
-         $Message = _("Viewing messages") .":<B>$startMessage</B> ". _("to") ." <B>$endMessage</B> ($numMessages " . _("total") . ")\n";
-      } elseif ($startMessage == $endMessage) {
-         $Message = _("Viewing message") .":<B>$startMessage</B> ($numMessages " . _("total") . ")\n";
-      }
-
-      if ($sort == 6) {
-         $use = 0;
+      $msgs = $messages;
+      
+    }
+
+    $msort = calc_msort($msgs, $sort, $num_msgs, $use_cache);
+
+
+    /* There's gotta be messages in the array for it to sort them. */
+} /* if exists > 0 */
+  displayMessageArray($imapConnection, $num_msgs, $start_msg, $msgs, 
+                     $msort, $mailbox, $sort, $color,$show_num);
+  /**
+   * TODO: Switch to using $_SESSION[] whenever we ditch the 4.0.x series.
+   */
+  session_register('msgs');
+}
+
+function calc_msort($msgs, $sort, $num_msgs, $use_cache) {
+  global $thread_sort_messages, $allow_server_sort;
+
+  if (($num_msgs > 0) && (!$use_cache)) {
+    /*
+     * 0 = Date (up)
+     * 1 = Date (dn)
+     * 2 = Name (up)
+     * 3 = Name (dn)
+     * 4 = Subject (up)
+     * 5 = Subject (dn)
+     */
+    session_unregister('msgs');
+    if (($sort == 0) || ($sort == 1)) {
+      $msort = array_cleave ($msgs, 'TIME_STAMP');
+    } elseif (($sort == 2) || ($sort == 3)) {
+      $msort = array_cleave ($msgs, 'FROM-SORT');
+    } elseif (($sort == 4) || ($sort == 5)) {
+      $msort = array_cleave ($msgs, 'SUBJECT-SORT');
+    } else {
+      $msort = $msgs;
+    }
+    if ($sort < 6) {
+      if ($sort % 2) {
+       asort($msort);
       } else {
-         $use = 1;
+       arsort($msort);
       }
-      $lMore = '';
-      $rMore = '';
-      if (($nextGroup <= $numMessages) && ($prevGroup >= 0)) {
-         $lMore = "<A HREF=\"right_main.php?use_mailbox_cache=$use&startMessage=$prevGroup&mailbox=$urlMailbox\" TARGET=\"right\">". _("Previous") . '</A>';
-         $rMore = "<A HREF=\"right_main.php?use_mailbox_cache=$use&&startMessage=$nextGroup&mailbox=$urlMailbox\" TARGET=\"right\">". _("Next") ."</A>\n";
-      } else if (($nextGroup > $numMessages) && ($prevGroup >= 0)) {
-         $lMore = "<A HREF=\"right_main.php?use_mailbox_cache=$use&startMessage=$prevGroup&mailbox=$urlMailbox\" TARGET=\"right\">". _("Previous") . '</A>';
-         $rMore = "<FONT COLOR=\"$color[9]\">"._("Next")."</FONT>\n";
-      } else if (($nextGroup <= $numMessages) && ($prevGroup < 0)) {
-         $lMore = "<FONT COLOR=\"$color[9]\">"._("Previous") . '</FONT>';
-         $rMore = "<A HREF=\"right_main.php?use_mailbox_cache=$use&startMessage=$nextGroup&mailbox=$urlMailbox\" TARGET=\"right\">". _("Next") ."</A>\n";
-      }
-      if ($lMore <> '') {
-          $lMore .= ' | ';
+    }          
+    session_register('msort');
+  } elseif ($thread_sort_messages == 1 || $allow_server_sort == TRUE) {
+    $msort = $msgs;
+    session_unregister('msgs');
+    session_register('msort');
+  }
+  return $msort;
+} 
+
+function fillMessageArray($imapConnection,$id,$issent,$count) {
+   $msgs_list = sqimap_get_small_header_list($imapConnection, $id, $issent);
+   if (sizeof($msgs_list)){
+      foreach ($msgs_list as $hdr) {
+         $unique_id[] = $hdr->uid;
+         $from[] = $hdr->from;
+         $date[] = $hdr->date;
+         $subject[] = $hdr->subject;
+         $to[] = $hdr->to;
+         $priority[] = $hdr->priority;
+         $cc[] = $hdr->cc;
+         $size[] = $hdr->size;
+         $type[] = $hdr->type0;
+         $flag_deleted[] = $hdr->flag_deleted;
+         $flag_answered[] = $hdr->flag_answered;
+         $flag_seen[] = $hdr->flag_seen;
+         $flag_flagged[] = $hdr->flag_flagged;
+     }
+  }
+    
+  $j = 0;
+  while ($j < $count) {
+
+      if (isset($date[$j])) {
+       $date[$j] = str_replace('  ', ' ', $date[$j]);
+       $tmpdate = explode(' ', trim($date[$j]));
+      } else {
+       $tmpdate = $date = array('', '', '', '', '', '');
       }
-
-      /* Page selector block. Following code computes page links. */
-      $mMore = '';
-      if (!getPref($data_dir, $username, 'page_selector')
-             && ($numMessages > $show_num)) {
-         $j = intval( $numMessages / $show_num );  // Max pages
-         $k = max( 1, $j / getPref($data_dir, $username, 'page_selector_max', PG_SEL_MAX ) );
-         if ($numMessages % $show_num <> 0 ) {
-             $j++;
-         }
-         $startMessage = min( $startMessage, $numMessages );
-         $p = intval( $startMessage / $show_num ) + 1;
-         $i = 1;
-         while( $i < $p ) {
-            $pg = intval( $i );
-            $start = ( ($pg-1) * $show_num ) + 1;
-            $mMore .= "<a href=\"right_main.php?use_mailbox_cache=$use_mailbox_cache&startMessage=$start" .
-                    "&mailbox=$urlMailbox\" TARGET=\"right\">$pg</a> ";
-            $i += $k;
-         }
-         $mMore .= "<b>$p</b> ";
-         $i += $k;
-         while( $i <= $j ) {
-            $pg = intval( $i );
-            $start = ( ($pg-1) * $show_num ) + 1;
-            $mMore .= "<a href=\"right_main.php?use_mailbox_cache=$use_mailbox_cache&startMessage=$start" .
-                    "&mailbox=$urlMailbox\" TARGET=\"right\">$pg</a> ";
-            $i+=$k;
-         }
-         $mMore .= ' | ';
+      $i = $unique_id[$j];
+      $messages[$i]['TIME_STAMP'] = getTimeStamp($tmpdate);
+      $messages[$i]['DATE_STRING'] = 
+       getDateString($messages[$i]['TIME_STAMP']);
+      $messages[$i]['ID'] = $i;
+      $messages[$i]['FROM'] = decodeHeader($from[$j]);
+      $messages[$i]['FROM-SORT'] = 
+       strtolower(sqimap_find_displayable_name(decodeHeader($from[$j])));
+      $messages[$i]['SUBJECT'] = decodeHeader($subject[$j]);
+      $messages[$i]['SUBJECT-SORT'] = strtolower(decodeHeader($subject[$j]));
+      $messages[$i]['TO'] = decodeHeader($to[$j]);
+      $messages[$i]['PRIORITY'] = $priority[$j];
+      $messages[$i]['CC'] = $cc[$j];
+      $messages[$i]['SIZE'] = $size[$j];
+      $messages[$i]['TYPE0'] = $type[$j];
+      $messages[$i]['FLAG_DELETED'] = $flag_deleted[$j];
+      $messages[$i]['FLAG_ANSWERED'] = $flag_answered[$j];
+      $messages[$i]['FLAG_SEEN'] = $flag_seen[$j];
+      $messages[$i]['FLAG_FLAGGED'] = $flag_flagged[$j];
+
+      
+      /*
+       * fix SUBJECT-SORT to remove Re:
+       *     vedr|sv  (Danish)
+       *     re|aw (English)
+       *
+       * TODO: i18n should be incorporated here. E.g. we catch the ones
+       * we know about, but also define in i18n what the localized
+       * "Re: " is for this or that locale.
+       */
+       if (preg_match("/^(vedr|sv|re|aw):\s*(.*)$/si", 
+                    $messages[$i]['SUBJECT-SORT'], $matches)){
+          $messages[$i]['SUBJECT-SORT'] = $matches[2];
+       }
+       $j++;
+  }
+  return $messages;
+}
+
+/* Generic function to convert the msgs array into an HTML table. */
+function displayMessageArray($imapConnection, $num_msgs, $start_msg, 
+                            &$msgs, $msort, $mailbox, $sort, $color, 
+                            $show_num, $search=false) {
+  global $folder_prefix, $sent_folder, 
+    $imapServerAddress, $data_dir, $username, $use_mailbox_cache, 
+    $index_order, $real_endMessage, $real_startMessage, $checkall, 
+    $indent_array, $thread_sort_messages, $allow_server_sort, $server_sort_order;
+
+  /* If cache isn't already set, do it now. */
+  if (!session_is_registered('msgs')) {
+    session_register('msgs');
+  }
+  if (!session_is_registered('msort')) {
+    session_register('msort');
+  }
+  
+  if ($start_msg + ($show_num - 1) < $num_msgs){
+    $end_msg = $start_msg + ($show_num - 1);
+  } else {
+    $end_msg = $num_msgs;
+  }
+
+  if ($end_msg < $start_msg) {
+    $start_msg = $start_msg - $show_num;
+    if ($start_msg < 1) {
+      $start_msg = 1;
+    }
+  }
+
+  $urlMailbox = urlencode($mailbox);
+
+  do_hook('mailbox_index_before');
+
+  $msg_cnt_str = get_msgcnt_str($start_msg, $end_msg, $num_msgs);
+  $paginator_str = get_paginator_str($urlMailbox, $start_msg, $end_msg, 
+                                    $num_msgs, $show_num, $sort);
+
+  if (!isset($msg)) {
+    $msg = '';
+  }
+
+  /* get indent level for subject display */
+  if ($thread_sort_messages == 1 ) {
+    $indent_array = get_parent_level($imapConnection);
+  }
+  $fstring = "move_messages.php?msg=$msg&amp;mailbox=$urlMailbox"
+    . "&amp;startMessage=$start_msg";
+  mail_message_listing_beginning($imapConnection, $fstring,
+                                $mailbox, $sort, $msg_cnt_str, 
+                                $paginator_str, $start_msg);
+  $groupNum = $start_msg % ($show_num - 1);
+  $real_startMessage = $start_msg;
+  if ($sort == 6) {
+    if ($end_msg - $start_msg < $show_num - 1) {
+      $end_msg = $end_msg - $start_msg + 1;
+      $start_msg = 1;
+    } else if ($start_msg > $show_num) {
+      $end_msg = $show_num;
+      $start_msg = 1;
+    }
+  }
+  $endVar = $end_msg + 1;
+  
+  /*
+   * Loop through and display the info for each message. 
+   * ($t is used for the checkbox number)
+   */
+  $t = 0;
+  if ($num_msgs == 0) {
+    /* if there's no messages in this folder */
+        echo html_tag( 'tr',
+                html_tag( 'td',
+                          "<BR><b>" . _("THIS FOLDER IS EMPTY") . "</b><BR>&nbsp;",
+                          'center',
+                          $color[4],
+                          'COLSPAN="' . count($index_order) . '"'
+                )
+            );
+  } elseif ($start_msg == $end_msg) {
+    /* if there's only one message in the box, handle it differently. */
+    if ($sort != 6){
+      $i = $start_msg;
+    } else {
+      $i = 1;
+    }
+    reset($msort);
+    $k = 0;
+    do {
+      $key = key($msort);
+      next($msort);
+      $k++;
+    } while (isset ($key) && ($k < $i));
+    printMessageInfo($imapConnection, $t, $i, $key, $mailbox, $sort, 
+                    $real_startMessage, 0, 0);
+  } else {
+    $i = $start_msg;
+    reset($msort);
+    $k = 0;
+    do {
+      $key = key($msort);
+      next($msort);
+      $k++;
+    } while (isset ($key) && ($k < $i));
+    do {
+      printMessageInfo($imapConnection, $t, $i, $key, $mailbox, 
+                      $sort, $real_startMessage, 0, 0);
+      $key = key($msort);
+      $t++;
+      $i++;
+      next($msort);
+    } while ($i && $i < $endVar);
+  }
+  
+  echo '</table>';
+
+    echo html_tag( 'table',
+            html_tag( 'tr',
+                html_tag( 'td',
+                    html_tag( 'table',
+                        html_tag( 'tr',
+                            html_tag( 'td', $paginator_str ) .
+                            html_tag( 'td', $msg_cnt_str, 'right' )
+                        )
+                    , '', $color[4], 'width="100%" cellpadding="1" cellspacing="1"' )
+                )
+            , '', $color[4] )
+        , '', $color[9], 'width="100%" cellpadding="1"  cellspacing="1"' );
+
+
+  /* End of message-list table */
+  
+  do_hook('mailbox_index_after');
+  echo "</TABLE></FORM>\n";
+}
+
+/*
+ * Displays the standard message list header. To finish the table,
+ * you need to do a "</table></table>";
+ *
+ * $moveURL is the URL to submit the delete/move form to
+ * $mailbox is the current mailbox
+ * $sort is the current sorting method (-1 for no sorting available [searches])
+ * $Message is a message that is centered on top of the list
+ * $More is a second line that is left aligned
+ */
+function mail_message_listing_beginning ($imapConnection, $moveURL, 
+                                        $mailbox = '', $sort = -1,
+                                        $msg_cnt_str = '', 
+                                        $paginator = '&nbsp;', 
+                                        $start_msg = 1) {
+  global $color, $index_order, $auto_expunge, $move_to_trash, $base_uri,
+    $checkall, $sent_folder, $draft_folder, $thread_sort_messages, 
+    $allow_thread_sort, $allow_server_sort, $server_sort_order,
+    $lastTargetMailbox, $PHP_SELF;
+
+  $urlMailbox = urlencode($mailbox);
+
+  if (preg_match('/^(.+)\?.+$/',$PHP_SELF,$regs)) {
+     $source_url = $regs[1];
+  } else {
+     $source_url = $PHP_SELF;
+  }
+
+
+  /*
+   * This is the beginning of the message list table.
+   * It wraps around all messages
+   */
+
+    echo "<FORM name=\"messageList\" method=post action=\"$moveURL\">\n"
+        . html_tag( 'table' ,'' , '', '', 'border="0" width="100%" cellpadding="1"  cellspacing="0"' ) .
+            html_tag( 'tr',
+                html_tag( 'td' ,
+                    html_tag( 'table' ,
+                        html_tag( 'tr',
+                            html_tag( 'td', $paginator, 'left' ) .
+                            html_tag( 'td', $msg_cnt_str, 'right' ) 
+                        )
+                    , '', $color[4], 'border="0" width="100%" cellpadding="2"  cellspacing="0"' ) 
+                , 'left', '', '' )
+            , '', $color[0] )
+        . html_tag( 'tr' ) . "\n"
+        . html_tag( 'td' ,'' , 'left', $color[0], '' )
+        . html_tag( 'table' ,'' , '', $color[0], 'border="0" width="100%" cellpadding="0"  cellspacing="0"' )
+            . html_tag( 'tr',
+                html_tag( 'td', 
+                            '<small>&nbsp;' . _("Move Selected To:") . '</small>',
+                            'left',
+                            '',
+                            'valign="middle" nowrap' ) .
+                html_tag( 'td',            
+                            '<small>' . _("Transform Selected Messages") . ': &nbsp; </small>',
+                            'right',
+                            '',
+                            'nowrap' )
+            )
+        . html_tag( 'tr' ) ."\n"
+        . html_tag( 'td', '', 'left', '', 'valign="middle" nowrap' )
+        . '         <small>&nbsp;<tt><select name="targetMailbox">';
+
+  $boxes = sqimap_mailbox_list($imapConnection);
+  foreach ($boxes as $boxes_part) {
+    if (!in_array('noselect', $boxes_part['flags'])) {
+      $box = $boxes_part['unformatted'];
+      $box2 = str_replace(' ', '&nbsp;', imap_utf7_decode_local($boxes_part['unformatted-disp']));
+      if( $box2 == 'INBOX' ) {
+       $box2 = _("INBOX");
       }
-
-      if (! isset($msg))
-          $msg = '';
-      mail_message_listing_beginning($imapConnection,
-         "move_messages.php?msg=$msg&mailbox=$urlMailbox&startMessage=$startMessage",
-          $mailbox, $sort, $Message, $lMore . $mMore . $rMore, $startMessage);
-
-      $groupNum = $startMessage % ($show_num - 1);
-      $real_startMessage = $startMessage;
-      if ($sort == 6) {
-         if ($endMessage - $startMessage < $show_num - 1) {
-            $endMessage = $endMessage - $startMessage + 1;
-            $startMessage = 1;
-         } else if ($startMessage > $show_num) {
-            $endMessage = $show_num;
-            $startMessage = 1;
-         }
+      if ($lastTargetMailbox == $box) {
+        echo "       <OPTION VALUE=\"$box\" SELECTED>$box2</OPTION>\n";
       }
-      $endVar = $endMessage + 1;
-
-      // loop through and display the info for each message.
-      $t = 0; // $t is used for the checkbox number
-      if ($numMessages == 0) { // if there's no messages in this folder
-         echo "<TR><TD BGCOLOR=\"$color[4]\" COLSPAN=" . count($index_order);
-         echo "><CENTER><BR><B>". _("THIS FOLDER IS EMPTY") ."</B><BR>&nbsp;</CENTER></TD></TR>";
-      } else if ($startMessage == $endMessage) { // if there's only one message in the box, handle it different.
-         if ($sort != 6)
-            $i = $startMessage;
-         else
-            $i = 1;
-         reset($msort);
-         $k = 0;
-         do {
-            $key = key($msort);
-            next($msort);
-            $k++;
-         } while (isset ($key) && ($k < $i));
-         printMessageInfo($imapConnection, $t, $i, $key, $mailbox, $sort, $real_startMessage, 0, 0);
-      } else {
-         $i = $startMessage;
-
-         reset($msort);
-         $k = 0;
-         do {
-            $key = key($msort);
-            next($msort);
-            $k++;
-         } while (isset ($key) && ($k < $i));
-
-         do {
-            printMessageInfo($imapConnection, $t, $i, $key, $mailbox, $sort, $real_startMessage, 0, 0);
-            $key = key($msort);
-            $t++;
-            $i++;
-            next($msort);
-         } while ($i && $i < $endVar);
+      else {
+        echo "         <OPTION VALUE=\"$box\">$box2</OPTION>\n";
       }
-
-      echo '</table>';
-      echo "<table width=100%><tr ><td>$lMore$mMore$rMore</td><td align=right>$Message</td></tr></table>";
-      /** End of message-list table */
-
-      do_hook('mailbox_index_after');
-      echo "</TABLE></FORM>\n";
-   }
-
-   /* Displays the standard message list header.
-    * To finish the table, you need to do a "</table></table>";
-    * $moveURL is the URL to submit the delete/move form to
-    * $mailbox is the current mailbox
-    * $sort is the current sorting method (-1 for no sorting available [searches])
-    * $Message is a message that is centered on top of the list
-    * $More is a second line that is left aligned
+    }
+  }
+  echo '         </SELECT></TT>&nbsp;'
+    . '<INPUT TYPE="SUBMIT" NAME="moveButton" VALUE="' . _("Move") . '">&nbsp;'
+    . '<INPUT TYPE="SUBMIT" NAME="attache" VALUE="' . _("Forward") 
+    . "\">&nbsp;\n" . "</SMALL>\n";
+
+  echo "      </TD>\n"
+    . html_tag( 'td', '', 'right', '', 'nowrap' );
+
+  if (!$auto_expunge) {
+    echo '<INPUT TYPE=SUBMIT NAME="expungeButton" VALUE="' . _("Expunge") 
+      . '">&nbsp;' . _("mailbox") . '&nbsp;';
+  }
+  echo '<INPUT TYPE="SUBMIT" NAME="markRead" VALUE="' . _("Read") . '">'
+    . '<INPUT TYPE="SUBMIT" NAME="markUnread" VALUE="' . _("Unread") . '">'
+    . '<INPUT TYPE="SUBMIT" VALUE="' . _("Delete") . '">&nbsp;'
+    . "</TD>\n"
+    . "   </TR>\n";
+
+  /* draws thread sorting links */
+  if ($allow_thread_sort == TRUE) {
+    if ($thread_sort_messages == 1 ) {
+      $set_thread = 2;
+      $thread_name = _("Unthread View");
+    } 
+       elseif ($thread_sort_messages == 0) {
+      $set_thread = 1;
+      $thread_name = _("Thread View");
+    }
+        echo html_tag( 'tr' ,
+                    html_tag( 'td' ,
+                              '&nbsp;<a href=' . $source_url . '?sort='
+                              . "$sort" . '&start_messages=1&set_thread=' . "$set_thread"
+                              . '&mailbox=' . urlencode($mailbox) . '><small>' . $thread_name
+                              . '</a></small>&nbsp;'
+                     , '', '', '' )
+                 , '', '', '' );
+  }
+
+  echo "</TABLE>\n";
+
+    echo "</table>\n";
+    do_hook('mailbox_form_before');
+    echo '</td></tr>'
+    . html_tag( 'tr' )
+    . html_tag( 'td' ,'' , '', $color[0], '' );
+    if ($GLOBALS['alt_index_colors']){
+        $cellspacing =  '0';
+    } else {
+        $cellspacing = '1';
+    }
+    echo html_tag( 'table' ,'' , '', $color[0], 'border="0" width="100%" cellpadding="2"  cellspacing="'. $cellspacing .'"' )
+    . html_tag( 'tr' ,'' , 'center', $color[5] );
+    /* if using server sort we highjack the
+    * the $sort var and use $server_sort_order
+    * instead. but here we reset sort for a bit
+    * since its easy
     */
-   function mail_message_listing_beginning
-        ($imapConnection, $moveURL, $mailbox = '', $sort = -1,
-         $Message = '', $More = '', $startMessage = 1) {
-      global $color, $index_order, $auto_expunge, $move_to_trash;
-      global $checkall, $sent_folder, $draft_folder;
-      $urlMailbox = urlencode($mailbox);
-
-      /** This is the beginning of the message list table.  It wraps around all messages */
-      echo '<TABLE WIDTH="100%" BORDER="0" CELLPADDING="2" CELLSPACING="0">';
-
-      echo "<TR BGCOLOR=\"$color[4]\"><TD>";
-
-      echo  "<table bgcolor=\"$color[4]\" cellpadding=2".
-           ' width="100%" cellpadding="0" cellspacing="0" border="0"><tr><td>' .
-           "$More</td><td align=right>";
-      ShowSelectAllLink($startMessage, $sort);
-      echo "</td></tr></table>\n</td></tr>";
-
-      /** The delete and move options */
-      echo "<TR><TD BGCOLOR=\"$color[0]\">";
-
-      echo "\n<FORM name=messageList method=post action=\"$moveURL\">\n";
-      echo "<TABLE BGCOLOR=\"$color[0]\" COLS=2 BORDER=0 cellpadding=0 cellspacing=0 width=100%>\n";
-
-      echo "   <TR>\n" .
-           "      <TD ALIGN=LEFT VALIGN=CENTER NOWRAP>\n" .
-           '         <SMALL>&nbsp;' . _("Move selected to:") . "</SMALL>\n" .
-           "      </TD>\n" .
-           "      <TD ALIGN=RIGHT NOWRAP>\n" .
-           '         <SMALL>&nbsp;' . _("Transform Selected Messages") . ": &nbsp; </SMALL><BR>\n" .
-           "      </TD>\n" .
-           "   </TR>\n" .
-           "   <TR>\n" .
-           "      <TD ALIGN=LEFT VALIGN=CENTER NOWRAP>\n" .
-           '         <SMALL>&nbsp;<TT><SELECT NAME="targetMailbox">';
-
-      $boxes = sqimap_mailbox_list($imapConnection);
-      for ($i = 0; $i < count($boxes); $i++) {
-         if (!in_array("noselect", $boxes[$i]['flags'])) {
-            $box = $boxes[$i]['unformatted'];
-            $box2 = str_replace(' ', '&nbsp;', $boxes[$i]['unformatted-disp']);
-            echo "         <OPTION VALUE=\"$box\">$box2</option>\n";
-         }
-      }
-      echo '         </SELECT></TT></SMALL>';
-      echo "         <SMALL><INPUT TYPE=SUBMIT NAME=\"moveButton\" VALUE=\"" . _("Move") . "\"></SMALL>\n";
-      echo "      </TD>\n";
-      echo "      <TD ALIGN=RIGHT NOWRAP>&nbsp;&nbsp;&nbsp;\n";
-      if (!$auto_expunge) {
-         echo '         <INPUT TYPE=SUBMIT NAME="expungeButton" VALUE="'. _("Expunge") .'">&nbsp;'. _("mailbox") ."&nbsp;\n";
+    if ($allow_server_sort == TRUE) {
+        $sort = $server_sort_order;
+    }
+    /* Print the headers. */
+    for ($i=1; $i <= count($index_order); $i++) {
+        switch ($index_order[$i]) {
+        case 1: /* checkbox */
+        case 5: /* flags */
+            echo html_tag( 'td' ,'&nbsp;' , '', '', 'width="1%"' );
+            break;
+        case 2: /* from */
+            if (handleAsSent($mailbox)) {
+                echo html_tag( 'td' ,'' , 'left', '', 'width="25%"' )
+                . '<b>' . _("To") . '</b>';
+            } else {
+                echo html_tag( 'td' ,'' , 'left', '', 'width="25%"' )
+                . '<b>' . _("From") . '</b>';
+            }
+            if ($allow_thread_sort != TRUE || $thread_sort_messages != 1) {
+                ShowSortButton($sort, $mailbox, 2, 3);
+            }
+            echo "</td>\n";
+            break;
+        case 3: /* date */
+            echo html_tag( 'td' ,'' , 'left', '', 'width="5%" nowrap' )
+            . '<b>' . _("Date") . '</b>';
+            if ($allow_thread_sort != TRUE || $thread_sort_messages != 1) {
+                ShowSortButton($sort, $mailbox, 0, 1);
+            }
+            echo "</td>\n";
+            break;
+            case 4: /* subject */
+            echo html_tag( 'td' ,'' , 'left', '', '' )
+            . '<b>' . _("Subject") . '</b>';
+            if ($allow_thread_sort != TRUE || $thread_sort_messages != 1) {
+                ShowSortButton($sort, $mailbox, 4, 5);
+            }
+            echo "</td>\n";
+            break;
+        case 6: /* size */
+            echo html_tag( 'td', '<b>' . _("Size") . '</b>', 'center', '', 'width="5%"' );
+            break;
+        }
+    }
+    /* if using server-sorting,
+    * send sort back to 6
+    */
+    if ($allow_server_sort == TRUE) {
+        $sort = 6;
+    }
+    echo "</tr>\n";
+
+}
+
+/*
+ * This function shows the sort button. Isn't this a good comment?
+ */
+function ShowSortButton($sort, $mailbox, $Up, $Down ) {
+  global $PHP_SELF;
+  /* Figure out which image we want to use. */
+  if ($sort != $Up && $sort != $Down) {
+    $img = 'sort_none.png';
+    $which = $Up;
+  } elseif ($sort == $Up) {
+    $img = 'up_pointer.png';
+    $which = $Down;
+  } else {
+    $img = 'down_pointer.png';
+    $which = 6;
+  }
+  
+  if (preg_match('/^(.+)\?.+$/',$PHP_SELF,$regs)) {
+     $source_url = $regs[1];
+  } else {
+     $source_url = $PHP_SELF;
+  }
+  
+  /* Now that we have everything figured out, show the actual button. */
+  echo ' <a href="' . $source_url .'?newsort=' . $which
+    . '&amp;startMessage=1&amp;mailbox=' . urlencode($mailbox)
+    . '"><IMG SRC="../images/' . $img
+    . '" BORDER=0 WIDTH=12 HEIGHT=10 ALT="sort"></a>';
+}
+
+function get_selectall_link($start_msg, $sort) {
+  global $checkall, $what, $where, $mailbox, $javascript_on;
+  global $PHP_SELF, $PG_SHOWNUM;
+
+  $result = '';
+  if ($javascript_on) {
+    $result =
+      '<script language="JavaScript" type="text/javascript">'
+      . "\n<!-- \n"
+      . "function CheckAll() {\n"
+      . "  for (var i = 0; i < document.messageList.elements.length; i++) {\n"
+      . "    if(document.messageList.elements[i].type == 'checkbox'){\n"
+      . "      document.messageList.elements[i].checked = "
+      . "        !(document.messageList.elements[i].checked);\n"
+      . "    }\n"
+      . "  }\n"
+      . "}\n"
+      . "//-->\n"
+      . '</script><a href="#" onClick="CheckAll();">' . _("Toggle All") 
+      . "</a>\n";
+  } else {
+    if (strpos($PHP_SELF, "?")) {
+      $result .= "<a href=\"$PHP_SELF&amp;mailbox=" . urlencode($mailbox)
+       . "&amp;startMessage=$start_msg&amp;sort=$sort&amp;checkall=";
+    } else {
+      $result .= "<a href=\"$PHP_SELF?mailbox=" . urlencode($mailbox)
+       . "&amp;startMessage=$start_msg&amp;sort=$sort&amp;checkall=";
+    }
+    if (isset($checkall) && $checkall == '1') {
+      $result .= '0';
+    } else {
+      $result .= '1';
+    }
+    
+    if (isset($where) && isset($what)) {
+      $result .= '&amp;where=' . urlencode($where)
+       . '&amp;what=' . urlencode($what);
+    }
+    
+    $result .= "\">";
+    
+    if (isset($checkall) && ($checkall == '1')) {
+      $result .= _("Unselect All");
+    } else {
+      $result .= _("Select All");
+    }
+    
+    $result .= "</A>\n";
+  }
+
+  /* Return our final result. */
+  return ($result);
+}
+
+/*
+ * This function computes the "Viewing Messages..." string.
+ */
+function get_msgcnt_str($start_msg, $end_msg, $num_msgs) {
+  /* Compute the $msg_cnt_str. */
+  $result = '';
+  if ($start_msg < $end_msg) {
+    $result = sprintf(_("Viewing Messages: <B>%s</B> to <B>%s</B> (%s total)"),
+                     $start_msg, $end_msg, $num_msgs);
+  } else if ($start_msg == $end_msg) {
+    $result = sprintf(_("Viewing Message: <B>%s</B> (1 total)"), $start_msg);
+  } else {
+    $result = '<br>';
+  }
+
+  /* Return our result string. */
+  return ($result);
+}
+
+/*
+ * Generate a paginator link.
+ */
+function get_paginator_link($box, $start_msg, $use, $text) {
+  global $PHP_SELF;
+
+  if (preg_match('/^(.+)\?.+$/',$PHP_SELF,$regs)) {
+     $source_url = $regs[1];
+  } else {
+     $source_url = $PHP_SELF;
+  }
+  
+  $result = '<A HREF="'. $source_url . "?use_mailbox_cache=$use"
+    . "&amp;startMessage=$start_msg&amp;mailbox=$box\" "
+    . "TARGET=\"right\">$text</A>";
+  return ($result);
+}
+
+/*
+ * This function computes the paginator string.
+ */
+function get_paginator_str($box, $start_msg, $end_msg, $num_msgs, 
+                          $show_num, $sort) {
+  global $username, $data_dir, $use_mailbox_cache, $color, $PG_SHOWNUM;
+
+  /* Initialize paginator string chunks. */
+  $prv_str = '';
+  $nxt_str = '';
+  $pg_str = '';
+  $all_str = '';
+  $tgl_str = '';
+  
+  /* Create simple strings that will be creating the paginator. */
+  $spc = '&nbsp;';     /* This will be used as a space. */
+  $sep = '|';          /* This will be used as a seperator. */
+  
+  /* Get some paginator preference values. */
+  $pg_sel = getPref($data_dir, $username, 'page_selector', SMPREF_ON);
+  $pg_max = getPref($data_dir, $username, 'page_selector_max', PG_SEL_MAX);
+  
+  /* Make sure that our start message number is not too big. */
+  $start_msg = min($start_msg, $num_msgs);
+  
+  /* Decide whether or not we will use the mailbox cache. */
+  /* Not sure why $use_mailbox_cache is even passed in.   */
+  if ($sort == 6) {
+    $use = 0;
+  } else {
+    $use = 1;
+  }
+  
+  /* Compute the starting message of the previous and next page group. */
+  $next_grp = $start_msg + $show_num;
+  $prev_grp = $start_msg - $show_num;
+  
+  /* Compute the basic previous and next strings. */
+  if (($next_grp <= $num_msgs) && ($prev_grp >= 0)) {
+    $prv_str = get_paginator_link($box, $prev_grp, $use, _("Previous"));
+    $nxt_str = get_paginator_link($box, $next_grp, $use, _("Next"));
+  } else if (($next_grp > $num_msgs) && ($prev_grp >= 0)) {
+    $prv_str = get_paginator_link($box, $prev_grp, $use, _("Previous"));
+    $nxt_str = "<FONT COLOR=\"$color[9]\">"._("Next")."</FONT>\n";
+  } else if (($next_grp <= $num_msgs) && ($prev_grp < 0)) {
+    $prv_str = "<FONT COLOR=\"$color[9]\">"._("Previous") . '</FONT>';
+    $nxt_str = get_paginator_link($box, $next_grp, $use, _("Next"));
+  }
+  
+  /* Page selector block. Following code computes page links. */
+  if ($pg_sel && ($num_msgs > $show_num)) {
+    /* Most importantly, what is the current page!!! */
+    $cur_pg = intval($start_msg / $show_num) + 1;
+    
+    /* Compute total # of pages and # of paginator page links. */
+      $tot_pgs = ceil($num_msgs / $show_num);  /* Total number of Pages */
+      $vis_pgs = min($pg_max, $tot_pgs - 1);   /* Visible Pages    */
+       
+      /* Compute the size of the four quarters of the page links. */
+
+      /* If we can, just show all the pages. */
+      if (($tot_pgs - 1) <= $pg_max) {
+       $q1_pgs = $cur_pg - 1;
+       $q2_pgs = $q3_pgs = 0;
+       $q4_pgs = $tot_pgs - $cur_pg;
+       
+        /* Otherwise, compute some magic to choose the four quarters. */
+      } else {
+       /*
+        * Compute the magic base values. Added together,
+        * these values will always equal to the $pag_pgs.
+        * NOTE: These are DEFAULT values and do not take
+        * the current page into account. That is below.
+        */
+       $q1_pgs = floor($vis_pgs/4);
+       $q2_pgs = round($vis_pgs/4, 0);
+       $q3_pgs = ceil($vis_pgs/4);
+       $q4_pgs = round(($vis_pgs - $q2_pgs)/3, 0);
+        
+       /* Adjust if the first quarter contains the current page. */
+       if (($cur_pg - $q1_pgs) < 1) {
+         $extra_pgs = ($q1_pgs - ($cur_pg - 1)) + $q2_pgs;
+         $q1_pgs = $cur_pg - 1;
+         $q2_pgs = 0;
+         $q3_pgs += ceil($extra_pgs / 2);
+         $q4_pgs += floor($extra_pgs / 2);
+         
+         /* Adjust if the first and second quarters intersect. */
+       } else if (($cur_pg - $q2_pgs - ceil($q2_pgs/3)) <= $q1_pgs) {
+         $extra_pgs = $q2_pgs;
+         $extra_pgs -= ceil(($cur_pg - $q1_pgs - 1) * 0.75);
+         $q2_pgs = ceil(($cur_pg - $q1_pgs - 1) * 0.75);
+         $q3_pgs += ceil($extra_pgs / 2);
+         $q4_pgs += floor($extra_pgs / 2);
+         
+         /* Adjust if the fourth quarter contains the current page. */
+       } else if (($cur_pg + $q4_pgs) >= $tot_pgs) {
+         $extra_pgs = ($q4_pgs - ($tot_pgs - $cur_pg)) + $q3_pgs;
+         $q3_pgs = 0;
+         $q4_pgs = $tot_pgs - $cur_pg;
+         $q1_pgs += floor($extra_pgs / 2);
+         $q2_pgs += ceil($extra_pgs / 2);
+         
+         /* Adjust if the third and fourth quarter intersect. */
+       } else if (($cur_pg + $q3_pgs + 1) >= ($tot_pgs - $q4_pgs + 1)) {
+         $extra_pgs = $q3_pgs;
+         $extra_pgs -= ceil(($tot_pgs - $cur_pg - $q4_pgs) * 0.75);
+         $q3_pgs = ceil(($tot_pgs - $cur_pg - $q4_pgs) * 0.75);
+         $q1_pgs += floor($extra_pgs / 2);
+         $q2_pgs += ceil($extra_pgs / 2);
+       }
       }
-      echo "         <INPUT TYPE=SUBMIT NAME=\"markRead\" VALUE=\"". _("Read")."\">\n";
-      echo "         <INPUT TYPE=SUBMIT NAME=\"markUnread\" VALUE=\"". _("Unread")."\">\n";
-      echo "         <INPUT TYPE=SUBMIT VALUE=\"". _("Delete") . "\">&nbsp;\n";
-      echo "      </TD>\n";
-      echo "   </TR>\n";
-      echo "</TABLE>\n";
-      do_hook('mailbox_form_before');
-      echo '</TD></TR>';
-
-      echo "<TR><TD BGCOLOR=\"$color[0]\">";
-      echo "<TABLE WIDTH=100% BORDER=0 CELLPADDING=2 CELLSPACING=";
-      if ($GLOBALS['alt_index_colors']) {
-        echo "0";
+      
+      /*
+       * I am leaving this debug code here, commented out, because
+       * it is a really nice way to see what the above code is doing.
+       * echo "qts =  $q1_pgs/$q2_pgs/$q3_pgs/$q4_pgs = "
+       *    . ($q1_pgs + $q2_pgs + $q3_pgs + $q4_pgs) . '<br>';
+       */
+      
+      /* Print out the page links from the compute page quarters. */
+      
+      /* Start with the first quarter. */
+      if (($q1_pgs == 0) && ($cur_pg > 1)) {
+       $pg_str .= "...$spc";
       } else {
-        echo "1";
+       for ($pg = 1; $pg <= $q1_pgs; ++$pg) {
+         $start = (($pg-1) * $show_num) + 1;
+         $pg_str .= get_paginator_link($box, $start, $use, $pg) . $spc;
+       }
+       if ($cur_pg - $q2_pgs - $q1_pgs > 1) {
+         $pg_str .= "...$spc";
+       }
       }
-      echo " BGCOLOR=\"$color[0]\">";
-      echo "<TR BGCOLOR=\"$color[5]\" ALIGN=\"center\">";
-
-      /* Print the headers. */
-      for ($i=1; $i <= count($index_order); $i++) {
-         switch ($index_order[$i]) {
-            case 1: /* checkbox */
-            case 5: /* flags */
-               echo '   <TD WIDTH="1%"><B>&nbsp;</B></TD>';
-               break;
-
-            case 2: /* from */
-               if (($mailbox == $sent_folder)
-                     || ($mailbox == $draft_folder)) {
-                  echo '   <TD WIDTH="25%"><B>'. _("To") .'</B>';
-               } else {
-                   echo '   <TD WIDTH="25%"><B>'. _("From") .'</B>';
-               }
-
-           ShowSortButton($sort, $mailbox, 2, 3);
-               echo "</TD>\n";
-               break;
-
-            case 3: /* date */
-               echo '   <TD NOWRAP WIDTH="5%"><B>'. _("Date") .'</B>';
-               ShowSortButton($sort, $mailbox, 0, 1);
-               echo "</TD>\n";
-               break;
-
-            case 4: /* subject */
-               echo '   <TD><B>'. _("Subject") .'</B> ';
-               ShowSortButton($sort, $mailbox, 4, 5);
-               echo "</TD>\n";
-               break;
-
-            case 6: /* size */
-               echo '   <TD WIDTH="5%"><b>' . _("Size")."</b></TD>\n";
-               break;
-         }
+      
+      /* Continue with the second quarter. */
+      for ($pg = $cur_pg - $q2_pgs; $pg < $cur_pg; ++$pg) {
+       $start = (($pg-1) * $show_num) + 1;
+       $pg_str .= get_paginator_link($box, $start, $use, $pg) . $spc;
       }
-      echo "</TR>\n";
-   }
-
-   /*******************************************************************/
-   /* This function shows the sort button. Isn't this a good comment? */
-   /*******************************************************************/
-   function ShowSortButton($sort, $mailbox, $Up, $Down) {
-      /* Figure out which image we want to use. */
-      if ($sort != $Up && $sort != $Down) {
-         $img = 'sort_none.gif';
-         $which = $Up;
-      } elseif ($sort == $Up) {
-         $img = 'up_pointer.gif';
-         $which = $Down;
-      } else {
-         $img = 'down_pointer.gif';
-         $which = 6;
+      
+      /* Now print the current page. */
+      $pg_str .= $cur_pg . $spc;
+      
+      /* Next comes the third quarter. */
+      for ($pg = $cur_pg + 1; $pg <= $cur_pg + $q3_pgs; ++$pg) {
+       $start = (($pg-1) * $show_num) + 1;
+       $pg_str .= get_paginator_link($box, $start, $use, $pg) . $spc;
       }
-
-      /* Now that we have everything figured out, show the actual button. */
-      echo ' <a href="right_main.php?newsort=' . $which .
-           '&startMessage=1&mailbox=' . urlencode($mailbox) .
-           '"><IMG SRC="../images/' . $img .
-           '" BORDER=0 WIDTH=12 HEIGHT=10></a>';
-   }
-
-   function ShowSelectAllLink($startMessage, $sort) {
-       global $checkall, $PHP_SELF, $what, $where, $mailbox;
-
-       echo '&nbsp;<script language="JavaScript">' .
-            "\n<!-- \n" .
-            "function CheckAll() {\n" .
-            "   for (var i = 0; i < document.messageList.elements.length; i++) {\n" .
-            "       if( document.messageList.elements[i].type == 'checkbox' ) {\n" .
-            "           document.messageList.elements[i].checked = !(document.messageList.elements[i].checked);\n".
-            "       }\n" .
-            "   }\n" .
-            "}\n" .
-            'window.document.write(\'<a href=# onClick="CheckAll();">' . _("Toggle All") . "</a>');\n" .
-            "//-->\n" .
-            "</script>\n<noscript>\n";
-
-       echo "<a href=\"$PHP_SELF?mailbox=" . urlencode($mailbox) .
-          "&startMessage=$startMessage&sort=$sort&checkall=";
-       if (isset($checkall) && $checkall == '1')
-           echo '0';
-       else
-           echo '1';
-       if (isset($where) && isset($what))
-           echo '&where=' . urlencode($where) . '&what=' . urlencode($what);
-       echo "\">";
-       if (isset($checkall) && $checkall == '1')
-           echo _("Unselect All");
-       else
-           echo _("Select All");
-
-       echo "</A>\n</noscript>\n";
-   }
-
-   function processSubject($subject)
-   {
-      // Shouldn't ever happen -- caught too many times in the IMAP functions
-      if ($subject == '')
-          return _("(no subject)");
-
-      if (strlen($subject) <= 55)
-          return $subject;
-
-      $ent_strlen=strlen($subject);
-      $trim_val=50;
-      $ent_offset=0;
-      // see if this is entities-encoded string
-      // If so, Iterate through the whole string, find out
-      // the real number of characters, and if more
-      // than 55, substr with an updated trim value.
-      while (($ent_loc = strpos($subject, '&', $ent_offset)) !== false &&
-             ($ent_loc_end = strpos($subject, ';', $ent_loc)) !== false)
-      {
-     $trim_val += ($ent_loc_end-$ent_loc)+1;
-     $ent_strlen -= $ent_loc_end-$ent_loc;
-     $ent_offset = $ent_loc_end+1;
+      
+      /* And last, print the forth quarter page links. */
+      if (($q4_pgs == 0) && ($cur_pg < $tot_pgs)) {
+       $pg_str .= "...$spc";
+      } else {
+       if (($tot_pgs - $q4_pgs) > ($cur_pg + $q3_pgs)) {
+         $pg_str .= "...$spc";
+       }
+       for ($pg = $tot_pgs - $q4_pgs + 1; $pg <= $tot_pgs; ++$pg) {
+         $start = (($pg-1) * $show_num) + 1;
+         $pg_str .= get_paginator_link($box, $start, $use, $pg) . $spc;
+       }
       }
-
-      if ($ent_strlen <= 55)
-          return $subject;
-
-      return substr($subject, 0, $trim_val) . '...';
-   }
-
-?>
\ No newline at end of file
+  } else if ($PG_SHOWNUM == 999999) {
+    $pg_str = "<A HREF=\"right_main.php?PG_SHOWALL=0"
+      . "&amp;use_mailbox_cache=$use&amp;startMessage=1&amp;mailbox=$box\" "
+      . "TARGET=\"right\">" ._("Paginate") . '</A>' . $spc;
+  }
+
+  /* If necessary, compute the 'show all' string. */
+  if (($prv_str != '') || ($nxt_str != '')) {
+    $all_str = "<A HREF=\"right_main.php?PG_SHOWALL=1"
+      . "&amp;use_mailbox_cache=$use&amp;startMessage=1&amp;mailbox=$box\" "
+      . "TARGET=\"right\">" . _("Show All") . '</A>';
+  }
+  
+  /* Last but not least, get the value for the toggle all link. */
+  $tgl_str = get_selectall_link($start_msg, $sort);
+  
+  /* Put all the pieces of the paginator string together. */
+  /**
+   * Hairy code... But let's leave it like it is since I am not certain
+   * a different approach would be any easier to read. ;)
+   */
+  $result = '';
+  $result .= ($prv_str != '' ? $prv_str . $spc . $sep . $spc : '');
+  $result .= ($nxt_str != '' ? $nxt_str . $spc . $sep . $spc : '');
+  $result .= ($pg_str != '' ? $pg_str : '');
+  $result .= ($all_str != '' ? $sep . $spc . $all_str . $spc : '');
+  $result .= ($result != '' ? $sep . $spc . $tgl_str: $tgl_str);
+  
+  /* If the resulting string is blank, return a non-breaking space. */
+  if ($result == '') {
+    $result = '&nbsp;';
+  }
+
+  /* Return our final magical paginator string. */
+  return ($result);
+}
+
+function processSubject($subject) {
+  /* Shouldn't ever happen -- caught too many times in the IMAP functions */
+  if ($subject == '')
+    return _("(no subject)");
+  
+  if (strlen($subject) <= 55)
+    return $subject;
+
+  $ent_strlen=strlen($subject);
+  $trim_val=50;
+  $ent_offset=0;
+  /*
+   * see if this is entities-encoded string
+   * If so, Iterate through the whole string, find out
+   * the real number of characters, and if more
+   * than 55, substr with an updated trim value.
+   */
+  while ( (($ent_loc = strpos($subject, '&', $ent_offset)) !== false) &&
+         (($ent_loc_end = strpos($subject, ';', $ent_loc)) !== false) ) {
+    $trim_val += ($ent_loc_end-$ent_loc)+1;
+    $ent_strlen -= $ent_loc_end-$ent_loc;
+    $ent_offset = $ent_loc_end+1;
+  }
+
+  if ($ent_strlen <= 55){
+    return $subject;
+  }
+  
+  return substr($subject, 0, $trim_val) . '...';
+}
+
+function handleAsSent($mailbox) {
+  global $sent_folder, $draft_folder, $handleAsSent_result;
+
+  /* First check if this is the sent or draft folder. */
+  $handleAsSent_result = (($mailbox == $sent_folder) 
+                         || ($mailbox == $draft_folder));
+  
+  /* Then check the result of the handleAsSent hook. */
+  do_hook('check_handleAsSent_result', $mailbox);
+
+  /* And return the result. */
+  return ($handleAsSent_result);
+}
+
+?>