bcp-decoder 0.1.0

use std::sync::Arc;

use bcp_types::block::{Block, BlockContent};
use bcp_types::block_type::BlockType;
use bcp_types::content_store::ContentStore;
use bcp_types::summary::Summary;
use bcp_wire::block_frame::{BlockFlags, BlockFrame};
use bcp_wire::header::{HEADER_SIZE, BcpHeader};
use bcp_wire::varint::decode_varint;
use tokio::io::{AsyncRead, AsyncReadExt};

use crate::decompression::{self, MAX_BLOCK_DECOMPRESSED_SIZE, MAX_PAYLOAD_DECOMPRESSED_SIZE};
use crate::error::DecodeError;

/// Events emitted by the streaming decoder.
///
/// The stream yields a `Header` event first (once the 8-byte file
/// header has been read and validated), then a sequence of `Block`
/// events for each decoded block, terminating when the END sentinel
/// is encountered.
///
/// ```text
///   Header(BcpHeader)
///   Block(Block)
///   Block(Block)
///   Block(Block)
///   ... (stream ends at END sentinel)
/// ```
#[derive(Clone, Debug)]
pub enum DecoderEvent {
    /// The file header has been parsed and validated.
    Header(BcpHeader),

    /// A block has been fully decoded.
    Block(Block),
}

/// Asynchronous streaming decoder — yields blocks one at a time
/// without buffering the entire payload.
///
/// This is the primary API for large payloads or network streams.
/// The decoder reads the header first, then yields blocks as they
/// are fully received. Backpressure is handled naturally: the stream
/// only reads the next block when the caller awaits the next item.
///
/// Unlike the synchronous [`BcpDecoder`](crate::BcpDecoder) which
/// requires the entire payload in memory, `StreamingDecoder` reads
/// incrementally from any `AsyncRead` source (files, TCP sockets,
/// HTTP response bodies, etc.).
///
/// # Important: whole-payload compression disables streaming
///
/// **When the header's `COMPRESSED` flag is set (whole-payload
/// compression), the streaming decoder falls back to buffering the
/// entire payload before yielding any blocks.** This is unavoidable:
/// zstd requires the full compressed input to decompress. The API
/// surface remains the same (you still call `next()` in a loop), but
/// the memory and latency characteristics become identical to
/// [`BcpDecoder::decode`](crate::BcpDecoder::decode).
///
/// True incremental streaming is only achieved with **uncompressed**
/// or **per-block compressed** payloads. If streaming is critical for
/// your use case, prefer per-block compression
/// ([`BcpEncoder::compress_blocks`]) over whole-payload compression
/// ([`BcpEncoder::compress_payload`]).
///
/// # Content store
///
/// To decode payloads with `IS_REFERENCE` blocks, provide a content
/// store via [`with_content_store`](Self::with_content_store).
///
/// # Example
///
/// ```rust,no_run
/// use bcp_decoder::StreamingDecoder;
/// use tokio::io::AsyncRead;
///
/// async fn decode_from_reader(reader: impl AsyncRead + Unpin) {
///     let mut stream = StreamingDecoder::new(reader);
///     while let Some(event) = stream.next().await.transpose().unwrap() {
///         // Process each DecoderEvent...
///     }
/// }
/// ```
pub struct StreamingDecoder<R> {
    reader: R,
    state: StreamState,
    /// Internal read buffer. Block bodies are read into this buffer
    /// before being parsed. The buffer is reused across blocks to
    /// avoid repeated allocations.
    buf: Vec<u8>,
    /// When whole-payload compression is detected, the entire stream
    /// is read and decompressed into this buffer. Subsequent block
    /// reads consume from here instead of the original reader.
    decompressed_payload: Option<Vec<u8>>,
    /// Read cursor into `decompressed_payload`.
    decompressed_cursor: usize,
    /// Optional content store for resolving `IS_REFERENCE` blocks.
    content_store: Option<Arc<dyn ContentStore>>,
}

/// Internal state machine for the streaming decoder.
///
/// The decoder progresses through three states:
///
/// ```text
///   ReadHeader → ReadBlocks → Done
/// ```
///
/// `ReadHeader` is the initial state. After the header is read, the
/// decoder transitions to `ReadBlocks` and stays there until the END
/// sentinel is encountered, at which point it transitions to `Done`.
#[derive(Clone, Copy, Debug, PartialEq, Eq)]
enum StreamState {
    ReadHeader,
    ReadBlocks,
    Done,
}

