[Mimedefang] Getting Geylisting working
Andrew Watkins
andrew at dcs.bbk.ac.uk
Fri Sep 29 07:01:31 EDT 2006
It is looking good.
- The missing "query->execute();" in the filter_recipient seems to do
the trick. I will monitor it so check it is 100% working.
- GreyListCleanup.pl script only had the one error, since I added my own
error ;-)
my ($timstamp, $period, $GreyList, $cleanup);
^^^^^^^^
Should read:
my ($timestamp, $period, $GreyList, $cleanup);
- The Create Database script seems to be OK. The error seems to appear a
lot on the web, so I have no answer to that one, but I just replaced the
"prepare" and "execute" with "do" statements.
Thanks for the quick response
Andrew
> Michael Lang wrote:
> I've tryed the code in a new(clean) Xen Instance right now,
> modifing only
>
> # build the tripple
> my $tripple = "$RelayAddr/$Sender/" . $Recipients[0];
>
> $query = $GreyList->prepare("SELECT DISTINCT tripple, sessionid FROM \"greylisting\"".
> " WHERE \"tripple\" = ? AND \"timestamp\" <= ?;") ||
> md_syslog('warning', 'Problem on greylist Query: '. $GreyList->errstr) &&
> return ('CONTINUE', 'OK');
> while ( $row = $query->fetchrow_hashref ) {
>
> to
> # build the tripple
> my $tripple = "$RelayAddr/$Sender/" . $Recipients[0];
>
> $query = $GreyList->prepare("SELECT DISTINCT tripple, sessionid FROM \"greylisting\"".
> " WHERE \"tripple\" = ? AND \"timestamp\" <= ?;") ||
> md_syslog('warning', 'Problem on greylist Query: '. $GreyList->errstr) &&
> return ('CONTINUE', 'OK');
> $query->execute();
> # ^^^^^^^^^^^^^^^^^^^^^^
> while ( $row = $query->fetchrow_hashref ) {
>
> and everything works find (using perl-DBD-SQLite2)
> i will need another day to check it with SQLite3 as i dont have time left now ...
>
> one or more maybe problem is write permission to the SQLiteDB Directory as the
> SQLite Engine tries to create a journal file, what user defang isnt permitted for in
> /etc/mail
>
> I've corrected those and the cleanup typos in the wiki :)
>
> Greetz mIke
More information about the MIMEDefang
mailing list