@voltro/workflow 0.70.0 → 0.71.1

package/package.json

@@ -1,6 +1,6 @@
 {
   "name": "@voltro/workflow",
-  "version": "0.70.0",
+  "version": "0.71.1",
   "description": "Durable workflows for Voltro — the workflow() descriptor + step() / awaitSignal primitives over @effect/cluster, with a browser-safe define subpath.",
   "keywords": [
     "voltro",
@@ -51,9 +51,9 @@
     "@effect/cluster": "^0.60.2",
     "@effect/sql": "^0.52.1",
     "@effect/workflow": "^0.19.1",
-    "@voltro/database": "0.70.0",
-    "@voltro/logger": "0.70.0",
-    "@voltro/protocol": "0.70.0"
+    "@voltro/database": "0.71.1",
+    "@voltro/logger": "0.71.1",
+    "@voltro/protocol": "0.71.1"
   },
   "peerDependencies": {
     "effect": "^3.22.1",

package/dist/cluster-CSycI4sz.js

@@ -1,329 +0,0 @@
-import { n as e, t } from "./clusterDiagnostics-CNtl5LX9.js";
-import { Context as n, Duration as r, Effect as i, Layer as a, Option as o } from "effect";
-import { ClusterCron as s, ClusterSchema as c, ClusterWorkflowEngine as l, EntityAddress as u, EntityId as d, EntityType as f, MessageStorage as p, RunnerAddress as m, ShardId as h, Sharding as g, ShardingConfig as _, SingleRunner as v, SqlMessageStorage as y, SqlRunnerStorage as b } from "@effect/cluster";
-import { SqlClient as x } from "@effect/sql";
-import { fnv1a64 as S, resolveMigrationLockSchema as C } from "@voltro/database/sql";
-import { createLogger as ee } from "@voltro/logger";
-//#region src/clusterMigrationGate.ts
-var w = 6322741009312601n, T = () => {
-	let e = C();
-	return e === void 0 ? w : S(`voltro_cluster_migration_lock:${e}`) & 9223372036854775807n;
-}, E = () => {
-	let e = `voltro_cluster_migration_${w.toString(36)}`, t = C();
-	if (t === void 0) return e;
-	let n = `${e}_${t}`;
-	return /^[A-Za-z0-9_]+$/.test(t) && n.length <= 64 ? n : `${e}_h${S(`voltro_cluster_migration_lock:${t}`).toString(16)}`;
-}, D = () => {
-	let e = Number(process.env.VOLTRO_CLUSTER_MIGRATION_LOCK_TIMEOUT_MS);
-	return Number.isFinite(e) && e > 0 ? e : 6e4;
-}, O = 250, k = (e) => e[0]?.[0], A = (e, t) => e.onDialectOrElse({
-	sqlite: () => i.void,
-	mysql: () => t.executeValues(`SELECT GET_LOCK('${E()}', ${Math.ceil(D() / 1e3)})`, []).pipe(i.flatMap((e) => k(e) === 1 || k(e) === "1" ? i.void : i.die(/* @__PURE__ */ Error(`could not acquire cluster migration lock '${E()}' (GET_LOCK timed out)`)))),
-	mssql: () => t.executeValues(`DECLARE @res int; EXEC @res = sp_getapplock @Resource = '${E()}', @LockMode = 'Exclusive', @LockOwner = 'Session', @LockTimeout = ${D()}; SELECT @res`, []).pipe(i.flatMap((e) => Number(k(e) ?? -999) >= 0 ? i.void : i.die(/* @__PURE__ */ Error(`could not acquire cluster migration lock '${E()}' (sp_getapplock ${String(k(e))})`)))),
-	orElse: () => {
-		let e = T().toString(), n = Date.now(), r = t.executeValues(`SELECT pg_try_advisory_lock(${e}::bigint)`, []).pipe(i.flatMap((e) => {
-			let t = k(e);
-			return t === !0 || t === "t" || t === 1 ? i.void : Date.now() - n >= D() ? i.die(/* @__PURE__ */ Error(`could not acquire the cluster migration advisory lock within ${Math.round(D() / 1e3)}s. Another runner is migrating the cluster schema, or a prior boot wedged while holding it. (Raise VOLTRO_CLUSTER_MIGRATION_LOCK_TIMEOUT_MS, or inspect pg_locks for the holder.)`)) : i.sleep(`${O} millis`).pipe(i.zipRight(r));
-		}));
-		return r;
-	}
-}), j = (e, t) => e.onDialectOrElse({
-	sqlite: () => i.void,
-	mysql: () => i.asVoid(t.executeValues(`SELECT RELEASE_LOCK('${E()}')`, [])),
-	mssql: () => i.asVoid(t.executeValues(`EXEC sp_releaseapplock @Resource = '${E()}', @LockOwner = 'Session'`, [])),
-	orElse: () => i.asVoid(t.executeValues(`SELECT pg_advisory_unlock(${T().toString()}::bigint)`, []))
-}), M = (e, t) => e.onDialectOrElse({
-	sqlite: () => !0,
-	orElse: () => !1
-}) ? t : i.scoped(i.gen(function* () {
-	let n = yield* e.reserve;
-	return yield* i.acquireRelease(A(e, n), () => j(e, n).pipe(i.orDie)), yield* t;
-})), N = (e) => e === "sql" ? ["cluster_messages", "cluster_runners"] : ["cluster_messages"], P = (e, t) => e.onDialectOrElse({
-	pg: () => e`SELECT (to_regclass(${t}) IS NOT NULL) AS present`,
-	mysql: () => e`SELECT (COUNT(*) > 0) AS present FROM information_schema.tables WHERE table_schema = DATABASE() AND table_name = ${t}`,
-	mssql: () => e`SELECT CASE WHEN OBJECT_ID(${t}, 'U') IS NULL THEN 0 ELSE 1 END AS present`,
-	orElse: () => e`SELECT (COUNT(*) > 0) AS present FROM sqlite_master WHERE type = 'table' AND name = ${t}`
-}).pipe(i.map((e) => {
-	let t = e[0]?.present;
-	return t === !0 || t === 1 || t === "1" || t === "t" || typeof t == "bigint" && t === 1n;
-}), i.catchAll(() => i.succeed(!1))), te = (e, t) => i.forEach(N(t), (t) => P(e, t), { concurrency: 1 }).pipe(i.map((e) => e.every(Boolean))), F = (e, t) => i.scoped(i.asVoid(a.build(t.pipe(a.provide(_.layerDefaults), a.provide(a.succeed(x.SqlClient, e)))))), ne = (e, t) => F(e, y.layer).pipe(i.zipRight(t === "sql" ? F(e, b.layer) : i.void)), I = (e) => a.effect(x.SqlClient, i.gen(function* () {
-	let t = yield* x.SqlClient;
-	return (yield* te(t, e.runnerStorage)) || (yield* M(t, ne(t, e.runnerStorage))), t;
-})), L = (e) => {
-	if (e instanceof Date) return Number.isNaN(e.getTime()) ? null : e;
-	if (typeof e == "string" || typeof e == "number") {
-		let t = typeof e == "string" && /^\d{4}-\d{2}-\d{2} \d{2}:\d{2}:\d{2}$/.test(e) ? `${e.replace(" ", "T")}Z` : e, n = new Date(t);
-		return Number.isNaN(n.getTime()) ? null : n;
-	}
-	return null;
-}, R = (e) => e === !0 || e === 1 || e === "1" || e instanceof Uint8Array && e[0] === 1, z = (e, t) => {
-	let n = e.lastIndexOf(":");
-	if (n < 0) return;
-	let r = e.slice(0, n), i = Number(e.slice(n + 1)), a = t.indexOf(r);
-	if (!(a < 0 || !Number.isInteger(i))) return (a + 1) * 1e6 + i;
-}, B = (e) => i.gen(function* () {
-	let n = yield* x.SqlClient, r = e.shardGroups ?? ["default"], a = e.dialectId ?? "", o = a.startsWith("postgres") || a === "pg", s = (e) => e.pipe(i.catchAll(() => i.succeed([]))), c = n.onDialectOrElse({
-		pg: () => n.literal("NOW()"),
-		mysql: () => n.literal("NOW()"),
-		mssql: () => n.literal("GETDATE()"),
-		orElse: () => n.literal("CURRENT_TIMESTAMP")
-	}), l = (e, t) => {
-		let n = L(e.last_read), r = L(e.server_now), i = n !== null && r !== null ? Math.max(0, r.getTime() - n.getTime()) : null;
-		return {
-			tag: typeof e.tag == "string" ? e.tag : null,
-			entityType: String(e.entity_type ?? ""),
-			entityId: String(e.entity_id ?? ""),
-			shardId: String(e.shard_id ?? ""),
-			processed: R(e.processed),
-			lastRead: i === null ? null : new Date(t - i)
-		};
-	}, u = (e) => n.onDialectOrElse({
-		pg: () => n.literal(`NOW() - INTERVAL '${e} seconds'`),
-		mysql: () => n.literal(`NOW() - INTERVAL ${e} SECOND`),
-		mssql: () => n.literal(`DATEADD(SECOND, -${e}, GETDATE())`),
-		orElse: () => n.literal(`DATETIME('now', '-${e} seconds')`)
-	}), d = n.onDialectOrElse({
-		pg: () => n.literal("FALSE"),
-		orElse: () => n.literal("0")
-	}), f = (e) => {
-		let t = Date.now();
-		return s(n`
-        SELECT tag, entity_type, entity_id, shard_id, processed, last_read, ${c} AS server_now
-        FROM cluster_messages
-        WHERE entity_id = ${e}
-        ORDER BY rowid ASC
-      `).pipe(i.map((e) => e.map((e) => l(e, t))));
-	}, p = (e = t) => {
-		let r = Math.max(1, Math.ceil(e / 1e3)), a = Date.now();
-		return s(n`
-        SELECT tag, entity_type, entity_id, shard_id, processed, last_read, ${c} AS server_now
-        FROM cluster_messages
-        WHERE processed = ${d}
-        AND last_read IS NOT NULL
-        AND last_read < ${u(r)}
-        AND (deliver_at IS NULL OR deliver_at <= ${a})
-        ORDER BY last_read ASC
-      `).pipe(i.map((e) => e.flatMap((e) => {
-			let t = l(e, a);
-			return t.lastRead === null ? [] : [{
-				...t,
-				unreadForMs: Math.max(0, a - t.lastRead.getTime())
-			}];
-		})));
-	}, m = (t) => s(n`
-        SELECT shard_id, address, acquired_at FROM cluster_locks WHERE ${n.in("shard_id", t)}
-      `).pipe(i.map((t) => t.map((t) => {
-		let n = t, r = String(n.address ?? ""), i = String(n.shard_id ?? "");
-		return {
-			shardId: i,
-			mode: "row",
-			holder: r,
-			own: r === e.ownAddress || (e.hasShard?.(i) ?? !1),
-			since: L(n.acquired_at)
-		};
-	}))), h = (t) => {
-		let a = /* @__PURE__ */ new Map();
-		for (let e of t) {
-			let t = z(e, r);
-			t !== void 0 && a.set(t, e);
-		}
-		return a.size === 0 ? i.succeed([]) : i.gen(function* () {
-			return (yield* s(n`
-          SELECT l.objid, a.pid, a.client_addr, a.application_name, a.state, a.state_change, a.backend_start, a.wait_event_type
-          FROM pg_locks l
-          JOIN pg_stat_activity a ON a.pid = l.pid
-          WHERE l.locktype = 'advisory' AND l.granted AND l.classid = 0 AND ${n.in("l.objid", [...a.keys()])}
-        `)).flatMap((t) => {
-				let n = t, r = a.get(Number(n.objid));
-				if (r === void 0) return [];
-				let i = Number(n.pid), o = n.client_addr === null || n.client_addr === void 0 ? "local socket" : String(n.client_addr), s = e.hasShard?.(r) ?? !1;
-				return [{
-					shardId: r,
-					mode: "advisory",
-					holder: s ? `this runner (pid ${i})` : `pid ${i} from ${o}`,
-					own: s,
-					since: L(n.state_change),
-					detail: {
-						pid: i,
-						clientAddr: n.client_addr ?? null,
-						applicationName: n.application_name ?? null,
-						state: n.state ?? null,
-						waitEventType: n.wait_event_type ?? null,
-						backendStart: L(n.backend_start)?.toISOString() ?? null
-					}
-				}];
-			});
-		});
-	};
-	return {
-		ownAddress: e.ownAddress,
-		shardLockMode: e.shardLockMode,
-		messagesFor: f,
-		unreadMessages: p,
-		shardLockHolders: (t) => t.length === 0 || e.runnerStorage !== "sql" ? i.succeed([]) : e.shardLockMode === "row" ? m(t) : e.shardLockMode === "advisory" && o ? h(t) : i.succeed([]),
-		runners: () => e.runnerStorage === "sql" ? s(n`SELECT address, last_heartbeat, healthy FROM cluster_runners ORDER BY last_heartbeat DESC`).pipe(i.map((e) => e.map((e) => {
-			let t = e;
-			return {
-				address: String(t.address ?? ""),
-				lastHeartbeat: L(t.last_heartbeat),
-				healthy: R(t.healthy)
-			};
-		}))) : i.succeed([]),
-		discardMessages: (e) => {
-			let t = e.unreadForMs === void 0 ? n.literal("") : n`AND last_read IS NOT NULL AND last_read < ${u(Math.max(1, Math.ceil(e.unreadForMs / 1e3)))}`;
-			return i.gen(function* () {
-				let r = (yield* n`
-          SELECT id FROM cluster_messages
-          WHERE entity_type = ${e.entityType} AND entity_id = ${e.entityId}
-          AND processed = ${d}
-          ${t}
-        `).map((e) => e.id).filter((e) => e != null);
-				return r.length === 0 ? 0 : (yield* n`DELETE FROM cluster_replies WHERE ${n.in("request_id", r)}`, yield* n`DELETE FROM cluster_messages WHERE ${n.in("id", r)}`, r.length);
-			}).pipe(n.withTransaction, i.catchAll(() => i.succeed(0)));
-		}
-	};
-}), V = ee({ scope: "voltro:workflow" }), H = 34e3, U = (e) => {
-	let t = e.runnerListenHost ?? process.env.POD_IP ?? process.env.VOLTRO_WORKFLOW_RUNNER_HOST ?? "localhost";
-	return {
-		host: t,
-		port: e.runnerListenPort ?? 34e3,
-		localhostRisk: e.runnerStorage === "sql" && (t === "localhost" || t === "127.0.0.1")
-	};
-}, W = (e) => {
-	let t = e.sqliteFamily ? "memory" : "sql", n = e.override ?? process.env.VOLTRO_WORKFLOW_RUNNER_STORAGE;
-	if (n === void 0 || n.trim() === "") return t;
-	let r = n.trim().toLowerCase();
-	if (r !== "memory" && r !== "sql") throw Error(`VOLTRO_WORKFLOW_RUNNER_STORAGE must be 'memory' or 'sql', got '${n}'.`);
-	if (r === "sql" && e.sqliteFamily) throw Error("VOLTRO_WORKFLOW_RUNNER_STORAGE='sql' is unsupported on sqlite / turso — @effect/cluster has no sqlite advisory-lock branch. Use 'memory'.");
-	return r;
-}, G = (e = process.env.VOLTRO_WORKFLOW_SHARD_LOCK) => {
-	if (e === void 0 || e.trim() === "") return "auto";
-	let t = e.trim().toLowerCase();
-	if (t === "auto" || t === "row" || t === "advisory") return t;
-	throw Error(`VOLTRO_WORKFLOW_SHARD_LOCK must be 'auto', 'row', or 'advisory', got '${e}'.`);
-}, K = i.gen(function* () {
-	let e = yield* (yield* x.SqlClient)`SELECT @@wsrep_on AS wsrep`.pipe(i.catchAll(() => i.succeed([])));
-	if (e.length === 0) return !1;
-	let t = e[0].wsrep;
-	return t === 1 || t === "1" || t === !0 || t === "ON" || t === "on";
-}), q = (e) => i.gen(function* () {
-	return e.runnerStorage === "memory" ? !1 : e.mode === "row" ? !0 : e.mode === "advisory" || e.dialectId !== "mysql" && e.dialectId !== "mariadb" ? !1 : yield* K;
-}), J = (e) => ({
-	coordination: e.disableAdvisory ? "row-based" : "advisory",
-	dialect: e.dialectId ?? "unknown",
-	mode: e.mode,
-	...e.disableAdvisory && e.mode === "auto" ? { reason: "wsrep/Galera cluster detected" } : {}
-}), Y = () => {
-	let e = (e) => {
-		if (e === void 0) return;
-		let t = Number(e);
-		return Number.isFinite(t) && t > 0 ? t : void 0;
-	}, t = e(process.env.VOLTRO_WORKFLOW_FAILOVER_LEASE), n = e(process.env.VOLTRO_WORKFLOW_FAILOVER_HEARTBEAT), r = e(process.env.VOLTRO_WORKFLOW_POLL_INTERVAL);
-	return {
-		...t === void 0 ? {} : { failoverLeaseSeconds: t },
-		...n === void 0 ? {} : { failoverHeartbeatSeconds: n },
-		...r === void 0 ? {} : { messagePollSeconds: r }
-	};
-}, X = i.flatMap(g.Sharding, (e) => e.pollStorage), Z = /* @__PURE__ */ new Set(), re = (t) => {
-	let n = U({
-		runnerStorage: t.runnerStorage,
-		runnerListenHost: t.runnerListenHost,
-		runnerListenPort: t.runnerListenPort
-	}), s = n.host, c = n.port;
-	n.localhostRisk && !Z.has(s) && (Z.add(s), V.warn("runner host is not routable from other pods with SQL cluster storage — a workflow cannot resume on another pod after a reschedule. Inject POD_IP via the K8s downward API (fieldRef: status.podIP) or set runnerListenHost / VOLTRO_WORKFLOW_RUNNER_HOST.", { runnerHost: s }));
-	let u = I({ runnerStorage: t.runnerStorage }).pipe(a.provide(t.sqlClientLayer)), d = t.shardLockMode ?? G(), f = a.unwrapEffect(q({
-		dialectId: t.dialectId,
-		runnerStorage: t.runnerStorage,
-		mode: d
-	}).pipe(i.map((n) => {
-		t.runnerStorage === "sql" && V.info("shard-lock coordination", J({
-			disableAdvisory: n,
-			dialectId: t.dialectId,
-			mode: d
-		}));
-		let l = a.effect(e, i.flatMap(g.Sharding, (e) => B({
-			ownAddress: m.make(s, c).toString(),
-			shardLockMode: t.runnerStorage === "sql" ? n ? "row" : "advisory" : "none",
-			runnerStorage: t.runnerStorage,
-			dialectId: t.dialectId,
-			hasShard: (t) => e.hasShardId(h.ShardId.fromString(t))
-		}))), u = v.layer({
-			runnerStorage: t.runnerStorage,
-			shardingConfig: {
-				runnerAddress: o.some(m.make(s, c)),
-				runnerListenAddress: o.some(m.make(s, c)),
-				...n ? { shardLockDisableAdvisory: !0 } : {},
-				...t.failoverLeaseSeconds === void 0 ? {} : { shardLockExpiration: r.seconds(t.failoverLeaseSeconds) },
-				...t.failoverHeartbeatSeconds === void 0 ? {} : { shardLockRefreshInterval: r.seconds(t.failoverHeartbeatSeconds) },
-				...t.messagePollSeconds === void 0 ? {} : { entityMessagePollInterval: r.seconds(t.messagePollSeconds) }
-			}
-		});
-		return l.pipe(a.provideMerge(u));
-	}))).pipe(a.provide(u)), p = t.extraShardingLayers ?? [];
-	return (p.length === 0 ? l.layer : a.mergeAll(l.layer, ...p)).pipe(a.provideMerge(f));
-}, ie = (e) => s.make({
-	name: e.name,
-	cron: e.cron,
-	execute: i.promise(() => e.execute()),
-	skipIfOlderThan: e.skipIfOlderThan ?? r.days(1)
-}), Q = (e, t) => `${e}/${t}`, ae = (e, t, r) => {
-	let i = d.make(t), a = n.get(e.annotations, c.ShardGroup)(i);
-	return new u.EntityAddress({
-		entityType: f.EntityType.make(`Workflow/${e.name}`),
-		entityId: i,
-		shardId: r.getShardId(i, a)
-	});
-}, oe = (e) => {
-	let t = (e) => e && typeof e == "object" && "_tag" in e ? String(e._tag) : void 0, n = t(e);
-	if (n === "Failure" || n !== "Success") return "failed";
-	let r = e.value, i = t(r);
-	if (i === "Suspended") return "suspended";
-	if (i === "Complete") {
-		let e = r.exit;
-		return t(e) === "Success" ? "succeeded" : "failed";
-	}
-	return "failed";
-}, se = (e) => $(e.workflow, e.executionId, e.failedActivities), ce = (e) => $(e.workflow, e.executionId, e.resetActivities), $ = (e, t, n) => i.gen(function* () {
-	let r = yield* g.Sharding, a = yield* p.MessageStorage, s = ae(e, t, r), c = yield* a.requestIdForPrimaryKey({
-		address: s,
-		tag: "run",
-		id: ""
-	}).pipe(i.orElseSucceed(() => o.none()));
-	if (o.isNone(c)) return {
-		redriven: !1,
-		runReplyCleared: !1,
-		activitiesReset: 0,
-		reason: "no-journal"
-	};
-	let l = (yield* a.repliesForUnfiltered([c.value]).pipe(i.orElseSucceed(() => []))).filter((e) => e._tag === "WithExit").at(-1);
-	if (l === void 0) return {
-		redriven: !1,
-		runReplyCleared: !1,
-		activitiesReset: 0,
-		reason: "no-reply"
-	};
-	if (oe(l.exit) === "succeeded") return {
-		redriven: !1,
-		runReplyCleared: !1,
-		activitiesReset: 0,
-		reason: "succeeded"
-	};
-	let u = 0;
-	for (let e of n) {
-		let t = yield* a.requestIdForPrimaryKey({
-			address: s,
-			tag: "activity",
-			id: Q(e.name, e.attempt)
-		}).pipe(i.orElseSucceed(() => o.none()));
-		o.isSome(t) && (yield* r.reset(t.value)) && (u += 1);
-	}
-	let d = yield* r.reset(c.value);
-	return yield* r.pollStorage, {
-		redriven: !0,
-		runReplyCleared: d,
-		activitiesReset: u,
-		reason: null
-	};
-});
-//#endregion
-export { H as a, X as c, W as d, q as f, ie as i, Y as l, B as m, se as n, K as o, re as p, ce as r, G as s, Q as t, U as u };

package/dist/clusterDiagnostics-CNtl5LX9.js

@@ -1,20 +0,0 @@
-import { Context as e, Effect as t } from "effect";
-//#region src/clusterDiagnostics.ts
-var n = 6e5, r = class extends e.Tag("@voltro/workflow/ClusterDiagnostics")() {}, i = (e, n, r = Date.now()) => t.flatMap(e.messagesFor(n), (n) => {
-	if (n.length === 0) return t.succeed(void 0);
-	let i = [...new Set(n.filter((e) => !e.processed).map((e) => e.shardId))], a = i.length === 0 ? t.succeed([]) : e.shardLockHolders(i);
-	return t.map(a, (t) => ({
-		runner: e.ownAddress,
-		shardLockMode: e.shardLockMode,
-		messages: n.map((e) => ({
-			tag: e.tag,
-			shardId: e.shardId,
-			processed: e.processed,
-			lastRead: e.lastRead === null ? null : e.lastRead.toISOString(),
-			unreadForMs: !e.processed && e.lastRead !== null ? Math.max(0, r - e.lastRead.getTime()) : null
-		})),
-		shardLocks: t
-	}));
-});
-//#endregion
-export { r as n, i as r, n as t };