hjkl_vim/vim/

command.rs

//! Vim FSM: command.
//!
//! Split out of the monolithic `vim.rs` (#267 follow-up).

use hjkl_vim_types::{LastChange, Mode, RangeKind};

use hjkl_engine::rope_util::{rope_line_to_str, rope_row_range_str};

use super::*;
use crate::vim_state::{vim, vim_mut};
use hjkl_engine::Editor;
use hjkl_engine::buf_helpers::{
    buf_cursor_pos, buf_line, buf_line_chars, buf_row_count, buf_set_cursor_pos, buf_set_cursor_rc,
};

/// Read the text in a vim-shaped range without mutating. Used by
/// `Operator::Yank` so we can pipe the same range translation as
/// [`cut_vim_range`] but skip the delete + inverse extraction.
pub fn read_vim_range<H: hjkl_engine::types::Host>(
    ed: &mut Editor<hjkl_buffer::View, H>,
    start: (usize, usize),
    end: (usize, usize),
    kind: RangeKind,
) -> String {
    let (top, bot) = order(start, end);
    ed.sync_buffer_content_from_textarea();
    let rope = hjkl_engine::types::Query::rope(ed.buffer());
    let n_lines = rope.len_lines();
    match kind {
        RangeKind::Linewise => {
            let lo = top.0;
            let hi = bot.0.min(n_lines.saturating_sub(1));
            let mut text = rope_row_range_str(&rope, lo, hi);
            text.push('\n');
            text
        }
        RangeKind::Inclusive | RangeKind::Exclusive => {
            let inclusive = matches!(kind, RangeKind::Inclusive);
            // Walk row-by-row collecting chars in `[top, end_exclusive)`.
            let mut out = String::new();
            for row in top.0..=bot.0 {
                if row >= n_lines {
                    break;
                }
                let line = rope_line_to_str(&rope, row);
                let lo = if row == top.0 { top.1 } else { 0 };
                let hi_unclamped = if row == bot.0 {
                    if inclusive { bot.1 + 1 } else { bot.1 }
                } else {
                    line.chars().count()
                };
                let row_chars: Vec<char> = line.chars().collect();
                let hi = hi_unclamped.min(row_chars.len());
                if lo < hi {
                    out.push_str(&row_chars[lo..hi].iter().collect::<String>());
                }
                if row < bot.0 {
                    out.push('\n');
                }
            }
            out
        }
    }
}
/// Cut a vim-shaped range through the View edit funnel and return
/// the deleted text. Translates vim's `RangeKind`
/// (Linewise/Inclusive/Exclusive) into the buffer's
/// `hjkl_buffer::MotionKind` (Line/Char) and applies the right end-
/// position adjustment so inclusive motions actually include the bot
/// cell. Pushes the cut text into the clipboard via `record_yank_to_host`
/// and the textarea yank buffer (still observed by `p`/`P` until the paste
/// path is ported), and updates `yank_linewise` for linewise cuts.
pub fn cut_vim_range<H: hjkl_engine::types::Host>(
    ed: &mut Editor<hjkl_buffer::View, H>,
    start: (usize, usize),
    end: (usize, usize),
    kind: RangeKind,
) -> String {
    cut_vim_range_inner(ed, start, end, kind, true)
}
/// Shared implementation of [`cut_vim_range`]. With `record = false` the
/// delete edit still happens and the deleted text is still returned, but no
/// register and no clipboard is touched — vim's case operators (`gU`/`gu`/
/// `g~`/`g?` and the visual `U`/`u`/`~`) transform text without recording
/// anything (`:h gU`). The delete itself is load-bearing: the case-op
/// re-insertion in
/// [`apply_case_op_to_selection`](crate::vim::text_object_ops::apply_case_op_to_selection)
/// consumes the delete's inverse edit.
pub(super) fn cut_vim_range_inner<H: hjkl_engine::types::Host>(
    ed: &mut Editor<hjkl_buffer::View, H>,
    start: (usize, usize),
    end: (usize, usize),
    kind: RangeKind,
    record: bool,
) -> String {
    use hjkl_buffer::{Edit, MotionKind as BufKind, Position};
    let (top, bot) = order(start, end);
    ed.sync_buffer_content_from_textarea();
    let (buf_start, buf_end, buf_kind) = match kind {
        RangeKind::Linewise => (
            Position::new(top.0, 0),
            Position::new(bot.0, 0),
            BufKind::Line,
        ),
        RangeKind::Inclusive => {
            let line_chars = buf_line_chars(ed.buffer(), bot.0);
            // Advance one cell past `bot` so the buffer's exclusive
            // `cut_chars` actually drops the inclusive endpoint. An end on
            // the line's NUL (an empty line, `d3$` ending on one) covers
            // nothing more: vim's `op_delete` never takes the line break
            // through it, as `read_vim_range` doesn't. A Visual selection
            // that does (`vd` on an empty line) says so with an exclusive
            // end on the next line (`charwise_visual_range`).
            let next = Position::new(bot.0, (bot.1 + 1).min(line_chars));
            (Position::new(top.0, top.1), next, BufKind::Char)
        }
        RangeKind::Exclusive => (
            Position::new(top.0, top.1),
            Position::new(bot.0, bot.1),
            BufKind::Char,
        ),
    };
    let inverse = ed.mutate_edit(Edit::DeleteRange {
        start: buf_start,
        end: buf_end,
        kind: buf_kind,
    });
    let raw_text = match inverse {
        Edit::InsertStr { text, .. } => text,
        _ => String::new(),
    };
    // Normalize linewise register text: vim always appends '\n' to
    // linewise register content. The inverse from do_delete_range may
    // produce text with a leading '\n' (last-line delete with rows
    // above) or no newline at all (whole-buffer delete / empty buffer).
    let text = if matches!(kind, RangeKind::Linewise) {
        if raw_text.ends_with('\n') {
            // Normal mid-buffer delete: trailing '\n' already correct.
            raw_text
        } else if top.0 > 0
            && let Some(rows) = raw_text.strip_prefix('\n')
        {
            // Last-line delete with rows above: the leading '\n' is the
            // separator taken from the row above, and belongs at the end
            // (vim register convention). From row 0 there is no row above,
            // so a leading '\n' is the deleted text's own blank first line.
            format!("{rows}\n")
        } else if raw_text.is_empty() {
            // The buffer reports an empty inverse only when this linewise
            // operation removed nothing. Keep registers untouched.
            return String::new();
        } else {
            // Whole-buffer delete: no newline in inverse text, append one.
            format!("{raw_text}\n")
        }
    } else {
        raw_text
    };
    if text.is_empty() {
        // Non-linewise delete yielded no text — nothing to record.
        return text;
    }
    if record {
        ed.record_yank_to_host(text.clone());
        let target = vim_mut(ed).pending_register.take();
        ed.record_delete(text.clone(), matches!(kind, RangeKind::Linewise), target);
    }
    text
}
/// The rows of a linewise register's text, for pasting: whole lines, each
/// ending in `\n`, so only the last terminator goes. A blank first or last
/// line is content — `yap` over a blank-led paragraph pastes the blank line
/// too, which trimming every leading and trailing `\n` lost.
fn linewise_payload(text: &str) -> &str {
    text.strip_suffix('\n').unwrap_or(text)
}
/// `D` / `C` — delete from cursor to end of line through the edit
/// funnel. Pushes the deleted text to the clipboard via `record_yank_to_host`
/// and the textarea's yank buffer (still observed by `p`/`P` until the paste
/// path is ported). Cursor lands at the deletion start so the caller
/// can decide whether to step it left (`D`) or open insert mode (`C`).
pub fn delete_to_eol<H: hjkl_engine::types::Host>(ed: &mut Editor<hjkl_buffer::View, H>) {
    use hjkl_buffer::{Edit, MotionKind, Position};
    ed.sync_buffer_content_from_textarea();
    let cursor = buf_cursor_pos(ed.buffer());
    let line_chars = buf_line_chars(ed.buffer(), cursor.row);
    if cursor.col >= line_chars {
        return;
    }
    let inverse = ed.mutate_edit(Edit::DeleteRange {
        start: cursor,
        end: Position::new(cursor.row, line_chars),
        kind: MotionKind::Char,
    });
    if let Edit::InsertStr { text, .. } = inverse
        && !text.is_empty()
    {
        ed.record_yank_to_host(text.clone());
        ed.set_yank_linewise(false);
        // `record_delete`, not `set_yank`: `"aD` / `"aC` must write the named
        // register, and an unnamed `D` is a small delete, so vim also puts it
        // in `"-`. `set_yank` reached neither.
        let target = vim_mut(ed).pending_register.take();
        ed.record_delete(text, false, target);
    }
    buf_set_cursor_pos(ed.buffer_mut(), cursor);
}
pub fn do_char_delete<H: hjkl_engine::types::Host>(
    ed: &mut Editor<hjkl_buffer::View, H>,
    forward: bool,
    count: usize,
) {
    use hjkl_buffer::{Edit, MotionKind, Position};
    // `x` on a CLOSED fold deletes the whole fold linewise, from any column
    // (vim `:h fold`: a closed fold is included as a whole). An `l` that put
    // the cursor at column > 0 has already opened the fold (`'foldopen'`
    // `hor`), so it no longer reaches here. `X` is a *backward* delete and is
    // never promoted — nvim leaves it charwise (a no-op at column 0), even on
    // a closed fold.
    if forward {
        let cursor_row = ed.cursor().0;
        let (fold_start, fold_end) =
            expand_linewise_over_closed_folds(ed.buffer(), cursor_row, cursor_row);
        if (fold_start, fold_end) != (cursor_row, cursor_row) {
            run_operator_over_range(
                ed,
                Operator::Delete,
                (fold_start, 0),
                (fold_end, 0),
                RangeKind::Linewise,
            );
            return;
        }
    }
    ed.push_undo();
    ed.sync_buffer_content_from_textarea();
    // Collect deleted chars so we can write them to the unnamed register
    // (vim's `x`/`X` populate `"` so that `xp` round-trips the char).
    let mut deleted = String::new();
    for _ in 0..count {
        let cursor = buf_cursor_pos(ed.buffer());
        let line_chars = buf_line_chars(ed.buffer(), cursor.row);
        if forward {
            // `x` — delete the char under the cursor. Vim no-ops on
            // an empty line; the buffer would drop a row otherwise.
            // `break`, not `continue`: the cursor can't regress below
            // EOL, so remaining iterations would spin uselessly (a
            // saturated count prefix would hang the editor).
            if cursor.col >= line_chars {
                break;
            }
            let inverse = ed.mutate_edit(Edit::DeleteRange {
                start: cursor,
                end: Position::new(cursor.row, cursor.col + 1),
                kind: MotionKind::Char,
            });
            if let Edit::InsertStr { text, .. } = inverse {
                deleted.push_str(&text);
            }
        } else {
            // `X` — delete the char before the cursor. `break` for the
            // same no-further-progress reason as the `x` arm above.
            if cursor.col == 0 {
                break;
            }
            let inverse = ed.mutate_edit(Edit::DeleteRange {
                start: Position::new(cursor.row, cursor.col - 1),
                end: cursor,
                kind: MotionKind::Char,
            });
            if let Edit::InsertStr { text, .. } = inverse {
                // X deletes backwards; prepend so the register text
                // matches reading order (first deleted char first).
                deleted = text + &deleted;
            }
        }
    }
    if !deleted.is_empty() {
        ed.record_yank_to_host(deleted.clone());
        let target = vim_mut(ed).pending_register.take();
        ed.record_delete(deleted, false, target);
    }
    // B11: `x` deleting the last char(s) of a line can leave the cursor one
    // past the new end — vim clamps to the new last column in Normal mode.
    let cursor = buf_cursor_pos(ed.buffer());
    let line_chars = buf_line_chars(ed.buffer(), cursor.row);
    if line_chars > 0 && cursor.col >= line_chars {
        buf_set_cursor_pos(ed.buffer_mut(), Position::new(cursor.row, line_chars - 1));
    }
    // `x` / `X` are the operators `dl` / `dh`, so the curswant follows the
    // cursor here too — the `.` replay reaches this without the live key
    // path that otherwise resets it (`lx.j`).
    remember_operator_column(ed);
}
/// A number located on one line, with its post-`delta` text already formatted.
///
/// `start..end` are char indices into the line the span was found on; replacing
/// that range with `text` performs the adjustment.
struct AdjustedNumber {
    start: usize,
    end: usize,
    text: String,
}

