polydeukes 0.3.0 → 0.5.0
This diff represents the content of publicly available package versions that have been released to one of the supported registries. The information contained in this diff is provided for informational purposes only and reflects changes between package versions as they appear in their respective public registries.
- package/README.ko.md +3 -2
- package/README.md +10 -2
- package/dist/bin.d.ts +5 -6
- package/dist/bin.js +75 -38
- package/dist/claude-code-hook.d.ts +45 -15
- package/dist/claude-code-hook.js +245 -158
- package/dist/covenant-check.d.ts +58 -31
- package/dist/covenant-check.js +145 -179
- package/dist/covenant-module.d.ts +25 -0
- package/dist/covenant-module.js +34 -0
- package/dist/docs/configuration.md +44 -302
- package/dist/docs/installation.md +7 -3
- package/dist/docs/reference/adapter-git.md +17 -6
- package/dist/docs/reference/configuration.md +338 -0
- package/dist/docs/reference/core.md +8 -6
- package/dist/docs/reference/covenant.md +13 -5
- package/dist/docs/reference/polydeukes.md +103 -26
- package/dist/docs/troubleshooting.md +12 -2
- package/dist/docs-query.d.ts +10 -10
- package/dist/docs-query.js +20 -20
- package/dist/explain.d.ts +27 -0
- package/dist/explain.js +152 -0
- package/dist/index.d.ts +10 -14
- package/dist/index.js +9 -13
- package/dist/init-claude-code.d.ts +28 -17
- package/dist/init-claude-code.js +208 -40
- package/dist/load-config.d.ts +15 -16
- package/dist/load-config.js +21 -14
- package/dist/scaffold-project.d.ts +20 -20
- package/dist/scaffold-project.js +69 -30
- package/dist/schema/polydeukes.schema.json +229 -0
- package/package.json +8 -7
package/dist/claude-code-hook.js
CHANGED
|
@@ -1,5 +1,5 @@
|
|
|
1
1
|
/**
|
|
2
|
-
* `runClaudeCodeHook` — the assembled session-surface judgment runner
|
|
2
|
+
* `runClaudeCodeHook` — the assembled session-surface judgment runner.
|
|
3
3
|
*
|
|
4
4
|
* The session counterpart of {@link runCovenantCheck}, and the one place where the Claude
|
|
5
5
|
* Code adapter (tool vocabulary, up-translation) and the covenant package (dispatcher +
|
|
@@ -8,17 +8,14 @@
|
|
|
8
8
|
* a delegator that calls this function. That is what makes the session surface installable:
|
|
9
9
|
* a consumer registers a hook that resolves this package instead of copying assembly.
|
|
10
10
|
*
|
|
11
|
-
*
|
|
12
|
-
*
|
|
13
|
-
*
|
|
14
|
-
* root data config through {@link loadConfig} (CONFIG-03), which also attaches the config
|
|
15
|
-
* file to its own surface.
|
|
11
|
+
* The protection-policy data (protectedPaths / disciplines / witness) is read from the root
|
|
12
|
+
* data config through {@link loadConfig}, which also attaches the config file to its own
|
|
13
|
+
* surface.
|
|
16
14
|
*
|
|
17
|
-
* The valve is the TTL witness
|
|
18
|
-
*
|
|
19
|
-
*
|
|
20
|
-
*
|
|
21
|
-
* utterance carries the transcript marking `findUserMessages()` admits.
|
|
15
|
+
* The valve is the TTL witness, judged over the JSONL transcript provider. The judge body
|
|
16
|
+
* always spawns, and only an outcome that translated to blocked consults the witness —
|
|
17
|
+
* `witnessed` rows are would-block only. Its defence is provenance rather than secrecy: only
|
|
18
|
+
* a real human utterance carries the transcript marking `findUserMessages()` admits.
|
|
22
19
|
*
|
|
23
20
|
* fail-closed: ANY failure — an unbuilt judge body, an unreadable stdin, a missing or
|
|
24
21
|
* invalid config file — resolves to `{ exitCode: 2 }` with one `blocked` record under the
|
|
@@ -26,48 +23,193 @@
|
|
|
26
23
|
* the cheapest bypass vector there is. Recovery from an unbuilt clone is `pnpm build` (it
|
|
27
24
|
* mentions no protected path, so it is never blocked).
|
|
28
25
|
*/
|
|
29
|
-
import {
|
|
30
|
-
import { createRequire } from 'node:module';
|
|
26
|
+
import { mkdirSync, readFileSync } from 'node:fs';
|
|
31
27
|
import { homedir } from 'node:os';
|
|
32
|
-
import {
|
|
28
|
+
import { join, resolve } from 'node:path';
|
|
33
29
|
import { COMMAND_ARGS, evaluatePrecedent, MUTATING_TOOLS, runAdapterPath, SHELL_TOOLS, transcriptFromJsonlFile, transcriptPathFromPayload, } from '@polydeukes/adapter-claude-code';
|
|
34
|
-
import { appendRecordFailOpen, normalizeProtectedPaths } from '@polydeukes/core';
|
|
35
|
-
import {
|
|
30
|
+
import { appendRecordFailOpen, DEFAULT_TELEMETRY_LOG_PATH, normalizeProtectedPaths, readRecords, } from '@polydeukes/core';
|
|
31
|
+
import { findUnattributed, readBaseline, snapshotBaseline, ttlWitness, writeBaseline, } from '@polydeukes/covenant';
|
|
32
|
+
import { loadCovenantModule, resolveCovenantDist } from './covenant-module.js';
|
|
36
33
|
import { loadConfig } from './load-config.js';
|
|
34
|
+
/** The label every post-hoc state comparison row carries. */
|
|
35
|
+
const BASELINE_LABEL = 'baseline';
|
|
37
36
|
/**
|
|
38
|
-
*
|
|
39
|
-
*
|
|
40
|
-
*
|
|
41
|
-
*
|
|
42
|
-
*
|
|
37
|
+
* Compare the protected entries' on-disk state against the stored baseline and record what
|
|
38
|
+
* moved with no judgment explaining it.
|
|
39
|
+
*
|
|
40
|
+
* Runs at hook call START, before this call's own judgment rows land, so the window it reads
|
|
41
|
+
* is the one the previous comparison left open. Returns the record count as of right now —
|
|
42
|
+
* where the NEXT window opens, which {@link updateBaseline} persists at call end.
|
|
43
|
+
*
|
|
44
|
+
* The comparison records, it never blocks: no row it writes and no failure it hits changes
|
|
45
|
+
* a verdict or an exit code, which is why every caller keeps it outside the judgment path.
|
|
43
46
|
*/
|
|
44
|
-
function
|
|
45
|
-
const
|
|
46
|
-
|
|
47
|
-
|
|
47
|
+
function compareBaseline(spec) {
|
|
48
|
+
const baselinePath = join(spec.repoRoot, '.polydeukes', 'baseline.json');
|
|
49
|
+
// Read before any row of this comparison lands, so the rows this call is about to write
|
|
50
|
+
// cannot fall inside the window they would then explain away.
|
|
51
|
+
const { records } = readRecords(spec.telemetryPath);
|
|
52
|
+
const stored = readBaseline(baselinePath);
|
|
53
|
+
if (stored === null) {
|
|
54
|
+
// Absence and corruption are the same signal. The baseline file is NOT on the protection
|
|
55
|
+
// list — protecting it would need a comparison of its own — so its disappearance has to
|
|
56
|
+
// stay legible in the log instead.
|
|
57
|
+
appendRecordFailOpen(spec.telemetryPath, {
|
|
58
|
+
event: 'unattributed',
|
|
59
|
+
label: BASELINE_LABEL,
|
|
60
|
+
subject: baselinePath,
|
|
61
|
+
});
|
|
62
|
+
return;
|
|
63
|
+
}
|
|
64
|
+
const changed = findUnattributed({
|
|
65
|
+
previous: stored.entries,
|
|
66
|
+
current: snapshotBaseline({ rootDir: spec.repoRoot, entries: spec.entries }),
|
|
67
|
+
records,
|
|
68
|
+
// The cut travels with the hashes it belongs to, from the one read above. Rows older
|
|
69
|
+
// than it were already spent explaining the state that snapshot recorded.
|
|
70
|
+
cutAt: stored.cutAt,
|
|
71
|
+
});
|
|
72
|
+
// One row per changed entry — an aggregate row could not say WHICH gate definition moved.
|
|
73
|
+
for (const entry of changed) {
|
|
74
|
+
appendRecordFailOpen(spec.telemetryPath, {
|
|
75
|
+
event: 'unattributed',
|
|
76
|
+
label: BASELINE_LABEL,
|
|
77
|
+
subject: entry,
|
|
78
|
+
});
|
|
48
79
|
}
|
|
49
|
-
return modulePath;
|
|
50
80
|
}
|
|
51
81
|
/**
|
|
52
|
-
*
|
|
53
|
-
*
|
|
54
|
-
*
|
|
82
|
+
* Re-establish the baseline at hook call END.
|
|
83
|
+
*
|
|
84
|
+
* At call end rather than right after the comparison: refreshing at comparison time would
|
|
85
|
+
* miss whatever this call's own judged writes changed, leaving detection permanently one
|
|
86
|
+
* call behind.
|
|
87
|
+
*
|
|
88
|
+
* The cut is stamped HERE, beside the snapshot, not at the comparison that opened the call.
|
|
89
|
+
* Both describe the same instant — everything this call did is already folded into the
|
|
90
|
+
* hashes — so the rows explaining it belong before the cut. Stamping the earlier instant
|
|
91
|
+
* instead would re-admit this call's own judgment rows into the next window, where they
|
|
92
|
+
* would attribute a change they had nothing to do with: a call that merely MENTIONED a
|
|
93
|
+
* protected entry would then absolve any tamper that followed it.
|
|
55
94
|
*/
|
|
56
|
-
|
|
57
|
-
|
|
58
|
-
|
|
59
|
-
|
|
95
|
+
function updateBaseline(spec) {
|
|
96
|
+
const dotDir = join(spec.repoRoot, '.polydeukes');
|
|
97
|
+
mkdirSync(dotDir, { recursive: true });
|
|
98
|
+
writeBaseline(join(dotDir, 'baseline.json'), snapshotBaseline({ rootDir: spec.repoRoot, entries: spec.entries }), new Date().toISOString());
|
|
99
|
+
}
|
|
100
|
+
/**
|
|
101
|
+
* Where the comparison writes and what it observes, or `undefined`.
|
|
102
|
+
*
|
|
103
|
+
* The domain is derived from config rather than enumerated here, and the telemetry path is
|
|
104
|
+
* resolved by the same precedence the judgment uses so both land in one log. A config that
|
|
105
|
+
* does not load leaves NO domain, so there is nothing to compare and nothing to re-establish
|
|
106
|
+
* — the judgment path already answers that failure fail-closed, and a comparison row on top
|
|
107
|
+
* of it would report the same absence twice under a label that judges nothing.
|
|
108
|
+
*/
|
|
109
|
+
function comparisonSpec(spec) {
|
|
110
|
+
let config;
|
|
111
|
+
try {
|
|
112
|
+
config = loadConfig(spec.repoRoot).config;
|
|
113
|
+
}
|
|
114
|
+
catch {
|
|
115
|
+
return undefined;
|
|
116
|
+
}
|
|
117
|
+
return {
|
|
118
|
+
repoRoot: spec.repoRoot,
|
|
119
|
+
telemetryPath: spec.telemetryPath ??
|
|
120
|
+
process.env.POLYDEUKES_TELEMETRY_PATH ??
|
|
121
|
+
resolve(spec.repoRoot, config.telemetry.logPath),
|
|
122
|
+
entries: normalizeProtectedPaths({ protectedPaths: config.protectedPaths }),
|
|
123
|
+
};
|
|
124
|
+
}
|
|
125
|
+
/**
|
|
126
|
+
* The session surface's registration set. One assembly, two consumers: the runner below
|
|
127
|
+
* dispatches it, `explain` renders it — so what a reader is shown is the table the judgment
|
|
128
|
+
* actually uses, never a second opinion about it.
|
|
129
|
+
*/
|
|
130
|
+
export function assembleSessionRegistrations(spec) {
|
|
131
|
+
const { config, rootDir, covenant, transcriptPath, transcript, witness } = spec;
|
|
132
|
+
// The live transcript is the evidence channel the context family reads AND the one the
|
|
133
|
+
// witness reads, so erasing or forging it disables every context discipline while opening
|
|
134
|
+
// or shutting the human valve on the same file. It must NOT join this list: it lives deep
|
|
135
|
+
// under HOME, and a path entry makes every ancestor protected — which measured as an
|
|
136
|
+
// over-block refusing `cd /home/<user>`, `echo $HOME`, and every edit whose content
|
|
137
|
+
// carried a bare `~`. The dedicated `transcript-mod` registration below covers that one
|
|
138
|
+
// file instead: equality-only, never an ancestor. Ancestor destruction outside the
|
|
139
|
+
// repository is out of observation scope — the agent's own deny policy owns what no
|
|
140
|
+
// repo-scoped judge can reach.
|
|
141
|
+
const protectedPaths = normalizeProtectedPaths({
|
|
142
|
+
protectedPaths: config.protectedPaths ?? [],
|
|
143
|
+
});
|
|
144
|
+
const disciplines = config.disciplines ?? [];
|
|
145
|
+
const registrations = [
|
|
146
|
+
covenant.selfModRegistration({
|
|
147
|
+
protectedPaths,
|
|
148
|
+
mutatingToolNames: MUTATING_TOOLS,
|
|
149
|
+
witness,
|
|
150
|
+
}),
|
|
151
|
+
covenant.shellModRegistration({
|
|
152
|
+
protectedPaths,
|
|
153
|
+
shellTools: SHELL_TOOLS,
|
|
154
|
+
commandArgs: COMMAND_ARGS,
|
|
155
|
+
witness,
|
|
156
|
+
}),
|
|
157
|
+
// Routing is the matches predicate, never path mention, so the home directory cannot
|
|
158
|
+
// become a protected ancestor. No transcript in the payload means nothing to protect —
|
|
159
|
+
// the valve and the context family already forfeited on the same absence.
|
|
160
|
+
...(transcriptPath === undefined
|
|
161
|
+
? []
|
|
162
|
+
: [
|
|
163
|
+
covenant.transcriptModRegistration({
|
|
164
|
+
transcriptPath,
|
|
165
|
+
// The env value first, since that is what the judged shell expands `~` and
|
|
166
|
+
// `$HOME` from. `homedir()` reads the same passwd entry bash falls back to when
|
|
167
|
+
// HOME is unset, so a hook spawned without an environment (a service manager,
|
|
168
|
+
// `env -i`) keeps judging the home spellings instead of silently going
|
|
169
|
+
// absolute-only — an inert spelling closure looks identical to a passing call.
|
|
170
|
+
home: process.env.HOME ?? homedir(),
|
|
171
|
+
shellTools: SHELL_TOOLS,
|
|
172
|
+
commandArgs: COMMAND_ARGS,
|
|
173
|
+
mutatingTools: MUTATING_TOOLS,
|
|
174
|
+
witness,
|
|
175
|
+
}),
|
|
176
|
+
]),
|
|
177
|
+
...covenant.compileDisciplineRegistrations({
|
|
178
|
+
disciplines,
|
|
179
|
+
rootDir,
|
|
180
|
+
shellTools: SHELL_TOOLS,
|
|
181
|
+
commandArgs: COMMAND_ARGS,
|
|
182
|
+
witness,
|
|
183
|
+
// Context-family evidence is evaluated here, at assembly: a spawned body cannot hold
|
|
184
|
+
// a transcript, and passing a path would leak JSONL knowledge into covenant. The
|
|
185
|
+
// adapter brings the evaluator for its own `subagent`/`tool` vocabulary; core owns
|
|
186
|
+
// `command`, which the compiler judges directly.
|
|
187
|
+
transcript,
|
|
188
|
+
evaluatePrecedent,
|
|
189
|
+
}),
|
|
190
|
+
];
|
|
191
|
+
return registrations;
|
|
192
|
+
}
|
|
193
|
+
/**
|
|
194
|
+
* Judge one declared tool call before it runs. Async because the dispatcher spawns covenant
|
|
195
|
+
* bodies — a synchronous runner would mean reimplementing the judge, which the
|
|
196
|
+
* single-dispatcher principle forbids.
|
|
197
|
+
*/
|
|
198
|
+
async function judgeHookCall(spec) {
|
|
199
|
+
// Env-first telemetry precedence, settled BEFORE any failure branch: a config that never
|
|
200
|
+
// loads still has somewhere to write its one blocked row. The config value applies after
|
|
201
|
+
// the load succeeds.
|
|
60
202
|
//
|
|
61
203
|
// Computed INSIDE the try even though it must run first, because `join` throws on a
|
|
62
204
|
// non-string repoRoot and this function's contract is that nothing escapes it — a rejection
|
|
63
205
|
// would exit a delegator non-blocking, which is the cheapest bypass there is. A throw here
|
|
64
206
|
// leaves `telemetryPath` undefined, which the catch tolerates: there is no root to write a
|
|
65
|
-
// row under anyway
|
|
207
|
+
// row under anyway.
|
|
66
208
|
let telemetryPath;
|
|
67
209
|
try {
|
|
68
210
|
const envTelemetryPath = process.env.POLYDEUKES_TELEMETRY_PATH;
|
|
69
211
|
telemetryPath =
|
|
70
|
-
spec.telemetryPath ?? envTelemetryPath ?? join(spec.repoRoot,
|
|
212
|
+
spec.telemetryPath ?? envTelemetryPath ?? join(spec.repoRoot, DEFAULT_TELEMETRY_LOG_PATH);
|
|
71
213
|
// Discovery + parse + validation are the loader's job; a throw here (absent, ambiguous,
|
|
72
214
|
// unparseable, or invalid config) falls into the fail-closed catch.
|
|
73
215
|
const { config } = loadConfig(spec.repoRoot);
|
|
@@ -81,31 +223,14 @@ export async function runClaudeCodeHook(spec) {
|
|
|
81
223
|
// The transcript path travels in the raw payload only — up-translation drops it, so the
|
|
82
224
|
// adapter reads it from the string. Every failure narrows to `undefined`, which leaves
|
|
83
225
|
// the dispatcher on its `noopTranscript` default: lost evidence closes the valve rather
|
|
84
|
-
// than opening it
|
|
226
|
+
// than opening it.
|
|
85
227
|
const transcriptPath = transcriptPathFromPayload(rawPayload);
|
|
86
228
|
const transcript = transcriptPath === undefined ? undefined : transcriptFromJsonlFile(transcriptPath);
|
|
87
|
-
// The live transcript is the evidence channel the context family reads AND the one the
|
|
88
|
-
// witness reads, so erasing or forging it disables every context discipline while
|
|
89
|
-
// opening or shutting the human valve on the same file. It lives outside the repository,
|
|
90
|
-
// so no config `protectedPaths` entry can reach it — and since COVENANT-07c it does NOT
|
|
91
|
-
// join this list either. A file deep under HOME makes HOME itself a protected ANCESTOR,
|
|
92
|
-
// which measured as the COVENANT-13 over-block: `cd /home/<user>` refused for two weeks,
|
|
93
|
-
// and the 07b attempt to register the home spellings alongside only widened that to
|
|
94
|
-
// `echo $HOME` and every edit whose content carried a bare `~`. Assembly knows the path
|
|
95
|
-
// AND the home value, so assembly registers a dedicated `matches` predicate over that
|
|
96
|
-
// ONE file instead (transcript-mod, below): equality-only — never an ancestor — with the
|
|
97
|
-
// `~`/`$HOME`/`${HOME}`/`~<user>` spellings closed as data, reads absolved by the
|
|
98
|
-
// read-only allowlist, and ancestor destruction outside the repository declared out of
|
|
99
|
-
// observation scope (07c §2: the agent's own deny policy owns what no repo-scoped judge
|
|
100
|
-
// can). The witness valve applies to it like any other registration.
|
|
101
|
-
const protectedPaths = normalizeProtectedPaths({
|
|
102
|
-
protectedPaths: config.protectedPaths ?? [],
|
|
103
|
-
});
|
|
104
229
|
// One witness predicate shared by every registration: a witness is a session-wide
|
|
105
230
|
// permission the human granted, not a per-covenant one. Absent `witness` config leaves
|
|
106
231
|
// this undefined, and no verdict can be witnessed open at all. The predicate receives
|
|
107
|
-
// the transcript as its second argument from the dispatcher
|
|
108
|
-
//
|
|
232
|
+
// the transcript as its second argument from the dispatcher, which is why the transcript
|
|
233
|
+
// is injected below rather than captured here.
|
|
109
234
|
const witness = config.witness === undefined
|
|
110
235
|
? undefined
|
|
111
236
|
: ttlWitness({
|
|
@@ -114,120 +239,82 @@ export async function runClaudeCodeHook(spec) {
|
|
|
114
239
|
// Core passes the value through verbatim, so the conversion belongs to assembly.
|
|
115
240
|
ttlMs: config.witness.ttlMinutes * 60_000,
|
|
116
241
|
});
|
|
117
|
-
// The
|
|
118
|
-
//
|
|
119
|
-
//
|
|
120
|
-
//
|
|
121
|
-
//
|
|
122
|
-
|
|
123
|
-
|
|
124
|
-
|
|
125
|
-
//
|
|
126
|
-
//
|
|
127
|
-
|
|
128
|
-
|
|
129
|
-
|
|
130
|
-
const
|
|
131
|
-
|
|
132
|
-
|
|
133
|
-
|
|
134
|
-
|
|
135
|
-
|
|
136
|
-
|
|
137
|
-
|
|
138
|
-
selfModBody,
|
|
139
|
-
...pathArgs,
|
|
140
|
-
...MUTATING_TOOLS.flatMap((tool) => ['--mutating-tool', tool]),
|
|
141
|
-
],
|
|
142
|
-
},
|
|
143
|
-
witness,
|
|
144
|
-
},
|
|
145
|
-
{
|
|
146
|
-
label: 'shell-mod',
|
|
147
|
-
protectedPaths,
|
|
148
|
-
body: {
|
|
149
|
-
command: process.execPath,
|
|
150
|
-
args: [
|
|
151
|
-
shellModBody,
|
|
152
|
-
...pathArgs,
|
|
153
|
-
...SHELL_TOOLS.flatMap((tool) => ['--shell-tool', tool]),
|
|
154
|
-
...COMMAND_ARGS.flatMap((arg) => ['--command-arg', arg]),
|
|
155
|
-
],
|
|
156
|
-
},
|
|
157
|
-
witness,
|
|
158
|
-
},
|
|
159
|
-
// The transcript's own registration (COVENANT-07c). Routing is the matches predicate,
|
|
160
|
-
// never path mention, so the home directory cannot become a protected ancestor. No
|
|
161
|
-
// transcript in the payload means nothing to protect — the valve and the context
|
|
162
|
-
// family already forfeited on the same absence.
|
|
163
|
-
...(transcriptPath === undefined
|
|
164
|
-
? []
|
|
165
|
-
: [
|
|
166
|
-
transcriptModRegistration({
|
|
167
|
-
transcriptPath,
|
|
168
|
-
// The env value first, since that is what the judged shell expands `~` and
|
|
169
|
-
// `$HOME` from. `homedir()` reads the same passwd entry bash falls back to when
|
|
170
|
-
// HOME is unset, so a hook spawned without an environment (a service manager,
|
|
171
|
-
// `env -i`) keeps judging the home spellings instead of silently going
|
|
172
|
-
// absolute-only — an inert spelling closure looks identical to a passing call.
|
|
173
|
-
home: process.env.HOME ?? homedir(),
|
|
174
|
-
bodyCommand: process.execPath,
|
|
175
|
-
bodyModulePath: provenBodyPath(covenantDist, 'transcript-mod-body.js'),
|
|
176
|
-
shellTools: SHELL_TOOLS,
|
|
177
|
-
commandArgs: COMMAND_ARGS,
|
|
178
|
-
mutatingTools: MUTATING_TOOLS,
|
|
179
|
-
witness,
|
|
180
|
-
}),
|
|
181
|
-
]),
|
|
182
|
-
// The body path is passed as a thunk, so the proof fires only where the compiler
|
|
183
|
-
// actually composes a body. Entry count cannot stand in for that: an entry may compile
|
|
184
|
-
// to a body-less skip (a `requirePrecedent` one whenever no transcript came with the
|
|
185
|
-
// payload), and the compiler appends the body-less `shell-unjudgeable` backstop even
|
|
186
|
-
// for zero entries — gating the call itself would drop that record and turn an
|
|
187
|
-
// uncomputable shell write back into a silent pass, undoing COVENANT-10b.
|
|
188
|
-
...compileDisciplineRegistrations({
|
|
189
|
-
disciplines,
|
|
190
|
-
rootDir: spec.repoRoot,
|
|
191
|
-
bodyCommand: process.execPath,
|
|
192
|
-
bodyModulePath: () => provenBodyPath(covenantDist, 'discipline-body.js'),
|
|
193
|
-
shellTools: SHELL_TOOLS,
|
|
194
|
-
commandArgs: COMMAND_ARGS,
|
|
195
|
-
witness,
|
|
196
|
-
// Context-family evidence is evaluated here, at assembly: a spawned body cannot hold
|
|
197
|
-
// a transcript, and passing a path would leak JSONL knowledge into covenant
|
|
198
|
-
// (COVENANT-13 §4.4). The adapter brings the evaluator for its own `subagent`/`tool`
|
|
199
|
-
// vocabulary; core owns `command`, which the compiler judges directly.
|
|
200
|
-
transcript,
|
|
201
|
-
evaluatePrecedent,
|
|
202
|
-
}),
|
|
203
|
-
];
|
|
204
|
-
// This assembly is versioned with the umbrella; the covenant dist it composes against is
|
|
205
|
-
// resolved from the installation graph, so a workspace nobody rebuilt pairs a new
|
|
206
|
-
// assembly with an old compiler — and an old compiler stores the body-path thunk itself
|
|
207
|
-
// where a string belongs. `spawn` does not reject a non-string argv entry — it
|
|
208
|
-
// stringifies it — so the judge would be spawned on the thunk's own source text, exit 1,
|
|
209
|
-
// and be recorded as a VERDICT under a discipline's label. Assert the shape and let the
|
|
210
|
-
// fail-closed catch answer instead.
|
|
211
|
-
for (const registration of registrations) {
|
|
212
|
-
if (registration.body !== undefined && typeof registration.body.args?.[0] !== 'string') {
|
|
213
|
-
throw new Error(`covenant dist predates the lazy body-path convention (registration '${registration.label}') — run 'pnpm build'`);
|
|
214
|
-
}
|
|
215
|
-
}
|
|
242
|
+
// The judges are the covenant package's built barrel — resolved through the real
|
|
243
|
+
// package (never a test alias), so the session surface runs the same judges the commit
|
|
244
|
+
// surface does. An injected directory overrides that resolution, which is how a fixture
|
|
245
|
+
// reaches a dist that real Node resolution would never land on. Awaited HERE, before
|
|
246
|
+
// any registration is composed: a dist the barrel cannot load throws now, into the
|
|
247
|
+
// fail-closed catch, instead of leaving a half-judged table behind.
|
|
248
|
+
const covenantDist = spec.covenantDist ?? resolveCovenantDist();
|
|
249
|
+
const covenant = await loadCovenantModule(covenantDist);
|
|
250
|
+
// Assembled HERE, outside the dispatch seam: a judge takes its call set as an argument,
|
|
251
|
+
// so assembly needs no payload, and an assembly throw belongs to this function's own
|
|
252
|
+
// fail-closed catch — `hook` label, `covenant hook failed closed:` on stderr. Composed
|
|
253
|
+
// inside the dispatch closure it would land in `runAdapterPath`'s catch instead, which
|
|
254
|
+
// records the adapter's label and says nothing about what broke.
|
|
255
|
+
const registrations = assembleSessionRegistrations({
|
|
256
|
+
config,
|
|
257
|
+
rootDir: spec.repoRoot,
|
|
258
|
+
covenant,
|
|
259
|
+
transcriptPath,
|
|
260
|
+
transcript,
|
|
261
|
+
witness,
|
|
262
|
+
});
|
|
216
263
|
return await runAdapterPath({
|
|
217
264
|
rawPayload,
|
|
218
265
|
telemetryPath: logPath,
|
|
219
|
-
dispatch: (stdinPayload) => dispatchCovenants({
|
|
266
|
+
dispatch: (stdinPayload) => covenant.dispatchCovenants({
|
|
267
|
+
stdinPayload,
|
|
268
|
+
registrations,
|
|
269
|
+
telemetryPath: logPath,
|
|
270
|
+
transcript,
|
|
271
|
+
}),
|
|
220
272
|
});
|
|
221
273
|
}
|
|
222
274
|
catch (error) {
|
|
223
275
|
process.stderr.write(`covenant hook failed closed: ${error instanceof Error ? error.message : String(error)}\n`);
|
|
224
276
|
// Honor the one-call-one-record invariant with a blocked record under the assembly's own
|
|
225
|
-
// label
|
|
226
|
-
//
|
|
227
|
-
//
|
|
277
|
+
// label — never a judge's, since no judge answered. `undefined` means the failure landed
|
|
278
|
+
// before a path could even be composed (a non-string repoRoot), where there is nowhere
|
|
279
|
+
// to write and nothing to attribute the row to.
|
|
228
280
|
if (telemetryPath !== undefined) {
|
|
229
281
|
appendRecordFailOpen(telemetryPath, { event: 'blocked', label: 'hook', subject: '-' });
|
|
230
282
|
}
|
|
231
283
|
return { exitCode: 2 };
|
|
232
284
|
}
|
|
233
285
|
}
|
|
286
|
+
/**
|
|
287
|
+
* The session-surface entry point: the post-hoc state comparison wrapped around the judgment.
|
|
288
|
+
*
|
|
289
|
+
* The comparison sits OUTSIDE {@link judgeHookCall}'s fail-closed try on both ends. Inside
|
|
290
|
+
* it, a comparison failure would become a blocked call — the opposite of a mechanism whose
|
|
291
|
+
* whole purpose is to record rather than stop — so each side carries its own catch and
|
|
292
|
+
* neither can reach the verdict. Observation is fail-open, the direction
|
|
293
|
+
* `appendRecordFailOpen` already established: the worst outcome is a missing datum.
|
|
294
|
+
*
|
|
295
|
+
* Order is the contract. The comparison runs first, so it reads the window the previous call
|
|
296
|
+
* left and its rows land ahead of this call's judgment; the re-establishment runs last, so
|
|
297
|
+
* this call's own judged writes are folded in rather than alarmed on next time.
|
|
298
|
+
*/
|
|
299
|
+
export async function runClaudeCodeHook(spec) {
|
|
300
|
+
let comparison;
|
|
301
|
+
try {
|
|
302
|
+
comparison = comparisonSpec(spec);
|
|
303
|
+
if (comparison !== undefined) {
|
|
304
|
+
compareBaseline(comparison);
|
|
305
|
+
}
|
|
306
|
+
}
|
|
307
|
+
catch {
|
|
308
|
+
// fail-open: a comparison that could not run leaves the judgment exactly as it was.
|
|
309
|
+
}
|
|
310
|
+
const result = await judgeHookCall(spec);
|
|
311
|
+
try {
|
|
312
|
+
if (comparison !== undefined) {
|
|
313
|
+
updateBaseline(comparison);
|
|
314
|
+
}
|
|
315
|
+
}
|
|
316
|
+
catch {
|
|
317
|
+
// fail-open: an unwritable baseline costs the next call's detection, never this verdict.
|
|
318
|
+
}
|
|
319
|
+
return result;
|
|
320
|
+
}
|
package/dist/covenant-check.d.ts
CHANGED
|
@@ -1,51 +1,78 @@
|
|
|
1
1
|
/**
|
|
2
|
-
* `pdks covenant check` — the
|
|
2
|
+
* `pdks covenant check` — the commit surface's composition root.
|
|
3
3
|
*
|
|
4
|
-
*
|
|
5
|
-
*
|
|
6
|
-
*
|
|
7
|
-
*
|
|
8
|
-
*
|
|
9
|
-
* receives the same verdict a session tool call would (AC-4 same-judge).
|
|
4
|
+
* Assembly mirrors the session hook — loadConfig → normalizeProtectedPaths → collect →
|
|
5
|
+
* dispatchCovenants — and spawns the same covenant dist bodies, so a change receives the
|
|
6
|
+
* verdict a session tool call would. Each change is dispatched as its own input so
|
|
7
|
+
* telemetry stays one row per file. The witness valve is a `/dev/tty` prompt that only
|
|
8
|
+
* the staged domain assembles; the other domains open no commit.
|
|
10
9
|
*
|
|
11
|
-
*
|
|
12
|
-
*
|
|
13
|
-
|
|
14
|
-
|
|
15
|
-
|
|
16
|
-
|
|
17
|
-
|
|
18
|
-
*
|
|
19
|
-
* the
|
|
20
|
-
* commit-surface translation of "only a human utterance opens the session valve". The
|
|
21
|
-
* answer is cached so one commit prompts at most once, and nothing is ever persisted —
|
|
22
|
-
* a state file would be an agent-forgeable surface (PRD §7).
|
|
10
|
+
* fail-closed: a missing config, an unbuilt body, or a collector failure exits 2 with one
|
|
11
|
+
* blocked record. An empty domain is an explicit pass with no records.
|
|
12
|
+
*/
|
|
13
|
+
import type { CovenantRegistration } from '@polydeukes/covenant';
|
|
14
|
+
import { type CovenantModule } from './covenant-module.js';
|
|
15
|
+
import { loadConfig } from './load-config.js';
|
|
16
|
+
/**
|
|
17
|
+
* Which observation of the commit surface a run judges. Only the collector differs between
|
|
18
|
+
* them; the IR, the assembly, and the dispatcher are one path.
|
|
23
19
|
*
|
|
24
|
-
*
|
|
25
|
-
*
|
|
26
|
-
*
|
|
27
|
-
* records).
|
|
20
|
+
* `range` names its two refs. `ancestry: 'merge-base'` selects the `A...B` reading, whose
|
|
21
|
+
* base is the two refs' common ancestor rather than `A` itself; the adapter that owns the
|
|
22
|
+
* range grammar resolves it.
|
|
28
23
|
*/
|
|
29
|
-
|
|
24
|
+
export type CheckDomain = {
|
|
25
|
+
kind: 'staged';
|
|
26
|
+
} | {
|
|
27
|
+
kind: 'worktree';
|
|
28
|
+
} | {
|
|
29
|
+
kind: 'range';
|
|
30
|
+
base: string;
|
|
31
|
+
head: string;
|
|
32
|
+
ancestry?: 'merge-base';
|
|
33
|
+
};
|
|
34
|
+
/** `runCovenantCheck` input. */
|
|
30
35
|
export type CovenantCheckSpec = {
|
|
31
36
|
/** Repository root — config discovery and staged collection both anchor here. */
|
|
32
37
|
repoRoot: string;
|
|
33
|
-
/**
|
|
38
|
+
/**
|
|
39
|
+
* Overrides where telemetry is written (tests and assembly injection) — the first term
|
|
40
|
+
* of the precedence, ahead of the config's `telemetry.logPath` and of the default this
|
|
41
|
+
* runner settles before the config loads. Absent, both of those apply in that order.
|
|
42
|
+
*/
|
|
34
43
|
telemetryPath?: string;
|
|
35
44
|
/** Overrides the resolved covenant dist directory (tests and assembly injection). */
|
|
36
45
|
covenantDist?: string;
|
|
37
46
|
/**
|
|
38
47
|
* TTY valve seam: writes the given prompt and returns the line a human typed, or null
|
|
39
|
-
* for no input. ABSENT means a non-TTY environment — the valve never opens
|
|
40
|
-
* human-only
|
|
48
|
+
* for no input. ABSENT means a non-TTY environment — the valve never opens, which is
|
|
49
|
+
* what keeps it human-only.
|
|
41
50
|
*/
|
|
42
51
|
ttyPrompt?: (prompt: string) => string | null;
|
|
52
|
+
/** Which observation to judge. ABSENT means `staged`. */
|
|
53
|
+
domain?: CheckDomain;
|
|
43
54
|
};
|
|
55
|
+
/** {@link assembleCommitRegistrations} input — what the commit surface's assembly needs. */
|
|
56
|
+
export type CommitAssemblySpec = {
|
|
57
|
+
config: ReturnType<typeof loadConfig>['config'];
|
|
58
|
+
rootDir: string;
|
|
59
|
+
/**
|
|
60
|
+
* The covenant surface the registrations are built from — the module the caller loaded
|
|
61
|
+
* from the resolved dist, so what judges a change is what that dist carries, and what
|
|
62
|
+
* `explain` renders is what would judge it.
|
|
63
|
+
*/
|
|
64
|
+
covenant: CovenantModule;
|
|
65
|
+
witness?: CovenantRegistration['witness'];
|
|
66
|
+
};
|
|
67
|
+
/**
|
|
68
|
+
* The commit surface's registration set — one assembly that the runner dispatches and
|
|
69
|
+
* `explain` renders.
|
|
70
|
+
*/
|
|
71
|
+
export declare function assembleCommitRegistrations(spec: CommitAssemblySpec): CovenantRegistration[];
|
|
44
72
|
/**
|
|
45
|
-
* Judge
|
|
46
|
-
*
|
|
47
|
-
*
|
|
48
|
-
* principle forbids.
|
|
73
|
+
* Judge one observation of `repoRoot` exactly as the session surface would — the staged
|
|
74
|
+
* diff by default, the working tree or a ref range on request. Async because the dispatcher
|
|
75
|
+
* spawns covenant bodies. An empty domain is an explicit pass: nothing to judge, no records.
|
|
49
76
|
*/
|
|
50
77
|
export declare function runCovenantCheck(spec: CovenantCheckSpec): Promise<{
|
|
51
78
|
exitCode: 0 | 2;
|