effect-app 4.0.0-beta.30 → 4.0.0-beta.301

package/src/RequestScopedDependencies.ts

@@ -0,0 +1,45 @@
+import * as Data from "effect/Data"
+import type * as Scope from "effect/Scope"
+import * as Context from "./Context.ts"
+import * as Effect from "./Effect.ts"
+import * as Layer from "./Layer.ts"
+
+export type Root = "root"
+
+export class RequestScopedDependencyNotStartedError extends Data.TaggedError(
+  "RequestScopedDependencyNotStartedError"
+)<{ readonly key: string }> {}
+
+export interface RequestScopedDependency<Service, E = never, R = never> extends Context.Reference<Service | Root> {
+  readonly current: Effect.Effect<Service, RequestScopedDependencyNotStartedError>
+  readonly layer: Layer.Layer<never, E, R>
+}
+
+export const access = <Service>(
+  dependency: Context.Reference<Service | Root>,
+  key: string
+): Effect.Effect<Service, RequestScopedDependencyNotStartedError> =>
+  dependency.pipe(
+    Effect.filterOrFail((_): _ is Service => _ !== "root", () => new RequestScopedDependencyNotStartedError({ key }))
+  )
+
+export const make = <Service, E = never, R = never>(
+  key: string,
+  service: Effect.Effect<Service, E, R>
+): RequestScopedDependency<Service, E, Exclude<R, Scope.Scope>> => {
+  const dependency = Context.Reference<Service | Root>(key, { defaultValue: () => "root" })
+  return Object.assign(dependency, {
+    current: access(dependency, key),
+    layer: Layer.effect(dependency, service)
+  })
+}
+
+export const layer = <
+  Deps extends readonly [RequestScopedDependency<any, any, any>, ...Array<RequestScopedDependency<any, any, any>>]
+>(
+  ...dependencies: Deps
+): Layer.Layer<
+  never,
+  { [K in keyof Deps]: Deps[K] extends RequestScopedDependency<any, infer E, any> ? E : never }[number],
+  { [K in keyof Deps]: Deps[K] extends RequestScopedDependency<any, any, infer R> ? R : never }[number]
+> => dependencies.map((_) => _.layer).reduce((acc, l) => Layer.merge(acc, l)) as any