queue-inspector-mcp 0.1.0

package/dist/backends/lua/removeJob.lua

@@ -0,0 +1,346 @@
+-- Vendored verbatim from BullMQ (github.com/taskforcesh/bullmq, MIT license),
+-- assembled script `removeJob`, version 5.79.3. This is the exact atomic script
+-- Job.remove() runs. It handles children, locks and deduplication keys, so it is
+-- used as-is rather than reimplemented, to avoid leaving a queue in a broken state.
+--[[
+    Remove a job from all the statuses it may be in as well as all its data.
+    In order to be able to remove a job, it cannot be active.
+    Input:
+      KEYS[1] jobKey
+      KEYS[2] repeat key
+      ARGV[1] jobId
+      ARGV[2] remove children
+      ARGV[3] queue prefix
+    Events:
+      'removed'
+]]
+local rcall = redis.call
+-- Includes
+--[[
+  Function to check if the job belongs to a job scheduler and
+  current delayed job matches with jobId
+]]
+local function isJobSchedulerJob(jobId, jobKey, jobSchedulersKey)
+  local repeatJobKey = rcall("HGET", jobKey, "rjk")
+  if repeatJobKey  then
+    local prevMillis = rcall("ZSCORE", jobSchedulersKey, repeatJobKey)
+    if prevMillis then
+      local currentDelayedJobId = "repeat:" .. repeatJobKey .. ":" .. prevMillis
+      return jobId == currentDelayedJobId
+    end
+  end
+  return false
+end
+--[[
+  Function to recursively check if there are no locks
+  on the jobs to be removed.
+  returns:
+    boolean
+]]
+--[[
+  Functions to destructure job key.
+  Just a bit of warning, these functions may be a bit slow and affect performance significantly.
+]]
+local getJobIdFromKey = function (jobKey)
+  return string.match(jobKey, ".*:(.*)")
+end
+local getJobKeyPrefix = function (jobKey, jobId)
+  return string.sub(jobKey, 0, #jobKey - #jobId)
+end
+local function isLocked( prefix, jobId, removeChildren)
+  local jobKey = prefix .. jobId;
+  -- Check if this job is locked
+  local lockKey = jobKey .. ':lock'
+  local lock = rcall("GET", lockKey)
+  if not lock then
+    if removeChildren == "1" then
+      local dependencies = rcall("SMEMBERS", jobKey .. ":dependencies")
+      if (#dependencies > 0) then
+        for i, childJobKey in ipairs(dependencies) do
+          -- We need to get the jobId for this job.
+          local childJobId = getJobIdFromKey(childJobKey)
+          local childJobPrefix = getJobKeyPrefix(childJobKey, childJobId)
+          local result = isLocked( childJobPrefix, childJobId, removeChildren )
+          if result then
+            return true
+          end
+        end
+      end
+    end
+    return false
+  end
+  return true
+end
+--[[
+    Remove a job from all the statuses it may be in as well as all its data,
+    including its children. Active children can be ignored.
+    Events:
+      'removed'
+]]
+local rcall = redis.call
+-- Includes
+--[[
+  Function to get max events value or set by default 10000.
+]]
+local function getOrSetMaxEvents(metaKey)
+  local maxEvents = rcall("HGET", metaKey, "opts.maxLenEvents")
+  if not maxEvents then
+    maxEvents = 10000
+    rcall("HSET", metaKey, "opts.maxLenEvents", maxEvents)
+  end
+  return maxEvents
+end
+--[[
+  Function to remove deduplication key if needed
+  when a job is being removed.
+]]
+local function removeDeduplicationKeyIfNeededOnRemoval(prefixKey,
+  jobId, deduplicationId)
+  if deduplicationId then
+    local deduplicationKey = prefixKey .. "de:" .. deduplicationId
+    local currentJobId = rcall('GET', deduplicationKey)
+    if currentJobId and currentJobId == jobId then
+      rcall("DEL", deduplicationKey)
+      -- Also clean up any pending dedup-next data for this dedup ID
+      rcall("DEL", prefixKey .. "dn:" .. deduplicationId)
+      return 1
+    end
+  end
+end
+--[[
+  Function to remove from any state.
+  returns:
+    prev state
+]]
+local function removeJobFromAnyState( prefix, jobId)
+  -- We start with the ZSCORE checks, since they have O(1) complexity
+  if rcall("ZSCORE", prefix .. "completed", jobId) then
+    rcall("ZREM", prefix .. "completed", jobId)
+    return "completed"
+  elseif rcall("ZSCORE", prefix .. "waiting-children", jobId) then
+    rcall("ZREM", prefix .. "waiting-children", jobId)
+    return "waiting-children"
+  elseif rcall("ZSCORE", prefix .. "delayed", jobId) then
+    rcall("ZREM", prefix .. "delayed", jobId)
+    return "delayed"
+  elseif rcall("ZSCORE", prefix .. "failed", jobId) then
+    rcall("ZREM", prefix .. "failed", jobId)
+    return "failed"
+  elseif rcall("ZSCORE", prefix .. "prioritized", jobId) then
+    rcall("ZREM", prefix .. "prioritized", jobId)
+    return "prioritized"
+  -- We remove only 1 element from the list, since we assume they are not added multiple times
+  elseif rcall("LREM", prefix .. "wait", 1, jobId) == 1 then
+    return "wait"
+  elseif rcall("LREM", prefix .. "paused", 1, jobId) == 1 then
+    return "paused"
+  elseif rcall("LREM", prefix .. "active", 1, jobId) == 1 then
+    return "active"
+  end
+  return "unknown"
+end
+--[[
+  Function to remove job keys.
+]]
+local function removeJobKeys(jobKey)
+  return rcall("DEL", jobKey, jobKey .. ':logs', jobKey .. ':dependencies',
+    jobKey .. ':processed', jobKey .. ':failed', jobKey .. ':unsuccessful')
+end
+--[[
+  Check if this job has a parent. If so we will just remove it from
+  the parent child list, but if it is the last child we should move the parent to "wait/paused"
+  which requires code from "moveToFinished"
+]]
+-- Includes
+--[[
+  Function to add job in target list and add marker if needed.
+]]
+-- Includes
+--[[
+  Add marker if needed when a job is available.
+]]
+local function addBaseMarkerIfNeeded(markerKey, isPausedOrMaxed)
+  if not isPausedOrMaxed then
+    rcall("ZADD", markerKey, 0, "0")
+  end  
+end
+local function addJobInTargetList(targetKey, markerKey, pushCmd, isPausedOrMaxed, jobId)
+  rcall(pushCmd, targetKey, jobId)
+  addBaseMarkerIfNeeded(markerKey, isPausedOrMaxed)
+end
+--[[
+  Function to check for the meta.paused key to decide if we are paused or not
+  (since an empty list and !EXISTS are not really the same).
+]]
+local function getTargetQueueList(queueMetaKey, activeKey, waitKey, pausedKey)
+  local queueAttributes = rcall("HMGET", queueMetaKey, "paused", "concurrency", "max", "duration")
+  if queueAttributes[1] then
+    return pausedKey, true, queueAttributes[3], queueAttributes[4]
+  else
+    if queueAttributes[2] then
+      local activeCount = rcall("LLEN", activeKey)
+      if activeCount >= tonumber(queueAttributes[2]) then
+        return waitKey, true, queueAttributes[3], queueAttributes[4]
+      else
+        return waitKey, false, queueAttributes[3], queueAttributes[4]
+      end
+    end
+  end
+  return waitKey, false, queueAttributes[3], queueAttributes[4]
+end
+local function _moveParentToWait(parentPrefix, parentId, emitEvent)
+  local parentTarget, isPausedOrMaxed = getTargetQueueList(parentPrefix .. "meta", parentPrefix .. "active",
+    parentPrefix .. "wait", parentPrefix .. "paused")
+  addJobInTargetList(parentTarget, parentPrefix .. "marker", "RPUSH", isPausedOrMaxed, parentId)
+  if emitEvent then
+    local parentEventStream = parentPrefix .. "events"
+    rcall("XADD", parentEventStream, "*", "event", "waiting", "jobId", parentId, "prev", "waiting-children")
+  end
+end
+local function removeParentDependencyKey(jobKey, hard, parentKey, baseKey, debounceId)
+  if parentKey then
+    local parentDependenciesKey = parentKey .. ":dependencies"
+    local result = rcall("SREM", parentDependenciesKey, jobKey)
+    if result > 0 then
+      local pendingDependencies = rcall("SCARD", parentDependenciesKey)
+      if pendingDependencies == 0 then
+        local parentId = getJobIdFromKey(parentKey)
+        local parentPrefix = getJobKeyPrefix(parentKey, parentId)
+        local numRemovedElements = rcall("ZREM", parentPrefix .. "waiting-children", parentId)
+        if numRemovedElements == 1 then
+          if hard then -- remove parent in same queue
+            if parentPrefix == baseKey then
+              removeParentDependencyKey(parentKey, hard, nil, baseKey, nil)
+              removeJobKeys(parentKey)
+              if debounceId then
+                rcall("DEL", parentPrefix .. "de:" .. debounceId)
+              end
+            else
+              _moveParentToWait(parentPrefix, parentId)
+            end
+          else
+            _moveParentToWait(parentPrefix, parentId, true)
+          end
+        end
+      end
+      return true
+    end
+  else
+    local parentAttributes = rcall("HMGET", jobKey, "parentKey", "deid")
+    local missedParentKey = parentAttributes[1]
+    if( (type(missedParentKey) == "string") and missedParentKey ~= ""
+      and (rcall("EXISTS", missedParentKey) == 1)) then
+      local parentDependenciesKey = missedParentKey .. ":dependencies"
+      local result = rcall("SREM", parentDependenciesKey, jobKey)
+      if result > 0 then
+        local pendingDependencies = rcall("SCARD", parentDependenciesKey)
+        if pendingDependencies == 0 then
+          local parentId = getJobIdFromKey(missedParentKey)
+          local parentPrefix = getJobKeyPrefix(missedParentKey, parentId)
+          local numRemovedElements = rcall("ZREM", parentPrefix .. "waiting-children", parentId)
+          if numRemovedElements == 1 then
+            if hard then
+              if parentPrefix == baseKey then
+                removeParentDependencyKey(missedParentKey, hard, nil, baseKey, nil)
+                removeJobKeys(missedParentKey)
+                if parentAttributes[2] then
+                  rcall("DEL", parentPrefix .. "de:" .. parentAttributes[2])
+                end
+              else
+                _moveParentToWait(parentPrefix, parentId)
+              end
+            else
+              _moveParentToWait(parentPrefix, parentId, true)
+            end
+          end
+        end
+        return true
+      end
+    end
+  end
+  return false
+end
+local removeJobChildren
+local removeJobWithChildren
+removeJobChildren = function(prefix, jobKey, options)
+    -- Check if this job has children
+    -- If so, we are going to try to remove the children recursively in a depth-first way
+    -- because if some job is locked, we must exit with an error.
+    if not options.ignoreProcessed then
+        local processed = rcall("HGETALL", jobKey .. ":processed")
+        if #processed > 0 then
+            for i = 1, #processed, 2 do
+                local childJobId = getJobIdFromKey(processed[i])
+                local childJobPrefix = getJobKeyPrefix(processed[i], childJobId)
+                removeJobWithChildren(childJobPrefix, childJobId, jobKey, options)
+            end
+        end
+        local failed = rcall("HGETALL", jobKey .. ":failed")
+        if #failed > 0 then
+            for i = 1, #failed, 2 do
+                local childJobId = getJobIdFromKey(failed[i])
+                local childJobPrefix = getJobKeyPrefix(failed[i], childJobId)
+                removeJobWithChildren(childJobPrefix, childJobId, jobKey, options)
+            end
+        end
+        local unsuccessful = rcall("ZRANGE", jobKey .. ":unsuccessful", 0, -1)
+        if #unsuccessful > 0 then
+            for i = 1, #unsuccessful, 1 do
+                local childJobId = getJobIdFromKey(unsuccessful[i])
+                local childJobPrefix = getJobKeyPrefix(unsuccessful[i], childJobId)
+                removeJobWithChildren(childJobPrefix, childJobId, jobKey, options)
+            end
+        end
+    end
+    local dependencies = rcall("SMEMBERS", jobKey .. ":dependencies")
+    if #dependencies > 0 then
+        for i, childJobKey in ipairs(dependencies) do
+            local childJobId = getJobIdFromKey(childJobKey)
+            local childJobPrefix = getJobKeyPrefix(childJobKey, childJobId)
+            removeJobWithChildren(childJobPrefix, childJobId, jobKey, options)
+        end
+    end
+end
+removeJobWithChildren = function(prefix, jobId, parentKey, options)
+    local jobKey = prefix .. jobId
+    if options.ignoreLocked then
+        if isLocked(prefix, jobId) then
+            return
+        end
+    end
+    -- Check if job is in the failed zset
+    local failedSet = prefix .. "failed"
+    if not (options.ignoreProcessed and rcall("ZSCORE", failedSet, jobId)) then
+        removeParentDependencyKey(jobKey, false, parentKey, nil)
+        if options.removeChildren then
+            removeJobChildren(prefix, jobKey, options)
+        end
+        local prev = removeJobFromAnyState(prefix, jobId)
+        local deduplicationId = rcall("HGET", jobKey, "deid")
+        removeDeduplicationKeyIfNeededOnRemoval(prefix, jobId, deduplicationId)
+        if removeJobKeys(jobKey) > 0 then
+            local metaKey = prefix .. "meta"
+            local maxEvents = getOrSetMaxEvents(metaKey)
+            rcall("XADD", prefix .. "events", "MAXLEN", "~", maxEvents, "*", "event", "removed",
+                "jobId", jobId, "prev", prev)
+        end
+    end
+end
+local jobId = ARGV[1]
+local shouldRemoveChildren = ARGV[2]
+local prefix = ARGV[3]
+local jobKey = KEYS[1]
+local repeatKey = KEYS[2]
+if isJobSchedulerJob(jobId, jobKey, repeatKey) then
+    return -8
+end
+if not isLocked(prefix, jobId, shouldRemoveChildren) then
+    local options = {
+        removeChildren = shouldRemoveChildren == "1",
+        ignoreProcessed = false,
+        ignoreLocked = false
+    }
+    removeJobWithChildren(prefix, jobId, nil, options)
+    return 1
+end
+return 0

package/dist/backends/lua/reprocessJob.lua

@@ -0,0 +1,113 @@
+-- Vendored verbatim from BullMQ (github.com/taskforcesh/bullmq, MIT license),
+-- assembled script `reprocessJob`, version 5.79.3. This is the exact atomic
+-- script Job.retry() runs to move a job from a terminal state back to wait.
+-- Kept as-is so retry behaviour matches the library rather than a reimplementation.
+--[[
+  Attempts to reprocess a job
+  Input:
+    KEYS[1] job key
+    KEYS[2] events stream
+    KEYS[3] job state
+    KEYS[4] wait key
+    KEYS[5] meta
+    KEYS[6] paused key
+    KEYS[7] active key
+    KEYS[8] marker key
+    ARGV[1] job.id
+    ARGV[2] (job.opts.lifo ? 'R' : 'L') + 'PUSH'
+    ARGV[3] propVal - failedReason/returnvalue
+    ARGV[4] prev state - failed/completed
+    ARGV[5] reset attemptsMade - "1" or "0"
+    ARGV[6] reset attemptsStarted - "1" or "0"
+  Output:
+     1 means the operation was a success
+    -1 means the job does not exist
+    -3 means the job was not found in the expected set.
+]]
+local rcall = redis.call;
+-- Includes
+--[[
+  Function to add job in target list and add marker if needed.
+]]
+-- Includes
+--[[
+  Add marker if needed when a job is available.
+]]
+local function addBaseMarkerIfNeeded(markerKey, isPausedOrMaxed)
+  if not isPausedOrMaxed then
+    rcall("ZADD", markerKey, 0, "0")
+  end  
+end
+local function addJobInTargetList(targetKey, markerKey, pushCmd, isPausedOrMaxed, jobId)
+  rcall(pushCmd, targetKey, jobId)
+  addBaseMarkerIfNeeded(markerKey, isPausedOrMaxed)
+end
+--[[
+  Function to get max events value or set by default 10000.
+]]
+local function getOrSetMaxEvents(metaKey)
+  local maxEvents = rcall("HGET", metaKey, "opts.maxLenEvents")
+  if not maxEvents then
+    maxEvents = 10000
+    rcall("HSET", metaKey, "opts.maxLenEvents", maxEvents)
+  end
+  return maxEvents
+end
+--[[
+  Function to check for the meta.paused key to decide if we are paused or not
+  (since an empty list and !EXISTS are not really the same).
+]]
+local function getTargetQueueList(queueMetaKey, activeKey, waitKey, pausedKey)
+  local queueAttributes = rcall("HMGET", queueMetaKey, "paused", "concurrency", "max", "duration")
+  if queueAttributes[1] then
+    return pausedKey, true, queueAttributes[3], queueAttributes[4]
+  else
+    if queueAttributes[2] then
+      local activeCount = rcall("LLEN", activeKey)
+      if activeCount >= tonumber(queueAttributes[2]) then
+        return waitKey, true, queueAttributes[3], queueAttributes[4]
+      else
+        return waitKey, false, queueAttributes[3], queueAttributes[4]
+      end
+    end
+  end
+  return waitKey, false, queueAttributes[3], queueAttributes[4]
+end
+local jobKey = KEYS[1]
+if rcall("EXISTS", jobKey) == 1 then
+  local jobId = ARGV[1]
+  if (rcall("ZREM", KEYS[3], jobId) == 1) then
+    local attributesToRemove = {}
+    if ARGV[5] == "1" then
+      table.insert(attributesToRemove, "atm")
+    end
+    if ARGV[6] == "1" then
+      table.insert(attributesToRemove, "ats")
+    end
+    rcall("HDEL", jobKey, "finishedOn", "processedOn", ARGV[3], unpack(attributesToRemove))
+    local target, isPausedOrMaxed = getTargetQueueList(KEYS[5], KEYS[7], KEYS[4], KEYS[6])
+    addJobInTargetList(target, KEYS[8], ARGV[2], isPausedOrMaxed, jobId)
+    local parentKey = rcall("HGET", jobKey, "parentKey")
+    if parentKey and rcall("EXISTS", parentKey) == 1 then
+      if ARGV[4] == "failed" then
+        if rcall("ZREM", parentKey .. ":unsuccessful", jobKey) == 1 or
+          rcall("HDEL", parentKey .. ":failed", jobKey) == 1 then
+          rcall("SADD", parentKey .. ":dependencies", jobKey)
+        end
+      else
+        if rcall("HDEL", parentKey .. ":processed", jobKey) == 1 then
+          rcall("SADD", parentKey .. ":dependencies", jobKey)
+        end
+      end
+    end
+    local maxEvents = getOrSetMaxEvents(KEYS[5])
+    -- Emit waiting event
+    rcall("XADD", KEYS[2], "MAXLEN", "~", maxEvents, "*", "event", "waiting",
+      "jobId", jobId, "prev", ARGV[4]);
+    return 1
+  else
+    return -3
+  end
+else
+  return -1
+end

package/dist/backends/lua/runTask.lua

@@ -0,0 +1,39 @@
+-- Transcribed verbatim from Asynq (github.com/hibiken/asynq, MIT license),
+-- internal/rdb/inspect.go `runTaskCmd`, version v0.25.1. This is the exact
+-- atomic script Inspector.RunTask() runs to move a task from scheduled, retry,
+-- archived, completed or aggregating state back to pending. Kept as-is so retry
+-- behaviour matches the library.
+--
+-- KEYS[1] -> task key            (asynq:{<qname>}:t:<task_id>)
+-- KEYS[2] -> pending list        (asynq:{<qname>}:pending)
+-- KEYS[3] -> all groups set      (asynq:{<qname>}:groups)
+-- ARGV[1] -> task id
+-- ARGV[2] -> queue key prefix    (asynq:{<qname>}:)
+-- ARGV[3] -> group key prefix    (asynq:{<qname>}:g:)
+--
+-- Returns 1 on success, 0 if not found, -1 if active, -2 if already pending.
+if redis.call("EXISTS", KEYS[1]) == 0 then
+	return 0
+end
+local state, group = unpack(redis.call("HMGET", KEYS[1], "state", "group"))
+if state == "active" then
+	return -1
+elseif state == "pending" then
+	return -2
+elseif state == "aggregating" then
+	local n = redis.call("ZREM", ARGV[3] .. group, ARGV[1])
+	if n == 0 then
+		return redis.error_reply("internal error: task id not found in zset " .. tostring(ARGV[3] .. group))
+	end
+	if redis.call("ZCARD", ARGV[3] .. group) == 0 then
+		redis.call("SREM", KEYS[3], group)
+	end
+else
+	local n = redis.call("ZREM", ARGV[2] .. state, ARGV[1])
+	if n == 0 then
+		return redis.error_reply("internal error: task id not found in zset " .. tostring(ARGV[2] .. state))
+	end
+end
+redis.call("LPUSH", KEYS[2], ARGV[1])
+redis.call("HSET", KEYS[1], "state", "pending")
+return 1

package/dist/backends/lua.d.ts

@@ -0,0 +1,18 @@
+export declare const scripts: {
+    readonly reprocessJob: {
+        readonly source: string;
+        readonly numberOfKeys: 8;
+    };
+    readonly removeJob: {
+        readonly source: string;
+        readonly numberOfKeys: 2;
+    };
+    readonly runTask: {
+        readonly source: string;
+        readonly numberOfKeys: 3;
+    };
+    readonly deleteTask: {
+        readonly source: string;
+        readonly numberOfKeys: 2;
+    };
+};

package/dist/backends/lua.js

@@ -0,0 +1,18 @@
+import { readFileSync } from "node:fs";
+import { fileURLToPath } from "node:url";
+// Vendored Redis scripts live next to the compiled adapters (copied into dist by
+// the build step). They are loaded once at module init and registered on the
+// ioredis client with `defineCommand`, which handles EVALSHA caching.
+const luaDir = fileURLToPath(new URL("./lua/", import.meta.url));
+function load(name) {
+    return readFileSync(`${luaDir}${name}.lua`, "utf8");
+}
+export const scripts = {
+    // BullMQ: exact assembled scripts from the library.
+    reprocessJob: { source: load("reprocessJob"), numberOfKeys: 8 },
+    removeJob: { source: load("removeJob"), numberOfKeys: 2 },
+    // Asynq: exact scripts from the library's rdb inspector.
+    runTask: { source: load("runTask"), numberOfKeys: 3 },
+    deleteTask: { source: load("deleteTask"), numberOfKeys: 2 },
+};
+//# sourceMappingURL=lua.js.map

package/dist/backends/lua.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"lua.js","sourceRoot":"","sources":["../../src/backends/lua.ts"],"names":[],"mappings":"AAAA,OAAO,EAAE,YAAY,EAAE,MAAM,SAAS,CAAC;AACvC,OAAO,EAAE,aAAa,EAAE,MAAM,UAAU,CAAC;AAEzC,iFAAiF;AACjF,6EAA6E;AAC7E,sEAAsE;AACtE,MAAM,MAAM,GAAG,aAAa,CAAC,IAAI,GAAG,CAAC,QAAQ,EAAE,MAAM,CAAC,IAAI,CAAC,GAAG,CAAC,CAAC,CAAC;AAEjE,SAAS,IAAI,CAAC,IAAY;IACxB,OAAO,YAAY,CAAC,GAAG,MAAM,GAAG,IAAI,MAAM,EAAE,MAAM,CAAC,CAAC;AACtD,CAAC;AAED,MAAM,CAAC,MAAM,OAAO,GAAG;IACrB,oDAAoD;IACpD,YAAY,EAAE,EAAE,MAAM,EAAE,IAAI,CAAC,cAAc,CAAC,EAAE,YAAY,EAAE,CAAC,EAAE;IAC/D,SAAS,EAAE,EAAE,MAAM,EAAE,IAAI,CAAC,WAAW,CAAC,EAAE,YAAY,EAAE,CAAC,EAAE;IACzD,yDAAyD;IACzD,OAAO,EAAE,EAAE,MAAM,EAAE,IAAI,CAAC,SAAS,CAAC,EAAE,YAAY,EAAE,CAAC,EAAE;IACrD,UAAU,EAAE,EAAE,MAAM,EAAE,IAAI,CAAC,YAAY,CAAC,EAAE,YAAY,EAAE,CAAC,EAAE;CACnD,CAAC"}

package/dist/backends/scripting.d.ts

@@ -0,0 +1,14 @@
+import type { Redis } from "ioredis";
+type Caller = (keys: string[], args: Array<string | number>) => Promise<number>;
+export interface Scripting {
+    reprocessJob: Caller;
+    removeJob: Caller;
+    runTask: Caller;
+    deleteTask: Caller;
+}
+/**
+ * Registers the vendored scripts on the client with `defineCommand` (so ioredis
+ * uses EVALSHA and only ships each script body once) and returns typed callers.
+ */
+export declare function attachScripts(redis: Redis): Scripting;
+export {};

package/dist/backends/scripting.js

@@ -0,0 +1,34 @@
+import { scripts } from "./lua.js";
+const METHOD = {
+    reprocessJob: "qiReprocessJob",
+    removeJob: "qiRemoveJob",
+    runTask: "qiRunTask",
+    deleteTask: "qiDeleteTask",
+};
+/**
+ * Registers the vendored scripts on the client with `defineCommand` (so ioredis
+ * uses EVALSHA and only ships each script body once) and returns typed callers.
+ */
+export function attachScripts(redis) {
+    const dyn = redis;
+    for (const key of Object.keys(scripts)) {
+        const method = METHOD[key];
+        if (typeof dyn[method] !== "function") {
+            redis.defineCommand(method, {
+                numberOfKeys: scripts[key].numberOfKeys,
+                lua: scripts[key].source,
+            });
+        }
+    }
+    const call = (method) => async (keys, args) => {
+        const res = await dyn[method](...keys, ...args);
+        return Number(res);
+    };
+    return {
+        reprocessJob: call(METHOD.reprocessJob),
+        removeJob: call(METHOD.removeJob),
+        runTask: call(METHOD.runTask),
+        deleteTask: call(METHOD.deleteTask),
+    };
+}
+//# sourceMappingURL=scripting.js.map

package/dist/backends/scripting.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"scripting.js","sourceRoot":"","sources":["../../src/backends/scripting.ts"],"names":[],"mappings":"AACA,OAAO,EAAE,OAAO,EAAE,MAAM,UAAU,CAAC;AAWnC,MAAM,MAAM,GAAyC;IACnD,YAAY,EAAE,gBAAgB;IAC9B,SAAS,EAAE,aAAa;IACxB,OAAO,EAAE,WAAW;IACpB,UAAU,EAAE,cAAc;CAC3B,CAAC;AAIF;;;GAGG;AACH,MAAM,UAAU,aAAa,CAAC,KAAY;IACxC,MAAM,GAAG,GAAG,KAAgC,CAAC;IAC7C,KAAK,MAAM,GAAG,IAAI,MAAM,CAAC,IAAI,CAAC,OAAO,CAAgC,EAAE,CAAC;QACtE,MAAM,MAAM,GAAG,MAAM,CAAC,GAAG,CAAC,CAAC;QAC3B,IAAI,OAAO,GAAG,CAAC,MAAM,CAAC,KAAK,UAAU,EAAE,CAAC;YACtC,KAAK,CAAC,aAAa,CAAC,MAAM,EAAE;gBAC1B,YAAY,EAAE,OAAO,CAAC,GAAG,CAAC,CAAC,YAAY;gBACvC,GAAG,EAAE,OAAO,CAAC,GAAG,CAAC,CAAC,MAAM;aACzB,CAAC,CAAC;QACL,CAAC;IACH,CAAC;IAED,MAAM,IAAI,GACR,CAAC,MAAc,EAAU,EAAE,CAC3B,KAAK,EAAE,IAAI,EAAE,IAAI,EAAE,EAAE;QACnB,MAAM,GAAG,GAAG,MAAM,GAAG,CAAC,MAAM,CAAE,CAAC,GAAG,IAAI,EAAE,GAAG,IAAI,CAAC,CAAC;QACjD,OAAO,MAAM,CAAC,GAAG,CAAC,CAAC;IACrB,CAAC,CAAC;IAEJ,OAAO;QACL,YAAY,EAAE,IAAI,CAAC,MAAM,CAAC,YAAY,CAAC;QACvC,SAAS,EAAE,IAAI,CAAC,MAAM,CAAC,SAAS,CAAC;QACjC,OAAO,EAAE,IAAI,CAAC,MAAM,CAAC,OAAO,CAAC;QAC7B,UAAU,EAAE,IAAI,CAAC,MAAM,CAAC,UAAU,CAAC;KACpC,CAAC;AACJ,CAAC"}

