@usine/server 0.2.1 → 0.4.0

package/dist/instance/id.js

@@ -0,0 +1,35 @@
+import { InstanceId } from "@usine/core/instance";
+import { Effect, FileSystem, Schema } from "effect";
+/** `.usine/instance-id` couldn't be read or created, or doesn't contain an instance ID. */
+export class InstanceIdError extends Schema.TaggedError("@usine/server/InstanceIdError")("InstanceIdError", {
+    operation: Schema.Literals(["read", "create"]),
+    path: Schema.String,
+    reason: Schema.String,
+}) {
+}
+const InstanceIdFromText = Schema.Trim.pipe(Schema.decodeTo(InstanceId));
+/**
+ * Returns the ID in `.usine/instance-id`, or writes a new one there if the file doesn't exist.
+ * Call it while holding the instance lock, so that no other process writes the file.
+ */
+export const instanceIdOf = Effect.fn("Instance.id")(function* (files) {
+    const fileSystem = yield* FileSystem.FileSystem;
+    const failure = (operation) => (error) => new InstanceIdError({ operation, path: files.id, reason: error.message });
+    if (yield* fileSystem.exists(files.id).pipe(Effect.mapError(failure("read")))) {
+        const text = yield* fileSystem.readFileString(files.id).pipe(Effect.mapError(failure("read")));
+        const instanceId = yield* Schema.decodeUnknownEffect(InstanceIdFromText)(text).pipe(Effect.mapError(failure("read")));
+        yield* Effect.annotateCurrentSpan({ instanceId });
+        yield* Effect.logDebug("Read the instance ID", { instanceId, path: files.id });
+        return instanceId;
+    }
+    const instanceId = InstanceId.make(crypto.randomUUID());
+    yield* Effect.annotateCurrentSpan({ instanceId });
+    // A rename never leaves a partial file for the next start to refuse.
+    const staging = `${files.id}.${instanceId}`;
+    yield* fileSystem
+        .writeFileString(staging, `${instanceId}\n`)
+        .pipe(Effect.andThen(fileSystem.rename(staging, files.id)), Effect.mapError(failure("create")));
+    yield* Effect.logInfo("Created the instance ID", { instanceId, path: files.id });
+    return instanceId;
+});
+//# sourceMappingURL=id.js.map

package/dist/instance/id.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"id.js","sourceRoot":"","sources":["../../src/instance/id.ts"],"names":[],"mappings":"AAAA,OAAO,EAAE,UAAU,EAAE,MAAM,sBAAsB,CAAC;AAClD,OAAO,EAAE,MAAM,EAAE,UAAU,EAAE,MAAM,EAAE,MAAM,QAAQ,CAAC;AAGpD,2FAA2F;AAC3F,MAAM,OAAO,eAAgB,SAAQ,MAAM,CAAC,WAAW,CACrD,+BAA+B,CAChC,CAAC,iBAAiB,EAAE;IACnB,SAAS,EAAE,MAAM,CAAC,QAAQ,CAAC,CAAC,MAAM,EAAE,QAAQ,CAAC,CAAC;IAC9C,IAAI,EAAE,MAAM,CAAC,MAAM;IACnB,MAAM,EAAE,MAAM,CAAC,MAAM;CACtB,CAAC;CAAG;AAEL,MAAM,kBAAkB,GAAG,MAAM,CAAC,IAAI,CAAC,IAAI,CAAC,MAAM,CAAC,QAAQ,CAAC,UAAU,CAAC,CAAC,CAAC;AAEzE;;;GAGG;AACH,MAAM,CAAC,MAAM,YAAY,GAAG,MAAM,CAAC,EAAE,CAAC,aAAa,CAAC,CAAC,QAAQ,CAAC,EAAE,KAAoB;IAClF,MAAM,UAAU,GAAG,KAAK,CAAC,CAAC,UAAU,CAAC,UAAU,CAAC;IAChD,MAAM,OAAO,GACX,CAAC,SAAuC,EAAE,EAAE,CAAC,CAAC,KAAmC,EAAE,EAAE,CACnF,IAAI,eAAe,CAAC,EAAE,SAAS,EAAE,IAAI,EAAE,KAAK,CAAC,EAAE,EAAE,MAAM,EAAE,KAAK,CAAC,OAAO,EAAE,CAAC,CAAC;IAC9E,IAAI,KAAK,CAAC,CAAC,UAAU,CAAC,MAAM,CAAC,KAAK,CAAC,EAAE,CAAC,CAAC,IAAI,CAAC,MAAM,CAAC,QAAQ,CAAC,OAAO,CAAC,MAAM,CAAC,CAAC,CAAC,EAAE,CAAC;QAC9E,MAAM,IAAI,GAAG,KAAK,CAAC,CAAC,UAAU,CAAC,cAAc,CAAC,KAAK,CAAC,EAAE,CAAC,CAAC,IAAI,CAAC,MAAM,CAAC,QAAQ,CAAC,OAAO,CAAC,MAAM,CAAC,CAAC,CAAC,CAAC;QAC/F,MAAM,UAAU,GAAG,KAAK,CAAC,CAAC,MAAM,CAAC,mBAAmB,CAAC,kBAAkB,CAAC,CAAC,IAAI,CAAC,CAAC,IAAI,CACjF,MAAM,CAAC,QAAQ,CAAC,OAAO,CAAC,MAAM,CAAC,CAAC,CACjC,CAAC;QACF,KAAK,CAAC,CAAC,MAAM,CAAC,mBAAmB,CAAC,EAAE,UAAU,EAAE,CAAC,CAAC;QAClD,KAAK,CAAC,CAAC,MAAM,CAAC,QAAQ,CAAC,sBAAsB,EAAE,EAAE,UAAU,EAAE,IAAI,EAAE,KAAK,CAAC,EAAE,EAAE,CAAC,CAAC;QAC/E,OAAO,UAAU,CAAC;IACpB,CAAC;IACD,MAAM,UAAU,GAAG,UAAU,CAAC,IAAI,CAAC,MAAM,CAAC,UAAU,EAAE,CAAC,CAAC;IACxD,KAAK,CAAC,CAAC,MAAM,CAAC,mBAAmB,CAAC,EAAE,UAAU,EAAE,CAAC,CAAC;IAClD,qEAAqE;IACrE,MAAM,OAAO,GAAG,GAAG,KAAK,CAAC,EAAE,IAAI,UAAU,EAAE,CAAC;IAC5C,KAAK,CAAC,CAAC,UAAU;SACd,eAAe,CAAC,OAAO,EAAE,GAAG,UAAU,IAAI,CAAC;SAC3C,IAAI,CAAC,MAAM,CAAC,OAAO,CAAC,UAAU,CAAC,MAAM,CAAC,OAAO,EAAE,KAAK,CAAC,EAAE,CAAC,CAAC,EAAE,MAAM,CAAC,QAAQ,CAAC,OAAO,CAAC,QAAQ,CAAC,CAAC,CAAC,CAAC;IAClG,KAAK,CAAC,CAAC,MAAM,CAAC,OAAO,CAAC,yBAAyB,EAAE,EAAE,UAAU,EAAE,IAAI,EAAE,KAAK,CAAC,EAAE,EAAE,CAAC,CAAC;IACjF,OAAO,UAAU,CAAC;AACpB,CAAC,CAAC,CAAC"}

package/dist/instance/lock.d.ts

@@ -0,0 +1,27 @@
+import { Effect, FileSystem, Schema } from "effect";
+import { type InstanceFiles, type InstanceRecord } from "./record.ts";
+declare const InstanceInUseError_base: Schema.Class<InstanceInUseError, Schema.TaggedStruct<"InstanceInUseError", {
+    readonly directory: Schema.String;
+    /** The PID of the lock holder, if it could be read. */
+    readonly holder: Schema.Option<Schema.brand<Schema.Int, "ProcessId">>;
+}>, import("effect/Cause").YieldableError>;
+/** Another `usine up` has the instance lock, possibly while still draining its Attempts. */
+export declare class InstanceInUseError extends InstanceInUseError_base {
+}
+declare const InstanceLockError_base: Schema.Class<InstanceLockError, Schema.TaggedStruct<"InstanceLockError", {
+    readonly directory: Schema.String;
+    readonly reason: Schema.String;
+}>, import("effect/Cause").YieldableError>;
+/** The instance lock could not be created or acquired for a reason other than another holder. */
+export declare class InstanceLockError extends InstanceLockError_base {
+}
+/** Returns whether a process holds the instance lock, without creating the lock file. */
+export declare const lockHeld: (files: InstanceFiles) => Effect.Effect<boolean, InstanceLockError, FileSystem.FileSystem>;
+/**
+ * Acquires the instance lock for the scope, so only one `usine up` opens the stores. The lock is an
+ * exclusive SQLite transaction on `.usine/instance.lock`, released by the OS on exit. Writes
+ * `.usine/instance.pid` and `.usine/instance.json`, and removes both when the scope closes.
+ */
+export declare const holdInstance: (directory: string & import("effect/Brand").Brand<"InstanceDirectory">, record: InstanceRecord) => Effect.Effect<void, InstanceInUseError | InstanceLockError, FileSystem.FileSystem | import("effect/Scope").Scope>;
+export {};
+//# sourceMappingURL=lock.d.ts.map

package/dist/instance/lock.d.ts.map

@@ -0,0 +1 @@
+{"version":3,"file":"lock.d.ts","sourceRoot":"","sources":["../../src/instance/lock.ts"],"names":[],"mappings":"AAEA,OAAO,EAAE,MAAM,EAAE,UAAU,EAAU,MAAM,EAAE,MAAM,QAAQ,CAAC;AAC5D,OAAO,EACL,KAAK,aAAa,EAClB,KAAK,cAAc,EAMpB,MAAM,aAAa,CAAC;;;IAOnB,uDAAuD;;;AALzD,4FAA4F;AAC5F,qBAAa,kBAAmB,SAAQ,uBAMtC;CAAG;;;;;AAEL,iGAAiG;AACjG,qBAAa,iBAAkB,SAAQ,sBAEoC;CAAG;AAmB9E,yFAAyF;AACzF,eAAO,MAAM,QAAQ,4FAqBnB,CAAC;AAiDH;;;;GAIG;AACH,eAAO,MAAM,YAAY,sNA2CvB,CAAC"}

