"""HF/Shortwave WebSDR Integration - KiwiSDR network access."""

from __future__ import annotations

import json
import math
import queue
import re
import struct
import threading
import time

from flask import Blueprint, Flask, Response, jsonify, request

from utils.responses import api_error, api_success

try:
    from flask_sock import Sock
    WEBSOCKET_AVAILABLE = True
except ImportError:
    WEBSOCKET_AVAILABLE = False

import contextlib

from utils.kiwisdr import KIWI_SAMPLE_RATE, VALID_MODES, KiwiSDRClient, parse_host_port
from utils.logging import get_logger

logger = get_logger('intercept.websdr')

websdr_bp = Blueprint('websdr', __name__, url_prefix='/websdr')

# ============================================
# RECEIVER CACHE
# ============================================

_receiver_cache: list[dict] = []
_cache_lock = threading.Lock()
_cache_timestamp: float = 0
CACHE_TTL = 3600  # 1 hour


def _parse_gps_coord(coord_str: str) -> float | None:
    """Parse a GPS coordinate string like '51.5074' or '(-33.87)' into a float."""
    if not coord_str:
        return None
    # Remove parentheses and whitespace
    cleaned = coord_str.strip().strip('()').strip()
    try:
        return float(cleaned)
    except (ValueError, TypeError):
        return None


def _haversine(lat1: float, lon1: float, lat2: float, lon2: float) -> float:
    """Calculate distance in km between two GPS coordinates."""
    R = 6371  # Earth radius in km
    dlat = math.radians(lat2 - lat1)
    dlon = math.radians(lon2 - lon1)
    a = (math.sin(dlat / 2) ** 2 +
         math.cos(math.radians(lat1)) * math.cos(math.radians(lat2)) *
         math.sin(dlon / 2) ** 2)
    c = 2 * math.asin(math.sqrt(a))
    return R * c


KIWI_DATA_URLS = [
    'https://rx.skywavelinux.com/kiwisdr_com.js',
    'http://rx.linkfanel.net/kiwisdr_com.js',
]


def _fetch_kiwi_receivers() -> list[dict]:
    """Fetch the KiwiSDR receiver list from the public directory."""
    import json
    import urllib.request

    receivers = []
    raw = None

    # Try each data source until one works
    for data_url in KIWI_DATA_URLS:
        try:
            req = urllib.request.Request(data_url, headers={
                'User-Agent': 'INTERCEPT-SIGINT/1.0',
            })
            with urllib.request.urlopen(req, timeout=20) as resp:
                raw = resp.read().decode('utf-8', errors='replace')
            if raw and len(raw) > 100:
                logger.info(f"Fetched KiwiSDR data from {data_url}")
                break
            raw = None
        except Exception as e:
            logger.warning(f"Failed to fetch from {data_url}: {e}")
            continue

    if not raw:
        logger.error("All KiwiSDR data sources failed")
        return receivers

    # The JS file contains: var kiwisdr_com = [ {...}, {...}, ... ];
    # Extract the JSON array
    match = re.search(r'var\s+kiwisdr_com\s*=\s*(\[.*\])\s*;?', raw, re.DOTALL)
    if not match:
        # Try bare array
        match = re.search(r'(\[\s*\{.*\}\s*\])', raw, re.DOTALL)
        if not match:
            logger.warning("Could not find receiver array in KiwiSDR data")
            return receivers

    arr_str = match.group(1)

    # Parse JSON
    try:
        raw_list = json.loads(arr_str)
    except json.JSONDecodeError:
        # Fix common JS → JSON issues (trailing commas)
        fixed = re.sub(r',\s*}', '}', arr_str)
        fixed = re.sub(r',\s*]', ']', fixed)
        try:
            raw_list = json.loads(fixed)
        except json.JSONDecodeError:
            logger.error("Failed to parse KiwiSDR JSON")
            return receivers

    for entry in raw_list:
        if not isinstance(entry, dict):
            continue

        # Skip offline receivers
        if entry.get('offline') == 'yes' or entry.get('status') != 'active':
            continue

        name = entry.get('name', 'Unknown')
        url = entry.get('url', '')
        gps = entry.get('gps', '')
        antenna = entry.get('antenna', '')
        location = entry.get('loc', '')

        # Parse users (strings in actual data)
        try:
            users = int(entry.get('users', 0))
        except (ValueError, TypeError):
            users = 0
        try:
            users_max = int(entry.get('users_max', 4))
        except (ValueError, TypeError):
            users_max = 4

        # Parse bands field: "0-30000000" (Hz) → freq_lo/freq_hi in kHz
        bands_str = entry.get('bands', '0-30000000')
        freq_lo = 0
        freq_hi = 30000
        if bands_str and '-' in str(bands_str):
            try:
                parts = str(bands_str).split('-')
                freq_lo = int(parts[0]) / 1000  # Hz to kHz
                freq_hi = int(parts[1]) / 1000  # Hz to kHz
            except (ValueError, IndexError):
                pass

        # Parse GPS: "(51.317266, -2.950479)" format
        lat, lon = None, None
        if gps:
            parts = str(gps).replace('(', '').replace(')', '').split(',')
            if len(parts) >= 2:
                lat = _parse_gps_coord(parts[0])
                lon = _parse_gps_coord(parts[1])

        if not url:
            continue

        # Ensure URL has protocol
        if not url.startswith('http'):
            url = 'http://' + url

        receivers.append({
            'name': name,
            'url': url.rstrip('/'),
            'lat': lat,
            'lon': lon,
            'location': location,
            'users': users,
            'users_max': users_max,
            'antenna': antenna,
            'bands': bands_str,
            'freq_lo': freq_lo,
            'freq_hi': freq_hi,
            'available': users < users_max,
        })

    return receivers


