@knpkv/agent-usage 0.1.0

package/dist/client/index.html

@@ -0,0 +1,15 @@
+<!doctype html>
+<html lang="en">
+  <head>
+    <meta charset="utf-8" />
+    <meta content="width=device-width, initial-scale=1" name="viewport" />
+    <!-- The bootstrap code rides in the fragment; keep it out of any outbound request. -->
+    <meta content="no-referrer" name="referrer" />
+    <title>Agent usage</title>
+    <script type="module" crossorigin src="/assets/index-DB-VXWqy.js"></script>
+    <link rel="stylesheet" crossorigin href="/assets/index-CUuLXODk.css">
+  </head>
+  <body>
+    <div id="root"></div>
+  </body>
+</html>

package/dist/core/Attribution.d.ts

@@ -0,0 +1,59 @@
+import type { AttributionInputs } from "./Model.js";
+/** What a Usage Event's consumption counts toward. */
+export type Booking = {
+    readonly _tag: "Ticket";
+    readonly key: string;
+} | {
+    readonly _tag: "Repo";
+    readonly name: string;
+};
+/** The first key a branch names: naming a branch is deliberate. */
+export declare const ticketKeyFromBranch: (branch: string) => string | null;
+/** The deepest key a path names, so `worktrees/PROJ-1/PROJ-2` is working on `PROJ-2`. */
+export declare const ticketKeyFromPath: (cwd: string) => string | null;
+/**
+ * The one distinct key in typed text, or null when there are none or several. Stored as typed:
+ * whether it books is decided when read, by the Known Projects, so `RPS-123` (a real ticket number
+ * that looks like filler) is never lost at ingest.
+ */
+export declare const singleTicket: (text: string) => string | null;
+/**
+ * The repo a working directory belongs to. Worktrees live at `…/worktrees/<repo>/<branch>`, so
+ * that segment wins; otherwise the last path segment.
+ */
+export declare const repoName: (cwd: string) => string;
+/** The project a key belongs to: `RPS` for `RPS-7071`. */
+export declare const projectOf: (key: string) => string;
+/**
+ * The Known Projects: every project a branch or worktree path has named, plus the configured ones.
+ * Naming a branch is deliberate, so those keys vouch for their project.
+ */
+export declare const knownProjects: (places: Iterable<{
+    readonly branch: string;
+    readonly cwd: string;
+}>, configured: Iterable<string>) => ReadonlySet<string>;
+/** A Usage Event's Booking, and the typed key it set aside, if any. */
+export interface Attribution {
+    readonly booking: Booking;
+    /** An Active Ticket whose project is not a Known Project: `GPT-6`, `SHA-256`. */
+    readonly ignoredKey: string | null;
+}
+/**
+ * Branch first, then path, then the Active Ticket when its project is known; otherwise the repo.
+ * Branch and path keys are trusted as they are; only typed text is checked against the projects.
+ */
+export declare const attribute: (inputs: AttributionInputs, projects: ReadonlySet<string>) => Attribution;
+/** A stable id that keeps a ticket and a repo of the same spelling apart. */
+export declare const bookingId: (booking: Booking) => string;
+/** A Claude user turn's content: a string, or blocks of which only `text` blocks are typed words. */
+export type ClaudeContent = string | ReadonlyArray<{
+    readonly type: string;
+    readonly text?: string | undefined;
+}>;
+/**
+ * The text a human typed into one Claude user turn: string content or `text` blocks, with tool
+ * results and injected reminder/command blocks removed.
+ */
+export declare const claudeHumanText: (content: ClaudeContent) => string;
+/** The text a human typed in one Codex `input_text` item; injected context yields "". */
+export declare const codexHumanText: (text: string) => string;

package/dist/core/Attribution.js

@@ -0,0 +1,108 @@
+/**
+ * Deriving a Usage Event's Booking from its Attribution Inputs, and mining the Active Ticket from
+ * what the human typed.
+ *
+ * **Mental model**
+ *
+ * - **A Booking is computed, never stored** (ADR 0002): {@link bookingOf} is pure, so a sharper
+ *   rule reaches every event already recorded, including those whose transcripts were pruned.
+ * - **Branch, then path, then Active Ticket.** Naming a branch or a worktree is deliberate; a key
+ *   typed into a shared session is the weakest signal and only counts when it is the only one and
+ *   its project is a Known Project, so `GPT-6` or `SHA-256` in a prompt books nothing.
+ * - **Only the human's words count.** Agents inject instruction files and environment blocks as
+ *   user-role messages, and those quote ticket-shaped examples. They are stripped before mining.
+ *
+ * Ported from session-counter's attribution, with jira-clockify's stricter key pattern.
+ *
+ * @module
+ */
+import { Predicate } from "effect";
+/**
+ * A Jira key: an uppercase letter, one to nine more uppercase alphanumerics, a dash and a number.
+ * Bounded by non-alphanumerics rather than `\b`, because `_` is a word character and branch names
+ * like `feature_PROJ-42_work` would otherwise match nothing.
+ */
+const TICKET_KEY = /(?<![A-Za-z0-9])[A-Z][A-Z0-9]{1,9}-\d{1,6}(?![A-Za-z0-9])/g;
+const ticketKeys = (text) => [...text.matchAll(TICKET_KEY)].map((match) => match[0]);
+/** The first key a branch names: naming a branch is deliberate. */
+export const ticketKeyFromBranch = (branch) => ticketKeys(branch)[0] ?? null;
+/** The deepest key a path names, so `worktrees/PROJ-1/PROJ-2` is working on `PROJ-2`. */
+export const ticketKeyFromPath = (cwd) => ticketKeys(cwd).at(-1) ?? null;
+/**
+ * The one distinct key in typed text, or null when there are none or several. Stored as typed:
+ * whether it books is decided when read, by the Known Projects, so `RPS-123` (a real ticket number
+ * that looks like filler) is never lost at ingest.
+ */
+export const singleTicket = (text) => {
+    const distinct = [...new Set(ticketKeys(text))];
+    return distinct.length === 1 ? distinct[0] ?? null : null;
+};
+/**
+ * The repo a working directory belongs to. Worktrees live at `…/worktrees/<repo>/<branch>`, so
+ * that segment wins; otherwise the last path segment.
+ */
+export const repoName = (cwd) => {
+    const worktree = /\/worktrees\/([^/]+)\//u.exec(cwd)?.[1];
+    if (worktree !== undefined)
+        return worktree;
+    const base = cwd.split("/").filter((segment) => segment !== "").at(-1);
+    return base ?? "unknown";
+};
+/** The project a key belongs to: `RPS` for `RPS-7071`. */
+export const projectOf = (key) => key.slice(0, key.lastIndexOf("-"));
+/**
+ * The Known Projects: every project a branch or worktree path has named, plus the configured ones.
+ * Naming a branch is deliberate, so those keys vouch for their project.
+ */
+export const knownProjects = (places, configured) => {
+    const projects = new Set(configured);
+    for (const place of places) {
+        for (const key of [ticketKeyFromBranch(place.branch), ticketKeyFromPath(place.cwd)]) {
+            if (key !== null)
+                projects.add(projectOf(key));
+        }
+    }
+    return projects;
+};
+/**
+ * Branch first, then path, then the Active Ticket when its project is known; otherwise the repo.
+ * Branch and path keys are trusted as they are; only typed text is checked against the projects.
+ */
+export const attribute = (inputs, projects) => {
+    const deliberate = ticketKeyFromBranch(inputs.branch) ?? ticketKeyFromPath(inputs.cwd);
+    if (deliberate !== null)
+        return { booking: { _tag: "Ticket", key: deliberate }, ignoredKey: null };
+    const typed = inputs.activeTicket;
+    if (typed !== null && projects.has(projectOf(typed))) {
+        return { booking: { _tag: "Ticket", key: typed }, ignoredKey: null };
+    }
+    return { booking: { _tag: "Repo", name: repoName(inputs.cwd) }, ignoredKey: typed };
+};
+/** A stable id that keeps a ticket and a repo of the same spelling apart. */
+export const bookingId = (booking) => booking._tag === "Ticket" ? `ticket:${booking.key}` : `repo:${booking.name}`;
+/**
+ * Blocks Claude Code wraps around context it injects into a user turn. `command-args` is not one:
+ * it is what the human typed after a slash command, so only its tags are removed.
+ */
+const CLAUDE_INJECTED = /<(system-reminder|command-name|command-message|local-command-[a-z-]+)>[\s\S]*?<\/\1>/gu;
+const COMMAND_ARGS_TAG = /<\/?command-args>/gu;
+/**
+ * The text a human typed into one Claude user turn: string content or `text` blocks, with tool
+ * results and injected reminder/command blocks removed.
+ */
+export const claudeHumanText = (content) => {
+    const raw = Predicate.isString(content)
+        ? content
+        : content.flatMap((block) => block.type === "text" && block.text !== undefined ? [block.text] : []).join("\n");
+    return raw.replace(CLAUDE_INJECTED, "").replace(COMMAND_ARGS_TAG, " ").trim();
+};
+/** Codex input items that are context it injected, not words the human typed. */
+const CODEX_INJECTED_PREFIXES = ["# AGENTS.md instructions", "<environment_context>", "<user_instructions>"];
+/** Reminder blocks the harness wraps around context it adds to a Codex user item. */
+const CODEX_REMINDER = /<system-reminder>[\s\S]*?<\/system-reminder>/gu;
+/** The text a human typed in one Codex `input_text` item; injected context yields "". */
+export const codexHumanText = (text) => {
+    const trimmed = text.replace(CODEX_REMINDER, "").trim();
+    return CODEX_INJECTED_PREFIXES.some((prefix) => trimmed.startsWith(prefix)) ? "" : trimmed;
+};
+//# sourceMappingURL=Attribution.js.map

package/dist/core/Attribution.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"Attribution.js","sourceRoot":"","sources":["../../src/core/Attribution.ts"],"names":[],"mappings":"AAAA;;;;;;;;;;;;;;;;;GAiBG;AACH,OAAO,EAAE,SAAS,EAAE,MAAM,QAAQ,CAAA;AAQlC;;;;GAIG;AACH,MAAM,UAAU,GAAG,4DAA4D,CAAA;AAE/E,MAAM,UAAU,GAAG,CAAC,IAAY,EAAyB,EAAE,CAAC,CAAC,GAAG,IAAI,CAAC,QAAQ,CAAC,UAAU,CAAC,CAAC,CAAC,GAAG,CAAC,CAAC,KAAK,EAAE,EAAE,CAAC,KAAK,CAAC,CAAC,CAAC,CAAC,CAAA;AAEnH,mEAAmE;AACnE,MAAM,CAAC,MAAM,mBAAmB,GAAG,CAAC,MAAc,EAAiB,EAAE,CAAC,UAAU,CAAC,MAAM,CAAC,CAAC,CAAC,CAAC,IAAI,IAAI,CAAA;AAEnG,yFAAyF;AACzF,MAAM,CAAC,MAAM,iBAAiB,GAAG,CAAC,GAAW,EAAiB,EAAE,CAAC,UAAU,CAAC,GAAG,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC,CAAC,IAAI,IAAI,CAAA;AAE/F;;;;GAIG;AACH,MAAM,CAAC,MAAM,YAAY,GAAG,CAAC,IAAY,EAAiB,EAAE;IAC1D,MAAM,QAAQ,GAAG,CAAC,GAAG,IAAI,GAAG,CAAC,UAAU,CAAC,IAAI,CAAC,CAAC,CAAC,CAAA;IAC/C,OAAO,QAAQ,CAAC,MAAM,KAAK,CAAC,CAAC,CAAC,CAAC,QAAQ,CAAC,CAAC,CAAC,IAAI,IAAI,CAAC,CAAC,CAAC,IAAI,CAAA;AAC3D,CAAC,CAAA;AAED;;;GAGG;AACH,MAAM,CAAC,MAAM,QAAQ,GAAG,CAAC,GAAW,EAAU,EAAE;IAC9C,MAAM,QAAQ,GAAG,yBAAyB,CAAC,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,CAAC,CAAC,CAAA;IACzD,IAAI,QAAQ,KAAK,SAAS;QAAE,OAAO,QAAQ,CAAA;IAC3C,MAAM,IAAI,GAAG,GAAG,CAAC,KAAK,CAAC,GAAG,CAAC,CAAC,MAAM,CAAC,CAAC,OAAO,EAAE,EAAE,CAAC,OAAO,KAAK,EAAE,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC,CAAC,CAAA;IACtE,OAAO,IAAI,IAAI,SAAS,CAAA;AAC1B,CAAC,CAAA;AAED,0DAA0D;AAC1D,MAAM,CAAC,MAAM,SAAS,GAAG,CAAC,GAAW,EAAU,EAAE,CAAC,GAAG,CAAC,KAAK,CAAC,CAAC,EAAE,GAAG,CAAC,WAAW,CAAC,GAAG,CAAC,CAAC,CAAA;AAEpF;;;GAGG;AACH,MAAM,CAAC,MAAM,aAAa,GAAG,CAC3B,MAAmE,EACnE,UAA4B,EACP,EAAE;IACvB,MAAM,QAAQ,GAAG,IAAI,GAAG,CAAC,UAAU,CAAC,CAAA;IACpC,KAAK,MAAM,KAAK,IAAI,MAAM,EAAE,CAAC;QAC3B,KAAK,MAAM,GAAG,IAAI,CAAC,mBAAmB,CAAC,KAAK,CAAC,MAAM,CAAC,EAAE,iBAAiB,CAAC,KAAK,CAAC,GAAG,CAAC,CAAC,EAAE,CAAC;YACpF,IAAI,GAAG,KAAK,IAAI;gBAAE,QAAQ,CAAC,GAAG,CAAC,SAAS,CAAC,GAAG,CAAC,CAAC,CAAA;QAChD,CAAC;IACH,CAAC;IACD,OAAO,QAAQ,CAAA;AACjB,CAAC,CAAA;AASD;;;GAGG;AACH,MAAM,CAAC,MAAM,SAAS,GAAG,CAAC,MAAyB,EAAE,QAA6B,EAAe,EAAE;IACjG,MAAM,UAAU,GAAG,mBAAmB,CAAC,MAAM,CAAC,MAAM,CAAC,IAAI,iBAAiB,CAAC,MAAM,CAAC,GAAG,CAAC,CAAA;IACtF,IAAI,UAAU,KAAK,IAAI;QAAE,OAAO,EAAE,OAAO,EAAE,EAAE,IAAI,EAAE,QAAQ,EAAE,GAAG,EAAE,UAAU,EAAE,EAAE,UAAU,EAAE,IAAI,EAAE,CAAA;IAClG,MAAM,KAAK,GAAG,MAAM,CAAC,YAAY,CAAA;IACjC,IAAI,KAAK,KAAK,IAAI,IAAI,QAAQ,CAAC,GAAG,CAAC,SAAS,CAAC,KAAK,CAAC,CAAC,EAAE,CAAC;QACrD,OAAO,EAAE,OAAO,EAAE,EAAE,IAAI,EAAE,QAAQ,EAAE,GAAG,EAAE,KAAK,EAAE,EAAE,UAAU,EAAE,IAAI,EAAE,CAAA;IACtE,CAAC;IACD,OAAO,EAAE,OAAO,EAAE,EAAE,IAAI,EAAE,MAAM,EAAE,IAAI,EAAE,QAAQ,CAAC,MAAM,CAAC,GAAG,CAAC,EAAE,EAAE,UAAU,EAAE,KAAK,EAAE,CAAA;AACrF,CAAC,CAAA;AAED,6EAA6E;AAC7E,MAAM,CAAC,MAAM,SAAS,GAAG,CAAC,OAAgB,EAAU,EAAE,CACpD,OAAO,CAAC,IAAI,KAAK,QAAQ,CAAC,CAAC,CAAC,UAAU,OAAO,CAAC,GAAG,EAAE,CAAC,CAAC,CAAC,QAAQ,OAAO,CAAC,IAAI,EAAE,CAAA;AAE9E;;;GAGG;AACH,MAAM,eAAe,GAAG,wFAAwF,CAAA;AAChH,MAAM,gBAAgB,GAAG,qBAAqB,CAAA;AAK9C;;;GAGG;AACH,MAAM,CAAC,MAAM,eAAe,GAAG,CAAC,OAAsB,EAAU,EAAE;IAChE,MAAM,GAAG,GAAG,SAAS,CAAC,QAAQ,CAAC,OAAO,CAAC;QACrC,CAAC,CAAC,OAAO;QACT,CAAC,CAAC,OAAO,CAAC,OAAO,CAAC,CAAC,KAAK,EAAE,EAAE,CAAC,KAAK,CAAC,IAAI,KAAK,MAAM,IAAI,KAAK,CAAC,IAAI,KAAK,SAAS,CAAC,CAAC,CAAC,CAAC,KAAK,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC,EAAE,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAA;IAChH,OAAO,GAAG,CAAC,OAAO,CAAC,eAAe,EAAE,EAAE,CAAC,CAAC,OAAO,CAAC,gBAAgB,EAAE,GAAG,CAAC,CAAC,IAAI,EAAE,CAAA;AAC/E,CAAC,CAAA;AAED,iFAAiF;AACjF,MAAM,uBAAuB,GAAG,CAAC,0BAA0B,EAAE,uBAAuB,EAAE,qBAAqB,CAAC,CAAA;AAE5G,qFAAqF;AACrF,MAAM,cAAc,GAAG,gDAAgD,CAAA;AAEvE,yFAAyF;AACzF,MAAM,CAAC,MAAM,cAAc,GAAG,CAAC,IAAY,EAAU,EAAE;IACrD,MAAM,OAAO,GAAG,IAAI,CAAC,OAAO,CAAC,cAAc,EAAE,EAAE,CAAC,CAAC,IAAI,EAAE,CAAA;IACvD,OAAO,uBAAuB,CAAC,IAAI,CAAC,CAAC,MAAM,EAAE,EAAE,CAAC,OAAO,CAAC,UAAU,CAAC,MAAM,CAAC,CAAC,CAAC,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC,OAAO,CAAA;AAC5F,CAAC,CAAA"}

