424 lines
13 KiB
VimL
424 lines
13 KiB
VimL
|
"============================================================================
|
||
|
|
"File: syntastic.vim
|
||
|
|
"Description: Vim plugin for on the fly syntax checking.
|
||
|
|
"Version: 3.0.0
|
||
|
|
"Released On: 13 April, 2013
|
||
|
|
"License: This program is free software. It comes without any warranty,
|
||
|
|
" to the extent permitted by applicable law. You can redistribute
|
||
|
|
" it and/or modify it under the terms of the Do What The Fuck You
|
||
|
|
" Want To Public License, Version 2, as published by Sam Hocevar.
|
||
|
|
" See http://sam.zoy.org/wtfpl/COPYING for more details.
|
||
|
|
"
|
||
|
|
"============================================================================
|
||
|
|
|
||
|
|
if exists("g:loaded_syntastic_plugin")
|
||
|
|
finish
|
||
|
|
endif
|
||
|
|
let g:loaded_syntastic_plugin = 1
|
||
|
|
|
||
|
|
runtime! plugin/syntastic/*.vim
|
||
|
|
|
||
|
|
let s:running_windows = has("win16") || has("win32")
|
||
|
|
|
||
|
|
if !exists("g:syntastic_always_populate_loc_list")
|
||
|
|
let g:syntastic_always_populate_loc_list = 0
|
||
|
|
endif
|
||
|
|
|
||
|
|
if !exists("g:syntastic_auto_jump")
|
||
|
|
let g:syntastic_auto_jump = 0
|
||
|
|
endif
|
||
|
|
|
||
|
|
if !exists("g:syntastic_quiet_warnings")
|
||
|
|
let g:syntastic_quiet_warnings = 0
|
||
|
|
endif
|
||
|
|
|
||
|
|
if !exists("g:syntastic_stl_format")
|
||
|
|
let g:syntastic_stl_format = '[Syntax: line:%F (%t)]'
|
||
|
|
endif
|
||
|
|
|
||
|
|
if !exists("g:syntastic_check_on_open")
|
||
|
|
let g:syntastic_check_on_open = 0
|
||
|
|
endif
|
||
|
|
|
||
|
|
if !exists("g:syntastic_check_on_wq")
|
||
|
|
let g:syntastic_check_on_wq = 1
|
||
|
|
endif
|
||
|
|
|
||
|
|
if !exists("g:syntastic_loc_list_height")
|
||
|
|
let g:syntastic_loc_list_height = 10
|
||
|
|
endif
|
||
|
|
|
||
|
|
if !exists("g:syntastic_ignore_files")
|
||
|
|
let g:syntastic_ignore_files = []
|
||
|
|
endif
|
||
|
|
|
||
|
|
if !exists("g:syntastic_filetype_map")
|
||
|
|
let g:syntastic_filetype_map = {}
|
||
|
|
endif
|
||
|
|
|
||
|
|
if !exists("g:syntastic_full_redraws")
|
||
|
|
let g:syntastic_full_redraws = !( has('gui_running') || has('gui_macvim'))
|
||
|
|
endif
|
||
|
|
|
||
|
|
let s:registry = g:SyntasticRegistry.Instance()
|
||
|
|
let s:notifiers = g:SyntasticNotifiers.Instance()
|
||
|
|
let s:modemap = g:SyntasticModeMap.Instance()
|
||
|
|
|
||
|
|
function! s:CompleteCheckerName(argLead, cmdLine, cursorPos)
|
||
|
|
let checker_names = []
|
||
|
|
for ft in s:CurrentFiletypes()
|
||
|
|
for checker in s:registry.availableCheckersFor(ft)
|
||
|
|
call add(checker_names, checker.getName())
|
||
|
|
endfor
|
||
|
|
endfor
|
||
|
|
return join(checker_names, "\n")
|
||
|
|
endfunction
|
||
|
|
|
||
|
|
command! SyntasticToggleMode call s:ToggleMode()
|
||
|
|
command! -nargs=? -complete=custom,s:CompleteCheckerName SyntasticCheck call s:UpdateErrors(0, <f-args>) <bar> call s:Redraw()
|
||
|
|
command! Errors call s:ShowLocList()
|
||
|
|
command! SyntasticInfo call s:registry.echoInfoFor(s:CurrentFiletypes())
|
||
|
|
|
||
|
|
highlight link SyntasticError SpellBad
|
||
|
|
highlight link SyntasticWarning SpellCap
|
||
|
|
|
||
|
|
augroup syntastic
|
||
|
|
autocmd BufReadPost * if g:syntastic_check_on_open | call s:UpdateErrors(1) | endif
|
||
|
|
autocmd BufWritePost * call s:UpdateErrors(1)
|
||
|
|
|
||
|
|
autocmd BufWinEnter * call s:BufWinEnterHook()
|
||
|
|
|
||
|
|
" TODO: the next autocmd should be "autocmd BufWinLeave * if empty(&bt) | lclose | endif"
|
||
|
|
" but in recent versions of Vim lclose can no longer be called from BufWinLeave
|
||
|
|
autocmd BufEnter * call s:BufEnterHook()
|
||
|
|
augroup END
|
||
|
|
|
||
|
|
if v:version > 703 || (v:version == 703 && has('patch544'))
|
||
|
|
" QuitPre was added in Vim 7.3.544
|
||
|
|
augroup syntastic
|
||
|
|
autocmd QuitPre * call s:QuitPreHook()
|
||
|
|
augroup END
|
||
|
|
endif
|
||
|
|
|
||
|
|
|
||
|
|
function! s:BufWinEnterHook()
|
||
|
|
if empty(&bt)
|
||
|
|
let loclist = g:SyntasticLoclist.current()
|
||
|
|
call s:notifiers.refresh(loclist)
|
||
|
|
endif
|
||
|
|
endfunction
|
||
|
|
|
||
|
|
function! s:BufEnterHook()
|
||
|
|
" TODO: at this point there is no b:syntastic_loclist
|
||
|
|
let loclist = filter(getloclist(0), 'v:val["valid"] == 1')
|
||
|
|
let buffers = syntastic#util#unique(map( loclist, 'v:val["bufnr"]' ))
|
||
|
|
if &bt=='quickfix' && !empty(loclist) && empty(filter( buffers, 'syntastic#util#bufIsActive(v:val)' ))
|
||
|
|
call g:SyntasticLoclistHide()
|
||
|
|
endif
|
||
|
|
endfunction
|
||
|
|
|
||
|
|
|
||
|
|
function! s:QuitPreHook()
|
||
|
|
let b:syntastic_skip_checks = !g:syntastic_check_on_wq
|
||
|
|
call g:SyntasticLoclistHide()
|
||
|
|
endfunction
|
||
|
|
|
||
|
|
"refresh and redraw all the error info for this buf when saving or reading
|
||
|
|
function! s:UpdateErrors(auto_invoked, ...)
|
||
|
|
if s:SkipFile()
|
||
|
|
return
|
||
|
|
endif
|
||
|
|
|
||
|
|
let run_checks = !a:auto_invoked || s:modemap.allowsAutoChecking(&filetype)
|
||
|
|
if run_checks
|
||
|
|
if a:0 >= 1
|
||
|
|
call s:CacheErrors(a:1)
|
||
|
|
else
|
||
|
|
call s:CacheErrors()
|
||
|
|
endif
|
||
|
|
end
|
||
|
|
|
||
|
|
let loclist = g:SyntasticLoclist.current()
|
||
|
|
|
||
|
|
if g:syntastic_always_populate_loc_list || g:syntastic_auto_jump
|
||
|
|
call setloclist(0, loclist.filteredRaw())
|
||
|
|
if run_checks && g:syntastic_auto_jump && loclist.hasErrorsOrWarningsToDisplay()
|
||
|
|
silent! lrewind
|
||
|
|
endif
|
||
|
|
endif
|
||
|
|
|
||
|
|
call s:notifiers.refresh(loclist)
|
||
|
|
endfunction
|
||
|
|
|
||
|
|
"clear the loc list for the buffer
|
||
|
|
function! s:ClearCache()
|
||
|
|
call s:notifiers.reset(g:SyntasticLoclist.current())
|
||
|
|
unlet! b:syntastic_loclist
|
||
|
|
endfunction
|
||
|
|
|
||
|
|
function! s:CurrentFiletypes()
|
||
|
|
return split(&filetype, '\.')
|
||
|
|
endfunction
|
||
|
|
|
||
|
|
"detect and cache all syntax errors in this buffer
|
||
|
|
function! s:CacheErrors(...)
|
||
|
|
call s:ClearCache()
|
||
|
|
let newLoclist = g:SyntasticLoclist.New([])
|
||
|
|
|
||
|
|
if !s:SkipFile()
|
||
|
|
let active_checkers = 0
|
||
|
|
for ft in s:CurrentFiletypes()
|
||
|
|
if a:0
|
||
|
|
let checker = s:registry.getChecker(ft, a:1)
|
||
|
|
let checkers = !empty(checker) ? [checker] : []
|
||
|
|
else
|
||
|
|
let checkers = s:registry.getActiveCheckers(ft)
|
||
|
|
endif
|
||
|
|
|
||
|
|
for checker in checkers
|
||
|
|
let active_checkers += 1
|
||
|
|
call syntastic#util#debug("CacheErrors: Invoking checker: " . checker.getName())
|
||
|
|
|
||
|
|
let loclist = checker.getLocList()
|
||
|
|
|
||
|
|
if !loclist.isEmpty()
|
||
|
|
let newLoclist = newLoclist.extend(loclist)
|
||
|
|
call newLoclist.setName( checker.getName() . ' ('. checker.getFiletype() . ')' )
|
||
|
|
|
||
|
|
"only get errors from one checker at a time
|
||
|
|
break
|
||
|
|
endif
|
||
|
|
endfor
|
||
|
|
endfor
|
||
|
|
|
||
|
|
if !active_checkers
|
||
|
|
if a:0
|
||
|
|
call syntastic#util#warn('checker ' . a:1 . ' is not active for filetype ' . &filetype)
|
||
|
|
else
|
||
|
|
call syntastic#util#debug('no active checkers for filetype ' . &filetype)
|
||
|
|
endif
|
||
|
|
endif
|
||
|
|
endif
|
||
|
|
|
||
|
|
let b:syntastic_loclist = newLoclist
|
||
|
|
endfunction
|
||
|
|
|
||
|
|
function! s:ToggleMode()
|
||
|
|
call s:modemap.toggleMode()
|
||
|
|
call s:ClearCache()
|
||
|
|
call s:UpdateErrors(1)
|
||
|
|
call s:modemap.echoMode()
|
||
|
|
endfunction
|
||
|
|
|
||
|
|
"display the cached errors for this buf in the location list
|
||
|
|
function! s:ShowLocList()
|
||
|
|
let loclist = g:SyntasticLoclist.current()
|
||
|
|
call loclist.show()
|
||
|
|
endfunction
|
||
|
|
|
||
|
|
"the script changes &shellpipe and &shell to stop the screen flicking when
|
||
|
|
"shelling out to syntax checkers. Not all OSs support the hacks though
|
||
|
|
function! s:OSSupportsShellpipeHack()
|
||
|
|
return !s:running_windows && executable('/bin/bash') && (s:uname() !~ "FreeBSD") && (s:uname() !~ "OpenBSD")
|
||
|
|
endfunction
|
||
|
|
|
||
|
|
function! s:IsRedrawRequiredAfterMake()
|
||
|
|
return !s:running_windows && (s:uname() =~ "FreeBSD" || s:uname() =~ "OpenBSD")
|
||
|
|
endfunction
|
||
|
|
|
||
|
|
"Redraw in a way that doesnt make the screen flicker or leave anomalies behind.
|
||
|
|
"
|
||
|
|
"Some terminal versions of vim require `redraw!` - otherwise there can be
|
||
|
|
"random anomalies left behind.
|
||
|
|
"
|
||
|
|
"However, on some versions of gvim using `redraw!` causes the screen to
|
||
|
|
"flicker - so use redraw.
|
||
|
|
function! s:Redraw()
|
||
|
|
if g:syntastic_full_redraws
|
||
|
|
redraw!
|
||
|
|
else
|
||
|
|
redraw
|
||
|
|
endif
|
||
|
|
endfunction
|
||
|
|
|
||
|
|
function! s:IgnoreFile(filename)
|
||
|
|
let fname = fnamemodify(a:filename, ':p')
|
||
|
|
for p in g:syntastic_ignore_files
|
||
|
|
if fname =~# p
|
||
|
|
return 1
|
||
|
|
endif
|
||
|
|
endfor
|
||
|
|
return 0
|
||
|
|
endfunction
|
||
|
|
|
||
|
|
" Skip running in special buffers
|
||
|
|
function! s:SkipFile()
|
||
|
|
let force_skip = exists('b:syntastic_skip_checks') ? b:syntastic_skip_checks : 0
|
||
|
|
let fname = expand('%')
|
||
|
|
return force_skip || !empty(&buftype) || !filereadable(fname) || getwinvar(0, '&diff') || s:IgnoreFile(fname)
|
||
|
|
endfunction
|
||
|
|
|
||
|
|
function! s:uname()
|
||
|
|
if !exists('s:uname')
|
||
|
|
let s:uname = system('uname')
|
||
|
|
endif
|
||
|
|
return s:uname
|
||
|
|
endfunction
|
||
|
|
|
||
|
|
"return a string representing the state of buffer according to
|
||
|
|
"g:syntastic_stl_format
|
||
|
|
"
|
||
|
|
"return '' if no errors are cached for the buffer
|
||
|
|
function! SyntasticStatuslineFlag()
|
||
|
|
let loclist = g:SyntasticLoclist.current()
|
||
|
|
let issues = loclist.filteredRaw()
|
||
|
|
let num_issues = loclist.getLength()
|
||
|
|
if loclist.hasErrorsOrWarningsToDisplay()
|
||
|
|
let errors = loclist.errors()
|
||
|
|
let warnings = loclist.warnings()
|
||
|
|
|
||
|
|
let num_errors = len(errors)
|
||
|
|
let num_warnings = len(warnings)
|
||
|
|
|
||
|
|
let output = g:syntastic_stl_format
|
||
|
|
|
||
|
|
"hide stuff wrapped in %E(...) unless there are errors
|
||
|
|
let output = substitute(output, '\C%E{\([^}]*\)}', num_errors ? '\1' : '' , 'g')
|
||
|
|
|
||
|
|
"hide stuff wrapped in %W(...) unless there are warnings
|
||
|
|
let output = substitute(output, '\C%W{\([^}]*\)}', num_warnings ? '\1' : '' , 'g')
|
||
|
|
|
||
|
|
"hide stuff wrapped in %B(...) unless there are both errors and warnings
|
||
|
|
let output = substitute(output, '\C%B{\([^}]*\)}', (num_warnings && num_errors) ? '\1' : '' , 'g')
|
||
|
|
|
||
|
|
|
||
|
|
"sub in the total errors/warnings/both
|
||
|
|
let output = substitute(output, '\C%w', num_warnings, 'g')
|
||
|
|
let output = substitute(output, '\C%e', num_errors, 'g')
|
||
|
|
let output = substitute(output, '\C%t', num_issues, 'g')
|
||
|
|
|
||
|
|
"first error/warning line num
|
||
|
|
let output = substitute(output, '\C%F', num_issues ? issues[0]['lnum'] : '', 'g')
|
||
|
|
|
||
|
|
"first error line num
|
||
|
|
let output = substitute(output, '\C%fe', num_errors ? errors[0]['lnum'] : '', 'g')
|
||
|
|
|
||
|
|
"first warning line num
|
||
|
|
let output = substitute(output, '\C%fw', num_warnings ? warnings[0]['lnum'] : '', 'g')
|
||
|
|
|
||
|
|
return output
|
||
|
|
else
|
||
|
|
return ''
|
||
|
|
endif
|
||
|
|
endfunction
|
||
|
|
|
||
|
|
"A wrapper for the :lmake command. Sets up the make environment according to
|
||
|
|
"the options given, runs make, resets the environment, returns the location
|
||
|
|
"list
|
||
|
|
"
|
||
|
|
"a:options can contain the following keys:
|
||
|
|
" 'makeprg'
|
||
|
|
" 'errorformat'
|
||
|
|
"
|
||
|
|
"The corresponding options are set for the duration of the function call. They
|
||
|
|
"are set with :let, so dont escape spaces.
|
||
|
|
"
|
||
|
|
"a:options may also contain:
|
||
|
|
" 'defaults' - a dict containing default values for the returned errors
|
||
|
|
" 'subtype' - all errors will be assigned the given subtype
|
||
|
|
" 'postprocess' - a list of functions to be applied to the error list
|
||
|
|
" 'cwd' - change directory to the given path before running the checker
|
||
|
|
" 'returns' - a list of valid exit codes for the checker
|
||
|
|
function! SyntasticMake(options)
|
||
|
|
call syntastic#util#debug('SyntasticMake: called with options: '. string(a:options))
|
||
|
|
|
||
|
|
let old_loclist = getloclist(0)
|
||
|
|
let old_makeprg = &l:makeprg
|
||
|
|
let old_shellpipe = &shellpipe
|
||
|
|
let old_shell = &shell
|
||
|
|
let old_errorformat = &l:errorformat
|
||
|
|
let old_cwd = getcwd()
|
||
|
|
let old_lc_all = $LC_ALL
|
||
|
|
|
||
|
|
if s:OSSupportsShellpipeHack()
|
||
|
|
"this is a hack to stop the screen needing to be ':redraw'n when
|
||
|
|
"when :lmake is run. Otherwise the screen flickers annoyingly
|
||
|
|
let &shellpipe='&>'
|
||
|
|
let &shell = '/bin/bash'
|
||
|
|
endif
|
||
|
|
|
||
|
|
if has_key(a:options, 'makeprg')
|
||
|
|
let &l:makeprg = a:options['makeprg']
|
||
|
|
endif
|
||
|
|
|
||
|
|
if has_key(a:options, 'errorformat')
|
||
|
|
let &l:errorformat = a:options['errorformat']
|
||
|
|
endif
|
||
|
|
|
||
|
|
if has_key(a:options, 'cwd')
|
||
|
|
exec 'lcd ' . fnameescape(a:options['cwd'])
|
||
|
|
endif
|
||
|
|
|
||
|
|
let $LC_ALL = 'C'
|
||
|
|
silent lmake!
|
||
|
|
let $LC_ALL = old_lc_all
|
||
|
|
|
||
|
|
let errors = getloclist(0)
|
||
|
|
|
||
|
|
if has_key(a:options, 'cwd')
|
||
|
|
exec 'lcd ' . fnameescape(old_cwd)
|
||
|
|
endif
|
||
|
|
|
||
|
|
call setloclist(0, old_loclist)
|
||
|
|
let &l:makeprg = old_makeprg
|
||
|
|
let &l:errorformat = old_errorformat
|
||
|
|
let &shellpipe=old_shellpipe
|
||
|
|
let &shell=old_shell
|
||
|
|
|
||
|
|
if s:IsRedrawRequiredAfterMake()
|
||
|
|
call s:Redraw()
|
||
|
|
endif
|
||
|
|
|
||
|
|
if has_key(a:options, 'returns') && index(a:options['returns'], v:shell_error) == -1
|
||
|
|
throw 'Syntastic: checker error'
|
||
|
|
endif
|
||
|
|
|
||
|
|
if has_key(a:options, 'defaults')
|
||
|
|
call SyntasticAddToErrors(errors, a:options['defaults'])
|
||
|
|
endif
|
||
|
|
|
||
|
|
" Apply ignore patterns
|
||
|
|
let ignore = {}
|
||
|
|
for buf in syntastic#util#unique(map(copy(errors), 'v:val["bufnr"]'))
|
||
|
|
let ignore[buf] = s:IgnoreFile(bufname(str2nr(buf)))
|
||
|
|
endfor
|
||
|
|
call filter(errors, '!ignore[v:val["bufnr"]]')
|
||
|
|
|
||
|
|
" Add subtype info if present.
|
||
|
|
if has_key(a:options, 'subtype')
|
||
|
|
call SyntasticAddToErrors(errors, {'subtype': a:options['subtype']})
|
||
|
|
endif
|
||
|
|
|
||
|
|
if has_key(a:options, 'postprocess') && !empty(a:options['postprocess'])
|
||
|
|
for rule in a:options['postprocess']
|
||
|
|
let errors = call('syntastic#postprocess#' . rule, [errors])
|
||
|
|
endfor
|
||
|
|
endif
|
||
|
|
|
||
|
|
return errors
|
||
|
|
endfunction
|
||
|
|
|
||
|
|
"take a list of errors and add default values to them from a:options
|
||
|
|
function! SyntasticAddToErrors(errors, options)
|
||
|
|
for i in range(0, len(a:errors)-1)
|
||
|
|
for key in keys(a:options)
|
||
|
|
if !has_key(a:errors[i], key) || empty(a:errors[i][key])
|
||
|
|
let a:errors[i][key] = a:options[key]
|
||
|
|
endif
|
||
|
|
endfor
|
||
|
|
endfor
|
||
|
|
return a:errors
|
||
|
|
endfunction
|
||
|
|
|
||
|
|
" vim: set et sts=4 sw=4:
|