Cleaned up logging

Signed-off-by: digimer <mkelly@alteeve.ca>
main
digimer 9 months ago
parent 937d8ed2ef
commit b706ffa195
  1. 7
      Anvil/Tools/System.pm

@ -396,7 +396,7 @@ sub call
else else
{ {
$output .= $line."\n"; $output .= $line."\n";
$anvil->Log->variables({source => $THIS_FILE, line => __LINE__, level => $debug, list => { output => $output }}); $anvil->Log->variables({source => $THIS_FILE, line => __LINE__, level => 3, list => { output => $output }});
} }
} }
close $file_handle; close $file_handle;
@ -2168,15 +2168,18 @@ LIMIT 1
}}); }});
# Find the subnet the IPMI IP is in. # Find the subnet the IPMI IP is in.
foreach my $network_type ("bcn", "ifn", "sn") foreach my $network_type ("bcn", "ifn", "sn", "mn")
{ {
last if $in_network;
my $count = $anvil->data->{manifests}{manifest_uuid}{$manifest_uuid}{parsed}{networks}{count}{$network_type}; my $count = $anvil->data->{manifests}{manifest_uuid}{$manifest_uuid}{parsed}{networks}{count}{$network_type};
$anvil->Log->variables({source => $THIS_FILE, line => __LINE__, level => $debug, list => { $anvil->Log->variables({source => $THIS_FILE, line => __LINE__, level => $debug, list => {
network_type => $network_type, network_type => $network_type,
count => $count, count => $count,
in_network => $in_network,
}}); }});
foreach my $i (1..$count) foreach my $i (1..$count)
{ {
last if $in_network;
my $network_name = $network_type.$i; my $network_name = $network_type.$i;
my $network = $anvil->data->{manifests}{manifest_uuid}{$manifest_uuid}{parsed}{networks}{name}{$network_name}{network}; my $network = $anvil->data->{manifests}{manifest_uuid}{$manifest_uuid}{parsed}{networks}{name}{$network_name}{network};
my $this_subnet_mask = $anvil->data->{manifests}{manifest_uuid}{$manifest_uuid}{parsed}{networks}{name}{$network_name}{subnet}; my $this_subnet_mask = $anvil->data->{manifests}{manifest_uuid}{$manifest_uuid}{parsed}{networks}{name}{$network_name}{subnet};

Loading…
Cancel
Save