[squirrelmail.git] / plugins / filters / options.php

<?php
   /*
    *  Message and Spam Filter Plugin
    *  By Luke Ehresman <luke@squirrelmail.org>
    *     Tyler Akins
    *     Brent Bice
    *  (c) 2000 (GNU GPL - see ../../COPYING)
    *
    *  This plugin filters your inbox into different folders based upon given
    *  criteria.  It is most useful for people who are subscibed to mailing lists
    *  to help organize their messages.  The argument stands that filtering is
    *  not the place of the client, which is why this has been made a plugin for
    *  SquirrelMail.  You may be better off using products such as Sieve or
    *  Procmail to do your filtering so it happens even when SquirrelMail isn't
    *  running.
    *
    *  If you need help with this, or see improvements that can be made, please
    *  email me directly at the address above.  I definately welcome suggestions
    *  and comments.  This plugin, as is the case with all SquirrelMail plugins,
    *  is not directly supported by the developers.  Please come to me off the
    *  mailing list if you have trouble with it.
    *
    *  Also view plugins/README.plugins for more information.
    *
    */
   chdir('..');
   require_once('../src/validate.php');
   require_once('../functions/page_header.php');
   require_once('../functions/imap.php');
   require_once('../src/load_prefs.php');

   global $AllowSpamFilters;

   displayPageHeader($color, 'None');

   if (isset($filter_submit)) {
      if (!isset($theid)) $theid = 0;
      $filter_what = str_replace(',', ' ', $filter_what);
      $filter_what = str_replace("\\\\", "\\", $filter_what);
      $filter_what = str_replace("\\\"", "\"", $filter_what);
      $filter_what = str_replace("\"", "&quot;", $filter_what);

      setPref($data_dir, $username, 'filter'.$theid, $filter_where.','.$filter_what.','.$filter_folder);
      $filters[$theid]['where'] = $filter_where;
      $filters[$theid]['what'] = $filter_what;
      $filters[$theid]['folder'] = $filter_folder;
   } elseif (isset($spam_submit) && $AllowSpamFilters) {
      $spam_filters = load_spam_filters();
      setPref($data_dir, $username, 'filters_spam_folder', $filters_spam_folder_set);
      setPref($data_dir, $username, 'filters_spam_scan', $filters_spam_scan_set);
      foreach ($spam_filters as $Key => $Value)
      {
          $input = $spam_filters[$Key]['prefname'] . '_set';
          setPref($data_dir, $username, $spam_filters[$Key]['prefname'],
              $$input);
      }
   } elseif (isset($action) && $action == 'delete') {
      remove_filter($theid);
   } elseif (isset($action) && $action == 'move_up') {
      filter_swap($theid, $theid - 1);
   } elseif (isset($action) && $action == 'move_down') {
      filter_swap($theid, $theid + 1);
   }

   if ($AllowSpamFilters) {
      $filters_spam_folder = getPref($data_dir, $username, 'filters_spam_folder');
      $filters_spam_scan = getPref($data_dir, $username, 'filters_spam_scan');
   }
   $filters = load_filters();

   echo '<br>' .
        '<table width=95% align=center border=0 cellpadding=2 cellspacing=0>'.
        "<tr><td bgcolor=\"$color[0]\">".
        '<center><b>' . _("Options") . ' -  ' . _("Message Filtering") . '</b></center>'.
        '</td></tr></table>'.
        '<br><center>[<a href="options.php?action=add">' . _("New") .
        '</a>] - [<a href="../../src/options.php">' . _("Done") . '</a>]</center><br>' .
        '<table border=0 cellpadding=3 cellspacing=0 align=center>';

        for ($i=0; $i < count($filters); $i++) {
            if ($i % 2 == 0) {
                $clr = $color[0];
            } else {
                $clr = $color[9];
            }

            $fdr = ($folder_prefix)?str_replace($folder_prefix, "", $filters[$i]["folder"]):$filters[$i]["folder"];

            echo "<tr bgcolor=\"$clr\"><td><small>".
                 "[<a href=\"options.php?theid=$i&action=edit\">" . _("Edit") . '</a>]'.
                 '</small></td><td><small>'.
                 "[<a href=\"options.php?theid=$i&action=delete\">" . _("Delete") . '</a>]'.
                 '</small></td><td align=center><small>';

            if (isset($filters[$i + 1])) {
                echo "<a href=\"options.php?theid=$i&action=move_down\">" . _("Down") . '</a>';
                if ($i > 0) {
                    echo ' | ';
                }
            }
            if ($i > 0) {
                echo "<a href=\"options.php?theid=$i&action=move_up\">" . _("Up") . '</a>';
            }
            echo ']</small></td><td> - ';
            printf( _("If <b>%s</b> contains <b>%s</b> then move to <b>%s</b>"), $filters[$i]['where'], $filters[$i]['what'], $fdr );
            echo '</td></tr>';

        }

        echo '</table>'.
             '<table width=80% align=center border=0 cellpadding=2 cellspacing=0">'.
                '<tr><td>&nbsp</td></tr>'.
             '</table>';

        if ($AllowSpamFilters) {

            echo "<table width=95% align=center border=0 cellpadding=2 cellspacing=0 bgcolor=\"$color[0]\">".
                    '<tr><th align=center>' . _("Spam Filtering") . '</th></tr>'.
                 '</table>';
            if (! isset($action) || $action != 'spam') {

                echo '<p align=center>[<a href="options.php?action=spam">' . _("Edit") . '</a>]<br>';
                printf( _("Spam is sent to <b>%s</b>"), ($filters_spam_folder?$filters_spam_folder:_("[<i>not set yet</i>]") ) );
                echo '<br>';
                printf( _("Spam scan is limited to <b>%s</b>"), (($filters_spam_scan == 'new')?_("New Messages Only"):_("All Messages") ) );
                echo '</p>'.
                     "<table border=0 cellpadding=3 cellspacing=0 align=center bgcolor=\"$color[0]\">";

                $spam_filters = load_spam_filters();

                foreach ($spam_filters as $Key => $Value) {
                    echo '<tr><th align=center>';

                    if ($spam_filters[$Key]['enabled']) {
                        echo _("ON");
                    } else {
                        echo _("OFF");
                    }

                    echo '</th><td>&nbsp;-&nbsp;</td><td>';

                    if ($spam_filters[$Key]['link']) {
                      echo '<a href="' .
                           $spam_filters[$Key]['link'] .
                           '" target="_blank">';
                    }

                    echo $spam_filters[$Key]['name'];
                    if ($spam_filters[$Key]['link']) {
                      echo '</a>';
                    }
                    echo "</td></tr>\n";
                }
                echo '</table>';
            }
    }

    if (isset($action) && ($action == 'add' || $action == 'edit')) {
        $imapConnection = sqimap_login($username, $key, $imapServerAddress, $imapPort, 0);
        $boxes = sqimap_mailbox_list($imapConnection);
        sqimap_logout($imapConnection);
        if ( !isset($theid) ) {
            $theid = count($filters);
        }
        echo '<center>'.
             '<form action="options.php" method=post>'.
             '<br><table cellpadding=2 cellspacing=0 border=0>'.
               '<tr>'.
                  '<td>&nbsp;</td>'.
                  '<td>'.
                     '<select name=filter_where>';

        $L = isset($filters[$theid]['where']);

        $sel = (($L && $filters[$theid]['where'] == 'From')?'selected':'');
        echo "<option value=\"From\" $sel>" . _ ("From") . '</option>';
        
        $sel = (($L && $filters[$theid]['where'] == 'To')?'selected':'');
        echo "<option value=\"To\" $sel>" . _ ("To") . '</option>';

        $sel = (($L && $filters[$theid]['where'] == 'Cc')?'selected':'');
        echo "<option value=\"Cc\" $sel>" . _ ("Cc") . '</option>';

        $sel = (($L && $filters[$theid]['where'] == 'To or Cc')?'selected':'');
        echo "<option value=\"To or Cc\" $sel>" . _ ("To or Cc") . '</option>';

        $sel = (($L && $filters[$theid]['where'] == 'Subject')?'selected':'');
        echo "<option value=\"Subject\" $sel>" . _ ("Subject") . '</option>';

        echo         '</select>'.
                  '</td>'.
               '</tr>'.
               '<tr>'.
                  '<td align=right>'.
                     _("Contains:").
                  '</td>'.
                  '<td>'.
                     '<input type=text size=32 name=filter_what value="';
        if (isset($filters[$theid]['what'])) {
            echo $filters[$theid]["what"]; 
        }
        echo '">'.
                  '</td>'.
               '</tr>'.
               '<tr>'.
                  '<td>'.
                     _("Move to:").
                  '</td>'.
                  '<td>'.
                     '<tt>'.
                     '<select name=filter_folder>';

        for ($i = 0; $i < count($boxes); $i++) {
            if (! in_array('noselect', $boxes[$i]['flags'])) {
                $box = $boxes[$i]['unformatted'];
                $box2 = str_replace(' ', '&nbsp;', $boxes[$i]['formatted']);
                if (isset($filters[$theid]['folder']) &&
                    $filters[$theid]['folder'] == $box)
                   echo "<OPTION VALUE=\"$box\" SELECTED>$box2</option>";
                else
                   echo "<OPTION VALUE=\"$box\">$box2</option>";
            }
        }
        echo         '</tt>'.
                     '</select>'.
                  '</td>'.
               '</tr>'.
            '</table>'.
            '<input type=submit name=filter_submit value=' . _("Submit") . '>'.
            "<input type=hidden name=theid value=$theid>".
            '</form>'.
            '</center>';

    } else if (isset($action) && $action == 'spam' && $AllowSpamFilters) {
        $imapConnection = sqimap_login($username, $key, $imapServerAddress, $imapPort, 0);
        $boxes = sqimap_mailbox_list($imapConnection);
        sqimap_logout($imapConnection);
        for ($i = 0; $i < count($boxes) && $filters_spam_folder == ''; $i++) {
            if ($boxes[$i]['flags'][0] != 'noselect' && 
                $boxes[$i]['flags'][1] != 'noselect' && 
                $boxes[$i]['flags'][2] != 'noselect') {
                $filters_spam_folder = $boxes[$i]['unformatted'];
            }
        }

        echo '<form method=post action="options.php">'.
             '<center>'.
             '<table width=85% cellpadding=2 cellspacing=0 border=0>'.
                '<tr>'.
                   '<th align=right nowrap>' . _("Move spam to:") . '</th>'.
                   '<td><select name="filters_spam_folder_set">';
                   
        for ($i = 0; $i < count($boxes); $i++) {
            if (! in_array('noselect', $boxes[$i]['flags'])) {
                $box = $boxes[$i]['unformatted'];
                $box2 = str_replace(' ', '&nbsp;', $boxes[$i]['formatted']);
                if ($filters_spam_folder == $box)
                 echo "<OPTION VALUE=\"$box\" SELECTED>$box2</OPTION>\n";
                else
                 echo "<OPTION VALUE=\"$box\">$box2</OPTION>\n";
            }
        }
        echo    '</select>'.
               '</td>'.
             '</tr>'.
             '<tr><td></td><td>' .
             _("Moving spam directly to the trash may not be a good idea at first, since messages from friends and mailing lists might accidentally be marked as spam. Whatever folder you set this to, make sure that it gets cleaned out periodically, so that you don't have an excessively large mailbox hanging around.") .
             '</td></tr>'.
             '<tr>'.
                '<th align=right nowrap>' . _("What to Scan:") . '</th>'.
                '<td><select name="filters_spam_scan_set">'.
                   '<option value=""';
        if ($filters_spam_scan == '') 
            echo ' SELECTED';
        echo '>' . _("All messages") . '</option>'.
                   '<option value="new"';
        if ($filters_spam_scan == 'new') 
            echo ' SELECTED';
        echo '>' . _("Only unread messages") . '</option>' .
                '</select>'.
             '</td>'.
           '</tr>'.
           '<tr>'.
             '<td></td><td>'.
             _("The more messages you scan, the longer it takes.  I would suggest that you scan only new messages.  If you make a change to your filters, I would set it to scan all messages, then go view my INBOX, then come back and set it to scan only new messages.  That way, your new spam filters will be applied and you'll scan even the spam you read with the new filters.").
             '</td></tr>';

        $spam_filters = load_spam_filters();

        foreach ($spam_filters as $Key => $Value) {
            echo "<tr><th align=right nowrap>$Key</th>\n" .
                 '<td><input type=checkbox name="' .
                 $spam_filters[$Key]['prefname'] .
                 '_set"';
            if ($spam_filters[$Key]['enabled'])
               echo ' CHECKED';
            echo '> - ';
            if ($spam_filters[$Key]['link']) {
               echo '<a href="' .
                    $spam_filters[$Key]['link'] .
                    '" target="_blank">';
            }
            echo $spam_filters[$Key]['name'];
            if ($spam_filters[$Key]['link']) {
               echo '</a>';
            }
            echo '</td></tr><tr><td></td><td>' .
                 $spam_filters[$Key]['comment'] .
                 "</td></tr>\n";
        }
        echo '<tr><td colspan=2 align=center><input type=submit name="spam_submit" value="' . _("Save") . '"></td></tr>'.
             '</table>'.
             '</center>'.
             '</form>';

        sqimap_logout($imapConnection);
    }
