@effect-agent/platform-cloudflare 0.0.1-beta.6 → 0.1.0-beta.100

package/dist/Alarm.mjs

@@ -0,0 +1,578 @@
+import { t as __exportAll } from "./rolldown-runtime-D7D4PA-g.mjs";
+import { DurableObjectContext } from "./CloudflareBindings.mjs";
+import { AuxiliaryDispatchMillis, CloudflareDurableRuntimeConfig } from "./CloudflareConfig.mjs";
+import { r as safeCauseMessage } from "./boundary-BguazVkh.mjs";
+import { Cause, Clock, Context, DateTime, Deferred, Effect, Exit, Fiber, Layer, Option, Random, Ref, Schema, Scope, Semaphore, Stream, Struct } from "effect";
+import "effect-agent/agent-registration";
+import { DurableAgentRuntime } from "effect-agent/durable-agent-runtime";
+import { SubmissionId, ThreadId } from "effect-agent/identifiers";
+import { SubmissionLedger } from "effect-agent/submission-ledger";
+import { ThreadProjectionMaintenance, drainDue } from "effect-agent/thread-projection-maintenance";
+import { SqlClient } from "effect/unstable/sql/SqlClient";
+//#region src/Alarm.ts
+var Alarm_exports = /* @__PURE__ */ __exportAll({
+	DurableAlarmError: () => DurableAlarmError,
+	DurableAlarmService: () => DurableAlarmService,
+	MaintenancePassReport: () => MaintenancePassReport,
+	ThreadHostMaintenance: () => ThreadHostMaintenance,
+	ThreadMaintenance: () => ThreadMaintenance,
+	ThreadMaintenanceFailpoint: () => ThreadMaintenanceFailpoint,
+	ThreadMessageDelivery: () => ThreadMessageDelivery,
+	ThreadMutationGate: () => ThreadMutationGate,
+	ThreadPublication: () => ThreadPublication,
+	publishCommitted: () => publishCommitted
+});
+/**
+* The single multiplexed Durable Object alarm (decision D-P6-2). A Durable Object has ONE
+* alarm slot; every cadence the Node host ran on fibers (wake scan, lease expiry, settlement
+* and abort re-checks, retry backoff) multiplexes into one idempotent maintenance pass, and
+* the slot always holds the EARLIEST deadline any caller asked for.
+*
+* The alarm invariant (plan §1.4): every committed actionable mutation carries a newer durable
+* maintenance generation and a committed alarm. Stable externally-driven waits may be
+* nonterminal without retaining an alarm; their resolving mutation advances the generation and
+* restores the alarm atomically.
+*/
+/** The Durable Object alarm API failed; surfaces on host entry points as a typed refusal. */
+var DurableAlarmError = class extends Schema.TaggedError()("DurableAlarmError", {
+	operation: Schema.String,
+	message: Schema.String,
+	cause: Schema.optionalKey(Schema.Defect())
+}) {};
+const alarmFailure = (operation) => (cause) => DurableAlarmError.make({
+	operation,
+	message: safeCauseMessage(cause, "The Cloudflare alarm API failed without a diagnostic"),
+	cause
+});
+const makeStorageOperation = Effect.map(SqlClient, (sql) => (operation, execute) => Effect.flatMap(Effect.serviceOption(sql.transactionService), (current) => {
+	const body = Effect.uninterruptible(Effect.tryPromise({
+		try: execute,
+		catch: alarmFailure(operation)
+	}));
+	return current._tag === "Some" ? body : Effect.scoped(Effect.andThen(sql.reserve.pipe(Effect.mapError(alarmFailure(operation))), body));
+}));
+/** `ctx.storage` alarm slot as an Effect service; storage is truth, never a memory field. */
+var DurableAlarmService = class DurableAlarmService extends Context.Service()("@effect-agent/platform-cloudflare/DurableAlarmService") {
+	static layer = Layer.effect(DurableAlarmService)(Effect.gen(function* () {
+		const { ctx } = yield* DurableObjectContext;
+		/**
+		* In-memory pass bookkeeping — a pure CACHE, never state: a fresh incarnation has no
+		* running pass, and a deferred wake lost to eviction was only ever a promptness hint
+		* on top of the already-committed pre-armed alarm.
+		*/
+		const runningPasses = yield* Ref.make(0);
+		const storageOperation = yield* makeStorageOperation;
+		const scheduled = storageOperation("get alarm", () => ctx.storage.getAlarm()).pipe(Effect.map((deadline) => deadline === null ? Option.none() : Option.some(deadline)));
+		const scheduleAt = (epochMillis) => storageOperation("set alarm", () => ctx.storage.setAlarm(epochMillis));
+		const ensureScheduledBy = (epochMillis) => storageOperation("ensure alarm", () => ctx.storage.transaction(async (transaction) => {
+			const existing = await transaction.getAlarm();
+			if (existing === null || existing > epochMillis) await transaction.setAlarm(epochMillis);
+		}));
+		const armNow = Clock.currentTimeMillis.pipe(Effect.flatMap((now) => ensureScheduledBy(now)));
+		const scheduleNow = Ref.get(runningPasses).pipe(Effect.flatMap((passes) => passes > 0 ? Effect.void : armNow));
+		const withWakesDeferred = (body) => Ref.update(runningPasses, (passes) => passes + 1).pipe(Effect.andThen(body), Effect.ensuring(Ref.update(runningPasses, (passes) => passes - 1)));
+		const cancel = storageOperation("delete alarm", () => ctx.storage.deleteAlarm());
+		return DurableAlarmService.of({
+			scheduled,
+			scheduleAt,
+			ensureScheduledBy,
+			scheduleNow,
+			withWakesDeferred,
+			cancel
+		});
+	}));
+};
+/** What one maintenance pass did — auditable evidence mirroring `NodeDurableHost`'s report. */
+var MaintenancePassReport = class extends Schema.Class("@effect-agent/platform-cloudflare/MaintenancePassReport")({
+	/** `caught-up` ran no runtime work (publication may be pending); `actionable` ran recovery. */
+	phase: Schema.Literals(["caught-up", "actionable"]),
+	/** Recovery decisions executed (or deferred) BEFORE any new claim in this pass. */
+	recovered: Schema.Int.check(Schema.isGreaterThanOrEqualTo(0)),
+	/** Whether the head Attempt settled. Joined input may settle with that head. */
+	settled: Schema.Int.check(Schema.isGreaterThanOrEqualTo(0)),
+	/** Submissions still nonterminal after the pass (suspended/unknown lanes stay honest). */
+	nonterminal: Schema.Int.check(Schema.isGreaterThanOrEqualTo(0)),
+	/** `rearmed` for dirty/autonomous work, `cleared` for stable waits or settlement. */
+	alarm: Schema.Literals(["rearmed", "cleared"])
+}) {};
+/** Test-only fault authority; production uses the inert layer. */
+var ThreadMaintenanceFailpoint = class extends Context.Service()("@effect-agent/platform-cloudflare/ThreadMaintenanceFailpoint") {
+	static layer = Layer.succeed(this)({ hit: () => Effect.void });
+};
+/** Opt in with `ThreadObject.layer(registrations, { publication: Layer.effect(ThreadPublication)(...) })`. */
+var ThreadPublication = class extends Context.Service()("@effect-agent/platform-cloudflare/ThreadPublication") {
+	static layer = Layer.succeed(this)({
+		invalidate: Effect.void,
+		prepareGeneration: () => Effect.void,
+		drain: Effect.void,
+		pendingDeadline: Effect.succeed(Option.none())
+	});
+};
+/**
+* Host-assembled native message recovery. The driver bounds each actual Claim and persists its
+* timeout/retry before this pump returns. Do not add a second timer starting at batch selection:
+* local Claim setup may take time, and expiration still owes the driver's local retry commit.
+*/
+const ThreadMessageDelivery = Context.Reference("@effect-agent/platform-cloudflare/ThreadMessageDelivery", { defaultValue: () => ({
+	drainUntil: () => Effect.void,
+	pendingDeadline: Effect.succeed(Option.none())
+}) });
+/**
+* Application obligations sharing this Object's alarm. Admit one initial external wave even on
+* a caught-up pass, then respond to wakes while native work runs. sourceFinished closes only
+* admission of NEW external waves. Keep local admission/hub subscriptions in the supplied event
+* Scope until maintenance tears it down; do not scope them to sourceFinished or to this Effect.
+* No deadline sleeps or automatic retry loops. Return after already-admitted waves finish.
+*
+* Declare a finite whole-wave allowance (1..300000ms): maximum for parallel lanes, sum for
+* sequential operations. Admit a wave only if its allowance fits before dispatchUntil. Later
+* arrivals cannot renew the retirement window. Maintenance bounds the join after sourceFinished,
+* interrupts and joins event Scope, then reads local deadlines under the mutation gate.
+*
+* Setup and pendingDeadline are bounded local operations. Persist claims/envelopes before
+* dispatch; interrupted waits leave exact retries/receipts recoverable. Cancellation is local,
+* not remote rollback. Retry accounting is unchanged. Network waits/finalizers must be
+* interruptible; short local atomic commits may be uninterruptible. Hooks never write the raw
+* alarm slot. Required native publication gates belong to ThreadPublication.
+*/
+const ThreadHostMaintenance = Context.Reference("@effect-agent/platform-cloudflare/ThreadHostMaintenance", { defaultValue: () => ({
+	dispatchTimeoutMillis: 1,
+	drainUntil: () => Effect.void,
+	pendingDeadline: Effect.succeed(Option.none())
+}) });
+const earliestDeadline = (left, right) => Option.isSome(left) ? Option.isSome(right) ? Option.some(Math.min(left.value, right.value)) : left : right;
+/** @internal A committed source operation must not become a failed operation because delivery failed. */
+const publishCommitted = Effect.gen(function* () {
+	const publication = yield* ThreadPublication;
+	yield* publication.invalidate.pipe(Effect.andThen(publication.drain));
+}).pipe(Effect.catchCause((cause) => Cause.hasInterrupts(cause) ? Effect.interrupt : Effect.logError("Thread publication deferred after source commit", cause)));
+const MaintenanceGeneration = Schema.BigIntFromString.check(Schema.isGreaterThanOrEqualToBigInt(0n));
+var BindingRetry = class extends Schema.Class("BindingRetry")({
+	threadId: ThreadId,
+	submissionId: SubmissionId,
+	attempts: Schema.Natural,
+	notBefore: Schema.Finite,
+	reportedAt: Schema.Finite
+}) {};
+var MaintenanceRetry = class extends Schema.Class("MaintenanceRetry")({
+	generation: MaintenanceGeneration,
+	notBefore: Schema.Finite,
+	nativeOnly: Schema.Boolean,
+	stalls: Schema.Int.check(Schema.isGreaterThanOrEqualTo(0), Schema.isLessThanOrEqualTo(30))
+}) {};
+/** Versioned, platform-private maintenance state stored through Durable Object KV. */
+var ThreadMaintenanceState = class extends Schema.Class("@effect-agent/platform-cloudflare/ThreadMaintenanceState")({
+	schemaVersion: Schema.Literal(1),
+	dirty: MaintenanceGeneration,
+	processed: MaintenanceGeneration,
+	nonterminal: Schema.Int.check(Schema.isGreaterThanOrEqualTo(0)),
+	/** One physical-owner cursor; old single-lane records need no conversion. */
+	lastServedThreadId: Schema.optionalKey(ThreadId),
+	bindingRetries: Schema.optionalKey(Schema.Array(BindingRetry)),
+	/** Absent on older records. A newer mutation makes this retry obsolete. */
+	retry: Schema.optionalKey(MaintenanceRetry)
+}) {};
+const MAINTENANCE_STATE_KEY = "effect-agent:thread-maintenance:v1";
+const decodeMaintenanceState = Schema.decodeUnknownSync(ThreadMaintenanceState);
+const encodeMaintenanceState = Schema.encodeSync(ThreadMaintenanceState);
+const initialMaintenanceState = () => ThreadMaintenanceState.make({
+	schemaVersion: 1,
+	dirty: 1n,
+	processed: 0n,
+	nonterminal: 0
+});
+const readMaintenanceState = async (transaction) => {
+	const encoded = await transaction.get(MAINTENANCE_STATE_KEY);
+	return encoded === void 0 ? {
+		state: initialMaintenanceState(),
+		initialized: false
+	} : {
+		state: decodeMaintenanceState(encoded),
+		initialized: true
+	};
+};
+const ensureTransactionAlarmBy = async (transaction, deadline) => {
+	const scheduled = await transaction.getAlarm();
+	if (scheduled === null || scheduled > deadline) await transaction.setAlarm(deadline);
+};
+const stableExternalWait = (snapshot, reports) => {
+	const report = reports.get(snapshot.submissionId);
+	if (report?.decision._tag === "SettleAborted") return false;
+	switch (snapshot.state) {
+		case "suspended":
+		case "joined": return true;
+		case "unknown": return report?.disposition === "unknown";
+		case "admitted": return reports.get(snapshot.submissionId)?.decision._tag === "AwaitParentEstablishment";
+		case "input-applied":
+		case "joining":
+		case "ready":
+		case "running":
+		case "settled":
+		case "terminalizing": return false;
+	}
+};
+/**
+* Shared prearm/acknowledgement boundary for ingress and runtime-owned producers.
+* `ThreadObject.layer` provides this same instance in its Services. Rebuilt runtime/maintenance
+* Layers must reuse that instance; a second gate cannot observe the native producers' activity.
+*/
+var ThreadMutationGate = class ThreadMutationGate extends Context.Service()("@effect-agent/platform-cloudflare/internal/ThreadMutationGate") {
+	static layer = Layer.effect(this)(Effect.gen(function* () {
+		const { ctx } = yield* DurableObjectContext;
+		const config = yield* CloudflareDurableRuntimeConfig;
+		const failpoint = yield* ThreadMaintenanceFailpoint;
+		const activeMutations = yield* Ref.make(0);
+		const generationGate = yield* Semaphore.make(1);
+		const minimumAlarmDelay = Math.max(1, Math.ceil(config.alarmBackoffBase / 2));
+		const runTransaction = yield* makeStorageOperation;
+		const beginMutation = Effect.fn("ThreadMaintenance.beginMutation")(function* (invalidatesRecovery) {
+			yield* failpoint.hit("maintenance:dirty:before");
+			const now = yield* Clock.currentTimeMillis;
+			yield* runTransaction("advance maintenance generation", () => ctx.storage.transaction(async (transaction) => {
+				const { state, initialized } = await readMaintenanceState(transaction);
+				const next = ThreadMaintenanceState.make({
+					...state,
+					dirty: state.dirty + (invalidatesRecovery ? 1n : 0n)
+				});
+				if (invalidatesRecovery || !initialized) await transaction.put(MAINTENANCE_STATE_KEY, encodeMaintenanceState(next));
+				await ensureTransactionAlarmBy(transaction, now + minimumAlarmDelay);
+			}));
+			yield* failpoint.hit("maintenance:dirty:after");
+			yield* Ref.update(activeMutations, (active) => active + 1);
+		});
+		const endMutation = generationGate.withPermit(Ref.update(activeMutations, (active) => Math.max(0, active - 1)));
+		const withMutation = (body, options) => Effect.acquireUseRelease(generationGate.withPermit(beginMutation(options?.invalidatesRecovery ?? true)), () => failpoint.hit("maintenance:mutation:armed").pipe(Effect.andThen(body), Effect.tap(() => failpoint.hit("maintenance:mutation:finished"))), () => endMutation);
+		return ThreadMutationGate.of({
+			withMutation,
+			withSnapshot: (body) => generationGate.withPermit(Effect.flatMap(Ref.get(activeMutations), body))
+		});
+	}));
+};
+/**
+* Incremental, quiescent maintenance over a durable dirty/processed generation (issue #93).
+*
+* `pass` = generation snapshot/pre-arm → recovery → one head Attempt → generation acknowledgement:
+*
+* 1. One storage transaction reads dirty/processed and re-arms before work. A caught-up forced
+*    alarm takes an O(1) path without recovery, ledger scans, or canonical-history reads.
+* 2. Recovery strictly precedes a new claim. One head Attempt advances the lane and requests
+*    a safe yield after ten minutes. The whole event has a fourteen-minute cooperative timeout.
+* 3. Auxiliary dispatch and listeners belong to the event Scope. After native completion,
+*    stop new external waves, join native delivery through its driver-owned Claim deadline,
+*    and bound host/backfill work by explicit allowances before closing and joining Scope.
+*    Ordinary auxiliary setup failures are reported after the one native opportunity.
+* 4. The final transaction acknowledges only the generation observed at pass start. A racing
+*    mutation therefore remains `dirty > processed` and retains its atomically-established alarm.
+* 5. Stable external waits acknowledge and clear. Autonomous retry, indeterminate, and lease
+*    recovery states leave their generation dirty and retain bounded backoff rearming.
+*/
+var ThreadMaintenance = class ThreadMaintenance extends Context.Service()("@effect-agent/platform-cloudflare/ThreadMaintenance") {
+	static layer = Layer.effect(ThreadMaintenance)(Effect.gen(function* () {
+		const runtime = yield* DurableAgentRuntime;
+		const ledger = yield* SubmissionLedger;
+		const alarm = yield* DurableAlarmService;
+		const config = yield* CloudflareDurableRuntimeConfig;
+		const { ctx } = yield* DurableObjectContext;
+		const failpoint = yield* ThreadMaintenanceFailpoint;
+		const mutations = yield* ThreadMutationGate;
+		const publication = yield* ThreadPublication;
+		const projection = yield* ThreadProjectionMaintenance;
+		const messages = yield* ThreadMessageDelivery;
+		const host = yield* ThreadHostMaintenance;
+		const projectionDeadline = projection.pendingDeadline.pipe(Effect.catchCauseIf((cause) => !Cause.hasInterrupts(cause), (cause) => Effect.logError("Thread projection deadline unavailable", cause).pipe(Effect.as(Option.some(0)))));
+		const pendingDeadline = Effect.gen(function* () {
+			return earliestDeadline(earliestDeadline(yield* publication.pendingDeadline, yield* messages.pendingDeadline), earliestDeadline(yield* projectionDeadline, yield* host.pendingDeadline));
+		});
+		const maintenancePassGate = yield* Semaphore.make(1);
+		const minimumAlarmDelay = Math.max(1, Math.ceil(config.alarmBackoffBase / 2));
+		const runTransaction = yield* makeStorageOperation;
+		const ensureAlarm = Effect.fn("ThreadMaintenance.ensureAlarm")(function* () {
+			yield* failpoint.hit("maintenance:ensure:before");
+			const now = yield* Clock.currentTimeMillis;
+			const retry = yield* runTransaction("ensure maintenance alarm", () => ctx.storage.transaction(async (transaction) => {
+				const { state, initialized } = await readMaintenanceState(transaction);
+				if (!initialized) await transaction.put(MAINTENANCE_STATE_KEY, encodeMaintenanceState(state));
+				if (state.dirty > state.processed) await ensureTransactionAlarmBy(transaction, state.retry?.generation === state.dirty ? Math.max(now + minimumAlarmDelay, state.retry.notBefore) : now + config.wakeScanInterval);
+				return state.retry?.generation === state.dirty ? state.retry : void 0;
+			}));
+			const deadline = yield* pendingDeadline;
+			if (Option.isSome(deadline)) yield* runTransaction("ensure publication alarm", () => ctx.storage.transaction((transaction) => ensureTransactionAlarmBy(transaction, Math.max(now + minimumAlarmDelay, deadline.value <= now && retry !== void 0 && !retry.nativeOnly ? Math.max(deadline.value, retry.notBefore) : deadline.value))));
+			yield* failpoint.hit("maintenance:ensure:after");
+		});
+		const beginPass = Effect.fn("ThreadMaintenance.beginPass")(function* (observed) {
+			yield* failpoint.hit("maintenance:begin:before");
+			const now = yield* Clock.currentTimeMillis;
+			const result = yield* runTransaction("begin maintenance pass", () => ctx.storage.transaction(async (transaction) => {
+				const { state, initialized } = await readMaintenanceState(transaction);
+				observed.generation = state.dirty;
+				if (!initialized) await transaction.put(MAINTENANCE_STATE_KEY, encodeMaintenanceState(state));
+				const retryAt = state.retry?.generation === state.dirty ? state.retry.notBefore : 0;
+				await ensureTransactionAlarmBy(transaction, now + minimumAlarmDelay);
+				if (state.processed >= state.dirty || retryAt > now) return {
+					_tag: "CaughtUp",
+					nonterminal: state.nonterminal
+				};
+				return {
+					_tag: "Actionable",
+					generation: state.dirty,
+					nonterminal: state.nonterminal,
+					stalls: state.retry?.generation === state.dirty ? state.retry.stalls : 0
+				};
+			}));
+			yield* failpoint.hit("maintenance:begin:after");
+			return result;
+		});
+		const backoffDelay = (priorStalls, jitter) => {
+			const backoff = Math.min(config.alarmBackoffCap, config.alarmBackoffBase * 2 ** Math.min(priorStalls, 30));
+			return Math.ceil(backoff / 2 + backoff / 2 * jitter);
+		};
+		const rearmDelay = Effect.fn("ThreadMaintenance.rearmDelay")(function* (progressed, priorStalls) {
+			return progressed ? config.alarmBackoffBase : backoffDelay(priorStalls, yield* Random.next);
+		});
+		const rearmFailure = Effect.fn("ThreadMaintenance.rearmFailure")(function* (observed) {
+			const { generation, nativeOnly } = observed;
+			if (generation === void 0) return;
+			yield* failpoint.hit("maintenance:retry:before");
+			yield* mutations.withSnapshot((active) => Effect.gen(function* () {
+				const deadline = yield* pendingDeadline.pipe(Effect.catchCause(() => Effect.succeed(Option.none())));
+				const now = yield* Clock.currentTimeMillis;
+				const jitter = yield* Random.next;
+				yield* runTransaction("back off failed maintenance", () => ctx.storage.transaction(async (transaction) => {
+					const { state } = await readMaintenanceState(transaction);
+					const previous = state.retry?.generation === generation ? state.retry : void 0;
+					const retry = MaintenanceRetry.make({
+						generation,
+						notBefore: Math.max(previous?.notBefore ?? 0, now + backoffDelay(previous?.stalls ?? 0, jitter)),
+						nativeOnly,
+						stalls: Math.min(30, (previous?.stalls ?? 0) + 1)
+					});
+					await transaction.put(MAINTENANCE_STATE_KEY, encodeMaintenanceState(ThreadMaintenanceState.make({
+						...state,
+						retry
+					})));
+					const nativeDeadline = active > 0 || state.dirty !== generation ? now + minimumAlarmDelay : retry.notBefore;
+					await transaction.setAlarm(Math.max(now + minimumAlarmDelay, Option.isSome(deadline) && (nativeOnly || deadline.value > now) ? Math.min(nativeDeadline, deadline.value) : nativeDeadline));
+				}));
+			}));
+			yield* failpoint.hit("maintenance:retry:after");
+		});
+		const pass = Effect.fn("ThreadMaintenance.pass")(function* (yieldAfter, dispatchUntil, observed) {
+			const annotate = (report) => Effect.annotateCurrentSpan({
+				phase: report.phase,
+				recovered: report.recovered,
+				settled: report.settled,
+				nonterminal: report.nonterminal,
+				alarm: report.alarm
+			}).pipe(Effect.as(report));
+			const started = yield* mutations.withSnapshot((activeAtStart) => Effect.gen(function* () {
+				const generation = yield* beginPass(observed);
+				if (generation._tag === "Actionable" && activeAtStart === 0) yield* publication.prepareGeneration(generation.generation);
+				return {
+					...generation,
+					activeAtStart
+				};
+			}));
+			const auxiliaryScope = yield* Effect.acquireRelease(Scope.make("parallel"), (scope, exit) => Scope.close(scope, exit));
+			const sourceFinished = yield* Deferred.make();
+			const finished = Deferred.await(sourceFinished);
+			const deliveryFiber = yield* Effect.forkIn(Scope.provide(auxiliaryScope)(messages.drainUntil(finished, dispatchUntil)), auxiliaryScope);
+			const hostFiber = yield* Effect.forkIn(Scope.provide(auxiliaryScope)(Effect.gen(function* () {
+				yield* Schema.decodeEffect(AuxiliaryDispatchMillis)(host.dispatchTimeoutMillis).pipe(Effect.mapError((cause) => DurableAlarmError.make({
+					operation: "host dispatch allowance",
+					message: "Declare an integer whole-wave allowance between 1 and 300000 milliseconds",
+					cause
+				})));
+				yield* host.drainUntil(finished, dispatchUntil);
+			})), auxiliaryScope);
+			const backfill = yield* Effect.forkIn(drainDue.pipe(Effect.provideService(ThreadProjectionMaintenance, projection), Effect.timeoutOption(config.projectionDispatchTimeoutMillis)), auxiliaryScope);
+			const finishAuxiliary = Effect.gen(function* () {
+				yield* Deferred.succeed(sourceFinished, void 0);
+				const remaining = Math.max(1, DateTime.toEpochMillis(dispatchUntil) - (yield* Clock.currentTimeMillis));
+				const hostJoin = yield* Effect.forkIn(Fiber.join(hostFiber).pipe(Effect.timeoutOption(Math.min(host.dispatchTimeoutMillis, remaining)), Effect.tap((result) => Effect.annotateCurrentSpan({ "host.timedOut": Option.isNone(result) }))), auxiliaryScope);
+				yield* Fiber.joinAll([
+					deliveryFiber,
+					hostJoin,
+					backfill
+				]);
+				yield* Scope.close(auxiliaryScope, Exit.void);
+			});
+			const deadline = yield* publication.pendingDeadline;
+			if (started._tag === "Actionable" || Option.isSome(deadline) && deadline.value <= (yield* Clock.currentTimeMillis)) yield* publication.drain;
+			const pending = yield* publication.pendingDeadline;
+			if (started._tag === "CaughtUp" || Option.isSome(pending)) {
+				yield* finishAuxiliary;
+				yield* failpoint.hit("maintenance:finish:before");
+				const disposition = yield* mutations.withSnapshot((active) => Effect.gen(function* () {
+					const latest = yield* pendingDeadline;
+					const now = yield* Clock.currentTimeMillis;
+					return yield* runTransaction("finish publication pass", () => ctx.storage.transaction(async (transaction) => {
+						const { state } = await readMaintenanceState(transaction);
+						const nativeDeadline = active > 0 || state.dirty > state.processed ? state.retry?.generation === state.dirty && active === 0 ? Math.max(now + minimumAlarmDelay, state.retry.notBefore) : now + config.wakeScanInterval : Infinity;
+						const next = Option.isSome(latest) ? Math.min(nativeDeadline, latest.value) : nativeDeadline;
+						if (Number.isFinite(next)) {
+							await transaction.setAlarm(Math.max(now + minimumAlarmDelay, next));
+							return "rearmed";
+						}
+						await transaction.deleteAlarm();
+						return "cleared";
+					}));
+				}));
+				yield* failpoint.hit("maintenance:finish:after");
+				return yield* annotate(MaintenancePassReport.make({
+					phase: "caught-up",
+					recovered: 0,
+					settled: 0,
+					nonterminal: started.nonterminal,
+					alarm: disposition
+				}));
+			}
+			observed.nativeOnly = true;
+			const recovered = yield* runtime.runRecovery;
+			const reports = new Map(recovered.map((report) => [report.submissionId, report]));
+			const current = yield* Stream.runCollect(ledger.scanNonterminal);
+			const heads = /* @__PURE__ */ new Map();
+			for (const row of current) {
+				if (row.state === "unknown" && stableExternalWait(row, reports)) continue;
+				if (!heads.has(row.threadId)) heads.set(row.threadId, row);
+			}
+			const eligible = [...heads.values()].filter((head) => !stableExternalWait(head, reports)).map((head) => head.threadId).sort();
+			const selectionTime = yield* Clock.currentTimeMillis;
+			yield* failpoint.hit("maintenance:select:before");
+			const selection = yield* runTransaction("select maintenance lane", () => ctx.storage.transaction(async (transaction) => {
+				const { state } = await readMaintenanceState(transaction);
+				const retries = (state.bindingRetries ?? []).filter((retry) => heads.get(retry.threadId)?.submissionId === retry.submissionId);
+				const runnable = eligible.filter((threadId) => !retries.some((retry) => retry.threadId === threadId && retry.notBefore > selectionTime));
+				const next = runnable.find((threadId) => state.lastServedThreadId === void 0 || threadId > state.lastServedThreadId) ?? runnable[0];
+				if (next !== void 0) await transaction.put(MAINTENANCE_STATE_KEY, encodeMaintenanceState(ThreadMaintenanceState.make({
+					...state,
+					lastServedThreadId: next
+				})));
+				return {
+					selected: next,
+					retries
+				};
+			}));
+			yield* failpoint.hit("maintenance:select:after");
+			const selected = selection.selected === void 0 ? void 0 : heads.get(selection.selected);
+			let retries = selection.retries;
+			let bindingFailure;
+			const settlement = selected === void 0 ? Option.none() : yield* runtime.processThreadHead(selected.threadId, { yieldAfter }).pipe(Effect.catchTag("BindingUnavailable", (failure) => {
+				bindingFailure = failure;
+				return Effect.succeed(Option.none());
+			}));
+			if (selected !== void 0) {
+				const previous = retries.find((retry) => retry.submissionId === selected.submissionId);
+				let retry;
+				let reportBindingFailure = false;
+				if (bindingFailure !== void 0) {
+					const now = yield* Clock.currentTimeMillis;
+					const attempts = Math.min(30, (previous?.attempts ?? 0) + 1);
+					reportBindingFailure = previous === void 0 || now - previous.reportedAt >= 9e5;
+					retry = BindingRetry.make({
+						threadId: selected.threadId,
+						submissionId: selected.submissionId,
+						attempts,
+						notBefore: now + Math.min(6e4, 5e3 * 2 ** (attempts - 1)),
+						reportedAt: reportBindingFailure ? now : previous?.reportedAt ?? now
+					});
+				}
+				if (retry !== void 0 || previous !== void 0) {
+					yield* failpoint.hit("maintenance:binding-retry:before");
+					retries = yield* runTransaction("record submission binding retry", () => ctx.storage.transaction(async (transaction) => {
+						const { state } = await readMaintenanceState(transaction);
+						const bindingRetries = [...(state.bindingRetries ?? []).filter((entry) => entry.submissionId !== selected.submissionId), ...retry === void 0 ? [] : [retry]];
+						await transaction.put(MAINTENANCE_STATE_KEY, encodeMaintenanceState(ThreadMaintenanceState.make({
+							...state,
+							bindingRetries
+						})));
+						return bindingRetries;
+					}));
+					yield* failpoint.hit("maintenance:binding-retry:after");
+				}
+				if (bindingFailure !== void 0) yield* reportBindingFailure ? Effect.logError("Thread awaits a current agent binding; original work remains pending", Cause.fail(bindingFailure)) : Effect.logDebug("Thread binding retry remains pending", Cause.fail(bindingFailure));
+			}
+			observed.nativeOnly = false;
+			yield* finishAuxiliary;
+			const remaining = yield* Stream.runCollect(ledger.scanNonterminal);
+			const waitingHeads = /* @__PURE__ */ new Map();
+			const autonomous = remaining.some((snapshot) => {
+				if (snapshot.state === "unknown" && stableExternalWait(snapshot, reports)) return false;
+				const headWaiting = waitingHeads.get(snapshot.threadId);
+				if (headWaiting === void 0) waitingHeads.set(snapshot.threadId, stableExternalWait(snapshot, reports));
+				if (headWaiting === true && snapshot.state === "ready" && reports.get(snapshot.submissionId)?.decision._tag === "ApplyInput") return false;
+				return !stableExternalWait(snapshot, reports);
+			});
+			const progressed = Option.isSome(settlement) || recovered.some((report) => report.disposition === "repaired");
+			const now = yield* Clock.currentTimeMillis;
+			const ordinaryDelay = autonomous ? yield* rearmDelay(progressed, started.stalls) : 0;
+			const nextEligible = eligible.map((threadId) => retries.find((retry) => retry.submissionId === heads.get(threadId)?.submissionId)?.notBefore ?? now);
+			const bindingDelay = nextEligible.length === 0 ? 0 : Math.max(0, Math.min(...nextEligible) - now);
+			const delay = Math.max(ordinaryDelay, bindingDelay);
+			yield* failpoint.hit("maintenance:finish:before");
+			const alarmDisposition = yield* mutations.withSnapshot((active) => Effect.gen(function* () {
+				const publicationDeadline = yield* pendingDeadline;
+				return yield* runTransaction("finish maintenance pass", () => ctx.storage.transaction(async (transaction) => {
+					const { state } = await readMaintenanceState(transaction);
+					const processed = autonomous || started.activeAtStart > 0 || active > 0 ? state.processed : state.processed > started.generation ? state.processed : started.generation;
+					const next = ThreadMaintenanceState.make({
+						...Struct.omit(state, ["retry"]),
+						processed,
+						nonterminal: remaining.length,
+						bindingRetries: (state.bindingRetries ?? []).filter((retry) => remaining.some((row) => row.submissionId === retry.submissionId)),
+						...autonomous && !progressed ? { retry: MaintenanceRetry.make({
+							generation: started.generation,
+							notBefore: now + delay,
+							nativeOnly: true,
+							stalls: Math.min(30, started.stalls + 1)
+						}) } : {}
+					});
+					await transaction.put(MAINTENANCE_STATE_KEY, encodeMaintenanceState(next));
+					if (autonomous) {
+						const nativeDeadline = started.activeAtStart > 0 || active > 0 || state.dirty !== started.generation ? now + minimumAlarmDelay : now + delay;
+						await transaction.setAlarm(Option.isSome(publicationDeadline) ? Math.max(now + minimumAlarmDelay, Math.min(nativeDeadline, publicationDeadline.value)) : nativeDeadline);
+						return "rearmed";
+					}
+					if (started.activeAtStart > 0 || active > 0 || next.dirty > next.processed) {
+						await ensureTransactionAlarmBy(transaction, Option.isSome(publicationDeadline) ? Math.max(now + minimumAlarmDelay, Math.min(now + config.wakeScanInterval, publicationDeadline.value)) : now + config.wakeScanInterval);
+						return "rearmed";
+					}
+					if (Option.isSome(publicationDeadline)) {
+						await transaction.setAlarm(Math.max(now + minimumAlarmDelay, publicationDeadline.value));
+						return "rearmed";
+					}
+					await transaction.deleteAlarm();
+					return "cleared";
+				}));
+			}));
+			yield* failpoint.hit("maintenance:finish:after");
+			return yield* annotate(MaintenancePassReport.make({
+				phase: "actionable",
+				recovered: recovered.length,
+				settled: Option.isSome(settlement) ? 1 : 0,
+				nonterminal: remaining.length,
+				alarm: alarmDisposition
+			}));
+		});
+		return ThreadMaintenance.of({
+			pass: Effect.gen(function* () {
+				const now = yield* Clock.currentTimeMillis;
+				const yieldAfter = DateTime.makeUnsafe(now + 6e5);
+				const dispatchUntil = DateTime.makeUnsafe(now + 84e4);
+				const observed = { nativeOnly: false };
+				return yield* alarm.withWakesDeferred(maintenancePassGate.withPermit(Effect.scoped(pass(yieldAfter, dispatchUntil, observed)).pipe(Effect.onErrorIf(() => true, () => rearmFailure(observed)))));
+			}).pipe(Effect.timeoutOrElse({
+				duration: "14 minutes",
+				orElse: () => DurableAlarmError.make({
+					operation: "maintenance pass deadline",
+					message: "The maintenance event exceeded its 14 minute deadline; durable recovery remains pending"
+				})
+			})),
+			ensureAlarm: mutations.withSnapshot(() => ensureAlarm()),
+			withMutation: (body) => mutations.withMutation(body.pipe(Effect.tap(() => publishCommitted.pipe(Effect.provideService(ThreadPublication, publication)))))
+		});
+	}));
+};
+//#endregion
+export { DurableAlarmError, DurableAlarmService, MaintenancePassReport, ThreadHostMaintenance, ThreadMaintenance, ThreadMaintenanceFailpoint, ThreadMessageDelivery, ThreadMutationGate, ThreadPublication, publishCommitted, Alarm_exports as t };
+
+//# sourceMappingURL=Alarm.mjs.map