package/dist/instance/lock.js

@@ -0,0 +1,127 @@
+import { DatabaseSync } from "node:sqlite";
+import { Effect, FileSystem, Option, Schema } from "effect";
+import { ProcessId, instanceFiles, markStoppingSync, readPid, writeRecord, } from "./record.js";
+/** Another `usine up` has the instance lock, possibly while still draining its Attempts. */
+export class InstanceInUseError extends Schema.TaggedError("@usine/server/InstanceInUseError")("InstanceInUseError", {
+    directory: Schema.String,
+    /** The PID of the lock holder, if it could be read. */
+    holder: Schema.Option(ProcessId),
+}) {
+}
+/** The instance lock could not be created or acquired for a reason other than another holder. */
+export class InstanceLockError extends Schema.TaggedError("@usine/server/InstanceLockError")("InstanceLockError", { directory: Schema.String, reason: Schema.String }) {
+}
+/** The node:sqlite error when another connection has the lock (`SQLITE_BUSY`). */
+const SqliteBusy = Schema.Struct({ errcode: Schema.Literal(5) });
+const reasonOf = (cause) => cause instanceof Error ? cause.message : String(cause);
+const takeLock = (file) => {
+    const database = new DatabaseSync(file, { timeout: 0 });
+    try {
+        database.exec("BEGIN EXCLUSIVE");
+    }
+    catch (cause) {
+        database.close();
+        throw cause;
+    }
+    return database;
+};
+/** Returns whether a process holds the instance lock, without creating the lock file. */
+export const lockHeld = Effect.fn("Instance.lockHeld")(function* (files) {
+    const fileSystem = yield* FileSystem.FileSystem;
+    const lockError = (cause) => new InstanceLockError({ directory: files.folder, reason: reasonOf(cause) });
+    if (!(yield* fileSystem.exists(files.lock).pipe(Effect.mapError(lockError))))
+        return false;
+    return yield* Effect.try({
+        try: () => {
+            // The holder's exclusive transaction blocks readers, so a read fails with SQLITE_BUSY.
+            const database = new DatabaseSync(files.lock, { readOnly: true, timeout: 0 });
+            try {
+                database.prepare("SELECT count(*) FROM sqlite_master").get();
+                return false;
+            }
+            catch (cause) {
+                if (Schema.is(SqliteBusy)(cause))
+                    return true;
+                throw cause;
+            }
+            finally {
+                database.close();
+            }
+        },
+        catch: lockError,
+    });
+});
+const removeFile = (fileSystem, path) => fileSystem.remove(path, { force: true }).pipe(Effect.tapError((error) => Effect.logWarning("Could not remove an instance file on exit", {
+    path,
+    message: error.message,
+})), Effect.ignore);
+/**
+ * Records the `stoppingSince` of the process on its first `SIGINT` or `SIGTERM`, so that `usine stop`
+ * doesn't send a second signal that would end the drain.
+ */
+const markStoppingOnSignal = (files, record) => Effect.gen(function* () {
+    const context = yield* Effect.context();
+    yield* Effect.acquireRelease(Effect.sync(() => {
+        let marked = false;
+        const onSignal = () => {
+            if (marked)
+                return;
+            marked = true;
+            try {
+                markStoppingSync(files, record);
+            }
+            catch (cause) {
+                Effect.runForkWith(context)(Effect.logWarning("Could not record that the instance is stopping", {
+                    path: files.record,
+                    cause,
+                }));
+            }
+        };
+        process.prependListener("SIGINT", onSignal);
+        process.prependListener("SIGTERM", onSignal);
+        return onSignal;
+    }), (onSignal) => Effect.sync(() => {
+        process.removeListener("SIGINT", onSignal);
+        process.removeListener("SIGTERM", onSignal);
+    }));
+});
+/**
+ * Acquires the instance lock for the scope, so only one `usine up` opens the stores. The lock is an
+ * exclusive SQLite transaction on `.usine/instance.lock`, released by the OS on exit. Writes
+ * `.usine/instance.pid` and `.usine/instance.json`, and removes both when the scope closes.
+ */
+export const holdInstance = Effect.fn("Server.holdInstance")(function* (directory, record) {
+    const fileSystem = yield* FileSystem.FileSystem;
+    const files = instanceFiles(directory);
+    const lockError = (cause) => new InstanceLockError({ directory, reason: reasonOf(cause) });
+    const refuse = Effect.fn("Server.refuseInstance")(function* (cause) {
+        if (!Schema.is(SqliteBusy)(cause))
+            return yield* lockError(cause);
+        const holder = yield* readPid(files);
+        yield* Effect.logWarning("Another usine process holds the instance folder", {
+            instanceDirectory: directory,
+            holder: Option.getOrUndefined(holder),
+        });
+        return yield* new InstanceInUseError({ directory, holder });
+    });
+    yield* fileSystem
+        .makeDirectory(files.folder, { recursive: true })
+        .pipe(Effect.mapError(lockError));
+    yield* Effect.acquireRelease(Effect.try({
+        try: () => takeLock(files.lock),
+        catch: (cause) => cause,
+    }), (database) => Effect.sync(() => database.close())).pipe(Effect.catch(refuse));
+    yield* Effect.acquireRelease(Effect.all([
+        fileSystem.writeFileString(files.pid, `${record.pid}\n`),
+        writeRecord(files, record),
+    ]).pipe(Effect.mapError(lockError)), () => Effect.all([removeFile(fileSystem, files.record), removeFile(fileSystem, files.pid)], {
+        discard: true,
+    }));
+    yield* markStoppingOnSignal(files, record);
+    yield* Effect.logInfo("Holding the instance folder", {
+        instanceDirectory: directory,
+        pid: record.pid,
+        version: record.version,
+    });
+});
+//# sourceMappingURL=lock.js.map

