@genroc/eval-node 0.0.0-edge.aff7b37 → 0.0.0-edge.bac4287

package/README.md

@@ -24,6 +24,16 @@ on the cwd:
 `genctl apply` and `genctl types` now resolve `$import` directives. Typechecking is the
 resolver's exit code, so a stored definition cannot hold code that failed to typecheck.
 
+## Building
+
+    npm run build       # tsc -p tsconfig.build.json -> dist/
+
+The published package is JavaScript, not TypeScript. **Node refuses to strip types for files
+under `node_modules`**, so shipping `.ts` works from a checkout and fails for every consumer —
+which is why `prepublishOnly` builds and CI installs the packed tarball rather than only running
+from source. The source keeps its `.ts` import extensions; `rewriteRelativeImportExtensions`
+turns them into `.js` on the way out.
+
 ## Running the worker
 
     docker run -e GENROC_SERVER=http://host:8448 ghcr.io/genroc/eval-node:preview
@@ -86,15 +96,18 @@ The `input` of the external task IS the evaluation request:
 
 ```jsonc
 {
-  "code": "return { fee: input.amount * 0.1 };",  // required — an async function body
-  "input": { "amount": 250 },                     // optional — bound as `input`
-  "timeout_ms": 5000                              // optional — default 5000
+  "code": "export default (input) => ({ fee: input.amount * 0.1 });",  // required — a module
+  "input": { "amount": 250 },                                         // optional — its argument
+  "timeout_ms": 5000                                                  // optional — default 5000
 }
 ```
 
-`code` is the **body of an async function**, so `await` works and the value reaches genroc
-through `return`. It is compiled with `input` and `require` as parameters, under
-`"use strict"` — `require` is what a bundled `import` of a node builtin lands on.
+`code` is an **ES module**, and the evaluator imports it and calls its **default export** with
+`input`. The value it returns reaches genroc; the function may be async, and so may the module's
+top level. A module exporting anything else — or nothing — is a `compile_error`: there is
+nothing to call, and so is one that will not parse; a throw from its top level is a `threw`
+like any other. `import` of a node builtin resolves as it does anywhere else, and that is what
+a bundled builtin lands on.
 
 ## The answer — the failure kind IS the error code
 
@@ -130,12 +143,14 @@ no retry policy to write.
     type: external
     input:
       code: |
