diff options
Diffstat (limited to 'vim/plugin/unimpaired.vim')
| -rw-r--r-- | vim/plugin/unimpaired.vim | 315 |
1 files changed, 0 insertions, 315 deletions
diff --git a/vim/plugin/unimpaired.vim b/vim/plugin/unimpaired.vim deleted file mode 100644 index 60b6c02..0000000 --- a/vim/plugin/unimpaired.vim +++ /dev/null @@ -1,315 +0,0 @@ -" unimpaired.vim - Pairs of handy bracket mappings -" Maintainer: Tim Pope <http://tpo.pe/> -" Version: 1.1 -" GetLatestVimScripts: 1590 1 :AutoInstall: unimpaired.vim - -if exists("g:loaded_unimpaired") || &cp || v:version < 700 - finish -endif -let g:loaded_unimpaired = 1 - -" Next and previous {{{1 - -function! s:MapNextFamily(map,cmd) - let map = '<Plug>unimpaired'.toupper(a:map) - let end = ' ".(v:count ? v:count : "")<CR>' - execute 'nmap <silent> '.map.'Previous :<C-U>exe "'.a:cmd.'previous'.end - execute 'nmap <silent> '.map.'Next :<C-U>exe "'.a:cmd.'next'.end - execute 'nmap <silent> '.map.'First :<C-U>exe "'.a:cmd.'first'.end - execute 'nmap <silent> '.map.'Last :<C-U>exe "'.a:cmd.'last'.end - execute 'nmap <silent> ['. a:map .' '.map.'Previous' - execute 'nmap <silent> ]'. a:map .' '.map.'Next' - execute 'nmap <silent> ['.toupper(a:map).' '.map.'First' - execute 'nmap <silent> ]'.toupper(a:map).' '.map.'Last' -endfunction - -call s:MapNextFamily('a','') -call s:MapNextFamily('b','b') -call s:MapNextFamily('l','l') -call s:MapNextFamily('q','c') -call s:MapNextFamily('t','t') - -function! s:entries(path) - let path = substitute(a:path,'[\\/]$','','') - let files = split(glob(path."/.*"),"\n") - let files += split(glob(path."/*"),"\n") - call map(files,'substitute(v:val,"[\\/]$","","")') - call filter(files,'v:val !~# "[\\\\/]\\.\\.\\=$"') - call filter(files,'v:val[-4:-1] !=# ".swp" && v:val[-1:-1] !=# "~"') - return files -endfunction - -function! s:FileByOffset(num) - let file = expand('%:p') - let num = a:num - while num - let files = s:entries(fnamemodify(file,':h')) - if a:num < 0 - call reverse(sort(filter(files,'v:val < file'))) - else - call sort(filter(files,'v:val > file')) - endif - let temp = get(files,0,'') - if temp == '' - let file = fnamemodify(file,':h') - else - let file = temp - while isdirectory(file) - let files = s:entries(file) - if files == [] - " TODO: walk back up the tree and continue - break - endif - let file = files[num > 0 ? 0 : -1] - endwhile - let num += num > 0 ? -1 : 1 - endif - endwhile - return file -endfunction - -nnoremap <silent> <Plug>unimpairedONext :<C-U>edit `=<SID>FileByOffset(v:count1)`<CR> -nnoremap <silent> <Plug>unimpairedOPrevious :<C-U>edit `=<SID>FileByOffset(-v:count1)`<CR> - -nmap ]o <Plug>unimpairedONext -nmap [o <Plug>unimpairedOPrevious - -nmap [, :call search('^[<=>]\{7\}','bW')<CR> -nmap ], :call search('^[<=>]\{7\}','W')<CR> -omap [, V:call search('^[<=>]\{7\}','bW')<CR> -omap ], V:call search('^[<=>]\{7\}','W')<CR> -xmap [, :<C-U>exe 'norm! gv'<Bar>call search('^[<=>]\{7\}','bW')<CR> -xmap ], :<C-U>exe 'norm! gv'<Bar>call search('^[<=>]\{7\}','W')<CR> -nmap [< :call search('^<<<<<<<','bW')<CR> -nmap [= :call search('^=======','bW')<CR> -nmap [> :call search('^>>>>>>>','bW')<CR> -nmap ]< :call search('^<<<<<<<','W')<CR> -nmap ]= :call search('^=======','W')<CR> -nmap ]> :call search('^>>>>>>>','W')<CR> -xmap [< :<C-U>exe 'norm! gv'<Bar>call search('^<<<<<<<','bW')<CR> -xmap [= :<C-U>exe 'norm! gv'<Bar>call search('^=======','bW')<CR> -xmap [> :<C-U>exe 'norm! gv'<Bar>call search('^>>>>>>>','bW')<CR> -xmap ]< :<C-U>exe 'norm! gv'<Bar>call search('^<<<<<<<','W')<CR> -xmap ]= :<C-U>exe 'norm! gv'<Bar>call search('^=======','W')<CR> -xmap ]> :<C-U>exe 'norm! gv'<Bar>call search('^>>>>>>>','W')<CR> -omap [< V:call search('^<<<<<<<','bW')<CR> -omap [= V:call search('^=======','bW')<CR> -omap [> V:call search('^>>>>>>>','bW')<CR> -omap ]< V:call search('^<<<<<<<','W')<CR> -omap ]= V:call search('^=======','W')<CR> -omap ]> V:call search('^>>>>>>>','W')<CR> - -" }}}1 -" Line operations {{{1 - -function! s:BlankUp(count) abort - put!=repeat(nr2char(10), a:count) - ']+1 - silent! call repeat#set("\<Plug>unimpairedBlankUp", a:count) -endfunction - -function! s:BlankDown(count) abort - put =repeat(nr2char(10), a:count) - '[-1 - silent! call repeat#set("\<Plug>unimpairedBlankDown", a:count) -endfunction - -nnoremap <silent> <Plug>unimpairedBlankUp :<C-U>call <SID>BlankUp(v:count1)<CR> -nnoremap <silent> <Plug>unimpairedBlankDown :<C-U>call <SID>BlankDown(v:count1)<CR> - -nmap [<Space> <Plug>unimpairedBlankUp -nmap ]<Space> <Plug>unimpairedBlankDown - -function! s:Move(cmd, count, map) abort - normal! m` - exe 'move'.a:cmd.a:count - norm! `` - call repeat#set("\<Plug>unimpairedMove".a:map, a:count) -endfunction - -nnoremap <silent> <Plug>unimpairedMoveUp :<C-U>call <SID>Move('--',v:count1,'Up')<CR> -nnoremap <silent> <Plug>unimpairedMoveDown :<C-U>call <SID>Move('+',v:count1,'Down')<CR> -xnoremap <silent> <Plug>unimpairedMoveUp :<C-U>exe 'normal! m`'<Bar>exe '''<,''>move--'.v:count1<CR>`` -xnoremap <silent> <Plug>unimpairedMoveDown :<C-U>exe 'normal! m`'<Bar>exe '''<,''>move''>+'.v:count1<CR>`` - -nmap [e <Plug>unimpairedMoveUp -nmap ]e <Plug>unimpairedMoveDown -xmap [e <Plug>unimpairedMoveUp -xmap ]e <Plug>unimpairedMoveDown - -" }}}1 -" Encoding and decoding {{{1 - -function! s:StringEncode(str) - let map = {"\n": 'n', "\r": 'r', "\t": 't', "\b": 'b', "\f": '\f', '"': '"', '\': '\'} - return substitute(a:str,"[\001-\033\\\\\"]",'\="\\".get(map,submatch(0),printf("%03o",char2nr(submatch(0))))','g') -endfunction - -function! s:StringDecode(str) - let map = {'n': "\n", 'r': "\r", 't': "\t", 'b': "\b", 'f': "\f", 'e': "\e", 'a': "\001", 'v': "\013"} - let str = a:str - if str =~ '^\s*".\{-\}\\\@<!\%(\\\\\)*"\s*\n\=$' - let str = substitute(substitute(str,'^\s*\zs"','',''),'"\ze\s*\n\=$','','') - endif - let str = substitute(str,'\\n\%(\n$\)\=','\n','g') - return substitute(str,'\\\(\o\{1,3\}\|x\x\{1,2\}\|u\x\{1,4\}\|.\)','\=get(map,submatch(1),submatch(1) =~? "^[0-9xu]" ? nr2char("0".substitute(submatch(1),"^[Uu]","x","")) : submatch(1))','g') -endfunction - -function! s:UrlEncode(str) - return substitute(a:str,'[^A-Za-z0-9_.~-]','\="%".printf("%02X",char2nr(submatch(0)))','g') -endfunction - -function! s:UrlDecode(str) - let str = substitute(substitute(substitute(a:str,'%0[Aa]\n$','%0A',''),'%0[Aa]','\n','g'),'+',' ','g') - return substitute(str,'%\(\x\x\)','\=nr2char("0x".submatch(1))','g') -endfunction - -" HTML entities {{{2 - -let g:unimpaired_html_entities = { - \ 'nbsp': 160, 'iexcl': 161, 'cent': 162, 'pound': 163, - \ 'curren': 164, 'yen': 165, 'brvbar': 166, 'sect': 167, - \ 'uml': 168, 'copy': 169, 'ordf': 170, 'laquo': 171, - \ 'not': 172, 'shy': 173, 'reg': 174, 'macr': 175, - \ 'deg': 176, 'plusmn': 177, 'sup2': 178, 'sup3': 179, - \ 'acute': 180, 'micro': 181, 'para': 182, 'middot': 183, - \ 'cedil': 184, 'sup1': 185, 'ordm': 186, 'raquo': 187, - \ 'frac14': 188, 'frac12': 189, 'frac34': 190, 'iquest': 191, - \ 'Agrave': 192, 'Aacute': 193, 'Acirc': 194, 'Atilde': 195, - \ 'Auml': 196, 'Aring': 197, 'AElig': 198, 'Ccedil': 199, - \ 'Egrave': 200, 'Eacute': 201, 'Ecirc': 202, 'Euml': 203, - \ 'Igrave': 204, 'Iacute': 205, 'Icirc': 206, 'Iuml': 207, - \ 'ETH': 208, 'Ntilde': 209, 'Ograve': 210, 'Oacute': 211, - \ 'Ocirc': 212, 'Otilde': 213, 'Ouml': 214, 'times': 215, - \ 'Oslash': 216, 'Ugrave': 217, 'Uacute': 218, 'Ucirc': 219, - \ 'Uuml': 220, 'Yacute': 221, 'THORN': 222, 'szlig': 223, - \ 'agrave': 224, 'aacute': 225, 'acirc': 226, 'atilde': 227, - \ 'auml': 228, 'aring': 229, 'aelig': 230, 'ccedil': 231, - \ 'egrave': 232, 'eacute': 233, 'ecirc': 234, 'euml': 235, - \ 'igrave': 236, 'iacute': 237, 'icirc': 238, 'iuml': 239, - \ 'eth': 240, 'ntilde': 241, 'ograve': 242, 'oacute': 243, - \ 'ocirc': 244, 'otilde': 245, 'ouml': 246, 'divide': 247, - \ 'oslash': 248, 'ugrave': 249, 'uacute': 250, 'ucirc': 251, - \ 'uuml': 252, 'yacute': 253, 'thorn': 254, 'yuml': 255, - \ 'OElig': 338, 'oelig': 339, 'Scaron': 352, 'scaron': 353, - \ 'Yuml': 376, 'circ': 710, 'tilde': 732, 'ensp': 8194, - \ 'emsp': 8195, 'thinsp': 8201, 'zwnj': 8204, 'zwj': 8205, - \ 'lrm': 8206, 'rlm': 8207, 'ndash': 8211, 'mdash': 8212, - \ 'lsquo': 8216, 'rsquo': 8217, 'sbquo': 8218, 'ldquo': 8220, - \ 'rdquo': 8221, 'bdquo': 8222, 'dagger': 8224, 'Dagger': 8225, - \ 'permil': 8240, 'lsaquo': 8249, 'rsaquo': 8250, 'euro': 8364, - \ 'fnof': 402, 'Alpha': 913, 'Beta': 914, 'Gamma': 915, - \ 'Delta': 916, 'Epsilon': 917, 'Zeta': 918, 'Eta': 919, - \ 'Theta': 920, 'Iota': 921, 'Kappa': 922, 'Lambda': 923, - \ 'Mu': 924, 'Nu': 925, 'Xi': 926, 'Omicron': 927, - \ 'Pi': 928, 'Rho': 929, 'Sigma': 931, 'Tau': 932, - \ 'Upsilon': 933, 'Phi': 934, 'Chi': 935, 'Psi': 936, - \ 'Omega': 937, 'alpha': 945, 'beta': 946, 'gamma': 947, - \ 'delta': 948, 'epsilon': 949, 'zeta': 950, 'eta': 951, - \ 'theta': 952, 'iota': 953, 'kappa': 954, 'lambda': 955, - \ 'mu': 956, 'nu': 957, 'xi': 958, 'omicron': 959, - \ 'pi': 960, 'rho': 961, 'sigmaf': 962, 'sigma': 963, - \ 'tau': 964, 'upsilon': 965, 'phi': 966, 'chi': 967, - \ 'psi': 968, 'omega': 969, 'thetasym': 977, 'upsih': 978, - \ 'piv': 982, 'bull': 8226, 'hellip': 8230, 'prime': 8242, - \ 'Prime': 8243, 'oline': 8254, 'frasl': 8260, 'weierp': 8472, - \ 'image': 8465, 'real': 8476, 'trade': 8482, 'alefsym': 8501, - \ 'larr': 8592, 'uarr': 8593, 'rarr': 8594, 'darr': 8595, - \ 'harr': 8596, 'crarr': 8629, 'lArr': 8656, 'uArr': 8657, - \ 'rArr': 8658, 'dArr': 8659, 'hArr': 8660, 'forall': 8704, - \ 'part': 8706, 'exist': 8707, 'empty': 8709, 'nabla': 8711, - \ 'isin': 8712, 'notin': 8713, 'ni': 8715, 'prod': 8719, - \ 'sum': 8721, 'minus': 8722, 'lowast': 8727, 'radic': 8730, - \ 'prop': 8733, 'infin': 8734, 'ang': 8736, 'and': 8743, - \ 'or': 8744, 'cap': 8745, 'cup': 8746, 'int': 8747, - \ 'there4': 8756, 'sim': 8764, 'cong': 8773, 'asymp': 8776, - \ 'ne': 8800, 'equiv': 8801, 'le': 8804, 'ge': 8805, - \ 'sub': 8834, 'sup': 8835, 'nsub': 8836, 'sube': 8838, - \ 'supe': 8839, 'oplus': 8853, 'otimes': 8855, 'perp': 8869, - \ 'sdot': 8901, 'lceil': 8968, 'rceil': 8969, 'lfloor': 8970, - \ 'rfloor': 8971, 'lang': 9001, 'rang': 9002, 'loz': 9674, - \ 'spades': 9824, 'clubs': 9827, 'hearts': 9829, 'diams': 9830, - \ 'apos': 39} - -" }}}2 - -function! s:XmlEncode(str) - let str = a:str - let str = substitute(str,'&','\&','g') - let str = substitute(str,'<','\<','g') - let str = substitute(str,'>','\>','g') - let str = substitute(str,'"','\"','g') - return str -endfunction - -function! s:XmlEntityDecode(str) - let str = substitute(a:str,'\c&#\%(0*38\|x0*26\);','&','g') - let str = substitute(str,'\c&#\(\d\+\);','\=nr2char(submatch(1))','g') - let str = substitute(str,'\c&#\(x\x\+\);','\=nr2char("0".submatch(1))','g') - let str = substitute(str,'\c'',"'",'g') - let str = substitute(str,'\c"','"','g') - let str = substitute(str,'\c>','>','g') - let str = substitute(str,'\c<','<','g') - let str = substitute(str,'\C&\(\%(amp;\)\@!\w*\);','\=nr2char(get(g:unimpaired_html_entities,submatch(1),63))','g') - return substitute(str,'\c&','\&','g') -endfunction - -function! s:XmlDecode(str) - let str = substitute(a:str,'<\%([[:alnum:]-]\+=\%("[^"]*"\|''[^'']*''\)\|.\)\{-\}>','','g') - return s:XmlEntityDecode(str) -endfunction - -function! s:Transform(algorithm,type) - let sel_save = &selection - let cb_save = &clipboard - set selection=inclusive clipboard-=unnamed clipboard-=unnamedplus - let reg_save = @@ - if a:type =~ '^\d\+$' - silent exe 'norm! ^v'.a:type.'$hy' - elseif a:type =~ '^.$' - silent exe "normal! `<" . a:type . "`>y" - elseif a:type == 'line' - silent exe "normal! '[V']y" - elseif a:type == 'block' - silent exe "normal! `[\<C-V>`]y" - else - silent exe "normal! `[v`]y" - endif - let @@ = s:{a:algorithm}(@@) - norm! gvp - let @@ = reg_save - let &selection = sel_save - let &clipboard = cb_save - if a:type =~ '^\d\+$' - silent! call repeat#set("\<Plug>unimpairedLine".a:algorithm,a:type) - endif -endfunction - -function! s:TransformOpfunc(type) - return s:Transform(s:encode_algorithm, a:type) -endfunction - -function! s:TransformSetup(algorithm) - let s:encode_algorithm = a:algorithm - let &opfunc = matchstr(expand('<sfile>'), '<SNR>\d\+_').'TransformOpfunc' -endfunction - -function! s:MapTransform(algorithm, key) - exe 'nnoremap <silent> <Plug>unimpaired' .a:algorithm.' :<C-U>call <SID>TransformSetup("'.a:algorithm.'")<CR>g@' - exe 'xnoremap <silent> <Plug>unimpaired' .a:algorithm.' :<C-U>call <SID>Transform("'.a:algorithm.'",visualmode())<CR>' - exe 'nnoremap <silent> <Plug>unimpairedLine'.a:algorithm.' :<C-U>call <SID>Transform("'.a:algorithm.'",v:count1)<CR>' - exe 'nmap '.a:key.' <Plug>unimpaired'.a:algorithm - exe 'xmap '.a:key.' <Plug>unimpaired'.a:algorithm - exe 'nmap '.a:key.a:key[strlen(a:key)-1].' <Plug>unimpairedLine'.a:algorithm -endfunction - -call s:MapTransform('StringEncode','[y') -call s:MapTransform('StringDecode',']y') -call s:MapTransform('UrlEncode','[u') -call s:MapTransform('UrlDecode',']u') -call s:MapTransform('XmlEncode','[x') -call s:MapTransform('XmlDecode',']x') - -" }}}1 - -" vim:set sw=2 sts=2: |