@knpkv/jira-clockify 1.3.0 → 1.4.0

package/dist/src/services/SessionAttributor.js

@@ -0,0 +1,240 @@
+/**
+ * Ask a Coding Agent two things about an Agent Session: which Issue Key it was *worked on*, among
+ * the keys the session itself mentions, and what was done in it.
+ *
+ * **Mental model**
+ *
+ * - **Two questions, one boundary**: attribution decides *where* time goes, description says *what*
+ *   the time was. They share this module because they share the model, the batching and the
+ *   no-tools policy — and because keeping `LanguageModel` in one place is the point of the seam.
+ *
+ * - **Last resort, in batches**: attribution is asked for only where no deterministic Attribution
+ *   Signal could place a session — long-lived integration branches, mostly — so a run of
+ *   branch-attributed work never asks it at all. Description is asked for only about the rows a user
+ *   has *confirmed*, so nothing is spent describing a row that is never written. Either way the
+ *   outstanding work goes in one call, because a call's cost is almost entirely fixed overhead.
+ * - **Closed choice set**: the candidates come from the transcript's own text and a key outside
+ *   that set is rejected by the caller, so an invented Issue Key is structurally impossible
+ *   rather than merely discouraged by the prompt.
+ * - **"None" is a first-class answer**: a release-notes document mentions dozens of tickets it
+ *   describes and works on none of them. Frequency is anti-correlated with what should be
+ *   billed, so the question asked is "worked on, or only referenced?".
+ *
+ * **Gotchas**
+ *
+ * - The narrow interface is deliberate: `LanguageModel` stays inside this module so no consumer
+ *   or test has to know a model exists.
+ * - Failures are typed, not fatal. A caller that cannot reach a Coding Agent still reports the
+ *   deterministic proposals and lists the rest as Unattributed Sessions.
+ *
+ * @module
+ */
+import { model as claudeModel } from "@knpkv/ai-claude";
+import { model as codexModel } from "@knpkv/ai-codex";
+import { LanguageModel } from "effect/ai";
+import * as Context from "effect/Context";
+import * as Data from "effect/Data";
+import * as Duration from "effect/Duration";
+import * as Effect from "effect/Effect";
+import * as FileSystem from "effect/FileSystem";
+import * as Layer from "effect/Layer";
+import * as ChildProcessSpawner from "effect/process/ChildProcessSpawner";
+import * as Schema from "effect/Schema";
+import { ConfigService } from "./ConfigService.js";
+import { HomeDirectory } from "./HomeDirectory.js";
+export class SessionAttributorError extends Data.TaggedError("SessionAttributorError") {
+}
+export class SessionAttributor extends Context.Service()("jcf/SessionAttributor") {
+}
+// ---------------------------------------------------------------------------
+// Prompt
+// ---------------------------------------------------------------------------
+const Answer = Schema.Struct({
+    /** Echoes the session the answer is for, so a reordered or partial reply still lines up. */
+    sessionId: Schema.String,
+    /** One of *that session's* candidates, or null for "none of these". */
+    ticketKey: Schema.NullOr(Schema.String),
+    /** How sure the choice is, 0 to 1. */
+    confidence: Schema.Number,
+    /** One short sentence of justification. Requested to improve the choice; not displayed. */
+    reason: Schema.String
+});
+const Answers = Schema.Struct({ answers: Schema.Array(Answer) });
+/**
+ * One prompt covering every session in the batch, each with its *own* candidate list.
+ *
+ * Keeping the candidate lists per session is what makes batching safe: an answer naming a key from
+ * a different session's list is rejected downstream, because a choice is only accepted when it
+ * appears in the candidates of the session it claims to describe.
+ */
+const buildPrompt = (requests) => [
+    "For each coding session below, decide which Jira issue it was WORKED ON.",
+    "",
+    "Answer once per session, echoing its id. Choose only from that session's own candidate list, or",
+    "null. A session's answer must never use a key from another session's list.",
+    "",
+    "An issue that is merely REFERENCED is not the answer. A release-notes or known-issues document",
+    "mentions many issues it describes while working on none of them, and mentioning an issue often",
+    "says nothing about whether it was worked on. If a session's real subject is not among its own",
+    "candidates, or you cannot tell, answer with ticketKey: null.",
+    "",
+    "Set confidence between 0 and 1: how sure you are that the session's work should be logged",
+    "against that issue.",
+    "",
+    ...requests.flatMap((request) => [
+        `--- session ${request.sessionId} ---`,
+        `Candidates: ${request.candidateKeys.join(", ")}`,
+        "Digest:",
+        request.digest,
+        ""
+    ])
+].join("\n");
+/** The longest note that belongs on a worklog line. Past this it stops being a summary. */
+const MAX_NOTE_CHARS = 120;
+const Note = Schema.Struct({
+    /** Echoes the work item the note is for, so a reordered or partial reply still lines up. */
+    id: Schema.String,
+    /** One sentence, or null when the digest does not say what was done. */
+    note: Schema.NullOr(Schema.String)
+});
+const Notes = Schema.Struct({ notes: Schema.Array(Note) });
+/**
+ * One prompt covering every work item in the batch.
+ *
+ * The instructions are mostly prohibitions, because the failure mode here is not a wrong sentence
+ * but a *padded* one: a worklog line has no room for a preamble, a restatement of the issue title, or
+ * an apology for uncertainty. Silence is a correct answer and is asked for explicitly, so a session
+ * whose prompts say nothing useful produces no note rather than an invented one.
+ */
+const buildDescribePrompt = (requests) => [
+    "For each work item below, write ONE short sentence saying what was actually done, read from the",
+    "session prompts.",
+    "",
+    "Answer once per item, echoing its id. Rules:",
+    `- Past tense, at most ${MAX_NOTE_CHARS} characters, no trailing full stop.`,
+    "- Describe the work, not the conversation: no \"asked about\", no \"discussed\", no \"the user\".",
+    "- Do not repeat the issue key or the issue title, and do not add a preamble.",
+    "- If the prompts do not say what was done, answer with note: null. Do not guess.",
+    "",
+    ...requests.flatMap((request) => [
+        `--- item ${request.id} ---`,
+        request.ticketKey === null
+            ? "No associated Jira issue"
+            : `Issue: ${request.ticketKey}${request.summary === null ? "" : ` — ${request.summary}`}`,
+        "Digest:",
+        request.digest,
+        ""
+    ])
+].join("\n");
+/**
+ * Per-call ceiling. The provider default is two minutes, which is a long time to wait for a
+ * one-line classification when a run makes several calls.
+ *
+ * Measured, not guessed: at 45 seconds two of seven real sessions timed out, because several CLI
+ * processes run at once and compete for the machine. 90 seconds cleared them while still bounding
+ * a run to roughly two rounds. A session that does time out is reported as unattributed, which is
+ * the safe direction.
+ */
+const ATTRIBUTION_TIMEOUT = Duration.seconds(90);
+const clipNote = (note) => note.length <= MAX_NOTE_CHARS ? note : `${note.slice(0, MAX_NOTE_CHARS - 1).trimEnd()}…`;
+const clampConfidence = (value) => {
+    if (!Number.isFinite(value))
+        return 0;
+    return Math.min(1, Math.max(0, value));
+};
+// ---------------------------------------------------------------------------
+// Service
+// ---------------------------------------------------------------------------
+export const layer = Layer.effect(SessionAttributor, Effect.gen(function* () {
+    const home = (yield* HomeDirectory).path;
+    const config = yield* ConfigService;
+    const spawner = yield* ChildProcessSpawner.ChildProcessSpawner;
+    const fileSystem = yield* FileSystem.FileSystem;
+    // Both adapters receive all work material in the prompt and grant no tool authority.
+    // Capture platform services here so operation callers only require SessionAttributor.
+    const provider = (settings, onActivity) => {
+        const common = {
+            cwd: home,
+            timeout: ATTRIBUTION_TIMEOUT,
+            onActivity,
+            ...(settings.model !== null && { model: settings.model })
+        };
+        return settings.provider === "claude"
+            ? claudeModel({
+                ...common,
+                access: "prompt-only",
+                ...(settings.effort !== null && { effort: settings.effort })
+            })
+            : codexModel({
+                ...common,
+                access: "read-only",
+                promptOnly: true,
+                ...(settings.effort !== null && { effort: settings.effort })
+            });
+    };
+    const attribute = (requests, onActivity) => Effect.gen(function* () {
+        // Nothing to choose from anywhere — no point spending a call to learn that.
+        const askable = requests.filter((request) => request.candidateKeys.length > 0);
+        const none = (sessionId) => ({
+            sessionId,
+            choice: { _tag: "None" }
+        });
+        if (askable.length === 0)
+            return requests.map((request) => none(request.sessionId));
+        const settings = (yield* config.get).sessionAgent;
+        const response = yield* LanguageModel.generateObject({
+            prompt: buildPrompt(askable),
+            schema: Answers,
+            objectName: "attributions"
+        }).pipe(
+        // The provider is built per call and lives exactly as long as the call does, which is the
+        // scope this diagnostic exists to protect rather than one it puts at risk.
+        // @effect-diagnostics-next-line strictEffectProvide:off
+        Effect.provide(provider(settings, onActivity)), Effect.provideService(ChildProcessSpawner.ChildProcessSpawner, spawner), Effect.provideService(FileSystem.FileSystem, fileSystem), Effect.mapError((cause) => new SessionAttributorError({ message: `Coding Agent attribution failed: ${cause.message}`, cause })));
+        const bySession = new Map(response.value.answers.map((answer) => [answer.sessionId, answer]));
+        // Answered in request order, so a reply that omits, duplicates or reorders sessions cannot
+        // shift an answer onto the wrong one.
+        return requests.map((request) => {
+            const answer = bySession.get(request.sessionId);
+            if (answer === undefined || answer.ticketKey === null)
+                return none(request.sessionId);
+            return {
+                sessionId: request.sessionId,
+                choice: {
+                    _tag: "Chosen",
+                    ticketKey: answer.ticketKey,
+                    confidence: clampConfidence(answer.confidence)
+                }
+            };
+        });
+    });
+    const describe = (requests) => Effect.gen(function* () {
+        // Nothing to read means nothing to say, and no reason to spend a call learning that.
+        const askable = requests.filter((request) => request.digest.trim() !== "");
+        const silent = (id) => ({ id, note: null });
+        if (askable.length === 0)
+            return requests.map((request) => silent(request.id));
+        const settings = (yield* config.get).sessionAgent;
+        const response = yield* LanguageModel.generateObject({
+            prompt: buildDescribePrompt(askable),
+            schema: Notes,
+            objectName: "notes"
+        }).pipe(
+        // The provider is built per call and lives exactly as long as the call does, which is the
+        // scope this diagnostic exists to protect rather than one it puts at risk.
+        // @effect-diagnostics-next-line strictEffectProvide:off
+        Effect.provide(provider(settings)), Effect.provideService(ChildProcessSpawner.ChildProcessSpawner, spawner), Effect.provideService(FileSystem.FileSystem, fileSystem), Effect.mapError((cause) => new SessionAttributorError({ message: `Coding Agent description failed: ${cause.message}`, cause })));
+        const byId = new Map(response.value.notes.map((note) => [note.id, note]));
+        return requests.map((request) => {
+            const answer = byId.get(request.id);
+            if (answer === undefined || answer.note === null)
+                return silent(request.id);
+            const note = answer.note.trim();
+            // Clipped rather than rejected: an over-long sentence is still a useful one, and a worklog
+            // line is the wrong place to find out that a model ignored a character budget.
+            return { id: request.id, note: note === "" ? null : clipNote(note) };
+        });
+    });
+    return { attribute, describe };
+}));
+//# sourceMappingURL=SessionAttributor.js.map

