mcp-usage-tower 0.5.0

//! Generic Tower [`Layer`](tower::Layer) implementation.

use std::convert::Infallible;
use std::error::Error as StdError;
use std::future::Future;
use std::pin::Pin;
use std::sync::Arc;
use std::task::{Context, Poll};
use std::time::Duration;

use bytes::{Buf, Bytes, BytesMut};
use http::header::{AUTHORIZATION, CACHE_CONTROL, CONTENT_TYPE, X_CONTENT_TYPE_OPTIONS};
use http::{HeaderMap, Request, Response, StatusCode};
use http_body::{Body, Frame};
use http_body_util::combinators::UnsyncBoxBody;
use http_body_util::{BodyExt, Full};
use mcp_usage_core::{
    Call, Charge, Method, ResultType, TaskAttribution, TaskStatus, TrustFailure,
    decide_with_task_attribution, validate_header,
};
use mcp_usage_export::{NoopRecorder, RecordOutcome, SharedRecorder, UsageEvent};
use serde_json::{Value, json};
use thiserror::Error;
use tower::{Layer, Service};

use crate::auth::{AuthFailureLimit, Tenant, TenantStore, hash_api_key};
use crate::cache::{
    CachedResponse, RequestMetadata, ResponseCache, cache_hints, inspect_request, render_with_id,
};
use crate::classify::{ClassificationError, classify_protocol_headers};
use crate::deferred::DeferredCompletions;
use crate::metrics::{EdgeMetrics, UnaccountedReason};
use crate::task::{InMemoryTaskStore, TaskAttributionStore};
use crate::{METHOD_HEADER, NAME_HEADER, PROTOCOL_VERSION_HEADER};

/// Erased body error returned by [`MeterService`].
pub type BoxError = Box<dyn StdError + Send + Sync>;
/// Response body returned by [`MeterService`].
pub type MeterBody = UnsyncBoxBody<Bytes, BoxError>;

const DEFAULT_CACHE_ENTRIES: usize = 512;
const DEFAULT_CACHE_TTL: Duration = Duration::from_secs(24 * 60 * 60);
/// Terminal accounting parked for want of somewhere to await.
const DEFAULT_DEFERRED_CAPACITY: usize = 4_096;
/// Parked completions run at the start of each request.
///
/// Small on purpose. This borrows the request path to make progress, so it has
/// to stay cheap; an application under load has no shortage of requests to
/// amortize the backlog across.
const DEFAULT_DEFERRED_DRAIN_PER_REQUEST: usize = 2;

/// Invalid edge configuration.
#[derive(Debug, Clone, Copy, PartialEq, Eq, Error)]
pub enum EdgeConfigError {
    /// Authentication failure windows must advance over time.
    #[error("authentication failure window must be greater than zero")]
    InvalidAuthFailureWindow,
}

/// Runtime configuration shared by every cloned metering service.
#[derive(Clone)]
pub struct EdgeConfig {
    tenants: Arc<dyn TenantStore>,
    recorder: SharedRecorder,
    tasks: Arc<dyn TaskAttributionStore>,
    cache: Arc<ResponseCache>,
    metrics: Arc<EdgeMetrics>,
    meter_name: String,
    max_request_body: usize,
    max_response_capture: usize,
    cache_max_entries: usize,
    cache_max_ttl: Duration,
    share_public_cache: bool,
    forward_credentials: bool,
    deferred: Arc<DeferredCompletions>,
    deferred_drain_per_request: usize,
    auth_failure_limit: Option<Arc<AuthFailureLimit>>,
    strict_protocol_version: bool,
}

impl std::fmt::Debug for EdgeConfig {
    fn fmt(&self, f: &mut std::fmt::Formatter<'_>) -> std::fmt::Result {
        f.debug_struct("EdgeConfig")
            .field("meter_name", &self.meter_name)
            .field("max_request_body", &self.max_request_body)
            .field("max_response_capture", &self.max_response_capture)
            .field("share_public_cache", &self.share_public_cache)
            .field("forward_credentials", &self.forward_credentials)
            .field("strict_protocol_version", &self.strict_protocol_version)
            .field("deferred_pending", &self.deferred.len())
            .finish_non_exhaustive()
    }
}

impl EdgeConfig {
    /// Construct an edge using API-key tenants and a no-op billing recorder.
    #[must_use]
    pub fn new(tenants: Arc<dyn TenantStore>) -> Self {
        Self {
            tenants,
            recorder: Arc::new(NoopRecorder),
            tasks: Arc::new(InMemoryTaskStore::new()),
            cache: Arc::new(ResponseCache::new(
                DEFAULT_CACHE_ENTRIES,
                DEFAULT_CACHE_TTL,
                false,
            )),
            metrics: Arc::new(EdgeMetrics::default()),
            meter_name: "mcp_units".to_owned(),
            max_request_body: 1024 * 1024,
            max_response_capture: 1024 * 1024,
            cache_max_entries: DEFAULT_CACHE_ENTRIES,
            cache_max_ttl: DEFAULT_CACHE_TTL,
            share_public_cache: false,
            forward_credentials: false,
            deferred: Arc::new(DeferredCompletions::new(DEFAULT_DEFERRED_CAPACITY)),
            deferred_drain_per_request: DEFAULT_DEFERRED_DRAIN_PER_REQUEST,
            auth_failure_limit: None,
            strict_protocol_version: false,
        }
    }

    /// Rebuild the cache from every input that shapes it.
    ///
    /// The builders below are order-independent because each one records its
    /// setting and then rebuilds from all of them. Constructing the cache in
    /// place inside a single builder would let a later call silently discard an
    /// earlier one.
    fn rebuild_cache(&mut self) {
        self.cache = Arc::new(ResponseCache::new(
            self.cache_max_entries,
            self.cache_max_ttl,
            self.share_public_cache,
        ));
    }

    /// Refuse requests that predate the mirrored headers instead of reading their body.
    ///
    /// By default a legacy request is classified from its JSON-RPC body, which is what
    /// lets clients older than [`mcp_usage_core::version::HEADER_VALIDATION_SINCE`] -
    /// still the majority - reach the origin at all. The body is the document the origin
    /// executes, so pricing on it cannot be gamed the way pricing on unvalidated headers
    /// can; the cost is one bounded JSON parse per legacy request.
    ///
    /// Set this when a deployment would rather serve only modern clients than spend that
    /// parse, or when an upstream proxy already guarantees the revision.
    #[must_use]
    pub fn with_strict_protocol_version(mut self, strict: bool) -> Self {
        self.strict_protocol_version = strict;
        self
    }

    /// Install the hot-path usage recorder.
    #[must_use]
    pub fn with_recorder(mut self, recorder: SharedRecorder) -> Self {
        self.recorder = recorder;
        self
    }

    /// Install a durable task-attribution store.
    #[must_use]
    pub fn with_task_store(mut self, tasks: Arc<dyn TaskAttributionStore>) -> Self {
        self.tasks = tasks;
        self
    }

    /// Set the provider meter event name.
    #[must_use]
    pub fn with_meter_name(mut self, meter_name: impl Into<String>) -> Self {
        self.meter_name = meter_name.into();
        self
    }

    /// Configure cache capacity and the maximum honored server TTL.
    #[must_use]
    pub fn with_cache(mut self, max_entries: usize, max_ttl: Duration) -> Self {
        self.cache_max_entries = max_entries;
        self.cache_max_ttl = max_ttl;
        self.rebuild_cache();
        self
    }

    /// Share results the origin marks `cacheScope: "public"` across tenants.
    ///
    /// Disabled by default. A `"public"` result is an assertion by the origin
    /// that the body does not depend on who asked for it; honoring it puts one
    /// entry in a bucket every authorization context reads, so an origin that
    /// mislabels a tenant-specific result turns that mistake into a cross-tenant
    /// disclosure at the edge. Cacheable methods include `resources/read`, so
    /// the blast radius is resource contents, not just discovery listings.
    ///
    /// Enable this only when the origin's public results are genuinely
    /// tenant-independent. Leaving it off costs cache hit rate and nothing else:
    /// a cache may always decline to reuse a response.
    #[must_use]
    pub fn with_public_cache_sharing(mut self, share: bool) -> Self {
        self.share_public_cache = share;
        self.rebuild_cache();
        self
    }

    /// Forward the API key to the inner service after authenticating it.
    ///
    /// Disabled by default: the edge consumes the credential, so passing it on
    /// hands the inner service a secret it was not issued. That is harmless when
    /// the origin runs in-process, and an exposure the moment this layer fronts
    /// an origin in another trust domain.
    ///
    /// Enable it when the origin performs its own check against the same key.
    #[must_use]
    pub fn with_credential_forwarding(mut self, forward: bool) -> Self {
        self.forward_credentials = forward;
        self
    }

    /// Bound bytes accepted from one MCP request body.
    #[must_use]
    pub fn with_max_request_body(mut self, bytes: usize) -> Self {
        self.max_request_body = bytes;
        self
    }

    /// Bound bytes retained while observing a response. Oversized responses
    /// continue streaming but fail toward not charging and not caching.
    #[must_use]
    pub fn with_max_response_capture(mut self, bytes: usize) -> Self {
        self.max_response_capture = bytes;
        self
    }

    /// Shared edge counters.
    #[must_use]
    pub fn metrics(&self) -> Arc<EdgeMetrics> {
        self.metrics.clone()
    }

    /// Terminal accounting parked because it could not finish without awaiting.
    ///
    /// Only a durable task store parks anything: its futures perform real I/O,
    /// and the body is released from `Drop`, where nothing may await. Every
    /// subsequent authenticated request runs a bounded number of them, so an
    /// application that ignores this still converges. Draining explicitly is
    /// better, and draining after graceful shutdown is what stops a departing
    /// process from taking durable-task charges with it.
    ///
    /// Take the handle before passing the configuration to the layer.
    #[must_use]
    pub fn deferred(&self) -> Arc<DeferredCompletions> {
        self.deferred.clone()
    }

    /// Bound how much parked accounting each authenticated request runs.
    ///
    /// Zero leaves draining entirely to [`EdgeConfig::deferred`]. Raising it
    /// clears a backlog sooner at the cost of latency on the requests that do
    /// the work.
    #[must_use]
    pub fn with_deferred_drain_per_request(mut self, completions: usize) -> Self {
        self.deferred_drain_per_request = completions;
        self
    }

    /// Bound how many completions may be parked before the oldest is discarded.
    #[must_use]
    pub fn with_deferred_capacity(mut self, capacity: usize) -> Self {
        self.deferred = Arc::new(DeferredCompletions::new(capacity));
        self
    }

    /// Refuse further guessing after `max_failures` bad credentials in `window`.
    ///
    /// Disabled by default, because the useful ceiling depends entirely on how
    /// many clients an edge serves. Only failures consume the budget, so a
    /// caller with a valid key is never affected: exhausting it turns a wrong
    /// key's `401` into a `429` and nothing more.
    ///
    /// This bounds sustained guessing across the whole edge. It is not
    /// per-client limiting, which needs a client identity this layer cannot
    /// trust, and belongs in the proxy in front of it.
    ///
    /// # Errors
    ///
    /// Returns [`EdgeConfigError::InvalidAuthFailureWindow`] when `window` is
    /// zero.
    pub fn with_auth_failure_limit(
        mut self,
        max_failures: u64,
        window: Duration,
    ) -> Result<Self, EdgeConfigError> {
        if window.is_zero() {
            return Err(EdgeConfigError::InvalidAuthFailureWindow);
        }
        self.auth_failure_limit = Some(Arc::new(AuthFailureLimit::new(max_failures, window)));
        Ok(self)
    }
}

/// Tower layer that installs [`MeterService`].
#[derive(Debug, Clone)]
pub struct MeterLayer {
    config: Arc<EdgeConfig>,
}

impl MeterLayer {
    /// Construct a metering layer from its shared configuration.
    #[must_use]
    pub fn new(config: EdgeConfig) -> Self {
        Self {
            config: Arc::new(config),
        }
    }
}

impl<S> Layer<S> for MeterLayer {
    type Service = MeterService<S>;

    fn layer(&self, inner: S) -> Self::Service {
        MeterService {
            inner,
            config: self.config.clone(),
        }
    }
}

/// Service produced by [`MeterLayer`].
#[derive(Debug, Clone)]
pub struct MeterService<S> {
    inner: S,
    config: Arc<EdgeConfig>,
}

