seasharp
/
anvil
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Fixed a bug in System->configure_ipmi() where it would fail to find the IPMI BMC admin username in some cases.

Browse Source 
Signed-off-by: Digimer <digimer@alteeve.ca>
main
Digimer 3 years ago
parent 861d565cce
commit e8dcb8b24c
1 changed files with 4 additions and 0 deletions
Whitespace
Show all changes Ignore whitespace when comparing lines Ignore changes in amount of whitespace Ignore changes in whitespace at EOL
Unified View
Diff Options
Show Stats Download Patch File Download Diff File
  1. 4
      Anvil/Tools/System.pm

4
Anvil/Tools/System.pm
Unescape View File

@ -2075,6 +2075,7 @@ LIMIT 1
my $wait_until = time + 120; my $wait_until = time + 120;
while ($waiting) while ($waiting)
{ {
my $debug = 2;
my ($output, $return_code) = $anvil->System->call({debug => $debug, shell_call => $anvil->data->{path}{exe}{ipmitool}." user list ".$lan_channel}); my ($output, $return_code) = $anvil->System->call({debug => $debug, shell_call => $anvil->data->{path}{exe}{ipmitool}." user list ".$lan_channel});
$anvil->Log->variables({source => $THIS_FILE, line => __LINE__, level => $debug, list => { $anvil->Log->variables({source => $THIS_FILE, line => __LINE__, level => $debug, list => {
output => $output, output => $output,
@ -2118,6 +2119,8 @@ LIMIT 1
} }
} }
} }
$anvil->Log->variables({source => $THIS_FILE, line => __LINE__, level => $debug, list => { user_name => $user_name }});
last if $user_name;
# Try again later or give up? # Try again later or give up?
if (time > $wait_until) if (time > $wait_until)
@ -2137,6 +2140,7 @@ LIMIT 1
sleep 10; sleep 10;
} }
} }
$anvil->Log->variables({source => $THIS_FILE, line => __LINE__, level => 2, list => { user_name => $user_name }});
if (not $user_name) if (not $user_name)
{ {
# Failed to find a user. # Failed to find a user.

Write Preview
Loading…
Cancel
Save