module Fm # ALL combinations of multiple keys (but without the last letter) # or regexps which match combinations need to be in here! def key_combinations return @@key_combinations if @@key_combinations @@key_combinations = %w[ g y c Z cu ter ta S ?? ?g ?f ?m ?l ?c ?o ?z o m ` ' go um /:[^<]*/ /[fF/!].*/ /r\d*\w*[^r]/ /(cw|cd|mv).*/ /b(l(o(c(k(.*)?)?)?)?)?/ /m(k(d(i(r(.*)?)?)?)?)?/ /t(o(u(c(h(.*)?)?)?)?)?/ /r(e(n(a(m(e(.*)?)?)?)?)?)?/ ] need_confirmation = %w[ delete dd dfd ] for str in need_confirmation @@key_combinations << (str + Option.confirm_string).chop end return @@key_combinations end def self.press(key) return if @ignore_until and Time.now < @ignore_until @ignore_until = nil if key == '' if @buffer.empty? @buffer = key elsif @buffer == 'F' descend elsif @buffer[-1] == ?> @buffer.slice!(/(<.*)?>$/) else @buffer.slice!(-1) end elsif key == '' @buffer = '' else @buffer << key end case @buffer when 'cp', 'yy' @copy = selection @cut = false when 'cut' @copy = selection @cut = true when /^F(.+)$/ str = $1 if str =~ /^\s?(.*)(|)$/ if $2 == '' Directory.filter = $1 @pwd.refresh! end @buffer.clear end when 'A' @buffer = "cw #{currentfile.name}" when /^mkdir(.*)$/ str = $1 if str =~ /^\s?(.*)(|)$/ @buffer = '' if $2 == '' begin Dir.mkdir($1) rescue end @pwd.schedule end end when /^touch(.*)$/ str = $1 if str =~ /^\s?(.*)(|)$/ @buffer = '' if $2 == '' begin File.open($1, 'a').close rescue end @pwd.schedule end end when /^block.*stop$/ @buffer = '' when 'P' for f in @copy File.symlink(f.path, File.expand_path(f.basename)) end ## Destructive {{{ when 'dd' + Option.confirm_string new_path = move_to_trash(currentfile) if new_path new_path = Directory::Entry.new(new_path) new_path.get_data @copy = [new_path] @cut = false end @pwd.schedule when 'dfd' + Option.confirm_string cf = currentfile if cf and cf.exists? cf.delete! @pwd.schedule end when 'delete' + Option.confirm_string files = selection @marked = [] for f in files if f and f.exists? and f.dir? system('rm', '-r', f.to_s) @pwd.schedule end end when 'p' if @cut Action.move(@copy, @pwd.path) @cut = false else Action.copy(@copy, @pwd.path) end @pwd.refresh! if @copy.size == 1 @pwd.find_file(@copy[0].basename) end when /^o(.)$/ if @memory[$1] Action.move(selection, @memory[$1]) end @pwd.refresh! when /^(mv|cw|rename)(.+)$/ str = $2 # if $1 == 'mv' # if str =~ /['`"]([\w\d])/ # if path = @memory[$1] # str = '' # @buffer.clear # if File.exists?(path) and File.directory?(path) # Action.move(selection, path) # end # end # end # end log str if str =~ /^\s?(.*)(|)$/ @buffer = '' if $2 == '' files = selection if files.size == 1 fn = $1 log "!!! #{fn}" unless fn.include? '.' if ext = files.first.basename.from_last('.') fn << ".#{ext}" end log "??? #{ext}" end Action.move(files, fn) @pwd.refresh! @pwd.find_file(fn) else Action.move(files, $1) @pwd.refresh! end end end ## }}} ## Movement {{{ ## gX {{{ when 'gg' @pwd.pos = 0 when 'g0' remember_dir enter_dir('/') when 'gh' remember_dir enter_dir('~') when 'gu' remember_dir enter_dir('/usr') when 'ge' remember_dir enter_dir('/etc') when 'gm' remember_dir enter_dir('/media') when 'gn' remember_dir enter_dir('/mnt') when 'gt' remember_dir enter_dir('~/.trash') when 'gs' remember_dir enter_dir('/srv') ## }}} when 'G' @pwd.pos = @pwd.size - 1 when 'k', '' @pwd.pos -= 1 when 'j', '' @pwd.pos += 1 when '', 'h', 'H', '' descend when 'J' @pwd.pos += lines/2 when 'K' @pwd.pos -= lines/2 when '', 'l', 'L', '' if currentfile.dir? enter_dir_safely(currentfile.path) else mode = @buffer == 'L' ? 1 : 0 Action.run(RunContext.new(getfiles, mode, 'a')) end when 'n' if @search_string.empty? find_newest else search(@search_string, 1) end when 'N' search(@search_string, 0, true) when /^cd(.+)$/ str = $1 if str =~ /^\s?(.*)(|)$/ @buffer = '' if $2 == '' remember_dir enter_dir_safely($1) end end when /^(?:`|'|go)(.)$/ if dir = @memory[$1] and not @pwd.path == dir remember_dir enter_dir_safely(dir) end when '' if dir = @memory['`'] and not @pwd.path == dir remember_dir enter_dir_safely(dir) end when /^m(.)$/ @memory[$1] = @pwd.path when /^um(.)$/ @memory.delete($1) when /^f(.+)$/ str = $1 if str =~ /^\s?(.*)(L|;||)$/ @buffer = '' @search_string = $1 press('l') if $2 == ';' or $2 == 'L' else test = hints(str) if test == 1 @buffer = '' press('l') ignore_keys_for 0.5 elsif test == 0 @buffer = '' ignore_keys_for 1 end end when /^\/(.+)$/ str = $1 if str =~ /^\s?(.*)(L|;||)$/ @buffer = '' @search_string = $1 press 'l' if $2 == ';' or $2 == 'L' else search(str) end ## }}} ## Launching applications {{{ when 's' ls = ['ls'] ls << '--color=auto' #if Option.color ls << '--group-directories-first' #if Option.color externally do system("clear; #{ls * ' '}; bash") @pwd.schedule end when 'tar' externally do system('tar', 'cvvf', 'pack.tar', *selection.map{|x| x.basename}) @pwd.refresh! end when /^!(.+)$/ str = $1 if str =~ /^(\!?)(.*)(|)$/ @buffer = '' if $3 == '' externally do system("bash", "-c", $2) Action.wait_for_enter unless $1.empty? end @pwd.schedule end end when 'term' fork do exec 'x-terminal-emulator' end when 'E' externally do Action.run(RunContext.new(getfiles, nil, nil, 'editor')) end when /^[ri](\d*)([adetw]*)[ri]$/ run_context = RunContext.new(getfiles, $1, $2) Action.run(run_context) when "-", "=" val = "2#{key=='-' ? '-' : '+'}" system("amixer", "-q", "set", "PCM", val, "unmute") ## }}} ## Control {{{ when 'x' @bars.first.kill unless @bars.empty? when 'X' @bars.last.kill unless @bars.empty? when '' externally when 'R' @pwd.refresh! when ' ' if currentfile.marked @marked.delete(currentfile) currentfile.marked = false else @marked << currentfile currentfile.marked = true end @pwd.pos += 1 when 'ZZ', '', ':q', 'Q' exit when 'ZX' Option.cd ^= true exit when '' Fm.boot_up when 'v' @marked = [] for file in @pwd.files if file.marked file.marked = false else file.marked = true @marked << file end end when 'V' for file in @marked file.marked = false end @marked = [] ## }}} ## Options {{{ when /^S(.)$/ Option.sort_reverse = $1.ord.between?(65, 90) case $1 when 'n' Option.sort = :name when 'e' Option.sort = :ext when 't' Option.sort = :type when 's' Option.sort = :size when 'm' Option.sort = :mtime when 'c' Option.sort = :ctime end @pwd.schedule when 't!' Option.confirm ^= true when 'tw' Option.wide_bar ^= true when 'tp' Option.preview ^= true when 'tf' Option.file_preview ^= true when 'th' Option.show_hidden ^= true @pwd.refresh! when 'tc' Option.cd ^= true when 'td' Option.dir_first ^= true @pwd.schedule ## }}} ## Mouse {{{ when '' log mouse.bstate if mouse.click3? or mouse.click1? or mouse.doubleclick1? if mouse.y == 0 elsif mouse.y >= CLI.lines - @bars.size else boundaries = (0..3).map { |x| get_boundaries(x) } ranges = boundaries.map { |x| x.first .. x.first + x.last } case mouse.x when ranges[0] descend if mouse.click3? @pwd.pos = get_offset( @path[-1], lines ) + mouse.y - 1 else descend end when ranges[1] descend if mouse.click1? @pwd.pos = get_offset( @path[-1], lines ) + mouse.y - 1 end when ranges[2] @pwd.pos = get_offset( @path[-1], lines ) + mouse.y - 1 if mouse.doubleclick1? @buffer = '' if mouse.ctrl? then press('L') else press('l') end end when ranges[3] @buffer = '' if mouse.ctrl? then press('L') else press('l') end if mouse.click1? and currentfile.dir? @pwd.pos = get_offset( @path[-1], lines ) + mouse.y - 1 end end end end ## }}} end @buffer = '' unless @buffer == '' or @buffer =~ key_regexp end def self.descend Directory.filter = nil unless @path.size == 1 enter_dir(@buffer=='H' ? '..' : @path[-2].path) end end def ignore_keys_for(t) @ignore_until = Time.now + t end def search(str, offset=0, backwards=false) begin rx = Regexp.new(str, Regexp::IGNORECASE) rescue return false end ary = @pwd.files_raw.dup ary.wrap(@pwd.pos + offset) ary.reverse! if backwards for f in ary g = File.basename(f) if g =~ rx @pwd.pointed_file = f break end end end def find_newest() newest = nil for f in @pwd.files if newest.nil? or newest.ctime < f.ctime newest = f end end @pwd.pointed_file = newest.path end def hints(str) begin rx = Regexp.new(str, Regexp::IGNORECASE) rescue return false end ary = @pwd.files_raw.dup ary.wrap(@pwd.pos) n = 0 pointed = false for f in ary g = File.basename(f) if g =~ rx unless pointed log "point at #{f}" @pwd.pointed_file = f pointed = true end n += 1 end end return n end def self.remember_dir @memory["`"] = @memory["'"] = @pwd.path end def self.recalculate_key_combinations @@key_combinations = nil @@key_regexp = nil end recalculate_key_combinations def key_regexp return @@key_regexp if @@key_regexp # Create a regular expression which detects combos ary = [] for token in key_combinations if token =~ /^\/(.*)\/$/ ary << $1 elsif token.size > 0 ary << token.each_char.map {|t| if t == '?' t = '\?' end "(?:#{t}" }.join + (')?' * (token.size - 1)) + ')' end end @@key_regexp = Regexp.new('^(?:' + ary.uniq.join('|') + ')$') end end