speccoder-runtime 0.9.5

//! Ask: a read-only conversation beside every view (L0 of the ladder).
//!
//! A conversation is one agentplane run on a plane of its own
//! (`<project state>/ask`): each message is delivered to it, it answers
//! with reading tools only and waits again. What a turn showed — reads,
//! checked citations, a proposal — is kept beside the journal as the
//! conversation's thread, for the panel and `speccoder ask` to read back.
//! Nothing here writes to the project; a proposal is performed only when a
//! person confirms it, through the ordinary actions.

pub mod chips;
pub mod proposal;
pub mod skill;
pub mod tools;

use std::path::{Path, PathBuf};
use std::sync::{Arc, Mutex};

use agentplane::model::ModelProvider;
use serde::Deserialize;
use serde_json::{Value, json};
use speccoder_core::ask::{
    AskConversations, AskReport, AskResult, AskThread, AskUsage, Conversation, Read,
};
use speccoder_core::{CommandData, CommandResult, CommandStatus};

use crate::progress::{Event, Progress};
use crate::substrate::{self, model_config::ModelConfig};

pub use chips::ChipRef;

/// The tool that suggests a change.
pub const PROPOSE: &str = "propose";

/// The longest question.
pub const MAX_QUESTION: usize = 8_000;

/// A turn whose input alone is this large leaves no room for another: the
/// next message goes on in a new run (Ask never summarises).
const FULL_AT: u64 = 150_000;

/// The most of the earlier turns' words a new run carries.
const CARRIED: usize = 24_000;

/// The run of conversation `id`'s `segment`, as its messages correlate.
fn segment_key(id: &str, segment: u32) -> String {
    if segment == 0 {
        id.to_owned()
    } else {
        format!("{id}.{segment}")
    }
}

/// The earlier turns, newest kept first, as context for a new run.
fn earlier(turns: &[AskReport]) -> String {
    let mut kept: Vec<String> = Vec::new();
    let mut size = 0;
    for t in turns.iter().rev() {
        let answer = if t.answer.is_empty() {
            "(no answer)"
        } else {
            &t.answer
        };
        let block = format!("Q: {}\nA: {answer}\n", t.question);
        size += block.len();
        if size > CARRIED {
            break;
        }
        kept.push(block);
    }
    kept.reverse();
    format!(
        "<context id=\"earlier\" kind=\"conversation\">\nThe conversation so far, carried over from \
its earlier run. What it read then is not read again: read before you cite.\n\n{}</context>\n\n",
        kept.join("\n")
    )
}

/// Turns in flight in this process, by conversation, so a person can
/// stop one.
type Halt = agentplane::model::Stop;
static LIVE: std::sync::LazyLock<Mutex<std::collections::HashMap<String, Halt>>> =
    std::sync::LazyLock::new(Mutex::default);

/// A turn's place in [`LIVE`], left when it ends.
struct Live {
    id: String,
    halt: Halt,
    /// It holds the entry: a second request for a conversation whose turn
    /// is in flight (refused by the plane's claim) never takes it.
    owned: bool,
}

impl Live {
    fn enter(id: &str, halt: &Halt) -> Self {
        let owned = LIVE.lock().is_ok_and(|mut live| {
            if live.contains_key(id) {
                return false;
            }
            live.insert(id.to_owned(), halt.clone());
            true
        });
        Self {
            id: id.to_owned(),
            halt: halt.clone(),
            owned,
        }
    }

    async fn notified(&self) {
        self.halt.stopped().await;
    }
}

impl Drop for Live {
    fn drop(&mut self) {
        if !self.owned {
            return;
        }
        if let Ok(mut live) = LIVE.lock() {
            live.remove(&self.id);
        }
    }
}

/// Stops conversation `id`'s turn in flight in this process (`None`: every
/// one — a new conversation has no id until its first turn ends): the
/// model call streaming ends where it is, recorded and metered to there,
/// with its words. `false`: none was.
#[must_use]
pub fn stop(id: Option<&str>) -> bool {
    let halts: Vec<Halt> = LIVE.lock().map_or_else(
        |_| Vec::new(),
        |live| {
            live.iter()
                .filter(|(k, _)| id.is_none_or(|id| *k == id))
                .map(|(_, h)| h.clone())
                .collect()
        },
    );
    for halt in &halts {
        halt.stop();
    }
    !halts.is_empty()
}

