From ff8e2e21af52348dd757d5bc50c0f5a42919ccd4 Mon Sep 17 00:00:00 2001
From: jbjohnso <jbjohnso@8638fb3e-16cb-4fca-ae20-7b5d299a9bcd>
Date: Sat, 22 Aug 2009 13:18:55 +0000
Subject: [PATCH] -Increase db worker queue depth to avoid fatal table access
 errors -Increase number of xCAT process slots to 512 from 16 -Increase Listen
 queue depth of xCAT to 8192 (needs to have proc value for somaxconn upped to
 actually make a difference)

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@4027 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
---
 perl-xCAT/xCAT/Table.pm |  2 +-
 xCAT-server/sbin/xcatd  | 10 +++++-----
 2 files changed, 6 insertions(+), 6 deletions(-)

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,
         );
 }