r2l by Yoav
[squirrelmail.git] / plugins / filters / options.php
1 <?php
2
3 /**
4 * Message and Spam Filter Plugin
5 *
6 * Copyright (c) 1999-2002 The SquirrelMail Project Team
7 * Licensed under the GNU GPL. For full terms see the file COPYING.
8 *
9 * This plugin filters your inbox into different folders based upon given
10 * criteria. It is most useful for people who are subscibed to mailing lists
11 * to help organize their messages. The argument stands that filtering is
12 * not the place of the client, which is why this has been made a plugin for
13 * SquirrelMail. You may be better off using products such as Sieve or
14 * Procmail to do your filtering so it happens even when SquirrelMail isn't
15 * running.
16 *
17 * If you need help with this, or see improvements that can be made, please
18 * email me directly at the address above. I definately welcome suggestions
19 * and comments. This plugin, as is the case with all SquirrelMail plugins,
20 * is not directly supported by the developers. Please come to me off the
21 * mailing list if you have trouble with it.
22 *
23 * Also view plugins/README.plugins for more information.
24 *
25 * $Id$
26 */
27
28 chdir ('..');
29 require_once('../src/validate.php');
30 require_once('../functions/page_header.php');
31 require_once('../functions/imap.php');
32 require_once('../src/load_prefs.php');
33
34 global $AllowSpamFilters;
35
36 displayPageHeader($color, 'None');
37
38 if (isset($filter_submit)) {
39 if (!isset($theid)) $theid = 0;
40 $filter_what = ereg_replace(",", " ", $filter_what);
41 $filter_what = str_replace("\\\\", "\\", $filter_what);
42 $filter_what = str_replace("\\\"", "\"", $filter_what);
43 $filter_what = str_replace("\"", "&quot;", $filter_what);
44
45 if (($filter_where == 'Header') && (strchr($filter_what,':') == '')) {
46 print ('WARNING! Header filters should be of the format "Header: value"<BR>');
47 $action = 'edit';
48 }
49 setPref($data_dir, $username, "filter".$theid, $filter_where.",".$filter_what.",".$filter_folder);
50 $filters[$theid]["where"] = $filter_where;
51 $filters[$theid]["what"] = $filter_what;
52 $filters[$theid]["folder"] = $filter_folder;
53 } elseif (isset($action) && $action == 'delete') {
54 remove_filter($theid);
55 } elseif (isset($action) && $action == 'move_up') {
56 filter_swap($theid, $theid - 1);
57 } elseif (isset($action) && $action == 'move_down') {
58 filter_swap($theid, $theid + 1);
59 } elseif (isset($user_submit)) {
60 echo "<br><center><b>"._("Saved Scan type")."</b></center>\n";
61 setPref($data_dir, $username, 'filters_user_scan', $filters_user_scan_set);
62 }
63
64 $filters = load_filters();
65 $filters_user_scan = getPref($data_dir, $username, 'filters_user_scan');
66
67 echo '<br>' .
68 html_tag( 'table',
69 html_tag( 'tr',
70 html_tag( 'td',
71 '<center><b>' . _("Options") . ' - ' . _("Message Filtering") . '</b></center>' ,
72 'left', $color[0] )
73 ) ,
74 'center', '', 'width="95%" border="0" cellpadding="2" cellspacing="0"' ) .
75
76 '<br><form method=post action="options.php">'.
77 '<center>'.
78 html_tag( 'table', '', '', '', 'border="0" cellpadding="2" cellspacing="0"' )
79 html_tag( 'tr' ) .
80 html_tag( 'th', _("What to Scan:"), 'right', '', 'nowrap' ) .
81 html_tag( 'td', '', 'left' ) .
82 '<select name="filters_user_scan_set">'.
83 '<option value=""';
84 if ($filters_user_scan == '') {
85 echo ' selected';
86 }
87 echo '>' . _("All messages") . '</option>'.
88 '<option value="new"';
89 if ($filters_user_scan == 'new') {
90 echo ' selected';
91 }
92 echo '>' . _("Only unread messages") . '</option>' .
93 '</select>'.
94 '</td>'.
95 html_tag( 'td', '<input type=submit name="user_submit" value="' . _("Save") . '">', 'left' ) .
96 '</table>'.
97 '</center>'.
98 '</form>'.
99
100 html_tag( 'div', '[<a href="options.php?action=add">' . _("New") .
101 '</a>] - [<a href="../../src/options.php">' . _("Done") . '</a>]' ,
102 'center' ) . '<br>';
103
104 if (isset($action) && ($action == 'add' || $action == 'edit')) {
105 $imapConnection = sqimap_login($username, $key, $imapServerAddress, $imapPort, 0);
106 $boxes = sqimap_mailbox_list($imapConnection);
107 sqimap_logout($imapConnection);
108 if ( !isset($theid) ) {
109 $theid = count($filters);
110 }
111 echo html_tag( 'div', '', 'center' ) .
112 '<form action="options.php" method=post>'.
113 html_tag( 'table', '', '', '', 'border="0" cellpadding="2" cellspacing="0"' )
114 html_tag( 'tr' ) .
115 html_tag( 'td', _("Match:"), 'left' ) .
116 html_tag( 'td', '', 'left' ) .
117 '<select name=filter_where>';
118
119 $L = isset($filters[$theid]['where']);
120
121 $sel = (($L && $filters[$theid]['where'] == 'From')?'selected':'');
122 echo "<option value=\"From\" $sel>" . _ ("From") . '</option>';
123
124 $sel = (($L && $filters[$theid]['where'] == 'To')?'selected':'');
125 echo "<option value=\"To\" $sel>" . _ ("To") . '</option>';
126
127 $sel = (($L && $filters[$theid]['where'] == 'Cc')?'selected':'');
128 echo "<option value=\"Cc\" $sel>" . _ ("Cc") . '</option>';
129
130 $sel = (($L && $filters[$theid]['where'] == 'To or Cc')?'selected':'');
131 echo "<option value=\"To or Cc\" $sel>" . _ ("To or Cc") . '</option>';
132
133 $sel = (($L && $filters[$theid]['where'] == 'Subject')?'selected':'');
134 echo "<option value=\"Subject\" $sel>" . _ ("Subject") . '</option>';
135
136 $sel = (($L && $filters[$theid]['where'] == 'Header')?'selected':'');
137 echo "<option value=\"Header\" $sel>" . _ ("Header") . '</option>';
138
139 echo '</select>'.
140 '</td>'.
141 '</tr>'.
142 html_tag( 'tr' ) .
143 html_tag( 'td', _("Contains:"), 'right' ) .
144 html_tag( 'td', '', 'left' ) .
145 '<input type=text size=32 name=filter_what value="';
146 if (isset($filters[$theid]['what'])) {
147 echo $filters[$theid]["what"];
148 }
149 echo '">'.
150 '</td>'.
151 '</tr>'.
152 html_tag( 'tr' ) .
153 html_tag( 'td', _("Move to:"), 'left' ) .
154 html_tag( 'td', '', 'left' ) .
155 '<tt>'.
156 '<select name=filter_folder>';
157
158 for ($i = 0; $i < count($boxes); $i++) {
159 if (! in_array('noselect', $boxes[$i]['flags'])) {
160 $box = $boxes[$i]['unformatted'];
161 $box2 = str_replace(' ', '&nbsp;', $boxes[$i]['formatted']);
162 if (isset($filters[$theid]['folder']) &&
163 $filters[$theid]['folder'] == $box)
164 echo "<OPTION VALUE=\"$box\" SELECTED>$box2</option>";
165 else
166 echo "<OPTION VALUE=\"$box\">$box2</option>";
167 }
168 }
169 echo '</tt>'.
170 '</select>'.
171 '</td>'.
172 '</tr>'.
173 '</table>'.
174 '<input type=submit name=filter_submit value=' . _("Submit") . '>'.
175 "<input type=hidden name=theid value=$theid>".
176 '</form>'.
177 '</div>';
178
179 }
180
181 echo html_tag( 'table', '', 'center', '', 'border="0" cellpadding="3" cellspacing="0"' )
182
183 for ($i=0; $i < count($filters); $i++) {
184
185 $clr = (($i % 2)?$color[0]:$color[9]);
186 $fdr = ($folder_prefix)?str_replace($folder_prefix, "", $filters[$i]["folder"]):$filters[$i]["folder"];
187 echo "<tr bgcolor=\"$clr\"><td><small>".
188 echo html_tag( 'tr', '', $clr ) .
189 html_tag( 'td',
190 '<small>' .
191 "[<a href=\"options.php?theid=$i&action=edit\">" . _("Edit") . '</a>]'.
192 '</small>' ,
193 'left' ) .
194 html_tag( 'td',
195 '<small>' .
196 "[<a href=\"options.php?theid=$i&action=delete\">" . _("Delete") . '</a>]'.
197 '</small>' ,
198 'left' ) .
199 html_tag( 'td', '', 'center' ) . '<small>[';
200
201 if (isset($filters[$i + 1])) {
202 echo "<a href=\"options.php?theid=$i&action=move_down\">" . _("Down") . '</a>';
203 if ($i > 0) {
204 echo '&nbsp;|&nbsp;';
205 }
206 }
207 if ($i > 0) {
208 echo "<a href=\"options.php?theid=$i&action=move_up\">" . _("Up") . '</a>';
209 }
210 echo ']</small></td>'.
211 html_tag( 'td', '-', 'left' ) .
212 html_tag( 'td', '', 'left' );
213 printf( _("If <b>%s</b> contains <b>%s</b> then move to <b>%s</b>"), _($filters[$i]['where']), $filters[$i]['what'], $fdr );
214 echo '</td></tr>';
215
216 }
217 echo '</table>'.
218 html_tag( 'table',
219 html_tag( 'tr',
220 html_tag( 'td', '&nbsp', 'left' )
221 ) ,
222 'center', '', 'width="80%" border="0" cellpadding="2" cellspacing="0"' );
223 ?>