impl<S, RequestBody, ResponseBody> Service<Request<RequestBody>> for MeterService<S>
where
    RequestBody: Body<Data = Bytes> + Send + 'static,
    S: Service<Request<Full<Bytes>>, Response = Response<ResponseBody>> + Clone + Send + 'static,
    S::Future: Send + 'static,
    S::Error: Send + 'static,
    ResponseBody: Body<Data = Bytes> + Send + 'static,
    ResponseBody::Error: StdError + Send + Sync + 'static,
{
    type Response = Response<MeterBody>;
    type Error = S::Error;
    type Future = Pin<Box<dyn Future<Output = Result<Self::Response, Self::Error>> + Send>>;

    fn poll_ready(&mut self, cx: &mut Context<'_>) -> Poll<Result<(), Self::Error>> {
        self.inner.poll_ready(cx)
    }

    #[expect(
        clippy::too_many_lines,
        reason = "the request lifecycle stays linear so security-gate ordering is auditable"
    )]
    fn call(&mut self, request: Request<RequestBody>) -> Self::Future {
        let replacement = self.inner.clone();
        let mut inner = std::mem::replace(&mut self.inner, replacement);
        let config = self.config.clone();

        Box::pin(async move {
            let (mut parts, request_body) = request.into_parts();
            // Classification runs before authentication so a malformed request is
            // refused without consulting the tenant store. A legacy request cannot be
            // classified from headers at all, so it is deferred to the body - but only
            // after the credential gate below, so unauthenticated traffic never buys a
            // JSON parse.
            let classification =
                match classify_request_headers(&parts.headers, config.strict_protocol_version) {
                    Ok(classification) => classification,
                    Err(message) => {
                        config.metrics.rejected();
                        return Ok(error_response(
                            StatusCode::BAD_REQUEST,
                            "INVALID_MCP_HEADERS",
                            &message,
                        ));
                    }
                };
            let api_key = match extract_api_key(&parts.headers) {
                Ok(api_key) => api_key,
                Err(error) => {
                    let message = match error {
                        CredentialError::Missing => "missing API key",
                        CredentialError::Invalid => "invalid or ambiguous API key headers",
                    };
                    return Ok(refuse_credential(&config, message));
                }
            };
            let Some(tenant) = config.tenants.authenticate(api_key) else {
                return Ok(refuse_credential(&config, "invalid API key"));
            };

            // Only authenticated traffic may borrow the request path to drive
            // earlier backend work. Malformed headers and failed credentials
            // return above without polling a deferred completion.
            if config.deferred_drain_per_request > 0 {
                config
                    .deferred
                    .drain_some(config.deferred_drain_per_request)
                    .await;
            }
            let authorization_context = hash_api_key(api_key);
            config.metrics.classified();

            let request_bytes =
                match collect_request_body(request_body, config.max_request_body).await {
                    Ok(bytes) => bytes,
                    Err(RequestBodyError::TooLarge) => {
                        config.metrics.rejected();
                        return Ok(error_response(
                            StatusCode::PAYLOAD_TOO_LARGE,
                            "BODY_TOO_LARGE",
                            "MCP request body exceeds the configured limit",
                        ));
                    }
                    Err(RequestBodyError::Read) => {
                        config.metrics.rejected();
                        return Ok(error_response(
                            StatusCode::BAD_REQUEST,
                            "INVALID_BODY",
                            "failed to read MCP request body",
                        ));
                    }
                };
            let legacy = classification.is_from_body();
            let protocol = match classification.resolve(&parts.method, &request_bytes) {
                Ok(protocol) => protocol,
                Err(message) => {
                    config.metrics.rejected();
                    return Ok(error_response(
                        StatusCode::BAD_REQUEST,
                        "INVALID_MCP_HEADERS",
                        &message,
                    ));
                }
            };
            let Some(protocol) = protocol else {
                if !config.forward_credentials {
                    parts.headers.remove(crate::API_KEY_HEADER);
                    parts.headers.remove(AUTHORIZATION);
                }
                let response = inner
                    .call(Request::from_parts(parts, Full::new(request_bytes)))
                    .await?;
                return Ok(response.map(|body| {
                    body.map_err(|error| -> BoxError { Box::new(error) })
                        .boxed_unsync()
                }));
            };
            let metadata = inspect_request(&protocol.call, &request_bytes);
            if let Some(key) = metadata.cache_key
                && let Some(cached) = config.cache.get(key, &authorization_context)
            {
                config.metrics.cache_hit();
                let mut cached_request = metadata;
                cached_request.cache_key = None;
                let content_type = cached
                    .headers
                    .get(CONTENT_TYPE)
                    .and_then(|value| value.to_str().ok())
                    .unwrap_or_default()
                    .to_owned();
                let body = render_with_id(&cached.body, cached_request.request_id.as_ref());
                let completion = Completion {
                    config,
                    tenant,
                    authorization_context,
                    legacy,
                    call: protocol.call,
                    request: cached_request,
                    response_status: cached.status,
                    response_version: cached.version,
                    response_headers: cached.headers.clone(),
                    content_type,
                };
                return Ok(cached_response(&cached, body, completion));
            }
            if metadata.cache_key.is_some() {
                config.metrics.cache_miss();
            }

            // The credential was consumed by the gate above. Removing both
            // headers unconditionally is safe: `extract_api_key` rejects a
            // request carrying both, so at most one of them is present.
            if !config.forward_credentials {
                parts.headers.remove(crate::API_KEY_HEADER);
                parts.headers.remove(AUTHORIZATION);
            }
            let request = Request::from_parts(parts, Full::new(request_bytes));
            let response = inner.call(request).await?;
            let (parts, body) = response.into_parts();
            let completion = Completion {
                config,
                tenant,
                authorization_context,
                legacy,
                call: protocol.call,
                request: metadata,
                response_status: parts.status,
                response_version: parts.version,
                response_headers: cacheable_headers(&parts.headers),
                content_type: parts
                    .headers
                    .get(CONTENT_TYPE)
                    .and_then(|value| value.to_str().ok())
                    .unwrap_or_default()
                    .to_owned(),
            };
            let observed = ObservedBody::new(body, completion);
            let boxed = observed
                .map_err(|error| -> BoxError { Box::new(error) })
                .boxed_unsync();
            Ok(Response::from_parts(parts, boxed))
        })
    }
}

/// Validated identity shared by pricing and metering.
#[derive(Debug, Clone)]
pub struct ClassifiedCall {
    /// The call the origin will execute.
    pub call: Call,
}

/// The outcome of looking at the request headers alone.
#[derive(Debug, Clone)]
pub enum Classification {
    /// The revision mandates header/body validation, so the headers priced the call
    /// and the body is never parsed.
    FromHeaders(ClassifiedCall),
    /// A legacy revision. The call is priced from the body once it has been read.
    FromBody,
}

impl Classification {
    /// Whether the call was priced from the body rather than from trusted headers.
    #[must_use]
    pub const fn is_from_body(&self) -> bool {
        matches!(self, Self::FromBody)
    }

    /// Finish classification, reading the body only when the headers could not be
    /// trusted. Called after the credential gate.
    /// Transport operations and valid client responses return `None`.
    ///
    /// # Errors
    /// Returns an error when the legacy body cannot be classified safely.
    pub fn resolve(
        self,
        http_method: &http::Method,
        body: &[u8],
    ) -> Result<Option<ClassifiedCall>, String> {
        match self {
            Self::FromHeaders(classified) => Ok(Some(classified)),
            Self::FromBody => {
                if matches!(*http_method, http::Method::GET | http::Method::DELETE) {
                    return if body.is_empty() {
                        Ok(None)
                    } else {
                        Err("transport requests must have an empty body".into())
                    };
                }
                // A response to a server request is transport traffic, never a new call.
                // Require a response envelope; arbitrary methodless objects still fail.
                if let Ok(value) = serde_json::from_slice::<Value>(body)
                    && value.get("method").is_none()
                    && value.get("jsonrpc").and_then(Value::as_str) == Some("2.0")
                    && value
                        .get("id")
                        .is_some_and(|id| id.is_string() || id.is_number())
                    && (value.get("result").is_some() ^ value.get("error").is_some())
                {
                    return Ok(None);
                }
                let (method, name) =
                    mcp_usage_core::classify_body(body).map_err(|error| error.to_string())?;
                if method.as_str().starts_with("notifications/") {
                    return Ok(None);
                }
                Ok(Some(ClassifiedCall {
                    call: Call::new(method, name),
                }))
            }
        }
    }
}

/// Validate unique protocol headers before authenticating or reading a body.
///
/// # Errors
/// Returns an error for duplicate, malformed, or disallowed protocol headers.
pub fn classify_request_headers(
    headers: &HeaderMap,
    strict: bool,
) -> Result<Classification, String> {
    let version = optional_header_str(headers, PROTOCOL_VERSION_HEADER)?;
    let method = optional_header_str(headers, METHOD_HEADER)?;
    let name = optional_header_str(headers, NAME_HEADER)?;

    // Trust is settled before anything else, because "this client is old" and "this
    // client is broken" deserve different answers.
    if let Err(failure) = validate_header(version) {
        return match failure {
            // A version that is not a date is not a revision we can reason about. It is
            // a malfunctioning or probing client, not a legacy one, so it is refused
            // whatever the fallback setting - reading its body would reward the garbage.
            TrustFailure::MalformedVersion(_) => {
                Err(ClassificationError::UntrustedVersion(failure.to_string()).to_string())
            }
            // Absent or pre-validation revisions are the ordinary legacy client. Price
            // it from the body unless this deployment asked to serve only modern ones.
            TrustFailure::MissingVersionHeader | TrustFailure::UnvalidatedRevision(_) => {
                if strict {
                    Err(ClassificationError::UntrustedVersion(failure.to_string()).to_string())
                } else {
                    Ok(Classification::FromBody)
                }
            }
        };
    }

    // Trusted revision: the origin is obliged to reject header/body disagreement, so the
    // headers price the call and the body is never parsed. A modern request with a
    // missing or malformed Mcp-Method is still an error - it claimed to mirror headers.
    let classified = classify_protocol_headers(version, method, name).map_err(|e| e.to_string())?;
    Ok(Classification::FromHeaders(ClassifiedCall {
        call: Call::new(
            classified.method,
            classified.name.map(std::borrow::Cow::into_owned),
        ),
    }))
}

fn optional_header_str<'a>(headers: &'a HeaderMap, name: &str) -> Result<Option<&'a str>, String> {
    unique_header(headers, name)?
        .map(|value| {
            value
                .to_str()
                .map_err(|_| format!("{name} is not a visible ASCII header value"))
        })
        .transpose()
}

fn unique_header<'a>(
    headers: &'a HeaderMap,
    name: &str,
) -> Result<Option<&'a http::HeaderValue>, String> {
    let mut values = headers.get_all(name).iter();
    let value = values.next();
    if values.next().is_some() {
        return Err(format!("multiple {name} headers are not allowed"));
    }
    Ok(value)
}

/// Missing or ambiguous tenant credentials.
#[derive(Debug, Clone, Copy, PartialEq, Eq)]
pub enum CredentialError {
    /// No credential was presented.
    Missing,
    /// A credential was malformed or ambiguous.
    Invalid,
}

/// Extract exactly one API key or Bearer credential.
///
/// # Errors
/// Rejects missing, duplicate, or ambiguous credentials.
pub fn extract_api_key(headers: &HeaderMap) -> Result<&str, CredentialError> {
    let direct =
        unique_header(headers, crate::API_KEY_HEADER).map_err(|_| CredentialError::Invalid)?;
    let authorization =
        unique_header(headers, AUTHORIZATION.as_str()).map_err(|_| CredentialError::Invalid)?;
    let value = match (direct, authorization) {
        (None, None) => return Err(CredentialError::Missing),
        (Some(_), Some(_)) => return Err(CredentialError::Invalid),
        (Some(value), None) => value.to_str().map_err(|_| CredentialError::Invalid)?,
        (None, Some(value)) => bearer_token(value.to_str().map_err(|_| CredentialError::Invalid)?)
            .ok_or(CredentialError::Invalid)?,
    };
    if value.is_empty() {
        return Err(CredentialError::Invalid);
    }
    Ok(value)
}

/// The token from an `Authorization: Bearer` credential.
///
/// The scheme name is matched case-insensitively, because RFC 7235 defines it
/// that way and real clients send `bearer`. Matching it exactly turns a
/// conforming request into a `401` that looks, from the caller's side, exactly
/// like a wrong key. RFC 7235 also permits more than one space before the
/// token, while RFC 6750's `token68` cannot itself begin with one, so leading
/// space is separator rather than credential.
fn bearer_token(value: &str) -> Option<&str> {
    let (scheme, token) = value.split_once(' ')?;
    scheme
        .eq_ignore_ascii_case("bearer")
        .then(|| token.trim_start_matches(' '))
}

/// Refuse a request whose credential did not authenticate.
///
/// The failure budget is consulted only here, on the path a caller reaches by
/// presenting a credential that did not work. A valid key never passes through
/// this function, which is what makes a global budget safe: guessing cannot
/// throttle callers who are not guessing.
fn refuse_credential(config: &EdgeConfig, message: &str) -> Response<MeterBody> {
    if let Some(limit) = config.auth_failure_limit.as_ref() {
        if limit.is_exhausted() {
            config.metrics.throttled();
            return error_response(
                StatusCode::TOO_MANY_REQUESTS,
                "TOO_MANY_FAILED_CREDENTIALS",
                "too many failed authentication attempts",
            );
        }
        limit.record_failure();
    }
    config.metrics.unauthenticated();
    error_response(StatusCode::UNAUTHORIZED, "UNAUTHENTICATED", message)
}

fn error_response(status: StatusCode, code: &str, message: &str) -> Response<MeterBody> {
    let bytes = Bytes::from(json!({"error":{"code":code,"message":message}}).to_string());
    let mut response = Response::new(
        Full::new(bytes)
            .map_err(|never: Infallible| -> BoxError { match never {} })
            .boxed_unsync(),
    );
    *response.status_mut() = status;
    let headers = response.headers_mut();
    headers.insert(
        CONTENT_TYPE,
        http::HeaderValue::from_static("application/json"),
    );
    // The message can echo a rejected header value back to the caller, so pin
    // the interpretation to JSON rather than leaving it to content sniffing.
    headers.insert(
        X_CONTENT_TYPE_OPTIONS,
        http::HeaderValue::from_static("nosniff"),
    );
    headers.insert(CACHE_CONTROL, http::HeaderValue::from_static("no-store"));
    response
}

fn cached_response(
    cached: &CachedResponse,
    body: String,
    completion: Completion,
) -> Response<MeterBody> {
    let shares_public = completion.config.share_public_cache;
    let observed = ObservedBody::new(Full::new(Bytes::from(body)), completion);
    let mut response = Response::new(
        observed
            .map_err(|never: Infallible| -> BoxError { match never {} })
            .boxed_unsync(),
    );
    *response.status_mut() = cached.status;
    *response.version_mut() = cached.version;
    *response.headers_mut() = cached.headers.clone();
    let headers = response.headers_mut();
    headers.insert("x-mcp-usage-cache", http::HeaderValue::from_static("hit"));
    headers.insert(
        X_CONTENT_TYPE_OPTIONS,
        http::HeaderValue::from_static("nosniff"),
    );
    if !shares_public {
        // Nothing here is safe for a shared cache to reuse across callers, and a
        // CDN in front of the edge has no idea the body is keyed on an API key.
        headers.insert(CACHE_CONTROL, http::HeaderValue::from_static("private"));
    }
    response
}