package/dist/core/Balances.d.ts

@@ -0,0 +1,27 @@
+/**
+ * Classifying what a provider says about a spendable balance into a Balance Value, without ever
+ * collapsing "we could not tell" into a number. Ported from claude-statusline's credit readers.
+ *
+ * @module
+ */
+import { Schema } from "effect";
+import type { BalanceValue } from "./Model.js";
+/** Codex's `rate_limits.credits` block on a rollout token_count event. */
+export declare const CodexCredits: Schema.Struct<{
+    readonly has_credits: Schema.Boolean;
+    readonly unlimited: Schema.Boolean;
+    readonly balance: Schema.NullOr<Schema.String>;
+}>;
+export type CodexCredits = typeof CodexCredits.Type;
+export declare const classifyCodexCredits: (credits: CodexCredits) => BalanceValue;
+/** Claude's `extra_usage` block on the `/api/oauth/usage` reply. */
+export declare const ExtraUsage: Schema.Struct<{
+    readonly is_enabled: Schema.Boolean;
+    readonly monthly_limit: Schema.optionalKey<Schema.NullOr<Schema.Finite>>;
+    readonly used_credits: Schema.optionalKey<Schema.NullOr<Schema.Finite>>;
+    readonly currency: Schema.optionalKey<Schema.NullOr<Schema.String>>;
+    readonly decimal_places: Schema.optionalKey<Schema.NullOr<Schema.Int>>;
+    readonly spend_limit_reached: Schema.optionalKey<Schema.NullOr<Schema.Boolean>>;
+}>;
+export type ExtraUsage = typeof ExtraUsage.Type;
+export declare const classifyExtraUsage: (extra: ExtraUsage | null | undefined) => BalanceValue;

package/dist/core/Balances.js

@@ -0,0 +1,63 @@
+/**
+ * Classifying what a provider says about a spendable balance into a Balance Value, without ever
+ * collapsing "we could not tell" into a number. Ported from claude-statusline's credit readers.
+ *
+ * @module
+ */
+import { Option, Schema } from "effect";
+const unknown = (reason) => ({ _tag: "Unknown", reason });
+/** Codex's `rate_limits.credits` block on a rollout token_count event. */
+export const CodexCredits = Schema.Struct({
+    has_credits: Schema.Boolean,
+    unlimited: Schema.Boolean,
+    balance: Schema.NullOr(Schema.String)
+});
+export const classifyCodexCredits = (credits) => {
+    if (credits.unlimited)
+        return { _tag: "Known", balance: { _tag: "Unlimited" } };
+    // No credits on the account: a "0" here is not a balance that ran out.
+    if (!credits.has_credits)
+        return unknown("NotSupported");
+    if (credits.balance === null)
+        return unknown("NoData");
+    const raw = credits.balance.trim();
+    const amount = Number(raw);
+    if (raw === "" || !Number.isFinite(amount))
+        return unknown("Parse");
+    if (amount <= 0)
+        return { _tag: "Known", balance: { _tag: "Exhausted" } };
+    return { _tag: "Known", balance: { _tag: "Credits", credits: amount } };
+};
+/** Claude's `extra_usage` block on the `/api/oauth/usage` reply. */
+export const ExtraUsage = Schema.Struct({
+    is_enabled: Schema.Boolean,
+    monthly_limit: Schema.optionalKey(Schema.NullOr(Schema.Finite)),
+    used_credits: Schema.optionalKey(Schema.NullOr(Schema.Finite)),
+    currency: Schema.optionalKey(Schema.NullOr(Schema.String)),
+    decimal_places: Schema.optionalKey(Schema.NullOr(Schema.Int)),
+    spend_limit_reached: Schema.optionalKey(Schema.NullOr(Schema.Boolean))
+});
+export const classifyExtraUsage = (extra) => {
+    if (extra === undefined || extra === null)
+        return unknown("NotSupported");
+    if (!extra.is_enabled) {
+        return { _tag: "Known", balance: { _tag: extra.spend_limit_reached === true ? "Exhausted" : "Disabled" } };
+    }
+    // Amounts are minor units of `currency`; without both, any figure is a guess.
+    const currency = Option.fromNullishOr(extra.currency);
+    const decimals = Option.fromNullishOr(extra.decimal_places);
+    if (Option.isNone(currency) || Option.isNone(decimals))
+        return unknown("Parse");
+    const limit = extra.monthly_limit;
+    const used = extra.used_credits;
+    if (limit === undefined || limit === null || used === undefined || used === null)
+        return unknown("NoData");
+    const left = limit - used;
+    if (left <= 0)
+        return { _tag: "Known", balance: { _tag: "Exhausted" } };
+    return {
+        _tag: "Known",
+        balance: { _tag: "Amount", leftMinor: left, limitMinor: limit, decimals: decimals.value, currency: currency.value }
+    };
+};
+//# sourceMappingURL=Balances.js.map

package/dist/core/Balances.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"Balances.js","sourceRoot":"","sources":["../../src/core/Balances.ts"],"names":[],"mappings":"AAAA;;;;;GAKG;AACH,OAAO,EAAE,MAAM,EAAE,MAAM,EAAE,MAAM,QAAQ,CAAA;AAGvC,MAAM,OAAO,GAAG,CAAC,MAAqB,EAAgB,EAAE,CAAC,CAAC,EAAE,IAAI,EAAE,SAAS,EAAE,MAAM,EAAE,CAAC,CAAA;AAEtF,0EAA0E;AAC1E,MAAM,CAAC,MAAM,YAAY,GAAG,MAAM,CAAC,MAAM,CAAC;IACxC,WAAW,EAAE,MAAM,CAAC,OAAO;IAC3B,SAAS,EAAE,MAAM,CAAC,OAAO;IACzB,OAAO,EAAE,MAAM,CAAC,MAAM,CAAC,MAAM,CAAC,MAAM,CAAC;CACtC,CAAC,CAAA;AAGF,MAAM,CAAC,MAAM,oBAAoB,GAAG,CAAC,OAAqB,EAAgB,EAAE;IAC1E,IAAI,OAAO,CAAC,SAAS;QAAE,OAAO,EAAE,IAAI,EAAE,OAAO,EAAE,OAAO,EAAE,EAAE,IAAI,EAAE,WAAW,EAAE,EAAE,CAAA;IAC/E,uEAAuE;IACvE,IAAI,CAAC,OAAO,CAAC,WAAW;QAAE,OAAO,OAAO,CAAC,cAAc,CAAC,CAAA;IACxD,IAAI,OAAO,CAAC,OAAO,KAAK,IAAI;QAAE,OAAO,OAAO,CAAC,QAAQ,CAAC,CAAA;IACtD,MAAM,GAAG,GAAG,OAAO,CAAC,OAAO,CAAC,IAAI,EAAE,CAAA;IAClC,MAAM,MAAM,GAAG,MAAM,CAAC,GAAG,CAAC,CAAA;IAC1B,IAAI,GAAG,KAAK,EAAE,IAAI,CAAC,MAAM,CAAC,QAAQ,CAAC,MAAM,CAAC;QAAE,OAAO,OAAO,CAAC,OAAO,CAAC,CAAA;IACnE,IAAI,MAAM,IAAI,CAAC;QAAE,OAAO,EAAE,IAAI,EAAE,OAAO,EAAE,OAAO,EAAE,EAAE,IAAI,EAAE,WAAW,EAAE,EAAE,CAAA;IACzE,OAAO,EAAE,IAAI,EAAE,OAAO,EAAE,OAAO,EAAE,EAAE,IAAI,EAAE,SAAS,EAAE,OAAO,EAAE,MAAM,EAAE,EAAE,CAAA;AACzE,CAAC,CAAA;AAED,oEAAoE;AACpE,MAAM,CAAC,MAAM,UAAU,GAAG,MAAM,CAAC,MAAM,CAAC;IACtC,UAAU,EAAE,MAAM,CAAC,OAAO;IAC1B,aAAa,EAAE,MAAM,CAAC,WAAW,CAAC,MAAM,CAAC,MAAM,CAAC,MAAM,CAAC,MAAM,CAAC,CAAC;IAC/D,YAAY,EAAE,MAAM,CAAC,WAAW,CAAC,MAAM,CAAC,MAAM,CAAC,MAAM,CAAC,MAAM,CAAC,CAAC;IAC9D,QAAQ,EAAE,MAAM,CAAC,WAAW,CAAC,MAAM,CAAC,MAAM,CAAC,MAAM,CAAC,MAAM,CAAC,CAAC;IAC1D,cAAc,EAAE,MAAM,CAAC,WAAW,CAAC,MAAM,CAAC,MAAM,CAAC,MAAM,CAAC,GAAG,CAAC,CAAC;IAC7D,mBAAmB,EAAE,MAAM,CAAC,WAAW,CAAC,MAAM,CAAC,MAAM,CAAC,MAAM,CAAC,OAAO,CAAC,CAAC;CACvE,CAAC,CAAA;AAGF,MAAM,CAAC,MAAM,kBAAkB,GAAG,CAAC,KAAoC,EAAgB,EAAE;IACvF,IAAI,KAAK,KAAK,SAAS,IAAI,KAAK,KAAK,IAAI;QAAE,OAAO,OAAO,CAAC,cAAc,CAAC,CAAA;IACzE,IAAI,CAAC,KAAK,CAAC,UAAU,EAAE,CAAC;QACtB,OAAO,EAAE,IAAI,EAAE,OAAO,EAAE,OAAO,EAAE,EAAE,IAAI,EAAE,KAAK,CAAC,mBAAmB,KAAK,IAAI,CAAC,CAAC,CAAC,WAAW,CAAC,CAAC,CAAC,UAAU,EAAE,EAAE,CAAA;IAC5G,CAAC;IACD,8EAA8E;IAC9E,MAAM,QAAQ,GAAG,MAAM,CAAC,aAAa,CAAC,KAAK,CAAC,QAAQ,CAAC,CAAA;IACrD,MAAM,QAAQ,GAAG,MAAM,CAAC,aAAa,CAAC,KAAK,CAAC,cAAc,CAAC,CAAA;IAC3D,IAAI,MAAM,CAAC,MAAM,CAAC,QAAQ,CAAC,IAAI,MAAM,CAAC,MAAM,CAAC,QAAQ,CAAC;QAAE,OAAO,OAAO,CAAC,OAAO,CAAC,CAAA;IAC/E,MAAM,KAAK,GAAG,KAAK,CAAC,aAAa,CAAA;IACjC,MAAM,IAAI,GAAG,KAAK,CAAC,YAAY,CAAA;IAC/B,IAAI,KAAK,KAAK,SAAS,IAAI,KAAK,KAAK,IAAI,IAAI,IAAI,KAAK,SAAS,IAAI,IAAI,KAAK,IAAI;QAAE,OAAO,OAAO,CAAC,QAAQ,CAAC,CAAA;IAC1G,MAAM,IAAI,GAAG,KAAK,GAAG,IAAI,CAAA;IACzB,IAAI,IAAI,IAAI,CAAC;QAAE,OAAO,EAAE,IAAI,EAAE,OAAO,EAAE,OAAO,EAAE,EAAE,IAAI,EAAE,WAAW,EAAE,EAAE,CAAA;IACvE,OAAO;QACL,IAAI,EAAE,OAAO;QACb,OAAO,EAAE,EAAE,IAAI,EAAE,QAAQ,EAAE,SAAS,EAAE,IAAI,EAAE,UAAU,EAAE,KAAK,EAAE,QAAQ,EAAE,QAAQ,CAAC,KAAK,EAAE,QAAQ,EAAE,QAAQ,CAAC,KAAK,EAAE;KACpH,CAAA;AACH,CAAC,CAAA"}

package/dist/core/ClaudeLimits.d.ts

@@ -0,0 +1,58 @@
+/**
+ * Claude's subscription limits and extra-usage balance, polled from `GET /api/oauth/usage`: the
+ * endpoint Claude Code's `/usage` dialog reads. Claude limits appear in no transcript, so a poll is
+ * the only way to see them, and a Limit Snapshot not taken is gone.
+ *
+ * **Mental model** (the rules claude-statusline already follows)
+ *
+ * - **The token goes to Anthropic and nowhere else.** It is read per poll, put in the request
+ *   header, and never cached, logged or carried in an error.
+ * - **Never refresh.** Rotating the refresh token would race Claude Code's own refresh; an expired
+ *   token waits for Claude Code to renew it.
+ * - **Every failure is a reading.** No credentials, an expired token, a failed request and an
+ *   unparseable reply each become an Unknown Limit Snapshot (label `*`) and an Unknown balance, so
+ *   the gap shows on the graph instead of the last value lingering.
+ * - **Provider keys are labels.** Any top-level window with a numeric `utilization` is recorded under
+ *   its key; `five_hour` and the `seven_day*` keys have known lengths, the rest are listed with an
+ *   unknown length rather than dropped.
+ *
+ * @module
+ */
+import { Effect } from "effect";
+import type { BalanceReading, LimitSnapshot } from "./Model.js";
+declare const CredentialsMissing_base: new <A extends Record<string, any> = {}>(args: import("effect/Types").VoidIfEmpty<{ readonly [P in keyof A as P extends "_tag" ? never : P]: A[P]; }>) => import("effect/Cause").YieldableError & {
+    readonly _tag: "CredentialsMissing";
+} & Readonly<A>;
+export declare class CredentialsMissing extends CredentialsMissing_base<{}> {
+}
+declare const TokenExpired_base: new <A extends Record<string, any> = {}>(args: import("effect/Types").VoidIfEmpty<{ readonly [P in keyof A as P extends "_tag" ? never : P]: A[P]; }>) => import("effect/Cause").YieldableError & {
+    readonly _tag: "TokenExpired";
+} & Readonly<A>;
+export declare class TokenExpired extends TokenExpired_base<{}> {
+}
+declare const UsageFetchFailed_base: new <A extends Record<string, any> = {}>(args: import("effect/Types").VoidIfEmpty<{ readonly [P in keyof A as P extends "_tag" ? never : P]: A[P]; }>) => import("effect/Cause").YieldableError & {
+    readonly _tag: "UsageFetchFailed";
+} & Readonly<A>;
+export declare class UsageFetchFailed extends UsageFetchFailed_base<{
+    readonly cause: unknown;
+}> {
+}
+export interface UsageReply {
+    readonly status: number;
+    readonly body: string;
+}
+/** How a poll reaches the token and the endpoint; the live pair lives at the executable boundary. */
+export interface ClaudeUsageDeps {
+    readonly readToken: Effect.Effect<string, CredentialsMissing | TokenExpired>;
+    readonly get: (token: string) => Effect.Effect<UsageReply, UsageFetchFailed>;
+}
+export declare const USAGE_URL = "https://api.anthropic.com/api/oauth/usage";
+/** The access token in Claude Code's credentials JSON, refusing one that has already expired. */
+export declare const tokenFromCredentials: (raw: string) => Effect.Effect<string, CredentialsMissing | TokenExpired>;
+interface Observations {
+    readonly snapshots: ReadonlyArray<LimitSnapshot>;
+    readonly balances: ReadonlyArray<BalanceReading>;
+}
+/** One poll's observations. Never fails: every failure is an Unknown reading. */
+export declare const pollClaudeLimits: (deps: ClaudeUsageDeps, machine: string) => Effect.Effect<Observations>;
+export {};

