base-http1 0.2.0

// Released under the MIT License.
// Copyright, 2026, by Samuel Williams.

use crate::{Error, Exchange, wire};
use base_endpoint::stream::WritableStream;
use base_http::{
    InterimHandler, Response, ResponseMetadata, Status, Version,
    body::{BodyFrame, ReadableBody},
};
use base_scheduler::Cancellation;
use std::{
    future::{Future, poll_fn},
    io,
    pin::pin,
    task::Poll,
};

async fn wait<F: Future>(future: F, cancellation: &Cancellation) -> Result<F::Output, Error> {
    if cancellation.is_never() {
        return Ok(future.await);
    }
    let mut future = pin!(future);
    let mut cancelled = pin!(cancellation.cancelled());
    poll_fn(|cx| {
        if cancelled.as_mut().poll(cx).is_ready() {
            return Poll::Ready(Err(Error::Cancelled));
        }
        future.as_mut().poll(cx).map(Ok)
    })
    .await
}

// Bound copied output independently of the number or size of body chunks.
const OUTPUT_BATCH_LIMIT: usize = 16 * 1024;

async fn send_all<W: WritableStream>(
    writer: &mut W,
    mut bytes: &[u8],
    cancellation: &Cancellation,
) -> Result<(), Error> {
    while !bytes.is_empty() {
        let n = writer.write(bytes, cancellation).await?;
        if n == 0 {
            return Err(
                io::Error::new(io::ErrorKind::WriteZero, "HTTP output made no progress").into(),
            );
        }
        bytes = &bytes[n..];
    }
    Ok(())
}

/// The response lane. A partially sent or abandoned response permanently
/// poisons admission. The owner must still await `close` to retire the backend.
pub struct ResponseWriter<W> {
    writer: W,
    pending: Vec<u8>,
    usable: bool,
    continue_sent: bool,
}

