*
* $Id$
*/
-require_once('../functions/imap_utf7_encode_local.php');
-require_once('../functions/imap_utf7_decode_local.php');
+require_once(SM_PATH . 'functions/imap_utf7_encode_local.php');
+require_once(SM_PATH . 'functions/imap_utf7_decode_local.php');
global $boxesnew;
class mailboxes {
return ($acmp>$bcmp) ? 1: -1;
}
-
function find_mailbox_name ($mailbox) {
+ if (preg_match('/\*.+\"([^\r\n\"]*)\"[\s\r\n]*$/', $mailbox, $regs))
+ return $regs[1];
if (ereg(" *\"([^\r\n\"]*)\"[ \r\n]*$", $mailbox, $regs))
return $regs[1];
ereg(" *([^ \r\n\"]*)[ \r\n]*$",$mailbox,$regs);
return $regs[1];
-
+}
+
+function check_is_noselect ($lsub_line) {
+ return preg_match("/^\* LSUB \([^\)]*\\Noselect[^\)]*\)/i", $lsub_line);
}
/**
function user_strcasecmp($a, $b) {
global $delimiter;
+ return strnatcasecmp($a, $b);
+
/* Calculate the length of some strings. */
$a_length = strlen($a);
$b_length = strlen($b);
$delimiter_length = strlen($delimiter);
/* Set the initial result value. */
- $result = 0;
-
+ $result = 0;
/* Check the strings... */
for ($c = 0; $c < $min_length; ++$c) {
$a_del = substr($a, $c, $delimiter_length);
return $result;
}
+/*
+ * Returns list of options (to be echoed into select statement
+ * based on available mailboxes and separators
+ * Caller should surround options with <SELECT..> </SELECT> and
+ * any formatting.
+ * $imap_stream - $imapConnection to query for mailboxes
+ * $show_selected - array containing list of mailboxes to pre-select (0 if none)
+ * $folder_skip - array of folders to keep out of option list (compared in lower)
+ * $boxes - list of already fetched boxes (for places like folder panel, where
+ * you know these options will be shown 3 times in a row.. (most often unset).
+ */
+function sqimap_mailbox_option_list($imap_stream, $show_selected = 0, $folder_skip = 0, $boxes = 0 ) {
+ global $username, $data_dir;
+ $mbox_options = '';
+
+ $shorten_box_names = getPref($data_dir, $username, 'mailbox_select_style', SMPREF_OFF);
+
+ if ( $boxes == 0 ) {
+ $boxes = sqimap_mailbox_list($imap_stream);
+ }
+ foreach ($boxes as $boxes_part) {
+ if (!in_array('noselect', $boxes_part['flags'])) {
+ $box = $boxes_part['unformatted'];
+ $lowerbox = strtolower($box);
+
+ if ( $folder_skip != 0 && in_array($lowerbox, $folder_skip) ) {
+ continue;
+ }
+ if ($lowerbox == 'inbox'){
+ $box2 = _("INBOX");
+ } else if ( $shorten_box_names == 2 ) { /* delimited, style = 2 */
+ $box2 = str_replace(' ', '. ', $boxes_part['formatted']);
+ } else if ( $shorten_box_names == 1 ) { /* indent, style = 1 */
+ $box2 = $boxes_part['formatted'];
+ } else { /* default, long names, style = 0 */
+ $box2 = str_replace(' ', ' ', imap_utf7_decode_local($boxes_part['unformatted-disp']));
+ }
+ if ($show_selected != 0 && in_array($lowerbox, $show_selected) ) {
+ $mbox_options .= '<OPTION VALUE="'.$box.'" SELECTED>'.$box2.'</OPTION>' . "\n";
+ } else {
+ $mbox_options .= '<OPTION VALUE="'.$box.'">'.$box2.'</OPTION>' . "\n";
+ }
+ }
+ }
+ return $mbox_options;
+}
/*
* Returns sorted mailbox lists in several different ways.
$inbox_in_list = false;
$inbox_subscribed = false;
- require_once('../src/load_prefs.php');
- require_once('../functions/array.php');
+ require_once(SM_PATH . 'include/load_prefs.php');
+ require_once(SM_PATH . 'functions/array.php');
if ($noselect_fix_enable) {
$lsub_args = "LSUB \"$folder_prefix\" \"*%\"";
if (isset($sorted_lsub_ary)) {
usort($sorted_lsub_ary, 'user_strcasecmp');
}
-
+ $sorted_list_ary = $sorted_lsub_ary;
/* LIST array */
- $sorted_list_ary = array();
- for ($i=0; $i < count($sorted_lsub_ary); $i++) {
+// $sorted_list_ary = array();
+// for ($i=0; $i < count($sorted_lsub_ary); $i++) {
+ if (false) {
if (substr($sorted_lsub_ary[$i], -1) == $delimiter) {
$mbx = substr($sorted_lsub_ary[$i], 0, strlen($sorted_lsub_ary[$i])-1);
}
$inbox_in_list = true;
}
}
-
+// $inbox_in_list = true;
/*
* Just in case they're not subscribed to their inbox,
* we'll get it for them anyway
*/
- if (!$inbox_subscribed || !$inbox_in_list) {
+ if (!$inbox_subscribed) {// || !$inbox_in_list) {
$inbox_ary = sqimap_run_command ($imap_stream, "LIST \"\" \"INBOX\"",
true, $response, $message);
/* Another workaround for EIMS */
function sqimap_mailbox_list_all($imap_stream) {
global $list_special_folders_first, $folder_prefix, $delimiter;
- require_once('../functions/array.php');
+ require_once(SM_PATH . 'functions/array.php');
$ssid = sqimap_session_id();
$lsid = strlen( $ssid );
$read_ary = sqimap_read_data ($imap_stream, $ssid, true, $response, $message);
$g = 0;
$phase = 'inbox';
+ $fld_pre_length = strlen($folder_prefix);
for ($i = 0; $i < count($read_ary); $i++) {
/* Another workaround for EIMS */
$read_ary[$i] = $regs[1] . '"' . addslashes(trim($read_ary[$i])) . '"' . $regs[2];
}
if (substr($read_ary[$i], 0, $lsid) != $ssid ) {
-
/* Store the raw IMAP reply */
$boxes[$g]['raw'] = $read_ary[$i];
$mailbox = substr($mailbox, 0, strlen($mailbox) - 1);
}
$boxes[$g]['unformatted'] = $mailbox;
- $boxes[$g]['unformatted-disp'] = ereg_replace('^' . $folder_prefix, '', $mailbox);
+ $boxes[$g]['unformatted-disp'] = substr($mailbox,$fld_pre_length);
+
$boxes[$g]['id'] = $g;
/* Now lets get the flags for this mailbox */
- $read_mlbx = sqimap_run_command ($imap_stream, "LIST \"\" \"$mailbox\"",
- true, $response, $message);
+ $read_mlbx = $read_ary[$i];
+
+// $read_mlbx = sqimap_run_command ($imap_stream, "LIST \"\" \"$mailbox\"",
+// true, $response, $message);
/* Another workaround for EIMS */
- if (isset($read_mlbx[1]) &&
- ereg("^(\\* [A-Z]+.*)\\{[0-9]+\\}([ \n\r\t]*)$", $read_mlbx[0], $regs)) {
- $read_mlbx[0] = $regs[1] . '"' . addslashes(trim($read_mlbx[1])) . '"' . $regs[2];
- }
+// if (isset($read_mlbx[1]) &&
+// ereg("^(\\* [A-Z]+.*)\\{[0-9]+\\}([ \n\r\t]*)$", $read_mlbx[0], $regs)) {
+// $read_mlbx[0] = $regs[1] . '"' . addslashes(trim($read_mlbx[1])) . '"' . $regs[2];
+// }
+// echo $read_mlbx[0] .' raw 2 <br>';
- $flags = substr($read_mlbx[0], strpos($read_mlbx[0], '(')+1);
+ $flags = substr($read_mlbx, strpos($read_mlbx, '(')+1);
$flags = substr($flags, 0, strpos($flags, ')'));
$flags = str_replace('\\', '', $flags);
$flags = trim(strtolower($flags));
$inbox_in_list = false;
$inbox_subscribed = false;
- require_once('../src/load_prefs.php');
- require_once('../functions/array.php');
+ require_once(SM_PATH . 'include/load_prefs.php');
+ require_once(SM_PATH . 'functions/array.php');
/* LSUB array */
$lsub_ary = sqimap_run_command ($imap_stream, "LSUB \"$folder_prefix\" \"*\"",
// $sorted_lsub_ary[] = array ('mbx' => $mbx, 'flag' => $flag);
// }
$mbx = find_mailbox_name($lsub_ary[$i]);
+ $noselect = check_is_noselect($lsub_ary[$i]);
if (substr($mbx, -1) == $delimiter) {
$mbx = substr($mbx, 0, strlen($mbx) - 1);
}
- $sorted_lsub_ary[] = array ('mbx' => $mbx, 'flag' => '');
+ $sorted_lsub_ary[] = array ('mbx' => $mbx, 'noselect' => $noselect);
}
array_multisort($sorted_lsub_ary, SORT_ASC, SORT_REGULAR);
if (($unseen_notify == 2 && $mbx == 'INBOX')
|| $unseen_notify == 3
|| ($move_to_trash && ($mbx == $trash_folder))) {
- $sorted_lsub_ary[$i]['unseen'] = sqimap_unseen_messages($imap_stream, $mbx);
+ $sorted_lsub_ary[$i]['unseen'] =
+ $sorted_lsub_ary[$i]['noselect'] ?
+ 0 : sqimap_unseen_messages($imap_stream, $mbx);
if ($unseen_type == 2 || ($move_to_trash
&& ($mbx == $trash_folder) )) {
- $sorted_lsub_ary[$i]['nummessages'] = sqimap_get_num_messages($imap_stream, $mbx);
+ $sorted_lsub_ary[$i]['nummessages'] =
+ $sorted_lsub_ary[$i]['noselect'] ?
+ 0 : sqimap_get_num_messages($imap_stream, $mbx);
}
if ($mbx == $trash_folder) {
- $sorted_lsub_ary[$i]['nummessages'] = sqimap_get_num_messages($imap_stream, $mbx);
+ $sorted_lsub_ary[$i]['nummessages'] =
+ $sorted_lsub_ary[$i]['noselect'] ?
+ 0 : sqimap_get_num_messages($imap_stream, $mbx);
}
}
}
if (isset($mbx_ary[$i]['nummessages'])) {
$mbx->total = $mbx_ary[$i]['nummessages'];
}
+
+ $mbx->is_noselect = $mbx_ary[$i]['noselect'];
$r_del_pos = strrpos($mbx_ary[$i]['mbx'], $delimiter);
if ($r_del_pos) {