6e189ce2 |
1 | <?php |
2ba13803 |
2 | |
35586184 |
3 | /** |
4 | * imap_search.php |
5 | * |
6 | * Copyright (c) 1999-2001 The Squirrelmail Development Team |
7 | * Licensed under the GNU GPL. For full terms see the file COPYING. |
8 | * |
9 | * IMAP search routines |
10 | * |
11 | * $Id$ |
12 | */ |
13 | |
14 | /*****************************************************************/ |
15 | /*** THIS FILE NEEDS TO HAVE ITS FORMATTING FIXED!!! ***/ |
16 | /*** PLEASE DO SO AND REMOVE THIS COMMENT SECTION. ***/ |
17 | /*** + Base level indent should begin at left margin, as ***/ |
18 | /*** the require_once below. ***/ |
19 | /*** + All identation should consist of four space blocks ***/ |
20 | /*** + Tab characters are evil. ***/ |
21 | /*** + all comments should use "slash-star ... star-slash" ***/ |
22 | /*** style -- no pound characters, no slash-slash style ***/ |
23 | /*** + FLOW CONTROL STATEMENTS (if, while, etc) SHOULD ***/ |
24 | /*** ALWAYS USE { AND } CHARACTERS!!! ***/ |
25 | /*** + Please use ' instead of ", when possible. Note " ***/ |
26 | /*** should always be used in _( ) function calls. ***/ |
27 | /*** Thank you for your help making the SM code more readable. ***/ |
28 | /*****************************************************************/ |
29 | |
30 | require_once('../functions/imap.php'); |
31 | require_once('../functions/date.php'); |
32 | require_once('../functions/array.php'); |
33 | require_once('../functions/mailbox_display.php'); |
34 | require_once('../functions/mime.php'); |
2ba13803 |
35 | |
36 | |
37 | function sqimap_search($imapConnection,$search_where,$search_what,$mailbox,$color) { |
38 | |
39 | global $msgs, $message_highlight_list, $squirrelmail_language, $languages, $index_order; |
40 | |
41 | $urlMailbox = urlencode($mailbox); |
42 | $isid = sqimap_session_id(); |
43 | |
44 | /* Construct the Search QuERY */ |
45 | $ss = $isid; |
46 | if (isset($languages[$squirrelmail_language]['CHARSET']) && |
47 | $languages[$squirrelmail_language]['CHARSET']) { |
48 | $ss .= " SEARCH CHARSET ".$languages[$squirrelmail_language]['CHARSET']." ALL $search_where \"$search_what\"\r\n"; |
49 | } else { |
50 | $ss .= " SEARCH ALL $search_where \"$search_what\"\r\n"; |
51 | } |
52 | fputs($imapConnection,$ss); |
53 | |
54 | # Read Data Back From IMAP |
55 | $readin = sqimap_read_data ($imapConnection, $isid, false, $result, $message); |
56 | if (isset($languages[$squirrelmail_language]['CHARSET']) && strtolower($result) == 'no') { |
57 | $ss = $isid . " SEARCH CHARSET \"US-ASCII\" ALL $search_where \"$search_what\"\r\n"; |
58 | fputs ($imapConnection, $ss); |
59 | $readin = sqimap_read_data ($imapConnection, $isid, true, $result, $message); |
60 | } |
61 | |
62 | unset($messagelist); $msgs=""; $c = 0; |
63 | |
64 | /* Keep going till we find the SEARCH responce */ |
65 | while ($c < count( $readin )) { |
66 | |
67 | /* Check to see if a SEARCH Responce was recived */ |
68 | if (substr($readin[$c],0,9) == "* SEARCH ") |
69 | $messagelist = explode(" ",substr($readin[$c],9)); |
70 | else if (isset($errors)) |
71 | $errors = $errors.$readin[$c]; |
72 | else |
73 | $errors = $readin[$c]; |
74 | $c++; |
75 | } |
76 | |
77 | #If nothing is found * SEARCH should be the first error else echo errors |
78 | if (isset($errors) && strstr($errors,"* SEARCH")) { |
79 | echo '<br><CENTER>' . _("No Messages Found") . '</CENTER>'; |
80 | return; |
81 | } else if (isset($errors)) { |
82 | echo "<!-- ".$errors." -->"; |
83 | } |
84 | |
85 | # HACKED CODED FROM ANOTHER FUNCTION, Could Probably dump this and mondify |
86 | # exsitising code with a search true/false varible. |
87 | |
88 | |
89 | global $sent_folder; |
90 | for ($q = 0; $q < count($messagelist); $q++) { |
91 | $id[$q] = trim($messagelist[$q]); |
92 | } |
93 | $issent = ($mailbox == $sent_folder); |
94 | $hdr_list = sqimap_get_small_header_list($imapConnection, $id, $issent); |
95 | $flags = sqimap_get_flags_list($imapConnection, $id, $issent); |
96 | foreach ($hdr_list as $hdr) { |
97 | $from[] = $hdr->from; |
98 | $date[] = $hdr->date; |
99 | $subject[] = $hdr->subject; |
100 | $to[] = $hdr->to; |
101 | $priority[] = $hdr->priority; |
102 | $cc[] = $hdr->cc; |
103 | $size[] = $hdr->size; |
104 | $type[] = $hdr->type0; |
105 | } |
106 | |
107 | $j = 0; |
108 | while ($j < count($messagelist)) { |
109 | $date[$j] = ereg_replace(' ', ' ', $date[$j]); |
110 | $tmpdate = explode(" ", trim($date[$j])); |
111 | |
112 | $messages[$j]["TIME_STAMP"] = getTimeStamp($tmpdate); |
113 | $messages[$j]["DATE_STRING"] = getDateString($messages[$j]["TIME_STAMP"]); |
114 | $messages[$j]["ID"] = $id[$j]; |
115 | $messages[$j]["FROM"] = decodeHeader($from[$j]); |
116 | $messages[$j]["FROM-SORT"] = strtolower(sqimap_find_displayable_name(decodeHeader($from[$j]))); |
117 | $messages[$j]["SUBJECT"] = decodeHeader($subject[$j]); |
118 | $messages[$j]["SUBJECT-SORT"] = strtolower(decodeHeader($subject[$j])); |
119 | $messages[$j]["TO"] = decodeHeader($to[$j]); |
120 | $messages[$j]["PRIORITY"] = $priority[$j]; |
121 | $messages[$j]["CC"] = $cc[$j]; |
122 | $messages[$j]["SIZE"] = $size[$j]; |
123 | $messages[$j]["TYPE0"] = $type[$j]; |
124 | |
125 | $num = 0; |
126 | while ($num < count($flags[$j])) { |
127 | if ($flags[$j][$num] == 'Deleted') { |
128 | $messages[$j]['FLAG_DELETED'] = true; |
129 | } else if ($flags[$j][$num] == 'Answered') { |
130 | $messages[$j]['FLAG_ANSWERED'] = true; |
131 | } else if ($flags[$j][$num] == 'Seen') { |
132 | $messages[$j]['FLAG_SEEN'] = true; |
133 | } else if ($flags[$j][$num] == 'Flagged') { |
134 | $messages[$j]['FLAG_FLAGGED'] = true; |
135 | } |
136 | $num++; |
137 | } |
138 | $j++; |
139 | } |
140 | |
141 | /** Find and remove the ones that are deleted */ |
142 | $i = 0; |
143 | $j = 0; |
144 | while ($j < count($messagelist)) { |
145 | if (isset($messages[$j]["FLAG_DELETED"]) && $messages[$j]["FLAG_DELETED"] == true) { |
146 | $j++; |
147 | continue; |
fc05541b |
148 | } |
2ba13803 |
149 | $msgs[$i] = $messages[$j]; |
150 | |
151 | $i++; |
1809bad8 |
152 | $j++; |
2ba13803 |
153 | } |
154 | $numMessages = $i; |
155 | |
156 | // There's gotta be messages in the array for it to sort them. |
157 | |
158 | if (count($messagelist) > 0) { |
159 | $j=0; |
160 | if (!isset ($msg)) { $msg = ""; } |
161 | mail_message_listing_beginning($imapConnection, |
162 | "move_messages.php?msg=$msg&mailbox=$urlMailbox&where=".urlencode($search_where)."&what=".urlencode($search_what), |
163 | $mailbox, -1, '<b>' . _("Found") . ' ' . count($messagelist) . ' ' . _("messages") . '</b>', |
164 | ' '); |
165 | |
166 | |
167 | while ($j < count($msgs)) { |
168 | printMessageInfo($imapConnection, $msgs[$j]["ID"], 0, $j, $mailbox, "", 0, $search_where, $search_what); |
169 | $j++; |
170 | } |
171 | echo '</table></tr></td></table>'; |
172 | } |
173 | } |
fc05541b |
174 | |
35586184 |
175 | ?> |