effect-cqrs 0.0.0-stage → 0.2.0

package/dist/AggregateService.d.ts

@@ -0,0 +1,154 @@
+/**
+ * Runs an aggregate against the {@link EventStore}: the `command`, `read-model`
+ * and `history` actions of moleculer-cqrs, as a typed service.
+ */
+import { Cause, type DateTime, Effect, Schema, type Scope } from "effect";
+import { KeyValueStore } from "effect/persistence";
+import * as Aggregate from "./Aggregate.ts";
+import { ConcurrencyConflict, EventStore, type EventStoreError, type StoredEvent } from "./EventStore.ts";
+import { Metadata } from "./Metadata.ts";
+declare const UnknownCommand_base: Schema.Class<UnknownCommand, Schema.TaggedStruct<"UnknownCommand", {
+    readonly aggregateName: Schema.String;
+    readonly type: Schema.String;
+}>, Cause.YieldableError>;
+export declare class UnknownCommand extends UnknownCommand_base {
+}
+declare const InvalidCommand_base: Schema.Class<InvalidCommand, Schema.TaggedStruct<"InvalidCommand", {
+    readonly aggregateName: Schema.String;
+    readonly type: Schema.String;
+    readonly message: Schema.String;
+}>, Cause.YieldableError>;
+export declare class InvalidCommand extends InvalidCommand_base {
+}
+declare const EventDecodeError_base: Schema.Class<EventDecodeError, Schema.TaggedStruct<"EventDecodeError", {
+    readonly aggregateName: Schema.String;
+    readonly aggregateId: Schema.String;
+    readonly version: Schema.Int;
+    readonly type: Schema.String;
+    readonly schemaVersion: Schema.Int;
+    readonly message: Schema.String;
+}>, Cause.YieldableError>;
+/**
+ * A stored event doesn't match the schema of its version, or was written in a
+ * version the aggregate doesn't declare. Old shapes are declared with `EventVersions`.
+ */
+export declare class EventDecodeError extends EventDecodeError_base {
+}
+export type ReadError = EventStoreError | EventDecodeError;
+/** How a command can fail, on top of the errors its own handler declares. */
+export type CommandFailure = ConcurrencyConflict | InvalidCommand | ReadError;
+export interface CommandResult<Event> {
+    readonly aggregateName: string;
+    readonly aggregateId: string;
+    /** The stream version after the command. */
+    readonly version: number;
+    /** The store position of the last event, to pass to `ViewModels.caughtUp`. */
+    readonly position: number;
+    readonly events: ReadonlyArray<Event>;
+    /** Recorded on the events, see `Causation`. */
+    readonly correlationId: string;
+}
+export interface HistoryEntry<Event> {
+    readonly version: number;
+    readonly timestamp: DateTime.Utc;
+    readonly type: string;
+    readonly correlationId: string | null;
+    readonly causationId: string | null;
+    readonly metadata: Metadata;
+    readonly payload?: Event;
+}
+export interface AggregateService<A extends Aggregate.Any> {
+    readonly aggregate: A;
+    /** One typed function per command. */
+    readonly commands: {
+        readonly [K in Aggregate.CommandName<A>]: (aggregateId: string, payload: Aggregate.Payload<A, K>) => Effect.Effect<CommandResult<Aggregate.Event<A>>, Aggregate.CommandError<A, K> | CommandFailure>;
+    };
+    /** Runs a `{ aggregateId, type, payload }` envelope received as JSON from outside the process. */
+    readonly dispatch: (input: unknown) => Effect.Effect<CommandResult<Aggregate.Event<A>>, Aggregate.CommandError<A> | CommandFailure | UnknownCommand>;
+    /** Materializes the state on the fly, optionally as it was before `finishTime`. */
+    readonly readModel: (aggregateId: string, options?: {
+        readonly finishTime?: DateTime.Utc | undefined;
+    }) => Effect.Effect<Aggregate.State<A>, ReadError>;
+    /** Lists the events of one aggregate, with their decoded payload when `payload` is set. */
+    readonly history: (aggregateId: string, options?: {
+        readonly payload?: boolean | undefined;
+        readonly startTime?: DateTime.Utc | undefined;
+        readonly finishTime?: DateTime.Utc | undefined;
+    }) => Effect.Effect<ReadonlyArray<HistoryEntry<Aggregate.Event<A>>>, ReadError>;
+}
+/**
+ * Decodes a stored event with the schema of the aggregate it belongs to. An
+ * event stored in an older version is upcast to the current one on the way.
+ */
+export declare const makeEventDecoder: <A extends Aggregate.Any>(aggregate: A) => (stored: StoredEvent) => Effect.Effect<Aggregate.Event<A>, EventDecodeError>;
+/** Encodes events into the JSON form the store keeps, in the current version of their schema. */
+export declare const makeEventEncoder: <A extends Aggregate.Any>(aggregate: A) => (event: Aggregate.Event<A>) => Effect.Effect<{
+    type: any;
+    payload: Schema.Json;
+    schemaVersion: number;
+}, never, never>;
+/** Saves the state of each aggregate every so often, so a cold start replays only what came after. */
+export interface SnapshotOptions<State> {
+    /** How many events to fold after a snapshot before saving the next one. */
+    readonly every: number;
+    /** How the state is stored. It is encoded as JSON. */
+    readonly schema: Schema.Codec<State, any, never, never>;
+    /**
+     * Part of every key. Change it whenever the state or the projection changes,
+     * so that snapshots of the old state are ignored and rebuilt from the log.
+     * Defaults to `1`.
+     */
+    readonly version?: string | number | undefined;
+}
+export interface Options {
+    /** How many times a command is re-decided after losing a race. Defaults to 5. */
+    readonly maxRetries?: number | undefined;
+    /** How many aggregates keep their state in memory between commands. Defaults to 10,000. */
+    readonly stateCacheSize?: number | undefined;
+}
+/**
+ * The names of the metrics every aggregate service records through Effect's
+ * `Metric` module. Each series carries an `aggregate` attribute with the
+ * aggregate's name. Read them with `Metric.snapshot`, or send them on with an
+ * exporter such as `OtlpMetrics` from `effect/observability`.
+ */
+export declare const MetricNames: {
+    /**
+     * Timer: how long a command took, including its wait for an earlier command on
+     * the same stream, by `command` and `outcome`. The outcome is `success`, the tag
+     * of the error, `defect` or `interrupted`. A payload that doesn't decode, or a
+     * type the aggregate doesn't know, fails before this point and isn't recorded.
+     */
+    readonly commandDuration: "cqrs_command_duration";
+    /**
+     * Counter: where loading the current state found a state to start from, by
+     * `source`: `memory`, `snapshot`, or `replay` when it starts from the first event.
+     */
+    readonly stateLoads: "cqrs_state_loads_total";
+    /** Histogram: how many events a load read from the store on top of that state. */
+    readonly eventsReplayed: "cqrs_events_replayed";
+    /** Gauge: how many states are remembered in memory. */
+    readonly stateCacheSize: "cqrs_state_cache_size";
+    /** Counter: states dropped from memory to make room for others, see `stateCacheSize`. */
+    readonly stateCacheEvictions: "cqrs_state_cache_evictions_total";
+    /** Counter: snapshots saved, by `result`: `success` or `failure`. */
+    readonly snapshotSaves: "cqrs_snapshot_saves_total";
+    /** Counter: snapshots that couldn't be read, so the stream was replayed instead. */
+    readonly snapshotReadFailures: "cqrs_snapshot_read_failures_total";
+    /** Counter: appends that lost a race with a writer in another process. Each is retried until `maxRetries` runs out. */
+    readonly concurrencyConflicts: "cqrs_concurrency_conflicts_total";
+};
+/**
+ * Builds the service for one aggregate. With `snapshots` it saves states through
+ * a `KeyValueStore` from `effect/persistence`, which has layers for memory, files,
+ * SQL and the browser's `localStorage`. Saves run in the background, and closing
+ * the scope waits for the ones still running.
+ */
+export declare const make: {
+    <A extends Aggregate.Any>(aggregate: A, options: Options & {
+        readonly snapshots: SnapshotOptions<Aggregate.State<A>>;
+    }): Effect.Effect<AggregateService<A>, never, EventStore | KeyValueStore.KeyValueStore | Scope.Scope | Aggregate.Context<A>>;
+    <A extends Aggregate.Any>(aggregate: A, options?: Options): Effect.Effect<AggregateService<A>, never, EventStore | Aggregate.Context<A>>;
+};
+export {};
+//# sourceMappingURL=AggregateService.d.ts.map

package/dist/AggregateService.d.ts.map