/// Find the leftmost number at or after char index `from` on `chars`, add
/// `delta`, and format the result the way vim does.
///
/// A `0x`/`0X` hex literal wins over a bare decimal starting at the same index.
/// Returns `None` when the rest of the line holds no number, or when the digits
/// found do not fit the parse type — both cases mean "leave the line alone".
///
/// This is the single implementation shared by normal-mode
/// [`adjust_number`] and visual-mode [`adjust_number_visual`]; keeping one
/// copy is what stops the two modes from drifting on padding and digit case.
fn adjusted_number_at(chars: &[char], from: usize, delta: i64) -> Option<AdjustedNumber> {
    let len = chars.len();
    let is_hex_prefix = |i: usize| {
        chars[i] == '0'
            && matches!(chars.get(i + 1), Some('x' | 'X'))
            && chars.get(i + 2).is_some_and(|c| c.is_ascii_hexdigit())
    };
    let start = (from.min(len)..len).find(|&i| is_hex_prefix(i) || chars[i].is_ascii_digit())?;

    if is_hex_prefix(start) {
        // `0x` + hex digits. Increment in hex, preserve the digit width.
        let digits_start = start + 2;
        let mut digits_end = digits_start;
        while digits_end < len && chars[digits_end].is_ascii_hexdigit() {
            digits_end += 1;
        }
        let digits: String = chars[digits_start..digits_end].iter().collect();
        let n = u64::from_str_radix(&digits, 16).ok()?;
        let new_val = (n as i128 + delta as i128).max(0) as u64;
        let width = digits_end - digits_start;
        let prefix: String = chars[start..digits_start].iter().collect();
        // Vim picks the output's letter case from the *last* letter digit of
        // the original ("0xaB" <C-a> -> "0xAC", "0xAb" -> "0xac"). With no
        // letter digit to go by it falls back to the `x`/`X` prefix's own case
        // ("0X19" <C-a> -> "0X1A", "0x19" -> "0x1a").
        let upper = digits
            .chars()
            .rev()
            .find(|c| c.is_ascii_alphabetic())
            .map_or(chars[start + 1] == 'X', |c| c.is_ascii_uppercase());
        let text = if upper {
            format!("{prefix}{new_val:0width$X}")
        } else {
            format!("{prefix}{new_val:0width$x}")
        };
        return Some(AdjustedNumber {
            start,
            end: digits_end,
            text,
        });
    }

    // Signed decimal. A leading `-` immediately before the digits is part of
    // the number.
    let span_start = if start > 0 && chars[start - 1] == '-' {
        start - 1
    } else {
        start
    };
    let mut span_end = start;
    while span_end < len && chars[span_end].is_ascii_digit() {
        span_end += 1;
    }
    let s: String = chars[span_start..span_end].iter().collect();
    let n = s.parse::<i64>().ok()?;
    let new_val = n as i128 + delta as i128;
    // Vim zero-pads the result back to the original digit width, but only when
    // the original number actually had a leading zero (`:h CTRL-A`): "10"
    // <C-x> -> "9", not "09"; "007" <C-x> -> "006". The `-` sign is never part
    // of the padded width — "-007" <C-a> -> "-006", and crossing zero into
    // negative still pads the digits ("009" 20<C-x> -> "-011").
    let digits: String = chars[start..span_end].iter().collect();
    let width = digits.len();
    let text = if width > 1 && digits.starts_with('0') {
        if new_val < 0 {
            let mag = new_val.unsigned_abs();
            format!("-{mag:0width$}")
        } else {
            format!("{new_val:0width$}")
        }
    } else {
        new_val.to_string()
    };
    Some(AdjustedNumber {
        start: span_start,
        end: span_end,
        text,
    })
}

