initial commit of file from CVS for smeserver-mailsorting on Sat Sep 7 19:56:19 AEST 2024
This commit is contained in:
47
root/etc/e-smith/templates-user/.procmailrc/15log
Normal file
47
root/etc/e-smith/templates-user/.procmailrc/15log
Normal file
@@ -0,0 +1,47 @@
|
||||
{
|
||||
use esmith::config;
|
||||
use esmith::db;
|
||||
|
||||
my %processmail;
|
||||
tie %processmail, 'esmith::config', '/home/e-smith/db/processmail';
|
||||
|
||||
$OUT = '';
|
||||
|
||||
# control level of logging
|
||||
my $loglevel = db_get_prop(\%processmail, $USERNAME, "loglevel") || 'some';
|
||||
if ($loglevel eq 'none')
|
||||
{
|
||||
$OUT .= "\n";
|
||||
$OUT .= "# ---- no logging ------------------\n";
|
||||
}
|
||||
elsif ($loglevel eq 'some')
|
||||
{
|
||||
$OUT .= "\n";
|
||||
$OUT .= "# ---- some logging------------------\n";
|
||||
$OUT .= "VERBOSE=no\n";
|
||||
if ($USERNAME ne "admin")
|
||||
{
|
||||
$OUT .= "LOGFILE=\$HOME/procmail.log\n";
|
||||
}
|
||||
if ($USERNAME eq "admin")
|
||||
{
|
||||
$OUT .= "LOGFILE=/home/e-smith/procmail.log\n";
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
$OUT .= "\n";
|
||||
$OUT .= "# ---- verbose, for debugging only --------------\n";
|
||||
$OUT .= "VERBOSE=yes\n";
|
||||
$OUT .= "LOGABSTRACT=all\n";
|
||||
if ($USERNAME ne "admin")
|
||||
{
|
||||
$OUT .= "LOGFILE=\$HOME/procmail.log\n";
|
||||
}
|
||||
if ($USERNAME eq "admin")
|
||||
{
|
||||
$OUT .= "LOGFILE=/home/e-smith/procmail.log\n";
|
||||
}
|
||||
|
||||
}
|
||||
}
|
Reference in New Issue
Block a user