@@ -0,0 +1 @@
+{"version":3,"file":"AggregateService.d.ts","sourceRoot":"","sources":["../src/AggregateService.ts"],"names":[],"mappings":"AAAA;;;GAGG;AACH,OAAO,EAEL,KAAK,EAEL,KAAK,QAAQ,EAEb,MAAM,EAON,MAAM,EACN,KAAK,KAAK,EAGX,MAAM,QAAQ,CAAA;AACf,OAAO,EAAE,aAAa,EAAE,MAAM,oBAAoB,CAAA;AAClD,OAAO,KAAK,SAAS,MAAM,gBAAgB,CAAA;AAE3C,OAAO,EACL,mBAAmB,EAEnB,UAAU,EACV,KAAK,eAAe,EACpB,KAAK,WAAW,EACjB,MAAM,iBAAiB,CAAA;AAExB,OAAO,EAAmB,QAAQ,EAAE,MAAM,eAAe,CAAA;;;;;AAEzD,qBAAa,cAAe,SAAQ,mBAGlC;CAAG;;;;;;AAEL,qBAAa,cAAe,SAAQ,mBAIlC;CAAG;;;;;;;;;AAEL;;;GAGG;AACH,qBAAa,gBAAiB,SAAQ,qBAOpC;CAAG;AAEL,MAAM,MAAM,SAAS,GAAG,eAAe,GAAG,gBAAgB,CAAA;AAE1D,6EAA6E;AAC7E,MAAM,MAAM,cAAc,GAAG,mBAAmB,GAAG,cAAc,GAAG,SAAS,CAAA;AAE7E,MAAM,WAAW,aAAa,CAAC,KAAK;IAClC,QAAQ,CAAC,aAAa,EAAE,MAAM,CAAA;IAC9B,QAAQ,CAAC,WAAW,EAAE,MAAM,CAAA;IAC5B,4CAA4C;IAC5C,QAAQ,CAAC,OAAO,EAAE,MAAM,CAAA;IACxB,8EAA8E;IAC9E,QAAQ,CAAC,QAAQ,EAAE,MAAM,CAAA;IACzB,QAAQ,CAAC,MAAM,EAAE,aAAa,CAAC,KAAK,CAAC,CAAA;IACrC,+CAA+C;IAC/C,QAAQ,CAAC,aAAa,EAAE,MAAM,CAAA;CAC/B;AAED,MAAM,WAAW,YAAY,CAAC,KAAK;IACjC,QAAQ,CAAC,OAAO,EAAE,MAAM,CAAA;IACxB,QAAQ,CAAC,SAAS,EAAE,QAAQ,CAAC,GAAG,CAAA;IAChC,QAAQ,CAAC,IAAI,EAAE,MAAM,CAAA;IACrB,QAAQ,CAAC,aAAa,EAAE,MAAM,GAAG,IAAI,CAAA;IACrC,QAAQ,CAAC,WAAW,EAAE,MAAM,GAAG,IAAI,CAAA;IACnC,QAAQ,CAAC,QAAQ,EAAE,QAAQ,CAAA;IAC3B,QAAQ,CAAC,OAAO,CAAC,EAAE,KAAK,CAAA;CACzB;AAED,MAAM,WAAW,gBAAgB,CAAC,CAAC,SAAS,SAAS,CAAC,GAAG;IACvD,QAAQ,CAAC,SAAS,EAAE,CAAC,CAAA;IACrB,sCAAsC;IACtC,QAAQ,CAAC,QAAQ,EAAE;QACjB,QAAQ,EAAE,CAAC,IAAI,SAAS,CAAC,WAAW,CAAC,CAAC,CAAC,GAAG,CACxC,WAAW,EAAE,MAAM,EACnB,OAAO,EAAE,SAAS,CAAC,OAAO,CAAC,CAAC,EAAE,CAAC,CAAC,KAC7B,MAAM,CAAC,MAAM,CAAC,aAAa,CAAC,SAAS,CAAC,KAAK,CAAC,CAAC,CAAC,CAAC,EAAE,SAAS,CAAC,YAAY,CAAC,CAAC,EAAE,CAAC,CAAC,GAAG,cAAc,CAAC;KACrG,CAAA;IACD,kGAAkG;IAClG,QAAQ,CAAC,QAAQ,EAAE,CACjB,KAAK,EAAE,OAAO,KACX,MAAM,CAAC,MAAM,CAAC,aAAa,CAAC,SAAS,CAAC,KAAK,CAAC,CAAC,CAAC,CAAC,EAAE,SAAS,CAAC,YAAY,CAAC,CAAC,CAAC,GAAG,cAAc,GAAG,cAAc,CAAC,CAAA;IAClH,mFAAmF;IACnF,QAAQ,CAAC,SAAS,EAAE,CAClB,WAAW,EAAE,MAAM,EACnB,OAAO,CAAC,EAAE;QAAE,QAAQ,CAAC,UAAU,CAAC,EAAE,QAAQ,CAAC,GAAG,GAAG,SAAS,CAAA;KAAE,KACzD,MAAM,CAAC,MAAM,CAAC,SAAS,CAAC,KAAK,CAAC,CAAC,CAAC,EAAE,SAAS,CAAC,CAAA;IACjD,2FAA2F;IAC3F,QAAQ,CAAC,OAAO,EAAE,CAChB,WAAW,EAAE,MAAM,EACnB,OAAO,CAAC,EAAE;QACR,QAAQ,CAAC,OAAO,CAAC,EAAE,OAAO,GAAG,SAAS,CAAA;QACtC,QAAQ,CAAC,SAAS,CAAC,EAAE,QAAQ,CAAC,GAAG,GAAG,SAAS,CAAA;QAC7C,QAAQ,CAAC,UAAU,CAAC,EAAE,QAAQ,CAAC,GAAG,GAAG,SAAS,CAAA;KAC/C,KACE,MAAM,CAAC,MAAM,CAAC,aAAa,CAAC,YAAY,CAAC,SAAS,CAAC,KAAK,CAAC,CAAC,CAAC,CAAC,CAAC,EAAE,SAAS,CAAC,CAAA;CAC/E;AAkBD;;;GAGG;AACH,eAAO,MAAM,gBAAgB,GAAI,CAAC,SAAS,SAAS,CAAC,GAAG,aAAa,CAAC,cAMpD,WAAW,KAAG,MAAM,CAAC,MAAM,CAAC,SAAS,CAAC,KAAK,CAAC,CAAC,CAAC,EAAE,gBAAgB,CAoBjF,CAAA;AAED,iGAAiG;AACjG,eAAO,MAAM,gBAAgB,GAAI,CAAC,SAAS,SAAS,CAAC,GAAG,aAAa,CAAC,aAGrD,SAAS,CAAC,KAAK,CAAC,CAAC,CAAC;;aAMP,MAAM,CAAC,IAAI;;gBAItC,CAAA;AAED,sGAAsG;AACtG,MAAM,WAAW,eAAe,CAAC,KAAK;IACpC,2EAA2E;IAC3E,QAAQ,CAAC,KAAK,EAAE,MAAM,CAAA;IACtB,sDAAsD;IACtD,QAAQ,CAAC,MAAM,EAAE,MAAM,CAAC,KAAK,CAAC,KAAK,EAAE,GAAG,EAAE,KAAK,EAAE,KAAK,CAAC,CAAA;IACvD;;;;OAIG;IACH,QAAQ,CAAC,OAAO,CAAC,EAAE,MAAM,GAAG,MAAM,GAAG,SAAS,CAAA;CAC/C;AAED,MAAM,WAAW,OAAO;IACtB,iFAAiF;IACjF,QAAQ,CAAC,UAAU,CAAC,EAAE,MAAM,GAAG,SAAS,CAAA;IACxC,2FAA2F;IAC3F,QAAQ,CAAC,cAAc,CAAC,EAAE,MAAM,GAAG,SAAS,CAAA;CAC7C;AAUD;;;;;GAKG;AACH,eAAO,MAAM,WAAW;IACtB;;;;;OAKG;aACH,eAAe,EAAE,uBAAuB;IACxC;;;OAGG;aACH,UAAU,EAAE,wBAAwB;IACpC,kFAAkF;aAClF,cAAc,EAAE,sBAAsB;IACtC,uDAAuD;aACvD,cAAc,EAAE,uBAAuB;IACvC,yFAAyF;aACzF,mBAAmB,EAAE,kCAAkC;IACvD,qEAAqE;aACrE,aAAa,EAAE,2BAA2B;IAC1C,oFAAoF;aACpF,oBAAoB,EAAE,mCAAmC;IACzD,uHAAuH;aACvH,oBAAoB,EAAE,kCAAkC;CAChD,CAAA;AA8bV;;;;;GAKG;AACH,eAAO,MAAM,IAAI,EAAE;IACjB,CAAC,CAAC,SAAS,SAAS,CAAC,GAAG,EACtB,SAAS,EAAE,CAAC,EACZ,OAAO,EAAE,OAAO,GAAG;QAAE,QAAQ,CAAC,SAAS,EAAE,eAAe,CAAC,SAAS,CAAC,KAAK,CAAC,CAAC,CAAC,CAAC,CAAA;KAAE,GAC7E,MAAM,CAAC,MAAM,CACd,gBAAgB,CAAC,CAAC,CAAC,EACnB,KAAK,EACL,UAAU,GAAG,aAAa,CAAC,aAAa,GAAG,KAAK,CAAC,KAAK,GAAG,SAAS,CAAC,OAAO,CAAC,CAAC,CAAC,CAC9E,CAAA;IACD,CAAC,CAAC,SAAS,SAAS,CAAC,GAAG,EACtB,SAAS,EAAE,CAAC,EACZ,OAAO,CAAC,EAAE,OAAO,GAChB,MAAM,CAAC,MAAM,CAAC,gBAAgB,CAAC,CAAC,CAAC,EAAE,KAAK,EAAE,UAAU,GAAG,SAAS,CAAC,OAAO,CAAC,CAAC,CAAC,CAAC,CAAA;CAC3D,CAAA"}

package/dist/AggregateService.js

