listener: maximize listen(2) backlog

[public-inbox.git] / lib / PublicInbox / Listener.pm

diff --git a/lib/PublicInbox/Listener.pm b/lib/PublicInbox/Listener.pm
index 2e0fc248fe7d49067c36e71f5226b300c28e3c15..64bba5b0fd7c491e7e1d5641116c83581c3e85e4 100644 (file)
--- a/lib/PublicInbox/Listener.pm
+++ b/lib/PublicInbox/Listener.pm
@@ -1,4 +1,4 @@
-# Copyright (C) 2015-2020 all contributors <meta@public-inbox.org>
+# Copyright (C) 2015-2021 all contributors <meta@public-inbox.org>
 # License: AGPL-3.0+ <https://www.gnu.org/licenses/agpl-3.0.txt>
 #
 # Used by -nntpd for listen sockets
@@ -20,7 +20,7 @@ sub new ($$$) {
        my ($class, $s, $cb) = @_;
        setsockopt($s, SOL_SOCKET, SO_KEEPALIVE, 1);
        setsockopt($s, IPPROTO_TCP, TCP_NODELAY, 1); # ignore errors on non-TCP
-       listen($s, 1024);
+       listen($s, 2**31 - 1); # kernel will clamp
        my $self = bless { post_accept => $cb }, $class;
        $self->SUPER::new($s, EPOLLIN|EPOLLET|EPOLLEXCLUSIVE);
 }