Cleanup work.
[squirrelmail.git] / src / search.php
1 <?php
2
3 /**
4 ** right_main.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 ** $Id$
10 **/
11
12
13 require_once('../src/validate.php');
14 require_once('../functions/imap.php');
15 require_once('../functions/imap_search.php');
16 require_once('../functions/array.php');
17
18 function s_opt( $val, $sel, $tit ) {
19 echo " <option value=\"$val\"";
20 if ( $sel )
21 echo 'selected';
22 echo ">$tit</option>\n";
23 }
24
25 displayPageHeader($color, $mailbox);
26 $imapConnection = sqimap_login($username, $key, $imapServerAddress, $imapPort, 0);
27
28 do_hook('search_before_form');
29 echo "<br>\n".
30 " <table width=95% align=center cellpadding=2 cellspacing=0 border=0>\n".
31 " <tr><td bgcolor=\"$color[0]\">\n".
32 " <center><b>"._("Search")."</b></center>\n".
33 " </td></tr>\n".
34 ' <tr><td align=center>'.
35
36 "<FORM ACTION=\"search.php\" NAME=s>\n".
37 " <TABLE WIDTH=\"75%\">\n".
38 " <TR>\n".
39 " <TD WIDTH=\"33%\">\n".
40 ' <TT><SMALL><SELECT NAME="mailbox">';
41
42 $boxes = sqimap_mailbox_list($imapConnection);
43 for ($i = 0; $i < count($boxes); $i++) {
44 if (!in_array('noselect', $boxes[$i]['flags'])) {
45 $box = $boxes[$i]['unformatted'];
46 $box2 = str_replace(' ', '&nbsp;', $boxes[$i]['unformatted-disp']);
47 if ($mailbox == $box)
48 echo " <OPTION VALUE=\"$box\" SELECTED>$box2</OPTION>\n";
49 else
50 echo " <OPTION VALUE=\"$box\">$box2</OPTION>\n";
51 }
52 }
53 echo ' </SELECT></SMALL></TT>'.
54 " </TD>\n".
55 " <TD ALIGN=\"CENTER\" WIDTH=\"33%\">\n";
56 if (!isset($what))
57 $what = '';
58 $what_disp = ereg_replace(',', ' ', $what);
59 $what_disp = str_replace('\\\\', '\\', $what_disp);
60 $what_disp = str_replace('\\"', '"', $what_disp);
61 $what_disp = str_replace('"', '&quot;', $what_disp);
62 echo " <INPUT TYPE=\"TEXT\" SIZE=\"20\" NAME=\"what\" VALUE=\"$what_disp\">\n".
63 '</TD>'.
64 "<TD ALIGN=\"RIGHT\" WIDTH=\"33%\">\n".
65 '<SELECT NAME="where">';
66
67 s_opt( 'BODY', ($where == 'BODY'), _("Body") );
68 s_opt( 'TEXT', ($where == 'TEXT'), _("Everywhere") );
69 s_opt( 'SUBJECT', ($where == 'SUBJECT'), _("Subject") );
70 s_opt( 'FROM', ($where == 'FROM'), _("From") );
71 s_opt( 'CC', ($where == 'CC'), _("Cc") );
72 s_opt( 'TO', ($where == 'TO'), _("To") );
73
74 echo " </SELECT>\n" .
75 " </TD>\n".
76 " <TD COLSPAN=\"3\" ALIGN=\"CENTER\">\n".
77 " <INPUT TYPE=\"submit\" VALUE=\""._("Search")."\">\n".
78 " </TD>\n".
79 " </TR>\n".
80 " </TABLE>\n".
81 "</FORM>".
82 "</td></tr></table>";
83 do_hook("search_after_form");
84 if (isset($where) && $where && isset($what) && $what) {
85 sqimap_mailbox_select($imapConnection, $mailbox);
86 sqimap_search($imapConnection, $where, $what, $mailbox, $color);
87 }
88 do_hook("search_bottom");
89 sqimap_logout ($imapConnection);
90 ?>
91 </body></html>