byterazor/qpsmtpd
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Make klez filter run for mails bigger than 220KB; they are sometimes

Browse Source 
bigger than that.


git-svn-id: https://svn.perl.org/qpsmtpd/trunk@77 958fd67b-6ff1-0310-b445-bb7760255be9
This commit is contained in:
Ask Bjørn Hansen 2002-09-22 07:04:13 +00:00
parent 499d1e6a4c
commit e342c0b9b2
2 changed files with 9 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
Changes
View File

@ -1,3 +1,8 @@
2002/09/22
Make klez filter run for mails bigger than 220KB; they are sometimes
bigger than that.
2002/09/20 2002/09/20
Avoid "use of uninitialized variable" warning when the "MAIL" or the Avoid "use of uninitialized variable" warning when the "MAIL" or the
"RCPT" command is executed without a parameter. "RCPT" command is executed without a parameter.

7
plugins/klez_filter
View File

@ -6,10 +6,11 @@ sub register {
sub check_klez { sub check_klez {
my ($self, $transaction) = @_; my ($self, $transaction) = @_;
# klez files are always around 140K # klez files are always sorta big .. how big? Dunno.
return (DECLINED) return (DECLINED)
if $transaction->body_size < 60_000 if $transaction->body_size < 60_000;
or $transaction->body_size > 220_000; # 220k was too little, so let's just disable the "big size check"
# or $transaction->body_size > 1_000_000;
# maybe it would be worthwhile to add a check for # maybe it would be worthwhile to add a check for
# Content-Type: multipart/alternative; here? # Content-Type: multipart/alternative; here?