Before:
  Save g:ale_warn_about_trailing_whitespace
  Save g:ale_linters

  let g:ale_warn_about_trailing_whitespace = 1

  let g:testlinter1 = {'name': 'testlinter1', 'executable': 'testlinter1', 'command': 'testlinter1', 'callback': 'testCB1', 'output_stream': 'stdout'}
  let g:testlinter2 = {'name': 'testlinter2', 'executable': 'testlinter2', 'command': 'testlinter2', 'callback': 'testCB2', 'output_stream': 'stdout'}

  call ale#linter#Reset()
  let g:ale_linters = {}
  let g:ale_linter_aliases = {}
  let g:ale_buffer_info = {}
  let g:globals_lines = [
  \  ' Global Variables:',
  \  '',
  \  'let g:ale_echo_cursor = 1',
  \  'let g:ale_echo_msg_error_str = ''Error''',
  \  'let g:ale_echo_msg_format = ''%s''',
  \  'let g:ale_echo_msg_warning_str = ''Warning''',
  \  'let g:ale_enabled = 1',
  \  'let g:ale_keep_list_window_open = 0',
  \  'let g:ale_lint_delay = 200',
  \  'let g:ale_lint_on_enter = 1',
  \  'let g:ale_lint_on_save = 1',
  \  'let g:ale_lint_on_text_changed = ''always''',
  \  'let g:ale_linter_aliases = {}',
  \  'let g:ale_linters = {}',
  \  'let g:ale_open_list = 0',
  \  'let g:ale_set_highlights = 1',
  \  'let g:ale_set_loclist = 1',
  \  'let g:ale_set_quickfix = 0',
  \  'let g:ale_set_signs = 1',
  \  'let g:ale_sign_column_always = 0',
  \  'let g:ale_sign_error = ''>>''',
  \  'let g:ale_sign_offset = 1000000',
  \  'let g:ale_sign_warning = ''--''',
  \  'let g:ale_statusline_format = [''%d error(s)'', ''%d warning(s)'', ''OK'']',
  \  'let g:ale_warn_about_trailing_whitespace = 1',
  \]
  let g:command_header = [
  \ '  Command History:',
  \]

  function CheckInfo(expected_list) abort
    let l:output = ''

    redir => l:output
      noautocmd silent ALEInfo
    redir END

    AssertEqual a:expected_list, split(l:output, "\n")
  endfunction

After:
  Restore

  let g:ale_buffer_info = {}

  unlet!  g:testlinter1
  unlet!  g:testlinter2

  unlet! b:ale_linters
  unlet! g:output
  unlet! g:globals_string
  unlet! g:command_header
  let g:ale_buffer_info = {}
  let g:ale_history_log_output = 0
  unlet! g:ale_testft_testlinter1_foo
  unlet! g:ale_testft_testlinter1_bar
  unlet! g:ale_testft2_testlinter2_foo
  unlet! b:ale_testft2_testlinter2_foo
  unlet! g:ale_testft2_testlinter2_bar
  delfunction CheckInfo

Given nolintersft (Empty buffer with no linters):
Execute (ALEInfo with no linters should return the right output):
  call CheckInfo([
  \ ' Current Filetype: nolintersft',
  \ 'Available Linters: []',
  \ '  Enabled Linters: []',
  \ ' Linter Variables:',
  \ '',
  \] + g:globals_lines + g:command_header)

Given (Empty buffer with no filetype):
Execute (ALEInfo should return buffer-local global ALE settings):
  let b:ale_linters = {'x': ['y']}

  call insert(
  \ g:globals_lines,
  \ 'let b:ale_linters = {''x'': [''y'']}',
  \ index(g:globals_lines, 'let g:ale_linters = {}') + 1
  \)

  call CheckInfo([
  \ ' Current Filetype: ',
  \ 'Available Linters: []',
  \ '  Enabled Linters: []',
  \ ' Linter Variables:',
  \ '',
  \] + g:globals_lines + g:command_header)

Given (Empty buffer with no filetype):
Execute (ALEInfo with no filetype should return the right output):
  call CheckInfo([
  \ ' Current Filetype: ',
  \ 'Available Linters: []',
  \ '  Enabled Linters: []',
  \ ' Linter Variables:',
  \ '',
  \] + g:globals_lines + g:command_header)

Given testft (Empty buffer):
Execute (ALEInfo with a single linter should return the right output):
  call ale#linter#Define('testft', g:testlinter1)

  call CheckInfo([
  \ ' Current Filetype: testft',
  \ 'Available Linters: [''testlinter1'']',
  \ '  Enabled Linters: [''testlinter1'']',
  \ ' Linter Variables:',
  \ '',
  \] + g:globals_lines + g:command_header)

