Permalink
Cannot retrieve contributors at this time
This commit does not belong to any branch on this repository, and may belong to a fork outside of the repository.
96 lines (84 sloc)
3.38 KB
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
package io.pager.lookup | |
import io.pager.PagerError | |
import io.pager.client.github.GitHubClient | |
import io.pager.client.telegram.TelegramClient | |
import io.pager.logging._ | |
import io.pager.subscription.Repository.{ Name, Version } | |
import io.pager.subscription.{ Repository, SubscriptionLogic } | |
import zio.macros.annotation.accessible | |
import zio.{ IO, RIO, Task, ZIO } | |
import scala.util.Try | |
@accessible(">") | |
trait ReleaseChecker { | |
val releaseChecker: ReleaseChecker.Service[Any] | |
} | |
object ReleaseChecker { | |
trait Service[R] { | |
def scheduleRefresh: RIO[R, Unit] | |
} | |
trait Live extends ReleaseChecker { | |
def logger: Logger.Service | |
def gitHubClient: GitHubClient.Service[Any] | |
def telegramClient: TelegramClient.Service[Any] | |
def subscriptionLogic: SubscriptionLogic.Service[Any] | |
override val releaseChecker: Service[Any] = new Service[Any] { | |
override def scheduleRefresh: Task[Unit] = | |
for { | |
_ <- logger.info("Getting latest repository versions") | |
repos <- subscriptionLogic.listRepositories | |
latestVersions <- latestRepositoryVersions(repos.keySet) | |
updatedVersions = newVersions(repos, latestVersions) | |
_ <- subscriptionLogic.updateVersions(updatedVersions) | |
statuses <- repositoryStates(updatedVersions) | |
_ <- broadcastUpdates(statuses) | |
_ <- logger.info("Finished repository refresh") | |
} yield () | |
} | |
private def repositoryStates(updatedVersions: Map[Name, Version]): Task[List[Repository]] = | |
ZIO.foreach(updatedVersions) { | |
case (name, version) => | |
subscriptionLogic | |
.listSubscribers(name) | |
.map(subscribers => Repository(name, version, subscribers)) | |
} | |
private def latestRepositoryVersions(repos: Set[Name]): IO[PagerError, Map[Name, Option[Version]]] = | |
ZIO | |
.traverse(repos) { name => | |
gitHubClient | |
.releases(name) | |
.map(releases => name -> Try(releases.maxBy(_.published_at).name).toOption) | |
} | |
.map(_.toMap) | |
private def newVersions( | |
latestKnownReleases: Map[Name, Option[Version]], | |
latestReleases: Map[Name, Option[Version]] | |
): Map[Name, Version] = | |
latestKnownReleases.flatMap { | |
case (name, latestKnownVersion) => | |
latestReleases | |
.get(name) | |
.collect { case Some(latestVersion) if !latestKnownVersion.contains(latestVersion) => name -> latestVersion } | |
} | |
private def broadcastUpdates(repos: List[Repository]): Task[Unit] = | |
ZIO | |
.foreach(repos) { repo => | |
val message = s"There is a new version of ${repo.name.value} available: ${repo.version.value}" | |
telegramClient.broadcastMessage(repo.subscribers, message) | |
} | |
.unit | |
} | |
object Live { | |
def make( | |
logger: Logger.Service, | |
gc: GitHubClient, | |
tc: TelegramClient, | |
sl: SubscriptionLogic | |
): ReleaseChecker.Service[Any] = | |
new ReleaseChecker.Live { | |
override def logger: Logger.Service = Logger.Test | |
override def gitHubClient: GitHubClient.Service[Any] = gc.gitHubClient | |
override def telegramClient: TelegramClient.Service[Any] = tc.telegramClient | |
override def subscriptionLogic: SubscriptionLogic.Service[Any] = sl.subscriptionLogic | |
}.releaseChecker | |
} | |
} |