justerm_core/

input.rs

//! Input encoding (#11): consumer events → the bytes an application expects.
//!
//! The inverse of `feed` — a key/mouse/paste/focus event becomes the byte
//! sequence a TUI app reads on its stdin, decided by the DEC modes the engine
//! tracks from the *output* stream (DECCKM, mouse tracking/encoding, focus,
//! bracketed paste, modifyOtherKeys). The engine owns the modes; these functions
//! are pure (event + modes → bytes), so the consumer's I/O stays its own concern.
//!
//! This is the **legacy xterm** baseline (the common-90% every TUI speaks) plus two
//! negotiated extensions, kitty (#23) and `modifyOtherKeys` (#890). They are asked in
//! a fixed order and that order is deliberate — `docs/map/territory/input-encoding.md`.

use bitflags::bitflags;

bitflags! {
    /// Modifier keys held during an event. The bit values follow the **kitty**
    /// scheme (the superset): Shift=1, Alt=2, Ctrl=4, Super=8, Hyper=16, Meta=32,
    /// CapsLock=64, NumLock=128. Legacy xterm can only express the first three
    /// plus Meta-at-8, so `csi_param` remaps; kitty uses the bits directly (#23).
    ///
    /// **No `#[non_exhaustive]` (#844): the question does not arise for a bitflags set.** New members
    /// are bits inside the value, not fields, and the type is built through `empty()` / `from_bits`,
    /// never by struct literal.
    #[derive(Debug, Clone, Copy, PartialEq, Eq, Default)]
    pub struct Modifiers: u8 {
        const SHIFT     = 1;
        const ALT       = 2;
        const CTRL      = 4;
        const SUPER     = 8;
        const HYPER     = 16;
        const META      = 32;
        const CAPS_LOCK = 64;
        const NUM_LOCK  = 128;
    }
}

impl Modifiers {
    /// The legacy xterm CSI modifier parameter (`1 + bitmask`, Shift=1/Alt=2/
    /// Ctrl=4/Meta=8), or `None` when none of the legacy-expressible modifiers is
    /// held. Super/Hyper/CapsLock/NumLock have no legacy form and are dropped.
    fn csi_param(self) -> Option<u8> {
        let mut bits = 0u8;
        if self.contains(Modifiers::SHIFT) {
            bits |= 1;
        }
        if self.contains(Modifiers::ALT) {
            bits |= 2;
        }
        if self.contains(Modifiers::CTRL) {
            bits |= 4;
        }
        if self.contains(Modifiers::META) {
            bits |= 8;
        }
        if bits == 0 { None } else { Some(1 + bits) }
    }

    /// The kitty CSI modifier parameter (`1 + bits`) — the bit values already
    /// match the kitty scheme, so all eight modifiers are expressible (#23).
    fn kitty_param(self) -> Option<u8> {
        if self.is_empty() {
            None
        } else {
            Some(1 + self.bits())
        }
    }
}

/// A numeric-keypad key. In application-keypad mode (DECNKM ?66 / DECKPAM, #74)
/// these encode as the classic VT100/VT220 SS3 sequences; in numeric mode as the
/// literal character. The consumer produces these for *raw* keypad identity — it
/// owns NumLock / key-location resolution (#83).
///
/// **`#[non_exhaustive]` (#843).** A keypad namespace grows; a consumer *constructs*
/// these to hand to the encoder rather than matching on them, so an addition costs
/// it nothing.
#[non_exhaustive]
#[derive(Debug, Clone, Copy, PartialEq, Eq)]
pub enum KeypadKey {
    /// A keypad digit, `0..=9`.
    Digit(u8),
    Decimal,
    Enter,
    Add,
    Subtract,
    Multiply,
    Divide,
    Equal,
}

/// A logical key press from the consumer (already decoded from the platform's
/// keyboard event — justerm does not read hardware).
///
/// **`#[non_exhaustive]` (#843).** Key namespaces grow — media keys, the kitty
/// protocol's additions — and the traffic here runs inward: a consumer builds a
/// `Key` for [`crate::Engine::encode_key`] rather than matching one we hand it, so
/// the attribute costs it nothing and makes the next VT slice additive.
#[non_exhaustive]
#[derive(Debug, Clone, Copy, PartialEq, Eq)]
pub enum Key {
    /// A printable character (the consumer's already-composed text).
    Char(char),
    /// A numeric-keypad key (encoded per application-keypad mode, #83).
    Keypad(KeypadKey),
    Up,
    Down,
    Right,
    Left,
    Home,
    End,
    PageUp,
    PageDown,
    Insert,
    Delete,
    Enter,
    Tab,
    Backspace,
    Escape,
    /// Function key `F(n)`, `n` in 1..=12.
    F(u8),
}

