"""
Vitalwerte: Zeitreihen + einfache Fitness-/Recovery-Einordnung (Layer 1, Issue 53).

Keine Diagnose — deskriptive Trends, Korrelationen und Varianz-Hinweise.
"""

from __future__ import annotations

import statistics
from datetime import datetime, timedelta
from typing import Any, Dict, List, Optional, Sequence

from db import get_db, get_cursor
from data_layer.utils import safe_float, serialize_dates

SERIES_CONFIG = (
    ("resting_hr", "Ruhepuls", "bpm", "#3B82F6"),
    ("hrv", "HRV", "ms", "#1D9E75"),
    ("vo2_max", "VO2max", "ml/kg/min", "#8B5CF6"),
    ("spo2", "SpO2", "%", "#0EA5E9"),
    ("respiratory_rate", "Atemfrequenz", "/min", "#F59E0B"),
)


def _date_to_ord(d: Any) -> float:
    if hasattr(d, "toordinal"):
        return float(d.toordinal())
    if isinstance(d, str):
        return float(datetime.fromisoformat(d[:10]).date().toordinal())
    return 0.0


def _linear_slope(dates: Sequence[Any], values: Sequence[float]) -> float:
    if len(values) < 3 or len(dates) != len(values):
        return 0.0
    xs = [_date_to_ord(d) for d in dates]
    ys = list(values)
    n = len(xs)
    mx = sum(xs) / n
    my = sum(ys) / n
    den = sum((x - mx) ** 2 for x in xs)
    if den < 1e-9:
        return 0.0
    return sum((x - mx) * (y - my) for x, y in zip(xs, ys)) / den


def _pearson(xs: Sequence[float], ys: Sequence[float]) -> Optional[float]:
    n = len(xs)
    if n < 5 or len(ys) != n:
        return None
    mx = statistics.mean(xs)
    my = statistics.mean(ys)
    sx = statistics.pstdev(xs) if n > 1 else 0.0
    sy = statistics.pstdev(ys) if n > 1 else 0.0
    if sx < 1e-9 or sy < 1e-9:
        return None
    cov = sum((x - mx) * (y - my) for x, y in zip(xs, ys)) / n
    return cov / (sx * sy)


def _daily_training_load(cur: Any, profile_id: str, cutoff: str) -> Dict[str, float]:
    """Summe Trainingsminuten pro Kalendertag als Belastungs-Proxy."""
    cur.execute(
        """
        SELECT date::text AS d, COALESCE(SUM(duration_min), 0)::float AS minutes
        FROM activity_log
        WHERE profile_id = %s AND date >= %s::date AND duration_min IS NOT NULL AND duration_min > 0
        GROUP BY date
        ORDER BY date
        """,
        (profile_id, cutoff),
    )
    rows = cur.fetchall()
    return {r["d"]: float(r["minutes"]) for r in rows}


def _trailing_window_means(vals: List[float], window: int = 7) -> List[float]:
    """Gleitender Mittelwert über die letzten bis zu `window` aufeinanderfolgenden Messungen (nicht Kalendertage)."""
    out: List[float] = []
    for i in range(len(vals)):
        chunk = vals[max(0, i - window + 1) : i + 1]
        out.append(round(statistics.mean(chunk), 2))
    return out


def _de_num(x: float) -> str:
    """Dezimalzahl mit Komma für Fließtext."""
    return f"{x:.1f}".replace(".", ",")


def _de_num_signed(x: float) -> str:
    """Wie _de_num, mit explizitem Vorzeichen (für %-Abweichungen)."""
    return f"{x:+.1f}".replace(".", ",")


def _ins(
    key: str,
    section: str,
    title_de: str,
    body: str,
    tone: str = "neutral",
) -> Dict[str, Any]:
    """Ein strukturierter Hinweis für UI-Platzierung (section: heart | vo2)."""
    return {"key": key, "section": section, "title_de": title_de, "body": body, "tone": tone}