package/dist/core/ClaudeLimits.js

@@ -0,0 +1,125 @@
+/**
+ * Claude's subscription limits and extra-usage balance, polled from `GET /api/oauth/usage`: the
+ * endpoint Claude Code's `/usage` dialog reads. Claude limits appear in no transcript, so a poll is
+ * the only way to see them, and a Limit Snapshot not taken is gone.
+ *
+ * **Mental model** (the rules claude-statusline already follows)
+ *
+ * - **The token goes to Anthropic and nowhere else.** It is read per poll, put in the request
+ *   header, and never cached, logged or carried in an error.
+ * - **Never refresh.** Rotating the refresh token would race Claude Code's own refresh; an expired
+ *   token waits for Claude Code to renew it.
+ * - **Every failure is a reading.** No credentials, an expired token, a failed request and an
+ *   unparseable reply each become an Unknown Limit Snapshot (label `*`) and an Unknown balance, so
+ *   the gap shows on the graph instead of the last value lingering.
+ * - **Provider keys are labels.** Any top-level window with a numeric `utilization` is recorded under
+ *   its key; `five_hour` and the `seven_day*` keys have known lengths, the rest are listed with an
+ *   unknown length rather than dropped.
+ *
+ * @module
+ */
+import { Clock, Data, Effect, Option, Predicate, Schema } from "effect";
+import { classifyExtraUsage, ExtraUsage } from "./Balances.js";
+export class CredentialsMissing extends Data.TaggedError("CredentialsMissing") {
+}
+export class TokenExpired extends Data.TaggedError("TokenExpired") {
+}
+export class UsageFetchFailed extends Data.TaggedError("UsageFetchFailed") {
+}
+export const USAGE_URL = "https://api.anthropic.com/api/oauth/usage";
+const Credentials = Schema.fromJsonString(Schema.Struct({
+    claudeAiOauth: Schema.Struct({
+        accessToken: Schema.NonEmptyString,
+        expiresAt: Schema.optionalKey(Schema.Finite)
+    })
+}));
+const decodeCredentials = Schema.decodeUnknownOption(Credentials);
+/** The access token in Claude Code's credentials JSON, refusing one that has already expired. */
+export const tokenFromCredentials = (raw) => Effect.gen(function* () {
+    const credentials = decodeCredentials(raw);
+    if (Option.isNone(credentials))
+        return yield* new CredentialsMissing();
+    const { accessToken, expiresAt } = credentials.value.claudeAiOauth;
+    const now = yield* Clock.currentTimeMillis;
+    if (expiresAt !== undefined && expiresAt <= now)
+        return yield* new TokenExpired();
+    return accessToken;
+});
+const Window = Schema.Struct({
+    utilization: Schema.Finite,
+    resets_at: Schema.optionalKey(Schema.NullOr(Schema.String))
+});
+const decodeWindow = Schema.decodeUnknownOption(Window);
+const decodeReply = Schema.decodeUnknownOption(Schema.fromJsonString(Schema.Record(Schema.String, Schema.Unknown)));
+const decodeExtraUsage = Schema.decodeUnknownOption(Schema.NullOr(ExtraUsage));
+const windowMinutes = (label) => label === "five_hour" ? 300 : label.startsWith("seven_day") ? 10_080 : null;
+const unknownObservations = (machine, observedAt, reason) => ({
+    snapshots: [{
+            agent: "claude",
+            machine,
+            source: "claude-oauth-usage",
+            label: "*",
+            windowMinutes: null,
+            observedAt,
+            reading: { _tag: "Unknown", reason }
+        }],
+    balances: [{ kind: "claude-extra-usage", machine, observedAt, value: { _tag: "Unknown", reason } }]
+});
+const classify = (machine, observedAt, reply) => {
+    if (reply.status === 401 || reply.status === 403)
+        return unknownObservations(machine, observedAt, "AuthExpired");
+    if (reply.status !== 200)
+        return unknownObservations(machine, observedAt, "Fetch");
+    const decoded = decodeReply(reply.body);
+    if (Option.isNone(decoded))
+        return unknownObservations(machine, observedAt, "Parse");
+    // Extra usage is a balance, not a percentage window, even when it reports a utilization.
+    const windows = Object.entries(decoded.value).filter(([label]) => label !== "extra_usage");
+    const snapshots = windows.flatMap(([label, value]) => {
+        const window = decodeWindow(value);
+        const snapshot = (reading) => [{
+                agent: "claude",
+                machine,
+                source: "claude-oauth-usage",
+                label,
+                windowMinutes: windowMinutes(label),
+                observedAt,
+                reading
+            }];
+        if (Option.isNone(window)) {
+            // A window that is there but does not read is a failed reading of it, not silence: its last
+            // level must not carry on.
+            const claimsWindow = Predicate.hasProperty(value, "utilization") && value.utilization !== null;
+            return claimsWindow ? snapshot({ _tag: "Unknown", reason: "Parse" }) : [];
+        }
+        const resets = window.value.resets_at;
+        if (resets === undefined || resets === null) {
+            return snapshot({ _tag: "Known", usedPercent: window.value.utilization, resetsAt: null });
+        }
+        const resetsAt = Date.parse(resets);
+        return Number.isFinite(resetsAt)
+            ? snapshot({ _tag: "Known", usedPercent: window.value.utilization, resetsAt })
+            : snapshot({ _tag: "Unknown", reason: "Parse" });
+    });
+    const extra = decodeExtraUsage(decoded.value["extra_usage"] ?? null);
+    const balance = {
+        kind: "claude-extra-usage",
+        machine,
+        observedAt,
+        value: Option.isNone(extra) ? { _tag: "Unknown", reason: "Parse" } : classifyExtraUsage(extra.value)
+    };
+    return {
+        snapshots: snapshots.length === 0 ? unknownObservations(machine, observedAt, "NoData").snapshots : snapshots,
+        balances: [balance]
+    };
+};
+/** One poll's observations. Never fails: every failure is an Unknown reading. */
+export const pollClaudeLimits = (deps, machine) => Effect.gen(function* () {
+    const observedAt = yield* Clock.currentTimeMillis;
+    return yield* deps.readToken.pipe(Effect.flatMap(deps.get), Effect.map((reply) => classify(machine, observedAt, reply)), Effect.catchTags({
+        CredentialsMissing: () => Effect.succeed(unknownObservations(machine, observedAt, "NoAuth")),
+        TokenExpired: () => Effect.succeed(unknownObservations(machine, observedAt, "AuthExpired")),
+        UsageFetchFailed: () => Effect.succeed(unknownObservations(machine, observedAt, "Fetch"))
+    }));
+});
+//# sourceMappingURL=ClaudeLimits.js.map

