This patch returns the message "Guest is already on host $targ" when a xen vm is migrated to the same host is was already on.

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@2671 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
jars99 2009-01-29 23:07:32 +00:00
parent 5682bb9479
commit e0470902d8

View File

@ -363,6 +363,9 @@ sub migrate {
} else {
return (1,"Unable to find current location of $node");
}
if ($currhyp eq $target) {
return (0,"Guest is already on host $targ");
}
my $sock = IO::Socket::INET->new(Proto=>'udp');
my $ipa=inet_aton($node);
my $pa=sockaddr_in(7,$ipa); #UDP echo service, not needed to be actually