From aed206bf645384642333d8d1970c8245992a20f4 Mon Sep 17 00:00:00 2001
From: lkehresman <lkehresman@7612ce4b-ef26-0410-bec9-ea0150e637f0>
Date: Tue, 18 Apr 2000 00:28:16 +0000
Subject: [PATCH] fixed the problem with us not being RFC complient for courier

git-svn-id: https://svn.code.sf.net/p/squirrelmail/code/trunk/squirrelmail@434 7612ce4b-ef26-0410-bec9-ea0150e637f0
---
 config/conf.pl              |  2 +-
 functions/imap_mailbox.php  | 38 +++++++++++--------------------------
 functions/imap_messages.php |  2 +-
 src/left_main.php           |  3 ++-
 4 files changed, 15 insertions(+), 30 deletions(-)

diff --git a/config/conf.pl b/config/conf.pl
index 6e301d61..2a1fbf10 100755
--- a/config/conf.pl
+++ b/config/conf.pl
@@ -626,7 +626,7 @@ sub command211 {
    print "\n[folders] command (?=help) > ";
    $input = <STDIN>;
    $input =~ s/[\r|\n]//g;
-   while ($input !~ /d/i) {
+   while ($input !~ /^d$/i) {
       ## ADD
       if ($input =~ /^\s*\+\s*.*/) {
          $input =~ s/^\s*\+\s*//;
diff --git a/functions/imap_mailbox.php b/functions/imap_mailbox.php
index f9819a33..2b0ce28a 100755
--- a/functions/imap_mailbox.php
+++ b/functions/imap_mailbox.php
@@ -92,6 +92,7 @@
     **  Formats a mailbox into 4 parts for the $boxes array
     ******************************************************************************/
    function sqimap_mailbox_parse ($line, $dm) {
+		global $folder_prefix;
       for ($g=0; $g < count($line); $g++) {
          $boxes[$g]["raw"] = $line[$g];
             
@@ -100,7 +101,7 @@
          if (substr($mailbox, -1) == $dm)
             $dm_count--;
             
-         for ($j = 0; $j < $dm_count; $j++)
+         for ($j = 0; $j < $dm_count - (countCharInString($folder_prefix, $dm)); $j++)
             $boxes[$g]["formatted"] = $boxes[$g]["formatted"] . "  ";
          $boxes[$g]["formatted"] .= readShortMailboxName($mailbox, $dm);
             
@@ -127,7 +128,8 @@
     **  The array returned looks like this:
     ******************************************************************************/
    function sqimap_mailbox_list ($imap_stream) {
-      global $load_prefs_php, $prefs_php, $config_php, $data_dir, $username;
+      global $load_prefs_php, $prefs_php, $config_php, $data_dir, $username, $list_special_folders_first;
+		global $special_folders;
 
       $inbox_in_list = false;
       $inbox_subscribed = false;
@@ -141,6 +143,7 @@
       /** LIST array **/
       fputs ($imap_stream, "a001 LIST \"\" \"$folder_prefix*\"\r\n");
       $list_ary = sqimap_read_data ($imap_stream, "a001", true, $response, $message);
+
       for ($i=0;$i < count($list_ary); $i++) {
          $sorted_list_ary[$i]["name"] = find_mailbox_name($list_ary[$i]);
          $sorted_list_ary[$i]["raw"]  = $list_ary[$i];
@@ -197,38 +200,20 @@
 	      }
       }
 
-      return sqimap_mailbox_parse ($merged, $dm);
-   }
-   
-/*
-      $original = $boxes;
-
-      for ($i = 0; $i < count($original); $i++) {
-         $boxes[$i]["unformatted"] = strtolower($boxes[$i]["unformatted"]);
-      }
-
-      $boxes = ary_sort($boxes, "unformatted", 1);
-
-      for ($i = 0; $i < count($boxes); $i++) {
-         for ($j = 0; $j < count($original); $j++) {
-            if ($boxes[$i]["id"] == $original[$j]["id"]) {
-               $boxes[$i] = $original[$j];
-            }
-         }
-      }     
- 
-      
+		$boxes = sqimap_mailbox_parse ($merged, $dm);
+		
+		/** Now, lets sort for special folders **/
       for ($i = 0; $i < count($boxes); $i++) {
          if ($boxes[$i]["unformatted"] == $special_folders[0]) {
             $boxesnew[0] = $boxes[$i];
             $boxes[$i]["used"] = true;
          }
       }
-      
+
       if ($list_special_folders_first == true) {
          for ($i = 0; $i < count($boxes); $i++) {
             for ($j = 1; $j < count($special_folders); $j++) {
-               if (substr($boxes[$i]["unformatted"], 0, strlen($special_folders[$j])) == $special_folders[$j]) {
+               if (substr($boxes[$i]["unformatted"], strlen($folder_prefix), strlen($special_folders[$j])) == $special_folders[$j]) {
                   $pos = count($boxesnew);
                   $boxesnew[$pos] = $boxes[$i];
                   $boxes[$i]["used"] = true;
@@ -236,7 +221,7 @@
             }
          }
       }
-      
+		
       for ($i = 0; $i < count($boxes); $i++) {
          if (($boxes[$i]["unformatted"] != $special_folders[0]) &&
              ($boxes[$i]["used"] == false))  {
@@ -248,7 +233,6 @@
 
       return $boxesnew;
    }
-   */
    
    /******************************************************************************
     **  Returns a list of all folders, subscribed or not
diff --git a/functions/imap_messages.php b/functions/imap_messages.php
index a7ac66e6..f506baca 100755
--- a/functions/imap_messages.php
+++ b/functions/imap_messages.php
@@ -40,7 +40,7 @@
     **  Returns some general header information -- FROM, DATE, and SUBJECT
     ******************************************************************************/
    function sqimap_get_small_header ($imap_stream, $id, &$from, &$subject, &$date) {
-      fputs ($imap_stream, "a001 FETCH $id:$id RFC822.HEADER.LINES (From Subject Date)\r\n");
+      fputs ($imap_stream, "a001 FETCH $id:$id BODY[HEADER.FIELDS (DATE FROM SUBJECT)]\r\n");
       $read = sqimap_read_data ($imap_stream, "a001", true, $response, $message);
 
       $subject = _("(no subject)");
diff --git a/src/left_main.php b/src/left_main.php
index f1244e4e..8b7ce15d 100644
--- a/src/left_main.php
+++ b/src/left_main.php
@@ -31,6 +31,7 @@
    echo "<HTML>";
 
    function formatMailboxName($imapConnection, $mailbox, $real_box, $delimeter, $color, $move_to_trash) {
+		global $folder_prefix;
       require ("../config/config.php");
 
       $mailboxURL = urlencode($real_box);
@@ -43,7 +44,7 @@
 
       $special_color = false;
       for ($i = 0; $i < count($special_folders); $i++) {
-         if (($special_folders[$i] == $real_box) && ($use_special_folder_color == true))
+         if ((substr($real_box, strlen($folder_prefix), strlen($special_folders[$i])) == $special_folders[$i]) && ($use_special_folder_color == true))
             $special_color = true;
       }
 
-- 
2.25.1