def get_receivers(force_refresh: bool = False) -> list[dict]:
    """Get cached receiver list, refreshing if stale."""
    global _receiver_cache, _cache_timestamp

    with _cache_lock:
        now = time.time()
        if force_refresh or not _receiver_cache or (now - _cache_timestamp) > CACHE_TTL:
            logger.info("Refreshing KiwiSDR receiver list...")
            _receiver_cache = _fetch_kiwi_receivers()
            _cache_timestamp = now
            logger.info(f"Loaded {len(_receiver_cache)} KiwiSDR receivers")

    return _receiver_cache


# ============================================
# API ENDPOINTS
# ============================================

@websdr_bp.route('/receivers')
def list_receivers() -> Response:
    """List KiwiSDR receivers, with optional filters."""
    freq_khz = request.args.get('freq_khz', type=float)
    available = request.args.get('available', type=str)
    refresh = request.args.get('refresh', type=str)

    receivers = get_receivers(force_refresh=(refresh == 'true'))

    filtered = receivers
    if available == 'true':
        filtered = [r for r in filtered if r.get('available', True)]

    if freq_khz is not None:
        filtered = [
            r for r in filtered
            if r.get('freq_lo', 0) <= freq_khz <= r.get('freq_hi', 30000)
        ]

    return api_success(data={
        'receivers': filtered[:100],
        'total': len(filtered),
        'cached_total': len(receivers),
    })


@websdr_bp.route('/receivers/nearest')
def nearest_receivers() -> Response:
    """Find receivers nearest to a given location."""
    lat = request.args.get('lat', type=float)
    lon = request.args.get('lon', type=float)
    freq_khz = request.args.get('freq_khz', type=float)

    if lat is None or lon is None:
        return api_error('lat and lon are required', 400)

    receivers = get_receivers()

    # Filter by frequency if specified
    if freq_khz is not None:
        receivers = [
            r for r in receivers
            if r.get('freq_lo', 0) <= freq_khz <= r.get('freq_hi', 30000)
        ]

    # Calculate distances and sort
    with_distance = []
    for r in receivers:
        if r.get('lat') is not None and r.get('lon') is not None:
            dist = _haversine(lat, lon, r['lat'], r['lon'])
            entry = dict(r)
            entry['distance_km'] = round(dist, 1)
            with_distance.append(entry)

    with_distance.sort(key=lambda x: x['distance_km'])

    return api_success(data={'receivers': with_distance[:10]})


@websdr_bp.route('/spy-station/<station_id>/receivers')
def spy_station_receivers(station_id: str) -> Response:
    """Find receivers that can tune to a spy station's frequency."""
    try:
        from routes.spy_stations import STATIONS
    except ImportError:
        return api_error('Spy stations module not available', 503)

    # Find the station
    station = None
    for s in STATIONS:
        if s.get('id') == station_id:
            station = s
            break

    if not station:
        return api_error('Station not found', 404)

    # Get primary frequency
    freq_khz = None
    for f in station.get('frequencies', []):
        if f.get('primary'):
            freq_khz = f.get('freq_khz')
            break
    if freq_khz is None and station.get('frequencies'):
        freq_khz = station['frequencies'][0].get('freq_khz')

    if freq_khz is None:
        return api_error('No frequency found for station', 404)

    receivers = get_receivers()

    # Filter receivers that cover this frequency and are available
    matching = [
        r for r in receivers
        if r.get('freq_lo', 0) <= freq_khz <= r.get('freq_hi', 30000) and r.get('available', True)
    ]

    return api_success(data={
        'station': {
            'id': station['id'],
            'name': station.get('name', ''),
            'nickname': station.get('nickname', ''),
            'freq_khz': freq_khz,
            'mode': station.get('mode', 'USB'),
        },
        'receivers': matching[:20],
        'total': len(matching),
    })


@websdr_bp.route('/status')
def websdr_status() -> Response:
    """Get WebSDR connection and cache status."""
    return jsonify({
        'status': 'ok',
        'cached_receivers': len(_receiver_cache),
        'cache_age_seconds': round(time.time() - _cache_timestamp, 0) if _cache_timestamp > 0 else None,
        'cache_ttl': CACHE_TTL,
        'audio_connected': _kiwi_client is not None and _kiwi_client.connected if _kiwi_client else False,
    })


# ============================================
# KIWISDR AUDIO PROXY
# ============================================

