Mailing List Archive

svn commit: r485479 - /spamassassin/trunk/lib/Mail/SpamAssassin/Conf.pm
Author: felicity
Date: Sun Dec 10 19:24:21 2006
New Revision: 485479

URL: http://svn.apache.org/viewvc?view=rev&rev=485479
Log:
bug 5023: add in conf options to update TLD and 2TLD list from conf files

Modified:
spamassassin/trunk/lib/Mail/SpamAssassin/Conf.pm

Modified: spamassassin/trunk/lib/Mail/SpamAssassin/Conf.pm
URL: http://svn.apache.org/viewvc/spamassassin/trunk/lib/Mail/SpamAssassin/Conf.pm?view=diff&rev=485479&r1=485478&r2=485479
==============================================================================
--- spamassassin/trunk/lib/Mail/SpamAssassin/Conf.pm (original)
+++ spamassassin/trunk/lib/Mail/SpamAssassin/Conf.pm Sun Dec 10 19:24:21 2006
@@ -2010,6 +2010,59 @@
}
});

+=item util_rb_tld tld1 tld2 ...
+
+This option allows the addition of new TLDs to the RegistrarBoundaries code.
+Updates to the list usually happen when new versions of SpamAssassin are
+released, but sometimes it's necessary to add in new TLDs faster than a
+release can occur. TLDs include things like com, net, org, etc.
+
+=cut
+
+ push (@cmds, {
+ setting => 'util_rb_tld',
+ is_admin => 1,
+ code => sub {
+ my ($self, $key, $value, $line) = @_;
+ unless (defined $value && $value !~ /^$/) {
+ return $MISSING_REQUIRED_VALUE;
+ }
+ unless ($value =~ /^[a-zA-Z]+(?:\s+[a-zA-Z]+)*$/) {
+ return $INVALID_VALUE;
+ }
+ foreach (split(/\s+/, $value)) {
+ $Mail::SpamAssassin::Util::RegistrarBoundaries::VALID_TLDS{lc $_} = 1;
+ }
+ }
+ });
+
+=item util_rb_2tld 2tld-1.tld 2tld-2.tld ...
+
+This option allows the addition of new 2nd-level TLDs (2TLD) to the
+RegistrarBoundaries code. Updates to the list usually happen when new
+versions of SpamAssassin are released, but sometimes it's necessary to add in
+new 2TLDs faster than a release can occur. 2TLDs include things like co.uk,
+fed.us, etc.
+
+=cut
+
+ push (@cmds, {
+ setting => 'util_rb_2tld',
+ is_admin => 1,
+ code => sub {
+ my ($self, $key, $value, $line) = @_;
+ unless (defined $value && $value !~ /^$/) {
+ return $MISSING_REQUIRED_VALUE;
+ }
+ unless ($value =~ /^[^\s.]+\.[^\s.]+(?:\s+[^\s.]+\.[^\s.]+)*$/) {
+ return $INVALID_VALUE;
+ }
+ foreach (split(/\s+/, $value)) {
+ $Mail::SpamAssassin::Util::RegistrarBoundaries::TWO_LEVEL_DOMAINS{lc $_} = 1;
+ }
+ }
+ });
+
=item bayes_path /path/filename (default: ~/.spamassassin/bayes)

This is the directory and filename for Bayes databases. Several databases