@@ -0,0 +1,407 @@
+/**
+ * Runs an aggregate against the {@link EventStore}: the `command`, `read-model`
+ * and `history` actions of moleculer-cqrs, as a typed service.
+ */
+import { Array as Arr, Cause, Context, Duration, Effect, Exit, FiberSet, Metric, Option, Predicate, Schedule, Schema, Semaphore, Stream } from "effect";
+import { KeyValueStore } from "effect/persistence";
+import * as Aggregate from "./Aggregate.js";
+import { CurrentCausation } from "./Causation.js";
+import { ConcurrencyConflict, EventStore } from "./EventStore.js";
+import * as EventVersions from "./EventVersions.js";
+import { CurrentMetadata, Metadata } from "./Metadata.js";
+export class UnknownCommand extends Schema.TaggedError()("UnknownCommand", {
+    aggregateName: Schema.String,
+    type: Schema.String
+}) {
+}
+export class InvalidCommand extends Schema.TaggedError()("InvalidCommand", {
+    aggregateName: Schema.String,
+    type: Schema.String,
+    message: Schema.String
+}) {
+}
+/**
+ * A stored event doesn't match the schema of its version, or was written in a
+ * version the aggregate doesn't declare. Old shapes are declared with `EventVersions`.
+ */
+export class EventDecodeError extends Schema.TaggedError()("EventDecodeError", {
+    aggregateName: Schema.String,
+    aggregateId: Schema.String,
+    version: Schema.Int,
+    type: Schema.String,
+    schemaVersion: Schema.Int,
+    message: Schema.String
+}) {
+}
+const CommandEnvelope = Schema.Struct({
+    aggregateId: Schema.NonEmptyString,
+    type: Schema.String,
+    payload: Schema.Unknown,
+    /** Continues a correlation started elsewhere, see `Causation`. */
+    correlationId: Schema.optional(Schema.String),
+    causationId: Schema.optional(Schema.String),
+    /** Recorded on top of the current metadata, see `Metadata`. */
+    metadata: Schema.optional(Metadata)
+});
+const versionsOf = (aggregate) => Object.entries(aggregate.versions).flatMap(([tag, versions]) => versions === undefined ? [] : [[tag, versions]]);
+/**
+ * Decodes a stored event with the schema of the aggregate it belongs to. An
+ * event stored in an older version is upcast to the current one on the way.
+ */
+export const makeEventDecoder = (aggregate) => {
+    const decodeCurrent = Schema.decodeUnknownEffect(Schema.toCodecJson(aggregate.events));
+    const upcasters = new Map(versionsOf(aggregate).map(([tag, versions]) => [tag, {
+            current: EventVersions.current(versions),
+            decoders: EventVersions.decoders(tag, versions).map((decoder) => Schema.decodeUnknownEffect(decoder))
+        }]));
+    return (stored) => {
+        const fail = (message) => new EventDecodeError({
+            aggregateName: stored.aggregateName,
+            aggregateId: stored.aggregateId,
+            version: stored.version,
+            type: stored.type,
+            schemaVersion: stored.schemaVersion,
+            message
+        });
+        const upcaster = upcasters.get(stored.type);
+        const current = upcaster?.current ?? 1;
+        const decode = stored.schemaVersion === current ? decodeCurrent : upcaster?.decoders[stored.schemaVersion - 1];
+        if (decode === undefined) {
+            return Effect.fail(fail(`${aggregate.name} knows ${stored.type} up to schema version ${current}`));
+        }
+        return decode(stored.payload).pipe(Effect.mapError((error) => fail(error.message)));
+    };
+};
+/** Encodes events into the JSON form the store keeps, in the current version of their schema. */
+export const makeEventEncoder = (aggregate) => {
+    const encode = Schema.encodeUnknownEffect(Schema.toCodecJson(aggregate.events));
+    const versions = new Map(versionsOf(aggregate).map(([tag, versions]) => [tag, EventVersions.current(versions)]));
+    return (event) => encode(event).pipe(
+    // Events come from the aggregate's own handlers, so this is a programming error.
+    Effect.orDie, Effect.map((payload) => ({
+        type: event._tag,
+        payload: payload,
+        schemaVersion: versions.get(event._tag) ?? 1
+    })));
+};
+/**
+ * The names of the metrics every aggregate service records through Effect's
+ * `Metric` module. Each series carries an `aggregate` attribute with the
+ * aggregate's name. Read them with `Metric.snapshot`, or send them on with an
+ * exporter such as `OtlpMetrics` from `effect/observability`.
+ */
+export const MetricNames = {
+    /**
+     * Timer: how long a command took, including its wait for an earlier command on
+     * the same stream, by `command` and `outcome`. The outcome is `success`, the tag
+     * of the error, `defect` or `interrupted`. A payload that doesn't decode, or a
+     * type the aggregate doesn't know, fails before this point and isn't recorded.
+     */
+    commandDuration: "cqrs_command_duration",
+    /**
+     * Counter: where loading the current state found a state to start from, by
+     * `source`: `memory`, `snapshot`, or `replay` when it starts from the first event.
+     */
+    stateLoads: "cqrs_state_loads_total",
+    /** Histogram: how many events a load read from the store on top of that state. */
+    eventsReplayed: "cqrs_events_replayed",
+    /** Gauge: how many states are remembered in memory. */
+    stateCacheSize: "cqrs_state_cache_size",
+    /** Counter: states dropped from memory to make room for others, see `stateCacheSize`. */
+    stateCacheEvictions: "cqrs_state_cache_evictions_total",
+    /** Counter: snapshots saved, by `result`: `success` or `failure`. */
+    snapshotSaves: "cqrs_snapshot_saves_total",
+    /** Counter: snapshots that couldn't be read, so the stream was replayed instead. */
+    snapshotReadFailures: "cqrs_snapshot_read_failures_total",
+    /** Counter: appends that lost a race with a writer in another process. Each is retried until `maxRetries` runs out. */
+    concurrencyConflicts: "cqrs_concurrency_conflicts_total"
+};
+/**
+ * Builds each series once with its attributes: a metric's key is cached, while
+ * `Metric.withAttributes` would compute it again on every update.
+ */
+const makeMetrics = (aggregateName) => {
+    const attributes = { aggregate: aggregateName };
+    const counter = (name, description, extra) => Metric.counter(name, { description, incremental: true, attributes: { ...attributes, ...extra } });
+    const loads = (source) => counter(MetricNames.stateLoads, "Where loading an aggregate found a state to start from", { source });
+    const saves = (result) => counter(MetricNames.snapshotSaves, "Snapshots saved", { result });
+    const durations = new Map();
+    return {
+        loadedFromMemory: loads("memory"),
+        loadedFromSnapshot: loads("snapshot"),
+        loadedFromReplay: loads("replay"),
+        eventsReplayed: Metric.histogram(MetricNames.eventsReplayed, {
+            description: "Events read from the store to bring a state up to date",
+            attributes,
+            boundaries: [0, 1, 5, 10, 50, 100, 500, 1000, 5000, 10000]
+        }),
+        cacheSize: Metric.gauge(MetricNames.stateCacheSize, { description: "States remembered in memory", attributes }),
+        evictions: counter(MetricNames.stateCacheEvictions, "States dropped from memory to make room"),
+        snapshotSaved: saves("success"),
+        snapshotFailed: saves("failure"),
+        snapshotReadFailures: counter(MetricNames.snapshotReadFailures, "Snapshots that couldn't be read"),
+        conflicts: counter(MetricNames.concurrencyConflicts, "Appends that lost a race with another writer"),
+        duration: (command, outcome) => {
+            let byOutcome = durations.get(command);
+            if (byOutcome === undefined)
+                durations.set(command, byOutcome = new Map());
+            let timer = byOutcome.get(outcome);
+            if (timer === undefined) {
+                timer = Metric.timer(MetricNames.commandDuration, {
+                    description: "How long commands take",
+                    attributes: { ...attributes, command, outcome }
+                });
+                byOutcome.set(outcome, timer);
+            }
+            return timer;
+        }
+    };
+};
+/** Counts one occurrence and returns `value`, in a single step rather than an effect per update. */
+const recording = (counter, value) => Effect.contextWith((context) => {
+    counter.updateUnsafe(1, context);
+    return Effect.succeed(value);
+});
+const outcomeOf = (exit) => {
+    if (Exit.isSuccess(exit))
+        return "success";
+    const error = Cause.findErrorOption(exit.cause);
+    if (Option.isSome(error)) {
+        const value = error.value;
+        return Predicate.hasProperty(value, "_tag") && Predicate.isString(value._tag) ? value._tag : "error";
+    }
+    return Cause.hasInterruptsOnly(exit.cause) ? "interrupted" : "defect";
+};
+/** Remembers recent states, dropping the least recently used. A `Map` iterates in insertion order. */
+const makeStateCache = (capacity) => {
+    const entries = new Map();
+    return {
+        size: () => entries.size,
+        get: (aggregateId) => {
+            const entry = entries.get(aggregateId);
+            if (entry !== undefined) {
+                entries.delete(aggregateId);
+                entries.set(aggregateId, entry);
+            }
+            return entry;
+        },
+        /** Returns whether another state was dropped to make room. */
+        set: (aggregateId, loaded) => {
+            if (capacity === 0 || (entries.get(aggregateId)?.position ?? 0) > loaded.position)
+                return false;
+            entries.delete(aggregateId);
+            entries.set(aggregateId, loaded);
+            if (entries.size <= capacity)
+                return false;
+            entries.delete(entries.keys().next().value);
+            return true;
+        }
+    };
+};
+/** Runs effects with the same key one at a time. A key only exists while it is in use. */
+const makeKeyedLock = () => {
+    const locks = new Map();
+    return (key) => (effect) => Effect.acquireUseRelease(Effect.sync(() => {
+        const lock = locks.get(key) ?? { semaphore: Semaphore.makeUnsafe(1), users: 0 };
+        lock.users++;
+        locks.set(key, lock);
+        return lock;
+    }), (lock) => lock.semaphore.withPermit(effect), (lock) => Effect.sync(() => {
+        if (--lock.users === 0)
+            locks.delete(key);
+    }));
+};
+/**
+ * Gives other fibers a turn once in a while. `Effect.forEach` with `concurrency`
+ * carries on as long as items don't suspend, and a store on `node:sqlite` never does,
+ * so a bulk run would finish before any view model ran. Yielding per command is
+ * expensive, so it only happens when a millisecond has passed, using real time
+ * because this is about the CPU. The clock restarts after the yield rather than
+ * before it, so commands started meanwhile suspend too and the loop lets go.
+ */
+const makeTimeSlice = () => {
+    let started = performance.now();
+    return Effect.suspend(() => performance.now() - started < 1
+        ? Effect.void
+        : Effect.andThen(Effect.yieldNow, Effect.sync(() => void (started = performance.now()))));
+};
+// Only a rival outside this service can cause a conflict, so give it room to finish.
+const conflictBackoff = Schedule.exponential("10 millis").pipe(Schedule.jittered);
+const makeSnapshots = (aggregateName, options, metrics) => Effect.gen(function* () {
+    const store = KeyValueStore.toSchemaStore(yield* KeyValueStore.KeyValueStore, Schema.Struct({ version: Schema.Int, position: Schema.Int, state: options.schema }));
+    const key = (aggregateId) => `effect-cqrs/snapshot/${JSON.stringify([aggregateName, String(options.version ?? 1), aggregateId])}`;
+    // A snapshot is only a shortcut, so a failure to read or save one falls back to the log.
+    const get = (aggregateId) => store.get(key(aggregateId)).pipe(Effect.map(Option.map((snapshot) => ({ ...snapshot, snapshotVersion: snapshot.version }))), Effect.catch((error) => Metric.update(metrics.snapshotReadFailures, 1).pipe(Effect.andThen(Effect.logWarning(`Ignoring the ${aggregateName} snapshot of ${aggregateId}`, error)), Effect.as(Option.none()))));
+    // Saves run beside the commands rather than in their way. Closing the service
+    // waits for the ones still running, so a clean shutdown keeps its last snapshots.
+    const saving = yield* FiberSet.make();
+    yield* Effect.addFinalizer(() => FiberSet.awaitEmpty(saving));
+    // Starts a save once `every` events have been folded since the last snapshot, and
+    // returns the state to remember. A failed save is not retried until `every` more.
+    const save = (aggregateId, loaded) => loaded.version - loaded.snapshotVersion < options.every
+        ? Effect.succeed(loaded)
+        : FiberSet.run(saving, store.set(key(aggregateId), { version: loaded.version, position: loaded.position, state: loaded.state }).pipe(Effect.andThen(Metric.update(metrics.snapshotSaved, 1)), Effect.catch((error) => Effect.andThen(Metric.update(metrics.snapshotFailed, 1), Effect.logWarning(`Could not save the ${aggregateName} snapshot of ${aggregateId}`, error))))).pipe(Effect.as({ ...loaded, snapshotVersion: loaded.version }));
+    return { get, save };
+});
+const makeService = Effect.fnUntraced(function* (aggregate, options) {
+    const store = yield* EventStore;
+    const context = yield* Effect.context();
+    // Metadata provided where the service was built, such as the software version,
+    // reaches commands run where that layer isn't visible.
+    const builtWith = Context.get(context, CurrentMetadata);
+    const mergeMetadata = (current, given) => current === builtWith && given === undefined ? builtWith : { ...builtWith, ...current, ...given };
+    const maxRetries = options?.maxRetries ?? 5;
+    const aggregateName = aggregate.name;
+    const decodeEvent = makeEventDecoder(aggregate);
+    const encodeEvent = makeEventEncoder(aggregate);
+    const states = makeStateCache(options?.stateCacheSize ?? 10_000);
+    const lockStream = makeKeyedLock();
+    const timeSlice = makeTimeSlice();
+    const metrics = makeMetrics(aggregateName);
+    const snapshots = options?.snapshots === undefined
+        ? undefined
+        : yield* makeSnapshots(aggregateName, options.snapshots, metrics);
+    const replay = (stream, initial, step) => stream.pipe(Stream.runFoldEffect(() => initial, (acc, stored) => Effect.map(decodeEvent(stored), (event) => step(acc, event, stored))));
+    const streamOf = (aggregateId, range) => store.read({ aggregateNames: [aggregateName], aggregateIds: [aggregateId], ...range });
+    const fold = (acc, event, stored) => ({
+        state: Aggregate.evolve(aggregate, acc.state, event, stored),
+        version: stored.version,
+        position: stored.position,
+        snapshotVersion: acc.snapshotVersion
+    });
+    const replayFrom = (start, aggregateId, finishTime) => replay(streamOf(aggregateId, { finishTime, afterPosition: start.position, afterVersion: start.version }), start, fold);
+    const initial = {
+        state: aggregate.initial,
+        version: 0,
+        position: 0,
+        snapshotVersion: 0
+    };
+    // Remembered states come first, as they are the most recent. Without one the
+    // last snapshot saves replaying the start of the stream.
+    const start = (aggregateId) => {
+        const remembered = states.get(aggregateId);
+        if (remembered !== undefined)
+            return recording(metrics.loadedFromMemory, remembered);
+        if (snapshots === undefined)
+            return recording(metrics.loadedFromReplay, initial);
+        return Effect.flatMap(snapshots.get(aggregateId), Option.match({
+            onNone: () => recording(metrics.loadedFromReplay, initial),
+            onSome: (snapshot) => recording(metrics.loadedFromSnapshot, snapshot)
+        }));
+    };
+    // Returns the state as remembered, with the version of a snapshot it just started.
+    // `read` is how many events the load read from the store, when one did.
+    const remember = (aggregateId, loaded, read) => (snapshots === undefined ? Effect.succeed(loaded) : snapshots.save(aggregateId, loaded)).pipe(Effect.tap((remembered) => Effect.contextWith((context) => {
+        const evicted = states.set(aggregateId, remembered);
+        if (read !== undefined)
+            metrics.eventsReplayed.updateUnsafe(read, context);
+        metrics.cacheSize.updateUnsafe(states.size(), context);
+        if (evicted)
+            metrics.evictions.updateUnsafe(1, context);
+        return Effect.void;
+    })));
+    // Streams only grow, so a remembered state plus what came after it is the current
+    // state, even if another process wrote those events. Versions have no gaps, so the
+    // difference between two is the number of events read.
+    const load = (aggregateId, finishTime) => finishTime === undefined
+        ? Effect.flatMap(start(aggregateId), (from) => Effect.flatMap(replayFrom(from, aggregateId), (loaded) => remember(aggregateId, loaded, loaded.version - from.version)))
+        : replayFrom(initial, aggregateId, finishTime);
+    // Measures from the moment the command asks for its turn on the stream.
+    const timed = (type) => (effect) => Effect.clockWith((clock) => {
+        const started = clock.currentTimeNanosUnsafe();
+        return Effect.onExit(effect, (exit) => Effect.contextWith((context) => {
+            const elapsed = Duration.nanos(clock.currentTimeNanosUnsafe() - started);
+            metrics.duration(type, outcomeOf(exit)).updateUnsafe(elapsed, context);
+            return Effect.void;
+        }));
+    });
+    // Folds what a command just wrote into the remembered state, so the next command
+    // finds nothing new to read. The events are decoded from what was stored, as a
+    // replay would, so the state is the one a restart would rebuild. If they don't
+    // decode, the state isn't remembered and the next load reports the error.
+    const rememberWritten = (aggregateId, before, written) => Effect.forEach(written, decodeEvent).pipe(Effect.flatMap((events) => remember(aggregateId, events.reduce((acc, event, index) => fold(acc, event, written[index]), before))), Effect.ignore);
+    const decide = Effect.fnUntraced(function* (type, aggregateId, payload, causation, metadata) {
+        const loaded = yield* load(aggregateId);
+        const { position, state, version } = loaded;
+        const { handler } = aggregate.commands[type];
+        const events = Arr.ensure(yield* handler(state, payload, { aggregateId, version }));
+        const { correlationId } = causation;
+        if (events.length === 0) {
+            return { aggregateName, aggregateId, version, position, events, correlationId };
+        }
+        const stored = yield* store.append({
+            aggregateName,
+            aggregateId,
+            expectedVersion: version,
+            events: yield* Effect.forEach(events, encodeEvent),
+            ...causation,
+            metadata
+        });
+        yield* rememberWritten(aggregateId, loaded, stored);
+        const last = stored[stored.length - 1];
+        return { aggregateName, aggregateId, version: last.version, position: last.position, events, correlationId };
+    });
+    // Commands on one stream take turns, so they can't race each other and only a
+    // rival in another process causes a conflict. A handler must not run a command on
+    // its own stream, which would wait for itself.
+    const execute = (type, aggregateId, payload, given) => 
+    // Read outside the service's own context, which would hide the caller's.
+    Effect.contextWith((callerContext) => {
+        const current = Context.get(callerContext, CurrentCausation);
+        const correlationId = given?.correlationId ?? current?.correlationId;
+        const causationId = given?.causationId ?? current?.causationId;
+        // Without a cause the command starts its own correlation.
+        const id = correlationId ?? causationId ?? crypto.randomUUID();
+        const causation = { correlationId: correlationId ?? id, causationId: causationId ?? id };
+        const metadata = mergeMetadata(Context.get(callerContext, CurrentMetadata), given?.metadata);
+        return decide(type, aggregateId, payload, causation, metadata).pipe(Effect.tapError((error) => error instanceof ConcurrencyConflict ? Metric.update(metrics.conflicts, 1) : Effect.void), Effect.retry({
+            times: maxRetries,
+            while: (error) => error instanceof ConcurrencyConflict,
+            schedule: conflictBackoff
+        }), Effect.provideContext(context), lockStream(aggregateId), (decided) => Effect.andThen(timeSlice, decided), timed(type), Effect.withSpan(`${aggregateName}.${type}`, {
+            attributes: { "aggregate.id": aggregateId, "cqrs.correlation_id": causation.correlationId }
+        }));
+    });
+    const decodePayload = (type, schema, input) => Schema.decodeUnknownEffect(schema)(input).pipe(Effect.mapError((error) => new InvalidCommand({ aggregateName, type, message: error.message })));
+    const commands = Object.fromEntries(Object.entries(aggregate.commands).map(([type, command]) => [
+        type,
+        (aggregateId, payload) => decodePayload(type, Schema.toType(command.payload), payload).pipe(Effect.flatMap((decoded) => execute(type, aggregateId, decoded)))
+    ]));
+    const decodeEnvelope = Schema.decodeUnknownEffect(CommandEnvelope);
+    const dispatch = (input) => Effect.gen(function* () {
+        const envelope = yield* decodeEnvelope(input).pipe(Effect.mapError((error) => new InvalidCommand({ aggregateName, type: "unknown", message: error.message })));
+        if (!Object.hasOwn(aggregate.commands, envelope.type)) {
+            return yield* new UnknownCommand({ aggregateName, type: envelope.type });
+        }
+        const payload = yield* decodePayload(envelope.type, Schema.toCodecJson(aggregate.commands[envelope.type].payload), envelope.payload);
+        return yield* execute(envelope.type, envelope.aggregateId, payload, envelope);
+    });
+    const readModel = (aggregateId, options) => load(aggregateId, options?.finishTime).pipe(Effect.map(({ state }) => state), Effect.withSpan(`${aggregateName}.readModel`, { attributes: { "aggregate.id": aggregateId } }));
+    const history = (aggregateId, options) => replay(streamOf(aggregateId, { startTime: options?.startTime, finishTime: options?.finishTime }), [], (entries, event, stored) => {
+        entries.push({
+            version: stored.version,
+            timestamp: stored.timestamp,
+            type: stored.type,
+            correlationId: stored.correlationId,
+            causationId: stored.causationId,
+            metadata: stored.metadata,
+            ...(options?.payload === true ? { payload: event } : {})
+        });
+        return entries;
+    }).pipe(Effect.withSpan(`${aggregateName}.history`, { attributes: { "aggregate.id": aggregateId } }));
+    return {
+        aggregate,
+        commands,
+        dispatch,
+        readModel,
+        history
+    };
+});
+/**
+ * Builds the service for one aggregate. With `snapshots` it saves states through
+ * a `KeyValueStore` from `effect/persistence`, which has layers for memory, files,
+ * SQL and the browser's `localStorage`. Saves run in the background, and closing
+ * the scope waits for the ones still running.
+ */
+export const make = makeService;
+//# sourceMappingURL=AggregateService.js.map

