PATH:
usr
/
share
/
vim
/
vim74
/
indent
" Vim indent file " Language: Shell Script " Maintainer: Nikolai Weibull <now@bitwi.se> " Latest Revision: 2010-01-06 if exists("b:did_indent") finish endif let b:did_indent = 1 setlocal indentexpr=GetShIndent() setlocal indentkeys+=0=then,0=do,0=else,0=elif,0=fi,0=esac,0=done,),0=;;,0=;& setlocal indentkeys+=0=fin,0=fil,0=fip,0=fir,0=fix setlocal indentkeys-=:,0# setlocal nosmartindent if exists("*GetShIndent") finish endif let s:cpo_save = &cpo set cpo&vim function s:buffer_shiftwidth() return &shiftwidth endfunction let s:sh_indent_defaults = { \ 'default': function('s:buffer_shiftwidth'), \ 'continuation-line': function('s:buffer_shiftwidth'), \ 'case-labels': function('s:buffer_shiftwidth'), \ 'case-statements': function('s:buffer_shiftwidth'), \ 'case-breaks': 0 } function! s:indent_value(option) let Value = exists('b:sh_indent_options') \ && has_key(b:sh_indent_options, a:option) ? \ b:sh_indent_options[a:option] : \ s:sh_indent_defaults[a:option] if type(Value) == type(function('type')) return Value() endif return Value endfunction function! GetShIndent() let lnum = prevnonblank(v:lnum - 1) if lnum == 0 return 0 endif let pnum = prevnonblank(lnum - 1) let ind = indent(lnum) let line = getline(lnum) if line =~ '^\s*\%(if\|then\|do\|else\|elif\|case\|while\|until\|for\|select\)\>' if line !~ '\<\%(fi\|esac\|done\)\>\s*\%(#.*\)\=$' let ind += s:indent_value('default') endif elseif s:is_case_label(line, pnum) if !s:is_case_ended(line) let ind += s:indent_value('case-statements') endif elseif line =~ '^\s*\<\k\+\>\s*()\s*{' || line =~ '^\s*{' if line !~ '}\s*\%(#.*\)\=$' let ind += s:indent_value('default') endif elseif s:is_continuation_line(line) if pnum == 0 || !s:is_continuation_line(getline(pnum)) let ind += s:indent_value('continuation-line') endif elseif pnum != 0 && s:is_continuation_line(getline(pnum)) let ind = indent(s:find_continued_lnum(pnum)) endif let pine = line let line = getline(v:lnum) if line =~ '^\s*\%(then\|do\|else\|elif\|fi\|done\)\>' || line =~ '^\s*}' let ind -= s:indent_value('default') elseif line =~ '^\s*esac\>' let ind -= (s:is_case_label(pine, lnum) && s:is_case_ended(pine) ? \ 0 : s:indent_value('case-statements')) + \ s:indent_value('case-labels') if s:is_case_break(pine) let ind += s:indent_value('case-breaks') endif elseif s:is_case_label(line, lnum) if s:is_case(pine) let ind = indent(lnum) + s:indent_value('case-labels') else let ind -= s:indent_value('case-statements') - s:indent_value('case-breaks') endif elseif s:is_case_break(line) let ind -= s:indent_value('case-breaks') endif return ind endfunction function! s:is_continuation_line(line) return a:line =~ '\%(\%(^\|[^\\]\)\\\|&&\|||\)$' endfunction function! s:find_continued_lnum(lnum) let i = a:lnum while i > 1 && s:is_continuation_line(getline(i - 1)) let i -= 1 endwhile return i endfunction function! s:is_case_label(line, pnum) if a:line !~ '^\s*(\=.*)' return 0 endif if a:pnum > 0 let pine = getline(a:pnum) if !(s:is_case(pine) || s:is_case_ended(pine)) return 0 endif endif let suffix = substitute(a:line, '^\s*(\=', "", "") let nesting = 0 let i = 0 let n = strlen(suffix) while i < n let c = suffix[i] let i += 1 if c == '\\' let i += 1 elseif c == '(' let nesting += 1 elseif c == ')' if nesting == 0 return 1 endif let nesting -= 1 endif endwhile return 0 endfunction function! s:is_case(line) return a:line =~ '^\s*case\>' endfunction function! s:is_case_break(line) return a:line =~ '^\s*;[;&]' endfunction function! s:is_case_ended(line) return s:is_case_break(a:line) || a:line =~ ';[;&]\s*\%(#.*\)\=$' endfunction let &cpo = s:cpo_save unlet s:cpo_save
[-] rpl.vim
[edit]
[-] zimbu.vim
[edit]
[-] bib.vim
[edit]
[-] c.vim
[edit]
[-] make.vim
[edit]
[-] sml.vim
[edit]
[-] logtalk.vim
[edit]
[-] postscr.vim
[edit]
[-] eruby.vim
[edit]
[-] ada.vim
[edit]
[-] r.vim
[edit]
[-] sql.vim
[edit]
[-] liquid.vim
[edit]
[-] xsd.vim
[edit]
[-] tex.vim
[edit]
[-] aap.vim
[edit]
[-] matlab.vim
[edit]
[-] mma.vim
[edit]
[-] ishd.vim
[edit]
[+]
..
[-] cs.vim
[edit]
[-] dtd.vim
[edit]
[-] python.vim
[edit]
[-] changelog.vim
[edit]
[-] treetop.vim
[edit]
[-] tcsh.vim
[edit]
[-] xhtml.vim
[edit]
[-] sqlanywhere.vim
[edit]
[-] perl6.vim
[edit]
[-] idlang.vim
[edit]
[-] cucumber.vim
[edit]
[-] hamster.vim
[edit]
[-] verilog.vim
[edit]
[-] java.vim
[edit]
[-] pov.vim
[edit]
[-] cuda.vim
[edit]
[-] README.txt
[edit]
[-] d.vim
[edit]
[-] tf.vim
[edit]
[-] gitconfig.vim
[edit]
[-] scss.vim
[edit]
[-] cmake.vim
[edit]
[-] tcl.vim
[edit]
[-] yaml.vim
[edit]
[-] zsh.vim
[edit]
[-] pascal.vim
[edit]
[-] objc.vim
[edit]
[-] pyrex.vim
[edit]
[-] occam.vim
[edit]
[-] automake.vim
[edit]
[-] xml.vim
[edit]
[-] fortran.vim
[edit]
[-] xslt.vim
[edit]
[-] eiffel.vim
[edit]
[-] yacc.vim
[edit]
[-] ch.vim
[edit]
[-] htmldjango.vim
[edit]
[-] lifelines.vim
[edit]
[-] ant.vim
[edit]
[-] erlang.vim
[edit]
[-] vim.vim
[edit]
[-] vb.vim
[edit]
[-] tilde.vim
[edit]
[-] mp.vim
[edit]
[-] vhdl.vim
[edit]
[-] ocaml.vim
[edit]
[-] css.vim
[edit]
[-] lua.vim
[edit]
[-] chaiscript.vim
[edit]
[-] perl.vim
[edit]
[-] eterm.vim
[edit]
[-] haml.vim
[edit]
[-] falcon.vim
[edit]
[-] awk.vim
[edit]
[-] dictconf.vim
[edit]
[-] scheme.vim
[edit]
[-] dictdconf.vim
[edit]
[-] docbk.vim
[edit]
[-] xinetd.vim
[edit]
[-] framescript.vim
[edit]
[-] rst.vim
[edit]
[-] dtrace.vim
[edit]
[-] ruby.vim
[edit]
[-] javascript.vim
[edit]
[-] dylan.vim
[edit]
[-] ld.vim
[edit]
[-] php.vim
[edit]
[-] xf86conf.vim
[edit]
[-] sass.vim
[edit]
[-] sdl.vim
[edit]
[-] gitolite.vim
[edit]
[-] prolog.vim
[edit]
[-] html.vim
[edit]
[-] bst.vim
[edit]
[-] config.vim
[edit]
[-] cdl.vim
[edit]
[-] lisp.vim
[edit]
[-] mail.vim
[edit]
[-] cpp.vim
[edit]
[-] cobol.vim
[edit]
[-] clojure.vim
[edit]
[-] jsp.vim
[edit]
[-] sh.vim
[edit]
[-] readline.vim
[edit]