@graftland/plugin-remote 0.0.0-stage → 0.2.0-beta.2

package/dist/internal/runner/Store.js

@@ -0,0 +1,78 @@
+import { Key, SessionRecord, StateStorageError, Store } from "./model.js";
+import { retain, save } from "./Retention.js";
+import { Array, Cause, Effect, FileSystem, HashMap, HashSet, Layer, Path, Ref, Schema, Semaphore, String } from "effect";
+import { Digest, SecureRandom } from "effect/crypto";
+// src/internal/runner/Store.ts
+/** Injectable store used by deterministic supervisor tests. */
+const memory = Effect.gen(function* () {
+	const records = yield* Ref.make(HashMap.empty());
+	return Store.of({
+		list: Ref.get(records).pipe(Effect.map((records) => Array.fromIterable(HashMap.values(records)))),
+		save: (record) => Ref.update(records, (all) => save(all, record))
+	});
+});
+/**
+* Atomically replaced records retain unfinished sessions and each key's high-water mark.
+* Older terminal request ids expire; Open fences their retries with expectedGeneration.
+* Requires exclusive directory ownership; it is not a multi-writer database.
+*/
+const directory = (root) => Effect.gen(function* () {
+	const fs = yield* FileSystem.FileSystem;
+	const path = yield* Path.Path;
+	const digest = yield* Digest.Digest;
+	const json = Schema.fromJsonString(Schema.toCodecJson(SessionRecord));
+	const random = yield* SecureRandom.SecureRandom;
+	const storage = (effect) => effect.pipe(Effect.mapError((error) => error._tag === "StateStorageError" ? error : StateStorageError.make({
+		detail: "Runner state storage failed",
+		cause: Cause.fail(error)
+	})));
+	yield* storage(fs.makeDirectory(root, { recursive: true }).pipe(Effect.uninterruptible));
+	const mutex = yield* Semaphore.make(1);
+	const read = Effect.gen(function* () {
+		const files = yield* fs.readDirectory(root);
+		return yield* Effect.forEach(Array.filter(files, String.endsWith(".json")), (file) => fs.readFileString(path.join(root, file)).pipe(Effect.flatMap(Schema.decodeEffect(json)), Effect.map((record) => ({
+			file,
+			record
+		}))));
+	});
+	const compact = Effect.scoped(Effect.gen(function* () {
+		const rows = yield* read;
+		const retained = retain(Array.map(rows, (row) => row.record));
+		const tokens = HashSet.fromIterable(Array.map(retained, (record) => record.handle.token));
+		const obsolete = Array.filter(rows, (row) => !HashSet.has(tokens, row.record.handle.token));
+		yield* Effect.forEach(obsolete, (row) => fs.remove(path.join(root, row.file)).pipe(Effect.uninterruptible), { discard: true });
+		if (obsolete.length > 0) yield* (yield* fs.open(root, { flag: "r" })).sync.pipe(Effect.uninterruptible);
+	}));
+	yield* storage(compact);
+	return Store.of({
+		list: storage(mutex.withPermit(read.pipe(Effect.map((rows) => Array.map(rows, (row) => row.record))))),
+		save: (record) => storage(mutex.withPermit(Effect.scoped(Effect.gen(function* () {
+			const encoded = yield* Schema.encodeEffect(json)(record);
+			const address = yield* Schema.encodeEffect(Schema.fromJsonString(Schema.Struct({
+				key: Key,
+				generation: Schema.Int
+			})))({
+				key: record.handle.key,
+				generation: record.handle.generation
+			});
+			const name = yield* digest.digestHex(Digest.sha256, new TextEncoder().encode(address));
+			const nonce = yield* random.uuidV4();
+			const temporary = path.join(root, `.${name}.${nonce}.tmp`);
+			const destination = path.join(root, name + ".json");
+			yield* Effect.acquireRelease(fs.open(temporary, {
+				flag: "wx",
+				mode: 384
+			}), () => fs.remove(temporary, { force: true }).pipe(Effect.orDie)).pipe(Effect.flatMap((file) => file.writeAll(new TextEncoder().encode(encoded)).pipe(Effect.uninterruptible, Effect.andThen(file.sync.pipe(Effect.uninterruptible)))));
+			yield* Effect.uninterruptible(Effect.gen(function* () {
+				yield* fs.rename(temporary, destination);
+				yield* (yield* fs.open(root, { flag: "r" })).sync.pipe(Effect.uninterruptible);
+			}));
+			yield* compact;
+		}))))
+	});
+});
+Layer.effect(Store, memory);
+const layerDirectory = (root) => Layer.effect(Store, directory(root));
+export { directory, layerDirectory, memory };
+
+//# sourceMappingURL=Store.js.map

package/dist/internal/runner/Store.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"Store.js","names":["Retention.save","Retention.retain"],"sources":["../../../src/internal/runner/Store.ts"],"sourcesContent":["import {\n\tArray,\n\tCause,\n\tLayer,\n\tEffect,\n\tFileSystem,\n\tHashMap,\n\tHashSet,\n\tPath,\n\tRef,\n\tSchema,\n\tSemaphore,\n\tString,\n\ttype PlatformError,\n} from \"effect\"\nimport { Digest, SecureRandom } from \"effect/crypto\"\nimport { Key, SessionRecord, Store, StateStorageError } from \"./model\"\nimport * as Retention from \"./Retention\"\n\n/** Injectable store used by deterministic supervisor tests. */\nexport const memory = Effect.gen(function* () {\n\tconst records = yield* Ref.make(HashMap.empty<string, SessionRecord>())\n\treturn Store.of({\n\t\tlist: Ref.get(records).pipe(\n\t\t\tEffect.map((records) => Array.fromIterable(HashMap.values(records))),\n\t\t),\n\t\tsave: (record) => Ref.update(records, (all) => Retention.save(all, record)),\n\t})\n})\n\n/**\n * Atomically replaced records retain unfinished sessions and each key's high-water mark.\n * Older terminal request ids expire; Open fences their retries with expectedGeneration.\n * Requires exclusive directory ownership; it is not a multi-writer database.\n */\nexport const directory = (root: string) =>\n\tEffect.gen(function* () {\n\t\tconst fs = yield* FileSystem.FileSystem\n\t\tconst path = yield* Path.Path\n\t\tconst digest = yield* Digest.Digest\n\t\tconst json = Schema.fromJsonString(Schema.toCodecJson(SessionRecord))\n\t\tconst random = yield* SecureRandom.SecureRandom\n\t\tconst storage = <A, R>(\n\t\t\teffect: Effect.Effect<\n\t\t\t\tA,\n\t\t\t\tPlatformError.PlatformError | Schema.SchemaError | StateStorageError,\n\t\t\t\tR\n\t\t\t>,\n\t\t) =>\n\t\t\teffect.pipe(\n\t\t\t\tEffect.mapError((error) =>\n\t\t\t\t\terror._tag === \"StateStorageError\"\n\t\t\t\t\t\t? error\n\t\t\t\t\t\t: StateStorageError.make({\n\t\t\t\t\t\t\t\tdetail: \"Runner state storage failed\",\n\t\t\t\t\t\t\t\tcause: Cause.fail(error),\n\t\t\t\t\t\t\t}),\n\t\t\t\t),\n\t\t\t)\n\t\tyield* storage(\n\t\t\tfs.makeDirectory(root, { recursive: true }).pipe(Effect.uninterruptible),\n\t\t)\n\t\tconst mutex = yield* Semaphore.make(1)\n\t\tconst read = Effect.gen(function* () {\n\t\t\tconst files = yield* fs.readDirectory(root)\n\t\t\tconst rows = yield* Effect.forEach(\n\t\t\t\tArray.filter(files, String.endsWith(\".json\")),\n\t\t\t\t(file) =>\n\t\t\t\t\tfs.readFileString(path.join(root, file)).pipe(\n\t\t\t\t\t\tEffect.flatMap(Schema.decodeEffect(json)),\n\t\t\t\t\t\tEffect.map((record) => ({ file, record })),\n\t\t\t\t\t),\n\t\t\t)\n\t\t\treturn rows\n\t\t})\n\t\tconst compact = Effect.scoped(\n\t\t\tEffect.gen(function* () {\n\t\t\t\tconst rows = yield* read\n\t\t\t\tconst retained = Retention.retain(Array.map(rows, (row) => row.record))\n\t\t\t\tconst tokens = HashSet.fromIterable(\n\t\t\t\t\tArray.map(retained, (record) => record.handle.token),\n\t\t\t\t)\n\t\t\t\tconst obsolete = Array.filter(\n\t\t\t\t\trows,\n\t\t\t\t\t(row) => !HashSet.has(tokens, row.record.handle.token),\n\t\t\t\t)\n\t\t\t\tyield* Effect.forEach(\n\t\t\t\t\tobsolete,\n\t\t\t\t\t(row) =>\n\t\t\t\t\t\tfs.remove(path.join(root, row.file)).pipe(Effect.uninterruptible),\n\t\t\t\t\t{ discard: true },\n\t\t\t\t)\n\t\t\t\tif (obsolete.length > 0) {\n\t\t\t\t\tconst directory = yield* fs.open(root, { flag: \"r\" })\n\t\t\t\t\tyield* directory.sync.pipe(Effect.uninterruptible)\n\t\t\t\t}\n\t\t\t}),\n\t\t)\n\t\tyield* storage(compact)\n\t\treturn Store.of({\n\t\t\tlist: storage(\n\t\t\t\tmutex.withPermit(\n\t\t\t\t\tread.pipe(Effect.map((rows) => Array.map(rows, (row) => row.record))),\n\t\t\t\t),\n\t\t\t),\n\t\t\tsave: (record) =>\n\t\t\t\tstorage(\n\t\t\t\t\tmutex.withPermit(\n\t\t\t\t\t\tEffect.scoped(\n\t\t\t\t\t\t\tEffect.gen(function* () {\n\t\t\t\t\t\t\t\tconst encoded = yield* Schema.encodeEffect(json)(record)\n\t\t\t\t\t\t\t\tconst address = yield* Schema.encodeEffect(\n\t\t\t\t\t\t\t\t\tSchema.fromJsonString(\n\t\t\t\t\t\t\t\t\t\tSchema.Struct({ key: Key, generation: Schema.Int }),\n\t\t\t\t\t\t\t\t\t),\n\t\t\t\t\t\t\t\t)({\n\t\t\t\t\t\t\t\t\tkey: record.handle.key,\n\t\t\t\t\t\t\t\t\tgeneration: record.handle.generation,\n\t\t\t\t\t\t\t\t})\n\t\t\t\t\t\t\t\tconst name = yield* digest.digestHex(\n\t\t\t\t\t\t\t\t\tDigest.sha256,\n\t\t\t\t\t\t\t\t\tnew TextEncoder().encode(address),\n\t\t\t\t\t\t\t\t)\n\t\t\t\t\t\t\t\tconst nonce = yield* random.uuidV4()\n\t\t\t\t\t\t\t\tconst temporary = path.join(root, `.${name}.${nonce}.tmp`)\n\t\t\t\t\t\t\t\tconst destination = path.join(root, name + \".json\")\n\t\t\t\t\t\t\t\tyield* Effect.acquireRelease(\n\t\t\t\t\t\t\t\t\tfs.open(temporary, { flag: \"wx\", mode: 0o600 }),\n\t\t\t\t\t\t\t\t\t() =>\n\t\t\t\t\t\t\t\t\t\tfs.remove(temporary, { force: true }).pipe(Effect.orDie),\n\t\t\t\t\t\t\t\t).pipe(\n\t\t\t\t\t\t\t\t\tEffect.flatMap((file) =>\n\t\t\t\t\t\t\t\t\t\tfile\n\t\t\t\t\t\t\t\t\t\t\t.writeAll(new TextEncoder().encode(encoded))\n\t\t\t\t\t\t\t\t\t\t\t.pipe(\n\t\t\t\t\t\t\t\t\t\t\t\tEffect.uninterruptible,\n\t\t\t\t\t\t\t\t\t\t\t\tEffect.andThen(file.sync.pipe(Effect.uninterruptible)),\n\t\t\t\t\t\t\t\t\t\t\t),\n\t\t\t\t\t\t\t\t\t),\n\t\t\t\t\t\t\t\t)\n\t\t\t\t\t\t\t\t// Keep rename and directory synchronization together if the caller is canceled.\n\t\t\t\t\t\t\t\tyield* Effect.uninterruptible(\n\t\t\t\t\t\t\t\t\tEffect.gen(function* () {\n\t\t\t\t\t\t\t\t\t\tyield* fs.rename(temporary, destination)\n\t\t\t\t\t\t\t\t\t\tconst directory = yield* fs.open(root, { flag: \"r\" })\n\t\t\t\t\t\t\t\t\t\tyield* directory.sync.pipe(Effect.uninterruptible)\n\t\t\t\t\t\t\t\t\t}),\n\t\t\t\t\t\t\t\t)\n\t\t\t\t\t\t\t\t// The new high-water file is durable before any old record is removed.\n\t\t\t\t\t\t\t\tyield* compact\n\t\t\t\t\t\t\t}),\n\t\t\t\t\t\t),\n\t\t\t\t\t),\n\t\t\t\t),\n\t\t})\n\t})\n\nexport const layerMemory = Layer.effect(Store, memory)\nexport const layerDirectory = (root: string) =>\n\tLayer.effect(Store, directory(root))\n"],"mappings":";;;;;;AAoBA,MAAa,SAAS,OAAO,IAAI,aAAa;CAC7C,MAAM,UAAU,OAAO,IAAI,KAAK,QAAQ,MAA6B,CAAC;CACtE,OAAO,MAAM,GAAG;EACf,MAAM,IAAI,IAAI,OAAO,CAAC,CAAC,KACtB,OAAO,KAAK,YAAY,MAAM,aAAa,QAAQ,OAAO,OAAO,CAAC,CAAC,CACpE;EACA,OAAO,WAAW,IAAI,OAAO,UAAU,QAAQA,KAAe,KAAK,MAAM,CAAC;CAC3E,CAAC;AACF,CAAC;;;;;;AAOD,MAAa,aAAa,SACzB,OAAO,IAAI,aAAa;CACvB,MAAM,KAAK,OAAO,WAAW;CAC7B,MAAM,OAAO,OAAO,KAAK;CACzB,MAAM,SAAS,OAAO,OAAO;CAC7B,MAAM,OAAO,OAAO,eAAe,OAAO,YAAY,aAAa,CAAC;CACpE,MAAM,SAAS,OAAO,aAAa;CACnC,MAAM,WACL,WAMA,OAAO,KACN,OAAO,UAAU,UAChB,MAAM,SAAS,sBACZ,QACA,kBAAkB,KAAK;EACvB,QAAQ;EACR,OAAO,MAAM,KAAK,KAAK;CACxB,CAAC,CACJ,CACD;CACD,OAAO,QACN,GAAG,cAAc,MAAM,EAAE,WAAW,KAAK,CAAC,CAAC,CAAC,KAAK,OAAO,eAAe,CACxE;CACA,MAAM,QAAQ,OAAO,UAAU,KAAK,CAAC;CACrC,MAAM,OAAO,OAAO,IAAI,aAAa;EACpC,MAAM,QAAQ,OAAO,GAAG,cAAc,IAAI;EAS1C,OAAO,OARa,OAAO,QAC1B,MAAM,OAAO,OAAO,OAAO,SAAS,OAAO,CAAC,IAC3C,SACA,GAAG,eAAe,KAAK,KAAK,MAAM,IAAI,CAAC,CAAC,CAAC,KACxC,OAAO,QAAQ,OAAO,aAAa,IAAI,CAAC,GACxC,OAAO,KAAK,YAAY;GAAE;GAAM;EAAO,EAAE,CAC1C,CACF;CAED,CAAC;CACD,MAAM,UAAU,OAAO,OACtB,OAAO,IAAI,aAAa;EACvB,MAAM,OAAO,OAAO;EACpB,MAAM,WAAWC,OAAiB,MAAM,IAAI,OAAO,QAAQ,IAAI,MAAM,CAAC;EACtE,MAAM,SAAS,QAAQ,aACtB,MAAM,IAAI,WAAW,WAAW,OAAO,OAAO,KAAK,CACpD;EACA,MAAM,WAAW,MAAM,OACtB,OACC,QAAQ,CAAC,QAAQ,IAAI,QAAQ,IAAI,OAAO,OAAO,KAAK,CACtD;EACA,OAAO,OAAO,QACb,WACC,QACA,GAAG,OAAO,KAAK,KAAK,MAAM,IAAI,IAAI,CAAC,CAAC,CAAC,KAAK,OAAO,eAAe,GACjE,EAAE,SAAS,KAAK,CACjB;EACA,IAAI,SAAS,SAAS,GAErB,QAAO,OADkB,GAAG,KAAK,MAAM,EAAE,MAAM,IAAI,CAAC,EAAA,CACnC,KAAK,KAAK,OAAO,eAAe;CAEnD,CAAC,CACF;CACA,OAAO,QAAQ,OAAO;CACtB,OAAO,MAAM,GAAG;EACf,MAAM,QACL,MAAM,WACL,KAAK,KAAK,OAAO,KAAK,SAAS,MAAM,IAAI,OAAO,QAAQ,IAAI,MAAM,CAAC,CAAC,CACrE,CACD;EACA,OAAO,WACN,QACC,MAAM,WACL,OAAO,OACN,OAAO,IAAI,aAAa;GACvB,MAAM,UAAU,OAAO,OAAO,aAAa,IAAI,CAAC,CAAC,MAAM;GACvD,MAAM,UAAU,OAAO,OAAO,aAC7B,OAAO,eACN,OAAO,OAAO;IAAE,KAAK;IAAK,YAAY,OAAO;GAAI,CAAC,CACnD,CACD,CAAC,CAAC;IACD,KAAK,OAAO,OAAO;IACnB,YAAY,OAAO,OAAO;GAC3B,CAAC;GACD,MAAM,OAAO,OAAO,OAAO,UAC1B,OAAO,QACP,IAAI,YAAY,CAAC,CAAC,OAAO,OAAO,CACjC;GACA,MAAM,QAAQ,OAAO,OAAO,OAAO;GACnC,MAAM,YAAY,KAAK,KAAK,MAAM,IAAI,KAAK,GAAG,MAAM,KAAK;GACzD,MAAM,cAAc,KAAK,KAAK,MAAM,OAAO,OAAO;GAClD,OAAO,OAAO,eACb,GAAG,KAAK,WAAW;IAAE,MAAM;IAAM,MAAM;GAAM,CAAC,SAE7C,GAAG,OAAO,WAAW,EAAE,OAAO,KAAK,CAAC,CAAC,CAAC,KAAK,OAAO,KAAK,CACzD,CAAC,CAAC,KACD,OAAO,SAAS,SACf,KACE,SAAS,IAAI,YAAY,CAAC,CAAC,OAAO,OAAO,CAAC,CAAC,CAC3C,KACA,OAAO,iBACP,OAAO,QAAQ,KAAK,KAAK,KAAK,OAAO,eAAe,CAAC,CACtD,CACF,CACD;GAEA,OAAO,OAAO,gBACb,OAAO,IAAI,aAAa;IACvB,OAAO,GAAG,OAAO,WAAW,WAAW;IAEvC,QAAO,OADkB,GAAG,KAAK,MAAM,EAAE,MAAM,IAAI,CAAC,EAAA,CACnC,KAAK,KAAK,OAAO,eAAe;GAClD,CAAC,CACF;GAEA,OAAO;EACR,CAAC,CACF,CACD,CACD;CACF,CAAC;AACF,CAAC;AAEyB,MAAM,OAAO,OAAO,MAAM;AACrD,MAAa,kBAAkB,SAC9B,MAAM,OAAO,OAAO,UAAU,IAAI,CAAC"}