impl<W: WritableStream> ResponseWriter<W> {
    pub fn new(writer: W) -> Self {
        Self {
            writer,
            pending: Vec::new(),
            usable: true,
            continue_sent: false,
        }
    }
    pub fn is_usable(&self) -> bool {
        self.usable
    }
    pub fn interim(&mut self, version: Version) -> InterimWriter<'_, W> {
        InterimWriter {
            output: self,
            version,
        }
    }

    /// Best-effort rejection for invalid input, followed by connection closure.
    pub async fn reject(
        &mut self,
        status: Status,
        cancellation: &Cancellation,
    ) -> Result<(), Error> {
        cancellation.check()?;
        if !self.usable {
            return Err(Error::Invalid("response output is not reusable"));
        }
        self.usable = false;
        self.write_start_line(status, Version::Http11);
        self.buffer(b"Content-Length: 0\r\nConnection: close\r\n\r\n");
        self.flush(cancellation).await
    }

    pub(crate) async fn write_all(
        &mut self,
        bytes: &[u8],
        cancellation: &Cancellation,
    ) -> Result<(), Error> {
        cancellation.check()?;
        if bytes.len() > OUTPUT_BATCH_LIMIT - self.pending.len() {
            self.send_pending(cancellation).await?;
        }
        if bytes.len() >= OUTPUT_BATCH_LIMIT {
            // Large chunks retain their existing owner and are not copied.
            return send_all(&mut self.writer, bytes, cancellation).await;
        }
        self.buffer(bytes);
        Ok(())
    }

    fn reserve(&mut self, additional: usize) {
        let required = self.pending.len() + additional;
        if required > self.pending.capacity() {
            let capacity = required
                .max(self.pending.capacity().saturating_mul(2))
                .clamp(256, OUTPUT_BATCH_LIMIT);
            self.pending.reserve_exact(capacity - self.pending.len());
        }
    }

    async fn send_pending(&mut self, cancellation: &Cancellation) -> Result<(), Error> {
        // The lane is already poisoned while sending. On error/cancellation the
        // retained prefix must never be retried by a subsequent message or close.
        send_all(&mut self.writer, &self.pending, cancellation).await?;
        self.pending.clear();
        Ok(())
    }

    fn buffer(&mut self, bytes: &[u8]) {
        self.reserve(bytes.len());
        self.pending.extend_from_slice(bytes);
    }

    // Every message starts with an empty batch, since the previous message or interim head was flushed, so its start line always fits.
    fn write_start_line(&mut self, status: Status, version: Version) {
        if status == Status::OK && version == Version::Http11 {
            self.buffer(b"HTTP/1.1 200 OK\r\n");
            return;
        }
        let version = match version {
            Version::Http10 => b"HTTP/1.0 ",
            Version::Http11 => b"HTTP/1.1 ",
            _ => unreachable!("HTTP/1 exchanges and interim writers are HTTP/1.0 or HTTP/1.1"),
        };
        let status_code = status.as_u16();
        let code = [
            b'0' + (status_code / 100) as u8,
            b'0' + (status_code / 10 % 10) as u8,
            b'0' + (status_code % 10) as u8,
            b' ',
        ];
        let reason = status.description().unwrap_or("").as_bytes();
        self.reserve(version.len() + code.len() + reason.len() + 2);
        self.pending.extend_from_slice(version);
        self.pending.extend_from_slice(&code);
        self.pending.extend_from_slice(reason);
        self.pending.extend_from_slice(b"\r\n");
    }

    async fn write_fields(
        &mut self,
        fields: &[base_http::Field],
        cancellation: &Cancellation,
    ) -> Result<(), Error> {
        for field in fields {
            self.write_field(field.name(), field.value(), cancellation)
                .await?;
        }
        Ok(())
    }

    async fn write_field(
        &mut self,
        name: &str,
        value: &[u8],
        cancellation: &Cancellation,
    ) -> Result<(), Error> {
        let size = name.len().saturating_add(value.len()).saturating_add(4);
        if size <= OUTPUT_BATCH_LIMIT - self.pending.len() {
            self.reserve(size);
            self.pending.extend_from_slice(name.as_bytes());
            self.pending.extend_from_slice(b": ");
            self.pending.extend_from_slice(value);
            self.pending.extend_from_slice(b"\r\n");
            return Ok(());
        }
        self.write_all(name.as_bytes(), cancellation).await?;
        self.write_all(b": ", cancellation).await?;
        self.write_all(value, cancellation).await?;
        self.write_all(b"\r\n", cancellation).await
    }

    async fn write_plan(
        &mut self,
        plan: &Plan<'_>,
        cancellation: &Cancellation,
    ) -> Result<(), Error> {
        self.write_start_line(plan.response.status, plan.version);
        for field in plan.response.fields.pairs() {
            if (plan.upgrade.is_some() && field.name().eq_ignore_ascii_case("upgrade"))
                || (matches!(plan.framing, Framing::Chunked(_))
                    && field.name().eq_ignore_ascii_case("content-length"))
            {
                continue;
            }
            self.write_field(field.name(), field.value(), cancellation)
                .await?;
        }
        if let Some(protocol) = plan.upgrade {
            self.write_field("Upgrade", protocol, cancellation).await?;
        }
        if plan.connection_upgrade {
            self.write_field("Connection", b"upgrade", cancellation)
                .await?;
        }
        if let Some(length) = plan.content_length {
            let mut digits = [0; 20];
            let bytes = decimal(length, &mut digits);
            self.write_field("Content-Length", bytes, cancellation)
                .await?;
        }
        if plan.chunked {
            self.write_field("Transfer-Encoding", b"chunked", cancellation)
                .await?;
        }
        if let Some(option) = plan.connection {
            self.write_field("Connection", option, cancellation).await?;
        }
        self.write_all(b"\r\n", cancellation).await
    }

    /// Write one final response. `true` means output permits persistence; the
    /// connection owner must also finish input and join concurrent work before
    /// admitting another request. Discarded input disables persistence.
    pub async fn write_response<B: ReadableBody>(
        &mut self,
        exchange: &Exchange,
        response: &mut Response<B>,
        cancellation: &Cancellation,
    ) -> Result<bool, Error> {
        let result = self
            .write_response_inner(exchange, response, cancellation)
            .await;
        response.body.close(None);
        result
    }

    async fn write_response_inner<B: ReadableBody>(
        &mut self,
        exchange: &Exchange,
        response: &mut Response<B>,
        cancellation: &Cancellation,
    ) -> Result<bool, Error> {
        cancellation.check()?;
        if !self.usable {
            return Err(Error::Invalid("response output is not reusable"));
        }
        let (framing, persistent, tunnel) = {
            let plan = plan(
                exchange,
                &response.metadata,
                response.body.length(),
                response.body.may_have_trailers(),
            )?;
            if plan.tunnel
                && response.metadata.status == Status::SWITCHING_PROTOCOLS
                && !self.continue_sent
                && exchange.expects_continue()
            {
                self.interim(Version::Http11)
                    .on_interim_response(ResponseMetadata::new(Status::CONTINUE), cancellation)
                    .await?;
            }
            self.usable = false;
            self.write_plan(&plan, cancellation).await?;
            if plan.tunnel {
                // Commit the handshake before the first potentially blocking input read.
                self.flush(cancellation).await?;
                exchange.switch();
            }
            (plan.framing, plan.persistent, plan.tunnel)
        };
        self.write_body(
            &mut response.body,
            framing,
            !tunnel && response.metadata.status == Status::RESET_CONTENT,
            cancellation,
        )
        .await?;
        self.usable = persistent;
        self.continue_sent = false;
        Ok(persistent)
    }

    pub(crate) fn begin(&mut self) -> Result<(), Error> {
        if !self.usable {
            return Err(Error::Invalid("output is not reusable"));
        }
        self.usable = false;
        Ok(())
    }

    pub(crate) fn completed(&mut self, persistent: bool) {
        self.usable = persistent;
    }

    pub(crate) async fn flush(&mut self, cancellation: &Cancellation) -> Result<(), Error> {
        self.send_pending(cancellation).await?;
        Ok(self.writer.flush(cancellation).await?)
    }

    pub(crate) async fn write_body<B: ReadableBody>(
        &mut self,
        body: &mut B,
        framing: Framing,
        forbid_content: bool,
        cancellation: &Cancellation,
    ) -> Result<(), Error> {
        if !matches!(framing, Framing::Absent) {
            let mut encoding = BodyEncoder::new(framing, forbid_content);
            loop {
                if !body.is_ready() {
                    self.flush(cancellation).await?;
                }
                let frame = {
                    let reading = pin!(body.read(cancellation));
                    let mut read = pin!(wait(reading, cancellation));
                    let ready = poll_fn(|cx| Poll::Ready(read.as_mut().poll(cx))).await;
                    match ready {
                        Poll::Ready(result) => result,
                        Poll::Pending => {
                            self.flush(cancellation).await?;
                            read.await
                        }
                    }
                }?
                .map_err(|e| {
                    if cancellation.is_cancelled() {
                        Error::Cancelled
                    } else {
                        Error::Body(Box::new(e))
                    }
                })?;
                let end = frame.is_end();
                encoding.write_frame(self, frame, cancellation).await?;
                if end {
                    break;
                }
            }
        }
        self.flush(cancellation).await?;
        Ok(())
    }

    pub async fn close(&mut self) -> io::Result<()> {
        self.usable = false;
        self.pending.clear();
        self.writer.close().await
    }
}