_kiwi_client: KiwiSDRClient | None = None
_kiwi_lock = threading.Lock()
_kiwi_audio_queue: queue.Queue = queue.Queue(maxsize=200)


def _disconnect_kiwi() -> None:
    """Disconnect active KiwiSDR client."""
    global _kiwi_client
    with _kiwi_lock:
        if _kiwi_client:
            _kiwi_client.disconnect()
            _kiwi_client = None
    # Drain audio queue
    while not _kiwi_audio_queue.empty():
        try:
            _kiwi_audio_queue.get_nowait()
        except queue.Empty:
            break


def _handle_kiwi_command(ws, cmd: str, data: dict) -> None:
    """Handle a command from the browser client."""
    global _kiwi_client

    if cmd == 'connect':
        receiver_url = data.get('url', '')
        host = data.get('host', '')
        port = int(data.get('port', 8073))
        freq_khz = float(data.get('freq_khz', 7000))
        mode = data.get('mode', 'am').lower()
        password = data.get('password', '')

        # Parse host/port from URL if provided
        if receiver_url and not host:
            host, port = parse_host_port(receiver_url)

        if mode not in VALID_MODES:
            ws.send(json.dumps({'type': 'error', 'message': f'Invalid mode: {mode}'}))
            return

        if not host or ';' in host or '&' in host or '|' in host:
            ws.send(json.dumps({'type': 'error', 'message': 'Invalid host'}))
            return

        _disconnect_kiwi()

        def on_audio(pcm_bytes, smeter):
            # Package: 2 bytes smeter (big-endian int16) + PCM data
            header = struct.pack('>h', smeter)
            try:
                _kiwi_audio_queue.put_nowait(header + pcm_bytes)
            except queue.Full:
                with contextlib.suppress(queue.Empty):
                    _kiwi_audio_queue.get_nowait()
                with contextlib.suppress(queue.Full):
                    _kiwi_audio_queue.put_nowait(header + pcm_bytes)

        def on_error(msg):
            with contextlib.suppress(Exception):
                ws.send(json.dumps({'type': 'error', 'message': msg}))

        def on_disconnect():
            with contextlib.suppress(Exception):
                ws.send(json.dumps({'type': 'disconnected'}))

        with _kiwi_lock:
            _kiwi_client = KiwiSDRClient(
                host=host, port=port,
                on_audio=on_audio,
                on_error=on_error,
                on_disconnect=on_disconnect,
                password=password,
            )
            success = _kiwi_client.connect(freq_khz, mode)

        if success:
            ws.send(json.dumps({
                'type': 'connected',
                'host': host,
                'port': port,
                'freq_khz': freq_khz,
                'mode': mode,
                'sample_rate': KIWI_SAMPLE_RATE,
            }))
        else:
            ws.send(json.dumps({'type': 'error', 'message': 'Connection to KiwiSDR failed'}))
            _disconnect_kiwi()

    elif cmd == 'tune':
        freq_khz = float(data.get('freq_khz', 0))
        mode = data.get('mode', '').lower() or None

        with _kiwi_lock:
            if _kiwi_client and _kiwi_client.connected:
                success = _kiwi_client.tune(
                    freq_khz,
                    mode or _kiwi_client.mode
                )
                if success:
                    ws.send(json.dumps({
                        'type': 'tuned',
                        'freq_khz': freq_khz,
                        'mode': mode or _kiwi_client.mode,
                    }))
                else:
                    ws.send(json.dumps({'type': 'error', 'message': 'Retune failed'}))
            else:
                ws.send(json.dumps({'type': 'error', 'message': 'Not connected'}))

    elif cmd == 'disconnect':
        _disconnect_kiwi()
        ws.send(json.dumps({'type': 'disconnected'}))


def init_websdr_audio(app: Flask) -> None:
    """Initialize WebSocket audio proxy for KiwiSDR. Called from app.py."""
    if not WEBSOCKET_AVAILABLE:
        logger.warning("flask-sock not installed, KiwiSDR audio proxy disabled")
        return

    sock = Sock(app)

    @sock.route('/ws/kiwi-audio')
    def kiwi_audio_stream(ws):
        """WebSocket endpoint: proxy audio between browser and KiwiSDR."""
        logger.info("KiwiSDR audio client connected")

        try:
            while True:
                # Check for commands from browser
                try:
                    msg = ws.receive(timeout=0.005)
                    if msg:
                        data = json.loads(msg)
                        cmd = data.get('cmd', '')
                        _handle_kiwi_command(ws, cmd, data)
                except TimeoutError:
                    pass
                except Exception as e:
                    if 'closed' in str(e).lower():
                        break
                    if 'timed out' not in str(e).lower():
                        logger.error(f"KiwiSDR WS receive error: {e}")

                # Forward audio from KiwiSDR to browser
                try:
                    audio_data = _kiwi_audio_queue.get_nowait()
                    ws.send(audio_data)
                except queue.Empty:
                    time.sleep(0.005)

        except Exception as e:
            logger.info(f"KiwiSDR WS closed: {e}")
        finally:
            _disconnect_kiwi()
            logger.info("KiwiSDR audio client disconnected")