diff options
Diffstat (limited to 'vim/bundle/syntastic/syntax_checkers/r')
-rw-r--r-- | vim/bundle/syntastic/syntax_checkers/r/lint.vim | 82 | ||||
-rw-r--r-- | vim/bundle/syntastic/syntax_checkers/r/lintr.vim | 81 | ||||
-rw-r--r-- | vim/bundle/syntastic/syntax_checkers/r/svtools.vim | 74 |
3 files changed, 237 insertions, 0 deletions
diff --git a/vim/bundle/syntastic/syntax_checkers/r/lint.vim b/vim/bundle/syntastic/syntax_checkers/r/lint.vim new file mode 100644 index 0000000..854c170 --- /dev/null +++ b/vim/bundle/syntastic/syntax_checkers/r/lint.vim @@ -0,0 +1,82 @@ +"============================================================================ +"File: lint.vim +"Description: Syntax checking plugin for syntastic.vim +"Maintainer: LCD 47 <lcd047 at gmail dot com> +"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_r_lint_checker') + finish +endif +let g:loaded_syntastic_r_lint_checker = 1 + +if !exists('g:syntastic_r_lint_styles') + let g:syntastic_r_lint_styles = 'lint.style' +endif + +if !exists('g:syntastic_r_lint_sort') + let g:syntastic_r_lint_sort = 1 +endif + +let s:save_cpo = &cpo +set cpo&vim + +function! SyntaxCheckers_r_lint_GetHighlightRegex(item) + let term = matchstr(a:item['text'], '\m`\zs[^`]\+\ze`') + if term ==# '' + let term = matchstr(a:item['text'], "\\m'\\zs[^']\\+\\ze'") + endif + return term !=# '' ? '\V' . escape(term, '\') : '' +endfunction + +function! SyntaxCheckers_r_lint_IsAvailable() dict + if !executable(self.getExec()) + return 0 + endif + call syntastic#util#system(self.getExecEscaped() . ' --slave --restore --no-save -e ' . syntastic#util#shescape('library(lint)')) + return v:shell_error == 0 +endfunction + +function! SyntaxCheckers_r_lint_GetLocList() dict + let setwd = syntastic#util#isRunningWindows() ? 'setwd("' . escape(getcwd(), '"\') . '"); ' : '' + let makeprg = self.getExecEscaped() . ' --slave --restore --no-save' . + \ ' -e ' . syntastic#util#shescape(setwd . 'library(lint); ' . + \ 'try(lint(commandArgs(TRUE), ' . g:syntastic_r_lint_styles . '))') . + \ ' --args ' . syntastic#util#shexpand('%') + + let errorformat = + \ '%t:%f:%l:%v: %m,' . + \ '%t:%f:%l: %m' + + let loclist = SyntasticMake({ + \ 'makeprg': makeprg, + \ 'errorformat': errorformat, + \ 'subtype': 'Style', + \ 'preprocess': 'rparse', + \ 'returns': [0] }) + + for e in loclist + if e['type'] ==? 'F' + " parse error + let e['type'] = 'E' + call remove(e, 'subtype') + endif + endfor + + return loclist +endfunction + +call g:SyntasticRegistry.CreateAndRegisterChecker({ + \ 'filetype': 'r', + \ 'name': 'lint', + \ 'exec': 'R' }) + +let &cpo = s:save_cpo +unlet s:save_cpo + +" vim: set sw=4 sts=4 et fdm=marker: diff --git a/vim/bundle/syntastic/syntax_checkers/r/lintr.vim b/vim/bundle/syntastic/syntax_checkers/r/lintr.vim new file mode 100644 index 0000000..7c71ec0 --- /dev/null +++ b/vim/bundle/syntastic/syntax_checkers/r/lintr.vim @@ -0,0 +1,81 @@ +"============================================================================ +"File: lintr.vim +"Description: Syntax checking plugin for syntastic.vim +"Maintainer: Jim Hester <james.f.hester at gmail dot com> +"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. +" +"============================================================================ +" +" Security: +" +" This checker runs the code in your file. This is probably fine if you +" wrote the file yourself, but it can be a problem if you're trying to +" check third party files. If you are 100% willing to let Vim run the +" code in your file, set g:syntastic_enable_r_lintr_checker to 1 in +" your vimrc to enable this checker: +" +" let g:syntastic_enable_r_lintr_checker = 1 + +if exists("g:loaded_syntastic_r_lintr_checker") + finish +endif +let g:loaded_syntastic_r_lintr_checker = 1 + +if !exists('g:syntastic_r_lintr_linters') + let g:syntastic_r_lintr_linters = 'default_linters' +endif + +if !exists('g:syntastic_r_lintr_cache') + let g:syntastic_r_lintr_cache = 'FALSE' +endif + +let s:save_cpo = &cpo +set cpo&vim + +function! SyntaxCheckers_r_lintr_GetHighlightRegex(item) + let term = matchstr(a:item['text'], "\\m'\\zs[^']\\+\\ze'") + return term != '' ? '\V' . escape(term, '\') : '' +endfunction + +function! SyntaxCheckers_r_lintr_IsAvailable() dict + if !executable(self.getExec()) + return 0 + endif + call system(self.getExecEscaped() . ' --slave --no-restore --no-save -e ' . syntastic#util#shescape('library(lintr)')) + return v:shell_error == 0 +endfunction + +function! SyntaxCheckers_r_lintr_GetLocList() dict + let setwd = syntastic#util#isRunningWindows() ? 'setwd("' . escape(getcwd(), '"\') . '"); ' : '' + let makeprg = self.getExecEscaped() . ' --slave --no-restore --no-save' . + \ ' -e ' . syntastic#util#shescape(setwd . 'suppressPackageStartupMessages(library(lintr)); ' . + \ 'lint(cache = ' . g:syntastic_r_lintr_cache . ', commandArgs(TRUE), ' . g:syntastic_r_lintr_linters . ')') . + \ ' --args ' . syntastic#util#shexpand('%') + + let errorformat = + \ '%W%f:%l:%c: style: %m,' . + \ '%W%f:%l:%c: warning: %m,' . + \ '%E%f:%l:%c: error: %m,' + + call self.setWantSort(1) + + return SyntasticMake({ + \ 'makeprg': makeprg, + \ 'errorformat': errorformat, + \ 'returns': [0] }) +endfunction + +call g:SyntasticRegistry.CreateAndRegisterChecker({ + \ 'filetype': 'r', + \ 'name': 'lintr', + \ 'exec': 'R', + \ 'enable': 'enable_r_lintr_checker'}) + +let &cpo = s:save_cpo +unlet s:save_cpo + +" vim: set sw=4 sts=4 et fdm=marker: diff --git a/vim/bundle/syntastic/syntax_checkers/r/svtools.vim b/vim/bundle/syntastic/syntax_checkers/r/svtools.vim new file mode 100644 index 0000000..d2a6a74 --- /dev/null +++ b/vim/bundle/syntastic/syntax_checkers/r/svtools.vim @@ -0,0 +1,74 @@ +"============================================================================ +"File: svtools.vim +"Description: Syntax checking plugin for syntastic.vim +"Maintainer: LCD 47 <lcd047 at gmail dot com> +"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. +" +"============================================================================ +" +" Security: +" +" This checker runs the code in your file. This is probably fine if you +" wrote the file yourself, but it can be a problem if you're trying to +" check third party files. If you are 100% willing to let Vim run the +" code in your file, set g:syntastic_enable_r_svtools_checker to 1 in +" your vimrc to enable this checker: +" +" let g:syntastic_enable_r_svtools_checker = 1 + +if exists('g:loaded_syntastic_r_svtools_checker') + finish +endif +let g:loaded_syntastic_r_svtools_checker = 1 + +if !exists('g:syntastic_r_svtools_styles') + let g:syntastic_r_svtools_styles = 'lint.style' +endif + +let s:save_cpo = &cpo +set cpo&vim + +function! SyntaxCheckers_r_svtools_GetHighlightRegex(item) + let term = matchstr(a:item['text'], "\\m'\\zs[^']\\+\\ze'") + return term !=# '' ? '\V' . escape(term, '\') : '' +endfunction + +function! SyntaxCheckers_r_svtools_IsAvailable() dict + if !executable(self.getExec()) + return 0 + endif + call syntastic#util#system(self.getExecEscaped() . ' --slave --restore --no-save -e ' . syntastic#util#shescape('library(svTools)')) + return v:shell_error == 0 +endfunction + +function! SyntaxCheckers_r_svtools_GetLocList() dict + let setwd = syntastic#util#isRunningWindows() ? 'setwd("' . escape(getcwd(), '"\') . '"); ' : '' + let makeprg = self.getExecEscaped() . ' --slave --restore --no-save' . + \ ' -e ' . syntastic#util#shescape(setwd . 'library(svTools); ' . + \ 'try(lint(commandArgs(TRUE), filename = commandArgs(TRUE), type = "flat", sep = ":"))') . + \ ' --args ' . syntastic#util#shexpand('%') + + let errorformat = + \ '%trror:%f:%\s%#%l:%\s%#%v:%m,' . + \ '%tarning:%f:%\s%#%l:%\s%#%v:%m' + + return SyntasticMake({ + \ 'makeprg': makeprg, + \ 'errorformat': errorformat, + \ 'returns': [0] }) +endfunction + +call g:SyntasticRegistry.CreateAndRegisterChecker({ + \ 'filetype': 'r', + \ 'name': 'svtools', + \ 'exec': 'R', + \ 'enable': 'enable_r_svtools_checker'}) + +let &cpo = s:save_cpo +unlet s:save_cpo + +" vim: set sw=4 sts=4 et fdm=marker: |