/// `[ask]` in `speccoder.toml`.
#[derive(Debug, Clone, Deserialize, PartialEq, Eq)]
#[serde(deny_unknown_fields)]
pub struct Settings {
    /// The model; `[model]`'s when absent.
    pub model: Option<String>,
    /// Tokens one turn may use (input and output, cache reads apart).
    #[serde(default = "turn_default")]
    pub max_turn_tokens: u64,
    /// Tokens Ask may use in a UTC day.
    #[serde(default = "day_default")]
    pub daily_tokens: u64,
}

const fn turn_default() -> u64 {
    100_000
}

const fn day_default() -> u64 {
    1_000_000
}

impl Default for Settings {
    fn default() -> Self {
        Self {
            model: None,
            max_turn_tokens: turn_default(),
            daily_tokens: day_default(),
        }
    }
}

/// `[ask]` from the text of `speccoder.toml`.
///
/// # Errors
///
/// The section is malformed.
pub fn settings(config: &str) -> Result<Settings, String> {
    let table: toml::Table = config.parse().map_err(|e: toml::de::Error| e.to_string())?;
    match table.get("ask") {
        None => Ok(Settings::default()),
        Some(v) => v
            .clone()
            .try_into()
            .map_err(|e: toml::de::Error| format!("[ask]: {e}")),
    }
}

/// The progress tag of conversation `id`'s turn `n`.
#[must_use]
pub fn turn_tag(id: &str, n: u32) -> String {
    format!("ask:{id}#{n}")
}

/// What a tool call read, as the answer may cite it.
#[must_use]
pub fn read_of(id: &str, tool: &str, arguments: &Value, output: &Value) -> Read {
    let digest = crate::integrity::sha256_hex(output.to_string().as_bytes());
    let line = |v: &Value| v.as_u64().and_then(|n| u32::try_from(n).ok());
    let (path, start, end) = match tool {
        "read_file" => (
            output["path"].as_str().map(str::to_owned),
            line(&output["start_line"]),
            line(&output["end_line"]),
        ),
        // At a revision: not the file as it is now, so it opens nothing.
        "git_show" => (None, None, None),
        // A run's account: the turns it read.
        "journal_account" => (None, line(&arguments["from"]), line(&arguments["to"])),
        _ => (None, None, None),
    };
    let a = |k: &str| arguments[k].as_str().unwrap_or_default().to_owned();
    let target = match tool {
        "task_evidence" => format!("evidence of {}", a("task")),
        "report" => match a("feature") {
            f if f.is_empty() => "the report".to_owned(),
            f => format!("the report of {f}"),
        },
        "inbox" => "Needs You".to_owned(),
        "explain" => format!("code {}", a("code")),
        "journal_account" => format!("account of run {}", a("run")),
        "git_log" => match a("path") {
            p if p.is_empty() => "git history".to_owned(),
            p => format!("git history of {p}"),
        },
        "git_show" => format!("{} at {}", a("path"), a("rev")).trim().to_owned(),
        "git_status" => "the working tree".to_owned(),
        "git_diff" => format!("diff {}", a("path")).trim().to_owned(),
        "list_files" => match a("path") {
            p if p.is_empty() || p == "." => "the files".to_owned(),
            p => format!("files in {p}"),
        },
        _ => crate::progress::target(tool, arguments),
    };
    let content_sha256 = (tool == "read_file")
        .then(|| output["content"].as_str())
        .flatten()
        .map(|c| crate::integrity::sha256_hex(c.as_bytes()));
    let subject = match tool {
        "task_evidence" => Some(a("task")),
        "journal_account" => Some(a("run")),
        _ => None,
    }
    .filter(|s| !s.is_empty());
    Read {
        id: id.to_owned(),
        tool: tool.to_owned(),
        target,
        path,
        start,
        end,
        digest,
        content_sha256,
        subject,
    }
}

