squirrelmail/functions/imap_search.php
Bron Gondwana f8d8561f8d This is a big one - fixes to sqimap_run_command in most uses. Had to add
sqimap_run_command_list as well for those list instances.

I believe that it's now safe for sqimap_session_id() to return a different
ID each time, but haven't yet tested this.
2002-01-12 11:15:12 +00:00

164 lines
5.5 KiB
PHP

<?php
/**
* imap_search.php
*
* Copyright (c) 1999-2002 The SquirrelMail Project Team
* Licensed under the GNU GPL. For full terms see the file COPYING.
*
* IMAP search routines
*
* $Id$
*/
require_once('../functions/imap.php');
require_once('../functions/date.php');
require_once('../functions/array.php');
require_once('../functions/mailbox_display.php');
require_once('../functions/mime.php');
function sqimap_search($imapConnection,$search_where,$search_what,$mailbox,$color, $search_position = '') {
global $msgs, $message_highlight_list, $squirrelmail_language, $languages, $index_order;
global $pos;
$pos = $search_position;
$urlMailbox = urlencode($mailbox);
/* Construct the Search QuERY */
if (isset($languages[$squirrelmail_language]['CHARSET']) &&
$languages[$squirrelmail_language]['CHARSET']) {
$ss = "SEARCH CHARSET ".$languages[$squirrelmail_language]['CHARSET']." ALL $search_where \"$search_what\"";
} else {
$ss .= "SEARCH ALL $search_where \"$search_what\"";
}
/* Read Data Back From IMAP */
$readin = sqimap_run_command ($imapConnection, $ss, true, $result, $message);
if (isset($languages[$squirrelmail_language]['CHARSET']) && strtolower($result) == 'no') {
$ss = "SEARCH CHARSET \"US-ASCII\" ALL $search_where \"$search_what\"";
$readin = sqimap_run_command ($imapConnection, $ss, 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, $issent);
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;
} 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++;
}
$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;
}
$msgs[$i] = $messages[$j];
$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&pos=$pos&where=" . urlencode($search_where) . "&what=".urlencode($search_what),
$mailbox,
-1,
'<b>' . _("Found") . ' ' . count($messagelist) . ' ' . _("messages") . '</b>',
get_selectall_link($start_msg, $sort) );
while ($j < count($msgs)) {
printMessageInfo($imapConnection, $msgs[$j]["ID"], 0, $j, $mailbox, '', 0, $search_where, $search_what);
$j++;
}
echo '</table></td></tr></table></form>';
}
}
?>