En espérant que cela pourra aider quelqu'un qui rencontrera le même
problème que moi...
J'utilise INN 2.4 sur GNU/Linux Debian. Ce serveur de news inclus un
système de filtres Perl qui permettent d'accepter ou refuser des
messages en fonctions de critères.
J'ai cherché longtemps sans trouver de solution déjà toute faite et
n'étant qu'un novice en Perl, ce n'est pas super pour moi... Néanmoins,
j'ai réussi à pondre ceci qu'il faut placer dans le fichier
/etc/news/filter/filter_innd.pl (avant le return de fin de la fonction
filter_art):
<cut>
## Reject all message where the body is higher than 4096 characters
if (length($hdr{"__BODY__"})>4096) {
$rval = "Reject message where the body is higher than 4096 characters.";
}
## Reject all message with UUEncode attachment
if ($hdr{"__BODY__"} =~
m/begin\s+[0-9][0-9][0-9]\s+(.+?)\s*\r?\n(.*?)end/ms) {
$rval = "Reject message with UUEncode attachment.";
}
##Reject all message with MIME attachment
if ($hdr{"__BODY__"} =~ m/^This is a multi-part message in MIME format/) {
$rval = "Reject message with MIME attachment.";
}
</cut>
Ce filtre permet d'interdire tout message de plus de 4Ko mais également
ceux qui possèdent des pièces jointes UUEncode ou MIME.
Cordialement,
Stéphane VANPOPERYNGHE
--
ToutProgrammer.com - Magazine de programmation informatique
http://toutprogrammer.com
http://forums.toutprogrammer.com/ - Les forums
En espérant que cela pourra aider quelqu'un qui rencontrera le même problème que moi...
J'utilise INN 2.4 sur GNU/Linux Debian. Ce serveur de news inclus un système de filtres Perl qui permettent d'accepter ou refuser des messages en fonctions de critères.
J'ai cherché longtemps sans trouver de solution déjà toute faite et n'étant qu'un novice en Perl, ce n'est pas super pour moi... Néanmoins, j'ai réussi à pondre ceci qu'il faut placer dans le fichier /etc/news/filter/filter_innd.pl (avant le return de fin de la fonction filter_art):
<cut> ## Reject all message where the body is higher than 4096 characters if (length($hdr{"__BODY__"})>4096) { $rval = "Reject message where the body is higher than 4096 characters."; }
## Reject all message with UUEncode attachment if ($hdr{"__BODY__"} =~ m/begins+[0-9][0-9][0-9]s+(.+?)s*r?n(.*?)end/ms) { $rval = "Reject message with UUEncode attachment."; }
##Reject all message with MIME attachment if ($hdr{"__BODY__"} =~ m/^This is a multi-part message in MIME format/) { $rval = "Reject message with MIME attachment."; } </cut>
Ce filtre permet d'interdire tout message de plus de 4Ko mais également ceux qui possèdent des pièces jointes UUEncode ou MIME.
Cordialement, Stéphane VANPOPERYNGHE
-- _/°< coin
On 2004-10-07, Stéphane <spam_news@freelinuxdev.net> wrote:
En espérant que cela pourra aider quelqu'un qui rencontrera le même
problème que moi...
J'utilise INN 2.4 sur GNU/Linux Debian. Ce serveur de news inclus un
système de filtres Perl qui permettent d'accepter ou refuser des
messages en fonctions de critères.
J'ai cherché longtemps sans trouver de solution déjà toute faite et
n'étant qu'un novice en Perl, ce n'est pas super pour moi... Néanmoins,
j'ai réussi à pondre ceci qu'il faut placer dans le fichier
/etc/news/filter/filter_innd.pl (avant le return de fin de la fonction
filter_art):
<cut>
## Reject all message where the body is higher than 4096 characters
if (length($hdr{"__BODY__"})>4096) {
$rval = "Reject message where the body is higher than 4096 characters.";
}
## Reject all message with UUEncode attachment
if ($hdr{"__BODY__"} =~
m/begins+[0-9][0-9][0-9]s+(.+?)s*r?n(.*?)end/ms) {
$rval = "Reject message with UUEncode attachment.";
}
##Reject all message with MIME attachment
if ($hdr{"__BODY__"} =~ m/^This is a multi-part message in MIME format/) {
$rval = "Reject message with MIME attachment.";
}
</cut>
Ce filtre permet d'interdire tout message de plus de 4Ko mais également
ceux qui possèdent des pièces jointes UUEncode ou MIME.
En espérant que cela pourra aider quelqu'un qui rencontrera le même problème que moi...
J'utilise INN 2.4 sur GNU/Linux Debian. Ce serveur de news inclus un système de filtres Perl qui permettent d'accepter ou refuser des messages en fonctions de critères.
J'ai cherché longtemps sans trouver de solution déjà toute faite et n'étant qu'un novice en Perl, ce n'est pas super pour moi... Néanmoins, j'ai réussi à pondre ceci qu'il faut placer dans le fichier /etc/news/filter/filter_innd.pl (avant le return de fin de la fonction filter_art):
<cut> ## Reject all message where the body is higher than 4096 characters if (length($hdr{"__BODY__"})>4096) { $rval = "Reject message where the body is higher than 4096 characters."; }
## Reject all message with UUEncode attachment if ($hdr{"__BODY__"} =~ m/begins+[0-9][0-9][0-9]s+(.+?)s*r?n(.*?)end/ms) { $rval = "Reject message with UUEncode attachment."; }
##Reject all message with MIME attachment if ($hdr{"__BODY__"} =~ m/^This is a multi-part message in MIME format/) { $rval = "Reject message with MIME attachment."; } </cut>
Ce filtre permet d'interdire tout message de plus de 4Ko mais également ceux qui possèdent des pièces jointes UUEncode ou MIME.