impl<R: AsyncRead + Unpin> StreamingDecoder<R> {
    /// Create a new streaming decoder over the given async reader.
    ///
    /// The decoder starts in `ReadHeader` state and will read the
    /// 8-byte file header on the first call to [`next`](Self::next).
    #[must_use]
    pub fn new(reader: R) -> Self {
        Self {
            reader,
            state: StreamState::ReadHeader,
            buf: Vec::with_capacity(4096),
            decompressed_payload: None,
            decompressed_cursor: 0,
            content_store: None,
        }
    }

    /// Attach a content store for resolving `IS_REFERENCE` blocks.
    ///
    /// When a block has the `IS_REFERENCE` flag set, its 32-byte body
    /// is looked up in this store to retrieve the original content.
    #[must_use]
    pub fn with_content_store(mut self, store: Arc<dyn ContentStore>) -> Self {
        self.content_store = Some(store);
        self
    }

    /// Read the next event from the stream.
    ///
    /// Returns `Ok(Some(event))` for each decoded event, `Ok(None)`
    /// when the stream is exhausted (END sentinel reached), or `Err`
    /// on any decode error.
    ///
    /// The first call always yields `DecoderEvent::Header`. Subsequent
    /// calls yield `DecoderEvent::Block` until the END sentinel.
    pub async fn next(&mut self) -> Option<Result<DecoderEvent, DecodeError>> {
        match self.state {
            StreamState::ReadHeader => Some(self.read_header().await),
            StreamState::ReadBlocks => self.read_next_block().await,
            StreamState::Done => None,
        }
    }

    /// Read and validate the 8-byte file header.
    ///
    /// If the header's `COMPRESSED` flag is set, the decoder reads
    /// all remaining bytes from the stream, decompresses them with
    /// zstd, and stores the result internally. Subsequent block reads
    /// consume from the decompressed buffer.
    async fn read_header(&mut self) -> Result<DecoderEvent, DecodeError> {
        let mut header_buf = [0u8; HEADER_SIZE];
        self.reader.read_exact(&mut header_buf).await.map_err(|_| {
            DecodeError::InvalidHeader(bcp_wire::WireError::UnexpectedEof { offset: 0 })
        })?;

        let header = BcpHeader::read_from(&header_buf).map_err(DecodeError::InvalidHeader)?;

        // Whole-payload decompression: buffer everything, decompress.
        if header.flags.is_compressed() {
            let mut compressed = Vec::new();
            self.reader
                .read_to_end(&mut compressed)
                .await
                .map_err(DecodeError::Io)?;
            let decompressed =
                decompression::decompress(&compressed, MAX_PAYLOAD_DECOMPRESSED_SIZE)?;
            self.decompressed_payload = Some(decompressed);
            self.decompressed_cursor = 0;
        }

        self.state = StreamState::ReadBlocks;
        Ok(DecoderEvent::Header(header))
    }

    /// Read the next block frame from the stream.
    ///
    /// If a decompressed payload buffer exists (whole-payload mode),
    /// reads from that buffer. Otherwise reads from the async reader.
    ///
    /// Per-block decompression and reference resolution are applied
    /// transparently.
    ///
    /// Returns `None` when the END sentinel is encountered, transitioning
    /// the state to `Done`.
    async fn read_next_block(&mut self) -> Option<Result<DecoderEvent, DecodeError>> {
        // If we have a decompressed payload buffer, parse from it
        // using BlockFrame::read_from (synchronous path).
        if let Some(ref payload) = self.decompressed_payload {
            if self.decompressed_cursor >= payload.len() {
                self.state = StreamState::Done;
                return Some(Err(DecodeError::MissingEndSentinel));
            }

            let remaining = &payload[self.decompressed_cursor..];
            match BlockFrame::read_from(remaining) {
                Ok(Some((frame, consumed))) => {
                    self.decompressed_cursor += consumed;
                    Some(self.decode_frame(&frame))
                }
                Ok(None) => {
                    // END sentinel — compute its size and advance cursor.
                    // END = varint(0xFF) + flags(1 byte) + varint(0x00)
                    match end_sentinel_size(remaining) {
                        Ok(size) => self.decompressed_cursor += size,
                        Err(e) => return Some(Err(e)),
                    }
                    self.state = StreamState::Done;
                    None
                }
                Err(e) => Some(Err(DecodeError::from(e))),
            }
        } else {
            self.read_next_block_from_reader().await
        }
    }

