David Lawless wrote:
Ack! This did NOT go well!
First I tried the new 'libspf'. It categorizes everything as
"netural" even though 'spfquery' was giving good results.
Clearly some kind of bug.
Then I tried the Milter. This thing is a nightmare to install!
Perl is really a pain!
The Milter seems to work, but I can't figure out how to insert
the "fallback" parameter into Sendmail::Milter 1.41 without
having Perl throw up all over it. Here is my attempt based on
an earlier post in this group:
push (@extraParams, fallback => { "*." => { record => "v=spf1 a/24 mx/24 ptr
-all" } });
Please help!
Try this patch instead.
Incidentally, I believe there is a bug in Mail::SPF::Query's handling of
fallbacks; if the domain has a TXT record that is not an SPF record, the
fallback record will not be looked up.
Cheers, Paul.
-------
Sender Policy Framework: http://spf.pobox.com/
Archives at http://archives.listbox.com/spf-discuss/current/
Send us money! http://spf.pobox.com/donations.html
To unsubscribe, change your address, or temporarily deactivate your subscription,
please go to http://v2.listbox.com/member/?listname=spf-discuss(_at_)v2(_dot_)listbox(_dot_)com--- spf-milter 2004-06-28 11:30:48.488133645 +0100
+++ spf-milter 2004-06-28 11:32:20.362450398 +0100
@@ -190,7 +190,9 @@
my $priv_data = shift;
- if (my $query = eval {new Mail::SPF::Query (ip => shift, sender =>
shift, helo => shift, @extraParams)}) {
+ if (my $query = eval {new Mail::SPF::Query (ip => shift, sender =>
shift, helo => shift,
+ fallback => { "*." => {
record => "v=spf1 a/24 mx/24 ptr -all" }},
+ @extraParams)}) {
my ($call_status, $result, $smtp_comment, $header_comment,
$spf_record);
# In "mx" mode, we make a call to result2 (), instead of to result
(),