package/dist/src/services/SessionAttributor.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"SessionAttributor.js","sourceRoot":"","sources":["../../../src/services/SessionAttributor.ts"],"names":[],"mappings":"AAAA;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;GA8BG;AACH,OAAO,EAAuB,KAAK,IAAI,WAAW,EAAE,MAAM,kBAAkB,CAAA;AAC5E,OAAO,EAAE,KAAK,IAAI,UAAU,EAAE,MAAM,iBAAiB,CAAA;AACrD,OAAO,EAAE,aAAa,EAAE,MAAM,WAAW,CAAA;AACzC,OAAO,KAAK,OAAO,MAAM,gBAAgB,CAAA;AACzC,OAAO,KAAK,IAAI,MAAM,aAAa,CAAA;AACnC,OAAO,KAAK,QAAQ,MAAM,iBAAiB,CAAA;AAC3C,OAAO,KAAK,MAAM,MAAM,eAAe,CAAA;AACvC,OAAO,KAAK,UAAU,MAAM,mBAAmB,CAAA;AAC/C,OAAO,KAAK,KAAK,MAAM,cAAc,CAAA;AACrC,OAAO,KAAK,mBAAmB,MAAM,oCAAoC,CAAA;AACzE,OAAO,KAAK,MAAM,MAAM,eAAe,CAAA;AAEvC,OAAO,EAAE,aAAa,EAAE,MAAM,oBAAoB,CAAA;AAClD,OAAO,EAAE,aAAa,EAAE,MAAM,oBAAoB,CAAA;AA2ClD,MAAM,OAAO,sBAAuB,SAAQ,IAAI,CAAC,WAAW,CAAC,wBAAwB,CAGnF;CAAG;AAkCL,MAAM,OAAO,iBAAkB,SAAQ,OAAO,CAAC,OAAO,EAAgD,CACpG,uBAAuB,CACxB;CAAG;AAEJ,8EAA8E;AAC9E,SAAS;AACT,8EAA8E;AAE9E,MAAM,MAAM,GAAG,MAAM,CAAC,MAAM,CAAC;IAC3B,4FAA4F;IAC5F,SAAS,EAAE,MAAM,CAAC,MAAM;IACxB,uEAAuE;IACvE,SAAS,EAAE,MAAM,CAAC,MAAM,CAAC,MAAM,CAAC,MAAM,CAAC;IACvC,sCAAsC;IACtC,UAAU,EAAE,MAAM,CAAC,MAAM;IACzB,2FAA2F;IAC3F,MAAM,EAAE,MAAM,CAAC,MAAM;CACtB,CAAC,CAAA;AAEF,MAAM,OAAO,GAAG,MAAM,CAAC,MAAM,CAAC,EAAE,OAAO,EAAE,MAAM,CAAC,KAAK,CAAC,MAAM,CAAC,EAAE,CAAC,CAAA;AAEhE;;;;;;GAMG;AACH,MAAM,WAAW,GAAG,CAAC,QAAiD,EAAU,EAAE,CAChF;IACE,0EAA0E;IAC1E,EAAE;IACF,iGAAiG;IACjG,4EAA4E;IAC5E,EAAE;IACF,gGAAgG;IAChG,gGAAgG;IAChG,+FAA+F;IAC/F,8DAA8D;IAC9D,EAAE;IACF,2FAA2F;IAC3F,qBAAqB;IACrB,EAAE;IACF,GAAG,QAAQ,CAAC,OAAO,CAAC,CAAC,OAAO,EAAE,EAAE,CAAC;QAC/B,eAAe,OAAO,CAAC,SAAS,MAAM;QACtC,eAAe,OAAO,CAAC,aAAa,CAAC,IAAI,CAAC,IAAI,CAAC,EAAE;QACjD,SAAS;QACT,OAAO,CAAC,MAAM;QACd,EAAE;KACH,CAAC;CACH,CAAC,IAAI,CAAC,IAAI,CAAC,CAAA;AAEd,2FAA2F;AAC3F,MAAM,cAAc,GAAG,GAAG,CAAA;AAE1B,MAAM,IAAI,GAAG,MAAM,CAAC,MAAM,CAAC;IACzB,4FAA4F;IAC5F,EAAE,EAAE,MAAM,CAAC,MAAM;IACjB,wEAAwE;IACxE,IAAI,EAAE,MAAM,CAAC,MAAM,CAAC,MAAM,CAAC,MAAM,CAAC;CACnC,CAAC,CAAA;AAEF,MAAM,KAAK,GAAG,MAAM,CAAC,MAAM,CAAC,EAAE,KAAK,EAAE,MAAM,CAAC,KAAK,CAAC,IAAI,CAAC,EAAE,CAAC,CAAA;AAE1D;;;;;;;GAOG;AACH,MAAM,mBAAmB,GAAG,CAAC,QAA+C,EAAU,EAAE,CACtF;IACE,iGAAiG;IACjG,kBAAkB;IAClB,EAAE;IACF,8CAA8C;IAC9C,yBAAyB,cAAc,qCAAqC;IAC5E,mGAAmG;IACnG,8EAA8E;IAC9E,kFAAkF;IAClF,EAAE;IACF,GAAG,QAAQ,CAAC,OAAO,CAAC,CAAC,OAAO,EAAE,EAAE,CAAC;QAC/B,YAAY,OAAO,CAAC,EAAE,MAAM;QAC5B,OAAO,CAAC,SAAS,KAAK,IAAI;YACxB,CAAC,CAAC,0BAA0B;YAC5B,CAAC,CAAC,UAAU,OAAO,CAAC,SAAS,GAAG,OAAO,CAAC,OAAO,KAAK,IAAI,CAAC,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC,MAAM,OAAO,CAAC,OAAO,EAAE,EAAE;QAC3F,SAAS;QACT,OAAO,CAAC,MAAM;QACd,EAAE;KACH,CAAC;CACH,CAAC,IAAI,CAAC,IAAI,CAAC,CAAA;AAEd;;;;;;;;GAQG;AACH,MAAM,mBAAmB,GAAG,QAAQ,CAAC,OAAO,CAAC,EAAE,CAAC,CAAA;AAEhD,MAAM,QAAQ,GAAG,CAAC,IAAY,EAAU,EAAE,CACxC,IAAI,CAAC,MAAM,IAAI,cAAc,CAAC,CAAC,CAAC,IAAI,CAAC,CAAC,CAAC,GAAG,IAAI,CAAC,KAAK,CAAC,CAAC,EAAE,cAAc,GAAG,CAAC,CAAC,CAAC,OAAO,EAAE,GAAG,CAAA;AAE1F,MAAM,eAAe,GAAG,CAAC,KAAa,EAAU,EAAE;IAChD,IAAI,CAAC,MAAM,CAAC,QAAQ,CAAC,KAAK,CAAC;QAAE,OAAO,CAAC,CAAA;IACrC,OAAO,IAAI,CAAC,GAAG,CAAC,CAAC,EAAE,IAAI,CAAC,GAAG,CAAC,CAAC,EAAE,KAAK,CAAC,CAAC,CAAA;AACxC,CAAC,CAAA;AAED,8EAA8E;AAC9E,UAAU;AACV,8EAA8E;AAE9E,MAAM,CAAC,MAAM,KAAK,GAAG,KAAK,CAAC,MAAM,CAC/B,iBAAiB,EACjB,MAAM,CAAC,GAAG,CAAC,QAAQ,CAAC;IAClB,MAAM,IAAI,GAAG,CAAC,KAAK,CAAC,CAAC,aAAa,CAAC,CAAC,IAAI,CAAA;IACxC,MAAM,MAAM,GAAG,KAAK,CAAC,CAAC,aAAa,CAAA;IACnC,MAAM,OAAO,GAAG,KAAK,CAAC,CAAC,mBAAmB,CAAC,mBAAmB,CAAA;IAC9D,MAAM,UAAU,GAAG,KAAK,CAAC,CAAC,UAAU,CAAC,UAAU,CAAA;IAE/C,qFAAqF;IACrF,sFAAsF;IACtF,MAAM,QAAQ,GAAG,CACf,QAA8B,EAC9B,UAA8D,EAC9D,EAAE;QACF,MAAM,MAAM,GAAG;YACb,GAAG,EAAE,IAAI;YACT,OAAO,EAAE,mBAAmB;YAC5B,UAAU;YACV,GAAG,CAAC,QAAQ,CAAC,KAAK,KAAK,IAAI,IAAI,EAAE,KAAK,EAAE,QAAQ,CAAC,KAAK,EAAE,CAAC;SAC1D,CAAA;QACD,OAAO,QAAQ,CAAC,QAAQ,KAAK,QAAQ;YACnC,CAAC,CAAC,WAAW,CAAC;gBACZ,GAAG,MAAM;gBACT,MAAM,EAAE,aAAa;gBACrB,GAAG,CAAC,QAAQ,CAAC,MAAM,KAAK,IAAI,IAAI,EAAE,MAAM,EAAE,QAAQ,CAAC,MAAM,EAAE,CAAC;aAC7D,CAAC;YACF,CAAC,CAAC,UAAU,CAAC;gBACX,GAAG,MAAM;gBACT,MAAM,EAAE,WAAW;gBACnB,UAAU,EAAE,IAAI;gBAChB,GAAG,CAAC,QAAQ,CAAC,MAAM,KAAK,IAAI,IAAI,EAAE,MAAM,EAAE,QAAQ,CAAC,MAAM,EAAE,CAAC;aAC7D,CAAC,CAAA;IACN,CAAC,CAAA;IAED,MAAM,SAAS,GAAG,CAChB,QAAiD,EACjD,UAA8D,EAC9D,EAAE,CACF,MAAM,CAAC,GAAG,CAAC,QAAQ,CAAC;QAClB,4EAA4E;QAC5E,MAAM,OAAO,GAAG,QAAQ,CAAC,MAAM,CAAC,CAAC,OAAO,EAAE,EAAE,CAAC,OAAO,CAAC,aAAa,CAAC,MAAM,GAAG,CAAC,CAAC,CAAA;QAC9E,MAAM,IAAI,GAAG,CAAC,SAAiB,EAA2B,EAAE,CAAC,CAAC;YAC5D,SAAS;YACT,MAAM,EAAE,EAAE,IAAI,EAAE,MAAM,EAAE;SACzB,CAAC,CAAA;QACF,IAAI,OAAO,CAAC,MAAM,KAAK,CAAC;YAAE,OAAO,QAAQ,CAAC,GAAG,CAAC,CAAC,OAAO,EAAE,EAAE,CAAC,IAAI,CAAC,OAAO,CAAC,SAAS,CAAC,CAAC,CAAA;QAEnF,MAAM,QAAQ,GAAG,CAAC,KAAK,CAAC,CAAC,MAAM,CAAC,GAAG,CAAC,CAAC,YAAY,CAAA;QACjD,MAAM,QAAQ,GAAG,KAAK,CAAC,CAAC,aAAa,CAAC,cAAc,CAAC;YACnD,MAAM,EAAE,WAAW,CAAC,OAAO,CAAC;YAC5B,MAAM,EAAE,OAAO;YACf,UAAU,EAAE,cAAc;SAC3B,CAAC,CAAC,IAAI;QACL,0FAA0F;QAC1F,2EAA2E;QAC3E,wDAAwD;QACxD,MAAM,CAAC,OAAO,CAAC,QAAQ,CAAC,QAAQ,EAAE,UAAU,CAAC,CAAC,EAC9C,MAAM,CAAC,cAAc,CAAC,mBAAmB,CAAC,mBAAmB,EAAE,OAAO,CAAC,EACvE,MAAM,CAAC,cAAc,CAAC,UAAU,CAAC,UAAU,EAAE,UAAU,CAAC,EACxD,MAAM,CAAC,QAAQ,CAAC,CAAC,KAAK,EAAE,EAAE,CACxB,IAAI,sBAAsB,CAAC,EAAE,OAAO,EAAE,oCAAoC,KAAK,CAAC,OAAO,EAAE,EAAE,KAAK,EAAE,CAAC,CACpG,CACF,CAAA;QAED,MAAM,SAAS,GAAG,IAAI,GAAG,CAAC,QAAQ,CAAC,KAAK,CAAC,OAAO,CAAC,GAAG,CAAC,CAAC,MAAM,EAAE,EAAE,CAAC,CAAC,MAAM,CAAC,SAAS,EAAE,MAAM,CAAC,CAAC,CAAC,CAAA;QAC7F,2FAA2F;QAC3F,sCAAsC;QACtC,OAAO,QAAQ,CAAC,GAAG,CAAC,CAAC,OAAO,EAA2B,EAAE;YACvD,MAAM,MAAM,GAAG,SAAS,CAAC,GAAG,CAAC,OAAO,CAAC,SAAS,CAAC,CAAA;YAC/C,IAAI,MAAM,KAAK,SAAS,IAAI,MAAM,CAAC,SAAS,KAAK,IAAI;gBAAE,OAAO,IAAI,CAAC,OAAO,CAAC,SAAS,CAAC,CAAA;YACrF,OAAO;gBACL,SAAS,EAAE,OAAO,CAAC,SAAS;gBAC5B,MAAM,EAAE;oBACN,IAAI,EAAE,QAAQ;oBACd,SAAS,EAAE,MAAM,CAAC,SAAS;oBAC3B,UAAU,EAAE,eAAe,CAAC,MAAM,CAAC,UAAU,CAAC;iBAC/C;aACF,CAAA;QACH,CAAC,CAAC,CAAA;IACJ,CAAC,CAAC,CAAA;IAEJ,MAAM,QAAQ,GAAG,CAAC,QAA+C,EAAE,EAAE,CACnE,MAAM,CAAC,GAAG,CAAC,QAAQ,CAAC;QAClB,qFAAqF;QACrF,MAAM,OAAO,GAAG,QAAQ,CAAC,MAAM,CAAC,CAAC,OAAO,EAAE,EAAE,CAAC,OAAO,CAAC,MAAM,CAAC,IAAI,EAAE,KAAK,EAAE,CAAC,CAAA;QAC1E,MAAM,MAAM,GAAG,CAAC,EAAU,EAAyB,EAAE,CAAC,CAAC,EAAE,EAAE,EAAE,IAAI,EAAE,IAAI,EAAE,CAAC,CAAA;QAC1E,IAAI,OAAO,CAAC,MAAM,KAAK,CAAC;YAAE,OAAO,QAAQ,CAAC,GAAG,CAAC,CAAC,OAAO,EAAE,EAAE,CAAC,MAAM,CAAC,OAAO,CAAC,EAAE,CAAC,CAAC,CAAA;QAE9E,MAAM,QAAQ,GAAG,CAAC,KAAK,CAAC,CAAC,MAAM,CAAC,GAAG,CAAC,CAAC,YAAY,CAAA;QACjD,MAAM,QAAQ,GAAG,KAAK,CAAC,CAAC,aAAa,CAAC,cAAc,CAAC;YACnD,MAAM,EAAE,mBAAmB,CAAC,OAAO,CAAC;YACpC,MAAM,EAAE,KAAK;YACb,UAAU,EAAE,OAAO;SACpB,CAAC,CAAC,IAAI;QACL,0FAA0F;QAC1F,2EAA2E;QAC3E,wDAAwD;QACxD,MAAM,CAAC,OAAO,CAAC,QAAQ,CAAC,QAAQ,CAAC,CAAC,EAClC,MAAM,CAAC,cAAc,CAAC,mBAAmB,CAAC,mBAAmB,EAAE,OAAO,CAAC,EACvE,MAAM,CAAC,cAAc,CAAC,UAAU,CAAC,UAAU,EAAE,UAAU,CAAC,EACxD,MAAM,CAAC,QAAQ,CAAC,CAAC,KAAK,EAAE,EAAE,CACxB,IAAI,sBAAsB,CAAC,EAAE,OAAO,EAAE,oCAAoC,KAAK,CAAC,OAAO,EAAE,EAAE,KAAK,EAAE,CAAC,CACpG,CACF,CAAA;QAED,MAAM,IAAI,GAAG,IAAI,GAAG,CAAC,QAAQ,CAAC,KAAK,CAAC,KAAK,CAAC,GAAG,CAAC,CAAC,IAAI,EAAE,EAAE,CAAC,CAAC,IAAI,CAAC,EAAE,EAAE,IAAI,CAAC,CAAC,CAAC,CAAA;QACzE,OAAO,QAAQ,CAAC,GAAG,CAAC,CAAC,OAAO,EAAyB,EAAE;YACrD,MAAM,MAAM,GAAG,IAAI,CAAC,GAAG,CAAC,OAAO,CAAC,EAAE,CAAC,CAAA;YACnC,IAAI,MAAM,KAAK,SAAS,IAAI,MAAM,CAAC,IAAI,KAAK,IAAI;gBAAE,OAAO,MAAM,CAAC,OAAO,CAAC,EAAE,CAAC,CAAA;YAC3E,MAAM,IAAI,GAAG,MAAM,CAAC,IAAI,CAAC,IAAI,EAAE,CAAA;YAC/B,2FAA2F;YAC3F,+EAA+E;YAC/E,OAAO,EAAE,EAAE,EAAE,OAAO,CAAC,EAAE,EAAE,IAAI,EAAE,IAAI,KAAK,EAAE,CAAC,CAAC,CAAC,IAAI,CAAC,CAAC,CAAC,QAAQ,CAAC,IAAI,CAAC,EAAE,CAAA;QACtE,CAAC,CAAC,CAAA;IACJ,CAAC,CAAC,CAAA;IAEJ,OAAO,EAAE,SAAS,EAAE,QAAQ,EAAE,CAAA;AAChC,CAAC,CAAC,CACH,CAAA"}