/// Vim `Ctrl-a` / `Ctrl-x` — find the next number at or after the cursor on the
/// current line, add `delta`, leave the cursor on the last digit of the result.
/// Recognises `0x`/`0X` hex literals (incremented in hex, width and digit case
/// preserved) as well as signed decimals. No-op if the line has no number to
/// the right.
pub fn adjust_number<H: hjkl_engine::types::Host>(
    ed: &mut Editor<hjkl_buffer::View, H>,
    delta: i64,
) -> bool {
    use hjkl_buffer::{Edit, MotionKind, Position};
    ed.sync_buffer_content_from_textarea();
    let cursor = buf_cursor_pos(ed.buffer());
    let row = cursor.row;
    let chars: Vec<char> = match buf_line(ed.buffer(), row) {
        Some(l) => l.chars().collect(),
        None => return false,
    };
    let Some(AdjustedNumber {
        start: span_start,
        end: span_end,
        text: new_s,
    }) = adjusted_number_at(&chars, cursor.col, delta)
    else {
        return false;
    };

    ed.push_undo();
    let span_start_pos = Position::new(row, span_start);
    let span_end_pos = Position::new(row, span_end);
    ed.mutate_edit(Edit::DeleteRange {
        start: span_start_pos,
        end: span_end_pos,
        kind: MotionKind::Char,
    });
    ed.mutate_edit(Edit::InsertStr {
        at: span_start_pos,
        text: new_s.clone(),
    });
    let new_len = new_s.chars().count();
    buf_set_cursor_rc(ed.buffer_mut(), row, span_start + new_len.saturating_sub(1));
    true
}
pub fn replace_char<H: hjkl_engine::types::Host>(
    ed: &mut Editor<hjkl_buffer::View, H>,
    ch: char,
    count: usize,
) {
    use hjkl_buffer::{Edit, MotionKind, Position};
    ed.sync_buffer_content_from_textarea();
    // Vim aborts `r{count}{char}` entirely — replacing nothing — when fewer
    // than `count` characters remain from the cursor to end-of-line, rather
    // than replacing a partial run. Check before touching undo/the buffer.
    let start = buf_cursor_pos(ed.buffer());
    let start_line_chars = buf_line_chars(ed.buffer(), start.row);
    if count == 0 || start.col + count > start_line_chars {
        return;
    }
    ed.push_undo();
    for _ in 0..count {
        let cursor = buf_cursor_pos(ed.buffer());
        let line_chars = buf_line_chars(ed.buffer(), cursor.row);
        if cursor.col >= line_chars {
            break;
        }
        ed.mutate_edit(Edit::DeleteRange {
            start: cursor,
            end: Position::new(cursor.row, cursor.col + 1),
            kind: MotionKind::Char,
        });
        ed.mutate_edit(Edit::InsertChar { at: cursor, ch });
    }
    // Vim leaves the cursor on the last replaced char.
    hjkl_engine::motions::move_left(ed.buffer_mut(), 1);
}
/// Returns `false` when there is no char under the cursor to toggle
/// (end of line / empty line) so counted loops can stop instead of
/// spinning through a saturated count prefix.
pub fn toggle_case_at_cursor<H: hjkl_engine::types::Host>(
    ed: &mut Editor<hjkl_buffer::View, H>,
) -> bool {
    use hjkl_buffer::{Edit, MotionKind, Position};
    ed.sync_buffer_content_from_textarea();
    let cursor = buf_cursor_pos(ed.buffer());
    let Some(c) = buf_line(ed.buffer(), cursor.row).and_then(|l| l.chars().nth(cursor.col)) else {
        return false;
    };
    let toggled = if c.is_uppercase() {
        c.to_lowercase().collect::<String>()
    } else {
        c.to_uppercase().collect::<String>()
    };
    ed.mutate_edit(Edit::DeleteRange {
        start: cursor,
        end: Position::new(cursor.row, cursor.col + 1),
        kind: MotionKind::Char,
    });
    ed.mutate_edit(Edit::InsertStr {
        at: cursor,
        text: toggled,
    });
    true
}
/// Whether `row` has a line below it for `J` / `gJ` to pull up. Vim does
/// not join with ropey's phantom trailing empty row (the ropey
/// representation of a trailing newline), so a phantom is no line below.
fn has_line_to_join<H: hjkl_engine::types::Host>(
    ed: &Editor<hjkl_buffer::View, H>,
    row: usize,
) -> bool {
    let n_rows = buf_row_count(ed.buffer());
    row + 1 < n_rows
        && !(row + 2 >= n_rows && buf_line(ed.buffer(), row + 1).is_some_and(|s| s.is_empty()))
}
/// `[count]J` / `[count]gJ` from the last line join nothing, but with a
/// count of 3 or more vim still moves the cursor to column 0 — column 0
/// itself, not the first non-blank; a bare or `2` count keeps the column.
/// Call before the joins.
pub fn reset_column_for_counted_join_on_last_line<H: hjkl_engine::types::Host>(
    ed: &mut Editor<hjkl_buffer::View, H>,
    count: usize,
) {
    let row = buf_cursor_pos(ed.buffer()).row;
    if count >= 3 && !has_line_to_join(ed, row) {
        buf_set_cursor_rc(ed.buffer_mut(), row, 0);
    }
}
/// Returns `false` when the cursor is on the last line (nothing to
/// join) so counted loops can stop instead of spinning.
pub fn join_line<H: hjkl_engine::types::Host>(ed: &mut Editor<hjkl_buffer::View, H>) -> bool {
    use hjkl_buffer::{Edit, Position};
    ed.sync_buffer_content_from_textarea();
    let row = buf_cursor_pos(ed.buffer()).row;
    if !has_line_to_join(ed, row) {
        return false;
    }
    let cur_line = buf_line(ed.buffer(), row).unwrap_or_default();
    let next_raw = buf_line(ed.buffer(), row + 1).unwrap_or_default();
    let next_trimmed = next_raw.trim_start();
    let cur_chars = cur_line.chars().count();
    let next_chars = next_raw.chars().count();
    // `J` inserts a single space iff both sides are non-empty after
    // stripping the next line's leading whitespace.
    let separator = if !cur_line.is_empty()
        && !next_trimmed.is_empty()
        && !cur_line.ends_with([' ', '\t'])
        && !next_trimmed.starts_with(')')
    {
        " "
    } else {
        ""
    };
    let joined = format!("{cur_line}{separator}{next_trimmed}");
    let joined_chars = joined.chars().count();
    ed.mutate_edit(Edit::Replace {
        start: Position::new(row, 0),
        end: Position::new(row + 1, next_chars),
        with: joined,
    });
    // Vim parks the cursor on the inserted space — or at the join
    // point when no space went in (which is the same column either
    // way, since the space sits exactly at `cur_chars`). Joining an
    // empty or blank line appends nothing, and the join point is then
    // past the end: vim clamps it onto the last character.
    buf_set_cursor_rc(
        ed.buffer_mut(),
        row,
        cur_chars.min(joined_chars.saturating_sub(1)),
    );
    true
}
/// `gJ` — join the next line onto the current one without inserting a
/// separating space or stripping leading whitespace.
/// Returns `false` when the cursor is on the last line. See [`join_line`].
pub fn join_line_raw<H: hjkl_engine::types::Host>(ed: &mut Editor<hjkl_buffer::View, H>) -> bool {
    use hjkl_buffer::Edit;
    ed.sync_buffer_content_from_textarea();
    let row = buf_cursor_pos(ed.buffer()).row;
    if !has_line_to_join(ed, row) {
        return false;
    }
    let join_col = buf_line_chars(ed.buffer(), row);
    ed.mutate_edit(Edit::JoinLines {
        row,
        count: 1,
        with_space: false,
    });
    // Vim leaves the cursor at the join point (end of original line),
    // clamped onto the last character when the joined line added nothing.
    let last_col = buf_line_chars(ed.buffer(), row).saturating_sub(1);
    buf_set_cursor_rc(ed.buffer_mut(), row, join_col.min(last_col));
    true
}
/// Visual-mode `J` (`with_space = true`) / `gJ` (`with_space = false`) — join
/// every line spanned by the selection into one. A single-line selection joins
/// the current line with the one below (matching normal-mode `J`).
pub fn visual_join<H: hjkl_engine::types::Host>(
    ed: &mut Editor<hjkl_buffer::View, H>,
    with_space: bool,
) {
    let (cursor_row, cursor_col) = ed.cursor();
    // `start_col`: the selection's start column, where vim leaves the cursor
    // when there is nothing to join.
    let (top, bot, start_col) = match vim(ed).mode {
        Mode::VisualLine => (
            cursor_row.min(vim(ed).visual_line_anchor),
            cursor_row.max(vim(ed).visual_line_anchor),
            0,
        ),
        Mode::VisualBlock => {
            let a = vim(ed).block_anchor;
            (
                a.0.min(cursor_row),
                a.0.max(cursor_row),
                a.1.min(cursor_col),
            )
        }
        Mode::Visual => {
            let a = vim(ed).visual_anchor;
            let start = a.min((cursor_row, cursor_col));
            (a.0.min(cursor_row), a.0.max(cursor_row), start.1)
        }
        _ => return,
    };
    // N selected lines → N-1 joins; a single line still does one join (with the
    // line below) like normal-mode `J`.
    let joins = (bot - top).max(1);
    ed.push_undo();
    buf_set_cursor_rc(ed.buffer_mut(), top, 0);
    let mut joined_any = false;
    for _ in 0..joins {
        let joined = if with_space {
            join_line(ed)
        } else {
            join_line_raw(ed)
        };
        if !joined {
            break;
        }
        joined_any = true;
    }
    if !joined_any {
        // Nothing to join (a one-row selection on the last line): vim leaves
        // the cursor where the selection starts, not at column 0.
        buf_set_cursor_rc(ed.buffer_mut(), top, start_col);
    }
    // B1: visual `J`/`gJ` is exactly `[joins + 1]J`/`gJ` from the top row —
    // reuse the existing `JoinLine` dot-repeat entry (`:h v_J`) rather than
    // adding a bespoke visual variant; replay already starts at whatever
    // row the cursor is on, same as this function does via the
    // `buf_set_cursor_rc` above.
    if !vim(ed).replaying {
        vim_mut(ed).last_change = Some(LastChange::JoinLine { count: joins });
    }
    vim_mut(ed).mode = Mode::Normal;
    ed.set_sticky_col(Some(buf_cursor_pos(ed.buffer()).col));
}
/// `[count]%` — go to the line at `count` percent of the file (vim: line
/// `(count * line_count + 99) / 100`), cursor on the first non-blank.
pub fn goto_percent<H: hjkl_engine::types::Host>(
    ed: &mut Editor<hjkl_buffer::View, H>,
    count: usize,
) {
    let rows = buf_row_count(ed.buffer());
    if rows == 0 {
        return;
    }
    // Exclude the phantom trailing empty line (a file ending in `\n` is N lines
    // in vim, not N+1) so the percentage matches nvim.
    let total = if rows >= 2 && buf_line(ed.buffer(), rows - 1).is_some_and(|s| s.is_empty()) {
        rows - 1
    } else {
        rows
    };
    // 1-based target line, clamped to the buffer (vim: ceil(count*lines/100)).
    // Saturating: a pathological count prefix (e.g. 20 typed digits) must not
    // overflow the multiply; the clamp below caps the result at `total` anyway.
    let line = count.saturating_mul(total).div_ceil(100).clamp(1, total);
    let pre = ed.cursor();
    ed.jump_cursor(line - 1, 0);
    move_first_non_whitespace(ed);
    ed.set_sticky_col(Some(ed.cursor().1));
    if ed.cursor() != pre {
        ed.push_jump(pre);
    }
}
/// Indent width of a leading-whitespace prefix, counting a `\t` as advancing
/// to the next `tabstop` boundary and a space as one column.
pub fn indent_width(s: &str, tabstop: usize) -> usize {
    let ts = tabstop.max(1);
    let mut w = 0usize;
    for c in s.chars() {
        match c {
            ' ' => w += 1,
            '\t' => w += ts - (w % ts),
            _ => break,
        }
    }
    w
}
/// Build a leading-whitespace string of `width` columns honoring `expandtab`
/// (spaces) vs `noexpandtab` (tabs for full `tabstop` runs, spaces remainder).
pub fn build_indent(width: usize, expandtab: bool, tabstop: usize) -> String {
    if expandtab {
        return " ".repeat(width);
    }
    let ts = tabstop.max(1);
    let tabs = width / ts;
    let spaces = width % ts;
    format!("{}{}", "\t".repeat(tabs), " ".repeat(spaces))
}
/// `]p` / `[p` reindent: shift every line of `text` so the FIRST line's indent
/// matches `target_width` columns; later lines keep their relative offset.
pub fn reindent_block(text: &str, target_width: usize, settings: &hjkl_engine::Settings) -> String {
    let ts = settings.tabstop.max(1);
    let lines: Vec<&str> = text.split('\n').collect();
    let first_width = lines.first().map_or(0, |l| indent_width(l, ts));
    let delta = target_width as isize - first_width as isize;
    lines
        .iter()
        .map(|line| {
            let trimmed = line.trim_start_matches([' ', '\t']);
            if trimmed.is_empty() {
                // Preserve blank lines as truly empty (vim does not indent them).
                return String::new();
            }
            let old_w = indent_width(line, ts) as isize;
            let new_w = (old_w + delta).max(0) as usize;
            format!(
                "{}{}",
                build_indent(new_w, settings.expandtab, settings.tabstop),
                trimmed
            )
        })
        .collect::<Vec<_>>()
        .join("\n")
}
/// Upper bound on the bytes one `p` / `P` may insert, counting the `count`
/// prefix's multiplication. A count can request terabytes (`yy` then
/// `999999999p`), so a bound has to exist; what it must not do is refuse an
/// ordinary large yank.
///
/// Measured on the batched paste path (release, Linux; glibc and mimalloc
/// within noise of each other): peak RSS is linear in payload at ~3.1x
/// charwise, ~4.1x linewise and ~2.9x blockwise, and independent of document
/// size. At this value a paste costs ~208 MiB peak and ~73 ms charwise, an
/// order of magnitude under the 2 GiB ceiling the weekly cron fuzz job runs
/// with — under that ceiling the batched path only aborts past a 448 MiB
/// payload. It also matches `hjkl_fs::read::BODY`, so pasting is no longer
/// stricter than opening a file of the same size.
///
/// The 1 MiB this replaced was derived from the pre-batching implementation,
/// whose cost tracked iteration count rather than payload bytes.
pub const MAX_PASTE_BYTES: usize = 64 * 1024 * 1024;