/// Statically dispatched interim-response hook borrowing the output lane.
pub struct InterimWriter<'a, W> {
    output: &'a mut ResponseWriter<W>,
    version: Version,
}

impl<W: WritableStream> InterimHandler for InterimWriter<'_, W> {
    type Error = Error;
    async fn on_interim_response(
        &mut self,
        response: ResponseMetadata,
        cancellation: &Cancellation,
    ) -> Result<(), Error> {
        cancellation.check()?;
        if !self.output.usable {
            return Err(Error::Invalid("response output is not reusable"));
        }
        if !response.status.is_informational() || response.status == Status::SWITCHING_PROTOCOLS {
            return Err(Error::Invalid("invalid interim status"));
        }
        if self.version != Version::Http11 {
            return Err(Error::Invalid("HTTP/1.0 interim response"));
        }
        if response.fields.contains("content-length")
            || response.fields.contains("transfer-encoding")
            || response.content_length.is_some()
            || response.protocol.is_some()
        {
            return Err(Error::Invalid("invalid interim framing"));
        }
        wire::output_fields(response.fields.pairs())?;
        self.output.usable = false;
        self.output.write_start_line(response.status, self.version);
        self.output
            .write_fields(response.fields.pairs(), cancellation)
            .await?;
        self.output.write_all(b"\r\n", cancellation).await?;
        self.output.flush(cancellation).await?;
        if response.status == Status::CONTINUE {
            self.output.continue_sent = true;
        }
        self.output.usable = true;
        Ok(())
    }
}

