Replacing tabs with spaces, trimming white space at EOL and newline at EOF
[squirrelmail.git] / functions / mailbox_display.php
index 53b67c41e73466ee7c7699abcf2f73fa7da490c9..eef07effad46f20f1e2c8dfb0dda56782df4aea6 100644 (file)
@@ -1,17 +1,17 @@
 <?php
 
 /**
-* mailbox_display.php
-*
-* Copyright (c) 1999-2004 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...
-*
-* @version $Id$
-* @package squirrelmail
-*/
+ * mailbox_display.php
+ *
+ * Copyright (c) 1999-2004 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...
+ *
+ * @version $Id$
+ * @package squirrelmail
+ */
 
 /** The standard includes.. */
 require_once(SM_PATH . 'functions/strings.php');
@@ -24,18 +24,18 @@ require_once(SM_PATH . 'functions/mime.php');
 require_once(SM_PATH . 'functions/forms.php');
 
 /**
-* default value for page_selector_max
-*/
+ * default value for page_selector_max
+ */
 define('PG_SEL_MAX', 10);
 
 /**
-* The number of pages to cache msg headers
-*/
+ * The number of pages to cache msg headers
+ */
 define('SQM_MAX_PAGES_IN_CACHE',5);
 
 /**
-* Sort constants used for sorting of messages
-*/
+ * Sort constants used for sorting of messages
+ */
 define('SQSORT_NONE',0);
 define('SQSORT_DATE_ASC',1);
 define('SQSORT_DATE_DEC',2);
