bug EvanAnderson#19: special-case exemption for 0 and 255

greatquux · Mar 31, 2017 · 4079af9 · 4079af9
1 parent 5ee3652
commit 4079af9
Showing 1 changed file with 5 additions and 0 deletions.
diff --git a/ts_block.vbs b/ts_block.vbs
@@ -217,8 +217,13 @@ Sub Block(IP)
 	Dim strRunCommand
 	Dim intRemoveBlockTime
 
+	' don't block special IPs
+	If InStr("0.0.0.0",IP) > 0 Then Exit Sub
+	If InStr("255.255.255.255",IP) > 0 Then Exit Sub
+
 	' don't block if IP is in whitelist (no need to log)
 	If InStr(strWhitelist,IP) > 0 Then Exit Sub
+
 	' Block an IP address (either by black-hole routing it or adding a firewall rule)
 	If (TESTING <> 1) Then 	
 		If intBlackholeStyle = BLACKHOLE_ROUTE Then strRunCommand = "route add " & IP & " mask 255.255.255.255 " & blackHoleIPAddress