def _build_section_insights(
    series: Dict[str, Any],
    hrv_vs_baseline_pct: Optional[float],
    rhr_vs_baseline_pct: Optional[float],
    r_pearson: Optional[float],
    pairs_n: int,
) -> List[Dict[str, Any]]:
    """
    Gleiche Inhalte wie früher konsolidierter Fließtext, aber nach UI-Bereich getrennt.
    section: heart = Herz/Kreislauf/Training-Folge; vo2 = VO2max-Verlauf.
    """
    out: List[Dict[str, Any]] = []

    basis_bits: List[str] = []
    if hrv_vs_baseline_pct is not None:
        basis_bits.append(
            f"HRV gegenüber älterer Referenz: {_de_num_signed(float(hrv_vs_baseline_pct))} %"
        )
    if rhr_vs_baseline_pct is not None:
        basis_bits.append(
            f"Ruhepuls relativ zur Referenz: {_de_num_signed(float(rhr_vs_baseline_pct))} %"
        )
    if basis_bits:
        out.append(
            _ins(
                "heart_baseline",
                "heart",
                "Kurzfristiges Mittel vs. ältere Basis",
                " ".join(basis_bits)
                + " — Vergleich letzter Tage zum älteren Referenzmittel; individuell interpretieren (keine Diagnose).",
                "neutral",
            )
        )

    rhr = series.get("resting_hr")
    hrv_s = series.get("hrv")

    rhr_short_body = ""
    r_short_tone = "neutral"
    if rhr and rhr.get("points") and len(rhr["points"]) >= 10:
        pts = rhr["points"]
        last7 = [p["value"] for p in pts[-7:]]
        before = [p["value"] for p in pts[:-7][-14:]] if len(pts) > 7 else []
        if before:
            m7 = statistics.mean(last7)
            mb = statistics.mean(before)
            diff = m7 - mb
            if diff > 3:
                rhr_short_body = (
                    f"Die letzten 7 Messungen liegen im Mittel ca. {_de_num(diff)} bpm über dem vorangehenden Fenster — "
                    "kann mit Belastung, Stress, Schlaf oder Infekt zusammenhängen."
                )
                r_short_tone = "warn"
            elif diff < -3:
                rhr_short_body = (
                    "Der Ruhepuls liegt im kurzen Vergleich unter dem vorherigen Mittel — oft mit Entlastung oder "
                    "besserer Regeneration vereinbar (individuell)."
                )
                r_short_tone = "good"

    rhr_var_sentence = ""
    if rhr and rhr.get("stdev") is not None and rhr.get("n", 0) >= 6:
        rhr_var_sentence = (
            f"Ruhepuls: Standardabweichung im Fenster ca. {_de_num(float(rhr['stdev']))} bpm — kurzfristige Schwankungen "
            "sind normal; extreme Sprünge mit Kontext (Training, Schlaf) betrachten."
        )

    hrv_var_sentence = ""
    if hrv_s and hrv_s.get("stdev") is not None and hrv_s.get("n", 0) >= 6:
        hrv_var_sentence = (
            f"HRV: σ im Fenster ca. {_de_num(float(hrv_s['stdev']))} ms — "
            "Vergleich mit der eigenen Basis ist aussagekräftiger als Einzelwerte."
        )

    ma_hint = (
        "Einzelwerte können stark springen; die gestrichelte Linie in den Verläufen zeigt einen gleitenden Mittelwert "
        "über bis zu sieben aufeinanderfolgende Messungen (nicht Kalendertage)."
    )

    streuung_parts: List[str] = [ma_hint]
    if rhr_var_sentence:
        streuung_parts.append(rhr_var_sentence)
    if hrv_var_sentence:
        streuung_parts.append(hrv_var_sentence)
    if rhr or hrv_s:
        out.append(
            _ins(
                "heart_streuung_ma",
                "heart",
                "Streuung & gleitender Mittelwert",
                " ".join(streuung_parts),
                "neutral",
            )
        )

    if rhr_short_body:
        out.append(_ins("heart_rhr_kurz", "heart", "Ruhepuls: Kurzvergleich", rhr_short_body, r_short_tone))

    vo2 = series.get("vo2_max")
    if vo2 and vo2.get("n", 0) >= 4 and vo2.get("slope_per_day") is not None:
        s = vo2["slope_per_day"]
        if s > 0.002:
            out.append(
                _ins(
                    "vo2_trend_up",
                    "vo2",
                    "VO2max-Verlauf",
                    "Im gewählten Fenster steigt der erfasste VO2max tendenziell — häufig mit Trainingsreiz oder "
                    "besserer Datenlage vereinbar.",
                    "good",
                )
            )
        elif s < -0.002:
            out.append(
                _ins(
                    "vo2_trend_down",
                    "vo2",
                    "VO2max-Verlauf",
                    "VO2max zeigt im Fenster einen fallenden Trend — kann z. B. durch Pause, Krankheit oder Messrauschen "
                    "entstehen; Verlauf beobachten.",
                    "warn",
                )
            )

    if r_pearson is not None and pairs_n >= 8:
        if r_pearson > 0.35:
            out.append(
                _ins(
                    "heart_load_rhr",
                    "heart",
                    "Training und Folge-Ruhepuls",
                    (
                        "An Tagen nach höherer Trainingsdauer (Minuten-Summe) steigt der Ruhepuls am nächsten Morgen in deinen "
                        "Daten tendenziell — typisches Muster während Erholungsreaktion (kein Kausalbeweis). "
                        f"Korrelation (Trainingsminuten am Tag → Ruhepuls am Folgetag): r ≈ {r_pearson:.2f} bei n = {pairs_n} Paaren."
                    ),
                    "warn",
                )
            )
        elif r_pearson < -0.25:
            out.append(
                _ins(
                    "heart_load_rhr_neg",
                    "heart",
                    "Training und Folge-Ruhepuls",
                    "Es zeigt sich ein leicht negatives Zusammenspiel zwischen Tages-Belastung und Folge-Ruhepuls in diesem "
                    f"Fenster — stark von Datenlage und Ausreißern abhängig. r ≈ {r_pearson:.2f}, n = {pairs_n} Paare.",
                    "neutral",
                )
            )

    return out