package/dist/AggregateService.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"AggregateService.js","sourceRoot":"","sources":["../src/AggregateService.ts"],"names":[],"mappings":"AAAA;;;GAGG;AACH,OAAO,EACL,KAAK,IAAI,GAAG,EACZ,KAAK,EACL,OAAO,EAEP,QAAQ,EACR,MAAM,EACN,IAAI,EACJ,QAAQ,EACR,MAAM,EACN,MAAM,EACN,SAAS,EACT,QAAQ,EACR,MAAM,EAEN,SAAS,EACT,MAAM,EACP,MAAM,QAAQ,CAAA;AACf,OAAO,EAAE,aAAa,EAAE,MAAM,oBAAoB,CAAA;AAClD,OAAO,KAAK,SAAS,MAAM,gBAAgB,CAAA;AAC3C,OAAO,EAAE,gBAAgB,EAAE,MAAM,gBAAgB,CAAA;AACjD,OAAO,EACL,mBAAmB,EAEnB,UAAU,EAGX,MAAM,iBAAiB,CAAA;AACxB,OAAO,KAAK,aAAa,MAAM,oBAAoB,CAAA;AACnD,OAAO,EAAE,eAAe,EAAE,QAAQ,EAAE,MAAM,eAAe,CAAA;AAEzD,MAAM,OAAO,cAAe,SAAQ,MAAM,CAAC,WAAW,EAAkB,CAAC,gBAAgB,EAAE;IACzF,aAAa,EAAE,MAAM,CAAC,MAAM;IAC5B,IAAI,EAAE,MAAM,CAAC,MAAM;CACpB,CAAC;CAAG;AAEL,MAAM,OAAO,cAAe,SAAQ,MAAM,CAAC,WAAW,EAAkB,CAAC,gBAAgB,EAAE;IACzF,aAAa,EAAE,MAAM,CAAC,MAAM;IAC5B,IAAI,EAAE,MAAM,CAAC,MAAM;IACnB,OAAO,EAAE,MAAM,CAAC,MAAM;CACvB,CAAC;CAAG;AAEL;;;GAGG;AACH,MAAM,OAAO,gBAAiB,SAAQ,MAAM,CAAC,WAAW,EAAoB,CAAC,kBAAkB,EAAE;IAC/F,aAAa,EAAE,MAAM,CAAC,MAAM;IAC5B,WAAW,EAAE,MAAM,CAAC,MAAM;IAC1B,OAAO,EAAE,MAAM,CAAC,GAAG;IACnB,IAAI,EAAE,MAAM,CAAC,MAAM;IACnB,aAAa,EAAE,MAAM,CAAC,GAAG;IACzB,OAAO,EAAE,MAAM,CAAC,MAAM;CACvB,CAAC;CAAG;AA0DL,MAAM,eAAe,GAAG,MAAM,CAAC,MAAM,CAAC;IACpC,WAAW,EAAE,MAAM,CAAC,cAAc;IAClC,IAAI,EAAE,MAAM,CAAC,MAAM;IACnB,OAAO,EAAE,MAAM,CAAC,OAAO;IACvB,kEAAkE;IAClE,aAAa,EAAE,MAAM,CAAC,QAAQ,CAAC,MAAM,CAAC,MAAM,CAAC;IAC7C,WAAW,EAAE,MAAM,CAAC,QAAQ,CAAC,MAAM,CAAC,MAAM,CAAC;IAC3C,+DAA+D;IAC/D,QAAQ,EAAE,MAAM,CAAC,QAAQ,CAAC,QAAQ,CAAC;CACpC,CAAC,CAAA;AAEF,MAAM,UAAU,GAAG,CAAC,SAAwB,EAAE,EAAE,CAC9C,MAAM,CAAC,OAAO,CAAC,SAAS,CAAC,QAAyD,CAAC,CAAC,OAAO,CAAC,CAAC,CAAC,GAAG,EAAE,QAAQ,CAAC,EAAE,EAAE,CAC9G,QAAQ,KAAK,SAAS,CAAC,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC,CAAC,CAAC,GAAG,EAAE,QAAQ,CAAU,CAAC,CACzD,CAAA;AAEH;;;GAGG;AACH,MAAM,CAAC,MAAM,gBAAgB,GAAG,CAA0B,SAAY,EAAE,EAAE;IACxE,MAAM,aAAa,GAAG,MAAM,CAAC,mBAAmB,CAAC,MAAM,CAAC,WAAW,CAAC,SAAS,CAAC,MAAM,CAAC,CAAC,CAAA;IACtF,MAAM,SAAS,GAAG,IAAI,GAAG,CAAC,UAAU,CAAC,SAAS,CAAC,CAAC,GAAG,CAAC,CAAC,CAAC,GAAG,EAAE,QAAQ,CAAC,EAAE,EAAE,CAAC,CAAC,GAAG,EAAE;YAC7E,OAAO,EAAE,aAAa,CAAC,OAAO,CAAC,QAAQ,CAAC;YACxC,QAAQ,EAAE,aAAa,CAAC,QAAQ,CAAC,GAAG,EAAE,QAAQ,CAAC,CAAC,GAAG,CAAC,CAAC,OAAO,EAAE,EAAE,CAAC,MAAM,CAAC,mBAAmB,CAAC,OAAO,CAAC,CAAC;SACtG,CAAC,CAAC,CAAC,CAAA;IACJ,OAAO,CAAC,MAAmB,EAAuD,EAAE;QAClF,MAAM,IAAI,GAAG,CAAC,OAAe,EAAE,EAAE,CAC/B,IAAI,gBAAgB,CAAC;YACnB,aAAa,EAAE,MAAM,CAAC,aAAa;YACnC,WAAW,EAAE,MAAM,CAAC,WAAW;YAC/B,OAAO,EAAE,MAAM,CAAC,OAAO;YACvB,IAAI,EAAE,MAAM,CAAC,IAAI;YACjB,aAAa,EAAE,MAAM,CAAC,aAAa;YACnC,OAAO;SACR,CAAC,CAAA;QACJ,MAAM,QAAQ,GAAG,SAAS,CAAC,GAAG,CAAC,MAAM,CAAC,IAAI,CAAC,CAAA;QAC3C,MAAM,OAAO,GAAG,QAAQ,EAAE,OAAO,IAAI,CAAC,CAAA;QACtC,MAAM,MAAM,GAAG,MAAM,CAAC,aAAa,KAAK,OAAO,CAAC,CAAC,CAAC,aAAa,CAAC,CAAC,CAAC,QAAQ,EAAE,QAAQ,CAAC,MAAM,CAAC,aAAa,GAAG,CAAC,CAAC,CAAA;QAC9G,IAAI,MAAM,KAAK,SAAS,EAAE,CAAC;YACzB,OAAO,MAAM,CAAC,IAAI,CAAC,IAAI,CAAC,GAAG,SAAS,CAAC,IAAI,UAAU,MAAM,CAAC,IAAI,yBAAyB,OAAO,EAAE,CAAC,CAAC,CAAA;QACpG,CAAC;QACD,OAAO,MAAM,CAAC,MAAM,CAAC,OAAO,CAAC,CAAC,IAAI,CAChC,MAAM,CAAC,QAAQ,CAAC,CAAC,KAAK,EAAE,EAAE,CAAC,IAAI,CAAC,KAAK,CAAC,OAAO,CAAC,CAAC,CACO,CAAA;IAC1D,CAAC,CAAA;AACH,CAAC,CAAA;AAED,iGAAiG;AACjG,MAAM,CAAC,MAAM,gBAAgB,GAAG,CAA0B,SAAY,EAAE,EAAE;IACxE,MAAM,MAAM,GAAG,MAAM,CAAC,mBAAmB,CAAC,MAAM,CAAC,WAAW,CAAC,SAAS,CAAC,MAAM,CAAC,CAAC,CAAA;IAC/E,MAAM,QAAQ,GAAG,IAAI,GAAG,CAAC,UAAU,CAAC,SAAS,CAAC,CAAC,GAAG,CAAC,CAAC,CAAC,GAAG,EAAE,QAAQ,CAAC,EAAE,EAAE,CAAC,CAAC,GAAG,EAAE,aAAa,CAAC,OAAO,CAAC,QAAQ,CAAC,CAAC,CAAC,CAAC,CAAA;IAChH,OAAO,CAAC,KAAyB,EAAE,EAAE,CACnC,MAAM,CAAC,KAAK,CAAC,CAAC,IAAI;IAChB,iFAAiF;IACjF,MAAM,CAAC,KAAK,EACZ,MAAM,CAAC,GAAG,CAAC,CAAC,OAAO,EAAE,EAAE,CAAC,CAAC;QACvB,IAAI,EAAE,KAAK,CAAC,IAAI;QAChB,OAAO,EAAE,OAAsB;QAC/B,aAAa,EAAE,QAAQ,CAAC,GAAG,CAAC,KAAK,CAAC,IAAI,CAAC,IAAI,CAAC;KAC7C,CAAC,CAAC,CACJ,CAAA;AACL,CAAC,CAAA;AA+BD;;;;;GAKG;AACH,MAAM,CAAC,MAAM,WAAW,GAAG;IACzB;;;;;OAKG;IACH,eAAe,EAAE,uBAAuB;IACxC;;;OAGG;IACH,UAAU,EAAE,wBAAwB;IACpC,kFAAkF;IAClF,cAAc,EAAE,sBAAsB;IACtC,uDAAuD;IACvD,cAAc,EAAE,uBAAuB;IACvC,yFAAyF;IACzF,mBAAmB,EAAE,kCAAkC;IACvD,qEAAqE;IACrE,aAAa,EAAE,2BAA2B;IAC1C,oFAAoF;IACpF,oBAAoB,EAAE,mCAAmC;IACzD,uHAAuH;IACvH,oBAAoB,EAAE,kCAAkC;CAChD,CAAA;AAEV;;;GAGG;AACH,MAAM,WAAW,GAAG,CAAC,aAAqB,EAAE,EAAE;IAC5C,MAAM,UAAU,GAAG,EAAE,SAAS,EAAE,aAAa,EAAE,CAAA;IAC/C,MAAM,OAAO,GAAG,CAAC,IAAY,EAAE,WAAmB,EAAE,KAA8B,EAAE,EAAE,CACpF,MAAM,CAAC,OAAO,CAAC,IAAI,EAAE,EAAE,WAAW,EAAE,WAAW,EAAE,IAAI,EAAE,UAAU,EAAE,EAAE,GAAG,UAAU,EAAE,GAAG,KAAK,EAAE,EAAE,CAAC,CAAA;IACnG,MAAM,KAAK,GAAG,CAAC,MAAwC,EAAE,EAAE,CACzD,OAAO,CAAC,WAAW,CAAC,UAAU,EAAE,wDAAwD,EAAE,EAAE,MAAM,EAAE,CAAC,CAAA;IACvG,MAAM,KAAK,GAAG,CAAC,MAA6B,EAAE,EAAE,CAC9C,OAAO,CAAC,WAAW,CAAC,aAAa,EAAE,iBAAiB,EAAE,EAAE,MAAM,EAAE,CAAC,CAAA;IACnE,MAAM,SAAS,GAAG,IAAI,GAAG,EAAkE,CAAA;IAC3F,OAAO;QACL,gBAAgB,EAAE,KAAK,CAAC,QAAQ,CAAC;QACjC,kBAAkB,EAAE,KAAK,CAAC,UAAU,CAAC;QACrC,gBAAgB,EAAE,KAAK,CAAC,QAAQ,CAAC;QACjC,cAAc,EAAE,MAAM,CAAC,SAAS,CAAC,WAAW,CAAC,cAAc,EAAE;YAC3D,WAAW,EAAE,wDAAwD;YACrE,UAAU;YACV,UAAU,EAAE,CAAC,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE,EAAE,EAAE,EAAE,EAAE,GAAG,EAAE,GAAG,EAAE,IAAI,EAAE,IAAI,EAAE,KAAK,CAAC;SAC3D,CAAC;QACF,SAAS,EAAE,MAAM,CAAC,KAAK,CAAC,WAAW,CAAC,cAAc,EAAE,EAAE,WAAW,EAAE,6BAA6B,EAAE,UAAU,EAAE,CAAC;QAC/G,SAAS,EAAE,OAAO,CAAC,WAAW,CAAC,mBAAmB,EAAE,yCAAyC,CAAC;QAC9F,aAAa,EAAE,KAAK,CAAC,SAAS,CAAC;QAC/B,cAAc,EAAE,KAAK,CAAC,SAAS,CAAC;QAChC,oBAAoB,EAAE,OAAO,CAAC,WAAW,CAAC,oBAAoB,EAAE,iCAAiC,CAAC;QAClG,SAAS,EAAE,OAAO,CAAC,WAAW,CAAC,oBAAoB,EAAE,8CAA8C,CAAC;QACpG,QAAQ,EAAE,CAAC,OAAe,EAAE,OAAe,EAAE,EAAE;YAC7C,IAAI,SAAS,GAAG,SAAS,CAAC,GAAG,CAAC,OAAO,CAAC,CAAA;YACtC,IAAI,SAAS,KAAK,SAAS;gBAAE,SAAS,CAAC,GAAG,CAAC,OAAO,EAAE,SAAS,GAAG,IAAI,GAAG,EAAE,CAAC,CAAA;YAC1E,IAAI,KAAK,GAAG,SAAS,CAAC,GAAG,CAAC,OAAO,CAAC,CAAA;YAClC,IAAI,KAAK,KAAK,SAAS,EAAE,CAAC;gBACxB,KAAK,GAAG,MAAM,CAAC,KAAK,CAAC,WAAW,CAAC,eAAe,EAAE;oBAChD,WAAW,EAAE,wBAAwB;oBACrC,UAAU,EAAE,EAAE,GAAG,UAAU,EAAE,OAAO,EAAE,OAAO,EAAE;iBAChD,CAAC,CAAA;gBACF,SAAS,CAAC,GAAG,CAAC,OAAO,EAAE,KAAK,CAAC,CAAA;YAC/B,CAAC;YACD,OAAO,KAAK,CAAA;QACd,CAAC;KACF,CAAA;AACH,CAAC,CAAA;AAID,oGAAoG;AACpG,MAAM,SAAS,GAAG,CAAI,OAA+B,EAAE,KAAQ,EAAoB,EAAE,CACnF,MAAM,CAAC,WAAW,CAAC,CAAC,OAA+B,EAAE,EAAE;IACrD,OAAO,CAAC,YAAY,CAAC,CAAC,EAAE,OAAO,CAAC,CAAA;IAChC,OAAO,MAAM,CAAC,OAAO,CAAC,KAAK,CAAC,CAAA;AAC9B,CAAC,CAAC,CAAA;AAEJ,MAAM,SAAS,GAAG,CAAC,IAAiC,EAAU,EAAE;IAC9D,IAAI,IAAI,CAAC,SAAS,CAAC,IAAI,CAAC;QAAE,OAAO,SAAS,CAAA;IAC1C,MAAM,KAAK,GAAG,KAAK,CAAC,eAAe,CAAC,IAAI,CAAC,KAAK,CAAC,CAAA;IAC/C,IAAI,MAAM,CAAC,MAAM,CAAC,KAAK,CAAC,EAAE,CAAC;QACzB,MAAM,KAAK,GAAG,KAAK,CAAC,KAAK,CAAA;QACzB,OAAO,SAAS,CAAC,WAAW,CAAC,KAAK,EAAE,MAAM,CAAC,IAAI,SAAS,CAAC,QAAQ,CAAC,KAAK,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC,KAAK,CAAC,IAAI,CAAC,CAAC,CAAC,OAAO,CAAA;IACtG,CAAC;IACD,OAAO,KAAK,CAAC,iBAAiB,CAAC,IAAI,CAAC,KAAK,CAAC,CAAC,CAAC,CAAC,aAAa,CAAC,CAAC,CAAC,QAAQ,CAAA;AACvE,CAAC,CAAA;AAED,sGAAsG;AACtG,MAAM,cAAc,GAAG,CAAQ,QAAgB,EAAE,EAAE;IACjD,MAAM,OAAO,GAAG,IAAI,GAAG,EAAyB,CAAA;IAChD,OAAO;QACL,IAAI,EAAE,GAAG,EAAE,CAAC,OAAO,CAAC,IAAI;QACxB,GAAG,EAAE,CAAC,WAAmB,EAAE,EAAE;YAC3B,MAAM,KAAK,GAAG,OAAO,CAAC,GAAG,CAAC,WAAW,CAAC,CAAA;YACtC,IAAI,KAAK,KAAK,SAAS,EAAE,CAAC;gBACxB,OAAO,CAAC,MAAM,CAAC,WAAW,CAAC,CAAA;gBAC3B,OAAO,CAAC,GAAG,CAAC,WAAW,EAAE,KAAK,CAAC,CAAA;YACjC,CAAC;YACD,OAAO,KAAK,CAAA;QACd,CAAC;QACD,8DAA8D;QAC9D,GAAG,EAAE,CAAC,WAAmB,EAAE,MAAqB,EAAW,EAAE;YAC3D,IAAI,QAAQ,KAAK,CAAC,IAAI,CAAC,OAAO,CAAC,GAAG,CAAC,WAAW,CAAC,EAAE,QAAQ,IAAI,CAAC,CAAC,GAAG,MAAM,CAAC,QAAQ;gBAAE,OAAO,KAAK,CAAA;YAC/F,OAAO,CAAC,MAAM,CAAC,WAAW,CAAC,CAAA;YAC3B,OAAO,CAAC,GAAG,CAAC,WAAW,EAAE,MAAM,CAAC,CAAA;YAChC,IAAI,OAAO,CAAC,IAAI,IAAI,QAAQ;gBAAE,OAAO,KAAK,CAAA;YAC1C,OAAO,CAAC,MAAM,CAAC,OAAO,CAAC,IAAI,EAAE,CAAC,IAAI,EAAE,CAAC,KAAM,CAAC,CAAA;YAC5C,OAAO,IAAI,CAAA;QACb,CAAC;KACF,CAAA;AACH,CAAC,CAAA;AAED,0FAA0F;AAC1F,MAAM,aAAa,GAAG,GAAG,EAAE;IACzB,MAAM,KAAK,GAAG,IAAI,GAAG,EAAsE,CAAA;IAC3F,OAAO,CAAC,GAAW,EAAE,EAAE,CAAC,CAAU,MAA8B,EAA0B,EAAE,CAC1F,MAAM,CAAC,iBAAiB,CACtB,MAAM,CAAC,IAAI,CAAC,GAAG,EAAE;QACf,MAAM,IAAI,GAAG,KAAK,CAAC,GAAG,CAAC,GAAG,CAAC,IAAI,EAAE,SAAS,EAAE,SAAS,CAAC,UAAU,CAAC,CAAC,CAAC,EAAE,KAAK,EAAE,CAAC,EAAE,CAAA;QAC/E,IAAI,CAAC,KAAK,EAAE,CAAA;QACZ,KAAK,CAAC,GAAG,CAAC,GAAG,EAAE,IAAI,CAAC,CAAA;QACpB,OAAO,IAAI,CAAA;IACb,CAAC,CAAC,EACF,CAAC,IAAI,EAAE,EAAE,CAAC,IAAI,CAAC,SAAS,CAAC,UAAU,CAAC,MAAM,CAAC,EAC3C,CAAC,IAAI,EAAE,EAAE,CACP,MAAM,CAAC,IAAI,CAAC,GAAG,EAAE;QACf,IAAI,EAAE,IAAI,CAAC,KAAK,KAAK,CAAC;YAAE,KAAK,CAAC,MAAM,CAAC,GAAG,CAAC,CAAA;IAC3C,CAAC,CAAC,CACL,CAAA;AACL,CAAC,CAAA;AAED;;;;;;;GAOG;AACH,MAAM,aAAa,GAAG,GAAG,EAAE;IACzB,IAAI,OAAO,GAAG,WAAW,CAAC,GAAG,EAAE,CAAA;IAC/B,OAAO,MAAM,CAAC,OAAO,CAAC,GAAG,EAAE,CACzB,WAAW,CAAC,GAAG,EAAE,GAAG,OAAO,GAAG,CAAC;QAC7B,CAAC,CAAC,MAAM,CAAC,IAAI;QACb,CAAC,CAAC,MAAM,CAAC,OAAO,CAAC,MAAM,CAAC,QAAQ,EAAE,MAAM,CAAC,IAAI,CAAC,GAAG,EAAE,CAAC,KAAK,CAAC,OAAO,GAAG,WAAW,CAAC,GAAG,EAAE,CAAC,CAAC,CAAC,CAC3F,CAAA;AACH,CAAC,CAAA;AAED,qFAAqF;AACrF,MAAM,eAAe,GAAG,QAAQ,CAAC,WAAW,CAAC,WAAW,CAAC,CAAC,IAAI,CAAC,QAAQ,CAAC,QAAQ,CAAC,CAAA;AAEjF,MAAM,aAAa,GAAG,CAAQ,aAAqB,EAAE,OAA+B,EAAE,OAAgB,EAAE,EAAE,CACxG,MAAM,CAAC,GAAG,CAAC,QAAQ,CAAC;IAClB,MAAM,KAAK,GAAG,aAAa,CAAC,aAAa,CACvC,KAAK,CAAC,CAAC,aAAa,CAAC,aAAa,EAClC,MAAM,CAAC,MAAM,CAAC,EAAE,OAAO,EAAE,MAAM,CAAC,GAAG,EAAE,QAAQ,EAAE,MAAM,CAAC,GAAG,EAAE,KAAK,EAAE,OAAO,CAAC,MAAM,EAAE,CAAC,CACpF,CAAA;IACD,MAAM,GAAG,GAAG,CAAC,WAAmB,EAAE,EAAE,CAClC,wBAAwB,IAAI,CAAC,SAAS,CAAC,CAAC,aAAa,EAAE,MAAM,CAAC,OAAO,CAAC,OAAO,IAAI,CAAC,CAAC,EAAE,WAAW,CAAC,CAAC,EAAE,CAAA;IAEtG,yFAAyF;IACzF,MAAM,GAAG,GAAG,CAAC,WAAmB,EAAE,EAAE,CAClC,KAAK,CAAC,GAAG,CAAC,GAAG,CAAC,WAAW,CAAC,CAAC,CAAC,IAAI,CAC9B,MAAM,CAAC,GAAG,CAAC,MAAM,CAAC,GAAG,CAAC,CAAC,QAAQ,EAAiB,EAAE,CAAC,CAAC,EAAE,GAAG,QAAQ,EAAE,eAAe,EAAE,QAAQ,CAAC,OAAO,EAAE,CAAC,CAAC,CAAC,EACzG,MAAM,CAAC,KAAK,CAAC,CAAC,KAAK,EAAE,EAAE,CACrB,MAAM,CAAC,MAAM,CAAC,OAAO,CAAC,oBAAoB,EAAE,CAAC,CAAC,CAAC,IAAI,CACjD,MAAM,CAAC,OAAO,CAAC,MAAM,CAAC,UAAU,CAAC,gBAAgB,aAAa,gBAAgB,WAAW,EAAE,EAAE,KAAK,CAAC,CAAC,EACpG,MAAM,CAAC,EAAE,CAAC,MAAM,CAAC,IAAI,EAAiB,CAAC,CACxC,CACF,CACF,CAAA;IAEH,8EAA8E;IAC9E,kFAAkF;IAClF,MAAM,MAAM,GAAG,KAAK,CAAC,CAAC,QAAQ,CAAC,IAAI,EAAQ,CAAA;IAC3C,KAAK,CAAC,CAAC,MAAM,CAAC,YAAY,CAAC,GAAG,EAAE,CAAC,QAAQ,CAAC,UAAU,CAAC,MAAM,CAAC,CAAC,CAAA;IAE7D,kFAAkF;IAClF,kFAAkF;IAClF,MAAM,IAAI,GAAG,CAAC,WAAmB,EAAE,MAAqB,EAAgC,EAAE,CACxF,MAAM,CAAC,OAAO,GAAG,MAAM,CAAC,eAAe,GAAG,OAAO,CAAC,KAAK;QACrD,CAAC,CAAC,MAAM,CAAC,OAAO,CAAC,MAAM,CAAC;QACxB,CAAC,CAAC,QAAQ,CAAC,GAAG,CACZ,MAAM,EACN,KAAK,CAAC,GAAG,CAAC,GAAG,CAAC,WAAW,CAAC,EAAE,EAAE,OAAO,EAAE,MAAM,CAAC,OAAO,EAAE,QAAQ,EAAE,MAAM,CAAC,QAAQ,EAAE,KAAK,EAAE,MAAM,CAAC,KAAK,EAAE,CAAC,CAAC,IAAI,CAC3G,MAAM,CAAC,OAAO,CAAC,MAAM,CAAC,MAAM,CAAC,OAAO,CAAC,aAAa,EAAE,CAAC,CAAC,CAAC,EACvD,MAAM,CAAC,KAAK,CAAC,CAAC,KAAK,EAAE,EAAE,CACrB,MAAM,CAAC,OAAO,CACZ,MAAM,CAAC,MAAM,CAAC,OAAO,CAAC,cAAc,EAAE,CAAC,CAAC,EACxC,MAAM,CAAC,UAAU,CAAC,sBAAsB,aAAa,gBAAgB,WAAW,EAAE,EAAE,KAAK,CAAC,CAC3F,CACF,CACF,CACF,CAAC,IAAI,CAAC,MAAM,CAAC,EAAE,CAAC,EAAE,GAAG,MAAM,EAAE,eAAe,EAAE,MAAM,CAAC,OAAO,EAAE,CAAC,CAAC,CAAA;IAErE,OAAO,EAAE,GAAG,EAAE,IAAI,EAAE,CAAA;AACtB,CAAC,CAAC,CAAA;AAEJ,MAAM,WAAW,GAAG,MAAM,CAAC,UAAU,CAAC,QAAQ,CAAC,EAC7C,SAAY,EACZ,OAA4F;IAE5F,MAAM,KAAK,GAAG,KAAK,CAAC,CAAC,UAAU,CAAA;IAC/B,MAAM,OAAO,GAAG,KAAK,CAAC,CAAC,MAAM,CAAC,OAAO,EAAwB,CAAA;IAC7D,+EAA+E;IAC/E,uDAAuD;IACvD,MAAM,SAAS,GAAG,OAAO,CAAC,GAAG,CAAC,OAAiC,EAAE,eAAe,CAAC,CAAA;IACjF,MAAM,aAAa,GAAG,CAAC,OAAiB,EAAE,KAA2B,EAAY,EAAE,CACjF,OAAO,KAAK,SAAS,IAAI,KAAK,KAAK,SAAS,CAAC,CAAC,CAAC,SAAS,CAAC,CAAC,CAAC,EAAE,GAAG,SAAS,EAAE,GAAG,OAAO,EAAE,GAAG,KAAK,EAAE,CAAA;IACnG,MAAM,UAAU,GAAG,OAAO,EAAE,UAAU,IAAI,CAAC,CAAA;IAC3C,MAAM,aAAa,GAAG,SAAS,CAAC,IAAI,CAAA;IACpC,MAAM,WAAW,GAAG,gBAAgB,CAAC,SAAS,CAAC,CAAA;IAC/C,MAAM,WAAW,GAAG,gBAAgB,CAAC,SAAS,CAAC,CAAA;IAC/C,MAAM,MAAM,GAAG,cAAc,CAAqB,OAAO,EAAE,cAAc,IAAI,MAAM,CAAC,CAAA;IACpF,MAAM,UAAU,GAAG,aAAa,EAAE,CAAA;IAClC,MAAM,SAAS,GAAG,aAAa,EAAE,CAAA;IACjC,MAAM,OAAO,GAAG,WAAW,CAAC,aAAa,CAAC,CAAA;IAC1C,MAAM,SAAS,GAAG,OAAO,EAAE,SAAS,KAAK,SAAS;QAChD,CAAC,CAAC,SAAS;QACX,CAAC,CAAC,KAAK,CAAC,CAAC,aAAa,CAAqB,aAAa,EAAE,OAAO,CAAC,SAAS,EAAE,OAAO,CAAC,CAAA;IAEvF,MAAM,MAAM,GAAG,CACb,MAAmD,EACnD,OAAY,EACZ,IAAuE,EACvE,EAAE,CACF,MAAM,CAAC,IAAI,CACT,MAAM,CAAC,aAAa,CAClB,GAAG,EAAE,CAAC,OAAO,EACb,CAAC,GAAG,EAAE,MAAM,EAAE,EAAE,CAAC,MAAM,CAAC,GAAG,CAAC,WAAW,CAAC,MAAM,CAAC,EAAE,CAAC,KAAK,EAAE,EAAE,CAAC,IAAI,CAAC,GAAG,EAAE,KAAK,EAAE,MAAM,CAAC,CAAC,CACtF,CACF,CAAA;IAEH,MAAM,QAAQ,GAAG,CACf,WAAmB,EACnB,KAAwF,EACxF,EAAE,CAAC,KAAK,CAAC,IAAI,CAAC,EAAE,cAAc,EAAE,CAAC,aAAa,CAAC,EAAE,YAAY,EAAE,CAAC,WAAW,CAAC,EAAE,GAAG,KAAK,EAAE,CAAC,CAAA;IAE3F,MAAM,IAAI,GAAG,CACX,GAA+B,EAC/B,KAAyB,EACzB,MAAmB,EACS,EAAE,CAAC,CAAC;QAChC,KAAK,EAAE,SAAS,CAAC,MAAM,CAAC,SAAS,EAAE,GAAG,CAAC,KAAK,EAAE,KAAK,EAAE,MAAM,CAAC;QAC5D,OAAO,EAAE,MAAM,CAAC,OAAO;QACvB,QAAQ,EAAE,MAAM,CAAC,QAAQ;QACzB,eAAe,EAAE,GAAG,CAAC,eAAe;KACrC,CAAC,CAAA;IAEF,MAAM,UAAU,GAAG,CACjB,KAAiC,EACjC,WAAmB,EACnB,UAAyB,EACzB,EAAE,CACF,MAAM,CACJ,QAAQ,CAAC,WAAW,EAAE,EAAE,UAAU,EAAE,aAAa,EAAE,KAAK,CAAC,QAAQ,EAAE,YAAY,EAAE,KAAK,CAAC,OAAO,EAAE,CAAC,EACjG,KAAK,EACL,IAAI,CACL,CAAA;IAEH,MAAM,OAAO,GAA+B;QAC1C,KAAK,EAAE,SAAS,CAAC,OAA6B;QAC9C,OAAO,EAAE,CAAC;QACV,QAAQ,EAAE,CAAC;QACX,eAAe,EAAE,CAAC;KACnB,CAAA;IAED,6EAA6E;IAC7E,yDAAyD;IACzD,MAAM,KAAK,GAAG,CAAC,WAAmB,EAA6C,EAAE;QAC/E,MAAM,UAAU,GAAG,MAAM,CAAC,GAAG,CAAC,WAAW,CAAC,CAAA;QAC1C,IAAI,UAAU,KAAK,SAAS;YAAE,OAAO,SAAS,CAAC,OAAO,CAAC,gBAAgB,EAAE,UAAU,CAAC,CAAA;QACpF,IAAI,SAAS,KAAK,SAAS;YAAE,OAAO,SAAS,CAAC,OAAO,CAAC,gBAAgB,EAAE,OAAO,CAAC,CAAA;QAChF,OAAO,MAAM,CAAC,OAAO,CACnB,SAAS,CAAC,GAAG,CAAC,WAAW,CAAC,EAC1B,MAAM,CAAC,KAAK,CAAC;YACX,MAAM,EAAE,GAAG,EAAE,CAAC,SAAS,CAAC,OAAO,CAAC,gBAAgB,EAAE,OAAO,CAAC;YAC1D,MAAM,EAAE,CAAC,QAAQ,EAAE,EAAE,CAAC,SAAS,CAAC,OAAO,CAAC,kBAAkB,EAAE,QAAQ,CAAC;SACtE,CAAC,CACH,CAAA;IACH,CAAC,CAAA;IAED,mFAAmF;IACnF,wEAAwE;IACxE,MAAM,QAAQ,GAAG,CAAC,WAAmB,EAAE,MAAkC,EAAE,IAAa,EAAE,EAAE,CAC1F,CAAC,SAAS,KAAK,SAAS,CAAC,CAAC,CAAC,MAAM,CAAC,OAAO,CAAC,MAAM,CAAC,CAAC,CAAC,CAAC,SAAS,CAAC,IAAI,CAAC,WAAW,EAAE,MAAM,CAAC,CAAC,CAAC,IAAI,CAC3F,MAAM,CAAC,GAAG,CAAC,CAAC,UAAU,EAAE,EAAE,CACxB,MAAM,CAAC,WAAW,CAAC,CAAC,OAA+B,EAAE,EAAE;QACrD,MAAM,OAAO,GAAG,MAAM,CAAC,GAAG,CAAC,WAAW,EAAE,UAAU,CAAC,CAAA;QACnD,IAAI,IAAI,KAAK,SAAS;YAAE,OAAO,CAAC,cAAc,CAAC,YAAY,CAAC,IAAI,EAAE,OAAO,CAAC,CAAA;QAC1E,OAAO,CAAC,SAAS,CAAC,YAAY,CAAC,MAAM,CAAC,IAAI,EAAE,EAAE,OAAO,CAAC,CAAA;QACtD,IAAI,OAAO;YAAE,OAAO,CAAC,SAAS,CAAC,YAAY,CAAC,CAAC,EAAE,OAAO,CAAC,CAAA;QACvD,OAAO,MAAM,CAAC,IAAI,CAAA;IACpB,CAAC,CAAC,CACH,CACF,CAAA;IAEH,kFAAkF;IAClF,mFAAmF;IACnF,uDAAuD;IACvD,MAAM,IAAI,GAAG,CAAC,WAAmB,EAAE,UAAyB,EAAE,EAAE,CAC9D,UAAU,KAAK,SAAS;QACtB,CAAC,CAAC,MAAM,CAAC,OAAO,CAAC,KAAK,CAAC,WAAW,CAAC,EAAE,CAAC,IAAI,EAAE,EAAE,CAC5C,MAAM,CAAC,OAAO,CACZ,UAAU,CAAC,IAAI,EAAE,WAAW,CAAC,EAC7B,CAAC,MAAM,EAAE,EAAE,CAAC,QAAQ,CAAC,WAAW,EAAE,MAAM,EAAE,MAAM,CAAC,OAAO,GAAG,IAAI,CAAC,OAAO,CAAC,CACzE,CAAC;QACJ,CAAC,CAAC,UAAU,CAAC,OAAO,EAAE,WAAW,EAAE,UAAU,CAAC,CAAA;IAElD,wEAAwE;IACxE,MAAM,KAAK,GAAG,CAAC,IAAY,EAAE,EAAE,CAAC,CAAU,MAA8B,EAA0B,EAAE,CAClG,MAAM,CAAC,SAAS,CAAC,CAAC,KAAK,EAAE,EAAE;QACzB,MAAM,OAAO,GAAG,KAAK,CAAC,sBAAsB,EAAE,CAAA;QAC9C,OAAO,MAAM,CAAC,MAAM,CAAC,MAAM,EAAE,CAAC,IAAI,EAAE,EAAE,CACpC,MAAM,CAAC,WAAW,CAAC,CAAC,OAA+B,EAAE,EAAE;YACrD,MAAM,OAAO,GAAG,QAAQ,CAAC,KAAK,CAAC,KAAK,CAAC,sBAAsB,EAAE,GAAG,OAAO,CAAC,CAAA;YACxE,OAAO,CAAC,QAAQ,CAAC,IAAI,EAAE,SAAS,CAAC,IAAI,CAAC,CAAC,CAAC,YAAY,CAAC,OAAO,EAAE,OAAO,CAAC,CAAA;YACtE,OAAO,MAAM,CAAC,IAAI,CAAA;QACpB,CAAC,CAAC,CAAC,CAAA;IACP,CAAC,CAAC,CAAA;IAEJ,iFAAiF;IACjF,+EAA+E;IAC/E,+EAA+E;IAC/E,0EAA0E;IAC1E,MAAM,eAAe,GAAG,CAAC,WAAmB,EAAE,MAAkC,EAAE,OAAmC,EAAE,EAAE,CACvH,MAAM,CAAC,OAAO,CAAC,OAAO,EAAE,WAAW,CAAC,CAAC,IAAI,CACvC,MAAM,CAAC,OAAO,CAAC,CAAC,MAAM,EAAE,EAAE,CACxB,QAAQ,CAAC,WAAW,EAAE,MAAM,CAAC,MAAM,CAAC,CAAC,GAAG,EAAE,KAAK,EAAE,KAAK,EAAE,EAAE,CAAC,IAAI,CAAC,GAAG,EAAE,KAAK,EAAE,OAAO,CAAC,KAAK,CAAE,CAAC,EAAE,MAAM,CAAC,CAAC,CACvG,EACD,MAAM,CAAC,MAAM,CACd,CAAA;IAEH,MAAM,MAAM,GAAG,MAAM,CAAC,UAAU,CAAC,QAAQ,CAAC,EACxC,IAAY,EACZ,WAAmB,EACnB,OAAgB,EAChB,SAA2E,EAC3E,QAAkB;QAElB,MAAM,MAAM,GAAG,KAAK,CAAC,CAAC,IAAI,CAAC,WAAW,CAAC,CAAA;QACvC,MAAM,EAAE,QAAQ,EAAE,KAAK,EAAE,OAAO,EAAE,GAAG,MAAM,CAAA;QAC3C,MAAM,EAAE,OAAO,EAAE,GAAG,SAAS,CAAC,QAAQ,CAAC,IAAI,CAAE,CAAA;QAC7C,MAAM,MAAM,GAAsC,GAAG,CAAC,MAAM,CAAC,KAAK,CAAC,CAAC,OAAO,CAAC,KAAK,EAAE,OAAO,EAAE,EAAE,WAAW,EAAE,OAAO,EAAE,CAAC,CAAC,CAAA;QACtH,MAAM,EAAE,aAAa,EAAE,GAAG,SAAS,CAAA;QACnC,IAAI,MAAM,CAAC,MAAM,KAAK,CAAC,EAAE,CAAC;YACxB,OAAO,EAAE,aAAa,EAAE,WAAW,EAAE,OAAO,EAAE,QAAQ,EAAE,MAAM,EAAE,aAAa,EAAE,CAAA;QACjF,CAAC;QACD,MAAM,MAAM,GAAG,KAAK,CAAC,CAAC,KAAK,CAAC,MAAM,CAAC;YACjC,aAAa;YACb,WAAW;YACX,eAAe,EAAE,OAAO;YACxB,MAAM,EAAE,KAAK,CAAC,CAAC,MAAM,CAAC,OAAO,CAAC,MAAM,EAAE,WAAW,CAAC;YAClD,GAAG,SAAS;YACZ,QAAQ;SACT,CAAC,CAAA;QACF,KAAK,CAAC,CAAC,eAAe,CAAC,WAAW,EAAE,MAAM,EAAE,MAAM,CAAC,CAAA;QACnD,MAAM,IAAI,GAAG,MAAM,CAAC,MAAM,CAAC,MAAM,GAAG,CAAC,CAAE,CAAA;QACvC,OAAO,EAAE,aAAa,EAAE,WAAW,EAAE,OAAO,EAAE,IAAI,CAAC,OAAO,EAAE,QAAQ,EAAE,IAAI,CAAC,QAAQ,EAAE,MAAM,EAAE,aAAa,EAAE,CAAA;IAC9G,CAAC,CAAC,CAAA;IAEF,8EAA8E;IAC9E,kFAAkF;IAClF,+CAA+C;IAC/C,MAAM,OAAO,GAAG,CACd,IAAY,EACZ,WAAmB,EACnB,OAAgB,EAChB,KAIC,EACD,EAAE;IACF,yEAAyE;IACzE,MAAM,CAAC,WAAW,CAAC,CAAC,aAAqC,EAAE,EAAE;QAC3D,MAAM,OAAO,GAAG,OAAO,CAAC,GAAG,CAAC,aAAa,EAAE,gBAAgB,CAAC,CAAA;QAC5D,MAAM,aAAa,GAAG,KAAK,EAAE,aAAa,IAAI,OAAO,EAAE,aAAa,CAAA;QACpE,MAAM,WAAW,GAAG,KAAK,EAAE,WAAW,IAAI,OAAO,EAAE,WAAW,CAAA;QAC9D,0DAA0D;QAC1D,MAAM,EAAE,GAAG,aAAa,IAAI,WAAW,IAAI,MAAM,CAAC,UAAU,EAAE,CAAA;QAC9D,MAAM,SAAS,GAAG,EAAE,aAAa,EAAE,aAAa,IAAI,EAAE,EAAE,WAAW,EAAE,WAAW,IAAI,EAAE,EAAE,CAAA;QACxF,MAAM,QAAQ,GAAG,aAAa,CAAC,OAAO,CAAC,GAAG,CAAC,aAAa,EAAE,eAAe,CAAC,EAAE,KAAK,EAAE,QAAQ,CAAC,CAAA;QAC5F,OAAO,MAAM,CAAC,IAAI,EAAE,WAAW,EAAE,OAAO,EAAE,SAAS,EAAE,QAAQ,CAAC,CAAC,IAAI,CACjE,MAAM,CAAC,QAAQ,CAAC,CAAC,KAAK,EAAE,EAAE,CACxB,KAAK,YAAY,mBAAmB,CAAC,CAAC,CAAC,MAAM,CAAC,MAAM,CAAC,OAAO,CAAC,SAAS,EAAE,CAAC,CAAC,CAAC,CAAC,CAAC,MAAM,CAAC,IAAI,CACzF,EACD,MAAM,CAAC,KAAK,CAAC;YACX,KAAK,EAAE,UAAU;YACjB,KAAK,EAAE,CAAC,KAAK,EAAE,EAAE,CAAC,KAAK,YAAY,mBAAmB;YACtD,QAAQ,EAAE,eAAe;SAC1B,CAAC,EACF,MAAM,CAAC,cAAc,CAAC,OAAO,CAAC,EAC9B,UAAU,CAAC,WAAW,CAAC,EACvB,CAAC,OAAO,EAAE,EAAE,CAAC,MAAM,CAAC,OAAO,CAAC,SAAS,EAAE,OAAO,CAAC,EAC/C,KAAK,CAAC,IAAI,CAAC,EACX,MAAM,CAAC,QAAQ,CAAC,GAAG,aAAa,IAAI,IAAI,EAAE,EAAE;YAC1C,UAAU,EAAE,EAAE,cAAc,EAAE,WAAW,EAAE,qBAAqB,EAAE,SAAS,CAAC,aAAa,EAAE;SAC5F,CAAC,CACH,CAAA;IACH,CAAC,CAAC,CAAA;IAEJ,MAAM,aAAa,GAAG,CAAC,IAAY,EAAE,MAA+B,EAAE,KAAc,EAAE,EAAE,CACtF,MAAM,CAAC,mBAAmB,CAAC,MAAM,CAAC,CAAC,KAAK,CAAC,CAAC,IAAI,CAC5C,MAAM,CAAC,QAAQ,CAAC,CAAC,KAAK,EAAE,EAAE,CAAC,IAAI,cAAc,CAAC,EAAE,aAAa,EAAE,IAAI,EAAE,OAAO,EAAE,KAAK,CAAC,OAAO,EAAE,CAAC,CAAC,CAChG,CAAA;IAEH,MAAM,QAAQ,GAAG,MAAM,CAAC,WAAW,CACjC,MAAM,CAAC,OAAO,CAAC,SAAS,CAAC,QAAQ,CAAC,CAAC,GAAG,CAAC,CAAC,CAAC,IAAI,EAAE,OAAO,CAAC,EAAE,EAAE,CAAC;QAC1D,IAAI;QACJ,CAAC,WAAmB,EAAE,OAAgB,EAAE,EAAE,CACxC,aAAa,CAAC,IAAI,EAAE,MAAM,CAAC,MAAM,CAAC,OAAO,CAAC,OAAO,CAAC,EAAE,OAAO,CAAC,CAAC,IAAI,CAC/D,MAAM,CAAC,OAAO,CAAC,CAAC,OAAO,EAAE,EAAE,CAAC,OAAO,CAAC,IAAI,EAAE,WAAW,EAAE,OAAO,CAAC,CAAC,CACjE;KACJ,CAAC,CACH,CAAA;IAED,MAAM,cAAc,GAAG,MAAM,CAAC,mBAAmB,CAAC,eAAe,CAAC,CAAA;IAElE,MAAM,QAAQ,GAAG,CAAC,KAAc,EAAE,EAAE,CAClC,MAAM,CAAC,GAAG,CAAC,QAAQ,CAAC;QAClB,MAAM,QAAQ,GAAG,KAAK,CAAC,CAAC,cAAc,CAAC,KAAK,CAAC,CAAC,IAAI,CAChD,MAAM,CAAC,QAAQ,CAAC,CAAC,KAAK,EAAE,EAAE,CAAC,IAAI,cAAc,CAAC,EAAE,aAAa,EAAE,IAAI,EAAE,SAAS,EAAE,OAAO,EAAE,KAAK,CAAC,OAAO,EAAE,CAAC,CAAC,CAC3G,CAAA;QACD,IAAI,CAAC,MAAM,CAAC,MAAM,CAAC,SAAS,CAAC,QAAQ,EAAE,QAAQ,CAAC,IAAI,CAAC,EAAE,CAAC;YACtD,OAAO,KAAK,CAAC,CAAC,IAAI,cAAc,CAAC,EAAE,aAAa,EAAE,IAAI,EAAE,QAAQ,CAAC,IAAI,EAAE,CAAC,CAAA;QAC1E,CAAC;QACD,MAAM,OAAO,GAAG,KAAK,CAAC,CAAC,aAAa,CAClC,QAAQ,CAAC,IAAI,EACb,MAAM,CAAC,WAAW,CAAC,SAAS,CAAC,QAAQ,CAAC,QAAQ,CAAC,IAAI,CAAE,CAAC,OAAO,CAAC,EAC9D,QAAQ,CAAC,OAAO,CACjB,CAAA;QACD,OAAO,KAAK,CAAC,CAAC,OAAO,CAAC,QAAQ,CAAC,IAAI,EAAE,QAAQ,CAAC,WAAW,EAAE,OAAO,EAAE,QAAQ,CAAC,CAAA;IAC/E,CAAC,CAAC,CAAA;IAEJ,MAAM,SAAS,GAAqC,CAAC,WAAW,EAAE,OAAO,EAAE,EAAE,CAC3E,IAAI,CAAC,WAAW,EAAE,OAAO,EAAE,UAAU,CAAC,CAAC,IAAI,CACzC,MAAM,CAAC,GAAG,CAAC,CAAC,EAAE,KAAK,EAAE,EAAE,EAAE,CAAC,KAAK,CAAC,EAChC,MAAM,CAAC,QAAQ,CAAC,GAAG,aAAa,YAAY,EAAE,EAAE,UAAU,EAAE,EAAE,cAAc,EAAE,WAAW,EAAE,EAAE,CAAC,CAC/F,CAAA;IAEH,MAAM,OAAO,GAAmC,CAAC,WAAW,EAAE,OAAO,EAAE,EAAE,CACvE,MAAM,CACJ,QAAQ,CAAC,WAAW,EAAE,EAAE,SAAS,EAAE,OAAO,EAAE,SAAS,EAAE,UAAU,EAAE,OAAO,EAAE,UAAU,EAAE,CAAC,EACzF,EAA6C,EAC7C,CAAC,OAAO,EAAE,KAAK,EAAE,MAAM,EAAE,EAAE;QACzB,OAAO,CAAC,IAAI,CAAC;YACX,OAAO,EAAE,MAAM,CAAC,OAAO;YACvB,SAAS,EAAE,MAAM,CAAC,SAAS;YAC3B,IAAI,EAAE,MAAM,CAAC,IAAI;YACjB,aAAa,EAAE,MAAM,CAAC,aAAa;YACnC,WAAW,EAAE,MAAM,CAAC,WAAW;YAC/B,QAAQ,EAAE,MAAM,CAAC,QAAQ;YACzB,GAAG,CAAC,OAAO,EAAE,OAAO,KAAK,IAAI,CAAC,CAAC,CAAC,EAAE,OAAO,EAAE,KAAK,EAAE,CAAC,CAAC,CAAC,EAAE,CAAC;SACzD,CAAC,CAAA;QACF,OAAO,OAAO,CAAA;IAChB,CAAC,CACF,CAAC,IAAI,CAAC,MAAM,CAAC,QAAQ,CAAC,GAAG,aAAa,UAAU,EAAE,EAAE,UAAU,EAAE,EAAE,cAAc,EAAE,WAAW,EAAE,EAAE,CAAC,CAAC,CAAA;IAEtG,OAAO;QACL,SAAS;QACT,QAAQ;QACR,QAAQ;QACR,SAAS;QACT,OAAO;KAC0B,CAAA;AACrC,CAAC,CAAC,CAAA;AAEF;;;;;GAKG;AACH,MAAM,CAAC,MAAM,IAAI,GAab,WAAkB,CAAA"}

