aboutsummaryrefslogtreecommitdiffstats
path: root/packages/dspam/pkg/dspam.inc
diff options
context:
space:
mode:
authorDaniel Stefan Haischt <dsh@pfsense.org>2006-07-17 16:16:47 +0000
committerDaniel Stefan Haischt <dsh@pfsense.org>2006-07-17 16:16:47 +0000
commit23ba56ecf884bcb2f6f92d90e72b622f33635f2b (patch)
tree0cd724e7421fdaa22576dcf8d1b0592e98a6688b /packages/dspam/pkg/dspam.inc
parent1c15ea40270651d8b274682e6967fe77d35f032b (diff)
downloadpfsense-packages-23ba56ecf884bcb2f6f92d90e72b622f33635f2b.tar.gz
pfsense-packages-23ba56ecf884bcb2f6f92d90e72b622f33635f2b.tar.bz2
pfsense-packages-23ba56ecf884bcb2f6f92d90e72b622f33635f2b.zip
- split the 4000 lines dspam.inc into several chunks for better maintainability
Diffstat (limited to 'packages/dspam/pkg/dspam.inc')
-rw-r--r--packages/dspam/pkg/dspam.inc3568
1 files changed, 6 insertions, 3562 deletions
diff --git a/packages/dspam/pkg/dspam.inc b/packages/dspam/pkg/dspam.inc
index e2cdad40..9a821e6a 100644
--- a/packages/dspam/pkg/dspam.inc
+++ b/packages/dspam/pkg/dspam.inc
@@ -3,7 +3,11 @@
/* Copyright (C) 2006 Daniel S. Haischt */
/* include all configuration functions */
-require_once("functions.inc");
+require_once ("functions.inc");
+require_once ("dspam-config.inc");
+require_once ("dspam-guifunc.inc");
+require_once ("dspam-pkgfunc.inc");
+require_once ("dspam-utilfunc.inc");
/* General TODO(s):
*
@@ -14,33 +18,6 @@ require_once("functions.inc");
*/
$DATA = array();
-$CONFIG = array('DSPAM_HOME' => '/var/db/dspam',
- 'DSPAM_BIN' => '/usr/local/bin',
- 'DSPAM' => '/usr/local/bin/dspam',
- 'DSPAM_STATS' => '/usr/local/bin/dspam_stats',
- 'DSPAM_WWW' => '/usr/local/pkg',
- 'DSPAM_ARGS' => '--deliver=innocent --class=innocent ' .
- '--source=error --user %CURRENT_USER% -d %u',
- 'DSPAM_ADMIN_GROUP' => 'dspam_admins',
- 'ALL_PROCS' => 'ps auxw',
- 'MAIL_QUEUE' => 'mailq | grep \'^[0-9,A-F]\' | wc -l',
- 'HISTORY_SIZE' => 799,
- 'HISTORY_PER_PAGE' => 100,
- 'QUARANTINE_PER_PAGE' => 100,
- 'HISTORY_DUPLICATES' => 'yes',
- 'MAX_COL_LEN' => 26,
- 'QNAV_BUTTONS' => 20,
- 'HNAV_BUTTONS' => 22,
- 'SORT_DEFAULT' => 'Rating',
- '3D_GRAPHS' => 1,
- 'USE_MAILPARSE' => 1,
- 'OPTMODE' => 'NONE',
- 'LOCAL_DOMAIN' => 'localhost',
- 'AUTODETECT' => 1,
- 'OPENSOURCE' => 0,
- /* 'DATE_FORMAT' => '%d.%m.%Y %H:%M' */
- 'DATE_FORMAT' => '%b %d %H:%M'
- );
/*
* Determine which extensions are available
@@ -353,7 +330,7 @@ if (isset($pgtitle) && is_array($pgtitle)) {
$info_errors =& DisplayInfos();
$input_errors = array_merge($input_errors, $info_errors);
}
-
+
/* ========================================================================== */
/* = A D M I N R E L A T E D F U N C T I O N C A L L S = */
/* ========================================================================== */
@@ -380,3537 +357,4 @@ if (isset($pgtitle) && is_array($pgtitle)) {
$input_errors[] = "The page you did request can't be processed by <code>dspam.inc</code>.";
}
-/* ========================================================================== */
-/* = A D M I N S T A T U S F U N C T I O N S = */
-/* ========================================================================== */
-
-function DisplayAdminPreferences(&$statusmsg) {
- return DisplayPreferences("admin", $statusmsg);
-}
-
-function DisplayUserStatistics() {
- global $CONFIG, $DATA;
- $b = "rowEven";
-
- $sl_total = 0;
- $il_total = 0;
- $sm_total = 0;
- $fp_total = 0;
- $sc_total = 0;
- $ic_total = 0;
- $mailbox_total = 0;
-
- $pd = popen("{$CONFIG['DSPAM_STATS']} 2>&1", "r");
-
- while (!feof($pd)) {
- $line = chop( fgets($pd, 4096) );
-
- if ($b == "qrowEven") {
- $b = "qrowOdd";
- } else {
- $b = "qrowEven";
- }
-
- $line = preg_replace('/:/', ' ', $line);
-
- list($username, , $sl, , $il, , $fp, , $sm, , $sc, , $ic)
- = (preg_split('/\s+/', $line));
- if ($username == "" && $sl == "") {
- /* we do not want to display data that
- * does not bleong to any user
- */
- continue;
- } else if ($sl == "") {
- $line = fgets($pd, 4096);
- $line = preg_replace('/:/', ' ', $line);
- list(, , $sl, , $il, , $fp, , $sm, , $sc, , $ic)
- = (preg_split('/\s+/', $line));
- }
-
- $PREFS =& GetPrefs($username, GetPath($username).".prefs");
- if ($PREFS['enableBNR'] == "on") { $PREFS['enableBNR'] = "OFF"; }
- if ($PREFS['enableWhitelist'] == "on") { $PREFS['enableWhitelist'] = "OFF"; }
- $PREFS['spamAction'] = ucfirst($PREFS['spamAction']);
- $PREFS['enableBNR'] = strtoupper($PREFS['enableBNR']);
- $PREFS['enableWhitelist'] = strtoupper($PREFS['enableWhitelist']);
-
- $mailbox = GetPath($username).".mbox";
- if ( file_exists($mailbox) ) {
- $mailbox_size = filesize($mailbox);
- $mailbox_display = sprintf("%2.1f KB", ($mailbox_size / 1024));
- $mailbox_total += $mailbox_size;
- }
- else {
- $mailbox_display = "--";
- }
-
- $sl_total += $sl;
- $il_total += $il;
- $sm_total += $sm;
- $fp_total += $fp;
- $sc_total += $sc;
- $ic_total += $ic;
-
- $DATA['TABLE'] .= "<tr><td class=\"{$b}\"><a href=\"{$CONFIG['DSPAM_CGI']}?user={$username}\">{$username}</A></td>" .
- " <td class=\"{$b} rowDivider\" align=\"right\" nowrap=\"nowrap\">{$mailbox_display}</td>" .
- " <td class=\"{$b} rowDivider\">{$sl}</td>" .
- " <td class=\"{$b}\">{$il}</td>" .
- " <td class=\"{$b}\">{$fp}</td>" .
- " <td class=\"{$b}\">{$sm}</td>" .
- " <td class=\"{$b}\">{$sc}</td>" .
- " <td class=\"{$b}\">{$ic}</td>" .
- " <td class=\"{$b} rowDivider\">{$PREFS['trainingMode']}</td>" .
- " <td class=\"{$b}\">{$PREFS['spamAction']}</td>" .
- " <td class=\"{$b}\">{$PREFS['enableBNR']}</td>" .
- " <td class=\"{$b}\">{$PREFS['enableWhitelist']}</td>" .
- " <td class=\"{$b}\">{$PREFS['statisticalSedation']}</td>" .
- " <td class=\"{$b}\">{$PREFS['signatureLocation']}</td>" .
- "</tr>\n";
- }
- pclose($pd);
-
- $mailbox_total_display = sprintf("%2.1f KB", ($mailbox_total / 1024));
-
- $b = "listhdrr";
- $DATA['TABLE'] .= "<tr><td class=\"{$b}\">Total</td>".
- " <td class=\"{$b} rowDivider\" align=\"right\" nowrap=\"nowrap\">{$mailbox_total_display}</td>".
- " <td class=\"{$b} rowDivider\">{$sl_total}</td>".
- " <td class=\"{$b}\">{$il_total}</td>".
- " <td class=\"{$b}\">{$sm_total}</td>".
- " <td class=\"{$b}\">{$fp_total}</td>".
- " <td class=\"{$b}\">{$sc_total}</td>".
- " <td class=\"{$b}\">{$ic_total}</td>".
- " <td class=\"{$b} rowDivider\">&nbsp;</td>".
- " <td class=\"{$b}\">&nbsp;</td>".
- " <td class=\"{$b}\">&nbsp;</td>".
- " <td class=\"{$b}\">&nbsp;</td>".
- " <td class=\"{$b}\">&nbsp;</td>".
- " <td class=\"{$b}\">&nbsp;</td>".
- "</tr>\n";
-}
-
-function &DisplayStatus() {
- global $CONFIG, $DATA;
-
- $LOG = "{$CONFIG['DSPAM_HOME']}/system.log";
- $spam_daily = array();
- $nonspam_daily = array();
- $period_daily = array();
- $fp_daily = array();
- $sm_daily = array();
- $inoc_daily = array();
- $whitelist_daily = array();
- $spam_weekly = array();
- $nonspam_weekly = array();
- $period_weekly = array();
- $fp_weekly = array();
- $sm_weekly = array();
- $inoc_weekly = array();
- $$whitelist_weekly = array();
- $msgpersecond = array();
- $classes = array();
-
- list (, $min, $hour, $mday, $mon, $year, , ,) = (localtime(time()));
- $hmstart = time() - 60;
- $daystart = mktime(0, 0, 0, $mon, $mday, $year);
- $periodstart = $daystart - (3600*24*24); /* 2 Weeks ago */
- $dailystart = time() - (3600*23);
- $c_weekly = 0; /* Cursor to most recent time slot */
- $c_daily = 0;
-
- if (! file_exists($LOG)) {
- return $input_errors[] = "No historical data is available (log file »{$LOG}« does not exist).";
- }
-
- /* Initialize each individual time period */
-
- for ($i = 0; $i <= 23; $i++) {
- $h = To12Hour($hour - (23-$i));
- $period_daily[$i] = $h;
- $spam_daily[$i] = 0;
- $nonspam_daily[$i] = 0;
- $sm_daily[$i] = 0;
- $fp_daily[$i] = 0;
- $inoc_daily[$i] = 0;
- }
-
- for ($i = 0; $i <= 23; $i++) {
- $d = $daystart - (3600 * 24 * (24 - $i));
- list (, , , $lday, $lmon, $lyear, , ,) = (localtime($d));
- $lmon++;
- $lyear += 1900;
- $period_weekly[$i] = "{$lmon}/{$lday}/{$lyear}";
- $spam_weekly[$i] = 0;
- $nonspam_weekly[$i] = 0;
- $sm_weekly[$i] = 0;
- $fp_weekly[$i] = 0;
- $inoc_weekly[$i] = 0;
- }
-
- if($fd = @fopen("{$LOG}", "r")) {
- while (!feof($fd)) {
- $line = fgets($fd, 4096);
- list ($t_log, $c_log, , $signature, , $e_log) = preg_split('/\t/', $line);
- if ($t_log > time()) { continue; }
-
- $last_message = $t_log;
-
- /* Only Parse Log Data in our Time Period */
- if ($t_log >= $periodstart) {
- list (, $tmin, $thour, $tday, $tmon, $tyear) = (localtime($t_log));
- $tmon++;
- $tyear += 1900;
-
- /* Weekly Graph */
- $c_weekly = 0;
- while($period_weekly[$c_weekly] <> "{$tmon}/{$tday}/{$tyear}" && $c_weekly < 24) {
- $c_weekly++;
- }
-
- if ($c_log == "E") {
- if ($classes[$signature] == "S") {
- $spam_weekly[$c_weekly]--;
- if ($spam_weekly[$c_weekly] < 0) { $spam_weekly[$c_weekly] = 0; }
- } else if ($classes[$signature] == "I") {
- $nonspam_weekly[$c_weekly]--;
- if ($nonspam_weekly[$c_weekly] < 0) { $nonspam_weekly[$c_weekly] = 0; }
- } else if ($classes[$signature] == "W") {
- $whitelist_weekly[$c_weekly]--;
- if ($whitelist_weekly[$c_weekly] < 0) { $whitelist_weekly[$c_weekly] = 0; }
- } else if ($classes[$signature] == "F") {
- $spam_weekly[$c_weekly]++; $fp_weekly[$c_weekly]--;
- if ($fp_weekly[$c_weekly] < 0) { $fp_weekly[$c_weekly] = 0; }
- } else if ($classes[$signature] == "M") {
- $sm_weekly[$c_weekly]--; $nonspam_weekly[$c_weekly]++;
- if ($sm_weekly[$c_weekly] < 0) { $sm_weekly[$c_weekly] = 0; }
- } else if ($classes[$signature] == "N") {
- $inoc_weekly[$c_weekly]--;
- if ($inoc_weekly[$c_weekly] < 0) { $inoc_weekly[$c_weekly] = 0; }
- }
- } else {
- $classes[$signature] = $c_log;
- }
-
- if ($c_log == "S") { $spam_weekly[$c_weekly]++; }
- if ($c_log == "I") { $nonspam_weekly[$c_weekly]++; }
- if ($c_log == "W") { $whitelist_weekly[$c_weekly]++; }
- if ($c_log == "F")
- { $spam_weekly[$c_weekly]--; $fp_weekly[$c_weekly]++;
- if ($spam_weekly[$c_weekly] < 0) { $spam_weekly[$c_weekly] = 0; }
- }
- if ($c_log == "M")
- { $sm_weekly[$c_weekly]++; $nonspam_weekly[$c_weekly]--;
- if ($nonspam_weekly[$c_weekly] < 0) { $nonspam_weekly[$c_weekly] = 0; }
- }
- if ($c_log == "N") { $inoc_weekly[$c_weekly]++; }
-
-
- /* Daily Graph */
- if ($t_log >= $dailystart) {
- while($period_daily[$c_daily] <> To12Hour($thour) && $c_daily < 24) {
- $c_daily++;
- }
-
- if ($c_log == "E") {
- if ($classes[$signature] == "S") {
- $spam_daily[$c_daily]--;
- if ($spam_daily[$c_daily] < 0) { $spam_daily[$c_daily] = 0; }
- } else if ($classes[$signature] == "I") {
- $nonspam_daily[$c_daily]--;
- if ($nonspam_daily[$c_daily] < 0) { $nonspam_daily[$c_daily] = 0; }
- } else if ($classes[$signature] == "W") {
- $whitelist_daily[$c_daily]--;
- if ($whitelist_daily[$c_daily] < 0) { $whitelist_daily[$c_daily] = 0; }
- } else if ($classes[$signature] == "F") {
- $spam_daily[$c_daily]++; $fp_daily[$c_daily]--;
- if ($fp_daily[$c_daily] < 0) { $fp_daily[$c_daily] = 0; }
- } else if ($classes[$signature] == "M") {
- $sm_daily[$c_daily]--; $nonspam_daily[$c_daily]++;
- if ($sm_daily[$c_daily] < 0) { $sm_daily[$c_daily] = 0; }
- } else if ($classes[$signature] == "N") {
- $inoc_daily[$c_daily]--;
- if ($inoc_daily[$c_daily] < 0) { $inoc_daily[$c_daily] = 0; }
- }
- }
-
- if ($c_log == "S") { $spam_daily[$c_daily]++; }
- if ($c_log == "I") { $nonspam_daily[$c_daily]++; }
- if ($c_log == "W") { $whitelist_daily[$c_daily]++; }
- if ($c_log == "F")
- { $spam_daily[$c_daily]--; $fp_daily[$c_daily]++;
- if ($spam_daily[$c_daily] < 0) { $spam_daily[$c_daily] = 0; }
- }
- if ($c_log == "M")
- { $sm_daily[$c_daily]++; $nonspam_daily[$c_daily]--;
- if ($nonspam_daily[$c_daily] < 0) { $nonspam_daily[$c_daily] = 0; }
- }
- if ($c_log == "N") { $inoc_daily[$c_daily]++; }
- }
-
- /* Last Half-Minute */
- if ($t_log >= $hmstart) {
- $msgpersecond[$t_log]++;
- $DATA['AVG_PROCESSING_TIME'] += $e_log;
- $keycount_exectime++;
- }
- }
- } // end while
-
- fclose($fd);
- } else {
- return $input_errors[] = "Unable to open logfile: {$LOG}.";
- } // end if
-
- /* Calculate Avg. Messages Per Second */
- foreach(array_values($msgpersecond) as $el) {
- $DATA['AVG_MSG_PER_SECOND'] += $el;
- }
- $DATA['AVG_MSG_PER_SECOND'] /= 60;
- $DATA['AVG_MSG_PER_SECOND'] = sprintf("%2.2f", $DATA['AVG_MSG_PER_SECOND']);
-
- /* Calculate Avg. Processing Time */
- if ($keycount_exectime == 0) {
- $DATA['AVG_PROCESSING_TIME'] = 0;
- } else {
- $DATA['AVG_PROCESSING_TIME'] /= $keycount_exectime;
- }
- $DATA['AVG_PROCESSING_TIME'] = sprintf("%01.6f", $DATA['AVG_PROCESSING_TIME']);
-
- /* Calculate Number of processes, Uptime and Mail Queue length */
- $pd = popen("{$CONFIG['ALL_PROCS']} | grep dspam | grep -v grep | grep -v cgi | grep -v sock | wc -l", "r");
- $DATA['DSPAM_PROCESSES'] = fgets($pd, 4096);
- pclose($pd);
-
- $pd = popen("uptime", "r");
- $DATA['UPTIME'] = fgets($pd, 4096);
- pclose($pd);
-
- $pd = popen("{$CONFIG['MAIL_QUEUE']}", "r");
- $DATA['MAIL_QUEUE'] = fgets($pd, 4096);
- pclose($pd);
-
- /* Calculate Graphs */
- $DATA['SPAM_TODAY'] = $spam_weekly[24];
- $DATA['NONSPAM_TODAY'] = $nonspam_weekly[24];
- $DATA['SM_TODAY'] = $sm_weekly[24];
- $DATA['FP_TODAY'] = $fp_weekly[24];
- $DATA['INOC_TODAY'] = $inoc_weekly[24];
- $DATA['TOTAL_TODAY'] = $DATA['SPAM_TODAY'] + $DATA['NONSPAM_TODAY'] + $DATA['SM_TODAY']
- + $DATA['FP_TODAY'] + $DATA['INOC_TODAY'];
-
- $DATA['SPAM_THIS_HOUR'] = $spam_daily[23];
- $DATA['NONSPAM_THIS_HOUR'] = $nonspam_daily[23];
- $DATA['SM_THIS_HOUR'] = $sm_daily[23];
- $DATA['FP_THIS_HOUR'] = $fp_daily[23];
- $DATA['INOC_THIS_HOUR'] = $inoc_daily[23];
- $DATA['TOTAL_THIS_HOUR'] = $DATA['SPAM_THIS_HOUR'] +
- + $DATA['NONSPAM_THIS_HOUR']
- + $DATA['SM_THIS_HOUR']
- + $DATA['FP_THIS_HOUR']
- + $DATA['INOC_THIS_HOUR'];
-
- if (is_array($spam_daily) &&
- is_array($nonspam_daily) &&
- is_array($sm_daily) &&
- is_array($fp_daily) &&
- is_array($inoc_daily) &&
- is_array($whitelist_daily) &&
- is_array($period_daily)) {
- $DATA['DATA_DAILY'] = join(",", $spam_daily)
- . "_"
- . join(",", $nonspam_daily)
- . "_"
- . join(",", $sm_daily)
- . "_"
- . join(",", $fp_daily)
- . "_"
- . join(",", $inoc_daily)
- . "_"
- . join(",", $whitelist_daily)
- . "_"
- . join(",", $period_daily);
-
- foreach($spam_daily as $el){ $DATA['TS_DAILY'] += $el; };
- foreach($nonspam_daily as $el){ $DATA['TI_DAILY'] += $el; }
- foreach($sm_daily as $el){ $DATA['SM_DAILY'] += $el; }
- foreach($fp_daily as $el){ $DATA['FP_DAILY'] += $el; }
- foreach($inoc_daily as $el){ $DATA['INOC_DAILY'] += $el; }
- foreach($whitelist_daily as $el){ $DATA['TI_DAILY'] += $el; }
- }
-
- if (is_array($spam_weekly) &&
- is_array($nonspam_weekly) &&
- is_array($sm_weekly) &&
- is_array($fp_weekly) &&
- is_array($inoc_weekly) &&
- is_array($whitelist_weekly) &&
- is_array($period_weekly)) {
- $DATA['DATA_WEEKLY'] = join(",", $spam_weekly)
- . "_"
- . join(",", $nonspam_weekly)
- . "_"
- . join(",", $sm_weekly)
- . "_"
- . join(",", $fp_weekly)
- . "_"
- . join(",", $inoc_weekly)
- . "_"
- . join(",", $whitelist_weekly)
- . "_"
- . join(",", $period_weekly);
-
- foreach($spam_weekly as $el){ $DATA['TS_WEEKLY'] += $el; }
- foreach($nonspam_weekly as $el){ $DATA['TI_WEEKLY'] += $el; }
- foreach($sm_weekly as $el){ $DATA['SM_WEEKLY'] += $el; }
- foreach($fp_weekly as $el){ $DATA['FP_WEEKLY'] += $el; }
- foreach($inoc_weekly as $el){ $DATA['INOC_WEEKLY'] += $el; }
- foreach($whitelist_weekly as $el){ $DATA['TI_WEEKLY'] += $el; }
- }
-}
-
-function &DisplayInfos() {
- global $CONFIG, $DATA, $g;
- $validity = "valide";
-
- $pd = @popen("{$CONFIG['DSPAM']} --version", "r");
- fgets($pd, 4096); // ignore 1st line
- $DATA['DSPAM_VERSION'] = fgets($pd, 4096);
- fgets($pd, 4096); // ignore next line
- $DATA['DSPAM_COPYRIGHT'] = fgets($pd, 4096);
- $DATA['DSPAM_WEBSITE'] = fgets($pd, 4096);
- fgets($pd, 4096); // ignore next line
- $DATA['DSPAM_COPYRIGHT_TEXT'] = fgets($pd, 4096);
- $DATA['DSPAM_COPYRIGHT_TEXT'] .= " " . fgets($pd, 4096);
- fgets($pd, 4096); // ignore next line
- $DATA['DSPAM_CONFIGURE_ARGS'] = str_replace("Configuration parameters: ", "", fgets($pd, 4096));
-
- pclose($pd);
-
- if (file_exists("{$g['conf_path']}/nione.lic") &&
- file_exists("{$g['conf_path']}/nione.lic.sha1")) {
- if ($fd = @fopen("{$g['conf_path']}/nione.lic", "r")) {
- $owneru = str_replace("Licensed User: ", "", fgets($fd, 4096));
- if ($owneru == "") { $validity = "invalide (owner data not found)"; }
- $ownerc = str_replace("Company: ", "", fgets($fd, 4096));
- if ($ownerc == "") { $validity = "invalide (company not found)"; }
- $lkey = str_replace("License Key: ", "", fgets($fd, 4096));
- if ($lkey == "") { $validity = "invalide (license key not found)"; }
- $pdate = strtotime( str_replace("Purchase Date: ", "", fgets($fd, 4096)) );
- if ($pdate == "") { $validity = "invalide (purchase date not found)"; }
-
- fclose($fd);
- } else {
- $validity = "invalide (license files not found)";
- }
-
- require_once ("knione");
- $gen_lkey = getNIONEKey(trim($owneru), trim($ownerc));
- if (trim($lkey) <> $gen_lkey) { $validity = "invalide (wrong license key)"; }
-
- $cdate = mktime(0, 0, 0, date("m"),
- date("d"),
- date("Y"));
-
- $edate = mktime(0, 0, 0, date("m", $pdate),
- date("d", $pdate),
- date("Y", $pdate)+1);
-
- if ($edate < $cdate ||
- $pdate > $cdate) {
- $validity = "invalide (license expired)";
- }
-
- if ($fd = @fopen("{$g['conf_path']}/nione.lic.sha1", "r")) {
- $chksum = str_replace("SHA1 (nione.lic) = ", "", fgets($fd, 4096));
- $chksum_new = sha1_file("{$g['conf_path']}/nione.lic");
-
- if (trim($chksum) !== trim($chksum_new)) {
- $validity = "invalide (wrong license file checksum)";
- }
-
- fclose($fd);
- } else {
- $validity = "invalide (license files not found)";
- }
- } else {
- $validity = "invalide (license files not found)";
- }
-
- $DATA['OWNER'] = $owneru;
- $DATA['COMPANY'] = $ownerc;
- $DATA['LICENSE_KEY'] = $lkey;
- $DATA['LICENSE_VALIDITY'] = $validity;
- $DATA['PURCHASE_DATE'] = date("F j, Y", $pdate);
- $DATA['EXPIRY_DATE'] = date("F j, Y", $edate);
-}
-
-/* ========================================================================== */
-/* = H I S T O R Y F U N C T I O N S = */
-/* ========================================================================== */
-
-function &DisplayFragment($sigID = "",
- $from = "",
- $subject = "",
- $info = "",
- $time = "") {
- global $DATA, $USER;
-
- $sigID = preg_replace('/\/', '///', $sigID);
-
- $DATA['FROM'] = $from;
- $DATA['SUBJECT'] = $subject;
- $DATA['INFO'] = $info;
- $DATA['TIME'] = $time;
-
- if($fd = @fopen("{$USER}.frag/{$sigID}.frag", "r")) {
- while (!feof($fd)) {
- /* sanitize HTML markup */
- $line = preg_replace("/</e", "'&lt;'", fgets($fd, 4096));
- $line = preg_replace("/>/e", "'&gt;'", $line);
- $DATA['MESSAGE'] .= $line;
- }
- fclose($fd);
- } else {
- return $input_errors[] = "Unable to open file {$USER}.frag/{$sigID}.frag.";
- }
-}
-
-function &DisplayHistory($command = "",
- $sigID= "",
- $retrainChecked = array(),
- $username = "",
- $retrainParam = "",
- $currentPage = 1,
- $hPerPage = 0) {
- global $CONFIG, $USER, $CURRENT_USER, $DATA;
-
- $buffer = array();
- $history = array();
- $rec = array();
- $rowclass = "rowEven";
-
- if ($command == "retrainChecked" && count ($retrainChecked) > 0) {
- foreach($retrainChecked as $el) {
- list ($retrain, $signature) = split(":", $el);
- if ($retrain == "innocent") {
- ProcessFalsePositive(quotemeta($signature));
- } else if ($retrain == "innocent" || $retrain == "spam") {
- system("{$CONFIG['DSPAM']} --source=error --class=" . quotemeta($retrain) .
- " --signature=" . quotemeta($signature) .
- " --user " . quotemeta($CURRENT_USER));
- }
- }
- // TODO: Do we need the other params which were submited during the current
- // POS/GET request?
- pfSenseHeader("/dspam-history.php?user={$username}&page={$currentPage}&hperpage={$hPerPage}");
- } else {
- if ($retrainParam <> "") {
- if ($retrainParam == "innocent") {
- ProcessFalsePositive();
- } else {
- system("{$CONFIG['DSPAM']} --source=error --class=" . quotemeta($retrainParam) .
- " --signature=" . quotemeta($sigID) .
- " --user " . quotemeta($CURRENT_USER));
- }
- // TODO: Do we need the other params which were submited during the current
- // POS/GET request?
- pfSenseHeader("/dspam-history.php?user={$username}&page={$currentPage}&hperpage={$hPerPage}");
- }
- }
-
- $LOG = "{$USER}.log";
- if (! file_exists($LOG)) {
- return $input_errors[] = "No historical data is available (log file »{$USER}.log« does not exist).";
- }
-
- /* Preseed retraining information and delivery errors */
-
- $fd = fopen($LOG, "r");
- while (!feof($fd)) {
- /* TODO: If the subject line contains a <TAB>, the below array would
- * contain more then seven elements and thus would be invalide.
- *
- * The below code is some kind of a bug fix.
- */
- $cline = fgets($fd, 4096);
- $log_columns = preg_split("/\t/", $cline);
- list($time, $class, $from, $signature, $subject, $info, $messageid) = $log_columns;
- if (count ($log_columns) > 7) {
- /* get values from the array beginning */
- $time = array_shift($log_columns);
- $class = array_shift($log_columns);
- $from = array_shift($log_columns);
- $signature = array_shift($log_columns);
- /* get msgid and info from the array end */
- $messageid = array_pop($log_columns);
- $info = array_pop($log_columns);
- /* the remaining parts are belonging to the subject */
- $subject = implode(" ", $log_columns);
- }
-
- if ($signature == "") { continue; }
- if ($class == "M" || $class == "F" || $class == "E") {
- if ($class == "E") {
- $rec[$signature]['info'] = $info;
- } else if ($class == "F" || $class == "M") {
- $rec[$signature]['class'] = $class;
- $rec[$signature]['count']++;
- if ($rec[$signature]['info'] == "")
- { $rec[$signature]['info'] = $info; }
- }
- /* filter out resents if there are any. Since it's the same
- * message we only allow retraining on the 1st occurence of it.
- */
- } else if ($messageid == "" ||
- $rec[$signature]['messageid'] != $messageid ||
- $CONFIG['HISTORY_DUPLICATES'] <> "no") {
- $rec[$signature]['time'] = $time;
- $rec[$signature]['class'] = $class;
- $rec[$signature]['from'] = $from;
- $rec[$signature]['signature'] = $signature;
- $rec[$signature]['subject'] = $subject;
- $rec[$signature]['info'] = $info;
- $rec[$signature]['messageid'] = $messageid;
-
- array_unshift($buffer, $rec[$signature]);
- }
- } // end while
- fclose($fd);
-
- /* if the page size wasn't specified, set a default one */
- if ($CONFIG['HISTORY_PER_PAGE'] == 0) {
- $CONFIG['HISTORY_PER_PAGE'] = 50;
- }
-
- if (isset($hPerPage) && $hPerPage > 0) {
- $CONFIG['HISTORY_PER_PAGE'] = $hPerPage;
- }
-
- if (isset($currentPage) && isset($CONFIG['HISTORY_PER_PAGE'])) {
- $pages = ceil( (count ($buffer) / $CONFIG['HISTORY_PER_PAGE']) );
- $begin = (($currentPage - 1) * $CONFIG['HISTORY_PER_PAGE']);
- $ranges = ceil ($pages / $CONFIG['HNAV_BUTTONS']);
-
- /* Now lets just keep the information that we really need. */
- $buffer = array_splice($buffer, $begin, $CONFIG['HISTORY_PER_PAGE']);
- }
-
- $retrain_checked_msg_no = 0;
- while ($rec = array_pop($buffer)) {
- $time = $rec['time'];
- $class = $rec['class'];
- $from = $rec['from'];
- $signature = $rec['signature'];
- $subject = $rec['subject'];
- $info = $rec['info'];
- $messageid = $rec['messageid'];
-
- if ($signature == "") { continue; }
- if ($rec[$signature]['displayed'] <> "") { continue; }
- if ($class == "E") { continue; }
- $rec[$signature]['displayed'] = 1;
-
- /* Resends of retrained messages will need the original from/subject line */
- if ($messageid <> "") {
- if ($from == "<None Specified>") { $from = $rec[$messageid]['from']; }
- if ($subject == "<None Specified>") { $subject = $rec[$messageid]['subject']; }
-
-
- if ($rec[$messageid]['from'] == "") { $rec[$messageid]['from'] = $from; }
- if ($rec[$messageid]['subject'] == "") { $rec[$messageid]['subject'] = $subject; }
- }
-
- if ($from == "") { $from = "<None Specified>"; }
- if ($subject == "") { $subject = "<None Specified>"; }
-
- $ctime = "";
- if(isset($CONFIG["DATE_FORMAT"])) {
- $ctime = strftime($CONFIG["DATE_FORMAT"], localtime($time));
- } else {
- /* date format was taken from ctime.pl */
- $ctime = date ("D M d H:i:s TY",$time);
- $ttmp = preg_split("/\s+/", $ctime);
- $t = preg_split("/\:/", $ttmp[3]);
- $xtmp = preg_split("/\s+/", $ctime);
- $x = $xtmp[0];
- $m = "a";
- if ($t[0] > 12) { $t[0] -= 12; $m = "p"; }
- if ($t[0] == 0) { $t[0] = 12; }
- $ctime = "{$x} {$t[0]}:{$t[1]}{$m}";
- }
-
- /* Set the appropriate type and label for this message */
-
- $cl = "";
- $cllabel = "";
- if ($rec[$signature]['class'] <> "") { $class = $rec[$signature]['class']; }
- if ($class == "S") { $cl = "spam"; $cllabel="SPAM"; }
- else if ($class == "I") { $cl = "innocent"; $cllabel="Good"; }
- else if ($class == "F") {
- if (fmod($rec[$signature]['count'], 2) != 0) {
- $cl = "false"; $cllabel="Miss";
- } else {
- $cl = "innocent"; $cllabel="Good";
- }
- }
- else if ($class == "M") {
- if (fmod($rec[$signature]['count'], 2) != 0) {
- $cl = "missed"; $cllabel="Miss";
- } else {
- $cl = "spam"; $cllabel="SPAM";
- }
- }
- else if ($class == "N") { $cl = "inoculation"; $cllabel="Spam"; }
- else if ($class == "C") { $cl = "blacklisted"; $cllabel="RBL"; }
- else if ($class == "W") { $cl = "whitelisted"; $cllabel="Whitelist"; }
- if ($messageid <> "") {
- if ($rec[$messageid]['resend'] <> "") {
- $cl = "relay";
- $cllabel = "Resend";
- }
- $rec[$messageid]['resend'] = $signature;
- }
-
- if ($rec[$signature]['info'] <> "") { $info = $rec[$signature]['info']; }
-
- /* sanitize HTML markup */
- $from = preg_replace("/</e", "'&lt;'", $from);
- $from = preg_replace("/>/e", "'&gt;'", $from);
- $subject = preg_replace('/</e', "'&lt;'", $subject);
- $subject = preg_replace('/>/e', "'&gt;'", $subject);
-
- if (strlen($from) > $CONFIG['MAX_COL_LEN']) { $from = substr($from, 0, $CONFIG['MAX_COL_LEN']) . "..."; }
- if (strlen($subject) > $CONFIG['MAX_COL_LEN']) { $subject = substr($subject, 0, $CONFIG['MAX_COL_LEN']) . "..."; }
-
- $rclass = "";
- if ($class == "I" || $class == "W" || $class == "F") { $rclass = "spam"; }
- if ($class == "S" || $class == "M") { $rclass = "innocent"; }
-
- $retrain = "";
- if (preg_match('/^(M|F)$/', $rec[$signature]['class']) > 0 &&
- fmod($rec[$signature]['count'], 2) != 0) {
- $retrain = "<b>Retrained</b>";
- }
-
- if ($retrain == "") {
- $retrain = "<A HREF=\"/dspam-history.php?page={$currentPage}&hperpage={$hPerPage}&user={$username}&retrain={$rclass}&signatureID={$signature}\">As " . ucfirst($rclass) . "</A>";
- } else {
- $retrain .= "(<A HREF=\"/dspam-history.php?page={$currentPage}&hperpage={$hPerPage}&user={$username}&retrain={$rclass}&signatureID={$signature}\">Undo</A>)";
- }
-
- $path = "{$USER}.frag/{$signature}.frag";
- if (file_exists($path)) {
- $pairs = array();
- $pairs['template'] = "fragment";
- $pairs['signatureID'] = $signature;
- $sub = $subject;
- $sub = preg_replace('/#/e', '//', $sub);
- $sub = preg_replace("/(['])/e", '/\\$1/', $sub);
- $pairs['subject'] = $sub;
- $pairs['from'] = $from;
- $pairs['info'] = $info;
- $pairs['time'] = $ctime;
- $pairs['user'] = $username;
- $pairs['page'] = $currentPage;
- $pairs['hperpage'] = $hPerPage;
- $url = SafeVars($pairs);
- $from = "<a href=\"javascript:openwin(580,400,1,'/dspam-hfragment.php?{$url}')\">{$from}</a>";
- }
-
- $entry = <<<EOD
- <tr>
- <td align="left" valign="top" class="{$rowclass} {$cl}" nowrap="true"><small>{$cllabel}</small></td>
- <td align="left" valign="top" class="{$rowclass}" nowrap="true">
- <small>
- <input class="formfld" name="msgid{$retrain_checked_msg_no}" id="msgid{$retrain_checked_msg_no}" title="Check/Uncheck" type="checkbox" value="{$rclass}:{$signature}">
- <label for="msgid{$retrain_checked_msg_no}">{$retrain}</label>
- </small>
- </td>
- <td align="left" valign="top" class="{$rowclass}" nowrap="true"><small>{$ctime}</small></td>
- <td align="left" valign="top" class="{$rowclass}" nowrap="true"><small>{$from}</small></td>
- <td align="left" valign="top" class="{$rowclass}" nowrap="true"><small>{$subject}</small></td>
- <td align="left" valign="top" class="{$rowclass}" nowrap="true"><small>{$info}</small></td>
- </tr>
-
-EOD;
-
- $retrain_checked_msg_no++;
- array_push($history, $entry);
-
- if ($rowclass == "qrowEven") {
- $rowclass = "qrowOdd";
- } else {
- $rowclass = "qrowEven";
- }
- $hurtz++;
- } // end while
-
- $entry = <<<EOD
- <input name="history_page" type="hidden" value="{$history_page}">
-
-EOD;
- array_push($history, $entry);
-
- while($line = array_pop($history)) { $DATA['HISTORY'] .= $line; }
-
- if ($CONFIG['HISTORY_PER_PAGE'] > 0) {
- /* prepare quarantine navbar */
- if (($currentPage - 1) >= 1) { $previousPage = $currentPage - 1; }
- else { $previousPage = 1; }
-
- if (($currentPage + 1) <= $pages) { $nextPage = $currentPage + 1; }
- else { $nextPage = $pages; }
-
- $historyFooterBegin = <<<EOD
- <tr>
- <td align="right" valign="middle" class="listtopic" colspan="6">
- <span class="qnavbtn" onmouseover="this.style.backgroundColor='#A5B9E1;'" onmouseout="this.style.backgroundColor='#507DCD;'" title="First Page (1)"><a href="/dspam-history.php?page=1&qperpage={$CONFIG['HISTORY_PER_PAGE']}" title="First Page (1)">|&lt;</a></span>&nbsp;
- <span class="qnavbtn" onmouseover="this.style.backgroundColor='#A5B9E1;'" onmouseout="this.style.backgroundColor='#507DCD;'" title="Page {$previousPage}"><a href="/dspam-history.php?page={$previousPage}&qperpage={$CONFIG['HISTORY_PER_PAGE']}" title="Page {$previousPage}">&lt;</a></span>&nbsp;
-
-EOD;
-
- $historyFooterEnd = <<<EOD
- <span class="qnavbtn" onmouseover="this.style.backgroundColor='#A5B9E1;'" onmouseout="this.style.backgroundColor='#507DCD;'" title="Page {$nextPage}"><a href="/dspam-history.php?page={$nextPage}&qperpage={$CONFIG['HISTORY_PER_PAGE']}" title="Page {$nextPage}">&gt;</a></span>&nbsp;
- <span class="qnavbtn" onmouseover="this.style.backgroundColor='#A5B9E1;'" onmouseout="this.style.backgroundColor='#507DCD;'" title="Last Page ({$pages})"><a href="/dspam-history.php?page={$pages}&qperpage={$CONFIG['HISTORY_PER_PAGE']}" title="Last Page ({$pages})">&gt;|</a></span>
- </td>
- </tr>
-
-EOD;
-
- $ranges_array = array();
- $rpages = $pages;
- for ($i = 0; $i < $ranges; $i++) {
- $range = array();
- $range['start'] = (($i + 1)* $CONFIG['HNAV_BUTTONS']) - ($CONFIG['HNAV_BUTTONS'] - 1);
-
- if (($i + 1) == $ranges) {
- $range['end'] = ($range['start'] + $rpages) - 1;
- } else {
- $range['end'] = (($i + 1)* $CONFIG['HNAV_BUTTONS']);
- $rpages -= $CONFIG['HNAV_BUTTONS'];
- }
-
- $ranges_array[$i] = $range;
- }
-
- /* generate nav buttons */
- foreach($ranges_array as $range){
- if ($currentPage >= $range['start'] && $currentPage <= $range['end']) {
- for ($i = $range['start']; ; $i++) {
- if ($i > $range['end']) {
- break;
- } else {
- if ($i == $currentPage) {
- $historyFooter .= "<span class=\"qnavbtnhl\">{$i}</span>&nbsp\n";
- } else {
- $historyFooter .= "<span class=\"qnavbtn\" onmouseover=\"this.style.backgroundColor='#A5B9E1;'\" onmouseout=\"this.style.backgroundColor='#507DCD;'\" title=\"Page {$i}\"><a href=\"/dspam-history.php?page={$i}&hperpage={$CONFIG['HISTORY_PER_PAGE']}\" title=\"Page {$i}\">{$i}</a></span>&nbsp\n";
- }
- }
- }
- }
- }
-
- $DATA['HISTORY_FOOTER'] = $historyFooterBegin . $historyFooter .$historyFooterEnd;
- $DATA['HPAGES'] = $pages;
- $DATA['HPAGE'] = $currentPage;
-
-/*
- $DATA['HISTORY'] .= "<tr><td align=\"left\" valign=\"top\" colspan=\"6\"><center>[";
- if (($history_pages > 1) && ($history_page > 1)) {
- $i = $history_page - 1;
- $DATA['HISTORY'] .= "<a href=\"/dspam-history.php?user={$username}&history_page={$i}\">&nbsp;&lt;&nbsp;</a>";
- }
- for($i = 1; $i <= $history_pages; $i++) {
- if ($i == $history_page) {
- $DATA['HISTORY'] .= "<a href=\"/dspam-history.php?user={$username}&history_page={$i}\"><big><strong>&nbsp;$i&nbsp;</strong></big></a>";
- } else {
- $DATA['HISTORY'] .= "<a href=\"/dspam-history.php?user={$username}&history_page={$i}\">&nbsp;{$i}&nbsp;</a>";
- }
- }
- if (($history_pages > 1) && ($history_page < $history_pages)) {
- $i = $history_page + 1;
- $DATA['HISTORY'] .= "<a href=\"/dspam-history.php?user={$username}&history_page={$i}\">&nbsp;&gt;&nbsp;</a>";
- }
- $DATA['HISTORY'] .= "]</center></td></tr>";
-*/
- } // end if
-}
-
-/* ========================================================================== */
-/* = A N A L Y S I S F U N C T I O N S = */
-/* ========================================================================== */
-
-function &DisplayAnalysis() {
- global $USER, $CURRENT_USER, $CONFIG, $DATA;
- $LOG = "{$USER}.log";
-
- $Stats = array(
- "daily" => array(),
- "weekly" => array()
- );
-
- list(, $min, $hour, $mday, $mon, $year, , ,) = (localtime(time()));
- $daystart = mktime(0, 0, 0, $mon, $mday, $year);
- $periodstart = $daystart - (3600 * 24 * 13); /* 2 Weeks ago */
- $dailystart = time() - (3600 * 23);
-
- /* TODO: There's an issue that the Perl timelocal returns
- * different values compared to PHP's mktime. There's a
- * difference of 2678400, which will be added manually below.
- */
- $daystart += 2678400;
- $periodstart += 2678400;
-
- if (file_exists($LOG)) {
- if ($fd = @fopen($LOG, "r")) {
- $scount = 0;
- $icount = 0;
- $wcount = 0;
- $fcount = 0;
- $mcount = 0;
-
- while(!feof($fd)) {
- $buffer = fgets($fd, 4096);
- /* drop blank lines */
- if (strlen($buffer) == 0) { continue; }
- list($t_log, $c_log) = preg_split("/\t/", $buffer);
-
- /* Only Parse Log Data in our Time Period */
- /* TODO: The below if should evaluate to true at least for some data */
- if ($t_log >= $periodstart) {
- list(, $tmin, $thour, $tday, $tmon, , , ,) = (localtime($t_log));
- $tmon++;
-
- foreach (array('weekly', 'daily') as $period) {
- $idx = 0;
- if ($period == "weekly") {
- $idx= "{$tmon}/{$tday}";
- } else {
- if ($t_log <= $dailystart) { continue; }
- $idx = To12Hour($thour);
- }
- if (is_array($Stats[$period]) && ! array_key_exists ($idx, $Stats[$period])) {
- $Stats[$period][$idx] = array(
- 'nonspam' => 0,
- 'spam' => 0,
- 'title' => $idx,
- 'idx' => $t_log);
- }
- /* TODO: Is passing by reference here correct? */
- $hr =& $Stats[$period][$idx];
- /* S => spam */
- if ($c_log== "S") {
- $hr['spam']++;
- $scount++;
- }
- /* I => innocent W => whitelisted */
- if ($c_log == "I" || $c_log == "W") {
- $hr['nonspam']++;
- if ($c_log == "I") { $icount++; }
- else { $wcount++; }
- }
- /* F => false positive */
- if ($c_log == "F") {
- $hr['spam']--;
- if ($hr['spam'] < 0) { $hr['spam'] = 0; }
- $hr['nonspam']++;
- $fcount++;
- }
- /* M => spam miss */
- if ($c_log == "M") {
- $hr['nonspam']--;
- if ($hr['nonspam'] < 0) { $hr['nonspam'] = 0; }
- $hr['spam']++;
- $mcount++;
- }
- }
- }
- }
-
- fclose($fd);
- } else {
- return $input_errors[] = "Unable to open log file: {$LOG}.";
- }
-
- usort ((array_values ($Stats[$period])), "cmpArrayValues");
-
- foreach (array('weekly', 'daily') as $period) {
- $uc_period = strtoupper($period);
- $hk = "DATA_{$uc_period}";
- $lst = array();
-
- foreach (array_values($Stats[$period]) as $hr) {
- foreach (array('spam', 'nonspam', 'title') as $type ) {
-
- if (empty($lst[$type])) {
- $lst[$type] = array();
- }
-
- /* populate (newly) created array */
- $lst[$type][] = $hr[$type];
-
- $totk="";
-
- if ($type == "spam") { $totk="S"; }
- else if ($type == "nonspam") { $totk="I"; }
-
- if ($totk == "") { continue; }
-
- $sk="T{$totk}_{$uc_period}";
- if (empty($DATA[$sk])) { $DATA[$sk] = 0; }
-
- $DATA[$sk] += $hr[$type];
- }
- } // end foreach
- $DATA[$hk] =
- @join(",",$lst['spam']) . "_" .
- @join(",",$lst['nonspam']) . "_" .
- @join(",",$lst['title']);
- } // end foreach
- } else {
- return $input_errors[] = "No historical data is available (log file »{$LOG}« does not exist).";
- } // end if
-}
-
-function cmpArrayValues($a, $b) {
- if ($a['idx'] == $b['idx'])
- return 0;
-
- return ($a['idx'] < $b['idx']) ? -1 : 1;
-}
-
-/* ========================================================================== */
-/* = P E R E F E R E N C E S F U N C T I O N S = */
-/* ========================================================================== */
-
-function &DisplayPreferences($mode = "", &$statusmsg){
- global $USER, $CURRENT_USER, $CONFIG, $DATA;
- $FILE = "{$USER}.prefs";
- $username = $CURRENT_USER;
-
- if ($_POST) {
- $pconfig = $_POST;
-
- if ($pconfig['chk_feature_nr'] <> "on") {
- $pconfig['chk_feature_nr'] = "off";
- }
-
- if ($pconfig['chk_feature_optin'] <> "on") {
- $pconfig['chk_feature_optin'] = "off";
- }
-
- if ($pconfig['chk_feature_optout'] <> "on") {
- $pconfig['chk_feature_optout'] = "off";
- }
-
- if ($pconfig['chk_feature_at'] <> "on") {
- $pconfig['chk_feature_at'] = "off";
- }
-
- if ($pconfig['chk_feature_aw'] <> "on") {
- $pconfig['chk_feature_aw'] = "off";
- }
-
- if ($CONFIG['PREFERENCES_EXTENSION'] == 1) {
- if ($pconfig['msgtag'] == "") {
- $pconfig['msgtag'] = "''";
- } else {
- $pconfig['msgtag'] = quotemeta($pconfig['msgtag']);
- }
-
- exec("{$CONFIG['DSPAM_BIN']}/dspam_admin ch pref " . quotemeta($username) .
- " trainingMode " . quotemeta($pconfig['rad_train']) . " > /dev/null");
- exec("{$CONFIG['DSPAM_BIN']}/dspam_admin ch pref " . quotemeta($username) .
- " spamAction " . quotemeta($pconfig['rad_train_action']) . " > /dev/null");
- exec("{$CONFIG['DSPAM_BIN']}/dspam_admin ch pref " . quotemeta($username) .
- " signatureLocation " . quotemeta($pconfig['signatureLocation']) . " > /dev/null");
- exec("{$CONFIG['DSPAM_BIN']}/dspam_admin ch pref " . quotemeta($username) .
- " spamSubject " . quotemeta($pconfig['msgtag']) . " > /dev/null");
- exec("{$CONFIG['DSPAM_BIN']}/dspam_admin ch pref " . quotemeta($username) .
- " statisticalSedation " . quotemeta($pconfig['rad_filter_sens']) . " > /dev/null");
- exec("{$CONFIG['DSPAM_BIN']}/dspam_admin ch pref " . quotemeta($username) .
- " enableBNR " . quotemeta($pconfig['chk_feature_nr']) . " > /dev/null");
- exec("{$CONFIG['DSPAM_BIN']}/dspam_admin ch pref " . quotemeta($username) .
- " optOut " . quotemeta($pconfig['chk_feature_optout']) . " >/dev/null");
- exec("{$CONFIG['DSPAM_BIN']}/dspam_admin ch pref " . quotemeta($username) .
- " optIn " . quotemeta($pconfig['chk_feature_optin']) . " >/dev/null");
- exec("{$CONFIG['DSPAM_BIN']}/dspam_admin ch pref " . quotemeta($username) .
- " showFactors " . quotemeta($pconfig['chk_feature_at']) . " > /dev/null");
- exec("{$CONFIG['DSPAM_BIN']}/dspam_admin ch pref " . quotemeta($username) .
- " enableWhitelist " . quotemeta($pconfig['chk_feature_aw']) . " > /dev/null");
- } else {
- $prefsstr = <<<EOD
-trainingMode={$pconfig['rad_train']}
-spamAction={$pconfig['rad_ident_action']}
-spamSubject={$pconfig['msgtag']}
-statisticalSedation={$pconfig['rad_filter_sens']}
-enableBNR={$pconfig['chk_feature_nr']}
-optIn={$pconfig['chk_feature_optin']}
-optOut={$pconfig['chk_feature_optout']}
-showFactors={$pconfig['chk_feature_at']}
-enableWhitelist={$pconfig['chk_feature_aw']}
-signatureLocation={$pconfig['rad_train_action']}
-
-EOD;
-
- if ($fd = @fopen("{$FILE}","w")) {
- fwrite($fd, $prefsstr);
- fclose($fd);
- } else {
- return $input_errors[] = "Unable to write preferences to file: {$FILE}";
- }
- }
-
- $statusmsg = "DSPAM preferences have been written to: {$FILE}.";
- }
-
- $PREFS =& GetPrefs($username);
-
- $DATA["SEDATION_{$PREFS['statisticalSedation']}"] = 'checked="checked"';
- $DATA["S_{$PREFS['trainingMode']}"] = 'checked="checked"';
- $DATA["S_ACTION_" . strtoupper($PREFS['spamAction'])] = 'checked="checked"';
- $DATA["S_LOC_" . strtoupper($PREFS['signatureLocation'])] = 'checked="checked"';
- $DATA["SPAM_SUBJECT"] = $PREFS['spamSubject'];
- if ($PREFS['optIn'] == "on") {
- $DATA['C_OPTIN'] = 'checked="checked"';
- }
- if ($PREFS['optOut'] == "on") {
- $DATA['C_OPTOUT'] = 'checked="checked"';
- }
- if ($PREFS['enableBNR'] == "on") {
- $DATA['C_BNR'] = 'checked="checked"';
- }
- if ($PREFS['showFactors'] == "on") {
- $DATA['C_FACTORS'] = 'checked="checked"';
- }
- if ($PREFS['enableWhitelist'] == "on") {
- $DATA['C_WHITELIST'] = 'checked="checked"';
- }
-}
-
-function sortByRating($a, $b){
- if ($a['rating'] == $b['rating']) {
- return 0;
- }
-
- return ($a['rating'] < $b['rating']) ? -1 : 1;
-}
-
-/* ========================================================================== */
-/* = Q U A R A N T I N E F U N C T I O N S = */
-/* ========================================================================== */
-
-function &ProcessQuarantine($signatures = array(),
- $action = "None",
- $sortBy = "Rating",
- $currentPage = 1,
- $qPerPage = 0){
- switch($action){
- case "None":
- $input_errors =& DisplayQuarantine($sortBy, $currentPage, $qPerPage);
- break;
- case "manyNotSpam":
- $input_errors =& QuarantineManyNotSpam($signatures, $sortBy, $currentPage, $qPerPage);
- break;
- case "deleteAll":
- QuarantineDeleteSpam($action, $signatures, $sortBy, $currentPage, $qPerPage);
- break;
- default:
- QuarantineDeleteSpam();
- } // switch
-
- CheckQuarantine();
-
- return $input_errors;
-}
-
-function &ProcessFalsePositive($sigID = "",
- $sortBy = "Rating",
- $currentPage = 1,
- $qPerPage = 0) {
- global $MAILBOX, $CONFIG, $TMPFILE, $CURRENT_USER;
- $buffer = array();
- $head = array();
- $singatures = array();
- $found = 0;
- $error = false;
-
- if ($sigID == "") {
- return $input_errors[] = "No Message ID Specified.";
- }
-
- /* read the user's mailbox line by line into a buffer */
- $fd = fopen("{$MAILBOX}", "r");
- while (!feof($fd)) {
- $line = chop(fgets($fd, 4096));
- array_push($buffer, $line);
- }
- fclose ($fd);
-
- /* iterate over the mailbox buffer */
- reset($buffer);
- $i = 0;
- while ($i < count($buffer)) {
- $temp = array();
- $head = array();
- $mode = 0;
- $buff = "";
-
- /* this while tries to iterate over one single mesage including
- * the message header and the message body.
- */
- while((preg_match('/^From /', $buff) == 0) && ($i < count($buffer))) {
- $buff = $buffer[0];
-
- /* switch mode if we are hitting DSPAMs
- * pseudo From QUARANTINE line (without a
- * colon after the From).
- */
- if (preg_match('/^From /', $buff) > 0) {
- if ($mode == 0) { $mode = 1; }
- else { continue; }
- }
-
- $buff = array_shift($buffer);
- if (preg_match('/^From /', $buff) == 0) {
- array_push($temp, $buff);
- }
-
- continue;
- }
-
- foreach($temp as $tempel) {
- if ($tempel == "") { break; }
- list($key, $val) = preg_split('/\: ?/', $tempel, 2);
- $head[$key] = $val;
- }
- if ($head['X-DSPAM-Signature'] == $sigID) {
- $found = 1;
- $old_erep = error_reporting(E_ALL);
- if ($pd = @popen("|{$CONFIG['DSPAM']} {$CONFIG['DSPAM_ARGS']} >{$TMPFILE} 2>&1", "w")) {
- $pdresult = fread($handle, 2096);
-
- foreach($temp as $tempel) {
- fwrite($pd, "{$tempel}\n");
- }
-
- pclose($pd);
- error_reporting($old_erep);
- } else {
- $error = true;
- $input_errors[] = "Unable to ope process pipe in function <code>ProcessFalsePositive</code>.";
- }
- }
- }
-
- /* Couldn't find the message, so just retrain on signature */
- if (!$found) {
- system("$CONFIG{'DSPAM'} --source=error --class=innocent --signature=" . quotemeta($sigID) .
- " --user " . quotemeta($CURRENT_USER));
- }
-
- if ($error) {
- $log = array();
- $fd = fopen("{$TMPFILE}", "r");
- while (!feof($handle)) {
- $log .= fgets($fd, 4096);
- }
- fclose($fd);
- unlink("{$TMPFILE}");
- return $input_errors[] = $log;
- }
-
- unlink("{$TMPFILE}");
- $signatures[$sigID] = "on";
- return QuarantineDeleteSpam("", $signatures, $sortBy, $currentPage, $qPerPage);
-}
-
-function &QuarantineManyNotSpam($signatures = array(), $sortBy = "Rating", $currentPage = 1, $qPerPage = 0){
- global $MAILBOX, $USER;
- $buffer = array();
- $errors = array();
-
- /* read the user's mailbox line by line into a buffer */
- $fd = fopen("{$MAILBOX}", "r");
- while (!feof($fd)) {
- $line = chop(fgets($fd, 4096));
- array_push($buffer, $line);
- }
- fclose ($fd);
-
- if ($fd_FILE = @fopen("{$MAILBOX}", "w")) {
- $fd_RETRAIN = fopen("{$USER}.retrain.log", "a");
-
- /* iterate over the mailbox buffer */
- reset($buffer);
- $i = 0;
- while ($i < count($buffer)) {
- $temp = array();
- $head = array();
- $mode = 0;
- $buff = "";
-
- /* this while tries to iterate over one single mesage including
- * the message header and the message body.
- */
- while((preg_match('/^From /', $buff) == 0) && ($i < count($buffer))) {
- $buff = $buffer[0];
-
- /* switch mode if we are hitting DSPAMs
- * pseudo From QUARANTINE line (without a
- * colon after the From).
- */
- if (preg_match('/^From /', $buff) > 0) {
- if ($mode == 0) {
- $mode = 1;
- $buff = array_shift($buffer);
- array_push($temp, $buff);
- $buff = "";
- continue;
- } else {
- continue;
- }
- }
-
- $buff = array_shift($buffer);
- array_push($temp, $buff);
-
- continue;
- }
-
- /* populate the header array with header fields */
- foreach($temp as $tempel) {
- if ($tempel == "") { break; }
- list($key, $val) = preg_split('/\: ?/', $tempel, 2);
- $head[$key] = $val;
- }
-
- $delivered = 0;
- if ($signatures["chkmsg-{$head['X-DSPAM-Signature']}"] <> "") {
- $err = Deliver($temp);
- if ($err == "") {
- $delivered = 1;
- } else {
- array_push($errors, $err);
- }
- }
- if (!$delivered) {
- foreach($temp as $tempel) {
- fwrite($fd_FILE, "{$tempel}\n");
- }
- } else {
- fwrite($fd_RETRAIN, strval(time()) . "\t{$head['X-DSPAM-Signature']}\tinnocent\n");
- }
-
- $i++;
- } // end while
-
- fclose($fd_FILE);
- fclose($fd_RETRAIN);
- } else {
- return $input_errors[] = "Unable to open mailbox file: {$MAILBOX}.";
- }
-
- if (count($errors) > 0) {
- return $errors;
- }
-
- return DisplayQuarantine($sortBy, $currentPage, $qPerPage);
-}
-
-function Deliver($temp = array()) {
- global $CONFIG;
-
- if (! file_exists("/tmp/dspam-error-output.txt")) {
- touch("/tmp/dspam-error-output.txt");
- }
- $descriptorspec = array(
- 0 => array("pipe", "r"), // stdin is a pipe that the child will read from
- 1 => array("pipe", "w"), // stdout is a pipe that the child will write to
- 2 => array("file", "/tmp/dspam-error-output.txt", "a") // stderr is a file to write to
- );
-
- list($dev,$ino,$mode,$nlink,$uid,$gid,$rdev,$sizeb,
- $atime,$mtimeb,$ctime,$blksize,$blocks)
- = stat("/tmp/dspam-error-output.txt");
- clearstatcache();
-
- $cwd = '/tmp';
- $process = @proc_open("{$CONFIG['DSPAM']} {$CONFIG['DSPAM_ARGS']}",
- $descriptorspec,
- $pipes);
-
- if (is_resource($process)) {
- foreach($temp as $tempel) {
- if (! @fwrite($pipes[0], "{$tempel}\n")) {
- return "error while writting to pipe.";
- }
- }
-
- fclose($pipes[0]);
- fclose($pipes[1]);
- $return_value = proc_close($process);
-
- /* this isn't an elegant solution to determine whether
- * DSPAM did report some errors, but it works for now
- */
- list($dev,$ino,$mode,$nlink,$uid,$gid,$rdev,$sizea,
- $atime,$mtimea,$ctime,$blksize,$blocks)
- = stat("/tmp/dspam-error-output.txt");
-
- if ($mtimeb <> $mtimea) { return "DSPAM did report some errors to /tmp/dspam-error-output.txt.\n" .
- "Please check this particular file."; }
- } else {
- return "process is not a resource type.";
- }
-
- return "";
-}
-
-function getLayoutedMessage($msgbuffer = "", $sigID = "", $showpart = 0, $ctype = 0){
-
- if ($msgbuffer == "") {
- return '<span class="errmsg">An error occured while parsing the message (no message).</span>';
- }
- if ($sigID == "") {
- return '<span class="errmsg">An error occured while parsing the message (no signature).</span>';
- }
-
- if( extension_loaded( 'mailparse' ) ) {
- $msgdate = "N/A";
- $msgfrom = "N/A";
- $msgsub = "N/A";
- $msgto = "N/A";
-
- $mime = mailparse_msg_create();
- mailparse_msg_parse($mime, $msgbuffer);
- /* return an array of message parts - this contsists of the
- * names of the parts only.
- */
- $struct = mailparse_msg_get_structure($mime);
- $htmlstr = <<<EOD
- <tr>
- <td align="left" valign="top" class="listtopic" colspan="3">Message Infos</td>
- </tr>
- <tr>
- <td valign="baseline" class="vncell" colspan="1">Date:</td>
- <td class="vtable" colspan="2">%MSGDATE%</td>
- </tr>
- <tr>
- <td valign="baseline" class="vncell" colspan="1">From:</td>
- <td class="vtable" colspan="2">%MSGFROM%</td>
- </tr>
- <tr>
- <td valign="baseline" class="vncell" colspan="1">Subject:</td>
- <td class="vtable" colspan="2">%MSGSUB%</td>
- </tr>
- <tr>
- <td valign="baseline" class="vncell" colspan="1">To:</td>
- <td class="vtable" colspan="2">%MSGTO%</td>
- </tr>
- <tr>
- <td class="list" height="12" colspan="3">&nbsp;</td>
- </tr>
- <tr>
- <td align="left" valign="top" class="listtopic">Message Part</td>
- <td align="left" valign="top" class="listtopic">Part Type</td>
- <td align="left" valign="top" class="listtopic">Part Encoding</td>
- </tr>
- <tr>
-
-EOD;
-
- /* print a choice of sections */
- foreach($struct as $st) {
-
- /* get a handle on the message resource for a subsection */
- $section = mailparse_msg_get_part($mime, $st);
- /* get content-type, encoding and header information for that section */
- $info = mailparse_msg_get_part_data($section);
-
- /* replace placeholder with real data */
- if ($info['headers']['date'] <> "") {
- $htmlstr = str_replace("%MSGDATE%", $info['headers']['date'], $htmlstr);
- }
- if ($info['headers']['from'] <> "") {
- $htmlstr = str_replace("%MSGFROM%", $info['headers']['from'], $htmlstr);
- }
- if ($info['headers']['subject'] <> "") {
- $htmlstr = str_replace("%MSGSUB%", $info['headers']['subject'], $htmlstr);
- }
- if ($info['headers']['to'] <> "") {
- $htmlstr = str_replace("%MSGTO%", $info['headers']['to'], $htmlstr);
- }
-
- $fontStyle = "";
- if ($showpart && $showpart == $st) { $fontStyle = " style=\"font-weight: bolder;\""; }
-
- if ($info["content-type"] == "text/html") {
- $htmlstr .= "<td align=\"left\" valign=\"top\" class=\"vncell\"{$fontStyle}>" .
- "<a href=\"/dspam-viewmsg.php?ctype=1&showpart={$st}&signatureID={$sigID}&command=viewMessage\">{$st}</a>" .
- "</td>\n";
- } else {
- $htmlstr .= "<td align=\"left\" valign=\"top\" class=\"vncell\"{$fontStyle}>" .
- "<a href=\"/dspam-viewmsg.php?showpart={$st}&signatureID={$sigID}&command=viewMessage\">{$st}</a>" .
- "</td>\n";
- }
-
- $htmlstr .= <<<EOD
- <td align="left" valign="top" class="vtable"{$fontStyle}>{$info["content-type"]}</td>
- <td align="left" valign="top" class="vtable"{$fontStyle}>{$info["charset"]}</td>
- </tr>
-
-EOD;
- } // end foreach
-
- /* if we were called to display a part, do so now */
- if ($showpart) {
- /* get a handle on the message resource for the desired part */
- $sec = mailparse_msg_get_part($mime, $showpart);
-
- $htmlstr .= <<<EOD
- <tr>
- <td class="list" height="12" colspan="3">&nbsp;</td>
- </tr>
- <tr>
- <td align="left" valign="top" class="listtopic" colspan="3">Section {$showpart}</td>
- </tr>
- <tr>
- <td align="top" valign="left" colspan="3" class="vncell">
-EOD;
-
- ob_start();
- mailparse_msg_extract_part($sec, $msgbuffer);
- $contents = ob_get_contents();
- ob_end_clean();
- $contents = wordwrap( str_replace("&gt;", "&gt;\n", $contents), 100, "\n" );
- /* quote the message for safe display in a browser */
- if ($ctype = 1) {
- /* a html email message */
- $htmlstr .= "<pre style=\"font-size: 1.4em;\">" . $contents . "</pre></td>\n</tr>\n";
- } else {
- /* an ASCII (text) email message */
- $htmlstr .= htmlentities($contents) . "</td>\n</tr>\n";
- }
- }
-
- return $htmlstr;
- } else {
- return '<span class="errmsg">Could not load mailparse extension.</span>';
- }
-}
-
-function &QuarantineViewMessage($sigID = "",
- $showpart = 0,
- $ctype = 0,
- $sortBy = "Rating",
- $currentPage = 1,
- $qPerPage = 0) {
- global $MAILBOX, $DATA;
- $buffer = array(); // mailbox buffer
-
- if ($sigID == "") {
- return $input_errors[] = "No Message ID Specified.";
- }
-
- /* save data to be displayed as HTML form data */
- $DATA['MESSAGE_ID'] = $sigID;
- $DATA['SHOWPART'] = $showpart;
- $DATA['CONTENT_TYPE'] = $ctype;
- $DATA['QPAGE'] = $currentPage;
- $DATA['SORTBY'] = $sortBy;
-
- if ($qPerPage > 0) { $CONFIG['QUARANTINE_PER_PAGE'] = $qPerPage; }
-
- /* read the user's mailbox line by line into a buffer */
- $fd = fopen("{$MAILBOX}", "r");
- while (!feof($fd)) {
- $line = chop(fgets($fd, 4096));
- array_push($buffer, $line);
- }
- fclose ($fd);
-
- /* iterate over the mailbox buffer */
- reset($buffer);
- $i = 0;
- while ($i < count($buffer)) {
- $temp = array();
- $head = array();
- $mode = 0;
- $buff = "";
-
- /* this while tries to iterate over one single mesage including
- * the message header and the message body.
- */
- while((preg_match('/^From /', $buff) == 0) && ($i < count($buffer))) {
- $buff = $buffer[0];
-
- /* switch mode if we are hitting DSPAMs
- * pseudo From QUARANTINE line (without a
- * colon after the From).
- */
- if (preg_match('/^From /', $buff) > 0) {
- if ($mode == 0) { $mode = 1; }
- else { continue; }
- }
-
- $buff = array_shift($buffer);
- if (preg_match('/^From /', $buff) == 0) {
- array_push($temp, $buff);
- }
-
- continue;
- }
-
- /* populate the header array with header fields */
- foreach($temp as $tempel) {
- if ($tempel == "") { break; }
- list($key, $val) = preg_split('/\: ?/', $tempel, 2);
- $head[$key] = $val;
- }
- if ($head['X-DSPAM-Signature'] == $sigID) {
- foreach($temp as $tempel) {
- $tempel = preg_replace("/</e", "'&lt;'", $tempel);
- $tempel = preg_replace("/>/e", "'&gt;'", $tempel);
- $DATA['MESSAGE'] .= "{$tempel}\n";
- }
- }
-
- $i ++;
- } // end while
-}
-
-function QuarantineDeleteSpam($deleteAll = "", $signatures = array(), $sortBy = "Rating", $currentPage = 1, $qPerPage = 0){
- global $USER, $MAILBOX;
- $buffer = array();
-
- /* this is the most easiest operation: If the user wants
- * to completly delete any quarantined message, simply
- * open his mailbox in write mode, which empties the
- * user's mailbox file.
- */
- if ($deleteAll <> "") {
-
- list($dev,$ino,$mode,$nlink,$uid,$gid,$rdev,$size,
- $atime,$mtime,$ctime,$blksize,$blocks) = stat("{$USER}.mbox");
-
- $fd = fopen("{$USER}.mbox.size", "r");
- $sz = chop(fgets($fd, 4096));
- fclose($fd);
-
- if ($sz == $size) {
- $fd = fopen("{$MAILBOX}", "w");
- fclose($fd);
- unlink("{$USER}.mbox.size");
- unlink("{$USER}.mboxwarn");
- } else {
- return DisplayQuarantine($sortBy, $currentPage, $qPerPage);
- }
-
- //$FORM{'template'} = "performance";
- CheckQuarantine();
- return DisplayIndex();
- }
-
- /* iterate over the user's mailbox and store its contents in a buffer */
- $fd = fopen("{$MAILBOX}", "r");
- while (!feof($fd)) {
- $line = chop(fgets($fd, 4096));
- array_push($buffer, $line);
- }
- fclose($fd);
-
- /* open the user's mailbox in write mode. This empties the mailbox! */
- fopen("{$MAILBOX}", "w");
-
- /* iterate over the mailbox buffer */
- reset($buffer);
- $i = 0;
- while ($i < count($buffer)) {
- $temp = array();
- $head = array();
- $mode = 0;
-
- /* this while tries to iterate over one single mesage including
- * the message header and the message body.
- */
- while((preg_match('/^From /', $buff) == 0) && ($i < count($buffer))) {
- $buff = $buffer[0];
-
- /* switch mode if we are hitting DSPAMs
- * pseude From QUARANTINE line (without a
- * colon after the From).
- */
- if (preg_match('/^From /', $buff) > 0) {
- if ($mode == 0) {
- $mode = 1;
- $buff = array_shift($buffer);
- array_push($temp, $buff);
- $buff = "";
- continue;
- } else {
- continue;
- }
- }
- $buff = array_shift($buffer);
- array_push($temp, $buff);
-
- continue;
- }
-
- /* populate the header array with header fields */
- foreach($temp as $tempel) {
- if ($tempel == "") { break; }
- list($key, $val) = preg_split('/\: ?/', $tempel, 2);
- $head[$key] = $val;
- }
-
- /* if the current DSPAM signature wasn't selected by the
- * user to be deleted, write it back to the user's mailbox.
- */
- if ($signatures["chkmsg-{$head['X-DSPAM-Signature']}"] == "") {
- foreach($temp as $tempel) {
- fwrite($fd, "{$tempel}\n");
- }
- }
-
- $i++;
- } // end while
- fclose($fd);
-
- return;
-}
-
-function sortBySubject($a, $b){
- $lca = strtolower ($a['Subject']);
- $lcb = strtolower ($b['Subject']);
-
- return strcmp($lca, $lcb);
-}
-
-function sortByFrom($a, $b){
- $lca = strtolower ($a['From']);
- $lcb = strtolower ($b['From']);
-
- return strcmp($lca, $lcb);
-}
-
-function &DisplayQuarantine($sortBy = "Rating", $currentPage = 1, $qPerPage = 0) {
- global $USER, $CURRENT_USER, $CONFIG, $DATA, $MAILBOX;
- $alertcfg = &$config['installedpackages']['dspamalerts']['config'];
- $alerts = array();
-
- if (file_exists("{$USER}.mbox")) {
- list($dev,$ino,$mode,$nlink,$uid,$gid,$rdev,$size,
- $atime,$mtime,$ctime,$blksize,$blocks) = stat("{$USER}.mbox");
-
- $fd = fopen("{$USER}.mbox.size", "w");
- fwrite($fd, "{$size}");
- fclose($fd);
-
- $fd = fopen("{$MAILBOX}.stamp", "a+");
- fclose($fd);
- chmod("{$MAILBOX}.stamp", 0660);
-
- /* process alert names */
- if (is_array($alertcfg)) {
- $alert_counter = 0;
-
- foreach ($alertcfg as $alert) {
- $alerts[$alert_counter] = $alert['alertname'];
- $alert_counter++;
- }
- }
-
- $mode = "";
- $buffer = array();
- $headings = array();
- $rowclass = "qrowEven";
- $fd = fopen("{$MAILBOX}", "r");
-
- while (!feof($fd)) {
- $mbxline = chop(fgets($fd, 4096));
-
- if ($mbxline <> "") {
- if (($mode == "")) {
- if (preg_match('/^From /', $mbxline) > 0) {
- $mode = 1;
- } else {
- continue;
- }
- }
-
- array_push($buffer, $mbxline);
- continue;
- }
-
- if ($mode == "") { continue; }
-
- $alert = 0;
- $new = array();
-
- foreach($buffer as $buf_element){
- foreach($alerts as $al){
- if (preg_match("/{$al}/i", $buf_element) > 0) {
- $alert = 1;
- }
- }
-
- if (preg_match('/^From /', $buf_element) > 0) {
- $a = split(' ', $buf_element);
- $x = 2;
-
- for ($i = 0; $i < count ($a); $i++) {
- if ((preg_match('/\@|>/', $a[$i]) > 0) && $i > $x) {
- $x = $i + 1;
- }
- }
-
- for ($i = 1; $i < $x; $i++) { array_shift($a); }
- $start = join(" ", $a);
- } else {
- list($key, $val) = preg_split('/\: ?/', $buf_element, 2);
- $new[$key] = $val;
- }
- }
-
- if ($rowclass == "qrowEven") {
- $rowclass = "qrowOdd";
- } else {
- $rowclass = "qrowEven";
- }
-
- $new['alert'] = $alert;
-
- if ($alert) { $rowclass="qrowAlert"; }
-
- $new['Sub2'] = $new['X-DSPAM-Signature'];
- if (strlen($new['Subject']) > $CONFIG['MAX_COL_LEN']) {
- $new['Subject'] = substr($new['Subject'], 0, $CONFIG['MAX_COL_LEN']) . "...";
- }
-
- if (strlen($new['From']) > $CONFIG['MAX_COL_LEN']) {
- $new['From'] = substr($new['From'], 0, $CONFIG['MAX_COL_LEN']) . "...";
- }
-
- if ($new['Subject'] == "") {
- $new['Subject'] = "<None Specified>";
- }
-
- //$new->{'rating'} = $new->{'X-DSPAM-Probability'} * $new->{'X-DSPAM-Confidence'};
- $new['rating'] = $new['X-DSPAM-Confidence'];
-
- foreach(array_keys($new) as $key) {
- if ($key == "X-DSPAM-Signature") { continue; }
- preg_replace('/</', '/\&lt\;/', $new[$key]);
- preg_replace('/>/', '/\&gt\;/', $new[$key]);
- }
-
- array_push($headings, $new);
-
- $buffer = array();
- $mode = "";
- continue;
- } // end while (!feof($fd))
-
- if (! isset($sortBy) || $sortBy == "") {
- $sortBy = $CONFIG['SORT_DEFAULT'];
- }
- if ($sortBy == "Rating") {
- usort($headings, "sortByRating");
- }
- if ($sortBy == "Subject") {
- usort($headings, "sortBySubject");
- }
- if ($sortBy == "From") {
- usort($headings, "sortByFrom");
- }
- if ($sortBy == "Date") {
- array_reverse ($headings);
- }
-
- /*
-
- <tr>
- <td align="left" valign="top" class="listtopic" width="8%">&nbsp;</td>
- <td align="left" valign="top" class="listtopic" width="5%" onclick="sortmsg('Rating');" style="cursor: pointer;">Rating</td>
- <td align="left" valign="top" class="listtopic" width="20%" onclick="sortmsg('Date');" style="cursor: pointer;">Date</td>
- <td align="left" valign="top" class="listtopic" width="25%" onclick="sortmsg('From');" style="cursor: pointer;">From</td>
- <td align="left" valign="top" class="listtopic" width="42%" onclick="sortmsg('Subject');" style="cursor: pointer;">Subject</td>
- </tr>
-
- */
-
- $DATA['SORTBY'] = $sortBy;
- $DATA['SORT_SELECTOR'] .= <<<EOD
- <tr>
- <td align="left" valign="top" class="listtopic" width="10%">&nbsp;</td>
-
-EOD;
-
- if ($sortBy == "Rating") {
- $DATA{'SORT_SELECTOR'} .= "<td align=\"left\" valign=\"top\" class=\"listtopic\" width=\"5%\" onclick=\"sortmsg('Rating');\" style=\"cursor: pointer;\">Rating&nbsp;&nbsp;&loz;</td>";
- } else {
- $DATA{'SORT_SELECTOR'} .= "<td align=\"left\" valign=\"top\" class=\"listtopic\" width=\"5%\" onclick=\"sortmsg('Rating');\" style=\"cursor: pointer;\">Rating</td>";
- }
- if ($sortBy == "Date") {
- $DATA{'SORT_SELECTOR'} .= "<td align=\"left\" valign=\"top\" class=\"listtopic\" width=\"20%\" onclick=\"sortmsg('Date');\" style=\"cursor: pointer;\">Date&nbsp;&nbsp;&loz;</td>";
- } else {
- $DATA{'SORT_SELECTOR'} .= "<td align=\"left\" valign=\"top\" class=\"listtopic\" width=\"20%\" onclick=\"sortmsg('Date');\" style=\"cursor: pointer;\">Date</td>";
- }
- if ($sortBy == "Subject") {
- $DATA{'SORT_SELECTOR'} .= "<td align=\"left\" valign=\"top\" class=\"listtopic\" width=\"40%\" onclick=\"sortmsg('Subject');\" style=\"cursor: pointer;\">Subject&nbsp;&nbsp;&loz;</td>";
- } else {
- $DATA{'SORT_SELECTOR'} .= "<td align=\"left\" valign=\"top\" class=\"listtopic\" width=\"40%\" onclick=\"sortmsg('Subject');\" style=\"cursor: pointer;\">Subject</td>";
- }
- if ($sortBy == "From") {
- $DATA{'SORT_SELECTOR'} .= "<td align=\"left\" valign=\"top\" class=\"listtopic\" width=\"25%\" onclick=\"sortmsg('From');\" style=\"cursor: pointer;\">From&nbsp;&nbsp;&loz;</td>";
- } else {
- $DATA{'SORT_SELECTOR'} .= "<td align=\"left\" valign=\"top\" class=\"listtopic\" width=\"25%\" onclick=\"sortmsg('From');\" style=\"cursor: pointer;\">From</td>";
- }
-
- $DATA{'SORT_SELECTOR'} .= "\n </tr>";
-
- if (isset($qPerPage) && $qPerPage > 0) {
- $CONFIG['QUARANTINE_PER_PAGE'] = $qPerPage;
- }
-
- if (isset($currentPage) && isset($CONFIG['QUARANTINE_PER_PAGE'])) {
- $pages = ceil( (count ($headings) / $CONFIG['QUARANTINE_PER_PAGE']) );
- $begin = (($currentPage - 1) * $CONFIG['QUARANTINE_PER_PAGE']);
- $ranges = ceil ($pages / $CONFIG['QNAV_BUTTONS']);
-
- /* Now lets just keep the information that we really need. */
- $headings = array_splice ($headings, $begin, $CONFIG['QUARANTINE_PER_PAGE']);
- }
-
- $rowclass = "qrowEven";
- foreach ($headings as $row) {
- $rating = sprintf("%3.0f%%", $row['rating'] * 100.0);
- if ($row['rating'] > 0.8) {
- $markclass = "high";
- } else {
- if ($row['rating'] < 0.7) {
- $markclass = "low";
- } else {
- $markclass = "medium";
- }
- }
-
- $PAIRS = array();
-
- $PAIRS['signatureID'] = $row['X-DSPAM-Signature'];
- $PAIRS['command'] = "viewMessage";
- $PAIRS['user'] = $CURRENT_USER;
- $PAIRS['page'] = $currentPage;
- $PAIRS['sortby'] = $sortBy;
- $PAIRS['qperpage'] = $CONFIG['QUARANTINE_PER_PAGE'];
- // $PAIRS['template'] = "quarantine";
-
- $url = SafeVars($PAIRS);
- $sender = htmlentities ($row['From']);
- $rsubject = htmlentities ($row['Subject']);
-
- if ($row['alert']) {
- $outclass = "qrowAlert";
- } else {
- $outclass = $rowclass;
- }
-
- $ptfields = preg_split('/\s+/', $row['X-DSPAM-Processed']);
- $times = preg_split('/\:/', $ptfields[3]);
- $ptime = "";
- if($CONFIG["DATE_FORMAT"]) {
- $month = array();
- $month['Jan'] = 0;
- $month['Feb'] = 1;
- $month['Mar'] = 2;
- $month['Apr'] = 3;
- $month['May'] = 4;
- $month['Jun'] = 5;
- $month['Jul'] = 6;
- $month['Aug'] = 7;
- $month['Sep'] = 8;
- $month['Oct'] = 9;
- $month['Nov'] = 10;
- $month['Dec'] = 11;
- $ptime = strftime($CONFIG["DATE_FORMAT"],
- mktime($times[2],
- $times[1],
- $times[0],
- $ptfields[2],
- $month[$ptfields[1]],
- $ptfields[4] - 1900));
- } else {
- $mer = "a";
- if ($times[0] > 12) { $times[0] -= 12; $mer = "p"; }
- if ($times[0] == 0) { $times[0] = "12"; }
- $ptime = "{$ptfields[1]} {$ptfields[2]} {$times[0]}:{$times[1]}{$mer}";
- }
-
- /*
-
- <tr>
- <td align="left" valign="top" class="vncell">
- <input type="checkbox" class="formfld" title="check" alt="check" name="chkmsg" id="" />
- </td>
- <td align="left" valign="top" class="vncell">
- <span style="color: darkblue; font-weight: bold;">50%</span>
- </td>
- <td align="left" valign="top" class="vncell">Apr 1 05:59a</td>
- <td align="left" valign="top" class="vncell">Mar 30 11:08a</td>
- <td align="left" valign="top" class="vncell">
- <u>Last chance to register for Frankfurt, 4 April BEA...</u>
- </td>
- </tr>
-
- <tr>
- <td align="left" valign="top" class="{$outclass}" nowrap="true">
- <input type="checkbox" class="formfld" title="check" alt="check" name="{$row['X-DSPAM-Signature']}" id="{$row['X-DSPAM-Signature']}" />
- </td>
- <td align="left" valign="top" class="{$outclass} {$markclass}" nowrap="true">
- {$rating}
- </td>
- <td align="left" valign="top" class="{$outclass}" nowrap="true">{$ptime}</td>
- <td align="left" valign="top" class="{$outclass}" nowrap="true">{$row['From']}</td>
- <td align="left" valign="top" class="{$outclass}" nowrap="true">
- <a href="{$CONFIG['ME']}?{$url}">{$row['Subject']}</a>
- </td>
- </tr>
- */
-
- $DATA['QUARANTINE'] .= <<<EOD
- <tr>
- <td align="left" valign="top" class="{$outclass}" nowrap="true">
- <input type="checkbox" class="formfld" title="check" alt="check" name="chkmsg-{$row['X-DSPAM-Signature']}" id="{$row['X-DSPAM-Signature']}" />
- </td>
- <td align="left" valign="top" class="{$outclass} {$markclass}" nowrap="true">
- {$rating}
- </td>
- <td align="left" valign="top" class="{$outclass}" nowrap="true">{$ptime}</td>
- <td align="left" valign="top" class="{$outclass}" nowrap="true">{$sender}</td>
- <td align="left" valign="top" class="{$outclass}" nowrap="true">
- <a href="/dspam-viewmsg.php?{$url}">{$rsubject}</a>
- </td>
- </tr>
-
-EOD;
-
- if ($rowclass == "qrowEven") {
- $rowclass = "qrowOdd";
- } else {
- $rowclass = "qrowEven";
- }
- } // end foreach ($headings as $row)
-
- /* prepare quarantine navbar */
- if (($currentPage - 1) >= 1) { $previousPage = $currentPage - 1; }
- else { $previousPage = 1; }
-
- if (($currentPage + 1) <= $pages) { $nextPage = $currentPage + 1; }
- else { $nextPage = $pages; }
-
- $quarantineFooterBegin = <<<EOD
- <tr>
- <td align="left" valign="top" class="listtopic">
- <input type="checkbox" class="formfld" title="check all" alt="check all" name="checkall" id="checkall" onClick="checkallmsgs();" />
- <label for="checkall">All</label>
- </td>
- <td align="right" valign="middle" class="listtopic" colspan="4">
- <span class="qnavbtn" onmouseover="this.style.backgroundColor='#A5B9E1;'" onmouseout="this.style.backgroundColor='#507DCD;'" title="First Page (1)"><a href="/dspam-quarantine.php?page=1&qperpage={$CONFIG['QUARANTINE_PER_PAGE']}" title="First Page (1)">|&lt;</a></span>&nbsp;
- <span class="qnavbtn" onmouseover="this.style.backgroundColor='#A5B9E1;'" onmouseout="this.style.backgroundColor='#507DCD;'" title="Page {$previousPage}"><a href="/dspam-quarantine.php?page={$previousPage}&qperpage={$CONFIG['QUARANTINE_PER_PAGE']}" title="Page {$previousPage}">&lt;</a></span>&nbsp;
-
-EOD;
-
- $quarantineFooterEnd = <<<EOD
- <span class="qnavbtn" onmouseover="this.style.backgroundColor='#A5B9E1;'" onmouseout="this.style.backgroundColor='#507DCD;'" title="Page {$nextPage}"><a href="/dspam-quarantine.php?page={$nextPage}&qperpage={$CONFIG['QUARANTINE_PER_PAGE']}" title="Page {$nextPage}">&gt;</a></span>&nbsp;
- <span class="qnavbtn" onmouseover="this.style.backgroundColor='#A5B9E1;'" onmouseout="this.style.backgroundColor='#507DCD;'" title="Last Page ({$pages})"><a href="/dspam-quarantine.php?page={$pages}&qperpage={$CONFIG['QUARANTINE_PER_PAGE']}" title="Last Page ({$pages})">&gt;|</a></span>
- </td>
- </tr>
-
-EOD;
-
- $ranges_array = array();
- $rpages = $pages;
- for ($i = 0; $i < $ranges; $i++) {
- $range = array();
- $range['start'] = (($i + 1)* $CONFIG['QNAV_BUTTONS']) - ($CONFIG['QNAV_BUTTONS'] - 1);
-
- if (($i + 1) == $ranges) {
- $range['end'] = ($range['start'] + $rpages) - 1;
- } else {
- $range['end'] = (($i + 1)* $CONFIG['QNAV_BUTTONS']);
- $rpages -= $CONFIG['QNAV_BUTTONS'];
- }
-
- $ranges_array[$i] = $range;
- }
-
- /* generate nav buttons */
- foreach($ranges_array as $range){
- if ($currentPage >= $range['start'] && $currentPage <= $range['end']) {
- for ($i = $range['start']; ; $i++) {
- if ($i > $range['end']) {
- break;
- } else {
- if ($i == $currentPage) {
- $quarantineFooter .= "<span class=\"qnavbtnhl\">{$i}</span>&nbsp\n";
- } else {
- $quarantineFooter .= "<span class=\"qnavbtn\" onmouseover=\"this.style.backgroundColor='#A5B9E1;'\" onmouseout=\"this.style.backgroundColor='#507DCD;'\" title=\"Page {$i}\"><a href=\"/dspam-quarantine.php?page={$i}&qperpage={$CONFIG['QUARANTINE_PER_PAGE']}\" title=\"Page {$i}\">{$i}</a></span>&nbsp\n";
- }
- }
- }
- }
- }
-
- $DATA['QUARANTINE_FOOTER'] = $quarantineFooterBegin . $quarantineFooter .$quarantineFooterEnd;
- $DATA['QPAGES'] = $pages;
- $DATA['QPAGE'] = $currentPage;
- } else {
- $input_errors[] = "Unable to open DSPAM quarantine mailbox at »{$USER}.mbox«. " .
- "If you are a DSPAM admin user you can savely " .
- "ignore this error because such users usually do not " .
- "have a DSPAM mailbox/quarantine.";
- }
-
- return $input_errors;
-}
-
-/* ========================================================================== */
-/* = P E R F O R M A N C E F U N C T I O N S = */
-/* ========================================================================== */
-
-function ResetStats() {
- global $USER;
-
- $fd = fopen("{$USER}.stats", "r");
- $ts = chop(fgets($fd, 4096));
- $group = chop(fgets($fd, 4096));
- fclose($fd);
- list($ts, $ti, $tm, $fp, $sc, $ic) = split(",", $ts);
-
- if ($group <> "") {
- $GROUP = GetPath($group) . ".stats";
- $fd = fopen("{$GROUP}", "r");
- $gts = chop(fgets($fd, 4096));
- fclose($fd);
- list ($gts, $gti, $gtm, $gfp, $gsc, $gic) = split(",", $gts);
- $ts -= $gts;
- $ti -= $gti;
- $tm -= $gtm;
- $fp -= $gfp;
- $sc -= $gsc;
- $ic -= $gic;
- }
-
- $fd = fopen("{$USER}.rstats", "w");
- fputs($fd, "{$ts}" . "," . "{$ti}" . "," . "{$tm}" . "," .
- "{$fp}" . "," . "{$sc}" . "," . "{$ic}\n");
- fclose($fd);
-}
-
-function Tweak() {
- global $USER;
-
- $fd = fopen("{$USER}.rstats", "r");
- $ts = chop(fgets($fd, 4096));
- $group = chop($fgets($fd, 4096));
- fclose($fd);
- list($ts, $ti, $tm, $fp, $sc, $ic) = split(",", $ts);
- $tm++;
-
- $fd = fopen("{$USER}.rstats", "w");
- fputs($fd, "{$ts},{$ti},{$tm},{$fp},{$sc},{$ic}\n");
- fclose($fd);
-}
-
-function &DisplayIndex() {
- global $USER, $CONFIG, $DATA, $CURRENT_STORE, $CURRENT_USER;
-
- if (strpos ($CURRENT_USER, "@") === false) {
- if (GetDomain($CURRENT_STORE) <> "")
- $domain = GetDomain($CURRENT_STORE);
- else
- $domain = $config['system']['domain'];
-
- $spamalias = "spam-{$CURRENT_USER}@{$domain}";
- } else {
- $spamalias = "spam-{$CURRENT_USER}";
- }
-
- if ($handle = @fopen ("{$USER}.stats", "r")) {
- $spam .= chop(fgets($handle, 4096));
- $group .= chop(fgets($handle, 4096));
- fclose($handle);
- list($spam, $innocent, $misses, $fp, $sc, $ic) = split(",", $spam);
-
- if ($group <> "") {
- $GROUP = GetPath($group) . ".stats";
- $fd = fopen("{$GROUP}", "r");
- $gspam = chop(fgets($fd, 4096));
- fclose($fd);
-
- list($gspam, $ginnocent, $gfp, $gmisses, $gsc, $gic) = preg_split('/\,/', $gspam);
- $spam -= $gspam;
- $innocent -= $ginnocent;
- $misses -= $gmisses;
- $fp -= $gfp;
- $sc -= $gsc;
- $ic -= $gic;
- }
-
- if ($spam + $innocent > 0) {
- $ratio = sprintf("%2.3f",
- (($spam+$misses)/($spam+$misses+$fp+$innocent)*100));
- } else {
- $ratio = 0;
- }
-
- if (file_exists("{$USER}.rstats")) {
- $handle = fopen ("{$USER}.rstats", "r");
- $buffer = chop(fgets($handle, 4096));
-
- fclose ($handle);
-
- list($rts, $rti, $rtm, $rfp) = split(",", $buffer);
-
- $real_missed = $misses - $rtm;
- $real_caught = $spam - $rts;
- $real_fp = $fp - $rfp;
-
- if ($real_fp < 0) { $real_fp = 0; }
-
- $real_innocent = $innocent - $rti;
-
- if (($spam - $rts > 0) && ($spam - $rts + $misses - $rtm != 0) &&
- ($real_caught + $real_missed > 0) && ($real_fp + $real_innocent > 0)) {
- $monthly = sprintf("%2.3f",
- (100.0-(($real_missed)/($real_caught+$real_missed))*100.0));
- $overall = sprintf("%2.3f",
- (100-((($real_missed+$real_fp) /
- ($real_fp+$real_innocent+$real_caught+$real_missed))*100)));
- } else {
- if ($real_caught == 0 && $real_missed > 0) {
- $monthly = 0;
- $overall = 0;
- } else {
- $monthly = 100;
- $overall = 100;
- }
- }
-
- if ($real_fp + $real_innocent > 0) {
- $fpratio = sprintf("%2.3f", ($real_fp/($real_fp+$real_innocent)*100));
- } else {
- $fpratio = 0;
- }
-
- } else {
- $rts = $spam + $misses;
- $rti = $innocent;
- $rtm = $misses;
- $rfp = $fp;
-
- $handle = fopen ("{$USER}.rstats", "w");
- fwrite("{$rts},{$rti},{$rtm},{$rfp}\n");
- fclose($handle);
-
- $monthly = "N/A";
- $fpratio = "N/A";
- $overall = "N/A";
- }
-
- $DATA['TIME'] = $time;
- $DATA['TOTAL_SPAM_SCANNED'] = $spam;
- $DATA['TOTAL_SPAM_LEARNED'] = $misses;
- $DATA['TOTAL_NONSPAM_SCANNED'] = $innocent;
- $DATA['TOTAL_NONSPAM_LEARNED'] = $fp;
- $DATA['SPAM_RATIO'] = $ratio;
- $DATA['SPAM_ACCURACY'] = $monthly;
- $DATA['NONSPAM_ERROR_RATE'] = $fpratio;
- $DATA['OVERALL_ACCURACY'] = $overall;
- $DATA['TOTAL_SPAM_CORPUSFED'] = $sc;
- $DATA['TOTAL_NONSPAM_CORPUSFED'] = $ic;
- $DATA['TOTAL_SPAM_MISSED'] = $real_missed;
- $DATA['TOTAL_SPAM_CAUGHT'] = $real_caught;
- $DATA['TOTAL_NONSPAM_MISSED'] = $real_fp;
- $DATA['TOTAL_NONSPAM_CAUGHT'] = $real_innocent;
- $DATA['SPAM_ALIAS'] = $spamalias;
-
- $DATA['LOCAL_DOMAIN'] = $CONFIG['LOCAL_DOMAIN'];
- } else {
- $DATA['SPAM_ACCURACY'] = "N/A";
- $DATA['NONSPAM_ERROR_RATE'] = "N/A";
- $DATA['OVERALL_ACCURACY'] = "N/A";
- $DATA['SPAM_RATIO'] = "N/A";
- $DATA['TOTAL_SPAM_MISSED'] = 0;
- $DATA['TOTAL_SPAM_CAUGHT'] = 0;
- $DATA['SPAM_RATIO'] = "N/A";
- $DATA['TOTAL_NONSPAM_MISSED'] = 0;
- $DATA['TOTAL_NONSPAM_CAUGHT'] = 0;
- $DATA['NONSPAM_ERROR_RATE'] = "N/A";
- $DATA['TOTAL_SPAM_LEARNED'] = 0;
- $DATA['TOTAL_SPAM_SCANNED'] = 0;
- $DATA['TOTAL_NONSPAM_LEARNED'] = 0;
- $DATA['TOTAL_NONSPAM_SCANNED'] = 0;
- $DATA['TOTAL_SPAM_CORPUSFED'] = 0;
- $DATA['TOTAL_NONSPAM_CORPUSFED'] = 0;
- $DATA['SPAM_ALIAS'] = $spamalias;
-
- $input_errors[] = "Unable to open DSPAM stats at »{$USER}.stats«. " .
- "If you are a DSPAM admin user you can savely " .
- "ignore this error because such users usually do not " .
- "have a DSPAM mailbox/quarantine.";
- }
-
- return $input_errors;
-}
-
-/* ========================================================================== */
-/* = G L O B A L F U N C T I O N S = */
-/* ========================================================================== */
-
-function &GetPrefs($user) {
- global $CONFIG, $USER;
- $prefs = array();
- $FILE = "{$USER}.prefs";
-
- if ($CONFIG['PREFERENCES_EXTENSION'] == 1) {
- $handle = popen ("{$CONFIG['DSPAM_BIN']}/dspam_admin agg pref " . quotemeta($user));
-
- while (!feof($handle)) {
- $buffer = chop(fgets($handle, 4096));
- list($key, $value) = split("=", $buffer);
- $prefs[$key] = $value;
- }
-
- pclose($handle);
-
- }
-
- if (count(array_keys($prefs)) == 0 || $CONFIG['PREFERENCES_EXTENSION'] != 1) {
-
- /* This step is only required if the user
- * wants to use the legacy DSPAm CGI app.
- */
- if (! file_exists("{$CONFIG['DSPAM_WWW']}/default.prefs")) {
- /* try to copy the sample file */
- if (file_exists("{$CONFIG['DSPAM_WWW']}/default.prefs.sample")) {
- copy("{$CONFIG['DSPAM_WWW']}/default.prefs.sample",
- "{$CONFIG['DSPAM_WWW']}/default.prefs");
- }
- }
- $handle = fopen ("{$CONFIG['DSPAM_WWW']}/default.prefs", "r");
-
- while (!feof($handle)) {
- $buffer = chop(fgets($handle, 4096));
- list($key, $value) = split("=", $buffer);
- $prefs[$key] = $value;
- }
-
- fclose($handle);
-
- if(file_exists($FILE)) {
- $handle = fopen ($FILE, "r");
-
- while (!feof($handle)) {
- $buffer = chop(fgets($handle, 4096));
- list($key, $value) = split("=", $buffer);
- $prefs[$key] = $value;
- }
- }
- }
- return $prefs;
-}
-
-function CheckQuarantine() {
- global $MAILBOX, $DATA;
- $f = 0;
-
- if (file_exists($MAILBOX)) {
- $handle = fopen($MAILBOX, "r");
-
- while (!feof($handle)) {
- $buffer = fgets($handle, 4096);
- if (preg_match('/^From /', $buffer) <= 0) {continue;}
- $f++;
- }
-
- fclose ($handle);
- }
-
- if ($f == 0) {
- $f = "Empty";
- }
-
- $DATA['TOTAL_QUARANTINED_MESSAGES'] = $f;
-}
-
-function http_parse_query( $array = NULL, $convention = '%s' ) {
- if( count( $array ) == 0 ) {
- return '';
- } else {
- if( function_exists( 'http_build_query' ) ){
- $query = http_build_query( $array );
- } else {
- $query = '';
-
- foreach( $array as $key => $value ) {
- if( is_array( $value ) ){
- $new_convention = sprintf( $convention, $key ) . '[%s]';
- $query .= http_parse_query( $value, $new_convention );
- } else {
- $key = urlencode( $key );
- $value = urlencode( $value );
- $query .= sprintf( $convention, $key ) . "=$value&";
- }
- }
- }
-
- return $query;
- }
-}
-
-/* just a wrapper function */
-function SafeVars($PAIRS) {
- $url = http_parse_query($PAIRS);
- return $url;
-}
-
-function To12Hour($h) {
- if ($h < 0) { $h += 24; }
- if ($h > 11) { if ($h > 12) { $h -= 12; } $h .= "p"; }
- else { if ($h == 0) { $h = "12"; } $h .= "a"; }
- return $h;
-}
-
-function GetPath($store) {
- global $CONFIG, $USER;
- $PATH = "";
-
- /* Domain-scalen */
- if ($CONFIG['DOMAIN_SCALE'] == 1) {
- $splittmp = (split('@', $store));
- $VPOPUSERNAME = $splittmp[0];
- $VPOPDOMAIN = $splittmp[1];
- if ($VPOPDOMAIN == "") {$VPOPDOMAIN = "local";}
-
- $PATH = "{$CONFIG['DSPAM_HOME']}/data/{$VPOPDOMAIN}/{$VPOPUSERNAME}/" .
- "{$VPOPUSERNAME}";
- return $PATH;
-
- /* Normal scale */
- } else if ($CONFIG['LARGE_SCALE'] == 0) {
- $PATH = "{$CONFIG['DSPAM_HOME']}/data/{$USER}/{$USER}";
- return $PATH;
-
- /* Large-scale */
- } else {
- if (strlen($USER) > 1) {
- $PATH = "{$CONFIG['DSPAM_HOME']}/data/" . substr($USER, 0, 1) .
- "/". substr($USER, 1, 1) . "/{$USER}/{$USER}";
- } else {
- $PATH = "{$CONFIG['DSPAM_HOME']}/data/{$USER}/{$USER}";
- }
- return $PATH;
- }
-}
-
-function GetUserDir($store) {
- global $CONFIG, $USER;
- $PATH = "";
-
- /* Domain-scalen */
- if ($CONFIG['DOMAIN_SCALE'] == 1) {
- $splittmp = (split('@', $store));
- $VPOPUSERNAME = $splittmp[0];
- $VPOPDOMAIN = $splittmp[1];
- if ($VPOPDOMAIN == "") {$VPOPDOMAIN = "local";}
-
- $PATH = "{$CONFIG['DSPAM_HOME']}/data/{$VPOPDOMAIN}/{$VPOPUSERNAME}";
- return $PATH;
-
- /* Normal scale */
- } else if ($CONFIG['LARGE_SCALE'] == 0) {
- $PATH = "{$CONFIG['DSPAM_HOME']}/data/{$USER}/";
- return $PATH;
-
- /* Large-scale */
- } else {
- if (strlen($USER) > 1) {
- $PATH = "{$CONFIG['DSPAM_HOME']}/data/" . substr($USER, 0, 1) .
- "/". substr($USER, 1, 1) . "/{$USER}/{$USER}";
- } else {
- $PATH = "{$CONFIG['DSPAM_HOME']}/data/{$USER}";
- }
- return $PATH;
- }
-}
-
-function GetDomain($store) {
- global $CONFIG, $USER;
- $PATH = "";
-
- /* Domain-scalen */
- if ($CONFIG['DOMAIN_SCALE'] == 1) {
- $splittmp = (split('@', $store));
- $VPOPUSERNAME = $splittmp[0];
- $VPOPDOMAIN = $splittmp[1];
- if ($VPOPDOMAIN == "") {$VPOPDOMAIN = "local";}
-
- return $VPOPDOMAIN;
- }
-}
-
-function isDSPAMAdmin($username = "") {
- global $config, $CONFIG;
-
- $groupindex = index_groups();
- $userindex = index_users();
-
- if ($username == "") { return 0; }
-
- $gname = $config['system']['group'][$groupindex[$config['system']['user'][$userindex[$username]]['groupname']]]['name'];
-
- if (isset($gname)) {
- return ($gname === $CONFIG['DSPAM_ADMIN_GROUP']);
- }
-
- return 0;
-}
-
-function createUserNotificationMessages() {
- global $config, $CONFIG, $USER, $CURRENT_USER, $CURRENT_STORE;
-
- $firstrun = "{$USER}.firstrun";
- $firstspam = "{$USER}.firstspam";
- $quarantinefull = "{$USER}.quarantinefull";
- $savemsg = "";
-
- if (isset($config['installedpackages']['dspam']['config'][0]['dspam-domain']))
- $domain = $config['installedpackages']['dspam']['config'][0]['dspam-domain'];
- else
- $domain = $config['system']['domain'];
-
- if (GetDomain($CURRENT_STORE) <> "")
- $user_domain = GetDomain($CURRENT_STORE);
- else
- $user_domain = $config['system']['domain'];
-
- $userdir = GetUserDir($CURRENT_STORE);
- $hostname = $config['system']['hostname'];
- $support_user = $config['installedpackages']['dspam']['config'][0]['dspam-contact'];
-
- /* return if there are no sample files */
- if (! file_exists("{$CONFIG['DSPAM_HOME']}/firstrun.txt.sample") ||
- ! file_exists("{$CONFIG['DSPAM_HOME']}/firstspam.txt.sample") ||
- ! file_exists("{$CONFIG['DSPAM_HOME']}/quarantinefull.txt.sample") ||
- ! file_exists($userdir)) {
- return;
- }
-
- /* create firstrun.txt */
- if (! file_exists("{$firstrun}")) {
- $sample_msg = file_get_contents("{$CONFIG['DSPAM_HOME']}/firstrun.txt.sample");
-
- $sample_msg = str_replace("support", $support_user, $sample_msg);
- $sample_msg = str_replace("configureme.com", $user_domain, $sample_msg);
- $sample_msg = str_replace("http://www.yourdomain.com/dspam/",
- "http://{$hostname}.{$domain}/dspam.php",
- $sample_msg);
-
- @file_put_contents("{$firstrun}", $sample_msg);
- $savemsg .= " »{$firstrun}«, ";
- }
-
- /* create firstspam.txt */
- if (! file_exists("{$firstspam}")) {
- $sample_msg = file_get_contents("{$CONFIG['DSPAM_HOME']}/firstspam.txt.sample");
-
- $sample_msg = str_replace("support", $support_user, $sample_msg);
- $sample_msg = str_replace("configureme.com", $user_domain, $sample_msg);
- $sample_msg = str_replace("http://www.yourdomain.com/dspam/",
- "http://{$hostname}.{$domain}/dspam.php",
- $sample_msg);
-
- @file_put_contents("{$firstspam}", $sample_msg);
- $savemsg .= " »{$firstspam}«, ";
- }
-
- /* create quarantinefull.txt */
- if (! file_exists("{$quarantinefull}")) {
- $sample_msg = file_get_contents("{$CONFIG['DSPAM_HOME']}/quarantinefull.txt.sample");
-
- $sample_msg = str_replace("support", $support_user, $sample_msg);
- $sample_msg = str_replace("configureme.com", $user_domain, $sample_msg);
- $sample_msg = str_replace("http://www.yourdomain.com/dspam/",
- "http://{$hostname}.{$domain}/dspam.php",
- $sample_msg);
-
- @file_put_contents("{$quarantinefull}", $sample_msg);
- $savemsg .= " »{$quarantinefull}«.";
- }
-
- if ($savemsg <> "") {
- $savemsg = gettext("The following files were created: ") . $savemsg;
- return $savemsg;
- }
-
- return;
-}
-
-function createNotificationMessages() {
- global $config, $CONFIG, $USER, $CURRENT_USER;
-
- $firstrun = "{$CONFIG['DSPAM_HOME']}/firstrun.txt";
- $firstspam = "{$CONFIG['DSPAM_HOME']}/firstspam.txt";
- $quarantinefull = "{$CONFIG['DSPAM_HOME']}/quarantinefull.txt";
- $savemsg = "";
-
- if (isset($config['installedpackages']['dspam']['config'][0]['dspam-domain']))
- $domain = $config['installedpackages']['dspam']['config'][0]['dspam-domain'];
- else
- $domain = $config['system']['domain'];
-
- $hostname = $config['system']['hostname'];
- $support_user = $config['installedpackages']['dspam']['config'][0]['dspam-contact'];
-
- /* return if there are no sample files */
- if (! file_exists("{$CONFIG['DSPAM_HOME']}/firstrun.txt.sample") ||
- ! file_exists("{$CONFIG['DSPAM_HOME']}/firstspam.txt.sample") ||
- ! file_exists("{$CONFIG['DSPAM_HOME']}/quarantinefull.txt.sample")) {
- return;
- }
-
- /* create firstrun.txt */
- if (! file_exists("{$CONFIG['DSPAM_HOME']}/firstrun.txt")) {
- $sample_msg = file_get_contents("{$CONFIG['DSPAM_HOME']}/firstrun.txt.sample");
-
- $sample_msg = str_replace("support", $support_user, $sample_msg);
- $sample_msg = str_replace("configureme.com", $domain, $sample_msg);
- $sample_msg = str_replace("http://www.yourdomain.com/dspam/",
- "http://{$hostname}.{$domain}/dspam.php",
- $sample_msg);
-
- @file_put_contents("{$firstrun}", $sample_msg);
- $savemsg .= " »{$firstrun}«, ";
- }
-
- /* create firstspam.txt */
- if (! file_exists("{$CONFIG['DSPAM_HOME']}/firstspam.txt")) {
- $sample_msg = file_get_contents("{$CONFIG['DSPAM_HOME']}/firstspam.txt.sample");
-
- $sample_msg = str_replace("support", $support_user, $sample_msg);
- $sample_msg = str_replace("configureme.com", $domain, $sample_msg);
- $sample_msg = str_replace("http://www.yourdomain.com/dspam/",
- "http://{$hostname}.{$domain}/dspam.php",
- $sample_msg);
-
- @file_put_contents("{$firstspam}", $sample_msg);
- $savemsg .= " »{$firstspam}«, ";
- }
-
- /* create quarantinefull.txt */
- if (! file_exists("{$CONFIG['DSPAM_HOME']}/quarantinefull.txt")) {
- $sample_msg = file_get_contents("{$CONFIG['DSPAM_HOME']}/quarantinefull.txt.sample");
-
- $sample_msg = str_replace("support", $support_user, $sample_msg);
- $sample_msg = str_replace("configureme.com", $domain, $sample_msg);
- $sample_msg = str_replace("http://www.yourdomain.com/dspam/",
- "http://{$hostname}.{$domain}/dspam.php",
- $sample_msg);
-
- @file_put_contents("{$quarantinefull}", $sample_msg);
- $savemsg .= " »{$quarantinefull}«.";
- }
-
- if ($savemsg <> "") {
- $savemsg = gettext("The following files were created: ") . $savemsg;
- return $savemsg;
- }
-
- return;
-}
-
-function &check_dspam_installation() {
- global $config;
-
- /* create RC files if necessary */
- if (! file_exists("/usr/local/etc/rc.d")) {
- @mkdir("/usr/local/etc/rc.d");
- }
- if (! file_exists("/usr/local/etc/rc.d/000.mysql.sh")) {
- @copy("/usr/local/pkg/000.mysql.sh", "/usr/local/etc/rc.d/000.mysql.sh");
- @chmod("/usr/local/etc/rc.d/000.mysql.sh", 0755);
- }
- if (! file_exists("/usr/local/etc/rc.d/010.clamav-clamd.sh")) {
- @copy("/usr/local/pkg/010.clamav-clamd.sh",
- "/usr/local/etc/rc.d/010.clamav-clamd.sh");
- @chmod("/usr/local/etc/rc.d/010.clamav-clamd.sh", 0755);
- }
- if (! file_exists("/usr/local/etc/rc.d/020.clamav-freshclam.sh")) {
- @copy("/usr/local/pkg/020.clamav-freshclam.sh",
- "/usr/local/etc/rc.d/020.clamav-freshclam.sh");
- @chmod("/usr/local/etc/rc.d/020.clamav-freshclam.sh", 0755);
- }
- if (! file_exists("/usr/local/etc/rc.d/030.p3scan.sh")) {
- @copy("/usr/local/pkg/030.p3scan.sh",
- "/usr/local/etc/rc.d/030.p3scan.sh");
- @chmod("/usr/local/etc/rc.d/030.p3scan.sh", 0755);
- }
-
- /* create conf files for those packages DSPAM depends on */
- if (! file_exists("/usr/local/etc/clamd.conf")) {
- @copy("/usr/local/pkg/clamd.conf",
- "/usr/local/etc/clamd.conf");
- }
- if (! file_exists("/usr/local/etc/freshclam.conf")) {
- @copy("/usr/local/pkg/freshclam.conf",
- "/usr/local/etc/freshclam.conf");
- }
-
- if (! is_service_running("dspam")) {
- $input_errors[] = "The DSPAM daemon process is not running. " .
- "If you are certain that you did configure DSPAM " .
- "appropriatly, you can start the corresponding process " .
- "using the service control panel which is part of the " .
- "»Status« menu item.";
- }
- if (! is_service_running("p3scan")) {
- $input_errors[] = "The POP3 proxy process is not running. " .
- "If you are certain that you did configure the POP3 proxy " .
- "appropriatly, you can start the corresponding process " .
- "using the service control panel which is part of the " .
- "»Status« menu item.";
- }
- if (! is_service_running("clamd")) {
- $input_errors[] = "The ClamAV daemon process is not running. " .
- "If you are certain that you did configure DSPAM " .
- "appropriatly, you can start the corresponding process " .
- "using the service control panel which is part of the " .
- "»Status« menu item (ClamAV does not need any configuration).";
- }
- if (! is_service_running("freshclam")) {
- $input_errors[] = "The freshclam daemon process is not running. " .
- "If you are certain that you did configure DSPAM " .
- "appropriatly, you can start the corresponding process " .
- "using the service control panel which is part of the " .
- "»Status« menu item (freshclam does not need any configuration).";
- }
- if (! is_service_running("mysql")) {
- $input_errors[] = "The MySQL daemon process is not running. " .
- "If you are certain that you did configure DSPAM " .
- "appropriatly, you can start the corresponding process " .
- "using the service control panel which is part of the " .
- "»Status« menu item (MySQL does not need any configuration).";
- }
-
- if (empty($config['installedpackages']['dspam']['config']) ||
- empty($config['installedpackages']['dspam']['config'][0]['storage-driver']) ||
- (file_exists('/usr/local/etc/dspam.conf') == false)) {
- /* create default config files etc. */
- sync_package_dspam();
-
- $input_errors[] = "It seems that you are using DSPAM for the very first time. " .
- "Please run the DSPAM wizard from the »Services« menu " .
- "if you would like to configure DSPAM right now. " .
- "If you are not eligible to administer DSPAM you may contact " .
- "your local DSPAM admin personal to solve this issue.";
- }
-
- return $input_errors;
-}
-
-function getJScriptFunction($whichOne = 0) {
- $changeuser_msg = gettext("Do you realy want to change the current user?") . "\\n" .
- gettext("This requires a logout followed by a login.");
-
- switch ($whichOne) {
- case 0:
- $scriptstr = '
-
- /* applicable for almost any dspam related page */
- function changeuser() {
- check = confirm("' . $changeuser_msg . '");
-
- if (check == true)
- window.location.href = "/index.php?logout=true";
- }
- ';
-
- break;
- case 1:
- $scriptstr = '
-
- /* applicable for dspam-quarantine.php */
- function checkallmsgs(enable) {
- var endis = (document.iform.checkall.checked || enable);
- var elem = document.iform.elements.length;
-
- for (i = 0; i < elem; i++) {
- if (document.iform.elements[i].name.indexOf("chkmsg") >= 0) {
- document.iform.elements[i].checked = endis;
- }
- }
- }
- ';
-
- break;
- case 2:
- $scriptstr = '
-
- /* applicable for dspam-quarantine.php */
- function sortmsg(criterion) {
- var baseURL = "/dspam-quarantine.php?page=" + document.iform.qpage.value;
- var qperpage = document.getElementsByName("qperpage")[0].value;
-
- window.location.href = baseURL + "&qperpage=" + qperpage + "&sortby=" + criterion;
- }
- ';
-
- break;
- case 3:
- $scriptstr = '
-
- /* applicable for dspam-quarantine.php */
- function processmsg(what) {
- var elem = document.iform.elements.length;
- var checked = false;
-
- switch (what) {
- case 0:
- for (i = 0; i < elem; i++) {
- if (document.iform.elements[i].name.indexOf("chkmsg") >= 0 &&
- document.iform.elements[i].checked == true) {
- checked = true;
- break;
- }
- }
-
- if (checked) {
- document.iform.processAction.value = "manyNotSpam";
- } else {
- alert("You did not select any message that should be processed as not beeing Spam.");
- return false;
- }
- break;
- case 1:
- for (i = 0; i < elem; i++) {
- if (document.iform.elements[i].name.indexOf("chkmsg") >= 0 &&
- document.iform.elements[i].checked == true) {
- checked = true;
- break;
- }
- }
-
- if (checked) {
- if (confirm("Are you sure you want to delete SELECTED messages in quarantine?") == false) {
- return false;
- } else {
- document.iform.processAction.value = "manySpam";
- }
- } else {
- alert("You did not select any message that should be processed as beeing Spam.");
- return false;
- }
- break;
- case 2:
- if (confirm("Are you sure you want to delete ALL messages in quarantine?") == false) {
- return false;
- } else {
- document.iform.processAction.value = "deleteAll";
- }
- break;
- }
-
- document.iform.submit();
- }
- ';
-
- break;
- case 4:
- $scriptstr = '
-
- /* applicable for dspam-quarantine.php nad dspam-history.php */
- function changeQPerPage(originator) {
- var elementName = "";
- var baseURL = "";
-
- if (originator.name == "qperpage") {
- baseURL = "/dspam-quarantine.php?page=" + document.iform.qpage.value;
- elementName = "qperpage";
- } else {
- baseURL = "/dspam-history.php?page=" + document.iform.hpage.value;
- elementName = "hperpage";
- }
-
- for (var i = 0; i < 2; i++) {
- document.getElementsByName(elementName)[i].value = originator.value;
- }
-
- if (originator.name == "qperpage")
- window.location.href = baseURL + "&qperpage=" + originator.value;
- else
- window.location.href = baseURL + "&hperpage=" + originator.value;
- }
- ';
-
- break;
- case 5:
- $scriptstr = '
-
- /* applicable for dspam-settings.php */
-
- function fadeTableRow(rowid, fadeType, opts){
- if(!opts){
- opts = {};
- }
-
- var row = $(rowid);
- var cells= row.childNodes;
- for(i=0;i<cells.length;i++){
- if(cells[i].tagName == "TD"){
- if (fadeType == 0)
- new Effect.Fade(cells[i],opts);
- else
- new Effect.Appear(cells[i],opts);
- }
- }
- if (fadeType == 0)
- new Effect.Fade(row,opts);
- else
- new Effect.Appear(row,opts);
- }
-
- function toggleDSPAMDomain(enable_over, originator) {
- var endis = !(originator.checked || enable_over);
-
- if (endis) {
- fadeTableRow("emailnotitb", 1);
- } else {
- fadeTableRow("emailnotitb", 0);
- }
- }
-
- function toggleDBSettings(idx) {
- if (idx)
- idx = idx;
- else
- idx = document.iform.sdriver.selectedIndex;
-
- switch (idx) {
- case 0:
- fadeTableRow("DBmysql", 1);
- fadeTableRow("DBsqlite", 0);
- fadeTableRow("DBbdb", 0);
- fadeTableRow("DBpgsql", 0);
- fadeTableRow("DBoracle", 0);
- fadeTableRow("DBhash", 0);
- break;
- case 1:
- fadeTableRow("DBmysql", 0);
- fadeTableRow("DBsqlite", 1);
- fadeTableRow("DBbdb", 0);
- fadeTableRow("DBpgsql", 0);
- fadeTableRow("DBoracle", 0);
- fadeTableRow("DBhash", 0);
- break;
- case 2:
- fadeTableRow("DBmysql", 0);
- fadeTableRow("DBsqlite", 0);
- fadeTableRow("DBbdb", 1);
- fadeTableRow("DBpgsql", 0);
- fadeTableRow("DBoracle", 0);
- fadeTableRow("DBhash", 0);
- break;
- case 3:
- fadeTableRow("DBmysql", 0);
- fadeTableRow("DBsqlite", 0);
- fadeTableRow("DBbdb", 0);
- fadeTableRow("DBpgsql", 1);
- fadeTableRow("DBoracle", 0);
- fadeTableRow("DBhash", 0);
- break;
- case 4:
- fadeTableRow("DBmysql", 0);
- fadeTableRow("DBsqlite", 0);
- fadeTableRow("DBbdb", 0);
- fadeTableRow("DBpgsql", 0);
- fadeTableRow("DBoracle", 1);
- fadeTableRow("DBhash", 0);
- break;
- case 5:
- fadeTableRow("DBmysql", 0);
- fadeTableRow("DBsqlite", 0);
- fadeTableRow("DBbdb", 0);
- fadeTableRow("DBpgsql", 0);
- fadeTableRow("DBoracle", 0);
- fadeTableRow("DBhash", 1);
- break;
- }
- }
-
- function enable_change(enable_over, originator) {
- var endis;
-
- switch (originator) {
- case 0:
- endis = !(document.iform.enabledbg.checked || enable_over);
- endis ? document.iform.debug.style.backgroundColor = "#D4D0C8" : document.iform.debug.style.backgroundColor = "#FFFFFF";
- document.iform.debug.disabled = endis;
- endis ? document.iform.dopt.style.backgroundColor = "#D4D0C8" : document.iform.dopt.style.backgroundColor = "#FFFFFF";
- document.iform.dopt.disabled = endis;
- case 1:
- endis = !(document.iform.enableldap.checked || enable_over);
- document.iform.ldapmode.disabled = endis;
- endis ? document.iform.ldaphost.style.backgroundColor = "#D4D0C8" : document.iform.ldaphost.style.backgroundColor = "#FFFFFF";
- document.iform.ldaphost.disabled = endis;
- endis ? document.iform.ldapfilter.style.backgroundColor = "#D4D0C8" : document.iform.ldapfilter.style.backgroundColor = "#FFFFFF";
- document.iform.ldapfilter.disabled = endis;
- endis ? document.iform.ldapbase.style.backgroundColor = "#D4D0C8" : document.iform.ldapbase.style.backgroundColor = "#FFFFFF";
- document.iform.ldapbase.disabled = endis;
- case 2:
- endis = !(document.iform.enablesbl.checked || enable_over);
- endis ? document.iform.sblhost.style.backgroundColor = "#D4D0C8" : document.iform.sblhost.style.backgroundColor = "#FFFFFF";
- document.iform.sblhost.disabled = endis;
- case 3:
- endis = !(document.iform.enableclam.checked || enable_over);
- endis ? document.iform.clamport.style.backgroundColor = "#D4D0C8" : document.iform.clamport.style.backgroundColor = "#FFFFFF";
- document.iform.clamport.disabled = endis;
- endis ? document.iform.clamhost.style.backgroundColor = "#D4D0C8" : document.iform.clamhost.style.backgroundColor = "#FFFFFF";
- document.iform.clamhost.disabled = endis;
- document.iform.clamresp.disabled = endis;
- case 4:
- endis = !(document.iform.enabledsclient.checked || enable_over);
- endis ? document.iform.dsclhost.style.backgroundColor = "#D4D0C8" : document.iform.dsclhost.style.backgroundColor = "#FFFFFF";
- document.iform.dsclhost.disabled = endis;
- endis ? document.iform.dsclport.style.backgroundColor = "#D4D0C8" : document.iform.dsclport.style.backgroundColor = "#FFFFFF";
- document.iform.dsclport.disabled = endis;
- endis ? document.iform.dsclident.style.backgroundColor = "#D4D0C8" : document.iform.dsclident.style.backgroundColor = "#FFFFFF";
- document.iform.dsclident.disabled = endis;
- case 5:
- endis = !(document.iform.tcpipdel.checked || enable_over);
- endis ? document.iform.dhost.style.backgroundColor = "#D4D0C8" : document.iform.dhost.style.backgroundColor = "#FFFFFF";
- document.iform.dhost.disabled = endis;
- endis ? document.iform.dport.style.backgroundColor = "#D4D0C8" : document.iform.dport.style.backgroundColor = "#FFFFFF";
- document.iform.dport.disabled = endis;
- endis ? document.iform.dident.style.backgroundColor = "#D4D0C8" : document.iform.dident.style.backgroundColor = "#FFFFFF";
- document.iform.dident.disabled = endis;
- document.iform.delproto.disabled = endis;
- case 6:
- endis = !(document.iform.enablenoti.checked || enable_over);
- document.iform.whichdomain.disabled = endis;
- endis ? document.iform.dspamdomain.style.backgroundColor = "#D4D0C8" : document.iform.dspamdomain.style.backgroundColor = "#FFFFFF";
- document.iform.dspamdomain.disabled = endis;
- endis ? document.iform.dspamcontact.style.backgroundColor = "#D4D0C8" : document.iform.dspamcontact.style.backgroundColor = "#FFFFFF";
- document.iform.dspamcontact.disabled = endis;
- }
- }
- ';
-
- break;
- case 6:
- $scriptstr = '
-
- function checkDisabledState(form) {
- for (i = 0; i < form.elements.length; i++) {
- if (form.elements[i].disabled && form.elements[i].type == "text")
- form.elements[i].style.backgroundColor = "#D4D0C8";
- else if (form.elements[i].type == "text")
- form.elements[i].style.backgroundColor = "#FFFFFF";
- }
- }
- ';
-
- break;
- }
-
- return $scriptstr;
-}
-
-function sync_package_dspam() {
- global $config, $g;
- conf_mount_rw();
- config_lock();
- $fd = fopen("/etc/dspam.conf","w");
-
- $dspamcfg = <<<EOD
-## dspam.conf -- DSPAM configuration file
-## Generated by pfSense
-Home /var/db/dspam
-## Database Settings
-StorageDriver /usr/local/lib/libmysql_drv.so
-MySQLServer /tmp/mysql.sock
-MySQLPort
-MySQLUser dspam
-MySQLPass dspam
-MySQLDb dspam
-MySQLCompress true
-MySQLSupressQuote off
-MySQLConnectionCache 10
-MySQLUIDInSignature on
-## Delivery Settings
-TrustedDeliveryAgent "/usr/bin/mail"
-DeliveryHost 192.168.1.6
-DeliveryPort 24
-DeliveryIdent localhost
-DeliveryProto smtp
-OnFail error
-## DSPAM Privileges
-Trust root
-Trust mail
-Trust mailnull
-Trust smmsp
-Trust daemon
-## DSPAM Engine Settings
-TrainingMode teft
-TestConditionalTraining on
-Feature chained
-Feature whitelist
-Algorithm graham burton
-PValue graham
-ImprobabilityDrive on
-Preference "spamAction=quarantine"
-Preference "signatureLocation=message"
-Preference "showFactors=on"
-AllowOverride trainingMode
-AllowOverride spamAction spamSubject
-AllowOverride statisticalSedation
-AllowOverride enableBNR
-AllowOverride enableWhitelist
-AllowOverride signatureLocation
-AllowOverride showFactors
-AllowOverride optIn optOut
-AllowOverride whitelistThreshold
-## Miscellaneous Settings
-FailoverAttempts 1
-IgnoreHeader X-Spam-Scanned
-IgnoreHeader X-Spam-Status
-IgnoreHeader X-Virus-Scanner-Result
-RBLInoculate on
-Notifications on
-## Maintainance Settings
-PurgeSignatures 14
-PurgeNeutral 90
-PurgeUnused 90
-PurgeHapaxes 30
-PurgeHits1S 15
-PurgeHits1I 15
-## System Settings
-LocalMX 127.0.0.1
-SystemLog on
-UserLog on
-Opt out
-ParseToHeaders on
-ChangeModeOnParse on
-ChangeUserOnParse on
-Broken returnCodes
-Broken case
-Broken lineStripping
-MaxMessageSize 307200
-ProcessorBias on
-## ClamAV Engine Settings
-ClamAVPort 3310
-ClamAVHost 127.0.0.1
-ClamAVResponse accept
-## DSPAM Daemon Settings (Server)
-ServerPort 24
-ServerQueueSize 32
-ServerPID /var/run/dspam/dspam.pid
-ServerMode standard
-ServerParameters "--deliver=innocent -d %u"
-ServerIdent "abysseleven.abyssworld.de"
-ServerDomainSocketPath "/var/run/dspam/dspam.sock"
-## EOF
-
-EOD;
-
- /* flush the default config to the file */
- fwrite($fd, $dspamcfg);
- fclose($fd);
-
- $fd = fopen("/usr/local/bin/dspam_spamfeed","w");
-
- $spamfeed = <<<EOD
-#!/bin/sh
-#
-# automatically generated by pfSense
-
-cat \${2} | dspam --mode=teft --source=corpus --class=spam --feature=chained,noise --user \${1}
-
-EOD;
-
- fwrite($fd, $spamfeed);
- fclose($fd);
- mwexec("chmod a+x /usr/local/bin/dspam_spamfeed");
-
- $fd = fopen("/usr/local/bin/dspam_innocentfeed","w");
-
- $innocentfeed = <<<EOD
-#!/bin/sh
-#
-# automatically generated by pfSense
-
-cat \${2} | dspam --mode=teft --source=corpus --class=innocent --feature=chained,noise --user \${1}
-
-EOD;
-
- fwrite($fd, $innocentfeed);
- fclose($fd);
- mwexec("chmod a+x /usr/local/bin/dspam_innocentfeed");
-
- $start = <<<EOD
-test_dspam_user=`cat /etc/passwd | grep dspam`
-test_dspam_db=`mysql information_schema -e "select schema_name from schemata" | grep dspam`
-test_dspam_db_user=`mysql mysql -e "select User from user" | grep dspam`
-
-if [ -z "\${test_dspam_user}" ]; then
- pw useradd dspam -u 107 -g mail -d /var/db/dspam -s /bin/csh -c 'DSPAM Daemon User'
-fi
-
-if [ ! -d "/var/run/dspam" ]; then
- mkdir /var/run/dspam && chown dspam:mail /var/run/dspam
-fi
-
-if [ -z "\${test_dspam_db}" ]; then
- mysql -D mysql -e "create database dspam"
- if [ -z "\${test_dspam_db_user}" ]; then
- mysql -D mysql -e "GRANT ALL PRIVILEGES ON dspam.* TO dspam@localhost IDENTIFIED BY 'dspam'"
- fi
- mysql -udspam -pdspam dspam < /usr/local/share/examples/dspam/mysql/mysql_objects-space.sql && \
- mysql -udspam -pdspam dspam < /usr/local/share/examples/dspam/mysql/virtual_users.sql
-fi
-
-/sbin/mount_fdescfs fdescfs /dev/fd
-/usr/local/bin/dspam --daemon &
-
-EOD;
-
- $stop = "/usr/bin/killall dspam\n" .
- "sleep 2";
- write_rcfile(array(
- "file" => "dspam.sh",
- "start" => $start,
- "stop" => $stop
- )
- );
- conf_mount_ro();
- config_unlock();
-
- if (! file_exists("/usr/local/etc/dspam.conf")) {
- mwexec("ln -s /etc/dspam.conf /usr/local/etc/dspam.conf");
- }
-
- mwexec("/usr/local/etc/rc.d/dspam.sh stop");
- mwexec("/usr/local/etc/rc.d/dspam.sh start");
-
- return 0;
-}
-
-function dspam_configure() {
- global $config, $g;
-
- $dspamcfg = $config['installedpackages']['dspam']['config'][0];
-
- if ($g['booting'])
- echo "Starting DSPAM service... ";
- else
- sleep(1);
-
- /* write dhcpd.conf */
- $fd = fopen("/usr/local/etc/dspam.conf", "w");
- if (!$fd) {
- printf("Error: cannot open dhcpd.conf in services_dhcpd_configure().\n");
- return 1;
- }
-
- $dspamconf = <<<EOD
-## dspam.conf -- DSPAM configuration file
-## Generated by pfSense
-Home /var/db/dspam
-## Database Settings
-
-EOD;
-
- if ($dspamcfg['storage-driver'] == "mysql") {
- $dspamconf .= "StorageDriver\t\t/usr/local/lib/libmysql_drv.so\n";
- $dspamconf .= <<<EOD
-MySQLServer {$dspamcfg['dbsettings'][0]['mysql-server']}
-MySQLPort {$dspamcfg['dbsettings'][0]['mysql-port']}
-MySQLUser {$dspamcfg['dbsettings'][0]['mysql-user']}
-MySQLPass {$dspamcfg['dbsettings'][0]['mysql-password']}
-MySQLDb {$dspamcfg['dbsettings'][0]['mysql-database']}
-
-EOD;
- isset($dspamcfg['dbsettings'][0]['mysql-compress']) ? $dspamconf .= "MySQLCompress\t\ttrue\n" : $dspamconf .= "MySQLCompress\tfalse\n";
- isset($dspamcfg['dbsettings'][0]['mysql-squote']) ? $dspamconf .= "MySQLSupressQuote\ton\n" : $dspamconf .= "MySQLSupressQuote\toff\n";
- isset($dspamcfg['dbsettings'][0]['mysql-ccache']) ? $dspamconf .= "MySQLConnectionCache\t{$dspamcfg['dbsettings'][0]['mysql-ccache']}\n" : $dspamconf .= "MySQLConnectionCache\t10\n";
- isset($dspamcfg['dbsettings'][0]['mysql-uid']) ? $dspamconf .= "MySQLUIDInSignature\ton\n" : $dspamconf .= "MySQLUIDInSignature\toff\n";
- } else if ($dspamcfg['storage-driver'] == "sqlite") {
- $dspamconf .= "StorageDriver\t\t/usr/local/lib/libsqlite3_drv.so\n";
- if (isset($dspamcfg['dbsettings'][0]['sqlite-pragma'])) $dspamconf .= "SQLitePragma\t\t{$dspamcfg['dbsettings'][0]['sqlite-pragma']}\n";
- } else if ($dspamcfg['storage-driver'] == "pgsql") {
- $dspamconf .= "StorageDriver\t\t/usr/local/lib/libpgsql_drv.so\n";
- $dspamconf .= <<<EOD
-PgSQLServer {$dspamcfg['dbsettings'][0]['pgsql-server']}
-PgSQLPort {$dspamcfg['dbsettings'][0]['pgsql-port']}
-PgSQLUser {$dspamcfg['dbsettings'][0]['pgsql-user']}
-PgSQLPass {$dspamcfg['dbsettings'][0]['pgsql-password']}
-PgSQLDb {$dspamcfg['dbsettings'][0]['pgsql-database']}
-
-EOD;
- isset($dspamcfg['dbsettings'][0]['pgsql-ccache']) ? $dspamconf .= "PgSQLConnectionCache\t{$dspamcfg['dbsettings'][0]['pgsql-ccache']}\n" : $dspamconf .= "PgSQLConnectionCache\t3\n";
- isset($dspamcfg['dbsettings'][0]['pgsql-uid']) ? $dspamconf .= "PgSQLUIDInSignature\ton\n" : $dspamconf .= "PgSQLUIDInSignature\toff\n";
- } else if ($dspamcfg['storage-driver'] == "oracle") {
- $dspamconf .= "StorageDriver\t/usr/local/lib/libora_drv.so\n";
- $dspamconf .= <<<EOD
-OraServer {$dspamcfg['dbsettings'][0]['ora-server']}
-OraUser {$dspamcfg['dbsettings'][0]['ora-user']}
-OraPass {$dspamcfg['dbsettings'][0]['ora-password']}
-OraSchema {$dspamcfg['dbsettings'][0]['ora-schema']}
-
-EOD;
- } else if ($dspamcfg['storage-driver'] == "hash") {
- $dspamconf .= "StorageDriver\t\t/usr/local/lib/libhash_drv.so\n";
- $dspamconf .= <<<EOD
-HashRecMax {$dspamcfg['dbsettings'][0]['hash-rec-max']}
-HashMaxExtents {$dspamcfg['dbsettings'][0]['hash-max-ext']}
-HashExtentSize {$dspamcfg['dbsettings'][0]['hash-ext-size']}
-HashMaxSeek {$dspamcfg['dbsettings'][0]['hash-max-seek']}
-HashConnectionCache {$dspamcfg['dbsettings'][0]['hash-co-cache']}
-
-EOD;
- isset($dspamcfg['dbsettings'][0]['hash-auto-ex']) ? $dspamconf .= "HashAutoExtend\t\ton\n" : $dspamconf .= "HashAutoExtend\toff\n";
- if (isset($dspamcfg['dbsettings'][0]['hash-co-user'])) $dspamconf .= "HashConcurrentUser\t{$dspamcfg['dbsettings'][0]['hash-co-user']}\n";
- }
-
- $dspamconf .= "## Delivery Settings\n";
-
- if ($dspamcfg['tdelivery-agent'] == "procmail") {
- $dspamconf .= "TrustedDeliveryAgent\t\"/usr/local/bin/procmail\"\n";
- } else if ($dspamcfg['tdelivery-agent'] == "mail") {
- $dspamconf .= "TrustedDeliveryAgent\t\"/usr/bin/mail\"\n";
- } else if ($dspamcfg['tdelivery-agent'] == "mail.local") {
- $dspamconf .= "TrustedDeliveryAgent\t\"/usr/libexec/mail.local\"\n";
- } else if ($dspamcfg['tdelivery-agent'] == "deliver") {
- $dspamconf .= "TrustedDeliveryAgent\t\"/usr/local/cyrus/bin/deliver\"\n";
- } else if ($dspamcfg['tdelivery-agent'] == "maildrop") {
- $dspamconf .= "TrustedDeliveryAgent\t\"/usr/local/bin/maildrop\"\n";
- } else if ($dspamcfg['tdelivery-agent'] == "exim") {
- $dspamconf .= "TrustedDeliveryAgent\t\"/usr/local/sbin/exim -oMr spam-scanned\"\n";
- }
-
- if (isset($dspamcfg['tcpip-delivery'])) {
- $dspamconf .= <<<EOD
-DeliveryHost {$dspamcfg['tcpip-delivery-host']}
-DeliveryPort {$dspamcfg['tcpip-delivery-port']}
-DeliveryIdent {$dspamcfg['tcpip-delivery-ident']}
-DeliveryProto {$dspamcfg['tcpip-delivery-proto']}
-
-EOD;
- }
-
- /* TODO: If required add the following, currently
- missing options:
-
- - QuarantineAgent
- - EnablePlusedDetail
- - QuarantineMailbox
- */
-
- $dspamconf .= "OnFail\t\t\t{$dspamcfg['delivery-onfail']}\n";
- $dspamconf .= "## DSPAM Privileges\n";
-
- $t_users = &$dspamcfg['tuser'];
-
- foreach ($t_users as $user) {
- $dspamconf .= "Trust\t\t\t{$user['name']}\n";
- }
-
- if (isset($dspamcfg['debug-enable'])) {
- $dspamconf .= "## DSPAM Debugging Options\n";
- $dspamconf .= "Debug\t\t\t{$dspamcfg['debug-whom']}\n";
- $dspamconf .= "DebugOpt\t\t{$dspamcfg['debug-options']}\n";
- }
-
- $dspamconf .= "## DSPAM Engine Settings\n";
- $dspamconf .= "TrainingMode\t\t{$dspamcfg['training-mode']}\n";
- isset($dspamcfg['test-cond-training']) ? $dspamconf .= "TestConditionalTraining\ton\n" : $dspamconf .= "TestConditionalTraining\toff\n";
-
- $t_features = &$dspamcfg['feature'];
-
- foreach ($t_features as $feature) {
- $dspamconf .= "Feature\t\t\t{$feature['name']}\n";
- }
-
- $t_algos = &$dspamcfg['algorithm'];
-
- if (count($t_algos) > 0) {
- $dspamconf .= "Algorithm\t\t";
-
- foreach ($t_algos as $algo) {
- $dspamconf .= "{$algo['name']} ";
- }
-
- $dspamconf .= "\n";
- }
-
- $dspamconf .= "PValue\t\t\t{$dspamcfg['pvalue']}\n";
- isset($dspamcfg['improbability-drive']) ? $dspamconf .= "ImprobabilityDrive\ton\n" : $dspamconf .= "ImprobabilityDrive\toff\n";
-
- $t_prefs = &$dspamcfg['preference'];
-
- foreach ($t_prefs as $pref) {
- $dspamconf .= "Preference\t\t{$pref['value']}\n";
- }
-
- $t_overr = &$dspamcfg['override'];
-
- foreach ($t_overr as $over) {
- $dspamconf .= "AllowOverride\t\t{$over['value']}\n";
- }
-
- if (isset($dspamcfg['ldap-enable'])) {
- $dspamconf .= <<<EOD
-## LDAP Settings
-LDAPMode {$dspamcfg['ldap-mode']}
-LDAPHost {$dspamcfg['ldap-host']}
-LDAPFilter {$dspamcfg['ldap-filter']}
-LDAPBase {$dspamcfg['ldap-base']}
-
-EOD;
- }
-
- $dspamconf .= "## Miscellaneous Settings\n";
- if (isset($dspamcfg['failover-attempts'])) $dspamconf .= "FailoverAttempts\t{$dspamcfg['failover-attempts']}\n";
-
- $t_headers = &$dspamcfg['header'];
-
- if (is_array($t_headers)) {
- foreach ($t_headers as $header) {
- $dspamconf .= "IgnoreHeader\t\t{$header['name']}\n";
- }
- }
-
- if (isset($dspamcfg['sbl-enable'])) {
- $dspamconf .= "Lookup\t\t\t\"{$dspamcfg['sbl-host']}\"\n";
- }
-
- isset($dspamcfg['rbl-inoculate']) ? $dspamconf .= "RBLInoculate\t\ton\n" : $dspamconf .= "RBLInoculate\toff\n";
- isset($dspamcfg['notification-email']) ? $dspamconf .= "Notifications\t\ton\n" : $dspamconf .= "Notifications\toff\n";
-
- $dspamconf .= <<<EOD
-## Maintainance Settings
-PurgeSignatures {$dspamcfg['purge-signatures']}
-PurgeNeutral {$dspamcfg['purge-neutral']}
-PurgeUnused {$dspamcfg['purge-unused']}
-PurgeHapaxes {$dspamcfg['purge-hapaxes']}
-PurgeHits1S {$dspamcfg['purge-hits-1s']}
-PurgeHits1I {$dspamcfg['purge-hits-1s']}
-
-EOD;
-
- $dspamconf .= "## System Settings\n";
- $dspamconf .= "LocalMX\t\t\t{$dspamcfg['local-mx']}\n";
- isset($dspamcfg['system-log']) ? $dspamconf .= "SystemLog\t\ton\n" : $dspamconf .= "SystemLog\toff\n";
- isset($dspamcfg['user-log']) ? $dspamconf .= "UserLog\t\t\ton\n" : $dspamconf .= "UserLog\toff\n";
- $dspamconf .= "Opt\t\t\t{$dspamcfg['filter-opt']}\n";
- isset($dspamcfg['parse-to-headers']) ? $dspamconf .= "ParseToHeaders\t\ton\n" : $dspamconf .= "ParseToHeaders\toff\n";
- isset($dspamcfg['change-mode-on-parse']) ? $dspamconf .= "ChangeModeOnParse\ton\n" : $dspamconf .= "ChangeModeOnParse\toff\n";
- isset($dspamcfg['change-user-on-parse']) ? $dspamconf .= "ChangeUserOnParse\ton\n" : $dspamconf .= "ChangeUserOnParse\toff\n";
-
- if (isset($dspamcfg['broken-mta-settings'])) {
- $t_bmtas = &$dspamcfg['bmta'];
-
- foreach ($t_bmtas as $bmta) {
- $dspamconf .= "Broken\t\t\t{$bmta['name']}\n";
- }
- }
-
- $dspamconf .= "MaxMessageSize\t\t{$dspamcfg['max-message-size']}\n";
- isset($dspamcfg['processor-bias']) ? $dspamconf .= "ProcessorBias\t\ton\n" : $dspamconf .= "ProcessorBias\toff\n";
-
- if (isset($dspamcfg['clamav-enable'])) {
- $dspamconf .= <<<EOD
-## ClamAV Engine Settings
-ClamAVPort {$dspamcfg['clamav-port']}
-ClamAVHost {$dspamcfg['clamav-host']}
-ClamAVResponse {$dspamcfg['clamav-response']}
-
-EOD;
- }
-
- $dspamconf .= <<<EOD
-## DSPAM Daemon Settings (Server)
-ServerPort {$dspamcfg['dspam-server-port']}
-ServerQueueSize {$dspamcfg['dspam-server-queue-size']}
-ServerPID {$dspamcfg['dspam-server-pid']}
-ServerMode {$dspamcfg['dspam-server-mode']}
-
-EOD;
-
- if ($dspamcfg['dspam-server-mode'] == "dspam") {
- $t_spwds = &$dspamcfg['server-pwd'];
- $i = 1;
-
- foreach ($t_spwds as $spwd) {
- $dspamconf .= "ServerPass.Relay{$i}\t\"{$spwd['value']}\"\n";
- $i++;
- }
- } else if ($dspamcfg['dspam-server-mode'] == "standard") {
- $dspamconf .= <<<EOD
-ServerParameters "{$dspamcfg['dspam-server-params']}"
-ServerIdent "{$dspamcfg['dspam-server-id']}"
-
-EOD;
- }
-
- if (isset($dspamcfg['dspam-server-socket'])) {
- $dspamconf .= "ServerDomainSocketPath\t\"{$dspamcfg['dspam-server-socket']}\"\n";
- }
-
- if (isset($dspamcfg['dspam-client-enable']) && $dspamcfg['dspam-client-enable'] <> "") {
- $dspamconf .= <<<EOD
-## DSPAM Daemon Settings (Client)
-ClientHost {$dspamcfg['dspam-client-host']}
-ClientIdent {$dspamcfg['dspam-client-id']}
-
-EOD;
-
- if (isset($dspamcfg['dspam-client-port']) && $dspamcfg['dspam-client-port'] <> "") {
- $dspamconf .= "ClientPort\t\t{$dspamcfg['dspam-client-port']}\n";
- }
- }
-
- $dspamconf .= "## EOF\n";
-
- fwrite($fd, $dspamconf);
- fclose($fd);
-
- /* fire up dspam --daemon */
- mwexec("/usr/local/etc/rc.d/dspam.sh stop");
- mwexec("/usr/local/etc/rc.d/dspam.sh start");
-
- if ($g['booting']) {
- print "done.\n";
- }
-
- return 0;
-}
-
-function custom_php_install_command() {
- global $config, $g;
- /* create a default config */
- sync_package_dspam();
-}
-
-function custom_php_deinstall_command() {
- global $config, $g;
- conf_mount_rw();
- unlink_if_exists("/usr/local/etc/rc.d/dspam.sh");
- unlink_if_exists("/usr/local/etc/dspam.conf");
- unlink_if_exists("/usr/local/bin/dspam_spamfeed");
- unlink_if_exists("/usr/local/bin/dspam_innocentfeed");
- conf_mount_ro();
-}
?> \ No newline at end of file