/// Queue vim's own out-of-memory message for a paste that would exceed
/// [`MAX_PASTE_BYTES`]. `bytes` is what the user asked for, not the cap.
fn reject_oversized_paste<H: hjkl_engine::types::Host>(
    ed: &mut Editor<hjkl_buffer::View, H>,
    bytes: usize,
) {
    ed.push_error(format!("E342: Out of memory!  (allocating {bytes} bytes)"));
}

pub fn do_paste<H: hjkl_engine::types::Host>(
    ed: &mut Editor<hjkl_buffer::View, H>,
    before: bool,
    count: usize,
    cursor_after: bool,
    reindent: bool,
) -> bool {
    use hjkl_buffer::{Edit, Position};
    // Resolve the source register: `"reg` prefix (consumed) or the
    // unnamed register otherwise. Read text + linewise from the
    // selected slot rather than the global `vim.yank_linewise` so
    // pasting from `"0` after a delete still uses the yank's layout.
    let selector = vim_mut(ed).pending_register.take();
    // `"+p`/`"*p`: refresh the register slot from the live OS clipboard
    // before reading it below (audit-r2 fix 4) — otherwise this reads
    // whatever the internal slot last had from an in-editor `"+y`.
    sync_clipboard_register_for(ed, selector);
    let (yank, linewise, blockwise, block_width) =
        ed.with_registers(|regs| match selector.and_then(|c| regs.read(c)) {
            Some(slot) => (
                slot.text.clone(),
                slot.linewise,
                slot.blockwise,
                slot.block_width,
            ),
            // Read both fields from the unnamed slot rather than mixing the
            // slot's text with `vim.yank_linewise`. The cached vim flag is
            // per-editor, so a register imported from another editor (e.g.
            // cross-buffer yank/paste) carried the wrong linewise without
            // this — pasting a linewise yank inserted at the char cursor.
            None => (
                regs.unnamed.text.clone(),
                regs.unnamed.linewise,
                regs.unnamed.blockwise,
                regs.unnamed.block_width,
            ),
        });
    // Vim `:h '[` / `:h ']`: after paste `[` = first inserted char of
    // the final paste, `]` = last inserted char of the final paste.
    // We track (lo, hi) across iterations; the last value wins.
    // Capture the cursor row before any paste iterations. Vim's
    // linewise `[count]p` lands the cursor on the FIRST pasted line
    // (original_row + 1), not on the last iteration's paste row.
    // Without this snapshot the per-iteration cursor advancement leaves
    // the cursor at `original_row + count` instead.
    let original_row_for_linewise_after = if linewise && !before {
        // Fold-aware: `p` on a closed fold pastes after the fold, so the first
        // pasted line is `fold_end + 1`, not `cursor_row + 1`.
        let r = buf_cursor_pos(ed.buffer()).row;
        let (_, fold_end) = expand_linewise_over_closed_folds(ed.buffer(), r, r);
        Some(fold_end)
    } else {
        None
    };
    // Empty register: nothing to paste on any iteration — bail before the
    // loop instead of `continue`-spinning through a huge count prefix.
    if yank.is_empty() {
        return false;
    }
    // Bound requested source bytes before allocating or opening an undo entry.
    // A rejection here used to be indistinguishable from an empty register:
    // `do_paste` returned `false` and nothing downstream could tell the two
    // apart. It reports vim's own code for the case now, through the engine's
    // error queue (`apps/hjkl` drains it after each key). An arithmetic
    // overflow is reported as the budget it would have blown rather than as a
    // separate condition — the user's ask is the same size either way.
    let Some(requested_bytes) = yank.len().checked_mul(count) else {
        reject_oversized_paste(ed, yank.len().saturating_mul(count));
        return false;
    };
    if requested_bytes > MAX_PASTE_BYTES {
        reject_oversized_paste(ed, requested_bytes);
        return false;
    }
    if blockwise {
        let Some(block_bytes) = block_width
            .checked_mul(yank.split('\n').count())
            .and_then(|bytes| bytes.checked_mul(count))
        else {
            reject_oversized_paste(ed, usize::MAX);
            return false;
        };
        let Some(total_bytes) = requested_bytes.checked_add(block_bytes) else {
            reject_oversized_paste(ed, usize::MAX);
            return false;
        };
        if total_bytes > MAX_PASTE_BYTES {
            reject_oversized_paste(ed, total_bytes);
            return false;
        }
    }
    ed.push_undo();
    // Blockwise register (`<C-v>` yank/delete): re-insert the row segments
    // as columns at the cursor. Handles its own cursor / marks / sticky
    // column, so return before the charwise/linewise loop below.
    if blockwise {
        do_block_paste(ed, before, count, block_width, &yank);
        return true;
    }
    // Charwise pastes insert the register text repeated `count` times as a
    // single block. Linewise pastes likewise construct one multi-line edit:
    // applying a separate edit per copy magnifies undo and allocation costs.
    let paste_mark = if linewise {
        ed.sync_buffer_content_from_textarea();
        let row = buf_cursor_pos(ed.buffer()).row;
        let mut text = linewise_payload(&yank).to_string();
        if reindent {
            let cur_line = buf_line(ed.buffer(), row).unwrap_or_default();
            let target_w = indent_width(&cur_line, ed.settings().tabstop.max(1));
            text = reindent_block(&text, target_w, ed.settings());
        }
        let (fold_start, fold_end) = expand_linewise_over_closed_folds(ed.buffer(), row, row);
        let payload = std::iter::repeat_n(text.as_str(), count)
            .collect::<Vec<_>>()
            .join("\n");
        let target_row = if before {
            ed.mutate_edit(Edit::InsertStr {
                at: Position::new(fold_start, 0),
                text: format!("{payload}\n"),
            });
            fold_start
        } else {
            let line_chars = buf_line_chars(ed.buffer(), fold_end);
            ed.mutate_edit(Edit::InsertStr {
                at: Position::new(fold_end, line_chars),
                text: format!("\n{payload}"),
            });
            fold_end + 1
        };
        buf_set_cursor_rc(ed.buffer_mut(), target_row, 0);
        hjkl_engine::motions::move_first_non_blank(ed.buffer_mut());
        // `split`, not `lines`: a payload ending in a blank line still has
        // that row.
        let payload_lines = payload.split('\n').count().max(1);
        let bot_row = target_row + payload_lines - 1;
        let bot_last_col = buf_line_chars(ed.buffer(), bot_row).saturating_sub(1);
        ((target_row, 0), (bot_row, bot_last_col))
    } else {
        ed.sync_buffer_content_from_textarea();
        // Charwise paste. `P` inserts at cursor (shifting cell
        // right); `p` inserts after cursor (advance one cell first,
        // clamped to the end of the line).
        let cursor = buf_cursor_pos(ed.buffer());
        let at = if before {
            cursor
        } else {
            let line_chars = buf_line_chars(ed.buffer(), cursor.row);
            Position::new(cursor.row, (cursor.col + 1).min(line_chars))
        };
        let repeated = yank.repeat(count);
        ed.mutate_edit(Edit::InsertStr { at, text: repeated });
        // Vim parks the cursor on the last char of the pasted text
        // (do_insert_str leaves it one past the end). `gp` instead
        // leaves the cursor just AFTER the pasted text, so skip the
        // step-back there.
        if !cursor_after && ed.cursor().1 > 0 {
            hjkl_engine::motions::move_left(ed.buffer_mut(), 1);
        }
        // Charwise: `[` = insert start, `]` = last pasted char.
        let lo = (at.row, at.col);
        let hi = if cursor_after {
            let c = ed.cursor();
            (c.0, c.1.saturating_sub(1))
        } else {
            ed.cursor()
        };
        (lo, hi)
    };
    ed.set_mark('[', paste_mark.0);
    ed.set_mark(']', paste_mark.1);
    // `gp` / `gP` linewise: cursor lands on the line just AFTER the pasted
    // block (the `]` mark's row + 1), at column 0, clamped to the last row.
    if cursor_after && linewise {
        let bot_row = paste_mark.1.0;
        let last_row = buf_row_count(ed.buffer()).saturating_sub(1);
        let target = (bot_row + 1).min(last_row);
        buf_set_cursor_rc(ed.buffer_mut(), target, 0);
    } else if let Some(orig_row) = original_row_for_linewise_after {
        // Linewise `p` (after) with count: cursor lands on the FIRST pasted
        // line (original_row + 1) — vim parity. The per-iteration loop
        // moves cursor to each paste's target_row, so without this reset
        // `5p` would land at original_row + 5 instead of original_row + 1.
        let first_target = orig_row.saturating_add(1);
        buf_set_cursor_rc(ed.buffer_mut(), first_target, 0);
        hjkl_engine::motions::move_first_non_blank(ed.buffer_mut());
    }
    // Any paste re-anchors the sticky column to the new cursor position.
    ed.set_sticky_col(Some(buf_cursor_pos(ed.buffer()).col));
    true
}
/// Blockwise paste (`p`/`P` with a visual-block register). Re-inserts the
/// register's row segments as COLUMNS at the cursor — vim's true
/// block-paste geometry — rather than spilling each segment onto its own
/// new line. `count` repeats each segment horizontally.
///
/// Geometry (verified against nvim v0.12.4):
/// - `p` inserts starting at the column AFTER the cursor, `P` AT the
///   cursor column; segment row `i` lands on buffer row `cursor.row + i`.
/// - Rows past the buffer end are created; a target row shorter than the
///   insert column is padded with spaces up to it.
/// - Each segment is padded with trailing spaces to the register's block
///   `width` and then repeated `count` times — but ONLY when there is text
///   after the insert column on that row; at end-of-line no trailing
///   padding is added (matches nvim).
/// - The cursor lands on the top-left cell of the pasted block.
///
/// The caller (`do_paste`) has already pushed the undo checkpoint.
fn do_block_paste<H: hjkl_engine::types::Host>(
    ed: &mut Editor<hjkl_buffer::View, H>,
    before: bool,
    count: usize,
    width: usize,
    yank: &str,
) {
    use hjkl_buffer::{Edit, Position};
    ed.sync_buffer_content_from_textarea();
    let cursor = buf_cursor_pos(ed.buffer());
    let start_row = cursor.row;
    // Insert column (char index). `P` inserts at the cursor; `p` after it.
    // On an empty line `p` has no char to sit after, so it inserts at col 0.
    let cur_len = buf_line_chars(ed.buffer(), start_row);
    let insert_col = if before {
        cursor.col
    } else if cur_len == 0 {
        0
    } else {
        cursor.col + 1
    };
    let segments: Vec<&str> = yank.split('\n').collect();
    // `Edit::InsertBlock` splices into rows that already exist and skips any
    // row past the end of the rope, so the rows a block paste extends the
    // buffer by have to be opened first. One `InsertStr` of the bare line
    // breaks does that; both edits sit inside the single undo entry
    // `do_paste` already pushed, so the paste stays one undo step.
    let last_row = start_row + segments.len().saturating_sub(1);
    let raw_rows = buf_row_count(ed.buffer());
    // ropey reports a phantom trailing empty line whenever the buffer ends in
    // a newline. That line is the terminator, not a row a block may be pasted
    // into: splicing a segment there consumes the final newline and the buffer
    // silently stops ending in one. Anchor the new rows on the last row of
    // real content instead, which leaves the terminator past them.
    let trailing_nl = raw_rows > 1 && buf_line_chars(ed.buffer(), raw_rows - 1) == 0;
    let content_rows = if trailing_nl { raw_rows - 1 } else { raw_rows };
    if last_row >= content_rows {
        let anchor = content_rows.saturating_sub(1);
        let at = Position::new(anchor, buf_line_chars(ed.buffer(), anchor));
        ed.mutate_edit(Edit::InsertStr {
            at,
            text: "\n".repeat(last_row + 1 - content_rows),
        });
    }
    // Build one chunk per row. `do_insert_block` space-pads a row shorter
    // than `insert_col` itself and records the pad width on the inverse, so
    // the ragged-row case needs no rewriting of the row here.
    let chunks: Vec<String> = segments
        .iter()
        .enumerate()
        .map(|(i, seg)| {
            // Pad the segment to the block width only when it is followed by
            // text on this row — at EOL vim adds no trailing spaces.
            let tail_is_empty = buf_line_chars(ed.buffer(), start_row + i) <= insert_col;
            if tail_is_empty {
                return seg.repeat(count);
            }
            let seg_len = seg.chars().count();
            let mut padded = String::with_capacity(seg.len() + width.saturating_sub(seg_len));
            padded.push_str(seg);
            if seg_len < width {
                padded.extend(std::iter::repeat_n(' ', width - seg_len));
            }
            padded.repeat(count)
        })
        .collect();
    ed.mutate_edit(Edit::InsertBlock {
        at: Position::new(start_row, insert_col),
        chunks,
    });
    // Cursor lands on the top-left cell of the pasted block.
    ed.jump_cursor(start_row, insert_col);
    // `[` / `]` span the pasted block's top-left .. bottom-left column.
    let bot_row = start_row + segments.len().saturating_sub(1);
    ed.set_mark('[', (start_row, insert_col));
    ed.set_mark(']', (bot_row, insert_col));
    ed.set_sticky_col(Some(insert_col));
}
/// Visual-mode `p` / `P` — replace the active selection with the register.
/// With `p` the deleted selection lands in the unnamed register (vim's swap);
/// with `P` (`before = true`) the source register is preserved so it can be
/// pasted over multiple selections in turn.
pub fn visual_paste<H: hjkl_engine::types::Host>(
    ed: &mut Editor<hjkl_buffer::View, H>,
    before: bool,
) {
    use hjkl_buffer::{Edit, Position};
    ed.sync_buffer_content_from_textarea();

    // Resolve the source register (selector or unnamed) BEFORE the delete
    // overwrites the unnamed register with the cut selection.
    let selector = vim_mut(ed).pending_register.take();
    // `"+p`/`"*p` in visual mode: same live-clipboard refresh as normal-mode
    // paste (audit-r2 fix 4).
    sync_clipboard_register_for(ed, selector);
    let (reg_text, reg_linewise, reg_blockwise, reg_block_width) =
        ed.with_registers(|regs| match selector.and_then(|c| regs.read(c)) {
            Some(slot) => (
                slot.text.clone(),
                slot.linewise,
                slot.blockwise,
                slot.block_width,
            ),
            None => (
                regs.unnamed.text.clone(),
                regs.unnamed.linewise,
                regs.unnamed.blockwise,
                regs.unnamed.block_width,
            ),
        });
    // For `P`, snapshot the unnamed register so we can restore it afterwards.
    let saved_unnamed = before.then(|| ed.with_registers(|regs| regs.unnamed.clone()));

    let mode = vim(ed).mode;
    ed.push_undo();

    match mode {
        Mode::VisualLine => {
            let cursor_row = buf_cursor_pos(ed.buffer()).row;
            let top = cursor_row.min(vim(ed).visual_line_anchor);
            let bot = cursor_row.max(vim(ed).visual_line_anchor);
            // Measured before the cut, while the rows are still there. A
            // trailing newline shows as an empty row past the last content
            // row.
            let deleted_through_last = bot >= last_content_row(ed);
            let ends_in_newline = buf_row_count(ed.buffer()) > last_content_row(ed) + 1;
            // Delete the selected lines into the unnamed register.
            cut_vim_range(ed, (top, 0), (bot, 0), RangeKind::Linewise);
            // Insert the register as fresh line(s) where the selection was.
            let text = linewise_payload(&reg_text).to_string();
            let line_count = buf_row_count(ed.buffer());
            if reg_text.is_empty() {
                // Nothing to put back: vim's `Vp` with an empty register is
                // `Vd`, and lands the cursor the same way.
                land_after_linewise_delete(ed, top, deleted_through_last);
            } else if top == 0 && deleted_through_last {
                // The selection was the whole buffer, which the cut left as one
                // empty row: the register replaces that row instead of going in
                // above it, and the buffer keeps whether it ended in a newline.
                let newline = if ends_in_newline { "\n" } else { "" };
                ed.mutate_edit(Edit::InsertStr {
                    at: Position::new(0, 0),
                    text: format!("{text}{newline}"),
                });
                buf_set_cursor_rc(ed.buffer_mut(), 0, 0);
            } else if top >= line_count {
                // Selection reached the end of the buffer: append below the
                // (new) last line.
                let last = line_count.saturating_sub(1);
                let lc = buf_line_chars(ed.buffer(), last);
                ed.mutate_edit(Edit::InsertStr {
                    at: Position::new(last, lc),
                    text: format!("\n{text}"),
                });
                buf_set_cursor_rc(ed.buffer_mut(), last + 1, 0);
            } else {
                ed.mutate_edit(Edit::InsertStr {
                    at: Position::new(top, 0),
                    text: format!("{text}\n"),
                });
                buf_set_cursor_rc(ed.buffer_mut(), top, 0);
            }
            hjkl_engine::motions::move_first_non_blank(ed.buffer_mut());
        }
        Mode::Visual => {
            let anchor = vim(ed).visual_anchor;
            let cursor = ed.cursor();
            let (top, bot) = order(anchor, cursor);
            // Delete the selection into the unnamed register. A selection
            // ending on a line's NUL takes the line break with it.
            let (from, to, kind) = charwise_visual_range(ed, top, bot);
            cut_vim_range(ed, from, to, kind);
            // Insert the register text where the selection started.
            if reg_linewise {
                // Linewise register into a charwise hole: vim splits the line
                // where the selection was and puts the register's lines
                // between the two halves.
                let text = linewise_payload(&reg_text).to_string();
                ed.mutate_edit(Edit::InsertStr {
                    at: Position::new(top.0, top.1),
                    text: format!("\n{text}\n"),
                });
                buf_set_cursor_rc(ed.buffer_mut(), top.0 + 1, 0);
                hjkl_engine::motions::move_first_non_blank(ed.buffer_mut());
            } else {
                ed.mutate_edit(Edit::InsertStr {
                    at: Position::new(top.0, top.1),
                    text: reg_text.clone(),
                });
                // Park the cursor on the last char of the inserted text. An
                // empty register inserts nothing, and a selection cut through
                // the end of the line leaves that column past the new end.
                let inserted_len = reg_text.chars().count();
                let last_col = top.1 + inserted_len.saturating_sub(1);
                buf_set_cursor_rc(ed.buffer_mut(), top.0, last_col);
                clamp_cursor_to_normal_mode(ed);
            }
        }
        Mode::VisualBlock => {
            // `p`/`P` over a VISUAL-BLOCK selection: delete the rectangle,
            // then put the source register according to its kind. Verified
            // against nvim v0.12.4 — each register type places differently:
            //   - blockwise reg → re-inserted as columns at the block's
            //     top-left, exactly like a normal-mode block paste.
            //   - linewise reg  → opened as fresh line(s) BELOW the block's
            //     bottom row (not inline).
            //   - single-line charwise reg → replicated at the block's LEFT
            //     column on EVERY row of the (now-deleted) block.
            //   - multi-line charwise reg → a plain inline charwise paste at
            //     the block's top-left (cursor parks at the paste start).
            let (top, bot, left, right) = block_bounds(ed);
            let to_eol = vim(ed).block_to_eol;
            // Snapshot the rectangle for the `p` swap register.
            let deleted = block_yank(ed, top, bot, left, right, to_eol);
            let del_width = if to_eol {
                deleted
                    .split('\n')
                    .map(|s| s.chars().count())
                    .max()
                    .unwrap_or(0)
            } else {
                right + 1 - left
            };
            delete_block_contents(ed, top, bot, left, right, to_eol);
            // `p` swaps the deleted block into the unnamed register (blockwise);
            // `P` preserves the source register (restored below via
            // `saved_unnamed`).
            if !before && !deleted.is_empty() {
                ed.record_yank_to_host(deleted.clone());
                ed.record_delete_block(deleted, del_width, None);
            }
            if reg_blockwise {
                ed.jump_cursor(top, left);
                // `before = true` makes `do_block_paste` insert AT `left`
                // (the block's now-vacated left column) rather than after it.
                do_block_paste(ed, true, 1, reg_block_width, &reg_text);
            } else if reg_linewise {
                let text = linewise_payload(&reg_text).to_string();
                let lc = buf_line_chars(ed.buffer(), bot);
                ed.mutate_edit(Edit::InsertStr {
                    at: Position::new(bot, lc),
                    text: format!("\n{text}"),
                });
                buf_set_cursor_rc(ed.buffer_mut(), bot + 1, 0);
                hjkl_engine::motions::move_first_non_blank(ed.buffer_mut());
            } else if reg_text.contains('\n') {
                ed.mutate_edit(Edit::InsertStr {
                    at: Position::new(top, left),
                    text: reg_text.clone(),
                });
                buf_set_cursor_rc(ed.buffer_mut(), top, left);
            } else {
                // Single-line charwise: replicate at the left column on every
                // block row. Rows shorter than `left` are SKIPPED (no
                // padding) — verified against nvim v0.12.4: pasting "d" over
                // a col-3 block whose middle row is only 2 chars leaves that
                // short row untouched.
                for r in top..=bot {
                    let line_len = buf_line_chars(ed.buffer(), r);
                    if left > line_len {
                        continue;
                    }
                    ed.mutate_edit(Edit::InsertStr {
                        at: Position::new(r, left),
                        text: reg_text.clone(),
                    });
                }
                let last_col = left + reg_text.chars().count().saturating_sub(1);
                buf_set_cursor_rc(ed.buffer_mut(), top, last_col);
            }
        }
        _ => {}
    }

    // `P` preserves the source register; restore the snapshot.
    if let Some(slot) = saved_unnamed {
        ed.with_registers_mut(|regs| regs.unnamed = slot);
    }
    vim_mut(ed).mode = Mode::Normal;
    ed.set_sticky_col(Some(buf_cursor_pos(ed.buffer()).col));
}
/// Visual-mode `<C-a>` / `<C-x>` and `g<C-a>` / `g<C-x>`. Adds `delta` to the
/// first number on each selected line. When `sequential` is true the increment
/// grows by `delta` for each successive number found (vim's `g<C-a>`): the
/// first gets `delta`, the second `2*delta`, and so on.
pub fn adjust_number_visual<H: hjkl_engine::types::Host>(
    ed: &mut Editor<hjkl_buffer::View, H>,
    delta: i64,
    sequential: bool,
) {
    use hjkl_buffer::{Edit, MotionKind, Position};
    ed.sync_buffer_content_from_textarea();
    let mode = vim(ed).mode;
    let cursor = buf_cursor_pos(ed.buffer());

    // Resolve the row range + the per-row start column to scan from.
    let (top, bot, mut scan_col_first, block_left) = match mode {
        Mode::VisualLine => {
            let t = cursor.row.min(vim(ed).visual_line_anchor);
            let b = cursor.row.max(vim(ed).visual_line_anchor);
            (t, b, 0usize, None)
        }
        Mode::Visual => {
            let (a, c) = order(vim(ed).visual_anchor, (cursor.row, cursor.col));
            (a.0, c.0, a.1, None)
        }
        Mode::VisualBlock => {
            let (a, c) = order(vim(ed).block_anchor, (cursor.row, cursor.col));
            let left = a.1.min(c.1);
            (a.0, c.0, left, Some(left))
        }
        _ => return,
    };

    ed.push_undo();
    let mut found_count: i64 = 0;
    for row in top..=bot {
        let start_col = match block_left {
            Some(left) => left,
            None => {
                // First row of a charwise selection starts at the anchor/cursor
                // column; subsequent rows start at column 0.
                let c = if row == top { scan_col_first } else { 0 };
                scan_col_first = 0;
                c
            }
        };
        let chars: Vec<char> = match buf_line(ed.buffer(), row) {
            Some(l) => l.chars().collect(),
            None => continue,
        };
        // `g<C-a>` scales the increment by how many numbers have been adjusted
        // so far, so the delta for *this* row assumes the row yields one.
        // `found_count` only advances once `adjusted_number_at` confirms it did
        // — a row with no number, or with digits that fail to parse, must not
        // consume a step of the sequence.
        let this_delta = if sequential {
            delta.saturating_mul(found_count.saturating_add(1))
        } else {
            delta
        };
        let Some(AdjustedNumber {
            start: span_start,
            end: span_end,
            text: new_s,
        }) = adjusted_number_at(&chars, start_col, this_delta)
        else {
            continue;
        };
        found_count += 1;
        let span_start_pos = Position::new(row, span_start);
        let span_end_pos = Position::new(row, span_end);
        ed.mutate_edit(Edit::DeleteRange {
            start: span_start_pos,
            end: span_end_pos,
            kind: MotionKind::Char,
        });
        ed.mutate_edit(Edit::InsertStr {
            at: span_start_pos,
            text: new_s,
        });
    }
    // Vim leaves the cursor at the start of the selection.
    buf_set_cursor_rc(ed.buffer_mut(), top, block_left.unwrap_or(0));
    vim_mut(ed).mode = Mode::Normal;
    ed.set_sticky_col(Some(buf_cursor_pos(ed.buffer()).col));
}
#[cfg(test)]
mod replace_char_tests {
    use hjkl_buffer::{View, rope_line_str};
    use hjkl_engine::{DefaultHost, Editor, Options};