package/dist/core/ClaudeLimits.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"ClaudeLimits.js","sourceRoot":"","sources":["../../src/core/ClaudeLimits.ts"],"names":[],"mappings":"AAAA;;;;;;;;;;;;;;;;;;;GAmBG;AACH,OAAO,EAAE,KAAK,EAAE,IAAI,EAAE,MAAM,EAAE,MAAM,EAAE,SAAS,EAAE,MAAM,EAAE,MAAM,QAAQ,CAAA;AACvE,OAAO,EAAE,kBAAkB,EAAE,UAAU,EAAE,MAAM,eAAe,CAAA;AAG9D,MAAM,OAAO,kBAAmB,SAAQ,IAAI,CAAC,WAAW,CAAC,oBAAoB,CAAK;CAAG;AACrF,MAAM,OAAO,YAAa,SAAQ,IAAI,CAAC,WAAW,CAAC,cAAc,CAAK;CAAG;AACzE,MAAM,OAAO,gBAAiB,SAAQ,IAAI,CAAC,WAAW,CAAC,kBAAkB,CAA8B;CAAG;AAa1G,MAAM,CAAC,MAAM,SAAS,GAAG,2CAA2C,CAAA;AAEpE,MAAM,WAAW,GAAG,MAAM,CAAC,cAAc,CAAC,MAAM,CAAC,MAAM,CAAC;IACtD,aAAa,EAAE,MAAM,CAAC,MAAM,CAAC;QAC3B,WAAW,EAAE,MAAM,CAAC,cAAc;QAClC,SAAS,EAAE,MAAM,CAAC,WAAW,CAAC,MAAM,CAAC,MAAM,CAAC;KAC7C,CAAC;CACH,CAAC,CAAC,CAAA;AACH,MAAM,iBAAiB,GAAG,MAAM,CAAC,mBAAmB,CAAC,WAAW,CAAC,CAAA;AAEjE,iGAAiG;AACjG,MAAM,CAAC,MAAM,oBAAoB,GAAG,CAAC,GAAW,EAA4D,EAAE,CAC5G,MAAM,CAAC,GAAG,CAAC,QAAQ,CAAC;IAClB,MAAM,WAAW,GAAG,iBAAiB,CAAC,GAAG,CAAC,CAAA;IAC1C,IAAI,MAAM,CAAC,MAAM,CAAC,WAAW,CAAC;QAAE,OAAO,KAAK,CAAC,CAAC,IAAI,kBAAkB,EAAE,CAAA;IACtE,MAAM,EAAE,WAAW,EAAE,SAAS,EAAE,GAAG,WAAW,CAAC,KAAK,CAAC,aAAa,CAAA;IAClE,MAAM,GAAG,GAAG,KAAK,CAAC,CAAC,KAAK,CAAC,iBAAiB,CAAA;IAC1C,IAAI,SAAS,KAAK,SAAS,IAAI,SAAS,IAAI,GAAG;QAAE,OAAO,KAAK,CAAC,CAAC,IAAI,YAAY,EAAE,CAAA;IACjF,OAAO,WAAW,CAAA;AACpB,CAAC,CAAC,CAAA;AAEJ,MAAM,MAAM,GAAG,MAAM,CAAC,MAAM,CAAC;IAC3B,WAAW,EAAE,MAAM,CAAC,MAAM;IAC1B,SAAS,EAAE,MAAM,CAAC,WAAW,CAAC,MAAM,CAAC,MAAM,CAAC,MAAM,CAAC,MAAM,CAAC,CAAC;CAC5D,CAAC,CAAA;AACF,MAAM,YAAY,GAAG,MAAM,CAAC,mBAAmB,CAAC,MAAM,CAAC,CAAA;AACvD,MAAM,WAAW,GAAG,MAAM,CAAC,mBAAmB,CAC5C,MAAM,CAAC,cAAc,CAAC,MAAM,CAAC,MAAM,CAAC,MAAM,CAAC,MAAM,EAAE,MAAM,CAAC,OAAO,CAAC,CAAC,CACpE,CAAA;AACD,MAAM,gBAAgB,GAAG,MAAM,CAAC,mBAAmB,CAAC,MAAM,CAAC,MAAM,CAAC,UAAU,CAAC,CAAC,CAAA;AAE9E,MAAM,aAAa,GAAG,CAAC,KAAa,EAAiB,EAAE,CACrD,KAAK,KAAK,WAAW,CAAC,CAAC,CAAC,GAAG,CAAC,CAAC,CAAC,KAAK,CAAC,UAAU,CAAC,WAAW,CAAC,CAAC,CAAC,CAAC,MAAM,CAAC,CAAC,CAAC,IAAI,CAAA;AAO7E,MAAM,mBAAmB,GAAG,CAAC,OAAe,EAAE,UAAkB,EAAE,MAAqB,EAAgB,EAAE,CAAC,CAAC;IACzG,SAAS,EAAE,CAAC;YACV,KAAK,EAAE,QAAQ;YACf,OAAO;YACP,MAAM,EAAE,oBAAoB;YAC5B,KAAK,EAAE,GAAG;YACV,aAAa,EAAE,IAAI;YACnB,UAAU;YACV,OAAO,EAAE,EAAE,IAAI,EAAE,SAAS,EAAE,MAAM,EAAE;SACrC,CAAC;IACF,QAAQ,EAAE,CAAC,EAAE,IAAI,EAAE,oBAAoB,EAAE,OAAO,EAAE,UAAU,EAAE,KAAK,EAAE,EAAE,IAAI,EAAE,SAAS,EAAE,MAAM,EAAE,EAAE,CAAC;CACpG,CAAC,CAAA;AAEF,MAAM,QAAQ,GAAG,CAAC,OAAe,EAAE,UAAkB,EAAE,KAAiB,EAAgB,EAAE;IACxF,IAAI,KAAK,CAAC,MAAM,KAAK,GAAG,IAAI,KAAK,CAAC,MAAM,KAAK,GAAG;QAAE,OAAO,mBAAmB,CAAC,OAAO,EAAE,UAAU,EAAE,aAAa,CAAC,CAAA;IAChH,IAAI,KAAK,CAAC,MAAM,KAAK,GAAG;QAAE,OAAO,mBAAmB,CAAC,OAAO,EAAE,UAAU,EAAE,OAAO,CAAC,CAAA;IAClF,MAAM,OAAO,GAAG,WAAW,CAAC,KAAK,CAAC,IAAI,CAAC,CAAA;IACvC,IAAI,MAAM,CAAC,MAAM,CAAC,OAAO,CAAC;QAAE,OAAO,mBAAmB,CAAC,OAAO,EAAE,UAAU,EAAE,OAAO,CAAC,CAAA;IACpF,yFAAyF;IACzF,MAAM,OAAO,GAAG,MAAM,CAAC,OAAO,CAAC,OAAO,CAAC,KAAK,CAAC,CAAC,MAAM,CAAC,CAAC,CAAC,KAAK,CAAC,EAAE,EAAE,CAAC,KAAK,KAAK,aAAa,CAAC,CAAA;IAC1F,MAAM,SAAS,GAAG,OAAO,CAAC,OAAO,CAAC,CAAC,CAAC,KAAK,EAAE,KAAK,CAAC,EAAgC,EAAE;QACjF,MAAM,MAAM,GAAG,YAAY,CAAC,KAAK,CAAC,CAAA;QAClC,MAAM,QAAQ,GAAG,CAAC,OAAiC,EAAgC,EAAE,CAAC,CAAC;gBACrF,KAAK,EAAE,QAAQ;gBACf,OAAO;gBACP,MAAM,EAAE,oBAAoB;gBAC5B,KAAK;gBACL,aAAa,EAAE,aAAa,CAAC,KAAK,CAAC;gBACnC,UAAU;gBACV,OAAO;aACR,CAAC,CAAA;QACF,IAAI,MAAM,CAAC,MAAM,CAAC,MAAM,CAAC,EAAE,CAAC;YAC1B,4FAA4F;YAC5F,2BAA2B;YAC3B,MAAM,YAAY,GAAG,SAAS,CAAC,WAAW,CAAC,KAAK,EAAE,aAAa,CAAC,IAAI,KAAK,CAAC,WAAW,KAAK,IAAI,CAAA;YAC9F,OAAO,YAAY,CAAC,CAAC,CAAC,QAAQ,CAAC,EAAE,IAAI,EAAE,SAAS,EAAE,MAAM,EAAE,OAAO,EAAE,CAAC,CAAC,CAAC,CAAC,EAAE,CAAA;QAC3E,CAAC;QACD,MAAM,MAAM,GAAG,MAAM,CAAC,KAAK,CAAC,SAAS,CAAA;QACrC,IAAI,MAAM,KAAK,SAAS,IAAI,MAAM,KAAK,IAAI,EAAE,CAAC;YAC5C,OAAO,QAAQ,CAAC,EAAE,IAAI,EAAE,OAAO,EAAE,WAAW,EAAE,MAAM,CAAC,KAAK,CAAC,WAAW,EAAE,QAAQ,EAAE,IAAI,EAAE,CAAC,CAAA;QAC3F,CAAC;QACD,MAAM,QAAQ,GAAG,IAAI,CAAC,KAAK,CAAC,MAAM,CAAC,CAAA;QACnC,OAAO,MAAM,CAAC,QAAQ,CAAC,QAAQ,CAAC;YAC9B,CAAC,CAAC,QAAQ,CAAC,EAAE,IAAI,EAAE,OAAO,EAAE,WAAW,EAAE,MAAM,CAAC,KAAK,CAAC,WAAW,EAAE,QAAQ,EAAE,CAAC;YAC9E,CAAC,CAAC,QAAQ,CAAC,EAAE,IAAI,EAAE,SAAS,EAAE,MAAM,EAAE,OAAO,EAAE,CAAC,CAAA;IACpD,CAAC,CAAC,CAAA;IACF,MAAM,KAAK,GAAG,gBAAgB,CAAC,OAAO,CAAC,KAAK,CAAC,aAAa,CAAC,IAAI,IAAI,CAAC,CAAA;IACpE,MAAM,OAAO,GAAmB;QAC9B,IAAI,EAAE,oBAAoB;QAC1B,OAAO;QACP,UAAU;QACV,KAAK,EAAE,MAAM,CAAC,MAAM,CAAC,KAAK,CAAC,CAAC,CAAC,CAAC,EAAE,IAAI,EAAE,SAAS,EAAE,MAAM,EAAE,OAAO,EAAE,CAAC,CAAC,CAAC,kBAAkB,CAAC,KAAK,CAAC,KAAK,CAAC;KACrG,CAAA;IACD,OAAO;QACL,SAAS,EAAE,SAAS,CAAC,MAAM,KAAK,CAAC,CAAC,CAAC,CAAC,mBAAmB,CAAC,OAAO,EAAE,UAAU,EAAE,QAAQ,CAAC,CAAC,SAAS,CAAC,CAAC,CAAC,SAAS;QAC5G,QAAQ,EAAE,CAAC,OAAO,CAAC;KACpB,CAAA;AACH,CAAC,CAAA;AAED,iFAAiF;AACjF,MAAM,CAAC,MAAM,gBAAgB,GAAG,CAAC,IAAqB,EAAE,OAAe,EAA+B,EAAE,CACtG,MAAM,CAAC,GAAG,CAAC,QAAQ,CAAC;IAClB,MAAM,UAAU,GAAG,KAAK,CAAC,CAAC,KAAK,CAAC,iBAAiB,CAAA;IACjD,OAAO,KAAK,CAAC,CAAC,IAAI,CAAC,SAAS,CAAC,IAAI,CAC/B,MAAM,CAAC,OAAO,CAAC,IAAI,CAAC,GAAG,CAAC,EACxB,MAAM,CAAC,GAAG,CAAC,CAAC,KAAK,EAAE,EAAE,CAAC,QAAQ,CAAC,OAAO,EAAE,UAAU,EAAE,KAAK,CAAC,CAAC,EAC3D,MAAM,CAAC,SAAS,CAAC;QACf,kBAAkB,EAAE,GAAG,EAAE,CAAC,MAAM,CAAC,OAAO,CAAC,mBAAmB,CAAC,OAAO,EAAE,UAAU,EAAE,QAAQ,CAAC,CAAC;QAC5F,YAAY,EAAE,GAAG,EAAE,CAAC,MAAM,CAAC,OAAO,CAAC,mBAAmB,CAAC,OAAO,EAAE,UAAU,EAAE,aAAa,CAAC,CAAC;QAC3F,gBAAgB,EAAE,GAAG,EAAE,CAAC,MAAM,CAAC,OAAO,CAAC,mBAAmB,CAAC,OAAO,EAAE,UAAU,EAAE,OAAO,CAAC,CAAC;KAC1F,CAAC,CACH,CAAA;AACH,CAAC,CAAC,CAAA"}

