Fix bug 3527194: lsslp -s HMC gives no HMC info

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@12757 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
yinle 2012-05-17 08:29:27 +00:00
parent 92dd4b49af
commit 77728d700e

View File

@ -499,6 +499,11 @@ sub invoke_dodiscover {
} else {
$services = [WILDCARD_SERVICE,HARDWARE_SERVICE,SOFTWARE_SERVICE];
}
#efix for hmc bug
if ($services =~ /hardware-management-console/) {
$services = [WILDCARD_SERVICE,HARDWARE_SERVICE,SOFTWARE_SERVICE];
}
if ($globalopt{maxtries}) {
$maxt = $globalopt{maxtries};
} else {
@ -598,6 +603,17 @@ sub format_output {
###########################################
my $outhash = parse_responses( $request, \$length );
#hmc bug efix
my $newouthash;
if ($globalopt{service} =~ /hardware-management-console/) {
for my $en ( keys %$outhash ) {
if (${$outhash->{$en}}{type} eq 'hmc') {
$newouthash->{$en} = $outhash->{$en};
}
}
$outhash = $newouthash;
}
###########################################
# filter the result and keep the specified nodes
###########################################