Proxycheck check. (Check through 12 BL zones!)
Platform: mIRC
Published Jul 25, 2011
Updated Aug 02, 2011
With this script you can check which ip is in the blacklists and which not.
What do the colors mean?
Green = Clear
Red = Found
How do it works?
/Proxycheck <ip>
/Proxycheck localhost
To check your own ip
Example
* The IP 127.0.0.1 has not been found in BL zone dnsbl.dronebl.org
* The IP 127.0.0.1 has not been found in BL zone dnsbl.proxybl.org
* The IP 127.0.0.1 has not been found in BL zone tor.dnsbl.sectoor
* The IP 127.0.0.1 has not been found in BL zone tor.dan.me.uk
* The IP 127.0.0.1 has not been found in BL zone dnsbl.njabl.org
* The IP 127.0.0.1 has not been found in BL zone rbl.efnet.org
* The IP 127.0.0.1 has not been found in BL zone virbl.dnsbl.bit.nl
* The IP 127.0.0.1 has not been found in BL zone dnsbl.ahbl.org
* The IP 127.0.0.1 has not been found in BL zone rbl.faynticrbl.org
* The IP 127.0.0.1 has not been found in BL zone dnsbl.ipocalypse.net
* The IP 127.0.0.1 has not been found in BL zone dnsbl.rizon.net
* The IP 127.0.0.1 has not been found in BL zone dnsbl.swiftbl.org
BL zones included in the script
dnsbl.dronebl.org
dnsbl.proxybl.org
tor.dnsbl.sectoor
tor.dan.me.uk
rbl.efnet.org
virbl.dnsbl.bit.nl
dnsbl.ahbl.org
rbl.faynticrbl.org
dnsbl.ipocalypse.net
dnsbl.rizon.net
dnsbl.swiftbl.org
Thanks to patje from SwiftIRC for the RevIP alias. ;- Proxy check
;- Written by Aha2Y
;- /proxycheck <ip>
alias proxycheck {
if ($1 == $null) { echo 3* Missing parameters: /proxycheck <ip> or to check your own ip /proxycheck localhost }
else {
if ($1 == localhost) {
set %dnscheckproxy 1
echo -a 3* Checking your ip address, Please wait...
set %checkip $ip
/proxycheck.progress
halt
}
else {
set %dnscheckproxy 1
echo -a 3* Checking ip address, Please wait...
set %checkip $1
/proxycheck.progress
}
}
}
alias -l proxycheck.progress {
.timer 1 1 dronebl
.timer 1 3 proxybl
.timer 1 4 tor.dnsbl.sectoor
.timer 1 5 tor.dan.me.uk
.timer 1 6 dnsbl.njabl.org
.timer 1 7 rbl.efnet.org
.timer 1 8 virbl.dnsbl.bit.nl
.timer 1 9 dnsbl.ahbl.org
.timer 1 10 rbl.faynticrbl.org
.timer 1 11 dnsbl.ipocalypse.net
.timer 1 12 dnsbl.rizon.net
.timer 1 13 dnsbl.swiftbl.org
}
alias -l dronebl {
set %dbl dnsbl.dronebl.org
dns $revip(%checkip) $+ .dnsbl.dronebl.org
}
alias -l proxybl {
set %dbl dnsbl.proxybl.org
dns $revip(%checkip) $+ .dnsbl.proxybl.org
}
alias -l tor.dnsbl.sectoor {
set %dbl tor.dnsbl.sectoor
dns $revip(%checkip) $+ .tor.dnsbl.sectoor.de
}
alias -l tor.dan.me.uk {
set %dbl tor.dan.me.uk
dns $revip(%checkip) $+ .tor.dan.me.uk
}
alias -l dnsbl.njabl.org {
set %dbl dnsbl.njabl.org
dns $revip(%checkip) $+ .dnsbl.njabl.org
}
alias -l rbl.efnet.org {
set %dbl rbl.efnet.org
dns $revip(%checkip) $+ .rbl.efnet.org
}
alias -l virbl.dnsbl.bit.nl {
set %dbl virbl.dnsbl.bit.nl
dns $revip(%checkip) $+ .virbl.dnsbl.bit.nl
}
alias -l dnsbl.ahbl.org {
set %dbl dnsbl.ahbl.org
dns $revip(%checkip) $+ .dnsbl.ahbl.org
}
alias -l rbl.faynticrbl.org {
set %dbl rbl.faynticrbl.org
dns $revip(%checkip) $+ .rbl.faynticrbl.org
}
alias -l rbl.faynticrbl.org {
set %dbl rbl.faynticrbl.org
dns $revip(%checkip) $+ .rbl.faynticrbl.org
}
alias -l dnsbl.ipocalypse.net {
set %dbl dnsbl.ipocalypse.net
dns $revip(%checkip) $+ .dnsbl.ipocalypse.net
}
alias -l dnsbl.rizon.net {
set %dbl dnsbl.rizon.net
dns $revip(%checkip) $+ .dnsbl.rizon.net
}
alias -l dnsbl.swiftbl.org {
set %dbl dnsbl.swiftbl.org
dns $revip(%checkip) $+ .dnsbl.swiftbl.org
}
on *:DNS:{
if (%dnscheckproxy == 1) {
if (%dbl == dnsbl.dronebl.org) {
if ($iaddress != $null) {
echo -a 4* The IP %checkip has been found in BL zone %dbl }
else {
echo -a 3* The IP %checkip has not been found in BL zone %dbl }
}
if (%dbl == dnsbl.proxybl.org) {
if ($iaddress != $null) {
echo -a 4* The IP %checkip has been found in BL zone %dbl }
else {
echo -a 3* The IP %checkip has not been found in BL zone %dbl }
}
if (%dbl == tor.dnsbl.sectoor) {
if ($iaddress != $null) {
echo -a 4* The IP %checkip has been found in BL zone %dbl }
else {
echo -a 3* The IP %checkip has not been found in BL zone %dbl }
}
if (%dbl == tor.dan.me.uk) {
if ($iaddress != $null) {
echo -a 4* The IP %checkip has been found in BL zone %dbl }
else {
echo -a 3* The IP %checkip has not been found in BL zone %dbl }
}
if (%dbl == dnsbl.njabl.org) {
if ($iaddress != $null) {
echo -a 4* The IP %checkip has been found in BL zone %dbl }
else {
echo -a 3* The IP %checkip has not been found in BL zone %dbl }
}
if (%dbl == rbl.efnet.org) {
if ($iaddress != $null) {
echo -a 4* The IP %checkip has been found in BL zone %dbl }
else {
echo -a 3* The IP %checkip has not been found in BL zone %dbl }
}
if (%dbl == virbl.dnsbl.bit.nl) {
if ($iaddress != $null) {
echo -a 4* The IP %checkip has been found in BL zone %dbl }
else {
echo -a 3* The IP %checkip has not been found in BL zone %dbl }
}
if (%dbl == dnsbl.ahbl.org) {
if ($iaddress != $null) {
echo -a 4* The IP %checkip has been found in BL zone %dbl }
else {
echo -a 3* The IP %checkip has not been found in BL zone %dbl }
}
if (%dbl == rbl.faynticrbl.org) {
if ($iaddress != $null) {
echo -a 4* The IP %checkip has been found in BL zone %dbl }
else {
echo -a 3* The IP %checkip has not been found in BL zone %dbl }
}
if (%dbl == dnsbl.ipocalypse.net) {
if ($iaddress != $null) {
echo -a 4* The IP %checkip has been found in BL zone %dbl }
else {
echo -a 3* The IP %checkip has not been found in BL zone %dbl }
}
if (%dbl == dnsbl.rizon.net) {
if ($iaddress != $null) {
echo -a 4* The IP %checkip has been found in BL zone %dbl }
else {
echo -a 3* The IP %checkip has not been found in BL zone %dbl }
}
if (%dbl == dnsbl.swiftbl.org) {
if ($iaddress != $null) {
echo -a 4* The IP %checkip has been found in BL zone %dbl }
else {
echo -a 3* The IP %checkip has not been found in BL zone %dbl }
}
unset %dbl
unset %dnsproxycheck
}
}
;-RevIP script by Patje from SwiftIRC.
alias revip { tokenize 46 $1 | return $+($4, ., $3, ., $2, ., $1) }
