import * as AsyncData from "@typed/async-data"
import { Effect, Fiber, Option, Ref, Scope, SubscriptionRef } from "effect"
import * as React from "react"
import { ReffuseExtension, type ReffuseHelpers } from "reffuse"
export interface UseQueryProps {
effect: () => Effect.Effect
readonly deps: React.DependencyList
}
export interface UseQueryResult {
readonly state: SubscriptionRef.SubscriptionRef>
readonly triggerRefresh: Effect.Effect
}
const interruptRunningQuery = (fiberRef: Ref.Ref>>) => fiberRef.pipe(
Effect.flatMap(Option.match({
onSome: Fiber.interrupt,
onNone: () => Effect.void,
}))
)
const runQuery = (
effect: Effect.Effect,
stateRef: Ref.Ref>,
) => effect.pipe(
Effect.matchCauseEffect({
onSuccess: v => Ref.set(stateRef, AsyncData.success(v)),
onFailure: c => Ref.set(stateRef, AsyncData.failure(c)),
})
)
export const QueryExtension = ReffuseExtension.make(() => ({
useQuery(
this: ReffuseHelpers.ReffuseHelpers,
props: UseQueryProps,
): UseQueryResult {
const context = this.useContext()
const fiberRef = this.useRef(Option.none>())
const stateRef = this.useRef(AsyncData.noData())
const triggerRefresh = React.useMemo(() => interruptRunningQuery(fiberRef).pipe(
Effect.andThen(Ref.update(stateRef, prev =>
AsyncData.isSuccess(prev) || AsyncData.isFailure(prev)
? AsyncData.refreshing(prev)
: AsyncData.loading()
)),
Effect.andThen(runQuery(props.effect(), stateRef)),
Effect.provide(context),
Effect.scoped,
Effect.forkDaemon,
Effect.flatMap(fiber => Ref.set(fiberRef, Option.some(fiber))),
), [stateRef, context, fiberRef])
this.useEffect(() => interruptRunningQuery(fiberRef).pipe(
Effect.andThen(Ref.set(stateRef, AsyncData.loading())),
Effect.andThen(runQuery(props.effect(), stateRef)),
Effect.scoped,
Effect.forkDaemon,
Effect.flatMap(fiber => Ref.set(fiberRef, Option.some(fiber))),
), [...props.deps, stateRef, fiberRef])
return React.useMemo(() => ({ state: stateRef, triggerRefresh }), [stateRef, triggerRefresh])
}
}))