    fn line(ed: &Editor<View, DefaultHost>, row: usize) -> String {
        rope_line_str(&ed.buffer().rope(), row)
    }

    #[test]
    fn replace_char_count_exceeding_line_replaces_nothing() {
        let buf = View::from_str("ab\ncd");
        let mut ed = crate::vim::vim_editor(buf, DefaultHost::new(), Options::default());
        // Cursor at (0,0); `3rx` needs 3 chars but the line has 2 — vim aborts
        // the whole command and replaces nothing (not a partial run).
        super::replace_char(&mut ed, 'x', 3);
        assert_eq!(line(&ed, 0), "ab", "partial replace must not happen");
        assert_eq!(line(&ed, 1), "cd", "must not spill onto the next line");
    }

    #[test]
    fn replace_char_count_fitting_replaces_run() {
        let buf = View::from_str("abc");
        let mut ed = crate::vim::vim_editor(buf, DefaultHost::new(), Options::default());
        super::replace_char(&mut ed, 'x', 2);
        assert_eq!(line(&ed, 0), "xxc");
    }
}
#[cfg(test)]
mod g_ampersand_tests {
    use super::*;
    use hjkl_buffer::{View, rope_line_str};
    use hjkl_engine::{DefaultHost, Editor, Options};

    fn make_editor(content: &str) -> Editor<View, DefaultHost> {
        let buf = View::from_str(content);
        let host = DefaultHost::new();
        crate::vim::vim_editor(buf, host, Options::default())
    }

