Fixing cookbooks

[akhesaCaro]

Some cookbooks have been commented because they didn't compile anymore with new versions of GHC or dependencies.

Cookbooks to fix

• hoist-server-with-context
  -- PR : Rename ServantError to ClientError, ServantErr to ServerError #1131
• https
  -- Commenting PR : Forward 8.8 #1224
  -- Fixing PR : enabling https cookbook #1412
• jwt-and-basic-auth
  -- PR : Rename ServantError to ClientError, ServantErr to ServerError #1131
• sentry
  -- PR : Rename ServantError to ClientError, ServantErr to ServerError #1131
• testing
  -- PR : Basic GitHub actions-based CI #1402
  -- Issue Servant <-> Servant-Quickcheck dependency loop servant-quickcheck#74
• uverb
  -- Fixing PR Using DerivingVia in UVerb's cookbook #1407
• open-id-connect
  -- PR : Fix travis: remove open-id-connect cookbook, it's bitrotted #1182

HTTPS

• Commenting PR : Forward 8.8 #1224
• Errors with GHC 8.0.2 :

[1 of 1] Compiling Network.Wai.Handler.WarpTLS ( Network/Wai/Handler/WarpTLS.hs, dist/build/Network/Wai/Handler/WarpTLS.o )
cabal: Failed to build warp-tls-3.2.8 (which is required by exe:cookbook-https

Error:     • Constructor ‘Connection’ does not have the required strict field(s): connHTTP2
from cookbook-https-0.1). See the build log above for details.

    • In the expression:
        Connection
          {connSendMany = TLS.sendData ctx . L.fromChunks,
           connSendAll = sendall, connSendFile = sendfile, connClose = close',
           connFree = freeBuffer writeBuf, connRecv = recv ref,
           connRecvBuf = recvBuf ref, connWriteBuffer = writeBuf,
           connBufferSize = bufferSize}
      In an equation for ‘conn’:
          conn ctx writeBuf ref
            = Connection
                {connSendMany = TLS.sendData ctx . L.fromChunks,
                 connSendAll = sendall, connSendFile = sendfile, connClose = close',
                 connFree = freeBuffer writeBuf, connRecv = recv ref,
                 connRecvBuf = recvBuf ref, connWriteBuffer = writeBuf,
                 connBufferSize = bufferSize}
            where
                sendall = TLS.sendData ctx . L.fromChunks . return
                sendfile fid offset len hook headers
                  = readSendFile
                      writeBuf bufferSize sendall fid offset len hook headers
                close' = void (tryIO sendBye) `finally` TLS.contextClose ctx
                sendBye
                  = handleJust
                      (\ e -> guard (e == ConnectionClosedByPeer) >> return e)
                      (const (return ()))
                      (TLS.bye ctx)
                ....
      In an equation for ‘httpOverTls’:
          httpOverTls (TLSSettings {..}) s bs0 params
            = do { recvN <- makePlainReceiveN s bs0;
                   ctx <- TLS.contextNew (backend recvN) params;
                   TLS.contextHookSetLogging ctx tlsLogging;
                   .... }
            where
                backend recvN
                  = TLS.Backend
                      {TLS.backendFlush = return (),
                       TLS.backendClose = gracefulClose s 5000,
                       TLS.backendSend = sendAll' s, TLS.backendRecv = recvN}
                sendAll' sock bs
                  = sendAll sock bs
                    `E.catch` \ (SomeException _) -> throwIO ConnectionClosedByPeer
                conn ctx writeBuf ref
                  = Connection
                      {connSendMany = TLS.sendData ctx . L.fromChunks,
                       connSendAll = sendall, connSendFile = sendfile, connClose = close',
                       connFree = freeBuffer writeBuf, connRecv = recv ref,
                       connRecvBuf = recvBuf ref, connWriteBuffer = writeBuf,
                       connBufferSize = bufferSize}
                  where
                      sendall = TLS.sendData ctx . L.fromChunks . return
                      sendfile fid offset len hook headers
                        = readSendFile
                            writeBuf bufferSize sendall fid offset len hook headers

• dependency `warp-lts 3.2.8

• Adding connHTTP2 attribut into the record Connection in warp PR : yesodweb/wai@1d40f63

• warp-tls with a connHTTP2 filled in there is ⚠️ only on master ⚠️
  -- with this PR : kazu-yamamoto/wai@4ab4083
  -- with this version : https://hackage.haskell.org/package/warp-tls-3.2.9/docs/src/Network.Wai.Handler.WarpTLS.html#defaultTlsSettings

• dependency warp-3.3.13 : 2021-04-10T10:32:10.9523267Z - warp-3.3.13 (lib) (requires download & build) and has the new attribute.

hoist-server-with-context

With GHC 8.0.2 :

src/Servant/Auth/Server/Internal/ThrowAll.hs:5:48: error:
Error:     Module ‘Servant’ does not export ‘ServantErr’
cabal: Failed to build servant-auth-server-0.1.0.1 (which is required by
exe:cookbook-hoist-server-with-context from
cookbook-hoist-server-with-context-0.0.1).

Error: Process completed with exit code 1.

servant-auth-server 0.4.4.0 or higher is compatible with this PR : https://github.com/haskell-servant/servant/pull/1131/files

servant-auth-server needs to be at least 0.4.4.0, but it has a constraint on servant that needs GHC 8.2.1. So both aren't compatible with GHC 8.0.2
--> This PR has dropped the compatibility with 8.0.2 , but why? haskell-servant/servant-auth@90d14b4