Mercurial > vim
view src/testdir/test_startup.vim @ 34686:83875247fbc0 v9.1.0224
patch 9.1.0224: cursor may move too many lines over "right" & "below" virt text
Commit: https://github.com/vim/vim/commit/515f734e687f28f7199b2a8042197624d9f3ec15
Author: Dylan Thacker-Smith <dylan.ah.smith@gmail.com>
Date: Thu Mar 28 12:01:14 2024 +0100
patch 9.1.0224: cursor may move too many lines over "right" & "below" virt text
Problem: If a line has "right" & "below" virtual text properties,
where the "below" property may be stored first due to lack of
ordering between them, then the line height is calculated to
be 1 more and causes the cursor to far over the line.
Solution: Remove some unnecessary setting of a
`next_right_goes_below = TRUE` flag for "below" and "above"
text properties. (Dylan Thacker-Smith)
I modified a regression test I recently added to cover this case,
leveraging the fact that "after", "right" & "below" text properties are
being stored in the reverse of the order they are added in. The
previous version of this regression test was crafted to workaround this
issue so it can be addressed by this separate patch.
closes: #14317
Signed-off-by: Dylan Thacker-Smith <dylan.ah.smith@gmail.com>
Signed-off-by: Christian Brabandt <cb@256bit.org>
author | Christian Brabandt <cb@256bit.org> |
---|---|
date | Thu, 28 Mar 2024 12:15:03 +0100 |
parents | 995b539939c4 |
children |
line wrap: on
line source
" Tests for startup. source shared.vim source screendump.vim source term_util.vim source check.vim " Check that loading startup.vim works. func Test_startup_script() set compatible source $VIMRUNTIME/defaults.vim call assert_equal(0, &compatible) " Restore some options, so that the following tests doesn't break set nomore set noshowmode endfunc " Verify the order in which plugins are loaded: " 1. plugins in non-after directories " 2. packages " 3. plugins in after directories func Test_after_comes_later() CheckFeature packages let before =<< trim [CODE] set nocp viminfo+=nviminfo set guioptions+=M let $HOME = "/does/not/exist" set loadplugins set rtp=Xhere,Xafter,Xanother set packpath=Xhere,Xafter set nomore let g:sequence = "" [CODE] let after =<< trim [CODE] redir! > Xtestout scriptnames redir END redir! > Xsequence echo g:sequence redir END quit [CODE] call mkdir('Xhere/plugin', 'pR') call writefile(['let g:sequence .= "here "'], 'Xhere/plugin/here.vim') call mkdir('Xanother/plugin', 'pR') call writefile(['let g:sequence .= "another "'], 'Xanother/plugin/another.vim') call mkdir('Xhere/pack/foo/start/foobar/plugin', 'p') call writefile(['let g:sequence .= "pack "'], 'Xhere/pack/foo/start/foobar/plugin/foo.vim') call mkdir('Xafter/plugin', 'pR') call writefile(['let g:sequence .= "after "'], 'Xafter/plugin/later.vim') if RunVim(before, after, '') let lines = readfile('Xtestout') let expected = ['Xbefore.vim', 'here.vim', 'another.vim', 'foo.vim', 'later.vim', 'Xafter.vim'] let found = [] for line in lines for one in expected if line =~ one call add(found, one) endif endfor endfor call assert_equal(expected, found) endif call assert_equal('here another pack after', substitute(join(readfile('Xsequence', 1), ''), '\s\+$', '', '')) call delete('Xtestout') call delete('Xsequence') endfunc func Test_pack_in_rtp_when_plugins_run() CheckFeature packages let before =<< trim [CODE] set nocp viminfo+=nviminfo set guioptions+=M let $HOME = "/does/not/exist" set loadplugins set rtp=Xhere set packpath=Xhere set nomore [CODE] let after = [ \ 'quit', \ ] call mkdir('Xhere/plugin', 'pR') call writefile(['redir! > Xtestout', 'silent set runtimepath?', 'silent! call foo#Trigger()', 'redir END'], 'Xhere/plugin/here.vim') call mkdir('Xhere/pack/foo/start/foobar/autoload', 'p') call writefile(['function! foo#Trigger()', 'echo "autoloaded foo"', 'endfunction'], 'Xhere/pack/foo/start/foobar/autoload/foo.vim') if RunVim(before, after, '') let lines = filter(readfile('Xtestout'), '!empty(v:val)') call assert_match('Xhere[/\\]pack[/\\]foo[/\\]start[/\\]foobar', get(lines, 0)) call assert_match('autoloaded foo', get(lines, 1)) endif call delete('Xtestout') endfunc func Test_help_arg() " This does not work with a GUI-only binary, such as on MS-Windows. CheckAnyOf Unix NotGui if RunVim([], [], '--help >Xtestout') let lines = readfile('Xtestout') call assert_true(len(lines) > 20) call assert_match('Vi IMproved', lines[0]) " check if couple of lines are there let found = [] for line in lines if line =~ '-R.*Readonly mode' call add(found, 'Readonly mode') endif " Watch out for a second --version line in the Gnome version. if line =~ '--version.*Print version information and exit' call add(found, "--version") endif endfor call assert_equal(['Readonly mode', '--version'], found) endif call delete('Xtestout') endfunc func Test_compatible_args() let after =<< trim [CODE] call writefile([string(&compatible)], "Xtestout") set viminfo+=nviminfo quit [CODE] if RunVim([], after, '-C') let lines = readfile('Xtestout') call assert_equal('1', lines[0]) endif if RunVim([], after, '-N') let lines = readfile('Xtestout') call assert_equal('0', lines[0]) endif call delete('Xtestout') endfunc " Test the -o[N] and -O[N] arguments to open N windows split " horizontally or vertically. func Test_o_arg() let after =<< trim [CODE] set cpo&vim call writefile([winnr("$"), \ winheight(1), winheight(2), &lines, \ winwidth(1), winwidth(2), &columns, \ bufname(winbufnr(1)), bufname(winbufnr(2))], \ "Xtestout") qall [CODE] if RunVim([], after, '-o2') " Open 2 windows split horizontally. Expect: " - 2 windows " - both windows should have the same or almost the same height " - sum of both windows height (+ 3 for both statusline and Ex command) " should be equal to the number of lines " - both windows should have the same width which should be equal to the " number of columns " - buffer of both windows should have no name let [wn, wh1, wh2, ln, ww1, ww2, cn, bn1, bn2] = readfile('Xtestout') call assert_equal('2', wn) call assert_inrange(0, 1, wh1 - wh2) call assert_equal(string(wh1 + wh2 + 3), ln) call assert_equal(ww1, ww2) call assert_equal(ww1, cn) call assert_equal('', bn1) call assert_equal('', bn2) endif if RunVim([], after, '-o foo bar') " Same expectations as for -o2 but buffer names should be foo and bar let [wn, wh1, wh2, ln, ww1, ww2, cn, bn1, bn2] = readfile('Xtestout') call assert_equal('2', wn) call assert_inrange(0, 1, wh1 - wh2) call assert_equal(string(wh1 + wh2 + 3), ln) call assert_equal(ww1, ww2) call assert_equal(ww1, cn) call assert_equal('foo', bn1) call assert_equal('bar', bn2) endif if RunVim([], after, '-O2') " Open 2 windows split vertically. Expect: " - 2 windows " - both windows should have the same or almost the same width " - sum of both windows width (+ 1 for the separator) should be equal to " the number of columns " - both windows should have the same height " - window height (+ 2 for the statusline and Ex command) should be equal " to the number of lines " - buffer of both windows should have no name let [wn, wh1, wh2, ln, ww1, ww2, cn, bn1, bn2] = readfile('Xtestout') call assert_equal('2', wn) call assert_inrange(0, 1, ww1 - ww2) call assert_equal(string(ww1 + ww2 + 1), cn) call assert_equal(wh1, wh2) call assert_equal(string(wh1 + 2), ln) call assert_equal('', bn1) call assert_equal('', bn2) endif if RunVim([], after, '-O foo bar') " Same expectations as for -O2 but buffer names should be foo and bar let [wn, wh1, wh2, ln, ww1, ww2, cn, bn1, bn2] = readfile('Xtestout') call assert_equal('2', wn) call assert_inrange(0, 1, ww1 - ww2) call assert_equal(string(ww1 + ww2 + 1), cn) call assert_equal(wh1, wh2) call assert_equal(string(wh1 + 2), ln) call assert_equal('foo', bn1) call assert_equal('bar', bn2) endif call delete('Xtestout') endfunc " Test the -p[N] argument to open N tabpages. func Test_p_arg() let after =<< trim [CODE] call writefile(split(execute("tabs"), "\n"), "Xtestout") qall [CODE] if RunVim([], after, '-p2') let lines = readfile('Xtestout') call assert_equal(4, len(lines)) call assert_equal('Tab page 1', lines[0]) call assert_equal('> [No Name]', lines[1]) call assert_equal('Tab page 2', lines[2]) call assert_equal(' [No Name]', lines[3]) endif if RunVim([], after, '-p foo bar') let lines = readfile('Xtestout') call assert_equal(4, len(lines)) call assert_equal('Tab page 1', lines[0]) call assert_equal('> foo', lines[1]) call assert_equal('Tab page 2', lines[2]) call assert_equal(' bar', lines[3]) endif call delete('Xtestout') endfunc " Test the -V[N] argument to set the 'verbose' option to [N] func Test_V_arg() " Can't catch the output of gvim. CheckNotGui let out = system(GetVimCommand() . ' --clean -es -X -V0 -c "set verbose?" -cq') call assert_equal(" verbose=0\n", out) let out = system(GetVimCommand() . ' --clean -es -X -V2 -c "set verbose?" -cq') call assert_match("sourcing \"$VIMRUNTIME[\\/]defaults\.vim\"\r\nline \\d\\+: sourcing \"[^\"]*runtime[\\/]filetype\.vim\".*\n", out) call assert_match(" verbose=2\n", out) let out = system(GetVimCommand() . ' --clean -es -X -V15 -c "set verbose?" -cq') call assert_match("sourcing \"$VIMRUNTIME[\\/]defaults\.vim\"\r\nline 1: \" The default vimrc file\..* verbose=15\n", out) endfunc " Test that an error is shown when the defaults.vim file could not be read func Test_defaults_error() " Can't catch the output of gvim. CheckNotGui CheckNotMSWindows " For unknown reasons freeing all memory does not work here, even though " EXITFREE is defined. CheckNotAsan let out = system('VIMRUNTIME=/tmp ' .. GetVimCommand() .. ' --clean -cq') call assert_match("E1187: Failed to source defaults.vim", out) let out = system('VIMRUNTIME=/tmp ' .. GetVimCommand() .. ' -u DEFAULTS -cq') call assert_match("E1187: Failed to source defaults.vim", out) endfunc " Test the '-q [errorfile]' argument. func Test_q_arg() CheckFeature quickfix let lines =<< trim END /* some file with an error */ main() { functionCall(arg; arg, arg); return 666 } END call writefile(lines, 'Xbadfile.c', 'D') let after =<< trim [CODE] call writefile([&errorfile, string(getpos("."))], "XtestoutQarg") copen w >> XtestoutQarg qall [CODE] " Test with default argument '-q'. call assert_equal('errors.err', &errorfile) call writefile(["Xbadfile.c:4:12: error: expected ';' before '}' token"], 'errors.err', 'D') if RunVim([], after, '-q') let lines = readfile('XtestoutQarg') call assert_equal(['errors.err', \ '[0, 4, 12, 0]', \ "Xbadfile.c|4 col 12| error: expected ';' before '}' token"], \ lines) endif call delete('XtestoutQarg') " Test with explicit argument '-q XerrorsQarg' (with space). call writefile(["Xbadfile.c:4:12: error: expected ';' before '}' token"], 'XerrorsQarg', 'D') if RunVim([], after, '-q XerrorsQarg') let lines = readfile('XtestoutQarg') call assert_equal(['XerrorsQarg', \ '[0, 4, 12, 0]', \ "Xbadfile.c|4 col 12| error: expected ';' before '}' token"], \ lines) endif call delete('XtestoutQarg') " Test with explicit argument '-qXerrorsQarg' (without space). if RunVim([], after, '-qXerrorsQarg') let lines = readfile('XtestoutQarg') call assert_equal(['XerrorsQarg', \ '[0, 4, 12, 0]', \ "Xbadfile.c|4 col 12| error: expected ';' before '}' token"], \ lines) endif " Test with a non-existing error file (exits with value 3) let out = system(GetVimCommand() .. ' -q xyz.err') call assert_equal(3, v:shell_error) call delete('XtestoutQarg') endfunc " Test the -V[N]{filename} argument to set the 'verbose' option to N " and set 'verbosefile' to filename. func Test_V_file_arg() if RunVim([], [], ' --clean -V2Xverbosefile -c "set verbose? verbosefile?" -cq') let out = join(readfile('Xverbosefile'), "\n") call assert_match("sourcing \"$VIMRUNTIME[\\/]defaults\.vim\"\n", out) call assert_match("\n verbose=2\n", out) call assert_match("\n verbosefile=Xverbosefile", out) endif call delete('Xverbosefile') endfunc " Test the -m, -M and -R arguments: " -m resets 'write' " -M resets 'modifiable' and 'write' " -R sets 'readonly' func Test_m_M_R() let after =<< trim [CODE] call writefile([&write, &modifiable, &readonly, &updatecount], "Xtestout") qall [CODE] if RunVim([], after, '') let lines = readfile('Xtestout') call assert_equal(['1', '1', '0', '200'], lines) endif if RunVim([], after, '-m') let lines = readfile('Xtestout') call assert_equal(['0', '1', '0', '200'], lines) endif if RunVim([], after, '-M') let lines = readfile('Xtestout') call assert_equal(['0', '0', '0', '200'], lines) endif if RunVim([], after, '-R') let lines = readfile('Xtestout') call assert_equal(['1', '1', '1', '10000'], lines) endif call delete('Xtestout') endfunc " Test the -A and -H arguments (Arabic and Hebrew modes). func Test_A_H_arg() let after =<< trim [CODE] call writefile([&rightleft, &arabic, &fkmap, &hkmap], "Xtestout") qall [CODE] " Use silent Ex mode to avoid the hit-Enter prompt for the warning that " 'encoding' is not utf-8. if has('arabic') && &encoding == 'utf-8' && RunVim([], after, '-e -s -A') let lines = readfile('Xtestout') call assert_equal(['1', '1', '0', '0'], lines) endif if has('rightleft') && RunVim([], after, '-H') let lines = readfile('Xtestout') call assert_equal(['1', '0', '0', '1'], lines) endif call delete('Xtestout') endfunc " Test the --echo-wid argument (for GTK GUI only). func Test_echo_wid() CheckCanRunGui CheckFeature gui_gtk if RunVim([], [], '-g --echo-wid -cq >Xtest_echo_wid') let lines = readfile('Xtest_echo_wid') call assert_equal(1, len(lines)) call assert_match('^WID: \d\+$', lines[0]) endif call delete('Xtest_echo_wid') endfunction " Test the -reverse and +reverse arguments (for GUI only). func Test_reverse() CheckCanRunGui CheckAnyOf Feature:gui_gtk Feature:gui_motif let after =<< trim [CODE] call writefile([&background], "Xtest_reverse") qall [CODE] if RunVim([], after, '-f -g -reverse') let lines = readfile('Xtest_reverse') call assert_equal(['dark'], lines) endif if RunVim([], after, '-f -g +reverse') let lines = readfile('Xtest_reverse') call assert_equal(['light'], lines) endif call delete('Xtest_reverse') endfunc " Test the -background and -foreground arguments (for GUI only). func Test_background_foreground() CheckCanRunGui CheckAnyOf Feature:gui_gtk Feature:gui_motif " Is there a better way to check the effect of -background & -foreground " other than merely looking at &background (dark or light)? let after =<< trim [CODE] call writefile([&background], "Xtest_fg_bg") qall [CODE] if RunVim([], after, '-f -g -background darkred -foreground yellow') let lines = readfile('Xtest_fg_bg') call assert_equal(['dark'], lines) endif if RunVim([], after, '-f -g -background ivory -foreground darkgreen') let lines = readfile('Xtest_fg_bg') call assert_equal(['light'], lines) endif call delete('Xtest_fg_bg') endfunc " Test the -font argument (for GUI only). func Test_font() CheckCanRunGui CheckNotMSWindows if has('gui_gtk') let font = 'Courier 14' elseif has('gui_motif') let font = '-misc-fixed-bold-*' else throw 'Skipped: test does not set a valid font for this GUI' endif let after =<< trim [CODE] call writefile([&guifont], "Xtest_font") qall [CODE] if RunVim([], after, '--nofork -g -font "' .. font .. '"') let lines = readfile('Xtest_font') call assert_equal([font], lines) endif call delete('Xtest_font') endfunc " Test the -geometry argument (for GUI only). func Test_geometry() CheckCanRunGui CheckAnyOf Feature:gui_gtk Feature:gui_motif if has('gui_motif') " FIXME: With GUI Motif the value of getwinposx(), " getwinposy() and getwinpos() do not match exactly the " value given in -geometry. Why? " So only check &columns and &lines for those GUIs. let after =<< trim [CODE] call writefile([&columns, &lines], "Xtest_geometry") qall [CODE] if RunVim([], after, '-f -g -geometry 31x13+41+43') let lines = readfile('Xtest_geometry') call assert_equal(['31', '13'], lines) endif else let after =<< trim [CODE] call writefile([&columns, &lines, getwinposx(), getwinposy(), string(getwinpos())], "Xtest_geometry") qall [CODE] " Hide menu because gtk insists to make the window wide enough to show it completely " Some window managers have a bar at the top that pushes windows down, " need to use at least 130, let's do 150 if RunVim(['set guioptions-=m'], after, '-f -g -geometry 31x13+41+150') let lines = readfile('Xtest_geometry') " Depending on the GUI library and the windowing system the final size " might be a bit different, allow for some tolerance. Tuned based on " actual failures. call assert_inrange(31, 35, str2nr(lines[0])) " for some reason, the window may contain fewer lines than requested " for GTK, so allow some tolerance call assert_inrange(8, 13, str2nr(lines[1])) " on Wayland there is no way to set or retrieve window positions if empty($WAYLAND_DISPLAY) call assert_equal('41', lines[2]) call assert_equal('150', lines[3]) call assert_equal('[41, 150]', lines[4]) endif endif endif call delete('Xtest_geometry') endfunc " Test the -iconic argument (for GUI only). func Test_iconic() CheckCanRunGui CheckAnyOf Feature:gui_gtk Feature:gui_motif call RunVim([], [], '-f -g -iconic -cq') " TODO: currently only start vim iconified, but does not " check that vim is iconified. How could this be checked? endfunc func Test_invalid_args() " must be able to get the output of Vim. CheckUnix CheckNotGui for opt in ['-Y', '--does-not-exist'] let out = split(system(GetVimCommand() .. ' ' .. opt), "\n") call assert_equal(1, v:shell_error) call assert_match('^VIM - Vi IMproved .* (.*)$', out[0]) call assert_equal('Unknown option argument: "' .. opt .. '"', out[1]) call assert_equal('More info with: "vim -h"', out[2]) endfor for opt in ['-c', '-i', '-s', '-t', '-T', '-u', '-U', '-w', '-W', '--cmd', '--startuptime'] let out = split(system(GetVimCommand() .. ' ' .. opt), "\n") call assert_equal(1, v:shell_error) call assert_match('^VIM - Vi IMproved .* (.*)$', out[0]) call assert_equal('Argument missing after: "' .. opt .. '"', out[1]) call assert_equal('More info with: "vim -h"', out[2]) endfor if has('clientserver') for opt in ['--remote', '--remote-send', '--remote-silent', '--remote-expr', \ '--remote-tab', '--remote-tab-wait', \ '--remote-tab-wait-silent', '--remote-tab-silent', \ '--remote-wait', '--remote-wait-silent', \ '--servername', \ ] let out = split(system(GetVimCommand() .. ' ' .. opt), "\n") call assert_equal(1, v:shell_error) call assert_match('^VIM - Vi IMproved .* (.*)$', out[0]) call assert_equal('Argument missing after: "' .. opt .. '"', out[1]) call assert_equal('More info with: "vim -h"', out[2]) endfor endif if has('gui_gtk') let out = split(system(GetVimCommand() .. ' --display'), "\n") call assert_equal(1, v:shell_error) call assert_match('^VIM - Vi IMproved .* (.*)$', out[0]) call assert_equal('Argument missing after: "--display"', out[1]) call assert_equal('More info with: "vim -h"', out[2]) endif if has('xterm_clipboard') let out = split(system(GetVimCommand() .. ' -display'), "\n") call assert_equal(1, v:shell_error) call assert_match('^VIM - Vi IMproved .* (.*)$', out[0]) call assert_equal('Argument missing after: "-display"', out[1]) call assert_equal('More info with: "vim -h"', out[2]) endif let out = split(system(GetVimCommand() .. ' -ix'), "\n") call assert_equal(1, v:shell_error) call assert_match('^VIM - Vi IMproved .* (.*)$', out[0]) call assert_equal('Garbage after option argument: "-ix"', out[1]) call assert_equal('More info with: "vim -h"', out[2]) let out = split(system(GetVimCommand() .. ' - xxx'), "\n") call assert_equal(1, v:shell_error) call assert_match('^VIM - Vi IMproved .* (.*)$', out[0]) call assert_equal('Too many edit arguments: "xxx"', out[1]) call assert_equal('More info with: "vim -h"', out[2]) if has('quickfix') " Detect invalid repeated arguments '-t foo -t foo', '-q foo -q foo'. for opt in ['-t', '-q'] let out = split(system(GetVimCommand() .. repeat(' ' .. opt .. ' foo', 2)), "\n") call assert_equal(1, v:shell_error) call assert_match('^VIM - Vi IMproved .* (.*)$', out[0]) call assert_equal('Too many edit arguments: "' .. opt .. '"', out[1]) call assert_equal('More info with: "vim -h"', out[2]) endfor endif for opt in [' -cq', ' --cmd q', ' +', ' -S foo'] let out = split(system(GetVimCommand() .. repeat(opt, 11)), "\n") call assert_equal(1, v:shell_error) " FIXME: The error message given by Vim is not ideal in case of repeated " -S foo since it does not mention -S. call assert_match('^VIM - Vi IMproved .* (.*)$', out[0]) call assert_equal('Too many "+command", "-c command" or "--cmd command" arguments', out[1]) call assert_equal('More info with: "vim -h"', out[2]) endfor if has('gui_gtk') let out = split(system(GetVimCommand() .. ' --socketid'), "\n") call assert_equal(1, v:shell_error) call assert_match('^VIM - Vi IMproved .* (.*)$', out[0]) call assert_equal('Argument missing after: "--socketid"', out[1]) call assert_equal('More info with: "vim -h"', out[2]) for opt in ['--socketid x', '--socketid 0xg'] let out = split(system(GetVimCommand() .. ' ' .. opt), "\n") call assert_equal(1, v:shell_error) call assert_match('^VIM - Vi IMproved .* (.*)$', out[0]) call assert_equal('Invalid argument for: "--socketid"', out[1]) call assert_equal('More info with: "vim -h"', out[2]) endfor endif endfunc func Test_file_args() let after =<< trim [CODE] call writefile(argv(), "Xtestout") qall [CODE] if RunVim([], after, '') let lines = readfile('Xtestout') call assert_equal(0, len(lines)) endif if RunVim([], after, 'one') let lines = readfile('Xtestout') call assert_equal(1, len(lines)) call assert_equal('one', lines[0]) endif if RunVim([], after, 'one two three') let lines = readfile('Xtestout') call assert_equal(3, len(lines)) call assert_equal('one', lines[0]) call assert_equal('two', lines[1]) call assert_equal('three', lines[2]) endif if RunVim([], after, 'one -c echo two') let lines = readfile('Xtestout') call assert_equal(2, len(lines)) call assert_equal('one', lines[0]) call assert_equal('two', lines[1]) endif if RunVim([], after, 'one -- -c echo two') let lines = readfile('Xtestout') call assert_equal(4, len(lines)) call assert_equal('one', lines[0]) call assert_equal('-c', lines[1]) call assert_equal('echo', lines[2]) call assert_equal('two', lines[3]) endif call delete('Xtestout') endfunc func Test_startuptime() CheckFeature startuptime let after = ['qall'] if RunVim([], after, '--startuptime Xtestout one') let lines = readfile('Xtestout') let expected = ['--- VIM STARTING ---', 'parsing arguments', \ 'shell init', 'inits 3', 'start termcap', 'opening buffers'] let found = [] for line in lines for exp in expected if line =~ exp call add(found, exp) endif endfor endfor call assert_equal(expected, found) endif call delete('Xtestout') endfunc func Test_log() CheckFeature channel call assert_false(filereadable('Xlogfile')) let after = ['qall'] if RunVim([], after, '--log Xlogfile') call assert_equal(1, readfile('Xlogfile') \ ->filter({i, l -> l =~ '==== start log session'}) \ ->len()) " second time appends to the log if RunVim([], after, '--log Xlogfile') call assert_equal(2, readfile('Xlogfile') \ ->filter({i, l -> l =~ '==== start log session'}) \ ->len()) endif endif call delete('Xlogfile') endfunc func Test_read_stdin() let after =<< trim [CODE] write Xtestout quit! [CODE] if RunVimPiped([], after, '-', 'echo something | ') let lines = readfile('Xtestout') " MS-Windows adds a space after the word call assert_equal(['something'], split(lines[0])) endif call delete('Xtestout') endfunc func Test_progpath() " Tests normally run with "./vim" or "../vim", these must have been expanded " to a full path. if has('unix') call assert_equal('/', v:progpath[0]) elseif has('win32') call assert_equal(':', v:progpath[1]) call assert_match('[/\\]', v:progpath[2]) endif " Only expect "vim" to appear in v:progname. call assert_match('vim\c', v:progname) endfunc func Test_silent_ex_mode() " must be able to get the output of Vim. CheckUnix CheckNotGui " This caused an ml_get error. let out = system(GetVimCommand() . '-u NONE -es -c''set verbose=1|h|exe "%norm\<c-y>\<c-d>"'' -c cq') call assert_notmatch('E315:', out) endfunc func Test_default_term() " must be able to get the output of Vim. CheckUnix CheckNotGui let save_term = $TERM let $TERM = 'unknownxxx' let out = system(GetVimCommand() . ' -c''set term'' -c cq') call assert_match("defaulting to 'ansi'", out) let $TERM = save_term endfunc func Test_zzz_startinsert() " Test :startinsert call writefile(['123456'], 'Xtestout', 'D') let after =<< trim [CODE] :startinsert call feedkeys("foobar\<c-o>:wq\<cr>","t") [CODE] if RunVim([], after, 'Xtestout') let lines = readfile('Xtestout') call assert_equal(['foobar123456'], lines) endif " Test :startinsert! call writefile(['123456'], 'Xtestout') let after =<< trim [CODE] :startinsert! call feedkeys("foobar\<c-o>:wq\<cr>","t") [CODE] if RunVim([], after, 'Xtestout') let lines = readfile('Xtestout') call assert_equal(['123456foobar'], lines) endif endfunc func Test_issue_3969() " Can't catch the output of gvim. CheckNotGui " Check that message is not truncated. let out = system(GetVimCommand() . ' -es -X -V1 -c "echon ''hello''" -cq') call assert_equal('hello', out) endfunc func Test_start_with_tabs() CheckRunVimInTerminal let buf = RunVimInTerminal('-p a b c', {}) call VerifyScreenDump(buf, 'Test_start_with_tabs', {}) " clean up call StopVimInTerminal(buf) endfunc func Test_start_in_minimal_window() CheckRunVimInTerminal let buf = RunVimInTerminal('-c "set nomore"', {'cols': 12, 'rows': 2, 'keep_t_u7': 1}) call term_sendkeys(buf, "ahello\<Esc>") call WaitForAssert({-> assert_match('^hello', term_getline(buf, 1))}) " clean up call StopVimInTerminal(buf) endfunc func Test_v_argv() " Can't catch the output of gvim. CheckNotGui let out = system(GetVimCommand() . ' -es -V1 -X arg1 --cmd "echo v:argv" --cmd q') let list = out->split("', '") call assert_match('vim', list[0]) let idx = index(list, 'arg1') call assert_true(idx > 2) call assert_equal(['arg1', '--cmd', 'echo v:argv', '--cmd', 'q'']'], list[idx:]) endfunc " Test for the "-r" recovery mode option func Test_r_arg() " Can't catch the output of gvim. CheckNotGui CheckUnix CheckEnglish let cmd = GetVimCommand() " There can be swap files anywhere, only check for the headers. let expected =<< trim END Swap files found:.* In current directory:.* In directory \~/tmp:.* In directory /var/tmp:.* In directory /tmp:.* END call assert_match(join(expected, ""), system(cmd .. " -r")->substitute("[\r\n]\\+", '', '')) endfunc " Test for the '-t' option to jump to a tag func Test_t_arg() let before =<< trim [CODE] set tags=Xtags [CODE] let after =<< trim [CODE] let s = bufname('') .. ':L' .. line('.') .. 'C' .. col('.') call writefile([s], "Xtestout") qall [CODE] call writefile(["!_TAG_FILE_ENCODING\tutf-8\t//", \ "first\tXfile1\t/^ \\zsfirst$/", \ "second\tXfile1\t/^ \\zssecond$/", \ "third\tXfile1\t/^ \\zsthird$/"], \ 'Xtags', 'D') call writefile([' first', ' second', ' third'], 'Xfile1', 'D') for t_arg in ['-t second', '-tsecond'] if RunVim(before, after, t_arg) call assert_equal(['Xfile1:L2C5'], readfile('Xtestout'), t_arg) call delete('Xtestout') endif endfor endfunc " Test the '-T' argument which sets the 'term' option. func Test_T_arg() CheckNotGui let after =<< trim [CODE] call writefile([&term], "Xtest_T_arg") qall [CODE] for t in ['builtin_dumb', 'builtin_ansi'] if RunVim([], after, '-T ' .. t) let lines = readfile('Xtest_T_arg') call assert_equal([t], lines) endif endfor call delete('Xtest_T_arg') endfunc " Test the '-x' argument to read/write encrypted files. func Test_x_arg() CheckRunVimInTerminal CheckFeature cryptv " Create an encrypted file Xtest_x_arg. let buf = RunVimInTerminal('-n -x Xtest_x_arg', #{rows: 10, wait_for_ruler: 0}) call WaitForAssert({-> assert_match('^Enter encryption key: ', term_getline(buf, 10))}) call term_sendkeys(buf, "foo\n") call WaitForAssert({-> assert_match('^Enter same key again: ', term_getline(buf, 10))}) call term_sendkeys(buf, "foo\n") call WaitForAssert({-> assert_match(' All$', term_getline(buf, 10))}) call term_sendkeys(buf, "itest\<Esc>:w\<Enter>") call WaitForAssert({-> assert_match('"Xtest_x_arg" \[New\]\[blowfish2\] 1L, 5B written', \ term_getline(buf, 10))}) call StopVimInTerminal(buf) " Read the encrypted file and check that it contains the expected content "test" let buf = RunVimInTerminal('-n -x Xtest_x_arg', #{rows: 10, wait_for_ruler: 0}) call WaitForAssert({-> assert_match('^Enter encryption key: ', term_getline(buf, 10))}) call term_sendkeys(buf, "foo\n") call WaitForAssert({-> assert_match('^Enter same key again: ', term_getline(buf, 10))}) call term_sendkeys(buf, "foo\n") call WaitForAssert({-> assert_match('^test', term_getline(buf, 1))}) call StopVimInTerminal(buf) call delete('Xtest_x_arg') endfunc " Test for entering the insert mode on startup func Test_start_insertmode() let before =<< trim [CODE] set insertmode [CODE] let after =<< trim [CODE] call writefile(['insertmode=' .. &insertmode], 'Xtestout') qall [CODE] if RunVim(before, after, '') call assert_equal(['insertmode=1'], readfile('Xtestout')) call delete('Xtestout') endif endfunc " Test for enabling the binary mode on startup func Test_b_arg() let after =<< trim [CODE] call writefile(['binary=' .. &binary], 'Xtestout') qall [CODE] if RunVim([], after, '-b') call assert_equal(['binary=1'], readfile('Xtestout')) call delete('Xtestout') endif endfunc " Test for enabling the lisp mode on startup func Test_l_arg() let after =<< trim [CODE] let s = 'lisp=' .. &lisp .. ', showmatch=' .. &showmatch call writefile([s], 'Xtestout') qall [CODE] if RunVim([], after, '-l') call assert_equal(['lisp=1, showmatch=1'], readfile('Xtestout')) call delete('Xtestout') endif endfunc " Test for specifying a non-existing vimrc file using "-u" func Test_missing_vimrc() CheckRunVimInTerminal let after =<< trim [CODE] call assert_match('^E282:', v:errmsg) call writefile(v:errors, 'Xtestout') [CODE] call writefile(after, 'Xafter', 'D') let cmd = GetVimCommandCleanTerm() . ' -u Xvimrc_missing -S Xafter' let buf = term_start(cmd, {'term_rows' : 10}) call WaitForAssert({-> assert_equal("running", term_getstatus(buf))}) call TermWait(buf) call term_sendkeys(buf, "\n:") call TermWait(buf) call WaitForAssert({-> assert_match(':', term_getline(buf, 10))}) call StopVimInTerminal(buf) call assert_equal([], readfile('Xtestout')) call delete('Xtestout') endfunc " Test for using the $VIMINIT environment variable func Test_VIMINIT() let after =<< trim [CODE] call assert_equal(1, exists('viminit_found')) call assert_equal('yes', viminit_found) call writefile(v:errors, 'Xtestout') qall [CODE] call writefile(after, 'Xafter', 'D') let cmd = GetVimProg() . ' --not-a-term -S Xafter --cmd "set enc=utf8"' call setenv('VIMINIT', 'let viminit_found="yes"') exe "silent !" . cmd call assert_equal([], readfile('Xtestout')) call delete('Xtestout') endfunc " Test for using the $EXINIT environment variable func Test_EXINIT() let after =<< trim [CODE] call assert_equal(1, exists('exinit_found')) call assert_equal('yes', exinit_found) call writefile(v:errors, 'Xtestout') qall [CODE] call writefile(after, 'Xafter', 'D') let cmd = GetVimProg() . ' --not-a-term -S Xafter --cmd "set enc=utf8"' call setenv('EXINIT', 'let exinit_found="yes"') exe "silent !" . cmd call assert_equal([], readfile('Xtestout')) call delete('Xtestout') endfunc " Test for using the 'exrc' option func Test_exrc() let after =<< trim [CODE] call assert_equal(1, &exrc) call assert_equal(1, &secure) call assert_equal(37, exrc_found) call writefile(v:errors, 'Xtestout') qall [CODE] call mkdir('Xrcdir', 'R') call writefile(['let exrc_found=37'], 'Xrcdir/.exrc') call writefile(after, 'Xrcdir/Xafter') let cmd = GetVimProg() . ' --not-a-term -S Xafter --cmd "cd Xrcdir" --cmd "set enc=utf8 exrc secure"' exe "silent !" . cmd call assert_equal([], readfile('Xrcdir/Xtestout')) endfunc " Test for starting Vim with a non-terminal as input/output func Test_io_not_a_terminal() " Can't catch the output of gvim. CheckNotGui CheckUnix CheckEnglish let l = systemlist(GetVimProg() .. ' --ttyfail') call assert_equal(['Vim: Warning: Output is not to a terminal', \ 'Vim: Warning: Input is not from a terminal'], l) endfunc " Test for --not-a-term avoiding escape codes. func Test_not_a_term() CheckUnix CheckNotGui if &shellredir =~ '%s' let redir = printf(&shellredir, 'Xvimout') else let redir = &shellredir .. ' Xvimout' endif " Without --not-a-term there are a few escape sequences. " This will take 2 seconds because of the missing --not-a-term let cmd = GetVimProg() .. ' --cmd quit ' .. redir exe "silent !" . cmd call assert_match("\<Esc>", readfile('Xvimout')->join()) call delete('Xvimout') " With --not-a-term there are no escape sequences. let cmd = GetVimProg() .. ' --not-a-term --cmd quit ' .. redir exe "silent !" . cmd call assert_notmatch("\<Esc>", readfile('Xvimout')->join()) call delete('Xvimout') endfunc " Test quitting with CTRL-C when output is redirected. func Test_redirect_Ctrl_C() CheckUnix CheckNotGui CheckRunVimInTerminal let buf = Run_shell_in_terminal({}) " Wait for the shell to display a prompt call WaitForAssert({-> assert_notequal('', term_getline(buf, 1))}) call term_sendkeys(buf, GetVimProg() .. " | grep word\<CR>") call WaitForAssert({-> assert_match("Output is not to a terminal", getline(1, 4)->join())}) " wait for the hard coded delay, otherwise the CTRL-C interrupts startup sleep 2 call term_sendkeys(buf, "\<C-C>") sleep 100m call term_sendkeys(buf, "exit\<CR>") call WaitForAssert({-> assert_equal('dead', job_status(g:job))}) exe buf . 'bwipe!' unlet g:job endfunc " Test for the "-w scriptout" argument func Test_w_arg() " Can't catch the output of gvim. CheckNotGui call writefile(["iVim Editor\<Esc>:q!\<CR>"], 'Xscriptin', 'bD') if RunVim([], [], '-s Xscriptin -w Xscriptout') call assert_equal(["iVim Editor\e:q!\r"], readfile('Xscriptout')) call delete('Xscriptout') endif call delete('Xscriptin') " Test for failing to open the script output file. This test works only when " the language is English. if v:lang == "C" || v:lang =~ '^[Ee]n' call mkdir("Xargdir") let m = system(GetVimCommand() .. " -w Xargdir") call assert_equal("Cannot open for script output: \"Xargdir\"\n", m) call delete("Xargdir", 'rf') endif " A number argument sets the 'window' option call writefile(["iwindow \<C-R>=&window\<CR>\<Esc>:wq! Xresult\<CR>"], 'Xscriptin', 'b') for w_arg in ['-w 17', '-w17'] if RunVim([], [], '-s Xscriptin ' .. w_arg) call assert_equal(["window 17"], readfile('Xresult'), w_arg) call delete('Xresult') endif endfor endfunc " Test for the "-s scriptin" argument func Test_s_arg() " Can't catch the output of gvim. CheckNotGui CheckEnglish " Test for failing to open the script input file. let m = system(GetVimCommand() .. " -s abcxyz") call assert_equal("Cannot open for reading: \"abcxyz\"\n", m) call writefile([], 'Xinput', 'D') let m = system(GetVimCommand() .. " -s Xinput -s Xinput") call assert_equal("Attempt to open script file again: \"-s Xinput\"\n", m) endfunc " Test for the "-n" (no swap file) argument func Test_n_arg() let after =<< trim [CODE] call assert_equal(0, &updatecount) call writefile(v:errors, 'Xtestout') qall [CODE] if RunVim([], after, '-n') call assert_equal([], readfile('Xtestout')) call delete('Xtestout') endif endfunc " Test for the "-h" (help) argument func Test_h_arg() " Can't catch the output of gvim. CheckNotGui let l = systemlist(GetVimProg() .. ' -h') call assert_match('^VIM - Vi IMproved', l[0]) let l = systemlist(GetVimProg() .. ' -?') call assert_match('^VIM - Vi IMproved', l[0]) endfunc " Test for the "-F" (farsi) argument func Test_F_arg() " Can't catch the output of gvim. CheckNotGui let l = systemlist(GetVimProg() .. ' -F') call assert_match('^E27:', l[0]) endfunc " Test for the "-E" (improved Ex mode) argument func Test_E_arg() let after =<< trim [CODE] call assert_equal('cv', mode(1)) call writefile(v:errors, 'Xtestout') qall [CODE] if RunVim([], after, '-E') call assert_equal([], readfile('Xtestout')) call delete('Xtestout') endif endfunc " Test for the "-D" (debugger) argument func Test_D_arg() CheckRunVimInTerminal let cmd = GetVimCommandCleanTerm() .. ' -D' let buf = term_start(cmd, {'term_rows' : 10}) call WaitForAssert({-> assert_equal("running", term_getstatus(buf))}) call WaitForAssert({-> assert_equal('Entering Debug mode. Type "cont" to continue.', \ term_getline(buf, 7))}) call WaitForAssert({-> assert_equal('>', term_getline(buf, 10))}) call StopVimInTerminal(buf) endfunc " Test for too many edit argument errors func Test_too_many_edit_args() " Can't catch the output of gvim. CheckNotGui CheckEnglish let l = systemlist(GetVimProg() .. ' - -') call assert_match('^Too many edit arguments: "-"', l[1]) endfunc " Test starting vim with various names: vim, ex, view, evim, etc. func Test_progname() CheckUnix call mkdir('Xprogname', 'pD') call writefile(['silent !date', \ 'call writefile([mode(1), ' \ .. '&insertmode, &diff, &readonly, &updatecount, ' \ .. 'join(split(execute("message"), "\n")[1:])], "Xprogname_out")', \ 'qall'], 'Xprogname_after') " +---------------------------------------------- progname " | +--------------------------------- mode(1) " | | +--------------------------- &insertmode " | | | +---------------------- &diff " | | | | +----------------- &readonly " | | | | | +-------- &updatecount " | | | | | | +--- :messages " | | | | | | | let expectations = { \ 'vim': ['n', '0', '0', '0', '200', ''], \ 'gvim': ['n', '0', '0', '0', '200', ''], \ 'ex': ['ce', '0', '0', '0', '200', ''], \ 'exim': ['cv', '0', '0', '0', '200', ''], \ 'view': ['n', '0', '0', '1', '10000', ''], \ 'gview': ['n', '0', '0', '1', '10000', ''], \ 'evim': ['n', '1', '0', '0', '200', ''], \ 'eview': ['n', '1', '0', '1', '10000', ''], \ 'rvim': ['n', '0', '0', '0', '200', 'line 1: E145: Shell commands and some functionality not allowed in rvim'], \ 'rgvim': ['n', '0', '0', '0', '200', 'line 1: E145: Shell commands and some functionality not allowed in rvim'], \ 'rview': ['n', '0', '0', '1', '10000', 'line 1: E145: Shell commands and some functionality not allowed in rvim'], \ 'rgview': ['n', '0', '0', '1', '10000', 'line 1: E145: Shell commands and some functionality not allowed in rvim'], \ 'vimdiff': ['n', '0', '1', '0', '200', ''], \ 'gvimdiff': ['n', '0', '1', '0', '200', '']} let prognames = ['vim', 'gvim', 'ex', 'exim', 'view', 'gview', \ 'evim', 'eview', 'rvim', 'rgvim', 'rview', 'rgview', \ 'vimdiff', 'gvimdiff'] for progname in prognames let run_with_gui = (progname =~# 'g') || (has('gui') && (progname ==# 'evim' || progname ==# 'eview')) if empty($DISPLAY) && run_with_gui " Can't run gvim, gview (etc.) if $DISPLAY is not setup. continue endif exe 'silent !ln -s -f ' ..exepath(GetVimProg()) .. ' Xprogname/' .. progname let stdout_stderr = '' if progname =~# 'g' let stdout_stderr = system('Xprogname/'..progname..' -f --clean --not-a-term -S Xprogname_after') else exe 'sil !Xprogname/'..progname..' -f --clean --not-a-term -S Xprogname_after' endif if progname =~# 'g' && !has('gui') call assert_equal("E25: GUI cannot be used: Not enabled at compile time\n", stdout_stderr, progname) else " GUI motif can output some warnings like this: " Warning: " Name: subMenu " Class: XmCascadeButton " Illegal mnemonic character; Could not convert X KEYSYM to a keycode " So don't check that stderr is empty with GUI Motif. if run_with_gui && !has('gui_motif') call assert_equal('', stdout_stderr, progname) endif call assert_equal(expectations[progname], readfile('Xprogname_out'), progname) endif call delete('Xprogname/' .. progname) call delete('Xprogname_out') endfor call delete('Xprogname_after') endfunc " Test for doing a write from .vimrc func Test_write_in_vimrc() call writefile(['silent! write'], 'Xvimrc', 'D') let after =<< trim [CODE] call assert_match('E32: ', v:errmsg) call writefile(v:errors, 'Xtestout') qall [CODE] if RunVim([], after, '-u Xvimrc') call assert_equal([], readfile('Xtestout')) call delete('Xtestout') endif endfunc func Test_echo_true_in_cmd() CheckNotGui let lines =<< trim END echo v:true call writefile(['done'], 'Xresult') quit END call writefile(lines, 'Xscript', 'D') if RunVim([], [], '--cmd "source Xscript"') call assert_equal(['done'], readfile('Xresult')) endif call delete('Xresult') endfunc func Test_rename_buffer_on_startup() CheckUnix let lines =<< trim END call writefile(['done'], 'Xresult') qa! END call writefile(lines, 'Xscript', 'D') if RunVim([], [], "--clean -e -s --cmd 'file x|new|file x' --cmd 'so Xscript'") call assert_equal(['done'], readfile('Xresult')) endif call delete('Xresult') endfunc " Test that -cq works as expected func Test_cq_zero_exmode() CheckFeature channel let logfile = 'Xcq_log.txt' let out = system(GetVimCommand() .. ' --clean --log ' .. logfile .. ' -es -X -c "argdelete foobar" -c"7cq"') call assert_equal(8, v:shell_error) let log = filter(readfile(logfile), {idx, val -> val =~ "E480"}) call assert_match('E480: No match: foobar', log[0]) call delete(logfile) " wrap-around on Unix let out = system(GetVimCommand() .. ' --clean --log ' .. logfile .. ' -es -X -c "argdelete foobar" -c"255cq"') if !has('win32') call assert_equal(0, v:shell_error) else call assert_equal(256, v:shell_error) endif let log = filter(readfile(logfile), {idx, val -> val =~ "E480"}) call assert_match('E480: No match: foobar', log[0]) call delete('Xcq_log.txt') endfunc " vim: shiftwidth=2 sts=2 expandtab