    /// Read the next block frame from the async reader (non-buffered path).
    async fn read_next_block_from_reader(&mut self) -> Option<Result<DecoderEvent, DecodeError>> {
        // Read block_type varint
        let block_type_raw = match self.read_varint().await {
            Ok(v) => v,
            Err(e) => return Some(Err(e)),
        };

        #[allow(clippy::cast_possible_truncation)]
        let block_type_byte = block_type_raw as u8;

        // Check for END sentinel
        if block_type_byte == 0xFF {
            match self.read_end_frame_tail().await {
                Ok(()) => {}
                Err(e) => return Some(Err(e)),
            }
            self.state = StreamState::Done;
            return None;
        }

        // Read flags (single byte)
        let mut flags_byte = [0u8; 1];
        if let Err(e) = self.reader.read_exact(&mut flags_byte).await {
            return Some(Err(DecodeError::Io(e)));
        }
        let flags = BlockFlags::from_raw(flags_byte[0]);

        // Read content_len varint
        #[allow(clippy::cast_possible_truncation)]
        let content_len = match self.read_varint().await {
            Ok(v) => v as usize,
            Err(e) => return Some(Err(e)),
        };

        // Read body bytes
        self.buf.clear();
        self.buf.resize(content_len, 0);
        if let Err(e) = self.reader.read_exact(&mut self.buf[..content_len]).await {
            return Some(Err(DecodeError::Io(e)));
        }

        let frame = bcp_wire::block_frame::BlockFrame {
            block_type: block_type_byte,
            flags,
            body: self.buf[..content_len].to_vec(),
        };

        Some(self.decode_frame(&frame))
    }

    /// Decode a `BlockFrame` into a `DecoderEvent::Block`.
    ///
    /// Handles reference resolution, decompression, summary extraction,
    /// and body deserialization.
    fn decode_frame(
        &self,
        frame: &bcp_wire::block_frame::BlockFrame,
    ) -> Result<DecoderEvent, DecodeError> {
        let block_type = BlockType::from_wire_id(frame.block_type);

        // Stage 1: Resolve content-addressed references.
        let resolved_body = if frame.flags.is_reference() {
            let store = self
                .content_store
                .as_ref()
                .ok_or(DecodeError::MissingContentStore)?;
            if frame.body.len() != 32 {
                return Err(DecodeError::Wire(bcp_wire::WireError::UnexpectedEof {
                    offset: frame.body.len(),
                }));
            }
            let hash: [u8; 32] = frame.body[..32].try_into().expect("length already checked");
            store
                .get(&hash)
                .ok_or(DecodeError::UnresolvedReference { hash })?
        } else {
            frame.body.clone()
        };

        // Stage 2: Per-block decompression.
        let decompressed_body = if frame.flags.is_compressed() {
            decompression::decompress(&resolved_body, MAX_BLOCK_DECOMPRESSED_SIZE)?
        } else {
            resolved_body
        };

        // Stage 3 & 4: Summary extraction + TLV decode.
        let mut body = decompressed_body.as_slice();
        let mut summary = None;

        if frame.flags.has_summary() {
            match Summary::decode(body) {
                Ok((sum, consumed)) => {
                    summary = Some(sum);
                    body = &body[consumed..];
                }
                Err(e) => return Err(e.into()),
            }
        }

        let content = BlockContent::decode_body(&block_type, body)?;

        Ok(DecoderEvent::Block(Block {
            block_type,
            flags: frame.flags,
            summary,
            content,
        }))
    }

    /// Read the trailing flags + `content_len` bytes of an END frame.
    ///
    /// The END sentinel has: `flags`=0x00 (1 byte) + `content_len`=0x00 (1 byte).
    /// We read and discard these to fully consume the END frame.
    async fn read_end_frame_tail(&mut self) -> Result<(), DecodeError> {
        // flags byte
        let mut byte = [0u8; 1];
        self.reader
            .read_exact(&mut byte)
            .await
            .map_err(DecodeError::Io)?;

        // content_len varint (should be 0)
        let _content_len = self.read_varint().await?;
        Ok(())
    }

    /// Read a single varint from the async reader.
    ///
    /// Varints are read byte-by-byte: each byte's MSB indicates whether
    /// more bytes follow (1 = more, 0 = last byte). Maximum 10 bytes
    /// for a 64-bit value.
    async fn read_varint(&mut self) -> Result<u64, DecodeError> {
        let mut varint_buf = [0u8; 10];
        let mut len = 0;

        loop {
            let mut byte = [0u8; 1];
            self.reader
                .read_exact(&mut byte)
                .await
                .map_err(DecodeError::Io)?;
            varint_buf[len] = byte[0];
            len += 1;

            // MSB clear means this is the last byte
            if byte[0] & 0x80 == 0 {
                break;
            }

            if len >= 10 {
                return Err(DecodeError::Wire(bcp_wire::WireError::VarintTooLong));
            }
        }

        let (value, _) = decode_varint(&varint_buf[..len])?;
        Ok(value)
    }
}

