2
0
mirror of https://github.com/xcat2/xcat-core.git synced 2025-05-29 09:13:08 +00:00

fix issue 3668, make rsetboot node do rsetboot stat

This commit is contained in:
XuWei 2017-08-13 21:59:38 -04:00
parent 5f267b7b98
commit 55c15023aa

View File

@ -651,7 +651,7 @@ sub parse_command_status {
my $subcommands = shift;
my $subcommand;
if ($$subcommands[-1] =~ /V|verbose/) {
if ($$subcommands[-1] and $$subcommands[-1] =~ /V|verbose/) {
$::VERBOSE = 1;
pop(@$subcommands);
}
@ -727,7 +727,11 @@ sub parse_command_status {
}
if ($command eq "rsetboot") {
$subcommand = $$subcommands[0];
if (defined($$subcommands[0])) {
$subcommand = $$subcommands[0];
} else {
$subcommand = "stat";
}
if ($subcommand =~ /^hd$|^net$|^cd$|^default$|^def$/) {
$next_status{LOGIN_RESPONSE} = "RSETBOOT_SET_REQUEST";
$next_status{RSETBOOT_SET_REQUEST} = "RSETBOOT_SET_RESPONSE";
@ -750,7 +754,7 @@ sub parse_command_status {
if ($command eq "reventlog") {
my $option_s = 0;
if ($$subcommands[-1] eq "-s") {
if ($$subcommands[-1] and $$subcommands[-1] eq "-s") {
$option_s = 1;
pop(@$subcommands);
}