#!/usr/bin/env node

import { execFile } from "node:child_process";
import { promisify } from "node:util";
import { cp, mkdtemp, mkdir, readFile, rm, writeFile } from "node:fs/promises";
import { existsSync } from "node:fs";
import { createServer as createHttpServer } from "node:http";
import { tmpdir } from "node:os";
import { join, resolve } from "node:path";
import net from "node:net";
import { start } from "geckodriver";

const execFileAsync = promisify(execFile);
const ROOT = resolve(new URL("..", import.meta.url).pathname);
const DIST = join(ROOT, "dist-firefox");
const PROBE = join(ROOT, "tests/fixtures/firefox-sender-probe.js");
const WEB_EXT = join(ROOT, "node_modules/.bin/web-ext");
const EXTENSION_ID = "peach@peachpasswords.com";

function findFirefoxBinary() {
  const candidates = [
    process.env.PEACH_FIREFOX_BINARY,
    process.env.FIREFOX_BIN,
    "/usr/bin/firefox",
    "/usr/local/bin/firefox",
    "/Applications/Firefox.app/Contents/MacOS/firefox",
    "/Applications/Firefox Nightly.app/Contents/MacOS/firefox",
    join(process.env.HOME ?? "", "Library/Caches/ms-playwright/firefox-1538/firefox/Nightly.app/Contents/MacOS/firefox"),
    join(process.env.HOME ?? "", "Library/Caches/ms-playwright/firefox-1511/firefox/Nightly.app/Contents/MacOS/firefox"),
  ].filter(Boolean);
  return candidates.find((candidate) => existsSync(candidate));
}

function findFreePort() {
  return new Promise((resolvePort, reject) => {
    const server = net.createServer();
    server.once("error", reject);
    server.listen(0, "127.0.0.1", () => {
      const address = server.address();
      if (!address || typeof address === "string") {
        server.close();
        reject(new Error("Could not allocate a WebDriver port"));
        return;
      }
      server.close(() => resolvePort(address.port));
    });
  });
}

async function waitForDriver(port, driver) {
  const deadline = Date.now() + 30_000;
  while (Date.now() < deadline) {
    try {
      const response = await fetchWithTimeout(`http://127.0.0.1:${port}/status`, {}, 5000);
      if (response.ok && (await response.json()).value?.ready) return;
    } catch {
      if (driver.exitCode !== null || driver.signalCode !== null) {
        throw new Error(`geckodriver exited during startup (${driver.exitCode ?? driver.signalCode})`);
      }
    }
    await new Promise((resolveDelay) => setTimeout(resolveDelay, 250));
  }
  throw new Error("geckodriver did not become ready within 30 seconds");
}

async function fetchWithTimeout(url, options, timeoutMs) {
  const controller = new AbortController();
  let timeoutId;
  const timeout = new Promise((_, reject) => {
    timeoutId = setTimeout(() => reject(new Error(`Request timed out after ${timeoutMs}ms`)), timeoutMs);
  });
  try {
    return await Promise.race([
      fetch(url, { ...options, signal: controller.signal }),
      timeout,
    ]);
  } catch (error) {
    controller.abort();
    throw error;
  } finally {
    clearTimeout(timeoutId);
  }
}

async function webdriverRequest(port, path, options = {}) {
  const response = await fetchWithTimeout(`http://127.0.0.1:${port}${path}`, {
    ...options,
    headers: { "content-type": "application/json", ...(options.headers ?? {}) },
  }, 10_000);
  const body = await response.json();
  if (!response.ok || body.value?.error) {
    throw new Error(`WebDriver ${options.method ?? "GET"} ${path} failed: ${JSON.stringify(body)}`);
  }
  return body.value;
}

async function stopDriver(driver) {
  if (!driver || driver.exitCode !== null || driver.signalCode !== null) return;
  const exited = new Promise((resolveExit) => driver.once("exit", resolveExit));
  driver.kill("SIGTERM");
  let timeoutId;
  const stopped = await Promise.race([
    exited.then(() => true),
    new Promise((resolveTimeout) => {
      timeoutId = setTimeout(() => resolveTimeout(false), 5000);
    }),
  ]);
  clearTimeout(timeoutId);
  if (!stopped && driver.exitCode === null && driver.signalCode === null) {
    driver.kill("SIGKILL");
    await exited;
  }
}