/// What conversation `id`'s confirmed proposals created, from the origins
/// they recorded: a quick change or bug fix (`Asked`), a promoted spec that
/// carried it (`PromotedFrom`). Oldest first.
#[must_use]
pub fn results(path: &Path, state: &Path, id: &str) -> Vec<AskResult> {
    use speccoder_core::ladder::Origin;
    let plane = crate::worktree::project_state_dir(state, path);
    let mut out: Vec<(u64, AskResult)> = Vec::new();
    for (subject, origins) in crate::ladder::origins(&plane) {
        for o in origins {
            match o {
                Origin::Asked {
                    conversation,
                    turn,
                    at,
                } if conversation == id => {
                    let (unit, requirement) = subject
                        .rsplit_once('/')
                        .map_or((subject.as_str(), None), |(u, r)| (u, Some(r)));
                    let task = requirement.and_then(|r| task_of(path, unit, r));
                    out.push((
                        at,
                        AskResult {
                            turn,
                            kind: "change".to_owned(),
                            unit: unit.to_owned(),
                            requirement: requirement.map(str::to_owned),
                            task,
                        },
                    ));
                }
                Origin::PromotedFrom {
                    conversations, at, ..
                } if conversations.iter().any(|(c, _)| c == id) => out.push((
                    at,
                    AskResult {
                        turn: None,
                        kind: "spec".to_owned(),
                        unit: subject.clone(),
                        requirement: None,
                        task: None,
                    },
                )),
                _ => {}
            }
        }
    }
    out.sort_by_key(|(at, _)| *at);
    out.into_iter().map(|(_, r)| r).collect()
}

/// The task that implements `requirement` in `unit`, from its trace.
fn task_of(path: &Path, unit: &str, requirement: &str) -> Option<String> {
    let r = crate::status::report(path, Some(unit));
    let Some(CommandData::Report(s)) = r.data() else {
        return None;
    };
    s.trace
        .iter()
        .find(|t| t.requirement == requirement && t.inherited.is_none())
        .and_then(|t| t.task.clone())
}

/// Whether `path` lines `start`–`end` no longer say what a read returned
/// (`content_sha256`): read again with the same tool, so masking and the
/// read cap are the same. `None` when the file cannot be read now.
#[must_use]
pub fn changed_since(
    root: &Path,
    path: &str,
    start: Option<u32>,
    end: Option<u32>,
    content_sha256: &str,
) -> Option<bool> {
    let tools =
        crate::tools::WorkspaceTools::new(root, crate::tools::policy::Policy::new(&[], &[]))
            .ok()?;
    let args = json!({ "path": path, "start_line": start, "end_line": end });
    let out = crate::pipeline::tokio_runtime()
        .ok()?
        .block_on(tools.run("read_file", &args));
    let now = out["content"].as_str()?;
    Some(crate::integrity::sha256_hex(now.as_bytes()) != content_sha256)
}

/// A person's message for a conversation.
#[derive(Debug, Clone, Default, Deserialize)]
pub struct Request {
    /// The conversation to continue; a new one when absent.
    pub conversation: Option<String>,
    /// The id a new conversation takes (`c-…`), chosen by the caller so
    /// its first turn can be stopped before it ends; generated when absent.
    #[serde(default)]
    pub id: Option<String>,
    /// The person's words.
    pub text: String,
    /// Context from the screen.
    #[serde(default)]
    pub chips: Vec<ChipRef>,
    /// The feature in view.
    pub feature: Option<String>,
}

fn refuse(status: CommandStatus, code: &str, message: &str) -> CommandResult {
    CommandResult::new("ask", status, message).with_code(code)
}

/// Where the project's Ask plane and threads live.
fn plane_dir(path: &Path, state: &Path) -> Result<(PathBuf, PathBuf), Box<CommandResult>> {
    let Some(root) = crate::format::at(path).detect(path) else {
        return Err(Box::new(refuse(
            CommandStatus::NotAProject,
            "NO-PROJECT",
            "not a spec project here",
        )));
    };
    let dir = crate::worktree::project_state_dir(state, &root).join("ask");
    Ok((root, dir))
}

fn state_or(state: Option<&Path>) -> Result<PathBuf, Box<CommandResult>> {
    state
        .map(Path::to_path_buf)
        .or_else(crate::worktree::state_dir)
        .ok_or_else(|| {
            Box::new(refuse(
                CommandStatus::ConfigError,
                "NO-STATE-DIR",
                "no state directory (set SPECCODER_STATE_DIR or HOME)",
            ))
        })
}

fn thread_path(dir: &Path, id: &str) -> PathBuf {
    dir.join("threads").join(format!("{id}.json"))
}

/// Whether `id` has the shape speccoder gives a conversation (`c-` and
/// hex): anything else names no file of the plane.
#[must_use]
pub fn valid_id(id: &str) -> bool {
    id.strip_prefix("c-")
        .is_some_and(|h| !h.is_empty() && h.len() <= 40 && h.bytes().all(|b| b.is_ascii_hexdigit()))
}

