@zgeoff/atc 3.4.1 → 3.4.2

package/package.json

@@ -1,6 +1,6 @@
 {
   "name": "@zgeoff/atc",
-  "version": "3.4.1",
+  "version": "3.4.2",
   "description": "Terminal control tower for coding-agent sessions",
   "homepage": "https://github.com/zgeoff/atc#readme",
   "bugs": "https://github.com/zgeoff/atc/issues",

package/src/agents/claude-adapter.ts

@@ -48,7 +48,7 @@ import { loadClaudeConfigBundle } from './load-claude-config-bundle';
 import { makeClaudeHeadlessRunner } from './make-claude-headless-runner';
 import type { ClaudeHeadlessRun } from './make-claude-headless-runner';
 import { parseClaudeTranscriptLine } from './parse-claude-transcript-line';
-import { planPastedLineInput } from './plan-pasted-line-input';
+import { planClaudeLineInput } from './plan-claude-line-input';
 import { resolveAgentHome } from './resolve-agent-home';
 import { resolveClaudeGlobalConfigPath } from './resolve-claude-global-config-path';
 import { resolveClaudePermissionMode } from './resolve-claude-permission-mode';
@@ -88,8 +88,9 @@ export class ClaudeAdapter implements AgentAdapter {
   readonly parseTranscriptLine = parseClaudeTranscriptLine;
 
   // Claude's TUI takes a long burst of input as a paste and keeps its
-  // newline in the composer, so a line is pasted and then submitted.
-  readonly planLineInput = planPastedLineInput;
+  // newline in the composer, so a line is pasted and then submitted, with a
+  // leading slash command's name typed so the command still runs.
+  readonly planLineInput = planClaudeLineInput;
 
   readonly profile: AgentProfile;
 

package/src/agents/gateway-adapter.ts

@@ -38,7 +38,7 @@ import { findFlagValue } from './find-flag-value';
 import { makeClaudeHeadlessRunner } from './make-claude-headless-runner';
 import type { ClaudeHeadlessRun } from './make-claude-headless-runner';
 import { parseClaudeTranscriptLine } from './parse-claude-transcript-line';
-import { planPastedLineInput } from './plan-pasted-line-input';
+import { planClaudeLineInput } from './plan-claude-line-input';
 import { resolveClaudePermissionMode } from './resolve-claude-permission-mode';
 import { writeATCBridge } from './write-atc-bridge';
 import { writeHookSettings } from './write-hook-settings';
@@ -68,7 +68,7 @@ export class GatewayAdapter implements AgentAdapter {
   readonly parseTranscriptLine = parseClaudeTranscriptLine;
 
   // The gateway runs the Claude CLI, whose TUI takes a line the same way.
-  readonly planLineInput = planPastedLineInput;
+  readonly planLineInput = planClaudeLineInput;
 
   readonly takesMessages = true;
 

package/src/agents/plan-claude-line-input.ts

@@ -0,0 +1,44 @@
+import type { TerminalInputModes } from './agent-adapter';
+import { planPastedLineInput } from './plan-pasted-line-input';
+
+const PASTE_START = '\u001B[200~';
+const PASTE_END = '\u001B[201~';
+
+/**
+ * Pastes a line into the Claude TUI and submits it, as the pasted line
+ * planner does, except for a line that opens with a slash command and an
+ * argument. Claude takes a long paste as pasted text and sends it as a
+ * message, so such a line has its command name and the spaces after it typed
+ * as keys and only the argument pasted, then one carriage return. The
+ * command then runs at any argument length. A TUI that has not turned
+ * bracketed paste on gets every line as the pasted line planner writes it.
+ */
+export function planClaudeLineInput(text: string, modes: TerminalInputModes): readonly string[] {
+  const unmarked = text.replaceAll(PASTE_START, '').replaceAll(PASTE_END, '');
+  const command = modes.bracketedPaste ? findSlashCommand(unmarked) : null;
+
+  if (command === null) {
+    return planPastedLineInput(text, modes);
+  }
+
+  return [command.typed, `${PASTE_START}${command.argument}${PASTE_END}`, '\r'];
+}
+
+// A slash, a command name that may hold a plugin namespace, at least one
+// space, then the argument. A path such as `/tmp/out` has a slash after its
+// first name, so it never matches.
+const SLASH_COMMAND = /^(?<typed>\/[A-Za-z0-9][\w:-]* +)(?<argument>.+)$/su;
+
+function findSlashCommand(text: string): { typed: string; argument: string } | null {
+  const groups = SLASH_COMMAND.exec(text)?.groups;
+  const typed = groups?.['typed'];
+  const argument = groups?.['argument'];
+
+  // An argument of spaces alone leaves a bare command, which the line
+  // pastes whole like any short line.
+  if (typed === undefined || argument === undefined || argument.trim() === '') {
+    return null;
+  }
+
+  return { typed, argument };
+}

package/src/mcp/mcp-tools.ts

@@ -428,7 +428,7 @@ export const MCP_TOOLS: readonly MCPToolDefinition[] = [
     annotations: AGENT_FACING_DESTRUCTIVE,
     scope: 'spawn',
     description:
-      "Type a line of text into a running session and submit it, as if the operator typed it and pressed enter. atc submits the line the way the session's agent accepts one. Use it to answer a session that is waiting on input. A result of sent means atc wrote the line and its submit key to the session; it does not confirm that the agent took the line or answered it. Read the session's screen or events for that. The tool sends no raw keystrokes.",
+      "Type a line of text into a running session and submit it, as if the operator typed it and pressed enter. atc submits the line the way the session's agent accepts one. Use it to answer a session that is waiting on input. atc pastes the line, so its newlines stay in it, and Claude takes a line of about 800 characters or more as pasted text, not as typed words. On a Claude session, a line that starts with a slash command and an argument, such as /goal finish the release, has the command name typed and only the argument pasted, so the command runs at any length. A result of sent means atc wrote the line and its submit key to the session; it does not confirm that the agent took the line or answered it. Read the session's screen or events for that. The tool sends no raw keystrokes.",
     inputSchema: {
       type: 'object',
       properties: {

package/src/test-utils/build-stub-held-gh.ts

@@ -1,18 +1,16 @@
 /**
  * The script of a stand-in `gh` whose repository listing waits for the
- * test. `gh config …` prints `https`. Any other command touches
- * `$HOME/gh-held` and waits while `$HOME/gh-hold` exists, then prints one
- * repository, `me/dots`, in the JSON shape `gh repo list` prints.
+ * test. `gh config …` prints `https`. Any other command waits while
+ * `$HOME/gh-hold` exists, touching `$HOME/gh-held` on each pass of the
+ * wait, so the marker appears only once the stand-in is held, then prints
+ * one repository, `me/dots`, in the JSON shape `gh repo list` prints.
  */
 export function buildStubHeldGH(): string {
   return `#!/bin/sh
 case "$1" in
   config) echo https ;;
   *)
-    if [ -f "$HOME/gh-hold" ]; then
-      touch "$HOME/gh-held"
-      while [ -f "$HOME/gh-hold" ]; do sleep 0.05; done
-    fi
+    while [ -f "$HOME/gh-hold" ]; do touch "$HOME/gh-held"; sleep 0.05; done
     echo '[{"nameWithOwner":"me/dots","description":"dotfiles","isPrivate":false,"url":"https://github.com/me/dots","sshUrl":"git@github.com:me/dots.git"}]' ;;
 esac
 `;

package/src/test-utils/build-stub-held-zoxide.ts

@@ -1,13 +1,11 @@
 /**
  * The script of a stand-in `zoxide` that lists no directories, and waits
- * for the test first: while `$HOME/zoxide-hold` exists, it touches
- * `$HOME/zoxide-held` and waits for the file to go.
+ * for the test first: while `$HOME/zoxide-hold` exists, it waits for the
+ * file to go, touching `$HOME/zoxide-held` on each pass of the wait, so the
+ * marker appears only once the stand-in is held.
  */
 export function buildStubHeldZoxide(): string {
   return `#!/bin/sh
-if [ -f "$HOME/zoxide-hold" ]; then
-  touch "$HOME/zoxide-held"
-  while [ -f "$HOME/zoxide-hold" ]; do sleep 0.05; done
-fi
+while [ -f "$HOME/zoxide-hold" ]; do touch "$HOME/zoxide-held"; sleep 0.05; done
 `;
 }

package/src/test-utils/create-stub-claude.ts

@@ -29,7 +29,8 @@ interface StubClaudeConfig {
  * first stub to find it removes it; `fake-claude-tap` runs `atc tap` into
  * `$HOME/tap.jsonl`; `fake-claude-events.jsonl` holds more hook payloads to
  * report, one per line, after the `Notification`; `fake-claude-exit` exits
- * once they are reported.
+ * once they are reported; `fake-claude-composer-last` runs the composer once
+ * they are reported.
  */
 export function createStubClaude(dir: string, config: StubClaudeConfig): string {
   const atc = config.atc.map((part) => `"${part}"`).join(' ');
@@ -69,6 +70,7 @@ if [ -f "$HOME/fake-claude-events.jsonl" ]; then
   done < "$HOME/fake-claude-events.jsonl"
 fi
 if [ -f "$HOME/fake-claude-exit" ]; then exit 0; fi
+if [ -f "$HOME/fake-claude-composer-last" ]; then exec "${process.execPath}" "${config.composer}"; fi
 while read -r line; do echo "GOT:$line"; done
 `,
   );

package/src/test-utils/create-stub-imp-port.ts

@@ -121,6 +121,9 @@ class StubImpPort implements ImpPort {
   // Feature reads still to fail as an unreachable impd before they answer.
   private featureFailures = 0;
 
+  // Feature reads that failed as an unreachable impd.
+  private failedFeatureReads = 0;
+
   // Session connections whose opening still throws before it returns, as
   // an invalid authorization header makes the socket's constructor throw.
   private openFailures = 0;
@@ -198,6 +201,7 @@ class StubImpPort implements ImpPort {
 
     if (this.featureFailures > 0) {
       this.featureFailures -= 1;
+      this.failedFeatureReads += 1;
 
       return Promise.reject(new ImpPortError('UNREACHABLE', 'impd did not answer'));
     }
@@ -1109,6 +1113,11 @@ class StubImpPort implements ImpPort {
     this.featureFailures = count;
   }
 
+  // How many feature reads failed as an unreachable impd.
+  countFailedFeatureReads(): number {
+    return this.failedFeatureReads;
+  }
+
   /**
    * Refuses the next session request with an impd code and its data, or the
    * message of the refusal when it carries one instead.

package/src/test-utils/{run-legacy-daemon.ts → run-stub-legacy-daemon.ts}

@@ -20,7 +20,7 @@ function main() {
   const stateDir = process.argv.at(3);
 
   if (socketPath === undefined || stateDir === undefined) {
-    throw new Error('usage: run-legacy-daemon.ts <socket path> <state dir>');
+    throw new Error('usage: run-stub-legacy-daemon.ts <socket path> <state dir>');
   }
 
   startStubLegacyDaemon(socketPath, { protocol: PROTOCOL_V + 1, owner: 'caller' });

package/src/test-utils/start-stub-source-daemon.ts

@@ -13,7 +13,7 @@ import { registerTestCleanup } from './register-test-cleanup';
  * a test; disposal stops it sooner, and a second stop does nothing.
  */
 export async function startStubSourceDaemon(env: Readonly<Record<string, string | undefined>>) {
-  const daemon = Bun.spawn([process.execPath, join(import.meta.dir, 'run-source-daemon.ts')], {
+  const daemon = Bun.spawn([process.execPath, join(import.meta.dir, 'run-stub-source-daemon.ts')], {
     env: { ATC_TEST_SOURCES: 'fixture', ...env },
     stdout: 'pipe',
     stderr: 'ignore',