@joshuafolkken/kit 1.1387.0 → 1.1453.0

package/scripts/epic/epic-bundle-referenced.ts

@@ -1,7 +1,7 @@
 import { git_gh_command } from '#scripts/gh/git-gh-command'
 import { bounded_pool } from '#scripts/lib/bounded-pool'
 import { epic_audit_logic } from './epic-audit'
-import type { BacklogIssue } from './epic-bundle'
+import { epic_bundle, type BacklogIssue } from './epic-bundle'
 import { epic_issue, type EpicIssue } from './epic-issue'
 
 // Candidates the open backlog cannot show, read from the subject's own prose.
@@ -64,15 +64,12 @@ interface ReferencedContext {
 }
 
 function to_backlog_issue(issue: EpicIssue, context: ReferencedContext): BacklogIssue {
-	const epic = context.epics.get(issue.number)
-
 	return {
 		number: issue.number,
 		repo: context.repo,
 		body: issue.body,
 		blocked_by: epic_issue.blocker_references_of(issue, context.repo),
-		is_epic: context.epic_numbers.has(issue.number),
-		...(epic !== undefined && { epic }),
+		...epic_bundle.membership_of(issue.number, epic_issue.label_names(issue), context),
 	}
 }
 

package/scripts/epic/epic-bundle.ts

@@ -1,4 +1,5 @@
 import { issue_cite } from '#scripts/issue/issue-cite'
+import { has_label_name, RELEASE_LABEL } from '#scripts/issue/issue-labels'
 import { epic_audit_logic } from './epic-audit'
 import { epic_graph } from './epic-graph'
 import type { DependencyLink } from './epic-parse'
@@ -31,6 +32,11 @@ interface BacklogIssue {
 	// its parent, so without this every child would find its own epic as a candidate and be told to
 	// bundle with it.
 	is_epic?: boolean
+	// Whether this issue is the release issue. `issue:file --release` records every change awaiting
+	// publication as its blocker, so the relation is mechanical and says nothing about the work
+	// belonging together — read as a signal, it proposed one epic for the release and every
+	// unrelated change waiting on it.
+	is_release?: boolean
 	// Repository-qualified, not bare numbers. Issue numbers are unique per
 	// repository, so a blocker read as `40` alone matched any candidate numbered 40 — including one in
 	// a different repository entirely. That produced a bundle nobody's data supported, and, through
@@ -79,6 +85,36 @@ function has_recorded_dependency(subject: BacklogIssue, other: BacklogIssue): bo
 	return names_as_blocker(subject, other) || names_as_blocker(other, subject)
 }
 
+// The epic view an issue is placed against: which epic tracks each issue, and the epics themselves.
+interface MembershipContext {
+	epics: ReadonlyMap<number, number>
+	epic_numbers: ReadonlySet<number>
+}
+
+type Membership = Pick<BacklogIssue, 'epic' | 'is_epic' | 'is_release'>
+
+// The fields that decide whether and where an issue takes part in a bundle. Single-sourced so the
+// listing read and the per-reference read cannot disagree about which issue is an epic or the
+// release one.
+function membership_of(
+	number: number,
+	labels: ReadonlyArray<string>,
+	context: MembershipContext,
+): Membership {
+	const epic = context.epics.get(number)
+
+	return {
+		is_epic: context.epic_numbers.has(number),
+		is_release: has_label_name(labels, RELEASE_LABEL),
+		...(epic !== undefined && { epic }),
+	}
+}
+
+// Neither an epic nor the release issue takes part in a bundle, on either side.
+function is_excluded(issue: BacklogIssue): boolean {
+	return issue.is_epic === true || issue.is_release === true
+}
+
 // A strong signal, and only a strong signal.
 //
 // Similar titles are deliberately not one. "Related" expands without limit, and a threshold is what
@@ -87,9 +123,7 @@ function has_recorded_dependency(subject: BacklogIssue, other: BacklogIssue): bo
 function is_strong_signal(subject: BacklogIssue, other: BacklogIssue): boolean {
 	// Neither side. Asked about an epic, the one-sided check found every one of its children through
 	// their own `parent: #N` line and proposed bundling a container with its contents.
-	if (subject.number === other.number || subject.is_epic === true || other.is_epic === true) {
-		return false
-	}
+	if (subject.number === other.number || is_excluded(subject) || is_excluded(other)) return false
 
 	return has_mutual_reference(subject, other) || has_recorded_dependency(subject, other)
 }
