kward 0.71.0 → 0.72.0

data/lib/kward/prompt_interface/editor/modes/emacs.rb

@@ -0,0 +1,259 @@
+# Namespace for the Kward CLI agent runtime.
+module Kward
+  # Interactive terminal UI used by the CLI frontend.
+  class PromptInterface
+    # Emacs-style keymap for the built-in composer file editor.
+    module EmacsEditorMode
+      private
+
+      def handle_emacs_key(key)
+        return if handle_editor_bracketed_paste_key(key)
+
+        if @editor_state.emacs_pending == "C-x"
+          return handle_emacs_ctrl_x_key(key)
+        end
+
+        csi_result = handle_emacs_csi_u_key(key)
+        return csi_result unless csi_result == false
+
+        shift_result = handle_editor_shift_navigation_key(key)
+        return shift_result unless shift_result == false
+
+        editor_tab_result = handle_editor_tab_key(key)
+        return editor_tab_result unless editor_tab_result == false
+
+        tab_result = handle_tab_key_binding(key)
+        return tab_result unless tab_result == false
+
+        return true if handle_bundled_key(key) { |token| handle_emacs_key(token) }
+
+        case key
+        when "\n", "\r"
+          return editor_search_confirm if editor_search_active?
+          clear_editor_selection_before_edit
+          editor_insert_newline
+        when "\t"
+          editor_insert_tab unless editor_search_active?
+        when "\b", "\x7F"
+          clear_editor_selection_before_edit unless editor_search_active?
+          editor_search_active? ? editor_search_delete_character : editor_delete_before_cursor
+        when "\x00"
+          @editor_state.begin_selection unless editor_search_active?
+        when "\x01"
+          @editor_state.move_line_start unless editor_search_active?
+        when "\x02"
+          @editor_state.move_left unless editor_search_active?
+        when "\x04"
+          @editor_state.delete_at_cursor unless editor_search_active?
+        when "\x05"
+          @editor_state.move_line_end unless editor_search_active?
+        when "\x06"
+          @editor_state.move_right unless editor_search_active?
+        when "\x07"
+          emacs_cancel
+        when "\x0B"
+          if editor_selection_active?
+            emacs_kill_selection
+          else
+            @editor_state.kill_line_after_cursor unless editor_search_active?
+          end
+        when "\x0E"
+          editor_move_down unless editor_search_active?
+        when "\x10"
+          editor_move_up unless editor_search_active?
+        when "\x12"
+          editor_search_active? ? editor_search_append(key) : editor_search_begin(:backward)
+        when "\x13"
+          editor_search_active? ? editor_search_append(key) : editor_search_begin(:forward)
+        when "\x15"
+          @editor_state.kill_line_before_cursor unless editor_search_active?
+        when "\x16"
+          @editor_state.page_down(editor_page_rows) unless editor_search_active?
+        when "\x17"
+          editor_selection_active? ? emacs_kill_selection : @editor_state.delete_word_before_cursor unless editor_search_active?
+        when "\x18"
+          @editor_state.emacs_pending = "C-x"
+          @editor_state.status = "C-x"
+        when "\x19"
+          @editor_state.yank_from_kill_ring unless editor_search_active?
+        when "\e"
+          return editor_search_cancel if editor_search_active?
+          @editor_state.clear_selection
+        when "\eb", "\eB"
+          @editor_state.move_to_previous_word unless editor_search_active?
+        when "\ed", "\eD"
+          @editor_state.delete_word_after_cursor unless editor_search_active?
+        when "\ef", "\eF"
+          @editor_state.move_to_next_word unless editor_search_active?
+        when "\ev", "\eV"
+          @editor_state.page_up(editor_page_rows) unless editor_search_active?
+        when "\ew", "\eW"
+          emacs_copy_selection unless editor_search_active?
+        when "\ey", "\eY"
+          @editor_state.yank_pop unless editor_search_active?
+        when "\e", "\e\x7F"
+          @editor_state.delete_word_before_cursor unless editor_search_active?
+        else
+          ansi_result = handle_editor_modified_ansi_key(key)
+          return ansi_result unless ansi_result == false
+
+          key_name = key_name_for(key)
+          named_result = handle_editor_named_key(key_name) if key_name
+          return named_result unless named_result == false || named_result.nil?
+
+          if editor_search_active?
+            editor_search_append(key) if printable_key?(key)
+          elsif printable_key?(key)
+            editor_insert_printable(key)
+          end
+        end
+      end
+
+      def handle_emacs_csi_u_key(key)
+        sequence = parse_csi_u_key(key)
+        return false unless sequence
+
+        code = sequence[:code]
+        modifier = sequence[:modifier]
+        queue_pending_keys(sequence[:remaining]) if sequence[:remaining] && !sequence[:remaining].empty?
+        sequence = sequence.merge(remaining: "")
+        normalized_code = ctrl_code(code)
+
+        if ctrl_modifier?(modifier)
+          case normalized_code
+          when 13
+            return false if editor_search_active?
+
+            clear_editor_selection_before_edit
+            editor_insert_endwise_modifier_newline
+          when 32
+            @editor_state.begin_selection unless editor_search_active?
+          when 97
+            @editor_state.move_line_start unless editor_search_active?
+          when 98
+            @editor_state.move_left unless editor_search_active?
+          when 99, 103
+            emacs_cancel
+          when 100
+            @editor_state.delete_at_cursor unless editor_search_active?
+          when 101
+            @editor_state.move_line_end unless editor_search_active?
+          when 102
+            @editor_state.move_right unless editor_search_active?
+          when 107
+            @editor_state.kill_line_after_cursor unless editor_search_active?
+          when 110
+            editor_move_down unless editor_search_active?
+          when 112
+            editor_move_up unless editor_search_active?
+          when 114
+            editor_search_active? ? editor_search_append(key) : editor_search_begin(:backward)
+          when 115
+            editor_search_active? ? editor_search_append(key) : editor_search_begin(:forward)
+          when 118
+            @editor_state.page_down(editor_page_rows) unless editor_search_active?
+          when 119
+            editor_selection_active? ? emacs_kill_selection : @editor_state.delete_word_before_cursor unless editor_search_active?
+          when 120
+            @editor_state.emacs_pending = "C-x"
+            @editor_state.status = "C-x"
+          when 121
+            @editor_state.yank_from_kill_ring unless editor_search_active?
+          else
+            return false
+          end
+        elsif alt_modifier?(modifier)
+          case normalized_code
+          when 98
+            @editor_state.move_to_previous_word unless editor_search_active?
+          when 100
+            @editor_state.delete_word_after_cursor unless editor_search_active?
+          when 102
+            @editor_state.move_to_next_word unless editor_search_active?
+          when 118
+            @editor_state.page_up(editor_page_rows) unless editor_search_active?
+          when 119
+            emacs_copy_selection unless editor_search_active?
+          when 121
+            @editor_state.yank_pop unless editor_search_active?
+          else
+            return false
+          end
+        elsif code == 9 && !ctrl_modifier?(modifier) && !alt_modifier?(modifier) && !super_modifier?(modifier)
+          return false if editor_search_active?
+
+          shift_modifier?(modifier) ? editor_outdent_tab : editor_insert_tab
+        else
+          handle_parsed_editor_csi_u_key(sequence)
+        end
+      end
+
+      def handle_emacs_ctrl_x_key(key)
+        @editor_state.emacs_pending = nil
+        key = emacs_ctrl_x_csi_u_key(key)
+        case key
+        when "\x13"
+          save_editor
+        when "\x03"
+          quit_editor("Unsaved changes. Press C-x C-c again to discard.")
+        else
+          @editor_state.status = "Unknown C-x command"
+          true
+        end
+      end
+
+      def emacs_ctrl_x_csi_u_key(key)
+        sequence = parse_csi_u_key(key)
+        return key unless sequence && ctrl_modifier?(sequence[:modifier])
+
+        queue_pending_keys(sequence[:remaining]) if sequence[:remaining] && !sequence[:remaining].empty?
+        case ctrl_code(sequence[:code])
+        when 99
+          "\x03"
+        when 115
+          "\x13"
+        else
+          key
+        end
+      end
+
+      def emacs_kill_selection
+        return false unless editor_selection_active?
+
+        range = @editor_state.selection_range
+        @editor_state.cut_range(range[0], range[1])
+        @editor_state.status = "Killed region"
+        true
+      end
+
+      def emacs_copy_selection
+        if editor_selection_active?
+          range = @editor_state.selection_range
+        elsif @editor_state.selection_anchor
+          range = [@editor_state.selection_anchor, @editor_state.cursor + 1].minmax
+        else
+          return false
+        end
+
+        @editor_state.copy_for_kill_ring(range[0], range[1])
+        @output_io.print("\e]52;c;#{Base64.strict_encode64(@editor_state.kill_buffer)}\a")
+        @output_io.flush if @output_io.respond_to?(:flush)
+        @editor_state.clear_selection
+        @editor_state.status = "Copied region"
+        true
+      end
+
+      def emacs_cancel
+        if editor_search_active?
+          editor_search_cancel
+        else
+          @editor_state.emacs_pending = nil
+          @editor_state.clear_selection
+          @editor_state.status = "Cancelled"
+        end
+        true
+      end
+
+    end
+  end
+end