package/dist/internal/runner/Supervisor.js

@@ -0,0 +1,375 @@
+import { make as make$1 } from "../FailureGroup.js";
+import { close } from "../release.js";
+import { defaults } from "../Limits.js";
+import { save } from "./Retention.js";
+import { cleanupCause } from "../cleanup.js";
+import { Execution, ExecutionError, LeaseExpired, RunnerClosing, SessionConflict, SessionStopped, StaleSession, Store, TerminationUnconfirmed, childOf, keyOf, negotiate, stoppedRecord, stoppingRecord } from "./model.js";
+import { Array, Cause, Clock, Context, Data, Deferred, Duration, Effect, Equal, Exit, FiberHandle, FiberSet, HashMap, Layer, Option, RcMap, Ref, Result, Scope, Semaphore, SynchronizedRef } from "effect";
+import { SecureRandom } from "effect/crypto";
+// src/internal/runner/Supervisor.ts
+var Supervisor = class extends Context.Service()("@graftland/plugin-remote/internal/runner/Supervisor") {};
+const Launch = Data.taggedEnum();
+const ExecutionState = Data.taggedEnum();
+const Session = Data.taggedEnum();
+function snapshot(state) {
+	return state._tag === "Loading" ? {
+		...state.record,
+		phase: "Loading",
+		load: state.request,
+		launch: state.launch._tag === "Starting" ? { _tag: "Starting" } : {
+			_tag: "Registered",
+			child: state.launch.unit.identity
+		}
+	} : state.record;
+}
+const live = (state, now) => {
+	if (state._tag === "Stopping" || state._tag === "Stopped") return Result.fail(state.record.reason._tag === "Expired" ? LeaseExpired.make({ detail: "The session lease has expired" }) : SessionStopped.make({ detail: "The session is stopping or stopped" }));
+	return now >= state.deadline ? Result.fail(LeaseExpired.make({ detail: "The session lease has expired" })) : Result.succeed(state);
+};
+const executionOf = (state) => {
+	switch (state._tag) {
+		case "Open": return ExecutionState.Absent();
+		case "Loading": return state.launch._tag === "Registered" ? ExecutionState.Running({ unit: state.launch.unit }) : ExecutionState.Absent();
+		case "Loaded": return ExecutionState.Running({ unit: state.unit });
+	}
+};
+/** All state transitions are pure; the caller serializes persistence and publication. */
+const beginLoad = (state, request, reply) => Session.Loading({
+	record: state.record,
+	deadline: state.deadline,
+	request,
+	reply,
+	launch: Launch.Starting()
+});
+const registerUnit = (state, unit) => {
+	if (state._tag !== "Loading") return Result.fail(SessionStopped.make({ detail: "The session is stopping or stopped" }));
+	if (state.launch._tag === "Registered") return Result.fail(ExecutionError.make({ detail: "An execution adapter registered more than one child" }));
+	return Result.succeed(Session.Loading({
+		...state,
+		launch: Launch.Registered({ unit })
+	}));
+};
+const loaded = (state, code) => {
+	if (state._tag !== "Loading") return Result.fail(SessionStopped.make({ detail: "The session is stopping or stopped" }));
+	if (state.launch._tag !== "Registered") return Result.fail(ExecutionError.make({ detail: "Execution adapter returned without registering its child" }));
+	return Result.succeed(Session.Loaded({
+		deadline: state.deadline,
+		unit: state.launch.unit,
+		record: {
+			...state.record,
+			phase: "Loaded",
+			load: state.request,
+			code,
+			child: state.launch.unit.identity
+		}
+	}));
+};
+const beginStop = (state, reason, reply, exit) => Session.Stopping({
+	record: stoppingRecord(snapshot(state), reason),
+	reply,
+	execution: Option.match(exit, {
+		onNone: () => executionOf(state),
+		onSome: (exit) => ExecutionState.Exited({ exit })
+	})
+});
+const nanos = (millis) => BigInt(Math.ceil(millis * 1e6));
+const emptyTermination = {
+	kind: "Exited",
+	exit: {
+		code: 0,
+		signal: null
+	},
+	cause: Cause.empty
+};
+const exitCause = (exit) => Exit.isFailure(exit) ? exit.cause : Cause.empty;
+/** A signal is a request; only the exited effect confirms that the execution has stopped. */
+const terminate = (execution, grace, confirmation) => {
+	if (execution._tag === "Absent") return Effect.succeed(emptyTermination);
+	if (execution._tag === "Exited") return Effect.succeed({
+		...emptyTermination,
+		exit: execution.exit
+	});
+	const child = execution.unit;
+	return Effect.gen(function* () {
+		const graceful = yield* child.interrupt.pipe(Effect.andThen(child.exited), Effect.timeoutOption(grace), Effect.exit);
+		if (Exit.isSuccess(graceful) && Option.isSome(graceful.value)) return {
+			...emptyTermination,
+			exit: graceful.value.value
+		};
+		const killed = yield* Effect.exit(child.kill);
+		const forced = yield* child.exited.pipe(Effect.timeoutOption(confirmation), Effect.exit);
+		const cause = Cause.combine(Cause.combine(exitCause(graceful), exitCause(killed)), exitCause(forced));
+		if (Exit.isFailure(forced) || Option.isNone(forced.value)) return yield* TerminationUnconfirmed.make({
+			detail: "The child exit could not be confirmed",
+			cause
+		});
+		return {
+			kind: "Killed",
+			exit: forced.value.value,
+			cause
+		};
+	});
+};
+const initialize = (options = {}) => Effect.gen(function* () {
+	const store = yield* Store;
+	const execution = yield* Execution;
+	const random = yield* SecureRandom.SecureRandom;
+	const parent = yield* Effect.scope;
+	const owner = yield* Scope.fork(parent);
+	return {
+		store,
+		execution,
+		random,
+		owner,
+		workers: yield* FiberSet.make().pipe(Scope.provide(owner)),
+		locks: yield* RcMap.make({ lookup: (_key) => Semaphore.make(1) }).pipe(Scope.provide(owner)),
+		lease: Duration.toMillis(options.lease ?? "15 seconds"),
+		grace: Duration.toMillis(options.grace ?? "5 seconds"),
+		confirmation: Duration.toMillis(options.confirmationTimeout ?? "5 seconds"),
+		limits: options.limits ?? defaults,
+		records: yield* Ref.make(HashMap.empty()),
+		entries: yield* Ref.make(HashMap.empty()),
+		health: yield* make$1().pipe(Scope.provide(owner)),
+		closing: yield* Ref.make(false)
+	};
+});
+const operations = (runtime) => {
+	const { store, execution, workers, grace, confirmation, records, entries, health, closing } = runtime;
+	const poison = health.failCause;
+	const observe = (effect) => effect.pipe(Effect.asVoid, Effect.catchCause(poison));
+	const healthy = health.check.pipe(Effect.andThen(Effect.gen(function* () {
+		if (yield* Ref.get(closing)) return yield* RunnerClosing.make({ detail: "The runner is closing" });
+	})));
+	const persist = (record) => store.save(record).pipe(Effect.tapCause(poison), Effect.andThen(Ref.update(records, (all) => save(all, record))));
+	const status = (handle) => Ref.get(records).pipe(Effect.flatMap((all) => {
+		const found = HashMap.get(all, handle.token);
+		return Option.isSome(found) && Equal.equals(keyOf(found.value.handle.key), keyOf(handle.key)) && found.value.handle.generation === handle.generation ? Effect.succeed(found.value) : Effect.fail(StaleSession.make({ detail: "Unknown session or generation" }));
+	}));
+	const latest = (key) => Ref.get(records).pipe(Effect.map((all) => Array.reduce(Array.fromIterable(HashMap.values(all)), 0, (value, record) => Equal.equals(keyOf(record.handle.key), keyOf(key)) ? Math.max(value, record.handle.generation) : value)));
+	const entryFor = (handle) => Effect.gen(function* () {
+		yield* status(handle);
+		const all = yield* Ref.get(entries);
+		const found = HashMap.get(all, handle.token);
+		if (Option.isNone(found)) return yield* SessionStopped.make({ detail: "The session was retired during recovery" });
+		return found.value;
+	});
+	const commit = (entry, transition) => SynchronizedRef.updateEffect(entry.state, (state) => Effect.gen(function* () {
+		const next = yield* Effect.fromResult(transition(state));
+		yield* persist(snapshot(next));
+		return next;
+	}));
+	const finishStop = (entry, state, saved) => Effect.gen(function* () {
+		yield* FiberHandle.clear(entry.loading);
+		const result = yield* terminate(state.execution, grace, confirmation);
+		const closed = yield* Effect.exit(close(entry.unitScope, Exit.void));
+		const termination = {
+			...result,
+			cause: Cause.combine(result.cause, exitCause(closed))
+		};
+		const record = stoppedRecord(state.record.previous, state.record.reason, termination);
+		yield* SynchronizedRef.updateEffect(entry.state, () => persist(record).pipe(Effect.as(Session.Stopped({
+			record,
+			reply: state.reply
+		}))));
+		if (Exit.isFailure(saved)) return yield* Effect.failCause(saved.cause);
+		return termination;
+	});
+	/** Called with the session ref locked; the worker starts after its transition is published. */
+	const stopLocked = (entry, state, reason, exit) => Effect.gen(function* () {
+		if (state._tag === "Stopping" || state._tag === "Stopped") return [state.reply, state];
+		const reply = yield* Deferred.make();
+		const next = beginStop(state, reason, reply, exit);
+		const saved = yield* Effect.exit(persist(next.record));
+		yield* FiberSet.run(workers, finishStop(entry, next, saved).pipe(Effect.onExit((result) => Deferred.done(reply, result)), observe), { startImmediately: false });
+		return [reply, next];
+	});
+	const stop = (entry, reason, exit = Option.none()) => SynchronizedRef.modifyEffect(entry.state, (state) => stopLocked(entry, state, reason, exit)).pipe(Effect.uninterruptible);
+	const scheduleLease = (entry, deadline) => FiberHandle.run(entry.timer, observe(Effect.gen(function* () {
+		const now = yield* Clock.monotonicTimeNanos;
+		yield* Effect.sleep(Duration.nanos(deadline > now ? deadline - now : 0n));
+		yield* SynchronizedRef.updateEffect(entry.state, (state) => {
+			if (state._tag === "Stopping" || state._tag === "Stopped" || state.deadline !== deadline) return Effect.succeed(state);
+			return stopLocked(entry, state, { _tag: "Expired" }, Option.none()).pipe(Effect.map(([, next]) => next));
+		});
+	})), { startImmediately: false });
+	const register = (entry, unit) => SynchronizedRef.updateEffect(entry.state, (state) => Effect.gen(function* () {
+		const now = yield* Clock.monotonicTimeNanos;
+		const current = yield* Effect.fromResult(live(state, now));
+		const next = yield* Effect.fromResult(registerUnit(current, unit));
+		yield* unit.renew(Number(current.deadline - (yield* Clock.monotonicTimeNanos)) / 1e6);
+		yield* persist(snapshot(next));
+		yield* FiberSet.run(workers, observe(unit.exited.pipe(Effect.flatMap((exit) => stop(entry, { _tag: "Exited" }, Option.some(exit))))));
+		return next;
+	})).pipe(Effect.uninterruptible);
+	const runLoad = (entry, state) => execution.spawn(state.record.handle, state.request, state.record.limits).pipe(Scope.provide(entry.unitScope), Effect.flatMap((unit) => register(entry, unit).pipe(Effect.andThen(unit.start), Effect.as(unit.code))), Effect.tap((code) => commit(entry, (current) => loaded(current, code))), Effect.onExit((result) => Effect.gen(function* () {
+		if (Exit.isSuccess(result)) {
+			yield* Deferred.done(state.reply, result);
+			return;
+		}
+		if ((yield* SynchronizedRef.get(entry.state))._tag === "Loading") yield* stop(entry, {
+			_tag: "LoadFailed",
+			cause: result.cause
+		});
+		const healthCause = yield* health.cause;
+		yield* Deferred.failCause(state.reply, Cause.combine(result.cause, healthCause));
+	})), Effect.exit, Effect.asVoid);
+	return {
+		persist,
+		status,
+		latest,
+		entryFor,
+		stop,
+		scheduleLease,
+		runLoad,
+		healthy
+	};
+};
+const recover = (runtime, actions) => Effect.gen(function* () {
+	const { store, execution, confirmation, records } = runtime;
+	const { persist } = actions;
+	const stored = yield* store.list;
+	yield* Ref.set(records, HashMap.fromIterable(Array.map(stored, (record) => [record.handle.token, record])));
+	for (const record of stored) {
+		if (record.phase === "Stopped") continue;
+		const child = childOf(record);
+		const termination = Option.isNone(child) ? emptyTermination : yield* execution.recover(child.value).pipe(Effect.timeout(confirmation), Effect.catchTags({
+			ExecutionError: (error) => Effect.fail(TerminationUnconfirmed.make({
+				detail: "Orphan recovery did not confirm exit",
+				cause: Cause.fail(error)
+			})),
+			TimeoutError: (error) => Effect.fail(TerminationUnconfirmed.make({
+				detail: "Orphan recovery did not confirm exit",
+				cause: Cause.fail(error)
+			}))
+		}));
+		yield* persist(stoppedRecord(record.phase === "Stopping" ? record.previous : record, { _tag: "Recovery" }, termination));
+	}
+});
+const ownShutdown = (runtime, actions) => Effect.gen(function* () {
+	const { entries, health, closing } = runtime;
+	const { stop } = actions;
+	yield* Effect.addFinalizer(() => Effect.gen(function* () {
+		yield* Ref.set(closing, true);
+		const all = yield* Ref.get(entries);
+		const exits = yield* Effect.forEach(HashMap.values(all), (entry) => stop(entry, { _tag: "Shutdown" }).pipe(Effect.flatMap(Deferred.await), Effect.exit));
+		const initial = yield* health.cause;
+		const cause = Array.reduce(exits, initial, (cause, exit) => Cause.combine(cause, Exit.isFailure(exit) ? exit.cause : exit.value.cause));
+		if (cause.reasons.length > 0) return yield* Effect.failCause(cleanupCause(cause));
+	}));
+});
+const protocol = (runtime, actions) => Effect.gen(function* () {
+	const { random, owner, locks, lease, limits, records, entries, health } = runtime;
+	const { persist, status, latest, entryFor, stop, scheduleLease, runLoad, healthy } = actions;
+	return Supervisor.of({
+		await: health.await,
+		status,
+		highWater: (key) => latest(key).pipe(Effect.map((value) => value === 0 ? null : value)),
+		open: (request) => Effect.scoped(Effect.gen(function* () {
+			yield* healthy;
+			const leaseMillis = Duration.toMillis(request.lease ?? lease);
+			const negotiated = negotiate(limits, request.limits ?? defaults);
+			return yield* (yield* RcMap.get(locks, keyOf(request.key))).withPermit(Effect.gen(function* () {
+				yield* healthy;
+				const allRecords = yield* Ref.get(records);
+				const same = Array.filter(Array.fromIterable(HashMap.values(allRecords)), (row) => Equal.equals(keyOf(row.handle.key), keyOf(request.key)));
+				const prior = Array.findFirst(same, (row) => row.requestId === request.requestId);
+				if (Option.isSome(prior)) return prior.value;
+				const generation = yield* latest(request.key);
+				if (generation !== (request.expectedGeneration ?? 0)) return yield* StaleSession.make({ detail: "Open expectedGeneration does not match the generation high-water mark" });
+				for (const record of same) {
+					const allEntries = yield* Ref.get(entries);
+					const entry = HashMap.get(allEntries, record.handle.token);
+					if (Option.isSome(entry)) yield* stop(entry.value, { _tag: "Superseded" }).pipe(Effect.flatMap(Deferred.await), Effect.tap((result) => result.cause.reasons.length === 0 ? Effect.void : Effect.logWarning("Superseded remote execution cleanup failed", result.cause).pipe(Effect.annotateLogs({
+						"remote.identity": record.handle.key.identity,
+						"remote.instance": record.handle.key.instance,
+						"remote.generation": record.handle.generation
+					}))));
+				}
+				yield* healthy;
+				const token = yield* random.uuidV4();
+				const record = {
+					version: 1,
+					phase: "Open",
+					handle: {
+						key: request.key,
+						token,
+						generation: generation + 1
+					},
+					requestId: request.requestId,
+					leaseMillis,
+					limits: negotiated
+				};
+				return yield* Effect.uninterruptible(Effect.gen(function* () {
+					yield* persist(record);
+					const deadline = (yield* Clock.monotonicTimeNanos) + nanos(leaseMillis);
+					const scope = yield* Scope.fork(owner);
+					const entry = {
+						state: yield* SynchronizedRef.make(Session.Open({
+							record,
+							deadline
+						})),
+						scope,
+						unitScope: yield* Scope.fork(scope),
+						timer: yield* FiberHandle.make().pipe(Scope.provide(scope)),
+						loading: yield* FiberHandle.make().pipe(Scope.provide(scope))
+					};
+					const retained = yield* Ref.get(records);
+					const old = yield* Ref.modify(entries, (all) => [Array.filter(Array.fromIterable(HashMap.entries(all)), ([key]) => !HashMap.has(retained, key)), HashMap.set(HashMap.filter(all, (_, key) => HashMap.has(retained, key)), token, entry)]);
+					for (const [, retired] of old) yield* close(retired.scope, Exit.void);
+					yield* scheduleLease(entry, deadline);
+					return record;
+				}));
+			}));
+		})),
+		renew: (handle) => Effect.gen(function* () {
+			yield* healthy;
+			const entry = yield* entryFor(handle);
+			return yield* SynchronizedRef.modifyEffect(entry.state, (state) => Effect.gen(function* () {
+				const now = yield* Clock.monotonicTimeNanos;
+				const current = yield* Effect.fromResult(live(state, now));
+				const running = executionOf(current);
+				if (running._tag === "Running") yield* running.unit.renew(current.record.leaseMillis);
+				const deadline = now + nanos(current.record.leaseMillis);
+				yield* scheduleLease(entry, deadline);
+				return [current.record.leaseMillis, {
+					...current,
+					deadline
+				}];
+			}));
+		}),
+		load: (handle, request) => Effect.gen(function* () {
+			yield* healthy;
+			const entry = yield* entryFor(handle);
+			return yield* yield* SynchronizedRef.modifyEffect(entry.state, (state) => Effect.gen(function* () {
+				const now = yield* Clock.monotonicTimeNanos;
+				const current = yield* Effect.fromResult(live(state, now));
+				if (current._tag !== "Open") {
+					if ((current._tag === "Loading" ? current.request : current.record.load).specifier !== request.specifier) return yield* SessionConflict.make({ detail: "Load was already requested with a different specifier" });
+					return [current._tag === "Loading" ? Deferred.await(current.reply) : Effect.succeed(current.record.code), current];
+				}
+				const done = yield* Deferred.make();
+				const next = beginLoad(current, request, done);
+				yield* persist(snapshot(next));
+				if (next._tag === "Loading") yield* FiberHandle.run(entry.loading, runLoad(entry, next), { startImmediately: false });
+				return [Deferred.await(done), next];
+			})).pipe(Effect.uninterruptible);
+		}),
+		dispose: (handle) => Effect.gen(function* () {
+			const record = yield* status(handle);
+			if (record.phase === "Stopped") return record.termination;
+			const entry = yield* entryFor(handle);
+			return yield* stop(entry, { _tag: "Disposed" }).pipe(Effect.flatMap(Deferred.await));
+		})
+	});
+});
+const make = (options = {}) => Effect.gen(function* () {
+	const runtime = yield* initialize(options);
+	const actions = operations(runtime);
+	yield* recover(runtime, actions);
+	yield* ownShutdown(runtime, actions);
+	return yield* protocol(runtime, actions);
+});
+const layer = (options = {}) => Layer.effect(Supervisor, make(options));
+export { Supervisor, layer, make };
+
+//# sourceMappingURL=Supervisor.js.map