@@ -295,10 +329,11 @@ const epic_bundle = {
 	already_tracked_reason,
 	has_recorded_dependency,
 	is_strong_signal,
+	membership_of,
 	decide_bundle,
 	bundle_dependency_links,
 	bundle_children,
 }
 
-export type { BacklogIssue, BundleAction, BundleDecision }
+export type { BacklogIssue, BundleAction, BundleDecision, MembershipContext }
 export { epic_bundle }

package/scripts/exports/unused-members-cli.ts

@@ -3,6 +3,7 @@ import path from 'node:path'
 import { fileURLToPath } from 'node:url'
 import { doctor_consumer } from '#scripts/doctor/doctor-consumer'
 import { project_checks } from '#scripts/gate/project-checks'
+import { NOTHING_TO_CHECK_MARKER } from '#scripts/test/skip-marker'
 import type { NamespaceMember } from './namespace-members'
 
 const CHECK = 'exports'
@@ -13,7 +14,7 @@ const FAIL_EXIT_CODE = 1
 // **Not a skip notice**. `SKIP_MARKER` means "a check passed without running",
 // and the gate withholds its green record on it — so a consumer, where this notice prints on every
 // run, never got a green record. Out of scope by design is not unverified, so the marker stays out.
-const CONSUMER_NOTICE = `josh ${CHECK}: checks only the kit repository itself — nothing to check in a consumer project.`
+const CONSUMER_NOTICE = `josh ${CHECK}: checks only the kit repository itself — ${NOTHING_TO_CHECK_MARKER} in a consumer project.`
 
 function format_member(root: string, member: NamespaceMember): string {
 	return `${path.relative(root, member.file)}:${String(member.line)}  ${member.namespace}.${member.member}`

package/scripts/followup/followup-checks-event.ts

@@ -0,0 +1,82 @@
+import type { SnapshotObserver } from '#scripts/gh/git-pr-checks'
+import { is_coderabbit_check, is_coderabbit_rate_limited } from '#scripts/gh/git-pr-checks-eval'
+import {
+	CHECK_STATUS_FAIL,
+	CHECK_STATUS_PASS,
+	CHECK_STATUS_PENDING,
+	type PrStateSnapshot,
+	type RollupCheck,
+} from '#scripts/gh/git-pr-checks-parse'
+import {
+	run_event_checks,
+	type CodeRabbitState,
+	type PrChecks,
+} from '#scripts/run/event/run-event-checks'
+import { run_event_stream } from '#scripts/run/event/run-event-stream'
+import { run_event_stream_emit } from '#scripts/run/event/run-event-stream-emit'
+
+// What `followup`'s check wait tells the run's event stream (joshuafolkken/kit#3770): the CI counts and
+// CodeRabbit's state, one `pr-checks` line each time they change, so `run:board` draws a child waiting
+// in followup from the stream alone. CodeRabbit is counted apart — it has a state of its own and does
+// not gate the merge.
+
+const PR_NUMBER_PATTERN = /\/pull\/(?<number>\d+)/u
+const { PR_CHECKS } = run_event_stream.EVENT_KIND
+
+function count_of(checks: ReadonlyArray<RollupCheck>, status: string): number {
+	return checks.filter((check) => check.status === status).length
+}
+
+function coderabbit_state_of(check: RollupCheck | undefined): CodeRabbitState {
+	if (check === undefined) return 'none'
+	if (check.status === CHECK_STATUS_PENDING) return 'running'
+	if (check.status !== CHECK_STATUS_PASS) return 'failed'
+
+	return is_coderabbit_rate_limited(check) ? 'rate-limited' : 'done'
+}
+
+function summary_of(snapshot: PrStateSnapshot, pr: number): PrChecks {
+	const ci = snapshot.rollup.filter((check) => !is_coderabbit_check(check.name))
+	const coderabbit = snapshot.rollup.find((check) => is_coderabbit_check(check.name))
+
+	return {
+		pr,
+		pass: count_of(ci, CHECK_STATUS_PASS),
+		pending: count_of(ci, CHECK_STATUS_PENDING),
+		fail: count_of(ci, CHECK_STATUS_FAIL),
+		coderabbit: coderabbit_state_of(coderabbit),
+	}
+}
+
+function pr_number_of(pr_url = ''): number | undefined {
+	const number = PR_NUMBER_PATTERN.exec(pr_url)?.groups?.['number']
+
+	return number === undefined ? undefined : Number(number)
+}
+
+async function skip_snapshot(): Promise<void> {
+	// Nothing names the child or its pull request, so there is no row to report to.
+}
+
+// An observer that writes a line only when it differs from the one this wait last wrote; one that
+// does nothing where the issue or the pull request is unknown.
+function observer_of(issue: string | undefined, pr_url: string | undefined): SnapshotObserver {
+	const pr = pr_number_of(pr_url)
+
+	if (issue === undefined || pr === undefined) return skip_snapshot
+
+	let last_text = ''
+
+	return async function report_snapshot(snapshot: PrStateSnapshot): Promise<void> {
+		const text = run_event_checks.text_of(issue, summary_of(snapshot, pr))
+
+		if (text === last_text) return
+
+		last_text = text
+		await run_event_stream_emit.emit(PR_CHECKS, text)
+	}
+}
+
+const followup_checks_event = { observer_of, summary_of }
+
+export { followup_checks_event }

package/scripts/followup/git-followup-finish.ts

@@ -1,4 +1,5 @@
 import { git_next_issues } from '#scripts/issue/git-next-issues'
+import { issue_watch } from '#scripts/issue/issue-watch'
 import { review_attest } from '#scripts/review/review-attest'
 import { review_stamps } from '#scripts/review/review-stamps'
 import { run_hold } from '#scripts/run/hold/run-hold'
@@ -67,11 +68,24 @@ async function clear_review_target(should_merge: boolean): Promise<void> {
 	}
 }
 