def _rhr_by_date(cur: Any, profile_id: str, cutoff: str) -> Dict[str, float]:
    cur.execute(
        """
        SELECT date::text AS d, resting_hr::float AS rhr
        FROM vitals_baseline
        WHERE profile_id = %s AND date >= %s::date AND resting_hr IS NOT NULL
        ORDER BY date
        """,
        (profile_id, cutoff),
    )
    return {r["d"]: float(r["rhr"]) for r in cur.fetchall()}


def build_vitals_history_and_analytics(
    profile_id: str,
    days: int,
    hrv_vs_baseline_pct: Optional[float] = None,
    rhr_vs_baseline_pct: Optional[float] = None,
) -> Dict[str, Any]:
    """
    Zeitreihen pro Kennzahl (eigene Einheit / eigene Skala im Frontend) + zusammengefasste Einordnung.

    Optional: Abweichung HRV/Ruhepuls zur älteren Basis — für einen Absatz statt doppelter KPI-Texte.
    """
    if days < 7:
        days = 7
    if days > 365:
        days = 365
    cutoff = (datetime.now() - timedelta(days=days)).strftime("%Y-%m-%d")

    with get_db() as conn:
        cur = get_cursor(conn)
        cur.execute(
            """
            SELECT date, resting_hr, hrv, vo2_max, spo2, respiratory_rate
            FROM vitals_baseline
            WHERE profile_id = %s AND date >= %s
            ORDER BY date ASC
            """,
            (profile_id, cutoff),
        )
        rows = cur.fetchall()

    series: Dict[str, Any] = {}
    for key, label_de, unit, color in SERIES_CONFIG:
        pts: List[Dict[str, Any]] = []
        dates: List[Any] = []
        vals: List[float] = []
        for r in rows:
            v = r.get(key)
            if v is None:
                continue
            fv = safe_float(v)
            d = r["date"]
            d_iso = d.isoformat() if hasattr(d, "isoformat") else str(d)[:10]
            pts.append({"date": d_iso, "value": round(fv, 2)})
            dates.append(d)
            vals.append(fv)
        if pts:
            ma_vals = _trailing_window_means(vals, window=7)
            points_ma7 = [
                {"date": pts[i]["date"], "value": ma_vals[i]} for i in range(len(pts))
            ]
            series[key] = {
                "key": key,
                "label_de": label_de,
                "unit": unit,
                "color": color,
                "points": pts,
                "points_ma7": points_ma7,
                "n": len(pts),
                "last": vals[-1] if vals else None,
                "mean": round(statistics.mean(vals), 2) if len(vals) >= 1 else None,
                "stdev": round(statistics.pstdev(vals), 2) if len(vals) >= 2 else None,
                "slope_per_day": round(_linear_slope(dates, vals), 6) if len(vals) >= 3 else None,
            }

    # Belastung (Activity) vs Ruhepuls am Folgetag
    with get_db() as conn:
        cur = get_cursor(conn)
        load_by_d = _daily_training_load(cur, profile_id, cutoff)
        rhr_by_d = _rhr_by_date(cur, profile_id, cutoff)

    pairs_load: List[float] = []
    pairs_rhr: List[float] = []
    for d_str, load_min in load_by_d.items():
        try:
            d0 = datetime.fromisoformat(d_str[:10]).date()
        except ValueError:
            continue
        d1 = (d0 + timedelta(days=1)).isoformat()
        if d1 in rhr_by_d and load_min > 0:
            pairs_load.append(load_min)
            pairs_rhr.append(rhr_by_d[d1])

    r_pearson = _pearson(pairs_load, pairs_rhr) if len(pairs_load) >= 8 else None
    pairs_n = len(pairs_load)

    section_insights = _build_section_insights(
        series,
        hrv_vs_baseline_pct,
        rhr_vs_baseline_pct,
        r_pearson,
        pairs_n,
    )

    if not series:
        return {
            "chart_type": "vitals_dashboard",
            "window_days": days,
            "series": {},
            "analytics": {
                "bullets": [],
                "consolidated_paragraphs": [],
                "section_insights": section_insights,
            },
            "metadata": {
                "confidence": "insufficient",
                "message": "Keine Vital-Zeitreihen im Fenster",
                "load_rhr_pairs_n": pairs_n,
                "load_rhr_correlation": round(r_pearson, 3) if r_pearson is not None else None,
            },
        }

    return {
        "chart_type": "vitals_dashboard",
        "window_days": days,
        "series": serialize_dates(series),
        "analytics": {
            "bullets": [],
            "consolidated_paragraphs": [],
            "section_insights": section_insights,
        },
        "metadata": {
            "confidence": "medium",
            "note": "Deskriptive Auswertung; keine medizinische Diagnose.",
            "load_rhr_pairs_n": pairs_n,
            "load_rhr_correlation": round(r_pearson, 3) if r_pearson is not None else None,
        },
    }