#[derive(Clone, Copy)]
pub(crate) enum Framing {
    Absent,
    Fixed(u64),
    Chunked(Option<u64>),
    Raw,
}
/// Incremental body framing shared by pull and imperative output. The owner
/// poisons its lane before entering this state and restores reuse only at EOF.
pub(crate) struct BodyEncoder {
    framing: Framing,
    total: u64,
    trailers: Option<base_http::Fields>,
    forbid_content: bool,
}
impl BodyEncoder {
    pub(crate) fn end_requires_output(&self) -> bool {
        matches!(self.framing, Framing::Chunked(_))
    }
    pub(crate) fn new(framing: Framing, forbid_content: bool) -> Self {
        Self {
            framing,
            total: 0,
            trailers: None,
            forbid_content,
        }
    }
    pub(crate) async fn write_frame<W: WritableStream, D: AsRef<[u8]>>(
        &mut self,
        output: &mut ResponseWriter<W>,
        frame: BodyFrame<D>,
        cancellation: &Cancellation,
    ) -> Result<(), Error> {
        let end = frame.is_end();
        match frame {
            BodyFrame::Data { data, .. } => {
                if self.trailers.is_some() {
                    return Err(Error::Invalid("data after trailing headers"));
                }
                let bytes = data.as_ref();
                // No transport carries `u64::MAX` bytes, so saturation only guards the arithmetic.
                self.total = self.total.saturating_add(bytes.len() as u64);
                if self.forbid_content && self.total != 0 {
                    return Err(Error::Invalid("content on 205"));
                }
                if let Framing::Fixed(length) | Framing::Chunked(Some(length)) = self.framing {
                    if self.total > length {
                        return Err(Error::LengthMismatch);
                    }
                }
                if !bytes.is_empty() {
                    if matches!(self.framing, Framing::Chunked(_)) {
                        output
                            .write_all(format!("{:x}\r\n", bytes.len()).as_bytes(), cancellation)
                            .await?;
                        output.write_all(bytes, cancellation).await?;
                        output.write_all(b"\r\n", cancellation).await?;
                    } else {
                        output.write_all(bytes, cancellation).await?;
                    }
                }
            }
            BodyFrame::Headers { fields, .. } => {
                if self.trailers.is_some() {
                    return Err(Error::Invalid("repeated trailing headers"));
                }
                if !matches!(self.framing, Framing::Chunked(_)) {
                    return Err(Error::Invalid("trailers require chunked framing"));
                }
                validate_trailer_fields(fields.pairs())?;
                wire::output_fields(fields.pairs())?;
                self.trailers = Some(fields);
            }
            BodyFrame::End => {}
        }
        if end {
            if let Framing::Fixed(length) | Framing::Chunked(Some(length)) = self.framing {
                if self.total != length {
                    return Err(Error::LengthMismatch);
                }
            }
            if matches!(self.framing, Framing::Chunked(_)) {
                output.write_all(b"0\r\n", cancellation).await?;
                if let Some(trailers) = &self.trailers {
                    output.write_fields(trailers.pairs(), cancellation).await?;
                }
                output.write_all(b"\r\n", cancellation).await?;
            }
        }
        Ok(())
    }
}

