Changeset 88 for trunk

Timestamp:

09/11/25 18:03:48 (4 days ago)

Author:

Kris Deugau

Message:

/trunk/uribl

Fill out tinydns export branch for completeness, although using anything
other than rbldnsd or similar for DNSBL data is more than a bit looney.

File:

• trunk/uribl/URIdb.pm (modified) (1 diff)

trunk/uribl/URIdb.pm

@@ -216 +216 @@
     }
   } elsif ($target eq 'tinydns') {
+    print $blfh "Z$blzone.dnsbl:$blzone.dnsbl:$bladmin::600:600:600:600\n";
+    print $blfh "\&$blzone.dnsbl:127.0.0.1::900\n";
+    $sth = $dbh->prepare("SELECT uri FROM urilist WHERE list=2");
+    $sth->execute;
+    while (my ($uri) = $sth->fetchrow_array) {
+      print $blfh "'$uri.$blzone:Domain found in reported missed-spam, no legitimate root or www content:900::\n".
+        "+$uri.$blzone:127.0.0.2:900::\n";
+    }
+    $sth = $dbh->prepare("SELECT uri FROM urilist WHERE list=4");
+    $sth->execute;
+    while (my ($uri) = $sth->fetchrow_array) {
+      print $blfh "'$uri.$blzone:Domain seen repeatedly in reported missed-spam, some legitimate root or www content:900::\n".
+        "+$uri.$blzone:127.0.0.4:900::\n";
+    }
+    $sth = $dbh->prepare("SELECT uri FROM urilist WHERE list=8");
+    $sth->execute;
+    while (my ($uri) = $sth->fetchrow_array) {
+      print $blfh "'$uri.$blzone:Abused URL-shortener or redirector domain:900::\n".
+        "+$uri.$blzone:127.0.0.8:900::\n";
+    }
   } elsif ($target eq 'bind') {
   } else {