data/lib/kward/prompt_interface/editor/modes/modern.rb

@@ -0,0 +1,353 @@
+# Namespace for the Kward CLI agent runtime.
+module Kward
+  # Interactive terminal UI used by the CLI frontend.
+  class PromptInterface
+    # Modern keymap for the built-in composer file editor.
+    module ModernEditorMode
+      private
+
+      def handle_modern_key(key)
+        return if handle_modern_bracketed_paste_key(key)
+
+        csi_result = handle_modern_csi_u_key(key)
+        return csi_result unless csi_result == false
+
+        multi_cursor_result = handle_modern_multi_cursor_key(key)
+        return multi_cursor_result unless multi_cursor_result == false
+
+        indentation_navigation_result = handle_modern_indentation_navigation_key(key)
+        return indentation_navigation_result unless indentation_navigation_result == false
+
+        modified_navigation_result = handle_modern_modified_navigation_key(key)
+        return modified_navigation_result unless modified_navigation_result == false
+
+        shift_result = handle_editor_shift_navigation_key(key)
+        return shift_result unless shift_result == false
+
+        binding_result = handle_modern_key_binding(key)
+        return binding_result unless binding_result == false
+
+        editor_tab_result = handle_editor_tab_key(key) { |direction| modern_record_undo { direction == :forward ? editor_insert_tab : editor_outdent_tab } }
+        return editor_tab_result unless editor_tab_result == false
+
+        tab_result = handle_tab_key_binding(key)
+        return tab_result unless tab_result == false
+
+        return true if handle_bundled_key(key) { |token| handle_modern_key(token) }
+
+        case key
+        when "\n", "\r"
+          return editor_search_confirm if editor_search_active?
+          modern_record_undo { modern_insert_text("\n") }
+        when "\t"
+          modern_record_undo { editor_insert_tab unless editor_search_active? }
+        when "\b", "\x7F"
+          editor_search_active? ? editor_search_delete_character : modern_record_undo { modern_delete_before_cursor }
+        when "\x03"
+          return editor_search_cancel if editor_search_active?
+        when "\e"
+          return editor_search_cancel if editor_search_active?
+          return @editor_state.collapse_to_primary_selection if @editor_state.multi_cursor?
+          return @editor_state.clear_selection if @editor_state.selection_active?
+        when "/"
+          clear_editor_selection_before_edit unless editor_search_active?
+          editor_search_active? ? editor_search_append(key) : editor_search_begin(:forward)
+        when "?"
+          clear_editor_selection_before_edit unless editor_search_active?
+          editor_search_active? ? editor_search_append(key) : editor_search_begin(:backward)
+        when "\x11"
+          quit_editor
+        when "\x13"
+          save_editor
+        when "\x1A"
+          @editor_state.undo unless editor_search_active?
+        else
+          key_name = key_name_for(key)
+          named_result = handle_editor_named_key(key_name) if key_name
+          return named_result unless named_result == false || named_result.nil?
+
+          if editor_search_active?
+            editor_search_append(key) if printable_key?(key)
+          elsif printable_key?(key)
+            modern_record_undo { modern_insert_printable(key) }
+          end
+        end
+      end
+
+      def handle_modern_csi_u_key(key)
+        sequence = parse_csi_u_key(key)
+        return false unless sequence
+
+        code = sequence[:code]
+        modifier = sequence[:modifier]
+        queue_pending_keys(sequence[:remaining]) if sequence[:remaining] && !sequence[:remaining].empty?
+        sequence = sequence.merge(remaining: "")
+
+        if ctrl_modifier?(modifier) || super_modifier?(modifier)
+          handle_modern_modified_key(code, modifier, sequence)
+        else
+          handle_modern_editor_csi_u_key(sequence)
+        end
+      end
+
+      def handle_modern_multi_cursor_key(key)
+        return false if editor_search_active?
+
+        case key
+        when "\x04"
+          @editor_state.add_next_occurrence_selection
+        when "\e[1;4A", "\e[4A"
+          @editor_state.add_vertical_cursor(:up)
+        when "\e[1;4B", "\e[4B"
+          @editor_state.add_vertical_cursor(:down)
+        else
+          false
+        end
+      end
+
+      def handle_modern_indentation_navigation_key(key)
+        return false if editor_search_active?
+
+        case key
+        when *modern_indentation_key_sequences(:up)
+          modern_move_indentation { @editor_state.move_indentation_up }
+        when *modern_indentation_key_sequences(:down)
+          modern_move_indentation { @editor_state.move_indentation_down }
+        when *modern_indentation_key_sequences(:right)
+          modern_move_indentation { @editor_state.move_indentation_right }
+        when *modern_indentation_key_sequences(:select_up)
+          editor_extending_selection { @editor_state.move_indentation_up }
+        when *modern_indentation_key_sequences(:select_down)
+          editor_extending_selection { @editor_state.move_indentation_down }
+        when *modern_indentation_key_sequences(:select_right)
+          editor_extending_selection { @editor_state.move_indentation_right }
+        else
+          false
+        end
+      end
+
+      def modern_move_indentation
+        result = yield
+        @editor_state.clear_selection
+        result
+      end
+
+      def modern_indentation_key_sequences(action)
+        case [modern_indentation_modifier, action]
+        when [:alt, :up]
+          ["\e[1;3A", "\e[3A"]
+        when [:alt, :down]
+          ["\e[1;3B", "\e[3B"]
+        when [:alt, :right]
+          ["\e[1;3C", "\e[3C"]
+        when [:alt, :select_up]
+          ["\e[1;4A", "\e[4A"]
+        when [:alt, :select_down]
+          ["\e[1;4B", "\e[4B"]
+        when [:alt, :select_right]
+          ["\e[1;4C", "\e[4C"]
+        when [:ctrl, :up]
+          ["\e[1;5A", "\e[5A"]
+        when [:ctrl, :down]
+          ["\e[1;5B", "\e[5B"]
+        when [:ctrl, :right]
+          ["\e[1;5C", "\e[5C"]
+        when [:ctrl, :select_up]
+          ["\e[1;6A", "\e[6A"]
+        when [:ctrl, :select_down]
+          ["\e[1;6B", "\e[6B"]
+        when [:ctrl, :select_right]
+          ["\e[1;6C", "\e[6C"]
+        else
+          []
+        end
+      end
+
+      def modern_indentation_modifier
+        RbConfig::CONFIG["host_os"].to_s.downcase.include?("darwin") ? :alt : :ctrl
+      end
+
+      def handle_modern_modified_navigation_key(key)
+        return false if editor_search_active?
+
+        case key
+        when "\e[1;5C", "\e[5C"
+          @editor_state.move_line_end
+        when "\e[1;5D", "\e[5D"
+          @editor_state.move_line_start
+        when "\e[1;5A", "\e[5A"
+          @editor_state.move_file_start
+        when "\e[1;5B", "\e[5B"
+          @editor_state.move_file_end
+        when "\e[1;4C", "\e[4C"
+          editor_extending_selection { @editor_state.move_to_next_word }
+        when "\e[1;4D", "\e[4D"
+          editor_extending_selection { @editor_state.move_to_previous_word }
+        else
+          false
+        end
+      end
+
+      def handle_modern_key_binding(key)
+        case key
+        when "\x00"
+          true
+        when "\x03"
+          editor_search_active? ? editor_search_cancel : copy_editor_selection
+        when "\x06"
+          @editor_state.move_right unless editor_search_active?
+        when "\x16"
+          modern_record_undo { @editor_state.yank_kill_buffer } unless editor_search_active?
+        when "\x18"
+          modern_record_undo { cut_editor_selection } unless editor_search_active?
+        else
+          handle_modern_shared_key_binding(key)
+        end
+      end
+
+      def handle_modern_modified_key(code, modifier, sequence)
+        normalized_code = ctrl_code(code)
+        if super_modifier?(modifier)
+          return editor_search_active? ? editor_search_cancel : copy_editor_selection if normalized_code == 99
+          return handle_modern_editor_csi_u_key(sequence) unless ctrl_modifier?(modifier)
+        end
+
+        case normalized_code
+        when 13
+          return false if editor_search_active?
+
+          modern_record_undo do
+            clear_editor_selection_before_edit
+            editor_insert_endwise_modifier_newline
+          end
+        when 99
+          editor_search_active? ? editor_search_cancel : copy_editor_selection
+        when 100
+          return false if editor_search_active?
+
+          @editor_state.add_next_occurrence_selection
+        when 102
+          @editor_state.move_right unless editor_search_active?
+        when 118
+          modern_record_undo { @editor_state.yank_kill_buffer } unless editor_search_active?
+        when 120
+          modern_record_undo { cut_editor_selection } unless editor_search_active?
+        when 108
+          return false if editor_search_active?
+          return false unless modern_ctrl_shift_key?(code, modifier)
+
+          @editor_state.selection_to_line_start_cursors
+        when 122
+          return if editor_search_active?
+
+          modern_ctrl_shift_key?(code, modifier) ? @editor_state.redo : @editor_state.undo
+        else
+          return false if normalized_code == 32
+
+          handle_modern_editor_csi_u_key(sequence)
+        end
+      end
+
+      def handle_modern_shared_key_binding(key)
+        case key
+        when "\x04", "\x0B", "\x15", "\x17", "\x19", "\e[3~", "\ed", "\eD", "\e\b", "\e\x7F"
+          modern_record_undo { handle_editor_key_binding(key) }
+        else
+          handle_editor_key_binding(key)
+        end
+      end
+
+      def handle_modern_editor_csi_u_key(key_or_sequence)
+        sequence = key_or_sequence.is_a?(Hash) ? key_or_sequence : parse_csi_u_key(key_or_sequence)
+        return handle_editor_csi_u_key(key_or_sequence) unless sequence
+
+        code = sequence[:code]
+        modifier = sequence[:modifier]
+        if ctrl_modifier?(modifier)
+          normalized_code = ctrl_code(code)
+          return @editor_state.add_next_occurrence_selection if normalized_code == 100
+          if normalized_code == 108 && modern_ctrl_shift_key?(code, modifier)
+            return @editor_state.selection_to_line_start_cursors
+          end
+
+          case normalized_code
+          when 107, 117, 119, 121
+            return modern_record_undo { handle_parsed_editor_csi_u_key(sequence) }
+          end
+        end
+
+        case code
+        when 9
+          return false if editor_search_active?
+          return false if ctrl_modifier?(modifier) || alt_modifier?(modifier) || super_modifier?(modifier)
+
+          shift_modifier?(modifier) ? modern_record_undo { editor_outdent_tab } : modern_record_undo { editor_insert_tab }
+        when 13
+          return editor_search_confirm if editor_search_active?
+
+          modern_record_undo { modern_insert_text("\n") }
+        when 8, 127
+          editor_search_active? ? editor_search_delete_character : modern_record_undo { modern_delete_before_cursor }
+        when 4
+          modern_record_undo { delete_editor_selection || @editor_state.delete_at_cursor } unless editor_search_active?
+        else
+          text = csi_u_printable_text(sequence)
+          if text
+            editor_search_active? ? editor_search_append(text) : modern_record_undo { modern_insert_printable(text) }
+          elsif csi_u_text_field?(sequence)
+            true
+          else
+            handle_parsed_editor_csi_u_key(sequence)
+          end
+        end
+      end
+
+      def handle_modern_bracketed_paste_key(key)
+        paste = read_bracketed_paste(key)
+        return false unless paste
+
+        modern_record_undo { @editor_state.insert(normalize_paste(paste[:content])) } unless editor_search_active?
+        queue_pending_keys(paste[:remaining]) if paste[:remaining] && !paste[:remaining].empty?
+        true
+      end
+
+      def modern_insert_printable(text)
+        return editor_insert_printable(text) unless @editor_state.multi_cursor?
+
+        @editor_state.replace_selections(text)
+      end
+
+      def modern_insert_text(text)
+        return @editor_state.replace_selections(text) if @editor_state.multi_cursor? || @editor_state.selection_ranges.any?
+
+        if text == "\n"
+          editor_insert_newline
+        else
+          @editor_state.insert(text)
+        end
+      end
+
+      def modern_delete_before_cursor
+        return @editor_state.delete_before_selections if @editor_state.multi_cursor?
+
+        delete_editor_selection || editor_delete_before_cursor
+      end
+
+      def modern_record_undo
+        before_buffer = @editor_state.buffer.dup
+        before_redo_stack = @editor_state.redo_stack.map { |entry| entry.merge(buffer: entry[:buffer].dup, selections: entry[:selections]&.map(&:dup)) }
+        @editor_state.push_undo
+        result = yield
+        if @editor_state.buffer == before_buffer
+          @editor_state.undo_stack.pop
+          @editor_state.redo_stack = before_redo_stack
+        end
+        result
+      end
+
+      def modern_ctrl_shift_key?(code, modifier)
+        code.to_i.between?(65, 90) || ((modifier.to_i - 1) & 1).positive?
+      end
+    end
+  end
+end