DNS Resolve Script
Posted by sonicdm
Wednesday, March 28, 2007
Description: Resolves hostnames to multiple ip's
Usage:/dns nick,hostname, or ip
menu nicklist {
.DNS: /dns $nick
}
alias dns .dns $1-
on 1:DNS:{
VAR %n = $dns(0)
if ((%n > 1) || (%n == 0)) {
%addrtype = addresses
}
else {
%addrtype = address
}
if ($dns(%n).nick != $1) {
if ($right($dns(%n).nick,1) == s) {
var %dnsnick = $dns(%n).nick $+ '
}
else {
var %dnsnick = $dns(%n).nick $+ 's
}
}
else {
var %dnsnick = $null
}
echo 4 -a -
;addr: $dns(%n).addr ip:
echo 4 -a Resolved %dnsnick address $dns(%n).addr to %n %addrtype $+ .
while (%n > 0) {
echo 4 -a $dns(%n).ip
dec %n
}
echo 4 -a -
}
Usage:/dns nick,hostname, or ip
menu nicklist {
.DNS: /dns $nick
}
alias dns .dns $1-
on 1:DNS:{
VAR %n = $dns(0)
if ((%n > 1) || (%n == 0)) {
%addrtype = addresses
}
else {
%addrtype = address
}
if ($dns(%n).nick != $1) {
if ($right($dns(%n).nick,1) == s) {
var %dnsnick = $dns(%n).nick $+ '
}
else {
var %dnsnick = $dns(%n).nick $+ 's
}
}
else {
var %dnsnick = $null
}
echo 4 -a -
;addr: $dns(%n).addr ip:
echo 4 -a Resolved %dnsnick address $dns(%n).addr to %n %addrtype $+ .
while (%n > 0) {
echo 4 -a $dns(%n).ip
dec %n
}
echo 4 -a -
}