/// Press / repeat / release. Legacy reports only presses; the kitty protocol's
/// "report event types" flag (bit 1) carries repeat and release too (#23).
///
/// **Deliberately exhaustive (#843).** `Press` / `Repeat` / `Release` is the kitty
/// keyboard protocol's event space, closed. Left exhaustive on purpose, not by
/// omission.
#[derive(Debug, Clone, Copy, PartialEq, Eq, Default)]
pub enum KeyAction {
    #[default]
    Press,
    Repeat,
    Release,
}

/// A key event: a key, the modifiers held with it, its press/repeat/release type
/// (defaults to `Press`), and consumer-supplied extras the kitty protocol's
/// alternate-keys / associated-text flags report (all `None` for legacy).
///
/// **No `#[non_exhaustive]` (#844).** 16 out-of-crate literal sites, and a `Default` already
/// exists, so `KeyEvent { key, ..Default::default() }` absorbs a new field at the caller's choice
/// rather than by imposition — the same reading as [`crate::Frame`].
#[derive(Debug, Clone, Copy, PartialEq, Eq)]
pub struct KeyEvent {
    pub key: Key,
    pub mods: Modifiers,
    pub action: KeyAction,
    /// Kitty alternate-keys (bit 2): the codepoint Shift would produce, if it
    /// differs from `key`.
    pub shifted_key: Option<char>,
    /// Kitty alternate-keys (bit 2): the codepoint at this key's position on the
    /// base (standard) layout, if it differs from `key`.
    pub base_key: Option<char>,
    /// Kitty associated-text (bit 4): the text the key actually produced
    /// (composed input / dead keys).
    pub text: Option<char>,
}

impl Default for KeyEvent {
    fn default() -> Self {
        KeyEvent {
            key: Key::Char('\0'),
            mods: Modifiers::empty(),
            action: KeyAction::Press,
            shifted_key: None,
            base_key: None,
            text: None,
        }
    }
}

/// Which mouse button an event concerns. `None` on a [`MouseEvent`] means bare
/// motion with no button held.
///
/// **Deliberately exhaustive (#843), and it is the case worth reading.** The set is
/// already open *at the data level* — [`MouseButton::Other`] carries any code we do
/// not name — so the attribute would add nothing a caller could use. That is what
/// separates this type from [`Key`], which has no catch-all: `Char` and `F` are
/// semantics, not escape hatches, so an unnamed key has nowhere to go and the
/// attribute is the only way to keep adding one cheap.
///
/// A second argument stood here and was **withdrawn as false** — that naming a
/// future `Button8` would stop `Other(8)` being produced and break a consumer
/// matching on it. Three things are wrong with it, and the first is four lines
/// above: X11 buttons **8 and 9 are already named**, as `Back` and `Forward`, and
/// `Other` is documented as `10+`. The encoder then collapses the distinction
/// anyway — `Some(Back)` and `Other(8)` both emit `128` — and nothing outside this
/// crate matches a `MouseButton` we hand it, because nothing is ever handed one.
/// Left in view rather than deleted: a doc-comment whose own example contradicts
/// the enum beside it is worse than no comment, and this one shipped through a
/// completeness pass before a refuting one caught it.
#[derive(Debug, Clone, Copy, PartialEq, Eq)]
pub enum MouseButton {
    Left,
    Middle,
    Right,
    WheelUp,
    WheelDown,
    /// Horizontal scroll / tilt-wheel — xterm buttons 6 and 7, encoded in the
    /// same 64-base wheel group as up/down.
    WheelLeft,
    WheelRight,
    /// The thumb buttons — X11 buttons 8 and 9, the "back"/"forward" of the
    /// 128-base extra group.
    Back,
    Forward,
    /// Any further mouse button by its X11 number (gaming-mouse side buttons,
    /// 10+). Encoded via the xterm bit formula; use the named variants above for
    /// buttons that have one.
    Other(u8),
}

/// What the mouse did.
///
/// **Deliberately exhaustive (#843).** `Press` / `Release` / `Motion` is what the
/// mouse protocols **justerm models** report, closed — and the qualifier matters,
/// because the unqualified version of this sentence is false. `?1001` hilite
/// tracking reports something else entirely (`ctlseqs.txt`, the Hilite Mouse
/// Tracking entry), and `MouseProtocol` does not model it — a crate-private type,
/// as rustdoc confirms by refusing to link it from here. So the closure is scoped
/// to the protocols that type names, and grows only if it does.
///
/// It is left exhaustive on both of #843's axes anyway: closed as scoped, and
/// inward-only — nothing public hands one of these outward, so the attribute would
/// cost a consumer nothing and buy nothing either.
#[derive(Debug, Clone, Copy, PartialEq, Eq)]
pub enum MouseAction {
    Press,
    Release,
    Motion,
}

