Mercurial > vim
annotate runtime/indent/sh.vim @ 9818:5c288e5e1493 v7.4.2184
commit https://github.com/vim/vim/commit/7a9a5f4019ce332cb11ce5370e3fa609299ce737
Author: Bram Moolenaar <Bram@vim.org>
Date: Mon Aug 8 22:34:14 2016 +0200
patch 7.4.2184
Problem: Tests that use RunVim() do not actually perform the test.
Solution: Use "return" instead of "call". (Ken Takata)
| author | Christian Brabandt <cb@256bit.org> |
|---|---|
| date | Mon, 08 Aug 2016 22:45:05 +0200 |
| parents | 619a98a67f67 |
| children | d183d629509e |
| rev | line source |
|---|---|
| 7 | 1 " Vim indent file |
| 7013 | 2 " Language: Shell Script |
| 3 " Maintainer: Christian Brabandt <cb@256bit.org> | |
| 6918 | 4 " Previous Maintainer: Peter Aronoff <telemachus@arpinum.org> |
| 7013 | 5 " Original Author: Nikolai Weibull <now@bitwi.se> |
|
9407
619a98a67f67
commit https://github.com/vim/vim/commit/e18dbe865d190e74fb5d43ac8bc6ac22507d0223
Christian Brabandt <cb@256bit.org>
parents:
8246
diff
changeset
|
6 " Latest Revision: 2016-06-27 |
| 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: |
|
619a98a67f67
commit https://github.com/vim/vim/commit/e18dbe865d190e74fb5d43ac8bc6ac22507d0223
Christian Brabandt <cb@256bit.org>
parents:
8246
diff
changeset
|
10 " 20160627: - detect heredocs correctly |
|
619a98a67f67
commit https://github.com/vim/vim/commit/e18dbe865d190e74fb5d43ac8bc6ac22507d0223
Christian Brabandt <cb@256bit.org>
parents:
8246
diff
changeset
|
11 " 20160213: - detect function definition correctly |
|
619a98a67f67
commit https://github.com/vim/vim/commit/e18dbe865d190e74fb5d43ac8bc6ac22507d0223
Christian Brabandt <cb@256bit.org>
parents:
8246
diff
changeset
|
12 " 20160202: - use shiftwidth() function |
|
619a98a67f67
commit https://github.com/vim/vim/commit/e18dbe865d190e74fb5d43ac8bc6ac22507d0223
Christian Brabandt <cb@256bit.org>
parents:
8246
diff
changeset
|
13 " 20151215: - set b:undo_indent variable |
|
619a98a67f67
commit https://github.com/vim/vim/commit/e18dbe865d190e74fb5d43ac8bc6ac22507d0223
Christian Brabandt <cb@256bit.org>
parents:
8246
diff
changeset
|
14 " 20150728: - add foreach detection for zsh |
| 7 | 15 |
| 16 if exists("b:did_indent") | |
| 17 finish | |
| 18 endif | |
| 19 let b:did_indent = 1 | |
| 20 | |
| 21 setlocal indentexpr=GetShIndent() | |
| 7013 | 22 setlocal indentkeys+=0=then,0=do,0=else,0=elif,0=fi,0=esac,0=done,0=end,),0=;;,0=;& |
| 2034 | 23 setlocal indentkeys+=0=fin,0=fil,0=fip,0=fir,0=fix |
| 7 | 24 setlocal indentkeys-=:,0# |
| 2034 | 25 setlocal nosmartindent |
| 7 | 26 |
|
8246
f16bfe02cef1
commit https://github.com/vim/vim/commit/f391327adbbffb11180cf6038a92af1ed144e907
Christian Brabandt <cb@256bit.org>
parents:
7924
diff
changeset
|
27 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
|
28 |
| 7 | 29 if exists("*GetShIndent") |
| 30 finish | |
| 31 endif | |
| 32 | |
| 375 | 33 let s:cpo_save = &cpo |
| 34 set cpo&vim | |
| 7 | 35 |
| 2034 | 36 function s:buffer_shiftwidth() |
|
7924
00d64eb49ce1
commit https://github.com/vim/vim/commit/681baaf4a4c81418693dcafb81421a8614832e91
Christian Brabandt <cb@256bit.org>
parents:
7384
diff
changeset
|
37 return shiftwidth() |
| 2034 | 38 endfunction |
| 39 | |
| 40 let s:sh_indent_defaults = { | |
| 41 \ 'default': function('s:buffer_shiftwidth'), | |
| 42 \ 'continuation-line': function('s:buffer_shiftwidth'), | |
| 43 \ 'case-labels': function('s:buffer_shiftwidth'), | |
| 44 \ 'case-statements': function('s:buffer_shiftwidth'), | |
| 45 \ 'case-breaks': 0 } | |
| 46 | |
| 47 function! s:indent_value(option) | |
| 48 let Value = exists('b:sh_indent_options') | |
| 49 \ && has_key(b:sh_indent_options, a:option) ? | |
| 50 \ b:sh_indent_options[a:option] : | |
| 51 \ s:sh_indent_defaults[a:option] | |
| 52 if type(Value) == type(function('type')) | |
| 53 return Value() | |
| 54 endif | |
| 55 return Value | |
| 56 endfunction | |
| 57 | |
| 58 function! GetShIndent() | |
| 7 | 59 let lnum = prevnonblank(v:lnum - 1) |
| 60 if lnum == 0 | |
| 61 return 0 | |
| 62 endif | |
| 63 | |
| 2034 | 64 let pnum = prevnonblank(lnum - 1) |
| 65 | |
| 7 | 66 let ind = indent(lnum) |
| 67 let line = getline(lnum) | |
| 7013 | 68 if line =~ '^\s*\%(if\|then\|do\|else\|elif\|case\|while\|until\|for\|select\|foreach\)\>' |
| 69 if line !~ '\<\%(fi\|esac\|done\|end\)\>\s*\%(#.*\)\=$' | |
| 2034 | 70 let ind += s:indent_value('default') |
| 71 endif | |
| 72 elseif s:is_case_label(line, pnum) | |
| 73 if !s:is_case_ended(line) | |
| 74 let ind += s:indent_value('case-statements') | |
| 7 | 75 endif |
|
8246
f16bfe02cef1
commit https://github.com/vim/vim/commit/f391327adbbffb11180cf6038a92af1ed144e907
Christian Brabandt <cb@256bit.org>
parents:
7924
diff
changeset
|
76 elseif line =~ '^\s*\<\k\+\>\s*()\s*{' || line =~ '^\s*{' || line =~ '^\s*function\s*\w\S\+\s*\%(()\)\?\s*{' |
| 2034 | 77 if line !~ '}\s*\%(#.*\)\=$' |
| 78 let ind += s:indent_value('default') | |
| 79 endif | |
| 80 elseif s:is_continuation_line(line) | |
| 81 if pnum == 0 || !s:is_continuation_line(getline(pnum)) | |
| 82 let ind += s:indent_value('continuation-line') | |
| 83 endif | |
| 84 elseif pnum != 0 && s:is_continuation_line(getline(pnum)) | |
| 85 let ind = indent(s:find_continued_lnum(pnum)) | |
| 7 | 86 endif |
| 87 | |
| 2034 | 88 let pine = line |
| 7 | 89 let line = getline(v:lnum) |
| 7013 | 90 if line =~ '^\s*\%(then\|do\|else\|elif\|fi\|done\|end\)\>' || line =~ '^\s*}' |
| 2034 | 91 let ind -= s:indent_value('default') |
| 5555 | 92 elseif line =~ '^\s*esac\>' && s:is_case_empty(getline(v:lnum - 1)) |
| 93 let ind -= s:indent_value('default') | |
| 2034 | 94 elseif line =~ '^\s*esac\>' |
| 95 let ind -= (s:is_case_label(pine, lnum) && s:is_case_ended(pine) ? | |
| 96 \ 0 : s:indent_value('case-statements')) + | |
| 97 \ s:indent_value('case-labels') | |
| 98 if s:is_case_break(pine) | |
| 99 let ind += s:indent_value('case-breaks') | |
| 100 endif | |
| 101 elseif s:is_case_label(line, lnum) | |
| 102 if s:is_case(pine) | |
| 103 let ind = indent(lnum) + s:indent_value('case-labels') | |
| 104 else | |
| 6153 | 105 let ind -= (s:is_case_label(pine, lnum) && s:is_case_ended(pine) ? |
| 106 \ 0 : s:indent_value('case-statements')) - | |
| 107 \ s:indent_value('case-breaks') | |
| 2034 | 108 endif |
| 109 elseif s:is_case_break(line) | |
| 110 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
|
111 elseif s:is_here_doc(line) |
|
619a98a67f67
commit https://github.com/vim/vim/commit/e18dbe865d190e74fb5d43ac8bc6ac22507d0223
Christian Brabandt <cb@256bit.org>
parents:
8246
diff
changeset
|
112 let ind = 0 |
| 7 | 113 endif |
| 114 | |
| 115 return ind | |
| 116 endfunction | |
| 117 | |
| 2034 | 118 function! s:is_continuation_line(line) |
| 119 return a:line =~ '\%(\%(^\|[^\\]\)\\\|&&\|||\)$' | |
| 120 endfunction | |
| 121 | |
| 122 function! s:find_continued_lnum(lnum) | |
| 123 let i = a:lnum | |
| 124 while i > 1 && s:is_continuation_line(getline(i - 1)) | |
| 125 let i -= 1 | |
| 126 endwhile | |
| 127 return i | |
| 128 endfunction | |
| 129 | |
| 130 function! s:is_case_label(line, pnum) | |
| 131 if a:line !~ '^\s*(\=.*)' | |
| 132 return 0 | |
| 133 endif | |
| 134 | |
| 135 if a:pnum > 0 | |
| 136 let pine = getline(a:pnum) | |
| 137 if !(s:is_case(pine) || s:is_case_ended(pine)) | |
| 138 return 0 | |
| 139 endif | |
| 140 endif | |
| 141 | |
| 142 let suffix = substitute(a:line, '^\s*(\=', "", "") | |
| 143 let nesting = 0 | |
| 144 let i = 0 | |
| 145 let n = strlen(suffix) | |
| 146 while i < n | |
| 147 let c = suffix[i] | |
| 148 let i += 1 | |
| 149 if c == '\\' | |
| 150 let i += 1 | |
| 151 elseif c == '(' | |
| 152 let nesting += 1 | |
| 153 elseif c == ')' | |
| 154 if nesting == 0 | |
| 155 return 1 | |
| 156 endif | |
| 157 let nesting -= 1 | |
| 158 endif | |
| 159 endwhile | |
| 160 return 0 | |
| 161 endfunction | |
| 162 | |
| 163 function! s:is_case(line) | |
| 164 return a:line =~ '^\s*case\>' | |
| 165 endfunction | |
| 166 | |
| 167 function! s:is_case_break(line) | |
| 168 return a:line =~ '^\s*;[;&]' | |
| 169 endfunction | |
| 170 | |
|
9407
619a98a67f67
commit https://github.com/vim/vim/commit/e18dbe865d190e74fb5d43ac8bc6ac22507d0223
Christian Brabandt <cb@256bit.org>
parents:
8246
diff
changeset
|
171 function! s:is_here_doc(line) |
|
619a98a67f67
commit https://github.com/vim/vim/commit/e18dbe865d190e74fb5d43ac8bc6ac22507d0223
Christian Brabandt <cb@256bit.org>
parents:
8246
diff
changeset
|
172 if a:line =~ '^\w\+$' |
|
619a98a67f67
commit https://github.com/vim/vim/commit/e18dbe865d190e74fb5d43ac8bc6ac22507d0223
Christian Brabandt <cb@256bit.org>
parents:
8246
diff
changeset
|
173 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
|
174 return search(here_pat, 'bnW') > 0 |
|
619a98a67f67
commit https://github.com/vim/vim/commit/e18dbe865d190e74fb5d43ac8bc6ac22507d0223
Christian Brabandt <cb@256bit.org>
parents:
8246
diff
changeset
|
175 endif |
|
619a98a67f67
commit https://github.com/vim/vim/commit/e18dbe865d190e74fb5d43ac8bc6ac22507d0223
Christian Brabandt <cb@256bit.org>
parents:
8246
diff
changeset
|
176 return 0 |
|
619a98a67f67
commit https://github.com/vim/vim/commit/e18dbe865d190e74fb5d43ac8bc6ac22507d0223
Christian Brabandt <cb@256bit.org>
parents:
8246
diff
changeset
|
177 endfunction |
|
619a98a67f67
commit https://github.com/vim/vim/commit/e18dbe865d190e74fb5d43ac8bc6ac22507d0223
Christian Brabandt <cb@256bit.org>
parents:
8246
diff
changeset
|
178 |
| 2034 | 179 function! s:is_case_ended(line) |
| 180 return s:is_case_break(a:line) || a:line =~ ';[;&]\s*\%(#.*\)\=$' | |
| 181 endfunction | |
| 182 | |
| 5555 | 183 function! s:is_case_empty(line) |
| 184 if a:line =~ '^\s*$' || a:line =~ '^\s*#' | |
| 185 return s:is_case_empty(getline(v:lnum - 1)) | |
| 186 else | |
| 187 return a:line =~ '^\s*case\>' | |
| 188 endif | |
| 189 endfunction | |
| 190 | |
|
9407
619a98a67f67
commit https://github.com/vim/vim/commit/e18dbe865d190e74fb5d43ac8bc6ac22507d0223
Christian Brabandt <cb@256bit.org>
parents:
8246
diff
changeset
|
191 function! s:escape(pattern) |
|
619a98a67f67
commit https://github.com/vim/vim/commit/e18dbe865d190e74fb5d43ac8bc6ac22507d0223
Christian Brabandt <cb@256bit.org>
parents:
8246
diff
changeset
|
192 return '\V'. escape(a:pattern, '\\') |
|
619a98a67f67
commit https://github.com/vim/vim/commit/e18dbe865d190e74fb5d43ac8bc6ac22507d0223
Christian Brabandt <cb@256bit.org>
parents:
8246
diff
changeset
|
193 endfunction |
|
619a98a67f67
commit https://github.com/vim/vim/commit/e18dbe865d190e74fb5d43ac8bc6ac22507d0223
Christian Brabandt <cb@256bit.org>
parents:
8246
diff
changeset
|
194 |
| 375 | 195 let &cpo = s:cpo_save |
| 196 unlet s:cpo_save |