package/dist/instance/lock.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"lock.js","sourceRoot":"","sources":["../../src/instance/lock.ts"],"names":[],"mappings":"AAAA,OAAO,EAAE,YAAY,EAAE,MAAM,aAAa,CAAC;AAE3C,OAAO,EAAE,MAAM,EAAE,UAAU,EAAE,MAAM,EAAE,MAAM,EAAE,MAAM,QAAQ,CAAC;AAC5D,OAAO,EAGL,SAAS,EACT,aAAa,EACb,gBAAgB,EAChB,OAAO,EACP,WAAW,GACZ,MAAM,aAAa,CAAC;AAErB,4FAA4F;AAC5F,MAAM,OAAO,kBAAmB,SAAQ,MAAM,CAAC,WAAW,CACxD,kCAAkC,CACnC,CAAC,oBAAoB,EAAE;IACtB,SAAS,EAAE,MAAM,CAAC,MAAM;IACxB,uDAAuD;IACvD,MAAM,EAAE,MAAM,CAAC,MAAM,CAAC,SAAS,CAAC;CACjC,CAAC;CAAG;AAEL,iGAAiG;AACjG,MAAM,OAAO,iBAAkB,SAAQ,MAAM,CAAC,WAAW,CACvD,iCAAiC,CAClC,CAAC,mBAAmB,EAAE,EAAE,SAAS,EAAE,MAAM,CAAC,MAAM,EAAE,MAAM,EAAE,MAAM,CAAC,MAAM,EAAE,CAAC;CAAG;AAE9E,kFAAkF;AAClF,MAAM,UAAU,GAAG,MAAM,CAAC,MAAM,CAAC,EAAE,OAAO,EAAE,MAAM,CAAC,OAAO,CAAC,CAAC,CAAC,EAAE,CAAC,CAAC;AAEjE,MAAM,QAAQ,GAAG,CAAC,KAAc,EAAU,EAAE,CAC1C,KAAK,YAAY,KAAK,CAAC,CAAC,CAAC,KAAK,CAAC,OAAO,CAAC,CAAC,CAAC,MAAM,CAAC,KAAK,CAAC,CAAC;AAEzD,MAAM,QAAQ,GAAG,CAAC,IAAY,EAAE,EAAE;IAChC,MAAM,QAAQ,GAAG,IAAI,YAAY,CAAC,IAAI,EAAE,EAAE,OAAO,EAAE,CAAC,EAAE,CAAC,CAAC;IACxD,IAAI,CAAC;QACH,QAAQ,CAAC,IAAI,CAAC,iBAAiB,CAAC,CAAC;IACnC,CAAC;IAAC,OAAO,KAAK,EAAE,CAAC;QACf,QAAQ,CAAC,KAAK,EAAE,CAAC;QACjB,MAAM,KAAK,CAAC;IACd,CAAC;IACD,OAAO,QAAQ,CAAC;AAClB,CAAC,CAAC;AAEF,yFAAyF;AACzF,MAAM,CAAC,MAAM,QAAQ,GAAG,MAAM,CAAC,EAAE,CAAC,mBAAmB,CAAC,CAAC,QAAQ,CAAC,EAAE,KAAoB;IACpF,MAAM,UAAU,GAAG,KAAK,CAAC,CAAC,UAAU,CAAC,UAAU,CAAC;IAChD,MAAM,SAAS,GAAG,CAAC,KAAc,EAAE,EAAE,CACnC,IAAI,iBAAiB,CAAC,EAAE,SAAS,EAAE,KAAK,CAAC,MAAM,EAAE,MAAM,EAAE,QAAQ,CAAC,KAAK,CAAC,EAAE,CAAC,CAAC;IAC9E,IAAI,CAAC,CAAC,KAAK,CAAC,CAAC,UAAU,CAAC,MAAM,CAAC,KAAK,CAAC,IAAI,CAAC,CAAC,IAAI,CAAC,MAAM,CAAC,QAAQ,CAAC,SAAS,CAAC,CAAC,CAAC;QAAE,OAAO,KAAK,CAAC;IAC3F,OAAO,KAAK,CAAC,CAAC,MAAM,CAAC,GAAG,CAAC;QACvB,GAAG,EAAE,GAAG,EAAE;YACR,uFAAuF;YACvF,MAAM,QAAQ,GAAG,IAAI,YAAY,CAAC,KAAK,CAAC,IAAI,EAAE,EAAE,QAAQ,EAAE,IAAI,EAAE,OAAO,EAAE,CAAC,EAAE,CAAC,CAAC;YAC9E,IAAI,CAAC;gBACH,QAAQ,CAAC,OAAO,CAAC,oCAAoC,CAAC,CAAC,GAAG,EAAE,CAAC;gBAC7D,OAAO,KAAK,CAAC;YACf,CAAC;YAAC,OAAO,KAAK,EAAE,CAAC;gBACf,IAAI,MAAM,CAAC,EAAE,CAAC,UAAU,CAAC,CAAC,KAAK,CAAC;oBAAE,OAAO,IAAI,CAAC;gBAC9C,MAAM,KAAK,CAAC;YACd,CAAC;oBAAS,CAAC;gBACT,QAAQ,CAAC,KAAK,EAAE,CAAC;YACnB,CAAC;QACH,CAAC;QACD,KAAK,EAAE,SAAS;KACjB,CAAC,CAAC;AACL,CAAC,CAAC,CAAC;AAEH,MAAM,UAAU,GAAG,CAAC,UAAiC,EAAE,IAAY,EAAE,EAAE,CACrE,UAAU,CAAC,MAAM,CAAC,IAAI,EAAE,EAAE,KAAK,EAAE,IAAI,EAAE,CAAC,CAAC,IAAI,CAC3C,MAAM,CAAC,QAAQ,CAAC,CAAC,KAAK,EAAE,EAAE,CACxB,MAAM,CAAC,UAAU,CAAC,2CAA2C,EAAE;IAC7D,IAAI;IACJ,OAAO,EAAE,KAAK,CAAC,OAAO;CACvB,CAAC,CACH,EACD,MAAM,CAAC,MAAM,CACd,CAAC;AAEJ;;;GAGG;AACH,MAAM,oBAAoB,GAAG,CAAC,KAAoB,EAAE,MAAsB,EAAE,EAAE,CAC5E,MAAM,CAAC,GAAG,CAAC,QAAQ,CAAC;IAClB,MAAM,OAAO,GAAG,KAAK,CAAC,CAAC,MAAM,CAAC,OAAO,EAAE,CAAC;IACxC,KAAK,CAAC,CAAC,MAAM,CAAC,cAAc,CAC1B,MAAM,CAAC,IAAI,CAAC,GAAG,EAAE;QACf,IAAI,MAAM,GAAG,KAAK,CAAC;QACnB,MAAM,QAAQ,GAAG,GAAG,EAAE;YACpB,IAAI,MAAM;gBAAE,OAAO;YACnB,MAAM,GAAG,IAAI,CAAC;YACd,IAAI,CAAC;gBACH,gBAAgB,CAAC,KAAK,EAAE,MAAM,CAAC,CAAC;YAClC,CAAC;YAAC,OAAO,KAAK,EAAE,CAAC;gBACf,MAAM,CAAC,WAAW,CAAC,OAAO,CAAC,CACzB,MAAM,CAAC,UAAU,CAAC,gDAAgD,EAAE;oBAClE,IAAI,EAAE,KAAK,CAAC,MAAM;oBAClB,KAAK;iBACN,CAAC,CACH,CAAC;YACJ,CAAC;QACH,CAAC,CAAC;QACF,OAAO,CAAC,eAAe,CAAC,QAAQ,EAAE,QAAQ,CAAC,CAAC;QAC5C,OAAO,CAAC,eAAe,CAAC,SAAS,EAAE,QAAQ,CAAC,CAAC;QAC7C,OAAO,QAAQ,CAAC;IAClB,CAAC,CAAC,EACF,CAAC,QAAQ,EAAE,EAAE,CACX,MAAM,CAAC,IAAI,CAAC,GAAG,EAAE;QACf,OAAO,CAAC,cAAc,CAAC,QAAQ,EAAE,QAAQ,CAAC,CAAC;QAC3C,OAAO,CAAC,cAAc,CAAC,SAAS,EAAE,QAAQ,CAAC,CAAC;IAC9C,CAAC,CAAC,CACL,CAAC;AACJ,CAAC,CAAC,CAAC;AAEL;;;;GAIG;AACH,MAAM,CAAC,MAAM,YAAY,GAAG,MAAM,CAAC,EAAE,CAAC,qBAAqB,CAAC,CAAC,QAAQ,CAAC,EACpE,SAA4B,EAC5B,MAAsB;IAEtB,MAAM,UAAU,GAAG,KAAK,CAAC,CAAC,UAAU,CAAC,UAAU,CAAC;IAChD,MAAM,KAAK,GAAG,aAAa,CAAC,SAAS,CAAC,CAAC;IACvC,MAAM,SAAS,GAAG,CAAC,KAAc,EAAE,EAAE,CACnC,IAAI,iBAAiB,CAAC,EAAE,SAAS,EAAE,MAAM,EAAE,QAAQ,CAAC,KAAK,CAAC,EAAE,CAAC,CAAC;IAChE,MAAM,MAAM,GAAG,MAAM,CAAC,EAAE,CAAC,uBAAuB,CAAC,CAAC,QAAQ,CAAC,EAAE,KAAc;QACzE,IAAI,CAAC,MAAM,CAAC,EAAE,CAAC,UAAU,CAAC,CAAC,KAAK,CAAC;YAAE,OAAO,KAAK,CAAC,CAAC,SAAS,CAAC,KAAK,CAAC,CAAC;QAClE,MAAM,MAAM,GAAG,KAAK,CAAC,CAAC,OAAO,CAAC,KAAK,CAAC,CAAC;QACrC,KAAK,CAAC,CAAC,MAAM,CAAC,UAAU,CAAC,iDAAiD,EAAE;YAC1E,iBAAiB,EAAE,SAAS;YAC5B,MAAM,EAAE,MAAM,CAAC,cAAc,CAAC,MAAM,CAAC;SACtC,CAAC,CAAC;QACH,OAAO,KAAK,CAAC,CAAC,IAAI,kBAAkB,CAAC,EAAE,SAAS,EAAE,MAAM,EAAE,CAAC,CAAC;IAC9D,CAAC,CAAC,CAAC;IACH,KAAK,CAAC,CAAC,UAAU;SACd,aAAa,CAAC,KAAK,CAAC,MAAM,EAAE,EAAE,SAAS,EAAE,IAAI,EAAE,CAAC;SAChD,IAAI,CAAC,MAAM,CAAC,QAAQ,CAAC,SAAS,CAAC,CAAC,CAAC;IACpC,KAAK,CAAC,CAAC,MAAM,CAAC,cAAc,CAC1B,MAAM,CAAC,GAAG,CAAC;QACT,GAAG,EAAE,GAAG,EAAE,CAAC,QAAQ,CAAC,KAAK,CAAC,IAAI,CAAC;QAC/B,KAAK,EAAE,CAAC,KAAK,EAAE,EAAE,CAAC,KAAK;KACxB,CAAC,EACF,CAAC,QAAQ,EAAE,EAAE,CAAC,MAAM,CAAC,IAAI,CAAC,GAAG,EAAE,CAAC,QAAQ,CAAC,KAAK,EAAE,CAAC,CAClD,CAAC,IAAI,CAAC,MAAM,CAAC,KAAK,CAAC,MAAM,CAAC,CAAC,CAAC;IAC7B,KAAK,CAAC,CAAC,MAAM,CAAC,cAAc,CAC1B,MAAM,CAAC,GAAG,CAAC;QACT,UAAU,CAAC,eAAe,CAAC,KAAK,CAAC,GAAG,EAAE,GAAG,MAAM,CAAC,GAAG,IAAI,CAAC;QACxD,WAAW,CAAC,KAAK,EAAE,MAAM,CAAC;KAC3B,CAAC,CAAC,IAAI,CAAC,MAAM,CAAC,QAAQ,CAAC,SAAS,CAAC,CAAC,EACnC,GAAG,EAAE,CACH,MAAM,CAAC,GAAG,CAAC,CAAC,UAAU,CAAC,UAAU,EAAE,KAAK,CAAC,MAAM,CAAC,EAAE,UAAU,CAAC,UAAU,EAAE,KAAK,CAAC,GAAG,CAAC,CAAC,EAAE;QACpF,OAAO,EAAE,IAAI;KACd,CAAC,CACL,CAAC;IACF,KAAK,CAAC,CAAC,oBAAoB,CAAC,KAAK,EAAE,MAAM,CAAC,CAAC;IAC3C,KAAK,CAAC,CAAC,MAAM,CAAC,OAAO,CAAC,6BAA6B,EAAE;QACnD,iBAAiB,EAAE,SAAS;QAC5B,GAAG,EAAE,MAAM,CAAC,GAAG;QACf,OAAO,EAAE,MAAM,CAAC,OAAO;KACxB,CAAC,CAAC;AACL,CAAC,CAAC,CAAC"}

package/dist/instance/manifest.d.ts

@@ -0,0 +1,52 @@
+import { Effect, FileSystem, Option, Schema } from "effect";
+/** The package manager that installs the instance's dependencies. */
+export declare const PackageManager: Schema.Literals<readonly ["pnpm", "npm", "yarn", "bun"]>;
+export type PackageManager = typeof PackageManager.Type;
+declare const EnginePin_base: Schema.Class<EnginePin, Schema.Struct<{
+    readonly name: Schema.NonEmptyString;
+    readonly spec: Schema.NonEmptyString;
+}>, {}>;
+/** A `@usine/*` dependency of the instance with a registry spec. */
+export declare class EnginePin extends EnginePin_base {
+}
+declare const InstanceManifest_base: Schema.Class<InstanceManifest, Schema.Struct<{
+    readonly path: Schema.String;
+    readonly text: Schema.String;
+    /** The `@usine/*` dependencies with a registry spec. */
+    readonly pins: Schema.$Array<typeof EnginePin>;
+    /** The spec of `@usine/server` if it points at a local folder instead of a registry version. */
+    readonly linkedServer: Schema.Option<Schema.String>;
+    readonly packageManager: Schema.Literals<readonly ["pnpm", "npm", "yarn", "bun"]>;
+    /** The lockfiles that exist next to `package.json`. */
+    readonly lockfiles: Schema.$Array<Schema.String>;
+}>, {}>;
+/** The instance folder's `package.json`, as `usine upgrade` reads it. */
+export declare class InstanceManifest extends InstanceManifest_base {
+}
+declare const InstanceManifestError_base: Schema.Class<InstanceManifestError, Schema.TaggedStruct<"InstanceManifestError", {
+    readonly path: Schema.String;
+    readonly reason: Schema.String;
+}>, import("effect/Cause").YieldableError>;
+/** The instance's `package.json` couldn't be read or parsed. */
+export declare class InstanceManifestError extends InstanceManifestError_base {
+}
+export declare const SERVER_PACKAGE = "@usine/server";
+/** Parses `package.json` text. Fails with the parse error as `reason`. */
+export declare const parseManifest: (path: string, text: string, lockfiles: ReadonlyArray<string>) => Effect.Effect<InstanceManifest, InstanceManifestError>;
+/** Reads the instance's `package.json`, or returns `None` if the folder has none. */
+export declare const readManifest: (directory: string) => Effect.Effect<Option.Option<InstanceManifest>, InstanceManifestError, FileSystem.FileSystem>;
+/** The pin of `@usine/server`, if the manifest pins it to a registry version. */
+export declare const serverPin: (manifest: InstanceManifest) => Option.Option<EnginePin>;
+/** Returns `text` with each pin's spec replaced by its version in `versions`, formatting intact. */
+export declare const bumpPins: (text: string, pins: ReadonlyArray<EnginePin>, versions: ReadonlyMap<string, string>) => string;
+/** Whether `script` is inside the instance's `node_modules`. Both paths must be real paths. */
+export declare const installedInInstance: (directory: string, script: string) => boolean;
+/** Resolves `path` through symbolic links, or returns it unchanged if it can't. */
+export declare const realPathOrSelf: (path: string) => Effect.Effect<string, never, FileSystem.FileSystem>;
+/**
+ * Compares two semantic versions: negative if `left` is older, positive if newer, zero if equal or
+ * if either doesn't parse.
+ */
+export declare const compareVersions: (left: string, right: string) => number;
+export {};
+//# sourceMappingURL=manifest.d.ts.map

package/dist/instance/manifest.d.ts.map

@@ -0,0 +1 @@
+{"version":3,"file":"manifest.d.ts","sourceRoot":"","sources":["../../src/instance/manifest.ts"],"names":[],"mappings":"AACA,OAAO,EAAE,MAAM,EAAE,UAAU,EAAE,MAAM,EAAE,MAAM,EAAE,MAAM,QAAQ,CAAC;AAE5D,qEAAqE;AACrE,eAAO,MAAM,cAAc,0DAAkD,CAAC;AAC9E,MAAM,MAAM,cAAc,GAAG,OAAO,cAAc,CAAC,IAAI,CAAC;;;;;AAwBxD,oEAAoE;AACpE,qBAAa,SAAU,SAAQ,cAG7B;CAAG;;;;IAQH,wDAAwD;;IAExD,gGAAgG;;;IAGhG,uDAAuD;;;AAXzD,yEAAyE;AACzE,qBAAa,gBAAiB,SAAQ,qBAYpC;CAAG;;;;;AAEL,gEAAgE;AAChE,qBAAa,qBAAsB,SAAQ,0BAE+B;CAAG;AAE7E,eAAO,MAAM,cAAc,kBAAkB,CAAC;AAS9C,0EAA0E;AAC1E,eAAO,MAAM,aAAa,SAClB,MAAM,QACN,MAAM,aACD,aAAa,CAAC,MAAM,CAAC,KAC/B,MAAM,CAAC,MAAM,CAAC,gBAAgB,EAAE,qBAAqB,CAwBrD,CAAC;AAEJ,qFAAqF;AACrF,eAAO,MAAM,YAAY,qHAgBvB,CAAC;AAEH,iFAAiF;AACjF,eAAO,MAAM,SAAS,aAAc,gBAAgB,KAAG,MAAM,CAAC,MAAM,CAAC,SAAS,CACK,CAAC;AAIpF,oGAAoG;AACpG,eAAO,MAAM,QAAQ,SACb,MAAM,QACN,aAAa,CAAC,SAAS,CAAC,YACpB,WAAW,CAAC,MAAM,EAAE,MAAM,CAAC,KACpC,MAMO,CAAC;AAEX,+FAA+F;AAC/F,eAAO,MAAM,mBAAmB,cAAe,MAAM,UAAU,MAAM,KAAG,OAGvE,CAAC;AAEF,mFAAmF;AACnF,eAAO,MAAM,cAAc,SAAU,MAAM,wDAGxC,CAAC;AAIJ;;;GAGG;AACH,eAAO,MAAM,eAAe,SAAU,MAAM,SAAS,MAAM,KAAG,MAa7D,CAAC"}

package/dist/instance/manifest.js

@@ -0,0 +1,131 @@
+import { isAbsolute, join, relative } from "node:path";
+import { Effect, FileSystem, Option, Schema } from "effect";
+/** The package manager that installs the instance's dependencies. */
+export const PackageManager = Schema.Literals(["pnpm", "npm", "yarn", "bun"]);
+const LOCKFILES = [
+    ["pnpm", "pnpm-lock.yaml"],
+    ["npm", "package-lock.json"],
+    ["yarn", "yarn.lock"],
+    ["bun", "bun.lock"],
+    ["bun", "bun.lockb"],
+];
+const Dependencies = Schema.Record(Schema.String, Schema.String);
+const PackageJson = Schema.fromJsonString(Schema.Struct({
+    packageManager: Schema.optionalKey(Schema.String),
+    dependencies: Schema.optionalKey(Dependencies),
+    devDependencies: Schema.optionalKey(Dependencies),
+    optionalDependencies: Schema.optionalKey(Dependencies),
+}));
+/** A dependency spec that doesn't resolve on a registry, such as `link:../usine/apps/server`. */
+const LOCAL_SPEC = /^(?:link:|file:|workspace:|portal:|git\+|git:|github:|https?:|\.|\/|~)/u;
+/** A `@usine/*` dependency of the instance with a registry spec. */
+export class EnginePin extends Schema.Class("@usine/server/EnginePin")({
+    name: Schema.NonEmptyString,
+    spec: Schema.NonEmptyString,
+}) {
+}
+/** The instance folder's `package.json`, as `usine upgrade` reads it. */
+export class InstanceManifest extends Schema.Class("@usine/server/InstanceManifest")({
+    path: Schema.String,
+    text: Schema.String,
+    /** The `@usine/*` dependencies with a registry spec. */
+    pins: Schema.Array(EnginePin),
+    /** The spec of `@usine/server` if it points at a local folder instead of a registry version. */
+    linkedServer: Schema.Option(Schema.String),
+    packageManager: PackageManager,
+    /** The lockfiles that exist next to `package.json`. */
+    lockfiles: Schema.Array(Schema.String),
+}) {
+}
+/** The instance's `package.json` couldn't be read or parsed. */
+export class InstanceManifestError extends Schema.TaggedError("@usine/server/InstanceManifestError")("InstanceManifestError", { path: Schema.String, reason: Schema.String }) {
+}
+export const SERVER_PACKAGE = "@usine/server";
+const packageManagerOf = (field, lockfiles) => {
+    const named = Schema.decodeUnknownOption(PackageManager)(field?.split("@")[0]);
+    if (Option.isSome(named))
+        return named.value;
+    const found = LOCKFILES.find(([, file]) => lockfiles.includes(file));
+    return found === undefined ? "npm" : found[0];
+};
+/** Parses `package.json` text. Fails with the parse error as `reason`. */
+export const parseManifest = (path, text, lockfiles) => Schema.decodeUnknownEffect(PackageJson)(text).pipe(Effect.mapError((error) => new InstanceManifestError({ path, reason: error.message })), Effect.map((manifest) => {
+    const dependencies = [
+        ...Object.entries(manifest.dependencies ?? {}),
+        ...Object.entries(manifest.devDependencies ?? {}),
+        ...Object.entries(manifest.optionalDependencies ?? {}),
+    ].filter(([name]) => name.startsWith("@usine/"));
+    const server = dependencies.find(([name]) => name === SERVER_PACKAGE);
+    return new InstanceManifest({
+        path,
+        text,
+        pins: dependencies
+            .filter(([, spec]) => spec !== "" && !LOCAL_SPEC.test(spec))
+            .map(([name, spec]) => new EnginePin({ name, spec })),
+        linkedServer: server !== undefined && LOCAL_SPEC.test(server[1])
+            ? Option.some(server[1])
+            : Option.none(),
+        packageManager: packageManagerOf(manifest.packageManager, lockfiles),
+        lockfiles,
+    });
+}));
+/** Reads the instance's `package.json`, or returns `None` if the folder has none. */
+export const readManifest = Effect.fn("Instance.readManifest")(function* (directory) {
+    const fileSystem = yield* FileSystem.FileSystem;
+    const path = join(directory, "package.json");
+    const failure = (error) => new InstanceManifestError({ path, reason: error.message });
+    if (!(yield* fileSystem.exists(path).pipe(Effect.mapError(failure)))) {
+        return Option.none();
+    }
+    const text = yield* fileSystem.readFileString(path).pipe(Effect.mapError(failure));
+    const lockfiles = [];
+    for (const [, file] of LOCKFILES) {
+        if (yield* fileSystem.exists(join(directory, file)).pipe(Effect.orElseSucceed(() => false))) {
+            lockfiles.push(file);
+        }
+    }
+    return Option.some(yield* parseManifest(path, text, lockfiles));
+});
+/** The pin of `@usine/server`, if the manifest pins it to a registry version. */
+export const serverPin = (manifest) => Option.fromUndefinedOr(manifest.pins.find(({ name }) => name === SERVER_PACKAGE));
+const escapeRegExp = (text) => text.replace(/[.*+?^${}()|[\]\\]/gu, "\\$&");
+/** Returns `text` with each pin's spec replaced by its version in `versions`, formatting intact. */
+export const bumpPins = (text, pins, versions) => pins.reduce((current, { name, spec }) => {
+    const version = versions.get(name);
+    if (version === undefined)
+        return current;
+    const entry = new RegExp(`("${escapeRegExp(name)}"\\s*:\\s*)"${escapeRegExp(spec)}"`, "gu");
+    return current.replace(entry, `$1"${version}"`);
+}, text);
+/** Whether `script` is inside the instance's `node_modules`. Both paths must be real paths. */
+export const installedInInstance = (directory, script) => {
+    const path = relative(join(directory, "node_modules"), script);
+    return path !== "" && !path.startsWith("..") && !isAbsolute(path);
+};
+/** Resolves `path` through symbolic links, or returns it unchanged if it can't. */
+export const realPathOrSelf = (path) => Effect.flatMap(FileSystem.FileSystem, (fileSystem) => fileSystem.realPath(path)).pipe(Effect.orElseSucceed(() => path));
+const VERSION = /^(\d+)\.(\d+)\.(\d+)(?:-([0-9A-Za-z.-]+))?(?:\+.*)?$/u;
+/**
+ * Compares two semantic versions: negative if `left` is older, positive if newer, zero if equal or
+ * if either doesn't parse.
+ */
+export const compareVersions = (left, right) => {
+    const a = VERSION.exec(left);
+    const b = VERSION.exec(right);
+    if (a === null || b === null)
+        return 0;
+    for (const index of [1, 2, 3]) {
+        const difference = Number(a[index]) - Number(b[index]);
+        if (difference !== 0)
+            return difference;
+    }
+    const [preA, preB] = [a[4], b[4]];
+    if (preA === preB)
+        return 0;
+    if (preA === undefined)
+        return 1;
+    if (preB === undefined)
+        return -1;
+    return preA.localeCompare(preB, "en", { numeric: true });
+};
+//# sourceMappingURL=manifest.js.map

