Extract MonadAsyncError implementations

Extract MonadAsyncError implementations into their own projects to allow
reuse by multiple backends.

7 files changed, 160 insertions, 0 deletions

diff --git a/implementations/cats/src/main/scala/com/softwaremill/sttp/impl/cats/AsyncMonadAsyncError.scala b/implementations/cats/src/main/scala/com/softwaremill/sttp/impl/cats/AsyncMonadAsyncError.scala
new file mode 100644
index 0000000..02f9643
--- /dev/null
+++ b/implementations/cats/src/main/scala/com/softwaremill/sttp/impl/cats/AsyncMonadAsyncError.scala
@@ -0,0 +1,26 @@
+package com.softwaremill.sttp.impl.cats
+
+import _root_.cats.effect.{Async, Effect}
+import com.softwaremill.sttp.MonadAsyncError
+
+import scala.language.higherKinds
+
+class AsyncMonadAsyncError[F[_]](implicit F: Async[F]) extends MonadAsyncError[F] {
+
+  override def async[T](register: ((Either[Throwable, T]) => Unit) => Unit): F[T] =
+    F.async(register)
+
+  override def unit[T](t: T): F[T] = F.pure(t)
+
+  override def map[T, T2](fa: F[T])(f: (T) => T2): F[T2] = F.map(fa)(f)
+
+  override def flatMap[T, T2](fa: F[T])(f: (T) => F[T2]): F[T2] =
+    F.flatMap(fa)(f)
+
+  override def error[T](t: Throwable): F[T] = F.raiseError(t)
+
+  override protected def handleWrappedError[T](rt: F[T])(h: PartialFunction[Throwable, F[T]]): F[T] =
+    F.recoverWith(rt)(h)
+}
+
+class EffectMonadAsyncError[F[_]](implicit F: Effect[F]) extends AsyncMonadAsyncError[F]
diff --git a/implementations/cats/src/test/scala/com/softwaremill/sttp/impl/cats/package.scala b/implementations/cats/src/test/scala/com/softwaremill/sttp/impl/cats/package.scala
new file mode 100644
index 0000000..65be9f2
--- /dev/null
+++ b/implementations/cats/src/test/scala/com/softwaremill/sttp/impl/cats/package.scala
@@ -0,0 +1,13 @@
+package com.softwaremill.sttp.impl
+
+import _root_.cats.effect.IO
+import com.softwaremill.sttp.testing.streaming.ConvertToFuture
+
+import scala.concurrent.Future
+
+package object cats {
+
+  val convertToFuture: ConvertToFuture[IO] = new ConvertToFuture[IO] {
+    override def toFuture[T](value: IO[T]): Future[T] = value.unsafeToFuture()
+  }
+}
diff --git a/implementations/monix/src/main/scala/com/softwaremill/sttp/impl/monix/TaskMonadAsyncError.scala b/implementations/monix/src/main/scala/com/softwaremill/sttp/impl/monix/TaskMonadAsyncError.scala
new file mode 100644
index 0000000..1806100
--- /dev/null
+++ b/implementations/monix/src/main/scala/com/softwaremill/sttp/impl/monix/TaskMonadAsyncError.scala
@@ -0,0 +1,31 @@
+package com.softwaremill.sttp.impl.monix
+
+import com.softwaremill.sttp.MonadAsyncError
+import _root_.monix.eval.Task
+import _root_.monix.execution.Cancelable
+
+import scala.util.{Failure, Success}
+
+object TaskMonadAsyncError extends MonadAsyncError[Task] {
+  override def unit[T](t: T): Task[T] = Task.now(t)
+
+  override def map[T, T2](fa: Task[T])(f: (T) => T2): Task[T2] = fa.map(f)
+
+  override def flatMap[T, T2](fa: Task[T])(f: (T) => Task[T2]): Task[T2] =
+    fa.flatMap(f)
+
+  override def async[T](register: ((Either[Throwable, T]) => Unit) => Unit): Task[T] =
+    Task.async { (_, cb) =>
+      register {
+        case Left(t)  => cb(Failure(t))
+        case Right(t) => cb(Success(t))
+      }
+
+      Cancelable.empty
+    }
+
+  override def error[T](t: Throwable): Task[T] = Task.raiseError(t)
+
+  override protected def handleWrappedError[T](rt: Task[T])(h: PartialFunction[Throwable, Task[T]]): Task[T] =
+    rt.onErrorRecoverWith(h)
+}
diff --git a/implementations/monix/src/test/scala/com/softwaremill/sttp/impl/monix/MonixTestStreamingBackend.scala b/implementations/monix/src/test/scala/com/softwaremill/sttp/impl/monix/MonixTestStreamingBackend.scala
new file mode 100644
index 0000000..c6e44da
--- /dev/null
+++ b/implementations/monix/src/test/scala/com/softwaremill/sttp/impl/monix/MonixTestStreamingBackend.scala
@@ -0,0 +1,22 @@
+package com.softwaremill.sttp.impl.monix
+
+import java.nio.ByteBuffer
+
+import _root_.monix.eval.Task
+import _root_.monix.reactive.Observable
+import com.softwaremill.sttp.testing.streaming.{ConvertToFuture, TestStreamingBackend}
+
+trait MonixTestStreamingBackend extends TestStreamingBackend[Task, Observable[ByteBuffer]] {
+
+  override implicit def convertToFuture: ConvertToFuture[Task] = com.softwaremill.sttp.impl.monix.convertToFuture
+
+  override def bodyProducer(body: String): Observable[ByteBuffer] =
+    Observable.fromIterable(body.getBytes("utf-8").map(b => ByteBuffer.wrap(Array(b))))
+
+  override def bodyConsumer(stream: Observable[ByteBuffer]): Task[String] =
+    stream
+      .flatMap(bb => Observable.fromIterable(bb.array()))
+      .toListL
+      .map(bs => new String(bs.toArray, "utf8"))
+
+}
diff --git a/implementations/monix/src/test/scala/com/softwaremill/sttp/impl/monix/package.scala b/implementations/monix/src/test/scala/com/softwaremill/sttp/impl/monix/package.scala
new file mode 100644
index 0000000..25cf7e1
--- /dev/null
+++ b/implementations/monix/src/test/scala/com/softwaremill/sttp/impl/monix/package.scala
@@ -0,0 +1,15 @@
+package com.softwaremill.sttp.impl
+
+import scala.concurrent.Future
+
+import _root_.monix.eval.Task
+import com.softwaremill.sttp.testing.streaming.ConvertToFuture
+
+package object monix {
+
+  val convertToFuture: ConvertToFuture[Task] = new ConvertToFuture[Task] {
+    import _root_.monix.execution.Scheduler.Implicits.global
+
+    override def toFuture[T](value: Task[T]): Future[T] = value.runAsync
+  }
+}
diff --git a/implementations/scalaz/src/main/scala/com/softwaremill/sttp/impl/scalaz/TaskMonadAsyncError.scala b/implementations/scalaz/src/main/scala/com/softwaremill/sttp/impl/scalaz/TaskMonadAsyncError.scala
new file mode 100644
index 0000000..8535321
--- /dev/null
+++ b/implementations/scalaz/src/main/scala/com/softwaremill/sttp/impl/scalaz/TaskMonadAsyncError.scala
@@ -0,0 +1,28 @@
+package com.softwaremill.sttp.impl.scalaz
+
+import com.softwaremill.sttp.MonadAsyncError
+
+import scalaz.concurrent.Task
+import scalaz.{-\/, \/-}
+
+object TaskMonadAsyncError extends MonadAsyncError[Task] {
+  override def unit[T](t: T): Task[T] = Task.point(t)
+
+  override def map[T, T2](fa: Task[T])(f: (T) => T2): Task[T2] = fa.map(f)
+
+  override def flatMap[T, T2](fa: Task[T])(f: (T) => Task[T2]): Task[T2] =
+    fa.flatMap(f)
+
+  override def async[T](register: ((Either[Throwable, T]) => Unit) => Unit): Task[T] =
+    Task.async { cb =>
+      register {
+        case Left(t)  => cb(-\/(t))
+        case Right(t) => cb(\/-(t))
+      }
+    }
+
+  override def error[T](t: Throwable): Task[T] = Task.fail(t)
+
+  override protected def handleWrappedError[T](rt: Task[T])(h: PartialFunction[Throwable, Task[T]]): Task[T] =
+    rt.handleWith(h)
+}
diff --git a/implementations/scalaz/src/test/scala/com/softwaremill/sttp/impl/scalaz/package.scala b/implementations/scalaz/src/test/scala/com/softwaremill/sttp/impl/scalaz/package.scala
new file mode 100644
index 0000000..72dbf31
--- /dev/null
+++ b/implementations/scalaz/src/test/scala/com/softwaremill/sttp/impl/scalaz/package.scala
@@ -0,0 +1,25 @@
+package com.softwaremill.sttp.impl
+
+import com.softwaremill.sttp.testing.streaming.ConvertToFuture
+
+import _root_.scalaz.concurrent.Task
+import _root_.scalaz.{-\/, \/-}
+import scala.concurrent.{Future, Promise}
+import scala.util.{Failure, Success}
+
+package object scalaz {
+
+  val convertToFuture: ConvertToFuture[Task] = new ConvertToFuture[Task] {
+    // from https://github.com/Verizon/delorean
+    override def toFuture[T](value: Task[T]): Future[T] = {
+      val p = Promise[T]()
+
+      value.unsafePerformAsync {
+        case \/-(a) => p.complete(Success(a)); ()
+        case -\/(t) => p.complete(Failure(t)); ()
+      }
+
+      p.future
+    }
+  }
+}