?>
Commit	Line	Data
849bdf42	1	<?php
849bdf42	2	/*
3fd1252d	3	* Message and Spam Filter Plugin
849bdf42	4	* By Luke Ehresman <luke@squirrelmail.org>
	5	* Tyler Akins
	6	* Brent Bice
	7	* (c) 2000 (GNU GPL - see ../../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	*/
3fd1252d	26	chdir('..');
849bdf42	27	require_once('../src/validate.php');
3fd1252d	28	require_once('../functions/page_header.php');
	29	require_once('../functions/imap.php');
	30	require_once('../src/load_prefs.php');
849bdf42	31
	32	global $AllowSpamFilters;
	33
3fd1252d	34	displayPageHeader($color, 'None');
849bdf42	35
	36	if (isset($filter_submit)) {
	37	if (!isset($theid)) $theid = 0;
3fd1252d	38	$filter_what = str_replace(',', ' ', $filter_what);
849bdf42	39	$filter_what = str_replace("\\\\", "\\", $filter_what);
	40	$filter_what = str_replace("\\\"", "\"", $filter_what);
	41	$filter_what = str_replace("\"", """, $filter_what);
	42
3fd1252d	43	setPref($data_dir, $username, 'filter'.$theid, $filter_where.','.$filter_what.','.$filter_folder);
	44	$filters[$theid]['where'] = $filter_where;
	45	$filters[$theid]['what'] = $filter_what;
	46	$filters[$theid]['folder'] = $filter_folder;
849bdf42	47	} elseif (isset($spam_submit) && $AllowSpamFilters) {
	48	$spam_filters = load_spam_filters();
	49	setPref($data_dir, $username, 'filters_spam_folder', $filters_spam_folder_set);
	50	setPref($data_dir, $username, 'filters_spam_scan', $filters_spam_scan_set);
	51	foreach ($spam_filters as $Key => $Value)
	52	{
	53	$input = $spam_filters[$Key]['prefname'] . '_set';
	54	setPref($data_dir, $username, $spam_filters[$Key]['prefname'],
	55	$$input);
	56	}
3fd1252d	57	} elseif (isset($action) && $action == 'delete') {
849bdf42	58	remove_filter($theid);
3fd1252d	59	} elseif (isset($action) && $action == 'move_up') {
849bdf42	60	filter_swap($theid, $theid - 1);
3fd1252d	61	} elseif (isset($action) && $action == 'move_down') {
849bdf42	62	filter_swap($theid, $theid + 1);
	63	}
	64
	65	if ($AllowSpamFilters) {
	66	$filters_spam_folder = getPref($data_dir, $username, 'filters_spam_folder');
	67	$filters_spam_scan = getPref($data_dir, $username, 'filters_spam_scan');
	68	}
	69	$filters = load_filters();
	70
3fd1252d	71	echo '<br>' .
	72	'<table width=95% align=center border=0 cellpadding=2 cellspacing=0>'.
	73	"<tr><td bgcolor=\"$color[0]\">".
	74	'<center><b>' . _("Options") . ' - ' . _("Message Filtering") . '</b></center>'.
	75	'</td></tr></table>'.
	76	'<br><center>[<a href="options.php?action=add">' . _("New") .
	77	'</a>] - [<a href="../../src/options.php">' . _("Done") . '</a>]</center><br>' .
	78	'<table border=0 cellpadding=3 cellspacing=0 align=center>';
849bdf42	79
3fd1252d	80	for ($i=0; $i < count($filters); $i++) {
	81	if ($i % 2 == 0) {
	82	$clr = $color[0];
	83	} else {
	84	$clr = $color[9];
849bdf42	85	}
3fd1252d	86
	87	$fdr = ($folder_prefix)?str_replace($folder_prefix, "", $filters[$i]["folder"]):$filters[$i]["folder"];
	88
	89	echo "<tr bgcolor=\"$clr\"><td><small>".
	90	"[<a href=\"options.php?theid=$i&action=edit\">" . _("Edit") . '</a>]'.
	91	'</small></td><td><small>'.
	92	"[<a href=\"options.php?theid=$i&action=delete\">" . _("Delete") . '</a>]'.
	93	'</small></td><td align=center><small>';
	94
	95	if (isset($filters[$i + 1])) {
	96	echo "<a href=\"options.php?theid=$i&action=move_down\">" . _("Down") . '</a>';
	97	if ($i > 0) {
	98	echo ' \| ';
	99	}
	100	}
	101	if ($i > 0) {
	102	echo "<a href=\"options.php?theid=$i&action=move_up\">" . _("Up") . '</a>';
	103	}
	104	echo ']</small></td><td> - ';
	105	printf( _("If <b>%s</b> contains <b>%s</b> then move to <b>%s</b>"), $filters[$i]['where'], $filters[$i]['what'], $fdr );
	106	echo '</td></tr>';
	107
	108	}
	109
	110	echo '</table>'.
	111	'<table width=80% align=center border=0 cellpadding=2 cellspacing=0">'.
	112	'<tr><td>&nbsp</td></tr>'.
	113	'</table>';
	114
	115	if ($AllowSpamFilters) {
	116
	117	echo "<table width=95% align=center border=0 cellpadding=2 cellspacing=0 bgcolor=\"$color[0]\">".
	118	'<tr><th align=center>' . _("Spam Filtering") . '</th></tr>'.
	119	'</table>';
	120	if (! isset($action) \|\| $action != 'spam') {
	121
	122	echo '<p align=center>[<a href="options.php?action=spam">' . _("Edit") . '</a>]<br>';
	123	printf( _("Spam is sent to <b>%s</b>"), ($filters_spam_folder?$filters_spam_folder:_("[<i>not set yet</i>]") ) );
	124	echo '<br>';
	125	printf( _("Spam scan is limited to <b>%s</b>"), (($filters_spam_scan == 'new')?_("New Messages Only"):_("All Messages") ) );
	126	echo '</p>'.
	127	"<table border=0 cellpadding=3 cellspacing=0 align=center bgcolor=\"$color[0]\">";
	128
	129	$spam_filters = load_spam_filters();
	130
	131	foreach ($spam_filters as $Key => $Value) {
	132	echo '<tr><th align=center>';
	133
	134	if ($spam_filters[$Key]['enabled']) {
	135	echo _("ON");
	136	} else {
	137	echo _("OFF");
	138	}
	139
	140	echo '</th><td> - </td><td>';
	141
	142	if ($spam_filters[$Key]['link']) {
	143	echo '<a href="' .
	144	$spam_filters[$Key]['link'] .
	145	'" target="_blank">';
	146	}
	147
	148	echo $spam_filters[$Key]['name'];
	149	if ($spam_filters[$Key]['link']) {
150	echo '</a>';
151	}
152	echo "</td></tr>\n";
153	}
154	echo '</table>';
155	}
156	}
157
158	if (isset($action) && ($action == 'add' \|\| $action == 'edit')) {
159	$imapConnection = sqimap_login($username, $key, $imapServerAddress, $imapPort, 0);
160	$boxes = sqimap_mailbox_list($imapConnection);
161	sqimap_logout($imapConnection);
162	if ( !isset($theid) ) {
849bdf42	163	$theid = count($filters);
3fd1252d	164	}
	165	echo '<center>'.
	166	'<form action="options.php" method=post>'.
	167	'<br><table cellpadding=2 cellspacing=0 border=0>'.
	168	'<tr>'.
	169	'<td> </td>'.
	170	'<td>'.
	171	'<select name=filter_where>';
849bdf42	172
3fd1252d	173	$L = isset($filters[$theid]['where']);
	174
	175	$sel = (($L && $filters[$theid]['where'] == 'From')?'selected':'');
	176	echo "<option value=\"From\" $sel>" . _ ("From") . '</option>';
	177
	178	$sel = (($L && $filters[$theid]['where'] == 'To')?'selected':'');
	179	echo "<option value=\"To\" $sel>" . _ ("To") . '</option>';
	180
	181	$sel = (($L && $filters[$theid]['where'] == 'Cc')?'selected':'');
	182	echo "<option value=\"Cc\" $sel>" . _ ("Cc") . '</option>';
	183
	184	$sel = (($L && $filters[$theid]['where'] == 'To or Cc')?'selected':'');
	185	echo "<option value=\"To or Cc\" $sel>" . _ ("To or Cc") . '</option>';
	186
	187	$sel = (($L && $filters[$theid]['where'] == 'Subject')?'selected':'');
	188	echo "<option value=\"Subject\" $sel>" . _ ("Subject") . '</option>';
	189
	190	echo '</select>'.
	191	'</td>'.
	192	'</tr>'.
	193	'<tr>'.
	194	'<td align=right>'.
	195	_("Contains:").
	196	'</td>'.
	197	'<td>'.
	198	'<input type=text size=32 name=filter_what value="';
	199	if (isset($filters[$theid]['what'])) {
	200	echo $filters[$theid]["what"];
	201	}
	202	echo '">'.
	203	'</td>'.
	204	'</tr>'.
	205	'<tr>'.
	206	'<td>'.
	207	_("Move to:").
	208	'</td>'.
	209	'<td>'.
	210	'<tt>'.
	211	'<select name=filter_folder>';
	212
	213	for ($i = 0; $i < count($boxes); $i++) {
	214	if (! in_array('noselect', $boxes[$i]['flags'])) {
	215	$box = $boxes[$i]['unformatted'];
	216	$box2 = str_replace(' ', ' ', $boxes[$i]['formatted']);
	217	if (isset($filters[$theid]['folder']) &&
	218	$filters[$theid]['folder'] == $box)
	219	echo "<OPTION VALUE=\"$box\" SELECTED>$box2</option>";
	220	else
	221	echo "<OPTION VALUE=\"$box\">$box2</option>";
849bdf42	222	}
3fd1252d	223	}
	224	echo '</tt>'.
	225	'</select>'.
	226	'</td>'.
	227	'</tr>'.
	228	'</table>'.
	229	'<input type=submit name=filter_submit value=' . _("Submit") . '>'.
	230	"<input type=hidden name=theid value=$theid>".
	231	'</form>'.
	232	'</center>';
	233
	234	} else if (isset($action) && $action == 'spam' && $AllowSpamFilters) {
	235	$imapConnection = sqimap_login($username, $key, $imapServerAddress, $imapPort, 0);
	236	$boxes = sqimap_mailbox_list($imapConnection);
	237	sqimap_logout($imapConnection);
	238	for ($i = 0; $i < count($boxes) && $filters_spam_folder == ''; $i++) {
	239	if ($boxes[$i]['flags'][0] != 'noselect' &&
	240	$boxes[$i]['flags'][1] != 'noselect' &&
	241	$boxes[$i]['flags'][2] != 'noselect') {
	242	$filters_spam_folder = $boxes[$i]['unformatted'];
	243	}
	244	}
	245
	246	echo '<form method=post action="options.php">'.
	247	'<center>'.
	248	'<table width=85% cellpadding=2 cellspacing=0 border=0>'.
	249	'<tr>'.
	250	'<th align=right nowrap>' . _("Move spam to:") . '</th>'.
	251	'<td><select name="filters_spam_folder_set">';
	252
	253	for ($i = 0; $i < count($boxes); $i++) {
	254	if (! in_array('noselect', $boxes[$i]['flags'])) {
	255	$box = $boxes[$i]['unformatted'];
	256	$box2 = str_replace(' ', ' ', $boxes[$i]['formatted']);
	257	if ($filters_spam_folder == $box)
	258	echo "<OPTION VALUE=\"$box\" SELECTED>$box2</OPTION>\n";
	259	else
	260	echo "<OPTION VALUE=\"$box\">$box2</OPTION>\n";
	261	}
	262	}
	263	echo '</select>'.
	264	'</td>'.
	265	'</tr>'.
	266	'<tr><td></td><td>' .
	267	_("Moving spam directly to the trash may not be a good idea at first, since messages from friends and mailing lists might accidentally be marked as spam. Whatever folder you set this to, make sure that it gets cleaned out periodically, so that you don't have an excessively large mailbox hanging around.") .
	268	'</td></tr>'.
	269	'<tr>'.
	270	'<th align=right nowrap>' . _("What to Scan:") . '</th>'.
	271	'<td><select name="filters_spam_scan_set">'.
	272	'<option value=""';
	273	if ($filters_spam_scan == '')
	274	echo ' SELECTED';
	275	echo '>' . _("All messages") . '</option>'.
	276	'<option value="new"';
	277	if ($filters_spam_scan == 'new')
	278	echo ' SELECTED';
	279	echo '>' . _("Only unread messages") . '</option>' .
	280	'</select>'.
	281	'</td>'.
	282	'</tr>'.
	283	'<tr>'.
	284	'<td></td><td>'.
	285	_("The more messages you scan, the longer it takes. I would suggest that you scan only new messages. If you make a change to your filters, I would set it to scan all messages, then go view my INBOX, then come back and set it to scan only new messages. That way, your new spam filters will be applied and you'll scan even the spam you read with the new filters.").
	286	'</td></tr>';
287
288	$spam_filters = load_spam_filters();
289
290	foreach ($spam_filters as $Key => $Value) {
291	echo "<tr><th align=right nowrap>$Key</th>\n" .
292	'<td><input type=checkbox name="' .
293	$spam_filters[$Key]['prefname'] .
294	'_set"';
295	if ($spam_filters[$Key]['enabled'])
296	echo ' CHECKED';
297	echo '> - ';
298	if ($spam_filters[$Key]['link']) {
299	echo '<a href="' .
300	$spam_filters[$Key]['link'] .
301	'" target="_blank">';
302	}
303	echo $spam_filters[$Key]['name'];
304	if ($spam_filters[$Key]['link']) {
305	echo '</a>';
306	}
307	echo '</td></tr><tr><td></td><td>' .
308	$spam_filters[$Key]['comment'] .
309	"</td></tr>\n";
310	}
311	echo '<tr><td colspan=2 align=center><input type=submit name="spam_submit" value="' . _("Save") . '"></td></tr>'.
312	'</table>'.
313	'</center>'.
314	'</form>';
315
316	sqimap_logout($imapConnection);
317	}
318	?>