fn load(dir: &Path, id: &str) -> Option<AskThread> {
    if !valid_id(id) {
        return None;
    }
    serde_json::from_str(&std::fs::read_to_string(thread_path(dir, id)).ok()?).ok()
}

fn save(dir: &Path, thread: &AskThread) -> Result<(), String> {
    let path = thread_path(dir, &thread.conversation.id);
    if let Some(parent) = path.parent() {
        std::fs::create_dir_all(parent).map_err(|e| e.to_string())?;
    }
    let tmp = path.with_extension("json.tmp");
    std::fs::write(
        &tmp,
        serde_json::to_vec_pretty(thread).map_err(|e| e.to_string())?,
    )
    .and_then(|()| std::fs::rename(&tmp, &path))
    .map_err(|e| e.to_string())
}

fn now() -> u64 {
    std::time::SystemTime::now()
        .duration_since(std::time::UNIX_EPOCH)
        .map_or(0, |d| d.as_secs())
}

/// Today's UTC day number and what Ask used in it.
fn used_today(dir: &Path) -> (u64, u64) {
    let day = now() / 86_400;
    let used = std::fs::read_to_string(dir.join("usage.json"))
        .ok()
        .and_then(|t| serde_json::from_str::<Value>(&t).ok())
        .filter(|v| v["day"].as_u64() == Some(day))
        .and_then(|v| v["tokens"].as_u64())
        .unwrap_or(0);
    (day, used)
}

fn add_today(dir: &Path, tokens: u64) {
    let (day, used) = used_today(dir);
    let _ = std::fs::create_dir_all(dir);
    let _ = std::fs::write(
        dir.join("usage.json"),
        json!({ "day": day, "tokens": used + tokens }).to_string(),
    );
}

/// A new conversation's id (`c-…`).
#[must_use]
pub fn new_id() -> String {
    let nanos = std::time::SystemTime::now()
        .duration_since(std::time::UNIX_EPOCH)
        .map_or(0, |d| d.as_nanos());
    // Counted too: two conversations of one process in one millisecond
    // (two tabs of the interface) are two.
    static N: std::sync::atomic::AtomicU32 = std::sync::atomic::AtomicU32::new(0);
    format!(
        "c-{:x}{:04x}{:x}",
        nanos / 1_000_000,
        std::process::id() & 0xffff,
        N.fetch_add(1, std::sync::atomic::Ordering::Relaxed)
    )
}

/// Answers `request` in the project at `path` with the model in its
/// `speccoder.toml` (`[ask] model`, else `[model]`).
#[must_use]
pub fn turn(
    path: &Path,
    request: &Request,
    state: Option<&Path>,
    sink: Option<Arc<dyn Progress>>,
) -> CommandResult {
    let state = match state_or(state) {
        Ok(s) => s,
        Err(e) => return *e,
    };
    let config = crate::verify::find_config(path)
        .and_then(|root| std::fs::read_to_string(root.join(crate::verify::config::FILE)).ok())
        .unwrap_or_default();
    let ask = match settings(&config) {
        Ok(a) => a,
        Err(e) => {
            return refuse(
                CommandStatus::ConfigError,
                "CONFIG",
                &format!("speccoder.toml: {e}"),
            );
        }
    };
    let model = match substrate::model_config::parse(&config) {
        Ok(Some(mut m)) => {
            if let Some(name) = &ask.model {
                m.model.clone_from(name);
            }
            m
        }
        Ok(None) => {
            return refuse(
                CommandStatus::ConfigError,
                "ASK-NO-MODEL",
                "Ask needs a model ([model] in speccoder.toml); \"Make this a…\" works without one",
            );
        }
        Err(e) => {
            return refuse(
                CommandStatus::ConfigError,
                "CONFIG",
                &format!("speccoder.toml: {e}"),
            );
        }
    };
    match substrate::model_config::open_driver(&model) {
        Ok((provider, _)) => turn_with(path, request, &state, &ask, &model, provider, sink),
        Err(e) => substrate::model_config::refused("ask", &e),
    }
}

/// Forwards a turn's events: only this turn's (a resumed run replays the
/// earlier ones), steps as `ask.step`, and keeps the turn's end.
#[derive(Debug)]
struct Collector {
    conversation: String,
    turn: u32,
    tag: String,
    sink: Option<Arc<dyn Progress>>,
    ended: Mutex<Option<Value>>,
}