    fn buf_line(ed: &Editor<View, DefaultHost>, row: usize) -> String {
        let rope = ed.buffer().rope();
        rope_line_str(&rope, row).trim_end_matches('\n').to_string()
    }

    /// `g&` repeats last `:s/foo/bar/` over every line (no /g flag → first
    /// match per line only).
    #[test]
    fn g_ampersand_repeats_last_substitute_on_whole_buffer() {
        let mut ed = make_editor("foo\nfoo bar foo\nbaz");
        // Simulate a prior `:s/foo/bar/` by setting last_substitute directly.
        let cmd = hjkl_engine::substitute::parse_substitute("/foo/bar/").unwrap();
        ed.set_last_substitute(cmd);
        // Cursor on line 0 (to confirm g& operates on ALL lines, not just current).
        apply_after_g(&mut ed, '&', 1);
        assert_eq!(buf_line(&ed, 0), "bar");
        // No /g flag — only first match per line.
        assert_eq!(buf_line(&ed, 1), "bar bar foo");
        assert_eq!(buf_line(&ed, 2), "baz");
    }

    /// `g&` with /g flag replaces all matches per line.
    #[test]
    fn g_ampersand_with_g_flag_replaces_all_per_line() {
        let mut ed = make_editor("foo foo\nfoo");
        let cmd = hjkl_engine::substitute::parse_substitute("/foo/bar/g").unwrap();
        ed.set_last_substitute(cmd);
        apply_after_g(&mut ed, '&', 1);
        assert_eq!(buf_line(&ed, 0), "bar bar");
        assert_eq!(buf_line(&ed, 1), "bar");
    }