-        if (input.amount > 100) {
-          const e = new Error('amount over the limit');
-          e.name = 'LimitExceeded';
-          throw e;
+        export default function (input) {
+          if (input.amount > 100) {
+            const e = new Error('amount over the limit');
+            e.name = 'LimitExceeded';
+            throw e;
+          }
+          return { fee: input.amount * 0.1 };
         }
-        return { fee: input.amount * 0.1 };
       input: "$: input"
     result_schema: { type: object, properties: { fee: { type: number } }, required: [fee] }
     raises:
@@ -154,7 +169,7 @@ no retry policy to write.
 
 - id: script_failed
   switch:
-    - case: 'error.data.name == "LimitExceeded"'
+    - case: 'last_error.data.name == "LimitExceeded"'
       raise: { code: limit_exceeded, message: "the script rejected the amount" }
     - raise: { code: script_failed, message: "the script failed" }
 ```
@@ -217,12 +232,14 @@ the inferred type of what the definition passes; `Output` is what it declares
 `tsc --noEmit`, and bundles — so **a type error is a failed apply**, and a stored definition
 cannot hold code that failed to typecheck.
 
-The bundle is emitted as CJS and wrapped as a function body, so the evaluator needs to know
-nothing about modules. Imports resolve through TypeScript under the same config the check
-ran with, so a `paths` alias that typechecks also bundles. They are inlined at build time, so the string a
-definition version stores is self-contained forever — with one exception: **node builtins
-stay as `require` calls**, which the realm satisfies. A package is frozen into the
-definition; `node:fs` is resolved by whatever runner executes it.
+The bundle is one self-contained ES module whose default export is the author's own — nothing
+wraps or rewrites it, so what the editor checks and what the realm runs are the same module, and
+**a missing default export is a failed apply** rather than a fault at run time. Imports resolve
+through TypeScript under the same config the check ran with, so a `paths` alias that typechecks
+also bundles. They are inlined at build time, so the string a definition version stores is
+self-contained forever — with one exception: **node builtins stay as imports**, which the realm
+resolves. A package is frozen into the definition; `node:fs` is resolved by whatever runner
+executes it.
 
 ### Your tsconfig, your types
 
@@ -248,8 +265,9 @@ never read by genroc, because genctl doubles every `$` on splice.
 
 ## The realm — one Worker per execution
 
-`evaluate()` starts a Worker (`realm.ts`), posts the code into it, and races the reply against the budget;
-`terminate()` runs on every path. That thread is what the contract rests on, and it buys
+`evaluate()` starts a Worker (`realm.ts`), posts the code into it — where a module loader hook
+serves it to `import()`, so the engine numbers the script's frames from the author's own source —
+and races the reply against the budget; `terminate()` runs on every path. That thread is what the contract rests on, and it buys
 exactly three things the previous in-process evaluator could not:
 
 - **The budget is enforced, not merely reported.** A synchronous `while(true){}` never
@@ -261,16 +279,15 @@ exactly three things the previous in-process evaluator could not:
 - **The script's mistakes stay the script's.** An uncaught throw, and `process.exit()`, end
   the realm and come back as a `422` — neither reaches the runner.
 
-It costs about **50ms per execution** end to end for a trivial script (Node 24, M-series
-laptop), a 200 KiB body about 63ms. Roughly 19ms of that is Node re-stripping `worker.ts`'s
-types on every realm — precompiling it to JavaScript would buy that back, and is deliberately
-not done: a build artefact that goes stale against its source fails silently, and this file
-is the one where a wrong line number is invisible.
+It costs about **27ms per execution** end to end for a trivial script (Node 24, M-series
+laptop), a 200 KiB body about 30ms. Roughly 11ms of that is Node re-stripping `realm.ts`'s
+types on every realm — precompiling it to JavaScript measures 17ms and would buy that back, and
+is deliberately not done: a build artefact that goes stale against its source fails silently,
+and this file is the one where a wrong line number is invisible.
 
-That also changes an old trade-off. A subprocess per execution measures ~48ms here — within
-noise of the thread — where on the previous runtime it was ten times the thread's cost. The
-thread no longer wins on price, and a subprocess contains the two things a thread cannot
-(below), so it is the live upgrade path rather than a theoretical one.
+A subprocess per execution measures ~55ms here, twice the thread rather than the ten times it
+cost on the previous runtime. It contains the two things a thread cannot (below), so the upgrade
+path is a live one at a price worth naming rather than a theoretical one.
 
 ## What this is not
 
@@ -281,7 +298,7 @@ thread no longer wins on price, and a subprocess contains the two things a threa
   it needed was surface with nothing behind it. A value that must survive a retry belongs in
   the definition, passed through `input`.
 - **Not a sandbox.** The realm isolates *execution*, not *authority*: a script gets the
-  worker's filesystem, network and environment, and `require` of any node builtin. That is
+  worker's filesystem, network and environment, and any node builtin it imports. That is
   deliberate — a script task is meant to do real work — but the trust boundary stays the
   same-trust-domain one (your genroc, your worker host). It is not the multi-tenant story, and
   nothing here should be mistaken for one. Pulling does move the boundary in one useful way:
@@ -295,9 +312,9 @@ thread no longer wins on price, and a subprocess contains the two things a threa
 - **Concurrency is capped by this worker, not by genroc.** Each evaluation is a thread, and
   `CONCURRENCY` is how many it will claim at once. Raising it past what the host can run turns
   a queue back into threads fighting over a core.
-- **Not where imports and type checking happen.** The evaluator still takes one
-  self-contained function body and knows nothing about TypeScript; `import.ts` is what turns
-  a module into that body, at author time. See above.
+- **Not where imports and type checking happen.** The evaluator takes one self-contained
+  module and knows nothing about TypeScript; `import.ts` is what bundles an author's script and
+  its dependencies into that module, at author time. See above.
 - **`eval.ts` and `realm.ts` know nothing about genroc.** `worker.ts` is the entire
   queue-facing half, which is what keeps the containment strategy swappable — and what lets
   the realm's own properties be tested by calling `evaluate()` directly.

package/dist/eval.js

@@ -0,0 +1,65 @@
+// Evaluation core: import a script module in its OWN realm, call its default export, and
+// classify every outcome into one of the failure kinds in README.md. Nothing here knows about
+// genroc — worker.ts is the only thing that talks to the queue — so this stays testable and
+// the containment stays swappable.
+//
+// The containment is a Worker per execution (realm.ts). It is what makes the budget real:
+// a synchronous busy loop never yields, so no in-process timer can interrupt it, and only a
+// thread the host can kill bounds it.
+import { Worker } from "node:worker_threads";
+const DEFAULT_TIMEOUT_MS = 5_000;
+// Resolved from THIS file's own extension: run from a checkout it is `.ts`, and from the
+// published package `.js`, because Node will not strip types under node_modules.
+const REALM_URL = new URL(import.meta.url.endsWith(".ts") ? "./realm.ts" : "./realm.js", import.meta.url);
+/** Thrown, not returned: a realm that fails to start is the RUNNER faulting, which worker.ts
+ *  answers by releasing the claim rather than by reporting an outcome. A script fault is a
+ *  return value. */
+class RealmFault extends Error {
+    constructor(message) {
+        super(message);
+        this.name = "RealmFault";
+    }
+}
+export async function evaluate(req) {
+    const budget = typeof req.timeout_ms === "number" ? req.timeout_ms : DEFAULT_TIMEOUT_MS;
+    const worker = new Worker(REALM_URL);
+    let timer;
+    try {
+        return await new Promise((resolve, reject) => {
+            timer = setTimeout(() => resolve(timedOut(budget)), budget);
+            worker.once("message", (reply) => resolve(reply));
+            // A script may end its own realm (`process.exit()`), which is not a throw and would
+            // otherwise present as a hang until the budget expired. Our own terminate() raises
+            // this too, by which time the promise has settled and the first result stands.
+            worker.once("exit", (code) => resolve(exited(code)));
+            worker.once("error", (err) => reject(new RealmFault(errorText(err))));
+            worker.postMessage({ code: req.code, input: req.input });
+        });
+    }
+    finally {
+        clearTimeout(timer);
+        // Awaited, and the whole point: on the timeout path a thread is still burning a core, and
+        // resolving before it is gone would report an evaluation the machine is still running.
+        await worker.terminate();
+    }
+}
+function timedOut(ms) {
+    return {
+        ok: false,
+        failure: { kind: "timeout", name: "TimeoutError", message: `script exceeded its ${ms}ms budget` },
+    };
+}
+function exited(code) {
+    return {
+        ok: false,
+        failure: {
+            kind: "exited",
+            name: "RealmExited",
+            message: `the script ended its own realm with code ${code} instead of returning`,
+        },
+    };
+}
+function errorText(e) {
+    const message = e?.message;
+    return typeof message === "string" && message !== "" ? message : "the evaluation realm failed to start";
+}

package/dist/import.js

@@ -0,0 +1,397 @@
+#!/usr/bin/env node
+// The code-phase resolver: manifest on stdin, `{"code": [...]}` on stdout, non-zero exit
+// with the diagnostic on stderr. genctl never parses TypeScript and this never parses YAML
+// — the manifest is the whole contract. See specs/source-resolution.md.
+//
+// Two modes, one binary: "types" writes the declarations an editor needs and returns no
+// code; "build" typechecks and bundles. A separate types hook would mean a second `tsc`
+// over the same project.
+import { spawn } from "node:child_process";
+import { existsSync } from "node:fs";
+import { access, mkdir, writeFile } from "node:fs/promises";
+import { builtinModules } from "node:module";
+import { dirname, join, relative, resolve } from "node:path";
+import { fileURLToPath } from "node:url";
+import commonjs from "@rollup/plugin-commonjs";
+import json from "@rollup/plugin-json";
+import { nodeResolve } from "@rollup/plugin-node-resolve";
+import { rollup } from "rollup";
+import ts from "typescript";
+function die(message) {
+    console.error(message);
+    process.exit(1);
+}
+async function exists(path) {
+    try {
+        await access(path);
+        return true;
+    }
+    catch {
+        return false;
+    }
+}
+/** Creates the parent directory, which `.genroc-cache/` relies on: nothing else makes it. */
+async function write(path, content) {
+    await mkdir(dirname(path), { recursive: true });
+    await writeFile(path, content);
+}
+// ── JSON Schema → TypeScript ───────────────────────────────────────────────────
+/** Only genroc's keyword set is handled; anything else its strict decoder would have
+ *  refused before this ran (internal/schema, allowedKeywords). */
+function tsType(s, used) {
+    if (s === undefined || s === null)
+        return "unknown";
+    if (typeof s.$ref === "string") {
+        const name = s.$ref.replace(/^#\/\$defs\//, "");
+        used.add(name);
+        return identifier(name);
+    }
+    if (Array.isArray(s.enum)) {
+        return s.enum.map((v) => JSON.stringify(v)).join(" | ") || "never";
+    }
+    if (Array.isArray(s.anyOf))
+        return union(s.anyOf.map((a) => tsType(a, used)));
+    if (Array.isArray(s.oneOf))
+        return union(s.oneOf.map((a) => tsType(a, used)));
+    if (Array.isArray(s.allOf)) {
+        return s.allOf.map((a) => tsType(a, used)).join(" & ") || "unknown";
+    }
+    const types = s.type === undefined ? [] : Array.isArray(s.type) ? s.type : [s.type];
+    if (types.length === 0) {
+        // The top type: `{}` means unknown, not "an empty object". specs/unknown-type.md.
+        return s.properties ? objectType(s, used) : "unknown";
+    }
+    return union(types.map((t) => scalarType(t, s, used)));
+}
+function scalarType(t, s, used) {
+    switch (t) {
+        case "object":
+            return objectType(s, used);
+        case "array":
+            return s.items ? `Array<${tsType(s.items, used)}>` : "unknown[]";
+        case "string":
+            return "string";
+        case "number":
+        case "integer":
+            return "number";
+        case "boolean":
+            return "boolean";
+        case "null":
+            return "null";
+        default:
+            return "unknown";
+    }
+}
+function objectType(s, used) {
+    const props = s.properties ?? {};
+    const required = new Set(s.required ?? []);
+    const lines = [];
+    for (const [key, sub] of Object.entries(props)) {
+        const doc = typeof sub.description === "string"
+            ? `  /** ${sub.description} */\n`
+            : "";
+        lines.push(`${doc}  ${propKey(key)}${required.has(key) ? "" : "?"}: ${tsType(sub, used)};`);
+    }
+    if (s.additionalProperties && typeof s.additionalProperties === "object") {
+        lines.push(`  [key: string]: ${tsType(s.additionalProperties, used)};`);
+    }
+    if (lines.length === 0)
+        return "Record<string, unknown>";
+    return `{\n${lines.join("\n")}\n}`;
+}
+function union(parts) {
+    const seen = [...new Set(parts)];
+    return seen.length === 0 ? "unknown" : seen.join(" | ");
+}
+const IDENT = /^[A-Za-z_$][A-Za-z0-9_$]*$/;
+const propKey = (k) => (IDENT.test(k) ? k : JSON.stringify(k));
+const identifier = (n) => IDENT.test(n) ? n : `Def_${n.replace(/[^A-Za-z0-9_$]/g, "_")}`;
+function deref(s, defs) {
+    let cur = s;
+    for (let i = 0; cur && typeof cur.$ref === "string" && i < 16; i++) {
+        cur = defs[cur.$ref.replace(/^#\/\$defs\//, "")];
+    }
+    return cur;
+}
+/** Emits one named type per reachable $def rather than inlining: a task output may
+ *  reference itself (specs/recursive-type-inference.md) and inlining would not terminate. */
+function declarations(at) {
+    const { site, where } = at;
+    const defs = where.$defs ?? {};
+    const used = new Set();
+    const input = tsType(site.types?.Input, used);
+    const output = tsType(site.types?.Output, used);
+    const emitted = [];
+    const done = new Set();
+    while (true) {
+        const next = [...used].find((n) => !done.has(n));
+        if (next === undefined)
+            break;
+        done.add(next);
+        const body = tsType(defs[next], used);
+        emitted.push(`export type ${identifier(next)} = ${body};`);
+    }
+    return [
+        "// Generated by genroc. Do not edit - regenerate with `genctl types`.",
+        `// ${where.name}  (${address(site.pointer)})`,
+        "",
+        ...emitted,
+        emitted.length ? "" : "",
+        `export type Input = ${input};`,
+        "",
+        `export type Output = ${output};`,
+        "",
+    ].join("\n");
+}
+/** Keyed by the script's PATH, not the task id: keyed by task, renaming a task would break
+ *  the author's `import type` line with the error landing nowhere near the rename. */
+function typesPathFor(scriptPath) {
+    return scriptPath.replace(/\.[^.\/]+$/, "") + ".genroc.d.ts";
+}
+// ── typecheck ──────────────────────────────────────────────────────────────────
+/** The nearest tsconfig above the script — the one the author's editor already reads. Two
+ *  different configs mean a red editor over a clean apply, or the reverse. The walk stops at
+ *  the project root: above it is not this project. */
+async function nearestTsconfig(from, root) {
+    for (let dir = from;; dir = dirname(dir)) {
+        const candidate = join(dir, "tsconfig.json");
+        if (await exists(candidate))
+            return candidate;
+        if (dir === root || dirname(dir) === dir)
+            return null;
+    }
+}
+async function typecheck(sites) {
+    // NOT `.genroc`: that is the project config FILE, and a directory of the same name cannot
+    // coexist with it. The suffix is what keeps the scratch area out of its way.
+    const dir = join(root, ".genroc-cache");
+    await write(join(dir, ".gitignore"), "*\n");
+    // One tsc per distinct base config: `extends` takes a single base, so merging two would
+    // check each script under the other author's options.
+    const groups = new Map();
+    for (const at of sites) {
+        const base = (await nearestTsconfig(dirname(at.file), root)) ?? "";
+        const group = groups.get(base);
+        if (group)
+            group.push(at);
+        else
+            groups.set(base, [at]);
+    }
+    let n = 0;
+    for (const [base, group] of groups) {
+        const config = {
+            ...(base ? { extends: relative(dir, base) } : {}),
+            compilerOptions: {
+                noEmit: true,
+                strict: true,
+                skipLibCheck: true,
+                moduleDetection: "force",
+                module: "preserve",
+                target: "esnext",
+                // `lib` DESCRIBES the realm and is written after `extends` so a base cannot widen it:
+                // a worker thread has no document, whatever an author's config claims.
+                lib: ["esnext", "webworker"],
+                // `types` is the author's, and it is how a script opts into the node globals —
+                // the worker realm has them, so refusing the declarations would only lie. With no
+                // base config there is nothing to opt in with, so the default stays none.
+                ...(base ? {} : { types: [] }),
+            },
+            files: group.flatMap((s) => [
+                relative(dir, s.file),
+                relative(dir, typesPathFor(s.file)),
+            ]),
+            // `files` overrides the base's, but a base `include` survives beside it and would
+            // drag the author's whole tree in, to be checked under the worker lib.
+            include: [],
+        };
+        const configPath = join(dir, groups.size === 1 ? "tsconfig.json" : `tsconfig.${n++}.json`);
+        await write(configPath, JSON.stringify(config, null, 2));
+        await runTsc(root, configPath);
+    }
+}
+async function runTsc(root, configPath) {
+    const tsc = fileURLToPath(import.meta.resolve("typescript/bin/tsc"));
+    const proc = spawn(process.execPath, [tsc, "--noEmit", "-p", configPath], {
+        cwd: root,
+        stdio: ["ignore", "pipe", "pipe"],
+    });
+    let out = "";
+    let err = "";
+    proc.stdout.on("data", (c) => (out += c));
+    proc.stderr.on("data", (c) => (err += c));
+    const code = await new Promise((resolve, reject) => {
+        proc.on("error", reject);
+        proc.on("close", (c) => resolve(c ?? 1));
+    });
+    if (code !== 0) {
+        // tsc reports on stdout; the exit code IS the type check, so this is the diagnostic
+        // genctl surfaces and the reason a failed import never produces a string.
+        die([out, err].filter(Boolean).join("\n").trimEnd());
+    }
+}
+// ── bundle ─────────────────────────────────────────────────────────────────────
+/** Transpiles only. The typecheck above already ran over the author's OWN tsconfig, and a
+ *  second opinion from a config they do not control could fail a build they cannot fix. */
+const transpile = {
+    name: "genroc-transpile",
+    transform(code, id) {
+        if (!id.endsWith(".ts") && !id.endsWith(".tsx"))
+            return null;
+        const out = ts.transpileModule(code, {
+            fileName: id,
+            compilerOptions: {
+                target: ts.ScriptTarget.ESNext,
+                module: ts.ModuleKind.ESNext,
+                verbatimModuleSyntax: false,
+                jsx: id.endsWith(".tsx") ? ts.JsxEmit.ReactJSX : undefined,
+            },
+        });
+        return { code: out.outputText, map: out.sourceMapText ?? null };
+    },
+};
+const BUILTIN = new Set([
+    ...builtinModules,
+    ...builtinModules.map((m) => `node:${m}`),
+]);
+/** Resolves imports through TYPESCRIPT, using the same config the typecheck ran under, so a
+ *  `paths` alias that compiles also bundles. Reimplementing `paths` here would be a second
+ *  resolver to keep in agreement with tsc; this one cannot disagree.
+ *  A package resolving to a `.d.ts` is declined — that is a type, not the implementation —
+ *  which leaves node_modules to nodeResolve. */
+function tsResolve(configPath) {
+    let options = {};
+    if (configPath) {
+        const read = ts.readConfigFile(configPath, ts.sys.readFile);
+        options = ts.parseJsonConfigFileContent(read.config ?? {}, ts.sys, dirname(configPath)).options;
+    }
+    return {
+        name: "genroc-ts-resolve",
+        resolveId(source, importer) {
+            if (!importer || BUILTIN.has(source))
+                return null;
+            const { resolvedModule } = ts.resolveModuleName(source, importer, options, ts.sys);
+            if (!resolvedModule || resolvedModule.isExternalLibraryImport)
+                return null;
+            return resolvedModule.resolvedFileName.endsWith(".d.ts")
+                ? null
+                : resolvedModule.resolvedFileName;
+        },
+    };
+}
+/** Bundles to a self-contained ES module, which is what the evaluator imports: the default
+ *  export it calls is the author's own, so nothing wraps or rewrites the code between the two.
+ *  Bundling is entirely the importer's job, so a definition version pins its code forever. */
+async function bundle(at) {
+    const site = at.site;
+    // Builtins are EXTERNALISED as imports the realm resolves natively. Anything else
+    // unresolved is a REFUSAL, not an external: rollup's default is to leave it as an import
+    // of a module that will not be there, which bundles clean and fails at runtime.
+    const built = await rollup({
+        input: at.file,
+        external: (id) => BUILTIN.has(id),
+        plugins: [
+            tsResolve(await nearestTsconfig(dirname(at.file), root)),
+            nodeResolve({ extensions: [".ts", ".tsx", ".mjs", ".js", ".json"] }),
+            commonjs(),
+            // A `.json` import is a data file inlined at build time, which the previous bundler
+            // did natively; without it rollup hands the JSON to the JS parser.
+            json(),
+            transpile,
+        ],
+        onwarn(warning) {
+            if (warning.code === "UNRESOLVED_IMPORT") {
+                die(`${at.file}: cannot resolve ${warning.exporter ?? "an import"} — is it installed?`);
+            }
+        },
+    }).catch((e) => die(`${at.file}: ${e instanceof Error ? e.message : String(e)}`));
+    const { output } = await built.generate({
+        format: "es",
+        inlineDynamicImports: true,
+    });
+    await built.close();
+    // Refused here rather than in the realm: the evaluator can only report it against a running
+    // instance, and the file it names is on this machine.
+    if (!output[0].exports.includes("default")) {
+        die(`${at.file}: a script must \`export default\` the function to run`);
+    }
+    return output[0].code;
+}
+// ── main ───────────────────────────────────────────────────────────────────────
+const stdin = await new Promise((resolve, reject) => {
+    let raw = "";
+    process.stdin.setEncoding("utf8");
+    process.stdin.on("data", (c) => (raw += c));
+    process.stdin.on("end", () => resolve(raw));
+    process.stdin.on("error", reject);
+});
+const manifest = JSON.parse(stdin);
+// genctl runs a resolver with the project root as its cwd, so the manifest need not say so.
+const root = process.cwd();
+if (!manifest || !Array.isArray(manifest.processes))
+    die("stdin is not a genroc resolver manifest");
+/** A pointer as the address it is, so a generated comment or an error can be pasted into
+ *  `genctl schema`. A key no identifier can spell is bracketed, as the grammar spells it. */
+function address(pointer) {
+    return pointer
+        .map((seg) => typeof seg === "string" && /^[A-Za-z_][A-Za-z0-9_]*$/.test(seg)
+        ? `.${seg}`
+        : `[${JSON.stringify(seg)}]`)
+        .join("")
+        .replace(/^\./, "");
+}
+const located = manifest.processes.flatMap((where) => where.sites.map((site) => ({
+    site,
+    where,
+    file: resolve(where.dir, site.argument),
+})));
+// genctl is agnostic about what a script is for; the contract that an evaluation request carries
+// its module in `code` is THIS resolver's, so it is the one that checks a directive landed there.
+// `child` is the shape the scaffold uses — a call to a process that forwards to the evaluator —
+// and `external` is the same request made directly.
+for (const at of located) {
+    // Two halves, from the two places that carry them: the action's KIND is a field, and WHERE in
+    // it the directive sits is the pointer. A child call is the shape the scaffold generates — to a
+    // process that forwards to the evaluator — and an external task is the same request made
+    // directly.
+    const kind = at.site.level === "action" ? (at.site.action ?? "") : "";
+    const slot = at.site.pointer.slice(-2).join(".");
+    if ((kind !== "child" && kind !== "external") || slot !== "input.code") {
+        die(`${join(at.where.dir, at.where.file)}: ${address(at.site.pointer)}: an evaluated script ` +
+            "belongs in the `code` field of a child or external task's input, and this is " +
+            `${kind ? `a ${kind} task's ` : ""}\`${slot}\`.`);
+    }
+}
+// genctl no longer stats the argument — it does not know it is a file — so the resolver that
+// does is the one that must say when it is not there.
+for (const at of located) {
+    if (!existsSync(at.file)) {
+        die(`${join(at.where.dir, at.where.file)}: ${address(at.site.pointer)}: ` +
+            `"$import: ${at.site.argument}" names no file (looked at ${at.file})`);
+    }
+}
+// One script at two sites with different input types is a refusal, not a union: the union
+// is sound and would typecheck a body that is wrong at one of the sites.
+const byPath = new Map();
+for (const at of located) {
+    const seen = byPath.get(at.file);
+    if (seen &&
+        JSON.stringify(seen.site.types) !== JSON.stringify(at.site.types)) {
+        die(`${at.file} is imported at ${address(seen.site.pointer)} and ` +
+            `${address(at.site.pointer)} with different input types.\n` +
+            "Split it into two scripts, or make the two call sites pass the same shape.");
+    }
+    byPath.set(at.file, at);
+}
+for (const at of byPath.values()) {
+    await write(typesPathFor(at.file), declarations(at));
+}
+if (manifest.mode === "types") {
+    console.log(JSON.stringify(manifest, null, 2));
+    process.exit(0);
+}
+await typecheck([...byPath.values()]);
+const code = [];
+for (const at of located) {
+    code.push(await bundle(at));
+}
+process.stdout.write(JSON.stringify({ code }));