package/dist/src/services/SourceLedger.d.ts

@@ -0,0 +1,104 @@
+/** Private, versioned bindings between confirmed session writes and provider entries. */
+import * as Context from "effect/Context";
+import * as Effect from "effect/Effect";
+import * as FileSystem from "effect/FileSystem";
+import * as Layer from "effect/Layer";
+import * as Path from "effect/Path";
+import * as Schema from "effect/Schema";
+import { ConfigService } from "./ConfigService.js";
+declare const Identity: Schema.Struct<{
+    readonly provider: Schema.Literals<readonly ["clockify", "jira"]>;
+    readonly scope: Schema.NonEmptyString;
+    readonly rowId: Schema.NonEmptyString;
+    readonly sourceStartMs: Schema.Finite;
+    readonly startMs: Schema.Finite;
+    readonly endMs: Schema.Finite;
+    readonly seconds: Schema.Finite;
+    readonly ticketKey: Schema.NonEmptyString;
+}>;
+export interface SourceIdentity extends Schema.Schema.Type<typeof Identity> {
+}
+declare const Binding: Schema.Struct<{
+    readonly provider: Schema.Literals<readonly ["clockify", "jira"]>;
+    readonly scope: Schema.NonEmptyString;
+    readonly rowId: Schema.NonEmptyString;
+    readonly sourceStartMs: Schema.Finite;
+    readonly startMs: Schema.Finite;
+    readonly endMs: Schema.Finite;
+    readonly seconds: Schema.Finite;
+    readonly ticketKey: Schema.NonEmptyString;
+    readonly entryId: Schema.NonEmptyString;
+    readonly jiraCreatedAtMs: Schema.optionalKey<Schema.Number>;
+}>;
+export interface SourceBinding extends Schema.Schema.Type<typeof Binding> {
+}
+declare const ReviewedWindow: Schema.Struct<{
+    readonly provider: Schema.Literals<readonly ["clockify", "jira"]>;
+    readonly scope: Schema.NonEmptyString;
+    readonly fromMs: Schema.Finite;
+    readonly toMs: Schema.Finite;
+}>;
+export interface SourceWindow extends Schema.Schema.Type<typeof ReviewedWindow> {
+}
+declare const LedgerFile: Schema.Struct<{
+    readonly version: Schema.Literal<4>;
+    readonly reviewedWindows: Schema.$Array<Schema.Struct<{
+        readonly provider: Schema.Literals<readonly ["clockify", "jira"]>;
+        readonly scope: Schema.NonEmptyString;
+        readonly fromMs: Schema.Finite;
+        readonly toMs: Schema.Finite;
+    }>>;
+    readonly pending: Schema.$Array<Schema.Struct<{
+        readonly provider: Schema.Literals<readonly ["clockify", "jira"]>;
+        readonly scope: Schema.NonEmptyString;
+        readonly rowId: Schema.NonEmptyString;
+        readonly sourceStartMs: Schema.Finite;
+        readonly startMs: Schema.Finite;
+        readonly endMs: Schema.Finite;
+        readonly seconds: Schema.Finite;
+        readonly ticketKey: Schema.NonEmptyString;
+    }>>;
+    readonly bindings: Schema.$Array<Schema.Struct<{
+        readonly provider: Schema.Literals<readonly ["clockify", "jira"]>;
+        readonly scope: Schema.NonEmptyString;
+        readonly rowId: Schema.NonEmptyString;
+        readonly sourceStartMs: Schema.Finite;
+        readonly startMs: Schema.Finite;
+        readonly endMs: Schema.Finite;
+        readonly seconds: Schema.Finite;
+        readonly ticketKey: Schema.NonEmptyString;
+        readonly entryId: Schema.NonEmptyString;
+        readonly jiraCreatedAtMs: Schema.optionalKey<Schema.Number>;
+    }>>;
+    readonly observedUnbound: Schema.$Array<Schema.Struct<{
+        readonly provider: Schema.Literals<readonly ["clockify", "jira"]>;
+        readonly scope: Schema.NonEmptyString;
+        readonly entryId: Schema.NonEmptyString;
+        readonly startMs: Schema.Finite;
+    }>>;
+}>;
+export type LedgerFile = typeof LedgerFile.Type;
+declare const SourceLedgerError_base: Schema.Class<SourceLedgerError, Schema.TaggedStruct<"SourceLedgerError", {
+    readonly message: Schema.String;
+    readonly cause: Schema.optionalKey<Schema.Defect>;
+}>, import("effect/Cause").YieldableError>;
+export declare class SourceLedgerError extends SourceLedgerError_base {
+}
+export interface SourceLedgerContract {
+    readonly read: Effect.Effect<LedgerFile, SourceLedgerError>;
+    readonly assertNoLegacyClockify: (legacyScope: string) => Effect.Effect<void, SourceLedgerError>;
+    readonly reserve: (identity: SourceIdentity, legacyScope?: string) => Effect.Effect<void, SourceLedgerError>;
+    readonly bind: (identity: SourceIdentity, entryId: string, jiraCreatedAtMs?: number) => Effect.Effect<void, SourceLedgerError>;
+    readonly release: (identity: SourceIdentity) => Effect.Effect<void, SourceLedgerError>;
+    readonly ensureWindow: (window: SourceWindow, observed: ReadonlyArray<{
+        readonly entryId: string;
+        readonly startMs: number;
+    }>, markerBindings: ReadonlyArray<SourceBinding>, legacyScope?: string) => Effect.Effect<void, SourceLedgerError>;
+}
+declare const SourceLedger_base: Context.ServiceClass<SourceLedger, "jcf/SourceLedger", SourceLedgerContract>;
+export declare class SourceLedger extends SourceLedger_base {
+}
+/** A pending remote create never becomes permission to repeat it after a crash. */
+export declare const layer: Layer.Layer<SourceLedger, never, ConfigService | FileSystem.FileSystem | Path.Path>;
+export {};
+//# sourceMappingURL=SourceLedger.d.ts.map