Given testft (Empty buffer):
Execute (ALEInfo with two linters should return the right output):
  call ale#linter#Define('testft', g:testlinter1)
  call ale#linter#Define('testft', g:testlinter2)

  call CheckInfo([
  \ ' Current Filetype: testft',
  \ 'Available Linters: [''testlinter1'', ''testlinter2'']',
  \ '  Enabled Linters: [''testlinter1'', ''testlinter2'']',
  \ ' Linter Variables:',
  \ '',
  \] + g:globals_lines + g:command_header)

Given testft (Empty buffer):
Execute (ALEInfo should calculate enabled linters correctly):
  call ale#linter#Define('testft', g:testlinter1)
  call ale#linter#Define('testft', g:testlinter2)
  let g:ale_linters = {'testft': ['testlinter2']}

  let g:globals_lines[index(g:globals_lines, 'let g:ale_linters = {}')]
  \ = 'let g:ale_linters = {''testft'': [''testlinter2'']}'

  call CheckInfo([
  \ ' Current Filetype: testft',
  \ 'Available Linters: [''testlinter1'', ''testlinter2'']',
  \ '  Enabled Linters: [''testlinter2'']',
  \ ' Linter Variables:',
  \ '',
  \] + g:globals_lines + g:command_header)

Given testft (Empty buffer):
Execute (ALEInfo should only return linters for current filetype):
  call ale#linter#Define('testft', g:testlinter1)
  call ale#linter#Define('testft2', g:testlinter2)

  call CheckInfo([
  \ ' Current Filetype: testft',
  \ 'Available Linters: [''testlinter1'']',
  \ '  Enabled Linters: [''testlinter1'']',
  \ ' Linter Variables:',
  \ '',
  \] + g:globals_lines + g:command_header)

Given testft.testft2 (Empty buffer with two filetypes):
Execute (ALEInfo with compound filetypes should return linters for both of them):
  call ale#linter#Define('testft', g:testlinter1)
  call ale#linter#Define('testft2', g:testlinter2)

  call CheckInfo([
  \ ' Current Filetype: testft.testft2',
  \ 'Available Linters: [''testlinter1'', ''testlinter2'']',
  \ '  Enabled Linters: [''testlinter1'', ''testlinter2'']',
  \ ' Linter Variables:',
  \ '',
  \] + g:globals_lines + g:command_header)

Given testft.testft2 (Empty buffer with two filetypes):
Execute (ALEInfo should return appropriately named global variables):
  let g:ale_testft_testlinter1_foo = 'abc'
  let g:ale_testft_testlinter1_bar = ['abc']
  let g:ale_testft2_testlinter2_foo = 123
  let g:ale_testft2_testlinter2_bar = {'x': 'y'}

  call ale#linter#Define('testft', g:testlinter1)
  call ale#linter#Define('testft2', g:testlinter2)

  call CheckInfo([
  \ ' Current Filetype: testft.testft2',
  \ 'Available Linters: [''testlinter1'', ''testlinter2'']',
  \ '  Enabled Linters: [''testlinter1'', ''testlinter2'']',
  \ ' Linter Variables:',
  \ '',
  \ 'let g:ale_testft2_testlinter2_bar = {''x'': ''y''}',
  \ 'let g:ale_testft2_testlinter2_foo = 123',
  \ 'let g:ale_testft_testlinter1_bar = [''abc'']',
  \ 'let g:ale_testft_testlinter1_foo = ''abc''',
  \] + g:globals_lines + g:command_header)

Given testft.testft2 (Empty buffer with two filetypes):
Execute (ALEInfo should buffer-local linter variables):
  let g:ale_testft2_testlinter2_foo = 123
  let b:ale_testft2_testlinter2_foo = 456

  call ale#linter#Define('testft', g:testlinter1)
  call ale#linter#Define('testft2', g:testlinter2)

  call CheckInfo([
  \ ' Current Filetype: testft.testft2',
  \ 'Available Linters: [''testlinter1'', ''testlinter2'']',
  \ '  Enabled Linters: [''testlinter1'', ''testlinter2'']',
  \ ' Linter Variables:',
  \ '',
  \ 'let g:ale_testft2_testlinter2_foo = 123',
  \ 'let b:ale_testft2_testlinter2_foo = 456',
  \] + g:globals_lines + g:command_header)