    /// `g&` with no prior substitute is a no-op.
    #[test]
    fn g_ampersand_noop_when_no_prior_substitute() {
        let mut ed = make_editor("foo\nbar");
        // No last_substitute set — must not panic, must not change buffer.
        apply_after_g(&mut ed, '&', 1);
        assert_eq!(buf_line(&ed, 0), "foo");
        assert_eq!(buf_line(&ed, 1), "bar");
    }
}

#[cfg(test)]
mod fold_char_delete_tests {
    use hjkl_buffer::{View, rope_line_str};
    use hjkl_engine::types::FoldOp;
    use hjkl_engine::{DefaultHost, Editor, Options};

    use super::do_char_delete;

    fn make_editor(content: &str, fold: Option<(usize, usize)>) -> Editor<View, DefaultHost> {
        let mut ed = crate::vim::vim_editor(
            View::from_str(content),
            DefaultHost::new(),
            Options::default(),
        );
        ed.jump_cursor(0, 0);
        if let Some((start, end)) = fold {
            ed.apply_fold_op(FoldOp::Add {
                start_row: start,
                end_row: end,
                closed: true,
            });
        }
        ed
    }

    fn full_buffer(ed: &Editor<View, DefaultHost>) -> String {
        let rope = ed.buffer().rope();
        (0..rope.len_lines())
            .map(|i| rope_line_str(&rope, i).to_string())
            .collect::<Vec<_>>()
            .join("\n")
    }