package/dist/instance/manifest.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"manifest.js","sourceRoot":"","sources":["../../src/instance/manifest.ts"],"names":[],"mappings":"AAAA,OAAO,EAAE,UAAU,EAAE,IAAI,EAAE,QAAQ,EAAE,MAAM,WAAW,CAAC;AACvD,OAAO,EAAE,MAAM,EAAE,UAAU,EAAE,MAAM,EAAE,MAAM,EAAE,MAAM,QAAQ,CAAC;AAE5D,qEAAqE;AACrE,MAAM,CAAC,MAAM,cAAc,GAAG,MAAM,CAAC,QAAQ,CAAC,CAAC,MAAM,EAAE,KAAK,EAAE,MAAM,EAAE,KAAK,CAAC,CAAC,CAAC;AAG9E,MAAM,SAAS,GAAqD;IAClE,CAAC,MAAM,EAAE,gBAAgB,CAAC;IAC1B,CAAC,KAAK,EAAE,mBAAmB,CAAC;IAC5B,CAAC,MAAM,EAAE,WAAW,CAAC;IACrB,CAAC,KAAK,EAAE,UAAU,CAAC;IACnB,CAAC,KAAK,EAAE,WAAW,CAAC;CACrB,CAAC;AAEF,MAAM,YAAY,GAAG,MAAM,CAAC,MAAM,CAAC,MAAM,CAAC,MAAM,EAAE,MAAM,CAAC,MAAM,CAAC,CAAC;AAEjE,MAAM,WAAW,GAAG,MAAM,CAAC,cAAc,CACvC,MAAM,CAAC,MAAM,CAAC;IACZ,cAAc,EAAE,MAAM,CAAC,WAAW,CAAC,MAAM,CAAC,MAAM,CAAC;IACjD,YAAY,EAAE,MAAM,CAAC,WAAW,CAAC,YAAY,CAAC;IAC9C,eAAe,EAAE,MAAM,CAAC,WAAW,CAAC,YAAY,CAAC;IACjD,oBAAoB,EAAE,MAAM,CAAC,WAAW,CAAC,YAAY,CAAC;CACvD,CAAC,CACH,CAAC;AAEF,iGAAiG;AACjG,MAAM,UAAU,GAAG,yEAAyE,CAAC;AAE7F,oEAAoE;AACpE,MAAM,OAAO,SAAU,SAAQ,MAAM,CAAC,KAAK,CAAY,yBAAyB,CAAC,CAAC;IAChF,IAAI,EAAE,MAAM,CAAC,cAAc;IAC3B,IAAI,EAAE,MAAM,CAAC,cAAc;CAC5B,CAAC;CAAG;AAEL,yEAAyE;AACzE,MAAM,OAAO,gBAAiB,SAAQ,MAAM,CAAC,KAAK,CAChD,gCAAgC,CACjC,CAAC;IACA,IAAI,EAAE,MAAM,CAAC,MAAM;IACnB,IAAI,EAAE,MAAM,CAAC,MAAM;IACnB,wDAAwD;IACxD,IAAI,EAAE,MAAM,CAAC,KAAK,CAAC,SAAS,CAAC;IAC7B,gGAAgG;IAChG,YAAY,EAAE,MAAM,CAAC,MAAM,CAAC,MAAM,CAAC,MAAM,CAAC;IAC1C,cAAc,EAAE,cAAc;IAC9B,uDAAuD;IACvD,SAAS,EAAE,MAAM,CAAC,KAAK,CAAC,MAAM,CAAC,MAAM,CAAC;CACvC,CAAC;CAAG;AAEL,gEAAgE;AAChE,MAAM,OAAO,qBAAsB,SAAQ,MAAM,CAAC,WAAW,CAC3D,qCAAqC,CACtC,CAAC,uBAAuB,EAAE,EAAE,IAAI,EAAE,MAAM,CAAC,MAAM,EAAE,MAAM,EAAE,MAAM,CAAC,MAAM,EAAE,CAAC;CAAG;AAE7E,MAAM,CAAC,MAAM,cAAc,GAAG,eAAe,CAAC;AAE9C,MAAM,gBAAgB,GAAG,CAAC,KAAyB,EAAE,SAAgC,EAAE,EAAE;IACvF,MAAM,KAAK,GAAG,MAAM,CAAC,mBAAmB,CAAC,cAAc,CAAC,CAAC,KAAK,EAAE,KAAK,CAAC,GAAG,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC;IAC/E,IAAI,MAAM,CAAC,MAAM,CAAC,KAAK,CAAC;QAAE,OAAO,KAAK,CAAC,KAAK,CAAC;IAC7C,MAAM,KAAK,GAAG,SAAS,CAAC,IAAI,CAAC,CAAC,CAAC,EAAE,IAAI,CAAC,EAAE,EAAE,CAAC,SAAS,CAAC,QAAQ,CAAC,IAAI,CAAC,CAAC,CAAC;IACrE,OAAO,KAAK,KAAK,SAAS,CAAC,CAAC,CAAC,KAAK,CAAC,CAAC,CAAC,KAAK,CAAC,CAAC,CAAC,CAAC;AAChD,CAAC,CAAC;AAEF,0EAA0E;AAC1E,MAAM,CAAC,MAAM,aAAa,GAAG,CAC3B,IAAY,EACZ,IAAY,EACZ,SAAgC,EACwB,EAAE,CAC1D,MAAM,CAAC,mBAAmB,CAAC,WAAW,CAAC,CAAC,IAAI,CAAC,CAAC,IAAI,CAChD,MAAM,CAAC,QAAQ,CAAC,CAAC,KAAK,EAAE,EAAE,CAAC,IAAI,qBAAqB,CAAC,EAAE,IAAI,EAAE,MAAM,EAAE,KAAK,CAAC,OAAO,EAAE,CAAC,CAAC,EACtF,MAAM,CAAC,GAAG,CAAC,CAAC,QAAQ,EAAE,EAAE;IACtB,MAAM,YAAY,GAAG;QACnB,GAAG,MAAM,CAAC,OAAO,CAAC,QAAQ,CAAC,YAAY,IAAI,EAAE,CAAC;QAC9C,GAAG,MAAM,CAAC,OAAO,CAAC,QAAQ,CAAC,eAAe,IAAI,EAAE,CAAC;QACjD,GAAG,MAAM,CAAC,OAAO,CAAC,QAAQ,CAAC,oBAAoB,IAAI,EAAE,CAAC;KACvD,CAAC,MAAM,CAAC,CAAC,CAAC,IAAI,CAAC,EAAE,EAAE,CAAC,IAAI,CAAC,UAAU,CAAC,SAAS,CAAC,CAAC,CAAC;IACjD,MAAM,MAAM,GAAG,YAAY,CAAC,IAAI,CAAC,CAAC,CAAC,IAAI,CAAC,EAAE,EAAE,CAAC,IAAI,KAAK,cAAc,CAAC,CAAC;IACtE,OAAO,IAAI,gBAAgB,CAAC;QAC1B,IAAI;QACJ,IAAI;QACJ,IAAI,EAAE,YAAY;aACf,MAAM,CAAC,CAAC,CAAC,EAAE,IAAI,CAAC,EAAE,EAAE,CAAC,IAAI,KAAK,EAAE,IAAI,CAAC,UAAU,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;aAC3D,GAAG,CAAC,CAAC,CAAC,IAAI,EAAE,IAAI,CAAC,EAAE,EAAE,CAAC,IAAI,SAAS,CAAC,EAAE,IAAI,EAAE,IAAI,EAAE,CAAC,CAAC;QACvD,YAAY,EACV,MAAM,KAAK,SAAS,IAAI,UAAU,CAAC,IAAI,CAAC,MAAM,CAAC,CAAC,CAAC,CAAC;YAChD,CAAC,CAAC,MAAM,CAAC,IAAI,CAAC,MAAM,CAAC,CAAC,CAAC,CAAC;YACxB,CAAC,CAAC,MAAM,CAAC,IAAI,EAAE;QACnB,cAAc,EAAE,gBAAgB,CAAC,QAAQ,CAAC,cAAc,EAAE,SAAS,CAAC;QACpE,SAAS;KACV,CAAC,CAAC;AACL,CAAC,CAAC,CACH,CAAC;AAEJ,qFAAqF;AACrF,MAAM,CAAC,MAAM,YAAY,GAAG,MAAM,CAAC,EAAE,CAAC,uBAAuB,CAAC,CAAC,QAAQ,CAAC,EAAE,SAAiB;IACzF,MAAM,UAAU,GAAG,KAAK,CAAC,CAAC,UAAU,CAAC,UAAU,CAAC;IAChD,MAAM,IAAI,GAAG,IAAI,CAAC,SAAS,EAAE,cAAc,CAAC,CAAC;IAC7C,MAAM,OAAO,GAAG,CAAC,KAAmC,EAAE,EAAE,CACtD,IAAI,qBAAqB,CAAC,EAAE,IAAI,EAAE,MAAM,EAAE,KAAK,CAAC,OAAO,EAAE,CAAC,CAAC;IAC7D,IAAI,CAAC,CAAC,KAAK,CAAC,CAAC,UAAU,CAAC,MAAM,CAAC,IAAI,CAAC,CAAC,IAAI,CAAC,MAAM,CAAC,QAAQ,CAAC,OAAO,CAAC,CAAC,CAAC,EAAE,CAAC;QACrE,OAAO,MAAM,CAAC,IAAI,EAAoB,CAAC;IACzC,CAAC;IACD,MAAM,IAAI,GAAG,KAAK,CAAC,CAAC,UAAU,CAAC,cAAc,CAAC,IAAI,CAAC,CAAC,IAAI,CAAC,MAAM,CAAC,QAAQ,CAAC,OAAO,CAAC,CAAC,CAAC;IACnF,MAAM,SAAS,GAAkB,EAAE,CAAC;IACpC,KAAK,MAAM,CAAC,EAAE,IAAI,CAAC,IAAI,SAAS,EAAE,CAAC;QACjC,IAAI,KAAK,CAAC,CAAC,UAAU,CAAC,MAAM,CAAC,IAAI,CAAC,SAAS,EAAE,IAAI,CAAC,CAAC,CAAC,IAAI,CAAC,MAAM,CAAC,aAAa,CAAC,GAAG,EAAE,CAAC,KAAK,CAAC,CAAC,EAAE,CAAC;YAC5F,SAAS,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;QACvB,CAAC;IACH,CAAC;IACD,OAAO,MAAM,CAAC,IAAI,CAAC,KAAK,CAAC,CAAC,aAAa,CAAC,IAAI,EAAE,IAAI,EAAE,SAAS,CAAC,CAAC,CAAC;AAClE,CAAC,CAAC,CAAC;AAEH,iFAAiF;AACjF,MAAM,CAAC,MAAM,SAAS,GAAG,CAAC,QAA0B,EAA4B,EAAE,CAChF,MAAM,CAAC,eAAe,CAAC,QAAQ,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC,EAAE,IAAI,EAAE,EAAE,EAAE,CAAC,IAAI,KAAK,cAAc,CAAC,CAAC,CAAC;AAEpF,MAAM,YAAY,GAAG,CAAC,IAAY,EAAE,EAAE,CAAC,IAAI,CAAC,OAAO,CAAC,sBAAsB,EAAE,MAAM,CAAC,CAAC;AAEpF,oGAAoG;AACpG,MAAM,CAAC,MAAM,QAAQ,GAAG,CACtB,IAAY,EACZ,IAA8B,EAC9B,QAAqC,EAC7B,EAAE,CACV,IAAI,CAAC,MAAM,CAAC,CAAC,OAAO,EAAE,EAAE,IAAI,EAAE,IAAI,EAAE,EAAE,EAAE;IACtC,MAAM,OAAO,GAAG,QAAQ,CAAC,GAAG,CAAC,IAAI,CAAC,CAAC;IACnC,IAAI,OAAO,KAAK,SAAS;QAAE,OAAO,OAAO,CAAC;IAC1C,MAAM,KAAK,GAAG,IAAI,MAAM,CAAC,KAAK,YAAY,CAAC,IAAI,CAAC,eAAe,YAAY,CAAC,IAAI,CAAC,GAAG,EAAE,IAAI,CAAC,CAAC;IAC5F,OAAO,OAAO,CAAC,OAAO,CAAC,KAAK,EAAE,MAAM,OAAO,GAAG,CAAC,CAAC;AAClD,CAAC,EAAE,IAAI,CAAC,CAAC;AAEX,+FAA+F;AAC/F,MAAM,CAAC,MAAM,mBAAmB,GAAG,CAAC,SAAiB,EAAE,MAAc,EAAW,EAAE;IAChF,MAAM,IAAI,GAAG,QAAQ,CAAC,IAAI,CAAC,SAAS,EAAE,cAAc,CAAC,EAAE,MAAM,CAAC,CAAC;IAC/D,OAAO,IAAI,KAAK,EAAE,IAAI,CAAC,IAAI,CAAC,UAAU,CAAC,IAAI,CAAC,IAAI,CAAC,UAAU,CAAC,IAAI,CAAC,CAAC;AACpE,CAAC,CAAC;AAEF,mFAAmF;AACnF,MAAM,CAAC,MAAM,cAAc,GAAG,CAAC,IAAY,EAAE,EAAE,CAC7C,MAAM,CAAC,OAAO,CAAC,UAAU,CAAC,UAAU,EAAE,CAAC,UAAU,EAAE,EAAE,CAAC,UAAU,CAAC,QAAQ,CAAC,IAAI,CAAC,CAAC,CAAC,IAAI,CACnF,MAAM,CAAC,aAAa,CAAC,GAAG,EAAE,CAAC,IAAI,CAAC,CACjC,CAAC;AAEJ,MAAM,OAAO,GAAG,uDAAuD,CAAC;AAExE;;;GAGG;AACH,MAAM,CAAC,MAAM,eAAe,GAAG,CAAC,IAAY,EAAE,KAAa,EAAU,EAAE;IACrE,MAAM,CAAC,GAAG,OAAO,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;IAC7B,MAAM,CAAC,GAAG,OAAO,CAAC,IAAI,CAAC,KAAK,CAAC,CAAC;IAC9B,IAAI,CAAC,KAAK,IAAI,IAAI,CAAC,KAAK,IAAI;QAAE,OAAO,CAAC,CAAC;IACvC,KAAK,MAAM,KAAK,IAAI,CAAC,CAAC,EAAE,CAAC,EAAE,CAAC,CAAC,EAAE,CAAC;QAC9B,MAAM,UAAU,GAAG,MAAM,CAAC,CAAC,CAAC,KAAK,CAAC,CAAC,GAAG,MAAM,CAAC,CAAC,CAAC,KAAK,CAAC,CAAC,CAAC;QACvD,IAAI,UAAU,KAAK,CAAC;YAAE,OAAO,UAAU,CAAC;IAC1C,CAAC;IACD,MAAM,CAAC,IAAI,EAAE,IAAI,CAAC,GAAG,CAAC,CAAC,CAAC,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC;IAClC,IAAI,IAAI,KAAK,IAAI;QAAE,OAAO,CAAC,CAAC;IAC5B,IAAI,IAAI,KAAK,SAAS;QAAE,OAAO,CAAC,CAAC;IACjC,IAAI,IAAI,KAAK,SAAS;QAAE,OAAO,CAAC,CAAC,CAAC;IAClC,OAAO,IAAI,CAAC,aAAa,CAAC,IAAI,EAAE,IAAI,EAAE,EAAE,OAAO,EAAE,IAAI,EAAE,CAAC,CAAC;AAC3D,CAAC,CAAC"}