package/dist/internal/runner/Supervisor.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"Supervisor.js","names":["FailureGroup.make","Retention.save","Release.close"],"sources":["../../../src/internal/runner/Supervisor.ts"],"sourcesContent":["import * as FailureGroup from \"../FailureGroup\"\nimport {\n\tArray,\n\tCause,\n\tClock,\n\tContext,\n\tData,\n\tDeferred,\n\tDuration,\n\tEffect,\n\tEqual,\n\tExit,\n\tFiberHandle,\n\tFiberSet,\n\tHashMap,\n\tLayer,\n\tOption,\n\tRcMap,\n\tRef,\n\tResult,\n\tScope,\n\tSemaphore,\n\tSynchronizedRef,\n} from \"effect\"\nimport * as Release from \"../release\"\nimport { SecureRandom } from \"effect/crypto\"\nimport * as Retention from \"./Retention\"\nimport { cleanupCause } from \"../cleanup\"\nimport {\n\tExecution,\n\tStore,\n\tStaleSession,\n\tLeaseExpired,\n\tSessionStopped,\n\tSessionConflict,\n\tStateStorageError,\n\tExecutionError,\n\tPackageError,\n\tTerminationUnconfirmed,\n\tRunnerClosing,\n\tchildOf,\n\tdefaults,\n\tkeyOf,\n\tnegotiate,\n\tstoppingRecord,\n\tstoppedRecord,\n\ttype ActiveRecord,\n\ttype CodeIdentity,\n\ttype ExitStatus,\n\ttype Handle,\n\ttype Key,\n\ttype Limits,\n\ttype Load,\n\ttype SessionRecord,\n\ttype SessionKey,\n\ttype StopReason,\n\ttype Termination,\n\ttype Unit,\n\ttype OpenRecord,\n\ttype LoadedRecord,\n\ttype StoppingRecord,\n\ttype StoppedRecord,\n} from \"./model\"\n\nexport type SupervisorError =\n\t| StaleSession\n\t| LeaseExpired\n\t| SessionStopped\n\t| SessionConflict\n\t| StateStorageError\n\t| ExecutionError\n\t| PackageError\n\t| TerminationUnconfirmed\n\t| RunnerClosing\nexport interface Options {\n\treadonly lease?: Duration.Input\n\treadonly grace?: Duration.Input\n\treadonly confirmationTimeout?: Duration.Input\n\treadonly limits?: Limits\n}\nexport interface Open {\n\treadonly key: Key\n\treadonly requestId: string\n\treadonly expectedGeneration?: number | null\n\treadonly lease?: Duration.Input\n\treadonly limits?: Limits\n}\nexport class Supervisor extends Context.Service<\n\tSupervisor,\n\t{\n\t\treadonly await: Effect.Effect<never, SupervisorError>\n\t\treadonly status: (\n\t\t\thandle: Handle,\n\t\t) => Effect.Effect<SessionRecord, StaleSession>\n\t\treadonly highWater: (key: Key) => Effect.Effect<number | null>\n\t\treadonly open: (\n\t\t\trequest: Open,\n\t\t) => Effect.Effect<SessionRecord, SupervisorError>\n\t\treadonly renew: (handle: Handle) => Effect.Effect<number, SupervisorError>\n\t\treadonly load: (\n\t\t\thandle: Handle,\n\t\t\trequest: Load,\n\t\t) => Effect.Effect<CodeIdentity, SupervisorError>\n\t\treadonly dispose: (\n\t\t\thandle: Handle,\n\t\t) => Effect.Effect<Termination, SupervisorError>\n\t}\n>()(\"@graftland/plugin-remote/internal/runner/Supervisor\") {}\n\ntype Launch = Data.TaggedEnum<{\n\tStarting: {}\n\tRegistered: { readonly unit: Unit }\n}>\nconst Launch = Data.taggedEnum<Launch>()\ntype ExecutionState = Data.TaggedEnum<{\n\tAbsent: {}\n\tRunning: { readonly unit: Unit }\n\tExited: { readonly exit: ExitStatus }\n}>\nconst ExecutionState = Data.taggedEnum<ExecutionState>()\ntype LoadReply = Deferred.Deferred<CodeIdentity, SupervisorError>\ntype StopReply = Deferred.Deferred<Termination, SupervisorError>\ntype Session = Data.TaggedEnum<{\n\tOpen: { readonly record: typeof OpenRecord.Type; readonly deadline: bigint }\n\tLoading: {\n\t\treadonly record: typeof OpenRecord.Type\n\t\treadonly request: Load\n\t\treadonly launch: Launch\n\t\treadonly reply: LoadReply\n\t\treadonly deadline: bigint\n\t}\n\tLoaded: {\n\t\treadonly record: typeof LoadedRecord.Type\n\t\treadonly unit: Unit\n\t\treadonly deadline: bigint\n\t}\n\tStopping: {\n\t\treadonly record: typeof StoppingRecord.Type\n\t\treadonly execution: ExecutionState\n\t\treadonly reply: StopReply\n\t}\n\tStopped: {\n\t\treadonly record: typeof StoppedRecord.Type\n\t\treadonly reply: StopReply\n\t}\n}>\nconst Session = Data.taggedEnum<Session>()\ntype Live = Extract<Session, { readonly _tag: \"Open\" | \"Loading\" | \"Loaded\" }>\ntype Loading = Extract<Session, { readonly _tag: \"Loading\" }>\ntype Stopping = Extract<Session, { readonly _tag: \"Stopping\" }>\ninterface Entry {\n\treadonly state: SynchronizedRef.SynchronizedRef<Session>\n\treadonly timer: FiberHandle.FiberHandle<void, never>\n\treadonly loading: FiberHandle.FiberHandle<void, never>\n\treadonly scope: Scope.Closeable\n\treadonly unitScope: Scope.Closeable\n}\nfunction snapshot(state: Live): ActiveRecord\nfunction snapshot(state: Session): SessionRecord\nfunction snapshot(state: Session): SessionRecord {\n\treturn state._tag === \"Loading\"\n\t\t? {\n\t\t\t\t...state.record,\n\t\t\t\tphase: \"Loading\",\n\t\t\t\tload: state.request,\n\t\t\t\tlaunch:\n\t\t\t\t\tstate.launch._tag === \"Starting\"\n\t\t\t\t\t\t? { _tag: \"Starting\" }\n\t\t\t\t\t\t: { _tag: \"Registered\", child: state.launch.unit.identity },\n\t\t\t}\n\t\t: state.record\n}\nconst live = (\n\tstate: Session,\n\tnow: bigint,\n): Result.Result<Live, LeaseExpired | SessionStopped> => {\n\tif (state._tag === \"Stopping\" || state._tag === \"Stopped\")\n\t\treturn Result.fail(\n\t\t\tstate.record.reason._tag === \"Expired\"\n\t\t\t\t? LeaseExpired.make({\n\t\t\t\t\t\tdetail: \"The session lease has expired\",\n\t\t\t\t\t})\n\t\t\t\t: SessionStopped.make({\n\t\t\t\t\t\tdetail: \"The session is stopping or stopped\",\n\t\t\t\t\t}),\n\t\t)\n\treturn now >= state.deadline\n\t\t? Result.fail(\n\t\t\t\tLeaseExpired.make({\n\t\t\t\t\tdetail: \"The session lease has expired\",\n\t\t\t\t}),\n\t\t\t)\n\t\t: Result.succeed(state)\n}\nconst executionOf = (state: Live): ExecutionState => {\n\tswitch (state._tag) {\n\t\tcase \"Open\":\n\t\t\treturn ExecutionState.Absent()\n\t\tcase \"Loading\":\n\t\t\treturn state.launch._tag === \"Registered\"\n\t\t\t\t? ExecutionState.Running({ unit: state.launch.unit })\n\t\t\t\t: ExecutionState.Absent()\n\t\tcase \"Loaded\":\n\t\t\treturn ExecutionState.Running({ unit: state.unit })\n\t}\n}\n/** All state transitions are pure; the caller serializes persistence and publication. */\nconst beginLoad = (\n\tstate: Extract<Session, { _tag: \"Open\" }>,\n\trequest: Load,\n\treply: LoadReply,\n): Loading =>\n\tSession.Loading({\n\t\trecord: state.record,\n\t\tdeadline: state.deadline,\n\t\trequest,\n\t\treply,\n\t\tlaunch: Launch.Starting(),\n\t})\nconst registerUnit = (\n\tstate: Session,\n\tunit: Unit,\n): Result.Result<Session, SessionStopped | ExecutionError> => {\n\tif (state._tag !== \"Loading\")\n\t\treturn Result.fail(\n\t\t\tSessionStopped.make({\n\t\t\t\tdetail: \"The session is stopping or stopped\",\n\t\t\t}),\n\t\t)\n\tif (state.launch._tag === \"Registered\")\n\t\treturn Result.fail(\n\t\t\tExecutionError.make({\n\t\t\t\tdetail: \"An execution adapter registered more than one child\",\n\t\t\t}),\n\t\t)\n\treturn Result.succeed(\n\t\tSession.Loading({ ...state, launch: Launch.Registered({ unit }) }),\n\t)\n}\nconst loaded = (\n\tstate: Session,\n\tcode: CodeIdentity,\n): Result.Result<Session, SessionStopped | ExecutionError> => {\n\tif (state._tag !== \"Loading\")\n\t\treturn Result.fail(\n\t\t\tSessionStopped.make({\n\t\t\t\tdetail: \"The session is stopping or stopped\",\n\t\t\t}),\n\t\t)\n\tif (state.launch._tag !== \"Registered\")\n\t\treturn Result.fail(\n\t\t\tExecutionError.make({\n\t\t\t\tdetail: \"Execution adapter returned without registering its child\",\n\t\t\t}),\n\t\t)\n\treturn Result.succeed(\n\t\tSession.Loaded({\n\t\t\tdeadline: state.deadline,\n\t\t\tunit: state.launch.unit,\n\t\t\trecord: {\n\t\t\t\t...state.record,\n\t\t\t\tphase: \"Loaded\",\n\t\t\t\tload: state.request,\n\t\t\t\tcode,\n\t\t\t\tchild: state.launch.unit.identity,\n\t\t\t},\n\t\t}),\n\t)\n}\nconst beginStop = (\n\tstate: Live,\n\treason: StopReason,\n\treply: StopReply,\n\texit: Option.Option<ExitStatus>,\n): Stopping =>\n\tSession.Stopping({\n\t\trecord: stoppingRecord(snapshot(state), reason),\n\t\treply,\n\t\texecution: Option.match(exit, {\n\t\t\tonNone: () => executionOf(state),\n\t\t\tonSome: (exit) => ExecutionState.Exited({ exit }),\n\t\t}),\n\t})\nconst nanos = (millis: number) => BigInt(Math.ceil(millis * 1_000_000))\nconst emptyTermination: Termination = {\n\tkind: \"Exited\",\n\texit: { code: 0, signal: null },\n\tcause: Cause.empty,\n}\nconst exitCause = <A, E>(exit: Exit.Exit<A, E>) =>\n\tExit.isFailure(exit) ? exit.cause : Cause.empty\n\n/** A signal is a request; only the exited effect confirms that the execution has stopped. */\nconst terminate = (\n\texecution: ExecutionState,\n\tgrace: number,\n\tconfirmation: number,\n): Effect.Effect<Termination, TerminationUnconfirmed> => {\n\tif (execution._tag === \"Absent\") return Effect.succeed(emptyTermination)\n\tif (execution._tag === \"Exited\")\n\t\treturn Effect.succeed({ ...emptyTermination, exit: execution.exit })\n\tconst child = execution.unit\n\treturn Effect.gen(function* () {\n\t\tconst graceful = yield* child.interrupt.pipe(\n\t\t\tEffect.andThen(child.exited),\n\t\t\tEffect.timeoutOption(grace),\n\t\t\tEffect.exit,\n\t\t)\n\t\tif (Exit.isSuccess(graceful) && Option.isSome(graceful.value))\n\t\t\treturn { ...emptyTermination, exit: graceful.value.value }\n\t\tconst killed = yield* Effect.exit(child.kill)\n\t\tconst forced = yield* child.exited.pipe(\n\t\t\tEffect.timeoutOption(confirmation),\n\t\t\tEffect.exit,\n\t\t)\n\t\tconst cause = Cause.combine(\n\t\t\tCause.combine(exitCause(graceful), exitCause(killed)),\n\t\t\texitCause(forced),\n\t\t)\n\t\tif (Exit.isFailure(forced) || Option.isNone(forced.value))\n\t\t\treturn yield* TerminationUnconfirmed.make({\n\t\t\t\tdetail: \"The child exit could not be confirmed\",\n\t\t\t\tcause,\n\t\t\t})\n\t\treturn {\n\t\t\tkind: \"Killed\",\n\t\t\texit: forced.value.value,\n\t\t\tcause,\n\t\t} satisfies Termination\n\t})\n}\n\nconst initialize = (options: Options = {}) =>\n\tEffect.gen(function* () {\n\t\tconst store = yield* Store\n\t\tconst execution = yield* Execution\n\t\tconst random = yield* SecureRandom.SecureRandom\n\t\tconst parent = yield* Effect.scope\n\t\tconst owner = yield* Scope.fork(parent)\n\t\t// Cleanup must continue after a health failure so every registered process is reaped.\n\t\tconst workers = yield* FiberSet.make<void, never>().pipe(\n\t\t\tScope.provide(owner),\n\t\t)\n\t\tconst locks = yield* RcMap.make({\n\t\t\tlookup: (_key: SessionKey) => Semaphore.make(1),\n\t\t}).pipe(Scope.provide(owner))\n\t\tconst lease = Duration.toMillis(options.lease ?? \"15 seconds\")\n\t\tconst grace = Duration.toMillis(options.grace ?? \"5 seconds\")\n\t\tconst confirmation = Duration.toMillis(\n\t\t\toptions.confirmationTimeout ?? \"5 seconds\",\n\t\t)\n\t\tconst limits = options.limits ?? defaults\n\t\tconst records = yield* Ref.make(HashMap.empty<string, SessionRecord>())\n\t\tconst entries = yield* Ref.make(HashMap.empty<string, Entry>())\n\t\tconst health = yield* FailureGroup.make<SupervisorError>().pipe(\n\t\t\tScope.provide(owner),\n\t\t)\n\t\tconst closing = yield* Ref.make(false)\n\t\treturn {\n\t\t\tstore,\n\t\t\texecution,\n\t\t\trandom,\n\t\t\towner,\n\t\t\tworkers,\n\t\t\tlocks,\n\t\t\tlease,\n\t\t\tgrace,\n\t\t\tconfirmation,\n\t\t\tlimits,\n\t\t\trecords,\n\t\t\tentries,\n\t\t\thealth,\n\t\t\tclosing,\n\t\t}\n\t})\ntype Runtime = Effect.Success<ReturnType<typeof initialize>>\nconst operations = (runtime: Runtime) => {\n\tconst {\n\t\tstore,\n\t\texecution,\n\t\tworkers,\n\t\tgrace,\n\t\tconfirmation,\n\t\trecords,\n\t\tentries,\n\t\thealth,\n\t\tclosing,\n\t} = runtime\n\n\tconst poison = health.failCause\n\tconst observe = <A>(effect: Effect.Effect<A, SupervisorError>) =>\n\t\teffect.pipe(Effect.asVoid, Effect.catchCause(poison))\n\tconst healthy = health.check.pipe(\n\t\tEffect.andThen(\n\t\t\tEffect.gen(function* () {\n\t\t\t\tif (yield* Ref.get(closing))\n\t\t\t\t\treturn yield* RunnerClosing.make({ detail: \"The runner is closing\" })\n\t\t\t}),\n\t\t),\n\t)\n\tconst persist = (record: SessionRecord) =>\n\t\tstore\n\t\t\t.save(record)\n\t\t\t.pipe(\n\t\t\t\tEffect.tapCause(poison),\n\t\t\t\tEffect.andThen(\n\t\t\t\t\tRef.update(records, (all) => Retention.save(all, record)),\n\t\t\t\t),\n\t\t\t)\n\tconst status = (handle: Handle) =>\n\t\tRef.get(records).pipe(\n\t\t\tEffect.flatMap((all) => {\n\t\t\t\tconst found = HashMap.get(all, handle.token)\n\t\t\t\treturn Option.isSome(found) &&\n\t\t\t\t\tEqual.equals(keyOf(found.value.handle.key), keyOf(handle.key)) &&\n\t\t\t\t\tfound.value.handle.generation === handle.generation\n\t\t\t\t\t? Effect.succeed(found.value)\n\t\t\t\t\t: Effect.fail(\n\t\t\t\t\t\t\tStaleSession.make({\n\t\t\t\t\t\t\t\tdetail: \"Unknown session or generation\",\n\t\t\t\t\t\t\t}),\n\t\t\t\t\t\t)\n\t\t\t}),\n\t\t)\n\tconst latest = (key: Key) =>\n\t\tRef.get(records).pipe(\n\t\t\tEffect.map((all) =>\n\t\t\t\tArray.reduce(\n\t\t\t\t\tArray.fromIterable(HashMap.values(all)),\n\t\t\t\t\t0,\n\t\t\t\t\t(value, record) =>\n\t\t\t\t\t\tEqual.equals(keyOf(record.handle.key), keyOf(key))\n\t\t\t\t\t\t\t? Math.max(value, record.handle.generation)\n\t\t\t\t\t\t\t: value,\n\t\t\t\t),\n\t\t\t),\n\t\t)\n\tconst entryFor = (handle: Handle) =>\n\t\tEffect.gen(function* () {\n\t\t\tyield* status(handle)\n\t\t\tconst all = yield* Ref.get(entries)\n\t\t\tconst found = HashMap.get(all, handle.token)\n\t\t\tif (Option.isNone(found))\n\t\t\t\treturn yield* SessionStopped.make({\n\t\t\t\t\tdetail: \"The session was retired during recovery\",\n\t\t\t\t})\n\t\t\treturn found.value\n\t\t})\n\tconst commit = (\n\t\tentry: Entry,\n\t\ttransition: (\n\t\t\tstate: Session,\n\t\t) => Result.Result<Session, ExecutionError | SessionStopped>,\n\t) =>\n\t\tSynchronizedRef.updateEffect(entry.state, (state) =>\n\t\t\tEffect.gen(function* () {\n\t\t\t\tconst next = yield* Effect.fromResult(transition(state))\n\t\t\t\tyield* persist(snapshot(next))\n\t\t\t\treturn next\n\t\t\t}),\n\t\t)\n\tconst finishStop = (\n\t\tentry: Entry,\n\t\tstate: Stopping,\n\t\tsaved: Exit.Exit<void, StateStorageError>,\n\t) =>\n\t\tEffect.gen(function* () {\n\t\t\tyield* FiberHandle.clear(entry.loading)\n\t\t\tconst result = yield* terminate(state.execution, grace, confirmation)\n\t\t\tconst closed = yield* Effect.exit(\n\t\t\t\tRelease.close(entry.unitScope, Exit.void),\n\t\t\t)\n\t\t\tconst termination: Termination = {\n\t\t\t\t...result,\n\t\t\t\tcause: Cause.combine(result.cause, exitCause(closed)),\n\t\t\t}\n\t\t\tconst record = stoppedRecord(\n\t\t\t\tstate.record.previous,\n\t\t\t\tstate.record.reason,\n\t\t\t\ttermination,\n\t\t\t)\n\t\t\tyield* SynchronizedRef.updateEffect(entry.state, () =>\n\t\t\t\tpersist(record).pipe(\n\t\t\t\t\tEffect.as(Session.Stopped({ record, reply: state.reply })),\n\t\t\t\t),\n\t\t\t)\n\t\t\tif (Exit.isFailure(saved)) return yield* Effect.failCause(saved.cause)\n\t\t\treturn termination\n\t\t})\n\t/** Called with the session ref locked; the worker starts after its transition is published. */\n\tconst stopLocked = (\n\t\tentry: Entry,\n\t\tstate: Session,\n\t\treason: StopReason,\n\t\texit: Option.Option<ExitStatus>,\n\t): Effect.Effect<readonly [StopReply, Session]> =>\n\t\tEffect.gen(function* () {\n\t\t\tif (state._tag === \"Stopping\" || state._tag === \"Stopped\")\n\t\t\t\treturn [state.reply, state]\n\t\t\tconst reply = yield* Deferred.make<Termination, SupervisorError>()\n\t\t\tconst next = beginStop(state, reason, reply, exit)\n\t\t\t// Fence in memory even when the journal cannot acknowledge the transition.\n\t\t\tconst saved = yield* Effect.exit(persist(next.record))\n\t\t\tyield* FiberSet.run(\n\t\t\t\tworkers,\n\t\t\t\tfinishStop(entry, next, saved).pipe(\n\t\t\t\t\tEffect.onExit((result) => Deferred.done(reply, result)),\n\t\t\t\t\tobserve,\n\t\t\t\t),\n\t\t\t\t{ startImmediately: false },\n\t\t\t)\n\t\t\treturn [reply, next]\n\t\t})\n\tconst stop = (\n\t\tentry: Entry,\n\t\treason: StopReason,\n\t\texit: Option.Option<ExitStatus> = Option.none(),\n\t) =>\n\t\tSynchronizedRef.modifyEffect(entry.state, (state) =>\n\t\t\tstopLocked(entry, state, reason, exit),\n\t\t).pipe(Effect.uninterruptible)\n\tconst scheduleLease = (entry: Entry, deadline: bigint) =>\n\t\tFiberHandle.run(\n\t\t\tentry.timer,\n\t\t\tobserve(\n\t\t\t\tEffect.gen(function* () {\n\t\t\t\t\tconst now = yield* Clock.monotonicTimeNanos\n\t\t\t\t\tyield* Effect.sleep(\n\t\t\t\t\t\tDuration.nanos(deadline > now ? deadline - now : 0n),\n\t\t\t\t\t)\n\t\t\t\t\tyield* SynchronizedRef.updateEffect(entry.state, (state) => {\n\t\t\t\t\t\tif (\n\t\t\t\t\t\t\tstate._tag === \"Stopping\" ||\n\t\t\t\t\t\t\tstate._tag === \"Stopped\" ||\n\t\t\t\t\t\t\tstate.deadline !== deadline\n\t\t\t\t\t\t)\n\t\t\t\t\t\t\treturn Effect.succeed(state)\n\t\t\t\t\t\treturn stopLocked(\n\t\t\t\t\t\t\tentry,\n\t\t\t\t\t\t\tstate,\n\t\t\t\t\t\t\t{ _tag: \"Expired\" },\n\t\t\t\t\t\t\tOption.none(),\n\t\t\t\t\t\t).pipe(Effect.map(([, next]) => next))\n\t\t\t\t\t})\n\t\t\t\t}),\n\t\t\t),\n\t\t\t{ startImmediately: false },\n\t\t)\n\tconst register = (entry: Entry, unit: Unit) =>\n\t\tSynchronizedRef.updateEffect(entry.state, (state) =>\n\t\t\tEffect.gen(function* () {\n\t\t\t\tconst now = yield* Clock.monotonicTimeNanos\n\t\t\t\tconst current = yield* Effect.fromResult(live(state, now))\n\t\t\t\tconst next = yield* Effect.fromResult(registerUnit(current, unit))\n\t\t\t\tyield* unit.renew(\n\t\t\t\t\tNumber(current.deadline - (yield* Clock.monotonicTimeNanos)) /\n\t\t\t\t\t\t1_000_000,\n\t\t\t\t)\n\t\t\t\tyield* persist(snapshot(next))\n\t\t\t\tyield* FiberSet.run(\n\t\t\t\t\tworkers,\n\t\t\t\t\tobserve(\n\t\t\t\t\t\tunit.exited.pipe(\n\t\t\t\t\t\t\tEffect.flatMap((exit) =>\n\t\t\t\t\t\t\t\tstop(entry, { _tag: \"Exited\" }, Option.some(exit)),\n\t\t\t\t\t\t\t),\n\t\t\t\t\t\t),\n\t\t\t\t\t),\n\t\t\t\t)\n\t\t\t\treturn next\n\t\t\t}),\n\t\t).pipe(Effect.uninterruptible)\n\tconst runLoad = (entry: Entry, state: Loading) =>\n\t\texecution\n\t\t\t.spawn(state.record.handle, state.request, state.record.limits)\n\t\t\t.pipe(\n\t\t\t\tScope.provide(entry.unitScope),\n\t\t\t\tEffect.flatMap((unit) =>\n\t\t\t\t\tregister(entry, unit).pipe(\n\t\t\t\t\t\tEffect.andThen(unit.start),\n\t\t\t\t\t\tEffect.as(unit.code),\n\t\t\t\t\t),\n\t\t\t\t),\n\t\t\t\tEffect.tap((code) => commit(entry, (current) => loaded(current, code))),\n\t\t\t\tEffect.onExit((result) =>\n\t\t\t\t\tEffect.gen(function* () {\n\t\t\t\t\t\tif (Exit.isSuccess(result)) {\n\t\t\t\t\t\t\tyield* Deferred.done(state.reply, result)\n\t\t\t\t\t\t\treturn\n\t\t\t\t\t\t}\n\t\t\t\t\t\tconst current = yield* SynchronizedRef.get(entry.state)\n\t\t\t\t\t\tif (current._tag === \"Loading\")\n\t\t\t\t\t\t\tyield* stop(entry, { _tag: \"LoadFailed\", cause: result.cause })\n\t\t\t\t\t\tconst healthCause = yield* health.cause\n\t\t\t\t\t\tyield* Deferred.failCause(\n\t\t\t\t\t\t\tstate.reply,\n\t\t\t\t\t\t\tCause.combine(result.cause, healthCause),\n\t\t\t\t\t\t)\n\t\t\t\t\t}),\n\t\t\t\t),\n\t\t\t\t// Load's caller observes its complete exit through the reply, including cancellation.\n\t\t\t\tEffect.exit,\n\t\t\t\tEffect.asVoid,\n\t\t\t)\n\n\treturn {\n\t\tpersist,\n\t\tstatus,\n\t\tlatest,\n\t\tentryFor,\n\t\tstop,\n\t\tscheduleLease,\n\t\trunLoad,\n\t\thealthy,\n\t}\n}\ntype Operations = ReturnType<typeof operations>\nconst recover = (runtime: Runtime, actions: Operations) =>\n\tEffect.gen(function* () {\n\t\tconst { store, execution, confirmation, records } = runtime\n\t\tconst { persist } = actions\n\t\t// Recover before the service is published. Construction does not resume old leases.\n\t\tconst stored = yield* store.list\n\t\tyield* Ref.set(\n\t\t\trecords,\n\t\t\tHashMap.fromIterable(\n\t\t\t\tArray.map(stored, (record) => [record.handle.token, record] as const),\n\t\t\t),\n\t\t)\n\t\tfor (const record of stored) {\n\t\t\tif (record.phase === \"Stopped\") continue\n\t\t\tconst child = childOf(record)\n\t\t\tconst termination = Option.isNone(child)\n\t\t\t\t? emptyTermination\n\t\t\t\t: yield* execution.recover(child.value).pipe(\n\t\t\t\t\t\tEffect.timeout(confirmation),\n\t\t\t\t\t\tEffect.catchTags({\n\t\t\t\t\t\t\tExecutionError: (error) =>\n\t\t\t\t\t\t\t\tEffect.fail(\n\t\t\t\t\t\t\t\t\tTerminationUnconfirmed.make({\n\t\t\t\t\t\t\t\t\t\tdetail: \"Orphan recovery did not confirm exit\",\n\t\t\t\t\t\t\t\t\t\tcause: Cause.fail(error),\n\t\t\t\t\t\t\t\t\t}),\n\t\t\t\t\t\t\t\t),\n\t\t\t\t\t\t\tTimeoutError: (error) =>\n\t\t\t\t\t\t\t\tEffect.fail(\n\t\t\t\t\t\t\t\t\tTerminationUnconfirmed.make({\n\t\t\t\t\t\t\t\t\t\tdetail: \"Orphan recovery did not confirm exit\",\n\t\t\t\t\t\t\t\t\t\tcause: Cause.fail(error),\n\t\t\t\t\t\t\t\t\t}),\n\t\t\t\t\t\t\t\t),\n\t\t\t\t\t\t}),\n\t\t\t\t\t)\n\t\t\tyield* persist(\n\t\t\t\tstoppedRecord(\n\t\t\t\t\trecord.phase === \"Stopping\" ? record.previous : record,\n\t\t\t\t\t{ _tag: \"Recovery\" },\n\t\t\t\t\ttermination,\n\t\t\t\t),\n\t\t\t)\n\t\t}\n\t})\nconst ownShutdown = (runtime: Runtime, actions: Operations) =>\n\tEffect.gen(function* () {\n\t\tconst { entries, health, closing } = runtime\n\t\tconst { stop } = actions\n\t\tyield* Effect.addFinalizer(() =>\n\t\t\tEffect.gen(function* () {\n\t\t\t\tyield* Ref.set(closing, true)\n\t\t\t\tconst all = yield* Ref.get(entries)\n\t\t\t\tconst exits = yield* Effect.forEach(HashMap.values(all), (entry) =>\n\t\t\t\t\tstop(entry, { _tag: \"Shutdown\" }).pipe(\n\t\t\t\t\t\tEffect.flatMap(Deferred.await),\n\t\t\t\t\t\tEffect.exit,\n\t\t\t\t\t),\n\t\t\t\t)\n\t\t\t\tconst initial: Cause.Cause<unknown> = yield* health.cause\n\t\t\t\tconst cause = Array.reduce(exits, initial, (cause, exit) =>\n\t\t\t\t\tCause.combine(\n\t\t\t\t\t\tcause,\n\t\t\t\t\t\tExit.isFailure(exit) ? exit.cause : exit.value.cause,\n\t\t\t\t\t),\n\t\t\t\t)\n\t\t\t\tif (cause.reasons.length > 0)\n\t\t\t\t\treturn yield* Effect.failCause(cleanupCause(cause))\n\t\t\t}),\n\t\t)\n\t})\nconst protocol = (runtime: Runtime, actions: Operations) =>\n\tEffect.gen(function* () {\n\t\tconst { random, owner, locks, lease, limits, records, entries, health } =\n\t\t\truntime\n\t\tconst {\n\t\t\tpersist,\n\t\t\tstatus,\n\t\t\tlatest,\n\t\t\tentryFor,\n\t\t\tstop,\n\t\t\tscheduleLease,\n\t\t\trunLoad,\n\t\t\thealthy,\n\t\t} = actions\n\t\treturn Supervisor.of({\n\t\t\tawait: health.await,\n\t\t\tstatus,\n\t\t\thighWater: (key) =>\n\t\t\t\tlatest(key).pipe(Effect.map((value) => (value === 0 ? null : value))),\n\t\t\topen: (request) =>\n\t\t\t\tEffect.scoped(\n\t\t\t\t\tEffect.gen(function* () {\n\t\t\t\t\t\tyield* healthy\n\t\t\t\t\t\tconst leaseMillis = Duration.toMillis(request.lease ?? lease)\n\t\t\t\t\t\tconst negotiated = negotiate(limits, request.limits ?? defaults)\n\t\t\t\t\t\tconst lock = yield* RcMap.get(locks, keyOf(request.key))\n\t\t\t\t\t\treturn yield* lock.withPermit(\n\t\t\t\t\t\t\tEffect.gen(function* () {\n\t\t\t\t\t\t\t\tyield* healthy\n\t\t\t\t\t\t\t\tconst allRecords = yield* Ref.get(records)\n\t\t\t\t\t\t\t\tconst same = Array.filter(\n\t\t\t\t\t\t\t\t\tArray.fromIterable(HashMap.values(allRecords)),\n\t\t\t\t\t\t\t\t\t(row) =>\n\t\t\t\t\t\t\t\t\t\tEqual.equals(keyOf(row.handle.key), keyOf(request.key)),\n\t\t\t\t\t\t\t\t)\n\t\t\t\t\t\t\t\tconst prior = Array.findFirst(\n\t\t\t\t\t\t\t\t\tsame,\n\t\t\t\t\t\t\t\t\t(row) => row.requestId === request.requestId,\n\t\t\t\t\t\t\t\t)\n\t\t\t\t\t\t\t\tif (Option.isSome(prior)) return prior.value\n\t\t\t\t\t\t\t\tconst generation = yield* latest(request.key)\n\t\t\t\t\t\t\t\tif (generation !== (request.expectedGeneration ?? 0))\n\t\t\t\t\t\t\t\t\treturn yield* StaleSession.make({\n\t\t\t\t\t\t\t\t\t\tdetail:\n\t\t\t\t\t\t\t\t\t\t\t\"Open expectedGeneration does not match the generation high-water mark\",\n\t\t\t\t\t\t\t\t\t})\n\t\t\t\t\t\t\t\tfor (const record of same) {\n\t\t\t\t\t\t\t\t\tconst allEntries = yield* Ref.get(entries)\n\t\t\t\t\t\t\t\t\tconst entry = HashMap.get(allEntries, record.handle.token)\n\t\t\t\t\t\t\t\t\tif (Option.isSome(entry))\n\t\t\t\t\t\t\t\t\t\tyield* stop(entry.value, { _tag: \"Superseded\" }).pipe(\n\t\t\t\t\t\t\t\t\t\t\tEffect.flatMap(Deferred.await),\n\t\t\t\t\t\t\t\t\t\t\tEffect.tap((result) =>\n\t\t\t\t\t\t\t\t\t\t\t\tresult.cause.reasons.length === 0\n\t\t\t\t\t\t\t\t\t\t\t\t\t? Effect.void\n\t\t\t\t\t\t\t\t\t\t\t\t\t: Effect.logWarning(\n\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\"Superseded remote execution cleanup failed\",\n\t\t\t\t\t\t\t\t\t\t\t\t\t\t\tresult.cause,\n\t\t\t\t\t\t\t\t\t\t\t\t\t\t).pipe(\n\t\t\t\t\t\t\t\t\t\t\t\t\t\t\tEffect.annotateLogs({\n\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\"remote.identity\": record.handle.key.identity,\n\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\"remote.instance\": record.handle.key.instance,\n\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\"remote.generation\": record.handle.generation,\n\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t}),\n\t\t\t\t\t\t\t\t\t\t\t\t\t\t),\n\t\t\t\t\t\t\t\t\t\t\t),\n\t\t\t\t\t\t\t\t\t\t)\n\t\t\t\t\t\t\t\t}\n\t\t\t\t\t\t\t\tyield* healthy\n\t\t\t\t\t\t\t\tconst token = yield* random.uuidV4()\n\t\t\t\t\t\t\t\tconst record: typeof OpenRecord.Type = {\n\t\t\t\t\t\t\t\t\tversion: 1,\n\t\t\t\t\t\t\t\t\tphase: \"Open\",\n\t\t\t\t\t\t\t\t\thandle: {\n\t\t\t\t\t\t\t\t\t\tkey: request.key,\n\t\t\t\t\t\t\t\t\t\ttoken,\n\t\t\t\t\t\t\t\t\t\tgeneration: generation + 1,\n\t\t\t\t\t\t\t\t\t},\n\t\t\t\t\t\t\t\t\trequestId: request.requestId,\n\t\t\t\t\t\t\t\t\tleaseMillis,\n\t\t\t\t\t\t\t\t\tlimits: negotiated,\n\t\t\t\t\t\t\t\t}\n\t\t\t\t\t\t\t\treturn yield* Effect.uninterruptible(\n\t\t\t\t\t\t\t\t\tEffect.gen(function* () {\n\t\t\t\t\t\t\t\t\t\tyield* persist(record)\n\t\t\t\t\t\t\t\t\t\tconst deadline =\n\t\t\t\t\t\t\t\t\t\t\t(yield* Clock.monotonicTimeNanos) + nanos(leaseMillis)\n\t\t\t\t\t\t\t\t\t\tconst scope = yield* Scope.fork(owner)\n\t\t\t\t\t\t\t\t\t\tconst entry: Entry = {\n\t\t\t\t\t\t\t\t\t\t\tstate: yield* SynchronizedRef.make<Session>(\n\t\t\t\t\t\t\t\t\t\t\t\tSession.Open({ record, deadline }),\n\t\t\t\t\t\t\t\t\t\t\t),\n\t\t\t\t\t\t\t\t\t\t\tscope,\n\t\t\t\t\t\t\t\t\t\t\tunitScope: yield* Scope.fork(scope),\n\t\t\t\t\t\t\t\t\t\t\ttimer: yield* FiberHandle.make<void, never>().pipe(\n\t\t\t\t\t\t\t\t\t\t\t\tScope.provide(scope),\n\t\t\t\t\t\t\t\t\t\t\t),\n\t\t\t\t\t\t\t\t\t\t\tloading: yield* FiberHandle.make<void, never>().pipe(\n\t\t\t\t\t\t\t\t\t\t\t\tScope.provide(scope),\n\t\t\t\t\t\t\t\t\t\t\t),\n\t\t\t\t\t\t\t\t\t\t}\n\t\t\t\t\t\t\t\t\t\t// The store's retention policy is also the in-memory eviction policy.\n\t\t\t\t\t\t\t\t\t\tconst retained = yield* Ref.get(records)\n\t\t\t\t\t\t\t\t\t\tconst old = yield* Ref.modify(\n\t\t\t\t\t\t\t\t\t\t\tentries,\n\t\t\t\t\t\t\t\t\t\t\t(all) =>\n\t\t\t\t\t\t\t\t\t\t\t\t[\n\t\t\t\t\t\t\t\t\t\t\t\t\tArray.filter(\n\t\t\t\t\t\t\t\t\t\t\t\t\t\tArray.fromIterable(HashMap.entries(all)),\n\t\t\t\t\t\t\t\t\t\t\t\t\t\t([key]) => !HashMap.has(retained, key),\n\t\t\t\t\t\t\t\t\t\t\t\t\t),\n\t\t\t\t\t\t\t\t\t\t\t\t\tHashMap.set(\n\t\t\t\t\t\t\t\t\t\t\t\t\t\tHashMap.filter(all, (_, key) =>\n\t\t\t\t\t\t\t\t\t\t\t\t\t\t\tHashMap.has(retained, key),\n\t\t\t\t\t\t\t\t\t\t\t\t\t\t),\n\t\t\t\t\t\t\t\t\t\t\t\t\t\ttoken,\n\t\t\t\t\t\t\t\t\t\t\t\t\t\tentry,\n\t\t\t\t\t\t\t\t\t\t\t\t\t),\n\t\t\t\t\t\t\t\t\t\t\t\t] as const,\n\t\t\t\t\t\t\t\t\t\t)\n\t\t\t\t\t\t\t\t\t\tfor (const [, retired] of old)\n\t\t\t\t\t\t\t\t\t\t\tyield* Release.close(retired.scope, Exit.void)\n\t\t\t\t\t\t\t\t\t\tyield* scheduleLease(entry, deadline)\n\t\t\t\t\t\t\t\t\t\treturn record\n\t\t\t\t\t\t\t\t\t}),\n\t\t\t\t\t\t\t\t)\n\t\t\t\t\t\t\t}),\n\t\t\t\t\t\t)\n\t\t\t\t\t}),\n\t\t\t\t),\n\t\t\trenew: (handle) =>\n\t\t\t\tEffect.gen(function* () {\n\t\t\t\t\tyield* healthy\n\t\t\t\t\tconst entry = yield* entryFor(handle)\n\t\t\t\t\treturn yield* SynchronizedRef.modifyEffect(entry.state, (state) =>\n\t\t\t\t\t\tEffect.gen(function* () {\n\t\t\t\t\t\t\tconst now = yield* Clock.monotonicTimeNanos\n\t\t\t\t\t\t\tconst current = yield* Effect.fromResult(live(state, now))\n\t\t\t\t\t\t\tconst running = executionOf(current)\n\t\t\t\t\t\t\tif (running._tag === \"Running\")\n\t\t\t\t\t\t\t\tyield* running.unit.renew(current.record.leaseMillis)\n\t\t\t\t\t\t\tconst deadline = now + nanos(current.record.leaseMillis)\n\t\t\t\t\t\t\tyield* scheduleLease(entry, deadline)\n\t\t\t\t\t\t\treturn [\n\t\t\t\t\t\t\t\tcurrent.record.leaseMillis,\n\t\t\t\t\t\t\t\t{ ...current, deadline },\n\t\t\t\t\t\t\t] as const\n\t\t\t\t\t\t}),\n\t\t\t\t\t)\n\t\t\t\t}),\n\t\t\tload: (handle, request) =>\n\t\t\t\tEffect.gen(function* () {\n\t\t\t\t\tyield* healthy\n\t\t\t\t\tconst entry = yield* entryFor(handle)\n\t\t\t\t\tconst reply = yield* SynchronizedRef.modifyEffect(\n\t\t\t\t\t\tentry.state,\n\t\t\t\t\t\t(state) =>\n\t\t\t\t\t\t\tEffect.gen(function* () {\n\t\t\t\t\t\t\t\tconst now = yield* Clock.monotonicTimeNanos\n\t\t\t\t\t\t\t\tconst current = yield* Effect.fromResult(live(state, now))\n\t\t\t\t\t\t\t\tif (current._tag !== \"Open\") {\n\t\t\t\t\t\t\t\t\tconst before =\n\t\t\t\t\t\t\t\t\t\tcurrent._tag === \"Loading\"\n\t\t\t\t\t\t\t\t\t\t\t? current.request\n\t\t\t\t\t\t\t\t\t\t\t: current.record.load\n\t\t\t\t\t\t\t\t\tif (before.specifier !== request.specifier)\n\t\t\t\t\t\t\t\t\t\treturn yield* SessionConflict.make({\n\t\t\t\t\t\t\t\t\t\t\tdetail:\n\t\t\t\t\t\t\t\t\t\t\t\t\"Load was already requested with a different specifier\",\n\t\t\t\t\t\t\t\t\t\t})\n\t\t\t\t\t\t\t\t\treturn [\n\t\t\t\t\t\t\t\t\t\tcurrent._tag === \"Loading\"\n\t\t\t\t\t\t\t\t\t\t\t? Deferred.await(current.reply)\n\t\t\t\t\t\t\t\t\t\t\t: Effect.succeed(current.record.code),\n\t\t\t\t\t\t\t\t\t\tcurrent,\n\t\t\t\t\t\t\t\t\t] as const\n\t\t\t\t\t\t\t\t}\n\t\t\t\t\t\t\t\tconst done = yield* Deferred.make<\n\t\t\t\t\t\t\t\t\tCodeIdentity,\n\t\t\t\t\t\t\t\t\tSupervisorError\n\t\t\t\t\t\t\t\t>()\n\t\t\t\t\t\t\t\tconst next = beginLoad(current, request, done)\n\t\t\t\t\t\t\t\tyield* persist(snapshot(next))\n\t\t\t\t\t\t\t\tif (next._tag === \"Loading\")\n\t\t\t\t\t\t\t\t\tyield* FiberHandle.run(entry.loading, runLoad(entry, next), {\n\t\t\t\t\t\t\t\t\t\tstartImmediately: false,\n\t\t\t\t\t\t\t\t\t})\n\t\t\t\t\t\t\t\treturn [Deferred.await(done), next] as const\n\t\t\t\t\t\t\t}),\n\t\t\t\t\t).pipe(Effect.uninterruptible)\n\t\t\t\t\treturn yield* reply\n\t\t\t\t}),\n\t\t\tdispose: (handle) =>\n\t\t\t\tEffect.gen(function* () {\n\t\t\t\t\tconst record = yield* status(handle)\n\t\t\t\t\tif (record.phase === \"Stopped\") return record.termination\n\t\t\t\t\tconst entry = yield* entryFor(handle)\n\t\t\t\t\treturn yield* stop(entry, { _tag: \"Disposed\" }).pipe(\n\t\t\t\t\t\tEffect.flatMap(Deferred.await),\n\t\t\t\t\t)\n\t\t\t\t}),\n\t\t})\n\t})\nexport const make = (options: Options = {}) =>\n\tEffect.gen(function* () {\n\t\tconst runtime = yield* initialize(options)\n\t\tconst actions = operations(runtime)\n\t\tyield* recover(runtime, actions)\n\t\tyield* ownShutdown(runtime, actions)\n\t\treturn yield* protocol(runtime, actions)\n\t})\nexport const layer = (options: Options = {}) =>\n\tLayer.effect(Supervisor, make(options))\n"],"mappings":";;;;;;;;;AAuFA,IAAa,aAAb,cAAgC,QAAQ,QAoBtC,CAAC,CAAC,qDAAqD,CAAC,CAAC,CAAC;AAM5D,MAAM,SAAS,KAAK,WAAmB;AAMvC,MAAM,iBAAiB,KAAK,WAA2B;AA2BvD,MAAM,UAAU,KAAK,WAAoB;AAazC,SAAS,SAAS,OAA+B;CAChD,OAAO,MAAM,SAAS,YACnB;EACA,GAAG,MAAM;EACT,OAAO;EACP,MAAM,MAAM;EACZ,QACC,MAAM,OAAO,SAAS,aACnB,EAAE,MAAM,WAAW,IACnB;GAAE,MAAM;GAAc,OAAO,MAAM,OAAO,KAAK;EAAS;CAC7D,IACC,MAAM;AACV;AACA,MAAM,QACL,OACA,QACwD;CACxD,IAAI,MAAM,SAAS,cAAc,MAAM,SAAS,WAC/C,OAAO,OAAO,KACb,MAAM,OAAO,OAAO,SAAS,YAC1B,aAAa,KAAK,EAClB,QAAQ,gCACT,CAAC,IACA,eAAe,KAAK,EACpB,QAAQ,qCACT,CAAC,CACJ;CACD,OAAO,OAAO,MAAM,WACjB,OAAO,KACP,aAAa,KAAK,EACjB,QAAQ,gCACT,CAAC,CACF,IACC,OAAO,QAAQ,KAAK;AACxB;AACA,MAAM,eAAe,UAAgC;CACpD,QAAQ,MAAM,MAAd;EACC,KAAK,QACJ,OAAO,eAAe,OAAO;EAC9B,KAAK,WACJ,OAAO,MAAM,OAAO,SAAS,eAC1B,eAAe,QAAQ,EAAE,MAAM,MAAM,OAAO,KAAK,CAAC,IAClD,eAAe,OAAO;EAC1B,KAAK,UACJ,OAAO,eAAe,QAAQ,EAAE,MAAM,MAAM,KAAK,CAAC;CACpD;AACD;;AAEA,MAAM,aACL,OACA,SACA,UAEA,QAAQ,QAAQ;CACf,QAAQ,MAAM;CACd,UAAU,MAAM;CAChB;CACA;CACA,QAAQ,OAAO,SAAS;AACzB,CAAC;AACF,MAAM,gBACL,OACA,SAC6D;CAC7D,IAAI,MAAM,SAAS,WAClB,OAAO,OAAO,KACb,eAAe,KAAK,EACnB,QAAQ,qCACT,CAAC,CACF;CACD,IAAI,MAAM,OAAO,SAAS,cACzB,OAAO,OAAO,KACb,eAAe,KAAK,EACnB,QAAQ,sDACT,CAAC,CACF;CACD,OAAO,OAAO,QACb,QAAQ,QAAQ;EAAE,GAAG;EAAO,QAAQ,OAAO,WAAW,EAAE,KAAK,CAAC;CAAE,CAAC,CAClE;AACD;AACA,MAAM,UACL,OACA,SAC6D;CAC7D,IAAI,MAAM,SAAS,WAClB,OAAO,OAAO,KACb,eAAe,KAAK,EACnB,QAAQ,qCACT,CAAC,CACF;CACD,IAAI,MAAM,OAAO,SAAS,cACzB,OAAO,OAAO,KACb,eAAe,KAAK,EACnB,QAAQ,2DACT,CAAC,CACF;CACD,OAAO,OAAO,QACb,QAAQ,OAAO;EACd,UAAU,MAAM;EAChB,MAAM,MAAM,OAAO;EACnB,QAAQ;GACP,GAAG,MAAM;GACT,OAAO;GACP,MAAM,MAAM;GACZ;GACA,OAAO,MAAM,OAAO,KAAK;EAC1B;CACD,CAAC,CACF;AACD;AACA,MAAM,aACL,OACA,QACA,OACA,SAEA,QAAQ,SAAS;CAChB,QAAQ,eAAe,SAAS,KAAK,GAAG,MAAM;CAC9C;CACA,WAAW,OAAO,MAAM,MAAM;EAC7B,cAAc,YAAY,KAAK;EAC/B,SAAS,SAAS,eAAe,OAAO,EAAE,KAAK,CAAC;CACjD,CAAC;AACF,CAAC;AACF,MAAM,SAAS,WAAmB,OAAO,KAAK,KAAK,SAAS,GAAS,CAAC;AACtE,MAAM,mBAAgC;CACrC,MAAM;CACN,MAAM;EAAE,MAAM;EAAG,QAAQ;CAAK;CAC9B,OAAO,MAAM;AACd;AACA,MAAM,aAAmB,SACxB,KAAK,UAAU,IAAI,IAAI,KAAK,QAAQ,MAAM;;AAG3C,MAAM,aACL,WACA,OACA,iBACwD;CACxD,IAAI,UAAU,SAAS,UAAU,OAAO,OAAO,QAAQ,gBAAgB;CACvE,IAAI,UAAU,SAAS,UACtB,OAAO,OAAO,QAAQ;EAAE,GAAG;EAAkB,MAAM,UAAU;CAAK,CAAC;CACpE,MAAM,QAAQ,UAAU;CACxB,OAAO,OAAO,IAAI,aAAa;EAC9B,MAAM,WAAW,OAAO,MAAM,UAAU,KACvC,OAAO,QAAQ,MAAM,MAAM,GAC3B,OAAO,cAAc,KAAK,GAC1B,OAAO,IACR;EACA,IAAI,KAAK,UAAU,QAAQ,KAAK,OAAO,OAAO,SAAS,KAAK,GAC3D,OAAO;GAAE,GAAG;GAAkB,MAAM,SAAS,MAAM;EAAM;EAC1D,MAAM,SAAS,OAAO,OAAO,KAAK,MAAM,IAAI;EAC5C,MAAM,SAAS,OAAO,MAAM,OAAO,KAClC,OAAO,cAAc,YAAY,GACjC,OAAO,IACR;EACA,MAAM,QAAQ,MAAM,QACnB,MAAM,QAAQ,UAAU,QAAQ,GAAG,UAAU,MAAM,CAAC,GACpD,UAAU,MAAM,CACjB;EACA,IAAI,KAAK,UAAU,MAAM,KAAK,OAAO,OAAO,OAAO,KAAK,GACvD,OAAO,OAAO,uBAAuB,KAAK;GACzC,QAAQ;GACR;EACD,CAAC;EACF,OAAO;GACN,MAAM;GACN,MAAM,OAAO,MAAM;GACnB;EACD;CACD,CAAC;AACF;AAEA,MAAM,cAAc,UAAmB,CAAC,MACvC,OAAO,IAAI,aAAa;CACvB,MAAM,QAAQ,OAAO;CACrB,MAAM,YAAY,OAAO;CACzB,MAAM,SAAS,OAAO,aAAa;CACnC,MAAM,SAAS,OAAO,OAAO;CAC7B,MAAM,QAAQ,OAAO,MAAM,KAAK,MAAM;CAoBtC,OAAO;EACN;EACA;EACA;EACA;EACA,SAAA,OAvBsB,SAAS,KAAkB,CAAC,CAAC,KACnD,MAAM,QAAQ,KAAK,CACpB;EAsBC,OAAA,OArBoB,MAAM,KAAK,EAC/B,SAAS,SAAqB,UAAU,KAAK,CAAC,EAC/C,CAAC,CAAC,CAAC,KAAK,MAAM,QAAQ,KAAK,CAAC;EAoB3B,OAnBa,SAAS,SAAS,QAAQ,SAAS,YAmB5C;EACJ,OAnBa,SAAS,SAAS,QAAQ,SAAS,WAmB5C;EACJ,cAnBoB,SAAS,SAC7B,QAAQ,uBAAuB,WAkBpB;EACX,QAjBc,QAAQ,UAAU;EAkBhC,SAAA,OAjBsB,IAAI,KAAK,QAAQ,MAA6B,CAAC;EAkBrE,SAAA,OAjBsB,IAAI,KAAK,QAAQ,MAAqB,CAAC;EAkB7D,QAAA,OAjBqBA,OAAmC,CAAC,CAAC,KAC1D,MAAM,QAAQ,KAAK,CACpB;EAgBC,SAAA,OAfsB,IAAI,KAAK,KAAK;CAgBrC;AACD,CAAC;AAEF,MAAM,cAAc,YAAqB;CACxC,MAAM,EACL,OACA,WACA,SACA,OACA,cACA,SACA,SACA,QACA,YACG;CAEJ,MAAM,SAAS,OAAO;CACtB,MAAM,WAAc,WACnB,OAAO,KAAK,OAAO,QAAQ,OAAO,WAAW,MAAM,CAAC;CACrD,MAAM,UAAU,OAAO,MAAM,KAC5B,OAAO,QACN,OAAO,IAAI,aAAa;EACvB,IAAI,OAAO,IAAI,IAAI,OAAO,GACzB,OAAO,OAAO,cAAc,KAAK,EAAE,QAAQ,wBAAwB,CAAC;CACtE,CAAC,CACF,CACD;CACA,MAAM,WAAW,WAChB,MACE,KAAK,MAAM,CAAC,CACZ,KACA,OAAO,SAAS,MAAM,GACtB,OAAO,QACN,IAAI,OAAO,UAAU,QAAQC,KAAe,KAAK,MAAM,CAAC,CACzD,CACD;CACF,MAAM,UAAU,WACf,IAAI,IAAI,OAAO,CAAC,CAAC,KAChB,OAAO,SAAS,QAAQ;EACvB,MAAM,QAAQ,QAAQ,IAAI,KAAK,OAAO,KAAK;EAC3C,OAAO,OAAO,OAAO,KAAK,KACzB,MAAM,OAAO,MAAM,MAAM,MAAM,OAAO,GAAG,GAAG,MAAM,OAAO,GAAG,CAAC,KAC7D,MAAM,MAAM,OAAO,eAAe,OAAO,aACvC,OAAO,QAAQ,MAAM,KAAK,IAC1B,OAAO,KACP,aAAa,KAAK,EACjB,QAAQ,gCACT,CAAC,CACF;CACH,CAAC,CACF;CACD,MAAM,UAAU,QACf,IAAI,IAAI,OAAO,CAAC,CAAC,KAChB,OAAO,KAAK,QACX,MAAM,OACL,MAAM,aAAa,QAAQ,OAAO,GAAG,CAAC,GACtC,IACC,OAAO,WACP,MAAM,OAAO,MAAM,OAAO,OAAO,GAAG,GAAG,MAAM,GAAG,CAAC,IAC9C,KAAK,IAAI,OAAO,OAAO,OAAO,UAAU,IACxC,KACL,CACD,CACD;CACD,MAAM,YAAY,WACjB,OAAO,IAAI,aAAa;EACvB,OAAO,OAAO,MAAM;EACpB,MAAM,MAAM,OAAO,IAAI,IAAI,OAAO;EAClC,MAAM,QAAQ,QAAQ,IAAI,KAAK,OAAO,KAAK;EAC3C,IAAI,OAAO,OAAO,KAAK,GACtB,OAAO,OAAO,eAAe,KAAK,EACjC,QAAQ,0CACT,CAAC;EACF,OAAO,MAAM;CACd,CAAC;CACF,MAAM,UACL,OACA,eAIA,gBAAgB,aAAa,MAAM,QAAQ,UAC1C,OAAO,IAAI,aAAa;EACvB,MAAM,OAAO,OAAO,OAAO,WAAW,WAAW,KAAK,CAAC;EACvD,OAAO,QAAQ,SAAS,IAAI,CAAC;EAC7B,OAAO;CACR,CAAC,CACF;CACD,MAAM,cACL,OACA,OACA,UAEA,OAAO,IAAI,aAAa;EACvB,OAAO,YAAY,MAAM,MAAM,OAAO;EACtC,MAAM,SAAS,OAAO,UAAU,MAAM,WAAW,OAAO,YAAY;EACpE,MAAM,SAAS,OAAO,OAAO,KAC5BC,MAAc,MAAM,WAAW,KAAK,IAAI,CACzC;EACA,MAAM,cAA2B;GAChC,GAAG;GACH,OAAO,MAAM,QAAQ,OAAO,OAAO,UAAU,MAAM,CAAC;EACrD;EACA,MAAM,SAAS,cACd,MAAM,OAAO,UACb,MAAM,OAAO,QACb,WACD;EACA,OAAO,gBAAgB,aAAa,MAAM,aACzC,QAAQ,MAAM,CAAC,CAAC,KACf,OAAO,GAAG,QAAQ,QAAQ;GAAE;GAAQ,OAAO,MAAM;EAAM,CAAC,CAAC,CAC1D,CACD;EACA,IAAI,KAAK,UAAU,KAAK,GAAG,OAAO,OAAO,OAAO,UAAU,MAAM,KAAK;EACrE,OAAO;CACR,CAAC;;CAEF,MAAM,cACL,OACA,OACA,QACA,SAEA,OAAO,IAAI,aAAa;EACvB,IAAI,MAAM,SAAS,cAAc,MAAM,SAAS,WAC/C,OAAO,CAAC,MAAM,OAAO,KAAK;EAC3B,MAAM,QAAQ,OAAO,SAAS,KAAmC;EACjE,MAAM,OAAO,UAAU,OAAO,QAAQ,OAAO,IAAI;EAEjD,MAAM,QAAQ,OAAO,OAAO,KAAK,QAAQ,KAAK,MAAM,CAAC;EACrD,OAAO,SAAS,IACf,SACA,WAAW,OAAO,MAAM,KAAK,CAAC,CAAC,KAC9B,OAAO,QAAQ,WAAW,SAAS,KAAK,OAAO,MAAM,CAAC,GACtD,OACD,GACA,EAAE,kBAAkB,MAAM,CAC3B;EACA,OAAO,CAAC,OAAO,IAAI;CACpB,CAAC;CACF,MAAM,QACL,OACA,QACA,OAAkC,OAAO,KAAK,MAE9C,gBAAgB,aAAa,MAAM,QAAQ,UAC1C,WAAW,OAAO,OAAO,QAAQ,IAAI,CACtC,CAAC,CAAC,KAAK,OAAO,eAAe;CAC9B,MAAM,iBAAiB,OAAc,aACpC,YAAY,IACX,MAAM,OACN,QACC,OAAO,IAAI,aAAa;EACvB,MAAM,MAAM,OAAO,MAAM;EACzB,OAAO,OAAO,MACb,SAAS,MAAM,WAAW,MAAM,WAAW,MAAM,EAAE,CACpD;EACA,OAAO,gBAAgB,aAAa,MAAM,QAAQ,UAAU;GAC3D,IACC,MAAM,SAAS,cACf,MAAM,SAAS,aACf,MAAM,aAAa,UAEnB,OAAO,OAAO,QAAQ,KAAK;GAC5B,OAAO,WACN,OACA,OACA,EAAE,MAAM,UAAU,GAClB,OAAO,KAAK,CACb,CAAC,CAAC,KAAK,OAAO,KAAK,GAAG,UAAU,IAAI,CAAC;EACtC,CAAC;CACF,CAAC,CACF,GACA,EAAE,kBAAkB,MAAM,CAC3B;CACD,MAAM,YAAY,OAAc,SAC/B,gBAAgB,aAAa,MAAM,QAAQ,UAC1C,OAAO,IAAI,aAAa;EACvB,MAAM,MAAM,OAAO,MAAM;EACzB,MAAM,UAAU,OAAO,OAAO,WAAW,KAAK,OAAO,GAAG,CAAC;EACzD,MAAM,OAAO,OAAO,OAAO,WAAW,aAAa,SAAS,IAAI,CAAC;EACjE,OAAO,KAAK,MACX,OAAO,QAAQ,YAAY,OAAO,MAAM,mBAAmB,IAC1D,GACF;EACA,OAAO,QAAQ,SAAS,IAAI,CAAC;EAC7B,OAAO,SAAS,IACf,SACA,QACC,KAAK,OAAO,KACX,OAAO,SAAS,SACf,KAAK,OAAO,EAAE,MAAM,SAAS,GAAG,OAAO,KAAK,IAAI,CAAC,CAClD,CACD,CACD,CACD;EACA,OAAO;CACR,CAAC,CACF,CAAC,CAAC,KAAK,OAAO,eAAe;CAC9B,MAAM,WAAW,OAAc,UAC9B,UACE,MAAM,MAAM,OAAO,QAAQ,MAAM,SAAS,MAAM,OAAO,MAAM,CAAC,CAC9D,KACA,MAAM,QAAQ,MAAM,SAAS,GAC7B,OAAO,SAAS,SACf,SAAS,OAAO,IAAI,CAAC,CAAC,KACrB,OAAO,QAAQ,KAAK,KAAK,GACzB,OAAO,GAAG,KAAK,IAAI,CACpB,CACD,GACA,OAAO,KAAK,SAAS,OAAO,QAAQ,YAAY,OAAO,SAAS,IAAI,CAAC,CAAC,GACtE,OAAO,QAAQ,WACd,OAAO,IAAI,aAAa;EACvB,IAAI,KAAK,UAAU,MAAM,GAAG;GAC3B,OAAO,SAAS,KAAK,MAAM,OAAO,MAAM;GACxC;EACD;EAEA,KAAI,OADmB,gBAAgB,IAAI,MAAM,KAAK,EAAA,CAC1C,SAAS,WACpB,OAAO,KAAK,OAAO;GAAE,MAAM;GAAc,OAAO,OAAO;EAAM,CAAC;EAC/D,MAAM,cAAc,OAAO,OAAO;EAClC,OAAO,SAAS,UACf,MAAM,OACN,MAAM,QAAQ,OAAO,OAAO,WAAW,CACxC;CACD,CAAC,CACF,GAEA,OAAO,MACP,OAAO,MACR;CAEF,OAAO;EACN;EACA;EACA;EACA;EACA;EACA;EACA;EACA;CACD;AACD;AAEA,MAAM,WAAW,SAAkB,YAClC,OAAO,IAAI,aAAa;CACvB,MAAM,EAAE,OAAO,WAAW,cAAc,YAAY;CACpD,MAAM,EAAE,YAAY;CAEpB,MAAM,SAAS,OAAO,MAAM;CAC5B,OAAO,IAAI,IACV,SACA,QAAQ,aACP,MAAM,IAAI,SAAS,WAAW,CAAC,OAAO,OAAO,OAAO,MAAM,CAAU,CACrE,CACD;CACA,KAAK,MAAM,UAAU,QAAQ;EAC5B,IAAI,OAAO,UAAU,WAAW;EAChC,MAAM,QAAQ,QAAQ,MAAM;EAC5B,MAAM,cAAc,OAAO,OAAO,KAAK,IACpC,mBACA,OAAO,UAAU,QAAQ,MAAM,KAAK,CAAC,CAAC,KACtC,OAAO,QAAQ,YAAY,GAC3B,OAAO,UAAU;GAChB,iBAAiB,UAChB,OAAO,KACN,uBAAuB,KAAK;IAC3B,QAAQ;IACR,OAAO,MAAM,KAAK,KAAK;GACxB,CAAC,CACF;GACD,eAAe,UACd,OAAO,KACN,uBAAuB,KAAK;IAC3B,QAAQ;IACR,OAAO,MAAM,KAAK,KAAK;GACxB,CAAC,CACF;EACF,CAAC,CACF;EACF,OAAO,QACN,cACC,OAAO,UAAU,aAAa,OAAO,WAAW,QAChD,EAAE,MAAM,WAAW,GACnB,WACD,CACD;CACD;AACD,CAAC;AACF,MAAM,eAAe,SAAkB,YACtC,OAAO,IAAI,aAAa;CACvB,MAAM,EAAE,SAAS,QAAQ,YAAY;CACrC,MAAM,EAAE,SAAS;CACjB,OAAO,OAAO,mBACb,OAAO,IAAI,aAAa;EACvB,OAAO,IAAI,IAAI,SAAS,IAAI;EAC5B,MAAM,MAAM,OAAO,IAAI,IAAI,OAAO;EAClC,MAAM,QAAQ,OAAO,OAAO,QAAQ,QAAQ,OAAO,GAAG,IAAI,UACzD,KAAK,OAAO,EAAE,MAAM,WAAW,CAAC,CAAC,CAAC,KACjC,OAAO,QAAQ,SAAS,KAAK,GAC7B,OAAO,IACR,CACD;EACA,MAAM,UAAgC,OAAO,OAAO;EACpD,MAAM,QAAQ,MAAM,OAAO,OAAO,UAAU,OAAO,SAClD,MAAM,QACL,OACA,KAAK,UAAU,IAAI,IAAI,KAAK,QAAQ,KAAK,MAAM,KAChD,CACD;EACA,IAAI,MAAM,QAAQ,SAAS,GAC1B,OAAO,OAAO,OAAO,UAAU,aAAa,KAAK,CAAC;CACpD,CAAC,CACF;AACD,CAAC;AACF,MAAM,YAAY,SAAkB,YACnC,OAAO,IAAI,aAAa;CACvB,MAAM,EAAE,QAAQ,OAAO,OAAO,OAAO,QAAQ,SAAS,SAAS,WAC9D;CACD,MAAM,EACL,SACA,QACA,QACA,UACA,MACA,eACA,SACA,YACG;CACJ,OAAO,WAAW,GAAG;EACpB,OAAO,OAAO;EACd;EACA,YAAY,QACX,OAAO,GAAG,CAAC,CAAC,KAAK,OAAO,KAAK,UAAW,UAAU,IAAI,OAAO,KAAM,CAAC;EACrE,OAAO,YACN,OAAO,OACN,OAAO,IAAI,aAAa;GACvB,OAAO;GACP,MAAM,cAAc,SAAS,SAAS,QAAQ,SAAS,KAAK;GAC5D,MAAM,aAAa,UAAU,QAAQ,QAAQ,UAAU,QAAQ;GAE/D,OAAO,QAAO,OADM,MAAM,IAAI,OAAO,MAAM,QAAQ,GAAG,CAAC,EAAA,CACpC,WAClB,OAAO,IAAI,aAAa;IACvB,OAAO;IACP,MAAM,aAAa,OAAO,IAAI,IAAI,OAAO;IACzC,MAAM,OAAO,MAAM,OAClB,MAAM,aAAa,QAAQ,OAAO,UAAU,CAAC,IAC5C,QACA,MAAM,OAAO,MAAM,IAAI,OAAO,GAAG,GAAG,MAAM,QAAQ,GAAG,CAAC,CACxD;IACA,MAAM,QAAQ,MAAM,UACnB,OACC,QAAQ,IAAI,cAAc,QAAQ,SACpC;IACA,IAAI,OAAO,OAAO,KAAK,GAAG,OAAO,MAAM;IACvC,MAAM,aAAa,OAAO,OAAO,QAAQ,GAAG;IAC5C,IAAI,gBAAgB,QAAQ,sBAAsB,IACjD,OAAO,OAAO,aAAa,KAAK,EAC/B,QACC,wEACF,CAAC;IACF,KAAK,MAAM,UAAU,MAAM;KAC1B,MAAM,aAAa,OAAO,IAAI,IAAI,OAAO;KACzC,MAAM,QAAQ,QAAQ,IAAI,YAAY,OAAO,OAAO,KAAK;KACzD,IAAI,OAAO,OAAO,KAAK,GACtB,OAAO,KAAK,MAAM,OAAO,EAAE,MAAM,aAAa,CAAC,CAAC,CAAC,KAChD,OAAO,QAAQ,SAAS,KAAK,GAC7B,OAAO,KAAK,WACX,OAAO,MAAM,QAAQ,WAAW,IAC7B,OAAO,OACP,OAAO,WACP,8CACA,OAAO,KACR,CAAC,CAAC,KACD,OAAO,aAAa;MACnB,mBAAmB,OAAO,OAAO,IAAI;MACrC,mBAAmB,OAAO,OAAO,IAAI;MACrC,qBAAqB,OAAO,OAAO;KACpC,CAAC,CACF,CACH,CACD;IACF;IACA,OAAO;IACP,MAAM,QAAQ,OAAO,OAAO,OAAO;IACnC,MAAM,SAAiC;KACtC,SAAS;KACT,OAAO;KACP,QAAQ;MACP,KAAK,QAAQ;MACb;MACA,YAAY,aAAa;KAC1B;KACA,WAAW,QAAQ;KACnB;KACA,QAAQ;IACT;IACA,OAAO,OAAO,OAAO,gBACpB,OAAO,IAAI,aAAa;KACvB,OAAO,QAAQ,MAAM;KACrB,MAAM,YACJ,OAAO,MAAM,sBAAsB,MAAM,WAAW;KACtD,MAAM,QAAQ,OAAO,MAAM,KAAK,KAAK;KACrC,MAAM,QAAe;MACpB,OAAO,OAAO,gBAAgB,KAC7B,QAAQ,KAAK;OAAE;OAAQ;MAAS,CAAC,CAClC;MACA;MACA,WAAW,OAAO,MAAM,KAAK,KAAK;MAClC,OAAO,OAAO,YAAY,KAAkB,CAAC,CAAC,KAC7C,MAAM,QAAQ,KAAK,CACpB;MACA,SAAS,OAAO,YAAY,KAAkB,CAAC,CAAC,KAC/C,MAAM,QAAQ,KAAK,CACpB;KACD;KAEA,MAAM,WAAW,OAAO,IAAI,IAAI,OAAO;KACvC,MAAM,MAAM,OAAO,IAAI,OACtB,UACC,QACA,CACC,MAAM,OACL,MAAM,aAAa,QAAQ,QAAQ,GAAG,CAAC,IACtC,CAAC,SAAS,CAAC,QAAQ,IAAI,UAAU,GAAG,CACtC,GACA,QAAQ,IACP,QAAQ,OAAO,MAAM,GAAG,QACvB,QAAQ,IAAI,UAAU,GAAG,CAC1B,GACA,OACA,KACD,CACD,CACF;KACA,KAAK,MAAM,GAAG,YAAY,KACzB,OAAOA,MAAc,QAAQ,OAAO,KAAK,IAAI;KAC9C,OAAO,cAAc,OAAO,QAAQ;KACpC,OAAO;IACR,CAAC,CACF;GACD,CAAC,CACF;EACD,CAAC,CACF;EACD,QAAQ,WACP,OAAO,IAAI,aAAa;GACvB,OAAO;GACP,MAAM,QAAQ,OAAO,SAAS,MAAM;GACpC,OAAO,OAAO,gBAAgB,aAAa,MAAM,QAAQ,UACxD,OAAO,IAAI,aAAa;IACvB,MAAM,MAAM,OAAO,MAAM;IACzB,MAAM,UAAU,OAAO,OAAO,WAAW,KAAK,OAAO,GAAG,CAAC;IACzD,MAAM,UAAU,YAAY,OAAO;IACnC,IAAI,QAAQ,SAAS,WACpB,OAAO,QAAQ,KAAK,MAAM,QAAQ,OAAO,WAAW;IACrD,MAAM,WAAW,MAAM,MAAM,QAAQ,OAAO,WAAW;IACvD,OAAO,cAAc,OAAO,QAAQ;IACpC,OAAO,CACN,QAAQ,OAAO,aACf;KAAE,GAAG;KAAS;IAAS,CACxB;GACD,CAAC,CACF;EACD,CAAC;EACF,OAAO,QAAQ,YACd,OAAO,IAAI,aAAa;GACvB,OAAO;GACP,MAAM,QAAQ,OAAO,SAAS,MAAM;GAqCpC,OAAO,OAAO,OApCO,gBAAgB,aACpC,MAAM,QACL,UACA,OAAO,IAAI,aAAa;IACvB,MAAM,MAAM,OAAO,MAAM;IACzB,MAAM,UAAU,OAAO,OAAO,WAAW,KAAK,OAAO,GAAG,CAAC;IACzD,IAAI,QAAQ,SAAS,QAAQ;KAK5B,KAHC,QAAQ,SAAS,YACd,QAAQ,UACR,QAAQ,OAAO,KAAA,CACR,cAAc,QAAQ,WAChC,OAAO,OAAO,gBAAgB,KAAK,EAClC,QACC,wDACF,CAAC;KACF,OAAO,CACN,QAAQ,SAAS,YACd,SAAS,MAAM,QAAQ,KAAK,IAC5B,OAAO,QAAQ,QAAQ,OAAO,IAAI,GACrC,OACD;IACD;IACA,MAAM,OAAO,OAAO,SAAS,KAG3B;IACF,MAAM,OAAO,UAAU,SAAS,SAAS,IAAI;IAC7C,OAAO,QAAQ,SAAS,IAAI,CAAC;IAC7B,IAAI,KAAK,SAAS,WACjB,OAAO,YAAY,IAAI,MAAM,SAAS,QAAQ,OAAO,IAAI,GAAG,EAC3D,kBAAkB,MACnB,CAAC;IACF,OAAO,CAAC,SAAS,MAAM,IAAI,GAAG,IAAI;GACnC,CAAC,CACH,CAAC,CAAC,KAAK,OAAO,eAAe;EAE9B,CAAC;EACF,UAAU,WACT,OAAO,IAAI,aAAa;GACvB,MAAM,SAAS,OAAO,OAAO,MAAM;GACnC,IAAI,OAAO,UAAU,WAAW,OAAO,OAAO;GAC9C,MAAM,QAAQ,OAAO,SAAS,MAAM;GACpC,OAAO,OAAO,KAAK,OAAO,EAAE,MAAM,WAAW,CAAC,CAAC,CAAC,KAC/C,OAAO,QAAQ,SAAS,KAAK,CAC9B;EACD,CAAC;CACH,CAAC;AACF,CAAC;AACF,MAAa,QAAQ,UAAmB,CAAC,MACxC,OAAO,IAAI,aAAa;CACvB,MAAM,UAAU,OAAO,WAAW,OAAO;CACzC,MAAM,UAAU,WAAW,OAAO;CAClC,OAAO,QAAQ,SAAS,OAAO;CAC/B,OAAO,YAAY,SAAS,OAAO;CACnC,OAAO,OAAO,SAAS,SAAS,OAAO;AACxC,CAAC;AACF,MAAa,SAAS,UAAmB,CAAC,MACzC,MAAM,OAAO,YAAY,KAAK,OAAO,CAAC"}