package/dist/core/ClaudeLimitsLive.d.ts

@@ -0,0 +1,18 @@
+/**
+ * The live token and endpoint behind {@link pollClaudeLimits}.
+ *
+ * Linux keeps Claude Code's credentials in `<config>/.credentials.json`; macOS keeps them in the
+ * login Keychain. The file is tried first and the Keychain second, so no platform check is needed:
+ * on Linux the `security` binary does not exist and the lookup fails as missing credentials.
+ *
+ * The executable provides `FetchHttpClient.layer`; redirects are refused so the token cannot
+ * follow one off Anthropic's host.
+ *
+ * @module
+ */
+import { Effect, FileSystem, Path } from "effect";
+import { HttpClient } from "effect/http";
+import { ChildProcessSpawner } from "effect/process";
+import { type ClaudeUsageDeps } from "./ClaudeLimits.js";
+/** Builds the live dependencies for a Claude config directory (`CLAUDE_CONFIG_DIR` or `~/.claude`). */
+export declare const liveClaudeUsageDeps: (claudeConfigDir: string) => Effect.Effect<ClaudeUsageDeps, never, ChildProcessSpawner.ChildProcessSpawner | FileSystem.FileSystem | HttpClient.HttpClient | Path.Path>;

package/dist/core/ClaudeLimitsLive.js

@@ -0,0 +1,36 @@
+/**
+ * The live token and endpoint behind {@link pollClaudeLimits}.
+ *
+ * Linux keeps Claude Code's credentials in `<config>/.credentials.json`; macOS keeps them in the
+ * login Keychain. The file is tried first and the Keychain second, so no platform check is needed:
+ * on Linux the `security` binary does not exist and the lookup fails as missing credentials.
+ *
+ * The executable provides `FetchHttpClient.layer`; redirects are refused so the token cannot
+ * follow one off Anthropic's host.
+ *
+ * @module
+ */
+import { Duration, Effect, FileSystem, Path } from "effect";
+import { FetchHttpClient, HttpClient, HttpClientRequest } from "effect/http";
+import { ChildProcess, ChildProcessSpawner } from "effect/process";
+import { CredentialsMissing, tokenFromCredentials, USAGE_URL, UsageFetchFailed } from "./ClaudeLimits.js";
+const TIMEOUT = Duration.seconds(5);
+/** Builds the live dependencies for a Claude config directory (`CLAUDE_CONFIG_DIR` or `~/.claude`). */
+export const liveClaudeUsageDeps = (claudeConfigDir) => Effect.gen(function* () {
+    const fs = yield* FileSystem.FileSystem;
+    const path = yield* Path.Path;
+    const spawner = yield* ChildProcessSpawner.ChildProcessSpawner;
+    const client = yield* HttpClient.HttpClient;
+    const fromFile = fs.readFileString(path.join(claudeConfigDir, ".credentials.json")).pipe(Effect.mapError(() => new CredentialsMissing()));
+    const fromKeychain = spawner.string(ChildProcess.make("security", ["find-generic-password", "-s", "Claude Code-credentials", "-w"])).pipe(Effect.mapError(() => new CredentialsMissing()));
+    const deps = {
+        readToken: fromFile.pipe(Effect.catchTag("CredentialsMissing", () => fromKeychain), Effect.flatMap(tokenFromCredentials)),
+        get: (token) => client.execute(HttpClientRequest.get(USAGE_URL).pipe(HttpClientRequest.bearerToken(token), HttpClientRequest.setHeaders({ "anthropic-beta": "oauth-2025-04-20", "User-Agent": "agent-usage" }))).pipe(Effect.flatMap((response) => Effect.map(response.text, (body) => ({ status: response.status, body }))), Effect.timeout(TIMEOUT), 
+        // A redirect would carry the bearer token to another host; refuse to follow one.
+        Effect.provideService(FetchHttpClient.RequestInit, { redirect: "error" }), 
+        // Only the failure's kind is kept: the request it came from carries the token.
+        Effect.mapError((error) => new UsageFetchFailed({ cause: error._tag })))
+    };
+    return deps;
+});
+//# sourceMappingURL=ClaudeLimitsLive.js.map

