Changeset 21 for trunk/dnsbl/extract-data

Timestamp:

08/30/10 14:16:14 (14 years ago)

Author:

Kris Deugau

Message:

/trunk/dnsbl

Update extract-data with current live skiplist

File:

• trunk/dnsbl/extract-data (modified) (8 diffs)

trunk/dnsbl/extract-data

@@ -64 +64 @@
                 ),
         Debug => $imapdebug,
-        );
+        )
+
+        or die "IMAP login failed: $@\n";
 
 if (!defined($imap)) { die "IMAP Login Failed"; }
@@ -109 +111 @@
         NetAddr::IP->new("64.12.143.144/30"),
         NetAddr::IP->new("64.12.143.152/30"),
+        NetAddr::IP->new("64.12.206.39"),
         NetAddr::IP->new("64.12.206.40/30"),
+        NetAddr::IP->new("64.12.207.128/27"),
+        NetAddr::IP->new("64.12.207.144/29"),
+        NetAddr::IP->new("64.12.207.152/30"),
+        NetAddr::IP->new("64.12.207.160/28"),
+        NetAddr::IP->new("64.12.207.176/29"),
+    #IP-Network                    205.188.0.0/16
+        NetAddr::IP->new("205.188.169.200/23"),
 
     # Google/GMail
@@ -137 +147 @@
         NetAddr::IP->new("203.188.200.0/22"),
         NetAddr::IP->new("217.12.0.0/20"),
+        NetAddr::IP->new("77.238.184.0/23"),
+#IP-Network                    74.6.0.0/16
+        NetAddr::IP->new("74.6.114.48/24"),
+        NetAddr::IP->new("74.6.228.32/27"),
+        NetAddr::IP->new("74.6.228.64/26"),
+        NetAddr::IP->new("202.165.96.0/21"),
+#route:          87.248.112.0/21
+#inetnum:        87.248.114.0 - 87.248.115.255
+        NetAddr::IP->new("87.248.114.0/24"),
+#route:          116.214.0.0/20
+        NetAddr::IP->new("116.214.12.0/24"),
 
     # MessageLabs - may add these to trusted_networks instead
         NetAddr::IP->new("85.158.139.0/24"),
+# observed: .35, .51
+        NetAddr::IP->new("194.106.220.0/23"),
 
     # Bell Canada - note only some IPs show mail-ish rDNS
@@ -161 +184 @@
         NetAddr::IP->new("212.183.156.224/29"),
 
-    # Eastlink (formerly Persona [Sudbury etc]) - only a few IPs observed with mail-ish rDNS
-    #IP-Network                    24.222.0.0/16
-        NetAddr::IP->new("24.222.0.30"),
-        NetAddr::IP->new("24.224.136.8/30"),
-
-    # Cogeco - only a few IPs observed with mail-ish rDNS
-    #IP-Network                    216.221.64.0/19
-        NetAddr::IP->new("216.221.81.192"),
-        NetAddr::IP->new("216.221.81.96/30"),
-
-    # seznam.cz
-    #route:          77.75.72.0/23
-        NetAddr::IP->new("77.75.72.44"),
-
     # Facebook - only exclude mail-ish hostnames
     #IP-Network                    69.63.176.0/20
@@ -180 +189 @@
         NetAddr::IP->new("69.63.178.160/27"),
         NetAddr::IP->new("69.63.178.192/29"),
+    #IP-Network                    66.220.144.0/20
+        NetAddr::IP->new("66.220.144.128/26"),
+
+    # IBM Lotus Live - rdns mostly mail
+    #CIDR:       8.12.152.0/24
+        NetAddr::IP->new("8.12.152.0/24"),
+
+# ISPs
+    # Eastlink (formerly Persona [Sudbury etc]) - only a few IPs observed with mail-ish rDNS
+    #IP-Network                    24.222.0.0/16
+        NetAddr::IP->new("24.222.0.30"),
+        NetAddr::IP->new("24.224.136.8/30"),
+
+    # Cogeco - only a few IPs observed with mail-ish rDNS
+    #IP-Network                    216.221.64.0/19
+        NetAddr::IP->new("216.221.81.192"),
+        NetAddr::IP->new("216.221.81.28/30"),
+        NetAddr::IP->new("216.221.81.96/30"),
+    # seznam.cz
+    #route:          77.75.72.0/23
+        NetAddr::IP->new("77.75.72.44"),
 
     # T-Online - only mail-ish hostnames
