diff --git a/perl-xCAT/xCAT/Table.pm b/perl-xCAT/xCAT/Table.pm index 8f4b5cb7e..a452325e2 100644 --- a/perl-xCAT/xCAT/Table.pm +++ b/perl-xCAT/xCAT/Table.pm @@ -107,7 +107,7 @@ sub init_dbworker { }; unlink($dbsockpath); umask(0077); - $dbworkersocket = IO::Socket::UNIX->new(Local => $dbsockpath, Type => SOCK_STREAM, Listen => 3); + $dbworkersocket = IO::Socket::UNIX->new(Local => $dbsockpath, Type => SOCK_STREAM, Listen => 8192); unless ($dbworkersocket) { die $!; } diff --git a/xCAT-server/sbin/xcatd b/xCAT-server/sbin/xcatd index ff20b62be..153a0d3a7 100755 --- a/xCAT-server/sbin/xcatd +++ b/xCAT-server/sbin/xcatd @@ -28,7 +28,7 @@ use Fcntl ":flock"; use xCAT::Client qw(submit_request); my $clientselect = new IO::Select; my $sslclients = 0; #THROTTLE -my $maxsslclients = 16; #default +my $maxsslclients = 512; #default sub xexit { while (wait() > 0) { @@ -175,12 +175,12 @@ if ($inet6support) { $socket = IO::Socket::INET6->new(LocalPort=>$sport, Proto => 'tcp', ReuseAddr => 1, - Listen => 64); + Listen => 8192); } else { $socket = IO::Socket::INET->new(LocalPort=>$sport, Proto => 'tcp', ReuseAddr => 1, - Listen => 64); + Listen => 8192); } unless ($socket) { @@ -538,13 +538,13 @@ my $listener; if ($inet6support) { $listener = IO::Socket::INET6->new( LocalPort => $port, - Listen => 64, + Listen => 8192, Reuse => 1, ); } else { $listener = IO::Socket::INET->new( LocalPort => $port, - Listen => 64, + Listen => 8192, Reuse => 1, ); }