/// A mouse event in viewport cell coordinates (0-based — the encoding shifts to
/// 1-based on the wire).
///
/// **No `#[non_exhaustive]` (#844).** 8 out-of-crate literal sites. Its growth cause is outside
/// this crate — mouse protocols are invented elsewhere, and `MouseEvents` arrived that way — but
/// the answer is a `Default`, as [`crate::KeyEvent`] already has, rather than an attribute;
/// recorded as follow-up in `docs/map/territory/published-surface.md`.
#[derive(Debug, Clone, Copy, PartialEq, Eq)]
pub struct MouseEvent {
    /// The button, or `None` for bare motion (no button held).
    pub button: Option<MouseButton>,
    pub action: MouseAction,
    pub col: usize,
    pub row: usize,
    /// 0-based pixel coordinates, used only by the `?1016` SGR-pixels encoding —
    /// the consumer (which has the window geometry) supplies them; the engine
    /// only formats them. Ignored by the cell-based encodings.
    pub px: usize,
    pub py: usize,
    pub mods: Modifiers,
}

/// Mouse tracking mode — *what* the app asked to be reported (DEC `?1000` /
/// `?1002` / `?1003`).
#[derive(Debug, Clone, Copy, PartialEq, Eq, Default)]
pub enum MouseProtocol {
    /// No reporting (default). `encode_mouse` returns `None`.
    #[default]
    Off,
    /// `?9` — the original X10 protocol: button **press only**, no release, no
    /// motion, no wheel, and no modifier bits.
    X10,
    /// `?1000` — button press and release only.
    Normal,
    /// `?1002` — also motion while a button is held (drag).
    ButtonEvent,
    /// `?1003` — also motion with no button held.
    AnyEvent,
}

bitflags::bitflags! {
    /// The mouse event categories the active tracking mode reports (#129) — the
    /// routing mask the frame carries so a frame-mode consumer sends an event to
    /// the app (a wanted bit set) or keeps it local (selection/scrollback). It is
    /// the single source `encode_mouse`'s restriction shares, so the wire mask and
    /// the encode-time gate cannot drift.
    ///
    /// **No `#[non_exhaustive]` (#844): the question does not arise for a bitflags set.** New members
    /// are bits inside the value, not fields, and the type is built through `empty()` / `from_bits`,
    /// never by struct literal.
    #[derive(Clone, Copy, PartialEq, Eq, Debug, Default)]
    pub struct MouseEvents: u8 {
        /// Button press (every protocol except `Off`).
        const DOWN  = 1 << 0;
        /// Button release (`?1000`+).
        const UP    = 1 << 1;
        /// Wheel turn (`?1000`+ — X10 excludes it).
        const WHEEL = 1 << 2;
        /// Motion while a button is held — drag (`?1002`+).
        const DRAG  = 1 << 3;
        /// Bare motion, no button held (`?1003`).
        const MOVE  = 1 << 4;
    }
}

impl MouseProtocol {
    /// The event categories this protocol reports — the routing mask carried on
    /// the frame (#129). This is the authoritative protocol→events table;
    /// `encode_mouse` gates on the same mask so the two cannot diverge.
    pub fn wanted_events(self) -> MouseEvents {
        match self {
            MouseProtocol::Off => MouseEvents::empty(),
            MouseProtocol::X10 => MouseEvents::DOWN,
            MouseProtocol::Normal => MouseEvents::DOWN | MouseEvents::UP | MouseEvents::WHEEL,
            MouseProtocol::ButtonEvent => {
                MouseEvents::DOWN | MouseEvents::UP | MouseEvents::WHEEL | MouseEvents::DRAG
            }
            MouseProtocol::AnyEvent => {
                MouseEvents::DOWN
                    | MouseEvents::UP
                    | MouseEvents::WHEEL
                    | MouseEvents::DRAG
                    | MouseEvents::MOVE
            }
        }
    }
}

/// Mouse coordinate encoding — *how* a report is framed (default X10 vs DEC
/// `?1006` SGR).
#[derive(Debug, Clone, Copy, PartialEq, Eq, Default)]
pub enum MouseEncoding {
    /// X10 `CSI M Cb Cx Cy`, each value offset by 32 — breaks past column 223.
    #[default]
    Default,
    /// `?1006` SGR `CSI < Cb ; Cx ; Cy M|m` — coords unbounded, release distinct.
    Sgr,
    /// `?1015` urxvt `CSI Cb ; Cx ; Cy M` — the Default byte semantics (Cb with
    /// the +32 base, release loses button identity) as decimal params, always
    /// terminated by `M`. Unbounded coords, no separate release form.
    Urxvt,
    /// `?1005` UTF-8 — the Default `CSI M Cb Cx Cy` framing but each value
    /// UTF-8-encoded, so values past 127 become multi-byte (extends the range).
    Utf8,
    /// `?1016` SGR-pixels — the SGR framing but the coordinates are pixels
    /// (from `MouseEvent::px`/`py`) instead of cells.
    SgrPixels,
}