// Borrow semantic fields and describe only the framing additions. This avoids
// constructing/cloning a second semantic message just to serialize a wire head.
struct Plan<'a> {
    response: &'a ResponseMetadata,
    version: Version,
    framing: Framing,
    persistent: bool,
    tunnel: bool,
    content_length: Option<u64>,
    chunked: bool,
    upgrade: Option<&'a [u8]>,
    connection_upgrade: bool,
    connection: Option<&'static [u8]>,
}

fn plan<'a>(
    exchange: &Exchange,
    response: &'a ResponseMetadata,
    length: Option<u64>,
    may_have_trailers: bool,
) -> Result<Plan<'a>, Error> {
    if !response.status.is_final() {
        return Err(Error::Invalid("final response required"));
    }
    let fields = &response.fields;
    wire::output_fields(fields.pairs())?;
    let version = exchange.version();
    if response.version.is_some_and(|v| v != version) {
        return Err(Error::Invalid("response version differs from request"));
    }
    // Derive framing and connection facts together from the initial section.
    let facts = wire::response_framing(fields)?;
    let declared = wire::declared_length(response.content_length, facts.length)?;
    if declared.is_some() && facts.chunked {
        return Err(Error::Invalid("content-length with transfer-encoding"));
    }
    let chunked = facts.chunked;
    let connect = exchange.is_connect() && response.status.is_success();
    let upgrade = response.status == Status::SWITCHING_PROTOCOLS;
    let tunnel = connect || upgrade;
    let status_bodyless =
        response.status == Status::NO_CONTENT || response.status == Status::NOT_MODIFIED;
    let absent = !tunnel && (exchange.is_head() || status_bodyless);
    let mut persistent = exchange.is_persistent()
        && !exchange.is_abandoned()
        && response.persistent != Some(false)
        && !facts.close
        && !tunnel;
    let mut content_length = response.content_length.filter(|_| facts.length.is_none());
    let mut generated_chunked = false;
    let mut selected_upgrade = None;
    let mut connection_upgrade = false;
    let mut connection = None;
    let framing;
    if tunnel {
        if !exchange.is_complete() {
            return Err(Error::Invalid("switch with unread request body"));
        }
        if declared.is_some() || chunked {
            return Err(Error::Invalid("framing fields on tunnel response"));
        }
        if upgrade {
            if version != Version::Http11 || !exchange.has_upgrade() {
                return Err(Error::Invalid("unsolicited upgrade"));
            }
            if facts.duplicate_upgrade {
                return Err(Error::Invalid("duplicate singleton field"));
            }
            let selected = response
                .protocol
                .as_ref()
                .map(|p| p.as_str().as_bytes())
                .or(facts.upgrade)
                .ok_or(Error::Invalid("missing selected protocol"))?;
            if !wire::token(selected) || !exchange.accepts_upgrade(selected) {
                return Err(Error::Invalid("upgrade protocol was not offered"));
            }
            selected_upgrade = Some(selected);
            connection_upgrade = !facts.connection_upgrade;
        } else if response.protocol.is_some() {
            return Err(Error::Invalid("protocol on traditional CONNECT"));
        }
        framing = Framing::Raw;
    } else {
        if response.protocol.is_some() {
            return Err(Error::Invalid("protocol without upgrade status"));
        }
        if facts.upgrade.is_some() {
            connection_upgrade = !facts.connection_upgrade;
        }
        if chunked && version != Version::Http11 {
            return Err(Error::Invalid("HTTP/1.0 transfer-encoding"));
        }
        if absent {
            if chunked {
                return Err(Error::Invalid(
                    "trailers or transfer-encoding on bodyless response",
                ));
            }
            if response.status == Status::NO_CONTENT {
                if declared.is_some() {
                    return Err(Error::Invalid("content-length on 204"));
                }
            } else if declared.is_none() {
                content_length = length;
            }
            framing = Framing::Absent;
        } else {
            if let (Some(actual), Some(declared)) = (length, declared) {
                if actual != declared {
                    return Err(Error::LengthMismatch);
                }
            }
            if response.status == Status::RESET_CONTENT
                && (length.is_some_and(|n| n != 0) || declared.is_some_and(|n| n != 0))
            {
                return Err(Error::Invalid("content on 205"));
            }
            if response.status == Status::RESET_CONTENT
                && declared.is_none()
                && !chunked
                && !may_have_trailers
                && !facts.trailer
            {
                content_length = Some(0);
                framing = Framing::Fixed(0);
            } else if chunked || (may_have_trailers && version == Version::Http11) || facts.trailer
            {
                if version != Version::Http11 {
                    return Err(Error::Invalid("trailers require HTTP/1.1 chunked framing"));
                }
                content_length = None;
                generated_chunked = !chunked;
                framing = Framing::Chunked(declared.or(length));
            } else if let Some(length) = declared.or(length) {
                if declared.is_none() {
                    content_length = Some(length);
                }
                framing = Framing::Fixed(length);
            } else if version == Version::Http11 {
                generated_chunked = true;
                framing = Framing::Chunked(declared.or(length));
            } else {
                persistent = false;
                framing = Framing::Raw;
            }
        }
        if !persistent {
            if !facts.close {
                connection = Some(&b"close"[..]);
            }
        } else if version == Version::Http10 && !facts.keep_alive {
            connection = Some(&b"keep-alive"[..]);
        }
    }
    Ok(Plan {
        response,
        version,
        framing,
        persistent,
        tunnel,
        content_length,
        chunked: generated_chunked,
        upgrade: selected_upgrade,
        connection_upgrade,
        connection,
    })
}

