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

fixed the defect 2971353;hw control commands support for hierarchy

Browse Source 
git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@5594 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
jjhua 2010-03-29 03:38:05 +00:00
parent 5aed402d15
commit 48e1838d7c
1 changed files with 13 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
xCAT-server/lib/perl/xCAT/PPC.pm
View File

@ -1298,6 +1298,10 @@ sub preprocess_request {
$req->{opt} = $opt;
if ( exists( $req->{opt}->{V} )) {
$req->{verbose} = 1;
}
####################################
# Get hwtype
####################################
@ -1418,13 +1422,15 @@ sub parse_args
$req->{command} = $command;
$req->{stdin} = $stdin;
$req->{hwtype} = $package;
$req->{callback} = $callback;
#$req->{callback} = $callback;
$req->{method} = "parse_args";
my $opt = runcmd( $req);
$req->{command} = [ $command];
$req->{stdin} = [ $stdin];
$req->{method} = [$req->{method}];
$req->{op} = [$req->{op}];
return $opt;
}
@ -1449,7 +1455,9 @@ sub process_request {
####################################
my $request = {%$req};
$request->{command} = $req->{command}->[0];
$request->{stdin} = $req->{stdin}->[0];
$request->{stdin} = $req->{stdin}->[0];
$request->{method} = $req->{method}->[0];
$request->{op} = $req->{op}->[0];
# $request->{hwtype} = $package;
$request->{callback}= $callback;
$request->{subreq} = $subreq;
@ -1466,9 +1474,9 @@ sub process_request {
####################################
# Option -V for verbose output
####################################
if ( exists( $request->{opt}->{V} )) {
$request->{verbose} = 1;
}
#if ( exists( $request->{opt}->{V} )) {
# $request->{verbose} = 1;
#}
####################################
# Process remote command
####################################