-Fix vmware migration problem
git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@8762 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
parent
338c4e1337
commit
9aeabaf8c3
@ -166,6 +166,7 @@ sub preprocess_request {
|
||||
# build an individual request for each service node
|
||||
my $service = "xcat";
|
||||
my @hyps=keys(%hyp_hash);
|
||||
my %targethyps;
|
||||
if ($command eq 'rmigrate' and (scalar @{$extraargs} >= 1)) {
|
||||
@ARGV=@{$extraargs};
|
||||
my $offline;
|
||||
@ -177,6 +178,7 @@ sub preprocess_request {
|
||||
my $dsthyp = $ARGV[0];
|
||||
if ($dsthyp) {
|
||||
push @hyps,$dsthyp;
|
||||
$targethyps{$dsthyp}=1;
|
||||
}
|
||||
}
|
||||
#TODO: per hypervisor table password lookup
|
||||
@ -204,7 +206,7 @@ sub preprocess_request {
|
||||
my @nodes=();
|
||||
foreach (@$hyps1) { #This preserves the constructed data to avoid redundant table lookup
|
||||
my $cfgdata;
|
||||
if (not $hyp_hash{$_}) { #a vm, skip it
|
||||
if (not $targethyps{$_} and not $hyp_hash{$_}) { #a vm, skip it
|
||||
next;
|
||||
} elsif ($hyp_hash{$_}{nodes}) {
|
||||
push @nodes, @{$hyp_hash{$_}{nodes}};
|
||||
|
Loading…
Reference in New Issue
Block a user