    #[test]
    fn x_on_closed_fold_deletes_whole_fold_linewise() {
        let mut ed = make_editor("abc\ndef\nghi\n", Some((0, 1)));
        do_char_delete(&mut ed, true, 1);
        assert_eq!(full_buffer(&ed), "ghi\n");
        assert_eq!(ed.yank(), "abc\ndef\n");
        assert_eq!(ed.cursor(), (0, 0));
    }

    #[test]
    fn backward_char_delete_on_closed_fold_is_not_promoted() {
        let mut ed = make_editor("abc\ndef\nghi\n", Some((0, 1)));
        do_char_delete(&mut ed, false, 1);
        assert_eq!(full_buffer(&ed), "abc\ndef\nghi\n");
        assert_eq!(ed.yank(), "");
    }

    #[test]
    fn x_on_single_line_fold_stays_charwise() {
        let mut ed = make_editor("abc\ndef\nghi\n", Some((0, 0)));
        do_char_delete(&mut ed, true, 1);
        assert_eq!(full_buffer(&ed), "bc\ndef\nghi\n");
        assert_eq!(ed.yank(), "a");
    }

    #[test]
    fn x_on_plain_buffer_deletes_one_char() {
        let mut ed = make_editor("abc\ndef\nghi\n", None);
        do_char_delete(&mut ed, true, 1);
        assert_eq!(full_buffer(&ed), "bc\ndef\nghi\n");
        assert_eq!(ed.yank(), "a");
    }

    #[test]
    fn x_at_col1_on_closed_fold_stays_charwise() {
        let mut ed = make_editor("abc\ndef\nghi\n", Some((0, 1)));
        // `l`, not a bare cursor jump: it is `'foldopen'` running after the
        // `l` that opens the fold, so the `x` that follows is charwise.
        crate::vim::execute_motion(&mut ed, hjkl_vim_types::Motion::Right, 1);
        do_char_delete(&mut ed, true, 1);
        assert_eq!(full_buffer(&ed), "ac\ndef\nghi\n");
        assert_eq!(ed.yank(), "b");
    }
}