-// The two review records are one step of the tail: both are cleared by a merged run and neither is
-// worth reporting on its own.
+// The issue watch ends with the run it watched: a record left behind would make the next run's hook
+// poll an issue that is no longer its own.
+async function clear_issue_watch(should_merge: boolean): Promise<void> {
+	if (!should_merge) return
+
+	try {
+		await issue_watch.clear_here()
+	} catch {
+		/* the next `josh run:entry` replaces the record */
+	}
+}
+
+// The review records and the issue watch are one step of the tail: all are cleared by a merged run
+// and none is worth reporting on its own.
 async function clear_review_records(should_merge: boolean): Promise<void> {
 	clear_round_one_snapshot(should_merge)
 	await clear_review_target(should_merge)
+	await clear_issue_watch(should_merge)
 }
 
 // The working-tree hold a typed entry point claims before it starts is released here, on the one seam every `fullrun` — and every child of an `epicrun` or a `queue` —

package/scripts/followup/git-followup-workflow.ts

@@ -3,6 +3,7 @@ import { parseArgs } from 'node:util'
 import { git_branch } from '#scripts/git/git-branch'
 import { git_error } from '#scripts/git/git-error'
 import { issue_number_shape } from '#scripts/issue/issue-number-shape'
+import { issue_watch_gate } from '#scripts/issue/issue-watch-gate'
 import { cli_body } from '#scripts/josh/cli-body'
 import { josh_environment_file } from '#scripts/josh/josh-environment-file'
 import { git_notify, type GitNotifyConfig } from '#scripts/notify/git-notify'
@@ -151,9 +152,11 @@ async function assert_review_attested(should_merge: boolean): Promise<void> {
 
 	const verdict = await review_attest.check_here()
 
-	if (is_merge_permitted(verdict.status)) return
+	if (!is_merge_permitted(verdict.status)) throw new Error(review_attest.refusal_message(verdict))
+
+	const refusal = await issue_watch_gate.review_refusal_here()
 
-	throw new Error(review_attest.refusal_message(verdict))
+	if (refusal !== undefined) throw new Error(refusal)
 }
 
 // Recording a review round as a prose request leaves the recurrence ledger blind whenever it is

package/scripts/followup/git-pr-followup-checks.ts