impl Progress for Collector {
    fn event(&self, event: &Event) {
        match event {
            Event::ToolCall {
                task,
                tool,
                target,
                decision,
                ok,
                ..
            } if *task == self.tag => {
                if let Some(sink) = &self.sink {
                    sink.event(&Event::AskStep {
                        conversation: self.conversation.clone(),
                        turn: self.turn,
                        tool: tool.clone(),
                        target: target.clone(),
                        read: None,
                        refused: decision != "allow" && decision != "proposed"
                            || *ok == Some(false),
                    });
                }
            }
            Event::AskTurnEnded { tag, output } if *tag == self.tag => {
                if let Ok(mut e) = self.ended.lock() {
                    *e = Some((**output).clone());
                }
            }
            _ => {}
        }
    }
}

/// The answer's words as the model writes them.
#[derive(Debug)]
struct Words {
    conversation: String,
    turn: u32,
    sink: Option<Arc<dyn Progress>>,
    text: Mutex<String>,
    /// Set by Stop: the words end where the person saw them end.
    halt: Halt,
}

impl Words {
    fn text(&self) -> String {
        self.text.lock().map(|t| t.clone()).unwrap_or_default()
    }
}

impl agentplane::runtime::RunStreamObserver for Words {
    fn event(
        &self,
        _run: agentplane::core::RunId,
        event: agentplane::core::Tainted<agentplane::model::ModelStreamEvent>,
    ) {
        if self.halt.is_stopped() {
            return;
        }
        if let agentplane::model::ModelStreamEvent::TextDelta(delta) = event.peek() {
            if let Ok(mut t) = self.text.lock() {
                t.push_str(delta);
            }
            if let Some(sink) = &self.sink {
                sink.event(&Event::AskText {
                    conversation: self.conversation.clone(),
                    turn: self.turn,
                    delta: delta.clone(),
                });
            }
        }
    }
}

