annotate autoload/plug.vim.old @ 4:1a705d7a7521

working on stuff
author luka
date Thu, 23 Oct 2025 12:33:51 -0400
parents a4ec03f77554
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1 " vim-plug: Vim plugin manager
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2 " ============================
a4ec03f77554 I don't know...
luka
parents:
diff changeset
3 "
a4ec03f77554 I don't know...
luka
parents:
diff changeset
4 " 1. Download plug.vim and put it in 'autoload' directory
a4ec03f77554 I don't know...
luka
parents:
diff changeset
5 "
a4ec03f77554 I don't know...
luka
parents:
diff changeset
6 " # Vim
a4ec03f77554 I don't know...
luka
parents:
diff changeset
7 " curl -fLo ~/.vim/autoload/plug.vim --create-dirs \
a4ec03f77554 I don't know...
luka
parents:
diff changeset
8 " https://raw.githubusercontent.com/junegunn/vim-plug/master/plug.vim
a4ec03f77554 I don't know...
luka
parents:
diff changeset
9 "
a4ec03f77554 I don't know...
luka
parents:
diff changeset
10 " # Neovim
a4ec03f77554 I don't know...
luka
parents:
diff changeset
11 " sh -c 'curl -fLo "${XDG_DATA_HOME:-$HOME/.local/share}"/nvim/site/autoload/plug.vim --create-dirs \
a4ec03f77554 I don't know...
luka
parents:
diff changeset
12 " https://raw.githubusercontent.com/junegunn/vim-plug/master/plug.vim'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
13 "
a4ec03f77554 I don't know...
luka
parents:
diff changeset
14 " 2. Add a vim-plug section to your ~/.vimrc (or ~/.config/nvim/init.vim for Neovim)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
15 "
a4ec03f77554 I don't know...
luka
parents:
diff changeset
16 " call plug#begin()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
17 "
a4ec03f77554 I don't know...
luka
parents:
diff changeset
18 " " List your plugins here
a4ec03f77554 I don't know...
luka
parents:
diff changeset
19 " Plug 'tpope/vim-sensible'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
20 "
a4ec03f77554 I don't know...
luka
parents:
diff changeset
21 " call plug#end()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
22 "
a4ec03f77554 I don't know...
luka
parents:
diff changeset
23 " 3. Reload the file or restart Vim, then you can,
a4ec03f77554 I don't know...
luka
parents:
diff changeset
24 "
a4ec03f77554 I don't know...
luka
parents:
diff changeset
25 " :PlugInstall to install plugins
a4ec03f77554 I don't know...
luka
parents:
diff changeset
26 " :PlugUpdate to update plugins
a4ec03f77554 I don't know...
luka
parents:
diff changeset
27 " :PlugDiff to review the changes from the last update
a4ec03f77554 I don't know...
luka
parents:
diff changeset
28 " :PlugClean to remove plugins no longer in the list
a4ec03f77554 I don't know...
luka
parents:
diff changeset
29 "
a4ec03f77554 I don't know...
luka
parents:
diff changeset
30 " For more information, see https://github.com/junegunn/vim-plug
a4ec03f77554 I don't know...
luka
parents:
diff changeset
31 "
a4ec03f77554 I don't know...
luka
parents:
diff changeset
32 "
a4ec03f77554 I don't know...
luka
parents:
diff changeset
33 " Copyright (c) 2024 Junegunn Choi
a4ec03f77554 I don't know...
luka
parents:
diff changeset
34 "
a4ec03f77554 I don't know...
luka
parents:
diff changeset
35 " MIT License
a4ec03f77554 I don't know...
luka
parents:
diff changeset
36 "
a4ec03f77554 I don't know...
luka
parents:
diff changeset
37 " Permission is hereby granted, free of charge, to any person obtaining
a4ec03f77554 I don't know...
luka
parents:
diff changeset
38 " a copy of this software and associated documentation files (the
a4ec03f77554 I don't know...
luka
parents:
diff changeset
39 " "Software"), to deal in the Software without restriction, including
a4ec03f77554 I don't know...
luka
parents:
diff changeset
40 " without limitation the rights to use, copy, modify, merge, publish,
a4ec03f77554 I don't know...
luka
parents:
diff changeset
41 " distribute, sublicense, and/or sell copies of the Software, and to
a4ec03f77554 I don't know...
luka
parents:
diff changeset
42 " permit persons to whom the Software is furnished to do so, subject to
a4ec03f77554 I don't know...
luka
parents:
diff changeset
43 " the following conditions:
a4ec03f77554 I don't know...
luka
parents:
diff changeset
44 "
a4ec03f77554 I don't know...
luka
parents:
diff changeset
45 " The above copyright notice and this permission notice shall be
a4ec03f77554 I don't know...
luka
parents:
diff changeset
46 " included in all copies or substantial portions of the Software.
a4ec03f77554 I don't know...
luka
parents:
diff changeset
47 "
a4ec03f77554 I don't know...
luka
parents:
diff changeset
48 " THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
a4ec03f77554 I don't know...
luka
parents:
diff changeset
49 " EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
a4ec03f77554 I don't know...
luka
parents:
diff changeset
50 " MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
a4ec03f77554 I don't know...
luka
parents:
diff changeset
51 " NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
a4ec03f77554 I don't know...
luka
parents:
diff changeset
52 " LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
a4ec03f77554 I don't know...
luka
parents:
diff changeset
53 " OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
a4ec03f77554 I don't know...
luka
parents:
diff changeset
54 " WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
a4ec03f77554 I don't know...
luka
parents:
diff changeset
55
a4ec03f77554 I don't know...
luka
parents:
diff changeset
56 if exists('g:loaded_plug')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
57 finish
a4ec03f77554 I don't know...
luka
parents:
diff changeset
58 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
59 let g:loaded_plug = 1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
60
a4ec03f77554 I don't know...
luka
parents:
diff changeset
61 let s:cpo_save = &cpo
a4ec03f77554 I don't know...
luka
parents:
diff changeset
62 set cpo&vim
a4ec03f77554 I don't know...
luka
parents:
diff changeset
63
a4ec03f77554 I don't know...
luka
parents:
diff changeset
64 let s:plug_src = 'https://github.com/junegunn/vim-plug.git'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
65 let s:plug_tab = get(s:, 'plug_tab', -1)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
66 let s:plug_buf = get(s:, 'plug_buf', -1)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
67 let s:mac_gui = has('gui_macvim') && has('gui_running')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
68 let s:is_win = has('win32')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
69 let s:nvim = has('nvim-0.2') || (has('nvim') && exists('*jobwait') && !s:is_win)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
70 let s:vim8 = has('patch-8.0.0039') && exists('*job_start')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
71 if s:is_win && &shellslash
a4ec03f77554 I don't know...
luka
parents:
diff changeset
72 set noshellslash
a4ec03f77554 I don't know...
luka
parents:
diff changeset
73 let s:me = resolve(expand('<sfile>:p'))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
74 set shellslash
a4ec03f77554 I don't know...
luka
parents:
diff changeset
75 else
a4ec03f77554 I don't know...
luka
parents:
diff changeset
76 let s:me = resolve(expand('<sfile>:p'))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
77 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
78 let s:base_spec = { 'branch': '', 'frozen': 0 }
a4ec03f77554 I don't know...
luka
parents:
diff changeset
79 let s:TYPE = {
a4ec03f77554 I don't know...
luka
parents:
diff changeset
80 \ 'string': type(''),
a4ec03f77554 I don't know...
luka
parents:
diff changeset
81 \ 'list': type([]),
a4ec03f77554 I don't know...
luka
parents:
diff changeset
82 \ 'dict': type({}),
a4ec03f77554 I don't know...
luka
parents:
diff changeset
83 \ 'funcref': type(function('call'))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
84 \ }
a4ec03f77554 I don't know...
luka
parents:
diff changeset
85 let s:loaded = get(s:, 'loaded', {})
a4ec03f77554 I don't know...
luka
parents:
diff changeset
86 let s:triggers = get(s:, 'triggers', {})
a4ec03f77554 I don't know...
luka
parents:
diff changeset
87
a4ec03f77554 I don't know...
luka
parents:
diff changeset
88 function! s:is_powershell(shell)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
89 return a:shell =~# 'powershell\(\.exe\)\?$' || a:shell =~# 'pwsh\(\.exe\)\?$'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
90 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
91
a4ec03f77554 I don't know...
luka
parents:
diff changeset
92 function! s:isabsolute(dir) abort
a4ec03f77554 I don't know...
luka
parents:
diff changeset
93 return a:dir =~# '^/' || (has('win32') && a:dir =~? '^\%(\\\|[A-Z]:\)')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
94 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
95
a4ec03f77554 I don't know...
luka
parents:
diff changeset
96 function! s:git_dir(dir) abort
a4ec03f77554 I don't know...
luka
parents:
diff changeset
97 let gitdir = s:trim(a:dir) . '/.git'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
98 if isdirectory(gitdir)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
99 return gitdir
a4ec03f77554 I don't know...
luka
parents:
diff changeset
100 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
101 if !filereadable(gitdir)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
102 return ''
a4ec03f77554 I don't know...
luka
parents:
diff changeset
103 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
104 let gitdir = matchstr(get(readfile(gitdir), 0, ''), '^gitdir: \zs.*')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
105 if len(gitdir) && !s:isabsolute(gitdir)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
106 let gitdir = a:dir . '/' . gitdir
a4ec03f77554 I don't know...
luka
parents:
diff changeset
107 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
108 return isdirectory(gitdir) ? gitdir : ''
a4ec03f77554 I don't know...
luka
parents:
diff changeset
109 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
110
a4ec03f77554 I don't know...
luka
parents:
diff changeset
111 function! s:git_origin_url(dir) abort
a4ec03f77554 I don't know...
luka
parents:
diff changeset
112 let gitdir = s:git_dir(a:dir)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
113 let config = gitdir . '/config'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
114 if empty(gitdir) || !filereadable(config)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
115 return ''
a4ec03f77554 I don't know...
luka
parents:
diff changeset
116 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
117 return matchstr(join(readfile(config)), '\[remote "origin"\].\{-}url\s*=\s*\zs\S*\ze')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
118 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
119
a4ec03f77554 I don't know...
luka
parents:
diff changeset
120 function! s:git_revision(dir) abort
a4ec03f77554 I don't know...
luka
parents:
diff changeset
121 let gitdir = s:git_dir(a:dir)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
122 let head = gitdir . '/HEAD'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
123 if empty(gitdir) || !filereadable(head)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
124 return ''
a4ec03f77554 I don't know...
luka
parents:
diff changeset
125 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
126
a4ec03f77554 I don't know...
luka
parents:
diff changeset
127 let line = get(readfile(head), 0, '')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
128 let ref = matchstr(line, '^ref: \zs.*')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
129 if empty(ref)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
130 return line
a4ec03f77554 I don't know...
luka
parents:
diff changeset
131 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
132
a4ec03f77554 I don't know...
luka
parents:
diff changeset
133 if filereadable(gitdir . '/' . ref)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
134 return get(readfile(gitdir . '/' . ref), 0, '')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
135 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
136
a4ec03f77554 I don't know...
luka
parents:
diff changeset
137 if filereadable(gitdir . '/packed-refs')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
138 for line in readfile(gitdir . '/packed-refs')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
139 if line =~# ' ' . ref
a4ec03f77554 I don't know...
luka
parents:
diff changeset
140 return matchstr(line, '^[0-9a-f]*')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
141 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
142 endfor
a4ec03f77554 I don't know...
luka
parents:
diff changeset
143 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
144
a4ec03f77554 I don't know...
luka
parents:
diff changeset
145 return ''
a4ec03f77554 I don't know...
luka
parents:
diff changeset
146 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
147
a4ec03f77554 I don't know...
luka
parents:
diff changeset
148 function! s:git_local_branch(dir) abort
a4ec03f77554 I don't know...
luka
parents:
diff changeset
149 let gitdir = s:git_dir(a:dir)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
150 let head = gitdir . '/HEAD'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
151 if empty(gitdir) || !filereadable(head)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
152 return ''
a4ec03f77554 I don't know...
luka
parents:
diff changeset
153 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
154 let branch = matchstr(get(readfile(head), 0, ''), '^ref: refs/heads/\zs.*')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
155 return len(branch) ? branch : 'HEAD'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
156 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
157
a4ec03f77554 I don't know...
luka
parents:
diff changeset
158 function! s:git_origin_branch(spec)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
159 if len(a:spec.branch)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
160 return a:spec.branch
a4ec03f77554 I don't know...
luka
parents:
diff changeset
161 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
162
a4ec03f77554 I don't know...
luka
parents:
diff changeset
163 " The file may not be present if this is a local repository
a4ec03f77554 I don't know...
luka
parents:
diff changeset
164 let gitdir = s:git_dir(a:spec.dir)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
165 let origin_head = gitdir.'/refs/remotes/origin/HEAD'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
166 if len(gitdir) && filereadable(origin_head)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
167 return matchstr(get(readfile(origin_head), 0, ''),
a4ec03f77554 I don't know...
luka
parents:
diff changeset
168 \ '^ref: refs/remotes/origin/\zs.*')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
169 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
170
a4ec03f77554 I don't know...
luka
parents:
diff changeset
171 " The command may not return the name of a branch in detached HEAD state
a4ec03f77554 I don't know...
luka
parents:
diff changeset
172 let result = s:lines(s:system('git symbolic-ref --short HEAD', a:spec.dir))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
173 return v:shell_error ? '' : result[-1]
a4ec03f77554 I don't know...
luka
parents:
diff changeset
174 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
175
a4ec03f77554 I don't know...
luka
parents:
diff changeset
176 if s:is_win
a4ec03f77554 I don't know...
luka
parents:
diff changeset
177 function! s:plug_call(fn, ...)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
178 let shellslash = &shellslash
a4ec03f77554 I don't know...
luka
parents:
diff changeset
179 try
a4ec03f77554 I don't know...
luka
parents:
diff changeset
180 set noshellslash
a4ec03f77554 I don't know...
luka
parents:
diff changeset
181 return call(a:fn, a:000)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
182 finally
a4ec03f77554 I don't know...
luka
parents:
diff changeset
183 let &shellslash = shellslash
a4ec03f77554 I don't know...
luka
parents:
diff changeset
184 endtry
a4ec03f77554 I don't know...
luka
parents:
diff changeset
185 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
186 else
a4ec03f77554 I don't know...
luka
parents:
diff changeset
187 function! s:plug_call(fn, ...)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
188 return call(a:fn, a:000)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
189 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
190 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
191
a4ec03f77554 I don't know...
luka
parents:
diff changeset
192 function! s:plug_getcwd()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
193 return s:plug_call('getcwd')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
194 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
195
a4ec03f77554 I don't know...
luka
parents:
diff changeset
196 function! s:plug_fnamemodify(fname, mods)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
197 return s:plug_call('fnamemodify', a:fname, a:mods)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
198 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
199
a4ec03f77554 I don't know...
luka
parents:
diff changeset
200 function! s:plug_expand(fmt)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
201 return s:plug_call('expand', a:fmt, 1)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
202 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
203
a4ec03f77554 I don't know...
luka
parents:
diff changeset
204 function! s:plug_tempname()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
205 return s:plug_call('tempname')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
206 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
207
a4ec03f77554 I don't know...
luka
parents:
diff changeset
208 function! plug#begin(...)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
209 if a:0 > 0
a4ec03f77554 I don't know...
luka
parents:
diff changeset
210 let home = s:path(s:plug_fnamemodify(s:plug_expand(a:1), ':p'))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
211 elseif exists('g:plug_home')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
212 let home = s:path(g:plug_home)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
213 elseif has('nvim')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
214 let home = stdpath('data') . '/plugged'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
215 elseif !empty(&rtp)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
216 let home = s:path(split(&rtp, ',')[0]) . '/plugged'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
217 else
a4ec03f77554 I don't know...
luka
parents:
diff changeset
218 return s:err('Unable to determine plug home. Try calling plug#begin() with a path argument.')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
219 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
220 if s:plug_fnamemodify(home, ':t') ==# 'plugin' && s:plug_fnamemodify(home, ':h') ==# s:first_rtp
a4ec03f77554 I don't know...
luka
parents:
diff changeset
221 return s:err('Invalid plug home. '.home.' is a standard Vim runtime path and is not allowed.')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
222 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
223
a4ec03f77554 I don't know...
luka
parents:
diff changeset
224 let g:plug_home = home
a4ec03f77554 I don't know...
luka
parents:
diff changeset
225 let g:plugs = {}
a4ec03f77554 I don't know...
luka
parents:
diff changeset
226 let g:plugs_order = []
a4ec03f77554 I don't know...
luka
parents:
diff changeset
227 let s:triggers = {}
a4ec03f77554 I don't know...
luka
parents:
diff changeset
228
a4ec03f77554 I don't know...
luka
parents:
diff changeset
229 call s:define_commands()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
230 return 1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
231 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
232
a4ec03f77554 I don't know...
luka
parents:
diff changeset
233 function! s:define_commands()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
234 command! -nargs=+ -bar Plug call plug#(<args>)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
235 if !executable('git')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
236 return s:err('`git` executable not found. Most commands will not be available. To suppress this message, prepend `silent!` to `call plug#begin(...)`.')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
237 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
238 if has('win32')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
239 \ && &shellslash
a4ec03f77554 I don't know...
luka
parents:
diff changeset
240 \ && (&shell =~# 'cmd\(\.exe\)\?$' || s:is_powershell(&shell))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
241 return s:err('vim-plug does not support shell, ' . &shell . ', when shellslash is set.')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
242 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
243 if !has('nvim')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
244 \ && (has('win32') || has('win32unix'))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
245 \ && !has('multi_byte')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
246 return s:err('Vim needs +multi_byte feature on Windows to run shell commands. Enable +iconv for best results.')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
247 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
248 command! -nargs=* -bar -bang -complete=customlist,s:names PlugInstall call s:install(<bang>0, [<f-args>])
a4ec03f77554 I don't know...
luka
parents:
diff changeset
249 command! -nargs=* -bar -bang -complete=customlist,s:names PlugUpdate call s:update(<bang>0, [<f-args>])
a4ec03f77554 I don't know...
luka
parents:
diff changeset
250 command! -nargs=0 -bar -bang PlugClean call s:clean(<bang>0)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
251 command! -nargs=0 -bar PlugUpgrade if s:upgrade() | execute 'source' s:esc(s:me) | endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
252 command! -nargs=0 -bar PlugStatus call s:status()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
253 command! -nargs=0 -bar PlugDiff call s:diff()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
254 command! -nargs=? -bar -bang -complete=file PlugSnapshot call s:snapshot(<bang>0, <f-args>)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
255 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
256
a4ec03f77554 I don't know...
luka
parents:
diff changeset
257 function! s:to_a(v)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
258 return type(a:v) == s:TYPE.list ? a:v : [a:v]
a4ec03f77554 I don't know...
luka
parents:
diff changeset
259 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
260
a4ec03f77554 I don't know...
luka
parents:
diff changeset
261 function! s:to_s(v)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
262 return type(a:v) == s:TYPE.string ? a:v : join(a:v, "\n") . "\n"
a4ec03f77554 I don't know...
luka
parents:
diff changeset
263 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
264
a4ec03f77554 I don't know...
luka
parents:
diff changeset
265 function! s:glob(from, pattern)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
266 return s:lines(globpath(a:from, a:pattern))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
267 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
268
a4ec03f77554 I don't know...
luka
parents:
diff changeset
269 function! s:source(from, ...)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
270 let found = 0
a4ec03f77554 I don't know...
luka
parents:
diff changeset
271 for pattern in a:000
a4ec03f77554 I don't know...
luka
parents:
diff changeset
272 for vim in s:glob(a:from, pattern)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
273 execute 'source' s:esc(vim)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
274 let found = 1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
275 endfor
a4ec03f77554 I don't know...
luka
parents:
diff changeset
276 endfor
a4ec03f77554 I don't know...
luka
parents:
diff changeset
277 return found
a4ec03f77554 I don't know...
luka
parents:
diff changeset
278 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
279
a4ec03f77554 I don't know...
luka
parents:
diff changeset
280 function! s:assoc(dict, key, val)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
281 let a:dict[a:key] = add(get(a:dict, a:key, []), a:val)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
282 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
283
a4ec03f77554 I don't know...
luka
parents:
diff changeset
284 function! s:ask(message, ...)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
285 call inputsave()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
286 echohl WarningMsg
a4ec03f77554 I don't know...
luka
parents:
diff changeset
287 let answer = input(a:message.(a:0 ? ' (y/N/a) ' : ' (y/N) '))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
288 echohl None
a4ec03f77554 I don't know...
luka
parents:
diff changeset
289 call inputrestore()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
290 echo "\r"
a4ec03f77554 I don't know...
luka
parents:
diff changeset
291 return (a:0 && answer =~? '^a') ? 2 : (answer =~? '^y') ? 1 : 0
a4ec03f77554 I don't know...
luka
parents:
diff changeset
292 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
293
a4ec03f77554 I don't know...
luka
parents:
diff changeset
294 function! s:ask_no_interrupt(...)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
295 try
a4ec03f77554 I don't know...
luka
parents:
diff changeset
296 return call('s:ask', a:000)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
297 catch
a4ec03f77554 I don't know...
luka
parents:
diff changeset
298 return 0
a4ec03f77554 I don't know...
luka
parents:
diff changeset
299 endtry
a4ec03f77554 I don't know...
luka
parents:
diff changeset
300 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
301
a4ec03f77554 I don't know...
luka
parents:
diff changeset
302 function! s:lazy(plug, opt)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
303 return has_key(a:plug, a:opt) &&
a4ec03f77554 I don't know...
luka
parents:
diff changeset
304 \ (empty(s:to_a(a:plug[a:opt])) ||
a4ec03f77554 I don't know...
luka
parents:
diff changeset
305 \ !isdirectory(a:plug.dir) ||
a4ec03f77554 I don't know...
luka
parents:
diff changeset
306 \ len(s:glob(s:rtp(a:plug), 'plugin')) ||
a4ec03f77554 I don't know...
luka
parents:
diff changeset
307 \ len(s:glob(s:rtp(a:plug), 'after/plugin')))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
308 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
309
a4ec03f77554 I don't know...
luka
parents:
diff changeset
310 function! plug#end()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
311 if !exists('g:plugs')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
312 return s:err('plug#end() called without calling plug#begin() first')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
313 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
314
a4ec03f77554 I don't know...
luka
parents:
diff changeset
315 if exists('#PlugLOD')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
316 augroup PlugLOD
a4ec03f77554 I don't know...
luka
parents:
diff changeset
317 autocmd!
a4ec03f77554 I don't know...
luka
parents:
diff changeset
318 augroup END
a4ec03f77554 I don't know...
luka
parents:
diff changeset
319 augroup! PlugLOD
a4ec03f77554 I don't know...
luka
parents:
diff changeset
320 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
321 let lod = { 'ft': {}, 'map': {}, 'cmd': {} }
a4ec03f77554 I don't know...
luka
parents:
diff changeset
322
a4ec03f77554 I don't know...
luka
parents:
diff changeset
323 if get(g:, 'did_load_filetypes', 0)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
324 filetype off
a4ec03f77554 I don't know...
luka
parents:
diff changeset
325 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
326 for name in g:plugs_order
a4ec03f77554 I don't know...
luka
parents:
diff changeset
327 if !has_key(g:plugs, name)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
328 continue
a4ec03f77554 I don't know...
luka
parents:
diff changeset
329 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
330 let plug = g:plugs[name]
a4ec03f77554 I don't know...
luka
parents:
diff changeset
331 if get(s:loaded, name, 0) || !s:lazy(plug, 'on') && !s:lazy(plug, 'for')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
332 let s:loaded[name] = 1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
333 continue
a4ec03f77554 I don't know...
luka
parents:
diff changeset
334 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
335
a4ec03f77554 I don't know...
luka
parents:
diff changeset
336 if has_key(plug, 'on')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
337 let s:triggers[name] = { 'map': [], 'cmd': [] }
a4ec03f77554 I don't know...
luka
parents:
diff changeset
338 for cmd in s:to_a(plug.on)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
339 if cmd =~? '^<Plug>.\+'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
340 if empty(mapcheck(cmd)) && empty(mapcheck(cmd, 'i'))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
341 call s:assoc(lod.map, cmd, name)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
342 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
343 call add(s:triggers[name].map, cmd)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
344 elseif cmd =~# '^[A-Z]'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
345 let cmd = substitute(cmd, '!*$', '', '')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
346 if exists(':'.cmd) != 2
a4ec03f77554 I don't know...
luka
parents:
diff changeset
347 call s:assoc(lod.cmd, cmd, name)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
348 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
349 call add(s:triggers[name].cmd, cmd)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
350 else
a4ec03f77554 I don't know...
luka
parents:
diff changeset
351 call s:err('Invalid `on` option: '.cmd.
a4ec03f77554 I don't know...
luka
parents:
diff changeset
352 \ '. Should start with an uppercase letter or `<Plug>`.')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
353 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
354 endfor
a4ec03f77554 I don't know...
luka
parents:
diff changeset
355 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
356
a4ec03f77554 I don't know...
luka
parents:
diff changeset
357 if has_key(plug, 'for')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
358 let types = s:to_a(plug.for)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
359 if !empty(types)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
360 augroup filetypedetect
a4ec03f77554 I don't know...
luka
parents:
diff changeset
361 call s:source(s:rtp(plug), 'ftdetect/**/*.vim', 'after/ftdetect/**/*.vim')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
362 if has('nvim-0.5.0')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
363 call s:source(s:rtp(plug), 'ftdetect/**/*.lua', 'after/ftdetect/**/*.lua')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
364 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
365 augroup END
a4ec03f77554 I don't know...
luka
parents:
diff changeset
366 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
367 for type in types
a4ec03f77554 I don't know...
luka
parents:
diff changeset
368 call s:assoc(lod.ft, type, name)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
369 endfor
a4ec03f77554 I don't know...
luka
parents:
diff changeset
370 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
371 endfor
a4ec03f77554 I don't know...
luka
parents:
diff changeset
372
a4ec03f77554 I don't know...
luka
parents:
diff changeset
373 for [cmd, names] in items(lod.cmd)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
374 execute printf(
a4ec03f77554 I don't know...
luka
parents:
diff changeset
375 \ 'command! -nargs=* -range -bang -complete=file %s call s:lod_cmd(%s, "<bang>", <line1>, <line2>, <q-args>, %s)',
a4ec03f77554 I don't know...
luka
parents:
diff changeset
376 \ cmd, string(cmd), string(names))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
377 endfor
a4ec03f77554 I don't know...
luka
parents:
diff changeset
378
a4ec03f77554 I don't know...
luka
parents:
diff changeset
379 for [map, names] in items(lod.map)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
380 for [mode, map_prefix, key_prefix] in
a4ec03f77554 I don't know...
luka
parents:
diff changeset
381 \ [['i', '<C-\><C-O>', ''], ['n', '', ''], ['v', '', 'gv'], ['o', '', '']]
a4ec03f77554 I don't know...
luka
parents:
diff changeset
382 execute printf(
a4ec03f77554 I don't know...
luka
parents:
diff changeset
383 \ '%snoremap <silent> %s %s:<C-U>call <SID>lod_map(%s, %s, %s, "%s")<CR>',
a4ec03f77554 I don't know...
luka
parents:
diff changeset
384 \ mode, map, map_prefix, string(map), string(names), mode != 'i', key_prefix)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
385 endfor
a4ec03f77554 I don't know...
luka
parents:
diff changeset
386 endfor
a4ec03f77554 I don't know...
luka
parents:
diff changeset
387
a4ec03f77554 I don't know...
luka
parents:
diff changeset
388 for [ft, names] in items(lod.ft)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
389 augroup PlugLOD
a4ec03f77554 I don't know...
luka
parents:
diff changeset
390 execute printf('autocmd FileType %s call <SID>lod_ft(%s, %s)',
a4ec03f77554 I don't know...
luka
parents:
diff changeset
391 \ ft, string(ft), string(names))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
392 augroup END
a4ec03f77554 I don't know...
luka
parents:
diff changeset
393 endfor
a4ec03f77554 I don't know...
luka
parents:
diff changeset
394
a4ec03f77554 I don't know...
luka
parents:
diff changeset
395 call s:reorg_rtp()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
396 filetype plugin indent on
a4ec03f77554 I don't know...
luka
parents:
diff changeset
397 if has('vim_starting')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
398 if has('syntax') && !exists('g:syntax_on')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
399 syntax enable
a4ec03f77554 I don't know...
luka
parents:
diff changeset
400 end
a4ec03f77554 I don't know...
luka
parents:
diff changeset
401 else
a4ec03f77554 I don't know...
luka
parents:
diff changeset
402 call s:reload_plugins()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
403 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
404 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
405
a4ec03f77554 I don't know...
luka
parents:
diff changeset
406 function! s:loaded_names()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
407 return filter(copy(g:plugs_order), 'get(s:loaded, v:val, 0)')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
408 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
409
a4ec03f77554 I don't know...
luka
parents:
diff changeset
410 function! s:load_plugin(spec)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
411 call s:source(s:rtp(a:spec), 'plugin/**/*.vim', 'after/plugin/**/*.vim')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
412 if has('nvim-0.5.0')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
413 call s:source(s:rtp(a:spec), 'plugin/**/*.lua', 'after/plugin/**/*.lua')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
414 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
415 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
416
a4ec03f77554 I don't know...
luka
parents:
diff changeset
417 function! s:reload_plugins()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
418 for name in s:loaded_names()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
419 call s:load_plugin(g:plugs[name])
a4ec03f77554 I don't know...
luka
parents:
diff changeset
420 endfor
a4ec03f77554 I don't know...
luka
parents:
diff changeset
421 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
422
a4ec03f77554 I don't know...
luka
parents:
diff changeset
423 function! s:trim(str)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
424 return substitute(a:str, '[\/]\+$', '', '')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
425 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
426
a4ec03f77554 I don't know...
luka
parents:
diff changeset
427 function! s:version_requirement(val, min)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
428 for idx in range(0, len(a:min) - 1)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
429 let v = get(a:val, idx, 0)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
430 if v < a:min[idx] | return 0
a4ec03f77554 I don't know...
luka
parents:
diff changeset
431 elseif v > a:min[idx] | return 1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
432 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
433 endfor
a4ec03f77554 I don't know...
luka
parents:
diff changeset
434 return 1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
435 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
436
a4ec03f77554 I don't know...
luka
parents:
diff changeset
437 function! s:git_version_requirement(...)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
438 if !exists('s:git_version')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
439 let s:git_version = map(split(split(s:system(['git', '--version']))[2], '\.'), 'str2nr(v:val)')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
440 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
441 return s:version_requirement(s:git_version, a:000)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
442 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
443
a4ec03f77554 I don't know...
luka
parents:
diff changeset
444 function! s:progress_opt(base)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
445 return a:base && !s:is_win &&
a4ec03f77554 I don't know...
luka
parents:
diff changeset
446 \ s:git_version_requirement(1, 7, 1) ? '--progress' : ''
a4ec03f77554 I don't know...
luka
parents:
diff changeset
447 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
448
a4ec03f77554 I don't know...
luka
parents:
diff changeset
449 function! s:rtp(spec)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
450 return s:path(a:spec.dir . get(a:spec, 'rtp', ''))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
451 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
452
a4ec03f77554 I don't know...
luka
parents:
diff changeset
453 if s:is_win
a4ec03f77554 I don't know...
luka
parents:
diff changeset
454 function! s:path(path)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
455 return s:trim(substitute(a:path, '/', '\', 'g'))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
456 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
457
a4ec03f77554 I don't know...
luka
parents:
diff changeset
458 function! s:dirpath(path)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
459 return s:path(a:path) . '\'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
460 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
461
a4ec03f77554 I don't know...
luka
parents:
diff changeset
462 function! s:is_local_plug(repo)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
463 return a:repo =~? '^[a-z]:\|^[%~]'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
464 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
465
a4ec03f77554 I don't know...
luka
parents:
diff changeset
466 " Copied from fzf
a4ec03f77554 I don't know...
luka
parents:
diff changeset
467 function! s:wrap_cmds(cmds)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
468 let cmds = [
a4ec03f77554 I don't know...
luka
parents:
diff changeset
469 \ '@echo off',
a4ec03f77554 I don't know...
luka
parents:
diff changeset
470 \ 'setlocal enabledelayedexpansion']
a4ec03f77554 I don't know...
luka
parents:
diff changeset
471 \ + (type(a:cmds) == type([]) ? a:cmds : [a:cmds])
a4ec03f77554 I don't know...
luka
parents:
diff changeset
472 \ + ['endlocal']
a4ec03f77554 I don't know...
luka
parents:
diff changeset
473 if has('iconv')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
474 if !exists('s:codepage')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
475 let s:codepage = libcallnr('kernel32.dll', 'GetACP', 0)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
476 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
477 return map(cmds, printf('iconv(v:val."\r", "%s", "cp%d")', &encoding, s:codepage))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
478 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
479 return map(cmds, 'v:val."\r"')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
480 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
481
a4ec03f77554 I don't know...
luka
parents:
diff changeset
482 function! s:batchfile(cmd)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
483 let batchfile = s:plug_tempname().'.bat'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
484 call writefile(s:wrap_cmds(a:cmd), batchfile)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
485 let cmd = plug#shellescape(batchfile, {'shell': &shell, 'script': 0})
a4ec03f77554 I don't know...
luka
parents:
diff changeset
486 if s:is_powershell(&shell)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
487 let cmd = '& ' . cmd
a4ec03f77554 I don't know...
luka
parents:
diff changeset
488 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
489 return [batchfile, cmd]
a4ec03f77554 I don't know...
luka
parents:
diff changeset
490 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
491 else
a4ec03f77554 I don't know...
luka
parents:
diff changeset
492 function! s:path(path)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
493 return s:trim(a:path)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
494 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
495
a4ec03f77554 I don't know...
luka
parents:
diff changeset
496 function! s:dirpath(path)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
497 return substitute(a:path, '[/\\]*$', '/', '')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
498 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
499
a4ec03f77554 I don't know...
luka
parents:
diff changeset
500 function! s:is_local_plug(repo)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
501 return a:repo[0] =~ '[/$~]'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
502 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
503 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
504
a4ec03f77554 I don't know...
luka
parents:
diff changeset
505 function! s:err(msg)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
506 echohl ErrorMsg
a4ec03f77554 I don't know...
luka
parents:
diff changeset
507 echom '[vim-plug] '.a:msg
a4ec03f77554 I don't know...
luka
parents:
diff changeset
508 echohl None
a4ec03f77554 I don't know...
luka
parents:
diff changeset
509 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
510
a4ec03f77554 I don't know...
luka
parents:
diff changeset
511 function! s:warn(cmd, msg)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
512 echohl WarningMsg
a4ec03f77554 I don't know...
luka
parents:
diff changeset
513 execute a:cmd 'a:msg'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
514 echohl None
a4ec03f77554 I don't know...
luka
parents:
diff changeset
515 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
516
a4ec03f77554 I don't know...
luka
parents:
diff changeset
517 function! s:esc(path)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
518 return escape(a:path, ' ')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
519 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
520
a4ec03f77554 I don't know...
luka
parents:
diff changeset
521 function! s:escrtp(path)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
522 return escape(a:path, ' ,')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
523 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
524
a4ec03f77554 I don't know...
luka
parents:
diff changeset
525 function! s:remove_rtp()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
526 for name in s:loaded_names()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
527 let rtp = s:rtp(g:plugs[name])
a4ec03f77554 I don't know...
luka
parents:
diff changeset
528 execute 'set rtp-='.s:escrtp(rtp)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
529 let after = globpath(rtp, 'after')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
530 if isdirectory(after)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
531 execute 'set rtp-='.s:escrtp(after)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
532 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
533 endfor
a4ec03f77554 I don't know...
luka
parents:
diff changeset
534 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
535
a4ec03f77554 I don't know...
luka
parents:
diff changeset
536 function! s:reorg_rtp()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
537 if !empty(s:first_rtp)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
538 execute 'set rtp-='.s:first_rtp
a4ec03f77554 I don't know...
luka
parents:
diff changeset
539 execute 'set rtp-='.s:last_rtp
a4ec03f77554 I don't know...
luka
parents:
diff changeset
540 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
541
a4ec03f77554 I don't know...
luka
parents:
diff changeset
542 " &rtp is modified from outside
a4ec03f77554 I don't know...
luka
parents:
diff changeset
543 if exists('s:prtp') && s:prtp !=# &rtp
a4ec03f77554 I don't know...
luka
parents:
diff changeset
544 call s:remove_rtp()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
545 unlet! s:middle
a4ec03f77554 I don't know...
luka
parents:
diff changeset
546 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
547
a4ec03f77554 I don't know...
luka
parents:
diff changeset
548 let s:middle = get(s:, 'middle', &rtp)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
549 let rtps = map(s:loaded_names(), 's:rtp(g:plugs[v:val])')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
550 let afters = filter(map(copy(rtps), 'globpath(v:val, "after")'), '!empty(v:val)')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
551 let rtp = join(map(rtps, 'escape(v:val, ",")'), ',')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
552 \ . ','.s:middle.','
a4ec03f77554 I don't know...
luka
parents:
diff changeset
553 \ . join(map(afters, 'escape(v:val, ",")'), ',')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
554 let &rtp = substitute(substitute(rtp, ',,*', ',', 'g'), '^,\|,$', '', 'g')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
555 let s:prtp = &rtp
a4ec03f77554 I don't know...
luka
parents:
diff changeset
556
a4ec03f77554 I don't know...
luka
parents:
diff changeset
557 if !empty(s:first_rtp)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
558 execute 'set rtp^='.s:first_rtp
a4ec03f77554 I don't know...
luka
parents:
diff changeset
559 execute 'set rtp+='.s:last_rtp
a4ec03f77554 I don't know...
luka
parents:
diff changeset
560 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
561 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
562
a4ec03f77554 I don't know...
luka
parents:
diff changeset
563 function! s:doautocmd(...)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
564 if exists('#'.join(a:000, '#'))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
565 execute 'doautocmd' ((v:version > 703 || has('patch442')) ? '<nomodeline>' : '') join(a:000)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
566 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
567 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
568
a4ec03f77554 I don't know...
luka
parents:
diff changeset
569 function! s:dobufread(names)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
570 for name in a:names
a4ec03f77554 I don't know...
luka
parents:
diff changeset
571 let path = s:rtp(g:plugs[name])
a4ec03f77554 I don't know...
luka
parents:
diff changeset
572 for dir in ['ftdetect', 'ftplugin', 'after/ftdetect', 'after/ftplugin']
a4ec03f77554 I don't know...
luka
parents:
diff changeset
573 if len(finddir(dir, path))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
574 if exists('#BufRead')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
575 doautocmd BufRead
a4ec03f77554 I don't know...
luka
parents:
diff changeset
576 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
577 return
a4ec03f77554 I don't know...
luka
parents:
diff changeset
578 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
579 endfor
a4ec03f77554 I don't know...
luka
parents:
diff changeset
580 endfor
a4ec03f77554 I don't know...
luka
parents:
diff changeset
581 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
582
a4ec03f77554 I don't know...
luka
parents:
diff changeset
583 function! plug#load(...)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
584 if a:0 == 0
a4ec03f77554 I don't know...
luka
parents:
diff changeset
585 return s:err('Argument missing: plugin name(s) required')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
586 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
587 if !exists('g:plugs')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
588 return s:err('plug#begin was not called')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
589 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
590 let names = a:0 == 1 && type(a:1) == s:TYPE.list ? a:1 : a:000
a4ec03f77554 I don't know...
luka
parents:
diff changeset
591 let unknowns = filter(copy(names), '!has_key(g:plugs, v:val)')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
592 if !empty(unknowns)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
593 let s = len(unknowns) > 1 ? 's' : ''
a4ec03f77554 I don't know...
luka
parents:
diff changeset
594 return s:err(printf('Unknown plugin%s: %s', s, join(unknowns, ', ')))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
595 end
a4ec03f77554 I don't know...
luka
parents:
diff changeset
596 let unloaded = filter(copy(names), '!get(s:loaded, v:val, 0)')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
597 if !empty(unloaded)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
598 for name in unloaded
a4ec03f77554 I don't know...
luka
parents:
diff changeset
599 call s:lod([name], ['ftdetect', 'after/ftdetect', 'plugin', 'after/plugin'])
a4ec03f77554 I don't know...
luka
parents:
diff changeset
600 endfor
a4ec03f77554 I don't know...
luka
parents:
diff changeset
601 call s:dobufread(unloaded)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
602 return 1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
603 end
a4ec03f77554 I don't know...
luka
parents:
diff changeset
604 return 0
a4ec03f77554 I don't know...
luka
parents:
diff changeset
605 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
606
a4ec03f77554 I don't know...
luka
parents:
diff changeset
607 function! s:remove_triggers(name)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
608 if !has_key(s:triggers, a:name)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
609 return
a4ec03f77554 I don't know...
luka
parents:
diff changeset
610 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
611 for cmd in s:triggers[a:name].cmd
a4ec03f77554 I don't know...
luka
parents:
diff changeset
612 execute 'silent! delc' cmd
a4ec03f77554 I don't know...
luka
parents:
diff changeset
613 endfor
a4ec03f77554 I don't know...
luka
parents:
diff changeset
614 for map in s:triggers[a:name].map
a4ec03f77554 I don't know...
luka
parents:
diff changeset
615 execute 'silent! unmap' map
a4ec03f77554 I don't know...
luka
parents:
diff changeset
616 execute 'silent! iunmap' map
a4ec03f77554 I don't know...
luka
parents:
diff changeset
617 endfor
a4ec03f77554 I don't know...
luka
parents:
diff changeset
618 call remove(s:triggers, a:name)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
619 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
620
a4ec03f77554 I don't know...
luka
parents:
diff changeset
621 function! s:lod(names, types, ...)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
622 for name in a:names
a4ec03f77554 I don't know...
luka
parents:
diff changeset
623 call s:remove_triggers(name)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
624 let s:loaded[name] = 1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
625 endfor
a4ec03f77554 I don't know...
luka
parents:
diff changeset
626 call s:reorg_rtp()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
627
a4ec03f77554 I don't know...
luka
parents:
diff changeset
628 for name in a:names
a4ec03f77554 I don't know...
luka
parents:
diff changeset
629 let rtp = s:rtp(g:plugs[name])
a4ec03f77554 I don't know...
luka
parents:
diff changeset
630 for dir in a:types
a4ec03f77554 I don't know...
luka
parents:
diff changeset
631 call s:source(rtp, dir.'/**/*.vim')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
632 if has('nvim-0.5.0') " see neovim#14686
a4ec03f77554 I don't know...
luka
parents:
diff changeset
633 call s:source(rtp, dir.'/**/*.lua')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
634 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
635 endfor
a4ec03f77554 I don't know...
luka
parents:
diff changeset
636 if a:0
a4ec03f77554 I don't know...
luka
parents:
diff changeset
637 if !s:source(rtp, a:1) && !empty(s:glob(rtp, a:2))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
638 execute 'runtime' a:1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
639 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
640 call s:source(rtp, a:2)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
641 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
642 call s:doautocmd('User', name)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
643 endfor
a4ec03f77554 I don't know...
luka
parents:
diff changeset
644 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
645
a4ec03f77554 I don't know...
luka
parents:
diff changeset
646 function! s:lod_ft(pat, names)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
647 let syn = 'syntax/'.a:pat.'.vim'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
648 call s:lod(a:names, ['plugin', 'after/plugin'], syn, 'after/'.syn)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
649 execute 'autocmd! PlugLOD FileType' a:pat
a4ec03f77554 I don't know...
luka
parents:
diff changeset
650 call s:doautocmd('filetypeplugin', 'FileType')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
651 call s:doautocmd('filetypeindent', 'FileType')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
652 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
653
a4ec03f77554 I don't know...
luka
parents:
diff changeset
654 function! s:lod_cmd(cmd, bang, l1, l2, args, names)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
655 call s:lod(a:names, ['ftdetect', 'after/ftdetect', 'plugin', 'after/plugin'])
a4ec03f77554 I don't know...
luka
parents:
diff changeset
656 call s:dobufread(a:names)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
657 execute printf('%s%s%s %s', (a:l1 == a:l2 ? '' : (a:l1.','.a:l2)), a:cmd, a:bang, a:args)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
658 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
659
a4ec03f77554 I don't know...
luka
parents:
diff changeset
660 function! s:lod_map(map, names, with_prefix, prefix)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
661 call s:lod(a:names, ['ftdetect', 'after/ftdetect', 'plugin', 'after/plugin'])
a4ec03f77554 I don't know...
luka
parents:
diff changeset
662 call s:dobufread(a:names)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
663 let extra = ''
a4ec03f77554 I don't know...
luka
parents:
diff changeset
664 while 1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
665 let c = getchar(0)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
666 if c == 0
a4ec03f77554 I don't know...
luka
parents:
diff changeset
667 break
a4ec03f77554 I don't know...
luka
parents:
diff changeset
668 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
669 let extra .= nr2char(c)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
670 endwhile
a4ec03f77554 I don't know...
luka
parents:
diff changeset
671
a4ec03f77554 I don't know...
luka
parents:
diff changeset
672 if a:with_prefix
a4ec03f77554 I don't know...
luka
parents:
diff changeset
673 let prefix = v:count ? v:count : ''
a4ec03f77554 I don't know...
luka
parents:
diff changeset
674 let prefix .= '"'.v:register.a:prefix
a4ec03f77554 I don't know...
luka
parents:
diff changeset
675 if mode(1) == 'no'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
676 if v:operator == 'c'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
677 let prefix = "\<esc>" . prefix
a4ec03f77554 I don't know...
luka
parents:
diff changeset
678 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
679 let prefix .= v:operator
a4ec03f77554 I don't know...
luka
parents:
diff changeset
680 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
681 call feedkeys(prefix, 'n')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
682 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
683 call feedkeys(substitute(a:map, '^<Plug>', "\<Plug>", '') . extra)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
684 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
685
a4ec03f77554 I don't know...
luka
parents:
diff changeset
686 function! plug#(repo, ...)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
687 if a:0 > 1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
688 return s:err('Invalid number of arguments (1..2)')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
689 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
690
a4ec03f77554 I don't know...
luka
parents:
diff changeset
691 try
a4ec03f77554 I don't know...
luka
parents:
diff changeset
692 let repo = s:trim(a:repo)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
693 let opts = a:0 == 1 ? s:parse_options(a:1) : s:base_spec
a4ec03f77554 I don't know...
luka
parents:
diff changeset
694 let name = get(opts, 'as', s:plug_fnamemodify(repo, ':t:s?\.git$??'))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
695 let spec = extend(s:infer_properties(name, repo), opts)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
696 if !has_key(g:plugs, name)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
697 call add(g:plugs_order, name)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
698 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
699 let g:plugs[name] = spec
a4ec03f77554 I don't know...
luka
parents:
diff changeset
700 let s:loaded[name] = get(s:loaded, name, 0)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
701 catch
a4ec03f77554 I don't know...
luka
parents:
diff changeset
702 return s:err(repo . ' ' . v:exception)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
703 endtry
a4ec03f77554 I don't know...
luka
parents:
diff changeset
704 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
705
a4ec03f77554 I don't know...
luka
parents:
diff changeset
706 function! s:parse_options(arg)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
707 let opts = copy(s:base_spec)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
708 let type = type(a:arg)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
709 let opt_errfmt = 'Invalid argument for "%s" option of :Plug (expected: %s)'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
710 if type == s:TYPE.string
a4ec03f77554 I don't know...
luka
parents:
diff changeset
711 if empty(a:arg)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
712 throw printf(opt_errfmt, 'tag', 'string')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
713 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
714 let opts.tag = a:arg
a4ec03f77554 I don't know...
luka
parents:
diff changeset
715 elseif type == s:TYPE.dict
a4ec03f77554 I don't know...
luka
parents:
diff changeset
716 for opt in ['branch', 'tag', 'commit', 'rtp', 'dir', 'as']
a4ec03f77554 I don't know...
luka
parents:
diff changeset
717 if has_key(a:arg, opt)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
718 \ && (type(a:arg[opt]) != s:TYPE.string || empty(a:arg[opt]))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
719 throw printf(opt_errfmt, opt, 'string')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
720 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
721 endfor
a4ec03f77554 I don't know...
luka
parents:
diff changeset
722 for opt in ['on', 'for']
a4ec03f77554 I don't know...
luka
parents:
diff changeset
723 if has_key(a:arg, opt)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
724 \ && type(a:arg[opt]) != s:TYPE.list
a4ec03f77554 I don't know...
luka
parents:
diff changeset
725 \ && (type(a:arg[opt]) != s:TYPE.string || empty(a:arg[opt]))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
726 throw printf(opt_errfmt, opt, 'string or list')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
727 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
728 endfor
a4ec03f77554 I don't know...
luka
parents:
diff changeset
729 if has_key(a:arg, 'do')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
730 \ && type(a:arg.do) != s:TYPE.funcref
a4ec03f77554 I don't know...
luka
parents:
diff changeset
731 \ && (type(a:arg.do) != s:TYPE.string || empty(a:arg.do))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
732 throw printf(opt_errfmt, 'do', 'string or funcref')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
733 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
734 call extend(opts, a:arg)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
735 if has_key(opts, 'dir')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
736 let opts.dir = s:dirpath(s:plug_expand(opts.dir))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
737 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
738 else
a4ec03f77554 I don't know...
luka
parents:
diff changeset
739 throw 'Invalid argument type (expected: string or dictionary)'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
740 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
741 return opts
a4ec03f77554 I don't know...
luka
parents:
diff changeset
742 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
743
a4ec03f77554 I don't know...
luka
parents:
diff changeset
744 function! s:infer_properties(name, repo)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
745 let repo = a:repo
a4ec03f77554 I don't know...
luka
parents:
diff changeset
746 if s:is_local_plug(repo)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
747 return { 'dir': s:dirpath(s:plug_expand(repo)) }
a4ec03f77554 I don't know...
luka
parents:
diff changeset
748 else
a4ec03f77554 I don't know...
luka
parents:
diff changeset
749 if repo =~ ':'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
750 let uri = repo
a4ec03f77554 I don't know...
luka
parents:
diff changeset
751 else
a4ec03f77554 I don't know...
luka
parents:
diff changeset
752 if repo !~ '/'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
753 throw printf('Invalid argument: %s (implicit `vim-scripts'' expansion is deprecated)', repo)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
754 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
755 let fmt = get(g:, 'plug_url_format', 'https://git::@github.com/%s.git')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
756 let uri = printf(fmt, repo)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
757 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
758 return { 'dir': s:dirpath(g:plug_home.'/'.a:name), 'uri': uri }
a4ec03f77554 I don't know...
luka
parents:
diff changeset
759 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
760 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
761
a4ec03f77554 I don't know...
luka
parents:
diff changeset
762 function! s:install(force, names)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
763 call s:update_impl(0, a:force, a:names)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
764 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
765
a4ec03f77554 I don't know...
luka
parents:
diff changeset
766 function! s:update(force, names)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
767 call s:update_impl(1, a:force, a:names)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
768 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
769
a4ec03f77554 I don't know...
luka
parents:
diff changeset
770 function! plug#helptags()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
771 if !exists('g:plugs')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
772 return s:err('plug#begin was not called')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
773 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
774 for spec in values(g:plugs)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
775 let docd = join([s:rtp(spec), 'doc'], '/')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
776 if isdirectory(docd)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
777 silent! execute 'helptags' s:esc(docd)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
778 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
779 endfor
a4ec03f77554 I don't know...
luka
parents:
diff changeset
780 return 1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
781 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
782
a4ec03f77554 I don't know...
luka
parents:
diff changeset
783 function! s:syntax()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
784 syntax clear
a4ec03f77554 I don't know...
luka
parents:
diff changeset
785 syntax region plug1 start=/\%1l/ end=/\%2l/ contains=plugNumber
a4ec03f77554 I don't know...
luka
parents:
diff changeset
786 syntax region plug2 start=/\%2l/ end=/\%3l/ contains=plugBracket,plugX,plugAbort
a4ec03f77554 I don't know...
luka
parents:
diff changeset
787 syn match plugNumber /[0-9]\+[0-9.]*/ contained
a4ec03f77554 I don't know...
luka
parents:
diff changeset
788 syn match plugBracket /[[\]]/ contained
a4ec03f77554 I don't know...
luka
parents:
diff changeset
789 syn match plugX /x/ contained
a4ec03f77554 I don't know...
luka
parents:
diff changeset
790 syn match plugAbort /\~/ contained
a4ec03f77554 I don't know...
luka
parents:
diff changeset
791 syn match plugDash /^-\{1}\ /
a4ec03f77554 I don't know...
luka
parents:
diff changeset
792 syn match plugPlus /^+/
a4ec03f77554 I don't know...
luka
parents:
diff changeset
793 syn match plugStar /^*/
a4ec03f77554 I don't know...
luka
parents:
diff changeset
794 syn match plugMessage /\(^- \)\@<=.*/
a4ec03f77554 I don't know...
luka
parents:
diff changeset
795 syn match plugName /\(^- \)\@<=[^ ]*:/
a4ec03f77554 I don't know...
luka
parents:
diff changeset
796 syn match plugSha /\%(: \)\@<=[0-9a-f]\{4,}$/
a4ec03f77554 I don't know...
luka
parents:
diff changeset
797 syn match plugTag /(tag: [^)]\+)/
a4ec03f77554 I don't know...
luka
parents:
diff changeset
798 syn match plugInstall /\(^+ \)\@<=[^:]*/
a4ec03f77554 I don't know...
luka
parents:
diff changeset
799 syn match plugUpdate /\(^* \)\@<=[^:]*/
a4ec03f77554 I don't know...
luka
parents:
diff changeset
800 syn match plugCommit /^ \X*[0-9a-f]\{7,9} .*/ contains=plugRelDate,plugEdge,plugTag
a4ec03f77554 I don't know...
luka
parents:
diff changeset
801 syn match plugEdge /^ \X\+$/
a4ec03f77554 I don't know...
luka
parents:
diff changeset
802 syn match plugEdge /^ \X*/ contained nextgroup=plugSha
a4ec03f77554 I don't know...
luka
parents:
diff changeset
803 syn match plugSha /[0-9a-f]\{7,9}/ contained
a4ec03f77554 I don't know...
luka
parents:
diff changeset
804 syn match plugRelDate /([^)]*)$/ contained
a4ec03f77554 I don't know...
luka
parents:
diff changeset
805 syn match plugNotLoaded /(not loaded)$/
a4ec03f77554 I don't know...
luka
parents:
diff changeset
806 syn match plugError /^x.*/
a4ec03f77554 I don't know...
luka
parents:
diff changeset
807 syn region plugDeleted start=/^\~ .*/ end=/^\ze\S/
a4ec03f77554 I don't know...
luka
parents:
diff changeset
808 syn match plugH2 /^.*:\n-\+$/
a4ec03f77554 I don't know...
luka
parents:
diff changeset
809 syn match plugH2 /^-\{2,}/
a4ec03f77554 I don't know...
luka
parents:
diff changeset
810 syn keyword Function PlugInstall PlugStatus PlugUpdate PlugClean
a4ec03f77554 I don't know...
luka
parents:
diff changeset
811 hi def link plug1 Title
a4ec03f77554 I don't know...
luka
parents:
diff changeset
812 hi def link plug2 Repeat
a4ec03f77554 I don't know...
luka
parents:
diff changeset
813 hi def link plugH2 Type
a4ec03f77554 I don't know...
luka
parents:
diff changeset
814 hi def link plugX Exception
a4ec03f77554 I don't know...
luka
parents:
diff changeset
815 hi def link plugAbort Ignore
a4ec03f77554 I don't know...
luka
parents:
diff changeset
816 hi def link plugBracket Structure
a4ec03f77554 I don't know...
luka
parents:
diff changeset
817 hi def link plugNumber Number
a4ec03f77554 I don't know...
luka
parents:
diff changeset
818
a4ec03f77554 I don't know...
luka
parents:
diff changeset
819 hi def link plugDash Special
a4ec03f77554 I don't know...
luka
parents:
diff changeset
820 hi def link plugPlus Constant
a4ec03f77554 I don't know...
luka
parents:
diff changeset
821 hi def link plugStar Boolean
a4ec03f77554 I don't know...
luka
parents:
diff changeset
822
a4ec03f77554 I don't know...
luka
parents:
diff changeset
823 hi def link plugMessage Function
a4ec03f77554 I don't know...
luka
parents:
diff changeset
824 hi def link plugName Label
a4ec03f77554 I don't know...
luka
parents:
diff changeset
825 hi def link plugInstall Function
a4ec03f77554 I don't know...
luka
parents:
diff changeset
826 hi def link plugUpdate Type
a4ec03f77554 I don't know...
luka
parents:
diff changeset
827
a4ec03f77554 I don't know...
luka
parents:
diff changeset
828 hi def link plugError Error
a4ec03f77554 I don't know...
luka
parents:
diff changeset
829 hi def link plugDeleted Ignore
a4ec03f77554 I don't know...
luka
parents:
diff changeset
830 hi def link plugRelDate Comment
a4ec03f77554 I don't know...
luka
parents:
diff changeset
831 hi def link plugEdge PreProc
a4ec03f77554 I don't know...
luka
parents:
diff changeset
832 hi def link plugSha Identifier
a4ec03f77554 I don't know...
luka
parents:
diff changeset
833 hi def link plugTag Constant
a4ec03f77554 I don't know...
luka
parents:
diff changeset
834
a4ec03f77554 I don't know...
luka
parents:
diff changeset
835 hi def link plugNotLoaded Comment
a4ec03f77554 I don't know...
luka
parents:
diff changeset
836 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
837
a4ec03f77554 I don't know...
luka
parents:
diff changeset
838 function! s:lpad(str, len)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
839 return a:str . repeat(' ', a:len - len(a:str))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
840 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
841
a4ec03f77554 I don't know...
luka
parents:
diff changeset
842 function! s:lines(msg)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
843 return split(a:msg, "[\r\n]")
a4ec03f77554 I don't know...
luka
parents:
diff changeset
844 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
845
a4ec03f77554 I don't know...
luka
parents:
diff changeset
846 function! s:lastline(msg)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
847 return get(s:lines(a:msg), -1, '')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
848 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
849
a4ec03f77554 I don't know...
luka
parents:
diff changeset
850 function! s:new_window()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
851 execute get(g:, 'plug_window', '-tabnew')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
852 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
853
a4ec03f77554 I don't know...
luka
parents:
diff changeset
854 function! s:plug_window_exists()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
855 let buflist = tabpagebuflist(s:plug_tab)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
856 return !empty(buflist) && index(buflist, s:plug_buf) >= 0
a4ec03f77554 I don't know...
luka
parents:
diff changeset
857 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
858
a4ec03f77554 I don't know...
luka
parents:
diff changeset
859 function! s:switch_in()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
860 if !s:plug_window_exists()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
861 return 0
a4ec03f77554 I don't know...
luka
parents:
diff changeset
862 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
863
a4ec03f77554 I don't know...
luka
parents:
diff changeset
864 if winbufnr(0) != s:plug_buf
a4ec03f77554 I don't know...
luka
parents:
diff changeset
865 let s:pos = [tabpagenr(), winnr(), winsaveview()]
a4ec03f77554 I don't know...
luka
parents:
diff changeset
866 execute 'normal!' s:plug_tab.'gt'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
867 let winnr = bufwinnr(s:plug_buf)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
868 execute winnr.'wincmd w'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
869 call add(s:pos, winsaveview())
a4ec03f77554 I don't know...
luka
parents:
diff changeset
870 else
a4ec03f77554 I don't know...
luka
parents:
diff changeset
871 let s:pos = [winsaveview()]
a4ec03f77554 I don't know...
luka
parents:
diff changeset
872 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
873
a4ec03f77554 I don't know...
luka
parents:
diff changeset
874 setlocal modifiable
a4ec03f77554 I don't know...
luka
parents:
diff changeset
875 return 1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
876 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
877
a4ec03f77554 I don't know...
luka
parents:
diff changeset
878 function! s:switch_out(...)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
879 call winrestview(s:pos[-1])
a4ec03f77554 I don't know...
luka
parents:
diff changeset
880 setlocal nomodifiable
a4ec03f77554 I don't know...
luka
parents:
diff changeset
881 if a:0 > 0
a4ec03f77554 I don't know...
luka
parents:
diff changeset
882 execute a:1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
883 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
884
a4ec03f77554 I don't know...
luka
parents:
diff changeset
885 if len(s:pos) > 1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
886 execute 'normal!' s:pos[0].'gt'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
887 execute s:pos[1] 'wincmd w'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
888 call winrestview(s:pos[2])
a4ec03f77554 I don't know...
luka
parents:
diff changeset
889 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
890 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
891
a4ec03f77554 I don't know...
luka
parents:
diff changeset
892 function! s:finish_bindings()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
893 nnoremap <silent> <buffer> R :call <SID>retry()<cr>
a4ec03f77554 I don't know...
luka
parents:
diff changeset
894 nnoremap <silent> <buffer> D :PlugDiff<cr>
a4ec03f77554 I don't know...
luka
parents:
diff changeset
895 nnoremap <silent> <buffer> S :PlugStatus<cr>
a4ec03f77554 I don't know...
luka
parents:
diff changeset
896 nnoremap <silent> <buffer> U :call <SID>status_update()<cr>
a4ec03f77554 I don't know...
luka
parents:
diff changeset
897 xnoremap <silent> <buffer> U :call <SID>status_update()<cr>
a4ec03f77554 I don't know...
luka
parents:
diff changeset
898 nnoremap <silent> <buffer> ]] :silent! call <SID>section('')<cr>
a4ec03f77554 I don't know...
luka
parents:
diff changeset
899 nnoremap <silent> <buffer> [[ :silent! call <SID>section('b')<cr>
a4ec03f77554 I don't know...
luka
parents:
diff changeset
900 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
901
a4ec03f77554 I don't know...
luka
parents:
diff changeset
902 function! s:prepare(...)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
903 if empty(s:plug_getcwd())
a4ec03f77554 I don't know...
luka
parents:
diff changeset
904 throw 'Invalid current working directory. Cannot proceed.'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
905 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
906
a4ec03f77554 I don't know...
luka
parents:
diff changeset
907 for evar in ['$GIT_DIR', '$GIT_WORK_TREE']
a4ec03f77554 I don't know...
luka
parents:
diff changeset
908 if exists(evar)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
909 throw evar.' detected. Cannot proceed.'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
910 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
911 endfor
a4ec03f77554 I don't know...
luka
parents:
diff changeset
912
a4ec03f77554 I don't know...
luka
parents:
diff changeset
913 call s:job_abort(0)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
914 if s:switch_in()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
915 if b:plug_preview == 1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
916 pc
a4ec03f77554 I don't know...
luka
parents:
diff changeset
917 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
918 enew
a4ec03f77554 I don't know...
luka
parents:
diff changeset
919 else
a4ec03f77554 I don't know...
luka
parents:
diff changeset
920 call s:new_window()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
921 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
922
a4ec03f77554 I don't know...
luka
parents:
diff changeset
923 nnoremap <silent> <buffer> q :call <SID>close_pane()<cr>
a4ec03f77554 I don't know...
luka
parents:
diff changeset
924 if a:0 == 0
a4ec03f77554 I don't know...
luka
parents:
diff changeset
925 call s:finish_bindings()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
926 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
927 let b:plug_preview = -1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
928 let s:plug_tab = tabpagenr()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
929 let s:plug_buf = winbufnr(0)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
930 call s:assign_name()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
931
a4ec03f77554 I don't know...
luka
parents:
diff changeset
932 for k in ['<cr>', 'L', 'o', 'X', 'd', 'dd']
a4ec03f77554 I don't know...
luka
parents:
diff changeset
933 execute 'silent! unmap <buffer>' k
a4ec03f77554 I don't know...
luka
parents:
diff changeset
934 endfor
a4ec03f77554 I don't know...
luka
parents:
diff changeset
935 setlocal buftype=nofile bufhidden=wipe nobuflisted nolist noswapfile nowrap cursorline modifiable nospell
a4ec03f77554 I don't know...
luka
parents:
diff changeset
936 if exists('+colorcolumn')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
937 setlocal colorcolumn=
a4ec03f77554 I don't know...
luka
parents:
diff changeset
938 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
939 setf vim-plug
a4ec03f77554 I don't know...
luka
parents:
diff changeset
940 if exists('g:syntax_on')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
941 call s:syntax()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
942 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
943 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
944
a4ec03f77554 I don't know...
luka
parents:
diff changeset
945 function! s:close_pane()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
946 if b:plug_preview == 1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
947 pc
a4ec03f77554 I don't know...
luka
parents:
diff changeset
948 let b:plug_preview = -1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
949 elseif exists('s:jobs') && !empty(s:jobs)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
950 call s:job_abort(1)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
951 else
a4ec03f77554 I don't know...
luka
parents:
diff changeset
952 bd
a4ec03f77554 I don't know...
luka
parents:
diff changeset
953 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
954 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
955
a4ec03f77554 I don't know...
luka
parents:
diff changeset
956 function! s:assign_name()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
957 " Assign buffer name
a4ec03f77554 I don't know...
luka
parents:
diff changeset
958 let prefix = '[Plugins]'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
959 let name = prefix
a4ec03f77554 I don't know...
luka
parents:
diff changeset
960 let idx = 2
a4ec03f77554 I don't know...
luka
parents:
diff changeset
961 while bufexists(name)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
962 let name = printf('%s (%s)', prefix, idx)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
963 let idx = idx + 1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
964 endwhile
a4ec03f77554 I don't know...
luka
parents:
diff changeset
965 silent! execute 'f' fnameescape(name)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
966 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
967
a4ec03f77554 I don't know...
luka
parents:
diff changeset
968 function! s:chsh(swap)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
969 let prev = [&shell, &shellcmdflag, &shellredir]
a4ec03f77554 I don't know...
luka
parents:
diff changeset
970 if !s:is_win
a4ec03f77554 I don't know...
luka
parents:
diff changeset
971 set shell=sh
a4ec03f77554 I don't know...
luka
parents:
diff changeset
972 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
973 if a:swap
a4ec03f77554 I don't know...
luka
parents:
diff changeset
974 if s:is_powershell(&shell)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
975 let &shellredir = '2>&1 | Out-File -Encoding UTF8 %s'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
976 elseif &shell =~# 'sh' || &shell =~# 'cmd\(\.exe\)\?$'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
977 set shellredir=>%s\ 2>&1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
978 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
979 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
980 return prev
a4ec03f77554 I don't know...
luka
parents:
diff changeset
981 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
982
a4ec03f77554 I don't know...
luka
parents:
diff changeset
983 function! s:bang(cmd, ...)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
984 let batchfile = ''
a4ec03f77554 I don't know...
luka
parents:
diff changeset
985 try
a4ec03f77554 I don't know...
luka
parents:
diff changeset
986 let [sh, shellcmdflag, shrd] = s:chsh(a:0)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
987 " FIXME: Escaping is incomplete. We could use shellescape with eval,
a4ec03f77554 I don't know...
luka
parents:
diff changeset
988 " but it won't work on Windows.
a4ec03f77554 I don't know...
luka
parents:
diff changeset
989 let cmd = a:0 ? s:with_cd(a:cmd, a:1) : a:cmd
a4ec03f77554 I don't know...
luka
parents:
diff changeset
990 if s:is_win
a4ec03f77554 I don't know...
luka
parents:
diff changeset
991 let [batchfile, cmd] = s:batchfile(cmd)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
992 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
993 let g:_plug_bang = (s:is_win && has('gui_running') ? 'silent ' : '').'!'.escape(cmd, '#!%')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
994 execute "normal! :execute g:_plug_bang\<cr>\<cr>"
a4ec03f77554 I don't know...
luka
parents:
diff changeset
995 finally
a4ec03f77554 I don't know...
luka
parents:
diff changeset
996 unlet g:_plug_bang
a4ec03f77554 I don't know...
luka
parents:
diff changeset
997 let [&shell, &shellcmdflag, &shellredir] = [sh, shellcmdflag, shrd]
a4ec03f77554 I don't know...
luka
parents:
diff changeset
998 if s:is_win && filereadable(batchfile)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
999 call delete(batchfile)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1000 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1001 endtry
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1002 return v:shell_error ? 'Exit status: ' . v:shell_error : ''
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1003 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1004
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1005 function! s:regress_bar()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1006 let bar = substitute(getline(2)[1:-2], '.*\zs=', 'x', '')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1007 call s:progress_bar(2, bar, len(bar))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1008 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1009
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1010 function! s:is_updated(dir)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1011 return !empty(s:system_chomp(['git', 'log', '--pretty=format:%h', 'HEAD...HEAD@{1}'], a:dir))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1012 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1013
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1014 function! s:do(pull, force, todo)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1015 if has('nvim')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1016 " Reset &rtp to invalidate Neovim cache of loaded Lua modules
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1017 " See https://github.com/junegunn/vim-plug/pull/1157#issuecomment-1809226110
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1018 let &rtp = &rtp
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1019 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1020 for [name, spec] in items(a:todo)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1021 if !isdirectory(spec.dir)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1022 continue
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1023 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1024 let installed = has_key(s:update.new, name)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1025 let updated = installed ? 0 :
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1026 \ (a:pull && index(s:update.errors, name) < 0 && s:is_updated(spec.dir))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1027 if a:force || installed || updated
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1028 execute 'cd' s:esc(spec.dir)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1029 call append(3, '- Post-update hook for '. name .' ... ')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1030 let error = ''
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1031 let type = type(spec.do)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1032 if type == s:TYPE.string
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1033 if spec.do[0] == ':'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1034 if !get(s:loaded, name, 0)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1035 let s:loaded[name] = 1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1036 call s:reorg_rtp()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1037 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1038 call s:load_plugin(spec)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1039 try
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1040 execute spec.do[1:]
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1041 catch
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1042 let error = v:exception
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1043 endtry
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1044 if !s:plug_window_exists()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1045 cd -
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1046 throw 'Warning: vim-plug was terminated by the post-update hook of '.name
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1047 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1048 else
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1049 let error = s:bang(spec.do)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1050 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1051 elseif type == s:TYPE.funcref
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1052 try
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1053 call s:load_plugin(spec)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1054 let status = installed ? 'installed' : (updated ? 'updated' : 'unchanged')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1055 call spec.do({ 'name': name, 'status': status, 'force': a:force })
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1056 catch
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1057 let error = v:exception
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1058 endtry
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1059 else
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1060 let error = 'Invalid hook type'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1061 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1062 call s:switch_in()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1063 call setline(4, empty(error) ? (getline(4) . 'OK')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1064 \ : ('x' . getline(4)[1:] . error))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1065 if !empty(error)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1066 call add(s:update.errors, name)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1067 call s:regress_bar()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1068 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1069 cd -
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1070 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1071 endfor
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1072 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1073
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1074 function! s:hash_match(a, b)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1075 return stridx(a:a, a:b) == 0 || stridx(a:b, a:a) == 0
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1076 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1077
4
1a705d7a7521 working on stuff
luka
parents: 0
diff changeset
1078 function! s:disable_credential_helper()
1a705d7a7521 working on stuff
luka
parents: 0
diff changeset
1079 return s:git_version_requirement(2) && get(g:, 'plug_disable_credential_helper', 1)
1a705d7a7521 working on stuff
luka
parents: 0
diff changeset
1080 endfunction
1a705d7a7521 working on stuff
luka
parents: 0
diff changeset
1081
0
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1082 function! s:checkout(spec)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1083 let sha = a:spec.commit
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1084 let output = s:git_revision(a:spec.dir)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1085 let error = 0
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1086 if !empty(output) && !s:hash_match(sha, s:lines(output)[0])
4
1a705d7a7521 working on stuff
luka
parents: 0
diff changeset
1087 let credential_helper = s:disable_credential_helper() ? '-c credential.helper= ' : ''
0
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1088 let output = s:system(
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1089 \ 'git '.credential_helper.'fetch --depth 999999 && git checkout '.plug#shellescape(sha).' --', a:spec.dir)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1090 let error = v:shell_error
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1091 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1092 return [output, error]
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1093 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1094
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1095 function! s:finish(pull)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1096 let new_frozen = len(filter(keys(s:update.new), 'g:plugs[v:val].frozen'))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1097 if new_frozen
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1098 let s = new_frozen > 1 ? 's' : ''
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1099 call append(3, printf('- Installed %d frozen plugin%s', new_frozen, s))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1100 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1101 call append(3, '- Finishing ... ') | 4
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1102 redraw
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1103 call plug#helptags()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1104 call plug#end()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1105 call setline(4, getline(4) . 'Done!')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1106 redraw
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1107 let msgs = []
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1108 if !empty(s:update.errors)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1109 call add(msgs, "Press 'R' to retry.")
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1110 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1111 if a:pull && len(s:update.new) < len(filter(getline(5, '$'),
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1112 \ "v:val =~ '^- ' && v:val !~# 'Already up.to.date'"))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1113 call add(msgs, "Press 'D' to see the updated changes.")
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1114 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1115 echo join(msgs, ' ')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1116 call s:finish_bindings()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1117 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1118
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1119 function! s:retry()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1120 if empty(s:update.errors)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1121 return
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1122 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1123 echo
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1124 call s:update_impl(s:update.pull, s:update.force,
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1125 \ extend(copy(s:update.errors), [s:update.threads]))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1126 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1127
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1128 function! s:is_managed(name)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1129 return has_key(g:plugs[a:name], 'uri')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1130 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1131
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1132 function! s:names(...)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1133 return sort(filter(keys(g:plugs), 'stridx(v:val, a:1) == 0 && s:is_managed(v:val)'))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1134 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1135
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1136 function! s:check_ruby()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1137 silent! ruby require 'thread'; VIM::command("let g:plug_ruby = '#{RUBY_VERSION}'")
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1138 if !exists('g:plug_ruby')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1139 redraw!
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1140 return s:warn('echom', 'Warning: Ruby interface is broken')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1141 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1142 let ruby_version = split(g:plug_ruby, '\.')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1143 unlet g:plug_ruby
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1144 return s:version_requirement(ruby_version, [1, 8, 7])
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1145 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1146
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1147 function! s:update_impl(pull, force, args) abort
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1148 let sync = index(a:args, '--sync') >= 0 || has('vim_starting')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1149 let args = filter(copy(a:args), 'v:val != "--sync"')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1150 let threads = (len(args) > 0 && args[-1] =~ '^[1-9][0-9]*$') ?
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1151 \ remove(args, -1) : get(g:, 'plug_threads', 16)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1152
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1153 let managed = filter(deepcopy(g:plugs), 's:is_managed(v:key)')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1154 let todo = empty(args) ? filter(managed, '!v:val.frozen || !isdirectory(v:val.dir)') :
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1155 \ filter(managed, 'index(args, v:key) >= 0')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1156
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1157 if empty(todo)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1158 return s:warn('echo', 'No plugin to '. (a:pull ? 'update' : 'install'))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1159 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1160
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1161 if !s:is_win && s:git_version_requirement(2, 3)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1162 let s:git_terminal_prompt = exists('$GIT_TERMINAL_PROMPT') ? $GIT_TERMINAL_PROMPT : ''
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1163 let $GIT_TERMINAL_PROMPT = 0
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1164 for plug in values(todo)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1165 let plug.uri = substitute(plug.uri,
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1166 \ '^https://git::@github\.com', 'https://github.com', '')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1167 endfor
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1168 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1169
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1170 if !isdirectory(g:plug_home)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1171 try
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1172 call mkdir(g:plug_home, 'p')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1173 catch
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1174 return s:err(printf('Invalid plug directory: %s. '.
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1175 \ 'Try to call plug#begin with a valid directory', g:plug_home))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1176 endtry
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1177 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1178
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1179 if has('nvim') && !exists('*jobwait') && threads > 1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1180 call s:warn('echom', '[vim-plug] Update Neovim for parallel installer')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1181 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1182
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1183 let use_job = s:nvim || s:vim8
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1184 let python = (has('python') || has('python3')) && !use_job
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1185 let ruby = has('ruby') && !use_job && (v:version >= 703 || v:version == 702 && has('patch374')) && !(s:is_win && has('gui_running')) && threads > 1 && s:check_ruby()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1186
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1187 let s:update = {
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1188 \ 'start': reltime(),
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1189 \ 'all': todo,
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1190 \ 'todo': copy(todo),
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1191 \ 'errors': [],
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1192 \ 'pull': a:pull,
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1193 \ 'force': a:force,
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1194 \ 'new': {},
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1195 \ 'threads': (python || ruby || use_job) ? min([len(todo), threads]) : 1,
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1196 \ 'bar': '',
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1197 \ 'fin': 0
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1198 \ }
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1199
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1200 call s:prepare(1)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1201 call append(0, ['', ''])
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1202 normal! 2G
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1203 silent! redraw
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1204
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1205 " Set remote name, overriding a possible user git config's clone.defaultRemoteName
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1206 let s:clone_opt = ['--origin', 'origin']
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1207 if get(g:, 'plug_shallow', 1)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1208 call extend(s:clone_opt, ['--depth', '1'])
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1209 if s:git_version_requirement(1, 7, 10)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1210 call add(s:clone_opt, '--no-single-branch')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1211 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1212 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1213
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1214 if has('win32unix') || has('wsl')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1215 call extend(s:clone_opt, ['-c', 'core.eol=lf', '-c', 'core.autocrlf=input'])
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1216 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1217
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1218 let s:submodule_opt = s:git_version_requirement(2, 8) ? ' --jobs='.threads : ''
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1219
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1220 " Python version requirement (>= 2.7)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1221 if python && !has('python3') && !ruby && !use_job && s:update.threads > 1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1222 redir => pyv
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1223 silent python import platform; print platform.python_version()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1224 redir END
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1225 let python = s:version_requirement(
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1226 \ map(split(split(pyv)[0], '\.'), 'str2nr(v:val)'), [2, 6])
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1227 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1228
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1229 if (python || ruby) && s:update.threads > 1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1230 try
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1231 let imd = &imd
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1232 if s:mac_gui
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1233 set noimd
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1234 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1235 if ruby
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1236 call s:update_ruby()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1237 else
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1238 call s:update_python()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1239 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1240 catch
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1241 let lines = getline(4, '$')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1242 let printed = {}
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1243 silent! 4,$d _
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1244 for line in lines
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1245 let name = s:extract_name(line, '.', '')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1246 if empty(name) || !has_key(printed, name)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1247 call append('$', line)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1248 if !empty(name)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1249 let printed[name] = 1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1250 if line[0] == 'x' && index(s:update.errors, name) < 0
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1251 call add(s:update.errors, name)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1252 end
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1253 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1254 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1255 endfor
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1256 finally
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1257 let &imd = imd
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1258 call s:update_finish()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1259 endtry
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1260 else
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1261 call s:update_vim()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1262 while use_job && sync
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1263 sleep 100m
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1264 if s:update.fin
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1265 break
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1266 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1267 endwhile
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1268 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1269 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1270
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1271 function! s:log4(name, msg)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1272 call setline(4, printf('- %s (%s)', a:msg, a:name))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1273 redraw
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1274 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1275
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1276 function! s:update_finish()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1277 if exists('s:git_terminal_prompt')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1278 let $GIT_TERMINAL_PROMPT = s:git_terminal_prompt
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1279 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1280 if s:switch_in()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1281 call append(3, '- Updating ...') | 4
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1282 for [name, spec] in items(filter(copy(s:update.all), 'index(s:update.errors, v:key) < 0 && (s:update.force || s:update.pull || has_key(s:update.new, v:key))'))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1283 let [pos, _] = s:logpos(name)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1284 if !pos
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1285 continue
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1286 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1287 let out = ''
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1288 let error = 0
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1289 if has_key(spec, 'commit')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1290 call s:log4(name, 'Checking out '.spec.commit)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1291 let [out, error] = s:checkout(spec)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1292 elseif has_key(spec, 'tag')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1293 let tag = spec.tag
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1294 if tag =~ '\*'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1295 let tags = s:lines(s:system('git tag --list '.plug#shellescape(tag).' --sort -version:refname 2>&1', spec.dir))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1296 if !v:shell_error && !empty(tags)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1297 let tag = tags[0]
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1298 call s:log4(name, printf('Latest tag for %s -> %s', spec.tag, tag))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1299 call append(3, '')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1300 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1301 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1302 call s:log4(name, 'Checking out '.tag)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1303 let out = s:system('git checkout -q '.plug#shellescape(tag).' -- 2>&1', spec.dir)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1304 let error = v:shell_error
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1305 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1306 if !error && filereadable(spec.dir.'/.gitmodules') &&
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1307 \ (s:update.force || has_key(s:update.new, name) || s:is_updated(spec.dir))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1308 call s:log4(name, 'Updating submodules. This may take a while.')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1309 let out .= s:bang('git submodule update --init --recursive'.s:submodule_opt.' 2>&1', spec.dir)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1310 let error = v:shell_error
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1311 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1312 let msg = s:format_message(v:shell_error ? 'x': '-', name, out)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1313 if error
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1314 call add(s:update.errors, name)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1315 call s:regress_bar()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1316 silent execute pos 'd _'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1317 call append(4, msg) | 4
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1318 elseif !empty(out)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1319 call setline(pos, msg[0])
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1320 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1321 redraw
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1322 endfor
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1323 silent 4 d _
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1324 try
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1325 call s:do(s:update.pull, s:update.force, filter(copy(s:update.all), 'index(s:update.errors, v:key) < 0 && has_key(v:val, "do")'))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1326 catch
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1327 call s:warn('echom', v:exception)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1328 call s:warn('echo', '')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1329 return
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1330 endtry
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1331 call s:finish(s:update.pull)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1332 call setline(1, 'Updated. Elapsed time: ' . split(reltimestr(reltime(s:update.start)))[0] . ' sec.')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1333 call s:switch_out('normal! gg')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1334 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1335 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1336
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1337 function! s:mark_aborted(name, message)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1338 let attrs = { 'running': 0, 'error': 1, 'abort': 1, 'lines': [a:message] }
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1339 let s:jobs[a:name] = extend(get(s:jobs, a:name, {}), attrs)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1340 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1341
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1342 function! s:job_abort(cancel)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1343 if (!s:nvim && !s:vim8) || !exists('s:jobs')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1344 return
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1345 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1346
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1347 for [name, j] in items(s:jobs)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1348 if s:nvim
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1349 silent! call jobstop(j.jobid)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1350 elseif s:vim8
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1351 silent! call job_stop(j.jobid)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1352 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1353 if j.new
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1354 call s:rm_rf(g:plugs[name].dir)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1355 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1356 if a:cancel
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1357 call s:mark_aborted(name, 'Aborted')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1358 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1359 endfor
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1360
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1361 if a:cancel
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1362 for todo in values(s:update.todo)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1363 let todo.abort = 1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1364 endfor
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1365 else
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1366 let s:jobs = {}
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1367 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1368 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1369
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1370 function! s:last_non_empty_line(lines)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1371 let len = len(a:lines)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1372 for idx in range(len)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1373 let line = a:lines[len-idx-1]
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1374 if !empty(line)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1375 return line
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1376 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1377 endfor
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1378 return ''
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1379 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1380
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1381 function! s:bullet_for(job, ...)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1382 if a:job.running
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1383 return a:job.new ? '+' : '*'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1384 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1385 if get(a:job, 'abort', 0)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1386 return '~'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1387 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1388 return a:job.error ? 'x' : get(a:000, 0, '-')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1389 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1390
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1391 function! s:job_out_cb(self, data) abort
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1392 let self = a:self
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1393 let data = remove(self.lines, -1) . a:data
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1394 let lines = map(split(data, "\n", 1), 'split(v:val, "\r", 1)[-1]')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1395 call extend(self.lines, lines)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1396 " To reduce the number of buffer updates
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1397 let self.tick = get(self, 'tick', -1) + 1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1398 if !self.running || self.tick % len(s:jobs) == 0
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1399 let result = self.error ? join(self.lines, "\n") : s:last_non_empty_line(self.lines)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1400 if len(result)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1401 call s:log(s:bullet_for(self), self.name, result)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1402 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1403 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1404 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1405
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1406 function! s:job_exit_cb(self, data) abort
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1407 let a:self.running = 0
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1408 let a:self.error = a:data != 0
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1409 call s:reap(a:self.name)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1410 call s:tick()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1411 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1412
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1413 function! s:job_cb(fn, job, ch, data)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1414 if !s:plug_window_exists() " plug window closed
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1415 return s:job_abort(0)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1416 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1417 call call(a:fn, [a:job, a:data])
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1418 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1419
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1420 function! s:nvim_cb(job_id, data, event) dict abort
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1421 return (a:event == 'stdout' || a:event == 'stderr') ?
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1422 \ s:job_cb('s:job_out_cb', self, 0, join(a:data, "\n")) :
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1423 \ s:job_cb('s:job_exit_cb', self, 0, a:data)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1424 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1425
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1426 function! s:spawn(name, spec, queue, opts)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1427 let job = { 'name': a:name, 'spec': a:spec, 'running': 1, 'error': 0, 'lines': [''],
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1428 \ 'new': get(a:opts, 'new', 0), 'queue': copy(a:queue) }
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1429 let Item = remove(job.queue, 0)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1430 let argv = type(Item) == s:TYPE.funcref ? call(Item, [a:spec]) : Item
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1431 let s:jobs[a:name] = job
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1432
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1433 if s:nvim
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1434 if has_key(a:opts, 'dir')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1435 let job.cwd = a:opts.dir
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1436 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1437 call extend(job, {
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1438 \ 'on_stdout': function('s:nvim_cb'),
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1439 \ 'on_stderr': function('s:nvim_cb'),
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1440 \ 'on_exit': function('s:nvim_cb'),
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1441 \ })
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1442 let jid = s:plug_call('jobstart', argv, job)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1443 if jid > 0
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1444 let job.jobid = jid
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1445 else
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1446 let job.running = 0
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1447 let job.error = 1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1448 let job.lines = [jid < 0 ? argv[0].' is not executable' :
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1449 \ 'Invalid arguments (or job table is full)']
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1450 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1451 elseif s:vim8
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1452 let cmd = join(map(copy(argv), 'plug#shellescape(v:val, {"script": 0})'))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1453 if has_key(a:opts, 'dir')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1454 let cmd = s:with_cd(cmd, a:opts.dir, 0)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1455 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1456 let argv = s:is_win ? ['cmd', '/s', '/c', '"'.cmd.'"'] : ['sh', '-c', cmd]
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1457 let jid = job_start(s:is_win ? join(argv, ' ') : argv, {
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1458 \ 'out_cb': function('s:job_cb', ['s:job_out_cb', job]),
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1459 \ 'err_cb': function('s:job_cb', ['s:job_out_cb', job]),
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1460 \ 'exit_cb': function('s:job_cb', ['s:job_exit_cb', job]),
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1461 \ 'err_mode': 'raw',
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1462 \ 'out_mode': 'raw'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1463 \})
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1464 if job_status(jid) == 'run'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1465 let job.jobid = jid
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1466 else
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1467 let job.running = 0
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1468 let job.error = 1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1469 let job.lines = ['Failed to start job']
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1470 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1471 else
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1472 let job.lines = s:lines(call('s:system', has_key(a:opts, 'dir') ? [argv, a:opts.dir] : [argv]))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1473 let job.error = v:shell_error != 0
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1474 let job.running = 0
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1475 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1476 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1477
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1478 function! s:reap(name)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1479 let job = remove(s:jobs, a:name)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1480 if job.error
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1481 call add(s:update.errors, a:name)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1482 elseif get(job, 'new', 0)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1483 let s:update.new[a:name] = 1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1484 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1485
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1486 let more = len(get(job, 'queue', []))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1487 let result = job.error ? join(job.lines, "\n") : s:last_non_empty_line(job.lines)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1488 if len(result)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1489 call s:log(s:bullet_for(job), a:name, result)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1490 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1491
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1492 if !job.error && more
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1493 let job.spec.queue = job.queue
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1494 let s:update.todo[a:name] = job.spec
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1495 else
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1496 let s:update.bar .= s:bullet_for(job, '=')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1497 call s:bar()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1498 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1499 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1500
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1501 function! s:bar()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1502 if s:switch_in()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1503 let total = len(s:update.all)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1504 call setline(1, (s:update.pull ? 'Updating' : 'Installing').
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1505 \ ' plugins ('.len(s:update.bar).'/'.total.')')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1506 call s:progress_bar(2, s:update.bar, total)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1507 call s:switch_out()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1508 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1509 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1510
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1511 function! s:logpos(name)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1512 let max = line('$')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1513 for i in range(4, max > 4 ? max : 4)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1514 if getline(i) =~# '^[-+x*] '.a:name.':'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1515 for j in range(i + 1, max > 5 ? max : 5)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1516 if getline(j) !~ '^ '
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1517 return [i, j - 1]
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1518 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1519 endfor
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1520 return [i, i]
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1521 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1522 endfor
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1523 return [0, 0]
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1524 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1525
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1526 function! s:log(bullet, name, lines)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1527 if s:switch_in()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1528 let [b, e] = s:logpos(a:name)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1529 if b > 0
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1530 silent execute printf('%d,%d d _', b, e)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1531 if b > winheight('.')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1532 let b = 4
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1533 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1534 else
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1535 let b = 4
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1536 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1537 " FIXME For some reason, nomodifiable is set after :d in vim8
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1538 setlocal modifiable
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1539 call append(b - 1, s:format_message(a:bullet, a:name, a:lines))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1540 call s:switch_out()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1541 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1542 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1543
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1544 function! s:update_vim()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1545 let s:jobs = {}
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1546
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1547 call s:bar()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1548 call s:tick()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1549 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1550
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1551 function! s:checkout_command(spec)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1552 let a:spec.branch = s:git_origin_branch(a:spec)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1553 return ['git', 'checkout', '-q', a:spec.branch, '--']
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1554 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1555
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1556 function! s:merge_command(spec)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1557 let a:spec.branch = s:git_origin_branch(a:spec)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1558 return ['git', 'merge', '--ff-only', 'origin/'.a:spec.branch]
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1559 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1560
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1561 function! s:tick()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1562 let pull = s:update.pull
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1563 let prog = s:progress_opt(s:nvim || s:vim8)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1564 while 1 " Without TCO, Vim stack is bound to explode
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1565 if empty(s:update.todo)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1566 if empty(s:jobs) && !s:update.fin
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1567 call s:update_finish()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1568 let s:update.fin = 1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1569 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1570 return
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1571 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1572
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1573 let name = keys(s:update.todo)[0]
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1574 let spec = remove(s:update.todo, name)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1575 if get(spec, 'abort', 0)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1576 call s:mark_aborted(name, 'Skipped')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1577 call s:reap(name)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1578 continue
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1579 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1580
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1581 let queue = get(spec, 'queue', [])
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1582 let new = empty(globpath(spec.dir, '.git', 1))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1583
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1584 if empty(queue)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1585 call s:log(new ? '+' : '*', name, pull ? 'Updating ...' : 'Installing ...')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1586 redraw
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1587 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1588
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1589 let has_tag = has_key(spec, 'tag')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1590 if len(queue)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1591 call s:spawn(name, spec, queue, { 'dir': spec.dir })
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1592 elseif !new
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1593 let [error, _] = s:git_validate(spec, 0)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1594 if empty(error)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1595 if pull
4
1a705d7a7521 working on stuff
luka
parents: 0
diff changeset
1596 let cmd = s:disable_credential_helper() ? ['git', '-c', 'credential.helper=', 'fetch'] : ['git', 'fetch']
0
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1597 if has_tag && !empty(globpath(spec.dir, '.git/shallow'))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1598 call extend(cmd, ['--depth', '99999999'])
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1599 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1600 if !empty(prog)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1601 call add(cmd, prog)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1602 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1603 let queue = [cmd, split('git remote set-head origin -a')]
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1604 if !has_tag && !has_key(spec, 'commit')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1605 call extend(queue, [function('s:checkout_command'), function('s:merge_command')])
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1606 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1607 call s:spawn(name, spec, queue, { 'dir': spec.dir })
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1608 else
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1609 let s:jobs[name] = { 'running': 0, 'lines': ['Already installed'], 'error': 0 }
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1610 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1611 else
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1612 let s:jobs[name] = { 'running': 0, 'lines': s:lines(error), 'error': 1 }
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1613 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1614 else
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1615 let cmd = ['git', 'clone']
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1616 if !has_tag
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1617 call extend(cmd, s:clone_opt)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1618 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1619 if !empty(prog)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1620 call add(cmd, prog)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1621 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1622 call s:spawn(name, spec, [extend(cmd, [spec.uri, s:trim(spec.dir)]), function('s:checkout_command'), function('s:merge_command')], { 'new': 1 })
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1623 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1624
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1625 if !s:jobs[name].running
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1626 call s:reap(name)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1627 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1628 if len(s:jobs) >= s:update.threads
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1629 break
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1630 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1631 endwhile
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1632 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1633
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1634 function! s:update_python()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1635 let py_exe = has('python') ? 'python' : 'python3'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1636 execute py_exe "<< EOF"
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1637 import datetime
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1638 import functools
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1639 import os
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1640 try:
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1641 import queue
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1642 except ImportError:
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1643 import Queue as queue
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1644 import random
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1645 import re
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1646 import shutil
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1647 import signal
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1648 import subprocess
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1649 import tempfile
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1650 import threading as thr
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1651 import time
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1652 import traceback
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1653 import vim
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1654
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1655 G_NVIM = vim.eval("has('nvim')") == '1'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1656 G_PULL = vim.eval('s:update.pull') == '1'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1657 G_RETRIES = int(vim.eval('get(g:, "plug_retries", 2)')) + 1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1658 G_TIMEOUT = int(vim.eval('get(g:, "plug_timeout", 60)'))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1659 G_CLONE_OPT = ' '.join(vim.eval('s:clone_opt'))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1660 G_PROGRESS = vim.eval('s:progress_opt(1)')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1661 G_LOG_PROB = 1.0 / int(vim.eval('s:update.threads'))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1662 G_STOP = thr.Event()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1663 G_IS_WIN = vim.eval('s:is_win') == '1'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1664
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1665 class PlugError(Exception):
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1666 def __init__(self, msg):
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1667 self.msg = msg
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1668 class CmdTimedOut(PlugError):
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1669 pass
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1670 class CmdFailed(PlugError):
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1671 pass
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1672 class InvalidURI(PlugError):
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1673 pass
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1674 class Action(object):
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1675 INSTALL, UPDATE, ERROR, DONE = ['+', '*', 'x', '-']
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1676
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1677 class Buffer(object):
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1678 def __init__(self, lock, num_plugs, is_pull):
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1679 self.bar = ''
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1680 self.event = 'Updating' if is_pull else 'Installing'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1681 self.lock = lock
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1682 self.maxy = int(vim.eval('winheight(".")'))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1683 self.num_plugs = num_plugs
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1684
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1685 def __where(self, name):
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1686 """ Find first line with name in current buffer. Return line num. """
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1687 found, lnum = False, 0
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1688 matcher = re.compile('^[-+x*] {0}:'.format(name))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1689 for line in vim.current.buffer:
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1690 if matcher.search(line) is not None:
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1691 found = True
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1692 break
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1693 lnum += 1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1694
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1695 if not found:
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1696 lnum = -1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1697 return lnum
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1698
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1699 def header(self):
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1700 curbuf = vim.current.buffer
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1701 curbuf[0] = self.event + ' plugins ({0}/{1})'.format(len(self.bar), self.num_plugs)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1702
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1703 num_spaces = self.num_plugs - len(self.bar)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1704 curbuf[1] = '[{0}{1}]'.format(self.bar, num_spaces * ' ')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1705
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1706 with self.lock:
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1707 vim.command('normal! 2G')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1708 vim.command('redraw')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1709
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1710 def write(self, action, name, lines):
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1711 first, rest = lines[0], lines[1:]
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1712 msg = ['{0} {1}{2}{3}'.format(action, name, ': ' if first else '', first)]
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1713 msg.extend([' ' + line for line in rest])
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1714
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1715 try:
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1716 if action == Action.ERROR:
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1717 self.bar += 'x'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1718 vim.command("call add(s:update.errors, '{0}')".format(name))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1719 elif action == Action.DONE:
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1720 self.bar += '='
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1721
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1722 curbuf = vim.current.buffer
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1723 lnum = self.__where(name)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1724 if lnum != -1: # Found matching line num
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1725 del curbuf[lnum]
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1726 if lnum > self.maxy and action in set([Action.INSTALL, Action.UPDATE]):
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1727 lnum = 3
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1728 else:
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1729 lnum = 3
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1730 curbuf.append(msg, lnum)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1731
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1732 self.header()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1733 except vim.error:
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1734 pass
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1735
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1736 class Command(object):
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1737 CD = 'cd /d' if G_IS_WIN else 'cd'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1738
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1739 def __init__(self, cmd, cmd_dir=None, timeout=60, cb=None, clean=None):
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1740 self.cmd = cmd
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1741 if cmd_dir:
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1742 self.cmd = '{0} {1} && {2}'.format(Command.CD, cmd_dir, self.cmd)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1743 self.timeout = timeout
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1744 self.callback = cb if cb else (lambda msg: None)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1745 self.clean = clean if clean else (lambda: None)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1746 self.proc = None
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1747
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1748 @property
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1749 def alive(self):
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1750 """ Returns true only if command still running. """
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1751 return self.proc and self.proc.poll() is None
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1752
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1753 def execute(self, ntries=3):
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1754 """ Execute the command with ntries if CmdTimedOut.
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1755 Returns the output of the command if no Exception.
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1756 """
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1757 attempt, finished, limit = 0, False, self.timeout
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1758
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1759 while not finished:
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1760 try:
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1761 attempt += 1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1762 result = self.try_command()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1763 finished = True
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1764 return result
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1765 except CmdTimedOut:
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1766 if attempt != ntries:
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1767 self.notify_retry()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1768 self.timeout += limit
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1769 else:
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1770 raise
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1771
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1772 def notify_retry(self):
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1773 """ Retry required for command, notify user. """
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1774 for count in range(3, 0, -1):
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1775 if G_STOP.is_set():
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1776 raise KeyboardInterrupt
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1777 msg = 'Timeout. Will retry in {0} second{1} ...'.format(
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1778 count, 's' if count != 1 else '')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1779 self.callback([msg])
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1780 time.sleep(1)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1781 self.callback(['Retrying ...'])
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1782
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1783 def try_command(self):
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1784 """ Execute a cmd & poll for callback. Returns list of output.
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1785 Raises CmdFailed -> return code for Popen isn't 0
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1786 Raises CmdTimedOut -> command exceeded timeout without new output
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1787 """
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1788 first_line = True
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1789
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1790 try:
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1791 tfile = tempfile.NamedTemporaryFile(mode='w+b')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1792 preexec_fn = not G_IS_WIN and os.setsid or None
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1793 self.proc = subprocess.Popen(self.cmd, stdout=tfile,
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1794 stderr=subprocess.STDOUT,
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1795 stdin=subprocess.PIPE, shell=True,
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1796 preexec_fn=preexec_fn)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1797 thrd = thr.Thread(target=(lambda proc: proc.wait()), args=(self.proc,))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1798 thrd.start()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1799
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1800 thread_not_started = True
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1801 while thread_not_started:
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1802 try:
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1803 thrd.join(0.1)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1804 thread_not_started = False
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1805 except RuntimeError:
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1806 pass
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1807
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1808 while self.alive:
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1809 if G_STOP.is_set():
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1810 raise KeyboardInterrupt
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1811
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1812 if first_line or random.random() < G_LOG_PROB:
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1813 first_line = False
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1814 line = '' if G_IS_WIN else nonblock_read(tfile.name)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1815 if line:
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1816 self.callback([line])
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1817
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1818 time_diff = time.time() - os.path.getmtime(tfile.name)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1819 if time_diff > self.timeout:
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1820 raise CmdTimedOut(['Timeout!'])
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1821
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1822 thrd.join(0.5)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1823
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1824 tfile.seek(0)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1825 result = [line.decode('utf-8', 'replace').rstrip() for line in tfile]
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1826
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1827 if self.proc.returncode != 0:
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1828 raise CmdFailed([''] + result)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1829
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1830 return result
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1831 except:
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1832 self.terminate()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1833 raise
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1834
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1835 def terminate(self):
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1836 """ Terminate process and cleanup. """
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1837 if self.alive:
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1838 if G_IS_WIN:
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1839 os.kill(self.proc.pid, signal.SIGINT)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1840 else:
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1841 os.killpg(self.proc.pid, signal.SIGTERM)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1842 self.clean()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1843
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1844 class Plugin(object):
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1845 def __init__(self, name, args, buf_q, lock):
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1846 self.name = name
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1847 self.args = args
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1848 self.buf_q = buf_q
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1849 self.lock = lock
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1850 self.tag = args.get('tag', 0)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1851
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1852 def manage(self):
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1853 try:
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1854 if os.path.exists(self.args['dir']):
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1855 self.update()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1856 else:
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1857 self.install()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1858 with self.lock:
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1859 thread_vim_command("let s:update.new['{0}'] = 1".format(self.name))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1860 except PlugError as exc:
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1861 self.write(Action.ERROR, self.name, exc.msg)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1862 except KeyboardInterrupt:
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1863 G_STOP.set()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1864 self.write(Action.ERROR, self.name, ['Interrupted!'])
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1865 except:
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1866 # Any exception except those above print stack trace
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1867 msg = 'Trace:\n{0}'.format(traceback.format_exc().rstrip())
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1868 self.write(Action.ERROR, self.name, msg.split('\n'))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1869 raise
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1870
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1871 def install(self):
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1872 target = self.args['dir']
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1873 if target[-1] == '\\':
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1874 target = target[0:-1]
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1875
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1876 def clean(target):
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1877 def _clean():
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1878 try:
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1879 shutil.rmtree(target)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1880 except OSError:
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1881 pass
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1882 return _clean
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1883
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1884 self.write(Action.INSTALL, self.name, ['Installing ...'])
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1885 callback = functools.partial(self.write, Action.INSTALL, self.name)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1886 cmd = 'git clone {0} {1} {2} {3} 2>&1'.format(
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1887 '' if self.tag else G_CLONE_OPT, G_PROGRESS, self.args['uri'],
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1888 esc(target))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1889 com = Command(cmd, None, G_TIMEOUT, callback, clean(target))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1890 result = com.execute(G_RETRIES)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1891 self.write(Action.DONE, self.name, result[-1:])
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1892
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1893 def repo_uri(self):
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1894 cmd = 'git rev-parse --abbrev-ref HEAD 2>&1 && git config -f .git/config remote.origin.url'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1895 command = Command(cmd, self.args['dir'], G_TIMEOUT,)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1896 result = command.execute(G_RETRIES)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1897 return result[-1]
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1898
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1899 def update(self):
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1900 actual_uri = self.repo_uri()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1901 expect_uri = self.args['uri']
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1902 regex = re.compile(r'^(?:\w+://)?(?:[^@/]*@)?([^:/]*(?::[0-9]*)?)[:/](.*?)(?:\.git)?/?$')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1903 ma = regex.match(actual_uri)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1904 mb = regex.match(expect_uri)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1905 if ma is None or mb is None or ma.groups() != mb.groups():
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1906 msg = ['',
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1907 'Invalid URI: {0}'.format(actual_uri),
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1908 'Expected {0}'.format(expect_uri),
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1909 'PlugClean required.']
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1910 raise InvalidURI(msg)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1911
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1912 if G_PULL:
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1913 self.write(Action.UPDATE, self.name, ['Updating ...'])
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1914 callback = functools.partial(self.write, Action.UPDATE, self.name)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1915 fetch_opt = '--depth 99999999' if self.tag and os.path.isfile(os.path.join(self.args['dir'], '.git/shallow')) else ''
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1916 cmd = 'git fetch {0} {1} 2>&1'.format(fetch_opt, G_PROGRESS)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1917 com = Command(cmd, self.args['dir'], G_TIMEOUT, callback)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1918 result = com.execute(G_RETRIES)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1919 self.write(Action.DONE, self.name, result[-1:])
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1920 else:
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1921 self.write(Action.DONE, self.name, ['Already installed'])
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1922
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1923 def write(self, action, name, msg):
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1924 self.buf_q.put((action, name, msg))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1925
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1926 class PlugThread(thr.Thread):
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1927 def __init__(self, tname, args):
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1928 super(PlugThread, self).__init__()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1929 self.tname = tname
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1930 self.args = args
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1931
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1932 def run(self):
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1933 thr.current_thread().name = self.tname
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1934 buf_q, work_q, lock = self.args
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1935
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1936 try:
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1937 while not G_STOP.is_set():
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1938 name, args = work_q.get_nowait()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1939 plug = Plugin(name, args, buf_q, lock)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1940 plug.manage()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1941 work_q.task_done()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1942 except queue.Empty:
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1943 pass
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1944
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1945 class RefreshThread(thr.Thread):
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1946 def __init__(self, lock):
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1947 super(RefreshThread, self).__init__()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1948 self.lock = lock
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1949 self.running = True
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1950
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1951 def run(self):
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1952 while self.running:
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1953 with self.lock:
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1954 thread_vim_command('noautocmd normal! a')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1955 time.sleep(0.33)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1956
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1957 def stop(self):
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1958 self.running = False
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1959
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1960 if G_NVIM:
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1961 def thread_vim_command(cmd):
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1962 vim.session.threadsafe_call(lambda: vim.command(cmd))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1963 else:
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1964 def thread_vim_command(cmd):
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1965 vim.command(cmd)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1966
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1967 def esc(name):
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1968 return '"' + name.replace('"', '\"') + '"'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1969
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1970 def nonblock_read(fname):
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1971 """ Read a file with nonblock flag. Return the last line. """
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1972 fread = os.open(fname, os.O_RDONLY | os.O_NONBLOCK)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1973 buf = os.read(fread, 100000).decode('utf-8', 'replace')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1974 os.close(fread)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1975
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1976 line = buf.rstrip('\r\n')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1977 left = max(line.rfind('\r'), line.rfind('\n'))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1978 if left != -1:
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1979 left += 1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1980 line = line[left:]
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1981
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1982 return line
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1983
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1984 def main():
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1985 thr.current_thread().name = 'main'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1986 nthreads = int(vim.eval('s:update.threads'))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1987 plugs = vim.eval('s:update.todo')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1988 mac_gui = vim.eval('s:mac_gui') == '1'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1989
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1990 lock = thr.Lock()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1991 buf = Buffer(lock, len(plugs), G_PULL)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1992 buf_q, work_q = queue.Queue(), queue.Queue()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1993 for work in plugs.items():
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1994 work_q.put(work)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1995
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1996 start_cnt = thr.active_count()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1997 for num in range(nthreads):
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1998 tname = 'PlugT-{0:02}'.format(num)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
1999 thread = PlugThread(tname, (buf_q, work_q, lock))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2000 thread.start()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2001 if mac_gui:
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2002 rthread = RefreshThread(lock)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2003 rthread.start()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2004
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2005 while not buf_q.empty() or thr.active_count() != start_cnt:
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2006 try:
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2007 action, name, msg = buf_q.get(True, 0.25)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2008 buf.write(action, name, ['OK'] if not msg else msg)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2009 buf_q.task_done()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2010 except queue.Empty:
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2011 pass
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2012 except KeyboardInterrupt:
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2013 G_STOP.set()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2014
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2015 if mac_gui:
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2016 rthread.stop()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2017 rthread.join()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2018
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2019 main()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2020 EOF
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2021 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2022
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2023 function! s:update_ruby()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2024 ruby << EOF
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2025 module PlugStream
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2026 SEP = ["\r", "\n", nil]
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2027 def get_line
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2028 buffer = ''
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2029 loop do
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2030 char = readchar rescue return
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2031 if SEP.include? char.chr
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2032 buffer << $/
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2033 break
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2034 else
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2035 buffer << char
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2036 end
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2037 end
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2038 buffer
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2039 end
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2040 end unless defined?(PlugStream)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2041
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2042 def esc arg
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2043 %["#{arg.gsub('"', '\"')}"]
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2044 end
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2045
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2046 def killall pid
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2047 pids = [pid]
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2048 if /mswin|mingw|bccwin/ =~ RUBY_PLATFORM
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2049 pids.each { |pid| Process.kill 'INT', pid.to_i rescue nil }
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2050 else
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2051 unless `which pgrep 2> /dev/null`.empty?
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2052 children = pids
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2053 until children.empty?
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2054 children = children.map { |pid|
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2055 `pgrep -P #{pid}`.lines.map { |l| l.chomp }
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2056 }.flatten
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2057 pids += children
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2058 end
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2059 end
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2060 pids.each { |pid| Process.kill 'TERM', pid.to_i rescue nil }
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2061 end
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2062 end
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2063
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2064 def compare_git_uri a, b
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2065 regex = %r{^(?:\w+://)?(?:[^@/]*@)?([^:/]*(?::[0-9]*)?)[:/](.*?)(?:\.git)?/?$}
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2066 regex.match(a).to_a.drop(1) == regex.match(b).to_a.drop(1)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2067 end
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2068
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2069 require 'thread'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2070 require 'fileutils'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2071 require 'timeout'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2072 running = true
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2073 iswin = VIM::evaluate('s:is_win').to_i == 1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2074 pull = VIM::evaluate('s:update.pull').to_i == 1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2075 base = VIM::evaluate('g:plug_home')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2076 all = VIM::evaluate('s:update.todo')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2077 limit = VIM::evaluate('get(g:, "plug_timeout", 60)')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2078 tries = VIM::evaluate('get(g:, "plug_retries", 2)') + 1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2079 nthr = VIM::evaluate('s:update.threads').to_i
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2080 maxy = VIM::evaluate('winheight(".")').to_i
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2081 vim7 = VIM::evaluate('v:version').to_i <= 703 && RUBY_PLATFORM =~ /darwin/
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2082 cd = iswin ? 'cd /d' : 'cd'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2083 tot = VIM::evaluate('len(s:update.todo)') || 0
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2084 bar = ''
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2085 skip = 'Already installed'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2086 mtx = Mutex.new
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2087 take1 = proc { mtx.synchronize { running && all.shift } }
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2088 logh = proc {
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2089 cnt = bar.length
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2090 $curbuf[1] = "#{pull ? 'Updating' : 'Installing'} plugins (#{cnt}/#{tot})"
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2091 $curbuf[2] = '[' + bar.ljust(tot) + ']'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2092 VIM::command('normal! 2G')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2093 VIM::command('redraw')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2094 }
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2095 where = proc { |name| (1..($curbuf.length)).find { |l| $curbuf[l] =~ /^[-+x*] #{name}:/ } }
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2096 log = proc { |name, result, type|
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2097 mtx.synchronize do
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2098 ing = ![true, false].include?(type)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2099 bar += type ? '=' : 'x' unless ing
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2100 b = case type
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2101 when :install then '+' when :update then '*'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2102 when true, nil then '-' else
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2103 VIM::command("call add(s:update.errors, '#{name}')")
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2104 'x'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2105 end
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2106 result =
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2107 if type || type.nil?
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2108 ["#{b} #{name}: #{result.lines.to_a.last || 'OK'}"]
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2109 elsif result =~ /^Interrupted|^Timeout/
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2110 ["#{b} #{name}: #{result}"]
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2111 else
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2112 ["#{b} #{name}"] + result.lines.map { |l| " " << l }
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2113 end
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2114 if lnum = where.call(name)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2115 $curbuf.delete lnum
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2116 lnum = 4 if ing && lnum > maxy
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2117 end
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2118 result.each_with_index do |line, offset|
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2119 $curbuf.append((lnum || 4) - 1 + offset, line.gsub(/\e\[./, '').chomp)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2120 end
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2121 logh.call
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2122 end
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2123 }
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2124 bt = proc { |cmd, name, type, cleanup|
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2125 tried = timeout = 0
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2126 begin
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2127 tried += 1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2128 timeout += limit
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2129 fd = nil
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2130 data = ''
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2131 if iswin
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2132 Timeout::timeout(timeout) do
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2133 tmp = VIM::evaluate('tempname()')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2134 system("(#{cmd}) > #{tmp}")
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2135 data = File.read(tmp).chomp
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2136 File.unlink tmp rescue nil
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2137 end
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2138 else
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2139 fd = IO.popen(cmd).extend(PlugStream)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2140 first_line = true
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2141 log_prob = 1.0 / nthr
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2142 while line = Timeout::timeout(timeout) { fd.get_line }
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2143 data << line
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2144 log.call name, line.chomp, type if name && (first_line || rand < log_prob)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2145 first_line = false
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2146 end
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2147 fd.close
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2148 end
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2149 [$? == 0, data.chomp]
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2150 rescue Timeout::Error, Interrupt => e
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2151 if fd && !fd.closed?
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2152 killall fd.pid
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2153 fd.close
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2154 end
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2155 cleanup.call if cleanup
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2156 if e.is_a?(Timeout::Error) && tried < tries
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2157 3.downto(1) do |countdown|
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2158 s = countdown > 1 ? 's' : ''
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2159 log.call name, "Timeout. Will retry in #{countdown} second#{s} ...", type
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2160 sleep 1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2161 end
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2162 log.call name, 'Retrying ...', type
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2163 retry
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2164 end
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2165 [false, e.is_a?(Interrupt) ? "Interrupted!" : "Timeout!"]
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2166 end
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2167 }
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2168 main = Thread.current
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2169 threads = []
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2170 watcher = Thread.new {
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2171 if vim7
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2172 while VIM::evaluate('getchar(1)')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2173 sleep 0.1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2174 end
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2175 else
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2176 require 'io/console' # >= Ruby 1.9
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2177 nil until IO.console.getch == 3.chr
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2178 end
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2179 mtx.synchronize do
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2180 running = false
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2181 threads.each { |t| t.raise Interrupt } unless vim7
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2182 end
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2183 threads.each { |t| t.join rescue nil }
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2184 main.kill
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2185 }
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2186 refresh = Thread.new {
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2187 while true
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2188 mtx.synchronize do
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2189 break unless running
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2190 VIM::command('noautocmd normal! a')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2191 end
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2192 sleep 0.2
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2193 end
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2194 } if VIM::evaluate('s:mac_gui') == 1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2195
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2196 clone_opt = VIM::evaluate('s:clone_opt').join(' ')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2197 progress = VIM::evaluate('s:progress_opt(1)')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2198 nthr.times do
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2199 mtx.synchronize do
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2200 threads << Thread.new {
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2201 while pair = take1.call
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2202 name = pair.first
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2203 dir, uri, tag = pair.last.values_at *%w[dir uri tag]
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2204 exists = File.directory? dir
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2205 ok, result =
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2206 if exists
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2207 chdir = "#{cd} #{iswin ? dir : esc(dir)}"
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2208 ret, data = bt.call "#{chdir} && git rev-parse --abbrev-ref HEAD 2>&1 && git config -f .git/config remote.origin.url", nil, nil, nil
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2209 current_uri = data.lines.to_a.last
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2210 if !ret
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2211 if data =~ /^Interrupted|^Timeout/
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2212 [false, data]
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2213 else
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2214 [false, [data.chomp, "PlugClean required."].join($/)]
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2215 end
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2216 elsif !compare_git_uri(current_uri, uri)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2217 [false, ["Invalid URI: #{current_uri}",
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2218 "Expected: #{uri}",
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2219 "PlugClean required."].join($/)]
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2220 else
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2221 if pull
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2222 log.call name, 'Updating ...', :update
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2223 fetch_opt = (tag && File.exist?(File.join(dir, '.git/shallow'))) ? '--depth 99999999' : ''
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2224 bt.call "#{chdir} && git fetch #{fetch_opt} #{progress} 2>&1", name, :update, nil
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2225 else
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2226 [true, skip]
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2227 end
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2228 end
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2229 else
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2230 d = esc dir.sub(%r{[\\/]+$}, '')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2231 log.call name, 'Installing ...', :install
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2232 bt.call "git clone #{clone_opt unless tag} #{progress} #{uri} #{d} 2>&1", name, :install, proc {
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2233 FileUtils.rm_rf dir
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2234 }
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2235 end
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2236 mtx.synchronize { VIM::command("let s:update.new['#{name}'] = 1") } if !exists && ok
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2237 log.call name, result, ok
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2238 end
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2239 } if running
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2240 end
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2241 end
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2242 threads.each { |t| t.join rescue nil }
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2243 logh.call
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2244 refresh.kill if refresh
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2245 watcher.kill
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2246 EOF
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2247 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2248
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2249 function! s:shellesc_cmd(arg, script)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2250 let escaped = substitute('"'.a:arg.'"', '[&|<>()@^!"]', '^&', 'g')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2251 return substitute(escaped, '%', (a:script ? '%' : '^') . '&', 'g')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2252 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2253
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2254 function! s:shellesc_ps1(arg)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2255 return "'".substitute(escape(a:arg, '\"'), "'", "''", 'g')."'"
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2256 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2257
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2258 function! s:shellesc_sh(arg)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2259 return "'".substitute(a:arg, "'", "'\\\\''", 'g')."'"
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2260 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2261
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2262 " Escape the shell argument based on the shell.
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2263 " Vim and Neovim's shellescape() are insufficient.
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2264 " 1. shellslash determines whether to use single/double quotes.
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2265 " Double-quote escaping is fragile for cmd.exe.
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2266 " 2. It does not work for powershell.
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2267 " 3. It does not work for *sh shells if the command is executed
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2268 " via cmd.exe (ie. cmd.exe /c sh -c command command_args)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2269 " 4. It does not support batchfile syntax.
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2270 "
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2271 " Accepts an optional dictionary with the following keys:
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2272 " - shell: same as Vim/Neovim 'shell' option.
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2273 " If unset, fallback to 'cmd.exe' on Windows or 'sh'.
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2274 " - script: If truthy and shell is cmd.exe, escape for batchfile syntax.
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2275 function! plug#shellescape(arg, ...)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2276 if a:arg =~# '^[A-Za-z0-9_/:.-]\+$'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2277 return a:arg
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2278 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2279 let opts = a:0 > 0 && type(a:1) == s:TYPE.dict ? a:1 : {}
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2280 let shell = get(opts, 'shell', s:is_win ? 'cmd.exe' : 'sh')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2281 let script = get(opts, 'script', 1)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2282 if shell =~# 'cmd\(\.exe\)\?$'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2283 return s:shellesc_cmd(a:arg, script)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2284 elseif s:is_powershell(shell)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2285 return s:shellesc_ps1(a:arg)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2286 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2287 return s:shellesc_sh(a:arg)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2288 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2289
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2290 function! s:glob_dir(path)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2291 return map(filter(s:glob(a:path, '**'), 'isdirectory(v:val)'), 's:dirpath(v:val)')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2292 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2293
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2294 function! s:progress_bar(line, bar, total)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2295 call setline(a:line, '[' . s:lpad(a:bar, a:total) . ']')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2296 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2297
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2298 function! s:compare_git_uri(a, b)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2299 " See `git help clone'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2300 " https:// [user@] github.com[:port] / junegunn/vim-plug [.git]
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2301 " [git@] github.com[:port] : junegunn/vim-plug [.git]
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2302 " file:// / junegunn/vim-plug [/]
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2303 " / junegunn/vim-plug [/]
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2304 let pat = '^\%(\w\+://\)\='.'\%([^@/]*@\)\='.'\([^:/]*\%(:[0-9]*\)\=\)'.'[:/]'.'\(.\{-}\)'.'\%(\.git\)\=/\?$'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2305 let ma = matchlist(a:a, pat)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2306 let mb = matchlist(a:b, pat)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2307 return ma[1:2] ==# mb[1:2]
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2308 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2309
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2310 function! s:format_message(bullet, name, message)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2311 if a:bullet != 'x'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2312 return [printf('%s %s: %s', a:bullet, a:name, s:lastline(a:message))]
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2313 else
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2314 let lines = map(s:lines(a:message), '" ".v:val')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2315 return extend([printf('x %s:', a:name)], lines)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2316 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2317 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2318
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2319 function! s:with_cd(cmd, dir, ...)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2320 let script = a:0 > 0 ? a:1 : 1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2321 let pwsh = s:is_powershell(&shell)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2322 let cd = s:is_win && !pwsh ? 'cd /d' : 'cd'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2323 let sep = pwsh ? ';' : '&&'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2324 return printf('%s %s %s %s', cd, plug#shellescape(a:dir, {'script': script, 'shell': &shell}), sep, a:cmd)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2325 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2326
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2327 function! s:system(cmd, ...)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2328 let batchfile = ''
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2329 try
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2330 let [sh, shellcmdflag, shrd] = s:chsh(1)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2331 if type(a:cmd) == s:TYPE.list
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2332 " Neovim's system() supports list argument to bypass the shell
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2333 " but it cannot set the working directory for the command.
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2334 " Assume that the command does not rely on the shell.
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2335 if has('nvim') && a:0 == 0
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2336 return system(a:cmd)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2337 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2338 let cmd = join(map(copy(a:cmd), 'plug#shellescape(v:val, {"shell": &shell, "script": 0})'))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2339 if s:is_powershell(&shell)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2340 let cmd = '& ' . cmd
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2341 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2342 else
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2343 let cmd = a:cmd
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2344 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2345 if a:0 > 0
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2346 let cmd = s:with_cd(cmd, a:1, type(a:cmd) != s:TYPE.list)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2347 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2348 if s:is_win && type(a:cmd) != s:TYPE.list
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2349 let [batchfile, cmd] = s:batchfile(cmd)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2350 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2351 return system(cmd)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2352 finally
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2353 let [&shell, &shellcmdflag, &shellredir] = [sh, shellcmdflag, shrd]
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2354 if s:is_win && filereadable(batchfile)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2355 call delete(batchfile)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2356 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2357 endtry
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2358 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2359
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2360 function! s:system_chomp(...)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2361 let ret = call('s:system', a:000)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2362 return v:shell_error ? '' : substitute(ret, '\n$', '', '')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2363 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2364
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2365 function! s:git_validate(spec, check_branch)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2366 let err = ''
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2367 if isdirectory(a:spec.dir)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2368 let result = [s:git_local_branch(a:spec.dir), s:git_origin_url(a:spec.dir)]
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2369 let remote = result[-1]
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2370 if empty(remote)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2371 let err = join([remote, 'PlugClean required.'], "\n")
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2372 elseif !s:compare_git_uri(remote, a:spec.uri)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2373 let err = join(['Invalid URI: '.remote,
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2374 \ 'Expected: '.a:spec.uri,
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2375 \ 'PlugClean required.'], "\n")
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2376 elseif a:check_branch && has_key(a:spec, 'commit')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2377 let sha = s:git_revision(a:spec.dir)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2378 if empty(sha)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2379 let err = join(add(result, 'PlugClean required.'), "\n")
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2380 elseif !s:hash_match(sha, a:spec.commit)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2381 let err = join([printf('Invalid HEAD (expected: %s, actual: %s)',
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2382 \ a:spec.commit[:6], sha[:6]),
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2383 \ 'PlugUpdate required.'], "\n")
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2384 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2385 elseif a:check_branch
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2386 let current_branch = result[0]
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2387 " Check tag
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2388 let origin_branch = s:git_origin_branch(a:spec)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2389 if has_key(a:spec, 'tag')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2390 let tag = s:system_chomp('git describe --exact-match --tags HEAD 2>&1', a:spec.dir)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2391 if a:spec.tag !=# tag && a:spec.tag !~ '\*'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2392 let err = printf('Invalid tag: %s (expected: %s). Try PlugUpdate.',
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2393 \ (empty(tag) ? 'N/A' : tag), a:spec.tag)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2394 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2395 " Check branch
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2396 elseif origin_branch !=# current_branch
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2397 let err = printf('Invalid branch: %s (expected: %s). Try PlugUpdate.',
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2398 \ current_branch, origin_branch)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2399 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2400 if empty(err)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2401 let ahead_behind = split(s:lastline(s:system([
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2402 \ 'git', 'rev-list', '--count', '--left-right',
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2403 \ printf('HEAD...origin/%s', origin_branch)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2404 \ ], a:spec.dir)), '\t')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2405 if v:shell_error || len(ahead_behind) != 2
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2406 let err = "Failed to compare with the origin. The default branch might have changed.\nPlugClean required."
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2407 else
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2408 let [ahead, behind] = ahead_behind
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2409 if ahead && behind
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2410 " Only mention PlugClean if diverged, otherwise it's likely to be
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2411 " pushable (and probably not that messed up).
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2412 let err = printf(
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2413 \ "Diverged from origin/%s (%d commit(s) ahead and %d commit(s) behind!\n"
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2414 \ .'Backup local changes and run PlugClean and PlugUpdate to reinstall it.', origin_branch, ahead, behind)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2415 elseif ahead
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2416 let err = printf("Ahead of origin/%s by %d commit(s).\n"
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2417 \ .'Cannot update until local changes are pushed.',
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2418 \ origin_branch, ahead)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2419 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2420 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2421 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2422 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2423 else
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2424 let err = 'Not found'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2425 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2426 return [err, err =~# 'PlugClean']
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2427 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2428
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2429 function! s:rm_rf(dir)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2430 if isdirectory(a:dir)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2431 return s:system(s:is_win
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2432 \ ? 'rmdir /S /Q '.plug#shellescape(a:dir)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2433 \ : ['rm', '-rf', a:dir])
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2434 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2435 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2436
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2437 function! s:clean(force)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2438 call s:prepare()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2439 call append(0, 'Searching for invalid plugins in '.g:plug_home)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2440 call append(1, '')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2441
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2442 " List of valid directories
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2443 let dirs = []
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2444 let errs = {}
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2445 let [cnt, total] = [0, len(g:plugs)]
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2446 for [name, spec] in items(g:plugs)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2447 if !s:is_managed(name) || get(spec, 'frozen', 0)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2448 call add(dirs, spec.dir)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2449 else
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2450 let [err, clean] = s:git_validate(spec, 1)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2451 if clean
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2452 let errs[spec.dir] = s:lines(err)[0]
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2453 else
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2454 call add(dirs, spec.dir)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2455 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2456 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2457 let cnt += 1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2458 call s:progress_bar(2, repeat('=', cnt), total)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2459 normal! 2G
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2460 redraw
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2461 endfor
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2462
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2463 let allowed = {}
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2464 for dir in dirs
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2465 let allowed[s:dirpath(s:plug_fnamemodify(dir, ':h:h'))] = 1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2466 let allowed[dir] = 1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2467 for child in s:glob_dir(dir)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2468 let allowed[child] = 1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2469 endfor
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2470 endfor
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2471
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2472 let todo = []
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2473 let found = sort(s:glob_dir(g:plug_home))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2474 while !empty(found)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2475 let f = remove(found, 0)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2476 if !has_key(allowed, f) && isdirectory(f)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2477 call add(todo, f)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2478 call append(line('$'), '- ' . f)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2479 if has_key(errs, f)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2480 call append(line('$'), ' ' . errs[f])
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2481 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2482 let found = filter(found, 'stridx(v:val, f) != 0')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2483 end
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2484 endwhile
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2485
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2486 4
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2487 redraw
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2488 if empty(todo)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2489 call append(line('$'), 'Already clean.')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2490 else
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2491 let s:clean_count = 0
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2492 call append(3, ['Directories to delete:', ''])
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2493 redraw!
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2494 if a:force || s:ask_no_interrupt('Delete all directories?')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2495 call s:delete([6, line('$')], 1)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2496 else
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2497 call setline(4, 'Cancelled.')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2498 nnoremap <silent> <buffer> d :set opfunc=<sid>delete_op<cr>g@
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2499 nmap <silent> <buffer> dd d_
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2500 xnoremap <silent> <buffer> d :<c-u>call <sid>delete_op(visualmode(), 1)<cr>
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2501 echo 'Delete the lines (d{motion}) to delete the corresponding directories'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2502 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2503 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2504 4
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2505 setlocal nomodifiable
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2506 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2507
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2508 function! s:delete_op(type, ...)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2509 call s:delete(a:0 ? [line("'<"), line("'>")] : [line("'["), line("']")], 0)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2510 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2511
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2512 function! s:delete(range, force)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2513 let [l1, l2] = a:range
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2514 let force = a:force
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2515 let err_count = 0
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2516 while l1 <= l2
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2517 let line = getline(l1)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2518 if line =~ '^- ' && isdirectory(line[2:])
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2519 execute l1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2520 redraw!
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2521 let answer = force ? 1 : s:ask('Delete '.line[2:].'?', 1)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2522 let force = force || answer > 1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2523 if answer
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2524 let err = s:rm_rf(line[2:])
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2525 setlocal modifiable
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2526 if empty(err)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2527 call setline(l1, '~'.line[1:])
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2528 let s:clean_count += 1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2529 else
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2530 delete _
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2531 call append(l1 - 1, s:format_message('x', line[1:], err))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2532 let l2 += len(s:lines(err))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2533 let err_count += 1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2534 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2535 let msg = printf('Removed %d directories.', s:clean_count)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2536 if err_count > 0
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2537 let msg .= printf(' Failed to remove %d directories.', err_count)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2538 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2539 call setline(4, msg)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2540 setlocal nomodifiable
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2541 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2542 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2543 let l1 += 1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2544 endwhile
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2545 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2546
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2547 function! s:upgrade()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2548 echo 'Downloading the latest version of vim-plug'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2549 redraw
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2550 let tmp = s:plug_tempname()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2551 let new = tmp . '/plug.vim'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2552
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2553 try
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2554 let out = s:system(['git', 'clone', '--depth', '1', s:plug_src, tmp])
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2555 if v:shell_error
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2556 return s:err('Error upgrading vim-plug: '. out)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2557 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2558
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2559 if readfile(s:me) ==# readfile(new)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2560 echo 'vim-plug is already up-to-date'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2561 return 0
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2562 else
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2563 call rename(s:me, s:me . '.old')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2564 call rename(new, s:me)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2565 unlet g:loaded_plug
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2566 echo 'vim-plug has been upgraded'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2567 return 1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2568 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2569 finally
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2570 silent! call s:rm_rf(tmp)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2571 endtry
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2572 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2573
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2574 function! s:upgrade_specs()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2575 for spec in values(g:plugs)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2576 let spec.frozen = get(spec, 'frozen', 0)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2577 endfor
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2578 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2579
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2580 function! s:status()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2581 call s:prepare()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2582 call append(0, 'Checking plugins')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2583 call append(1, '')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2584
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2585 let ecnt = 0
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2586 let unloaded = 0
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2587 let [cnt, total] = [0, len(g:plugs)]
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2588 for [name, spec] in items(g:plugs)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2589 let is_dir = isdirectory(spec.dir)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2590 if has_key(spec, 'uri')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2591 if is_dir
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2592 let [err, _] = s:git_validate(spec, 1)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2593 let [valid, msg] = [empty(err), empty(err) ? 'OK' : err]
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2594 else
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2595 let [valid, msg] = [0, 'Not found. Try PlugInstall.']
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2596 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2597 else
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2598 if is_dir
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2599 let [valid, msg] = [1, 'OK']
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2600 else
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2601 let [valid, msg] = [0, 'Not found.']
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2602 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2603 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2604 let cnt += 1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2605 let ecnt += !valid
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2606 " `s:loaded` entry can be missing if PlugUpgraded
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2607 if is_dir && get(s:loaded, name, -1) == 0
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2608 let unloaded = 1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2609 let msg .= ' (not loaded)'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2610 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2611 call s:progress_bar(2, repeat('=', cnt), total)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2612 call append(3, s:format_message(valid ? '-' : 'x', name, msg))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2613 normal! 2G
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2614 redraw
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2615 endfor
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2616 call setline(1, 'Finished. '.ecnt.' error(s).')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2617 normal! gg
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2618 setlocal nomodifiable
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2619 if unloaded
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2620 echo "Press 'L' on each line to load plugin, or 'U' to update"
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2621 nnoremap <silent> <buffer> L :call <SID>status_load(line('.'))<cr>
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2622 xnoremap <silent> <buffer> L :call <SID>status_load(line('.'))<cr>
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2623 end
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2624 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2625
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2626 function! s:extract_name(str, prefix, suffix)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2627 return matchstr(a:str, '^'.a:prefix.' \zs[^:]\+\ze:.*'.a:suffix.'$')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2628 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2629
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2630 function! s:status_load(lnum)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2631 let line = getline(a:lnum)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2632 let name = s:extract_name(line, '-', '(not loaded)')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2633 if !empty(name)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2634 call plug#load(name)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2635 setlocal modifiable
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2636 call setline(a:lnum, substitute(line, ' (not loaded)$', '', ''))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2637 setlocal nomodifiable
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2638 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2639 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2640
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2641 function! s:status_update() range
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2642 let lines = getline(a:firstline, a:lastline)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2643 let names = filter(map(lines, 's:extract_name(v:val, "[x-]", "")'), '!empty(v:val)')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2644 if !empty(names)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2645 echo
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2646 execute 'PlugUpdate' join(names)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2647 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2648 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2649
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2650 function! s:is_preview_window_open()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2651 silent! wincmd P
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2652 if &previewwindow
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2653 wincmd p
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2654 return 1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2655 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2656 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2657
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2658 function! s:find_name(lnum)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2659 for lnum in reverse(range(1, a:lnum))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2660 let line = getline(lnum)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2661 if empty(line)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2662 return ''
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2663 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2664 let name = s:extract_name(line, '-', '')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2665 if !empty(name)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2666 return name
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2667 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2668 endfor
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2669 return ''
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2670 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2671
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2672 function! s:preview_commit()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2673 if b:plug_preview < 0
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2674 let b:plug_preview = !s:is_preview_window_open()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2675 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2676
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2677 let sha = matchstr(getline('.'), '^ \X*\zs[0-9a-f]\{7,9}')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2678 if empty(sha)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2679 let name = matchstr(getline('.'), '^- \zs[^:]*\ze:$')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2680 if empty(name)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2681 return
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2682 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2683 let title = 'HEAD@{1}..'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2684 let command = 'git diff --no-color HEAD@{1}'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2685 else
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2686 let title = sha
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2687 let command = 'git show --no-color --pretty=medium '.sha
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2688 let name = s:find_name(line('.'))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2689 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2690
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2691 if empty(name) || !has_key(g:plugs, name) || !isdirectory(g:plugs[name].dir)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2692 return
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2693 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2694
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2695 if !s:is_preview_window_open()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2696 execute get(g:, 'plug_pwindow', 'vertical rightbelow new')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2697 execute 'e' title
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2698 else
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2699 execute 'pedit' title
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2700 wincmd P
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2701 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2702 setlocal previewwindow filetype=git buftype=nofile bufhidden=wipe nobuflisted modifiable
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2703 let batchfile = ''
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2704 try
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2705 let [sh, shellcmdflag, shrd] = s:chsh(1)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2706 let cmd = 'cd '.plug#shellescape(g:plugs[name].dir).' && '.command
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2707 if s:is_win
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2708 let [batchfile, cmd] = s:batchfile(cmd)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2709 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2710 execute 'silent %!' cmd
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2711 finally
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2712 let [&shell, &shellcmdflag, &shellredir] = [sh, shellcmdflag, shrd]
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2713 if s:is_win && filereadable(batchfile)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2714 call delete(batchfile)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2715 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2716 endtry
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2717 setlocal nomodifiable
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2718 nnoremap <silent> <buffer> q :q<cr>
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2719 wincmd p
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2720 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2721
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2722 function! s:section(flags)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2723 call search('\(^[x-] \)\@<=[^:]\+:', a:flags)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2724 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2725
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2726 function! s:format_git_log(line)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2727 let indent = ' '
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2728 let tokens = split(a:line, nr2char(1))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2729 if len(tokens) != 5
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2730 return indent.substitute(a:line, '\s*$', '', '')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2731 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2732 let [graph, sha, refs, subject, date] = tokens
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2733 let tag = matchstr(refs, 'tag: [^,)]\+')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2734 let tag = empty(tag) ? ' ' : ' ('.tag.') '
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2735 return printf('%s%s%s%s%s (%s)', indent, graph, sha, tag, subject, date)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2736 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2737
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2738 function! s:append_ul(lnum, text)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2739 call append(a:lnum, ['', a:text, repeat('-', len(a:text))])
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2740 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2741
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2742 function! s:diff()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2743 call s:prepare()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2744 call append(0, ['Collecting changes ...', ''])
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2745 let cnts = [0, 0]
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2746 let bar = ''
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2747 let total = filter(copy(g:plugs), 's:is_managed(v:key) && isdirectory(v:val.dir)')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2748 call s:progress_bar(2, bar, len(total))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2749 for origin in [1, 0]
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2750 let plugs = reverse(sort(items(filter(copy(total), (origin ? '' : '!').'(has_key(v:val, "commit") || has_key(v:val, "tag"))'))))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2751 if empty(plugs)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2752 continue
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2753 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2754 call s:append_ul(2, origin ? 'Pending updates:' : 'Last update:')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2755 for [k, v] in plugs
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2756 let branch = s:git_origin_branch(v)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2757 if len(branch)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2758 let range = origin ? '..origin/'.branch : 'HEAD@{1}..'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2759 let cmd = ['git', 'log', '--graph', '--color=never']
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2760 if s:git_version_requirement(2, 10, 0)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2761 call add(cmd, '--no-show-signature')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2762 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2763 call extend(cmd, ['--pretty=format:%x01%h%x01%d%x01%s%x01%cr', range])
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2764 if has_key(v, 'rtp')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2765 call extend(cmd, ['--', v.rtp])
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2766 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2767 let diff = s:system_chomp(cmd, v.dir)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2768 if !empty(diff)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2769 let ref = has_key(v, 'tag') ? (' (tag: '.v.tag.')') : has_key(v, 'commit') ? (' '.v.commit) : ''
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2770 call append(5, extend(['', '- '.k.':'.ref], map(s:lines(diff), 's:format_git_log(v:val)')))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2771 let cnts[origin] += 1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2772 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2773 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2774 let bar .= '='
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2775 call s:progress_bar(2, bar, len(total))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2776 normal! 2G
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2777 redraw
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2778 endfor
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2779 if !cnts[origin]
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2780 call append(5, ['', 'N/A'])
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2781 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2782 endfor
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2783 call setline(1, printf('%d plugin(s) updated.', cnts[0])
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2784 \ . (cnts[1] ? printf(' %d plugin(s) have pending updates.', cnts[1]) : ''))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2785
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2786 if cnts[0] || cnts[1]
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2787 nnoremap <silent> <buffer> <plug>(plug-preview) :silent! call <SID>preview_commit()<cr>
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2788 if empty(maparg("\<cr>", 'n'))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2789 nmap <buffer> <cr> <plug>(plug-preview)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2790 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2791 if empty(maparg('o', 'n'))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2792 nmap <buffer> o <plug>(plug-preview)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2793 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2794 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2795 if cnts[0]
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2796 nnoremap <silent> <buffer> X :call <SID>revert()<cr>
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2797 echo "Press 'X' on each block to revert the update"
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2798 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2799 normal! gg
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2800 setlocal nomodifiable
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2801 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2802
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2803 function! s:revert()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2804 if search('^Pending updates', 'bnW')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2805 return
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2806 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2807
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2808 let name = s:find_name(line('.'))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2809 if empty(name) || !has_key(g:plugs, name) ||
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2810 \ input(printf('Revert the update of %s? (y/N) ', name)) !~? '^y'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2811 return
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2812 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2813
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2814 call s:system('git reset --hard HEAD@{1} && git checkout '.plug#shellescape(g:plugs[name].branch).' --', g:plugs[name].dir)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2815 setlocal modifiable
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2816 normal! "_dap
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2817 setlocal nomodifiable
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2818 echo 'Reverted'
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2819 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2820
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2821 function! s:snapshot(force, ...) abort
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2822 call s:prepare()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2823 setf vim
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2824 call append(0, ['" Generated by vim-plug',
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2825 \ '" '.strftime("%c"),
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2826 \ '" :source this file in vim to restore the snapshot',
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2827 \ '" or execute: vim -S snapshot.vim',
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2828 \ '', '', 'PlugUpdate!'])
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2829 1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2830 let anchor = line('$') - 3
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2831 let names = sort(keys(filter(copy(g:plugs),
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2832 \'has_key(v:val, "uri") && isdirectory(v:val.dir)')))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2833 for name in reverse(names)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2834 let sha = has_key(g:plugs[name], 'commit') ? g:plugs[name].commit : s:git_revision(g:plugs[name].dir)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2835 if !empty(sha)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2836 call append(anchor, printf("silent! let g:plugs['%s'].commit = '%s'", name, sha))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2837 redraw
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2838 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2839 endfor
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2840
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2841 if a:0 > 0
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2842 let fn = s:plug_expand(a:1)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2843 if filereadable(fn) && !(a:force || s:ask(a:1.' already exists. Overwrite?'))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2844 return
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2845 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2846 call writefile(getline(1, '$'), fn)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2847 echo 'Saved as '.a:1
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2848 silent execute 'e' s:esc(fn)
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2849 setf vim
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2850 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2851 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2852
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2853 function! s:split_rtp()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2854 return split(&rtp, '\\\@<!,')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2855 endfunction
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2856
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2857 let s:first_rtp = s:escrtp(get(s:split_rtp(), 0, ''))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2858 let s:last_rtp = s:escrtp(get(s:split_rtp(), -1, ''))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2859
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2860 if exists('g:plugs')
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2861 let g:plugs_order = get(g:, 'plugs_order', keys(g:plugs))
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2862 call s:upgrade_specs()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2863 call s:define_commands()
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2864 endif
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2865
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2866 let &cpo = s:cpo_save
a4ec03f77554 I don't know...
luka
parents:
diff changeset
2867 unlet s:cpo_save