cap-rs 0.0.1

//! PTY driver — the universal substrate for any CLI agent.
//!
//! Spawns the agent under a pseudo-terminal pair so it behaves as if running
//! interactively in a real terminal: TUIs render normally, `isatty()` returns
//! true, signals (SIGINT) work, terminal resize is supported.
//!
//! Per spec §6.1 PTY is the REQUIRED universal binding. Every CLI agent —
//! including ones that expose no structured protocol whatsoever — can be
//! driven through PTY. Output is a raw ANSI byte stream; an
//! [`AgentParser`] converts it to [`AgentEvent`]s.
//!
//! The first available parser is [`RawParser`], which emits every chunk of
//! bytes as a [`AgentEvent::TextChunk`]. Per-agent structured parsers
//! (Claude Code TUI, aider, codex CLI, …) layer on top.

use std::path::{Path, PathBuf};
use std::time::Duration;

use async_trait::async_trait;
use portable_pty::{CommandBuilder, MasterPty, PtySize, native_pty_system};
use tokio::sync::mpsc;
use tracing::{debug, trace, warn};

use crate::core::{AgentEvent, ClientFrame, Content, StopReason, TextChannel, Usage};
use crate::driver::{Driver, DriverError};

// ---------------------------------------------------------------------------
// AgentParser
// ---------------------------------------------------------------------------

/// Translates raw PTY bytes into structured [`AgentEvent`]s.
///
/// Implementations are agent-specific. They may use [`vt100`] internally to
/// track screen state, or treat the byte stream as a raw text stream, or
/// any combination thereof.
///
/// Parsers run on the PTY reader thread (sync) — keep work bounded.
pub trait AgentParser: Send + 'static {
    /// Short identifier (used for logs).
    fn name(&self) -> &str;

    /// Process a new chunk of bytes from the agent's PTY. Return any
    /// CAP events extracted (zero or more). May be empty if the parser
    /// needs more data to make a decision.
    fn on_bytes(&mut self, bytes: &[u8]) -> Vec<AgentEvent>;

    /// Called once when PTY EOF is observed (agent exited). Return any
    /// final events (e.g. a synthesised [`AgentEvent::Done`]).
    fn on_eof(&mut self) -> Vec<AgentEvent> {
        Vec::new()
    }
}

/// The dumbest possible parser — every byte chunk becomes a text event.
/// Useful for plumbing verification and for agents we haven't written a
/// real parser for yet. ANSI escapes pass through unmodified.
#[derive(Debug, Default)]
pub struct RawParser;

impl AgentParser for RawParser {
    fn name(&self) -> &str {
        "raw"
    }

    fn on_bytes(&mut self, bytes: &[u8]) -> Vec<AgentEvent> {
        if bytes.is_empty() {
            return Vec::new();
        }
        vec![AgentEvent::TextChunk {
            msg_id: String::new(),
            text: String::from_utf8_lossy(bytes).into_owned(),
            channel: TextChannel::Assistant,
        }]
    }

    fn on_eof(&mut self) -> Vec<AgentEvent> {
        vec![AgentEvent::Done {
            stop_reason: StopReason::EndTurn,
            usage: Usage::default(),
        }]
    }
}

/// Parser that runs every byte through a [`vt100::Parser`] and emits the
/// diff of the visible screen as plain-text [`AgentEvent::TextChunk`]
/// events. ANSI escapes are absorbed; you get only the rendered output.
pub struct VtPlainParser {
    vt: vt100::Parser,
    last_screen: String,
}

impl std::fmt::Debug for VtPlainParser {
    fn fmt(&self, f: &mut std::fmt::Formatter<'_>) -> std::fmt::Result {
        f.debug_struct("VtPlainParser")
            .field("last_screen_len", &self.last_screen.len())
            .finish()
    }
}

impl VtPlainParser {
    pub fn new(rows: u16, cols: u16) -> Self {
        Self {
            vt: vt100::Parser::new(rows, cols, 10_000),
            last_screen: String::new(),
        }
    }
}

impl AgentParser for VtPlainParser {
    fn name(&self) -> &str {
        "vt100-plain"
    }