const ESC: u8 = 0x1b;

/// Bit 0 of the kitty progressive-enhancement flags: disambiguate escape codes.
const KITTY_DISAMBIGUATE: u8 = 0b1;

/// Encode a key event to bytes, given the four pieces of mode state that decide it:
/// DECCKM (application cursor keys), application keypad, the kitty keyboard-protocol
/// flags, and `modifyOtherKeys` level 2. Returns `None` only for keys with no defined
/// encoding. The order the last two are asked in is load-bearing — `docs/map/territory/input-encoding.md`.
pub fn encode_key(
    ev: &KeyEvent,
    app_cursor: bool,
    app_keypad: bool,
    kitty_flags: u8,
    modify_other_keys_2: bool,
) -> Option<Vec<u8>> {
    // Under the kitty protocol, events legacy cannot express (a modifier on a
    // text key, a release/repeat) take the `CSI unicode ; mods : event u` form;
    // everything else falls through to legacy (#23).
    if kitty_flags != 0
        && let Some(bytes) = kitty_encode(ev, kitty_flags)
    {
        return Some(bytes);
    }
    // Deliberately *after* kitty and inside legacy, not beside it (#890).
    if modify_other_keys_2 && let Some(bytes) = modify_other_key(ev.key, ev.mods) {
        return Some(bytes);
    }
    match ev.key {
        Key::Char(c) => Some(encode_char(c, ev.mods)),
        Key::Keypad(k) => Some(keypad_key(k, app_keypad)),
        Key::Up => Some(cursor_key(b'A', ev.mods, app_cursor)),
        Key::Down => Some(cursor_key(b'B', ev.mods, app_cursor)),
        Key::Right => Some(cursor_key(b'C', ev.mods, app_cursor)),
        Key::Left => Some(cursor_key(b'D', ev.mods, app_cursor)),
        Key::Home => Some(cursor_key(b'H', ev.mods, app_cursor)),
        Key::End => Some(cursor_key(b'F', ev.mods, app_cursor)),
        Key::Insert => Some(tilde_key(2, ev.mods)),
        Key::Delete => Some(tilde_key(3, ev.mods)),
        Key::PageUp => Some(tilde_key(5, ev.mods)),
        Key::PageDown => Some(tilde_key(6, ev.mods)),
        Key::Enter => Some(vec![b'\r']),
        Key::Backspace => Some(vec![0x7f]), // DEL, the PC-keyboard convention
        Key::Escape => Some(vec![ESC]),
        Key::Tab => {
            if ev.mods.contains(Modifiers::SHIFT) {
                Some(vec![ESC, b'[', b'Z']) // back-tab (CBT)
            } else {
                Some(vec![b'\t'])
            }
        }
        Key::F(n) => function_key(n, ev.mods),
    }
}

/// Bit 1 of the kitty flags: report event types (repeat / release).
const KITTY_REPORT_EVENTS: u8 = 0b10;
/// Bit 2 of the kitty flags: report alternate (shifted / base-layout) keys.
const KITTY_ALTERNATE_KEYS: u8 = 0b100;
/// Bit 3 of the kitty flags: report all keys (incl. printable) as escape codes.
const KITTY_ALL_AS_ESCAPE: u8 = 0b1000;
/// Bit 4 of the kitty flags: report the text a key produced.
const KITTY_ASSOCIATED_TEXT: u8 = 0b10000;

/// Kitty `CSI unicode ; mods : event u` encoding. Returns `None` to fall through
/// to legacy when this event needs no kitty form (a plain press of an
/// unmodified key under disambiguate, etc.). The functional-key codepoint table
/// and the remaining flags grow this in later slices.
fn kitty_encode(ev: &KeyEvent, flags: u8) -> Option<Vec<u8>> {
    // Event sub-parameter — only reported when the report-events flag is on, and
    // a plain press is the omitted default.
    let event = if flags & KITTY_REPORT_EVENTS != 0 {
        match ev.action {
            KeyAction::Press => None,
            KeyAction::Repeat => Some(2),
            KeyAction::Release => Some(3),
        }
    } else {
        None
    };
    let modified = ev.mods.kitty_param();
    let disambiguate = flags & KITTY_DISAMBIGUATE != 0;

    // Functional keys (arrows / nav / F-keys) keep their legacy escape form but
    // gain the kitty `;mods:event` parameter when modified or evented; an
    // unmodified press stays legacy.
    if let Some((number, terminator)) = functional_key(ev.key) {
        if event.is_none() && modified.is_none() {
            return None; // legacy form
        }
        return Some(kitty_seq(number, modified, event, terminator));
    }

    // Codepoint keys. Escape is ambiguous (introduces sequences) → disambiguated
    // even unmodified. Enter/Tab/Backspace are the documented *exceptions*: legacy
    // unless modified or carrying a non-press event.
    let codepoint = match ev.key {
        Key::Escape => 27,
        Key::Enter => 13,
        Key::Tab => 9,
        Key::Backspace => 127,
        Key::Char(c) => c as u32,
        _ => return None,
    };
    // Escape disambiguates even unmodified. All-as-escape sends *every* key in
    // CSI u form — by here, functional keys are already handled, so the rest
    // (Esc/Enter/Tab/Backspace/Char) all qualify. Otherwise a modifier or a
    // non-press event is needed.
    let all_as_escape = flags & KITTY_ALL_AS_ESCAPE != 0;
    let always = (disambiguate && ev.key == Key::Escape) || all_as_escape;
    if !always && event.is_none() && !(disambiguate && modified.is_some()) {
        return None;
    }
    Some(kitty_csi_u(ev, codepoint, modified, event, flags))
}

