summaryrefslogtreecommitdiff
path: root/ale_linters/tex/lacheck.vim
blob: 848cbed240b922474d548f751682ba25f8e00d62 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
" Author: Andrew Balmos - <andrew@balmos.org>
" Description: lacheck for LaTeX files

let g:ale_tex_lacheck_executable =
\   get(g:, 'ale_tex_lacheck_executable', 'lacheck')

function! ale_linters#tex#lacheck#GetExecutable(buffer) abort
    return g:ale_tex_lacheck_executable
endfunction

function! ale_linters#tex#lacheck#GetCommand(buffer) abort
    return g:ale_tex_lacheck_executable . ' %t'
endfunction

function! ale_linters#tex#lacheck#Handle(buffer, lines) abort
  " Mattes lines like:
  "
  " "book.tex", line 37: possible unwanted space at "{"
  " "book.tex", line 38: missing `\ ' after "etc."

  let l:pattern = '^".\+", line \(\d\+\): \(.\+\)$'
  let l:output = []

  for l:line in a:lines
    let l:match = matchlist(l:line, l:pattern)

    if len(l:match) == 0
      continue
    endif

    " lacheck follows `\input{}` commands. If the cwd is not the same as the
    " file in the buffer then it will fail to find the inputed items. We do not
    " want warnings from those items anyway
    if !empty(matchstr(l:match[2], '^Could not open ".\+"$'))
      continue
    endif

    call add(l:output, {
    \   'bufnr': a:buffer,
    \   'lnum': l:match[1] + 0,
    \   'vcol': 0,
    \   'col': 0,
    \   'text': l:match[2],
    \   'type': 'W',
    \   'nr': -1
    \})
  endfor

  return l:output
endfunction

call ale#linter#Define('tex', {
\   'name': 'lacheck',
\   'executable_callback': 'ale_linters#tex#lacheck#GetExecutable',
\   'command_callback': 'ale_linters#tex#lacheck#GetCommand',
\   'callback': 'ale_linters#tex#lacheck#Handle'
\})