warp 3.2.21 → 3.2.22
raw patch · 3 files changed
+17/−7 lines, 3 files
Files
- ChangeLog.md +7/−3
- Network/Wai/Handler/Warp/HTTP2/Worker.hs +9/−3
- warp.cabal +1/−1
ChangeLog.md view
@@ -1,15 +1,19 @@+## 3.2.22++* Fixing large request body in HTTP/2.+ ## 3.2.21 -* Fixing HTTP/2's timeout handler.+* Fixing HTTP/2's timeout handler in request's vault. ## 3.2.20 -* Fixing "Thread killed by timeout reaper when sending large HTTP/2 response"+* Fixing large request body in HTTP/2 [#593](https://github.com/yesodweb/wai/issues/593) ## 3.2.19 -* Fixing 0-length body in HTTP/2+* Fixing 0-byte request body in HTTP/2 [#597](https://github.com/yesodweb/wai/issues/597) [#679](https://github.com/yesodweb/wai/issues/679)
Network/Wai/Handler/Warp/HTTP2/Worker.hs view
@@ -246,9 +246,15 @@ setStreamInfo sinfo inp T.resume th T.tickle th- let ii' = ii { threadHandle = th }- vaultValue = Vault.insert pauseTimeoutKey (Timeout.pause th) $ vault req- req' = req { vault = vaultValue }+ let !ii' = ii { threadHandle = th }+ !body = requestBody req+ !body' = do+ T.pause th+ bs <- body+ T.resume th+ return bs+ !vaultValue = Vault.insert pauseTimeoutKey (Timeout.pause th) $ vault req+ !req' = req { vault = vaultValue, requestBody = body' } app req' $ responder ii' reqvt tcont strm req' cont1 <- case ex of Right ResponseReceived -> return True
warp.cabal view
@@ -1,5 +1,5 @@ Name: warp-Version: 3.2.21+Version: 3.2.22 Synopsis: A fast, light-weight web server for WAI applications. License: MIT License-file: LICENSE