rfd 0.0.1

data/lib/rfd/commands.rb

@@ -0,0 +1,234 @@
+module Rfd
+  module Commands
+    # Change permission ("A"ttributes) of selected files and directories.
+    def a
+      process_command_line preset_command: 'chmod'
+    end
+
+    # "c"opy selected files and directories.
+    def c
+      process_command_line preset_command: 'cp'
+    end
+
+    # Soft "d"elete (actually mv to the trash folder) selected files and directories.
+    def d
+      if selected_items.any?
+        if ask %Q[Are your sure want to trash #{selected_items.one? ? selected_items.first.name : "these #{selected_items.size} files"}? (y/n)]
+          FileUtils.mv selected_items.map(&:path), File.expand_path('~/.Trash/')
+          @current_row -= selected_items.count {|i| i.index <= current_row}
+          ls
+        end
+      end
+    end
+
+    # Open current file or directory with the "e"ditor
+    def e
+      edit
+    end
+
+    # "f"ind the first flie or directory of which name starts with the given String.
+    def f
+      process_command_line preset_command: 'find'
+    end
+
+    # Move the cursor to the left pane.
+    def h
+      (y = current_row - maxy) >= 0 and move_cursor y
+    end
+
+    # Move the cursor down.
+    def j
+      if current_row + 1 >= items.size
+        move_cursor 0
+      else
+        move_cursor current_row + 1
+      end
+    end
+
+    # Move the cursor up.
+    def k
+      if current_row == 0
+        move_cursor items.size - 1
+      else
+        move_cursor current_row - 1
+      end
+    end
+
+    # Move the cursor to the right pane.
+    def l
+      (y = current_row + maxy) < items.size and move_cursor y
+    end
+
+    # "m"ove selected files and directories.
+    def m
+      process_command_line preset_command: 'mv'
+    end
+
+    # "o"pen selected files and directories with the OS "open" command.
+    def o
+      system "open #{selected_items.map {|i| %Q["#{i.path}"]}.join(' ')}"
+    end
+
+    # "q"uit the app.
+    def q
+      raise StopIteration if ask 'Are your sure want to exit? (y/n)'
+    end
+
+    # "r"ename selected files and directories.
+    def r
+      process_command_line preset_command: 'rename'
+    end
+
+    # "s"ort displayed files and directories in the given order.
+    def s
+      process_command_line preset_command: 'sort'
+    end
+
+    # Create a new file, or update its timestamp if the file already exists ("t"ouch).
+    def t
+      process_command_line preset_command: 'touch'
+    end
+
+    # "o"pen selected files and directories with the viewer.
+    def v
+      view
+    end
+
+    # Hard "d"elete selected files and directories.
+    def D
+      if selected_items.any?
+        if ask %Q[Are your sure want to delete #{selected_items.one? ? selected_items.first.name : "these #{selected_items.size} files"}? (y/n)]
+          FileUtils.rm_rf selected_items.map(&:path)
+          @current_row -= selected_items.count {|i| i.index <= current_row}
+          ls
+        end
+      end
+    end
+
+    # "f"ind the last flie or directory of which name starts with the given String.
+    def F
+      process_command_line preset_command: 'find_reverse'
+    end
+
+    # Move the cursor to the top.
+    def H
+      move_cursor current_page * max_items
+    end
+
+    # Ma"K"e a directory.
+    def K
+      process_command_line preset_command: 'mkdir'
+    end
+
+    # Move the cursor to the bottom.
+    def L
+      move_cursor current_page * max_items + displayed_items.size - 1
+    end
+
+    # Move the cursor to the "M"iddle.
+    def M
+      move_cursor current_page * max_items + displayed_items.size / 2
+    end
+
+    # Mark or unmark "a"ll files and directories.
+    def ctrl_a
+      mark = marked_items.size != (items.size - 2)  # exclude . and ..
+      items.each {|i| i.toggle_mark unless i.marked? == mark}
+      draw_items
+      move_cursor current_row
+      draw_marked_items
+      header_r.wrefresh
+    end
+
+    # "b"ack to the previous page.
+    def ctrl_b
+      ctrl_p
+    end
+
+    # "f"orward to the next page.
+    def ctrl_f
+      ctrl_n
+    end
+
+    # Refresh the screen.
+    def ctrl_l
+      ls
+    end
+
+    # Forward to the "n"ext page.
+    def ctrl_n
+      if total_pages > 1
+        if last_page?
+          move_cursor 0
+        else
+          move_cursor (current_page + 1) * max_items
+        end
+      end
+    end
+
+    # Back to the "p"revious page.
+    def ctrl_p
+      if total_pages > 1
+        if first_page?
+          move_cursor (total_pages - 1) * max_items
+        else
+          move_cursor (current_page - 1) * max_items
+        end
+      end
+    end
+
+    # Change the number of columns in the main window.
+    (?1..?9).each do |n|
+      define_method(n) do
+        spawn_panes n.to_i
+        ls
+      end
+    end
+
+    # Return to the previous directory (popd).
+    def -
+      popd
+    end
+
+    # Search files and directories from the current directory.
+    def /
+      process_command_line preset_command: 'grep'
+    end
+
+    # Execute a shell command in an external shell.
+    define_method('!') do
+      process_shell_command
+    end
+
+    # Execute a command in the controller context.
+    define_method(':') do
+      process_command_line
+    end
+
+    # cd into a directory, or view a file.
+    def enter
+      if current_item.directory?
+        cd current_item
+        ls
+      else
+        v
+      end
+    end
+
+    # Toggle mark, and move down.
+    def space
+      toggle_mark
+      j
+      draw_marked_items
+      header_r.wrefresh
+    end
+
+    # cd to the upper hierarchy.
+    def del
+      if current_dir != '/'
+        cd '..'
+        ls
+      end
+    end
+  end
+end

data/lib/rfd/item.rb

@@ -0,0 +1,176 @@
+module Rfd
+  class Item
+    include Comparable
+    attr_reader :name
+    attr_accessor :index
+
+    def initialize(dir: nil, name: nil, window_width: nil)
+      @dir, @name, @window_width, @marked = dir, name, window_width, false
+    end
+
+    def path
+      @path ||= File.join @dir, @name
+    end
+
+    def basename
+      @basename ||= File.basename name, extname
+    end
+
+    def extname
+      @extname ||= File.extname name
+    end
+
+    def full_display_name
+      n = @name.dup
+      n << " -> #{target}" if symlink?
+      n
+    end
+
+    def display_name
+      @display_name ||= begin
+        n = full_display_name
+        if mb_size(n) <= @window_width - 15
+          n
+        else
+          if symlink?
+            mb_left n, @window_width - 16
+          else
+            "#{mb_left(basename, @window_width - 16 - extname.length)}…#{extname}"
+          end
+        end
+      end
+    end
+
+    def lstat
+      @lstat ||= File.lstat path
+    end
+
+    def stat
+      @stat ||= File.stat path
+    end
+
+    def color
+      if symlink?
+        Curses::COLOR_MAGENTA
+      elsif hidden?
+        Curses::COLOR_GREEN
+      elsif directory?
+        Curses::COLOR_CYAN
+      elsif executable?
+        Curses::COLOR_RED
+      else
+        Curses::COLOR_WHITE
+      end
+    end
+
+    def size
+      directory? ? 0 : lstat.size
+    end
+
+    def size_or_dir
+      directory? ? '<DIR>' : size.to_s
+    end
+
+    def atime
+      lstat.atime.strftime('%Y-%m-%d %H:%M:%S')
+    end
+
+    def ctime
+      lstat.ctime.strftime('%Y-%m-%d %H:%M:%S')
+    end
+
+    def mtime
+      lstat.mtime.strftime('%Y-%m-%d %H:%M:%S')
+    end
+
+    def mode
+      @mode ||= begin
+        m = lstat.mode
+        ret = directory? ? 'd' : symlink? ? 'l' : '-'
+        [(m & 0700) / 64, (m & 070) / 8, m & 07].inject(ret) do |str, s|
+          str << "#{s & 4 == 4 ? 'r' : '-'}#{s & 2 == 2 ? 'w' : '-'}#{s & 1 == 1 ? 'x' : '-'}"
+        end
+        if m & 04000 != 0
+          ret[3] = directory? ? 's' : 'S'
+        end
+        if m & 02000 != 0
+          ret[6] = directory? ? 's' : 'S'
+        end
+        if m & 01000 == 512
+          ret[-1] = directory? ? 't' : 'T'
+        end
+        ret
+      end
+    end
+
+    def directory?
+      stat.directory?
+    end
+
+    def symlink?
+      lstat.symlink?
+    end
+
+    def hidden?
+      name.start_with?('.') && (name != '.') && (name != '..')
+    end
+
+    def executable?
+      lstat.executable?
+    end
+
+    def target
+      File.readlink path if symlink?
+    end
+
+    def toggle_mark
+      unless %w(. ..).include? name
+        @marked = !@marked
+        true
+      end
+    end
+
+    def marked?
+      @marked
+    end
+
+    def current_mark
+      marked? ? '*' : ' '
+    end
+
+    def mb_left(str, size)
+      len = 0
+      index = str.each_char.with_index do |c, i|
+        break i if len + mb_char_size(c) > size
+        len += mb_size c
+      end
+      str[0, index]
+    end
+
+    def mb_char_size(c)
+      c == '…' ? 1 : c.bytesize == 1 ? 1 : 2
+    end
+
+    def mb_size(str)
+      str.each_char.inject(0) {|l, c| l += mb_char_size(c)}
+    end
+
+    def mb_ljust(str, size)
+      "#{str}#{' ' * [0, size - mb_size(str)].max}"
+    end
+
+    def to_s
+      "#{current_mark}#{mb_ljust(display_name, @window_width - 15)}#{size_or_dir.rjust(13)}"
+    end
+
+    def <=>(o)
+      if directory? && !o.directory?
+        1
+      elsif !directory? && o.directory?
+        -1
+      else
+        name <=> o.name
+      end
+    end
+  end
+end

data/lib/rfd/windows.rb

@@ -0,0 +1,227 @@
+module Rfd
+  class Window
+    attr_reader :window
+
+    def wmove(y, x = 0)
+      Curses.wmove window, y, x
+    end
+
+    def waddstr(str, clear_to_eol_before_add: false)
+      wclrtoeol if clear_to_eol_before_add
+      Curses.waddstr window, str
+    end
+
+    def mvwaddstr(y, x, str)
+      Curses.mvwaddstr window, y, x, str
+    end
+
+    def wclear
+      Curses.wclear window
+    end
+
+    def wrefresh
+      Curses.wrefresh window
+    end
+
+    def maxx
+      Curses.getmaxx window
+    end
+
+    def maxy
+      Curses.getmaxy window
+    end
+
+    def begx
+      Curses.getbegx window
+    end
+
+    def begy
+      Curses.getbegy window
+    end
+
+    def subwin(height, width, top, left)
+      Curses.derwin Curses.stdscr, height, width, top, left
+    end
+
+    def wclrtoeol
+      Curses.wclrtoeol window
+    end
+
+    def draw_border(*border_param)
+      border_window = subwin maxy + 2, maxx + 2, begy - 1, begx - 1
+      Curses.wbkgd border_window, Curses.COLOR_PAIR(Curses::COLOR_CYAN)
+      Curses.wborder border_window, *border_param
+    end
+  end
+
+  class HeaderLeftWindow < Window
+    def initialize
+      @window = subwin 3, Curses.COLS - 32, 1, 1
+      draw_border 0, 0, 0, 0, 0, 0, Curses::ACS_LTEE, 0
+    end
+
+    def draw_path_and_page_number(path: nil, current: 1, total: nil)
+      @path_and_page_number = %Q[Page: #{"#{current}/ #{total}".ljust(11)}  Path: #{path}]
+      wmove 0
+      waddstr @path_and_page_number, clear_to_eol_before_add: true
+      wrefresh
+    end
+
+    def draw_current_file_info(current_file)
+      draw_current_filename current_file.full_display_name
+      draw_stat current_file
+    end
+
+    def draw_current_filename(current_file_name)
+      @current_file_name = "File: #{current_file_name}"
+      wmove 1
+      waddstr @current_file_name, clear_to_eol_before_add: true
+    end
+
+    def draw_stat(item)
+      @stat = "      #{item.size_or_dir.ljust(13)}#{item.mtime} #{item.mode}"
+      wmove 2
+      waddstr @stat, clear_to_eol_before_add: true
+    end
+  end
+
+  class HeaderRightWindow < Window
+    def initialize
+      @window = subwin 3, 29, 1, Curses.COLS - 30
+      draw_border 0, 0, 0, 0, Curses::ACS_TTEE, 0, Curses::ACS_BTEE, Curses::ACS_RTEE
+    end
+
+    def draw_marked_items(count: 0, size: 0)
+      wmove 1
+      waddstr %Q[#{"#{count}Marked".rjust(11)} #{size.to_s.reverse.gsub( /(\d{3})(?=\d)/, '\1,').reverse.rjust(16)}], clear_to_eol_before_add: true
+    end
+
+    def draw_total_items(count: 0, size: 0)
+      wmove 2
+      waddstr %Q[#{"#{count}Files".rjust(10)} #{size.to_s.reverse.gsub( /(\d{3})(?=\d)/, '\1,').reverse.rjust(17)}], clear_to_eol_before_add: true
+      wrefresh
+    end
+
+    def debug(s)
+      wmove 0, 0
+      wclrtoeol
+      waddstr s.to_s
+      wrefresh
+    end
+  end
+
+  class MainWindow < Window
+    class Panes
+      attr_reader :current_index
+
+      def initialize(panes)
+        @panes, @current_index = panes, 0
+      end
+
+      def active
+        @panes[@current_index]
+      end
+
+      def activate(index)
+        @current_index = index if index < @panes.size
+      end
+
+      def size
+        @panes.size
+      end
+
+      def close_all
+        @panes.each {|p| Curses.delwin p}
+      end
+    end
+
+    def initialize(dir = '.')
+      border_window = subwin Curses.LINES - 5, Curses.COLS, 4, 0
+      Curses.wbkgd border_window, Curses::COLOR_PAIR(Curses::COLOR_CYAN)
+      Curses.box border_window, 0, 0
+
+      spawn_panes 2
+    end
+
+    def spawn_panes(num)
+      @panes.close_all if defined? @panes
+      width = (Curses.COLS - 2) / num
+      windows = 0.upto(num - 1).inject([]) {|arr, i| arr << subwin(Curses.LINES - 7, width - 1, 5, width * i + 1)}
+      @panes = Panes.new windows
+      activate_pane 0
+    end
+
+    def activate_pane(num)
+      @panes.activate num
+    end
+
+    def window
+      @panes.active
+    end
+
+    def max_items
+      maxy * @panes.size
+    end
+
+    def draw_item(item, current: false)
+      Curses.wattr_set window, current ? Curses::A_UNDERLINE : Curses::A_NORMAL, item.color, nil
+      mvwaddstr item.index % maxy, 0, "#{item.to_s}\n"
+      Curses.wstandend window
+      wrefresh
+    end
+
+    def draw_items_to_each_pane(items)
+      original_active_pane_index = @panes.current_index
+
+      0.upto(@panes.size - 1) do |index|
+        activate_pane index
+        wclear
+        wmove 0
+        items[maxy * index, maxy * (index + 1)].each do |item|
+          Curses.wattr_set window, Curses::A_NORMAL, item.color, nil
+          waddstr "#{item.to_s}\n"
+        end if items[maxy * index, maxy * (index + 1)]
+        Curses.wstandend window
+        wrefresh
+      end
+      activate_pane original_active_pane_index
+    end
+
+    def toggle_mark(item)
+      mvwaddstr item.index % maxy, 0, item.current_mark if item.toggle_mark
+    end
+  end
+
+  class CommandLineWindow < Window
+    def initialize
+      @window = subwin 1, Curses.COLS, Curses.LINES - 1, 0
+    end
+
+    def set_prompt(str)
+      Curses.wattr_set window, Curses::A_BOLD, Curses::COLOR_WHITE, nil
+      wmove 0
+      wclrtoeol
+      waddstr str
+      Curses.wstandend window
+    end
+
+    def get_command(prompt: nil)
+      Curses.echo
+      startx = prompt ? prompt.length : 1
+      s = ' ' * 100
+      Curses.mvwgetstr window, 0, startx, s
+      "#{prompt[1..-1] if prompt}#{s.strip}"
+    ensure
+      Curses.noecho
+    end
+
+    def show_error(str)
+      Curses.wattr_set window, Curses::A_BOLD, Curses::COLOR_RED, nil
+      wmove 0
+      wclrtoeol
+      waddstr str
+      wrefresh
+      Curses.wstandend window
+    end
+  end
+end