parlov-elicit 0.5.0

//! `CpIfRange` -- validator-gated range request.
//!
//! Sends `If-Range: "nonexistent-etag"` together with `Range: bytes=0-0`. Per
//! RFC 9110 S13.1.5 when the validator does not match the server MUST ignore
//! the Range header and return a full 200 response. A nonexistent resource
//! returns 404, producing the differential.

use http::{HeaderMap, Method};
use parlov_core::{
    always_applicable, NormativeStrength, OracleClass, ResponseClass, SignalSurface, Technique,
    Vector,
};

use crate::chain::{Consumer, Producer, ProducerOutput, ProducerOutputKind};
use crate::context::ScanContext;
use crate::harvest::EtagStrength;
use crate::strategy::Strategy;
use crate::types::{ProbeSpec, RiskLevel, StrategyMetadata};
use crate::util::{build_pair, clone_headers_static, try_clone_headers_with};

static METADATA: StrategyMetadata = StrategyMetadata {
    strategy_id: "cp-if-range",
    strategy_name: "Cache Probe: If-Range",
    risk: RiskLevel::Safe,
};

static TECHNIQUE: Technique = Technique {
    id: "cp-if-range",
    name: "If-Range validator-gated range request",
    oracle_class: OracleClass::Existence,
    vector: Vector::CacheProbing,
    strength: NormativeStrength::Should,
    normalization_weight: None,
    inverted_signal_weight: None,
    method_relevant: false,
    parser_relevant: false,
    applicability: always_applicable,
    contradiction_surface: SignalSurface::Status,
};

/// Extracts a strong `ETag` from 2xx responses for `If-Range` chaining.
pub(super) struct CpIfRangeProducer;

impl Producer for CpIfRangeProducer {
    /// Admits 2xx — `ETag` only meaningful on success.
    fn admits(&self, class: ResponseClass) -> bool {
        matches!(class, ResponseClass::Success)
    }

    /// Extracts strong `ETag`s only. RFC 9110 §13.1.5: `If-Range` MUST NOT use a weak `ETag`.
    fn extract(&self, _class: ResponseClass, headers: &HeaderMap) -> Option<ProducerOutput> {
        let raw = headers.get(http::header::ETAG)?.to_str().ok()?;
        if raw.starts_with("W/") {
            return None;
        }
        Some(ProducerOutput::Etag(raw.to_owned(), EtagStrength::Strong))
    }
}

/// Converts a strong `ETag` output into an `If-Range` + `Range` chained probe spec.
pub(super) struct CpIfRangeConsumer;

impl Consumer for CpIfRangeConsumer {
    fn needs(&self) -> ProducerOutputKind {
        ProducerOutputKind::Etag
    }

    fn generate(&self, ctx: &ScanContext, output: &ProducerOutput) -> Vec<ProbeSpec> {
        let ProducerOutput::Etag(etag_value, EtagStrength::Strong) = output else {
            return vec![];
        };
        let Some(hdrs) = try_clone_headers_with(&ctx.headers, "if-range", etag_value) else {
            return vec![];
        };
        let hdrs = clone_headers_static(&hdrs, "range", "bytes=0-0");
        let pair = build_pair(
            ctx,
            Method::GET,
            hdrs.clone(),
            hdrs,
            None,
            METADATA.clone(),
            TECHNIQUE,
        );
        vec![ProbeSpec::Pair(pair)]
    }
}

/// Elicits existence differentials via `If-Range` + `Range` header pair.
pub struct CpIfRange;

impl Strategy for CpIfRange {
    fn metadata(&self) -> &'static StrategyMetadata {
        &METADATA
    }

    fn technique_def(&self) -> &'static Technique {
        &TECHNIQUE
    }

    fn methods(&self) -> &[Method] {
        &[Method::GET]
    }

    fn is_applicable(&self, _ctx: &ScanContext) -> bool {
        true
    }

    fn generate(&self, ctx: &ScanContext) -> Vec<ProbeSpec> {
        let hdrs = clone_headers_static(&ctx.headers, "if-range", "\"nonexistent-etag\"");
        let hdrs = clone_headers_static(&hdrs, "range", "bytes=0-0");
        let pair = build_pair(
            ctx,
            Method::GET,
            hdrs.clone(),
            hdrs,
            None,
            METADATA.clone(),
            TECHNIQUE,
        );
        vec![ProbeSpec::Pair(pair)]
    }
}

#[cfg(test)]
mod tests {
    use super::*;
    use crate::test_utils::minimal_ctx;

    #[test]
    fn generates_correct_technique_vector() {
        let specs = CpIfRange.generate(&minimal_ctx());
        assert_eq!(specs[0].technique().vector, Vector::CacheProbing);
    }

    #[test]
    fn generates_correct_technique_strength() {
        let specs = CpIfRange.generate(&minimal_ctx());
        assert_eq!(specs[0].technique().strength, NormativeStrength::Should);
    }

    #[test]
    fn generates_probe_with_correct_headers() {
        let specs = CpIfRange.generate(&minimal_ctx());
        let ProbeSpec::Pair(pair) = &specs[0] else {
            panic!("expected Pair variant")
        };
        assert_eq!(
            pair.probe.headers.get("if-range").unwrap(),
            "\"nonexistent-etag\""
        );
        assert_eq!(pair.probe.headers.get("range").unwrap(), "bytes=0-0");
    }

    #[test]
    fn is_always_applicable() {
        assert!(CpIfRange.is_applicable(&minimal_ctx()));
    }

    #[test]
    fn risk_is_safe() {
        assert_eq!(CpIfRange.risk(), RiskLevel::Safe);
    }
}