surtgis 0.6.15

//! Cloud-related helper functions: STAC asset resolution, COG reading.

#[cfg(feature = "cloud")]
use anyhow::{Context, Result};
#[cfg(feature = "cloud")]
use tracing::info;

#[cfg(feature = "cloud")]
use surtgis_cloud::blocking::{CogReaderBlocking, StacClientBlocking, read_cog};
#[cfg(feature = "cloud")]
use surtgis_cloud::{BBox, CogReaderOptions, StacItem};

#[cfg(feature = "cloud")]
use crate::helpers::spinner;

#[cfg(feature = "cloud")]
pub fn read_cog_dem(url: &str, bbox: &BBox) -> Result<surtgis_core::Raster<f64>> {
    let pb = spinner("Fetching COG tiles...");
    let opts = CogReaderOptions::default();
    let raster: surtgis_core::Raster<f64> =
        read_cog(url, bbox, opts).context("Failed to read remote COG")?;
    pb.finish_and_clear();
    let (rows, cols) = raster.shape();
    info!(
        "Remote raster: {} x {} ({} cells)",
        cols,
        rows,
        raster.len()
    );
    Ok(raster)
}

/// Validate and normalize asset key for a given collection.
///
/// Resolves common names and aliases to canonical band codes.
/// Collection-specific mapping (no STAC item lookup).
///
/// # Arguments
/// * `band` - Band identifier (e.g., "B04", "red", "SR_B4", "VV")
/// * `collection` - Collection name (e.g., "sentinel-2-l2a", "landsat-c2-l2", "sentinel-1-rtc")
///
/// # Returns
/// Canonical band code for the collection
#[cfg(feature = "cloud")]
pub fn validate_asset_key(band: &str, collection: &str) -> Result<String> {
    match collection {
        "sentinel-2-l2a" => {
            // S2 uses B02-B12, SCL
            match band.to_uppercase().as_str() {
                "B02" | "B03" | "B04" | "B08" | "B11" | "B12" | "SCL" => Ok(band.to_uppercase()),
                // Common aliases
                "BLUE" => Ok("B02".to_string()),
                "GREEN" => Ok("B03".to_string()),
                "RED" => Ok("B04".to_string()),
                "NIR" | "NIR08" => Ok("B08".to_string()),
                "SWIR1" => Ok("B11".to_string()),
                "SWIR2" => Ok("B12".to_string()),
                _ => anyhow::bail!("Unknown S2 band: {}", band),
            }
        }
        "landsat-c2-l2" => {
            // Landsat uses SR_B1-B7
            match band.to_uppercase().as_str() {
                "SR_B1" | "SR_B2" | "SR_B3" | "SR_B4" | "SR_B5" | "SR_B6" | "SR_B7" => {
                    Ok(band.to_uppercase())
                }
                "BLUE" => Ok("SR_B2".to_string()),
                "GREEN" => Ok("SR_B3".to_string()),
                "RED" => Ok("SR_B4".to_string()),
                "NIR" => Ok("SR_B5".to_string()),
                "SWIR1" => Ok("SR_B6".to_string()),
                "SWIR2" => Ok("SR_B7".to_string()),
                "QA_PIXEL" => Ok("QA_PIXEL".to_string()),
                _ => anyhow::bail!("Unknown Landsat band: {}", band),
            }
        }
        "sentinel-1-rtc" => {
            // Sentinel-1 uses VV, VH
            match band.to_uppercase().as_str() {
                "VV" | "VH" => Ok(band.to_uppercase()),
                _ => anyhow::bail!("Unknown Sentinel-1 band: {}", band),
            }
        }
        _ => anyhow::bail!("Unsupported collection: {}", collection),
    }
}

