268 lines
9.7 KiB
VimL
268 lines
9.7 KiB
VimL
"=============================================================================
|
|
" FILE: autoload/EasyMotion/command_line.vim
|
|
" AUTHOR: haya14busa
|
|
" Reference: https://github.com/osyo-manga/vim-over
|
|
" Last Change: 24 Jan 2014.
|
|
" License: MIT license {{{
|
|
" Permission is hereby granted, free of charge, to any person obtaining
|
|
" a copy of this software and associated documentation files (the
|
|
" "Software"), to deal in the Software without restriction, including
|
|
" without limitation the rights to use, copy, modify, merge, publish,
|
|
" distribute, sublicense, and/or sell copies of the Software, and to
|
|
" permit persons to whom the Software is furnished to do so, subject to
|
|
" the following conditions:
|
|
"
|
|
" The above copyright notice and this permission notice shall be included
|
|
" in all copies or substantial portions of the Software.
|
|
"
|
|
" THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
|
|
" OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
|
|
" MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
|
|
" IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY
|
|
" CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,
|
|
" TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
|
|
" SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
|
|
" }}}
|
|
"=============================================================================
|
|
scriptencoding utf-8
|
|
" Saving 'cpoptions' {{{
|
|
let s:save_cpo = &cpo
|
|
set cpo&vim
|
|
" }}}
|
|
|
|
function! s:InputPrompt(message, input) "{{{
|
|
redraw
|
|
echohl Question | echon a:message | echohl None
|
|
echon a:input
|
|
endfunction "}}}
|
|
function! s:Cancell() " {{{
|
|
call s:after_input()
|
|
keepjumps call setpos('.', s:save_orig_pos)
|
|
redraw
|
|
echo 'EasyMotion: Cancelled'
|
|
return ''
|
|
endfunction " }}}
|
|
|
|
function! s:getPromptMessage(num_strokes) "{{{
|
|
if a:num_strokes == 1
|
|
let prompt = substitute(
|
|
\ substitute(g:EasyMotion_prompt,'{n}', a:num_strokes, 'g'),
|
|
\ '(s)', '', 'g')
|
|
elseif a:num_strokes == -1
|
|
let prompt = substitute(
|
|
\ substitute(g:EasyMotion_prompt, '{n}\s\{0,1}', '', 'g'),
|
|
\ '(s)', 's', 'g')
|
|
else
|
|
let prompt = substitute(
|
|
\ substitute(g:EasyMotion_prompt,'{n}', a:num_strokes, 'g'),
|
|
\ '(s)', 's', 'g')
|
|
endif
|
|
return prompt
|
|
endfunction "}}}
|
|
function! s:before_input(num_strokes) "{{{
|
|
if a:num_strokes == -1 && g:EasyMotion_inc_highlight
|
|
call EasyMotion#highlight#delete_highlight()
|
|
let shade_hl_re = '\_.*'
|
|
call EasyMotion#highlight#add_highlight(shade_hl_re, g:EasyMotion_hl_group_shade)
|
|
call EasyMotion#highlight#add_highlight('\%#', g:EasyMotion_hl_inc_cursor)
|
|
endif
|
|
endfunction "}}}
|
|
function! s:after_input() "{{{
|
|
call EasyMotion#highlight#delete_highlight()
|
|
endfunction "}}}
|
|
function! s:should_use_smartcase(input) "{{{
|
|
" TODO:
|
|
if g:EasyMotion_smartcase == 0
|
|
return 0
|
|
endif
|
|
" return 1 if input didn't match upporcase letter
|
|
return match(a:input, '\u') == -1
|
|
endfunction "}}}
|
|
function! s:offscreen_search(re) "{{{
|
|
" First: search within visible screen range
|
|
call s:adjust_screen()
|
|
silent! let pos = searchpos(a:re, s:direction . 'n', s:orig_line_end[1])
|
|
if pos != [0, 0]
|
|
" Restore cursor posision
|
|
keepjumps call setpos('.', s:orig_pos)
|
|
else
|
|
" Second: if there were no much, search off screen
|
|
silent! let pos = searchpos(a:re, s:direction)
|
|
if pos != [0, 0]
|
|
" Match
|
|
keepjumps call setpos('.', pos)
|
|
" Move cursor
|
|
if s:save_direction != 'b'
|
|
normal! zzH0
|
|
else
|
|
normal! zzL0
|
|
endif
|
|
else
|
|
" No much
|
|
call s:adjust_screen()
|
|
keepjumps call setpos('.', s:orig_pos)
|
|
endif
|
|
endif
|
|
endfunction "}}}
|
|
function! s:adjust_screen() "{{{
|
|
if s:save_direction != 'b'
|
|
" Forward
|
|
keepjumps call setpos('.', s:orig_line_start)
|
|
normal! zt
|
|
else
|
|
" Backward
|
|
keepjumps call setpos('.', s:orig_line_end)
|
|
normal! zb
|
|
endif
|
|
endfunction "}}}
|
|
function! s:search_histories() "{{{
|
|
return map(range(&history), 'histget("search", v:val * -1)')
|
|
endfunction "}}}
|
|
|
|
function! EasyMotion#command_line#GetInput(num_strokes, prev, direction) "{{{
|
|
let previous_input = a:prev
|
|
let s:save_direction = a:direction == 1 ? 'b' : ''
|
|
let s:direction = s:save_direction
|
|
let input = ''
|
|
let prompt = s:getPromptMessage(a:num_strokes)
|
|
|
|
let s:orig_pos = getpos('.')
|
|
let s:orig_line_start = getpos('w0')
|
|
let s:orig_line_end = getpos('w$')
|
|
|
|
let s:save_orig_pos = deepcopy(s:orig_pos)
|
|
|
|
call s:before_input(a:num_strokes)
|
|
|
|
" let s:search_hist = s:search_histories()
|
|
let s:search_hist = []
|
|
let s:search_cnt = 0
|
|
|
|
while EasyMotion#helper#strchars(input) < a:num_strokes ||
|
|
\ a:num_strokes == -1
|
|
if g:EasyMotion_show_prompt
|
|
call s:InputPrompt(prompt, input)
|
|
endif
|
|
let c = getchar()
|
|
let s:char = type(c) == type(0) ? nr2char(c) : c
|
|
if EasyMotion#command_line#is_input("\<Esc>")
|
|
" Cancel if Escape key pressed
|
|
call s:Cancell() | let input = '' | break
|
|
elseif EasyMotion#command_line#is_input("\<CR>")
|
|
if len(input) == 0
|
|
let input = previous_input | break
|
|
endif
|
|
break
|
|
elseif EasyMotion#command_line#is_input("\<C-j>")
|
|
break
|
|
elseif EasyMotion#command_line#is_input("\<C-c>")
|
|
" Cancel
|
|
call s:Cancell() | let input = '' | break
|
|
elseif EasyMotion#command_line#is_input("\<C-h>")
|
|
" Delete one character
|
|
if len(input) == 0
|
|
call s:Cancell() | let input = '' | break
|
|
endif
|
|
let input = substitute(input, '.$', '', '')
|
|
elseif EasyMotion#command_line#is_input("\<C-d>")
|
|
" Delete one character
|
|
if len(input) == 0
|
|
call s:Cancell() | let input = '' | break
|
|
endif
|
|
let input = substitute(input, '.$', '', '')
|
|
elseif EasyMotion#command_line#is_input("\<C-u>")
|
|
" Delete all
|
|
if len(input) == 0
|
|
call s:Cancell() | let input = '' | break
|
|
endif
|
|
let input = ''
|
|
elseif EasyMotion#command_line#is_input("\<C-w>")
|
|
" Delete word
|
|
let input = matchstr(input, '^\zs.\{-}\ze\(\(\w*\)\|\(.\)\)$')
|
|
elseif EasyMotion#command_line#is_input("\<C-p>") || EasyMotion#command_line#is_input("\<C-n>")
|
|
if s:search_cnt == 0 && empty(s:search_hist)
|
|
let cmdline = '^' . input
|
|
let s:search_hist = filter(s:search_histories(), 'v:val =~ cmdline')
|
|
endif
|
|
if EasyMotion#command_line#is_input("\<C-n>")
|
|
let s:search_cnt = max([s:search_cnt - 1, 0])
|
|
endif
|
|
if EasyMotion#command_line#is_input("\<C-p>")
|
|
let s:search_cnt = min([s:search_cnt + 1, len(s:search_hist)])
|
|
endif
|
|
let input = get(s:search_hist, s:search_cnt, input)
|
|
elseif EasyMotion#command_line#is_input("\<Tab>")
|
|
exec "normal! \<C-f>"
|
|
let s:orig_pos = getpos('.')
|
|
let s:orig_line_start = getpos('w0')
|
|
let s:orig_line_end = getpos('w$')
|
|
let s:direction = ''
|
|
elseif EasyMotion#command_line#is_input("\<S-Tab>")
|
|
exec "normal! \<C-b>"
|
|
let s:orig_pos = getpos('.')
|
|
let s:orig_line_start = getpos('w0')
|
|
let s:orig_line_end = getpos('w$')
|
|
let s:direction = 'b'
|
|
elseif EasyMotion#command_line#is_input("\<C-o>")
|
|
keepjumps call setpos('.', s:save_orig_pos)
|
|
let s:orig_pos = s:save_orig_pos
|
|
let s:orig_line_start = getpos('w0')
|
|
let s:orig_line_end = getpos('w$')
|
|
let s:direction = s:save_direction
|
|
elseif EasyMotion#command_line#is_input("\<C-z>")
|
|
normal! zR
|
|
elseif char2nr(s:char) == 128 || char2nr(s:char) < 27
|
|
" Do nothing for special key
|
|
continue
|
|
else
|
|
let input .= s:char
|
|
endif
|
|
|
|
" Incremental routine {{{
|
|
if a:num_strokes == -1
|
|
let re = input
|
|
let case_flag = s:should_use_smartcase(input) ? '\c' : '\C'
|
|
let re .= case_flag
|
|
if g:EasyMotion_inc_highlight "{{{
|
|
call EasyMotion#highlight#delete_highlight('EasyMotionIncSearch')
|
|
if len(input) > 0
|
|
silent! call EasyMotion#highlight#add_highlight(re, g:EasyMotion_hl_inc_search)
|
|
endif
|
|
endif "}}}
|
|
if g:EasyMotion_off_screen_search "{{{
|
|
call s:offscreen_search(re)
|
|
endif "}}}
|
|
endif
|
|
"}}}
|
|
endwhile
|
|
call s:after_input()
|
|
return input
|
|
endfunction "}}}
|
|
function! EasyMotion#command_line#char() "{{{
|
|
return s:char
|
|
endfunction "}}}
|
|
function! EasyMotion#command_line#is_input(key) "{{{
|
|
return EasyMotion#command_line#keymap(EasyMotion#command_line#char()) == a:key
|
|
endfunction "}}}
|
|
function! EasyMotion#command_line#keymap(key) "{{{
|
|
return get(extend(deepcopy(s:default_key_mapping), g:EasyMotion_command_line_key_mappings), a:key, a:key)
|
|
endfunction "}}}
|
|
" Default_key_mapping: {{{
|
|
let s:default_key_mapping = {
|
|
\ "\<Right>" : "\<C-f>",
|
|
\ "\<Left>" : "\<C-b>",
|
|
\ "\<Up>" : "\<C-p>",
|
|
\ "\<Down>" : "\<C-n>",
|
|
\ "\<BS>" : "\<C-h>",
|
|
\ "\<Del>" : "\<C-d>",
|
|
\ "\<Home>" : "\<C-a>",
|
|
\ "\<End>" : "\<C-e>",
|
|
\}
|
|
"}}}
|
|
|
|
" Restore 'cpoptions' {{{
|
|
let &cpo = s:save_cpo
|
|
unlet s:save_cpo
|
|
" }}}
|
|
" vim: fdm=marker:et:ts=4:sw=4:sts=4
|