    fn on_bytes(&mut self, bytes: &[u8]) -> Vec<AgentEvent> {
        self.vt.process(bytes);
        let screen = self.vt.screen().contents();
        if screen == self.last_screen {
            return Vec::new();
        }
        // Emit just the part that's new at the end (naive append-only diff).
        let delta = if screen.starts_with(&self.last_screen) {
            screen[self.last_screen.len()..].to_string()
        } else {
            // Screen scrolled / repainted — emit the full screen.
            format!("\n--- screen repaint ---\n{}", screen)
        };
        self.last_screen = screen;
        if delta.is_empty() {
            return Vec::new();
        }
        vec![AgentEvent::TextChunk {
            msg_id: String::new(),
            text: delta,
            channel: TextChannel::Assistant,
        }]
    }

    fn on_eof(&mut self) -> Vec<AgentEvent> {
        vec![AgentEvent::Done {
            stop_reason: StopReason::EndTurn,
            usage: Usage::default(),
        }]
    }
}

// ---------------------------------------------------------------------------
// PtyDriver
// ---------------------------------------------------------------------------

/// Driver that spawns an agent under a pseudo-terminal.
///
/// Construction is via the [`PtyDriverBuilder`] returned by [`Self::builder`].
pub struct PtyDriver {
    /// Channel for raw bytes to the agent's stdin.
    /// `None` once [`Self::close_input`] is called.
    input_tx: Option<mpsc::Sender<Vec<u8>>>,

    /// Channel of events from the parser.
    event_rx: mpsc::Receiver<AgentEvent>,

    /// Master PTY handle — kept alive so the slave doesn't get HUP. Also
    /// used for resize.
    master: Box<dyn MasterPty + Send>,

    /// Whether the child has exited (set by reader thread on EOF).
    exited: std::sync::Arc<std::sync::atomic::AtomicBool>,
}

impl std::fmt::Debug for PtyDriver {
    fn fmt(&self, f: &mut std::fmt::Formatter<'_>) -> std::fmt::Result {
        f.debug_struct("PtyDriver")
            .field("input_open", &self.input_tx.is_some())
            .field("exited", &self.exited.load(std::sync::atomic::Ordering::Relaxed))
            .finish()
    }
}

impl PtyDriver {
    /// Begin building a PTY-driven agent session.
    pub fn builder(command: impl Into<String>) -> PtyDriverBuilder {
        PtyDriverBuilder {
            command: command.into(),
            args: Vec::new(),
            cwd: None,
            env: Vec::new(),
            env_remove: Vec::new(),
            size: PtySize {
                rows: 50,
                cols: 200,
                pixel_width: 0,
                pixel_height: 0,
            },
        }
    }

    /// Resize the PTY. Forwards SIGWINCH to the child.
    pub fn resize(&self, rows: u16, cols: u16) -> Result<(), DriverError> {
        self.master
            .resize(PtySize {
                rows,
                cols,
                pixel_width: 0,
                pixel_height: 0,
            })
            .map_err(|e| DriverError::Io(std::io::Error::other(e.to_string())))
    }

    /// Close the input channel so the agent sees stdin EOF (if it cares).
    /// For most TUI agents this has no visible effect — they're driven via
    /// keystrokes, not stdin EOF.
    pub fn close_input(&mut self) {
        self.input_tx = None;
    }

    /// Send raw bytes directly to the agent's PTY input. Useful for
    /// keystrokes (Ctrl+C = `\x03`, Tab = `\t`, arrow keys = `\x1b[A` …).
    pub async fn send_bytes(&mut self, bytes: &[u8]) -> Result<(), DriverError> {
        let tx = self.input_tx.as_ref().ok_or(DriverError::AgentExited)?;
        tx.send(bytes.to_vec())
            .await
            .map_err(|_| DriverError::AgentExited)?;
        Ok(())
    }
}

