Added support for using Squirrelmail without frames
[squirrelmail.git] / plugins / filters / options.php
CommitLineData
849bdf42 1<?php
15e6162e 2
3/**
4 * Message and Spam Filter Plugin
5 *
76911253 6 * Copyright (c) 1999-2003 The SquirrelMail Project Team
15e6162e 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$
ea5f4b8e 26 * @package plugins
27 * @subpackage filters
15e6162e 28 */
4eee5968 29
ea5f4b8e 30/** Path for SquirrelMail required files. */
08185f2a 31define('SM_PATH','../../');
32
33/* SquirrelMail required files. */
fca6d99e 34require_once(SM_PATH . 'include/validate.php');
08185f2a 35require_once(SM_PATH . 'functions/page_header.php');
36require_once(SM_PATH . 'functions/imap.php');
81f652a1 37require_once(SM_PATH . 'functions/imap_mailbox.php');
fca6d99e 38require_once(SM_PATH . 'include/load_prefs.php');
39require_once(SM_PATH . 'plugins/filters/filters.php');
849bdf42 40
3c66c567 41global $AllowSpamFilters;
849bdf42 42
3c66c567 43displayPageHeader($color, 'None');
849bdf42 44
3c66c567 45/* get globals */
46sqgetGlobalVar('username', $username, SQ_SESSION);
47sqgetGlobalVar('key', $key, SQ_COOKIE);
48sqgetGlobalVar('onetimepad', $onetimepad, SQ_SESSION);
49sqgetGlobalVar('delimiter', $delimiter, SQ_SESSION);
50
51sqgetGlobalVar('theid', $theid);
52sqgetGlobalVar('action', $action, SQ_GET);
53
54// FIXME: use sqgetGlobalVar below.
41100fce 55
56 if (isset($_POST['filter_submit'])) {
57 if(isset($_GET['theid'])) {
58 $theid = $_GET['theid'];
59 } elseif (isset($_POST['theid'])) {
60 $theid = $_POST['theid'];
61 } else {
62 $theid = 0;
63 }
64 $filter_what = $_POST['filter_what'];
65 $filter_where = $_POST['filter_where'];
66 $filter_folder = $_POST['filter_folder'];
67
ae48f757 68 $filter_what = str_replace(',', ' ', $filter_what);
849bdf42 69 $filter_what = str_replace("\\\\", "\\", $filter_what);
ae48f757 70 $filter_what = str_replace("\\\"", '"', $filter_what);
71 $filter_what = str_replace('"', '&quot;', $filter_what);
849bdf42 72
8e485f9b 73 if (($filter_where == 'Header') && (strchr($filter_what,':') == '')) {
74 print ('WARNING! Header filters should be of the format "Header: value"<BR>');
75 $action = 'edit';
76 }
ae48f757 77 setPref($data_dir, $username, 'filter'.$theid, $filter_where.','.$filter_what.','.$filter_folder);
78 $filters[$theid]['where'] = $filter_where;
79 $filters[$theid]['what'] = $filter_what;
80 $filters[$theid]['folder'] = $filter_folder;
3fd1252d 81 } elseif (isset($action) && $action == 'delete') {
849bdf42 82 remove_filter($theid);
3fd1252d 83 } elseif (isset($action) && $action == 'move_up') {
849bdf42 84 filter_swap($theid, $theid - 1);
3fd1252d 85 } elseif (isset($action) && $action == 'move_down') {
849bdf42 86 filter_swap($theid, $theid + 1);
41100fce 87 } elseif (isset($_POST['user_submit'])) {
88 setPref($data_dir, $username, 'filters_user_scan', $_POST['filters_user_scan_set']);
89 echo '<br><center><b>'._("Saved Scan type")."</b></center>\n";
849bdf42 90 }
91
849bdf42 92 $filters = load_filters();
c8a2c24d 93 $filters_user_scan = getPref($data_dir, $username, 'filters_user_scan');
849bdf42 94
6206f6c4 95 echo html_tag( 'table',
b01b21d0 96 html_tag( 'tr',
97 html_tag( 'td',
98 '<center><b>' . _("Options") . ' - ' . _("Message Filtering") . '</b></center>' ,
99 'left', $color[0] )
100 ) ,
101 'center', '', 'width="95%" border="0" cellpadding="2" cellspacing="0"' ) .
c8a2c24d 102
103 '<br><form method=post action="options.php">'.
104 '<center>'.
831a25d5 105 html_tag( 'table', '', '', '', 'border="0" cellpadding="2" cellspacing="0"' ) .
b01b21d0 106 html_tag( 'tr' ) .
107 html_tag( 'th', _("What to Scan:"), 'right', '', 'nowrap' ) .
108 html_tag( 'td', '', 'left' ) .
109 '<select name="filters_user_scan_set">'.
c8a2c24d 110 '<option value=""';
111 if ($filters_user_scan == '') {
b01b21d0 112 echo ' selected';
c8a2c24d 113 }
114 echo '>' . _("All messages") . '</option>'.
115 '<option value="new"';
116 if ($filters_user_scan == 'new') {
b01b21d0 117 echo ' selected';
c8a2c24d 118 }
119 echo '>' . _("Only unread messages") . '</option>' .
120 '</select>'.
121 '</td>'.
b01b21d0 122 html_tag( 'td', '<input type=submit name="user_submit" value="' . _("Save") . '">', 'left' ) .
c8a2c24d 123 '</table>'.
124 '</center>'.
125 '</form>'.
126
b01b21d0 127 html_tag( 'div', '[<a href="options.php?action=add">' . _("New") .
81f652a1 128 '</a>] - [<a href="'.SM_PATH.'src/options.php">' . _("Done") . '</a>]' ,
b01b21d0 129 'center' ) . '<br>';
0e838332 130
3fd1252d 131 if (isset($action) && ($action == 'add' || $action == 'edit')) {
41100fce 132
3fd1252d 133 $imapConnection = sqimap_login($username, $key, $imapServerAddress, $imapPort, 0);
134 $boxes = sqimap_mailbox_list($imapConnection);
135 sqimap_logout($imapConnection);
136 if ( !isset($theid) ) {
849bdf42 137 $theid = count($filters);
3fd1252d 138 }
b01b21d0 139 echo html_tag( 'div', '', 'center' ) .
72570d58 140 '<form action="options.php" method=post>'.
831a25d5 141 html_tag( 'table', '', '', '', 'border="0" cellpadding="2" cellspacing="0"' ) .
b01b21d0 142 html_tag( 'tr' ) .
143 html_tag( 'td', _("Match:"), 'left' ) .
144 html_tag( 'td', '', 'left' ) .
4eee5968 145 '<select name=filter_where>';
849bdf42 146
3fd1252d 147 $L = isset($filters[$theid]['where']);
148
149 $sel = (($L && $filters[$theid]['where'] == 'From')?'selected':'');
150 echo "<option value=\"From\" $sel>" . _ ("From") . '</option>';
4eee5968 151
3fd1252d 152 $sel = (($L && $filters[$theid]['where'] == 'To')?'selected':'');
153 echo "<option value=\"To\" $sel>" . _ ("To") . '</option>';
154
155 $sel = (($L && $filters[$theid]['where'] == 'Cc')?'selected':'');
156 echo "<option value=\"Cc\" $sel>" . _ ("Cc") . '</option>';
157
158 $sel = (($L && $filters[$theid]['where'] == 'To or Cc')?'selected':'');
159 echo "<option value=\"To or Cc\" $sel>" . _ ("To or Cc") . '</option>';
160
161 $sel = (($L && $filters[$theid]['where'] == 'Subject')?'selected':'');
162 echo "<option value=\"Subject\" $sel>" . _ ("Subject") . '</option>';
163
9da6bdde 164 $sel = (($L && $filters[$theid]['where'] == 'Header')?'selected':'');
165 echo "<option value=\"Header\" $sel>" . _ ("Header") . '</option>';
166
3fd1252d 167 echo '</select>'.
4eee5968 168 '</td>'.
169 '</tr>'.
b01b21d0 170 html_tag( 'tr' ) .
171 html_tag( 'td', _("Contains:"), 'right' ) .
172 html_tag( 'td', '', 'left' ) .
4eee5968 173 '<input type=text size=32 name=filter_what value="';
3fd1252d 174 if (isset($filters[$theid]['what'])) {
4eee5968 175 echo $filters[$theid]["what"];
3fd1252d 176 }
177 echo '">'.
4eee5968 178 '</td>'.
179 '</tr>'.
b01b21d0 180 html_tag( 'tr' ) .
181 html_tag( 'td', _("Move to:"), 'left' ) .
182 html_tag( 'td', '', 'left' ) .
4eee5968 183 '<tt>'.
184 '<select name=filter_folder>';
81f652a1 185 $selected = 0;
186 if ( isset($filters[$theid]['folder']) )
187 $selected = array(strtolower($filters[$theid]['folder']));
188 echo sqimap_mailbox_option_list(0, $selected, 0, $boxes);
3fd1252d 189 echo '</tt>'.
4eee5968 190 '</select>'.
191 '</td>'.
192 '</tr>'.
3fd1252d 193 '</table>'.
194 '<input type=submit name=filter_submit value=' . _("Submit") . '>'.
195 "<input type=hidden name=theid value=$theid>".
196 '</form>'.
b01b21d0 197 '</div>';
3fd1252d 198
3fd1252d 199 }
cb2ccf4b 200
831a25d5 201 echo html_tag( 'table', '', 'center', '', 'border="0" cellpadding="3" cellspacing="0"' );
cb2ccf4b 202
ae48f757 203 for ($i=0, $num = count($filters); $i < $num; $i++) {
cb2ccf4b 204
205 $clr = (($i % 2)?$color[0]:$color[9]);
206 $fdr = ($folder_prefix)?str_replace($folder_prefix, "", $filters[$i]["folder"]):$filters[$i]["folder"];
831a25d5 207 echo html_tag( 'tr', '', '', $clr ) .
b01b21d0 208 html_tag( 'td',
209 '<small>' .
210 "[<a href=\"options.php?theid=$i&action=edit\">" . _("Edit") . '</a>]'.
211 '</small>' ,
212 'left' ) .
213 html_tag( 'td',
214 '<small>' .
215 "[<a href=\"options.php?theid=$i&action=delete\">" . _("Delete") . '</a>]'.
216 '</small>' ,
217 'left' ) .
218 html_tag( 'td', '', 'center' ) . '<small>[';
cb2ccf4b 219
220 if (isset($filters[$i + 1])) {
221 echo "<a href=\"options.php?theid=$i&action=move_down\">" . _("Down") . '</a>';
222 if ($i > 0) {
2a61e066 223 echo '&nbsp;|&nbsp;';
cb2ccf4b 224 }
225 }
226 if ($i > 0) {
227 echo "<a href=\"options.php?theid=$i&action=move_up\">" . _("Up") . '</a>';
228 }
b01b21d0 229 echo ']</small></td>'.
230 html_tag( 'td', '-', 'left' ) .
231 html_tag( 'td', '', 'left' );
cb2ccf4b 232 printf( _("If <b>%s</b> contains <b>%s</b> then move to <b>%s</b>"), _($filters[$i]['where']), $filters[$i]['what'], $fdr );
233 echo '</td></tr>';
234
235 }
236 echo '</table>'.
b01b21d0 237 html_tag( 'table',
238 html_tag( 'tr',
8e724112 239 html_tag( 'td', '&nbsp;', 'left' )
b01b21d0 240 ) ,
241 'center', '', 'width="80%" border="0" cellpadding="2" cellspacing="0"' );
1d80c108 242 noframes_bottom();
243
c528d955 244?>