/// The `CSI u` codepoint form, including the alternate-keys and associated-text
/// sub-fields when their flags are active:
/// `CSI codepoint[:shifted[:base]] [; mods[:event] [; text]] u`.
fn kitty_csi_u(
    ev: &KeyEvent,
    codepoint: u32,
    modified: Option<u8>,
    event: Option<u8>,
    flags: u8,
) -> Vec<u8> {
    let mut s = format!("\x1b[{codepoint}");

    // Alternate keys (bit 2): codepoint : shifted : base.
    if flags & KITTY_ALTERNATE_KEYS != 0 && (ev.shifted_key.is_some() || ev.base_key.is_some()) {
        s.push(':');
        if let Some(sh) = ev.shifted_key {
            s.push_str(&(sh as u32).to_string());
        }
        if let Some(b) = ev.base_key {
            s.push(':');
            s.push_str(&(b as u32).to_string());
        }
    }

    // The text sub-parameter (bit 4) forces the modifier field to be present.
    let text = if flags & KITTY_ASSOCIATED_TEXT != 0 {
        ev.text
    } else {
        None
    };
    if modified.is_some() || event.is_some() || text.is_some() {
        s.push(';');
        s.push_str(&modified.unwrap_or(1).to_string());
        if let Some(e) = event {
            s.push(':');
            s.push_str(&e.to_string());
        }
    }
    if let Some(txt) = text {
        s.push(';');
        s.push_str(&(txt as u32).to_string());
    }

    s.push('u');
    s.into_bytes()
}

/// A functional key's legacy CSI form: `(leading number, terminator)` — e.g. Up
/// is `(1, b'A')` → `CSI 1 A`, Delete is `(3, b'~')` → `CSI 3 ~`. `None` for keys
/// that take the `CSI u` codepoint form instead.
fn functional_key(key: Key) -> Option<(u32, u8)> {
    Some(match key {
        Key::Up => (1, b'A'),
        Key::Down => (1, b'B'),
        Key::Right => (1, b'C'),
        Key::Left => (1, b'D'),
        Key::Home => (1, b'H'),
        Key::End => (1, b'F'),
        Key::Insert => (2, b'~'),
        Key::Delete => (3, b'~'),
        Key::PageUp => (5, b'~'),
        Key::PageDown => (6, b'~'),
        Key::F(1) => (1, b'P'),
        Key::F(2) => (1, b'Q'),
        Key::F(3) => (1, b'R'),
        Key::F(4) => (1, b'S'),
        Key::F(5) => (15, b'~'),
        Key::F(6) => (17, b'~'),
        Key::F(7) => (18, b'~'),
        Key::F(8) => (19, b'~'),
        Key::F(9) => (20, b'~'),
        Key::F(10) => (21, b'~'),
        Key::F(11) => (23, b'~'),
        Key::F(12) => (24, b'~'),
        _ => return None,
    })
}

/// Build `CSI <number> [; <param> [: <event>]] <terminator>` — the shared shape
/// of both the `CSI u` codepoint form and the functional-key legacy form. The
/// `;param` is emitted when modified or evented (param defaults to 1).
fn kitty_seq(number: u32, modified: Option<u8>, event: Option<u8>, terminator: u8) -> Vec<u8> {
    let mut s = format!("\x1b[{number}");
    if modified.is_some() || event.is_some() {
        s.push(';');
        s.push_str(&modified.unwrap_or(1).to_string());
        if let Some(e) = event {
            s.push(':');
            s.push_str(&e.to_string());
        }
    }
    let mut v = s.into_bytes();
    v.push(terminator);
    v
}

