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

list/set cec_off_policy

Browse Source 
git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@9905 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
jjhua 2011-06-23 05:57:50 +00:00
parent 710a7e3f74
commit 0c1c053f85
1 changed files with 79 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

80
perl-xCAT/xCAT/FSPcfg.pm
View File

@ -15,6 +15,7 @@ use xCAT::PPCcfg;
##########################################
my %rspconfig = (
frame => \&frame,
cec_off_policy => \&cec_off_policy,
);
@ -49,6 +50,7 @@ sub parse_args {
"admin_passwd",
"general_passwd",
"*_passwd",
"cec_off_policy",
"resetnet"
);
my @frame = (
@ -174,7 +176,7 @@ sub parse_args {
####################################
# Return method to invoke
####################################
if ( exists($cmds{frame}) ) {
if ( exists($cmds{frame}) or exists($cmds{cec_off_policy})) {
$request->{hcp} = "bpa";
$request->{method} = "cfg";
return( \%opt );
@ -235,6 +237,12 @@ sub parse_option {
}
}
if ( $command eq 'cec_off_policy' ){
if ( $value !~ /^poweroff$/i && $value !~ /^stayon$/i ) {
return( "Invalid cec_off_policy '$value'" );
}
}
return undef;
}
@ -426,6 +434,76 @@ sub frame {
}
}
sub cec_off_policy {
my $request = shift;
my $value = shift;
my $hash = shift;
my $arg = $request->{arg};
foreach ( @$arg ) {
my $result;
my $Rc;
my $data;
my ($cmd, $value) = split /=/, $_;
if ( $cmd ne "cec_off_policy" ) {
return( [["Error","Multiple option $cmd and cec is not accepted", -1]] );
}
while ( my ($cec,$h) = each(%$hash) ) {
while ( my ($node,$d) = each(%$h) ) {
if ( !defined($value) ) {
#################################
# Get platform IPL parameters
#################################
$data = xCAT::FSPUtils::fsp_api_action( $node, $d, "get_phyp_cfg_power_off_policy");
$Rc = pop(@$data);
#################################
# Return error
#################################
if ( $Rc != 0 ) {
return( [[$node,@$data[1],$Rc]] );
}
@$data[1] =~ /cec_off_policy=(\w*);/;
push @$result, [$node, $1, 0];
} else {
#################################
# Set cec off policy
#################################
if( $value eq "poweroff") {
$value = "cec_off_policy_poweroff";
} else {
$value = "cec_off_policy_stayon";
}
$data = xCAT::FSPUtils::fsp_api_action( $node, $d, $value);
$Rc = pop(@$data);
#################################
# Return error
#################################
if ( $Rc != 0 ) {
return( [[$node,@$data[1],$Rc]] );
}
push @$result, [$node,"Success",0];
}
}
return( [@$result] );
}
}
}