package/dist/Causation.d.ts

@@ -0,0 +1,34 @@
+/**
+ * Why an event was recorded. Every event carries two ids:
+ *
+ * - `correlationId` is shared by everything that follows from one original
+ *   request, across aggregates and view models.
+ * - `causationId` names what directly caused the command that recorded it: the
+ *   request, or the event a view model or saga was reacting to.
+ *
+ * They travel in the fiber's context rather than in payloads. A command run
+ * outside any causation starts a new correlation with a fresh id. Inside a view
+ * model handler the event being handled is the cause, so a chain of reactions
+ * can be drawn as a tree without passing ids around by hand.
+ */
+import { Context, Effect } from "effect";
+import { type StoredEvent } from "./EventStore.ts";
+export interface Causation {
+    readonly correlationId: string;
+    readonly causationId: string;
+}
+/** The causation of commands run in this fiber, `undefined` outside any. */
+export declare const CurrentCausation: Context.Reference<Causation | undefined>;
+/** Runs an effect with this causation, for instance the id of an incoming HTTP request. */
+export declare const withCausation: {
+    (causation: Causation): <A, E, R>(effect: Effect.Effect<A, E, R>) => Effect.Effect<A, E, R>;
+    <A, E, R>(effect: Effect.Effect<A, E, R>, causation: Causation): Effect.Effect<A, E, R>;
+};
+/** The causation of commands run in reaction to a stored event. */
+export declare const fromEvent: (event: StoredEvent) => Causation;
+/**
+ * Runs an effect in reaction to a stored event, so commands it runs record that
+ * event as their cause. View models do this for their handlers already.
+ */
+export declare const causedBy: (event: StoredEvent) => <A, E, R>(effect: Effect.Effect<A, E, R>) => Effect.Effect<A, E, R>;
+//# sourceMappingURL=Causation.d.ts.map