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

Merge branch 'master' of ssh://git.code.sf.net/p/xcat/xcat-core

Browse Source
This commit is contained in:
immarvin 2014-11-28 01:49:50 -08:00
commit 30623ebd13
1 changed files with 10 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
xCAT-server/sbin/xcatd
View File

@ -650,19 +650,20 @@ sub do_udp_service { #This function opens up a UDP port
}
close($udppidfile);
}
my $select = new IO::Select;
while (not $socket and $retry) {
if ($inet6support) {
$socket = IO::Socket::INET6->new(LocalPort => $port,
my $select = new IO::Select;
while (not $socket and $retry) {
$retry--;
if ($inet6support) {
$socket = IO::Socket::INET6->new(LocalPort => $port,
Proto => 'udp',
);
} else {
$socket = IO::Socket::INET->new(LocalPort => $port,
} else {
$socket = IO::Socket::INET->new(LocalPort => $port,
Proto => 'udp',
Domain => AF_INET);
}
sleep 0.05;
}
}
sleep 0.05;
}
openlog("xCAT UDP",'','local4');
unless ($socket) {