Connection-0.2.6 breaks Amazonka (stackage lts-6.12 on up) about hs-connection HOT 17 CLOSED

lts-6.11 completes without error for my project

% diff <(stack --resolver=lts-6.11 list-dependencies) <(stack --resolver=lts-6.12 list-dependencies) 
43c43
< connection 0.2.5
---
> connection 0.2.6

from hs-connection.

Sorry for your hair !
could you try with the latest cryptonite commit 8908af32168f6676b8f98b509ab5376706ab5660 to see if that works for you ?

from hs-connection.

My hair is ok :) Here's a script that will reproduce

#!/usr/bin/env stack
-- stack --resolver lts-6.12 --install-ghc runghc --package conduit --package lens --package amazonka --package amazonka-s3

{-# LANGUAGE ViewPatterns #-}
{-# LANGUAGE OverloadedStrings #-}

import Control.Lens
import Control.Monad.IO.Class
import Data.Conduit
import qualified Data.Conduit.List as CL
import Data.Monoid
import Data.String
import Data.Foldable
import Data.Text (Text)
import qualified Data.Text.IO as TI
import Network.AWS
import Network.AWS.Data
import Network.AWS.S3

main = do
    env <- newEnv NorthVirginia Discover
    let say = liftIO . TI.putStrLn
        val
            :: ToText a
            => Maybe a -> Text
        val = maybe "Nothing" toText
        lat v = maybe mempty (mappend " - " . toText) (v ^. ovIsLatest)
        key v = val (v ^. ovKey) <> ": " <> val (v ^. ovVersionId) <> lat v
    runResourceT . runAWS env $
        do say "Listing Buckets .."
           bs <- view lbrsBuckets <$> send listBuckets
           say $ "Found " <> toText (length bs) <> " Buckets."
           forM_ bs $
               \(view bName -> b) -> do
                   say $ "Listing Object Versions in: " <> toText b
                   paginate (listObjectVersions b) =$=
                       CL.concatMap (view lovrsVersions) $$
                       CL.mapM_ (say . mappend " -> " . key)

Run it against any AWS account with some buckets & objects. After about 30 seconds or so it'll crash.

from hs-connection.

change the script to lts-6.11 and it'll work fine

from hs-connection.

I wonder if this is related to erikd-ambiata/test-warp-wai#1 (comment) ?

from hs-connection.

Looks similar @erikd

from hs-connection.

snoyberg/http-client#225

from hs-connection.

dysinger: I'm not sure how to test this script with a non-released version of cryptonite, any idea ?

from hs-connection.

I've tried recreating my issue just using the connection library talking to HTTP and HTTPS servers. Was not able to find anything, suggesting that this was actually a problem with http-client.

from hs-connection.

@erikd: I don't think that's the case, definitely a low level crypto issue. did you use the git version of cryptonite ?

from hs-connection.

Nope, used the 0.19 release version.

from hs-connection.

@erikd I don't think you have the same issue than @dysinger here, this is the BadRecordMac issue

from hs-connection.

Ah ok, may be a different issue.

from hs-connection.

is this still a bug ? (both connection and tls has new revisions since)

from hs-connection.

Its still a HANDLE leak as far as I can tell. I tried it with connection 2.7 about a month ago.

I can test again (tomorrow) if you let me know what versions I should be testing.

from hs-connection.

that sounds like a different bug from the BadRecordMac

from hs-connection.

Opened #29 .

from hs-connection.