fn cacheable_headers(headers: &HeaderMap) -> HeaderMap {
    let mut kept = HeaderMap::new();
    if let Some(content_type) = headers.get(CONTENT_TYPE) {
        kept.insert(CONTENT_TYPE, content_type.clone());
    }
    kept
}

struct Completion {
    config: Arc<EdgeConfig>,
    tenant: Arc<Tenant>,
    authorization_context: String,
    /// The request predated mirrored headers, so its response predates `resultType`.
    legacy: bool,
    call: Call,
    request: RequestMetadata,
    response_status: StatusCode,
    response_version: http::Version,
    response_headers: HeaderMap,
    content_type: String,
}

impl Completion {
    #[expect(
        clippy::too_many_lines,
        reason = "terminal accounting stays linear so fail-free ordering remains auditable"
    )]
    async fn finish(self, bytes: Bytes) {
        let body = match terminal_response(&self.content_type, &bytes) {
            Ok(body) => body,
            Err(reason) => {
                self.config.metrics.unrecognized_response(reason);
                return;
            }
        };
        let response = mcp_usage_core::peek::response(&body);
        // A legacy server cannot say "complete"; on those revisions a result is the
        // delivered work. Without this every legacy call would meter as free.
        let response = if self.legacy {
            response.with_legacy_delivery(&self.call.method)
        } else {
            response
        };

        let response_task_id = response
            .task
            .as_ref()
            .and_then(|task| task.task_id.as_deref());
        let requested_task_id = self.request.requested_task_id.as_deref();
        if matches!(self.call.method, Method::TasksGet)
            && let (Some(requested), Some(returned)) = (requested_task_id, response_task_id)
            && requested != returned
        {
            // Never attribute one task's result to a differently requested
            // task. A conforming origin cannot produce this mismatch.
            self.config
                .metrics
                .unrecognized_response(UnaccountedReason::TaskIdMismatch);
            return;
        }

        if matches!(response.result_type, ResultType::Task)
            && let Some(task_id) = response
                .task
                .as_ref()
                .and_then(|task| task.task_id.as_deref())
            && let Err(error) = self
                .config
                .tasks
                .insert(
                    &self.tenant.id,
                    task_id,
                    TaskAttribution::from_call(&self.call, &self.tenant.prices),
                )
                .await
        {
            self.config.metrics.record_failure();
            tracing::error!(error = %error, "failed to retain MCP task attribution");
        }

        let cleanup_task_id = response_task_id.or(requested_task_id);
        let terminal_task = response.task.as_ref().is_some_and(|task| {
            matches!(
                task.status,
                TaskStatus::Completed | TaskStatus::Failed | TaskStatus::Cancelled
            )
        });
        let completed_task = response
            .task
            .as_ref()
            .is_some_and(|task| matches!(task.status, TaskStatus::Completed));
        let task_origin =
            if matches!(self.call.method, Method::TasksGet) && completed_task && !response.is_error
            {
                if let Some(task_id) = response_task_id {
                    match self.config.tasks.claim(&self.tenant.id, task_id).await {
                        Ok(origin) => origin,
                        Err(error) => {
                            self.config.metrics.record_failure();
                            tracing::error!(error = %error, "failed to claim MCP task attribution");
                            None
                        }
                    }
                } else {
                    None
                }
            } else {
                None
            };
        let charge = decide_with_task_attribution(
            &self.call,
            &response,
            &self.tenant.prices,
            task_origin.as_ref(),
        );
        match charge {
            Charge::Billable(billable) => {
                let usage = UsageEvent::now(
                    &self.tenant.id,
                    &self.tenant.billing_customer_id,
                    &self.config.meter_name,
                    billable.units,
                    billable.idempotency_key,
                );
                match self.config.recorder.record(usage) {
                    Ok(RecordOutcome::Recorded | RecordOutcome::ZeroUnits) => {
                        self.config.metrics.billed(billable.units);
                    }
                    Ok(RecordOutcome::Duplicate) => {
                        self.config.metrics.duplicate();
                    }
                    Err(error) => {
                        self.config.metrics.record_failure();
                        tracing::error!(error = %error, "failed to buffer MCP usage");
                        if let (Some(task_id), Some(origin)) = (response_task_id, task_origin)
                            && let Err(store_error) = self
                                .config
                                .tasks
                                .insert(&self.tenant.id, task_id, origin)
                                .await
                        {
                            self.config.metrics.record_failure();
                            tracing::error!(
                                error = %store_error,
                                "failed to restore MCP task attribution after recorder rejection"
                            );
                        }
                    }
                }
            }
            Charge::Free(reason) => {
                self.config.metrics.free(reason);
                // The claim above already deleted the attribution, on the
                // assumption that a completed task bills. Some shapes do not:
                // a `tasks/get` answering with `resultType: "task"` reads as
                // a task creation and comes back Free. Without putting it
                // back the charge is destroyed permanently and every later
                // poll reports a missing attribution.
                if let (Some(task_id), Some(origin)) = (response_task_id, task_origin)
                    && let Err(error) = self
                        .config
                        .tasks
                        .insert(&self.tenant.id, task_id, origin)
                        .await
                {
                    self.config.metrics.record_failure();
                    tracing::error!(
                        error = %error,
                        "failed to restore MCP task attribution after a free verdict"
                    );
                }
                if terminal_task
                    && !completed_task
                    && let Some(task_id) = cleanup_task_id
                    && let Err(error) = self.config.tasks.remove(&self.tenant.id, task_id).await
                {
                    self.config.metrics.record_failure();
                    tracing::error!(error = %error, "failed to remove MCP task attribution");
                }
            }
        }

        if self.response_status.is_success()
            && !self.request.is_continuation
            && has_media_type(&self.content_type, "application/json")
            && let Some(key) = self.request.cache_key
            && let Some((ttl, scope)) = cache_hints(&body)
        {
            self.config.cache.insert(
                key,
                &self.authorization_context,
                scope,
                ttl,
                CachedResponse {
                    status: self.response_status,
                    version: self.response_version,
                    headers: self.response_headers,
                    body,
                },
            );
        }
    }
}

struct ObservedBody<B> {
    inner: Pin<Box<B>>,
    completion: Option<Completion>,
    finishing: Option<Pin<Box<dyn Future<Output = ()> + Send>>>,
    captured: BytesMut,
    overflowed: bool,
    metrics: Arc<EdgeMetrics>,
    deferred: Arc<DeferredCompletions>,
}

impl<B> ObservedBody<B> {
    fn new(inner: B, completion: Completion) -> Self {
        let metrics = completion.config.metrics.clone();
        let deferred = completion.config.deferred.clone();
        Self {
            inner: Box::pin(inner),
            completion: Some(completion),
            finishing: None,
            captured: BytesMut::new(),
            overflowed: false,
            metrics,
            deferred,
        }
    }

    /// Build the terminal-accounting future, consuming the pending completion.
    ///
    /// Returns `None` when there is nothing left to account for, either because
    /// accounting already ran or because the captured body overflowed.
    fn start_completion(&mut self) -> Option<Pin<Box<dyn Future<Output = ()> + Send>>> {
        let completion = self.completion.take()?;
        if self.overflowed {
            completion
                .config
                .metrics
                .unrecognized_response(UnaccountedReason::Oversized);
            return None;
        }
        let captured = std::mem::take(&mut self.captured).freeze();
        Some(Box::pin(completion.finish(captured)))
    }
}

impl<B> Drop for ObservedBody<B> {
    /// Account for a response the transport stopped polling before end-of-stream.
    ///
    /// A body that declares a `Content-Length` is not polled again once that
    /// many bytes have been written, so `poll_frame` never observes the
    /// end-of-stream that terminal accounting used to depend on. That is the
    /// ordinary case for a fixed-length JSON result, and without this the meter
    /// records nothing at all. Dropping the body is the one signal every
    /// transport does give us.
    ///
    /// Nothing here may await, so the future is polled once with a no-op waker.
    /// That settles it outright for every synchronous recorder and for the
    /// in-process task store, whose futures never yield.
    ///
    /// A durable store performs real I/O, so its first poll pends. That work is
    /// parked on [`DeferredCompletions`] to be driven from somewhere that can
    /// await, because the paths that pend are the ones carrying durable-task
    /// attribution: abandoning them loses the charge for every durable task.
    fn drop(&mut self) {
        let mut context = Context::from_waker(std::task::Waker::noop());
        let unfinished = if let Some(mut finishing) = self.finishing.take() {
            finishing
                .as_mut()
                .poll(&mut context)
                .is_pending()
                .then_some(finishing)
        } else if let Some(mut finishing) = self.start_completion() {
            finishing
                .as_mut()
                .poll(&mut context)
                .is_pending()
                .then_some(finishing)
        } else {
            None
        };
        if let Some(finishing) = unfinished {
            self.metrics.deferred();
            if !self.deferred.park(finishing) {
                // The queue was full, so the oldest accounting was discarded.
                self.metrics.record_failure();
            }
        }
    }
}

impl<B> Body for ObservedBody<B>
where
    B: Body<Data = Bytes>,
{
    type Data = Bytes;
    type Error = B::Error;

    fn poll_frame(
        mut self: Pin<&mut Self>,
        cx: &mut Context<'_>,
    ) -> Poll<Option<Result<Frame<Self::Data>, Self::Error>>> {
        if let Some(finishing) = self.finishing.as_mut() {
            return match finishing.as_mut().poll(cx) {
                Poll::Ready(()) => {
                    self.finishing = None;
                    Poll::Ready(None)
                }
                Poll::Pending => Poll::Pending,
            };
        }
        match self.inner.as_mut().poll_frame(cx) {
            Poll::Ready(Some(Ok(frame))) => {
                if let Some(data) = frame.data_ref()
                    && !self.overflowed
                {
                    let limit = self
                        .completion
                        .as_ref()
                        .map_or(0, |completion| completion.config.max_response_capture);
                    if self.captured.len().saturating_add(data.remaining()) <= limit {
                        self.captured.extend_from_slice(data.chunk());
                    } else {
                        self.captured.clear();
                        self.overflowed = true;
                    }
                }
                Poll::Ready(Some(Ok(frame)))
            }
            Poll::Ready(None) => {
                if let Some(mut finishing) = self.start_completion() {
                    return match finishing.as_mut().poll(cx) {
                        Poll::Ready(()) => Poll::Ready(None),
                        Poll::Pending => {
                            self.finishing = Some(finishing);
                            Poll::Pending
                        }
                    };
                }
                Poll::Ready(None)
            }
            other => other,
        }
    }

    fn is_end_stream(&self) -> bool {
        self.inner.is_end_stream()
    }

    fn size_hint(&self) -> http_body::SizeHint {
        self.inner.size_hint()
    }
}

/// A JSON-RPC response, if these bytes are one.
///
/// Both transports apply the same test, because "terminal" means a JSON-RPC
/// response and not merely well-formed JSON. A bare `0` is valid JSON and is not
/// a response to anything.
fn is_json_rpc_response(value: &Value) -> bool {
    value.get("result").is_some() || value.get("error").is_some()
}

/// Read the terminal JSON-RPC response out of a body, or say why there is none.
///
/// The two failures are not the same event and must not share a counter. A
/// media type the meter does not read means the origin is misconfigured and
/// every call through it is billing nothing, which is a revenue incident; a
/// body that was read and was not a response is the origin answering with
/// something else, which is not.
///
/// # Why an undeclared type is still not read
///
/// An origin that sends no `Content-Type`, or one the meter does not
/// recognize, bills nothing even when the body is a perfectly good JSON-RPC
/// response. That is deliberate. The meter charges money, and it will not
/// infer a charge from a body whose sender did not say it was MCP - the
/// guarantee that an unexpected content type can never carry a charge is worth
/// more than the calls an out-of-spec origin loses.
///
/// What was wrong before was not the refusal but its silence: the refusal
/// shared one counter with three unrelated causes, so it was invisible.
/// `mcp_usage_unrecognized_responses_by_reason_total{reason="media_type"}`
/// isolates it. A nonzero rate there means an origin is misconfigured and its
/// traffic is billing nothing - alert on it.
pub(crate) fn terminal_response(
    content_type: &str,
    bytes: &[u8],
) -> Result<Value, UnaccountedReason> {
    if has_media_type(content_type, "application/json") {
        return serde_json::from_slice(bytes)
            .ok()
            .filter(is_json_rpc_response)
            .ok_or(UnaccountedReason::Unparseable);
    }
    if !has_media_type(content_type, "text/event-stream") {
        return Err(UnaccountedReason::MediaType);
    }
    let Ok(text) = std::str::from_utf8(bytes) else {
        return Err(UnaccountedReason::Unparseable);
    };
    // One pass over the borrowed bytes. Normalizing line endings by rewriting
    // the text copied the whole captured body twice, once per `replace`, for
    // every streamed response the meter observed.
    let mut terminal = None;
    let mut data = String::new();
    for line in sse_lines(text) {
        if line.is_empty() {
            // A blank line ends the event.
            take_terminal(&data, &mut terminal);
            data.clear();
            continue;
        }
        if let Some(value) = line.strip_prefix("data:") {
            if !data.is_empty() {
                data.push('\n');
            }
            data.push_str(value.trim_start());
        }
    }
    take_terminal(&data, &mut terminal);
    terminal.ok_or(UnaccountedReason::Unparseable)
}

/// Keep `data` if it is a JSON-RPC response, replacing any earlier one.
///
/// The last terminal response in the stream wins, which is what the buffered
/// implementation did by overwriting as it went.
fn take_terminal(data: &str, terminal: &mut Option<Value>) {
    if data.is_empty() {
        return;
    }
    if let Ok(value) = serde_json::from_str::<Value>(data)
        && is_json_rpc_response(&value)
    {
        *terminal = Some(value);
    }
}

