reline 0.0.0

checksums.yaml

@@ -0,0 +1,7 @@
+---
+SHA256:
+  metadata.gz: 34664ed4926dba843c8d0b5c161a8783384afbe37ef601a6ef7130e6acfe614f
+  data.tar.gz: c006411fd71550186facf348787d964f51f8e7ad03d87c7718ab2689a973b2c0
+SHA512:
+  metadata.gz: f8307b181652977ca88bc9858533a41cdb9305b27c5fdd1584b6c9c7931e96fbf4c86c73d84b0d09cb4d27a7061adbf5e5f7c327f65864986eea2fd75c55937f
+  data.tar.gz: 47453f12ee20b6438751008216abfb04bf8ff06e9e1b5ab9bcb5e73319bc39aeecb1748d2ad54f5293385a04fba877f3fe6fa219d1e36afacb41851106ebf22c

data/BSDL

@@ -0,0 +1,22 @@
+Copyright (C) 1993-2013 Yukihiro Matsumoto. All rights reserved.
+
+Redistribution and use in source and binary forms, with or without
+modification, are permitted provided that the following conditions
+are met:
+1. Redistributions of source code must retain the above copyright
+notice, this list of conditions and the following disclaimer.
+2. Redistributions in binary form must reproduce the above copyright
+notice, this list of conditions and the following disclaimer in the
+documentation and/or other materials provided with the distribution.
+
+THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
+ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
+FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
+OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
+HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
+LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
+OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
+SUCH DAMAGE.

data/COPYING

@@ -0,0 +1,56 @@
+Ruby is copyrighted free software by Yukihiro Matsumoto <matz@netlab.jp>.
+You can redistribute it and/or modify it under either the terms of the
+2-clause BSDL (see the file BSDL), or the conditions below:
+
+  1. You may make and give away verbatim copies of the source form of the
+     software without restriction, provided that you duplicate all of the
+     original copyright notices and associated disclaimers.
+
+  2. You may modify your copy of the software in any way, provided that
+     you do at least ONE of the following:
+
+       a) place your modifications in the Public Domain or otherwise
+          make them Freely Available, such as by posting said
+	  modifications to Usenet or an equivalent medium, or by allowing
+	  the author to include your modifications in the software.
+
+       b) use the modified software only within your corporation or
+          organization.
+
+       c) give non-standard binaries non-standard names, with
+          instructions on where to get the original software distribution.
+
+       d) make other distribution arrangements with the author.
+
+  3. You may distribute the software in object code or binary form,
+     provided that you do at least ONE of the following:
+
+       a) distribute the binaries and library files of the software,
+	  together with instructions (in the manual page or equivalent)
+	  on where to get the original distribution.
+
+       b) accompany the distribution with the machine-readable source of
+	  the software.
+
+       c) give non-standard binaries non-standard names, with
+          instructions on where to get the original software distribution.
+
+       d) make other distribution arrangements with the author.
+
+  4. You may modify and include the part of the software into any other
+     software (possibly commercial).  But some files in the distribution
+     are not written by the author, so that they are not under these terms.
+
+     For the list of those files and their copying conditions, see the
+     file LEGAL.
+
+  5. The scripts and library files supplied as input to or produced as
+     output from the software do not automatically fall under the
+     copyright of the software, but belong to whomever generated them,
+     and may be sold commercially, and may be aggregated with this
+     software.
+
+  6. THIS SOFTWARE IS PROVIDED "AS IS" AND WITHOUT ANY EXPRESS OR
+     IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
+     WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
+     PURPOSE.

data/README.md

