• 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.{CacheLookupError, CacheStoreError}
import external.TeamThreeCacheApi
import external.library.IoAdapt.-->
import external.library.syntax.errorAdapt._
import external.library.syntax.ioAdapt._
import model.DomainModel._

import scala.concurrent.duration.FiniteDuration

sealed trait CacheIntegration[F[_]] {
  def cachedProduct: ProductId => F[Option[Product]]
  def storeProductToCache: ProductId => Product => F[Unit]
}

object CacheIntegration {
  @inline def apply[F[_]: Concurrent: Timer: IO --> *[_]](
    cache: TeamThreeCacheApi[ProductId, Product],
    t: FiniteDuration
  )(
    implicit CS: ContextShift[F]
  ): CacheIntegration[F] =
    new CacheIntegration[F] {
      def cachedProduct: ProductId => F[Option[Product]] =
        pId => CS.shift >> cache.get(pId).adaptedTo[F].timeout(t).narrowFailureTo[CacheLookupError]

      def storeProductToCache: ProductId => Product => F[Unit] =
        pId => p => CS.shift >> cache.put(pId)(p).adaptedTo[F].timeout(t).narrowFailureTo[CacheStoreError]
    }
}