async function buildTestExtension(tempRoot) {
  const sourceDir = join(tempRoot, "extension");
  const artifactsDir = join(tempRoot, "artifacts");
  await cp(DIST, sourceDir, { recursive: true });
  await mkdir(artifactsDir, { recursive: true });
  await cp(PROBE, join(sourceDir, "firefox-sender-probe.js"));

  const manifestPath = join(sourceDir, "manifest.json");
  const manifest = JSON.parse(await readFile(manifestPath, "utf8"));
  manifest.content_scripts.push({
    matches: ["<all_urls>"],
    js: ["firefox-sender-probe.js"],
    run_at: "document_start",
    all_frames: false,
  });
  await writeFile(manifestPath, `${JSON.stringify(manifest, null, 2)}\n`);

  await execFileAsync(WEB_EXT, [
    "build",
    "--source-dir", sourceDir,
    "--artifacts-dir", artifactsDir,
    "--filename", "peach-firefox-sender-context.xpi",
    "--overwrite-dest",
    "--no-input",
  ], { cwd: ROOT });
  return join(artifactsDir, "peach-firefox-sender-context.xpi");
}

async function run() {
  if (!existsSync(DIST)) throw new Error("dist-firefox is missing; run npm run build:firefox first");
  if (!existsSync(WEB_EXT)) throw new Error("web-ext is missing; run bun install first");

  const tempRoot = await mkdtemp(join(tmpdir(), "peach-firefox-sender-"));
  let driver;
  let driverPort;
  let sessionId;
  let fixtureServer;
  try {
    const xpiPath = await buildTestExtension(tempRoot);
    const firefoxBinary = findFirefoxBinary();
    // Match the Playwright Firefox release environment: this host cannot map
    // the hardware compositor, and Marionette must inherit the same fallback.
    Object.assign(process.env, {
      MOZ_HEADLESS: "1",
      MOZ_DISABLE_CONTENT_SANDBOX: "1",
      MOZ_DISABLE_RDD_SANDBOX: "1",
      LIBGL_ALWAYS_SOFTWARE: "1",
    });
    const port = await findFreePort();
    driverPort = port;
    driver = await start({
      host: "127.0.0.1",
      port,
      geckoDriverVersion: "0.37.1",
      ...(firefoxBinary ? { binary: firefoxBinary } : {}),
      log: "error",
      allowSystemAccess: true,
      spawnOpts: {
        env: {
          ...process.env,
          MOZ_HEADLESS: "1",
          MOZ_DISABLE_CONTENT_SANDBOX: "1",
          MOZ_DISABLE_RDD_SANDBOX: "1",
          LIBGL_ALWAYS_SOFTWARE: "1",
        },
      },
    });
    await waitForDriver(port, driver);

    const capabilities = {
      browserName: "firefox",
      acceptInsecureCerts: true,
      "moz:firefoxOptions": {
        args: ["-headless", "-no-remote"],
        ...(firefoxBinary ? { binary: firefoxBinary } : {}),
        prefs: {
          "browser.shell.checkDefaultBrowser": false,
          "browser.startup.page": 0,
          "browser.startup.homepage": "about:blank",
          "security.sandbox.content.level": 0,
          "security.sandbox.gpu.level": 0,
          "security.sandbox.rdd.level": 0,
          "gfx.webrender.all": false,
          "gfx.webrender.software": false,
          "layers.acceleration.disabled": true,
          "media.hardware-video-decoding.force-enabled": false,
          "remote.system-access-check.enabled": false,
        },
      },
    };
    const session = await webdriverRequest(port, "/session", {
      method: "POST",
      body: JSON.stringify({ capabilities: { alwaysMatch: capabilities } }),
    });
    sessionId = session.sessionId;

    fixtureServer = createHttpServer((_request, response) => {
      response.writeHead(200, { "content-type": "text/html; charset=utf-8" });
      response.end("<!doctype html><html><head><title>Peach sender test</title></head><body></body></html>");
    });
    await new Promise((resolveListen, rejectListen) => {
      fixtureServer.once("error", rejectListen);
      fixtureServer.listen(0, "127.0.0.1", resolveListen);
    });
    const fixtureAddress = fixtureServer.address();
    if (!fixtureAddress || typeof fixtureAddress === "string") {
      throw new Error("Could not allocate the Firefox fixture server port");
    }
    const fixtureOrigin = `http://127.0.0.1:${fixtureAddress.port}`;

    const install = await webdriverRequest(port, `/session/${sessionId}/moz/addon/install`, {
      method: "POST",
      body: JSON.stringify({
        path: xpiPath,
        temporary: true,
      }),
    });
    if (install?.id && install.id !== EXTENSION_ID) {
      throw new Error(`Unexpected Firefox add-on id: ${install.id}`);
    }

    await webdriverRequest(port, `/session/${sessionId}/moz/context`, {
      method: "POST",
      body: JSON.stringify({ context: "chrome" }),
    });
    const addonInfo = await webdriverRequest(port, `/session/${sessionId}/execute/async`, {
      method: "POST",
      body: JSON.stringify({
        script: `
          const done = arguments[arguments.length - 1];
          const { AddonManager } = ChromeUtils.importESModule("resource://gre/modules/AddonManager.sys.mjs");
          const { ExtensionPermissions } = ChromeUtils.importESModule("resource://gre/modules/ExtensionPermissions.sys.mjs");
          AddonManager.getAddonByID(arguments[0]).then(async (addon) => {
            if (!addon) return null;
            const policy = WebExtensionPolicy.getByID(addon.id);
            await ExtensionPermissions.add(
              addon.id,
              { permissions: [], origins: ["<all_urls>"] },
              policy.extension,
            );
            await addon.reload();
            const reloadedAddon = await AddonManager.getAddonByID(addon.id);
            return {
              active: reloadedAddon.isActive,
              permissions: await ExtensionPermissions.get(addon.id),
            };
          }).then(done, (error) => done({ error: String(error), stack: error?.stack }));
        `,
        args: [EXTENSION_ID],
      }),
    });
    await webdriverRequest(port, `/session/${sessionId}/moz/context`, {
      method: "POST",
      body: JSON.stringify({ context: "content" }),
    });
    if (!addonInfo?.active || !addonInfo.permissions?.origins?.includes("<all_urls>")) {
      throw new Error(`Firefox add-on host permission was not granted: ${JSON.stringify(addonInfo)}`);
    }

    await webdriverRequest(port, `/session/${sessionId}/url`, {
      method: "POST",
      body: JSON.stringify({ url: `${fixtureOrigin}/` }),
    });
    // Firefox may finish navigation before document_start content scripts have
    // registered their relay listener; wait for the extension boundary to settle.
    await new Promise((resolveDelay) => setTimeout(resolveDelay, 2000));
    const result = await webdriverRequest(port, `/session/${sessionId}/execute/async`, {
      method: "POST",
      body: JSON.stringify({
        script: `
          const done = arguments[arguments.length - 1];
          const source = "peach-firefox-sender-probe";
          const send = (message) => new Promise((resolve) => {
            const id = crypto.randomUUID();
            const timer = setTimeout(() => {
              window.removeEventListener("message", onResponse);
              resolve({ ok: false, error: "probe_timeout" });
            }, 5000);
            function onResponse(event) {
              let response;
              try {
                response = JSON.parse(event.data);
              } catch {
                return;
              }
              if (response?.source !== source + ":response" || response.id !== id) return;
              clearTimeout(timer);
              window.removeEventListener("message", onResponse);
              resolve(response.response);
            }
            window.addEventListener("message", onResponse);
            window.postMessage(JSON.stringify({ source, id, message }), "*");
          });
          Promise.all([
            send({ type: "GET_SETTINGS" }),
            send({ type: "GET_ENTRIES" }),
            send({ type: "GET_RECOVERY_WORDS" }),
            send({ type: "STORAGE_SESSION" }),
          ]).then(([allowed, entries, recovery, storage]) => done({
            pageOrigin: location.origin,
            probeReady: document.documentElement.dataset.peachFirefoxSenderProbe ?? null,
            allowed,
            entries,
            recovery,
            storage,
          }));
        `,
        args: [],
      }),
    });

    if (result.pageOrigin !== fixtureOrigin) {
      throw new Error(`Unexpected page origin: ${result.pageOrigin}`);
    }
    if (result.probeReady !== "ready") {
      throw new Error(`Firefox content-script probe did not execute: ${JSON.stringify(result)}`);
    }
    if (Object.hasOwn(result.storage ?? {}, "peach_session_dk")) {
      throw new Error(`Firefox content-script accessed the session escrow key: ${JSON.stringify(result.storage)}`);
    }
    if (result.allowed?.error === "invalid_sender") {
      throw new Error("Content-script-allowed GET_SETTINGS was rejected");
    }
    for (const [name, response] of [["GET_ENTRIES", result.entries], ["GET_RECOVERY_WORDS", result.recovery]]) {
      if (response?.error !== "invalid_sender") {
        throw new Error(`${name} was not rejected from the real Firefox content-script sender: ${JSON.stringify({ result, response })}`);
      }
    }
    console.log("Firefox sender-context test passed: real content-script GET_ENTRIES and GET_RECOVERY_WORDS were rejected, GET_SETTINGS remained allowed.");
  } finally {
    if (driver && sessionId) {
      try {
        await webdriverRequest(driverPort, `/session/${sessionId}`, { method: "DELETE" });
      } catch {
        // The browser may already have exited after a failed startup.
      }
    }
    if (fixtureServer) {
      await new Promise((resolveClose) => fixtureServer.close(resolveClose));
    }
    await stopDriver(driver);
    await rm(tempRoot, { recursive: true, force: true });
  }
}

run().catch((error) => {
  console.error(error instanceof Error ? error.message : error);
  process.exitCode = 1;
});