/// Split SSE text on `\n`, `\r\n`, or a bare `\r`.
///
/// The wire format treats all three as the same terminator. Yielding borrowed
/// slices is the point: it is what lets the reader avoid rewriting the body to
/// normalize it.
fn sse_lines(text: &str) -> impl Iterator<Item = &str> {
    let mut rest = Some(text);
    std::iter::from_fn(move || {
        let remaining = rest?;
        let Some(at) = remaining.find(['\n', '\r']) else {
            rest = None;
            return Some(remaining);
        };
        let (line, after) = remaining.split_at(at);
        let terminator = if after.starts_with("\r\n") { 2 } else { 1 };
        rest = Some(&after[terminator..]);
        Some(line)
    })
}

fn has_media_type(content_type: &str, expected: &str) -> bool {
    content_type
        .split(';')
        .next()
        .is_some_and(|media_type| media_type.trim().eq_ignore_ascii_case(expected))
}

#[derive(Debug, Clone, Copy, PartialEq, Eq)]
enum RequestBodyError {
    TooLarge,
    Read,
}

async fn collect_request_body<B>(body: B, limit: usize) -> Result<Bytes, RequestBodyError>
where
    B: Body<Data = Bytes>,
{
    let initial_capacity = usize::try_from(body.size_hint().lower())
        .unwrap_or(limit)
        .min(limit);
    let mut captured = BytesMut::with_capacity(initial_capacity);
    let mut body = Box::pin(body);
    while let Some(frame) = body.as_mut().frame().await {
        let frame = frame.map_err(|_| RequestBodyError::Read)?;
        let Ok(data) = frame.into_data() else {
            continue;
        };
        let Some(next_len) = captured.len().checked_add(data.len()) else {
            return Err(RequestBodyError::TooLarge);
        };
        if next_len > limit {
            return Err(RequestBodyError::TooLarge);
        }
        captured.extend_from_slice(&data);
    }
    Ok(captured.freeze())
}

/// Internals reachable from the crate's property tests.
#[cfg(test)]
pub(crate) mod testing {
    use serde_json::Value;

    /// The reader as the totality properties want it: a response, or nothing.
    ///
    /// The production reader distinguishes the two ways there can be no
    /// response so that the metrics can; the totality properties do not care
    /// which one happened.
    pub(crate) fn terminal_response(content_type: &str, bytes: &[u8]) -> Option<Value> {
        super::terminal_response(content_type, bytes).ok()
    }
}

#[cfg(test)]
mod tests {
    use super::*;
    use crate::{InMemoryTenantStore, Tenant};
    use mcp_usage_core::{FreeReason, PriceBook};
    use mcp_usage_export::{
        AggregatedUsage, BatchExporter, BillingPipeline, ExportFuture, RecordError, UsageRecorder,
    };
    use tower::{ServiceBuilder, ServiceExt, service_fn};

    #[derive(Debug, Default)]
    struct CaptureExporter {
        exported: std::sync::Mutex<Vec<AggregatedUsage>>,
    }

    impl CaptureExporter {
        fn exported(&self) -> Vec<AggregatedUsage> {
            self.exported
                .lock()
                .unwrap_or_else(std::sync::PoisonError::into_inner)
                .clone()
        }
    }

    impl BatchExporter for CaptureExporter {
        fn export<'a>(&'a self, batch: &'a [AggregatedUsage]) -> ExportFuture<'a> {
            Box::pin(async move {
                self.exported
                    .lock()
                    .unwrap_or_else(std::sync::PoisonError::into_inner)
                    .extend_from_slice(batch);
                Ok(())
            })
        }
    }

    #[derive(Debug, Default)]
    struct RejectOnceRecorder {
        rejected: std::sync::atomic::AtomicBool,
        recorded: std::sync::Mutex<Vec<UsageEvent>>,
    }

    impl UsageRecorder for RejectOnceRecorder {
        fn record(&self, event: UsageEvent) -> Result<RecordOutcome, RecordError> {
            if !self
                .rejected
                .swap(true, std::sync::atomic::Ordering::SeqCst)
            {
                return Err(RecordError::Poisoned);
            }
            self.recorded
                .lock()
                .unwrap_or_else(std::sync::PoisonError::into_inner)
                .push(event);
            Ok(RecordOutcome::Recorded)
        }
    }

    fn request(method: &str, name: Option<&str>, body: &Value, key: &str) -> Request<Full<Bytes>> {
        let mut body = body.clone();
        if let Some(object) = body.as_object_mut() {
            object
                .entry("jsonrpc")
                .or_insert_with(|| Value::String("2.0".to_owned()));
            object
                .entry("method")
                .or_insert_with(|| Value::String(method.to_owned()));
        }
        let mut builder = Request::builder()
            .header(PROTOCOL_VERSION_HEADER, "2026-07-28")
            .header(METHOD_HEADER, method)
            .header(crate::API_KEY_HEADER, key);
        if let Some(name) = name {
            builder = builder.header(NAME_HEADER, name);
        }
        builder
            .body(Full::new(Bytes::from(body.to_string())))
            .unwrap()
    }

    fn response(body: &Value) -> Response<Full<Bytes>> {
        Response::builder()
            .header(CONTENT_TYPE, "application/json")
            .body(Full::new(Bytes::from(serde_json::to_vec(&body).unwrap())))
            .unwrap()
    }

    async fn consume(response: Response<MeterBody>) -> Bytes {
        response.into_body().collect().await.unwrap().to_bytes()
    }

    /// Release a body the way a transport does once `Content-Length` is met:
    /// take the data, then drop without ever polling to end-of-stream.
    fn release_without_end_of_stream(response: Response<MeterBody>) {
        let mut body = Box::pin(response.into_body());
        let mut context = Context::from_waker(std::task::Waker::noop());
        let _ = body.as_mut().poll_frame(&mut context);
        drop(body);
    }

    /// A future that pends exactly once, the way a store doing I/O behaves.
    struct YieldOnce(bool);

    impl Future for YieldOnce {
        type Output = ();
        fn poll(mut self: Pin<&mut Self>, context: &mut Context<'_>) -> Poll<()> {
            if self.0 {
                Poll::Ready(())
            } else {
                self.0 = true;
                context.waker().wake_by_ref();
                Poll::Pending
            }
        }
    }

    /// A task store that yields before answering, standing in for Redis or
    /// `PostgreSQL` without requiring either to be running.
    #[derive(Debug, Default)]
    struct YieldingTaskStore(InMemoryTaskStore);

