Added IMAP speed imrpovements from the guys at XS4ALL
[squirrelmail.git] / functions / imap_search.php
index 3759a45a9d6a2b238a3306d8b343690d71993c43..d1ea2020b4861705ee4d56f64995e4c24d1cfaaf 100644 (file)
-<?php     
-/******************************************************************
- ** IMAP SEARCH ROUTIES
- *****************************************************************/
-   if (!isset($imap_php))
-      include("../functions/imap.php");
-   if (!isset($date_php))
-      include("../functions/date.php");
-   if (!isset($array_php))
-      include("../functions/array.php");
-   if (!isset($mailbox_display_php))
-      include("../functions/mailbox_display.php");
-   if (!isset($mime_php))
-      include("../functions/mime.php");
+<?php 
+   /******************************************************************
+    ** IMAP SEARCH ROUTIES
+    ** $Id$
+    *****************************************************************/
+    
+   if (defined ('imap_search_php'))
+      return;
+   define ('imap_search_php', true);
+   
+   include("../functions/imap.php");
+   include("../functions/date.php");
+   include("../functions/array.php");
+   include("../functions/mailbox_display.php");
+   include("../functions/mime.php");
+
 
 function sqimap_search($imapConnection,$search_where,$search_what,$mailbox,$color) {
-       global $msgs;
-       $urlMailbox = urlencode($mailbox);
-# Construct the Search QuERY
-       $ss = "a001 SEARCH ALL $search_where \"$search_what\"\r\n";
-       fputs($imapConnection,$ss);
-
-#Read Data Back From IMAP
-       $readin = sqimap_read_data ($imapConnection, "a001", true, $result, $message);
-       unset($messagelist); $msgs=""; $c = 0;
-#Keep going till we find the SEARCH responce
-       while ($c < count($readin)) {
-#Check to see if a SEARCH Responce was recived
-               if (substr($readin[$c],0,9) == "* SEARCH ")
-                       $messagelist = explode(" ",substr($readin[$c],9));
-               else
-                       $errors = $errors.$readin[$c];
-               $c++;
-       }
-#If nothing is found * SEARCH should be the first error else echo errors
-       if (strstr($errors,"* SEARCH")) {
-               echo "<br><CENTER>No Messages Found</CENTER>";
-               return;
-       } else {
-               echo "<!-- ".$errors." -->";
-       }
-echo "<br>";
-#HACKED CODED FROM ANOTHER FUNCTION, Could Probably dump this and mondify exsitising code with a search true/false varible.
-
-                global $sent_folder;
-
-            for ($q = 0; $q < count($messagelist); $q++) {
-                       $messagelist[$q] = trim($messagelist[$q]);
-                                        if ($mailbox == $sent_folder)
-                        $hdr = sqimap_get_small_header ($imapConnection, $messagelist[$q], true);
-                                        else
-                        $hdr = sqimap_get_small_header ($imapConnection, $messagelist[$q], false);
-                                        $from[$q] = $hdr->from;
-                                        $date[$q] = $hdr->date;
-                                        $subject[$q] = $hdr->subject;
-                                       $id[$q] = $messagelist[$q];
-
-               $flags[$q] = sqimap_get_flags ($imapConnection, $messagelist[$q]);
+   global $msgs, $message_highlight_list, $squirrelmail_language, $languages, $index_order;
+   $urlMailbox = urlencode($mailbox);
+   
+   # Construct the Search QuERY
+   
+   if (isset($languages[$squirrelmail_language]["CHARSET"]) && $languages[$squirrelmail_language]["CHARSET"]) {
+      $ss = "a001 SEARCH CHARSET ".$languages[$squirrelmail_language]["CHARSET"]." ALL $search_where \"$search_what\"\r\n";
+   } else {
+      $ss = "a001 SEARCH ALL $search_where \"$search_what\"\r\n";
+   }
+   fputs($imapConnection,$ss);
+
+   # Read Data Back From IMAP
+   $readin = sqimap_read_data ($imapConnection, "a001", false, $result, $message);
+   if (isset($languages[$squirrelmail_language]["CHARSET"]) && strtolower($result) == "no") { 
+      $ss = "a001 SEARCH CHARSET \"US-ASCII\" ALL $search_where \"$search_what\"\r\n";
+      fputs ($imapConnection, $ss);
+      $readin = sqimap_read_data ($imapConnection, "a001", true, $result, $message);
+   }
+   unset($messagelist); $msgs=""; $c = 0;
+
+   #Keep going till we find the SEARCH responce
+   while ($c < count($readin)) {
+
+      #Check to see if a SEARCH Responce was recived
+      if (substr($readin[$c],0,9) == "* SEARCH ")
+         $messagelist = explode(" ",substr($readin[$c],9));
+      else if (isset($errors))
+         $errors = $errors.$readin[$c];
+      else
+         $errors = $readin[$c];
+      $c++;
+   }
+
+   #If nothing is found * SEARCH should be the first error else echo errors
+   if (isset($errors) && strstr($errors,"* SEARCH")) {
+      echo "<br><CENTER>No Messages Found</CENTER>";
+      return;
+   } else if (isset($errors)) {
+      echo "<!-- ".$errors." -->";
+   }
+
+   # HACKED CODED FROM ANOTHER FUNCTION, Could Probably dump this and mondify 
+   # exsitising code with a search true/false varible.
+
+
+   global $sent_folder;
+   for ($q = 0; $q < count($messagelist); $q++) {
+      $id[$q] = trim($messagelist[$q]);
+   }
+   $issent = ($mailbox == $sent_folder);
+   $hdr_list = sqimap_get_small_header_list($imapConnection, $id, $issent);
+   $flags = sqimap_get_flags_list($imapConnection, $id, $issnet);
+   foreach ($hdr_list as $hdr) {
+      $from[] = $hdr->from;
+      $date[] = $hdr->date;
+      $subject[] = $hdr->subject;
+      $to[] = $hdr->to;
+      $priority[] = $hdr->priority;
+      $cc[] = $hdr->cc;
+      $size[] = $hdr->size;
+      $type[] = $hdr->type0;
+   }   
+
+   $j = 0;
+   while ($j < count($messagelist)) {
+         $date[$j] = ereg_replace('  ', ' ', $date[$j]);
+         $tmpdate = explode(" ", trim($date[$j]));
+
+         $messages[$j]["TIME_STAMP"] = getTimeStamp($tmpdate);
+         $messages[$j]["DATE_STRING"] = getDateString($messages[$j]["TIME_STAMP"]);
+         $messages[$j]["ID"] = $id[$j];
+         $messages[$j]["FROM"] = decodeHeader($from[$j]);
+         $messages[$j]["FROM-SORT"] = strtolower(sqimap_find_displayable_name(decodeHeader($from[$j])));
+         $messages[$j]["SUBJECT"] = decodeHeader($subject[$j]);
+         $messages[$j]["SUBJECT-SORT"] = strtolower(decodeHeader($subject[$j]));
+         $messages[$j]["TO"] = decodeHeader($to[$j]);
+         $messages[$j]["PRIORITY"] = $priority[$j];
+         $messages[$j]["CC"] = $cc[$j];
+                $messages[$j]["SIZE"] = $size[$j];
+                $messages[$j]["TYPE0"] = $type[$j];
+
+         $num = 0;
+         while ($num < count($flags[$j])) {
+            if ($flags[$j][$num] == "Deleted") {
+               $messages[$j]["FLAG_DELETED"] = true;
             }
-
-         $j = 0;
-         while ($j < count($messagelist)) {
-            $date[$j] = ereg_replace("  ", " ", $date[$j]);
-            $tmpdate = explode(" ", trim($date[$j]));
-
-            $messages[$j]["TIME_STAMP"] = getTimeStamp($tmpdate);
-            $messages[$j]["DATE_STRING"] = getDateString($messages[$j]["TIME_STAMP"]);
-            $messages[$j]["ID"] = $id[$j]; 
-            $messages[$j]["FROM"] = decodeHeader($from[$j]);
-            $messages[$j]["SUBJECT"] = decodeHeader($subject[$j]);
-
-            $num = 0;
-            while ($num < count($flags[$j])) {
-               if ($flags[$j][$num] == "Deleted") {
-                  $messages[$j]["FLAG_DELETED"] = true;
-               }
-               else if ($flags[$j][$num] == "Answered") {
-                  $messages[$j]["FLAG_ANSWERED"] = true;
-               }
-               else if ($flags[$j][$num] == "Seen") {
-                  $messages[$j]["FLAG_SEEN"] = true;
-               }
-               else if ($flags[$j][$num] == "Flagged") {
-                  $messages[$j]["FLAG_FLAGGED"] = true;
-               }
-               $num++;
+            else if ($flags[$j][$num] == "Answered") {
+               $messages[$j]["FLAG_ANSWERED"] = true;
             }
-            $j++;
-         }
-
-         /** Find and remove the ones that are deleted */
-         $i = 0;
-         $j = 0;
-         while ($j < count($messagelist)) {
-            if ($messages[$j]["FLAG_DELETED"] == true) {
-               $j++;
-               continue;
+            else if ($flags[$j][$num] == "Seen") {
+               $messages[$j]["FLAG_SEEN"] = true;
             }
-            $msgs[$i] = $messages[$j];
-
-            $i++;
+            else if ($flags[$j][$num] == "Flagged") {
+               $messages[$j]["FLAG_FLAGGED"] = true;
+            }
+            $num++;
+         }
+         $j++;
+   }
+
+      /** Find and remove the ones that are deleted */
+      $i = 0;
+      $j = 0;
+      while ($j < count($messagelist)) {
+         if (isset($messages[$j]["FLAG_DELETED"]) && $messages[$j]["FLAG_DELETED"] == true) {
             $j++;
+            continue;
          }
-         $numMessages = $i;
+         $msgs[$i] = $messages[$j];
 
- // There's gotta be messages in the array for it to sort them.
-
-# Carn't Use the Display messages function it assumes messages are in order.
-# Again More code Hacked from else where
-
-# AT THE MOMENT YOU CARN'T SORT SEARCH RESULTS
-
-# ACTULLY THE CODE IS PROLLY BROKEN ANY HOW!
-
-       if (count($messagelist) > 0) {
-       $j=0;
-echo "<CENTER>"._("Found")." ".count($messagelist)." "._("Messages")."</CENTER>\n";
-echo "<br>\n";
-echo "<TABLE WIDTH=100% BORDER=0 CELLPADDING=2 CELLSPACING=0>";
-      echo "<TR><TD BGCOLOR=\"$color[0]\">";
-
-      echo "\n\n\n<FORM name=messageList method=post action=\"move_messages.php?msg=$msg&mailbox=$urlMailbox&startMessage=0\">";
-      echo "<TABLE BGCOLOR=\"$color[0]\" COLS=2 BORDER=0 cellpadding=0 cellspacing=0>\n";
-      echo "   <TR>\n";
-      echo "      <TD WIDTH=60% ALIGN=LEFT>\n";
-      echo "         <NOBR><SMALL>". _("Move selected to:") ."</SMALL>";
-      echo "         <TT><SMALL><SELECT NAME=\"targetMailbox\">";
-
-      $boxes = sqimap_mailbox_list($imapConnection);
-      for ($i = 0; $i < count($boxes); $i++) {
-         if ($boxes[$i]["flags"][0] != "noselect" && $boxes[$i]["flags"][1] != "noselect" && $boxes[$i]["flags"][2] != "noselect") {
-            $box = $boxes[$i]["unformatted"];
-            $box2 = replace_spaces($boxes[$i]["formatted"]);
-            echo "         <OPTION VALUE=\"$box\">$box2\n";
+         $i++;
+         $j++;
+      }
+      $numMessages = $i;
+
+      // There's gotta be messages in the array for it to sort them.
+
+      if (count($messagelist) > 0) {
+         $j=0;
+                if (!isset ($msg)) { $msg = ""; }
+         mail_message_listing_beginning($imapConnection, 
+            "move_messages.php?msg=$msg&mailbox=$urlMailbox&where=".urlencode($search_where)."&what=".urlencode($search_what),
+             '', -1, '<b>' . _("Found") . ' ' . count($messagelist) . ' ' . _("messages") . '</b>',
+             '&nbsp;');
+         
+         while ($j < count($msgs)) {
+            printMessageInfo($imapConnection, $msgs[$j]["ID"], 0, $j, $mailbox, "", 0, $search_where, $search_what);
+            $j++;
          }
+         echo "</table>";
+         echo "</tr></td></table>";
       }
-      echo "         </SELECT></SMALL></TT>";
-      echo "         <SMALL><INPUT TYPE=SUBMIT NAME=\"moveButton\" VALUE=\"". _("Move") ."\"></SMALL></NOBR>\n";
-
-      echo "      </TD>\n";
-      echo "      <TD WIDTH=40% ALIGN=RIGHT>\n";
-      echo "         <NOBR><SMALL><INPUT TYPE=SUBMIT VALUE=\"". _("Delete") ."\">&nbsp;". _("checked messages") ."</SMALL></NOBR>\n";
-      echo "      </TD>";
-      echo "   </TR>\n";
-
-      echo "</TABLE>\n\n\n";
-      echo "</TD></TR>";
-echo "<TR><TD BGCOLOR=\"$color[0]\">";
-      echo "<TABLE WIDTH=100% BORDER=0 CELLPADDING=2 CELLSPACING=1 BGCOLOR=\"$color[4]\">";
-      echo "<TR BGCOLOR=\"$color[5]\" ALIGN=\"center\">";
-      echo "   <TD WIDTH=1%><B>&nbsp;</B></TD>";
-      /** FROM HEADER **/
-      if ($mailbox == $sent_folder)
-         echo "   <TD WIDTH=30%><B>". _("To") ."</B></td>";
-      else
-         echo "   <TD WIDTH=30%><B>". _("From") ."</B></td>";
-      /** DATE HEADER **/
-      echo "   <TD nowrap WIDTH=1%><B>". _("Date") ."</B></td>";
-               echo "   <TD WIDTH=1%>&nbsp;</TD>\n";
-      /** SUBJECT HEADER **/
-      echo "   <TD WIDTH=%><B>". _("Subject") ."</B></td>\n";
-      echo "</TR>";
-       
-while ($j < count($msgs)) {
-               printMessageInfo($imapConnection, $msgs[$j]["ID"], 0, $j, $mailbox, "", 0);
-               //echo $msgs[$j]["SUBJECT"]."<br>";
-               $j++;
-       }
-echo "</table>";
-echo "</tr></td></table>";
-       }
-}
+   }
 
 ?>