package/dist/instance/operator-api.d.ts

@@ -0,0 +1,30 @@
+import { Effect, Schema } from "effect";
+import { HttpClient } from "effect/http";
+import { type Port } from "../cli.ts";
+declare const ListedRun_base: Schema.Class<ListedRun, Schema.Struct<{
+    readonly id: Schema.brand<Schema.NonEmptyString, "RunId">;
+    readonly state: Schema.String;
+}>, {}>;
+/** A Run as `GET /api/overview` lists it. */
+export declare class ListedRun extends ListedRun_base {
+}
+declare const OperatorApiError_base: Schema.Class<OperatorApiError, Schema.TaggedStruct<"OperatorApiError", {
+    readonly url: Schema.String;
+    readonly reason: Schema.String;
+}>, import("effect/Cause").YieldableError>;
+/** The running instance's operator API didn't answer, or its answer didn't decode. */
+export declare class OperatorApiError extends OperatorApiError_base {
+}
+/** Lists the Runs of the instance that listens on `port`, with one `GET /api/overview`. */
+export declare const listRuns: (port: number & import("effect/Brand").Brand<"ServerPort">) => Effect.Effect<ListedRun[], OperatorApiError, HttpClient.HttpClient>;
+/**
+ * Returns the environment variables with the gateways' admin tokens, which `usine up` reads at
+ * startup, from `GET /api/configuration`.
+ */
+export declare const gatewayTokenVariables: (port: number & import("effect/Brand").Brand<"ServerPort">) => Effect.Effect<string[], OperatorApiError, HttpClient.HttpClient>;
+/** Returns whether an HTTP server answers on `port`, with any status. */
+export declare const answers: (port: Port) => Effect.Effect<boolean, never, HttpClient.HttpClient>;
+/** Whether the Run has a live Attempt. */
+export declare const hasLiveAttempt: (run: ListedRun) => boolean;
+export {};
+//# sourceMappingURL=operator-api.d.ts.map

