daniell/parserfilter
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

split up rejects

Browse Source
This commit is contained in:
Daniel Lysfjord
2025-10-05 20:53:08 +02:00
parent 68d2e267b2
commit 77c046f0c2
1 changed files with 18 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

20
lib/exim_parser.pm
View File

@ -48,9 +48,25 @@ sub parser {
m/(\ \[($re_host)\]\ )/gcix && do {
$host = $2;
};
} elsif($string =~ m/\ rejected (AUTH|MAIL)\ /) {
} elsif($string =~ m/\ rejected (EHLO|HELO)\ /) {
$_ = $string;
$reply = 'Rejected MAIL or AUTH';
$reply = 'Rejected HELO/EHLO';
$hostile = 1;
PARSER:
m/(\ \[($re_host)\](\:|\ ))/gcix && do {
$host = $2;
};
} elsif($string =~ m/\ rejected AUTH\ /) {
$_ = $string;
$reply = 'Rejected AUTH';
$hostile = 1;
PARSER:
m/(\ \[($re_host)\]\ )/gcix && do {
$host = $2;
};
} elsif($string =~ m/\ rejected MAIL\ /) {
$_ = $string;
$reply = 'Rejected MAIL';
$hostile = 1;
PARSER:
m/(\ \[($re_host)\]\ )/gcix && do {