Fix bug 3527493: lsslp return incompete object information

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/branches/2.7@12958 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
yinle 2012-05-30 08:53:00 +00:00
parent 7cc740d191
commit 475e6c51df

View File

@ -325,9 +325,9 @@ sub send_service_request_single {
my $ip = $sip;
$ip =~ s/\/(.*)//;
my $maskbits = $1;
#if (xCAT::Utils->isAIX()) {
# my $runcmd = `route add 239.255.255.253 $ip`;
#}
if (xCAT::Utils->isAIX()) {
my $runcmd = `route add 239.255.255.253 $ip`;
}
my $ipn = inet_aton($ip); #we are ipv4 only, this is ok
my $ipnum=unpack("N",$ipn);
$ipnum= $ipnum | (2**(32-$maskbits))-1;