/// A modified character under `modifyOtherKeys` level 2 (#890): `CSI 27 ; <1+mods> ;
/// <codepoint> ~`. `None` leaves the key to the ordinary legacy encoding.
///
/// Three things here are deliberate and none is obvious from the code: the emitted shape
/// is not the `u` form the reference also offers, one of its three qualifying clauses is
/// dropped, and named keys are in scope while `Delete` is not. All three, with what they
/// were measured against, are in `docs/map/territory/input-encoding.md` and
/// `docs/agents/reference-facts.md` (#890).
fn modify_other_key(key: Key, mods: Modifiers) -> Option<Vec<u8>> {
    let code = match key {
        Key::Char(c) => {
            char_qualifies(c, mods)?;
            c as u32
        }
        // Tab / Enter / Escape: any expressible modifier (`input.c:720-724`).
        Key::Tab => {
            // Shift alone is excluded on purpose, so back-tab keeps `CSI Z` (`:715-718`).
            mods.difference(Modifiers::SHIFT).csi_param()?;
            9
        }
        Key::Enter => {
            mods.csi_param()?;
            13
        }
        Key::Escape => {
            mods.csi_param()?;
            27
        }
        // Backspace: a modifier that is **not** Control, so `Ctrl+Backspace` keeps its
        // legacy byte (`input.c:706-710`). `127` rather than `8` is deliberate — note.
        Key::Backspace => {
            mods.difference(Modifiers::CTRL).csi_param()?;
            127
        }
        // **`Delete` and every other named key are deliberately out**, not forgotten — they
        // already have an unambiguous modified form. Grounds in the note; the references
        // disagree here.
        _ => return None,
    };
    let param = mods.csi_param()?;
    Some(format!("\x1b[27;{};{}~", param, code).into_bytes())
}

/// Whether a *character* key qualifies under level 2.
///
/// **Ask the question of the parameter, not of the raw bits** — a gate on the bitflags
/// admits a chord `csi_param` cannot then describe. Why that is a defect rather than a
/// nicety, and the modifier it was reached through, are in
/// `docs/map/territory/input-encoding.md`.
fn char_qualifies(c: char, mods: Modifiers) -> Option<()> {
    if mods.difference(Modifiers::SHIFT).csi_param().is_none()
        && !(mods == Modifiers::SHIFT && c == ' ')
    {
        return None;
    }
    Some(())
}

/// A printable character with modifiers. Ctrl folds an ASCII letter to its
/// control code; Alt (meta-sends-escape) prefixes ESC.
fn encode_char(c: char, mods: Modifiers) -> Vec<u8> {
    let mut out = Vec::new();
    if mods.contains(Modifiers::ALT) {
        out.push(ESC);
    }
    if mods.contains(Modifiers::CTRL) {
        // Ctrl+letter → 0x01..=0x1a; Ctrl+@/[/\/]/^/_ → 0x00..0x1f.
        let code = match c {
            'a'..='z' => Some((c as u8 - b'a') + 1),
            'A'..='Z' => Some((c as u8 - b'A') + 1),
            '@' => Some(0),
            '[' => Some(0x1b),
            '\\' => Some(0x1c),
            ']' => Some(0x1d),
            '^' => Some(0x1e),
            '_' => Some(0x1f),
            ' ' => Some(0),
            _ => None,
        };
        if let Some(b) = code {
            out.push(b);
            return out;
        }
    }
    let mut buf = [0u8; 4];
    out.extend_from_slice(c.encode_utf8(&mut buf).as_bytes());
    out
}

/// Cursor keys and Home/End. Unmodified: SS3 under DECCKM, else CSI. Modified:
/// always the CSI `1;<mod>` form regardless of DECCKM (xterm rule).
fn cursor_key(final_byte: u8, mods: Modifiers, app_cursor: bool) -> Vec<u8> {
    match mods.csi_param() {
        Some(param) => {
            let mut v = vec![ESC, b'['];
            v.extend_from_slice(b"1;");
            v.extend_from_slice(param.to_string().as_bytes());
            v.push(final_byte);
            v
        }
        None if app_cursor => vec![ESC, b'O', final_byte],
        None => vec![ESC, b'[', final_byte],
    }
}

/// A numeric-keypad key (#83). In application-keypad mode it is the classic
/// VT100/VT220 `SS3` sequence (`ESC O <final>`); in numeric mode it is the
/// literal character. Sequences verified against the xterm ctlseqs DEC
/// application-keypad table.
fn keypad_key(k: KeypadKey, app_keypad: bool) -> Vec<u8> {
    if app_keypad {
        let final_byte = match k {
            KeypadKey::Digit(n) => b'p' + n.min(9), // p=0 .. y=9
            KeypadKey::Decimal => b'n',
            KeypadKey::Enter => b'M',
            KeypadKey::Add => b'k',
            KeypadKey::Subtract => b'm',
            KeypadKey::Multiply => b'j',
            KeypadKey::Divide => b'o',
            KeypadKey::Equal => b'X',
        };
        vec![ESC, b'O', final_byte]
    } else {
        let c = match k {
            KeypadKey::Digit(n) => b'0' + n.min(9),
            KeypadKey::Decimal => b'.',
            KeypadKey::Enter => b'\r',
            KeypadKey::Add => b'+',
            KeypadKey::Subtract => b'-',
            KeypadKey::Multiply => b'*',
            KeypadKey::Divide => b'/',
            KeypadKey::Equal => b'=',
        };
        vec![c]
    }
}