/// [`turn`] with `provider` answering.
#[must_use]
pub fn turn_with(
    path: &Path,
    request: &Request,
    state: &Path,
    ask: &Settings,
    model: &ModelConfig,
    provider: Arc<dyn ModelProvider>,
    sink: Option<Arc<dyn Progress>>,
) -> CommandResult {
    let text = request.text.trim();
    if !text.chars().any(char::is_alphanumeric) {
        return refuse(
            CommandStatus::UsageError,
            "USAGE",
            "ask a question first — any words",
        );
    }
    if text.chars().count() > MAX_QUESTION {
        return refuse(
            CommandStatus::UsageError,
            "USAGE",
            &format!("a question is at most {MAX_QUESTION} characters"),
        );
    }
    if request.chips.len() > chips::MAX {
        return refuse(
            CommandStatus::UsageError,
            "USAGE",
            &format!("at most {} chips per question", chips::MAX),
        );
    }
    let (root, dir) = match plane_dir(path, state) {
        Ok(d) => d,
        Err(e) => return *e,
    };
    let mut thread = match &request.conversation {
        Some(id) => match load(&dir, id) {
            Some(t) => t,
            None => {
                return refuse(
                    CommandStatus::NotFound,
                    "NOT-FOUND",
                    &format!("no conversation {id}"),
                );
            }
        },
        None if request.id.as_deref().is_some_and(|i| !valid_id(i)) => {
            return refuse(
                CommandStatus::UsageError,
                "USAGE",
                "a conversation id is `c-` and hex digits",
            );
        }
        None => AskThread {
            conversation: Conversation {
                id: request.id.clone().unwrap_or_else(new_id),
                feature: request.feature.clone(),
                title: text.chars().take(120).collect(),
                at: now(),
                turns: 0,
                open: true,
            },
            turns: Vec::new(),
            segment: 0,
            run: None,
            results: Vec::new(),
        },
    };
    let id = thread.conversation.id.clone();
    let n = u32::try_from(thread.turns.len()).unwrap_or(u32::MAX - 1) + 1;
    let reads_from = 1 + thread.turns.iter().map(|t| t.reads.len()).sum::<usize>();
    let resolved: Result<Vec<_>, String> = request
        .chips
        .iter()
        .enumerate()
        .map(|(i, c)| chips::resolve(&root, &format!("c{}", i + 1), c))
        .collect();
    let resolved = match resolved {
        Ok(r) => r,
        Err(e) => {
            return refuse(
                CommandStatus::UsageError,
                "USAGE",
                &format!("a chip cannot be read: {e}"),
            );
        }
    };
    let mut report = AskReport {
        conversation: id.clone(),
        turn: n,
        question: text.to_owned(),
        chips: resolved.iter().map(|(c, _)| c.clone()).collect(),
        reads: Vec::new(),
        answer: String::new(),
        citations: Vec::new(),
        proposal: None,
        usage: AskUsage::default(),
        end: "answered".to_owned(),
        reason: None,
        context: None,
    };
    let (_, used) = used_today(&dir);
    let left = ask.daily_tokens.saturating_sub(used);
    if left == 0 {
        report.end = "budget".to_owned();
        report.reason = Some(format!(
            "Ask's tokens for today are spent ([ask] daily_tokens = {})",
            ask.daily_tokens
        ));
        return finish(&dir, thread, report, sink.as_ref());
    }
    let collector = Arc::new(Collector {
        conversation: id.clone(),
        turn: n,
        tag: turn_tag(&id, n),
        sink: sink.clone(),
        ended: Mutex::new(None),
    });
    let journal = crate::worktree::project_state_dir(state, &root);
    let workspace =
        match crate::tools::WorkspaceTools::new(&root, crate::tools::policy::Policy::new(&[], &[]))
        {
            Ok(t) => Arc::new(t),
            Err(e) => return refuse(CommandStatus::Error, "ERROR", &e.to_string()),
        };
    let flag = Halt::new();
    let words = Arc::new(Words {
        conversation: id.clone(),
        turn: n,
        sink: sink.clone(),
        text: Mutex::new(String::new()),
        halt: flag.clone(),
    });
    let wiring = substrate::ask::AskWiring {
        halt: flag.clone(),
        workspace,
        readers: Arc::new(tools::AskTools::new(&root, &journal)),
        progress: Some(Arc::clone(&collector) as Arc<dyn Progress>),
        stream: Some(Arc::clone(&words) as Arc<dyn agentplane::runtime::RunStreamObserver>),
    };
    let format = crate::format::at(&root);
    let rt = match crate::pipeline::tokio_runtime() {
        Ok(rt) => rt,
        Err(e) => return refuse(CommandStatus::Error, "ERROR", &e),
    };
    let message = chips::message(text, &resolved);
    // Each chip is an entry of the question's context manifest, journaled
    // with the message it rides on.
    let mut manifest = crate::context::Manifest::new();
    for (chip, content) in &resolved {
        manifest.push(
            speccoder_core::context::ContextKind::Chip,
            &format!("speccoder://ask/chip/{}", chip.id),
            &chip.label,
            content.as_bytes(),
        );
    }
    let context = (!resolved.is_empty()).then(|| manifest.finish());
    report.context.clone_from(&context);
    let payload = |carried: bool| {
        let text = if carried {
            format!("{}{message}", earlier(&thread.turns))
        } else {
            message.clone()
        };
        json!({
            "text": text,
            "tag": turn_tag(&id, n),
            "limit": ask.max_turn_tokens.min(left),
            "reads": reads_from,
            "context": context,
        })
    };
    let start = json!({
        "root": root.to_string_lossy(),
        "format": format.kind().name(),
        "feature": request.feature,
    });
    let halt = Live::enter(&id, &flag);
    let by = crate::approvals::who_in(&root);
    // A run that no longer waits (stopped, idle, full, or left behind by a
    // process that died mid-turn) hands over to a new one, carrying the
    // earlier turns' words: a conversation never dead-ends.
    let mut segment = thread.segment;
    let mut run = thread.run.clone().filter(|_| thread.conversation.open);
    let waited = rt.block_on(async {
        let plane = substrate::Plane::open_ask(&dir, model, provider, wiring)?;
        loop {
            let carried = run.is_none() && !thread.turns.is_empty();
            let started_now = run.is_none();
            if run.is_none() {
                if !thread.turns.is_empty() {
                    segment += 1;
                }
                let key = segment_key(&id, segment);
                let mut input = start.clone();
                input["conversation"] = json!(key);
                let started = plane
                    .ask_start(&key, agentplane::core::Tainted::trusted(input))
                    .await?;
                run = Some(started.run_id.to_string());
            }
            let key = segment_key(&id, segment);
            let message_id = format!("{key}-{n}");
            let deliver = plane.ask_deliver(&key, &message_id, payload(carried));
            tokio::pin!(deliver);
            // A Stop that lands as the answer does still cancels the run.
            let resumed = tokio::select! {
                biased;
                () = halt.notified() => {
                    if let Some(r) = &run {
                        plane.ask_stop(r, &by).await?;
                    }
                    let _ = deliver.await;
                    return Ok(true);
                }
                r = &mut deliver => r?,
            };
            if resumed {
                return Ok(false);
            }
            if started_now {
                return Err(substrate::PlaneError(
                    "a new run of the conversation did not take the message".to_owned(),
                ));
            }
            run = None;
        }
    });
    drop(halt);
    thread.segment = segment;
    thread.run.clone_from(&run);
    thread.conversation.open = true;
    match waited {
        Ok(false) => {}
        // Stopped: the run was cancelled with the turn.
        Ok(true) => thread.conversation.open = false,
        Err(e) if e.0.contains("another speccoder is working") => {
            return refuse(
                CommandStatus::UsageError,
                "USAGE",
                "another question is being answered in this project; ask when it is done",
            );
        }
        Err(e) => return refuse(CommandStatus::RunFailed, "RUN-FAILED", &e.0),
    }
    let output = collector
        .ended
        .lock()
        .ok()
        .and_then(|e| e.clone())
        .unwrap_or(Value::Null);
    // Stopped, however the race fell: the next message starts a new run.
    if output["status"] == "stopped" {
        thread.conversation.open = false;
    }
    let u = &output["usage"];
    let n_of = |k: &str| u[k].as_u64().unwrap_or(0);
    report.usage = AskUsage {
        input: n_of("input_tokens"),
        output: n_of("output_tokens"),
        cache_read: n_of("cache_read_tokens"),
    };
    let log = output["tool_calls"].as_array().cloned().unwrap_or_default();
    report.reads = log
        .iter()
        .filter_map(|e| serde_json::from_value::<Read>(e["read"].clone()).ok())
        .collect();
    if let Some(p) = log
        .iter()
        .find(|e| e["tool"] == PROPOSE && e["decision"] == "proposed")
    {
        let mut p = proposal::validate(&root, request.feature.as_deref(), &id, &p["arguments"]);
        p.turn = Some(n);
        report.proposal = Some(proposal::revalidate(&root, request.feature.as_deref(), &p));
    }
    match output["status"].as_str() {
        Some("answered") => {
            report.answer = output["text"]
                .as_str()
                .unwrap_or_default()
                .trim()
                .to_owned()
        }
        Some("stopped") => {
            report.end = "stopped".to_owned();
            // What the person saw when they stopped it, not what the model
            // went on writing.
            report.answer = words.text().trim().to_owned();
            report.reason = Some("stopped by you — ask again to go on".to_owned());
        }
        Some("budget") => {
            report.end = "budget".to_owned();
            report.reason = Some(format!(
                "{} ([ask] max_turn_tokens = {})",
                output["reason"]
                    .as_str()
                    .unwrap_or("the turn's tokens are spent"),
                ask.max_turn_tokens
            ));
        }
        _ => {
            report.end = "failed".to_owned();
            report.reason = Some(
                output["reason"]
                    .as_str()
                    .unwrap_or("the turn did not finish")
                    .to_owned(),
            );
        }
    }
    report.citations = speccoder_core::ask::check(&report.answer, &report.reads, &report.chips);
    add_today(&dir, report.usage.billed());
    // A run whose history alone fills a turn hands over to a new one.
    if report.usage.input + report.usage.cache_read > FULL_AT {
        thread.conversation.open = false;
    }
    finish(&dir, thread, report, sink.as_ref())
}

