Fix bug 3527493:lsslp return incompete object information

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@12957 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
yinle 2012-05-30 08:50:16 +00:00
parent b035ad5c1c
commit bb64f581c9

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;