default to a tcp queue backlog of 1024 (Nicolas Adiba)

Default to a backlog of 1024 rather than the default 5 that TCP provides.
erlyaws · Jun 15, 2012 · c90a997 · c90a997
1 parent 0b3f29e
commit c90a997
Showing 1 changed file with 5 additions and 2 deletions.
diff --git a/src/yaws_server.erl b/src/yaws_server.erl
@@ -864,15 +864,18 @@ listen_opts(SC) ->
                    true ->
                        []
                end,
-    [binary,
+    Opts = [binary,
      {ip, SC#sconf.listen},
      {packet, http},
      {packet_size, 16#4000},
      {recbuf, 8192},
      {reuseaddr, true},
+     {backlog, 1024},
      {active, false}
      | proplists:get_value(listen_opts, SC#sconf.soptions, [])
-    ] ++ InetType.
+    ] ++ InetType,
+    ?Debug("listen options: ~p", [Opts]),
+    Opts.
 
 ssl_listen_opts(GC, SC, SSL) ->
     InetType = if