quic 0.1.25 → 0.1.26
raw patch · 6 files changed
+12/−30 lines, 6 files
Files
- ChangeLog.md +5/−1
- Network/QUIC.hs +2/−13
- Network/QUIC/Config.hs +0/−11
- Network/QUIC/Imports.hs +1/−1
- quic.cabal +1/−1
- util/quic-client.hs +3/−3
ChangeLog.md view
@@ -1,9 +1,13 @@ # ChangeLog -## 0.1.25+## 0.1.26 * fix syntax error, for GHC 9.2 [#64](https://github.com/kazu-yamamoto/quic/pull/64)++## 0.1.25 (Obsoleted)++* Accidentally release on a wrong branch. ## 0.1.24
Network/QUIC.hs view
@@ -36,23 +36,12 @@ sendStreamMany, -- * Information- ConnectionInfo,+ ConnectionInfo (..), getConnectionInfo,- version,- cipher,- alpn,- handshakeMode,- retry,- localSockAddr,- remoteSockAddr,- localCID,- remoteCID, -- * Statistics- ConnectionStats,+ ConnectionStats (..), getConnectionStats,- txBytes,- rxBytes, -- * Synchronization wait0RTTReady,
Network/QUIC/Config.hs view
@@ -141,16 +141,6 @@ , scDebugLog :: Maybe FilePath , scTicketLifetime :: Int -- ^ A lifetime (in seconds) for TLS session ticket and QUIC token.- , scWildcardSocketonly :: Bool- -- ^ If 'True', only wild sockets are used.- -- Packets are dispatched in Haskell code according to- -- destination connection ID. This is an overhead however- -- clinets can make QUIC connections even if intermediate NATs- -- rebind UDP ports frequently.- -- Otherwise, connected sockets are also used.- -- This means that packets are dispatched by a kernel.- -- But unfortunately, clients cannot make QUIC connections- -- if intermediate NATs rebind UDP ports frequently. } -- | The default value for server configuration.@@ -174,5 +164,4 @@ , scSessionManager = noSessionManager , scDebugLog = Nothing , scTicketLifetime = 7200- , scWildcardSocketonly = True }
Network/QUIC/Imports.hs view
@@ -21,7 +21,7 @@ module Network.ByteOrder, module Network.QUIC.Utils, #if !MIN_VERSION_base(4,17,0)- , (!<<.), (!>>.)+ (!<<.), (!>>.), #endif atomicModifyIORef'', copyBS,
quic.cabal view
@@ -1,6 +1,6 @@ cabal-version: >=1.10 name: quic-version: 0.1.25+version: 0.1.26 license: BSD3 license-file: LICENSE maintainer: kazu@iij.ad.jp
util/quic-client.hs view
@@ -398,11 +398,11 @@ } printThroughput :: UnixTime -> UnixTime -> ConnectionStats -> IO ()-printThroughput t1 t2 stats =+printThroughput t1 t2 ConnectionStats{..} = printf "Throughput %.2f Mbps (%d bytes in %d msecs)\n" bytesPerSeconds- (rxBytes stats)+ rxBytes millisecs where UnixDiffTime (CTime s) u = t2 `diffUnixTime` t1@@ -410,7 +410,7 @@ millisecs = fromIntegral s * 1000 + fromIntegral u `div` 1000 bytesPerSeconds :: Double bytesPerSeconds =- fromIntegral (rxBytes stats)+ fromIntegral rxBytes * (1000 :: Double) * 8 / fromIntegral millisecs