#!/usr/bin/env node

import { createHash } from "node:crypto";
import { spawnSync } from "node:child_process";
import { copyFile, lstat, mkdir, mkdtemp, readFile, rm, writeFile } from "node:fs/promises";
import { tmpdir } from "node:os";
import { dirname, join, resolve } from "node:path";
import { fileURLToPath } from "node:url";

const scriptDir = dirname(fileURLToPath(import.meta.url));
const workspaceRoot = resolve(scriptDir, "../../..");
const foundryRoot = resolve(workspaceRoot, "NODEDC_DESIGN_GUIDELINE");
const artifactDir = resolve(
  process.env.NODEDC_DEPLOY_ARTIFACT_DIR || resolve(scriptDir, "../deploy-artifacts"),
);
const [patchId = "module-foundry-classified-aspects-20260724-010", ...extra] =
  process.argv.slice(2);

if (extra.length || !/^module-foundry-classified-aspects-\d{8}-\d{3}$/.test(patchId)) {
  throw new Error(
    "usage: build-module-foundry-classified-aspects-artifact.mjs "
      + "[module-foundry-classified-aspects-YYYYMMDD-NNN]",
  );
}

const files = Object.freeze([
  "apps/catalog/src/MapFixturePreview.tsx",
  "apps/catalog/src/mapSubjectCard.mjs",
  "apps/catalog/src/useMapDataProductRuntime.ts",
  "registry/data-product-consumer-policies.json",
  "registry/schemas/application-manifest-v0.1.schema.json",
  "server/catalog-server.mjs",
  "server/foundry-data-product-consumer.mjs",
  "server/foundry-mcp.mjs",
  "server/map-subject-detail-profile.mjs",
]);
const artifact = join(artifactDir, `nodedc-${patchId}.tgz`);
const checksum = `${artifact}.sha256`;
const stage = await mkdtemp(join(tmpdir(), "nodedc-foundry-classified-aspects-"));

await assertFresh(artifact);
await assertClassifiedAspectBoundary();

try {
  for (const relativePath of files) {
    const source = join(foundryRoot, relativePath);
    const info = await lstat(source);
    if (!info.isFile() || info.isSymbolicLink()) {
      throw new Error(`source_file_rejected:${relativePath}`);
    }
    const destination = join(stage, "payload", relativePath);
    await mkdir(dirname(destination), { recursive: true });
    await copyFile(source, destination);
  }
  await writeFile(
    join(stage, "manifest.env"),
    `id=${patchId}\ncomponent=module-foundry\ntype=app-overlay\n`,
    "utf8",
  );
  await writeFile(join(stage, "files.txt"), `${files.join("\n")}\n`, "utf8");
  await mkdir(artifactDir, { recursive: true });
  run("python3", ["-c", canonicalTarScript(), artifact, stage]);
  const sha256 = digest(await readFile(artifact));
  await writeFile(checksum, `${sha256}  ${artifact.split("/").at(-1)}\n`, "utf8");
  console.log(JSON.stringify({
    ok: true,
    patchId,
    artifact,
    checksum,
    sha256,
    services: ["nodedc-module-foundry"],
    policy: "provider-neutral-data-class",
    files,
  }, null, 2));
} finally {
  await rm(stage, { recursive: true, force: true });
}

async function assertClassifiedAspectBoundary() {
  const profile = await readFile(
    join(foundryRoot, "server/map-subject-detail-profile.mjs"),
    "utf8",
  );
  const consumer = await readFile(
    join(foundryRoot, "server/foundry-data-product-consumer.mjs"),
    "utf8",
  );
  const card = await readFile(
    join(foundryRoot, "apps/catalog/src/mapSubjectCard.mjs"),
    "utf8",
  );
  const gateway = await readFile(join(foundryRoot, "server/foundry-mcp.mjs"), "utf8");
  for (const [name, source] of [
    ["profile", profile],
    ["consumer", consumer],
    ["card", card],
    ["gateway", gateway],
  ]) {
    if (!source.includes("dataClass")) {
      throw new Error(`classified_aspect_marker_missing:${name}:dataClass`);
    }
  }
  if (
    /gelios\.provider|fleet\.units\.contacts/i.test(profile)
    || /gelios\.provider|fleet\.units\.contacts/i.test(card)
    || /gelios\.provider|fleet\.units\.contacts/i.test(gateway)
  ) {
    throw new Error("classified_aspect_ui_or_gateway_provider_hardcode");
  }

  const policies = JSON.parse(
    await readFile(
      join(foundryRoot, "registry/data-product-consumer-policies.json"),
      "utf8",
    ),
  );
  const matches = policies?.policies?.filter(
    (policy) =>
      policy?.dataProductId === "fleet.units.contacts.current.v1"
      && policy?.productVersion === "1.0.0",
  ) || [];
  if (
    matches.length !== 1
    || matches[0]?.dataClass !== "restricted"
    || matches[0]?.consumerContract?.ontologyRevision
      !== "ontology.map.moving_object.v3"
  ) {
    throw new Error("classified_aspect_consumer_policy_invalid");
  }
}

async function assertFresh(path) {
  try {
    await lstat(path);
  } catch (error) {
    if (error?.code === "ENOENT") return;
    throw error;
  }
  throw new Error("artifact_already_exists");
}

function canonicalTarScript() {
  return [
    "import gzip,io,pathlib,sys,tarfile",
    "root=pathlib.Path(sys.argv[2])",
    "with open(sys.argv[1],'wb') as out:",
    " with gzip.GzipFile(filename='',mode='wb',fileobj=out,compresslevel=9,mtime=0) as gz:",
    "  with tarfile.open(fileobj=gz,mode='w',format=tarfile.PAX_FORMAT) as tar:",
    "   for top in ('manifest.env','files.txt','payload'):",
    "    p=root/top; paths=[p]+(sorted(p.rglob('*')) if p.is_dir() else [])",
    "    for x in paths:",
    "     info=tar.gettarinfo(str(x),arcname=x.relative_to(root).as_posix())",
    "     info.uid=info.gid=0; info.uname=info.gname='root'; info.mtime=0; info.mode=0o755 if info.isdir() else 0o644",
    "     with (open(x,'rb') if info.isfile() else io.BytesIO()) as src: tar.addfile(info,src if info.isfile() else None)",
  ].join("\n");
}

function digest(value) {
  return createHash("sha256").update(value).digest("hex");
}

function run(command, args) {
  const result = spawnSync(command, args, {
    encoding: "utf8",
    maxBuffer: 64 * 1024 * 1024,
  });
  if (result.status !== 0) {
    throw new Error(`${command}_failed:${result.stderr || result.stdout}`);
  }
}