/// Keys encoded as `CSI <n> ~` (Insert/Delete/PageUp/PageDown and F5+), with an
/// optional `;<mod>` parameter.
fn tilde_key(n: u8, mods: Modifiers) -> Vec<u8> {
    let mut v = vec![ESC, b'['];
    v.extend_from_slice(n.to_string().as_bytes());
    if let Some(param) = mods.csi_param() {
        v.push(b';');
        v.extend_from_slice(param.to_string().as_bytes());
    }
    v.push(b'~');
    v
}

/// Function keys. F1–F4 are SS3 `P/Q/R/S` (CSI `1;<mod>` form when modified);
/// F5–F12 are tilde keys `15/17/18/19/20/21/23/24 ~`.
fn function_key(n: u8, mods: Modifiers) -> Option<Vec<u8>> {
    match n {
        1..=4 => {
            let letter = b'P' + (n - 1); // P, Q, R, S
            match mods.csi_param() {
                Some(param) => {
                    let mut v = vec![ESC, b'[', b'1', b';'];
                    v.extend_from_slice(param.to_string().as_bytes());
                    v.push(letter);
                    Some(v)
                }
                None => Some(vec![ESC, b'O', letter]),
            }
        }
        5 => Some(tilde_key(15, mods)),
        6 => Some(tilde_key(17, mods)),
        7 => Some(tilde_key(18, mods)),
        8 => Some(tilde_key(19, mods)),
        9 => Some(tilde_key(20, mods)),
        10 => Some(tilde_key(21, mods)),
        11 => Some(tilde_key(23, mods)),
        12 => Some(tilde_key(24, mods)),
        _ => None,
    }
}

/// Whether a button is one of the wheel directions (the 64-base wheel group).
fn is_wheel(button: Option<MouseButton>) -> bool {
    matches!(
        button,
        Some(
            MouseButton::WheelUp
                | MouseButton::WheelDown
                | MouseButton::WheelLeft
                | MouseButton::WheelRight
        )
    )
}

/// The event's category as a single [`MouseEvents`] bit — what the tracking mode
/// must *want* for this event to report. Wheel releases are dropped before this
/// (see `encode_mouse`), so a `Release` here is always a real button-up.
fn event_category(ev: &MouseEvent) -> MouseEvents {
    match ev.action {
        MouseAction::Press if is_wheel(ev.button) => MouseEvents::WHEEL,
        MouseAction::Press => MouseEvents::DOWN,
        MouseAction::Release => MouseEvents::UP,
        MouseAction::Motion if ev.button.is_some() => MouseEvents::DRAG,
        MouseAction::Motion => MouseEvents::MOVE,
    }
}

