[Mimedefang] Any point in using File::Scan as well as clamav?

Peter Campion-Bye peter at pandasys.co.uk
Mon Aug 4 06:27:01 EDT 2003


> Hi
>
> Can you point me to the thread that shows how to run multiple scanners,
> or better still show me the filter changes needed?
>
> Thanks
> Bill

Below is the code I'm using in my filter...

# Scan for a virus using all installed scanners, stop on the first
positive sub message_contains_virus () {
  md_syslog('info', "Scanning message for virii...");
  my($code, $cat, $act);
  ($code, $cat, $act) = message_contains_virus_filescan();
  return (wantarray ? ($code, $cat, $act) : $code) if ($act ne "ok");
  ($code, $cat, $act) = message_contains_virus_clamd();
  return (wantarray ? ($code, $cat, $act) : $code) if ($act ne "ok");
  return (wantarray ? (0, 'ok', 'ok') : 0);
}

sub entity_contains_virus ($) {
  md_syslog('info', "Scanning entity for virii...");
  my($e) = @_;
  my($code, $cat, $act);
  ($code, $cat, $act) = message_contains_virus_filescan();
  return (wantarray ? ($code, $cat, $act) : $code) if ($act ne "ok");
  ($code, $cat, $act) = message_contains_virus_clamd();
  return (wantarray ? ($code, $cat, $act) : $code) if ($act ne "ok");
  return (wantarray ? (0, 'ok', 'ok') : 0);
}





More information about the MIMEDefang mailing list