/// Calculate the byte size of the END sentinel from a buffer slice.
///
/// Used by the streaming decoder when parsing from a decompressed
/// payload buffer. The END sentinel is: `varint(0xFF)` + `flags(0x00)`
/// + `varint(0x00)`.
fn end_sentinel_size(buf: &[u8]) -> Result<usize, DecodeError> {
    let (_, type_len) = decode_varint(buf)?;
    let mut size = type_len;
    // flags byte
    size += 1;
    // content_len varint
    let rest = buf
        .get(size..)
        .ok_or(DecodeError::Wire(bcp_wire::WireError::UnexpectedEof {
            offset: size,
        }))?;
    let (_, len_size) = decode_varint(rest)?;
    size += len_size;
    Ok(size)
}

#[cfg(test)]
mod tests {
    use super::*;
    use bcp_encoder::BcpEncoder;
    use bcp_types::enums::{Lang, Priority, Role, Status};

    /// Helper: encode a payload and decode it via the streaming decoder,
    /// collecting all events into a Vec.
    async fn stream_roundtrip(encoder: &BcpEncoder) -> Vec<DecoderEvent> {
        let payload = encoder.encode().unwrap();
        let cursor = std::io::Cursor::new(payload);
        let reader = tokio::io::BufReader::new(cursor);

        let mut decoder = StreamingDecoder::new(reader);
        let mut events = Vec::new();

        while let Some(result) = decoder.next().await {
            events.push(result.unwrap());
        }

        events
    }

    #[tokio::test]
    async fn streaming_produces_header_then_blocks() {
        let mut enc = BcpEncoder::new();
        enc.add_code(Lang::Rust, "main.rs", b"fn main() {}")
            .add_conversation(Role::User, b"hello");
        let events = stream_roundtrip(&enc).await;

        assert_eq!(events.len(), 3); // Header + 2 blocks

        assert!(matches!(&events[0], DecoderEvent::Header(h) if h.version_major == 1));
        assert!(matches!(&events[1], DecoderEvent::Block(b) if b.block_type == BlockType::Code));
        assert!(
            matches!(&events[2], DecoderEvent::Block(b) if b.block_type == BlockType::Conversation)
        );
    }

    #[tokio::test]
    async fn streaming_matches_sync_decoder() {
        let mut encoder = BcpEncoder::new();
        encoder
            .add_code(Lang::Rust, "lib.rs", b"pub fn x() {}")
            .with_summary("Function x.").unwrap()
            .with_priority(Priority::High).unwrap()
            .add_conversation(Role::User, b"What does x do?")
            .add_tool_result("docs", Status::Ok, b"x is a placeholder.");

        let payload = encoder.encode().unwrap();

        // Sync decode
        let sync_decoded = crate::BcpDecoder::decode(&payload).unwrap();

        // Streaming decode
        let events = stream_roundtrip(&encoder).await;

        // Extract blocks from events (skip the Header event)
        let stream_blocks: Vec<_> = events
            .into_iter()
            .filter_map(|e| match e {
                DecoderEvent::Block(b) => Some(b),
                _ => None,
            })
            .collect();

        // Same number of blocks
        assert_eq!(sync_decoded.blocks.len(), stream_blocks.len());

        // Same block types in same order
        for (sync_block, stream_block) in sync_decoded.blocks.iter().zip(stream_blocks.iter()) {
            assert_eq!(sync_block.block_type, stream_block.block_type);
            assert_eq!(sync_block.flags, stream_block.flags);
            assert_eq!(sync_block.summary, stream_block.summary);
        }
    }

    #[tokio::test]
    async fn streaming_handles_summary_blocks() {
        let mut enc = BcpEncoder::new();
        enc.add_code(Lang::Python, "app.py", b"print('hi')")
            .with_summary("Prints a greeting.").unwrap();
        let events = stream_roundtrip(&enc).await;

        let block = match &events[1] {
            DecoderEvent::Block(b) => b,
            other => panic!("expected Block, got {other:?}"),
        };

        assert!(block.flags.has_summary());
        assert_eq!(block.summary.as_ref().unwrap().text, "Prints a greeting.");
    }

    #[tokio::test]
    async fn streaming_empty_body_blocks() {
        let mut enc = BcpEncoder::new();
        enc.add_extension("ns", "t", b"");
        let events = stream_roundtrip(&enc).await;

        assert_eq!(events.len(), 2); // Header + Extension
    }

