1 files changed, 263 insertions, 0 deletions
diff --git a/okhttp-backend/src/main/scala/com/softwaremill/sttp/okhttp/OkHttpBackend.scala b/okhttp-backend/src/main/scala/com/softwaremill/sttp/okhttp/OkHttpBackend.scala
new file mode 100644
index 0000000..a4b6b54
--- /dev/null
+++ b/okhttp-backend/src/main/scala/com/softwaremill/sttp/okhttp/OkHttpBackend.scala
@@ -0,0 +1,263 @@
+package com.softwaremill.sttp.okhttp
+
+import java.io.IOException
+import java.nio.charset.Charset
+import java.util.concurrent.TimeUnit
+
+import com.softwaremill.sttp._
+import ResponseAs.EagerResponseHandler
+import okhttp3.internal.http.HttpMethod
+import okhttp3.{
+  Call,
+  Callback,
+  Headers,
+  MediaType,
+  OkHttpClient,
+  MultipartBody => OkHttpMultipartBody,
+  Request => OkHttpRequest,
+  RequestBody => OkHttpRequestBody,
+  Response => OkHttpResponse
+}
+import okio.{BufferedSink, Okio}
+
+import scala.collection.JavaConverters._
+import scala.concurrent.{ExecutionContext, Future}
+import scala.language.higherKinds
+import scala.util.{Failure, Try}
+
+abstract class OkHttpBackend[R[_], S](client: OkHttpClient,
+                                      closeClient: Boolean)
+    extends SttpBackend[R, S] {
+
+  private[okhttp] def convertRequest[T](
+      request: Request[T, S]): OkHttpRequest = {
+    val builder = new OkHttpRequest.Builder()
+      .url(request.uri.toString)
+
+    val body = bodyToOkHttp(request.body)
+    builder.method(request.method.m, body.getOrElse {
+      if (HttpMethod.requiresRequestBody(request.method.m))
+        OkHttpRequestBody.create(null, "")
+      else null
+    })
+
+    //OkHttp support automatic gzip compression
+    request.headers
+      .filter(_._1.equalsIgnoreCase(AcceptEncodingHeader) == false)
+      .foreach {
+        case (name, value) => builder.addHeader(name, value)
+      }
+
+    builder.build()
+  }
+
+  private def bodyToOkHttp[T](
+      body: RequestBody[S]): Option[OkHttpRequestBody] = {
+    body match {
+      case NoBody => None
+      case StringBody(b, _, _) =>
+        Some(OkHttpRequestBody.create(null, b))
+      case ByteArrayBody(b, _) =>
+        Some(OkHttpRequestBody.create(null, b))
+      case ByteBufferBody(b, _) =>
+        Some(OkHttpRequestBody.create(null, b.array()))
+      case InputStreamBody(b, _) =>
+        Some(new OkHttpRequestBody() {
+          override def writeTo(sink: BufferedSink): Unit =
+            sink.writeAll(Okio.source(b))
+          override def contentType(): MediaType = null
+        })
+      case PathBody(b, _) =>
+        Some(OkHttpRequestBody.create(null, b.toFile))
+      case StreamBody(s) =>
+        streamToRequestBody(s)
+      case MultipartBody(ps) =>
+        val b = new OkHttpMultipartBody.Builder()
+          .setType(OkHttpMultipartBody.FORM)
+        ps.foreach(addMultipart(b, _))
+        Some(b.build())
+    }
+  }
+
+  private def addMultipart(builder: OkHttpMultipartBody.Builder,
+                           mp: Multipart): Unit = {
+    val allHeaders = mp.additionalHeaders + (ContentDispositionHeader -> mp.contentDispositionHeaderValue)
+    val headers = Headers.of(allHeaders.asJava)
+
+    bodyToOkHttp(mp.body).foreach(builder.addPart(headers, _))
+  }
+
+  private[okhttp] def readResponse[T](
+      res: OkHttpResponse,
+      responseAs: ResponseAs[T, S]): R[Response[T]] = {
+
+    val code = res.code()
+
+    val body = if (codeIsSuccess(code)) {
+      responseMonad.map(responseHandler(res).handle(responseAs, responseMonad))(
+        Right(_))
+    } else {
+      responseMonad.map(responseHandler(res).handle(asString, responseMonad))(
+        Left(_))
+    }
+
+    val headers = res
+      .headers()
+      .names()
+      .asScala
+      .flatMap(name => res.headers().values(name).asScala.map((name, _)))
+
+    responseMonad.map(body)(Response(_, res.code(), headers.toList, Nil))
+  }
+
+  private def responseHandler(res: OkHttpResponse) =
+    new EagerResponseHandler[S] {
+      override def handleBasic[T](bra: BasicResponseAs[T, S]): Try[T] =
+        bra match {
+          case IgnoreResponse =>
+            Try(res.close())
+          case ResponseAsString(encoding) =>
+            val body = Try(
+              res.body().source().readString(Charset.forName(encoding)))
+            res.close()
+            body
+          case ResponseAsByteArray =>
+            val body = Try(res.body().bytes())
+            res.close()
+            body
+          case ras @ ResponseAsStream() =>
+            responseBodyToStream(res).map(ras.responseIsStream)
+          case ResponseAsFile(file, overwrite) =>
+            val body = Try(
+              ResponseAs.saveFile(file, res.body().byteStream(), overwrite))
+            res.close()
+            body
+        }
+    }
+
+  def streamToRequestBody(stream: S): Option[OkHttpRequestBody] = None
+
+  def responseBodyToStream(res: OkHttpResponse): Try[S] =
+    Failure(new IllegalStateException("Streaming isn't supported"))
+
+  override def close(): Unit = if (closeClient) {
+    client.dispatcher().executorService().shutdown()
+  }
+}
+
+object OkHttpBackend {
+
+  private[okhttp] def defaultClient(
+      readTimeout: Long,
+      options: SttpBackendOptions): OkHttpClient = {
+    var clientBuilder = new OkHttpClient.Builder()
+      .followRedirects(false)
+      .followSslRedirects(false)
+      .connectTimeout(options.connectionTimeout.toMillis, TimeUnit.MILLISECONDS)
+      .readTimeout(readTimeout, TimeUnit.MILLISECONDS)
+
+    clientBuilder = options.proxy match {
+      case None    => clientBuilder
+      case Some(p) => clientBuilder.proxy(p.asJava)
+    }
+
+    clientBuilder.build()
+  }
+
+  private[okhttp] def updateClientIfCustomReadTimeout[T, S](
+      r: Request[T, S],
+      client: OkHttpClient): OkHttpClient = {
+    val readTimeout = r.options.readTimeout
+    if (readTimeout == DefaultReadTimeout) client
+    else
+      client
+        .newBuilder()
+        .readTimeout(if (readTimeout.isFinite()) readTimeout.toMillis else 0,
+                     TimeUnit.MILLISECONDS)
+        .build()
+
+  }
+}
+
+class OkHttpSyncBackend private (client: OkHttpClient, closeClient: Boolean)
+    extends OkHttpBackend[Id, Nothing](client, closeClient) {
+  override def send[T](r: Request[T, Nothing]): Response[T] = {
+    val request = convertRequest(r)
+    val response = OkHttpBackend
+      .updateClientIfCustomReadTimeout(r, client)
+      .newCall(request)
+      .execute()
+    readResponse(response, r.response)
+  }
+
+  override def responseMonad: MonadError[Id] = IdMonad
+}
+
+object OkHttpSyncBackend {
+  private def apply(client: OkHttpClient,
+                    closeClient: Boolean): SttpBackend[Id, Nothing] =
+    new FollowRedirectsBackend[Id, Nothing](
+      new OkHttpSyncBackend(client, closeClient))
+
+  def apply(options: SttpBackendOptions = SttpBackendOptions.Default)
+    : SttpBackend[Id, Nothing] =
+    OkHttpSyncBackend(
+      OkHttpBackend.defaultClient(DefaultReadTimeout.toMillis, options),
+      closeClient = true)
+
+  def usingClient(client: OkHttpClient): SttpBackend[Id, Nothing] =
+    OkHttpSyncBackend(client, closeClient = false)
+}
+
+abstract class OkHttpAsyncBackend[R[_], S](client: OkHttpClient,
+                                           rm: MonadAsyncError[R],
+                                           closeClient: Boolean)
+    extends OkHttpBackend[R, S](client, closeClient) {
+  override def send[T](r: Request[T, S]): R[Response[T]] = {
+    val request = convertRequest(r)
+
+    rm.flatten(rm.async[R[Response[T]]] { cb =>
+      def success(r: R[Response[T]]) = cb(Right(r))
+      def error(t: Throwable) = cb(Left(t))
+
+      OkHttpBackend
+        .updateClientIfCustomReadTimeout(r, client)
+        .newCall(request)
+        .enqueue(new Callback {
+          override def onFailure(call: Call, e: IOException): Unit =
+            error(e)
+
+          override def onResponse(call: Call, response: OkHttpResponse): Unit =
+            try success(readResponse(response, r.response))
+            catch { case e: Exception => error(e) }
+        })
+    })
+  }
+
+  override def responseMonad: MonadError[R] = rm
+}
+
+class OkHttpFutureBackend private (client: OkHttpClient, closeClient: Boolean)(
+    implicit ec: ExecutionContext)
+    extends OkHttpAsyncBackend[Future, Nothing](client,
+                                                new FutureMonad,
+                                                closeClient) {}
+
+object OkHttpFutureBackend {
+  private def apply(client: OkHttpClient, closeClient: Boolean)(
+      implicit ec: ExecutionContext): SttpBackend[Future, Nothing] =
+    new FollowRedirectsBackend[Future, Nothing](
+      new OkHttpFutureBackend(client, closeClient))
+
+  def apply(options: SttpBackendOptions = SttpBackendOptions.Default)(
+      implicit ec: ExecutionContext = ExecutionContext.Implicits.global)
+    : SttpBackend[Future, Nothing] =
+    OkHttpFutureBackend(
+      OkHttpBackend.defaultClient(DefaultReadTimeout.toMillis, options),
+      closeClient = true)
+
+  def usingClient(client: OkHttpClient)(implicit ec: ExecutionContext =
+                                          ExecutionContext.Implicits.global)
+    : SttpBackend[Future, Nothing] =
+    OkHttpFutureBackend(client, closeClient = false)
+}