package/dist/src/services/SourceLedger.d.ts.map

@@ -0,0 +1 @@
+{"version":3,"file":"SourceLedger.d.ts","sourceRoot":"","sources":["../../../src/services/SourceLedger.ts"],"names":[],"mappings":"AAAA,yFAAyF;AACzF,OAAO,KAAK,OAAO,MAAM,gBAAgB,CAAA;AACzC,OAAO,KAAK,MAAM,MAAM,eAAe,CAAA;AACvC,OAAO,KAAK,UAAU,MAAM,mBAAmB,CAAA;AAC/C,OAAO,KAAK,KAAK,MAAM,cAAc,CAAA;AAErC,OAAO,KAAK,IAAI,MAAM,aAAa,CAAA;AACnC,OAAO,KAAK,MAAM,MAAM,eAAe,CAAA;AACvC,OAAO,EAAE,aAAa,EAAE,MAAM,oBAAoB,CAAA;AAKlD,QAAA,MAAM,QAAQ;;;;;;;;;EAgBb,CAAA;AAED,MAAM,WAAW,cAAe,SAAQ,MAAM,CAAC,MAAM,CAAC,IAAI,CAAC,OAAO,QAAQ,CAAC;CAAG;AAQ9E,QAAA,MAAM,OAAO;;;;;;;;;;;EAEV,CAAA;AACH,MAAM,WAAW,aAAc,SAAQ,MAAM,CAAC,MAAM,CAAC,IAAI,CAAC,OAAO,OAAO,CAAC;CAAG;AAE5E,QAAA,MAAM,cAAc;;;;;EAKsF,CAAA;AAC1G,MAAM,WAAW,YAAa,SAAQ,MAAM,CAAC,MAAM,CAAC,IAAI,CAAC,OAAO,cAAc,CAAC;CAAG;AAgClF,QAAA,MAAM,UAAU;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;EAwB8E,CAAA;AAE9F,MAAM,MAAM,UAAU,GAAG,OAAO,UAAU,CAAC,IAAI,CAAA;;;;;AA+B/C,qBAAa,iBAAkB,SAAQ,sBAGrC;CAAG;AAEL,MAAM,WAAW,oBAAoB;IACnC,QAAQ,CAAC,IAAI,EAAE,MAAM,CAAC,MAAM,CAAC,UAAU,EAAE,iBAAiB,CAAC,CAAA;IAC3D,QAAQ,CAAC,sBAAsB,EAAE,CAAC,WAAW,EAAE,MAAM,KAAK,MAAM,CAAC,MAAM,CAAC,IAAI,EAAE,iBAAiB,CAAC,CAAA;IAChG,QAAQ,CAAC,OAAO,EAAE,CAAC,QAAQ,EAAE,cAAc,EAAE,WAAW,CAAC,EAAE,MAAM,KAAK,MAAM,CAAC,MAAM,CAAC,IAAI,EAAE,iBAAiB,CAAC,CAAA;IAC5G,QAAQ,CAAC,IAAI,EAAE,CACb,QAAQ,EAAE,cAAc,EACxB,OAAO,EAAE,MAAM,EACf,eAAe,CAAC,EAAE,MAAM,KACrB,MAAM,CAAC,MAAM,CAAC,IAAI,EAAE,iBAAiB,CAAC,CAAA;IAC3C,QAAQ,CAAC,OAAO,EAAE,CAAC,QAAQ,EAAE,cAAc,KAAK,MAAM,CAAC,MAAM,CAAC,IAAI,EAAE,iBAAiB,CAAC,CAAA;IACtF,QAAQ,CAAC,YAAY,EAAE,CACrB,MAAM,EAAE,YAAY,EACpB,QAAQ,EAAE,aAAa,CAAC;QAAE,QAAQ,CAAC,OAAO,EAAE,MAAM,CAAC;QAAC,QAAQ,CAAC,OAAO,EAAE,MAAM,CAAA;KAAE,CAAC,EAC/E,cAAc,EAAE,aAAa,CAAC,aAAa,CAAC,EAC5C,WAAW,CAAC,EAAE,MAAM,KACjB,MAAM,CAAC,MAAM,CAAC,IAAI,EAAE,iBAAiB,CAAC,CAAA;CAC5C;;AAED,qBAAa,YAAa,SAAQ,iBAAyE;CAAG;AAkB9G,mFAAmF;AACnF,eAAO,MAAM,KAAK,qFAkSjB,CAAA"}