package/dist/internal/runner/Watchdog.js

@@ -0,0 +1,47 @@
+import { make } from "../FailureGroup.js";
+import { ExecutionError } from "./model.js";
+import { Notice } from "./WatchdogProtocol.js";
+import { Cause, Deferred, Effect, Schema } from "effect";
+import { Worker } from "node:worker_threads";
+// src/internal/runner/Watchdog.ts
+const start = Effect.gen(function* () {
+	const ready = yield* Deferred.make();
+	const begin = yield* Deferred.make();
+	const stop = yield* Deferred.make();
+	const worker = yield* Effect.acquireRelease(Effect.try({
+		try: () => new Worker(new URL(import.meta.resolve("@graftland/plugin-remote/internal/watchdog"))),
+		catch: (cause) => ExecutionError.make({
+			detail: "Starting the child watchdog failed",
+			cause: Cause.die(cause)
+		})
+	}), (worker) => Effect.promise(() => worker.terminate()).pipe(Effect.asVoid));
+	const listeners = yield* make();
+	const run = yield* listeners.runtime();
+	const message = (value) => run(Schema.decodeUnknownEffect(Notice)(value).pipe(Effect.mapError((error) => ExecutionError.make({
+		detail: "Invalid watchdog notice",
+		cause: Cause.fail(error)
+	})), Effect.flatMap((notice) => Deferred.succeed(notice === "ready" ? ready : notice === "start" ? begin : stop, void 0)), Effect.asVoid));
+	const error = (error) => run(Effect.fail(ExecutionError.make({
+		detail: "Child watchdog failed",
+		cause: Cause.die(error)
+	})));
+	const exit = (code) => run(Effect.fail(ExecutionError.make({ detail: "Child watchdog exited: " + code })));
+	yield* Effect.acquireRelease(Effect.sync(() => {
+		worker.on("message", message);
+		worker.on("error", error);
+		worker.on("exit", exit);
+	}), () => Effect.sync(() => {
+		worker.off("message", message);
+		worker.off("error", error);
+		worker.off("exit", exit);
+	}));
+	const failure = listeners.await;
+	yield* Effect.raceFirst(Deferred.await(ready), failure);
+	return {
+		begin: Effect.raceFirst(Deferred.await(begin), failure),
+		stop: Effect.raceFirst(Deferred.await(stop), failure)
+	};
+});
+export { start };
+
+//# sourceMappingURL=Watchdog.js.map