#[async_trait]
impl Driver for PtyDriver {
    async fn send(&mut self, frame: ClientFrame) -> Result<(), DriverError> {
        match frame {
            ClientFrame::Prompt { content } => {
                for c in content {
                    if let Content::Text(t) = c {
                        self.send_bytes(t.as_bytes()).await?;
                    }
                    // Image / other content not meaningful for raw PTY.
                }
                // Most CLI agents commit on Enter.
                self.send_bytes(b"\r").await?;
                Ok(())
            }
            ClientFrame::Cancel => {
                // Ctrl+C — gracefully cancel current turn for most TUI agents.
                self.send_bytes(b"\x03").await
            }
            ClientFrame::AskUserAnswer { value, .. } => {
                // Best-effort: type the answer + Enter.
                let text = value
                    .as_str()
                    .map(String::from)
                    .unwrap_or_else(|| value.to_string());
                self.send_bytes(text.as_bytes()).await?;
                self.send_bytes(b"\r").await
            }
            ClientFrame::PermissionResponse { decision, .. } => {
                use crate::core::PermissionDecision::*;
                let key: &[u8] = match decision {
                    AllowOnce | AllowAlways => b"y\r",
                    _ => b"n\r",
                };
                self.send_bytes(key).await
            }
        }
    }

    async fn next_event(&mut self) -> Option<AgentEvent> {
        self.event_rx.recv().await
    }

    async fn shutdown(&mut self) -> Result<(), DriverError> {
        // Drop input first so writer thread exits.
        self.input_tx = None;
        // Closing the master forces slave HUP; the reader thread will see
        // EOF and exit. We rely on Drop to deallocate.
        Ok(())
    }
}

// ---------------------------------------------------------------------------
// Builder
// ---------------------------------------------------------------------------

#[derive(Debug)]
pub struct PtyDriverBuilder {
    command: String,
    args: Vec<String>,
    cwd: Option<PathBuf>,
    env: Vec<(String, String)>,
    env_remove: Vec<String>,
    size: PtySize,
}

impl PtyDriverBuilder {
    pub fn arg(mut self, a: impl Into<String>) -> Self {
        self.args.push(a.into());
        self
    }

    pub fn args<I, S>(mut self, args: I) -> Self
    where
        I: IntoIterator<Item = S>,
        S: Into<String>,
    {
        for a in args {
            self.args.push(a.into());
        }
        self
    }

    pub fn cwd(mut self, p: impl AsRef<Path>) -> Self {
        self.cwd = Some(p.as_ref().to_path_buf());
        self
    }

    pub fn env(mut self, k: impl Into<String>, v: impl Into<String>) -> Self {
        self.env.push((k.into(), v.into()));
        self
    }

    pub fn env_remove(mut self, k: impl Into<String>) -> Self {
        self.env_remove.push(k.into());
        self
    }

    pub fn size(mut self, rows: u16, cols: u16) -> Self {
        self.size.rows = rows;
        self.size.cols = cols;
        self
    }

    /// Spawn the agent under a PTY and start the reader / writer tasks.
    pub fn spawn<P: AgentParser>(self, parser: P) -> Result<PtyDriver, DriverError> {
        let PtyDriverBuilder {
            command,
            args,
            cwd,
            env,
            env_remove,
            size,
        } = self;

        let pty_system = native_pty_system();
        let pair = pty_system
            .openpty(size)
            .map_err(|e| DriverError::SpawnFailed(std::io::Error::other(e.to_string())))?;

        // Build the command. CommandBuilder inherits the parent process
        // env by default; explicitly start from inherited env and apply
        // our adjustments.
        let mut builder = CommandBuilder::new(&command);
        builder.env_clear();
        for (k, v) in std::env::vars_os() {
            // env_remove takes precedence over inherited env.
            let k_str = k.to_string_lossy();
            if env_remove.iter().any(|r| *r == *k_str) {
                continue;
            }
            builder.env(k, v);
        }
        for a in args {
            builder.arg(a);
        }
        if let Some(p) = cwd {
            builder.cwd(p);
        }
        // User-supplied overrides land last so they win over inherited env.
        for (k, v) in env {
            builder.env(k, v);
        }

        debug!(command = %command, "spawning PTY agent");

        let child = pair
            .slave
            .spawn_command(builder)
            .map_err(|e| DriverError::SpawnFailed(std::io::Error::other(e.to_string())))?;

        let reader = pair
            .master
            .try_clone_reader()
            .map_err(|e| DriverError::Io(std::io::Error::other(e.to_string())))?;
        let writer = pair
            .master
            .take_writer()
            .map_err(|e| DriverError::Io(std::io::Error::other(e.to_string())))?;

        let (input_tx, input_rx) = mpsc::channel::<Vec<u8>>(64);
        let (event_tx, event_rx) = mpsc::channel::<AgentEvent>(256);
        let exited = std::sync::Arc::new(std::sync::atomic::AtomicBool::new(false));

        spawn_reader_thread(reader, parser, event_tx.clone(), std::sync::Arc::clone(&exited));
        spawn_writer_thread(writer, input_rx);
        spawn_child_waiter(child, event_tx, std::sync::Arc::clone(&exited));

        // Drop slave — only master is kept.
        drop(pair.slave);

        Ok(PtyDriver {
            input_tx: Some(input_tx),
            event_rx,
            master: pair.master,
            exited,
        })
    }
}

