"""Tests for turnstone.console.router (rendezvous routing)."""

from __future__ import annotations

import secrets

import pytest

from turnstone.console.router import ConsoleRouter, NodeRef
from turnstone.core.rendezvous import NoAvailableNodeError


class FakeStorage:
    """Minimal storage mock for router tests."""

    def __init__(self) -> None:
        self.services: list[dict[str, str]] = []
        self.overrides: list[dict[str, str]] = []

    def list_services(self, service_type: str, max_age_seconds: int = 120) -> list[dict[str, str]]:
        return list(self.services)

    def list_workstream_overrides(self) -> list[dict[str, str]]:
        return list(self.overrides)


NODE_A = {"service_id": "node-a", "url": "http://a:8080", "metadata": "{}"}
NODE_B = {"service_id": "node-b", "url": "http://b:8080", "metadata": "{}"}
NODE_C = {"service_id": "node-c", "url": "http://c:8080", "metadata": "{}"}


def _make_router(storage: FakeStorage | None = None) -> tuple[ConsoleRouter, FakeStorage]:
    s = storage or FakeStorage()
    return ConsoleRouter(s), s  # type: ignore[arg-type]


def _random_ws_id() -> str:
    return secrets.token_hex(16)


class TestRouteBasic:
    def test_route_returns_a_live_node(self) -> None:
        router, storage = _make_router()
        storage.services = [NODE_A, NODE_B, NODE_C]
        router.refresh_cache()

        ref = router.route(_random_ws_id())
        assert ref.node_id in {"node-a", "node-b", "node-c"}

    def test_route_is_deterministic_for_same_ws_id(self) -> None:
        """Same ws_id + same membership → same target every time."""
        router, storage = _make_router()
        storage.services = [NODE_A, NODE_B, NODE_C]
        router.refresh_cache()

        ws_id = _random_ws_id()
        first = router.route(ws_id)
        for _ in range(50):
            assert router.route(ws_id) == first

    def test_route_override_priority(self) -> None:
        router, storage = _make_router()
        storage.services = [NODE_A, NODE_B]
        ws_id = _random_ws_id()
        storage.overrides = [{"ws_id": ws_id, "node_id": "node-b"}]
        router.refresh_cache()

        # Override wins regardless of HRW score.
        assert router.route(ws_id) == NodeRef("node-b", "http://b:8080")

    def test_route_empty_membership_raises(self) -> None:
        router, _ = _make_router()
        with pytest.raises(NoAvailableNodeError):
            router.route(_random_ws_id())

    def test_route_empty_ws_id_raises(self) -> None:
        router, storage = _make_router()
        storage.services = [NODE_A]
        router.refresh_cache()
        with pytest.raises(NoAvailableNodeError, match="empty"):
            router.route("")

    def test_route_url_convenience(self) -> None:
        router, storage = _make_router()
        storage.services = [NODE_A]
        router.refresh_cache()
        assert router.route_url(_random_ws_id()) == "http://a:8080"


class TestMembershipConvergence:
    """Rendezvous gives the minimal-moves property; pin it."""

    def test_node_join_only_steals_some_keys(self) -> None:
        """Adding a 4th node moves ~1/4 of keys to it; the other 3
        nodes' kept keys are unchanged."""
        router, storage = _make_router()
        storage.services = [NODE_A, NODE_B, NODE_C]
        router.refresh_cache()

        sample = [_random_ws_id() for _ in range(2000)]
        before = {ws: router.route(ws).node_id for ws in sample}

        storage.services = [
            NODE_A,
            NODE_B,
            NODE_C,
            {"service_id": "node-d", "url": "http://d:8080", "metadata": "{}"},
        ]
        router.refresh_cache()
        after = {ws: router.route(ws).node_id for ws in sample}

        moved = sum(1 for ws in sample if before[ws] != after[ws])
        moved_to_new = sum(1 for ws in sample if after[ws] == "node-d")
        # Every move must be onto the new node — no churn between
        # existing nodes.
        assert moved == moved_to_new
        # Should be roughly 1/4 of keys; allow a wide band for variance.
        assert 0.15 < moved / len(sample) < 0.35

    def test_node_leave_only_redistributes_dead_node_keys(self) -> None:
        """Removing node-a sends node-a's keys to b/c only; keys that
        were on b/c stay put."""
        router, storage = _make_router()
        storage.services = [NODE_A, NODE_B, NODE_C]
        router.refresh_cache()

        sample = [_random_ws_id() for _ in range(2000)]
        before = {ws: router.route(ws).node_id for ws in sample}

        storage.services = [NODE_B, NODE_C]
        router.refresh_cache()
        after = {ws: router.route(ws).node_id for ws in sample}

        for ws in sample:
            if before[ws] in ("node-b", "node-c"):
                assert after[ws] == before[ws], (
                    f"key {ws} moved from {before[ws]} to {after[ws]} "
                    "even though its old owner is still live"
                )
            else:  # was on node-a
                assert after[ws] in ("node-b", "node-c")


