Added the new 'anvil-network-profiler' tool.

Signed-off-by: Digimer <digimer@alteeve.ca>
main
Digimer 2 years ago
parent e025f5b927
commit 508e278359
  1. 3
      Anvil/Tools.pm
  2. 2
      Anvil/Tools/Validate.pm
  3. 1107
      tools/anvil-network-profiler

@ -1168,6 +1168,7 @@ sub _set_paths
ifdown => "/sbin/ifdown",
ifup => "/sbin/ifup",
ip => "/usr/sbin/ip",
iperf3 => "/usr/bin/iperf3",
'ipmi-oem' => "/usr/sbin/ipmi-oem",
ipmitool => "/usr/bin/ipmitool",
### NOTE: When Network->manage_firewall() is done, search for and replace all
@ -1176,6 +1177,7 @@ sub _set_paths
iptables => "/usr/sbin/iptables",
'iptables-save' => "/usr/sbin/iptables-save",
journalctl => "/usr/bin/journalctl",
'kill' => "/usr/bin/kill",
logger => "/usr/bin/logger",
ls => "/usr/bin/ls",
lsblk => "/usr/bin/lsblk",
@ -1203,6 +1205,7 @@ sub _set_paths
passwd => "/usr/bin/passwd",
pcs => "/usr/sbin/pcs",
perccli64 => "/opt/MegaRAID/perccli/perccli64",
pidof => "/usr/sbin/pidof",
ping => "/usr/bin/ping",
pg_dump => "/usr/bin/pg_dump",
pgrep => "/usr/bin/pgrep",

@ -528,7 +528,7 @@ sub ip
$anvil->Log->variables({source => $THIS_FILE, line => __LINE__, level => $debug, list => { ip => $ip }});
my $ipv4 = $anvil->Validate->ipv4({ip => $ip, debug => $debug});
my $ipv4 = $anvil->Validate->ipv4({ip => $ip, debug => $debug});
my $ipv6 = not $ipv4 ? $anvil->Validate->ipv6({ip => $ip, debug => $debug}) : 0;
$anvil->Log->variables({source => $THIS_FILE, line => __LINE__, level => $debug, list => {
ipv4 => $ipv4,

File diff suppressed because it is too large Load Diff
Loading…
Cancel
Save