• Example Search
• Project Search

• Java
• Python
• JavaScript
• TypeScript
• C++
• Scala
• Blog

• http4s-poc-api-master
  • .github
    • CODEOWNERS
  • src
    • main
      • resources
        • logback.xml
      • scala
        • integration
          • ProductIntegration.scala
          • CacheIntegration.scala
          • UserIntegration.scala
        • external
          • library
            • CirceModule.scala
            • IoAdapt.scala
            • instances
              • ThrowableInstances.scala
              • package.scala
              • TaggedInstances.scala
            • package.scala
            • ThrowableMap.scala
            • syntax
              • package.scala
              • ResponseSyntax.scala
              • ErrorAdaptSyntax.scala
              • IoAdaptSyntax.scala
            • newtype.scala
          • TeamThreeCacheApi.scala
          • TeamTwoHttpApi.scala
          • TeamOneHttpApi.scala
        • service
          • package.scala
          • PriceService.scala
          • PreferenceFetcher.scala
          • ProductRepo.scala
          • PriceCalculator.scala
        • server
          • HealthCheckRoutes.scala
          • Main.scala
          • PriceRoutes.scala
        • model
          • syntax
            • package.scala
            • DomainModelSyntax.scala
          • DomainModelCodecs.scala
          • DomainModel.scala
        • errors
          • PriceServiceError.scala
    • test
      • resources
        • logback-test.xml
      • scala
        • PriceHttpApiTests.scala
        • typeclasses
          • RunSync.scala
        • syntax
          • ResponseVerificationSyntax.scala
          • package.scala
          • Http4sServiceSyntax.scala
        • external
          • NewtypeTests.scala
        • HealthCheckHttpApiTests.scala
        • Fixtures.scala
        • interpreters
          • TestTeamTwoHttpApi.scala
          • TestTeamThreeCacheApi.scala
          • TestTeamOneHttpApi.scala
  • LICENSE
  • project
    • build.properties
    • plugins.sbt
  • .travis.yml
  • README.md
  • .scalafmt.conf
  • build.sbt
  • .gitignore

package integration

import cats.effect.syntax.concurrent._
import cats.effect.{Concurrent, ContextShift, IO, Timer}
import cats.syntax.flatMap._
import errors.PriceServiceError.{ProductErr, ProductPriceErr}
import external._
import external.library.IoAdapt.-->
import external.library.syntax.errorAdapt._
import external.library.syntax.ioAdapt._
import model.DomainModel._

import scala.concurrent.Future
import scala.concurrent.duration.FiniteDuration

sealed trait ProductIntegration[F[_]] {
  def product: ProductId => F[Option[Product]]
  def productPrice: Product => UserPreferences => F[Price]
}

object ProductIntegration {
  @inline def apply[F[_]: Concurrent: Timer: IO --> *[_]: Future --> *[_]](
    productDep: TeamTwoHttpApi,
    pricesDep: TeamOneHttpApi,
    t: FiniteDuration
  )(
    implicit CS: ContextShift[F]
  ): ProductIntegration[F] =
    new ProductIntegration[F] {
      def product: ProductId => F[Option[Product]] = { ps =>
        CS.shift >> productDep.product(ps).adaptedTo[F].timeout(t).narrowFailureTo[ProductErr]
      }

      def productPrice: Product => UserPreferences => F[Price] = { p => pref =>
        CS.shift >> pricesDep.productPrice(p)(pref).adaptedTo[F].timeout(t).narrowFailureTo[ProductPriceErr]
      }
    }
}