Use a larger stream window

well-typed · Oct 15, 2024 · d1dfece · d1dfece
1 parent 8dce5c8
commit d1dfece
Showing 1 changed file with 4 additions and 3 deletions.
diff --git a/src/Network/GRPC/Common/HTTP2Settings.hs b/src/Network/GRPC/Common/HTTP2Settings.hs
@@ -168,16 +168,17 @@ defaultHTTP2Settings :: HTTP2Settings
 defaultHTTP2Settings = HTTP2Settings {
       http2MaxConcurrentStreams        = defMaxConcurrentStreams
     , http2StreamWindowSize            = defInitialStreamWindowSize
-    , http2ConnectionWindowSize        = defMaxConcurrentStreams * defInitialStreamWindowSize
+    , http2ConnectionWindowSize        = defInitialConnectionWindowSize
     , http2TcpNoDelay                  = True
     , http2OverridePingRateLimit       = Just 100
     , http2OverrideEmptyFrameRateLimit = Nothing
     , http2OverrideSettingsRateLimit   = Nothing
     , http2OverrideRstRateLimit        = Nothing
     }
   where
-    defMaxConcurrentStreams    = 128
-    defInitialStreamWindowSize = 1024 * 64
+    defMaxConcurrentStreams        = 128
+    defInitialStreamWindowSize     = 256 * 1024        -- 256KiB
+    defInitialConnectionWindowSize = 2   * 1024 * 1024 -- 2MiB
 
 instance Default HTTP2Settings where
   def = defaultHTTP2Settings