Code:
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) }