// ---------------------------------------------------------------------------
// Background threads (PTY API is sync; we bridge to async via channels)
// ---------------------------------------------------------------------------

fn spawn_reader_thread<P: AgentParser>(
    mut reader: Box<dyn std::io::Read + Send>,
    mut parser: P,
    tx: mpsc::Sender<AgentEvent>,
    exited: std::sync::Arc<std::sync::atomic::AtomicBool>,
) {
    std::thread::Builder::new()
        .name("cap-rs-pty-reader".into())
        .spawn(move || {
            let mut buf = [0u8; 8192];
            loop {
                match reader.read(&mut buf) {
                    Ok(0) => {
                        trace!("PTY reader: EOF");
                        break;
                    }
                    Ok(n) => {
                        let events = parser.on_bytes(&buf[..n]);
                        for ev in events {
                            if tx.blocking_send(ev).is_err() {
                                trace!("PTY reader: receiver dropped, exiting");
                                return;
                            }
                        }
                    }
                    Err(e) if e.kind() == std::io::ErrorKind::Interrupted => continue,
                    Err(e) => {
                        warn!(error = %e, "PTY reader: read error");
                        break;
                    }
                }
            }
            for ev in parser.on_eof() {
                let _ = tx.blocking_send(ev);
            }
            exited.store(true, std::sync::atomic::Ordering::Relaxed);
        })
        .expect("failed to spawn PTY reader thread");
}

fn spawn_writer_thread(
    mut writer: Box<dyn std::io::Write + Send>,
    mut rx: mpsc::Receiver<Vec<u8>>,
) {
    std::thread::Builder::new()
        .name("cap-rs-pty-writer".into())
        .spawn(move || {
            while let Some(bytes) = rx.blocking_recv() {
                if let Err(e) = writer.write_all(&bytes) {
                    warn!(error = %e, "PTY writer: write failed");
                    return;
                }
                if let Err(e) = writer.flush() {
                    warn!(error = %e, "PTY writer: flush failed");
                    return;
                }
            }
            trace!("PTY writer: input channel closed, exiting");
        })
        .expect("failed to spawn PTY writer thread");
}

fn spawn_child_waiter(
    mut child: Box<dyn portable_pty::Child + Send + Sync>,
    event_tx: mpsc::Sender<AgentEvent>,
    exited: std::sync::Arc<std::sync::atomic::AtomicBool>,
) {
    std::thread::Builder::new()
        .name("cap-rs-pty-waiter".into())
        .spawn(move || {
            // Block until child exits.
            let _ = child.wait();
            // Give reader thread a moment to flush any remaining output.
            std::thread::sleep(Duration::from_millis(50));
            exited.store(true, std::sync::atomic::Ordering::Relaxed);
            // Reader thread will emit its own Done via on_eof when the
            // PTY closes; we don't double-fire here.
            drop(event_tx);
        })
        .expect("failed to spawn PTY child waiter thread");
}