Skip to main content

mermaid_cli/app/
event_source.rs

1//! Crossterm event stream → `Msg`.
2//!
3//! One of two branches in the main loop's central `select!`.
4//! Crossterm's `EventStream` yields key presses, mouse events,
5//! pastes, and resize notifications; we translate each into the
6//! typed `Msg` vocabulary the reducer understands.
7//!
8//! The event source knows nothing about state. The reducer owns
9//! the transitions; the event source just produces typed inputs.
10//!
11//! For `--replay`, a second event source (in `recorder.rs`) reads
12//! previously-recorded JSONL and yields the same Msg stream. The
13//! main loop can't tell live crossterm events apart from replayed
14//! ones — that's the point.
15
16use crossterm::event::{
17    Event as CtEvent, KeyCode as CtKeyCode, KeyEventKind, KeyModifiers as CtMods,
18    MouseEventKind as CtMouseKind,
19};
20
21use crate::domain::{Key, KeyCode, KeyMods, Msg, Paste};
22
23/// Translate one crossterm event into `Msg`. Returns `None` for
24/// events the reducer doesn't care about (focus gained/lost, unknown
25/// media keys, key repeats, etc.).
26pub fn event_to_msg(event: CtEvent) -> Option<Msg> {
27    match event {
28        CtEvent::Key(key) => {
29            // Skip KeyEventKind::Release and ::Repeat — we only act on
30            // initial press. Release events fire twice as many Keys
31            // and bloat any recorded session.
32            if key.kind != KeyEventKind::Press {
33                return None;
34            }
35            Some(Msg::Key(Key {
36                code: translate_key_code(key.code)?,
37                modifiers: translate_mods(key.modifiers),
38            }))
39        },
40        CtEvent::Paste(text) => {
41            if text.is_empty() {
42                None
43            } else {
44                Some(Msg::Paste(Paste::Text(text)))
45            }
46        },
47        CtEvent::Mouse(mouse) => match mouse.kind {
48            // F13: wire mouse wheel scroll. `UI_MOUSE_SCROLL_LINES`
49            // sets the delta per wheel tick to match the READMEs
50            // "mouse wheel scrolls the chat" contract.
51            CtMouseKind::ScrollUp => Some(Msg::MouseScroll {
52                delta: crate::constants::UI_MOUSE_SCROLL_LINES as i16,
53            }),
54            CtMouseKind::ScrollDown => Some(Msg::MouseScroll {
55                delta: -(crate::constants::UI_MOUSE_SCROLL_LINES as i16),
56            }),
57            _ => None,
58        },
59        CtEvent::Resize(w, h) => Some(Msg::Resize {
60            width: w,
61            height: h,
62        }),
63        CtEvent::FocusGained | CtEvent::FocusLost => None,
64    }
65}
66
67fn translate_key_code(code: CtKeyCode) -> Option<KeyCode> {
68    Some(match code {
69        CtKeyCode::Char(c) => KeyCode::Char(c),
70        CtKeyCode::Enter => KeyCode::Enter,
71        CtKeyCode::Esc => KeyCode::Escape,
72        CtKeyCode::Backspace => KeyCode::Backspace,
73        CtKeyCode::Delete => KeyCode::Delete,
74        CtKeyCode::Tab => KeyCode::Tab,
75        CtKeyCode::BackTab => KeyCode::BackTab,
76        CtKeyCode::Left => KeyCode::Left,
77        CtKeyCode::Right => KeyCode::Right,
78        CtKeyCode::Up => KeyCode::Up,
79        CtKeyCode::Down => KeyCode::Down,
80        CtKeyCode::Home => KeyCode::Home,
81        CtKeyCode::End => KeyCode::End,
82        CtKeyCode::PageUp => KeyCode::PageUp,
83        CtKeyCode::PageDown => KeyCode::PageDown,
84        CtKeyCode::F(n) => KeyCode::F(n),
85        _ => return Some(KeyCode::Unknown),
86    })
87}
88
89fn translate_mods(mods: CtMods) -> KeyMods {
90    KeyMods {
91        ctrl: mods.contains(CtMods::CONTROL),
92        alt: mods.contains(CtMods::ALT),
93        shift: mods.contains(CtMods::SHIFT),
94    }
95}
96
97/// Parse a slash-command input line (without the leading `/`) into a
98/// `SlashCmd`. Returns `SlashCmd::Unknown` if the command isn't in
99/// the registry. Shared between the TUI dispatcher (C8) and any
100/// non-interactive command dispatch.
101pub fn parse_slash_command(raw: &str) -> crate::domain::SlashCmd {
102    use crate::domain::SlashCmd;
103    let trimmed = raw.trim();
104    let (name, arg) = match trimmed.split_once(' ') {
105        Some((n, a)) => (n.to_lowercase(), Some(a.trim().to_string())),
106        None => (trimmed.to_lowercase(), None),
107    };
108
109    // Route through the registry so command aliases (/q → /quit) work.
110    use crate::domain::slash_commands::COMMAND_REGISTRY;
111    let canonical = COMMAND_REGISTRY
112        .iter()
113        .find(|c| c.name == name.as_str() || c.aliases.contains(&name.as_str()))
114        .map(|c| c.name);
115
116    match canonical {
117        Some("model") => SlashCmd::Model(arg),
118        Some("reasoning") => match arg.as_deref() {
119            None => SlashCmd::Reasoning(None),
120            Some(level) => {
121                use clap::ValueEnum;
122                SlashCmd::Reasoning(
123                    crate::models::ReasoningLevel::from_str(&level.to_lowercase(), true).ok(),
124                )
125            },
126        },
127        Some("visible-reasoning") => SlashCmd::VisibleReasoning(arg),
128        Some("clear") => SlashCmd::Clear,
129        Some("save") => SlashCmd::Save(arg),
130        Some("load") => SlashCmd::Load(arg),
131        Some("list") => SlashCmd::List,
132        Some("usage") => SlashCmd::Usage,
133        Some("context") => SlashCmd::Context,
134        Some("compact") => SlashCmd::Compact(arg),
135        Some("doctor") => SlashCmd::Doctor,
136        Some("tasks") => SlashCmd::Tasks,
137        Some("task") => SlashCmd::Task(arg),
138        Some("pause") => SlashCmd::Pause(arg),
139        Some("resume") => SlashCmd::Resume(arg),
140        Some("cancel") => SlashCmd::Cancel(arg),
141        Some("handoff") => SlashCmd::Handoff(arg),
142        Some("report") => SlashCmd::Report(arg),
143        Some("processes") => SlashCmd::Processes,
144        Some("logs") => SlashCmd::Logs(arg),
145        Some("stop") => SlashCmd::Stop(arg),
146        Some("restart") => SlashCmd::Restart(arg),
147        Some("open") => SlashCmd::Open(arg),
148        Some("ports") => SlashCmd::Ports,
149        Some("approvals") => SlashCmd::Approvals,
150        Some("approve") => SlashCmd::Approve(arg),
151        Some("deny") => SlashCmd::Deny(arg),
152        Some("checkpoint") => SlashCmd::Checkpoint(arg),
153        Some("checkpoints") => SlashCmd::Checkpoints,
154        Some("restore") => SlashCmd::Restore(arg),
155        Some("memory") => match arg {
156            Some(input) if input.starts_with("edit ") => {
157                SlashCmd::MemoryEdit(Some(input["edit ".len()..].trim().to_string()))
158            },
159            Some(_) | None => SlashCmd::Memory,
160        },
161        Some("remember") => SlashCmd::Remember(arg),
162        Some("forget") => SlashCmd::Forget(arg),
163        Some("plugins") => SlashCmd::Plugins,
164        Some("model-info") => SlashCmd::ModelInfo(arg),
165        Some("cloud-setup") => SlashCmd::CloudSetup,
166        Some("help") => SlashCmd::Help,
167        Some("quit") => SlashCmd::Quit,
168        _ => SlashCmd::Unknown(name),
169    }
170}
171
172#[cfg(test)]
173mod tests {
174    use super::*;
175    use crate::domain::SlashCmd;
176
177    #[test]
178    fn translates_printable_char_key() {
179        let ev = CtEvent::Key(crossterm::event::KeyEvent {
180            code: CtKeyCode::Char('a'),
181            modifiers: CtMods::NONE,
182            kind: KeyEventKind::Press,
183            state: crossterm::event::KeyEventState::NONE,
184        });
185        let msg = event_to_msg(ev).expect("msg");
186        match msg {
187            Msg::Key(k) => {
188                assert_eq!(k.code, KeyCode::Char('a'));
189                assert!(k.modifiers.is_empty());
190            },
191            _ => panic!("wrong variant"),
192        }
193    }
194
195    #[test]
196    fn translates_ctrl_c() {
197        let ev = CtEvent::Key(crossterm::event::KeyEvent {
198            code: CtKeyCode::Char('c'),
199            modifiers: CtMods::CONTROL,
200            kind: KeyEventKind::Press,
201            state: crossterm::event::KeyEventState::NONE,
202        });
203        let msg = event_to_msg(ev).expect("msg");
204        match msg {
205            Msg::Key(k) => {
206                assert_eq!(k.code, KeyCode::Char('c'));
207                assert!(k.modifiers.ctrl);
208                assert!(!k.modifiers.alt);
209            },
210            _ => panic!("wrong variant"),
211        }
212    }
213
214    #[test]
215    fn skips_release_events() {
216        let ev = CtEvent::Key(crossterm::event::KeyEvent {
217            code: CtKeyCode::Char('a'),
218            modifiers: CtMods::NONE,
219            kind: KeyEventKind::Release,
220            state: crossterm::event::KeyEventState::NONE,
221        });
222        assert!(event_to_msg(ev).is_none());
223    }
224
225    #[test]
226    fn resize_translates_to_resize_msg() {
227        let ev = CtEvent::Resize(80, 24);
228        let msg = event_to_msg(ev).expect("msg");
229        match msg {
230            Msg::Resize { width, height } => {
231                assert_eq!(width, 80);
232                assert_eq!(height, 24);
233            },
234            _ => panic!("wrong variant"),
235        }
236    }
237
238    #[test]
239    fn empty_paste_dropped() {
240        let ev = CtEvent::Paste(String::new());
241        assert!(event_to_msg(ev).is_none());
242    }
243
244    #[test]
245    fn paste_translates_to_text_paste() {
246        let ev = CtEvent::Paste("hello".to_string());
247        let msg = event_to_msg(ev).expect("msg");
248        match msg {
249            Msg::Paste(Paste::Text(s)) => assert_eq!(s, "hello"),
250            _ => panic!("wrong variant"),
251        }
252    }
253
254    #[test]
255    fn parse_slash_model_no_arg() {
256        assert_eq!(parse_slash_command("model"), SlashCmd::Model(None));
257    }
258
259    #[test]
260    fn parse_slash_model_with_arg() {
261        assert_eq!(
262            parse_slash_command("model anthropic/opus"),
263            SlashCmd::Model(Some("anthropic/opus".to_string())),
264        );
265    }
266
267    #[test]
268    fn parse_slash_quit_alias_q() {
269        assert_eq!(parse_slash_command("q"), SlashCmd::Quit);
270    }
271
272    #[test]
273    fn parse_slash_usage_and_context() {
274        assert_eq!(parse_slash_command("usage"), SlashCmd::Usage);
275        assert_eq!(parse_slash_command("context"), SlashCmd::Context);
276        assert_eq!(parse_slash_command("doctor"), SlashCmd::Doctor);
277    }
278
279    #[test]
280    fn parse_slash_compact_and_aliases() {
281        assert_eq!(parse_slash_command("compact"), SlashCmd::Compact(None));
282        assert_eq!(
283            parse_slash_command("compact focus on tests"),
284            SlashCmd::Compact(Some("focus on tests".to_string()))
285        );
286        assert_eq!(parse_slash_command("compress"), SlashCmd::Compact(None));
287        assert_eq!(parse_slash_command("summarize"), SlashCmd::Compact(None));
288    }
289
290    #[test]
291    fn parse_runtime_task_commands() {
292        assert_eq!(parse_slash_command("tasks"), SlashCmd::Tasks);
293        assert_eq!(
294            parse_slash_command("task task-123"),
295            SlashCmd::Task(Some("task-123".to_string()))
296        );
297        assert_eq!(
298            parse_slash_command("pause task-123"),
299            SlashCmd::Pause(Some("task-123".to_string()))
300        );
301        assert_eq!(
302            parse_slash_command("resume task-123"),
303            SlashCmd::Resume(Some("task-123".to_string()))
304        );
305        assert_eq!(parse_slash_command("cancel"), SlashCmd::Cancel(None));
306        assert_eq!(
307            parse_slash_command("handoff task-123"),
308            SlashCmd::Handoff(Some("task-123".to_string()))
309        );
310        assert_eq!(parse_slash_command("report"), SlashCmd::Report(None));
311        assert_eq!(parse_slash_command("procs"), SlashCmd::Processes);
312        assert_eq!(parse_slash_command("approvals"), SlashCmd::Approvals);
313        assert_eq!(
314            parse_slash_command("approve approval-1"),
315            SlashCmd::Approve(Some("approval-1".to_string()))
316        );
317        assert_eq!(
318            parse_slash_command("deny approval-1"),
319            SlashCmd::Deny(Some("approval-1".to_string()))
320        );
321        assert_eq!(
322            parse_slash_command("checkpoint src/lib.rs"),
323            SlashCmd::Checkpoint(Some("src/lib.rs".to_string()))
324        );
325        assert_eq!(parse_slash_command("checkpoints"), SlashCmd::Checkpoints);
326        assert_eq!(
327            parse_slash_command("restore checkpoint-1"),
328            SlashCmd::Restore(Some("checkpoint-1".to_string()))
329        );
330        assert_eq!(parse_slash_command("memory"), SlashCmd::Memory);
331        assert_eq!(
332            parse_slash_command("remember decision use sqlite"),
333            SlashCmd::Remember(Some("decision use sqlite".to_string()))
334        );
335        assert_eq!(
336            parse_slash_command("forget memory-1"),
337            SlashCmd::Forget(Some("memory-1".to_string()))
338        );
339        assert_eq!(parse_slash_command("plugins"), SlashCmd::Plugins);
340    }
341
342    #[test]
343    fn parse_slash_reasoning_valid_level() {
344        assert_eq!(
345            parse_slash_command("reasoning high"),
346            SlashCmd::Reasoning(Some(crate::models::ReasoningLevel::High)),
347        );
348    }
349
350    #[test]
351    fn parse_slash_visible_reasoning_and_alias() {
352        assert_eq!(
353            parse_slash_command("visible-reasoning on"),
354            SlashCmd::VisibleReasoning(Some("on".to_string())),
355        );
356        assert_eq!(
357            parse_slash_command("visiblereasoning"),
358            SlashCmd::VisibleReasoning(None),
359        );
360    }
361
362    #[test]
363    fn parse_slash_reasoning_invalid_level_is_none_arg() {
364        // Argument exists but can't be parsed to a level — degrades
365        // to showing current (None arg) rather than erroring.
366        assert_eq!(
367            parse_slash_command("reasoning bogus"),
368            SlashCmd::Reasoning(None),
369        );
370    }
371
372    #[test]
373    fn parse_slash_unknown_command() {
374        match parse_slash_command("nope") {
375            SlashCmd::Unknown(name) => assert_eq!(name, "nope"),
376            other => panic!("expected Unknown, got {:?}", other),
377        }
378    }
379
380    #[test]
381    fn key_mods_combine_correctly() {
382        let mods = translate_mods(CtMods::CONTROL | CtMods::SHIFT);
383        assert!(mods.ctrl);
384        assert!(mods.shift);
385        assert!(!mods.alt);
386    }
387}