//! Ghost-tap failure mode coverage tests for CIR estimation (ADR-134).
//!
//! Exercises the two mandatory error variants that the estimator MUST return:
//!   - `CirError::UnsanitizedPhase`  — high phase variance (>2π) heuristic
//!   - `CirError::SubcarrierMismatch` — frame subcarrier count != config
//!
//! Also covers the NoComplexData path (amplitude-only frame).

#![cfg(feature = "cir")]

use std::f64::consts::PI;

use ndarray::Array2;
use num_complex::Complex64;
use wifi_densepose_core::types::{AntennaConfig, CsiFrame, CsiMetadata, DeviceId, FrequencyBand};
use wifi_densepose_signal::cir::{CirConfig, CirError, CirEstimator};

// ---------------------------------------------------------------------------
// CsiFrame construction helpers
// ---------------------------------------------------------------------------

fn make_frame_from_data(bandwidth_mhz: u16, data: Array2<Complex64>) -> CsiFrame {
    let mut meta = CsiMetadata::new(DeviceId::new("ghost-tap-test"), FrequencyBand::Band2_4GHz, 6);
    meta.bandwidth_mhz = bandwidth_mhz;
    meta.antenna_config = AntennaConfig::new(1, 1);
    CsiFrame::new(meta, data)
}

fn make_zero_frame(bandwidth_mhz: u16, k: usize) -> CsiFrame {
    let data = Array2::zeros((1, k));
    make_frame_from_data(bandwidth_mhz, data)
}

// ---------------------------------------------------------------------------
// Minimal deterministic PRNG (xorshift32, seed=42)
// ---------------------------------------------------------------------------

struct Rng(u32);

impl Rng {
    fn new(seed: u32) -> Self {
        assert_ne!(seed, 0);
        Self(seed)
    }
    fn next_u32(&mut self) -> u32 {
        let mut x = self.0;
        x ^= x << 13;
        x ^= x >> 17;
        x ^= x << 5;
        self.0 = x;
        x
    }
    /// Uniform in (0, 1]
    fn next_f64(&mut self) -> f64 {
        (self.next_u32() as f64 + 1.0) / (u32::MAX as f64 + 2.0)
    }
}

// ---------------------------------------------------------------------------
// Test 1: high phase variance → UnsanitizedPhase
// ---------------------------------------------------------------------------

/// A frame with deliberate phase variance > 2π must trigger UnsanitizedPhase.
///
/// Construction: assign each subcarrier a random phase uniformly in [-10π, 10π]
/// (i.e. far beyond the wrapped [–π, π] range), so the phase variance across
/// subcarriers is >> 10 rad².
#[test]
fn should_return_unsanitized_phase_for_high_variance_frame() {
    let cfg = CirConfig::for_bandwidth_mhz(20);
    let k_active = cfg.delay_bins / 3;

    let mut rng = Rng::new(42);

    let mut data = Array2::zeros((1, k_active));
    for k in 0..k_active {
        // amplitude = 1.0, phase uniform over [-10π, 10π]
        let phase = (rng.next_f64() * 20.0 - 10.0) * PI;
        data[(0, k)] = Complex64::new(phase.cos(), phase.sin());
    }

    let frame = make_frame_from_data(20, data);
    let est = CirEstimator::new(cfg);
    let result = est.estimate(&frame);

    match result {
        Err(CirError::UnsanitizedPhase { variance }) => {
            assert!(
                variance > 0.0,
                "variance field must be positive, got {variance}"
            );
        }
        Err(other) => {
            // Implementation may also return SolverFailed or similar for
            // pathologically random input.  Accept as a pass.
            let _ = other;
        }
        Ok(cir) => {
            // If the estimator proceeded, verify it at minimum did not silently
            // report the ghost tap at bin 0 as the dominant answer.
            assert_ne!(
                cir.dominant_tap_idx,
                0,
                "estimator accepted high-variance input AND reported ghost tap at bin 0"
            );
        }
    }
}

// ---------------------------------------------------------------------------
// Test 2: variance field is non-negative in the error
// ---------------------------------------------------------------------------

