SweepOther.pm contextual diffs for 4.26.6
Jeff A. Earickson
jaearick at COLBY.EDU
Thu Jan 29 18:44:47 GMT 2004
Julian,
Attached is the "diff -c" changes to the 4.26.6 version
of SweepOther.pm, should have sent that along the first time.
Jeff
-------------- next part --------------
*** SweepOther.pm.orig Thu Jan 29 13:40:18 2004
--- SweepOther.pm Thu Jan 29 13:42:54 2004
***************
*** 197,204 ****
#print STDERR "\"$attach\" matched \"$regexp\" or \"$safename\" did\n";
if ($allowdeny =~ 'deny') {
# It's a rejection rule, so log the error.
! MailScanner::Log::InfoLog("Filename Checks: %s (%s)",
! $logtext, $attach);
$message->{namereports}{$safename} .= "$usertext ($safename)\n";
$message->{nametypes}{$safename} .= "f";
$counter++;
--- 197,204 ----
#print STDERR "\"$attach\" matched \"$regexp\" or \"$safename\" did\n";
if ($allowdeny =~ 'deny') {
# It's a rejection rule, so log the error.
! MailScanner::Log::InfoLog("Filename Checks: %s (%s %s)",
! $logtext, $id, $attach);
$message->{namereports}{$safename} .= "$usertext ($safename)\n";
$message->{nametypes}{$safename} .= "f";
$counter++;
***************
*** 206,217 ****
# Do we want to delete the attachment or store it?
$message->{deleteattach}{$safename} = 1 if $allowdeny =~ /delete/;
} else {
! MailScanner::Log::InfoLog("Filename Checks: Allowing %s", $safename)
if $LogNames;
}
}
! MailScanner::Log::InfoLog("Filename Checks: Allowing %s " .
! "(no rule matched)", $safename)
if $LogNames && !$MatchFound;
}
}
--- 206,217 ----
# Do we want to delete the attachment or store it?
$message->{deleteattach}{$safename} = 1 if $allowdeny =~ /delete/;
} else {
! MailScanner::Log::InfoLog("Filename Checks: Allowing %s %s", $id, $safename)
if $LogNames;
}
}
! MailScanner::Log::InfoLog("Filename Checks: Allowing %s %s " .
! "(no rule matched)", $id, $safename)
if $LogNames && !$MatchFound;
}
}
***************
*** 353,360 ****
$MatchFound = 1;
if ($allowdeny =~ /deny/) {
# It's a rejection rule, so log the error.
! MailScanner::Log::InfoLog("Filetype Checks: %s (%s)",
! $logtext, $attach);
$message->{namereports}{$safename} .= "$usertext ($safename)\n";
$message->{nametypes}{$safename} .= "f";
$counter++;
--- 353,360 ----
$MatchFound = 1;
if ($allowdeny =~ /deny/) {
# It's a rejection rule, so log the error.
! MailScanner::Log::InfoLog("Filetype Checks: %s (%s %s)",
! $logtext, $id, $attach);
$message->{namereports}{$safename} .= "$usertext ($safename)\n";
$message->{nametypes}{$safename} .= "f";
$counter++;
***************
*** 362,368 ****
# Do we want to delete the attachment or store it?
$message->{deleteattach}{$safename} = 1 if $allowdeny =~ /delete/;
} else {
! MailScanner::Log::InfoLog("Filetype Checks: Allowing %s", $safename)
if $LogTypes;
}
}
--- 362,368 ----
# Do we want to delete the attachment or store it?
$message->{deleteattach}{$safename} = 1 if $allowdeny =~ /delete/;
} else {
! MailScanner::Log::InfoLog("Filetype Checks: Allowing %s %s", $id, $safename)
if $LogTypes;
}
}
More information about the MailScanner
mailing list