@@ -4,9 +4,11 @@ import {
 	DEFAULT_STABLE_READS,
 	git_pr_checks,
 	WATCH_CONFIRMED_STABLE_READS,
+	type SnapshotObserver,
 } from '#scripts/gh/git-pr-checks'
 import { is_coderabbit_check } from '#scripts/gh/git-pr-checks-eval'
 import { CHECK_STATUS_PASS, type PrStateSnapshot } from '#scripts/gh/git-pr-checks-parse'
+import { issue_watch_gate } from '#scripts/issue/issue-watch-gate'
 import { json_value } from '#scripts/lib/json-value'
 
 // The check wait and the notes read off its snapshot — split out of `git-pr-followup.ts` when it
@@ -75,12 +77,15 @@ async function handle_watch_failure(branch_name: string, error: unknown): Promis
 // reads the wait still needs. A timed-out watch (`timed_out: true`) never spanned the pending→settled
 // window, so it must keep the full stable-read window rather than claim the confirmation. A rethrown
 // failure — the empty-rollup case — never reaches a caller, so it needs no answer here.
-async function watch_before_polling(branch_name: string): Promise<boolean> {
+async function watch_before_polling(
+	branch_name: string,
+	observe: SnapshotObserver | undefined,
+): Promise<boolean> {
 	console.info('')
 	console.info('📊 Watching PR checks...')
 
 	try {
-		const result = await git_gh_command.pr_checks_watch(branch_name)
+		const result = await git_gh_command.pr_checks_watch(branch_name, observe)
 
 		return !result.timed_out
 	} catch (error) {
@@ -95,14 +100,23 @@ async function watch_before_polling(branch_name: string): Promise<boolean> {
 // once rather than twice — which removes the extra interval `followup` spent re-proving a settled run.
 // A skipped or fallen-through watch keeps `DEFAULT_STABLE_READS`, and a check that turned red is still
 // caught: the poll evaluates the full merge gate and throws on failure before any stable read counts.
+// `observe` is shown each poll's snapshot, the watch's included — the run's `pr-checks` line
+// (joshuafolkken/kit#3770).
 async function run_checks(input: {
 	branch_name: string
 	is_skip_watch: boolean
+	observe?: SnapshotObserver
 }): Promise<PrStateSnapshot> {
-	const is_watch_confirmed = !input.is_skip_watch && (await watch_before_polling(input.branch_name))
+	const is_watch_confirmed =
+		!input.is_skip_watch && (await watch_before_polling(input.branch_name, input.observe))
 	const stable_reads = is_watch_confirmed ? WATCH_CONFIRMED_STABLE_READS : DEFAULT_STABLE_READS
 
-	return await git_pr_checks.wait_for_pr_success(input.branch_name, stable_reads)
+	return await git_pr_checks.wait_for_pr_success(
+		input.branch_name,
+		stable_reads,
+		issue_watch_gate.assert_read_here,
+		input.observe,
+	)
 }
 
 // Temporary: record every CodeRabbit check that was not passing when the merge gate

package/scripts/followup/git-pr-followup-wrapup.ts

@@ -1,5 +1,6 @@
 import { epic_close } from '#scripts/epic/epic-close'
 import { git_gh_command } from '#scripts/gh/git-gh-command'
+import { issue_watch_gate } from '#scripts/issue/issue-watch-gate'
 import { git_notify, type GitNotifyConfig } from '#scripts/notify/git-notify'
 import { git_followup_cleanup } from './git-followup-cleanup'
 import { git_followup_issue_close } from './git-followup-issue-close'
@@ -232,8 +233,12 @@ async function run_tail_steps(input: WrapupInput): Promise<void> {
 	])
 }
 
+// The last look at the issue before the merge: the CI poll checked it on every iteration, but a
+// person's update can land between that poll and this step, and only the seconds after this read are
+// left unwatched.
 async function run_wrapup(input: WrapupInput, log: StageLog): Promise<void> {
 	if (input.should_merge && input.is_merged !== true) {
+		await issue_watch_gate.assert_read_here()
 		await git_gh_command.pr_merge(input.branch_name)
 		lap(log, STAGE.merge)
 	}

package/scripts/followup/git-pr-followup.ts

@@ -10,6 +10,7 @@ import {
 	type TelegramSendInput,
 	type TelegramTaskType,
 } from '#scripts/notify/telegram-notify'
+import { followup_checks_event } from './followup-checks-event'
 import { git_followup_merged } from './git-followup-merged'
 import { git_followup_pending } from './git-followup-pending'
 import { git_followup_stages, type StageLog } from './git-followup-stages'
@@ -229,6 +230,7 @@ async function run_review_checks(
 	input: FollowupInput,
 	context: TelegramContext,
 	log: StageLog,
+	issue_number: string | undefined,
 ): Promise<{ notes: Array<string>; managed: Array<string> }> {
 	if (input.is_merged === true) return { notes: [], managed: [] }
 
@@ -238,6 +240,7 @@ async function run_review_checks(
 	const snapshot = await run_checks({
 		branch_name: input.branch_name,
 		is_skip_watch: input.is_skip_watch,
+		observe: followup_checks_event.observer_of(issue_number, context.pr_url),
 	})
 
 	lap(log, STAGE.checks_wait)
@@ -278,7 +281,7 @@ async function run_stages(input: FollowupInput, log: StageLog): Promise<string |
 	const { issue_number, closes_number, context } = await read_run_context(input)
 
 	lap(log, STAGE.closes_and_context)
-	const checks = await run_review_checks(input, context, log)
+	const checks = await run_review_checks(input, context, log, issue_number)
 	const is_completion_recorded = await notify_unless_recorded(input, issue_number, context, checks)
 
 	lap(log, STAGE.telegram)

package/scripts/fresh-machine/fresh-machine-cli.ts

@@ -0,0 +1,204 @@
+#!/usr/bin/env tsx
+import { mkdirSync, readdirSync, readFileSync } from 'node:fs'
+import path from 'node:path'
+import { fileURLToPath } from 'node:url'
+import { parseArgs } from 'node:util'
+import { claude_token } from '#scripts/auth/claude-token'
+import { gh_cli_token } from '#scripts/gh/gh-cli-token'
+import { git_gh_exec } from '#scripts/gh/git-gh-exec'
+import { PROJECT_ROOT } from '#scripts/init/init-paths'
+import { self_sync_guard } from '#scripts/self-sync-guard/self-sync-guard-logic'
+import { KIT_PACKAGE_NAME } from '#scripts/version/kit-descriptor'
+import { fresh_machine_docker } from './fresh-machine-docker'
+import { fresh_machine_log } from './fresh-machine-log'
+import { fresh_machine_patterns } from './fresh-machine-patterns'
+import { fresh_machine_run, type RunRequest } from './fresh-machine-run'
+import { fresh_machine_spec, type Scenario } from './fresh-machine-spec'
+
+// `josh fresh:run <pattern>` / `josh fresh:run --spec <file>` — run one scenario on a machine that
+// has nothing installed, and keep what happened as a log.
+
+const ARGV_OFFSET = 2
+const FAILURE_EXIT_CODE = 1
+const USAGE =
+	'Usage: josh fresh:run <pattern> | --spec <file.json> [--package-version <version>] [--log-dir <dir>] [--rebuild] | --list'
+// The scratch directory kit's distributed `.gitignore` already ignores, so a log is never committed
+// from kit or from a consumer toolkit.
+const DEFAULT_LOG_DIRECTORY = '.claude/tmp/fresh-machine'
+const NO_GITHUB_TOKEN =
+	'This scenario uses GitHub and `gh auth token` printed no token. Run `gh auth login` on this machine first.'
+const NO_CLAUDE_TOKEN = `This scenario uses Claude Code and neither the macOS keychain nor ${claude_token.VARIABLE} holds a token. ${claude_token.SETUP_HINT}`
+// The patterns install kit by name, while the tarball and the published version are those of the
+// checkout the command is run from — in a toolkit's checkout the two would be different packages.
+const NOT_A_KIT_CHECKOUT = `The named patterns install ${KIT_PACKAGE_NAME} and run from its checkout only. Write this package's scenario as a JSON file and pass it with --spec.`
+const OWNED_REPOSITORIES = 'user/repos?affiliation=owner&per_page=100'
+const REPOSITORY_NAMES = '.[].name'
+
+// The option names are the CLI's, so the type is read off the parser rather than restated.
+// eslint-disable-next-line @typescript-eslint/explicit-function-return-type
+function parse(argv: ReadonlyArray<string>) {
+	return parseArgs({
+		args: [...argv],
+		allowPositionals: true,
+		options: {
+			spec: { type: 'string' },
+			'package-version': { type: 'string' },
+			'log-dir': { type: 'string' },
+			rebuild: { type: 'boolean' },
+			list: { type: 'boolean' },
+		},
+	})
+}
+
+type CliValues = ReturnType<typeof parse>['values']
+
+function pattern_of(name: string): Scenario | undefined {
+	const scenario = fresh_machine_patterns.find(name)
+
+	if (scenario === undefined) return undefined
+
+	const is_kit_checkout = self_sync_guard.read_package_name(PROJECT_ROOT) === KIT_PACKAGE_NAME
+
+	if (!is_kit_checkout) throw new Error(NOT_A_KIT_CHECKOUT)
+
+	return scenario
+}
+
+function scenario_of(values: CliValues, pattern: string | undefined): Scenario | undefined {
+	if (values.spec !== undefined) {
+		return fresh_machine_spec.parse(readFileSync(path.resolve(PROJECT_ROOT, values.spec), 'utf8'))
+	}
+
+	return pattern === undefined ? undefined : pattern_of(pattern)
+}
+
+// A GitHub run's name is also the repository it creates under the account of the token, and the
+// logs of this checkout are not the only place such a run was started from.
+function repositories_of(scenario: Scenario): Array<string> {
+	if (!scenario.requires_github) return []
+
+	const names = git_gh_exec.exec_gh_api_sync({
+		path: OWNED_REPOSITORIES,
+		should_paginate: true,
+		jq_filter: REPOSITORY_NAMES,
+	})
+
+	return names.split('\n').filter((name) => name !== '')
+}
+
+function request_of(
+	scenario: Scenario,
+	values: CliValues,
+	secrets: Record<string, string>,
+): RunRequest {
+	const log_directory = path.resolve(PROJECT_ROOT, values['log-dir'] ?? DEFAULT_LOG_DIRECTORY)
+
+	mkdirSync(log_directory, { recursive: true })
+
+	const run_name = fresh_machine_log.next_name(scenario.name, {
+		logs: readdirSync(log_directory),
+		repositories: repositories_of(scenario),
+	})
+
+	return {
+		scenario,
+		run_name,
+		log_path: path.join(log_directory, fresh_machine_log.file_name(run_name)),
+		package_version: values['package-version'],
+		secrets,
+		is_rebuild: values.rebuild === true,
+	}
+}
+
+function refuse(message: string): number {
+	console.error(message)
+
+	return FAILURE_EXIT_CODE
+}
+
+// One secret a scenario asks for: where its value is read on the host, and what to say when there is
+// none. Every one is read before Docker starts, so a missing token stops the run with nothing built.
+interface Secret {
+	variable: string
+	is_required: (scenario: Scenario) => boolean
+	read: () => string | undefined
+	missing: string
+}
+
+const SECRETS: ReadonlyArray<Secret> = [
+	{
+		variable: fresh_machine_docker.TOKEN_VARIABLE,
+		is_required: (scenario) => scenario.requires_github,
+		read: gh_cli_token.get,
+		missing: NO_GITHUB_TOKEN,
+	},
+	{
+		variable: claude_token.VARIABLE,
+		is_required: (scenario) => scenario.requires_claude,
+		read: claude_token.read,
+		missing: NO_CLAUDE_TOKEN,
+	},
+]
+
+// The values found, by variable name, and the message of the first secret that has none.
+interface Secrets {
+	values: Record<string, string>
+	missing: string | undefined
+}
+
+function secrets_of(scenario: Scenario): Secrets {
+	const required = SECRETS.filter((secret) => secret.is_required(scenario))
+	const read = required.map((secret) => ({ secret, value: secret.read() }))
+	const found = read.flatMap(({ secret, value }) =>
+		value === undefined ? [] : [[secret.variable, value] as const],
+	)
+
+	return {
+		values: Object.fromEntries(found),
+		missing: read.find(({ value }) => value === undefined)?.secret.missing,
+	}
+}
+
+async function run_scenario(scenario: Scenario, values: CliValues): Promise<number> {
+	const secrets = secrets_of(scenario)
+
+	if (secrets.missing !== undefined) return refuse(secrets.missing)
+
+	const request = request_of(scenario, values, secrets.values)
+	const exit_code = await fresh_machine_run.run(request)
+
+	console.info(`Log: ${request.log_path}`)
+
+	return exit_code
+}
+
+async function run(argv: ReadonlyArray<string>): Promise<number> {
+	const { values, positionals } = parse(argv)
+	const patterns = fresh_machine_patterns.names().join('\n')
+
+	if (values.list === true) {
+		console.info(patterns)
+
+		return 0
+	}
+
+	const scenario = scenario_of(values, positionals[0])
+
+	if (scenario === undefined) return refuse(`${USAGE}\n\nPatterns:\n${patterns}`)
+
+	return await run_scenario(scenario, values)
+}
+
+async function main(argv: ReadonlyArray<string>): Promise<void> {
+	try {
+		process.exitCode = await run(argv)
+	} catch (error) {
+		process.exitCode = refuse(error instanceof Error ? error.message : String(error))
+	}
+}
+
+const fresh_machine_cli = { run }
+
+if (process.argv[1] === fileURLToPath(import.meta.url)) await main(process.argv.slice(ARGV_OFFSET))
+
+export { fresh_machine_cli }

package/scripts/fresh-machine/fresh-machine-docker.ts

@@ -0,0 +1,65 @@
+import { fresh_machine_script } from './fresh-machine-script'
+
+// The two docker invocations of `josh fresh:run`, as argument lists. A token is passed by name only
+// (`--env GH_TOKEN`): docker reads its value from the environment of the client, so it is in no
+// argument, no image layer and no printed command.
+
+const TOKEN_VARIABLE = 'GH_TOKEN'
+const ENV_FLAG = '--env'
+const VOLUME_FLAG = '--volume'
+
+interface ContainerRun {
+	image: string
+	run_name: string
+	script: string
+	seed_directory: string
+	pack_directory: string
+	// The packed checkout's file name inside `pack_directory`, for a tarball scenario.
+	tarball: string | undefined
+	package_version: string | undefined
+	// The variables whose values the client's environment carries into the container.
+	secret_names: ReadonlyArray<string>
+}
+
+// The Dockerfile arrives on stdin (`-`), so the build has no context to copy a host file from.
+function build_arguments(image: string, is_rebuild: boolean): Array<string> {
+	const cache = is_rebuild ? ['--no-cache'] : []
+
+	return ['build', '--progress', 'plain', ...cache, '--tag', image, '-']
+}
+
+function variables(container: ContainerRun): Array<string> {
+	const { tarball } = container
+	const tarball_path = tarball === undefined ? '' : `${fresh_machine_script.PACK_MOUNT}/${tarball}`
+	const assignments = [
+		`RUN_NAME=${container.run_name}`,
+		`PACKAGE_TARBALL=${tarball_path}`,
+		`PACKAGE_VERSION=${container.package_version ?? ''}`,
+		...container.secret_names,
+	]
+
+	return assignments.flatMap((assignment) => [ENV_FLAG, assignment])
+}
+
+// `bash -i` is the new terminal the prerequisites guide asks for: it reads the profile the pnpm
+// installer edited, which a non-interactive shell on Debian returns from before reaching.
+function run_arguments(container: ContainerRun): Array<string> {
+	return [
+		'run',
+		'--rm',
+		...variables(container),
+		VOLUME_FLAG,
+		`${container.seed_directory}:${fresh_machine_script.SEED_MOUNT}:ro`,
+		VOLUME_FLAG,
+		`${container.pack_directory}:${fresh_machine_script.PACK_MOUNT}:ro`,
+		container.image,
+		'bash',
+		'-ic',
+		container.script,
+	]
+}
+
+const fresh_machine_docker = { build_arguments, run_arguments, TOKEN_VARIABLE }
+
+export { fresh_machine_docker }
+export type { ContainerRun }