/// Encode a mouse event, given the active tracking mode and encoding. Returns
/// `None` when reporting is off or the event is filtered out by the mode (e.g.
/// a bare move under `?1000`).
pub fn encode_mouse(ev: &MouseEvent, proto: MouseProtocol, enc: MouseEncoding) -> Option<Vec<u8>> {
    // A wheel turn is a single press-like event; a release on a wheel button is
    // not a real report (it would leak a bogus SGR `m` / an identity-less X10
    // release), so drop it — independent of the tracking mode.
    if ev.action == MouseAction::Release && is_wheel(ev.button) {
        return None;
    }
    // The tracking mode gates which event categories report at all. This is the
    // single source `MouseProtocol::wanted_events` — the same mask the frame
    // carries for the consumer's routing (#129) — so the encode-time gate and the
    // wire mask cannot drift. (Off wants nothing → None; X10 wants only DOWN, so
    // its press-only/no-wheel restriction falls out here too.)
    if !proto.wanted_events().contains(event_category(ev)) {
        return None;
    }
    // X10 (?9) additionally carries no modifier bits in the button byte; the
    // strip is applied at `mod_bits` below.
    let x10 = proto == MouseProtocol::X10;

    // Low button bits + wheel base.
    let button_bits = match ev.button {
        Some(MouseButton::Left) => 0,
        Some(MouseButton::Middle) => 1,
        Some(MouseButton::Right) => 2,
        Some(MouseButton::WheelUp) => 64,
        Some(MouseButton::WheelDown) => 65,
        Some(MouseButton::WheelLeft) => 66,
        Some(MouseButton::WheelRight) => 67,
        Some(MouseButton::Back) => 128,
        Some(MouseButton::Forward) => 129,
        // Any other button by its X11 number, via the xterm bit translation:
        // low 2 bits as-is, +64 for the wheel group, +128 for the extra group.
        Some(MouseButton::Other(n)) => {
            let n = n as usize;
            (n & 3) | (if n & 4 != 0 { 64 } else { 0 }) | (if n & 8 != 0 { 128 } else { 0 })
        }
        None => 3, // motion with no button: the "no button" code
    };
    let motion = if ev.action == MouseAction::Motion {
        32
    } else {
        0
    };
    // X10 carries no modifier bits; the others pack shift 4 / alt 8 / ctrl 16.
    let mod_bits = if x10 {
        0
    } else {
        (if ev.mods.contains(Modifiers::SHIFT) {
            4
        } else {
            0
        }) + (if ev.mods.contains(Modifiers::ALT) {
            8
        } else {
            0
        }) + (if ev.mods.contains(Modifiers::CTRL) {
            16
        } else {
            0
        })
    };

    let col1 = ev.col + 1;
    let row1 = ev.row + 1;

    match enc {
        MouseEncoding::Sgr | MouseEncoding::SgrPixels => {
            // SGR framing; `?1016` swaps cell coords for the consumer's pixels.
            // SGR keeps the button identity on release; the terminator says which.
            let cb = button_bits + motion + mod_bits;
            let (x, y) = if enc == MouseEncoding::SgrPixels {
                (ev.px + 1, ev.py + 1)
            } else {
                (col1, row1)
            };
            let final_byte = if ev.action == MouseAction::Release {
                b'm'
            } else {
                b'M'
            };
            let mut v = vec![ESC, b'[', b'<'];
            v.extend_from_slice(cb.to_string().as_bytes());
            v.push(b';');
            v.extend_from_slice(x.to_string().as_bytes());
            v.push(b';');
            v.extend_from_slice(y.to_string().as_bytes());
            v.push(final_byte);
            Some(v)
        }
        MouseEncoding::Default => {
            // X10: release loses button identity (button bits = 3); all values +32.
            let base = if ev.action == MouseAction::Release {
                3
            } else {
                button_bits
            };
            let cb = base + motion + mod_bits + 32;
            let cx = (col1 + 32).min(255) as u8;
            let cy = (row1 + 32).min(255) as u8;
            Some(vec![ESC, b'[', b'M', cb as u8, cx, cy])
        }
        MouseEncoding::Urxvt => {
            // Default's Cb semantics (release → button 3, +32 base) but as decimal
            // params and always terminated by `M`.
            let base = if ev.action == MouseAction::Release {
                3
            } else {
                button_bits
            };
            let cb = base + motion + mod_bits + 32;
            let mut v = vec![ESC, b'['];
            v.extend_from_slice(cb.to_string().as_bytes());
            v.push(b';');
            v.extend_from_slice(col1.to_string().as_bytes());
            v.push(b';');
            v.extend_from_slice(row1.to_string().as_bytes());
            v.push(b'M');
            Some(v)
        }
        MouseEncoding::Utf8 => {
            // Default's CSI M framing, but each value UTF-8-encoded so it can
            // exceed one byte (the 223-column fix that predates SGR).
            let base = if ev.action == MouseAction::Release {
                3
            } else {
                button_bits
            };
            let mut v = vec![ESC, b'[', b'M'];
            push_utf8(&mut v, base + motion + mod_bits + 32);
            push_utf8(&mut v, col1 + 32);
            push_utf8(&mut v, row1 + 32);
            Some(v)
        }
    }
}

/// Append `val` UTF-8-encoded (a single code point) — the ?1005 coordinate
/// packing. Out-of-range values fall back to the replacement character.
fn push_utf8(out: &mut Vec<u8>, val: usize) {
    let c = char::from_u32(val as u32).unwrap_or('\u{fffd}');
    let mut buf = [0u8; 4];
    out.extend_from_slice(c.encode_utf8(&mut buf).as_bytes());
}

/// Wrap pasted text in bracketed-paste markers when the mode is on, else return
/// it raw. The markers let the app treat the payload as literal text, never as
/// typed control sequences.
pub fn encode_paste(text: &str, bracketed: bool) -> Vec<u8> {
    if !bracketed {
        return text.as_bytes().to_vec();
    }
    let mut v = Vec::with_capacity(text.len() + 12);
    v.extend_from_slice(b"\x1b[200~");
    v.extend_from_slice(text.as_bytes());
    v.extend_from_slice(b"\x1b[201~");
    v
}

/// Focus in/out report (`CSI I` / `CSI O`), or `None` when focus reporting
/// (`?1004`) is off.
pub fn encode_focus(focused: bool, enabled: bool) -> Option<Vec<u8>> {
    if !enabled {
        return None;
    }
    Some(vec![ESC, b'[', if focused { b'I' } else { b'O' }])
}