package/dist/config.d.ts

@@ -0,0 +1,10 @@
+import type { BackendName } from "./types.js";
+export interface Config {
+    redisUrl: string;
+    asynqPrefix: string;
+    bullPrefix: string;
+    backends: BackendName[];
+    readOnly: boolean;
+}
+/** Reads configuration from the environment and CLI flags. */
+export declare function loadConfig(argv?: string[]): Config;

package/dist/config.js

@@ -0,0 +1,32 @@
+const ALL_BACKENDS = ["asynq", "bullmq"];
+function parseBackends(raw) {
+    if (!raw)
+        return [...ALL_BACKENDS];
+    const wanted = raw
+        .split(",")
+        .map((s) => s.trim().toLowerCase())
+        .filter(Boolean);
+    const picked = ALL_BACKENDS.filter((b) => wanted.includes(b));
+    if (picked.length === 0) {
+        throw new Error(`QUEUE_INSPECTOR_BACKENDS did not name any known backend (asynq, bullmq): "${raw}"`);
+    }
+    return picked;
+}
+function envFlag(value) {
+    if (!value)
+        return false;
+    const v = value.trim().toLowerCase();
+    return v === "1" || v === "true" || v === "yes";
+}
+/** Reads configuration from the environment and CLI flags. */
+export function loadConfig(argv = process.argv.slice(2)) {
+    const readOnly = argv.includes("--read-only") || envFlag(process.env.QUEUE_INSPECTOR_READ_ONLY);
+    return {
+        redisUrl: process.env.REDIS_URL || "redis://localhost:6379",
+        asynqPrefix: process.env.ASYNQ_PREFIX || "asynq",
+        bullPrefix: process.env.BULL_PREFIX || "bull",
+        backends: parseBackends(process.env.QUEUE_INSPECTOR_BACKENDS),
+        readOnly,
+    };
+}
+//# sourceMappingURL=config.js.map

