从 Network.HTTP.Enumerator 迁移到 Network.HTTP.Conduit

发布于 2025-01-02 17:42:42 字数 1104 浏览 2 评论 0原文

我不知道为什么我的代码会崩溃。起初我以为这是因为 parseURL 为 requestHeaders 提供了 [] 。好吧，也许我只需要告诉它 resquestHeaders 应该是什么。好吧，我检查了从我的旧工作代码生成的 requestHeaders 。它也返回一个 []。所以现在我没有主意了。下面是旧的工作代码，遵循我在 GHCi 中尝试使用基于新管道的库的事情。

captureRawJson :: IO Response
captureRawJson = do
    nManager <- newManager
    jRequest <- parseUrl url :: (IO (Request IO))
    jResponse <- httpLbsRedirect jRequest nManager
    closeManager nManager
    return jResponse

上面的工作正常，这是我在迁移时一直尝试做的事情，以及我收到的错误。

Prelude Network.HTTP.Conduit> nManager <- newManager def
Prelude Network.HTTP.Conduit> jRequest <- parseUrl "https://10.69.69.1/cgi-bin/qaLinkEditor.cgi?json=1" :: (IO (Request IO))
Prelude Network.HTTP.Conduit> let response = httpLbs jRequest nManager
Prelude Network.HTTP.Conduit Control.Monad.Trans.Resource> runResourceT response
*** Exception: error unexpected packet: Handshake [ServerHelloDone]

正如您所看到的，它几乎是完全相同的代码。因此，我希望获得关于发生了哪些变化以及我应该更仔细地关注哪些内容的反馈。另外，如何检查在客户端代码和服务器之间来回发送的 http 标头？

原文

I don't know why my code breaks. At first I thought it was because parseURL gives [] for the requestHeaders. Okay, so maybe I just need to tell it what the resquestHeaders should be. Well, I examined the requestHeaders generated from my old, working code. It too, returns a []. So now I am out of ideas. Below is the old working code, followed my things I have been trying in GHCi with with new conduits based library.

captureRawJson :: IO Response
captureRawJson = do
    nManager <- newManager
    jRequest <- parseUrl url :: (IO (Request IO))
    jResponse <- httpLbsRedirect jRequest nManager
    closeManager nManager
    return jResponse

the above works fine, here's what I have been trying to do while migrating, and the error I receive.

Prelude Network.HTTP.Conduit> nManager <- newManager def
Prelude Network.HTTP.Conduit> jRequest <- parseUrl "https://10.69.69.1/cgi-bin/qaLinkEditor.cgi?json=1" :: (IO (Request IO))
Prelude Network.HTTP.Conduit> let response = httpLbs jRequest nManager
Prelude Network.HTTP.Conduit Control.Monad.Trans.Resource> runResourceT response
*** Exception: error unexpected packet: Handshake [ServerHelloDone]

So as you can see, it's almost exactly the same code. So I would like feedback on what has changed, and what I should be looking at more closely. Also, how can I examine the http headers being sent back and forth between my client code and the server?

分享到QQ

分享到微博