c61bb006 |
1 | <?php |
245a6892 |
2 | |
35586184 |
3 | /** |
a5ee5ac2 |
4 | * search.php |
35586184 |
5 | * |
76911253 |
6 | * Copyright (c) 1999-2003 The SquirrelMail Project Team |
35586184 |
7 | * Licensed under the GNU GPL. For full terms see the file COPYING. |
8 | * |
6b37252b |
9 | * Originally by Alex Lemaresquier - Brainstorm - alex at brainstorm.fr |
35586184 |
10 | */ |
2d367c68 |
11 | |
86725763 |
12 | /* Path for SquirrelMail required files. */ |
13 | define('SM_PATH','../'); |
14 | |
15 | /* SquirrelMail required files. */ |
08185f2a |
16 | require_once(SM_PATH . 'include/validate.php'); |
86725763 |
17 | require_once(SM_PATH . 'functions/imap.php'); |
6b37252b |
18 | require_once(SM_PATH . 'functions/imap_asearch.php'); |
86725763 |
19 | require_once(SM_PATH . 'functions/imap_mailbox.php'); |
86725763 |
20 | require_once(SM_PATH . 'functions/strings.php'); |
c61bb006 |
21 | |
6b37252b |
22 | function asearch_unhtml_strcoll($a, $b) |
23 | { |
24 | return strcoll(asearch_unhtmlentities($a), asearch_unhtmlentities($b)); |
25 | } |
26 | |
27 | function imap_get_mailbox_display($mailbox) |
28 | { |
3dffe83f |
29 | if (strtoupper($mailbox) == 'INBOX') |
6b37252b |
30 | return _("INBOX"); |
31 | return imap_utf7_decode_local($mailbox); |
32 | } |
56e0b3b7 |
33 | |
6b37252b |
34 | function asearch_get_mailbox_display($mailbox) |
35 | { |
36 | if ($mailbox == 'All Folders') |
37 | return _("All Folders"); |
38 | return imap_get_mailbox_display($mailbox); |
39 | } |
0b97a708 |
40 | |
05f5b952 |
41 | function asearch_get_title_display($color, $txt) |
6b37252b |
42 | { |
43 | return '<b><big>' . $txt . '</big></b>'; |
44 | } |
0b97a708 |
45 | |
05f5b952 |
46 | function asearch_get_error_display($color, $txt) |
6b37252b |
47 | { |
05f5b952 |
48 | return '<font color="' . $color[2] . '">' . '<b><big>' . $txt . '</big></b></font>'; |
49 | /*return '<b><big>' . $txt . '</big></b>';*/ |
0b97a708 |
50 | } |
6b37252b |
51 | |
52 | function asearch_serialize($input_array) |
53 | { |
54 | /*return $input_array[0];*/ |
55 | return serialize($input_array); |
0b97a708 |
56 | } |
6b37252b |
57 | |
58 | function asearch_unserialize($input_string) |
59 | { |
60 | /*return array($input_string);*/ |
61 | return unserialize($input_string); |
0b97a708 |
62 | } |
6b37252b |
63 | |
64 | function asearch_getPref($data_dir, $username, $key, $index, $default = '') |
65 | { |
66 | return getPref($data_dir, $username, $key . $index, $default); |
0b97a708 |
67 | } |
6b37252b |
68 | |
69 | function asearch_setPref($data_dir, $username, $key, $index, $value) |
70 | { |
71 | return setPref($data_dir, $username, $key . $index, $value); |
0b97a708 |
72 | } |
6b37252b |
73 | |
74 | function asearch_removePref($data_dir, $username, $key, $index) |
75 | { |
76 | return removePref($data_dir, $username, $key . $index); |
0b97a708 |
77 | } |
0b97a708 |
78 | |
6b37252b |
79 | /* sanity checks, done before running the imap command and before push_recent */ |
05f5b952 |
80 | function asearch_check_query($where_array, $what_array, $exclude_array) |
6b37252b |
81 | { |
05f5b952 |
82 | global $imap_asearch_opcodes; |
83 | |
6b37252b |
84 | if (empty($where_array)) |
85 | return _("Please enter something to search for"); |
86 | if (count($exclude_array) == count($where_array)) |
87 | return _("There must be at least one criteria to search for"); |
05f5b952 |
88 | for ($crit_num = 0; $crit_num < count($where_array); $crit_num++) { |
89 | $where = $where_array[$crit_num]; |
90 | $what = $what_array[$crit_num]; |
91 | if (!(($what == '') ^ ($imap_asearch_opcodes[$where] != ''))) |
92 | return _("Error in criteria argument"); |
93 | } |
6b37252b |
94 | return ''; |
56e0b3b7 |
95 | } |
96 | |
6b37252b |
97 | /* read the recent searches */ |
98 | function asearch_read_recent($data_dir, $username) |
99 | { |
100 | global $recent_prefkeys; |
101 | |
102 | $recent_array = array(); |
103 | $recent_max = getPref($data_dir, $username, 'search_memory', 0); |
104 | for ($recent_num = 0; $recent_num < $recent_max; $recent_num++) { |
105 | foreach ($recent_prefkeys as $prefkey) { |
106 | $pref = asearch_getPref($data_dir, $username, $prefkey, $recent_num); |
107 | /* if (!empty($pref))*/ |
108 | $recent_array[$prefkey][$recent_num] = $pref; |
109 | } |
110 | if (empty($recent_array[$recent_prefkeys[0]][$recent_num])) { |
111 | foreach ($recent_prefkeys as $key) { |
112 | array_pop($recent_array[$key]); |
113 | } |
114 | break; |
115 | } |
116 | } |
117 | return $recent_array; |
56e0b3b7 |
118 | } |
23a9084b |
119 | |
6b37252b |
120 | /* get the saved searches */ |
121 | function asearch_read_saved($data_dir, $username) |
122 | { |
123 | global $saved_prefkeys; |
124 | |
125 | $saved_array = array(); |
126 | $saved_key = $saved_prefkeys[0]; |
127 | for ($saved_count = 0; ; $saved_count++) { |
128 | $pref = asearch_getPref($data_dir, $username, $saved_key, $saved_count); |
129 | if (empty($pref)) |
130 | break; |
131 | } |
132 | for ($saved_num = 0; $saved_num < $saved_count; $saved_num++) { |
133 | foreach ($saved_prefkeys as $key) { |
134 | $saved_array[$key][$saved_num] = asearch_getPref($data_dir, $username, $key, $saved_num); |
135 | } |
136 | } |
137 | return $saved_array; |
138 | } |
139 | |
140 | /* save a recent search */ |
141 | function asearch_save_recent($data_dir, $username, $recent_index) |
142 | { |
143 | global $recent_prefkeys, $saved_prefkeys; |
144 | |
145 | $saved_array = asearch_read_saved($data_dir, $username); |
146 | $saved_index = count($saved_array[$saved_prefkeys[0]]); |
147 | $recent_array = asearch_read_recent($data_dir, $username); |
148 | $n = 0; |
149 | foreach ($recent_prefkeys as $key) { |
150 | $recent_slice = array_slice($recent_array[$key], $recent_index, 1); |
151 | if (!empty($recent_slice[0])) |
152 | asearch_setPref($data_dir, $username, $saved_prefkeys[$n], $saved_index, $recent_slice[0]); |
153 | else |
154 | asearch_removePref($data_dir, $username, $saved_prefkeys[$n], $saved_index); |
155 | $n++; |
156 | } |
157 | } |
158 | |
159 | function asearch_write_recent($data_dir, $username, $recent_array) |
160 | { |
161 | global $recent_prefkeys; |
162 | |
163 | $recent_max = getPref($data_dir, $username, 'search_memory', 0); |
164 | $recent_count = min($recent_max, count($recent_array[$recent_prefkeys[0]])); |
165 | for ($recent_num=0; $recent_num < $recent_count; $recent_num++) { |
166 | foreach ($recent_prefkeys as $key) { |
167 | asearch_setPref($data_dir, $username, $key, $recent_num, $recent_array[$key][$recent_num]); |
168 | } |
169 | } |
170 | for (; $recent_num < $recent_max; $recent_num++) { |
171 | foreach ($recent_prefkeys as $key) { |
172 | asearch_removePref($data_dir, $username, $key, $recent_num); |
173 | } |
174 | } |
175 | } |
176 | |
177 | /* forget a recent search */ |
178 | function asearch_forget_recent($data_dir, $username, $forget_index) |
179 | { |
180 | global $recent_prefkeys; |
181 | |
182 | $recent_array = asearch_read_recent($data_dir, $username); |
183 | foreach ($recent_prefkeys as $key) { |
184 | array_splice($recent_array[$key], $forget_index, 1); |
185 | } |
186 | asearch_write_recent($data_dir, $username, $recent_array); |
187 | } |
188 | |
189 | function asearch_recent_exists($recent_array, $mailbox_array, $biop_array, $unop_array, $where_array, $what_array, $exclude_array) |
190 | { |
191 | global $recent_prefkeys; |
192 | |
193 | $mailbox_string = asearch_serialize($mailbox_array); |
194 | $biop_string = asearch_serialize($biop_array); |
195 | $unop_string = asearch_serialize($unop_array); |
196 | $where_string = asearch_serialize($where_array); |
197 | $what_string = asearch_serialize($what_array); |
198 | $exclude_string = asearch_serialize($exclude_array); |
199 | $recent_count = count($recent_array[$recent_prefkeys[0]]); |
200 | for ($recent_num=0; $recent_num<$recent_count; $recent_num++) { |
201 | if (isset($recent_array[$recent_prefkeys[0]][$recent_num])) { |
202 | if ( |
203 | $mailbox_string == $recent_array['asearch_recent_mailbox'][$recent_num] && |
204 | $biop_string == $recent_array['asearch_recent_biop'][$recent_num] && |
205 | $unop_string == $recent_array['asearch_recent_unop'][$recent_num] && |
206 | $where_string == $recent_array['asearch_recent_where'][$recent_num] && |
207 | $what_string == $recent_array['asearch_recent_what'][$recent_num] && |
208 | $exclude_string == $recent_array['asearch_recent_exclude'][$recent_num] |
209 | ) |
210 | return TRUE; |
211 | } |
212 | } |
213 | return FALSE; |
214 | } |
215 | |
216 | /* push a recent search */ |
217 | function asearch_push_recent($data_dir, $username, $mailbox_array, $biop_array, $unop_array, $where_array, $what_array, $exclude_array) |
218 | { |
219 | global $recent_prefkeys; |
220 | |
221 | $recent_max = getPref($data_dir, $username, 'search_memory', 0); |
222 | if ($recent_max > 0) { |
223 | $recent_array = asearch_read_recent($data_dir, $username); |
224 | if (!asearch_recent_exists($recent_array, $mailbox_array, $biop_array, $unop_array, $where_array, $what_array, $exclude_array)) { |
225 | $input = array($where_array, $mailbox_array, $what_array, $biop_array, $unop_array, $exclude_array); |
226 | $i = 0; |
227 | foreach ($recent_prefkeys as $key) { |
228 | array_unshift($recent_array[$key], asearch_serialize($input[$i])); |
229 | $i++; |
230 | } |
231 | asearch_write_recent($data_dir, $username, $recent_array); |
232 | } |
233 | } |
234 | } |
235 | |
236 | /* edit a recent search */ |
237 | function asearch_edit_recent($data_dir, $username, $index) |
238 | { |
239 | global $mailbox_array, $biop_array, $unop_array, $where_array, $what_array, $exclude_array; |
240 | |
241 | $mailbox_array = asearch_unserialize(asearch_getPref($data_dir, $username, 'asearch_recent_mailbox', $index)); |
242 | $biop_array = asearch_unserialize(asearch_getPref($data_dir, $username, 'asearch_recent_biop', $index)); |
243 | $unop_array = asearch_unserialize(asearch_getPref($data_dir, $username, 'asearch_recent_unop', $index)); |
244 | $where_array = asearch_unserialize(asearch_getPref($data_dir, $username, 'asearch_recent_where', $index)); |
245 | $what_array = asearch_unserialize(asearch_getPref($data_dir, $username, 'asearch_recent_what', $index)); |
246 | $exclude_array = asearch_unserialize(asearch_getPref($data_dir, $username, 'asearch_recent_exclude', $index)); |
247 | } |
248 | |
249 | /* edit the last recent search if the prefs permit it */ |
250 | function asearch_edit_last($data_dir, $username) |
251 | { |
252 | if (getPref($data_dir, $username, 'search_memory', 0) > 0) |
253 | asearch_edit_recent($data_dir, $username, 0); |
254 | } |
255 | |
256 | /* edit a saved search */ |
257 | function asearch_edit_saved($data_dir, $username, $index) |
258 | { |
259 | global $mailbox_array, $biop_array, $unop_array, $where_array, $what_array, $exclude_array; |
260 | |
261 | $mailbox_array = asearch_unserialize(asearch_getPref($data_dir, $username, 'asearch_saved_mailbox', $index)); |
262 | $biop_array = asearch_unserialize(asearch_getPref($data_dir, $username, 'asearch_saved_biop', $index)); |
263 | $unop_array = asearch_unserialize(asearch_getPref($data_dir, $username, 'asearch_saved_unop', $index)); |
264 | $where_array = asearch_unserialize(asearch_getPref($data_dir, $username, 'asearch_saved_where', $index)); |
265 | $what_array = asearch_unserialize(asearch_getPref($data_dir, $username, 'asearch_saved_what', $index)); |
266 | $exclude_array = asearch_unserialize(asearch_getPref($data_dir, $username, 'asearch_saved_exclude', $index)); |
267 | } |
268 | |
269 | function asearch_write_saved($data_dir, $username, $saved_array) |
270 | { |
271 | global $saved_prefkeys; |
272 | |
273 | $saved_count = count($saved_array[$saved_prefkeys[0]]); |
274 | for ($saved_num=0; $saved_num < $saved_count; $saved_num++) { |
275 | foreach ($saved_prefkeys as $key) { |
276 | asearch_setPref($data_dir, $username, $key, $saved_num, $saved_array[$key][$saved_num]); |
277 | } |
278 | } |
279 | foreach ($saved_prefkeys as $key) { |
280 | asearch_removePref($data_dir, $username, $key, $saved_count); |
281 | } |
282 | } |
283 | |
284 | /* delete a saved search */ |
285 | function asearch_delete_saved($data_dir, $username, $saved_index) |
286 | { |
287 | global $saved_prefkeys; |
288 | |
289 | $saved_array = asearch_read_saved($data_dir, $username); |
290 | $asearch_keys = $saved_prefkeys; |
291 | foreach ($asearch_keys as $key) { |
292 | array_splice($saved_array[$key], $saved_index, 1); |
293 | } |
294 | asearch_write_saved($data_dir, $username, $saved_array); |
295 | } |
296 | |
297 | /* translate the input date to imap date to local date display, so the user can know if the date is wrong or illegal */ |
298 | function asearch_get_date_display($what) |
299 | { |
300 | $what_parts = sqimap_asearch_parse_date($what); |
301 | if (count($what_parts) == 4) { |
302 | if (checkdate($what_parts[2], $what_parts[1], $what_parts[3])) { |
303 | $what_display = date_intl(_("M j, Y"),mktime(0,0,0,$what_parts[2],$what_parts[1],$what_parts[3])); |
304 | /*$what_display = $what_parts[1] . ' ' . getMonthName($what_parts[2]) . ' ' . $what_parts[3];*/ |
305 | } |
306 | else |
307 | $what_display = _("(Illegal date)"); |
308 | } |
309 | else |
310 | $what_display = _("(Wrong date)"); |
311 | return $what_display; |
312 | } |
313 | |
314 | /* translate the query to rough natural display */ |
05f5b952 |
315 | function asearch_get_query_display($color, $mailbox_array, $biop_array, $unop_array, $where_array, $what_array, $exclude_array) |
6b37252b |
316 | { |
317 | global $imap_asearch_biops_in, $imap_asearch_biops, $imap_asearch_unops, $imap_asearch_options; |
318 | global $imap_asearch_opcodes; |
319 | |
320 | $last_mailbox = $mailbox_array[0]; |
321 | if (empty($last_mailbox)) |
322 | $last_mailbox = 'INBOX'; |
05f5b952 |
323 | $query_display = ''; |
324 | for ($crit_num=0; $crit_num < count($where_array); $crit_num++) { |
325 | if ((!isset($exclude_array[$crit_num])) || (!$exclude_array[$crit_num])) { |
326 | $cur_mailbox = $mailbox_array[$crit_num]; |
6b37252b |
327 | if (empty($cur_mailbox)) |
328 | $cur_mailbox = 'INBOX'; |
05f5b952 |
329 | $biop = asearch_nz($biop_array[$crit_num]); |
330 | if (($query_display == '') || ($cur_mailbox != $last_mailbox)) { |
6b37252b |
331 | $mailbox_display = ' <B>' . asearch_get_mailbox_display($cur_mailbox) . '</B>'; |
05f5b952 |
332 | if ($query_display == '') |
6b37252b |
333 | $biop_display = _("In"); |
334 | else |
335 | $biop_display = $imap_asearch_biops_in[$biop]; |
336 | $last_mailbox = $cur_mailbox; |
337 | } |
338 | else { |
339 | $mailbox_display = ''; |
340 | $biop_display = $imap_asearch_biops[$biop]; |
341 | } |
342 | $biop_display = ' <U><I>' . $biop_display . '</I></U>'; |
05f5b952 |
343 | $unop = $unop_array[$crit_num]; |
6b37252b |
344 | $unop_display = $imap_asearch_unops[$unop]; |
05f5b952 |
345 | $where = $where_array[$crit_num]; |
6b37252b |
346 | $where_display = $imap_asearch_options[$where]; |
347 | if ($unop_display != '') |
348 | $where_display = ' <U><I>' . $unop_display . ' ' . $where_display . '</I></U>'; |
349 | else |
350 | $where_display = ' <U><I>' . $where_display . '</I></U>'; |
351 | $what_type = $imap_asearch_opcodes[$where]; |
05f5b952 |
352 | $what = $what_array[$crit_num]; |
353 | if ($what_type) { /* Check opcode parameter */ |
354 | if ($what == '') |
355 | $what_display = ' ' . asearch_get_error_display($color, _("(Missing argument)")); |
6b37252b |
356 | else { |
05f5b952 |
357 | if ($what_type == 'adate') |
358 | $what_display = asearch_get_date_display($what); |
6b37252b |
359 | else |
360 | $what_display = htmlspecialchars($what); |
05f5b952 |
361 | $what_display = ' <B>' . $what_display . '</B>'; |
6b37252b |
362 | } |
6b37252b |
363 | } |
05f5b952 |
364 | else { |
365 | if ($what) |
366 | $what_display = ' ' . asearch_get_error_display($color, _("(Spurious argument)")); |
367 | else |
368 | $what_display = ''; |
369 | } |
370 | $query_display .= ' ' . $biop_display . $mailbox_display . $where_display . $what_display; |
6b37252b |
371 | } |
372 | } |
05f5b952 |
373 | return $query_display; |
6b37252b |
374 | } |
375 | |
376 | /* Handle the alternate row colors */ |
377 | function asearch_get_row_color($color, $row_num) |
378 | { |
379 | /*$color_string = ($row_num%2 ? $color[0] : $color[4]);*/ |
380 | $color_string = $color[4]; |
381 | if ($GLOBALS['alt_index_colors']) { |
382 | if (($row_num % 2) == 0) { |
383 | if (!isset($color[12])) |
384 | $color[12] = '#EAEAEA'; |
385 | $color_string = $color[12]; |
386 | } |
387 | } |
388 | return $color_string; |
389 | } |
390 | |
391 | /* Print a whole query array, recent or saved */ |
392 | function asearch_print_query_array($query_array, $query_keys, $action_array, $title) |
393 | { |
394 | global $color; |
395 | |
396 | echo "<br>\n"; |
397 | echo html_tag( 'table', '', 'center', $color[9], 'width="95%" cellpadding="1" cellspacing="1" border="0"' ); |
05f5b952 |
398 | echo html_tag( 'tr', html_tag( 'td', asearch_get_title_display($color, $title), 'center', $color[5], 'colspan=5')); |
6b37252b |
399 | $main_key = $query_keys[0]; |
400 | $query_count = count($query_array[$main_key]); |
401 | for ($query_num=0, $row_num=0; $query_num<$query_count; $query_num++) { |
402 | if (!empty($query_array[$main_key][$query_num])) { |
403 | echo html_tag('tr', '', '', asearch_get_row_color($color, $row_num)); |
404 | |
405 | unset($search_array); |
406 | foreach ($query_keys as $query_key) { |
407 | $search_array[] = asearch_unserialize($query_array[$query_key][$query_num]); |
408 | } |
409 | $mailbox_array = $search_array[1]; |
410 | $biop_array = $search_array[3]; |
411 | $unop_array = $search_array[4]; |
412 | $where_array = $search_array[0]; |
413 | $what_array = $search_array[2]; |
414 | $exclude_array = $search_array[5]; |
05f5b952 |
415 | $query_display = asearch_get_query_display($color, $mailbox_array, $biop_array, $unop_array, $where_array, $what_array, $exclude_array); |
6b37252b |
416 | |
417 | echo html_tag( 'td', $query_num+1, 'right'); |
418 | echo html_tag( 'td', $query_display, 'center', '', 'width="80%"'); |
419 | foreach ($action_array as $action => $action_display) { |
420 | echo html_tag('td', '<a href=search.php?submit=' . $action . '&rownum=' . $query_num . '>' . $action_display . '</a>', 'center'); |
421 | } |
422 | |
423 | echo '</tr>' . "\n"; |
424 | $row_num++; |
425 | } |
426 | } |
427 | echo '</table>' . "\n"; |
428 | } |
429 | |
430 | /* print the saved array */ |
431 | function asearch_print_saved($data_dir, $username) |
432 | { |
433 | global $saved_prefkeys; |
434 | |
435 | $saved_array = asearch_read_saved($data_dir, $username); |
05f5b952 |
436 | if (isset($saved_array[$saved_prefkeys[0]])) { |
437 | $saved_count = count($saved_array[$saved_prefkeys[0]]); |
438 | if ($saved_count > 0) { |
439 | $saved_actions = array('edit_saved' => _("edit"), 'search_saved' => _("search"), 'delete_saved' => _("delete")); |
440 | asearch_print_query_array($saved_array, $saved_prefkeys, $saved_actions, _("Saved Searches")); |
441 | } |
6b37252b |
442 | } |
70c4fd84 |
443 | } |
6c8388a9 |
444 | |
6b37252b |
445 | /* print the recent array */ |
446 | function asearch_print_recent($data_dir, $username) |
447 | { |
448 | global $recent_prefkeys; |
449 | |
450 | $recent_array = asearch_read_recent($data_dir, $username); |
05f5b952 |
451 | if (isset($recent_array[$recent_prefkeys[0]])) { |
452 | $recent_count = count($recent_array[$recent_prefkeys[0]]); |
453 | $recent_max = min($recent_count, getPref($data_dir, $username, 'search_memory', 0)); |
454 | if ($recent_max > 0) { |
455 | $recent_actions = array('save_recent' => _("save"), 'search_recent' => _("search"), 'forget_recent' => _("forget")); |
456 | asearch_print_query_array($recent_array, $recent_prefkeys, $recent_actions, _("Recent Searches")); |
457 | } |
6b37252b |
458 | } |
56e0b3b7 |
459 | } |
460 | |
05f5b952 |
461 | /* build an <option> statement */ |
6b37252b |
462 | function asearch_opt( $val, $sel, $tit ) |
463 | { |
464 | return '<option value="' . $val . '"' . ($sel == $val ? ' selected' : '' ) . '>' . $tit . '</option>' . "\n"; |
465 | } |
466 | |
05f5b952 |
467 | /* build a <select> statement from an array */ |
6b37252b |
468 | function asearch_opt_array($var_name, $opt_array, $cur_val) |
469 | { |
470 | $output = '<select name="' . $var_name . '">' . "\n"; |
471 | foreach($opt_array as $val => $display) |
472 | $output .= asearch_opt($val, $cur_val, $display); |
473 | $output .= '</select>' . "\n"; |
474 | return $output; |
475 | } |
476 | |
477 | /* print one form row */ |
05f5b952 |
478 | function asearch_print_form_row($imapConnection, $boxes, $mailbox, $biop, $unop, $where, $what, $exclude, $row_num) |
6b37252b |
479 | { |
480 | global $imap_asearch_biops_in, $imap_asearch_unops, $imap_asearch_options; |
481 | global $color; |
482 | |
05f5b952 |
483 | echo html_tag( 'tr', '', '', $color[4]); |
6b37252b |
484 | |
485 | echo html_tag( 'td', '', 'center' ); |
486 | /* Binary operator */ |
05f5b952 |
487 | if ($row_num) |
488 | echo asearch_opt_array('biop[' . $row_num . ']', $imap_asearch_biops_in, $biop); |
6b37252b |
489 | else |
490 | echo /*'<input type="hidden" name="biop[0]" value="">' .*/ '<b>' . _("In") . '</b>'; |
491 | echo "</td>\n"; |
492 | |
493 | echo html_tag( 'td', '', 'center' ); |
494 | /* Mailbox list */ |
05f5b952 |
495 | echo '<select name="mailbox[' . $row_num . ']">' . '<option value="All Folders"'; |
6b37252b |
496 | if ($mailbox == 'All Folders') |
497 | echo ' selected'; |
498 | echo '>[ ' . asearch_get_mailbox_display('All Folders') . " ]</option>\n"; |
499 | echo sqimap_mailbox_option_list($imapConnection, array(strtolower($mailbox)), 0, $boxes); |
500 | echo '</select></td>' . "\n"; |
501 | |
502 | /* Unary operator and Search location */ |
503 | if (empty($where)) |
504 | $where = 'FROM'; |
505 | echo html_tag( 'td', |
05f5b952 |
506 | asearch_opt_array('unop[' . $row_num . ']', $imap_asearch_unops, $unop) |
507 | . asearch_opt_array('where[' . $row_num . ']', $imap_asearch_options, $where), |
6b37252b |
508 | 'center'); |
509 | |
510 | /* Text input */ |
511 | /* This is the original stuff. Except it doesn't work (eg commas are lost), why so much trouble? |
512 | $what_disp = str_replace(',', ' ', $what); |
513 | $what_disp = str_replace('\\\\', '\\', $what_disp); |
514 | $what_disp = str_replace('\\"', '"', $what_disp); |
515 | $what_disp = str_replace('"', '"', $what_disp);*/ |
516 | $what_disp = htmlspecialchars($what, ENT_QUOTES); |
05f5b952 |
517 | echo html_tag( 'td', '<input type="text" size="35" name="what[' . $row_num . ']" value="' . $what_disp . '">', 'center' ) . "\n"; |
6b37252b |
518 | |
519 | /* Exclude criteria */ |
520 | echo html_tag( 'td', |
05f5b952 |
521 | _("Exclude Criteria:") . '<input type=checkbox name="exclude[' . $row_num .']"' . ($exclude ? ' CHECKED' : '') . '>', 'center', '') . "\n"; |
6b37252b |
522 | |
523 | echo "</tr>\n"; |
524 | } |
525 | |
526 | /* print the search form */ |
527 | function asearch_print_form($imapConnection, $boxes, $mailbox_array, $biop_array, $unop_array, $where_array, $what_array, $exclude_array, $add_criteria) |
528 | { |
529 | global $search_button_html, $add_criteria_button_html, $del_excluded_button_html, $del_all_button_html; |
530 | global $color; |
531 | |
532 | /* Search Form */ |
5a383256 |
533 | echo "<br>\n"; |
6b37252b |
534 | echo '<form action="search.php" name="form_asearch">' . "\n"; |
535 | |
536 | echo html_tag( 'table', '', 'center', $color[9], 'width="100%" cellpadding="1" cellspacing="1" border="0"' ); |
05f5b952 |
537 | echo html_tag( 'tr', html_tag( 'td', asearch_get_title_display($color, _("Search Criteria")), 'center', $color[5], 'colspan=5')); |
6b37252b |
538 | $row_count = count($where_array) + $add_criteria; |
539 | $mailbox = ''; |
540 | for ($row_num = 0; $row_num < $row_count; $row_num++) { |
541 | /* Keep the last non-empty mailbox as default choice */ |
852b59d2 |
542 | if (strip_tags(asearch_nz($mailbox_array[$row_num])) != '') |
6b37252b |
543 | $mailbox = strip_tags($mailbox_array[$row_num]); |
544 | if ($mailbox == '') |
545 | $mailbox = $boxes[0]['unformatted']; |
546 | $biop = strip_tags(asearch_nz($biop_array[$row_num])); |
547 | $unop = strip_tags(asearch_nz($unop_array[$row_num])); |
548 | $where = strip_tags(asearch_nz($where_array[$row_num])); |
549 | $what = asearch_nz($what_array[$row_num]); |
550 | $exclude = strip_tags(asearch_nz($exclude_array[$row_num])); |
551 | asearch_print_form_row($imapConnection, $boxes, $mailbox, $biop, $unop, $where, $what, $exclude, $row_num); |
552 | } |
553 | echo '</table>' . "\n"; |
554 | |
555 | /* Submit buttons */ |
556 | echo html_tag('table', '', 'center', $color[9], 'width="100%" cellpadding="1" cellspacing="0" border="0"' ); |
557 | echo html_tag('tr', |
558 | html_tag('td', getButton('SUBMIT', 'submit', $search_button_html), 'center') . "\n" |
559 | . html_tag('td', getButton('SUBMIT', 'submit', $add_criteria_button_html), 'center') . "\n" |
560 | . html_tag('td', getButton('SUBMIT', 'submit', $del_all_button_html), 'center') . "\n" |
561 | . html_tag('td', getButton('SUBMIT', 'submit', $del_excluded_button_html), 'center') . "\n" |
562 | ); |
563 | echo '</table>' . "\n"; |
564 | echo '</form>' . "\n"; |
565 | } |
566 | |
567 | /* print the $msgs messages from $mailbox mailbox */ |
568 | /* this is almost the original code */ |
569 | function asearch_print_mailbox_msgs($msgs, $mailbox, $cnt, $imapConnection, $where, $what, $usecache = false, $newsort = false) |
570 | { |
571 | global $sort, $color; |
59a623e6 |
572 | |
cf6cb8b1 |
573 | if ($cnt > 0) { |
6b37252b |
574 | $msort = calc_msort($msgs, $sort); |
575 | $showbox = asearch_get_mailbox_display($mailbox); |
576 | echo html_tag( 'div', '<b><big>' . _("Folder:") . ' '. $showbox.'</big></b>','center') . "\n"; |
70f1b6b5 |
577 | |
6b37252b |
578 | $msg_cnt_str = get_msgcnt_str(1, $cnt, $cnt); |
579 | $toggle_all = get_selectall_link(1, $sort); |
70f1b6b5 |
580 | |
6b37252b |
581 | echo '<table border="0" width="100%" cellpadding="0" cellspacing="0">'; |
0fd2f513 |
582 | |
6b37252b |
583 | echo '<tr><td>'; |
584 | mail_message_listing_beginning($imapConnection, $mailbox, $sort, $msg_cnt_str, $toggle_all, 1); |
585 | echo '</td></tr>'; |
70f1b6b5 |
586 | |
6b37252b |
587 | echo '<tr><td HEIGHT="5" BGCOLOR="'.$color[4].'"></td></tr>'; |
70f1b6b5 |
588 | |
6b37252b |
589 | echo '<tr><td>'; |
590 | echo ' <table width="100%" cellpadding="1" cellspacing="0" align="center"'.' border="0" bgcolor="'.$color[9].'">'; |
591 | echo ' <tr><td>'; |
70f1b6b5 |
592 | |
6b37252b |
593 | echo ' <table width="100%" cellpadding="1" cellspacing="0" align="center" border="0" bgcolor="'.$color[5].'">'; |
594 | echo ' <tr><td>'; |
595 | printHeader($mailbox, 6, $color, false); |
596 | displayMessageArray($imapConnection, $cnt, 1, $msort, $mailbox, $sort, $color, $cnt, $where, $what); |
597 | echo ' </td></tr>'; |
598 | echo ' </table>'; |
599 | echo ' </td></tr>'; |
600 | echo ' </table>'; |
601 | mail_message_listing_end($cnt, '', $msg_cnt_str, $color); |
602 | echo '</td></tr>'; |
70f1b6b5 |
603 | |
6b37252b |
604 | echo '</table>'; |
605 | } |
59a623e6 |
606 | } |
607 | |
0d672ac0 |
608 | /* ------------------------ main ------------------------ */ |
6b37252b |
609 | global $allow_thread_sort; |
0d672ac0 |
610 | |
6b37252b |
611 | /* get globals we may need */ |
6b37252b |
612 | sqgetGlobalVar('username', $username, SQ_SESSION); |
613 | sqgetGlobalVar('key', $key, SQ_COOKIE); |
bfc5b989 |
614 | sqgetGlobalVar('delimiter', $delimiter, SQ_SESSION); /* we really need this? */ |
e5cbf2f9 |
615 | sqgetGlobalVar('onetimepad', $onetimepad, SQ_SESSION); /* do we really need this? */ |
c1cb7ba4 |
616 | |
6b37252b |
617 | $recent_prefkeys = array('asearch_recent_where', 'asearch_recent_mailbox', 'asearch_recent_what', 'asearch_recent_biop', 'asearch_recent_unop', 'asearch_recent_exclude'); |
618 | $saved_prefkeys = array('asearch_saved_where', 'asearch_saved_mailbox', 'asearch_saved_what', 'asearch_saved_biop', 'asearch_saved_unop', 'asearch_saved_exclude'); |
619 | /*$asearch_keys = array('where', 'mailbox', 'what', 'biop', 'unop', 'exclude');*/ |
620 | |
621 | $search_button_html = _("Search"); |
622 | $search_button_text = asearch_unhtmlentities($search_button_html); |
623 | $add_criteria_button_html = _("Add New Criteria"); |
624 | $add_criteria_button_text = asearch_unhtmlentities($add_criteria_button_html); |
34a85c56 |
625 | $del_excluded_button_html = _("Remove Excluded Criteria"); |
6b37252b |
626 | $del_excluded_button_text = asearch_unhtmlentities($del_excluded_button_html); |
34a85c56 |
627 | $del_all_button_html = _("Remove All Criteria"); |
6b37252b |
628 | $del_all_button_text = asearch_unhtmlentities($del_all_button_html); |
629 | |
630 | $imap_asearch_options = array( |
631 | /* <message set>, */ |
632 | /*'ALL' is binary operator */ |
633 | 'ANSWERED' => _("Answered"), |
634 | 'BCC' => _("Bcc"), |
635 | 'BEFORE' => _("Before"), |
636 | 'BODY' => _("Message Body"), |
637 | 'CC' => _("CC"), |
638 | 'DELETED' => _("Deleted"), |
639 | 'DRAFT' => _("Draft"), |
640 | 'FLAGGED' => _("Flagged"), |
641 | 'FROM' => _("Sent By"), |
642 | 'HEADER' => _("Header Field"), |
643 | 'KEYWORD' => _("Keyword"), |
644 | 'LARGER' => _("Larger Than"), |
645 | 'NEW' => _("New"), |
646 | /*'NOT' is unary operator */ |
647 | 'OLD' => _("Old"), |
648 | 'ON' => _("On"), |
649 | /*'OR' is binary operator */ |
650 | 'RECENT' => _("Recent"), |
651 | 'SEEN' => _("Seen"), |
652 | 'SENTBEFORE' => _("Sent Before"), |
653 | 'SENTON' => _("Sent On"), |
654 | 'SENTSINCE' => _("Sent Since"), |
655 | 'SINCE' => _("Since"), |
656 | 'SMALLER' => _("Smaller Than"), |
657 | 'SUBJECT' => _("Subject Contains"), |
658 | 'TEXT' => _("Header and Body"), |
659 | 'TO' => _("Sent To"), |
660 | /*'UID' => 'anum',*/ |
661 | /*'UNANSWERED' => '', |
662 | 'UNDELETED' => '', |
663 | 'UNDRAFT' => '', |
664 | 'UNFLAGGED' => '', |
665 | 'UNKEYWORD' => _("Unkeyword"), |
666 | 'UNSEEN' => _("Unseen"),*/ |
667 | ); |
668 | uasort($imap_asearch_options, 'asearch_unhtml_strcoll'); |
669 | |
670 | $imap_asearch_unops = array( |
671 | '' => '', |
672 | 'NOT' => _("Not") |
673 | ); |
674 | |
675 | $imap_asearch_biops_in = array( |
676 | 'ALL' => _("And In"), |
677 | 'OR' => _("Or In") |
678 | ); |
679 | |
680 | $imap_asearch_biops = array( |
681 | 'ALL' => _("And"), |
682 | 'OR' => _("Or") |
683 | ); |
684 | |
685 | /* |
686 | unset : Enter key, or called from outside (eg read_body) |
687 | $search_button_text : Search button |
688 | 'Search_no_update' : Search but don't update recent |
689 | 'Search_last' : Same as no_update but reload and search last |
690 | 'Search_silent' : Same as no_update but only display results |
691 | $add_criteria_button_text : Add New Criteria button |
34a85c56 |
692 | $del_excluded_button_text : Remove Excluded Criteria button |
693 | $del_all_button_text : Remove All Criteria button |
6b37252b |
694 | 'save_recent' |
695 | 'search_recent' |
696 | 'forget_recent' |
697 | 'edit_saved' |
698 | 'search_saved' |
699 | 'delete_saved' |
700 | */ |
701 | if (isset($_GET['submit'])) |
702 | $submit = strip_tags($_GET['submit']); |
703 | |
704 | /* Used by search */ |
705 | if (isset($_GET['mailbox'])) { |
706 | $mailbox_array = $_GET['mailbox']; |
707 | if (!is_array($mailbox_array)) |
708 | $mailbox_array = array($mailbox_array); |
56e0b3b7 |
709 | } |
6b37252b |
710 | else |
711 | $mailbox_array = array(); |
712 | |
713 | if (isset($_GET['biop'])) { |
714 | $biop_array = $_GET['biop']; |
715 | if (!is_array($biop_array)) |
716 | $biop_array = array($biop_array); |
c1cb7ba4 |
717 | } |
6b37252b |
718 | else |
719 | $biop_array = array(); |
c1cb7ba4 |
720 | |
6b37252b |
721 | if (isset($_GET['unop'])) { |
722 | $unop_array = $_GET['unop']; |
723 | if (!is_array($unop_array)) |
724 | $unop_array = array($unop_array); |
548a552a |
725 | } |
6b37252b |
726 | else |
727 | $unop_array = array(); |
728 | |
729 | if (isset($_GET['where'])) { |
730 | $where_array = $_GET['where']; |
731 | if (!is_array($where_array)) |
732 | $where_array = array($where_array); |
733 | } |
734 | else |
735 | $where_array = array(); |
736 | |
737 | if (isset($_GET['what'])) { |
738 | $what_array = $_GET['what']; |
739 | if (!is_array($what_array)) |
740 | $what_array = array($what_array); |
741 | } |
742 | else |
743 | $what_array = array(); |
744 | |
745 | if (isset($_GET['exclude'])) |
746 | $exclude_array = $_GET['exclude']; |
747 | else |
748 | $exclude_array = array(); |
749 | |
750 | /* Used by recent and saved stuff */ |
751 | if (isset($_GET['rownum'])) { |
752 | $submit_rownum = strip_tags($_GET['rownum']); |
56e0b3b7 |
753 | } |
6b37252b |
754 | |
755 | /* end of get globals */ |
756 | |
757 | $search_silent = FALSE; /* Default is normal behaviour */ |
758 | |
759 | /* See how the page was called and fire off correct function */ |
760 | if ((!isset($submit) || empty($submit)) && !empty($where_array)) { |
761 | /* This happens when the Enter key is used or called from outside */ |
762 | $submit = $search_button_text; |
763 | if (count($where_array) != count($unop_array)) /* Hack needed to handle coming back from read_body et als */ |
764 | asearch_edit_last($data_dir, $username); |
56e0b3b7 |
765 | } |
6b37252b |
766 | |
767 | if (!isset($submit)) { |
768 | $submit = ''; |
56e0b3b7 |
769 | } |
6b37252b |
770 | else { |
771 | switch ($submit) { |
772 | case $search_button_text: |
05f5b952 |
773 | if (asearch_check_query($where_array, $what_array, $exclude_array) == '') |
6b37252b |
774 | asearch_push_recent($data_dir, $username, $mailbox_array, $biop_array, $unop_array, $where_array, $what_array, $exclude_array); |
775 | break; |
776 | case 'Search_silent': |
777 | $search_silent = TRUE; |
778 | /*nobreak;*/ |
779 | case 'Search_no_update': |
780 | $submit = $search_button_text; |
781 | break; |
782 | case $del_excluded_button_text: |
783 | $delarray = array_keys($exclude_array); |
784 | while (!empty($delarray)) { |
785 | $delrow = array_pop($delarray); |
786 | array_splice($mailbox_array, $delrow, 1); |
787 | array_splice($biop_array, $delrow, 1); |
788 | array_splice($unop_array, $delrow, 1); |
789 | array_splice($where_array, $delrow, 1); |
790 | array_splice($what_array, $delrow, 1); |
791 | /* array_splice($exclude_array, $delrow, 1);*/ /* There is still some php magic that eludes me */ |
792 | } |
793 | $exclude_array = array(); |
794 | break; |
795 | case $del_all_button_text: |
796 | $mailbox_array = array(); |
797 | $biop_array = array(); |
798 | $unop_array = array(); |
799 | $where_array = array(); |
800 | $what_array = array(); |
801 | $exclude_array = array(); |
802 | break; |
803 | case 'save_recent': |
804 | asearch_save_recent($data_dir, $username, $submit_rownum); |
805 | break; |
806 | case 'search_recent': |
807 | $submit = $search_button_text; |
808 | /*nobreak;*/ |
809 | case 'edit_recent': /* no link to do this, yet */ |
810 | asearch_edit_recent($data_dir, $username, $submit_rownum); |
811 | break; |
812 | case 'forget_recent': |
813 | asearch_forget_recent($data_dir, $username, $submit_rownum); |
814 | break; |
815 | case 'search_saved': |
816 | $submit = $search_button_text; |
817 | /*nobreak;*/ |
818 | case 'edit_saved': |
819 | asearch_edit_saved($data_dir, $username, $submit_rownum); |
820 | break; |
821 | case 'delete_saved': |
822 | asearch_delete_saved($data_dir, $username, $submit_rownum); |
823 | break; |
824 | } |
56e0b3b7 |
825 | } |
23a9084b |
826 | |
6b37252b |
827 | /* open IMAP connection */ |
828 | $imapConnection = sqimap_login($username, $key, $imapServerAddress, $imapPort, 0); |
829 | /* get mailbox names once here */ |
830 | $boxes = sqimap_mailbox_list($imapConnection); |
56e0b3b7 |
831 | |
6b37252b |
832 | if (isset($mailbox_array[0])) { |
833 | $mailbox = strip_tags($mailbox_array[0]); |
834 | } |
835 | if (empty($mailbox)) |
836 | $mailbox = $boxes[0]['unformatted']; |
837 | if (isset($composenew) && $composenew) { |
838 | $comp_uri = "../src/compose.php?mailbox=" . urlencode($mailbox) . |
839 | "&session=$composesession&attachedmessages=true&"; |
840 | displayPageHeader($color, $mailbox, "comp_in_new('$comp_uri');", false); |
56e0b3b7 |
841 | } |
6b37252b |
842 | else |
843 | displayPageHeader($color, $mailbox); |
184ef883 |
844 | |
6b37252b |
845 | do_hook('search_before_form'); |
d81e351b |
846 | |
6b37252b |
847 | if (!$search_silent) { |
848 | echo html_tag( 'table', |
849 | html_tag( 'tr', "\n" . |
05f5b952 |
850 | html_tag( 'td', asearch_get_title_display($color, _("Search")), 'center', $color[0] ) |
6b37252b |
851 | ) , |
852 | '', '', 'width="100%"') . "\n"; |
853 | asearch_print_saved($data_dir, $username); |
854 | asearch_print_recent($data_dir, $username); |
855 | if (($submit == $add_criteria_button_text) || (empty($where_array))) |
856 | $new_row = 1; |
857 | else |
858 | $new_row = 0; |
859 | asearch_print_form($imapConnection, $boxes, $mailbox_array, $biop_array, $unop_array, $where_array, $what_array, $exclude_array, $new_row); |
860 | } |
861 | |
862 | /* This deserves a comment, at least. What is it for exactly? */ |
d81e351b |
863 | if (isset($newsort)) { |
864 | $sort = $newsort; |
9837b0a5 |
865 | sqsession_register($sort, 'sort'); |
d81e351b |
866 | } |
867 | |
868 | /********************************************************************* |
869 | * Check to see if we can use cache or not. Currently the only time * |
870 | * when you will not use it is when a link on the left hand frame is * |
871 | * used. Also check to make sure we actually have the array in the * |
872 | * registered session data. :) * |
873 | *********************************************************************/ |
874 | if (! isset($use_mailbox_cache)) { |
875 | $use_mailbox_cache = 0; |
876 | } |
877 | |
878 | /* There is a problem with registered vars in 4.1 */ |
879 | /* |
880 | if( substr( phpversion(), 0, 3 ) == '4.1' ) { |
881 | $use_mailbox_cache = FALSE; |
882 | } |
883 | */ |
884 | |
88cb1b4d |
885 | do_hook('search_after_form'); |
56e0b3b7 |
886 | |
6b37252b |
887 | if ($submit == $search_button_text) { |
05f5b952 |
888 | echo html_tag( 'table', '', 'center', $color[9], 'width="100%" cellpadding="1" cellspacing="0" border="0"' ); |
889 | echo html_tag( 'tr', html_tag( 'td', asearch_get_title_display($color, _("Search Results")), 'center', $color[5])); |
890 | echo html_tag( 'tr', html_tag( 'td', asearch_get_query_display($color, $mailbox_array, $biop_array, $unop_array, $where_array, $what_array, $exclude_array), 'center', $color[4])); |
891 | echo '</table><br>' . "\n"; |
892 | |
893 | $query_error = asearch_check_query($where_array, $what_array, $exclude_array); |
6b37252b |
894 | if ($query_error != '') |
05f5b952 |
895 | echo '<br>' . html_tag( 'div', asearch_get_error_display($color, $query_error), 'center' ) . "\n"; |
6b37252b |
896 | else { |
6b37252b |
897 | $old_allow_thread_sort = 0; |
898 | if ($allow_thread_sort == TRUE) { |
899 | $old_allow_thread_sort = $allow_thread_sort; |
900 | $allow_thread_sort = FALSE; |
901 | } |
902 | |
903 | $boxcount = count($boxes); |
904 | for ($boxnum=0; $boxnum<$boxcount; $boxnum++) { |
905 | if (!in_array('noselect', $boxes[$boxnum]['flags'])) |
906 | $mboxes_array[] = $boxes[$boxnum]['unformatted']; |
907 | } |
908 | |
909 | $mboxes_msgs = sqimap_asearch($imapConnection, $mailbox_array, $biop_array, $unop_array, $where_array, $what_array, $exclude_array, $mboxes_array); |
910 | if (empty($mboxes_msgs)) |
05f5b952 |
911 | echo '<br>' . html_tag( 'div', asearch_get_error_display($color, _("No Messages Found")), 'center' ) . "\n"; |
6b37252b |
912 | else { |
913 | foreach($mboxes_msgs as $mailbox => $msgs) { |
914 | sqimap_mailbox_select($imapConnection, $mailbox); |
915 | $msgs = fillMessageArray($imapConnection, $msgs, count($msgs)); |
916 | /* For now just keep the first criteria to make the regular search happy if the user tries to come back to search */ |
917 | /* $where = asearch_serialize($where_array); |
918 | $what = asearch_serialize($what_array);*/ |
919 | $where = $where_array[0]; |
920 | $what = $what_array[0]; |
921 | asearch_print_mailbox_msgs($msgs, $mailbox, count($msgs), $imapConnection, urlencode($where), urlencode($what), false, false); |
922 | } |
923 | } |
924 | |
925 | $allow_thread_sort = $old_allow_thread_sort; |
59a623e6 |
926 | } |
56e0b3b7 |
927 | } |
928 | |
d81e351b |
929 | |
70c4fd84 |
930 | do_hook('search_bottom'); |
6b37252b |
931 | sqimap_logout($imapConnection); |
29eb5486 |
932 | echo '</body></html>'; |
99d2a184 |
933 | |
91954f9e |
934 | ?> |