fn decimal(mut value: u64, digits: &mut [u8; 20]) -> &[u8] {
    let mut start = digits.len();
    loop {
        start -= 1;
        digits[start] = b'0' + (value % 10) as u8;
        value /= 10;
        if value == 0 {
            return &digits[start..];
        }
    }
}

pub(crate) fn validate_trailer_fields(fields: &[base_http::Field]) -> Result<(), Error> {
    let policy = base_http::headers::Policy::default();
    for field in fields {
        if !policy.get(field.name()).trailer
            || ["keep-alive", "proxy-connection"]
                .iter()
                .any(|name| field.name().eq_ignore_ascii_case(name))
        {
            return Err(base_http::FieldError::InvalidTrailer(field.name().to_owned()).into());
        }
    }
    Ok(())
}

#[cfg(test)]
mod tests {
    use super::*;
    use crate::{Options, RequestReader};
    use base_endpoint::stream::ReadableStream;
    use base_http::{Fields, Protocol, body::BufferedBody};
    use base_scheduler::OperationResult;
    use futures_lite::future::block_on;

    struct Bytes(&'static [u8]);
    impl ReadableStream for Bytes {
        async fn read_into(
            &mut self,
            buffer: &mut [u8],
            _: &Cancellation,
        ) -> OperationResult<usize> {
            let n = self.0.len().min(buffer.len());
            buffer[..n].copy_from_slice(&self.0[..n]);
            self.0 = &self.0[n..];
            Ok(n)
        }
        async fn close(&mut self) -> io::Result<()> {
            Ok(())
        }
    }

    // Accepts no bytes, so the first transport write fails and reveals where a batch boundary fell.
    struct Refusing;
    impl WritableStream for Refusing {
        async fn write(&mut self, _: &[u8], _: &Cancellation) -> OperationResult<usize> {
            Err(io::Error::from(io::ErrorKind::BrokenPipe).into())
        }
        async fn flush(&mut self, _: &Cancellation) -> OperationResult<()> {
            Ok(())
        }
        async fn close(&mut self) -> io::Result<()> {
            Ok(())
        }
    }

    fn exchange(bytes: &'static [u8]) -> Exchange {
        let mut input = RequestReader::new(Bytes(bytes), Options::default()).unwrap();
        let exchange = block_on(input.read_request(&Cancellation::never()))
            .unwrap()
            .unwrap()
            .1;
        block_on(input.close()).unwrap();
        exchange
    }

    // A field occupying exactly `size` bytes of the batch.
    fn filler(size: usize) -> (&'static str, Vec<u8>) {
        ("x", vec![b'v'; size - 5])
    }

    fn is_broken_pipe(result: Result<impl Sized, Error>) -> bool {
        matches!(result, Err(Error::Io(error)) if error.kind() == io::ErrorKind::BrokenPipe)
    }

    #[test]
    fn a_head_field_crossing_the_batch_limit_sends_the_batch_first() {
        const GET: &[u8] = b"GET / HTTP/1.1\r\nHost: x\r\n\r\n";
        const UPGRADE: &[u8] =
            b"GET / HTTP/1.1\r\nHost: x\r\nConnection: upgrade\r\nUpgrade: echo\r\n\r\n";
        const OK: usize = b"HTTP/1.1 200 OK\r\n".len();
        const SWITCHING: usize = b"HTTP/1.1 101 Switching Protocols\r\n".len();
        // Each response leaves one free byte in the batch before the generated field.
        let full = |start: usize| filler(OUTPUT_BATCH_LIMIT - 1 - start);
        type Case = (&'static [u8], Response<BufferedBody<Vec<u8>>>);
        let mut cases: Vec<Case> = Vec::new();

        let mut upgrade = Response::new(Status::SWITCHING_PROTOCOLS, BufferedBody::default());
        upgrade.protocol = Some(Protocol::new("echo").unwrap());
        let (name, value) = full(SWITCHING);
        upgrade.fields.add(name, value).unwrap();
        cases.push((UPGRADE, upgrade));

        let mut advertised = Response::new(Status::OK, BufferedBody::default());
        advertised.fields.add("Upgrade", "h2c").unwrap();
        let (name, value) = full(OK + "Upgrade: h2c\r\n".len());
        advertised.fields.add(name, value).unwrap();
        cases.push((GET, advertised));

        let mut length = Response::new(Status::OK, BufferedBody::from(b"hi".to_vec()));
        let (name, value) = full(OK);
        length.fields.add(name, value).unwrap();
        cases.push((GET, length));

        let mut chunked = Response::new(Status::OK, BufferedBody::default());
        chunked.fields.add("Trailer", "x-digest").unwrap();
        let (name, value) = full(OK + "Trailer: x-digest\r\n".len());
        chunked.fields.add(name, value).unwrap();
        cases.push((GET, chunked));

        let mut close = Response::new(Status::OK, BufferedBody::default());
        close.persistent = Some(false);
        close.fields.add("Content-Length", "0").unwrap();
        let (name, value) = full(OK + "Content-Length: 0\r\n".len());
        close.fields.add(name, value).unwrap();
        cases.push((GET, close));

        // A large value, a name filling the batch, and a name leaving no room for its separator.
        let mut value = Response::new(Status::OK, BufferedBody::default());
        value
            .fields
            .add("x", vec![b'v'; OUTPUT_BATCH_LIMIT + 1])
            .unwrap();
        cases.push((GET, value));
        let mut name = Response::new(Status::OK, BufferedBody::default());
        name.fields
            .add("x".repeat(OUTPUT_BATCH_LIMIT), "v")
            .unwrap();
        cases.push((GET, name));
        let mut separator = Response::new(Status::OK, BufferedBody::default());
        separator
            .fields
            .add("x".repeat(OUTPUT_BATCH_LIMIT - 1 - OK), "v")
            .unwrap();
        cases.push((GET, separator));

        for (index, (request, mut response)) in cases.into_iter().enumerate() {
            let mut output = ResponseWriter::new(Refusing);
            let result = block_on(output.write_response(
                &exchange(request),
                &mut response,
                &Cancellation::never(),
            ));
            assert!(is_broken_pipe(result), "case {index}");
            assert!(!output.is_usable());
        }
    }

    #[test]
    fn interim_heads_crossing_the_batch_limit_send_the_batch_first() {
        const EARLY_HINTS: usize = b"HTTP/1.1 103 Early Hints\r\n".len();
        let large = ("link", vec![b'v'; OUTPUT_BATCH_LIMIT + 1]);
        let full = filler(OUTPUT_BATCH_LIMIT - 1 - EARLY_HINTS);
        for (name, value) in [large, full] {
            let mut output = ResponseWriter::new(Refusing);
            let mut response = ResponseMetadata::new(Status::new(103).unwrap());
            response.fields.add(name, value).unwrap();
            let result = block_on(
                output
                    .interim(Version::Http11)
                    .on_interim_response(response, &Cancellation::never()),
            );
            assert!(is_broken_pipe(result));
            assert!(!output.is_usable());
        }
    }

    #[test]
    fn body_frames_crossing_the_batch_limit_send_the_batch_first() {
        let data = |bytes: &[u8]| BodyFrame::Data {
            data: bytes.to_vec(),
            end: false,
        };
        let mut trailers = Fields::new();
        trailers
            .add("x-digest", vec![b'v'; OUTPUT_BATCH_LIMIT + 1])
            .unwrap();
        let large = vec![b'v'; OUTPUT_BATCH_LIMIT];
        // Each case batches `pending` bytes from earlier frames before writing its frame.
        let cases = [
            (Framing::Chunked(None), OUTPUT_BATCH_LIMIT - 2, data(b"abc")),
            (Framing::Chunked(None), 1, data(&large)),
            (Framing::Chunked(None), OUTPUT_BATCH_LIMIT - 7, data(b"abc")),
            (Framing::Fixed(OUTPUT_BATCH_LIMIT as u64), 1, data(&large)),
            (
                Framing::Chunked(None),
                OUTPUT_BATCH_LIMIT - 2,
                BodyFrame::End,
            ),
            (
                Framing::Chunked(None),
                OUTPUT_BATCH_LIMIT - 4,
                BodyFrame::End,
            ),
            (
                Framing::Chunked(None),
                1,
                BodyFrame::Headers {
                    fields: trailers,
                    end: true,
                },
            ),
        ];
        for (index, (framing, pending, frame)) in cases.into_iter().enumerate() {
            let never = Cancellation::never();
            let mut output = ResponseWriter::new(Refusing);
            block_on(output.write_all(&vec![b'.'; pending], &never)).unwrap();
            let mut encoder = BodyEncoder::new(framing, false);
            let result = block_on(encoder.write_frame(&mut output, frame, &never));
            assert!(is_broken_pipe(result), "case {index}");
        }
    }

    #[test]
    fn empty_fixed_data_needs_no_transport_write() {
        let never = Cancellation::never();
        let mut output = ResponseWriter::new(Refusing);
        let mut encoder = BodyEncoder::new(Framing::Fixed(0), false);
        let frame = BodyFrame::Data {
            data: Vec::new(),
            end: true,
        };
        block_on(encoder.write_frame(&mut output, frame, &never)).unwrap();
        block_on(output.flush(&never)).unwrap();
        block_on(output.close()).unwrap();
    }
}