Given testft.testft2 (Empty buffer with two filetypes):
Execute (ALEInfo should output linter aliases):
  let g:testlinter1.aliases = ['testftalias1', 'testftalias2']
  let g:testlinter2.aliases = ['testftalias3', 'testftalias4']

  let g:ale_testft2_testlinter2_foo = 123
  let b:ale_testft2_testlinter2_foo = 456

  call ale#linter#Define('testft', g:testlinter1)
  call ale#linter#Define('testft2', g:testlinter2)

  call CheckInfo([
  \ ' Current Filetype: testft.testft2',
  \ 'Available Linters: [''testlinter1'', ''testlinter2'']',
  \ '   Linter Aliases:',
  \ '''testlinter1'' -> [''testftalias1'', ''testftalias2'']',
  \ '''testlinter2'' -> [''testftalias3'', ''testftalias4'']',
  \ '  Enabled Linters: [''testlinter1'', ''testlinter2'']',
  \ ' Linter Variables:',
  \ '',
  \ 'let g:ale_testft2_testlinter2_foo = 123',
  \ 'let b:ale_testft2_testlinter2_foo = 456',
  \] + g:globals_lines + g:command_header)

Given testft.testft2 (Empty buffer with two filetypes):
Execute (ALEInfo should return command history):
  let g:ale_buffer_info[bufnr('%')] = {
  \ 'history': [
  \   {'status': 'started', 'job_id': 347, 'command': 'first command'},
  \   {'status': 'started', 'job_id': 347, 'command': ['/bin/bash', '\c', 'last command']},
  \ ],
  \}

  call ale#linter#Define('testft', g:testlinter1)
  call ale#linter#Define('testft2', g:testlinter2)

  call CheckInfo([
  \   ' Current Filetype: testft.testft2',
  \   'Available Linters: [''testlinter1'', ''testlinter2'']',
  \   '  Enabled Linters: [''testlinter1'', ''testlinter2'']',
  \ ' Linter Variables:',
  \ '',
  \] + g:globals_lines + g:command_header + [
  \ '',
  \ '(started) ''first command''',
  \ '(started) [''/bin/bash'', ''\c'', ''last command'']',
  \])

Given testft.testft2 (Empty buffer with two filetypes):
Execute (ALEInfo command history should print exit codes correctly):
  let g:ale_buffer_info[bufnr('%')] = {
  \ 'history': [
  \   {'status': 'finished', 'exit_code': 0, 'job_id': 347, 'command': 'first command'},
  \   {'status': 'finished', 'exit_code': 1, 'job_id': 347, 'command': ['/bin/bash', '\c', 'last command']},
  \ ],
  \}

  call ale#linter#Define('testft', g:testlinter1)
  call ale#linter#Define('testft2', g:testlinter2)

  call CheckInfo([
  \   ' Current Filetype: testft.testft2',
  \   'Available Linters: [''testlinter1'', ''testlinter2'']',
  \   '  Enabled Linters: [''testlinter1'', ''testlinter2'']',
  \ ' Linter Variables:',
  \ '',
  \] + g:globals_lines + g:command_header + [
  \ '',
  \ '(finished - exit code 0) ''first command''',
  \ '(finished - exit code 1) [''/bin/bash'', ''\c'', ''last command'']',
  \])

Given testft.testft2 (Empty buffer with two filetypes):
Execute (ALEInfo command history should print command output if logging is on):
  let g:ale_history_log_output = 1

  let g:ale_buffer_info[bufnr('%')] = {
  \ 'history': [
  \   {
  \     'status': 'finished',
  \     'exit_code': 0,
  \     'job_id': 347,
  \     'command': 'first command',
  \     'output': ['some', 'first command output'],
  \   },
  \   {
  \     'status': 'finished',
  \     'exit_code': 1,
  \     'job_id': 347,
  \     'command': ['/bin/bash', '\c', 'last command'],
  \     'output': ['different second command output'],
  \   },
  \   {
  \     'status': 'finished',
  \     'exit_code': 0,
  \     'job_id': 347,
  \     'command': 'command with no output',
  \     'output': [],
  \   },
  \ ],
  \}

  call ale#linter#Define('testft', g:testlinter1)
  call ale#linter#Define('testft2', g:testlinter2)

  call CheckInfo([
  \   ' Current Filetype: testft.testft2',
  \   'Available Linters: [''testlinter1'', ''testlinter2'']',
  \   '  Enabled Linters: [''testlinter1'', ''testlinter2'']',
  \ ' Linter Variables:',
  \ '',
  \] + g:globals_lines + g:command_header + [
  \ '',
  \ '(finished - exit code 0) ''first command''',
  \ '',
  \ '<<<OUTPUT STARTS>>>',
  \ 'some',
  \ 'first command output',
  \ '<<<OUTPUT ENDS>>>',
  \ '',
  \ '(finished - exit code 1) [''/bin/bash'', ''\c'', ''last command'']',
  \ '',
  \ '<<<OUTPUT STARTS>>>',
  \ 'different second command output',
  \ '<<<OUTPUT ENDS>>>',
  \ '',
  \ '(finished - exit code 0) ''command with no output''',
  \ '',
  \ '<<<NO OUTPUT RETURNED>>>',
  \])