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

Added powerinterval support in 2.6 stream

Browse Source 
git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/branches/2.6@10919 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
wanghuaz
2011-10-30 06:07:17 +00:00
parent a40afdef5e
commit 4a42452208
1 changed files with 18 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files
perl-xCAT/xCAT/FSPpower.pm
+18 -1
View File
@@ -125,12 +125,19 @@ sub powercmd_boot {
push @output, [$node_name,$data,$Rc];
next;
}
##################################
# Convert state to on/off
##################################
my $state = power_status($data);
#print "boot:state:$state\n";
# Attribute powerinterval in site table,
# to control the rpower speed
if( defined($request->{'powerinterval'}) ) {
Time::HiRes::sleep($request->{'powerinterval'});
}
my $op = ($state =~ /^off$/) ? "on" : "reset";
$res = xCAT::FSPUtils::fsp_api_action ($node_name, $d, $op);
@@ -209,6 +216,16 @@ sub powercmd {
next;
}
}
# Attribute powerinterval in site table,
# to control the rpower speed
if (($action ne 'enter_rack_standby') && ($action ne 'exit_rack_standby') && ($action ne 'stat') && ($action ne 'status')
&& ($action ne 'state') && ($action ne 'off') && ($action ne 'softoff')) {
if( defined($request->{'powerinterval'}) ) {
Time::HiRes::sleep($request->{'powerinterval'});
}
}
my $res = xCAT::FSPUtils::fsp_api_action($node_name, $d, $action );
# print "In boot, state\n";
# print Dumper($res);