fn finish(
    dir: &Path,
    mut thread: AskThread,
    report: AskReport,
    sink: Option<&Arc<dyn Progress>>,
) -> CommandResult {
    thread.conversation.turns += 1;
    thread.conversation.at = now();
    thread.turns.push(report.clone());
    if let Err(e) = save(dir, &thread) {
        return refuse(
            CommandStatus::Error,
            "ERROR",
            &format!("the conversation could not be saved: {e}"),
        );
    }
    if let Some(sink) = sink {
        sink.event(&Event::AskDone {
            report: Box::new(report.clone()),
        });
    }
    let sources = report
        .citations
        .iter()
        .filter(|c| c.state == "read")
        .count();
    let (status, code, message) = match report.end.as_str() {
        "answered" => (
            CommandStatus::Ok,
            None,
            format!("answered with {sources} sources"),
        ),
        "stopped" => (CommandStatus::Ok, None, "stopped".to_owned()),
        "budget" => (
            CommandStatus::NeedsHuman,
            Some("ASK-BUDGET"),
            report.reason.clone().unwrap_or_default(),
        ),
        _ => (
            CommandStatus::RunFailed,
            Some("RUN-FAILED"),
            report.reason.clone().unwrap_or_default(),
        ),
    };
    let mut result = CommandResult::new("ask", status, &message);
    if let Some(code) = code {
        result = result.with_code(code);
    }
    result.with_data(CommandData::Ask(Box::new(report)))
}