    #[tokio::test]
    async fn streaming_terminates_at_end_sentinel() {
        let mut enc = BcpEncoder::new();
        enc.add_conversation(Role::User, b"hi");
        let events = stream_roundtrip(&enc).await;

        // After all events, decoder should return None
        assert_eq!(events.len(), 2); // Header + 1 block
    }

    // ── Per-block compression streaming tests ───────────────────────────

    #[tokio::test]
    async fn streaming_per_block_compression_roundtrip() {
        let big_content = "fn main() { println!(\"hello world\"); }\n".repeat(50);
        let mut enc = BcpEncoder::new();
        enc.add_code(Lang::Rust, "main.rs", big_content.as_bytes())
            .with_compression().unwrap();
        let events = stream_roundtrip(&enc).await;

        assert_eq!(events.len(), 2); // Header + 1 block
        let block = match &events[1] {
            DecoderEvent::Block(b) => b,
            other => panic!("expected Block, got {other:?}"),
        };

        match &block.content {
            BlockContent::Code(code) => {
                assert_eq!(code.content, big_content.as_bytes());
            }
            other => panic!("expected Code, got {other:?}"),
        }
    }

    // ── Whole-payload compression streaming tests ───────────────────────

    #[tokio::test]
    async fn streaming_whole_payload_compression_roundtrip() {
        let big_content = "use std::io;\n".repeat(100);
        let mut enc = BcpEncoder::new();
        enc.add_code(Lang::Rust, "a.rs", big_content.as_bytes())
            .add_code(Lang::Rust, "b.rs", big_content.as_bytes());
        enc.compress_payload();
        let events = stream_roundtrip(&enc).await;

        // Header + 2 blocks
        assert_eq!(events.len(), 3);

        // Verify header has COMPRESSED flag
        match &events[0] {
            DecoderEvent::Header(h) => assert!(h.flags.is_compressed()),
            other => panic!("expected Header, got {other:?}"),
        }

        // Both blocks should decompress correctly
        for event in &events[1..] {
            match event {
                DecoderEvent::Block(block) => match &block.content {
                    BlockContent::Code(code) => {
                        assert_eq!(code.content, big_content.as_bytes());
                    }
                    other => panic!("expected Code, got {other:?}"),
                },
                other => panic!("expected Block, got {other:?}"),
            }
        }
    }

    // ── Content store streaming tests ───────────────────────────────────

    #[tokio::test]
    async fn streaming_content_addressing_roundtrip() {
        let store = Arc::new(bcp_encoder::MemoryContentStore::new());
        let mut enc = BcpEncoder::new();
        enc.set_content_store(store.clone())
            .add_code(Lang::Rust, "main.rs", b"fn main() {}")
            .with_content_addressing().unwrap();

        let payload = enc.encode().unwrap();
        let cursor = std::io::Cursor::new(payload);
        let reader = tokio::io::BufReader::new(cursor);

        let mut decoder = StreamingDecoder::new(reader).with_content_store(store);
        let mut events = Vec::new();
        while let Some(result) = decoder.next().await {
            events.push(result.unwrap());
        }

        assert_eq!(events.len(), 2); // Header + 1 block
        match &events[1] {
            DecoderEvent::Block(block) => match &block.content {
                BlockContent::Code(code) => {
                    assert_eq!(code.content, b"fn main() {}");
                }
                other => panic!("expected Code, got {other:?}"),
            },
            other => panic!("expected Block, got {other:?}"),
        }
    }

    #[tokio::test]
    async fn streaming_matches_sync_compressed() {
        let big_content = "pub fn hello() -> &'static str { \"world\" }\n".repeat(100);
        let mut encoder = BcpEncoder::new();
        encoder
            .add_code(Lang::Rust, "lib.rs", big_content.as_bytes())
            .with_summary("Hello function.").unwrap()
            .add_conversation(Role::User, b"explain");
        encoder.compress_payload();

        let payload = encoder.encode().unwrap();

        // Sync decode
        let sync_decoded = crate::BcpDecoder::decode(&payload).unwrap();

        // Streaming decode
        let events = stream_roundtrip(&encoder).await;
        let stream_blocks: Vec<_> = events
            .into_iter()
            .filter_map(|e| match e {
                DecoderEvent::Block(b) => Some(b),
                _ => None,
            })
            .collect();

        assert_eq!(sync_decoded.blocks.len(), stream_blocks.len());
        for (sync_block, stream_block) in sync_decoded.blocks.iter().zip(stream_blocks.iter()) {
            assert_eq!(sync_block.block_type, stream_block.block_type);
            assert_eq!(sync_block.summary, stream_block.summary);
        }
    }
}