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

Changed -d to --nodeps (default is -d)

Browse Source 
git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@755 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
sakolish 2008-03-11 14:01:47 +00:00
parent 8d92487d9b
commit 8b985a18e3
1 changed files with 12 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

23
xCAT-server-2.0/lib/xcat/plugins/blade.pm
View File

@ -32,7 +32,7 @@ sub handled_commands {
};
}
my %usage = (
"rpower" => "Usage: rpower <noderange> [-d][on|off|reset|stat|boot]",
"rpower" => "Usage: rpower <noderange> [--nodeps][on|off|reset|stat|boot]",
"rbeacon" => "Usage: rbeacon <noderange> [on|off|stat]",
"rvitals" => "Usage: rvitals <noderange> [all|temp|voltage|fanspeed|power|leds]",
"reventlog" => "Usage: reventlog <noderange> [all|clear|<number of entries to retrieve>]",
@ -869,7 +869,7 @@ sub handle_depend {
# send all dependencies (along w/ those dependent on nothing)
$request->{node} = [keys %$dep];
process_request($request,$callback,$doreq);
process_request($request,$callback,$doreq,1);
my $start = Time::HiRes::gettimeofday();
# build list of dependent nodes w/delays
@ -898,7 +898,7 @@ sub handle_depend {
if (@noderange) {
%mpahash = ();
$request->{node} = \@noderange;
process_request($request,$callback,$doreq);
process_request($request,$callback,$doreq,1);
}
# millisecond sleep
Time::HiRes::sleep($delay);
@ -952,6 +952,7 @@ sub process_request {
my $request = shift;
my $callback = shift;
my $doreq = shift;
my $level = shift;
my $noderange = $request->{node};
my $command = $request->{command}->[0];
my @exargs;
@ -970,15 +971,14 @@ sub process_request {
}
if ($command eq "rpower" and grep(/^on|off|boot|reset|cycle$/, @exargs)) {
if (grep /^-d$/, @exargs) {
if (!grep /^--nodeps$/, @exargs) {
# handles 1 level of dependencies only
@{$request->{arg}} = grep(!/^-d$/, @{$request->{arg}});
@exargs = @{$request->{arg}};
my $dep = build_depend($noderange,\@exargs);
if (scalar(%$dep)) {
handle_depend( $request, $callback, $doreq, $dep );
return 0;
if (!defined($level)) {
my $dep = build_depend($noderange,\@exargs);
if (scalar(%$dep)) {
handle_depend( $request, $callback, $doreq, $dep );
return 0;
}
}
}
}
@ -1208,3 +1208,4 @@ sub dompa {