experimental-a2 0.17.0 → 0.18.1

package/dist/{store-presence-polling-Q1C-k2dd.js → store-presence-polling-B1ixeqIS.js}

@@ -1,5 +1,5 @@
-import { i as POLL_TIMINGS } from "./internal-CbVvEwad.js";
-import { t as defaultSleep } from "./store-polling-4_y8lETm.js";
+import { i as POLL_TIMINGS } from "./internal-CscSY7K_.js";
+import { t as defaultSleep } from "./store-polling-7WJV0YWP.js";
 //#region src/store-presence-polling.ts
 const key = ({ participant, field }) => JSON.stringify([participant, field]);
 function pollPresence({ read, deliver, sleep = defaultSleep }) {
@@ -91,4 +91,4 @@ function pollPresence({ read, deliver, sleep = defaultSleep }) {
 //#endregion
 export { pollPresence as t };
 
-//# sourceMappingURL=store-presence-polling-Q1C-k2dd.js.map
+//# sourceMappingURL=store-presence-polling-B1ixeqIS.js.map

package/dist/{store-presence-polling-Q1C-k2dd.js.map → store-presence-polling-B1ixeqIS.js.map}

@@ -1 +1 @@
-{"version":3,"file":"store-presence-polling-Q1C-k2dd.js","names":[],"sources":["../src/store-presence-polling.ts"],"sourcesContent":["import type { PresencePatch } from './contract.ts'\nimport { POLL_TIMINGS } from './internal.ts'\nimport { defaultSleep, type Sleeper } from './store-polling.ts'\nimport type { PresenceRow } from './store.ts'\n\nconst key = ({\n  participant,\n  field,\n}: Pick<PresenceRow, 'participant' | 'field'>): string =>\n  JSON.stringify([participant, field])\n\nexport function pollPresence({\n  read,\n  deliver,\n  sleep = defaultSleep,\n}: {\n  read: () => Promise<PresenceRow[]>\n  deliver: (patch: PresencePatch) => void\n  sleep?: (ms: number) => Sleeper\n}): {\n  ready: Promise<void>\n  update(patch: PresencePatch): void\n  wake(): void\n  stop(): void\n} {\n  let stopped = false\n  let pending: Sleeper | undefined\n  let interval = Math.min(\n    POLL_TIMINGS.activeFloorMs,\n    POLL_TIMINGS.idleCeilingMs,\n  )\n  let version = 0\n  const seen = new Map<string, Omit<PresenceRow, 'expiresAt'>>()\n  const activate = (): void => {\n    version += 1\n    interval = Math.min(POLL_TIMINGS.activeFloorMs, POLL_TIMINGS.idleCeilingMs)\n    pending?.cancel()\n  }\n  const ready = read()\n    .then((rows) => {\n      if (stopped) return\n      for (const row of rows) seen.set(key(row), row)\n      return undefined\n    })\n    // Seeding is best effort; foreground snapshots still report read errors.\n    .catch(() => undefined)\n\n  const run = async (): Promise<void> => {\n    await ready\n    for (;;) {\n      if (stopped) return\n      const before = version\n      pending = sleep(interval)\n      // oxlint-disable-next-line no-await-in-loop -- adaptive presence polling\n      await pending.promise\n      if (stopped) return\n      try {\n        const reading = version\n        // oxlint-disable-next-line no-await-in-loop -- read each new presence snapshot\n        const rows = await read()\n        if (stopped) return\n        if (version !== reading) continue\n        const live = new Set<string>()\n        let changed = false\n        for (const row of rows) {\n          const id = key(row)\n          live.add(id)\n          const prior = seen.get(id)\n          seen.set(id, row)\n          if (\n            prior?.seen === row.seen &&\n            prior.at.getTime() === row.at.getTime() &&\n            JSON.stringify(prior.value) === JSON.stringify(row.value)\n          )\n            continue\n          changed = true\n          deliver({\n            participant: row.participant,\n            values: { [row.field]: row.value },\n            seen: row.seen,\n            at: row.at,\n          })\n        }\n        for (const [id, row] of seen) {\n          if (live.has(id)) continue\n          seen.delete(id)\n          changed = true\n          deliver({\n            participant: row.participant,\n            values: { [row.field]: null },\n            seen: row.seen,\n            at: new Date(),\n          })\n        }\n        if (changed) activate()\n        else if (version === before)\n          interval = Math.min(interval * 2, POLL_TIMINGS.idleCeilingMs)\n      } catch {\n        interval = POLL_TIMINGS.idleCeilingMs\n      }\n    }\n  }\n  void run()\n  return {\n    ready,\n    wake: activate,\n    update(patch) {\n      for (const [field, value] of Object.entries(patch.values)) {\n        seen.set(key({ participant: patch.participant, field }), {\n          participant: patch.participant,\n          field,\n          value,\n          seen: patch.seen,\n          at: patch.at,\n        })\n      }\n      activate()\n    },\n    stop() {\n      stopped = true\n      pending?.cancel()\n      seen.clear()\n    },\n  }\n}\n"],"mappings":";;;AAKA,MAAM,OAAO,EACX,aACA,YAEA,KAAK,UAAU,CAAC,aAAa,KAAK,CAAC;AAErC,SAAgB,aAAa,EAC3B,MACA,SACA,QAAQ,gBAUR;CACA,IAAI,UAAU;CACd,IAAI;CACJ,IAAI,WAAW,KAAK,IAClB,aAAa,eACb,aAAa,aACf;CACA,IAAI,UAAU;CACd,MAAM,uBAAO,IAAI,IAA4C;CAC7D,MAAM,iBAAuB;EAC3B,WAAW;EACX,WAAW,KAAK,IAAI,aAAa,eAAe,aAAa,aAAa;EAC1E,SAAS,OAAO;CAClB;CACA,MAAM,QAAQ,KAAK,CAAC,CACjB,MAAM,SAAS;EACd,IAAI,SAAS;EACb,KAAK,MAAM,OAAO,MAAM,KAAK,IAAI,IAAI,GAAG,GAAG,GAAG;CAEhD,CAAC,CAAC,CAED,YAAY,KAAA,CAAS;CAExB,MAAM,MAAM,YAA2B;EACrC,MAAM;EACN,SAAS;GACP,IAAI,SAAS;GACb,MAAM,SAAS;GACf,UAAU,MAAM,QAAQ;GAExB,MAAM,QAAQ;GACd,IAAI,SAAS;GACb,IAAI;IACF,MAAM,UAAU;IAEhB,MAAM,OAAO,MAAM,KAAK;IACxB,IAAI,SAAS;IACb,IAAI,YAAY,SAAS;IACzB,MAAM,uBAAO,IAAI,IAAY;IAC7B,IAAI,UAAU;IACd,KAAK,MAAM,OAAO,MAAM;KACtB,MAAM,KAAK,IAAI,GAAG;KAClB,KAAK,IAAI,EAAE;KACX,MAAM,QAAQ,KAAK,IAAI,EAAE;KACzB,KAAK,IAAI,IAAI,GAAG;KAChB,IACE,OAAO,SAAS,IAAI,QACpB,MAAM,GAAG,QAAQ,MAAM,IAAI,GAAG,QAAQ,KACtC,KAAK,UAAU,MAAM,KAAK,MAAM,KAAK,UAAU,IAAI,KAAK,GAExD;KACF,UAAU;KACV,QAAQ;MACN,aAAa,IAAI;MACjB,QAAQ,GAAG,IAAI,QAAQ,IAAI,MAAM;MACjC,MAAM,IAAI;MACV,IAAI,IAAI;KACV,CAAC;IACH;IACA,KAAK,MAAM,CAAC,IAAI,QAAQ,MAAM;KAC5B,IAAI,KAAK,IAAI,EAAE,GAAG;KAClB,KAAK,OAAO,EAAE;KACd,UAAU;KACV,QAAQ;MACN,aAAa,IAAI;MACjB,QAAQ,GAAG,IAAI,QAAQ,KAAK;MAC5B,MAAM,IAAI;MACV,oBAAI,IAAI,KAAK;KACf,CAAC;IACH;IACA,IAAI,SAAS,SAAS;SACjB,IAAI,YAAY,QACnB,WAAW,KAAK,IAAI,WAAW,GAAG,aAAa,aAAa;GAChE,QAAQ;IACN,WAAW,aAAa;GAC1B;EACF;CACF;CACA,IAAS;CACT,OAAO;EACL;EACA,MAAM;EACN,OAAO,OAAO;GACZ,KAAK,MAAM,CAAC,OAAO,UAAU,OAAO,QAAQ,MAAM,MAAM,GACtD,KAAK,IAAI,IAAI;IAAE,aAAa,MAAM;IAAa;GAAM,CAAC,GAAG;IACvD,aAAa,MAAM;IACnB;IACA;IACA,MAAM,MAAM;IACZ,IAAI,MAAM;GACZ,CAAC;GAEH,SAAS;EACX;EACA,OAAO;GACL,UAAU;GACV,SAAS,OAAO;GAChB,KAAK,MAAM;EACb;CACF;AACF"}
+{"version":3,"file":"store-presence-polling-B1ixeqIS.js","names":[],"sources":["../src/store-presence-polling.ts"],"sourcesContent":["import type { PresencePatch } from './contract.ts'\nimport { POLL_TIMINGS } from './internal.ts'\nimport { defaultSleep, type Sleeper } from './store-polling.ts'\nimport type { PresenceRow } from './store.ts'\n\nconst key = ({\n  participant,\n  field,\n}: Pick<PresenceRow, 'participant' | 'field'>): string =>\n  JSON.stringify([participant, field])\n\nexport function pollPresence({\n  read,\n  deliver,\n  sleep = defaultSleep,\n}: {\n  read: () => Promise<PresenceRow[]>\n  deliver: (patch: PresencePatch) => void\n  sleep?: (ms: number) => Sleeper\n}): {\n  ready: Promise<void>\n  update(patch: PresencePatch): void\n  wake(): void\n  stop(): void\n} {\n  let stopped = false\n  let pending: Sleeper | undefined\n  let interval = Math.min(\n    POLL_TIMINGS.activeFloorMs,\n    POLL_TIMINGS.idleCeilingMs,\n  )\n  let version = 0\n  const seen = new Map<string, Omit<PresenceRow, 'expiresAt'>>()\n  const activate = (): void => {\n    version += 1\n    interval = Math.min(POLL_TIMINGS.activeFloorMs, POLL_TIMINGS.idleCeilingMs)\n    pending?.cancel()\n  }\n  const ready = read()\n    .then((rows) => {\n      if (stopped) return\n      for (const row of rows) seen.set(key(row), row)\n      return undefined\n    })\n    // Seeding is best effort; foreground snapshots still report read errors.\n    .catch(() => undefined)\n\n  const run = async (): Promise<void> => {\n    await ready\n    for (;;) {\n      if (stopped) return\n      const before = version\n      pending = sleep(interval)\n      // oxlint-disable-next-line no-await-in-loop -- adaptive presence polling\n      await pending.promise\n      if (stopped) return\n      try {\n        const reading = version\n        // oxlint-disable-next-line no-await-in-loop -- read each new presence snapshot\n        const rows = await read()\n        if (stopped) return\n        if (version !== reading) continue\n        const live = new Set<string>()\n        let changed = false\n        for (const row of rows) {\n          const id = key(row)\n          live.add(id)\n          const prior = seen.get(id)\n          seen.set(id, row)\n          if (\n            prior?.seen === row.seen &&\n            prior.at.getTime() === row.at.getTime() &&\n            JSON.stringify(prior.value) === JSON.stringify(row.value)\n          )\n            continue\n          changed = true\n          deliver({\n            participant: row.participant,\n            values: { [row.field]: row.value },\n            seen: row.seen,\n            at: row.at,\n          })\n        }\n        for (const [id, row] of seen) {\n          if (live.has(id)) continue\n          seen.delete(id)\n          changed = true\n          deliver({\n            participant: row.participant,\n            values: { [row.field]: null },\n            seen: row.seen,\n            at: new Date(),\n          })\n        }\n        if (changed) activate()\n        else if (version === before)\n          interval = Math.min(interval * 2, POLL_TIMINGS.idleCeilingMs)\n      } catch {\n        interval = POLL_TIMINGS.idleCeilingMs\n      }\n    }\n  }\n  void run()\n  return {\n    ready,\n    wake: activate,\n    update(patch) {\n      for (const [field, value] of Object.entries(patch.values)) {\n        seen.set(key({ participant: patch.participant, field }), {\n          participant: patch.participant,\n          field,\n          value,\n          seen: patch.seen,\n          at: patch.at,\n        })\n      }\n      activate()\n    },\n    stop() {\n      stopped = true\n      pending?.cancel()\n      seen.clear()\n    },\n  }\n}\n"],"mappings":";;;AAKA,MAAM,OAAO,EACX,aACA,YAEA,KAAK,UAAU,CAAC,aAAa,KAAK,CAAC;AAErC,SAAgB,aAAa,EAC3B,MACA,SACA,QAAQ,gBAUR;CACA,IAAI,UAAU;CACd,IAAI;CACJ,IAAI,WAAW,KAAK,IAClB,aAAa,eACb,aAAa,aACf;CACA,IAAI,UAAU;CACd,MAAM,uBAAO,IAAI,IAA4C;CAC7D,MAAM,iBAAuB;EAC3B,WAAW;EACX,WAAW,KAAK,IAAI,aAAa,eAAe,aAAa,aAAa;EAC1E,SAAS,OAAO;CAClB;CACA,MAAM,QAAQ,KAAK,CAAC,CACjB,MAAM,SAAS;EACd,IAAI,SAAS;EACb,KAAK,MAAM,OAAO,MAAM,KAAK,IAAI,IAAI,GAAG,GAAG,GAAG;CAEhD,CAAC,CAAC,CAED,YAAY,KAAA,CAAS;CAExB,MAAM,MAAM,YAA2B;EACrC,MAAM;EACN,SAAS;GACP,IAAI,SAAS;GACb,MAAM,SAAS;GACf,UAAU,MAAM,QAAQ;GAExB,MAAM,QAAQ;GACd,IAAI,SAAS;GACb,IAAI;IACF,MAAM,UAAU;IAEhB,MAAM,OAAO,MAAM,KAAK;IACxB,IAAI,SAAS;IACb,IAAI,YAAY,SAAS;IACzB,MAAM,uBAAO,IAAI,IAAY;IAC7B,IAAI,UAAU;IACd,KAAK,MAAM,OAAO,MAAM;KACtB,MAAM,KAAK,IAAI,GAAG;KAClB,KAAK,IAAI,EAAE;KACX,MAAM,QAAQ,KAAK,IAAI,EAAE;KACzB,KAAK,IAAI,IAAI,GAAG;KAChB,IACE,OAAO,SAAS,IAAI,QACpB,MAAM,GAAG,QAAQ,MAAM,IAAI,GAAG,QAAQ,KACtC,KAAK,UAAU,MAAM,KAAK,MAAM,KAAK,UAAU,IAAI,KAAK,GAExD;KACF,UAAU;KACV,QAAQ;MACN,aAAa,IAAI;MACjB,QAAQ,GAAG,IAAI,QAAQ,IAAI,MAAM;MACjC,MAAM,IAAI;MACV,IAAI,IAAI;KACV,CAAC;IACH;IACA,KAAK,MAAM,CAAC,IAAI,QAAQ,MAAM;KAC5B,IAAI,KAAK,IAAI,EAAE,GAAG;KAClB,KAAK,OAAO,EAAE;KACd,UAAU;KACV,QAAQ;MACN,aAAa,IAAI;MACjB,QAAQ,GAAG,IAAI,QAAQ,KAAK;MAC5B,MAAM,IAAI;MACV,oBAAI,IAAI,KAAK;KACf,CAAC;IACH;IACA,IAAI,SAAS,SAAS;SACjB,IAAI,YAAY,QACnB,WAAW,KAAK,IAAI,WAAW,GAAG,aAAa,aAAa;GAChE,QAAQ;IACN,WAAW,aAAa;GAC1B;EACF;CACF;CACA,IAAS;CACT,OAAO;EACL;EACA,MAAM;EACN,OAAO,OAAO;GACZ,KAAK,MAAM,CAAC,OAAO,UAAU,OAAO,QAAQ,MAAM,MAAM,GACtD,KAAK,IAAI,IAAI;IAAE,aAAa,MAAM;IAAa;GAAM,CAAC,GAAG;IACvD,aAAa,MAAM;IACnB;IACA;IACA,MAAM,MAAM;IACZ,IAAI,MAAM;GACZ,CAAC;GAEH,SAAS;EACX;EACA,OAAO;GACL,UAAU;GACV,SAAS,OAAO;GAChB,KAAK,MAAM;EACb;CACF;AACF"}

package/dist/store-redis-http.d.ts

@@ -1,4 +1,4 @@
-import { r as Clock, s as IdSource, t as A2Store } from "./store-Gpkq7WBo.js";
+import { r as Clock, s as IdSource, t as A2Store } from "./store-CyLUy86v.js";
 //#region src/store-redis-http.d.ts
 type RedisHttpStoreOptions = {
   /** REST endpoint, e.g. `process.env.UPSTASH_REDIS_REST_URL`. */

package/dist/store-redis-http.js

@@ -1,8 +1,8 @@
 import { i as A2Error } from "./session-clear-DGI4jTQ5.js";
-import { r as NOTIFY_TIMINGS } from "./internal-CbVvEwad.js";
-import { t as defaultSleep } from "./store-polling-4_y8lETm.js";
+import { r as NOTIFY_TIMINGS } from "./internal-CscSY7K_.js";
+import { t as defaultSleep } from "./store-polling-7WJV0YWP.js";
 import { n as SYSTEM_CLOCK, t as RANDOM_IDS } from "./store-N8PXxDAS.js";
-import { t as createRedisNotifyStore } from "./store-redis-notify-tqWNnMRu.js";
+import { t as createRedisNotifyStore } from "./store-redis-notify-CM0AfLY0.js";
 //#region src/redis-http-subscriptions.ts
 function redisHttpSubscriptions({ url, token, onReconnect, fallback }) {
 	const subscriptions = /* @__PURE__ */ new Map();

package/dist/{store-redis-notify-tqWNnMRu.js → store-redis-notify-CM0AfLY0.js}

@@ -1,10 +1,10 @@
 import { i as A2Error, r as sessionClearedError, s as supersededAttemptError, t as CLEAR_EVENT_TYPE } from "./session-clear-DGI4jTQ5.js";
-import { g as nullProtoRecord, r as NOTIFY_TIMINGS, v as stateTailReaders } from "./internal-CbVvEwad.js";
-import { i as streamActivities, n as pollingStream, r as createStreamActivity, t as defaultSleep } from "./store-polling-4_y8lETm.js";
+import { _ as nullProtoRecord, r as NOTIFY_TIMINGS, y as stateTailReaders } from "./internal-CscSY7K_.js";
+import { i as streamActivities, n as pollingStream, r as createStreamActivity, t as defaultSleep } from "./store-polling-7WJV0YWP.js";
 import { n as isSerializedEvent, r as parseSerializedEvent, t as bufferedEvents } from "./stream-buffer-Cx7AAPGq.js";
 import { t as idempotentReplay } from "./idempotent-replay-JdgMQRRm.js";
 import { t as decodeReturnedEventIds } from "./store-codec-DTG0Ftek.js";
-import { t as pollPresence } from "./store-presence-polling-Q1C-k2dd.js";
+import { t as pollPresence } from "./store-presence-polling-B1ixeqIS.js";
 //#region src/presence-recovery.ts
 const key = ({ participant, field }) => JSON.stringify([participant, field]);
 function presenceRecovery({ read, deliver, isActive }) {
@@ -102,6 +102,22 @@ function presenceRecovery({ read, deliver, isActive }) {
 const FEED_PAGE_SIZE = 1e3;
 const READ_CONCURRENCY = 16;
 const META_CHUNK_SIZE = 1e3;
+/** The metadata columns of a full stored row. */
+const STORED_EVENT_META_SUFFIXES = [
+	"p",
+	"pa",
+	"ri",
+	"ch",
+	"ce",
+	"f",
+	"fc",
+	"lc",
+	"lf",
+	"lfa",
+	"d",
+	"a",
+	"e"
+];
 /**
 * Upstash bills every call a script makes, so scripts read the counter and
 * split with one MGET, read metadata with one HMGET per hash (`read_fields`),
@@ -256,6 +272,32 @@ local function flush_queue()
 end
 `;
 /**
+* Settles one unfinished event for scripts that include ENQUEUE_LUA: it
+* leaves the pending and ready sets, and a lane head hands its lane to the
+* next unfinished event. A dead-lettered successor stays out of the ready set.
+*/
+const SETTLE_LUA = `
+local function settle(field, lane, next_field)
+  redis.call('ZREM', PENDING, field)
+  redis.call('ZREM', READY, field)
+  if lane == '' then return end
+  local head_key = lane_field(lane, 'head')
+  if redis.call('HGET', META, head_key) ~= field then return end
+  while next_field do
+    local row = read_fields({ next_field }, { 'p', 'f', 'next' })[next_field]
+    if not row[1] then
+      redis.call('HSET', META, head_key, next_field)
+      if not row[2] then
+        redis.call('ZADD', READY, tonumber(next_field), next_field)
+      end
+      return
+    end
+    next_field = row[3]
+  end
+  clear_lane(lane)
+end
+`;
+/**
 * Event-id ownership for scripts that add events. Each script reads the
 * counter, split, clear boundary, and per-id keys with one MGET and applies
 * the first three. Returns the owner record, or false, per event, and the
@@ -422,7 +464,7 @@ return { 'ok', tostring(base + 1), pending_after }
 /**
 * KEYS: counter, meta, pending, ready, event snapshot pins, snapshot pin counts,
 * metadata split.
-* ARGV: idx, attempt, error, maxFailures, nowMs.
+* ARGV: idx, attempt, error, maxFailures, nowMs, retryAtMs ('' for none).
 */
 const FAIL_ATTEMPT_LUA = `
 local COUNTER, META, SPLIT = KEYS[1], KEYS[2], KEYS[7]
@@ -454,8 +496,14 @@ put(meta_key, field .. ':e', ARGV[3])
 put(meta_key, field .. ':lf', ARGV[5])
 put(meta_key, field .. ':lfa', ARGV[2])
 if dead then put(meta_key, field .. ':f', ARGV[5]) end
+local hold = not dead and ARGV[6] ~= ''
+if hold then put(meta_key, field .. ':ce', ARGV[6]) end
 flush()
-redis.call('HDEL', meta_key, field .. ':ch', field .. ':ce')
+if hold then
+  redis.call('HDEL', meta_key, field .. ':ch')
+else
+  redis.call('HDEL', meta_key, field .. ':ch', field .. ':ce')
+end
 if dead then
   redis.call('ZREM', KEYS[4], field)
   release_snapshot_pins(KEYS[5], KEYS[6])
@@ -464,23 +512,29 @@ end
 return { 'failed', tostring(failures) }
 `;
 /**
-* KEYS: store, counter, meta, pending, ready, metadata split.
-* ARGV: holder, nowMs, expiresAtMs, excludedCount, excluded indexes.
+* KEYS: store, counter, meta, pending, ready, metadata split, snapshot pin
+* counts.
+* ARGV: holder, nowMs, expiresAtMs, excludedCount, excluded indexes, then
+* maxFailures ('' for none) and the event snapshot-pins key prefix.
 * The ready set is a subset of the pending set, so an empty ready set is
 * enough to report 'settled'. A claimed result ends with the clear boundary.
 */
 const CLAIM_AVAILABLE_LUA = `
 local COUNTER, META, SPLIT = KEYS[2], KEYS[3], KEYS[6]
 ${META_LUA}
+${RELEASE_PINS_LUA}
 local ready = redis.call('ZRANGE', KEYS[5], 0, -1)
 local excluded = {}
+local tail = 5 + tonumber(ARGV[4])
 for i = 1, tonumber(ARGV[4]) do excluded[ARGV[4 + i]] = true end
+local max_failures = tonumber(ARGV[tail])
 local candidates = {}
 for _, field in ipairs(ready) do
   if not excluded[field] then candidates[#candidates + 1] = field end
 end
 local rows = read_fields(candidates, { 'ce', 'd', 'fc', 'a', 'e', 'lf', 'lfa' })
 local claimed = {}
+local dead = {}
 local retry_at = nil
 for _, field in ipairs(candidates) do
   local row = rows[field]
@@ -490,29 +544,63 @@ for _, field in ipairs(candidates) do
   else
     local entries = redis.call('XRANGE', KEYS[1], field .. '-0', field .. '-0')
     if #entries == 0 then return { 'missing', field } end
-    local attempt = tostring(tonumber(row[2] or '0') + 1)
-    local first_claimed = row[3] or ARGV[2]
     local meta_key = mkey(field)
+    local attempt = tostring(tonumber(row[2] or '0') + 1)
+    -- An expiry that is not the current attempt's retry hold is a lapsed
+    -- claim: its attempt never finished.
+    local lapsed = row[1] and row[7] ~= row[2]
+    local failures = tonumber(row[4] or '0')
+    if lapsed then
+      failures = failures + 1
+      put(meta_key, field .. ':a', tostring(failures))
+    end
     put(meta_key, field .. ':d', attempt)
-    put(meta_key, field .. ':fc', first_claimed)
-    put(meta_key, field .. ':lc', ARGV[2])
-    put(meta_key, field .. ':ch', ARGV[1])
-    put(meta_key, field .. ':ce', ARGV[3])
-    claimed[#claimed + 1] = {
-      attempt,
-      row[4] or '0',
-      row[5] or false,
-      first_claimed,
-      ARGV[2],
-      row[6] or false,
-      row[7] or false,
-      ARGV[1],
-      ARGV[3],
-      entries[1]
-    }
+    if lapsed and max_failures and failures >= max_failures then
+      -- That takeover spent the last failed attempt: dead-letter, unclaimed.
+      -- Advancing the attempt fences the lapsed one; nothing runs.
+      put(meta_key, field .. ':f', ARGV[2])
+      dead[#dead + 1] = field
+      claimed[#claimed + 1] = {
+        attempt,
+        tostring(failures),
+        row[5] or false,
+        row[3] or false,
+        read_fields({ field }, { 'lc' })[field][1] or false,
+        row[6] or false,
+        row[7] or false,
+        false,
+        false,
+        entries[1],
+        ARGV[2]
+      }
+    else
+      local first_claimed = row[3] or ARGV[2]
+      put(meta_key, field .. ':fc', first_claimed)
+      put(meta_key, field .. ':lc', ARGV[2])
+      put(meta_key, field .. ':ch', ARGV[1])
+      put(meta_key, field .. ':ce', ARGV[3])
+      claimed[#claimed + 1] = {
+        attempt,
+        tostring(failures),
+        row[5] or false,
+        first_claimed,
+        ARGV[2],
+        row[6] or false,
+        row[7] or false,
+        ARGV[1],
+        ARGV[3],
+        entries[1],
+        false
+      }
+    end
   end
 end
 flush()
+for _, field in ipairs(dead) do
+  redis.call('HDEL', mkey(field), field .. ':ch', field .. ':ce')
+  redis.call('ZREM', KEYS[5], field)
+  release_snapshot_pins(ARGV[tail + 1] .. field, KEYS[7])
+end
 if #claimed > 0 then
   local result = { 'claimed', tostring(#claimed) }
   for _, claim in ipairs(claimed) do
@@ -580,25 +668,7 @@ ${ENQUEUE_LUA}
 ${ID_OWNERS_LUA}
 ${RELEASE_PINS_LUA}
 ${WAKE_LUA}
-local function settle(field, lane, next_field)
-  redis.call('ZREM', PENDING, field)
-  redis.call('ZREM', READY, field)
-  if lane == '' then return end
-  local head_key = lane_field(lane, 'head')
-  if redis.call('HGET', META, head_key) ~= field then return end
-  while next_field do
-    local row = read_fields({ next_field }, { 'p', 'f', 'next' })[next_field]
-    if not row[1] then
-      redis.call('HSET', META, head_key, next_field)
-      if not row[2] then
-        redis.call('ZADD', READY, tonumber(next_field), next_field)
-      end
-      return
-    end
-    next_field = row[3]
-  end
-  clear_lane(lane)
-end
+${SETTLE_LUA}
 local parent = ARGV[3]
 local attempt = tonumber(ARGV[4])
 local n = tonumber(ARGV[5])
@@ -684,6 +754,76 @@ if n > 0 then wake(ARGV[6 + n * 5], tostring(total + n), ARGV[2]) end
 return { 'ok', tostring(total + 1) }
 `;
 /**
+* KEYS: counter, meta, pending, ready, metadata split.
+* ARGV: idx, action ('retry' | 'skip'), nowMs.
+* Returns [redriven, hasPending]. Acts only on an unfinished, dead-lettered
+* event above the clear boundary. A retry keeps the event pending and makes
+* it ready again when it is unlaned or its lane's head.
+*/
+const REDRIVE_LUA = `
+local COUNTER, META, SPLIT, PENDING, READY = KEYS[1], KEYS[2], KEYS[5], KEYS[3], KEYS[4]
+${META_LUA}
+${ENQUEUE_LUA}
+${SETTLE_LUA}
+local function result(redriven)
+  return { redriven, redis.call('ZCARD', PENDING) > 0 and '1' or '0' }
+end
+local counts = redis.call('MGET', COUNTER, SPLIT, CLEAR)
+local total = tonumber(counts[1] or '0')
+use_split(counts[2], counts[1], counts[3])
+local idx = tonumber(ARGV[1])
+if idx <= boundary or idx > total then return result('0') end
+local field = tostring(idx)
+local row = read_fields({ field }, { 'p', 'f', 'l', 'next' })[field]
+if row[1] or not row[2] then return result('0') end
+local meta_key = mkey(field)
+local lane = row[3] or ''
+if ARGV[2] == 'skip' then
+  put(meta_key, field .. ':p', ARGV[3])
+  settle(field, lane, row[4])
+  flush_queue()
+  flush()
+else
+  redis.call('HDEL', meta_key, field .. ':f', field .. ':a')
+  if lane == '' or redis.call('HGET', META, lane_field(lane, 'head')) == field then
+    redis.call('ZADD', READY, idx, field)
+  end
+end
+return result('1')
+`;
+/**
+* KEYS: store, counter, meta, pending, metadata split.
+* Returns the dead-lettered events above the clear boundary, oldest first,
+* as pairs of a stream entry and its STORED_EVENT_META_SUFFIXES columns.
+* Every unfinished event is in the pending set, so the scan is bounded by
+* unfinished work, not history; only dead letters read their full columns.
+*/
+const DEAD_LETTERS_LUA = `
+local COUNTER, META, SPLIT = KEYS[2], KEYS[3], KEYS[5]
+${META_LUA}
+local counts = redis.call('MGET', COUNTER, SPLIT, CLEAR)
+use_split(counts[2], counts[1], counts[3])
+local candidates = {}
+for _, field in ipairs(redis.call('ZRANGE', KEYS[4], 0, -1)) do
+  if tonumber(field) > boundary then candidates[#candidates + 1] = field end
+end
+local status = read_fields(candidates, { 'p', 'f' })
+local dead = {}
+for _, field in ipairs(candidates) do
+  if status[field][2] and not status[field][1] then dead[#dead + 1] = field end
+end
+local rows = read_fields(dead, { ${STORED_EVENT_META_SUFFIXES.map((suffix) => `'${suffix}'`).join(", ")} })
+local result = {}
+for _, field in ipairs(dead) do
+  local entries = redis.call('XRANGE', KEYS[1], field .. '-0', field .. '-0')
+  if #entries > 0 then
+    result[#result + 1] = entries[1]
+    result[#result + 1] = rows[field]
+  end
+end
+return result
+`;
+/**
 * KEYS: head, history, event counter, event meta, pin counts, metadata split.
 * ARGV: nowMs, event pin key prefix, write count, then per write:
 * index, snapshot JSON, pin count, pin event indexes; finally the reducer
@@ -1070,21 +1210,6 @@ const fieldMap = (fields) => {
 	for (let i = 0; i + 1 < fields.length; i += 2) map[fields[i]] = fields[i + 1];
 	return map;
 };
-const STORED_EVENT_META_SUFFIXES = [
-	"p",
-	"pa",
-	"ri",
-	"ch",
-	"ce",
-	"f",
-	"fc",
-	"lc",
-	"lf",
-	"lfa",
-	"d",
-	"a",
-	"e"
-];
 const entryIndex = (entryId) => Number(entryId.slice(0, entryId.indexOf("-")));
 const toEvent = (sessionId, entry) => {
 	const fields = fieldMap(entry[1]);
@@ -1153,13 +1278,43 @@ const toCause = (raw) => {
 		...value.batchSize === void 0 ? {} : { batchSize: Number(value.batchSize) }
 	};
 };
+/** A stream entry joined with its metadata columns; absent columns are unset. */
+const toStoredEvent = (sessionId, entry, column) => {
+	const fields = fieldMap(entry[1]);
+	const date = (suffix) => {
+		const value = column(suffix);
+		return value === void 0 ? null : new Date(Number(value));
+	};
+	const count = (suffix) => {
+		const value = column(suffix);
+		return value === void 0 ? null : Number(value);
+	};
+	const returnedEventIds = column("ri");
+	return Object.assign(toEvent(sessionId, entry), {
+		cause: toCause(fields["cause"]),
+		lane: fields["lane"] === "" ? null : fields["lane"],
+		processedAt: date("p"),
+		processedByAttempt: count("pa"),
+		returnedEventIds: returnedEventIds === void 0 ? null : decodeReturnedEventIds(returnedEventIds),
+		firstClaimedAt: date("fc"),
+		lastClaimedAt: date("lc"),
+		attemptCount: count("d") ?? 0,
+		claimHolder: column("ch") ?? null,
+		claimExpiresAt: date("ce"),
+		failureCount: count("a") ?? 0,
+		lastFailedAt: date("lf"),
+		lastFailedAttempt: count("lfa"),
+		lastError: column("e") ?? null,
+		failedAt: date("f")
+	});
+};
 const toClaimAvailableResult = (sessionId, reply) => {
 	const outcome = String(reply[0]);
 	if (outcome === "claimed") {
 		const count = Number(reply[1]);
 		const events = [];
 		for (let i = 0; i < count; i++) {
-			const offset = 2 + i * 10;
+			const offset = 2 + i * 11;
 			const entry = reply[offset + 9];
 			const event = toEvent(sessionId, entry);
 			const fields = fieldMap(entry[1]);
@@ -1170,18 +1325,18 @@ const toClaimAvailableResult = (sessionId, reply) => {
 				processedByAttempt: null,
 				returnedEventIds: null,
 				firstClaimedAt: reply[offset + 3] === null ? null : new Date(Number(reply[offset + 3])),
-				lastClaimedAt: new Date(Number(reply[offset + 4])),
+				lastClaimedAt: reply[offset + 4] === null ? null : new Date(Number(reply[offset + 4])),
 				attemptCount: Number(reply[offset]),
-				claimHolder: String(reply[offset + 7]),
-				claimExpiresAt: new Date(Number(reply[offset + 8])),
+				claimHolder: reply[offset + 7] === null ? null : String(reply[offset + 7]),
+				claimExpiresAt: reply[offset + 8] === null ? null : new Date(Number(reply[offset + 8])),
 				failureCount: Number(reply[offset + 1]),
 				lastFailedAt: reply[offset + 5] === null ? null : new Date(Number(reply[offset + 5])),
 				lastFailedAttempt: reply[offset + 6] === null ? null : Number(reply[offset + 6]),
 				lastError: reply[offset + 2] === null ? null : String(reply[offset + 2]),
-				failedAt: null
+				failedAt: reply[offset + 10] === null ? null : new Date(Number(reply[offset + 10]))
 			}));
 		}
-		const clearIndex = Number(reply[2 + count * 10] ?? 0);
+		const clearIndex = Number(reply[2 + count * 11] ?? 0);
 		if (clearIndex > 0) for (const event of events) event.clearIndex = clearIndex;
 		return {
 			outcome: "claimed",
@@ -1295,36 +1450,8 @@ function createRedisStoreCore(options) {
 			}
 		}
 		return entries.map((entry) => {
-			const event = toEvent(sessionId, entry);
-			const idx = event.index;
-			const fields = fieldMap(entry[1]);
-			const processedAt = meta[`${idx}:p`];
-			const processedByAttempt = meta[`${idx}:pa`];
-			const returnedEventIds = meta[`${idx}:ri`];
-			const claimHolder = meta[`${idx}:ch`];
-			const claimExpiresAt = meta[`${idx}:ce`];
-			const failedAt = meta[`${idx}:f`];
-			const firstClaimedAt = meta[`${idx}:fc`];
-			const lastClaimedAt = meta[`${idx}:lc`];
-			const lastFailedAt = meta[`${idx}:lf`];
-			const lastFailedAttempt = meta[`${idx}:lfa`];
-			return Object.assign(event, {
-				cause: toCause(fields["cause"]),
-				lane: fields["lane"] === "" ? null : fields["lane"],
-				processedAt: processedAt === void 0 ? null : new Date(Number(processedAt)),
-				processedByAttempt: processedByAttempt === void 0 ? null : Number(processedByAttempt),
-				returnedEventIds: returnedEventIds === void 0 ? null : decodeReturnedEventIds(returnedEventIds),
-				firstClaimedAt: firstClaimedAt === void 0 ? null : new Date(Number(firstClaimedAt)),
-				lastClaimedAt: lastClaimedAt === void 0 ? null : new Date(Number(lastClaimedAt)),
-				attemptCount: Number(meta[`${idx}:d`] ?? 0),
-				claimHolder: claimHolder ?? null,
-				claimExpiresAt: claimExpiresAt === void 0 ? null : new Date(Number(claimExpiresAt)),
-				failureCount: Number(meta[`${idx}:a`] ?? 0),
-				lastFailedAt: lastFailedAt === void 0 ? null : new Date(Number(lastFailedAt)),
-				lastFailedAttempt: lastFailedAttempt === void 0 ? null : Number(lastFailedAttempt),
-				lastError: meta[`${idx}:e`] ?? null,
-				failedAt: failedAt === void 0 ? null : new Date(Number(failedAt))
-			});
+			const idx = entryIndex(entry[0]);
+			return toStoredEvent(sessionId, entry, (suffix) => meta[`${idx}:${suffix}`]);
 		});
 	};
 	const readEventPages = async (sessionId, afterIndex, throughIndex) => {
@@ -1518,7 +1645,7 @@ function createRedisStoreCore(options) {
 				return readEventRange(sessionId, Math.max(after, clearIndex - 1), Math.min(opts?.throughIndex ?? frontier, frontier));
 			}));
 		},
-		async claimAvailable({ sessionId, holder, ttlMs, expiresAtMs, excludeIndexes }) {
+		async claimAvailable({ sessionId, holder, ttlMs, expiresAtMs, excludeIndexes, maxFailures }) {
 			return wrap(async () => {
 				const now = clock.now().getTime();
 				const expiresAt = expiresAtMs ?? now + ttlMs;
@@ -1529,13 +1656,16 @@ function createRedisStoreCore(options) {
 					metaKey(sessionId),
 					pendingKey(sessionId),
 					readyKey(sessionId),
-					metaSplitKey(sessionId)
+					metaSplitKey(sessionId),
+					snapshotPinCountsKey(sessionId)
 				], [
 					holder,
 					now,
 					expiresAt,
 					excluded.length,
-					...excluded
+					...excluded,
+					maxFailures ?? "",
+					snapshotEventPinsPrefix(sessionId)
 				]);
 				return toClaimAvailableResult(sessionId, reply);
 			});
@@ -1646,8 +1776,9 @@ function createRedisStoreCore(options) {
 				throw new TypeError(`unexpected completion outcome '${outcome}'`);
 			});
 		},
-		async failAttempt({ sessionId, index, attempt, error, maxFailures }) {
+		async failAttempt({ sessionId, index, attempt, error, maxFailures, retryAfterMs }) {
 			return wrap(async () => {
+				const now = clock.now().getTime();
 				const reply = await evalScript(FAIL_ATTEMPT_LUA, [
 					countKey(sessionId),
 					metaKey(sessionId),
@@ -1661,7 +1792,8 @@ function createRedisStoreCore(options) {
 					attempt,
 					error,
 					maxFailures,
-					clock.now().getTime()
+					now,
+					retryAfterMs === void 0 ? "" : now + retryAfterMs
 				]);
 				const outcome = reply[0];
 				if (outcome === "cleared") return {
@@ -1675,6 +1807,42 @@ function createRedisStoreCore(options) {
 				};
 			});
 		},
+		async deadLetters(sessionId) {
+			return wrap(async () => {
+				const reply = await evalScript(DEAD_LETTERS_LUA, [
+					storeKey(sessionId),
+					countKey(sessionId),
+					metaKey(sessionId),
+					pendingKey(sessionId),
+					metaSplitKey(sessionId)
+				], []);
+				const events = [];
+				for (let i = 0; i + 1 < reply.length; i += 2) {
+					const columns = reply[i + 1];
+					events.push(toStoredEvent(sessionId, reply[i], (suffix) => columns[STORED_EVENT_META_SUFFIXES.indexOf(suffix)] ?? void 0));
+				}
+				return events;
+			});
+		},
+		async redrive({ sessionId, index, action }) {
+			return wrap(async () => {
+				const [redriven, hasPending] = await evalScript(REDRIVE_LUA, [
+					countKey(sessionId),
+					metaKey(sessionId),
+					pendingKey(sessionId),
+					readyKey(sessionId),
+					metaSplitKey(sessionId)
+				], [
+					index,
+					action,
+					clock.now().getTime()
+				]);
+				return {
+					redriven: redriven === "1",
+					hasPending: hasPending === "1"
+				};
+			});
+		},
 		async readState(sessionId, reducerName, stateOptions) {
 			return wrap(() => retryAfterGap(async () => {
 				const reply = await evalScript(READ_STATE_LUA, [
@@ -2084,6 +2252,8 @@ function createRedisNotifyStore(options) {
 		putSnapshots: core.putSnapshots,
 		clear: core.clear,
 		reclaim: core.reclaim,
+		deadLetters: core.deadLetters,
+		redrive: core.redrive,
 		presence: {
 			async set(ns, participant, values, meta) {
 				const patch = await core.presence.set(ns, participant, values, meta);
@@ -2371,4 +2541,4 @@ function createRedisNotifyStore(options) {
 //#endregion
 export { createRedisNotifyStore as t };
 
-//# sourceMappingURL=store-redis-notify-tqWNnMRu.js.map
+//# sourceMappingURL=store-redis-notify-CM0AfLY0.js.map