@@ -0,0 +1,7 @@
+# Reline
+
+Reline is compatible with the API of Ruby's stdlib 'readline', GNU Readline and Editline by pure Ruby implementation.
+
+## License
+
+The gem is available as open source under the terms of the [Ruby License](https://www.ruby-lang.org/en/about/license.txt).

data/lib/reline.rb

@@ -0,0 +1,196 @@
+require 'io/console'
+require 'reline/version'
+require 'reline/config'
+require 'reline/key_actor'
+require 'reline/key_stroke'
+require 'reline/line_editor'
+
+module Reline
+  extend self
+  FILENAME_COMPLETION_PROC = nil
+  USERNAME_COMPLETION_PROC = nil
+  HISTORY = Array.new
+
+  if RUBY_PLATFORM =~ /mswin|mingw/
+    require 'Win32API'
+    IS_WINDOWS = true
+  else
+    IS_WINDOWS = false
+  end
+
+  CursorPos = Struct.new(:x, :y)
+
+  class << self
+    attr_accessor :basic_quote_characters
+    attr_accessor :completer_quote_characters
+    attr_accessor :completer_word_break_characters
+    attr_reader :completion_append_character
+    attr_accessor :completion_case_fold
+    attr_accessor :filename_quote_characters
+    attr_writer :input
+    attr_writer :output
+  end
+
+  @@ambiguous_width = nil
+  @@config = nil
+
+  @basic_quote_characters = '"\''
+  @completer_quote_characters
+  @completer_word_break_characters = @basic_word_break_characters.dup
+  @completion_append_character
+  def self.completion_append_character=(val)
+    if val.nil?
+      @completion_append_character = nil
+    elsif val.size == 1
+      @completion_append_character = val
+    elsif val.size > 1
+      @completion_append_character = val[0]
+    else
+      @completion_append_character = val
+    end
+  end
+  @completion_case_fold
+  @filename_quote_characters
+
+  @@basic_word_break_characters = " \t\n`><=;|&{("
+  def self.basic_word_break_characters
+    @@basic_word_break_characters
+  end
+  def self.basic_word_break_characters=(v)
+    @@basic_word_break_characters = v
+  end
+
+  @@completion_proc = nil
+  def self.completion_proc
+    @@completion_proc
+  end
+  def self.completion_proc=(p)
+    @@completion_proc = p
+  end
+
+  @@dig_perfect_match_proc = nil
+  def self.dig_perfect_match_proc
+    @@dig_perfect_match_proc
+  end
+  def self.dig_perfect_match_proc=(p)
+    @@dig_perfect_match_proc = p
+  end
+
+  if IS_WINDOWS
+    require 'reline/windows'
+  else
+    require 'reline/ansi'
+  end
+
+  def retrieve_completion_block(line, byte_pointer)
+    break_regexp = /[#{Regexp.escape(@@basic_word_break_characters)}]/
+    before_pointer = line.byteslice(0, byte_pointer)
+    break_point = before_pointer.rindex(break_regexp)
+    if break_point
+      preposing = before_pointer[0..(break_point)]
+      block = before_pointer[(break_point + 1)..-1]
+    else
+      preposing = ''
+      block = before_pointer
+    end
+    postposing = line.byteslice(byte_pointer, line.bytesize)
+    [preposing, block, postposing]
+  end
+
+  def readmultiline(prompt = '', add_hist = false, &confirm_multiline_termination)
+    if block_given?
+      inner_readline(prompt, add_hist, true, &confirm_multiline_termination)
+    else
+      inner_readline(prompt, add_hist, true)
+    end
+
+    if add_hist and @line_editor.whole_buffer and @line_editor.whole_buffer.chomp.size > 0
+      Reline::HISTORY << @line_editor.whole_buffer
+    end
+
+    @line_editor.whole_buffer
+  end
+
+  def readline(prompt = '', add_hist = false)
+    inner_readline(prompt, add_hist, false)
+
+    if add_hist and @line_editor.line and @line_editor.line.chomp.size > 0
+      Reline::HISTORY << @line_editor.line.chomp
+    end
+
+    @line_editor.line
+  end
+
+  def inner_readline(prompt, add_hist, multiline, &confirm_multiline_termination)
+    if @@config.nil?
+      @@config = Reline::Config.new
+      @@config.read
+    end
+    otio = prep
+
+    may_req_ambiguous_char_width
+    @line_editor = Reline::LineEditor.new(@@config, prompt)
+    if multiline
+      @line_editor.multiline_on
+      if block_given?
+        @line_editor.confirm_multiline_termination_proc = confirm_multiline_termination
+      end
+    end
+    @line_editor.completion_proc = @@completion_proc
+    @line_editor.dig_perfect_match_proc = @@dig_perfect_match_proc
+    @line_editor.retrieve_completion_block = method(:retrieve_completion_block)
+    @line_editor.rerender
+
+    if IS_WINDOWS
+      config = {
+        key_mapping: {
+          [224, 72] => :ed_prev_history,    # ↑
+          [224, 80] => :ed_next_history,    # ↓
+          [224, 77] => :ed_next_char,       # →
+          [224, 75] => :ed_prev_char        # ←
+        }
+      }
+    else
+      config = {
+        key_mapping: {
+          [27, 91, 65] => :ed_prev_history,    # ↑
+          [27, 91, 66] => :ed_next_history,    # ↓
+          [27, 91, 67] => :ed_next_char,       # →
+          [27, 91, 68] => :ed_prev_char        # ←
+        }
+      }
+    end
+
+    key_stroke = Reline::KeyStroke.new(config)
+    begin
+      while c = getc
+        key_stroke.input_to!(c)&.then { |inputs|
+          inputs.each { |c|
+            @line_editor.input_key(c)
+            @line_editor.rerender
+          }
+        }
+        break if @line_editor.finished?
+      end
+      Reline.move_cursor_column(0)
+    rescue StandardError => e
+      deprep(otio)
+      raise e
+    end
+
+    deprep(otio)
+  end
+
+  def may_req_ambiguous_char_width
+    return if @@ambiguous_width
+    Reline.move_cursor_column(0)
+    print "\u{25bd}"
+    @@ambiguous_width = Reline.cursor_pos.x
+    Reline.move_cursor_column(0)
+    Reline.erase_after_cursor
+  end
+
+  def self.ambiguous_width
+    @@ambiguous_width
+  end
+end

data/lib/reline/ansi.rb

@@ -0,0 +1,87 @@
+module Reline
+  def getc
+    c = nil
+    until c
+      return nil if @line_editor.finished?
+      result = select([$stdin], [], [], 0.1)
+      next if result.nil?
+      c = $stdin.read(1)
+    end
+    c.ord
+  end
+
+  def self.get_screen_size
+    $stdin.winsize
+  end
+
+  def self.set_screen_size(rows, columns)
+    $stdin.winsize = [rows, columns]
+    self
+  end
+
+  def self.cursor_pos
+    res = ''
+    $stdin.raw do |stdin|
+      $stdout << "\e[6n"
+      $stdout.flush
+      while (c = stdin.getc) != 'R'
+        res << c if c
+      end
+    end
+    m = res.match(/(?<row>\d+);(?<column>\d+)/)
+    CursorPos.new(m[:column].to_i - 1, m[:row].to_i - 1)
+  end
+
+  def self.move_cursor_column(x)
+    print "\e[#{x + 1}G"
+  end
+
+  def self.move_cursor_up(x)
+    if x > 0
+      print "\e[#{x}A" if x > 0
+    elsif x < 0
+      move_cursor_down(-x)
+    end
+  end
+
+  def self.move_cursor_down(x)
+    if x > 0
+      print "\e[#{x}B" if x > 0
+    elsif x < 0
+      move_cursor_up(-x)
+    end
+  end
+
+  def self.erase_after_cursor
+    print "\e[K"
+  end
+
+  def self.scroll_down(x)
+    return if x.zero?
+    print "\e[#{x}S"
+  end
+
+  def self.clear_screen
+    print "\e[2J"
+    print "\e[1;1H"
+  end
+
+  def prep
+    int_handle = Signal.trap('INT', 'IGNORE')
+    otio = `stty -g`.chomp
+    setting = ' -echo -icrnl cbreak'
+    if (`stty -a`.scan(/-parenb\b/).first == '-parenb')
+      setting << ' pass8'
+    end
+    setting << ' -ixoff'
+    `stty #{setting}`
+    Signal.trap('INT', int_handle)
+    otio
+  end
+
+  def deprep(otio)
+    int_handle = Signal.trap('INT', 'IGNORE')
+    `stty #{otio}`
+    Signal.trap('INT', int_handle)
+  end
+end

data/lib/reline/config.rb

@@ -0,0 +1,235 @@
+require 'pathname'
+
+class Reline::Config
+  DEFAULT_PATH = Pathname.new(Dir.home).join('.inputrc')
+
+  def initialize
+    @skip_section = nil
+    @if_stack = []
+    @editing_mode_label = :emacs
+    @keymap_label = :emacs
+    @key_actors = {}
+    @key_actors[:emacs] = Reline::KeyActor::Emacs.new
+    @key_actors[:vi_insert] = Reline::KeyActor::ViInsert.new
+    @key_actors[:vi_command] = Reline::KeyActor::ViCommand.new
+  end
+
+  def reset
+    if editing_mode_is?(:vi_command)
+      @editing_mode_label = :vi_insert
+    end
+  end
+
+  def editing_mode
+    @key_actors[@editing_mode_label]
+  end
+
+  def editing_mode=(val)
+    @editing_mode_label = val
+  end
+
+  def editing_mode_is?(*val)
+    (val.respond_to?(:any?) ? val : [val]).any?(@editing_mode_label)
+  end
+
+  def keymap
+    @key_actors[@keymap_label]
+  end
+
+  def read(file = DEFAULT_PATH)
+    begin
+      if file.respond_to?(:readlines)
+        lines = file.readlines
+      else
+          File.open(file, 'rt') do |f|
+            lines = f.readlines
+          end
+      end
+    rescue Errno::ENOENT
+      $stderr.puts "no such file #{file}"
+      return nil
+    end
+
+    read_lines(lines)
+    self
+  end
+
+  def read_lines(lines)
+    lines.each do |line|
+      line = line.chomp.gsub(/^\s*/, '')
+      if line[0, 1] == '$'
+        handle_directive(line[1..-1])
+        next
+      end
+
+      next if @skip_section
+
+      if line.match(/^set +([^ ]+) +([^ ]+)/i)
+        var, value = $1.downcase, $2.downcase
+        bind_variable(var, value)
+        next
+      end
+
+      if line =~ /\s*(.*)\s*:\s*(.*)\s*$/
+        key, func_name = $1, $2
+        bind_key(key, func_name)
+      end
+    end
+  end
+
+  def handle_directive(directive)
+    directive, args = directive.split(' ')
+    case directive
+    when 'if'
+      condition = false
+      case args # TODO: variables
+      when 'mode'
+      when 'term'
+      when 'version'
+      else # application name
+        condition = true if args == 'Ruby'
+      end
+      unless @skip_section.nil?
+        @if_stack << @skip_section
+      end
+      @skip_section = !condition
+    when 'else'
+      @skip_section = !@skip_section
+    when 'endif'
+      @skip_section = nil
+      unless @if_stack.empty?
+        @skip_section = @if_stack.pop
+      end
+    when 'include'
+      read(args)
+    end
+  end
+
+  def bind_variable(name, value)
+    case name
+    when %w{
+        bind-tty-special-chars
+        blink-matching-paren
+        byte-oriented
+        completion-ignore-case
+        convert-meta
+        disable-completion
+        enable-keypad
+        expand-tilde
+        history-preserve-point
+        horizontal-scroll-mode
+        input-meta
+        mark-directories
+        mark-modified-lines
+        mark-symlinked-directories
+        match-hidden-files
+        meta-flag
+        output-meta
+        page-completions
+        prefer-visible-bell
+        print-completions-horizontally
+        show-all-if-ambiguous
+        show-all-if-unmodified
+        visible-stats
+      } then
+      variable_name = :"@#{name.tr(?-, ?_)}"
+      instance_variable_set(variable_name, value.nil? || value == '1' || value == 'on')
+    when 'bell-style'
+      @bell_style =
+        case value
+        when 'none', 'off'
+          :none
+        when 'audible', 'on'
+          :audible
+        when 'visible'
+          :visible
+        else
+          :audible
+        end
+    when 'comment-begin'
+      @comment_begin = value.dup
+    when 'completion-query-items'
+      @completion_query_items = value.to_i
+    when 'isearch-terminators'
+      @isearch_terminators = instance_eval(value)
+    when 'editing-mode'
+      case value
+      when 'emacs'
+        @editing_mode_label = :emacs
+        @keymap_label = :emacs
+      when 'vi'
+        @editing_mode_label = :vi_insert
+        @keymap_label = :vi_insert
+      end
+    when 'keymap'
+      case value
+      when 'emacs', 'emacs-standard', 'emacs-meta', 'emacs-ctlx'
+        @keymap_label = :emacs
+      when 'vi', 'vi-move', 'vi-command'
+        @keymap_label = :vi_command
+      when 'vi-insert'
+        @keymap_label = :vi_insert
+      end
+    end
+  end
+
+  def bind_key(key, func_name)
+    if key =~ /"(.*)"/
+      keyseq = parse_keyseq($1).force_encoding('ASCII-8BIT')
+    else
+      keyseq = nil
+    end
+    if func_name =~ /"(.*)"/
+      func = parse_keyseq($1).force_encoding('ASCII-8BIT')
+    else
+      func = func_name.to_sym # It must be macro.
+    end
+    [keyseq, func]
+  end
+
+  def key_notation_to_char(notation)
+    case notation
+    when /\\C-([A-Za-z_])/
+      (1 + $1.downcase.ord - ?a.ord).chr('ASCII-8BIT')
+    when /\\M-([0-9A-Za-z_])/
+      modified_key = $1
+      code =
+        case $1
+        when /[0-9]/
+          ?\M-0.bytes.first + (modified_key.ord - ?0.ord)
+        when /[A-Z]/
+          ?\M-A.bytes.first + (modified_key.ord - ?A.ord)
+        when /[a-z]/
+          ?\M-a.bytes.first + (modified_key.ord - ?a.ord)
+        end
+      code.chr('ASCII-8BIT')
+    when /\\C-M-[A-Za-z_]/, /\\M-C-[A-Za-z_]/
+    # 129 M-^A
+    when /\\(\d{1,3})/ then $1.to_i(8).chr # octal
+    when /\\x(\h{1,2})/ then $1.to_i(16).chr # hexadecimal
+    when "\\e" then ?\e
+    when "\\\\" then ?\\
+    when "\\\"" then ?"
+    when "\\'" then ?'
+    when "\\a" then ?\a
+    when "\\b" then ?\b
+    when "\\d" then ?\d
+    when "\\f" then ?\f
+    when "\\n" then ?\n
+    when "\\r" then ?\r
+    when "\\t" then ?\t
+    when "\\v" then ?\v
+    else notation
+    end
+  end
+
+  def parse_keyseq(str)
+    # TODO: Control- and Meta-
+    ret = String.new(encoding: 'ASCII-8BIT')
+    while str =~ /(\\C-[A-Za-z_]|\\M-[0-9A-Za-z_]|\\C-M-[A-Za-z_]|\\M-C-[A-Za-z_]|\\e|\\\\|\\"|\\'|\\a|\\b|\\d|\\f|\\n|\\r|\\t|\\v|\\\d{1,3}|\\x\h{1,2}|.)/
+      ret << key_notation_to_char($&)
+      str = $'
+    end
+    ret
+  end
+end