pat*_*rit 5 curl scala http4s http4s-circe cats-effect
我尝试使用以下代码http4s v0.19.0:
import cats.effect._
def usingHttp4s(uri: String, bearerToken: String)(implicit cs: ContextShift[IO]): String = {
import scala.concurrent.ExecutionContext
import org.http4s.client.dsl.io._
import org.http4s.headers._
import org.http4s.Method._
import org.http4s._
import org.http4s.client._
import org.http4s.client.middleware._
val blockingEC = ExecutionContext.fromExecutorService(Executors.newFixedThreadPool(5))
val middlewares = Seq(
RequestLogger[IO](logHeaders = true, logBody = true, redactHeadersWhen = _ => false)(_),
FollowRedirect[IO](maxRedirects = 5)(_)
)
val client = middlewares.foldRight(JavaNetClientBuilder(blockingEC).create[IO])(_.apply(_))
val req = GET(
Uri.unsafeFromString(uri),
Authorization(Credentials.Token(AuthScheme.Bearer, bearerToken))
)
client.expect[String](req).unsafeRunSync()
}
Run Code Online (Sandbox Code Playgroud)
我收到以下错误:
[error] (run-main-0) org.http4s.client.UnexpectedStatus: unexpected HTTP status: 401 Unauthorized
[error] org.http4s.client.UnexpectedStatus: unexpected HTTP status: 401 Unauthorized
Run Code Online (Sandbox Code Playgroud)
不仅如此,我的程序永远不会退出(我必须关闭一些客户端!?),即使我连接了一个记录中间件,它也从未打印过请求
我接下来尝试了@ li-haoyi的请求库,这没有返回任何错误:
def usingLiHaoyiRequest(uri: String, bearerToken: String): String =
requests.get(uri, headers = Iterable("Authorization" -> s"Bearer $bearerToken")).text()
Run Code Online (Sandbox Code Playgroud)
上面的代码适用于相同uri和相同,baseToken所以它不能是我的令牌是错误的.为了加倍肯定,我尝试了卷曲:
curl -L -H "Authorization: Bearer ${BEARER}" ${URI}
Run Code Online (Sandbox Code Playgroud)
这个问题也发生在http4s v0.18.19(即使使用显式Json和接受标头):
import io.circle.Json
def usingHttp4s(uri: String, bearerToken: String): Json = {
import org.http4s.client.dsl.io._
import org.http4s.headers._
import org.http4s.Method._
import org.http4s._
import org.http4s.client.blaze.Http1Client
import org.http4s.client.middleware._
import org.http4s.circe._
import org.http4s.MediaType._
val program = for {
c <- Http1Client[IO]()
client = FollowRedirect(maxRedirects = 5)(c)
req = GET(
Uri.unsafeFromString(uri),
Authorization(Credentials.Token(AuthScheme.Bearer, bearerToken)),
Accept(`application/json`)
)
res <- client.expect[Json](req)
} yield res
program.unsafeRunSync()
}
Run Code Online (Sandbox Code Playgroud)
所以我的问题是:
requests和curl工作,但http4s给我401同样的要求?http4s版本永远不会退出?