package/dist/instance/operator-api.d.ts.map

@@ -0,0 +1 @@
+{"version":3,"file":"operator-api.d.ts","sourceRoot":"","sources":["../../src/instance/operator-api.ts"],"names":[],"mappings":"AACA,OAAO,EAAE,MAAM,EAAE,MAAM,EAAE,MAAM,QAAQ,CAAC;AACxC,OAAO,EAAE,UAAU,EAAsB,MAAM,aAAa,CAAC;AAC7D,OAAO,EAAE,KAAK,IAAI,EAAe,MAAM,WAAW,CAAC;;;;;AAOnD,6CAA6C;AAC7C,qBAAa,SAAU,SAAQ,cAG7B;CAAG;;;;;AAcL,sFAAsF;AACtF,qBAAa,gBAAiB,SAAQ,qBAE8B;CAAG;AAevE,2FAA2F;AAC3F,eAAO,MAAM,QAAQ,oIAGnB,CAAC;AAEH;;;GAGG;AACH,eAAO,MAAM,qBAAqB,iIAKhC,CAAC;AAEH,yEAAyE;AACzE,eAAO,MAAM,OAAO,SAAU,IAAI,yDAM/B,CAAC;AAEJ,0CAA0C;AAC1C,eAAO,MAAM,cAAc,QAAS,SAAS,KAAG,OAAkC,CAAC"}

package/dist/instance/operator-api.js

@@ -0,0 +1,47 @@
+import { RunId } from "@usine/core/run";
+import { Effect, Schema } from "effect";
+import { HttpClient, HttpClientResponse } from "effect/http";
+import { SERVER_HOST } from "../cli.js";
+const OPERATOR_API_TIMEOUT = "5 seconds";
+// The CLI decodes only the fields that it reads, so that it reads an instance of another engine
+// version.
+/** A Run as `GET /api/overview` lists it. */
+export class ListedRun extends Schema.Class("@usine/server/ListedRun")({
+    id: RunId,
+    state: Schema.String,
+}) {
+}
+const Overview = Schema.Struct({
+    projects: Schema.Array(Schema.Struct({ runs: Schema.Array(ListedRun) })),
+});
+const Configuration = Schema.Struct({
+    workers: Schema.Array(Schema.Struct({
+        gateway: Schema.NullOr(Schema.Struct({ adminTokenEnv: Schema.NonEmptyString })),
+    })),
+});
+/** The running instance's operator API didn't answer, or its answer didn't decode. */
+export class OperatorApiError extends Schema.TaggedError("@usine/server/OperatorApiError")("OperatorApiError", { url: Schema.String, reason: Schema.String }) {
+}
+const apiUrl = (port, path) => `http://${SERVER_HOST}:${port}${path}`;
+const getJson = (port, path, schema) => {
+    const url = apiUrl(port, path);
+    return Effect.flatMap(HttpClient.HttpClient, (client) => HttpClient.filterStatusOk(client).get(url)).pipe(Effect.flatMap(HttpClientResponse.schemaBodyJson(schema)), Effect.timeout(OPERATOR_API_TIMEOUT), Effect.mapError((error) => new OperatorApiError({ url, reason: error.message })));
+};
+/** Lists the Runs of the instance that listens on `port`, with one `GET /api/overview`. */
+export const listRuns = Effect.fn("Instance.listRuns")(function* (port) {
+    const overview = yield* getJson(port, "/api/overview", Overview);
+    return overview.projects.flatMap(({ runs }) => runs);
+});
+/**
+ * Returns the environment variables with the gateways' admin tokens, which `usine up` reads at
+ * startup, from `GET /api/configuration`.
+ */
+export const gatewayTokenVariables = Effect.fn("Instance.gatewayTokenVariables")(function* (port) {
+    const configuration = yield* getJson(port, "/api/configuration", Configuration);
+    return [...new Set(configuration.workers.flatMap(({ gateway }) => gateway?.adminTokenEnv ?? []))];
+});
+/** Returns whether an HTTP server answers on `port`, with any status. */
+export const answers = (port) => Effect.flatMap(HttpClient.HttpClient, (client) => client.get(apiUrl(port, "/api/overview"))).pipe(Effect.flatMap((response) => response.text), Effect.timeout("2 seconds"), Effect.as(true), Effect.orElseSucceed(() => false));
+/** Whether the Run has a live Attempt. */
+export const hasLiveAttempt = (run) => run.state === "Running";
+//# sourceMappingURL=operator-api.js.map

package/dist/instance/operator-api.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"operator-api.js","sourceRoot":"","sources":["../../src/instance/operator-api.ts"],"names":[],"mappings":"AAAA,OAAO,EAAE,KAAK,EAAE,MAAM,iBAAiB,CAAC;AACxC,OAAO,EAAE,MAAM,EAAE,MAAM,EAAE,MAAM,QAAQ,CAAC;AACxC,OAAO,EAAE,UAAU,EAAE,kBAAkB,EAAE,MAAM,aAAa,CAAC;AAC7D,OAAO,EAAa,WAAW,EAAE,MAAM,WAAW,CAAC;AAEnD,MAAM,oBAAoB,GAAG,WAAW,CAAC;AAEzC,gGAAgG;AAChG,WAAW;AAEX,6CAA6C;AAC7C,MAAM,OAAO,SAAU,SAAQ,MAAM,CAAC,KAAK,CAAY,yBAAyB,CAAC,CAAC;IAChF,EAAE,EAAE,KAAK;IACT,KAAK,EAAE,MAAM,CAAC,MAAM;CACrB,CAAC;CAAG;AAEL,MAAM,QAAQ,GAAG,MAAM,CAAC,MAAM,CAAC;IAC7B,QAAQ,EAAE,MAAM,CAAC,KAAK,CAAC,MAAM,CAAC,MAAM,CAAC,EAAE,IAAI,EAAE,MAAM,CAAC,KAAK,CAAC,SAAS,CAAC,EAAE,CAAC,CAAC;CACzE,CAAC,CAAC;AAEH,MAAM,aAAa,GAAG,MAAM,CAAC,MAAM,CAAC;IAClC,OAAO,EAAE,MAAM,CAAC,KAAK,CACnB,MAAM,CAAC,MAAM,CAAC;QACZ,OAAO,EAAE,MAAM,CAAC,MAAM,CAAC,MAAM,CAAC,MAAM,CAAC,EAAE,aAAa,EAAE,MAAM,CAAC,cAAc,EAAE,CAAC,CAAC;KAChF,CAAC,CACH;CACF,CAAC,CAAC;AAEH,sFAAsF;AACtF,MAAM,OAAO,gBAAiB,SAAQ,MAAM,CAAC,WAAW,CACtD,gCAAgC,CACjC,CAAC,kBAAkB,EAAE,EAAE,GAAG,EAAE,MAAM,CAAC,MAAM,EAAE,MAAM,EAAE,MAAM,CAAC,MAAM,EAAE,CAAC;CAAG;AAEvE,MAAM,MAAM,GAAG,CAAC,IAAU,EAAE,IAAY,EAAE,EAAE,CAAC,UAAU,WAAW,IAAI,IAAI,GAAG,IAAI,EAAE,CAAC;AAEpF,MAAM,OAAO,GAAG,CAAO,IAAU,EAAE,IAAY,EAAE,MAA0B,EAAE,EAAE;IAC7E,MAAM,GAAG,GAAG,MAAM,CAAC,IAAI,EAAE,IAAI,CAAC,CAAC;IAC/B,OAAO,MAAM,CAAC,OAAO,CAAC,UAAU,CAAC,UAAU,EAAE,CAAC,MAAM,EAAE,EAAE,CACtD,UAAU,CAAC,cAAc,CAAC,MAAM,CAAC,CAAC,GAAG,CAAC,GAAG,CAAC,CAC3C,CAAC,IAAI,CACJ,MAAM,CAAC,OAAO,CAAC,kBAAkB,CAAC,cAAc,CAAC,MAAM,CAAC,CAAC,EACzD,MAAM,CAAC,OAAO,CAAC,oBAAoB,CAAC,EACpC,MAAM,CAAC,QAAQ,CAAC,CAAC,KAAK,EAAE,EAAE,CAAC,IAAI,gBAAgB,CAAC,EAAE,GAAG,EAAE,MAAM,EAAE,KAAK,CAAC,OAAO,EAAE,CAAC,CAAC,CACjF,CAAC;AACJ,CAAC,CAAC;AAEF,2FAA2F;AAC3F,MAAM,CAAC,MAAM,QAAQ,GAAG,MAAM,CAAC,EAAE,CAAC,mBAAmB,CAAC,CAAC,QAAQ,CAAC,EAAE,IAAU;IAC1E,MAAM,QAAQ,GAAG,KAAK,CAAC,CAAC,OAAO,CAAC,IAAI,EAAE,eAAe,EAAE,QAAQ,CAAC,CAAC;IACjE,OAAO,QAAQ,CAAC,QAAQ,CAAC,OAAO,CAAC,CAAC,EAAE,IAAI,EAAE,EAAE,EAAE,CAAC,IAAI,CAAC,CAAC;AACvD,CAAC,CAAC,CAAC;AAEH;;;GAGG;AACH,MAAM,CAAC,MAAM,qBAAqB,GAAG,MAAM,CAAC,EAAE,CAAC,gCAAgC,CAAC,CAAC,QAAQ,CAAC,EACxF,IAAU;IAEV,MAAM,aAAa,GAAG,KAAK,CAAC,CAAC,OAAO,CAAC,IAAI,EAAE,oBAAoB,EAAE,aAAa,CAAC,CAAC;IAChF,OAAO,CAAC,GAAG,IAAI,GAAG,CAAC,aAAa,CAAC,OAAO,CAAC,OAAO,CAAC,CAAC,EAAE,OAAO,EAAE,EAAE,EAAE,CAAC,OAAO,EAAE,aAAa,IAAI,EAAE,CAAC,CAAC,CAAC,CAAC;AACpG,CAAC,CAAC,CAAC;AAEH,yEAAyE;AACzE,MAAM,CAAC,MAAM,OAAO,GAAG,CAAC,IAAU,EAAE,EAAE,CACpC,MAAM,CAAC,OAAO,CAAC,UAAU,CAAC,UAAU,EAAE,CAAC,MAAM,EAAE,EAAE,CAAC,MAAM,CAAC,GAAG,CAAC,MAAM,CAAC,IAAI,EAAE,eAAe,CAAC,CAAC,CAAC,CAAC,IAAI,CAC/F,MAAM,CAAC,OAAO,CAAC,CAAC,QAAQ,EAAE,EAAE,CAAC,QAAQ,CAAC,IAAI,CAAC,EAC3C,MAAM,CAAC,OAAO,CAAC,WAAW,CAAC,EAC3B,MAAM,CAAC,EAAE,CAAC,IAAI,CAAC,EACf,MAAM,CAAC,aAAa,CAAC,GAAG,EAAE,CAAC,KAAK,CAAC,CAClC,CAAC;AAEJ,0CAA0C;AAC1C,MAAM,CAAC,MAAM,cAAc,GAAG,CAAC,GAAc,EAAW,EAAE,CAAC,GAAG,CAAC,KAAK,KAAK,SAAS,CAAC"}

