Show Status Difference With Symbol
Add the -p switch to show the difference between reachable and unreachable destinations. This allows outputting to a text file while still being able to distinguish between the status of IP address when the -a switch is used.
This commit is contained in:
parent
991bad27d3
commit
6b666d6266
1 changed files with 8 additions and 2 deletions
10
sbin/pinger
10
sbin/pinger
|
@ -15,10 +15,10 @@ $| = 1;
|
||||||
die("pinger must be run as root\n") if($> != 0);
|
die("pinger must be run as root\n") if($> != 0);
|
||||||
|
|
||||||
my $alive = 1;
|
my $alive = 1;
|
||||||
my(%switches, $all, $both, $time, $name, $force, $startTime, $finishTime);
|
my(%switches, $all, $print, $both, $time, $name, $force, $startTime, $finishTime);
|
||||||
|
|
||||||
# handle command line options
|
# handle command line options
|
||||||
my $status = getopts('abdfrnth', \%switches);
|
my $status = getopts('abdfrnpth', \%switches);
|
||||||
help() if(!$status || $switches{'h'});
|
help() if(!$status || $switches{'h'});
|
||||||
for (keys %switches) {
|
for (keys %switches) {
|
||||||
switch($_) {
|
switch($_) {
|
||||||
|
@ -26,6 +26,7 @@ for (keys %switches) {
|
||||||
case 'b' { $both = 1; $name = 1; }
|
case 'b' { $both = 1; $name = 1; }
|
||||||
case 'd' { $alive = 0; }
|
case 'd' { $alive = 0; }
|
||||||
case 'f' { $force = 1; }
|
case 'f' { $force = 1; }
|
||||||
|
case 'p' { $print = 1; }
|
||||||
case 'r' { $alive = 1; }
|
case 'r' { $alive = 1; }
|
||||||
case 'n' { $name = 1; }
|
case 'n' { $name = 1; }
|
||||||
case 't' { $time = 1; }
|
case 't' { $time = 1; }
|
||||||
|
@ -79,6 +80,10 @@ for(my $i = $start, my $k = 1; $i <= $end; $i++, $k++) {
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
|
if($print) {
|
||||||
|
$ip = ($reachable) ? "o $ip" : "x $ip";
|
||||||
|
}
|
||||||
|
|
||||||
if($reachable) {
|
if($reachable) {
|
||||||
push(@reachable_ips, colored($ip, 'green'));
|
push(@reachable_ips, colored($ip, 'green'));
|
||||||
} else {
|
} else {
|
||||||
|
@ -155,6 +160,7 @@ sub help {
|
||||||
print "\t-d\t\tList dead addresses\n";
|
print "\t-d\t\tList dead addresses\n";
|
||||||
print "\t-f\t\tForce hostname lookup even if unreachable\n";
|
print "\t-f\t\tForce hostname lookup even if unreachable\n";
|
||||||
print "\t-n\t\tReturn list as hostnames when possible\n";
|
print "\t-n\t\tReturn list as hostnames when possible\n";
|
||||||
|
print "\t-p\t\tEnable print mode; only noticeable with -a enabled\n";
|
||||||
print "\t-r\t\tList reachable addresses (default)\n";
|
print "\t-r\t\tList reachable addresses (default)\n";
|
||||||
print "\t-t\t\tTime ping execution\n";
|
print "\t-t\t\tTime ping execution\n";
|
||||||
exit(1);
|
exit(1);
|
||||||
|
|
Loading…
Reference in a new issue