Mercurial > vim
annotate runtime/indent/sh.vim @ 14171:ddf160d82971 v8.1.0103
patch 8.1.0103: long version string cannot be translated
commit https://github.com/vim/vim/commit/35fb6fbf727c72eb5987a1556bbba26dca14cc48
Author: Bram Moolenaar <Bram@vim.org>
Date: Sat Jun 23 16:12:21 2018 +0200
patch 8.1.0103: long version string cannot be translated
Problem: Long version string cannot be translated.
Solution: Build the string in init_longVersion().
author | Christian Brabandt <cb@256bit.org> |
---|---|
date | Sat, 23 Jun 2018 16:15:05 +0200 |
parents | cd513458728c |
children | 2f7e67dd088c |
rev | line source |
---|---|
7 | 1 " Vim indent file |
7013 | 2 " Language: Shell Script |
3 " Maintainer: Christian Brabandt <cb@256bit.org> | |
13937 | 4 " Original Author: Nikolai Weibull <now@bitwi.se> |
6918 | 5 " Previous Maintainer: Peter Aronoff <telemachus@arpinum.org> |
13937 | 6 " Latest Revision: 2018-03-26 |
7013 | 7 " License: Vim (see :h license) |
8 " Repository: https://github.com/chrisbra/vim-sh-indent | |
9407
619a98a67f67
commit https://github.com/vim/vim/commit/e18dbe865d190e74fb5d43ac8bc6ac22507d0223
Christian Brabandt <cb@256bit.org>
parents:
8246
diff
changeset
|
9 " Changelog: |
13937 | 10 " 20180326 - better support for line continuation |
11 " 20180325 - better detection of function definitions | |
12 " 20180127 - better support for zsh complex commands | |
12045 | 13 " 20170808: - better indent of line continuation |
11442 | 14 " 20170502: - get rid of buffer-shiftwidth function |
15 " 20160912: - preserve indentation of here-doc blocks | |
9407
619a98a67f67
commit https://github.com/vim/vim/commit/e18dbe865d190e74fb5d43ac8bc6ac22507d0223
Christian Brabandt <cb@256bit.org>
parents:
8246
diff
changeset
|
16 " 20160627: - detect heredocs correctly |
619a98a67f67
commit https://github.com/vim/vim/commit/e18dbe865d190e74fb5d43ac8bc6ac22507d0223
Christian Brabandt <cb@256bit.org>
parents:
8246
diff
changeset
|
17 " 20160213: - detect function definition correctly |
619a98a67f67
commit https://github.com/vim/vim/commit/e18dbe865d190e74fb5d43ac8bc6ac22507d0223
Christian Brabandt <cb@256bit.org>
parents:
8246
diff
changeset
|
18 " 20160202: - use shiftwidth() function |
619a98a67f67
commit https://github.com/vim/vim/commit/e18dbe865d190e74fb5d43ac8bc6ac22507d0223
Christian Brabandt <cb@256bit.org>
parents:
8246
diff
changeset
|
19 " 20151215: - set b:undo_indent variable |
619a98a67f67
commit https://github.com/vim/vim/commit/e18dbe865d190e74fb5d43ac8bc6ac22507d0223
Christian Brabandt <cb@256bit.org>
parents:
8246
diff
changeset
|
20 " 20150728: - add foreach detection for zsh |
7 | 21 |
22 if exists("b:did_indent") | |
23 finish | |
24 endif | |
25 let b:did_indent = 1 | |
26 | |
27 setlocal indentexpr=GetShIndent() | |
7013 | 28 setlocal indentkeys+=0=then,0=do,0=else,0=elif,0=fi,0=esac,0=done,0=end,),0=;;,0=;& |
2034 | 29 setlocal indentkeys+=0=fin,0=fil,0=fip,0=fir,0=fix |
7 | 30 setlocal indentkeys-=:,0# |
2034 | 31 setlocal nosmartindent |
7 | 32 |
8246
f16bfe02cef1
commit https://github.com/vim/vim/commit/f391327adbbffb11180cf6038a92af1ed144e907
Christian Brabandt <cb@256bit.org>
parents:
7924
diff
changeset
|
33 let b:undo_indent = 'setlocal indentexpr< indentkeys< smartindent<' |
f16bfe02cef1
commit https://github.com/vim/vim/commit/f391327adbbffb11180cf6038a92af1ed144e907
Christian Brabandt <cb@256bit.org>
parents:
7924
diff
changeset
|
34 |
7 | 35 if exists("*GetShIndent") |
36 finish | |
37 endif | |
38 | |
375 | 39 let s:cpo_save = &cpo |
40 set cpo&vim | |
7 | 41 |
2034 | 42 let s:sh_indent_defaults = { |
11442 | 43 \ 'default': function('shiftwidth'), |
44 \ 'continuation-line': function('shiftwidth'), | |
45 \ 'case-labels': function('shiftwidth'), | |
46 \ 'case-statements': function('shiftwidth'), | |
2034 | 47 \ 'case-breaks': 0 } |
48 | |
49 function! s:indent_value(option) | |
50 let Value = exists('b:sh_indent_options') | |
51 \ && has_key(b:sh_indent_options, a:option) ? | |
52 \ b:sh_indent_options[a:option] : | |
53 \ s:sh_indent_defaults[a:option] | |
54 if type(Value) == type(function('type')) | |
55 return Value() | |
56 endif | |
57 return Value | |
58 endfunction | |
59 | |
60 function! GetShIndent() | |
7 | 61 let lnum = prevnonblank(v:lnum - 1) |
62 if lnum == 0 | |
63 return 0 | |
64 endif | |
13912 | 65 let line = getline(lnum) |
7 | 66 |
2034 | 67 let pnum = prevnonblank(lnum - 1) |
13912 | 68 let pline = getline(pnum) |
7 | 69 let ind = indent(lnum) |
13912 | 70 |
71 " Check contents of previous lines | |
72 if line =~ '^\s*\%(if\|then\|do\|else\|elif\|case\|while\|until\|for\|select\|foreach\)\>' || | |
73 \ (&ft is# 'zsh' && line =~ '\%(if\|then\|do\|else\|elif\|case\|while\|until\|for\|select\|foreach\)\>') | |
7013 | 74 if line !~ '\<\%(fi\|esac\|done\|end\)\>\s*\%(#.*\)\=$' |
2034 | 75 let ind += s:indent_value('default') |
76 endif | |
77 elseif s:is_case_label(line, pnum) | |
78 if !s:is_case_ended(line) | |
79 let ind += s:indent_value('case-statements') | |
7 | 80 endif |
13912 | 81 " function definition |
82 elseif s:is_function_definition(line) | |
2034 | 83 if line !~ '}\s*\%(#.*\)\=$' |
84 let ind += s:indent_value('default') | |
85 endif | |
86 elseif s:is_continuation_line(line) | |
13912 | 87 if pnum == 0 || !s:is_continuation_line(pline) |
2034 | 88 let ind += s:indent_value('continuation-line') |
89 endif | |
13912 | 90 elseif s:end_block(line) && !s:start_block(line) |
91 let ind -= s:indent_value('default') | |
92 elseif pnum != 0 && s:is_continuation_line(pline) && !s:end_block(getline(v:lnum)) | |
93 " only add indent, if line and pline is in the same block | |
94 let i = v:lnum | |
95 let ind2 = indent(s:find_continued_lnum(pnum)) | |
96 while !s:is_empty(getline(i)) && i > pnum | |
97 let i -= 1 | |
98 endw | |
99 if i == pnum | |
100 let ind += ind2 | |
101 else | |
102 let ind = ind2 | |
103 endif | |
7 | 104 endif |
105 | |
2034 | 106 let pine = line |
13912 | 107 " Check content of current line |
7 | 108 let line = getline(v:lnum) |
13912 | 109 if line =~ '^\s*\%(then\|do\|else\|elif\|fi\|done\|end\)\>' || s:end_block(line) |
2034 | 110 let ind -= s:indent_value('default') |
5555 | 111 elseif line =~ '^\s*esac\>' && s:is_case_empty(getline(v:lnum - 1)) |
112 let ind -= s:indent_value('default') | |
2034 | 113 elseif line =~ '^\s*esac\>' |
114 let ind -= (s:is_case_label(pine, lnum) && s:is_case_ended(pine) ? | |
115 \ 0 : s:indent_value('case-statements')) + | |
116 \ s:indent_value('case-labels') | |
117 if s:is_case_break(pine) | |
118 let ind += s:indent_value('case-breaks') | |
119 endif | |
120 elseif s:is_case_label(line, lnum) | |
121 if s:is_case(pine) | |
122 let ind = indent(lnum) + s:indent_value('case-labels') | |
123 else | |
6153 | 124 let ind -= (s:is_case_label(pine, lnum) && s:is_case_ended(pine) ? |
125 \ 0 : s:indent_value('case-statements')) - | |
126 \ s:indent_value('case-breaks') | |
2034 | 127 endif |
128 elseif s:is_case_break(line) | |
129 let ind -= s:indent_value('case-breaks') | |
9407
619a98a67f67
commit https://github.com/vim/vim/commit/e18dbe865d190e74fb5d43ac8bc6ac22507d0223
Christian Brabandt <cb@256bit.org>
parents:
8246
diff
changeset
|
130 elseif s:is_here_doc(line) |
619a98a67f67
commit https://github.com/vim/vim/commit/e18dbe865d190e74fb5d43ac8bc6ac22507d0223
Christian Brabandt <cb@256bit.org>
parents:
8246
diff
changeset
|
131 let ind = 0 |
11442 | 132 " statements, executed within a here document. Keep the current indent |
133 elseif match(map(synstack(v:lnum, 1), 'synIDattr(v:val, "name")'), '\c\mheredoc') > -1 | |
134 return indent(v:lnum) | |
13912 | 135 elseif s:is_comment(line) && s:is_empty(getline(v:lnum-1)) |
136 return indent(v:lnum) | |
7 | 137 endif |
138 | |
13912 | 139 return ind > 0 ? ind : 0 |
7 | 140 endfunction |
141 | |
2034 | 142 function! s:is_continuation_line(line) |
13912 | 143 " Comment, cannot be a line continuation |
144 if a:line =~ '^\s*#' | |
145 return 0 | |
146 else | |
147 " start-of-line | |
148 " \\ or && or || or | | |
149 " followed optionally by { or # | |
150 return a:line =~ '\%(\%(^\|[^\\]\)\\\|&&\|||\||\)' . | |
12045 | 151 \ '\s*\({\s*\)\=\(#.*\)\=$' |
13912 | 152 endif |
2034 | 153 endfunction |
154 | |
155 function! s:find_continued_lnum(lnum) | |
156 let i = a:lnum | |
157 while i > 1 && s:is_continuation_line(getline(i - 1)) | |
158 let i -= 1 | |
159 endwhile | |
160 return i | |
161 endfunction | |
162 | |
13912 | 163 function! s:is_function_definition(line) |
164 return a:line =~ '^\s*\<\k\+\>\s*()\s*{' || | |
165 \ a:line =~ '^\s*{' || | |
166 \ a:line =~ '^\s*function\s*\w\S\+\s*\%(()\)\?\s*{' | |
167 endfunction | |
168 | |
2034 | 169 function! s:is_case_label(line, pnum) |
170 if a:line !~ '^\s*(\=.*)' | |
171 return 0 | |
172 endif | |
173 | |
174 if a:pnum > 0 | |
175 let pine = getline(a:pnum) | |
176 if !(s:is_case(pine) || s:is_case_ended(pine)) | |
177 return 0 | |
178 endif | |
179 endif | |
180 | |
181 let suffix = substitute(a:line, '^\s*(\=', "", "") | |
182 let nesting = 0 | |
183 let i = 0 | |
184 let n = strlen(suffix) | |
185 while i < n | |
186 let c = suffix[i] | |
187 let i += 1 | |
188 if c == '\\' | |
189 let i += 1 | |
190 elseif c == '(' | |
191 let nesting += 1 | |
192 elseif c == ')' | |
193 if nesting == 0 | |
194 return 1 | |
195 endif | |
196 let nesting -= 1 | |
197 endif | |
198 endwhile | |
199 return 0 | |
200 endfunction | |
201 | |
202 function! s:is_case(line) | |
203 return a:line =~ '^\s*case\>' | |
204 endfunction | |
205 | |
206 function! s:is_case_break(line) | |
207 return a:line =~ '^\s*;[;&]' | |
208 endfunction | |
209 | |
9407
619a98a67f67
commit https://github.com/vim/vim/commit/e18dbe865d190e74fb5d43ac8bc6ac22507d0223
Christian Brabandt <cb@256bit.org>
parents:
8246
diff
changeset
|
210 function! s:is_here_doc(line) |
619a98a67f67
commit https://github.com/vim/vim/commit/e18dbe865d190e74fb5d43ac8bc6ac22507d0223
Christian Brabandt <cb@256bit.org>
parents:
8246
diff
changeset
|
211 if a:line =~ '^\w\+$' |
619a98a67f67
commit https://github.com/vim/vim/commit/e18dbe865d190e74fb5d43ac8bc6ac22507d0223
Christian Brabandt <cb@256bit.org>
parents:
8246
diff
changeset
|
212 let here_pat = '<<-\?'. s:escape(a:line). '\$' |
619a98a67f67
commit https://github.com/vim/vim/commit/e18dbe865d190e74fb5d43ac8bc6ac22507d0223
Christian Brabandt <cb@256bit.org>
parents:
8246
diff
changeset
|
213 return search(here_pat, 'bnW') > 0 |
619a98a67f67
commit https://github.com/vim/vim/commit/e18dbe865d190e74fb5d43ac8bc6ac22507d0223
Christian Brabandt <cb@256bit.org>
parents:
8246
diff
changeset
|
214 endif |
619a98a67f67
commit https://github.com/vim/vim/commit/e18dbe865d190e74fb5d43ac8bc6ac22507d0223
Christian Brabandt <cb@256bit.org>
parents:
8246
diff
changeset
|
215 return 0 |
619a98a67f67
commit https://github.com/vim/vim/commit/e18dbe865d190e74fb5d43ac8bc6ac22507d0223
Christian Brabandt <cb@256bit.org>
parents:
8246
diff
changeset
|
216 endfunction |
619a98a67f67
commit https://github.com/vim/vim/commit/e18dbe865d190e74fb5d43ac8bc6ac22507d0223
Christian Brabandt <cb@256bit.org>
parents:
8246
diff
changeset
|
217 |
2034 | 218 function! s:is_case_ended(line) |
219 return s:is_case_break(a:line) || a:line =~ ';[;&]\s*\%(#.*\)\=$' | |
220 endfunction | |
221 | |
5555 | 222 function! s:is_case_empty(line) |
223 if a:line =~ '^\s*$' || a:line =~ '^\s*#' | |
224 return s:is_case_empty(getline(v:lnum - 1)) | |
225 else | |
226 return a:line =~ '^\s*case\>' | |
227 endif | |
228 endfunction | |
229 | |
9407
619a98a67f67
commit https://github.com/vim/vim/commit/e18dbe865d190e74fb5d43ac8bc6ac22507d0223
Christian Brabandt <cb@256bit.org>
parents:
8246
diff
changeset
|
230 function! s:escape(pattern) |
619a98a67f67
commit https://github.com/vim/vim/commit/e18dbe865d190e74fb5d43ac8bc6ac22507d0223
Christian Brabandt <cb@256bit.org>
parents:
8246
diff
changeset
|
231 return '\V'. escape(a:pattern, '\\') |
619a98a67f67
commit https://github.com/vim/vim/commit/e18dbe865d190e74fb5d43ac8bc6ac22507d0223
Christian Brabandt <cb@256bit.org>
parents:
8246
diff
changeset
|
232 endfunction |
619a98a67f67
commit https://github.com/vim/vim/commit/e18dbe865d190e74fb5d43ac8bc6ac22507d0223
Christian Brabandt <cb@256bit.org>
parents:
8246
diff
changeset
|
233 |
13912 | 234 function! s:is_empty(line) |
235 return a:line =~ '^\s*$' | |
236 endfunction | |
237 | |
238 function! s:end_block(line) | |
239 return a:line =~ '^\s*}' | |
240 endfunction | |
241 | |
242 function! s:start_block(line) | |
243 return a:line =~ '{\s*\(#.*\)\?$' | |
244 endfunction | |
245 | |
246 function! s:find_start_block(lnum) | |
247 let i = a:lnum | |
248 while i > 1 && !s:start_block(getline(i)) | |
249 let i -= 1 | |
250 endwhile | |
251 return i | |
252 endfunction | |
253 | |
254 function! s:is_comment(line) | |
255 return a:line =~ '^\s*#' | |
256 endfunction | |
257 | |
375 | 258 let &cpo = s:cpo_save |
259 unlet s:cpo_save |