package/dist/instance/ports.d.ts

@@ -0,0 +1,23 @@
+import { Effect, FileSystem, Schema } from "effect";
+import { ChildProcessSpawner } from "effect/process";
+declare const ListeningPortsError_base: Schema.Class<ListeningPortsError, Schema.TaggedStruct<"ListeningPortsError", {
+    readonly pid: Schema.brand<Schema.Int, "ProcessId">;
+    readonly reason: Schema.String;
+}>, import("effect/Cause").YieldableError>;
+/** The OS couldn't list the TCP ports that a process listens on. */
+export declare class ListeningPortsError extends ListeningPortsError_base {
+}
+/**
+ * Lists the IPv4 TCP ports that the process listens on, from its file descriptors and its network
+ * namespace's socket table in `/proc`. Linux only. Fails if this user may not read them.
+ */
+export declare const procListeningPorts: (pid: number & import("effect/Brand").Brand<"ProcessId">) => Effect.Effect<(number & import("effect/Brand").Brand<"ServerPort">)[], ListeningPortsError, FileSystem.FileSystem>;
+/**
+ * Lists the IPv4 TCP ports that the process listens on, from lsof. Fails if lsof is missing or
+ * doesn't answer in time. Returns no ports for a process that lsof may not inspect.
+ */
+export declare const lsofListeningPorts: (pid: number & import("effect/Brand").Brand<"ProcessId">) => Effect.Effect<(number & import("effect/Brand").Brand<"ServerPort">)[], ListeningPortsError, ChildProcessSpawner.ChildProcessSpawner>;
+/** Lists the IPv4 TCP ports that the process listens on: from `/proc` on Linux, else from lsof. */
+export declare const listeningPorts: (pid: number & import("effect/Brand").Brand<"ProcessId">) => Effect.Effect<(number & import("effect/Brand").Brand<"ServerPort">)[], ListeningPortsError, ChildProcessSpawner.ChildProcessSpawner | FileSystem.FileSystem>;
+export {};
+//# sourceMappingURL=ports.d.ts.map

package/dist/instance/ports.d.ts.map

@@ -0,0 +1 @@
+{"version":3,"file":"ports.d.ts","sourceRoot":"","sources":["../../src/instance/ports.ts"],"names":[],"mappings":"AAAA,OAAO,EAAE,MAAM,EAAE,UAAU,EAA8B,MAAM,EAAE,MAAM,QAAQ,CAAC;AAChF,OAAO,EAAgB,mBAAmB,EAAE,MAAM,gBAAgB,CAAC;;;;;AASnE,oEAAoE;AACpE,qBAAa,mBAAoB,SAAQ,wBAE0B;CAAG;AAqBtE;;;GAGG;AACH,eAAO,MAAM,kBAAkB,iLA+B7B,CAAC;AAEH;;;GAGG;AACH,eAAO,MAAM,kBAAkB,mMA2B7B,CAAC;AAEH,mGAAmG;AACnG,eAAO,MAAM,cAAc,2NAKzB,CAAC"}

package/dist/instance/ports.js

@@ -0,0 +1,81 @@
+import { Effect, FileSystem, Option, Schema } from "effect";
+import { ChildProcess, ChildProcessSpawner } from "effect/process";
+import { Port } from "../cli.js";
+import { ProcessId } from "./record.js";
+const LSOF_TIMEOUT = "2 seconds";
+/** The `st` column of a listening socket in `/proc/<pid>/net/tcp`. */
+const TCP_LISTEN = "0A";
+const SOCKET_LINK = /^socket:\[(\d+)\]$/u;
+/** The OS couldn't list the TCP ports that a process listens on. */
+export class ListeningPortsError extends Schema.TaggedError("@usine/server/ListeningPortsError")("ListeningPortsError", { pid: ProcessId, reason: Schema.String }) {
+}
+/** Returns the port after the last colon of a socket address, in base `radix`. */
+const addressPort = (address, radix) => Option.toArray(Schema.decodeUnknownOption(Port)(Number.parseInt(address.slice(address.lastIndexOf(":") + 1), radix)));
+/** Returns the inode and port of each listening socket in a `/proc/<pid>/net/tcp` table. */
+const listeningSockets = (table) => table
+    .split("\n")
+    .slice(1)
+    .flatMap((line) => {
+    const [, local, , state, , , , , , inode] = line.trim().split(/\s+/u);
+    if (state !== TCP_LISTEN || local === undefined || inode === undefined)
+        return [];
+    return addressPort(local, 16).map((port) => ({ inode, port }));
+});
+/**
+ * Lists the IPv4 TCP ports that the process listens on, from its file descriptors and its network
+ * namespace's socket table in `/proc`. Linux only. Fails if this user may not read them.
+ */
+export const procListeningPorts = Effect.fn("Instance.procListeningPorts")(function* (pid) {
+    const fileSystem = yield* FileSystem.FileSystem;
+    const failure = (error) => new ListeningPortsError({ pid, reason: error.message });
+    const descriptors = yield* fileSystem
+        .readDirectory(`/proc/${pid}/fd`)
+        .pipe(Effect.mapError(failure));
+    const inodes = new Set();
+    for (const descriptor of descriptors) {
+        const target = yield* fileSystem.readLink(`/proc/${pid}/fd/${descriptor}`).pipe(Effect.tapError((error) => Effect.logDebug("Skipped a descriptor that the process may have closed after the listing", {
+            pid,
+            descriptor,
+            reason: error.message,
+        })), Effect.option);
+        const inode = Option.flatMapNullishOr(target, (link) => SOCKET_LINK.exec(link)?.[1]);
+        if (Option.isSome(inode))
+            inodes.add(inode.value);
+    }
+    const table = yield* fileSystem
+        .readFileString(`/proc/${pid}/net/tcp`)
+        .pipe(Effect.mapError(failure));
+    const ports = listeningSockets(table)
+        .filter(({ inode }) => inodes.has(inode))
+        .map(({ port }) => port);
+    return [...new Set(ports)];
+});
+/**
+ * Lists the IPv4 TCP ports that the process listens on, from lsof. Fails if lsof is missing or
+ * doesn't answer in time. Returns no ports for a process that lsof may not inspect.
+ */
+export const lsofListeningPorts = Effect.fn("Instance.lsofListeningPorts")(function* (pid) {
+    const spawner = yield* ChildProcessSpawner.ChildProcessSpawner;
+    // -a selects the sockets that match every option, not any of them.
+    const lines = yield* spawner
+        .lines(ChildProcess.make("lsof", ["-a", "-nP", "-p", String(pid), "-i4TCP", "-sTCP:LISTEN", "-Fn"], {
+        stdin: "ignore",
+        stderr: "ignore",
+    }))
+        .pipe(Effect.timeoutOrElse({
+        duration: LSOF_TIMEOUT,
+        orElse: () => Effect.fail(new ListeningPortsError({ pid, reason: `lsof took over ${LSOF_TIMEOUT}` })),
+    }), Effect.catchTag("PlatformError", (error) => Effect.fail(new ListeningPortsError({ pid, reason: error.message }))));
+    // With -Fn, lsof names each socket on a line like `n127.0.0.1:7331`.
+    const ports = lines
+        .filter((line) => line.startsWith("n"))
+        .flatMap((line) => addressPort(line, 10));
+    return [...new Set(ports)];
+});
+/** Lists the IPv4 TCP ports that the process listens on: from `/proc` on Linux, else from lsof. */
+export const listeningPorts = Effect.fn("Instance.listeningPorts")(function* (pid) {
+    const ports = process.platform === "linux" ? yield* procListeningPorts(pid) : yield* lsofListeningPorts(pid);
+    yield* Effect.annotateCurrentSpan({ pid, ports });
+    return ports;
+});
+//# sourceMappingURL=ports.js.map