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

comment out for now disable buffering on the socket

Browse Source
This commit is contained in:
lissav 2013-10-15 14:24:43 -04:00
parent a52dc5b5f9
commit b9144fc028
1 changed files with 6 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
xCAT-server/sbin/xcatd
View File

@ -1064,9 +1064,9 @@ until ($quit) {
}
#we have a pending connection and we are under the threshold, grab one from the list and process it...
my $cnnection=shift @pendingconnections;
my $previous = select ($cnnection); #assure that perl buffering is not in play at the low level
$|=1;
select ($previous);
#my $previous = select ($cnnection); #assure that perl buffering is not in play at the low level
#$|=1;
#select ($previous);
my $connection;
my $child = xCAT::Utils->xfork(); #Yes we fork, IO::Socket::SSL is not threadsafe..
if ($child) {
@ -1111,9 +1111,9 @@ until ($quit) {
unless ($connection) {
xexit 0;
}
$previous=select($connection); #also assure buffering not in play at SSL socket, which seems to be possibly independent of lower socket
$|=1;
select($previous);
# $previous=select($connection); #also assure buffering not in play at SSL socket, which seems to be possibly independent of lower socket
# $|=1;
# select($previous);
$clientselect->add($connection);
my $peerhost=undef;
my $peerfqdn=undef;