class TestWeights:
    def test_weight_2_node_gets_more_keys_than_weight_1(self) -> None:
        router, storage = _make_router()
        storage.services = [
            {"service_id": "node-a", "url": "http://a:8080", "metadata": '{"weight": 2}'},
            {"service_id": "node-b", "url": "http://b:8080", "metadata": '{"weight": 1}'},
        ]
        router.refresh_cache()

        sample = [_random_ws_id() for _ in range(5000)]
        on_a = sum(1 for ws in sample if router.route(ws).node_id == "node-a")
        # Heavier node should win clearly more than half; exact ratio
        # depends on the simple hash×weight formulation but a/b > 1.4
        # for weight 2:1 across 5k samples is reliable.
        assert on_a / len(sample) > 0.55

    def test_invalid_metadata_falls_back_to_weight_1(self) -> None:
        router, storage = _make_router()
        storage.services = [
            {"service_id": "node-a", "url": "http://a:8080", "metadata": "not json"},
        ]
        router.refresh_cache()
        # Just confirms it doesn't blow up.
        router.route(_random_ws_id())


class TestRefreshLifecycle:
    def test_refresh_cache_publishes_new_membership_immediately(self) -> None:
        """refresh_cache() reloads on the calling thread — the next
        route() sees the new membership without any further trigger."""
        router, storage = _make_router()
        storage.services = [NODE_A]
        router.refresh_cache()
        assert router.node_count() == 1

        storage.services = [NODE_A, NODE_B]
        router.refresh_cache()
        assert router.node_count() == 2

    def test_concurrent_refresh_returns_false_on_lock_contention(self) -> None:
        """refresh_cache uses a non-blocking lock acquire — if another
        thread is already refreshing, the second caller bails so the
        in-flight refresh's result is the one that publishes."""

        router, storage = _make_router()
        storage.services = [NODE_A]

        with router._refresh_lock:
            # Lock held by this thread → the call below can't acquire.
            assert router.refresh_cache() is False

    def test_force_refresh_blocks_until_in_flight_refresh_releases(self) -> None:
        """force_refresh acquires the refresh lock blocking — used by the
        404-retry path to guarantee a fresh view even under contention."""
        import threading

        router, storage = _make_router()
        storage.services = [NODE_A]

        # Hold the refresh lock from another thread.
        lock_held = threading.Event()
        release = threading.Event()

        def hold_lock() -> None:
            with router._refresh_lock:
                lock_held.set()
                release.wait(timeout=2)

        holder = threading.Thread(target=hold_lock, daemon=True)
        holder.start()
        assert lock_held.wait(timeout=1)

        # force_refresh should block, not bail.
        result_box: list[bool] = []

        def call_force() -> None:
            result_box.append(router.force_refresh())

        caller = threading.Thread(target=call_force, daemon=True)
        caller.start()
        caller.join(timeout=0.2)
        assert caller.is_alive(), "force_refresh returned without acquiring lock"

        release.set()
        holder.join(timeout=1)
        caller.join(timeout=1)
        assert not caller.is_alive()
        # Membership changed from empty → 1 live node.
        assert result_box == [True]
        assert router.node_count() == 1

    def test_force_refresh_always_reloads(self) -> None:
        """force_refresh skips the non-blocking-lock bail and always
        publishes a fresh view — back-to-back calls each pick up the
        latest storage state."""
        router, storage = _make_router()
        storage.services = [NODE_A]
        router.force_refresh()
        assert router.node_count() == 1

        storage.services = [NODE_A, NODE_B]
        router.force_refresh()
        assert router.node_count() == 2

    def test_version_is_monotonic_across_refreshes(self) -> None:
        router, storage = _make_router()
        storage.services = [NODE_A]
        router.refresh_cache()
        v1 = router.version
        router.refresh_cache()
        v2 = router.version
        assert v2 > v1
        router.force_refresh()
        assert router.version > v2


class TestGenerateWsId:
    def test_generates_routable_id(self) -> None:
        router, storage = _make_router()
        storage.services = [NODE_A, NODE_B, NODE_C]
        router.refresh_cache()

        ws_id = router.generate_ws_id_for_node("node-b")
        assert len(ws_id) == 32
        assert router.route(ws_id).node_id == "node-b"

    def test_unknown_node_raises(self) -> None:
        router, storage = _make_router()
        storage.services = [NODE_A]
        router.refresh_cache()
        with pytest.raises(NoAvailableNodeError, match="node-z"):
            router.generate_ws_id_for_node("node-z")


class TestIsReady:
    def test_false_when_empty(self) -> None:
        router, _ = _make_router()
        assert router.is_ready() is False

    def test_true_after_membership_loads(self) -> None:
        router, storage = _make_router()
        storage.services = [NODE_A]
        router.refresh_cache()
        assert router.is_ready() is True


class TestNodeCount:
    def test_count_matches_live_services(self) -> None:
        router, storage = _make_router()
        storage.services = [NODE_A, NODE_B, NODE_C]
        router.refresh_cache()
        assert router.node_count() == 3