Mercurial > ec-dotfiles
comparison vendor/vim-packs/ctrlp.vim/autoload/ctrlp/dir.vim @ 707:4576f1471f53
[update-vendor, vim] add ctrlp
author | nanaya <me@nanaya.net> |
---|---|
date | Sun, 18 Dec 2022 22:27:56 +0900 |
parents | |
children |
comparison
equal
deleted
inserted
replaced
706:4b30df382167 | 707:4576f1471f53 |
---|---|
1 " ============================================================================= | |
2 " File: autoload/ctrlp/dir.vim | |
3 " Description: Directory extension | |
4 " Author: Kien Nguyen <github.com/kien> | |
5 " ============================================================================= | |
6 | |
7 " Init {{{1 | |
8 if exists('g:loaded_ctrlp_dir') && g:loaded_ctrlp_dir | |
9 fini | |
10 en | |
11 let [g:loaded_ctrlp_dir, g:ctrlp_newdir] = [1, 0] | |
12 | |
13 let s:ars = ['s:maxdepth', 's:maxfiles', 's:compare_lim', 's:glob', 's:caching'] | |
14 | |
15 cal add(g:ctrlp_ext_vars, { | |
16 \ 'init': 'ctrlp#dir#init('.join(s:ars, ', ').')', | |
17 \ 'accept': 'ctrlp#dir#accept', | |
18 \ 'lname': 'dirs', | |
19 \ 'sname': 'dir', | |
20 \ 'type': 'path', | |
21 \ 'specinput': 1, | |
22 \ }) | |
23 | |
24 let s:id = g:ctrlp_builtins + len(g:ctrlp_ext_vars) | |
25 | |
26 let s:dircounts = {} | |
27 " Utilities {{{1 | |
28 fu! s:globdirs(dirs, depth) | |
29 let entries = split(globpath(a:dirs, s:glob), "\n") | |
30 let [dirs, depth] = [ctrlp#dirnfile(entries)[0], a:depth + 1] | |
31 cal extend(g:ctrlp_alldirs, dirs) | |
32 let nr = len(g:ctrlp_alldirs) | |
33 if !empty(dirs) && !s:max(nr, s:maxfiles) && depth <= s:maxdepth | |
34 sil! cal ctrlp#progress(nr) | |
35 cal map(dirs, 'ctrlp#utils#fnesc(v:val, "g", ",")') | |
36 cal s:globdirs(join(dirs, ','), depth) | |
37 en | |
38 endf | |
39 | |
40 fu! s:max(len, max) | |
41 retu a:max && a:len > a:max | |
42 endf | |
43 | |
44 fu! s:nocache() | |
45 retu !s:caching || ( s:caching > 1 && get(s:dircounts, s:cwd) < s:caching ) | |
46 endf | |
47 " Public {{{1 | |
48 fu! ctrlp#dir#init(...) | |
49 let s:cwd = getcwd() | |
50 for each in range(len(s:ars)) | |
51 let {s:ars[each]} = a:{each + 1} | |
52 endfo | |
53 let cadir = ctrlp#utils#cachedir().ctrlp#utils#lash().'dir' | |
54 let cafile = cadir.ctrlp#utils#lash().ctrlp#utils#cachefile('dir') | |
55 if g:ctrlp_newdir || s:nocache() || !filereadable(cafile) | |
56 let [s:initcwd, g:ctrlp_alldirs] = [s:cwd, []] | |
57 if !ctrlp#igncwd(s:cwd) | |
58 cal s:globdirs(ctrlp#utils#fnesc(s:cwd, 'g', ','), 0) | |
59 en | |
60 cal ctrlp#rmbasedir(g:ctrlp_alldirs) | |
61 if len(g:ctrlp_alldirs) <= s:compare_lim | |
62 cal sort(g:ctrlp_alldirs, 'ctrlp#complen') | |
63 en | |
64 cal ctrlp#utils#writecache(g:ctrlp_alldirs, cadir, cafile) | |
65 let g:ctrlp_newdir = 0 | |
66 el | |
67 if !( exists('s:initcwd') && s:initcwd == s:cwd ) | |
68 let s:initcwd = s:cwd | |
69 let g:ctrlp_alldirs = ctrlp#utils#readfile(cafile) | |
70 en | |
71 en | |
72 cal extend(s:dircounts, { s:cwd : len(g:ctrlp_alldirs) }) | |
73 retu g:ctrlp_alldirs | |
74 endf | |
75 | |
76 fu! ctrlp#dir#accept(mode, str) | |
77 let path = a:mode == 'h' ? getcwd() : s:cwd.ctrlp#call('s:lash', s:cwd).a:str | |
78 if a:mode =~ 't\|v\|h' | |
79 cal ctrlp#exit() | |
80 en | |
81 cal ctrlp#setdir(path, a:mode =~ 't\|h' ? 'chd!' : 'lc!') | |
82 if a:mode == 'e' | |
83 sil! cal ctrlp#statusline() | |
84 cal ctrlp#setlines(s:id) | |
85 cal ctrlp#recordhist() | |
86 cal ctrlp#prtclear() | |
87 en | |
88 endf | |
89 | |
90 fu! ctrlp#dir#id() | |
91 retu s:id | |
92 endf | |
93 "}}} | |
94 | |
95 " vim:fen:fdm=marker:fmr={{{,}}}:fdl=0:fdc=1:ts=2:sw=2:sts=2 |