    impl TaskAttributionStore for YieldingTaskStore {
        fn insert<'a>(
            &'a self,
            tenant_id: &'a str,
            task_id: &'a str,
            attribution: TaskAttribution,
        ) -> crate::TaskStoreFuture<'a, ()> {
            Box::pin(async move {
                YieldOnce(false).await;
                self.0.insert(tenant_id, task_id, attribution).await
            })
        }
        fn get<'a>(
            &'a self,
            tenant_id: &'a str,
            task_id: &'a str,
        ) -> crate::TaskStoreFuture<'a, Option<TaskAttribution>> {
            Box::pin(async move {
                YieldOnce(false).await;
                self.0.get(tenant_id, task_id).await
            })
        }
        fn claim<'a>(
            &'a self,
            tenant_id: &'a str,
            task_id: &'a str,
        ) -> crate::TaskStoreFuture<'a, Option<TaskAttribution>> {
            Box::pin(async move {
                YieldOnce(false).await;
                self.0.claim(tenant_id, task_id).await
            })
        }
        fn remove<'a>(
            &'a self,
            tenant_id: &'a str,
            task_id: &'a str,
        ) -> crate::TaskStoreFuture<'a, ()> {
            Box::pin(async move {
                YieldOnce(false).await;
                self.0.remove(tenant_id, task_id).await
            })
        }
    }

    /// Drive a `tools/call` that creates a task, then a `tasks/get` that reports
    /// it completed, releasing both bodies the way a real transport does.
    async fn run_task_lifecycle<S>(service: S)
    where
        S: tower::Service<Request<Full<Bytes>>, Response = Response<MeterBody>, Error = Infallible>
            + Clone
            + Send
            + 'static,
        S::Future: Send,
    {
        release_without_end_of_stream(
            service
                .clone()
                .oneshot(request(
                    "tools/call",
                    Some("long_job"),
                    &json!({"id":1,"params":{"name":"long_job"}}),
                    "secret",
                ))
                .await
                .unwrap(),
        );
        release_without_end_of_stream(
            service
                .oneshot(request(
                    "tasks/get",
                    None,
                    &json!({"id":2,"params":{"taskId":"task-1"}}),
                    "secret",
                ))
                .await
                .unwrap(),
        );
    }

    fn task_lifecycle_service(
        config: EdgeConfig,
    ) -> impl tower::Service<
        Request<Full<Bytes>>,
        Response = Response<MeterBody>,
        Error = Infallible,
        Future = impl Send,
    > + Clone
    + Send
    + 'static {
        let stage = Arc::new(std::sync::atomic::AtomicU64::new(0));
        ServiceBuilder::new()
            .layer(MeterLayer::new(config))
            .service(service_fn(move |_request: Request<Full<Bytes>>| {
                let n = stage.fetch_add(1, std::sync::atomic::Ordering::Relaxed);
                async move {
                    let result = if n == 0 {
                        json!({"resultType":"task","taskId":"task-1","status":"working"})
                    } else {
                        json!({"resultType":"complete","taskId":"task-1","status":"completed","result":{}})
                    };
                    Ok::<_, Infallible>(response(&json!({"jsonrpc":"2.0","id":n,"result":result})))
                }
            }))
    }

    fn task_tenants() -> Arc<InMemoryTenantStore> {
        let tenants = Arc::new(InMemoryTenantStore::new());
        tenants.insert_unchecked(
            "secret",
            Tenant::new("acme", "cus_acme")
                .with_prices(PriceBook::flat(1).with_name("long_job", 50)),
        );
        tenants
    }

    #[tokio::test]
    async fn a_store_that_yields_is_parked_rather_than_abandoned() {
        // A durable store performs I/O, so its future pends on the single poll
        // `Drop` can give it. Before this was parked, every durable-task charge
        // was lost: the attribution insert never landed, so the completing poll
        // had nothing to price.
        let config = EdgeConfig::new(task_tenants())
            .with_task_store(Arc::new(YieldingTaskStore::default()))
            .with_deferred_drain_per_request(0);
        let metrics = config.metrics();
        let deferred = config.deferred();

        run_task_lifecycle(task_lifecycle_service(config)).await;

        assert_eq!(
            metrics.snapshot().billed,
            0,
            "nothing can be billed while the store has not answered"
        );
        assert!(
            !deferred.is_empty(),
            "the unfinished accounting must be parked"
        );
        assert_eq!(deferred.dropped(), 0);

        // Draining is the context that can await, so this is where it lands.
        assert!(deferred.drain().await > 0);

        let snapshot = metrics.snapshot();
        assert_eq!(snapshot.billed, 1, "the completed task must be charged");
        assert_eq!(
            snapshot.billed_units, 50,
            "priced from the originating call"
        );
        assert_eq!(snapshot.record_failures, 0);
        assert!(deferred.is_empty());
    }

    #[tokio::test]
    async fn a_later_request_drains_parked_accounting_on_its_own() {
        // An application that never calls `drain` must still converge, so every
        // request runs a bounded amount of parked work.
        let config =
            EdgeConfig::new(task_tenants()).with_task_store(Arc::new(YieldingTaskStore::default()));
        let metrics = config.metrics();
        let deferred = config.deferred();
        let service = task_lifecycle_service(config);

        run_task_lifecycle(service.clone()).await;
        assert_eq!(metrics.snapshot().billed, 0);

        // Ordinary unrelated traffic, with no drain call anywhere.
        for id in 3..8 {
            release_without_end_of_stream(
                service
                    .clone()
                    .oneshot(request(
                        "tools/list",
                        None,
                        &json!({"id":id,"params":{}}),
                        "secret",
                    ))
                    .await
                    .unwrap(),
            );
        }

        assert_eq!(
            metrics.snapshot().billed,
            1,
            "subsequent requests must complete the parked accounting"
        );
        assert_eq!(metrics.snapshot().billed_units, 50);
        assert!(deferred.is_empty());
    }

    #[tokio::test]
    async fn malformed_and_unauthenticated_requests_do_not_poll_deferred_work() {
        let tenants = Arc::new(InMemoryTenantStore::new());
        tenants.insert_unchecked("secret", Tenant::new("acme", "cus_acme"));
        let config = EdgeConfig::new(tenants);
        let deferred = config.deferred();
        let polled = Arc::new(std::sync::atomic::AtomicUsize::new(0));
        assert!(deferred.park(Box::pin({
            let polled = Arc::clone(&polled);
            async move {
                polled.fetch_add(1, std::sync::atomic::Ordering::Relaxed);
            }
        })));
        let service = ServiceBuilder::new()
            .layer(MeterLayer::new(config))
            .service(service_fn(|_request: Request<Full<Bytes>>| async {
                Ok::<_, Infallible>(response(&json!({
                    "jsonrpc":"2.0","id":1,"result":{"resultType":"complete"}
                })))
            }));

        let mut malformed = request("tools/list", None, &json!({"id":1,"params":{}}), "secret");
        malformed.headers_mut().insert(
            PROTOCOL_VERSION_HEADER,
            http::HeaderValue::from_static("invalid"),
        );
        assert_eq!(
            service.clone().oneshot(malformed).await.unwrap().status(),
            StatusCode::BAD_REQUEST
        );
        assert_eq!(polled.load(std::sync::atomic::Ordering::Relaxed), 0);

        assert_eq!(
            service
                .clone()
                .oneshot(request(
                    "tools/list",
                    None,
                    &json!({"id":2,"params":{}}),
                    "wrong",
                ))
                .await
                .unwrap()
                .status(),
            StatusCode::UNAUTHORIZED
        );
        assert_eq!(polled.load(std::sync::atomic::Ordering::Relaxed), 0);
        assert_eq!(deferred.len(), 1);

        consume(
            service
                .oneshot(request(
                    "tools/list",
                    None,
                    &json!({"id":3,"params":{}}),
                    "secret",
                ))
                .await
                .unwrap(),
        )
        .await;
        assert_eq!(polled.load(std::sync::atomic::Ordering::Relaxed), 1);
        assert!(deferred.is_empty());
    }

    #[tokio::test]
    async fn recorder_rejection_restores_claimed_task_origin_for_a_later_poll() {
        let tasks = Arc::new(InMemoryTaskStore::new());
        let recorder = Arc::new(RejectOnceRecorder::default());
        let metrics_config = EdgeConfig::new(task_tenants())
            .with_task_store(tasks.clone())
            .with_recorder(recorder.clone());
        let metrics = metrics_config.metrics();
        let service = task_lifecycle_service(metrics_config);

        release_without_end_of_stream(
            service
                .clone()
                .oneshot(request(
                    "tools/call",
                    Some("long_job"),
                    &json!({"id":1,"params":{"name":"long_job"}}),
                    "secret",
                ))
                .await
                .unwrap(),
        );
        release_without_end_of_stream(
            service
                .clone()
                .oneshot(request(
                    "tasks/get",
                    None,
                    &json!({"id":2,"params":{"taskId":"task-1"}}),
                    "secret",
                ))
                .await
                .unwrap(),
        );
        assert_eq!(
            tasks.len(),
            1,
            "the rejected charge must restore its origin"
        );
        assert!(recorder.recorded.lock().unwrap().is_empty());

        release_without_end_of_stream(
            service
                .oneshot(request(
                    "tasks/get",
                    None,
                    &json!({"id":3,"params":{"taskId":"task-1"}}),
                    "secret",
                ))
                .await
                .unwrap(),
        );
        assert!(tasks.is_empty());
        let captured = recorder.recorded.lock().unwrap();
        assert_eq!(captured.len(), 1);
        assert_eq!(captured[0].units, 50);
        let snapshot = metrics.snapshot();
        assert_eq!(snapshot.billed, 1);
        assert_eq!(snapshot.record_failures, 1);
    }

    #[tokio::test]
    async fn a_free_verdict_puts_back_the_attribution_it_claimed() {
        // The claim deletes the attribution before the verdict is known, on
        // the assumption that a completed task bills. A `tasks/get` answering
        // with `resultType: "task"` reads as a task creation and comes back
        // free, so without a restore the charge is destroyed permanently and
        // every later poll reports a missing attribution.
        let tasks = Arc::new(InMemoryTaskStore::new());
        let config = EdgeConfig::new(task_tenants()).with_task_store(tasks.clone());
        let stage = Arc::new(std::sync::atomic::AtomicU64::new(0));
        let service = ServiceBuilder::new()
            .layer(MeterLayer::new(config))
            .service(service_fn(move |_request: Request<Full<Bytes>>| {
                let n = stage.fetch_add(1, std::sync::atomic::Ordering::Relaxed);
                async move {
                    let result = match n {
                        0 => json!({"resultType":"task","taskId":"task-1","status":"working"}),
                        // The odd shape: a task object, reported as one.
                        1 => json!({"resultType":"task","taskId":"task-1","status":"completed"}),
                        _ => json!({
                            "resultType":"complete",
                            "taskId":"task-1",
                            "status":"completed",
                            "result":{}
                        }),
                    };
                    Ok::<_, Infallible>(response(&json!({
                        "jsonrpc":"2.0","id":n,"result":result
                    })))
                }
            }));

        release_without_end_of_stream(
            service
                .clone()
                .oneshot(request(
                    "tools/call",
                    Some("long_job"),
                    &json!({"id":1,"params":{"name":"long_job"}}),
                    "secret",
                ))
                .await
                .unwrap(),
        );
        assert_eq!(tasks.len(), 1, "the creation stored an attribution");

        release_without_end_of_stream(
            service
                .clone()
                .oneshot(request(
                    "tasks/get",
                    None,
                    &json!({"id":2,"params":{"taskId":"task-1"}}),
                    "secret",
                ))
                .await
                .unwrap(),
        );
        assert_eq!(
            tasks.len(),
            1,
            "a free verdict must not consume the attribution"
        );

        // And the charge is still collectable on a poll the meter understands.
        release_without_end_of_stream(
            service
                .clone()
                .oneshot(request(
                    "tasks/get",
                    None,
                    &json!({"id":3,"params":{"taskId":"task-1"}}),
                    "secret",
                ))
                .await
                .unwrap(),
        );
        assert!(tasks.is_empty(), "the completing poll consumed it");
    }

    #[tokio::test]
    async fn an_idle_legacy_client_is_not_billed_for_lifecycle_traffic() {
        // A legacy request carries no protocol version, so it is classified
        // from its body. Promoting every bare `result` to a delivery bills
        // `ping` and `initialize`, which a connected client sends on a timer
        // forever while doing no work at all. A modern client on identical
        // traffic is billed nothing, so the bill is not even consistent.
        let tenants = Arc::new(InMemoryTenantStore::new());
        tenants.insert_unchecked("secret", Tenant::new("acme", "cus_acme"));
        let billing = Arc::new(BillingPipeline::new(CaptureExporter::default()));
        let config = EdgeConfig::new(tenants).with_recorder(billing.clone());
        let metrics = config.metrics();
        let service = ServiceBuilder::new()
            .layer(MeterLayer::new(config))
            .service(service_fn(|_request: Request<Full<Bytes>>| async {
                Ok::<_, Infallible>(response(&json!({"jsonrpc":"2.0","id":1,"result":{}})))
            }));

        for method in [
            "ping",
            "initialize",
            "logging/setLevel",
            "resources/subscribe",
        ] {
            let legacy = Request::builder()
                .method("POST")
                .header(crate::API_KEY_HEADER, "secret")
                .body(Full::new(Bytes::from(
                    json!({"jsonrpc":"2.0","id":1,"method":method}).to_string(),
                )))
                .unwrap();
            release_without_end_of_stream(service.clone().oneshot(legacy).await.unwrap());
        }

        assert_eq!(
            metrics.snapshot().billed,
            0,
            "lifecycle traffic must not be billed on the legacy path"
        );
    }

    #[tokio::test]
    async fn a_legacy_tool_call_is_still_billed_after_scoping_the_promotion() {
        // The regression guard for the fix: scoping the legacy promotion must
        // not make legacy tool calls free, which is what it exists to prevent.
        let tenants = Arc::new(InMemoryTenantStore::new());
        tenants.insert_unchecked(
            "secret",
            Tenant::new("acme", "cus_acme").with_prices(PriceBook::flat(4)),
        );
        let billing = Arc::new(BillingPipeline::new(CaptureExporter::default()));
        let config = EdgeConfig::new(tenants).with_recorder(billing.clone());
        let metrics = config.metrics();
        let service = ServiceBuilder::new()
            .layer(MeterLayer::new(config))
            .service(service_fn(|_request: Request<Full<Bytes>>| async {
                // No resultType at all, which is the shape the promotion is for.
                Ok::<_, Infallible>(response(&json!({"jsonrpc":"2.0","id":1,"result":{}})))
            }));

        let legacy = Request::builder()
            .method("POST")
            .header(crate::API_KEY_HEADER, "secret")
            .body(Full::new(Bytes::from(
                json!({"jsonrpc":"2.0","id":1,"method":"tools/call",
                       "params":{"name":"search"}})
                .to_string(),
            )))
            .unwrap();
        release_without_end_of_stream(service.oneshot(legacy).await.unwrap());

        assert_eq!(metrics.snapshot().billed, 1);
    }

    #[tokio::test]
    async fn missing_completed_task_id_preserves_origin_for_a_later_valid_poll() {
        let tasks = Arc::new(InMemoryTaskStore::new());
        let config = EdgeConfig::new(task_tenants()).with_task_store(tasks.clone());
        let metrics = config.metrics();
        let stage = Arc::new(std::sync::atomic::AtomicU64::new(0));
        let service = ServiceBuilder::new()
            .layer(MeterLayer::new(config))
            .service(service_fn(move |_request: Request<Full<Bytes>>| {
                let n = stage.fetch_add(1, std::sync::atomic::Ordering::Relaxed);
                async move {
                    let result = match n {
                        0 => json!({
                            "resultType":"task",
                            "taskId":"task-1",
                            "status":"working"
                        }),
                        1 => json!({
                            "resultType":"complete",
                            "status":"completed",
                            "result":{}
                        }),
                        _ => json!({
                            "resultType":"complete",
                            "taskId":"task-1",
                            "status":"completed",
                            "result":{}
                        }),
                    };
                    Ok::<_, Infallible>(response(&json!({
                        "jsonrpc":"2.0",
                        "id":n,
                        "result":result
                    })))
                }
            }));

        release_without_end_of_stream(
            service
                .clone()
                .oneshot(request(
                    "tools/call",
                    Some("long_job"),
                    &json!({"id":1,"params":{"name":"long_job"}}),
                    "secret",
                ))
                .await
                .unwrap(),
        );
        release_without_end_of_stream(
            service
                .clone()
                .oneshot(request(
                    "tasks/get",
                    None,
                    &json!({"id":2,"params":{"taskId":"task-1"}}),
                    "secret",
                ))
                .await
                .unwrap(),
        );

        assert_eq!(
            tasks.len(),
            1,
            "the malformed poll must not consume the origin"
        );
        assert_eq!(metrics.snapshot().billed, 0);

        release_without_end_of_stream(
            service
                .oneshot(request(
                    "tasks/get",
                    None,
                    &json!({"id":3,"params":{"taskId":"task-1"}}),
                    "secret",
                ))
                .await
                .unwrap(),
        );

        assert!(tasks.is_empty());
        let snapshot = metrics.snapshot();
        assert_eq!(snapshot.billed, 1);
        assert_eq!(snapshot.billed_units, 50);
    }

    #[tokio::test]
    async fn free_verdicts_reach_the_metrics_under_their_own_reason() {
        // The layer used to throw the reason away, which is the one thing the
        // enum exists to carry. Discovery traffic is normal; a completed task
        // that cannot be joined to its origin is lost revenue. Collapsed into
        // a single `free` counter the two are indistinguishable, so an
        // operator watching the dashboard cannot see the second happening.
        let config = EdgeConfig::new(task_tenants());
        let metrics = config.metrics();
        let service = ServiceBuilder::new()
            .layer(MeterLayer::new(config))
            .service(service_fn(|_request: Request<Full<Bytes>>| async move {
                Ok::<_, Infallible>(response(&json!({
                    "jsonrpc": "2.0",
                    "id": 1,
                    "result": {
                        "resultType": "complete",
                        "taskId": "task-unknown",
                        "status": "completed",
                        "content": []
                    }
                })))
            }));

        // Discovery: free, and unremarkable.
        consume(
            service
                .clone()
                .oneshot(request("tools/list", None, &json!({"id":1}), "secret"))
                .await
                .unwrap(),
        )
        .await;

        // A completed task nobody claimed: free, and a lost charge.
        consume(
            service
                .oneshot(request(
                    "tasks/get",
                    None,
                    &json!({"id":2,"params":{"taskId":"task-unknown"}}),
                    "secret",
                ))
                .await
                .unwrap(),
        )
        .await;

        let snapshot = metrics.snapshot();
        assert_eq!(snapshot.billed, 0);
        assert_eq!(snapshot.free, 2);
        assert_eq!(
            snapshot.free_by_reason[FreeReason::Discovery.index()],
            1,
            "the listing must land under discovery"
        );
        assert_eq!(
            snapshot.free_by_reason[FreeReason::MissingTaskAttribution.index()],
            1,
            "the orphaned completion must be separable from discovery"
        );
    }

    #[tokio::test]
    async fn a_synchronous_store_never_parks_anything() {
        // The default in-process store answers without yielding, so the common
        // deployment must not pay for the queue at all.
        let config = EdgeConfig::new(task_tenants());
        let metrics = config.metrics();
        let deferred = config.deferred();

        run_task_lifecycle(task_lifecycle_service(config)).await;

        let snapshot = metrics.snapshot();
        assert_eq!(snapshot.billed, 1);
        assert_eq!(snapshot.billed_units, 50);
        assert_eq!(snapshot.deferred, 0, "nothing should have been parked");
        assert!(deferred.is_empty());
    }

    /// A legacy client sends no mirrored headers at all. Before the body fallback the
    /// edge refused it outright, which shut out every client older than the mirrored
    /// headers - including the default configuration of MCP Inspector.
    #[tokio::test]
    async fn a_legacy_client_is_metered_from_its_body() {
        let tenants = Arc::new(InMemoryTenantStore::new());
        tenants.insert_unchecked(
            "secret",
            Tenant::new("acme", "cus_acme")
                .with_prices(PriceBook::flat(1).with_name("expensive", 25)),
        );
        let billing = Arc::new(BillingPipeline::new(CaptureExporter::default()));
        let config = EdgeConfig::new(tenants).with_recorder(billing.clone());
        let service = ServiceBuilder::new()
            .layer(MeterLayer::new(config))
            .service(service_fn(|_request: Request<Full<Bytes>>| async {
                Ok::<_, Infallible>(response(&json!({
                    "jsonrpc":"2.0","id":1,
                    "result":{"resultType":"complete","content":[]}
                })))
            }));

        // No MCP-Protocol-Version, no Mcp-Method, no Mcp-Name: only a JSON-RPC body.
        let legacy = Request::builder()
            .method("POST")
            .header(crate::API_KEY_HEADER, "secret")
            .body(Full::new(Bytes::from(
                json!({"jsonrpc":"2.0","id":1,"method":"tools/call",
                       "params":{"name":"expensive"}})
                .to_string(),
            )))
            .unwrap();

        let response = service.oneshot(legacy).await.unwrap();
        assert_eq!(response.status(), StatusCode::OK);
        consume(response).await;
        billing.flush().await.unwrap();
        assert_eq!(
            billing.exporter().exported()[0].units,
            25,
            "the body named the expensive tool, so the expensive price applies"
        );
    }

    /// The trap the fallback opens if nobody looks: a legacy server answers without a
    /// `resultType`, which the charge logic reads as unrecognized and bills as free.
    /// Admitting legacy clients without this would have handed out unlimited free usage.
    #[tokio::test]
    async fn a_legacy_response_without_a_result_type_is_still_billed() {
        let tenants = Arc::new(InMemoryTenantStore::new());
        tenants.insert_unchecked(
            "secret",
            Tenant::new("acme", "cus_acme").with_prices(PriceBook::flat(7)),
        );
        let billing = Arc::new(BillingPipeline::new(CaptureExporter::default()));
        let config = EdgeConfig::new(tenants).with_recorder(billing.clone());
        let service = ServiceBuilder::new()
            .layer(MeterLayer::new(config))
            .service(service_fn(|_request: Request<Full<Bytes>>| async {
                // No resultType: exactly what a server answering a legacy client sends.
                Ok::<_, Infallible>(response(&json!({
                    "jsonrpc":"2.0","id":1,"result":{"content":[]}
                })))
            }));

        let legacy = Request::builder()
            .method("POST")
            .header(crate::API_KEY_HEADER, "secret")
            .body(Full::new(Bytes::from(
                json!({"jsonrpc":"2.0","id":1,"method":"tools/call",
                       "params":{"name":"anything"}})
                .to_string(),
            )))
            .unwrap();

        let response = service.oneshot(legacy).await.unwrap();
        consume(response).await;
        billing.flush().await.unwrap();
        assert_eq!(
            billing.exporter().exported()[0].units,
            7,
            "a legacy result is delivered work and must be billed"
        );
    }

    /// The same absence on a modern response must stay free: there it means the meter
    /// did not understand the result, not that work was delivered.
    #[tokio::test]
    async fn a_modern_response_without_a_result_type_is_still_free() {
        let tenants = Arc::new(InMemoryTenantStore::new());
        tenants.insert_unchecked(
            "secret",
            Tenant::new("acme", "cus_acme").with_prices(PriceBook::flat(7)),
        );
        let billing = Arc::new(BillingPipeline::new(CaptureExporter::default()));
        let config = EdgeConfig::new(tenants).with_recorder(billing.clone());
        let service = ServiceBuilder::new()
            .layer(MeterLayer::new(config))
            .service(service_fn(|_request: Request<Full<Bytes>>| async {
                Ok::<_, Infallible>(response(&json!({
                    "jsonrpc":"2.0","id":1,"result":{"content":[]}
                })))
            }));

        let response = service
            .oneshot(request(
                "tools/call",
                Some("anything"),
                &json!({"id":1,"params":{"name":"anything"}}),
                "secret",
            ))
            .await
            .unwrap();
        consume(response).await;
        billing.flush().await.unwrap();
        assert!(
            billing.exporter().exported().is_empty(),
            "an unrecognized modern result must not be billed"
        );
    }

    /// The reason pricing on a legacy body is safe, stated as a test: the name is read
    /// from the document the origin executes. Claiming a cheap tool in the only place
    /// the meter looks means calling the cheap tool.
    #[tokio::test]
    async fn a_legacy_client_cannot_underpay_by_lying_about_the_tool() {
        let tenants = Arc::new(InMemoryTenantStore::new());
        tenants.insert_unchecked(
            "secret",
            Tenant::new("acme", "cus_acme")
                .with_prices(PriceBook::flat(1).with_name("expensive", 25)),
        );
        let billing = Arc::new(BillingPipeline::new(CaptureExporter::default()));
        let config = EdgeConfig::new(tenants).with_recorder(billing.clone());
        let seen: Arc<std::sync::Mutex<Option<String>>> = Arc::new(std::sync::Mutex::new(None));
        let observed = seen.clone();
        let service = ServiceBuilder::new()
            .layer(MeterLayer::new(config))
            .service(service_fn(move |request: Request<Full<Bytes>>| {
                let observed = observed.clone();
                async move {
                    let bytes = request.into_body().collect().await.unwrap().to_bytes();
                    let body: Value = serde_json::from_slice(&bytes).unwrap();
                    *observed.lock().unwrap() =
                        Some(body["params"]["name"].as_str().unwrap().into());
                    Ok::<_, Infallible>(response(&json!({
                        "jsonrpc":"2.0","id":1,
                        "result":{"resultType":"complete","content":[]}
                    })))
                }
            }));

        // Mirrored headers claim the cheap call; the body asks for the expensive one.
        // On a trusted revision the origin would reject the disagreement. Here the
        // headers are ignored entirely, so the body decides both price and execution.
        let lying = Request::builder()
            .method("POST")
            .header(crate::API_KEY_HEADER, "secret")
            .header(METHOD_HEADER, "tools/list")
            .header(NAME_HEADER, "cheap")
            .body(Full::new(Bytes::from(
                json!({"jsonrpc":"2.0","id":1,"method":"tools/call",
                       "params":{"name":"expensive"}})
                .to_string(),
            )))
            .unwrap();

        let response = service.oneshot(lying).await.unwrap();
        assert_eq!(response.status(), StatusCode::OK);
        consume(response).await;
        billing.flush().await.unwrap();
        assert_eq!(
            billing.exporter().exported()[0].units,
            25,
            "billed for what the origin ran, not what the headers claimed"
        );
        assert_eq!(
            seen.lock().unwrap().as_deref(),
            Some("expensive"),
            "the origin ran the tool the body named"
        );
    }

    /// Strict deployments keep the old behaviour.
    #[tokio::test]
    async fn strict_mode_still_refuses_legacy_clients() {
        let tenants = Arc::new(InMemoryTenantStore::new());
        tenants.insert_unchecked("secret", Tenant::new("acme", "cus_acme"));
        let config = EdgeConfig::new(tenants).with_strict_protocol_version(true);
        let service = ServiceBuilder::new()
            .layer(MeterLayer::new(config))
            .service(service_fn(|_request: Request<Full<Bytes>>| async {
                Ok::<_, Infallible>(response(&json!({
                    "jsonrpc":"2.0","id":1,"result":{"resultType":"complete"}
                })))
            }));

        let legacy = Request::builder()
            .method("POST")
            .header(crate::API_KEY_HEADER, "secret")
            .body(Full::new(Bytes::from(
                json!({"jsonrpc":"2.0","id":1,"method":"tools/list"}).to_string(),
            )))
            .unwrap();
        assert_eq!(
            service.oneshot(legacy).await.unwrap().status(),
            StatusCode::BAD_REQUEST
        );
    }

    /// The fallback must not become a way to spend server CPU without a credential.
    #[tokio::test]
    async fn an_unauthenticated_legacy_request_is_refused_before_its_body_is_read() {
        let tenants = Arc::new(InMemoryTenantStore::new());
        tenants.insert_unchecked("secret", Tenant::new("acme", "cus_acme"));
        let config = EdgeConfig::new(tenants);
        let service = ServiceBuilder::new()
            .layer(MeterLayer::new(config))
            .service(service_fn(|_request: Request<Full<Bytes>>| async {
                Ok::<_, Infallible>(response(&json!({
                    "jsonrpc":"2.0","id":1,"result":{"resultType":"complete"}
                })))
            }));

        // Unparseable body, no credential: the credential gate must answer first.
        let anonymous = Request::builder()
            .body(Full::new(Bytes::from_static(b"{{{ not json")))
            .unwrap();
        assert_eq!(
            service.oneshot(anonymous).await.unwrap().status(),
            StatusCode::UNAUTHORIZED,
            "an anonymous caller must not reach the JSON parser"
        );
    }

    #[tokio::test]
    async fn complete_tool_call_is_recorded_after_body_consumption() {
        let tenants = Arc::new(InMemoryTenantStore::new());
        tenants.insert_unchecked(
            "secret",
            Tenant::new("acme", "cus_acme")
                .with_prices(PriceBook::flat(1).with_name("expensive", 25)),
        );
        let billing = Arc::new(BillingPipeline::new(CaptureExporter::default()));
        let config = EdgeConfig::new(tenants).with_recorder(billing.clone());
        let service = ServiceBuilder::new()
            .layer(MeterLayer::new(config))
            .service(service_fn(|_request: Request<Full<Bytes>>| async {
                Ok::<_, Infallible>(response(&json!({
                    "jsonrpc":"2.0","id":1,
                    "result":{"resultType":"complete","content":[]}
                })))
            }));

        let response = service
            .oneshot(request(
                "tools/call",
                Some("expensive"),
                &json!({"jsonrpc":"2.0","id":1,"params":{"name":"expensive"}}),
                "secret",
            ))
            .await
            .unwrap();
        assert_eq!(billing.pending_buckets(), 0, "not billed before delivery");
        consume(response).await;
        assert_eq!(billing.pending_buckets(), 1);
        billing.flush().await.unwrap();
        assert_eq!(billing.exporter().exported()[0].units, 25);
    }

    #[tokio::test]
    async fn private_cache_never_crosses_authorization_contexts_and_rewrites_response_id() {
        let tenants = Arc::new(InMemoryTenantStore::new());
        tenants.insert_unchecked("key-a", Tenant::new("a", "cus_a"));
        // Even two credentials mapped to the same tenant are distinct
        // authorization contexts for private-cache purposes.
        tenants.insert_unchecked("key-b", Tenant::new("a", "cus_a"));
        let calls = Arc::new(std::sync::atomic::AtomicU64::new(0));
        let inner_calls = calls.clone();
        let config = EdgeConfig::new(tenants);
        let service = ServiceBuilder::new()
            .layer(MeterLayer::new(config))
            .service(service_fn(move |_request: Request<Full<Bytes>>| {
                inner_calls.fetch_add(1, std::sync::atomic::Ordering::Relaxed);
                async {
                    Ok::<_, Infallible>(response(&json!({
                        "jsonrpc":"2.0","id":1,
                        "result":{"resultType":"complete","tools":[],"ttlMs":60000,"cacheScope":"private"}
                    })))
                }
            }));

        let first = service
            .clone()
            .oneshot(request(
                "tools/list",
                None,
                &json!({"jsonrpc":"2.0","id":1,"params":{}}),
                "key-a",
            ))
            .await
            .unwrap();
        consume(first).await;

        let hit = service
            .clone()
            .oneshot(request(
                "tools/list",
                None,
                &json!({"jsonrpc":"2.0","id":99,"params":{}}),
                "key-a",
            ))
            .await
            .unwrap();
        assert_eq!(hit.headers()["x-mcp-usage-cache"], "hit");
        let hit_body: Value = serde_json::from_slice(&consume(hit).await).unwrap();
        assert_eq!(hit_body["id"], 99);

        let other = service
            .oneshot(request(
                "tools/list",
                None,
                &json!({"jsonrpc":"2.0","id":2,"params":{}}),
                "key-b",
            ))
            .await
            .unwrap();
        consume(other).await;
        assert_eq!(calls.load(std::sync::atomic::Ordering::Relaxed), 2);
    }

    #[tokio::test]
    async fn cache_hits_for_billable_resources_are_still_metered_on_delivery() {
        let tenants = Arc::new(InMemoryTenantStore::new());
        tenants.insert_unchecked(
            "secret",
            Tenant::new("acme", "cus_acme")
                .with_prices(PriceBook::flat(1).with_name("file:///report", 4)),
        );
        let billing = Arc::new(BillingPipeline::new(CaptureExporter::default()));
        let calls = Arc::new(std::sync::atomic::AtomicU64::new(0));
        let inner_calls = calls.clone();
        let service = ServiceBuilder::new()
            .layer(MeterLayer::new(
                EdgeConfig::new(tenants).with_recorder(billing.clone()),
            ))
            .service(service_fn(move |_request: Request<Full<Bytes>>| {
                inner_calls.fetch_add(1, std::sync::atomic::Ordering::Relaxed);
                async {
                    Ok::<_, Infallible>(response(&json!({
                        "jsonrpc":"2.0","id":1,
                        "result":{
                            "resultType":"complete",
                            "contents":[],
                            "ttlMs":60000,
                            "cacheScope":"private"
                        }
                    })))
                }
            }));

        for id in [1, 2] {
            consume(
                service
                    .clone()
                    .oneshot(request(
                        "resources/read",
                        Some("file:///report"),
                        &json!({"jsonrpc":"2.0","id":id,"params":{"uri":"file:///report"}}),
                        "secret",
                    ))
                    .await
                    .unwrap(),
            )
            .await;
        }
        assert_eq!(calls.load(std::sync::atomic::Ordering::Relaxed), 1);
        billing.flush().await.unwrap();
        assert_eq!(billing.exporter().exported()[0].units, 8);
    }

    #[tokio::test]
    async fn trace_context_reaches_the_rmcp_service_unchanged() {
        let tenants = Arc::new(InMemoryTenantStore::new());
        tenants.insert_unchecked("secret", Tenant::new("acme", "cus_acme"));
        let seen = Arc::new(std::sync::atomic::AtomicBool::new(false));
        let inner_seen = seen.clone();
        let service = ServiceBuilder::new()
            .layer(MeterLayer::new(EdgeConfig::new(tenants)))
            .service(service_fn(move |request: Request<Full<Bytes>>| {
                inner_seen.store(
                    request.headers().get("traceparent").is_some_and(|value| {
                        value == "00-4bf92f3577b34da6a3ce929d0e0e4736-00f067aa0ba902b7-01"
                    }),
                    std::sync::atomic::Ordering::Relaxed,
                );
                async {
                    Ok::<_, Infallible>(response(&json!({
                        "jsonrpc":"2.0","id":1,"result":{"resultType":"complete"}
                    })))
                }
            }));
        let mut request = request(
            "tools/call",
            Some("tool"),
            &json!({"id":1,"params":{"name":"tool"}}),
            "secret",
        );
        request.headers_mut().insert(
            "traceparent",
            http::HeaderValue::from_static(
                "00-4bf92f3577b34da6a3ce929d0e0e4736-00f067aa0ba902b7-01",
            ),
        );
        consume(service.oneshot(request).await.unwrap()).await;
        assert!(seen.load(std::sync::atomic::Ordering::Relaxed));
    }

    #[tokio::test]
    async fn task_completion_uses_origin_price_and_repeat_poll_is_free() {
        let tenants = Arc::new(InMemoryTenantStore::new());
        tenants.insert_unchecked(
            "secret",
            Tenant::new("acme", "cus_acme")
                .with_prices(PriceBook::flat(1).with_name("long_job", 50)),
        );
        let billing = Arc::new(BillingPipeline::new(CaptureExporter::default()));
        let stage = Arc::new(std::sync::atomic::AtomicU64::new(0));
        let inner_stage = stage.clone();
        let service = ServiceBuilder::new()
            .layer(MeterLayer::new(
                EdgeConfig::new(tenants).with_recorder(billing.clone()),
            ))
            .service(service_fn(move |_request: Request<Full<Bytes>>| {
                let n = inner_stage.fetch_add(1, std::sync::atomic::Ordering::Relaxed);
                async move {
                    let result = if n == 0 {
                        json!({"resultType":"task","taskId":"task-1","status":"working"})
                    } else {
                        json!({"resultType":"complete","taskId":"task-1","status":"completed","result":{}})
                    };
                    Ok::<_, Infallible>(response(&json!({"jsonrpc":"2.0","id":n,"result":result})))
                }
            }));

        consume(
            service
                .clone()
                .oneshot(request(
                    "tools/call",
                    Some("long_job"),
                    &json!({"id":1,"params":{"name":"long_job"}}),
                    "secret",
                ))
                .await
                .unwrap(),
        )
        .await;
        for id in [2, 3] {
            consume(
                service
                    .clone()
                    .oneshot(request(
                        "tasks/get",
                        None,
                        &json!({"id":id,"params":{"taskId":"task-1"}}),
                        "secret",
                    ))
                    .await
                    .unwrap(),
            )
            .await;
        }
        billing.flush().await.unwrap();
        let exported = billing.exporter().exported();
        assert_eq!(exported.len(), 1);
        assert_eq!(exported[0].units, 50);
    }

    #[tokio::test]
    async fn mismatched_task_response_cannot_bill_another_tasks_origin() {
        let tenants = Arc::new(InMemoryTenantStore::new());
        tenants.insert_unchecked(
            "secret",
            Tenant::new("acme", "cus_acme")
                .with_prices(PriceBook::flat(1).with_name("expensive", 100)),
        );
        let billing = Arc::new(BillingPipeline::new(CaptureExporter::default()));
        let stage = Arc::new(std::sync::atomic::AtomicU64::new(0));
        let inner_stage = stage.clone();
        let service = ServiceBuilder::new()
            .layer(MeterLayer::new(
                EdgeConfig::new(tenants).with_recorder(billing.clone()),
            ))
            .service(service_fn(move |_request: Request<Full<Bytes>>| {
                let n = inner_stage.fetch_add(1, std::sync::atomic::Ordering::Relaxed);
                async move {
                    let result = match n {
                        0 => json!({"resultType":"task","taskId":"task-1","status":"working"}),
                        1 => json!({"resultType":"task","taskId":"task-2","status":"working"}),
                        _ => json!({
                            "resultType":"complete",
                            "taskId":"task-2",
                            "status":"completed",
                            "result":{}
                        }),
                    };
                    Ok::<_, Infallible>(response(&json!({"jsonrpc":"2.0","id":n,"result":result})))
                }
            }));

        for (name, id) in [("cheap", 1), ("expensive", 2)] {
            consume(
                service
                    .clone()
                    .oneshot(request(
                        "tools/call",
                        Some(name),
                        &json!({"id":id,"params":{"name":name}}),
                        "secret",
                    ))
                    .await
                    .unwrap(),
            )
            .await;
        }
        consume(
            service
                .oneshot(request(
                    "tasks/get",
                    None,
                    &json!({"id":3,"params":{"taskId":"task-1"}}),
                    "secret",
                ))
                .await
                .unwrap(),
        )
        .await;
        assert_eq!(billing.flush().await.unwrap(), 0);
    }

    #[tokio::test]
    async fn accounting_runs_when_the_transport_stops_polling_early() {
        // A transport is not obliged to poll a body to end-of-stream. hyper
        // stops as soon as the declared Content-Length has been written, so
        // `poll_frame` never returns `Poll::Ready(None)` for an ordinary
        // fixed-length JSON result. Terminal accounting must survive that:
        // dropping the body is the only signal every transport gives us.
        //
        // This deliberately drives the body by hand rather than through
        // `BodyExt::collect`, which always polls to `None` and would hide the
        // regression this test exists to catch.
        let tenants = Arc::new(InMemoryTenantStore::new());
        tenants.insert_unchecked(
            "secret",
            Tenant::new("acme", "cus_acme").with_prices(PriceBook::flat(1).with_name("tool", 7)),
        );
        let billing = Arc::new(BillingPipeline::new(CaptureExporter::default()));
        let config = EdgeConfig::new(tenants).with_recorder(billing.clone());
        let metrics = config.metrics();
        let service = ServiceBuilder::new()
            .layer(MeterLayer::new(config))
            .service(service_fn(|_request: Request<Full<Bytes>>| async {
                Ok::<_, Infallible>(response(&json!({
                    "jsonrpc":"2.0","id":1,
                    "result":{"resultType":"complete","content":[]}
                })))
            }));

        let response = service
            .oneshot(request(
                "tools/call",
                Some("tool"),
                &json!({"id":1,"params":{"name":"tool"}}),
                "secret",
            ))
            .await
            .unwrap();

        let mut body = Box::pin(response.into_body());
        let mut context = Context::from_waker(std::task::Waker::noop());
        // Take the single data frame and then stop, exactly as a transport does
        // once it has satisfied Content-Length.
        assert!(
            matches!(
                body.as_mut().poll_frame(&mut context),
                Poll::Ready(Some(Ok(_)))
            ),
            "expected one data frame"
        );
        assert_eq!(
            metrics.snapshot().billed,
            0,
            "nothing should be billed before the body is released"
        );

        drop(body);

        let snapshot = metrics.snapshot();
        assert_eq!(
            snapshot.billed, 1,
            "the delivery must still be accounted for"
        );
        assert_eq!(snapshot.billed_units, 7);
        assert_eq!(snapshot.record_failures, 0);
        assert_eq!(billing.pending_buckets(), 1);
    }

    #[tokio::test]
    async fn a_fully_consumed_body_is_accounted_for_exactly_once() {
        // The guard against the Drop path double-counting what `poll_frame`
        // already recorded.
        let tenants = Arc::new(InMemoryTenantStore::new());
        tenants.insert_unchecked(
            "secret",
            Tenant::new("acme", "cus_acme").with_prices(PriceBook::flat(1).with_name("tool", 5)),
        );
        let config = EdgeConfig::new(tenants);
        let metrics = config.metrics();
        let service = ServiceBuilder::new()
            .layer(MeterLayer::new(config))
            .service(service_fn(|_request: Request<Full<Bytes>>| async {
                Ok::<_, Infallible>(response(&json!({
                    "jsonrpc":"2.0","id":1,
                    "result":{"resultType":"complete","content":[]}
                })))
            }));

        consume(
            service
                .oneshot(request(
                    "tools/call",
                    Some("tool"),
                    &json!({"id":1,"params":{"name":"tool"}}),
                    "secret",
                ))
                .await
                .unwrap(),
        )
        .await;

        let snapshot = metrics.snapshot();
        assert_eq!(snapshot.billed, 1);
        assert_eq!(snapshot.billed_units, 5);
    }

    #[tokio::test]
    async fn public_results_cross_tenants_only_when_sharing_is_enabled() {
        // Same scenario as the private-scope test above, but with the origin
        // declaring `cacheScope: "public"`. The origin call count is the
        // observable: two calls means tenant B was served from the origin, one
        // means it was served tenant A's cached body.
        for (share, expected_origin_calls) in [(false, 2), (true, 1)] {
            let tenants = Arc::new(InMemoryTenantStore::new());
            tenants.insert_unchecked("key-a", Tenant::new("a", "cus_a"));
            tenants.insert_unchecked("key-b", Tenant::new("b", "cus_b"));
            let calls = Arc::new(std::sync::atomic::AtomicU64::new(0));
            let inner_calls = calls.clone();
            let service = ServiceBuilder::new()
                .layer(MeterLayer::new(
                    EdgeConfig::new(tenants).with_public_cache_sharing(share),
                ))
                .service(service_fn(move |_request: Request<Full<Bytes>>| {
                    inner_calls.fetch_add(1, std::sync::atomic::Ordering::Relaxed);
                    async {
                        Ok::<_, Infallible>(response(&json!({
                            "jsonrpc":"2.0","id":1,
                            "result":{
                                "resultType":"complete","tools":[],
                                "ttlMs":60000,"cacheScope":"public"
                            }
                        })))
                    }
                }));

            for key in ["key-a", "key-b"] {
                consume(
                    service
                        .clone()
                        .oneshot(request(
                            "tools/list",
                            None,
                            &json!({"jsonrpc":"2.0","id":1,"params":{}}),
                            key,
                        ))
                        .await
                        .unwrap(),
                )
                .await;
            }

            assert_eq!(
                calls.load(std::sync::atomic::Ordering::Relaxed),
                expected_origin_calls,
                "with_public_cache_sharing({share})"
            );
        }
    }

    #[tokio::test]
    async fn the_consumed_credential_does_not_reach_the_inner_service() {
        let tenants = Arc::new(InMemoryTenantStore::new());
        tenants.insert_unchecked("secret", Tenant::new("acme", "cus_acme"));

        for (forward, expected) in [(false, false), (true, true)] {
            for bearer in [false, true] {
                let seen = Arc::new(std::sync::atomic::AtomicBool::new(false));
                let inner_seen = seen.clone();
                let service = ServiceBuilder::new()
                    .layer(MeterLayer::new(
                        EdgeConfig::new(tenants.clone()).with_credential_forwarding(forward),
                    ))
                    .service(service_fn(move |request: Request<Full<Bytes>>| {
                        let headers = request.headers();
                        inner_seen.store(
                            headers.contains_key(crate::API_KEY_HEADER)
                                || headers.contains_key(AUTHORIZATION),
                            std::sync::atomic::Ordering::Relaxed,
                        );
                        async {
                            Ok::<_, Infallible>(response(&json!({
                                "jsonrpc":"2.0","id":1,"result":{"resultType":"complete"}
                            })))
                        }
                    }));

                let mut call = request(
                    "tools/call",
                    Some("tool"),
                    &json!({"id":1,"params":{"name":"tool"}}),
                    "secret",
                );
                if bearer {
                    // Exactly one credential header may be present.
                    call.headers_mut().remove(crate::API_KEY_HEADER);
                    call.headers_mut().insert(
                        AUTHORIZATION,
                        http::HeaderValue::from_static("Bearer secret"),
                    );
                }
                consume(service.oneshot(call).await.unwrap()).await;

                assert_eq!(
                    seen.load(std::sync::atomic::Ordering::Relaxed),
                    expected,
                    "forwarding={forward} bearer={bearer}"
                );
            }
        }
    }

    #[tokio::test]
    async fn generated_responses_pin_their_content_type_and_stay_out_of_shared_caches() {
        let tenants = Arc::new(InMemoryTenantStore::new());
        tenants.insert_unchecked("key-a", Tenant::new("a", "cus_a"));
        let service = ServiceBuilder::new()
            .layer(MeterLayer::new(EdgeConfig::new(tenants)))
            .service(service_fn(|_request: Request<Full<Bytes>>| async {
                Ok::<_, Infallible>(response(&json!({
                    "jsonrpc":"2.0","id":1,
                    "result":{"resultType":"complete","tools":[],"ttlMs":60000,"cacheScope":"private"}
                })))
            }));

        // The rejection path echoes the offending header value back to the caller.
        let mut malformed = request("tools/list", None, &json!({"id":1,"params":{}}), "key-a");
        malformed.headers_mut().insert(
            PROTOCOL_VERSION_HEADER,
            http::HeaderValue::from_static("<not-a-date>"),
        );
        let rejected = service.clone().oneshot(malformed).await.unwrap();
        assert_eq!(rejected.status(), StatusCode::BAD_REQUEST);
        assert_eq!(rejected.headers()[X_CONTENT_TYPE_OPTIONS], "nosniff");
        assert_eq!(rejected.headers()[CACHE_CONTROL], "no-store");

        consume(
            service
                .clone()
                .oneshot(request(
                    "tools/list",
                    None,
                    &json!({"id":1,"params":{}}),
                    "key-a",
                ))
                .await
                .unwrap(),
        )
        .await;
        let hit = service
            .oneshot(request(
                "tools/list",
                None,
                &json!({"id":2,"params":{}}),
                "key-a",
            ))
            .await
            .unwrap();
        assert_eq!(hit.headers()["x-mcp-usage-cache"], "hit");
        assert_eq!(hit.headers()[X_CONTENT_TYPE_OPTIONS], "nosniff");
        assert_eq!(hit.headers()[CACHE_CONTROL], "private");
        consume(hit).await;
    }

    #[tokio::test]
    async fn sustained_guessing_is_refused_without_affecting_valid_keys() {
        let tenants = Arc::new(InMemoryTenantStore::new());
        tenants.insert_unchecked("secret", Tenant::new("acme", "cus_acme"));
        let config = EdgeConfig::new(tenants)
            .with_auth_failure_limit(3, std::time::Duration::from_secs(60))
            .unwrap();
        let metrics = config.metrics();
        let service = ServiceBuilder::new()
            .layer(MeterLayer::new(config))
            .service(service_fn(|_request: Request<Full<Bytes>>| async {
                Ok::<_, Infallible>(response(&json!({
                    "jsonrpc":"2.0","id":1,"result":{"resultType":"complete"}
                })))
            }));

        let guess = |key: &'static str| {
            let service = service.clone();
            async move {
                service
                    .oneshot(request(
                        "tools/list",
                        None,
                        &json!({"id":1,"params":{}}),
                        key,
                    ))
                    .await
                    .unwrap()
                    .status()
            }
        };

        for _ in 0..3 {
            assert_eq!(guess("wrong").await, StatusCode::UNAUTHORIZED);
        }
        assert_eq!(
            guess("wrong").await,
            StatusCode::TOO_MANY_REQUESTS,
            "sustained guessing must stop being answered"
        );

        // A valid key never consumed the budget, so it is still served.
        let allowed = service
            .clone()
            .oneshot(request(
                "tools/list",
                None,
                &json!({"id":9,"params":{}}),
                "secret",
            ))
            .await
            .unwrap();
        assert_eq!(
            allowed.status(),
            StatusCode::OK,
            "throttling guessers must not lock out legitimate callers"
        );
        consume(allowed).await;

        let snapshot = metrics.snapshot();
        assert_eq!(snapshot.unauthenticated, 3);
        assert_eq!(snapshot.throttled, 1);
    }

    #[tokio::test]
    async fn credential_failures_are_counted_apart_from_header_failures() {
        let tenants = Arc::new(InMemoryTenantStore::new());
        tenants.insert_unchecked("secret", Tenant::new("acme", "cus_acme"));
        let config = EdgeConfig::new(tenants);
        let metrics = config.metrics();
        let service = ServiceBuilder::new()
            .layer(MeterLayer::new(config))
            .service(service_fn(|_request: Request<Full<Bytes>>| async {
                Ok::<_, Infallible>(response(&json!({"result": {}})))
            }));

        let unknown_key = service
            .clone()
            .oneshot(request(
                "tools/list",
                None,
                &json!({"id":1,"params":{}}),
                "wrong",
            ))
            .await
            .unwrap();
        assert_eq!(unknown_key.status(), StatusCode::UNAUTHORIZED);

        // Classification runs before authentication, so this never reaches the
        // credential gate and must land on the other counter. A malformed version is
        // the case that still rejects on headers alone: a legacy one now falls back to
        // the body instead.
        let mut malformed = request("tools/list", None, &json!({"id":1,"params":{}}), "secret");
        malformed.headers_mut().insert(
            PROTOCOL_VERSION_HEADER,
            http::HeaderValue::from_static("not-a-date"),
        );
        assert_eq!(
            service.oneshot(malformed).await.unwrap().status(),
            StatusCode::BAD_REQUEST
        );

        let snapshot = metrics.snapshot();
        assert_eq!(snapshot.unauthenticated, 1);
        assert_eq!(snapshot.rejected, 1);
    }

    #[test]
    fn the_bearer_scheme_is_matched_case_insensitively() {
        // RFC 7235 makes the scheme name case-insensitive, so all of these are
        // the same credential and none of them is a wrong key.
        for header in [
            "Bearer secret",
            "bearer secret",
            "BEARER secret",
            "BeArEr secret",
            // RFC 7235 allows more than one space before the token.
            "Bearer   secret",
        ] {
            assert_eq!(bearer_token(header), Some("secret"), "{header}");
        }

        // A different scheme is still not a bearer token.
        for header in ["Basic secret", "Bearersecret", "secret", "", " secret"] {
            assert_ne!(bearer_token(header), Some("secret"), "{header}");
        }
    }

    #[tokio::test]
    async fn a_lowercase_bearer_credential_authenticates() {
        let tenants = Arc::new(InMemoryTenantStore::new());
        tenants.insert_unchecked("secret", Tenant::new("acme", "cus_acme"));
        let service = ServiceBuilder::new()
            .layer(MeterLayer::new(EdgeConfig::new(tenants)))
            .service(service_fn(|_request: Request<Full<Bytes>>| async {
                Ok::<_, Infallible>(response(&json!({
                    "jsonrpc":"2.0","id":1,"result":{"resultType":"complete"}
                })))
            }));

        let mut call = request("tools/list", None, &json!({"id":1,"params":{}}), "secret");
        call.headers_mut().remove(crate::API_KEY_HEADER);
        call.headers_mut().insert(
            AUTHORIZATION,
            http::HeaderValue::from_static("bearer secret"),
        );

        assert_eq!(
            service.oneshot(call).await.unwrap().status(),
            StatusCode::OK
        );
    }

    #[test]
    fn zero_authentication_failure_window_is_rejected() {
        let tenants = Arc::new(InMemoryTenantStore::new());
        assert_eq!(
            EdgeConfig::new(tenants)
                .with_auth_failure_limit(3, Duration::ZERO)
                .unwrap_err(),
            EdgeConfigError::InvalidAuthFailureWindow
        );
    }

    #[test]
    fn extracts_terminal_response_from_sse_without_confusing_notifications() {
        let stream = b"data: {\"jsonrpc\":\"2.0\",\"method\":\"notifications/progress\"}\n\n\
                       : keepalive\n\n\
                       data: {\"jsonrpc\":\"2.0\",\"id\":1,\"result\":{\"resultType\":\"complete\"}}\n\n";
        let terminal = terminal_response("text/event-stream", stream).unwrap();
        assert_eq!(terminal["id"], 1);
    }

    #[test]
    fn extracts_terminal_response_from_sse_with_mixed_line_endings() {
        let stream = b"data: {\"jsonrpc\":\"2.0\",\"method\":\"notifications/progress\"}\r\r\
                       : keepalive\r\n\r\n\
                       data: {\"jsonrpc\":\"2.0\",\"id\":7,\r\
                       data: \"result\":{\"resultType\":\"complete\"}}\n\n";
        let terminal = terminal_response("text/event-stream", stream).unwrap();
        assert_eq!(terminal["id"], 7);
    }

    #[test]
    fn well_formed_json_that_is_not_a_response_is_not_terminal() {
        // Found by the property test in `properties.rs`. `application/json` used
        // to accept anything that parsed, so a bare scalar counted as a terminal
        // response while the SSE path required a JSON-RPC shape. Both now apply
        // the same test. Nothing was billable either way, but the two transports
        // classified the same body differently.
        for body in [
            b"0".as_slice(),
            b"null".as_slice(),
            b"\"a string\"".as_slice(),
            b"[]".as_slice(),
            b"{}".as_slice(),
            br#"{"jsonrpc":"2.0","id":1}"#.as_slice(),
        ] {
            assert_eq!(
                terminal_response("application/json", body),
                Err(UnaccountedReason::Unparseable),
                "{} is not a JSON-RPC response",
                String::from_utf8_lossy(body)
            );
        }

        // The shapes that are responses still are.
        assert!(
            terminal_response(
                "application/json",
                br#"{"jsonrpc":"2.0","id":1,"result":{"resultType":"complete"}}"#,
            )
            .is_ok()
        );
        assert!(
            terminal_response(
                "application/json",
                br#"{"jsonrpc":"2.0","id":1,"error":{"code":-32020}}"#,
            )
            .is_ok()
        );
    }

    #[tokio::test]
    async fn an_origin_that_declares_no_media_type_bills_nothing_and_says_so() {
        // The misconfiguration that costs the most: an origin behind a proxy
        // that strips headers, or a hand-rolled server that never sets one,
        // delivering real work and billing zero for all of it. Refusing to
        // charge is the deliberate policy; being unable to tell that it is
        // happening was the defect.
        let config = EdgeConfig::new(task_tenants());
        let metrics = config.metrics();
        let service = ServiceBuilder::new()
            .layer(MeterLayer::new(config))
            .service(service_fn(|_request: Request<Full<Bytes>>| async move {
                // A textbook terminal response, with no `Content-Type` at all.
                Ok::<_, Infallible>(
                    Response::builder()
                        .body(Full::new(Bytes::from(
                            json!({
                                "jsonrpc": "2.0",
                                "id": 1,
                                "result": {"resultType": "complete", "content": []}
                            })
                            .to_string(),
                        )))
                        .unwrap(),
                )
            }));

        consume(
            service
                .oneshot(request(
                    "tools/call",
                    Some("long_job"),
                    &json!({"id": 1, "params": {"name": "long_job"}}),
                    "secret",
                ))
                .await
                .unwrap(),
        )
        .await;

        let snapshot = metrics.snapshot();
        assert_eq!(snapshot.billed, 0, "an undeclared body is never charged");
        assert_eq!(snapshot.unrecognized_responses, 1);
        assert_eq!(
            snapshot.unrecognized_by_reason[UnaccountedReason::MediaType.index()],
            1,
            "the cause must be attributable to the media type, not to a \
             capture overflow or an unparseable body"
        );
        assert_eq!(
            snapshot.unrecognized_by_reason[UnaccountedReason::Unparseable.index()],
            0
        );
        assert_eq!(
            snapshot.unrecognized_by_reason[UnaccountedReason::Oversized.index()],
            0
        );
    }

    #[test]
    fn content_type_matching_requires_an_exact_media_type() {
        assert!(has_media_type(
            "Application/JSON; charset=utf-8",
            "application/json"
        ));
        assert!(!has_media_type("application/jsonp", "application/json"));

        // A declared media type the meter does not read is its own cause. An
        // operator seeing this climb has a misconfigured origin billing
        // nothing, which is not the same incident as a body that was read and
        // turned out not to be a response.
        assert_eq!(
            terminal_response("application/jsonp", b"{}"),
            Err(UnaccountedReason::MediaType)
        );
        assert!(
            terminal_response(
                "application/json",
                br#"{"jsonrpc":"2.0","id":1,"result":{"resultType":"complete"}}"#
            )
            .is_ok()
        );
    }

    #[tokio::test]
    async fn oversized_request_bodies_are_rejected_before_the_origin() {
        let tenants = Arc::new(InMemoryTenantStore::new());
        tenants.insert_unchecked("secret", Tenant::new("acme", "cus_acme"));
        let calls = Arc::new(std::sync::atomic::AtomicU64::new(0));
        let inner_calls = calls.clone();
        let service = ServiceBuilder::new()
            .layer(MeterLayer::new(
                EdgeConfig::new(tenants).with_max_request_body(16),
            ))
            .service(service_fn(move |_request: Request<Full<Bytes>>| {
                inner_calls.fetch_add(1, std::sync::atomic::Ordering::Relaxed);
                async { Ok::<_, Infallible>(response(&json!({"result": {}}))) }
            }));

        let response = service
            .oneshot(request(
                "tools/call",
                Some("tool"),
                &json!({"id":1,"params":{"name":"tool","payload":"too large"}}),
                "secret",
            ))
            .await
            .unwrap();
        assert_eq!(response.status(), StatusCode::PAYLOAD_TOO_LARGE);
        assert_eq!(calls.load(std::sync::atomic::Ordering::Relaxed), 0);
    }

    #[tokio::test]
    async fn ambiguous_or_duplicate_security_headers_are_rejected() {
        let tenants = Arc::new(InMemoryTenantStore::new());
        tenants.insert_unchecked("secret", Tenant::new("acme", "cus_acme"));
        let service = ServiceBuilder::new()
            .layer(MeterLayer::new(EdgeConfig::new(tenants)))
            .service(service_fn(|_request: Request<Full<Bytes>>| async {
                Ok::<_, Infallible>(response(&json!({"result": {}})))
            }));

        let mut ambiguous = request("tools/list", None, &json!({"id":1,"params":{}}), "secret");
        ambiguous.headers_mut().insert(
            AUTHORIZATION,
            http::HeaderValue::from_static("Bearer secret"),
        );
        assert_eq!(
            service.clone().oneshot(ambiguous).await.unwrap().status(),
            StatusCode::UNAUTHORIZED
        );

        let mut duplicate = request("tools/list", None, &json!({"id":1,"params":{}}), "secret");
        duplicate
            .headers_mut()
            .append(METHOD_HEADER, http::HeaderValue::from_static("tools/list"));
        assert_eq!(
            service.oneshot(duplicate).await.unwrap().status(),
            StatusCode::BAD_REQUEST
        );
    }

    #[tokio::test]
    async fn a_header_body_mismatch_cannot_use_the_cache() {
        let tenants = Arc::new(InMemoryTenantStore::new());
        tenants.insert_unchecked("secret", Tenant::new("acme", "cus_acme"));
        let calls = Arc::new(std::sync::atomic::AtomicU64::new(0));
        let inner_calls = calls.clone();
        let service = ServiceBuilder::new()
            .layer(MeterLayer::new(EdgeConfig::new(tenants)))
            .service(service_fn(move |_request: Request<Full<Bytes>>| {
                inner_calls.fetch_add(1, std::sync::atomic::Ordering::Relaxed);
                async {
                    Ok::<_, Infallible>(response(&json!({
                        "id":1,
                        "result":{
                            "resultType":"complete",
                            "tools":[],
                            "ttlMs":60000,
                            "cacheScope":"private"
                        }
                    })))
                }
            }));

        consume(
            service
                .clone()
                .oneshot(request(
                    "tools/list",
                    None,
                    &json!({"id":1,"params":{}}),
                    "secret",
                ))
                .await
                .unwrap(),
        )
        .await;
        consume(
            service
                .oneshot(request(
                    "tools/list",
                    None,
                    &json!({"id":2,"method":"resources/list","params":{}}),
                    "secret",
                ))
                .await
                .unwrap(),
        )
        .await;
        assert_eq!(calls.load(std::sync::atomic::Ordering::Relaxed), 2);
    }
}