@@ -63,8 +63,8 @@ define('SQM_MAX_MBX_IN_CACHE',3);
 // define('MBX_PREF_FUTURE',unique integer key);
 
 /**
-* @param mixed $start UNDOCUMENTED
-*/
+ * @param mixed $start UNDOCUMENTED
+ */
 function elapsed($start) {
 
     $end = microtime();
@@ -80,11 +80,11 @@ function elapsed($start) {
 }
 
 /**
-* Displays message header row in messages list
-*
-* @param  array $aMsg contains all message related parameters
-* @return void
-*/
+ * Displays message header row in messages list
+ *
+ * @param  array $aMsg contains all message related parameters
+ * @return void
+ */
 
 function printMessageInfo($aMsg) {
     // FIX ME, remove these globals as well by adding an array as argument for the user settings
@@ -124,6 +124,8 @@ function printMessageInfo($aMsg) {
     $aFlags   = (isset($msg['FLAGS'])) ? $msg['FLAGS'] : array();
     $iPrio    = (isset($msg['PRIORITY'])) ? $msg['PRIORITY'] : 3;
     $iSize    = (isset($msg['SIZE'])) ? $msg['SIZE'] : 0;
+
+    // These don't appear to be used... are they safe to remove
     $sType0   = (isset($msg['TYPE0'])) ? $msg['TYPE0'] : 'text';
     $sType1   = (isset($msg['TYPE1'])) ? $msg['TYPE1'] : 'plain';
     if (isset($msg['INTERNALDATE'])) {
@@ -157,8 +159,8 @@ function printMessageInfo($aMsg) {
         // If the From address is the same as $email_address, then handle as Sent
         $from_array = parseAddress($sFrom, 1);
         if (!isset($email_address)) {
-            global $datadir, $username;
-            $email_address = getPref($datadir, $username, 'email_address');
+            global $data_dir, $username;
+            $email_address = getPref($data_dir, $username, 'email_address');
         }
         $bHandleAsSent = ((isset($from_array[0][0])) && ($from_array[0][0] == $email_address));
     } else {
@@ -213,7 +215,7 @@ function printMessageInfo($aMsg) {
         $senderName = truncateWithEntities($senderName, $truncate_sender);
     }
 
-    $flag = $flag_end = $bold = $bold_end = $fontstr = $fontstr_end = $italic = $italic_end = '';
+    $flag = $flag_end = $fontstr = $fontstr_end = $italic = $italic_end = '';
     $bold = '<b>';
     $bold_end = '</b>';
 
@@ -492,6 +494,7 @@ function sqm_api_mailbox_select($imapConnection,$mailbox,$aConfig,$aProps) {
     /**
      * In case the properties arrays are empty set the defaults.
      */
+    // Doesn't appear to be used... safe to remove?
     $aDefaultMbxPref = array ();
 //                          MBX_PREF_SORT => 0,
 //                          MBX_PREF_LIMIT => 15,
@@ -595,7 +598,6 @@ function sqm_api_mailbox_select($imapConnection,$mailbox,$aConfig,$aProps) {
                         (!($newsort % 2) && ($newsort - 1 == $oldsort))) {
                         $aMailbox['UIDSET'][$iSetIndx] = array_reverse($aCachedMailbox['UIDSET'][$iSetIndx]);
                     } else {
-                        $server_sort_array = false;
                         $aMailbox['MSG_HEADERS'] = false;
                         $aMailbox['ID'] = false;
                     }
@@ -710,12 +712,12 @@ function sqm_api_mailbox_select($imapConnection,$mailbox,$aConfig,$aProps) {
 
 
 /**
-* Does the $srt $_GET var to field mapping
-*
-* @param int $srt Field to sort on
-* @param bool $bServerSort Server sorting is true
-* @return string $sSortField Field to sort on
-*/
+ * Does the $srt $_GET var to field mapping
+ *
+ * @param int $srt Field to sort on
+ * @param bool $bServerSort Server sorting is true
+ * @return string $sSortField Field to sort on
+ */
 function getSortField($sort,$bServerSort) {
     switch($sort) {
         case SQSORT_NONE:
@@ -932,10 +934,10 @@ function fetchMessageHeaders($imapConnection, &$aMailbox) {
             }
 
             /**
-            * retrieve messages by sequence id's and fetch the UID to retrieve
-            * the UID. for sorted lists this is not needed because a UID FETCH
-            * automaticly add the UID value in fetch results
-            **/
+             * retrieve messages by sequence id's and fetch the UID to retrieve
+             * the UID. for sorted lists this is not needed because a UID FETCH
+             * automaticly add the UID value in fetch results
+             **/
             $aFetchItems[] = 'UID';
 
             //create id range
@@ -999,14 +1001,14 @@ function fetchMessageHeaders($imapConnection, &$aMailbox) {
 }
 
 /**
-* This function loops through a group of messages in the mailbox
-* and shows them to the user.
-*
-* @param mixed $imapConnection
-* @param array $aMailbox associative array with mailbox related vars
-*/
+ * This function loops through a group of messages in the mailbox
+ * and shows them to the user.
+ *
+ * @param mixed $imapConnection
+ * @param array $aMailbox associative array with mailbox related vars
+ */
 function showMessagesForMailbox($imapConnection, &$aMailbox) {
-    global $color;
+    global $color, $javascript_on, $compact_paginator;
 
     // to retrieve the internaldate pref: (I know this is not the right place to do that, move up in front
     // and use a properties array as function argument to provide user preferences
@@ -1021,12 +1023,25 @@ function showMessagesForMailbox($imapConnection, &$aMailbox) {
              $aMailbox['PAGEOFFSET'] + $iLimit - 1 : $aMailbox['EXISTS'];
 
     $paginator_str = get_paginator_str($aMailbox['NAME'], $aMailbox['PAGEOFFSET'],
-                                    $aMailbox['EXISTS'], $aMailbox['LIMIT'], $aMailbox['SHOWALL'][$iSetIndx]);
+      $aMailbox['EXISTS'], $aMailbox['LIMIT'], $aMailbox['SHOWALL'][$iSetIndx]);
 
     $msg_cnt_str = get_msgcnt_str($aMailbox['PAGEOFFSET'], $iEnd,$aMailbox['EXISTS']);
 
     do_hook('mailbox_index_before');
-?>
+
+    if ($javascript_on && $compact_paginator) {
+        // Insert compact paginator javascript
+        echo "\n<!-- start of compact paginator javascript -->\n"
+            . "<script language=\"JavaScript\">\n"
+            . "function SubmitOnSelect(select, URL)\n"
+            . "{\n"
+            . "   URL += select.options[select.selectedIndex].value;\n"
+            . "   window.location.href = URL;\n"
+            . "}\n"
+            . "</script>\n"
+            . "<!-- end of compact paginator javascript -->\n";
+    } ?>
+
 <table border="0" width="100%" cellpadding="0" cellspacing="0">
 <tr>
     <td>
@@ -1052,9 +1067,13 @@ function showMessagesForMailbox($imapConnection, &$aMailbox) {
         </td>
         </tr>
     </table>
-    <?php
-        mail_message_listing_end($aMailbox['EXISTS'], $paginator_str, $msg_cnt_str);
-    ?>
+    </td>
+</tr>
+<tr>
+    <td>
+<?php
+    mail_message_listing_end($aMailbox, $paginator_str, $msg_cnt_str);
+?>
     </td>
 </tr>
 </table>
@@ -1063,15 +1082,15 @@ function showMessagesForMailbox($imapConnection, &$aMailbox) {
 }
 
 /**
-* Function to map an uid list with a msg header array by uid
-* The mapped headers are printed with printMessage
-* aMailbox parameters contains info about the page we are on, the
-* used search criteria, the number of messages to show
-*
-* @param resource $imapConnection socket handle to imap
-* @param array    $aMailbox array with required elements MSG_HEADERS, UIDSET, OFFSET, LIMIT
-* @return void
-**/
+ * Function to map an uid list with a msg header array by uid
+ * The mapped headers are printed with printMessage
+ * aMailbox parameters contains info about the page we are on, the
+ * used search criteria, the number of messages to show
+ *
+ * @param resource $imapConnection socket handle to imap
+ * @param array    $aMailbox array with required elements MSG_HEADERS, UIDSET, OFFSET, LIMIT
+ * @return void
+ **/
 function displayMessageArray($imapConnection, $aMailbox) {
     $iSetIndx    = $aMailbox['SETINDEX'];
     $aId         = $aMailbox['UIDSET'][$iSetIndx];
@@ -1123,15 +1142,15 @@ function displayMessageArray($imapConnection, $aMailbox) {
 }
 
 /**
-* Displays the standard message list header.
-*
-* To finish the table, you need to do a "</table></table>";
-*
-* @param resource $imapConnection
-* @param array    $aMailbox associative array with mailbox related information
-* @param string   $msg_cnt_str
-* @param string   $paginator Paginator string
-*/
+ * Displays the standard message list header.
+ *
+ * To finish the table, you need to do a "</table></table>";
+ *
+ * @param resource $imapConnection
+ * @param array    $aMailbox associative array with mailbox related information
+ * @param string   $msg_cnt_str
+ * @param string   $paginator Paginator string
+ */
 function mail_message_listing_beginning ($imapConnection,
                                          $aMailbox,
                                          $msg_cnt_str = '',
@@ -1142,8 +1161,6 @@ function mail_message_listing_beginning ($imapConnection,
 
     $php_self = $PHP_SELF;
 
-    $urlMailbox = urlencode($aMailbox['NAME']);
-
     if (preg_match('/^(.+)\?.+$/',$php_self,$regs)) {
         $source_url = $regs[1];
     } else {
@@ -1256,17 +1273,19 @@ function mail_message_listing_beginning ($imapConnection,
 }
 
 /**
-* Function to add the last row in a message list, it contains the paginator and info about
-* the number of messages.
-*
-* @param integer $num_msgs number of messages in a mailbox
-* @param string  $paginator_str Paginator string  [Prev | Next]  [ 1 2 3 ... 91 92 94 ]  [Show all]
-* @param string  $msg_cnt_str   Message count string Viewing Messages: 21 to 1861 (20 total)
-*/
-function mail_message_listing_end($num_msgs, $paginator_str, $msg_cnt_str) {
-global $color;
-if ($num_msgs) {
-    /* space between list and footer */
+ * Function to add the last row in a message list, it contains the paginator and info about
+ * the number of messages.
+ *
+ * @param array   $aMailbox associative array with mailbox related information
+ * @param string  $paginator_str Paginator string  [Prev | Next]  [ 1 2 3 ... 91 92 94 ]  [Show all]
+ * @param string  $msg_cnt_str   Message count string Viewing Messages: 21 to 1861 (20 total)
+ */
+function mail_message_listing_end($aMailbox, $paginator_str, $msg_cnt_str) {
+    global $color;
+
+    if ($aMailbox['EXISTS']) {
+        /* space between list and footer */
+
 ?>
 <tr><td height="5" bgcolor="<?php echo $color[4]; ?>" colspan="1"></td></tr>
 <tr>
@@ -1294,10 +1313,10 @@ if ($num_msgs) {
 }
 
 /**
-* Prints the table header for the messages list view
-*
-* @param array $aMailbox
-*/
+ * Prints the table header for the messages list view
+ *
+ * @param array $aMailbox
+ */
 function printHeader($aMailbox) {
     global $index_order, $internal_date_sort, $color;
 
@@ -1310,7 +1329,7 @@ function printHeader($aMailbox) {
     echo html_tag( 'tr' ,'' , 'center', $color[5] );
 
     /* calculate the width of the subject column based on the
-    * widths of the other columns */
+     * widths of the other columns */
     $widths = array(1=>1,2=>25,3=>5,4=>0,5=>1,6=>5);
     $subjectwidth = 100;
     foreach($index_order as $item) {
@@ -1376,12 +1395,12 @@ function printHeader($aMailbox) {
 
 
 /**
-* This function shows the sort button. Isn't this a good comment?
-*
-* @param array $aMailbox
-* @param integer $Down
-* @param integer $Up
-*/
+ * This function shows the sort button. Isn't this a good comment?
+ *
+ * @param array $aMailbox
+ * @param integer $Down
+ * @param integer $Up
+ */
 function ShowSortButton($aMailbox, $Down, $Up ) {
     global $PHP_SELF;
 
@@ -1412,10 +1431,10 @@ function ShowSortButton($aMailbox, $Down, $Up ) {
 }
 
 /**
-* FIXME: Undocumented function
-*
-* @param array $aMailbox
-*/
+ * FIXME: Undocumented function
+ *
+ * @param array $aMailbox
+ */
 function get_selectall_link($aMailbox) {
     global $checkall, $javascript_on;
     global $PHP_SELF;
@@ -1442,22 +1461,50 @@ function get_selectall_link($aMailbox) {
 //                . <a href="javascript:void(0)" onClick="' . $func_name . '();">' . _("Toggle All")
 //                . "</a>\n";
     } else {
+        $result .= "<a href=\"$PHP_SELF";
+        // FIXME: why strpos() is used to detect presense of the symbol in the string.
+        // Function returns boolean value only when symbol is not found
         if (strpos($PHP_SELF, "?")) {
-            $result .= "<a href=\"$PHP_SELF&amp;mailbox=" . urlencode($aMailbox['NAME'])
-                    .  "&amp;startMessage=$aMailbox[PAGEOFFSET]&amp;srt=$aMailbox[SORT]&amp;checkall=";
+            $prefix = '&amp;';
         } else {
-            $result .= "<a href=\"$PHP_SELF?mailbox=" . urlencode($mailbox)
-                    .  "&amp;startMessage=$aMailbox[PAGEOFFSET]&amp;srt=$aMailbox[SORT]&amp;checkall=";
+            $prefix = '?';
+        }
+
+        // If variables are part of GET request, they are present in $PHP_SELF
+        // maybe other functions can be used instead of sqgetGlobalVar (like preg_match)
+        if (! sqgetGlobalVar('mailbox',$tmp,SQ_GET)) {
+            $result .= $prefix . 'mailbox=' . urlencode($aMailbox['NAME']);
+            $prefix = '&amp;';
+        }
+        if (! sqgetGlobalVar('startMessage',$tmp,SQ_GET)) {
+            $result .= $prefix . 'startMessage=' . $aMailbox['PAGEOFFSET'];
+            $prefix = '&amp;';
+        }
+        if (! sqgetGlobalVar('str',$tmp,SQ_GET)) {
+            $result .= $prefix . 'str=' . $aMailbox['SORT'];
+            $prefix = '&amp;';
         }
+
         if (isset($checkall) && $checkall == '1') {
-            $result .= '0';
+            $checkall_val = '0';
+        } else {
+            $checkall_val = '1';
+        }
+        if (! sqgetGlobalVar('checkall',$tmp,SQ_GET) ) {
+            $result .= $prefix . 'checkall=' . $checkall_val;
+            $prefix = '&amp;';
         } else {
-            $result .= '1';
+            // checkall is already present in php_self. replace it
+            $result = preg_replace("/checkall=(\d)/","checkall=$checkall_val",$result);
         }
 
-        if (isset($aMailbox['SEARCH']) && $aMailbox['SEARCH'][0]) {
-            $result .= '&amp;where=' . urlencode($aMailbox['SEARCH'][0])
-                    .  '&amp;what=' .  urlencode($aMailbox['SEARCH'][1]);
+        // FIXME: I suspect that search pages use different variables in 1.5.1cvs
+        // and these variables are present in $PHP_SELF.
+        if (isset($aMailbox['SEARCH']) && isset($aMailbox['SEARCH'][0]) && ! sqgetGlobalVar('where',$tmp,SQ_GET)) {
+            $result .= '&amp;where=' . urlencode($aMailbox['SEARCH'][0]);
+            if (isset($aMailbox['SEARCH'][1]) && ! sqgetGlobalVar('what',$tmp,SQ_GET)) {
+                $result .= '&amp;what=' .  urlencode($aMailbox['SEARCH'][1]);
+            }
         }
         $result .= "\">";
         $result .= _("All");
@@ -1469,13 +1516,13 @@ function get_selectall_link($aMailbox) {
 }
 
 /**
-* This function computes the "Viewing Messages..." string.
-*
-* @param integer $start_msg first message number
-* @param integer $end_msg last message number
-* @param integer $num_msgs total number of message in folder
-* @return string
-*/
+ * This function computes the "Viewing Messages..." string.
+ *
+ * @param integer $start_msg first message number
+ * @param integer $end_msg last message number
+ * @param integer $num_msgs total number of message in folder
+ * @return string
+ */
 function get_msgcnt_str($start_msg, $end_msg, $num_msgs) {
     /* Compute the $msg_cnt_str. */
     $result = '';
@@ -1492,14 +1539,14 @@ function get_msgcnt_str($start_msg, $end_msg, $num_msgs) {
 }
 
 /**
-* Generate a paginator link.
-*
-* @param mixed $box Mailbox name
-* @param mixed $start_msg Message Offset
-* @param mixed $use
-* @param string $text text used for paginator link
-* @return string
-*/
+ * Generate a paginator link.
+ *
+ * @param mixed $box Mailbox name
+ * @param mixed $start_msg Message Offset
+ * @param mixed $use
+ * @param string $text text used for paginator link
+ * @return string
+ */
 function get_paginator_link($box, $start_msg, $text) {
     sqgetGlobalVar('PHP_SELF',$php_self,SQ_SERVER);
     $result = "<a href=\"$php_self?startMessage=$start_msg&amp;mailbox=$box\" "
@@ -1509,17 +1556,19 @@ function get_paginator_link($box, $start_msg, $text) {
 }
 
 /**
-* This function computes the paginator string.
-*
-* @param string  $box      mailbox name
-* @param integer $iOffset  offset in total number of messages
-* @param integer $iTotal   total number of messages
-* @param integer $iLimit   maximum number of messages to show on a page
-* @param bool    $bShowAll show all messages at once (non paginate mode)
-* @return string $result   paginate string with links to pages
-*/
+ * This function computes the paginator string.
+ *
+ * @param string  $box      mailbox name
+ * @param integer $iOffset  offset in total number of messages
+ * @param integer $iTotal   total number of messages
+ * @param integer $iLimit   maximum number of messages to show on a page
+ * @param bool    $bShowAll show all messages at once (non paginate mode)
+ * @return string $result   paginate string with links to pages
+ */
 function get_paginator_str($box, $iOffset, $iTotal, $iLimit, $bShowAll) {
-    global $username, $data_dir;
+    global $username, $data_dir, $javascript_on;
+    // page selector globals
+    global $page_selector, $page_selector_max, $compact_paginator;
     sqgetGlobalVar('PHP_SELF',$php_self,SQ_SERVER);
 
     /* Initialize paginator string chunks. */
@@ -1534,10 +1583,6 @@ function get_paginator_str($box, $iOffset, $iTotal, $iLimit, $bShowAll) {
     $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. */
     $iOffset = min($iOffset, $iTotal);
 
@@ -1547,130 +1592,147 @@ function get_paginator_str($box, $iOffset, $iTotal, $iLimit, $bShowAll) {
 
     if (!$bShowAll) {
         /* Compute the basic previous and next strings. */
-        if (($next_grp <= $iTotal) && ($prev_grp >= 0)) {
-            $prv_str = get_paginator_link($box, $prev_grp, _("Previous"));
-            $nxt_str = get_paginator_link($box, $next_grp, _("Next"));
-        } else if (($next_grp > $iTotal) && ($prev_grp >= 0)) {
-            $prv_str = get_paginator_link($box, $prev_grp, _("Previous"));
-            $nxt_str = _("Next");
-        } else if (($next_grp <= $iTotal) && ($prev_grp < 0)) {
-            $prv_str = _("Previous");
-            $nxt_str = get_paginator_link($box, $next_grp, _("Next"));
+        if ($compact_paginator) {
+            if (($next_grp <= $iTotal) && ($prev_grp >= 0)) {
+                $prv_str = get_paginator_link($box, $prev_grp, '<');
+                $nxt_str = get_paginator_link($box, $next_grp, '>');
+            } else if (($next_grp > $iTotal) && ($prev_grp >= 0)) {
+                $prv_str = get_paginator_link($box, $prev_grp, '<');
+                $nxt_str = '>';
+            } else if (($next_grp <= $iTotal) && ($prev_grp < 0)) {
+                $prv_str = '<';
+                $nxt_str = get_paginator_link($box, $next_grp, '>');
+            }
+        } else {
+            if (($next_grp <= $iTotal) && ($prev_grp >= 0)) {
+                $prv_str = get_paginator_link($box, $prev_grp, _("Previous"));
+                $nxt_str = get_paginator_link($box, $next_grp, _("Next"));
+            } else if (($next_grp > $iTotal) && ($prev_grp >= 0)) {
+                $prv_str = get_paginator_link($box, $prev_grp, _("Previous"));
+                $nxt_str = _("Next");
+            } else if (($next_grp <= $iTotal) && ($prev_grp < 0)) {
+                $prv_str = _("Previous");
+                $nxt_str = get_paginator_link($box, $next_grp, _("Next"));
+            }
         }
 
         /* Page selector block. Following code computes page links. */
-        if ($iLimit != 0 && $pg_sel && ($iTotal > $iLimit)) {
+        if ($iLimit != 0 && $page_selector && ($iTotal > $iLimit)) {
             /* Most importantly, what is the current page!!! */
             $cur_pg = intval($iOffset / $iLimit) + 1;
 
             /* Compute total # of pages and # of paginator page links. */
             $tot_pgs = ceil($iTotal / $iLimit);  /* 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 (!$compact_paginator) {
+                $vis_pgs = min($page_selector_max, $tot_pgs - 1);   /* Visible Pages    */
 
-            /* 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;
+                /* Compute the size of the four quarters of the page links. */
 
-            /* 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;
+                /* If we can, just show all the pages. */
+                if (($tot_pgs - 1) <= $page_selector_max) {
                     $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) * 3/4);
-                    $q2_pgs = ceil(($cur_pg - $q1_pgs - 1) * 3/4);
-                    $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;
+                    $q2_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) * 3/4);
-                    $q3_pgs = ceil(($tot_pgs - $cur_pg - $q4_pgs) * 3/4);
-                    $q1_pgs += floor($extra_pgs / 2);
-                    $q2_pgs += ceil($extra_pgs / 2);
+
+                /* 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) * 3/4);
+                        $q2_pgs = ceil(($cur_pg - $q1_pgs - 1) * 3/4);
+                        $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) * 3/4);
+                        $q3_pgs = ceil(($tot_pgs - $cur_pg - $q4_pgs) * 3/4);
+                        $q1_pgs += floor($extra_pgs / 2);
+                        $q2_pgs += ceil($extra_pgs / 2);
+                    }
                 }
-            }
 
-            /*
-            * 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 />';
-            */
+                /*
+                * 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. */
+                /* 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 {
-                for ($pg = 1; $pg <= $q1_pgs; ++$pg) {
-                    $start = (($pg-1) * $iLimit) + 1;
-                    $pg_str .= get_paginator_link($box, $start, $pg) . $spc;
-                }
-                if ($cur_pg - $q2_pgs - $q1_pgs > 1) {
+                /* Start with the first quarter. */
+                if (($q1_pgs == 0) && ($cur_pg > 1)) {
                     $pg_str .= "...$spc";
+                } else {
+                    for ($pg = 1; $pg <= $q1_pgs; ++$pg) {
+                        $start = (($pg-1) * $iLimit) + 1;
+                        $pg_str .= get_paginator_link($box, $start, $pg) . $spc;
+                    }
+                    if ($cur_pg - $q2_pgs - $q1_pgs > 1) {
+                        $pg_str .= "...$spc";
+                    }
                 }
-            }
 
-            /* Continue with the second quarter. */
-            for ($pg = $cur_pg - $q2_pgs; $pg < $cur_pg; ++$pg) {
-                $start = (($pg-1) * $iLimit) + 1;
-                $pg_str .= get_paginator_link($box, $start, $pg) . $spc;
-            }
+                /* Continue with the second quarter. */
+                for ($pg = $cur_pg - $q2_pgs; $pg < $cur_pg; ++$pg) {
+                    $start = (($pg-1) * $iLimit) + 1;
+                    $pg_str .= get_paginator_link($box, $start, $pg) . $spc;
+                }
 
-            /* Now print the current page. */
-            $pg_str .= $cur_pg . $spc;
+                /* 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) * $iLimit) + 1;
-                $pg_str .= get_paginator_link($box, $start, $pg) . $spc;
-            }
+                /* Next comes the third quarter. */
+                for ($pg = $cur_pg + 1; $pg <= $cur_pg + $q3_pgs; ++$pg) {
+                    $start = (($pg-1) * $iLimit) + 1;
+                    $pg_str .= get_paginator_link($box, $start, $pg) . $spc;
+                }
 
-            /* 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)) {
+                /* And last, print the forth quarter page links. */
+                if (($q4_pgs == 0) && ($cur_pg < $tot_pgs)) {
                     $pg_str .= "...$spc";
-                }
-                for ($pg = $tot_pgs - $q4_pgs + 1; $pg <= $tot_pgs; ++$pg) {
-                    $start = (($pg-1) * $iLimit) + 1;
-                    $pg_str .= get_paginator_link($box, $start,$pg) . $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) * $iLimit) + 1;
+                        $pg_str .= get_paginator_link($box, $start,$pg) . $spc;
+                    }
                 }
             }
+        $last_grp = (($tot_pgs - 1) * $iLimit) + 1;
         }
     } else {
         $pg_str = "<a href=\"$php_self?showall=0"
@@ -1680,9 +1742,9 @@ function get_paginator_str($box, $iOffset, $iTotal, $iLimit, $bShowAll) {
 
     /* 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. ;)
-    */
+     * 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 = '';
     if ( $prv_str || $nxt_str ) {
 
@@ -1690,28 +1752,69 @@ function get_paginator_str($box, $iOffset, $iTotal, $iLimit, $bShowAll) {
         $all_str = "<a href=\"$php_self?showall=1"
                 . "&amp;startMessage=1&amp;mailbox=$box\" "
                 . ">" . _("Show All") . '</a>';
-        $result .= '[';
-        $result .= ($prv_str != '' ? $prv_str . $spc . $sep . $spc : '');
-        $result .= ($nxt_str != '' ? $nxt_str : '');
-        $result .= ']' . $spc ;
-
     }
 
-    $result .= ($pg_str  != '' ? $spc . '['.$spc.$pg_str.']' .  $spc : '');
-    $result .= ($all_str != '' ? $spc . '['.$all_str.']' . $spc . $spc : '');
+    if ($compact_paginator) {
+        if ( $prv_str || $nxt_str ) {
+            $result .= '[' . get_paginator_link($box, 1, '<<') . ']';
+            $result .= '[' . $prv_str . ']';
+
+            $pg_url = $php_self . '?mailbox=' . $box;
+
+            $result .= '[' . $nxt_str . ']';
+            $result .= '[' . get_paginator_link($box, $last_grp, '>>') . ']';
+
+            if ($page_selector) {
+                $result .= $spc . '<select name="startMessage"';
+                if ($javascript_on) {
+                    $result .= ' onchange="JavaScript:SubmitOnSelect'
+                        . '(this, \'' . $pg_url . '&startMessage=\')"';
+                }
+                $result .='>';
+
+                for ($p = 0; $p < $tot_pgs; $p++) {
+                    $result .= '<option ';
+                    if (($p+1) == $cur_pg) $result .= 'selected ';
+                        $result .= 'value="' . (($p*$iLimit)+1) . '">'
+                         . ($p+1) . "/$tot_pgs" . '</option>';
+                }
+
+                $result .= '</select>';
+
+                if ($javascript_on) {
+                    $result .= '<noscript language="JavaScript">'
+                    . addSubmit(_("Go"))
+                    . '</noscript>';
+                } else {
+                    $result .= addSubmit(_("Go"));
+                }
+            }
+        }
 
+        $result .= ($pg_str  != '' ? '['.$pg_str.']' .  $spc : '');
+        $result .= ($all_str != '' ? $spc . '['.$all_str.']' . $spc . $spc : '');
+    } else {
+        if ( $prv_str || $nxt_str ) {
+            $result .= '[';
+            $result .= ($prv_str != '' ? $prv_str . $spc . $sep . $spc : '');
+            $result .= ($nxt_str != '' ? $nxt_str : '');
+            $result .= ']' . $spc ;
+        }
+
+        $result .= ($pg_str  != '' ? $spc . '['.$spc.$pg_str.']' .  $spc : '');
+        $result .= ($all_str != '' ? $spc . '['.$all_str.']' . $spc . $spc : '');
+    }
     /* If the resulting string is blank, return a non-breaking space. */
     if ($result == '') {
         $result = '&nbsp;';
     }
-
     /* Return our final magical paginator string. */
     return ($result);
 }
 
 /**
-* FIXME: Undocumented function
-*/
+ * FIXME: Undocumented function
+ */
 function truncateWithEntities($subject, $trim_at)
 {
     $ent_strlen = strlen($subject);
@@ -1721,11 +1824,11 @@ function truncateWithEntities($subject, $trim_at)
     global $languages, $squirrelmail_language;
 
     /*
-    * 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 $trim_at, substr with an updated trim value.
-    */
+     * 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 $trim_at, substr with an updated trim value.
+     */
     $trim_val = $trim_at;
     $ent_offset = 0;
     $ent_loc = 0;
@@ -1753,8 +1856,8 @@ function truncateWithEntities($subject, $trim_at)
 }
 
 /**
-* FIXME: Undocumented function
-*/
+ * FIXME: Undocumented function
+ */
 function processSubject($subject, $threadlevel = 0) {
     /* Shouldn't ever happen -- caught too many times in the IMAP functions */
     if ($subject == '') {
@@ -1773,15 +1876,15 @@ function processSubject($subject, $threadlevel = 0) {
 
 
 /**
-* Creates button
-*
-* @deprecated see form functions available in 1.5.1 and 1.4.3.
-* @param string $type
-* @param string $name
-* @param string $value
-* @param string $js
-* @param bool $enabled
-*/
+ * Creates button
+ *
+ * @deprecated see form functions available in 1.5.1 and 1.4.3.
+ * @param string $type
+ * @param string $name
+ * @param string $value
+ * @param string $js
+ * @param bool $enabled
+ */
 function getButton($type, $name, $value, $js = '', $enabled = TRUE) {
     $disabled = ( $enabled ? '' : 'disabled ' );
     $js = ( $js ? $js.' ' : '' );
@@ -1793,11 +1896,11 @@ function getButton($type, $name, $value, $js = '', $enabled = TRUE) {
 }
 
 /**
-* Puts string into cell, aligns it and adds <small> tag
-*
-* @param string $string string
-* @param string $align alignment
-*/
+ * Puts string into cell, aligns it and adds <small> tag
+ *
+ * @param string $string string
+ * @param string $align alignment
+ */
 function getSmallStringCell($string, $align) {
     return html_tag('td',
                     '<small>' . $string . ':&nbsp; </small>',
@@ -1807,9 +1910,9 @@ function getSmallStringCell($string, $align) {
 }
 
 /**
-* This should go in imap_mailbox.php
-* @param string $mailbox
-*/
+ * This should go in imap_mailbox.php
+ * @param string $mailbox
+ */
 function handleAsSent($mailbox) {
     global $handleAsSent_result;
 
@@ -1961,9 +2064,10 @@ function handleMessageListForm($imapConnection,&$aMailbox,$sButton='',$aUid = ar
                     $aMailbox['EXISTS'] -= (int) $iExpungedMessages;
                 }
                 // Change the startMessage number if the mailbox was changed
-                if (($aMailbox['PAGEOFFSET']+$iExpungedMessages-1) >= $aMailbox['EXISTS']) {
+                if (($aMailbox['PAGEOFFSET']-1) >= $aMailbox['EXISTS']) {
                     $aMailbox['PAGEOFFSET'] = ($aMailbox['PAGEOFFSET'] > $aMailbox['LIMIT']) ?
                         $aMailbox['PAGEOFFSET'] - $aMailbox['LIMIT'] : 1;
+                    $aMailbox['OFFSET'] = $aMailbox['PAGEOFFSET'] - 1 ;
                 }
             }
         }