arif/xcat-core
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

change the way of finding node type

Browse Source 
git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@9748 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
yinle
2011-06-07 06:02:28 +00:00
parent 0218cbc730
commit 15500d97da
1 changed files with 17 additions and 11 deletions
Download Patch File Download Diff File Expand all files Collapse all files

28
perl-xCAT/xCAT/PPCcfg.pm
View File

@@ -71,18 +71,24 @@ sub parse_args {
#############################################
# Get support command list
#############################################
my $sitetab = xCAT::Table->new( 'nodetype' );
#my $typetab = xCAT::Table->new( 'nodetype' );
#my $nodes = $request->{node};
#foreach (@$nodes) {
# if ( defined( $typetab )) {
# my ($ent) = $typetab->getAttribs({ node=>$_},'nodetype');
# if ( defined($ent) ) {
# $request->{hwtype} = $ent->{nodetype};
# last;
# }
#
# }
#
#}
my $nodes = $request->{node};
foreach (@$nodes) {
if ( defined( $sitetab )) {
my ($ent) = $sitetab->getAttribs({ node=>$_},'nodetype');
if ( defined($ent) ) {
$request->{hwtype} = $ent->{nodetype};
last;
}
}
foreach my $nn (@$nodes) {
$request->{hwtype} = xCAT::DBobjUtils->getnodetype($nn);
last if ($request->{hwtype});
}
my $supported = $rsp{$request->{hwtype}};