package/dist/config.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"config.js","sourceRoot":"","sources":["../src/config.ts"],"names":[],"mappings":"AAUA,MAAM,YAAY,GAAkB,CAAC,OAAO,EAAE,QAAQ,CAAC,CAAC;AAExD,SAAS,aAAa,CAAC,GAAuB;IAC5C,IAAI,CAAC,GAAG;QAAE,OAAO,CAAC,GAAG,YAAY,CAAC,CAAC;IACnC,MAAM,MAAM,GAAG,GAAG;SACf,KAAK,CAAC,GAAG,CAAC;SACV,GAAG,CAAC,CAAC,CAAC,EAAE,EAAE,CAAC,CAAC,CAAC,IAAI,EAAE,CAAC,WAAW,EAAE,CAAC;SAClC,MAAM,CAAC,OAAO,CAAC,CAAC;IACnB,MAAM,MAAM,GAAG,YAAY,CAAC,MAAM,CAAC,CAAC,CAAC,EAAE,EAAE,CAAC,MAAM,CAAC,QAAQ,CAAC,CAAC,CAAC,CAAC,CAAC;IAC9D,IAAI,MAAM,CAAC,MAAM,KAAK,CAAC,EAAE,CAAC;QACxB,MAAM,IAAI,KAAK,CACb,6EAA6E,GAAG,GAAG,CACpF,CAAC;IACJ,CAAC;IACD,OAAO,MAAM,CAAC;AAChB,CAAC;AAED,SAAS,OAAO,CAAC,KAAyB;IACxC,IAAI,CAAC,KAAK;QAAE,OAAO,KAAK,CAAC;IACzB,MAAM,CAAC,GAAG,KAAK,CAAC,IAAI,EAAE,CAAC,WAAW,EAAE,CAAC;IACrC,OAAO,CAAC,KAAK,GAAG,IAAI,CAAC,KAAK,MAAM,IAAI,CAAC,KAAK,KAAK,CAAC;AAClD,CAAC;AAED,8DAA8D;AAC9D,MAAM,UAAU,UAAU,CAAC,OAAiB,OAAO,CAAC,IAAI,CAAC,KAAK,CAAC,CAAC,CAAC;IAC/D,MAAM,QAAQ,GAAG,IAAI,CAAC,QAAQ,CAAC,aAAa,CAAC,IAAI,OAAO,CAAC,OAAO,CAAC,GAAG,CAAC,yBAAyB,CAAC,CAAC;IAEhG,OAAO;QACL,QAAQ,EAAE,OAAO,CAAC,GAAG,CAAC,SAAS,IAAI,wBAAwB;QAC3D,WAAW,EAAE,OAAO,CAAC,GAAG,CAAC,YAAY,IAAI,OAAO;QAChD,UAAU,EAAE,OAAO,CAAC,GAAG,CAAC,WAAW,IAAI,MAAM;QAC7C,QAAQ,EAAE,aAAa,CAAC,OAAO,CAAC,GAAG,CAAC,wBAAwB,CAAC;QAC7D,QAAQ;KACT,CAAC;AACJ,CAAC"}

package/dist/format.d.ts

@@ -0,0 +1,16 @@
+export interface DecodedPayload {
+    payload: string;
+    payloadEncoding: "utf8" | "base64";
+    payloadBytes: number;
+    payloadTruncated: boolean;
+}
+/**
+ * Renders a raw payload for display. Text is returned as UTF-8; binary or
+ * otherwise non-text bytes are returned base64-encoded. Either way the result
+ * is capped at `maxBytes` of source data so a large payload cannot flood a tool
+ * response.
+ */
+export declare function decodePayload(buf: Buffer, maxBytes?: number): DecodedPayload;
+export declare function truncate(text: string, max?: number): string;
+export declare function isoFromUnixSeconds(seconds: number | null | undefined): string | null;
+export declare function isoFromMillis(ms: number | null | undefined): string | null;