[Mimedefang] Multiple AV Scans
Jeff Grossman
jeff at stikman.com
Tue Oct 22 17:25:02 EDT 2002
That is the part I am just not getting. I am not sure what has to go where.
I have the following in my filter_begin section:
# Scan for viruses if any virus-scanners are installed
my($code, $category, $action) = message_contains_virus();
$FoundVirus = ($category eq "virus");
And, I have this in my filter ($$$$) section:
# Virus scan
if ($FoundVirus) {
my($code, $category, $action);
$VirusScannerMessages = "";
($code, $category, $action) = entity_contains_virus($entity);
if ($category eq "virus") {
return action_quarantine($entity, "A known virus was discovered
and$
}
}
Plus, what I just added below that you supplied. Will that do what I need,
or am I missing something?
I really need to spend some time with Perl. Where would be a good place to
learn some of the commands for MIMEDefang?
Thanks,
Jeff
on 10/22/02 1:52 PM, Adam Beatham at adam at backboard.org wrote:
> Oh sorry. Those are just setting up the functions.. You'll have to call
> them in the proper places. i.e., wherever you have (I'm using File::Scan
> as the example) message_contains_virus_filescan(), replace it with the new
> message_contains_virus(), and wherever you have
> entity_contains_virus_filescan(), replace it with the new
> entity_contains_virus().
>
> -adam
>
> At 01:29 PM 10/22/2002 -0700, you wrote:
>> on 10/22/02 11:47 AM, Adam Beatham at adam at backboard.org wrote:
>>
>>> This is what I have, which I believe David gave me a while back..
>>>
>>> sub message_contains_virus () {
>>> my ($code, $category, $action);
>>> ($code, $category, $action) = message_contains_virus_filescan();
>>> ($code, $category, $action) = message_contains_virus_clamav() if
>>> $category ne 'virus';
>>> return ($code, $category, $action) if $category eq 'virus';
>>> return (wantarray ? (0, 'ok', 'ok') : 0);
>>> }
>>>
>>> sub entity_contains_virus ($) {
>>> my ($e) = @_;
>>> ($code, $category, $action) = entity_contains_virus_filescan($e)
>>> if $Features{'Virus:FileScan'};
>>> ($code, $category, $action) =
>>> entity_contains_virus_clamav($e) if $Features{'Virus:CLAMAV'} &&
>>> $category ne 'virus';
>>> return ($code, $category, $action) if $category eq 'virus';
>>> return (wantarray ? (0, 'ok', 'ok') : 0);
>>> }
>>>
>>>
>>> then you just call the proper function in the proper part of the filter..
>>
>> Okay, thanks. I went and added that to my filter file. What do you mean by
>> the last line "then you just call the proper function in the proper part of
>> the filter.."?
--
Jeff Grossman (jeff at stikman.com)
More information about the MIMEDefang
mailing list