@linzumi/cli 1.0.272 → 1.0.274

package/scripts/build-harness-claude-parity-oracle.mjs

@@ -1,407 +0,0 @@
-// Spec: kandan/plans/2026-07-10-compute-nodes-rescript-commander-zero-ts-program.md
-// (M3 cluster 8, harness-claude-adapter / workstream H.3).
-// Relationship: Builds the TS-side PARITY ORACLE for the claude-adapter
-// cluster of the ReScript commander port, the sibling of
-// build-harness-codex-parity-oracle.mjs (cluster 7). The oracle runs the
-// REAL TS claude session driver (startClaudeCodeSession + the resume
-// validation + the canUseTool bridge) with '@anthropic-ai/claude-agent-sdk'
-// ALIASED to the M2.3 scripted stub
-// (packages/commander-harness/src/scripted/ScriptedClaudeAgentSdk.res.mjs)
-// - the exact import-seam substitution the stub was built for - and prints
-// the stub recorder's transcript for one named scenario. The dual-impl
-// differential in @linzumi/commander-harness
-// (HarnessClaudeDifferentialConformance) runs the same scenario through
-// the ReScript adapter in-process and requires the two double transcripts
-// byte-identical.
-//
-// Determinism: the scenarios are scripted data, the driver's only waits
-// are milestone polls over the in-process transcript, and the recorder
-// rows carry no wall-clock values.
-//
-// SECRETS: the oracle only ever sees the conformance suite's synthetic
-// payloads. The output is a local test artifact (.differential/ is
-// gitignored, never published) and stays unminified for debuggability.
-import { mkdir } from 'node:fs/promises';
-import { dirname, join } from 'node:path';
-import { fileURLToPath } from 'node:url';
-import { build } from 'esbuild';
-
-const packageRoot = dirname(dirname(fileURLToPath(import.meta.url)));
-const stubModulePath = join(
-  packageRoot,
-  '..',
-  'commander-harness',
-  'src',
-  'scripted',
-  'ScriptedClaudeAgentSdk.res.mjs'
-);
-const scriptModulePath = join(
-  packageRoot,
-  '..',
-  'commander-harness',
-  'src',
-  'scripted',
-  'ScriptedClaudeAgentSdkScript.res.mjs'
-);
-
-const driverSource = `
-import {
-  startClaudeCodeSession,
-  validateClaudeCodeResumeSession,
-} from './src/claudeCodeSession';
-import type { ClaudeCodeTranscriptEvent } from './src/claudeCodeSession';
-// The scenario side-channel of the SAME stub instance the alias bundles in
-// (esbuild dedupes by resolved path, so install/recorder observe the
-// aliased SDK the session driver consumes).
-import { install, recorder } from '${scriptModulePath.replace(/\\\\/g, '/')}';
-
-const cwd = '/scripted/workspace';
-const model = 'scripted-model-alpha';
-
-// The recorded API-provenance error text (must stay byte-identical to the
-// ReScript differential leg's scenario data).
-const apiErrorText =
-  'API Error: 401 {"type":"error","error":{"type":"authentication_error","message":"invalid x-api-key"},"request_id":"req_scripted42"}';
-
-const scenarios: Record<string, unknown> = {
-  'clean-turn': {
-    queries: [{ TAG: 'CleanText', assistantText: 'scripted claude answer' }],
-    startupBehavior: 'StartupOk',
-    sessionInfo: 'SessionFound',
-    sessionFirstPrompts: [],
-  },
-  'approval-accept': {
-    queries: [
-      {
-        TAG: 'ToolUseWithPermission',
-        toolName: 'Bash',
-        toolInputJson: '{"command":"curl https://api.example.test/v1/voices"}',
-        assistantText: 'voice roster fetched',
-      },
-    ],
-    startupBehavior: 'StartupOk',
-    sessionInfo: 'SessionFound',
-    sessionFirstPrompts: [],
-  },
-  'approval-decline': {
-    queries: [
-      {
-        TAG: 'ToolUseWithPermission',
-        toolName: 'Bash',
-        toolInputJson: '{"command":"curl https://api.example.test/v1/voices"}',
-        assistantText: 'voice roster fetched',
-      },
-    ],
-    startupBehavior: 'StartupOk',
-    sessionInfo: 'SessionFound',
-    sessionFirstPrompts: [],
-  },
-  error: {
-    queries: [{ TAG: 'ResultApiError', errorText: apiErrorText }],
-    startupBehavior: 'StartupOk',
-    sessionInfo: 'SessionFound',
-    sessionFirstPrompts: [],
-  },
-  interrupt: {
-    queries: [{ TAG: 'MidTurnPark', assistantText: 'partial answer, then' }],
-    startupBehavior: 'StartupOk',
-    sessionInfo: 'SessionFound',
-    sessionFirstPrompts: [],
-    interruptBehavior: 'YieldInterruptResult',
-  },
-  'resume-attach': {
-    queries: [{ TAG: 'CleanText', assistantText: 'resumed answer' }],
-    startupBehavior: 'StartupOk',
-    sessionInfo: 'SessionFound',
-    sessionFirstPrompts: [],
-  },
-};
-
-// The runner-shaped streaming input queue (the live multi-turn channel:
-// only the owner closes it).
-function createInputQueue() {
-  const pending: unknown[] = [];
-  const waiters: Array<(step: { done: boolean; value: unknown }) => void> = [];
-  let closed = false;
-  return {
-    messages: {
-      [Symbol.asyncIterator]() {
-        return {
-          next(): Promise<{ done: boolean; value: unknown }> {
-            if (pending.length > 0) {
-              return Promise.resolve({ done: false, value: pending.shift() });
-            }
-            if (closed) {
-              return Promise.resolve({ done: true, value: undefined });
-            }
-            return new Promise((resolve) => waiters.push(resolve));
-          },
-        };
-      },
-    },
-    push(message: unknown) {
-      const waiter = waiters.shift();
-      if (waiter !== undefined) {
-        waiter({ done: false, value: message });
-      } else {
-        pending.push(message);
-      }
-    },
-    close() {
-      closed = true;
-      while (waiters.length > 0) {
-        waiters.shift()!({ done: true, value: undefined });
-      }
-    },
-  };
-}
-
-function userMessage(text: string) {
-  return {
-    type: 'user' as const,
-    message: { role: 'user' as const, content: text },
-    parent_tool_use_id: null,
-  };
-}
-
-const sleep = (ms: number) => new Promise((resolve) => setTimeout(resolve, ms));
-
-async function waitFor(predicate: () => boolean): Promise<void> {
-  while (!predicate()) {
-    await sleep(5);
-  }
-}
-
-function transcript(): string[] {
-  return (recorder as { events: Array<{ label: string; detail: string }> }).events.map(
-    (event) => event.label + '|' + event.detail
-  );
-}
-
-async function run(): Promise<void> {
-  const scenarioName = process.argv[2];
-  const scenario = scenarios[scenarioName ?? ''];
-  if (scenario === undefined) {
-    throw new Error('unknown scenario: ' + String(scenarioName));
-  }
-  install(scenario);
-
-  const events: ClaudeCodeTranscriptEvent[] = [];
-  const has = (type: string) => events.some((event) => event.type === type);
-  let controls:
-    | { interrupt: () => Promise<void> }
-    | undefined;
-  const queue = createInputQueue();
-
-  if (scenarioName === 'resume-attach') {
-    await validateClaudeCodeResumeSession({
-      cwd,
-      sessionId: 'scripted-claude-session-resumed-7',
-    });
-  }
-
-  const sessionPromise = startClaudeCodeSession({
-    cwd,
-    prompt: '',
-    streamingInput: queue,
-    developerInstructions: undefined,
-    model,
-    permissionMode: 'default',
-    ...(scenarioName === 'resume-attach'
-      ? { resumeSessionId: 'scripted-claude-session-resumed-7' }
-      : {}),
-    canUseTool: async () =>
-      scenarioName === 'approval-decline'
-        ? { type: 'deny' as const, message: 'not on this machine' }
-        : { type: 'allow' as const },
-    onSessionControls: (liveControls) => {
-      controls = liveControls;
-    },
-    onTranscriptEvent: (event) => {
-      events.push(event);
-    },
-  });
-  // The session settles by scenario design; failures are the error leg's
-  // expected outcome and are re-checked below.
-  const settled = sessionPromise.then(
-    () => undefined,
-    (error: unknown) => (error instanceof Error ? error.message : String(error))
-  );
-
-  queue.push(userMessage('do the thing'));
-
-  switch (scenarioName) {
-    case 'error': {
-      // The TS session driver THROWS on the result error after emitting
-      // session_failed; the transcript snapshot is taken AT the terminal
-      // (the abandoned generator never closes the stub query - the
-      // documented TS lifecycle - so the close rows are not part of this
-      // scenario's comparison surface).
-      await waitFor(() => has('session_failed'));
-      const failure = await settled;
-      if (failure === undefined) {
-        throw new Error('the error scenario must fail the session');
-      }
-      process.stdout.write(JSON.stringify(transcript()) + '\\n');
-      return;
-    }
-    case 'interrupt': {
-      await waitFor(() => has('assistant_message'));
-      await controls!.interrupt();
-      await waitFor(() => has('turn_interrupted'));
-      queue.close();
-      // An interrupted single-turn session settles as the documented
-      // no-text-response failure; the transcript is the comparison
-      // surface.
-      await settled;
-      process.stdout.write(JSON.stringify(transcript()) + '\\n');
-      return;
-    }
-    default: {
-      await waitFor(() => has('turn_completed'));
-      queue.close();
-      const failure = await settled;
-      if (failure !== undefined) {
-        throw new Error('scenario ' + scenarioName + ' must complete: ' + failure);
-      }
-      process.stdout.write(JSON.stringify(transcript()) + '\\n');
-    }
-  }
-}
-
-run().then(
-  () => process.exit(0),
-  (error) => {
-    process.stderr.write(String(error && error.stack ? error.stack : error) + '\\n');
-    process.exit(1);
-  }
-);
-`;
-
-const questionCardDriverSource = `
-/*
- * Spec: spec/commander-completion-pipeline-rules.md
- * (\`:commander-completion-pipeline/rule-07-claude-events-publish\`).
- * Relationship: Batch driver over the active TS Claude question-card model;
- * it contains no copied approval behavior.
- */
-import {
-  claudeCodeQuestionAnsweredInput,
-  claudeCodeToolApprovalRequest,
-  claudeCodeUserQuestionStreamKey,
-  claudeCodeUserQuestionStructuredMessage,
-  parseClaudeCodeUserQuestionRequest,
-} from './src/claudeCodeUserQuestions';
-import type { ClaudeCodeUserQuestionAnswer } from './src/claudeCodeUserQuestions';
-import type { ClaudeCodePermissionRequest } from './src/claudeCodeSession';
-import type { JsonObject } from './src/protocol';
-
-type OracleCase = {
-  readonly op?: 'approval' | 'question';
-  readonly request: ClaudeCodePermissionRequest;
-  readonly answers?: readonly ClaudeCodeUserQuestionAnswer[];
-  readonly sessionId: string | undefined;
-  readonly sourceSeq: number;
-  readonly answerState: JsonObject;
-  readonly streamState: 'streaming' | 'completed' | 'failed' | 'interrupted';
-};
-
-function handle(testCase: OracleCase): JsonObject {
-  if (testCase.op === 'question') {
-    const parsed = parseClaudeCodeUserQuestionRequest(testCase.request);
-    if (parsed.type === 'question' && testCase.answers !== undefined) {
-      return {
-        parsed,
-        answeredInput: claudeCodeQuestionAnsweredInput(
-          testCase.request.input,
-          parsed.request,
-          testCase.answers
-        ),
-      };
-    }
-    return { parsed };
-  }
-  const approval = claudeCodeToolApprovalRequest(testCase.request);
-  return {
-    approval,
-    structured: claudeCodeUserQuestionStructuredMessage({
-      request: approval.request,
-      sessionId: testCase.sessionId,
-      sourceSeq: testCase.sourceSeq,
-      answerState: testCase.answerState,
-      streamState: testCase.streamState,
-    }),
-    streamKey: claudeCodeUserQuestionStreamKey(testCase.request.requestId),
-    decisions: Object.fromEntries(
-      approval.choices.map((choice) => [choice.decision, choice.permissionDecision])
-    ),
-  };
-}
-
-const chunks: Buffer[] = [];
-for await (const chunk of process.stdin) {
-  chunks.push(Buffer.from(chunk));
-}
-const cases = JSON.parse(Buffer.concat(chunks).toString('utf8')) as OracleCase[];
-process.stdout.write(JSON.stringify(cases.map(handle)));
-
-`;
-
-const outDir = join(packageRoot, '.differential');
-const outPath = join(outDir, 'harness-claude-parity-oracle.mjs');
-const buildQuestionCard = process.argv[2] === 'question-card';
-
-await mkdir(outDir, { recursive: true });
-
-if (!buildQuestionCard) {
-  await build({
-    stdin: {
-      contents: driverSource,
-      resolveDir: packageRoot,
-      sourcefile: 'harness-claude-parity-driver.ts',
-      loader: 'ts',
-    },
-    bundle: true,
-    platform: 'node',
-    target: 'node20',
-    format: 'esm',
-    outfile: outPath,
-    minify: false,
-    sourcemap: false,
-    legalComments: 'none',
-    logLevel: 'silent',
-    external: ['ws', 'undici', 'blessed'],
-    alias: {
-      '@anthropic-ai/claude-agent-sdk': stubModulePath,
-    },
-  });
-}
-
-const questionCardOutPath = join(
-  outDir,
-  'claude-question-card-parity-oracle.mjs'
-);
-
-if (buildQuestionCard) {
-  await build({
-    stdin: {
-      contents: questionCardDriverSource,
-      resolveDir: packageRoot,
-      sourcefile: 'claude-question-card-parity-driver.ts',
-      loader: 'ts',
-    },
-    bundle: true,
-    platform: 'node',
-    target: 'node22',
-    format: 'esm',
-    outfile: questionCardOutPath,
-    minify: false,
-    sourcemap: 'inline',
-    legalComments: 'none',
-    logLevel: 'silent',
-  });
-}
-
-process.stdout.write(
-  (buildQuestionCard ? questionCardOutPath : outPath) + '\n'
-);