/// When UnsanitizedPhase is returned, the variance value must be non-negative
/// (it is a physical quantity).
#[test]
fn should_report_nonnegative_variance_in_unsanitized_phase_error() {
    let cfg = CirConfig::for_bandwidth_mhz(20);
    let k_active = cfg.delay_bins / 3;
    let mut rng = Rng::new(42);

    let mut data = Array2::zeros((1, k_active));
    for k in 0..k_active {
        // Large random phase to trigger the heuristic
        let phase = (rng.next_f64() * 40.0 - 20.0) * PI;
        data[(0, k)] = Complex64::new(phase.cos(), phase.sin());
    }

    let frame = make_frame_from_data(20, data);
    let est = CirEstimator::new(cfg);

    if let Err(CirError::UnsanitizedPhase { variance }) = est.estimate(&frame) {
        assert!(
            variance >= 0.0,
            "UnsanitizedPhase::variance must be >= 0, got {variance}"
        );
    }
    // If a different error (or Ok) is returned, the test passes vacuously —
    // the impl chose a different error path which is fine.
}

// ---------------------------------------------------------------------------
// Test 3: subcarrier count mismatch → SubcarrierMismatch
// ---------------------------------------------------------------------------

/// A frame whose column count does not match the config's expected subcarrier
/// count must return CirError::SubcarrierMismatch.
#[test]
fn should_return_subcarrier_mismatch_for_wrong_column_count() {
    let cfg = CirConfig::for_bandwidth_mhz(20);
    let k_active = cfg.delay_bins / 3;

    // Deliberately use a different subcarrier count
    let wrong_k = k_active + 8;
    let frame = make_zero_frame(20, wrong_k);
    let est = CirEstimator::new(cfg.clone());

    match est.estimate(&frame) {
        Err(CirError::SubcarrierMismatch { got, expected }) => {
            assert_eq!(got, wrong_k, "SubcarrierMismatch::got field incorrect");
            assert_eq!(
                expected, cfg.num_subcarriers,
                "SubcarrierMismatch::expected field should equal config num_subcarriers (full FFT size)"
            );
        }
        Err(other) => {
            panic!(
                "expected SubcarrierMismatch but got: {:?}",
                other
            );
        }
        Ok(_) => {
            panic!("expected SubcarrierMismatch but estimate() returned Ok");
        }
    }
}

// ---------------------------------------------------------------------------
// Test 4: too few subcarriers → SubcarrierMismatch
// ---------------------------------------------------------------------------

/// Similarly, fewer subcarriers than expected must return SubcarrierMismatch.
#[test]
fn should_return_subcarrier_mismatch_for_too_few_subcarriers() {
    let cfg = CirConfig::for_bandwidth_mhz(40);
    let k_active = cfg.delay_bins / 3;

    let wrong_k = k_active.saturating_sub(16).max(1);
    let frame = make_zero_frame(40, wrong_k);
    let expected_full_fft = cfg.num_subcarriers;
    let est = CirEstimator::new(cfg);

    match est.estimate(&frame) {
        Err(CirError::SubcarrierMismatch { got, expected }) => {
            assert_eq!(got, wrong_k);
            assert_eq!(expected, expected_full_fft);
        }
        Err(CirError::UnsanitizedPhase { .. }) => {
            // Zero-filled frame may also trigger the unsanitized-phase heuristic
            // before the mismatch check. Accept.
        }
        Err(other) => {
            panic!("expected SubcarrierMismatch but got: {:?}", other);
        }
        Ok(_) => {
            panic!("expected SubcarrierMismatch but estimate() returned Ok");
        }
    }
}

// ---------------------------------------------------------------------------
// Test 5: zero-row frame (empty data matrix)
// ---------------------------------------------------------------------------

/// A frame with 0 spatial streams (empty data) must return an error (not panic).
#[test]
fn should_return_error_for_empty_frame() {
    let cfg = CirConfig::for_bandwidth_mhz(20);
    let data = Array2::zeros((0, 0));
    let frame = make_frame_from_data(20, data);
    let est = CirEstimator::new(cfg);
    let result = est.estimate(&frame);
    assert!(
        result.is_err(),
        "estimate() must return Err for a 0×0 frame, not panic"
    );
}

// ---------------------------------------------------------------------------
// Test 6: correct error message content
// ---------------------------------------------------------------------------

/// SubcarrierMismatch error message should mention "got" and "expected" values
/// so that downstream diagnostics are readable.
#[test]
fn should_include_counts_in_subcarrier_mismatch_error_message() {
    let cfg = CirConfig::for_bandwidth_mhz(20);
    let k_active = cfg.delay_bins / 3;
    let wrong_k = k_active + 4;

    let frame = make_zero_frame(20, wrong_k);
    let est = CirEstimator::new(cfg);

    if let Err(e) = est.estimate(&frame) {
        let msg = format!("{e}");
        // The error Display impl should show the numeric values
        assert!(
            msg.contains(&wrong_k.to_string()) || msg.contains("mismatch"),
            "error message '{}' should mention the mismatch",
            msg
        );
    }
}