/// Conversation `id`'s questions and answers, word for word, and their
/// digest: what promotion carries into a new spec.
#[must_use]
pub fn words(path: &Path, state: &Path, id: &str) -> Option<(String, String)> {
    let (_, dir) = plane_dir(path, state).ok()?;
    let t = load(&dir, id)?;
    let text: String = t
        .turns
        .iter()
        .map(|t| format!("Q: {}\nA: {}\n", t.question, t.answer))
        .collect::<Vec<_>>()
        .join("\n");
    let digest = crate::integrity::sha256_hex(text.as_bytes());
    Some((text, digest))
}

/// The tokens Ask's conversations about `feature` used: input, output and
/// cache reads.
#[must_use]
pub fn spent(path: &Path, state: Option<&Path>, feature: &str) -> AskUsage {
    let mut total = AskUsage::default();
    let Some(dir) = state_or(state)
        .ok()
        .and_then(|s| plane_dir(path, &s).ok())
        .map(|(_, d)| d)
    else {
        return total;
    };
    let threads = std::fs::read_dir(dir.join("threads"))
        .into_iter()
        .flatten()
        .flatten();
    for t in threads.filter_map(|e| {
        serde_json::from_str::<AskThread>(&std::fs::read_to_string(e.path()).ok()?).ok()
    }) {
        if t.conversation.feature.as_deref() == Some(feature) {
            for turn in &t.turns {
                total.input += turn.usage.input;
                total.output += turn.usage.output;
                total.cache_read += turn.usage.cache_read;
            }
        }
    }
    total
}

/// The project's conversations, newest first; `feature` narrows them.
#[must_use]
pub fn conversations(path: &Path, state: Option<&Path>, feature: Option<&str>) -> CommandResult {
    let state = match state_or(state) {
        Ok(s) => s,
        Err(e) => return *e,
    };
    let (_, dir) = match plane_dir(path, &state) {
        Ok(d) => d,
        Err(e) => return *e,
    };
    let mut list: Vec<Conversation> = std::fs::read_dir(dir.join("threads"))
        .into_iter()
        .flatten()
        .flatten()
        .filter_map(|e| {
            let t: AskThread =
                serde_json::from_str(&std::fs::read_to_string(e.path()).ok()?).ok()?;
            Some(t.conversation)
        })
        .filter(|c| feature.is_none() || c.feature.as_deref() == feature)
        .collect();
    list.sort_by(|a, b| b.at.cmp(&a.at).then_with(|| b.id.cmp(&a.id)));
    let message = format!("{} conversations", list.len());
    CommandResult::new("ask", CommandStatus::Ok, &message).with_data(CommandData::AskConversations(
        Box::new(AskConversations {
            conversations: list,
        }),
    ))
}

/// One conversation with its turns.
#[must_use]
pub fn thread(path: &Path, state: Option<&Path>, id: &str) -> CommandResult {
    let state = match state_or(state) {
        Ok(s) => s,
        Err(e) => return *e,
    };
    let (_, dir) = match plane_dir(path, &state) {
        Ok(d) => d,
        Err(e) => return *e,
    };
    match load(&dir, id) {
        Some(mut t) => {
            t.results = results(path, &state, id);
            CommandResult::new("ask", CommandStatus::Ok, &t.conversation.title.clone())
                .with_data(CommandData::AskThread(Box::new(t)))
        }
        None => refuse(
            CommandStatus::NotFound,
            "NOT-FOUND",
            &format!("no conversation {id}"),
        ),
    }
}