Changeset 4 for trunk/dnsbl/export-dnsbl


Ignore:
Timestamp:
09/09/09 15:19:09 (15 years ago)
Author:
Kris Deugau
Message:

/trunk/dnsbl

Remove rbldnsd-specific mode for export-dnsbl and export()

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/dnsbl/export-dnsbl

    r3 r4  
    3535        ($iplist{$_} & 2 ? '$ relayed a reported spam' : 'Netblock listed on one or more criteria')."\n";
    3636  }
    37 } elsif ($mode eq 'rbldnsd') {
    38   # need extra cmd args
    39   die "need subgroup spec (iplist, cidrlist) as well\n" if !$ARGV[1];
    40   if ($ARGV[1] eq 'iplist') {
    41     foreach (sort ipcmp keys %iplist) {
    42       print "$_:127.0.0.$iplist{$_}:\$ relayed a reported spam\n" if $iplist{$_} & 2;
    43     }
    44   } elsif ($ARGV[1] eq 'cidrlist') {
    45     foreach (sort ipcmp keys %iplist) {
    46       print "$_:127.0.0.$iplist{$_}:Netblock listed on one or more criteria\n" if ! ($iplist{$_} & 2);
    47     }
    48   }
    49   # no output if second arg is unknown.
    5037} else {
    5138  foreach (sort ipcmp keys %iplist) {
Note: See TracChangeset for help on using the changeset viewer.