@@ -190 +220 @@
         NetAddr::IP->new("194.25.134.80/29"),
 
+    # Telestra (Australia)
+    #inetnum:      61.9.128.0 - 61.9.255.255
+    # may miss one or two
+        NetAddr::IP->new("61.9.168.136/29"),
+        NetAddr::IP->new("61.9.168.144/29"),
+
 ## Edumactional places
 
@@ -196 +232 @@
         NetAddr::IP->new("129.128.5.19"),
 
+    # Queens University
+    #IP-Network                    130.15.0.0/16
+        NetAddr::IP->new("130.15.241.183"),
+
     # University of Maryland Baltimore County - mail servers only
     #CIDR:       130.85.0.0/16
@@ -202 +242 @@
     # University of Florida
     #IP-Network                    128.227.0.0/16
+        NetAddr::IP->new("128.227.74.149"),
         NetAddr::IP->new("128.227.74.165"),
+
+    # University of Texas
+    #IP-Network                    129.109.0.0/16
+        NetAddr::IP->new("129.109.195.0/28"),
+
+    # Roxbury Community College
+    #IP-Network                    209.104.233.0/24
+        NetAddr::IP->new("209.104.233.247"),
+
+    # Stanford University
+    #IP-Network                    171.64.0.0/14
+        NetAddr::IP->new("171.67.219.80/30"),
+
+    # Cleveland State University
+    #IP-Network                    137.148.0.0/16
+        NetAddr::IP->new("137.148.18.13/32"),
+
+    # University of Missouri - dba the Missouri Research and Education Network (MOREnet)
+    #CIDR:       204.184.0.0/15
+        NetAddr::IP->new("204.185.165.125"),
+
+    # Yale University
+    #IP-Network                    130.132.0.0/16
+        NetAddr::IP->new("130.132.50.7"),
+
+    # Rutgers University
+    #IP-Network                    165.230.0.0/16
+        NetAddr::IP->new("165.230.151.182"),
+
+    # Clemson University
+    #IP-Network                    130.127.0.0/16
+        NetAddr::IP->new("130.127.235.21"),
+
+    # Wilkes University
+    #IP-Network                    146.94.0.0/16
+        NetAddr::IP->new("146.94.192.152"),
+
+    # Virginia Community College System
+    #IP-Network                    164.106.0.0/16
+        NetAddr::IP->new("164.106.130.251"),
+
+    # University of Virginia
+    #IP-Network                    199.111.0.0/16
+    # Mary Washington College
+    #IP-Network                    199.111.64.0/19
+        NetAddr::IP->new("199.111.84.18"),
+
+# List servers
+    # Debian listserver - relays spam, so we can't list it.
+        NetAddr::IP->new("82.195.75.100"),
+
+# ESPs
+    # moderately abusable, but mostly legit
+    # Org-Name  iContact (Broadwick Corp./Preation Inc.)
+        NetAddr::IP->new("216.27.93.0/25"),
+
+    # are these guys an ESP?  rDNS in many blocks shows secureserver.net, with SMTPish overtones
+    #Org-Name                      GoDaddy.com, Inc.
+    #IP-Network                    64.202.160.0/19
+        NetAddr::IP->new("64.202.160.0/24"),
+        NetAddr::IP->new("64.202.165.0/26"),
+        NetAddr::IP->new("64.202.165.180/30"),
+        NetAddr::IP->new("64.202.165.192/29"),
+        NetAddr::IP->new("64.202.165.224/28"),
+    #IP-Network                    72.167.0.0/16
+        NetAddr::IP->new("72.167.82.80/29"),
+    #IP-Network                    173.201.0.0/16
+        NetAddr::IP->new("173.201.192.0/24"),
 
     ); # done def for @dontlistme