This source code was written originally by "Patje", but with a few DNSBL bases, some was outdated. I added new DNSBL bases who are on my Eggdrop to watch which one DNSBL base Gzline innocent ppls with real IPs.
If you have better bases come and tell me on: /server -m irc.DBase.in.rs:6667 -j #IRC
Popups:
DNSBL:/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) {
echo -a 3* Checking your ip address, Please wait...
set %checkip $ip
/proxycheck.progress
halt
}
else {
echo -a 3* Checking ip address, Please wait...
set %checkip $1
/proxycheck.progress
}
}
}
alias -l proxycheck.progress {
.timer 1 1 dnsbl.tornevall.org
.timer 1 3 opm.tornevall.org
.timer 1 4 dnsbl.dronebl.org
.timer 1 5 rbl.efnet.org
.timer 1 6 rbl.efnetrbl.org
.timer 1 7 dnsbl.cyberlogic.net
.timer 1 8 all.s5h.net
.timer 1 9 socks.dnsbl.sorbs.net
.timer 1 10 tor.dan.me.uk
.timer 1 11 dnsbl-1.uceprotect.net
.timer 1 12 dnsbl-2.uceprotect.net
.timer 1 13 dnsbl-3.uceprotect.net
.timer 1 14 dnsbl.rizon.net
.timer 1 15 virbl.dnsbl.bit.nl
.timer 1 16 rbl.faynticrbl.org
.timer 1 17 dnsbl.ipocalypse.net
.timer 1 18 bl.spamcannibal.org
.timer 1 19 drone.abuse.ch
.timer 1 20 tor.dnsbl.sectoor.de
}
alias -l dnsbl.tornevall.org {
set %dbl dnsbl.tornevall.org
dns $revip(%checkip) $+ .dnsbl.tornevall.org
}
alias -l opm.tornevall.org {
set %dbl opm.tornevall.org
dns $revip(%checkip) $+ .opm.tornevall.org
}
alias -l dnsbl.dronebl.org {
set %dbl dnsbl.dronebl.org
dns $revip(%checkip) $+ .dnsbl.dronebl.org
}
alias -l rbl.efnet.org {
set %dbl rbl.efnet.org
dns $revip(%checkip) $+ .rbl.efnet.org
}
alias -l rbl.efnetrbl.org {
set %dbl rbl.efnetrbl.org
dns $revip(%checkip) $+ .rbl.efnetrbl.org
}
alias -l dnsbl.cyberlogic.net {
set %dbl dnsbl.cyberlogic.net
dns $revip(%checkip) $+ .dnsbl.cyberlogic.net
}
alias -l all.s5h.net {
set %dbl all.s5h.net
dns $revip(%checkip) $+ .all.s5h.net
}
alias -l socks.dnsbl.sorbs.net {
set %dbl socks.dnsbl.sorbs.net
dns $revip(%checkip) $+ .socks.dnsbl.sorbs.net
}
alias -l tor.dan.me.uk {
set %dbl tor.dan.me.uk
dns $revip(%checkip) $+ .tor.dan.me.uk
}
alias -l dnsbl-1.uceprotect.net {
set %dbl dnsbl-1.uceprotect.net
dns $revip(%checkip) $+ .dnsbl-1.uceprotect.net
}
alias -l dnsbl-2.uceprotect.net {
set %dbl dnsbl-2.uceprotect.net
dns $revip(%checkip) $+ .dnsbl-2.uceprotect.net
}
alias -l dnsbl-3.uceprotect.net {
set %dbl dnsbl-3.uceprotect.net
dns $revip(%checkip) $+ .dnsbl-3.uceprotect.net
}
alias -l tor.dnsbl.sectoor.de {
set %dbl tor.dnsbl.sectoor.de
dns $revip(%checkip) $+ .tor.dnsbl.sectoor.de
}
alias -l dnsbl.rizon.net {
set %dbl dnsbl.rizon.net
dns $revip(%checkip) $+ .dnsbl.rizon.net
}
alias -l virbl.dnsbl.bit.nl {
set %dbl virbl.dnsbl.bit.nl
dns $revip(%checkip) $+ .virbl.dnsbl.bit.nl
}
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 bl.spamcannibal.org {
set %dbl bl.spamcannibal.org
dns $revip(%checkip) $+ .bl.spamcannibal.org
}
alias -l drone.abuse.ch {
set %dbl drone.abuse.ch
dns $revip(%checkip) $+ .drone.abuse.ch
}
alias -l tor.dnsbl.sectoor.de {
set %dbl tor.dnsbl.sectoor.de
dns $revip(%checkip) $+ .tor.dnsbl.sectoor.de
}
on *:DNS:{
if (%dbl == dnsbl.tornevall.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 == opm.tornevall.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.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 == 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 == rbl.efnetrbl.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.cyberlogic.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 == all.s5h.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 == socks.dnsbl.sorbs.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 == 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-1.uceprotect.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-2.uceprotect.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-3.uceprotect.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 == 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 == 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 == bl.spamcannibal.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 == drone.abuse.ch) {
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.de) {
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 }
}
}
alias revip { tokenize 46 $1 | return $+($4, ., $3, ., $2, ., $1) }
Hope this help you to check IPs. PEACE!