package/dist/internal/runner/Watchdog.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"Watchdog.js","names":["FailureGroup.make"],"sources":["../../../src/internal/runner/Watchdog.ts"],"sourcesContent":["import { Cause, Deferred, Effect, Schema } from \"effect\"\nimport * as FailureGroup from \"../FailureGroup\"\nimport { Worker } from \"node:worker_threads\"\nimport { ExecutionError } from \"./model\"\nimport { Notice } from \"./WatchdogProtocol\"\n\nexport const start = Effect.gen(function* () {\n\tconst ready = yield* Deferred.make<void>()\n\tconst begin = yield* Deferred.make<void>()\n\tconst stop = yield* Deferred.make<void>()\n\tconst worker = yield* Effect.acquireRelease(\n\t\tEffect.try({\n\t\t\ttry: () =>\n\t\t\t\tnew Worker(\n\t\t\t\t\tnew URL(\n\t\t\t\t\t\timport.meta.resolve(\"@graftland/plugin-remote/internal/watchdog\"),\n\t\t\t\t\t),\n\t\t\t\t),\n\t\t\tcatch: (cause) =>\n\t\t\t\tExecutionError.make({\n\t\t\t\t\tdetail: \"Starting the child watchdog failed\",\n\t\t\t\t\tcause: Cause.die(cause),\n\t\t\t\t}),\n\t\t}),\n\t\t(worker) => Effect.promise(() => worker.terminate()).pipe(Effect.asVoid),\n\t)\n\tconst listeners = yield* FailureGroup.make<ExecutionError>()\n\tconst run = yield* listeners.runtime<never>()\n\tconst message = (value: unknown) =>\n\t\trun(\n\t\t\tSchema.decodeUnknownEffect(Notice)(value).pipe(\n\t\t\t\tEffect.mapError((error) =>\n\t\t\t\t\tExecutionError.make({\n\t\t\t\t\t\tdetail: \"Invalid watchdog notice\",\n\t\t\t\t\t\tcause: Cause.fail(error),\n\t\t\t\t\t}),\n\t\t\t\t),\n\t\t\t\tEffect.flatMap((notice) =>\n\t\t\t\t\tDeferred.succeed(\n\t\t\t\t\t\tnotice === \"ready\" ? ready : notice === \"start\" ? begin : stop,\n\t\t\t\t\t\tundefined,\n\t\t\t\t\t),\n\t\t\t\t),\n\t\t\t\tEffect.asVoid,\n\t\t\t),\n\t\t)\n\tconst error = (error: Error) =>\n\t\trun(\n\t\t\tEffect.fail(\n\t\t\t\tExecutionError.make({\n\t\t\t\t\tdetail: \"Child watchdog failed\",\n\t\t\t\t\tcause: Cause.die(error),\n\t\t\t\t}),\n\t\t\t),\n\t\t)\n\tconst exit = (code: number) =>\n\t\trun(\n\t\t\tEffect.fail(\n\t\t\t\tExecutionError.make({\n\t\t\t\t\tdetail: \"Child watchdog exited: \" + code,\n\t\t\t\t}),\n\t\t\t),\n\t\t)\n\tyield* Effect.acquireRelease(\n\t\tEffect.sync(() => {\n\t\t\tworker.on(\"message\", message)\n\t\t\tworker.on(\"error\", error)\n\t\t\tworker.on(\"exit\", exit)\n\t\t}),\n\t\t() =>\n\t\t\tEffect.sync(() => {\n\t\t\t\tworker.off(\"message\", message)\n\t\t\t\tworker.off(\"error\", error)\n\t\t\t\tworker.off(\"exit\", exit)\n\t\t\t}),\n\t)\n\tconst failure = listeners.await\n\tyield* Effect.raceFirst(Deferred.await(ready), failure)\n\treturn {\n\t\tbegin: Effect.raceFirst(Deferred.await(begin), failure),\n\t\tstop: Effect.raceFirst(Deferred.await(stop), failure),\n\t}\n})\n"],"mappings":";;;;;;AAMA,MAAa,QAAQ,OAAO,IAAI,aAAa;CAC5C,MAAM,QAAQ,OAAO,SAAS,KAAW;CACzC,MAAM,QAAQ,OAAO,SAAS,KAAW;CACzC,MAAM,OAAO,OAAO,SAAS,KAAW;CACxC,MAAM,SAAS,OAAO,OAAO,eAC5B,OAAO,IAAI;EACV,WACC,IAAI,OACH,IAAI,IACH,YAAY,QAAQ,4CAA4C,CACjE,CACD;EACD,QAAQ,UACP,eAAe,KAAK;GACnB,QAAQ;GACR,OAAO,MAAM,IAAI,KAAK;EACvB,CAAC;CACH,CAAC,IACA,WAAW,OAAO,cAAc,OAAO,UAAU,CAAC,CAAC,CAAC,KAAK,OAAO,MAAM,CACxE;CACA,MAAM,YAAY,OAAOA,KAAkC;CAC3D,MAAM,MAAM,OAAO,UAAU,QAAe;CAC5C,MAAM,WAAW,UAChB,IACC,OAAO,oBAAoB,MAAM,CAAC,CAAC,KAAK,CAAC,CAAC,KACzC,OAAO,UAAU,UAChB,eAAe,KAAK;EACnB,QAAQ;EACR,OAAO,MAAM,KAAK,KAAK;CACxB,CAAC,CACF,GACA,OAAO,SAAS,WACf,SAAS,QACR,WAAW,UAAU,QAAQ,WAAW,UAAU,QAAQ,MAC1D,KAAA,CACD,CACD,GACA,OAAO,MACR,CACD;CACD,MAAM,SAAS,UACd,IACC,OAAO,KACN,eAAe,KAAK;EACnB,QAAQ;EACR,OAAO,MAAM,IAAI,KAAK;CACvB,CAAC,CACF,CACD;CACD,MAAM,QAAQ,SACb,IACC,OAAO,KACN,eAAe,KAAK,EACnB,QAAQ,4BAA4B,KACrC,CAAC,CACF,CACD;CACD,OAAO,OAAO,eACb,OAAO,WAAW;EACjB,OAAO,GAAG,WAAW,OAAO;EAC5B,OAAO,GAAG,SAAS,KAAK;EACxB,OAAO,GAAG,QAAQ,IAAI;CACvB,CAAC,SAEA,OAAO,WAAW;EACjB,OAAO,IAAI,WAAW,OAAO;EAC7B,OAAO,IAAI,SAAS,KAAK;EACzB,OAAO,IAAI,QAAQ,IAAI;CACxB,CAAC,CACH;CACA,MAAM,UAAU,UAAU;CAC1B,OAAO,OAAO,UAAU,SAAS,MAAM,KAAK,GAAG,OAAO;CACtD,OAAO;EACN,OAAO,OAAO,UAAU,SAAS,MAAM,KAAK,GAAG,OAAO;EACtD,MAAM,OAAO,UAAU,SAAS,MAAM,IAAI,GAAG,OAAO;CACrD;AACD,CAAC"}