2014-02-08 05:05:16 -05:00
"============================================================================
"File: syntastic.vim
"Description: Vim plugin for on the fly syntax checking.
"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.
"
"============================================================================
2015-12-08 08:20:04 -05:00
if exists ( 'g:loaded_syntastic_plugin' ) | | &compatible
2014-02-08 05:05:16 -05:00
finish
endif
let g :loaded_syntastic_plugin = 1
if has ( 'reltime' )
2014-10-31 17:30:24 -04:00
let g :_SYNTASTIC_START = reltime ( )
lockvar ! g :_SYNTASTIC_START
2014-02-08 05:05:16 -05:00
endif
2018-02-04 06:35:08 -05:00
let g :_SYNTASTIC_VERSION = '3.8.0-101'
2014-10-31 17:30:24 -04:00
lockvar g :_SYNTASTIC_VERSION
2014-03-11 16:10:50 -04:00
2014-03-02 09:35:00 -05:00
" Sanity checks {{{1
2014-02-08 05:05:16 -05:00
2015-12-08 08:20:04 -05:00
if v :version < 700 | | ( v :version = = 700 && ! has ( 'patch175' ) )
call syntastic #log #error ( 'need Vim version 7.0.175 or later' )
finish
endif
2014-10-14 09:30:33 -04:00
for s :feature in [
\ 'autocmd' ,
\ 'eval' ,
\ 'file_in_path' ,
\ 'modify_fname' ,
\ 'quickfix' ,
\ 'reltime' ,
2017-03-07 12:04:28 -05:00
\ 'statusline' ,
\ 'user_commands' ,
2014-10-14 09:30:33 -04:00
\ ]
2014-02-08 05:05:16 -05:00
if ! has ( s :feature )
2015-07-13 06:22:46 -04:00
call syntastic #log #error ( 'need Vim compiled with feature ' . s :feature )
2014-02-08 05:05:16 -05:00
finish
endif
endfor
2014-10-31 17:30:24 -04:00
let s :_running_windows = syntastic #util #isRunningWindows ( )
lockvar s :_running_windows
2014-07-02 07:18:18 -04:00
2015-03-14 16:02:10 -04:00
if ! exists ( 'g:syntastic_shell' )
let g :syntastic_shell = &shell
endif
2015-02-24 05:45:22 -05:00
if s :_running_windows
let g :_SYNTASTIC_UNAME = 'Windows'
elseif executable ( 'uname' )
2014-02-08 05:05:16 -05:00
try
2015-03-14 16:02:10 -04:00
let g :_SYNTASTIC_UNAME = split ( syntastic #util #system ( 'uname' ) , "\n" ) [0 ]
2014-03-02 09:35:00 -05:00
catch /\m^Vim\%((\a\+)\)\=:E484/
2016-11-09 12:22:55 -05:00
call syntastic #log #error ( "can't run external programs (misconfigured shell options?)" )
2014-02-08 05:05:16 -05:00
finish
2015-02-24 05:45:22 -05:00
catch /\m^Vim\%((\a\+)\)\=:E684/
let g :_SYNTASTIC_UNAME = 'Unknown'
2014-02-08 05:05:16 -05:00
endtry
2015-02-24 05:45:22 -05:00
else
let g :_SYNTASTIC_UNAME = 'Unknown'
2014-02-08 05:05:16 -05:00
endif
2015-02-24 05:45:22 -05:00
lockvar g :_SYNTASTIC_UNAME
2014-02-08 05:05:16 -05:00
2017-02-11 08:01:38 -05:00
" XXX Ugly hack to make g:_SYNTASTIC_UNAME available to :SyntasticInfo without
" polluting session namespaces
let g :syntastic_version =
\ g :_SYNTASTIC_VERSION .
\ ' (Vim ' . v :version . ( has ( 'nvim' ) ? ', Neovim' : '' ) . ', ' .
\ g :_SYNTASTIC_UNAME .
\ ( has ( 'gui' ) ? ', GUI' : '' ) . ')'
lockvar g :syntastic_version
2014-03-02 09:35:00 -05:00
" }}}1
" Defaults {{{1
2014-10-31 17:30:24 -04:00
let g :_SYNTASTIC_DEFAULTS = {
2014-03-02 09:35:00 -05:00
\ 'aggregate_errors' : 0 ,
\ 'always_populate_loc_list' : 0 ,
\ 'auto_jump' : 0 ,
\ 'auto_loc_list' : 2 ,
\ 'check_on_open' : 0 ,
\ 'check_on_wq' : 1 ,
2014-09-27 11:32:18 -04:00
\ 'cursor_columns' : 1 ,
2014-03-02 09:35:00 -05:00
\ 'debug' : 0 ,
\ 'echo_current_error' : 1 ,
\ 'enable_balloons' : 1 ,
\ 'enable_highlighting' : 1 ,
\ 'enable_signs' : 1 ,
\ 'error_symbol' : '>>' ,
2015-03-14 16:02:10 -04:00
\ 'exit_checks' : ! ( s :_running_windows && syntastic #util #var ( 'shell' , &shell ) = ~ ? '\m\<cmd\.exe$' ) ,
2014-03-02 09:35:00 -05:00
\ 'filetype_map' : {},
\ 'full_redraws' : ! ( has ( 'gui_running' ) | | has ( 'gui_macvim' ) ) ,
\ 'id_checkers' : 1 ,
2014-08-03 18:02:51 -04:00
\ 'ignore_extensions' : '\c\v^([gx]?z|lzma|bz2)$' ,
2014-03-02 09:35:00 -05:00
\ 'ignore_files' : [],
\ 'loc_list_height' : 10 ,
2015-12-08 08:20:04 -05:00
\ 'nested_autocommands' : 0 ,
2014-03-02 09:35:00 -05:00
\ 'quiet_messages' : {},
2016-04-12 04:31:09 -04:00
\ 'reuse_loc_lists' : 1 ,
2015-03-14 16:02:10 -04:00
\ 'shell' : &shell ,
2014-04-18 08:58:02 -04:00
\ 'sort_aggregated_errors' : 1 ,
2014-03-02 09:35:00 -05:00
\ 'stl_format' : '[Syntax: line:%F (%t)]' ,
\ 'style_error_symbol' : 'S>' ,
\ 'style_warning_symbol' : 'S>' ,
\ 'warning_symbol' : '>>'
\ }
2014-10-31 17:30:24 -04:00
lockvar ! g :_SYNTASTIC_DEFAULTS
2014-03-02 09:35:00 -05:00
2014-10-31 17:30:24 -04:00
for s :key in keys ( g :_SYNTASTIC_DEFAULTS )
2014-03-02 09:35:00 -05:00
if ! exists ( 'g:syntastic_' . s :key )
2014-10-31 17:30:24 -04:00
let g :syntastic_ {s :key } = copy ( g :_SYNTASTIC_DEFAULTS [s :key ])
2014-03-02 09:35:00 -05:00
endif
endfor
2014-02-08 05:05:16 -05:00
2015-07-13 06:22:46 -04:00
if exists ( 'g:syntastic_quiet_warnings' )
2014-07-02 07:18:18 -04:00
call syntastic #log #oneTimeWarn ( "variable g:syntastic_quiet_warnings is deprecated, please use let g:syntastic_quiet_messages = {'level': 'warnings'} instead" )
2014-02-08 05:05:16 -05:00
if g :syntastic_quiet_warnings
let s :quiet_warnings = get ( g :syntastic_quiet_messages , 'type' , [])
if type ( s :quiet_warnings ) ! = type ( [])
let s :quiet_warnings = [s :quiet_warnings ]
endif
call add ( s :quiet_warnings , 'warnings' )
let g :syntastic_quiet_messages ['type' ] = s :quiet_warnings
endif
endif
2014-03-02 09:35:00 -05:00
" }}}1
" Debug {{{1
2016-12-27 09:46:49 -05:00
let g :_SYNTASTIC_SHELL_OPTIONS = [
2014-02-16 12:46:49 -05:00
\ 'shell' ,
\ 'shellcmdflag' ,
\ 'shellpipe' ,
\ 'shellquote' ,
\ 'shellredir' ,
\ 'shelltemp' ,
\ 'shellxquote'
\ ]
2016-10-02 07:37:21 -04:00
for s :feature in [
\ 'autochdir' ,
2016-11-09 12:22:55 -05:00
\ 'shellslash' ,
\ 'shellxescape' ,
2016-10-02 07:37:21 -04:00
\ ]
if exists ( '+' . s :feature )
2016-12-27 09:46:49 -05:00
call add ( g :_SYNTASTIC_SHELL_OPTIONS , s :feature )
2016-10-02 07:37:21 -04:00
endif
endfor
2016-12-27 09:46:49 -05:00
lockvar ! g :_SYNTASTIC_SHELL_OPTIONS
2014-02-16 12:46:49 -05:00
2014-02-08 05:05:16 -05:00
" debug constants
2014-10-31 17:30:24 -04:00
let g :_SYNTASTIC_DEBUG_TRACE = 1
lockvar g :_SYNTASTIC_DEBUG_TRACE
let g :_SYNTASTIC_DEBUG_LOCLIST = 2
lockvar g :_SYNTASTIC_DEBUG_LOCLIST
let g :_SYNTASTIC_DEBUG_NOTIFICATIONS = 4
lockvar g :_SYNTASTIC_DEBUG_NOTIFICATIONS
let g :_SYNTASTIC_DEBUG_AUTOCOMMANDS = 8
lockvar g :_SYNTASTIC_DEBUG_AUTOCOMMANDS
let g :_SYNTASTIC_DEBUG_VARIABLES = 16
lockvar g :_SYNTASTIC_DEBUG_VARIABLES
let g :_SYNTASTIC_DEBUG_CHECKERS = 32
lockvar g :_SYNTASTIC_DEBUG_CHECKERS
2014-02-08 05:05:16 -05:00
2014-03-02 09:35:00 -05:00
" }}}1
runtime ! plugin /syntastic/ *.vim
2014-02-08 05:05:16 -05:00
let s :registry = g :SyntasticRegistry .Instance ( )
let s :notifiers = g :SyntasticNotifiers .Instance ( )
let s :modemap = g :SyntasticModeMap .Instance ( )
2016-10-02 07:37:21 -04:00
let s :_check_stack = []
2015-12-08 08:20:04 -05:00
let s :_quit_pre = []
2014-03-02 09:35:00 -05:00
" Commands {{{1
2014-02-08 05:05:16 -05:00
" @vimlint(EVL103, 1, a:cursorPos)
" @vimlint(EVL103, 1, a:cmdLine)
" @vimlint(EVL103, 1, a:argLead)
2015-02-24 05:45:22 -05:00
function ! s :CompleteCheckerName ( argLead , cmdLine , cursorPos ) abort " {{{2
2016-11-09 12:22:55 -05:00
let names = []
let sep_idx = stridx ( a :argLead , '/' )
if sep_idx > = 1
let ft = a :argLead [: sep_idx -1 ]
call extend ( names , map ( s :registry .getNamesOfAvailableCheckers ( ft ) , 'ft . "/" . v:val' ) )
else
for ft in s :registry .resolveFiletypes ( &filetype )
call extend ( names , s :registry .getNamesOfAvailableCheckers ( ft ) )
endfor
call extend ( names , map ( copy ( s :registry .getKnownFiletypes ( ) ) , 'v:val . "/"' ) )
endif
return join ( names , "\n" )
2014-03-02 09:35:00 -05:00
endfunction " }}}2
2014-02-08 05:05:16 -05:00
" @vimlint(EVL103, 0, a:cursorPos)
" @vimlint(EVL103, 0, a:cmdLine)
" @vimlint(EVL103, 0, a:argLead)
" @vimlint(EVL103, 1, a:cursorPos)
" @vimlint(EVL103, 1, a:cmdLine)
" @vimlint(EVL103, 1, a:argLead)
2015-02-24 05:45:22 -05:00
function ! s :CompleteFiletypes ( argLead , cmdLine , cursorPos ) abort " {{{2
2014-03-02 09:35:00 -05:00
return join ( s :registry .getKnownFiletypes ( ) , "\n" )
endfunction " }}}2
2014-02-08 05:05:16 -05:00
" @vimlint(EVL103, 0, a:cursorPos)
" @vimlint(EVL103, 0, a:cmdLine)
" @vimlint(EVL103, 0, a:argLead)
2015-12-08 08:20:04 -05:00
command ! - bar - nargs = * - complete = custom , s :CompleteCheckerName SyntasticCheck call SyntasticCheck ( < f - args > )
command ! - bar - nargs = ? - complete = custom , s :CompleteFiletypes SyntasticInfo call SyntasticInfo ( < f - args > )
command ! - bar Errors call SyntasticErrors ( )
command ! - bar SyntasticReset call SyntasticReset ( )
command ! - bar SyntasticToggleMode call SyntasticToggleMode ( )
command ! - bar SyntasticSetLoclist call SyntasticSetLoclist ( )
command ! SyntasticJavacEditClasspath runtime ! syntax_checkers /java/ *.vim | SyntasticJavacEditClasspath
command ! SyntasticJavacEditConfig runtime ! syntax_checkers /java/ *.vim | SyntasticJavacEditConfig
2014-02-08 05:05:16 -05:00
2014-03-02 09:35:00 -05:00
" }}}1
2015-01-18 07:58:28 -05:00
" Public API {{{1
2015-02-24 05:45:22 -05:00
function ! SyntasticCheck ( ...) abort " {{{2
2016-10-02 07:37:21 -04:00
call s :UpdateErrors ( bufnr ( '' ) , 0 , a :000 )
2015-01-18 07:58:28 -05:00
call syntastic #util #redraw ( g :syntastic_full_redraws )
endfunction " }}}2
2015-02-24 05:45:22 -05:00
function ! SyntasticInfo ( ...) abort " {{{2
2015-01-18 07:58:28 -05:00
call s :modemap .modeInfo ( a :000 )
2016-11-09 12:22:55 -05:00
call s :registry .echoInfoFor ( a :000 )
2015-01-18 07:58:28 -05:00
call s :_explain_skip ( a :000 )
2016-12-27 09:46:49 -05:00
call syntastic #log #debugShowOptions ( g :_SYNTASTIC_DEBUG_TRACE , g :_SYNTASTIC_SHELL_OPTIONS )
2016-10-02 07:37:21 -04:00
call syntastic #log #debugDump ( g :_SYNTASTIC_DEBUG_VARIABLES )
2015-01-18 07:58:28 -05:00
endfunction " }}}2
2015-02-24 05:45:22 -05:00
function ! SyntasticErrors ( ) abort " {{{2
2015-01-18 07:58:28 -05:00
call g :SyntasticLoclist .current ( ) .show ( )
endfunction " }}}2
2015-02-24 05:45:22 -05:00
function ! SyntasticReset ( ) abort " {{{2
2016-10-02 07:37:21 -04:00
call s :ClearCache ( bufnr ( '' ) )
2015-01-18 07:58:28 -05:00
call s :notifiers .refresh ( g :SyntasticLoclist .New ( []) )
endfunction " }}}2
2015-02-24 05:45:22 -05:00
function ! SyntasticToggleMode ( ) abort " {{{2
2015-01-18 07:58:28 -05:00
call s :modemap .toggleMode ( )
2016-10-02 07:37:21 -04:00
call s :ClearCache ( bufnr ( '' ) )
2015-01-18 07:58:28 -05:00
call s :notifiers .refresh ( g :SyntasticLoclist .New ( []) )
call s :modemap .echoMode ( )
endfunction " }}}2
2015-02-24 05:45:22 -05:00
function ! SyntasticSetLoclist ( ) abort " {{{2
2016-10-02 07:37:21 -04:00
call g :SyntasticLoclist .current ( ) .setloclist ( 0 )
2015-01-18 07:58:28 -05:00
endfunction " }}}2
" }}}1
" Autocommands {{{1
2014-03-02 09:35:00 -05:00
2014-02-08 05:05:16 -05:00
augroup syntastic
2015-12-08 08:20:04 -05:00
autocmd !
2016-10-02 07:37:21 -04:00
autocmd VimEnter * call s :VimEnterHook ( )
autocmd BufEnter * call s :BufEnterHook ( expand ( '<afile>' , 1 ) )
autocmd BufWinEnter * call s :BufWinEnterHook ( expand ( '<afile>' , 1 ) )
2014-02-08 05:05:16 -05:00
augroup END
2015-12-08 08:20:04 -05:00
if g :syntastic_nested_autocommands
augroup syntastic
2016-10-02 07:37:21 -04:00
autocmd BufReadPost * nested call s :BufReadPostHook ( expand ( '<afile>' , 1 ) )
autocmd BufWritePost * nested call s :BufWritePostHook ( expand ( '<afile>' , 1 ) )
2015-12-08 08:20:04 -05:00
augroup END
else
augroup syntastic
2016-10-02 07:37:21 -04:00
autocmd BufReadPost * call s :BufReadPostHook ( expand ( '<afile>' , 1 ) )
autocmd BufWritePost * call s :BufWritePostHook ( expand ( '<afile>' , 1 ) )
2015-12-08 08:20:04 -05:00
augroup END
endif
if exists ( '##QuitPre' )
2014-02-08 05:05:16 -05:00
" QuitPre was added in Vim 7.3.544
augroup syntastic
2016-10-02 07:37:21 -04:00
autocmd QuitPre * call s :QuitPreHook ( expand ( '<afile>' , 1 ) )
2014-02-08 05:05:16 -05:00
augroup END
endif
2016-10-02 07:37:21 -04:00
function ! s :BufReadPostHook ( fname ) abort " {{{2
let buf = syntastic #util #fname2buf ( a :fname )
if g :syntastic_check_on_open && buf > 0
2014-10-31 17:30:24 -04:00
call syntastic #log #debug ( g :_SYNTASTIC_DEBUG_AUTOCOMMANDS ,
2016-10-02 07:37:21 -04:00
\ 'autocmd: BufReadPost, buffer ' . buf . ' = ' . string ( a :fname ) )
if index ( s :_check_stack , buf ) = = -1
call add ( s :_check_stack , buf )
endif
2014-02-08 05:05:16 -05:00
endif
2014-03-02 09:35:00 -05:00
endfunction " }}}2
2014-02-08 05:05:16 -05:00
2016-10-02 07:37:21 -04:00
function ! s :BufWritePostHook ( fname ) abort " {{{2
let buf = syntastic #util #fname2buf ( a :fname )
2014-10-31 17:30:24 -04:00
call syntastic #log #debug ( g :_SYNTASTIC_DEBUG_AUTOCOMMANDS ,
2016-10-02 07:37:21 -04:00
\ 'autocmd: BufWritePost, buffer ' . buf . ' = ' . string ( a :fname ) )
call s :UpdateErrors ( buf , 1 , [])
2014-03-02 09:35:00 -05:00
endfunction " }}}2
2014-02-08 05:05:16 -05:00
2016-10-02 07:37:21 -04:00
function ! s :BufEnterHook ( fname ) abort " {{{2
let buf = syntastic #util #fname2buf ( a :fname )
2014-10-31 17:30:24 -04:00
call syntastic #log #debug ( g :_SYNTASTIC_DEBUG_AUTOCOMMANDS ,
2016-10-02 07:37:21 -04:00
\ 'autocmd: BufEnter, buffer ' . buf . ' = ' . string ( a :fname ) . ', &buftype = ' . string ( &buftype ) )
if buf > 0 && getbufvar ( buf , '&buftype' ) = = # ''
let idx = index ( reverse ( copy ( s :_check_stack ) ) , buf )
if idx > = 0
if ! has ( 'vim_starting' )
call remove ( s :_check_stack , - idx - 1 )
call s :UpdateErrors ( buf , 1 , [])
endif
elseif &buftype = = # ''
call s :notifiers .refresh ( g :SyntasticLoclist .current ( ) )
endif
2015-02-24 05:45:22 -05:00
elseif &buftype = = # 'quickfix'
2014-07-02 07:18:18 -04:00
" TODO: this is needed because in recent versions of Vim lclose
" can no longer be called from BufWinLeave
" TODO: at this point there is no b:syntastic_loclist
2016-11-09 12:22:55 -05:00
let loclist = filter ( copy ( getloclist ( 0 ) ) , 'v:val["valid"]' )
2016-10-02 07:37:21 -04:00
let owner = str2nr ( getbufvar ( buf , 'syntastic_owner_buffer' ) )
2014-07-02 07:18:18 -04:00
let buffers = syntastic #util #unique ( map ( loclist , 'v:val["bufnr"]' ) + ( owner ? [owner ] : []) )
2016-04-12 04:31:09 -04:00
if ! empty ( get ( w :, 'syntastic_loclist_set' , []) ) && ! empty ( loclist ) && empty ( filter ( buffers , 'syntastic#util#bufIsActive(v:val)' ) )
2014-07-02 07:18:18 -04:00
call SyntasticLoclistHide ( )
endif
2014-02-08 05:05:16 -05:00
endif
2014-03-02 09:35:00 -05:00
endfunction " }}}2
2014-02-08 05:05:16 -05:00
2016-10-02 07:37:21 -04:00
function ! s :BufWinEnterHook ( fname ) abort " {{{2
let buf = syntastic #util #fname2buf ( a :fname )
call syntastic #log #debug ( g :_SYNTASTIC_DEBUG_AUTOCOMMANDS ,
\ 'autocmd: BufWinEnter, buffer ' . buf . ' = ' . string ( a :fname ) . ', &buftype = ' . string ( &buftype ) )
if buf > 0 && getbufvar ( buf , '&buftype' ) = = # ''
let idx = index ( reverse ( copy ( s :_check_stack ) ) , buf )
if idx > = 0 && ! has ( 'vim_starting' )
call remove ( s :_check_stack , - idx - 1 )
call s :UpdateErrors ( buf , 1 , [])
endif
endif
endfunction " }}}2
function ! s :VimEnterHook ( ) abort " {{{2
let buf = bufnr ( '' )
call syntastic #log #debug ( g :_SYNTASTIC_DEBUG_AUTOCOMMANDS ,
\ 'autocmd: VimEnter, buffer ' . buf . ' = ' . string ( bufname ( buf ) ) . ', &buftype = ' . string ( &buftype ) )
let idx = index ( reverse ( copy ( s :_check_stack ) ) , buf )
if idx > = 0 && getbufvar ( buf , '&buftype' ) = = # ''
call remove ( s :_check_stack , - idx - 1 )
call s :UpdateErrors ( buf , 1 , [])
endif
endfunction " }}}2
2015-12-08 08:20:04 -05:00
function ! s :QuitPreHook ( fname ) abort " {{{2
2016-10-02 07:37:21 -04:00
let buf = syntastic #util #fname2buf ( a :fname )
2015-12-08 08:20:04 -05:00
call syntastic #log #debug ( g :_SYNTASTIC_DEBUG_AUTOCOMMANDS , 'autocmd: QuitPre, buffer ' . buf . ' = ' . string ( a :fname ) )
if ! syntastic #util #var ( 'check_on_wq' )
call syntastic #util #setWids ( )
call add ( s :_quit_pre , buf . '_' . getbufvar ( buf , 'changetick' ) . '_' . w :syntastic_wid )
endif
2016-04-12 04:31:09 -04:00
if ! empty ( get ( w :, 'syntastic_loclist_set' , []) )
2015-01-18 07:58:28 -05:00
call SyntasticLoclistHide ( )
endif
2014-03-02 09:35:00 -05:00
endfunction " }}}2
" }}}1
" Main {{{1
2014-02-08 05:05:16 -05:00
"refresh and redraw all the error info for this buf when saving or reading
2016-10-02 07:37:21 -04:00
function ! s :UpdateErrors ( buf , auto_invoked , checker_names ) abort " {{{2
2014-10-31 17:30:24 -04:00
call syntastic #log #debugShowVariables ( g :_SYNTASTIC_DEBUG_TRACE , 'version' )
2016-12-27 09:46:49 -05:00
call syntastic #log #debugShowOptions ( g :_SYNTASTIC_DEBUG_TRACE , g :_SYNTASTIC_SHELL_OPTIONS )
2014-10-31 17:30:24 -04:00
call syntastic #log #debugDump ( g :_SYNTASTIC_DEBUG_VARIABLES )
call syntastic #log #debug ( g :_SYNTASTIC_DEBUG_TRACE , 'UpdateErrors' . ( a :auto_invoked ? ' (auto)' : '' ) .
2015-01-18 07:58:28 -05:00
\ ': ' . ( len ( a :checker_names ) ? join ( a :checker_names ) : 'default checkers' ) )
2015-12-08 08:20:04 -05:00
call s :modemap .synch ( )
2016-10-02 07:37:21 -04:00
if s :_skip_file ( a :buf )
2014-02-08 05:05:16 -05:00
return
endif
2016-11-09 12:22:55 -05:00
let run_checks = ! a :auto_invoked | | s :modemap .doAutoChecking ( a :buf )
2014-02-08 05:05:16 -05:00
if run_checks
2016-10-02 07:37:21 -04:00
call s :CacheErrors ( a :buf , a :checker_names )
call syntastic #util #setLastTick ( a :buf )
2016-11-09 12:22:55 -05:00
elseif a :auto_invoked
return
2014-02-08 05:05:16 -05:00
endif
2016-10-02 07:37:21 -04:00
let loclist = g :SyntasticLoclist .current ( a :buf )
2014-02-08 05:05:16 -05:00
2015-01-18 07:58:28 -05:00
if exists ( '*SyntasticCheckHook' )
call SyntasticCheckHook ( loclist .getRaw ( ) )
endif
2014-03-02 09:35:00 -05:00
" populate loclist and jump {{{3
2015-01-18 07:58:28 -05:00
let do_jump = syntastic #util #var ( 'auto_jump' ) + 0
2014-03-02 09:35:00 -05:00
if do_jump = = 2
2015-01-18 07:58:28 -05:00
let do_jump = loclist .getFirstError ( 1 )
elseif do_jump = = 3
let do_jump = loclist .getFirstError ( )
elseif 0 > do_jump | | do_jump > 3
let do_jump = 0
2014-02-08 05:05:16 -05:00
endif
2014-03-02 09:35:00 -05:00
if syntastic #util #var ( 'always_populate_loc_list' ) | | do_jump
2016-10-02 07:37:21 -04:00
call loclist .setloclist ( 1 )
2014-02-08 05:05:16 -05:00
if run_checks && do_jump && ! loclist .isEmpty ( )
2014-10-31 17:30:24 -04:00
call syntastic #log #debug ( g :_SYNTASTIC_DEBUG_NOTIFICATIONS , 'loclist: jump' )
2015-01-18 07:58:28 -05:00
execute 'silent! lrewind ' . do_jump
2014-02-08 05:05:16 -05:00
" XXX: Vim doesn't call autocmd commands in a predictible
" order, which can lead to missing filetype when jumping
" to a new file; the following is a workaround for the
" resulting brain damage
2015-07-13 06:22:46 -04:00
if &filetype = = # ''
2014-02-08 05:05:16 -05:00
silent ! filetype detect
endif
endif
endif
2014-03-02 09:35:00 -05:00
" }}}3
2014-02-08 05:05:16 -05:00
call s :notifiers .refresh ( loclist )
2014-03-02 09:35:00 -05:00
endfunction " }}}2
2014-02-08 05:05:16 -05:00
"clear the loc list for the buffer
2016-10-02 07:37:21 -04:00
function ! s :ClearCache ( buf ) abort " {{{2
let loclist = g :SyntasticLoclist .current ( a :buf )
call s :notifiers .reset ( loclist )
call loclist .destroy ( )
2014-03-02 09:35:00 -05:00
endfunction " }}}2
2014-02-08 05:05:16 -05:00
"detect and cache all syntax errors in this buffer
2016-10-02 07:37:21 -04:00
function ! s :CacheErrors ( buf , checker_names ) abort " {{{2
2014-10-31 17:30:24 -04:00
call syntastic #log #debug ( g :_SYNTASTIC_DEBUG_TRACE , 'CacheErrors: ' .
2014-08-03 18:02:51 -04:00
\ ( len ( a :checker_names ) ? join ( a :checker_names ) : 'default checkers' ) )
2016-10-02 07:37:21 -04:00
call s :ClearCache ( a :buf )
2014-02-08 05:05:16 -05:00
let newLoclist = g :SyntasticLoclist .New ( [])
2016-10-02 07:37:21 -04:00
call newLoclist .setOwner ( a :buf )
2014-02-08 05:05:16 -05:00
2016-10-02 07:37:21 -04:00
if ! s :_skip_file ( a :buf )
2014-03-02 09:35:00 -05:00
" debug logging {{{3
2014-10-31 17:30:24 -04:00
call syntastic #log #debugShowVariables ( g :_SYNTASTIC_DEBUG_TRACE , 'aggregate_errors' )
2016-12-27 09:46:49 -05:00
if syntastic #util #isRunningWindows ( )
call syntastic #log #debug ( g :_SYNTASTIC_DEBUG_CHECKERS , '$TMP = ' . string ( $TMP ) . ', $TEMP = ' . string ( $TEMP ) )
else
call syntastic #log #debug ( g :_SYNTASTIC_DEBUG_CHECKERS , '$TERM = ' . string ( $TERM ) )
call syntastic #log #debug ( g :_SYNTASTIC_DEBUG_CHECKERS , '$TMPDIR = ' . string ( $TMPDIR ) )
endif
2015-02-24 05:45:22 -05:00
call syntastic #log #debug ( g :_SYNTASTIC_DEBUG_CHECKERS , '$PATH = ' . string ( $PATH ) )
call syntastic #log #debug ( g :_SYNTASTIC_DEBUG_TRACE , 'getcwd() = ' . string ( getcwd ( ) ) )
2014-03-02 09:35:00 -05:00
" }}}3
2014-02-08 05:05:16 -05:00
2016-11-09 12:22:55 -05:00
let clist = s :registry .getCheckers ( getbufvar ( a :buf , '&filetype' ) , a :checker_names )
let aggregate_errors =
\ syntastic #util #var ( 'aggregate_errors' ) | | len ( syntastic #util #unique ( map ( copy ( clist ) , 'v:val.getFiletype()' ) ) ) > 1
2014-07-02 07:18:18 -04:00
let decorate_errors = aggregate_errors && syntastic #util #var ( 'id_checkers' )
2014-04-18 08:58:02 -04:00
let sort_aggregated_errors = aggregate_errors && syntastic #util #var ( 'sort_aggregated_errors' )
2014-02-08 05:05:16 -05:00
2014-03-02 09:35:00 -05:00
let names = []
2014-07-02 07:18:18 -04:00
let unavailable_checkers = 0
2014-03-02 09:35:00 -05:00
for checker in clist
2016-11-09 12:22:55 -05:00
let cname = checker .getCName ( )
2014-07-02 07:18:18 -04:00
if ! checker .isAvailable ( )
2014-10-31 17:30:24 -04:00
call syntastic #log #debug ( g :_SYNTASTIC_DEBUG_TRACE , 'CacheErrors: Checker ' . cname . ' is not available' )
2014-07-02 07:18:18 -04:00
let unavailable_checkers + = 1
continue
endif
2014-10-31 17:30:24 -04:00
call syntastic #log #debug ( g :_SYNTASTIC_DEBUG_TRACE , 'CacheErrors: Invoking checker: ' . cname )
2014-02-08 05:05:16 -05:00
2014-03-02 09:35:00 -05:00
let loclist = checker .getLocList ( )
2014-02-08 05:05:16 -05:00
2014-03-02 09:35:00 -05:00
if ! loclist .isEmpty ( )
if decorate_errors
2014-03-11 16:10:50 -04:00
call loclist .decorate ( cname )
2014-03-02 09:35:00 -05:00
endif
2014-03-11 16:10:50 -04:00
call add ( names , cname )
2014-10-31 17:30:24 -04:00
if checker .wantSort ( ) && ! sort_aggregated_errors
2014-07-02 07:18:18 -04:00
call loclist .sort ( )
2014-10-31 17:30:24 -04:00
call syntastic #log #debug ( g :_SYNTASTIC_DEBUG_LOCLIST , 'sorted:' , loclist )
2014-07-02 07:18:18 -04:00
endif
2014-02-08 05:05:16 -05:00
2016-10-02 07:37:21 -04:00
call newLoclist .extend ( loclist )
2014-02-08 05:05:16 -05:00
2014-03-02 09:35:00 -05:00
if ! aggregate_errors
break
2014-02-08 05:05:16 -05:00
endif
2014-03-02 09:35:00 -05:00
endif
2014-02-08 05:05:16 -05:00
endfor
2014-03-02 09:35:00 -05:00
" set names {{{3
2014-02-08 05:05:16 -05:00
if ! empty ( names )
2014-03-11 16:10:50 -04:00
if len ( syntastic #util #unique ( map ( copy ( names ) , 'substitute(v:val, "\\m/.*", "", "")' ) ) ) = = 1
let type = substitute ( names [0 ], '\m/.*' , '' , '' )
let name = join ( map ( names , 'substitute(v:val, "\\m.\\{-}/", "", "")' ) , ', ' )
2014-02-08 05:05:16 -05:00
call newLoclist .setName ( name . ' (' . type . ')' )
else
" checkers from mixed types
2014-03-11 16:10:50 -04:00
call newLoclist .setName ( join ( names , ', ' ) )
2014-02-08 05:05:16 -05:00
endif
endif
2014-03-02 09:35:00 -05:00
" }}}3
2014-02-08 05:05:16 -05:00
2014-03-02 09:35:00 -05:00
" issue warning about no active checkers {{{3
2014-07-02 07:18:18 -04:00
if len ( clist ) = = unavailable_checkers
2014-03-02 09:35:00 -05:00
if ! empty ( a :checker_names )
if len ( a :checker_names ) = = 1
call syntastic #log #warn ( 'checker ' . a :checker_names [0 ] . ' is not available' )
2014-02-08 05:05:16 -05:00
else
2014-03-02 09:35:00 -05:00
call syntastic #log #warn ( 'checkers ' . join ( a :checker_names , ', ' ) . ' are not available' )
2014-02-08 05:05:16 -05:00
endif
else
2014-10-31 17:30:24 -04:00
call syntastic #log #debug ( g :_SYNTASTIC_DEBUG_TRACE , 'CacheErrors: no checkers available for ' . &filetype )
2014-02-08 05:05:16 -05:00
endif
endif
2014-03-02 09:35:00 -05:00
" }}}3
2014-02-08 05:05:16 -05:00
2014-10-31 17:30:24 -04:00
call syntastic #log #debug ( g :_SYNTASTIC_DEBUG_LOCLIST , 'aggregated:' , newLoclist )
2014-04-18 08:58:02 -04:00
if sort_aggregated_errors
call newLoclist .sort ( )
2014-10-31 17:30:24 -04:00
call syntastic #log #debug ( g :_SYNTASTIC_DEBUG_LOCLIST , 'sorted:' , newLoclist )
2014-04-18 08:58:02 -04:00
endif
2014-02-08 05:05:16 -05:00
endif
2014-07-02 07:18:18 -04:00
call newLoclist .deploy ( )
2014-03-02 09:35:00 -05:00
endfunction " }}}2
2014-02-08 05:05:16 -05:00
"Emulates 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
" 'preprocess' - a function to be applied to the error file before parsing errors
" 'postprocess' - a list of functions to be applied to the error list
" 'cwd' - change directory to the given path before running the checker
2014-08-03 18:02:51 -04:00
" 'env' - environment variables to set before running the checker
2014-02-08 05:05:16 -05:00
" 'returns' - a list of valid exit codes for the checker
2014-08-03 18:02:51 -04:00
" @vimlint(EVL102, 1, l:env_save)
2015-02-24 05:45:22 -05:00
function ! SyntasticMake ( options ) abort " {{{2
2014-10-31 17:30:24 -04:00
call syntastic #log #debug ( g :_SYNTASTIC_DEBUG_TRACE , 'SyntasticMake: called with options:' , a :options )
2014-02-08 05:05:16 -05:00
2014-03-02 09:35:00 -05:00
" save options and locale env variables {{{3
2014-02-08 05:05:16 -05:00
let old_local_errorformat = &l :errorformat
let old_errorformat = &errorformat
let old_cwd = getcwd ( )
2014-03-02 09:35:00 -05:00
" }}}3
2014-02-08 05:05:16 -05:00
if has_key ( a :options , 'errorformat' )
let &errorformat = a :options ['errorformat' ]
2016-01-05 13:18:45 -05:00
set errorformat <
2014-02-08 05:05:16 -05:00
endif
if has_key ( a :options , 'cwd' )
execute 'lcd ' . fnameescape ( a :options ['cwd' ])
endif
2014-08-03 18:02:51 -04:00
" set environment variables {{{3
let env_save = {}
if has_key ( a :options , 'env' ) && len ( a :options ['env' ])
for key in keys ( a :options ['env' ])
2016-06-11 09:56:50 -04:00
if key = ~ ? '\m^[a-z_][a-z0-9_]*$'
2015-02-24 05:45:22 -05:00
execute 'let env_save[' . string ( key ) . '] = $' . key
execute 'let $' . key . ' = ' . string ( a :options ['env' ][key ])
2014-08-03 18:02:51 -04:00
endif
endfor
endif
" }}}3
2015-03-14 16:02:10 -04:00
let err_lines = split ( syntastic #util #system ( a :options ['makeprg' ]) , "\n" , 1 )
2014-08-03 18:02:51 -04:00
" restore environment variables {{{3
if len ( env_save )
for key in keys ( env_save )
2015-02-24 05:45:22 -05:00
execute 'let $' . key . ' = ' . string ( env_save [key ])
2014-08-03 18:02:51 -04:00
endfor
endif
" }}}3
2014-02-08 05:05:16 -05:00
2014-10-31 17:30:24 -04:00
call syntastic #log #debug ( g :_SYNTASTIC_DEBUG_LOCLIST , 'checker output:' , err_lines )
" Does it still make sense to go on?
let bailout =
\ syntastic #util #var ( 'exit_checks' ) &&
\ has_key ( a :options , 'returns' ) &&
\ index ( a :options ['returns' ], v :shell_error ) = = -1
if ! bailout
if has_key ( a :options , 'Preprocess' )
let err_lines = call ( a :options ['Preprocess' ], [err_lines ])
call syntastic #log #debug ( g :_SYNTASTIC_DEBUG_LOCLIST , 'preprocess (external):' , err_lines )
elseif has_key ( a :options , 'preprocess' )
let err_lines = call ( 'syntastic#preprocess#' . a :options ['preprocess' ], [err_lines ])
call syntastic #log #debug ( g :_SYNTASTIC_DEBUG_LOCLIST , 'preprocess:' , err_lines )
endif
2016-10-02 07:37:21 -04:00
noautocmd lgetexpr err_lines
2014-02-08 05:05:16 -05:00
2014-10-31 17:30:24 -04:00
let errors = deepcopy ( getloclist ( 0 ) )
2014-02-08 05:05:16 -05:00
2014-10-31 17:30:24 -04:00
if has_key ( a :options , 'cwd' )
execute 'lcd ' . fnameescape ( old_cwd )
endif
2014-02-08 05:05:16 -05:00
2014-10-31 17:30:24 -04:00
try
silent lolder
catch /\m^Vim\%((\a\+)\)\=:E380/
" E380: At bottom of quickfix stack
call setloclist ( 0 , [], 'r' )
2016-10-02 07:37:21 -04:00
try
" Vim 7.4.2200 or later
call setloclist ( 0 , [], 'r' , { 'title' : '' })
catch /\m^Vim\%((\a\+)\)\=:E\%(118\|731\)/
" do nothing
endtry
2014-10-31 17:30:24 -04:00
catch /\m^Vim\%((\a\+)\)\=:E776/
" E776: No location list
" do nothing
endtry
else
let errors = []
2014-02-08 05:05:16 -05:00
endif
2014-03-02 09:35:00 -05:00
" restore options {{{3
2014-02-08 05:05:16 -05:00
let &errorformat = old_errorformat
let &l :errorformat = old_local_errorformat
2014-03-02 09:35:00 -05:00
" }}}3
2014-02-08 05:05:16 -05:00
2015-07-13 06:22:46 -04:00
if ! s :_running_windows && ( s :_os_name ( ) = ~ ? 'FreeBSD' | | s :_os_name ( ) = ~ ? 'OpenBSD' )
2014-02-08 05:05:16 -05:00
call syntastic #util #redraw ( g :syntastic_full_redraws )
endif
2014-10-31 17:30:24 -04:00
if bailout
2015-07-13 06:22:46 -04:00
call syntastic #log #ndebug ( g :_SYNTASTIC_DEBUG_LOCLIST , 'checker output:' , err_lines )
2014-02-08 05:05:16 -05:00
throw 'Syntastic: checker error'
endif
2014-10-31 17:30:24 -04:00
call syntastic #log #debug ( g :_SYNTASTIC_DEBUG_LOCLIST , 'raw loclist:' , errors )
2014-02-08 05:05:16 -05:00
if has_key ( a :options , 'defaults' )
2015-01-18 07:58:28 -05:00
call s :_add_to_errors ( errors , a :options ['defaults' ])
2014-02-08 05:05:16 -05:00
endif
" Add subtype info if present.
if has_key ( a :options , 'subtype' )
2015-01-18 07:58:28 -05:00
call s :_add_to_errors ( errors , { 'subtype' : a :options ['subtype' ] })
2014-02-08 05:05:16 -05:00
endif
2014-03-11 16:10:50 -04:00
if has_key ( a :options , 'Postprocess' ) && ! empty ( a :options ['Postprocess' ])
for rule in a :options ['Postprocess' ]
let errors = call ( rule , [errors ])
endfor
2014-10-31 17:30:24 -04:00
call syntastic #log #debug ( g :_SYNTASTIC_DEBUG_LOCLIST , 'postprocess (external):' , errors )
2014-03-11 16:10:50 -04:00
elseif has_key ( a :options , 'postprocess' ) && ! empty ( a :options ['postprocess' ])
2014-02-08 05:05:16 -05:00
for rule in a :options ['postprocess' ]
let errors = call ( 'syntastic#postprocess#' . rule , [errors ])
endfor
2014-10-31 17:30:24 -04:00
call syntastic #log #debug ( g :_SYNTASTIC_DEBUG_LOCLIST , 'postprocess:' , errors )
2014-02-08 05:05:16 -05:00
endif
return errors
2014-03-02 09:35:00 -05:00
endfunction " }}}2
2014-08-03 18:02:51 -04:00
" @vimlint(EVL102, 0, l:env_save)
2014-02-08 05:05:16 -05:00
2014-03-02 09:35:00 -05:00
"return a string representing the state of buffer according to
"g:syntastic_stl_format
"
"return '' if no errors are cached for the buffer
2015-02-24 05:45:22 -05:00
function ! SyntasticStatuslineFlag ( ) abort " {{{2
2014-03-02 09:35:00 -05:00
return g :SyntasticLoclist .current ( ) .getStatuslineFlag ( )
endfunction " }}}2
" }}}1
" Utilities {{{1
2015-02-24 05:45:22 -05:00
function ! s :_ignore_file ( filename ) abort " {{{2
2014-03-02 09:35:00 -05:00
let fname = fnamemodify ( a :filename , ':p' )
for pattern in g :syntastic_ignore_files
if fname = ~ # pattern
return 1
endif
endfor
return 0
endfunction " }}}2
2015-12-08 08:20:04 -05:00
function ! s :_is_quitting ( buf ) abort " {{{2
let quitting = 0
if exists ( 'w:syntastic_wid' )
let key = a :buf . '_' . getbufvar ( a :buf , 'changetick' ) . '_' . w :syntastic_wid
let idx = index ( s :_quit_pre , key )
if idx > = 0
call remove ( s :_quit_pre , idx )
let quitting = 1
endif
endif
return quitting
endfunction " }}}2
2014-03-02 09:35:00 -05:00
" Skip running in special buffers
2016-10-02 07:37:21 -04:00
function ! s :_skip_file ( buf ) abort " {{{2
let fname = bufname ( a :buf )
let skip = s :_is_quitting ( a :buf ) | | getbufvar ( a :buf , 'syntastic_skip_checks' ) | |
\ ( getbufvar ( a :buf , '&buftype' ) ! = # '' ) | | ! filereadable ( fname ) | | getwinvar ( 0 , '&diff' ) | |
2016-01-05 13:18:45 -05:00
\ getwinvar ( 0 , '&previewwindow' ) | | s :_ignore_file ( fname ) | |
\ fnamemodify ( fname , ':e' ) = ~ ? g :syntastic_ignore_extensions
2014-08-03 18:02:51 -04:00
if skip
2015-01-18 07:58:28 -05:00
call syntastic #log #debug ( g :_SYNTASTIC_DEBUG_TRACE , '_skip_file: skipping checks' )
2014-08-03 18:02:51 -04:00
endif
return skip
2014-03-02 09:35:00 -05:00
endfunction " }}}2
2014-10-31 17:30:24 -04:00
" Explain why checks will be skipped for the current file
2015-02-24 05:45:22 -05:00
function ! s :_explain_skip ( filetypes ) abort " {{{2
2016-10-02 07:37:21 -04:00
let buf = bufnr ( '' )
if empty ( a :filetypes ) && s :_skip_file ( buf )
2014-10-31 17:30:24 -04:00
let why = []
2016-10-02 07:37:21 -04:00
let fname = bufname ( buf )
let bt = getbufvar ( buf , '&buftype' )
2014-10-31 17:30:24 -04:00
2016-10-02 07:37:21 -04:00
if s :_is_quitting ( buf )
2015-12-08 08:20:04 -05:00
call add ( why , 'quitting buffer' )
endif
2016-10-02 07:37:21 -04:00
if getbufvar ( buf , 'syntastic_skip_checks' )
2014-10-31 17:30:24 -04:00
call add ( why , 'b:syntastic_skip_checks set' )
endif
2016-10-02 07:37:21 -04:00
if bt ! = # ''
2014-10-31 17:30:24 -04:00
call add ( why , 'buftype = ' . string ( &buftype ) )
endif
if ! filereadable ( fname )
call add ( why , 'file not readable / not local' )
endif
if getwinvar ( 0 , '&diff' )
call add ( why , 'diff mode' )
endif
2016-01-05 13:18:45 -05:00
if getwinvar ( 0 , '&previewwindow' )
call add ( why , 'preview window' )
endif
2015-01-18 07:58:28 -05:00
if s :_ignore_file ( fname )
2014-10-31 17:30:24 -04:00
call add ( why , 'filename matching g:syntastic_ignore_files' )
endif
if fnamemodify ( fname , ':e' ) = ~ ? g :syntastic_ignore_extensions
call add ( why , 'extension matching g:syntastic_ignore_extensions' )
endif
echomsg 'The current file will not be checked (' . join ( why , ', ' ) . ')'
endif
endfunction " }}}2
2014-03-02 09:35:00 -05:00
" Take a list of errors and add default values to them from a:options
2015-02-24 05:45:22 -05:00
function ! s :_add_to_errors ( errors , options ) abort " {{{2
2014-02-08 05:05:16 -05:00
for err in a :errors
for key in keys ( a :options )
if ! has_key ( err , key ) | | empty ( err [key ])
let err [key ] = a :options [key ]
endif
endfor
endfor
return a :errors
2014-03-02 09:35:00 -05:00
endfunction " }}}2
2015-02-24 05:45:22 -05:00
function ! s :_os_name ( ) abort " {{{2
return g :_SYNTASTIC_UNAME
2014-03-02 09:35:00 -05:00
endfunction " }}}2
" }}}1
2014-02-08 05:05:16 -05:00
2014-03-02 09:35:00 -05:00
" vim: set sw=4 sts=4 et fdm=marker: