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

modify sethmcmgt and rmhmcmgt, modify hcp and mgt about fsp/bpa with cec/frame

Browse Source 
git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/branches/2.6@9530 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
yinle
2011-05-10 08:04:41 +00:00
parent d4de05052a
commit ef6b1738bc
1 changed files with 42 additions and 25 deletions
Download Patch File Download Diff File Expand all files Collapse all files
perl-xCAT/xCAT/PPCconn.pm
+42 -25
View File
@@ -5,6 +5,7 @@ use strict;
use Getopt::Long;
use xCAT::PPCcli qw(SUCCESS EXPECT_ERROR RC_ERROR NR_ERROR);
use xCAT::Usage;
use xCAT::DBobjUtils;
##############################################
# Globals
@@ -695,17 +696,25 @@ sub sethmcmgt
my $hcp = shift;
my $nodehm_tab = xCAT::Table->new('nodehm', -create=>1);
my $ent = $nodehm_tab->getNodeAttribs( $node, ['mgt']);
if ( !$ent or $ent->{mgt} ne 'hmc')
{
$nodehm_tab->setNodeAttribs( $node, { mgt=>'hmc'});
}
my $ppc_tab = xCAT::Table->new('ppc', -create=>1);
my $ent = $ppc_tab->getNodeAttribs( $node, ['hcp']);
if ( !$ent or $ent->{hcp} ne $hcp)
{
$ppc_tab->setNodeAttribs( $node, { hcp=>$hcp});
my $ppc_tab = xCAT::Table->new('ppc', -create=>1);
my @nodes;
push @nodes, $node;
my $ntype = xCAT::DBobjUtils->getnodetype($node);
if ( $ntype =~ /^(cec|frame)$/ ) {
my $cnodep = xCAT::DBobjUtils->getchildren($node);
if ($cnodep) {
push @nodes, @$cnodep;
}
}
for my $n (@nodes) {
my $ent = $nodehm_tab->getNodeAttribs( $n, ['mgt']);
if ( !$ent or $ent->{mgt} ne 'hmc') {
$nodehm_tab->setNodeAttribs( $n, { mgt=>'hmc'});
}
my $ent = $ppc_tab->getNodeAttribs( $n, ['hcp']);
if ( !$ent or $ent->{hcp} ne $hcp) {
$ppc_tab->setNodeAttribs( $n, { hcp=>$hcp});
}
}
}
#################################################################
@@ -717,22 +726,30 @@ sub rmhmcmgt
my $hwtype = shift;
my $nodehm_tab = xCAT::Table->new('nodehm', -create=>1);
my $ent = $nodehm_tab->getNodeAttribs( $node, ['mgt']);
if ( !$ent or $ent->{mgt} ne $hwtype)
{
if ($hwtype eq "cec" || $hwtype eq "frame") {
$nodehm_tab->setNodeAttribs( $node, { mgt=>"fsp"});
} else {
$nodehm_tab->setNodeAttribs( $node, { mgt=>$hwtype});
my $ppc_tab = xCAT::Table->new('ppc', -create=>1);
my @nodes;
push @nodes, $node;
my $ntype = xCAT::DBobjUtils->getnodetype($node);
if ( $ntype =~ /^(cec|frame)$/ ) {
my $cnodep = xCAT::DBobjUtils->getchildren($node);
if ($cnodep) {
push @nodes, @$cnodep;
}
}
my $ppc_tab = xCAT::Table->new('ppc', -create=>1);
my $ent = $ppc_tab->getNodeAttribs( $node, ['hcp']);
if ( !$ent or $ent->{hcp} ne $node)
{
$ppc_tab->setNodeAttribs( $node, { hcp=>$node});
}
for my $n (@nodes) {
my $ent = $nodehm_tab->getNodeAttribs( $n, ['mgt']);
if ( !$ent or $ent->{mgt} ne $hwtype) {
if ($hwtype eq "cec" || $hwtype eq "frame") {
$nodehm_tab->setNodeAttribs( $n, { mgt=>"fsp"});
} else {
$nodehm_tab->setNodeAttribs( $n, { mgt=>$hwtype});
}
}
my $ent = $ppc_tab->getNodeAttribs( $n, ['hcp']);
if ( !$ent or $ent->{hcp} ne $n) {
$ppc_tab->setNodeAttribs( $n, { hcp=>$n});
}
}
}
1;