From 72018ff53cae0d9bebda23f38e3a74b4dc03d95f Mon Sep 17 00:00:00 2001
From: Val Lorentz <progval+git+ratatrix@progval.net>
Date: Wed, 1 Nov 2023 21:53:07 +0100
Subject: [PATCH] Add textarea and run commands from it

---
 .config/config.json5   |  1 -
 Cargo.toml             |  1 +
 src/action.rs          |  1 +
 src/app.rs             | 10 ++++---
 src/components/home.rs | 64 ++++++++++++++++++++++++++++++++++++++++--
 5 files changed, 69 insertions(+), 8 deletions(-)

diff --git a/.config/config.json5 b/.config/config.json5
index 36f527e..f0ceb90 100644
--- a/.config/config.json5
+++ b/.config/config.json5
@@ -7,7 +7,6 @@
   ],
   "keybindings": {
     "Home": {
-      "<q>": "/quit",
       "<Ctrl-d>": "/quit",
       "<Ctrl-c>": "/quit",
       "<Ctrl-z>": "/suspend",
diff --git a/Cargo.toml b/Cargo.toml
index c2e0dad..4a8df8e 100644
--- a/Cargo.toml
+++ b/Cargo.toml
@@ -53,6 +53,7 @@ ansi-to-tui = "3.1.0"
 crossterm = { version = "0.27.0", features = ["serde", "event-stream"] }
 ratatui = { version = "0.24.0", features = ["serde", "macros"] }
 strip-ansi-escapes = "0.2.0"
+tui-textarea = "0.3.0"
 
 [dev-dependencies]
 pretty_assertions = "1.4.0"
diff --git a/src/action.rs b/src/action.rs
index 38e97ed..04671ad 100644
--- a/src/action.rs
+++ b/src/action.rs
@@ -17,6 +17,7 @@ pub enum Action {
   Error(String),
   PreviousBuffer,
   NextBuffer,
+  RunCommand(String),
   Help,
 }
 
diff --git a/src/app.rs b/src/app.rs
index d66971c..65db3a8 100644
--- a/src/app.rs
+++ b/src/app.rs
@@ -266,6 +266,10 @@ impl App {
               }
             })?;
           },
+          Action::RunCommand(ref command_line) => {
+            log::info!("Got command: {command_line}");
+            crate::commands::run_command(&command_line, &self, &action_tx)?;
+          },
           _ => {},
         }
         for component in self.components.iter_mut() {
@@ -304,8 +308,7 @@ impl App {
       tui::Event::Key(key) => {
         if let Some(keymap) = self.config.keybindings.get(&self.mode) {
           if let Some(command_line) = keymap.get(&vec![key]) {
-            log::info!("Got command: {command_line}");
-            crate::commands::run_command(command_line, &self, &action_tx)?;
+            action_tx.send(Action::RunCommand(command_line.clone()))?;
           } else {
             let mut last_tick_key_events = self.last_tick_key_events.borrow_mut();
 
@@ -315,8 +318,7 @@ impl App {
 
             // Check for multi-key combinations
             if let Some(command_line) = keymap.get(&*last_tick_key_events) {
-              log::info!("Got command: {command_line}");
-              crate::commands::run_command(command_line, &self, &action_tx)?;
+              action_tx.send(Action::RunCommand(command_line.clone()))?;
             }
           }
         };
diff --git a/src/components/home.rs b/src/components/home.rs
index a7e82f9..8c82524 100644
--- a/src/components/home.rs
+++ b/src/components/home.rs
@@ -1,11 +1,12 @@
 use std::{collections::HashMap, time::Duration};
 
 use color_eyre::eyre::{Result, WrapErr};
-use crossterm::event::{KeyCode, KeyEvent};
+use crossterm::event::{KeyCode, KeyEvent, KeyEventKind, KeyModifiers};
 use ratatui::{prelude::*, widgets::*};
 use serde::{Deserialize, Serialize};
 use tokio::sync::mpsc::UnboundedSender;
 use tokio::sync::OnceCell;
+use tui_textarea::{Input, Key, TextArea};
 
 use super::{Buflist, Component};
 use crate::{
@@ -18,11 +19,21 @@ pub struct Home {
   command_tx: Option<UnboundedSender<Action>>,
   config: OnceCell<Config>,
   buflist: Buflist,
+  textarea: TextArea<'static>,
 }
 
 impl Home {
   pub fn new() -> Self {
-    Self::default()
+    let mut self_ = Self::default();
+    self_.configure_textarea();
+    self_
+  }
+
+  fn configure_textarea(&mut self) {
+    self
+      .textarea
+      .set_block(Block::default().borders(Borders::ALL));
+    self.textarea.set_cursor_line_style(Style::default());
   }
 }
 
@@ -42,6 +53,41 @@ impl Component for Home {
     Ok(())
   }
 
+  fn handle_key_events(&mut self, key: KeyEvent) -> Result<Option<Action>> {
+    match key {
+      KeyEvent {
+        code: KeyCode::Enter,
+        modifiers: KeyModifiers::NONE,
+        kind: KeyEventKind::Press,
+        state: _,
+      } => {
+        // User pressed enter; clear the textarea by replacing it with a new one,
+        // and get the content of the old one.
+        let mut textarea = TextArea::default();
+        std::mem::swap(&mut textarea, &mut self.textarea);
+        let command = textarea.into_lines().join("\n");
+        self.configure_textarea();
+        Ok(Some(Action::RunCommand(command)))
+      },
+      KeyEvent {
+        code: KeyCode::Enter,
+        modifiers: KeyModifiers::SHIFT,
+        kind: KeyEventKind::Press,
+        state: _,
+      } => {
+        // FIXME: For some reason this does nothing because Crossterm does not emit
+        // Shift-Enter events (at least on Foot via SSH).
+        // However, tui-textarea implements Alt-Tab to insert a newline, so it's okay.
+        self.textarea.insert_newline();
+        Ok(Some(Action::Render))
+      },
+      _ => {
+        self.textarea.input(key);
+        Ok(Some(Action::Render))
+      },
+    }
+  }
+
   fn update(&mut self, action: &Action) -> Result<Option<Action>> {
     self.buflist.update(action)?;
     match action {
@@ -66,10 +112,22 @@ impl Component for Home {
       .buflist
       .draw(frame, layout[0], buffers)
       .context("Error drawing buflist")?;
+
+    let layout = Layout::default()
+      .direction(Direction::Vertical)
+      .constraints(vec![
+        Constraint::Min(5),
+        Constraint::Length(self.textarea.lines().len() as u16 + 2), // +2 for borders
+      ])
+      .split(layout[1]);
+
     frame.render_widget(
       Paragraph::new(buffers.active_buffer().content()).block(Block::new().borders(Borders::ALL)),
-      layout[1],
+      layout[0],
     );
+
+    frame.render_widget(self.textarea.widget(), layout[1]);
+
     Ok(())
   }
 }