github-starred/sendmailanalyzer
2
0
Fork 0
mirror of https://github.com/darold/sendmailanalyzer.git synced 2026-05-16 06:05:53 -06:00
Code Issues 3 Projects Packages Wiki Activity Actions

Fix Top Spam statistic when click to open detail sender relay was not

Browse source 
shown. Thanks to biji for the report.
This commit is contained in:
Gilles Darold 2019-02-12 09:08:45 +01:00
parent f916d2fcf6
commit 6ba9d845c7
1 changed files with 4 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

7
cgi-bin/sa_report.cgi
View file

@ -619,7 +619,6 @@ sub sa_footer
my $q = shift;
print qq{
</FORM>
<pre>
Powered by <a href="http://sendmailanalyzer.darold.net/" target="_blank">$SOFTWARE v$VERSION</a> (GPLv3)
$TRANSLATE{'Acknowledgement'}
@ -1724,7 +1723,9 @@ sub get_spam_stat
{
my ($hostname, $year, $month, $day, $mon, $mday, $hour) = @_;
my $file = "$CONFIG{OUT_DIR}/$hostname/$year/$month/$day/spam.dat";
my $path = "$CONFIG{OUT_DIR}/$hostname/$year/$month/$day";
my $file = "$path/spam.dat";
open(IN, $file) || return;
while (my $l = <IN>) {
chomp($l);
@ -5280,6 +5281,7 @@ sub get_spam_detail
}
close(IN);
}
$file = "$path/senders.dat";
if (open(IN, $file)) {
my $i = 0;
@ -5290,7 +5292,6 @@ sub get_spam_detail
$data[0] =~ /^(\d{2})/;
next if (($hour ne '') && ($1 != $hour));
next if (!exists $local_stat{$data[1]});
next if ($1 ne $hour);
if ($#data > 6) {
@data = $l =~ m/^([^:]+):([^:]+):([^:]+):([^:]+):([^:]+):([a-zA-Z0-9\-\.]+|\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}|\d{1,3}\.\d{1,3}\.\d{1,3}\(\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}\)|[0-9a-fA-F:\(\)]+)?:([^:]+)$/;
}