package/dist/core/ClaudeLimitsLive.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"ClaudeLimitsLive.js","sourceRoot":"","sources":["../../src/core/ClaudeLimitsLive.ts"],"names":[],"mappings":"AAAA;;;;;;;;;;;GAWG;AACH,OAAO,EAAE,QAAQ,EAAE,MAAM,EAAE,UAAU,EAAE,IAAI,EAAE,MAAM,QAAQ,CAAA;AAC3D,OAAO,EAAE,eAAe,EAAE,UAAU,EAAE,iBAAiB,EAAE,MAAM,aAAa,CAAA;AAC5E,OAAO,EAAE,YAAY,EAAE,mBAAmB,EAAE,MAAM,gBAAgB,CAAA;AAClE,OAAO,EAEL,kBAAkB,EAClB,oBAAoB,EACpB,SAAS,EACT,gBAAgB,EACjB,MAAM,mBAAmB,CAAA;AAE1B,MAAM,OAAO,GAAG,QAAQ,CAAC,OAAO,CAAC,CAAC,CAAC,CAAA;AAEnC,uGAAuG;AACvG,MAAM,CAAC,MAAM,mBAAmB,GAAG,CAAC,eAAuB,EAAE,EAAE,CAC7D,MAAM,CAAC,GAAG,CAAC,QAAQ,CAAC;IAClB,MAAM,EAAE,GAAG,KAAK,CAAC,CAAC,UAAU,CAAC,UAAU,CAAA;IACvC,MAAM,IAAI,GAAG,KAAK,CAAC,CAAC,IAAI,CAAC,IAAI,CAAA;IAC7B,MAAM,OAAO,GAAG,KAAK,CAAC,CAAC,mBAAmB,CAAC,mBAAmB,CAAA;IAC9D,MAAM,MAAM,GAAG,KAAK,CAAC,CAAC,UAAU,CAAC,UAAU,CAAA;IAE3C,MAAM,QAAQ,GAAG,EAAE,CAAC,cAAc,CAAC,IAAI,CAAC,IAAI,CAAC,eAAe,EAAE,mBAAmB,CAAC,CAAC,CAAC,IAAI,CACtF,MAAM,CAAC,QAAQ,CAAC,GAAG,EAAE,CAAC,IAAI,kBAAkB,EAAE,CAAC,CAChD,CAAA;IACD,MAAM,YAAY,GAAG,OAAO,CAAC,MAAM,CACjC,YAAY,CAAC,IAAI,CAAC,UAAU,EAAE,CAAC,uBAAuB,EAAE,IAAI,EAAE,yBAAyB,EAAE,IAAI,CAAC,CAAC,CAChG,CAAC,IAAI,CAAC,MAAM,CAAC,QAAQ,CAAC,GAAG,EAAE,CAAC,IAAI,kBAAkB,EAAE,CAAC,CAAC,CAAA;IAEvD,MAAM,IAAI,GAAoB;QAC5B,SAAS,EAAE,QAAQ,CAAC,IAAI,CACtB,MAAM,CAAC,QAAQ,CAAC,oBAAoB,EAAE,GAAG,EAAE,CAAC,YAAY,CAAC,EACzD,MAAM,CAAC,OAAO,CAAC,oBAAoB,CAAC,CACrC;QACD,GAAG,EAAE,CAAC,KAAK,EAAE,EAAE,CACb,MAAM,CAAC,OAAO,CACZ,iBAAiB,CAAC,GAAG,CAAC,SAAS,CAAC,CAAC,IAAI,CACnC,iBAAiB,CAAC,WAAW,CAAC,KAAK,CAAC,EACpC,iBAAiB,CAAC,UAAU,CAAC,EAAE,gBAAgB,EAAE,kBAAkB,EAAE,YAAY,EAAE,aAAa,EAAE,CAAC,CACpG,CACF,CAAC,IAAI,CACJ,MAAM,CAAC,OAAO,CAAC,CAAC,QAAQ,EAAE,EAAE,CAAC,MAAM,CAAC,GAAG,CAAC,QAAQ,CAAC,IAAI,EAAE,CAAC,IAAI,EAAE,EAAE,CAAC,CAAC,EAAE,MAAM,EAAE,QAAQ,CAAC,MAAM,EAAE,IAAI,EAAE,CAAC,CAAC,CAAC,EACtG,MAAM,CAAC,OAAO,CAAC,OAAO,CAAC;QACvB,iFAAiF;QACjF,MAAM,CAAC,cAAc,CAAC,eAAe,CAAC,WAAW,EAAE,EAAE,QAAQ,EAAE,OAAO,EAAE,CAAC;QACzE,+EAA+E;QAC/E,MAAM,CAAC,QAAQ,CAAC,CAAC,KAAK,EAAE,EAAE,CAAC,IAAI,gBAAgB,CAAC,EAAE,KAAK,EAAE,KAAK,CAAC,IAAI,EAAE,CAAC,CAAC,CACxE;KACJ,CAAA;IACD,OAAO,IAAI,CAAA;AACb,CAAC,CAAC,CAAA"}

package/dist/core/ClaudeReader.d.ts

@@ -0,0 +1,27 @@
+/**
+ * Reading Claude Code transcripts (`<config>/projects/<project>/<session>.jsonl`, and each session's
+ * `subagents/*.jsonl`, booked to the parent session) into Usage Events.
+ *
+ * **Mental model**
+ *
+ * - **One event per model request.** Claude Code writes a message once per content block, each line
+ *   repeating the usage; message id + request id dedupes them. Should a later line carry larger
+ *   counts (a streamed request's final usage), the larger counts win, here and in the store.
+ * - **Zero-token messages are placeholders** (`<synthetic>` local replies), not requests.
+ * - **The Active Ticket follows the human.** Each typed user turn sets it to the one ticket it names,
+ *   or clears it; tool results, meta turns, sidechain (subagent) prompts and injected reminders
+ *   never touch it.
+ * - **Prompt and response text is read here and dropped here.** Nothing but counts and metadata
+ *   leaves this module.
+ *
+ * @module
+ */
+import { Schema } from "effect";
+import { type ReadResult, type SourceFile, type SourceLine } from "./Readers.js";
+export declare const ClaudeReaderState: Schema.Struct<{
+    readonly activeTicket: Schema.NullOr<Schema.String>;
+}>;
+export type ClaudeReaderState = typeof ClaudeReaderState.Type;
+export declare const initialClaudeState: ClaudeReaderState;
+/** Reads one chunk of a transcript, continuing from the state the previous chunk ended in. */
+export declare const readClaude: (file: SourceFile, lines: ReadonlyArray<SourceLine>, state: ClaudeReaderState) => ReadResult<ClaudeReaderState>;