/// Multi-collection band name aliases: common name -> catalog-specific keys.
/// Tries the exact key first (case-insensitive), then aliases.
#[cfg(feature = "cloud")]
pub fn resolve_asset_key<'a>(item: &'a StacItem, key: &'a str) -> Option<(&'a str, &'a surtgis_cloud::stac_models::StacAsset)> {
    // Try exact key first
    if let Some(asset) = item.asset(key) {
        return Some((key, asset));
    }

    // Try case-insensitive exact match (handles QA_PIXEL vs qa_pixel)
    let key_lower = key.to_lowercase();
    for (asset_key, asset) in &item.assets {
        if asset_key.to_lowercase() == key_lower {
            return Some((asset_key.as_str(), asset));
        }
    }

    // Alias table: common name <-> collection-specific band codes
    let aliases: &[(&str, &[&str])] = &[
        // === Sentinel-2 ===
        ("red",     &["B04", "b04", "Red", "SR_B4"]),
        ("green",   &["B03", "b03", "Green", "SR_B3"]),
        ("blue",    &["B02", "b02", "Blue", "SR_B2"]),
        ("nir",     &["B08", "b08", "nir08", "Nir", "SR_B5"]),
        ("nir08",   &["B08", "b08", "nir", "SR_B5"]),
        ("nir09",   &["B09", "b09"]),
        ("rededge1",&["B05", "b05"]),
        ("rededge2",&["B06", "b06"]),
        ("rededge3",&["B07", "b07"]),
        ("swir16",  &["B11", "b11", "swir1", "SWIR1", "SR_B6"]),
        ("swir22",  &["B12", "b12", "swir2", "SWIR2", "SR_B7"]),
        ("scl",     &["SCL"]),
        ("coastal", &["B01", "b01", "SR_B1"]),
        ("wvp",     &["B09", "b09"]),
        // Reverse S2: band code -> common name
        ("B02",  &["blue", "Blue"]),
        ("B03",  &["green", "Green"]),
        ("B04",  &["red", "Red"]),
        ("B08",  &["nir", "nir08"]),
        ("B05",  &["rededge1"]),
        ("B06",  &["rededge2"]),
        ("B07",  &["rededge3"]),
        ("B11",  &["swir16", "swir1"]),
        ("B12",  &["swir22", "swir2"]),
        ("SCL",  &["scl"]),
        // === Landsat ===
        ("SR_B1", &["coastal", "B01"]),
        ("SR_B2", &["blue", "Blue", "B02"]),
        ("SR_B3", &["green", "Green", "B03"]),
        ("SR_B4", &["red", "Red", "B04"]),
        ("SR_B5", &["nir", "nir08", "B08"]),
        ("SR_B6", &["swir16", "swir1", "B11"]),
        ("SR_B7", &["swir22", "swir2", "B12"]),
        ("QA_PIXEL", &["qa_pixel", "QA_pixel"]),
        ("qa_pixel", &["QA_PIXEL", "QA_pixel"]),
        // === Sentinel-1 ===
        ("vv", &["VV"]),
        ("vh", &["VH"]),
        ("VV", &["vv"]),
        ("VH", &["vh"]),
    ];

    for &(name, alt_keys) in aliases {
        if name.to_lowercase() == key_lower {
            for &alt in alt_keys {
                if let Some(asset) = item.asset(alt) {
                    return Some((alt, asset));
                }
            }
        }
    }
    None
}

#[cfg(all(test, feature = "cloud"))]
mod tests {
    use super::*;

    #[test]
    fn test_validate_s2_bands() {
        assert_eq!(
            validate_asset_key("B04", "sentinel-2-l2a").unwrap(),
            "B04"
        );
        assert_eq!(
            validate_asset_key("red", "sentinel-2-l2a").unwrap(),
            "B04"
        );
        assert_eq!(
            validate_asset_key("B02", "sentinel-2-l2a").unwrap(),
            "B02"
        );
        assert_eq!(
            validate_asset_key("blue", "sentinel-2-l2a").unwrap(),
            "B02"
        );
        assert!(validate_asset_key("INVALID", "sentinel-2-l2a").is_err());
    }

    #[test]
    fn test_validate_landsat_bands() {
        assert_eq!(
            validate_asset_key("SR_B4", "landsat-c2-l2").unwrap(),
            "SR_B4"
        );
        assert_eq!(
            validate_asset_key("red", "landsat-c2-l2").unwrap(),
            "SR_B4"
        );
        assert_eq!(
            validate_asset_key("nir", "landsat-c2-l2").unwrap(),
            "SR_B5"
        );
        assert!(validate_asset_key("B04", "landsat-c2-l2").is_err());
    }

    #[test]
    fn test_validate_sentinel1_bands() {
        assert_eq!(validate_asset_key("VV", "sentinel-1-rtc").unwrap(), "VV");
        assert_eq!(validate_asset_key("VH", "sentinel-1-rtc").unwrap(), "VH");
        assert!(validate_asset_key("HH", "sentinel-1-rtc").is_err());
    }

    #[test]
    fn test_unsupported_collection() {
        assert!(validate_asset_key("B04", "unknown-collection").is_err());
    }
}

/// Fetch a single asset from a STAC item as a raster.
#[cfg(feature = "cloud")]
#[allow(dead_code)]
pub fn fetch_stac_asset(
    item: &StacItem,
    asset_key: &str,
    bbox: &BBox,
    client: &StacClientBlocking,
) -> Result<surtgis_core::Raster<f64>> {
    let (resolved_key, stac_asset) = resolve_asset_key(item, asset_key)
        .ok_or_else(|| {
            let available: Vec<&str> = item.assets.keys().map(|k| k.as_str()).collect();
            anyhow::anyhow!(
                "Item {} missing asset '{}'. Available: {}",
                item.id, asset_key, available.join(", ")
            )
        })?;

    if resolved_key != asset_key {
        info!("Resolved asset '{}' -> '{}'", asset_key, resolved_key);
    }

    let stac_asset = stac_asset.clone();

    let href = client
        .sign_asset_href(&stac_asset.href, item.collection.as_deref().unwrap_or(""))
        .context("Failed to sign asset URL")?;

    let opts = CogReaderOptions::default();
    let mut reader =
        CogReaderBlocking::open(&href, opts).context("Failed to open remote COG")?;

    // Auto-reproject bbox if COG is in a projected CRS
    let read_bb = {
        use surtgis_cloud::reproject;
        let epsg = item
            .epsg()
            .or_else(|| reader.metadata().crs.as_ref().and_then(|c| c.epsg()));
        if let Some(epsg) = epsg {
            if !reproject::is_wgs84(epsg) {
                reproject::reproject_bbox_to_cog(bbox, epsg)
            } else {
                *bbox
            }
        } else {
            *bbox
        }
    };

    let raster: surtgis_core::Raster<f64> = reader
        .read_bbox(&read_bb, None)
        .context("Failed to read bounding box from COG")?;
    Ok(raster)
}