Source for file mailbox_display.php

Documentation is available at mailbox_display.php

  1. <?php
  2.  
  3. /**
  4.  * mailbox_display.php
  5.  *
  6.  * This contains functions that display mailbox information, such as the
  7.  * table row that has sender, date, subject, etc...
  8.  *
  9.  * @copyright 1999-2015 The SquirrelMail Project Team
  10.  * @license http://opensource.org/licenses/gpl-license.php GNU Public License
  11.  * @version $Id: mailbox_display.php 14515 2015-08-01 02:34:57Z pdontthink $
  12.  * @package squirrelmail
  13.  */
  14.  
  15.  
  16. /**
  17.  * Selects a mailbox for header retrieval.
  18.  * Cache control for message headers is embedded.
  19.  *
  20.  * @param resource $imapConnection imap socket handle
  21.  * @param string   $mailbox mailbox to select and retrieve message headers from
  22.  * @param array    $aConfig array with system config settings and incoming vars
  23.  * @param array    $aProps mailbox specific properties
  24.  *
  25.  * @return array   $aMailbox mailbox array with all relevant information
  26.  *
  27.  * @since 1.5.1
  28.  * @author Marc Groot Koerkamp
  29.  */
  30. function sqm_api_mailbox_select($imapConnection,$account,$mailbox,$aConfig,$aProps{
  31.  
  32.     /**
  33.      * NB: retrieve this from the session before accessing this function
  34.      * and make sure you write it back at the end of the script after
  35.      * the aMailbox var is added so that the headers are added to the cache
  36.      */
  37.     global $mailbox_cache;
  38.  
  39.     $aDefaultConfigProps array(
  40. //                'charset'           => 'US-ASCII',
  41.                 'user'              => false/* no pref storage if false */
  42.                 'setindex'          => 0,
  43. //                'search'            => 'ALL',
  44.                 'max_cache_size'    => SQM_MAX_MBX_IN_CACHE
  45.                 );
  46.  
  47.     $aConfig array_merge($aDefaultConfigProps,$aConfig);
  48.  
  49.     $iSetIndx $aConfig['setindex'];
  50.  
  51.     $aMbxResponse sqimap_mailbox_select($imapConnection$mailbox);
  52.  
  53.     if ($mailbox_cache{
  54.         if (isset($mailbox_cache[$account.'_'.$mailbox])) {
  55.             $aCachedMailbox $mailbox_cache[$account.'_'.$mailbox];
  56.         else {
  57.             $aCachedMailbox false;
  58.         }
  59.             /* cleanup cache */
  60.         if (count($mailbox_cache$aConfig['max_cache_size'-1{
  61.             $aTime array();
  62.             foreach($mailbox_cache as $cachedmailbox => $aVal{
  63.                 $aTime[$aVal['TIMESTAMP']] $cachedmailbox;
  64.             }
  65.             if (ksort($aTime,SORT_NUMERIC)) {
  66.                 for ($i=0,$iCnt=count($mailbox_cache);$i<($iCnt-$aConfig['max_cache_size']);++$i{
  67.                     $sOldestMbx array_shift($aTime);
  68.                     /**
  69.                      * Remove only the UIDSET and MSG_HEADERS from cache because those can
  70.                      * contain large amounts of data.
  71.                      */
  72.                     if (isset($mailbox_cache[$sOldestMbx]['UIDSET'])) {
  73.                         $mailbox_cache[$sOldestMbx]['UIDSET']false;
  74.                     }
  75.                     if (isset($mailbox_cache[$sOldestMbx]['MSG_HEADERS'])) {
  76.                         $mailbox_cache[$sOldestMbx]['MSG_HEADERS'false;
  77.                     }
  78.                 }
  79.             }
  80.         }
  81.  
  82.     else {
  83.         $aCachedMailbox false;
  84.     }
  85.  
  86.     /**
  87.      * Deal with imap servers that do not return the required UIDNEXT or
  88.      * UIDVALIDITY response
  89.      * from a SELECT call (since rfc 3501 it's required).
  90.      */
  91.     if (!isset($aMbxResponse['UIDNEXT']|| !isset($aMbxResponse['UIDVALIDITY'])) {
  92.         $aStatus sqimap_status_messages($imapConnection,$mailbox,
  93.                                         array('UIDNEXT','UIDVALIDITY'));
  94.         $aMbxResponse['UIDNEXT'$aStatus['UIDNEXT'];
  95.         $aMbxResponse['UIDVALIDTY'$aStatus['UIDVALIDITY'];
  96.     }
  97.  
  98.     $aMailbox['ACCOUNT'$account;
  99.     $aMailbox['UIDSET'][$iSetIndxfalse;
  100.     $aMailbox['ID'false;
  101.     $aMailbox['SETINDEX'$iSetIndx;
  102.     $aMailbox['MSG_HEADERS'false;
  103.  
  104.     if ($aCachedMailbox{
  105.         /**
  106.          * Validate integrity of cached data
  107.          */
  108.         if ($aCachedMailbox['EXISTS'== $aMbxResponse['EXISTS'&&
  109.             $aMbxResponse['EXISTS'&&
  110.             $aCachedMailbox['UIDVALIDITY'== $aMbxResponse['UIDVALIDITY'&&
  111.             $aCachedMailbox['UIDNEXT']  == $aMbxResponse['UIDNEXT'&&
  112.             isset($aCachedMailbox['SEARCH'][$iSetIndx]&&
  113.             (!isset($aConfig['search']|| /* always set search from the searchpage */
  114.              $aCachedMailbox['SEARCH'][$iSetIndx== $aConfig['search'])) {
  115.             if (isset($aCachedMailbox['MSG_HEADERS'])) {
  116.                 $aMailbox['MSG_HEADERS'$aCachedMailbox['MSG_HEADERS'];
  117.             }
  118.             $aMailbox['ID'=  $aCachedMailbox['ID'];
  119.             if (isset($aCachedMailbox['UIDSET'][$iSetIndx]&& $aCachedMailbox['UIDSET'][$iSetIndx]{
  120.                 if (isset($aProps[MBX_PREF_SORT]&&  $aProps[MBX_PREF_SORT!= $aCachedMailbox['SORT'{
  121.                     $newsort $aProps[MBX_PREF_SORT];
  122.                     $oldsort $aCachedMailbox['SORT'];
  123.                     /**
  124.                      * If it concerns a reverse sort we do not need to invalidate
  125.                      * the cached sorted UIDSET, a reverse is sufficient.
  126.                      */
  127.                     if ((($newsort 2&& ($newsort == $oldsort)) ||
  128.                         (!($newsort 2&& ($newsort == $oldsort))) {
  129.                         $aMailbox['UIDSET'][$iSetIndxarray_reverse($aCachedMailbox['UIDSET'][$iSetIndx]);
  130.                     else {
  131.                         $server_sort_array false;
  132.                         $aMailbox['MSG_HEADERS'false;
  133.                         $aMailbox['ID'false;
  134.                     }
  135.                     // store the new sort value in the mailbox pref
  136.                     if ($aConfig['user']{
  137.                         // FIXME, in ideal situation, we write back the
  138.                         // prefs at the end of the script
  139.                         setUserPref($aConfig['user'],'pref_'.$account.'_'.$mailbox,serialize($aProps));
  140.                     }
  141.                 else {
  142.                     $aMailbox['UIDSET'][$iSetIndx$aCachedMailbox['UIDSET'][$iSetIndx];
  143.                 }
  144.             }
  145.         }
  146.     }
  147.     /**
  148.      * Restore the offset in the paginator if no new offset is provided.
  149.      */
  150.     if (isset($aMailbox['UIDSET'][$iSetIndx]&& !isset($aConfig['offset']&& $aCachedMailbox['OFFSET']{
  151.         $aMailbox['OFFSET'=  $aCachedMailbox['OFFSET'];
  152.         $aMailbox['PAGEOFFSET'=  $aCachedMailbox['PAGEOFFSET'];
  153.     else {
  154.         $aMailbox['OFFSET'(isset($aConfig['offset']&& $aConfig['offset']$aConfig['offset'-0;
  155.         $aMailbox['PAGEOFFSET'(isset($aConfig['offset']&& $aConfig['offset']$aConfig['offset'1;
  156.     }
  157.     /**
  158.      * Restore the number of messages in the result set
  159.      */
  160.     if (isset($aCachedMailbox['TOTAL'][$iSetIndx]&& $aCachedMailbox['TOTAL'][$iSetIndx]{
  161.         $aMailbox['TOTAL'][$iSetIndx=  $aCachedMailbox['TOTAL'][$iSetIndx];
  162.     }
  163.  
  164.     /**
  165.      * Restore the showall value no new showall value is provided.
  166.      */
  167.     if (isset($aMailbox['UIDSET'][$iSetIndx]&& !isset($aConfig['showall']&&
  168.         isset($aCachedMailbox['SHOWALL'][$iSetIndx]&& $aCachedMailbox['SHOWALL'][$iSetIndx]{
  169.         $aMailbox['SHOWALL'][$iSetIndx=  $aCachedMailbox['SHOWALL'][$iSetIndx];
  170.     else {
  171.         $aMailbox['SHOWALL'][$iSetIndx(isset($aConfig['showall']&& $aConfig['showall']0;
  172.     }
  173.  
  174.     /**
  175.      * Restore the sort order if no new sort order is provided.
  176.      */
  177.     if (!isset($aProps[MBX_PREF_SORT]&& isset($aCachedMailbox['SORT'])) {
  178.         $aMailbox['SORT'$aCachedMailbox['SORT'];
  179.     else {
  180.         $aMailbox['SORT'=  (isset($aProps[MBX_PREF_SORT])) $aProps[MBX_PREF_SORT0;
  181.     }
  182.  
  183.     /**
  184.      * Restore the number of message to show per page when no new limit is provided
  185.      */
  186.     if (!isset($aProps[MBX_PREF_LIMIT]&& isset($aCachedMailbox['LIMIT'])) {
  187.         $aMailbox['LIMIT'$aCachedMailbox['LIMIT'];
  188.     else {
  189.         $aMailbox['LIMIT'=  (isset($aProps[MBX_PREF_LIMIT])) $aProps[MBX_PREF_LIMIT15;
  190.     }
  191.  
  192.     /**
  193.      * Restore the ordered columns to show when no new ordered columns are provided
  194.      */
  195.     if (!isset($aProps[MBX_PREF_COLUMNS]&& isset($aCachedMailbox['COLUMNS'])) {
  196.         $aMailbox['COLUMNS'$aCachedMailbox['COLUMNS'];
  197.     else {
  198.         $aMailbox['COLUMNS'=  (isset($aProps[MBX_PREF_COLUMNS])) $aProps[MBX_PREF_COLUMNS:
  199.             array(SQM_COL_FLAGS,SQM_COL_FROMSQM_COL_SUBJSQM_COL_FLAGS);
  200.     }
  201.  
  202.     /**
  203.      * Restore the headers we fetch the last time. Saves intitialisation stuff in read_body.
  204.      */
  205.     $aMailbox['FETCHHEADERS'(isset($aCachedMailbox['FETCHHEADERS'])) $aCachedMailbox['FETCHHEADERS'null;
  206.  
  207.     if (!isset($aProps[MBX_PREF_AUTO_EXPUNGE]&& isset($aCachedMailbox['AUTO_EXPUNGE'])) {
  208.         $aMailbox['AUTO_EXPUNGE'$aCachedMailbox['AUTO_EXPUNGE'];
  209.     else {
  210.         $aMailbox['AUTO_EXPUNGE'=  (isset($aProps[MBX_PREF_AUTO_EXPUNGE])) $aProps[MBX_PREF_AUTO_EXPUNGEfalse;
  211.     }
  212.     if (!isset($aConfig['search']&& isset($aCachedMailbox['SEARCH'][$iSetIndx])) {
  213.         $aMailbox['SEARCH'][$iSetIndx$aCachedMailbox['SEARCH'][$iSetIndx];
  214.     else if (isset($aConfig['search']&& isset($aCachedMailbox['SEARCH'][$iSetIndx]&&
  215.         $aConfig['search'!= $aCachedMailbox['SEARCH'][$iSetIndx]{
  216.         // reset the pageindex
  217.         $aMailbox['SEARCH'][$iSetIndx$aConfig['search'];
  218.         $aMailbox['OFFSET'0;
  219.         $aMailbox['PAGEOFFSET'1;
  220.     else {
  221.         $aMailbox['SEARCH'][$iSetIndx=  (isset($aConfig['search'])) $aConfig['search''ALL';
  222.     }
  223.     if (!isset($aConfig['charset']&& isset($aCachedMailbox['CHARSET'][$iSetIndx])) {
  224.         $aMailbox['CHARSET'][$iSetIndx$aCachedMailbox['CHARSET'][$iSetIndx];
  225.     else {
  226.         $aMailbox['CHARSET'][$iSetIndx=  (isset($aConfig['charset'])) $aConfig['charset''US-ASCII';
  227.     }
  228.  
  229.     $aMailbox['NAME'$mailbox;
  230.     $aMailbox['EXISTS'$aMbxResponse['EXISTS'];
  231.     $aMailbox['SEEN'(isset($aMbxResponse['SEEN'])) $aMbxResponse['SEEN'$aMbxResponse['EXISTS'];
  232.     $aMailbox['RECENT'(isset($aMbxResponse['RECENT'])) $aMbxResponse['RECENT'0;
  233.     $aMailbox['UIDVALIDITY'$aMbxResponse['UIDVALIDITY'];
  234.     $aMailbox['UIDNEXT'$aMbxResponse['UIDNEXT'];
  235.     $aMailbox['PERMANENTFLAGS'$aMbxResponse['PERMANENTFLAGS'];
  236.     $aMailbox['RIGHTS'$aMbxResponse['RIGHTS'];
  237.  
  238.     /* decide if we are thread sorting or not */
  239.     if ($aMailbox['SORT'SQSORT_THREAD{
  240.         if (!sqimap_capability($imapConnection,'THREAD')) {
  241.             $aMailbox['SORT'^= SQSORT_THREAD;
  242.         else {
  243.             $aMailbox['THREAD_INDENT'$aCachedMailbox['THREAD_INDENT'];
  244.         }
  245.     else {
  246.         $aMailbox['THREAD_INDENT'false;
  247.     }
  248.  
  249.     /* set a timestamp for cachecontrol */
  250.     $aMailbox['TIMESTAMP'time();
  251.     return $aMailbox;
  252. }
  253.  
  254. /**
  255.  * Fetch the message headers for a mailbox. Settings are part of the aMailbox
  256.  * array. Dependent of the mailbox settings it deals with sort, thread and search
  257.  * If server sort is supported then SORT is also used for retrieving sorted search results
  258.  *
  259.  * @param resource $imapConnection imap socket handle
  260.  * @param array    $aMailbox (reference) mailbox retrieved from sqm_api_mailbox_select
  261.  * @return error   $error error number
  262.  * @since 1.5.1
  263.  * @author Marc Groot Koerkamp
  264.  */
  265. function fetchMessageHeaders($imapConnection&$aMailbox{
  266.  
  267.     /* FIX ME, this function is kind of big, maybe we can split it up in
  268.        a couple of functions. Make sure the functions are private and starts with _
  269.        Also make sure that the error codes are propagated */
  270.  
  271.     /**
  272.      * Retrieve the UIDSET.
  273.      * Setindex is used to be able to store multiple uid sets. That will make it
  274.      * possible to display the mailbox multiple times in different sort order
  275.      * or to store serach results separate from normal mailbox view.
  276.      */
  277.     $iSetIndx =  (isset($aMailbox['SETINDEX'])) $aMailbox['SETINDEX'0;
  278.  
  279.     $iLimit ($aMailbox['SHOWALL'][$iSetIndx]$aMailbox['EXISTS'$aMailbox['LIMIT'];
  280.     /**
  281.      * Adjust the start_msg
  282.      */
  283.     $start_msg $aMailbox['PAGEOFFSET'];
  284.     if($aMailbox['PAGEOFFSET'$aMailbox['EXISTS']{
  285.         $start_msg -= $aMailbox['LIMIT'];
  286.         if($start_msg 1{
  287.             $start_msg 1;
  288.         }
  289.     }
  290.  
  291.     if (is_array($aMailbox['UIDSET'])) {
  292.         $aUid =$aMailbox['UIDSET'][$iSetIndx];
  293.     else {
  294.         $aUid false;
  295.     }
  296.     $aFetchHeaders $aMailbox['FETCHHEADERS'];
  297.  
  298.     $iError 0;
  299.     $aFetchItems $aHeaderItems array();
  300.     // initialize the fields we want to retrieve:
  301.     $aHeaderFields array();
  302.     foreach ($aFetchHeaders as $v{
  303.       switch ($v{
  304.         case SQM_COL_DATE:       $aHeaderFields['Date';         break;
  305.         case SQM_COL_TO:         $aHeaderFields['To';           break;
  306.         case SQM_COL_CC:         $aHeaderFields['Cc';           break;
  307.         case SQM_COL_FROM:       $aHeaderFields['From';         break;
  308.         case SQM_COL_SUBJ:       $aHeaderFields['Subject';      break;
  309.         case SQM_COL_PRIO:       $aHeaderFields['X-Priority';   break;
  310.         case SQM_COL_ATTACHMENT$aHeaderFields['Content-Type'break;
  311.         case SQM_COL_INT_DATE:   $aFetchItems[]   'INTERNALDATE'break;
  312.         case SQM_COL_FLAGS:      $aFetchItems[]   'FLAGS';        break;
  313.         case SQM_COL_SIZE:       $aFetchItems[]   'RFC822.SIZE';  break;
  314.         defaultbreak;
  315.       }
  316.     }
  317.  
  318.     /**
  319.      * A uidset with sorted uid's is available. We can use the cache
  320.      */
  321.     if (isset($aUid&& $aUid {
  322.         // limit the cache to SQM_MAX_PAGES_IN_CACHE
  323.         if (!$aMailbox['SHOWALL'][$iSetIndx&& isset($aMailbox['MSG_HEADERS'])) {
  324.             $iMaxMsgs $iLimit SQM_MAX_PAGES_IN_CACHE;
  325.             $iCacheSize count($aMailbox['MSG_HEADERS']);
  326.             if ($iCacheSize $iMaxMsgs{
  327.                 $iReduce $iCacheSize $iMaxMsgs;
  328.                 foreach ($aMailbox['MSG_HEADERS'as $iUid => $value{
  329.                     if ($iReduce{
  330.                         unset($aMailbox['MSG_HEADERS'][$iUid]);
  331.                     else {
  332.                         break;
  333.                     }
  334.                     --$iReduce;
  335.                 }
  336.             }
  337.         }
  338.  
  339.         $id_slice array_slice($aUid,$start_msg-1,$iLimit);
  340.         /* do some funky cache checks */
  341.         if (isset($aMailbox['MSG_HEADERS']&& is_array($aMailbox['MSG_HEADERS'])) {
  342.             // temp code, read_body del / next links fo not update fields.
  343.             foreach ($aMailbox['MSG_HEADERS'as $iUid => $aValue{
  344.                 if (!isset($aValue['UID'])) {
  345.                     unset($aMailbox['MSG_HEADERS'][$iUid]);
  346.                 }
  347.             }
  348.             $aUidCached array_keys($aMailbox['MSG_HEADERS']);
  349.         else {
  350.             $aMailbox['MSG_HEADERS'array();
  351.             $aUidCached array();
  352.         }
  353.         $aUidNotCached array_values(array_diff($id_slice,$aUidCached));
  354.  
  355.         /**
  356.          * $aUidNotCached contains an array with UID's which need to be fetched to
  357.          * complete the needed message headers.
  358.          */
  359.         if (count($aUidNotCached)) {
  360.             $aMsgs sqimap_get_small_header_list($imapConnection,$aUidNotCached,
  361.                                                     $aHeaderFields,$aFetchItems);
  362.             // append the msgs to the existend headers
  363.             $aMailbox['MSG_HEADERS'+= $aMsgs;
  364.         }
  365.     else {
  366.         /**
  367.          * Initialize the sorted UID list or initiate a UID list with search
  368.          * results and fetch the visible message headers
  369.          */
  370.  
  371.         if ($aMailbox['SEARCH'][$iSetIndx!= 'ALL'// in case of a search request
  372.  
  373.             if ($aMailbox['SEARCH'][$iSetIndx&& $aMailbox['SORT'== 0{
  374.                 $aUid sqimap_run_search($imapConnection$aMailbox['SEARCH'][$iSetIndx]$aMailbox['CHARSET'][$iSetIndx]);
  375.             else {
  376.  
  377.                 $iError 0;
  378.                 $iError _get_sorted_msgs_list($imapConnection,$aMailbox,$iError);
  379.                 $aUid $aMailbox['UIDSET'][$iSetIndx];
  380.             }
  381.             if (!$iError{
  382.                 /**
  383.                  * Number of messages is the resultset
  384.                  */
  385.                 $aMailbox['TOTAL'][$iSetIndxcount($aUid);
  386.                 $id_slice array_slice($aUid,$aMailbox['OFFSET']$iLimit);
  387.                 if (count($id_slice)) {
  388.                     $aMailbox['MSG_HEADERS'sqimap_get_small_header_list($imapConnection,$id_slice,
  389.                         $aHeaderFields,$aFetchItems);
  390.                 else {
  391.                     $iError 1// FIX ME, define an error code
  392.                 }
  393.             }
  394.         else //
  395.             $iError 0;
  396.             $iError _get_sorted_msgs_list($imapConnection,$aMailbox,$iError);
  397.             $aUid $aMailbox['UIDSET'][$iSetIndx];
  398.  
  399.             if (!$iError{
  400.                 /**
  401.                  * Number of messages is the resultset
  402.                  */
  403.                 $aMailbox['TOTAL'][$iSetIndxcount($aUid);
  404.                 $id_slice array_slice($aUid,$aMailbox['OFFSET']$iLimit);
  405.                 if (count($id_slice)) {
  406.                     $aMailbox['MSG_HEADERS'sqimap_get_small_header_list($imapConnection,$id_slice,
  407.                         $aHeaderFields,$aFetchItems);
  408.                 else {
  409.                     $iError 1// FIX ME, define an error code
  410.                 }
  411.             }
  412.         }
  413.     }
  414.     return $iError;
  415. }
  416.  
  417. /**
  418.  * Prepares the message headers for display inside a template. The links are calculated,
  419.  * color for row highlighting is calculated and optionally the strings are truncated.
  420.  *
  421.  * @param array    $aMailbox (reference) mailbox retrieved from sqm_api_mailbox_select
  422.  * @param array    $aProps properties
  423.  * @return array   $aFormattedMessages array with message headers and format info
  424.  * @since 1.5.1
  425.  * @author Marc Groot Koerkamp
  426.  */
  427. function prepareMessageList(&$aMailbox$aProps{
  428.  
  429.     /* Globalize link attributes so plugins can share in modifying them */
  430.     global $link$title$target$onclick$link_extra$preselected;
  431.  
  432.     /* retrieve the properties */
  433.     $my_email_address (isset($aProps['email'])) $aProps['email'false;
  434.     $highlight_list   (isset($aProps['config']['highlight_list'])) $aProps['config']['highlight_list'false;
  435.     $aColumnDesc      (isset($aProps['columns'])) $aProps['columns'false;
  436.     $aExtraColumns    (isset($aProps['extra_columns'])) $aProps['extra_columns'array();
  437.     $iAccount         (isset($aProps['account'])) ? (int) $aProps['account'0;
  438.     $sMailbox         (isset($aProps['mailbox'])) $aProps['mailbox'false;
  439.     $sTargetModule    (isset($aProps['module'])) $aProps['module''read_body';
  440.  
  441.     /*
  442.      * TODO 1, retrieve array with identity email addresses in order to match against to,cc and set a flag
  443.      * $aFormattedMessages[$iUid]['match_identity'] = true
  444.      * The template can show some image if there is a match.
  445.      * TODO 2, makes sure the matching is done fast by doing a strpos call on the returned $value
  446.      */
  447.  
  448.     /**
  449.      * Only retrieve values for displayable columns
  450.      */
  451.     foreach ($aColumnDesc as $k => $v{
  452.         switch ($k{
  453.           case SQM_COL_FROM:       $aCol[SQM_COL_FROM]       'from';         break;
  454.           case SQM_COL_DATE:       $aCol[SQM_COL_DATE]       'date';         break;
  455.           case SQM_COL_SUBJ:       $aCol[SQM_COL_SUBJ]       'subject';      break;
  456.           case SQM_COL_FLAGS:      $aCol[SQM_COL_FLAGS]      'FLAGS';        break;
  457.           case SQM_COL_SIZE:       $aCol[SQM_COL_SIZE]       'SIZE';         break;
  458.           case SQM_COL_PRIO:       $aCol[SQM_COL_PRIO]       'x-priority';   break;
  459.           case SQM_COL_ATTACHMENT$aCol[SQM_COL_ATTACHMENT'content-type'break;
  460.           case SQM_COL_INT_DATE:   $aCol[SQM_COL_INT_DATE]   'INTERNALDATE'break;
  461.           case SQM_COL_TO:         $aCol[SQM_COL_TO]         'to';           break;
  462.           case SQM_COL_CC:         $aCol[SQM_COL_CC]         'cc';           break;
  463.           case SQM_COL_BCC:        $aCol[SQM_COL_BCC]        'bcc';          break;
  464.           defaultbreak;
  465.         }
  466.     }
  467.     $aExtraHighLightColumns array();
  468.     foreach ($aExtraColumns as $v{
  469.         switch ($v{
  470.           case SQM_COL_FROM:       $aExtraHighLightColumns['from';         break;
  471.           case SQM_COL_SUBJ:       $aExtraHighLightColumns['subject';      break;
  472.           case SQM_COL_TO:         $aExtraHighLightColumns['to';           break;
  473.           case SQM_COL_CC:         $aExtraHighLightColumns['cc';           break;
  474.           case SQM_COL_BCC:        $aExtraHighLightColumns['bcc';          break;
  475.           defaultbreak;
  476.         }
  477.     }
  478.     $aFormattedMessages array();
  479.  
  480.  
  481.     $iSetIndx    =  $aMailbox['SETINDEX'];
  482.     $aId         =  $aMailbox['UIDSET'][$iSetIndx];
  483.     $aHeaders    =$aMailbox['MSG_HEADERS']/* use a reference to avoid a copy.
  484.                                                  MSG_HEADERS can contain large amounts of data */
  485.     $iOffset     =  $aMailbox['OFFSET'];
  486.     $sort        =  $aMailbox['SORT'];
  487.     $iPageOffset =  $aMailbox['PAGEOFFSET'];
  488.     $sMailbox    =  $aMailbox['NAME'];
  489.     $sSearch     =  (isset($aMailbox['SEARCH'][$aMailbox['SETINDEX']]&&
  490.                     $aMailbox['SEARCH'][$aMailbox['SETINDEX']] != 'ALL'$aMailbox['SEARCH'][$aMailbox['SETINDEX']] false;
  491.     $aSearch     =  ($sSearcharray('search.php',$aMailbox['SETINDEX']null;
  492.     /* avoid improper usage */
  493.     if ($sMailbox && isset($iAccount&& $sTargetModule{
  494.         $aInitQuery  array("account=$iAccount",'mailbox='.urlencode($sMailbox));
  495.     else {
  496.         $aInitQuery false;
  497.     }
  498.  
  499.     if ($aMailbox['SORT'SQSORT_THREAD{
  500.         $aIndentArray =$aMailbox['THREAD_INDENT'][$aMailbox['SETINDEX']];
  501.         $bThread true;
  502.     else {
  503.         $bThread false;
  504.     }
  505.     /*
  506.      * Retrieve value for checkbox column
  507.      */
  508.     if (!sqgetGlobalVar('checkall',$checkall,SQ_GET)) {
  509.         $checkall false;
  510.     }
  511.  
  512.     /*
  513.      * Loop through and display the info for each message.
  514.      */
  515.     $iEnd ($aMailbox['SHOWALL'][$iSetIndx]$aMailbox['EXISTS'$iOffset $aMailbox['LIMIT'];
  516.     for ($i=$iOffset,$t=0;$i<$iEnd;++$i{
  517.         if (isset($aId[$i])) {
  518.  
  519.             $bHighLight false;
  520.             $value $title $link $target $onclick $link_extra '';
  521.             $aQuery ($aInitQuery !== false$aInitQuery false;
  522.             $aMsg $aHeaders[$aId[$i]];
  523.             if (isset($aSearch&& count($aSearch&& $aQuery{
  524.                 $aQuery["where="$aSearch[0];
  525.                 $aQuery["what=" $aSearch[1];
  526.             }
  527.             $iUid      (isset($aMsg['UID'])) $aMsg['UID'$aId[$i];
  528.             if ($aQuery{
  529.                 $aQuery["passed_id=$aId[$i]";
  530.                 $aQuery["startMessage=$iPageOffset";
  531.             }
  532.  
  533.             foreach ($aCol as $k => $v{
  534.                 $title $link $target $onclick $link_extra '';
  535.                 $aColumns[$karray();
  536.                 $value (isset($aMsg[$v]))  $aMsg[$v]  '';
  537.                 $sUnknown _("Unknown recipient");
  538.                 switch ($k{
  539.                 case SQM_COL_FROM:
  540.                     $sUnknown _("Unknown sender");
  541.                 case SQM_COL_TO:
  542.                 case SQM_COL_CC:
  543.                 case SQM_COL_BCC:
  544.                     $sTmp false;
  545.                     if ($value{
  546.                         if ($highlight_list && !$bHighLight{
  547.                             $bHighLight highlightMessage($aCol[$k]$value$highlight_list,$aFormattedMessages[$iUid]);
  548.                         }
  549.                         $aAddressList parseRFC822Address($value);
  550.                         $sTmp getAddressString($aAddressList,array('best' => true));
  551.                         $title $title_maybe '';
  552.                         foreach ($aAddressList as $aAddr{
  553.                             $sPersonal (isset($aAddr[SQM_ADDR_PERSONAL])) $aAddr[SQM_ADDR_PERSONAL'';
  554.                             $sMailbox  (isset($aAddr[SQM_ADDR_MAILBOX]))  $aAddr[SQM_ADDR_MAILBOX]  '';
  555.                             $sHost     (isset($aAddr[SQM_ADDR_HOST]))     $aAddr[SQM_ADDR_HOST]     '';
  556.                             if ($sPersonal{
  557.                                 $title .= sm_encode_html_special_chars($sMailbox.'@'.$sHost).', ';
  558.                             else {
  559.                                 // if $value gets truncated we need to add the addresses with no
  560.                                 // personal name as well
  561.                                 $title_maybe .= sm_encode_html_special_chars($sMailbox.'@'.$sHost).', ';
  562.                             }
  563.                         }
  564.                         if ($title{
  565.                             $title substr($title,0,-2)// strip ', ';
  566.                         }
  567.                         $sTmp decodeHeader($sTmp);
  568.                         if (isset($aColumnDesc[$k]['truncate']&& $aColumnDesc[$k]['truncate']{
  569.                             $sTrunc sm_truncate_string($sTmp$aColumnDesc[$k]['truncate']'...'TRUE);
  570.                             if ($sTrunc != $sTmp{
  571.                                 if (!$title{
  572.                                     $title $sTmp;
  573.                                 else if ($title_maybe{
  574.                                     $title $title .', '.$title_maybe;
  575.                                     $title substr($title,0,-2)// strip ', ';
  576.                                 }
  577.                             }
  578.                             $sTmp $sTrunc;
  579.                         }
  580.                     }
  581.                     $value ($sTmp(substr($sTmp06== '&quot;' && substr($sTmp-6== '&quot;' substr(substr($sTmp0-6)6$sTmp$sUnknown;
  582.                     break;
  583.                 case SQM_COL_SUBJ:
  584.                     // subject is mime encoded, decode it.
  585.                     // value is sanitized in decoding function.
  586.                     // TODO, verify if it should be done before or after the highlighting
  587.                     $value=decodeHeader($value);
  588.                     if ($highlight_list && !$bHighLight{
  589.                         $bHighLight highlightMessage('SUBJECT'$value$highlight_list$aFormattedMessages[$iUid]);
  590.                     }
  591.                     $iIndent (isset($aIndentArray[$aId[$i]])) $aIndentArray[$aId[$i]] 0;
  592.                     // FIXME: don't break 8bit symbols and html entities during truncation
  593.                     if (isset($aColumnDesc[$k]['truncate']&& $aColumnDesc[$k]['truncate']{
  594.                         $sTmp sm_truncate_string($value$aColumnDesc[$k]['truncate']-$iIndent'...'TRUE);
  595.                         // drop any double spaces since these will be displayed in the title
  596.                         // Nah, it's nice to always have a roll-over
  597.                         //$title = ($sTmp != $value) ? preg_replace('/\s{2,}/', ' ', $value) : '';
  598.                         $title preg_replace('/\s{2,}/'' '$value);
  599.                         $value $sTmp;
  600.                     }
  601.                     /* generate the link to the message */
  602.                     if ($aQuery{
  603.                         // TODO, $sTargetModule should be a query parameter so that we can use a single entrypoint
  604.                         $link $sTargetModule.'.php?' implode('&amp;',$aQuery);
  605.  
  606.                         // see top of this function for which attributes are available
  607.                         // in the global scope for plugin use (like $link, $target,
  608.                         // $onclick, $link_extra, $title, and so forth)
  609.                         // plugins are responsible for sharing nicely (such as for
  610.                         // setting the target, etc)
  611.                         $temp array(&$iPageOffset&$sSearch&$aSearch$aMsg);
  612.                         do_hook('subject_link'$temp);
  613.                     }
  614.                     $value (trim($value)) $value _("(no subject)");
  615.                     /* add thread indentation */
  616.                     $aColumns[$k]['indent']  $iIndent;
  617.                     break;
  618.                 case SQM_COL_SIZE:
  619.                     $value show_readable_size($value);
  620.                     break;
  621.                 case SQM_COL_DATE:
  622.                 case SQM_COL_INT_DATE:
  623.                     $value getTimeStamp(explode(' ',trim($value)));
  624.                     $title getDateString($valueTRUE);
  625.                     $value getDateString($value);
  626.                     break;
  627.                 case SQM_COL_FLAGS:
  628.                     $aFlagColumn array('seen' => false,
  629.                                          'deleted'=>false,
  630.                                          'answered'=>false,
  631.                                          'forwarded'=>false,
  632.                                          'flagged' => false,
  633.                                          'draft' => false);
  634.  
  635.                     if(!is_array($value)) $value array();
  636.                     foreach ($value as $sFlag => $v{
  637.                         switch ($sFlag{
  638.                           case '\\seen'    $aFlagColumn['seen']      truebreak;
  639.                           case '\\deleted' $aFlagColumn['deleted']   truebreak;
  640.                           case '\\answered'$aFlagColumn['answered']  truebreak;
  641.                           case '$forwarded'$aFlagColumn['forwarded'truebreak;
  642.                           case '\\flagged' $aFlagColumn['flagged']   truebreak;
  643.                           case '\\draft'   $aFlagColumn['draft']     truebreak;
  644.                           default:  break;
  645.                         }
  646.                     }
  647.                     $value $aFlagColumn;
  648.                     break;
  649.                 case SQM_COL_PRIO:
  650.                     $value ($value? (int) $value 3;
  651.                     break;
  652.                 case SQM_COL_ATTACHMENT:
  653.                     $value (is_array($value&& $value[0== 'multipart' && $value[1== 'mixed'true false;
  654.                     break;
  655.                 case SQM_COL_CHECK:
  656.                     $value ($checkall || in_array($iUid$preselected));
  657.                     break;
  658.                 default break;
  659.                 }
  660.                 if ($title)      $aColumns[$k]['title']      $title;      }
  661.                 if ($link)       $aColumns[$k]['link']       $link;       }
  662.                 if ($link_extra$aColumns[$k]['link_extra'$link_extra}
  663.                 if ($onclick)    $aColumns[$k]['onclick']    $onclick;    }
  664.                 if ($target)     $aColumns[$k]['target']     $target;     }
  665.                 $aColumns[$k]['value']  $value;
  666.             }
  667.             /* columns which will not be displayed but should be inspected
  668.                because the highlight list contains rules with those columns */
  669.             foreach ($aExtraHighLightColumns as $v{
  670.                 if ($highlight_list && !$bHighLight && isset($aMsg[$v])) {
  671.                     $bHighLight highlightMessage($v$aMsg[$v]$highlight_list,$aFormattedMessages[$iUid]);
  672.                 }
  673.             }
  674.             $aFormattedMessages[$iUid]['columns'$aColumns;
  675.  
  676.         else {
  677.             break;
  678.         }
  679.     }
  680.     return $aFormattedMessages;
  681. }
  682.  
  683.  
  684. /**
  685.  * Sets the row color if the provided column value pair  matches a hightlight rule
  686.  *
  687.  * @param string   $sCol column name
  688.  * @param string   $sVal column value
  689.  * @param array    $highlight_list highlight rules
  690.  * @param array    $aFormat (reference) array where row color info is stored
  691.  * @return bool     match found
  692.  * @since 1.5.1
  693.  * @author Marc Groot Koerkamp
  694.  */
  695. function highlightMessage($sCol$sVal$highlight_list&$aFormat{
  696.     if (!is_array($highlight_list&& count($highlight_list== 0{
  697.         return false;
  698.     }
  699.     $hlt_color false;
  700.     $sCol strtoupper($sCol);
  701.  
  702.     foreach ($highlight_list as $highlight_list_part{
  703.         if (trim($highlight_list_part['value'])) {
  704.             $high_val   strtolower($highlight_list_part['value']);
  705.             $match_type strtoupper($highlight_list_part['match_type']);
  706.             if($match_type == 'TO_CC'{
  707.                 if ($sCol == 'TO' || $sCol == 'CC'{
  708.                     $match_type $sCol;
  709.                 else {
  710.                     continue;
  711.                 }
  712.             else {
  713.                 if ($match_type != $sCol{
  714.                     continue;
  715.                 }
  716.             }
  717.             if (strpos(strtolower($sVal),$high_val!== false{
  718.                  $hlt_color $highlight_list_part['color'];
  719.                  break;
  720.             }
  721.         }
  722.     }
  723.     if ($hlt_color{
  724.         // Bug in highlight color???
  725.         if ($hlt_color{0!= '#'{
  726.             $hlt_color '#'$hlt_color;
  727.         }
  728.         $aFormat['row']['color'$hlt_color;
  729.         return true;
  730.     else {
  731.         return false;
  732.     }
  733. }
  734.  
  735. function setUserPref($username$pref$value{
  736.     global $data_dir;
  737.     setPref($data_dir,$username,$pref,$value);
  738. }
  739.  
  740. /**
  741.  * Execute the sorting for a mailbox
  742.  *
  743.  * @param  resource $imapConnection Imap connection
  744.  * @param  array    $aMailbox (reference) Mailbox retrieved with sqm_api_mailbox_select
  745.  * @return int      $error (reference) Error number
  746.  * @private
  747.  * @since 1.5.1
  748.  * @author Marc Groot Koerkamp
  749.  */
  750. function _get_sorted_msgs_list($imapConnection,&$aMailbox{
  751.     $iSetIndx (isset($aMailbox['SETINDEX'])) $aMailbox['SETINDEX'0;
  752.     $bDirection !($aMailbox['SORT'2);
  753.     $error 0;
  754.     if (!$aMailbox['SEARCH'][$iSetIndx]{
  755.         $aMailbox['SEARCH'][$iSetIndx'ALL';
  756.     }
  757.     if (($aMailbox['SORT'SQSORT_THREAD&& sqimap_capability($imapConnection,'THREAD')) {
  758.         $aRes get_thread_sort($imapConnection,$aMailbox['SEARCH'][$iSetIndx]);
  759.         if ($aRes === false{
  760.             $aMailbox['SORT'-= SQSORT_THREAD;
  761.             $error 1// fix me, define an error code;
  762.         else {
  763.             $aMailbox['UIDSET'][$iSetIndx$aRes[0];
  764.             $aMailbox['THREAD_INDENT'][$iSetIndx$aRes[1];
  765.         }
  766.     else if ($aMailbox['SORT'=== SQSORT_NONE{
  767.         $id sqimap_run_search($imapConnection'ALL' '');
  768.         if ($id === false{
  769.             $error 1// fix me, define an error code
  770.         else {
  771.             $aMailbox['UIDSET'][$iSetIndxarray_reverse($id);
  772.             $aMailbox['TOTAL'][$iSetIndx$aMailbox['EXISTS'];
  773.         }
  774.     else {
  775.         if (sqimap_capability($imapConnection,'SORT')) {
  776.              $sSortField _getSortField($aMailbox['SORT'],true);
  777.              $id sqimap_get_sort_order($imapConnection$sSortField$bDirection$aMailbox['SEARCH'][$iSetIndx]);
  778.              if ($id === false{
  779.                  $error 1// fix me, define an error code
  780.              else {
  781.                 $aMailbox['UIDSET'][$iSetIndx$id;
  782.              }
  783.         else {
  784.              $id NULL;
  785.              if ($aMailbox['SEARCH'][$iSetIndx!= 'ALL'{
  786.                 $id sqimap_run_search($imapConnection$aMailbox['SEARCH'][$iSetIndx]$aMailbox['CHARSET'][$iSetIndx]);
  787.              }
  788.              $sSortField _getSortField($aMailbox['SORT'],false);
  789.              $aMailbox['UIDSET'][$iSetIndxget_squirrel_sort($imapConnection$sSortField$bDirection$id);
  790.         }
  791.     }
  792.     return $error;
  793. }
  794.  
  795. /**
  796.  * Does the $srt $_GET var to field mapping
  797.  *
  798.  * @param int $srt Field to sort on
  799.  * @param bool $bServerSort Server sorting is true
  800.  * @return string $sSortField Field to sort on
  801.  * @since 1.5.1
  802.  * @private
  803.  */
  804. function _getSortField($sort,$bServerSort{
  805.     switch($sort{
  806.         case SQSORT_NONE:
  807.             $sSortField 'UID';
  808.             break;
  809.         case SQSORT_DATE_ASC:
  810.         case SQSORT_DATE_DESC:
  811.             $sSortField 'DATE';
  812.             break;
  813.         case SQSORT_FROM_ASC:
  814.         case SQSORT_FROM_DESC:
  815.             $sSortField 'FROM';
  816.             break;
  817.         case SQSORT_SUBJ_ASC:
  818.         case SQSORT_SUBJ_DESC:
  819.             $sSortField 'SUBJECT';
  820.             break;
  821.         case SQSORT_SIZE_ASC:
  822.         case SQSORT_SIZE_DESC:
  823.             $sSortField ($bServerSort'SIZE' 'RFC822.SIZE';
  824.             break;
  825.         case SQSORT_TO_ASC:
  826.         case SQSORT_TO_DESC:
  827.             $sSortField 'TO';
  828.             break;
  829.         case SQSORT_CC_ASC:
  830.         case SQSORT_CC_DESC:
  831.             $sSortField 'CC';
  832.             break;
  833.         case SQSORT_INT_DATE_ASC:
  834.         case SQSORT_INT_DATE_DESC:
  835.             $sSortField ($bServerSort'ARRIVAL' 'INTERNALDATE';
  836.             break;
  837.         case SQSORT_THREAD:
  838.             break;
  839.         default$sSortField 'UID';
  840.             break;
  841.  
  842.     }
  843.     return $sSortField;
  844. }
  845.  
  846. /**
  847.  * This function is a utility function for setting which headers should be
  848.  * fetched. It takes into account the highlight list which requires extra
  849.  * headers to be fetch in order to make those rules work. It's called before
  850.  * the headers are fetched which happens in showMessagesForMailbox and when
  851.  * the next and prev links in read_body.php are used.
  852.  *
  853.  * @param array    $aMailbox associative array with mailbox related vars
  854.  * @param array    $aProps 
  855.  * @return void 
  856.  * @since 1.5.1
  857.  */
  858.  
  859. function calcFetchColumns(&$aMailbox&$aProps{
  860.  
  861.     $highlight_list    (isset($aProps['config']['highlight_list'])) $aProps['config']['highlight_list'false;
  862.     $aColumnsDesc      (isset($aProps['columns'])) $aProps['columns'false;
  863.  
  864.     $aFetchColumns $aColumnsDesc;
  865.     if (isset($aFetchColumns[SQM_COL_CHECK])) {
  866.         unset($aFetchColumns[SQM_COL_CHECK]);
  867.     }
  868.  
  869.     /*
  870.      * Before we fetch the message headers, check if we need to fetch extra columns
  871.      * to make the message highlighting work
  872.      */
  873.     if (is_array($highlight_list&& count($highlight_list)) {
  874.         $aHighlightColumns array();
  875.         foreach ($highlight_list as $highlight_list_part{
  876.             if (trim($highlight_list_part['value'])) {
  877.                 $match_type strtoupper($highlight_list_part['match_type']);
  878.                 switch ($match_type{
  879.                     case 'TO_CC':
  880.                         $aHighlightColumns[SQM_COL_TOtrue;
  881.                         $aHighlightColumns[SQM_COL_CCtrue;
  882.                         break;
  883.                     case 'TO':     $aHighlightColumns[SQM_COL_TOtruebreak;
  884.                     case 'CC':     $aHighlightColumns[SQM_COL_CCtruebreak;
  885.                     case 'FROM':   $aHighlightColumns[SQM_COL_FROMtruebreak;
  886.                     case 'SUBJECT':$aHighlightColumns[SQM_COL_SUBJtruebreak;
  887.                 }
  888.             }
  889.         }
  890.         $aExtraColumns array();
  891.         foreach ($aHighlightColumns as $k => $v{
  892.             if (!isset($aFetchColumns[$k])) {
  893.                 $aExtraColumns[]  $k;
  894.                 $aFetchColumns[$ktrue;
  895.             }
  896.         }
  897.         if (count($aExtraColumns)) {
  898.             $aProps['extra_columns'$aExtraColumns;
  899.         }
  900.     }
  901.     $aMailbox['FETCHHEADERS'=  array_keys($aFetchColumns);
  902. }
  903.  
  904.  
  905. /**
  906.  * This function loops through a group of messages in the mailbox
  907.  * and shows them to the user.
  908.  *
  909.  * @param resource $imapConnection 
  910.  * @param array    $aMailbox associative array with mailbox related vars
  911.  * @param array    $aProps 
  912.  * @param int      $iError error code, 0 is no error
  913.  */
  914. function showMessagesForMailbox($imapConnection&$aMailbox,$aProps&$iError{
  915.     global $PHP_SELF;
  916.     global $boxes$show_copy_buttons;
  917.  
  918.     $highlight_list    (isset($aProps['config']['highlight_list'])) $aProps['config']['highlight_list'false;
  919.     $fancy_index_highlite (isset($aProps['config']['fancy_index_highlite'])) $aProps['config']['fancy_index_highlite'true;
  920.     $aColumnsDesc      (isset($aProps['columns'])) $aProps['columns'false;
  921.     $iAccount          (isset($aProps['account'])) ? (int) $aProps['account'0;
  922.     $sMailbox          (isset($aProps['mailbox'])) $aProps['mailbox'false;
  923.     $sTargetModule     (isset($aProps['module'])) $aProps['module''read_body';
  924.     $show_flag_buttons (isset($aProps['config']['show_flag_buttons'])) $aProps['config']['show_flag_buttons'true;
  925.  
  926.     /* allows to control copy button in function call. If array key is not set, code follows user preferences */
  927.     if (isset($aProps['config']['show_copy_buttons']))
  928.         $show_copy_buttons $aProps['config']['show_copy_buttons'];
  929.  
  930.     $lastTargetMailbox (isset($aProps['config']['lastTargetMailbox'])) $aProps['config']['lastTargetMailbox''';
  931.     $aOrder array_keys($aProps['columns']);
  932.     $trash_folder      (isset($aProps['config']['trash_folder']&& $aProps['config']['trash_folder'])
  933.                           ? $aProps['config']['trash_folder'false;
  934.     $sent_folder       (isset($aProps['config']['sent_folder']&& $aProps['config']['sent_folder'])
  935.                           ? $aProps['config']['sent_folder'false;
  936.     $draft_folder      (isset($aProps['config']['draft_folder']&& $aProps['config']['draft_folder'])
  937.                           ? $aProps['config']['draft_folder'false;
  938.     $page_selector     (isset($aProps['config']['page_selector'])) $aProps['config']['page_selector'false;
  939.     $page_selector_max (isset($aProps['config']['page_selector_max'])) $aProps['config']['page_selector_max'10;
  940.     $color             $aProps['config']['color'];
  941.  
  942.  
  943.     /*
  944.      * Form ID
  945.      */
  946.     static $iFormId;
  947.  
  948.     if (!isset($iFormId)) {
  949.         $iFormId=1;
  950.     else {
  951.         ++$iFormId;
  952.     }
  953.     // store the columns to fetch so we can pick them up in read_body
  954.     // where we validate the cache.
  955.     calcFetchColumns($aMailbox  ,$aProps);
  956.  
  957.     $iError fetchMessageHeaders($imapConnection$aMailbox);
  958.     if ($iError{
  959.         return array();
  960.     else {
  961.         $aMessages prepareMessageList($aMailbox$aProps);
  962.     }
  963.  
  964.     $iSetIndx $aMailbox['SETINDEX'];
  965.     $iLimit ($aMailbox['SHOWALL'][$iSetIndx]$aMailbox['EXISTS'$aMailbox['LIMIT'];
  966.     $iEnd ($aMailbox['PAGEOFFSET'($iLimit 1$aMailbox['EXISTS']?
  967.              $aMailbox['PAGEOFFSET'$iLimit $aMailbox['EXISTS'];
  968.  
  969.     $iNumberOfMessages $aMailbox['TOTAL'][$iSetIndx];
  970.     $iEnd min $iEnd$iNumberOfMessages );
  971.  
  972.     $php_self $PHP_SELF;
  973.  
  974.     $urlMailbox urlencode($aMailbox['NAME']);
  975.  
  976.     if (preg_match('/^(.+)\?.+$/',$php_self,$regs)) {
  977.         $source_url $regs[1];
  978.     else {
  979.         $source_url $php_self;
  980.     }
  981.  
  982.     $baseurl $source_url.'?mailbox=' urlencode($aMailbox['NAME'].'&amp;account='.$aMailbox['ACCOUNT'(strpos($source_url'src/search.php''&amp;smtoken=' sm_generate_security_token('');
  983.     $where urlencode($aMailbox['SEARCH'][$iSetIndx][0]);
  984.     $what urlencode($aMailbox['SEARCH'][$iSetIndx][1]);
  985.     $baseurl .= '&amp;where=' $where .  '&amp;what=' .  $what;
  986.  
  987.     /* build thread sorting links */
  988.     $newsort $aMailbox['SORT'];
  989.     if (sqimap_capability($imapConnection,'THREAD')) {
  990.         if ($aMailbox['SORT'SQSORT_THREAD{
  991.             $newsort -= SQSORT_THREAD;
  992.             $thread_name _("Unthread View");
  993.         else {
  994.             $thread_name _("Thread View");
  995.             $newsort $aMailbox['SORT'SQSORT_THREAD;
  996.         }
  997.         $thread_link_uri $baseurl '&amp;srt=' $newsort 
  998.                          . '&amp;startMessage=1';
  999.     else {
  1000.         $thread_link_uri ='';
  1001.         $thread_name '';
  1002.     }
  1003.     $sort $aMailbox['SORT'];
  1004.  
  1005.     /* FIX ME ADD CHECKBOX CONTROL. No checkbox => no buttons */
  1006.  
  1007.  
  1008.  
  1009.     /* future admin control over displayable buttons */
  1010.     $aAdminControl array(
  1011.                            'markFlagged'   => 1,
  1012.                            'markUnflagged' => 1,
  1013.                            'markRead'      => 1,
  1014.                            'markUnread'    => 1,
  1015.                            'forward'       => 1,
  1016.                            'delete'        => 1,
  1017.                            'undeleteButton'=> 1,
  1018.                            'bypass_trash'  => 1,
  1019.                            'expungeButton' => 1,
  1020.                            'moveButton'    => 1,
  1021.                            'copyButton'    => 1
  1022.                            );
  1023.  
  1024.     /* user prefs control */
  1025.     $aUserControl array (
  1026.  
  1027.                            'markFlagged'   => $show_flag_buttons,
  1028.                            'markUnflagged' => $show_flag_buttons,
  1029.                            'markRead'      => 1,
  1030.                            'markUnread'    => 1,
  1031.                            'forward'       => 1,
  1032.                            'delete'        => 1,
  1033.                            'undeleteButton'=> 1,
  1034.                            'bypass_trash'  => 1,
  1035.                            'expungeButton' => 1,
  1036.                            'moveButton'    => 1,
  1037.                            'copyButton'    => $show_copy_buttons
  1038.  
  1039.                           );
  1040.  
  1041.     $showDelete ($aMailbox['RIGHTS'!= 'READ-ONLY' &&
  1042.                    in_array('\\deleted',$aMailbox['PERMANENTFLAGS']true)) true false;
  1043.     $showByPassTrash (($aMailbox['AUTO_EXPUNGE'&& $aMailbox['RIGHTS'!= 'READ-ONLY' &&
  1044.                    in_array('\\deleted',$aMailbox['PERMANENTFLAGS']true)) &&
  1045.                    $trash_foldertrue false//
  1046.  
  1047.     $showUndelete (!$aMailbox['AUTO_EXPUNGE'&& $aMailbox['RIGHTS'!= 'READ-ONLY' &&
  1048.                    in_array('\\deleted',$aMailbox['PERMANENTFLAGS']true/* trash folder unrelated methinks: && !$trash_folder*/true false;
  1049.     $showMove   ($aMailbox['RIGHTS'!= 'READ-ONLY'true false;
  1050.     $showExpunge (!$aMailbox['AUTO_EXPUNGE'&& $aMailbox['RIGHTS'!= 'READ-ONLY' &&
  1051.                    in_array('\\deleted',$aMailbox['PERMANENTFLAGS']true)) true false;
  1052.  
  1053.     /* Button options that depend on IMAP server and selected folder */
  1054.     $aImapControl array (
  1055.                            'markUnflagged' => in_array('\\flagged',$aMailbox['PERMANENTFLAGS']true),
  1056.                            'markFlagged'   => in_array('\\flagged',$aMailbox['PERMANENTFLAGS']true),
  1057.                            'markRead'      => in_array('\\seen',$aMailbox['PERMANENTFLAGS']true),
  1058.                            'markUnread'    => in_array('\\seen',$aMailbox['PERMANENTFLAGS']true),
  1059.                            'forward'       => 1,
  1060.                            'delete'        => $showDelete,
  1061.                            'undeleteButton'=> $showUndelete,
  1062.                            'bypass_trash'  => $showByPassTrash,
  1063.                            'expungeButton' => $showExpunge,
  1064.                            'moveButton'    => $showMove,
  1065.                            'copyButton'    => 1
  1066.                           );
  1067.     /* Button strings */
  1068.     $aButtonStrings array(
  1069.                            'markFlagged'    => _("Flag"),
  1070.                            'markUnflagged'  => _("Unflag"),
  1071.                            'markRead'       => _("Read"),
  1072.                            'markUnread'     => _("Unread"),
  1073.                            'forward'        => _("Forward"),
  1074.                            'delete'         => _("Delete"),
  1075.                            'undeleteButton' => _("Undelete"),
  1076.                            'bypass_trash'   => _("Bypass Trash"),
  1077.                            'expungeButton'  => _("Expunge"),
  1078.                            'moveButton'     => _("Move"),
  1079.                            'copyButton'     => _("Copy")
  1080.                            );
  1081.     /* Button access keys */
  1082.     global $accesskey_mailbox_flag$accesskey_mailbox_unflag,
  1083.            $accesskey_mailbox_read$accesskey_mailbox_unread,
  1084.            $accesskey_mailbox_forward$accesskey_mailbox_delete,
  1085.            $accesskey_mailbox_undelete$accesskey_mailbox_bypass_trash,
  1086.            $accesskey_mailbox_expunge$accesskey_mailbox_move,
  1087.            $accesskey_mailbox_copy$accesskey_mailbox_move_to;
  1088.     $aButtonAccessKeys array(
  1089.                            'markFlagged'    => $accesskey_mailbox_flag,
  1090.                            'markUnflagged'  => $accesskey_mailbox_unflag,
  1091.                            'markRead'       => $accesskey_mailbox_read,
  1092.                            'markUnread'     => $accesskey_mailbox_unread,
  1093.                            'forward'        => $accesskey_mailbox_forward,
  1094.                            'delete'         => $accesskey_mailbox_delete,
  1095.                            'undeleteButton' => $accesskey_mailbox_undelete,
  1096.                            'bypass_trash'   => $accesskey_mailbox_bypass_trash,
  1097.                            'expungeButton'  => $accesskey_mailbox_expunge,
  1098.                            'moveButton'     => $accesskey_mailbox_move,
  1099.                            'copyButton'     => $accesskey_mailbox_copy,
  1100.                            );
  1101.  
  1102.  
  1103.     /**
  1104.      * Register buttons in order to an array
  1105.      * The key is the "name", the first element of the value array is the "value", second argument is the type.
  1106.      */
  1107.     $aFormElements array();
  1108.     foreach($aAdminControl as $k => $v{
  1109.         if ($v $aUserControl[$k$aImapControl[$k]{
  1110.             switch ($k{
  1111.               case 'markFlagged':
  1112.               case 'markUnflagged':
  1113.               case 'markRead':
  1114.               case 'markUnread':
  1115.               case 'delete':
  1116.               case 'undeleteButton':
  1117.               case 'expungeButton':
  1118.               case 'forward':
  1119.                 $aFormElements[$k
  1120.                     = array('value' => $aButtonStrings[$k]'type' => 'submit''accesskey' => (isset($aButtonAccessKeys[$k]$aButtonAccessKeys[$k'NONE'));
  1121.                 break;
  1122.               case 'bypass_trash':
  1123.                 $aFormElements[$k
  1124.                     = array('value' => $aButtonStrings[$k]'type' => 'checkbox''accesskey' => (isset($aButtonAccessKeys[$k]$aButtonAccessKeys[$k'NONE'));
  1125.                 break;
  1126.               case 'moveButton':
  1127.               case 'copyButton':
  1128.                 $aFormElements['targetMailbox']
  1129.                     = array('options_list' => sqimap_mailbox_option_list($imapConnectionarray(strtolower($lastTargetMailbox))0$boxes),
  1130.                             'type' => 'select',
  1131.                             'accesskey' => $accesskey_mailbox_move_to);
  1132.                 $aFormElements['mailbox']       
  1133.                     = array('value' => $aMailbox['NAME']'type' => 'hidden');
  1134.                 $aFormElements['startMessage']  
  1135.                     = array('value' => $aMailbox['PAGEOFFSET']'type' => 'hidden');
  1136.                 $aFormElements[$k]              
  1137.                     = array('value' => $aButtonStrings[$k]'type' => 'submit''accesskey' => (isset($aButtonAccessKeys[$k]$aButtonAccessKeys[$k'NONE'));
  1138.                 break;
  1139.             }
  1140.         }
  1141.         $aFormElements['account']  array('value' => $iAccount,'type' => 'hidden');
  1142.     }
  1143.     do_hook('message_list_controls'$aFormElements);
  1144.  
  1145.     /*
  1146.      * This is the beginning of the message list table.
  1147.      * It wraps around all messages
  1148.      */
  1149.     $safe_name preg_replace("/[^0-9A-Za-z_]/"'_'$aMailbox['NAME']);
  1150.     $form_name "FormMsgs" $safe_name;
  1151.  
  1152.     //if (!sqgetGlobalVar('align',$align,SQ_SESSION)) {
  1153.         $align array('left' => 'left''right' => 'right');
  1154.     //}
  1155.     //sm_print_r($align);
  1156.  
  1157.     /* finally set the template vars */
  1158.  
  1159. // FIXME, before we support multiple templates we must review the names of the vars
  1160. // BUMP!
  1161.  
  1162.  
  1163.     $aTemplate['color']     $color;
  1164.     $aTemplate['form_name'"FormMsgs" $safe_name;
  1165.     $aTemplate['form_id']   'mbx_'.$iFormId;
  1166.     $aTemplate['page_selector'$page_selector;
  1167.     $aTemplate['page_selector_max'$page_selector_max;
  1168.     $aTemplate['messagesPerPage'$aMailbox['LIMIT'];
  1169.     $aTemplate['showall'$aMailbox['SHOWALL'][$iSetIndx];
  1170.     $aTemplate['end_msg'$iEnd;
  1171.     $aTemplate['align'$align;
  1172.     $aTemplate['iNumberOfMessages'$iNumberOfMessages;
  1173.     $aTemplate['aOrder'$aOrder;
  1174.     $aTemplate['aFormElements'$aFormElements;
  1175.     $aTemplate['sort'$sort;
  1176.     $aTemplate['pageOffset'$aMailbox['PAGEOFFSET'];
  1177.     $aTemplate['baseurl'$baseurl;
  1178.     $aTemplate['aMessages'=$aMessages;
  1179.     $aTemplate['trash_folder'$trash_folder;
  1180.     $aTemplate['sent_folder'$sent_folder;
  1181.     $aTemplate['draft_folder'$draft_folder;
  1182.     $aTemplate['thread_link_uri'$thread_link_uri;
  1183.     $aTemplate['thread_name'$thread_name;
  1184.     $aTemplate['php_self'str_replace('&','&amp;',$php_self);
  1185.     $aTemplate['mailbox'$sMailbox;
  1186. //FIXME: javascript_on is always assigned to the template object in places like init.php; is there some reason to reassign it here?  is there some chance that it was changed?  if not, please remove this line!
  1187.     $aTemplate['javascript_on'(isset($aProps['config']['javascript_on'])) $aProps['config']['javascript_on'false;
  1188.     $aTemplate['enablesort'(isset($aProps['config']['enablesort'])) $aProps['config']['enablesort'false;
  1189.     $aTemplate['icon_theme'(isset($aProps['config']['icon_theme'])) $aProps['config']['icon_theme'false;
  1190.     $aTemplate['use_icons'(isset($aProps['config']['use_icons'])) $aProps['config']['use_icons'false;
  1191.     $aTemplate['alt_index_colors'(isset($aProps['config']['alt_index_colors'])) $aProps['config']['alt_index_colors'false;
  1192.     $aTemplate['fancy_index_highlite'$fancy_index_highlite;
  1193.  
  1194.  
  1195.     /**
  1196.       * Set up sort possibilities; one could argue that this is best
  1197.       * placed in the template, but most template authors won't understand
  1198.       * or need to understand it, so some advanced templates can override 
  1199.       * it if they do something different.
  1200.       */
  1201.     if (!($aTemplate['sort'SQSORT_THREAD&& $aTemplate['enablesort']{
  1202.         $aTemplate['aSortSupported']
  1203.             = array(SQM_COL_SUBJ =>     array(SQSORT_SUBJ_ASC     SQSORT_SUBJ_DESC),
  1204.                     SQM_COL_DATE =>     array(SQSORT_DATE_DESC    SQSORT_DATE_ASC),
  1205.                     SQM_COL_INT_DATE => array(SQSORT_INT_DATE_DESCSQSORT_INT_DATE_ASC),
  1206.                     SQM_COL_FROM =>     array(SQSORT_FROM_ASC     SQSORT_FROM_DESC),
  1207.                     SQM_COL_TO =>       array(SQSORT_TO_ASC       SQSORT_TO_DESC),
  1208.                     SQM_COL_CC =>       array(SQSORT_CC_ASC       SQSORT_CC_DESC),
  1209.                     SQM_COL_SIZE =>     array(SQSORT_SIZE_ASC     SQSORT_SIZE_DESC));
  1210.     else {
  1211.         $aTemplate['aSortSupported'array();
  1212.     }
  1213.  
  1214.  
  1215.     /**
  1216.       * Figure out which columns should serve as labels for checkbox:
  1217.       * we try to grab the two columns before and after the checkbox,
  1218.       * except the subject column, since it is the link that opens
  1219.       * the message view
  1220.       *
  1221.       * if $javascript_on is set, then the highlighting code takes
  1222.       * care of this; just skip it
  1223.       *
  1224.       * This code also might be more appropriate in a template file, but
  1225.       * we are moving this complex stuff out of the way of template 
  1226.       * authors; advanced template sets are always free to override
  1227.       * the resultant values.
  1228.       *
  1229.       */
  1230.     $show_label_columns array();
  1231.     $index_order_part array();
  1232.     if (!($aTemplate['javascript_on'&& $aTemplate['fancy_index_highlite'])) {
  1233.         $get_next_two 0;
  1234.         $last_order_part 0;
  1235.         $last_last_order_part 0;
  1236.         foreach ($aTemplate['aOrder'as $index_order_part{
  1237.             if ($index_order_part == SQM_COL_CHECK{
  1238.                 $get_next_two 1;
  1239.                 if ($last_last_order_part != SQM_COL_SUBJ)
  1240.                     $show_label_columns[$last_last_order_part;
  1241.                 if ($last_order_part != SQM_COL_SUBJ)
  1242.                     $show_label_columns[$last_order_part;
  1243.     
  1244.             else if ($get_next_two && $get_next_two && $index_order_part != SQM_COL_SUBJ{
  1245.                 $show_label_columns[$index_order_part;
  1246.                 $get_next_two++;
  1247.             }
  1248.             $last_last_order_part $last_order_part;
  1249.             $last_order_part $index_order_part;
  1250.         }
  1251.     }
  1252.     $aTemplate['show_label_columns'$show_label_columns;
  1253.  
  1254.  
  1255.     return $aTemplate;
  1256.  
  1257. }
  1258.  
  1259.  
  1260. /**
  1261.  * Process messages list form and handle the cache gracefully. If $sButton and
  1262.  * $aUid are provided as argument then you can fake a message list submit and
  1263.  * use it i.e. in read_body.php for del move next and update the cache
  1264.  *
  1265.  * @param  resource $imapConnection imap connection
  1266.  * @param  array    $aMailbox       (reference) cached mailbox
  1267.  * @param  string   $sButton        fake a submit button
  1268.  * @param  array    $aUid           fake the $msg array
  1269.  * @param  string   $targetMailbox  fake the target mailbox for move operations
  1270.  * @param  boolean  $bypass_trash   fake the bypass trash checkbox for delete operations
  1271.  * @return string $sError error string in case of an error
  1272.  * @since 1.5.1
  1273.  * @author Marc Groot Koerkamp
  1274.  */
  1275. function handleMessageListForm($imapConnection&$aMailbox$sButton='',
  1276.                                $aUid array()$targetMailbox=''$bypass_trash=NULL{
  1277.     /* incoming formdata */
  1278.     $sButton (sqgetGlobalVar('moveButton',      $sTmpSQ_FORM)) 'move'         $sButton;
  1279.     $sButton (sqgetGlobalVar('copyButton',      $sTmpSQ_FORM)) 'copy'         $sButton;
  1280.     $sButton (sqgetGlobalVar('expungeButton',   $sTmpSQ_FORM)) 'expunge'      $sButton;
  1281.     $sButton (sqgetGlobalVar('forward',         $sTmpSQ_FORM)) 'forward'      $sButton;
  1282.     $sButton (sqgetGlobalVar('delete',          $sTmpSQ_FORM)) 'setDeleted'   $sButton;
  1283.     $sButton (sqgetGlobalVar('undeleteButton',  $sTmpSQ_FORM)) 'unsetDeleted'   $sButton;
  1284.     $sButton (sqgetGlobalVar('markRead',        $sTmpSQ_FORM)) 'setSeen'      $sButton;
  1285.     $sButton (sqgetGlobalVar('markUnread',      $sTmpSQ_FORM)) 'unsetSeen'    $sButton;
  1286.     $sButton (sqgetGlobalVar('markFlagged',     $sTmpSQ_FORM)) 'setFlagged'   $sButton;
  1287.     $sButton (sqgetGlobalVar('markUnflagged',   $sTmpSQ_FORM)) 'unsetFlagged' $sButton;
  1288.     if (empty($targetMailbox)) sqgetGlobalVar('targetMailbox'$targetMailbox,   SQ_FORM);
  1289.     if (is_null($bypass_trash)) sqgetGlobalVar('bypass_trash',  $bypass_trash,    SQ_FORM);
  1290.     sqgetGlobalVar('msg',           $msg,             SQ_FORM);
  1291.     if (sqgetGlobalVar('account',       $iAccount,        SQ_FORM=== false{
  1292.         $iAccount 0;
  1293.     }
  1294.     $sError '';
  1295.     $mailbox $aMailbox['NAME'];
  1296.  
  1297.     /* retrieve the check boxes */
  1298.     $aUid (isset($msg&& is_array($msg)) array_values($msg$aUid;
  1299.     if (count($aUid&& $sButton != 'expunge'{
  1300.  
  1301.         // don't do anything to any messages until we have done security check
  1302.         // FIXME: not sure this code really belongs here, but there's nowhere else to put it with this architecture
  1303.         sqgetGlobalVar('smtoken'$submitted_tokenSQ_FORM'');
  1304.         sm_validate_security_token($submitted_token-1TRUE);
  1305.  
  1306.         // make sure message UIDs are sanitized (BIGINT)
  1307.         foreach ($aUid as $i => $uid)
  1308.            $aUid[$i(preg_match('/^[0-9]+$/'$uid$uid '0');
  1309.  
  1310.         $aUpdatedMsgs false;
  1311.         $bExpunge false;
  1312.         switch ($sButton{
  1313.           case 'setDeleted':
  1314.             // check if id exists in case we come from read_body
  1315.             if (count($aUid== && is_array($aMailbox['UIDSET'][$aMailbox['SETINDEX']]&&
  1316.                 !in_array($aUid[0],$aMailbox['UIDSET'][$aMailbox['SETINDEX']])) {
  1317.                 break;
  1318.             }
  1319.             $aUpdatedMsgs sqimap_msgs_list_delete($imapConnection$mailbox$aUid,$bypass_trash);
  1320.             $bExpunge true;
  1321.             //}
  1322.             break;
  1323.           case 'unsetDeleted':
  1324.           case 'setSeen':
  1325.           case 'unsetSeen':
  1326.           case 'setFlagged':
  1327.           case 'unsetFlagged':
  1328.             // get flag
  1329.             $sFlag (substr($sButton,0,3== 'set''\\'.substr($sButton,3'\\'.substr($sButton,5);
  1330.             $bSet  (substr($sButton,0,3== 'set'true false;
  1331.             $aUpdatedMsgs sqimap_toggle_flag($imapConnection$aUid$sFlag$bSettrue);
  1332.             break;
  1333.           case 'move':
  1334.             $aUpdatedMsgs sqimap_msgs_list_move($imapConnection,$aUid,$targetMailbox,true,$mailbox);
  1335.             sqsession_register($targetMailbox,'lastTargetMailbox');
  1336.             $bExpunge true;
  1337.             break;
  1338.           case 'copy':
  1339.             // sqimap_msgs_list_copy returns true or false.
  1340.             // If error happens - fourth argument handles it inside function.
  1341.             sqimap_msgs_list_copy($imapConnection,$aUid,$targetMailbox,true);
  1342.             sqsession_register($targetMailbox,'lastTargetMailbox');
  1343.             break;
  1344.           case 'forward':
  1345.             $aMsgHeaders array();
  1346.             foreach ($aUid as $iUid{
  1347.                 $aMsgHeaders[$iUid$aMailbox['MSG_HEADERS'][$iUid];
  1348.             }
  1349.             if (count($aMsgHeaders)) {
  1350.                 $composesession attachSelectedMessages($imapConnection,$aMsgHeaders);
  1351.                 // dirty hack, add info to $aMailbox
  1352.                 $aMailbox['FORWARD_SESSION']['SESSION_NUMBER'$composesession;
  1353.                 $aMailbox['FORWARD_SESSION']['UIDS'$aUid;
  1354.             }
  1355.             break;
  1356.           default:
  1357.              // Hook for plugin buttons
  1358.              $temp array(&$sButton&$aMailbox$iAccount$aMailbox['NAME']&$aUid);
  1359.              do_hook('mailbox_display_button_action'$temp);
  1360.              break;
  1361.         }
  1362.         /**
  1363.          * $aUpdatedMsgs is an array containing the result of the untagged
  1364.          * fetch responses send by the imap server due to a flag change. That
  1365.          * response is parsed in an array with msg arrays by the parseFetch function
  1366.          */
  1367.         if ($aUpdatedMsgs{
  1368.             // Update the message headers cache
  1369.             $aDeleted array();
  1370.             foreach ($aUpdatedMsgs as $iUid => $aMsg{
  1371.                 if (isset($aMsg['FLAGS'])) {
  1372.                     /**
  1373.                      * Only update the cached headers if the header is
  1374.                      * cached.
  1375.                      */
  1376.                     if (isset($aMailbox['MSG_HEADERS'][$iUid])) {
  1377.                         $aMailbox['MSG_HEADERS'][$iUid]['FLAGS'$aMsg['FLAGS'];
  1378.                     }
  1379.                     /**
  1380.                      * Also update flags in message object
  1381.                      */
  1382. //FIXME: WHY are we keeping flags in TWO places?!?  This is error-prone and some core code uses the is_xxxx message object values while other code uses the flags array above.  That's a mess.
  1383.                     if (isset($aMailbox['MSG_HEADERS'][$iUid]['MESSAGE_OBJECT'])) {
  1384.                         $message $aMailbox['MSG_HEADERS'][$iUid]['MESSAGE_OBJECT'];
  1385.                         $message->is_seen false;
  1386.                         $message->is_answered false;
  1387.                         $message->is_forwarded false;
  1388.                         $message->is_deleted false;
  1389.                         $message->is_flagged false;
  1390.                         $message->is_mdnsent false;
  1391.                         foreach ($aMsg['FLAGS'as $flag => $value{
  1392.                             if (strtolower($flag== '\\seen' && $value)
  1393.                                 $message->is_seen true;
  1394.                             else if (strtolower($flag== '\\answered' && $value)
  1395.                                 $message->is_answered true;
  1396.                             else if (strtolower($flag== '$forwarded' && $value)
  1397.                                 $message->is_forwarded true;
  1398.                             else if (strtolower($flag== '\\deleted' && $value)
  1399.                                 $message->is_deleted true;
  1400.                             else if (strtolower($flag== '\\flagged' && $value)
  1401.                                 $message->is_flagged true;
  1402.                             else if (strtolower($flag== '$mdnsent' && $value)
  1403.                                 $message->is_mdnsent true;
  1404.                         }
  1405.                         $aMailbox['MSG_HEADERS'][$iUid]['MESSAGE_OBJECT'$message;
  1406.                     }
  1407.                     /**
  1408.                      * Count the messages with the \Delete flag set so we can determine
  1409.                      * if the number of expunged messages equals the number of flagged
  1410.                      * messages for deletion.
  1411.                      */
  1412.                     if (isset($aMsg['FLAGS']['\\deleted']&& $aMsg['FLAGS']['\\deleted']{
  1413.                         $aDeleted[$iUid;
  1414.                     }
  1415.                 }
  1416.             }
  1417.             if ($bExpunge && $aMailbox['AUTO_EXPUNGE'&&
  1418.                 $iExpungedMessages sqimap_mailbox_expunge($imapConnection$aMailbox['NAME']true))
  1419.                 {
  1420.                 if (count($aDeleted!= $iExpungedMessages{
  1421.                     // there are more messages deleted permanently then we expected
  1422.                     // invalidate the cache
  1423.                     $aMailbox['UIDSET'][$aMailbox['SETINDEX']] false;
  1424.                     $aMailbox['MSG_HEADERS'false;
  1425.                 else {
  1426.                     // remove expunged messages from cache
  1427.                     $aUidSet $aMailbox['UIDSET'][$aMailbox['SETINDEX']];
  1428.                     if (is_array($aUidSet)) {
  1429.                         // create a UID => array index temp array
  1430.                         $aUidSetDummy array_flip($aUidSet);
  1431.                         foreach ($aDeleted as $iUid{
  1432.                             // get the id as well in case of SQM_SORT_NONE
  1433.                             if ($aMailbox['SORT'== SQSORT_NONE{
  1434.                                 $aMailbox['ID'false;
  1435.                                 //$iId = $aMailbox['MSG_HEADERS'][$iUid]['ID'];
  1436.                                 //unset($aMailbox['ID'][$iId]);
  1437.                             }
  1438.                             // unset the UID and message header
  1439.                             unset($aUidSetDummy[$iUid]);
  1440.                             unset($aMailbox['MSG_HEADERS'][$iUid]);
  1441.                         }
  1442.                         $aMailbox['UIDSET'][$aMailbox['SETINDEX']] array_keys($aUidSetDummy);
  1443.                     }
  1444.                 }
  1445.                 // update EXISTS info
  1446.                 if ($iExpungedMessages{
  1447.                     $aMailbox['EXISTS'-= (int) $iExpungedMessages;
  1448.                     $aMailbox['TOTAL'][$aMailbox['SETINDEX']] -= (int) $iExpungedMessages;
  1449.                 }
  1450.                 if (($aMailbox['PAGEOFFSET']-1>= $aMailbox['EXISTS']{
  1451.                     $aMailbox['PAGEOFFSET'($aMailbox['PAGEOFFSET'$aMailbox['LIMIT']?
  1452.                         $aMailbox['PAGEOFFSET'$aMailbox['LIMIT'1;
  1453.                      $aMailbox['OFFSET'$aMailbox['PAGEOFFSET';
  1454.                 }
  1455.             }
  1456.         }
  1457.     else {
  1458.         if ($sButton == 'expunge'{
  1459.             /**
  1460.              * on expunge we do not know which messages will be deleted
  1461.              * so it's useless to try to sync the cache
  1462.              *
  1463.              * Close the mailbox so we do not need to parse the untagged expunge
  1464.              * responses which do not contain uid info.
  1465.              * NB: Closing a mailbox is faster then expunge because the imap
  1466.              * server does not need to generate the untagged expunge responses
  1467.              */
  1468.             sqimap_run_command($imapConnection,'CLOSE',false,$result,$message);
  1469.             $aMailbox sqm_api_mailbox_select($imapConnection,$iAccount$aMailbox['NAME'],array(),array());
  1470.         else {
  1471.             // this is the same hook as above, but here it is called in the
  1472.             // context of not having had any messages selected and if any
  1473.             // plugin handles the situation, it should return TRUE so we
  1474.             // know this was not an erroneous user action
  1475.             //
  1476.             global $null;
  1477.             $temp array(&$sButton&$aMailbox$iAccount$aMailbox['NAME']$null);
  1478.             if (!boolean_hook_function('mailbox_display_button_action'$temp1)
  1479.              && $sButton{
  1480.                 $sError _("No messages were selected.");
  1481.             }
  1482.         }
  1483.     }
  1484.     return $sError;
  1485. }
  1486.  
  1487. /**
  1488.  * Attach messages to a compose session
  1489.  *
  1490.  * @param  resource $imapConnection imap connection
  1491.  * @param  array $aMsgHeaders 
  1492.  * @return int $composesession unique compose_session_id where the attached messages belong to
  1493.  * @author Marc Groot Koerkamp
  1494.  */
  1495. function attachSelectedMessages($imapConnection,$aMsgHeaders{
  1496.  
  1497.     sqgetGlobalVar('composesession'$composesessionSQ_SESSION);
  1498.     sqgetGlobalVar('compose_messages'$compose_messagesSQ_SESSION);
  1499.     if (!isset($compose_messages)|| is_null($compose_messages)) {
  1500.         $compose_messages array();
  1501.         sqsession_register($compose_messages,'compose_messages');
  1502.     }
  1503.  
  1504.     if (!$composesession{
  1505.         $composesession 1;
  1506.         sqsession_register($composesession,'composesession');
  1507.     else {
  1508.         $composesession++;
  1509.         sqsession_register($composesession,'composesession');
  1510.     }
  1511.  
  1512.     $composeMessage new Message();
  1513.     $rfc822_header new Rfc822Header();
  1514.     $composeMessage->rfc822_header $rfc822_header;
  1515.     $composeMessage->reply_rfc822_header '';
  1516.  
  1517.     foreach($aMsgHeaders as $iUid => $aMsgHeader{
  1518.         /**
  1519.          * Retrieve the full message
  1520.          */
  1521.         $body_a sqimap_run_command($imapConnection"FETCH $iUid RFC822"true$response$readmessageTRUE);
  1522.         if ($response == 'OK'{
  1523.  
  1524.             $subject (isset($aMsgHeader['subject'])) $aMsgHeader['subject'$iUid;
  1525.  
  1526.             array_shift($body_a);
  1527.             array_pop($body_a);
  1528.             $body implode(''$body_a);
  1529.             $body .= "\r\n";
  1530.  
  1531.             global $username$attachment_dir;
  1532.             $filename sq_get_attach_tempfile();
  1533.             $fullpath getHashedDir($username$attachment_dir'/' $filename;
  1534.             $fp fopen($fullpath'wb');
  1535.             fwrite ($fp$body);
  1536.             fclose($fp);
  1537.  
  1538.             $composeMessage->initAttachment('message/rfc822'$subject '.eml'$filename);
  1539.  
  1540.             // create subject for new message
  1541.             //
  1542.             $subject decodeHeader($subject,false,false,true);
  1543.             $subject str_replace('"'"'"$subject);
  1544.             $subject trim($subject);
  1545.             if (substr(strtolower($subject)04!= 'fwd:'{
  1546.                 $subject 'Fwd: ' $subject;
  1547.             }
  1548.             $composeMessage->rfc822_header->subject $subject;
  1549.  
  1550.         }
  1551.     }
  1552.  
  1553.     $compose_messages[$composesession$composeMessage;
  1554.     sqsession_register($compose_messages,'compose_messages');
  1555.     return $composesession;
  1556. }

Documentation generated on Fri, 28 Aug 2015 04:18:31 +0200 by phpDocumentor 1.4.3